Changeset 3a48772 in sasmodels for sasmodels/models/lib/gfn.c
- Timestamp:
- Oct 14, 2016 3:23:40 PM (8 years ago)
- Branches:
- master, core_shell_microgels, costrafo411, magnetic_model, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests
- Children:
- a5b6997
- Parents:
- b716cc6
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sasmodels/models/lib/gfn.c
r177c1a1 r3a48772 12 12 { 13 13 // local variables 14 const double pi43=4.0/3.0*M_PI;15 14 const double aa = crmaj; 16 15 const double bb = crmin; … … 20 19 //const double siq = (uq == 0.0 ? 1.0 : 3.0*(sin(uq)/uq/uq - cos(uq)/uq)/uq); 21 20 const double siq = sph_j1c(uq); 22 const double vc = pi43*aa*aa*bb;21 const double vc = M_4PI_3*aa*aa*bb; 23 22 const double gfnc = siq*vc*delpc; 24 23 25 24 const double ut2 = (trmin*trmin*xx*xx + trmaj*trmaj*(1.0-xx*xx)); 26 25 const double ut= sqrt(ut2)*qq; 27 const double vt = pi43*trmaj*trmaj*trmin;26 const double vt = M_4PI_3*trmaj*trmaj*trmin; 28 27 //const double sit = (ut == 0.0 ? 1.0 : 3.0*(sin(ut)/ut/ut - cos(ut)/ut)/ut); 29 28 const double sit = sph_j1c(ut); … … 33 32 const double result = tgfn*tgfn; 34 33 35 return (result);34 return result; 36 35 }
Note: See TracChangeset
for help on using the changeset viewer.