Changeset 516 for sans/Dev/trunk/NCNR_User_Procedures/Analysis/Models/NewModels_2008/SC_ParaCrystal_v40.ipf

Timestamp:

Jun 29, 2009 1:51:03 PM (14 years ago)

Author:

srkline

Message:

Fixed bugs introduced in r515 concerning the back-compatibility of the kw=val strings for the
model functions. Now should work correctly when no models are loaded.

Changed integration limits on paracrystal models

File:

• sans/Dev/trunk/NCNR_User_Procedures/Analysis/Models/NewModels_2008/SC_ParaCrystal_v40.ipf (modified) (3 diffs)

sans/Dev/trunk/NCNR_User_Procedures/Analysis/Models/NewModels_2008/SC_ParaCrystal_v40.ipf

@@ -126 +126 @@
         Variable integral,loLim,upLim
         loLim = 0
-        upLim = 2*Pi
+        upLim = Pi/2
         
         Variable/G root:gDumY=0         //root:gDumX=0
@@ -169 +169 @@
         //
         loLim = 0
-        upLim = Pi
+        upLim = Pi/2
 
         NVAR/Z nord=root:gNordSC
@@ -213 +213 @@
         
         retVal = temp2*SCeval(xx,yy,temp3,temp4,temp5)
-        retVal /=4*Pi
+        retVal *= 2/pi
         
         return(retVal)