Symbol Description Uses
slopeCutoff 12



File Line number Procedure Code
./pkg/gmredi/gmredi_slope_psi.F 216 GMREDI_SLOPE_PSI
          IF ( ABS(SlopeX(i,j)) .GE. slopeCutoff ) THEN
./pkg/gmredi/gmredi_slope_psi.F 217 GMREDI_SLOPE_PSI
             SlopeX(i,j) = SIGN(slopeCutoff,SlopeX(i,j))
./pkg/gmredi/gmredi_slope_psi.F 250 GMREDI_SLOPE_PSI
          IF ( ABS(SlopeY(i,j)) .GE. slopeCutoff ) THEN
./pkg/gmredi/gmredi_slope_psi.F 251 GMREDI_SLOPE_PSI
             SlopeY(i,j) = SIGN(slopeCutoff,SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 272 GMREDI_SLOPE_PSI
     &           Smod .LT. slopeCutoff )
./pkg/gmredi/gmredi_slope_psi.F 280 GMREDI_SLOPE_PSI
     &           Smod .LT. slopeCutoff )
./pkg/gmredi/gmredi_slope_psi.F 292 GMREDI_SLOPE_PSI
     &           ABS(SlopeX(i,j)) .LT. slopeCutoff )
./pkg/gmredi/gmredi_slope_psi.F 300 GMREDI_SLOPE_PSI
     &           ABS(SlopeY(i,j)) .LT. slopeCutoff )
./pkg/gmredi/gmredi_slope_psi.F 329 GMREDI_SLOPE_PSI
          IF ( Smod .LT. slopeCutoff ) THEN
./pkg/gmredi/gmredi_slope_psi.F 349 GMREDI_SLOPE_PSI
          IF ( Smod .LT. slopeCutoff ) THEN
./pkg/gmredi/gmredi_slope_psi.F 64 GMREDI_SLOPE_PSI
      _RL slopeCutoff
./pkg/gmredi/gmredi_slope_psi.F 74 GMREDI_SLOPE_PSI
      slopeCutoff = SQRT( GM_slopeSqCutoff )