File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/GAD_FLUX_LIMITER.h |
44 |
NO PROCEDURE |
Limiter(Cr)=max(0.D0,max(min(1.D0,2.D0*Cr), |
./pkg/generic_advdiff/GAD_FLUX_LIMITER.h |
45 |
NO PROCEDURE |
& min(2.D0,Cr))) |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
101 |
GAD_FLUXLIMIT_ADV_R |
Cr=Rjm*1.E20 |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
103 |
GAD_FLUXLIMIT_ADV_R |
Cr=Rjp*1.E20 |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
106 |
GAD_FLUXLIMIT_ADV_R |
Cr=Limiter(Cr) |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
110 |
GAD_FLUXLIMIT_ADV_R |
& +ABS(rTrans(i,j))*((1.-Cr)+wCFL*Cr) |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
65 |
GAD_FLUXLIMIT_ADV_R |
_RL Cr,Rjm,Rj,Rjp |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
95 |
GAD_FLUXLIMIT_ADV_R |
Cr=Rjm/Rj |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
97 |
GAD_FLUXLIMIT_ADV_R |
Cr=Rjp/Rj |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
62 |
GAD_FLUXLIMIT_ADV_X |
_RL Cr,Rjm,Rj,Rjp |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
85 |
GAD_FLUXLIMIT_ADV_X |
Cr=Rjm/Rj |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
87 |
GAD_FLUXLIMIT_ADV_X |
Cr=Rjp/Rj |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
91 |
GAD_FLUXLIMIT_ADV_X |
Cr=Rjm*1.E20 |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
93 |
GAD_FLUXLIMIT_ADV_X |
Cr=Rjp*1.E20 |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
96 |
GAD_FLUXLIMIT_ADV_X |
Cr=Limiter(Cr) |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
99 |
GAD_FLUXLIMIT_ADV_X |
& -ABS(uTrans(i,j))*((1.-Cr)+uCFL*Cr) |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
62 |
GAD_FLUXLIMIT_ADV_Y |
_RL Cr,Rjm,Rj,Rjp |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
85 |
GAD_FLUXLIMIT_ADV_Y |
Cr=Rjm/Rj |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
87 |
GAD_FLUXLIMIT_ADV_Y |
Cr=Rjp/Rj |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
91 |
GAD_FLUXLIMIT_ADV_Y |
Cr=Rjm*1.E20 |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
93 |
GAD_FLUXLIMIT_ADV_Y |
Cr=Rjp*1.E20 |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
96 |
GAD_FLUXLIMIT_ADV_Y |
Cr=Limiter(Cr) |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
99 |
GAD_FLUXLIMIT_ADV_Y |
& -ABS(vTrans(i,j))*((1.-Cr)+vCFL*Cr) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
101 |
GAD_FLUXLIMIT_IMPL_R |
& - Limiter(Cr) * ( 1. _d 0 + ABS(w_CFL) ) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
68 |
GAD_FLUXLIMIT_IMPL_R |
_RL Cr,Rjm,Rj,Rjp, w_CFL |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
96 |
GAD_FLUXLIMIT_IMPL_R |
Cr=Rjm/Rj |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
98 |
GAD_FLUXLIMIT_IMPL_R |
Cr=Rjp/Rj |
./pkg/streamice/slope_limiter.F |
13 |
NO PROCEDURE |
_RL Cr |
./pkg/streamice/slope_limiter.F |
27 |
NO PROCEDURE |
SLOPE_LIMITER = max(0.D0,max(min(1.D0,2.D0*Cr), |
./pkg/streamice/slope_limiter.F |
28 |
NO PROCEDURE |
& min(2.D0,Cr))) |
./pkg/streamice/slope_limiter.F |
8 |
NO PROCEDURE |
_RL FUNCTION SLOPE_LIMITER (Cr) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
112 |
STREAMICE_ADV_FLUX_FL_X |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_x.F |
114 |
STREAMICE_ADV_FLUX_FL_X |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
120 |
STREAMICE_ADV_FLUX_FL_X |
phi = SLOPE_LIMITER (Cr) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
124 |
STREAMICE_ADV_FLUX_FL_X |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_x.F |
126 |
STREAMICE_ADV_FLUX_FL_X |
& Cr*(1. _d 0 -CFL)/(CFL+1. _d -20) )) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
164 |
STREAMICE_ADV_FLUX_FL_X |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_x.F |
166 |
STREAMICE_ADV_FLUX_FL_X |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
172 |
STREAMICE_ADV_FLUX_FL_X |
phi = SLOPE_LIMITER (Cr) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
177 |
STREAMICE_ADV_FLUX_FL_X |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_x.F |
179 |
STREAMICE_ADV_FLUX_FL_X |
& Cr*(1. _d 0 -CFL)/(CFL+1. _d -20) )) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
43 |
STREAMICE_ADV_FLUX_FL_X |
_RL uface, phi, cfl, Cr, rdenom, d0, d1, psi |
./pkg/streamice/streamice_adv_flux_fl_y.F |
115 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_y.F |
117 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
123 |
STREAMICE_ADV_FLUX_FL_Y |
phi = SLOPE_LIMITER (Cr) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
127 |
STREAMICE_ADV_FLUX_FL_Y |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_y.F |
129 |
STREAMICE_ADV_FLUX_FL_Y |
& Cr*(1. _d 0 -CFL)/(CFL+1. _d -20) )) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
167 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = (stencil(0)-stencil(-1))/rdenom |
./pkg/streamice/streamice_adv_flux_fl_y.F |
169 |
STREAMICE_ADV_FLUX_FL_Y |
Cr = 1.E20 * (stencil(0)-stencil(-1)) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
175 |
STREAMICE_ADV_FLUX_FL_Y |
phi = SLOPE_LIMITER (Cr) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
179 |
STREAMICE_ADV_FLUX_FL_Y |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_y.F |
181 |
STREAMICE_ADV_FLUX_FL_Y |
& Cr*(1. _d 0 -CFL)/(CFL+1. _d -20) )) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
43 |
STREAMICE_ADV_FLUX_FL_Y |
_RL vface, phi, cfl, Cr, rdenom, d0, d1, psi |