| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/GMREDI.h |
125 |
NO PROCEDURE |
_RL GM_slopeSqCutoff |
|
./pkg/gmredi/GMREDI.h |
164 |
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 |
102 |
GMREDI_READPARMS |
GM_slopeSqCutoff = 1. _d +48 |
|
./pkg/gmredi/gmredi_readparms.F |
58 |
GMREDI_READPARMS |
& GM_Small_Number, GM_slopeSqCutoff, |
|
./pkg/gmredi/gmredi_slope_limit.F |
424 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
426 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
500 |
GMREDI_SLOPE_LIMIT |
IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
501 |
GMREDI_SLOPE_LIMIT |
slopeSqr(i,j) = GM_slopeSqCutoff |
|
./pkg/gmredi/gmredi_slope_limit.F |
519 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
537 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
552 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
567 |
GMREDI_SLOPE_LIMIT |
ELSEIF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
|
./pkg/gmredi/gmredi_slope_psi.F |
74 |
GMREDI_SLOPE_PSI |
slopeCutoff = SQRT( GM_slopeSqCutoff ) |