Symbol Description Uses
yzgrdrho 8



File Line number Procedure Code
./pkg/ecco/cost_obcs_ageos.F 159 COST_OBCS_AGEOS
              yzgrdrho(j,k,bi,bj)    = 0. _d 0
./pkg/ecco/cost_obcs_ageos.F 386 COST_OBCS_AGEOS
                yzgrdrho(j,k,bi,bj) =
./pkg/ecco/cost_obcs_ageos.F 402 COST_OBCS_AGEOS
                yzdvel2(j,k,bi,bj) =((yzgrdrho(j,k  ,bi,bj)*delz(k)/2.)+
./pkg/ecco/cost_obcs_ageos.F 403 COST_OBCS_AGEOS
     &                             (yzgrdrho(j,k+1,bi,bj)*delz(k+1)/2.))
./pkg/ecco/cost_obcs_ageos.F 453 COST_OBCS_AGEOS
                yzgrdrho(j,k,bi,bj) =
./pkg/ecco/cost_obcs_ageos.F 469 COST_OBCS_AGEOS
                yzdvel2(j,k,bi,bj) =((yzgrdrho(j,k  ,bi,bj)*delz(k)/2.)+
./pkg/ecco/cost_obcs_ageos.F 470 COST_OBCS_AGEOS
     &                             (yzgrdrho(j,k+1,bi,bj)*delz(k+1)/2.))
./pkg/ecco/cost_obcs_ageos.F 71 COST_OBCS_AGEOS
      _RL yzgrdrho(1-oly:sny+oly,Nr,nsx,nsy)