Changeset 839f7e28 in sasview for sansmodels/src/sans/models/c_extensions/refl.c

Timestamp:

Dec 7, 2011 4:40:16 PM (13 years ago)

Author:

Mathieu Doucet <doucetm@…>

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

Message:

Re #4 A few more warnings

File:

• sansmodels/src/sans/models/c_extensions/refl.c (modified) (3 diffs)

sansmodels/src/sans/models/c_extensions/refl.c

@@ -23 +23 @@
         double background = dp[6];
 
-  double total_thick;
+  double total_thick=0.0;
   double nsl=21.0; //nsl = Num_sub_layer:
   int n_s;
-  double sld_i,sldim_i,dz,phi,R,ko2;
-  double sign,erfunc, fun;
+  double sld_i,dz,phi,R,ko2;
+  double fun;
   double pi;
 
@@ -34 +34 @@
   double* thick;
   int*fun_type;
-  complex  inv_n,phi1,alpha,alpha2,kn,fnm,fnp,rn,Xn,nn,nn2,an,nnp1,one,zero,two,n_sub,n_sup,knp1,Xnp1;
+  complex  phi1,alpha,alpha2,kn,fnm,fnp,rn,Xn,nn,nn2,an,nnp1,one,two,n_sub,n_sup,knp1,Xnp1;
 
   sld = (double*)malloc((n+2)*sizeof(double));
@@ -58 +58 @@
 
         pi = 4.0*atan(1.0);
-    one = cassign(1.0,0.0);
-        //zero = cassign(0.0,0.0);
-        two= cassign(0.0,-2.0);
+  Xn = cassign(0.0,0.0);
+        two = cassign(0.0,-2.0);
 
         //Checking if floor is available.