aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2021-02-11 14:20:01 +0530
committerArun Isaac2021-02-11 14:20:01 +0530
commit1f847944d8769579fb5a351cdf1232f95370e7a7 (patch)
treef820c3af12c1ca9a637a2090731937b83325231e
parent49c13d72c248e86e65bde977059e97b7f79a97f8 (diff)
downloadnsmc-1f847944d8769579fb5a351cdf1232f95370e7a7.tar.gz
nsmc-1f847944d8769579fb5a351cdf1232f95370e7a7.tar.lz
nsmc-1f847944d8769579fb5a351cdf1232f95370e7a7.zip
Remove cube maximum extent function.
We are not using maximum extent functions anymore. * src/oracles.sc (cube-maximum-extent): Delete function. * include/oracles.h (cube-maximum-extent): Delete function declaration.
-rw-r--r--include/oracles.h1
-rw-r--r--src/oracles.sc3
2 files changed, 0 insertions, 4 deletions
diff --git a/include/oracles.h b/include/oracles.h
index 981f855..1af39cc 100644
--- a/include/oracles.h
+++ b/include/oracles.h
@@ -16,7 +16,6 @@ double beta_true_volume (double alpha, double beta, unsigned int dimension);
double cube_extent_oracle (const gsl_vector* x, double edge);
double cube_extent_oracle_with_center (const gsl_vector* x, const gsl_vector* center, double edge);
double cube_true_volume (double edge, unsigned int dimension);
-double cube_maximum_extent (double edge, unsigned int dimension);
double ellipsoid_extent_oracle (const gsl_vector* x, const gsl_vector* axes);
double ellipsoid_true_volume (const gsl_vector* axes);
diff --git a/src/oracles.sc b/src/oracles.sc
index 9680479..e0e88ba 100644
--- a/src/oracles.sc
+++ b/src/oracles.sc
@@ -63,9 +63,6 @@
(define (cube-true-volume edge dimension) (double double (unsigned int))
(return (gsl-pow-uint edge dimension)))
-(define (cube-maximum-extent edge dimension) (double double (unsigned int))
- (return (/ (* edge (sqrt dimension))
- 2)))
(define (ellipsoid-extent-oracle x axes) (double (const gsl-vector*) (const gsl-vector*))
(let* ((k double 0))