| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/GMREDI.h |
119 |
NO PROCEDURE |
_RL GM_slopeSqCutoff |
|
./pkg/gmredi/GMREDI.h |
158 |
NO PROCEDURE |
& GM_Small_Number, GM_slopeSqCutoff, |
|
./pkg/gmredi/gmredi_check.F |
83 |
GMREDI_CHECK |
CALL WRITE_0D_RL( GM_slopeSqCutoff, INDEX_NONE, |
|
./pkg/gmredi/gmredi_readparms.F |
100 |
GMREDI_READPARMS |
GM_slopeSqCutoff = 1. _d +48 |
|
./pkg/gmredi/gmredi_readparms.F |
56 |
GMREDI_READPARMS |
& GM_Small_Number, GM_slopeSqCutoff, |
|
./pkg/gmredi/gmredi_slope_limit.F |
422 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
424 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
498 |
GMREDI_SLOPE_LIMIT |
IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
499 |
GMREDI_SLOPE_LIMIT |
slopeSqr(i,j) = GM_slopeSqCutoff |
|
./pkg/gmredi/gmredi_slope_limit.F |
517 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
535 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
550 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
565 |
GMREDI_SLOPE_LIMIT |
ELSEIF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_psi.F |
71 |
GMREDI_SLOPE_PSI |
slopeCutoff = SQRT( GM_slopeSqCutoff ) |