Symbol Description Uses
diagnosfld3d 15



File Line number Procedure Code
./pkg/ecco/cost_drift.F 223 COST_DRIFT
                     diagnosfld3d(i,j,k,bi,bj) =
./pkg/ecco/cost_drift.F 233 COST_DRIFT
                     diagnosfld3d(i,j,k,bi,bj) = 0.
./pkg/ecco/cost_drift.F 241 COST_DRIFT
     &         diagnosfld3d, 1, optimcycle, mythid )
./pkg/ecco/cost_drift.F 253 COST_DRIFT
                     diagnosfld3d(i,j,k,bi,bj) =
./pkg/ecco/cost_drift.F 263 COST_DRIFT
                     diagnosfld3d(i,j,k,bi,bj) = 0.
./pkg/ecco/cost_drift.F 271 COST_DRIFT
     &         diagnosfld3d, 1, optimcycle, mythid )
./pkg/ecco/cost_drift.F 78 COST_DRIFT
      _RL diagnosfld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_salt.F 201 COST_SALT
                     diagnosfld3d(i,j,k,bi,bj) =
./pkg/ecco/cost_salt.F 206 COST_SALT
                     diagnosfld3d(i,j,k,bi,bj) = 0.
./pkg/ecco/cost_salt.F 216 COST_SALT
     &           diagnosfld3d, irec, optimcycle, mythid )
./pkg/ecco/cost_salt.F 83 COST_SALT
      _RL diagnosfld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_theta.F 200 COST_THETA
                     diagnosfld3d(i,j,k,bi,bj) =
./pkg/ecco/cost_theta.F 205 COST_THETA
                     diagnosfld3d(i,j,k,bi,bj) = 0.
./pkg/ecco/cost_theta.F 215 COST_THETA
     &           diagnosfld3d, irec, optimcycle, mythid )
./pkg/ecco/cost_theta.F 82 COST_THETA
      _RL diagnosfld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)