Symbol Description Uses
recip_rThickC reciprol thickness of W-Cell (centered on W-point) 18



File Line number Procedure Code
./model/src/calc_gw.F 108 CALC_GW
      _RL    recip_rThickC(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/calc_gw.F 196 CALC_GW
             recip_rThickC(i,j) = 0.
./model/src/calc_gw.F 199 CALC_GW
             recip_rThickC(i,j) = 1. _d 0 /
./model/src/calc_gw.F 245 CALC_GW
             recip_rThickC(i,j) = 0.
./model/src/calc_gw.F 247 CALC_GW
             recip_rThickC(i,j) = 1. _d 0 /
./model/src/calc_gw.F 283 CALC_GW
           recip_rThickC(i,j) = recip_drC(k)
./model/src/calc_gw.F 356 CALC_GW
     &                   )*recip_rA(i,j,bi,bj)*recip_rThickC(i,j)
./model/src/calc_gw.F 450 CALC_GW
     &         )*recip_rA(i,j,bi,bj)*recip_rThickC(i,j)
./model/src/calc_gw.F 463 CALC_GW
     I               rThickC_C, recip_rThickC,
./model/src/calc_gw.F 479 CALC_GW
     I         rThickC_W, rThickC_S, rThickC_C, recip_rThickC,
./model/src/calc_gw.F 568 CALC_GW
     &         )*recip_rA(i,j,bi,bj)*recip_rThickC(i,j)
./model/src/calc_gw.F 580 CALC_GW
     &          *recip_rA(i,j,bi,bj)*recip_rThickC(i,j)
./pkg/mom_common/mom_w_sidedrag.F 130 MOM_W_SIDEDRAG
     &    )*recip_rThickC(i,j)*recip_rA(i,j,bi,bj)
./pkg/mom_common/mom_w_sidedrag.F 13 MOM_W_SIDEDRAG
     I        rThickC, recip_rThickC,
./pkg/mom_common/mom_w_sidedrag.F 46 MOM_W_SIDEDRAG
      _RL recip_rThickC(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_common/mom_w_smag_3d.F 14 MOM_W_SMAG_3D
     I        rThickC_W, rThickC_S, rThickC_C, recip_rThickC,
./pkg/mom_common/mom_w_smag_3d.F 45 MOM_W_SMAG_3D
      _RL recip_rThickC(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_common/mom_w_smag_3d.F 91 MOM_W_SMAG_3D
     &                + recip_rThickC(i,j)