aboutsummaryrefslogtreecommitdiff
path: root/scm
diff options
context:
space:
mode:
Diffstat (limited to 'scm')
-rw-r--r--scm/nsmc/wrap.scm4
1 files changed, 2 insertions, 2 deletions
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))