From b712756e74e3e3c101064bbefc1d062b73d11443 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Tue, 23 Feb 2021 16:29:44 +0530 Subject: Implement the lower incomplete gamma function as a scheme wrapper. With this change, the wrapper around the gsl lower incomplete gamma function is directly in scheme. Earlier, there was one layer of wrapping in C which needed to be wrapped again in scheme. * include/utils.h (lower_incomplete_gamma): Delete function. * src/utils.sc (lower-incomplete-gamma): Delete function. * scm/extent-sampling/wrap.scm (lower-incomplete-gamma): New function. --- include/utils.h | 1 - 1 file changed, 1 deletion(-) (limited to 'include') diff --git a/include/utils.h b/include/utils.h index e28ee91..5cec86c 100644 --- a/include/utils.h +++ b/include/utils.h @@ -10,7 +10,6 @@ double volume_of_ball (unsigned int dimension); double ln_volume_of_ball (unsigned int dimension); double surface_area_of_ball (unsigned int dimension); double ln_surface_area_of_ball (unsigned int dimension); -double lower_incomplete_gamma (double s, double x); double angle_between_vectors (const gsl_vector* x, const gsl_vector* y); double dot_product (const gsl_vector* x, const gsl_vector* y); -- cgit v1.2.3