File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_plm_fun.F |
100 |
GAD_PLM_FUN_V |
ferr = (ddrr * ff00 + dd00 * ffrr) |
./pkg/generic_advdiff/gad_plm_fun.F |
105 |
GAD_PLM_FUN_V |
& 0.5 _d 0 * (ferr - fell) |
./pkg/generic_advdiff/gad_plm_fun.F |
28 |
GAD_PLM_FUN_U |
_RL fell,ferr,scal |
./pkg/generic_advdiff/gad_plm_fun.F |
39 |
GAD_PLM_FUN_U |
ferr = 0.5 _d 0 * (ff00 + ffrr) |
./pkg/generic_advdiff/gad_plm_fun.F |
43 |
GAD_PLM_FUN_U |
& 0.5 _d 0 * (ferr - fell) |
./pkg/generic_advdiff/gad_plm_fun.F |
88 |
GAD_PLM_FUN_V |
_RL fell,ferr,scal |
./pkg/generic_advdiff/gad_ppm_fun.F |
100 |
GAD_PPM_FUN_MONO |
if((ffrr-ferr) * |
./pkg/generic_advdiff/gad_ppm_fun.F |
101 |
GAD_PPM_FUN_MONO |
& (ferr-ff00) .le. 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 |
112 |
GAD_PPM_FUN_MONO |
& -(1. _d 0 / 4. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
114 |
GAD_PPM_FUN_MONO |
& +(1. _d 0 / 2. _d 0) *(ferr-fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
117 |
GAD_PPM_FUN_MONO |
& +(3. _d 0 / 4. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
131 |
GAD_PPM_FUN_MONO |
ferr = +3. _d 0 * ff00 |
./pkg/generic_advdiff/gad_ppm_fun.F |
143 |
GAD_PPM_FUN_MONO |
& -2. _d 0 * ferr |
./pkg/generic_advdiff/gad_ppm_fun.F |
154 |
GAD_PPM_FUN_MONO |
& -(1. _d 0 / 4. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
156 |
GAD_PPM_FUN_MONO |
& +(1. _d 0 / 2. _d 0) *(ferr-fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
159 |
GAD_PPM_FUN_MONO |
& +(3. _d 0 / 4. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
15 |
GAD_PPM_FUN_NULL |
I fell,ferr, |
./pkg/generic_advdiff/gad_ppm_fun.F |
26 |
GAD_PPM_FUN_NULL |
_RL fell,ferr |
./pkg/generic_advdiff/gad_ppm_fun.F |
35 |
GAD_PPM_FUN_NULL |
& -(1. _d 0 / 4. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
37 |
GAD_PPM_FUN_NULL |
& +(1. _d 0 / 2. _d 0) *(ferr-fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
40 |
GAD_PPM_FUN_NULL |
& +(3. _d 0 / 4. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_ppm_fun.F |
52 |
GAD_PPM_FUN_MONO |
I fell,ferr, |
./pkg/generic_advdiff/gad_ppm_fun.F |
65 |
GAD_PPM_FUN_MONO |
_RL fell,ferr |
./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 |
58 |
GAD_PPM_HAT_R |
_RL fell,ferr |
./pkg/generic_advdiff/gad_ppm_hat_r.F |
76 |
GAD_PPM_HAT_R |
ferr = edge(ir+1) |
./pkg/generic_advdiff/gad_ppm_hat_r.F |
82 |
GAD_PPM_HAT_R |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
./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 |
98 |
GAD_PPM_HAT_R |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
./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 |
59 |
GAD_PPM_HAT_X |
_RL fell,ferr |
./pkg/generic_advdiff/gad_ppm_hat_x.F |
77 |
GAD_PPM_HAT_X |
ferr = edge(ix+1) |
./pkg/generic_advdiff/gad_ppm_hat_x.F |
83 |
GAD_PPM_HAT_X |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
./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 |
99 |
GAD_PPM_HAT_X |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
./pkg/generic_advdiff/gad_ppm_hat_y.F |
100 |
GAD_PPM_HAT_Y |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
./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 |
59 |
GAD_PPM_HAT_Y |
_RL fell,ferr |
./pkg/generic_advdiff/gad_ppm_hat_y.F |
78 |
GAD_PPM_HAT_Y |
ferr = edge(iy+1) |
./pkg/generic_advdiff/gad_ppm_hat_y.F |
84 |
GAD_PPM_HAT_Y |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
./pkg/generic_advdiff/gad_ppm_hat_y.F |
93 |
GAD_PPM_HAT_Y |
& fell,ferr,dfds,lhat,mono) |
./pkg/generic_advdiff/gad_pqm_fun.F |
103 |
GAD_PQM_FUN_NULL |
& - ( 7. _d 0 / 16. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
106 |
GAD_PQM_FUN_NULL |
& + ( 3. _d 0 / 4. _d 0) *(ferr-fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
110 |
GAD_PQM_FUN_NULL |
& + (15. _d 0 / 8. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
113 |
GAD_PQM_FUN_NULL |
& - ( 1. _d 0 / 4. _d 0) *(ferr-fell-derr-dell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
116 |
GAD_PQM_FUN_NULL |
& - (15. _d 0 / 16. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
129 |
GAD_PQM_FUN_MONO |
I fell,ferr, |
./pkg/generic_advdiff/gad_pqm_fun.F |
142 |
GAD_PQM_FUN_MONO |
_RL fell,ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
186 |
GAD_PQM_FUN_MONO |
if((ffrr - ferr) * |
./pkg/generic_advdiff/gad_pqm_fun.F |
187 |
GAD_PQM_FUN_MONO |
& (ferr - ff00) .le. 0. _d 0) then |
./pkg/generic_advdiff/gad_pqm_fun.F |
191 |
GAD_PQM_FUN_MONO |
ferr = ff00 + dfds(0) |
./pkg/generic_advdiff/gad_pqm_fun.F |
215 |
GAD_PQM_FUN_MONO |
& - ( 7. _d 0 / 16. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
218 |
GAD_PQM_FUN_MONO |
& + ( 3. _d 0 / 4. _d 0) *(ferr-fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
222 |
GAD_PQM_FUN_MONO |
& + (15. _d 0 / 8. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
225 |
GAD_PQM_FUN_MONO |
& - ( 1. _d 0 / 4. _d 0) *(ferr-fell-derr-dell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
228 |
GAD_PQM_FUN_MONO |
& - (15. _d 0 / 16. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
301 |
GAD_PQM_FUN_MONO |
& +( 3. _d 0 / 1. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
305 |
GAD_PQM_FUN_MONO |
& -( 1. _d 0 / 3. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
312 |
GAD_PQM_FUN_MONO |
ferr = |
./pkg/generic_advdiff/gad_pqm_fun.F |
327 |
GAD_PQM_FUN_MONO |
& -( 3. _d 0 / 2. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
330 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 3. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
343 |
GAD_PQM_FUN_MONO |
& +( 4. _d 0 / 3. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
347 |
GAD_PQM_FUN_MONO |
& -( 2. _d 0 / 1. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
354 |
GAD_PQM_FUN_MONO |
ferr = |
./pkg/generic_advdiff/gad_pqm_fun.F |
369 |
GAD_PQM_FUN_MONO |
& -( 4. _d 0 / 1. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
372 |
GAD_PQM_FUN_MONO |
& +(10. _d 0 / 1. _d 0) * ferr |
./pkg/generic_advdiff/gad_pqm_fun.F |
385 |
GAD_PQM_FUN_MONO |
& - ( 7. _d 0 / 16. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
388 |
GAD_PQM_FUN_MONO |
& + ( 3. _d 0 / 4. _d 0) *(ferr-fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
392 |
GAD_PQM_FUN_MONO |
& + (15. _d 0 / 8. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
395 |
GAD_PQM_FUN_MONO |
& - ( 1. _d 0 / 4. _d 0) *(ferr-fell-derr-dell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
398 |
GAD_PQM_FUN_MONO |
& - (15. _d 0 / 16. _d 0) *(ferr+fell) |
./pkg/generic_advdiff/gad_pqm_fun.F |
81 |
GAD_PQM_FUN_NULL |
I fell,ferr, |
./pkg/generic_advdiff/gad_pqm_fun.F |
93 |
GAD_PQM_FUN_NULL |
_RL fell,ferr |
./pkg/generic_advdiff/gad_pqm_hat_r.F |
101 |
GAD_PQM_HAT_R |
& fell,ferr,dell,derr,lhat,mono) |
./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 |
118 |
GAD_PQM_HAT_R |
& fell,ferr,dell,derr,uhat,mono) |
./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 |
66 |
GAD_PQM_HAT_R |
_RL fell,ferr |
./pkg/generic_advdiff/gad_pqm_hat_r.F |
88 |
GAD_PQM_HAT_R |
ferr = edge(+1,ir+1) |
./pkg/generic_advdiff/gad_pqm_hat_x.F |
103 |
GAD_PQM_HAT_X |
& fell,ferr,dell,derr,lhat,mono) |
./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 |
120 |
GAD_PQM_HAT_X |
& fell,ferr,dell,derr,uhat,mono) |
./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 |
66 |
GAD_PQM_HAT_X |
_RL fell,ferr |
./pkg/generic_advdiff/gad_pqm_hat_x.F |
90 |
GAD_PQM_HAT_X |
ferr = edge(+1,ix+1) |
./pkg/generic_advdiff/gad_pqm_hat_y.F |
104 |
GAD_PQM_HAT_Y |
& fell,ferr,dell,derr,lhat,mono) |
./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 |
121 |
GAD_PQM_HAT_Y |
& fell,ferr,dell,derr,uhat,mono) |
./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 |
66 |
GAD_PQM_HAT_Y |
_RL fell,ferr |
./pkg/generic_advdiff/gad_pqm_hat_y.F |
91 |
GAD_PQM_HAT_Y |
ferr = edge(+1,iy+1) |
./pkg/admtlm/admtlm_dsvd.F |
208 |
ADMTLM_DSVD |
double precision ferr, berr |