Symbol Description Uses
msk_1 4



File Line number Procedure Code
./pkg/monitor/mon_ke.F 113 MON_KE
     &        ( wVel(i,j, k, bi,bj)*wVel(i,j, k, bi,bj)*msk_1
./pkg/monitor/mon_ke.F 36 MON_KE
      _RL numPnts,theVol,tmpVal, mskp1, msk_1
./pkg/monitor/mon_ke.F 76 MON_KE
         msk_1 = 1.
./pkg/monitor/mon_ke.F 77 MON_KE
         IF ( k.EQ.1 .AND. selectNHfreeSurf.LE.0 ) msk_1 = 0.