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 9789795..5e4c8be 100644
--- a/scm/nsmc/wrap.scm
+++ b/scm/nsmc/wrap.scm
@@ -367,7 +367,7 @@
(list '* double '* unsigned-int double '*))
(maybe-procedure->extent-oracle extent-oracle)
true-volume %gsl-random-state dimension rtol stats)
- (rstat-n stats)))
+ stats))
(define-public (integral integrand extent-oracle true-integral dimension rtol)
(let ((stats (rstat-alloc)))
@@ -377,7 +377,7 @@
(maybe-procedure->integrand integrand)
(maybe-procedure->extent-oracle extent-oracle)
true-integral %gsl-random-state dimension rtol stats)
- (rstat-n stats)))
+ stats))
(define-public (volume-importance extent-oracle mean samples-per-cone
solid-angle-factor solid-angle-threshold-exponent-factor)