| File |
Line number |
Procedure |
Code |
|
./pkg/exch2/w2_print_e2setup.F |
140 |
W2_PRINT_E2SETUP |
& ' ', edge(i), '.Edge Facet', j, ' <-- ', |
|
./pkg/exch2/w2_print_e2setup.F |
141 |
W2_PRINT_E2SETUP |
& edge(ii), '.Edge Facet', jt, |
|
./pkg/exch2/w2_print_e2setup.F |
38 |
W2_PRINT_E2SETUP |
CHARACTER*1 edge(0:4) |
|
./pkg/exch2/w2_print_e2setup.F |
45 |
W2_PRINT_E2SETUP |
DATA edge / '?' , 'N' , 'S' , 'E' , 'W' / |
|
./pkg/exch2/w2_print_e2setup.F |
83 |
W2_PRINT_E2SETUP |
& ' ', edge(i), '.Edge Facet', j, ' <-- ', |
|
./pkg/exch2/w2_print_e2setup.F |
84 |
W2_PRINT_E2SETUP |
& edge(ii), '.Edge Facet', jt, |
|
./pkg/exch2/w2_set_cs6_facets.F |
158 |
W2_SET_CS6_FACETS |
& ' facet',j,'.',edge(i), ' set dim', lo, ' = dim', ll, |
|
./pkg/exch2/w2_set_cs6_facets.F |
159 |
W2_SET_CS6_FACETS |
& ' from',jj,'.',edge(ii),' :',facet_dims(ll) |
|
./pkg/exch2/w2_set_cs6_facets.F |
39 |
W2_SET_CS6_FACETS |
CHARACTER*1 edge(4) |
|
./pkg/exch2/w2_set_cs6_facets.F |
46 |
W2_SET_CS6_FACETS |
DATA edge / 'N' , 'S' , 'E' , 'W' / |
|
./pkg/exch2/w2_set_f2f_index.F |
115 |
W2_SET_F2F_INDEX |
& edge(i), '.Edge facet #', j, ' (=',lo,')' |
|
./pkg/exch2/w2_set_f2f_index.F |
118 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge facet #', jj, ' (=',ll,') are different' |
|
./pkg/exch2/w2_set_f2f_index.F |
190 |
W2_SET_F2F_INDEX |
& edge(i), '.Edge (facet#', j, ' ) to: ', |
|
./pkg/exch2/w2_set_f2f_index.F |
191 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge (facet#', jj,' )' |
|
./pkg/exch2/w2_set_f2f_index.F |
200 |
W2_SET_F2F_INDEX |
& ' ', edge(i), '.Edge Facet', j, ' <-- ', |
|
./pkg/exch2/w2_set_f2f_index.F |
201 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge Facet', jj, |
|
./pkg/exch2/w2_set_f2f_index.F |
250 |
W2_SET_F2F_INDEX |
& edge(i), '.Edge (facet#', j, ' ) to: ', |
|
./pkg/exch2/w2_set_f2f_index.F |
251 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge (facet#', jj,' )' |
|
./pkg/exch2/w2_set_f2f_index.F |
36 |
W2_SET_F2F_INDEX |
CHARACTER*1 edge(4) |
|
./pkg/exch2/w2_set_f2f_index.F |
42 |
W2_SET_F2F_INDEX |
DATA edge / 'N' , 'S' , 'E' , 'W' / |
|
./pkg/exch2/w2_set_f2f_index.F |
59 |
W2_SET_F2F_INDEX |
& '** WARNING ** ', edge(i), '.Edge of facet #', |
|
./pkg/exch2/w2_set_f2f_index.F |
65 |
W2_SET_F2F_INDEX |
WRITE(msgBuf,'(2A,I3,A,F6.2,A)') edge(i), '.Edge of facet #', |
|
./pkg/exch2/w2_set_f2f_index.F |
75 |
W2_SET_F2F_INDEX |
& edge(i), '.Edge facet #', j,' connect to: ', |
|
./pkg/exch2/w2_set_f2f_index.F |
76 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge facet #',jj,' (',facet_link(i,j),' )' |
|
./pkg/exch2/w2_set_f2f_index.F |
80 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge facet #',jj,' connect to: ', |
|
./pkg/exch2/w2_set_f2f_index.F |
81 |
W2_SET_F2F_INDEX |
& edge(i1),'.Edge facet #',j1,' (',facet_link(ii,jj),' )' |
|
./pkg/exch2/w2_set_f2f_index.F |
84 |
W2_SET_F2F_INDEX |
& edge(ii),'.Edge facet #',jj,' connect to: ', |
|
./pkg/exch2/w2_set_gen_facets.F |
120 |
W2_SET_GEN_FACETS |
& 'Link for ',edge(i), '.Edge of facet #',j, |
|
./pkg/exch2/w2_set_gen_facets.F |
37 |
W2_SET_GEN_FACETS |
CHARACTER*1 edge(4) |
|
./pkg/exch2/w2_set_gen_facets.F |
41 |
W2_SET_GEN_FACETS |
DATA edge / 'N' , 'S' , 'E' , 'W' / |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
134 |
GAD_PPM_ADV_R |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
140 |
GAD_PPM_ADV_R |
& edge,ohat, |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
65 |
GAD_PPM_ADV_R |
_RL edge( 1-0:Nr+1) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
121 |
GAD_PPM_ADV_X |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
127 |
GAD_PPM_ADV_X |
& edge,ohat, |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
65 |
GAD_PPM_ADV_X |
_RL edge(1-OLx:sNx+OLx) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
121 |
GAD_PPM_ADV_Y |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
127 |
GAD_PPM_ADV_Y |
& edge,ohat, |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
65 |
GAD_PPM_ADV_Y |
_RL edge(1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
38 |
GAD_PPM_HAT_R |
_RL edge(1-0:Nr+1) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
75 |
GAD_PPM_HAT_R |
fell = edge(ir-0) |
|
./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 |
7 |
GAD_PPM_HAT_R |
& method,mask,fbar,edge, |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
39 |
GAD_PPM_HAT_X |
_RL edge(1-OLx:sNx+OLx) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
76 |
GAD_PPM_HAT_X |
fell = edge(ix-0) |
|
./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 |
7 |
GAD_PPM_HAT_X |
& method,mask,fbar,edge, |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
39 |
GAD_PPM_HAT_Y |
_RL edge(1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
77 |
GAD_PPM_HAT_Y |
fell = edge(iy-0) |
|
./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 |
7 |
GAD_PPM_HAT_Y |
I method,mask,fbar,edge, |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
24 |
GAD_PPM_P3E_R |
_RL edge(1-0:Nr+1) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
57 |
GAD_PPM_P3E_R |
edge(ir) = |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
7 |
GAD_PPM_P3E_R |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
24 |
GAD_PPM_P3E_X |
_RL edge(1-OLx:sNx+OLx) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
57 |
GAD_PPM_P3E_X |
edge(ix) = |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
7 |
GAD_PPM_P3E_X |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
24 |
GAD_PPM_P3E_Y |
_RL edge(1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
58 |
GAD_PPM_P3E_Y |
edge(iy) = |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
7 |
GAD_PPM_P3E_Y |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
131 |
GAD_PQM_ADV_R |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
137 |
GAD_PQM_ADV_R |
& edge,ohat, |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
65 |
GAD_PQM_ADV_R |
_RL edge(1:2,1-0:Nr+1) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
119 |
GAD_PQM_ADV_X |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
125 |
GAD_PQM_ADV_X |
& edge,ohat, |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
65 |
GAD_PQM_ADV_X |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
119 |
GAD_PQM_ADV_Y |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
125 |
GAD_PQM_ADV_Y |
& edge,ohat, |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
65 |
GAD_PQM_ADV_Y |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
41 |
GAD_PQM_HAT_R |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
7 |
GAD_PQM_HAT_R |
& method,mask,fbar,edge, |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
87 |
GAD_PQM_HAT_R |
fell = edge(+1,ir-0) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
88 |
GAD_PQM_HAT_R |
ferr = edge(+1,ir+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
90 |
GAD_PQM_HAT_R |
dell = edge(+2,ir-0) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
91 |
GAD_PQM_HAT_R |
derr = edge(+2,ir+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
41 |
GAD_PQM_HAT_X |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
7 |
GAD_PQM_HAT_X |
& method,mask,fbar,edge, |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
89 |
GAD_PQM_HAT_X |
fell = edge(+1,ix-0) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
90 |
GAD_PQM_HAT_X |
ferr = edge(+1,ix+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
92 |
GAD_PQM_HAT_X |
dell = edge(+2,ix-0) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
93 |
GAD_PQM_HAT_X |
derr = edge(+2,ix+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
41 |
GAD_PQM_HAT_Y |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
7 |
GAD_PQM_HAT_Y |
& method,mask,fbar,edge, |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
90 |
GAD_PQM_HAT_Y |
fell = edge(+1,iy-0) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
91 |
GAD_PQM_HAT_Y |
ferr = edge(+1,iy+1) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
93 |
GAD_PQM_HAT_Y |
dell = edge(+2,iy-0) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
94 |
GAD_PQM_HAT_Y |
derr = edge(+2,iy+1) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
24 |
GAD_PQM_P5E_R |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
66 |
GAD_PQM_P5E_R |
edge(1,ir) = |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
71 |
GAD_PQM_P5E_R |
edge(2,ir) = ( |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
7 |
GAD_PQM_P5E_R |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
24 |
GAD_PQM_P5E_X |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
66 |
GAD_PQM_P5E_X |
edge(1,ix) = |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
71 |
GAD_PQM_P5E_X |
edge(2,ix) = ( |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
7 |
GAD_PQM_P5E_X |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
24 |
GAD_PQM_P5E_Y |
_RL edge(1:2, |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
67 |
GAD_PQM_P5E_Y |
edge(1,iy) = |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
72 |
GAD_PQM_P5E_Y |
edge(2,iy) = ( |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
7 |
GAD_PQM_P5E_Y |
& mask,fbar,edge,myThid) |