Ignore:
Timestamp:
Jun 10, 2008 4:00:21 PM (15 years ago)
Author:
srkline
Message:

Removed Angstrom symbol (Mac code) and replaced it with simply a capital "A" so strange symbols won't appear anymore on Win.

Location:
sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00
Files:
64 edited

Legend:

Unmodified
Added
Removed

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/BE_Polyelectrolyte.ipf

    r42 r379  
    1515        Variable num=512,qmin=0.001,qmax=0.2 
    1616        Prompt num "Enter number of data points for model: " 
    17         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    18         Prompt qmax "Enter maximum q-value (^-1) for model: "   
     17        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     18        Prompt qmax "Enter maximum q-value (A^-1) for model: "   
    1919 
    2020        make/o/n=(num) xwave_BE,ywave_BE 
    2121        xwave_BE =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num))      
    2222        make/o coef_BE = {10,7.1,12,10,0.00,0.05,0.7,0.001} 
    23         make/o/t parameters_BE = {"K (barns)","Lb ()","h (-3)","b ()","Cs (mol/L)","alpha","C (mol/L)","Background"}  
     23        make/o/t parameters_BE = {"K (barns)","Lb (A)","h (A-3)","b (A)","Cs (mol/L)","alpha","C (mol/L)","Background"}  
    2424        Edit parameters_BE,coef_BE 
    2525        ywave_BE := BEPolyelectrolyte(coef_BE,xwave_BE) 
    2626        Display ywave_BE vs xwave_BE 
    2727        ModifyGraph log=0,marker=29,msize=2,mode=4                      //**** log=0 if linear scale desired 
    28         Label bottom "q (\\S-1\\M)" 
     28        Label bottom "q (A\\S-1\\M)" 
    2929        Label left "S(q) BE , cm\\S-1\\M" 
    3030        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4343        // Setup parameter table for model function 
    4444        make/o smear_coef_BE = {10,7.1,12,10,0.00,0.05,0.7,0.001}                                       //**** mod, coef values to match unsmeared model above 
    45         make/o/t smear_parameters_BE= {"K (barns)","Lb ()","h (-3)","b ()","Cs (mol/L)","alpha","C (mol/L)","Background"}     
     45        make/o/t smear_parameters_BE= {"K (barns)","Lb (A)","h (A-3)","b (A)","Cs (mol/L)","alpha","C (mol/L)","Background"}     
    4646        Edit smear_parameters_BE,smear_coef_BE                                  //**** mod 
    4747         
    … …  
    5454        Display smeared_BE vs smeared_qvals                                                                     //**** mod 
    5555        ModifyGraph log=0,marker=29,msize=2,mode=4 
    56         Label bottom "q (\\S-1\\M)" 
     56        Label bottom "q (A\\S-1\\M)" 
    5757        Label left "I  sBE (cm\\S-1\\M)" 
    5858        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    7070        Variable q 
    7171// Input (fitting) variables are: 
    72         //[0] K  = contrast factor  (barns = 10-24 cm^2=10-4 ^2) 
    73         //[1] Lb = Bjerrum length ; this parameter needs to be kept constant for a given solvent and temperature!  () 
    74         //[2]  h = virial parameter (3) 
    75         //[3]  b = monomer length  () 
     72        //[0] K  = contrast factor  (barns = 10-24 cm^2=10-4 A^2) 
     73        //[1] Lb = Bjerrum length ; this parameter needs to be kept constant for a given solvent and temperature!  (A) 
     74        //[2]  h = virial parameter (A3) 
     75        //[3]  b = monomer length  (A) 
    7676        //[4]  Cs = concentration of monovalent salt (mol/L) 
    7777        //[5]  alpha = ionization degree : ratio of charged monomers  to total number of monomers 
    … …  
    104104// where : b = Sum(batom) ; batom = scattering length in cm-12  
    105105//              vp = partial molar volume of the polymer ; vsolvent= partial molar volume of the solvent 
    106 // NB :K in  Barns = 10^-24 cm2 ; the rest of the expression is in -3 = 10^24 cm3 
     106// NB :K in  Barns = 10^-24 cm2 ; the rest of the expression is in A-3 = 10^24 cm3 
    107107//  -> there is no multiplication factor to get the result in cm-1 .  
    108108// Returns S(q) in cm-1 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/CoreShell.ipf

    r42 r379  
    1414        Variable num=128,qmin=0.001,qmax=0.7 
    1515        Prompt num "Enter number of data points for model: " 
    16         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    17         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     16        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     17        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1818         
    1919        make/o/d/n=(num) xwave_css,ywave_css 
    … …  
    2525        Display ywave_css vs xwave_css 
    2626        ModifyGraph log=1,marker=29,msize=2,mode=4 
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Intensity (cm\\S-1\\M)" 
    2929        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5555        Display smeared_css vs smeared_qvals                                                                     
    5656        ModifyGraph log=1,marker=29,msize=2,mode=4 
    57         Label bottom "q (\\S-1\\M)" 
     57        Label bottom "q (A\\S-1\\M)" 
    5858        Label left "Intensity (cm\\S-1\\M)" 
    5959        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6969        // variables are: 
    7070        //[0] scale factor 
    71         //[1] radius of core [] 
    72         //[2] thickness of the shell    [] 
    73         //[3] SLD of the core   [-2] 
     71        //[1] radius of core [A] 
     72        //[2] thickness of the shell    [A] 
     73        //[3] SLD of the core   [A-2] 
    7474        //[4] SLD of the shell 
    7575        //[5] SLD of the solvent 
    … …  
    105105        f += vol*bes*contr 
    106106         
    107         // normalize to particle volume and rescale from [-1] to [cm-1] 
     107        // normalize to particle volume and rescale from [A-1] to [cm-1] 
    108108        f2 = f*f/vol*1.0e8 
    109109         

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/CoreShellCylinder.ipf

    r42 r379  
    1616        Variable num=128,qmin=0.001,qmax=0.7 
    1717        Prompt num "Enter number of data points for model: " 
    18         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    19         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     18        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     19        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2020         
    2121        make/o/d/n=(num) xwave_cscyl,ywave_cscyl 
    … …  
    2727        Display ywave_cscyl vs xwave_cscyl 
    2828        ModifyGraph log=1,marker=29,msize=2,mode=4 
    29         Label bottom "q (\\S-1\\M)" 
     29        Label bottom "q (A\\S-1\\M)" 
    3030        Label left "Intensity (cm\\S-1\\M)" 
    3131        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5555        Display smeared_cscyl vs smeared_qvals 
    5656        ModifyGraph log=1,marker=29,msize=2,mode=4 
    57         Label bottom "q (\\S-1\\M)" 
     57        Label bottom "q (A\\S-1\\M)" 
    5858        Label left "Intensity (cm\\S-1\\M)" 
    5959        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/CoreShell_and_Struct.ipf

    r42 r379  
    1212        Variable num=256,qmin=0.001,qmax=0.7 
    1313        Prompt num "Enter number of data points for model: " 
    14         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    15         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     14        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     15        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1616         
    1717        Make/O/D/n=(num) xwave_CSS_HS,ywave_CSS_HS 
    … …  
    2323        Display/K=1 ywave_CSS_HS vs xwave_CSS_HS 
    2424        ModifyGraph log=1,marker=29,msize=2,mode=4 
    25         Label bottom "q (\\S-1\\M)" 
     25        Label bottom "q (A\\S-1\\M)" 
    2626        Label left "Intensity (cm\\S-1\\M)" 
    2727 
    … …  
    5151        Display smeared_CSS_HS vs smeared_qvals                                                                  
    5252        ModifyGraph log=1,marker=29,msize=2,mode=4 
    53         Label bottom "q (\\S-1\\M)" 
     53        Label bottom "q (A\\S-1\\M)" 
    5454        Label left "Intensity (cm\\S-1\\M)" 
    5555 
    … …  
    9494        Variable num=256,qmin=0.001,qmax=0.7 
    9595        Prompt num "Enter number of data points for model: " 
    96         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    97         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     96        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     97        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    9898         
    9999        Make/O/D/n=(num) xwave_CSS_SW,ywave_CSS_SW 
    … …  
    105105        Display/K=1 ywave_CSS_SW vs xwave_CSS_SW 
    106106        ModifyGraph log=1,marker=29,msize=2,mode=4 
    107         Label bottom "q (\\S-1\\M)" 
     107        Label bottom "q (A\\S-1\\M)" 
    108108        Label left "Intensity (cm\\S-1\\M)" 
    109109 
    … …  
    133133        Display smeared_CSS_SW vs smeared_qvals                                                                  
    134134        ModifyGraph log=1,marker=29,msize=2,mode=4 
    135         Label bottom "q (\\S-1\\M)" 
     135        Label bottom "q (A\\S-1\\M)" 
    136136        Label left "Intensity (cm\\S-1\\M)" 
    137137 
    … …  
    179179        Variable num=256,qmin=0.001,qmax=0.7 
    180180        Prompt num "Enter number of data points for model: " 
    181         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    182         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     181        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     182        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    183183         
    184184        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    197197        Display/K=1 ywave_CSS_SC vs xwave_CSS_SC 
    198198        ModifyGraph log=1,marker=29,msize=2,mode=4 
    199         Label bottom "q (\\S-1\\M)" 
     199        Label bottom "q (A\\S-1\\M)" 
    200200        Label left "Intensity (cm\\S-1\\M)" 
    201201 
    … …  
    232232        Display smeared_CSS_SC vs smeared_qvals                                                                  
    233233        ModifyGraph log=1,marker=29,msize=2,mode=4 
    234         Label bottom "q (\\S-1\\M)" 
     234        Label bottom "q (A\\S-1\\M)" 
    235235        Label left "Intensity (cm\\S-1\\M)" 
    236236 
    … …  
    279279        Variable num=256,qmin=0.001,qmax=0.7 
    280280        Prompt num "Enter number of data points for model: " 
    281         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    282         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     281        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     282        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    283283         
    284284        Make/O/D/n=(num) xwave_CSS_SHS,ywave_CSS_SHS 
    … …  
    290290        Display/K=1 ywave_CSS_SHS vs xwave_CSS_SHS 
    291291        ModifyGraph log=1,marker=29,msize=2,mode=4 
    292         Label bottom "q (\\S-1\\M)" 
     292        Label bottom "q (A\\S-1\\M)" 
    293293        Label left "Intensity (cm\\S-1\\M)" 
    294294 
    … …  
    318318        Display smeared_CSS_SHS vs smeared_qvals                                                                         
    319319        ModifyGraph log=1,marker=29,msize=2,mode=4 
    320         Label bottom "q (\\S-1\\M)" 
     320        Label bottom "q (A\\S-1\\M)" 
    321321        Label left "Intensity (cm\\S-1\\M)" 
    322322 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/CylinderForm.ipf

    r125 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        make/o/D/n=(num) xwave_cyl,ywave_cyl 
    … …  
    2424        Display ywave_cyl vs xwave_cyl 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5252        Display smeared_cyl vs smeared_qvals 
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Cylinder_and_Struct.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_CYL_HS,ywave_CYL_HS 
    … …  
    2424        Display ywave_CYL_HS vs xwave_CYL_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828 
    … …  
    5252        Display smeared_CYL_HS vs smeared_qvals                                                                  
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656 
    … …  
    9494        Variable num=128,qmin=0.001,qmax=0.7 
    9595        Prompt num "Enter number of data points for model: " 
    96         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    97         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     96        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     97        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    9898         
    9999        Make/O/D/n=(num) xwave_CYL_SW,ywave_CYL_SW 
    … …  
    105105        Display ywave_CYL_SW vs xwave_CYL_SW 
    106106        ModifyGraph log=1,marker=29,msize=2,mode=4 
    107         Label bottom "q (\\S-1\\M)" 
     107        Label bottom "q (A\\S-1\\M)" 
    108108        Label left "Intensity (cm\\S-1\\M)" 
    109109 
    … …  
    133133        Display smeared_CYL_SW vs smeared_qvals                                                                  
    134134        ModifyGraph log=1,marker=29,msize=2,mode=4 
    135         Label bottom "q (\\S-1\\M)" 
     135        Label bottom "q (A\\S-1\\M)" 
    136136        Label left "Intensity (cm\\S-1\\M)" 
    137137 
    … …  
    177177        Variable num=128,qmin=0.001,qmax=0.7 
    178178        Prompt num "Enter number of data points for model: " 
    179         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    180         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     179        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     180        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    181181         
    182182        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    195195        Display ywave_CYL_SC vs xwave_CYL_SC 
    196196        ModifyGraph log=1,marker=29,msize=2,mode=4 
    197         Label bottom "q (\\S-1\\M)" 
     197        Label bottom "q (A\\S-1\\M)" 
    198198        Label left "Intensity (cm\\S-1\\M)" 
    199199 
    … …  
    230230        Display smeared_CYL_SC vs smeared_qvals                                                                  
    231231        ModifyGraph log=1,marker=29,msize=2,mode=4 
    232         Label bottom "q (\\S-1\\M)" 
     232        Label bottom "q (A\\S-1\\M)" 
    233233        Label left "Intensity (cm\\S-1\\M)" 
    234234 
    … …  
    277277        Variable num=128,qmin=0.001,qmax=0.7 
    278278        Prompt num "Enter number of data points for model: " 
    279         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    280         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     279        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     280        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    281281         
    282282        Make/O/D/n=(num) xwave_CYL_SHS,ywave_CYL_SHS 
    … …  
    288288        Display ywave_CYL_SHS vs xwave_CYL_SHS 
    289289        ModifyGraph log=1,marker=29,msize=2,mode=4 
    290         Label bottom "q (\\S-1\\M)" 
     290        Label bottom "q (A\\S-1\\M)" 
    291291        Label left "Intensity (cm\\S-1\\M)" 
    292292 
    … …  
    316316        Display smeared_CYL_SHS vs smeared_qvals                                                                         
    317317        ModifyGraph log=1,marker=29,msize=2,mode=4 
    318         Label bottom "q (\\S-1\\M)" 
     318        Label bottom "q (A\\S-1\\M)" 
    319319        Label left "Intensity (cm\\S-1\\M)" 
    320320 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/DAB_model.ipf

    r42 r379  
    77        Variable num=512, qmin=.001, qmax=.7 
    88        Prompt num "Enter number of data points for model: " 
    9         Prompt qmin "Enter minimum q-value (^1) for model: "  
    10          Prompt qmax "Enter maximum q-value (^1) for model: " 
     9        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     10         Prompt qmax "Enter maximum q-value (A^1) for model: " 
    1111// 
    1212        Make/O/D/n=(num) xwave_DAB, ywave_DAB 
    1313        xwave_DAB =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    1414        Make/O/D coef_DAB = {10.0, 40, 1.0} 
    15         make/o/t parameters_DAB = {"Scale Factor, A ", "Correlation Length ()", "Incoherent Bgd (cm-1)"} 
     15        make/o/t parameters_DAB = {"Scale Factor, A ", "Correlation Length (A)", "Incoherent Bgd (cm-1)"} 
    1616        Edit parameters_DAB, coef_DAB 
    1717        ywave_DAB  := DAB_Model(coef_DAB, xwave_DAB) 
    … …  
    1919        ModifyGraph marker=29, msize=2, mode=4 
    2020        ModifyGraph log(left)=1 
    21         Label bottom "q (\\S-1\\M) " 
     21        Label bottom "q (A\\S-1\\M) " 
    2222        Label left "Debye-Anderson-Brumberger Model (cm\\S-1\\M)" 
    2323        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    3535        // Setup parameter table for model function 
    3636        Make/O/D smear_coef_DAB = {10.0, 40, 1.0}                                       //model  coef values to match unsmeared model above 
    37         make/o/t smear_parameters_DAB = {"Scale Factor, A ", "Correlation Length ()", "Incoherent Bgd (cm-1)"}// parameter names 
     37        make/o/t smear_parameters_DAB = {"Scale Factor, A ", "Correlation Length (A)", "Incoherent Bgd (cm-1)"}// parameter names 
    3838        Edit smear_parameters_DAB,smear_coef_DAB                                        //display parameters in a table 
    3939         
    … …  
    4646        Display smeared_DAB vs smeared_qvals                                                                    // 
    4747        ModifyGraph log=1,marker=29,msize=2,mode=4 
    48         Label bottom "q (\\S-1\\M)" 
     48        Label bottom "q (A\\S-1\\M)" 
    4949        Label left "Debye-Anderson-Brumberger Model (cm\\S-1\\M)" 
    5050        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/HPMSA.ipf

    r42 r379  
    2828        Display ywave_hpmsa vs xwave_hpmsa       
    2929        ModifyGraph log=0,marker=29,msize=2,mode=4,grid=1                       //**** log=0 if linear scale desired 
    30         Label bottom "q (\\S-1\\M)" 
     30        Label bottom "q (A\\S-1\\M)" 
    3131        Label left "Structure Factor"    
    3232        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5959        variable dialec, Perm, Beta, Temp, zz, charge, ierr 
    6060 
    61         diam=w[0]               //in   (not SI .. should force people to think in nm!!!) 
     61        diam=w[0]               //in A  (not SI .. should force people to think in nm!!!) 
    6262        zz = w[1]               //# of charges 
    6363        VolFrac=w[2]     
    64         QQ=x                    //in ^-1 (not SI .. should force people to think in nm^-1!!!) 
     64        QQ=x                    //in A^-1 (not SI .. should force people to think in nm^-1!!!) 
    6565        Temp=w[3]               //in degrees Kelvin 
    6666        csalt=w[4]              //in molarity 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/HardSphereStruct.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.3 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_hss,ywave_hss 
    … …  
    2525        Display ywave_hss vs xwave_hss 
    2626        ModifyGraph marker=29,msize=2,mode=4 
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Structure Factor" 
    2929        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/HollowCylinders.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_Hcyl,ywave_Hcyl 
    … …  
    2424        Display ywave_Hcyl vs xwave_Hcyl 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5252        Display smeared_Hcyl vs smeared_qvals 
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Lorentz_model.ipf

    r42 r379  
    66        Variable num=512, qmin=.001, qmax=.7 
    77        Prompt num "Enter number of data points for model: " 
    8         Prompt qmin "Enter minimum q-value (^1) for model: "  
    9          Prompt qmax "Enter maximum q-value (^1) for model: " 
     8        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     9         Prompt qmax "Enter maximum q-value (A^1) for model: " 
    1010// 
    1111        Make/O/D/n=(num) xwave_Lorentz, ywave_Lorentz 
    1212        xwave_Lorentz =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    1313        Make/O/D coef_Lorentz = {100.0, 50.0, 1.0} 
    14         make/o/t parameters_Lorentz = {"Scale Factor, I0 ", "Screening Length ()","Incoherent Bgd (cm-1)"} 
     14        make/o/t parameters_Lorentz = {"Scale Factor, I0 ", "Screening Length (A)","Incoherent Bgd (cm-1)"} 
    1515        Edit parameters_Lorentz, coef_Lorentz 
    1616        ywave_Lorentz  := Lorentz_Model(coef_Lorentz, xwave_Lorentz) 
    … …  
    1818        ModifyGraph marker=29, msize=2, mode=4 
    1919        ModifyGraph log(left)=1 
    20         Label bottom "q (\\S-1\\M) " 
     20        Label bottom "q (A\\S-1\\M) " 
    2121        Label left "Lorentzian (cm\\S-1\\M)" 
    2222        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    3535        // Setup parameter table for model function 
    3636        Make/O/D smear_coef_Lorentz = {100.0, 50.0, 1.0} 
    37         make/o/t smear_parameters_Lorentz = {"Scale Factor, I0 ", "Screening Length ()","Incoherent Bgd (cm-1)"} 
     37        make/o/t smear_parameters_Lorentz = {"Scale Factor, I0 ", "Screening Length (A)","Incoherent Bgd (cm-1)"} 
    3838        Edit smear_parameters_Lorentz,smear_coef_Lorentz                                        //display parameters in a table 
    3939         
    … …  
    4646        Display smeared_Lorentz vs smeared_qvals                                                                        // 
    4747        ModifyGraph log=1,marker=29,msize=2,mode=4 
    48         Label bottom "q (\\S-1\\M)" 
     48        Label bottom "q (A\\S-1\\M)" 
    4949        Label left "Lorentz Model (cm\\S-1\\M)" 
    5050        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Beaucage.ipf

    r62 r379  
    1616        Variable num=256,qmin=0.001,qmax=0.7 
    1717        Prompt num "Enter number of data points for model: " 
    18         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    19         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     18        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     19        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2020         
    2121        make/o/d/n=(num) xwave_b1,ywave_b1 
    … …  
    2727        Display ywave_b1 vs xwave_b1 
    2828        ModifyGraph log=1,marker=29,msize=2,mode=4 
    29         Label bottom "q (\\S-1\\M)" 
     29        Label bottom "q (A\\S-1\\M)" 
    3030        Label left "Intensity (cm\\S-1\\M)" 
    3131        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    3535        Variable num=256,qmin=0.001,qmax=0.7 
    3636        Prompt num "Enter number of data points for model: " 
    37         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    38         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     37        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     38        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    3939         
    4040        make/o/d/n=(num) xwave_b2,ywave_b2 
    … …  
    4646        Display ywave_b2 vs xwave_b2 
    4747        ModifyGraph log=1,marker=29,msize=2,mode=4 
    48         Label bottom "q (\\S-1\\M)" 
     48        Label bottom "q (A\\S-1\\M)" 
    4949        Label left "Intensity (cm\\S-1\\M)" 
    5050        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5454        Variable num=256,qmin=0.001,qmax=0.7 
    5555        Prompt num "Enter number of data points for model: " 
    56         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    57         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     56        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     57        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    5858         
    5959        make/o/d/n=(num) xwave_b3,ywave_b3 
    … …  
    6565        Display ywave_b3 vs xwave_b3 
    6666        ModifyGraph log=1,marker=29,msize=2,mode=4 
    67         Label bottom "q (\\S-1\\M)" 
     67        Label bottom "q (A\\S-1\\M)" 
    6868        Label left "Intensity (cm\\S-1\\M)" 
    6969        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    7373        Variable num=256,qmin=0.001,qmax=0.7 
    7474        Prompt num "Enter number of data points for model: " 
    75         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    76         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     75        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     76        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    7777         
    7878        make/o/d/n=(num) xwave_b4,ywave_b4 
    … …  
    8484        Display ywave_b4 vs xwave_b4 
    8585        ModifyGraph log=1,marker=29,msize=2,mode=4 
    86         Label bottom "q (\\S-1\\M)" 
     86        Label bottom "q (A\\S-1\\M)" 
    8787        Label left "Intensity (cm\\S-1\\M)" 
    8888        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    111111        Display smeared_b1 vs smeared_qvals                                                                      
    112112        ModifyGraph log=1,marker=29,msize=2,mode=4 
    113         Label bottom "q (\\S-1\\M)" 
     113        Label bottom "q (A\\S-1\\M)" 
    114114        Label left "Intensity (cm\\S-1\\M)" 
    115115        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    136136        Display smeared_b2 vs smeared_qvals                                                                      
    137137        ModifyGraph log=1,marker=29,msize=2,mode=4 
    138         Label bottom "q (\\S-1\\M)" 
     138        Label bottom "q (A\\S-1\\M)" 
    139139        Label left "Intensity (cm\\S-1\\M)" 
    140140        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    161161        Display smeared_b3 vs smeared_qvals                                                                      
    162162        ModifyGraph log=1,marker=29,msize=2,mode=4 
    163         Label bottom "q (\\S-1\\M)" 
     163        Label bottom "q (A\\S-1\\M)" 
    164164        Label left "Intensity (cm\\S-1\\M)" 
    165165        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    186186        Display smeared_b4 vs smeared_qvals                                                                      
    187187        ModifyGraph log=1,marker=29,msize=2,mode=4 
    188         Label bottom "q (\\S-1\\M)" 
     188        Label bottom "q (A\\S-1\\M)" 
    189189        Label left "Intensity (cm\\S-1\\M)" 
    190190        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/BimodalSchulzSpheres.ipf

    r42 r379  
    1515        Variable num=128,qmin=0.001,qmax=0.7 
    1616        Prompt num "Enter number of data points for model: " 
    17         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    18         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     17        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     18        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1919         
    2020        Make/O/D/n=(num) xwave_bss,ywave_bss 
    … …  
    2828        Display ywave_bss vs xwave_bss 
    2929        ModifyGraph log=1,marker=29,msize=2,mode=4 
    30         Label bottom "q (\\S-1\\M)" 
     30        Label bottom "q (A\\S-1\\M)" 
    3131        Label left "Intensity (cm\\S-1\\M)" 
    3232        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6060        Display smeared_bss vs smeared_qvals 
    6161        ModifyGraph log=1,marker=29,msize=2,mode=4 
    62         Label bottom "q (\\S-1\\M)" 
     62        Label bottom "q (A\\S-1\\M)" 
    6363        Label left "Intensity (cm\\S-1\\M)" 
    6464        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/BinaryHardSpheres.ipf

    r42 r379  
    4646        Variable num=256, qmin=.001, qmax=.7 
    4747        Prompt num "Enter number of data points for model: " 
    48         Prompt qmin "Enter minimum q-value (-1) for model: "  
    49         Prompt qmax "Enter maximum q-value (-1) for model: " 
     48        Prompt qmin "Enter minimum q-value (A-1) for model: "  
     49        Prompt qmax "Enter maximum q-value (A-1) for model: " 
    5050// 
    5151        Make/O/D/n=(num) xwave_BinaryHS, ywave_BinaryHS 
    … …  
    6161        ModifyGraph marker=29, msize=2, mode=4 
    6262        ModifyGraph log=1 
    63         Label bottom "q (\\S-1\\M) " 
     63        Label bottom "q (A\\S-1\\M) " 
    6464        Label left "I(q) (cm\\S-1\\M)" 
    6565        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    9494        Display smeared_BinaryHS vs smeared_qvals                                                                       // 
    9595        ModifyGraph log=1,marker=29,msize=2,mode=4 
    96         Label bottom "q (\\S-1\\M)" 
     96        Label bottom "q (A\\S-1\\M)" 
    9797        Label left "I(q) (cm\\S-1\\M)" 
    9898        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Cylinder_PolyLength.ipf

    r42 r379  
    1919        Variable num=100,qmin=0.001,qmax=0.7 
    2020        Prompt num "Enter number of data points for model: " 
    21         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    22         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     21        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     22        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2323         
    2424        make/o/d/n=(num) xwave_cypl,ywave_cypl 
    … …  
    3030        Display ywave_cypl vs xwave_cypl 
    3131        ModifyGraph log=1,marker=29,msize=2,mode=4 
    32         Label bottom "q (\\S-1\\M)" 
     32        Label bottom "q (A\\S-1\\M)" 
    3333        Label left "Intensity (cm\\S-1\\M)" 
    3434        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5858        Display smeared_cypl vs smeared_qvals 
    5959        ModifyGraph log=1,marker=29,msize=2,mode=4 
    60         Label bottom "q (\\S-1\\M)" 
     60        Label bottom "q (A\\S-1\\M)" 
    6161        Label left "Intensity (cm\\S-1\\M)" 
    6262        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Cylinder_PolyRadius.ipf

    r42 r379  
    1919        Variable num=128,qmin=0.001,qmax=0.7 
    2020        Prompt num "Enter number of data points for model: " 
    21         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    22         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     21        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     22        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2323         
    2424        make/o/d/n=(num) xwave_cypr,ywave_cypr 
    … …  
    3030        Display ywave_cypr vs xwave_cypr 
    3131        ModifyGraph log=1,marker=29,msize=2,mode=4 
    32         Label bottom "q (\\S-1\\M)" 
     32        Label bottom "q (A\\S-1\\M)" 
    3333        Label left "Intensity (cm\\S-1\\M)" 
    3434        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5959        Display smeared_cypr vs smeared_qvals 
    6060        ModifyGraph log=1,marker=29,msize=2,mode=4 
    61         Label bottom "q (\\S-1\\M)" 
     61        Label bottom "q (A\\S-1\\M)" 
    6262        Label left "Intensity (cm\\S-1\\M)" 
    6363        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Debye.ipf

    r42 r379  
    66        Variable num=256,qmin=0.001,qmax=0.7 
    77        Prompt num "Enter number of data points for model: " 
    8         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    9         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     8        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     9        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1010         
    1111        make/O/D/N=(num) xwave_deb,ywave_deb 
    … …  
    1717        Display ywave_deb vs xwave_deb 
    1818        ModifyGraph marker=29,msize=2,mode=4,log=1 
    19         Label bottom "q (\\S-1\\M)" 
     19        Label bottom "q (A\\S-1\\M)" 
    2020        Label left "Intensity (cm\\S-1\\M)" 
    2121        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4444        Display smeared_deb vs smeared_qvals 
    4545        ModifyGraph log=1,marker=29,msize=2,mode=4 
    46         Label bottom "q (\\S-1\\M)" 
     46        Label bottom "q (A\\S-1\\M)" 
    4747        Label left "Intensity (cm\\S-1\\M)" 
    4848        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5757        // variables are: 
    5858        //[0] scale factor 
    59         //[1] radius of gyration [] 
     59        //[1] radius of gyration [A] 
    6060        //[2] background        [cm-1] 
    6161         

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/EllipticalCylinder.ipf

    r42 r379  
    1616        Variable num=50,qmin=0.001,qmax=0.7 
    1717        Prompt num "Enter number of data points for model: " 
    18         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    19         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     18        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     19        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2020         
    2121//      //constants needed for the integration if qtrap is used (in a separate procedure file!) 
    … …  
    2727        xwave_ecf =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    2828        Make/O/D coef_ecf = {1.,20.,1.5,400,3.0e-6,0.0} 
    29         make/o/t parameters_ecf = {"scale","minor radius (A)","nu = major/minor (-)","length ()","SLD diff (A^-2)","incoh. bkg (cm^-1)"} 
     29        make/o/t parameters_ecf = {"scale","minor radius (A)","nu = major/minor (-)","length (A)","SLD diff (A^-2)","incoh. bkg (cm^-1)"} 
    3030        Edit parameters_ecf,coef_ecf 
    3131        ywave_ecf := EllipCylForm(coef_ecf,xwave_ecf) 
    3232        Display ywave_ecf vs xwave_ecf 
    3333        ModifyGraph log=1,marker=29,msize=2,mode=4 
    34         Label bottom "q (\\S-1\\M)" 
     34        Label bottom "q (A\\S-1\\M)" 
    3535        Label left "Intensity (cm\\S-1\\M)" 
    3636        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4949        // Setup parameter table for model function 
    5050        Make/O/D smear_coef_ecf =  {1.,20.,1.5,400,3.0e-6,0.0} 
    51         make/o/t smear_parameters_ecf = {"scale","minor radius (A)","nu = major/minor (-)","length ()","SLD diff (A^-2)","incoh. bkg (cm^-1)"} 
     51        make/o/t smear_parameters_ecf = {"scale","minor radius (A)","nu = major/minor (-)","length (A)","SLD diff (A^-2)","incoh. bkg (cm^-1)"} 
    5252        Edit smear_parameters_ecf,smear_coef_ecf 
    5353         
    … …  
    6060        Display smeared_ecf vs smeared_qvals 
    6161        ModifyGraph log=1,marker=29,msize=2,mode=4 
    62         Label bottom "q (\\S-1\\M)" 
     62        Label bottom "q (A\\S-1\\M)" 
    6363        Label left "Intensity (cm\\S-1\\M)" 
    6464        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/FlexCyl_EllipCross.ipf

    r42 r379  
    1818        Variable num=128,qmin=0.001,qmax=0.7 
    1919        Prompt num "Enter number of data points for model: " 
    20         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    21         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     20        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     21        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2222         
    2323        Make/O/D/n=(num) xwave_fleell,ywave_fleell 
    … …  
    2929        Display ywave_fleell vs xwave_fleell 
    3030        ModifyGraph log=1,marker=29,msize=2,mode=4 
    31         Label bottom "q (\\S-1\\M)" 
     31        Label bottom "q (A\\S-1\\M)" 
    3232        Label left "Intensity (cm\\S-1\\M)" 
    3333        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5656        Display smeared_fleell vs smeared_qvals                                                                 // 
    5757        ModifyGraph log=1,marker=29,msize=2,mode=4 
    58         Label bottom "q (\\S-1\\M)" 
     58        Label bottom "q (A\\S-1\\M)" 
    5959        Label left "I(q) (cm\\S-1\\M)" 
    6060        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/FlexCyl_PolyLen.ipf

    r42 r379  
    1010        Variable num=128,qmin=0.001,qmax=0.7 
    1111        Prompt num "Enter number of data points for model: " 
    12         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    13         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     12        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     13        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1414         
    1515        // Setup parameter table for model function 
    … …  
    2222        Display ywave_flepl vs xwave_flepl 
    2323        ModifyGraph log=1,marker=29,msize=2,mode=4 
    24         Label bottom "q (\\S-1\\M)" 
     24        Label bottom "q (A\\S-1\\M)" 
    2525        Label left "Intensity (cm\\S-1\\M)" 
    2626        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4747        Display smeared_flepl vs smeared_qvals                                                                  // 
    4848        ModifyGraph log=1,marker=29,msize=2,mode=4 
    49         Label bottom "q (\\S-1\\M)" 
     49        Label bottom "q (A\\S-1\\M)" 
    5050        Label left "I(q) (cm\\S-1\\M)" 
    5151        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/FlexCyl_PolyRadius.ipf

    r42 r379  
    99        Variable num=100,qmin=0.001,qmax=0.7 
    1010        Prompt num "Enter number of data points for model: " 
    11         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    12         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     11        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     12        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1313         
    1414        Make/O/D/n=(num) xwave_fcpr,ywave_fcpr 
    … …  
    2020        Display ywave_fcpr vs xwave_fcpr 
    2121        ModifyGraph log=1,marker=29,msize=2,mode=4 
    22         Label bottom "q (\\S-1\\M)" 
     22        Label bottom "q (A\\S-1\\M)" 
    2323        Label left "Intensity (cm\\S-1\\M)" 
    2424        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4848        Display smeared_fcpr vs smeared_qvals                                                                    
    4949        ModifyGraph log=1,marker=29,msize=2,mode=4 
    50         Label bottom "q (\\S-1\\M)" 
     50        Label bottom "q (A\\S-1\\M)" 
    5151        Label left "Intensity (cm\\S-1\\M)" 
    5252        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/FlexibleCylinder.ipf

    r42 r379  
    2121        Variable num=128,qmin=0.001,qmax=0.7 
    2222        Prompt num "Enter number of data points for model: " 
    23         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    24         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     23        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     24        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2525                 
    2626        Make/O/D/n=(num) xwave_fle,ywave_fle 
    … …  
    3232        Display ywave_fle vs xwave_fle 
    3333        ModifyGraph log=1,marker=29,msize=2,mode=4 
    34         Label bottom "q (\\S-1\\M)" 
     34        Label bottom "q (A\\S-1\\M)" 
    3535        Label left "Intensity (cm\\S-1\\M)" 
    3636        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6060        Display smeared_fle vs smeared_qvals                                                                     
    6161        ModifyGraph log=1,marker=29,msize=2,mode=4 
    62         Label bottom "q (\\S-1\\M)" 
     62        Label bottom "q (A\\S-1\\M)" 
    6363        Label left "Intensity (cm\\S-1\\M)" 
    6464        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Fractal.ipf

    r42 r379  
    1212        Variable num=128,qmin=0.001,qmax=0.5 
    1313        Prompt num "Enter number of data points for model: " 
    14         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    15         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     14        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     15        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1616         
    1717        Make/O/D/n=(num) xwave_fra,ywave_fra                                     
    … …  
    2323        Display ywave_fra vs xwave_fra                                                   
    2424        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    25         Label bottom "q (\\S-1\\M)" 
     25        Label bottom "q (A\\S-1\\M)" 
    2626        Label left "Intensity (cm\\S-1\\M)"                                      
    2727        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4848        Display smeared_fractal vs smeared_qvals                 
    4949        ModifyGraph log=1,marker=29,msize=2,mode=4 
    50         Label bottom "q (\\S-1\\M)" 
     50        Label bottom "q (A\\S-1\\M)" 
    5151        Label left "I(q) (cm\\S-1\\M)" 
    5252        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/GaussSpheres.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/N=(num) xwave_pgs,ywave_pgs 
    … …  
    2424        Display ywave_pgs vs xwave_pgs 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5151        Display smeared_pgs vs smeared_qvals                                                                     
    5252        ModifyGraph log=1,marker=29,msize=2,mode=4 
    53         Label bottom "q (\\S-1\\M)" 
     53        Label bottom "q (A\\S-1\\M)" 
    5454        Label left "Intensity (cm\\S-1\\M)" 
    5555        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/GaussSpheres_and_Struct.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/N=(num) xwave_pgs_HS,ywave_pgs_HS 
    … …  
    2424        Display ywave_pgs_HS vs xwave_pgs_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5151        Display smeared_pgs_HS vs smeared_qvals                                                                  
    5252        ModifyGraph log=1,marker=29,msize=2,mode=4 
    53         Label bottom "q (\\S-1\\M)" 
     53        Label bottom "q (A\\S-1\\M)" 
    5454        Label left "Intensity (cm\\S-1\\M)" 
    5555        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    101101        Variable num=128,qmin=0.001,qmax=0.7 
    102102        Prompt num "Enter number of data points for model: " 
    103         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    104         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     103        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     104        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    105105         
    106106        Make/O/D/N=(num) xwave_pgs_SW,ywave_pgs_SW 
    … …  
    112112        Display ywave_pgs_SW vs xwave_pgs_SW 
    113113        ModifyGraph log=1,marker=29,msize=2,mode=4 
    114         Label bottom "q (\\S-1\\M)" 
     114        Label bottom "q (A\\S-1\\M)" 
    115115        Label left "Intensity (cm\\S-1\\M)" 
    116116        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    139139        Display smeared_pgs_SW vs smeared_qvals                                                                  
    140140        ModifyGraph log=1,marker=29,msize=2,mode=4 
    141         Label bottom "q (\\S-1\\M)" 
     141        Label bottom "q (A\\S-1\\M)" 
    142142        Label left "Intensity (cm\\S-1\\M)" 
    143143        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    191191        Variable num=256,qmin=0.001,qmax=0.7 
    192192        Prompt num "Enter number of data points for model: " 
    193         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    194         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     193        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     194        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    195195         
    196196        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    209209        Display ywave_pgs_SC vs xwave_pgs_SC 
    210210        ModifyGraph log=1,marker=29,msize=2,mode=4 
    211         Label bottom "q (\\S-1\\M)" 
     211        Label bottom "q (A\\S-1\\M)" 
    212212        Label left "Intensity (cm\\S-1\\M)" 
    213213        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    243243        Display smeared_pgs_SC vs smeared_qvals                                                                  
    244244        ModifyGraph log=1,marker=29,msize=2,mode=4 
    245         Label bottom "q (\\S-1\\M)" 
     245        Label bottom "q (A\\S-1\\M)" 
    246246        Label left "Intensity (cm\\S-1\\M)" 
    247247        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    296296        Variable num=256,qmin=0.001,qmax=0.7 
    297297        Prompt num "Enter number of data points for model: " 
    298         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    299         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     298        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     299        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    300300         
    301301        Make/O/D/N=(num) xwave_pgs_SHS,ywave_pgs_SHS 
    … …  
    307307        Display ywave_pgs_SHS vs xwave_pgs_SHS 
    308308        ModifyGraph log=1,marker=29,msize=2,mode=4 
    309         Label bottom "q (\\S-1\\M)" 
     309        Label bottom "q (A\\S-1\\M)" 
    310310        Label left "Intensity (cm\\S-1\\M)" 
    311311        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    334334        Display smeared_pgs_SHS vs smeared_qvals                                                                         
    335335        ModifyGraph log=1,marker=29,msize=2,mode=4 
    336         Label bottom "q (\\S-1\\M)" 
     336        Label bottom "q (A\\S-1\\M)" 
    337337        Label left "Intensity (cm\\S-1\\M)" 
    338338        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/LamellarFF.ipf

    r42 r379  
    2323        Variable num=128, qmin=.001, qmax=.5 
    2424        Prompt num "Enter number of data points for model: " 
    25         Prompt qmin "Enter minimum q-value (^1) for model: "  
    26         Prompt qmax "Enter maximum q-value (^1) for model: " 
     25        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     26        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    2727// 
    2828        Make/O/D/n=(num) xwave_LamellarFF, ywave_LamellarFF 
    … …  
    3636        ModifyGraph marker=29, msize=2, mode=4 
    3737        ModifyGraph log=1 
    38         Label bottom "q (\\S-1\\M) " 
     38        Label bottom "q (A\\S-1\\M) " 
    3939        Label left "I(q) (cm\\S-1\\M)" 
    4040        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6969        Display smeared_LamellarFF vs smeared_qvals                                                                     // 
    7070        ModifyGraph log=1,marker=29,msize=2,mode=4 
    71         Label bottom "q (\\S-1\\M)" 
     71        Label bottom "q (A\\S-1\\M)" 
    7272        Label left "I(q) (cm\\S-1\\M)" 
    7373        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/LamellarFF_HG.ipf

    r42 r379  
    2525        Variable num=128, qmin=.001, qmax=.5 
    2626        Prompt num "Enter number of data points for model: " 
    27         Prompt qmin "Enter minimum q-value (^1) for model: "  
    28         Prompt qmax "Enter maximum q-value (^1) for model: " 
     27        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     28        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    2929// 
    3030        Make/O/D/n=(num) xwave_LamellarFF_HG, ywave_LamellarFF_HG 
    … …  
    3838        ModifyGraph marker=29, msize=2, mode=4 
    3939        ModifyGraph log=1 
    40         Label bottom "q (\\S-1\\M) " 
     40        Label bottom "q (A\\S-1\\M) " 
    4141        Label left "I(q) (cm\\S-1\\M)" 
    4242        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    7171        Display smeared_LamellarFF_HG vs smeared_qvals                                                                  // 
    7272        ModifyGraph log=1,marker=29,msize=2,mode=4 
    73         Label bottom "q (\\S-1\\M)" 
     73        Label bottom "q (A\\S-1\\M)" 
    7474        Label left "I(q) (cm\\S-1\\M)" 
    7575        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/LamellarPS.ipf

    r42 r379  
    4949        Variable num=128, qmin=.001, qmax=.5 
    5050        Prompt num "Enter number of data points for model: " 
    51         Prompt qmin "Enter minimum q-value (^1) for model: "  
    52         Prompt qmax "Enter maximum q-value (^1) for model: " 
     51        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     52        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    5353// 
    5454        // constants 
    … …  
    6666        ModifyGraph marker=29, msize=2, mode=4 
    6767        ModifyGraph log=1 
    68         Label bottom "q (\\S-1\\M) " 
     68        Label bottom "q (A\\S-1\\M) " 
    6969        Label left "I(q) (cm\\S-1\\M)" 
    7070        // 
    … …  
    107107//      Display smeared_LamellarPS vs $gQvals                                                                   // 
    108108//      ModifyGraph log=1,marker=29,msize=2,mode=4 
    109 //      Label bottom "q (\\S-1\\M)" 
     109//      Label bottom "q (A\\S-1\\M)" 
    110110//      Label left "I(q) (cm\\S-1\\M)" 
    111111// 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/LamellarPS_HG.ipf

    r42 r379  
    4949        Variable num=128, qmin=.001, qmax=.5 
    5050        Prompt num "Enter number of data points for model: " 
    51         Prompt qmin "Enter minimum q-value (^1) for model: "  
    52         Prompt qmax "Enter maximum q-value (^1) for model: " 
     51        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     52        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    5353// 
    5454        // constants 
    … …  
    6666        ModifyGraph marker=29, msize=2, mode=4 
    6767        ModifyGraph log=1 
    68         Label bottom "q (\\S-1\\M) " 
     68        Label bottom "q (A\\S-1\\M) " 
    6969        Label left "I(q) (cm\\S-1\\M)" 
    7070        // 
    … …  
    106106//      Display smeared_LamellarPS_HG vs $gQvals                                                                        // 
    107107//      ModifyGraph log=1,marker=29,msize=2,mode=4 
    108 //      Label bottom "q (\\S-1\\M)" 
     108//      Label bottom "q (A\\S-1\\M)" 
    109109//      Label left "I(q) (cm\\S-1\\M)" 
    110110// 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/LogNormSpheres_and_Struct.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/N=(num) xwave_lns_HS,ywave_lns_HS 
    … …  
    2424        Display ywave_lns_HS vs xwave_lns_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5151        Display smeared_lns_HS vs smeared_qvals                                                                  
    5252        ModifyGraph log=1,marker=29,msize=2,mode=4 
    53         Label bottom "q (\\S-1\\M)" 
     53        Label bottom "q (A\\S-1\\M)" 
    5454        Label left "Intensity (cm\\S-1\\M)" 
    5555        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    101101        Variable num=128,qmin=0.001,qmax=0.7 
    102102        Prompt num "Enter number of data points for model: " 
    103         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    104         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     103        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     104        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    105105         
    106106        Make/O/D/N=(num) xwave_lns_SW,ywave_lns_SW 
    … …  
    112112        Display ywave_lns_SW vs xwave_lns_SW 
    113113        ModifyGraph log=1,marker=29,msize=2,mode=4 
    114         Label bottom "q (\\S-1\\M)" 
     114        Label bottom "q (A\\S-1\\M)" 
    115115        Label left "Intensity (cm\\S-1\\M)" 
    116116        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    139139        Display smeared_lns_SW vs smeared_qvals                                                                  
    140140        ModifyGraph log=1,marker=29,msize=2,mode=4 
    141         Label bottom "q (\\S-1\\M)" 
     141        Label bottom "q (A\\S-1\\M)" 
    142142        Label left "Intensity (cm\\S-1\\M)" 
    143143        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    191191        Variable num=256,qmin=0.001,qmax=0.7 
    192192        Prompt num "Enter number of data points for model: " 
    193         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    194         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     193        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     194        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    195195         
    196196        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    209209        Display ywave_lns_SC vs xwave_lns_SC 
    210210        ModifyGraph log=1,marker=29,msize=2,mode=4 
    211         Label bottom "q (\\S-1\\M)" 
     211        Label bottom "q (A\\S-1\\M)" 
    212212        Label left "Intensity (cm\\S-1\\M)" 
    213213        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    243243        Display smeared_lns_SC vs smeared_qvals                                                                  
    244244        ModifyGraph log=1,marker=29,msize=2,mode=4 
    245         Label bottom "q (\\S-1\\M)" 
     245        Label bottom "q (A\\S-1\\M)" 
    246246        Label left "Intensity (cm\\S-1\\M)" 
    247247        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    296296        Variable num=256,qmin=0.001,qmax=0.7 
    297297        Prompt num "Enter number of data points for model: " 
    298         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    299         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     298        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     299        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    300300         
    301301        Make/O/D/N=(num) xwave_lns_SHS,ywave_lns_SHS 
    … …  
    307307        Display ywave_lns_SHS vs xwave_lns_SHS 
    308308        ModifyGraph log=1,marker=29,msize=2,mode=4 
    309         Label bottom "q (\\S-1\\M)" 
     309        Label bottom "q (A\\S-1\\M)" 
    310310        Label left "Intensity (cm\\S-1\\M)" 
    311311        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    334334        Display smeared_lns_SHS vs smeared_qvals                                                                         
    335335        ModifyGraph log=1,marker=29,msize=2,mode=4 
    336         Label bottom "q (\\S-1\\M)" 
     336        Label bottom "q (A\\S-1\\M)" 
    337337        Label left "Intensity (cm\\S-1\\M)" 
    338338        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/LogNormalSphere.ipf

    r42 r379  
    1010        Variable num=128,qmin=0.001,qmax=0.7 
    1111        Prompt num "Enter number of data points for model: " 
    12         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    13         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     12        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     13        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1414         
    1515        Make/O/D/N=(num) xwave_lns,ywave_lns 
    … …  
    2121        Display ywave_lns vs xwave_lns 
    2222        ModifyGraph log=1,marker=29,msize=2,mode=4 
    23         Label bottom "q (\\S-1\\M)" 
     23        Label bottom "q (A\\S-1\\M)" 
    2424        Label left "Intensity (cm\\S-1\\M)" 
    2525        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4848        Display smeared_lns vs smeared_qvals                                                                     
    4949        ModifyGraph log=1,marker=29,msize=2,mode=4 
    50         Label bottom "q (\\S-1\\M)" 
     50        Label bottom "q (A\\S-1\\M)" 
    5151        Label left "Intensity (cm\\S-1\\M)" 
    5252        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/MultiShell.ipf

    r178 r379  
    1313        Variable num=100,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        make/O/D/N=(num) xwave_mss,ywave_mss 
    … …  
    2424        Display/K=1 ywave_mss vs xwave_mss 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5555        Display/K=1 smeared_mss vs smeared_qvals                                                                         
    5656        ModifyGraph log=1,marker=29,msize=2,mode=4 
    57         Label bottom "q (\\S-1\\M)" 
     57        Label bottom "q (A\\S-1\\M)" 
    5858        Label left "Intensity (cm\\S-1\\M)" 
    5959        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6666        // variables are: 
    6767        //[0] scale factor 
    68         //[1] radius of core [] 
    69         //[2] thickness of the shell    [] 
     68        //[1] radius of core [A] 
     69        //[2] thickness of the shell    [A] 
    7070        //[3] thickness of the water layer 
    71         //[4] SLD of the core = sld of the solvent[-2] 
     71        //[4] SLD of the core = sld of the solvent[A-2] 
    7272        //[5] SLD of the shell 
    7373        //[6] number of pairs (tw+tsh) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Parallelepiped.ipf

    r42 r379  
    2929        Variable num=100, qmin=.001, qmax=.7 
    3030        Prompt num "Enter number of data points for model: " 
    31         Prompt qmin "Enter minimum q-value (^1) for model: "  
    32         Prompt qmax "Enter maximum q-value (^1) for model: " 
     31        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     32        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    3333        // 
    3434        Make/O/D/n=(num) xwave_Parallelepiped, ywave_Parallelepiped 
    3535        xwave_Parallelepiped =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    3636        Make/O/D coef_Parallelepiped = {1,35,75,400,6e-6,0}                     //CH#2 
    37         make/o/t parameters_Parallelepiped = {"Scale Factor","Shortest Edge A ()","B ()","Longest Edge C ()","Contrast (^-2)","Incoherent Bgd (cm-1)"}      //CH#3 
     37        make/o/t parameters_Parallelepiped = {"Scale Factor","Shortest Edge A (A)","B (A)","Longest Edge C (A)","Contrast (A^-2)","Incoherent Bgd (cm-1)"}      //CH#3 
    3838        Edit parameters_Parallelepiped, coef_Parallelepiped 
    3939        ywave_Parallelepiped  := Parallelepiped(coef_Parallelepiped, xwave_Parallelepiped) 
    … …  
    4141        ModifyGraph marker=29, msize=2, mode=4 
    4242        ModifyGraph log=1 
    43         Label bottom "q (\\S-1\\M) " 
     43        Label bottom "q (A\\S-1\\M) " 
    4444        Label left "I(q) (cm\\S-1\\M)" 
    4545        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6363        // Setup parameter table for model function 
    6464        Make/O/D smear_coef_Parallelepiped = {1,35,75,400,6e-6,0}               //CH#4 
    65         make/o/t smear_parameters_Parallelepiped = {"Scale Factor","Shortest Edge A ()","B ()","Longest Edge C ()","Contrast (^-2)","Incoherent Bgd (cm-1)"} 
     65        make/o/t smear_parameters_Parallelepiped = {"Scale Factor","Shortest Edge A (A)","B (A)","Longest Edge C (A)","Contrast (A^-2)","Incoherent Bgd (cm-1)"} 
    6666        Edit smear_parameters_Parallelepiped,smear_coef_Parallelepiped                                  //display parameters in a table 
    6767         
    … …  
    7474        Display smeared_Parallelepiped vs smeared_qvals                                                                 // 
    7575        ModifyGraph log=1,marker=29,msize=2,mode=4 
    76         Label bottom "q (\\S-1\\M)" 
     76        Label bottom "q (A\\S-1\\M)" 
    7777        Label left "I(q) (cm\\S-1\\M)" 
    7878        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/PolyCoreShellCylinder.ipf

    r42 r379  
    6464        Display smeared_CSCpr vs smeared_qvals                                                                   
    6565        ModifyGraph log=1,marker=29,msize=2,mode=4 
    66         Label bottom "q (\\S-1\\M)" 
     66        Label bottom "q (A\\S-1\\M)" 
    6767        Label left "Intensity (cm\\S-1\\M)" 
    6868        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/SchulzSpheres.ipf

    r42 r379  
    1111        Variable num=128,qmin=0.001,qmax=0.7 
    1212        Prompt num "Enter number of data points for model: " 
    13         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    14         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     13        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     14        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1515         
    1616        Make/O/D/N=(num) xwave_sch,ywave_sch 
    … …  
    2222        Display ywave_sch vs xwave_sch 
    2323        ModifyGraph log=1,marker=29,msize=2,mode=4 
    24         Label bottom "q (\\S-1\\M)" 
     24        Label bottom "q (A\\S-1\\M)" 
    2525        Label left "Intensity (cm\\S-1\\M)" 
    2626        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4949        Display smeared_sch vs smeared_qvals                                                                     
    5050        ModifyGraph log=1,marker=29,msize=2,mode=4 
    51         Label bottom "q (\\S-1\\M)" 
     51        Label bottom "q (A\\S-1\\M)" 
    5252        Label left "Intensity (cm\\S-1\\M)" 
    5353        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/SchulzSpheres_and_Struct.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/N=(num) xwave_sch_HS,ywave_sch_HS 
    … …  
    2424        Display ywave_sch_HS vs xwave_sch_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5151        Display smeared_sch_HS vs smeared_qvals                                                                  
    5252        ModifyGraph log=1,marker=29,msize=2,mode=4 
    53         Label bottom "q (\\S-1\\M)" 
     53        Label bottom "q (A\\S-1\\M)" 
    5454        Label left "Intensity (cm\\S-1\\M)" 
    5555        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    102102        Variable num=128,qmin=0.001,qmax=0.7 
    103103        Prompt num "Enter number of data points for model: " 
    104         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    105         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     104        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     105        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    106106         
    107107        Make/O/D/N=(num) xwave_sch_SW,ywave_sch_SW 
    … …  
    113113        Display ywave_sch_SW vs xwave_sch_SW 
    114114        ModifyGraph log=1,marker=29,msize=2,mode=4 
    115         Label bottom "q (\\S-1\\M)" 
     115        Label bottom "q (A\\S-1\\M)" 
    116116        Label left "Intensity (cm\\S-1\\M)" 
    117117        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    140140        Display smeared_sch_SW vs smeared_qvals                                                                  
    141141        ModifyGraph log=1,marker=29,msize=2,mode=4 
    142         Label bottom "q (\\S-1\\M)" 
     142        Label bottom "q (A\\S-1\\M)" 
    143143        Label left "Intensity (cm\\S-1\\M)" 
    144144        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    193193        Variable num=256,qmin=0.001,qmax=0.7 
    194194        Prompt num "Enter number of data points for model: " 
    195         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    196         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     195        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     196        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    197197         
    198198        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    211211        Display ywave_sch_SC vs xwave_sch_SC 
    212212        ModifyGraph log=1,marker=29,msize=2,mode=4 
    213         Label bottom "q (\\S-1\\M)" 
     213        Label bottom "q (A\\S-1\\M)" 
    214214        Label left "Intensity (cm\\S-1\\M)" 
    215215        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    245245        Display smeared_sch_SC vs smeared_qvals                                                                  
    246246        ModifyGraph log=1,marker=29,msize=2,mode=4 
    247         Label bottom "q (\\S-1\\M)" 
     247        Label bottom "q (A\\S-1\\M)" 
    248248        Label left "Intensity (cm\\S-1\\M)" 
    249249        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    299299        Variable num=256,qmin=0.001,qmax=0.7 
    300300        Prompt num "Enter number of data points for model: " 
    301         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    302         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     301        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     302        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    303303         
    304304        Make/O/D/N=(num) xwave_sch_SHS,ywave_sch_SHS 
    … …  
    310310        Display ywave_sch_SHS vs xwave_sch_SHS 
    311311        ModifyGraph log=1,marker=29,msize=2,mode=4 
    312         Label bottom "q (\\S-1\\M)" 
     312        Label bottom "q (A\\S-1\\M)" 
    313313        Label left "Intensity (cm\\S-1\\M)" 
    314314        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    337337        Display smeared_sch_SHS vs smeared_qvals                                                                         
    338338        ModifyGraph log=1,marker=29,msize=2,mode=4 
    339         Label bottom "q (\\S-1\\M)" 
     339        Label bottom "q (A\\S-1\\M)" 
    340340        Label left "Intensity (cm\\S-1\\M)" 
    341341        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/StickyHardSphereStruct.ipf

    r42 r379  
    2323        Variable num=256, qmin=.001, qmax=.5 
    2424        Prompt num "Enter number of data points for model: " 
    25         Prompt qmin "Enter minimum q-value (^1) for model: "  
    26         Prompt qmax "Enter maximum q-value (^1) for model: " 
     25        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     26        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    2727// 
    2828        Make/O/D/n=(num) xwave_shsSQ, ywave_shsSQ 
    … …  
    3535        ModifyGraph marker=29, msize=2, mode=4 
    3636        ModifyGraph log=0 
    37         Label bottom "q (\\S-1\\M) " 
     37        Label bottom "q (A\\S-1\\M) " 
    3838        Label left "S(q)" 
    3939        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/TriaxialEllipsoid.ipf

    r42 r379  
    2525        Variable num=100, qmin=.001, qmax=.7 
    2626        Prompt num "Enter number of data points for model: " 
    27         Prompt qmin "Enter minimum q-value (^1) for model: "  
    28         Prompt qmax "Enter maximum q-value (^1) for model: " 
     27        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     28        Prompt qmax "Enter maximum q-value (A^1) for model: " 
    2929        // 
    3030        Make/O/D/n=(num) xwave_triax, ywave_triax 
    3131        xwave_triax =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    3232        Make/O/D coef_triax = {1,35,100,400,6e-6,0}                     //CH#2 
    33         make/o/t parameters_triax = {"Scale Factor","Semi-axis A [smallest]()","Semi-axis B ()","Semi-axis C [largest]()","Contrast (^-2)","Incoherent Bgd (cm-1)"} //CH#3 
     33        make/o/t parameters_triax = {"Scale Factor","Semi-axis A [smallest](A)","Semi-axis B (A)","Semi-axis C [largest](A)","Contrast (A^-2)","Incoherent Bgd (cm-1)"} //CH#3 
    3434        Edit parameters_triax, coef_triax 
    3535        ywave_triax  := TriaxialEllipsoid(coef_triax, xwave_triax) 
    … …  
    3737        ModifyGraph marker=29, msize=2, mode=4 
    3838        ModifyGraph log=1 
    39         Label bottom "q (\\S-1\\M) " 
     39        Label bottom "q (A\\S-1\\M) " 
    4040        Label left "I(q) (cm\\S-1\\M)" 
    4141        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5858        // Setup parameter table for model function 
    5959        Make/O/D smear_coef_triax = {1,35,100,400,6e-6,0}               //CH#4 
    60         make/o/t smear_parameters_triax = {"Scale Factor","A ()","B ()","C ()","Contrast (^-2)","Incoherent Bgd (cm-1)"} 
     60        make/o/t smear_parameters_triax = {"Scale Factor","A (A)","B (A)","C (A)","Contrast (A^-2)","Incoherent Bgd (cm-1)"} 
    6161        Edit smear_parameters_triax,smear_coef_triax                                    //display parameters in a table 
    6262         
    … …  
    6969        Display smeared_triax vs smeared_qvals                                                                  // 
    7070        ModifyGraph log=1,marker=29,msize=2,mode=4 
    71         Label bottom "q (\\S-1\\M)" 
     71        Label bottom "q (A\\S-1\\M)" 
    7272        Label left "I(q) (cm\\S-1\\M)" 
    7373        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Vesicle_UL.ipf

    r42 r379  
    2323        Variable num=128,qmin=0.001,qmax=0.7 
    2424        Prompt num "Enter number of data points for model: " 
    25         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    26         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     25        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     26        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2727         
    2828        make/o/d/n=(num) xwave_vesicle,ywave_vesicle 
    … …  
    3434        Display ywave_vesicle vs xwave_vesicle 
    3535        ModifyGraph log=1,marker=29,msize=2,mode=4 
    36         Label bottom "q (\\S-1\\M)" 
     36        Label bottom "q (A\\S-1\\M)" 
    3737        Label left "Intensity (cm\\S-1\\M)" 
    3838        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6868        Display smeared_vesicle vs smeared_qvals                                                                         
    6969        ModifyGraph log=1,marker=29,msize=2,mode=4 
    70         Label bottom "q (\\S-1\\M)" 
     70        Label bottom "q (A\\S-1\\M)" 
    7171        Label left "Intensity (cm\\S-1\\M)" 
    7272        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    8282        // variables are: 
    8383        //[0] scale factor 
    84         //[1] radius of core [] 
    85         //[2] thickness of the shell    [] 
    86         //[3] SLD of the core and solvent[-2] 
     84        //[1] radius of core [A] 
     85        //[2] thickness of the shell    [A] 
     86        //[3] SLD of the core and solvent[A-2] 
    8787        //[4] SLD of the shell 
    8888        //[5] background        [cm-1] 
    … …  
    117117        f += vol*bes*contr 
    118118         
    119         // normalize to the particle volume and rescale from [-1] to [cm-1] 
     119        // normalize to the particle volume and rescale from [A-1] to [cm-1] 
    120120        //note that for the vesicle model, the volume is ONLY the shell volume 
    121121        vol = 4*pi/3*((rcore+thick)^3-rcore^3) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/NewModels_2006/Vesicle_UL_and_Struct.ipf

    r42 r379  
    1919        Variable num=256,qmin=0.001,qmax=0.7 
    2020        Prompt num "Enter number of data points for model: " 
    21         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    22         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     21        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     22        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2323         
    2424        //make the normal model waves 
    … …  
    3131        Display/K=1 ywave_ves_HS vs xwave_ves_HS                                                         
    3232        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    33         Label bottom "q (\\S-1\\M)" 
     33        Label bottom "q (A\\S-1\\M)" 
    3434        Label left "Intensity (cm\\S-1\\M)"                                      
    3535 
    … …  
    5959        Display smeared_ves_HS vs smeared_qvals                                                                  
    6060        ModifyGraph log=1,marker=29,msize=2,mode=4 
    61         Label bottom "q (\\S-1\\M)" 
     61        Label bottom "q (A\\S-1\\M)" 
    6262        Label left "Intensity (cm\\S-1\\M)" 
    6363 
    … …  
    110110        Variable num=256,qmin=0.001,qmax=0.7 
    111111        Prompt num "Enter number of data points for model: " 
    112         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    113         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     112        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     113        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    114114         
    115115        /// 
    … …  
    125125        Display/K=1 ywave_ves_SW vs xwave_ves_SW                                                         
    126126        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    127         Label bottom "q (\\S-1\\M)" 
     127        Label bottom "q (A\\S-1\\M)" 
    128128        Label left "Intensity (cm\\S-1\\M)"                                      
    129129 
    … …  
    153153        Display smeared_ves_SW vs smeared_qvals                                                                  
    154154        ModifyGraph log=1,marker=29,msize=2,mode=4 
    155         Label bottom "q (\\S-1\\M)" 
     155        Label bottom "q (A\\S-1\\M)" 
    156156        Label left "Intensity (cm\\S-1\\M)" 
    157157 
    … …  
    206206        Variable num=256,qmin=0.001,qmax=0.7 
    207207        Prompt num "Enter number of data points for model: " 
    208         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    209         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     208        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     209        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    210210         
    211211        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    225225        Display/K=1 ywave_ves_SC vs xwave_ves_SC                                                         
    226226        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    227         Label bottom "q (\\S-1\\M)" 
     227        Label bottom "q (A\\S-1\\M)" 
    228228        Label left "Intensity (cm\\S-1\\M)"                                      
    229229 
    … …  
    260260        Display smeared_ves_SC vs smeared_qvals                                                                  
    261261        ModifyGraph log=1,marker=29,msize=2,mode=4 
    262         Label bottom "q (\\S-1\\M)" 
     262        Label bottom "q (A\\S-1\\M)" 
    263263        Label left "Intensity (cm\\S-1\\M)" 
    264264 
    … …  
    316316        Variable num=256,qmin=0.001,qmax=0.7 
    317317        Prompt num "Enter number of data points for model: " 
    318         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    319         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     318        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     319        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    320320         
    321321        /// 
    … …  
    331331        Display/K=1 ywave_ves_SHS vs xwave_ves_SHS                                                       
    332332        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    333         Label bottom "q (\\S-1\\M)" 
     333        Label bottom "q (A\\S-1\\M)" 
    334334        Label left "Intensity (cm\\S-1\\M)"                                      
    335335 
    … …  
    359359        Display smeared_ves_SHS vs smeared_qvals                                                                         
    360360        ModifyGraph log=1,marker=29,msize=2,mode=4 
    361         Label bottom "q (\\S-1\\M)" 
     361        Label bottom "q (A\\S-1\\M)" 
    362362        Label left "Intensity (cm\\S-1\\M)" 
    363363 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/OblateCS_and_Struct.ipf

    r42 r379  
    1414        Variable num=128,qmin=0.001,qmax=0.7 
    1515        Prompt num "Enter number of data points for model: " 
    16         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    17         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     16        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     17        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1818         
    1919        Make/O/D/n=(num) xwave_OEF_HS,ywave_OEF_HS 
    … …  
    2525        Display ywave_OEF_HS vs xwave_OEF_HS 
    2626        ModifyGraph log=1,marker=29,msize=2,mode=4 
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Intensity (cm\\S-1\\M)" 
    2929 
    … …  
    5353        Display smeared_OEF_HS vs smeared_qvals                                                                  
    5454        ModifyGraph log=1,marker=29,msize=2,mode=4 
    55         Label bottom "q (\\S-1\\M)" 
     55        Label bottom "q (A\\S-1\\M)" 
    5656        Label left "Intensity (cm\\S-1\\M)" 
    5757 
    … …  
    9898        Variable num=128,qmin=0.001,qmax=0.7 
    9999        Prompt num "Enter number of data points for model: " 
    100         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    101         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     100        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     101        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    102102         
    103103        Make/O/D/n=(num) xwave_OEF_SW,ywave_OEF_SW 
    … …  
    109109        Display ywave_OEF_SW vs xwave_OEF_SW 
    110110        ModifyGraph log=1,marker=29,msize=2,mode=4 
    111         Label bottom "q (\\S-1\\M)" 
     111        Label bottom "q (A\\S-1\\M)" 
    112112        Label left "Intensity (cm\\S-1\\M)" 
    113113 
    … …  
    137137        Display smeared_OEF_SW vs smeared_qvals                                                                  
    138138        ModifyGraph log=1,marker=29,msize=2,mode=4 
    139         Label bottom "q (\\S-1\\M)" 
     139        Label bottom "q (A\\S-1\\M)" 
    140140        Label left "Intensity (cm\\S-1\\M)" 
    141141 
    … …  
    184184        Variable num=128,qmin=0.001,qmax=0.7 
    185185        Prompt num "Enter number of data points for model: " 
    186         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    187         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     186        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     187        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    188188         
    189189        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    202202        Display ywave_OEF_SC vs xwave_OEF_SC 
    203203        ModifyGraph log=1,marker=29,msize=2,mode=4 
    204         Label bottom "q (\\S-1\\M)" 
     204        Label bottom "q (A\\S-1\\M)" 
    205205        Label left "Intensity (cm\\S-1\\M)" 
    206206 
    … …  
    237237        Display smeared_OEF_SC vs smeared_qvals                                                                  
    238238        ModifyGraph log=1,marker=29,msize=2,mode=4 
    239         Label bottom "q (\\S-1\\M)" 
     239        Label bottom "q (A\\S-1\\M)" 
    240240        Label left "Intensity (cm\\S-1\\M)" 
    241241 
    … …  
    287287        Variable num=128,qmin=0.001,qmax=0.7 
    288288        Prompt num "Enter number of data points for model: " 
    289         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    290         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     289        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     290        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    291291         
    292292        Make/O/D/n=(num) xwave_OEF_SHS,ywave_OEF_SHS 
    … …  
    298298        Display ywave_OEF_SHS vs xwave_OEF_SHS 
    299299        ModifyGraph log=1,marker=29,msize=2,mode=4 
    300         Label bottom "q (\\S-1\\M)" 
     300        Label bottom "q (A\\S-1\\M)" 
    301301        Label left "Intensity (cm\\S-1\\M)" 
    302302 
    … …  
    326326        Display smeared_OEF_SHS vs smeared_qvals                                                                         
    327327        ModifyGraph log=1,marker=29,msize=2,mode=4 
    328         Label bottom "q (\\S-1\\M)" 
     328        Label bottom "q (A\\S-1\\M)" 
    329329        Label left "Intensity (cm\\S-1\\M)" 
    330330 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/OblateForm.ipf

    r42 r379  
    1414        Variable num=128,qmin=0.001,qmax=0.7 
    1515        Prompt num "Enter number of data points for model: " 
    16         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    17         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     16        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     17        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1818         
    1919        Make/O/D/n=(num) xwave_oef,ywave_oef 
    … …  
    2525        Display ywave_oef vs xwave_oef 
    2626        ModifyGraph log=1,marker=29,msize=2,mode=4 
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Intensity (cm\\S-1\\M)" 
    2929        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5353        Display smeared_oef vs smeared_qvals 
    5454        ModifyGraph log=1,marker=29,msize=2,mode=4 
    55         Label bottom "q (\\S-1\\M)" 
     55        Label bottom "q (A\\S-1\\M)" 
    5656        Label left "Intensity (cm\\S-1\\M)" 
    5757        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6767//The input variables are (and output) 
    6868        //[0] scale 
    69         //[1] crmaj, major radius of core       [] 
     69        //[1] crmaj, major radius of core       [A] 
    7070        //[2] crmin, minor radius of core 
    7171        //[3] trmaj, overall major radius 
    7272        //[4] trmin, overall minor radius 
    73         //[5] delpc, SLD difference (core-shell) [-2] 
     73        //[5] delpc, SLD difference (core-shell) [A-2] 
    7474        //[6] delps, SLD difference (shell-solvent) 
    7575        //[7] bkg, [cm-1] 
    … …  
    159159      answer /= oblatevol 
    160160       
    161       //convert answer [-1] to [cm-1] 
     161      //convert answer [A-1] to [cm-1] 
    162162      answer *= 1.0e8   
    163163      //scale 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Packages/Invariant/Invariant.ipf

    r50 r379  
    4949        inv = 2*pi*pi*delta_rho*delta_rho*phi*(1-phi)*1e8 
    5050         
    51         Printf "The model invariant is %g ^-3 cm^-1\r\r",inv 
     51        Printf "The model invariant is %g A^-3 cm^-1\r\r",inv 
    5252End 
    5353 
    … …  
    6565        invar = areaXY(qw,integrand,qw[0],qw[num-1]) 
    6666         
    67         return(invar)           //units of ^-3 cm^-1 
     67        return(invar)           //units of A^-3 cm^-1 
    6868End 
    6969 
    … …  
    8585        invar *= dQv            //correct for the effects of slit-smearing 
    8686                 
    87         return(invar)           //units of ^-3 cm^-1 
     87        return(invar)           //units of A^-3 cm^-1 
    8888End 
    8989 
    … …  
    140140         
    141141        Printf "I(q=0) = %g (1/cm)\r",G_coef[0] 
    142         Printf "Rg = %g ()\r",sqrt(-3*G_coef[1]) 
     142        Printf "Rg = %g (A)\r",sqrt(-3*G_coef[1]) 
    143143         
    144144        Make/O/D P_coef={0,1,-4}                        //input 
    … …  
    191191        ModifyGraph standoff=0 
    192192        Label left "Intensity (1/cm)" 
    193         Label bottom "q (1/)" 
     193        Label bottom "q (1/A)" 
    194194        ModifyGraph rgb($NameofWave(iw))=(0,0,0) 
    195195        ModifyGraph opaque($NameofWave(iw))=1 
    … …  
    251251        DrawText 158,211,"Extrapolation" 
    252252        SetDrawEnv fstyle= 1 
    253         DrawText 58,349,"Units are [^-3 cm^-1]" 
     253        DrawText 58,349,"Units are [A^-3 cm^-1]" 
    254254        SetDrawEnv fstyle= 1 
    255255        DrawText 61,16,"Calculate the Invariant" 
    … …  
    338338         
    339339        num=numpnts(qw) 
    340         Printf "The invariant over the measured q-range %g to %g is %g ^-3 cm^-1\r\r",qw[0],qw[(num-1)],inv 
     340        Printf "The invariant over the measured q-range %g to %g is %g A^-3 cm^-1\r\r",qw[0],qw[(num-1)],inv 
    341341         
    342342        // update the global display on the panel (there is a dependency for the total) 
    … …  
    384384                 
    385385                Printf "I(q=0) = %g (1/cm)\r",G_coef[0] 
    386                 Printf "Rg = %g ()\r",sqrt(-3*G_coef[1]) 
     386                Printf "Rg = %g (A)\r",sqrt(-3*G_coef[1]) 
    387387        else 
    388388                //do a power-law fit instead 
    … …  
    406406         
    407407        nume=numpnts(extr_lqq) 
    408         Printf "The invariant over the q-range %g to %g is %g ^-3 cm^-1\r\r",extr_lqq[0],extr_lqq[(nume-1)],inv 
     408        Printf "The invariant over the q-range %g to %g is %g A^-3 cm^-1\r\r",extr_lqq[0],extr_lqq[(nume-1)],inv 
    409409         
    410410        // update the global display on the panel (there is a dependency for the total) 
    … …  
    456456 
    457457        nume=numpnts(extr_hqq) 
    458         Printf "The invariant over the q-range %g to %g is %g ^-3 cm^-1\r\r",extr_hqq[0],extr_hqq[(nume-1)],inv 
     458        Printf "The invariant over the q-range %g to %g is %g A^-3 cm^-1\r\r",extr_hqq[0],extr_hqq[(nume-1)],inv 
    459459         
    460460        // update the global display on the panel (there is a dependency for the total) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Packages/LinearizedFits/LinearizedFits.ipf

    r42 r379  
    379379                Duplicate/o xw xAxisWave 
    380380                If (cmpstr("q",S_Value) == 0)    
    381                         SetScale d 0,0,"^-1",xAxisWave 
     381                        SetScale d 0,0,"A^-1",xAxisWave 
    382382                        xAxisWave = xw 
    383383                        xlabel = "q" 
    … …  
    387387                endif 
    388388                If (cmpstr("q^2",S_Value) == 0)  
    389                         SetScale d 0,0,"^-2",xAxisWave 
     389                        SetScale d 0,0,"A^-2",xAxisWave 
    390390                        xAxisWave = xw*xw 
    391391                        xlabel = "q^2" 
    … …  
    558558                                rg = sqrt(-3*W_coef[1]) 
    559559                                rgerr = 3*W_sigma[1]/(2*rg) 
    560                                 textstr_3 += "\rRg () = " + num2str(rg) + " ± " + num2str(rgerr) 
     560                                textstr_3 += "\rRg (A) = " + num2str(rg) + " ± " + num2str(rgerr) 
    561561                                textstr_3 += "\r" + num2str(rg*minfit) + " < Rg*q < " + num2str(rg*maxfit) 
    562562                                break 
    … …  
    596596                                rg = 4*sqrt(-W_coef[1]) 
    597597                                rgerr = 8*W_sigma[1]/rg 
    598                                 textstr_3 = "Rod diameter () = " + num2str(rg) + " ± " + num2str(rgerr) 
     598                                textstr_3 = "Rod diameter (A) = " + num2str(rg) + " ± " + num2str(rgerr) 
    599599                                textstr_3 += "\r" + num2str(rg*minfit) + " < Rg*q < " + num2str(rg*maxfit) 
    600600                                break 
    … …  
    608608                                rg = sqrt(-12*W_coef[1]) 
    609609                                rgerr = 6*W_sigma[1]/(2*rg) 
    610                                 textstr_3 = "Platelet thickness () = " + num2str(rg) + " ± " + num2str(rgerr) 
     610                                textstr_3 = "Platelet thickness (A) = " + num2str(rg) + " ± " + num2str(rgerr) 
    611611                                textstr_3 += "\r" + num2str(rg*minfit) + " < Rg*q < " + num2str(rg*maxfit) 
    612612                                break 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Packages/SumModel/SumSANSModels.ipf

    r42 r379  
    123123        Variable num=128,qmin=0.001,qmax=0.7 
    124124        Prompt num "Enter number of data points for model: " 
    125         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    126         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     125        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     126        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    127127         
    128128        Make/O/D/n=(num) xwave_sum,ywave_sum                                     
    … …  
    168168        Display ywave_sum vs xwave_sum                                                   
    169169        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    170         Label bottom "q (\\S-1\\M)" 
     170        Label bottom "q (A\\S-1\\M)" 
    171171        Label left "Intensity (cm\\S-1\\M)" 
    172172        Legend                                   
    … …  
    228228        Display smeared_sum vs $gQvals                                                                   
    229229        ModifyGraph log=1,marker=29,msize=2,mode=4 
    230         Label bottom "q (\\S-1\\M)" 
     230        Label bottom "q (A\\S-1\\M)" 
    231231        Label left "Intensity (cm\\S-1\\M)" 
    232232        Legend 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Peak_Gauss_model.ipf

    r42 r379  
    66        Variable num=512, qmin=.001, qmax=.7 
    77        Prompt num "Enter number of data points for model: " 
    8         Prompt qmin "Enter minimum q-value (^1) for model: "  
    9          Prompt qmax "Enter maximum q-value (^1) for model: " 
     8        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     9         Prompt qmax "Enter maximum q-value (A^1) for model: " 
    1010// 
    1111        Make/O/D/n=(num) xwave_Peak_Gauss, ywave_Peak_Gauss 
    1212        xwave_Peak_Gauss =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    1313        Make/O/D coef_Peak_Gauss = {100.0, 0.05,0.005, 1.0} 
    14         make/o/t parameters_Peak_Gauss = {"Scale Factor, I0 ", "Peak position (^-1)", "Std Dev (^-1)","Incoherent Bgd (cm-1)"} 
     14        make/o/t parameters_Peak_Gauss = {"Scale Factor, I0 ", "Peak position (A^-1)", "Std Dev (A^-1)","Incoherent Bgd (cm-1)"} 
    1515        Edit parameters_Peak_Gauss, coef_Peak_Gauss 
    1616        ywave_Peak_Gauss  := Peak_Gauss_Model(coef_Peak_Gauss, xwave_Peak_Gauss) 
    … …  
    1818        ModifyGraph marker=29, msize=2, mode=4 
    1919        ModifyGraph log(left)=1 
    20         Label bottom "q (\\S-1\\M) " 
     20        Label bottom "q (A\\S-1\\M) " 
    2121        Label left "Peak - Gauss (cm\\S-1\\M)" 
    2222        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    3535        // Setup parameter table for model function 
    3636        Make/O/D smear_coef_Peak_Gauss = {100.0, 0.05,0.005, 1.0} 
    37         make/o/t smear_parameters_Peak_Gauss = {"Scale Factor, I0 ", "Peak position (^-1)", "Std Dev (^-1)","Incoherent Bgd (cm-1)"} 
     37        make/o/t smear_parameters_Peak_Gauss = {"Scale Factor, I0 ", "Peak position (A^-1)", "Std Dev (A^-1)","Incoherent Bgd (cm-1)"} 
    3838        Edit smear_parameters_Peak_Gauss,smear_coef_Peak_Gauss                                  //display parameters in a table 
    3939         
    … …  
    4646        Display smeared_Peak_Gauss vs smeared_qvals                                                                     // 
    4747        ModifyGraph log=1,marker=29,msize=2,mode=4 
    48         Label bottom "q (\\S-1\\M)" 
     48        Label bottom "q (A\\S-1\\M)" 
    4949        Label left "Peak_Gauss Model (cm\\S-1\\M)" 
    5050        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Peak_Lorentz_model.ipf

    r42 r379  
    66        Variable num=512, qmin=.001, qmax=.7 
    77        Prompt num "Enter number of data points for model: " 
    8         Prompt qmin "Enter minimum q-value (^1) for model: "  
    9          Prompt qmax "Enter maximum q-value (^1) for model: " 
     8        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     9         Prompt qmax "Enter maximum q-value (A^1) for model: " 
    1010// 
    1111        Make/O/D/n=(num) xwave_Peak_Lorentz, ywave_Peak_Lorentz 
    1212        xwave_Peak_Lorentz =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    1313        Make/O/D coef_Peak_Lorentz = {100.0, 0.05,0.005, 1.0} 
    14         make/o/t parameters_Peak_Lorentz = {"Scale Factor, I0 ", "Peak position (^-1)", "Peak hwhm (^-1)","Incoherent Bgd (cm-1)"} 
     14        make/o/t parameters_Peak_Lorentz = {"Scale Factor, I0 ", "Peak position (A^-1)", "Peak hwhm (A^-1)","Incoherent Bgd (cm-1)"} 
    1515        Edit parameters_Peak_Lorentz, coef_Peak_Lorentz 
    1616        ywave_Peak_Lorentz  := Peak_Lorentz_Model(coef_Peak_Lorentz, xwave_Peak_Lorentz) 
    … …  
    1818        ModifyGraph marker=29, msize=2, mode=4 
    1919        ModifyGraph log(left)=1 
    20         Label bottom "q (\\S-1\\M) " 
     20        Label bottom "q (A\\S-1\\M) " 
    2121        Label left "Peak - Lorentzian (cm\\S-1\\M)" 
    2222        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    3535        // Setup parameter table for model function 
    3636        Make/O/D smear_coef_Peak_Lorentz = {100.0, 0.05,0.005, 1.0} 
    37         make/o/t smear_parameters_Peak_Lorentz = {"Scale Factor, I0 ", "Peak position (^-1)", "Peak hwhm (^-1)","Incoherent Bgd (cm-1)"} 
     37        make/o/t smear_parameters_Peak_Lorentz = {"Scale Factor, I0 ", "Peak position (A^-1)", "Peak hwhm (A^-1)","Incoherent Bgd (cm-1)"} 
    3838        Edit smear_parameters_Peak_Lorentz,smear_coef_Peak_Lorentz                                      //display parameters in a table 
    3939         
    … …  
    4646        Display smeared_Peak_Lorentz vs smeared_qvals                                                                   // 
    4747        ModifyGraph log=1,marker=29,msize=2,mode=4 
    48         Label bottom "q (\\S-1\\M)" 
     48        Label bottom "q (A\\S-1\\M)" 
    4949        Label left "Peak_Lorentz Model (cm\\S-1\\M)" 
    5050        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/PolyCSRatio_and_Struct.ipf

    r42 r379  
    1313        Variable num=256,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_PCR_HS,ywave_PCR_HS 
    … …  
    2424        Display/K=1 ywave_PCR_HS vs xwave_PCR_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828 
    … …  
    5252        Display smeared_PCR_HS vs smeared_qvals                                                                  
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656 
    … …  
    106106        Variable num=256,qmin=0.001,qmax=0.7 
    107107        Prompt num "Enter number of data points for model: " 
    108         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    109         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     108        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     109        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    110110         
    111111        Make/O/D/n=(num) xwave_PCR_SW,ywave_PCR_SW 
    … …  
    117117        Display/K=1 ywave_PCR_SW vs xwave_PCR_SW 
    118118        ModifyGraph log=1,marker=29,msize=2,mode=4 
    119         Label bottom "q (\\S-1\\M)" 
     119        Label bottom "q (A\\S-1\\M)" 
    120120        Label left "Intensity (cm\\S-1\\M)" 
    121121 
    … …  
    145145        Display smeared_PCR_SW vs smeared_qvals                                                                  
    146146        ModifyGraph log=1,marker=29,msize=2,mode=4 
    147         Label bottom "q (\\S-1\\M)" 
     147        Label bottom "q (A\\S-1\\M)" 
    148148        Label left "Intensity (cm\\S-1\\M)" 
    149149 
    … …  
    202202        Variable num=256,qmin=0.001,qmax=0.7 
    203203        Prompt num "Enter number of data points for model: " 
    204         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    205         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     204        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     205        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    206206         
    207207        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    220220        Display/K=1 ywave_PCR_SC vs xwave_PCR_SC 
    221221        ModifyGraph log=1,marker=29,msize=2,mode=4 
    222         Label bottom "q (\\S-1\\M)" 
     222        Label bottom "q (A\\S-1\\M)" 
    223223        Label left "Intensity (cm\\S-1\\M)" 
    224224 
    … …  
    255255        Display smeared_PCR_SC vs smeared_qvals                                                                  
    256256        ModifyGraph log=1,marker=29,msize=2,mode=4 
    257         Label bottom "q (\\S-1\\M)" 
     257        Label bottom "q (A\\S-1\\M)" 
    258258        Label left "Intensity (cm\\S-1\\M)" 
    259259 
    … …  
    313313        Variable num=256,qmin=0.001,qmax=0.7 
    314314        Prompt num "Enter number of data points for model: " 
    315         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    316         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     315        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     316        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    317317         
    318318        Make/O/D/n=(num) xwave_PCR_SHS,ywave_PCR_SHS 
    … …  
    324324        Display/K=1 ywave_PCR_SHS vs xwave_PCR_SHS 
    325325        ModifyGraph log=1,marker=29,msize=2,mode=4 
    326         Label bottom "q (\\S-1\\M)" 
     326        Label bottom "q (A\\S-1\\M)" 
    327327        Label left "Intensity (cm\\S-1\\M)" 
    328328 
    … …  
    352352        Display smeared_PCR_SHS vs smeared_qvals                                                                         
    353353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    354         Label bottom "q (\\S-1\\M)" 
     354        Label bottom "q (A\\S-1\\M)" 
    355355        Label left "Intensity (cm\\S-1\\M)" 
    356356 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/PolyCore.ipf

    r50 r379  
    1717        Variable num=256,qmin=0.001,qmax=0.7 
    1818        Prompt num "Enter number of data points for model: " 
    19         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    20         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     19        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     20        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2121         
    2222        Make/O/D/n=(num) xwave_pcf,ywave_pcf 
    … …  
    2929        Display ywave_pcf vs xwave_pcf 
    3030        ModifyGraph log=1,marker=29,msize=2,mode=4 
    31         Label bottom "q (\\S-1\\M)" 
     31        Label bottom "q (A\\S-1\\M)" 
    3232        Label left "Intensity (cm\\S-1\\M)" 
    3333        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5858        Display smeared_pcf vs smeared_qvals 
    5959        ModifyGraph log=1,marker=29,msize=2,mode=4 
    60         Label bottom "q (\\S-1\\M)" 
     60        Label bottom "q (A\\S-1\\M)" 
    6161        Label left "Intensity (cm\\S-1\\M)" 
    6262        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    7979// input parameters are 
    8080        //[0] scale 
    81         //[1] average core radius       [] 
     81        //[1] average core radius       [A] 
    8282        //[2] polydispersity of core (0<sig<1) 
    83         //[3] shell thickness   [] 
    84         //[4] SLD core          [-2] 
     83        //[3] shell thickness   [A] 
     84        //[4] SLD core          [A-2] 
    8585        //[5] SLD shell 
    8686        //[6] SLD solvent 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/PolyCoreShellRatio.ipf

    r42 r379  
    1616        Variable num=128,qmin=0.001,qmax=0.7 
    1717        Prompt num "Enter number of data points for model: " 
    18         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    19         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     18        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     19        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2020         
    2121        Make/O/D/n=(num) xwave_pcr,ywave_pcr 
    … …  
    2727        Display ywave_pcr vs xwave_pcr 
    2828        ModifyGraph log=1,marker=29,msize=2,mode=4 
    29         Label bottom "q (\\S-1\\M)" 
     29        Label bottom "q (A\\S-1\\M)" 
    3030        Label left "Intensity (cm\\S-1\\M)" 
    3131        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5656        Display smeared_pcr vs smeared_qvals 
    5757        ModifyGraph log=1,marker=29,msize=2,mode=4 
    58         Label bottom "q (\\S-1\\M)" 
     58        Label bottom "q (A\\S-1\\M)" 
    5959        Label left "Intensity (cm\\S-1\\M)" 
    6060        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    8585        //assign nice names to the input wave 
    8686        //w[0] = scale 
    87         //w[1] = core radius [] 
    88         //w[2] = shell thickness [] 
     87        //w[1] = core radius [A] 
     88        //w[2] = shell thickness [A] 
    8989        //w[3] = polydispersity index (0<p<1) 
    90         //w[4] = SLD core [^-2] 
    91         //w[5] = SLD shell  [^-2] 
    92         //w[6] = SLD solvent [^-2] 
     90        //w[4] = SLD core [A^-2] 
     91        //w[5] = SLD shell  [A^-2] 
     92        //w[6] = SLD solvent [A^-2] 
    9393        //w[7] = bkg [cm-1] 
    9494        Variable scale,corrad,thick,shlrad,pp,drho1,drho2,sig,zz,bkg 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/PolyCore_and_Struct.ipf

    r42 r379  
    1313        Variable num=256,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_PCF_HS,ywave_PCF_HS 
    … …  
    2424        Display/K=1 ywave_PCF_HS vs xwave_PCF_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828 
    … …  
    5252        Display smeared_PCF_HS vs smeared_qvals                                                                  
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656 
    … …  
    107107        Variable num=256,qmin=0.001,qmax=0.7 
    108108        Prompt num "Enter number of data points for model: " 
    109         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    110         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     109        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     110        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    111111         
    112112        Make/O/D/n=(num) xwave_PCF_SW,ywave_PCF_SW 
    … …  
    118118        Display/K=1 ywave_PCF_SW vs xwave_PCF_SW 
    119119        ModifyGraph log=1,marker=29,msize=2,mode=4 
    120         Label bottom "q (\\S-1\\M)" 
     120        Label bottom "q (A\\S-1\\M)" 
    121121        Label left "Intensity (cm\\S-1\\M)" 
    122122 
    … …  
    146146        Display smeared_PCF_SW vs smeared_qvals                                                                  
    147147        ModifyGraph log=1,marker=29,msize=2,mode=4 
    148         Label bottom "q (\\S-1\\M)" 
     148        Label bottom "q (A\\S-1\\M)" 
    149149        Label left "Intensity (cm\\S-1\\M)" 
    150150 
    … …  
    203203        Variable num=256,qmin=0.001,qmax=0.7 
    204204        Prompt num "Enter number of data points for model: " 
    205         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    206         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     205        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     206        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    207207         
    208208        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    221221        Display/K=1 ywave_PCF_SC vs xwave_PCF_SC 
    222222        ModifyGraph log=1,marker=29,msize=2,mode=4 
    223         Label bottom "q (\\S-1\\M)" 
     223        Label bottom "q (A\\S-1\\M)" 
    224224        Label left "Intensity (cm\\S-1\\M)" 
    225225 
    … …  
    256256        Display smeared_PCF_SC vs smeared_qvals                                                                  
    257257        ModifyGraph log=1,marker=29,msize=2,mode=4 
    258         Label bottom "q (\\S-1\\M)" 
     258        Label bottom "q (A\\S-1\\M)" 
    259259        Label left "Intensity (cm\\S-1\\M)" 
    260260 
    … …  
    314314        Variable num=256,qmin=0.001,qmax=0.7 
    315315        Prompt num "Enter number of data points for model: " 
    316         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    317         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     316        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     317        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    318318         
    319319        Make/O/D/n=(num) xwave_PCF_SHS,ywave_PCF_SHS 
    … …  
    325325        Display/K=1 ywave_PCF_SHS vs xwave_PCF_SHS 
    326326        ModifyGraph log=1,marker=29,msize=2,mode=4 
    327         Label bottom "q (\\S-1\\M)" 
     327        Label bottom "q (A\\S-1\\M)" 
    328328        Label left "Intensity (cm\\S-1\\M)" 
    329329 
    … …  
    353353        Display smeared_PCF_SHS vs smeared_qvals                                                                         
    354354        ModifyGraph log=1,marker=29,msize=2,mode=4 
    355         Label bottom "q (\\S-1\\M)" 
     355        Label bottom "q (A\\S-1\\M)" 
    356356        Label left "Intensity (cm\\S-1\\M)" 
    357357 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/PolyHardSphereInten.ipf

    r42 r379  
    1515        Variable num=128,qmin=0.001,qmax=0.7 
    1616        Prompt num "Enter number of data points for model: " 
    17         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    18         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     17        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     18        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1919         
    2020        Make/O/D/n=(num) xwave_phs,ywave_phs 
    … …  
    2626        Display ywave_phs vs xwave_phs 
    2727        ModifyGraph log=1,marker=29,msize=2,mode=4 
    28         Label bottom "q (\\S-1\\M)" 
     28        Label bottom "q (A\\S-1\\M)" 
    2929        Label left "Intensity (cm\\S-1\\M)" 
    3030        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5555        Display smeared_phs vs smeared_qvals 
    5656        ModifyGraph log=1,marker=29,msize=2,mode=4 
    57         Label bottom "q (\\S-1\\M)" 
     57        Label bottom "q (A\\S-1\\M)" 
    5858        Label left "Intensity (cm\\S-1\\M)" 
    5959        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/PolyRectSphere_and_Struct.ipf

    r42 r379  
    1313        Variable num=256,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_RECT_HS,ywave_RECT_HS 
    … …  
    2424        Display/K=1 ywave_RECT_HS vs xwave_RECT_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828 
    … …  
    5252        Display smeared_RECT_HS vs smeared_qvals                                                                         
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656 
    … …  
    102102        Variable num=256,qmin=0.001,qmax=0.7 
    103103        Prompt num "Enter number of data points for model: " 
    104         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    105         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     104        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     105        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    106106         
    107107        Make/O/D/n=(num) xwave_RECT_SW,ywave_RECT_SW 
    … …  
    113113        Display/K=1 ywave_RECT_SW vs xwave_RECT_SW 
    114114        ModifyGraph log=1,marker=29,msize=2,mode=4 
    115         Label bottom "q (\\S-1\\M)" 
     115        Label bottom "q (A\\S-1\\M)" 
    116116        Label left "Intensity (cm\\S-1\\M)" 
    117117 
    … …  
    141141        Display smeared_RECT_SW vs smeared_qvals                                                                         
    142142        ModifyGraph log=1,marker=29,msize=2,mode=4 
    143         Label bottom "q (\\S-1\\M)" 
     143        Label bottom "q (A\\S-1\\M)" 
    144144        Label left "Intensity (cm\\S-1\\M)" 
    145145 
    … …  
    194194        Variable num=256,qmin=0.001,qmax=0.7 
    195195        Prompt num "Enter number of data points for model: " 
    196         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    197         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     196        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     197        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    198198         
    199199        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    212212        Display/K=1 ywave_RECT_SC vs xwave_RECT_SC 
    213213        ModifyGraph log=1,marker=29,msize=2,mode=4 
    214         Label bottom "q (\\S-1\\M)" 
     214        Label bottom "q (A\\S-1\\M)" 
    215215        Label left "Intensity (cm\\S-1\\M)" 
    216216 
    … …  
    247247        Display smeared_RECT_SC vs smeared_qvals                                                                         
    248248        ModifyGraph log=1,marker=29,msize=2,mode=4 
    249         Label bottom "q (\\S-1\\M)" 
     249        Label bottom "q (A\\S-1\\M)" 
    250250        Label left "Intensity (cm\\S-1\\M)" 
    251251 
    … …  
    301301        Variable num=256,qmin=0.001,qmax=0.7 
    302302        Prompt num "Enter number of data points for model: " 
    303         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    304         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     303        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     304        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    305305         
    306306        Make/O/D/n=(num) xwave_RECT_SHS,ywave_RECT_SHS 
    … …  
    312312        Display/K=1 ywave_RECT_SHS vs xwave_RECT_SHS 
    313313        ModifyGraph log=1,marker=29,msize=2,mode=4 
    314         Label bottom "q (\\S-1\\M)" 
     314        Label bottom "q (A\\S-1\\M)" 
    315315        Label left "Intensity (cm\\S-1\\M)" 
    316316 
    … …  
    340340        Display smeared_RECT_SHS vs smeared_qvals                                                                        
    341341        ModifyGraph log=1,marker=29,msize=2,mode=4 
    342         Label bottom "q (\\S-1\\M)" 
     342        Label bottom "q (A\\S-1\\M)" 
    343343        Label left "Intensity (cm\\S-1\\M)" 
    344344 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Power_Law_model.ipf

    r42 r379  
    66        Variable num=512, qmin=.001, qmax=.2 
    77        Prompt num "Enter number of data points for model: " 
    8         Prompt qmin "Enter minimum q-value (^1) for model: "  
    9          Prompt qmax "Enter maximum q-value (^1) for model: " 
     8        Prompt qmin "Enter minimum q-value (A^1) for model: "  
     9         Prompt qmax "Enter maximum q-value (A^1) for model: " 
    1010// 
    1111        Make/O/D/n=(num) xwave_Power_Law, ywave_Power_Law 
    … …  
    1919        ModifyGraph log(left)=1 
    2020        ModifyGraph log(bottom)=1 
    21         Label bottom "q (\\S-1\\M) " 
     21        Label bottom "q (A\\S-1\\M) " 
    2222        Label left "Power-Law (cm\\S-1\\M)" 
    2323        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4747        Display smeared_Power_Law vs smeared_qvals                                                                      // 
    4848        ModifyGraph log=1,marker=29,msize=2,mode=4 
    49         Label bottom "q (\\S-1\\M)" 
     49        Label bottom "q (A\\S-1\\M)" 
    5050        Label left "Power_Law (cm\\S-1\\M)" 
    5151        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/ProlateCS_and_Struct.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_PEF_HS,ywave_PEF_HS 
    … …  
    2424        Display ywave_PEF_HS vs xwave_PEF_HS 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828 
    … …  
    5252        Display smeared_PEF_HS vs smeared_qvals                                                                  
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656 
    … …  
    9797        Variable num=128,qmin=0.001,qmax=0.7 
    9898        Prompt num "Enter number of data points for model: " 
    99         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    100         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     99        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     100        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    101101         
    102102        Make/O/D/n=(num) xwave_PEF_SW,ywave_PEF_SW 
    … …  
    108108        Display ywave_PEF_SW vs xwave_PEF_SW 
    109109        ModifyGraph log=1,marker=29,msize=2,mode=4 
    110         Label bottom "q (\\S-1\\M)" 
     110        Label bottom "q (A\\S-1\\M)" 
    111111        Label left "Intensity (cm\\S-1\\M)" 
    112112 
    … …  
    136136        Display smeared_PEF_SW vs smeared_qvals                                                                  
    137137        ModifyGraph log=1,marker=29,msize=2,mode=4 
    138         Label bottom "q (\\S-1\\M)" 
     138        Label bottom "q (A\\S-1\\M)" 
    139139        Label left "Intensity (cm\\S-1\\M)" 
    140140 
    … …  
    183183        Variable num=128,qmin=0.001,qmax=0.7 
    184184        Prompt num "Enter number of data points for model: " 
    185         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    186         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     185        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     186        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    187187         
    188188        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    201201        Display ywave_PEF_SC vs xwave_PEF_SC 
    202202        ModifyGraph log=1,marker=29,msize=2,mode=4 
    203         Label bottom "q (\\S-1\\M)" 
     203        Label bottom "q (A\\S-1\\M)" 
    204204        Label left "Intensity (cm\\S-1\\M)" 
    205205 
    … …  
    236236        Display smeared_PEF_SC vs smeared_qvals                                                                  
    237237        ModifyGraph log=1,marker=29,msize=2,mode=4 
    238         Label bottom "q (\\S-1\\M)" 
     238        Label bottom "q (A\\S-1\\M)" 
    239239        Label left "Intensity (cm\\S-1\\M)" 
    240240 
    … …  
    286286        Variable num=128,qmin=0.001,qmax=0.7 
    287287        Prompt num "Enter number of data points for model: " 
    288         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    289         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     288        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     289        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    290290         
    291291        Make/O/D/n=(num) xwave_PEF_SHS,ywave_PEF_SHS 
    … …  
    297297        Display ywave_PEF_SHS vs xwave_PEF_SHS 
    298298        ModifyGraph log=1,marker=29,msize=2,mode=4 
    299         Label bottom "q (\\S-1\\M)" 
     299        Label bottom "q (A\\S-1\\M)" 
    300300        Label left "Intensity (cm\\S-1\\M)" 
    301301 
    … …  
    325325        Display smeared_PEF_SHS vs smeared_qvals                                                                         
    326326        ModifyGraph log=1,marker=29,msize=2,mode=4 
    327         Label bottom "q (\\S-1\\M)" 
     327        Label bottom "q (A\\S-1\\M)" 
    328328        Label left "Intensity (cm\\S-1\\M)" 
    329329 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/ProlateForm.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_pef,ywave_pef 
    … …  
    2424        Display ywave_pef vs xwave_pef 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5252        Display smeared_pef vs smeared_qvals 
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6666//The input variables are (and output) 
    6767        //[0] scale 
    68         //[1] crmaj, major radius of core       [] 
     68        //[1] crmaj, major radius of core       [A] 
    6969        //[2] crmin, minor radius of core 
    7070        //[3] trmaj, overall major radius 
    7171        //[4] trmin, overall minor radius 
    72         //[5] delpc, SLD difference (core-shell)        [-2] 
     72        //[5] delpc, SLD difference (core-shell)        [A-2] 
    7373        //[6] delps, SLD difference (shell-solvent) 
    7474        //[7] bkg [cm-1] 
    … …  
    164164        answer /= prolatevol 
    165165         
    166         // rescale from 1/ to 1/cm 
     166        // rescale from 1/A to 1/cm 
    167167        answer *= 1.0e8 
    168168        //scale (arb) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/RectPolySpheres.ipf

    r42 r379  
    1515        Variable num=128,qmin=0.001,qmax=0.7 
    1616        Prompt num "Enter number of data points for model: " 
    17         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    18         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     17        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     18        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1919         
    2020        Make/O/D/n=(num) xwave_rect,ywave_rect 
    … …  
    2626        Display ywave_rect vs xwave_rect 
    2727        ModifyGraph log=1,marker=29,msize=2,mode=4 
    28         Label bottom "q (\\S-1\\M)" 
     28        Label bottom "q (A\\S-1\\M)" 
    2929        Label left "Intensity (cm\\S-1\\M)" 
    3030//      DoAlert 0,"The form facor is not properly normalized with the polydisperse volume" 
    … …  
    5757        Display smeared_rect vs smeared_qvals 
    5858        ModifyGraph log=1,marker=29,msize=2,mode=4 
    59         Label bottom "q (\\S-1\\M)" 
     59        Label bottom "q (A\\S-1\\M)" 
    6060        Label left "Intensity (cm\\S-1\\M)" 
    6161        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Sphere.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_sf,ywave_sf                                       
    1919        xwave_sf = alog(log(qmin) + x*((log(qmax)-log(qmin))/num))                                       
    2020        Make/O/D coef_sf = {1.,60,1e-6,0.01}                                             
    21         make/o/t parameters_sf = {"scale","Radius (A)","contrast (-2)","bkgd (cm-1)"}           
     21        make/o/t parameters_sf = {"scale","Radius (A)","contrast (A-2)","bkgd (cm-1)"}           
    2222        Edit parameters_sf,coef_sf                                                               
    2323        ywave_sf := SphereForm(coef_sf,xwave_sf)                         
    2424        Display ywave_sf vs xwave_sf                                                     
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)"                                      
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    4242        // Setup parameter table for model function 
    4343        Make/O/D smear_coef_sf = {1.,60,1e-6,0.0}                                        
    44         make/o/t smear_parameters_sf = {"scale","Radius (A)","contrast (-2)","bkgd (cm-1)"}             
     44        make/o/t smear_parameters_sf = {"scale","Radius (A)","contrast (A-2)","bkgd (cm-1)"}             
    4545        Edit smear_parameters_sf,smear_coef_sf                                   
    4646         
    … …  
    5353        Display smeared_sf vs smeared_qvals                                                                      
    5454        ModifyGraph log=1,marker=29,msize=2,mode=4 
    55         Label bottom "q (\\S-1\\M)" 
     55        Label bottom "q (A\\S-1\\M)" 
    5656        Label left "Intensity (cm\\S-1\\M)" 
    5757        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    6767        // variables are:                                                        
    6868        //[0] scale 
    69         //[1] radius () 
    70         //[2] delrho (-2) 
     69        //[1] radius (A) 
     70        //[2] delrho (A-2) 
    7171        //[3] background (cm-1) 
    7272         
    … …  
    9191        bes = 3*(sin(x*radius)-x*radius*cos(x*radius))/x^3/radius^3 
    9292        vol = 4*pi/3*radius^3 
    93         f = vol*bes*delrho              // [=]  
     93        f = vol*bes*delrho              // [=] A 
    9494        // normalize to single particle volume, convert to 1/cm 
    9595        f2 = f * f / vol * 1.0e8                // [=] 1/cm 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Sphere_and_Struct.ipf

    r42 r379  
    1313        Variable num=256,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        //make the normal model waves 
    … …  
    2020        xwave_S_HS =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num))                                    
    2121        Make/O/D coef_S_HS = {0.1,60,1e-6,0.01}                                          
    22         make/o/t parameters_S_HS = {"volume fraction","Radius (A)","contrast (-2)","bkgd (cm-1)"}               
     22        make/o/t parameters_S_HS = {"volume fraction","Radius (A)","contrast (A-2)","bkgd (cm-1)"}               
    2323        Edit/K=1 parameters_S_HS,coef_S_HS                                                               
    2424        ywave_S_HS := Sphere_HS(coef_S_HS,xwave_S_HS)                    
    2525        Display/K=1 ywave_S_HS vs xwave_S_HS                                                     
    2626        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Intensity (cm\\S-1\\M)"                                      
    2929 
    … …  
    4242        // Setup parameter table for model function 
    4343        Make/O/D smear_coef_S_HS = {0.1,60,1e-6,0.01}                                            
    44         make/o/t smear_parameters_S_HS = {"volume fraction","Radius (A)","contrast (-2)","bkgd (cm-1)"}                 
     44        make/o/t smear_parameters_S_HS = {"volume fraction","Radius (A)","contrast (A-2)","bkgd (cm-1)"}                 
    4545        Edit smear_parameters_S_HS,smear_coef_S_HS                                       
    4646         
    … …  
    5353        Display smeared_S_HS vs smeared_qvals                                                                    
    5454        ModifyGraph log=1,marker=29,msize=2,mode=4 
    55         Label bottom "q (\\S-1\\M)" 
     55        Label bottom "q (A\\S-1\\M)" 
    5656        Label left "Intensity (cm\\S-1\\M)" 
    5757 
    … …  
    9393        Variable num=256,qmin=0.001,qmax=0.7 
    9494        Prompt num "Enter number of data points for model: " 
    95         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    96         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     95        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     96        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    9797         
    9898        /// 
    … …  
    103103        xwave_S_SW =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num))                                    
    104104        Make/O/D coef_S_SW = {0.1,60,1e-6,1.0,1.2,0.01}                                          
    105         make/o/t parameters_S_SW = {"volume fraction","Radius (A)","contrast (-2)","well depth (kT)","well width (diam.)","bkgd (cm-1)"}                
     105        make/o/t parameters_S_SW = {"volume fraction","Radius (A)","contrast (A-2)","well depth (kT)","well width (diam.)","bkgd (cm-1)"}                
    106106        Edit/K=1 parameters_S_SW,coef_S_SW                                                               
    107107        ywave_S_SW := Sphere_SW(coef_S_SW,xwave_S_SW)                    
    108108        Display/K=1 ywave_S_SW vs xwave_S_SW                                                     
    109109        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    110         Label bottom "q (\\S-1\\M)" 
     110        Label bottom "q (A\\S-1\\M)" 
    111111        Label left "Intensity (cm\\S-1\\M)"                                      
    112112 
    … …  
    125125        // Setup parameter table for model function 
    126126        Make/O/D smear_coef_S_SW = {0.1,60,1e-6,1.0,1.2,0.01}                                            
    127         make/o/t smear_parameters_S_SW = {"volume fraction","Radius (A)","contrast (-2)","well depth (kT)","well width (diam.)","bkgd (cm-1)"}          
     127        make/o/t smear_parameters_S_SW = {"volume fraction","Radius (A)","contrast (A-2)","well depth (kT)","well width (diam.)","bkgd (cm-1)"}          
    128128        Edit smear_parameters_S_SW,smear_coef_S_SW                                       
    129129         
    … …  
    136136        Display smeared_S_SW vs smeared_qvals                                                                    
    137137        ModifyGraph log=1,marker=29,msize=2,mode=4 
    138         Label bottom "q (\\S-1\\M)" 
     138        Label bottom "q (A\\S-1\\M)" 
    139139        Label left "Intensity (cm\\S-1\\M)" 
    140140 
    … …  
    178178        Variable num=256,qmin=0.001,qmax=0.7 
    179179        Prompt num "Enter number of data points for model: " 
    180         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    181         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     180        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     181        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    182182         
    183183        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    192192        xwave_S_SC =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num))                            
    193193        Make/O/D coef_S_SC = {0.2,50,3e-6,20,0,298,78,0.0001}                                            
    194         make/o/t parameters_S_SC = {"volume fraction","Radius (A)","contrast (-2)","charge","movalent salt(M)","Temperature (K)","dielectric const","bkgd (cm-1)"}              
     194        make/o/t parameters_S_SC = {"volume fraction","Radius (A)","contrast (A-2)","charge","movalent salt(M)","Temperature (K)","dielectric const","bkgd (cm-1)"}              
    195195        Edit/K=1 parameters_S_SC,coef_S_SC                                                               
    196196        ywave_S_SC := Sphere_SC(coef_S_SC,xwave_S_SC)                    
    197197        Display/K=1 ywave_S_SC vs xwave_S_SC                                                     
    198198        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    199         Label bottom "q (\\S-1\\M)" 
     199        Label bottom "q (A\\S-1\\M)" 
    200200        Label left "Intensity (cm\\S-1\\M)"                                      
    201201 
    … …  
    221221        // Setup parameter table for model function 
    222222        Make/O/D smear_coef_S_SC = {0.2,50,3e-6,20,0,298,78,0.0001}                                              
    223         make/o/t smear_parameters_S_SC = {"volume fraction","Radius (A)","contrast (-2)","charge","movalent salt(M)","Temperature (K)","dielectric const","bkgd (cm-1)"}                
     223        make/o/t smear_parameters_S_SC = {"volume fraction","Radius (A)","contrast (A-2)","charge","movalent salt(M)","Temperature (K)","dielectric const","bkgd (cm-1)"}                
    224224        Edit smear_parameters_S_SC,smear_coef_S_SC                                       
    225225         
    … …  
    232232        Display smeared_S_SC vs smeared_qvals                                                                    
    233233        ModifyGraph log=1,marker=29,msize=2,mode=4 
    234         Label bottom "q (\\S-1\\M)" 
     234        Label bottom "q (A\\S-1\\M)" 
    235235        Label left "Intensity (cm\\S-1\\M)" 
    236236 
    … …  
    277277        Variable num=256,qmin=0.001,qmax=0.7 
    278278        Prompt num "Enter number of data points for model: " 
    279         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    280         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     279        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     280        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    281281         
    282282        /// 
    … …  
    287287        xwave_S_SHS =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num))                                   
    288288        Make/O/D coef_S_SHS = {0.1,60,1e-6,0.05,0.2,0.01}                                                
    289         make/o/t parameters_S_SHS = {"volume fraction","Radius (A)","contrast (-2)","perturbation parameter (0.1)","stickiness, tau","bkgd (cm-1)"}             
     289        make/o/t parameters_S_SHS = {"volume fraction","Radius (A)","contrast (A-2)","perturbation parameter (0.1)","stickiness, tau","bkgd (cm-1)"}             
    290290        Edit/K=1 parameters_S_SHS,coef_S_SHS                                                             
    291291        ywave_S_SHS := Sphere_SHS(coef_S_SHS,xwave_S_SHS)                        
    292292        Display/K=1 ywave_S_SHS vs xwave_S_SHS                                                   
    293293        ModifyGraph log=1,marker=29,msize=2,mode=4                       
    294         Label bottom "q (\\S-1\\M)" 
     294        Label bottom "q (A\\S-1\\M)" 
    295295        Label left "Intensity (cm\\S-1\\M)"                                      
    296296 
    … …  
    309309        // Setup parameter table for model function 
    310310        Make/O/D smear_coef_S_SHS = {0.1,60,1e-6,0.05,0.2,0.01}                                          
    311         make/o/t smear_parameters_S_SHS = {"volume fraction","Radius (A)","contrast (-2)","perturbation parameter (0.1)","stickiness, tau","bkgd (cm-1)"}               
     311        make/o/t smear_parameters_S_SHS = {"volume fraction","Radius (A)","contrast (A-2)","perturbation parameter (0.1)","stickiness, tau","bkgd (cm-1)"}               
    312312        Edit smear_parameters_S_SHS,smear_coef_S_SHS                                     
    313313         
    … …  
    320320        Display smeared_S_SHS vs smeared_qvals                                                                   
    321321        ModifyGraph log=1,marker=29,msize=2,mode=4 
    322         Label bottom "q (\\S-1\\M)" 
     322        Label bottom "q (A\\S-1\\M)" 
    323323        Label left "Intensity (cm\\S-1\\M)" 
    324324 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/SquareWellStruct.ipf

    r42 r379  
    1414        Variable num=128,qmin=0.001,qmax=0.3 
    1515        Prompt num "Enter number of data points for model: " 
    16         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    17         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     16        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     17        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1818         
    1919        Make/O/D/n=(num) xwave_sws,ywave_sws 
    … …  
    2525        Display ywave_sws vs xwave_sws 
    2626        ModifyGraph marker=29,msize=2,mode=4 
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Structure Factor" 
    2929        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/StackedDiscs.ipf

    r178 r379  
    1616        Variable num=500,qmin=0.001,qmax=1.0 
    1717        Prompt num "Enter number of data points for model: " 
    18         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    19         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     18        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     19        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    2020         
    2121        make/o/n=(num) xwave_scyl,ywave_scyl 
    … …  
    2727        Display ywave_scyl vs xwave_scyl 
    2828        ModifyGraph log=1,marker=29,msize=2,mode=4 
    29         Label bottom "q (\\S-1\\M)" 
     29        Label bottom "q (A\\S-1\\M)" 
    3030        Label left "Intensity (cm\\S-1\\M)" 
    3131        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5656        Display smeared_scyl vs smeared_qvals 
    5757        ModifyGraph log=1,marker=29,msize=2,mode=4 
    58         Label bottom "q (\\S-1\\M)" 
     58        Label bottom "q (A\\S-1\\M)" 
    5959        Label left "Intensity (cm\\S-1\\M)" 
    6060        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/Teubner.ipf

    r42 r379  
    1111        Variable num=128,qmin=0.001,qmax=0.7 
    1212        Prompt num "Enter number of data points for model: " 
    13         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    14         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     13        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     14        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1515         
    1616        Make/O/D/n=(num) xwave_ts,ywave_ts 
    … …  
    2222        Display ywave_ts vs xwave_ts 
    2323        ModifyGraph log=1,marker=29,msize=2,mode=4 
    24         Label bottom "q (\\S-1\\M)" 
     24        Label bottom "q (A\\S-1\\M)" 
    2525        Label left "Intensity (cm\\S-1\\M)" 
    2626        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5151        Display smeared_ts vs smeared_qvals 
    5252        ModifyGraph log=1,marker=29,msize=2,mode=4 
    53         Label bottom "q (\\S-1\\M)" 
     53        Label bottom "q (A\\S-1\\M)" 
    5454        Label left "Intensity (cm\\S-1\\M)" 
    5555        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/UnifEllipsoid_and_Struct.ipf

    r42 r379  
    1414        Variable num=128,qmin=0.001,qmax=0.7 
    1515        Prompt num "Enter number of data points for model: " 
    16         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    17         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     16        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     17        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1818         
    1919        Make/O/D/n=(num) xwave_EOR_HS,ywave_EOR_HS 
    … …  
    2525        Display ywave_EOR_HS vs xwave_EOR_HS 
    2626        ModifyGraph log=1,marker=29,msize=2,mode=4 
    27         Label bottom "q (\\S-1\\M)" 
     27        Label bottom "q (A\\S-1\\M)" 
    2828        Label left "Intensity (cm\\S-1\\M)" 
    2929        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5252        Display smeared_EOR_HS vs smeared_qvals                                                                  
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656 
    … …  
    9494        Variable num=128,qmin=0.001,qmax=0.7 
    9595        Prompt num "Enter number of data points for model: " 
    96         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    97         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     96        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     97        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    9898         
    9999        Make/O/D/n=(num) xwave_EOR_SW,ywave_EOR_SW 
    … …  
    105105        Display ywave_EOR_SW vs xwave_EOR_SW 
    106106        ModifyGraph log=1,marker=29,msize=2,mode=4 
    107         Label bottom "q (\\S-1\\M)" 
     107        Label bottom "q (A\\S-1\\M)" 
    108108        Label left "Intensity (cm\\S-1\\M)" 
    109109 
    … …  
    133133        Display smeared_EOR_SW vs smeared_qvals                                                                  
    134134        ModifyGraph log=1,marker=29,msize=2,mode=4 
    135         Label bottom "q (\\S-1\\M)" 
     135        Label bottom "q (A\\S-1\\M)" 
    136136        Label left "Intensity (cm\\S-1\\M)" 
    137137 
    … …  
    177177        Variable num=128,qmin=0.001,qmax=0.7 
    178178        Prompt num "Enter number of data points for model: " 
    179         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    180         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     179        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     180        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    181181         
    182182        if (DataFolderExists("root:HayPenMSA")) 
    … …  
    195195        Display ywave_EOR_SC vs xwave_EOR_SC 
    196196        ModifyGraph log=1,marker=29,msize=2,mode=4 
    197         Label bottom "q (\\S-1\\M)" 
     197        Label bottom "q (A\\S-1\\M)" 
    198198        Label left "Intensity (cm\\S-1\\M)" 
    199199 
    … …  
    230230        Display smeared_EOR_SC vs smeared_qvals                                                                  
    231231        ModifyGraph log=1,marker=29,msize=2,mode=4 
    232         Label bottom "q (\\S-1\\M)" 
     232        Label bottom "q (A\\S-1\\M)" 
    233233        Label left "Intensity (cm\\S-1\\M)" 
    234234 
    … …  
    277277        Variable num=128,qmin=0.001,qmax=0.7 
    278278        Prompt num "Enter number of data points for model: " 
    279         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    280         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     279        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     280        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    281281         
    282282        Make/O/D/n=(num) xwave_EOR_SHS,ywave_EOR_SHS 
    … …  
    288288        Display ywave_EOR_SHS vs xwave_EOR_SHS 
    289289        ModifyGraph log=1,marker=29,msize=2,mode=4 
    290         Label bottom "q (\\S-1\\M)" 
     290        Label bottom "q (A\\S-1\\M)" 
    291291        Label left "Intensity (cm\\S-1\\M)" 
    292292 
    … …  
    316316        Display smeared_EOR_SHS vs smeared_qvals                                                                         
    317317        ModifyGraph log=1,marker=29,msize=2,mode=4 
    318         Label bottom "q (\\S-1\\M)" 
     318        Label bottom "q (A\\S-1\\M)" 
    319319        Label left "Intensity (cm\\S-1\\M)" 
    320320 

  • sans/Dev/trunk/NCNR_User_Procedures/SANS/Analysis/Models_v3.00/UniformEllipsoid.ipf

    r42 r379  
    1313        Variable num=128,qmin=0.001,qmax=0.7 
    1414        Prompt num "Enter number of data points for model: " 
    15         Prompt qmin "Enter minimum q-value (^-1) for model: " 
    16         Prompt qmax "Enter maximum q-value (^-1) for model: " 
     15        Prompt qmin "Enter minimum q-value (A^-1) for model: " 
     16        Prompt qmax "Enter maximum q-value (A^-1) for model: " 
    1717         
    1818        Make/O/D/n=(num) xwave_eor,ywave_eor 
    … …  
    2424        Display ywave_eor vs xwave_eor 
    2525        ModifyGraph log=1,marker=29,msize=2,mode=4 
    26         Label bottom "q (\\S-1\\M)" 
     26        Label bottom "q (A\\S-1\\M)" 
    2727        Label left "Intensity (cm\\S-1\\M)" 
    2828        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
    … …  
    5252        Display smeared_eor vs smeared_qvals 
    5353        ModifyGraph log=1,marker=29,msize=2,mode=4 
    54         Label bottom "q (\\S-1\\M)" 
     54        Label bottom "q (A\\S-1\\M)" 
    5555        Label left "Intensity (cm\\S-1\\M)" 
    5656        AutoPositionWindow/M=1/R=$(WinName(0,1)) $WinName(0,2) 
Note: See TracChangeset for help on using the changeset viewer.