Changeset 1169


Ignore:
Timestamp:
Dec 11, 2021 5:06:59 PM (10 months ago)
Author:
ilavsky
Message:

Remove debug code, never used. Fix Nika minor bugs

Location:
trunk/User Procedures
Files:
25 edited

Legend:

Unmodified
Added
Removed
  • trunk/User Procedures/CanSAS/IRNI_NexusSupport.ipf

    r1156 r1169  
    179179//*****************************************************************************************************************
    180180Function NEXUS_NikaConfigPanelFnct() : Panel
    181         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     181        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    182182        DoWIndow NEXUS_ConfigurationPanel
    183183        if(V_Flag)
     
    294294        Variable tab
    295295
    296         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     296        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    297297        TabControl ImportTabs value=tab, win=NEXUS_ConfigurationPanel
    298298        //set here to Tab tab or things go out of whack...
     
    356356        STRUCT WMCheckboxAction &cba
    357357
    358         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     358        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    359359        NVAR NX_Append2DDataToProcNexus = root:Packages:Irena_Nexus:NX_Append2DDataToProcNexus
    360360        NVAR NX_Append1DDataToProcNexus = root:Packages:Irena_Nexus:NX_Append1DDataToProcNexus
     
    413413
    414414static Function NEXUS_SetOutputControls()
    415         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     415        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    416416
    417417        NVAR SaveToNexus=root:Packages:Irena_Nexus:NX_SaveToProcNexusFile
     
    441441        STRUCT WMListboxAction &lba
    442442
    443         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     443        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    444444        Variable/g row = lba.row
    445445        WAVE/T/Z listWave = lba.listWave
     
    485485static Function/T NEXUS_NXParamSelection(row)
    486486        variable row
    487         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     487        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    488488        SVAR DataFolderName = root:Packages:Irena_Nexus:DataFolderName
    489489        SVAR GrepStringMask = root:Packages:Irena_Nexus:GrepStringMask
     
    514514Function NEXUS_InputPanelButtonProc(ba) : ButtonControl
    515515        STRUCT WMButtonAction &ba
    516         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     516        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    517517
    518518        switch( ba.eventCode )
     
    555555Function Nexus_NexusOpenHdf5File()
    556556       
    557         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     557        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    558558        Wave/T WaveOfFiles      = root:Packages:Convert2Dto1D:ListOf2DSampleData
    559559        Wave WaveOfSelections = root:Packages:Convert2Dto1D:ListOf2DSampleDataNumbers
     
    611611Function NEXUS_NexusNXsasDataReader(FilePathName,Filename)
    612612                string FilePathName,Filename
    613                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     613                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    614614               
    615615                DFref oldDf= GetDataFolderDFR()
     
    705705static Function NEXUS_ReadNXparameters(PathToNewData)
    706706                string PathToNewData
    707                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     707                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    708708                DFref oldDf= GetDataFolderDFR()
    709709
     
    793793                string FilePathName,Filename
    794794
    795         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     795        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    796796        NEXUS_Initialize(0)
    797797        KilLDatafolder/Z root:Packages:NexusImportTMP
     
    824824        wave WaveWithWaveNote
    825825        string SampleName
    826         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     826        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    827827        if(!WaveExists(WaveWithWaveNote))               //hm, are we loading the empty?
    828828                return 0
     
    879879        string PathToStrVarValues = "root:Packages:NexusImportTMP:"
    880880       
    881         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     881        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    882882        string StartDf
    883883        //StartDf = Fldrname+"entry:"
     
    949949        string StartFolderStr, Fldrname
    950950
    951         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     951        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    952952        string Newkey=GetDataFolder(1)[strlen(StartFolderStr),inf]
    953953        string ListOfTXTWaves=WaveList("*", ";", "TEXT:1" )
     
    990990        string  StartFolderStr, Fldrname
    991991       
    992         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     992        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    993993        //SVAR StartFolderStr=root:Packages:NexusImportTMP:StartFolderStr
    994994        NVAR NX_Index0Value = root:Packages:Irena_Nexus:NX_Index0Value
     
    10401040        string DataPathStr, NXClassStr
    10411041       
    1042         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1042        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10431043        DFref oldDf= GetDataFolderDFR()
    10441044
     
    10561056        string PathToData
    10571057        variable dimensions
    1058         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1058        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10591059        DFref oldDf= GetDataFolderDFR()
    10601060
     
    11111111static Function/S NEXUS_FindSignalV2Data()
    11121112        //check each wave in curren tfolder if it has signal= 1 in the wavenote
    1113         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1113        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11141114        string WavenameStr=""
    11151115        string objName
     
    11331133static Function/S NEXUS_FindAnySignalData()
    11341134        //check each wave in current folder and selects the first one which has 2D data in it
    1135         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1135        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11361136        string WavenameStr=""
    11371137        string objName
     
    11581158        string WhichNXClass
    11591159        //e.g.,         WhichNXClass = "NX_class=NXdata;canSAS_class=SASdata;"  - must match the Nexus spelling/format
    1160         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1160        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11611161        SVAR FoundClassDataLocation = root:Packages:Irena_Nexus:FoundClassDataLocation
    11621162        Wave/Z Igor___folder_attributes
     
    11851185        //function, which creates the folder and creates the strings and variables
    11861186       
    1187         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1187        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11881188        DFref oldDf= GetDataFolderDFR()
    11891189
     
    13101310        variable enforce
    13111311       
    1312         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1312        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13131313        DFref oldDf= GetDataFolderDFR()
    13141314
     
    13511351Function NEXUS_GuessParamXRef()
    13521352
    1353         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1353        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13541354        DFref oldDf= GetDataFolderDFR()
    13551355
     
    14161416                string Writer = "Nika"
    14171417               
    1418                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1418                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14191419                NVAR NX_SaveToProcNexusFile=root:Packages:Irena_Nexus:NX_SaveToProcNexusFile
    14201420                if(NX_SaveToProcNexusFile!=1)
     
    16361636                variable Slit_Length
    16371637                               
    1638                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1638                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16391639               
    16401640                //DataType = "qrs", "trs", "drs", "distrs"
     
    18721872                useQy= !ParamIsDefault(Qy)
    18731873                useUnbinnedQxy =  !ParamIsDefault(UnbinnedQx)
    1874                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1874                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    18751875                use3Q = useQx*useQy
    18761876                if(use3Q + useQwv != 1)
     
    20622062        //this file should follow NXsas structure and be understandable to Nexus file readers which expect to get NX type data as raw input.
    20632063
    2064         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2064        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20652065        variable GroupID
    20662066        Variable fileID, result
     
    22792279Function NEXUS_NikaSave2DData()
    22802280        //appends 2D data if user requests it
    2281         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2281        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22822282        NVAR NX_SaveToProcNexusFile             = root:Packages:Irena_Nexus:NX_SaveToProcNexusFile
    22832283        NVAR NX_Append2DDataToProcNexus = root:Packages:Irena_Nexus:NX_Append2DDataToProcNexus          //2D calibrated data
     
    24342434        wave Calibrated2DData,Qmatrix, AnglesWave, Mask
    24352435        variable XDimension, YDimension, BeamCenterX, BeamCenterY
    2436         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2436        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24372437        //here we rebin the data using fake log binning and return really weird data
    24382438        //how to rebin the data.
     
    25412541        string BaseName
    25422542       
    2543         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2543        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25442544        if(GrepString(BaseName, "^[0-9]"))
    25452545                BaseName="_"+BaseName
     
    25522552        string DataName,DataLoc
    25532553        Variable fileID, DataValueVar
    2554         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2554        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25552555        make/Free/N=1 dataWv
    25562556        dataWv = DataValueVar                                                                   
     
    25662566        string DataName,DataValueStr,DataLoc
    25672567        Variable fileID
    2568         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2568        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25692569        if(NEXUS_isaNumber(DataValueStr))
    25702570                make/Free/N=1 dataWvN
     
    25982598        variable fileID
    25992599        String Location,NoteStr
    2600         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2600        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26012601        //Create NXnote group
    26022602        variable GroupID, i
     
    26262626        variable DoNotOverwriteL= !ParamIsDefault(DoNotOverwrite)
    26272627        //              NEXUS_HdfSaveAttrib("resolutions","dQw,dQl",NewGroupName+"/Q", fileID)
    2628         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2628        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26292629        //make/T/Free/N=(numpnts(AttribValue)) groupAttribute
    26302630        //groupAttribute = AttribValue[p]       
     
    26512651        Variable fileID,DoNotOverwrite
    26522652        variable DoNotOverwriteL= !ParamIsDefault(DoNotOverwrite)
    2653         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2653        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26542654        make/T/Free/N=1 groupAttribute
    26552655        groupAttribute = AttribValue           
     
    26762676        string AttribName,AttribLoc
    26772677        Variable fileID, AttribValue
    2678         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2678        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26792679        make/U/W/Free/N=1 groupAttribute
    26802680        groupAttribute = AttribValue                                                                   
     
    26982698        //=1 for Raw file (same name as input file).hdf and 2 for Processed data file - name _Nika.hdf
    26992699
    2700         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2700        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27012701        //get the file name right...
    27022702        string LocalUserFileName
     
    27732773                        //              convert to QRS system data in Igor. Read Instrument group if availabel and stick in wave note, add title
    27742774                        //3.    2D is TBD as Irena cannot use it for now. Nika can, but I may not be able to finish this now.
    2775                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2775                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27762776       
    27772777                DFref oldDf= GetDataFolderDFR()
     
    28612861        variable InclNX_SasIns,InclNX_SASSam,InclNX_SASNote, FoundSasEntries
    28622862
    2863         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2863        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28642864        DFREF saveDFR = GetDataFolderDFR()              // Save
    28652865        SetDataFolder root:
     
    32793279        string PathToFolder
    32803280       
    3281         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3281        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32823282        string/g root:Packages:Irena_Nexus:TmpStringForNote
    32833283        SVAR TmpStringForNote = root:Packages:Irena_Nexus:TmpStringForNote
     
    32883288//*****************************************************************************************************************
    32893289Function NEXUS_CopyAllDataTOStringNote()
    3290         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3290        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32913291        SVAR TmpStringForNote = root:Packages:Irena_Nexus:TmpStringForNote
    32923292        string ALlItems=IN2G_CreateListOfItemsInFolder(GetDataFolder(1),2)
     
    33233323        string PathToFolder, AttributeStr
    33243324
    3325         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3325        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33263326        DFREF saveDFR = GetDataFolderDFR()              // Save
    33273327        SetDataFolder $(PathToFolder)
     
    33473347        string DataPathStr, NXClassStr
    33483348       
    3349         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3349        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33503350        DFref oldDf= GetDataFolderDFR()
    33513351
     
    33653365       
    33663366        //e.g.,         ClassList = "NX_class=NXdata;canSAS_class=SASdata;"     - must match the Nexus spelling/format
    3367         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3367        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33683368        DFref oldDf= GetDataFolderDFR()
    33693369
  • trunk/User Procedures/Indra 2/IN2_GeneralProcedures.ipf

    r1158 r1169  
    66constant IrenaDebugLevel=1
    77//1 for little debug
    8 //5 to get name of each function entered. For now in general Procedures. using IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     8//5 to get name of each function entered. For now in general Procedures. using ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    99constant RequiredMinScreenHeight=790
    1010constant RequiredMinScreenWidth = 1200
     
    100100//1.83 moved structure IrenaPanelDefaults from Irena since it is shared...GUI controls.
    101101//1.82 added IN2G_CloneWindow function
    102 //1.81 added IN2G_PrintDebugStatement, fixed some unresolved dependencies.
     102//1.81 added ////IN2G_PrintDebugStatement, fixed some unresolved dependencies.
    103103//1.80 added conversions between TTH, Q, and D in form of following functions: IN2G_COnvertQtoD etc. All take Thing to convert (e.g. Q) and wavelength (for uniformity, not used for Q-D).
    104104//     also added InsertSUbwindow to GraphMarquee and Color Traces to Graph menu. Added some xml functions I needed. 
     
    10931093        string StringName, Foldername
    10941094       
    1095         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1095        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10961096        DFref oldDf= GetDataFolderDFR()
    10971097        setDataFolder $Foldername
     
    12761276        string FolderPathToData
    12771277       
    1278         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1278        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12791279        if(!(DataFolderExists(FolderPathToData)))
    12801280                return ""
     
    13201320                Variable  MinStep
    13211321
    1322                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1322                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13231323                //assume WaveToRebin is linearly binned...
    13241324                if(WaveToRebin[1]-WaveToRebin[0]< MinStep)
     
    17451745Function IN2G_CheckPlatformGUIFonts()
    17461746
    1747         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1747        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    17481748        SVAR/Z Platform = root:Packages:Irena_Platform
    17491749        if(!SVAR_Exists(Platform))
     
    17891789Function IN2G_ConfigMain()              //call configuration routine
    17901790
    1791         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1791        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    17921792        //this is main configuration utility...
    17931793        IN2G_InitConfigMain()
     
    18081808Function IN2G_InitConfigMain()
    18091809
    1810         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1810        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    18111811        //initialize lookup parameters for user selected items.
    18121812        DFref oldDf= GetDataFolderDFR()
     
    18811881Function/S IN2G_CreateUsefulFontList()
    18821882
    1883         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1883        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    18841884        string SystemFontList=FontList(";")
    18851885        string PreferredFontList="Tahoma;Times;Arial$;Geneva;Palatino;Book Antiqua;"
     
    19051905        variable KillThem
    19061906       
    1907         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1907        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    19081908        struct  IrenaPanelDefaults Defs
    19091909        IN2G_InitConfigMain()
     
    19601960        variable ForceRead
    19611961        //debugger
    1962         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1962        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    19631963        struct  IrenaPanelDefaults Defs
    19641964        IN2G_InitConfigMain()
     
    21562156
    21572157Proc IN2G_MainConfigPanelProc()
    2158         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2158        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21592159        DoWIndow IN2G_MainConfigPanel
    21602160        if(V_Flag)
     
    22332233        String popStr
    22342234       
    2235         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2235        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22362236        if (cmpstr(ctrlName,"LegendSize")==0)
    22372237                NVAR LegendSize=root:Packages:IrenaConfigFolder:LegendSize
     
    22752275        switch( cba.eventCode )
    22762276                case 2: // mouse up
    2277                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2277                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22782278                        Variable checked = cba.checked
    22792279                        if(stringmatch(cba.ctrlName,"ErrorCalculationsUseOld"))
     
    23132313        switch( ba.eventCode )
    23142314                case 2: // mouse up
    2315                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2315                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23162316                        // click code here
    23172317                        if(stringmatch(ba.ctrlName,"OKBUtton"))
     
    23522352        string StrName
    23532353
    2354         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2354        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23552355        string result
    23562356        DFref oldDf= GetDataFolderDFR()
     
    23772377        string VarName
    23782378
    2379         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2379        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23802380        string result
    23812381        DFref oldDf= GetDataFolderDFR()
     
    24082408Function IN2G_ChangePanelControlsStyle()
    24092409
    2410         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2410        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24112411        SVAR DefaultFontType=root:Packages:IrenaConfigFolder:DefaultFontType
    24122412        NVAR DefaultFontSize=root:Packages:IrenaConfigFolder:DefaultFontSize
     
    24452445                //print V_left
    24462446        if ( s.eventCode == 6 && (WinType(s.winName)==7))       // resized and is panel, not usable for others.
    2447                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2447                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24482448                GetWindow $(s.winName), note
    24492449                string OrigInfo=S_Value
     
    27772777                return 0
    27782778        endif
    2779         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2779        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27802780        //store main window size
    27812781        GetWindow $panelName wsize              //this value is in pixels
     
    28492849        variable PointsIn
    28502850        variable PixsOut
    2851         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2851        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28522852        PixsOut = PointsIn* ScreenResolution/PanelResolution(PanelName)
    28532853        return PixsOut
     
    28572857        variable PixsIn
    28582858        variable PointsOut
    2859         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2859        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28602860        PointsOut = PixsIn/(ScreenResolution/PanelResolution(PanelName))
    28612861        return PointsOut
     
    28642864Static Function PanelResolution(wName)  // For compatibility with Igor 7
    28652865        String wName
    2866         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2866        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28672867        return 72
    28682868End
     
    28712871//*****************************************************************************************************************
    28722872//*****************************************************************************************************************
    2873 Function IN2G_PrintDebugStatement(CurrentDebugLevel, DebugLevel,DebugStatement)
    2874         variable CurrentDebugLevel, DebugLevel
    2875         string DebugStatement
    2876        
    2877         if(CurrentDebugLevel>=DebugLevel)
    2878                 string Location=GetRTStackInfo(3)
    2879                 print Secs2Date(DateTime,2)     +Secs2Time(DateTime,3)+"  :  "+Location +" : "+ DebugStatement
    2880         endif
    2881 
    2882 end
     2873//Function ////IN2G_PrintDebugStatement(CurrentDebugLevel, DebugLevel,DebugStatement)
     2874//      variable CurrentDebugLevel, DebugLevel
     2875//      string DebugStatement
     2876//     
     2877//      if(CurrentDebugLevel>=DebugLevel)
     2878//              string Location=GetRTStackInfo(3)
     2879//              print Secs2Date(DateTime,2)     +Secs2Time(DateTime,3)+"  :  "+Location +" : "+ DebugStatement
     2880//      endif
     2881//
     2882//end
    28832883//*****************************************************************************************************************
    28842884////*****************************************************************************************************************
     
    28962896        string NewWindowName
    28972897        string topWindow=WinName(0,1)
    2898         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2898        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28992899        //IN2G_CloneWindow2()
    29002900        IN2G_DuplicateGraphAndData()   
     
    30623062        String colorTable = "RainbowCycle"
    30633063 
    3064         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3064        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30653065        String list = TraceNameList( "", ";", 1 )
    30663066        Variable numItems = ItemsInList( list )
     
    30913091       Variable left= V_left, right= V_right, top= V_top, bottom= V_bottom
    30923092
    3093                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3093                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30943094       GetWindow kwTopWin, gsize
    30953095       String slashw
     
    31323132Function IN2G_ConvertQtoD(Qval,wavelength)      //D is in A, Q in A^-1
    31333133        variable Qval,wavelength
    3134         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3134        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31353135        return 2*pi/Qval
    31363136end
    31373137Function IN2G_ConvertDtoQ(Dval,wavelength)              //D is in A, Q in A^-1
    31383138        variable Dval,wavelength
    3139         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3139        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31403140        return 2*pi/Dval
    31413141end
     
    31433143        variable TTH,wavelength
    31443144        //q = 4pi sin(theta)/lambda
    3145         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3145        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31463146        return 4*pi*sin(TTH*pi/360)/wavelength
    31473147end
    31483148Function IN2G_ConvertQtoTTH(Qval,wavelength)            //TTH is in degrees, Q in A^-1
    31493149        variable Qval,wavelength
    3150         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3150        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31513151        return 114.592 * asin(Qval* wavelength / (4*pi))
    31523152end
    31533153Function IN2G_ConvertDtoTTH(Dval,wavelength)            //D is in A, TTH is degrees
    31543154        variable Dval,wavelength
    3155         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3155        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31563156        return 114.592 * asin((2 * pi / Dval)* wavelength / (4*pi))
    31573157end
     
    31593159        variable TTH,wavelength
    31603160        //q = 4pi sin(theta)/lambda
    3161         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3161        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31623162        return wavelength/(2*sin(TTH*pi/360))
    31633163end
     
    31673167Function/T IN2G_num2StrFull(val)
    31683168        Variable val
    3169         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3169        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31703170        Variable i = IN2G_placesOfPrecision(val)
    31713171        Variable absVal = abs(val)
     
    31813181static Function IN2G_placesOfPrecision(a)       // number of significant figures in a number (at most 16)
    31823182        Variable a
    3183         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3183        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31843184        a = IN2G_roundSignificant(abs(a),17)
    31853185        Variable i
     
    35363536        string dataFolder
    35373537       
    3538         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3538        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    35393539        variable expSize
    35403540        // this folder
     
    35673567        string userMessage
    35683568       
    3569         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3569        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    35703570        variable isUM= ParamIsDefault(userMessage)
    35713571       
     
    36003600                Wave Wxwidth
    36013601                Wave W1, W2, W3, W4, W5
    3602                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3602                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36033603                variable CalcSdev, CalcWidth, CalcW1, CalcW2, CalcW3, CalcW4, CalcW5, CalcXSdev
    36043604                CalcSdev = ParamIsDefault(Wsdev) ?  0 : 1
     
    37833783Function IN2G_FindCorrectLogScaleStart(StartValue,EndValue,NumPoints,MinStep)
    37843784        variable StartValue,EndValue,NumPoints,MinStep
    3785         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3785        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    37863786        Make/Free/N=3 w
    37873787        w={EndValue-StartValue, NumPoints,MinStep}
     
    37993799        Wave w          //this is {totalRange, NumSteps,MinStep}
    38003800        Variable x1     //this is startValue where we need to start with log stepping...
    3801         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3801        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    38023802        variable LastMinStep = 10^(log(X1) + (log(X1+w[0])-log(X1))/w[1]) - 10^(log(X1))
    38033803        return abs(LastMinStep-w[2])
     
    38893889        getWindow kwTopWin, wsizeDC
    38903890        //CheckBox ScrollWidown title="\\W614",proc=IN2G_ScrollWindowCheckProc, pos={V_right-75,2}
    3891         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3891        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    38923892        Button ScrollButtonUp title="\\W617",pos={(V_right-V_left)-17,2},size={15,15}, proc=IN2G_ScrollButtonProc
    38933893        Button ScrollButtonDown title="\\W623",pos={(V_right-V_left)-17,17},size={15,15}, proc=IN2G_ScrollButtonProc
     
    39013901        variable HowMuch
    39023902        string WIndowName                       
    3903         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3903        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39043904        String controls = ControlNameList(WIndowName)
    39053905        controls = RemoveFromList("ScrollButtonDown", controls )
     
    39303930Function IN2G_FindNewTextElements(w1,w2,reswave)
    39313931        Wave/t w1,w2,reswave
    3932         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3932        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39333933        //comment, up to 1e4 points seems reasonably fast (0.2sec), then gets really slow, 1e5 is 14 seconds.
    39343934        make/n=(numpnts(w1) + numpnts(w2))/free/t total
     
    39573957Function/T IN2G_ReturnExistingWaveName(FolderNm,WaveMatchStr)
    39583958        string FolderNm,WaveMatchStr
    3959         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3959        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39603960        if(!DataFolderExists(FolderNm))
    39613961                return ""
     
    39813981Function/T IN2G_ReturnExistingWaveNameGrep(FolderNm,WaveMatchStr)
    39823982        string FolderNm,WaveMatchStr
    3983         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3983        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39843984        if(!DataFolderExists(FolderNm))
    39853985                return ""
     
    40074007        //takes folder path string, if it starts with root: cretaes all folders as necessary, if not then creates folder from current location.
    40084008       
    4009         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4009        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    40104010        variable i, istart=0
    40114011        if(stringmatch(stringFromList(0,folderPathStr,":"),"root"))
     
    40234023Function IN2G_printvec(w)               // print a vector to screen
    40244024        Wave w
    4025         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4025        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    40264026        String name=NameOfWave(w)
    40274027        Wave/T tw=$GetWavesDataFolder(w,2)
     
    40664066        // E += Pts_avg_multiplier * abs(smooth(R over Pts_avg) - R)
    40674067        // min number of poitns is 3
    4068         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4068        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    40694069        if (Pts_avg<3)
    40704070                Pts_avg=3
     
    40964096        variable val, uncert,N
    40974097       
    4098         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4098        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    40994099        uncert = IN2G_roundSignificant(uncert,N)                //this rounds uncert to N sig. digits
    41004100        variable decPlaces, allPlaces
     
    41424142        Variable N                      // number of significant figures
    41434143
    4144                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4144                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    41454145        if (val==0 || numtype(val))
    41464146                return val
     
    41604160
    41614161
    4162                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4162                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    41634163        if (val==0 || numtype(val))
    41644164                return val
     
    41794179        variable DoubleSingleQuotes, EndingQuotes       //1 for single, 2 for double
    41804180       
    4181         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4181        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    41824182        string Separator
    41834183        if(DoubleSingleQuotes==1)
     
    42034203        string FullPointerToWaveVarStr
    42044204        //returns only the folder part of full pointer to wave/string/variable returned by IN2G_FolderSelectPanel
    4205         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4205        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    42064206        variable numItems=ItemsInList(FullPointerToWaveVarStr,":")
    42074207       
     
    42194219        string topGraphStr
    42204220
    4221         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4221        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    42224222        String topGraph
    42234223        if(ParamIsDefault(topGraphStr))
     
    42444244        string topGraphStr
    42454245
    4246         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4246        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    42474247        String topGraph
    42484248        if(ParamIsDefault(topGraphStr))
     
    43344334        string topGraphStr
    43354335
    4336         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4336        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    43374337        String topGraph
    43384338        if(ParamIsDefault(topGraphStr))
     
    43714371        variable UpDown                                    // 1 for up, 0 for down.
    43724372
    4373                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4373                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    43744374        if (val==0 || numtype(val))
    43754375                return val
     
    43924392        variable UseOpenSYmbols, SymbolSize, SameSymbol
    43934393
    4394         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4394        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    43954395        String topGraph=WinName(0,1)
    43964396        Variable traceIndex, numTraces
     
    44234423        variable LineThickness, varyLines
    44244424
    4425         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4425        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    44264426        String topGraph=WinName(0,1)
    44274427        Variable traceIndex, numTraces
     
    44454445        variable LogXAxis, XOffset ,LogYAxis, YOffset
    44464446
    4447         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4447        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    44484448        String topGraph=WinName(0,1)
    44494449        Variable traceIndex, numTraces
     
    44754475        string topGraphStr, WaveNoteNameKeyStr
    44764476
    4477         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4477        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    44784478        String topGraph
    44794479        if(ParamIsDefault(topGraphStr))
     
    45484548        string topGraphStr
    45494549
    4550         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4550        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    45514551        String topGraph, TraceNames
    45524552        variable numTraces, i
     
    45814581        string SVARString, TitleString, StartingFolder, ExecuteMyFunction       
    45824582        variable FolderOrFile, AllowNew,AllowDelete,AllowRename ,AllowLiberal           
    4583         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4583        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    45844584        //              Jan Ilavsky, 12/13/2003 version 1
    45854585        //      This is universal widget for programmers to call when user needs to select folder and possibly string/wave/variable name
     
    46374637        variable FolderOrFileL,AllowLiberalL
    46384638
    4639         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4639        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    46404640        variable i, imax=ItemsInList(SVARStringL,":")
    46414641        For(i=0;i<imax-1;i+=1)
     
    46754675static Function IN2G_FolderSelectRefreshList()
    46764676
    4677         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4677        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    46784678        DFref oldDf= GetDataFolderDFR()
    46794679
     
    47154715static Function IN2G_FolderSelectRefFldrCont()
    47164716
    4717         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4717        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    47184718        DFref oldDf= GetDataFolderDFR()
    47194719
     
    47664766        Variable checked
    47674767       
    4768         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4768        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    47694769        if(cmpstr(ctrlName,"DisplayWaves"))
    47704770       
     
    47804780        Variable event  //1=mouse down, 2=up, 3=dbl click, 4=cell select with mouse or keys
    47814781                                        //5=cell select with shift key, 6=begin edit, 7=end
    4782         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4782        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    47834783        SVAR CurrentFolder=root:Packages:FolderSelectPanel:CurrentFolder
    47844784        SVAR LastFolder=root:Packages:FolderSelectPanel:LastFolder
     
    48724872        String ctrlName
    48734873
    4874         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4874        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    48754875                DFref oldDf= GetDataFolderDFR()
    48764876
     
    50025002        String varName
    50035003       
    5004         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5004        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    50055005        NVAR AllowLiberal=root:Packages:FolderSelectPanel:AllowLiberal
    50065006
     
    50465046        string TitleString
    50475047        variable FolderOrFile,AllowNew,AllowDelete,AllowRename
    5048         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5048        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    50495049        KillWIndow/Z IN2G_FolderSelectPanelPanel
    50505050        //PauseUpdate                   // building window...
     
    51155115        variable NewStepFraction
    51165116        //updates setVar step. Needs setVarName, and fraction of current value to be new step
    5117         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5117        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    51185118        ControlInfo $MyControlName
    51195119        variable StepFraction=NewStepFraction
     
    51415141        variable starting,Ending
    51425142       
    5143         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5143        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    51445144        if (starting)
    51455145                if(cmpstr(str[0],"'")==0)
     
    51655165        String newpart
    51665166
    5167         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5167        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    51685168        Variable id=strlen(oldpart)
    51695169        Variable i
     
    52345234        Wave xWave, yWave                                               // input/output X, Y waves
    52355235       
    5236         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5236        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    52375237        variable yp,ypm1,sum=0
    52385238        Variable pt=1,n=numpnts(yWave)
     
    52535253        string TheSwitch, NewName
    52545254//this function creates strings or variables with the name passed
    5255         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5255        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    52565256        if(strlen(NewName)<1)
    52575257                return 0
     
    52795279        variable A1, S1, A2, S2 //this function divides A1 by A2 with errors
    52805280       
    5281         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5281        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    52825282        variable Error=(sqrt((A1^2*S2^4)+(S1^2*A2^4)+((A1^2+S1^2)*A2^2*S2^2))) / (A2*(A2^2-S2^2))
    52835283       
     
    52885288        variable A1, S1, A2, S2 //this function multiplies two numbers with errors
    52895289       
    5290         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5290        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    52915291        variable Error=sqrt((A1*S2)^2+(A2*S1)^2+(S1*S2)^2)
    52925292       
     
    52975297        variable A1, S1, A2, S2 //this function subtracts A2 from A1 with errors
    52985298       
    5299         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5299        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53005300        variable Error=sqrt(S1^2+S2^2)
    53015301       
     
    53075307        variable A1, S1, A2, S2 //this function divides A1 by A2 with errors
    53085308       
    5309         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5309        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53105310        variable Result=A1/A2
    53115311        variable Error=(sqrt((A1^2*S2^4)+(S1^2*A2^4)+((A1^2+S1^2)*A2^2*S2^2))) / (A2*(A2^2-S2^2))
     
    53185318        variable A1, S1, A2, S2 //this function multiplies two numbers with errors
    53195319       
    5320         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5320        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53215321        variable Result=A1*A2
    53225322        variable Error=sqrt((A1*S2)^2+(A2*S1)^2+(S1*S2)^2)
     
    53295329        variable A1, S1, A2, S2 //this function subtracts A2 from A1 with errors
    53305330       
    5331         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5331        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53325332        variable Result=A1-A2
    53335333        variable Error=sqrt(S1^2+S2^2)
     
    53395339        variable A1, S1, A2, S2 //this function sums two numbers with errors
    53405340       
    5341         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5341        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53425342        variable Result=A1+A2
    53435343        variable Error=sqrt(S1^2+S2^2)
     
    53565356        Variable AxisPos,LabelX,LabelY
    53575357       
    5358         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5358        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53595359        string CurrentListOfrWaves=TraceNameList(GraphName,";",1)
    53605360        //here we store what traces are in the graph before     
     
    53875387        Variable AxisPos,LabelX,LabelY
    53885388       
    5389         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5389        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53905390        string CurrentListOfrWaves=TraceNameList(GraphName,";",1)
    53915391        //here we store what traces are in the graph before     
     
    54205420        //paused for user procedure
    54215421       
    5422         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5422        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    54235423        string PanelName=WinName(0,64)
    54245424        DoWindow /K $PanelName
     
    54315431        string WindowName, which, where
    54325432       
    5433         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5433        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    54345434        if (cmpstr(where,"up")==0)
    54355435                SetAxis/W=$(WindowName) /A/E=0 $which
     
    54505450        variable Include                //and 0 (do not include)
    54515451       
    5452         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5452        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    54535453        if (Include==0) //do not include :
    54545454                if (cmpstr(":", FldrName[StrLen(FldrName)-1])==0)
     
    54695469Function IN2G_CleanupFolderOfGenWaves(fldrname)         //cleans waves from waves created by generic plot
    54705470        string fldrname
    5471         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5471        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    54725472        string dfold=GetDataFolder(1)
    54735473        setDataFolder fldrname
     
    54885488        string TextToBeInserted                                         //and appends text to the end of the notebook
    54895489           
    5490         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5490        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    54915491        TextToBeInserted=TextToBeInserted+"\r"
    54925492    SVAR/Z nbl=root:Packages:Indra3:NotebookName
     
    55065506     
    55075507           
    5508         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5508        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    55095509             String RecMacro
    55105510             Variable AsPosition, TitleEnd
     
    55395539        string str
    55405540       
    5541         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5541        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    55425542        str=RemoveListItem(0, Str , ":")                                        //remove the "FOLDERS"
    55435543        variable i=0, imax=itemsInList(str,",")                 //working parameters
     
    55705570        string str
    55715571       
    5572         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5572        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    55735573        str=RemoveListItem(0, Str , ":")                                        //remove the "FOLDERS"
    55745574        variable i=0, imax=itemsInList(str,",")                 //working parameters
     
    56105610        variable item                                                                           //1-directories, 2-waves, 4 - variables, 8- strings
    56115611       
    5612         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5612        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    56135613        string MyList=""
    56145614        DFREF TestDFR=$(df)
     
    56525652        dfSave=GetDataFolder(1)
    56535653       
    5654         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5654        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    56555655        SVAR SpecFile=root:Packages:Indra3:PanelSpecScanSelected
    56565656        SetDataFolder $SpecFile
     
    56755675        string str
    56765676       
    5677         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5677        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    56785678        str="*"+str+"*"
    56795679        String result="", tempstring=""
     
    57095709        string notetext                                                 //to all waves in the folder
    57105710       
    5711         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5711        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57125712        string ListOfWaves=WaveList("*",";",""), temp
    57135713        variable i=0, imax=ItemsInList(ListOfWaves)
     
    57215721        string WaveNm, NewValue
    57225722       
    5723         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5723        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57245724        Wave Wv=$WaveNm
    57255725        string Wnote=note(Wv)
     
    57335733        string WaveNm, NewValue
    57345734       
    5735         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5735        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57365736        Wave Wv=$WaveNm
    57375737        string Wnote=note(Wv)
     
    57475747        string ListOfWaveNames, Key, notetext                                                   //to ListOfWaveNames waves in the folder
    57485748       
    5749         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5749        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57505750        string ListOfWaves=ListOfWaveNames, temp
    57515751        variable i=0, imax=ItemsInList(ListOfWaves)
     
    57625762        string Key, notetext                                                    //to all waves in the folder
    57635763       
    5764         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5764        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57655765        string ListOfWaves=WaveList("*",";",""), temp
    57665766        variable i=0, imax=ItemsInList(ListOfWaves)
     
    57775777        string WaveNm, KeyWrd, NewValue
    57785778       
    5779         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5779        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57805780        Wave/Z Wv=$WaveNm
    57815781        if(WaveExists(Wv))
     
    57935793        string WaveNm, Str
    57945794       
    5795         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5795        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    57965796        Wave Wv=$WaveNm
    57975797        string Wnote=note(Wv)
     
    58145814
    58155815Function IN2G_AutoAlignGraphAndPanel()
    5816         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5816        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    58175817        string GraphName=Winname(0,1)
    58185818        string PanelName=WinName(0,64)
     
    58245824
    58255825Function IN2G_AutoAlignPanelAndGraph()
    5826         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5826        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    58275827        string GraphName=Winname(0,1)
    58285828        string PanelName=WinName(0,64)
     
    58365836Function IN2G_CleanupFolderOfWaves()            //cleans waves from fit_ and W_ waves
    58375837
    5838         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5838        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    58395839        string ListOfWaves=WaveList("W_*",";","")+WaveList("fit_*",";",""), temp
    58405840        variable i=0, imax=ItemsInList(ListOfWaves)
     
    58505850
    58515851Function/S IN2G_FixTheFileName()                //this will not work so simple, we need to remove symbols not allowed in operating systems
    5852         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5852        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    58535853        string filename=GetDataFolder(1)
    58545854        SVAR SourceSPECDataFile=SpecSourceFileName
     
    58765876//              KillGraphsAndTables()
    58775877        string ctrlname
    5878         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5878        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    58795879               
    58805880        if (strlen(WinList("UPD control",";","WIN:64"))>0)              //Kills the controls when not needed anymore
     
    59015901        string ctrlname
    59025902       
    5903         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5903        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59045904      String wName=WinName(0, 1)              // 1=graphs, 2=tables,4=layouts
    59055905                dowindow /K $wName
     
    59135913        string ctrlname
    59145914       
    5915         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5915        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59165916      String wName=WinName(0, 1)              // 1=graphs, 2=tables,4=layouts
    59175917                dowindow /K $wName
     
    59295929       String wName=WinName(0, 1)              // 1=graphs, 2=tables,4=layouts
    59305930
    5931                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5931                ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59325932       dowindow /K $wName
    59335933End
     
    59395939        string WvList
    59405940       
    5941         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5941        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59425942        variable items=ItemsInList(WvList), i
    59435943        For (i=0;i<items;i+=1)
     
    59505950Proc IN2G_BasicGraphStyle()
    59515951        PauseUpdate             // modifying window...
    5952         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5952        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59535953        ModifyGraph/Z margin(top)=100
    59545954        ModifyGraph/Z mode=4, gaps=0
     
    60176017        string temp
    60186018
    6019         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6019        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    60206020        variable height
    60216021        variable width
     
    60636063        string temp
    60646064
    6065         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6065        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    60666066        variable height
    60676067        variable width
     
    61316131        string ctrlname
    61326132       
    6133         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6133        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    61346134        variable pointNumberToBeRemoved=xcsr(A)                         //this part should be done always
    61356135                Wave FixMe=CsrWaveRef(A)
     
    61426142        string ctrlname
    61436143       
    6144         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6144        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    61456145        variable pointNumberStart=xcsr(A)                               //this part should be done always
    61466146        variable pointNumberEnd=xcsr(B)
     
    61586158        string ctrlname
    61596159       
    6160         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6160        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    61616161        variable pointNumberToBeRemoved=xcsr(A)                         //this part should be done always
    61626162                Wave FixMe=CsrWaveRef(A)
     
    61696169        string ctrlname
    61706170       
    6171         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6171        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    61726172        variable pointNumberToBeRemoved=xcsr(B)                         //this part should be done always
    61736173                Wave FixMe=CsrWaveRef(B)
     
    61816181        string ctrlname
    61826182       
    6183         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6183        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    61846184        if (strlen(CsrWave(A))==0)
    61856185                Abort "cursor A is not in the graph...nothing to do..."
     
    62236223Function IN2G_ResetGraph(ctrlname) : Buttoncontrol
    62246224        string ctrlname
    6225         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6225        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    62266226                SetAxis/A                                                                               //rescales graph to automatic scaling
    62276227End
     
    62326232Function IN2G_ReversXAxis(ctrlname) : Buttoncontrol
    62336233        string ctrlname
    6234         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6234        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    62356235        SetAxis/A/R bottom                                                                      //reverse X axis
    62366236End
     
    62606260        String list = "", templist, tempWvName, tempWaveType
    62616261        variable i, skipRest, j
    6262                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6262                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    62636263               
    62646264        dfSave = GetDataFolder(1)
     
    63256325        //Empty folders shoudl be skipped. If mask string is "*", then any non-empty folder should be included...
    63266326                                 
    6327                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6327                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    63286328        String dfSave
    63296329        String list = "", templist, tempWvName, TempWvList
     
    64026402        variable i, skipRest
    64036403       
    6404                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6404                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    64056405        dfSave = GetDataFolder(1)
    64066406        if (!DataFolderExists(startDF))
     
    64516451        Wave Wv1, Wv2, Wv3                                      //assume same number of points in the waves
    64526452       
    6453         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6453        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    64546454        variable i=0, imax=numpnts(Wv1)-1
    64556455        for (i=imax;i>=0;i-=1)
     
    64646464        Wave Wv1, Wv2                                   //assume same number of points in the waves
    64656465       
    6466         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6466        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    64676467        variable i=0, imax=numpnts(Wv1)-1
    64686468        for (i=imax;i>=0;i-=1)
     
    64776477        Wave Wv1                                //assume same number of points in the waves
    64786478       
    6479         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6479        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    64806480        variable i=0, imax=numpnts(Wv1)-1
    64816481        for (i=imax;i>=0;i-=1)
     
    64906490        Wave Wv1, Wv2, Wv3, wv4,wv5                                     //assume same number of points in the waves
    64916491       
    6492         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6492        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    64936493        variable i=0, imax=numpnts(Wv1)-1
    64946494        for (i=imax;i>=0;i-=1)
     
    65036503        Wave Wv1, Wv2, Wv3, wv4,wv5, wv6                                        //assume same number of points in the waves
    65046504       
    6505         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6505        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65066506        variable i=0, imax=numpnts(Wv1)-1
    65076507        for (i=imax;i>=0;i-=1)
     
    65166516        Wave Wv1, Wv2, Wv3, wv4,wv5, wv6        , wv7                           //assume same number of points in the waves
    65176517       
    6518         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6518        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65196519        variable i=0, imax=numpnts(Wv1)-1
    65206520        for (i=imax;i>=0;i-=1)
     
    65296529        Wave Wv1, Wv2, Wv3, wv4,wv5, wv6        , wv7, wv8, wv9, wv10                           //assume same number of points in the waves
    65306530       
    6531         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6531        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65326532        variable i=0, imax=numpnts(Wv1)-1
    65336533        for (i=imax;i>=0;i-=1)
     
    65426542        Wave Wv1, Wv2, Wv3, wv4                         //assume same number of points in the waves
    65436543       
    6544         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6544        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65456545        variable i=0, imax=numpnts(Wv1)-1
    65466546        for (i=imax;i>=0;i-=1)
     
    65556555        Wave Wv1                        //assume same number of points in the waves
    65566556       
    6557         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6557        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65586558        variable i=0, imax=numpnts(Wv1)-1
    65596559        for (i=imax;i>=0;i-=1)
     
    65686568        Wave NewQ,NewIntensity,OldQ,Intensity                   //assume same number of points in the waves
    65696569       
    6570         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6570        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65716571        Duplicate/Free Intensity,TmpInt
    65726572        wavestats/Q TmpInt
     
    65906590        Wave Wv1, Wv2, Wv3                                      //assume same number of points in the waves
    65916591       
    6592         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6592        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    65936593        variable i=0, imax=numpnts(Wv1)-1
    65946594        for (i=imax;i>=0;i-=1)
     
    66346634                        //finds name of the old legend and generates new one with the same name, if the legend does not exists
    66356635                        //it cretaes new one with name legend1
    6636         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6636        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    66376637        variable NumberOfWaves=ItemsInList(TraceNameList("",";",1))
    66386638        if (NumberOfWaves==0)
     
    66986698        string which
    66996699       
    6700         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6700        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    67016701        PathInfo ExportDatapath
    67026702        NewPath/C/O/M="Select folder for exported data..." ExportDatapath
     
    68926892Function/S IN2G_FixTheFileName2()
    68936893        WAVE USAXS_PD
    6894         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6894        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    68956895        if (WaveExists(USAXS_PD))
    68966896                string SourceSPECDataFile=stringByKey("DATAFILE",Note(USAXS_PD),"=")
     
    69056905        String str
    69066906        Variable i = 0
    6907         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6907        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    69086908        do
    69096909                if (char2num(str[i,i])<32)
     
    69256925        string strIN
    69266926       
    6927         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6927        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    69286928        Variable i = 0
    69296929        //a = 97, A=65
     
    69486948        string InFolderName                     //thsi is root:Packages:SomethingHere, will make SomethingHere unique.
    69496949       
    6950         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6950        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    69516951        string OutFoldername, tmpFldr
    69526952        OutFoldername =InFolderName
     
    69726972Function/S IN2G_GetUniqueFileName(filename)
    69736973        string filename
    6974         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6974        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    69756975        string FileList= IndexedFile(ExportDatapath,-1,"????" )
    69766976        variable i
     
    69946994        Wave E
    69956995       
    6996         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6996        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    69976997        //here we trim for small Qs
    69986998       
     
    70187018        //this function pastes the content of Wave note from waveNm to textWv
    70197019       
    7020         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7020        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    70217021        Wave WvwithNote=$waveNm
    70227022        string ListOfNotes=note(WvwithNote)
     
    70447044        Variable levels                                                 //set 1 for long type and 0 for short type return
    70457045                                 
    7046                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7046                        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    70477047        //fix if the startDF does not have trailing colon
    70487048        if (strlen(startDF)>1)
     
    70927092Function IN2G_CheckTheFolderName()
    70937093
    7094         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7094        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    70957095        SVAR/Z FolderName
    70967096        if (!SVAR_Exists(FolderName))   
     
    71237123//      String Type
    71247124       
    7125         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7125        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    71267126        String dfSave
    71277127        dfSave=GetDataFolder(1)
     
    71427142Function IN2G_AppendScanNumAndComment()
    71437143
    7144         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7144        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    71457145        SVAR List=root:Packages:Indra3:MyList
    71467146        SVAR/Z SpecComment
     
    71607160        Variable MinPoint, MaxPoint, removeNegs
    71617161       
    7162         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7162        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    71637163        Variable temp
    71647164        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    72147214        Variable MinPoint, MaxPoint, removeNegs
    72157215       
    7216         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7216        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    72177217        Variable temp
    72187218        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    72697269        Variable MinPoint, MaxPoint, removeNegs
    72707270       
    7271         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7271        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    72727272        Variable temp
    72737273        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    73247324        Variable MinPoint, MaxPoint, removeNegs
    73257325       
    7326         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7326        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    73277327        Variable temp
    73287328        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    73807380        Variable MinPoint, MaxPoint, removeNegs
    73817381       
    7382         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7382        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    73837383        Variable temp
    73847384        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    74367436        Variable MinPoint, MaxPoint, removeNegs
    74377437       
    7438         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7438        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    74397439        Variable temp
    74407440        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    74957495        Variable MinPoint, MaxPoint, removeNegs
    74967496       
    7497         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7497        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    74987498        Variable temp
    74997499        if (MaxPoint<MinPoint)  //lets make sure the min is min and max is max
     
    75557555        //MinVal is in pixles
    75567556       
    7557         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7557        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    75587558#if(IgorVersion()>8.1)
    75597559        return 1
     
    76017601        variable PositionLeft,PositionTop
    76027602        //PauseUpdate                   // building window...
    7603         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7603        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    76047604        Variable pleft=PositionLeft,ptop=PositionTop,pright=PositionLeft+380,pbottom=PositionTop+145                    // these change panel size
    76057605        NewPanel/K=1 /W=(pleft,ptop,pright,pbottom)
     
    77717771        variable n1,n2,S
    77727772        Wave/Z xWv,yWv,dyWv,AWv,CWv
    7773         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7773        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    77747774                // CWv is optional parameter, if not needed use $"" as input and the function will not complain
    77757775                // Input data
     
    79177917        STRUCT WMButtonAction &ba
    79187918
    7919         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     7919        ////IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    79207920        switch( ba.eventCode )
    79217921                case 2: // mouse up
  • trunk/User Procedures/Indra 2/IN3_Calculations.ipf

    r1143 r1169  
    20162016Function IN3_OnLineDataProcessing()     
    20172017        //create global variables
    2018         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2018        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20192019        String OldDf=GetDataFolder(1)
    20202020        SetDataFOlder root:Packages:Indra3
     
    20992099        switch( ba.eventCode )
    21002100                case 2: // mouse up
    2101                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2101                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21022102                        // click code here
    21032103                        if(stringmatch("StartBackgrTask",ba.ctrlName))
     
    21242124Function IN3_StartFolderWatchTask()
    21252125        //Variable numTicks = 5 * 60 // Run every two seconds (120 ticks)
    2126         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2126        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21272127        NVAR BckgUpdateInterval= root:Packages:Indra3:BckgMonitorParams:BckgUpdateInterval
    21282128                CtrlNamedBackground IN3_MonitorDataFolder, period=BckgUpdateInterval*60, proc=IN3_MonitorFldrBackground
     
    21392139
    21402140Function IN3_StopFolderWatchTask()
    2141         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2141        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21422142   CtrlNamedBackground IN3_MonitorDataFolder, stop
    21432143        Printf "FolderWatch background task (\"IN3_MonitorDataFolder\") stopped\r"
     
    21552155        STRUCT WMPopupAction &pa
    21562156
    2157         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2157        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21582158        switch( pa.eventCode )
    21592159                case 2: // mouse up
     
    21832183        STRUCT WMCheckboxAction &cba
    21842184
    2185         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2185        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21862186        switch( cba.eventCode )
    21872187                case 2: // mouse up
     
    22172217        STRUCT WMBackgroundStruct &s
    22182218       
    2219         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2219        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22202220        //this should monitor result of Refresh on the folder and grab the new data set and process it.
    22212221        Wave/T ListOf2DSampleData=root:Packages:USAXS_FlyScanImport:WaveOfFiles
  • trunk/User Procedures/Indra 2/IN3_SamplePlate.ipf

    r1155 r1169  
    376376        //see IRB1_ConcSeriesListBoxProc
    377377
    378         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     378        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    379379        Variable row = lba.row
    380380        Variable col = lba.col
  • trunk/User Procedures/Irena/IR1_ImportData.ipf

    r1140 r1169  
    6969
    7070Function IR1I_ImportSASASCIIDataMain()
    71         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     71        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    7272        IN2G_CheckScreenSize("height",720)
    7373        DoWindow IR1I_ImportOtherASCIIData
     
    104104
    105105Function IR1I_MainCheckVersion()       
    106         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     106        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    107107        DoWindow IR1I_ImportData
    108108        if(V_Flag)
     
    121121
    122122Function IR1I_MainCheckVersion2()       
    123         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     123        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    124124        DoWindow IR1I_ImportOtherASCIIData
    125125        if(V_Flag)
     
    138138
    139139Function IR1I_MainCheckVersionNexus()   
    140         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     140        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    141141        DoWindow IR1I_ImportNexusCanSASData
    142142        if(V_Flag)
     
    158158
    159159Proc IR1I_ImportSASASCIIData()
    160         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     160        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    161161        PauseUpdate             // building window...
    162162        NewPanel /K=1 /W=(3,40,430,760)/N=IR1I_ImportData as "Import SAXS/SANS data"
     
    323323Function IR1_ImportListBoxProc(lba) : ListBoxControl
    324324        STRUCT WMListboxAction &lba
    325         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     325        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    326326
    327327        Variable row = lba.row
     
    355355//************************************************************************************************************
    356356Function IR1I_ImportDataFnct()
    357         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     357        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    358358
    359359        string TopPanel=WinName(0, 64)
     
    473473
    474474Function IR1I_CheckForProperNewFolder()
    475         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     475        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    476476
    477477        SVAR NewDataFolderName = root:packages:ImportData:NewDataFolderName
     
    486486Function IR1I_RecordResults(selectedFile)
    487487        string selectedFile     //before or after - that means fit...
    488         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     488        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    489489
    490490        DFref oldDf= GetDataFolderDFR()
     
    625625        string InputName, RemoveStringFromName
    626626        variable TrunkateStart,TrunkateEnd
    627         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     627        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    628628       
    629629        NVAR Igor8UseLongNames = root:Packages:IrenaConfigFolder:Igor8UseLongNames
     
    651651Function IR1I_ProcessImpWaves(selectedFile)
    652652        string selectedFile
    653         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     653        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    654654
    655655        variable i, numOfInts, numOfQs, numOfErrs, numOfQErrs, refNum
     
    10291029Function/S IR1I_RemoveBadCharacters(StringName)
    10301030        string StringName
    1031         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1031        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10321032       
    10331033        //here we can clean up what Igor allows but would be major problem with my code, such as ( or ) from names
     
    10471047Function IR1I_ImportOneFile(selectedFile)
    10481048        string selectedFile
    1049         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1049        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10501050               
    10511051        NVAR SkipNumberOfLines=root:Packages:ImportData:SkipNumberOfLines
     
    10791079        String fileName                 // File name or full path
    10801080        String FirstPoint               //string containing first point number....
    1081                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1081                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10821082       
    10831083        Variable refNum = 0
     
    11171117
    11181118Function IR1I_KillAutoWaves()
    1119         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1119        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11201120
    11211121        variable i
     
    11321132Function IR1I_CreateImportDataFolder(selectedFile)
    11331133        string selectedFile
    1134         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1134        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11351135
    11361136        SVAR NewDataFolderName = root:packages:ImportData:NewDataFolderName
     
    11711171        Variable popNum
    11721172        String popStr
    1173         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1173        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11741174
    11751175        if (Cmpstr(ctrlName,"SelectFolderNewData")==0)
     
    12101210        String varStr
    12111211        String varName
    1212         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1212        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12131213
    12141214        if (cmpstr(ctrlName,"DataExtensionString")==0)
     
    12301230Function IR1I_ButtonProc(ctrlName) : ButtonControl
    12311231        String ctrlName
    1232         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1232        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12331233       
    12341234        if(cmpstr(ctrlName,"SelectDataPath")==0)
     
    12761276Function IR1I_SelectDeselectAll(SetNumber)
    12771277                variable setNumber
    1278                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1278                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12791279               
    12801280                Wave WaveOfSelections=root:Packages:ImportData:WaveOfSelections
     
    12871287//************************************************************************************************************
    12881288Function IR1I_TestImport()
    1289         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1289        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12901290
    12911291        string TopPanel=WinName(0, 64)
     
    13451345//************************************************************************************************************
    13461346Function IR1I_TestImportNotebook()
    1347         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1347        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13481348
    13491349        string TopPanel=WinName(0, 64)
     
    13781378//************************************************************************************************************
    13791379Function IR1I_TestPlotData()
    1380         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1380        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13811381
    13821382        string TopPanel=WinName(0, 64)
     
    14571457
    14581458Function IR1I_FIxCheckboxesForWaveTypes()
    1459         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1459        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14601460
    14611461        string TopPanel=WinName(0, 64)
     
    15091509
    15101510Function IR1I_SelectDataPath()
    1511         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1511        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15121512
    15131513        NewPath /M="Select path to data to be imported" /O ImportDataPath
     
    15271527        String ctrlName
    15281528        Variable checked
    1529         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1529        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15301530        string TopPanel=WinName(0, 64)
    15311531       
     
    21762176Function IR1I_UpdateListOfFilesInWvs()
    21772177
    2178         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2178        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21792179        SVAR DataPathName = root:Packages:ImportData:DataPathName
    21802180        SVAR DataExtension  = root:Packages:ImportData:DataExtension
     
    22212221Function IR1I_InitializeImportData()
    22222222       
    2223         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2223        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22242224        string OldDf = GetDataFolder(1)
    22252225       
     
    23372337
    23382338Function IR1I_ImportOtherASCIIMain()
    2339         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2339        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23402340                //IR1_KillGraphsAndPanels()
    23412341        IN2G_CheckScreenSize("height",720)
     
    23732373
    23742374Function IR1I_ImportOtherASCIIDataFnct()
    2375         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2375        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23762376        PauseUpdate             // building window...
    23772377        NewPanel /K=1 /W=(3,40,430,760)/N=IR1I_ImportOtherASCIIData as "Import non-SAS data"
     
    25142514//************************************************************************************************************
    25152515Function IR1I_ImportDataFnct2()
    2516         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2516        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25172517
    25182518        string TopPanel=WinName(0, 64)
     
    26492649Function IR1I_ProcessImpWaves2(selectedFile)
    26502650        string selectedFile
    2651         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2651        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26522652
    26532653        variable i, numOfInts, numOfQs, numOfErrs, numOfQErrs, refNum
     
    29632963
    29642964Function IR1I_ImportNexusCanSASMain()
    2965         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2965        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29662966                //IR1_KillGraphsAndPanels()
    29672967        IN2G_CheckScreenSize("height",720)
     
    30093009
    30103010Function IR1I_ImportNexusDataFnct()
    3011         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3011        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30123012        PauseUpdate             // building window...
    30133013        NewPanel /K=1 /W=(3,40,430,620)/N=IR1I_ImportNexusCanSASData as "Import Nexus canSAS data"
     
    31143114//************************************************************************************************************
    31153115Function IR1I_ImportDataFnctNexus()
    3116         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3116        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31173117
    31183118        string TopPanel=WinName(0, 64)
  • trunk/User Procedures/Irena/IR1_Main.ipf

    r1161 r1169  
    131131//report any problems to: ilavsky@aps.anl.gov
    132132//Comment for me: Limit yourself to less than 30 items in the menu, Windows are limited to 30 items. Note: "---" counts as one item!
    133 //comment - add these:          IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    134 //and these                                             IN2G_PrintDebugStatement(IrenaDebugLevel, 0..5 ,"Error message")
     133//comment - add these:          //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     134//and these                                             //IN2G_PrintDebugStatement(IrenaDebugLevel, 0..5 ,"Error message")
    135135
    136136
  • trunk/User Procedures/Irena/IR2_DataMiner.ipf

    r1118 r1169  
    136136Function IR3B_MetadataBrowser()
    137137
    138         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     138        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    139139        IN2G_CheckScreenSize("width",1000)
    140140        IN2G_CheckScreenSize("height",670)
     
    173173//************************************************************************************************************
    174174Function IR3B_MetadataBrowserPanelFnct()
    175         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     175        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    176176        PauseUpdate             // building window...
    177177        NewPanel /K=1 /W=(5.25,43.25,800,820) as "Metadata Browser tool"
     
    257257        STRUCT WMButtonAction &ba
    258258
    259         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     259        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    260260        variable i
    261261        string FoldernameStr
     
    314314        STRUCT WMPopupAction &pa
    315315
    316         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     316        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    317317        String ctrlName=Pa.ctrlName
    318318        Variable popNum=Pa.popNum
     
    322322                return 0
    323323        endif
    324         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     324        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    325325        if(stringmatch(ctrlName,"ExtractFromFileName"))
    326326                //do something here
     
    338338        STRUCT WMSetVariableAction &sva
    339339
    340         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     340        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    341341        variable tempP
    342342        switch( sva.eventCode )
     
    367367        STRUCT WMListboxAction &lba
    368368
    369         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     369        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    370370        Variable row = lba.row
    371371        WAVE/T/Z listWave = lba.listWave
     
    412412static Function IR3B_DisplayMetadataResults()
    413413
    414         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     414        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    415415        DfRef OldDf=GetDataFolderDFR()
    416416        SVAR FldrWithData=root:Packages:Irena:MetadataBrowser:SaveToFoldername
     
    450450static Function IR3B_DeleteMetadataResults()
    451451
    452         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     452        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    453453        DfRef OldDf=GetDataFolderDFR()
    454454        DoAlert/T="Are you sure???" 1, "Extracted metadata waves will be deleted, are you REALLY sure you want to do this?"
     
    481481static Function IR3B_PlotSelectedResults()
    482482
    483         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     483        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    484484        DfRef OldDf=GetDataFolderDFR()
    485485        //get needed values...
     
    508508        variable Add                    //Add=1 to add, 0 to remove
    509509
    510         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     510        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    511511        string KeyName=StringFromList(0, ItemToAddorRemove, "=")
    512512        Wave/T listWave=root:Packages:Irena:MetadataBrowser:SeletectedItems
     
    539539Function IR3B_DoubleClickAction(FoldernameStr)
    540540                string FoldernameStr
    541                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     541                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    542542
    543543                IR3B_DisplayWaveNote(FoldernameStr)
     
    549549Function IR3B_MouseDownAction(FoldernameStr)
    550550                string FoldernameStr
    551                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     551                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    552552
    553553                IR3B_DisplayWaveNote(FoldernameStr)
     
    558558        string ParameterSelected
    559559               
    560         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     560        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    561561        DfRef OldDf=GetDataFolderDFR()
    562562        SetDataFolder root:Packages:Irena:MetadataBrowser                                       //go into the folder
     
    613613        string FolderNameStr, KeyString
    614614
    615         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     615        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    616616        SVAR DataFolderName=root:Packages:Irena:MetadataBrowser:DataFolderName
    617617        SVAR IntensityWaveName=root:Packages:Irena:MetadataBrowser:IntensityWaveName
     
    655655        string FolderNameStr
    656656
    657         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     657        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    658658        DfRef OldDf=GetDataFolderDFR()
    659659        SetDataFolder root:Packages:Irena:MetadataBrowser                                       //go into the folder
     
    779779        string FolderNameStr
    780780       
    781         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     781        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    782782        DfRef OldDf=GetDataFolderDFR()
    783783        SetDataFolder root:Packages:Irena:MetadataBrowser                                       //go into the folder
     
    841841
    842842static Function IR3B_InitMetadataBrowser()     
    843         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     843        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    844844        DfRef OldDf=GetDataFolderDFR()
    845845        string ListOfVariables
  • trunk/User Procedures/Irena/IR2_PDDF.ipf

    r1069 r1169  
    16751675        TextBox/K/N=MooreFitNote
    16761676
    1677         NVAR SlitSmearedData=root:Packages:Irena_PDDF:UseSMRData       
    1678         if (SlitSmearedData)                            //if we are working with slit smeared data
    1679                 IR2Pr_ExtendQVecForSmearing()                           //here we extend them by slitLength
    1680         endif           
    1681 
    1682         //testing....   New Formfactor calculations Check that the G matrix actually exists. We need it...
    1683         //we will setup only form factor G matrix G_matrixFF, which will be scaled by contrast later on...
    1684         Wave/Z G_matrix=root:Packages:Irena_PDDF:G_matrix
    1685         Wave Q_vec=root:Packages:Irena_PDDF:Q_vec
    1686         Wave R_distribution=root:Packages:Irena_PDDF:R_distribution
    1687         variable M=numpnts(Q_vec)
    1688         variable N=numpnts(R_distribution)
    1689         if(!WaveExists(G_matrix))
    1690                 Make/D/O/N=(M,N) $("G_matrix")
    1691                 Wave G_matrix=root:Packages:Irena_PDDF:G_matrix
    1692         endif   
    1693         //generate G matrix...
    1694         IR2Pr_GenGmatrixForPDF(G_matrix,Q_vec,R_distribution)
    1695 
    1696         //now handle the contarst by copying data into the G_matrix
    1697 //              G_matrix=G_matrixFF * ScatteringContrast*1e20           //this multiplyies by scattering contrast
    1698         //done with G matrix processing, if it slit smeared let's fix it and that is all....
    1699         if (SlitSmearedData)                            //if we are working with slit smeared data
    1700                 IR2Pr_SmearGMatrix()                                                    //here we smear the Columns in the G matrix
    1701                 IR2Pr_ShrinkGMatrixAfterSmear()                 //here we cut the G matrix back in length
    1702         endif           
    1703 
    17041677        NVAR UseRegularization=root:Packages:Irena_PDDF:UseRegularization
    17051678        NVAR UseMoore=root:Packages:Irena_PDDF:UseMoore
     1679        NVAR SlitSmearedData=root:Packages:Irena_PDDF:UseSMRData       
    17061680        if(UseMoore+UseRegularization !=1)
    17071681                abort "Bad use variables in the IR2Pr_PdfFitting function"
     1682        endif
     1683        if(UseMoore && SlitSmearedData)
     1684                abort "Moore cannot use slit smeared data"
     1685        endif
     1686
     1687        if(UseRegularization)
     1688                if (SlitSmearedData)                            //if we are working with slit smeared data
     1689                        IR2Pr_ExtendQVecForSmearing()                           //here we extend them by slitLength
     1690                endif           
     1691       
     1692                //testing....   New Formfactor calculations Check that the G matrix actually exists. We need it...
     1693                //we will setup only form factor G matrix G_matrixFF, which will be scaled by contrast later on...
     1694                Wave/Z G_matrix=root:Packages:Irena_PDDF:G_matrix
     1695                Wave Q_vec=root:Packages:Irena_PDDF:Q_vec
     1696                Wave R_distribution=root:Packages:Irena_PDDF:R_distribution
     1697                variable M=numpnts(Q_vec)
     1698                variable N=numpnts(R_distribution)
     1699                if(!WaveExists(G_matrix))
     1700                        Make/D/O/N=(M,N) $("G_matrix")
     1701                        Wave G_matrix=root:Packages:Irena_PDDF:G_matrix
     1702                endif   
     1703                //generate G matrix...
     1704                IR2Pr_GenGmatrixForPDF(G_matrix,Q_vec,R_distribution)
     1705       
     1706                //now handle the contarst by copying data into the G_matrix
     1707        //              G_matrix=G_matrixFF * ScatteringContrast*1e20           //this multiplyies by scattering contrast
     1708                //done with G matrix processing, if it slit smeared let's fix it and that is all....
     1709                if (SlitSmearedData)                            //if we are working with slit smeared data
     1710                        IR2Pr_SmearGMatrix()                                                    //here we smear the Columns in the G matrix
     1711                        IR2Pr_ShrinkGMatrixAfterSmear()                 //here we cut the G matrix back in length
     1712                endif           
    17081713        endif
    17091714        SVAR MethodRun=root:Packages:Irena_PDDF:MethodRun
  • trunk/User Procedures/Irena/IR2_PanelCntrlProcs.ipf

    r1140 r1169  
    3333//1.43 Added Listbox for external files programmed similarly to allow easy addition of input directluy from files. Need for multipel tools in the future.
    3434//                      Function IR3C_AddDataControls(PckgPathName, PckgDataFolder, PanelWindowName,DefaultExtensionStr, DefaultMatchStr,DefaultSortString)
    35 //1.42 removed PreparematchString - as fighting with regular expressions used by Regex. Added IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     35//1.42 removed PreparematchString - as fighting with regular expressions used by Regex. Added //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    3636//1.41 fixed problem when checkbox Use SMR data screwed up the control procedures and put them in non-working condition. Accidentally called old code.
    3737//1.40 added to IR2P_CleanUpPackagesFolder to remove als any data in root:raw: folder. Not sure if this is OK, but they are there annoying.
     
    177177        variable RequireErrorWaves, AllowModelData, DoNotAddControls
    178178       
    179         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     179        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    180180        variable DontAdd =0
    181181        if(!ParamIsDefault(DoNotAddControls))
     
    224224        variable RequireErrorWaves,AllowModelData
    225225       
    226         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     226        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    227227        DFref oldDf= GetDataFolderDFR()
    228228
     
    581581        variable RequireErrorWaves,AllowModelData
    582582
    583         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     583        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    584584        SVAR ControlProcsLocations=root:Packages:IrenaControlProcs:ControlProcsLocations
    585585        SVAR ControlAllowedIrenaTypes=root:Packages:IrenaControlProcs:ControlAllowedIrenaTypes
     
    660660
    661661        if(SV_Struct.eventcode==1 || SV_Struct.eventcode==2)
    662                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     662                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    663663                string TopPanel
    664664                TopPanel = SV_Struct.win
     
    698698                return 0
    699699        endif
    700         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     700        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    701701        String ctrlName=SV_Struct.ctrlName
    702702        Variable varNum=SV_Struct.dval
     
    755755        string WnName
    756756
    757         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     757        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    758758        DFref oldDf= GetDataFolderDFR()
    759759
     
    813813        endif
    814814       
    815         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     815        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    816816        String ctrlName=CB_Struct.ctrlName
    817817        Variable checked=CB_Struct.checked
     
    942942                string FolderList
    943943               
    944         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     944        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    945945        FolderList = GrepList(FolderList, "root:packages" ,1 , ";" )
    946946        FolderList = GrepList(FolderList, "root:Packages" ,1 , ";" )
     
    959959        //variable startTicks=ticks
    960960        //part to copy everywhere...   
    961         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     961        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    962962        DFref oldDf= GetDataFolderDFR()
    963963
     
    12331233//
    12341234//     
    1235 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1235//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12361236//      variable i
    12371237//      string result=""///stringFromList(0,StrList,";")+";"
     
    12511251        string StrList
    12521252
    1253         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1253        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12541254        if(ItemsInList(StrList)>1)
    12551255                Wave/T wr = ListToTextWave(StrList, ";")        // Returns a free wave
     
    12901290        variable AllowQROnly
    12911291       
    1292         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1292        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12931293        if(cmpstr(ListOfQFolders,"---")==0)
    12941294                return "---"
     
    13381338        string TopPanel, FullFldrNames, WNMStr
    13391339
    1340         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1340        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13411341        DFref oldDf= GetDataFolderDFR()
    13421342
     
    14141414        //FullFldrNames
    14151415
    1416         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1416        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14171417        DFref oldDf= GetDataFolderDFR()
    14181418
     
    15161516                //wave types: r* should work
    15171517                //wave types : *i 
    1518         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1518        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15191519        string tempresult=""
    15201520        string tempType=""
     
    15451545        string TopPanel, FullFldrNames,DataTypeSearchedFor, WNMStr
    15461546
    1547         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1547        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15481548        DFref oldDf= GetDataFolderDFR()
    15491549
     
    16551655        string TopPanel, FullFldrNames,DataTypeSearchedFor
    16561656
    1657         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1657        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16581658        DFref oldDf= GetDataFolderDFR()
    16591659
     
    17111711        string DataType, MatchMeTo, winNm                       //data type   : Xaxis, Yaxis, Error
    17121712                                                                                //Match me to is string to match the type to... Use "*" to get all... Applicable ONLY to Y and error data
    1713         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1713        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    17141714        DFref oldDf= GetDataFolderDFR()
    17151715
     
    22032203        string StrToSearch,Keywrd
    22042204       
    2205         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2205        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22062206        string result, tempstr
    22072207        result=""
     
    22282228                return 0
    22292229        endif
    2230         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2230        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22312231        String ctrlName=Pa.ctrlName
    22322232        Variable popNum=Pa.popNum
     
    25192519        wave/T ResultingWave
    25202520                                 
    2521                   IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2521                  //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25222522        String dfSave
    25232523        String list = "", templist, tempWvName
     
    25772577        string ToolName, TopPanel
    25782578       
    2579         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2579        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25802580        string KnownToolResults=""
    25812581
     
    26452645Function/S IR2C_PrepareMatchString(StrIn)
    26462646        string StrIn
    2647         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2647        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26482648        string StrOut = ""
    26492649        variable ic
     
    26582658Function/S IR2C_EscapeCharTable(cstr)
    26592659        string cstr
    2660         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2660        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26612661        string estr = ""
    26622662        strswitch(cstr)
     
    27282728        string PckgPathName, PckgDataFolder, PanelWindowName,DefaultExtensionStr, DefaultMatchStr, DefaultSortString, DoubleCLickFnctName
    27292729       
    2730         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2730        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27312731        variable DontAdd =0
    27322732        if(stringmatch(PanelWindowName, "*#*" ))        //# so expect subwindow... Limit only to first child here, else is not allowed for now...
     
    27592759        string PckgPathName, PckgDataFolder, PanelWindowName,DefaultExtensionStr, DefaultMatchStr, DefaultSortString, DoubleCLickFnctName
    27602760
    2761         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2761        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27622762        SVAR ControlProcsLocations=root:Packages:IrenaListboxProcs:ControlProcsLocations
    27632763        SVAR ControlPckgPathName=root:Packages:IrenaListboxProcs:ControlPckgPathName
     
    28062806Function IR3C_ListBoxProc(lba) : ListBoxControl
    28072807        STRUCT WMListboxAction &lba
    2808         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2808        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28092809      //Prevent Igor from invoking this before we are done with instance 1
    28102810      lba.blockReentry = 1
     
    29322932        Variable popNum
    29332933        String popStr
    2934         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2934        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29352935        string TopPanel=WinName(0, 64)
    29362936
     
    29492949        string TopPanel
    29502950       
    2951         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2951        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29522952        SVAR ControlProcsLocations=root:Packages:IrenaListboxProcs:ControlProcsLocations
    29532953        SVAR ControlPckgPathName=root:Packages:IrenaListboxProcs:ControlPckgPathName
     
    29992999        string TopPanel=sva.win
    30003000
    3001         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3001        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30023002        if (cmpstr(ctrlName,"NameMatchString")==0)
    30033003                IR3C_UpdateListOfFilesInWvs(TopPanel)
     
    30163016Function IR3C_ButtonProc(ba) : ButtonControl
    30173017        STRUCT WMButtonAction &ba
    3018         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3018        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30193019
    30203020        switch( ba.eventCode )
     
    30473047        string TopPanel
    30483048       
    3049         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3049        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30503050        SVAR ControlProcsLocations=root:Packages:IrenaListboxProcs:ControlProcsLocations
    30513051        SVAR ControlPckgPathName=root:Packages:IrenaListboxProcs:ControlPckgPathName
     
    31023102        string TopPanel
    31033103       
    3104         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3104        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31053105        SVAR ControlProcsLocations=root:Packages:IrenaListboxProcs:ControlProcsLocations
    31063106        SVAR ControlPckgPathName=root:Packages:IrenaListboxProcs:ControlPckgPathName
     
    31543154        variable Select
    31553155       
    3156         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3156        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31573157        SVAR ControlProcsLocations=root:Packages:IrenaListboxProcs:ControlProcsLocations
    31583158        SVAR ControlPckgPathName=root:Packages:IrenaListboxProcs:ControlPckgPathName
     
    31803180        string PckgPathName, PckgDataFolder, PanelWindowName,DefaultExtensionStr, DefaultMatchStr, DefaultSortString, DoubleCLickFnctName
    31813181       
    3182         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3182        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31833183        DFref oldDf= GetDataFolderDFR()
    31843184
     
    32863286                //IR2C_AddDataControls("Irena:MultiSaPlotFit","IR3L_MultiSaPlotFitPanel","DSM_Int;M_DSM_Int;SMR_Int;M_SMR_Int;","AllCurrentlyAllowedTypes",UserDataTypes,UserNameString,XUserLookup,EUserLookup, 0,1, DoNotAddControls=1)
    32873287                //then call this function, it will add listbox and other controls.
    3288                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3288                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32893289                string PathToPackagesFolder="root:Packages:"+ToolPackageFolder
    32903290                IR3C_InitMultiControls(PathToPackagesFolder, PanelName, DoubleClickFunNm,MouseDownFunNm, OnlyUSAXSReducedData,AllowSlitSmearedData)                     
     
    35113511        STRUCT WMListboxAction &lba
    35123512
    3513         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3513        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    35143514        Variable row = lba.row
    35153515        WAVE/T/Z listWave = lba.listWave
     
    36413641        string ListOfStrings
    36423642        variable i
    3643         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3643        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36443644               
    36453645        string/G root:Packages:IrenaControlProcs:ControlMouseDownFunction
     
    37533753        STRUCT WMSetVariableAction &sva
    37543754
    3755         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3755        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    37563756        Variable dval = sva.dval
    37573757        String sval = sva.sval
     
    37883788                return 0
    37893789        endif
    3790         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3790        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    37913791        //figure out where are controls
    37923792        String ctrlName=cba.ctrlName
     
    38533853        string TopPanel,CntrlLocationG
    38543854
    3855         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3855        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    38563856        string CntrlLocation="root:Packages:"+CntrlLocationG
    38573857        NVAR UseIndra2Data=$(CntrlLocation+":UseIndra2Data")
     
    39133913                return 0
    39143914        endif
    3915         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3915        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39163916        String ctrlName=Pa.ctrlName
    39173917        Variable popNum=Pa.popNum
     
    39833983        string CntrlLocationG
    39843984
    3985         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3985        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39863986        DFref oldDf= GetDataFolderDFR()
    39873987        string CntrlLocation="root:Packages:"+CntrlLocationG
     
    40594059        string CntrlLocation
    40604060       
    4061         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4061        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    40624062        SVAR FolderSortString=$(CntrlLocation+":FolderSortString")
    40634063        Wave/T ListOfAvailableData=$(CntrlLocation+":ListOfAvailableData")
     
    42804280        DFref oldDf= GetDataFolderDFR()
    42814281       
    4282         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4282        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    42834283        string ListOfQFolders
    42844284        string TempStr, tempStr2
  • trunk/User Procedures/Irena/IR3_3DModels.ipf

    r1108 r1169  
    14241424static Function IR3A_InitializeMassFractAgg()
    14251425
    1426         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1426        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14271427        DFref oldDf= GetDataFolderDFR()
    14281428
     
    33273327Function IR3P_InitializePOVPDB()
    33283328
    3329         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3329        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33303330        DFref oldDf= GetDataFolderDFR()
    33313331
  • trunk/User Procedures/Irena/IR3_3DTwoPhaseSolid.ipf

    r1165 r1169  
    994994Function IR3T_InitializeTwoPhaseSys()
    995995
    996         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     996        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    997997        DFref oldDf= GetDataFolderDFR()
    998998
     
    10341034        //template: IR1A_SetInitialValues(enforce)
    10351035
    1036         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1036        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10371037        DFref oldDf= GetDataFolderDFR()
    10381038
  • trunk/User Procedures/Irena/IR3_AnalyzeResults2.ipf

    r1118 r1169  
    3232Function IR3E_AnalyzeResults()
    3333
    34         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     34        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    3535        IN2G_CheckScreenSize("width",1200)
    3636        DoWIndow IR3E_AnalyzeResultsPanel
     
    6868////************************************************************************************************************
    6969Function IR3E_AnalyzeResultsPanelFnct()
    70         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     70        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    7171        PauseUpdate             // building window...
    7272        NewPanel /K=1 /W=(2.25,43.25,530,800) as "Analyze results"
     
    166166Function IR3E_SetupControlsOnMainPanel()
    167167       
    168         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     168        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    169169        SVAR AnalysisMethodSelected = root:Packages:Irena:AnalyzeResults:AnalysisMethodSelected
    170170        DoWindow IR3E_AnalyzeResultsPanel
     
    363363static Function IR3E_AnalyzeSequenceOfData()
    364364
    365                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     365                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    366366                //warn user if not saving results...
    367367                NVAR SaveToNotebook=root:Packages:Irena:AnalyzeResults:SaveToNotebook
     
    407407        string FolderNameStr
    408408       
    409         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     409        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    410410        DFref oldDf= GetDataFolderDFR()
    411411        SetDataFolder root:Packages:Irena:AnalyzeResults                                        //go into the folder
     
    493493Function IR3E_AppendDataToGraph()
    494494       
    495         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     495        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    496496        IR3E_CreateAnalyzeResultsGraphs()
    497497        variable WhichLegend=0
     
    575575        variable PointNumber
    576576
    577         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     577        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    578578        IR3E_CreateAnalyzeResultsGraphs()
    579579        NVAR DataQEnd = root:Packages:Irena:AnalyzeResults:DataQEnd
     
    604604Function IR3E_CreateAnalyzeResultsGraphs()
    605605       
    606         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     606        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    607607        variable exists1=0
    608608        DoWIndow IR3E_MainDataDisplay
     
    629629
    630630
    631         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     631        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    632632        DFref oldDf= GetDataFolderDFR()
    633633        string ListOfVariables
     
    750750 Function IR3E_SaveResultsToNotebook()
    751751
    752         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     752        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    753753        NVAR SaveToNotebook=root:Packages:Irena:AnalyzeResults:SaveToNotebook
    754754        NVAR SaveToWaves=root:Packages:Irena:AnalyzeResults:SaveToWaves
     
    816816Function IR3E_SaveResultsToFolder()
    817817       
    818         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     818        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    819819        DFref oldDf= GetDataFolderDFR()
    820820        SetDataFolder root:Packages:Irena:AnalyzeResults                                                                //go into the folder
     
    906906Function IR3E_SaveResultsToWaves()
    907907       
    908         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     908        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    909909        DFref oldDf= GetDataFolderDFR()
    910910        NVAR SaveToNotebook=root:Packages:Irena:AnalyzeResults:SaveToNotebook
     
    991991//*****************************************************************************************************************
    992992Function IR3E_ResAnalSizeDistResultsTableFnct() : Table
    993         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     993        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    994994        DoWIndow IR3E_ResAnalSizeDistResultsTable
    995995        if(V_Flag)
  • trunk/User Procedures/Irena/IR3_Anisotropy.ipf

    r1069 r1169  
    613613static Function IR3N_InitAnisotropicSystems()
    614614
    615         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     615        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    616616        DFref oldDf= GetDataFolderDFR()
    617617
  • trunk/User Procedures/Irena/IR3_DataManipulationIII.ipf

    r1124 r1169  
    3737Function IR3DM_DataManipulationIII()
    3838
    39         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     39        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    4040        IN2G_CheckScreenSize("width",1200)
    4141        DoWIndow IR3DM_DataManIIIPanel
     
    7474////************************************************************************************************************
    7575Function IR3DM_DataManIIIPanelFnct()
    76         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     76        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    7777        PauseUpdate             // building window...
    7878        NewPanel /K=1 /W=(2.25,43.25,530,800) as "Data Manipulation"
     
    152152static Function IR3DM_SetupControlsOnMainpanel()
    153153       
    154         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     154        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    155155        //SVAR ManipulationSelected = root:Packages:Irena:DataManIII:ManipulationSelected
    156156        DoWindow IR3DM_DataManIIIPanel
     
    340340Function/T IR3DM_ListAllData()
    341341
    342         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     342        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    343343        String AllDataFolders
    344344        NVAR UseIndra2Data=root:Packages:Irena:DataManIII:UseIndra2Data
     
    372372                string WhatToDO
    373373               
    374                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     374                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    375375                //NVAR DelayBetweenProcessing=root:Packages:Irena:DataManIII:DelayBetweenProcessing
    376376                Wave SelectionOfAvailableData = root:Packages:Irena:DataManIII:SelectionOfAvailableData
     
    400400        string FolderNameStr
    401401       
    402         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     402        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    403403        DFref oldDf= GetDataFolderDFR()
    404404        SetDataFolder root:Packages:Irena:DataManIII                                    //go into the folder
     
    540540        string FolderNameStr
    541541       
    542         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     542        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    543543        DFref oldDf= GetDataFolderDFR()
    544544        SetDataFolder root:Packages:Irena:DataManIII                                    //go into the folder
     
    592592        string FolderNameStr
    593593       
    594         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     594        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    595595        DFref oldDf= GetDataFolderDFR()
    596596        SetDataFolder root:Packages:Irena:DataManIII                                    //go into the folder
     
    10221022Function IR3DM_AppendAveDataToGraphLogLog()
    10231023       
    1024         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1024        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10251025        variable WhichLegend=0
    10261026        string Shortname1, SubtractShortName, legendText
     
    10631063Function IR3DM_AppendProcessDataToGraphLogLog()
    10641064       
    1065         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1065        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10661066        variable WhichLegend=0
    10671067        string Shortname1, SubtractShortName, legendText
     
    11731173        variable PointNumber
    11741174
    1175         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1175        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11761176        IR3DM_CreateDM3Graphs()
    11771177        NVAR DataQEnd = root:Packages:Irena:DataManIII:DataQEnd
     
    12021202Function IR3DM_CreateDM3Graphs()
    12031203       
    1204         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1204        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12051205        variable exists1=0
    12061206        NVAR DeleteData= root:Packages:Irena:DataManIII:DeleteData
     
    12321232
    12331233
    1234         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1234        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12351235        DFref oldDf= GetDataFolderDFR()
    12361236        string ListOfVariables
  • trunk/User Procedures/Irena/IR3_GuinierPorodModel.ipf

    r1168 r1169  
    1919
    2020//version history
    21 //1.12 Fixed fitting issue where fittung data in small Q range (at low-Q) failed. It was working for large Q range. FIxed by always calculating full data Q range and using subset for fitting.
     21//1.12 Fixed fitting issue where fitting data in small Q range (at low-Q) failed. It was working for large Q range. FIxed by always calculating full data Q range and using subset for fitting.
    2222//1.11 Added ability to export Level fits (Int-Q) which was missing before.  Adds Level0 which is simply flat background wave.
    2323//1.10 2019-05 Testing, fixes for Correlation fitting parameters (were not fitted at all) and some fixes to Uncertainty evaluation, was misbehaving.
  • trunk/User Procedures/Irena/IR3_MultiDataPlot.ipf

    r1118 r1169  
    2525Function IR3L_MultiSamplePlot()
    2626
    27         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     27        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    2828        IN2G_CheckScreenSize("width",1000)
    2929        IN2G_CheckScreenSize("height",670)
     
    6565static Function IR3L_SetStartConditions()
    6666               
    67                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     67                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    6868                SVAR GraphWindowName = root:Packages:Irena:MultiSamplePlot:GraphWindowName
    6969                SVAR GraphUserTitle=root:Packages:Irena:MultiSamplePlot:GraphUserTitle
     
    9898//************************************************************************************************************
    9999Function IR3L_MultiSamplePlotPanelFnct()
    100         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     100        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    101101        PauseUpdate             // building window...
    102102        NewPanel /K=1 /W=(5.25,43.25,605,820) as "MultiData plotting tool"
     
    214214        //fix panel controls to whatever selection user made...
    215215
    216         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     216        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    217217        SVAR SelectedDataPlot=root:Packages:Irena:MultiSamplePlot:SelectedDataPlot
    218218        strswitch(SelectedDataPlot)                                             // string switch
     
    255255Function/S IR3L_GraphListPopupString()
    256256        // Create some waves for demo purposes
    257         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     257        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    258258        string list = WinList("MultiDataPlot_*", ";", "WIN:1" )
    259259        list = SortList(list)
     
    280280
    281281static Function IR3L_InitMultiSamplePlot()     
    282         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     282        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    283283        DfRef OldDf=GetDataFolderDFR()
    284284        string ListOfVariables
     
    542542                return 0
    543543        endif
    544         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     544        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    545545        SVAR GraphWindowName = root:Packages:Irena:MultiSamplePlot:GraphWindowName
    546546        if(strlen(GraphWindowName)>0)
     
    673673Function IR3L_DoubleClickAction(FoldernameStr)
    674674                string FoldernameStr
    675                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     675                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    676676                //if called with GraphWindowName = "---" need to create new graph and direct data there, or the tool doe snothing
    677677                SVAR GraphWindowName=root:Packages:Irena:MultiSamplePlot:GraphWindowName
     
    706706        string FolderNameStr
    707707       
    708         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     708        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    709709        DfRef OldDf=GetDataFolderDFR()
    710710        SetDataFolder root:Packages:Irena:MultiSamplePlot                                       //go into the folder
     
    934934                Wave ValueWv
    935935               
    936         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     936        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    937937        variable i
    938938        For (i=0;i<numpnts(SampleNameWV);i+=1)
     
    10781078static Function IR3L_CreateNewGraph()
    10791079
    1080         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1080        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10811081        SVAR GraphWindowName=root:Packages:Irena:MultiSamplePlot:GraphWindowName
    10821082        SVAR GraphUserTitle=root:Packages:Irena:MultiSamplePlot:GraphUserTitle
     
    10941094        string WHichStyle
    10951095       
    1096         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1096        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10971097        //      ListOfDefinedStyles = "Log-Log;Lin-Log;VolumeSizeDistribution;NumberSizeDistribution;"
    10981098                SVAR GraphWindowName=root:Packages:Irena:MultiSamplePlot:GraphWindowName
     
    11951195                string GraphNameString
    11961196
    1197         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1197        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11981198        if(strlen(GraphNameString)<1)
    11991199                return 0
     
    12941294                //applies only when creating new graph...
    12951295
    1296                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1296                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12971297                NVAR UseIndra2Data=root:Packages:Irena:MultiSamplePlot:UseIndra2Data
    12981298                NVAR UseQRSdata=root:Packages:Irena:MultiSamplePlot:UseQRSdata
  • trunk/User Procedures/Irena/IR3_SimpleFits.ipf

    r1141 r1169  
    107107Function IR3J_SimpleFits()
    108108
    109         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     109        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    110110        IN2G_CheckScreenSize("width",1200)
    111111        DoWIndow IR3J_SimpleFitsPanel
     
    144144//************************************************************************************************************
    145145Function IR3J_SimpleFitsPanelFnct()
    146         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     146        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    147147        PauseUpdate             // building window...
    148148        NewPanel /K=1 /W=(2.25,43.25,530,800) as "Simple Fits & Analysis tool"
     
    270270Function IR3J_CreateCheckGraphs()
    271271       
    272         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     272        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    273273        variable exists1=0
    274274        DoWIndow IR3J_LogLogDataDisplay
     
    317317
    318318
    319         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     319        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    320320        DFref oldDf= GetDataFolderDFR()
    321321        string ListOfVariables
     
    602602        string FolderNameStr
    603603       
    604         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     604        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    605605        DFref oldDf= GetDataFolderDFR()
    606606        SetDataFolder root:Packages:Irena:SimpleFits                                    //go into the folder
     
    699699Function IR3J_CreateLinearizedData()
    700700
    701         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     701        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    702702        DFref oldDf= GetDataFolderDFR()
    703703
     
    747747Function IR3J_AppendDataToGraphModel()
    748748        //this deals with lin-lin model.
    749         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     749        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    750750        IR3J_CreateCheckGraphs()
    751751        variable WhichLegend=0
     
    840840Function IR3J_AppendDataToGraphLogLog()
    841841       
    842         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     842        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    843843        IR3J_CreateCheckGraphs()
    844844        variable WhichLegend=0
     
    993993static Function IR3J_FitData()
    994994
    995         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     995        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    996996        SVAR SimpleModel = root:Packages:Irena:SimpleFits:SimpleModel
    997997        strswitch(SimpleModel)  // string switch
     
    10441044static Function IR3J_FitSequenceOfData()
    10451045
    1046                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1046                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10471047                //warn user if not saving results...
    10481048                NVAR SaveToNotebook=root:Packages:Irena:SimpleFits:SaveToNotebook
     
    11451145        variable PointNumber
    11461146
    1147         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1147        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11481148        IR3J_CreateCheckGraphs()
    11491149        NVAR DataQEnd = root:Packages:Irena:SimpleFits:DataQEnd
     
    12481248static Function IR3J_FitGuinier(which)
    12491249        string which                    //Sphere, Rod, Sheet
    1250         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1250        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12511251        IR3J_CreateCheckGraphs()
    12521252        DFref oldDf= GetDataFolderDFR()
     
    15091509static Function IR3J_FitPorod()
    15101510       
    1511         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1511        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15121512        IR3J_CreateCheckGraphs()
    15131513        DFref oldDf= GetDataFolderDFR()
     
    15821582Function IR3J_FitSizeDistribution(Which)
    15831583        string Which                    //"Volume" or "Number"
    1584         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1584        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15851585        IR3J_CreateCheckGraphs()
    15861586        DFref oldDf= GetDataFolderDFR()
     
    16691669static Function IR3J_FitSphere()
    16701670       
    1671         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1671        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16721672        IR3J_CreateCheckGraphs()
    16731673        DFref oldDf= GetDataFolderDFR()
     
    17681768static Function IR3J_FitSpheroid()
    17691769       
    1770         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1770        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    17711771        IR3J_CreateCheckGraphs()
    17721772        DFref oldDf= GetDataFolderDFR()
     
    18791879Function IR3J_CalculateModel()
    18801880
    1881         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1881        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    18821882        IR3J_CreateCheckGraphs()
    18831883        DFref oldDf= GetDataFolderDFR()
     
    20702070static Function IR3J_SaveResultsToNotebook()
    20712071
    2072         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2072        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20732073        NVAR SaveToNotebook=root:Packages:Irena:SimpleFits:SaveToNotebook
    20742074        NVAR SaveToWaves=root:Packages:Irena:SimpleFits:SaveToWaves
     
    21902190static Function IR3J_SaveResultsToFolder()
    21912191       
    2192         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2192        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21932193        DFref oldDf= GetDataFolderDFR()
    21942194        SetDataFolder root:Packages:Irena:SimpleFits                                                            //go into the folder
     
    23592359static Function IR3J_SaveResultsToWaves()
    23602360       
    2361         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2361        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23622362        DFref oldDf= GetDataFolderDFR()
    23632363        NVAR SaveToNotebook=root:Packages:Irena:SimpleFits:SaveToNotebook
     
    25912591static Function IR3J_GetTableWithResults()
    25922592
    2593         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2593        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25942594        SVAR SimpleModel                                = root:Packages:Irena:SimpleFits:SimpleModel
    25952595        strswitch(SimpleModel)  // string switch
     
    26612661Function IR3J_DeleteExistingModelResults()
    26622662
    2663         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2663        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    26642664        SVAR SimpleModel        = root:Packages:Irena:SimpleFits:SimpleModel
    26652665        DoAlert /T="This is delete resutls warning" 1, "This will delete all existing results for model : "+SimpleModel+". Do you WANT to continue?"
     
    27562756//*****************************************************************************************************************
    27572757static Function IR3J_GuinierFitResultsTableFnct() : Table
    2758         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2758        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27592759        DoWIndow IR3J_GuinierFitResultsTable
    27602760        if(V_Flag)
     
    27832783//*****************************************************************************************************************
    27842784static Function IR3J_GuinRodFitResTblFnct() : Table
    2785         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2785        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27862786        DoWIndow IR3J_GuinierRodFitResultsTable
    27872787        if(V_Flag)
     
    28102810//*****************************************************************************************************************
    28112811static Function IR3J_GuinSheetFitResTblFnct() : Table
    2812         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2812        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28132813        DoWIndow IR3J_GuinierSheetFitResTable
    28142814        if(V_Flag)
     
    28382838//*****************************************************************************************************************
    28392839Function IR3J_PorodFitResultsTableFnct() : Table
    2840         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2840        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28412841        DoWIndow IR3J_PorodFitResultsTable
    28422842        if(V_Flag)
     
    28672867//*****************************************************************************************************************
    28682868Function IR3J_SphFFFitResTblFnct() : Table
    2869         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2869        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28702870        DoWIndow IR3J_SphereFFFitResultsTable
    28712871        if(V_Flag)
     
    28962896
    28972897Function IR3J_SpheroidFFFitResTblFnct() : Table
    2898         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2898        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28992899        DoWIndow IR3J_SpheroidFFFitResultsTable
    29002900        if(V_Flag)
     
    29262926//
    29272927//Function IR3J_VolumeSDResTblFnct() : Table
    2928 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2928//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29292929//      DoWIndow IR3J_SpheroidFFFitResultsTable
    29302930//      if(V_Flag)
     
    29532953
    29542954Function IR3J_InvResultsTableFnct() : Table
    2955         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2955        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29562956        DoWIndow IR3J_InvResultsTable
    29572957        if(V_Flag)
     
    29832983//Function IR3J_NumberSDResTblFnct() : Table
    29842984//      PauseUpdate             // building window...
    2985 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2985//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29862986//      String fldrSav0= GetDataFolder(1)
    29872987//      if(!DataFolderExists("root:NumbSizeDistResults:"))
     
    30553055static Function IR3J_SetupControlsOnMainpanel()
    30563056       
    3057         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3057        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30583058        SVAR SimpleModel = root:Packages:Irena:SimpleFits:SimpleModel
    30593059        SVAR Corr1DMethod = root:Packages:Irena:SimpleFits:Corr1DMethod
  • trunk/User Procedures/Irena/IR3_SystemSpecificModels.ipf

    r1165 r1169  
    4646        KillWindow/Z IR3S_LogLogDataDisplay
    4747
    48         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     48        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    4949        IN2G_CheckScreenSize("width",1200)
    5050        DoWIndow IR3S_SysSpecModelsPanel
     
    123123////************************************************************************************************************
    124124Function IR3S_SysSpecModelsPanelFnct()
    125         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     125        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    126126        PauseUpdate             // building window...
    127127        NewPanel /K=1 /W=(2.25,43.25,560,815) as "System Specific Models"
     
    253253static Function IR3S_SetupControlsOnMainpanel()
    254254       
    255         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     255        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    256256        SVAR ModelSelected = root:Packages:Irena:SysSpecModels:ModelSelected
    257257        NVAR UseUnified = root:Packages:Irena:SysSpecModels:UseUnified
     
    846846static Function IR3S_FitSequenceOfData()
    847847
    848                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     848                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    849849                //warn user if not saving results...
    850850
     
    10191019        string FolderNameStr
    10201020       
    1021         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1021        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10221022        DFref oldDf= GetDataFolderDFR()
    10231023        SetDataFolder root:Packages:Irena:SysSpecModels                                 //go into the folder
     
    11091109static Function IR3S_AppendDataToGraphLogLog()
    11101110       
    1111         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1111        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11121112        IR3S_CreateSysSpecModelsGraphs()
    11131113        variable WhichLegend=0
     
    11851185        variable PointNumber
    11861186
    1187         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1187        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11881188        IR3S_CreateSysSpecModelsGraphs()
    11891189        NVAR DataQEnd = root:Packages:Irena:SysSpecModels:DataQEnd
     
    12141214static Function IR3S_CreateSysSpecModelsGraphs()
    12151215       
    1216         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1216        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12171217        variable exists1=0
    12181218        DoWIndow IR3S_LogLogDataDisplay
     
    12391239
    12401240
    1241         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1241        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12421242        DFref oldDf= GetDataFolderDFR()
    12431243        variable i
  • trunk/User Procedures/Irena/IR3_WAXSDiffraction.ipf

    r1112 r1169  
    5656Function IR3W_WAXS()
    5757
    58         IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Starting WAXS tool")
     58        //IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Starting WAXS tool")
    5959        IN2G_CheckScreenSize("width",1200)
    6060        IR3W_InitWAXS()
     
    6868        IR3W_UpdateListOfAvailFiles()
    6969        IR3W_UpdatePDF4OfAvailFiles()
    70         IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Finished WAXS tool")
     70        //IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Finished WAXS tool")
    7171end
    7272
     
    247247        switch( tca.eventCode )
    248248                case 2: // mouse up
    249                         IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Calling Tabcontrol procedure")
     249                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Calling Tabcontrol procedure")
    250250                        Variable tab = tca.tab
    251251                        //tab0
     
    288288Function IR3W_ModifyPanelControls()
    289289
    290         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     290        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    291291        if(DataFolderExists("root:Packages:MultiPeakFit2"))
    292292                PopupMenu MPFInitializeFromSetMenu, win=IR3W_WAXSPanel, disable=0
     
    310310        switch( pa.eventCode )
    311311                case 2: // mouse up
    312                         IN2G_PrintDebugStatement(IrenaDebugLevel,5,GetRTStackInfo(1))
     312                        //IN2G_PrintDebugStatement(IrenaDebugLevel,5,GetRTStackInfo(1))
    313313                        Variable popNum = pa.popNum
    314314                        String popStr = pa.popStr
     
    334334
    335335
    336         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     336        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    337337        DFref oldDf= GetDataFolderDFR()
    338338
     
    454454        switch( cba.eventCode )
    455455                case 2: // mouse up
    456                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     456                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    457457                        Variable checked = cba.checked
    458458                        NVAR UseIndra2Data =  root:Packages:Irena:WAXS:UseIndra2Data
     
    517517
    518518
    519         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     519        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    520520        DFref oldDf= GetDataFolderDFR()
    521521
     
    569569Function IR3W_SortListOfAvailableFldrs()
    570570       
    571         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     571        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    572572        SVAR FolderSortString=root:Packages:Irena:WAXS:FolderSortString
    573573        Wave/T ListOfAvailableData=root:Packages:Irena:WAXS:ListOfAvailableData
     
    781781        String popStr
    782782
    783         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     783        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    784784        if(stringmatch(ctrlName,"StartFolderSelection"))
    785785                //Update the listbox using start folde popStr
     
    823823
    824824Function/S IR3W_InitMPF2FromMenuString()
    825         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     825        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    826826        DFref oldDf= GetDataFolderDFR()
    827827
     
    859859                case 1: // mouse up
    860860                case 2: // Enter key
    861                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     861                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    862862                        if(stringmatch(sva.ctrlName,"FolderNameMatchString"))
    863863                                IR3W_UpdateListOfAvailFiles()
     
    968968Function IR3W_WAXSDoubleClickAction(FoldernameStr)
    969969                string FoldernameStr
    970                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     970                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    971971                DoWindow IR3W_WAXSMainGraph
    972972                if(V_Flag==1)
     
    996996//                              DoWIndow/F IR3W_WAXSMainGraph
    997997//                      endif
    998 //                      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     998//                      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    999999//                      FoldernameStr=listWave[row]
    10001000//                      IR3W_CopyAndAppendData(FoldernameStr)
     
    10211021        string FolderNameStr
    10221022       
    1023         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1023        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10241024        DFref oldDf= GetDataFolderDFR()
    10251025
     
    11441144        //asin(q * lambda /4pi) = theta
    11451145        //d ~ 2*pi/Q
    1146         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1146        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11471147
    11481148        if(XaxisType==0)
     
    11691169//Function IR3W_CreateLinearizedData()
    11701170//
    1171 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1171//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11721172//      DFref oldDf= GetDataFolderDFR()
    11731173
     
    12001200Function IR3W_GraphWAXSData()
    12011201       
    1202         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1202        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12031203        variable WhichLegend=0
    12041204        variable startTTHp, endTTHp, tmpStQ
     
    12611261Function IR3W_AddBackgroundToGraph()
    12621262
    1263                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1263                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12641264                DFref oldDf= GetDataFolderDFR()
    12651265
     
    13201320                                IR3W_ConvertXdataToTTH(Background2ThetaWave,BackgroundD2ThetaWave,XaxisType,wavelength)         
    13211321                        else    //somethign went wrong
    1322                                 IN2G_PrintDebugStatement(IrenaDebugLevel, 0,"Incorrect background data found.")
     1322                                //IN2G_PrintDebugStatement(IrenaDebugLevel, 0,"Incorrect background data found.")
    13231323                                KillWaves/Z BackgroundIntWave, Background2ThetaWave, BackgroundErrorWav, BackgroundD2ThetaWave
    13241324                                DisplayBackg=0
     
    13501350
    13511351Function IR3W_StartMultiPeakGUIForWAXS()
    1352         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1352        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13531353        String yWName = "root:Packages:Irena:WAXS:DataIntWave" 
    13541354        String xWName = "root:Packages:Irena:WAXS:Data2ThetaWave"
     
    14171417        switch( ba.eventCode )
    14181418                case 2: // mouse up
    1419                         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1419                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14201420                        // click code here
    14211421                        if(stringmatch(ba.ctrlname,"MultiPeakFittingStart"))
     
    15171517        string StartFolder
    15181518       
    1519         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1519        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15201520        variable NumGraphs, i=0
    15211521        variable curLength=0
     
    15721572
    15731573        //string WhichUnit              //Angle, - use only Dspacing
    1574         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1574        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15751575        DFref oldDf= GetDataFolderDFR()
    15761576
     
    16051605        string StartFolder
    16061606       
    1607         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1607        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16081608        variable NumGraphs, i=0
    16091609        variable curLength=0
     
    16411641Function IR3W_MPF2CreateAllParTable()
    16421642        //string WhichUnit              //Angle, - use only Dspacing
    1643         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1643        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16441644        DFref oldDf= GetDataFolderDFR()
    16451645
     
    18251825        switch(s.eventCode)
    18261826                case 2:                                 // Keyboard event
    1827                                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1827                                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    18281828                                ControlInfo/W=IR3W_WAXSPanel AnalysisTabs
    18291829       
     
    18741874
    18751875Function IR3W_FitMultiPeakFit2ForWAXS()
    1876         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1876        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    18771877
    18781878        WAVE/T/Z listWave = root:Packages:Irena:WAXS:ListOfAvailableData
     
    18981898
    18991899static Function IR3W_DoMultiPeak2Fits()
    1900                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1900                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    19011901                NVAR MPF2CurrentFolderNumber = root:Packages:Irena:WAXS:MPF2CurrentFolderNumber
    19021902                setDataFolder $("root:Packages:MultiPeakFit2:MPF_SetFolder_"+num2str(MPF2CurrentFolderNumber))
     
    19131913static function IR3W_SaveMultiPeakResults()
    19141914 
    1915         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1915        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    19161916        NVAR MPF2CurrentFolderNumber = root:Packages:Irena:WAXS:MPF2CurrentFolderNumber
    19171917        string Oldf=GetDataFolder(1)
     
    20662066                return 0
    20672067        endif
    2068         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2068        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20692069       
    20702070//      NVAR currentSetNumber = root:Packages:MultiPeakFit2:currentSetNumber
     
    22602260Static Function IR3W_GetSetNumberFromWinName(windowName)
    22612261        String windowName
    2262         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2262        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22632263       
    22642264        String windowWithData
     
    22842284static Function/S IR3W_FolderPathFromSetNumber(setnumber)
    22852285        Variable setnumber
    2286         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2286        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")       
    22872287        return "root:Packages:MultiPeakFit2:MPF_SetFolder_"+num2str(setnumber)
    22882288end
     
    22932293Function/S IR3W_WAXSBckDATA_BLFuncInfo(InfoDesired)
    22942294        Variable InfoDesired
    2295         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2295        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22962296
    22972297        String info=""
     
    23272327Function/S IR3W_WAXSPoly10_BLFuncInfo(InfoDesired)
    23282328        Variable InfoDesired
    2329         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2329        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23302330        String info=""
    23312331        switch(InfoDesired)
     
    24132413                        NVAR DataTTHEnd = root:Packages:Irena:WAXS:DataTTHEnd
    24142414                        if(stringmatch(cursorName,"A")&&stringmatch(H_Struct.eventName,"cursormoved"))
    2415                                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2415                                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24162416                                WAVE Data2ThetaWave = root:Packages:Irena:WAXS:Data2ThetaWave
    24172417                                if(!stringmatch(H_Struct.traceName,"DataIntWave"))
     
    24302430                        endif
    24312431                        if(stringmatch(cursorName,"B")&&stringmatch(H_Struct.eventName,"cursormoved"))
    2432                                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2432                                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24332433                                WAVE Data2ThetaWave = root:Packages:Irena:WAXS:Data2ThetaWave
    24342434                                WAVE DataIntWave = root:Packages:Irena:WAXS:DataIntWave
     
    24862486        string ReturnWhat
    24872487
    2488         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2488        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24892489        DFref oldDf= GetDataFolderDFR()
    24902490
     
    25172517
    25182518Function IR3W_MPF2PlotPeakGraph()
    2519         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2519        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25202520        DFref oldDf= GetDataFolderDFR()
    25212521
     
    25692569Function IR3W_MPF2AppendDataToGraph(GraphName, DataWvName,StartFolder)
    25702570        string GraphName, DataWvName, StartFolder
    2571         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2571        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25722572        Wave/Z WaveToAppend=$(DataWvName)
    25732573        Wave/Z WaveToAppendD=$(DataWvName+"_d")
     
    25902590Function IR3W_MPF2PlotPeakParameters(WhichUnit)
    25912591        string WhichUnit                //Angle, Dspacing
    2592                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2592                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25932593        DFref oldDf= GetDataFolderDFR()
    25942594
     
    27402740Function IR3W_MPF2ExtractParamsToGraph(StartFolder, DataWvName)
    27412741        string StartFolder, DataWvName
    2742                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2742                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27432743
    27442744        variable NumGraphs, i
     
    27832783
    27842784Function IR3W_PDF4AddManually()
    2785         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2785        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27862786        DFref oldDf= GetDataFolderDFR()
    27872787
     
    28542854Function IR3W_ImportAMSData()
    28552855        //for data from http://rruff.geo.arizona.edu/AMS/amcsd.php
    2856         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2856        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28572857        DFref oldDf= GetDataFolderDFR()
    28582858
     
    29852985
    29862986Function IR3W_ImportPDF4xmlFile()
    2987         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2987        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29882988        DFref oldDf= GetDataFolderDFR()
    29892989
     
    31893189//**************************************************************************************
    31903190Function/T IR3W_PDF4CreateListOfCards()
    3191         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3191        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31923192        string ListOfCards = IN2G_CreateListOfItemsInFolder("root:WAXS_PDF:", 2)
    31933193        ListOfCards = GrepList(ListOfCards, "^((?!hklStr).)*$",0,";")
     
    31993199
    32003200Function IR3W_UpdatePDF4OfAvailFiles()
    3201         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3201        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32023202        DFref oldDf= GetDataFolderDFR()
    32033203
     
    32633263        STRUCT WMListboxAction &lba
    32643264
    3265         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3265        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32663266        Variable/g row = lba.row
    32673267        WAVE/T/Z listWave = lba.listWave
     
    33213321Function IR3W_PDF4AddLines()
    33223322
    3323         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3323        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33243324        Wave/T listWave=root:Packages:Irena:WAXS:ListOfPDF4Data
    33253325        Wave selWave=root:Packages:Irena:WAXS:SelectionOfPDF4Data
     
    33633363        Wave/T labelWave
    33643364        variable Cr, Cg, Cb
    3365         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3365        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33663366 
    33673367        Wave w = TraceNameToWaveRef(graphName, traceName)
     
    33803380static Function IR3W_WAXSCorForDistance()
    33813381
    3382         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3382        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33833383        DFref oldDf= GetDataFolderDFR()
    33843384       
     
    34093409        string cardname
    34103410        variable V_Red, V_Green, V_Blue
    3411         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3411        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    34123412        DFref oldDf= GetDataFolderDFR()
    34133413
     
    34673467        DFref oldDf= GetDataFolderDFR()
    34683468
    3469         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3469        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    34703470        SetDataFolder root:Packages:Irena:WAXS:
    34713471        string PathToFiles=FunctionPath("")
     
    35373537Function IR3W_PDF4ButtonProc(ba) : ButtonControl
    35383538        STRUCT WMButtonAction &ba
    3539                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3539                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    35403540
    35413541        DFref oldDf= GetDataFolderDFR()
     
    36253625//**************************************************************************************
    36263626Function IR3W_PDF4UpdateOutsideListBox()
    3627                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3627                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36283628                Wave/T  ww=root:Packages:Irena:WAXS:SaveLoadPDFOutside
    36293629                Wave  ww2=root:Packages:Irena:WAXS:SaveLoadPDFOutsideSel
     
    36443644//**************************************************************************************
    36453645Function IR3W_PDF4UpdateInsideListBox()
    3646                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3646                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36473647                Wave/T  ww=root:Packages:Irena:WAXS:SaveLoadPDFInside
    36483648                Wave  ww2=root:Packages:Irena:WAXS:SaveLoadPDFInsideSel
     
    36673667Function IR3W_PDF4WriteDataOutXML(NewFileName)
    36683668                string NewFileName
    3669                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3669                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36703670                PathInfo WAXSPDF4Path
    36713671                if(V_Flag==0)
     
    36923692Function/T IR3W_PDF4writePDFtoXMLstr(DataName)
    36933693        string DataName
    3694         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3694        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36953695       
    36963696        wave ww=$("root:WAXS_PDF:"+possiblyquotename(DataName))
     
    37463746Function IR3W_PDF4readPDFfromXML(NewFileName)
    37473747        string NewFileName
    3748         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3748        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    37493749               
    37503750                if(!DataFolderExists("root:WAXS_PDF"))
     
    38313831Function IR3W_PDF4parseXMLFileLine(line,InternalName)
    38323832        string line,InternalName
    3833         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3833        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    38343834       
    38353835        if(!DataFolderExists("root:WAXS_PDF"))
     
    38853885//
    38863886//Function IR3W_PDF4AddFromLaueGo()
    3887 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3887//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    38883888//      DFref oldDf= GetDataFolderDFR()
    38893889
     
    39073907//
    39083908//static Function IR3W_CheckOrLoadForLaueGo()
    3909 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3909//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39103910//      if(exists("MakeLatticeParametersPanel"))                //aleready loaded...   
    39113911//              Execute "MakeLatticeParametersPanel(\"\")"
     
    39413941////********
    39423942//Function IR3W_LaueGoProgressPanelF() : Panel
    3943 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3943//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39443944//      PauseUpdate             // building window...
    39453945//      NewPanel /K=1/W=(593,358,1039,435) as "Checking for LaueGo Presence"
     
    39563956////********
    39573957//static Function IR3W_ListIgorProcFiles()
    3958 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3958//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39593959//      GetFileFolderInfo/Q/Z/P=Igor "Igor Procedures" 
    39603960//      if(V_Flag==0)
     
    39733973////********
    39743974//static Function IR3W_ListUserProcFiles()
    3975 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3975//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39763976//      GetFileFolderInfo/Q/Z/P=Igor "User Procedures" 
    39773977//      if(V_Flag==0)
     
    39963996//      // This should be a Macintosh path but, because of a bug prior to Igor Pro 6.20B03
    39973997//      // it may be a Windows path.
    3998 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3998//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    39993999//      String path = SpecialDirPath("Igor Pro User Files", 0, 0, 0)
    40004000//      path = ParseFilePath(5, path, ":", 0, 0)
     
    40074007//      string PathStr
    40084008//      variable resetWaves
    4009 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4009//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    40104010//     
    40114011//      String abortMessage     //HR Used if we have to abort because of an unexpected error
  • trunk/User Procedures/Irena/IRB1_EvaluationTools.ipf

    r1069 r1169  
    5353//************************************************************************************************************
    5454Function IRB1_ConcSerPanelFnct()
    55         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     55        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    5656        PauseUpdate             // building window...
    5757        NewPanel /K=1 /W=(2.25,43.25,1195,800) as "Concentration series"
     
    207207        STRUCT WMListboxAction &lba
    208208
    209         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     209        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    210210        Variable row = lba.row
    211211        WAVE/T/Z listWave = lba.listWave
     
    876876        variable PointNumber
    877877
    878         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     878        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    879879        NVAR DataQEnd = root:Packages:Irena:ConcSerExtrap:DataQEnd
    880880        NVAR DataQstart = root:Packages:Irena:ConcSerExtrap:DataQstart
     
    14721472        string FolderNameStr
    14731473       
    1474 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1474//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14751475//      DfRef OldDf=GetDataFolderDFR()
    14761476//      SetDataFolder root:Packages:Irena:BioSAXSDataMan                                        //go into the folder
     
    16521652Function IRB1_ConcSerInitialize()       
    16531653
    1654         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1654        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16551655        DfRef OldDf=GetDataFolderDFR()
    16561656        string ListOfVariables
  • trunk/User Procedures/Irena/IRB1_bioSAXS.ipf

    r1167 r1169  
    4747Function IRB1_ImportASCII()
    4848
    49         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     49        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    5050        IN2G_CheckScreenSize("height",720)
    5151        DoWindow IRB1_ImportBioSAXSASCIIData
     
    209209
    210210Function IRB1_ImportBioSAXSASCIIDataFnct()
    211         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     211        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    212212        PauseUpdate             // building window...
    213213        NewPanel /K=1 /W=(3,40,430,760)/N=IRB1_ImportBioSAXSASCIIData as "Import Bio SAXS data"
     
    322322//************************************************************************************************************
    323323static Function IRB1_ImportDataFnct()
    324         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     324        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    325325
    326326        string TopPanel=WinName(0, 64)
     
    415415static Function IRB1_InitializeImportData()
    416416       
    417         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     417        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    418418        DfRef OldDf=GetDataFolderDFR()
    419419       
     
    470470
    471471Function IRB1_PreviewDataFnct()
    472         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     472        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    473473        DfRef OldDf=GetDataFolderDFR()
    474474       
     
    530530//************************************************************************************************************
    531531static Function IRB1_DataManPanelFnct()
    532         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     532        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    533533        PauseUpdate             // building window...
    534534        NewPanel /K=1 /W=(2.25,43.25,1195,800) as "BioSAXS data manipulation"
     
    658658        switch( tca.eventCode )
    659659                case 2: // mouse up
    660                         IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Calling Tabcontrol procedure")
     660                        //IN2G_PrintDebugStatement(IrenaDebugLevel, 3,"Calling Tabcontrol procedure")
    661661                        SVAR DataMatchString = root:Packages:Irena:BioSAXSDataMan:DataMatchString
    662662                        NVAR InvertGrepSearch = root:Packages:Irena:BioSAXSDataMan:InvertGrepSearch
     
    811811//static Function IRB1_DataManRemoveAllDataSets()
    812812//
    813 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     813//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    814814//      DfRef OldDf=GetDataFolderDFR()
    815815//      setDataFolder root:Packages:Irena:BioSAXSDataMan
     
    831831static Function IRB1_DataManAverageDataSetsts()
    832832
    833         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     833        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    834834        DfRef OldDf=GetDataFolderDFR()
    835835        setDataFolder root:Packages:Irena:BioSAXSDataMan
     
    916916Function IRB1_DataManAppendSelDtaSets()
    917917
    918         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     918        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    919919        variable i
    920920        string FoldernameStr
     
    942942        string FolderNameStr
    943943       
    944         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     944        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    945945        DfRef OldDf=GetDataFolderDFR()
    946946        SetDataFolder root:Packages:Irena:BioSAXSDataMan                                        //go into the folder
     
    10591059static Function IRB1_DataManInitBioSAXS()       
    10601060
    1061         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1061        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    10621062        DfRef OldDf=GetDataFolderDFR()
    10631063        string ListOfVariables
     
    11481148Function/T IRB1_ListBufferScans()
    11491149
    1150         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1150        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    11511151        String AllDataFolders
    11521152        AllDataFolders=IR3C_MultiGenStringOfFolders("Irena:BioSAXSDataMan", "root:",0, 1,0, 0,1)
     
    12131213static Function IRB1_DataManCopyAndScaleBuffer()
    12141214
    1215         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1215        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12161216        DfRef OldDf=GetDataFolderDFR()
    12171217        SetDataFolder root:Packages:Irena:BioSAXSDataMan:
     
    12601260static Function IRB1_DataManSubtractBufferMany()
    12611261
    1262         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1262        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12631263        DfRef OldDf=GetDataFolderDFR()
    12641264        SetDataFolder root:Packages:Irena:BioSAXSDataMan:
     
    12851285static Function IRB1_DataManScaleMany()
    12861286
    1287         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1287        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12881288        DfRef OldDf=GetDataFolderDFR()
    12891289        SetDataFolder root:Packages:Irena:BioSAXSDataMan:
     
    13111311static Function IRB1_DataManSubtractBufferOne()
    13121312
    1313         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1313        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13141314        DfRef OldDf=GetDataFolderDFR()
    13151315        SetDataFolder root:Packages:Irena:BioSAXSDataMan:
     
    14411441static Function IRB1_DataManScaleDataOne()
    14421442
    1443         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1443        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14441444        DfRef OldDf=GetDataFolderDFR()
    14451445        SetDataFolder root:Packages:Irena:BioSAXSDataMan:
     
    15451545//************************************************************************************************************
    15461546Function IRB1_PDDFPanelFnct()
    1547         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1547        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15481548        PauseUpdate             // building window...
    15491549        NewPanel /K=1 /W=(2.25,43.25,1210,800) as "PDDF-MW-Rg"
     
    20662066static Function IRB1_PDDFFitSequenceOfData()
    20672067
    2068         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2068        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20692069                Wave SelectionOfAvailableData = root:Packages:Irena:PDDFInterface:SelectionOfAvailableData
    20702070                Wave/T ListOfAvailableData = root:Packages:Irena:PDDFInterface:ListOfAvailableData
     
    25272527static Function IRB1_PDDFMakeResChi2()
    25282528
    2529         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2529        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25302530        DfRef OldDf=GetDataFolderDFR()
    25312531        setDataFolder root:Packages:Irena:PDDFInterface
     
    25532553Function IRB1_PDDFRunGNOM()
    25542554
    2555         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2555        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25562556        DfRef OldDf=GetDataFolderDFR()
    25572557        SetDataFolder root:Packages:Irena:PDDFInterface
     
    28572857static Function IRB1_PDDFRunIrenaPDDF()
    28582858       
    2859         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2859        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    28602860        DfRef OldDf=GetDataFolderDFR()
    28612861        //script old PDDF model here...
     
    29522952                return 0
    29532953        endif
    2954         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2954        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29552955        DfRef OldDf=GetDataFolderDFR()
    29562956        SetDataFolder root:Packages:Irena:PDDFInterface                                 //go into the folder
     
    29962996        string FolderNameStr
    29972997       
    2998         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2998        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29992999        DfRef OldDf=GetDataFolderDFR()
    30003000        SetDataFolder root:Packages:Irena:PDDFInterface                                 //go into the folder
     
    31003100        variable PointNumber
    31013101
    3102         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3102        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31033103        NVAR DataQEnd = root:Packages:Irena:PDDFInterface:DataQEnd
    31043104        NVAR DataQstart = root:Packages:Irena:PDDFInterface:DataQstart
     
    31403140static Function IRB1_PDDFInitialize()
    31413141       
    3142         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3142        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31433143        DfRef OldDf=GetDataFolderDFR()
    31443144       
     
    33373337static Function IRB1_PDDFSaveResultsToNotebook()
    33383338
    3339         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3339        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")       
    33403340        DFref oldDf= GetDataFolderDFR()
    33413341        setDataFolder root:Packages:Irena:PDDFInterface
     
    34433443static Function IRB1_PDDFSaveToWaves()
    34443444
    3445         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3445        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")       
    34463446        DFref oldDf= GetDataFolderDFR()
    34473447        NVAR SaveToFolder=root:Packages:Irena:PDDFInterface:SaveToFolder
     
    35443544static Function IRB1_PDDFFitResultsTableFnct() : Table
    35453545        PauseUpdate             // building window...
    3546         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3546        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    35473547        DFref oldDf= GetDataFolderDFR()
    35483548        if(!DataFolderExists("root:PDDFFitResults:"))
     
    35903590        DFref oldDf= GetDataFolderDFR()
    35913591
    3592         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3592        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    35933593        setDataFolder root:Packages:Irena:PDDFInterface
    35943594
  • trunk/User Procedures/Nika/NI1_ConvProc.ipf

    r1156 r1169  
    3232//2.56 added getHelp button calling to www manual
    3333//2.55 fixed missing forced naming to data. Now will force use of File name fopr naming the data if nothign else is selected.
    34 //2.54 added a lot of   IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"") in the code here.
     34//2.54 added a lot of   //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"") in the code here.
    3535//2.53 important correction - prior versions did NOT have samplethickness converted to cm, so this may break prior exerimets calibrations.
    3636//2.52 changed selection options for data
     
    131131        STRING ORIENTATION     
    132132
    133         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     133        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    134134        string OldDf = GetDataFolder(1)
    135135        setDataFolder root:Packages:Convert2Dto1D
     
    304304        wave Qvector, QvectorWidth, TwoThetaWidth, DistacneInmmWidth, DspacingWidth
    305305        variable PixX,PixY,BeamX,BeamY, Wavelength,SampleToCCDdistance
    306         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     306        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    307307        //note the Qresolution already has accounted for bin width for integration.
    308308       
     
    383383Function NI1A_CorrectDataPerUserReq(orientation)
    384384        string orientation
    385         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     385        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    386386        string OldDf = GetDataFolder(1)
    387387        setDataFolder root:Packages:Convert2Dto1D
     
    678678//*******************************************************************************************************************************************
    679679Function NI1A_Generate2DPolCorrWv()
    680         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     680        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    681681        string oldDf=GetDataFOlder(1)
    682682        setDataFolder root:Packages:Convert2Dto1D
     
    774774
    775775Function  NI1A_GenerateGeometryCorr2DWave()
    776         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     776        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    777777        string oldDf=GetDataFOlder(1)
    778778        setDataFolder root:Packages:Convert2Dto1D
     
    833833Function NI1A_CheckGeometryWaves(orientation)           //checks if current geometry waves are OK for the input geometry
    834834        string orientation
    835         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     835        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    836836        string oldDf=GetDataFOlder(1)
    837837        setDataFolder root:Packages:Convert2Dto1D
     
    975975Function NI1A_CreateHistogram(orientation)
    976976        string orientation
    977         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     977        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    978978        print "Creating histogram"
    979979       
     
    12111211Function NI1A_CreateLUT(orientation)
    12121212        string orientation
    1213         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1213        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12141214        print "Creating LUT for "+orientation+"  orientation"
    12151215
     
    12861286Function NI1A_Create2DQWave(DataWave)
    12871287        wave DataWave
    1288         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1288        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    12891289        string OldDf=GetDataFolder(1)
    12901290        setDataFolder root:Packages:Convert2Dto1D
     
    13801380Function NI1A_Create2DAngleWave(DataWave)
    13811381        wave DataWave
    1382         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1382        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    13831383        string OldDf=GetDataFolder(1)
    13841384        setDataFolder root:Packages:Convert2Dto1D
     
    14161416
    14171417Function NI1A_Check2DConversionData()
    1418         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1418        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14191419        string oldDf=GetDataFOlder(1)
    14201420        setDataFolder root:Packages:Convert2Dto1D
     
    14951495
    14961496Function NI1_GISAXSOptions() : Panel
    1497         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1497        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    14981498        PauseUpdate             // building window...
    14991499        NewPanel /K=1/W=(520,221,965,409) as "GISAXS Options"
     
    15151515Function NI1_GISAXSOptsSetVarProc(sva) : SetVariableControl
    15161516        STRUCT WMSetVariableAction &sva
    1517         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1517        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15181518        switch( sva.eventCode )
    15191519                case 1: // mouse up
     
    15421542Function NI1A_UpdateMainMaskListBox()           
    15431543
    1544         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1544        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    15451545        string oldDf=GetDataFOlder(1)
    15461546        setDataFolder root:Packages:Convert2Dto1D
     
    15971597
    15981598Function NI1A_UpdateEmptyDarkListBox()         
    1599         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1599        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16001600        string oldDf=GetDataFOlder(1)
    16011601        setDataFolder root:Packages:Convert2Dto1D
     
    16591659//*******************************************************************************************************************************************
    16601660Function NI1A_MakeContiguousSelection()
    1661         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1661        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16621662        string oldDf=GetDataFOlder(1)
    16631663        setDataFolder root:Packages:Convert2Dto1D
     
    16871687
    16881688Function/T NI1A_Create2DSelectionPopup()
    1689         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1689        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    16901690        Wave/T  ListOf2DSampleData=root:Packages:Convert2Dto1D:ListOf2DSampleData
    16911691        variable i, imax=numpnts(ListOf2DSampleData)   
     
    17051705Function NI1A_ButtonProc(ctrlName) : ButtonControl
    17061706        String ctrlName
    1707         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1707        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    17081708        //variable StartTicks=ticks
    17091709       
     
    19531953//*******************************************************************************************************************************************
    19541954Function NI1M_DisplayMaskOnImage()
    1955         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1955        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    19561956        string oldDf=GetDataFOlder(1)
    19571957        setDataFolder root:Packages:Convert2Dto1D
     
    19751975Function NI1M_ChangeMaskColor(ColorToUse) //red, blue, green
    19761976        string ColorToUse
    1977         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     1977        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    19781978        string oldDf=GetDataFOlder(1)
    19791979        setDataFolder root:Packages:Convert2Dto1D
     
    20072007//*******************************************************************************************************************************************
    20082008Function NI1M_RemoveMaskFromImage()
    2009         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2009        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20102010        DoWindow CCDImageToConvertFig
    20112011        if(V_Flag)
     
    20242024Function NI1A_CheckParametersForConv()
    20252025        //check the parameters for conversion
    2026         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2026        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20272027        string oldDf=GetDataFOlder(1)
    20282028        setDataFolder root:Packages:Convert2Dto1D
     
    20772077Function NI1A_ImportThisOneFile(SelectedFileToLoad)
    20782078        string SelectedFileToLoad
    2079         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2079        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    20802080        string OldDf=GetDataFOlder(1)
    20812081        setDataFOlder root:Packages:Convert2Dto1D
     
    21442144
    21452145Function NI1A_DisplayTheRight2DWave()
    2146         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2146        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    21472147        string OldDf=GetDataFOlder(1)
    21482148        setDataFOlder root:Packages:Convert2Dto1D
     
    22002200//*******************************************************************************************************************************************
    22012201Function NI1A_DisplayOneDataSet()
    2202         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2202        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22032203        string oldDf=GetDataFOlder(1)
    22042204        setDataFolder root:Packages:Convert2Dto1D
     
    22882288Function NI1A_DisplayStatsLoadedFile(WaveNameStr)
    22892289        string WaveNameStr
    2290         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2290        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    22912291        string OldDf=GetDataFOlder(1)
    22922292        setDataFOlder root:Packages:Convert2Dto1D
     
    23052305
    23062306Function NI1A_DisplayLoadedFile()
    2307         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2307        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23082308        string OldDf=GetDataFOlder(1)
    23092309        setDataFOlder root:Packages:Convert2Dto1D
     
    23742374Function NI1A_DezingerDataSetIfAskedFor(whichFile)
    23752375        string whichFile
    2376         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2376        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    23772377        string oldDf=GetDataFOlder(1)
    23782378        setDataFolder root:Packages:Convert2Dto1D
     
    24402440
    24412441Function NI1A_ReprocessCurrentImage()
    2442         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2442        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    24432443        string oldDf=GetDataFOlder(1)
    24442444        setDataFolder root:Packages:Convert2Dto1D
     
    25042504
    25052505Function NI1A_LoadManyDataSetsForConv()
    2506         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2506        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    25072507        string oldDf=GetDataFOlder(1)
    25082508        setDataFolder root:Packages:Convert2Dto1D
     
    27522752//*******************************************************************************************************************************************
    27532753Function NI1A_CallImageHookFunction()
    2754         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2754        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27552755        DoWIndow CCDImageToConvertFig
    27562756        if(exists("AfterDisplayImageHook")==6 && V_Flag)
     
    27662766
    27672767Function NI1A_AveLoadNDataSetsForConv()
    2768         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2768        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    27692769        string oldDf=GetDataFOlder(1)
    27702770        setDataFolder root:Packages:Convert2Dto1D
     
    29032903
    29042904Function NI1A_AveLoadManyDataSetsForConv()
    2905         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     2905        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    29062906        string oldDf=GetDataFOlder(1)
    29072907        setDataFolder root:Packages:Convert2Dto1D
     
    30213021//*******************************************************************************************************************************************
    30223022Function/S NI1A_CalibrationNote()
    3023         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3023        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    30243024        string newNote=""
    30253025                SVAR DataCalibrationString=root:Packages:Convert2Dto1D:DataCalibrationString
     
    31083108Function NI1A_LoadParamsUsingFncts(SelectedFileToLoad)
    31093109        string SelectedFileToLoad
    3110         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3110        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    31113111        string oldDf=GetDataFOlder(1)
    31123112        setDataFolder root:Packages:Convert2Dto1D
     
    32293229
    32303230Function NI1A_ExportDisplayedImage()
    3231         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3231        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32323232        string OldDf=GetDataFolder(1)
    32333233        setDataFOlder root:Packages:Convert2Dto1D
     
    32783278
    32793279Function NI1A_SaveDisplayedImage()
    3280         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3280        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    32813281        string OldDf=GetDataFolder(1)
    32823282        setDataFOlder root:Packages:Convert2Dto1D
     
    33503350Function NI1A_PrepareLogDataIfWanted(DataWaveName)
    33513351        string DataWaveName
    3352         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3352        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33533353        string oldDf=GetDataFOlder(1)
    33543354        setDataFolder root:Packages:Convert2Dto1D
     
    33753375        string EmptyOrDark
    33763376        //check the parameters for conversion
    3377         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3377        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    33783378        string OldDf=getDataFolder(1)
    33793379        setDataFolder root:Packages:Convert2Dto1D
     
    34663466//Function NI1A_DisplayOneDataSets()
    34673467//      //check the parameters for conversion
    3468 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3468//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    34693469//      string oldDf=GetDataFOlder(1)
    34703470//      setDataFolder root:Packages:Convert2Dto1D
     
    34913491//*******************************************************************************************************************************************
    34923492Function NI1A_LoadMask()
    3493         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3493        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    34943494        string OldDf=GetDataFOlder(1)
    34953495        setDataFOlder root:Packages:Convert2Dto1D
     
    36343634//Function NI1A_FindeOrderNumber(stringWithName)       
    36353635//      string stringWithName
    3636 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3636//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36373637//      //FoundON = stringWithName[strsearch(stringWithName, "_", inf ,1)+1, strsearch(stringWithName, ".", inf ,1)-1]
    36383638//      //change to search from teh back side for frst useful number. Some palces append text at the end.
     
    36563656Function/T NI1A_CleanListOfFilesForTypes(ListOfAvailableCompounds,DataFileType, MatchString)
    36573657        string ListOfAvailableCompounds,DataFileType, MatchString
    3658         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3658        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    36593659        variable i, imax, numberOfFile
    36603660        if(strlen(ListOfAvailableCompounds)<2)
     
    37073707        wave/T ListOf2DSampleData
    37083708        string ListOfFiles,Extension, NameMatchString
    3709         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3709        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    37103710//      ListOfFiles =  grepList(ListOfFiles,NameMatchString)
    37113711       
     
    37313731
    37323732Function NI1A_Convert2Dto1DPanelFnct()
    3733         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     3733        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    37343734        PauseUpdate             // building window...
    37353735        NewPanel /K=1/N=NI1A_Convert2Dto1DPanel /W=(16,57,459,810) as "Main 2D to 1D conversion panel"
     
    43774377//*******************************************************************************************************************************************
    43784378Function NI1A_FixMovieBtnAndOtherCntrls()
    4379         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4379        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    43804380        NVAR Movie_FileOpened=root:Packages:Convert2Dto1D:Movie_FileOpened
    43814381        NVAR Movie_AppendAutomatically=root:Packages:Convert2Dto1D:Movie_AppendAutomatically
     
    44054405Function NI1A_SetVarProcMainPanel(sva) : SetVariableControl
    44064406        STRUCT WMSetVariableAction &sva
    4407         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4407        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    44084408        String ctrlName=sva.ctrlName
    44094409        Variable varNum=sva.dval
     
    46744674Function NI1A_TopCCDImageUpdateColors(updateRanges)
    46754675        variable updateRanges
    4676         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4676        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    46774677        string oldDf=GetDataFOlder(1)
    46784678        setDataFolder root:Packages:Convert2Dto1D
     
    47374737        String ctrlName
    47384738        Variable tabNum
    4739         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     4739        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    47404740        NVAR UseSampleThickness= root:Packages:Convert2Dto1D:UseSampleThickness
    47414741        NVAR UseSampleTransmission= root:Packages:Convert2Dto1D:UseSampleTransmission
     
    50065006        String varStr
    50075007        String varName
    5008         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5008        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    50095009
    50105010        if(cmpstr("BeamCenterX",ctrlName)==0)
     
    50785078//      Variable event  //1=mouse down, 2=up, 3=dbl click, 4=cell select with mouse or keys
    50795079//                                      //5=cell select with shift key, 6=begin edit, 7=end
    5080 //      IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5080//      //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    50815081//      if(cmpstr("MaskListBoxSelection",ctrlName)==0)
    50825082//     
     
    50925092Function NI1A_PolarCorCheckProc(cba) : CheckBoxControl
    50935093        STRUCT WMCheckboxAction &cba
    5094         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5094        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    50955095        switch( cba.eventCode )
    50965096                case 2: // mouse up
     
    51475147//*******************************************************************************************************************************************
    51485148Function NI1A_LineProfUpdateQ()
    5149         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5149        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    51505150                NVAR LineProf_DistanceFromCenter=root:Packages:Convert2Dto1D:LineProf_DistanceFromCenter
    51515151                NVAR LineProf_Width=root:Packages:Convert2Dto1D:LineProf_Width
     
    52185218                Wave w
    52195219                variable LineProf_DistanceFromCenter
    5220                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5220                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    52215221
    52225222                variable QValueTarget = w[0]
     
    52575257//*******************************************************************************************************************************************
    52585258Function/S NI1A_CreateHelpForNameFunction()
    5259         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5259        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    52605260        DOwindow        NI1A_UseFnctToCreateName
    52615261        if(V_Flag)
     
    52985298        String ctrlName
    52995299        Variable checked
    5300         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5300        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    53015301        string oldDf=GetDataFolder(1)
    53025302        setDataFolder root:Packages:Convert2Dto1D
     
    59365936//*******************************************************************************************************************************************
    59375937Function NI1A_LineProf_Update()
    5938         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5938        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59395939        string oldDf=GetDataFOlder(1)
    59405940        setDataFolder root:Packages:Convert2Dto1D
     
    59535953//*******************************************************************************************************************************************
    59545954Function NI1A_DoDrawingsInto2DGraph()
    5955         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     5955        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    59565956        string oldDf=GetDataFOlder(1)
    59575957        DoWIndow CCDImageToConvertFig
     
    60046004                        return 0
    60056005                endif
    6006                 IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6006                //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    60076007       
    60086008                ColorScale/K/N=Colorscale2D/W=CCDImageToConvertFig      ///W=CCDImageToConvertFig
     
    60626062Function NI1A_DrawSectorsIn2DGraph()
    60636063
    6064         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6064        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    60656065        string oldDf=GetDataFOlder(1)
    60666066        setDataFolder root:Packages:Convert2Dto1D
     
    61476147Function NI1A_DrawLinesIn2DGraph()
    61486148
    6149         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6149        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    61506150        string oldDf=GetDataFOlder(1)
    61516151        setDataFolder root:Packages:Convert2Dto1D
     
    63456345        variable DetDimX,DetDimY,BCx,BCy,Angle,Offset
    63466346        Wave WaveX,WaveY
    6347         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6347        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    63486348        //generate X-Y path for angle line on the detector
    63496349        string oldDf=GetDataFOlder(1)
     
    63876387        variable Excentricity,BCx,BCy,Offset
    63886388        Wave WaveX,WaveY
    6389         IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
     6389        //IN2G_PrintDebugStatement(IrenaDebugLevel, 5,"")
    63906390        //generate X-Y path for angle line on the detector
    63916391        string oldDf=GetDataFOlder(1)
     
    64106410//      variable DetDimX,DetDimY,BCx,BCy,Angle,Offset
    64116411//      Wave WaveX,WaveY