Changeset 503 for sans/XOP_Dev/SANSAnalysis/lib

Timestamp:

May 14, 2009 12:47:24 PM (14 years ago)

Author:

ajj

Message:

Fixes to make lib compile on windows

File:

• sans/XOP_Dev/SANSAnalysis/lib/libCylinder.c (modified) (4 diffs)

sans/XOP_Dev/SANSAnalysis/lib/libCylinder.c

@@ -2862 +2862 @@
         bkg = dp[10];
         
-        char temp[256];
-        
-        /*sprintf(temp, "%f; %f; %f; %f; %f; %f; %f; %f; %f; %f; %f;\r", scale, radius, sigma,length,radthick,facthick,rhoc,rhoh,rhor,rhosolv,bkg);
-        XOPNotice(temp);*/
-        
         Pi = 4.0*atan(1.0);
         
@@ -2874 +2869 @@
         }
         uplim = exp(log(radius)+(4.*sigma));
-        
-        /*sprintf(temp, "%f; %f;\r", lolim,uplim);
-        XOPNotice(temp);*/
         
         summ = 0.0;
@@ -2901 +2893 @@
         // add in the background
         answer += bkg;
-        
-        /*sprintf(temp, "Q = %f : summ = %f : Rsqrsumm = %f : Ans = %f\r", q, summ, Rsqrsumm,answer);
-        XOPNotice(temp);*/
                 
         return answer;
@@ -3034 +3023 @@
         vb = 1;
         
+        summ = 0.0;
+        retval = 0.0;
+
         //Do Inner integral
         for(i=0;i<nord;i++){