Changeset 96b59384 in sasview for sansmodels/src/sans/models/c_extensions/oblate.c
- Timestamp:
- Aug 4, 2009 6:02:28 PM (15 years ago)
- Branches:
- master, ESS_GUI, ESS_GUI_Docs, ESS_GUI_batch_fitting, ESS_GUI_bumps_abstraction, ESS_GUI_iss1116, ESS_GUI_iss879, ESS_GUI_iss959, ESS_GUI_opencl, ESS_GUI_ordering, ESS_GUI_sync_sascalc, costrafo411, magnetic_scatt, release-4.1.1, release-4.1.2, release-4.2.2, release_4.0.1, ticket-1009, ticket-1094-headless, ticket-1242-2d-resolution, ticket-1243, ticket-1249, ticket885, unittest-saveload
- Children:
- 8dc0b746
- Parents:
- b341b16
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sansmodels/src/sans/models/c_extensions/oblate.c
r27a0771 r96b59384 1 1 /** 2 * Scattering model for a oblate 2 * Scattering model for a oblate core shell 3 3 * @author: Gervaise B Alina/ UTK 4 4 */ … … 18 18 */ 19 19 double oblate_analytical_1D(OblateParameters *pars, double q) { 20 double dp[ 10];21 20 double dp[8]; 21 22 22 // Fill paramater array 23 23 dp[0] = pars->scale; … … 29 29 dp[6] = pars->sld_solvent; 30 30 dp[7] = pars->background; 31 dp[8] = pars->axis_theta; 32 dp[9] = pars->axis_phi; 33 31 34 32 // Call library function to evaluate model 35 return OblateForm(dp, q); 33 return OblateForm(dp, q); 36 34 } 37 35 … … 45 43 double q; 46 44 q = sqrt(qx*qx+qy*qy); 47 return oblate_analytical_ 2D_scaled(pars, q, qx/q, qy/q);48 } 45 return oblate_analytical_1D(pars, q); 46 } 49 47 50 48 … … 57 55 */ 58 56 double oblate_analytical_2D(OblateParameters *pars, double q, double phi) { 59 return oblate_analytical_ 2D_scaled(pars, q, cos(phi), sin(phi));60 } 61 57 return oblate_analytical_1D(pars, q); 58 } 59 62 60 /** 63 61 * Function to evaluate 2D scattering function … … 68 66 * @return: function value 69 67 */ 68 /* 70 69 double oblate_analytical_2D_scaled(OblateParameters *pars, double q, double q_x, double q_y) { 71 70 72 71 return 1.0; 73 72 } 74 73 */
Note: See TracChangeset
for help on using the changeset viewer.