Symbol Description Uses
irectmp 11



File Line number Procedure Code
./pkg/ecco/cost_salt.F 132 COST_SALT
            irectmp=mrec
./pkg/ecco/cost_salt.F 155 COST_SALT
        irectmp=irec
./pkg/ecco/cost_salt.F 164 COST_SALT
        levmon = (irectmp-1) + levoff
./pkg/ecco/cost_salt.F 64 COST_SALT
      integer irec, irectmp
./pkg/ecco/cost_sigmar.F 134 COST_SIGMAR
            irectmp=mrec
./pkg/ecco/cost_sigmar.F 157 COST_SIGMAR
        levmon = (irectmp-1) + levoff
./pkg/ecco/cost_sigmar.F 65 COST_SIGMAR
      integer irec, irectmp
./pkg/ecco/cost_theta.F 132 COST_THETA
            irectmp=mrec
./pkg/ecco/cost_theta.F 155 COST_THETA
        irectmp = irec
./pkg/ecco/cost_theta.F 164 COST_THETA
        levmon = (irectmp-1) + levoff
./pkg/ecco/cost_theta.F 65 COST_THETA
      integer irec, irectmp