File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
102 |
GAD_DST2U1_IMPL_R |
& + (rCenter-rUpwind)*deltaTarg(k-1) |
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
67 |
GAD_DST2U1_IMPL_R |
_RL rCenter, rUpwind |
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
86 |
GAD_DST2U1_IMPL_R |
rUpwind = ABS(rCenter) |
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
90 |
GAD_DST2U1_IMPL_R |
& - (rCenter+rUpwind)*deltaTarg(k) |
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
94 |
GAD_DST2U1_IMPL_R |
& - (rCenter-rUpwind)*deltaTarg(k) |
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
98 |
GAD_DST2U1_IMPL_R |
& + (rCenter+rUpwind)*deltaTarg(k-1) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
148 |
GAD_DST3FL_IMPL_R |
rUpwind= (0.5 _d 0 -lowFac(i,j))*ABS(rCenter)*2. _d 0 |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
158 |
GAD_DST3FL_IMPL_R |
& - ( (rCenter+rUpwind) + rC4km ) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
163 |
GAD_DST3FL_IMPL_R |
& - ( (rCenter-rUpwind) + rC4kp ) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
178 |
GAD_DST3FL_IMPL_R |
& + ( (rCenter+rUpwind) + rC4km ) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
183 |
GAD_DST3FL_IMPL_R |
& + ( (rCenter-rUpwind) + rC4kp ) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
74 |
GAD_DST3FL_IMPL_R |
_RL wCFL, rCenter, rUpwind |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
113 |
GAD_FLUXLIMIT_IMPL_R |
rUpwind = ABS(rCenter)*upwindFac(i,j) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
115 |
GAD_FLUXLIMIT_IMPL_R |
& - (rCenter+rUpwind)*deltaTarg(k) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
119 |
GAD_FLUXLIMIT_IMPL_R |
& - (rCenter-rUpwind)*deltaTarg(k) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
123 |
GAD_FLUXLIMIT_IMPL_R |
& + (rCenter+rUpwind)*deltaTarg(k-1) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
127 |
GAD_FLUXLIMIT_IMPL_R |
& + (rCenter-rUpwind)*deltaTarg(k-1) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
70 |
GAD_FLUXLIMIT_IMPL_R |
_RL rCenter, rUpwind |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
133 |
GAD_U3C4_IMPL_R |
rUpwind = rUpwind2D(i,j) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
139 |
GAD_U3C4_IMPL_R |
rUpwind= 0. _d 0 |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
148 |
GAD_U3C4_IMPL_R |
rUpwind= (2. _d 0*rHigh )*ABS(rCenter) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
152 |
GAD_U3C4_IMPL_R |
rUpwind= 2. _d 0*oneSixth*ABS(rCenter) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
163 |
GAD_U3C4_IMPL_R |
& - ( (rCenter+rUpwind) + rC4km ) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
168 |
GAD_U3C4_IMPL_R |
& - ( (rCenter-rUpwind) + rC4kp ) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
183 |
GAD_U3C4_IMPL_R |
& + ( (rCenter+rUpwind) + rC4km ) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
188 |
GAD_U3C4_IMPL_R |
& + ( (rCenter-rUpwind) + rC4kp ) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
79 |
GAD_U3C4_IMPL_R |
_RL wCFL, rCenter, rUpwind |
./pkg/mom_common/mom_u_implicit_r.F |
168 |
MOM_U_IMPLICIT_R |
rUpwind = ABS(rCenter)*upwindFac |
./pkg/mom_common/mom_u_implicit_r.F |
170 |
MOM_U_IMPLICIT_R |
& - (rCenter+rUpwind) |
./pkg/mom_common/mom_u_implicit_r.F |
174 |
MOM_U_IMPLICIT_R |
& + (rCenter+rUpwind) |
./pkg/mom_common/mom_u_implicit_r.F |
178 |
MOM_U_IMPLICIT_R |
& - (rCenter-rUpwind) |
./pkg/mom_common/mom_u_implicit_r.F |
182 |
MOM_U_IMPLICIT_R |
& + (rCenter-rUpwind) |
./pkg/mom_common/mom_u_implicit_r.F |
60 |
MOM_U_IMPLICIT_R |
_RL rCenter, rUpwind, upwindFac |
./pkg/mom_common/mom_v_implicit_r.F |
168 |
MOM_V_IMPLICIT_R |
rUpwind = ABS(rCenter)*upwindFac |
./pkg/mom_common/mom_v_implicit_r.F |
170 |
MOM_V_IMPLICIT_R |
& - (rCenter+rUpwind) |
./pkg/mom_common/mom_v_implicit_r.F |
174 |
MOM_V_IMPLICIT_R |
& + (rCenter+rUpwind) |
./pkg/mom_common/mom_v_implicit_r.F |
178 |
MOM_V_IMPLICIT_R |
& - (rCenter-rUpwind) |
./pkg/mom_common/mom_v_implicit_r.F |
182 |
MOM_V_IMPLICIT_R |
& + (rCenter-rUpwind) |
./pkg/mom_common/mom_v_implicit_r.F |
60 |
MOM_V_IMPLICIT_R |
_RL rCenter, rUpwind, upwindFac |