| File |
Line number |
Procedure |
Code |
|
./pkg/exch2/w2_print_comm_sequence.F |
104 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .LE. targetIhi ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
106 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi+OLx-1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
110 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi-OLx+1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
116 |
W2_PRINT_COMM_SEQUENCE |
sourceIhi=pi(1)*targetIhi+pi(2)*targetJhi+oi |
|
./pkg/exch2/w2_print_comm_sequence.F |
117 |
W2_PRINT_COMM_SEQUENCE |
sourceJhi=pj(1)*targetIhi+pj(2)*targetJhi+oj |
|
./pkg/exch2/w2_print_comm_sequence.F |
132 |
W2_PRINT_COMM_SEQUENCE |
& ':',targetIhi, |
|
./pkg/exch2/w2_print_comm_sequence.F |
154 |
W2_PRINT_COMM_SEQUENCE |
targetIhi =exch2_ithi_c(tN,targetTile) |
|
./pkg/exch2/w2_print_comm_sequence.F |
157 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .EQ. targetIhi .AND. targetIlo .EQ. 0 ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
160 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=0 |
|
./pkg/exch2/w2_print_comm_sequence.F |
172 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .EQ. targetIhi .AND. targetIlo .GT. 1 ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
174 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi+OLx-1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
191 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .LE. targetIhi ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
193 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi+OLx-1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
197 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi-OLx+1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
205 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .LE. targetIhi ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
207 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi+OLx-1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
211 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi-OLx+1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
221 |
W2_PRINT_COMM_SEQUENCE |
& ':',targetIhi, |
|
./pkg/exch2/w2_print_comm_sequence.F |
30 |
W2_PRINT_COMM_SEQUENCE |
INTEGER targetIlo, targetIhi, targetJlo, targetJhi |
|
./pkg/exch2/w2_print_comm_sequence.F |
47 |
W2_PRINT_COMM_SEQUENCE |
targetIhi =exch2_ithi_c(N,myTileId) |
|
./pkg/exch2/w2_print_comm_sequence.F |
56 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .EQ. targetIhi .AND. targetIlo .EQ. 0 ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
59 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=0 |
|
./pkg/exch2/w2_print_comm_sequence.F |
71 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .EQ. targetIhi .AND. targetIlo .GT. 1 ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
73 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi+OLx-1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
90 |
W2_PRINT_COMM_SEQUENCE |
IF ( targetIlo .LE. targetIhi ) THEN |
|
./pkg/exch2/w2_print_comm_sequence.F |
92 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi+OLx-1 |
|
./pkg/exch2/w2_print_comm_sequence.F |
96 |
W2_PRINT_COMM_SEQUENCE |
targetIhi=targetIhi-OLx+1 |