File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_calc_eigs.F |
10 |
GMREDI_CALC_EIGS |
I bi, bj, N2, myThid, kLow, |
./pkg/gmredi/gmredi_calc_eigs.F |
125 |
GMREDI_CALC_EIGS |
IF (kLow(i,j) .GT. 0) THEN |
./pkg/gmredi/gmredi_calc_eigs.F |
132 |
GMREDI_CALC_EIGS |
ELSEIF (k.LT.kLow(i,j)) THEN |
./pkg/gmredi/gmredi_calc_eigs.F |
139 |
GMREDI_CALC_EIGS |
ELSEIF (k.EQ.kLow(i,j)) THEN |
./pkg/gmredi/gmredi_calc_eigs.F |
162 |
GMREDI_CALC_EIGS |
IF (kLow(i,j).GT.0) THEN |
./pkg/gmredi/gmredi_calc_eigs.F |
203 |
GMREDI_CALC_EIGS |
DO k=1,kLow(i,j) |
./pkg/gmredi/gmredi_calc_eigs.F |
207 |
GMREDI_CALC_EIGS |
DO k=1,kLow(i,j) |
./pkg/gmredi/gmredi_calc_eigs.F |
238 |
GMREDI_CALC_EIGS |
IF (kLow(i,j).GT.2 .AND. val(i,j).NE.zeroRL) THEN |
./pkg/gmredi/gmredi_calc_eigs.F |
40 |
GMREDI_CALC_EIGS |
INTEGER kLow(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
18 |
GMREDI_SLOPE_LIMIT |
I Lrho, hMixLay, depthZ, kLow, |
./pkg/gmredi/gmredi_slope_limit.F |
238 |
GMREDI_SLOPE_LIMIT |
IF ( k.GT.kLow(i,j) ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
282 |
GMREDI_SLOPE_LIMIT |
IF ( k.GE.kLow(i,j) ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
94 |
GMREDI_SLOPE_LIMIT |
INTEGER kLow (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |