| File |
Line number |
Procedure |
Code |
|
./pkg/exch2/w2_eeboot.F |
152 |
W2_EEBOOT |
myTileId = W2_myTileList(bi,bj) |
|
./pkg/exch2/w2_eeboot.F |
153 |
W2_EEBOOT |
tNx = exch2_tNx(myTileId) |
|
./pkg/exch2/w2_eeboot.F |
154 |
W2_EEBOOT |
tNy = exch2_tNy(myTileId) |
|
./pkg/exch2/w2_eeboot.F |
157 |
W2_EEBOOT |
& 'ERROR: S/R W2_EEBOOT Topology for tile', myTileId, |
|
./pkg/exch2/w2_eeboot.F |
165 |
W2_EEBOOT |
& 'ERROR: S/R W2_EEBOOT Topology for tile', myTileId, |
|
./pkg/exch2/w2_eeboot.F |
182 |
W2_EEBOOT |
myTileId = W2_myTileList(bi,bj) |
|
./pkg/exch2/w2_eeboot.F |
184 |
W2_EEBOOT |
WRITE(msgBuf,'(A,I5,A,I3)') ' TILE: ', myTileId, |
|
./pkg/exch2/w2_eeboot.F |
185 |
W2_EEBOOT |
& ' , Nb of Neighbours =', exch2_nNeighbours(myTileId) |
|
./pkg/exch2/w2_eeboot.F |
187 |
W2_EEBOOT |
DO J=1,exch2_nNeighbours(myTileId) |
|
./pkg/exch2/w2_eeboot.F |
191 |
W2_EEBOOT |
IF ( W2_myTileList(ii,jj).EQ.exch2_neighbourId(J,myTileId) ) |
|
./pkg/exch2/w2_eeboot.F |
197 |
W2_EEBOOT |
& ' NEIGHBOUR',J,' = TILE', exch2_neighbourId(J,myTileId), |
|
./pkg/exch2/w2_eeboot.F |
198 |
W2_EEBOOT |
& ' (n=', exch2_opposingSend(J,myTileId), ') Comm = MSG', |
|
./pkg/exch2/w2_eeboot.F |
199 |
W2_EEBOOT |
& ' (PROC=',exch2_tProc(exch2_neighbourId(J,myTileId)),')' |
|
./pkg/exch2/w2_eeboot.F |
204 |
W2_EEBOOT |
& ' NEIGHBOUR',J,' = TILE', exch2_neighbourId(J,myTileId), |
|
./pkg/exch2/w2_eeboot.F |
205 |
W2_EEBOOT |
& ' (n=', exch2_opposingSend(J,myTileId), ') Comm = PUT', |
|
./pkg/exch2/w2_eeboot.F |
206 |
W2_EEBOOT |
& ' (PROC=',exch2_tProc(exch2_neighbourId(J,myTileId)),')' |
|
./pkg/exch2/w2_eeboot.F |
44 |
W2_EEBOOT |
INTEGER myTileId |
|
./pkg/exch2/w2_print_comm_sequence.F |
124 |
W2_PRINT_COMM_SEQUENCE |
myTileId=W2_myTileList(bi,bj) |
|
./pkg/exch2/w2_print_comm_sequence.F |
125 |
W2_PRINT_COMM_SEQUENCE |
nN=exch2_nNeighbours(myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
126 |
W2_PRINT_COMM_SEQUENCE |
sourceProc=exch2_tProc(myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
128 |
W2_PRINT_COMM_SEQUENCE |
targetTile=exch2_neighbourId(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
131 |
W2_PRINT_COMM_SEQUENCE |
tN=exch2_opposingSend(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
135 |
W2_PRINT_COMM_SEQUENCE |
I myTileId, N, |
|
./pkg/exch2/w2_print_comm_sequence.F |
141 |
W2_PRINT_COMM_SEQUENCE |
& 'Tile', myTileId,' (pr=',sourceProc,')', |
|
./pkg/exch2/w2_print_comm_sequence.F |
49 |
W2_PRINT_COMM_SEQUENCE |
INTEGER myTileId, nN |
|
./pkg/exch2/w2_print_comm_sequence.F |
68 |
W2_PRINT_COMM_SEQUENCE |
myTileId=W2_myTileList(bi,bj) |
|
./pkg/exch2/w2_print_comm_sequence.F |
69 |
W2_PRINT_COMM_SEQUENCE |
nN=exch2_nNeighbours(myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
70 |
W2_PRINT_COMM_SEQUENCE |
sourceProc=exch2_tProc(myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
72 |
W2_PRINT_COMM_SEQUENCE |
targetTile=exch2_neighbourId(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
74 |
W2_PRINT_COMM_SEQUENCE |
tN = exch2_opposingSend(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
75 |
W2_PRINT_COMM_SEQUENCE |
pi(1) =exch2_pij(1,N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
76 |
W2_PRINT_COMM_SEQUENCE |
pi(2) =exch2_pij(2,N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
77 |
W2_PRINT_COMM_SEQUENCE |
pj(1) =exch2_pij(3,N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
78 |
W2_PRINT_COMM_SEQUENCE |
pj(2) =exch2_pij(4,N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
79 |
W2_PRINT_COMM_SEQUENCE |
oi =exch2_oi(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
80 |
W2_PRINT_COMM_SEQUENCE |
oj =exch2_oj(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
90 |
W2_PRINT_COMM_SEQUENCE |
isb = exch2_tBasex(myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
91 |
W2_PRINT_COMM_SEQUENCE |
jsb = exch2_tBasey(myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
98 |
W2_PRINT_COMM_SEQUENCE |
& 'Tile', myTileId,' (pr=',sourceProc,')', |