From 8c7e6d923b2cb65be2429c35e10e4b9d3cf999fe Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Fri, 26 Feb 2021 19:29:55 +0530 Subject: Rename subsampling-random-vector to cone-random-vector. * scm/nsmc/wrap.scm: (subsampling-random-vector): Rename to cone-random-vector. * src/nd-random.sc (subsampling-random-vector): Rename to cone-random-vector. * include/nd-random.h (subsampling_random_vector): Rename to cone_random_vector. --- scm/nsmc/wrap.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'scm') diff --git a/scm/nsmc/wrap.scm b/scm/nsmc/wrap.scm index e6d9a47..853dfb6 100644 --- a/scm/nsmc/wrap.scm +++ b/scm/nsmc/wrap.scm @@ -188,10 +188,10 @@ %gsl-random-state vector) vector)) -(define-public (subsampling-random-vector mean max-theta) +(define-public (cone-random-vector mean max-theta) (let ((vector (vector-alloc (vector-size mean)))) ((pointer->procedure void - (dynamic-func "subsampling_random_vector" lib-nsmc) + (dynamic-func "cone_random_vector" lib-nsmc) (list '* '* double '*)) %gsl-random-state mean max-theta vector) vector)) -- cgit v1.2.3