diff options
| author | Arun Isaac | 2021-02-24 13:23:15 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-02-24 13:23:15 +0530 |
| commit | 6614ecbb65b71a7d9745a510189a05ff6b69f770 (patch) | |
| tree | 34c3ae863470710907d39d92b22e72cc223a7244 | |
| parent | e50812c0a38f8583c5646c365a18acd42cfbe3a6 (diff) | |
| download | nsmc-6614ecbb65b71a7d9745a510189a05ff6b69f770.tar.gz nsmc-6614ecbb65b71a7d9745a510189a05ff6b69f770.tar.lz nsmc-6614ecbb65b71a7d9745a510189a05ff6b69f770.zip | |
Remove workaround for sph-sc negation bug.
The bug has been fixed upstream.
* src/integrands.sc (gaussian-integrand): Remove workaround for sph-sc
negation bug.
| -rw-r--r-- | src/integrands.sc | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/integrands.sc b/src/integrands.sc index 750530c..920d257 100644 --- a/src/integrands.sc +++ b/src/integrands.sc @@ -10,10 +10,7 @@ r)))) (define (gaussian-integrand r x -params) (double double (const gsl-vector*) void*) - ;; This is a workaround to fix negation bug in sph-sc. See - ;; https://github.com/sph-mn/sph-sc/issues/5 . TODO: Remove - ;; workaround once bug is fixed upstream. - (return (exp (- 0 (/ (gsl-pow-2 r) 2))))) + (return (exp (- (/ (gsl-pow-2 r) 2))))) (define (x-coordinate-integrand r x -params) (double double (const gsl-vector*) void*) (return (fabs (* r (gsl-vector-get x 0))))) |