Symbol Description Uses
wFacKp 7



File Line number Procedure Code
./model/src/pre_cg3d.F 184 PRE_CG3D
         wFacKp = implicDiv2DFlow*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/pre_cg3d.F 185 PRE_CG3D
         IF (k.GE.Nr) wFacKp = 0.
./model/src/pre_cg3d.F 194 PRE_CG3D
     &         -wVel(i,j,kp1,bi,bj)*wFacKp
./model/src/pre_cg3d.F 203 PRE_CG3D
          wFacKp = implicDiv2DFlow*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/pre_cg3d.F 204 PRE_CG3D
          IF (k.GE.Nr) wFacKp = 0.
./model/src/pre_cg3d.F 213 PRE_CG3D
     &         -wVel(i,j,kp1,bi,bj)*wFacKp
./model/src/pre_cg3d.F 61 PRE_CG3D
      _RL     wFacKm, wFacKp