Symbol Description Uses
dmonth 8



File Line number Procedure Code
./pkg/atm2d/calc_fileload.F 46 CALC_FILELOAD
      _RL  dmonth(0:13)
./pkg/atm2d/calc_fileload.F 47 CALC_FILELOAD
      DATA dmonth /-1339200.D0, 1339200.D0, 3888000.D0, 6436800.D0,
./pkg/atm2d/calc_fileload.F 66 CALC_FILELOAD
        IF ((ifcyc.GT.dmonth(mn-1)).AND.(ifcyc.LE.dmonth(mn)))
./pkg/atm2d/calc_fileload.F 75 CALC_FILELOAD
      wght1=(ifcyc - dmonth(intime0)) /
./pkg/atm2d/calc_fileload.F 76 CALC_FILELOAD
     &     (dmonth(intime1) - dmonth(intime0))
./pkg/atm2d/calc_fileload.F 79 CALC_FILELOAD
      IF (ifcyc.LE.dmonth(intime0) + dtatmo) ifTime=.TRUE.