Symbol Description Uses
mdtsta 4



File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 108 COST_GENCOST_SSHV4
      integer mdtsta(4), mdtend(4)
./pkg/ecco/cost_gencost_sshv4.F 274 COST_GENCOST_SSHV4
       call CAL_COPYDATE(gencost_startdate(1,igen_mdt),mdtsta,mythid)
./pkg/ecco/cost_gencost_sshv4.F 306 COST_GENCOST_SSHV4
       mdt_y0=mdtsta(1)/10000
./pkg/ecco/cost_gencost_sshv4.F 310 COST_GENCOST_SSHV4
     &  'mdt[start,end]date(1): ', mdtsta(1), ',', mdtend(1)