Changeset 137


Ignore:
Timestamp:
Jul 26, 2007 4:41:07 PM (15 years ago)
Author:
srkline
Message:

Updated StackedDiscs? model to Make double precision waves for XOP

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Analysis/branches/ajj_23APR07/IGOR_Package_Files/Put in User Procedures/SANS_Models_v3.00/StackedDiscs.ipf

    r131 r137  
    2424        Prompt qmax "Enter maximum q-value (^-1) for model: " 
    2525         
    26         make/o/n=(num) xwave_scyl,ywave_scyl 
     26        make/o/D/n=(num) xwave_scyl,ywave_scyl 
    2727        xwave_scyl =  alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    28         make/o coef_scyl = {0.01,3000.,10.,15.,4.0e-6,-4.0e-7,5.0e-6,1,0,1.0e-3} 
     28        make/o/D coef_scyl = {0.01,3000.,10.,15.,4.0e-6,-4.0e-7,5.0e-6,1,0,1.0e-3} 
    2929        make/o/t parameters_scyl = {"scale","Disc Radius (A)","Core Thickness (A)","Layer Thickness (A)","Core SLD (A^-2)","Layer SLD (A^-2)","Solvent  SLD(A^-2)","# of Stacking","GSD of d-Spacing","incoh. bkg (cm^-1)"} 
    3030        Edit parameters_scyl,coef_scyl 
     
    5555         
    5656        // Setup parameter table for model function 
    57         make/o smear_coef_scyl = {0.01,3000.,10.,15.,4.0e-6,-4.0e-7,5.0e-6,1,0,1.0e-3} 
     57        make/o/D smear_coef_scyl = {0.01,3000.,10.,15.,4.0e-6,-4.0e-7,5.0e-6,1,0,1.0e-3} 
    5858        make/o/t smear_parameters_scyl = {"scale","Disc Radius (A)","Core Thickness (A)","Layer Thickness (A)","Core SLD (A^-2)","Layer SLD (A^-2)","Solvent SLD (A^-2)","# of Stacking","GSD of d-Spacing","incoh. bkg (cm^-1)"} 
    5959        Edit smear_parameters_scyl,smear_coef_scyl 
Note: See TracChangeset for help on using the changeset viewer.