Symbol Description Uses
wFld Local copy of vertical velocity field 175



File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 129 GAD_ADVECTION
      _RL wFld    (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_advection.F 742 GAD_ADVECTION
           wFld(i,j)   = 0.
./pkg/generic_advdiff/gad_advection.F 759 GAD_ADVECTION
           wFld(i,j)   = wVel(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_advection.F 771 GAD_ADVECTION
     U                 wFld, rTrans,
./pkg/generic_advdiff/gad_advection.F 786 GAD_ADVECTION
     I                            deltaTLev(k),rTrans,wFld,localTijk,
./pkg/generic_advdiff/gad_advection.F 790 GAD_ADVECTION
     I                               rTrans, wFld, localTijk,
./pkg/generic_advdiff/gad_advection.F 794 GAD_ADVECTION
     I                               rTrans, wFld, localTijk,
./pkg/generic_advdiff/gad_advection.F 798 GAD_ADVECTION
     I                               rTrans, wFld, localTijk,
./pkg/generic_advdiff/gad_advection.F 803 GAD_ADVECTION
     I                               rTrans, wFld, localTijk,
./pkg/generic_advdiff/gad_calc_rhs.F 12 GAD_CALC_RHS
     I           xA, yA, maskUp, uFld, vFld, wFld,
./pkg/generic_advdiff/gad_calc_rhs.F 455 GAD_CALC_RHS
     I         deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj),
./pkg/generic_advdiff/gad_calc_rhs.F 459 GAD_CALC_RHS
     I         deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj),
./pkg/generic_advdiff/gad_calc_rhs.F 467 GAD_CALC_RHS
     I         deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj),
./pkg/generic_advdiff/gad_calc_rhs.F 475 GAD_CALC_RHS
     I         deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj),
./pkg/generic_advdiff/gad_calc_rhs.F 479 GAD_CALC_RHS
     I         deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj),
./pkg/generic_advdiff/gad_calc_rhs.F 485 GAD_CALC_RHS
     I         deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj),
./pkg/generic_advdiff/gad_calc_rhs.F 94 GAD_CALC_RHS
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_dst2u1_adv_r.F 12 GAD_DST2U1_ADV_R
     I           deltaTloc, rTrans, wFld,
./pkg/generic_advdiff/gad_dst2u1_adv_r.F 42 GAD_DST2U1_ADV_R
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_dst2u1_adv_r.F 75 GAD_DST2U1_ADV_R
         wLoc = wFld(i,j)
./pkg/generic_advdiff/gad_dst3_adv_r.F 12 GAD_DST3_ADV_R
     I           rTrans, wFld,
./pkg/generic_advdiff/gad_dst3_adv_r.F 43 GAD_DST3_ADV_R
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_dst3_adv_r.F 84 GAD_DST3_ADV_R
        wLoc = wFld(i,j)
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 12 GAD_DST3FL_ADV_R
     I           rTrans, wFld,
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 41 GAD_DST3FL_ADV_R
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 75 GAD_DST3FL_ADV_R
        wLoc = wFld(i,j)
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 12 GAD_FLUXLIMIT_ADV_R
     I           rTrans, wFld,
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 47 GAD_FLUXLIMIT_ADV_R
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 85 GAD_FLUXLIMIT_ADV_R
         wLoc = wFld(i,j)
./pkg/generic_advdiff/gad_implicit_r.F 188 GAD_IMPLICIT_R
            wFld(i,j)   = 0. _d 0
./pkg/generic_advdiff/gad_implicit_r.F 195 GAD_IMPLICIT_R
            wFld(i,j)   = wVel(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_implicit_r.F 196 GAD_IMPLICIT_R
            rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskC(i,j,k-1,bi,bj)
./pkg/generic_advdiff/gad_implicit_r.F 203 GAD_IMPLICIT_R
     U                 wFld, rTrans,
./pkg/generic_advdiff/gad_implicit_r.F 74 GAD_IMPLICIT_R
      _RL wFld     (1-Olx:sNx+Olx,1-Oly:sNy+Oly)
./pkg/generic_advdiff/gad_os7mp_adv_r.F 28 GAD_OS7MP_ADV_R
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_os7mp_adv_r.F 62 GAD_OS7MP_ADV_R
        wLoc = wFld(i,j)
./pkg/generic_advdiff/gad_os7mp_adv_r.F 8 GAD_OS7MP_ADV_R
     I           wTrans, wFld,
./pkg/generic_advdiff/gad_som_advect.F 102 GAD_SOM_ADVECT
      _RL wFld    (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/generic_advdiff/gad_som_advect.F 549 GAD_SOM_ADVECT
           wFld(i,j)   = 0.
./pkg/generic_advdiff/gad_som_advect.F 559 GAD_SOM_ADVECT
           wFld(i,j)   = wVel(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_som_advect.F 572 GAD_SOM_ADVECT
           wFld(i,j)   = wVel(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_som_advect.F 586 GAD_SOM_ADVECT
     U                 wFld, rTrans,
./pkg/gmredi/gmredi_calc_wflow.F 10 GMREDI_CALC_WFLOW
     U                       wFld, rTrans,
./pkg/gmredi/gmredi_calc_wflow.F 32 GMREDI_CALC_WFLOW
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/gmredi/gmredi_calc_wflow.F 56 GMREDI_CALC_WFLOW
         wFld(i,j)   = wFld(i,j)   + delPsi*recip_rA(i,j,bi,bj)
./pkg/longstep/longstep_thermodynamics.F 104 LONGSTEP_THERMODYNAMICS
      _RL wFld    (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/longstep/longstep_thermodynamics.F 336 LONGSTEP_THERMODYNAMICS
             wFld(i,j)   = 0. _d 0
./pkg/longstep/longstep_thermodynamics.F 346 LONGSTEP_THERMODYNAMICS
             wFld(i,j)   = LS_wVel(i,j,k,bi,bj)
./pkg/longstep/longstep_thermodynamics.F 348 LONGSTEP_THERMODYNAMICS
             rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskUp(i,j)
./pkg/longstep/longstep_thermodynamics.F 362 LONGSTEP_THERMODYNAMICS
     U                  wFld, rTrans,
./pkg/longstep/longstep_thermodynamics.F 425 LONGSTEP_THERMODYNAMICS
     I          xA, yA, maskUp, uFld, vFld, wFld,
./pkg/mom_common/mom_u_coriolis_nh.F 11 MOM_U_CORIOLIS_NH
     I               bi,bj,k,wFld,
./pkg/mom_common/mom_u_coriolis_nh.F 35 MOM_U_CORIOLIS_NH
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_common/mom_u_coriolis_nh.F 58 MOM_U_CORIOLIS_NH
     &         *0.5*( wFld( i ,j, k ,bi,bj)*rVel2wUnit( k )
./pkg/mom_common/mom_u_coriolis_nh.F 59 MOM_U_CORIOLIS_NH
     &               +wFld( i ,j,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk )
./pkg/mom_common/mom_u_coriolis_nh.F 61 MOM_U_CORIOLIS_NH
     &         *0.5*( wFld(i-1,j, k ,bi,bj)*rVel2wUnit( k )
./pkg/mom_common/mom_u_coriolis_nh.F 62 MOM_U_CORIOLIS_NH
     &               +wFld(i-1,j,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk )
./pkg/mom_common/mom_u_metric_nh.F 12 MOM_U_METRIC_NH
     I               uFld, wFld,
./pkg/mom_common/mom_u_metric_nh.F 37 MOM_U_METRIC_NH
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_common/mom_u_metric_nh.F 57 MOM_U_METRIC_NH
     &    *0.25*( (wFld(i-1,j,kp1,bi,bj)+wFld(i,j,kp1,bi,bj))
./pkg/mom_common/mom_u_metric_nh.F 59 MOM_U_METRIC_NH
     &          + (wFld(i-1,j, k ,bi,bj)+wFld(i,j, k ,bi,bj))
./pkg/mom_common/mom_v_coriolis_nh.F 11 MOM_V_CORIOLIS_NH
     I               bi,bj,k,wFld,
./pkg/mom_common/mom_v_coriolis_nh.F 35 MOM_V_CORIOLIS_NH
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_common/mom_v_coriolis_nh.F 58 MOM_V_CORIOLIS_NH
     &         *0.5*( wFld( i ,j, k ,bi,bj)*rVel2wUnit( k )
./pkg/mom_common/mom_v_coriolis_nh.F 59 MOM_V_CORIOLIS_NH
     &               +wFld( i ,j,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk )
./pkg/mom_common/mom_v_coriolis_nh.F 61 MOM_V_CORIOLIS_NH
     &         *0.5*( wFld(i,j-1, k ,bi,bj)*rVel2wUnit( k )
./pkg/mom_common/mom_v_coriolis_nh.F 62 MOM_V_CORIOLIS_NH
     &               +wFld(i,j-1,kp1,bi,bj)*rVel2wUnit(kp1)*wMsk )
./pkg/mom_common/mom_v_metric_nh.F 12 MOM_V_METRIC_NH
     I               vFld,wFld,
./pkg/mom_common/mom_v_metric_nh.F 37 MOM_V_METRIC_NH
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_common/mom_v_metric_nh.F 57 MOM_V_METRIC_NH
     &    *0.25*( (wFld(i,j-1,kp1,bi,bj)+wFld(i,j,kp1,bi,bj))
./pkg/mom_common/mom_v_metric_nh.F 59 MOM_V_METRIC_NH
     &          + (wFld(i,j-1, k ,bi,bj)+wFld(i,j, k ,bi,bj))
./pkg/mom_common/mom_w_sidedrag.F 103 MOM_W_SIDEDRAG
     &         *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj)
./pkg/mom_common/mom_w_sidedrag.F 117 MOM_W_SIDEDRAG
     &         *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj)
./pkg/mom_common/mom_w_sidedrag.F 12 MOM_W_SIDEDRAG
     I        wFld, del2w, 
./pkg/mom_common/mom_w_sidedrag.F 43 MOM_W_SIDEDRAG
      _RL  wFld    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_common/mom_w_sidedrag.F 83 MOM_W_SIDEDRAG
     &         *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj)
./pkg/mom_common/mom_w_sidedrag.F 93 MOM_W_SIDEDRAG
     &         *( viscAh_W(i,j,k,bi,bj)*wFld(i,j,k,bi,bj)
./pkg/mom_fluxform/mom_u_adv_wu.F 101 MOM_U_ADV_WU
     &         +wFld(i-1,j,k,bi,bj)*rA(i-1,j,bi,bj)*
./pkg/mom_fluxform/mom_u_adv_wu.F 12 MOM_U_ADV_WU
     I        uFld,wFld,rTrans,
./pkg/mom_fluxform/mom_u_adv_wu.F 38 MOM_U_ADV_WU
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_fluxform/mom_u_adv_wu.F 99 MOM_U_ADV_WU
     &          wFld(i, j ,k,bi,bj)*rA(i, j ,bi,bj)*
./model/src/calc_gs.F 12 CALC_GS
     I           xA, yA, maskUp, uFld, vFld, wFld,
./model/src/calc_gs.F 164 CALC_GS
     I           xA, yA, maskUp, uFld, vFld, wFld,
./model/src/calc_gs.F 176 CALC_GS
     I           xA, yA, maskUp, uFld, vFld, wFld,
./model/src/calc_gs.F 93 CALC_GS
      _RL wFld   (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_v_adv_wv.F 100 MOM_V_ADV_WV
     &          wFld(i, j ,k,bi,bj)*rA(i, j ,bi,bj)*
./pkg/mom_fluxform/mom_v_adv_wv.F 102 MOM_V_ADV_WV
     &         +wFld(i,j-1,k,bi,bj)*rA(i,j-1,bi,bj)*
./pkg/mom_fluxform/mom_v_adv_wv.F 13 MOM_V_ADV_WV
     I        vFld,wFld,rTrans,
./pkg/mom_fluxform/mom_v_adv_wv.F 39 MOM_V_ADV_WV
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./model/src/calc_gt.F 12 CALC_GT
     I           xA, yA, maskUp, uFld, vFld, wFld,
./model/src/calc_gt.F 163 CALC_GT
     I           xA, yA, maskUp, uFld, vFld, wFld,
./model/src/calc_gt.F 175 CALC_GT
     I           xA, yA, maskUp, uFld, vFld, wFld,
./model/src/calc_gt.F 92 CALC_GT
      _RL wFld   (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 26 MOM_VI_U_VERTSHEAR
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 69 MOM_VI_U_VERTSHEAR
     &    wFld(I,J,K,bi,bj)*rA(i,j,bi,bj)*maskC(I,J,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 70 MOM_VI_U_VERTSHEAR
     &   +wFld(I-1,J,K,bi,bj)*rA(i-1,j,bi,bj)*maskC(I-1,J,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 76 MOM_VI_U_VERTSHEAR
     &    wFld(I,J,Kp1,bi,bj)*rA(i,j,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 77 MOM_VI_U_VERTSHEAR
     &   +wFld(I-1,J,Kp1,bi,bj)*rA(i-1,j,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 83 MOM_VI_U_VERTSHEAR
     &    wFld(I,J,K,bi,bj)*maskC(I,J,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 84 MOM_VI_U_VERTSHEAR
     &   +wFld(I-1,J,K,bi,bj)*maskC(I-1,J,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 89 MOM_VI_U_VERTSHEAR
     &    wFld(I,J,Kp1,bi,bj)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 8 MOM_VI_U_VERTSHEAR
     I        uFld,wFld,
./pkg/mom_vecinv/mom_vi_u_vertshear.F 90 MOM_VI_U_VERTSHEAR
     &   +wFld(I-1,J,Kp1,bi,bj)
./model/src/calc_gw.F 269 CALC_GW
            wFld(i,j) = wVel(i,j,k,bi,bj)
./model/src/calc_gw.F 281 CALC_GW
     &                                 wFld, bi,bj, myThid )
./model/src/calc_gw.F 287 CALC_GW
     &               ( wFld(i,j) - wFld(i-1,j) )
./model/src/calc_gw.F 299 CALC_GW
     &                                 wFld, bi,bj, myThid )
./model/src/calc_gw.F 307 CALC_GW
     &               ( wFld(i,j) - wFld(i,j-1) )
./model/src/calc_gw.F 456 CALC_GW
             flx_EW(i,j) = uTrans*(wFld(i,j)+wFld(i-1,j))*halfRL
./model/src/calc_gw.F 471 CALC_GW
             flx_NS(i,j) = vTrans*(wFld(i,j)+wFld(i,j-1))*halfRL
./model/src/calc_gw.F 91 CALC_GW
      _RL    wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 26 MOM_VI_V_VERTSHEAR
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 69 MOM_VI_V_VERTSHEAR
     &    wFld(I,J,K,bi,bj)*rA(i,j,bi,bj)*maskC(i,j,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 70 MOM_VI_V_VERTSHEAR
     &   +wFld(I,J-1,K,bi,bj)*rA(i,j-1,bi,bj)*maskC(i,j-1,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 76 MOM_VI_V_VERTSHEAR
     &    wFld(I,J,Kp1,bi,bj)*rA(i,j,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 77 MOM_VI_V_VERTSHEAR
     &   +wFld(I,J-1,Kp1,bi,bj)*rA(i,j-1,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 83 MOM_VI_V_VERTSHEAR
     &    wFld(I,J,K,bi,bj)*maskC(i,j,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 84 MOM_VI_V_VERTSHEAR
     &   +wFld(I,J-1,K,bi,bj)*maskC(i,j-1,Km1,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 89 MOM_VI_V_VERTSHEAR
     &    wFld(I,J,Kp1,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 8 MOM_VI_V_VERTSHEAR
     I        vFld,wFld,
./pkg/mom_vecinv/mom_vi_v_vertshear.F 90 MOM_VI_V_VERTSHEAR
     &   +wFld(I,J-1,Kp1,bi,bj)
./pkg/obcs/obcs_apply_w.F 22 OBCS_APPLY_W
      _RL wFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/obcs/obcs_apply_w.F 43 OBCS_APPLY_W
        wFld(I,J_obc,K,bi,bj)=OBNw(I,K,bi,bj) * obc_mask
./pkg/obcs/obcs_apply_w.F 53 OBCS_APPLY_W
        wFld(I,J_obc,K,bi,bj)=OBSw(I,K,bi,bj) * obc_mask
./pkg/obcs/obcs_apply_w.F 65 OBCS_APPLY_W
        wFld(I_obc,J,K,bi,bj)=OBEw(J,K,bi,bj) * obc_mask
./pkg/obcs/obcs_apply_w.F 75 OBCS_APPLY_W
        wFld(I_obc,J,K,bi,bj)=OBWw(J,K,bi,bj) * obc_mask
./pkg/obcs/obcs_apply_w.F 7 OBCS_APPLY_W
     U                         wFld,
./pkg/obcs/obcs_apply_w.F 87 OBCS_APPLY_W
        IF (J_obc.NE.0) wFld(I,J_obc,K,bi,bj) = 0. _d 0
./pkg/obcs/obcs_apply_w.F 90 OBCS_APPLY_W
        IF (J_obc.NE.0) wFld(I,J_obc,K,bi,bj) = 0. _d 0
./pkg/obcs/obcs_apply_w.F 95 OBCS_APPLY_W
        IF (I_obc.NE.0) wFld(I_obc,J,K,bi,bj) = 0. _d 0
./pkg/obcs/obcs_apply_w.F 98 OBCS_APPLY_W
        IF (I_obc.NE.0) wFld(I_obc,J,K,bi,bj) = 0. _d 0
./pkg/ptracers/ptracers_integrate.F 12 PTRACERS_INTEGRATE
     I                    xA, yA, maskUp, uFld, vFld, wFld,
./pkg/ptracers/ptracers_integrate.F 139 PTRACERS_INTEGRATE
     I                   xA, yA, maskUp, uFld, vFld, wFld,
./pkg/ptracers/ptracers_integrate.F 63 PTRACERS_INTEGRATE
      _RL wFld    (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/diags_rho.F 18 DIAGS_RHO_L
     I                        rhoK, rhoKm1, wFld,
./model/src/diags_rho.F 50 DIAGS_RHO_L
      _RL wFld  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./model/src/diags_rho.F 68 DIAGS_RHO_L
           tmpFld(i,j) = wFld(i,j,k,bi,bj)*rhoK(i,j)
./model/src/diags_rho.F 74 DIAGS_RHO_L
           tmpFld(i,j) = wFld(i,j,k,bi,bj)
./verification/OpenAD/code_oad_all/gad_implicit_r.F 186 GAD_IMPLICIT_R
            wFld(i,j)   = 0. _d 0
./verification/OpenAD/code_oad_all/gad_implicit_r.F 193 GAD_IMPLICIT_R
            wFld(i,j)   = wVel(i,j,k,bi,bj)
./verification/OpenAD/code_oad_all/gad_implicit_r.F 194 GAD_IMPLICIT_R
            rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)v*maskC(i,j,k-1,bi,bj)
./verification/OpenAD/code_oad_all/gad_implicit_r.F 201 GAD_IMPLICIT_R
     U                 wFld, rTrans,
./verification/OpenAD/code_oad_all/gad_implicit_r.F 72 GAD_IMPLICIT_R
      _RL wFld     (1-Olx:sNx+Olx,1-Oly:sNy+Oly)
./model/src/integrate_for_w.F 107 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 108 INTEGRATE_FOR_W
     &        ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1)
./model/src/integrate_for_w.F 11 INTEGRATE_FOR_W
     O                     wFld,
./model/src/integrate_for_w.F 123 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 133 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 134 INTEGRATE_FOR_W
     &        ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1)
./model/src/integrate_for_w.F 149 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 158 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 159 INTEGRATE_FOR_W
     &        ( wFld(i,j,k+1,bi,bj)
./model/src/integrate_for_w.F 174 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 183 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/integrate_for_w.F 184 INTEGRATE_FOR_W
     &        ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1)
./model/src/integrate_for_w.F 43 INTEGRATE_FOR_W
      _RL  wFld (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./model/src/integrate_for_w.F 92 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) = 0.
./model/src/integrate_for_w.F 98 INTEGRATE_FOR_W
             wFld(i,j,k,bi,bj) =
./model/src/thermodynamics.F 162 THERMODYNAMICS
      _RL wFld    (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/thermodynamics.F 507 THERMODYNAMICS
             wFld(i,j)   = 0. _d 0
./model/src/thermodynamics.F 517 THERMODYNAMICS
             wFld(i,j)   = wVel(i,j,k,bi,bj)
./model/src/thermodynamics.F 519 THERMODYNAMICS
             rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskUp(i,j)
./model/src/thermodynamics.F 533 THERMODYNAMICS
     U                  wFld, rTrans,
./model/src/thermodynamics.F 626 THERMODYNAMICS
     I         xA, yA, maskUp, uFld, vFld, wFld,
./model/src/thermodynamics.F 676 THERMODYNAMICS
     I         xA, yA, maskUp, uFld, vFld, wFld,
./model/src/thermodynamics.F 715 THERMODYNAMICS
     I          xA, yA, maskUp, uFld, vFld, wFld,