Changeset 1189


Ignore:
Timestamp:
Mar 2, 2022 9:53:30 AM (9 months ago)
Author:
ilavsky
Message:

minor fix

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/User Procedures/Indra 2/IN2_GeneralProcedures.ipf

    r1180 r1189  
    811811        DFref oldDf=GetDataFolderDFR()
    812812        setDataFolder GetWavesDataFolderDFR(SampleName)
    813         make/O/N=(imax) TimeWave, TemperatureWave, PercentWave, OrderWave
     813        make/O/N=(imax) TimeWave, TemperatureWave, PercentWave, OrderWave, NumWave
    814814        String DataFolderName
    815815        For(i=0;i<imax;i+=1)
     
    819819                PercentWave[i]                  =       IN2G_IdentifyNameComponent(DataFolderName, "_xyzpct")
    820820                OrderWave[i]                            =       IN2G_IdentifyNameComponent(DataFolderName, "_xyz")
     821                NumWave[i]                              =       IN2G_IdentifyNameComponent(DataFolderName, "_xyz_")
    821822        endfor
    822823        //clean up and leave only thoser who contain some numbers in tehm.
     
    856857
    857858Function IN2G_IdentifyNameComponent(NameStr, whichComp)
    858                 string NameStr, whichComp               //"_xyzC",  _xyzmin, _xyzpct, _xyz
     859                string NameStr, whichComp               //"_xyzC",  _xyzmin, _xyzpct, _xyz, _xyz_
    859860               
    860861                string NameStrLoc=StringFromList(ItemsInList(NameStr, ":")-1, NameStr, ":"  )
     
    863864                if(StringMatch(whichComp, "_xyz"))
    864865                        FOr(i=ItemsInList(NameStrLoc, "_")-1;i>=0;i-=1)
     866                                tmpStr = StringFromList(i, NameStrLoc, "_")
     867                                if(GrepString(tmpStr, "^[-+]?[0-9]*\.?[0-9]+([eE][-+]?[0-9]+)?$"))
     868                                        return str2num(tmpStr)
     869                                endif
     870                        endfor
     871                endif
     872                if(StringMatch(whichComp, "_xyz_"))
     873                        FOr(i=ItemsInList(NameStrLoc, "_")-2;i>=0;i-=1)
    865874                                tmpStr = StringFromList(i, NameStrLoc, "_")
    866875                                if(GrepString(tmpStr, "^[-+]?[0-9]*\.?[0-9]+([eE][-+]?[0-9]+)?$"))
Note: See TracChangeset for help on using the changeset viewer.