File |
Line number |
Procedure |
Code |
./pkg/exch2/W2_EXCH2_TOPOLOGY.h |
122 |
NO PROCEDURE |
INTEGER exch2_iHi( W2_maxNeighbours, W2_maxNbTiles ) |
./pkg/exch2/W2_EXCH2_TOPOLOGY.h |
126 |
NO PROCEDURE |
& exch2_iLo, exch2_iHi, |
./pkg/exch2/exch2_check_depths.F |
78 |
EXCH2_CHECK_DEPTHS |
DO i=exch2_iLo(n,tId),exch2_iHi(n,tId) |
./pkg/exch2/exch2_get_scal_bounds.F |
56 |
EXCH2_GET_SCAL_BOUNDS |
tIhi = exch2_iHi(tgNb,tgTile) |
./pkg/exch2/exch2_get_uv_bounds.F |
75 |
EXCH2_GET_UV_BOUNDS |
tIhi = exch2_iHi(tgNb,tgTile) |
./pkg/exch2/w2_eeboot.F |
71 |
W2_EEBOOT |
exch2_iHi(J,I) = 0 |
./pkg/exch2/w2_print_e2setup.F |
112 |
W2_PRINT_E2SETUP |
& .AND. exch2_iHi(ns,is).EQ.(tNx+1) ) THEN |
./pkg/exch2/w2_print_e2setup.F |
118 |
W2_PRINT_E2SETUP |
& .AND. exch2_iHi(ns,is).EQ. 0 ) THEN |
./pkg/exch2/w2_print_e2setup.F |
137 |
W2_PRINT_E2SETUP |
IF ( exch2_iLo(nt,it).EQ.exch2_iHi(nt,it) ) |
./pkg/exch2/w2_print_e2setup.F |
138 |
W2_PRINT_E2SETUP |
& ii = 4 - MIN(1,exch2_iHi(nt,it)) |
./pkg/exch2/w2_print_e2setup.F |
214 |
W2_PRINT_E2SETUP |
& ', iLo,iHi=', exch2_iLo(ns,is), exch2_iHi(ns,is), |
./pkg/exch2/w2_print_e2setup.F |
80 |
W2_PRINT_E2SETUP |
IF ( exch2_iLo(nt,it).EQ.exch2_iHi(nt,it) ) |
./pkg/exch2/w2_print_e2setup.F |
81 |
W2_PRINT_E2SETUP |
& ii = 4 - MIN(1,exch2_iHi(nt,it)) |
./pkg/exch2/w2_set_tile2tiles.F |
140 |
W2_SET_TILE2TILES |
exch2_iHi(ns,is) = ii2 + ddi - exch2_tBasex(is) |
./pkg/exch2/w2_set_tile2tiles.F |
209 |
W2_SET_TILE2TILES |
exch2_iHi(ns,is) = isbd2 + ddi - exch2_tBasex(is) |
./pkg/exch2/w2_set_tile2tiles.F |
232 |
W2_SET_TILE2TILES |
& ', iLo,iHi=', exch2_iLo(ns,is), exch2_iHi(ns,is), |