File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
61 |
GAD_DST3_ADV_R |
_RL Rjm,Rj,Rjp,cfl,d0,d1 |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
88 |
GAD_DST3_ADV_R |
cfl=ABS(wLoc*dTarg*recip_drC(k)) |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
89 |
GAD_DST3_ADV_R |
d0=(2.-cfl)*(1.-cfl)*oneSixth |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
90 |
GAD_DST3_ADV_R |
d1=(1.-cfl*cfl)*oneSixth |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
118 |
GAD_OS7MP_ADV_R |
Fac = Fac * ( cfl + 1. _d 0 )/3. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
123 |
GAD_OS7MP_ADV_R |
Fac = Fac * ( cfl - 2. _d 0 )/4. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
129 |
GAD_OS7MP_ADV_R |
Fac = Fac * ( cfl - 3. _d 0 )/5. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
136 |
GAD_OS7MP_ADV_R |
Fac = Fac * ( cfl + 2. _d 0 )/6. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
144 |
GAD_OS7MP_ADV_R |
Fac = Fac * ( cfl + 2. _d 0 )/7. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
166 |
GAD_OS7MP_ADV_R |
rp1h_cfl = rp1h/(cfl+Eps) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
192 |
GAD_OS7MP_ADV_R |
PhiMD = 1. _d 0/(1. _d 0-cfl)*(DelIp-dp1h)*recip_DelIp |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
197 |
GAD_OS7MP_ADV_R |
PhiMax = min(max(2. _d 0/(1. _d 0-cfl),PhiMD), |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
201 |
GAD_OS7MP_ADV_R |
Psi = Phi * 0.5 _d 0 * (1. _d 0 - cfl) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
35 |
GAD_OS7MP_ADV_R |
_RL cfl,Psi |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
63 |
GAD_OS7MP_ADV_R |
cfl = abs(wLoc*deltaTloc*recip_drC(k)) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
122 |
GAD_OS7MP_ADV_X |
Fac = Fac * ( cfl + 1. _d 0 )/3. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
127 |
GAD_OS7MP_ADV_X |
Fac = Fac * ( cfl - 2. _d 0 )/4. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
133 |
GAD_OS7MP_ADV_X |
Fac = Fac * ( cfl - 3. _d 0 )/5. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
140 |
GAD_OS7MP_ADV_X |
Fac = Fac * ( cfl + 2. _d 0 )/6. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
148 |
GAD_OS7MP_ADV_X |
Fac = Fac * ( cfl + 2. _d 0 )/7. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
170 |
GAD_OS7MP_ADV_X |
rp1h_cfl = rp1h/(cfl+Eps) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
196 |
GAD_OS7MP_ADV_X |
PhiMD = 1. _d 0/(1. _d 0-cfl)*(DelIp-dp1h)*recip_DelIp |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
201 |
GAD_OS7MP_ADV_X |
PhiMax = min( max(2. _d 0/(1. _d 0-cfl),PhiMD), |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
205 |
GAD_OS7MP_ADV_X |
Psi = Phi * 0.5 _d 0 * (1. _d 0 - cfl) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
37 |
GAD_OS7MP_ADV_X |
_RL cfl,Psi |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
66 |
GAD_OS7MP_ADV_X |
cfl = uLoc |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
67 |
GAD_OS7MP_ADV_X |
IF ( calcCFL ) cfl = abs(uLoc*deltaTloc*recip_dxC(i,j,bi,bj)) |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
122 |
GAD_OS7MP_ADV_Y |
Fac = Fac * ( cfl + 1. _d 0 )/3. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
127 |
GAD_OS7MP_ADV_Y |
Fac = Fac * ( cfl - 2. _d 0 )/4. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
133 |
GAD_OS7MP_ADV_Y |
Fac = Fac * ( cfl - 3. _d 0 )/5. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
140 |
GAD_OS7MP_ADV_Y |
Fac = Fac * ( cfl + 2. _d 0 )/6. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
148 |
GAD_OS7MP_ADV_Y |
Fac = Fac * ( cfl + 2. _d 0 )/7. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
170 |
GAD_OS7MP_ADV_Y |
rp1h_cfl = rp1h/(cfl+Eps) |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
196 |
GAD_OS7MP_ADV_Y |
PhiMD = 1. _d 0/(1. _d 0-cfl)*(DelIp-dp1h)*recip_DelIp |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
201 |
GAD_OS7MP_ADV_Y |
PhiMax = min( max(2. _d 0/(1. _d 0-cfl),PhiMD), |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
205 |
GAD_OS7MP_ADV_Y |
Psi = Phi * 0.5 _d 0 * (1. _d 0 - cfl) |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
37 |
GAD_OS7MP_ADV_Y |
_RL cfl,Psi |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
66 |
GAD_OS7MP_ADV_Y |
cfl = vLoc |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
67 |
GAD_OS7MP_ADV_Y |
IF ( calcCFL ) cfl = abs(vLoc*deltaTloc*recip_dyC(i,j,bi,bj)) |
./pkg/streamice/streamice_adv_flux_fl_x.F |
122 |
STREAMICE_ADV_FLUX_FL_X |
d0 = (2.-cfl)*(1.-cfl)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_x.F |
123 |
STREAMICE_ADV_FLUX_FL_X |
d1 = (1.-cfl**2)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_x.F |
131 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_x.F |
175 |
STREAMICE_ADV_FLUX_FL_X |
d0 = (2.-cfl)*(1.-cfl)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_x.F |
176 |
STREAMICE_ADV_FLUX_FL_X |
d1 = (1.-cfl**2)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_x.F |
184 |
STREAMICE_ADV_FLUX_FL_X |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./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_x.F |
81 |
STREAMICE_ADV_FLUX_FL_X |
cfl = ABS(uface) * time_step * recip_dxC(i,j,bi,bj) |
./pkg/streamice/streamice_adv_flux_fl_y.F |
125 |
STREAMICE_ADV_FLUX_FL_Y |
d0 = (2.-cfl)*(1.-cfl)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_y.F |
126 |
STREAMICE_ADV_FLUX_FL_Y |
d1 = (1.-cfl**2)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_y.F |
134 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_y.F |
177 |
STREAMICE_ADV_FLUX_FL_Y |
d0 = (2.-cfl)*(1.-cfl)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_y.F |
178 |
STREAMICE_ADV_FLUX_FL_Y |
d1 = (1.-cfl**2)/6.0 |
./pkg/streamice/streamice_adv_flux_fl_y.F |
186 |
STREAMICE_ADV_FLUX_FL_Y |
& (stencil(0) + phi * .5 * (1.0-cfl) * |
./pkg/streamice/streamice_adv_flux_fl_y.F |
43 |
STREAMICE_ADV_FLUX_FL_Y |
_RL vface, phi, cfl, Cr, rdenom, d0, d1, psi |
./pkg/streamice/streamice_adv_flux_fl_y.F |
80 |
STREAMICE_ADV_FLUX_FL_Y |
cfl = ABS(vface) * time_step * recip_dyC(i,j,bi,bj) |