Changeset a24f530 in sasview for sansmodels/src/sans/models/c_extensions/refl_adv.c
- Timestamp:
- Dec 7, 2011 4:23:04 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:
- 839f7e28
- Parents:
- 71d2194
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sansmodels/src/sans/models/c_extensions/refl_adv.c
r3be94e8 ra24f530 25 25 double npts = dp[69]; //number of sub_layers in each interface 26 26 27 double total_thick ;27 double total_thick=0.0; 28 28 29 29 int n_s; 30 30 double sld_i,sldim_i,dz,phi,R,ko2; 31 double sign,erfunc;32 31 double pi; 33 32 … … 38 37 double* thick; 39 38 double* fun_coef; 40 complex inv_n,phi1,alpha,alpha2,kn,fnm,fnp,rn,Xn,nn,nn2,an,nnp1,one,zero,two,n_sub,n_sup,knp1,Xnp1;39 complex phi1,alpha,alpha2,kn,fnm,fnp,rn,Xn,nn,nn2,an,nnp1,one,two,n_sub,n_sup,knp1,Xnp1; 41 40 42 41 fun_type = (int*)malloc((n+2)*sizeof(int)); … … 74 73 pi = 4.0*atan(1.0); 75 74 one = cassign(1.0,0.0); 76 //zero= cassign(0.0,0.0);77 two = cassign(0.0,-2.0);75 Xn = cassign(0.0,0.0); 76 two = cassign(0.0,-2.0); 78 77 79 78 //Checking if floor is available.
Note: See TracChangeset
for help on using the changeset viewer.