| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_u_implicit_r.F |
136 |
MOM_U_IMPLICIT_R |
rCenter = 0.5 _d 0 *deltaTmom*rTrans(i,j) |
|
./pkg/mom_common/mom_u_implicit_r.F |
138 |
MOM_U_IMPLICIT_R |
rUpwind = ABS(rCenter)*upwindFac |
|
./pkg/mom_common/mom_u_implicit_r.F |
140 |
MOM_U_IMPLICIT_R |
& - (rCenter+rUpwind) |
|
./pkg/mom_common/mom_u_implicit_r.F |
143 |
MOM_U_IMPLICIT_R |
& + (rCenter+rUpwind) |
|
./pkg/mom_common/mom_u_implicit_r.F |
146 |
MOM_U_IMPLICIT_R |
& - (rCenter-rUpwind) |
|
./pkg/mom_common/mom_u_implicit_r.F |
149 |
MOM_U_IMPLICIT_R |
& + (rCenter-rUpwind) |
|
./pkg/mom_common/mom_u_implicit_r.F |
157 |
MOM_U_IMPLICIT_R |
rCenter = 0.5 _d 0 *deltaTmom*rTrans(i,j) |
|
./pkg/mom_common/mom_u_implicit_r.F |
160 |
MOM_U_IMPLICIT_R |
& - rCenter*recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
162 |
MOM_U_IMPLICIT_R |
& - rCenter*recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
164 |
MOM_U_IMPLICIT_R |
& + rCenter*recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
166 |
MOM_U_IMPLICIT_R |
& + rCenter*recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
48 |
MOM_U_IMPLICIT_R |
_RL rCenter, rUpwind, upwindFac |
|
./pkg/mom_common/mom_v_implicit_r.F |
136 |
MOM_V_IMPLICIT_R |
rCenter = 0.5 _d 0 *deltaTmom*rTrans(i,j) |
|
./pkg/mom_common/mom_v_implicit_r.F |
138 |
MOM_V_IMPLICIT_R |
rUpwind = ABS(rCenter)*upwindFac |
|
./pkg/mom_common/mom_v_implicit_r.F |
140 |
MOM_V_IMPLICIT_R |
& - (rCenter+rUpwind) |
|
./pkg/mom_common/mom_v_implicit_r.F |
143 |
MOM_V_IMPLICIT_R |
& + (rCenter+rUpwind) |
|
./pkg/mom_common/mom_v_implicit_r.F |
146 |
MOM_V_IMPLICIT_R |
& - (rCenter-rUpwind) |
|
./pkg/mom_common/mom_v_implicit_r.F |
149 |
MOM_V_IMPLICIT_R |
& + (rCenter-rUpwind) |
|
./pkg/mom_common/mom_v_implicit_r.F |
157 |
MOM_V_IMPLICIT_R |
rCenter = 0.5 _d 0 *deltaTmom*rTrans(i,j) |
|
./pkg/mom_common/mom_v_implicit_r.F |
160 |
MOM_V_IMPLICIT_R |
& - rCenter*recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
162 |
MOM_V_IMPLICIT_R |
& - rCenter*recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
164 |
MOM_V_IMPLICIT_R |
& + rCenter*recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_v_implicit_r.F |
166 |
MOM_V_IMPLICIT_R |
& + rCenter*recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_v_implicit_r.F |
48 |
MOM_V_IMPLICIT_R |
_RL rCenter, rUpwind, upwindFac |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
108 |
GAD_FLUXLIMIT_IMPL_R |
rCenter = 0.5 _d 0 *rTrans(i,j)*recip_rA(i,j,bi,bj)*rkSign |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
109 |
GAD_FLUXLIMIT_IMPL_R |
rUpwind = ABS(rCenter)*upwindFac(i,j) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
111 |
GAD_FLUXLIMIT_IMPL_R |
& - (rCenter+rUpwind)*deltaTarg(k) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
114 |
GAD_FLUXLIMIT_IMPL_R |
& - (rCenter-rUpwind)*deltaTarg(k) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
117 |
GAD_FLUXLIMIT_IMPL_R |
& + (rCenter+rUpwind)*deltaTarg(k-1) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
120 |
GAD_FLUXLIMIT_IMPL_R |
& + (rCenter-rUpwind)*deltaTarg(k-1) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
67 |
GAD_FLUXLIMIT_IMPL_R |
_RL rCenter, rUpwind |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
54 |
GAD_C2_IMPL_R |
_RL rCenter |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
63 |
GAD_C2_IMPL_R |
rCenter = 0.5 _d 0 *rTrans(i,j)*recip_rA(i,j,bi,bj)*rkSign |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
65 |
GAD_C2_IMPL_R |
& - rCenter*deltaTarg(k) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
68 |
GAD_C2_IMPL_R |
& - rCenter*deltaTarg(k) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
71 |
GAD_C2_IMPL_R |
& + rCenter*deltaTarg(k-1) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
74 |
GAD_C2_IMPL_R |
& + rCenter*deltaTarg(k-1) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
101 |
GAD_U3C4_IMPL_R |
rU1k = oneSixth*ABS(rCenter) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
111 |
GAD_U3C4_IMPL_R |
& - (rCenter + rC4km + rUpwind + rU3km) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
115 |
GAD_U3C4_IMPL_R |
& - (rCenter + rC4kp - rUpwind - rU3kp) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
127 |
GAD_U3C4_IMPL_R |
& + (rCenter + rC4km + rUpwind + rU3km) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
131 |
GAD_U3C4_IMPL_R |
& + (rCenter + rC4kp - rUpwind - rU3kp) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
71 |
GAD_U3C4_IMPL_R |
_RL rCenter, rUpwind |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
91 |
GAD_U3C4_IMPL_R |
rCenter= 0.5 _d 0 *rTrans(i,j)*recip_rA(i,j,bi,bj)*rkSign |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
94 |
GAD_U3C4_IMPL_R |
rC4km = oneSixth*rCenter*mskM |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
95 |
GAD_U3C4_IMPL_R |
rC4kp = oneSixth*rCenter*mskP |