File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_osc_hat_r.F |
28 |
GAD_OSC_LOC_R |
_RL floc(-1:+1) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
35 |
GAD_OSC_LOC_R |
floc(+0) = fbar(+0+ir) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
37 |
GAD_OSC_LOC_R |
floc(-1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_r.F |
38 |
GAD_OSC_LOC_R |
& mask(ir-1)*(fbar(ir-1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
39 |
GAD_OSC_LOC_R |
floc(+1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_r.F |
40 |
GAD_OSC_LOC_R |
& mask(ir+1)*(fbar(ir+1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
44 |
GAD_OSC_LOC_R |
ohat(+1,ir) = floc(+1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
45 |
GAD_OSC_LOC_R |
& - floc(-1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
47 |
GAD_OSC_LOC_R |
ohat(+2,ir) = floc(+1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
48 |
GAD_OSC_LOC_R |
& - floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
49 |
GAD_OSC_LOC_R |
& + floc(-1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
57 |
GAD_OSC_LOC_R |
floc(+0) = fbar(+0+ir) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
59 |
GAD_OSC_LOC_R |
floc(+1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_r.F |
60 |
GAD_OSC_LOC_R |
& mask(ir+1)*(fbar(ir+1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
64 |
GAD_OSC_LOC_R |
ohat(+1,ir) = floc(+1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
65 |
GAD_OSC_LOC_R |
& - floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
75 |
GAD_OSC_LOC_R |
floc(+0) = fbar(+0+ir) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
77 |
GAD_OSC_LOC_R |
floc(-1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_r.F |
78 |
GAD_OSC_LOC_R |
& mask(ir-1)*(fbar(ir-1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_r.F |
82 |
GAD_OSC_LOC_R |
ohat(+1,ir) = floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_r.F |
83 |
GAD_OSC_LOC_R |
& - floc(-1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
28 |
GAD_OSC_LOC_X |
_RL floc(-2:+2) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
35 |
GAD_OSC_LOC_X |
floc(+0) = fbar(+0+ix) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
37 |
GAD_OSC_LOC_X |
floc(-1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_x.F |
38 |
GAD_OSC_LOC_X |
& mask(ix-1)*(fbar(ix-1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
39 |
GAD_OSC_LOC_X |
floc(+1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_x.F |
40 |
GAD_OSC_LOC_X |
& mask(ix+1)*(fbar(ix+1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
44 |
GAD_OSC_LOC_X |
ohat(+1,ix) = floc(+1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
45 |
GAD_OSC_LOC_X |
& - floc(-1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
47 |
GAD_OSC_LOC_X |
ohat(+2,ix) = floc(+1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
48 |
GAD_OSC_LOC_X |
& - floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
49 |
GAD_OSC_LOC_X |
& + floc(-1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
57 |
GAD_OSC_LOC_X |
floc(+0) = fbar(+0+ix) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
59 |
GAD_OSC_LOC_X |
floc(+1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_x.F |
60 |
GAD_OSC_LOC_X |
& mask(ix+1)*(fbar(ix+1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
61 |
GAD_OSC_LOC_X |
floc(+2) = floc(+1) + |
./pkg/generic_advdiff/gad_osc_hat_x.F |
62 |
GAD_OSC_LOC_X |
& mask(ix+2)*(fbar(ix+2)-floc(+1)) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
66 |
GAD_OSC_LOC_X |
ohat(+1,ix) = floc(+1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
67 |
GAD_OSC_LOC_X |
& - floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
69 |
GAD_OSC_LOC_X |
ohat(+2,ix) = floc(+2)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
70 |
GAD_OSC_LOC_X |
& - floc(+1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
71 |
GAD_OSC_LOC_X |
& + floc(+0)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
79 |
GAD_OSC_LOC_X |
floc(+0) = fbar(+0+ix) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
81 |
GAD_OSC_LOC_X |
floc(-1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_x.F |
82 |
GAD_OSC_LOC_X |
& mask(ix-1)*(fbar(ix-1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
83 |
GAD_OSC_LOC_X |
floc(-2) = floc(-1) + |
./pkg/generic_advdiff/gad_osc_hat_x.F |
84 |
GAD_OSC_LOC_X |
& mask(ix-2)*(fbar(ix-2)-floc(-1)) |
./pkg/generic_advdiff/gad_osc_hat_x.F |
88 |
GAD_OSC_LOC_X |
ohat(+1,ix) = floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
89 |
GAD_OSC_LOC_X |
& - floc(-1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
91 |
GAD_OSC_LOC_X |
ohat(+2,ix) = floc(+0)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
92 |
GAD_OSC_LOC_X |
& - floc(-1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_x.F |
93 |
GAD_OSC_LOC_X |
& + floc(-2)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
28 |
GAD_OSC_LOC_Y |
_RL floc(-2:+2) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
35 |
GAD_OSC_LOC_Y |
floc(+0) = fbar(+0+iy) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
37 |
GAD_OSC_LOC_Y |
floc(-1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_y.F |
38 |
GAD_OSC_LOC_Y |
& mask(iy-1)*(fbar(iy-1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
39 |
GAD_OSC_LOC_Y |
floc(+1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_y.F |
40 |
GAD_OSC_LOC_Y |
& mask(iy+1)*(fbar(iy+1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
44 |
GAD_OSC_LOC_Y |
ohat(+1,iy) = floc(+1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
45 |
GAD_OSC_LOC_Y |
& - floc(-1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
47 |
GAD_OSC_LOC_Y |
ohat(+2,iy) = floc(+1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
48 |
GAD_OSC_LOC_Y |
& - floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
49 |
GAD_OSC_LOC_Y |
& + floc(-1)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
57 |
GAD_OSC_LOC_Y |
floc(+0) = fbar(+0+iy) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
59 |
GAD_OSC_LOC_Y |
floc(+1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_y.F |
60 |
GAD_OSC_LOC_Y |
& mask(iy+1)*(fbar(iy+1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
61 |
GAD_OSC_LOC_Y |
floc(+2) = floc(+1) + |
./pkg/generic_advdiff/gad_osc_hat_y.F |
62 |
GAD_OSC_LOC_Y |
& mask(iy+2)*(fbar(iy+2)-floc(+1)) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
66 |
GAD_OSC_LOC_Y |
ohat(+1,iy) = floc(+1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
67 |
GAD_OSC_LOC_Y |
& - floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
69 |
GAD_OSC_LOC_Y |
ohat(+2,iy) = floc(+2)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
70 |
GAD_OSC_LOC_Y |
& - floc(+1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
71 |
GAD_OSC_LOC_Y |
& + floc(+0)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
79 |
GAD_OSC_LOC_Y |
floc(+0) = fbar(+0+iy) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
81 |
GAD_OSC_LOC_Y |
floc(-1) = floc(+0) + |
./pkg/generic_advdiff/gad_osc_hat_y.F |
82 |
GAD_OSC_LOC_Y |
& mask(iy-1)*(fbar(iy-1)-floc(+0)) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
83 |
GAD_OSC_LOC_Y |
floc(-2) = floc(-1) + |
./pkg/generic_advdiff/gad_osc_hat_y.F |
84 |
GAD_OSC_LOC_Y |
& mask(iy-2)*(fbar(iy-2)-floc(-1)) |
./pkg/generic_advdiff/gad_osc_hat_y.F |
88 |
GAD_OSC_LOC_Y |
ohat(+1,iy) = floc(+0)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
89 |
GAD_OSC_LOC_Y |
& - floc(-1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
91 |
GAD_OSC_LOC_Y |
ohat(+2,iy) = floc(+0)*0.25 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
92 |
GAD_OSC_LOC_Y |
& - floc(-1)*0.50 _d 0 |
./pkg/generic_advdiff/gad_osc_hat_y.F |
93 |
GAD_OSC_LOC_Y |
& + floc(-2)*0.25 _d 0 |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
111 |
GAD_PPM_ADV_R |
floc(ir) = fbar(ix,iy,ir) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
117 |
GAD_PPM_ADV_R |
floc( -2) = floc(+1) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
118 |
GAD_PPM_ADV_R |
floc( -1) = floc(+1) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
119 |
GAD_PPM_ADV_R |
floc( +0) = floc(+1) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
120 |
GAD_PPM_ADV_R |
floc(Nr+1) = floc(Nr) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
121 |
GAD_PPM_ADV_R |
floc(Nr+2) = floc(Nr) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
122 |
GAD_PPM_ADV_R |
floc(Nr+3) = floc(Nr) |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
127 |
GAD_PPM_ADV_R |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
133 |
GAD_PPM_ADV_R |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
139 |
GAD_PPM_ADV_R |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_r.F |
62 |
GAD_PPM_ADV_R |
_RL floc( 1-3:Nr+3) |
./pkg/generic_advdiff/gad_ppm_adv_x.F |
106 |
GAD_PPM_ADV_X |
floc(ix) = fbar (ix,iy) |
./pkg/generic_advdiff/gad_ppm_adv_x.F |
114 |
GAD_PPM_ADV_X |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_x.F |
120 |
GAD_PPM_ADV_X |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_x.F |
126 |
GAD_PPM_ADV_X |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_x.F |
62 |
GAD_PPM_ADV_X |
_RL floc(1-OLx:sNx+OLx) |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
106 |
GAD_PPM_ADV_Y |
floc(iy) = fbar (ix,iy) |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
114 |
GAD_PPM_ADV_Y |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
120 |
GAD_PPM_ADV_Y |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
126 |
GAD_PPM_ADV_Y |
& mloc,floc, |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
62 |
GAD_PPM_ADV_Y |
_RL floc(1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
30 |
GAD_PPM_P3E_R |
_RL floc(-2:+1) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
39 |
GAD_PPM_P3E_R |
floc(-1) = fbar(ir+0) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
41 |
GAD_PPM_P3E_R |
floc(+0) = fbar(ir-1) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
46 |
GAD_PPM_P3E_R |
ftmp = 2. _d 0 * floc(-1) - floc(+0) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
47 |
GAD_PPM_P3E_R |
floc(-2) = ftmp |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
52 |
GAD_PPM_P3E_R |
ftmp = 2. _d 0 * floc(+0) - floc(-1) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
53 |
GAD_PPM_P3E_R |
floc(+1) = ftmp |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
58 |
GAD_PPM_P3E_R |
& -(1. _d 0 / 12. _d 0)*(floc(-2)+floc(+1)) |
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
59 |
GAD_PPM_P3E_R |
& +(7. _d 0 / 12. _d 0)*(floc(-1)+floc(+0)) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
30 |
GAD_PPM_P3E_X |
_RL floc(-2:+1) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
39 |
GAD_PPM_P3E_X |
floc(-1) = fbar(ix+0) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
41 |
GAD_PPM_P3E_X |
floc(+0) = fbar(ix-1) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
46 |
GAD_PPM_P3E_X |
ftmp = 2. _d 0 * floc(-1) - floc(+0) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
47 |
GAD_PPM_P3E_X |
floc(-2) = ftmp |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
52 |
GAD_PPM_P3E_X |
ftmp = 2. _d 0 * floc(+0) - floc(-1) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
53 |
GAD_PPM_P3E_X |
floc(+1) = ftmp |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
58 |
GAD_PPM_P3E_X |
& -(1. _d 0 / 12. _d 0)*(floc(-2)+floc(+1)) |
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
59 |
GAD_PPM_P3E_X |
& +(7. _d 0 / 12. _d 0)*(floc(-1)+floc(+0)) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
30 |
GAD_PPM_P3E_Y |
_RL floc(-2:+1) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
40 |
GAD_PPM_P3E_Y |
floc(-1) = fbar(iy+0) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
42 |
GAD_PPM_P3E_Y |
floc(+0) = fbar(iy-1) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
47 |
GAD_PPM_P3E_Y |
ftmp = 2. _d 0 * floc(-1) - floc(+0) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
48 |
GAD_PPM_P3E_Y |
floc(-2) = ftmp |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
53 |
GAD_PPM_P3E_Y |
ftmp = 2. _d 0 * floc(+0) - floc(-1) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
54 |
GAD_PPM_P3E_Y |
floc(+1) = ftmp |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
59 |
GAD_PPM_P3E_Y |
& -(1. _d 0 / 12. _d 0)*(floc(-2)+floc(+1)) |
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
60 |
GAD_PPM_P3E_Y |
& +(7. _d 0 / 12. _d 0)*(floc(-1)+floc(+0)) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
106 |
GAD_PQM_ADV_R |
floc(ir) = fbar (ix,iy,ir) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
114 |
GAD_PQM_ADV_R |
floc( -2) = floc(+1) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
115 |
GAD_PQM_ADV_R |
floc( -1) = floc(+1) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
116 |
GAD_PQM_ADV_R |
floc( +0) = floc(+1) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
117 |
GAD_PQM_ADV_R |
floc(Nr+1) = floc(Nr) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
118 |
GAD_PQM_ADV_R |
floc(Nr+2) = floc(Nr) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
119 |
GAD_PQM_ADV_R |
floc(Nr+3) = floc(Nr) |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
124 |
GAD_PQM_ADV_R |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
130 |
GAD_PQM_ADV_R |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
136 |
GAD_PQM_ADV_R |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_r.F |
62 |
GAD_PQM_ADV_R |
_RL floc( 1-3:Nr+3) |
./pkg/generic_advdiff/gad_pqm_adv_x.F |
102 |
GAD_PQM_ADV_X |
floc(ix) = fbar (ix,iy) |
./pkg/generic_advdiff/gad_pqm_adv_x.F |
112 |
GAD_PQM_ADV_X |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_x.F |
118 |
GAD_PQM_ADV_X |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_x.F |
124 |
GAD_PQM_ADV_X |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_x.F |
62 |
GAD_PQM_ADV_X |
_RL floc(1-OLx:sNx+OLx) |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
102 |
GAD_PQM_ADV_Y |
floc(iy) = fbar (ix,iy) |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
112 |
GAD_PQM_ADV_Y |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
118 |
GAD_PQM_ADV_Y |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
124 |
GAD_PQM_ADV_Y |
& mloc,floc, |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
62 |
GAD_PQM_ADV_Y |
_RL floc(1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
31 |
GAD_PQM_P5E_R |
_RL floc(-3:+2) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
40 |
GAD_PQM_P5E_R |
floc(-1) = fbar(ir+0) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
42 |
GAD_PQM_P5E_R |
floc(+0) = fbar(ir-1) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
48 |
GAD_PQM_P5E_R |
ftmp = 2. _d 0 * floc(-1) - floc(+0) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
49 |
GAD_PQM_P5E_R |
floc(-2) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
51 |
GAD_PQM_P5E_R |
ftmp = 2. _d 0 * floc(-2) - floc(-1) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
52 |
GAD_PQM_P5E_R |
floc(-3) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
58 |
GAD_PQM_P5E_R |
ftmp = 2. _d 0 * floc(+0) - floc(-1) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
59 |
GAD_PQM_P5E_R |
floc(+1) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
61 |
GAD_PQM_P5E_R |
ftmp = 2. _d 0 * floc(+1) - floc(+0) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
62 |
GAD_PQM_P5E_R |
floc(+2) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
67 |
GAD_PQM_P5E_R |
& +( 1. _d 0/60. _d 0)*(floc(-3)+floc(+2)) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
68 |
GAD_PQM_P5E_R |
& -( 8. _d 0/60. _d 0)*(floc(-2)+floc(+1)) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
69 |
GAD_PQM_P5E_R |
& +(37. _d 0/60. _d 0)*(floc(-1)+floc(+0)) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
72 |
GAD_PQM_P5E_R |
& -( 1. _d 0/90. _d 0)*(floc(-3)-floc(+2)) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
73 |
GAD_PQM_P5E_R |
& +( 5. _d 0/36. _d 0)*(floc(-2)-floc(+1)) |
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
74 |
GAD_PQM_P5E_R |
& -(49. _d 0/36. _d 0)*(floc(-1)-floc(+0)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
31 |
GAD_PQM_P5E_X |
_RL floc(-3:+2) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
40 |
GAD_PQM_P5E_X |
floc(-1) = fbar(ix+0) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
42 |
GAD_PQM_P5E_X |
floc(+0) = fbar(ix-1) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
48 |
GAD_PQM_P5E_X |
ftmp = 2. _d 0 * floc(-1) - floc(+0) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
49 |
GAD_PQM_P5E_X |
floc(-2) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
51 |
GAD_PQM_P5E_X |
ftmp = 2. _d 0 * floc(-2) - floc(-1) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
52 |
GAD_PQM_P5E_X |
floc(-3) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
58 |
GAD_PQM_P5E_X |
ftmp = 2. _d 0 * floc(+0) - floc(-1) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
59 |
GAD_PQM_P5E_X |
floc(+1) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
61 |
GAD_PQM_P5E_X |
ftmp = 2. _d 0 * floc(+1) - floc(+0) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
62 |
GAD_PQM_P5E_X |
floc(+2) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
67 |
GAD_PQM_P5E_X |
& +( 1. _d 0/60. _d 0)*(floc(-3)+floc(+2)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
68 |
GAD_PQM_P5E_X |
& -( 8. _d 0/60. _d 0)*(floc(-2)+floc(+1)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
69 |
GAD_PQM_P5E_X |
& +(37. _d 0/60. _d 0)*(floc(-1)+floc(+0)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
72 |
GAD_PQM_P5E_X |
& -( 1. _d 0/90. _d 0)*(floc(-3)-floc(+2)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
73 |
GAD_PQM_P5E_X |
& +( 5. _d 0/36. _d 0)*(floc(-2)-floc(+1)) |
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
74 |
GAD_PQM_P5E_X |
& -(49. _d 0/36. _d 0)*(floc(-1)-floc(+0)) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
31 |
GAD_PQM_P5E_Y |
_RL floc(-3:+2) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
41 |
GAD_PQM_P5E_Y |
floc(-1) = fbar(iy+0) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
43 |
GAD_PQM_P5E_Y |
floc(+0) = fbar(iy-1) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
49 |
GAD_PQM_P5E_Y |
ftmp = 2. _d 0 * floc(-1) - floc(+0) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
50 |
GAD_PQM_P5E_Y |
floc(-2) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
52 |
GAD_PQM_P5E_Y |
ftmp = 2. _d 0 * floc(-2) - floc(-1) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
53 |
GAD_PQM_P5E_Y |
floc(-3) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
59 |
GAD_PQM_P5E_Y |
ftmp = 2. _d 0 * floc(+0) - floc(-1) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
60 |
GAD_PQM_P5E_Y |
floc(+1) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
62 |
GAD_PQM_P5E_Y |
ftmp = 2. _d 0 * floc(+1) - floc(+0) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
63 |
GAD_PQM_P5E_Y |
floc(+2) = ftmp |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
68 |
GAD_PQM_P5E_Y |
& +( 1. _d 0/60. _d 0)*(floc(-3)+floc(+2)) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
69 |
GAD_PQM_P5E_Y |
& -( 8. _d 0/60. _d 0)*(floc(-2)+floc(+1)) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
70 |
GAD_PQM_P5E_Y |
& +(37. _d 0/60. _d 0)*(floc(-1)+floc(+0)) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
73 |
GAD_PQM_P5E_Y |
& -( 1. _d 0/90. _d 0)*(floc(-3)-floc(+2)) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
74 |
GAD_PQM_P5E_Y |
& +( 5. _d 0/36. _d 0)*(floc(-2)-floc(+1)) |
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
75 |
GAD_PQM_P5E_Y |
& -(49. _d 0/36. _d 0)*(floc(-1)-floc(+0)) |