Changeset 839f7e28 in sasview for sansmodels/src/sans/models/c_extensions/fcc.c
- Timestamp:
- Dec 7, 2011 4:40:16 PM (13 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:
- 33aea7f
- Parents:
- a24f530
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sansmodels/src/sans/models/c_extensions/fcc.c
r890ac7f1 r839f7e28 58 58 */ 59 59 double fc_analytical_2D_scaled(FCParameters *pars, double q, double q_x, double q_y) { 60 double a3_x, a3_y, a3_z, a2_x, a2_y, a1_x, a1_y; 61 double b3_x, b3_y, b3_z, b2_x, b2_y, b1_x, b1_y; 60 double b3_x, b3_y, b3_z, b1_x, b1_y; 62 61 double q_z; 63 double alpha, vol, cos_val_b3, cos_val_b2, cos_val_b1, cos_val_a3, cos_val_a2, cos_val_a1;62 double alpha, cos_val_b3, cos_val_b2, cos_val_b1; 64 63 double a1_dot_q, a2_dot_q,a3_dot_q; 65 64 double answer; 66 65 double Pi = 4.0*atan(1.0); 67 double aa, Da, qDa_2, latticeScale, Zq, Fkq, Fkq_2 ,contrast;66 double aa, Da, qDa_2, latticeScale, Zq, Fkq, Fkq_2; 68 67 69 68 double dp[5];
Note: See TracChangeset
for help on using the changeset viewer.