Symbol Description Uses
IMON 6



File Line number Procedure Code
./pkg/fizhi/update_earth_exports.F 705 GETLGR
      SUBROUTINE GETLGR(sec,IMON,IDAY,ALAT,ITYP,NCHPS,nchpdim,
./pkg/fizhi/update_earth_exports.F 775 GETLGR
      MIDMON = DAYS(IMON)/2 + 1
./pkg/fizhi/update_earth_exports.F 778 GETLGR
        K2 = IMON
./pkg/fizhi/update_earth_exports.F 779 GETLGR
        K1 = MOD(IMON+10,12) + 1
./pkg/fizhi/update_earth_exports.F 781 GETLGR
        K1 = IMON
./pkg/fizhi/update_earth_exports.F 782 GETLGR
        K2 = MOD(IMON,12) + 1