| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_slope_limit.F |
120 |
GMREDI_SLOPE_LIMIT |
_RL GM_bigSlope |
|
./pkg/gmredi/gmredi_slope_limit.F |
121 |
GMREDI_SLOPE_LIMIT |
GM_bigSlope = 1. _d +02 |
|
./pkg/gmredi/gmredi_slope_limit.F |
177 |
GMREDI_SLOPE_LIMIT |
SlopeX(i,j) = SIGN( GM_bigSlope, dSigmaDx(i,j) ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
182 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j) = SIGN( GM_bigSlope, dSigmaDy(i,j) ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
431 |
GMREDI_SLOPE_LIMIT |
SlopeSqr(i,j) = MIN( baseSlope(i,j), GM_bigSlope ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
443 |
GMREDI_SLOPE_LIMIT |
SlopeSqr(i,j) = MIN( SlopeMod(i,j), GM_bigSlope ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
536 |
GMREDI_SLOPE_LIMIT |
SlopeX(i,j) = SIGN( GM_bigSlope, dSigmaDx(i,j) ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
541 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j) = SIGN( GM_bigSlope, dSigmaDy(i,j) ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
586 |
GMREDI_SLOPE_LIMIT |
slopeSqr(i,j) = MIN( slopeSqr(i,j),GM_bigSlope*GM_bigSlope ) |