aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/utils.sc4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/utils.sc b/src/utils.sc
index a481109..3d96b40 100644
--- a/src/utils.sc
+++ b/src/utils.sc
@@ -39,10 +39,6 @@ sphere, etc."
2 corresponds to a circle, 3 corresponds to a sphere, etc."
(return (* dimension (volume-of-ball dimension))))
-(define (lower-incomplete-gamma s x) (double double double)
- (return (* (gsl-sf-gamma s)
- (gsl-sf-gamma-inc-P s x))))
-
(define (angle-between-vectors x y) (double (const gsl-vector*) (const gsl-vector*))
"Return the angle between vectors X and Y. The returned value is in
the range [0,pi]."