| File |
Line number |
Procedure |
Code |
|
./pkg/exch2/W2_EXCH2_PARAMS.h |
74 |
NO PROCEDURE |
INTEGER facet_oi(4,W2_maxNbFacets) |
|
./pkg/exch2/W2_EXCH2_PARAMS.h |
78 |
NO PROCEDURE |
& facet_pij, facet_oi, facet_oj |
|
./pkg/exch2/w2_e2setup.F |
58 |
W2_E2SETUP |
facet_oi(i,j) = 0 |
|
./pkg/exch2/w2_set_f2f_index.F |
137 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = 0 |
|
./pkg/exch2/w2_set_f2f_index.F |
141 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = 0 |
|
./pkg/exch2/w2_set_f2f_index.F |
145 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = +facet_dims(2*j-1) |
|
./pkg/exch2/w2_set_f2f_index.F |
149 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = -facet_dims(2*jj-1) |
|
./pkg/exch2/w2_set_f2f_index.F |
159 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = lo+1 |
|
./pkg/exch2/w2_set_f2f_index.F |
168 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = lo+1 |
|
./pkg/exch2/w2_set_f2f_index.F |
177 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = +facet_dims(2*j-1) |
|
./pkg/exch2/w2_set_f2f_index.F |
186 |
W2_SET_F2F_INDEX |
facet_oi(i,j) = -facet_dims(2*jj) |
|
./pkg/exch2/w2_set_f2f_index.F |
203 |
W2_SET_F2F_INDEX |
& ' ; oi,oj=', facet_oi(i,j), facet_oj(i,j) |
|
./pkg/exch2/w2_set_f2f_index.F |
241 |
W2_SET_F2F_INDEX |
chk5 = facet_pij(1,i,j)*facet_oi(ii,jj) |
|
./pkg/exch2/w2_set_f2f_index.F |
243 |
W2_SET_F2F_INDEX |
& + facet_oi(i,j) |
|
./pkg/exch2/w2_set_f2f_index.F |
244 |
W2_SET_F2F_INDEX |
chk6 = facet_pij(3,i,j)*facet_oi(ii,jj) |
|
./pkg/exch2/w2_set_tile2tiles.F |
154 |
W2_SET_TILE2TILES |
& + facet_pij(2,ii,jt)*jj1 + facet_oi(ii,jt) |
|
./pkg/exch2/w2_set_tile2tiles.F |
156 |
W2_SET_TILE2TILES |
& + facet_pij(2,ii,jt)*jj2 + facet_oi(ii,jt) |
|
./pkg/exch2/w2_set_tile2tiles.F |
189 |
W2_SET_TILE2TILES |
exch2_oi(ns,is) = facet_oi(i,js) |
|
./pkg/exch2/w2_set_tile2tiles.F |
201 |
W2_SET_TILE2TILES |
& + facet_pij(2,i,js)*jtbd1 + facet_oi(i,js) |
|
./pkg/exch2/w2_set_tile2tiles.F |
203 |
W2_SET_TILE2TILES |
& + facet_pij(2,i,js)*jtbd2 + facet_oi(i,js) |