Symbol Description Uses
modm 11



File Line number Procedure Code
./pkg/ecco/cost_bp_read.F 105 COST_BP_READ
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_bp_read.F 106 COST_BP_READ
      iyear = mody + INT((modm-1+irec-1)/12)
./pkg/ecco/cost_bp_read.F 107 COST_BP_READ
      imonth = 1 + MOD(modm-1+irec-1,12)
./pkg/ecco/cost_bp_read.F 71 COST_BP_READ
      integer mody, modm
./pkg/ecco/cost_gencal.F 114 COST_GENCAL
           modm   = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_gencal.F 115 COST_GENCAL
           yday   = mody + INT((modm-1+irec-1)/12)
./pkg/ecco/cost_gencal.F 116 COST_GENCAL
           localrec = 1 + MOD(modm-1+irec-1,12)
./pkg/ecco/cost_gencal.F 67 COST_GENCAL
      integer mody, modm
./pkg/ecco/ecco_check.F 712 ECCO_CHECK_FILES
      INTEGER irec, mody, modm, yday, locy, il
./pkg/ecco/ecco_check.F 750 ECCO_CHECK_FILES
           modm   = modelstartdate(1)/100 - mody*100
./pkg/ecco/ecco_check.F 751 ECCO_CHECK_FILES
           yday   = mody + INT((modm-1+irec-1)/12)