Changeset 2222134 in sasmodels for sasmodels/models/core_shell_ellipsoid.c
- Timestamp:
- Sep 30, 2016 9:07:16 AM (8 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:
- a807206
- Parents:
- 6e5b2a7
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sasmodels/models/core_shell_ellipsoid.c
r29172aa r2222134 1 double form_volume(double equat_core,2 double polar_core,3 double equat_shell,4 double polar_shell);1 double form_volume(double radius_equat_core, 2 double radius_polar_core, 3 double radius_equat_shell, 4 double radius_polar_shell); 5 5 double Iq(double q, 6 double equat_core,7 double polar_core,8 double equat_shell,9 double polar_shell,6 double radius_equat_core, 7 double radius_polar_core, 8 double radius_equat_shell, 9 double radius_polar_shell, 10 10 double sld_core, 11 11 double sld_shell, … … 14 14 15 15 double Iqxy(double qx, double qy, 16 double equat_core,17 double polar_core,18 double equat_shell,19 double polar_shell,16 double radius_equat_core, 17 double radius_polar_core, 18 double radius_equat_shell, 19 double radius_polar_shell, 20 20 double sld_core, 21 21 double sld_shell, … … 25 25 26 26 27 double form_volume(double equat_core,28 double polar_core,29 double equat_shell,30 double polar_shell)27 double form_volume(double radius_equat_core, 28 double radius_polar_core, 29 double radius_equat_shell, 30 double radius_polar_shell) 31 31 { 32 double vol = 4.0*M_PI/3.0* equat_shell*equat_shell*polar_shell;32 double vol = 4.0*M_PI/3.0*radius_equat_shell*radius_equat_shell*radius_polar_shell; 33 33 return vol; 34 34 } … … 36 36 static double 37 37 core_shell_ellipsoid_kernel(double q, 38 double equat_core,39 double polar_core,40 double equat_shell,41 double polar_shell,38 double radius_equat_core, 39 double radius_polar_core, 40 double radius_equat_shell, 41 double radius_polar_shell, 42 42 double sld_core, 43 43 double sld_shell, … … 57 57 double zi = ( Gauss76Z[i]*(uplim-lolim) + uplim + lolim )/2.0; 58 58 double yyy = Gauss76Wt[i] * gfn4(zi, 59 equat_core,60 polar_core,61 equat_shell,62 polar_shell,59 radius_equat_core, 60 radius_polar_core, 61 radius_equat_shell, 62 radius_polar_shell, 63 63 delpc, 64 64 delps, … … 77 77 static double 78 78 core_shell_ellipsoid_kernel_2d(double q, double q_x, double q_y, 79 double equat_core,80 double polar_core,81 double equat_shell,82 double polar_shell,79 double radius_equat_core, 80 double radius_polar_core, 81 double radius_equat_shell, 82 double radius_polar_shell, 83 83 double sld_core, 84 84 double sld_shell, … … 105 105 // Call the IGOR library function to get the kernel: MUST use gfn4 not gf2 because of the def of params. 106 106 double answer = gfn4(cos_val, 107 equat_core,108 polar_core,109 equat_shell,110 polar_shell,107 radius_equat_core, 108 radius_polar_core, 109 radius_equat_shell, 110 radius_polar_shell, 111 111 sldcs, 112 112 sldss, … … 120 120 121 121 double Iq(double q, 122 double equat_core,123 double polar_core,124 double equat_shell,125 double polar_shell,122 double radius_equat_core, 123 double radius_polar_core, 124 double radius_equat_shell, 125 double radius_polar_shell, 126 126 double sld_core, 127 127 double sld_shell, … … 129 129 { 130 130 double intensity = core_shell_ellipsoid_kernel(q, 131 equat_core,132 polar_core,133 equat_shell,134 polar_shell,131 radius_equat_core, 132 radius_polar_core, 133 radius_equat_shell, 134 radius_polar_shell, 135 135 sld_core, 136 136 sld_shell, … … 142 142 143 143 double Iqxy(double qx, double qy, 144 double equat_core,145 double polar_core,146 double equat_shell,147 double polar_shell,144 double radius_equat_core, 145 double radius_polar_core, 146 double radius_equat_shell, 147 double radius_polar_shell, 148 148 double sld_core, 149 149 double sld_shell, … … 155 155 q = sqrt(qx*qx+qy*qy); 156 156 double intensity = core_shell_ellipsoid_kernel_2d(q, qx/q, qy/q, 157 equat_core,158 polar_core,159 equat_shell,160 polar_shell,157 radius_equat_core, 158 radius_polar_core, 159 radius_equat_shell, 160 radius_polar_shell, 161 161 sld_core, 162 162 sld_shell,
Note: See TracChangeset
for help on using the changeset viewer.