core_shell_microgelscostrafo411magnetic_modelrelease_v0.94release_v0.95ticket-1257-vesicle-productticket_1156ticket_1265_superballticket_822_more_unit_tests
Last change
on this file since 0471c72 was
0471c72,
checked in by Paul Kienzle <pkienzle@…>, 8 years ago
|
minor formatting
|
-
Property mode set to
100644
|
File size:
1.7 KB
|
Rev | Line | |
---|
[c9f885e] | 1 | static |
---|
| 2 | double multi_shell_kernel(double q, |
---|
| 3 | double core_radius, |
---|
| 4 | double s_thickness, |
---|
| 5 | double w_thickness, |
---|
| 6 | double core_sld, |
---|
| 7 | double shell_sld, |
---|
| 8 | double n_pairs) |
---|
| 9 | { |
---|
[0471c72] | 10 | //calculate with a loop, two shells at a time |
---|
[b7529e2] | 11 | int ii=0; |
---|
| 12 | double fval=0.0; |
---|
| 13 | double voli = 0.0; |
---|
[c9f885e] | 14 | const double sldi = core_sld-shell_sld; |
---|
| 15 | |
---|
[b7529e2] | 16 | do { |
---|
| 17 | double ri = core_radius + (double)ii*(s_thickness + w_thickness); |
---|
[c9f885e] | 18 | |
---|
| 19 | // layer 1 |
---|
[b7529e2] | 20 | voli = 4.0*M_PI/3.0*ri*ri*ri; |
---|
| 21 | fval += voli*sldi*sph_j1c(ri*q); |
---|
[c9f885e] | 22 | |
---|
[b7529e2] | 23 | ri += s_thickness; |
---|
[c9f885e] | 24 | |
---|
| 25 | // layer 2 |
---|
[b7529e2] | 26 | voli = 4.0*M_PI/3.0*ri*ri*ri; |
---|
| 27 | fval -= voli*sldi*sph_j1c(ri*q); |
---|
[c9f885e] | 28 | |
---|
| 29 | //do 2 layers at a time |
---|
[b7529e2] | 30 | ii+=1; |
---|
[c9f885e] | 31 | |
---|
[0471c72] | 32 | } while(ii<=n_pairs-1); //change to make 0 < n_pairs < 2 correspond to |
---|
| 33 | //unilamellar vesicles (C. Glinka, 11/24/03) |
---|
[c9f885e] | 34 | |
---|
| 35 | fval *= 1.0e-4*fval/voli; |
---|
| 36 | |
---|
[b7529e2] | 37 | return(fval); |
---|
[c9f885e] | 38 | } |
---|
| 39 | |
---|
[0471c72] | 40 | static |
---|
[c9f885e] | 41 | double Iq(double q, |
---|
| 42 | double core_radius, |
---|
| 43 | double s_thickness, |
---|
| 44 | double w_thickness, |
---|
| 45 | double core_sld, |
---|
| 46 | double shell_sld, |
---|
| 47 | double n_pairs) |
---|
| 48 | { |
---|
| 49 | return multi_shell_kernel(q, |
---|
| 50 | core_radius, |
---|
| 51 | s_thickness, |
---|
| 52 | w_thickness, |
---|
| 53 | core_sld, |
---|
| 54 | shell_sld, |
---|
| 55 | n_pairs); |
---|
| 56 | } |
---|
| 57 | |
---|
[0471c72] | 58 | static |
---|
[c9f885e] | 59 | double Iqxy(double qx, double qy, |
---|
| 60 | double core_radius, |
---|
| 61 | double s_thickness, |
---|
| 62 | double w_thickness, |
---|
| 63 | double core_sld, |
---|
| 64 | double shell_sld, |
---|
| 65 | double n_pairs) |
---|
| 66 | { |
---|
| 67 | double q = sqrt(qx*qx + qy*qy); |
---|
| 68 | |
---|
| 69 | return multi_shell_kernel(q, |
---|
| 70 | core_radius, |
---|
| 71 | s_thickness, |
---|
| 72 | w_thickness, |
---|
| 73 | core_sld, |
---|
| 74 | shell_sld, |
---|
| 75 | n_pairs); |
---|
| 76 | } |
---|
Note: See
TracBrowser
for help on using the repository browser.