| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_xtransport.F |
117 |
GMREDI_XTRANSPORT |
km1 = MAX(k-1,1) |
|
./pkg/gmredi/gmredi_xtransport.F |
126 |
GMREDI_XTRANSPORT |
& (Tracer(i-1,j,km1,bi,bj)-Tracer(i-1,j,k,bi,bj)) |
|
./pkg/gmredi/gmredi_xtransport.F |
128 |
GMREDI_XTRANSPORT |
& (Tracer( i ,j,km1,bi,bj)-Tracer( i ,j,k,bi,bj)) |
|
./pkg/gmredi/gmredi_xtransport.F |
52 |
GMREDI_XTRANSPORT |
INTEGER km1,kp1 |
|
./pkg/gmredi/gmredi_ytransport.F |
117 |
GMREDI_YTRANSPORT |
km1 = MAX(k-1,1) |
|
./pkg/gmredi/gmredi_ytransport.F |
127 |
GMREDI_YTRANSPORT |
& (Tracer(i,j-1,km1,bi,bj)-Tracer(i,j-1,k,bi,bj)) |
|
./pkg/gmredi/gmredi_ytransport.F |
129 |
GMREDI_YTRANSPORT |
& (Tracer(i, j ,km1,bi,bj)-Tracer(i, j ,k,bi,bj)) |
|
./pkg/gmredi/gmredi_ytransport.F |
52 |
GMREDI_YTRANSPORT |
INTEGER km1,kp1 |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
102 |
GMREDI_CALC_PSI_B |
SlopeY(i,j)=op5*( sigmaY(i,j,km1)+sigmaY(i,j,k) ) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
47 |
GMREDI_CALC_PSI_B |
INTEGER i,j,k, km1 |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
77 |
GMREDI_CALC_PSI_B |
km1 = k-1 |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
94 |
GMREDI_CALC_PSI_B |
SlopeX(i,j)=op5*( sigmaX(i,j,km1)+sigmaX(i,j,k) ) |