Symbol Description Uses
slopeTmpSpec 7



File Line number Procedure Code
./pkg/gmredi/gmredi_slope_psi.F 384 GMREDI_SLOPE_PSI
       slopeTmpSpec=ABS(SlopeX(i,j))
./pkg/gmredi/gmredi_slope_psi.F 385 GMREDI_SLOPE_PSI
       IF ( slopeTmpSpec .GT. slopeMaxSpec ) then
./pkg/gmredi/gmredi_slope_psi.F 386 GMREDI_SLOPE_PSI
        SlopeX(i,j)=5.*SlopeX(i,j)*slopeMaxSpec/slopeTmpSpec
./pkg/gmredi/gmredi_slope_psi.F 395 GMREDI_SLOPE_PSI
       slopeTmpSpec=ABS(SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 396 GMREDI_SLOPE_PSI
       IF ( slopeTmpSpec .GT. slopeMaxSpec ) then
./pkg/gmredi/gmredi_slope_psi.F 397 GMREDI_SLOPE_PSI
        SlopeY(i,j)=5.*SlopeY(i,j)*slopeMaxSpec/slopeTmpSpec
./pkg/gmredi/gmredi_slope_psi.F 69 GMREDI_SLOPE_PSI
      _RL slopeTmpSpec,slopeMaxSpec