Symbol Description Uses
mskM1 6


File Line number Procedure Code
./model/src/calc_gw.F 120 CALC_GW 
      _RL  mskM1, mskP1
./model/src/calc_gw.F 185 CALC_GW 
        mskM1 = 1.
./model/src/calc_gw.F 187 CALC_GW 
        IF ( k.EQ. 1 ) mskM1 = 0.
./model/src/calc_gw.F 501 CALC_GW 
     &                  *rhoFacC(km1)*mskM1
./model/src/calc_gw.F 516 CALC_GW 
     &                  *rhoFacC(km1)*mskM1
./model/src/calc_gw.F 579 CALC_GW 
     &            +addMass(i,j,km1,bi,bj)*mskM1 )