Symbol Description Uses
wFacKp 7



File Line number Procedure Code
./model/src/pre_cg3d.F 204 PRE_CG3D
         wFacKp = implicDiv2DFlow*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/pre_cg3d.F 205 PRE_CG3D
         IF (k.GE.Nr) wFacKp = 0.
./model/src/pre_cg3d.F 214 PRE_CG3D
     &         -wVel(i,j,kp1,bi,bj)*wFacKp
./model/src/pre_cg3d.F 223 PRE_CG3D
          wFacKp = implicDiv2DFlow*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/pre_cg3d.F 224 PRE_CG3D
          IF (k.GE.Nr) wFacKp = 0.
./model/src/pre_cg3d.F 233 PRE_CG3D
     &         -wVel(i,j,kp1,bi,bj)*wFacKp
./model/src/pre_cg3d.F 64 PRE_CG3D
      _RL     wFacKm, wFacKp