File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
12 |
GAD_DST3FL_IMPL_R |
O a5d, b5d, c5d, d5d, e5d, |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
167 |
GAD_DST3FL_IMPL_R |
d5d(i,j,k) = d5d(i,j,k) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
182 |
GAD_DST3FL_IMPL_R |
d5d(i,j,k-1) = d5d(i,j,k-1) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
59 |
GAD_DST3FL_IMPL_R |
_RL d5d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
114 |
GAD_IMPLICIT_R |
d5d(i,j,k) = 0. _d 0 |
./pkg/generic_advdiff/gad_implicit_r.F |
140 |
GAD_IMPLICIT_R |
d5d(i,j,k) = -deltaTLev(k)*maskC(i,j,k+1,bi,bj) |
./pkg/generic_advdiff/gad_implicit_r.F |
152 |
GAD_IMPLICIT_R |
c5d(i,j,k) = 1. _d 0 - ( b5d(i,j,k) + d5d(i,j,k) ) |
./pkg/generic_advdiff/gad_implicit_r.F |
218 |
GAD_IMPLICIT_R |
U b5d, c5d, d5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
226 |
GAD_IMPLICIT_R |
U b5d, c5d, d5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
232 |
GAD_IMPLICIT_R |
U b5d, c5d, d5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
241 |
GAD_IMPLICIT_R |
U a5d, b5d, c5d, d5d, e5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
247 |
GAD_IMPLICIT_R |
U a5d, b5d, c5d, d5d, e5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
265 |
GAD_IMPLICIT_R |
I b5d, c5d, d5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
276 |
GAD_IMPLICIT_R |
I a5d, b5d, c5d, d5d, e5d, |
./pkg/generic_advdiff/gad_implicit_r.F |
367 |
GAD_IMPLICIT_R |
& + gTracer(i,j,kp1)*d5d(i,j,k) |
./pkg/generic_advdiff/gad_implicit_r.F |
85 |
GAD_IMPLICIT_R |
_RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
12 |
GAD_U3C4_IMPL_R |
O a5d, b5d, c5d, d5d, e5d, |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
172 |
GAD_U3C4_IMPL_R |
d5d(i,j,k) = d5d(i,j,k) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
187 |
GAD_U3C4_IMPL_R |
d5d(i,j,k-1) = d5d(i,j,k-1) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
59 |
GAD_U3C4_IMPL_R |
_RL d5d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/mom_common/mom_u_implicit_r.F |
109 |
MOM_U_IMPLICIT_R |
& d5d(i,j,k) = -deltaTMom |
./pkg/mom_common/mom_u_implicit_r.F |
121 |
MOM_U_IMPLICIT_R |
c5d(i,j,k) = 1. _d 0 - ( b5d(i,j,k) + d5d(i,j,k) ) |
./pkg/mom_common/mom_u_implicit_r.F |
181 |
MOM_U_IMPLICIT_R |
d5d(i,j,k-1) = d5d(i,j,k-1) |
./pkg/mom_common/mom_u_implicit_r.F |
202 |
MOM_U_IMPLICIT_R |
d5d(i,j,k-1) = d5d(i,j,k-1) |
./pkg/mom_common/mom_u_implicit_r.F |
242 |
MOM_U_IMPLICIT_R |
I b5d, c5d, d5d, |
./pkg/mom_common/mom_u_implicit_r.F |
273 |
MOM_U_IMPLICIT_R |
I b5d, c5d, d5d, |
./pkg/mom_common/mom_u_implicit_r.F |
57 |
MOM_U_IMPLICIT_R |
_RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/mom_common/mom_u_implicit_r.F |
80 |
MOM_U_IMPLICIT_R |
d5d(i,j,k) = 0. _d 0 |
./pkg/mom_common/mom_v_implicit_r.F |
109 |
MOM_V_IMPLICIT_R |
& d5d(i,j,k) = -deltaTMom |
./pkg/mom_common/mom_v_implicit_r.F |
121 |
MOM_V_IMPLICIT_R |
c5d(i,j,k) = 1. _d 0 - ( b5d(i,j,k) + d5d(i,j,k) ) |
./pkg/mom_common/mom_v_implicit_r.F |
181 |
MOM_V_IMPLICIT_R |
d5d(i,j,k-1) = d5d(i,j,k-1) |
./pkg/mom_common/mom_v_implicit_r.F |
202 |
MOM_V_IMPLICIT_R |
d5d(i,j,k-1) = d5d(i,j,k-1) |
./pkg/mom_common/mom_v_implicit_r.F |
242 |
MOM_V_IMPLICIT_R |
I b5d, c5d, d5d, |
./pkg/mom_common/mom_v_implicit_r.F |
273 |
MOM_V_IMPLICIT_R |
I b5d, c5d, d5d, |
./pkg/mom_common/mom_v_implicit_r.F |
57 |
MOM_V_IMPLICIT_R |
_RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
./pkg/mom_common/mom_v_implicit_r.F |
80 |
MOM_V_IMPLICIT_R |
d5d(i,j,k) = 0. _d 0 |
./model/src/solve_pentadiagonal.F |
112 |
SOLVE_PENTADIAGONAL |
c5d(i,j,k) = c5d(i,j,k) - b5d(i,j,k)*d5d(i,j,k-1) |
./model/src/solve_pentadiagonal.F |
113 |
SOLVE_PENTADIAGONAL |
d5d(i,j,k) = d5d(i,j,k) - b5d(i,j,k)*e5d(i,j,k-1) |
./model/src/solve_pentadiagonal.F |
11 |
SOLVE_PENTADIAGONAL |
U a5d, b5d, c5d, d5d, e5d, |
./model/src/solve_pentadiagonal.F |
129 |
SOLVE_PENTADIAGONAL |
b5d(i,j,k) = b5d(i,j,k) - a5d(i,j,k)*d5d(i,j,k-2) |
./model/src/solve_pentadiagonal.F |
133 |
SOLVE_PENTADIAGONAL |
c5d(i,j,k) = c5d(i,j,k) - b5d(i,j,k)*d5d(i,j,k-1) |
./model/src/solve_pentadiagonal.F |
134 |
SOLVE_PENTADIAGONAL |
d5d(i,j,k) = d5d(i,j,k) - b5d(i,j,k)*e5d(i,j,k-1) |
./model/src/solve_pentadiagonal.F |
181 |
SOLVE_PENTADIAGONAL |
& - d5d(i,j,k)*y5d(i,j,k+1) |
./model/src/solve_pentadiagonal.F |
189 |
SOLVE_PENTADIAGONAL |
& - d5d(i,j,k)*y5d(i,j,k+1) |
./model/src/solve_pentadiagonal.F |
230 |
SOLVE_PENTADIAGONAL |
d5d_prime(k) = d5d(i,j,k) |
./model/src/solve_pentadiagonal.F |
237 |
SOLVE_PENTADIAGONAL |
d5d_prime(k) = d5d(i,j,k) |
./model/src/solve_pentadiagonal.F |
247 |
SOLVE_PENTADIAGONAL |
d5d_prime(k) = d5d(i,j,k) |
./model/src/solve_pentadiagonal.F |
322 |
SOLVE_PENTADIAGONAL |
d5d_prime(i,j,k) = d5d(i,j,k) |
./model/src/solve_pentadiagonal.F |
329 |
SOLVE_PENTADIAGONAL |
d5d_prime(i,j,k) = d5d(i,j,k) |
./model/src/solve_pentadiagonal.F |
340 |
SOLVE_PENTADIAGONAL |
d5d_prime(i,j,k) = d5d(i,j,k) |
./model/src/solve_pentadiagonal.F |
61 |
SOLVE_PENTADIAGONAL |
_RL d5d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |