Symbol Description Uses
mrec 18


File Line number Procedure Code
./pkg/ecco/cost_ctdsclim.F 126 COST_CTDSCLIM 
            mrec=irec+(iyear-1)*12
./pkg/ecco/cost_ctdsclim.F 128 COST_CTDSCLIM 
            call ACTIVE_READ_XYZ( fnamesalt, sbar, mrec,
./pkg/ecco/cost_ctdsclim.F 86 COST_CTDSCLIM 
      integer mrec, nyears, iyear
./pkg/ecco/cost_ctdtclim.F 125 COST_CTDTCLIM 
            mrec=irec+(iyear-1)*12
./pkg/ecco/cost_ctdtclim.F 127 COST_CTDTCLIM 
            call ACTIVE_READ_XYZ( fnametheta, tbar, mrec,
./pkg/ecco/cost_ctdtclim.F 85 COST_CTDTCLIM 
      integer mrec, nyears, iyear
./pkg/ecco/cost_salt.F 131 COST_SALT 
            mrec=irec+(iyear-1)*12
./pkg/ecco/cost_salt.F 132 COST_SALT 
            irectmp=mrec
./pkg/ecco/cost_salt.F 134 COST_SALT 
            call ACTIVE_READ_XYZ( fnamesalt, sbar, mrec,
./pkg/ecco/cost_salt.F 84 COST_SALT 
      integer mrec, nyears, iyear
./pkg/ecco/cost_sigmar.F 133 COST_SIGMAR 
            mrec=irec+(iyear-1)*12
./pkg/ecco/cost_sigmar.F 134 COST_SIGMAR 
            irectmp=mrec
./pkg/ecco/cost_sigmar.F 136 COST_SIGMAR 
            call ACTIVE_READ_XYZ( fnamesigmaR, sigmaRbar, mrec,
./pkg/ecco/cost_sigmar.F 86 COST_SIGMAR 
      integer mrec, nyears, iyear
./pkg/ecco/cost_theta.F 131 COST_THETA 
            mrec=irec+(iyear-1)*12
./pkg/ecco/cost_theta.F 132 COST_THETA 
            irectmp=mrec
./pkg/ecco/cost_theta.F 134 COST_THETA 
            call ACTIVE_READ_XYZ( fnametheta, tbar, mrec,
./pkg/ecco/cost_theta.F 84 COST_THETA 
      integer mrec, nyears, iyear