| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
112 |
GAD_PPM_ADV_R |
mloc(ir) = |
|
./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 |
63 |
GAD_PPM_ADV_R |
_RL mloc( 1-3:Nr+3) |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
70 |
GAD_PPM_ADV_R |
mloc( -2) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
71 |
GAD_PPM_ADV_R |
mloc( -1) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
72 |
GAD_PPM_ADV_R |
mloc( +0) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
73 |
GAD_PPM_ADV_R |
mloc(Nr+1) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
74 |
GAD_PPM_ADV_R |
mloc(Nr+2) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
75 |
GAD_PPM_ADV_R |
mloc(Nr+3) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
107 |
GAD_PPM_ADV_X |
mloc(ix) = |
|
./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 |
61 |
GAD_PPM_ADV_X |
_RL mloc(1-OLx:sNx+OLx) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
107 |
GAD_PPM_ADV_Y |
mloc(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 |
61 |
GAD_PPM_ADV_Y |
_RL mloc(1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
29 |
GAD_PPM_P3E_R |
_RL mloc(-2:+1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
36 |
GAD_PPM_P3E_R |
mloc(-1) = mask(ir-1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
37 |
GAD_PPM_P3E_R |
mloc(+0) = mask(ir+0) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
40 |
GAD_PPM_P3E_R |
& + mloc(-1)*(fbar(ir-1)-fbar(ir+0)) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
42 |
GAD_PPM_P3E_R |
& + mloc(+0)*(fbar(ir+0)-fbar(ir-1)) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
44 |
GAD_PPM_P3E_R |
mloc(-2) = mask(ir-2) * mloc(-1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
48 |
GAD_PPM_P3E_R |
& + mloc(-2)*(fbar(ir-2)-ftmp) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
50 |
GAD_PPM_P3E_R |
mloc(+1) = mask(ir+1) * mloc(+0) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
54 |
GAD_PPM_P3E_R |
& + mloc(+1)*(fbar(ir+1)-ftmp) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
29 |
GAD_PPM_P3E_X |
_RL mloc(-2:+1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
36 |
GAD_PPM_P3E_X |
mloc(-1) = mask(ix-1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
37 |
GAD_PPM_P3E_X |
mloc(+0) = mask(ix+0) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
40 |
GAD_PPM_P3E_X |
& + mloc(-1)*(fbar(ix-1)-fbar(ix+0)) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
42 |
GAD_PPM_P3E_X |
& + mloc(+0)*(fbar(ix+0)-fbar(ix-1)) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
44 |
GAD_PPM_P3E_X |
mloc(-2) = mask(ix-2) * mloc(-1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
48 |
GAD_PPM_P3E_X |
& + mloc(-2)*(fbar(ix-2)-ftmp) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
50 |
GAD_PPM_P3E_X |
mloc(+1) = mask(ix+1) * mloc(+0) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
54 |
GAD_PPM_P3E_X |
& + mloc(+1)*(fbar(ix+1)-ftmp) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
29 |
GAD_PPM_P3E_Y |
_RL mloc(-2:+1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
37 |
GAD_PPM_P3E_Y |
mloc(-1) = mask(iy-1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
38 |
GAD_PPM_P3E_Y |
mloc(+0) = mask(iy+0) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
41 |
GAD_PPM_P3E_Y |
& + mloc(-1)*(fbar(iy-1)-fbar(iy+0)) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
43 |
GAD_PPM_P3E_Y |
& + mloc(+0)*(fbar(iy+0)-fbar(iy-1)) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
45 |
GAD_PPM_P3E_Y |
mloc(-2) = mask(iy-2) * mloc(-1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
49 |
GAD_PPM_P3E_Y |
& + mloc(-2)*(fbar(iy-2)-ftmp) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
51 |
GAD_PPM_P3E_Y |
mloc(+1) = mask(iy+1) * mloc(+0) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
55 |
GAD_PPM_P3E_Y |
& + mloc(+1)*(fbar(iy+1)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
107 |
GAD_PQM_ADV_R |
mloc(ir) = |
|
./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 |
63 |
GAD_PQM_ADV_R |
_RL mloc( 1-3:Nr+3) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
70 |
GAD_PQM_ADV_R |
mloc( -2) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
71 |
GAD_PQM_ADV_R |
mloc( -1) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
72 |
GAD_PQM_ADV_R |
mloc( +0) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
73 |
GAD_PQM_ADV_R |
mloc(Nr+1) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
74 |
GAD_PQM_ADV_R |
mloc(Nr+2) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
75 |
GAD_PQM_ADV_R |
mloc(Nr+3) = 0.0 _d 0 |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
103 |
GAD_PQM_ADV_X |
mloc(ix) = |
|
./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 |
61 |
GAD_PQM_ADV_X |
_RL mloc(1-OLx:sNx+OLx) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
103 |
GAD_PQM_ADV_Y |
mloc(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 |
61 |
GAD_PQM_ADV_Y |
_RL mloc(1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
30 |
GAD_PQM_P5E_R |
_RL mloc(-3:+2) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
37 |
GAD_PQM_P5E_R |
mloc(-1) = mask(ir-1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
38 |
GAD_PQM_P5E_R |
mloc(+0) = mask(ir+0) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
41 |
GAD_PQM_P5E_R |
& + mloc(-1)*(fbar(ir-1)-fbar(ir+0)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
43 |
GAD_PQM_P5E_R |
& + mloc(+0)*(fbar(ir+0)-fbar(ir-1)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
45 |
GAD_PQM_P5E_R |
mloc(-2) = mask(ir-2) * mloc(-1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
46 |
GAD_PQM_P5E_R |
mloc(-3) = mask(ir-3) * mloc(-2) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
50 |
GAD_PQM_P5E_R |
& + mloc(-2)*(fbar(ir-2)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
53 |
GAD_PQM_P5E_R |
& + mloc(-3)*(fbar(ir-3)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
55 |
GAD_PQM_P5E_R |
mloc(+1) = mask(ir+1) * mloc(+0) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
56 |
GAD_PQM_P5E_R |
mloc(+2) = mask(ir+2) * mloc(+1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
60 |
GAD_PQM_P5E_R |
& + mloc(+1)*(fbar(ir+1)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
63 |
GAD_PQM_P5E_R |
& + mloc(+2)*(fbar(ir+2)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
30 |
GAD_PQM_P5E_X |
_RL mloc(-3:+2) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
37 |
GAD_PQM_P5E_X |
mloc(-1) = mask(ix-1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
38 |
GAD_PQM_P5E_X |
mloc(+0) = mask(ix+0) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
41 |
GAD_PQM_P5E_X |
& + mloc(-1)*(fbar(ix-1)-fbar(ix+0)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
43 |
GAD_PQM_P5E_X |
& + mloc(+0)*(fbar(ix+0)-fbar(ix-1)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
45 |
GAD_PQM_P5E_X |
mloc(-2) = mask(ix-2) * mloc(-1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
46 |
GAD_PQM_P5E_X |
mloc(-3) = mask(ix-3) * mloc(-2) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
50 |
GAD_PQM_P5E_X |
& + mloc(-2)*(fbar(ix-2)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
53 |
GAD_PQM_P5E_X |
& + mloc(-3)*(fbar(ix-3)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
55 |
GAD_PQM_P5E_X |
mloc(+1) = mask(ix+1) * mloc(+0) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
56 |
GAD_PQM_P5E_X |
mloc(+2) = mask(ix+2) * mloc(+1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
60 |
GAD_PQM_P5E_X |
& + mloc(+1)*(fbar(ix+1)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
63 |
GAD_PQM_P5E_X |
& + mloc(+2)*(fbar(ix+2)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
30 |
GAD_PQM_P5E_Y |
_RL mloc(-3:+2) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
38 |
GAD_PQM_P5E_Y |
mloc(-1) = mask(iy-1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
39 |
GAD_PQM_P5E_Y |
mloc(+0) = mask(iy+0) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
42 |
GAD_PQM_P5E_Y |
& + mloc(-1)*(fbar(iy-1)-fbar(iy+0)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
44 |
GAD_PQM_P5E_Y |
& + mloc(+0)*(fbar(iy+0)-fbar(iy-1)) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
46 |
GAD_PQM_P5E_Y |
mloc(-2) = mask(iy-2) * mloc(-1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
47 |
GAD_PQM_P5E_Y |
mloc(-3) = mask(iy-3) * mloc(-2) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
51 |
GAD_PQM_P5E_Y |
& + mloc(-2)*(fbar(iy-2)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
54 |
GAD_PQM_P5E_Y |
& + mloc(-3)*(fbar(iy-3)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
56 |
GAD_PQM_P5E_Y |
mloc(+1) = mask(iy+1) * mloc(+0) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
57 |
GAD_PQM_P5E_Y |
mloc(+2) = mask(iy+2) * mloc(+1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
61 |
GAD_PQM_P5E_Y |
& + mloc(+1)*(fbar(iy+1)-ftmp) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
64 |
GAD_PQM_P5E_Y |
& + mloc(+2)*(fbar(iy+2)-ftmp) |