Symbol Description Uses
yearLoc 4



File Line number Procedure Code
./pkg/exf/exf_getyearlyfieldname.F 41 EXF_GETYEARLYFIELDNAME
      integer yearLoc
./pkg/exf/exf_getyearlyfieldname.F 55 EXF_GETYEARLYFIELDNAME
        yearLoc = year-1900
./pkg/exf/exf_getyearlyfieldname.F 56 EXF_GETYEARLYFIELDNAME
        if (year.ge.2000) yearLoc = year-2000
./pkg/exf/exf_getyearlyfieldname.F 57 EXF_GETYEARLYFIELDNAME
        write(genfileout(1:128),'( a,i2.2)') genfile(1:il),yearLoc