Changeset e07b470 in sasmodels
- Timestamp:
- Apr 26, 2016 9:54:45 AM (9 years ago)
- Branches:
- master, core_shell_microgels, costrafo411, magnetic_model, release_v0.94, release_v0.95, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests
- Children:
- c7b058e
- Parents:
- bfdfb23
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sasmodels/models/lib/sas_gamma.c
rbfdfb23 re07b470 10 10 inline double sas_gamma( double x) { return tgamma(x+1)/x; } 11 11 #else 12 double _isnan(double x, double y) { return x != y; }13 #undef isnan14 #define isnan(x) _isnan(x, x)15 16 12 static double cephes_stirf(double x) 17 13 { 18 14 #define MAXSTIR 143.01608 19 static double SQTPI = 2.50662827463100050242E0; 15 #define SQTPI 2.50662827463100050242E0 20 16 double y, w, v; 21 17 … … 44 40 45 41 double sas_gamma(double x) { 46 47 static double LOGPI = 1.14472988584940017414; 42 #define MAXGAM 171.624376956302725 43 #define LOGPI 1.14472988584940017414 48 44 double p, q, z; 49 45 int sgngam;
Note: See TracChangeset
for help on using the changeset viewer.