Symbol Description Uses
GM_maxSlope 19


File Line number Procedure Code
./pkg/gmredi/gmredi_slope_psi.F 255 GMREDI_SLOPE_PSI 
          IF ( Smod .GT. GM_maxSlope .AND.
./pkg/gmredi/gmredi_slope_psi.F 257 GMREDI_SLOPE_PSI 
     &           taperX(i,j)=GM_maxSlope/(Smod+GM_Small_Number)
./pkg/gmredi/gmredi_slope_psi.F 263 GMREDI_SLOPE_PSI 
          IF ( Smod .GT. GM_maxSlope .AND.
./pkg/gmredi/gmredi_slope_psi.F 265 GMREDI_SLOPE_PSI 
     &           taperY(i,j)=GM_maxSlope/(Smod+GM_Small_Number)
./pkg/gmredi/gmredi_slope_psi.F 272 GMREDI_SLOPE_PSI 
        maxSlopeSqr = GM_maxSlope*GM_maxSlope
./pkg/gmredi/gmredi_slope_psi.F 275 GMREDI_SLOPE_PSI 
          IF ( ABS(SlopeX(i,j)) .GT. GM_maxSlope .AND.
./pkg/gmredi/gmredi_slope_psi.F 283 GMREDI_SLOPE_PSI 
          IF ( ABS(SlopeY(i,j)) .GT. GM_maxSlope .AND.
./pkg/gmredi/GMREDI.h 22 NO PROCEDURE 
      _RL GM_maxSlope
./pkg/gmredi/GMREDI.h 34 NO PROCEDURE 
     &                   GM_maxSlope,
./pkg/gmredi/gmredi_slope_limit.F 178 GMREDI_SLOPE_LIMIT 
        maxSlopeSqr = GM_maxSlope*GM_maxSlope
./pkg/gmredi/gmredi_slope_limit.F 289 GMREDI_SLOPE_LIMIT 
        maxSlopeSqr = GM_maxSlope*GM_maxSlope
./pkg/gmredi/gmredi_slope_limit.F 306 GMREDI_SLOPE_LIMIT 
        maxSlopeSqr = GM_maxSlope*GM_maxSlope
./pkg/gmredi/gmredi_readparms.F 105 GMREDI_READPARMS 
      if (GM_maxSlope.ne.0.) GM_rMaxSlope=1. / GM_maxSlope
./pkg/gmredi/gmredi_readparms.F 35 GMREDI_READPARMS 
     &          GM_maxSlope,