Symbol Description Uses
slopeSqTmp 4



File Line number Procedure Code
./pkg/gmredi/gmredi_slope_limit.F 106 GMREDI_SLOPE_LIMIT
      _RL slopeSqTmp,slopeTmp,slopeMax
./pkg/gmredi/gmredi_slope_limit.F 600 GMREDI_SLOPE_LIMIT
          slopeSqTmp=SlopeX(i,j)*SlopeX(i,j)
./pkg/gmredi/gmredi_slope_limit.F 603 GMREDI_SLOPE_LIMIT
          IF ( slopeSqTmp .GT. slopeMax**2 ) then
./pkg/gmredi/gmredi_slope_limit.F 604 GMREDI_SLOPE_LIMIT
           slopeTmp=sqrt(slopeSqTmp)