Symbol Description Uses
mskP1 6



File Line number Procedure Code
./model/src/calc_gw.F 159 CALC_GW
        mskP1 = 1.
./model/src/calc_gw.F 161 CALC_GW
        IF ( k.EQ.Nr ) mskP1 = 0.
./model/src/calc_gw.F 381 CALC_GW
     &          - viscLoc*( wVel(i,j,kp1,bi,bj)*mskP1
./model/src/calc_gw.F 484 CALC_GW
     &               +wVel(i,j,kp1,bi,bj)*rVel2wUnit(kp1)*mskP1 )
./model/src/calc_gw.F 489 CALC_GW
     &                                   *mskP1
./model/src/calc_gw.F 93 CALC_GW
      _RL  mskM1, mskP1