| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
64 |
GAD_DST2U1_IMPL_R |
_RL rCenter, rUpwind |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
82 |
GAD_DST2U1_IMPL_R |
rUpwind = ABS(rCenter) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
86 |
GAD_DST2U1_IMPL_R |
& - (rCenter+rUpwind)*deltaTarg(k) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
89 |
GAD_DST2U1_IMPL_R |
& - (rCenter-rUpwind)*deltaTarg(k) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
92 |
GAD_DST2U1_IMPL_R |
& + (rCenter+rUpwind)*deltaTarg(k-1) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
95 |
GAD_DST2U1_IMPL_R |
& + (rCenter-rUpwind)*deltaTarg(k-1) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
147 |
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 |
156 |
GAD_DST3FL_IMPL_R |
& - ( (rCenter+rUpwind) + rC4km ) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
160 |
GAD_DST3FL_IMPL_R |
& - ( (rCenter-rUpwind) + rC4kp ) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
172 |
GAD_DST3FL_IMPL_R |
& + ( (rCenter+rUpwind) + rC4km ) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
176 |
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 |
112 |
GAD_FLUXLIMIT_IMPL_R |
rUpwind = ABS(rCenter)*upwindFac(i,j) |
|
./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) |
|
./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 |
123 |
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 |
132 |
GAD_U3C4_IMPL_R |
rUpwind = rUpwind2D(i,j) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
138 |
GAD_U3C4_IMPL_R |
rUpwind= 0. _d 0 |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
146 |
GAD_U3C4_IMPL_R |
rUpwind= (2. _d 0*rHigh )*ABS(rCenter) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
150 |
GAD_U3C4_IMPL_R |
rUpwind= 2. _d 0*oneSixth*ABS(rCenter) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
160 |
GAD_U3C4_IMPL_R |
& - ( (rCenter+rUpwind) + rC4km ) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
164 |
GAD_U3C4_IMPL_R |
& - ( (rCenter-rUpwind) + rC4kp ) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
176 |
GAD_U3C4_IMPL_R |
& + ( (rCenter+rUpwind) + rC4km ) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
180 |
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 |
144 |
MOM_U_IMPLICIT_R |
rUpwind = ABS(rCenter)*upwindFac |
|
./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 |
152 |
MOM_U_IMPLICIT_R |
& - (rCenter-rUpwind) |
|
./pkg/mom_common/mom_u_implicit_r.F |
155 |
MOM_U_IMPLICIT_R |
& + (rCenter-rUpwind) |
|
./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 |
144 |
MOM_V_IMPLICIT_R |
rUpwind = ABS(rCenter)*upwindFac |
|
./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 |
152 |
MOM_V_IMPLICIT_R |
& - (rCenter-rUpwind) |
|
./pkg/mom_common/mom_v_implicit_r.F |
155 |
MOM_V_IMPLICIT_R |
& + (rCenter-rUpwind) |
|
./pkg/mom_common/mom_v_implicit_r.F |
48 |
MOM_V_IMPLICIT_R |
_RL rCenter, rUpwind, upwindFac |