Symbol Description Uses
begintmi 4



File Line number Procedure Code
./pkg/ecco/cost_readtmifields.F 55 COST_READTMIFIELDS
      integer begintmi
./pkg/ecco/cost_readtmifields.F 88 COST_READTMIFIELDS
      begintmi = tmistartdate(1)/10000
./pkg/ecco/cost_readtmifields.F 90 COST_READTMIFIELDS
      if ( begintmi .eq. beginrun ) then
./pkg/ecco/cost_readtmifields.F 94 COST_READTMIFIELDS
        tmirec = ( beginrun - begintmi - 1)*nmonthyear +