Ignore:
Timestamp:
Oct 27, 2010 6:11:50 PM (12 years ago)
Author:
srkline
Message:

Fixing bugs associated with 2D fitting, making sure that smeared and unsmeared 2D models both fit correctly and report errors to the FitManager?.

Added "_v40" extension to the Raspberry models. These models still need to be added to the Procedure list

Location:
sans/Dev/trunk/NCNR_User_Procedures/Analysis
Files:
2 added
2 deleted
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Dev/trunk/NCNR_User_Procedures/Analysis/Packages/Wrapper_v40.ipf

    r753 r762  
    794794        fitYw = NaN 
    795795         
    796         Variable useRes=0,isUSANS=0,val 
     796        Variable useResol=0,isUSANS=0,val 
    797797        if(stringmatch(funcStr, "Smear*"))              // if it's a smeared function, need a struct 
    798                 useRes=1 
     798                useResol=1 
    799799        endif 
    800800        if(dimsize(resW,1) > 4) 
     
    912912                        Variable chi,pt 
    913913 
    914                         chi = DoGenCurveFit(useRes,useCursors,sw,fitYw,fs,funcStr,getHStr(hold),val,lolim,hilim,pt1,pt2) 
     914                        chi = DoGenCurveFit(useResol,useCursors,sw,fitYw,fs,funcStr,getHStr(hold),val,lolim,hilim,pt1,pt2) 
    915915                        pt = val 
    916916 
     
    922922                // so there are only three conditions to test == 1 + 3 + 3 + 1 = 8 conditions 
    923923                 
    924                 if(useRes && useResiduals && useTextBox)                //do it all 
     924                if(useResol && useResiduals && useTextBox)              //do it all 
    925925                        FuncFit/H=getHStr(hold) /NTHR=0 /TBOX=(tb) $funcStr cw, yw[pt1,pt2] /X=xw /W=sw /I=1 /E=eps /D=fitYw /C=constr /STRC=fs /R /NWOK 
    926926                        break 
    927927                endif 
    928928                 
    929                 if(useRes && useResiduals)              //res + resid 
     929                if(useResol && useResiduals)            //res + resid 
    930930                        FuncFit/H=getHStr(hold) /NTHR=0 $funcStr cw, yw[pt1,pt2] /X=xw /W=sw /I=1 /E=eps /D=fitYw /C=constr /STRC=fs /R /NWOK 
    931931                        break 
     
    933933 
    934934                 
    935                 if(useRes && useTextBox)                //res + text 
     935                if(useResol && useTextBox)              //res + text 
    936936                        FuncFit/H=getHStr(hold) /NTHR=0 /TBOX=(tb) $funcStr cw, yw[pt1,pt2] /X=xw /W=sw /I=1 /E=eps /D=fitYw /C=constr /STRC=fs /NWOK 
    937937                        break 
    938938                endif 
    939939                 
    940                 if(useRes)              //res only 
     940                if(useResol)            //res only 
    941941//                      Print "timing test for Cylinder_PolyRadius---" 
    942942//                      Variable t0 = stopMStimer(-2) 
     
    962962                 
    963963                 
    964 /////   same as above, but all without useRes (no /STRC flag) 
     964/////   same as above, but all without useResol (no /STRC flag) 
    965965                if(useResiduals && useTextBox)          //resid+ text 
    966966                        FuncFit/H=getHStr(hold) /NTHR=0 /TBOX=(tb) $funcStr cw, yw[pt1,pt2] /X=xw /W=sw /I=1 /E=eps /D=fitYw /C=constr /R /NWOK 
     
    11641164                Execute "ExportGizmo Clip"                      //this ALWAYS is a PICT or BMP. Gizmo windows are different... 
    11651165                LoadPict/Q/O "Clipboard",tmp_Gizmo 
    1166                 Notebook $nb scaling={50, 50}, picture={tmp_Gizmo(0, 0, 800, 600), 0, 1}, text="\r" 
    1167         endif 
    1168         //Notebook Report picture={Table1, 0, 0}, text="\r" 
     1166                Notebook $nb picture={tmp_Gizmo(0, 0, 800, 600), 0, 1}, text="\r" 
     1167        endif 
    11691168         
    11701169        // show the top of the report 
Note: See TracChangeset for help on using the changeset viewer.