Symbol Description Uses
VisbeckK 35



File Line number Procedure Code
./pkg/gmredi/GMREDI.h 255 NO PROCEDURE
      _RL VisbeckK(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/gmredi/GMREDI.h 256 NO PROCEDURE
      COMMON /GM_Visbeck/ VisbeckK
./pkg/gmredi/gmredi_calc_psi_b.F 160 GMREDI_CALC_PSI_B
     &      +op5*(VisbeckK(i-1,j,bi,bj)+VisbeckK(i,j,bi,bj))
./pkg/gmredi/gmredi_calc_psi_b.F 183 GMREDI_CALC_PSI_B
     &      +op5*(VisbeckK(i,j-1,bi,bj)+VisbeckK(i,j,bi,bj))
./pkg/gmredi/gmredi_calc_tensor.F 1002 GMREDI_CALC_TENSOR
     &     +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj))*GM_advect
./pkg/gmredi/gmredi_calc_tensor.F 1031 GMREDI_CALC_TENSOR
     &     +(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj))*0.5 _d 0
./pkg/gmredi/gmredi_calc_tensor.F 1081 GMREDI_CALC_TENSOR
         CALL TIMEAVE_CUMULATE( Visbeck_K_T, VisbeckK, 1,
./pkg/gmredi/gmredi_calc_tensor.F 154 GMREDI_CALC_TENSOR
        VisbeckK(i,j,bi,bj) = 0. _d 0
./pkg/gmredi/gmredi_calc_tensor.F 396 GMREDI_CALC_TENSOR
           VisbeckK(i,j,bi,bj) = VisbeckK(i,j,bi,bj)
./pkg/gmredi/gmredi_calc_tensor.F 484 GMREDI_CALC_TENSOR
         VisbeckK(i,j,bi,bj) = VisbeckK(i,j,bi,bj)
./pkg/gmredi/gmredi_calc_tensor.F 505 GMREDI_CALC_TENSOR
         VisbeckK(i,j,bi,bj)=
./pkg/gmredi/gmredi_calc_tensor.F 506 GMREDI_CALC_TENSOR
     &       MIN( MAX( VisbeckK(i,j,bi,bj), GM_Visbeck_minVal_K ),
./pkg/gmredi/gmredi_calc_tensor.F 555 GMREDI_CALC_TENSOR
     &           + VisbeckK(i,j,bi,bj)*(1. _d 0 + GM_skewflx)
./pkg/gmredi/gmredi_calc_tensor.F 574 GMREDI_CALC_TENSOR
     &                     + VisbeckK(i,j,bi,bj)
./pkg/gmredi/gmredi_calc_tensor.F 732 GMREDI_CALC_TENSOR
     &     +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))
./pkg/gmredi/gmredi_calc_tensor.F 784 GMREDI_CALC_TENSOR
     &     +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))*GM_advect
./pkg/gmredi/gmredi_calc_tensor.F 813 GMREDI_CALC_TENSOR
     &     +(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))*0.5 _d 0
./pkg/gmredi/gmredi_calc_tensor.F 950 GMREDI_CALC_TENSOR
     &     +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj))
./pkg/gmredi/gmredi_diagnostics_fill.F 51 GMREDI_DIAGNOSTICS_FILL
         CALL DIAGNOSTICS_FILL(VisbeckK,'GM_VisbK',0,1,1,bi,bj,myThid)
./pkg/gmredi/gmredi_init_varia.F 64 GMREDI_INIT_VARIA
          VisbeckK(i,j,bi,bj) = 0. _d 0
./pkg/gmredi/gmredi_xtransport.F 139 GMREDI_XTRANSPORT
     &     +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i-1,j,bi,bj))
./pkg/gmredi/gmredi_ytransport.F 138 GMREDI_YTRANSPORT
     &     +op5*(VisbeckK(i,j,bi,bj)+VisbeckK(i,j-1,bi,bj))
./model/src/do_oceanic_phys.F 711 DO_OCEANIC_PHYS
           VisbeckK(i,j,bi,bj)   = 0. _d 0