diff options
| author | Arun Isaac | 2021-02-26 19:29:55 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-02-26 19:29:55 +0530 |
| commit | 8c7e6d923b2cb65be2429c35e10e4b9d3cf999fe (patch) | |
| tree | b49af935c5e02bce9f35764368f7c0252bf6fdad | |
| parent | 87dee7fd98539d1fbcbae1a1c0d5217a080de299 (diff) | |
| download | nsmc-8c7e6d923b2cb65be2429c35e10e4b9d3cf999fe.tar.gz nsmc-8c7e6d923b2cb65be2429c35e10e4b9d3cf999fe.tar.lz nsmc-8c7e6d923b2cb65be2429c35e10e4b9d3cf999fe.zip | |
Rename subsampling-random-vector to cone-random-vector.
* scm/nsmc/wrap.scm: (subsampling-random-vector): Rename to
cone-random-vector.
* src/nd-random.sc (subsampling-random-vector): Rename to
cone-random-vector.
* include/nd-random.h (subsampling_random_vector): Rename to
cone_random_vector.
| -rw-r--r-- | include/nd-random.h | 2 | ||||
| -rw-r--r-- | scm/nsmc/wrap.scm | 4 | ||||
| -rw-r--r-- | src/nd-random.sc | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/include/nd-random.h b/include/nd-random.h index 9637a0e..7f3d41c 100644 --- a/include/nd-random.h +++ b/include/nd-random.h @@ -6,8 +6,8 @@ #include <gsl/gsl_vector.h> void random_direction_vector (const gsl_rng* r, gsl_vector* x); +void cone_random_vector (const gsl_rng* r, const gsl_vector* mean, double theta_max, gsl_vector* x); void hollow_cone_random_vector (const gsl_rng* r, const gsl_vector* mean, double theta_min, double theta_max, gsl_vector* x); -void subsampling_random_vector (const gsl_rng* r, const gsl_vector* mean, double theta_max, gsl_vector* x); double planar_angle_to_solid_angle (double planar_angle, unsigned int dimension); double solid_angle_to_planar_angle (double solid_angle, unsigned int dimension); 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)) diff --git a/src/nd-random.sc b/src/nd-random.sc index 459500f..9984a7b 100644 --- a/src/nd-random.sc +++ b/src/nd-random.sc @@ -93,6 +93,6 @@ dx. THETA should be in [0,pi]." ;; Rotate to arbitrary basis. (rotate-from-nth-canonical x mean)) -(define (subsampling-random-vector r mean theta-max x) +(define (cone-random-vector r mean theta-max x) (void (const gsl-rng*) (const gsl-vector*) double gsl-vector*) (hollow-cone-random-vector r mean 0 theta-max x)) |