Changeset 541 for sans/Dev/trunk/NCNR_User_Procedures/Analysis/Models/NewModels_2006/Parallelepiped_v40.ipf

Timestamp:

Jul 22, 2009 5:43:18 PM (14 years ago)

Author:

srkline

Message:

(1) changes to ProDiv? to get the linear scaling correct with the new panel.

(2) bug fix in NCNR_Utils in file open dialog

(3) assorted changes to SASCALC and Simulation procedures to allow 1D simulation of data collection. 2D is now hidden and will be brought back later, as needed.

File:

• sans/Dev/trunk/NCNR_User_Procedures/Analysis/Models/NewModels_2006/Parallelepiped_v40.ipf (modified) (1 diff)

sans/Dev/trunk/NCNR_User_Procedures/Analysis/Models/NewModels_2006/Parallelepiped_v40.ipf

@@ -237 +237 @@
         return(0)
 End
+
+
+
+////////////For testing
+
+Macro PP_Rg_and_IZero()
+
+        variable rg2,iz
+        
+        iz = coef_Parallelepiped[0]
+        iz *= coef_Parallelepiped[1]*coef_Parallelepiped[2]*coef_Parallelepiped[3]
+        iz *= (coef_Parallelepiped[4]-coef_Parallelepiped[5])^2
+        iz -= coef_Parallelepiped[6]
+        iz *= 1e8
+        
+        
+        rg2 = coef_Parallelepiped[1]^2
+        rg2 += coef_Parallelepiped[2]^2
+        rg2 += coef_Parallelepiped[3]^2
+        rg2 /= 12
+        
+        
+        Print "I(q=0) [cm^-1] = ",iz
+        Print "Rg [A] = ",sqrt(rg2)
+end