Changeset 300


Ignore:
Timestamp:
Mar 20, 2008 9:32:16 AM (14 years ago)
Author:
srkline
Message:

Fixed two bugs -

(1) the Angstrom string not correctly displaying on Windows - in SASCALC and in FIT
(2) Q-values were incorrectly calculated during a mouseover, and in QxQyASCII output, a consequence of forgetting to convert units now that I am always reading pixel size from the file header.

Location:
sans/SANSReduction/trunk/Put in User Procedures/SANS_Reduction_v5.10
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • sans/SANSReduction/trunk/Put in User Procedures/SANS_Reduction_v5.10/FIT_Ops.ipf

    r260 r300  
    364364        endif 
    365365         
     366        SVAR aStr = root:myGlobals:gAngstStr 
     367         
    366368        ControlInfo/W=FitPanel xModel 
    367369        xstr = S_Value 
     
    370372                Duplicate/o xw xAxisWave 
    371373                If (cmpstr("q",S_Value) == 0)    
    372                         SetScale d 0,0,^-1",xAxisWave 
     374                        SetScale d 0,0,aStr+"^-1",xAxisWave 
    373375                        xAxisWave = xw 
    374376                        xlabel = "q" 
     
    378380                endif 
    379381                If (cmpstr("q^2",S_Value) == 0)  
    380                         SetScale d 0,0,^-2",xAxisWave 
     382                        SetScale d 0,0,aStr+"^-2",xAxisWave 
    381383                        xAxisWave = xw*xw 
    382384                        xlabel = "q^2" 
     
    516518        String ystr="",xstr="" 
    517519        SVAR gLastFileName = root:myGlobals:gLastFileName 
     520        SVAR aStr = root:myGlobals:gAngstStr 
     521         
    518522        //ControlInfo/W=FitPanel ywave 
    519523        Wave xw = $( CleanupName((gLastFileName + "_q"),0) ) 
     
    549553                                rg = sqrt(-3*W_coef[1]) 
    550554                                rgerr = 3*W_sigma[1]/(2*rg) 
    551                                 textstr_3 += "\rRg () = " + num2str(rg) + " ± " + num2str(rgerr) 
     555                                textstr_3 += "\rRg ("+aStr+") = " + num2str(rg) + " ± " + num2str(rgerr) 
    552556                                textstr_3 += "\r" + num2str(rg*minfit) + " < Rg*q < " + num2str(rg*maxfit) 
    553557                                break 
     
    587591                                rg = 4*sqrt(-W_coef[1]) 
    588592                                rgerr = 8*W_sigma[1]/rg 
    589                                 textstr_3 = "Rod diameter () = " + num2str(rg) + " ± " + num2str(rgerr) 
     593                                textstr_3 = "Rod diameter ("+aStr+") = " + num2str(rg) + " ± " + num2str(rgerr) 
    590594                                textstr_3 += "\r" + num2str(rg*minfit) + " < Rg*q < " + num2str(rg*maxfit) 
    591595                                break 
     
    599603                                rg = sqrt(-12*W_coef[1]) 
    600604                                rgerr = 6*W_sigma[1]/(2*rg) 
    601                                 textstr_3 = "Platelet thickness () = " + num2str(rg) + " ± " + num2str(rgerr) 
     605                                textstr_3 = "Platelet thickness ("+aStr+") = " + num2str(rg) + " ± " + num2str(rgerr) 
    602606                                textstr_3 += "\r" + num2str(rg*minfit) + " < Rg*q < " + num2str(rg*maxfit) 
    603607                                break 
  • sans/SANSReduction/trunk/Put in User Procedures/SANS_Reduction_v5.10/RawWindowHook.ipf

    r260 r300  
    240240                        //update q, qX, and qY 
    241241                        if(cmpstr(cur_folder,"MSK")!=0) 
    242                                 Variable xctr=reals[16],yctr=reals[17],sdd=reals[18],lam=reals[26],pixSize=reals[13] 
     242                                Variable xctr=reals[16],yctr=reals[17],sdd=reals[18],lam=reals[26],pixSize=reals[13]/10 
    243243                                Variable/G root:myGlobals:gQQ = CalcQval(xaxval+1,yaxval+1,xctr,yctr,sdd,lam,pixSize) 
    244244                                Variable/G root:myGlobals:gQX = CalcQX(xaxval+1,xctr,sdd,lam,pixSize) 
  • sans/SANSReduction/trunk/Put in User Procedures/SANS_Reduction_v5.10/SASCALC.ipf

    r268 r300  
    12821282        NVAR L2diff = L2diff 
    12831283        NVAR lens = root:Packages:NIST:SAS:gUsingLenses 
    1284          
     1284        SVAR aStr = root:myGlobals:gAngstStr 
    12851285         
    12861286        sprintf temp,"Source Aperture Diameter =\t\t%6.2f cm\r",sourceApertureDiam() 
     
    12941294        sprintf temp,"Beamstop diameter =\t\t\t\t%6.2f inches\r",beamstopDiam()/2.54 
    12951295        str += temp 
    1296         sprintf temp,"Minimum Q-value =\t\t\t\t%6.4f 1/ (sigQ/Q = %3.1f %%)\r",qMin(),deltaQ(qMin()) 
    1297         str += temp 
    1298         sprintf temp,"Maximum Horizontal Q-value =\t%6.4f 1/\r",qMaxHoriz() 
    1299         str += temp 
    1300         sprintf temp,"Maximum Vertical Q-value =\t\t%6.4f 1/\r",qMaxVert() 
    1301         str += temp 
    1302         sprintf temp,"Maximum Q-value =\t\t\t\t%6.4f 1/ (sigQ/Q = %3.1f %%)\r",qMaxCorner(),deltaQ(qMaxCorner()) 
     1296        sprintf temp,"Minimum Q-value =\t\t\t\t%6.4f 1/%s (sigQ/Q = %3.1f %%)\r",qMin(),aStr,deltaQ(qMin()) 
     1297        str += temp 
     1298        sprintf temp,"Maximum Horizontal Q-value =\t%6.4f 1/%s\r",qMaxHoriz(),aStr 
     1299        str += temp 
     1300        sprintf temp,"Maximum Vertical Q-value =\t\t%6.4f 1/%s\r",qMaxVert(),aStr 
     1301        str += temp 
     1302        sprintf temp,"Maximum Q-value =\t\t\t\t%6.4f 1/%s (sigQ/Q = %3.1f %%)\r",qMaxCorner(),aStr,deltaQ(qMaxCorner()) 
    13031303        str += temp 
    13041304        sprintf temp,"Beam Intensity =\t\t\t\t%.0f counts/s\r",beamIntensity() 
    13051305        str += temp 
    1306         sprintf temp,"Figure of Merit =\t\t\t\t%3.3g ^2/s\r",figureOfMerit() 
     1306        sprintf temp,"Figure of Merit =\t\t\t\t%3.3g %s^2/s\r",figureOfMerit(),aStr 
    13071307        str += temp 
    13081308        sprintf temp,"Attenuator transmission =\t\t%3.3g = Atten # %d\r",attenuatorTransmission(),attenuatorNumber() 
     
    13271327        sprintf temp,"Detector Offset =\t\t\t\t\t\t%.1f cm\r", detectorOffset() 
    13281328        str += temp 
    1329         sprintf temp,"Neutron Wavelength =\t\t\t\t\t%.2f \r", wavelength 
     1329        sprintf temp,"Neutron Wavelength =\t\t\t\t\t%.2f %s\r", wavelength,aStr 
    13301330        str += temp 
    13311331        sprintf temp,"Wavelength Spread, FWHM =\t\t\t\t%.3f\r", lambdaWidth 
  • sans/SANSReduction/trunk/Put in User Procedures/SANS_Reduction_v5.10/WriteQIS.ipf

    r260 r300  
    732732        MyMat2XYZ(data,qx_val,qy_val,z_val)             //x and y are [p][q] indexes, not q-vals yet 
    733733         
    734         qx_val = CalcQx(qx_val+1,rw[16],rw[18],rw[26],rw[13])           //+1 converts to detector coordinate system 
    735         qy_val = CalcQy(qy_val+1,rw[17],rw[18],rw[26],rw[13]) 
     734        qx_val = CalcQx(qx_val+1,rw[16],rw[18],rw[26],rw[13]/10)                //+1 converts to detector coordinate system 
     735        qy_val = CalcQy(qy_val+1,rw[17],rw[18],rw[26],rw[13]/10) 
    736736 
    737737        //not demo-compatible, but approx 8x faster!!    
Note: See TracChangeset for help on using the changeset viewer.