Changeset 61


Ignore:
Timestamp:
Mar 26, 2007 1:18:11 PM (15 years ago)
Author:
srkline
Message:

added a scale factor to the Beaucage model so that it can be properly used with Global Fitting (so that either USANS or SANS absolute scale can be tweaked as needed)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Analysis/trunk/Put in User Procedures/SANS_Models_v3.00/NewModels_2006/Beaucage.ipf

    r50 r61  
    2121        make/o/d/n=(num) xwave_b1,ywave_b1 
    2222        xwave_b1 = alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    23         make/o/d coef_b1 = {3,21,6e-4,2,0} 
    24         make/o/t parameters_b1 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","bkg (cm-1 sr-1)"} 
     23        make/o/d coef_b1 = {1,3,21,6e-4,2,0} 
     24        make/o/t parameters_b1 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","bkg (cm-1 sr-1)"} 
    2525        Edit parameters_b1,coef_b1 
    2626        ywave_b1 := OneLevel(coef_b1,xwave_b1) 
     
    4040        make/o/d/n=(num) xwave_b2,ywave_b2 
    4141        xwave_b2 = alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    42         make/o/d coef_b2 = {400,200,5e-6,4,3,21,6e-4,2,0} 
    43         make/o/t parameters_b2 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","bkg (cm-1 sr-1)"} 
     42        make/o/d coef_b2 = {1,400,200,5e-6,4,3,21,6e-4,2,0} 
     43        make/o/t parameters_b2 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","bkg (cm-1 sr-1)"} 
    4444        Edit parameters_b2,coef_b2 
    4545        ywave_b2 := TwoLevel(coef_b2,xwave_b2) 
     
    5959        make/o/d/n=(num) xwave_b3,ywave_b3 
    6060        xwave_b3 = alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    61         make/o/d coef_b3 = {4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
    62         make/o/t parameters_b3 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","bkg (cm-1)"} 
     61        make/o/d coef_b3 = {1,4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
     62        make/o/t parameters_b3 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","bkg (cm-1)"} 
    6363        Edit parameters_b3,coef_b3 
    6464        ywave_b3 := ThreeLevel(coef_b3,xwave_b3) 
     
    7878        make/o/d/n=(num) xwave_b4,ywave_b4 
    7979        xwave_b4 = alog(log(qmin) + x*((log(qmax)-log(qmin))/num)) 
    80         make/o/d coef_b4 = {40000,2000,1e-8,4,4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
    81         make/o/t parameters_b4 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","G4 (cm-1 sr-1)","Rg4  (A)","B4 (cm-1 sr-1)","Pow4","bkg (cm-1)"} 
     80        make/o/d coef_b4 = {1,40000,2000,1e-8,4,4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
     81        make/o/t parameters_b4 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","G4 (cm-1 sr-1)","Rg4  (A)","B4 (cm-1 sr-1)","Pow4","bkg (cm-1)"} 
    8282        Edit parameters_b4,coef_b4 
    8383        ywave_b4 := FourLevel(coef_b4,xwave_b4) 
     
    9999         
    100100        // Setup parameter table for model function 
    101         Make/O/D smear_coef_b1 ={3,21,6e-4,2,0}                                  
    102         make/o/t smear_parameters_b1 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","bkg (cm-1 sr-1)"}   
     101        Make/O/D smear_coef_b1 ={1,3,21,6e-4,2,0}                                        
     102        make/o/t smear_parameters_b1 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","bkg (cm-1 sr-1)"}   
    103103        Edit smear_parameters_b1,smear_coef_b1                                   
    104104         
     
    124124         
    125125        // Setup parameter table for model function 
    126         Make/O/D smear_coef_b2 = {400,200,5e-6,4,3,21,6e-4,2,0}                          
    127         make/o/t smear_parameters_b2 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","bkg (cm-1 sr-1)"}       
     126        Make/O/D smear_coef_b2 = {1,400,200,5e-6,4,3,21,6e-4,2,0}                                
     127        make/o/t smear_parameters_b2 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","bkg (cm-1 sr-1)"}       
    128128        Edit smear_parameters_b2,smear_coef_b2                                   
    129129         
     
    149149         
    150150        // Setup parameter table for model function 
    151         Make/O/D smear_coef_b3 = {4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
    152         make/o/t smear_parameters_b3 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","bkg (cm-1)"} 
     151        Make/O/D smear_coef_b3 = {1,4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
     152        make/o/t smear_parameters_b3 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","bkg (cm-1)"} 
    153153        Edit smear_parameters_b3,smear_coef_b3                                   
    154154         
     
    174174         
    175175        // Setup parameter table for model function 
    176         Make/O/D smear_coef_b4 = {40000,2000,1e-8,4,4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
    177         Make/o/t smear_parameters_b4 = {"G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","G4 (cm-1 sr-1)","Rg4  (A)","B4 (cm-1 sr-1)","Pow4","bkg (cm-1)"} 
     176        Make/O/D smear_coef_b4 = {1,40000,2000,1e-8,4,4000,600,2e-7,4,400,200,5e-6,4,3,21,6e-4,2,0} 
     177        Make/o/t smear_parameters_b4 = {"scale","G1 (cm-1 sr-1)","Rg1  (A)","B1 (cm-1 sr-1)","Pow1","G2 (cm-1 sr-1)","Rg2  (A)","B2 (cm-1 sr-1)","Pow2","G3 (cm-1 sr-1)","Rg3  (A)","B3 (cm-1 sr-1)","Pow3","G4 (cm-1 sr-1)","Rg4  (A)","B4 (cm-1 sr-1)","Pow4","bkg (cm-1)"} 
    178178        Edit smear_parameters_b4,smear_coef_b4                                   
    179179         
Note: See TracChangeset for help on using the changeset viewer.