From 30104d8ee20733cf4e2195ef9a6cd202a7a257e5 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 16 Mar 2021 15:01:45 +0530
Subject: Deal in solid angle fractions, not absolute solid angles.

* src/extent-sampling.sc (volume-cone): Use
solid-angle-fraction->planar-angle instead of
solid-angle->planar-angle.
* src/nd-random.sc (planar-angle->solid-angle): Rename to
planar-angle->solid-angle-fraction and return a solid angle fraction.
(solid-angle->planar-angle): Rename to
solid-angle-fraction->planar-angle and accept a solid angle fraction.
(hollow-cone-random-vector): Use planar-angle->solid-angle-fraction
instead of planar-angle->solid-angle.
(beta-inc-unnormalized, incomplete-wallis-integral): Delete functions.
* include/nd-random.h (planar_angle_to_solid_angle): Rename to
planar_angle_to_solid_angle_fraction.
(solid_angle_to_planar_angle): Rename to
solid_angle_fraction_to_planar_angle.
* scm/nsmc/wrap.scm (planar-angle->solid-angle): Rename to
planar-angle->solid-angle-fraction.
---
 scm/nsmc/wrap.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'scm')

diff --git a/scm/nsmc/wrap.scm b/scm/nsmc/wrap.scm
index 6ae4089..3e94192 100644
--- a/scm/nsmc/wrap.scm
+++ b/scm/nsmc/wrap.scm
@@ -64,9 +64,9 @@
                       (dynamic-func "angle_between_vectors" lib-nsmc)
                       (list '* '*)))
 
-(define-public planar-angle->solid-angle
+(define-public planar-angle->solid-angle-fraction
   (pointer->procedure double
-                      (dynamic-func "planar_angle_to_solid_angle" lib-nsmc)
+                      (dynamic-func "planar_angle_to_solid_angle_fraction" lib-nsmc)
                       (list double int)))
 
 ;; Random state
-- 
cgit v1.2.3