Symbol Description Uses
viscA4_D 30



File Line number Procedure Code
./pkg/mom_common/mom_calc_visc.F 16 MOM_CALC_VISC
     O        viscAh_Z,viscAh_D,viscA4_Z,viscA4_D,
./pkg/mom_common/mom_calc_visc.F 431 MOM_CALC_VISC
         viscA4_D(i,j)=MAX(viscA4_DMin(i,j),Alin)
./pkg/mom_common/mom_calc_visc.F 433 MOM_CALC_VISC
         viscA4_D(i,j)=MIN(viscA4_DMax(i,j),viscA4_D(i,j))
./pkg/mom_common/mom_calc_visc.F 548 MOM_CALC_VISC
            viscA4_W(i,j,k+1,bi,bj) = halfRL*viscA4_D(i,j)
./pkg/mom_common/mom_calc_visc.F 560 MOM_CALC_VISC
            viscA4_W(i,j,k,bi,bj) = shiftA4 + viscA4_D(i,j)
./pkg/mom_common/mom_calc_visc.F 570 MOM_CALC_VISC
     &                                      + halfRL*viscA4_D(i,j)
./pkg/mom_common/mom_calc_visc.F 594 MOM_CALC_VISC
       CALL DIAGNOSTICS_FILL(viscA4_D,'VISCA4D ',k,1,2,bi,bj,myThid)
./pkg/mom_common/mom_calc_visc.F 95 MOM_CALC_VISC
      _RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_fluxform.F 147 MOM_FLUXFORM
      _RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_fluxform.F 393 MOM_FLUXFORM
         viscA4_D(i,j) = viscA4D
./pkg/mom_fluxform/mom_fluxform.F 399 MOM_FLUXFORM
     O           viscAh_Z, viscAh_D, viscA4_Z, viscA4_D,
./pkg/mom_fluxform/mom_fluxform.F 520 MOM_FLUXFORM
     I                        viscAh_D,viscA4_D,myThid )
./pkg/mom_fluxform/mom_fluxform.F 756 MOM_FLUXFORM
     I                        viscAh_D,viscA4_D,myThid )
./pkg/mom_fluxform/mom_u_xviscflux.F 14 MOM_U_XVISCFLUX
     I        viscAh_D,viscA4_D,
./pkg/mom_fluxform/mom_u_xviscflux.F 41 MOM_U_XVISCFLUX
      _RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_u_xviscflux.F 61 MOM_U_XVISCFLUX
     &       +viscA4_D(i,j)*(del2u(i+1,j)-del2u(i,j))
./pkg/mom_fluxform/mom_v_yviscflux.F 14 MOM_V_YVISCFLUX
     I        viscAh_D,viscA4_D,
./pkg/mom_fluxform/mom_v_yviscflux.F 41 MOM_V_YVISCFLUX
      _RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_v_yviscflux.F 63 MOM_V_YVISCFLUX
     &       +viscA4_D(i,j)*(del2v(i,j+1)-del2v(i,j))
./pkg/mom_vecinv/mom_vecinv.F 120 MOM_VECINV
      _RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vecinv.F 363 MOM_VECINV
         viscA4_D(i,j) = viscA4D
./pkg/mom_vecinv/mom_vecinv.F 370 MOM_VECINV
     O            viscAh_Z, viscAh_D, viscA4_Z, viscA4_D,
./pkg/mom_vecinv/mom_vecinv.F 429 MOM_VECINV
     I            viscAh_Z, viscAh_D, viscA4_Z, viscA4_D,
./pkg/mom_vecinv/mom_vecinv.F 437 MOM_VECINV
     I            viscAh_Z, viscAh_D, viscA4_Z, viscA4_D,
./pkg/mom_vecinv/mom_vi_hdissip.F 148 MOM_VI_HDISSIP
          Dij=Dij*viscA4_D(i,j)
./pkg/mom_vecinv/mom_vi_hdissip.F 149 MOM_VI_HDISSIP
          Dim=Dim*viscA4_D(i,j-1)
./pkg/mom_vecinv/mom_vi_hdissip.F 150 MOM_VI_HDISSIP
          Dmj=Dmj*viscA4_D(i-1,j)
./pkg/mom_vecinv/mom_vi_hdissip.F 35 MOM_VI_HDISSIP
      _RL viscA4_D(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_hdissip.F 9 MOM_VI_HDISSIP
     I        viscAh_Z, viscAh_D, viscA4_Z, viscA4_D,