File |
Line number |
Procedure |
Code |
./pkg/gmredi/GMREDI.h |
48 |
NO PROCEDURE |
_RL GM_slopeSqCutoff |
./pkg/gmredi/GMREDI.h |
65 |
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 |
54 |
GMREDI_READPARMS |
& GM_Small_Number, GM_slopeSqCutoff, |
./pkg/gmredi/gmredi_readparms.F |
79 |
GMREDI_READPARMS |
GM_slopeSqCutoff = 1. _d +48 |
./pkg/gmredi/gmredi_slope_limit.F |
489 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
491 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
565 |
GMREDI_SLOPE_LIMIT |
IF ( SlopeSqr(i,j) .GT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
566 |
GMREDI_SLOPE_LIMIT |
slopeSqr(i,j) = GM_slopeSqCutoff |
./pkg/gmredi/gmredi_slope_limit.F |
584 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
602 |
GMREDI_SLOPE_LIMIT |
& SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
617 |
GMREDI_SLOPE_LIMIT |
ELSE IF ( SlopeSqr(i,j) .LT. GM_slopeSqCutoff ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
632 |
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 ) |