Changeset 551 for sans/Dev/trunk/NCNR_User_Procedures/Reduction/USANS/USANS_EmptyWaves.ipf

Timestamp:

Sep 10, 2009 3:45:30 PM (13 years ago)

Author:

srkline

Message:

in SASCALC - changed some of the logic to allow 2D simulation

in MultiScatter_MC:

• changed results wave to report coherent multiple scattering counters correctly (also changed XOP)
• added save of 1D sim data

in U_CALC:

• adjusted display for optimal view on windows
• 7 angle ranges now (added defaults, propagated where all controls are modified)
• added the angle axis correctly now as a free axis, with a hook linked to the bottom axis
• removed XS and trans calculations, as integration of ran_dev isn't well

in USANS_EmptyWaves:

• double precision waves

File:

• sans/Dev/trunk/NCNR_User_Procedures/Reduction/USANS/USANS_EmptyWaves.ipf (modified) (11 diffs)

sans/Dev/trunk/NCNR_User_Procedures/Reduction/USANS/USANS_EmptyWaves.ipf

@@ -9 +9 @@
         num=numpnts(w)
         
-        printf "Make/O/N=%d  %s\r\r",num,name
+        printf "Make/O/D/N=%d  %s\r\r",num,name
 
         for(ii=0;ii<num;ii+=1)
@@ -23 +23 @@
         
 //Write2Save(CR_EC_0p25Gd,"CR_0p25")
-  Make/O/N=44  CR_0p25
+  Make/O/D/N=44  CR_0p25
 
   CR_0p25[0] = 3873.7
@@ -72 +72 @@
 //
 ///Write2Save(Q_EC_0p25Gd,"Q_0p25")
-  Make/O/N=44  Q_0p25
+  Make/O/D/N=44  Q_0p25
 
   Q_0p25[0] = 5.52469e-06
@@ -120 +120 @@
 
 //¥Write2Save(CR_EC_0p50Gd,"CR_0p50")
-  Make/O/N=38  CR_0p50
+  Make/O/D/N=38  CR_0p50
 
   CR_0p50[0] = 15828.3
@@ -162 +162 @@
   
 //¥Write2Save(Q_EC_0p50Gd,"Q_0p50")
-  Make/O/N=38  Q_0p50
+  Make/O/D/N=38  Q_0p50
 
   Q_0p50[0] = 3.68132e-06
@@ -204 +204 @@
   
 //  ¥Write2Save(CR_EC_0p625Gd,"CR_0p625")
-  Make/O/N=111  CR_0p625
+  Make/O/D/N=111  CR_0p625
 
   CR_0p625[0] = 21097
@@ -319 +319 @@
   
 //¥Write2Save(Q_EC_0p625Gd,"Q_0p625")
-  Make/O/N=111  Q_0p625
+  Make/O/D/N=111  Q_0p625
 
   Q_0p625[0] = 4.51567e-06
@@ -435 +435 @@
 
 //¥Write2Save(CR_EB_1p75Cd,"CR_1p75")
-  Make/O/N=62  CR_1p75
+  Make/O/D/N=62  CR_1p75
 
   CR_1p75[0] = 56049.9
@@ -501 +501 @@
   
 //¥Write2Save(Q_EB_1p75Cd,"Q_1p75")
-  Make/O/N=62  Q_1p75
+  Make/O/D/N=62  Q_1p75
 
   Q_1p75[0] = 2.39312e-06
@@ -567 +567 @@
 
 //¥Write2Save(CR_EB_2p0Cd,"CR_2p0")
-  Make/O/N=98  CR_2p0
+  Make/O/D/N=98  CR_2p0
 
   CR_2p0[0] = 56491
@@ -669 +669 @@
   
 //¥Write2Save(Q_EB_2p0Cd,"Q_2p0")
-  Make/O/N=98  Q_2p0
+  Make/O/D/N=98  Q_2p0
 
   Q_2p0[0] = 1.4972e-06