Changeset 1019 for sans/Dev/trunk/NCNR_User_Procedures/Reduction/VSANS/V_NexusFromIgor.ipf

Timestamp:

Jan 17, 2017 8:37:19 AM (6 years ago)

Author:

srkline

Message:

adding procedures for:

simple save of a DIV file. no functionality to generate a DIV file yet, since I don't know how this will happen.

Simple dump of the file structure in a data "tree"

Verified that the error bars on the I(q) data are correctly calculated as standard error of the mean. There was never an issue with this, or with SANS calculations.

Started filling in "Correct" routines based on the SANS version. Only stubs present currently.

File:

• sans/Dev/trunk/NCNR_User_Procedures/Reduction/VSANS/V_NexusFromIgor.ipf (modified) (1 diff)

sans/Dev/trunk/NCNR_User_Procedures/Reduction/VSANS/V_NexusFromIgor.ipf

@@ -3278 +3278 @@
 
 
+
+
+
+//////////
+//
+// These procedures are needed to write out MASK and DIV files
+//
+////////
+
+
+//
+// saves a specified folder, with a given filename.
+// saves to the home path
+//
+Proc Save_VSANS_file(dfPath, filename)
+        String dfPath   ="root:VSANS_file"              // e.g., "root:FolderA" or ":"
+        String filename = "Test_VSANS_file.h5"
+        
+        H_NXSANS_SaveGroupAsHDF5(dfPath, filename)
+End
+
+
+//      
+// this is my procedure to save the folders to HDF5, once I've filled the folder tree
+//
+// this does NOT save attributes, but gets the folder structure correct
+//
+Function H_NXSANS_SaveGroupAsHDF5(dfPath, filename)
+        String dfPath   // e.g., "root:FolderA" or ":"
+        String filename
+
+        Variable result = 0     // 0 means no error
+        
+        Variable fileID
+        HDF5CreateFile/P=home /O /Z fileID as filename
+        if (V_flag != 0)
+                Print "HDF5CreateFile failed"
+                return -1
+        endif
+
+        HDF5SaveGroup /IGOR=0 /O /R /Z $dfPath, fileID, "."
+//      HDF5SaveGroup /O /R /Z $dfPath, fileID, "."
+        if (V_flag != 0)
+                Print "HDF5SaveGroup failed"
+                result = -1
+        endif
+        
+        HDF5CloseFile fileID
+
+        return result
+End