Symbol Description Uses
IMON 12



File Line number Procedure Code
./pkg/fizhi/update_earth_exports.F 764 GETLGR
      MIDMON = DAYS(IMON)/2 + 1
./pkg/fizhi/update_earth_exports.F 768 GETLGR
        K2 = IMON
./pkg/fizhi/update_earth_exports.F 769 GETLGR
        K1 = MOD(IMON+10,12) + 1
./pkg/fizhi/update_earth_exports.F 771 GETLGR
        K1 = IMON
./pkg/fizhi/update_earth_exports.F 772 GETLGR
        K2 = MOD(IMON,12) + 1