File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_check.F |
59 |
GMREDI_CHECK |
CALL WRITE_0D_R8( GM_slopeSqCutoff, INDEX_NONE, |
./pkg/gmredi/gmredi_slope_psi.F |
68 |
GMREDI_SLOPE_PSI |
slopeCutoff = SQRT( GM_slopeSqCutoff ) |
./pkg/gmredi/GMREDI.h |
23 |
NO PROCEDURE |
_RL GM_slopeSqCutoff |
./pkg/gmredi/GMREDI.h |
34 |
NO PROCEDURE |
& GM_Small_Number, GM_slopeSqCutoff, |
./pkg/gmredi/gmredi_readparms.F |
37 |
GMREDI_READPARMS |
& GM_Small_Number, GM_slopeSqCutoff, |
./pkg/gmredi/gmredi_readparms.F |
78 |
GMREDI_READPARMS |
GM_slopeSqCutoff = 1. _d +48 |
./pkg/gmredi/gmredi_slope_limit.F |
201 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
203 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
277 |
GMREDI_SLOPE_LIMIT |
IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
278 |
GMREDI_SLOPE_LIMIT |
slopeSqr(i,j) = GM_slopeSqCutoff |
./pkg/gmredi/gmredi_slope_limit.F |
296 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
313 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
328 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
343 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |