source: sans/Dev/trunk/NCNR_User_Procedures/Analysis/SA_includes_v400.ipf @ 509

Last change on this file since 509 was 497, checked in by srkline, 14 years ago

Added feature to re-save 1-d data from its data folder, presumably after someone has modified it by say, manually subtracting background or rescaling. (Danilo, ticket #156). There is now a SANS Models menu item for this, rather clumsily na,ed. Changes were put into WriteModelData_v40.ipf.

Currently only handles 6-column datasets. Logic for others would be straightforward if needed.

File size: 2.9 KB
1#pragma rtGlobals=1             // Use modern global access method.
2#pragma version=4.0
3#pragma IgorVersion=6.0
6// the list of files to include in the SANS reduction experiment
7//  - files must be located somewhere in the User Procedures folder
8// or sub-folders
11//always include the picker
12#include "SANSModelPicker_v40"                  version>=4.00
13//utility procedures
14#include "GaussUtils_v40"                               version>=4.00
15#include "NIST_XML_V40"                                 //added September 2008
16#include "PlotUtilsMacro_v40"                   version>=4.00
17#include "PlotManager_v40"                              version>=4.00
18#include "NCNR_GenFitUtils"                     // April 2009, compiles OK if XOP not present
20#include "USANS_SlitSmearing_v40"
21#include "WriteModelData_v40"
22#include "Wrapper_v40"
23#include "PlotUtils2D_v40"
24#include "GizmoCylinder_v40"
26#include "CheckVersionFTP"                              //added June 2008
29Menu "SANS Models"
30        "Fit Manager", Init_WrapperPanel()
31        "Load Model Functions",Execute/P "INSERTINCLUDE \"SANSModelPicker_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "ModelPicker_Panel()"
32        "Load and Plot Manager", Show_Plot_Manager()
33        "Freeze Model"
34        "Write Model Data"
35        "ReWrite Experimental Data",ReWrite1DData()
36        "-"
37        Submenu "Packages"
38                "Sum Two Models",Execute/P "INSERTINCLUDE \"SumSANSModels_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "Init_SumModelPanel()"
39                "Global Fitting",Execute/P "INSERTINCLUDE \"GlobalFit2_NCNR_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "WM_NewGlobalFit1#InitNewGlobalFitPanel()"
40                "Simple Global Fitting",Execute/P "INSERTINCLUDE \"GlobalFit2_NCNR_v40\"";Execute/P "INSERTINCLUDE \"SimpleGlobalFit_NCNR_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "Init_SimpleGlobalFit()"
41                "Determine Invariant",Execute/P "INSERTINCLUDE \"Invariant_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "Make_Invariant_Panel()"
42                "Do Linear Fits",Execute/P "INSERTINCLUDE \"LinearizedFits_v40\"";Execute/P "COMPILEPROCEDURES ";Execute/P "A_OpenFitPanel()"
43                GenOpFlagEnable()+"Genetic Optimization Enabled", Init_GenOp()
44                GenOpFlagDisable()+"Genetic Optimization Disabled", UnSet_GenOp()
45        End
46        "-"
47        Submenu "2D Utilities"
48                "Generate Fake QxQy Data",FakeQxQy()
49                "Show Cylinder Orientation"
50                "Change Angle"
51        end
52        "-"
53        "Feedback or Bug Report",OpenTracTicketPage()
54        "Open Help Movie Page",OpenHelpMoviePage()
55        "Check for Updates",CheckForLatestVersion()
58Function OpenTracTicketPage()
59        DoAlert 1,"Your web browser will open to a page where you can submit your bug report or feature request. OK?"
60        if(V_flag==1)
61                BrowseURL ""
62        endif
65Function OpenHelpMoviePage()
66        DoAlert 1,"Your web browser will open to a page where you can view help movies. OK? (You must have QuickTime installed)"
67        if(V_flag==1)
68                BrowseURL ""
69                // Andrew has set up a http page too. Try to use this in the future
70                //BrowseURL ""
71        endif
Note: See TracBrowser for help on using the repository browser.