Symbol Description Uses
GM_rMaxSlope 7



File Line number Procedure Code
./pkg/gmredi/gmredi_slope_psi.F 108 GMREDI_SLOPE_PSI
     &     ABS(SlopeX(i,j))*GM_rMaxSlope)
./pkg/gmredi/gmredi_slope_psi.F 143 GMREDI_SLOPE_PSI
     &     ABS(SlopeY(i,j))*GM_rMaxSlope)
./pkg/gmredi/GMREDI.h 52 NO PROCEDURE
      _RL GM_rMaxSlope
./pkg/gmredi/GMREDI.h 55 NO PROCEDURE
      COMMON /GM_PARAMS2/ GM_rMaxSlope, 
./pkg/gmredi/gmredi_slope_limit.F 125 GMREDI_SLOPE_LIMIT
           tmpfld(i,j) = -gradSmod(i,j)*GM_rMaxSlope
./pkg/gmredi/gmredi_readparms.F 104 GMREDI_READPARMS
      GM_rMaxSlope=0.
./pkg/gmredi/gmredi_readparms.F 105 GMREDI_READPARMS
      if (GM_maxSlope.ne.0.) GM_rMaxSlope=1. / GM_maxSlope