| 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 |
14 |
GAD_PLM_FUN_U |
I ffll,ff00,ffrr, |
|
./pkg/generic_advdiff/gad_plm_fun.F |
24 |
GAD_PLM_FUN_U |
_RL ffll,ff00,ffrr |
|
./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 |
38 |
GAD_PLM_FUN_U |
fell = 0.5 _d 0 * (ffll + ff00) |
|
./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 |
72 |
GAD_PLM_FUN_V |
I ffll,ff00,ffrr, |
|
./pkg/generic_advdiff/gad_plm_fun.F |
83 |
GAD_PLM_FUN_V |
_RL ffll,ff00,ffrr |
|
./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 |
98 |
GAD_PLM_FUN_V |
fell = (dd00 * ffll + ddll * ff00) |
|
./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 |
111 |
GAD_PPM_FUN_MONO |
& +(3. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
116 |
GAD_PPM_FUN_MONO |
& -(3. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
131 |
GAD_PPM_FUN_MONO |
ferr = +3. _d 0 * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
142 |
GAD_PPM_FUN_MONO |
fell = +3. _d 0 * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
14 |
GAD_PPM_FUN_NULL |
I ff00, |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
153 |
GAD_PPM_FUN_MONO |
& +(3. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
158 |
GAD_PPM_FUN_MONO |
& -(3. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
25 |
GAD_PPM_FUN_NULL |
_RL ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
34 |
GAD_PPM_FUN_NULL |
& +(3. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
39 |
GAD_PPM_FUN_NULL |
& -(3. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
50 |
GAD_PPM_FUN_MONO |
I ff00, |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
63 |
GAD_PPM_FUN_MONO |
_RL ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
76 |
GAD_PPM_FUN_MONO |
if((ffrr-ff00) * |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
77 |
GAD_PPM_FUN_MONO |
& (ff00-ffll) .le. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
81 |
GAD_PPM_FUN_MONO |
fhat(1) = ff00 |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
92 |
GAD_PPM_FUN_MONO |
& (fell-ff00) .le. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_ppm_fun.F |
96 |
GAD_PPM_FUN_MONO |
fell = ff00 - dfds(0) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
101 |
GAD_PPM_HAT_R |
CALL GAD_PPM_FUN_MONO ( ff00,ffll,ffrr, |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
107 |
GAD_PPM_HAT_R |
fdel = abs(ffrr-ff00)+abs(ff00-ffll) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
108 |
GAD_PPM_HAT_R |
fmag = abs(ffll)+abs(ff00)+abs(ffrr) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
57 |
GAD_PPM_HAT_R |
_RL ff00,ffll,ffrr |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
69 |
GAD_PPM_HAT_R |
ff00 = fbar(ir+0) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
70 |
GAD_PPM_HAT_R |
ffll = ff00 |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
71 |
GAD_PPM_HAT_R |
& + mask(ir-1)*(fbar(ir-1)-ff00) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
72 |
GAD_PPM_HAT_R |
ffrr = ff00 |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
73 |
GAD_PPM_HAT_R |
& + mask(ir+1)*(fbar(ir+1)-ff00) |
|
./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 |
88 |
GAD_PPM_HAT_R |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
90 |
GAD_PPM_HAT_R |
CALL GAD_PPM_FUN_MONO ( ff00,ffll,ffrr, |
|
./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_r.F |
98 |
GAD_PPM_HAT_R |
CALL GAD_PPM_FUN_NULL ( ff00,fell,ferr, |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
102 |
GAD_PPM_HAT_X |
CALL GAD_PPM_FUN_MONO ( ff00,ffll,ffrr, |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
108 |
GAD_PPM_HAT_X |
fdel = abs(ffrr-ff00)+abs(ff00-ffll) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
109 |
GAD_PPM_HAT_X |
fmag = abs(ffll)+abs(ff00)+abs(ffrr) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
58 |
GAD_PPM_HAT_X |
_RL ff00,ffll,ffrr |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
70 |
GAD_PPM_HAT_X |
ff00 = fbar(ix+0) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
71 |
GAD_PPM_HAT_X |
ffll = ff00 |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
72 |
GAD_PPM_HAT_X |
& + mask(ix-1)*(fbar(ix-1)-ff00) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
73 |
GAD_PPM_HAT_X |
ffrr = ff00 |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
74 |
GAD_PPM_HAT_X |
& + mask(ix+1)*(fbar(ix+1)-ff00) |
|
./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 |
89 |
GAD_PPM_HAT_X |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
91 |
GAD_PPM_HAT_X |
CALL GAD_PPM_FUN_MONO ( ff00,ffll,ffrr, |
|
./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_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 |
103 |
GAD_PPM_HAT_Y |
CALL GAD_PPM_FUN_MONO ( ff00,ffll,ffrr, |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
109 |
GAD_PPM_HAT_Y |
fdel = abs(ffrr-ff00)+abs(ff00-ffll) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
110 |
GAD_PPM_HAT_Y |
fmag = abs(ffll)+abs(ff00)+abs(ffrr) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
58 |
GAD_PPM_HAT_Y |
_RL ff00,ffll,ffrr |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
71 |
GAD_PPM_HAT_Y |
ff00 = fbar(iy+0) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
72 |
GAD_PPM_HAT_Y |
ffll = ff00 |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
73 |
GAD_PPM_HAT_Y |
& + mask(iy-1)*(fbar(iy-1)-ff00) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
74 |
GAD_PPM_HAT_Y |
ffrr = ff00 |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
75 |
GAD_PPM_HAT_Y |
& + mask(iy+1)*(fbar(iy+1)-ff00) |
|
./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 |
90 |
GAD_PPM_HAT_Y |
CALL GAD_PLM_FUN_U(ffll,ff00,ffrr,dfds) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
92 |
GAD_PPM_HAT_Y |
CALL GAD_PPM_FUN_MONO ( ff00,ffll,ffrr, |
|
./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 |
102 |
GAD_PQM_FUN_NULL |
& + (30. _d 0 / 16. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
109 |
GAD_PQM_FUN_NULL |
& - (30. _d 0 / 8. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
115 |
GAD_PQM_FUN_NULL |
& + (30. _d 0 / 16. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
127 |
GAD_PQM_FUN_MONO |
I ff00, |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
141 |
GAD_PQM_FUN_MONO |
_RL ff00,ffll,ffrr |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
160 |
GAD_PQM_FUN_MONO |
if((ffrr-ff00) * |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
161 |
GAD_PQM_FUN_MONO |
& (ff00-ffll) .le. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
165 |
GAD_PQM_FUN_MONO |
fhat(1) = ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
178 |
GAD_PQM_FUN_MONO |
& (fell - ff00) .le. 0. _d 0) then |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
182 |
GAD_PQM_FUN_MONO |
fell = ff00 - dfds(0) |
|
./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 |
214 |
GAD_PQM_FUN_MONO |
& + (30. _d 0 / 16. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
221 |
GAD_PQM_FUN_MONO |
& - (30. _d 0 / 8. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
227 |
GAD_PQM_FUN_MONO |
& + (30. _d 0 / 16. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
300 |
GAD_PQM_FUN_MONO |
& -( 5. _d 0 / 1. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
304 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 3. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
313 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 1. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
316 |
GAD_PQM_FUN_MONO |
& +(10. _d 0 / 1. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
326 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
329 |
GAD_PQM_FUN_MONO |
& -( 5. _d 0 / 3. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
342 |
GAD_PQM_FUN_MONO |
& -( 5. _d 0 / 3. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
346 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 1. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
355 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 2. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
358 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 3. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
368 |
GAD_PQM_FUN_MONO |
& +( 5. _d 0 / 1. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
371 |
GAD_PQM_FUN_MONO |
& -(10. _d 0 / 1. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
384 |
GAD_PQM_FUN_MONO |
& + (30. _d 0 / 16. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
391 |
GAD_PQM_FUN_MONO |
& - (30. _d 0 / 8. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
397 |
GAD_PQM_FUN_MONO |
& + (30. _d 0 / 16. _d 0) * ff00 |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
80 |
GAD_PQM_FUN_NULL |
I ff00, |
|
./pkg/generic_advdiff/gad_pqm_fun.F |
92 |
GAD_PQM_FUN_NULL |
_RL ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
100 |
GAD_PQM_HAT_R |
CALL GAD_PQM_FUN_NULL ( ff00, |
|
./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 |
108 |
GAD_PQM_HAT_R |
CALL GAD_PQM_FUN_MONO ( ff00,ffll,ffrr, |
|
./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 |
117 |
GAD_PQM_HAT_R |
CALL GAD_PQM_FUN_NULL ( ff00, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
120 |
GAD_PQM_HAT_R |
CALL GAD_PQM_FUN_MONO ( ff00,ffll,ffrr, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
127 |
GAD_PQM_HAT_R |
fdel = abs(ffrr-ff00)+abs(ff00-ffll) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
128 |
GAD_PQM_HAT_R |
fmag = abs(ffll)+abs(ff00)+abs(ffrr) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
63 |
GAD_PQM_HAT_R |
_RL ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
81 |
GAD_PQM_HAT_R |
ff00 = fbar(ir+0) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
82 |
GAD_PQM_HAT_R |
ffll = ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
83 |
GAD_PQM_HAT_R |
& + mask(ir-1)*(fbar(ir-1)-ff00) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
84 |
GAD_PQM_HAT_R |
ffrr = ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
85 |
GAD_PQM_HAT_R |
& + mask(ir+1)*(fbar(ir+1)-ff00) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
102 |
GAD_PQM_HAT_X |
CALL GAD_PQM_FUN_NULL ( ff00, |
|
./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 |
110 |
GAD_PQM_HAT_X |
CALL GAD_PQM_FUN_MONO ( ff00,ffll,ffrr, |
|
./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 |
119 |
GAD_PQM_HAT_X |
CALL GAD_PQM_FUN_NULL ( ff00, |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
122 |
GAD_PQM_HAT_X |
CALL GAD_PQM_FUN_MONO ( ff00,ffll,ffrr, |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
129 |
GAD_PQM_HAT_X |
fdel = abs(ffrr-ff00)+abs(ff00-ffll) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
130 |
GAD_PQM_HAT_X |
fmag = abs(ffll)+abs(ff00)+abs(ffrr) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
63 |
GAD_PQM_HAT_X |
_RL ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
83 |
GAD_PQM_HAT_X |
ff00 = fbar(ix+0) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
84 |
GAD_PQM_HAT_X |
ffll = ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
85 |
GAD_PQM_HAT_X |
& + mask(ix-1)*(fbar(ix-1)-ff00) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
86 |
GAD_PQM_HAT_X |
ffrr = ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
87 |
GAD_PQM_HAT_X |
& + mask(ix+1)*(fbar(ix+1)-ff00) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
103 |
GAD_PQM_HAT_Y |
CALL GAD_PQM_FUN_NULL ( ff00, |
|
./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 |
111 |
GAD_PQM_HAT_Y |
CALL GAD_PQM_FUN_MONO ( ff00,ffll,ffrr, |
|
./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 |
120 |
GAD_PQM_HAT_Y |
CALL GAD_PQM_FUN_NULL ( ff00, |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
123 |
GAD_PQM_HAT_Y |
CALL GAD_PQM_FUN_MONO ( ff00,ffll,ffrr, |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
130 |
GAD_PQM_HAT_Y |
fdel = abs(ffrr-ff00)+abs(ff00-ffll) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
131 |
GAD_PQM_HAT_Y |
fmag = abs(ffll)+abs(ff00)+abs(ffrr) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
63 |
GAD_PQM_HAT_Y |
_RL ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
84 |
GAD_PQM_HAT_Y |
ff00 = fbar(iy+0) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
85 |
GAD_PQM_HAT_Y |
ffll = ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
86 |
GAD_PQM_HAT_Y |
& + mask(iy-1)*(fbar(iy-1)-ff00) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
87 |
GAD_PQM_HAT_Y |
ffrr = ff00 |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
88 |
GAD_PQM_HAT_Y |
& + mask(iy+1)*(fbar(iy+1)-ff00) |