Symbol Description Uses
yzgrdrho 8



File Line number Procedure Code
./pkg/ecco/cost_obcs_ageos.F 164 COST_OBCS_AGEOS
              yzgrdrho(j,k,bi,bj)    = 0. _d 0
./pkg/ecco/cost_obcs_ageos.F 381 COST_OBCS_AGEOS
                yzgrdrho(j,k,bi,bj) =
./pkg/ecco/cost_obcs_ageos.F 396 COST_OBCS_AGEOS
                yzdvel2(j,k,bi,bj) =((yzgrdrho(j,k  ,bi,bj)*delz(k)/2.)+
./pkg/ecco/cost_obcs_ageos.F 397 COST_OBCS_AGEOS
     &                             (yzgrdrho(j,k+1,bi,bj)*delz(k+1)/2.))
./pkg/ecco/cost_obcs_ageos.F 444 COST_OBCS_AGEOS
                yzgrdrho(j,k,bi,bj) =
./pkg/ecco/cost_obcs_ageos.F 459 COST_OBCS_AGEOS
                yzdvel2(j,k,bi,bj) =((yzgrdrho(j,k  ,bi,bj)*delz(k)/2.)+
./pkg/ecco/cost_obcs_ageos.F 460 COST_OBCS_AGEOS
     &                             (yzgrdrho(j,k+1,bi,bj)*delz(k+1)/2.))
./pkg/ecco/cost_obcs_ageos.F 76 COST_OBCS_AGEOS
      _RL yzgrdrho(1-oly:sny+oly,Nr,nsx,nsy)