Symbol Description Uses
wFacKp 7



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