source:
sasmodels/sasmodels/models/lib/sphere_form.c
@
ad90df9
Last change on this file since ad90df9 was ad90df9, checked in by Paul Kienzle <pkienzle@…>, 8 years ago | |
---|---|
|
|
File size: 323 bytes |
Rev | Line | |
---|---|---|
[ad90df9] | 1 | inline double |
2 | sphere_volume(double radius) | |
[9aac25d] | 3 | { |
[ad90df9] | 4 | return M_4PI_3*cube(radius); |
[9aac25d] | 5 | } |
6 | ||
[ad90df9] | 7 | inline double |
8 | sphere_form(double q, double radius, double sld, double solvent_sld) | |
[9aac25d] | 9 | { |
[ad90df9] | 10 | const double fq = sphere_volume(radius) * sph_j1c(q*radius); |
11 | const double contrast = (sld - solvent_sld); | |
12 | return 1.0e-4*square(contrast * fq); | |
13 | } |
Note: See TracBrowser
for help on using the repository browser.