Symbol Description Uses
maskM1 4


File Line number Procedure Code
./model/src/cg3d.F 150 CG3D 
         maskM1 = 1. _d 0
./model/src/cg3d.F 152 CG3D 
         IF ( K .EQ. 1 ) maskM1 = 0. _d 0
./model/src/cg3d.F 162 CG3D 
     &     +aV3d(I  ,J  ,K  ,bi,bj)*cg3d_x(I  ,J  ,Km1,bi,bj)*maskM1
./model/src/cg3d.F 90 CG3D 
      _RL    maskM1, maskP1