| File |
Line number |
Procedure |
Code |
|
./model/src/calc_div_ghat.F |
104 |
CALC_DIV_GHAT |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj) + |
|
./model/src/calc_div_ghat.F |
12 |
CALC_DIV_GHAT |
U cg2d_b, |
|
./model/src/calc_div_ghat.F |
147 |
CALC_DIV_GHAT |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj) + |
|
./model/src/calc_div_ghat.F |
47 |
CALC_DIV_GHAT |
_RL cg2d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/src/solve_for_pressure.F |
114 |
SOLVE_FOR_PRESSURE |
U cg2d_b, |
|
./model/src/solve_for_pressure.F |
127 |
SOLVE_FOR_PRESSURE |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj) |
|
./model/src/solve_for_pressure.F |
143 |
SOLVE_FOR_PRESSURE |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj) |
|
./model/src/solve_for_pressure.F |
151 |
SOLVE_FOR_PRESSURE |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj) |
|
./model/src/solve_for_pressure.F |
163 |
SOLVE_FOR_PRESSURE |
cg2d_b(I,OB_Jn(I,bi,bj),bi,bj)=0. |
|
./model/src/solve_for_pressure.F |
168 |
SOLVE_FOR_PRESSURE |
cg2d_b(I,OB_Js(I,bi,bj),bi,bj)=0. |
|
./model/src/solve_for_pressure.F |
175 |
SOLVE_FOR_PRESSURE |
cg2d_b(OB_Ie(J,bi,bj),J,bi,bj)=0. |
|
./model/src/solve_for_pressure.F |
180 |
SOLVE_FOR_PRESSURE |
cg2d_b(OB_Iw(J,bi,bj),J,bi,bj)=0. |
|
./model/src/solve_for_pressure.F |
191 |
SOLVE_FOR_PRESSURE |
CALL DEBUG_STATS_RL(1,cg2d_b,'cg2d_b (SOLVE_FOR_PRESSURE)', |
|
./model/src/solve_for_pressure.F |
203 |
SOLVE_FOR_PRESSURE |
U cg2d_b, |
|
./model/src/solve_for_pressure.F |
83 |
SOLVE_FOR_PRESSURE |
cg2d_b(i,j,bi,bj) = 0. |
|
./model/src/solve_for_pressure.F |
92 |
SOLVE_FOR_PRESSURE |
cg2d_b(i,j,bi,bj) = |
|
./model/src/cg2d.F |
10 |
CG2D |
I cg2d_b, |
|
./model/src/cg2d.F |
128 |
CG2D |
cg2d_b(I,J,bi,bj) = cg2d_b(I,J,bi,bj)*cg2dNorm |
|
./model/src/cg2d.F |
129 |
CG2D |
rhsMax = MAX(ABS(cg2d_b(I,J,bi,bj)),rhsMax) |
|
./model/src/cg2d.F |
150 |
CG2D |
cg2d_b(I,J,bi,bj) = cg2d_b(I,J,bi,bj)*rhsNorm |
|
./model/src/cg2d.F |
160 |
CG2D |
_EXCH_XY_R8( cg2d_b, myThid ) |
|
./model/src/cg2d.F |
178 |
CG2D |
cg2d_r(I,J,bi,bj) = cg2d_b(I,J,bi,bj) - |
|
./model/src/cg2d.F |
193 |
CG2D |
& cg2d_b(I,J,bi,bj) |
|
./model/src/cg2d.F |
60 |
CG2D |
_RL cg2d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./model/inc/SOLVE_FOR_PRESSURE.h |
15 |
NO PROCEDURE |
COMMON / SFP_COMMON_R8 / cg2d_x, cg2d_b |
|
./model/inc/SOLVE_FOR_PRESSURE.h |
17 |
NO PROCEDURE |
_RL cg2d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |