Changeset 393 for sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models/Packages/Invariant/Invariant_v40.ipf

Timestamp:

Jul 15, 2008 11:19:38 AM (15 years ago)

Author:

srkline

Message:

DoSaveFileDialog? now takes two optional parameters, fname and suffix that can speed file save/rename, especially when used with the subtract1D operation.

Invariant now has a new macro to solve for the volume fraction.

PNGs are used wherever possible for reports. Gizmo window are still the oddball, and are limited to native platform formats.

File:

• sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models/Packages/Invariant/Invariant_v40.ipf (modified) (1 diff)

sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models/Packages/Invariant/Invariant_v40.ipf

@@ -50 +50 @@
         
         Printf "The model invariant is %g A^-3 cm^-1\r\r",inv
+End
+
+// for testing - compare to the "perfect" value. This macro
+// calculates the invariant based on the contrast and volume fraction
+// - the extrapolated/integrated value should match this...
+Macro SolveForVolumeFraction(invariant,delta_rho)
+        Variable invariant,delta_rho=6e-6
+        // delta_rho [=] 1/A^2
+        Variable phi1,phi2,arg
+        
+        arg = 1 - 4*invariant*(1e-8)/2/pi/pi/delta_rho/delta_rho
+        phi1 = (1 - sqrt(arg))/2
+        phi2 = (1 + sqrt(arg))/2
+        
+        Printf "The two solutions for phi are: %8.6f\t and %8.6f\r\r",phi1,phi2
 End