| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_plm_fun.F |
104 |
GAD_PLM_FUN_V |
dfds(+0) = |
|
./pkg/generic_advdiff/gad_plm_fun.F |
108 |
GAD_PLM_FUN_V |
scal = min(abs(dfds(-1)), |
|
./pkg/generic_advdiff/gad_plm_fun.F |
109 |
GAD_PLM_FUN_V |
& abs(dfds(+1))) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
110 |
GAD_PLM_FUN_V |
& / max(abs(dfds(+0)), epsil) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
114 |
GAD_PLM_FUN_V |
dfds(+0) = scal * dfds(+0) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
119 |
GAD_PLM_FUN_V |
dfds(+0) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_plm_fun.F |
124 |
GAD_PLM_FUN_V |
dfds(-1) = dfds(-1) / (ddll + dd00) * dd00 |
|
./pkg/generic_advdiff/gad_plm_fun.F |
125 |
GAD_PLM_FUN_V |
dfds(+1) = dfds(+1) / (dd00 + ddrr) * dd00 |
|
./pkg/generic_advdiff/gad_plm_fun.F |
15 |
GAD_PLM_FUN_U |
O dfds) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
25 |
GAD_PLM_FUN_U |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
32 |
GAD_PLM_FUN_U |
dfds(-1) = ff00 - ffll |
|
./pkg/generic_advdiff/gad_plm_fun.F |
33 |
GAD_PLM_FUN_U |
dfds(+1) = ffrr - ff00 |
|
./pkg/generic_advdiff/gad_plm_fun.F |
35 |
GAD_PLM_FUN_U |
if (dfds(-1) * dfds(+1) .gt. 0.0 _d 0) then |
|
./pkg/generic_advdiff/gad_plm_fun.F |
42 |
GAD_PLM_FUN_U |
dfds(+0) = |
|
./pkg/generic_advdiff/gad_plm_fun.F |
46 |
GAD_PLM_FUN_U |
scal = min(abs(dfds(-1)), |
|
./pkg/generic_advdiff/gad_plm_fun.F |
47 |
GAD_PLM_FUN_U |
& abs(dfds(+1))) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
48 |
GAD_PLM_FUN_U |
& / max(abs(dfds(+0)), epsil) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
52 |
GAD_PLM_FUN_U |
dfds(+0) = scal * dfds(+0) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
57 |
GAD_PLM_FUN_U |
dfds(+0) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_plm_fun.F |
61 |
GAD_PLM_FUN_U |
dfds(-1) = 0.5 _d 0 * dfds(-1) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
62 |
GAD_PLM_FUN_U |
dfds(+1) = 0.5 _d 0 * dfds(+1) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
74 |
GAD_PLM_FUN_V |
O dfds) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
85 |
GAD_PLM_FUN_V |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_plm_fun.F |
92 |
GAD_PLM_FUN_V |
dfds(-1) = ff00 - ffll |
|
./pkg/generic_advdiff/gad_plm_fun.F |
93 |
GAD_PLM_FUN_V |
dfds(+1) = ffrr - ff00 |
|
./pkg/generic_advdiff/gad_plm_fun.F |
95 |
GAD_PLM_FUN_V |
if (dfds(-1) * dfds(+1) .gt. 0.0 _d 0) then |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
105 |
GAD_PPM_FUN_MONO |
ferr = ff00 + dfds(0) |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
53 |
GAD_PPM_FUN_MONO |
I dfds, |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
66 |
GAD_PPM_FUN_MONO |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
96 |
GAD_PPM_FUN_MONO |
fell = ff00 - dfds(0) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
102 |
GAD_PPM_HAT_R |
& fell,ferr,dfds,lhat,mono) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
59 |
GAD_PPM_HAT_R |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
88 |
GAD_PPM_HAT_R |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
91 |
GAD_PPM_HAT_R |
& fell,ferr,dfds,lhat,mono) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
96 |
GAD_PPM_HAT_R |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
103 |
GAD_PPM_HAT_X |
& fell,ferr,dfds,lhat,mono) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
60 |
GAD_PPM_HAT_X |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
89 |
GAD_PPM_HAT_X |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
92 |
GAD_PPM_HAT_X |
& fell,ferr,dfds,lhat,mono) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
97 |
GAD_PPM_HAT_X |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
104 |
GAD_PPM_HAT_Y |
& fell,ferr,dfds,lhat,mono) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
60 |
GAD_PPM_HAT_Y |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
90 |
GAD_PPM_HAT_Y |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
93 |
GAD_PPM_HAT_Y |
& fell,ferr,dfds,lhat,mono) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
98 |
GAD_PPM_HAT_Y |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
131 |
GAD_PQM_FUN_MONO |
I dfds, |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
144 |
GAD_PQM_FUN_MONO |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
182 |
GAD_PQM_FUN_MONO |
fell = ff00 - dfds(0) |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
191 |
GAD_PQM_FUN_MONO |
ferr = ff00 + dfds(0) |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
196 |
GAD_PQM_FUN_MONO |
if((dell * dfds(-1)) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
200 |
GAD_PQM_FUN_MONO |
dell = dfds(-1) |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
204 |
GAD_PQM_FUN_MONO |
if((derr * dfds(+1)) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
208 |
GAD_PQM_FUN_MONO |
derr = dfds(+1) |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
249 |
GAD_PQM_FUN_MONO |
if (dflx(1)*dfds(+0) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
275 |
GAD_PQM_FUN_MONO |
if (dflx(2)*dfds(+0) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
308 |
GAD_PQM_FUN_MONO |
if (dell*dfds(-1) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
321 |
GAD_PQM_FUN_MONO |
if (derr*dfds(+1) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
350 |
GAD_PQM_FUN_MONO |
if (dell*dfds(-1) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
363 |
GAD_PQM_FUN_MONO |
if (derr*dfds(+1) .lt. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
106 |
GAD_PQM_HAT_R |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
109 |
GAD_PQM_HAT_R |
& fell,ferr,dell,derr,dfds,lhat, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
115 |
GAD_PQM_HAT_R |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
121 |
GAD_PQM_HAT_R |
& fell,ferr,dell,derr,dfds,lhat, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
68 |
GAD_PQM_HAT_R |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
108 |
GAD_PQM_HAT_X |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
111 |
GAD_PQM_HAT_X |
& fell,ferr,dell,derr,dfds,lhat, |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
117 |
GAD_PQM_HAT_X |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
123 |
GAD_PQM_HAT_X |
& fell,ferr,dell,derr,dfds,lhat, |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
68 |
GAD_PQM_HAT_X |
_RL dfds(-1:+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
109 |
GAD_PQM_HAT_Y |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
112 |
GAD_PQM_HAT_Y |
& fell,ferr,dell,derr,dfds,lhat, |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
118 |
GAD_PQM_HAT_Y |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
124 |
GAD_PQM_HAT_Y |
& fell,ferr,dell,derr,dfds,lhat, |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
68 |
GAD_PQM_HAT_Y |
_RL dfds(-1:+1) |