C *** THIS FILE IS AUTOMATICALLY GENERATED *** SUBROUTINE W2_E2SETUP C Tile toplogy settings data structures #include "W2_EXCH2_TOPOLOGY.h" C Tile settings table CALL W2_E2SETUP_1 CALL W2_E2SETUP_2 CALL W2_E2SETUP_3 CALL W2_E2SETUP_4 CALL W2_E2SETUP_5 CALL W2_E2SETUP_6 CALL W2_E2SETUP_7 CALL W2_E2SETUP_8 CALL W2_E2SETUP_9 CALL W2_E2SETUP_10 CALL W2_E2SETUP_11 CALL W2_E2SETUP_12 CALL W2_E2SETUP_13 CALL W2_E2SETUP_14 CALL W2_E2SETUP_15 CALL W2_E2SETUP_16 CALL W2_E2SETUP_17 CALL W2_E2SETUP_18 CALL W2_E2SETUP_19 CALL W2_E2SETUP_20 CALL W2_E2SETUP_21 CALL W2_E2SETUP_22 CALL W2_E2SETUP_23 CALL W2_E2SETUP_24 CALL W2_E2SETUP_25 CALL W2_E2SETUP_26 CALL W2_E2SETUP_27 CALL W2_E2SETUP_28 CALL W2_E2SETUP_29 CALL W2_E2SETUP_30 CALL W2_E2SETUP_31 CALL W2_E2SETUP_32 CALL W2_E2SETUP_33 CALL W2_E2SETUP_34 CALL W2_E2SETUP_35 CALL W2_E2SETUP_36 CALL W2_E2SETUP_37 CALL W2_E2SETUP_38 CALL W2_E2SETUP_39 CALL W2_E2SETUP_40 CALL W2_E2SETUP_41 CALL W2_E2SETUP_42 CALL W2_E2SETUP_43 CALL W2_E2SETUP_44 CALL W2_E2SETUP_45 CALL W2_E2SETUP_46 CALL W2_E2SETUP_47 CALL W2_E2SETUP_48 CALL W2_E2SETUP_49 CALL W2_E2SETUP_50 CALL W2_E2SETUP_51 CALL W2_E2SETUP_52 CALL W2_E2SETUP_53 CALL W2_E2SETUP_54 CALL W2_E2SETUP_55 CALL W2_E2SETUP_56 CALL W2_E2SETUP_57 CALL W2_E2SETUP_58 CALL W2_E2SETUP_59 CALL W2_E2SETUP_60 CALL W2_E2SETUP_61 CALL W2_E2SETUP_62 CALL W2_E2SETUP_63 CALL W2_E2SETUP_64 CALL W2_E2SETUP_65 CALL W2_E2SETUP_66 CALL W2_E2SETUP_67 CALL W2_E2SETUP_68 CALL W2_E2SETUP_69 CALL W2_E2SETUP_70 CALL W2_E2SETUP_71 CALL W2_E2SETUP_72 CALL W2_E2SETUP_73 CALL W2_E2SETUP_74 CALL W2_E2SETUP_75 CALL W2_E2SETUP_76 CALL W2_E2SETUP_77 CALL W2_E2SETUP_78 CALL W2_E2SETUP_79 CALL W2_E2SETUP_80 CALL W2_E2SETUP_81 CALL W2_E2SETUP_82 CALL W2_E2SETUP_83 CALL W2_E2SETUP_84 CALL W2_E2SETUP_85 CALL W2_E2SETUP_86 CALL W2_E2SETUP_87 CALL W2_E2SETUP_88 CALL W2_E2SETUP_89 CALL W2_E2SETUP_90 CALL W2_E2SETUP_91 CALL W2_E2SETUP_92 CALL W2_E2SETUP_93 CALL W2_E2SETUP_94 CALL W2_E2SETUP_95 CALL W2_E2SETUP_96 CALL W2_E2SETUP_97 CALL W2_E2SETUP_98 CALL W2_E2SETUP_99 CALL W2_E2SETUP_100 CALL W2_E2SETUP_101 CALL W2_E2SETUP_102 CALL W2_E2SETUP_103 CALL W2_E2SETUP_104 CALL W2_E2SETUP_105 CALL W2_E2SETUP_106 CALL W2_E2SETUP_107 CALL W2_E2SETUP_108 CALL W2_E2SETUP_109 CALL W2_E2SETUP_110 CALL W2_E2SETUP_111 CALL W2_E2SETUP_112 CALL W2_E2SETUP_113 CALL W2_E2SETUP_114 CALL W2_E2SETUP_115 CALL W2_E2SETUP_116 CALL W2_E2SETUP_117 CALL W2_E2SETUP_118 CALL W2_E2SETUP_119 CALL W2_E2SETUP_120 CALL W2_E2SETUP_121 CALL W2_E2SETUP_122 CALL W2_E2SETUP_123 CALL W2_E2SETUP_124 CALL W2_E2SETUP_125 CALL W2_E2SETUP_126 CALL W2_E2SETUP_127 CALL W2_E2SETUP_128 CALL W2_E2SETUP_129 CALL W2_E2SETUP_130 CALL W2_E2SETUP_131 CALL W2_E2SETUP_132 CALL W2_E2SETUP_133 CALL W2_E2SETUP_134 CALL W2_E2SETUP_135 CALL W2_E2SETUP_136 CALL W2_E2SETUP_137 CALL W2_E2SETUP_138 CALL W2_E2SETUP_139 CALL W2_E2SETUP_140 CALL W2_E2SETUP_141 CALL W2_E2SETUP_142 CALL W2_E2SETUP_143 CALL W2_E2SETUP_144 CALL W2_E2SETUP_145 CALL W2_E2SETUP_146 CALL W2_E2SETUP_147 CALL W2_E2SETUP_148 CALL W2_E2SETUP_149 CALL W2_E2SETUP_150 CALL W2_E2SETUP_151 CALL W2_E2SETUP_152 CALL W2_E2SETUP_153 CALL W2_E2SETUP_154 CALL W2_E2SETUP_155 CALL W2_E2SETUP_156 CALL W2_E2SETUP_157 CALL W2_E2SETUP_158 CALL W2_E2SETUP_159 CALL W2_E2SETUP_160 CALL W2_E2SETUP_161 CALL W2_E2SETUP_162 CALL W2_E2SETUP_163 CALL W2_E2SETUP_164 CALL W2_E2SETUP_165 CALL W2_E2SETUP_166 CALL W2_E2SETUP_167 CALL W2_E2SETUP_168 CALL W2_E2SETUP_169 CALL W2_E2SETUP_170 CALL W2_E2SETUP_171 CALL W2_E2SETUP_172 CALL W2_E2SETUP_173 CALL W2_E2SETUP_174 CALL W2_E2SETUP_175 CALL W2_E2SETUP_176 CALL W2_E2SETUP_177 CALL W2_E2SETUP_178 CALL W2_E2SETUP_179 CALL W2_E2SETUP_180 CALL W2_E2SETUP_181 CALL W2_E2SETUP_182 CALL W2_E2SETUP_183 CALL W2_E2SETUP_184 CALL W2_E2SETUP_185 CALL W2_E2SETUP_186 CALL W2_E2SETUP_187 CALL W2_E2SETUP_188 CALL W2_E2SETUP_189 CALL W2_E2SETUP_190 CALL W2_E2SETUP_191 CALL W2_E2SETUP_192 CALL W2_E2SETUP_193 CALL W2_E2SETUP_194 CALL W2_E2SETUP_195 CALL W2_E2SETUP_196 CALL W2_E2SETUP_197 CALL W2_E2SETUP_198 CALL W2_E2SETUP_199 CALL W2_E2SETUP_200 CALL W2_E2SETUP_201 CALL W2_E2SETUP_202 CALL W2_E2SETUP_203 CALL W2_E2SETUP_204 CALL W2_E2SETUP_205 CALL W2_E2SETUP_206 CALL W2_E2SETUP_207 CALL W2_E2SETUP_208 CALL W2_E2SETUP_209 CALL W2_E2SETUP_210 CALL W2_E2SETUP_211 CALL W2_E2SETUP_212 CALL W2_E2SETUP_213 CALL W2_E2SETUP_214 CALL W2_E2SETUP_215 CALL W2_E2SETUP_216 CALL W2_E2SETUP_217 CALL W2_E2SETUP_218 CALL W2_E2SETUP_219 CALL W2_E2SETUP_220 CALL W2_E2SETUP_221 CALL W2_E2SETUP_222 CALL W2_E2SETUP_223 CALL W2_E2SETUP_224 CALL W2_E2SETUP_225 CALL W2_E2SETUP_226 CALL W2_E2SETUP_227 CALL W2_E2SETUP_228 CALL W2_E2SETUP_229 CALL W2_E2SETUP_230 CALL W2_E2SETUP_231 CALL W2_E2SETUP_232 CALL W2_E2SETUP_233 CALL W2_E2SETUP_234 CALL W2_E2SETUP_235 CALL W2_E2SETUP_236 CALL W2_E2SETUP_237 CALL W2_E2SETUP_238 CALL W2_E2SETUP_239 CALL W2_E2SETUP_240 CALL W2_E2SETUP_241 CALL W2_E2SETUP_242 CALL W2_E2SETUP_243 CALL W2_E2SETUP_244 CALL W2_E2SETUP_245 CALL W2_E2SETUP_246 CALL W2_E2SETUP_247 CALL W2_E2SETUP_248 CALL W2_E2SETUP_249 CALL W2_E2SETUP_250 CALL W2_E2SETUP_251 CALL W2_E2SETUP_252 CALL W2_E2SETUP_253 CALL W2_E2SETUP_254 CALL W2_E2SETUP_255 CALL W2_E2SETUP_256 CALL W2_E2SETUP_257 CALL W2_E2SETUP_258 CALL W2_E2SETUP_259 CALL W2_E2SETUP_260 CALL W2_E2SETUP_261 CALL W2_E2SETUP_262 CALL W2_E2SETUP_263 CALL W2_E2SETUP_264 CALL W2_E2SETUP_265 CALL W2_E2SETUP_266 CALL W2_E2SETUP_267 CALL W2_E2SETUP_268 CALL W2_E2SETUP_269 CALL W2_E2SETUP_270 CALL W2_E2SETUP_271 CALL W2_E2SETUP_272 CALL W2_E2SETUP_273 CALL W2_E2SETUP_274 CALL W2_E2SETUP_275 CALL W2_E2SETUP_276 CALL W2_E2SETUP_277 CALL W2_E2SETUP_278 CALL W2_E2SETUP_279 CALL W2_E2SETUP_280 CALL W2_E2SETUP_281 CALL W2_E2SETUP_282 CALL W2_E2SETUP_283 CALL W2_E2SETUP_284 CALL W2_E2SETUP_285 CALL W2_E2SETUP_286 CALL W2_E2SETUP_287 CALL W2_E2SETUP_288 CALL W2_E2SETUP_289 CALL W2_E2SETUP_290 CALL W2_E2SETUP_291 CALL W2_E2SETUP_292 CALL W2_E2SETUP_293 CALL W2_E2SETUP_294 CALL W2_E2SETUP_295 CALL W2_E2SETUP_296 CALL W2_E2SETUP_297 CALL W2_E2SETUP_298 CALL W2_E2SETUP_299 CALL W2_E2SETUP_300 CALL W2_E2SETUP_301 CALL W2_E2SETUP_302 CALL W2_E2SETUP_303 CALL W2_E2SETUP_304 CALL W2_E2SETUP_305 CALL W2_E2SETUP_306 CALL W2_E2SETUP_307 CALL W2_E2SETUP_308 CALL W2_E2SETUP_309 CALL W2_E2SETUP_310 CALL W2_E2SETUP_311 CALL W2_E2SETUP_312 CALL W2_E2SETUP_313 CALL W2_E2SETUP_314 CALL W2_E2SETUP_315 CALL W2_E2SETUP_316 CALL W2_E2SETUP_317 CALL W2_E2SETUP_318 CALL W2_E2SETUP_319 CALL W2_E2SETUP_320 CALL W2_E2SETUP_321 CALL W2_E2SETUP_322 CALL W2_E2SETUP_323 CALL W2_E2SETUP_324 CALL W2_E2SETUP_325 CALL W2_E2SETUP_326 CALL W2_E2SETUP_327 CALL W2_E2SETUP_328 CALL W2_E2SETUP_329 CALL W2_E2SETUP_330 CALL W2_E2SETUP_331 CALL W2_E2SETUP_332 CALL W2_E2SETUP_333 CALL W2_E2SETUP_334 CALL W2_E2SETUP_335 CALL W2_E2SETUP_336 CALL W2_E2SETUP_337 CALL W2_E2SETUP_338 CALL W2_E2SETUP_339 CALL W2_E2SETUP_340 CALL W2_E2SETUP_341 CALL W2_E2SETUP_342 CALL W2_E2SETUP_343 CALL W2_E2SETUP_344 CALL W2_E2SETUP_345 CALL W2_E2SETUP_346 CALL W2_E2SETUP_347 CALL W2_E2SETUP_348 CALL W2_E2SETUP_349 CALL W2_E2SETUP_350 CALL W2_E2SETUP_351 CALL W2_E2SETUP_352 CALL W2_E2SETUP_353 CALL W2_E2SETUP_354 CALL W2_E2SETUP_355 CALL W2_E2SETUP_356 CALL W2_E2SETUP_357 CALL W2_E2SETUP_358 CALL W2_E2SETUP_359 CALL W2_E2SETUP_360 CALL W2_E2SETUP_361 CALL W2_E2SETUP_362 CALL W2_E2SETUP_363 CALL W2_E2SETUP_364 CALL W2_E2SETUP_365 CALL W2_E2SETUP_366 CALL W2_E2SETUP_367 CALL W2_E2SETUP_368 CALL W2_E2SETUP_369 CALL W2_E2SETUP_370 CALL W2_E2SETUP_371 CALL W2_E2SETUP_372 CALL W2_E2SETUP_373 CALL W2_E2SETUP_374 CALL W2_E2SETUP_375 CALL W2_E2SETUP_376 CALL W2_E2SETUP_377 CALL W2_E2SETUP_378 CALL W2_E2SETUP_379 CALL W2_E2SETUP_380 CALL W2_E2SETUP_381 CALL W2_E2SETUP_382 CALL W2_E2SETUP_383 CALL W2_E2SETUP_384 CALL W2_E2SETUP_385 CALL W2_E2SETUP_386 CALL W2_E2SETUP_387 CALL W2_E2SETUP_388 CALL W2_E2SETUP_389 CALL W2_E2SETUP_390 CALL W2_E2SETUP_391 CALL W2_E2SETUP_392 CALL W2_E2SETUP_393 CALL W2_E2SETUP_394 CALL W2_E2SETUP_395 CALL W2_E2SETUP_396 CALL W2_E2SETUP_397 CALL W2_E2SETUP_398 CALL W2_E2SETUP_399 CALL W2_E2SETUP_400 CALL W2_E2SETUP_401 CALL W2_E2SETUP_402 CALL W2_E2SETUP_403 CALL W2_E2SETUP_404 CALL W2_E2SETUP_405 CALL W2_E2SETUP_406 CALL W2_E2SETUP_407 CALL W2_E2SETUP_408 CALL W2_E2SETUP_409 CALL W2_E2SETUP_410 CALL W2_E2SETUP_411 CALL W2_E2SETUP_412 CALL W2_E2SETUP_413 CALL W2_E2SETUP_414 CALL W2_E2SETUP_415 CALL W2_E2SETUP_416 CALL W2_E2SETUP_417 CALL W2_E2SETUP_418 CALL W2_E2SETUP_419 CALL W2_E2SETUP_420 CALL W2_E2SETUP_421 CALL W2_E2SETUP_422 CALL W2_E2SETUP_423 CALL W2_E2SETUP_424 CALL W2_E2SETUP_425 CALL W2_E2SETUP_426 CALL W2_E2SETUP_427 CALL W2_E2SETUP_428 CALL W2_E2SETUP_429 CALL W2_E2SETUP_430 CALL W2_E2SETUP_431 CALL W2_E2SETUP_432 CALL W2_E2SETUP_433 CALL W2_E2SETUP_434 CALL W2_E2SETUP_435 CALL W2_E2SETUP_436 CALL W2_E2SETUP_437 CALL W2_E2SETUP_438 CALL W2_E2SETUP_439 CALL W2_E2SETUP_440 CALL W2_E2SETUP_441 CALL W2_E2SETUP_442 CALL W2_E2SETUP_443 CALL W2_E2SETUP_444 CALL W2_E2SETUP_445 CALL W2_E2SETUP_446 CALL W2_E2SETUP_447 CALL W2_E2SETUP_448 CALL W2_E2SETUP_449 CALL W2_E2SETUP_450 CALL W2_E2SETUP_451 CALL W2_E2SETUP_452 CALL W2_E2SETUP_453 CALL W2_E2SETUP_454 CALL W2_E2SETUP_455 CALL W2_E2SETUP_456 CALL W2_E2SETUP_457 CALL W2_E2SETUP_458 CALL W2_E2SETUP_459 CALL W2_E2SETUP_460 CALL W2_E2SETUP_461 CALL W2_E2SETUP_462 CALL W2_E2SETUP_463 CALL W2_E2SETUP_464 CALL W2_E2SETUP_465 CALL W2_E2SETUP_466 CALL W2_E2SETUP_467 CALL W2_E2SETUP_468 CALL W2_E2SETUP_469 CALL W2_E2SETUP_470 CALL W2_E2SETUP_471 CALL W2_E2SETUP_472 CALL W2_E2SETUP_473 CALL W2_E2SETUP_474 CALL W2_E2SETUP_475 CALL W2_E2SETUP_476 CALL W2_E2SETUP_477 CALL W2_E2SETUP_478 CALL W2_E2SETUP_479 CALL W2_E2SETUP_480 CALL W2_E2SETUP_481 CALL W2_E2SETUP_482 CALL W2_E2SETUP_483 CALL W2_E2SETUP_484 CALL W2_E2SETUP_485 CALL W2_E2SETUP_486 CALL W2_E2SETUP_487 CALL W2_E2SETUP_488 CALL W2_E2SETUP_489 CALL W2_E2SETUP_490 CALL W2_E2SETUP_491 CALL W2_E2SETUP_492 CALL W2_E2SETUP_493 CALL W2_E2SETUP_494 CALL W2_E2SETUP_495 CALL W2_E2SETUP_496 CALL W2_E2SETUP_497 CALL W2_E2SETUP_498 CALL W2_E2SETUP_499 CALL W2_E2SETUP_500 CALL W2_E2SETUP_501 CALL W2_E2SETUP_502 CALL W2_E2SETUP_503 CALL W2_E2SETUP_504 CALL W2_E2SETUP_505 CALL W2_E2SETUP_506 CALL W2_E2SETUP_507 CALL W2_E2SETUP_508 CALL W2_E2SETUP_509 CALL W2_E2SETUP_510 CALL W2_E2SETUP_511 CALL W2_E2SETUP_512 CALL W2_E2SETUP_513 CALL W2_E2SETUP_514 CALL W2_E2SETUP_515 CALL W2_E2SETUP_516 CALL W2_E2SETUP_517 CALL W2_E2SETUP_518 CALL W2_E2SETUP_519 CALL W2_E2SETUP_520 CALL W2_E2SETUP_521 CALL W2_E2SETUP_522 CALL W2_E2SETUP_523 CALL W2_E2SETUP_524 CALL W2_E2SETUP_525 CALL W2_E2SETUP_526 CALL W2_E2SETUP_527 CALL W2_E2SETUP_528 CALL W2_E2SETUP_529 CALL W2_E2SETUP_530 CALL W2_E2SETUP_531 CALL W2_E2SETUP_532 CALL W2_E2SETUP_533 CALL W2_E2SETUP_534 CALL W2_E2SETUP_535 CALL W2_E2SETUP_536 CALL W2_E2SETUP_537 CALL W2_E2SETUP_538 CALL W2_E2SETUP_539 CALL W2_E2SETUP_540 CALL W2_E2SETUP_541 CALL W2_E2SETUP_542 CALL W2_E2SETUP_543 CALL W2_E2SETUP_544 CALL W2_E2SETUP_545 CALL W2_E2SETUP_546 CALL W2_E2SETUP_547 CALL W2_E2SETUP_548 CALL W2_E2SETUP_549 CALL W2_E2SETUP_550 CALL W2_E2SETUP_551 CALL W2_E2SETUP_552 CALL W2_E2SETUP_553 CALL W2_E2SETUP_554 CALL W2_E2SETUP_555 CALL W2_E2SETUP_556 CALL W2_E2SETUP_557 CALL W2_E2SETUP_558 CALL W2_E2SETUP_559 CALL W2_E2SETUP_560 CALL W2_E2SETUP_561 CALL W2_E2SETUP_562 CALL W2_E2SETUP_563 CALL W2_E2SETUP_564 CALL W2_E2SETUP_565 CALL W2_E2SETUP_566 CALL W2_E2SETUP_567 CALL W2_E2SETUP_568 CALL W2_E2SETUP_569 CALL W2_E2SETUP_570 CALL W2_E2SETUP_571 CALL W2_E2SETUP_572 CALL W2_E2SETUP_573 CALL W2_E2SETUP_574 CALL W2_E2SETUP_575 CALL W2_E2SETUP_576 CALL W2_E2SETUP_577 CALL W2_E2SETUP_578 CALL W2_E2SETUP_579 CALL W2_E2SETUP_580 CALL W2_E2SETUP_581 CALL W2_E2SETUP_582 CALL W2_E2SETUP_583 CALL W2_E2SETUP_584 CALL W2_E2SETUP_585 CALL W2_E2SETUP_586 CALL W2_E2SETUP_587 CALL W2_E2SETUP_588 CALL W2_E2SETUP_589 CALL W2_E2SETUP_590 CALL W2_E2SETUP_591 CALL W2_E2SETUP_592 CALL W2_E2SETUP_593 CALL W2_E2SETUP_594 CALL W2_E2SETUP_595 CALL W2_E2SETUP_596 CALL W2_E2SETUP_597 CALL W2_E2SETUP_598 CALL W2_E2SETUP_599 CALL W2_E2SETUP_600 CALL W2_E2SETUP_601 CALL W2_E2SETUP_602 CALL W2_E2SETUP_603 CALL W2_E2SETUP_604 CALL W2_E2SETUP_605 CALL W2_E2SETUP_606 CALL W2_E2SETUP_607 CALL W2_E2SETUP_608 CALL W2_E2SETUP_609 CALL W2_E2SETUP_610 CALL W2_E2SETUP_611 CALL W2_E2SETUP_612 CALL W2_E2SETUP_613 CALL W2_E2SETUP_614 CALL W2_E2SETUP_615 CALL W2_E2SETUP_616 CALL W2_E2SETUP_617 CALL W2_E2SETUP_618 CALL W2_E2SETUP_619 CALL W2_E2SETUP_620 CALL W2_E2SETUP_621 CALL W2_E2SETUP_622 CALL W2_E2SETUP_623 CALL W2_E2SETUP_624 CALL W2_E2SETUP_625 CALL W2_E2SETUP_626 CALL W2_E2SETUP_627 CALL W2_E2SETUP_628 CALL W2_E2SETUP_629 CALL W2_E2SETUP_630 CALL W2_E2SETUP_631 CALL W2_E2SETUP_632 CALL W2_E2SETUP_633 CALL W2_E2SETUP_634 CALL W2_E2SETUP_635 CALL W2_E2SETUP_636 CALL W2_E2SETUP_637 CALL W2_E2SETUP_638 CALL W2_E2SETUP_639 CALL W2_E2SETUP_640 CALL W2_E2SETUP_641 CALL W2_E2SETUP_642 CALL W2_E2SETUP_643 CALL W2_E2SETUP_644 CALL W2_E2SETUP_645 CALL W2_E2SETUP_646 CALL W2_E2SETUP_647 CALL W2_E2SETUP_648 CALL W2_E2SETUP_649 CALL W2_E2SETUP_650 CALL W2_E2SETUP_651 CALL W2_E2SETUP_652 CALL W2_E2SETUP_653 CALL W2_E2SETUP_654 CALL W2_E2SETUP_655 CALL W2_E2SETUP_656 CALL W2_E2SETUP_657 CALL W2_E2SETUP_658 CALL W2_E2SETUP_659 CALL W2_E2SETUP_660 CALL W2_E2SETUP_661 CALL W2_E2SETUP_662 CALL W2_E2SETUP_663 CALL W2_E2SETUP_664 CALL W2_E2SETUP_665 CALL W2_E2SETUP_666 CALL W2_E2SETUP_667 CALL W2_E2SETUP_668 CALL W2_E2SETUP_669 CALL W2_E2SETUP_670 CALL W2_E2SETUP_671 CALL W2_E2SETUP_672 CALL W2_E2SETUP_673 CALL W2_E2SETUP_674 CALL W2_E2SETUP_675 CALL W2_E2SETUP_676 CALL W2_E2SETUP_677 CALL W2_E2SETUP_678 CALL W2_E2SETUP_679 CALL W2_E2SETUP_680 CALL W2_E2SETUP_681 CALL W2_E2SETUP_682 CALL W2_E2SETUP_683 CALL W2_E2SETUP_684 CALL W2_E2SETUP_685 CALL W2_E2SETUP_686 CALL W2_E2SETUP_687 CALL W2_E2SETUP_688 CALL W2_E2SETUP_689 CALL W2_E2SETUP_690 CALL W2_E2SETUP_691 CALL W2_E2SETUP_692 CALL W2_E2SETUP_693 CALL W2_E2SETUP_694 CALL W2_E2SETUP_695 CALL W2_E2SETUP_696 CALL W2_E2SETUP_697 CALL W2_E2SETUP_698 CALL W2_E2SETUP_699 CALL W2_E2SETUP_700 CALL W2_E2SETUP_701 CALL W2_E2SETUP_702 CALL W2_E2SETUP_703 CALL W2_E2SETUP_704 CALL W2_E2SETUP_705 CALL W2_E2SETUP_706 CALL W2_E2SETUP_707 CALL W2_E2SETUP_708 CALL W2_E2SETUP_709 CALL W2_E2SETUP_710 CALL W2_E2SETUP_711 CALL W2_E2SETUP_712 CALL W2_E2SETUP_713 CALL W2_E2SETUP_714 CALL W2_E2SETUP_715 CALL W2_E2SETUP_716 CALL W2_E2SETUP_717 CALL W2_E2SETUP_718 CALL W2_E2SETUP_719 CALL W2_E2SETUP_720 CALL W2_E2SETUP_721 CALL W2_E2SETUP_722 CALL W2_E2SETUP_723 CALL W2_E2SETUP_724 CALL W2_E2SETUP_725 CALL W2_E2SETUP_726 CALL W2_E2SETUP_727 CALL W2_E2SETUP_728 CALL W2_E2SETUP_729 CALL W2_E2SETUP_730 CALL W2_E2SETUP_731 CALL W2_E2SETUP_732 CALL W2_E2SETUP_733 CALL W2_E2SETUP_734 CALL W2_E2SETUP_735 CALL W2_E2SETUP_736 CALL W2_E2SETUP_737 CALL W2_E2SETUP_738 CALL W2_E2SETUP_739 CALL W2_E2SETUP_740 CALL W2_E2SETUP_741 CALL W2_E2SETUP_742 CALL W2_E2SETUP_743 CALL W2_E2SETUP_744 CALL W2_E2SETUP_745 CALL W2_E2SETUP_746 CALL W2_E2SETUP_747 CALL W2_E2SETUP_748 CALL W2_E2SETUP_749 CALL W2_E2SETUP_750 CALL W2_E2SETUP_751 CALL W2_E2SETUP_752 CALL W2_E2SETUP_753 CALL W2_E2SETUP_754 CALL W2_E2SETUP_755 CALL W2_E2SETUP_756 CALL W2_E2SETUP_757 CALL W2_E2SETUP_758 CALL W2_E2SETUP_759 CALL W2_E2SETUP_760 CALL W2_E2SETUP_761 CALL W2_E2SETUP_762 CALL W2_E2SETUP_763 CALL W2_E2SETUP_764 CALL W2_E2SETUP_765 CALL W2_E2SETUP_766 CALL W2_E2SETUP_767 CALL W2_E2SETUP_768 CALL W2_E2SETUP_769 CALL W2_E2SETUP_770 CALL W2_E2SETUP_771 CALL W2_E2SETUP_772 CALL W2_E2SETUP_773 CALL W2_E2SETUP_774 CALL W2_E2SETUP_775 CALL W2_E2SETUP_776 CALL W2_E2SETUP_777 CALL W2_E2SETUP_778 CALL W2_E2SETUP_779 CALL W2_E2SETUP_780 CALL W2_E2SETUP_781 CALL W2_E2SETUP_782 CALL W2_E2SETUP_783 CALL W2_E2SETUP_784 CALL W2_E2SETUP_785 CALL W2_E2SETUP_786 CALL W2_E2SETUP_787 CALL W2_E2SETUP_788 CALL W2_E2SETUP_789 CALL W2_E2SETUP_790 CALL W2_E2SETUP_791 CALL W2_E2SETUP_792 CALL W2_E2SETUP_793 CALL W2_E2SETUP_794 CALL W2_E2SETUP_795 CALL W2_E2SETUP_796 CALL W2_E2SETUP_797 CALL W2_E2SETUP_798 CALL W2_E2SETUP_799 CALL W2_E2SETUP_800 CALL W2_E2SETUP_801 CALL W2_E2SETUP_802 CALL W2_E2SETUP_803 CALL W2_E2SETUP_804 CALL W2_E2SETUP_805 CALL W2_E2SETUP_806 CALL W2_E2SETUP_807 CALL W2_E2SETUP_808 CALL W2_E2SETUP_809 CALL W2_E2SETUP_810 CALL W2_E2SETUP_811 CALL W2_E2SETUP_812 CALL W2_E2SETUP_813 CALL W2_E2SETUP_814 CALL W2_E2SETUP_815 CALL W2_E2SETUP_816 CALL W2_E2SETUP_817 CALL W2_E2SETUP_818 CALL W2_E2SETUP_819 CALL W2_E2SETUP_820 CALL W2_E2SETUP_821 CALL W2_E2SETUP_822 CALL W2_E2SETUP_823 CALL W2_E2SETUP_824 CALL W2_E2SETUP_825 CALL W2_E2SETUP_826 CALL W2_E2SETUP_827 CALL W2_E2SETUP_828 CALL W2_E2SETUP_829 CALL W2_E2SETUP_830 CALL W2_E2SETUP_831 CALL W2_E2SETUP_832 CALL W2_E2SETUP_833 CALL W2_E2SETUP_834 CALL W2_E2SETUP_835 CALL W2_E2SETUP_836 CALL W2_E2SETUP_837 CALL W2_E2SETUP_838 CALL W2_E2SETUP_839 CALL W2_E2SETUP_840 CALL W2_E2SETUP_841 CALL W2_E2SETUP_842 CALL W2_E2SETUP_843 CALL W2_E2SETUP_844 CALL W2_E2SETUP_845 CALL W2_E2SETUP_846 CALL W2_E2SETUP_847 CALL W2_E2SETUP_848 CALL W2_E2SETUP_849 CALL W2_E2SETUP_850 CALL W2_E2SETUP_851 CALL W2_E2SETUP_852 CALL W2_E2SETUP_853 CALL W2_E2SETUP_854 CALL W2_E2SETUP_855 CALL W2_E2SETUP_856 CALL W2_E2SETUP_857 CALL W2_E2SETUP_858 CALL W2_E2SETUP_859 CALL W2_E2SETUP_860 CALL W2_E2SETUP_861 CALL W2_E2SETUP_862 CALL W2_E2SETUP_863 CALL W2_E2SETUP_864 CALL W2_E2SETUP_865 CALL W2_E2SETUP_866 CALL W2_E2SETUP_867 CALL W2_E2SETUP_868 CALL W2_E2SETUP_869 CALL W2_E2SETUP_870 CALL W2_E2SETUP_871 CALL W2_E2SETUP_872 CALL W2_E2SETUP_873 CALL W2_E2SETUP_874 CALL W2_E2SETUP_875 CALL W2_E2SETUP_876 CALL W2_E2SETUP_877 CALL W2_E2SETUP_878 CALL W2_E2SETUP_879 CALL W2_E2SETUP_880 CALL W2_E2SETUP_881 CALL W2_E2SETUP_882 CALL W2_E2SETUP_883 CALL W2_E2SETUP_884 CALL W2_E2SETUP_885 CALL W2_E2SETUP_886 CALL W2_E2SETUP_887 CALL W2_E2SETUP_888 CALL W2_E2SETUP_889 CALL W2_E2SETUP_890 CALL W2_E2SETUP_891 CALL W2_E2SETUP_892 CALL W2_E2SETUP_893 CALL W2_E2SETUP_894 CALL W2_E2SETUP_895 CALL W2_E2SETUP_896 CALL W2_E2SETUP_897 CALL W2_E2SETUP_898 CALL W2_E2SETUP_899 CALL W2_E2SETUP_900 RETURN END SUBROUTINE W2_E2SETUP_1 C Topology for tile 1 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1)=34 exch2_tNy(1)=51 exch2_tBasex(1)=0 exch2_tBasey(1)=0 exch2_txGlobalo(1)=1 exch2_tyGlobalo(1)=1 exch2_isWedge(1)=1 exch2_isNedge(1)=0 exch2_isEedge(1)=0 exch2_isSedge(1)=1 exch2_myFace(1)=1 exch2_mydNx(1)=510 exch2_mydNy(1)=510 exch2_nNeighbours(1)=5 exch2_neighbourId(1,1)=16 exch2_iLo(1,1)=0 exch2_iHi(1,1)=35 exch2_jLo(1,1)=52 exch2_jHi(1,1)=52 exch2_opposingSend(1,1)=2 exch2_pij(1,1,1)=1 exch2_pij(2,1,1)=0 exch2_pij(3,1,1)=0 exch2_pij(4,1,1)=1 exch2_oi(1,1)=0 exch2_oj(1,1)=0 exch2_neighbourId(2,1)=886 exch2_iLo(2,1)=0 exch2_iHi(2,1)=35 exch2_jLo(2,1)=0 exch2_jHi(2,1)=0 exch2_opposingSend(2,1)=1 exch2_pij(1,2,1)=1 exch2_pij(2,2,1)=0 exch2_pij(3,2,1)=0 exch2_pij(4,2,1)=1 exch2_oi(2,1)=0 exch2_oj(2,1)=-510 exch2_neighbourId(3,1)=2 exch2_iLo(3,1)=35 exch2_iHi(3,1)=35 exch2_jLo(3,1)=0 exch2_jHi(3,1)=52 exch2_opposingSend(3,1)=4 exch2_pij(1,3,1)=1 exch2_pij(2,3,1)=0 exch2_pij(3,3,1)=0 exch2_pij(4,3,1)=1 exch2_oi(3,1)=0 exch2_oj(3,1)=0 exch2_neighbourId(4,1)=749 exch2_iLo(4,1)=0 exch2_iHi(4,1)=0 exch2_jLo(4,1)=34 exch2_jHi(4,1)=52 exch2_opposingSend(4,1)=1 exch2_pij(1,4,1)=0 exch2_pij(2,4,1)=1 exch2_pij(3,4,1)=-1 exch2_pij(4,4,1)=0 exch2_oi(4,1)=-510 exch2_oj(4,1)=511 exch2_neighbourId(5,1)=750 exch2_iLo(5,1)=0 exch2_iHi(5,1)=0 exch2_jLo(5,1)=0 exch2_jHi(5,1)=35 exch2_opposingSend(5,1)=1 exch2_pij(1,5,1)=0 exch2_pij(2,5,1)=1 exch2_pij(3,5,1)=-1 exch2_pij(4,5,1)=0 exch2_oi(5,1)=-510 exch2_oj(5,1)=511 RETURN END SUBROUTINE W2_E2SETUP_2 C Topology for tile 2 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(2)=34 exch2_tNy(2)=51 exch2_tBasex(2)=34 exch2_tBasey(2)=0 exch2_txGlobalo(2)=35 exch2_tyGlobalo(2)=1 exch2_isWedge(2)=0 exch2_isNedge(2)=0 exch2_isEedge(2)=0 exch2_isSedge(2)=1 exch2_myFace(2)=1 exch2_mydNx(2)=510 exch2_mydNy(2)=510 exch2_nNeighbours(2)=4 exch2_neighbourId(1,2)=17 exch2_iLo(1,2)=0 exch2_iHi(1,2)=35 exch2_jLo(1,2)=52 exch2_jHi(1,2)=52 exch2_opposingSend(1,2)=2 exch2_pij(1,1,2)=1 exch2_pij(2,1,2)=0 exch2_pij(3,1,2)=0 exch2_pij(4,1,2)=1 exch2_oi(1,2)=0 exch2_oj(1,2)=0 exch2_neighbourId(2,2)=887 exch2_iLo(2,2)=0 exch2_iHi(2,2)=35 exch2_jLo(2,2)=0 exch2_jHi(2,2)=0 exch2_opposingSend(2,2)=1 exch2_pij(1,2,2)=1 exch2_pij(2,2,2)=0 exch2_pij(3,2,2)=0 exch2_pij(4,2,2)=1 exch2_oi(2,2)=0 exch2_oj(2,2)=-510 exch2_neighbourId(3,2)=3 exch2_iLo(3,2)=35 exch2_iHi(3,2)=35 exch2_jLo(3,2)=0 exch2_jHi(3,2)=52 exch2_opposingSend(3,2)=4 exch2_pij(1,3,2)=1 exch2_pij(2,3,2)=0 exch2_pij(3,3,2)=0 exch2_pij(4,3,2)=1 exch2_oi(3,2)=0 exch2_oj(3,2)=0 exch2_neighbourId(4,2)=1 exch2_iLo(4,2)=0 exch2_iHi(4,2)=0 exch2_jLo(4,2)=0 exch2_jHi(4,2)=52 exch2_opposingSend(4,2)=3 exch2_pij(1,4,2)=1 exch2_pij(2,4,2)=0 exch2_pij(3,4,2)=0 exch2_pij(4,4,2)=1 exch2_oi(4,2)=0 exch2_oj(4,2)=0 RETURN END SUBROUTINE W2_E2SETUP_3 C Topology for tile 3 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(3)=34 exch2_tNy(3)=51 exch2_tBasex(3)=68 exch2_tBasey(3)=0 exch2_txGlobalo(3)=69 exch2_tyGlobalo(3)=1 exch2_isWedge(3)=0 exch2_isNedge(3)=0 exch2_isEedge(3)=0 exch2_isSedge(3)=1 exch2_myFace(3)=1 exch2_mydNx(3)=510 exch2_mydNy(3)=510 exch2_nNeighbours(3)=4 exch2_neighbourId(1,3)=18 exch2_iLo(1,3)=0 exch2_iHi(1,3)=35 exch2_jLo(1,3)=52 exch2_jHi(1,3)=52 exch2_opposingSend(1,3)=2 exch2_pij(1,1,3)=1 exch2_pij(2,1,3)=0 exch2_pij(3,1,3)=0 exch2_pij(4,1,3)=1 exch2_oi(1,3)=0 exch2_oj(1,3)=0 exch2_neighbourId(2,3)=888 exch2_iLo(2,3)=0 exch2_iHi(2,3)=35 exch2_jLo(2,3)=0 exch2_jHi(2,3)=0 exch2_opposingSend(2,3)=1 exch2_pij(1,2,3)=1 exch2_pij(2,2,3)=0 exch2_pij(3,2,3)=0 exch2_pij(4,2,3)=1 exch2_oi(2,3)=0 exch2_oj(2,3)=-510 exch2_neighbourId(3,3)=4 exch2_iLo(3,3)=35 exch2_iHi(3,3)=35 exch2_jLo(3,3)=0 exch2_jHi(3,3)=52 exch2_opposingSend(3,3)=4 exch2_pij(1,3,3)=1 exch2_pij(2,3,3)=0 exch2_pij(3,3,3)=0 exch2_pij(4,3,3)=1 exch2_oi(3,3)=0 exch2_oj(3,3)=0 exch2_neighbourId(4,3)=2 exch2_iLo(4,3)=0 exch2_iHi(4,3)=0 exch2_jLo(4,3)=0 exch2_jHi(4,3)=52 exch2_opposingSend(4,3)=3 exch2_pij(1,4,3)=1 exch2_pij(2,4,3)=0 exch2_pij(3,4,3)=0 exch2_pij(4,4,3)=1 exch2_oi(4,3)=0 exch2_oj(4,3)=0 RETURN END SUBROUTINE W2_E2SETUP_4 C Topology for tile 4 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(4)=34 exch2_tNy(4)=51 exch2_tBasex(4)=102 exch2_tBasey(4)=0 exch2_txGlobalo(4)=103 exch2_tyGlobalo(4)=1 exch2_isWedge(4)=0 exch2_isNedge(4)=0 exch2_isEedge(4)=0 exch2_isSedge(4)=1 exch2_myFace(4)=1 exch2_mydNx(4)=510 exch2_mydNy(4)=510 exch2_nNeighbours(4)=4 exch2_neighbourId(1,4)=19 exch2_iLo(1,4)=0 exch2_iHi(1,4)=35 exch2_jLo(1,4)=52 exch2_jHi(1,4)=52 exch2_opposingSend(1,4)=2 exch2_pij(1,1,4)=1 exch2_pij(2,1,4)=0 exch2_pij(3,1,4)=0 exch2_pij(4,1,4)=1 exch2_oi(1,4)=0 exch2_oj(1,4)=0 exch2_neighbourId(2,4)=889 exch2_iLo(2,4)=0 exch2_iHi(2,4)=35 exch2_jLo(2,4)=0 exch2_jHi(2,4)=0 exch2_opposingSend(2,4)=1 exch2_pij(1,2,4)=1 exch2_pij(2,2,4)=0 exch2_pij(3,2,4)=0 exch2_pij(4,2,4)=1 exch2_oi(2,4)=0 exch2_oj(2,4)=-510 exch2_neighbourId(3,4)=5 exch2_iLo(3,4)=35 exch2_iHi(3,4)=35 exch2_jLo(3,4)=0 exch2_jHi(3,4)=52 exch2_opposingSend(3,4)=4 exch2_pij(1,3,4)=1 exch2_pij(2,3,4)=0 exch2_pij(3,3,4)=0 exch2_pij(4,3,4)=1 exch2_oi(3,4)=0 exch2_oj(3,4)=0 exch2_neighbourId(4,4)=3 exch2_iLo(4,4)=0 exch2_iHi(4,4)=0 exch2_jLo(4,4)=0 exch2_jHi(4,4)=52 exch2_opposingSend(4,4)=3 exch2_pij(1,4,4)=1 exch2_pij(2,4,4)=0 exch2_pij(3,4,4)=0 exch2_pij(4,4,4)=1 exch2_oi(4,4)=0 exch2_oj(4,4)=0 RETURN END SUBROUTINE W2_E2SETUP_5 C Topology for tile 5 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(5)=34 exch2_tNy(5)=51 exch2_tBasex(5)=136 exch2_tBasey(5)=0 exch2_txGlobalo(5)=137 exch2_tyGlobalo(5)=1 exch2_isWedge(5)=0 exch2_isNedge(5)=0 exch2_isEedge(5)=0 exch2_isSedge(5)=1 exch2_myFace(5)=1 exch2_mydNx(5)=510 exch2_mydNy(5)=510 exch2_nNeighbours(5)=4 exch2_neighbourId(1,5)=20 exch2_iLo(1,5)=0 exch2_iHi(1,5)=35 exch2_jLo(1,5)=52 exch2_jHi(1,5)=52 exch2_opposingSend(1,5)=2 exch2_pij(1,1,5)=1 exch2_pij(2,1,5)=0 exch2_pij(3,1,5)=0 exch2_pij(4,1,5)=1 exch2_oi(1,5)=0 exch2_oj(1,5)=0 exch2_neighbourId(2,5)=890 exch2_iLo(2,5)=0 exch2_iHi(2,5)=35 exch2_jLo(2,5)=0 exch2_jHi(2,5)=0 exch2_opposingSend(2,5)=1 exch2_pij(1,2,5)=1 exch2_pij(2,2,5)=0 exch2_pij(3,2,5)=0 exch2_pij(4,2,5)=1 exch2_oi(2,5)=0 exch2_oj(2,5)=-510 exch2_neighbourId(3,5)=6 exch2_iLo(3,5)=35 exch2_iHi(3,5)=35 exch2_jLo(3,5)=0 exch2_jHi(3,5)=52 exch2_opposingSend(3,5)=4 exch2_pij(1,3,5)=1 exch2_pij(2,3,5)=0 exch2_pij(3,3,5)=0 exch2_pij(4,3,5)=1 exch2_oi(3,5)=0 exch2_oj(3,5)=0 exch2_neighbourId(4,5)=4 exch2_iLo(4,5)=0 exch2_iHi(4,5)=0 exch2_jLo(4,5)=0 exch2_jHi(4,5)=52 exch2_opposingSend(4,5)=3 exch2_pij(1,4,5)=1 exch2_pij(2,4,5)=0 exch2_pij(3,4,5)=0 exch2_pij(4,4,5)=1 exch2_oi(4,5)=0 exch2_oj(4,5)=0 RETURN END SUBROUTINE W2_E2SETUP_6 C Topology for tile 6 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(6)=34 exch2_tNy(6)=51 exch2_tBasex(6)=170 exch2_tBasey(6)=0 exch2_txGlobalo(6)=171 exch2_tyGlobalo(6)=1 exch2_isWedge(6)=0 exch2_isNedge(6)=0 exch2_isEedge(6)=0 exch2_isSedge(6)=1 exch2_myFace(6)=1 exch2_mydNx(6)=510 exch2_mydNy(6)=510 exch2_nNeighbours(6)=4 exch2_neighbourId(1,6)=21 exch2_iLo(1,6)=0 exch2_iHi(1,6)=35 exch2_jLo(1,6)=52 exch2_jHi(1,6)=52 exch2_opposingSend(1,6)=2 exch2_pij(1,1,6)=1 exch2_pij(2,1,6)=0 exch2_pij(3,1,6)=0 exch2_pij(4,1,6)=1 exch2_oi(1,6)=0 exch2_oj(1,6)=0 exch2_neighbourId(2,6)=891 exch2_iLo(2,6)=0 exch2_iHi(2,6)=35 exch2_jLo(2,6)=0 exch2_jHi(2,6)=0 exch2_opposingSend(2,6)=1 exch2_pij(1,2,6)=1 exch2_pij(2,2,6)=0 exch2_pij(3,2,6)=0 exch2_pij(4,2,6)=1 exch2_oi(2,6)=0 exch2_oj(2,6)=-510 exch2_neighbourId(3,6)=7 exch2_iLo(3,6)=35 exch2_iHi(3,6)=35 exch2_jLo(3,6)=0 exch2_jHi(3,6)=52 exch2_opposingSend(3,6)=4 exch2_pij(1,3,6)=1 exch2_pij(2,3,6)=0 exch2_pij(3,3,6)=0 exch2_pij(4,3,6)=1 exch2_oi(3,6)=0 exch2_oj(3,6)=0 exch2_neighbourId(4,6)=5 exch2_iLo(4,6)=0 exch2_iHi(4,6)=0 exch2_jLo(4,6)=0 exch2_jHi(4,6)=52 exch2_opposingSend(4,6)=3 exch2_pij(1,4,6)=1 exch2_pij(2,4,6)=0 exch2_pij(3,4,6)=0 exch2_pij(4,4,6)=1 exch2_oi(4,6)=0 exch2_oj(4,6)=0 RETURN END SUBROUTINE W2_E2SETUP_7 C Topology for tile 7 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(7)=34 exch2_tNy(7)=51 exch2_tBasex(7)=204 exch2_tBasey(7)=0 exch2_txGlobalo(7)=205 exch2_tyGlobalo(7)=1 exch2_isWedge(7)=0 exch2_isNedge(7)=0 exch2_isEedge(7)=0 exch2_isSedge(7)=1 exch2_myFace(7)=1 exch2_mydNx(7)=510 exch2_mydNy(7)=510 exch2_nNeighbours(7)=4 exch2_neighbourId(1,7)=22 exch2_iLo(1,7)=0 exch2_iHi(1,7)=35 exch2_jLo(1,7)=52 exch2_jHi(1,7)=52 exch2_opposingSend(1,7)=2 exch2_pij(1,1,7)=1 exch2_pij(2,1,7)=0 exch2_pij(3,1,7)=0 exch2_pij(4,1,7)=1 exch2_oi(1,7)=0 exch2_oj(1,7)=0 exch2_neighbourId(2,7)=892 exch2_iLo(2,7)=0 exch2_iHi(2,7)=35 exch2_jLo(2,7)=0 exch2_jHi(2,7)=0 exch2_opposingSend(2,7)=1 exch2_pij(1,2,7)=1 exch2_pij(2,2,7)=0 exch2_pij(3,2,7)=0 exch2_pij(4,2,7)=1 exch2_oi(2,7)=0 exch2_oj(2,7)=-510 exch2_neighbourId(3,7)=8 exch2_iLo(3,7)=35 exch2_iHi(3,7)=35 exch2_jLo(3,7)=0 exch2_jHi(3,7)=52 exch2_opposingSend(3,7)=4 exch2_pij(1,3,7)=1 exch2_pij(2,3,7)=0 exch2_pij(3,3,7)=0 exch2_pij(4,3,7)=1 exch2_oi(3,7)=0 exch2_oj(3,7)=0 exch2_neighbourId(4,7)=6 exch2_iLo(4,7)=0 exch2_iHi(4,7)=0 exch2_jLo(4,7)=0 exch2_jHi(4,7)=52 exch2_opposingSend(4,7)=3 exch2_pij(1,4,7)=1 exch2_pij(2,4,7)=0 exch2_pij(3,4,7)=0 exch2_pij(4,4,7)=1 exch2_oi(4,7)=0 exch2_oj(4,7)=0 RETURN END SUBROUTINE W2_E2SETUP_8 C Topology for tile 8 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(8)=34 exch2_tNy(8)=51 exch2_tBasex(8)=238 exch2_tBasey(8)=0 exch2_txGlobalo(8)=239 exch2_tyGlobalo(8)=1 exch2_isWedge(8)=0 exch2_isNedge(8)=0 exch2_isEedge(8)=0 exch2_isSedge(8)=1 exch2_myFace(8)=1 exch2_mydNx(8)=510 exch2_mydNy(8)=510 exch2_nNeighbours(8)=4 exch2_neighbourId(1,8)=23 exch2_iLo(1,8)=0 exch2_iHi(1,8)=35 exch2_jLo(1,8)=52 exch2_jHi(1,8)=52 exch2_opposingSend(1,8)=2 exch2_pij(1,1,8)=1 exch2_pij(2,1,8)=0 exch2_pij(3,1,8)=0 exch2_pij(4,1,8)=1 exch2_oi(1,8)=0 exch2_oj(1,8)=0 exch2_neighbourId(2,8)=893 exch2_iLo(2,8)=0 exch2_iHi(2,8)=35 exch2_jLo(2,8)=0 exch2_jHi(2,8)=0 exch2_opposingSend(2,8)=1 exch2_pij(1,2,8)=1 exch2_pij(2,2,8)=0 exch2_pij(3,2,8)=0 exch2_pij(4,2,8)=1 exch2_oi(2,8)=0 exch2_oj(2,8)=-510 exch2_neighbourId(3,8)=9 exch2_iLo(3,8)=35 exch2_iHi(3,8)=35 exch2_jLo(3,8)=0 exch2_jHi(3,8)=52 exch2_opposingSend(3,8)=4 exch2_pij(1,3,8)=1 exch2_pij(2,3,8)=0 exch2_pij(3,3,8)=0 exch2_pij(4,3,8)=1 exch2_oi(3,8)=0 exch2_oj(3,8)=0 exch2_neighbourId(4,8)=7 exch2_iLo(4,8)=0 exch2_iHi(4,8)=0 exch2_jLo(4,8)=0 exch2_jHi(4,8)=52 exch2_opposingSend(4,8)=3 exch2_pij(1,4,8)=1 exch2_pij(2,4,8)=0 exch2_pij(3,4,8)=0 exch2_pij(4,4,8)=1 exch2_oi(4,8)=0 exch2_oj(4,8)=0 RETURN END SUBROUTINE W2_E2SETUP_9 C Topology for tile 9 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(9)=34 exch2_tNy(9)=51 exch2_tBasex(9)=272 exch2_tBasey(9)=0 exch2_txGlobalo(9)=273 exch2_tyGlobalo(9)=1 exch2_isWedge(9)=0 exch2_isNedge(9)=0 exch2_isEedge(9)=0 exch2_isSedge(9)=1 exch2_myFace(9)=1 exch2_mydNx(9)=510 exch2_mydNy(9)=510 exch2_nNeighbours(9)=4 exch2_neighbourId(1,9)=24 exch2_iLo(1,9)=0 exch2_iHi(1,9)=35 exch2_jLo(1,9)=52 exch2_jHi(1,9)=52 exch2_opposingSend(1,9)=2 exch2_pij(1,1,9)=1 exch2_pij(2,1,9)=0 exch2_pij(3,1,9)=0 exch2_pij(4,1,9)=1 exch2_oi(1,9)=0 exch2_oj(1,9)=0 exch2_neighbourId(2,9)=894 exch2_iLo(2,9)=0 exch2_iHi(2,9)=35 exch2_jLo(2,9)=0 exch2_jHi(2,9)=0 exch2_opposingSend(2,9)=1 exch2_pij(1,2,9)=1 exch2_pij(2,2,9)=0 exch2_pij(3,2,9)=0 exch2_pij(4,2,9)=1 exch2_oi(2,9)=0 exch2_oj(2,9)=-510 exch2_neighbourId(3,9)=10 exch2_iLo(3,9)=35 exch2_iHi(3,9)=35 exch2_jLo(3,9)=0 exch2_jHi(3,9)=52 exch2_opposingSend(3,9)=4 exch2_pij(1,3,9)=1 exch2_pij(2,3,9)=0 exch2_pij(3,3,9)=0 exch2_pij(4,3,9)=1 exch2_oi(3,9)=0 exch2_oj(3,9)=0 exch2_neighbourId(4,9)=8 exch2_iLo(4,9)=0 exch2_iHi(4,9)=0 exch2_jLo(4,9)=0 exch2_jHi(4,9)=52 exch2_opposingSend(4,9)=3 exch2_pij(1,4,9)=1 exch2_pij(2,4,9)=0 exch2_pij(3,4,9)=0 exch2_pij(4,4,9)=1 exch2_oi(4,9)=0 exch2_oj(4,9)=0 RETURN END SUBROUTINE W2_E2SETUP_10 C Topology for tile 10 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(10)=34 exch2_tNy(10)=51 exch2_tBasex(10)=306 exch2_tBasey(10)=0 exch2_txGlobalo(10)=307 exch2_tyGlobalo(10)=1 exch2_isWedge(10)=0 exch2_isNedge(10)=0 exch2_isEedge(10)=0 exch2_isSedge(10)=1 exch2_myFace(10)=1 exch2_mydNx(10)=510 exch2_mydNy(10)=510 exch2_nNeighbours(10)=4 exch2_neighbourId(1,10)=25 exch2_iLo(1,10)=0 exch2_iHi(1,10)=35 exch2_jLo(1,10)=52 exch2_jHi(1,10)=52 exch2_opposingSend(1,10)=2 exch2_pij(1,1,10)=1 exch2_pij(2,1,10)=0 exch2_pij(3,1,10)=0 exch2_pij(4,1,10)=1 exch2_oi(1,10)=0 exch2_oj(1,10)=0 exch2_neighbourId(2,10)=895 exch2_iLo(2,10)=0 exch2_iHi(2,10)=35 exch2_jLo(2,10)=0 exch2_jHi(2,10)=0 exch2_opposingSend(2,10)=1 exch2_pij(1,2,10)=1 exch2_pij(2,2,10)=0 exch2_pij(3,2,10)=0 exch2_pij(4,2,10)=1 exch2_oi(2,10)=0 exch2_oj(2,10)=-510 exch2_neighbourId(3,10)=11 exch2_iLo(3,10)=35 exch2_iHi(3,10)=35 exch2_jLo(3,10)=0 exch2_jHi(3,10)=52 exch2_opposingSend(3,10)=4 exch2_pij(1,3,10)=1 exch2_pij(2,3,10)=0 exch2_pij(3,3,10)=0 exch2_pij(4,3,10)=1 exch2_oi(3,10)=0 exch2_oj(3,10)=0 exch2_neighbourId(4,10)=9 exch2_iLo(4,10)=0 exch2_iHi(4,10)=0 exch2_jLo(4,10)=0 exch2_jHi(4,10)=52 exch2_opposingSend(4,10)=3 exch2_pij(1,4,10)=1 exch2_pij(2,4,10)=0 exch2_pij(3,4,10)=0 exch2_pij(4,4,10)=1 exch2_oi(4,10)=0 exch2_oj(4,10)=0 RETURN END SUBROUTINE W2_E2SETUP_11 C Topology for tile 11 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(11)=34 exch2_tNy(11)=51 exch2_tBasex(11)=340 exch2_tBasey(11)=0 exch2_txGlobalo(11)=341 exch2_tyGlobalo(11)=1 exch2_isWedge(11)=0 exch2_isNedge(11)=0 exch2_isEedge(11)=0 exch2_isSedge(11)=1 exch2_myFace(11)=1 exch2_mydNx(11)=510 exch2_mydNy(11)=510 exch2_nNeighbours(11)=4 exch2_neighbourId(1,11)=26 exch2_iLo(1,11)=0 exch2_iHi(1,11)=35 exch2_jLo(1,11)=52 exch2_jHi(1,11)=52 exch2_opposingSend(1,11)=2 exch2_pij(1,1,11)=1 exch2_pij(2,1,11)=0 exch2_pij(3,1,11)=0 exch2_pij(4,1,11)=1 exch2_oi(1,11)=0 exch2_oj(1,11)=0 exch2_neighbourId(2,11)=896 exch2_iLo(2,11)=0 exch2_iHi(2,11)=35 exch2_jLo(2,11)=0 exch2_jHi(2,11)=0 exch2_opposingSend(2,11)=1 exch2_pij(1,2,11)=1 exch2_pij(2,2,11)=0 exch2_pij(3,2,11)=0 exch2_pij(4,2,11)=1 exch2_oi(2,11)=0 exch2_oj(2,11)=-510 exch2_neighbourId(3,11)=12 exch2_iLo(3,11)=35 exch2_iHi(3,11)=35 exch2_jLo(3,11)=0 exch2_jHi(3,11)=52 exch2_opposingSend(3,11)=4 exch2_pij(1,3,11)=1 exch2_pij(2,3,11)=0 exch2_pij(3,3,11)=0 exch2_pij(4,3,11)=1 exch2_oi(3,11)=0 exch2_oj(3,11)=0 exch2_neighbourId(4,11)=10 exch2_iLo(4,11)=0 exch2_iHi(4,11)=0 exch2_jLo(4,11)=0 exch2_jHi(4,11)=52 exch2_opposingSend(4,11)=3 exch2_pij(1,4,11)=1 exch2_pij(2,4,11)=0 exch2_pij(3,4,11)=0 exch2_pij(4,4,11)=1 exch2_oi(4,11)=0 exch2_oj(4,11)=0 RETURN END SUBROUTINE W2_E2SETUP_12 C Topology for tile 12 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(12)=34 exch2_tNy(12)=51 exch2_tBasex(12)=374 exch2_tBasey(12)=0 exch2_txGlobalo(12)=375 exch2_tyGlobalo(12)=1 exch2_isWedge(12)=0 exch2_isNedge(12)=0 exch2_isEedge(12)=0 exch2_isSedge(12)=1 exch2_myFace(12)=1 exch2_mydNx(12)=510 exch2_mydNy(12)=510 exch2_nNeighbours(12)=4 exch2_neighbourId(1,12)=27 exch2_iLo(1,12)=0 exch2_iHi(1,12)=35 exch2_jLo(1,12)=52 exch2_jHi(1,12)=52 exch2_opposingSend(1,12)=2 exch2_pij(1,1,12)=1 exch2_pij(2,1,12)=0 exch2_pij(3,1,12)=0 exch2_pij(4,1,12)=1 exch2_oi(1,12)=0 exch2_oj(1,12)=0 exch2_neighbourId(2,12)=897 exch2_iLo(2,12)=0 exch2_iHi(2,12)=35 exch2_jLo(2,12)=0 exch2_jHi(2,12)=0 exch2_opposingSend(2,12)=1 exch2_pij(1,2,12)=1 exch2_pij(2,2,12)=0 exch2_pij(3,2,12)=0 exch2_pij(4,2,12)=1 exch2_oi(2,12)=0 exch2_oj(2,12)=-510 exch2_neighbourId(3,12)=13 exch2_iLo(3,12)=35 exch2_iHi(3,12)=35 exch2_jLo(3,12)=0 exch2_jHi(3,12)=52 exch2_opposingSend(3,12)=4 exch2_pij(1,3,12)=1 exch2_pij(2,3,12)=0 exch2_pij(3,3,12)=0 exch2_pij(4,3,12)=1 exch2_oi(3,12)=0 exch2_oj(3,12)=0 exch2_neighbourId(4,12)=11 exch2_iLo(4,12)=0 exch2_iHi(4,12)=0 exch2_jLo(4,12)=0 exch2_jHi(4,12)=52 exch2_opposingSend(4,12)=3 exch2_pij(1,4,12)=1 exch2_pij(2,4,12)=0 exch2_pij(3,4,12)=0 exch2_pij(4,4,12)=1 exch2_oi(4,12)=0 exch2_oj(4,12)=0 RETURN END SUBROUTINE W2_E2SETUP_13 C Topology for tile 13 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(13)=34 exch2_tNy(13)=51 exch2_tBasex(13)=408 exch2_tBasey(13)=0 exch2_txGlobalo(13)=409 exch2_tyGlobalo(13)=1 exch2_isWedge(13)=0 exch2_isNedge(13)=0 exch2_isEedge(13)=0 exch2_isSedge(13)=1 exch2_myFace(13)=1 exch2_mydNx(13)=510 exch2_mydNy(13)=510 exch2_nNeighbours(13)=4 exch2_neighbourId(1,13)=28 exch2_iLo(1,13)=0 exch2_iHi(1,13)=35 exch2_jLo(1,13)=52 exch2_jHi(1,13)=52 exch2_opposingSend(1,13)=2 exch2_pij(1,1,13)=1 exch2_pij(2,1,13)=0 exch2_pij(3,1,13)=0 exch2_pij(4,1,13)=1 exch2_oi(1,13)=0 exch2_oj(1,13)=0 exch2_neighbourId(2,13)=898 exch2_iLo(2,13)=0 exch2_iHi(2,13)=35 exch2_jLo(2,13)=0 exch2_jHi(2,13)=0 exch2_opposingSend(2,13)=1 exch2_pij(1,2,13)=1 exch2_pij(2,2,13)=0 exch2_pij(3,2,13)=0 exch2_pij(4,2,13)=1 exch2_oi(2,13)=0 exch2_oj(2,13)=-510 exch2_neighbourId(3,13)=14 exch2_iLo(3,13)=35 exch2_iHi(3,13)=35 exch2_jLo(3,13)=0 exch2_jHi(3,13)=52 exch2_opposingSend(3,13)=4 exch2_pij(1,3,13)=1 exch2_pij(2,3,13)=0 exch2_pij(3,3,13)=0 exch2_pij(4,3,13)=1 exch2_oi(3,13)=0 exch2_oj(3,13)=0 exch2_neighbourId(4,13)=12 exch2_iLo(4,13)=0 exch2_iHi(4,13)=0 exch2_jLo(4,13)=0 exch2_jHi(4,13)=52 exch2_opposingSend(4,13)=3 exch2_pij(1,4,13)=1 exch2_pij(2,4,13)=0 exch2_pij(3,4,13)=0 exch2_pij(4,4,13)=1 exch2_oi(4,13)=0 exch2_oj(4,13)=0 RETURN END SUBROUTINE W2_E2SETUP_14 C Topology for tile 14 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(14)=34 exch2_tNy(14)=51 exch2_tBasex(14)=442 exch2_tBasey(14)=0 exch2_txGlobalo(14)=443 exch2_tyGlobalo(14)=1 exch2_isWedge(14)=0 exch2_isNedge(14)=0 exch2_isEedge(14)=0 exch2_isSedge(14)=1 exch2_myFace(14)=1 exch2_mydNx(14)=510 exch2_mydNy(14)=510 exch2_nNeighbours(14)=4 exch2_neighbourId(1,14)=29 exch2_iLo(1,14)=0 exch2_iHi(1,14)=35 exch2_jLo(1,14)=52 exch2_jHi(1,14)=52 exch2_opposingSend(1,14)=2 exch2_pij(1,1,14)=1 exch2_pij(2,1,14)=0 exch2_pij(3,1,14)=0 exch2_pij(4,1,14)=1 exch2_oi(1,14)=0 exch2_oj(1,14)=0 exch2_neighbourId(2,14)=899 exch2_iLo(2,14)=0 exch2_iHi(2,14)=35 exch2_jLo(2,14)=0 exch2_jHi(2,14)=0 exch2_opposingSend(2,14)=1 exch2_pij(1,2,14)=1 exch2_pij(2,2,14)=0 exch2_pij(3,2,14)=0 exch2_pij(4,2,14)=1 exch2_oi(2,14)=0 exch2_oj(2,14)=-510 exch2_neighbourId(3,14)=15 exch2_iLo(3,14)=35 exch2_iHi(3,14)=35 exch2_jLo(3,14)=0 exch2_jHi(3,14)=52 exch2_opposingSend(3,14)=4 exch2_pij(1,3,14)=1 exch2_pij(2,3,14)=0 exch2_pij(3,3,14)=0 exch2_pij(4,3,14)=1 exch2_oi(3,14)=0 exch2_oj(3,14)=0 exch2_neighbourId(4,14)=13 exch2_iLo(4,14)=0 exch2_iHi(4,14)=0 exch2_jLo(4,14)=0 exch2_jHi(4,14)=52 exch2_opposingSend(4,14)=3 exch2_pij(1,4,14)=1 exch2_pij(2,4,14)=0 exch2_pij(3,4,14)=0 exch2_pij(4,4,14)=1 exch2_oi(4,14)=0 exch2_oj(4,14)=0 RETURN END SUBROUTINE W2_E2SETUP_15 C Topology for tile 15 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(15)=34 exch2_tNy(15)=51 exch2_tBasex(15)=476 exch2_tBasey(15)=0 exch2_txGlobalo(15)=477 exch2_tyGlobalo(15)=1 exch2_isWedge(15)=0 exch2_isNedge(15)=0 exch2_isEedge(15)=1 exch2_isSedge(15)=1 exch2_myFace(15)=1 exch2_mydNx(15)=510 exch2_mydNy(15)=510 exch2_nNeighbours(15)=4 exch2_neighbourId(1,15)=30 exch2_iLo(1,15)=0 exch2_iHi(1,15)=35 exch2_jLo(1,15)=52 exch2_jHi(1,15)=52 exch2_opposingSend(1,15)=2 exch2_pij(1,1,15)=1 exch2_pij(2,1,15)=0 exch2_pij(3,1,15)=0 exch2_pij(4,1,15)=1 exch2_oi(1,15)=0 exch2_oj(1,15)=0 exch2_neighbourId(2,15)=900 exch2_iLo(2,15)=0 exch2_iHi(2,15)=35 exch2_jLo(2,15)=0 exch2_jHi(2,15)=0 exch2_opposingSend(2,15)=1 exch2_pij(1,2,15)=1 exch2_pij(2,2,15)=0 exch2_pij(3,2,15)=0 exch2_pij(4,2,15)=1 exch2_oi(2,15)=0 exch2_oj(2,15)=-510 exch2_neighbourId(3,15)=151 exch2_iLo(3,15)=35 exch2_iHi(3,15)=35 exch2_jLo(3,15)=0 exch2_jHi(3,15)=52 exch2_opposingSend(3,15)=4 exch2_pij(1,3,15)=1 exch2_pij(2,3,15)=0 exch2_pij(3,3,15)=0 exch2_pij(4,3,15)=1 exch2_oi(3,15)=510 exch2_oj(3,15)=0 exch2_neighbourId(4,15)=14 exch2_iLo(4,15)=0 exch2_iHi(4,15)=0 exch2_jLo(4,15)=0 exch2_jHi(4,15)=52 exch2_opposingSend(4,15)=3 exch2_pij(1,4,15)=1 exch2_pij(2,4,15)=0 exch2_pij(3,4,15)=0 exch2_pij(4,4,15)=1 exch2_oi(4,15)=0 exch2_oj(4,15)=0 RETURN END SUBROUTINE W2_E2SETUP_16 C Topology for tile 16 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(16)=34 exch2_tNy(16)=51 exch2_tBasex(16)=0 exch2_tBasey(16)=51 exch2_txGlobalo(16)=1 exch2_tyGlobalo(16)=52 exch2_isWedge(16)=1 exch2_isNedge(16)=0 exch2_isEedge(16)=0 exch2_isSedge(16)=0 exch2_myFace(16)=1 exch2_mydNx(16)=510 exch2_mydNy(16)=510 exch2_nNeighbours(16)=5 exch2_neighbourId(1,16)=31 exch2_iLo(1,16)=0 exch2_iHi(1,16)=35 exch2_jLo(1,16)=52 exch2_jHi(1,16)=52 exch2_opposingSend(1,16)=2 exch2_pij(1,1,16)=1 exch2_pij(2,1,16)=0 exch2_pij(3,1,16)=0 exch2_pij(4,1,16)=1 exch2_oi(1,16)=0 exch2_oj(1,16)=0 exch2_neighbourId(2,16)=1 exch2_iLo(2,16)=0 exch2_iHi(2,16)=35 exch2_jLo(2,16)=0 exch2_jHi(2,16)=0 exch2_opposingSend(2,16)=1 exch2_pij(1,2,16)=1 exch2_pij(2,2,16)=0 exch2_pij(3,2,16)=0 exch2_pij(4,2,16)=1 exch2_oi(2,16)=0 exch2_oj(2,16)=0 exch2_neighbourId(3,16)=17 exch2_iLo(3,16)=35 exch2_iHi(3,16)=35 exch2_jLo(3,16)=0 exch2_jHi(3,16)=52 exch2_opposingSend(3,16)=4 exch2_pij(1,3,16)=1 exch2_pij(2,3,16)=0 exch2_pij(3,3,16)=0 exch2_pij(4,3,16)=1 exch2_oi(3,16)=0 exch2_oj(3,16)=0 exch2_neighbourId(4,16)=748 exch2_iLo(4,16)=0 exch2_iHi(4,16)=0 exch2_jLo(4,16)=17 exch2_jHi(4,16)=52 exch2_opposingSend(4,16)=1 exch2_pij(1,4,16)=0 exch2_pij(2,4,16)=1 exch2_pij(3,4,16)=-1 exch2_pij(4,4,16)=0 exch2_oi(4,16)=-510 exch2_oj(4,16)=511 exch2_neighbourId(5,16)=749 exch2_iLo(5,16)=0 exch2_iHi(5,16)=0 exch2_jLo(5,16)=0 exch2_jHi(5,16)=18 exch2_opposingSend(5,16)=2 exch2_pij(1,5,16)=0 exch2_pij(2,5,16)=1 exch2_pij(3,5,16)=-1 exch2_pij(4,5,16)=0 exch2_oi(5,16)=-510 exch2_oj(5,16)=511 RETURN END SUBROUTINE W2_E2SETUP_17 C Topology for tile 17 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(17)=34 exch2_tNy(17)=51 exch2_tBasex(17)=34 exch2_tBasey(17)=51 exch2_txGlobalo(17)=35 exch2_tyGlobalo(17)=52 exch2_isWedge(17)=0 exch2_isNedge(17)=0 exch2_isEedge(17)=0 exch2_isSedge(17)=0 exch2_myFace(17)=1 exch2_mydNx(17)=510 exch2_mydNy(17)=510 exch2_nNeighbours(17)=4 exch2_neighbourId(1,17)=32 exch2_iLo(1,17)=0 exch2_iHi(1,17)=35 exch2_jLo(1,17)=52 exch2_jHi(1,17)=52 exch2_opposingSend(1,17)=2 exch2_pij(1,1,17)=1 exch2_pij(2,1,17)=0 exch2_pij(3,1,17)=0 exch2_pij(4,1,17)=1 exch2_oi(1,17)=0 exch2_oj(1,17)=0 exch2_neighbourId(2,17)=2 exch2_iLo(2,17)=0 exch2_iHi(2,17)=35 exch2_jLo(2,17)=0 exch2_jHi(2,17)=0 exch2_opposingSend(2,17)=1 exch2_pij(1,2,17)=1 exch2_pij(2,2,17)=0 exch2_pij(3,2,17)=0 exch2_pij(4,2,17)=1 exch2_oi(2,17)=0 exch2_oj(2,17)=0 exch2_neighbourId(3,17)=18 exch2_iLo(3,17)=35 exch2_iHi(3,17)=35 exch2_jLo(3,17)=0 exch2_jHi(3,17)=52 exch2_opposingSend(3,17)=4 exch2_pij(1,3,17)=1 exch2_pij(2,3,17)=0 exch2_pij(3,3,17)=0 exch2_pij(4,3,17)=1 exch2_oi(3,17)=0 exch2_oj(3,17)=0 exch2_neighbourId(4,17)=16 exch2_iLo(4,17)=0 exch2_iHi(4,17)=0 exch2_jLo(4,17)=0 exch2_jHi(4,17)=52 exch2_opposingSend(4,17)=3 exch2_pij(1,4,17)=1 exch2_pij(2,4,17)=0 exch2_pij(3,4,17)=0 exch2_pij(4,4,17)=1 exch2_oi(4,17)=0 exch2_oj(4,17)=0 RETURN END SUBROUTINE W2_E2SETUP_18 C Topology for tile 18 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(18)=34 exch2_tNy(18)=51 exch2_tBasex(18)=68 exch2_tBasey(18)=51 exch2_txGlobalo(18)=69 exch2_tyGlobalo(18)=52 exch2_isWedge(18)=0 exch2_isNedge(18)=0 exch2_isEedge(18)=0 exch2_isSedge(18)=0 exch2_myFace(18)=1 exch2_mydNx(18)=510 exch2_mydNy(18)=510 exch2_nNeighbours(18)=4 exch2_neighbourId(1,18)=33 exch2_iLo(1,18)=0 exch2_iHi(1,18)=35 exch2_jLo(1,18)=52 exch2_jHi(1,18)=52 exch2_opposingSend(1,18)=2 exch2_pij(1,1,18)=1 exch2_pij(2,1,18)=0 exch2_pij(3,1,18)=0 exch2_pij(4,1,18)=1 exch2_oi(1,18)=0 exch2_oj(1,18)=0 exch2_neighbourId(2,18)=3 exch2_iLo(2,18)=0 exch2_iHi(2,18)=35 exch2_jLo(2,18)=0 exch2_jHi(2,18)=0 exch2_opposingSend(2,18)=1 exch2_pij(1,2,18)=1 exch2_pij(2,2,18)=0 exch2_pij(3,2,18)=0 exch2_pij(4,2,18)=1 exch2_oi(2,18)=0 exch2_oj(2,18)=0 exch2_neighbourId(3,18)=19 exch2_iLo(3,18)=35 exch2_iHi(3,18)=35 exch2_jLo(3,18)=0 exch2_jHi(3,18)=52 exch2_opposingSend(3,18)=4 exch2_pij(1,3,18)=1 exch2_pij(2,3,18)=0 exch2_pij(3,3,18)=0 exch2_pij(4,3,18)=1 exch2_oi(3,18)=0 exch2_oj(3,18)=0 exch2_neighbourId(4,18)=17 exch2_iLo(4,18)=0 exch2_iHi(4,18)=0 exch2_jLo(4,18)=0 exch2_jHi(4,18)=52 exch2_opposingSend(4,18)=3 exch2_pij(1,4,18)=1 exch2_pij(2,4,18)=0 exch2_pij(3,4,18)=0 exch2_pij(4,4,18)=1 exch2_oi(4,18)=0 exch2_oj(4,18)=0 RETURN END SUBROUTINE W2_E2SETUP_19 C Topology for tile 19 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(19)=34 exch2_tNy(19)=51 exch2_tBasex(19)=102 exch2_tBasey(19)=51 exch2_txGlobalo(19)=103 exch2_tyGlobalo(19)=52 exch2_isWedge(19)=0 exch2_isNedge(19)=0 exch2_isEedge(19)=0 exch2_isSedge(19)=0 exch2_myFace(19)=1 exch2_mydNx(19)=510 exch2_mydNy(19)=510 exch2_nNeighbours(19)=4 exch2_neighbourId(1,19)=34 exch2_iLo(1,19)=0 exch2_iHi(1,19)=35 exch2_jLo(1,19)=52 exch2_jHi(1,19)=52 exch2_opposingSend(1,19)=2 exch2_pij(1,1,19)=1 exch2_pij(2,1,19)=0 exch2_pij(3,1,19)=0 exch2_pij(4,1,19)=1 exch2_oi(1,19)=0 exch2_oj(1,19)=0 exch2_neighbourId(2,19)=4 exch2_iLo(2,19)=0 exch2_iHi(2,19)=35 exch2_jLo(2,19)=0 exch2_jHi(2,19)=0 exch2_opposingSend(2,19)=1 exch2_pij(1,2,19)=1 exch2_pij(2,2,19)=0 exch2_pij(3,2,19)=0 exch2_pij(4,2,19)=1 exch2_oi(2,19)=0 exch2_oj(2,19)=0 exch2_neighbourId(3,19)=20 exch2_iLo(3,19)=35 exch2_iHi(3,19)=35 exch2_jLo(3,19)=0 exch2_jHi(3,19)=52 exch2_opposingSend(3,19)=4 exch2_pij(1,3,19)=1 exch2_pij(2,3,19)=0 exch2_pij(3,3,19)=0 exch2_pij(4,3,19)=1 exch2_oi(3,19)=0 exch2_oj(3,19)=0 exch2_neighbourId(4,19)=18 exch2_iLo(4,19)=0 exch2_iHi(4,19)=0 exch2_jLo(4,19)=0 exch2_jHi(4,19)=52 exch2_opposingSend(4,19)=3 exch2_pij(1,4,19)=1 exch2_pij(2,4,19)=0 exch2_pij(3,4,19)=0 exch2_pij(4,4,19)=1 exch2_oi(4,19)=0 exch2_oj(4,19)=0 RETURN END SUBROUTINE W2_E2SETUP_20 C Topology for tile 20 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(20)=34 exch2_tNy(20)=51 exch2_tBasex(20)=136 exch2_tBasey(20)=51 exch2_txGlobalo(20)=137 exch2_tyGlobalo(20)=52 exch2_isWedge(20)=0 exch2_isNedge(20)=0 exch2_isEedge(20)=0 exch2_isSedge(20)=0 exch2_myFace(20)=1 exch2_mydNx(20)=510 exch2_mydNy(20)=510 exch2_nNeighbours(20)=4 exch2_neighbourId(1,20)=35 exch2_iLo(1,20)=0 exch2_iHi(1,20)=35 exch2_jLo(1,20)=52 exch2_jHi(1,20)=52 exch2_opposingSend(1,20)=2 exch2_pij(1,1,20)=1 exch2_pij(2,1,20)=0 exch2_pij(3,1,20)=0 exch2_pij(4,1,20)=1 exch2_oi(1,20)=0 exch2_oj(1,20)=0 exch2_neighbourId(2,20)=5 exch2_iLo(2,20)=0 exch2_iHi(2,20)=35 exch2_jLo(2,20)=0 exch2_jHi(2,20)=0 exch2_opposingSend(2,20)=1 exch2_pij(1,2,20)=1 exch2_pij(2,2,20)=0 exch2_pij(3,2,20)=0 exch2_pij(4,2,20)=1 exch2_oi(2,20)=0 exch2_oj(2,20)=0 exch2_neighbourId(3,20)=21 exch2_iLo(3,20)=35 exch2_iHi(3,20)=35 exch2_jLo(3,20)=0 exch2_jHi(3,20)=52 exch2_opposingSend(3,20)=4 exch2_pij(1,3,20)=1 exch2_pij(2,3,20)=0 exch2_pij(3,3,20)=0 exch2_pij(4,3,20)=1 exch2_oi(3,20)=0 exch2_oj(3,20)=0 exch2_neighbourId(4,20)=19 exch2_iLo(4,20)=0 exch2_iHi(4,20)=0 exch2_jLo(4,20)=0 exch2_jHi(4,20)=52 exch2_opposingSend(4,20)=3 exch2_pij(1,4,20)=1 exch2_pij(2,4,20)=0 exch2_pij(3,4,20)=0 exch2_pij(4,4,20)=1 exch2_oi(4,20)=0 exch2_oj(4,20)=0 RETURN END SUBROUTINE W2_E2SETUP_21 C Topology for tile 21 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(21)=34 exch2_tNy(21)=51 exch2_tBasex(21)=170 exch2_tBasey(21)=51 exch2_txGlobalo(21)=171 exch2_tyGlobalo(21)=52 exch2_isWedge(21)=0 exch2_isNedge(21)=0 exch2_isEedge(21)=0 exch2_isSedge(21)=0 exch2_myFace(21)=1 exch2_mydNx(21)=510 exch2_mydNy(21)=510 exch2_nNeighbours(21)=4 exch2_neighbourId(1,21)=36 exch2_iLo(1,21)=0 exch2_iHi(1,21)=35 exch2_jLo(1,21)=52 exch2_jHi(1,21)=52 exch2_opposingSend(1,21)=2 exch2_pij(1,1,21)=1 exch2_pij(2,1,21)=0 exch2_pij(3,1,21)=0 exch2_pij(4,1,21)=1 exch2_oi(1,21)=0 exch2_oj(1,21)=0 exch2_neighbourId(2,21)=6 exch2_iLo(2,21)=0 exch2_iHi(2,21)=35 exch2_jLo(2,21)=0 exch2_jHi(2,21)=0 exch2_opposingSend(2,21)=1 exch2_pij(1,2,21)=1 exch2_pij(2,2,21)=0 exch2_pij(3,2,21)=0 exch2_pij(4,2,21)=1 exch2_oi(2,21)=0 exch2_oj(2,21)=0 exch2_neighbourId(3,21)=22 exch2_iLo(3,21)=35 exch2_iHi(3,21)=35 exch2_jLo(3,21)=0 exch2_jHi(3,21)=52 exch2_opposingSend(3,21)=4 exch2_pij(1,3,21)=1 exch2_pij(2,3,21)=0 exch2_pij(3,3,21)=0 exch2_pij(4,3,21)=1 exch2_oi(3,21)=0 exch2_oj(3,21)=0 exch2_neighbourId(4,21)=20 exch2_iLo(4,21)=0 exch2_iHi(4,21)=0 exch2_jLo(4,21)=0 exch2_jHi(4,21)=52 exch2_opposingSend(4,21)=3 exch2_pij(1,4,21)=1 exch2_pij(2,4,21)=0 exch2_pij(3,4,21)=0 exch2_pij(4,4,21)=1 exch2_oi(4,21)=0 exch2_oj(4,21)=0 RETURN END SUBROUTINE W2_E2SETUP_22 C Topology for tile 22 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(22)=34 exch2_tNy(22)=51 exch2_tBasex(22)=204 exch2_tBasey(22)=51 exch2_txGlobalo(22)=205 exch2_tyGlobalo(22)=52 exch2_isWedge(22)=0 exch2_isNedge(22)=0 exch2_isEedge(22)=0 exch2_isSedge(22)=0 exch2_myFace(22)=1 exch2_mydNx(22)=510 exch2_mydNy(22)=510 exch2_nNeighbours(22)=4 exch2_neighbourId(1,22)=37 exch2_iLo(1,22)=0 exch2_iHi(1,22)=35 exch2_jLo(1,22)=52 exch2_jHi(1,22)=52 exch2_opposingSend(1,22)=2 exch2_pij(1,1,22)=1 exch2_pij(2,1,22)=0 exch2_pij(3,1,22)=0 exch2_pij(4,1,22)=1 exch2_oi(1,22)=0 exch2_oj(1,22)=0 exch2_neighbourId(2,22)=7 exch2_iLo(2,22)=0 exch2_iHi(2,22)=35 exch2_jLo(2,22)=0 exch2_jHi(2,22)=0 exch2_opposingSend(2,22)=1 exch2_pij(1,2,22)=1 exch2_pij(2,2,22)=0 exch2_pij(3,2,22)=0 exch2_pij(4,2,22)=1 exch2_oi(2,22)=0 exch2_oj(2,22)=0 exch2_neighbourId(3,22)=23 exch2_iLo(3,22)=35 exch2_iHi(3,22)=35 exch2_jLo(3,22)=0 exch2_jHi(3,22)=52 exch2_opposingSend(3,22)=4 exch2_pij(1,3,22)=1 exch2_pij(2,3,22)=0 exch2_pij(3,3,22)=0 exch2_pij(4,3,22)=1 exch2_oi(3,22)=0 exch2_oj(3,22)=0 exch2_neighbourId(4,22)=21 exch2_iLo(4,22)=0 exch2_iHi(4,22)=0 exch2_jLo(4,22)=0 exch2_jHi(4,22)=52 exch2_opposingSend(4,22)=3 exch2_pij(1,4,22)=1 exch2_pij(2,4,22)=0 exch2_pij(3,4,22)=0 exch2_pij(4,4,22)=1 exch2_oi(4,22)=0 exch2_oj(4,22)=0 RETURN END SUBROUTINE W2_E2SETUP_23 C Topology for tile 23 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(23)=34 exch2_tNy(23)=51 exch2_tBasex(23)=238 exch2_tBasey(23)=51 exch2_txGlobalo(23)=239 exch2_tyGlobalo(23)=52 exch2_isWedge(23)=0 exch2_isNedge(23)=0 exch2_isEedge(23)=0 exch2_isSedge(23)=0 exch2_myFace(23)=1 exch2_mydNx(23)=510 exch2_mydNy(23)=510 exch2_nNeighbours(23)=4 exch2_neighbourId(1,23)=38 exch2_iLo(1,23)=0 exch2_iHi(1,23)=35 exch2_jLo(1,23)=52 exch2_jHi(1,23)=52 exch2_opposingSend(1,23)=2 exch2_pij(1,1,23)=1 exch2_pij(2,1,23)=0 exch2_pij(3,1,23)=0 exch2_pij(4,1,23)=1 exch2_oi(1,23)=0 exch2_oj(1,23)=0 exch2_neighbourId(2,23)=8 exch2_iLo(2,23)=0 exch2_iHi(2,23)=35 exch2_jLo(2,23)=0 exch2_jHi(2,23)=0 exch2_opposingSend(2,23)=1 exch2_pij(1,2,23)=1 exch2_pij(2,2,23)=0 exch2_pij(3,2,23)=0 exch2_pij(4,2,23)=1 exch2_oi(2,23)=0 exch2_oj(2,23)=0 exch2_neighbourId(3,23)=24 exch2_iLo(3,23)=35 exch2_iHi(3,23)=35 exch2_jLo(3,23)=0 exch2_jHi(3,23)=52 exch2_opposingSend(3,23)=4 exch2_pij(1,3,23)=1 exch2_pij(2,3,23)=0 exch2_pij(3,3,23)=0 exch2_pij(4,3,23)=1 exch2_oi(3,23)=0 exch2_oj(3,23)=0 exch2_neighbourId(4,23)=22 exch2_iLo(4,23)=0 exch2_iHi(4,23)=0 exch2_jLo(4,23)=0 exch2_jHi(4,23)=52 exch2_opposingSend(4,23)=3 exch2_pij(1,4,23)=1 exch2_pij(2,4,23)=0 exch2_pij(3,4,23)=0 exch2_pij(4,4,23)=1 exch2_oi(4,23)=0 exch2_oj(4,23)=0 RETURN END SUBROUTINE W2_E2SETUP_24 C Topology for tile 24 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(24)=34 exch2_tNy(24)=51 exch2_tBasex(24)=272 exch2_tBasey(24)=51 exch2_txGlobalo(24)=273 exch2_tyGlobalo(24)=52 exch2_isWedge(24)=0 exch2_isNedge(24)=0 exch2_isEedge(24)=0 exch2_isSedge(24)=0 exch2_myFace(24)=1 exch2_mydNx(24)=510 exch2_mydNy(24)=510 exch2_nNeighbours(24)=4 exch2_neighbourId(1,24)=39 exch2_iLo(1,24)=0 exch2_iHi(1,24)=35 exch2_jLo(1,24)=52 exch2_jHi(1,24)=52 exch2_opposingSend(1,24)=2 exch2_pij(1,1,24)=1 exch2_pij(2,1,24)=0 exch2_pij(3,1,24)=0 exch2_pij(4,1,24)=1 exch2_oi(1,24)=0 exch2_oj(1,24)=0 exch2_neighbourId(2,24)=9 exch2_iLo(2,24)=0 exch2_iHi(2,24)=35 exch2_jLo(2,24)=0 exch2_jHi(2,24)=0 exch2_opposingSend(2,24)=1 exch2_pij(1,2,24)=1 exch2_pij(2,2,24)=0 exch2_pij(3,2,24)=0 exch2_pij(4,2,24)=1 exch2_oi(2,24)=0 exch2_oj(2,24)=0 exch2_neighbourId(3,24)=25 exch2_iLo(3,24)=35 exch2_iHi(3,24)=35 exch2_jLo(3,24)=0 exch2_jHi(3,24)=52 exch2_opposingSend(3,24)=4 exch2_pij(1,3,24)=1 exch2_pij(2,3,24)=0 exch2_pij(3,3,24)=0 exch2_pij(4,3,24)=1 exch2_oi(3,24)=0 exch2_oj(3,24)=0 exch2_neighbourId(4,24)=23 exch2_iLo(4,24)=0 exch2_iHi(4,24)=0 exch2_jLo(4,24)=0 exch2_jHi(4,24)=52 exch2_opposingSend(4,24)=3 exch2_pij(1,4,24)=1 exch2_pij(2,4,24)=0 exch2_pij(3,4,24)=0 exch2_pij(4,4,24)=1 exch2_oi(4,24)=0 exch2_oj(4,24)=0 RETURN END SUBROUTINE W2_E2SETUP_25 C Topology for tile 25 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(25)=34 exch2_tNy(25)=51 exch2_tBasex(25)=306 exch2_tBasey(25)=51 exch2_txGlobalo(25)=307 exch2_tyGlobalo(25)=52 exch2_isWedge(25)=0 exch2_isNedge(25)=0 exch2_isEedge(25)=0 exch2_isSedge(25)=0 exch2_myFace(25)=1 exch2_mydNx(25)=510 exch2_mydNy(25)=510 exch2_nNeighbours(25)=4 exch2_neighbourId(1,25)=40 exch2_iLo(1,25)=0 exch2_iHi(1,25)=35 exch2_jLo(1,25)=52 exch2_jHi(1,25)=52 exch2_opposingSend(1,25)=2 exch2_pij(1,1,25)=1 exch2_pij(2,1,25)=0 exch2_pij(3,1,25)=0 exch2_pij(4,1,25)=1 exch2_oi(1,25)=0 exch2_oj(1,25)=0 exch2_neighbourId(2,25)=10 exch2_iLo(2,25)=0 exch2_iHi(2,25)=35 exch2_jLo(2,25)=0 exch2_jHi(2,25)=0 exch2_opposingSend(2,25)=1 exch2_pij(1,2,25)=1 exch2_pij(2,2,25)=0 exch2_pij(3,2,25)=0 exch2_pij(4,2,25)=1 exch2_oi(2,25)=0 exch2_oj(2,25)=0 exch2_neighbourId(3,25)=26 exch2_iLo(3,25)=35 exch2_iHi(3,25)=35 exch2_jLo(3,25)=0 exch2_jHi(3,25)=52 exch2_opposingSend(3,25)=4 exch2_pij(1,3,25)=1 exch2_pij(2,3,25)=0 exch2_pij(3,3,25)=0 exch2_pij(4,3,25)=1 exch2_oi(3,25)=0 exch2_oj(3,25)=0 exch2_neighbourId(4,25)=24 exch2_iLo(4,25)=0 exch2_iHi(4,25)=0 exch2_jLo(4,25)=0 exch2_jHi(4,25)=52 exch2_opposingSend(4,25)=3 exch2_pij(1,4,25)=1 exch2_pij(2,4,25)=0 exch2_pij(3,4,25)=0 exch2_pij(4,4,25)=1 exch2_oi(4,25)=0 exch2_oj(4,25)=0 RETURN END SUBROUTINE W2_E2SETUP_26 C Topology for tile 26 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(26)=34 exch2_tNy(26)=51 exch2_tBasex(26)=340 exch2_tBasey(26)=51 exch2_txGlobalo(26)=341 exch2_tyGlobalo(26)=52 exch2_isWedge(26)=0 exch2_isNedge(26)=0 exch2_isEedge(26)=0 exch2_isSedge(26)=0 exch2_myFace(26)=1 exch2_mydNx(26)=510 exch2_mydNy(26)=510 exch2_nNeighbours(26)=4 exch2_neighbourId(1,26)=41 exch2_iLo(1,26)=0 exch2_iHi(1,26)=35 exch2_jLo(1,26)=52 exch2_jHi(1,26)=52 exch2_opposingSend(1,26)=2 exch2_pij(1,1,26)=1 exch2_pij(2,1,26)=0 exch2_pij(3,1,26)=0 exch2_pij(4,1,26)=1 exch2_oi(1,26)=0 exch2_oj(1,26)=0 exch2_neighbourId(2,26)=11 exch2_iLo(2,26)=0 exch2_iHi(2,26)=35 exch2_jLo(2,26)=0 exch2_jHi(2,26)=0 exch2_opposingSend(2,26)=1 exch2_pij(1,2,26)=1 exch2_pij(2,2,26)=0 exch2_pij(3,2,26)=0 exch2_pij(4,2,26)=1 exch2_oi(2,26)=0 exch2_oj(2,26)=0 exch2_neighbourId(3,26)=27 exch2_iLo(3,26)=35 exch2_iHi(3,26)=35 exch2_jLo(3,26)=0 exch2_jHi(3,26)=52 exch2_opposingSend(3,26)=4 exch2_pij(1,3,26)=1 exch2_pij(2,3,26)=0 exch2_pij(3,3,26)=0 exch2_pij(4,3,26)=1 exch2_oi(3,26)=0 exch2_oj(3,26)=0 exch2_neighbourId(4,26)=25 exch2_iLo(4,26)=0 exch2_iHi(4,26)=0 exch2_jLo(4,26)=0 exch2_jHi(4,26)=52 exch2_opposingSend(4,26)=3 exch2_pij(1,4,26)=1 exch2_pij(2,4,26)=0 exch2_pij(3,4,26)=0 exch2_pij(4,4,26)=1 exch2_oi(4,26)=0 exch2_oj(4,26)=0 RETURN END SUBROUTINE W2_E2SETUP_27 C Topology for tile 27 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(27)=34 exch2_tNy(27)=51 exch2_tBasex(27)=374 exch2_tBasey(27)=51 exch2_txGlobalo(27)=375 exch2_tyGlobalo(27)=52 exch2_isWedge(27)=0 exch2_isNedge(27)=0 exch2_isEedge(27)=0 exch2_isSedge(27)=0 exch2_myFace(27)=1 exch2_mydNx(27)=510 exch2_mydNy(27)=510 exch2_nNeighbours(27)=4 exch2_neighbourId(1,27)=42 exch2_iLo(1,27)=0 exch2_iHi(1,27)=35 exch2_jLo(1,27)=52 exch2_jHi(1,27)=52 exch2_opposingSend(1,27)=2 exch2_pij(1,1,27)=1 exch2_pij(2,1,27)=0 exch2_pij(3,1,27)=0 exch2_pij(4,1,27)=1 exch2_oi(1,27)=0 exch2_oj(1,27)=0 exch2_neighbourId(2,27)=12 exch2_iLo(2,27)=0 exch2_iHi(2,27)=35 exch2_jLo(2,27)=0 exch2_jHi(2,27)=0 exch2_opposingSend(2,27)=1 exch2_pij(1,2,27)=1 exch2_pij(2,2,27)=0 exch2_pij(3,2,27)=0 exch2_pij(4,2,27)=1 exch2_oi(2,27)=0 exch2_oj(2,27)=0 exch2_neighbourId(3,27)=28 exch2_iLo(3,27)=35 exch2_iHi(3,27)=35 exch2_jLo(3,27)=0 exch2_jHi(3,27)=52 exch2_opposingSend(3,27)=4 exch2_pij(1,3,27)=1 exch2_pij(2,3,27)=0 exch2_pij(3,3,27)=0 exch2_pij(4,3,27)=1 exch2_oi(3,27)=0 exch2_oj(3,27)=0 exch2_neighbourId(4,27)=26 exch2_iLo(4,27)=0 exch2_iHi(4,27)=0 exch2_jLo(4,27)=0 exch2_jHi(4,27)=52 exch2_opposingSend(4,27)=3 exch2_pij(1,4,27)=1 exch2_pij(2,4,27)=0 exch2_pij(3,4,27)=0 exch2_pij(4,4,27)=1 exch2_oi(4,27)=0 exch2_oj(4,27)=0 RETURN END SUBROUTINE W2_E2SETUP_28 C Topology for tile 28 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(28)=34 exch2_tNy(28)=51 exch2_tBasex(28)=408 exch2_tBasey(28)=51 exch2_txGlobalo(28)=409 exch2_tyGlobalo(28)=52 exch2_isWedge(28)=0 exch2_isNedge(28)=0 exch2_isEedge(28)=0 exch2_isSedge(28)=0 exch2_myFace(28)=1 exch2_mydNx(28)=510 exch2_mydNy(28)=510 exch2_nNeighbours(28)=4 exch2_neighbourId(1,28)=43 exch2_iLo(1,28)=0 exch2_iHi(1,28)=35 exch2_jLo(1,28)=52 exch2_jHi(1,28)=52 exch2_opposingSend(1,28)=2 exch2_pij(1,1,28)=1 exch2_pij(2,1,28)=0 exch2_pij(3,1,28)=0 exch2_pij(4,1,28)=1 exch2_oi(1,28)=0 exch2_oj(1,28)=0 exch2_neighbourId(2,28)=13 exch2_iLo(2,28)=0 exch2_iHi(2,28)=35 exch2_jLo(2,28)=0 exch2_jHi(2,28)=0 exch2_opposingSend(2,28)=1 exch2_pij(1,2,28)=1 exch2_pij(2,2,28)=0 exch2_pij(3,2,28)=0 exch2_pij(4,2,28)=1 exch2_oi(2,28)=0 exch2_oj(2,28)=0 exch2_neighbourId(3,28)=29 exch2_iLo(3,28)=35 exch2_iHi(3,28)=35 exch2_jLo(3,28)=0 exch2_jHi(3,28)=52 exch2_opposingSend(3,28)=4 exch2_pij(1,3,28)=1 exch2_pij(2,3,28)=0 exch2_pij(3,3,28)=0 exch2_pij(4,3,28)=1 exch2_oi(3,28)=0 exch2_oj(3,28)=0 exch2_neighbourId(4,28)=27 exch2_iLo(4,28)=0 exch2_iHi(4,28)=0 exch2_jLo(4,28)=0 exch2_jHi(4,28)=52 exch2_opposingSend(4,28)=3 exch2_pij(1,4,28)=1 exch2_pij(2,4,28)=0 exch2_pij(3,4,28)=0 exch2_pij(4,4,28)=1 exch2_oi(4,28)=0 exch2_oj(4,28)=0 RETURN END SUBROUTINE W2_E2SETUP_29 C Topology for tile 29 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(29)=34 exch2_tNy(29)=51 exch2_tBasex(29)=442 exch2_tBasey(29)=51 exch2_txGlobalo(29)=443 exch2_tyGlobalo(29)=52 exch2_isWedge(29)=0 exch2_isNedge(29)=0 exch2_isEedge(29)=0 exch2_isSedge(29)=0 exch2_myFace(29)=1 exch2_mydNx(29)=510 exch2_mydNy(29)=510 exch2_nNeighbours(29)=4 exch2_neighbourId(1,29)=44 exch2_iLo(1,29)=0 exch2_iHi(1,29)=35 exch2_jLo(1,29)=52 exch2_jHi(1,29)=52 exch2_opposingSend(1,29)=2 exch2_pij(1,1,29)=1 exch2_pij(2,1,29)=0 exch2_pij(3,1,29)=0 exch2_pij(4,1,29)=1 exch2_oi(1,29)=0 exch2_oj(1,29)=0 exch2_neighbourId(2,29)=14 exch2_iLo(2,29)=0 exch2_iHi(2,29)=35 exch2_jLo(2,29)=0 exch2_jHi(2,29)=0 exch2_opposingSend(2,29)=1 exch2_pij(1,2,29)=1 exch2_pij(2,2,29)=0 exch2_pij(3,2,29)=0 exch2_pij(4,2,29)=1 exch2_oi(2,29)=0 exch2_oj(2,29)=0 exch2_neighbourId(3,29)=30 exch2_iLo(3,29)=35 exch2_iHi(3,29)=35 exch2_jLo(3,29)=0 exch2_jHi(3,29)=52 exch2_opposingSend(3,29)=4 exch2_pij(1,3,29)=1 exch2_pij(2,3,29)=0 exch2_pij(3,3,29)=0 exch2_pij(4,3,29)=1 exch2_oi(3,29)=0 exch2_oj(3,29)=0 exch2_neighbourId(4,29)=28 exch2_iLo(4,29)=0 exch2_iHi(4,29)=0 exch2_jLo(4,29)=0 exch2_jHi(4,29)=52 exch2_opposingSend(4,29)=3 exch2_pij(1,4,29)=1 exch2_pij(2,4,29)=0 exch2_pij(3,4,29)=0 exch2_pij(4,4,29)=1 exch2_oi(4,29)=0 exch2_oj(4,29)=0 RETURN END SUBROUTINE W2_E2SETUP_30 C Topology for tile 30 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(30)=34 exch2_tNy(30)=51 exch2_tBasex(30)=476 exch2_tBasey(30)=51 exch2_txGlobalo(30)=477 exch2_tyGlobalo(30)=52 exch2_isWedge(30)=0 exch2_isNedge(30)=0 exch2_isEedge(30)=1 exch2_isSedge(30)=0 exch2_myFace(30)=1 exch2_mydNx(30)=510 exch2_mydNy(30)=510 exch2_nNeighbours(30)=4 exch2_neighbourId(1,30)=45 exch2_iLo(1,30)=0 exch2_iHi(1,30)=35 exch2_jLo(1,30)=52 exch2_jHi(1,30)=52 exch2_opposingSend(1,30)=2 exch2_pij(1,1,30)=1 exch2_pij(2,1,30)=0 exch2_pij(3,1,30)=0 exch2_pij(4,1,30)=1 exch2_oi(1,30)=0 exch2_oj(1,30)=0 exch2_neighbourId(2,30)=15 exch2_iLo(2,30)=0 exch2_iHi(2,30)=35 exch2_jLo(2,30)=0 exch2_jHi(2,30)=0 exch2_opposingSend(2,30)=1 exch2_pij(1,2,30)=1 exch2_pij(2,2,30)=0 exch2_pij(3,2,30)=0 exch2_pij(4,2,30)=1 exch2_oi(2,30)=0 exch2_oj(2,30)=0 exch2_neighbourId(3,30)=166 exch2_iLo(3,30)=35 exch2_iHi(3,30)=35 exch2_jLo(3,30)=0 exch2_jHi(3,30)=52 exch2_opposingSend(3,30)=4 exch2_pij(1,3,30)=1 exch2_pij(2,3,30)=0 exch2_pij(3,3,30)=0 exch2_pij(4,3,30)=1 exch2_oi(3,30)=510 exch2_oj(3,30)=0 exch2_neighbourId(4,30)=29 exch2_iLo(4,30)=0 exch2_iHi(4,30)=0 exch2_jLo(4,30)=0 exch2_jHi(4,30)=52 exch2_opposingSend(4,30)=3 exch2_pij(1,4,30)=1 exch2_pij(2,4,30)=0 exch2_pij(3,4,30)=0 exch2_pij(4,4,30)=1 exch2_oi(4,30)=0 exch2_oj(4,30)=0 RETURN END SUBROUTINE W2_E2SETUP_31 C Topology for tile 31 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(31)=34 exch2_tNy(31)=51 exch2_tBasex(31)=0 exch2_tBasey(31)=102 exch2_txGlobalo(31)=1 exch2_tyGlobalo(31)=103 exch2_isWedge(31)=1 exch2_isNedge(31)=0 exch2_isEedge(31)=0 exch2_isSedge(31)=0 exch2_myFace(31)=1 exch2_mydNx(31)=510 exch2_mydNy(31)=510 exch2_nNeighbours(31)=5 exch2_neighbourId(1,31)=46 exch2_iLo(1,31)=0 exch2_iHi(1,31)=35 exch2_jLo(1,31)=52 exch2_jHi(1,31)=52 exch2_opposingSend(1,31)=2 exch2_pij(1,1,31)=1 exch2_pij(2,1,31)=0 exch2_pij(3,1,31)=0 exch2_pij(4,1,31)=1 exch2_oi(1,31)=0 exch2_oj(1,31)=0 exch2_neighbourId(2,31)=16 exch2_iLo(2,31)=0 exch2_iHi(2,31)=35 exch2_jLo(2,31)=0 exch2_jHi(2,31)=0 exch2_opposingSend(2,31)=1 exch2_pij(1,2,31)=1 exch2_pij(2,2,31)=0 exch2_pij(3,2,31)=0 exch2_pij(4,2,31)=1 exch2_oi(2,31)=0 exch2_oj(2,31)=0 exch2_neighbourId(3,31)=32 exch2_iLo(3,31)=35 exch2_iHi(3,31)=35 exch2_jLo(3,31)=0 exch2_jHi(3,31)=52 exch2_opposingSend(3,31)=4 exch2_pij(1,3,31)=1 exch2_pij(2,3,31)=0 exch2_pij(3,3,31)=0 exch2_pij(4,3,31)=1 exch2_oi(3,31)=0 exch2_oj(3,31)=0 exch2_neighbourId(4,31)=746 exch2_iLo(4,31)=0 exch2_iHi(4,31)=0 exch2_jLo(4,31)=34 exch2_jHi(4,31)=52 exch2_opposingSend(4,31)=1 exch2_pij(1,4,31)=0 exch2_pij(2,4,31)=1 exch2_pij(3,4,31)=-1 exch2_pij(4,4,31)=0 exch2_oi(4,31)=-510 exch2_oj(4,31)=511 exch2_neighbourId(5,31)=747 exch2_iLo(5,31)=0 exch2_iHi(5,31)=0 exch2_jLo(5,31)=0 exch2_jHi(5,31)=35 exch2_opposingSend(5,31)=1 exch2_pij(1,5,31)=0 exch2_pij(2,5,31)=1 exch2_pij(3,5,31)=-1 exch2_pij(4,5,31)=0 exch2_oi(5,31)=-510 exch2_oj(5,31)=511 RETURN END SUBROUTINE W2_E2SETUP_32 C Topology for tile 32 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(32)=34 exch2_tNy(32)=51 exch2_tBasex(32)=34 exch2_tBasey(32)=102 exch2_txGlobalo(32)=35 exch2_tyGlobalo(32)=103 exch2_isWedge(32)=0 exch2_isNedge(32)=0 exch2_isEedge(32)=0 exch2_isSedge(32)=0 exch2_myFace(32)=1 exch2_mydNx(32)=510 exch2_mydNy(32)=510 exch2_nNeighbours(32)=4 exch2_neighbourId(1,32)=47 exch2_iLo(1,32)=0 exch2_iHi(1,32)=35 exch2_jLo(1,32)=52 exch2_jHi(1,32)=52 exch2_opposingSend(1,32)=2 exch2_pij(1,1,32)=1 exch2_pij(2,1,32)=0 exch2_pij(3,1,32)=0 exch2_pij(4,1,32)=1 exch2_oi(1,32)=0 exch2_oj(1,32)=0 exch2_neighbourId(2,32)=17 exch2_iLo(2,32)=0 exch2_iHi(2,32)=35 exch2_jLo(2,32)=0 exch2_jHi(2,32)=0 exch2_opposingSend(2,32)=1 exch2_pij(1,2,32)=1 exch2_pij(2,2,32)=0 exch2_pij(3,2,32)=0 exch2_pij(4,2,32)=1 exch2_oi(2,32)=0 exch2_oj(2,32)=0 exch2_neighbourId(3,32)=33 exch2_iLo(3,32)=35 exch2_iHi(3,32)=35 exch2_jLo(3,32)=0 exch2_jHi(3,32)=52 exch2_opposingSend(3,32)=4 exch2_pij(1,3,32)=1 exch2_pij(2,3,32)=0 exch2_pij(3,3,32)=0 exch2_pij(4,3,32)=1 exch2_oi(3,32)=0 exch2_oj(3,32)=0 exch2_neighbourId(4,32)=31 exch2_iLo(4,32)=0 exch2_iHi(4,32)=0 exch2_jLo(4,32)=0 exch2_jHi(4,32)=52 exch2_opposingSend(4,32)=3 exch2_pij(1,4,32)=1 exch2_pij(2,4,32)=0 exch2_pij(3,4,32)=0 exch2_pij(4,4,32)=1 exch2_oi(4,32)=0 exch2_oj(4,32)=0 RETURN END SUBROUTINE W2_E2SETUP_33 C Topology for tile 33 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(33)=34 exch2_tNy(33)=51 exch2_tBasex(33)=68 exch2_tBasey(33)=102 exch2_txGlobalo(33)=69 exch2_tyGlobalo(33)=103 exch2_isWedge(33)=0 exch2_isNedge(33)=0 exch2_isEedge(33)=0 exch2_isSedge(33)=0 exch2_myFace(33)=1 exch2_mydNx(33)=510 exch2_mydNy(33)=510 exch2_nNeighbours(33)=4 exch2_neighbourId(1,33)=48 exch2_iLo(1,33)=0 exch2_iHi(1,33)=35 exch2_jLo(1,33)=52 exch2_jHi(1,33)=52 exch2_opposingSend(1,33)=2 exch2_pij(1,1,33)=1 exch2_pij(2,1,33)=0 exch2_pij(3,1,33)=0 exch2_pij(4,1,33)=1 exch2_oi(1,33)=0 exch2_oj(1,33)=0 exch2_neighbourId(2,33)=18 exch2_iLo(2,33)=0 exch2_iHi(2,33)=35 exch2_jLo(2,33)=0 exch2_jHi(2,33)=0 exch2_opposingSend(2,33)=1 exch2_pij(1,2,33)=1 exch2_pij(2,2,33)=0 exch2_pij(3,2,33)=0 exch2_pij(4,2,33)=1 exch2_oi(2,33)=0 exch2_oj(2,33)=0 exch2_neighbourId(3,33)=34 exch2_iLo(3,33)=35 exch2_iHi(3,33)=35 exch2_jLo(3,33)=0 exch2_jHi(3,33)=52 exch2_opposingSend(3,33)=4 exch2_pij(1,3,33)=1 exch2_pij(2,3,33)=0 exch2_pij(3,3,33)=0 exch2_pij(4,3,33)=1 exch2_oi(3,33)=0 exch2_oj(3,33)=0 exch2_neighbourId(4,33)=32 exch2_iLo(4,33)=0 exch2_iHi(4,33)=0 exch2_jLo(4,33)=0 exch2_jHi(4,33)=52 exch2_opposingSend(4,33)=3 exch2_pij(1,4,33)=1 exch2_pij(2,4,33)=0 exch2_pij(3,4,33)=0 exch2_pij(4,4,33)=1 exch2_oi(4,33)=0 exch2_oj(4,33)=0 RETURN END SUBROUTINE W2_E2SETUP_34 C Topology for tile 34 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(34)=34 exch2_tNy(34)=51 exch2_tBasex(34)=102 exch2_tBasey(34)=102 exch2_txGlobalo(34)=103 exch2_tyGlobalo(34)=103 exch2_isWedge(34)=0 exch2_isNedge(34)=0 exch2_isEedge(34)=0 exch2_isSedge(34)=0 exch2_myFace(34)=1 exch2_mydNx(34)=510 exch2_mydNy(34)=510 exch2_nNeighbours(34)=4 exch2_neighbourId(1,34)=49 exch2_iLo(1,34)=0 exch2_iHi(1,34)=35 exch2_jLo(1,34)=52 exch2_jHi(1,34)=52 exch2_opposingSend(1,34)=2 exch2_pij(1,1,34)=1 exch2_pij(2,1,34)=0 exch2_pij(3,1,34)=0 exch2_pij(4,1,34)=1 exch2_oi(1,34)=0 exch2_oj(1,34)=0 exch2_neighbourId(2,34)=19 exch2_iLo(2,34)=0 exch2_iHi(2,34)=35 exch2_jLo(2,34)=0 exch2_jHi(2,34)=0 exch2_opposingSend(2,34)=1 exch2_pij(1,2,34)=1 exch2_pij(2,2,34)=0 exch2_pij(3,2,34)=0 exch2_pij(4,2,34)=1 exch2_oi(2,34)=0 exch2_oj(2,34)=0 exch2_neighbourId(3,34)=35 exch2_iLo(3,34)=35 exch2_iHi(3,34)=35 exch2_jLo(3,34)=0 exch2_jHi(3,34)=52 exch2_opposingSend(3,34)=4 exch2_pij(1,3,34)=1 exch2_pij(2,3,34)=0 exch2_pij(3,3,34)=0 exch2_pij(4,3,34)=1 exch2_oi(3,34)=0 exch2_oj(3,34)=0 exch2_neighbourId(4,34)=33 exch2_iLo(4,34)=0 exch2_iHi(4,34)=0 exch2_jLo(4,34)=0 exch2_jHi(4,34)=52 exch2_opposingSend(4,34)=3 exch2_pij(1,4,34)=1 exch2_pij(2,4,34)=0 exch2_pij(3,4,34)=0 exch2_pij(4,4,34)=1 exch2_oi(4,34)=0 exch2_oj(4,34)=0 RETURN END SUBROUTINE W2_E2SETUP_35 C Topology for tile 35 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(35)=34 exch2_tNy(35)=51 exch2_tBasex(35)=136 exch2_tBasey(35)=102 exch2_txGlobalo(35)=137 exch2_tyGlobalo(35)=103 exch2_isWedge(35)=0 exch2_isNedge(35)=0 exch2_isEedge(35)=0 exch2_isSedge(35)=0 exch2_myFace(35)=1 exch2_mydNx(35)=510 exch2_mydNy(35)=510 exch2_nNeighbours(35)=4 exch2_neighbourId(1,35)=50 exch2_iLo(1,35)=0 exch2_iHi(1,35)=35 exch2_jLo(1,35)=52 exch2_jHi(1,35)=52 exch2_opposingSend(1,35)=2 exch2_pij(1,1,35)=1 exch2_pij(2,1,35)=0 exch2_pij(3,1,35)=0 exch2_pij(4,1,35)=1 exch2_oi(1,35)=0 exch2_oj(1,35)=0 exch2_neighbourId(2,35)=20 exch2_iLo(2,35)=0 exch2_iHi(2,35)=35 exch2_jLo(2,35)=0 exch2_jHi(2,35)=0 exch2_opposingSend(2,35)=1 exch2_pij(1,2,35)=1 exch2_pij(2,2,35)=0 exch2_pij(3,2,35)=0 exch2_pij(4,2,35)=1 exch2_oi(2,35)=0 exch2_oj(2,35)=0 exch2_neighbourId(3,35)=36 exch2_iLo(3,35)=35 exch2_iHi(3,35)=35 exch2_jLo(3,35)=0 exch2_jHi(3,35)=52 exch2_opposingSend(3,35)=4 exch2_pij(1,3,35)=1 exch2_pij(2,3,35)=0 exch2_pij(3,3,35)=0 exch2_pij(4,3,35)=1 exch2_oi(3,35)=0 exch2_oj(3,35)=0 exch2_neighbourId(4,35)=34 exch2_iLo(4,35)=0 exch2_iHi(4,35)=0 exch2_jLo(4,35)=0 exch2_jHi(4,35)=52 exch2_opposingSend(4,35)=3 exch2_pij(1,4,35)=1 exch2_pij(2,4,35)=0 exch2_pij(3,4,35)=0 exch2_pij(4,4,35)=1 exch2_oi(4,35)=0 exch2_oj(4,35)=0 RETURN END SUBROUTINE W2_E2SETUP_36 C Topology for tile 36 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(36)=34 exch2_tNy(36)=51 exch2_tBasex(36)=170 exch2_tBasey(36)=102 exch2_txGlobalo(36)=171 exch2_tyGlobalo(36)=103 exch2_isWedge(36)=0 exch2_isNedge(36)=0 exch2_isEedge(36)=0 exch2_isSedge(36)=0 exch2_myFace(36)=1 exch2_mydNx(36)=510 exch2_mydNy(36)=510 exch2_nNeighbours(36)=4 exch2_neighbourId(1,36)=51 exch2_iLo(1,36)=0 exch2_iHi(1,36)=35 exch2_jLo(1,36)=52 exch2_jHi(1,36)=52 exch2_opposingSend(1,36)=2 exch2_pij(1,1,36)=1 exch2_pij(2,1,36)=0 exch2_pij(3,1,36)=0 exch2_pij(4,1,36)=1 exch2_oi(1,36)=0 exch2_oj(1,36)=0 exch2_neighbourId(2,36)=21 exch2_iLo(2,36)=0 exch2_iHi(2,36)=35 exch2_jLo(2,36)=0 exch2_jHi(2,36)=0 exch2_opposingSend(2,36)=1 exch2_pij(1,2,36)=1 exch2_pij(2,2,36)=0 exch2_pij(3,2,36)=0 exch2_pij(4,2,36)=1 exch2_oi(2,36)=0 exch2_oj(2,36)=0 exch2_neighbourId(3,36)=37 exch2_iLo(3,36)=35 exch2_iHi(3,36)=35 exch2_jLo(3,36)=0 exch2_jHi(3,36)=52 exch2_opposingSend(3,36)=4 exch2_pij(1,3,36)=1 exch2_pij(2,3,36)=0 exch2_pij(3,3,36)=0 exch2_pij(4,3,36)=1 exch2_oi(3,36)=0 exch2_oj(3,36)=0 exch2_neighbourId(4,36)=35 exch2_iLo(4,36)=0 exch2_iHi(4,36)=0 exch2_jLo(4,36)=0 exch2_jHi(4,36)=52 exch2_opposingSend(4,36)=3 exch2_pij(1,4,36)=1 exch2_pij(2,4,36)=0 exch2_pij(3,4,36)=0 exch2_pij(4,4,36)=1 exch2_oi(4,36)=0 exch2_oj(4,36)=0 RETURN END SUBROUTINE W2_E2SETUP_37 C Topology for tile 37 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(37)=34 exch2_tNy(37)=51 exch2_tBasex(37)=204 exch2_tBasey(37)=102 exch2_txGlobalo(37)=205 exch2_tyGlobalo(37)=103 exch2_isWedge(37)=0 exch2_isNedge(37)=0 exch2_isEedge(37)=0 exch2_isSedge(37)=0 exch2_myFace(37)=1 exch2_mydNx(37)=510 exch2_mydNy(37)=510 exch2_nNeighbours(37)=4 exch2_neighbourId(1,37)=52 exch2_iLo(1,37)=0 exch2_iHi(1,37)=35 exch2_jLo(1,37)=52 exch2_jHi(1,37)=52 exch2_opposingSend(1,37)=2 exch2_pij(1,1,37)=1 exch2_pij(2,1,37)=0 exch2_pij(3,1,37)=0 exch2_pij(4,1,37)=1 exch2_oi(1,37)=0 exch2_oj(1,37)=0 exch2_neighbourId(2,37)=22 exch2_iLo(2,37)=0 exch2_iHi(2,37)=35 exch2_jLo(2,37)=0 exch2_jHi(2,37)=0 exch2_opposingSend(2,37)=1 exch2_pij(1,2,37)=1 exch2_pij(2,2,37)=0 exch2_pij(3,2,37)=0 exch2_pij(4,2,37)=1 exch2_oi(2,37)=0 exch2_oj(2,37)=0 exch2_neighbourId(3,37)=38 exch2_iLo(3,37)=35 exch2_iHi(3,37)=35 exch2_jLo(3,37)=0 exch2_jHi(3,37)=52 exch2_opposingSend(3,37)=4 exch2_pij(1,3,37)=1 exch2_pij(2,3,37)=0 exch2_pij(3,3,37)=0 exch2_pij(4,3,37)=1 exch2_oi(3,37)=0 exch2_oj(3,37)=0 exch2_neighbourId(4,37)=36 exch2_iLo(4,37)=0 exch2_iHi(4,37)=0 exch2_jLo(4,37)=0 exch2_jHi(4,37)=52 exch2_opposingSend(4,37)=3 exch2_pij(1,4,37)=1 exch2_pij(2,4,37)=0 exch2_pij(3,4,37)=0 exch2_pij(4,4,37)=1 exch2_oi(4,37)=0 exch2_oj(4,37)=0 RETURN END SUBROUTINE W2_E2SETUP_38 C Topology for tile 38 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(38)=34 exch2_tNy(38)=51 exch2_tBasex(38)=238 exch2_tBasey(38)=102 exch2_txGlobalo(38)=239 exch2_tyGlobalo(38)=103 exch2_isWedge(38)=0 exch2_isNedge(38)=0 exch2_isEedge(38)=0 exch2_isSedge(38)=0 exch2_myFace(38)=1 exch2_mydNx(38)=510 exch2_mydNy(38)=510 exch2_nNeighbours(38)=4 exch2_neighbourId(1,38)=53 exch2_iLo(1,38)=0 exch2_iHi(1,38)=35 exch2_jLo(1,38)=52 exch2_jHi(1,38)=52 exch2_opposingSend(1,38)=2 exch2_pij(1,1,38)=1 exch2_pij(2,1,38)=0 exch2_pij(3,1,38)=0 exch2_pij(4,1,38)=1 exch2_oi(1,38)=0 exch2_oj(1,38)=0 exch2_neighbourId(2,38)=23 exch2_iLo(2,38)=0 exch2_iHi(2,38)=35 exch2_jLo(2,38)=0 exch2_jHi(2,38)=0 exch2_opposingSend(2,38)=1 exch2_pij(1,2,38)=1 exch2_pij(2,2,38)=0 exch2_pij(3,2,38)=0 exch2_pij(4,2,38)=1 exch2_oi(2,38)=0 exch2_oj(2,38)=0 exch2_neighbourId(3,38)=39 exch2_iLo(3,38)=35 exch2_iHi(3,38)=35 exch2_jLo(3,38)=0 exch2_jHi(3,38)=52 exch2_opposingSend(3,38)=4 exch2_pij(1,3,38)=1 exch2_pij(2,3,38)=0 exch2_pij(3,3,38)=0 exch2_pij(4,3,38)=1 exch2_oi(3,38)=0 exch2_oj(3,38)=0 exch2_neighbourId(4,38)=37 exch2_iLo(4,38)=0 exch2_iHi(4,38)=0 exch2_jLo(4,38)=0 exch2_jHi(4,38)=52 exch2_opposingSend(4,38)=3 exch2_pij(1,4,38)=1 exch2_pij(2,4,38)=0 exch2_pij(3,4,38)=0 exch2_pij(4,4,38)=1 exch2_oi(4,38)=0 exch2_oj(4,38)=0 RETURN END SUBROUTINE W2_E2SETUP_39 C Topology for tile 39 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(39)=34 exch2_tNy(39)=51 exch2_tBasex(39)=272 exch2_tBasey(39)=102 exch2_txGlobalo(39)=273 exch2_tyGlobalo(39)=103 exch2_isWedge(39)=0 exch2_isNedge(39)=0 exch2_isEedge(39)=0 exch2_isSedge(39)=0 exch2_myFace(39)=1 exch2_mydNx(39)=510 exch2_mydNy(39)=510 exch2_nNeighbours(39)=4 exch2_neighbourId(1,39)=54 exch2_iLo(1,39)=0 exch2_iHi(1,39)=35 exch2_jLo(1,39)=52 exch2_jHi(1,39)=52 exch2_opposingSend(1,39)=2 exch2_pij(1,1,39)=1 exch2_pij(2,1,39)=0 exch2_pij(3,1,39)=0 exch2_pij(4,1,39)=1 exch2_oi(1,39)=0 exch2_oj(1,39)=0 exch2_neighbourId(2,39)=24 exch2_iLo(2,39)=0 exch2_iHi(2,39)=35 exch2_jLo(2,39)=0 exch2_jHi(2,39)=0 exch2_opposingSend(2,39)=1 exch2_pij(1,2,39)=1 exch2_pij(2,2,39)=0 exch2_pij(3,2,39)=0 exch2_pij(4,2,39)=1 exch2_oi(2,39)=0 exch2_oj(2,39)=0 exch2_neighbourId(3,39)=40 exch2_iLo(3,39)=35 exch2_iHi(3,39)=35 exch2_jLo(3,39)=0 exch2_jHi(3,39)=52 exch2_opposingSend(3,39)=4 exch2_pij(1,3,39)=1 exch2_pij(2,3,39)=0 exch2_pij(3,3,39)=0 exch2_pij(4,3,39)=1 exch2_oi(3,39)=0 exch2_oj(3,39)=0 exch2_neighbourId(4,39)=38 exch2_iLo(4,39)=0 exch2_iHi(4,39)=0 exch2_jLo(4,39)=0 exch2_jHi(4,39)=52 exch2_opposingSend(4,39)=3 exch2_pij(1,4,39)=1 exch2_pij(2,4,39)=0 exch2_pij(3,4,39)=0 exch2_pij(4,4,39)=1 exch2_oi(4,39)=0 exch2_oj(4,39)=0 RETURN END SUBROUTINE W2_E2SETUP_40 C Topology for tile 40 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(40)=34 exch2_tNy(40)=51 exch2_tBasex(40)=306 exch2_tBasey(40)=102 exch2_txGlobalo(40)=307 exch2_tyGlobalo(40)=103 exch2_isWedge(40)=0 exch2_isNedge(40)=0 exch2_isEedge(40)=0 exch2_isSedge(40)=0 exch2_myFace(40)=1 exch2_mydNx(40)=510 exch2_mydNy(40)=510 exch2_nNeighbours(40)=4 exch2_neighbourId(1,40)=55 exch2_iLo(1,40)=0 exch2_iHi(1,40)=35 exch2_jLo(1,40)=52 exch2_jHi(1,40)=52 exch2_opposingSend(1,40)=2 exch2_pij(1,1,40)=1 exch2_pij(2,1,40)=0 exch2_pij(3,1,40)=0 exch2_pij(4,1,40)=1 exch2_oi(1,40)=0 exch2_oj(1,40)=0 exch2_neighbourId(2,40)=25 exch2_iLo(2,40)=0 exch2_iHi(2,40)=35 exch2_jLo(2,40)=0 exch2_jHi(2,40)=0 exch2_opposingSend(2,40)=1 exch2_pij(1,2,40)=1 exch2_pij(2,2,40)=0 exch2_pij(3,2,40)=0 exch2_pij(4,2,40)=1 exch2_oi(2,40)=0 exch2_oj(2,40)=0 exch2_neighbourId(3,40)=41 exch2_iLo(3,40)=35 exch2_iHi(3,40)=35 exch2_jLo(3,40)=0 exch2_jHi(3,40)=52 exch2_opposingSend(3,40)=4 exch2_pij(1,3,40)=1 exch2_pij(2,3,40)=0 exch2_pij(3,3,40)=0 exch2_pij(4,3,40)=1 exch2_oi(3,40)=0 exch2_oj(3,40)=0 exch2_neighbourId(4,40)=39 exch2_iLo(4,40)=0 exch2_iHi(4,40)=0 exch2_jLo(4,40)=0 exch2_jHi(4,40)=52 exch2_opposingSend(4,40)=3 exch2_pij(1,4,40)=1 exch2_pij(2,4,40)=0 exch2_pij(3,4,40)=0 exch2_pij(4,4,40)=1 exch2_oi(4,40)=0 exch2_oj(4,40)=0 RETURN END SUBROUTINE W2_E2SETUP_41 C Topology for tile 41 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(41)=34 exch2_tNy(41)=51 exch2_tBasex(41)=340 exch2_tBasey(41)=102 exch2_txGlobalo(41)=341 exch2_tyGlobalo(41)=103 exch2_isWedge(41)=0 exch2_isNedge(41)=0 exch2_isEedge(41)=0 exch2_isSedge(41)=0 exch2_myFace(41)=1 exch2_mydNx(41)=510 exch2_mydNy(41)=510 exch2_nNeighbours(41)=4 exch2_neighbourId(1,41)=56 exch2_iLo(1,41)=0 exch2_iHi(1,41)=35 exch2_jLo(1,41)=52 exch2_jHi(1,41)=52 exch2_opposingSend(1,41)=2 exch2_pij(1,1,41)=1 exch2_pij(2,1,41)=0 exch2_pij(3,1,41)=0 exch2_pij(4,1,41)=1 exch2_oi(1,41)=0 exch2_oj(1,41)=0 exch2_neighbourId(2,41)=26 exch2_iLo(2,41)=0 exch2_iHi(2,41)=35 exch2_jLo(2,41)=0 exch2_jHi(2,41)=0 exch2_opposingSend(2,41)=1 exch2_pij(1,2,41)=1 exch2_pij(2,2,41)=0 exch2_pij(3,2,41)=0 exch2_pij(4,2,41)=1 exch2_oi(2,41)=0 exch2_oj(2,41)=0 exch2_neighbourId(3,41)=42 exch2_iLo(3,41)=35 exch2_iHi(3,41)=35 exch2_jLo(3,41)=0 exch2_jHi(3,41)=52 exch2_opposingSend(3,41)=4 exch2_pij(1,3,41)=1 exch2_pij(2,3,41)=0 exch2_pij(3,3,41)=0 exch2_pij(4,3,41)=1 exch2_oi(3,41)=0 exch2_oj(3,41)=0 exch2_neighbourId(4,41)=40 exch2_iLo(4,41)=0 exch2_iHi(4,41)=0 exch2_jLo(4,41)=0 exch2_jHi(4,41)=52 exch2_opposingSend(4,41)=3 exch2_pij(1,4,41)=1 exch2_pij(2,4,41)=0 exch2_pij(3,4,41)=0 exch2_pij(4,4,41)=1 exch2_oi(4,41)=0 exch2_oj(4,41)=0 RETURN END SUBROUTINE W2_E2SETUP_42 C Topology for tile 42 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(42)=34 exch2_tNy(42)=51 exch2_tBasex(42)=374 exch2_tBasey(42)=102 exch2_txGlobalo(42)=375 exch2_tyGlobalo(42)=103 exch2_isWedge(42)=0 exch2_isNedge(42)=0 exch2_isEedge(42)=0 exch2_isSedge(42)=0 exch2_myFace(42)=1 exch2_mydNx(42)=510 exch2_mydNy(42)=510 exch2_nNeighbours(42)=4 exch2_neighbourId(1,42)=57 exch2_iLo(1,42)=0 exch2_iHi(1,42)=35 exch2_jLo(1,42)=52 exch2_jHi(1,42)=52 exch2_opposingSend(1,42)=2 exch2_pij(1,1,42)=1 exch2_pij(2,1,42)=0 exch2_pij(3,1,42)=0 exch2_pij(4,1,42)=1 exch2_oi(1,42)=0 exch2_oj(1,42)=0 exch2_neighbourId(2,42)=27 exch2_iLo(2,42)=0 exch2_iHi(2,42)=35 exch2_jLo(2,42)=0 exch2_jHi(2,42)=0 exch2_opposingSend(2,42)=1 exch2_pij(1,2,42)=1 exch2_pij(2,2,42)=0 exch2_pij(3,2,42)=0 exch2_pij(4,2,42)=1 exch2_oi(2,42)=0 exch2_oj(2,42)=0 exch2_neighbourId(3,42)=43 exch2_iLo(3,42)=35 exch2_iHi(3,42)=35 exch2_jLo(3,42)=0 exch2_jHi(3,42)=52 exch2_opposingSend(3,42)=4 exch2_pij(1,3,42)=1 exch2_pij(2,3,42)=0 exch2_pij(3,3,42)=0 exch2_pij(4,3,42)=1 exch2_oi(3,42)=0 exch2_oj(3,42)=0 exch2_neighbourId(4,42)=41 exch2_iLo(4,42)=0 exch2_iHi(4,42)=0 exch2_jLo(4,42)=0 exch2_jHi(4,42)=52 exch2_opposingSend(4,42)=3 exch2_pij(1,4,42)=1 exch2_pij(2,4,42)=0 exch2_pij(3,4,42)=0 exch2_pij(4,4,42)=1 exch2_oi(4,42)=0 exch2_oj(4,42)=0 RETURN END SUBROUTINE W2_E2SETUP_43 C Topology for tile 43 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(43)=34 exch2_tNy(43)=51 exch2_tBasex(43)=408 exch2_tBasey(43)=102 exch2_txGlobalo(43)=409 exch2_tyGlobalo(43)=103 exch2_isWedge(43)=0 exch2_isNedge(43)=0 exch2_isEedge(43)=0 exch2_isSedge(43)=0 exch2_myFace(43)=1 exch2_mydNx(43)=510 exch2_mydNy(43)=510 exch2_nNeighbours(43)=4 exch2_neighbourId(1,43)=58 exch2_iLo(1,43)=0 exch2_iHi(1,43)=35 exch2_jLo(1,43)=52 exch2_jHi(1,43)=52 exch2_opposingSend(1,43)=2 exch2_pij(1,1,43)=1 exch2_pij(2,1,43)=0 exch2_pij(3,1,43)=0 exch2_pij(4,1,43)=1 exch2_oi(1,43)=0 exch2_oj(1,43)=0 exch2_neighbourId(2,43)=28 exch2_iLo(2,43)=0 exch2_iHi(2,43)=35 exch2_jLo(2,43)=0 exch2_jHi(2,43)=0 exch2_opposingSend(2,43)=1 exch2_pij(1,2,43)=1 exch2_pij(2,2,43)=0 exch2_pij(3,2,43)=0 exch2_pij(4,2,43)=1 exch2_oi(2,43)=0 exch2_oj(2,43)=0 exch2_neighbourId(3,43)=44 exch2_iLo(3,43)=35 exch2_iHi(3,43)=35 exch2_jLo(3,43)=0 exch2_jHi(3,43)=52 exch2_opposingSend(3,43)=4 exch2_pij(1,3,43)=1 exch2_pij(2,3,43)=0 exch2_pij(3,3,43)=0 exch2_pij(4,3,43)=1 exch2_oi(3,43)=0 exch2_oj(3,43)=0 exch2_neighbourId(4,43)=42 exch2_iLo(4,43)=0 exch2_iHi(4,43)=0 exch2_jLo(4,43)=0 exch2_jHi(4,43)=52 exch2_opposingSend(4,43)=3 exch2_pij(1,4,43)=1 exch2_pij(2,4,43)=0 exch2_pij(3,4,43)=0 exch2_pij(4,4,43)=1 exch2_oi(4,43)=0 exch2_oj(4,43)=0 RETURN END SUBROUTINE W2_E2SETUP_44 C Topology for tile 44 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(44)=34 exch2_tNy(44)=51 exch2_tBasex(44)=442 exch2_tBasey(44)=102 exch2_txGlobalo(44)=443 exch2_tyGlobalo(44)=103 exch2_isWedge(44)=0 exch2_isNedge(44)=0 exch2_isEedge(44)=0 exch2_isSedge(44)=0 exch2_myFace(44)=1 exch2_mydNx(44)=510 exch2_mydNy(44)=510 exch2_nNeighbours(44)=4 exch2_neighbourId(1,44)=59 exch2_iLo(1,44)=0 exch2_iHi(1,44)=35 exch2_jLo(1,44)=52 exch2_jHi(1,44)=52 exch2_opposingSend(1,44)=2 exch2_pij(1,1,44)=1 exch2_pij(2,1,44)=0 exch2_pij(3,1,44)=0 exch2_pij(4,1,44)=1 exch2_oi(1,44)=0 exch2_oj(1,44)=0 exch2_neighbourId(2,44)=29 exch2_iLo(2,44)=0 exch2_iHi(2,44)=35 exch2_jLo(2,44)=0 exch2_jHi(2,44)=0 exch2_opposingSend(2,44)=1 exch2_pij(1,2,44)=1 exch2_pij(2,2,44)=0 exch2_pij(3,2,44)=0 exch2_pij(4,2,44)=1 exch2_oi(2,44)=0 exch2_oj(2,44)=0 exch2_neighbourId(3,44)=45 exch2_iLo(3,44)=35 exch2_iHi(3,44)=35 exch2_jLo(3,44)=0 exch2_jHi(3,44)=52 exch2_opposingSend(3,44)=4 exch2_pij(1,3,44)=1 exch2_pij(2,3,44)=0 exch2_pij(3,3,44)=0 exch2_pij(4,3,44)=1 exch2_oi(3,44)=0 exch2_oj(3,44)=0 exch2_neighbourId(4,44)=43 exch2_iLo(4,44)=0 exch2_iHi(4,44)=0 exch2_jLo(4,44)=0 exch2_jHi(4,44)=52 exch2_opposingSend(4,44)=3 exch2_pij(1,4,44)=1 exch2_pij(2,4,44)=0 exch2_pij(3,4,44)=0 exch2_pij(4,4,44)=1 exch2_oi(4,44)=0 exch2_oj(4,44)=0 RETURN END SUBROUTINE W2_E2SETUP_45 C Topology for tile 45 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(45)=34 exch2_tNy(45)=51 exch2_tBasex(45)=476 exch2_tBasey(45)=102 exch2_txGlobalo(45)=477 exch2_tyGlobalo(45)=103 exch2_isWedge(45)=0 exch2_isNedge(45)=0 exch2_isEedge(45)=1 exch2_isSedge(45)=0 exch2_myFace(45)=1 exch2_mydNx(45)=510 exch2_mydNy(45)=510 exch2_nNeighbours(45)=4 exch2_neighbourId(1,45)=60 exch2_iLo(1,45)=0 exch2_iHi(1,45)=35 exch2_jLo(1,45)=52 exch2_jHi(1,45)=52 exch2_opposingSend(1,45)=2 exch2_pij(1,1,45)=1 exch2_pij(2,1,45)=0 exch2_pij(3,1,45)=0 exch2_pij(4,1,45)=1 exch2_oi(1,45)=0 exch2_oj(1,45)=0 exch2_neighbourId(2,45)=30 exch2_iLo(2,45)=0 exch2_iHi(2,45)=35 exch2_jLo(2,45)=0 exch2_jHi(2,45)=0 exch2_opposingSend(2,45)=1 exch2_pij(1,2,45)=1 exch2_pij(2,2,45)=0 exch2_pij(3,2,45)=0 exch2_pij(4,2,45)=1 exch2_oi(2,45)=0 exch2_oj(2,45)=0 exch2_neighbourId(3,45)=181 exch2_iLo(3,45)=35 exch2_iHi(3,45)=35 exch2_jLo(3,45)=0 exch2_jHi(3,45)=52 exch2_opposingSend(3,45)=4 exch2_pij(1,3,45)=1 exch2_pij(2,3,45)=0 exch2_pij(3,3,45)=0 exch2_pij(4,3,45)=1 exch2_oi(3,45)=510 exch2_oj(3,45)=0 exch2_neighbourId(4,45)=44 exch2_iLo(4,45)=0 exch2_iHi(4,45)=0 exch2_jLo(4,45)=0 exch2_jHi(4,45)=52 exch2_opposingSend(4,45)=3 exch2_pij(1,4,45)=1 exch2_pij(2,4,45)=0 exch2_pij(3,4,45)=0 exch2_pij(4,4,45)=1 exch2_oi(4,45)=0 exch2_oj(4,45)=0 RETURN END SUBROUTINE W2_E2SETUP_46 C Topology for tile 46 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(46)=34 exch2_tNy(46)=51 exch2_tBasex(46)=0 exch2_tBasey(46)=153 exch2_txGlobalo(46)=1 exch2_tyGlobalo(46)=154 exch2_isWedge(46)=1 exch2_isNedge(46)=0 exch2_isEedge(46)=0 exch2_isSedge(46)=0 exch2_myFace(46)=1 exch2_mydNx(46)=510 exch2_mydNy(46)=510 exch2_nNeighbours(46)=5 exch2_neighbourId(1,46)=61 exch2_iLo(1,46)=0 exch2_iHi(1,46)=35 exch2_jLo(1,46)=52 exch2_jHi(1,46)=52 exch2_opposingSend(1,46)=2 exch2_pij(1,1,46)=1 exch2_pij(2,1,46)=0 exch2_pij(3,1,46)=0 exch2_pij(4,1,46)=1 exch2_oi(1,46)=0 exch2_oj(1,46)=0 exch2_neighbourId(2,46)=31 exch2_iLo(2,46)=0 exch2_iHi(2,46)=35 exch2_jLo(2,46)=0 exch2_jHi(2,46)=0 exch2_opposingSend(2,46)=1 exch2_pij(1,2,46)=1 exch2_pij(2,2,46)=0 exch2_pij(3,2,46)=0 exch2_pij(4,2,46)=1 exch2_oi(2,46)=0 exch2_oj(2,46)=0 exch2_neighbourId(3,46)=47 exch2_iLo(3,46)=35 exch2_iHi(3,46)=35 exch2_jLo(3,46)=0 exch2_jHi(3,46)=52 exch2_opposingSend(3,46)=4 exch2_pij(1,3,46)=1 exch2_pij(2,3,46)=0 exch2_pij(3,3,46)=0 exch2_pij(4,3,46)=1 exch2_oi(3,46)=0 exch2_oj(3,46)=0 exch2_neighbourId(4,46)=745 exch2_iLo(4,46)=0 exch2_iHi(4,46)=0 exch2_jLo(4,46)=17 exch2_jHi(4,46)=52 exch2_opposingSend(4,46)=1 exch2_pij(1,4,46)=0 exch2_pij(2,4,46)=1 exch2_pij(3,4,46)=-1 exch2_pij(4,4,46)=0 exch2_oi(4,46)=-510 exch2_oj(4,46)=511 exch2_neighbourId(5,46)=746 exch2_iLo(5,46)=0 exch2_iHi(5,46)=0 exch2_jLo(5,46)=0 exch2_jHi(5,46)=18 exch2_opposingSend(5,46)=2 exch2_pij(1,5,46)=0 exch2_pij(2,5,46)=1 exch2_pij(3,5,46)=-1 exch2_pij(4,5,46)=0 exch2_oi(5,46)=-510 exch2_oj(5,46)=511 RETURN END SUBROUTINE W2_E2SETUP_47 C Topology for tile 47 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(47)=34 exch2_tNy(47)=51 exch2_tBasex(47)=34 exch2_tBasey(47)=153 exch2_txGlobalo(47)=35 exch2_tyGlobalo(47)=154 exch2_isWedge(47)=0 exch2_isNedge(47)=0 exch2_isEedge(47)=0 exch2_isSedge(47)=0 exch2_myFace(47)=1 exch2_mydNx(47)=510 exch2_mydNy(47)=510 exch2_nNeighbours(47)=4 exch2_neighbourId(1,47)=62 exch2_iLo(1,47)=0 exch2_iHi(1,47)=35 exch2_jLo(1,47)=52 exch2_jHi(1,47)=52 exch2_opposingSend(1,47)=2 exch2_pij(1,1,47)=1 exch2_pij(2,1,47)=0 exch2_pij(3,1,47)=0 exch2_pij(4,1,47)=1 exch2_oi(1,47)=0 exch2_oj(1,47)=0 exch2_neighbourId(2,47)=32 exch2_iLo(2,47)=0 exch2_iHi(2,47)=35 exch2_jLo(2,47)=0 exch2_jHi(2,47)=0 exch2_opposingSend(2,47)=1 exch2_pij(1,2,47)=1 exch2_pij(2,2,47)=0 exch2_pij(3,2,47)=0 exch2_pij(4,2,47)=1 exch2_oi(2,47)=0 exch2_oj(2,47)=0 exch2_neighbourId(3,47)=48 exch2_iLo(3,47)=35 exch2_iHi(3,47)=35 exch2_jLo(3,47)=0 exch2_jHi(3,47)=52 exch2_opposingSend(3,47)=4 exch2_pij(1,3,47)=1 exch2_pij(2,3,47)=0 exch2_pij(3,3,47)=0 exch2_pij(4,3,47)=1 exch2_oi(3,47)=0 exch2_oj(3,47)=0 exch2_neighbourId(4,47)=46 exch2_iLo(4,47)=0 exch2_iHi(4,47)=0 exch2_jLo(4,47)=0 exch2_jHi(4,47)=52 exch2_opposingSend(4,47)=3 exch2_pij(1,4,47)=1 exch2_pij(2,4,47)=0 exch2_pij(3,4,47)=0 exch2_pij(4,4,47)=1 exch2_oi(4,47)=0 exch2_oj(4,47)=0 RETURN END SUBROUTINE W2_E2SETUP_48 C Topology for tile 48 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(48)=34 exch2_tNy(48)=51 exch2_tBasex(48)=68 exch2_tBasey(48)=153 exch2_txGlobalo(48)=69 exch2_tyGlobalo(48)=154 exch2_isWedge(48)=0 exch2_isNedge(48)=0 exch2_isEedge(48)=0 exch2_isSedge(48)=0 exch2_myFace(48)=1 exch2_mydNx(48)=510 exch2_mydNy(48)=510 exch2_nNeighbours(48)=4 exch2_neighbourId(1,48)=63 exch2_iLo(1,48)=0 exch2_iHi(1,48)=35 exch2_jLo(1,48)=52 exch2_jHi(1,48)=52 exch2_opposingSend(1,48)=2 exch2_pij(1,1,48)=1 exch2_pij(2,1,48)=0 exch2_pij(3,1,48)=0 exch2_pij(4,1,48)=1 exch2_oi(1,48)=0 exch2_oj(1,48)=0 exch2_neighbourId(2,48)=33 exch2_iLo(2,48)=0 exch2_iHi(2,48)=35 exch2_jLo(2,48)=0 exch2_jHi(2,48)=0 exch2_opposingSend(2,48)=1 exch2_pij(1,2,48)=1 exch2_pij(2,2,48)=0 exch2_pij(3,2,48)=0 exch2_pij(4,2,48)=1 exch2_oi(2,48)=0 exch2_oj(2,48)=0 exch2_neighbourId(3,48)=49 exch2_iLo(3,48)=35 exch2_iHi(3,48)=35 exch2_jLo(3,48)=0 exch2_jHi(3,48)=52 exch2_opposingSend(3,48)=4 exch2_pij(1,3,48)=1 exch2_pij(2,3,48)=0 exch2_pij(3,3,48)=0 exch2_pij(4,3,48)=1 exch2_oi(3,48)=0 exch2_oj(3,48)=0 exch2_neighbourId(4,48)=47 exch2_iLo(4,48)=0 exch2_iHi(4,48)=0 exch2_jLo(4,48)=0 exch2_jHi(4,48)=52 exch2_opposingSend(4,48)=3 exch2_pij(1,4,48)=1 exch2_pij(2,4,48)=0 exch2_pij(3,4,48)=0 exch2_pij(4,4,48)=1 exch2_oi(4,48)=0 exch2_oj(4,48)=0 RETURN END SUBROUTINE W2_E2SETUP_49 C Topology for tile 49 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(49)=34 exch2_tNy(49)=51 exch2_tBasex(49)=102 exch2_tBasey(49)=153 exch2_txGlobalo(49)=103 exch2_tyGlobalo(49)=154 exch2_isWedge(49)=0 exch2_isNedge(49)=0 exch2_isEedge(49)=0 exch2_isSedge(49)=0 exch2_myFace(49)=1 exch2_mydNx(49)=510 exch2_mydNy(49)=510 exch2_nNeighbours(49)=4 exch2_neighbourId(1,49)=64 exch2_iLo(1,49)=0 exch2_iHi(1,49)=35 exch2_jLo(1,49)=52 exch2_jHi(1,49)=52 exch2_opposingSend(1,49)=2 exch2_pij(1,1,49)=1 exch2_pij(2,1,49)=0 exch2_pij(3,1,49)=0 exch2_pij(4,1,49)=1 exch2_oi(1,49)=0 exch2_oj(1,49)=0 exch2_neighbourId(2,49)=34 exch2_iLo(2,49)=0 exch2_iHi(2,49)=35 exch2_jLo(2,49)=0 exch2_jHi(2,49)=0 exch2_opposingSend(2,49)=1 exch2_pij(1,2,49)=1 exch2_pij(2,2,49)=0 exch2_pij(3,2,49)=0 exch2_pij(4,2,49)=1 exch2_oi(2,49)=0 exch2_oj(2,49)=0 exch2_neighbourId(3,49)=50 exch2_iLo(3,49)=35 exch2_iHi(3,49)=35 exch2_jLo(3,49)=0 exch2_jHi(3,49)=52 exch2_opposingSend(3,49)=4 exch2_pij(1,3,49)=1 exch2_pij(2,3,49)=0 exch2_pij(3,3,49)=0 exch2_pij(4,3,49)=1 exch2_oi(3,49)=0 exch2_oj(3,49)=0 exch2_neighbourId(4,49)=48 exch2_iLo(4,49)=0 exch2_iHi(4,49)=0 exch2_jLo(4,49)=0 exch2_jHi(4,49)=52 exch2_opposingSend(4,49)=3 exch2_pij(1,4,49)=1 exch2_pij(2,4,49)=0 exch2_pij(3,4,49)=0 exch2_pij(4,4,49)=1 exch2_oi(4,49)=0 exch2_oj(4,49)=0 RETURN END SUBROUTINE W2_E2SETUP_50 C Topology for tile 50 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(50)=34 exch2_tNy(50)=51 exch2_tBasex(50)=136 exch2_tBasey(50)=153 exch2_txGlobalo(50)=137 exch2_tyGlobalo(50)=154 exch2_isWedge(50)=0 exch2_isNedge(50)=0 exch2_isEedge(50)=0 exch2_isSedge(50)=0 exch2_myFace(50)=1 exch2_mydNx(50)=510 exch2_mydNy(50)=510 exch2_nNeighbours(50)=4 exch2_neighbourId(1,50)=65 exch2_iLo(1,50)=0 exch2_iHi(1,50)=35 exch2_jLo(1,50)=52 exch2_jHi(1,50)=52 exch2_opposingSend(1,50)=2 exch2_pij(1,1,50)=1 exch2_pij(2,1,50)=0 exch2_pij(3,1,50)=0 exch2_pij(4,1,50)=1 exch2_oi(1,50)=0 exch2_oj(1,50)=0 exch2_neighbourId(2,50)=35 exch2_iLo(2,50)=0 exch2_iHi(2,50)=35 exch2_jLo(2,50)=0 exch2_jHi(2,50)=0 exch2_opposingSend(2,50)=1 exch2_pij(1,2,50)=1 exch2_pij(2,2,50)=0 exch2_pij(3,2,50)=0 exch2_pij(4,2,50)=1 exch2_oi(2,50)=0 exch2_oj(2,50)=0 exch2_neighbourId(3,50)=51 exch2_iLo(3,50)=35 exch2_iHi(3,50)=35 exch2_jLo(3,50)=0 exch2_jHi(3,50)=52 exch2_opposingSend(3,50)=4 exch2_pij(1,3,50)=1 exch2_pij(2,3,50)=0 exch2_pij(3,3,50)=0 exch2_pij(4,3,50)=1 exch2_oi(3,50)=0 exch2_oj(3,50)=0 exch2_neighbourId(4,50)=49 exch2_iLo(4,50)=0 exch2_iHi(4,50)=0 exch2_jLo(4,50)=0 exch2_jHi(4,50)=52 exch2_opposingSend(4,50)=3 exch2_pij(1,4,50)=1 exch2_pij(2,4,50)=0 exch2_pij(3,4,50)=0 exch2_pij(4,4,50)=1 exch2_oi(4,50)=0 exch2_oj(4,50)=0 RETURN END SUBROUTINE W2_E2SETUP_51 C Topology for tile 51 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(51)=34 exch2_tNy(51)=51 exch2_tBasex(51)=170 exch2_tBasey(51)=153 exch2_txGlobalo(51)=171 exch2_tyGlobalo(51)=154 exch2_isWedge(51)=0 exch2_isNedge(51)=0 exch2_isEedge(51)=0 exch2_isSedge(51)=0 exch2_myFace(51)=1 exch2_mydNx(51)=510 exch2_mydNy(51)=510 exch2_nNeighbours(51)=4 exch2_neighbourId(1,51)=66 exch2_iLo(1,51)=0 exch2_iHi(1,51)=35 exch2_jLo(1,51)=52 exch2_jHi(1,51)=52 exch2_opposingSend(1,51)=2 exch2_pij(1,1,51)=1 exch2_pij(2,1,51)=0 exch2_pij(3,1,51)=0 exch2_pij(4,1,51)=1 exch2_oi(1,51)=0 exch2_oj(1,51)=0 exch2_neighbourId(2,51)=36 exch2_iLo(2,51)=0 exch2_iHi(2,51)=35 exch2_jLo(2,51)=0 exch2_jHi(2,51)=0 exch2_opposingSend(2,51)=1 exch2_pij(1,2,51)=1 exch2_pij(2,2,51)=0 exch2_pij(3,2,51)=0 exch2_pij(4,2,51)=1 exch2_oi(2,51)=0 exch2_oj(2,51)=0 exch2_neighbourId(3,51)=52 exch2_iLo(3,51)=35 exch2_iHi(3,51)=35 exch2_jLo(3,51)=0 exch2_jHi(3,51)=52 exch2_opposingSend(3,51)=4 exch2_pij(1,3,51)=1 exch2_pij(2,3,51)=0 exch2_pij(3,3,51)=0 exch2_pij(4,3,51)=1 exch2_oi(3,51)=0 exch2_oj(3,51)=0 exch2_neighbourId(4,51)=50 exch2_iLo(4,51)=0 exch2_iHi(4,51)=0 exch2_jLo(4,51)=0 exch2_jHi(4,51)=52 exch2_opposingSend(4,51)=3 exch2_pij(1,4,51)=1 exch2_pij(2,4,51)=0 exch2_pij(3,4,51)=0 exch2_pij(4,4,51)=1 exch2_oi(4,51)=0 exch2_oj(4,51)=0 RETURN END SUBROUTINE W2_E2SETUP_52 C Topology for tile 52 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(52)=34 exch2_tNy(52)=51 exch2_tBasex(52)=204 exch2_tBasey(52)=153 exch2_txGlobalo(52)=205 exch2_tyGlobalo(52)=154 exch2_isWedge(52)=0 exch2_isNedge(52)=0 exch2_isEedge(52)=0 exch2_isSedge(52)=0 exch2_myFace(52)=1 exch2_mydNx(52)=510 exch2_mydNy(52)=510 exch2_nNeighbours(52)=4 exch2_neighbourId(1,52)=67 exch2_iLo(1,52)=0 exch2_iHi(1,52)=35 exch2_jLo(1,52)=52 exch2_jHi(1,52)=52 exch2_opposingSend(1,52)=2 exch2_pij(1,1,52)=1 exch2_pij(2,1,52)=0 exch2_pij(3,1,52)=0 exch2_pij(4,1,52)=1 exch2_oi(1,52)=0 exch2_oj(1,52)=0 exch2_neighbourId(2,52)=37 exch2_iLo(2,52)=0 exch2_iHi(2,52)=35 exch2_jLo(2,52)=0 exch2_jHi(2,52)=0 exch2_opposingSend(2,52)=1 exch2_pij(1,2,52)=1 exch2_pij(2,2,52)=0 exch2_pij(3,2,52)=0 exch2_pij(4,2,52)=1 exch2_oi(2,52)=0 exch2_oj(2,52)=0 exch2_neighbourId(3,52)=53 exch2_iLo(3,52)=35 exch2_iHi(3,52)=35 exch2_jLo(3,52)=0 exch2_jHi(3,52)=52 exch2_opposingSend(3,52)=4 exch2_pij(1,3,52)=1 exch2_pij(2,3,52)=0 exch2_pij(3,3,52)=0 exch2_pij(4,3,52)=1 exch2_oi(3,52)=0 exch2_oj(3,52)=0 exch2_neighbourId(4,52)=51 exch2_iLo(4,52)=0 exch2_iHi(4,52)=0 exch2_jLo(4,52)=0 exch2_jHi(4,52)=52 exch2_opposingSend(4,52)=3 exch2_pij(1,4,52)=1 exch2_pij(2,4,52)=0 exch2_pij(3,4,52)=0 exch2_pij(4,4,52)=1 exch2_oi(4,52)=0 exch2_oj(4,52)=0 RETURN END SUBROUTINE W2_E2SETUP_53 C Topology for tile 53 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(53)=34 exch2_tNy(53)=51 exch2_tBasex(53)=238 exch2_tBasey(53)=153 exch2_txGlobalo(53)=239 exch2_tyGlobalo(53)=154 exch2_isWedge(53)=0 exch2_isNedge(53)=0 exch2_isEedge(53)=0 exch2_isSedge(53)=0 exch2_myFace(53)=1 exch2_mydNx(53)=510 exch2_mydNy(53)=510 exch2_nNeighbours(53)=4 exch2_neighbourId(1,53)=68 exch2_iLo(1,53)=0 exch2_iHi(1,53)=35 exch2_jLo(1,53)=52 exch2_jHi(1,53)=52 exch2_opposingSend(1,53)=2 exch2_pij(1,1,53)=1 exch2_pij(2,1,53)=0 exch2_pij(3,1,53)=0 exch2_pij(4,1,53)=1 exch2_oi(1,53)=0 exch2_oj(1,53)=0 exch2_neighbourId(2,53)=38 exch2_iLo(2,53)=0 exch2_iHi(2,53)=35 exch2_jLo(2,53)=0 exch2_jHi(2,53)=0 exch2_opposingSend(2,53)=1 exch2_pij(1,2,53)=1 exch2_pij(2,2,53)=0 exch2_pij(3,2,53)=0 exch2_pij(4,2,53)=1 exch2_oi(2,53)=0 exch2_oj(2,53)=0 exch2_neighbourId(3,53)=54 exch2_iLo(3,53)=35 exch2_iHi(3,53)=35 exch2_jLo(3,53)=0 exch2_jHi(3,53)=52 exch2_opposingSend(3,53)=4 exch2_pij(1,3,53)=1 exch2_pij(2,3,53)=0 exch2_pij(3,3,53)=0 exch2_pij(4,3,53)=1 exch2_oi(3,53)=0 exch2_oj(3,53)=0 exch2_neighbourId(4,53)=52 exch2_iLo(4,53)=0 exch2_iHi(4,53)=0 exch2_jLo(4,53)=0 exch2_jHi(4,53)=52 exch2_opposingSend(4,53)=3 exch2_pij(1,4,53)=1 exch2_pij(2,4,53)=0 exch2_pij(3,4,53)=0 exch2_pij(4,4,53)=1 exch2_oi(4,53)=0 exch2_oj(4,53)=0 RETURN END SUBROUTINE W2_E2SETUP_54 C Topology for tile 54 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(54)=34 exch2_tNy(54)=51 exch2_tBasex(54)=272 exch2_tBasey(54)=153 exch2_txGlobalo(54)=273 exch2_tyGlobalo(54)=154 exch2_isWedge(54)=0 exch2_isNedge(54)=0 exch2_isEedge(54)=0 exch2_isSedge(54)=0 exch2_myFace(54)=1 exch2_mydNx(54)=510 exch2_mydNy(54)=510 exch2_nNeighbours(54)=4 exch2_neighbourId(1,54)=69 exch2_iLo(1,54)=0 exch2_iHi(1,54)=35 exch2_jLo(1,54)=52 exch2_jHi(1,54)=52 exch2_opposingSend(1,54)=2 exch2_pij(1,1,54)=1 exch2_pij(2,1,54)=0 exch2_pij(3,1,54)=0 exch2_pij(4,1,54)=1 exch2_oi(1,54)=0 exch2_oj(1,54)=0 exch2_neighbourId(2,54)=39 exch2_iLo(2,54)=0 exch2_iHi(2,54)=35 exch2_jLo(2,54)=0 exch2_jHi(2,54)=0 exch2_opposingSend(2,54)=1 exch2_pij(1,2,54)=1 exch2_pij(2,2,54)=0 exch2_pij(3,2,54)=0 exch2_pij(4,2,54)=1 exch2_oi(2,54)=0 exch2_oj(2,54)=0 exch2_neighbourId(3,54)=55 exch2_iLo(3,54)=35 exch2_iHi(3,54)=35 exch2_jLo(3,54)=0 exch2_jHi(3,54)=52 exch2_opposingSend(3,54)=4 exch2_pij(1,3,54)=1 exch2_pij(2,3,54)=0 exch2_pij(3,3,54)=0 exch2_pij(4,3,54)=1 exch2_oi(3,54)=0 exch2_oj(3,54)=0 exch2_neighbourId(4,54)=53 exch2_iLo(4,54)=0 exch2_iHi(4,54)=0 exch2_jLo(4,54)=0 exch2_jHi(4,54)=52 exch2_opposingSend(4,54)=3 exch2_pij(1,4,54)=1 exch2_pij(2,4,54)=0 exch2_pij(3,4,54)=0 exch2_pij(4,4,54)=1 exch2_oi(4,54)=0 exch2_oj(4,54)=0 RETURN END SUBROUTINE W2_E2SETUP_55 C Topology for tile 55 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(55)=34 exch2_tNy(55)=51 exch2_tBasex(55)=306 exch2_tBasey(55)=153 exch2_txGlobalo(55)=307 exch2_tyGlobalo(55)=154 exch2_isWedge(55)=0 exch2_isNedge(55)=0 exch2_isEedge(55)=0 exch2_isSedge(55)=0 exch2_myFace(55)=1 exch2_mydNx(55)=510 exch2_mydNy(55)=510 exch2_nNeighbours(55)=4 exch2_neighbourId(1,55)=70 exch2_iLo(1,55)=0 exch2_iHi(1,55)=35 exch2_jLo(1,55)=52 exch2_jHi(1,55)=52 exch2_opposingSend(1,55)=2 exch2_pij(1,1,55)=1 exch2_pij(2,1,55)=0 exch2_pij(3,1,55)=0 exch2_pij(4,1,55)=1 exch2_oi(1,55)=0 exch2_oj(1,55)=0 exch2_neighbourId(2,55)=40 exch2_iLo(2,55)=0 exch2_iHi(2,55)=35 exch2_jLo(2,55)=0 exch2_jHi(2,55)=0 exch2_opposingSend(2,55)=1 exch2_pij(1,2,55)=1 exch2_pij(2,2,55)=0 exch2_pij(3,2,55)=0 exch2_pij(4,2,55)=1 exch2_oi(2,55)=0 exch2_oj(2,55)=0 exch2_neighbourId(3,55)=56 exch2_iLo(3,55)=35 exch2_iHi(3,55)=35 exch2_jLo(3,55)=0 exch2_jHi(3,55)=52 exch2_opposingSend(3,55)=4 exch2_pij(1,3,55)=1 exch2_pij(2,3,55)=0 exch2_pij(3,3,55)=0 exch2_pij(4,3,55)=1 exch2_oi(3,55)=0 exch2_oj(3,55)=0 exch2_neighbourId(4,55)=54 exch2_iLo(4,55)=0 exch2_iHi(4,55)=0 exch2_jLo(4,55)=0 exch2_jHi(4,55)=52 exch2_opposingSend(4,55)=3 exch2_pij(1,4,55)=1 exch2_pij(2,4,55)=0 exch2_pij(3,4,55)=0 exch2_pij(4,4,55)=1 exch2_oi(4,55)=0 exch2_oj(4,55)=0 RETURN END SUBROUTINE W2_E2SETUP_56 C Topology for tile 56 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(56)=34 exch2_tNy(56)=51 exch2_tBasex(56)=340 exch2_tBasey(56)=153 exch2_txGlobalo(56)=341 exch2_tyGlobalo(56)=154 exch2_isWedge(56)=0 exch2_isNedge(56)=0 exch2_isEedge(56)=0 exch2_isSedge(56)=0 exch2_myFace(56)=1 exch2_mydNx(56)=510 exch2_mydNy(56)=510 exch2_nNeighbours(56)=4 exch2_neighbourId(1,56)=71 exch2_iLo(1,56)=0 exch2_iHi(1,56)=35 exch2_jLo(1,56)=52 exch2_jHi(1,56)=52 exch2_opposingSend(1,56)=2 exch2_pij(1,1,56)=1 exch2_pij(2,1,56)=0 exch2_pij(3,1,56)=0 exch2_pij(4,1,56)=1 exch2_oi(1,56)=0 exch2_oj(1,56)=0 exch2_neighbourId(2,56)=41 exch2_iLo(2,56)=0 exch2_iHi(2,56)=35 exch2_jLo(2,56)=0 exch2_jHi(2,56)=0 exch2_opposingSend(2,56)=1 exch2_pij(1,2,56)=1 exch2_pij(2,2,56)=0 exch2_pij(3,2,56)=0 exch2_pij(4,2,56)=1 exch2_oi(2,56)=0 exch2_oj(2,56)=0 exch2_neighbourId(3,56)=57 exch2_iLo(3,56)=35 exch2_iHi(3,56)=35 exch2_jLo(3,56)=0 exch2_jHi(3,56)=52 exch2_opposingSend(3,56)=4 exch2_pij(1,3,56)=1 exch2_pij(2,3,56)=0 exch2_pij(3,3,56)=0 exch2_pij(4,3,56)=1 exch2_oi(3,56)=0 exch2_oj(3,56)=0 exch2_neighbourId(4,56)=55 exch2_iLo(4,56)=0 exch2_iHi(4,56)=0 exch2_jLo(4,56)=0 exch2_jHi(4,56)=52 exch2_opposingSend(4,56)=3 exch2_pij(1,4,56)=1 exch2_pij(2,4,56)=0 exch2_pij(3,4,56)=0 exch2_pij(4,4,56)=1 exch2_oi(4,56)=0 exch2_oj(4,56)=0 RETURN END SUBROUTINE W2_E2SETUP_57 C Topology for tile 57 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(57)=34 exch2_tNy(57)=51 exch2_tBasex(57)=374 exch2_tBasey(57)=153 exch2_txGlobalo(57)=375 exch2_tyGlobalo(57)=154 exch2_isWedge(57)=0 exch2_isNedge(57)=0 exch2_isEedge(57)=0 exch2_isSedge(57)=0 exch2_myFace(57)=1 exch2_mydNx(57)=510 exch2_mydNy(57)=510 exch2_nNeighbours(57)=4 exch2_neighbourId(1,57)=72 exch2_iLo(1,57)=0 exch2_iHi(1,57)=35 exch2_jLo(1,57)=52 exch2_jHi(1,57)=52 exch2_opposingSend(1,57)=2 exch2_pij(1,1,57)=1 exch2_pij(2,1,57)=0 exch2_pij(3,1,57)=0 exch2_pij(4,1,57)=1 exch2_oi(1,57)=0 exch2_oj(1,57)=0 exch2_neighbourId(2,57)=42 exch2_iLo(2,57)=0 exch2_iHi(2,57)=35 exch2_jLo(2,57)=0 exch2_jHi(2,57)=0 exch2_opposingSend(2,57)=1 exch2_pij(1,2,57)=1 exch2_pij(2,2,57)=0 exch2_pij(3,2,57)=0 exch2_pij(4,2,57)=1 exch2_oi(2,57)=0 exch2_oj(2,57)=0 exch2_neighbourId(3,57)=58 exch2_iLo(3,57)=35 exch2_iHi(3,57)=35 exch2_jLo(3,57)=0 exch2_jHi(3,57)=52 exch2_opposingSend(3,57)=4 exch2_pij(1,3,57)=1 exch2_pij(2,3,57)=0 exch2_pij(3,3,57)=0 exch2_pij(4,3,57)=1 exch2_oi(3,57)=0 exch2_oj(3,57)=0 exch2_neighbourId(4,57)=56 exch2_iLo(4,57)=0 exch2_iHi(4,57)=0 exch2_jLo(4,57)=0 exch2_jHi(4,57)=52 exch2_opposingSend(4,57)=3 exch2_pij(1,4,57)=1 exch2_pij(2,4,57)=0 exch2_pij(3,4,57)=0 exch2_pij(4,4,57)=1 exch2_oi(4,57)=0 exch2_oj(4,57)=0 RETURN END SUBROUTINE W2_E2SETUP_58 C Topology for tile 58 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(58)=34 exch2_tNy(58)=51 exch2_tBasex(58)=408 exch2_tBasey(58)=153 exch2_txGlobalo(58)=409 exch2_tyGlobalo(58)=154 exch2_isWedge(58)=0 exch2_isNedge(58)=0 exch2_isEedge(58)=0 exch2_isSedge(58)=0 exch2_myFace(58)=1 exch2_mydNx(58)=510 exch2_mydNy(58)=510 exch2_nNeighbours(58)=4 exch2_neighbourId(1,58)=73 exch2_iLo(1,58)=0 exch2_iHi(1,58)=35 exch2_jLo(1,58)=52 exch2_jHi(1,58)=52 exch2_opposingSend(1,58)=2 exch2_pij(1,1,58)=1 exch2_pij(2,1,58)=0 exch2_pij(3,1,58)=0 exch2_pij(4,1,58)=1 exch2_oi(1,58)=0 exch2_oj(1,58)=0 exch2_neighbourId(2,58)=43 exch2_iLo(2,58)=0 exch2_iHi(2,58)=35 exch2_jLo(2,58)=0 exch2_jHi(2,58)=0 exch2_opposingSend(2,58)=1 exch2_pij(1,2,58)=1 exch2_pij(2,2,58)=0 exch2_pij(3,2,58)=0 exch2_pij(4,2,58)=1 exch2_oi(2,58)=0 exch2_oj(2,58)=0 exch2_neighbourId(3,58)=59 exch2_iLo(3,58)=35 exch2_iHi(3,58)=35 exch2_jLo(3,58)=0 exch2_jHi(3,58)=52 exch2_opposingSend(3,58)=4 exch2_pij(1,3,58)=1 exch2_pij(2,3,58)=0 exch2_pij(3,3,58)=0 exch2_pij(4,3,58)=1 exch2_oi(3,58)=0 exch2_oj(3,58)=0 exch2_neighbourId(4,58)=57 exch2_iLo(4,58)=0 exch2_iHi(4,58)=0 exch2_jLo(4,58)=0 exch2_jHi(4,58)=52 exch2_opposingSend(4,58)=3 exch2_pij(1,4,58)=1 exch2_pij(2,4,58)=0 exch2_pij(3,4,58)=0 exch2_pij(4,4,58)=1 exch2_oi(4,58)=0 exch2_oj(4,58)=0 RETURN END SUBROUTINE W2_E2SETUP_59 C Topology for tile 59 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(59)=34 exch2_tNy(59)=51 exch2_tBasex(59)=442 exch2_tBasey(59)=153 exch2_txGlobalo(59)=443 exch2_tyGlobalo(59)=154 exch2_isWedge(59)=0 exch2_isNedge(59)=0 exch2_isEedge(59)=0 exch2_isSedge(59)=0 exch2_myFace(59)=1 exch2_mydNx(59)=510 exch2_mydNy(59)=510 exch2_nNeighbours(59)=4 exch2_neighbourId(1,59)=74 exch2_iLo(1,59)=0 exch2_iHi(1,59)=35 exch2_jLo(1,59)=52 exch2_jHi(1,59)=52 exch2_opposingSend(1,59)=2 exch2_pij(1,1,59)=1 exch2_pij(2,1,59)=0 exch2_pij(3,1,59)=0 exch2_pij(4,1,59)=1 exch2_oi(1,59)=0 exch2_oj(1,59)=0 exch2_neighbourId(2,59)=44 exch2_iLo(2,59)=0 exch2_iHi(2,59)=35 exch2_jLo(2,59)=0 exch2_jHi(2,59)=0 exch2_opposingSend(2,59)=1 exch2_pij(1,2,59)=1 exch2_pij(2,2,59)=0 exch2_pij(3,2,59)=0 exch2_pij(4,2,59)=1 exch2_oi(2,59)=0 exch2_oj(2,59)=0 exch2_neighbourId(3,59)=60 exch2_iLo(3,59)=35 exch2_iHi(3,59)=35 exch2_jLo(3,59)=0 exch2_jHi(3,59)=52 exch2_opposingSend(3,59)=4 exch2_pij(1,3,59)=1 exch2_pij(2,3,59)=0 exch2_pij(3,3,59)=0 exch2_pij(4,3,59)=1 exch2_oi(3,59)=0 exch2_oj(3,59)=0 exch2_neighbourId(4,59)=58 exch2_iLo(4,59)=0 exch2_iHi(4,59)=0 exch2_jLo(4,59)=0 exch2_jHi(4,59)=52 exch2_opposingSend(4,59)=3 exch2_pij(1,4,59)=1 exch2_pij(2,4,59)=0 exch2_pij(3,4,59)=0 exch2_pij(4,4,59)=1 exch2_oi(4,59)=0 exch2_oj(4,59)=0 RETURN END SUBROUTINE W2_E2SETUP_60 C Topology for tile 60 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(60)=34 exch2_tNy(60)=51 exch2_tBasex(60)=476 exch2_tBasey(60)=153 exch2_txGlobalo(60)=477 exch2_tyGlobalo(60)=154 exch2_isWedge(60)=0 exch2_isNedge(60)=0 exch2_isEedge(60)=1 exch2_isSedge(60)=0 exch2_myFace(60)=1 exch2_mydNx(60)=510 exch2_mydNy(60)=510 exch2_nNeighbours(60)=4 exch2_neighbourId(1,60)=75 exch2_iLo(1,60)=0 exch2_iHi(1,60)=35 exch2_jLo(1,60)=52 exch2_jHi(1,60)=52 exch2_opposingSend(1,60)=2 exch2_pij(1,1,60)=1 exch2_pij(2,1,60)=0 exch2_pij(3,1,60)=0 exch2_pij(4,1,60)=1 exch2_oi(1,60)=0 exch2_oj(1,60)=0 exch2_neighbourId(2,60)=45 exch2_iLo(2,60)=0 exch2_iHi(2,60)=35 exch2_jLo(2,60)=0 exch2_jHi(2,60)=0 exch2_opposingSend(2,60)=1 exch2_pij(1,2,60)=1 exch2_pij(2,2,60)=0 exch2_pij(3,2,60)=0 exch2_pij(4,2,60)=1 exch2_oi(2,60)=0 exch2_oj(2,60)=0 exch2_neighbourId(3,60)=196 exch2_iLo(3,60)=35 exch2_iHi(3,60)=35 exch2_jLo(3,60)=0 exch2_jHi(3,60)=52 exch2_opposingSend(3,60)=4 exch2_pij(1,3,60)=1 exch2_pij(2,3,60)=0 exch2_pij(3,3,60)=0 exch2_pij(4,3,60)=1 exch2_oi(3,60)=510 exch2_oj(3,60)=0 exch2_neighbourId(4,60)=59 exch2_iLo(4,60)=0 exch2_iHi(4,60)=0 exch2_jLo(4,60)=0 exch2_jHi(4,60)=52 exch2_opposingSend(4,60)=3 exch2_pij(1,4,60)=1 exch2_pij(2,4,60)=0 exch2_pij(3,4,60)=0 exch2_pij(4,4,60)=1 exch2_oi(4,60)=0 exch2_oj(4,60)=0 RETURN END SUBROUTINE W2_E2SETUP_61 C Topology for tile 61 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(61)=34 exch2_tNy(61)=51 exch2_tBasex(61)=0 exch2_tBasey(61)=204 exch2_txGlobalo(61)=1 exch2_tyGlobalo(61)=205 exch2_isWedge(61)=1 exch2_isNedge(61)=0 exch2_isEedge(61)=0 exch2_isSedge(61)=0 exch2_myFace(61)=1 exch2_mydNx(61)=510 exch2_mydNy(61)=510 exch2_nNeighbours(61)=5 exch2_neighbourId(1,61)=76 exch2_iLo(1,61)=0 exch2_iHi(1,61)=35 exch2_jLo(1,61)=52 exch2_jHi(1,61)=52 exch2_opposingSend(1,61)=2 exch2_pij(1,1,61)=1 exch2_pij(2,1,61)=0 exch2_pij(3,1,61)=0 exch2_pij(4,1,61)=1 exch2_oi(1,61)=0 exch2_oj(1,61)=0 exch2_neighbourId(2,61)=46 exch2_iLo(2,61)=0 exch2_iHi(2,61)=35 exch2_jLo(2,61)=0 exch2_jHi(2,61)=0 exch2_opposingSend(2,61)=1 exch2_pij(1,2,61)=1 exch2_pij(2,2,61)=0 exch2_pij(3,2,61)=0 exch2_pij(4,2,61)=1 exch2_oi(2,61)=0 exch2_oj(2,61)=0 exch2_neighbourId(3,61)=62 exch2_iLo(3,61)=35 exch2_iHi(3,61)=35 exch2_jLo(3,61)=0 exch2_jHi(3,61)=52 exch2_opposingSend(3,61)=4 exch2_pij(1,3,61)=1 exch2_pij(2,3,61)=0 exch2_pij(3,3,61)=0 exch2_pij(4,3,61)=1 exch2_oi(3,61)=0 exch2_oj(3,61)=0 exch2_neighbourId(4,61)=743 exch2_iLo(4,61)=0 exch2_iHi(4,61)=0 exch2_jLo(4,61)=34 exch2_jHi(4,61)=52 exch2_opposingSend(4,61)=1 exch2_pij(1,4,61)=0 exch2_pij(2,4,61)=1 exch2_pij(3,4,61)=-1 exch2_pij(4,4,61)=0 exch2_oi(4,61)=-510 exch2_oj(4,61)=511 exch2_neighbourId(5,61)=744 exch2_iLo(5,61)=0 exch2_iHi(5,61)=0 exch2_jLo(5,61)=0 exch2_jHi(5,61)=35 exch2_opposingSend(5,61)=1 exch2_pij(1,5,61)=0 exch2_pij(2,5,61)=1 exch2_pij(3,5,61)=-1 exch2_pij(4,5,61)=0 exch2_oi(5,61)=-510 exch2_oj(5,61)=511 RETURN END SUBROUTINE W2_E2SETUP_62 C Topology for tile 62 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(62)=34 exch2_tNy(62)=51 exch2_tBasex(62)=34 exch2_tBasey(62)=204 exch2_txGlobalo(62)=35 exch2_tyGlobalo(62)=205 exch2_isWedge(62)=0 exch2_isNedge(62)=0 exch2_isEedge(62)=0 exch2_isSedge(62)=0 exch2_myFace(62)=1 exch2_mydNx(62)=510 exch2_mydNy(62)=510 exch2_nNeighbours(62)=4 exch2_neighbourId(1,62)=77 exch2_iLo(1,62)=0 exch2_iHi(1,62)=35 exch2_jLo(1,62)=52 exch2_jHi(1,62)=52 exch2_opposingSend(1,62)=2 exch2_pij(1,1,62)=1 exch2_pij(2,1,62)=0 exch2_pij(3,1,62)=0 exch2_pij(4,1,62)=1 exch2_oi(1,62)=0 exch2_oj(1,62)=0 exch2_neighbourId(2,62)=47 exch2_iLo(2,62)=0 exch2_iHi(2,62)=35 exch2_jLo(2,62)=0 exch2_jHi(2,62)=0 exch2_opposingSend(2,62)=1 exch2_pij(1,2,62)=1 exch2_pij(2,2,62)=0 exch2_pij(3,2,62)=0 exch2_pij(4,2,62)=1 exch2_oi(2,62)=0 exch2_oj(2,62)=0 exch2_neighbourId(3,62)=63 exch2_iLo(3,62)=35 exch2_iHi(3,62)=35 exch2_jLo(3,62)=0 exch2_jHi(3,62)=52 exch2_opposingSend(3,62)=4 exch2_pij(1,3,62)=1 exch2_pij(2,3,62)=0 exch2_pij(3,3,62)=0 exch2_pij(4,3,62)=1 exch2_oi(3,62)=0 exch2_oj(3,62)=0 exch2_neighbourId(4,62)=61 exch2_iLo(4,62)=0 exch2_iHi(4,62)=0 exch2_jLo(4,62)=0 exch2_jHi(4,62)=52 exch2_opposingSend(4,62)=3 exch2_pij(1,4,62)=1 exch2_pij(2,4,62)=0 exch2_pij(3,4,62)=0 exch2_pij(4,4,62)=1 exch2_oi(4,62)=0 exch2_oj(4,62)=0 RETURN END SUBROUTINE W2_E2SETUP_63 C Topology for tile 63 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(63)=34 exch2_tNy(63)=51 exch2_tBasex(63)=68 exch2_tBasey(63)=204 exch2_txGlobalo(63)=69 exch2_tyGlobalo(63)=205 exch2_isWedge(63)=0 exch2_isNedge(63)=0 exch2_isEedge(63)=0 exch2_isSedge(63)=0 exch2_myFace(63)=1 exch2_mydNx(63)=510 exch2_mydNy(63)=510 exch2_nNeighbours(63)=4 exch2_neighbourId(1,63)=78 exch2_iLo(1,63)=0 exch2_iHi(1,63)=35 exch2_jLo(1,63)=52 exch2_jHi(1,63)=52 exch2_opposingSend(1,63)=2 exch2_pij(1,1,63)=1 exch2_pij(2,1,63)=0 exch2_pij(3,1,63)=0 exch2_pij(4,1,63)=1 exch2_oi(1,63)=0 exch2_oj(1,63)=0 exch2_neighbourId(2,63)=48 exch2_iLo(2,63)=0 exch2_iHi(2,63)=35 exch2_jLo(2,63)=0 exch2_jHi(2,63)=0 exch2_opposingSend(2,63)=1 exch2_pij(1,2,63)=1 exch2_pij(2,2,63)=0 exch2_pij(3,2,63)=0 exch2_pij(4,2,63)=1 exch2_oi(2,63)=0 exch2_oj(2,63)=0 exch2_neighbourId(3,63)=64 exch2_iLo(3,63)=35 exch2_iHi(3,63)=35 exch2_jLo(3,63)=0 exch2_jHi(3,63)=52 exch2_opposingSend(3,63)=4 exch2_pij(1,3,63)=1 exch2_pij(2,3,63)=0 exch2_pij(3,3,63)=0 exch2_pij(4,3,63)=1 exch2_oi(3,63)=0 exch2_oj(3,63)=0 exch2_neighbourId(4,63)=62 exch2_iLo(4,63)=0 exch2_iHi(4,63)=0 exch2_jLo(4,63)=0 exch2_jHi(4,63)=52 exch2_opposingSend(4,63)=3 exch2_pij(1,4,63)=1 exch2_pij(2,4,63)=0 exch2_pij(3,4,63)=0 exch2_pij(4,4,63)=1 exch2_oi(4,63)=0 exch2_oj(4,63)=0 RETURN END SUBROUTINE W2_E2SETUP_64 C Topology for tile 64 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(64)=34 exch2_tNy(64)=51 exch2_tBasex(64)=102 exch2_tBasey(64)=204 exch2_txGlobalo(64)=103 exch2_tyGlobalo(64)=205 exch2_isWedge(64)=0 exch2_isNedge(64)=0 exch2_isEedge(64)=0 exch2_isSedge(64)=0 exch2_myFace(64)=1 exch2_mydNx(64)=510 exch2_mydNy(64)=510 exch2_nNeighbours(64)=4 exch2_neighbourId(1,64)=79 exch2_iLo(1,64)=0 exch2_iHi(1,64)=35 exch2_jLo(1,64)=52 exch2_jHi(1,64)=52 exch2_opposingSend(1,64)=2 exch2_pij(1,1,64)=1 exch2_pij(2,1,64)=0 exch2_pij(3,1,64)=0 exch2_pij(4,1,64)=1 exch2_oi(1,64)=0 exch2_oj(1,64)=0 exch2_neighbourId(2,64)=49 exch2_iLo(2,64)=0 exch2_iHi(2,64)=35 exch2_jLo(2,64)=0 exch2_jHi(2,64)=0 exch2_opposingSend(2,64)=1 exch2_pij(1,2,64)=1 exch2_pij(2,2,64)=0 exch2_pij(3,2,64)=0 exch2_pij(4,2,64)=1 exch2_oi(2,64)=0 exch2_oj(2,64)=0 exch2_neighbourId(3,64)=65 exch2_iLo(3,64)=35 exch2_iHi(3,64)=35 exch2_jLo(3,64)=0 exch2_jHi(3,64)=52 exch2_opposingSend(3,64)=4 exch2_pij(1,3,64)=1 exch2_pij(2,3,64)=0 exch2_pij(3,3,64)=0 exch2_pij(4,3,64)=1 exch2_oi(3,64)=0 exch2_oj(3,64)=0 exch2_neighbourId(4,64)=63 exch2_iLo(4,64)=0 exch2_iHi(4,64)=0 exch2_jLo(4,64)=0 exch2_jHi(4,64)=52 exch2_opposingSend(4,64)=3 exch2_pij(1,4,64)=1 exch2_pij(2,4,64)=0 exch2_pij(3,4,64)=0 exch2_pij(4,4,64)=1 exch2_oi(4,64)=0 exch2_oj(4,64)=0 RETURN END SUBROUTINE W2_E2SETUP_65 C Topology for tile 65 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(65)=34 exch2_tNy(65)=51 exch2_tBasex(65)=136 exch2_tBasey(65)=204 exch2_txGlobalo(65)=137 exch2_tyGlobalo(65)=205 exch2_isWedge(65)=0 exch2_isNedge(65)=0 exch2_isEedge(65)=0 exch2_isSedge(65)=0 exch2_myFace(65)=1 exch2_mydNx(65)=510 exch2_mydNy(65)=510 exch2_nNeighbours(65)=4 exch2_neighbourId(1,65)=80 exch2_iLo(1,65)=0 exch2_iHi(1,65)=35 exch2_jLo(1,65)=52 exch2_jHi(1,65)=52 exch2_opposingSend(1,65)=2 exch2_pij(1,1,65)=1 exch2_pij(2,1,65)=0 exch2_pij(3,1,65)=0 exch2_pij(4,1,65)=1 exch2_oi(1,65)=0 exch2_oj(1,65)=0 exch2_neighbourId(2,65)=50 exch2_iLo(2,65)=0 exch2_iHi(2,65)=35 exch2_jLo(2,65)=0 exch2_jHi(2,65)=0 exch2_opposingSend(2,65)=1 exch2_pij(1,2,65)=1 exch2_pij(2,2,65)=0 exch2_pij(3,2,65)=0 exch2_pij(4,2,65)=1 exch2_oi(2,65)=0 exch2_oj(2,65)=0 exch2_neighbourId(3,65)=66 exch2_iLo(3,65)=35 exch2_iHi(3,65)=35 exch2_jLo(3,65)=0 exch2_jHi(3,65)=52 exch2_opposingSend(3,65)=4 exch2_pij(1,3,65)=1 exch2_pij(2,3,65)=0 exch2_pij(3,3,65)=0 exch2_pij(4,3,65)=1 exch2_oi(3,65)=0 exch2_oj(3,65)=0 exch2_neighbourId(4,65)=64 exch2_iLo(4,65)=0 exch2_iHi(4,65)=0 exch2_jLo(4,65)=0 exch2_jHi(4,65)=52 exch2_opposingSend(4,65)=3 exch2_pij(1,4,65)=1 exch2_pij(2,4,65)=0 exch2_pij(3,4,65)=0 exch2_pij(4,4,65)=1 exch2_oi(4,65)=0 exch2_oj(4,65)=0 RETURN END SUBROUTINE W2_E2SETUP_66 C Topology for tile 66 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(66)=34 exch2_tNy(66)=51 exch2_tBasex(66)=170 exch2_tBasey(66)=204 exch2_txGlobalo(66)=171 exch2_tyGlobalo(66)=205 exch2_isWedge(66)=0 exch2_isNedge(66)=0 exch2_isEedge(66)=0 exch2_isSedge(66)=0 exch2_myFace(66)=1 exch2_mydNx(66)=510 exch2_mydNy(66)=510 exch2_nNeighbours(66)=4 exch2_neighbourId(1,66)=81 exch2_iLo(1,66)=0 exch2_iHi(1,66)=35 exch2_jLo(1,66)=52 exch2_jHi(1,66)=52 exch2_opposingSend(1,66)=2 exch2_pij(1,1,66)=1 exch2_pij(2,1,66)=0 exch2_pij(3,1,66)=0 exch2_pij(4,1,66)=1 exch2_oi(1,66)=0 exch2_oj(1,66)=0 exch2_neighbourId(2,66)=51 exch2_iLo(2,66)=0 exch2_iHi(2,66)=35 exch2_jLo(2,66)=0 exch2_jHi(2,66)=0 exch2_opposingSend(2,66)=1 exch2_pij(1,2,66)=1 exch2_pij(2,2,66)=0 exch2_pij(3,2,66)=0 exch2_pij(4,2,66)=1 exch2_oi(2,66)=0 exch2_oj(2,66)=0 exch2_neighbourId(3,66)=67 exch2_iLo(3,66)=35 exch2_iHi(3,66)=35 exch2_jLo(3,66)=0 exch2_jHi(3,66)=52 exch2_opposingSend(3,66)=4 exch2_pij(1,3,66)=1 exch2_pij(2,3,66)=0 exch2_pij(3,3,66)=0 exch2_pij(4,3,66)=1 exch2_oi(3,66)=0 exch2_oj(3,66)=0 exch2_neighbourId(4,66)=65 exch2_iLo(4,66)=0 exch2_iHi(4,66)=0 exch2_jLo(4,66)=0 exch2_jHi(4,66)=52 exch2_opposingSend(4,66)=3 exch2_pij(1,4,66)=1 exch2_pij(2,4,66)=0 exch2_pij(3,4,66)=0 exch2_pij(4,4,66)=1 exch2_oi(4,66)=0 exch2_oj(4,66)=0 RETURN END SUBROUTINE W2_E2SETUP_67 C Topology for tile 67 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(67)=34 exch2_tNy(67)=51 exch2_tBasex(67)=204 exch2_tBasey(67)=204 exch2_txGlobalo(67)=205 exch2_tyGlobalo(67)=205 exch2_isWedge(67)=0 exch2_isNedge(67)=0 exch2_isEedge(67)=0 exch2_isSedge(67)=0 exch2_myFace(67)=1 exch2_mydNx(67)=510 exch2_mydNy(67)=510 exch2_nNeighbours(67)=4 exch2_neighbourId(1,67)=82 exch2_iLo(1,67)=0 exch2_iHi(1,67)=35 exch2_jLo(1,67)=52 exch2_jHi(1,67)=52 exch2_opposingSend(1,67)=2 exch2_pij(1,1,67)=1 exch2_pij(2,1,67)=0 exch2_pij(3,1,67)=0 exch2_pij(4,1,67)=1 exch2_oi(1,67)=0 exch2_oj(1,67)=0 exch2_neighbourId(2,67)=52 exch2_iLo(2,67)=0 exch2_iHi(2,67)=35 exch2_jLo(2,67)=0 exch2_jHi(2,67)=0 exch2_opposingSend(2,67)=1 exch2_pij(1,2,67)=1 exch2_pij(2,2,67)=0 exch2_pij(3,2,67)=0 exch2_pij(4,2,67)=1 exch2_oi(2,67)=0 exch2_oj(2,67)=0 exch2_neighbourId(3,67)=68 exch2_iLo(3,67)=35 exch2_iHi(3,67)=35 exch2_jLo(3,67)=0 exch2_jHi(3,67)=52 exch2_opposingSend(3,67)=4 exch2_pij(1,3,67)=1 exch2_pij(2,3,67)=0 exch2_pij(3,3,67)=0 exch2_pij(4,3,67)=1 exch2_oi(3,67)=0 exch2_oj(3,67)=0 exch2_neighbourId(4,67)=66 exch2_iLo(4,67)=0 exch2_iHi(4,67)=0 exch2_jLo(4,67)=0 exch2_jHi(4,67)=52 exch2_opposingSend(4,67)=3 exch2_pij(1,4,67)=1 exch2_pij(2,4,67)=0 exch2_pij(3,4,67)=0 exch2_pij(4,4,67)=1 exch2_oi(4,67)=0 exch2_oj(4,67)=0 RETURN END SUBROUTINE W2_E2SETUP_68 C Topology for tile 68 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(68)=34 exch2_tNy(68)=51 exch2_tBasex(68)=238 exch2_tBasey(68)=204 exch2_txGlobalo(68)=239 exch2_tyGlobalo(68)=205 exch2_isWedge(68)=0 exch2_isNedge(68)=0 exch2_isEedge(68)=0 exch2_isSedge(68)=0 exch2_myFace(68)=1 exch2_mydNx(68)=510 exch2_mydNy(68)=510 exch2_nNeighbours(68)=4 exch2_neighbourId(1,68)=83 exch2_iLo(1,68)=0 exch2_iHi(1,68)=35 exch2_jLo(1,68)=52 exch2_jHi(1,68)=52 exch2_opposingSend(1,68)=2 exch2_pij(1,1,68)=1 exch2_pij(2,1,68)=0 exch2_pij(3,1,68)=0 exch2_pij(4,1,68)=1 exch2_oi(1,68)=0 exch2_oj(1,68)=0 exch2_neighbourId(2,68)=53 exch2_iLo(2,68)=0 exch2_iHi(2,68)=35 exch2_jLo(2,68)=0 exch2_jHi(2,68)=0 exch2_opposingSend(2,68)=1 exch2_pij(1,2,68)=1 exch2_pij(2,2,68)=0 exch2_pij(3,2,68)=0 exch2_pij(4,2,68)=1 exch2_oi(2,68)=0 exch2_oj(2,68)=0 exch2_neighbourId(3,68)=69 exch2_iLo(3,68)=35 exch2_iHi(3,68)=35 exch2_jLo(3,68)=0 exch2_jHi(3,68)=52 exch2_opposingSend(3,68)=4 exch2_pij(1,3,68)=1 exch2_pij(2,3,68)=0 exch2_pij(3,3,68)=0 exch2_pij(4,3,68)=1 exch2_oi(3,68)=0 exch2_oj(3,68)=0 exch2_neighbourId(4,68)=67 exch2_iLo(4,68)=0 exch2_iHi(4,68)=0 exch2_jLo(4,68)=0 exch2_jHi(4,68)=52 exch2_opposingSend(4,68)=3 exch2_pij(1,4,68)=1 exch2_pij(2,4,68)=0 exch2_pij(3,4,68)=0 exch2_pij(4,4,68)=1 exch2_oi(4,68)=0 exch2_oj(4,68)=0 RETURN END SUBROUTINE W2_E2SETUP_69 C Topology for tile 69 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(69)=34 exch2_tNy(69)=51 exch2_tBasex(69)=272 exch2_tBasey(69)=204 exch2_txGlobalo(69)=273 exch2_tyGlobalo(69)=205 exch2_isWedge(69)=0 exch2_isNedge(69)=0 exch2_isEedge(69)=0 exch2_isSedge(69)=0 exch2_myFace(69)=1 exch2_mydNx(69)=510 exch2_mydNy(69)=510 exch2_nNeighbours(69)=4 exch2_neighbourId(1,69)=84 exch2_iLo(1,69)=0 exch2_iHi(1,69)=35 exch2_jLo(1,69)=52 exch2_jHi(1,69)=52 exch2_opposingSend(1,69)=2 exch2_pij(1,1,69)=1 exch2_pij(2,1,69)=0 exch2_pij(3,1,69)=0 exch2_pij(4,1,69)=1 exch2_oi(1,69)=0 exch2_oj(1,69)=0 exch2_neighbourId(2,69)=54 exch2_iLo(2,69)=0 exch2_iHi(2,69)=35 exch2_jLo(2,69)=0 exch2_jHi(2,69)=0 exch2_opposingSend(2,69)=1 exch2_pij(1,2,69)=1 exch2_pij(2,2,69)=0 exch2_pij(3,2,69)=0 exch2_pij(4,2,69)=1 exch2_oi(2,69)=0 exch2_oj(2,69)=0 exch2_neighbourId(3,69)=70 exch2_iLo(3,69)=35 exch2_iHi(3,69)=35 exch2_jLo(3,69)=0 exch2_jHi(3,69)=52 exch2_opposingSend(3,69)=4 exch2_pij(1,3,69)=1 exch2_pij(2,3,69)=0 exch2_pij(3,3,69)=0 exch2_pij(4,3,69)=1 exch2_oi(3,69)=0 exch2_oj(3,69)=0 exch2_neighbourId(4,69)=68 exch2_iLo(4,69)=0 exch2_iHi(4,69)=0 exch2_jLo(4,69)=0 exch2_jHi(4,69)=52 exch2_opposingSend(4,69)=3 exch2_pij(1,4,69)=1 exch2_pij(2,4,69)=0 exch2_pij(3,4,69)=0 exch2_pij(4,4,69)=1 exch2_oi(4,69)=0 exch2_oj(4,69)=0 RETURN END SUBROUTINE W2_E2SETUP_70 C Topology for tile 70 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(70)=34 exch2_tNy(70)=51 exch2_tBasex(70)=306 exch2_tBasey(70)=204 exch2_txGlobalo(70)=307 exch2_tyGlobalo(70)=205 exch2_isWedge(70)=0 exch2_isNedge(70)=0 exch2_isEedge(70)=0 exch2_isSedge(70)=0 exch2_myFace(70)=1 exch2_mydNx(70)=510 exch2_mydNy(70)=510 exch2_nNeighbours(70)=4 exch2_neighbourId(1,70)=85 exch2_iLo(1,70)=0 exch2_iHi(1,70)=35 exch2_jLo(1,70)=52 exch2_jHi(1,70)=52 exch2_opposingSend(1,70)=2 exch2_pij(1,1,70)=1 exch2_pij(2,1,70)=0 exch2_pij(3,1,70)=0 exch2_pij(4,1,70)=1 exch2_oi(1,70)=0 exch2_oj(1,70)=0 exch2_neighbourId(2,70)=55 exch2_iLo(2,70)=0 exch2_iHi(2,70)=35 exch2_jLo(2,70)=0 exch2_jHi(2,70)=0 exch2_opposingSend(2,70)=1 exch2_pij(1,2,70)=1 exch2_pij(2,2,70)=0 exch2_pij(3,2,70)=0 exch2_pij(4,2,70)=1 exch2_oi(2,70)=0 exch2_oj(2,70)=0 exch2_neighbourId(3,70)=71 exch2_iLo(3,70)=35 exch2_iHi(3,70)=35 exch2_jLo(3,70)=0 exch2_jHi(3,70)=52 exch2_opposingSend(3,70)=4 exch2_pij(1,3,70)=1 exch2_pij(2,3,70)=0 exch2_pij(3,3,70)=0 exch2_pij(4,3,70)=1 exch2_oi(3,70)=0 exch2_oj(3,70)=0 exch2_neighbourId(4,70)=69 exch2_iLo(4,70)=0 exch2_iHi(4,70)=0 exch2_jLo(4,70)=0 exch2_jHi(4,70)=52 exch2_opposingSend(4,70)=3 exch2_pij(1,4,70)=1 exch2_pij(2,4,70)=0 exch2_pij(3,4,70)=0 exch2_pij(4,4,70)=1 exch2_oi(4,70)=0 exch2_oj(4,70)=0 RETURN END SUBROUTINE W2_E2SETUP_71 C Topology for tile 71 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(71)=34 exch2_tNy(71)=51 exch2_tBasex(71)=340 exch2_tBasey(71)=204 exch2_txGlobalo(71)=341 exch2_tyGlobalo(71)=205 exch2_isWedge(71)=0 exch2_isNedge(71)=0 exch2_isEedge(71)=0 exch2_isSedge(71)=0 exch2_myFace(71)=1 exch2_mydNx(71)=510 exch2_mydNy(71)=510 exch2_nNeighbours(71)=4 exch2_neighbourId(1,71)=86 exch2_iLo(1,71)=0 exch2_iHi(1,71)=35 exch2_jLo(1,71)=52 exch2_jHi(1,71)=52 exch2_opposingSend(1,71)=2 exch2_pij(1,1,71)=1 exch2_pij(2,1,71)=0 exch2_pij(3,1,71)=0 exch2_pij(4,1,71)=1 exch2_oi(1,71)=0 exch2_oj(1,71)=0 exch2_neighbourId(2,71)=56 exch2_iLo(2,71)=0 exch2_iHi(2,71)=35 exch2_jLo(2,71)=0 exch2_jHi(2,71)=0 exch2_opposingSend(2,71)=1 exch2_pij(1,2,71)=1 exch2_pij(2,2,71)=0 exch2_pij(3,2,71)=0 exch2_pij(4,2,71)=1 exch2_oi(2,71)=0 exch2_oj(2,71)=0 exch2_neighbourId(3,71)=72 exch2_iLo(3,71)=35 exch2_iHi(3,71)=35 exch2_jLo(3,71)=0 exch2_jHi(3,71)=52 exch2_opposingSend(3,71)=4 exch2_pij(1,3,71)=1 exch2_pij(2,3,71)=0 exch2_pij(3,3,71)=0 exch2_pij(4,3,71)=1 exch2_oi(3,71)=0 exch2_oj(3,71)=0 exch2_neighbourId(4,71)=70 exch2_iLo(4,71)=0 exch2_iHi(4,71)=0 exch2_jLo(4,71)=0 exch2_jHi(4,71)=52 exch2_opposingSend(4,71)=3 exch2_pij(1,4,71)=1 exch2_pij(2,4,71)=0 exch2_pij(3,4,71)=0 exch2_pij(4,4,71)=1 exch2_oi(4,71)=0 exch2_oj(4,71)=0 RETURN END SUBROUTINE W2_E2SETUP_72 C Topology for tile 72 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(72)=34 exch2_tNy(72)=51 exch2_tBasex(72)=374 exch2_tBasey(72)=204 exch2_txGlobalo(72)=375 exch2_tyGlobalo(72)=205 exch2_isWedge(72)=0 exch2_isNedge(72)=0 exch2_isEedge(72)=0 exch2_isSedge(72)=0 exch2_myFace(72)=1 exch2_mydNx(72)=510 exch2_mydNy(72)=510 exch2_nNeighbours(72)=4 exch2_neighbourId(1,72)=87 exch2_iLo(1,72)=0 exch2_iHi(1,72)=35 exch2_jLo(1,72)=52 exch2_jHi(1,72)=52 exch2_opposingSend(1,72)=2 exch2_pij(1,1,72)=1 exch2_pij(2,1,72)=0 exch2_pij(3,1,72)=0 exch2_pij(4,1,72)=1 exch2_oi(1,72)=0 exch2_oj(1,72)=0 exch2_neighbourId(2,72)=57 exch2_iLo(2,72)=0 exch2_iHi(2,72)=35 exch2_jLo(2,72)=0 exch2_jHi(2,72)=0 exch2_opposingSend(2,72)=1 exch2_pij(1,2,72)=1 exch2_pij(2,2,72)=0 exch2_pij(3,2,72)=0 exch2_pij(4,2,72)=1 exch2_oi(2,72)=0 exch2_oj(2,72)=0 exch2_neighbourId(3,72)=73 exch2_iLo(3,72)=35 exch2_iHi(3,72)=35 exch2_jLo(3,72)=0 exch2_jHi(3,72)=52 exch2_opposingSend(3,72)=4 exch2_pij(1,3,72)=1 exch2_pij(2,3,72)=0 exch2_pij(3,3,72)=0 exch2_pij(4,3,72)=1 exch2_oi(3,72)=0 exch2_oj(3,72)=0 exch2_neighbourId(4,72)=71 exch2_iLo(4,72)=0 exch2_iHi(4,72)=0 exch2_jLo(4,72)=0 exch2_jHi(4,72)=52 exch2_opposingSend(4,72)=3 exch2_pij(1,4,72)=1 exch2_pij(2,4,72)=0 exch2_pij(3,4,72)=0 exch2_pij(4,4,72)=1 exch2_oi(4,72)=0 exch2_oj(4,72)=0 RETURN END SUBROUTINE W2_E2SETUP_73 C Topology for tile 73 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(73)=34 exch2_tNy(73)=51 exch2_tBasex(73)=408 exch2_tBasey(73)=204 exch2_txGlobalo(73)=409 exch2_tyGlobalo(73)=205 exch2_isWedge(73)=0 exch2_isNedge(73)=0 exch2_isEedge(73)=0 exch2_isSedge(73)=0 exch2_myFace(73)=1 exch2_mydNx(73)=510 exch2_mydNy(73)=510 exch2_nNeighbours(73)=4 exch2_neighbourId(1,73)=88 exch2_iLo(1,73)=0 exch2_iHi(1,73)=35 exch2_jLo(1,73)=52 exch2_jHi(1,73)=52 exch2_opposingSend(1,73)=2 exch2_pij(1,1,73)=1 exch2_pij(2,1,73)=0 exch2_pij(3,1,73)=0 exch2_pij(4,1,73)=1 exch2_oi(1,73)=0 exch2_oj(1,73)=0 exch2_neighbourId(2,73)=58 exch2_iLo(2,73)=0 exch2_iHi(2,73)=35 exch2_jLo(2,73)=0 exch2_jHi(2,73)=0 exch2_opposingSend(2,73)=1 exch2_pij(1,2,73)=1 exch2_pij(2,2,73)=0 exch2_pij(3,2,73)=0 exch2_pij(4,2,73)=1 exch2_oi(2,73)=0 exch2_oj(2,73)=0 exch2_neighbourId(3,73)=74 exch2_iLo(3,73)=35 exch2_iHi(3,73)=35 exch2_jLo(3,73)=0 exch2_jHi(3,73)=52 exch2_opposingSend(3,73)=4 exch2_pij(1,3,73)=1 exch2_pij(2,3,73)=0 exch2_pij(3,3,73)=0 exch2_pij(4,3,73)=1 exch2_oi(3,73)=0 exch2_oj(3,73)=0 exch2_neighbourId(4,73)=72 exch2_iLo(4,73)=0 exch2_iHi(4,73)=0 exch2_jLo(4,73)=0 exch2_jHi(4,73)=52 exch2_opposingSend(4,73)=3 exch2_pij(1,4,73)=1 exch2_pij(2,4,73)=0 exch2_pij(3,4,73)=0 exch2_pij(4,4,73)=1 exch2_oi(4,73)=0 exch2_oj(4,73)=0 RETURN END SUBROUTINE W2_E2SETUP_74 C Topology for tile 74 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(74)=34 exch2_tNy(74)=51 exch2_tBasex(74)=442 exch2_tBasey(74)=204 exch2_txGlobalo(74)=443 exch2_tyGlobalo(74)=205 exch2_isWedge(74)=0 exch2_isNedge(74)=0 exch2_isEedge(74)=0 exch2_isSedge(74)=0 exch2_myFace(74)=1 exch2_mydNx(74)=510 exch2_mydNy(74)=510 exch2_nNeighbours(74)=4 exch2_neighbourId(1,74)=89 exch2_iLo(1,74)=0 exch2_iHi(1,74)=35 exch2_jLo(1,74)=52 exch2_jHi(1,74)=52 exch2_opposingSend(1,74)=2 exch2_pij(1,1,74)=1 exch2_pij(2,1,74)=0 exch2_pij(3,1,74)=0 exch2_pij(4,1,74)=1 exch2_oi(1,74)=0 exch2_oj(1,74)=0 exch2_neighbourId(2,74)=59 exch2_iLo(2,74)=0 exch2_iHi(2,74)=35 exch2_jLo(2,74)=0 exch2_jHi(2,74)=0 exch2_opposingSend(2,74)=1 exch2_pij(1,2,74)=1 exch2_pij(2,2,74)=0 exch2_pij(3,2,74)=0 exch2_pij(4,2,74)=1 exch2_oi(2,74)=0 exch2_oj(2,74)=0 exch2_neighbourId(3,74)=75 exch2_iLo(3,74)=35 exch2_iHi(3,74)=35 exch2_jLo(3,74)=0 exch2_jHi(3,74)=52 exch2_opposingSend(3,74)=4 exch2_pij(1,3,74)=1 exch2_pij(2,3,74)=0 exch2_pij(3,3,74)=0 exch2_pij(4,3,74)=1 exch2_oi(3,74)=0 exch2_oj(3,74)=0 exch2_neighbourId(4,74)=73 exch2_iLo(4,74)=0 exch2_iHi(4,74)=0 exch2_jLo(4,74)=0 exch2_jHi(4,74)=52 exch2_opposingSend(4,74)=3 exch2_pij(1,4,74)=1 exch2_pij(2,4,74)=0 exch2_pij(3,4,74)=0 exch2_pij(4,4,74)=1 exch2_oi(4,74)=0 exch2_oj(4,74)=0 RETURN END SUBROUTINE W2_E2SETUP_75 C Topology for tile 75 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(75)=34 exch2_tNy(75)=51 exch2_tBasex(75)=476 exch2_tBasey(75)=204 exch2_txGlobalo(75)=477 exch2_tyGlobalo(75)=205 exch2_isWedge(75)=0 exch2_isNedge(75)=0 exch2_isEedge(75)=1 exch2_isSedge(75)=0 exch2_myFace(75)=1 exch2_mydNx(75)=510 exch2_mydNy(75)=510 exch2_nNeighbours(75)=4 exch2_neighbourId(1,75)=90 exch2_iLo(1,75)=0 exch2_iHi(1,75)=35 exch2_jLo(1,75)=52 exch2_jHi(1,75)=52 exch2_opposingSend(1,75)=2 exch2_pij(1,1,75)=1 exch2_pij(2,1,75)=0 exch2_pij(3,1,75)=0 exch2_pij(4,1,75)=1 exch2_oi(1,75)=0 exch2_oj(1,75)=0 exch2_neighbourId(2,75)=60 exch2_iLo(2,75)=0 exch2_iHi(2,75)=35 exch2_jLo(2,75)=0 exch2_jHi(2,75)=0 exch2_opposingSend(2,75)=1 exch2_pij(1,2,75)=1 exch2_pij(2,2,75)=0 exch2_pij(3,2,75)=0 exch2_pij(4,2,75)=1 exch2_oi(2,75)=0 exch2_oj(2,75)=0 exch2_neighbourId(3,75)=211 exch2_iLo(3,75)=35 exch2_iHi(3,75)=35 exch2_jLo(3,75)=0 exch2_jHi(3,75)=52 exch2_opposingSend(3,75)=4 exch2_pij(1,3,75)=1 exch2_pij(2,3,75)=0 exch2_pij(3,3,75)=0 exch2_pij(4,3,75)=1 exch2_oi(3,75)=510 exch2_oj(3,75)=0 exch2_neighbourId(4,75)=74 exch2_iLo(4,75)=0 exch2_iHi(4,75)=0 exch2_jLo(4,75)=0 exch2_jHi(4,75)=52 exch2_opposingSend(4,75)=3 exch2_pij(1,4,75)=1 exch2_pij(2,4,75)=0 exch2_pij(3,4,75)=0 exch2_pij(4,4,75)=1 exch2_oi(4,75)=0 exch2_oj(4,75)=0 RETURN END SUBROUTINE W2_E2SETUP_76 C Topology for tile 76 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(76)=34 exch2_tNy(76)=51 exch2_tBasex(76)=0 exch2_tBasey(76)=255 exch2_txGlobalo(76)=1 exch2_tyGlobalo(76)=256 exch2_isWedge(76)=1 exch2_isNedge(76)=0 exch2_isEedge(76)=0 exch2_isSedge(76)=0 exch2_myFace(76)=1 exch2_mydNx(76)=510 exch2_mydNy(76)=510 exch2_nNeighbours(76)=5 exch2_neighbourId(1,76)=91 exch2_iLo(1,76)=0 exch2_iHi(1,76)=35 exch2_jLo(1,76)=52 exch2_jHi(1,76)=52 exch2_opposingSend(1,76)=2 exch2_pij(1,1,76)=1 exch2_pij(2,1,76)=0 exch2_pij(3,1,76)=0 exch2_pij(4,1,76)=1 exch2_oi(1,76)=0 exch2_oj(1,76)=0 exch2_neighbourId(2,76)=61 exch2_iLo(2,76)=0 exch2_iHi(2,76)=35 exch2_jLo(2,76)=0 exch2_jHi(2,76)=0 exch2_opposingSend(2,76)=1 exch2_pij(1,2,76)=1 exch2_pij(2,2,76)=0 exch2_pij(3,2,76)=0 exch2_pij(4,2,76)=1 exch2_oi(2,76)=0 exch2_oj(2,76)=0 exch2_neighbourId(3,76)=77 exch2_iLo(3,76)=35 exch2_iHi(3,76)=35 exch2_jLo(3,76)=0 exch2_jHi(3,76)=52 exch2_opposingSend(3,76)=4 exch2_pij(1,3,76)=1 exch2_pij(2,3,76)=0 exch2_pij(3,3,76)=0 exch2_pij(4,3,76)=1 exch2_oi(3,76)=0 exch2_oj(3,76)=0 exch2_neighbourId(4,76)=742 exch2_iLo(4,76)=0 exch2_iHi(4,76)=0 exch2_jLo(4,76)=17 exch2_jHi(4,76)=52 exch2_opposingSend(4,76)=1 exch2_pij(1,4,76)=0 exch2_pij(2,4,76)=1 exch2_pij(3,4,76)=-1 exch2_pij(4,4,76)=0 exch2_oi(4,76)=-510 exch2_oj(4,76)=511 exch2_neighbourId(5,76)=743 exch2_iLo(5,76)=0 exch2_iHi(5,76)=0 exch2_jLo(5,76)=0 exch2_jHi(5,76)=18 exch2_opposingSend(5,76)=2 exch2_pij(1,5,76)=0 exch2_pij(2,5,76)=1 exch2_pij(3,5,76)=-1 exch2_pij(4,5,76)=0 exch2_oi(5,76)=-510 exch2_oj(5,76)=511 RETURN END SUBROUTINE W2_E2SETUP_77 C Topology for tile 77 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(77)=34 exch2_tNy(77)=51 exch2_tBasex(77)=34 exch2_tBasey(77)=255 exch2_txGlobalo(77)=35 exch2_tyGlobalo(77)=256 exch2_isWedge(77)=0 exch2_isNedge(77)=0 exch2_isEedge(77)=0 exch2_isSedge(77)=0 exch2_myFace(77)=1 exch2_mydNx(77)=510 exch2_mydNy(77)=510 exch2_nNeighbours(77)=4 exch2_neighbourId(1,77)=92 exch2_iLo(1,77)=0 exch2_iHi(1,77)=35 exch2_jLo(1,77)=52 exch2_jHi(1,77)=52 exch2_opposingSend(1,77)=2 exch2_pij(1,1,77)=1 exch2_pij(2,1,77)=0 exch2_pij(3,1,77)=0 exch2_pij(4,1,77)=1 exch2_oi(1,77)=0 exch2_oj(1,77)=0 exch2_neighbourId(2,77)=62 exch2_iLo(2,77)=0 exch2_iHi(2,77)=35 exch2_jLo(2,77)=0 exch2_jHi(2,77)=0 exch2_opposingSend(2,77)=1 exch2_pij(1,2,77)=1 exch2_pij(2,2,77)=0 exch2_pij(3,2,77)=0 exch2_pij(4,2,77)=1 exch2_oi(2,77)=0 exch2_oj(2,77)=0 exch2_neighbourId(3,77)=78 exch2_iLo(3,77)=35 exch2_iHi(3,77)=35 exch2_jLo(3,77)=0 exch2_jHi(3,77)=52 exch2_opposingSend(3,77)=4 exch2_pij(1,3,77)=1 exch2_pij(2,3,77)=0 exch2_pij(3,3,77)=0 exch2_pij(4,3,77)=1 exch2_oi(3,77)=0 exch2_oj(3,77)=0 exch2_neighbourId(4,77)=76 exch2_iLo(4,77)=0 exch2_iHi(4,77)=0 exch2_jLo(4,77)=0 exch2_jHi(4,77)=52 exch2_opposingSend(4,77)=3 exch2_pij(1,4,77)=1 exch2_pij(2,4,77)=0 exch2_pij(3,4,77)=0 exch2_pij(4,4,77)=1 exch2_oi(4,77)=0 exch2_oj(4,77)=0 RETURN END SUBROUTINE W2_E2SETUP_78 C Topology for tile 78 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(78)=34 exch2_tNy(78)=51 exch2_tBasex(78)=68 exch2_tBasey(78)=255 exch2_txGlobalo(78)=69 exch2_tyGlobalo(78)=256 exch2_isWedge(78)=0 exch2_isNedge(78)=0 exch2_isEedge(78)=0 exch2_isSedge(78)=0 exch2_myFace(78)=1 exch2_mydNx(78)=510 exch2_mydNy(78)=510 exch2_nNeighbours(78)=4 exch2_neighbourId(1,78)=93 exch2_iLo(1,78)=0 exch2_iHi(1,78)=35 exch2_jLo(1,78)=52 exch2_jHi(1,78)=52 exch2_opposingSend(1,78)=2 exch2_pij(1,1,78)=1 exch2_pij(2,1,78)=0 exch2_pij(3,1,78)=0 exch2_pij(4,1,78)=1 exch2_oi(1,78)=0 exch2_oj(1,78)=0 exch2_neighbourId(2,78)=63 exch2_iLo(2,78)=0 exch2_iHi(2,78)=35 exch2_jLo(2,78)=0 exch2_jHi(2,78)=0 exch2_opposingSend(2,78)=1 exch2_pij(1,2,78)=1 exch2_pij(2,2,78)=0 exch2_pij(3,2,78)=0 exch2_pij(4,2,78)=1 exch2_oi(2,78)=0 exch2_oj(2,78)=0 exch2_neighbourId(3,78)=79 exch2_iLo(3,78)=35 exch2_iHi(3,78)=35 exch2_jLo(3,78)=0 exch2_jHi(3,78)=52 exch2_opposingSend(3,78)=4 exch2_pij(1,3,78)=1 exch2_pij(2,3,78)=0 exch2_pij(3,3,78)=0 exch2_pij(4,3,78)=1 exch2_oi(3,78)=0 exch2_oj(3,78)=0 exch2_neighbourId(4,78)=77 exch2_iLo(4,78)=0 exch2_iHi(4,78)=0 exch2_jLo(4,78)=0 exch2_jHi(4,78)=52 exch2_opposingSend(4,78)=3 exch2_pij(1,4,78)=1 exch2_pij(2,4,78)=0 exch2_pij(3,4,78)=0 exch2_pij(4,4,78)=1 exch2_oi(4,78)=0 exch2_oj(4,78)=0 RETURN END SUBROUTINE W2_E2SETUP_79 C Topology for tile 79 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(79)=34 exch2_tNy(79)=51 exch2_tBasex(79)=102 exch2_tBasey(79)=255 exch2_txGlobalo(79)=103 exch2_tyGlobalo(79)=256 exch2_isWedge(79)=0 exch2_isNedge(79)=0 exch2_isEedge(79)=0 exch2_isSedge(79)=0 exch2_myFace(79)=1 exch2_mydNx(79)=510 exch2_mydNy(79)=510 exch2_nNeighbours(79)=4 exch2_neighbourId(1,79)=94 exch2_iLo(1,79)=0 exch2_iHi(1,79)=35 exch2_jLo(1,79)=52 exch2_jHi(1,79)=52 exch2_opposingSend(1,79)=2 exch2_pij(1,1,79)=1 exch2_pij(2,1,79)=0 exch2_pij(3,1,79)=0 exch2_pij(4,1,79)=1 exch2_oi(1,79)=0 exch2_oj(1,79)=0 exch2_neighbourId(2,79)=64 exch2_iLo(2,79)=0 exch2_iHi(2,79)=35 exch2_jLo(2,79)=0 exch2_jHi(2,79)=0 exch2_opposingSend(2,79)=1 exch2_pij(1,2,79)=1 exch2_pij(2,2,79)=0 exch2_pij(3,2,79)=0 exch2_pij(4,2,79)=1 exch2_oi(2,79)=0 exch2_oj(2,79)=0 exch2_neighbourId(3,79)=80 exch2_iLo(3,79)=35 exch2_iHi(3,79)=35 exch2_jLo(3,79)=0 exch2_jHi(3,79)=52 exch2_opposingSend(3,79)=4 exch2_pij(1,3,79)=1 exch2_pij(2,3,79)=0 exch2_pij(3,3,79)=0 exch2_pij(4,3,79)=1 exch2_oi(3,79)=0 exch2_oj(3,79)=0 exch2_neighbourId(4,79)=78 exch2_iLo(4,79)=0 exch2_iHi(4,79)=0 exch2_jLo(4,79)=0 exch2_jHi(4,79)=52 exch2_opposingSend(4,79)=3 exch2_pij(1,4,79)=1 exch2_pij(2,4,79)=0 exch2_pij(3,4,79)=0 exch2_pij(4,4,79)=1 exch2_oi(4,79)=0 exch2_oj(4,79)=0 RETURN END SUBROUTINE W2_E2SETUP_80 C Topology for tile 80 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(80)=34 exch2_tNy(80)=51 exch2_tBasex(80)=136 exch2_tBasey(80)=255 exch2_txGlobalo(80)=137 exch2_tyGlobalo(80)=256 exch2_isWedge(80)=0 exch2_isNedge(80)=0 exch2_isEedge(80)=0 exch2_isSedge(80)=0 exch2_myFace(80)=1 exch2_mydNx(80)=510 exch2_mydNy(80)=510 exch2_nNeighbours(80)=4 exch2_neighbourId(1,80)=95 exch2_iLo(1,80)=0 exch2_iHi(1,80)=35 exch2_jLo(1,80)=52 exch2_jHi(1,80)=52 exch2_opposingSend(1,80)=2 exch2_pij(1,1,80)=1 exch2_pij(2,1,80)=0 exch2_pij(3,1,80)=0 exch2_pij(4,1,80)=1 exch2_oi(1,80)=0 exch2_oj(1,80)=0 exch2_neighbourId(2,80)=65 exch2_iLo(2,80)=0 exch2_iHi(2,80)=35 exch2_jLo(2,80)=0 exch2_jHi(2,80)=0 exch2_opposingSend(2,80)=1 exch2_pij(1,2,80)=1 exch2_pij(2,2,80)=0 exch2_pij(3,2,80)=0 exch2_pij(4,2,80)=1 exch2_oi(2,80)=0 exch2_oj(2,80)=0 exch2_neighbourId(3,80)=81 exch2_iLo(3,80)=35 exch2_iHi(3,80)=35 exch2_jLo(3,80)=0 exch2_jHi(3,80)=52 exch2_opposingSend(3,80)=4 exch2_pij(1,3,80)=1 exch2_pij(2,3,80)=0 exch2_pij(3,3,80)=0 exch2_pij(4,3,80)=1 exch2_oi(3,80)=0 exch2_oj(3,80)=0 exch2_neighbourId(4,80)=79 exch2_iLo(4,80)=0 exch2_iHi(4,80)=0 exch2_jLo(4,80)=0 exch2_jHi(4,80)=52 exch2_opposingSend(4,80)=3 exch2_pij(1,4,80)=1 exch2_pij(2,4,80)=0 exch2_pij(3,4,80)=0 exch2_pij(4,4,80)=1 exch2_oi(4,80)=0 exch2_oj(4,80)=0 RETURN END SUBROUTINE W2_E2SETUP_81 C Topology for tile 81 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(81)=34 exch2_tNy(81)=51 exch2_tBasex(81)=170 exch2_tBasey(81)=255 exch2_txGlobalo(81)=171 exch2_tyGlobalo(81)=256 exch2_isWedge(81)=0 exch2_isNedge(81)=0 exch2_isEedge(81)=0 exch2_isSedge(81)=0 exch2_myFace(81)=1 exch2_mydNx(81)=510 exch2_mydNy(81)=510 exch2_nNeighbours(81)=4 exch2_neighbourId(1,81)=96 exch2_iLo(1,81)=0 exch2_iHi(1,81)=35 exch2_jLo(1,81)=52 exch2_jHi(1,81)=52 exch2_opposingSend(1,81)=2 exch2_pij(1,1,81)=1 exch2_pij(2,1,81)=0 exch2_pij(3,1,81)=0 exch2_pij(4,1,81)=1 exch2_oi(1,81)=0 exch2_oj(1,81)=0 exch2_neighbourId(2,81)=66 exch2_iLo(2,81)=0 exch2_iHi(2,81)=35 exch2_jLo(2,81)=0 exch2_jHi(2,81)=0 exch2_opposingSend(2,81)=1 exch2_pij(1,2,81)=1 exch2_pij(2,2,81)=0 exch2_pij(3,2,81)=0 exch2_pij(4,2,81)=1 exch2_oi(2,81)=0 exch2_oj(2,81)=0 exch2_neighbourId(3,81)=82 exch2_iLo(3,81)=35 exch2_iHi(3,81)=35 exch2_jLo(3,81)=0 exch2_jHi(3,81)=52 exch2_opposingSend(3,81)=4 exch2_pij(1,3,81)=1 exch2_pij(2,3,81)=0 exch2_pij(3,3,81)=0 exch2_pij(4,3,81)=1 exch2_oi(3,81)=0 exch2_oj(3,81)=0 exch2_neighbourId(4,81)=80 exch2_iLo(4,81)=0 exch2_iHi(4,81)=0 exch2_jLo(4,81)=0 exch2_jHi(4,81)=52 exch2_opposingSend(4,81)=3 exch2_pij(1,4,81)=1 exch2_pij(2,4,81)=0 exch2_pij(3,4,81)=0 exch2_pij(4,4,81)=1 exch2_oi(4,81)=0 exch2_oj(4,81)=0 RETURN END SUBROUTINE W2_E2SETUP_82 C Topology for tile 82 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(82)=34 exch2_tNy(82)=51 exch2_tBasex(82)=204 exch2_tBasey(82)=255 exch2_txGlobalo(82)=205 exch2_tyGlobalo(82)=256 exch2_isWedge(82)=0 exch2_isNedge(82)=0 exch2_isEedge(82)=0 exch2_isSedge(82)=0 exch2_myFace(82)=1 exch2_mydNx(82)=510 exch2_mydNy(82)=510 exch2_nNeighbours(82)=4 exch2_neighbourId(1,82)=97 exch2_iLo(1,82)=0 exch2_iHi(1,82)=35 exch2_jLo(1,82)=52 exch2_jHi(1,82)=52 exch2_opposingSend(1,82)=2 exch2_pij(1,1,82)=1 exch2_pij(2,1,82)=0 exch2_pij(3,1,82)=0 exch2_pij(4,1,82)=1 exch2_oi(1,82)=0 exch2_oj(1,82)=0 exch2_neighbourId(2,82)=67 exch2_iLo(2,82)=0 exch2_iHi(2,82)=35 exch2_jLo(2,82)=0 exch2_jHi(2,82)=0 exch2_opposingSend(2,82)=1 exch2_pij(1,2,82)=1 exch2_pij(2,2,82)=0 exch2_pij(3,2,82)=0 exch2_pij(4,2,82)=1 exch2_oi(2,82)=0 exch2_oj(2,82)=0 exch2_neighbourId(3,82)=83 exch2_iLo(3,82)=35 exch2_iHi(3,82)=35 exch2_jLo(3,82)=0 exch2_jHi(3,82)=52 exch2_opposingSend(3,82)=4 exch2_pij(1,3,82)=1 exch2_pij(2,3,82)=0 exch2_pij(3,3,82)=0 exch2_pij(4,3,82)=1 exch2_oi(3,82)=0 exch2_oj(3,82)=0 exch2_neighbourId(4,82)=81 exch2_iLo(4,82)=0 exch2_iHi(4,82)=0 exch2_jLo(4,82)=0 exch2_jHi(4,82)=52 exch2_opposingSend(4,82)=3 exch2_pij(1,4,82)=1 exch2_pij(2,4,82)=0 exch2_pij(3,4,82)=0 exch2_pij(4,4,82)=1 exch2_oi(4,82)=0 exch2_oj(4,82)=0 RETURN END SUBROUTINE W2_E2SETUP_83 C Topology for tile 83 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(83)=34 exch2_tNy(83)=51 exch2_tBasex(83)=238 exch2_tBasey(83)=255 exch2_txGlobalo(83)=239 exch2_tyGlobalo(83)=256 exch2_isWedge(83)=0 exch2_isNedge(83)=0 exch2_isEedge(83)=0 exch2_isSedge(83)=0 exch2_myFace(83)=1 exch2_mydNx(83)=510 exch2_mydNy(83)=510 exch2_nNeighbours(83)=4 exch2_neighbourId(1,83)=98 exch2_iLo(1,83)=0 exch2_iHi(1,83)=35 exch2_jLo(1,83)=52 exch2_jHi(1,83)=52 exch2_opposingSend(1,83)=2 exch2_pij(1,1,83)=1 exch2_pij(2,1,83)=0 exch2_pij(3,1,83)=0 exch2_pij(4,1,83)=1 exch2_oi(1,83)=0 exch2_oj(1,83)=0 exch2_neighbourId(2,83)=68 exch2_iLo(2,83)=0 exch2_iHi(2,83)=35 exch2_jLo(2,83)=0 exch2_jHi(2,83)=0 exch2_opposingSend(2,83)=1 exch2_pij(1,2,83)=1 exch2_pij(2,2,83)=0 exch2_pij(3,2,83)=0 exch2_pij(4,2,83)=1 exch2_oi(2,83)=0 exch2_oj(2,83)=0 exch2_neighbourId(3,83)=84 exch2_iLo(3,83)=35 exch2_iHi(3,83)=35 exch2_jLo(3,83)=0 exch2_jHi(3,83)=52 exch2_opposingSend(3,83)=4 exch2_pij(1,3,83)=1 exch2_pij(2,3,83)=0 exch2_pij(3,3,83)=0 exch2_pij(4,3,83)=1 exch2_oi(3,83)=0 exch2_oj(3,83)=0 exch2_neighbourId(4,83)=82 exch2_iLo(4,83)=0 exch2_iHi(4,83)=0 exch2_jLo(4,83)=0 exch2_jHi(4,83)=52 exch2_opposingSend(4,83)=3 exch2_pij(1,4,83)=1 exch2_pij(2,4,83)=0 exch2_pij(3,4,83)=0 exch2_pij(4,4,83)=1 exch2_oi(4,83)=0 exch2_oj(4,83)=0 RETURN END SUBROUTINE W2_E2SETUP_84 C Topology for tile 84 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(84)=34 exch2_tNy(84)=51 exch2_tBasex(84)=272 exch2_tBasey(84)=255 exch2_txGlobalo(84)=273 exch2_tyGlobalo(84)=256 exch2_isWedge(84)=0 exch2_isNedge(84)=0 exch2_isEedge(84)=0 exch2_isSedge(84)=0 exch2_myFace(84)=1 exch2_mydNx(84)=510 exch2_mydNy(84)=510 exch2_nNeighbours(84)=4 exch2_neighbourId(1,84)=99 exch2_iLo(1,84)=0 exch2_iHi(1,84)=35 exch2_jLo(1,84)=52 exch2_jHi(1,84)=52 exch2_opposingSend(1,84)=2 exch2_pij(1,1,84)=1 exch2_pij(2,1,84)=0 exch2_pij(3,1,84)=0 exch2_pij(4,1,84)=1 exch2_oi(1,84)=0 exch2_oj(1,84)=0 exch2_neighbourId(2,84)=69 exch2_iLo(2,84)=0 exch2_iHi(2,84)=35 exch2_jLo(2,84)=0 exch2_jHi(2,84)=0 exch2_opposingSend(2,84)=1 exch2_pij(1,2,84)=1 exch2_pij(2,2,84)=0 exch2_pij(3,2,84)=0 exch2_pij(4,2,84)=1 exch2_oi(2,84)=0 exch2_oj(2,84)=0 exch2_neighbourId(3,84)=85 exch2_iLo(3,84)=35 exch2_iHi(3,84)=35 exch2_jLo(3,84)=0 exch2_jHi(3,84)=52 exch2_opposingSend(3,84)=4 exch2_pij(1,3,84)=1 exch2_pij(2,3,84)=0 exch2_pij(3,3,84)=0 exch2_pij(4,3,84)=1 exch2_oi(3,84)=0 exch2_oj(3,84)=0 exch2_neighbourId(4,84)=83 exch2_iLo(4,84)=0 exch2_iHi(4,84)=0 exch2_jLo(4,84)=0 exch2_jHi(4,84)=52 exch2_opposingSend(4,84)=3 exch2_pij(1,4,84)=1 exch2_pij(2,4,84)=0 exch2_pij(3,4,84)=0 exch2_pij(4,4,84)=1 exch2_oi(4,84)=0 exch2_oj(4,84)=0 RETURN END SUBROUTINE W2_E2SETUP_85 C Topology for tile 85 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(85)=34 exch2_tNy(85)=51 exch2_tBasex(85)=306 exch2_tBasey(85)=255 exch2_txGlobalo(85)=307 exch2_tyGlobalo(85)=256 exch2_isWedge(85)=0 exch2_isNedge(85)=0 exch2_isEedge(85)=0 exch2_isSedge(85)=0 exch2_myFace(85)=1 exch2_mydNx(85)=510 exch2_mydNy(85)=510 exch2_nNeighbours(85)=4 exch2_neighbourId(1,85)=100 exch2_iLo(1,85)=0 exch2_iHi(1,85)=35 exch2_jLo(1,85)=52 exch2_jHi(1,85)=52 exch2_opposingSend(1,85)=2 exch2_pij(1,1,85)=1 exch2_pij(2,1,85)=0 exch2_pij(3,1,85)=0 exch2_pij(4,1,85)=1 exch2_oi(1,85)=0 exch2_oj(1,85)=0 exch2_neighbourId(2,85)=70 exch2_iLo(2,85)=0 exch2_iHi(2,85)=35 exch2_jLo(2,85)=0 exch2_jHi(2,85)=0 exch2_opposingSend(2,85)=1 exch2_pij(1,2,85)=1 exch2_pij(2,2,85)=0 exch2_pij(3,2,85)=0 exch2_pij(4,2,85)=1 exch2_oi(2,85)=0 exch2_oj(2,85)=0 exch2_neighbourId(3,85)=86 exch2_iLo(3,85)=35 exch2_iHi(3,85)=35 exch2_jLo(3,85)=0 exch2_jHi(3,85)=52 exch2_opposingSend(3,85)=4 exch2_pij(1,3,85)=1 exch2_pij(2,3,85)=0 exch2_pij(3,3,85)=0 exch2_pij(4,3,85)=1 exch2_oi(3,85)=0 exch2_oj(3,85)=0 exch2_neighbourId(4,85)=84 exch2_iLo(4,85)=0 exch2_iHi(4,85)=0 exch2_jLo(4,85)=0 exch2_jHi(4,85)=52 exch2_opposingSend(4,85)=3 exch2_pij(1,4,85)=1 exch2_pij(2,4,85)=0 exch2_pij(3,4,85)=0 exch2_pij(4,4,85)=1 exch2_oi(4,85)=0 exch2_oj(4,85)=0 RETURN END SUBROUTINE W2_E2SETUP_86 C Topology for tile 86 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(86)=34 exch2_tNy(86)=51 exch2_tBasex(86)=340 exch2_tBasey(86)=255 exch2_txGlobalo(86)=341 exch2_tyGlobalo(86)=256 exch2_isWedge(86)=0 exch2_isNedge(86)=0 exch2_isEedge(86)=0 exch2_isSedge(86)=0 exch2_myFace(86)=1 exch2_mydNx(86)=510 exch2_mydNy(86)=510 exch2_nNeighbours(86)=4 exch2_neighbourId(1,86)=101 exch2_iLo(1,86)=0 exch2_iHi(1,86)=35 exch2_jLo(1,86)=52 exch2_jHi(1,86)=52 exch2_opposingSend(1,86)=2 exch2_pij(1,1,86)=1 exch2_pij(2,1,86)=0 exch2_pij(3,1,86)=0 exch2_pij(4,1,86)=1 exch2_oi(1,86)=0 exch2_oj(1,86)=0 exch2_neighbourId(2,86)=71 exch2_iLo(2,86)=0 exch2_iHi(2,86)=35 exch2_jLo(2,86)=0 exch2_jHi(2,86)=0 exch2_opposingSend(2,86)=1 exch2_pij(1,2,86)=1 exch2_pij(2,2,86)=0 exch2_pij(3,2,86)=0 exch2_pij(4,2,86)=1 exch2_oi(2,86)=0 exch2_oj(2,86)=0 exch2_neighbourId(3,86)=87 exch2_iLo(3,86)=35 exch2_iHi(3,86)=35 exch2_jLo(3,86)=0 exch2_jHi(3,86)=52 exch2_opposingSend(3,86)=4 exch2_pij(1,3,86)=1 exch2_pij(2,3,86)=0 exch2_pij(3,3,86)=0 exch2_pij(4,3,86)=1 exch2_oi(3,86)=0 exch2_oj(3,86)=0 exch2_neighbourId(4,86)=85 exch2_iLo(4,86)=0 exch2_iHi(4,86)=0 exch2_jLo(4,86)=0 exch2_jHi(4,86)=52 exch2_opposingSend(4,86)=3 exch2_pij(1,4,86)=1 exch2_pij(2,4,86)=0 exch2_pij(3,4,86)=0 exch2_pij(4,4,86)=1 exch2_oi(4,86)=0 exch2_oj(4,86)=0 RETURN END SUBROUTINE W2_E2SETUP_87 C Topology for tile 87 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(87)=34 exch2_tNy(87)=51 exch2_tBasex(87)=374 exch2_tBasey(87)=255 exch2_txGlobalo(87)=375 exch2_tyGlobalo(87)=256 exch2_isWedge(87)=0 exch2_isNedge(87)=0 exch2_isEedge(87)=0 exch2_isSedge(87)=0 exch2_myFace(87)=1 exch2_mydNx(87)=510 exch2_mydNy(87)=510 exch2_nNeighbours(87)=4 exch2_neighbourId(1,87)=102 exch2_iLo(1,87)=0 exch2_iHi(1,87)=35 exch2_jLo(1,87)=52 exch2_jHi(1,87)=52 exch2_opposingSend(1,87)=2 exch2_pij(1,1,87)=1 exch2_pij(2,1,87)=0 exch2_pij(3,1,87)=0 exch2_pij(4,1,87)=1 exch2_oi(1,87)=0 exch2_oj(1,87)=0 exch2_neighbourId(2,87)=72 exch2_iLo(2,87)=0 exch2_iHi(2,87)=35 exch2_jLo(2,87)=0 exch2_jHi(2,87)=0 exch2_opposingSend(2,87)=1 exch2_pij(1,2,87)=1 exch2_pij(2,2,87)=0 exch2_pij(3,2,87)=0 exch2_pij(4,2,87)=1 exch2_oi(2,87)=0 exch2_oj(2,87)=0 exch2_neighbourId(3,87)=88 exch2_iLo(3,87)=35 exch2_iHi(3,87)=35 exch2_jLo(3,87)=0 exch2_jHi(3,87)=52 exch2_opposingSend(3,87)=4 exch2_pij(1,3,87)=1 exch2_pij(2,3,87)=0 exch2_pij(3,3,87)=0 exch2_pij(4,3,87)=1 exch2_oi(3,87)=0 exch2_oj(3,87)=0 exch2_neighbourId(4,87)=86 exch2_iLo(4,87)=0 exch2_iHi(4,87)=0 exch2_jLo(4,87)=0 exch2_jHi(4,87)=52 exch2_opposingSend(4,87)=3 exch2_pij(1,4,87)=1 exch2_pij(2,4,87)=0 exch2_pij(3,4,87)=0 exch2_pij(4,4,87)=1 exch2_oi(4,87)=0 exch2_oj(4,87)=0 RETURN END SUBROUTINE W2_E2SETUP_88 C Topology for tile 88 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(88)=34 exch2_tNy(88)=51 exch2_tBasex(88)=408 exch2_tBasey(88)=255 exch2_txGlobalo(88)=409 exch2_tyGlobalo(88)=256 exch2_isWedge(88)=0 exch2_isNedge(88)=0 exch2_isEedge(88)=0 exch2_isSedge(88)=0 exch2_myFace(88)=1 exch2_mydNx(88)=510 exch2_mydNy(88)=510 exch2_nNeighbours(88)=4 exch2_neighbourId(1,88)=103 exch2_iLo(1,88)=0 exch2_iHi(1,88)=35 exch2_jLo(1,88)=52 exch2_jHi(1,88)=52 exch2_opposingSend(1,88)=2 exch2_pij(1,1,88)=1 exch2_pij(2,1,88)=0 exch2_pij(3,1,88)=0 exch2_pij(4,1,88)=1 exch2_oi(1,88)=0 exch2_oj(1,88)=0 exch2_neighbourId(2,88)=73 exch2_iLo(2,88)=0 exch2_iHi(2,88)=35 exch2_jLo(2,88)=0 exch2_jHi(2,88)=0 exch2_opposingSend(2,88)=1 exch2_pij(1,2,88)=1 exch2_pij(2,2,88)=0 exch2_pij(3,2,88)=0 exch2_pij(4,2,88)=1 exch2_oi(2,88)=0 exch2_oj(2,88)=0 exch2_neighbourId(3,88)=89 exch2_iLo(3,88)=35 exch2_iHi(3,88)=35 exch2_jLo(3,88)=0 exch2_jHi(3,88)=52 exch2_opposingSend(3,88)=4 exch2_pij(1,3,88)=1 exch2_pij(2,3,88)=0 exch2_pij(3,3,88)=0 exch2_pij(4,3,88)=1 exch2_oi(3,88)=0 exch2_oj(3,88)=0 exch2_neighbourId(4,88)=87 exch2_iLo(4,88)=0 exch2_iHi(4,88)=0 exch2_jLo(4,88)=0 exch2_jHi(4,88)=52 exch2_opposingSend(4,88)=3 exch2_pij(1,4,88)=1 exch2_pij(2,4,88)=0 exch2_pij(3,4,88)=0 exch2_pij(4,4,88)=1 exch2_oi(4,88)=0 exch2_oj(4,88)=0 RETURN END SUBROUTINE W2_E2SETUP_89 C Topology for tile 89 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(89)=34 exch2_tNy(89)=51 exch2_tBasex(89)=442 exch2_tBasey(89)=255 exch2_txGlobalo(89)=443 exch2_tyGlobalo(89)=256 exch2_isWedge(89)=0 exch2_isNedge(89)=0 exch2_isEedge(89)=0 exch2_isSedge(89)=0 exch2_myFace(89)=1 exch2_mydNx(89)=510 exch2_mydNy(89)=510 exch2_nNeighbours(89)=4 exch2_neighbourId(1,89)=104 exch2_iLo(1,89)=0 exch2_iHi(1,89)=35 exch2_jLo(1,89)=52 exch2_jHi(1,89)=52 exch2_opposingSend(1,89)=2 exch2_pij(1,1,89)=1 exch2_pij(2,1,89)=0 exch2_pij(3,1,89)=0 exch2_pij(4,1,89)=1 exch2_oi(1,89)=0 exch2_oj(1,89)=0 exch2_neighbourId(2,89)=74 exch2_iLo(2,89)=0 exch2_iHi(2,89)=35 exch2_jLo(2,89)=0 exch2_jHi(2,89)=0 exch2_opposingSend(2,89)=1 exch2_pij(1,2,89)=1 exch2_pij(2,2,89)=0 exch2_pij(3,2,89)=0 exch2_pij(4,2,89)=1 exch2_oi(2,89)=0 exch2_oj(2,89)=0 exch2_neighbourId(3,89)=90 exch2_iLo(3,89)=35 exch2_iHi(3,89)=35 exch2_jLo(3,89)=0 exch2_jHi(3,89)=52 exch2_opposingSend(3,89)=4 exch2_pij(1,3,89)=1 exch2_pij(2,3,89)=0 exch2_pij(3,3,89)=0 exch2_pij(4,3,89)=1 exch2_oi(3,89)=0 exch2_oj(3,89)=0 exch2_neighbourId(4,89)=88 exch2_iLo(4,89)=0 exch2_iHi(4,89)=0 exch2_jLo(4,89)=0 exch2_jHi(4,89)=52 exch2_opposingSend(4,89)=3 exch2_pij(1,4,89)=1 exch2_pij(2,4,89)=0 exch2_pij(3,4,89)=0 exch2_pij(4,4,89)=1 exch2_oi(4,89)=0 exch2_oj(4,89)=0 RETURN END SUBROUTINE W2_E2SETUP_90 C Topology for tile 90 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(90)=34 exch2_tNy(90)=51 exch2_tBasex(90)=476 exch2_tBasey(90)=255 exch2_txGlobalo(90)=477 exch2_tyGlobalo(90)=256 exch2_isWedge(90)=0 exch2_isNedge(90)=0 exch2_isEedge(90)=1 exch2_isSedge(90)=0 exch2_myFace(90)=1 exch2_mydNx(90)=510 exch2_mydNy(90)=510 exch2_nNeighbours(90)=4 exch2_neighbourId(1,90)=105 exch2_iLo(1,90)=0 exch2_iHi(1,90)=35 exch2_jLo(1,90)=52 exch2_jHi(1,90)=52 exch2_opposingSend(1,90)=2 exch2_pij(1,1,90)=1 exch2_pij(2,1,90)=0 exch2_pij(3,1,90)=0 exch2_pij(4,1,90)=1 exch2_oi(1,90)=0 exch2_oj(1,90)=0 exch2_neighbourId(2,90)=75 exch2_iLo(2,90)=0 exch2_iHi(2,90)=35 exch2_jLo(2,90)=0 exch2_jHi(2,90)=0 exch2_opposingSend(2,90)=1 exch2_pij(1,2,90)=1 exch2_pij(2,2,90)=0 exch2_pij(3,2,90)=0 exch2_pij(4,2,90)=1 exch2_oi(2,90)=0 exch2_oj(2,90)=0 exch2_neighbourId(3,90)=226 exch2_iLo(3,90)=35 exch2_iHi(3,90)=35 exch2_jLo(3,90)=0 exch2_jHi(3,90)=52 exch2_opposingSend(3,90)=4 exch2_pij(1,3,90)=1 exch2_pij(2,3,90)=0 exch2_pij(3,3,90)=0 exch2_pij(4,3,90)=1 exch2_oi(3,90)=510 exch2_oj(3,90)=0 exch2_neighbourId(4,90)=89 exch2_iLo(4,90)=0 exch2_iHi(4,90)=0 exch2_jLo(4,90)=0 exch2_jHi(4,90)=52 exch2_opposingSend(4,90)=3 exch2_pij(1,4,90)=1 exch2_pij(2,4,90)=0 exch2_pij(3,4,90)=0 exch2_pij(4,4,90)=1 exch2_oi(4,90)=0 exch2_oj(4,90)=0 RETURN END SUBROUTINE W2_E2SETUP_91 C Topology for tile 91 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(91)=34 exch2_tNy(91)=51 exch2_tBasex(91)=0 exch2_tBasey(91)=306 exch2_txGlobalo(91)=1 exch2_tyGlobalo(91)=307 exch2_isWedge(91)=1 exch2_isNedge(91)=0 exch2_isEedge(91)=0 exch2_isSedge(91)=0 exch2_myFace(91)=1 exch2_mydNx(91)=510 exch2_mydNy(91)=510 exch2_nNeighbours(91)=5 exch2_neighbourId(1,91)=106 exch2_iLo(1,91)=0 exch2_iHi(1,91)=35 exch2_jLo(1,91)=52 exch2_jHi(1,91)=52 exch2_opposingSend(1,91)=2 exch2_pij(1,1,91)=1 exch2_pij(2,1,91)=0 exch2_pij(3,1,91)=0 exch2_pij(4,1,91)=1 exch2_oi(1,91)=0 exch2_oj(1,91)=0 exch2_neighbourId(2,91)=76 exch2_iLo(2,91)=0 exch2_iHi(2,91)=35 exch2_jLo(2,91)=0 exch2_jHi(2,91)=0 exch2_opposingSend(2,91)=1 exch2_pij(1,2,91)=1 exch2_pij(2,2,91)=0 exch2_pij(3,2,91)=0 exch2_pij(4,2,91)=1 exch2_oi(2,91)=0 exch2_oj(2,91)=0 exch2_neighbourId(3,91)=92 exch2_iLo(3,91)=35 exch2_iHi(3,91)=35 exch2_jLo(3,91)=0 exch2_jHi(3,91)=52 exch2_opposingSend(3,91)=4 exch2_pij(1,3,91)=1 exch2_pij(2,3,91)=0 exch2_pij(3,3,91)=0 exch2_pij(4,3,91)=1 exch2_oi(3,91)=0 exch2_oj(3,91)=0 exch2_neighbourId(4,91)=740 exch2_iLo(4,91)=0 exch2_iHi(4,91)=0 exch2_jLo(4,91)=34 exch2_jHi(4,91)=52 exch2_opposingSend(4,91)=1 exch2_pij(1,4,91)=0 exch2_pij(2,4,91)=1 exch2_pij(3,4,91)=-1 exch2_pij(4,4,91)=0 exch2_oi(4,91)=-510 exch2_oj(4,91)=511 exch2_neighbourId(5,91)=741 exch2_iLo(5,91)=0 exch2_iHi(5,91)=0 exch2_jLo(5,91)=0 exch2_jHi(5,91)=35 exch2_opposingSend(5,91)=1 exch2_pij(1,5,91)=0 exch2_pij(2,5,91)=1 exch2_pij(3,5,91)=-1 exch2_pij(4,5,91)=0 exch2_oi(5,91)=-510 exch2_oj(5,91)=511 RETURN END SUBROUTINE W2_E2SETUP_92 C Topology for tile 92 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(92)=34 exch2_tNy(92)=51 exch2_tBasex(92)=34 exch2_tBasey(92)=306 exch2_txGlobalo(92)=35 exch2_tyGlobalo(92)=307 exch2_isWedge(92)=0 exch2_isNedge(92)=0 exch2_isEedge(92)=0 exch2_isSedge(92)=0 exch2_myFace(92)=1 exch2_mydNx(92)=510 exch2_mydNy(92)=510 exch2_nNeighbours(92)=4 exch2_neighbourId(1,92)=107 exch2_iLo(1,92)=0 exch2_iHi(1,92)=35 exch2_jLo(1,92)=52 exch2_jHi(1,92)=52 exch2_opposingSend(1,92)=2 exch2_pij(1,1,92)=1 exch2_pij(2,1,92)=0 exch2_pij(3,1,92)=0 exch2_pij(4,1,92)=1 exch2_oi(1,92)=0 exch2_oj(1,92)=0 exch2_neighbourId(2,92)=77 exch2_iLo(2,92)=0 exch2_iHi(2,92)=35 exch2_jLo(2,92)=0 exch2_jHi(2,92)=0 exch2_opposingSend(2,92)=1 exch2_pij(1,2,92)=1 exch2_pij(2,2,92)=0 exch2_pij(3,2,92)=0 exch2_pij(4,2,92)=1 exch2_oi(2,92)=0 exch2_oj(2,92)=0 exch2_neighbourId(3,92)=93 exch2_iLo(3,92)=35 exch2_iHi(3,92)=35 exch2_jLo(3,92)=0 exch2_jHi(3,92)=52 exch2_opposingSend(3,92)=4 exch2_pij(1,3,92)=1 exch2_pij(2,3,92)=0 exch2_pij(3,3,92)=0 exch2_pij(4,3,92)=1 exch2_oi(3,92)=0 exch2_oj(3,92)=0 exch2_neighbourId(4,92)=91 exch2_iLo(4,92)=0 exch2_iHi(4,92)=0 exch2_jLo(4,92)=0 exch2_jHi(4,92)=52 exch2_opposingSend(4,92)=3 exch2_pij(1,4,92)=1 exch2_pij(2,4,92)=0 exch2_pij(3,4,92)=0 exch2_pij(4,4,92)=1 exch2_oi(4,92)=0 exch2_oj(4,92)=0 RETURN END SUBROUTINE W2_E2SETUP_93 C Topology for tile 93 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(93)=34 exch2_tNy(93)=51 exch2_tBasex(93)=68 exch2_tBasey(93)=306 exch2_txGlobalo(93)=69 exch2_tyGlobalo(93)=307 exch2_isWedge(93)=0 exch2_isNedge(93)=0 exch2_isEedge(93)=0 exch2_isSedge(93)=0 exch2_myFace(93)=1 exch2_mydNx(93)=510 exch2_mydNy(93)=510 exch2_nNeighbours(93)=4 exch2_neighbourId(1,93)=108 exch2_iLo(1,93)=0 exch2_iHi(1,93)=35 exch2_jLo(1,93)=52 exch2_jHi(1,93)=52 exch2_opposingSend(1,93)=2 exch2_pij(1,1,93)=1 exch2_pij(2,1,93)=0 exch2_pij(3,1,93)=0 exch2_pij(4,1,93)=1 exch2_oi(1,93)=0 exch2_oj(1,93)=0 exch2_neighbourId(2,93)=78 exch2_iLo(2,93)=0 exch2_iHi(2,93)=35 exch2_jLo(2,93)=0 exch2_jHi(2,93)=0 exch2_opposingSend(2,93)=1 exch2_pij(1,2,93)=1 exch2_pij(2,2,93)=0 exch2_pij(3,2,93)=0 exch2_pij(4,2,93)=1 exch2_oi(2,93)=0 exch2_oj(2,93)=0 exch2_neighbourId(3,93)=94 exch2_iLo(3,93)=35 exch2_iHi(3,93)=35 exch2_jLo(3,93)=0 exch2_jHi(3,93)=52 exch2_opposingSend(3,93)=4 exch2_pij(1,3,93)=1 exch2_pij(2,3,93)=0 exch2_pij(3,3,93)=0 exch2_pij(4,3,93)=1 exch2_oi(3,93)=0 exch2_oj(3,93)=0 exch2_neighbourId(4,93)=92 exch2_iLo(4,93)=0 exch2_iHi(4,93)=0 exch2_jLo(4,93)=0 exch2_jHi(4,93)=52 exch2_opposingSend(4,93)=3 exch2_pij(1,4,93)=1 exch2_pij(2,4,93)=0 exch2_pij(3,4,93)=0 exch2_pij(4,4,93)=1 exch2_oi(4,93)=0 exch2_oj(4,93)=0 RETURN END SUBROUTINE W2_E2SETUP_94 C Topology for tile 94 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(94)=34 exch2_tNy(94)=51 exch2_tBasex(94)=102 exch2_tBasey(94)=306 exch2_txGlobalo(94)=103 exch2_tyGlobalo(94)=307 exch2_isWedge(94)=0 exch2_isNedge(94)=0 exch2_isEedge(94)=0 exch2_isSedge(94)=0 exch2_myFace(94)=1 exch2_mydNx(94)=510 exch2_mydNy(94)=510 exch2_nNeighbours(94)=4 exch2_neighbourId(1,94)=109 exch2_iLo(1,94)=0 exch2_iHi(1,94)=35 exch2_jLo(1,94)=52 exch2_jHi(1,94)=52 exch2_opposingSend(1,94)=2 exch2_pij(1,1,94)=1 exch2_pij(2,1,94)=0 exch2_pij(3,1,94)=0 exch2_pij(4,1,94)=1 exch2_oi(1,94)=0 exch2_oj(1,94)=0 exch2_neighbourId(2,94)=79 exch2_iLo(2,94)=0 exch2_iHi(2,94)=35 exch2_jLo(2,94)=0 exch2_jHi(2,94)=0 exch2_opposingSend(2,94)=1 exch2_pij(1,2,94)=1 exch2_pij(2,2,94)=0 exch2_pij(3,2,94)=0 exch2_pij(4,2,94)=1 exch2_oi(2,94)=0 exch2_oj(2,94)=0 exch2_neighbourId(3,94)=95 exch2_iLo(3,94)=35 exch2_iHi(3,94)=35 exch2_jLo(3,94)=0 exch2_jHi(3,94)=52 exch2_opposingSend(3,94)=4 exch2_pij(1,3,94)=1 exch2_pij(2,3,94)=0 exch2_pij(3,3,94)=0 exch2_pij(4,3,94)=1 exch2_oi(3,94)=0 exch2_oj(3,94)=0 exch2_neighbourId(4,94)=93 exch2_iLo(4,94)=0 exch2_iHi(4,94)=0 exch2_jLo(4,94)=0 exch2_jHi(4,94)=52 exch2_opposingSend(4,94)=3 exch2_pij(1,4,94)=1 exch2_pij(2,4,94)=0 exch2_pij(3,4,94)=0 exch2_pij(4,4,94)=1 exch2_oi(4,94)=0 exch2_oj(4,94)=0 RETURN END SUBROUTINE W2_E2SETUP_95 C Topology for tile 95 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(95)=34 exch2_tNy(95)=51 exch2_tBasex(95)=136 exch2_tBasey(95)=306 exch2_txGlobalo(95)=137 exch2_tyGlobalo(95)=307 exch2_isWedge(95)=0 exch2_isNedge(95)=0 exch2_isEedge(95)=0 exch2_isSedge(95)=0 exch2_myFace(95)=1 exch2_mydNx(95)=510 exch2_mydNy(95)=510 exch2_nNeighbours(95)=4 exch2_neighbourId(1,95)=110 exch2_iLo(1,95)=0 exch2_iHi(1,95)=35 exch2_jLo(1,95)=52 exch2_jHi(1,95)=52 exch2_opposingSend(1,95)=2 exch2_pij(1,1,95)=1 exch2_pij(2,1,95)=0 exch2_pij(3,1,95)=0 exch2_pij(4,1,95)=1 exch2_oi(1,95)=0 exch2_oj(1,95)=0 exch2_neighbourId(2,95)=80 exch2_iLo(2,95)=0 exch2_iHi(2,95)=35 exch2_jLo(2,95)=0 exch2_jHi(2,95)=0 exch2_opposingSend(2,95)=1 exch2_pij(1,2,95)=1 exch2_pij(2,2,95)=0 exch2_pij(3,2,95)=0 exch2_pij(4,2,95)=1 exch2_oi(2,95)=0 exch2_oj(2,95)=0 exch2_neighbourId(3,95)=96 exch2_iLo(3,95)=35 exch2_iHi(3,95)=35 exch2_jLo(3,95)=0 exch2_jHi(3,95)=52 exch2_opposingSend(3,95)=4 exch2_pij(1,3,95)=1 exch2_pij(2,3,95)=0 exch2_pij(3,3,95)=0 exch2_pij(4,3,95)=1 exch2_oi(3,95)=0 exch2_oj(3,95)=0 exch2_neighbourId(4,95)=94 exch2_iLo(4,95)=0 exch2_iHi(4,95)=0 exch2_jLo(4,95)=0 exch2_jHi(4,95)=52 exch2_opposingSend(4,95)=3 exch2_pij(1,4,95)=1 exch2_pij(2,4,95)=0 exch2_pij(3,4,95)=0 exch2_pij(4,4,95)=1 exch2_oi(4,95)=0 exch2_oj(4,95)=0 RETURN END SUBROUTINE W2_E2SETUP_96 C Topology for tile 96 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(96)=34 exch2_tNy(96)=51 exch2_tBasex(96)=170 exch2_tBasey(96)=306 exch2_txGlobalo(96)=171 exch2_tyGlobalo(96)=307 exch2_isWedge(96)=0 exch2_isNedge(96)=0 exch2_isEedge(96)=0 exch2_isSedge(96)=0 exch2_myFace(96)=1 exch2_mydNx(96)=510 exch2_mydNy(96)=510 exch2_nNeighbours(96)=4 exch2_neighbourId(1,96)=111 exch2_iLo(1,96)=0 exch2_iHi(1,96)=35 exch2_jLo(1,96)=52 exch2_jHi(1,96)=52 exch2_opposingSend(1,96)=2 exch2_pij(1,1,96)=1 exch2_pij(2,1,96)=0 exch2_pij(3,1,96)=0 exch2_pij(4,1,96)=1 exch2_oi(1,96)=0 exch2_oj(1,96)=0 exch2_neighbourId(2,96)=81 exch2_iLo(2,96)=0 exch2_iHi(2,96)=35 exch2_jLo(2,96)=0 exch2_jHi(2,96)=0 exch2_opposingSend(2,96)=1 exch2_pij(1,2,96)=1 exch2_pij(2,2,96)=0 exch2_pij(3,2,96)=0 exch2_pij(4,2,96)=1 exch2_oi(2,96)=0 exch2_oj(2,96)=0 exch2_neighbourId(3,96)=97 exch2_iLo(3,96)=35 exch2_iHi(3,96)=35 exch2_jLo(3,96)=0 exch2_jHi(3,96)=52 exch2_opposingSend(3,96)=4 exch2_pij(1,3,96)=1 exch2_pij(2,3,96)=0 exch2_pij(3,3,96)=0 exch2_pij(4,3,96)=1 exch2_oi(3,96)=0 exch2_oj(3,96)=0 exch2_neighbourId(4,96)=95 exch2_iLo(4,96)=0 exch2_iHi(4,96)=0 exch2_jLo(4,96)=0 exch2_jHi(4,96)=52 exch2_opposingSend(4,96)=3 exch2_pij(1,4,96)=1 exch2_pij(2,4,96)=0 exch2_pij(3,4,96)=0 exch2_pij(4,4,96)=1 exch2_oi(4,96)=0 exch2_oj(4,96)=0 RETURN END SUBROUTINE W2_E2SETUP_97 C Topology for tile 97 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(97)=34 exch2_tNy(97)=51 exch2_tBasex(97)=204 exch2_tBasey(97)=306 exch2_txGlobalo(97)=205 exch2_tyGlobalo(97)=307 exch2_isWedge(97)=0 exch2_isNedge(97)=0 exch2_isEedge(97)=0 exch2_isSedge(97)=0 exch2_myFace(97)=1 exch2_mydNx(97)=510 exch2_mydNy(97)=510 exch2_nNeighbours(97)=4 exch2_neighbourId(1,97)=112 exch2_iLo(1,97)=0 exch2_iHi(1,97)=35 exch2_jLo(1,97)=52 exch2_jHi(1,97)=52 exch2_opposingSend(1,97)=2 exch2_pij(1,1,97)=1 exch2_pij(2,1,97)=0 exch2_pij(3,1,97)=0 exch2_pij(4,1,97)=1 exch2_oi(1,97)=0 exch2_oj(1,97)=0 exch2_neighbourId(2,97)=82 exch2_iLo(2,97)=0 exch2_iHi(2,97)=35 exch2_jLo(2,97)=0 exch2_jHi(2,97)=0 exch2_opposingSend(2,97)=1 exch2_pij(1,2,97)=1 exch2_pij(2,2,97)=0 exch2_pij(3,2,97)=0 exch2_pij(4,2,97)=1 exch2_oi(2,97)=0 exch2_oj(2,97)=0 exch2_neighbourId(3,97)=98 exch2_iLo(3,97)=35 exch2_iHi(3,97)=35 exch2_jLo(3,97)=0 exch2_jHi(3,97)=52 exch2_opposingSend(3,97)=4 exch2_pij(1,3,97)=1 exch2_pij(2,3,97)=0 exch2_pij(3,3,97)=0 exch2_pij(4,3,97)=1 exch2_oi(3,97)=0 exch2_oj(3,97)=0 exch2_neighbourId(4,97)=96 exch2_iLo(4,97)=0 exch2_iHi(4,97)=0 exch2_jLo(4,97)=0 exch2_jHi(4,97)=52 exch2_opposingSend(4,97)=3 exch2_pij(1,4,97)=1 exch2_pij(2,4,97)=0 exch2_pij(3,4,97)=0 exch2_pij(4,4,97)=1 exch2_oi(4,97)=0 exch2_oj(4,97)=0 RETURN END SUBROUTINE W2_E2SETUP_98 C Topology for tile 98 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(98)=34 exch2_tNy(98)=51 exch2_tBasex(98)=238 exch2_tBasey(98)=306 exch2_txGlobalo(98)=239 exch2_tyGlobalo(98)=307 exch2_isWedge(98)=0 exch2_isNedge(98)=0 exch2_isEedge(98)=0 exch2_isSedge(98)=0 exch2_myFace(98)=1 exch2_mydNx(98)=510 exch2_mydNy(98)=510 exch2_nNeighbours(98)=4 exch2_neighbourId(1,98)=113 exch2_iLo(1,98)=0 exch2_iHi(1,98)=35 exch2_jLo(1,98)=52 exch2_jHi(1,98)=52 exch2_opposingSend(1,98)=2 exch2_pij(1,1,98)=1 exch2_pij(2,1,98)=0 exch2_pij(3,1,98)=0 exch2_pij(4,1,98)=1 exch2_oi(1,98)=0 exch2_oj(1,98)=0 exch2_neighbourId(2,98)=83 exch2_iLo(2,98)=0 exch2_iHi(2,98)=35 exch2_jLo(2,98)=0 exch2_jHi(2,98)=0 exch2_opposingSend(2,98)=1 exch2_pij(1,2,98)=1 exch2_pij(2,2,98)=0 exch2_pij(3,2,98)=0 exch2_pij(4,2,98)=1 exch2_oi(2,98)=0 exch2_oj(2,98)=0 exch2_neighbourId(3,98)=99 exch2_iLo(3,98)=35 exch2_iHi(3,98)=35 exch2_jLo(3,98)=0 exch2_jHi(3,98)=52 exch2_opposingSend(3,98)=4 exch2_pij(1,3,98)=1 exch2_pij(2,3,98)=0 exch2_pij(3,3,98)=0 exch2_pij(4,3,98)=1 exch2_oi(3,98)=0 exch2_oj(3,98)=0 exch2_neighbourId(4,98)=97 exch2_iLo(4,98)=0 exch2_iHi(4,98)=0 exch2_jLo(4,98)=0 exch2_jHi(4,98)=52 exch2_opposingSend(4,98)=3 exch2_pij(1,4,98)=1 exch2_pij(2,4,98)=0 exch2_pij(3,4,98)=0 exch2_pij(4,4,98)=1 exch2_oi(4,98)=0 exch2_oj(4,98)=0 RETURN END SUBROUTINE W2_E2SETUP_99 C Topology for tile 99 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(99)=34 exch2_tNy(99)=51 exch2_tBasex(99)=272 exch2_tBasey(99)=306 exch2_txGlobalo(99)=273 exch2_tyGlobalo(99)=307 exch2_isWedge(99)=0 exch2_isNedge(99)=0 exch2_isEedge(99)=0 exch2_isSedge(99)=0 exch2_myFace(99)=1 exch2_mydNx(99)=510 exch2_mydNy(99)=510 exch2_nNeighbours(99)=4 exch2_neighbourId(1,99)=114 exch2_iLo(1,99)=0 exch2_iHi(1,99)=35 exch2_jLo(1,99)=52 exch2_jHi(1,99)=52 exch2_opposingSend(1,99)=2 exch2_pij(1,1,99)=1 exch2_pij(2,1,99)=0 exch2_pij(3,1,99)=0 exch2_pij(4,1,99)=1 exch2_oi(1,99)=0 exch2_oj(1,99)=0 exch2_neighbourId(2,99)=84 exch2_iLo(2,99)=0 exch2_iHi(2,99)=35 exch2_jLo(2,99)=0 exch2_jHi(2,99)=0 exch2_opposingSend(2,99)=1 exch2_pij(1,2,99)=1 exch2_pij(2,2,99)=0 exch2_pij(3,2,99)=0 exch2_pij(4,2,99)=1 exch2_oi(2,99)=0 exch2_oj(2,99)=0 exch2_neighbourId(3,99)=100 exch2_iLo(3,99)=35 exch2_iHi(3,99)=35 exch2_jLo(3,99)=0 exch2_jHi(3,99)=52 exch2_opposingSend(3,99)=4 exch2_pij(1,3,99)=1 exch2_pij(2,3,99)=0 exch2_pij(3,3,99)=0 exch2_pij(4,3,99)=1 exch2_oi(3,99)=0 exch2_oj(3,99)=0 exch2_neighbourId(4,99)=98 exch2_iLo(4,99)=0 exch2_iHi(4,99)=0 exch2_jLo(4,99)=0 exch2_jHi(4,99)=52 exch2_opposingSend(4,99)=3 exch2_pij(1,4,99)=1 exch2_pij(2,4,99)=0 exch2_pij(3,4,99)=0 exch2_pij(4,4,99)=1 exch2_oi(4,99)=0 exch2_oj(4,99)=0 RETURN END SUBROUTINE W2_E2SETUP_100 C Topology for tile 100 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(100)=34 exch2_tNy(100)=51 exch2_tBasex(100)=306 exch2_tBasey(100)=306 exch2_txGlobalo(100)=307 exch2_tyGlobalo(100)=307 exch2_isWedge(100)=0 exch2_isNedge(100)=0 exch2_isEedge(100)=0 exch2_isSedge(100)=0 exch2_myFace(100)=1 exch2_mydNx(100)=510 exch2_mydNy(100)=510 exch2_nNeighbours(100)=4 exch2_neighbourId(1,100)=115 exch2_iLo(1,100)=0 exch2_iHi(1,100)=35 exch2_jLo(1,100)=52 exch2_jHi(1,100)=52 exch2_opposingSend(1,100)=2 exch2_pij(1,1,100)=1 exch2_pij(2,1,100)=0 exch2_pij(3,1,100)=0 exch2_pij(4,1,100)=1 exch2_oi(1,100)=0 exch2_oj(1,100)=0 exch2_neighbourId(2,100)=85 exch2_iLo(2,100)=0 exch2_iHi(2,100)=35 exch2_jLo(2,100)=0 exch2_jHi(2,100)=0 exch2_opposingSend(2,100)=1 exch2_pij(1,2,100)=1 exch2_pij(2,2,100)=0 exch2_pij(3,2,100)=0 exch2_pij(4,2,100)=1 exch2_oi(2,100)=0 exch2_oj(2,100)=0 exch2_neighbourId(3,100)=101 exch2_iLo(3,100)=35 exch2_iHi(3,100)=35 exch2_jLo(3,100)=0 exch2_jHi(3,100)=52 exch2_opposingSend(3,100)=4 exch2_pij(1,3,100)=1 exch2_pij(2,3,100)=0 exch2_pij(3,3,100)=0 exch2_pij(4,3,100)=1 exch2_oi(3,100)=0 exch2_oj(3,100)=0 exch2_neighbourId(4,100)=99 exch2_iLo(4,100)=0 exch2_iHi(4,100)=0 exch2_jLo(4,100)=0 exch2_jHi(4,100)=52 exch2_opposingSend(4,100)=3 exch2_pij(1,4,100)=1 exch2_pij(2,4,100)=0 exch2_pij(3,4,100)=0 exch2_pij(4,4,100)=1 exch2_oi(4,100)=0 exch2_oj(4,100)=0 RETURN END SUBROUTINE W2_E2SETUP_101 C Topology for tile 101 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(101)=34 exch2_tNy(101)=51 exch2_tBasex(101)=340 exch2_tBasey(101)=306 exch2_txGlobalo(101)=341 exch2_tyGlobalo(101)=307 exch2_isWedge(101)=0 exch2_isNedge(101)=0 exch2_isEedge(101)=0 exch2_isSedge(101)=0 exch2_myFace(101)=1 exch2_mydNx(101)=510 exch2_mydNy(101)=510 exch2_nNeighbours(101)=4 exch2_neighbourId(1,101)=116 exch2_iLo(1,101)=0 exch2_iHi(1,101)=35 exch2_jLo(1,101)=52 exch2_jHi(1,101)=52 exch2_opposingSend(1,101)=2 exch2_pij(1,1,101)=1 exch2_pij(2,1,101)=0 exch2_pij(3,1,101)=0 exch2_pij(4,1,101)=1 exch2_oi(1,101)=0 exch2_oj(1,101)=0 exch2_neighbourId(2,101)=86 exch2_iLo(2,101)=0 exch2_iHi(2,101)=35 exch2_jLo(2,101)=0 exch2_jHi(2,101)=0 exch2_opposingSend(2,101)=1 exch2_pij(1,2,101)=1 exch2_pij(2,2,101)=0 exch2_pij(3,2,101)=0 exch2_pij(4,2,101)=1 exch2_oi(2,101)=0 exch2_oj(2,101)=0 exch2_neighbourId(3,101)=102 exch2_iLo(3,101)=35 exch2_iHi(3,101)=35 exch2_jLo(3,101)=0 exch2_jHi(3,101)=52 exch2_opposingSend(3,101)=4 exch2_pij(1,3,101)=1 exch2_pij(2,3,101)=0 exch2_pij(3,3,101)=0 exch2_pij(4,3,101)=1 exch2_oi(3,101)=0 exch2_oj(3,101)=0 exch2_neighbourId(4,101)=100 exch2_iLo(4,101)=0 exch2_iHi(4,101)=0 exch2_jLo(4,101)=0 exch2_jHi(4,101)=52 exch2_opposingSend(4,101)=3 exch2_pij(1,4,101)=1 exch2_pij(2,4,101)=0 exch2_pij(3,4,101)=0 exch2_pij(4,4,101)=1 exch2_oi(4,101)=0 exch2_oj(4,101)=0 RETURN END SUBROUTINE W2_E2SETUP_102 C Topology for tile 102 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(102)=34 exch2_tNy(102)=51 exch2_tBasex(102)=374 exch2_tBasey(102)=306 exch2_txGlobalo(102)=375 exch2_tyGlobalo(102)=307 exch2_isWedge(102)=0 exch2_isNedge(102)=0 exch2_isEedge(102)=0 exch2_isSedge(102)=0 exch2_myFace(102)=1 exch2_mydNx(102)=510 exch2_mydNy(102)=510 exch2_nNeighbours(102)=4 exch2_neighbourId(1,102)=117 exch2_iLo(1,102)=0 exch2_iHi(1,102)=35 exch2_jLo(1,102)=52 exch2_jHi(1,102)=52 exch2_opposingSend(1,102)=2 exch2_pij(1,1,102)=1 exch2_pij(2,1,102)=0 exch2_pij(3,1,102)=0 exch2_pij(4,1,102)=1 exch2_oi(1,102)=0 exch2_oj(1,102)=0 exch2_neighbourId(2,102)=87 exch2_iLo(2,102)=0 exch2_iHi(2,102)=35 exch2_jLo(2,102)=0 exch2_jHi(2,102)=0 exch2_opposingSend(2,102)=1 exch2_pij(1,2,102)=1 exch2_pij(2,2,102)=0 exch2_pij(3,2,102)=0 exch2_pij(4,2,102)=1 exch2_oi(2,102)=0 exch2_oj(2,102)=0 exch2_neighbourId(3,102)=103 exch2_iLo(3,102)=35 exch2_iHi(3,102)=35 exch2_jLo(3,102)=0 exch2_jHi(3,102)=52 exch2_opposingSend(3,102)=4 exch2_pij(1,3,102)=1 exch2_pij(2,3,102)=0 exch2_pij(3,3,102)=0 exch2_pij(4,3,102)=1 exch2_oi(3,102)=0 exch2_oj(3,102)=0 exch2_neighbourId(4,102)=101 exch2_iLo(4,102)=0 exch2_iHi(4,102)=0 exch2_jLo(4,102)=0 exch2_jHi(4,102)=52 exch2_opposingSend(4,102)=3 exch2_pij(1,4,102)=1 exch2_pij(2,4,102)=0 exch2_pij(3,4,102)=0 exch2_pij(4,4,102)=1 exch2_oi(4,102)=0 exch2_oj(4,102)=0 RETURN END SUBROUTINE W2_E2SETUP_103 C Topology for tile 103 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(103)=34 exch2_tNy(103)=51 exch2_tBasex(103)=408 exch2_tBasey(103)=306 exch2_txGlobalo(103)=409 exch2_tyGlobalo(103)=307 exch2_isWedge(103)=0 exch2_isNedge(103)=0 exch2_isEedge(103)=0 exch2_isSedge(103)=0 exch2_myFace(103)=1 exch2_mydNx(103)=510 exch2_mydNy(103)=510 exch2_nNeighbours(103)=4 exch2_neighbourId(1,103)=118 exch2_iLo(1,103)=0 exch2_iHi(1,103)=35 exch2_jLo(1,103)=52 exch2_jHi(1,103)=52 exch2_opposingSend(1,103)=2 exch2_pij(1,1,103)=1 exch2_pij(2,1,103)=0 exch2_pij(3,1,103)=0 exch2_pij(4,1,103)=1 exch2_oi(1,103)=0 exch2_oj(1,103)=0 exch2_neighbourId(2,103)=88 exch2_iLo(2,103)=0 exch2_iHi(2,103)=35 exch2_jLo(2,103)=0 exch2_jHi(2,103)=0 exch2_opposingSend(2,103)=1 exch2_pij(1,2,103)=1 exch2_pij(2,2,103)=0 exch2_pij(3,2,103)=0 exch2_pij(4,2,103)=1 exch2_oi(2,103)=0 exch2_oj(2,103)=0 exch2_neighbourId(3,103)=104 exch2_iLo(3,103)=35 exch2_iHi(3,103)=35 exch2_jLo(3,103)=0 exch2_jHi(3,103)=52 exch2_opposingSend(3,103)=4 exch2_pij(1,3,103)=1 exch2_pij(2,3,103)=0 exch2_pij(3,3,103)=0 exch2_pij(4,3,103)=1 exch2_oi(3,103)=0 exch2_oj(3,103)=0 exch2_neighbourId(4,103)=102 exch2_iLo(4,103)=0 exch2_iHi(4,103)=0 exch2_jLo(4,103)=0 exch2_jHi(4,103)=52 exch2_opposingSend(4,103)=3 exch2_pij(1,4,103)=1 exch2_pij(2,4,103)=0 exch2_pij(3,4,103)=0 exch2_pij(4,4,103)=1 exch2_oi(4,103)=0 exch2_oj(4,103)=0 RETURN END SUBROUTINE W2_E2SETUP_104 C Topology for tile 104 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(104)=34 exch2_tNy(104)=51 exch2_tBasex(104)=442 exch2_tBasey(104)=306 exch2_txGlobalo(104)=443 exch2_tyGlobalo(104)=307 exch2_isWedge(104)=0 exch2_isNedge(104)=0 exch2_isEedge(104)=0 exch2_isSedge(104)=0 exch2_myFace(104)=1 exch2_mydNx(104)=510 exch2_mydNy(104)=510 exch2_nNeighbours(104)=4 exch2_neighbourId(1,104)=119 exch2_iLo(1,104)=0 exch2_iHi(1,104)=35 exch2_jLo(1,104)=52 exch2_jHi(1,104)=52 exch2_opposingSend(1,104)=2 exch2_pij(1,1,104)=1 exch2_pij(2,1,104)=0 exch2_pij(3,1,104)=0 exch2_pij(4,1,104)=1 exch2_oi(1,104)=0 exch2_oj(1,104)=0 exch2_neighbourId(2,104)=89 exch2_iLo(2,104)=0 exch2_iHi(2,104)=35 exch2_jLo(2,104)=0 exch2_jHi(2,104)=0 exch2_opposingSend(2,104)=1 exch2_pij(1,2,104)=1 exch2_pij(2,2,104)=0 exch2_pij(3,2,104)=0 exch2_pij(4,2,104)=1 exch2_oi(2,104)=0 exch2_oj(2,104)=0 exch2_neighbourId(3,104)=105 exch2_iLo(3,104)=35 exch2_iHi(3,104)=35 exch2_jLo(3,104)=0 exch2_jHi(3,104)=52 exch2_opposingSend(3,104)=4 exch2_pij(1,3,104)=1 exch2_pij(2,3,104)=0 exch2_pij(3,3,104)=0 exch2_pij(4,3,104)=1 exch2_oi(3,104)=0 exch2_oj(3,104)=0 exch2_neighbourId(4,104)=103 exch2_iLo(4,104)=0 exch2_iHi(4,104)=0 exch2_jLo(4,104)=0 exch2_jHi(4,104)=52 exch2_opposingSend(4,104)=3 exch2_pij(1,4,104)=1 exch2_pij(2,4,104)=0 exch2_pij(3,4,104)=0 exch2_pij(4,4,104)=1 exch2_oi(4,104)=0 exch2_oj(4,104)=0 RETURN END SUBROUTINE W2_E2SETUP_105 C Topology for tile 105 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(105)=34 exch2_tNy(105)=51 exch2_tBasex(105)=476 exch2_tBasey(105)=306 exch2_txGlobalo(105)=477 exch2_tyGlobalo(105)=307 exch2_isWedge(105)=0 exch2_isNedge(105)=0 exch2_isEedge(105)=1 exch2_isSedge(105)=0 exch2_myFace(105)=1 exch2_mydNx(105)=510 exch2_mydNy(105)=510 exch2_nNeighbours(105)=4 exch2_neighbourId(1,105)=120 exch2_iLo(1,105)=0 exch2_iHi(1,105)=35 exch2_jLo(1,105)=52 exch2_jHi(1,105)=52 exch2_opposingSend(1,105)=2 exch2_pij(1,1,105)=1 exch2_pij(2,1,105)=0 exch2_pij(3,1,105)=0 exch2_pij(4,1,105)=1 exch2_oi(1,105)=0 exch2_oj(1,105)=0 exch2_neighbourId(2,105)=90 exch2_iLo(2,105)=0 exch2_iHi(2,105)=35 exch2_jLo(2,105)=0 exch2_jHi(2,105)=0 exch2_opposingSend(2,105)=1 exch2_pij(1,2,105)=1 exch2_pij(2,2,105)=0 exch2_pij(3,2,105)=0 exch2_pij(4,2,105)=1 exch2_oi(2,105)=0 exch2_oj(2,105)=0 exch2_neighbourId(3,105)=241 exch2_iLo(3,105)=35 exch2_iHi(3,105)=35 exch2_jLo(3,105)=0 exch2_jHi(3,105)=52 exch2_opposingSend(3,105)=4 exch2_pij(1,3,105)=1 exch2_pij(2,3,105)=0 exch2_pij(3,3,105)=0 exch2_pij(4,3,105)=1 exch2_oi(3,105)=510 exch2_oj(3,105)=0 exch2_neighbourId(4,105)=104 exch2_iLo(4,105)=0 exch2_iHi(4,105)=0 exch2_jLo(4,105)=0 exch2_jHi(4,105)=52 exch2_opposingSend(4,105)=3 exch2_pij(1,4,105)=1 exch2_pij(2,4,105)=0 exch2_pij(3,4,105)=0 exch2_pij(4,4,105)=1 exch2_oi(4,105)=0 exch2_oj(4,105)=0 RETURN END SUBROUTINE W2_E2SETUP_106 C Topology for tile 106 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(106)=34 exch2_tNy(106)=51 exch2_tBasex(106)=0 exch2_tBasey(106)=357 exch2_txGlobalo(106)=1 exch2_tyGlobalo(106)=358 exch2_isWedge(106)=1 exch2_isNedge(106)=0 exch2_isEedge(106)=0 exch2_isSedge(106)=0 exch2_myFace(106)=1 exch2_mydNx(106)=510 exch2_mydNy(106)=510 exch2_nNeighbours(106)=5 exch2_neighbourId(1,106)=121 exch2_iLo(1,106)=0 exch2_iHi(1,106)=35 exch2_jLo(1,106)=52 exch2_jHi(1,106)=52 exch2_opposingSend(1,106)=2 exch2_pij(1,1,106)=1 exch2_pij(2,1,106)=0 exch2_pij(3,1,106)=0 exch2_pij(4,1,106)=1 exch2_oi(1,106)=0 exch2_oj(1,106)=0 exch2_neighbourId(2,106)=91 exch2_iLo(2,106)=0 exch2_iHi(2,106)=35 exch2_jLo(2,106)=0 exch2_jHi(2,106)=0 exch2_opposingSend(2,106)=1 exch2_pij(1,2,106)=1 exch2_pij(2,2,106)=0 exch2_pij(3,2,106)=0 exch2_pij(4,2,106)=1 exch2_oi(2,106)=0 exch2_oj(2,106)=0 exch2_neighbourId(3,106)=107 exch2_iLo(3,106)=35 exch2_iHi(3,106)=35 exch2_jLo(3,106)=0 exch2_jHi(3,106)=52 exch2_opposingSend(3,106)=4 exch2_pij(1,3,106)=1 exch2_pij(2,3,106)=0 exch2_pij(3,3,106)=0 exch2_pij(4,3,106)=1 exch2_oi(3,106)=0 exch2_oj(3,106)=0 exch2_neighbourId(4,106)=739 exch2_iLo(4,106)=0 exch2_iHi(4,106)=0 exch2_jLo(4,106)=17 exch2_jHi(4,106)=52 exch2_opposingSend(4,106)=1 exch2_pij(1,4,106)=0 exch2_pij(2,4,106)=1 exch2_pij(3,4,106)=-1 exch2_pij(4,4,106)=0 exch2_oi(4,106)=-510 exch2_oj(4,106)=511 exch2_neighbourId(5,106)=740 exch2_iLo(5,106)=0 exch2_iHi(5,106)=0 exch2_jLo(5,106)=0 exch2_jHi(5,106)=18 exch2_opposingSend(5,106)=2 exch2_pij(1,5,106)=0 exch2_pij(2,5,106)=1 exch2_pij(3,5,106)=-1 exch2_pij(4,5,106)=0 exch2_oi(5,106)=-510 exch2_oj(5,106)=511 RETURN END SUBROUTINE W2_E2SETUP_107 C Topology for tile 107 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(107)=34 exch2_tNy(107)=51 exch2_tBasex(107)=34 exch2_tBasey(107)=357 exch2_txGlobalo(107)=35 exch2_tyGlobalo(107)=358 exch2_isWedge(107)=0 exch2_isNedge(107)=0 exch2_isEedge(107)=0 exch2_isSedge(107)=0 exch2_myFace(107)=1 exch2_mydNx(107)=510 exch2_mydNy(107)=510 exch2_nNeighbours(107)=4 exch2_neighbourId(1,107)=122 exch2_iLo(1,107)=0 exch2_iHi(1,107)=35 exch2_jLo(1,107)=52 exch2_jHi(1,107)=52 exch2_opposingSend(1,107)=2 exch2_pij(1,1,107)=1 exch2_pij(2,1,107)=0 exch2_pij(3,1,107)=0 exch2_pij(4,1,107)=1 exch2_oi(1,107)=0 exch2_oj(1,107)=0 exch2_neighbourId(2,107)=92 exch2_iLo(2,107)=0 exch2_iHi(2,107)=35 exch2_jLo(2,107)=0 exch2_jHi(2,107)=0 exch2_opposingSend(2,107)=1 exch2_pij(1,2,107)=1 exch2_pij(2,2,107)=0 exch2_pij(3,2,107)=0 exch2_pij(4,2,107)=1 exch2_oi(2,107)=0 exch2_oj(2,107)=0 exch2_neighbourId(3,107)=108 exch2_iLo(3,107)=35 exch2_iHi(3,107)=35 exch2_jLo(3,107)=0 exch2_jHi(3,107)=52 exch2_opposingSend(3,107)=4 exch2_pij(1,3,107)=1 exch2_pij(2,3,107)=0 exch2_pij(3,3,107)=0 exch2_pij(4,3,107)=1 exch2_oi(3,107)=0 exch2_oj(3,107)=0 exch2_neighbourId(4,107)=106 exch2_iLo(4,107)=0 exch2_iHi(4,107)=0 exch2_jLo(4,107)=0 exch2_jHi(4,107)=52 exch2_opposingSend(4,107)=3 exch2_pij(1,4,107)=1 exch2_pij(2,4,107)=0 exch2_pij(3,4,107)=0 exch2_pij(4,4,107)=1 exch2_oi(4,107)=0 exch2_oj(4,107)=0 RETURN END SUBROUTINE W2_E2SETUP_108 C Topology for tile 108 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(108)=34 exch2_tNy(108)=51 exch2_tBasex(108)=68 exch2_tBasey(108)=357 exch2_txGlobalo(108)=69 exch2_tyGlobalo(108)=358 exch2_isWedge(108)=0 exch2_isNedge(108)=0 exch2_isEedge(108)=0 exch2_isSedge(108)=0 exch2_myFace(108)=1 exch2_mydNx(108)=510 exch2_mydNy(108)=510 exch2_nNeighbours(108)=4 exch2_neighbourId(1,108)=123 exch2_iLo(1,108)=0 exch2_iHi(1,108)=35 exch2_jLo(1,108)=52 exch2_jHi(1,108)=52 exch2_opposingSend(1,108)=2 exch2_pij(1,1,108)=1 exch2_pij(2,1,108)=0 exch2_pij(3,1,108)=0 exch2_pij(4,1,108)=1 exch2_oi(1,108)=0 exch2_oj(1,108)=0 exch2_neighbourId(2,108)=93 exch2_iLo(2,108)=0 exch2_iHi(2,108)=35 exch2_jLo(2,108)=0 exch2_jHi(2,108)=0 exch2_opposingSend(2,108)=1 exch2_pij(1,2,108)=1 exch2_pij(2,2,108)=0 exch2_pij(3,2,108)=0 exch2_pij(4,2,108)=1 exch2_oi(2,108)=0 exch2_oj(2,108)=0 exch2_neighbourId(3,108)=109 exch2_iLo(3,108)=35 exch2_iHi(3,108)=35 exch2_jLo(3,108)=0 exch2_jHi(3,108)=52 exch2_opposingSend(3,108)=4 exch2_pij(1,3,108)=1 exch2_pij(2,3,108)=0 exch2_pij(3,3,108)=0 exch2_pij(4,3,108)=1 exch2_oi(3,108)=0 exch2_oj(3,108)=0 exch2_neighbourId(4,108)=107 exch2_iLo(4,108)=0 exch2_iHi(4,108)=0 exch2_jLo(4,108)=0 exch2_jHi(4,108)=52 exch2_opposingSend(4,108)=3 exch2_pij(1,4,108)=1 exch2_pij(2,4,108)=0 exch2_pij(3,4,108)=0 exch2_pij(4,4,108)=1 exch2_oi(4,108)=0 exch2_oj(4,108)=0 RETURN END SUBROUTINE W2_E2SETUP_109 C Topology for tile 109 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(109)=34 exch2_tNy(109)=51 exch2_tBasex(109)=102 exch2_tBasey(109)=357 exch2_txGlobalo(109)=103 exch2_tyGlobalo(109)=358 exch2_isWedge(109)=0 exch2_isNedge(109)=0 exch2_isEedge(109)=0 exch2_isSedge(109)=0 exch2_myFace(109)=1 exch2_mydNx(109)=510 exch2_mydNy(109)=510 exch2_nNeighbours(109)=4 exch2_neighbourId(1,109)=124 exch2_iLo(1,109)=0 exch2_iHi(1,109)=35 exch2_jLo(1,109)=52 exch2_jHi(1,109)=52 exch2_opposingSend(1,109)=2 exch2_pij(1,1,109)=1 exch2_pij(2,1,109)=0 exch2_pij(3,1,109)=0 exch2_pij(4,1,109)=1 exch2_oi(1,109)=0 exch2_oj(1,109)=0 exch2_neighbourId(2,109)=94 exch2_iLo(2,109)=0 exch2_iHi(2,109)=35 exch2_jLo(2,109)=0 exch2_jHi(2,109)=0 exch2_opposingSend(2,109)=1 exch2_pij(1,2,109)=1 exch2_pij(2,2,109)=0 exch2_pij(3,2,109)=0 exch2_pij(4,2,109)=1 exch2_oi(2,109)=0 exch2_oj(2,109)=0 exch2_neighbourId(3,109)=110 exch2_iLo(3,109)=35 exch2_iHi(3,109)=35 exch2_jLo(3,109)=0 exch2_jHi(3,109)=52 exch2_opposingSend(3,109)=4 exch2_pij(1,3,109)=1 exch2_pij(2,3,109)=0 exch2_pij(3,3,109)=0 exch2_pij(4,3,109)=1 exch2_oi(3,109)=0 exch2_oj(3,109)=0 exch2_neighbourId(4,109)=108 exch2_iLo(4,109)=0 exch2_iHi(4,109)=0 exch2_jLo(4,109)=0 exch2_jHi(4,109)=52 exch2_opposingSend(4,109)=3 exch2_pij(1,4,109)=1 exch2_pij(2,4,109)=0 exch2_pij(3,4,109)=0 exch2_pij(4,4,109)=1 exch2_oi(4,109)=0 exch2_oj(4,109)=0 RETURN END SUBROUTINE W2_E2SETUP_110 C Topology for tile 110 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(110)=34 exch2_tNy(110)=51 exch2_tBasex(110)=136 exch2_tBasey(110)=357 exch2_txGlobalo(110)=137 exch2_tyGlobalo(110)=358 exch2_isWedge(110)=0 exch2_isNedge(110)=0 exch2_isEedge(110)=0 exch2_isSedge(110)=0 exch2_myFace(110)=1 exch2_mydNx(110)=510 exch2_mydNy(110)=510 exch2_nNeighbours(110)=4 exch2_neighbourId(1,110)=125 exch2_iLo(1,110)=0 exch2_iHi(1,110)=35 exch2_jLo(1,110)=52 exch2_jHi(1,110)=52 exch2_opposingSend(1,110)=2 exch2_pij(1,1,110)=1 exch2_pij(2,1,110)=0 exch2_pij(3,1,110)=0 exch2_pij(4,1,110)=1 exch2_oi(1,110)=0 exch2_oj(1,110)=0 exch2_neighbourId(2,110)=95 exch2_iLo(2,110)=0 exch2_iHi(2,110)=35 exch2_jLo(2,110)=0 exch2_jHi(2,110)=0 exch2_opposingSend(2,110)=1 exch2_pij(1,2,110)=1 exch2_pij(2,2,110)=0 exch2_pij(3,2,110)=0 exch2_pij(4,2,110)=1 exch2_oi(2,110)=0 exch2_oj(2,110)=0 exch2_neighbourId(3,110)=111 exch2_iLo(3,110)=35 exch2_iHi(3,110)=35 exch2_jLo(3,110)=0 exch2_jHi(3,110)=52 exch2_opposingSend(3,110)=4 exch2_pij(1,3,110)=1 exch2_pij(2,3,110)=0 exch2_pij(3,3,110)=0 exch2_pij(4,3,110)=1 exch2_oi(3,110)=0 exch2_oj(3,110)=0 exch2_neighbourId(4,110)=109 exch2_iLo(4,110)=0 exch2_iHi(4,110)=0 exch2_jLo(4,110)=0 exch2_jHi(4,110)=52 exch2_opposingSend(4,110)=3 exch2_pij(1,4,110)=1 exch2_pij(2,4,110)=0 exch2_pij(3,4,110)=0 exch2_pij(4,4,110)=1 exch2_oi(4,110)=0 exch2_oj(4,110)=0 RETURN END SUBROUTINE W2_E2SETUP_111 C Topology for tile 111 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(111)=34 exch2_tNy(111)=51 exch2_tBasex(111)=170 exch2_tBasey(111)=357 exch2_txGlobalo(111)=171 exch2_tyGlobalo(111)=358 exch2_isWedge(111)=0 exch2_isNedge(111)=0 exch2_isEedge(111)=0 exch2_isSedge(111)=0 exch2_myFace(111)=1 exch2_mydNx(111)=510 exch2_mydNy(111)=510 exch2_nNeighbours(111)=4 exch2_neighbourId(1,111)=126 exch2_iLo(1,111)=0 exch2_iHi(1,111)=35 exch2_jLo(1,111)=52 exch2_jHi(1,111)=52 exch2_opposingSend(1,111)=2 exch2_pij(1,1,111)=1 exch2_pij(2,1,111)=0 exch2_pij(3,1,111)=0 exch2_pij(4,1,111)=1 exch2_oi(1,111)=0 exch2_oj(1,111)=0 exch2_neighbourId(2,111)=96 exch2_iLo(2,111)=0 exch2_iHi(2,111)=35 exch2_jLo(2,111)=0 exch2_jHi(2,111)=0 exch2_opposingSend(2,111)=1 exch2_pij(1,2,111)=1 exch2_pij(2,2,111)=0 exch2_pij(3,2,111)=0 exch2_pij(4,2,111)=1 exch2_oi(2,111)=0 exch2_oj(2,111)=0 exch2_neighbourId(3,111)=112 exch2_iLo(3,111)=35 exch2_iHi(3,111)=35 exch2_jLo(3,111)=0 exch2_jHi(3,111)=52 exch2_opposingSend(3,111)=4 exch2_pij(1,3,111)=1 exch2_pij(2,3,111)=0 exch2_pij(3,3,111)=0 exch2_pij(4,3,111)=1 exch2_oi(3,111)=0 exch2_oj(3,111)=0 exch2_neighbourId(4,111)=110 exch2_iLo(4,111)=0 exch2_iHi(4,111)=0 exch2_jLo(4,111)=0 exch2_jHi(4,111)=52 exch2_opposingSend(4,111)=3 exch2_pij(1,4,111)=1 exch2_pij(2,4,111)=0 exch2_pij(3,4,111)=0 exch2_pij(4,4,111)=1 exch2_oi(4,111)=0 exch2_oj(4,111)=0 RETURN END SUBROUTINE W2_E2SETUP_112 C Topology for tile 112 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(112)=34 exch2_tNy(112)=51 exch2_tBasex(112)=204 exch2_tBasey(112)=357 exch2_txGlobalo(112)=205 exch2_tyGlobalo(112)=358 exch2_isWedge(112)=0 exch2_isNedge(112)=0 exch2_isEedge(112)=0 exch2_isSedge(112)=0 exch2_myFace(112)=1 exch2_mydNx(112)=510 exch2_mydNy(112)=510 exch2_nNeighbours(112)=4 exch2_neighbourId(1,112)=127 exch2_iLo(1,112)=0 exch2_iHi(1,112)=35 exch2_jLo(1,112)=52 exch2_jHi(1,112)=52 exch2_opposingSend(1,112)=2 exch2_pij(1,1,112)=1 exch2_pij(2,1,112)=0 exch2_pij(3,1,112)=0 exch2_pij(4,1,112)=1 exch2_oi(1,112)=0 exch2_oj(1,112)=0 exch2_neighbourId(2,112)=97 exch2_iLo(2,112)=0 exch2_iHi(2,112)=35 exch2_jLo(2,112)=0 exch2_jHi(2,112)=0 exch2_opposingSend(2,112)=1 exch2_pij(1,2,112)=1 exch2_pij(2,2,112)=0 exch2_pij(3,2,112)=0 exch2_pij(4,2,112)=1 exch2_oi(2,112)=0 exch2_oj(2,112)=0 exch2_neighbourId(3,112)=113 exch2_iLo(3,112)=35 exch2_iHi(3,112)=35 exch2_jLo(3,112)=0 exch2_jHi(3,112)=52 exch2_opposingSend(3,112)=4 exch2_pij(1,3,112)=1 exch2_pij(2,3,112)=0 exch2_pij(3,3,112)=0 exch2_pij(4,3,112)=1 exch2_oi(3,112)=0 exch2_oj(3,112)=0 exch2_neighbourId(4,112)=111 exch2_iLo(4,112)=0 exch2_iHi(4,112)=0 exch2_jLo(4,112)=0 exch2_jHi(4,112)=52 exch2_opposingSend(4,112)=3 exch2_pij(1,4,112)=1 exch2_pij(2,4,112)=0 exch2_pij(3,4,112)=0 exch2_pij(4,4,112)=1 exch2_oi(4,112)=0 exch2_oj(4,112)=0 RETURN END SUBROUTINE W2_E2SETUP_113 C Topology for tile 113 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(113)=34 exch2_tNy(113)=51 exch2_tBasex(113)=238 exch2_tBasey(113)=357 exch2_txGlobalo(113)=239 exch2_tyGlobalo(113)=358 exch2_isWedge(113)=0 exch2_isNedge(113)=0 exch2_isEedge(113)=0 exch2_isSedge(113)=0 exch2_myFace(113)=1 exch2_mydNx(113)=510 exch2_mydNy(113)=510 exch2_nNeighbours(113)=4 exch2_neighbourId(1,113)=128 exch2_iLo(1,113)=0 exch2_iHi(1,113)=35 exch2_jLo(1,113)=52 exch2_jHi(1,113)=52 exch2_opposingSend(1,113)=2 exch2_pij(1,1,113)=1 exch2_pij(2,1,113)=0 exch2_pij(3,1,113)=0 exch2_pij(4,1,113)=1 exch2_oi(1,113)=0 exch2_oj(1,113)=0 exch2_neighbourId(2,113)=98 exch2_iLo(2,113)=0 exch2_iHi(2,113)=35 exch2_jLo(2,113)=0 exch2_jHi(2,113)=0 exch2_opposingSend(2,113)=1 exch2_pij(1,2,113)=1 exch2_pij(2,2,113)=0 exch2_pij(3,2,113)=0 exch2_pij(4,2,113)=1 exch2_oi(2,113)=0 exch2_oj(2,113)=0 exch2_neighbourId(3,113)=114 exch2_iLo(3,113)=35 exch2_iHi(3,113)=35 exch2_jLo(3,113)=0 exch2_jHi(3,113)=52 exch2_opposingSend(3,113)=4 exch2_pij(1,3,113)=1 exch2_pij(2,3,113)=0 exch2_pij(3,3,113)=0 exch2_pij(4,3,113)=1 exch2_oi(3,113)=0 exch2_oj(3,113)=0 exch2_neighbourId(4,113)=112 exch2_iLo(4,113)=0 exch2_iHi(4,113)=0 exch2_jLo(4,113)=0 exch2_jHi(4,113)=52 exch2_opposingSend(4,113)=3 exch2_pij(1,4,113)=1 exch2_pij(2,4,113)=0 exch2_pij(3,4,113)=0 exch2_pij(4,4,113)=1 exch2_oi(4,113)=0 exch2_oj(4,113)=0 RETURN END SUBROUTINE W2_E2SETUP_114 C Topology for tile 114 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(114)=34 exch2_tNy(114)=51 exch2_tBasex(114)=272 exch2_tBasey(114)=357 exch2_txGlobalo(114)=273 exch2_tyGlobalo(114)=358 exch2_isWedge(114)=0 exch2_isNedge(114)=0 exch2_isEedge(114)=0 exch2_isSedge(114)=0 exch2_myFace(114)=1 exch2_mydNx(114)=510 exch2_mydNy(114)=510 exch2_nNeighbours(114)=4 exch2_neighbourId(1,114)=129 exch2_iLo(1,114)=0 exch2_iHi(1,114)=35 exch2_jLo(1,114)=52 exch2_jHi(1,114)=52 exch2_opposingSend(1,114)=2 exch2_pij(1,1,114)=1 exch2_pij(2,1,114)=0 exch2_pij(3,1,114)=0 exch2_pij(4,1,114)=1 exch2_oi(1,114)=0 exch2_oj(1,114)=0 exch2_neighbourId(2,114)=99 exch2_iLo(2,114)=0 exch2_iHi(2,114)=35 exch2_jLo(2,114)=0 exch2_jHi(2,114)=0 exch2_opposingSend(2,114)=1 exch2_pij(1,2,114)=1 exch2_pij(2,2,114)=0 exch2_pij(3,2,114)=0 exch2_pij(4,2,114)=1 exch2_oi(2,114)=0 exch2_oj(2,114)=0 exch2_neighbourId(3,114)=115 exch2_iLo(3,114)=35 exch2_iHi(3,114)=35 exch2_jLo(3,114)=0 exch2_jHi(3,114)=52 exch2_opposingSend(3,114)=4 exch2_pij(1,3,114)=1 exch2_pij(2,3,114)=0 exch2_pij(3,3,114)=0 exch2_pij(4,3,114)=1 exch2_oi(3,114)=0 exch2_oj(3,114)=0 exch2_neighbourId(4,114)=113 exch2_iLo(4,114)=0 exch2_iHi(4,114)=0 exch2_jLo(4,114)=0 exch2_jHi(4,114)=52 exch2_opposingSend(4,114)=3 exch2_pij(1,4,114)=1 exch2_pij(2,4,114)=0 exch2_pij(3,4,114)=0 exch2_pij(4,4,114)=1 exch2_oi(4,114)=0 exch2_oj(4,114)=0 RETURN END SUBROUTINE W2_E2SETUP_115 C Topology for tile 115 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(115)=34 exch2_tNy(115)=51 exch2_tBasex(115)=306 exch2_tBasey(115)=357 exch2_txGlobalo(115)=307 exch2_tyGlobalo(115)=358 exch2_isWedge(115)=0 exch2_isNedge(115)=0 exch2_isEedge(115)=0 exch2_isSedge(115)=0 exch2_myFace(115)=1 exch2_mydNx(115)=510 exch2_mydNy(115)=510 exch2_nNeighbours(115)=4 exch2_neighbourId(1,115)=130 exch2_iLo(1,115)=0 exch2_iHi(1,115)=35 exch2_jLo(1,115)=52 exch2_jHi(1,115)=52 exch2_opposingSend(1,115)=2 exch2_pij(1,1,115)=1 exch2_pij(2,1,115)=0 exch2_pij(3,1,115)=0 exch2_pij(4,1,115)=1 exch2_oi(1,115)=0 exch2_oj(1,115)=0 exch2_neighbourId(2,115)=100 exch2_iLo(2,115)=0 exch2_iHi(2,115)=35 exch2_jLo(2,115)=0 exch2_jHi(2,115)=0 exch2_opposingSend(2,115)=1 exch2_pij(1,2,115)=1 exch2_pij(2,2,115)=0 exch2_pij(3,2,115)=0 exch2_pij(4,2,115)=1 exch2_oi(2,115)=0 exch2_oj(2,115)=0 exch2_neighbourId(3,115)=116 exch2_iLo(3,115)=35 exch2_iHi(3,115)=35 exch2_jLo(3,115)=0 exch2_jHi(3,115)=52 exch2_opposingSend(3,115)=4 exch2_pij(1,3,115)=1 exch2_pij(2,3,115)=0 exch2_pij(3,3,115)=0 exch2_pij(4,3,115)=1 exch2_oi(3,115)=0 exch2_oj(3,115)=0 exch2_neighbourId(4,115)=114 exch2_iLo(4,115)=0 exch2_iHi(4,115)=0 exch2_jLo(4,115)=0 exch2_jHi(4,115)=52 exch2_opposingSend(4,115)=3 exch2_pij(1,4,115)=1 exch2_pij(2,4,115)=0 exch2_pij(3,4,115)=0 exch2_pij(4,4,115)=1 exch2_oi(4,115)=0 exch2_oj(4,115)=0 RETURN END SUBROUTINE W2_E2SETUP_116 C Topology for tile 116 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(116)=34 exch2_tNy(116)=51 exch2_tBasex(116)=340 exch2_tBasey(116)=357 exch2_txGlobalo(116)=341 exch2_tyGlobalo(116)=358 exch2_isWedge(116)=0 exch2_isNedge(116)=0 exch2_isEedge(116)=0 exch2_isSedge(116)=0 exch2_myFace(116)=1 exch2_mydNx(116)=510 exch2_mydNy(116)=510 exch2_nNeighbours(116)=4 exch2_neighbourId(1,116)=131 exch2_iLo(1,116)=0 exch2_iHi(1,116)=35 exch2_jLo(1,116)=52 exch2_jHi(1,116)=52 exch2_opposingSend(1,116)=2 exch2_pij(1,1,116)=1 exch2_pij(2,1,116)=0 exch2_pij(3,1,116)=0 exch2_pij(4,1,116)=1 exch2_oi(1,116)=0 exch2_oj(1,116)=0 exch2_neighbourId(2,116)=101 exch2_iLo(2,116)=0 exch2_iHi(2,116)=35 exch2_jLo(2,116)=0 exch2_jHi(2,116)=0 exch2_opposingSend(2,116)=1 exch2_pij(1,2,116)=1 exch2_pij(2,2,116)=0 exch2_pij(3,2,116)=0 exch2_pij(4,2,116)=1 exch2_oi(2,116)=0 exch2_oj(2,116)=0 exch2_neighbourId(3,116)=117 exch2_iLo(3,116)=35 exch2_iHi(3,116)=35 exch2_jLo(3,116)=0 exch2_jHi(3,116)=52 exch2_opposingSend(3,116)=4 exch2_pij(1,3,116)=1 exch2_pij(2,3,116)=0 exch2_pij(3,3,116)=0 exch2_pij(4,3,116)=1 exch2_oi(3,116)=0 exch2_oj(3,116)=0 exch2_neighbourId(4,116)=115 exch2_iLo(4,116)=0 exch2_iHi(4,116)=0 exch2_jLo(4,116)=0 exch2_jHi(4,116)=52 exch2_opposingSend(4,116)=3 exch2_pij(1,4,116)=1 exch2_pij(2,4,116)=0 exch2_pij(3,4,116)=0 exch2_pij(4,4,116)=1 exch2_oi(4,116)=0 exch2_oj(4,116)=0 RETURN END SUBROUTINE W2_E2SETUP_117 C Topology for tile 117 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(117)=34 exch2_tNy(117)=51 exch2_tBasex(117)=374 exch2_tBasey(117)=357 exch2_txGlobalo(117)=375 exch2_tyGlobalo(117)=358 exch2_isWedge(117)=0 exch2_isNedge(117)=0 exch2_isEedge(117)=0 exch2_isSedge(117)=0 exch2_myFace(117)=1 exch2_mydNx(117)=510 exch2_mydNy(117)=510 exch2_nNeighbours(117)=4 exch2_neighbourId(1,117)=132 exch2_iLo(1,117)=0 exch2_iHi(1,117)=35 exch2_jLo(1,117)=52 exch2_jHi(1,117)=52 exch2_opposingSend(1,117)=2 exch2_pij(1,1,117)=1 exch2_pij(2,1,117)=0 exch2_pij(3,1,117)=0 exch2_pij(4,1,117)=1 exch2_oi(1,117)=0 exch2_oj(1,117)=0 exch2_neighbourId(2,117)=102 exch2_iLo(2,117)=0 exch2_iHi(2,117)=35 exch2_jLo(2,117)=0 exch2_jHi(2,117)=0 exch2_opposingSend(2,117)=1 exch2_pij(1,2,117)=1 exch2_pij(2,2,117)=0 exch2_pij(3,2,117)=0 exch2_pij(4,2,117)=1 exch2_oi(2,117)=0 exch2_oj(2,117)=0 exch2_neighbourId(3,117)=118 exch2_iLo(3,117)=35 exch2_iHi(3,117)=35 exch2_jLo(3,117)=0 exch2_jHi(3,117)=52 exch2_opposingSend(3,117)=4 exch2_pij(1,3,117)=1 exch2_pij(2,3,117)=0 exch2_pij(3,3,117)=0 exch2_pij(4,3,117)=1 exch2_oi(3,117)=0 exch2_oj(3,117)=0 exch2_neighbourId(4,117)=116 exch2_iLo(4,117)=0 exch2_iHi(4,117)=0 exch2_jLo(4,117)=0 exch2_jHi(4,117)=52 exch2_opposingSend(4,117)=3 exch2_pij(1,4,117)=1 exch2_pij(2,4,117)=0 exch2_pij(3,4,117)=0 exch2_pij(4,4,117)=1 exch2_oi(4,117)=0 exch2_oj(4,117)=0 RETURN END SUBROUTINE W2_E2SETUP_118 C Topology for tile 118 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(118)=34 exch2_tNy(118)=51 exch2_tBasex(118)=408 exch2_tBasey(118)=357 exch2_txGlobalo(118)=409 exch2_tyGlobalo(118)=358 exch2_isWedge(118)=0 exch2_isNedge(118)=0 exch2_isEedge(118)=0 exch2_isSedge(118)=0 exch2_myFace(118)=1 exch2_mydNx(118)=510 exch2_mydNy(118)=510 exch2_nNeighbours(118)=4 exch2_neighbourId(1,118)=133 exch2_iLo(1,118)=0 exch2_iHi(1,118)=35 exch2_jLo(1,118)=52 exch2_jHi(1,118)=52 exch2_opposingSend(1,118)=2 exch2_pij(1,1,118)=1 exch2_pij(2,1,118)=0 exch2_pij(3,1,118)=0 exch2_pij(4,1,118)=1 exch2_oi(1,118)=0 exch2_oj(1,118)=0 exch2_neighbourId(2,118)=103 exch2_iLo(2,118)=0 exch2_iHi(2,118)=35 exch2_jLo(2,118)=0 exch2_jHi(2,118)=0 exch2_opposingSend(2,118)=1 exch2_pij(1,2,118)=1 exch2_pij(2,2,118)=0 exch2_pij(3,2,118)=0 exch2_pij(4,2,118)=1 exch2_oi(2,118)=0 exch2_oj(2,118)=0 exch2_neighbourId(3,118)=119 exch2_iLo(3,118)=35 exch2_iHi(3,118)=35 exch2_jLo(3,118)=0 exch2_jHi(3,118)=52 exch2_opposingSend(3,118)=4 exch2_pij(1,3,118)=1 exch2_pij(2,3,118)=0 exch2_pij(3,3,118)=0 exch2_pij(4,3,118)=1 exch2_oi(3,118)=0 exch2_oj(3,118)=0 exch2_neighbourId(4,118)=117 exch2_iLo(4,118)=0 exch2_iHi(4,118)=0 exch2_jLo(4,118)=0 exch2_jHi(4,118)=52 exch2_opposingSend(4,118)=3 exch2_pij(1,4,118)=1 exch2_pij(2,4,118)=0 exch2_pij(3,4,118)=0 exch2_pij(4,4,118)=1 exch2_oi(4,118)=0 exch2_oj(4,118)=0 RETURN END SUBROUTINE W2_E2SETUP_119 C Topology for tile 119 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(119)=34 exch2_tNy(119)=51 exch2_tBasex(119)=442 exch2_tBasey(119)=357 exch2_txGlobalo(119)=443 exch2_tyGlobalo(119)=358 exch2_isWedge(119)=0 exch2_isNedge(119)=0 exch2_isEedge(119)=0 exch2_isSedge(119)=0 exch2_myFace(119)=1 exch2_mydNx(119)=510 exch2_mydNy(119)=510 exch2_nNeighbours(119)=4 exch2_neighbourId(1,119)=134 exch2_iLo(1,119)=0 exch2_iHi(1,119)=35 exch2_jLo(1,119)=52 exch2_jHi(1,119)=52 exch2_opposingSend(1,119)=2 exch2_pij(1,1,119)=1 exch2_pij(2,1,119)=0 exch2_pij(3,1,119)=0 exch2_pij(4,1,119)=1 exch2_oi(1,119)=0 exch2_oj(1,119)=0 exch2_neighbourId(2,119)=104 exch2_iLo(2,119)=0 exch2_iHi(2,119)=35 exch2_jLo(2,119)=0 exch2_jHi(2,119)=0 exch2_opposingSend(2,119)=1 exch2_pij(1,2,119)=1 exch2_pij(2,2,119)=0 exch2_pij(3,2,119)=0 exch2_pij(4,2,119)=1 exch2_oi(2,119)=0 exch2_oj(2,119)=0 exch2_neighbourId(3,119)=120 exch2_iLo(3,119)=35 exch2_iHi(3,119)=35 exch2_jLo(3,119)=0 exch2_jHi(3,119)=52 exch2_opposingSend(3,119)=4 exch2_pij(1,3,119)=1 exch2_pij(2,3,119)=0 exch2_pij(3,3,119)=0 exch2_pij(4,3,119)=1 exch2_oi(3,119)=0 exch2_oj(3,119)=0 exch2_neighbourId(4,119)=118 exch2_iLo(4,119)=0 exch2_iHi(4,119)=0 exch2_jLo(4,119)=0 exch2_jHi(4,119)=52 exch2_opposingSend(4,119)=3 exch2_pij(1,4,119)=1 exch2_pij(2,4,119)=0 exch2_pij(3,4,119)=0 exch2_pij(4,4,119)=1 exch2_oi(4,119)=0 exch2_oj(4,119)=0 RETURN END SUBROUTINE W2_E2SETUP_120 C Topology for tile 120 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(120)=34 exch2_tNy(120)=51 exch2_tBasex(120)=476 exch2_tBasey(120)=357 exch2_txGlobalo(120)=477 exch2_tyGlobalo(120)=358 exch2_isWedge(120)=0 exch2_isNedge(120)=0 exch2_isEedge(120)=1 exch2_isSedge(120)=0 exch2_myFace(120)=1 exch2_mydNx(120)=510 exch2_mydNy(120)=510 exch2_nNeighbours(120)=4 exch2_neighbourId(1,120)=135 exch2_iLo(1,120)=0 exch2_iHi(1,120)=35 exch2_jLo(1,120)=52 exch2_jHi(1,120)=52 exch2_opposingSend(1,120)=2 exch2_pij(1,1,120)=1 exch2_pij(2,1,120)=0 exch2_pij(3,1,120)=0 exch2_pij(4,1,120)=1 exch2_oi(1,120)=0 exch2_oj(1,120)=0 exch2_neighbourId(2,120)=105 exch2_iLo(2,120)=0 exch2_iHi(2,120)=35 exch2_jLo(2,120)=0 exch2_jHi(2,120)=0 exch2_opposingSend(2,120)=1 exch2_pij(1,2,120)=1 exch2_pij(2,2,120)=0 exch2_pij(3,2,120)=0 exch2_pij(4,2,120)=1 exch2_oi(2,120)=0 exch2_oj(2,120)=0 exch2_neighbourId(3,120)=256 exch2_iLo(3,120)=35 exch2_iHi(3,120)=35 exch2_jLo(3,120)=0 exch2_jHi(3,120)=52 exch2_opposingSend(3,120)=4 exch2_pij(1,3,120)=1 exch2_pij(2,3,120)=0 exch2_pij(3,3,120)=0 exch2_pij(4,3,120)=1 exch2_oi(3,120)=510 exch2_oj(3,120)=0 exch2_neighbourId(4,120)=119 exch2_iLo(4,120)=0 exch2_iHi(4,120)=0 exch2_jLo(4,120)=0 exch2_jHi(4,120)=52 exch2_opposingSend(4,120)=3 exch2_pij(1,4,120)=1 exch2_pij(2,4,120)=0 exch2_pij(3,4,120)=0 exch2_pij(4,4,120)=1 exch2_oi(4,120)=0 exch2_oj(4,120)=0 RETURN END SUBROUTINE W2_E2SETUP_121 C Topology for tile 121 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(121)=34 exch2_tNy(121)=51 exch2_tBasex(121)=0 exch2_tBasey(121)=408 exch2_txGlobalo(121)=1 exch2_tyGlobalo(121)=409 exch2_isWedge(121)=1 exch2_isNedge(121)=0 exch2_isEedge(121)=0 exch2_isSedge(121)=0 exch2_myFace(121)=1 exch2_mydNx(121)=510 exch2_mydNy(121)=510 exch2_nNeighbours(121)=5 exch2_neighbourId(1,121)=136 exch2_iLo(1,121)=0 exch2_iHi(1,121)=35 exch2_jLo(1,121)=52 exch2_jHi(1,121)=52 exch2_opposingSend(1,121)=2 exch2_pij(1,1,121)=1 exch2_pij(2,1,121)=0 exch2_pij(3,1,121)=0 exch2_pij(4,1,121)=1 exch2_oi(1,121)=0 exch2_oj(1,121)=0 exch2_neighbourId(2,121)=106 exch2_iLo(2,121)=0 exch2_iHi(2,121)=35 exch2_jLo(2,121)=0 exch2_jHi(2,121)=0 exch2_opposingSend(2,121)=1 exch2_pij(1,2,121)=1 exch2_pij(2,2,121)=0 exch2_pij(3,2,121)=0 exch2_pij(4,2,121)=1 exch2_oi(2,121)=0 exch2_oj(2,121)=0 exch2_neighbourId(3,121)=122 exch2_iLo(3,121)=35 exch2_iHi(3,121)=35 exch2_jLo(3,121)=0 exch2_jHi(3,121)=52 exch2_opposingSend(3,121)=4 exch2_pij(1,3,121)=1 exch2_pij(2,3,121)=0 exch2_pij(3,3,121)=0 exch2_pij(4,3,121)=1 exch2_oi(3,121)=0 exch2_oj(3,121)=0 exch2_neighbourId(4,121)=737 exch2_iLo(4,121)=0 exch2_iHi(4,121)=0 exch2_jLo(4,121)=34 exch2_jHi(4,121)=52 exch2_opposingSend(4,121)=1 exch2_pij(1,4,121)=0 exch2_pij(2,4,121)=1 exch2_pij(3,4,121)=-1 exch2_pij(4,4,121)=0 exch2_oi(4,121)=-510 exch2_oj(4,121)=511 exch2_neighbourId(5,121)=738 exch2_iLo(5,121)=0 exch2_iHi(5,121)=0 exch2_jLo(5,121)=0 exch2_jHi(5,121)=35 exch2_opposingSend(5,121)=1 exch2_pij(1,5,121)=0 exch2_pij(2,5,121)=1 exch2_pij(3,5,121)=-1 exch2_pij(4,5,121)=0 exch2_oi(5,121)=-510 exch2_oj(5,121)=511 RETURN END SUBROUTINE W2_E2SETUP_122 C Topology for tile 122 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(122)=34 exch2_tNy(122)=51 exch2_tBasex(122)=34 exch2_tBasey(122)=408 exch2_txGlobalo(122)=35 exch2_tyGlobalo(122)=409 exch2_isWedge(122)=0 exch2_isNedge(122)=0 exch2_isEedge(122)=0 exch2_isSedge(122)=0 exch2_myFace(122)=1 exch2_mydNx(122)=510 exch2_mydNy(122)=510 exch2_nNeighbours(122)=4 exch2_neighbourId(1,122)=137 exch2_iLo(1,122)=0 exch2_iHi(1,122)=35 exch2_jLo(1,122)=52 exch2_jHi(1,122)=52 exch2_opposingSend(1,122)=3 exch2_pij(1,1,122)=1 exch2_pij(2,1,122)=0 exch2_pij(3,1,122)=0 exch2_pij(4,1,122)=1 exch2_oi(1,122)=0 exch2_oj(1,122)=0 exch2_neighbourId(2,122)=107 exch2_iLo(2,122)=0 exch2_iHi(2,122)=35 exch2_jLo(2,122)=0 exch2_jHi(2,122)=0 exch2_opposingSend(2,122)=1 exch2_pij(1,2,122)=1 exch2_pij(2,2,122)=0 exch2_pij(3,2,122)=0 exch2_pij(4,2,122)=1 exch2_oi(2,122)=0 exch2_oj(2,122)=0 exch2_neighbourId(3,122)=123 exch2_iLo(3,122)=35 exch2_iHi(3,122)=35 exch2_jLo(3,122)=0 exch2_jHi(3,122)=52 exch2_opposingSend(3,122)=4 exch2_pij(1,3,122)=1 exch2_pij(2,3,122)=0 exch2_pij(3,3,122)=0 exch2_pij(4,3,122)=1 exch2_oi(3,122)=0 exch2_oj(3,122)=0 exch2_neighbourId(4,122)=121 exch2_iLo(4,122)=0 exch2_iHi(4,122)=0 exch2_jLo(4,122)=0 exch2_jHi(4,122)=52 exch2_opposingSend(4,122)=3 exch2_pij(1,4,122)=1 exch2_pij(2,4,122)=0 exch2_pij(3,4,122)=0 exch2_pij(4,4,122)=1 exch2_oi(4,122)=0 exch2_oj(4,122)=0 RETURN END SUBROUTINE W2_E2SETUP_123 C Topology for tile 123 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(123)=34 exch2_tNy(123)=51 exch2_tBasex(123)=68 exch2_tBasey(123)=408 exch2_txGlobalo(123)=69 exch2_tyGlobalo(123)=409 exch2_isWedge(123)=0 exch2_isNedge(123)=0 exch2_isEedge(123)=0 exch2_isSedge(123)=0 exch2_myFace(123)=1 exch2_mydNx(123)=510 exch2_mydNy(123)=510 exch2_nNeighbours(123)=4 exch2_neighbourId(1,123)=138 exch2_iLo(1,123)=0 exch2_iHi(1,123)=35 exch2_jLo(1,123)=52 exch2_jHi(1,123)=52 exch2_opposingSend(1,123)=2 exch2_pij(1,1,123)=1 exch2_pij(2,1,123)=0 exch2_pij(3,1,123)=0 exch2_pij(4,1,123)=1 exch2_oi(1,123)=0 exch2_oj(1,123)=0 exch2_neighbourId(2,123)=108 exch2_iLo(2,123)=0 exch2_iHi(2,123)=35 exch2_jLo(2,123)=0 exch2_jHi(2,123)=0 exch2_opposingSend(2,123)=1 exch2_pij(1,2,123)=1 exch2_pij(2,2,123)=0 exch2_pij(3,2,123)=0 exch2_pij(4,2,123)=1 exch2_oi(2,123)=0 exch2_oj(2,123)=0 exch2_neighbourId(3,123)=124 exch2_iLo(3,123)=35 exch2_iHi(3,123)=35 exch2_jLo(3,123)=0 exch2_jHi(3,123)=52 exch2_opposingSend(3,123)=4 exch2_pij(1,3,123)=1 exch2_pij(2,3,123)=0 exch2_pij(3,3,123)=0 exch2_pij(4,3,123)=1 exch2_oi(3,123)=0 exch2_oj(3,123)=0 exch2_neighbourId(4,123)=122 exch2_iLo(4,123)=0 exch2_iHi(4,123)=0 exch2_jLo(4,123)=0 exch2_jHi(4,123)=52 exch2_opposingSend(4,123)=3 exch2_pij(1,4,123)=1 exch2_pij(2,4,123)=0 exch2_pij(3,4,123)=0 exch2_pij(4,4,123)=1 exch2_oi(4,123)=0 exch2_oj(4,123)=0 RETURN END SUBROUTINE W2_E2SETUP_124 C Topology for tile 124 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(124)=34 exch2_tNy(124)=51 exch2_tBasex(124)=102 exch2_tBasey(124)=408 exch2_txGlobalo(124)=103 exch2_tyGlobalo(124)=409 exch2_isWedge(124)=0 exch2_isNedge(124)=0 exch2_isEedge(124)=0 exch2_isSedge(124)=0 exch2_myFace(124)=1 exch2_mydNx(124)=510 exch2_mydNy(124)=510 exch2_nNeighbours(124)=4 exch2_neighbourId(1,124)=139 exch2_iLo(1,124)=0 exch2_iHi(1,124)=35 exch2_jLo(1,124)=52 exch2_jHi(1,124)=52 exch2_opposingSend(1,124)=2 exch2_pij(1,1,124)=1 exch2_pij(2,1,124)=0 exch2_pij(3,1,124)=0 exch2_pij(4,1,124)=1 exch2_oi(1,124)=0 exch2_oj(1,124)=0 exch2_neighbourId(2,124)=109 exch2_iLo(2,124)=0 exch2_iHi(2,124)=35 exch2_jLo(2,124)=0 exch2_jHi(2,124)=0 exch2_opposingSend(2,124)=1 exch2_pij(1,2,124)=1 exch2_pij(2,2,124)=0 exch2_pij(3,2,124)=0 exch2_pij(4,2,124)=1 exch2_oi(2,124)=0 exch2_oj(2,124)=0 exch2_neighbourId(3,124)=125 exch2_iLo(3,124)=35 exch2_iHi(3,124)=35 exch2_jLo(3,124)=0 exch2_jHi(3,124)=52 exch2_opposingSend(3,124)=4 exch2_pij(1,3,124)=1 exch2_pij(2,3,124)=0 exch2_pij(3,3,124)=0 exch2_pij(4,3,124)=1 exch2_oi(3,124)=0 exch2_oj(3,124)=0 exch2_neighbourId(4,124)=123 exch2_iLo(4,124)=0 exch2_iHi(4,124)=0 exch2_jLo(4,124)=0 exch2_jHi(4,124)=52 exch2_opposingSend(4,124)=3 exch2_pij(1,4,124)=1 exch2_pij(2,4,124)=0 exch2_pij(3,4,124)=0 exch2_pij(4,4,124)=1 exch2_oi(4,124)=0 exch2_oj(4,124)=0 RETURN END SUBROUTINE W2_E2SETUP_125 C Topology for tile 125 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(125)=34 exch2_tNy(125)=51 exch2_tBasex(125)=136 exch2_tBasey(125)=408 exch2_txGlobalo(125)=137 exch2_tyGlobalo(125)=409 exch2_isWedge(125)=0 exch2_isNedge(125)=0 exch2_isEedge(125)=0 exch2_isSedge(125)=0 exch2_myFace(125)=1 exch2_mydNx(125)=510 exch2_mydNy(125)=510 exch2_nNeighbours(125)=4 exch2_neighbourId(1,125)=140 exch2_iLo(1,125)=0 exch2_iHi(1,125)=35 exch2_jLo(1,125)=52 exch2_jHi(1,125)=52 exch2_opposingSend(1,125)=3 exch2_pij(1,1,125)=1 exch2_pij(2,1,125)=0 exch2_pij(3,1,125)=0 exch2_pij(4,1,125)=1 exch2_oi(1,125)=0 exch2_oj(1,125)=0 exch2_neighbourId(2,125)=110 exch2_iLo(2,125)=0 exch2_iHi(2,125)=35 exch2_jLo(2,125)=0 exch2_jHi(2,125)=0 exch2_opposingSend(2,125)=1 exch2_pij(1,2,125)=1 exch2_pij(2,2,125)=0 exch2_pij(3,2,125)=0 exch2_pij(4,2,125)=1 exch2_oi(2,125)=0 exch2_oj(2,125)=0 exch2_neighbourId(3,125)=126 exch2_iLo(3,125)=35 exch2_iHi(3,125)=35 exch2_jLo(3,125)=0 exch2_jHi(3,125)=52 exch2_opposingSend(3,125)=4 exch2_pij(1,3,125)=1 exch2_pij(2,3,125)=0 exch2_pij(3,3,125)=0 exch2_pij(4,3,125)=1 exch2_oi(3,125)=0 exch2_oj(3,125)=0 exch2_neighbourId(4,125)=124 exch2_iLo(4,125)=0 exch2_iHi(4,125)=0 exch2_jLo(4,125)=0 exch2_jHi(4,125)=52 exch2_opposingSend(4,125)=3 exch2_pij(1,4,125)=1 exch2_pij(2,4,125)=0 exch2_pij(3,4,125)=0 exch2_pij(4,4,125)=1 exch2_oi(4,125)=0 exch2_oj(4,125)=0 RETURN END SUBROUTINE W2_E2SETUP_126 C Topology for tile 126 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(126)=34 exch2_tNy(126)=51 exch2_tBasex(126)=170 exch2_tBasey(126)=408 exch2_txGlobalo(126)=171 exch2_tyGlobalo(126)=409 exch2_isWedge(126)=0 exch2_isNedge(126)=0 exch2_isEedge(126)=0 exch2_isSedge(126)=0 exch2_myFace(126)=1 exch2_mydNx(126)=510 exch2_mydNy(126)=510 exch2_nNeighbours(126)=4 exch2_neighbourId(1,126)=141 exch2_iLo(1,126)=0 exch2_iHi(1,126)=35 exch2_jLo(1,126)=52 exch2_jHi(1,126)=52 exch2_opposingSend(1,126)=2 exch2_pij(1,1,126)=1 exch2_pij(2,1,126)=0 exch2_pij(3,1,126)=0 exch2_pij(4,1,126)=1 exch2_oi(1,126)=0 exch2_oj(1,126)=0 exch2_neighbourId(2,126)=111 exch2_iLo(2,126)=0 exch2_iHi(2,126)=35 exch2_jLo(2,126)=0 exch2_jHi(2,126)=0 exch2_opposingSend(2,126)=1 exch2_pij(1,2,126)=1 exch2_pij(2,2,126)=0 exch2_pij(3,2,126)=0 exch2_pij(4,2,126)=1 exch2_oi(2,126)=0 exch2_oj(2,126)=0 exch2_neighbourId(3,126)=127 exch2_iLo(3,126)=35 exch2_iHi(3,126)=35 exch2_jLo(3,126)=0 exch2_jHi(3,126)=52 exch2_opposingSend(3,126)=4 exch2_pij(1,3,126)=1 exch2_pij(2,3,126)=0 exch2_pij(3,3,126)=0 exch2_pij(4,3,126)=1 exch2_oi(3,126)=0 exch2_oj(3,126)=0 exch2_neighbourId(4,126)=125 exch2_iLo(4,126)=0 exch2_iHi(4,126)=0 exch2_jLo(4,126)=0 exch2_jHi(4,126)=52 exch2_opposingSend(4,126)=3 exch2_pij(1,4,126)=1 exch2_pij(2,4,126)=0 exch2_pij(3,4,126)=0 exch2_pij(4,4,126)=1 exch2_oi(4,126)=0 exch2_oj(4,126)=0 RETURN END SUBROUTINE W2_E2SETUP_127 C Topology for tile 127 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(127)=34 exch2_tNy(127)=51 exch2_tBasex(127)=204 exch2_tBasey(127)=408 exch2_txGlobalo(127)=205 exch2_tyGlobalo(127)=409 exch2_isWedge(127)=0 exch2_isNedge(127)=0 exch2_isEedge(127)=0 exch2_isSedge(127)=0 exch2_myFace(127)=1 exch2_mydNx(127)=510 exch2_mydNy(127)=510 exch2_nNeighbours(127)=4 exch2_neighbourId(1,127)=142 exch2_iLo(1,127)=0 exch2_iHi(1,127)=35 exch2_jLo(1,127)=52 exch2_jHi(1,127)=52 exch2_opposingSend(1,127)=2 exch2_pij(1,1,127)=1 exch2_pij(2,1,127)=0 exch2_pij(3,1,127)=0 exch2_pij(4,1,127)=1 exch2_oi(1,127)=0 exch2_oj(1,127)=0 exch2_neighbourId(2,127)=112 exch2_iLo(2,127)=0 exch2_iHi(2,127)=35 exch2_jLo(2,127)=0 exch2_jHi(2,127)=0 exch2_opposingSend(2,127)=1 exch2_pij(1,2,127)=1 exch2_pij(2,2,127)=0 exch2_pij(3,2,127)=0 exch2_pij(4,2,127)=1 exch2_oi(2,127)=0 exch2_oj(2,127)=0 exch2_neighbourId(3,127)=128 exch2_iLo(3,127)=35 exch2_iHi(3,127)=35 exch2_jLo(3,127)=0 exch2_jHi(3,127)=52 exch2_opposingSend(3,127)=4 exch2_pij(1,3,127)=1 exch2_pij(2,3,127)=0 exch2_pij(3,3,127)=0 exch2_pij(4,3,127)=1 exch2_oi(3,127)=0 exch2_oj(3,127)=0 exch2_neighbourId(4,127)=126 exch2_iLo(4,127)=0 exch2_iHi(4,127)=0 exch2_jLo(4,127)=0 exch2_jHi(4,127)=52 exch2_opposingSend(4,127)=3 exch2_pij(1,4,127)=1 exch2_pij(2,4,127)=0 exch2_pij(3,4,127)=0 exch2_pij(4,4,127)=1 exch2_oi(4,127)=0 exch2_oj(4,127)=0 RETURN END SUBROUTINE W2_E2SETUP_128 C Topology for tile 128 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(128)=34 exch2_tNy(128)=51 exch2_tBasex(128)=238 exch2_tBasey(128)=408 exch2_txGlobalo(128)=239 exch2_tyGlobalo(128)=409 exch2_isWedge(128)=0 exch2_isNedge(128)=0 exch2_isEedge(128)=0 exch2_isSedge(128)=0 exch2_myFace(128)=1 exch2_mydNx(128)=510 exch2_mydNy(128)=510 exch2_nNeighbours(128)=4 exch2_neighbourId(1,128)=143 exch2_iLo(1,128)=0 exch2_iHi(1,128)=35 exch2_jLo(1,128)=52 exch2_jHi(1,128)=52 exch2_opposingSend(1,128)=3 exch2_pij(1,1,128)=1 exch2_pij(2,1,128)=0 exch2_pij(3,1,128)=0 exch2_pij(4,1,128)=1 exch2_oi(1,128)=0 exch2_oj(1,128)=0 exch2_neighbourId(2,128)=113 exch2_iLo(2,128)=0 exch2_iHi(2,128)=35 exch2_jLo(2,128)=0 exch2_jHi(2,128)=0 exch2_opposingSend(2,128)=1 exch2_pij(1,2,128)=1 exch2_pij(2,2,128)=0 exch2_pij(3,2,128)=0 exch2_pij(4,2,128)=1 exch2_oi(2,128)=0 exch2_oj(2,128)=0 exch2_neighbourId(3,128)=129 exch2_iLo(3,128)=35 exch2_iHi(3,128)=35 exch2_jLo(3,128)=0 exch2_jHi(3,128)=52 exch2_opposingSend(3,128)=4 exch2_pij(1,3,128)=1 exch2_pij(2,3,128)=0 exch2_pij(3,3,128)=0 exch2_pij(4,3,128)=1 exch2_oi(3,128)=0 exch2_oj(3,128)=0 exch2_neighbourId(4,128)=127 exch2_iLo(4,128)=0 exch2_iHi(4,128)=0 exch2_jLo(4,128)=0 exch2_jHi(4,128)=52 exch2_opposingSend(4,128)=3 exch2_pij(1,4,128)=1 exch2_pij(2,4,128)=0 exch2_pij(3,4,128)=0 exch2_pij(4,4,128)=1 exch2_oi(4,128)=0 exch2_oj(4,128)=0 RETURN END SUBROUTINE W2_E2SETUP_129 C Topology for tile 129 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(129)=34 exch2_tNy(129)=51 exch2_tBasex(129)=272 exch2_tBasey(129)=408 exch2_txGlobalo(129)=273 exch2_tyGlobalo(129)=409 exch2_isWedge(129)=0 exch2_isNedge(129)=0 exch2_isEedge(129)=0 exch2_isSedge(129)=0 exch2_myFace(129)=1 exch2_mydNx(129)=510 exch2_mydNy(129)=510 exch2_nNeighbours(129)=4 exch2_neighbourId(1,129)=144 exch2_iLo(1,129)=0 exch2_iHi(1,129)=35 exch2_jLo(1,129)=52 exch2_jHi(1,129)=52 exch2_opposingSend(1,129)=2 exch2_pij(1,1,129)=1 exch2_pij(2,1,129)=0 exch2_pij(3,1,129)=0 exch2_pij(4,1,129)=1 exch2_oi(1,129)=0 exch2_oj(1,129)=0 exch2_neighbourId(2,129)=114 exch2_iLo(2,129)=0 exch2_iHi(2,129)=35 exch2_jLo(2,129)=0 exch2_jHi(2,129)=0 exch2_opposingSend(2,129)=1 exch2_pij(1,2,129)=1 exch2_pij(2,2,129)=0 exch2_pij(3,2,129)=0 exch2_pij(4,2,129)=1 exch2_oi(2,129)=0 exch2_oj(2,129)=0 exch2_neighbourId(3,129)=130 exch2_iLo(3,129)=35 exch2_iHi(3,129)=35 exch2_jLo(3,129)=0 exch2_jHi(3,129)=52 exch2_opposingSend(3,129)=4 exch2_pij(1,3,129)=1 exch2_pij(2,3,129)=0 exch2_pij(3,3,129)=0 exch2_pij(4,3,129)=1 exch2_oi(3,129)=0 exch2_oj(3,129)=0 exch2_neighbourId(4,129)=128 exch2_iLo(4,129)=0 exch2_iHi(4,129)=0 exch2_jLo(4,129)=0 exch2_jHi(4,129)=52 exch2_opposingSend(4,129)=3 exch2_pij(1,4,129)=1 exch2_pij(2,4,129)=0 exch2_pij(3,4,129)=0 exch2_pij(4,4,129)=1 exch2_oi(4,129)=0 exch2_oj(4,129)=0 RETURN END SUBROUTINE W2_E2SETUP_130 C Topology for tile 130 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(130)=34 exch2_tNy(130)=51 exch2_tBasex(130)=306 exch2_tBasey(130)=408 exch2_txGlobalo(130)=307 exch2_tyGlobalo(130)=409 exch2_isWedge(130)=0 exch2_isNedge(130)=0 exch2_isEedge(130)=0 exch2_isSedge(130)=0 exch2_myFace(130)=1 exch2_mydNx(130)=510 exch2_mydNy(130)=510 exch2_nNeighbours(130)=4 exch2_neighbourId(1,130)=145 exch2_iLo(1,130)=0 exch2_iHi(1,130)=35 exch2_jLo(1,130)=52 exch2_jHi(1,130)=52 exch2_opposingSend(1,130)=2 exch2_pij(1,1,130)=1 exch2_pij(2,1,130)=0 exch2_pij(3,1,130)=0 exch2_pij(4,1,130)=1 exch2_oi(1,130)=0 exch2_oj(1,130)=0 exch2_neighbourId(2,130)=115 exch2_iLo(2,130)=0 exch2_iHi(2,130)=35 exch2_jLo(2,130)=0 exch2_jHi(2,130)=0 exch2_opposingSend(2,130)=1 exch2_pij(1,2,130)=1 exch2_pij(2,2,130)=0 exch2_pij(3,2,130)=0 exch2_pij(4,2,130)=1 exch2_oi(2,130)=0 exch2_oj(2,130)=0 exch2_neighbourId(3,130)=131 exch2_iLo(3,130)=35 exch2_iHi(3,130)=35 exch2_jLo(3,130)=0 exch2_jHi(3,130)=52 exch2_opposingSend(3,130)=4 exch2_pij(1,3,130)=1 exch2_pij(2,3,130)=0 exch2_pij(3,3,130)=0 exch2_pij(4,3,130)=1 exch2_oi(3,130)=0 exch2_oj(3,130)=0 exch2_neighbourId(4,130)=129 exch2_iLo(4,130)=0 exch2_iHi(4,130)=0 exch2_jLo(4,130)=0 exch2_jHi(4,130)=52 exch2_opposingSend(4,130)=3 exch2_pij(1,4,130)=1 exch2_pij(2,4,130)=0 exch2_pij(3,4,130)=0 exch2_pij(4,4,130)=1 exch2_oi(4,130)=0 exch2_oj(4,130)=0 RETURN END SUBROUTINE W2_E2SETUP_131 C Topology for tile 131 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(131)=34 exch2_tNy(131)=51 exch2_tBasex(131)=340 exch2_tBasey(131)=408 exch2_txGlobalo(131)=341 exch2_tyGlobalo(131)=409 exch2_isWedge(131)=0 exch2_isNedge(131)=0 exch2_isEedge(131)=0 exch2_isSedge(131)=0 exch2_myFace(131)=1 exch2_mydNx(131)=510 exch2_mydNy(131)=510 exch2_nNeighbours(131)=4 exch2_neighbourId(1,131)=146 exch2_iLo(1,131)=0 exch2_iHi(1,131)=35 exch2_jLo(1,131)=52 exch2_jHi(1,131)=52 exch2_opposingSend(1,131)=3 exch2_pij(1,1,131)=1 exch2_pij(2,1,131)=0 exch2_pij(3,1,131)=0 exch2_pij(4,1,131)=1 exch2_oi(1,131)=0 exch2_oj(1,131)=0 exch2_neighbourId(2,131)=116 exch2_iLo(2,131)=0 exch2_iHi(2,131)=35 exch2_jLo(2,131)=0 exch2_jHi(2,131)=0 exch2_opposingSend(2,131)=1 exch2_pij(1,2,131)=1 exch2_pij(2,2,131)=0 exch2_pij(3,2,131)=0 exch2_pij(4,2,131)=1 exch2_oi(2,131)=0 exch2_oj(2,131)=0 exch2_neighbourId(3,131)=132 exch2_iLo(3,131)=35 exch2_iHi(3,131)=35 exch2_jLo(3,131)=0 exch2_jHi(3,131)=52 exch2_opposingSend(3,131)=4 exch2_pij(1,3,131)=1 exch2_pij(2,3,131)=0 exch2_pij(3,3,131)=0 exch2_pij(4,3,131)=1 exch2_oi(3,131)=0 exch2_oj(3,131)=0 exch2_neighbourId(4,131)=130 exch2_iLo(4,131)=0 exch2_iHi(4,131)=0 exch2_jLo(4,131)=0 exch2_jHi(4,131)=52 exch2_opposingSend(4,131)=3 exch2_pij(1,4,131)=1 exch2_pij(2,4,131)=0 exch2_pij(3,4,131)=0 exch2_pij(4,4,131)=1 exch2_oi(4,131)=0 exch2_oj(4,131)=0 RETURN END SUBROUTINE W2_E2SETUP_132 C Topology for tile 132 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(132)=34 exch2_tNy(132)=51 exch2_tBasex(132)=374 exch2_tBasey(132)=408 exch2_txGlobalo(132)=375 exch2_tyGlobalo(132)=409 exch2_isWedge(132)=0 exch2_isNedge(132)=0 exch2_isEedge(132)=0 exch2_isSedge(132)=0 exch2_myFace(132)=1 exch2_mydNx(132)=510 exch2_mydNy(132)=510 exch2_nNeighbours(132)=4 exch2_neighbourId(1,132)=147 exch2_iLo(1,132)=0 exch2_iHi(1,132)=35 exch2_jLo(1,132)=52 exch2_jHi(1,132)=52 exch2_opposingSend(1,132)=2 exch2_pij(1,1,132)=1 exch2_pij(2,1,132)=0 exch2_pij(3,1,132)=0 exch2_pij(4,1,132)=1 exch2_oi(1,132)=0 exch2_oj(1,132)=0 exch2_neighbourId(2,132)=117 exch2_iLo(2,132)=0 exch2_iHi(2,132)=35 exch2_jLo(2,132)=0 exch2_jHi(2,132)=0 exch2_opposingSend(2,132)=1 exch2_pij(1,2,132)=1 exch2_pij(2,2,132)=0 exch2_pij(3,2,132)=0 exch2_pij(4,2,132)=1 exch2_oi(2,132)=0 exch2_oj(2,132)=0 exch2_neighbourId(3,132)=133 exch2_iLo(3,132)=35 exch2_iHi(3,132)=35 exch2_jLo(3,132)=0 exch2_jHi(3,132)=52 exch2_opposingSend(3,132)=4 exch2_pij(1,3,132)=1 exch2_pij(2,3,132)=0 exch2_pij(3,3,132)=0 exch2_pij(4,3,132)=1 exch2_oi(3,132)=0 exch2_oj(3,132)=0 exch2_neighbourId(4,132)=131 exch2_iLo(4,132)=0 exch2_iHi(4,132)=0 exch2_jLo(4,132)=0 exch2_jHi(4,132)=52 exch2_opposingSend(4,132)=3 exch2_pij(1,4,132)=1 exch2_pij(2,4,132)=0 exch2_pij(3,4,132)=0 exch2_pij(4,4,132)=1 exch2_oi(4,132)=0 exch2_oj(4,132)=0 RETURN END SUBROUTINE W2_E2SETUP_133 C Topology for tile 133 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(133)=34 exch2_tNy(133)=51 exch2_tBasex(133)=408 exch2_tBasey(133)=408 exch2_txGlobalo(133)=409 exch2_tyGlobalo(133)=409 exch2_isWedge(133)=0 exch2_isNedge(133)=0 exch2_isEedge(133)=0 exch2_isSedge(133)=0 exch2_myFace(133)=1 exch2_mydNx(133)=510 exch2_mydNy(133)=510 exch2_nNeighbours(133)=4 exch2_neighbourId(1,133)=148 exch2_iLo(1,133)=0 exch2_iHi(1,133)=35 exch2_jLo(1,133)=52 exch2_jHi(1,133)=52 exch2_opposingSend(1,133)=2 exch2_pij(1,1,133)=1 exch2_pij(2,1,133)=0 exch2_pij(3,1,133)=0 exch2_pij(4,1,133)=1 exch2_oi(1,133)=0 exch2_oj(1,133)=0 exch2_neighbourId(2,133)=118 exch2_iLo(2,133)=0 exch2_iHi(2,133)=35 exch2_jLo(2,133)=0 exch2_jHi(2,133)=0 exch2_opposingSend(2,133)=1 exch2_pij(1,2,133)=1 exch2_pij(2,2,133)=0 exch2_pij(3,2,133)=0 exch2_pij(4,2,133)=1 exch2_oi(2,133)=0 exch2_oj(2,133)=0 exch2_neighbourId(3,133)=134 exch2_iLo(3,133)=35 exch2_iHi(3,133)=35 exch2_jLo(3,133)=0 exch2_jHi(3,133)=52 exch2_opposingSend(3,133)=4 exch2_pij(1,3,133)=1 exch2_pij(2,3,133)=0 exch2_pij(3,3,133)=0 exch2_pij(4,3,133)=1 exch2_oi(3,133)=0 exch2_oj(3,133)=0 exch2_neighbourId(4,133)=132 exch2_iLo(4,133)=0 exch2_iHi(4,133)=0 exch2_jLo(4,133)=0 exch2_jHi(4,133)=52 exch2_opposingSend(4,133)=3 exch2_pij(1,4,133)=1 exch2_pij(2,4,133)=0 exch2_pij(3,4,133)=0 exch2_pij(4,4,133)=1 exch2_oi(4,133)=0 exch2_oj(4,133)=0 RETURN END SUBROUTINE W2_E2SETUP_134 C Topology for tile 134 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(134)=34 exch2_tNy(134)=51 exch2_tBasex(134)=442 exch2_tBasey(134)=408 exch2_txGlobalo(134)=443 exch2_tyGlobalo(134)=409 exch2_isWedge(134)=0 exch2_isNedge(134)=0 exch2_isEedge(134)=0 exch2_isSedge(134)=0 exch2_myFace(134)=1 exch2_mydNx(134)=510 exch2_mydNy(134)=510 exch2_nNeighbours(134)=4 exch2_neighbourId(1,134)=149 exch2_iLo(1,134)=0 exch2_iHi(1,134)=35 exch2_jLo(1,134)=52 exch2_jHi(1,134)=52 exch2_opposingSend(1,134)=3 exch2_pij(1,1,134)=1 exch2_pij(2,1,134)=0 exch2_pij(3,1,134)=0 exch2_pij(4,1,134)=1 exch2_oi(1,134)=0 exch2_oj(1,134)=0 exch2_neighbourId(2,134)=119 exch2_iLo(2,134)=0 exch2_iHi(2,134)=35 exch2_jLo(2,134)=0 exch2_jHi(2,134)=0 exch2_opposingSend(2,134)=1 exch2_pij(1,2,134)=1 exch2_pij(2,2,134)=0 exch2_pij(3,2,134)=0 exch2_pij(4,2,134)=1 exch2_oi(2,134)=0 exch2_oj(2,134)=0 exch2_neighbourId(3,134)=135 exch2_iLo(3,134)=35 exch2_iHi(3,134)=35 exch2_jLo(3,134)=0 exch2_jHi(3,134)=52 exch2_opposingSend(3,134)=4 exch2_pij(1,3,134)=1 exch2_pij(2,3,134)=0 exch2_pij(3,3,134)=0 exch2_pij(4,3,134)=1 exch2_oi(3,134)=0 exch2_oj(3,134)=0 exch2_neighbourId(4,134)=133 exch2_iLo(4,134)=0 exch2_iHi(4,134)=0 exch2_jLo(4,134)=0 exch2_jHi(4,134)=52 exch2_opposingSend(4,134)=3 exch2_pij(1,4,134)=1 exch2_pij(2,4,134)=0 exch2_pij(3,4,134)=0 exch2_pij(4,4,134)=1 exch2_oi(4,134)=0 exch2_oj(4,134)=0 RETURN END SUBROUTINE W2_E2SETUP_135 C Topology for tile 135 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(135)=34 exch2_tNy(135)=51 exch2_tBasex(135)=476 exch2_tBasey(135)=408 exch2_txGlobalo(135)=477 exch2_tyGlobalo(135)=409 exch2_isWedge(135)=0 exch2_isNedge(135)=0 exch2_isEedge(135)=1 exch2_isSedge(135)=0 exch2_myFace(135)=1 exch2_mydNx(135)=510 exch2_mydNy(135)=510 exch2_nNeighbours(135)=4 exch2_neighbourId(1,135)=150 exch2_iLo(1,135)=0 exch2_iHi(1,135)=35 exch2_jLo(1,135)=52 exch2_jHi(1,135)=52 exch2_opposingSend(1,135)=2 exch2_pij(1,1,135)=1 exch2_pij(2,1,135)=0 exch2_pij(3,1,135)=0 exch2_pij(4,1,135)=1 exch2_oi(1,135)=0 exch2_oj(1,135)=0 exch2_neighbourId(2,135)=120 exch2_iLo(2,135)=0 exch2_iHi(2,135)=35 exch2_jLo(2,135)=0 exch2_jHi(2,135)=0 exch2_opposingSend(2,135)=1 exch2_pij(1,2,135)=1 exch2_pij(2,2,135)=0 exch2_pij(3,2,135)=0 exch2_pij(4,2,135)=1 exch2_oi(2,135)=0 exch2_oj(2,135)=0 exch2_neighbourId(3,135)=271 exch2_iLo(3,135)=35 exch2_iHi(3,135)=35 exch2_jLo(3,135)=0 exch2_jHi(3,135)=52 exch2_opposingSend(3,135)=4 exch2_pij(1,3,135)=1 exch2_pij(2,3,135)=0 exch2_pij(3,3,135)=0 exch2_pij(4,3,135)=1 exch2_oi(3,135)=510 exch2_oj(3,135)=0 exch2_neighbourId(4,135)=134 exch2_iLo(4,135)=0 exch2_iHi(4,135)=0 exch2_jLo(4,135)=0 exch2_jHi(4,135)=52 exch2_opposingSend(4,135)=3 exch2_pij(1,4,135)=1 exch2_pij(2,4,135)=0 exch2_pij(3,4,135)=0 exch2_pij(4,4,135)=1 exch2_oi(4,135)=0 exch2_oj(4,135)=0 RETURN END SUBROUTINE W2_E2SETUP_136 C Topology for tile 136 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(136)=34 exch2_tNy(136)=51 exch2_tBasex(136)=0 exch2_tBasey(136)=459 exch2_txGlobalo(136)=1 exch2_tyGlobalo(136)=460 exch2_isWedge(136)=1 exch2_isNedge(136)=1 exch2_isEedge(136)=0 exch2_isSedge(136)=0 exch2_myFace(136)=1 exch2_mydNx(136)=510 exch2_mydNy(136)=510 exch2_nNeighbours(136)=5 exch2_neighbourId(1,136)=436 exch2_iLo(1,136)=0 exch2_iHi(1,136)=35 exch2_jLo(1,136)=52 exch2_jHi(1,136)=52 exch2_opposingSend(1,136)=4 exch2_pij(1,1,136)=0 exch2_pij(2,1,136)=-1 exch2_pij(3,1,136)=1 exch2_pij(4,1,136)=0 exch2_oi(1,136)=511 exch2_oj(1,136)=510 exch2_neighbourId(2,136)=121 exch2_iLo(2,136)=0 exch2_iHi(2,136)=35 exch2_jLo(2,136)=0 exch2_jHi(2,136)=0 exch2_opposingSend(2,136)=1 exch2_pij(1,2,136)=1 exch2_pij(2,2,136)=0 exch2_pij(3,2,136)=0 exch2_pij(4,2,136)=1 exch2_oi(2,136)=0 exch2_oj(2,136)=0 exch2_neighbourId(3,136)=137 exch2_iLo(3,136)=35 exch2_iHi(3,136)=35 exch2_jLo(3,136)=0 exch2_jHi(3,136)=52 exch2_opposingSend(3,136)=5 exch2_pij(1,3,136)=1 exch2_pij(2,3,136)=0 exch2_pij(3,3,136)=0 exch2_pij(4,3,136)=1 exch2_oi(3,136)=0 exch2_oj(3,136)=0 exch2_neighbourId(4,136)=736 exch2_iLo(4,136)=0 exch2_iHi(4,136)=0 exch2_jLo(4,136)=17 exch2_jHi(4,136)=52 exch2_opposingSend(4,136)=1 exch2_pij(1,4,136)=0 exch2_pij(2,4,136)=1 exch2_pij(3,4,136)=-1 exch2_pij(4,4,136)=0 exch2_oi(4,136)=-510 exch2_oj(4,136)=511 exch2_neighbourId(5,136)=737 exch2_iLo(5,136)=0 exch2_iHi(5,136)=0 exch2_jLo(5,136)=0 exch2_jHi(5,136)=18 exch2_opposingSend(5,136)=2 exch2_pij(1,5,136)=0 exch2_pij(2,5,136)=1 exch2_pij(3,5,136)=-1 exch2_pij(4,5,136)=0 exch2_oi(5,136)=-510 exch2_oj(5,136)=511 RETURN END SUBROUTINE W2_E2SETUP_137 C Topology for tile 137 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(137)=34 exch2_tNy(137)=51 exch2_tBasex(137)=34 exch2_tBasey(137)=459 exch2_txGlobalo(137)=35 exch2_tyGlobalo(137)=460 exch2_isWedge(137)=0 exch2_isNedge(137)=1 exch2_isEedge(137)=0 exch2_isSedge(137)=0 exch2_myFace(137)=1 exch2_mydNx(137)=510 exch2_mydNy(137)=510 exch2_nNeighbours(137)=5 exch2_neighbourId(1,137)=421 exch2_iLo(1,137)=17 exch2_iHi(1,137)=35 exch2_jLo(1,137)=52 exch2_jHi(1,137)=52 exch2_opposingSend(1,137)=4 exch2_pij(1,1,137)=0 exch2_pij(2,1,137)=-1 exch2_pij(3,1,137)=1 exch2_pij(4,1,137)=0 exch2_oi(1,137)=511 exch2_oj(1,137)=510 exch2_neighbourId(2,137)=436 exch2_iLo(2,137)=0 exch2_iHi(2,137)=18 exch2_jLo(2,137)=52 exch2_jHi(2,137)=52 exch2_opposingSend(2,137)=5 exch2_pij(1,2,137)=0 exch2_pij(2,2,137)=-1 exch2_pij(3,2,137)=1 exch2_pij(4,2,137)=0 exch2_oi(2,137)=511 exch2_oj(2,137)=510 exch2_neighbourId(3,137)=122 exch2_iLo(3,137)=0 exch2_iHi(3,137)=35 exch2_jLo(3,137)=0 exch2_jHi(3,137)=0 exch2_opposingSend(3,137)=1 exch2_pij(1,3,137)=1 exch2_pij(2,3,137)=0 exch2_pij(3,3,137)=0 exch2_pij(4,3,137)=1 exch2_oi(3,137)=0 exch2_oj(3,137)=0 exch2_neighbourId(4,137)=138 exch2_iLo(4,137)=35 exch2_iHi(4,137)=35 exch2_jLo(4,137)=0 exch2_jHi(4,137)=52 exch2_opposingSend(4,137)=4 exch2_pij(1,4,137)=1 exch2_pij(2,4,137)=0 exch2_pij(3,4,137)=0 exch2_pij(4,4,137)=1 exch2_oi(4,137)=0 exch2_oj(4,137)=0 exch2_neighbourId(5,137)=136 exch2_iLo(5,137)=0 exch2_iHi(5,137)=0 exch2_jLo(5,137)=0 exch2_jHi(5,137)=52 exch2_opposingSend(5,137)=3 exch2_pij(1,5,137)=1 exch2_pij(2,5,137)=0 exch2_pij(3,5,137)=0 exch2_pij(4,5,137)=1 exch2_oi(5,137)=0 exch2_oj(5,137)=0 RETURN END SUBROUTINE W2_E2SETUP_138 C Topology for tile 138 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(138)=34 exch2_tNy(138)=51 exch2_tBasex(138)=68 exch2_tBasey(138)=459 exch2_txGlobalo(138)=69 exch2_tyGlobalo(138)=460 exch2_isWedge(138)=0 exch2_isNedge(138)=1 exch2_isEedge(138)=0 exch2_isSedge(138)=0 exch2_myFace(138)=1 exch2_mydNx(138)=510 exch2_mydNy(138)=510 exch2_nNeighbours(138)=4 exch2_neighbourId(1,138)=421 exch2_iLo(1,138)=0 exch2_iHi(1,138)=35 exch2_jLo(1,138)=52 exch2_jHi(1,138)=52 exch2_opposingSend(1,138)=5 exch2_pij(1,1,138)=0 exch2_pij(2,1,138)=-1 exch2_pij(3,1,138)=1 exch2_pij(4,1,138)=0 exch2_oi(1,138)=511 exch2_oj(1,138)=510 exch2_neighbourId(2,138)=123 exch2_iLo(2,138)=0 exch2_iHi(2,138)=35 exch2_jLo(2,138)=0 exch2_jHi(2,138)=0 exch2_opposingSend(2,138)=1 exch2_pij(1,2,138)=1 exch2_pij(2,2,138)=0 exch2_pij(3,2,138)=0 exch2_pij(4,2,138)=1 exch2_oi(2,138)=0 exch2_oj(2,138)=0 exch2_neighbourId(3,138)=139 exch2_iLo(3,138)=35 exch2_iHi(3,138)=35 exch2_jLo(3,138)=0 exch2_jHi(3,138)=52 exch2_opposingSend(3,138)=4 exch2_pij(1,3,138)=1 exch2_pij(2,3,138)=0 exch2_pij(3,3,138)=0 exch2_pij(4,3,138)=1 exch2_oi(3,138)=0 exch2_oj(3,138)=0 exch2_neighbourId(4,138)=137 exch2_iLo(4,138)=0 exch2_iHi(4,138)=0 exch2_jLo(4,138)=0 exch2_jHi(4,138)=52 exch2_opposingSend(4,138)=4 exch2_pij(1,4,138)=1 exch2_pij(2,4,138)=0 exch2_pij(3,4,138)=0 exch2_pij(4,4,138)=1 exch2_oi(4,138)=0 exch2_oj(4,138)=0 RETURN END SUBROUTINE W2_E2SETUP_139 C Topology for tile 139 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(139)=34 exch2_tNy(139)=51 exch2_tBasex(139)=102 exch2_tBasey(139)=459 exch2_txGlobalo(139)=103 exch2_tyGlobalo(139)=460 exch2_isWedge(139)=0 exch2_isNedge(139)=1 exch2_isEedge(139)=0 exch2_isSedge(139)=0 exch2_myFace(139)=1 exch2_mydNx(139)=510 exch2_mydNy(139)=510 exch2_nNeighbours(139)=4 exch2_neighbourId(1,139)=406 exch2_iLo(1,139)=0 exch2_iHi(1,139)=35 exch2_jLo(1,139)=52 exch2_jHi(1,139)=52 exch2_opposingSend(1,139)=4 exch2_pij(1,1,139)=0 exch2_pij(2,1,139)=-1 exch2_pij(3,1,139)=1 exch2_pij(4,1,139)=0 exch2_oi(1,139)=511 exch2_oj(1,139)=510 exch2_neighbourId(2,139)=124 exch2_iLo(2,139)=0 exch2_iHi(2,139)=35 exch2_jLo(2,139)=0 exch2_jHi(2,139)=0 exch2_opposingSend(2,139)=1 exch2_pij(1,2,139)=1 exch2_pij(2,2,139)=0 exch2_pij(3,2,139)=0 exch2_pij(4,2,139)=1 exch2_oi(2,139)=0 exch2_oj(2,139)=0 exch2_neighbourId(3,139)=140 exch2_iLo(3,139)=35 exch2_iHi(3,139)=35 exch2_jLo(3,139)=0 exch2_jHi(3,139)=52 exch2_opposingSend(3,139)=5 exch2_pij(1,3,139)=1 exch2_pij(2,3,139)=0 exch2_pij(3,3,139)=0 exch2_pij(4,3,139)=1 exch2_oi(3,139)=0 exch2_oj(3,139)=0 exch2_neighbourId(4,139)=138 exch2_iLo(4,139)=0 exch2_iHi(4,139)=0 exch2_jLo(4,139)=0 exch2_jHi(4,139)=52 exch2_opposingSend(4,139)=3 exch2_pij(1,4,139)=1 exch2_pij(2,4,139)=0 exch2_pij(3,4,139)=0 exch2_pij(4,4,139)=1 exch2_oi(4,139)=0 exch2_oj(4,139)=0 RETURN END SUBROUTINE W2_E2SETUP_140 C Topology for tile 140 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(140)=34 exch2_tNy(140)=51 exch2_tBasex(140)=136 exch2_tBasey(140)=459 exch2_txGlobalo(140)=137 exch2_tyGlobalo(140)=460 exch2_isWedge(140)=0 exch2_isNedge(140)=1 exch2_isEedge(140)=0 exch2_isSedge(140)=0 exch2_myFace(140)=1 exch2_mydNx(140)=510 exch2_mydNy(140)=510 exch2_nNeighbours(140)=5 exch2_neighbourId(1,140)=391 exch2_iLo(1,140)=17 exch2_iHi(1,140)=35 exch2_jLo(1,140)=52 exch2_jHi(1,140)=52 exch2_opposingSend(1,140)=4 exch2_pij(1,1,140)=0 exch2_pij(2,1,140)=-1 exch2_pij(3,1,140)=1 exch2_pij(4,1,140)=0 exch2_oi(1,140)=511 exch2_oj(1,140)=510 exch2_neighbourId(2,140)=406 exch2_iLo(2,140)=0 exch2_iHi(2,140)=18 exch2_jLo(2,140)=52 exch2_jHi(2,140)=52 exch2_opposingSend(2,140)=5 exch2_pij(1,2,140)=0 exch2_pij(2,2,140)=-1 exch2_pij(3,2,140)=1 exch2_pij(4,2,140)=0 exch2_oi(2,140)=511 exch2_oj(2,140)=510 exch2_neighbourId(3,140)=125 exch2_iLo(3,140)=0 exch2_iHi(3,140)=35 exch2_jLo(3,140)=0 exch2_jHi(3,140)=0 exch2_opposingSend(3,140)=1 exch2_pij(1,3,140)=1 exch2_pij(2,3,140)=0 exch2_pij(3,3,140)=0 exch2_pij(4,3,140)=1 exch2_oi(3,140)=0 exch2_oj(3,140)=0 exch2_neighbourId(4,140)=141 exch2_iLo(4,140)=35 exch2_iHi(4,140)=35 exch2_jLo(4,140)=0 exch2_jHi(4,140)=52 exch2_opposingSend(4,140)=4 exch2_pij(1,4,140)=1 exch2_pij(2,4,140)=0 exch2_pij(3,4,140)=0 exch2_pij(4,4,140)=1 exch2_oi(4,140)=0 exch2_oj(4,140)=0 exch2_neighbourId(5,140)=139 exch2_iLo(5,140)=0 exch2_iHi(5,140)=0 exch2_jLo(5,140)=0 exch2_jHi(5,140)=52 exch2_opposingSend(5,140)=3 exch2_pij(1,5,140)=1 exch2_pij(2,5,140)=0 exch2_pij(3,5,140)=0 exch2_pij(4,5,140)=1 exch2_oi(5,140)=0 exch2_oj(5,140)=0 RETURN END SUBROUTINE W2_E2SETUP_141 C Topology for tile 141 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(141)=34 exch2_tNy(141)=51 exch2_tBasex(141)=170 exch2_tBasey(141)=459 exch2_txGlobalo(141)=171 exch2_tyGlobalo(141)=460 exch2_isWedge(141)=0 exch2_isNedge(141)=1 exch2_isEedge(141)=0 exch2_isSedge(141)=0 exch2_myFace(141)=1 exch2_mydNx(141)=510 exch2_mydNy(141)=510 exch2_nNeighbours(141)=4 exch2_neighbourId(1,141)=391 exch2_iLo(1,141)=0 exch2_iHi(1,141)=35 exch2_jLo(1,141)=52 exch2_jHi(1,141)=52 exch2_opposingSend(1,141)=5 exch2_pij(1,1,141)=0 exch2_pij(2,1,141)=-1 exch2_pij(3,1,141)=1 exch2_pij(4,1,141)=0 exch2_oi(1,141)=511 exch2_oj(1,141)=510 exch2_neighbourId(2,141)=126 exch2_iLo(2,141)=0 exch2_iHi(2,141)=35 exch2_jLo(2,141)=0 exch2_jHi(2,141)=0 exch2_opposingSend(2,141)=1 exch2_pij(1,2,141)=1 exch2_pij(2,2,141)=0 exch2_pij(3,2,141)=0 exch2_pij(4,2,141)=1 exch2_oi(2,141)=0 exch2_oj(2,141)=0 exch2_neighbourId(3,141)=142 exch2_iLo(3,141)=35 exch2_iHi(3,141)=35 exch2_jLo(3,141)=0 exch2_jHi(3,141)=52 exch2_opposingSend(3,141)=4 exch2_pij(1,3,141)=1 exch2_pij(2,3,141)=0 exch2_pij(3,3,141)=0 exch2_pij(4,3,141)=1 exch2_oi(3,141)=0 exch2_oj(3,141)=0 exch2_neighbourId(4,141)=140 exch2_iLo(4,141)=0 exch2_iHi(4,141)=0 exch2_jLo(4,141)=0 exch2_jHi(4,141)=52 exch2_opposingSend(4,141)=4 exch2_pij(1,4,141)=1 exch2_pij(2,4,141)=0 exch2_pij(3,4,141)=0 exch2_pij(4,4,141)=1 exch2_oi(4,141)=0 exch2_oj(4,141)=0 RETURN END SUBROUTINE W2_E2SETUP_142 C Topology for tile 142 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(142)=34 exch2_tNy(142)=51 exch2_tBasex(142)=204 exch2_tBasey(142)=459 exch2_txGlobalo(142)=205 exch2_tyGlobalo(142)=460 exch2_isWedge(142)=0 exch2_isNedge(142)=1 exch2_isEedge(142)=0 exch2_isSedge(142)=0 exch2_myFace(142)=1 exch2_mydNx(142)=510 exch2_mydNy(142)=510 exch2_nNeighbours(142)=4 exch2_neighbourId(1,142)=376 exch2_iLo(1,142)=0 exch2_iHi(1,142)=35 exch2_jLo(1,142)=52 exch2_jHi(1,142)=52 exch2_opposingSend(1,142)=4 exch2_pij(1,1,142)=0 exch2_pij(2,1,142)=-1 exch2_pij(3,1,142)=1 exch2_pij(4,1,142)=0 exch2_oi(1,142)=511 exch2_oj(1,142)=510 exch2_neighbourId(2,142)=127 exch2_iLo(2,142)=0 exch2_iHi(2,142)=35 exch2_jLo(2,142)=0 exch2_jHi(2,142)=0 exch2_opposingSend(2,142)=1 exch2_pij(1,2,142)=1 exch2_pij(2,2,142)=0 exch2_pij(3,2,142)=0 exch2_pij(4,2,142)=1 exch2_oi(2,142)=0 exch2_oj(2,142)=0 exch2_neighbourId(3,142)=143 exch2_iLo(3,142)=35 exch2_iHi(3,142)=35 exch2_jLo(3,142)=0 exch2_jHi(3,142)=52 exch2_opposingSend(3,142)=5 exch2_pij(1,3,142)=1 exch2_pij(2,3,142)=0 exch2_pij(3,3,142)=0 exch2_pij(4,3,142)=1 exch2_oi(3,142)=0 exch2_oj(3,142)=0 exch2_neighbourId(4,142)=141 exch2_iLo(4,142)=0 exch2_iHi(4,142)=0 exch2_jLo(4,142)=0 exch2_jHi(4,142)=52 exch2_opposingSend(4,142)=3 exch2_pij(1,4,142)=1 exch2_pij(2,4,142)=0 exch2_pij(3,4,142)=0 exch2_pij(4,4,142)=1 exch2_oi(4,142)=0 exch2_oj(4,142)=0 RETURN END SUBROUTINE W2_E2SETUP_143 C Topology for tile 143 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(143)=34 exch2_tNy(143)=51 exch2_tBasex(143)=238 exch2_tBasey(143)=459 exch2_txGlobalo(143)=239 exch2_tyGlobalo(143)=460 exch2_isWedge(143)=0 exch2_isNedge(143)=1 exch2_isEedge(143)=0 exch2_isSedge(143)=0 exch2_myFace(143)=1 exch2_mydNx(143)=510 exch2_mydNy(143)=510 exch2_nNeighbours(143)=5 exch2_neighbourId(1,143)=361 exch2_iLo(1,143)=17 exch2_iHi(1,143)=35 exch2_jLo(1,143)=52 exch2_jHi(1,143)=52 exch2_opposingSend(1,143)=4 exch2_pij(1,1,143)=0 exch2_pij(2,1,143)=-1 exch2_pij(3,1,143)=1 exch2_pij(4,1,143)=0 exch2_oi(1,143)=511 exch2_oj(1,143)=510 exch2_neighbourId(2,143)=376 exch2_iLo(2,143)=0 exch2_iHi(2,143)=18 exch2_jLo(2,143)=52 exch2_jHi(2,143)=52 exch2_opposingSend(2,143)=5 exch2_pij(1,2,143)=0 exch2_pij(2,2,143)=-1 exch2_pij(3,2,143)=1 exch2_pij(4,2,143)=0 exch2_oi(2,143)=511 exch2_oj(2,143)=510 exch2_neighbourId(3,143)=128 exch2_iLo(3,143)=0 exch2_iHi(3,143)=35 exch2_jLo(3,143)=0 exch2_jHi(3,143)=0 exch2_opposingSend(3,143)=1 exch2_pij(1,3,143)=1 exch2_pij(2,3,143)=0 exch2_pij(3,3,143)=0 exch2_pij(4,3,143)=1 exch2_oi(3,143)=0 exch2_oj(3,143)=0 exch2_neighbourId(4,143)=144 exch2_iLo(4,143)=35 exch2_iHi(4,143)=35 exch2_jLo(4,143)=0 exch2_jHi(4,143)=52 exch2_opposingSend(4,143)=4 exch2_pij(1,4,143)=1 exch2_pij(2,4,143)=0 exch2_pij(3,4,143)=0 exch2_pij(4,4,143)=1 exch2_oi(4,143)=0 exch2_oj(4,143)=0 exch2_neighbourId(5,143)=142 exch2_iLo(5,143)=0 exch2_iHi(5,143)=0 exch2_jLo(5,143)=0 exch2_jHi(5,143)=52 exch2_opposingSend(5,143)=3 exch2_pij(1,5,143)=1 exch2_pij(2,5,143)=0 exch2_pij(3,5,143)=0 exch2_pij(4,5,143)=1 exch2_oi(5,143)=0 exch2_oj(5,143)=0 RETURN END SUBROUTINE W2_E2SETUP_144 C Topology for tile 144 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(144)=34 exch2_tNy(144)=51 exch2_tBasex(144)=272 exch2_tBasey(144)=459 exch2_txGlobalo(144)=273 exch2_tyGlobalo(144)=460 exch2_isWedge(144)=0 exch2_isNedge(144)=1 exch2_isEedge(144)=0 exch2_isSedge(144)=0 exch2_myFace(144)=1 exch2_mydNx(144)=510 exch2_mydNy(144)=510 exch2_nNeighbours(144)=4 exch2_neighbourId(1,144)=361 exch2_iLo(1,144)=0 exch2_iHi(1,144)=35 exch2_jLo(1,144)=52 exch2_jHi(1,144)=52 exch2_opposingSend(1,144)=5 exch2_pij(1,1,144)=0 exch2_pij(2,1,144)=-1 exch2_pij(3,1,144)=1 exch2_pij(4,1,144)=0 exch2_oi(1,144)=511 exch2_oj(1,144)=510 exch2_neighbourId(2,144)=129 exch2_iLo(2,144)=0 exch2_iHi(2,144)=35 exch2_jLo(2,144)=0 exch2_jHi(2,144)=0 exch2_opposingSend(2,144)=1 exch2_pij(1,2,144)=1 exch2_pij(2,2,144)=0 exch2_pij(3,2,144)=0 exch2_pij(4,2,144)=1 exch2_oi(2,144)=0 exch2_oj(2,144)=0 exch2_neighbourId(3,144)=145 exch2_iLo(3,144)=35 exch2_iHi(3,144)=35 exch2_jLo(3,144)=0 exch2_jHi(3,144)=52 exch2_opposingSend(3,144)=4 exch2_pij(1,3,144)=1 exch2_pij(2,3,144)=0 exch2_pij(3,3,144)=0 exch2_pij(4,3,144)=1 exch2_oi(3,144)=0 exch2_oj(3,144)=0 exch2_neighbourId(4,144)=143 exch2_iLo(4,144)=0 exch2_iHi(4,144)=0 exch2_jLo(4,144)=0 exch2_jHi(4,144)=52 exch2_opposingSend(4,144)=4 exch2_pij(1,4,144)=1 exch2_pij(2,4,144)=0 exch2_pij(3,4,144)=0 exch2_pij(4,4,144)=1 exch2_oi(4,144)=0 exch2_oj(4,144)=0 RETURN END SUBROUTINE W2_E2SETUP_145 C Topology for tile 145 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(145)=34 exch2_tNy(145)=51 exch2_tBasex(145)=306 exch2_tBasey(145)=459 exch2_txGlobalo(145)=307 exch2_tyGlobalo(145)=460 exch2_isWedge(145)=0 exch2_isNedge(145)=1 exch2_isEedge(145)=0 exch2_isSedge(145)=0 exch2_myFace(145)=1 exch2_mydNx(145)=510 exch2_mydNy(145)=510 exch2_nNeighbours(145)=4 exch2_neighbourId(1,145)=346 exch2_iLo(1,145)=0 exch2_iHi(1,145)=35 exch2_jLo(1,145)=52 exch2_jHi(1,145)=52 exch2_opposingSend(1,145)=4 exch2_pij(1,1,145)=0 exch2_pij(2,1,145)=-1 exch2_pij(3,1,145)=1 exch2_pij(4,1,145)=0 exch2_oi(1,145)=511 exch2_oj(1,145)=510 exch2_neighbourId(2,145)=130 exch2_iLo(2,145)=0 exch2_iHi(2,145)=35 exch2_jLo(2,145)=0 exch2_jHi(2,145)=0 exch2_opposingSend(2,145)=1 exch2_pij(1,2,145)=1 exch2_pij(2,2,145)=0 exch2_pij(3,2,145)=0 exch2_pij(4,2,145)=1 exch2_oi(2,145)=0 exch2_oj(2,145)=0 exch2_neighbourId(3,145)=146 exch2_iLo(3,145)=35 exch2_iHi(3,145)=35 exch2_jLo(3,145)=0 exch2_jHi(3,145)=52 exch2_opposingSend(3,145)=5 exch2_pij(1,3,145)=1 exch2_pij(2,3,145)=0 exch2_pij(3,3,145)=0 exch2_pij(4,3,145)=1 exch2_oi(3,145)=0 exch2_oj(3,145)=0 exch2_neighbourId(4,145)=144 exch2_iLo(4,145)=0 exch2_iHi(4,145)=0 exch2_jLo(4,145)=0 exch2_jHi(4,145)=52 exch2_opposingSend(4,145)=3 exch2_pij(1,4,145)=1 exch2_pij(2,4,145)=0 exch2_pij(3,4,145)=0 exch2_pij(4,4,145)=1 exch2_oi(4,145)=0 exch2_oj(4,145)=0 RETURN END SUBROUTINE W2_E2SETUP_146 C Topology for tile 146 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(146)=34 exch2_tNy(146)=51 exch2_tBasex(146)=340 exch2_tBasey(146)=459 exch2_txGlobalo(146)=341 exch2_tyGlobalo(146)=460 exch2_isWedge(146)=0 exch2_isNedge(146)=1 exch2_isEedge(146)=0 exch2_isSedge(146)=0 exch2_myFace(146)=1 exch2_mydNx(146)=510 exch2_mydNy(146)=510 exch2_nNeighbours(146)=5 exch2_neighbourId(1,146)=331 exch2_iLo(1,146)=17 exch2_iHi(1,146)=35 exch2_jLo(1,146)=52 exch2_jHi(1,146)=52 exch2_opposingSend(1,146)=4 exch2_pij(1,1,146)=0 exch2_pij(2,1,146)=-1 exch2_pij(3,1,146)=1 exch2_pij(4,1,146)=0 exch2_oi(1,146)=511 exch2_oj(1,146)=510 exch2_neighbourId(2,146)=346 exch2_iLo(2,146)=0 exch2_iHi(2,146)=18 exch2_jLo(2,146)=52 exch2_jHi(2,146)=52 exch2_opposingSend(2,146)=5 exch2_pij(1,2,146)=0 exch2_pij(2,2,146)=-1 exch2_pij(3,2,146)=1 exch2_pij(4,2,146)=0 exch2_oi(2,146)=511 exch2_oj(2,146)=510 exch2_neighbourId(3,146)=131 exch2_iLo(3,146)=0 exch2_iHi(3,146)=35 exch2_jLo(3,146)=0 exch2_jHi(3,146)=0 exch2_opposingSend(3,146)=1 exch2_pij(1,3,146)=1 exch2_pij(2,3,146)=0 exch2_pij(3,3,146)=0 exch2_pij(4,3,146)=1 exch2_oi(3,146)=0 exch2_oj(3,146)=0 exch2_neighbourId(4,146)=147 exch2_iLo(4,146)=35 exch2_iHi(4,146)=35 exch2_jLo(4,146)=0 exch2_jHi(4,146)=52 exch2_opposingSend(4,146)=4 exch2_pij(1,4,146)=1 exch2_pij(2,4,146)=0 exch2_pij(3,4,146)=0 exch2_pij(4,4,146)=1 exch2_oi(4,146)=0 exch2_oj(4,146)=0 exch2_neighbourId(5,146)=145 exch2_iLo(5,146)=0 exch2_iHi(5,146)=0 exch2_jLo(5,146)=0 exch2_jHi(5,146)=52 exch2_opposingSend(5,146)=3 exch2_pij(1,5,146)=1 exch2_pij(2,5,146)=0 exch2_pij(3,5,146)=0 exch2_pij(4,5,146)=1 exch2_oi(5,146)=0 exch2_oj(5,146)=0 RETURN END SUBROUTINE W2_E2SETUP_147 C Topology for tile 147 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(147)=34 exch2_tNy(147)=51 exch2_tBasex(147)=374 exch2_tBasey(147)=459 exch2_txGlobalo(147)=375 exch2_tyGlobalo(147)=460 exch2_isWedge(147)=0 exch2_isNedge(147)=1 exch2_isEedge(147)=0 exch2_isSedge(147)=0 exch2_myFace(147)=1 exch2_mydNx(147)=510 exch2_mydNy(147)=510 exch2_nNeighbours(147)=4 exch2_neighbourId(1,147)=331 exch2_iLo(1,147)=0 exch2_iHi(1,147)=35 exch2_jLo(1,147)=52 exch2_jHi(1,147)=52 exch2_opposingSend(1,147)=5 exch2_pij(1,1,147)=0 exch2_pij(2,1,147)=-1 exch2_pij(3,1,147)=1 exch2_pij(4,1,147)=0 exch2_oi(1,147)=511 exch2_oj(1,147)=510 exch2_neighbourId(2,147)=132 exch2_iLo(2,147)=0 exch2_iHi(2,147)=35 exch2_jLo(2,147)=0 exch2_jHi(2,147)=0 exch2_opposingSend(2,147)=1 exch2_pij(1,2,147)=1 exch2_pij(2,2,147)=0 exch2_pij(3,2,147)=0 exch2_pij(4,2,147)=1 exch2_oi(2,147)=0 exch2_oj(2,147)=0 exch2_neighbourId(3,147)=148 exch2_iLo(3,147)=35 exch2_iHi(3,147)=35 exch2_jLo(3,147)=0 exch2_jHi(3,147)=52 exch2_opposingSend(3,147)=4 exch2_pij(1,3,147)=1 exch2_pij(2,3,147)=0 exch2_pij(3,3,147)=0 exch2_pij(4,3,147)=1 exch2_oi(3,147)=0 exch2_oj(3,147)=0 exch2_neighbourId(4,147)=146 exch2_iLo(4,147)=0 exch2_iHi(4,147)=0 exch2_jLo(4,147)=0 exch2_jHi(4,147)=52 exch2_opposingSend(4,147)=4 exch2_pij(1,4,147)=1 exch2_pij(2,4,147)=0 exch2_pij(3,4,147)=0 exch2_pij(4,4,147)=1 exch2_oi(4,147)=0 exch2_oj(4,147)=0 RETURN END SUBROUTINE W2_E2SETUP_148 C Topology for tile 148 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(148)=34 exch2_tNy(148)=51 exch2_tBasex(148)=408 exch2_tBasey(148)=459 exch2_txGlobalo(148)=409 exch2_tyGlobalo(148)=460 exch2_isWedge(148)=0 exch2_isNedge(148)=1 exch2_isEedge(148)=0 exch2_isSedge(148)=0 exch2_myFace(148)=1 exch2_mydNx(148)=510 exch2_mydNy(148)=510 exch2_nNeighbours(148)=4 exch2_neighbourId(1,148)=316 exch2_iLo(1,148)=0 exch2_iHi(1,148)=35 exch2_jLo(1,148)=52 exch2_jHi(1,148)=52 exch2_opposingSend(1,148)=4 exch2_pij(1,1,148)=0 exch2_pij(2,1,148)=-1 exch2_pij(3,1,148)=1 exch2_pij(4,1,148)=0 exch2_oi(1,148)=511 exch2_oj(1,148)=510 exch2_neighbourId(2,148)=133 exch2_iLo(2,148)=0 exch2_iHi(2,148)=35 exch2_jLo(2,148)=0 exch2_jHi(2,148)=0 exch2_opposingSend(2,148)=1 exch2_pij(1,2,148)=1 exch2_pij(2,2,148)=0 exch2_pij(3,2,148)=0 exch2_pij(4,2,148)=1 exch2_oi(2,148)=0 exch2_oj(2,148)=0 exch2_neighbourId(3,148)=149 exch2_iLo(3,148)=35 exch2_iHi(3,148)=35 exch2_jLo(3,148)=0 exch2_jHi(3,148)=52 exch2_opposingSend(3,148)=5 exch2_pij(1,3,148)=1 exch2_pij(2,3,148)=0 exch2_pij(3,3,148)=0 exch2_pij(4,3,148)=1 exch2_oi(3,148)=0 exch2_oj(3,148)=0 exch2_neighbourId(4,148)=147 exch2_iLo(4,148)=0 exch2_iHi(4,148)=0 exch2_jLo(4,148)=0 exch2_jHi(4,148)=52 exch2_opposingSend(4,148)=3 exch2_pij(1,4,148)=1 exch2_pij(2,4,148)=0 exch2_pij(3,4,148)=0 exch2_pij(4,4,148)=1 exch2_oi(4,148)=0 exch2_oj(4,148)=0 RETURN END SUBROUTINE W2_E2SETUP_149 C Topology for tile 149 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(149)=34 exch2_tNy(149)=51 exch2_tBasex(149)=442 exch2_tBasey(149)=459 exch2_txGlobalo(149)=443 exch2_tyGlobalo(149)=460 exch2_isWedge(149)=0 exch2_isNedge(149)=1 exch2_isEedge(149)=0 exch2_isSedge(149)=0 exch2_myFace(149)=1 exch2_mydNx(149)=510 exch2_mydNy(149)=510 exch2_nNeighbours(149)=5 exch2_neighbourId(1,149)=301 exch2_iLo(1,149)=17 exch2_iHi(1,149)=35 exch2_jLo(1,149)=52 exch2_jHi(1,149)=52 exch2_opposingSend(1,149)=4 exch2_pij(1,1,149)=0 exch2_pij(2,1,149)=-1 exch2_pij(3,1,149)=1 exch2_pij(4,1,149)=0 exch2_oi(1,149)=511 exch2_oj(1,149)=510 exch2_neighbourId(2,149)=316 exch2_iLo(2,149)=0 exch2_iHi(2,149)=18 exch2_jLo(2,149)=52 exch2_jHi(2,149)=52 exch2_opposingSend(2,149)=5 exch2_pij(1,2,149)=0 exch2_pij(2,2,149)=-1 exch2_pij(3,2,149)=1 exch2_pij(4,2,149)=0 exch2_oi(2,149)=511 exch2_oj(2,149)=510 exch2_neighbourId(3,149)=134 exch2_iLo(3,149)=0 exch2_iHi(3,149)=35 exch2_jLo(3,149)=0 exch2_jHi(3,149)=0 exch2_opposingSend(3,149)=1 exch2_pij(1,3,149)=1 exch2_pij(2,3,149)=0 exch2_pij(3,3,149)=0 exch2_pij(4,3,149)=1 exch2_oi(3,149)=0 exch2_oj(3,149)=0 exch2_neighbourId(4,149)=150 exch2_iLo(4,149)=35 exch2_iHi(4,149)=35 exch2_jLo(4,149)=0 exch2_jHi(4,149)=52 exch2_opposingSend(4,149)=4 exch2_pij(1,4,149)=1 exch2_pij(2,4,149)=0 exch2_pij(3,4,149)=0 exch2_pij(4,4,149)=1 exch2_oi(4,149)=0 exch2_oj(4,149)=0 exch2_neighbourId(5,149)=148 exch2_iLo(5,149)=0 exch2_iHi(5,149)=0 exch2_jLo(5,149)=0 exch2_jHi(5,149)=52 exch2_opposingSend(5,149)=3 exch2_pij(1,5,149)=1 exch2_pij(2,5,149)=0 exch2_pij(3,5,149)=0 exch2_pij(4,5,149)=1 exch2_oi(5,149)=0 exch2_oj(5,149)=0 RETURN END SUBROUTINE W2_E2SETUP_150 C Topology for tile 150 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(150)=34 exch2_tNy(150)=51 exch2_tBasex(150)=476 exch2_tBasey(150)=459 exch2_txGlobalo(150)=477 exch2_tyGlobalo(150)=460 exch2_isWedge(150)=0 exch2_isNedge(150)=1 exch2_isEedge(150)=1 exch2_isSedge(150)=0 exch2_myFace(150)=1 exch2_mydNx(150)=510 exch2_mydNy(150)=510 exch2_nNeighbours(150)=4 exch2_neighbourId(1,150)=301 exch2_iLo(1,150)=0 exch2_iHi(1,150)=35 exch2_jLo(1,150)=52 exch2_jHi(1,150)=52 exch2_opposingSend(1,150)=5 exch2_pij(1,1,150)=0 exch2_pij(2,1,150)=-1 exch2_pij(3,1,150)=1 exch2_pij(4,1,150)=0 exch2_oi(1,150)=511 exch2_oj(1,150)=510 exch2_neighbourId(2,150)=135 exch2_iLo(2,150)=0 exch2_iHi(2,150)=35 exch2_jLo(2,150)=0 exch2_jHi(2,150)=0 exch2_opposingSend(2,150)=1 exch2_pij(1,2,150)=1 exch2_pij(2,2,150)=0 exch2_pij(3,2,150)=0 exch2_pij(4,2,150)=1 exch2_oi(2,150)=0 exch2_oj(2,150)=0 exch2_neighbourId(3,150)=286 exch2_iLo(3,150)=35 exch2_iHi(3,150)=35 exch2_jLo(3,150)=0 exch2_jHi(3,150)=52 exch2_opposingSend(3,150)=4 exch2_pij(1,3,150)=1 exch2_pij(2,3,150)=0 exch2_pij(3,3,150)=0 exch2_pij(4,3,150)=1 exch2_oi(3,150)=510 exch2_oj(3,150)=0 exch2_neighbourId(4,150)=149 exch2_iLo(4,150)=0 exch2_iHi(4,150)=0 exch2_jLo(4,150)=0 exch2_jHi(4,150)=52 exch2_opposingSend(4,150)=4 exch2_pij(1,4,150)=1 exch2_pij(2,4,150)=0 exch2_pij(3,4,150)=0 exch2_pij(4,4,150)=1 exch2_oi(4,150)=0 exch2_oj(4,150)=0 RETURN END SUBROUTINE W2_E2SETUP_151 C Topology for tile 151 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(151)=34 exch2_tNy(151)=51 exch2_tBasex(151)=0 exch2_tBasey(151)=0 exch2_txGlobalo(151)=511 exch2_tyGlobalo(151)=1 exch2_isWedge(151)=1 exch2_isNedge(151)=0 exch2_isEedge(151)=0 exch2_isSedge(151)=1 exch2_myFace(151)=2 exch2_mydNx(151)=510 exch2_mydNy(151)=510 exch2_nNeighbours(151)=4 exch2_neighbourId(1,151)=166 exch2_iLo(1,151)=0 exch2_iHi(1,151)=35 exch2_jLo(1,151)=52 exch2_jHi(1,151)=52 exch2_opposingSend(1,151)=2 exch2_pij(1,1,151)=1 exch2_pij(2,1,151)=0 exch2_pij(3,1,151)=0 exch2_pij(4,1,151)=1 exch2_oi(1,151)=0 exch2_oj(1,151)=0 exch2_neighbourId(2,151)=900 exch2_iLo(2,151)=0 exch2_iHi(2,151)=35 exch2_jLo(2,151)=0 exch2_jHi(2,151)=0 exch2_opposingSend(2,151)=3 exch2_pij(1,2,151)=0 exch2_pij(2,2,151)=-1 exch2_pij(3,2,151)=1 exch2_pij(4,2,151)=0 exch2_oi(2,151)=511 exch2_oj(2,151)=-510 exch2_neighbourId(3,151)=152 exch2_iLo(3,151)=35 exch2_iHi(3,151)=35 exch2_jLo(3,151)=0 exch2_jHi(3,151)=52 exch2_opposingSend(3,151)=5 exch2_pij(1,3,151)=1 exch2_pij(2,3,151)=0 exch2_pij(3,3,151)=0 exch2_pij(4,3,151)=1 exch2_oi(3,151)=0 exch2_oj(3,151)=0 exch2_neighbourId(4,151)=15 exch2_iLo(4,151)=0 exch2_iHi(4,151)=0 exch2_jLo(4,151)=0 exch2_jHi(4,151)=52 exch2_opposingSend(4,151)=3 exch2_pij(1,4,151)=1 exch2_pij(2,4,151)=0 exch2_pij(3,4,151)=0 exch2_pij(4,4,151)=1 exch2_oi(4,151)=-510 exch2_oj(4,151)=0 RETURN END SUBROUTINE W2_E2SETUP_152 C Topology for tile 152 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(152)=34 exch2_tNy(152)=51 exch2_tBasex(152)=34 exch2_tBasey(152)=0 exch2_txGlobalo(152)=545 exch2_tyGlobalo(152)=1 exch2_isWedge(152)=0 exch2_isNedge(152)=0 exch2_isEedge(152)=0 exch2_isSedge(152)=1 exch2_myFace(152)=2 exch2_mydNx(152)=510 exch2_mydNy(152)=510 exch2_nNeighbours(152)=5 exch2_neighbourId(1,152)=167 exch2_iLo(1,152)=0 exch2_iHi(1,152)=35 exch2_jLo(1,152)=52 exch2_jHi(1,152)=52 exch2_opposingSend(1,152)=2 exch2_pij(1,1,152)=1 exch2_pij(2,1,152)=0 exch2_pij(3,1,152)=0 exch2_pij(4,1,152)=1 exch2_oi(1,152)=0 exch2_oj(1,152)=0 exch2_neighbourId(2,152)=885 exch2_iLo(2,152)=17 exch2_iHi(2,152)=35 exch2_jLo(2,152)=0 exch2_jHi(2,152)=0 exch2_opposingSend(2,152)=3 exch2_pij(1,2,152)=0 exch2_pij(2,2,152)=-1 exch2_pij(3,2,152)=1 exch2_pij(4,2,152)=0 exch2_oi(2,152)=511 exch2_oj(2,152)=-510 exch2_neighbourId(3,152)=900 exch2_iLo(3,152)=0 exch2_iHi(3,152)=18 exch2_jLo(3,152)=0 exch2_jHi(3,152)=0 exch2_opposingSend(3,152)=4 exch2_pij(1,3,152)=0 exch2_pij(2,3,152)=-1 exch2_pij(3,3,152)=1 exch2_pij(4,3,152)=0 exch2_oi(3,152)=511 exch2_oj(3,152)=-510 exch2_neighbourId(4,152)=153 exch2_iLo(4,152)=35 exch2_iHi(4,152)=35 exch2_jLo(4,152)=0 exch2_jHi(4,152)=52 exch2_opposingSend(4,152)=4 exch2_pij(1,4,152)=1 exch2_pij(2,4,152)=0 exch2_pij(3,4,152)=0 exch2_pij(4,4,152)=1 exch2_oi(4,152)=0 exch2_oj(4,152)=0 exch2_neighbourId(5,152)=151 exch2_iLo(5,152)=0 exch2_iHi(5,152)=0 exch2_jLo(5,152)=0 exch2_jHi(5,152)=52 exch2_opposingSend(5,152)=3 exch2_pij(1,5,152)=1 exch2_pij(2,5,152)=0 exch2_pij(3,5,152)=0 exch2_pij(4,5,152)=1 exch2_oi(5,152)=0 exch2_oj(5,152)=0 RETURN END SUBROUTINE W2_E2SETUP_153 C Topology for tile 153 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(153)=34 exch2_tNy(153)=51 exch2_tBasex(153)=68 exch2_tBasey(153)=0 exch2_txGlobalo(153)=579 exch2_tyGlobalo(153)=1 exch2_isWedge(153)=0 exch2_isNedge(153)=0 exch2_isEedge(153)=0 exch2_isSedge(153)=1 exch2_myFace(153)=2 exch2_mydNx(153)=510 exch2_mydNy(153)=510 exch2_nNeighbours(153)=4 exch2_neighbourId(1,153)=168 exch2_iLo(1,153)=0 exch2_iHi(1,153)=35 exch2_jLo(1,153)=52 exch2_jHi(1,153)=52 exch2_opposingSend(1,153)=2 exch2_pij(1,1,153)=1 exch2_pij(2,1,153)=0 exch2_pij(3,1,153)=0 exch2_pij(4,1,153)=1 exch2_oi(1,153)=0 exch2_oj(1,153)=0 exch2_neighbourId(2,153)=885 exch2_iLo(2,153)=0 exch2_iHi(2,153)=35 exch2_jLo(2,153)=0 exch2_jHi(2,153)=0 exch2_opposingSend(2,153)=4 exch2_pij(1,2,153)=0 exch2_pij(2,2,153)=-1 exch2_pij(3,2,153)=1 exch2_pij(4,2,153)=0 exch2_oi(2,153)=511 exch2_oj(2,153)=-510 exch2_neighbourId(3,153)=154 exch2_iLo(3,153)=35 exch2_iHi(3,153)=35 exch2_jLo(3,153)=0 exch2_jHi(3,153)=52 exch2_opposingSend(3,153)=4 exch2_pij(1,3,153)=1 exch2_pij(2,3,153)=0 exch2_pij(3,3,153)=0 exch2_pij(4,3,153)=1 exch2_oi(3,153)=0 exch2_oj(3,153)=0 exch2_neighbourId(4,153)=152 exch2_iLo(4,153)=0 exch2_iHi(4,153)=0 exch2_jLo(4,153)=0 exch2_jHi(4,153)=52 exch2_opposingSend(4,153)=4 exch2_pij(1,4,153)=1 exch2_pij(2,4,153)=0 exch2_pij(3,4,153)=0 exch2_pij(4,4,153)=1 exch2_oi(4,153)=0 exch2_oj(4,153)=0 RETURN END SUBROUTINE W2_E2SETUP_154 C Topology for tile 154 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(154)=34 exch2_tNy(154)=51 exch2_tBasex(154)=102 exch2_tBasey(154)=0 exch2_txGlobalo(154)=613 exch2_tyGlobalo(154)=1 exch2_isWedge(154)=0 exch2_isNedge(154)=0 exch2_isEedge(154)=0 exch2_isSedge(154)=1 exch2_myFace(154)=2 exch2_mydNx(154)=510 exch2_mydNy(154)=510 exch2_nNeighbours(154)=4 exch2_neighbourId(1,154)=169 exch2_iLo(1,154)=0 exch2_iHi(1,154)=35 exch2_jLo(1,154)=52 exch2_jHi(1,154)=52 exch2_opposingSend(1,154)=2 exch2_pij(1,1,154)=1 exch2_pij(2,1,154)=0 exch2_pij(3,1,154)=0 exch2_pij(4,1,154)=1 exch2_oi(1,154)=0 exch2_oj(1,154)=0 exch2_neighbourId(2,154)=870 exch2_iLo(2,154)=0 exch2_iHi(2,154)=35 exch2_jLo(2,154)=0 exch2_jHi(2,154)=0 exch2_opposingSend(2,154)=3 exch2_pij(1,2,154)=0 exch2_pij(2,2,154)=-1 exch2_pij(3,2,154)=1 exch2_pij(4,2,154)=0 exch2_oi(2,154)=511 exch2_oj(2,154)=-510 exch2_neighbourId(3,154)=155 exch2_iLo(3,154)=35 exch2_iHi(3,154)=35 exch2_jLo(3,154)=0 exch2_jHi(3,154)=52 exch2_opposingSend(3,154)=5 exch2_pij(1,3,154)=1 exch2_pij(2,3,154)=0 exch2_pij(3,3,154)=0 exch2_pij(4,3,154)=1 exch2_oi(3,154)=0 exch2_oj(3,154)=0 exch2_neighbourId(4,154)=153 exch2_iLo(4,154)=0 exch2_iHi(4,154)=0 exch2_jLo(4,154)=0 exch2_jHi(4,154)=52 exch2_opposingSend(4,154)=3 exch2_pij(1,4,154)=1 exch2_pij(2,4,154)=0 exch2_pij(3,4,154)=0 exch2_pij(4,4,154)=1 exch2_oi(4,154)=0 exch2_oj(4,154)=0 RETURN END SUBROUTINE W2_E2SETUP_155 C Topology for tile 155 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(155)=34 exch2_tNy(155)=51 exch2_tBasex(155)=136 exch2_tBasey(155)=0 exch2_txGlobalo(155)=647 exch2_tyGlobalo(155)=1 exch2_isWedge(155)=0 exch2_isNedge(155)=0 exch2_isEedge(155)=0 exch2_isSedge(155)=1 exch2_myFace(155)=2 exch2_mydNx(155)=510 exch2_mydNy(155)=510 exch2_nNeighbours(155)=5 exch2_neighbourId(1,155)=170 exch2_iLo(1,155)=0 exch2_iHi(1,155)=35 exch2_jLo(1,155)=52 exch2_jHi(1,155)=52 exch2_opposingSend(1,155)=2 exch2_pij(1,1,155)=1 exch2_pij(2,1,155)=0 exch2_pij(3,1,155)=0 exch2_pij(4,1,155)=1 exch2_oi(1,155)=0 exch2_oj(1,155)=0 exch2_neighbourId(2,155)=855 exch2_iLo(2,155)=17 exch2_iHi(2,155)=35 exch2_jLo(2,155)=0 exch2_jHi(2,155)=0 exch2_opposingSend(2,155)=3 exch2_pij(1,2,155)=0 exch2_pij(2,2,155)=-1 exch2_pij(3,2,155)=1 exch2_pij(4,2,155)=0 exch2_oi(2,155)=511 exch2_oj(2,155)=-510 exch2_neighbourId(3,155)=870 exch2_iLo(3,155)=0 exch2_iHi(3,155)=18 exch2_jLo(3,155)=0 exch2_jHi(3,155)=0 exch2_opposingSend(3,155)=4 exch2_pij(1,3,155)=0 exch2_pij(2,3,155)=-1 exch2_pij(3,3,155)=1 exch2_pij(4,3,155)=0 exch2_oi(3,155)=511 exch2_oj(3,155)=-510 exch2_neighbourId(4,155)=156 exch2_iLo(4,155)=35 exch2_iHi(4,155)=35 exch2_jLo(4,155)=0 exch2_jHi(4,155)=52 exch2_opposingSend(4,155)=4 exch2_pij(1,4,155)=1 exch2_pij(2,4,155)=0 exch2_pij(3,4,155)=0 exch2_pij(4,4,155)=1 exch2_oi(4,155)=0 exch2_oj(4,155)=0 exch2_neighbourId(5,155)=154 exch2_iLo(5,155)=0 exch2_iHi(5,155)=0 exch2_jLo(5,155)=0 exch2_jHi(5,155)=52 exch2_opposingSend(5,155)=3 exch2_pij(1,5,155)=1 exch2_pij(2,5,155)=0 exch2_pij(3,5,155)=0 exch2_pij(4,5,155)=1 exch2_oi(5,155)=0 exch2_oj(5,155)=0 RETURN END SUBROUTINE W2_E2SETUP_156 C Topology for tile 156 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(156)=34 exch2_tNy(156)=51 exch2_tBasex(156)=170 exch2_tBasey(156)=0 exch2_txGlobalo(156)=681 exch2_tyGlobalo(156)=1 exch2_isWedge(156)=0 exch2_isNedge(156)=0 exch2_isEedge(156)=0 exch2_isSedge(156)=1 exch2_myFace(156)=2 exch2_mydNx(156)=510 exch2_mydNy(156)=510 exch2_nNeighbours(156)=4 exch2_neighbourId(1,156)=171 exch2_iLo(1,156)=0 exch2_iHi(1,156)=35 exch2_jLo(1,156)=52 exch2_jHi(1,156)=52 exch2_opposingSend(1,156)=2 exch2_pij(1,1,156)=1 exch2_pij(2,1,156)=0 exch2_pij(3,1,156)=0 exch2_pij(4,1,156)=1 exch2_oi(1,156)=0 exch2_oj(1,156)=0 exch2_neighbourId(2,156)=855 exch2_iLo(2,156)=0 exch2_iHi(2,156)=35 exch2_jLo(2,156)=0 exch2_jHi(2,156)=0 exch2_opposingSend(2,156)=4 exch2_pij(1,2,156)=0 exch2_pij(2,2,156)=-1 exch2_pij(3,2,156)=1 exch2_pij(4,2,156)=0 exch2_oi(2,156)=511 exch2_oj(2,156)=-510 exch2_neighbourId(3,156)=157 exch2_iLo(3,156)=35 exch2_iHi(3,156)=35 exch2_jLo(3,156)=0 exch2_jHi(3,156)=52 exch2_opposingSend(3,156)=4 exch2_pij(1,3,156)=1 exch2_pij(2,3,156)=0 exch2_pij(3,3,156)=0 exch2_pij(4,3,156)=1 exch2_oi(3,156)=0 exch2_oj(3,156)=0 exch2_neighbourId(4,156)=155 exch2_iLo(4,156)=0 exch2_iHi(4,156)=0 exch2_jLo(4,156)=0 exch2_jHi(4,156)=52 exch2_opposingSend(4,156)=4 exch2_pij(1,4,156)=1 exch2_pij(2,4,156)=0 exch2_pij(3,4,156)=0 exch2_pij(4,4,156)=1 exch2_oi(4,156)=0 exch2_oj(4,156)=0 RETURN END SUBROUTINE W2_E2SETUP_157 C Topology for tile 157 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(157)=34 exch2_tNy(157)=51 exch2_tBasex(157)=204 exch2_tBasey(157)=0 exch2_txGlobalo(157)=715 exch2_tyGlobalo(157)=1 exch2_isWedge(157)=0 exch2_isNedge(157)=0 exch2_isEedge(157)=0 exch2_isSedge(157)=1 exch2_myFace(157)=2 exch2_mydNx(157)=510 exch2_mydNy(157)=510 exch2_nNeighbours(157)=4 exch2_neighbourId(1,157)=172 exch2_iLo(1,157)=0 exch2_iHi(1,157)=35 exch2_jLo(1,157)=52 exch2_jHi(1,157)=52 exch2_opposingSend(1,157)=2 exch2_pij(1,1,157)=1 exch2_pij(2,1,157)=0 exch2_pij(3,1,157)=0 exch2_pij(4,1,157)=1 exch2_oi(1,157)=0 exch2_oj(1,157)=0 exch2_neighbourId(2,157)=840 exch2_iLo(2,157)=0 exch2_iHi(2,157)=35 exch2_jLo(2,157)=0 exch2_jHi(2,157)=0 exch2_opposingSend(2,157)=3 exch2_pij(1,2,157)=0 exch2_pij(2,2,157)=-1 exch2_pij(3,2,157)=1 exch2_pij(4,2,157)=0 exch2_oi(2,157)=511 exch2_oj(2,157)=-510 exch2_neighbourId(3,157)=158 exch2_iLo(3,157)=35 exch2_iHi(3,157)=35 exch2_jLo(3,157)=0 exch2_jHi(3,157)=52 exch2_opposingSend(3,157)=5 exch2_pij(1,3,157)=1 exch2_pij(2,3,157)=0 exch2_pij(3,3,157)=0 exch2_pij(4,3,157)=1 exch2_oi(3,157)=0 exch2_oj(3,157)=0 exch2_neighbourId(4,157)=156 exch2_iLo(4,157)=0 exch2_iHi(4,157)=0 exch2_jLo(4,157)=0 exch2_jHi(4,157)=52 exch2_opposingSend(4,157)=3 exch2_pij(1,4,157)=1 exch2_pij(2,4,157)=0 exch2_pij(3,4,157)=0 exch2_pij(4,4,157)=1 exch2_oi(4,157)=0 exch2_oj(4,157)=0 RETURN END SUBROUTINE W2_E2SETUP_158 C Topology for tile 158 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(158)=34 exch2_tNy(158)=51 exch2_tBasex(158)=238 exch2_tBasey(158)=0 exch2_txGlobalo(158)=749 exch2_tyGlobalo(158)=1 exch2_isWedge(158)=0 exch2_isNedge(158)=0 exch2_isEedge(158)=0 exch2_isSedge(158)=1 exch2_myFace(158)=2 exch2_mydNx(158)=510 exch2_mydNy(158)=510 exch2_nNeighbours(158)=5 exch2_neighbourId(1,158)=173 exch2_iLo(1,158)=0 exch2_iHi(1,158)=35 exch2_jLo(1,158)=52 exch2_jHi(1,158)=52 exch2_opposingSend(1,158)=2 exch2_pij(1,1,158)=1 exch2_pij(2,1,158)=0 exch2_pij(3,1,158)=0 exch2_pij(4,1,158)=1 exch2_oi(1,158)=0 exch2_oj(1,158)=0 exch2_neighbourId(2,158)=825 exch2_iLo(2,158)=17 exch2_iHi(2,158)=35 exch2_jLo(2,158)=0 exch2_jHi(2,158)=0 exch2_opposingSend(2,158)=3 exch2_pij(1,2,158)=0 exch2_pij(2,2,158)=-1 exch2_pij(3,2,158)=1 exch2_pij(4,2,158)=0 exch2_oi(2,158)=511 exch2_oj(2,158)=-510 exch2_neighbourId(3,158)=840 exch2_iLo(3,158)=0 exch2_iHi(3,158)=18 exch2_jLo(3,158)=0 exch2_jHi(3,158)=0 exch2_opposingSend(3,158)=4 exch2_pij(1,3,158)=0 exch2_pij(2,3,158)=-1 exch2_pij(3,3,158)=1 exch2_pij(4,3,158)=0 exch2_oi(3,158)=511 exch2_oj(3,158)=-510 exch2_neighbourId(4,158)=159 exch2_iLo(4,158)=35 exch2_iHi(4,158)=35 exch2_jLo(4,158)=0 exch2_jHi(4,158)=52 exch2_opposingSend(4,158)=4 exch2_pij(1,4,158)=1 exch2_pij(2,4,158)=0 exch2_pij(3,4,158)=0 exch2_pij(4,4,158)=1 exch2_oi(4,158)=0 exch2_oj(4,158)=0 exch2_neighbourId(5,158)=157 exch2_iLo(5,158)=0 exch2_iHi(5,158)=0 exch2_jLo(5,158)=0 exch2_jHi(5,158)=52 exch2_opposingSend(5,158)=3 exch2_pij(1,5,158)=1 exch2_pij(2,5,158)=0 exch2_pij(3,5,158)=0 exch2_pij(4,5,158)=1 exch2_oi(5,158)=0 exch2_oj(5,158)=0 RETURN END SUBROUTINE W2_E2SETUP_159 C Topology for tile 159 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(159)=34 exch2_tNy(159)=51 exch2_tBasex(159)=272 exch2_tBasey(159)=0 exch2_txGlobalo(159)=783 exch2_tyGlobalo(159)=1 exch2_isWedge(159)=0 exch2_isNedge(159)=0 exch2_isEedge(159)=0 exch2_isSedge(159)=1 exch2_myFace(159)=2 exch2_mydNx(159)=510 exch2_mydNy(159)=510 exch2_nNeighbours(159)=4 exch2_neighbourId(1,159)=174 exch2_iLo(1,159)=0 exch2_iHi(1,159)=35 exch2_jLo(1,159)=52 exch2_jHi(1,159)=52 exch2_opposingSend(1,159)=2 exch2_pij(1,1,159)=1 exch2_pij(2,1,159)=0 exch2_pij(3,1,159)=0 exch2_pij(4,1,159)=1 exch2_oi(1,159)=0 exch2_oj(1,159)=0 exch2_neighbourId(2,159)=825 exch2_iLo(2,159)=0 exch2_iHi(2,159)=35 exch2_jLo(2,159)=0 exch2_jHi(2,159)=0 exch2_opposingSend(2,159)=4 exch2_pij(1,2,159)=0 exch2_pij(2,2,159)=-1 exch2_pij(3,2,159)=1 exch2_pij(4,2,159)=0 exch2_oi(2,159)=511 exch2_oj(2,159)=-510 exch2_neighbourId(3,159)=160 exch2_iLo(3,159)=35 exch2_iHi(3,159)=35 exch2_jLo(3,159)=0 exch2_jHi(3,159)=52 exch2_opposingSend(3,159)=4 exch2_pij(1,3,159)=1 exch2_pij(2,3,159)=0 exch2_pij(3,3,159)=0 exch2_pij(4,3,159)=1 exch2_oi(3,159)=0 exch2_oj(3,159)=0 exch2_neighbourId(4,159)=158 exch2_iLo(4,159)=0 exch2_iHi(4,159)=0 exch2_jLo(4,159)=0 exch2_jHi(4,159)=52 exch2_opposingSend(4,159)=4 exch2_pij(1,4,159)=1 exch2_pij(2,4,159)=0 exch2_pij(3,4,159)=0 exch2_pij(4,4,159)=1 exch2_oi(4,159)=0 exch2_oj(4,159)=0 RETURN END SUBROUTINE W2_E2SETUP_160 C Topology for tile 160 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(160)=34 exch2_tNy(160)=51 exch2_tBasex(160)=306 exch2_tBasey(160)=0 exch2_txGlobalo(160)=817 exch2_tyGlobalo(160)=1 exch2_isWedge(160)=0 exch2_isNedge(160)=0 exch2_isEedge(160)=0 exch2_isSedge(160)=1 exch2_myFace(160)=2 exch2_mydNx(160)=510 exch2_mydNy(160)=510 exch2_nNeighbours(160)=4 exch2_neighbourId(1,160)=175 exch2_iLo(1,160)=0 exch2_iHi(1,160)=35 exch2_jLo(1,160)=52 exch2_jHi(1,160)=52 exch2_opposingSend(1,160)=2 exch2_pij(1,1,160)=1 exch2_pij(2,1,160)=0 exch2_pij(3,1,160)=0 exch2_pij(4,1,160)=1 exch2_oi(1,160)=0 exch2_oj(1,160)=0 exch2_neighbourId(2,160)=810 exch2_iLo(2,160)=0 exch2_iHi(2,160)=35 exch2_jLo(2,160)=0 exch2_jHi(2,160)=0 exch2_opposingSend(2,160)=3 exch2_pij(1,2,160)=0 exch2_pij(2,2,160)=-1 exch2_pij(3,2,160)=1 exch2_pij(4,2,160)=0 exch2_oi(2,160)=511 exch2_oj(2,160)=-510 exch2_neighbourId(3,160)=161 exch2_iLo(3,160)=35 exch2_iHi(3,160)=35 exch2_jLo(3,160)=0 exch2_jHi(3,160)=52 exch2_opposingSend(3,160)=5 exch2_pij(1,3,160)=1 exch2_pij(2,3,160)=0 exch2_pij(3,3,160)=0 exch2_pij(4,3,160)=1 exch2_oi(3,160)=0 exch2_oj(3,160)=0 exch2_neighbourId(4,160)=159 exch2_iLo(4,160)=0 exch2_iHi(4,160)=0 exch2_jLo(4,160)=0 exch2_jHi(4,160)=52 exch2_opposingSend(4,160)=3 exch2_pij(1,4,160)=1 exch2_pij(2,4,160)=0 exch2_pij(3,4,160)=0 exch2_pij(4,4,160)=1 exch2_oi(4,160)=0 exch2_oj(4,160)=0 RETURN END SUBROUTINE W2_E2SETUP_161 C Topology for tile 161 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(161)=34 exch2_tNy(161)=51 exch2_tBasex(161)=340 exch2_tBasey(161)=0 exch2_txGlobalo(161)=851 exch2_tyGlobalo(161)=1 exch2_isWedge(161)=0 exch2_isNedge(161)=0 exch2_isEedge(161)=0 exch2_isSedge(161)=1 exch2_myFace(161)=2 exch2_mydNx(161)=510 exch2_mydNy(161)=510 exch2_nNeighbours(161)=5 exch2_neighbourId(1,161)=176 exch2_iLo(1,161)=0 exch2_iHi(1,161)=35 exch2_jLo(1,161)=52 exch2_jHi(1,161)=52 exch2_opposingSend(1,161)=2 exch2_pij(1,1,161)=1 exch2_pij(2,1,161)=0 exch2_pij(3,1,161)=0 exch2_pij(4,1,161)=1 exch2_oi(1,161)=0 exch2_oj(1,161)=0 exch2_neighbourId(2,161)=795 exch2_iLo(2,161)=17 exch2_iHi(2,161)=35 exch2_jLo(2,161)=0 exch2_jHi(2,161)=0 exch2_opposingSend(2,161)=3 exch2_pij(1,2,161)=0 exch2_pij(2,2,161)=-1 exch2_pij(3,2,161)=1 exch2_pij(4,2,161)=0 exch2_oi(2,161)=511 exch2_oj(2,161)=-510 exch2_neighbourId(3,161)=810 exch2_iLo(3,161)=0 exch2_iHi(3,161)=18 exch2_jLo(3,161)=0 exch2_jHi(3,161)=0 exch2_opposingSend(3,161)=4 exch2_pij(1,3,161)=0 exch2_pij(2,3,161)=-1 exch2_pij(3,3,161)=1 exch2_pij(4,3,161)=0 exch2_oi(3,161)=511 exch2_oj(3,161)=-510 exch2_neighbourId(4,161)=162 exch2_iLo(4,161)=35 exch2_iHi(4,161)=35 exch2_jLo(4,161)=0 exch2_jHi(4,161)=52 exch2_opposingSend(4,161)=4 exch2_pij(1,4,161)=1 exch2_pij(2,4,161)=0 exch2_pij(3,4,161)=0 exch2_pij(4,4,161)=1 exch2_oi(4,161)=0 exch2_oj(4,161)=0 exch2_neighbourId(5,161)=160 exch2_iLo(5,161)=0 exch2_iHi(5,161)=0 exch2_jLo(5,161)=0 exch2_jHi(5,161)=52 exch2_opposingSend(5,161)=3 exch2_pij(1,5,161)=1 exch2_pij(2,5,161)=0 exch2_pij(3,5,161)=0 exch2_pij(4,5,161)=1 exch2_oi(5,161)=0 exch2_oj(5,161)=0 RETURN END SUBROUTINE W2_E2SETUP_162 C Topology for tile 162 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(162)=34 exch2_tNy(162)=51 exch2_tBasex(162)=374 exch2_tBasey(162)=0 exch2_txGlobalo(162)=885 exch2_tyGlobalo(162)=1 exch2_isWedge(162)=0 exch2_isNedge(162)=0 exch2_isEedge(162)=0 exch2_isSedge(162)=1 exch2_myFace(162)=2 exch2_mydNx(162)=510 exch2_mydNy(162)=510 exch2_nNeighbours(162)=4 exch2_neighbourId(1,162)=177 exch2_iLo(1,162)=0 exch2_iHi(1,162)=35 exch2_jLo(1,162)=52 exch2_jHi(1,162)=52 exch2_opposingSend(1,162)=2 exch2_pij(1,1,162)=1 exch2_pij(2,1,162)=0 exch2_pij(3,1,162)=0 exch2_pij(4,1,162)=1 exch2_oi(1,162)=0 exch2_oj(1,162)=0 exch2_neighbourId(2,162)=795 exch2_iLo(2,162)=0 exch2_iHi(2,162)=35 exch2_jLo(2,162)=0 exch2_jHi(2,162)=0 exch2_opposingSend(2,162)=4 exch2_pij(1,2,162)=0 exch2_pij(2,2,162)=-1 exch2_pij(3,2,162)=1 exch2_pij(4,2,162)=0 exch2_oi(2,162)=511 exch2_oj(2,162)=-510 exch2_neighbourId(3,162)=163 exch2_iLo(3,162)=35 exch2_iHi(3,162)=35 exch2_jLo(3,162)=0 exch2_jHi(3,162)=52 exch2_opposingSend(3,162)=4 exch2_pij(1,3,162)=1 exch2_pij(2,3,162)=0 exch2_pij(3,3,162)=0 exch2_pij(4,3,162)=1 exch2_oi(3,162)=0 exch2_oj(3,162)=0 exch2_neighbourId(4,162)=161 exch2_iLo(4,162)=0 exch2_iHi(4,162)=0 exch2_jLo(4,162)=0 exch2_jHi(4,162)=52 exch2_opposingSend(4,162)=4 exch2_pij(1,4,162)=1 exch2_pij(2,4,162)=0 exch2_pij(3,4,162)=0 exch2_pij(4,4,162)=1 exch2_oi(4,162)=0 exch2_oj(4,162)=0 RETURN END SUBROUTINE W2_E2SETUP_163 C Topology for tile 163 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(163)=34 exch2_tNy(163)=51 exch2_tBasex(163)=408 exch2_tBasey(163)=0 exch2_txGlobalo(163)=919 exch2_tyGlobalo(163)=1 exch2_isWedge(163)=0 exch2_isNedge(163)=0 exch2_isEedge(163)=0 exch2_isSedge(163)=1 exch2_myFace(163)=2 exch2_mydNx(163)=510 exch2_mydNy(163)=510 exch2_nNeighbours(163)=4 exch2_neighbourId(1,163)=178 exch2_iLo(1,163)=0 exch2_iHi(1,163)=35 exch2_jLo(1,163)=52 exch2_jHi(1,163)=52 exch2_opposingSend(1,163)=2 exch2_pij(1,1,163)=1 exch2_pij(2,1,163)=0 exch2_pij(3,1,163)=0 exch2_pij(4,1,163)=1 exch2_oi(1,163)=0 exch2_oj(1,163)=0 exch2_neighbourId(2,163)=780 exch2_iLo(2,163)=0 exch2_iHi(2,163)=35 exch2_jLo(2,163)=0 exch2_jHi(2,163)=0 exch2_opposingSend(2,163)=3 exch2_pij(1,2,163)=0 exch2_pij(2,2,163)=-1 exch2_pij(3,2,163)=1 exch2_pij(4,2,163)=0 exch2_oi(2,163)=511 exch2_oj(2,163)=-510 exch2_neighbourId(3,163)=164 exch2_iLo(3,163)=35 exch2_iHi(3,163)=35 exch2_jLo(3,163)=0 exch2_jHi(3,163)=52 exch2_opposingSend(3,163)=5 exch2_pij(1,3,163)=1 exch2_pij(2,3,163)=0 exch2_pij(3,3,163)=0 exch2_pij(4,3,163)=1 exch2_oi(3,163)=0 exch2_oj(3,163)=0 exch2_neighbourId(4,163)=162 exch2_iLo(4,163)=0 exch2_iHi(4,163)=0 exch2_jLo(4,163)=0 exch2_jHi(4,163)=52 exch2_opposingSend(4,163)=3 exch2_pij(1,4,163)=1 exch2_pij(2,4,163)=0 exch2_pij(3,4,163)=0 exch2_pij(4,4,163)=1 exch2_oi(4,163)=0 exch2_oj(4,163)=0 RETURN END SUBROUTINE W2_E2SETUP_164 C Topology for tile 164 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(164)=34 exch2_tNy(164)=51 exch2_tBasex(164)=442 exch2_tBasey(164)=0 exch2_txGlobalo(164)=953 exch2_tyGlobalo(164)=1 exch2_isWedge(164)=0 exch2_isNedge(164)=0 exch2_isEedge(164)=0 exch2_isSedge(164)=1 exch2_myFace(164)=2 exch2_mydNx(164)=510 exch2_mydNy(164)=510 exch2_nNeighbours(164)=5 exch2_neighbourId(1,164)=179 exch2_iLo(1,164)=0 exch2_iHi(1,164)=35 exch2_jLo(1,164)=52 exch2_jHi(1,164)=52 exch2_opposingSend(1,164)=2 exch2_pij(1,1,164)=1 exch2_pij(2,1,164)=0 exch2_pij(3,1,164)=0 exch2_pij(4,1,164)=1 exch2_oi(1,164)=0 exch2_oj(1,164)=0 exch2_neighbourId(2,164)=765 exch2_iLo(2,164)=17 exch2_iHi(2,164)=35 exch2_jLo(2,164)=0 exch2_jHi(2,164)=0 exch2_opposingSend(2,164)=3 exch2_pij(1,2,164)=0 exch2_pij(2,2,164)=-1 exch2_pij(3,2,164)=1 exch2_pij(4,2,164)=0 exch2_oi(2,164)=511 exch2_oj(2,164)=-510 exch2_neighbourId(3,164)=780 exch2_iLo(3,164)=0 exch2_iHi(3,164)=18 exch2_jLo(3,164)=0 exch2_jHi(3,164)=0 exch2_opposingSend(3,164)=4 exch2_pij(1,3,164)=0 exch2_pij(2,3,164)=-1 exch2_pij(3,3,164)=1 exch2_pij(4,3,164)=0 exch2_oi(3,164)=511 exch2_oj(3,164)=-510 exch2_neighbourId(4,164)=165 exch2_iLo(4,164)=35 exch2_iHi(4,164)=35 exch2_jLo(4,164)=0 exch2_jHi(4,164)=52 exch2_opposingSend(4,164)=5 exch2_pij(1,4,164)=1 exch2_pij(2,4,164)=0 exch2_pij(3,4,164)=0 exch2_pij(4,4,164)=1 exch2_oi(4,164)=0 exch2_oj(4,164)=0 exch2_neighbourId(5,164)=163 exch2_iLo(5,164)=0 exch2_iHi(5,164)=0 exch2_jLo(5,164)=0 exch2_jHi(5,164)=52 exch2_opposingSend(5,164)=3 exch2_pij(1,5,164)=1 exch2_pij(2,5,164)=0 exch2_pij(3,5,164)=0 exch2_pij(4,5,164)=1 exch2_oi(5,164)=0 exch2_oj(5,164)=0 RETURN END SUBROUTINE W2_E2SETUP_165 C Topology for tile 165 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(165)=34 exch2_tNy(165)=51 exch2_tBasex(165)=476 exch2_tBasey(165)=0 exch2_txGlobalo(165)=987 exch2_tyGlobalo(165)=1 exch2_isWedge(165)=0 exch2_isNedge(165)=0 exch2_isEedge(165)=1 exch2_isSedge(165)=1 exch2_myFace(165)=2 exch2_mydNx(165)=510 exch2_mydNy(165)=510 exch2_nNeighbours(165)=5 exch2_neighbourId(1,165)=180 exch2_iLo(1,165)=0 exch2_iHi(1,165)=35 exch2_jLo(1,165)=52 exch2_jHi(1,165)=52 exch2_opposingSend(1,165)=2 exch2_pij(1,1,165)=1 exch2_pij(2,1,165)=0 exch2_pij(3,1,165)=0 exch2_pij(4,1,165)=1 exch2_oi(1,165)=0 exch2_oj(1,165)=0 exch2_neighbourId(2,165)=765 exch2_iLo(2,165)=0 exch2_iHi(2,165)=35 exch2_jLo(2,165)=0 exch2_jHi(2,165)=0 exch2_opposingSend(2,165)=4 exch2_pij(1,2,165)=0 exch2_pij(2,2,165)=-1 exch2_pij(3,2,165)=1 exch2_pij(4,2,165)=0 exch2_oi(2,165)=511 exch2_oj(2,165)=-510 exch2_neighbourId(3,165)=464 exch2_iLo(3,165)=35 exch2_iHi(3,165)=35 exch2_jLo(3,165)=34 exch2_jHi(3,165)=52 exch2_opposingSend(3,165)=2 exch2_pij(1,3,165)=0 exch2_pij(2,3,165)=1 exch2_pij(3,3,165)=-1 exch2_pij(4,3,165)=0 exch2_oi(3,165)=510 exch2_oj(3,165)=511 exch2_neighbourId(4,165)=465 exch2_iLo(4,165)=35 exch2_iHi(4,165)=35 exch2_jLo(4,165)=0 exch2_jHi(4,165)=35 exch2_opposingSend(4,165)=2 exch2_pij(1,4,165)=0 exch2_pij(2,4,165)=1 exch2_pij(3,4,165)=-1 exch2_pij(4,4,165)=0 exch2_oi(4,165)=510 exch2_oj(4,165)=511 exch2_neighbourId(5,165)=164 exch2_iLo(5,165)=0 exch2_iHi(5,165)=0 exch2_jLo(5,165)=0 exch2_jHi(5,165)=52 exch2_opposingSend(5,165)=4 exch2_pij(1,5,165)=1 exch2_pij(2,5,165)=0 exch2_pij(3,5,165)=0 exch2_pij(4,5,165)=1 exch2_oi(5,165)=0 exch2_oj(5,165)=0 RETURN END SUBROUTINE W2_E2SETUP_166 C Topology for tile 166 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(166)=34 exch2_tNy(166)=51 exch2_tBasex(166)=0 exch2_tBasey(166)=51 exch2_txGlobalo(166)=511 exch2_tyGlobalo(166)=52 exch2_isWedge(166)=1 exch2_isNedge(166)=0 exch2_isEedge(166)=0 exch2_isSedge(166)=0 exch2_myFace(166)=2 exch2_mydNx(166)=510 exch2_mydNy(166)=510 exch2_nNeighbours(166)=4 exch2_neighbourId(1,166)=181 exch2_iLo(1,166)=0 exch2_iHi(1,166)=35 exch2_jLo(1,166)=52 exch2_jHi(1,166)=52 exch2_opposingSend(1,166)=2 exch2_pij(1,1,166)=1 exch2_pij(2,1,166)=0 exch2_pij(3,1,166)=0 exch2_pij(4,1,166)=1 exch2_oi(1,166)=0 exch2_oj(1,166)=0 exch2_neighbourId(2,166)=151 exch2_iLo(2,166)=0 exch2_iHi(2,166)=35 exch2_jLo(2,166)=0 exch2_jHi(2,166)=0 exch2_opposingSend(2,166)=1 exch2_pij(1,2,166)=1 exch2_pij(2,2,166)=0 exch2_pij(3,2,166)=0 exch2_pij(4,2,166)=1 exch2_oi(2,166)=0 exch2_oj(2,166)=0 exch2_neighbourId(3,166)=167 exch2_iLo(3,166)=35 exch2_iHi(3,166)=35 exch2_jLo(3,166)=0 exch2_jHi(3,166)=52 exch2_opposingSend(3,166)=4 exch2_pij(1,3,166)=1 exch2_pij(2,3,166)=0 exch2_pij(3,3,166)=0 exch2_pij(4,3,166)=1 exch2_oi(3,166)=0 exch2_oj(3,166)=0 exch2_neighbourId(4,166)=30 exch2_iLo(4,166)=0 exch2_iHi(4,166)=0 exch2_jLo(4,166)=0 exch2_jHi(4,166)=52 exch2_opposingSend(4,166)=3 exch2_pij(1,4,166)=1 exch2_pij(2,4,166)=0 exch2_pij(3,4,166)=0 exch2_pij(4,4,166)=1 exch2_oi(4,166)=-510 exch2_oj(4,166)=0 RETURN END SUBROUTINE W2_E2SETUP_167 C Topology for tile 167 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(167)=34 exch2_tNy(167)=51 exch2_tBasex(167)=34 exch2_tBasey(167)=51 exch2_txGlobalo(167)=545 exch2_tyGlobalo(167)=52 exch2_isWedge(167)=0 exch2_isNedge(167)=0 exch2_isEedge(167)=0 exch2_isSedge(167)=0 exch2_myFace(167)=2 exch2_mydNx(167)=510 exch2_mydNy(167)=510 exch2_nNeighbours(167)=4 exch2_neighbourId(1,167)=182 exch2_iLo(1,167)=0 exch2_iHi(1,167)=35 exch2_jLo(1,167)=52 exch2_jHi(1,167)=52 exch2_opposingSend(1,167)=2 exch2_pij(1,1,167)=1 exch2_pij(2,1,167)=0 exch2_pij(3,1,167)=0 exch2_pij(4,1,167)=1 exch2_oi(1,167)=0 exch2_oj(1,167)=0 exch2_neighbourId(2,167)=152 exch2_iLo(2,167)=0 exch2_iHi(2,167)=35 exch2_jLo(2,167)=0 exch2_jHi(2,167)=0 exch2_opposingSend(2,167)=1 exch2_pij(1,2,167)=1 exch2_pij(2,2,167)=0 exch2_pij(3,2,167)=0 exch2_pij(4,2,167)=1 exch2_oi(2,167)=0 exch2_oj(2,167)=0 exch2_neighbourId(3,167)=168 exch2_iLo(3,167)=35 exch2_iHi(3,167)=35 exch2_jLo(3,167)=0 exch2_jHi(3,167)=52 exch2_opposingSend(3,167)=4 exch2_pij(1,3,167)=1 exch2_pij(2,3,167)=0 exch2_pij(3,3,167)=0 exch2_pij(4,3,167)=1 exch2_oi(3,167)=0 exch2_oj(3,167)=0 exch2_neighbourId(4,167)=166 exch2_iLo(4,167)=0 exch2_iHi(4,167)=0 exch2_jLo(4,167)=0 exch2_jHi(4,167)=52 exch2_opposingSend(4,167)=3 exch2_pij(1,4,167)=1 exch2_pij(2,4,167)=0 exch2_pij(3,4,167)=0 exch2_pij(4,4,167)=1 exch2_oi(4,167)=0 exch2_oj(4,167)=0 RETURN END SUBROUTINE W2_E2SETUP_168 C Topology for tile 168 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(168)=34 exch2_tNy(168)=51 exch2_tBasex(168)=68 exch2_tBasey(168)=51 exch2_txGlobalo(168)=579 exch2_tyGlobalo(168)=52 exch2_isWedge(168)=0 exch2_isNedge(168)=0 exch2_isEedge(168)=0 exch2_isSedge(168)=0 exch2_myFace(168)=2 exch2_mydNx(168)=510 exch2_mydNy(168)=510 exch2_nNeighbours(168)=4 exch2_neighbourId(1,168)=183 exch2_iLo(1,168)=0 exch2_iHi(1,168)=35 exch2_jLo(1,168)=52 exch2_jHi(1,168)=52 exch2_opposingSend(1,168)=2 exch2_pij(1,1,168)=1 exch2_pij(2,1,168)=0 exch2_pij(3,1,168)=0 exch2_pij(4,1,168)=1 exch2_oi(1,168)=0 exch2_oj(1,168)=0 exch2_neighbourId(2,168)=153 exch2_iLo(2,168)=0 exch2_iHi(2,168)=35 exch2_jLo(2,168)=0 exch2_jHi(2,168)=0 exch2_opposingSend(2,168)=1 exch2_pij(1,2,168)=1 exch2_pij(2,2,168)=0 exch2_pij(3,2,168)=0 exch2_pij(4,2,168)=1 exch2_oi(2,168)=0 exch2_oj(2,168)=0 exch2_neighbourId(3,168)=169 exch2_iLo(3,168)=35 exch2_iHi(3,168)=35 exch2_jLo(3,168)=0 exch2_jHi(3,168)=52 exch2_opposingSend(3,168)=4 exch2_pij(1,3,168)=1 exch2_pij(2,3,168)=0 exch2_pij(3,3,168)=0 exch2_pij(4,3,168)=1 exch2_oi(3,168)=0 exch2_oj(3,168)=0 exch2_neighbourId(4,168)=167 exch2_iLo(4,168)=0 exch2_iHi(4,168)=0 exch2_jLo(4,168)=0 exch2_jHi(4,168)=52 exch2_opposingSend(4,168)=3 exch2_pij(1,4,168)=1 exch2_pij(2,4,168)=0 exch2_pij(3,4,168)=0 exch2_pij(4,4,168)=1 exch2_oi(4,168)=0 exch2_oj(4,168)=0 RETURN END SUBROUTINE W2_E2SETUP_169 C Topology for tile 169 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(169)=34 exch2_tNy(169)=51 exch2_tBasex(169)=102 exch2_tBasey(169)=51 exch2_txGlobalo(169)=613 exch2_tyGlobalo(169)=52 exch2_isWedge(169)=0 exch2_isNedge(169)=0 exch2_isEedge(169)=0 exch2_isSedge(169)=0 exch2_myFace(169)=2 exch2_mydNx(169)=510 exch2_mydNy(169)=510 exch2_nNeighbours(169)=4 exch2_neighbourId(1,169)=184 exch2_iLo(1,169)=0 exch2_iHi(1,169)=35 exch2_jLo(1,169)=52 exch2_jHi(1,169)=52 exch2_opposingSend(1,169)=2 exch2_pij(1,1,169)=1 exch2_pij(2,1,169)=0 exch2_pij(3,1,169)=0 exch2_pij(4,1,169)=1 exch2_oi(1,169)=0 exch2_oj(1,169)=0 exch2_neighbourId(2,169)=154 exch2_iLo(2,169)=0 exch2_iHi(2,169)=35 exch2_jLo(2,169)=0 exch2_jHi(2,169)=0 exch2_opposingSend(2,169)=1 exch2_pij(1,2,169)=1 exch2_pij(2,2,169)=0 exch2_pij(3,2,169)=0 exch2_pij(4,2,169)=1 exch2_oi(2,169)=0 exch2_oj(2,169)=0 exch2_neighbourId(3,169)=170 exch2_iLo(3,169)=35 exch2_iHi(3,169)=35 exch2_jLo(3,169)=0 exch2_jHi(3,169)=52 exch2_opposingSend(3,169)=4 exch2_pij(1,3,169)=1 exch2_pij(2,3,169)=0 exch2_pij(3,3,169)=0 exch2_pij(4,3,169)=1 exch2_oi(3,169)=0 exch2_oj(3,169)=0 exch2_neighbourId(4,169)=168 exch2_iLo(4,169)=0 exch2_iHi(4,169)=0 exch2_jLo(4,169)=0 exch2_jHi(4,169)=52 exch2_opposingSend(4,169)=3 exch2_pij(1,4,169)=1 exch2_pij(2,4,169)=0 exch2_pij(3,4,169)=0 exch2_pij(4,4,169)=1 exch2_oi(4,169)=0 exch2_oj(4,169)=0 RETURN END SUBROUTINE W2_E2SETUP_170 C Topology for tile 170 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(170)=34 exch2_tNy(170)=51 exch2_tBasex(170)=136 exch2_tBasey(170)=51 exch2_txGlobalo(170)=647 exch2_tyGlobalo(170)=52 exch2_isWedge(170)=0 exch2_isNedge(170)=0 exch2_isEedge(170)=0 exch2_isSedge(170)=0 exch2_myFace(170)=2 exch2_mydNx(170)=510 exch2_mydNy(170)=510 exch2_nNeighbours(170)=4 exch2_neighbourId(1,170)=185 exch2_iLo(1,170)=0 exch2_iHi(1,170)=35 exch2_jLo(1,170)=52 exch2_jHi(1,170)=52 exch2_opposingSend(1,170)=2 exch2_pij(1,1,170)=1 exch2_pij(2,1,170)=0 exch2_pij(3,1,170)=0 exch2_pij(4,1,170)=1 exch2_oi(1,170)=0 exch2_oj(1,170)=0 exch2_neighbourId(2,170)=155 exch2_iLo(2,170)=0 exch2_iHi(2,170)=35 exch2_jLo(2,170)=0 exch2_jHi(2,170)=0 exch2_opposingSend(2,170)=1 exch2_pij(1,2,170)=1 exch2_pij(2,2,170)=0 exch2_pij(3,2,170)=0 exch2_pij(4,2,170)=1 exch2_oi(2,170)=0 exch2_oj(2,170)=0 exch2_neighbourId(3,170)=171 exch2_iLo(3,170)=35 exch2_iHi(3,170)=35 exch2_jLo(3,170)=0 exch2_jHi(3,170)=52 exch2_opposingSend(3,170)=4 exch2_pij(1,3,170)=1 exch2_pij(2,3,170)=0 exch2_pij(3,3,170)=0 exch2_pij(4,3,170)=1 exch2_oi(3,170)=0 exch2_oj(3,170)=0 exch2_neighbourId(4,170)=169 exch2_iLo(4,170)=0 exch2_iHi(4,170)=0 exch2_jLo(4,170)=0 exch2_jHi(4,170)=52 exch2_opposingSend(4,170)=3 exch2_pij(1,4,170)=1 exch2_pij(2,4,170)=0 exch2_pij(3,4,170)=0 exch2_pij(4,4,170)=1 exch2_oi(4,170)=0 exch2_oj(4,170)=0 RETURN END SUBROUTINE W2_E2SETUP_171 C Topology for tile 171 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(171)=34 exch2_tNy(171)=51 exch2_tBasex(171)=170 exch2_tBasey(171)=51 exch2_txGlobalo(171)=681 exch2_tyGlobalo(171)=52 exch2_isWedge(171)=0 exch2_isNedge(171)=0 exch2_isEedge(171)=0 exch2_isSedge(171)=0 exch2_myFace(171)=2 exch2_mydNx(171)=510 exch2_mydNy(171)=510 exch2_nNeighbours(171)=4 exch2_neighbourId(1,171)=186 exch2_iLo(1,171)=0 exch2_iHi(1,171)=35 exch2_jLo(1,171)=52 exch2_jHi(1,171)=52 exch2_opposingSend(1,171)=2 exch2_pij(1,1,171)=1 exch2_pij(2,1,171)=0 exch2_pij(3,1,171)=0 exch2_pij(4,1,171)=1 exch2_oi(1,171)=0 exch2_oj(1,171)=0 exch2_neighbourId(2,171)=156 exch2_iLo(2,171)=0 exch2_iHi(2,171)=35 exch2_jLo(2,171)=0 exch2_jHi(2,171)=0 exch2_opposingSend(2,171)=1 exch2_pij(1,2,171)=1 exch2_pij(2,2,171)=0 exch2_pij(3,2,171)=0 exch2_pij(4,2,171)=1 exch2_oi(2,171)=0 exch2_oj(2,171)=0 exch2_neighbourId(3,171)=172 exch2_iLo(3,171)=35 exch2_iHi(3,171)=35 exch2_jLo(3,171)=0 exch2_jHi(3,171)=52 exch2_opposingSend(3,171)=4 exch2_pij(1,3,171)=1 exch2_pij(2,3,171)=0 exch2_pij(3,3,171)=0 exch2_pij(4,3,171)=1 exch2_oi(3,171)=0 exch2_oj(3,171)=0 exch2_neighbourId(4,171)=170 exch2_iLo(4,171)=0 exch2_iHi(4,171)=0 exch2_jLo(4,171)=0 exch2_jHi(4,171)=52 exch2_opposingSend(4,171)=3 exch2_pij(1,4,171)=1 exch2_pij(2,4,171)=0 exch2_pij(3,4,171)=0 exch2_pij(4,4,171)=1 exch2_oi(4,171)=0 exch2_oj(4,171)=0 RETURN END SUBROUTINE W2_E2SETUP_172 C Topology for tile 172 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(172)=34 exch2_tNy(172)=51 exch2_tBasex(172)=204 exch2_tBasey(172)=51 exch2_txGlobalo(172)=715 exch2_tyGlobalo(172)=52 exch2_isWedge(172)=0 exch2_isNedge(172)=0 exch2_isEedge(172)=0 exch2_isSedge(172)=0 exch2_myFace(172)=2 exch2_mydNx(172)=510 exch2_mydNy(172)=510 exch2_nNeighbours(172)=4 exch2_neighbourId(1,172)=187 exch2_iLo(1,172)=0 exch2_iHi(1,172)=35 exch2_jLo(1,172)=52 exch2_jHi(1,172)=52 exch2_opposingSend(1,172)=2 exch2_pij(1,1,172)=1 exch2_pij(2,1,172)=0 exch2_pij(3,1,172)=0 exch2_pij(4,1,172)=1 exch2_oi(1,172)=0 exch2_oj(1,172)=0 exch2_neighbourId(2,172)=157 exch2_iLo(2,172)=0 exch2_iHi(2,172)=35 exch2_jLo(2,172)=0 exch2_jHi(2,172)=0 exch2_opposingSend(2,172)=1 exch2_pij(1,2,172)=1 exch2_pij(2,2,172)=0 exch2_pij(3,2,172)=0 exch2_pij(4,2,172)=1 exch2_oi(2,172)=0 exch2_oj(2,172)=0 exch2_neighbourId(3,172)=173 exch2_iLo(3,172)=35 exch2_iHi(3,172)=35 exch2_jLo(3,172)=0 exch2_jHi(3,172)=52 exch2_opposingSend(3,172)=4 exch2_pij(1,3,172)=1 exch2_pij(2,3,172)=0 exch2_pij(3,3,172)=0 exch2_pij(4,3,172)=1 exch2_oi(3,172)=0 exch2_oj(3,172)=0 exch2_neighbourId(4,172)=171 exch2_iLo(4,172)=0 exch2_iHi(4,172)=0 exch2_jLo(4,172)=0 exch2_jHi(4,172)=52 exch2_opposingSend(4,172)=3 exch2_pij(1,4,172)=1 exch2_pij(2,4,172)=0 exch2_pij(3,4,172)=0 exch2_pij(4,4,172)=1 exch2_oi(4,172)=0 exch2_oj(4,172)=0 RETURN END SUBROUTINE W2_E2SETUP_173 C Topology for tile 173 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(173)=34 exch2_tNy(173)=51 exch2_tBasex(173)=238 exch2_tBasey(173)=51 exch2_txGlobalo(173)=749 exch2_tyGlobalo(173)=52 exch2_isWedge(173)=0 exch2_isNedge(173)=0 exch2_isEedge(173)=0 exch2_isSedge(173)=0 exch2_myFace(173)=2 exch2_mydNx(173)=510 exch2_mydNy(173)=510 exch2_nNeighbours(173)=4 exch2_neighbourId(1,173)=188 exch2_iLo(1,173)=0 exch2_iHi(1,173)=35 exch2_jLo(1,173)=52 exch2_jHi(1,173)=52 exch2_opposingSend(1,173)=2 exch2_pij(1,1,173)=1 exch2_pij(2,1,173)=0 exch2_pij(3,1,173)=0 exch2_pij(4,1,173)=1 exch2_oi(1,173)=0 exch2_oj(1,173)=0 exch2_neighbourId(2,173)=158 exch2_iLo(2,173)=0 exch2_iHi(2,173)=35 exch2_jLo(2,173)=0 exch2_jHi(2,173)=0 exch2_opposingSend(2,173)=1 exch2_pij(1,2,173)=1 exch2_pij(2,2,173)=0 exch2_pij(3,2,173)=0 exch2_pij(4,2,173)=1 exch2_oi(2,173)=0 exch2_oj(2,173)=0 exch2_neighbourId(3,173)=174 exch2_iLo(3,173)=35 exch2_iHi(3,173)=35 exch2_jLo(3,173)=0 exch2_jHi(3,173)=52 exch2_opposingSend(3,173)=4 exch2_pij(1,3,173)=1 exch2_pij(2,3,173)=0 exch2_pij(3,3,173)=0 exch2_pij(4,3,173)=1 exch2_oi(3,173)=0 exch2_oj(3,173)=0 exch2_neighbourId(4,173)=172 exch2_iLo(4,173)=0 exch2_iHi(4,173)=0 exch2_jLo(4,173)=0 exch2_jHi(4,173)=52 exch2_opposingSend(4,173)=3 exch2_pij(1,4,173)=1 exch2_pij(2,4,173)=0 exch2_pij(3,4,173)=0 exch2_pij(4,4,173)=1 exch2_oi(4,173)=0 exch2_oj(4,173)=0 RETURN END SUBROUTINE W2_E2SETUP_174 C Topology for tile 174 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(174)=34 exch2_tNy(174)=51 exch2_tBasex(174)=272 exch2_tBasey(174)=51 exch2_txGlobalo(174)=783 exch2_tyGlobalo(174)=52 exch2_isWedge(174)=0 exch2_isNedge(174)=0 exch2_isEedge(174)=0 exch2_isSedge(174)=0 exch2_myFace(174)=2 exch2_mydNx(174)=510 exch2_mydNy(174)=510 exch2_nNeighbours(174)=4 exch2_neighbourId(1,174)=189 exch2_iLo(1,174)=0 exch2_iHi(1,174)=35 exch2_jLo(1,174)=52 exch2_jHi(1,174)=52 exch2_opposingSend(1,174)=2 exch2_pij(1,1,174)=1 exch2_pij(2,1,174)=0 exch2_pij(3,1,174)=0 exch2_pij(4,1,174)=1 exch2_oi(1,174)=0 exch2_oj(1,174)=0 exch2_neighbourId(2,174)=159 exch2_iLo(2,174)=0 exch2_iHi(2,174)=35 exch2_jLo(2,174)=0 exch2_jHi(2,174)=0 exch2_opposingSend(2,174)=1 exch2_pij(1,2,174)=1 exch2_pij(2,2,174)=0 exch2_pij(3,2,174)=0 exch2_pij(4,2,174)=1 exch2_oi(2,174)=0 exch2_oj(2,174)=0 exch2_neighbourId(3,174)=175 exch2_iLo(3,174)=35 exch2_iHi(3,174)=35 exch2_jLo(3,174)=0 exch2_jHi(3,174)=52 exch2_opposingSend(3,174)=4 exch2_pij(1,3,174)=1 exch2_pij(2,3,174)=0 exch2_pij(3,3,174)=0 exch2_pij(4,3,174)=1 exch2_oi(3,174)=0 exch2_oj(3,174)=0 exch2_neighbourId(4,174)=173 exch2_iLo(4,174)=0 exch2_iHi(4,174)=0 exch2_jLo(4,174)=0 exch2_jHi(4,174)=52 exch2_opposingSend(4,174)=3 exch2_pij(1,4,174)=1 exch2_pij(2,4,174)=0 exch2_pij(3,4,174)=0 exch2_pij(4,4,174)=1 exch2_oi(4,174)=0 exch2_oj(4,174)=0 RETURN END SUBROUTINE W2_E2SETUP_175 C Topology for tile 175 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(175)=34 exch2_tNy(175)=51 exch2_tBasex(175)=306 exch2_tBasey(175)=51 exch2_txGlobalo(175)=817 exch2_tyGlobalo(175)=52 exch2_isWedge(175)=0 exch2_isNedge(175)=0 exch2_isEedge(175)=0 exch2_isSedge(175)=0 exch2_myFace(175)=2 exch2_mydNx(175)=510 exch2_mydNy(175)=510 exch2_nNeighbours(175)=4 exch2_neighbourId(1,175)=190 exch2_iLo(1,175)=0 exch2_iHi(1,175)=35 exch2_jLo(1,175)=52 exch2_jHi(1,175)=52 exch2_opposingSend(1,175)=2 exch2_pij(1,1,175)=1 exch2_pij(2,1,175)=0 exch2_pij(3,1,175)=0 exch2_pij(4,1,175)=1 exch2_oi(1,175)=0 exch2_oj(1,175)=0 exch2_neighbourId(2,175)=160 exch2_iLo(2,175)=0 exch2_iHi(2,175)=35 exch2_jLo(2,175)=0 exch2_jHi(2,175)=0 exch2_opposingSend(2,175)=1 exch2_pij(1,2,175)=1 exch2_pij(2,2,175)=0 exch2_pij(3,2,175)=0 exch2_pij(4,2,175)=1 exch2_oi(2,175)=0 exch2_oj(2,175)=0 exch2_neighbourId(3,175)=176 exch2_iLo(3,175)=35 exch2_iHi(3,175)=35 exch2_jLo(3,175)=0 exch2_jHi(3,175)=52 exch2_opposingSend(3,175)=4 exch2_pij(1,3,175)=1 exch2_pij(2,3,175)=0 exch2_pij(3,3,175)=0 exch2_pij(4,3,175)=1 exch2_oi(3,175)=0 exch2_oj(3,175)=0 exch2_neighbourId(4,175)=174 exch2_iLo(4,175)=0 exch2_iHi(4,175)=0 exch2_jLo(4,175)=0 exch2_jHi(4,175)=52 exch2_opposingSend(4,175)=3 exch2_pij(1,4,175)=1 exch2_pij(2,4,175)=0 exch2_pij(3,4,175)=0 exch2_pij(4,4,175)=1 exch2_oi(4,175)=0 exch2_oj(4,175)=0 RETURN END SUBROUTINE W2_E2SETUP_176 C Topology for tile 176 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(176)=34 exch2_tNy(176)=51 exch2_tBasex(176)=340 exch2_tBasey(176)=51 exch2_txGlobalo(176)=851 exch2_tyGlobalo(176)=52 exch2_isWedge(176)=0 exch2_isNedge(176)=0 exch2_isEedge(176)=0 exch2_isSedge(176)=0 exch2_myFace(176)=2 exch2_mydNx(176)=510 exch2_mydNy(176)=510 exch2_nNeighbours(176)=4 exch2_neighbourId(1,176)=191 exch2_iLo(1,176)=0 exch2_iHi(1,176)=35 exch2_jLo(1,176)=52 exch2_jHi(1,176)=52 exch2_opposingSend(1,176)=2 exch2_pij(1,1,176)=1 exch2_pij(2,1,176)=0 exch2_pij(3,1,176)=0 exch2_pij(4,1,176)=1 exch2_oi(1,176)=0 exch2_oj(1,176)=0 exch2_neighbourId(2,176)=161 exch2_iLo(2,176)=0 exch2_iHi(2,176)=35 exch2_jLo(2,176)=0 exch2_jHi(2,176)=0 exch2_opposingSend(2,176)=1 exch2_pij(1,2,176)=1 exch2_pij(2,2,176)=0 exch2_pij(3,2,176)=0 exch2_pij(4,2,176)=1 exch2_oi(2,176)=0 exch2_oj(2,176)=0 exch2_neighbourId(3,176)=177 exch2_iLo(3,176)=35 exch2_iHi(3,176)=35 exch2_jLo(3,176)=0 exch2_jHi(3,176)=52 exch2_opposingSend(3,176)=4 exch2_pij(1,3,176)=1 exch2_pij(2,3,176)=0 exch2_pij(3,3,176)=0 exch2_pij(4,3,176)=1 exch2_oi(3,176)=0 exch2_oj(3,176)=0 exch2_neighbourId(4,176)=175 exch2_iLo(4,176)=0 exch2_iHi(4,176)=0 exch2_jLo(4,176)=0 exch2_jHi(4,176)=52 exch2_opposingSend(4,176)=3 exch2_pij(1,4,176)=1 exch2_pij(2,4,176)=0 exch2_pij(3,4,176)=0 exch2_pij(4,4,176)=1 exch2_oi(4,176)=0 exch2_oj(4,176)=0 RETURN END SUBROUTINE W2_E2SETUP_177 C Topology for tile 177 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(177)=34 exch2_tNy(177)=51 exch2_tBasex(177)=374 exch2_tBasey(177)=51 exch2_txGlobalo(177)=885 exch2_tyGlobalo(177)=52 exch2_isWedge(177)=0 exch2_isNedge(177)=0 exch2_isEedge(177)=0 exch2_isSedge(177)=0 exch2_myFace(177)=2 exch2_mydNx(177)=510 exch2_mydNy(177)=510 exch2_nNeighbours(177)=4 exch2_neighbourId(1,177)=192 exch2_iLo(1,177)=0 exch2_iHi(1,177)=35 exch2_jLo(1,177)=52 exch2_jHi(1,177)=52 exch2_opposingSend(1,177)=2 exch2_pij(1,1,177)=1 exch2_pij(2,1,177)=0 exch2_pij(3,1,177)=0 exch2_pij(4,1,177)=1 exch2_oi(1,177)=0 exch2_oj(1,177)=0 exch2_neighbourId(2,177)=162 exch2_iLo(2,177)=0 exch2_iHi(2,177)=35 exch2_jLo(2,177)=0 exch2_jHi(2,177)=0 exch2_opposingSend(2,177)=1 exch2_pij(1,2,177)=1 exch2_pij(2,2,177)=0 exch2_pij(3,2,177)=0 exch2_pij(4,2,177)=1 exch2_oi(2,177)=0 exch2_oj(2,177)=0 exch2_neighbourId(3,177)=178 exch2_iLo(3,177)=35 exch2_iHi(3,177)=35 exch2_jLo(3,177)=0 exch2_jHi(3,177)=52 exch2_opposingSend(3,177)=4 exch2_pij(1,3,177)=1 exch2_pij(2,3,177)=0 exch2_pij(3,3,177)=0 exch2_pij(4,3,177)=1 exch2_oi(3,177)=0 exch2_oj(3,177)=0 exch2_neighbourId(4,177)=176 exch2_iLo(4,177)=0 exch2_iHi(4,177)=0 exch2_jLo(4,177)=0 exch2_jHi(4,177)=52 exch2_opposingSend(4,177)=3 exch2_pij(1,4,177)=1 exch2_pij(2,4,177)=0 exch2_pij(3,4,177)=0 exch2_pij(4,4,177)=1 exch2_oi(4,177)=0 exch2_oj(4,177)=0 RETURN END SUBROUTINE W2_E2SETUP_178 C Topology for tile 178 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(178)=34 exch2_tNy(178)=51 exch2_tBasex(178)=408 exch2_tBasey(178)=51 exch2_txGlobalo(178)=919 exch2_tyGlobalo(178)=52 exch2_isWedge(178)=0 exch2_isNedge(178)=0 exch2_isEedge(178)=0 exch2_isSedge(178)=0 exch2_myFace(178)=2 exch2_mydNx(178)=510 exch2_mydNy(178)=510 exch2_nNeighbours(178)=4 exch2_neighbourId(1,178)=193 exch2_iLo(1,178)=0 exch2_iHi(1,178)=35 exch2_jLo(1,178)=52 exch2_jHi(1,178)=52 exch2_opposingSend(1,178)=2 exch2_pij(1,1,178)=1 exch2_pij(2,1,178)=0 exch2_pij(3,1,178)=0 exch2_pij(4,1,178)=1 exch2_oi(1,178)=0 exch2_oj(1,178)=0 exch2_neighbourId(2,178)=163 exch2_iLo(2,178)=0 exch2_iHi(2,178)=35 exch2_jLo(2,178)=0 exch2_jHi(2,178)=0 exch2_opposingSend(2,178)=1 exch2_pij(1,2,178)=1 exch2_pij(2,2,178)=0 exch2_pij(3,2,178)=0 exch2_pij(4,2,178)=1 exch2_oi(2,178)=0 exch2_oj(2,178)=0 exch2_neighbourId(3,178)=179 exch2_iLo(3,178)=35 exch2_iHi(3,178)=35 exch2_jLo(3,178)=0 exch2_jHi(3,178)=52 exch2_opposingSend(3,178)=4 exch2_pij(1,3,178)=1 exch2_pij(2,3,178)=0 exch2_pij(3,3,178)=0 exch2_pij(4,3,178)=1 exch2_oi(3,178)=0 exch2_oj(3,178)=0 exch2_neighbourId(4,178)=177 exch2_iLo(4,178)=0 exch2_iHi(4,178)=0 exch2_jLo(4,178)=0 exch2_jHi(4,178)=52 exch2_opposingSend(4,178)=3 exch2_pij(1,4,178)=1 exch2_pij(2,4,178)=0 exch2_pij(3,4,178)=0 exch2_pij(4,4,178)=1 exch2_oi(4,178)=0 exch2_oj(4,178)=0 RETURN END SUBROUTINE W2_E2SETUP_179 C Topology for tile 179 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(179)=34 exch2_tNy(179)=51 exch2_tBasex(179)=442 exch2_tBasey(179)=51 exch2_txGlobalo(179)=953 exch2_tyGlobalo(179)=52 exch2_isWedge(179)=0 exch2_isNedge(179)=0 exch2_isEedge(179)=0 exch2_isSedge(179)=0 exch2_myFace(179)=2 exch2_mydNx(179)=510 exch2_mydNy(179)=510 exch2_nNeighbours(179)=4 exch2_neighbourId(1,179)=194 exch2_iLo(1,179)=0 exch2_iHi(1,179)=35 exch2_jLo(1,179)=52 exch2_jHi(1,179)=52 exch2_opposingSend(1,179)=2 exch2_pij(1,1,179)=1 exch2_pij(2,1,179)=0 exch2_pij(3,1,179)=0 exch2_pij(4,1,179)=1 exch2_oi(1,179)=0 exch2_oj(1,179)=0 exch2_neighbourId(2,179)=164 exch2_iLo(2,179)=0 exch2_iHi(2,179)=35 exch2_jLo(2,179)=0 exch2_jHi(2,179)=0 exch2_opposingSend(2,179)=1 exch2_pij(1,2,179)=1 exch2_pij(2,2,179)=0 exch2_pij(3,2,179)=0 exch2_pij(4,2,179)=1 exch2_oi(2,179)=0 exch2_oj(2,179)=0 exch2_neighbourId(3,179)=180 exch2_iLo(3,179)=35 exch2_iHi(3,179)=35 exch2_jLo(3,179)=0 exch2_jHi(3,179)=52 exch2_opposingSend(3,179)=5 exch2_pij(1,3,179)=1 exch2_pij(2,3,179)=0 exch2_pij(3,3,179)=0 exch2_pij(4,3,179)=1 exch2_oi(3,179)=0 exch2_oj(3,179)=0 exch2_neighbourId(4,179)=178 exch2_iLo(4,179)=0 exch2_iHi(4,179)=0 exch2_jLo(4,179)=0 exch2_jHi(4,179)=52 exch2_opposingSend(4,179)=3 exch2_pij(1,4,179)=1 exch2_pij(2,4,179)=0 exch2_pij(3,4,179)=0 exch2_pij(4,4,179)=1 exch2_oi(4,179)=0 exch2_oj(4,179)=0 RETURN END SUBROUTINE W2_E2SETUP_180 C Topology for tile 180 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(180)=34 exch2_tNy(180)=51 exch2_tBasex(180)=476 exch2_tBasey(180)=51 exch2_txGlobalo(180)=987 exch2_tyGlobalo(180)=52 exch2_isWedge(180)=0 exch2_isNedge(180)=0 exch2_isEedge(180)=1 exch2_isSedge(180)=0 exch2_myFace(180)=2 exch2_mydNx(180)=510 exch2_mydNy(180)=510 exch2_nNeighbours(180)=5 exch2_neighbourId(1,180)=195 exch2_iLo(1,180)=0 exch2_iHi(1,180)=35 exch2_jLo(1,180)=52 exch2_jHi(1,180)=52 exch2_opposingSend(1,180)=2 exch2_pij(1,1,180)=1 exch2_pij(2,1,180)=0 exch2_pij(3,1,180)=0 exch2_pij(4,1,180)=1 exch2_oi(1,180)=0 exch2_oj(1,180)=0 exch2_neighbourId(2,180)=165 exch2_iLo(2,180)=0 exch2_iHi(2,180)=35 exch2_jLo(2,180)=0 exch2_jHi(2,180)=0 exch2_opposingSend(2,180)=1 exch2_pij(1,2,180)=1 exch2_pij(2,2,180)=0 exch2_pij(3,2,180)=0 exch2_pij(4,2,180)=1 exch2_oi(2,180)=0 exch2_oj(2,180)=0 exch2_neighbourId(3,180)=463 exch2_iLo(3,180)=35 exch2_iHi(3,180)=35 exch2_jLo(3,180)=17 exch2_jHi(3,180)=52 exch2_opposingSend(3,180)=2 exch2_pij(1,3,180)=0 exch2_pij(2,3,180)=1 exch2_pij(3,3,180)=-1 exch2_pij(4,3,180)=0 exch2_oi(3,180)=510 exch2_oj(3,180)=511 exch2_neighbourId(4,180)=464 exch2_iLo(4,180)=35 exch2_iHi(4,180)=35 exch2_jLo(4,180)=0 exch2_jHi(4,180)=18 exch2_opposingSend(4,180)=3 exch2_pij(1,4,180)=0 exch2_pij(2,4,180)=1 exch2_pij(3,4,180)=-1 exch2_pij(4,4,180)=0 exch2_oi(4,180)=510 exch2_oj(4,180)=511 exch2_neighbourId(5,180)=179 exch2_iLo(5,180)=0 exch2_iHi(5,180)=0 exch2_jLo(5,180)=0 exch2_jHi(5,180)=52 exch2_opposingSend(5,180)=3 exch2_pij(1,5,180)=1 exch2_pij(2,5,180)=0 exch2_pij(3,5,180)=0 exch2_pij(4,5,180)=1 exch2_oi(5,180)=0 exch2_oj(5,180)=0 RETURN END SUBROUTINE W2_E2SETUP_181 C Topology for tile 181 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(181)=34 exch2_tNy(181)=51 exch2_tBasex(181)=0 exch2_tBasey(181)=102 exch2_txGlobalo(181)=511 exch2_tyGlobalo(181)=103 exch2_isWedge(181)=1 exch2_isNedge(181)=0 exch2_isEedge(181)=0 exch2_isSedge(181)=0 exch2_myFace(181)=2 exch2_mydNx(181)=510 exch2_mydNy(181)=510 exch2_nNeighbours(181)=4 exch2_neighbourId(1,181)=196 exch2_iLo(1,181)=0 exch2_iHi(1,181)=35 exch2_jLo(1,181)=52 exch2_jHi(1,181)=52 exch2_opposingSend(1,181)=2 exch2_pij(1,1,181)=1 exch2_pij(2,1,181)=0 exch2_pij(3,1,181)=0 exch2_pij(4,1,181)=1 exch2_oi(1,181)=0 exch2_oj(1,181)=0 exch2_neighbourId(2,181)=166 exch2_iLo(2,181)=0 exch2_iHi(2,181)=35 exch2_jLo(2,181)=0 exch2_jHi(2,181)=0 exch2_opposingSend(2,181)=1 exch2_pij(1,2,181)=1 exch2_pij(2,2,181)=0 exch2_pij(3,2,181)=0 exch2_pij(4,2,181)=1 exch2_oi(2,181)=0 exch2_oj(2,181)=0 exch2_neighbourId(3,181)=182 exch2_iLo(3,181)=35 exch2_iHi(3,181)=35 exch2_jLo(3,181)=0 exch2_jHi(3,181)=52 exch2_opposingSend(3,181)=4 exch2_pij(1,3,181)=1 exch2_pij(2,3,181)=0 exch2_pij(3,3,181)=0 exch2_pij(4,3,181)=1 exch2_oi(3,181)=0 exch2_oj(3,181)=0 exch2_neighbourId(4,181)=45 exch2_iLo(4,181)=0 exch2_iHi(4,181)=0 exch2_jLo(4,181)=0 exch2_jHi(4,181)=52 exch2_opposingSend(4,181)=3 exch2_pij(1,4,181)=1 exch2_pij(2,4,181)=0 exch2_pij(3,4,181)=0 exch2_pij(4,4,181)=1 exch2_oi(4,181)=-510 exch2_oj(4,181)=0 RETURN END SUBROUTINE W2_E2SETUP_182 C Topology for tile 182 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(182)=34 exch2_tNy(182)=51 exch2_tBasex(182)=34 exch2_tBasey(182)=102 exch2_txGlobalo(182)=545 exch2_tyGlobalo(182)=103 exch2_isWedge(182)=0 exch2_isNedge(182)=0 exch2_isEedge(182)=0 exch2_isSedge(182)=0 exch2_myFace(182)=2 exch2_mydNx(182)=510 exch2_mydNy(182)=510 exch2_nNeighbours(182)=4 exch2_neighbourId(1,182)=197 exch2_iLo(1,182)=0 exch2_iHi(1,182)=35 exch2_jLo(1,182)=52 exch2_jHi(1,182)=52 exch2_opposingSend(1,182)=2 exch2_pij(1,1,182)=1 exch2_pij(2,1,182)=0 exch2_pij(3,1,182)=0 exch2_pij(4,1,182)=1 exch2_oi(1,182)=0 exch2_oj(1,182)=0 exch2_neighbourId(2,182)=167 exch2_iLo(2,182)=0 exch2_iHi(2,182)=35 exch2_jLo(2,182)=0 exch2_jHi(2,182)=0 exch2_opposingSend(2,182)=1 exch2_pij(1,2,182)=1 exch2_pij(2,2,182)=0 exch2_pij(3,2,182)=0 exch2_pij(4,2,182)=1 exch2_oi(2,182)=0 exch2_oj(2,182)=0 exch2_neighbourId(3,182)=183 exch2_iLo(3,182)=35 exch2_iHi(3,182)=35 exch2_jLo(3,182)=0 exch2_jHi(3,182)=52 exch2_opposingSend(3,182)=4 exch2_pij(1,3,182)=1 exch2_pij(2,3,182)=0 exch2_pij(3,3,182)=0 exch2_pij(4,3,182)=1 exch2_oi(3,182)=0 exch2_oj(3,182)=0 exch2_neighbourId(4,182)=181 exch2_iLo(4,182)=0 exch2_iHi(4,182)=0 exch2_jLo(4,182)=0 exch2_jHi(4,182)=52 exch2_opposingSend(4,182)=3 exch2_pij(1,4,182)=1 exch2_pij(2,4,182)=0 exch2_pij(3,4,182)=0 exch2_pij(4,4,182)=1 exch2_oi(4,182)=0 exch2_oj(4,182)=0 RETURN END SUBROUTINE W2_E2SETUP_183 C Topology for tile 183 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(183)=34 exch2_tNy(183)=51 exch2_tBasex(183)=68 exch2_tBasey(183)=102 exch2_txGlobalo(183)=579 exch2_tyGlobalo(183)=103 exch2_isWedge(183)=0 exch2_isNedge(183)=0 exch2_isEedge(183)=0 exch2_isSedge(183)=0 exch2_myFace(183)=2 exch2_mydNx(183)=510 exch2_mydNy(183)=510 exch2_nNeighbours(183)=4 exch2_neighbourId(1,183)=198 exch2_iLo(1,183)=0 exch2_iHi(1,183)=35 exch2_jLo(1,183)=52 exch2_jHi(1,183)=52 exch2_opposingSend(1,183)=2 exch2_pij(1,1,183)=1 exch2_pij(2,1,183)=0 exch2_pij(3,1,183)=0 exch2_pij(4,1,183)=1 exch2_oi(1,183)=0 exch2_oj(1,183)=0 exch2_neighbourId(2,183)=168 exch2_iLo(2,183)=0 exch2_iHi(2,183)=35 exch2_jLo(2,183)=0 exch2_jHi(2,183)=0 exch2_opposingSend(2,183)=1 exch2_pij(1,2,183)=1 exch2_pij(2,2,183)=0 exch2_pij(3,2,183)=0 exch2_pij(4,2,183)=1 exch2_oi(2,183)=0 exch2_oj(2,183)=0 exch2_neighbourId(3,183)=184 exch2_iLo(3,183)=35 exch2_iHi(3,183)=35 exch2_jLo(3,183)=0 exch2_jHi(3,183)=52 exch2_opposingSend(3,183)=4 exch2_pij(1,3,183)=1 exch2_pij(2,3,183)=0 exch2_pij(3,3,183)=0 exch2_pij(4,3,183)=1 exch2_oi(3,183)=0 exch2_oj(3,183)=0 exch2_neighbourId(4,183)=182 exch2_iLo(4,183)=0 exch2_iHi(4,183)=0 exch2_jLo(4,183)=0 exch2_jHi(4,183)=52 exch2_opposingSend(4,183)=3 exch2_pij(1,4,183)=1 exch2_pij(2,4,183)=0 exch2_pij(3,4,183)=0 exch2_pij(4,4,183)=1 exch2_oi(4,183)=0 exch2_oj(4,183)=0 RETURN END SUBROUTINE W2_E2SETUP_184 C Topology for tile 184 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(184)=34 exch2_tNy(184)=51 exch2_tBasex(184)=102 exch2_tBasey(184)=102 exch2_txGlobalo(184)=613 exch2_tyGlobalo(184)=103 exch2_isWedge(184)=0 exch2_isNedge(184)=0 exch2_isEedge(184)=0 exch2_isSedge(184)=0 exch2_myFace(184)=2 exch2_mydNx(184)=510 exch2_mydNy(184)=510 exch2_nNeighbours(184)=4 exch2_neighbourId(1,184)=199 exch2_iLo(1,184)=0 exch2_iHi(1,184)=35 exch2_jLo(1,184)=52 exch2_jHi(1,184)=52 exch2_opposingSend(1,184)=2 exch2_pij(1,1,184)=1 exch2_pij(2,1,184)=0 exch2_pij(3,1,184)=0 exch2_pij(4,1,184)=1 exch2_oi(1,184)=0 exch2_oj(1,184)=0 exch2_neighbourId(2,184)=169 exch2_iLo(2,184)=0 exch2_iHi(2,184)=35 exch2_jLo(2,184)=0 exch2_jHi(2,184)=0 exch2_opposingSend(2,184)=1 exch2_pij(1,2,184)=1 exch2_pij(2,2,184)=0 exch2_pij(3,2,184)=0 exch2_pij(4,2,184)=1 exch2_oi(2,184)=0 exch2_oj(2,184)=0 exch2_neighbourId(3,184)=185 exch2_iLo(3,184)=35 exch2_iHi(3,184)=35 exch2_jLo(3,184)=0 exch2_jHi(3,184)=52 exch2_opposingSend(3,184)=4 exch2_pij(1,3,184)=1 exch2_pij(2,3,184)=0 exch2_pij(3,3,184)=0 exch2_pij(4,3,184)=1 exch2_oi(3,184)=0 exch2_oj(3,184)=0 exch2_neighbourId(4,184)=183 exch2_iLo(4,184)=0 exch2_iHi(4,184)=0 exch2_jLo(4,184)=0 exch2_jHi(4,184)=52 exch2_opposingSend(4,184)=3 exch2_pij(1,4,184)=1 exch2_pij(2,4,184)=0 exch2_pij(3,4,184)=0 exch2_pij(4,4,184)=1 exch2_oi(4,184)=0 exch2_oj(4,184)=0 RETURN END SUBROUTINE W2_E2SETUP_185 C Topology for tile 185 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(185)=34 exch2_tNy(185)=51 exch2_tBasex(185)=136 exch2_tBasey(185)=102 exch2_txGlobalo(185)=647 exch2_tyGlobalo(185)=103 exch2_isWedge(185)=0 exch2_isNedge(185)=0 exch2_isEedge(185)=0 exch2_isSedge(185)=0 exch2_myFace(185)=2 exch2_mydNx(185)=510 exch2_mydNy(185)=510 exch2_nNeighbours(185)=4 exch2_neighbourId(1,185)=200 exch2_iLo(1,185)=0 exch2_iHi(1,185)=35 exch2_jLo(1,185)=52 exch2_jHi(1,185)=52 exch2_opposingSend(1,185)=2 exch2_pij(1,1,185)=1 exch2_pij(2,1,185)=0 exch2_pij(3,1,185)=0 exch2_pij(4,1,185)=1 exch2_oi(1,185)=0 exch2_oj(1,185)=0 exch2_neighbourId(2,185)=170 exch2_iLo(2,185)=0 exch2_iHi(2,185)=35 exch2_jLo(2,185)=0 exch2_jHi(2,185)=0 exch2_opposingSend(2,185)=1 exch2_pij(1,2,185)=1 exch2_pij(2,2,185)=0 exch2_pij(3,2,185)=0 exch2_pij(4,2,185)=1 exch2_oi(2,185)=0 exch2_oj(2,185)=0 exch2_neighbourId(3,185)=186 exch2_iLo(3,185)=35 exch2_iHi(3,185)=35 exch2_jLo(3,185)=0 exch2_jHi(3,185)=52 exch2_opposingSend(3,185)=4 exch2_pij(1,3,185)=1 exch2_pij(2,3,185)=0 exch2_pij(3,3,185)=0 exch2_pij(4,3,185)=1 exch2_oi(3,185)=0 exch2_oj(3,185)=0 exch2_neighbourId(4,185)=184 exch2_iLo(4,185)=0 exch2_iHi(4,185)=0 exch2_jLo(4,185)=0 exch2_jHi(4,185)=52 exch2_opposingSend(4,185)=3 exch2_pij(1,4,185)=1 exch2_pij(2,4,185)=0 exch2_pij(3,4,185)=0 exch2_pij(4,4,185)=1 exch2_oi(4,185)=0 exch2_oj(4,185)=0 RETURN END SUBROUTINE W2_E2SETUP_186 C Topology for tile 186 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(186)=34 exch2_tNy(186)=51 exch2_tBasex(186)=170 exch2_tBasey(186)=102 exch2_txGlobalo(186)=681 exch2_tyGlobalo(186)=103 exch2_isWedge(186)=0 exch2_isNedge(186)=0 exch2_isEedge(186)=0 exch2_isSedge(186)=0 exch2_myFace(186)=2 exch2_mydNx(186)=510 exch2_mydNy(186)=510 exch2_nNeighbours(186)=4 exch2_neighbourId(1,186)=201 exch2_iLo(1,186)=0 exch2_iHi(1,186)=35 exch2_jLo(1,186)=52 exch2_jHi(1,186)=52 exch2_opposingSend(1,186)=2 exch2_pij(1,1,186)=1 exch2_pij(2,1,186)=0 exch2_pij(3,1,186)=0 exch2_pij(4,1,186)=1 exch2_oi(1,186)=0 exch2_oj(1,186)=0 exch2_neighbourId(2,186)=171 exch2_iLo(2,186)=0 exch2_iHi(2,186)=35 exch2_jLo(2,186)=0 exch2_jHi(2,186)=0 exch2_opposingSend(2,186)=1 exch2_pij(1,2,186)=1 exch2_pij(2,2,186)=0 exch2_pij(3,2,186)=0 exch2_pij(4,2,186)=1 exch2_oi(2,186)=0 exch2_oj(2,186)=0 exch2_neighbourId(3,186)=187 exch2_iLo(3,186)=35 exch2_iHi(3,186)=35 exch2_jLo(3,186)=0 exch2_jHi(3,186)=52 exch2_opposingSend(3,186)=4 exch2_pij(1,3,186)=1 exch2_pij(2,3,186)=0 exch2_pij(3,3,186)=0 exch2_pij(4,3,186)=1 exch2_oi(3,186)=0 exch2_oj(3,186)=0 exch2_neighbourId(4,186)=185 exch2_iLo(4,186)=0 exch2_iHi(4,186)=0 exch2_jLo(4,186)=0 exch2_jHi(4,186)=52 exch2_opposingSend(4,186)=3 exch2_pij(1,4,186)=1 exch2_pij(2,4,186)=0 exch2_pij(3,4,186)=0 exch2_pij(4,4,186)=1 exch2_oi(4,186)=0 exch2_oj(4,186)=0 RETURN END SUBROUTINE W2_E2SETUP_187 C Topology for tile 187 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(187)=34 exch2_tNy(187)=51 exch2_tBasex(187)=204 exch2_tBasey(187)=102 exch2_txGlobalo(187)=715 exch2_tyGlobalo(187)=103 exch2_isWedge(187)=0 exch2_isNedge(187)=0 exch2_isEedge(187)=0 exch2_isSedge(187)=0 exch2_myFace(187)=2 exch2_mydNx(187)=510 exch2_mydNy(187)=510 exch2_nNeighbours(187)=4 exch2_neighbourId(1,187)=202 exch2_iLo(1,187)=0 exch2_iHi(1,187)=35 exch2_jLo(1,187)=52 exch2_jHi(1,187)=52 exch2_opposingSend(1,187)=2 exch2_pij(1,1,187)=1 exch2_pij(2,1,187)=0 exch2_pij(3,1,187)=0 exch2_pij(4,1,187)=1 exch2_oi(1,187)=0 exch2_oj(1,187)=0 exch2_neighbourId(2,187)=172 exch2_iLo(2,187)=0 exch2_iHi(2,187)=35 exch2_jLo(2,187)=0 exch2_jHi(2,187)=0 exch2_opposingSend(2,187)=1 exch2_pij(1,2,187)=1 exch2_pij(2,2,187)=0 exch2_pij(3,2,187)=0 exch2_pij(4,2,187)=1 exch2_oi(2,187)=0 exch2_oj(2,187)=0 exch2_neighbourId(3,187)=188 exch2_iLo(3,187)=35 exch2_iHi(3,187)=35 exch2_jLo(3,187)=0 exch2_jHi(3,187)=52 exch2_opposingSend(3,187)=4 exch2_pij(1,3,187)=1 exch2_pij(2,3,187)=0 exch2_pij(3,3,187)=0 exch2_pij(4,3,187)=1 exch2_oi(3,187)=0 exch2_oj(3,187)=0 exch2_neighbourId(4,187)=186 exch2_iLo(4,187)=0 exch2_iHi(4,187)=0 exch2_jLo(4,187)=0 exch2_jHi(4,187)=52 exch2_opposingSend(4,187)=3 exch2_pij(1,4,187)=1 exch2_pij(2,4,187)=0 exch2_pij(3,4,187)=0 exch2_pij(4,4,187)=1 exch2_oi(4,187)=0 exch2_oj(4,187)=0 RETURN END SUBROUTINE W2_E2SETUP_188 C Topology for tile 188 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(188)=34 exch2_tNy(188)=51 exch2_tBasex(188)=238 exch2_tBasey(188)=102 exch2_txGlobalo(188)=749 exch2_tyGlobalo(188)=103 exch2_isWedge(188)=0 exch2_isNedge(188)=0 exch2_isEedge(188)=0 exch2_isSedge(188)=0 exch2_myFace(188)=2 exch2_mydNx(188)=510 exch2_mydNy(188)=510 exch2_nNeighbours(188)=4 exch2_neighbourId(1,188)=203 exch2_iLo(1,188)=0 exch2_iHi(1,188)=35 exch2_jLo(1,188)=52 exch2_jHi(1,188)=52 exch2_opposingSend(1,188)=2 exch2_pij(1,1,188)=1 exch2_pij(2,1,188)=0 exch2_pij(3,1,188)=0 exch2_pij(4,1,188)=1 exch2_oi(1,188)=0 exch2_oj(1,188)=0 exch2_neighbourId(2,188)=173 exch2_iLo(2,188)=0 exch2_iHi(2,188)=35 exch2_jLo(2,188)=0 exch2_jHi(2,188)=0 exch2_opposingSend(2,188)=1 exch2_pij(1,2,188)=1 exch2_pij(2,2,188)=0 exch2_pij(3,2,188)=0 exch2_pij(4,2,188)=1 exch2_oi(2,188)=0 exch2_oj(2,188)=0 exch2_neighbourId(3,188)=189 exch2_iLo(3,188)=35 exch2_iHi(3,188)=35 exch2_jLo(3,188)=0 exch2_jHi(3,188)=52 exch2_opposingSend(3,188)=4 exch2_pij(1,3,188)=1 exch2_pij(2,3,188)=0 exch2_pij(3,3,188)=0 exch2_pij(4,3,188)=1 exch2_oi(3,188)=0 exch2_oj(3,188)=0 exch2_neighbourId(4,188)=187 exch2_iLo(4,188)=0 exch2_iHi(4,188)=0 exch2_jLo(4,188)=0 exch2_jHi(4,188)=52 exch2_opposingSend(4,188)=3 exch2_pij(1,4,188)=1 exch2_pij(2,4,188)=0 exch2_pij(3,4,188)=0 exch2_pij(4,4,188)=1 exch2_oi(4,188)=0 exch2_oj(4,188)=0 RETURN END SUBROUTINE W2_E2SETUP_189 C Topology for tile 189 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(189)=34 exch2_tNy(189)=51 exch2_tBasex(189)=272 exch2_tBasey(189)=102 exch2_txGlobalo(189)=783 exch2_tyGlobalo(189)=103 exch2_isWedge(189)=0 exch2_isNedge(189)=0 exch2_isEedge(189)=0 exch2_isSedge(189)=0 exch2_myFace(189)=2 exch2_mydNx(189)=510 exch2_mydNy(189)=510 exch2_nNeighbours(189)=4 exch2_neighbourId(1,189)=204 exch2_iLo(1,189)=0 exch2_iHi(1,189)=35 exch2_jLo(1,189)=52 exch2_jHi(1,189)=52 exch2_opposingSend(1,189)=2 exch2_pij(1,1,189)=1 exch2_pij(2,1,189)=0 exch2_pij(3,1,189)=0 exch2_pij(4,1,189)=1 exch2_oi(1,189)=0 exch2_oj(1,189)=0 exch2_neighbourId(2,189)=174 exch2_iLo(2,189)=0 exch2_iHi(2,189)=35 exch2_jLo(2,189)=0 exch2_jHi(2,189)=0 exch2_opposingSend(2,189)=1 exch2_pij(1,2,189)=1 exch2_pij(2,2,189)=0 exch2_pij(3,2,189)=0 exch2_pij(4,2,189)=1 exch2_oi(2,189)=0 exch2_oj(2,189)=0 exch2_neighbourId(3,189)=190 exch2_iLo(3,189)=35 exch2_iHi(3,189)=35 exch2_jLo(3,189)=0 exch2_jHi(3,189)=52 exch2_opposingSend(3,189)=4 exch2_pij(1,3,189)=1 exch2_pij(2,3,189)=0 exch2_pij(3,3,189)=0 exch2_pij(4,3,189)=1 exch2_oi(3,189)=0 exch2_oj(3,189)=0 exch2_neighbourId(4,189)=188 exch2_iLo(4,189)=0 exch2_iHi(4,189)=0 exch2_jLo(4,189)=0 exch2_jHi(4,189)=52 exch2_opposingSend(4,189)=3 exch2_pij(1,4,189)=1 exch2_pij(2,4,189)=0 exch2_pij(3,4,189)=0 exch2_pij(4,4,189)=1 exch2_oi(4,189)=0 exch2_oj(4,189)=0 RETURN END SUBROUTINE W2_E2SETUP_190 C Topology for tile 190 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(190)=34 exch2_tNy(190)=51 exch2_tBasex(190)=306 exch2_tBasey(190)=102 exch2_txGlobalo(190)=817 exch2_tyGlobalo(190)=103 exch2_isWedge(190)=0 exch2_isNedge(190)=0 exch2_isEedge(190)=0 exch2_isSedge(190)=0 exch2_myFace(190)=2 exch2_mydNx(190)=510 exch2_mydNy(190)=510 exch2_nNeighbours(190)=4 exch2_neighbourId(1,190)=205 exch2_iLo(1,190)=0 exch2_iHi(1,190)=35 exch2_jLo(1,190)=52 exch2_jHi(1,190)=52 exch2_opposingSend(1,190)=2 exch2_pij(1,1,190)=1 exch2_pij(2,1,190)=0 exch2_pij(3,1,190)=0 exch2_pij(4,1,190)=1 exch2_oi(1,190)=0 exch2_oj(1,190)=0 exch2_neighbourId(2,190)=175 exch2_iLo(2,190)=0 exch2_iHi(2,190)=35 exch2_jLo(2,190)=0 exch2_jHi(2,190)=0 exch2_opposingSend(2,190)=1 exch2_pij(1,2,190)=1 exch2_pij(2,2,190)=0 exch2_pij(3,2,190)=0 exch2_pij(4,2,190)=1 exch2_oi(2,190)=0 exch2_oj(2,190)=0 exch2_neighbourId(3,190)=191 exch2_iLo(3,190)=35 exch2_iHi(3,190)=35 exch2_jLo(3,190)=0 exch2_jHi(3,190)=52 exch2_opposingSend(3,190)=4 exch2_pij(1,3,190)=1 exch2_pij(2,3,190)=0 exch2_pij(3,3,190)=0 exch2_pij(4,3,190)=1 exch2_oi(3,190)=0 exch2_oj(3,190)=0 exch2_neighbourId(4,190)=189 exch2_iLo(4,190)=0 exch2_iHi(4,190)=0 exch2_jLo(4,190)=0 exch2_jHi(4,190)=52 exch2_opposingSend(4,190)=3 exch2_pij(1,4,190)=1 exch2_pij(2,4,190)=0 exch2_pij(3,4,190)=0 exch2_pij(4,4,190)=1 exch2_oi(4,190)=0 exch2_oj(4,190)=0 RETURN END SUBROUTINE W2_E2SETUP_191 C Topology for tile 191 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(191)=34 exch2_tNy(191)=51 exch2_tBasex(191)=340 exch2_tBasey(191)=102 exch2_txGlobalo(191)=851 exch2_tyGlobalo(191)=103 exch2_isWedge(191)=0 exch2_isNedge(191)=0 exch2_isEedge(191)=0 exch2_isSedge(191)=0 exch2_myFace(191)=2 exch2_mydNx(191)=510 exch2_mydNy(191)=510 exch2_nNeighbours(191)=4 exch2_neighbourId(1,191)=206 exch2_iLo(1,191)=0 exch2_iHi(1,191)=35 exch2_jLo(1,191)=52 exch2_jHi(1,191)=52 exch2_opposingSend(1,191)=2 exch2_pij(1,1,191)=1 exch2_pij(2,1,191)=0 exch2_pij(3,1,191)=0 exch2_pij(4,1,191)=1 exch2_oi(1,191)=0 exch2_oj(1,191)=0 exch2_neighbourId(2,191)=176 exch2_iLo(2,191)=0 exch2_iHi(2,191)=35 exch2_jLo(2,191)=0 exch2_jHi(2,191)=0 exch2_opposingSend(2,191)=1 exch2_pij(1,2,191)=1 exch2_pij(2,2,191)=0 exch2_pij(3,2,191)=0 exch2_pij(4,2,191)=1 exch2_oi(2,191)=0 exch2_oj(2,191)=0 exch2_neighbourId(3,191)=192 exch2_iLo(3,191)=35 exch2_iHi(3,191)=35 exch2_jLo(3,191)=0 exch2_jHi(3,191)=52 exch2_opposingSend(3,191)=4 exch2_pij(1,3,191)=1 exch2_pij(2,3,191)=0 exch2_pij(3,3,191)=0 exch2_pij(4,3,191)=1 exch2_oi(3,191)=0 exch2_oj(3,191)=0 exch2_neighbourId(4,191)=190 exch2_iLo(4,191)=0 exch2_iHi(4,191)=0 exch2_jLo(4,191)=0 exch2_jHi(4,191)=52 exch2_opposingSend(4,191)=3 exch2_pij(1,4,191)=1 exch2_pij(2,4,191)=0 exch2_pij(3,4,191)=0 exch2_pij(4,4,191)=1 exch2_oi(4,191)=0 exch2_oj(4,191)=0 RETURN END SUBROUTINE W2_E2SETUP_192 C Topology for tile 192 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(192)=34 exch2_tNy(192)=51 exch2_tBasex(192)=374 exch2_tBasey(192)=102 exch2_txGlobalo(192)=885 exch2_tyGlobalo(192)=103 exch2_isWedge(192)=0 exch2_isNedge(192)=0 exch2_isEedge(192)=0 exch2_isSedge(192)=0 exch2_myFace(192)=2 exch2_mydNx(192)=510 exch2_mydNy(192)=510 exch2_nNeighbours(192)=4 exch2_neighbourId(1,192)=207 exch2_iLo(1,192)=0 exch2_iHi(1,192)=35 exch2_jLo(1,192)=52 exch2_jHi(1,192)=52 exch2_opposingSend(1,192)=2 exch2_pij(1,1,192)=1 exch2_pij(2,1,192)=0 exch2_pij(3,1,192)=0 exch2_pij(4,1,192)=1 exch2_oi(1,192)=0 exch2_oj(1,192)=0 exch2_neighbourId(2,192)=177 exch2_iLo(2,192)=0 exch2_iHi(2,192)=35 exch2_jLo(2,192)=0 exch2_jHi(2,192)=0 exch2_opposingSend(2,192)=1 exch2_pij(1,2,192)=1 exch2_pij(2,2,192)=0 exch2_pij(3,2,192)=0 exch2_pij(4,2,192)=1 exch2_oi(2,192)=0 exch2_oj(2,192)=0 exch2_neighbourId(3,192)=193 exch2_iLo(3,192)=35 exch2_iHi(3,192)=35 exch2_jLo(3,192)=0 exch2_jHi(3,192)=52 exch2_opposingSend(3,192)=4 exch2_pij(1,3,192)=1 exch2_pij(2,3,192)=0 exch2_pij(3,3,192)=0 exch2_pij(4,3,192)=1 exch2_oi(3,192)=0 exch2_oj(3,192)=0 exch2_neighbourId(4,192)=191 exch2_iLo(4,192)=0 exch2_iHi(4,192)=0 exch2_jLo(4,192)=0 exch2_jHi(4,192)=52 exch2_opposingSend(4,192)=3 exch2_pij(1,4,192)=1 exch2_pij(2,4,192)=0 exch2_pij(3,4,192)=0 exch2_pij(4,4,192)=1 exch2_oi(4,192)=0 exch2_oj(4,192)=0 RETURN END SUBROUTINE W2_E2SETUP_193 C Topology for tile 193 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(193)=34 exch2_tNy(193)=51 exch2_tBasex(193)=408 exch2_tBasey(193)=102 exch2_txGlobalo(193)=919 exch2_tyGlobalo(193)=103 exch2_isWedge(193)=0 exch2_isNedge(193)=0 exch2_isEedge(193)=0 exch2_isSedge(193)=0 exch2_myFace(193)=2 exch2_mydNx(193)=510 exch2_mydNy(193)=510 exch2_nNeighbours(193)=4 exch2_neighbourId(1,193)=208 exch2_iLo(1,193)=0 exch2_iHi(1,193)=35 exch2_jLo(1,193)=52 exch2_jHi(1,193)=52 exch2_opposingSend(1,193)=2 exch2_pij(1,1,193)=1 exch2_pij(2,1,193)=0 exch2_pij(3,1,193)=0 exch2_pij(4,1,193)=1 exch2_oi(1,193)=0 exch2_oj(1,193)=0 exch2_neighbourId(2,193)=178 exch2_iLo(2,193)=0 exch2_iHi(2,193)=35 exch2_jLo(2,193)=0 exch2_jHi(2,193)=0 exch2_opposingSend(2,193)=1 exch2_pij(1,2,193)=1 exch2_pij(2,2,193)=0 exch2_pij(3,2,193)=0 exch2_pij(4,2,193)=1 exch2_oi(2,193)=0 exch2_oj(2,193)=0 exch2_neighbourId(3,193)=194 exch2_iLo(3,193)=35 exch2_iHi(3,193)=35 exch2_jLo(3,193)=0 exch2_jHi(3,193)=52 exch2_opposingSend(3,193)=4 exch2_pij(1,3,193)=1 exch2_pij(2,3,193)=0 exch2_pij(3,3,193)=0 exch2_pij(4,3,193)=1 exch2_oi(3,193)=0 exch2_oj(3,193)=0 exch2_neighbourId(4,193)=192 exch2_iLo(4,193)=0 exch2_iHi(4,193)=0 exch2_jLo(4,193)=0 exch2_jHi(4,193)=52 exch2_opposingSend(4,193)=3 exch2_pij(1,4,193)=1 exch2_pij(2,4,193)=0 exch2_pij(3,4,193)=0 exch2_pij(4,4,193)=1 exch2_oi(4,193)=0 exch2_oj(4,193)=0 RETURN END SUBROUTINE W2_E2SETUP_194 C Topology for tile 194 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(194)=34 exch2_tNy(194)=51 exch2_tBasex(194)=442 exch2_tBasey(194)=102 exch2_txGlobalo(194)=953 exch2_tyGlobalo(194)=103 exch2_isWedge(194)=0 exch2_isNedge(194)=0 exch2_isEedge(194)=0 exch2_isSedge(194)=0 exch2_myFace(194)=2 exch2_mydNx(194)=510 exch2_mydNy(194)=510 exch2_nNeighbours(194)=4 exch2_neighbourId(1,194)=209 exch2_iLo(1,194)=0 exch2_iHi(1,194)=35 exch2_jLo(1,194)=52 exch2_jHi(1,194)=52 exch2_opposingSend(1,194)=2 exch2_pij(1,1,194)=1 exch2_pij(2,1,194)=0 exch2_pij(3,1,194)=0 exch2_pij(4,1,194)=1 exch2_oi(1,194)=0 exch2_oj(1,194)=0 exch2_neighbourId(2,194)=179 exch2_iLo(2,194)=0 exch2_iHi(2,194)=35 exch2_jLo(2,194)=0 exch2_jHi(2,194)=0 exch2_opposingSend(2,194)=1 exch2_pij(1,2,194)=1 exch2_pij(2,2,194)=0 exch2_pij(3,2,194)=0 exch2_pij(4,2,194)=1 exch2_oi(2,194)=0 exch2_oj(2,194)=0 exch2_neighbourId(3,194)=195 exch2_iLo(3,194)=35 exch2_iHi(3,194)=35 exch2_jLo(3,194)=0 exch2_jHi(3,194)=52 exch2_opposingSend(3,194)=5 exch2_pij(1,3,194)=1 exch2_pij(2,3,194)=0 exch2_pij(3,3,194)=0 exch2_pij(4,3,194)=1 exch2_oi(3,194)=0 exch2_oj(3,194)=0 exch2_neighbourId(4,194)=193 exch2_iLo(4,194)=0 exch2_iHi(4,194)=0 exch2_jLo(4,194)=0 exch2_jHi(4,194)=52 exch2_opposingSend(4,194)=3 exch2_pij(1,4,194)=1 exch2_pij(2,4,194)=0 exch2_pij(3,4,194)=0 exch2_pij(4,4,194)=1 exch2_oi(4,194)=0 exch2_oj(4,194)=0 RETURN END SUBROUTINE W2_E2SETUP_195 C Topology for tile 195 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(195)=34 exch2_tNy(195)=51 exch2_tBasex(195)=476 exch2_tBasey(195)=102 exch2_txGlobalo(195)=987 exch2_tyGlobalo(195)=103 exch2_isWedge(195)=0 exch2_isNedge(195)=0 exch2_isEedge(195)=1 exch2_isSedge(195)=0 exch2_myFace(195)=2 exch2_mydNx(195)=510 exch2_mydNy(195)=510 exch2_nNeighbours(195)=5 exch2_neighbourId(1,195)=210 exch2_iLo(1,195)=0 exch2_iHi(1,195)=35 exch2_jLo(1,195)=52 exch2_jHi(1,195)=52 exch2_opposingSend(1,195)=2 exch2_pij(1,1,195)=1 exch2_pij(2,1,195)=0 exch2_pij(3,1,195)=0 exch2_pij(4,1,195)=1 exch2_oi(1,195)=0 exch2_oj(1,195)=0 exch2_neighbourId(2,195)=180 exch2_iLo(2,195)=0 exch2_iHi(2,195)=35 exch2_jLo(2,195)=0 exch2_jHi(2,195)=0 exch2_opposingSend(2,195)=1 exch2_pij(1,2,195)=1 exch2_pij(2,2,195)=0 exch2_pij(3,2,195)=0 exch2_pij(4,2,195)=1 exch2_oi(2,195)=0 exch2_oj(2,195)=0 exch2_neighbourId(3,195)=461 exch2_iLo(3,195)=35 exch2_iHi(3,195)=35 exch2_jLo(3,195)=34 exch2_jHi(3,195)=52 exch2_opposingSend(3,195)=2 exch2_pij(1,3,195)=0 exch2_pij(2,3,195)=1 exch2_pij(3,3,195)=-1 exch2_pij(4,3,195)=0 exch2_oi(3,195)=510 exch2_oj(3,195)=511 exch2_neighbourId(4,195)=462 exch2_iLo(4,195)=35 exch2_iHi(4,195)=35 exch2_jLo(4,195)=0 exch2_jHi(4,195)=35 exch2_opposingSend(4,195)=2 exch2_pij(1,4,195)=0 exch2_pij(2,4,195)=1 exch2_pij(3,4,195)=-1 exch2_pij(4,4,195)=0 exch2_oi(4,195)=510 exch2_oj(4,195)=511 exch2_neighbourId(5,195)=194 exch2_iLo(5,195)=0 exch2_iHi(5,195)=0 exch2_jLo(5,195)=0 exch2_jHi(5,195)=52 exch2_opposingSend(5,195)=3 exch2_pij(1,5,195)=1 exch2_pij(2,5,195)=0 exch2_pij(3,5,195)=0 exch2_pij(4,5,195)=1 exch2_oi(5,195)=0 exch2_oj(5,195)=0 RETURN END SUBROUTINE W2_E2SETUP_196 C Topology for tile 196 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(196)=34 exch2_tNy(196)=51 exch2_tBasex(196)=0 exch2_tBasey(196)=153 exch2_txGlobalo(196)=511 exch2_tyGlobalo(196)=154 exch2_isWedge(196)=1 exch2_isNedge(196)=0 exch2_isEedge(196)=0 exch2_isSedge(196)=0 exch2_myFace(196)=2 exch2_mydNx(196)=510 exch2_mydNy(196)=510 exch2_nNeighbours(196)=4 exch2_neighbourId(1,196)=211 exch2_iLo(1,196)=0 exch2_iHi(1,196)=35 exch2_jLo(1,196)=52 exch2_jHi(1,196)=52 exch2_opposingSend(1,196)=2 exch2_pij(1,1,196)=1 exch2_pij(2,1,196)=0 exch2_pij(3,1,196)=0 exch2_pij(4,1,196)=1 exch2_oi(1,196)=0 exch2_oj(1,196)=0 exch2_neighbourId(2,196)=181 exch2_iLo(2,196)=0 exch2_iHi(2,196)=35 exch2_jLo(2,196)=0 exch2_jHi(2,196)=0 exch2_opposingSend(2,196)=1 exch2_pij(1,2,196)=1 exch2_pij(2,2,196)=0 exch2_pij(3,2,196)=0 exch2_pij(4,2,196)=1 exch2_oi(2,196)=0 exch2_oj(2,196)=0 exch2_neighbourId(3,196)=197 exch2_iLo(3,196)=35 exch2_iHi(3,196)=35 exch2_jLo(3,196)=0 exch2_jHi(3,196)=52 exch2_opposingSend(3,196)=4 exch2_pij(1,3,196)=1 exch2_pij(2,3,196)=0 exch2_pij(3,3,196)=0 exch2_pij(4,3,196)=1 exch2_oi(3,196)=0 exch2_oj(3,196)=0 exch2_neighbourId(4,196)=60 exch2_iLo(4,196)=0 exch2_iHi(4,196)=0 exch2_jLo(4,196)=0 exch2_jHi(4,196)=52 exch2_opposingSend(4,196)=3 exch2_pij(1,4,196)=1 exch2_pij(2,4,196)=0 exch2_pij(3,4,196)=0 exch2_pij(4,4,196)=1 exch2_oi(4,196)=-510 exch2_oj(4,196)=0 RETURN END SUBROUTINE W2_E2SETUP_197 C Topology for tile 197 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(197)=34 exch2_tNy(197)=51 exch2_tBasex(197)=34 exch2_tBasey(197)=153 exch2_txGlobalo(197)=545 exch2_tyGlobalo(197)=154 exch2_isWedge(197)=0 exch2_isNedge(197)=0 exch2_isEedge(197)=0 exch2_isSedge(197)=0 exch2_myFace(197)=2 exch2_mydNx(197)=510 exch2_mydNy(197)=510 exch2_nNeighbours(197)=4 exch2_neighbourId(1,197)=212 exch2_iLo(1,197)=0 exch2_iHi(1,197)=35 exch2_jLo(1,197)=52 exch2_jHi(1,197)=52 exch2_opposingSend(1,197)=2 exch2_pij(1,1,197)=1 exch2_pij(2,1,197)=0 exch2_pij(3,1,197)=0 exch2_pij(4,1,197)=1 exch2_oi(1,197)=0 exch2_oj(1,197)=0 exch2_neighbourId(2,197)=182 exch2_iLo(2,197)=0 exch2_iHi(2,197)=35 exch2_jLo(2,197)=0 exch2_jHi(2,197)=0 exch2_opposingSend(2,197)=1 exch2_pij(1,2,197)=1 exch2_pij(2,2,197)=0 exch2_pij(3,2,197)=0 exch2_pij(4,2,197)=1 exch2_oi(2,197)=0 exch2_oj(2,197)=0 exch2_neighbourId(3,197)=198 exch2_iLo(3,197)=35 exch2_iHi(3,197)=35 exch2_jLo(3,197)=0 exch2_jHi(3,197)=52 exch2_opposingSend(3,197)=4 exch2_pij(1,3,197)=1 exch2_pij(2,3,197)=0 exch2_pij(3,3,197)=0 exch2_pij(4,3,197)=1 exch2_oi(3,197)=0 exch2_oj(3,197)=0 exch2_neighbourId(4,197)=196 exch2_iLo(4,197)=0 exch2_iHi(4,197)=0 exch2_jLo(4,197)=0 exch2_jHi(4,197)=52 exch2_opposingSend(4,197)=3 exch2_pij(1,4,197)=1 exch2_pij(2,4,197)=0 exch2_pij(3,4,197)=0 exch2_pij(4,4,197)=1 exch2_oi(4,197)=0 exch2_oj(4,197)=0 RETURN END SUBROUTINE W2_E2SETUP_198 C Topology for tile 198 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(198)=34 exch2_tNy(198)=51 exch2_tBasex(198)=68 exch2_tBasey(198)=153 exch2_txGlobalo(198)=579 exch2_tyGlobalo(198)=154 exch2_isWedge(198)=0 exch2_isNedge(198)=0 exch2_isEedge(198)=0 exch2_isSedge(198)=0 exch2_myFace(198)=2 exch2_mydNx(198)=510 exch2_mydNy(198)=510 exch2_nNeighbours(198)=4 exch2_neighbourId(1,198)=213 exch2_iLo(1,198)=0 exch2_iHi(1,198)=35 exch2_jLo(1,198)=52 exch2_jHi(1,198)=52 exch2_opposingSend(1,198)=2 exch2_pij(1,1,198)=1 exch2_pij(2,1,198)=0 exch2_pij(3,1,198)=0 exch2_pij(4,1,198)=1 exch2_oi(1,198)=0 exch2_oj(1,198)=0 exch2_neighbourId(2,198)=183 exch2_iLo(2,198)=0 exch2_iHi(2,198)=35 exch2_jLo(2,198)=0 exch2_jHi(2,198)=0 exch2_opposingSend(2,198)=1 exch2_pij(1,2,198)=1 exch2_pij(2,2,198)=0 exch2_pij(3,2,198)=0 exch2_pij(4,2,198)=1 exch2_oi(2,198)=0 exch2_oj(2,198)=0 exch2_neighbourId(3,198)=199 exch2_iLo(3,198)=35 exch2_iHi(3,198)=35 exch2_jLo(3,198)=0 exch2_jHi(3,198)=52 exch2_opposingSend(3,198)=4 exch2_pij(1,3,198)=1 exch2_pij(2,3,198)=0 exch2_pij(3,3,198)=0 exch2_pij(4,3,198)=1 exch2_oi(3,198)=0 exch2_oj(3,198)=0 exch2_neighbourId(4,198)=197 exch2_iLo(4,198)=0 exch2_iHi(4,198)=0 exch2_jLo(4,198)=0 exch2_jHi(4,198)=52 exch2_opposingSend(4,198)=3 exch2_pij(1,4,198)=1 exch2_pij(2,4,198)=0 exch2_pij(3,4,198)=0 exch2_pij(4,4,198)=1 exch2_oi(4,198)=0 exch2_oj(4,198)=0 RETURN END SUBROUTINE W2_E2SETUP_199 C Topology for tile 199 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(199)=34 exch2_tNy(199)=51 exch2_tBasex(199)=102 exch2_tBasey(199)=153 exch2_txGlobalo(199)=613 exch2_tyGlobalo(199)=154 exch2_isWedge(199)=0 exch2_isNedge(199)=0 exch2_isEedge(199)=0 exch2_isSedge(199)=0 exch2_myFace(199)=2 exch2_mydNx(199)=510 exch2_mydNy(199)=510 exch2_nNeighbours(199)=4 exch2_neighbourId(1,199)=214 exch2_iLo(1,199)=0 exch2_iHi(1,199)=35 exch2_jLo(1,199)=52 exch2_jHi(1,199)=52 exch2_opposingSend(1,199)=2 exch2_pij(1,1,199)=1 exch2_pij(2,1,199)=0 exch2_pij(3,1,199)=0 exch2_pij(4,1,199)=1 exch2_oi(1,199)=0 exch2_oj(1,199)=0 exch2_neighbourId(2,199)=184 exch2_iLo(2,199)=0 exch2_iHi(2,199)=35 exch2_jLo(2,199)=0 exch2_jHi(2,199)=0 exch2_opposingSend(2,199)=1 exch2_pij(1,2,199)=1 exch2_pij(2,2,199)=0 exch2_pij(3,2,199)=0 exch2_pij(4,2,199)=1 exch2_oi(2,199)=0 exch2_oj(2,199)=0 exch2_neighbourId(3,199)=200 exch2_iLo(3,199)=35 exch2_iHi(3,199)=35 exch2_jLo(3,199)=0 exch2_jHi(3,199)=52 exch2_opposingSend(3,199)=4 exch2_pij(1,3,199)=1 exch2_pij(2,3,199)=0 exch2_pij(3,3,199)=0 exch2_pij(4,3,199)=1 exch2_oi(3,199)=0 exch2_oj(3,199)=0 exch2_neighbourId(4,199)=198 exch2_iLo(4,199)=0 exch2_iHi(4,199)=0 exch2_jLo(4,199)=0 exch2_jHi(4,199)=52 exch2_opposingSend(4,199)=3 exch2_pij(1,4,199)=1 exch2_pij(2,4,199)=0 exch2_pij(3,4,199)=0 exch2_pij(4,4,199)=1 exch2_oi(4,199)=0 exch2_oj(4,199)=0 RETURN END SUBROUTINE W2_E2SETUP_200 C Topology for tile 200 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(200)=34 exch2_tNy(200)=51 exch2_tBasex(200)=136 exch2_tBasey(200)=153 exch2_txGlobalo(200)=647 exch2_tyGlobalo(200)=154 exch2_isWedge(200)=0 exch2_isNedge(200)=0 exch2_isEedge(200)=0 exch2_isSedge(200)=0 exch2_myFace(200)=2 exch2_mydNx(200)=510 exch2_mydNy(200)=510 exch2_nNeighbours(200)=4 exch2_neighbourId(1,200)=215 exch2_iLo(1,200)=0 exch2_iHi(1,200)=35 exch2_jLo(1,200)=52 exch2_jHi(1,200)=52 exch2_opposingSend(1,200)=2 exch2_pij(1,1,200)=1 exch2_pij(2,1,200)=0 exch2_pij(3,1,200)=0 exch2_pij(4,1,200)=1 exch2_oi(1,200)=0 exch2_oj(1,200)=0 exch2_neighbourId(2,200)=185 exch2_iLo(2,200)=0 exch2_iHi(2,200)=35 exch2_jLo(2,200)=0 exch2_jHi(2,200)=0 exch2_opposingSend(2,200)=1 exch2_pij(1,2,200)=1 exch2_pij(2,2,200)=0 exch2_pij(3,2,200)=0 exch2_pij(4,2,200)=1 exch2_oi(2,200)=0 exch2_oj(2,200)=0 exch2_neighbourId(3,200)=201 exch2_iLo(3,200)=35 exch2_iHi(3,200)=35 exch2_jLo(3,200)=0 exch2_jHi(3,200)=52 exch2_opposingSend(3,200)=4 exch2_pij(1,3,200)=1 exch2_pij(2,3,200)=0 exch2_pij(3,3,200)=0 exch2_pij(4,3,200)=1 exch2_oi(3,200)=0 exch2_oj(3,200)=0 exch2_neighbourId(4,200)=199 exch2_iLo(4,200)=0 exch2_iHi(4,200)=0 exch2_jLo(4,200)=0 exch2_jHi(4,200)=52 exch2_opposingSend(4,200)=3 exch2_pij(1,4,200)=1 exch2_pij(2,4,200)=0 exch2_pij(3,4,200)=0 exch2_pij(4,4,200)=1 exch2_oi(4,200)=0 exch2_oj(4,200)=0 RETURN END SUBROUTINE W2_E2SETUP_201 C Topology for tile 201 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(201)=34 exch2_tNy(201)=51 exch2_tBasex(201)=170 exch2_tBasey(201)=153 exch2_txGlobalo(201)=681 exch2_tyGlobalo(201)=154 exch2_isWedge(201)=0 exch2_isNedge(201)=0 exch2_isEedge(201)=0 exch2_isSedge(201)=0 exch2_myFace(201)=2 exch2_mydNx(201)=510 exch2_mydNy(201)=510 exch2_nNeighbours(201)=4 exch2_neighbourId(1,201)=216 exch2_iLo(1,201)=0 exch2_iHi(1,201)=35 exch2_jLo(1,201)=52 exch2_jHi(1,201)=52 exch2_opposingSend(1,201)=2 exch2_pij(1,1,201)=1 exch2_pij(2,1,201)=0 exch2_pij(3,1,201)=0 exch2_pij(4,1,201)=1 exch2_oi(1,201)=0 exch2_oj(1,201)=0 exch2_neighbourId(2,201)=186 exch2_iLo(2,201)=0 exch2_iHi(2,201)=35 exch2_jLo(2,201)=0 exch2_jHi(2,201)=0 exch2_opposingSend(2,201)=1 exch2_pij(1,2,201)=1 exch2_pij(2,2,201)=0 exch2_pij(3,2,201)=0 exch2_pij(4,2,201)=1 exch2_oi(2,201)=0 exch2_oj(2,201)=0 exch2_neighbourId(3,201)=202 exch2_iLo(3,201)=35 exch2_iHi(3,201)=35 exch2_jLo(3,201)=0 exch2_jHi(3,201)=52 exch2_opposingSend(3,201)=4 exch2_pij(1,3,201)=1 exch2_pij(2,3,201)=0 exch2_pij(3,3,201)=0 exch2_pij(4,3,201)=1 exch2_oi(3,201)=0 exch2_oj(3,201)=0 exch2_neighbourId(4,201)=200 exch2_iLo(4,201)=0 exch2_iHi(4,201)=0 exch2_jLo(4,201)=0 exch2_jHi(4,201)=52 exch2_opposingSend(4,201)=3 exch2_pij(1,4,201)=1 exch2_pij(2,4,201)=0 exch2_pij(3,4,201)=0 exch2_pij(4,4,201)=1 exch2_oi(4,201)=0 exch2_oj(4,201)=0 RETURN END SUBROUTINE W2_E2SETUP_202 C Topology for tile 202 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(202)=34 exch2_tNy(202)=51 exch2_tBasex(202)=204 exch2_tBasey(202)=153 exch2_txGlobalo(202)=715 exch2_tyGlobalo(202)=154 exch2_isWedge(202)=0 exch2_isNedge(202)=0 exch2_isEedge(202)=0 exch2_isSedge(202)=0 exch2_myFace(202)=2 exch2_mydNx(202)=510 exch2_mydNy(202)=510 exch2_nNeighbours(202)=4 exch2_neighbourId(1,202)=217 exch2_iLo(1,202)=0 exch2_iHi(1,202)=35 exch2_jLo(1,202)=52 exch2_jHi(1,202)=52 exch2_opposingSend(1,202)=2 exch2_pij(1,1,202)=1 exch2_pij(2,1,202)=0 exch2_pij(3,1,202)=0 exch2_pij(4,1,202)=1 exch2_oi(1,202)=0 exch2_oj(1,202)=0 exch2_neighbourId(2,202)=187 exch2_iLo(2,202)=0 exch2_iHi(2,202)=35 exch2_jLo(2,202)=0 exch2_jHi(2,202)=0 exch2_opposingSend(2,202)=1 exch2_pij(1,2,202)=1 exch2_pij(2,2,202)=0 exch2_pij(3,2,202)=0 exch2_pij(4,2,202)=1 exch2_oi(2,202)=0 exch2_oj(2,202)=0 exch2_neighbourId(3,202)=203 exch2_iLo(3,202)=35 exch2_iHi(3,202)=35 exch2_jLo(3,202)=0 exch2_jHi(3,202)=52 exch2_opposingSend(3,202)=4 exch2_pij(1,3,202)=1 exch2_pij(2,3,202)=0 exch2_pij(3,3,202)=0 exch2_pij(4,3,202)=1 exch2_oi(3,202)=0 exch2_oj(3,202)=0 exch2_neighbourId(4,202)=201 exch2_iLo(4,202)=0 exch2_iHi(4,202)=0 exch2_jLo(4,202)=0 exch2_jHi(4,202)=52 exch2_opposingSend(4,202)=3 exch2_pij(1,4,202)=1 exch2_pij(2,4,202)=0 exch2_pij(3,4,202)=0 exch2_pij(4,4,202)=1 exch2_oi(4,202)=0 exch2_oj(4,202)=0 RETURN END SUBROUTINE W2_E2SETUP_203 C Topology for tile 203 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(203)=34 exch2_tNy(203)=51 exch2_tBasex(203)=238 exch2_tBasey(203)=153 exch2_txGlobalo(203)=749 exch2_tyGlobalo(203)=154 exch2_isWedge(203)=0 exch2_isNedge(203)=0 exch2_isEedge(203)=0 exch2_isSedge(203)=0 exch2_myFace(203)=2 exch2_mydNx(203)=510 exch2_mydNy(203)=510 exch2_nNeighbours(203)=4 exch2_neighbourId(1,203)=218 exch2_iLo(1,203)=0 exch2_iHi(1,203)=35 exch2_jLo(1,203)=52 exch2_jHi(1,203)=52 exch2_opposingSend(1,203)=2 exch2_pij(1,1,203)=1 exch2_pij(2,1,203)=0 exch2_pij(3,1,203)=0 exch2_pij(4,1,203)=1 exch2_oi(1,203)=0 exch2_oj(1,203)=0 exch2_neighbourId(2,203)=188 exch2_iLo(2,203)=0 exch2_iHi(2,203)=35 exch2_jLo(2,203)=0 exch2_jHi(2,203)=0 exch2_opposingSend(2,203)=1 exch2_pij(1,2,203)=1 exch2_pij(2,2,203)=0 exch2_pij(3,2,203)=0 exch2_pij(4,2,203)=1 exch2_oi(2,203)=0 exch2_oj(2,203)=0 exch2_neighbourId(3,203)=204 exch2_iLo(3,203)=35 exch2_iHi(3,203)=35 exch2_jLo(3,203)=0 exch2_jHi(3,203)=52 exch2_opposingSend(3,203)=4 exch2_pij(1,3,203)=1 exch2_pij(2,3,203)=0 exch2_pij(3,3,203)=0 exch2_pij(4,3,203)=1 exch2_oi(3,203)=0 exch2_oj(3,203)=0 exch2_neighbourId(4,203)=202 exch2_iLo(4,203)=0 exch2_iHi(4,203)=0 exch2_jLo(4,203)=0 exch2_jHi(4,203)=52 exch2_opposingSend(4,203)=3 exch2_pij(1,4,203)=1 exch2_pij(2,4,203)=0 exch2_pij(3,4,203)=0 exch2_pij(4,4,203)=1 exch2_oi(4,203)=0 exch2_oj(4,203)=0 RETURN END SUBROUTINE W2_E2SETUP_204 C Topology for tile 204 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(204)=34 exch2_tNy(204)=51 exch2_tBasex(204)=272 exch2_tBasey(204)=153 exch2_txGlobalo(204)=783 exch2_tyGlobalo(204)=154 exch2_isWedge(204)=0 exch2_isNedge(204)=0 exch2_isEedge(204)=0 exch2_isSedge(204)=0 exch2_myFace(204)=2 exch2_mydNx(204)=510 exch2_mydNy(204)=510 exch2_nNeighbours(204)=4 exch2_neighbourId(1,204)=219 exch2_iLo(1,204)=0 exch2_iHi(1,204)=35 exch2_jLo(1,204)=52 exch2_jHi(1,204)=52 exch2_opposingSend(1,204)=2 exch2_pij(1,1,204)=1 exch2_pij(2,1,204)=0 exch2_pij(3,1,204)=0 exch2_pij(4,1,204)=1 exch2_oi(1,204)=0 exch2_oj(1,204)=0 exch2_neighbourId(2,204)=189 exch2_iLo(2,204)=0 exch2_iHi(2,204)=35 exch2_jLo(2,204)=0 exch2_jHi(2,204)=0 exch2_opposingSend(2,204)=1 exch2_pij(1,2,204)=1 exch2_pij(2,2,204)=0 exch2_pij(3,2,204)=0 exch2_pij(4,2,204)=1 exch2_oi(2,204)=0 exch2_oj(2,204)=0 exch2_neighbourId(3,204)=205 exch2_iLo(3,204)=35 exch2_iHi(3,204)=35 exch2_jLo(3,204)=0 exch2_jHi(3,204)=52 exch2_opposingSend(3,204)=4 exch2_pij(1,3,204)=1 exch2_pij(2,3,204)=0 exch2_pij(3,3,204)=0 exch2_pij(4,3,204)=1 exch2_oi(3,204)=0 exch2_oj(3,204)=0 exch2_neighbourId(4,204)=203 exch2_iLo(4,204)=0 exch2_iHi(4,204)=0 exch2_jLo(4,204)=0 exch2_jHi(4,204)=52 exch2_opposingSend(4,204)=3 exch2_pij(1,4,204)=1 exch2_pij(2,4,204)=0 exch2_pij(3,4,204)=0 exch2_pij(4,4,204)=1 exch2_oi(4,204)=0 exch2_oj(4,204)=0 RETURN END SUBROUTINE W2_E2SETUP_205 C Topology for tile 205 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(205)=34 exch2_tNy(205)=51 exch2_tBasex(205)=306 exch2_tBasey(205)=153 exch2_txGlobalo(205)=817 exch2_tyGlobalo(205)=154 exch2_isWedge(205)=0 exch2_isNedge(205)=0 exch2_isEedge(205)=0 exch2_isSedge(205)=0 exch2_myFace(205)=2 exch2_mydNx(205)=510 exch2_mydNy(205)=510 exch2_nNeighbours(205)=4 exch2_neighbourId(1,205)=220 exch2_iLo(1,205)=0 exch2_iHi(1,205)=35 exch2_jLo(1,205)=52 exch2_jHi(1,205)=52 exch2_opposingSend(1,205)=2 exch2_pij(1,1,205)=1 exch2_pij(2,1,205)=0 exch2_pij(3,1,205)=0 exch2_pij(4,1,205)=1 exch2_oi(1,205)=0 exch2_oj(1,205)=0 exch2_neighbourId(2,205)=190 exch2_iLo(2,205)=0 exch2_iHi(2,205)=35 exch2_jLo(2,205)=0 exch2_jHi(2,205)=0 exch2_opposingSend(2,205)=1 exch2_pij(1,2,205)=1 exch2_pij(2,2,205)=0 exch2_pij(3,2,205)=0 exch2_pij(4,2,205)=1 exch2_oi(2,205)=0 exch2_oj(2,205)=0 exch2_neighbourId(3,205)=206 exch2_iLo(3,205)=35 exch2_iHi(3,205)=35 exch2_jLo(3,205)=0 exch2_jHi(3,205)=52 exch2_opposingSend(3,205)=4 exch2_pij(1,3,205)=1 exch2_pij(2,3,205)=0 exch2_pij(3,3,205)=0 exch2_pij(4,3,205)=1 exch2_oi(3,205)=0 exch2_oj(3,205)=0 exch2_neighbourId(4,205)=204 exch2_iLo(4,205)=0 exch2_iHi(4,205)=0 exch2_jLo(4,205)=0 exch2_jHi(4,205)=52 exch2_opposingSend(4,205)=3 exch2_pij(1,4,205)=1 exch2_pij(2,4,205)=0 exch2_pij(3,4,205)=0 exch2_pij(4,4,205)=1 exch2_oi(4,205)=0 exch2_oj(4,205)=0 RETURN END SUBROUTINE W2_E2SETUP_206 C Topology for tile 206 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(206)=34 exch2_tNy(206)=51 exch2_tBasex(206)=340 exch2_tBasey(206)=153 exch2_txGlobalo(206)=851 exch2_tyGlobalo(206)=154 exch2_isWedge(206)=0 exch2_isNedge(206)=0 exch2_isEedge(206)=0 exch2_isSedge(206)=0 exch2_myFace(206)=2 exch2_mydNx(206)=510 exch2_mydNy(206)=510 exch2_nNeighbours(206)=4 exch2_neighbourId(1,206)=221 exch2_iLo(1,206)=0 exch2_iHi(1,206)=35 exch2_jLo(1,206)=52 exch2_jHi(1,206)=52 exch2_opposingSend(1,206)=2 exch2_pij(1,1,206)=1 exch2_pij(2,1,206)=0 exch2_pij(3,1,206)=0 exch2_pij(4,1,206)=1 exch2_oi(1,206)=0 exch2_oj(1,206)=0 exch2_neighbourId(2,206)=191 exch2_iLo(2,206)=0 exch2_iHi(2,206)=35 exch2_jLo(2,206)=0 exch2_jHi(2,206)=0 exch2_opposingSend(2,206)=1 exch2_pij(1,2,206)=1 exch2_pij(2,2,206)=0 exch2_pij(3,2,206)=0 exch2_pij(4,2,206)=1 exch2_oi(2,206)=0 exch2_oj(2,206)=0 exch2_neighbourId(3,206)=207 exch2_iLo(3,206)=35 exch2_iHi(3,206)=35 exch2_jLo(3,206)=0 exch2_jHi(3,206)=52 exch2_opposingSend(3,206)=4 exch2_pij(1,3,206)=1 exch2_pij(2,3,206)=0 exch2_pij(3,3,206)=0 exch2_pij(4,3,206)=1 exch2_oi(3,206)=0 exch2_oj(3,206)=0 exch2_neighbourId(4,206)=205 exch2_iLo(4,206)=0 exch2_iHi(4,206)=0 exch2_jLo(4,206)=0 exch2_jHi(4,206)=52 exch2_opposingSend(4,206)=3 exch2_pij(1,4,206)=1 exch2_pij(2,4,206)=0 exch2_pij(3,4,206)=0 exch2_pij(4,4,206)=1 exch2_oi(4,206)=0 exch2_oj(4,206)=0 RETURN END SUBROUTINE W2_E2SETUP_207 C Topology for tile 207 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(207)=34 exch2_tNy(207)=51 exch2_tBasex(207)=374 exch2_tBasey(207)=153 exch2_txGlobalo(207)=885 exch2_tyGlobalo(207)=154 exch2_isWedge(207)=0 exch2_isNedge(207)=0 exch2_isEedge(207)=0 exch2_isSedge(207)=0 exch2_myFace(207)=2 exch2_mydNx(207)=510 exch2_mydNy(207)=510 exch2_nNeighbours(207)=4 exch2_neighbourId(1,207)=222 exch2_iLo(1,207)=0 exch2_iHi(1,207)=35 exch2_jLo(1,207)=52 exch2_jHi(1,207)=52 exch2_opposingSend(1,207)=2 exch2_pij(1,1,207)=1 exch2_pij(2,1,207)=0 exch2_pij(3,1,207)=0 exch2_pij(4,1,207)=1 exch2_oi(1,207)=0 exch2_oj(1,207)=0 exch2_neighbourId(2,207)=192 exch2_iLo(2,207)=0 exch2_iHi(2,207)=35 exch2_jLo(2,207)=0 exch2_jHi(2,207)=0 exch2_opposingSend(2,207)=1 exch2_pij(1,2,207)=1 exch2_pij(2,2,207)=0 exch2_pij(3,2,207)=0 exch2_pij(4,2,207)=1 exch2_oi(2,207)=0 exch2_oj(2,207)=0 exch2_neighbourId(3,207)=208 exch2_iLo(3,207)=35 exch2_iHi(3,207)=35 exch2_jLo(3,207)=0 exch2_jHi(3,207)=52 exch2_opposingSend(3,207)=4 exch2_pij(1,3,207)=1 exch2_pij(2,3,207)=0 exch2_pij(3,3,207)=0 exch2_pij(4,3,207)=1 exch2_oi(3,207)=0 exch2_oj(3,207)=0 exch2_neighbourId(4,207)=206 exch2_iLo(4,207)=0 exch2_iHi(4,207)=0 exch2_jLo(4,207)=0 exch2_jHi(4,207)=52 exch2_opposingSend(4,207)=3 exch2_pij(1,4,207)=1 exch2_pij(2,4,207)=0 exch2_pij(3,4,207)=0 exch2_pij(4,4,207)=1 exch2_oi(4,207)=0 exch2_oj(4,207)=0 RETURN END SUBROUTINE W2_E2SETUP_208 C Topology for tile 208 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(208)=34 exch2_tNy(208)=51 exch2_tBasex(208)=408 exch2_tBasey(208)=153 exch2_txGlobalo(208)=919 exch2_tyGlobalo(208)=154 exch2_isWedge(208)=0 exch2_isNedge(208)=0 exch2_isEedge(208)=0 exch2_isSedge(208)=0 exch2_myFace(208)=2 exch2_mydNx(208)=510 exch2_mydNy(208)=510 exch2_nNeighbours(208)=4 exch2_neighbourId(1,208)=223 exch2_iLo(1,208)=0 exch2_iHi(1,208)=35 exch2_jLo(1,208)=52 exch2_jHi(1,208)=52 exch2_opposingSend(1,208)=2 exch2_pij(1,1,208)=1 exch2_pij(2,1,208)=0 exch2_pij(3,1,208)=0 exch2_pij(4,1,208)=1 exch2_oi(1,208)=0 exch2_oj(1,208)=0 exch2_neighbourId(2,208)=193 exch2_iLo(2,208)=0 exch2_iHi(2,208)=35 exch2_jLo(2,208)=0 exch2_jHi(2,208)=0 exch2_opposingSend(2,208)=1 exch2_pij(1,2,208)=1 exch2_pij(2,2,208)=0 exch2_pij(3,2,208)=0 exch2_pij(4,2,208)=1 exch2_oi(2,208)=0 exch2_oj(2,208)=0 exch2_neighbourId(3,208)=209 exch2_iLo(3,208)=35 exch2_iHi(3,208)=35 exch2_jLo(3,208)=0 exch2_jHi(3,208)=52 exch2_opposingSend(3,208)=4 exch2_pij(1,3,208)=1 exch2_pij(2,3,208)=0 exch2_pij(3,3,208)=0 exch2_pij(4,3,208)=1 exch2_oi(3,208)=0 exch2_oj(3,208)=0 exch2_neighbourId(4,208)=207 exch2_iLo(4,208)=0 exch2_iHi(4,208)=0 exch2_jLo(4,208)=0 exch2_jHi(4,208)=52 exch2_opposingSend(4,208)=3 exch2_pij(1,4,208)=1 exch2_pij(2,4,208)=0 exch2_pij(3,4,208)=0 exch2_pij(4,4,208)=1 exch2_oi(4,208)=0 exch2_oj(4,208)=0 RETURN END SUBROUTINE W2_E2SETUP_209 C Topology for tile 209 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(209)=34 exch2_tNy(209)=51 exch2_tBasex(209)=442 exch2_tBasey(209)=153 exch2_txGlobalo(209)=953 exch2_tyGlobalo(209)=154 exch2_isWedge(209)=0 exch2_isNedge(209)=0 exch2_isEedge(209)=0 exch2_isSedge(209)=0 exch2_myFace(209)=2 exch2_mydNx(209)=510 exch2_mydNy(209)=510 exch2_nNeighbours(209)=4 exch2_neighbourId(1,209)=224 exch2_iLo(1,209)=0 exch2_iHi(1,209)=35 exch2_jLo(1,209)=52 exch2_jHi(1,209)=52 exch2_opposingSend(1,209)=2 exch2_pij(1,1,209)=1 exch2_pij(2,1,209)=0 exch2_pij(3,1,209)=0 exch2_pij(4,1,209)=1 exch2_oi(1,209)=0 exch2_oj(1,209)=0 exch2_neighbourId(2,209)=194 exch2_iLo(2,209)=0 exch2_iHi(2,209)=35 exch2_jLo(2,209)=0 exch2_jHi(2,209)=0 exch2_opposingSend(2,209)=1 exch2_pij(1,2,209)=1 exch2_pij(2,2,209)=0 exch2_pij(3,2,209)=0 exch2_pij(4,2,209)=1 exch2_oi(2,209)=0 exch2_oj(2,209)=0 exch2_neighbourId(3,209)=210 exch2_iLo(3,209)=35 exch2_iHi(3,209)=35 exch2_jLo(3,209)=0 exch2_jHi(3,209)=52 exch2_opposingSend(3,209)=5 exch2_pij(1,3,209)=1 exch2_pij(2,3,209)=0 exch2_pij(3,3,209)=0 exch2_pij(4,3,209)=1 exch2_oi(3,209)=0 exch2_oj(3,209)=0 exch2_neighbourId(4,209)=208 exch2_iLo(4,209)=0 exch2_iHi(4,209)=0 exch2_jLo(4,209)=0 exch2_jHi(4,209)=52 exch2_opposingSend(4,209)=3 exch2_pij(1,4,209)=1 exch2_pij(2,4,209)=0 exch2_pij(3,4,209)=0 exch2_pij(4,4,209)=1 exch2_oi(4,209)=0 exch2_oj(4,209)=0 RETURN END SUBROUTINE W2_E2SETUP_210 C Topology for tile 210 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(210)=34 exch2_tNy(210)=51 exch2_tBasex(210)=476 exch2_tBasey(210)=153 exch2_txGlobalo(210)=987 exch2_tyGlobalo(210)=154 exch2_isWedge(210)=0 exch2_isNedge(210)=0 exch2_isEedge(210)=1 exch2_isSedge(210)=0 exch2_myFace(210)=2 exch2_mydNx(210)=510 exch2_mydNy(210)=510 exch2_nNeighbours(210)=5 exch2_neighbourId(1,210)=225 exch2_iLo(1,210)=0 exch2_iHi(1,210)=35 exch2_jLo(1,210)=52 exch2_jHi(1,210)=52 exch2_opposingSend(1,210)=2 exch2_pij(1,1,210)=1 exch2_pij(2,1,210)=0 exch2_pij(3,1,210)=0 exch2_pij(4,1,210)=1 exch2_oi(1,210)=0 exch2_oj(1,210)=0 exch2_neighbourId(2,210)=195 exch2_iLo(2,210)=0 exch2_iHi(2,210)=35 exch2_jLo(2,210)=0 exch2_jHi(2,210)=0 exch2_opposingSend(2,210)=1 exch2_pij(1,2,210)=1 exch2_pij(2,2,210)=0 exch2_pij(3,2,210)=0 exch2_pij(4,2,210)=1 exch2_oi(2,210)=0 exch2_oj(2,210)=0 exch2_neighbourId(3,210)=460 exch2_iLo(3,210)=35 exch2_iHi(3,210)=35 exch2_jLo(3,210)=17 exch2_jHi(3,210)=52 exch2_opposingSend(3,210)=2 exch2_pij(1,3,210)=0 exch2_pij(2,3,210)=1 exch2_pij(3,3,210)=-1 exch2_pij(4,3,210)=0 exch2_oi(3,210)=510 exch2_oj(3,210)=511 exch2_neighbourId(4,210)=461 exch2_iLo(4,210)=35 exch2_iHi(4,210)=35 exch2_jLo(4,210)=0 exch2_jHi(4,210)=18 exch2_opposingSend(4,210)=3 exch2_pij(1,4,210)=0 exch2_pij(2,4,210)=1 exch2_pij(3,4,210)=-1 exch2_pij(4,4,210)=0 exch2_oi(4,210)=510 exch2_oj(4,210)=511 exch2_neighbourId(5,210)=209 exch2_iLo(5,210)=0 exch2_iHi(5,210)=0 exch2_jLo(5,210)=0 exch2_jHi(5,210)=52 exch2_opposingSend(5,210)=3 exch2_pij(1,5,210)=1 exch2_pij(2,5,210)=0 exch2_pij(3,5,210)=0 exch2_pij(4,5,210)=1 exch2_oi(5,210)=0 exch2_oj(5,210)=0 RETURN END SUBROUTINE W2_E2SETUP_211 C Topology for tile 211 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(211)=34 exch2_tNy(211)=51 exch2_tBasex(211)=0 exch2_tBasey(211)=204 exch2_txGlobalo(211)=511 exch2_tyGlobalo(211)=205 exch2_isWedge(211)=1 exch2_isNedge(211)=0 exch2_isEedge(211)=0 exch2_isSedge(211)=0 exch2_myFace(211)=2 exch2_mydNx(211)=510 exch2_mydNy(211)=510 exch2_nNeighbours(211)=4 exch2_neighbourId(1,211)=226 exch2_iLo(1,211)=0 exch2_iHi(1,211)=35 exch2_jLo(1,211)=52 exch2_jHi(1,211)=52 exch2_opposingSend(1,211)=2 exch2_pij(1,1,211)=1 exch2_pij(2,1,211)=0 exch2_pij(3,1,211)=0 exch2_pij(4,1,211)=1 exch2_oi(1,211)=0 exch2_oj(1,211)=0 exch2_neighbourId(2,211)=196 exch2_iLo(2,211)=0 exch2_iHi(2,211)=35 exch2_jLo(2,211)=0 exch2_jHi(2,211)=0 exch2_opposingSend(2,211)=1 exch2_pij(1,2,211)=1 exch2_pij(2,2,211)=0 exch2_pij(3,2,211)=0 exch2_pij(4,2,211)=1 exch2_oi(2,211)=0 exch2_oj(2,211)=0 exch2_neighbourId(3,211)=212 exch2_iLo(3,211)=35 exch2_iHi(3,211)=35 exch2_jLo(3,211)=0 exch2_jHi(3,211)=52 exch2_opposingSend(3,211)=4 exch2_pij(1,3,211)=1 exch2_pij(2,3,211)=0 exch2_pij(3,3,211)=0 exch2_pij(4,3,211)=1 exch2_oi(3,211)=0 exch2_oj(3,211)=0 exch2_neighbourId(4,211)=75 exch2_iLo(4,211)=0 exch2_iHi(4,211)=0 exch2_jLo(4,211)=0 exch2_jHi(4,211)=52 exch2_opposingSend(4,211)=3 exch2_pij(1,4,211)=1 exch2_pij(2,4,211)=0 exch2_pij(3,4,211)=0 exch2_pij(4,4,211)=1 exch2_oi(4,211)=-510 exch2_oj(4,211)=0 RETURN END SUBROUTINE W2_E2SETUP_212 C Topology for tile 212 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(212)=34 exch2_tNy(212)=51 exch2_tBasex(212)=34 exch2_tBasey(212)=204 exch2_txGlobalo(212)=545 exch2_tyGlobalo(212)=205 exch2_isWedge(212)=0 exch2_isNedge(212)=0 exch2_isEedge(212)=0 exch2_isSedge(212)=0 exch2_myFace(212)=2 exch2_mydNx(212)=510 exch2_mydNy(212)=510 exch2_nNeighbours(212)=4 exch2_neighbourId(1,212)=227 exch2_iLo(1,212)=0 exch2_iHi(1,212)=35 exch2_jLo(1,212)=52 exch2_jHi(1,212)=52 exch2_opposingSend(1,212)=2 exch2_pij(1,1,212)=1 exch2_pij(2,1,212)=0 exch2_pij(3,1,212)=0 exch2_pij(4,1,212)=1 exch2_oi(1,212)=0 exch2_oj(1,212)=0 exch2_neighbourId(2,212)=197 exch2_iLo(2,212)=0 exch2_iHi(2,212)=35 exch2_jLo(2,212)=0 exch2_jHi(2,212)=0 exch2_opposingSend(2,212)=1 exch2_pij(1,2,212)=1 exch2_pij(2,2,212)=0 exch2_pij(3,2,212)=0 exch2_pij(4,2,212)=1 exch2_oi(2,212)=0 exch2_oj(2,212)=0 exch2_neighbourId(3,212)=213 exch2_iLo(3,212)=35 exch2_iHi(3,212)=35 exch2_jLo(3,212)=0 exch2_jHi(3,212)=52 exch2_opposingSend(3,212)=4 exch2_pij(1,3,212)=1 exch2_pij(2,3,212)=0 exch2_pij(3,3,212)=0 exch2_pij(4,3,212)=1 exch2_oi(3,212)=0 exch2_oj(3,212)=0 exch2_neighbourId(4,212)=211 exch2_iLo(4,212)=0 exch2_iHi(4,212)=0 exch2_jLo(4,212)=0 exch2_jHi(4,212)=52 exch2_opposingSend(4,212)=3 exch2_pij(1,4,212)=1 exch2_pij(2,4,212)=0 exch2_pij(3,4,212)=0 exch2_pij(4,4,212)=1 exch2_oi(4,212)=0 exch2_oj(4,212)=0 RETURN END SUBROUTINE W2_E2SETUP_213 C Topology for tile 213 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(213)=34 exch2_tNy(213)=51 exch2_tBasex(213)=68 exch2_tBasey(213)=204 exch2_txGlobalo(213)=579 exch2_tyGlobalo(213)=205 exch2_isWedge(213)=0 exch2_isNedge(213)=0 exch2_isEedge(213)=0 exch2_isSedge(213)=0 exch2_myFace(213)=2 exch2_mydNx(213)=510 exch2_mydNy(213)=510 exch2_nNeighbours(213)=4 exch2_neighbourId(1,213)=228 exch2_iLo(1,213)=0 exch2_iHi(1,213)=35 exch2_jLo(1,213)=52 exch2_jHi(1,213)=52 exch2_opposingSend(1,213)=2 exch2_pij(1,1,213)=1 exch2_pij(2,1,213)=0 exch2_pij(3,1,213)=0 exch2_pij(4,1,213)=1 exch2_oi(1,213)=0 exch2_oj(1,213)=0 exch2_neighbourId(2,213)=198 exch2_iLo(2,213)=0 exch2_iHi(2,213)=35 exch2_jLo(2,213)=0 exch2_jHi(2,213)=0 exch2_opposingSend(2,213)=1 exch2_pij(1,2,213)=1 exch2_pij(2,2,213)=0 exch2_pij(3,2,213)=0 exch2_pij(4,2,213)=1 exch2_oi(2,213)=0 exch2_oj(2,213)=0 exch2_neighbourId(3,213)=214 exch2_iLo(3,213)=35 exch2_iHi(3,213)=35 exch2_jLo(3,213)=0 exch2_jHi(3,213)=52 exch2_opposingSend(3,213)=4 exch2_pij(1,3,213)=1 exch2_pij(2,3,213)=0 exch2_pij(3,3,213)=0 exch2_pij(4,3,213)=1 exch2_oi(3,213)=0 exch2_oj(3,213)=0 exch2_neighbourId(4,213)=212 exch2_iLo(4,213)=0 exch2_iHi(4,213)=0 exch2_jLo(4,213)=0 exch2_jHi(4,213)=52 exch2_opposingSend(4,213)=3 exch2_pij(1,4,213)=1 exch2_pij(2,4,213)=0 exch2_pij(3,4,213)=0 exch2_pij(4,4,213)=1 exch2_oi(4,213)=0 exch2_oj(4,213)=0 RETURN END SUBROUTINE W2_E2SETUP_214 C Topology for tile 214 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(214)=34 exch2_tNy(214)=51 exch2_tBasex(214)=102 exch2_tBasey(214)=204 exch2_txGlobalo(214)=613 exch2_tyGlobalo(214)=205 exch2_isWedge(214)=0 exch2_isNedge(214)=0 exch2_isEedge(214)=0 exch2_isSedge(214)=0 exch2_myFace(214)=2 exch2_mydNx(214)=510 exch2_mydNy(214)=510 exch2_nNeighbours(214)=4 exch2_neighbourId(1,214)=229 exch2_iLo(1,214)=0 exch2_iHi(1,214)=35 exch2_jLo(1,214)=52 exch2_jHi(1,214)=52 exch2_opposingSend(1,214)=2 exch2_pij(1,1,214)=1 exch2_pij(2,1,214)=0 exch2_pij(3,1,214)=0 exch2_pij(4,1,214)=1 exch2_oi(1,214)=0 exch2_oj(1,214)=0 exch2_neighbourId(2,214)=199 exch2_iLo(2,214)=0 exch2_iHi(2,214)=35 exch2_jLo(2,214)=0 exch2_jHi(2,214)=0 exch2_opposingSend(2,214)=1 exch2_pij(1,2,214)=1 exch2_pij(2,2,214)=0 exch2_pij(3,2,214)=0 exch2_pij(4,2,214)=1 exch2_oi(2,214)=0 exch2_oj(2,214)=0 exch2_neighbourId(3,214)=215 exch2_iLo(3,214)=35 exch2_iHi(3,214)=35 exch2_jLo(3,214)=0 exch2_jHi(3,214)=52 exch2_opposingSend(3,214)=4 exch2_pij(1,3,214)=1 exch2_pij(2,3,214)=0 exch2_pij(3,3,214)=0 exch2_pij(4,3,214)=1 exch2_oi(3,214)=0 exch2_oj(3,214)=0 exch2_neighbourId(4,214)=213 exch2_iLo(4,214)=0 exch2_iHi(4,214)=0 exch2_jLo(4,214)=0 exch2_jHi(4,214)=52 exch2_opposingSend(4,214)=3 exch2_pij(1,4,214)=1 exch2_pij(2,4,214)=0 exch2_pij(3,4,214)=0 exch2_pij(4,4,214)=1 exch2_oi(4,214)=0 exch2_oj(4,214)=0 RETURN END SUBROUTINE W2_E2SETUP_215 C Topology for tile 215 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(215)=34 exch2_tNy(215)=51 exch2_tBasex(215)=136 exch2_tBasey(215)=204 exch2_txGlobalo(215)=647 exch2_tyGlobalo(215)=205 exch2_isWedge(215)=0 exch2_isNedge(215)=0 exch2_isEedge(215)=0 exch2_isSedge(215)=0 exch2_myFace(215)=2 exch2_mydNx(215)=510 exch2_mydNy(215)=510 exch2_nNeighbours(215)=4 exch2_neighbourId(1,215)=230 exch2_iLo(1,215)=0 exch2_iHi(1,215)=35 exch2_jLo(1,215)=52 exch2_jHi(1,215)=52 exch2_opposingSend(1,215)=2 exch2_pij(1,1,215)=1 exch2_pij(2,1,215)=0 exch2_pij(3,1,215)=0 exch2_pij(4,1,215)=1 exch2_oi(1,215)=0 exch2_oj(1,215)=0 exch2_neighbourId(2,215)=200 exch2_iLo(2,215)=0 exch2_iHi(2,215)=35 exch2_jLo(2,215)=0 exch2_jHi(2,215)=0 exch2_opposingSend(2,215)=1 exch2_pij(1,2,215)=1 exch2_pij(2,2,215)=0 exch2_pij(3,2,215)=0 exch2_pij(4,2,215)=1 exch2_oi(2,215)=0 exch2_oj(2,215)=0 exch2_neighbourId(3,215)=216 exch2_iLo(3,215)=35 exch2_iHi(3,215)=35 exch2_jLo(3,215)=0 exch2_jHi(3,215)=52 exch2_opposingSend(3,215)=4 exch2_pij(1,3,215)=1 exch2_pij(2,3,215)=0 exch2_pij(3,3,215)=0 exch2_pij(4,3,215)=1 exch2_oi(3,215)=0 exch2_oj(3,215)=0 exch2_neighbourId(4,215)=214 exch2_iLo(4,215)=0 exch2_iHi(4,215)=0 exch2_jLo(4,215)=0 exch2_jHi(4,215)=52 exch2_opposingSend(4,215)=3 exch2_pij(1,4,215)=1 exch2_pij(2,4,215)=0 exch2_pij(3,4,215)=0 exch2_pij(4,4,215)=1 exch2_oi(4,215)=0 exch2_oj(4,215)=0 RETURN END SUBROUTINE W2_E2SETUP_216 C Topology for tile 216 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(216)=34 exch2_tNy(216)=51 exch2_tBasex(216)=170 exch2_tBasey(216)=204 exch2_txGlobalo(216)=681 exch2_tyGlobalo(216)=205 exch2_isWedge(216)=0 exch2_isNedge(216)=0 exch2_isEedge(216)=0 exch2_isSedge(216)=0 exch2_myFace(216)=2 exch2_mydNx(216)=510 exch2_mydNy(216)=510 exch2_nNeighbours(216)=4 exch2_neighbourId(1,216)=231 exch2_iLo(1,216)=0 exch2_iHi(1,216)=35 exch2_jLo(1,216)=52 exch2_jHi(1,216)=52 exch2_opposingSend(1,216)=2 exch2_pij(1,1,216)=1 exch2_pij(2,1,216)=0 exch2_pij(3,1,216)=0 exch2_pij(4,1,216)=1 exch2_oi(1,216)=0 exch2_oj(1,216)=0 exch2_neighbourId(2,216)=201 exch2_iLo(2,216)=0 exch2_iHi(2,216)=35 exch2_jLo(2,216)=0 exch2_jHi(2,216)=0 exch2_opposingSend(2,216)=1 exch2_pij(1,2,216)=1 exch2_pij(2,2,216)=0 exch2_pij(3,2,216)=0 exch2_pij(4,2,216)=1 exch2_oi(2,216)=0 exch2_oj(2,216)=0 exch2_neighbourId(3,216)=217 exch2_iLo(3,216)=35 exch2_iHi(3,216)=35 exch2_jLo(3,216)=0 exch2_jHi(3,216)=52 exch2_opposingSend(3,216)=4 exch2_pij(1,3,216)=1 exch2_pij(2,3,216)=0 exch2_pij(3,3,216)=0 exch2_pij(4,3,216)=1 exch2_oi(3,216)=0 exch2_oj(3,216)=0 exch2_neighbourId(4,216)=215 exch2_iLo(4,216)=0 exch2_iHi(4,216)=0 exch2_jLo(4,216)=0 exch2_jHi(4,216)=52 exch2_opposingSend(4,216)=3 exch2_pij(1,4,216)=1 exch2_pij(2,4,216)=0 exch2_pij(3,4,216)=0 exch2_pij(4,4,216)=1 exch2_oi(4,216)=0 exch2_oj(4,216)=0 RETURN END SUBROUTINE W2_E2SETUP_217 C Topology for tile 217 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(217)=34 exch2_tNy(217)=51 exch2_tBasex(217)=204 exch2_tBasey(217)=204 exch2_txGlobalo(217)=715 exch2_tyGlobalo(217)=205 exch2_isWedge(217)=0 exch2_isNedge(217)=0 exch2_isEedge(217)=0 exch2_isSedge(217)=0 exch2_myFace(217)=2 exch2_mydNx(217)=510 exch2_mydNy(217)=510 exch2_nNeighbours(217)=4 exch2_neighbourId(1,217)=232 exch2_iLo(1,217)=0 exch2_iHi(1,217)=35 exch2_jLo(1,217)=52 exch2_jHi(1,217)=52 exch2_opposingSend(1,217)=2 exch2_pij(1,1,217)=1 exch2_pij(2,1,217)=0 exch2_pij(3,1,217)=0 exch2_pij(4,1,217)=1 exch2_oi(1,217)=0 exch2_oj(1,217)=0 exch2_neighbourId(2,217)=202 exch2_iLo(2,217)=0 exch2_iHi(2,217)=35 exch2_jLo(2,217)=0 exch2_jHi(2,217)=0 exch2_opposingSend(2,217)=1 exch2_pij(1,2,217)=1 exch2_pij(2,2,217)=0 exch2_pij(3,2,217)=0 exch2_pij(4,2,217)=1 exch2_oi(2,217)=0 exch2_oj(2,217)=0 exch2_neighbourId(3,217)=218 exch2_iLo(3,217)=35 exch2_iHi(3,217)=35 exch2_jLo(3,217)=0 exch2_jHi(3,217)=52 exch2_opposingSend(3,217)=4 exch2_pij(1,3,217)=1 exch2_pij(2,3,217)=0 exch2_pij(3,3,217)=0 exch2_pij(4,3,217)=1 exch2_oi(3,217)=0 exch2_oj(3,217)=0 exch2_neighbourId(4,217)=216 exch2_iLo(4,217)=0 exch2_iHi(4,217)=0 exch2_jLo(4,217)=0 exch2_jHi(4,217)=52 exch2_opposingSend(4,217)=3 exch2_pij(1,4,217)=1 exch2_pij(2,4,217)=0 exch2_pij(3,4,217)=0 exch2_pij(4,4,217)=1 exch2_oi(4,217)=0 exch2_oj(4,217)=0 RETURN END SUBROUTINE W2_E2SETUP_218 C Topology for tile 218 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(218)=34 exch2_tNy(218)=51 exch2_tBasex(218)=238 exch2_tBasey(218)=204 exch2_txGlobalo(218)=749 exch2_tyGlobalo(218)=205 exch2_isWedge(218)=0 exch2_isNedge(218)=0 exch2_isEedge(218)=0 exch2_isSedge(218)=0 exch2_myFace(218)=2 exch2_mydNx(218)=510 exch2_mydNy(218)=510 exch2_nNeighbours(218)=4 exch2_neighbourId(1,218)=233 exch2_iLo(1,218)=0 exch2_iHi(1,218)=35 exch2_jLo(1,218)=52 exch2_jHi(1,218)=52 exch2_opposingSend(1,218)=2 exch2_pij(1,1,218)=1 exch2_pij(2,1,218)=0 exch2_pij(3,1,218)=0 exch2_pij(4,1,218)=1 exch2_oi(1,218)=0 exch2_oj(1,218)=0 exch2_neighbourId(2,218)=203 exch2_iLo(2,218)=0 exch2_iHi(2,218)=35 exch2_jLo(2,218)=0 exch2_jHi(2,218)=0 exch2_opposingSend(2,218)=1 exch2_pij(1,2,218)=1 exch2_pij(2,2,218)=0 exch2_pij(3,2,218)=0 exch2_pij(4,2,218)=1 exch2_oi(2,218)=0 exch2_oj(2,218)=0 exch2_neighbourId(3,218)=219 exch2_iLo(3,218)=35 exch2_iHi(3,218)=35 exch2_jLo(3,218)=0 exch2_jHi(3,218)=52 exch2_opposingSend(3,218)=4 exch2_pij(1,3,218)=1 exch2_pij(2,3,218)=0 exch2_pij(3,3,218)=0 exch2_pij(4,3,218)=1 exch2_oi(3,218)=0 exch2_oj(3,218)=0 exch2_neighbourId(4,218)=217 exch2_iLo(4,218)=0 exch2_iHi(4,218)=0 exch2_jLo(4,218)=0 exch2_jHi(4,218)=52 exch2_opposingSend(4,218)=3 exch2_pij(1,4,218)=1 exch2_pij(2,4,218)=0 exch2_pij(3,4,218)=0 exch2_pij(4,4,218)=1 exch2_oi(4,218)=0 exch2_oj(4,218)=0 RETURN END SUBROUTINE W2_E2SETUP_219 C Topology for tile 219 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(219)=34 exch2_tNy(219)=51 exch2_tBasex(219)=272 exch2_tBasey(219)=204 exch2_txGlobalo(219)=783 exch2_tyGlobalo(219)=205 exch2_isWedge(219)=0 exch2_isNedge(219)=0 exch2_isEedge(219)=0 exch2_isSedge(219)=0 exch2_myFace(219)=2 exch2_mydNx(219)=510 exch2_mydNy(219)=510 exch2_nNeighbours(219)=4 exch2_neighbourId(1,219)=234 exch2_iLo(1,219)=0 exch2_iHi(1,219)=35 exch2_jLo(1,219)=52 exch2_jHi(1,219)=52 exch2_opposingSend(1,219)=2 exch2_pij(1,1,219)=1 exch2_pij(2,1,219)=0 exch2_pij(3,1,219)=0 exch2_pij(4,1,219)=1 exch2_oi(1,219)=0 exch2_oj(1,219)=0 exch2_neighbourId(2,219)=204 exch2_iLo(2,219)=0 exch2_iHi(2,219)=35 exch2_jLo(2,219)=0 exch2_jHi(2,219)=0 exch2_opposingSend(2,219)=1 exch2_pij(1,2,219)=1 exch2_pij(2,2,219)=0 exch2_pij(3,2,219)=0 exch2_pij(4,2,219)=1 exch2_oi(2,219)=0 exch2_oj(2,219)=0 exch2_neighbourId(3,219)=220 exch2_iLo(3,219)=35 exch2_iHi(3,219)=35 exch2_jLo(3,219)=0 exch2_jHi(3,219)=52 exch2_opposingSend(3,219)=4 exch2_pij(1,3,219)=1 exch2_pij(2,3,219)=0 exch2_pij(3,3,219)=0 exch2_pij(4,3,219)=1 exch2_oi(3,219)=0 exch2_oj(3,219)=0 exch2_neighbourId(4,219)=218 exch2_iLo(4,219)=0 exch2_iHi(4,219)=0 exch2_jLo(4,219)=0 exch2_jHi(4,219)=52 exch2_opposingSend(4,219)=3 exch2_pij(1,4,219)=1 exch2_pij(2,4,219)=0 exch2_pij(3,4,219)=0 exch2_pij(4,4,219)=1 exch2_oi(4,219)=0 exch2_oj(4,219)=0 RETURN END SUBROUTINE W2_E2SETUP_220 C Topology for tile 220 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(220)=34 exch2_tNy(220)=51 exch2_tBasex(220)=306 exch2_tBasey(220)=204 exch2_txGlobalo(220)=817 exch2_tyGlobalo(220)=205 exch2_isWedge(220)=0 exch2_isNedge(220)=0 exch2_isEedge(220)=0 exch2_isSedge(220)=0 exch2_myFace(220)=2 exch2_mydNx(220)=510 exch2_mydNy(220)=510 exch2_nNeighbours(220)=4 exch2_neighbourId(1,220)=235 exch2_iLo(1,220)=0 exch2_iHi(1,220)=35 exch2_jLo(1,220)=52 exch2_jHi(1,220)=52 exch2_opposingSend(1,220)=2 exch2_pij(1,1,220)=1 exch2_pij(2,1,220)=0 exch2_pij(3,1,220)=0 exch2_pij(4,1,220)=1 exch2_oi(1,220)=0 exch2_oj(1,220)=0 exch2_neighbourId(2,220)=205 exch2_iLo(2,220)=0 exch2_iHi(2,220)=35 exch2_jLo(2,220)=0 exch2_jHi(2,220)=0 exch2_opposingSend(2,220)=1 exch2_pij(1,2,220)=1 exch2_pij(2,2,220)=0 exch2_pij(3,2,220)=0 exch2_pij(4,2,220)=1 exch2_oi(2,220)=0 exch2_oj(2,220)=0 exch2_neighbourId(3,220)=221 exch2_iLo(3,220)=35 exch2_iHi(3,220)=35 exch2_jLo(3,220)=0 exch2_jHi(3,220)=52 exch2_opposingSend(3,220)=4 exch2_pij(1,3,220)=1 exch2_pij(2,3,220)=0 exch2_pij(3,3,220)=0 exch2_pij(4,3,220)=1 exch2_oi(3,220)=0 exch2_oj(3,220)=0 exch2_neighbourId(4,220)=219 exch2_iLo(4,220)=0 exch2_iHi(4,220)=0 exch2_jLo(4,220)=0 exch2_jHi(4,220)=52 exch2_opposingSend(4,220)=3 exch2_pij(1,4,220)=1 exch2_pij(2,4,220)=0 exch2_pij(3,4,220)=0 exch2_pij(4,4,220)=1 exch2_oi(4,220)=0 exch2_oj(4,220)=0 RETURN END SUBROUTINE W2_E2SETUP_221 C Topology for tile 221 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(221)=34 exch2_tNy(221)=51 exch2_tBasex(221)=340 exch2_tBasey(221)=204 exch2_txGlobalo(221)=851 exch2_tyGlobalo(221)=205 exch2_isWedge(221)=0 exch2_isNedge(221)=0 exch2_isEedge(221)=0 exch2_isSedge(221)=0 exch2_myFace(221)=2 exch2_mydNx(221)=510 exch2_mydNy(221)=510 exch2_nNeighbours(221)=4 exch2_neighbourId(1,221)=236 exch2_iLo(1,221)=0 exch2_iHi(1,221)=35 exch2_jLo(1,221)=52 exch2_jHi(1,221)=52 exch2_opposingSend(1,221)=2 exch2_pij(1,1,221)=1 exch2_pij(2,1,221)=0 exch2_pij(3,1,221)=0 exch2_pij(4,1,221)=1 exch2_oi(1,221)=0 exch2_oj(1,221)=0 exch2_neighbourId(2,221)=206 exch2_iLo(2,221)=0 exch2_iHi(2,221)=35 exch2_jLo(2,221)=0 exch2_jHi(2,221)=0 exch2_opposingSend(2,221)=1 exch2_pij(1,2,221)=1 exch2_pij(2,2,221)=0 exch2_pij(3,2,221)=0 exch2_pij(4,2,221)=1 exch2_oi(2,221)=0 exch2_oj(2,221)=0 exch2_neighbourId(3,221)=222 exch2_iLo(3,221)=35 exch2_iHi(3,221)=35 exch2_jLo(3,221)=0 exch2_jHi(3,221)=52 exch2_opposingSend(3,221)=4 exch2_pij(1,3,221)=1 exch2_pij(2,3,221)=0 exch2_pij(3,3,221)=0 exch2_pij(4,3,221)=1 exch2_oi(3,221)=0 exch2_oj(3,221)=0 exch2_neighbourId(4,221)=220 exch2_iLo(4,221)=0 exch2_iHi(4,221)=0 exch2_jLo(4,221)=0 exch2_jHi(4,221)=52 exch2_opposingSend(4,221)=3 exch2_pij(1,4,221)=1 exch2_pij(2,4,221)=0 exch2_pij(3,4,221)=0 exch2_pij(4,4,221)=1 exch2_oi(4,221)=0 exch2_oj(4,221)=0 RETURN END SUBROUTINE W2_E2SETUP_222 C Topology for tile 222 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(222)=34 exch2_tNy(222)=51 exch2_tBasex(222)=374 exch2_tBasey(222)=204 exch2_txGlobalo(222)=885 exch2_tyGlobalo(222)=205 exch2_isWedge(222)=0 exch2_isNedge(222)=0 exch2_isEedge(222)=0 exch2_isSedge(222)=0 exch2_myFace(222)=2 exch2_mydNx(222)=510 exch2_mydNy(222)=510 exch2_nNeighbours(222)=4 exch2_neighbourId(1,222)=237 exch2_iLo(1,222)=0 exch2_iHi(1,222)=35 exch2_jLo(1,222)=52 exch2_jHi(1,222)=52 exch2_opposingSend(1,222)=2 exch2_pij(1,1,222)=1 exch2_pij(2,1,222)=0 exch2_pij(3,1,222)=0 exch2_pij(4,1,222)=1 exch2_oi(1,222)=0 exch2_oj(1,222)=0 exch2_neighbourId(2,222)=207 exch2_iLo(2,222)=0 exch2_iHi(2,222)=35 exch2_jLo(2,222)=0 exch2_jHi(2,222)=0 exch2_opposingSend(2,222)=1 exch2_pij(1,2,222)=1 exch2_pij(2,2,222)=0 exch2_pij(3,2,222)=0 exch2_pij(4,2,222)=1 exch2_oi(2,222)=0 exch2_oj(2,222)=0 exch2_neighbourId(3,222)=223 exch2_iLo(3,222)=35 exch2_iHi(3,222)=35 exch2_jLo(3,222)=0 exch2_jHi(3,222)=52 exch2_opposingSend(3,222)=4 exch2_pij(1,3,222)=1 exch2_pij(2,3,222)=0 exch2_pij(3,3,222)=0 exch2_pij(4,3,222)=1 exch2_oi(3,222)=0 exch2_oj(3,222)=0 exch2_neighbourId(4,222)=221 exch2_iLo(4,222)=0 exch2_iHi(4,222)=0 exch2_jLo(4,222)=0 exch2_jHi(4,222)=52 exch2_opposingSend(4,222)=3 exch2_pij(1,4,222)=1 exch2_pij(2,4,222)=0 exch2_pij(3,4,222)=0 exch2_pij(4,4,222)=1 exch2_oi(4,222)=0 exch2_oj(4,222)=0 RETURN END SUBROUTINE W2_E2SETUP_223 C Topology for tile 223 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(223)=34 exch2_tNy(223)=51 exch2_tBasex(223)=408 exch2_tBasey(223)=204 exch2_txGlobalo(223)=919 exch2_tyGlobalo(223)=205 exch2_isWedge(223)=0 exch2_isNedge(223)=0 exch2_isEedge(223)=0 exch2_isSedge(223)=0 exch2_myFace(223)=2 exch2_mydNx(223)=510 exch2_mydNy(223)=510 exch2_nNeighbours(223)=4 exch2_neighbourId(1,223)=238 exch2_iLo(1,223)=0 exch2_iHi(1,223)=35 exch2_jLo(1,223)=52 exch2_jHi(1,223)=52 exch2_opposingSend(1,223)=2 exch2_pij(1,1,223)=1 exch2_pij(2,1,223)=0 exch2_pij(3,1,223)=0 exch2_pij(4,1,223)=1 exch2_oi(1,223)=0 exch2_oj(1,223)=0 exch2_neighbourId(2,223)=208 exch2_iLo(2,223)=0 exch2_iHi(2,223)=35 exch2_jLo(2,223)=0 exch2_jHi(2,223)=0 exch2_opposingSend(2,223)=1 exch2_pij(1,2,223)=1 exch2_pij(2,2,223)=0 exch2_pij(3,2,223)=0 exch2_pij(4,2,223)=1 exch2_oi(2,223)=0 exch2_oj(2,223)=0 exch2_neighbourId(3,223)=224 exch2_iLo(3,223)=35 exch2_iHi(3,223)=35 exch2_jLo(3,223)=0 exch2_jHi(3,223)=52 exch2_opposingSend(3,223)=4 exch2_pij(1,3,223)=1 exch2_pij(2,3,223)=0 exch2_pij(3,3,223)=0 exch2_pij(4,3,223)=1 exch2_oi(3,223)=0 exch2_oj(3,223)=0 exch2_neighbourId(4,223)=222 exch2_iLo(4,223)=0 exch2_iHi(4,223)=0 exch2_jLo(4,223)=0 exch2_jHi(4,223)=52 exch2_opposingSend(4,223)=3 exch2_pij(1,4,223)=1 exch2_pij(2,4,223)=0 exch2_pij(3,4,223)=0 exch2_pij(4,4,223)=1 exch2_oi(4,223)=0 exch2_oj(4,223)=0 RETURN END SUBROUTINE W2_E2SETUP_224 C Topology for tile 224 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(224)=34 exch2_tNy(224)=51 exch2_tBasex(224)=442 exch2_tBasey(224)=204 exch2_txGlobalo(224)=953 exch2_tyGlobalo(224)=205 exch2_isWedge(224)=0 exch2_isNedge(224)=0 exch2_isEedge(224)=0 exch2_isSedge(224)=0 exch2_myFace(224)=2 exch2_mydNx(224)=510 exch2_mydNy(224)=510 exch2_nNeighbours(224)=4 exch2_neighbourId(1,224)=239 exch2_iLo(1,224)=0 exch2_iHi(1,224)=35 exch2_jLo(1,224)=52 exch2_jHi(1,224)=52 exch2_opposingSend(1,224)=2 exch2_pij(1,1,224)=1 exch2_pij(2,1,224)=0 exch2_pij(3,1,224)=0 exch2_pij(4,1,224)=1 exch2_oi(1,224)=0 exch2_oj(1,224)=0 exch2_neighbourId(2,224)=209 exch2_iLo(2,224)=0 exch2_iHi(2,224)=35 exch2_jLo(2,224)=0 exch2_jHi(2,224)=0 exch2_opposingSend(2,224)=1 exch2_pij(1,2,224)=1 exch2_pij(2,2,224)=0 exch2_pij(3,2,224)=0 exch2_pij(4,2,224)=1 exch2_oi(2,224)=0 exch2_oj(2,224)=0 exch2_neighbourId(3,224)=225 exch2_iLo(3,224)=35 exch2_iHi(3,224)=35 exch2_jLo(3,224)=0 exch2_jHi(3,224)=52 exch2_opposingSend(3,224)=5 exch2_pij(1,3,224)=1 exch2_pij(2,3,224)=0 exch2_pij(3,3,224)=0 exch2_pij(4,3,224)=1 exch2_oi(3,224)=0 exch2_oj(3,224)=0 exch2_neighbourId(4,224)=223 exch2_iLo(4,224)=0 exch2_iHi(4,224)=0 exch2_jLo(4,224)=0 exch2_jHi(4,224)=52 exch2_opposingSend(4,224)=3 exch2_pij(1,4,224)=1 exch2_pij(2,4,224)=0 exch2_pij(3,4,224)=0 exch2_pij(4,4,224)=1 exch2_oi(4,224)=0 exch2_oj(4,224)=0 RETURN END SUBROUTINE W2_E2SETUP_225 C Topology for tile 225 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(225)=34 exch2_tNy(225)=51 exch2_tBasex(225)=476 exch2_tBasey(225)=204 exch2_txGlobalo(225)=987 exch2_tyGlobalo(225)=205 exch2_isWedge(225)=0 exch2_isNedge(225)=0 exch2_isEedge(225)=1 exch2_isSedge(225)=0 exch2_myFace(225)=2 exch2_mydNx(225)=510 exch2_mydNy(225)=510 exch2_nNeighbours(225)=5 exch2_neighbourId(1,225)=240 exch2_iLo(1,225)=0 exch2_iHi(1,225)=35 exch2_jLo(1,225)=52 exch2_jHi(1,225)=52 exch2_opposingSend(1,225)=2 exch2_pij(1,1,225)=1 exch2_pij(2,1,225)=0 exch2_pij(3,1,225)=0 exch2_pij(4,1,225)=1 exch2_oi(1,225)=0 exch2_oj(1,225)=0 exch2_neighbourId(2,225)=210 exch2_iLo(2,225)=0 exch2_iHi(2,225)=35 exch2_jLo(2,225)=0 exch2_jHi(2,225)=0 exch2_opposingSend(2,225)=1 exch2_pij(1,2,225)=1 exch2_pij(2,2,225)=0 exch2_pij(3,2,225)=0 exch2_pij(4,2,225)=1 exch2_oi(2,225)=0 exch2_oj(2,225)=0 exch2_neighbourId(3,225)=458 exch2_iLo(3,225)=35 exch2_iHi(3,225)=35 exch2_jLo(3,225)=34 exch2_jHi(3,225)=52 exch2_opposingSend(3,225)=2 exch2_pij(1,3,225)=0 exch2_pij(2,3,225)=1 exch2_pij(3,3,225)=-1 exch2_pij(4,3,225)=0 exch2_oi(3,225)=510 exch2_oj(3,225)=511 exch2_neighbourId(4,225)=459 exch2_iLo(4,225)=35 exch2_iHi(4,225)=35 exch2_jLo(4,225)=0 exch2_jHi(4,225)=35 exch2_opposingSend(4,225)=2 exch2_pij(1,4,225)=0 exch2_pij(2,4,225)=1 exch2_pij(3,4,225)=-1 exch2_pij(4,4,225)=0 exch2_oi(4,225)=510 exch2_oj(4,225)=511 exch2_neighbourId(5,225)=224 exch2_iLo(5,225)=0 exch2_iHi(5,225)=0 exch2_jLo(5,225)=0 exch2_jHi(5,225)=52 exch2_opposingSend(5,225)=3 exch2_pij(1,5,225)=1 exch2_pij(2,5,225)=0 exch2_pij(3,5,225)=0 exch2_pij(4,5,225)=1 exch2_oi(5,225)=0 exch2_oj(5,225)=0 RETURN END SUBROUTINE W2_E2SETUP_226 C Topology for tile 226 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(226)=34 exch2_tNy(226)=51 exch2_tBasex(226)=0 exch2_tBasey(226)=255 exch2_txGlobalo(226)=511 exch2_tyGlobalo(226)=256 exch2_isWedge(226)=1 exch2_isNedge(226)=0 exch2_isEedge(226)=0 exch2_isSedge(226)=0 exch2_myFace(226)=2 exch2_mydNx(226)=510 exch2_mydNy(226)=510 exch2_nNeighbours(226)=4 exch2_neighbourId(1,226)=241 exch2_iLo(1,226)=0 exch2_iHi(1,226)=35 exch2_jLo(1,226)=52 exch2_jHi(1,226)=52 exch2_opposingSend(1,226)=2 exch2_pij(1,1,226)=1 exch2_pij(2,1,226)=0 exch2_pij(3,1,226)=0 exch2_pij(4,1,226)=1 exch2_oi(1,226)=0 exch2_oj(1,226)=0 exch2_neighbourId(2,226)=211 exch2_iLo(2,226)=0 exch2_iHi(2,226)=35 exch2_jLo(2,226)=0 exch2_jHi(2,226)=0 exch2_opposingSend(2,226)=1 exch2_pij(1,2,226)=1 exch2_pij(2,2,226)=0 exch2_pij(3,2,226)=0 exch2_pij(4,2,226)=1 exch2_oi(2,226)=0 exch2_oj(2,226)=0 exch2_neighbourId(3,226)=227 exch2_iLo(3,226)=35 exch2_iHi(3,226)=35 exch2_jLo(3,226)=0 exch2_jHi(3,226)=52 exch2_opposingSend(3,226)=4 exch2_pij(1,3,226)=1 exch2_pij(2,3,226)=0 exch2_pij(3,3,226)=0 exch2_pij(4,3,226)=1 exch2_oi(3,226)=0 exch2_oj(3,226)=0 exch2_neighbourId(4,226)=90 exch2_iLo(4,226)=0 exch2_iHi(4,226)=0 exch2_jLo(4,226)=0 exch2_jHi(4,226)=52 exch2_opposingSend(4,226)=3 exch2_pij(1,4,226)=1 exch2_pij(2,4,226)=0 exch2_pij(3,4,226)=0 exch2_pij(4,4,226)=1 exch2_oi(4,226)=-510 exch2_oj(4,226)=0 RETURN END SUBROUTINE W2_E2SETUP_227 C Topology for tile 227 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(227)=34 exch2_tNy(227)=51 exch2_tBasex(227)=34 exch2_tBasey(227)=255 exch2_txGlobalo(227)=545 exch2_tyGlobalo(227)=256 exch2_isWedge(227)=0 exch2_isNedge(227)=0 exch2_isEedge(227)=0 exch2_isSedge(227)=0 exch2_myFace(227)=2 exch2_mydNx(227)=510 exch2_mydNy(227)=510 exch2_nNeighbours(227)=4 exch2_neighbourId(1,227)=242 exch2_iLo(1,227)=0 exch2_iHi(1,227)=35 exch2_jLo(1,227)=52 exch2_jHi(1,227)=52 exch2_opposingSend(1,227)=2 exch2_pij(1,1,227)=1 exch2_pij(2,1,227)=0 exch2_pij(3,1,227)=0 exch2_pij(4,1,227)=1 exch2_oi(1,227)=0 exch2_oj(1,227)=0 exch2_neighbourId(2,227)=212 exch2_iLo(2,227)=0 exch2_iHi(2,227)=35 exch2_jLo(2,227)=0 exch2_jHi(2,227)=0 exch2_opposingSend(2,227)=1 exch2_pij(1,2,227)=1 exch2_pij(2,2,227)=0 exch2_pij(3,2,227)=0 exch2_pij(4,2,227)=1 exch2_oi(2,227)=0 exch2_oj(2,227)=0 exch2_neighbourId(3,227)=228 exch2_iLo(3,227)=35 exch2_iHi(3,227)=35 exch2_jLo(3,227)=0 exch2_jHi(3,227)=52 exch2_opposingSend(3,227)=4 exch2_pij(1,3,227)=1 exch2_pij(2,3,227)=0 exch2_pij(3,3,227)=0 exch2_pij(4,3,227)=1 exch2_oi(3,227)=0 exch2_oj(3,227)=0 exch2_neighbourId(4,227)=226 exch2_iLo(4,227)=0 exch2_iHi(4,227)=0 exch2_jLo(4,227)=0 exch2_jHi(4,227)=52 exch2_opposingSend(4,227)=3 exch2_pij(1,4,227)=1 exch2_pij(2,4,227)=0 exch2_pij(3,4,227)=0 exch2_pij(4,4,227)=1 exch2_oi(4,227)=0 exch2_oj(4,227)=0 RETURN END SUBROUTINE W2_E2SETUP_228 C Topology for tile 228 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(228)=34 exch2_tNy(228)=51 exch2_tBasex(228)=68 exch2_tBasey(228)=255 exch2_txGlobalo(228)=579 exch2_tyGlobalo(228)=256 exch2_isWedge(228)=0 exch2_isNedge(228)=0 exch2_isEedge(228)=0 exch2_isSedge(228)=0 exch2_myFace(228)=2 exch2_mydNx(228)=510 exch2_mydNy(228)=510 exch2_nNeighbours(228)=4 exch2_neighbourId(1,228)=243 exch2_iLo(1,228)=0 exch2_iHi(1,228)=35 exch2_jLo(1,228)=52 exch2_jHi(1,228)=52 exch2_opposingSend(1,228)=2 exch2_pij(1,1,228)=1 exch2_pij(2,1,228)=0 exch2_pij(3,1,228)=0 exch2_pij(4,1,228)=1 exch2_oi(1,228)=0 exch2_oj(1,228)=0 exch2_neighbourId(2,228)=213 exch2_iLo(2,228)=0 exch2_iHi(2,228)=35 exch2_jLo(2,228)=0 exch2_jHi(2,228)=0 exch2_opposingSend(2,228)=1 exch2_pij(1,2,228)=1 exch2_pij(2,2,228)=0 exch2_pij(3,2,228)=0 exch2_pij(4,2,228)=1 exch2_oi(2,228)=0 exch2_oj(2,228)=0 exch2_neighbourId(3,228)=229 exch2_iLo(3,228)=35 exch2_iHi(3,228)=35 exch2_jLo(3,228)=0 exch2_jHi(3,228)=52 exch2_opposingSend(3,228)=4 exch2_pij(1,3,228)=1 exch2_pij(2,3,228)=0 exch2_pij(3,3,228)=0 exch2_pij(4,3,228)=1 exch2_oi(3,228)=0 exch2_oj(3,228)=0 exch2_neighbourId(4,228)=227 exch2_iLo(4,228)=0 exch2_iHi(4,228)=0 exch2_jLo(4,228)=0 exch2_jHi(4,228)=52 exch2_opposingSend(4,228)=3 exch2_pij(1,4,228)=1 exch2_pij(2,4,228)=0 exch2_pij(3,4,228)=0 exch2_pij(4,4,228)=1 exch2_oi(4,228)=0 exch2_oj(4,228)=0 RETURN END SUBROUTINE W2_E2SETUP_229 C Topology for tile 229 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(229)=34 exch2_tNy(229)=51 exch2_tBasex(229)=102 exch2_tBasey(229)=255 exch2_txGlobalo(229)=613 exch2_tyGlobalo(229)=256 exch2_isWedge(229)=0 exch2_isNedge(229)=0 exch2_isEedge(229)=0 exch2_isSedge(229)=0 exch2_myFace(229)=2 exch2_mydNx(229)=510 exch2_mydNy(229)=510 exch2_nNeighbours(229)=4 exch2_neighbourId(1,229)=244 exch2_iLo(1,229)=0 exch2_iHi(1,229)=35 exch2_jLo(1,229)=52 exch2_jHi(1,229)=52 exch2_opposingSend(1,229)=2 exch2_pij(1,1,229)=1 exch2_pij(2,1,229)=0 exch2_pij(3,1,229)=0 exch2_pij(4,1,229)=1 exch2_oi(1,229)=0 exch2_oj(1,229)=0 exch2_neighbourId(2,229)=214 exch2_iLo(2,229)=0 exch2_iHi(2,229)=35 exch2_jLo(2,229)=0 exch2_jHi(2,229)=0 exch2_opposingSend(2,229)=1 exch2_pij(1,2,229)=1 exch2_pij(2,2,229)=0 exch2_pij(3,2,229)=0 exch2_pij(4,2,229)=1 exch2_oi(2,229)=0 exch2_oj(2,229)=0 exch2_neighbourId(3,229)=230 exch2_iLo(3,229)=35 exch2_iHi(3,229)=35 exch2_jLo(3,229)=0 exch2_jHi(3,229)=52 exch2_opposingSend(3,229)=4 exch2_pij(1,3,229)=1 exch2_pij(2,3,229)=0 exch2_pij(3,3,229)=0 exch2_pij(4,3,229)=1 exch2_oi(3,229)=0 exch2_oj(3,229)=0 exch2_neighbourId(4,229)=228 exch2_iLo(4,229)=0 exch2_iHi(4,229)=0 exch2_jLo(4,229)=0 exch2_jHi(4,229)=52 exch2_opposingSend(4,229)=3 exch2_pij(1,4,229)=1 exch2_pij(2,4,229)=0 exch2_pij(3,4,229)=0 exch2_pij(4,4,229)=1 exch2_oi(4,229)=0 exch2_oj(4,229)=0 RETURN END SUBROUTINE W2_E2SETUP_230 C Topology for tile 230 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(230)=34 exch2_tNy(230)=51 exch2_tBasex(230)=136 exch2_tBasey(230)=255 exch2_txGlobalo(230)=647 exch2_tyGlobalo(230)=256 exch2_isWedge(230)=0 exch2_isNedge(230)=0 exch2_isEedge(230)=0 exch2_isSedge(230)=0 exch2_myFace(230)=2 exch2_mydNx(230)=510 exch2_mydNy(230)=510 exch2_nNeighbours(230)=4 exch2_neighbourId(1,230)=245 exch2_iLo(1,230)=0 exch2_iHi(1,230)=35 exch2_jLo(1,230)=52 exch2_jHi(1,230)=52 exch2_opposingSend(1,230)=2 exch2_pij(1,1,230)=1 exch2_pij(2,1,230)=0 exch2_pij(3,1,230)=0 exch2_pij(4,1,230)=1 exch2_oi(1,230)=0 exch2_oj(1,230)=0 exch2_neighbourId(2,230)=215 exch2_iLo(2,230)=0 exch2_iHi(2,230)=35 exch2_jLo(2,230)=0 exch2_jHi(2,230)=0 exch2_opposingSend(2,230)=1 exch2_pij(1,2,230)=1 exch2_pij(2,2,230)=0 exch2_pij(3,2,230)=0 exch2_pij(4,2,230)=1 exch2_oi(2,230)=0 exch2_oj(2,230)=0 exch2_neighbourId(3,230)=231 exch2_iLo(3,230)=35 exch2_iHi(3,230)=35 exch2_jLo(3,230)=0 exch2_jHi(3,230)=52 exch2_opposingSend(3,230)=4 exch2_pij(1,3,230)=1 exch2_pij(2,3,230)=0 exch2_pij(3,3,230)=0 exch2_pij(4,3,230)=1 exch2_oi(3,230)=0 exch2_oj(3,230)=0 exch2_neighbourId(4,230)=229 exch2_iLo(4,230)=0 exch2_iHi(4,230)=0 exch2_jLo(4,230)=0 exch2_jHi(4,230)=52 exch2_opposingSend(4,230)=3 exch2_pij(1,4,230)=1 exch2_pij(2,4,230)=0 exch2_pij(3,4,230)=0 exch2_pij(4,4,230)=1 exch2_oi(4,230)=0 exch2_oj(4,230)=0 RETURN END SUBROUTINE W2_E2SETUP_231 C Topology for tile 231 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(231)=34 exch2_tNy(231)=51 exch2_tBasex(231)=170 exch2_tBasey(231)=255 exch2_txGlobalo(231)=681 exch2_tyGlobalo(231)=256 exch2_isWedge(231)=0 exch2_isNedge(231)=0 exch2_isEedge(231)=0 exch2_isSedge(231)=0 exch2_myFace(231)=2 exch2_mydNx(231)=510 exch2_mydNy(231)=510 exch2_nNeighbours(231)=4 exch2_neighbourId(1,231)=246 exch2_iLo(1,231)=0 exch2_iHi(1,231)=35 exch2_jLo(1,231)=52 exch2_jHi(1,231)=52 exch2_opposingSend(1,231)=2 exch2_pij(1,1,231)=1 exch2_pij(2,1,231)=0 exch2_pij(3,1,231)=0 exch2_pij(4,1,231)=1 exch2_oi(1,231)=0 exch2_oj(1,231)=0 exch2_neighbourId(2,231)=216 exch2_iLo(2,231)=0 exch2_iHi(2,231)=35 exch2_jLo(2,231)=0 exch2_jHi(2,231)=0 exch2_opposingSend(2,231)=1 exch2_pij(1,2,231)=1 exch2_pij(2,2,231)=0 exch2_pij(3,2,231)=0 exch2_pij(4,2,231)=1 exch2_oi(2,231)=0 exch2_oj(2,231)=0 exch2_neighbourId(3,231)=232 exch2_iLo(3,231)=35 exch2_iHi(3,231)=35 exch2_jLo(3,231)=0 exch2_jHi(3,231)=52 exch2_opposingSend(3,231)=4 exch2_pij(1,3,231)=1 exch2_pij(2,3,231)=0 exch2_pij(3,3,231)=0 exch2_pij(4,3,231)=1 exch2_oi(3,231)=0 exch2_oj(3,231)=0 exch2_neighbourId(4,231)=230 exch2_iLo(4,231)=0 exch2_iHi(4,231)=0 exch2_jLo(4,231)=0 exch2_jHi(4,231)=52 exch2_opposingSend(4,231)=3 exch2_pij(1,4,231)=1 exch2_pij(2,4,231)=0 exch2_pij(3,4,231)=0 exch2_pij(4,4,231)=1 exch2_oi(4,231)=0 exch2_oj(4,231)=0 RETURN END SUBROUTINE W2_E2SETUP_232 C Topology for tile 232 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(232)=34 exch2_tNy(232)=51 exch2_tBasex(232)=204 exch2_tBasey(232)=255 exch2_txGlobalo(232)=715 exch2_tyGlobalo(232)=256 exch2_isWedge(232)=0 exch2_isNedge(232)=0 exch2_isEedge(232)=0 exch2_isSedge(232)=0 exch2_myFace(232)=2 exch2_mydNx(232)=510 exch2_mydNy(232)=510 exch2_nNeighbours(232)=4 exch2_neighbourId(1,232)=247 exch2_iLo(1,232)=0 exch2_iHi(1,232)=35 exch2_jLo(1,232)=52 exch2_jHi(1,232)=52 exch2_opposingSend(1,232)=2 exch2_pij(1,1,232)=1 exch2_pij(2,1,232)=0 exch2_pij(3,1,232)=0 exch2_pij(4,1,232)=1 exch2_oi(1,232)=0 exch2_oj(1,232)=0 exch2_neighbourId(2,232)=217 exch2_iLo(2,232)=0 exch2_iHi(2,232)=35 exch2_jLo(2,232)=0 exch2_jHi(2,232)=0 exch2_opposingSend(2,232)=1 exch2_pij(1,2,232)=1 exch2_pij(2,2,232)=0 exch2_pij(3,2,232)=0 exch2_pij(4,2,232)=1 exch2_oi(2,232)=0 exch2_oj(2,232)=0 exch2_neighbourId(3,232)=233 exch2_iLo(3,232)=35 exch2_iHi(3,232)=35 exch2_jLo(3,232)=0 exch2_jHi(3,232)=52 exch2_opposingSend(3,232)=4 exch2_pij(1,3,232)=1 exch2_pij(2,3,232)=0 exch2_pij(3,3,232)=0 exch2_pij(4,3,232)=1 exch2_oi(3,232)=0 exch2_oj(3,232)=0 exch2_neighbourId(4,232)=231 exch2_iLo(4,232)=0 exch2_iHi(4,232)=0 exch2_jLo(4,232)=0 exch2_jHi(4,232)=52 exch2_opposingSend(4,232)=3 exch2_pij(1,4,232)=1 exch2_pij(2,4,232)=0 exch2_pij(3,4,232)=0 exch2_pij(4,4,232)=1 exch2_oi(4,232)=0 exch2_oj(4,232)=0 RETURN END SUBROUTINE W2_E2SETUP_233 C Topology for tile 233 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(233)=34 exch2_tNy(233)=51 exch2_tBasex(233)=238 exch2_tBasey(233)=255 exch2_txGlobalo(233)=749 exch2_tyGlobalo(233)=256 exch2_isWedge(233)=0 exch2_isNedge(233)=0 exch2_isEedge(233)=0 exch2_isSedge(233)=0 exch2_myFace(233)=2 exch2_mydNx(233)=510 exch2_mydNy(233)=510 exch2_nNeighbours(233)=4 exch2_neighbourId(1,233)=248 exch2_iLo(1,233)=0 exch2_iHi(1,233)=35 exch2_jLo(1,233)=52 exch2_jHi(1,233)=52 exch2_opposingSend(1,233)=2 exch2_pij(1,1,233)=1 exch2_pij(2,1,233)=0 exch2_pij(3,1,233)=0 exch2_pij(4,1,233)=1 exch2_oi(1,233)=0 exch2_oj(1,233)=0 exch2_neighbourId(2,233)=218 exch2_iLo(2,233)=0 exch2_iHi(2,233)=35 exch2_jLo(2,233)=0 exch2_jHi(2,233)=0 exch2_opposingSend(2,233)=1 exch2_pij(1,2,233)=1 exch2_pij(2,2,233)=0 exch2_pij(3,2,233)=0 exch2_pij(4,2,233)=1 exch2_oi(2,233)=0 exch2_oj(2,233)=0 exch2_neighbourId(3,233)=234 exch2_iLo(3,233)=35 exch2_iHi(3,233)=35 exch2_jLo(3,233)=0 exch2_jHi(3,233)=52 exch2_opposingSend(3,233)=4 exch2_pij(1,3,233)=1 exch2_pij(2,3,233)=0 exch2_pij(3,3,233)=0 exch2_pij(4,3,233)=1 exch2_oi(3,233)=0 exch2_oj(3,233)=0 exch2_neighbourId(4,233)=232 exch2_iLo(4,233)=0 exch2_iHi(4,233)=0 exch2_jLo(4,233)=0 exch2_jHi(4,233)=52 exch2_opposingSend(4,233)=3 exch2_pij(1,4,233)=1 exch2_pij(2,4,233)=0 exch2_pij(3,4,233)=0 exch2_pij(4,4,233)=1 exch2_oi(4,233)=0 exch2_oj(4,233)=0 RETURN END SUBROUTINE W2_E2SETUP_234 C Topology for tile 234 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(234)=34 exch2_tNy(234)=51 exch2_tBasex(234)=272 exch2_tBasey(234)=255 exch2_txGlobalo(234)=783 exch2_tyGlobalo(234)=256 exch2_isWedge(234)=0 exch2_isNedge(234)=0 exch2_isEedge(234)=0 exch2_isSedge(234)=0 exch2_myFace(234)=2 exch2_mydNx(234)=510 exch2_mydNy(234)=510 exch2_nNeighbours(234)=4 exch2_neighbourId(1,234)=249 exch2_iLo(1,234)=0 exch2_iHi(1,234)=35 exch2_jLo(1,234)=52 exch2_jHi(1,234)=52 exch2_opposingSend(1,234)=2 exch2_pij(1,1,234)=1 exch2_pij(2,1,234)=0 exch2_pij(3,1,234)=0 exch2_pij(4,1,234)=1 exch2_oi(1,234)=0 exch2_oj(1,234)=0 exch2_neighbourId(2,234)=219 exch2_iLo(2,234)=0 exch2_iHi(2,234)=35 exch2_jLo(2,234)=0 exch2_jHi(2,234)=0 exch2_opposingSend(2,234)=1 exch2_pij(1,2,234)=1 exch2_pij(2,2,234)=0 exch2_pij(3,2,234)=0 exch2_pij(4,2,234)=1 exch2_oi(2,234)=0 exch2_oj(2,234)=0 exch2_neighbourId(3,234)=235 exch2_iLo(3,234)=35 exch2_iHi(3,234)=35 exch2_jLo(3,234)=0 exch2_jHi(3,234)=52 exch2_opposingSend(3,234)=4 exch2_pij(1,3,234)=1 exch2_pij(2,3,234)=0 exch2_pij(3,3,234)=0 exch2_pij(4,3,234)=1 exch2_oi(3,234)=0 exch2_oj(3,234)=0 exch2_neighbourId(4,234)=233 exch2_iLo(4,234)=0 exch2_iHi(4,234)=0 exch2_jLo(4,234)=0 exch2_jHi(4,234)=52 exch2_opposingSend(4,234)=3 exch2_pij(1,4,234)=1 exch2_pij(2,4,234)=0 exch2_pij(3,4,234)=0 exch2_pij(4,4,234)=1 exch2_oi(4,234)=0 exch2_oj(4,234)=0 RETURN END SUBROUTINE W2_E2SETUP_235 C Topology for tile 235 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(235)=34 exch2_tNy(235)=51 exch2_tBasex(235)=306 exch2_tBasey(235)=255 exch2_txGlobalo(235)=817 exch2_tyGlobalo(235)=256 exch2_isWedge(235)=0 exch2_isNedge(235)=0 exch2_isEedge(235)=0 exch2_isSedge(235)=0 exch2_myFace(235)=2 exch2_mydNx(235)=510 exch2_mydNy(235)=510 exch2_nNeighbours(235)=4 exch2_neighbourId(1,235)=250 exch2_iLo(1,235)=0 exch2_iHi(1,235)=35 exch2_jLo(1,235)=52 exch2_jHi(1,235)=52 exch2_opposingSend(1,235)=2 exch2_pij(1,1,235)=1 exch2_pij(2,1,235)=0 exch2_pij(3,1,235)=0 exch2_pij(4,1,235)=1 exch2_oi(1,235)=0 exch2_oj(1,235)=0 exch2_neighbourId(2,235)=220 exch2_iLo(2,235)=0 exch2_iHi(2,235)=35 exch2_jLo(2,235)=0 exch2_jHi(2,235)=0 exch2_opposingSend(2,235)=1 exch2_pij(1,2,235)=1 exch2_pij(2,2,235)=0 exch2_pij(3,2,235)=0 exch2_pij(4,2,235)=1 exch2_oi(2,235)=0 exch2_oj(2,235)=0 exch2_neighbourId(3,235)=236 exch2_iLo(3,235)=35 exch2_iHi(3,235)=35 exch2_jLo(3,235)=0 exch2_jHi(3,235)=52 exch2_opposingSend(3,235)=4 exch2_pij(1,3,235)=1 exch2_pij(2,3,235)=0 exch2_pij(3,3,235)=0 exch2_pij(4,3,235)=1 exch2_oi(3,235)=0 exch2_oj(3,235)=0 exch2_neighbourId(4,235)=234 exch2_iLo(4,235)=0 exch2_iHi(4,235)=0 exch2_jLo(4,235)=0 exch2_jHi(4,235)=52 exch2_opposingSend(4,235)=3 exch2_pij(1,4,235)=1 exch2_pij(2,4,235)=0 exch2_pij(3,4,235)=0 exch2_pij(4,4,235)=1 exch2_oi(4,235)=0 exch2_oj(4,235)=0 RETURN END SUBROUTINE W2_E2SETUP_236 C Topology for tile 236 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(236)=34 exch2_tNy(236)=51 exch2_tBasex(236)=340 exch2_tBasey(236)=255 exch2_txGlobalo(236)=851 exch2_tyGlobalo(236)=256 exch2_isWedge(236)=0 exch2_isNedge(236)=0 exch2_isEedge(236)=0 exch2_isSedge(236)=0 exch2_myFace(236)=2 exch2_mydNx(236)=510 exch2_mydNy(236)=510 exch2_nNeighbours(236)=4 exch2_neighbourId(1,236)=251 exch2_iLo(1,236)=0 exch2_iHi(1,236)=35 exch2_jLo(1,236)=52 exch2_jHi(1,236)=52 exch2_opposingSend(1,236)=2 exch2_pij(1,1,236)=1 exch2_pij(2,1,236)=0 exch2_pij(3,1,236)=0 exch2_pij(4,1,236)=1 exch2_oi(1,236)=0 exch2_oj(1,236)=0 exch2_neighbourId(2,236)=221 exch2_iLo(2,236)=0 exch2_iHi(2,236)=35 exch2_jLo(2,236)=0 exch2_jHi(2,236)=0 exch2_opposingSend(2,236)=1 exch2_pij(1,2,236)=1 exch2_pij(2,2,236)=0 exch2_pij(3,2,236)=0 exch2_pij(4,2,236)=1 exch2_oi(2,236)=0 exch2_oj(2,236)=0 exch2_neighbourId(3,236)=237 exch2_iLo(3,236)=35 exch2_iHi(3,236)=35 exch2_jLo(3,236)=0 exch2_jHi(3,236)=52 exch2_opposingSend(3,236)=4 exch2_pij(1,3,236)=1 exch2_pij(2,3,236)=0 exch2_pij(3,3,236)=0 exch2_pij(4,3,236)=1 exch2_oi(3,236)=0 exch2_oj(3,236)=0 exch2_neighbourId(4,236)=235 exch2_iLo(4,236)=0 exch2_iHi(4,236)=0 exch2_jLo(4,236)=0 exch2_jHi(4,236)=52 exch2_opposingSend(4,236)=3 exch2_pij(1,4,236)=1 exch2_pij(2,4,236)=0 exch2_pij(3,4,236)=0 exch2_pij(4,4,236)=1 exch2_oi(4,236)=0 exch2_oj(4,236)=0 RETURN END SUBROUTINE W2_E2SETUP_237 C Topology for tile 237 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(237)=34 exch2_tNy(237)=51 exch2_tBasex(237)=374 exch2_tBasey(237)=255 exch2_txGlobalo(237)=885 exch2_tyGlobalo(237)=256 exch2_isWedge(237)=0 exch2_isNedge(237)=0 exch2_isEedge(237)=0 exch2_isSedge(237)=0 exch2_myFace(237)=2 exch2_mydNx(237)=510 exch2_mydNy(237)=510 exch2_nNeighbours(237)=4 exch2_neighbourId(1,237)=252 exch2_iLo(1,237)=0 exch2_iHi(1,237)=35 exch2_jLo(1,237)=52 exch2_jHi(1,237)=52 exch2_opposingSend(1,237)=2 exch2_pij(1,1,237)=1 exch2_pij(2,1,237)=0 exch2_pij(3,1,237)=0 exch2_pij(4,1,237)=1 exch2_oi(1,237)=0 exch2_oj(1,237)=0 exch2_neighbourId(2,237)=222 exch2_iLo(2,237)=0 exch2_iHi(2,237)=35 exch2_jLo(2,237)=0 exch2_jHi(2,237)=0 exch2_opposingSend(2,237)=1 exch2_pij(1,2,237)=1 exch2_pij(2,2,237)=0 exch2_pij(3,2,237)=0 exch2_pij(4,2,237)=1 exch2_oi(2,237)=0 exch2_oj(2,237)=0 exch2_neighbourId(3,237)=238 exch2_iLo(3,237)=35 exch2_iHi(3,237)=35 exch2_jLo(3,237)=0 exch2_jHi(3,237)=52 exch2_opposingSend(3,237)=4 exch2_pij(1,3,237)=1 exch2_pij(2,3,237)=0 exch2_pij(3,3,237)=0 exch2_pij(4,3,237)=1 exch2_oi(3,237)=0 exch2_oj(3,237)=0 exch2_neighbourId(4,237)=236 exch2_iLo(4,237)=0 exch2_iHi(4,237)=0 exch2_jLo(4,237)=0 exch2_jHi(4,237)=52 exch2_opposingSend(4,237)=3 exch2_pij(1,4,237)=1 exch2_pij(2,4,237)=0 exch2_pij(3,4,237)=0 exch2_pij(4,4,237)=1 exch2_oi(4,237)=0 exch2_oj(4,237)=0 RETURN END SUBROUTINE W2_E2SETUP_238 C Topology for tile 238 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(238)=34 exch2_tNy(238)=51 exch2_tBasex(238)=408 exch2_tBasey(238)=255 exch2_txGlobalo(238)=919 exch2_tyGlobalo(238)=256 exch2_isWedge(238)=0 exch2_isNedge(238)=0 exch2_isEedge(238)=0 exch2_isSedge(238)=0 exch2_myFace(238)=2 exch2_mydNx(238)=510 exch2_mydNy(238)=510 exch2_nNeighbours(238)=4 exch2_neighbourId(1,238)=253 exch2_iLo(1,238)=0 exch2_iHi(1,238)=35 exch2_jLo(1,238)=52 exch2_jHi(1,238)=52 exch2_opposingSend(1,238)=2 exch2_pij(1,1,238)=1 exch2_pij(2,1,238)=0 exch2_pij(3,1,238)=0 exch2_pij(4,1,238)=1 exch2_oi(1,238)=0 exch2_oj(1,238)=0 exch2_neighbourId(2,238)=223 exch2_iLo(2,238)=0 exch2_iHi(2,238)=35 exch2_jLo(2,238)=0 exch2_jHi(2,238)=0 exch2_opposingSend(2,238)=1 exch2_pij(1,2,238)=1 exch2_pij(2,2,238)=0 exch2_pij(3,2,238)=0 exch2_pij(4,2,238)=1 exch2_oi(2,238)=0 exch2_oj(2,238)=0 exch2_neighbourId(3,238)=239 exch2_iLo(3,238)=35 exch2_iHi(3,238)=35 exch2_jLo(3,238)=0 exch2_jHi(3,238)=52 exch2_opposingSend(3,238)=4 exch2_pij(1,3,238)=1 exch2_pij(2,3,238)=0 exch2_pij(3,3,238)=0 exch2_pij(4,3,238)=1 exch2_oi(3,238)=0 exch2_oj(3,238)=0 exch2_neighbourId(4,238)=237 exch2_iLo(4,238)=0 exch2_iHi(4,238)=0 exch2_jLo(4,238)=0 exch2_jHi(4,238)=52 exch2_opposingSend(4,238)=3 exch2_pij(1,4,238)=1 exch2_pij(2,4,238)=0 exch2_pij(3,4,238)=0 exch2_pij(4,4,238)=1 exch2_oi(4,238)=0 exch2_oj(4,238)=0 RETURN END SUBROUTINE W2_E2SETUP_239 C Topology for tile 239 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(239)=34 exch2_tNy(239)=51 exch2_tBasex(239)=442 exch2_tBasey(239)=255 exch2_txGlobalo(239)=953 exch2_tyGlobalo(239)=256 exch2_isWedge(239)=0 exch2_isNedge(239)=0 exch2_isEedge(239)=0 exch2_isSedge(239)=0 exch2_myFace(239)=2 exch2_mydNx(239)=510 exch2_mydNy(239)=510 exch2_nNeighbours(239)=4 exch2_neighbourId(1,239)=254 exch2_iLo(1,239)=0 exch2_iHi(1,239)=35 exch2_jLo(1,239)=52 exch2_jHi(1,239)=52 exch2_opposingSend(1,239)=2 exch2_pij(1,1,239)=1 exch2_pij(2,1,239)=0 exch2_pij(3,1,239)=0 exch2_pij(4,1,239)=1 exch2_oi(1,239)=0 exch2_oj(1,239)=0 exch2_neighbourId(2,239)=224 exch2_iLo(2,239)=0 exch2_iHi(2,239)=35 exch2_jLo(2,239)=0 exch2_jHi(2,239)=0 exch2_opposingSend(2,239)=1 exch2_pij(1,2,239)=1 exch2_pij(2,2,239)=0 exch2_pij(3,2,239)=0 exch2_pij(4,2,239)=1 exch2_oi(2,239)=0 exch2_oj(2,239)=0 exch2_neighbourId(3,239)=240 exch2_iLo(3,239)=35 exch2_iHi(3,239)=35 exch2_jLo(3,239)=0 exch2_jHi(3,239)=52 exch2_opposingSend(3,239)=5 exch2_pij(1,3,239)=1 exch2_pij(2,3,239)=0 exch2_pij(3,3,239)=0 exch2_pij(4,3,239)=1 exch2_oi(3,239)=0 exch2_oj(3,239)=0 exch2_neighbourId(4,239)=238 exch2_iLo(4,239)=0 exch2_iHi(4,239)=0 exch2_jLo(4,239)=0 exch2_jHi(4,239)=52 exch2_opposingSend(4,239)=3 exch2_pij(1,4,239)=1 exch2_pij(2,4,239)=0 exch2_pij(3,4,239)=0 exch2_pij(4,4,239)=1 exch2_oi(4,239)=0 exch2_oj(4,239)=0 RETURN END SUBROUTINE W2_E2SETUP_240 C Topology for tile 240 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(240)=34 exch2_tNy(240)=51 exch2_tBasex(240)=476 exch2_tBasey(240)=255 exch2_txGlobalo(240)=987 exch2_tyGlobalo(240)=256 exch2_isWedge(240)=0 exch2_isNedge(240)=0 exch2_isEedge(240)=1 exch2_isSedge(240)=0 exch2_myFace(240)=2 exch2_mydNx(240)=510 exch2_mydNy(240)=510 exch2_nNeighbours(240)=5 exch2_neighbourId(1,240)=255 exch2_iLo(1,240)=0 exch2_iHi(1,240)=35 exch2_jLo(1,240)=52 exch2_jHi(1,240)=52 exch2_opposingSend(1,240)=2 exch2_pij(1,1,240)=1 exch2_pij(2,1,240)=0 exch2_pij(3,1,240)=0 exch2_pij(4,1,240)=1 exch2_oi(1,240)=0 exch2_oj(1,240)=0 exch2_neighbourId(2,240)=225 exch2_iLo(2,240)=0 exch2_iHi(2,240)=35 exch2_jLo(2,240)=0 exch2_jHi(2,240)=0 exch2_opposingSend(2,240)=1 exch2_pij(1,2,240)=1 exch2_pij(2,2,240)=0 exch2_pij(3,2,240)=0 exch2_pij(4,2,240)=1 exch2_oi(2,240)=0 exch2_oj(2,240)=0 exch2_neighbourId(3,240)=457 exch2_iLo(3,240)=35 exch2_iHi(3,240)=35 exch2_jLo(3,240)=17 exch2_jHi(3,240)=52 exch2_opposingSend(3,240)=2 exch2_pij(1,3,240)=0 exch2_pij(2,3,240)=1 exch2_pij(3,3,240)=-1 exch2_pij(4,3,240)=0 exch2_oi(3,240)=510 exch2_oj(3,240)=511 exch2_neighbourId(4,240)=458 exch2_iLo(4,240)=35 exch2_iHi(4,240)=35 exch2_jLo(4,240)=0 exch2_jHi(4,240)=18 exch2_opposingSend(4,240)=3 exch2_pij(1,4,240)=0 exch2_pij(2,4,240)=1 exch2_pij(3,4,240)=-1 exch2_pij(4,4,240)=0 exch2_oi(4,240)=510 exch2_oj(4,240)=511 exch2_neighbourId(5,240)=239 exch2_iLo(5,240)=0 exch2_iHi(5,240)=0 exch2_jLo(5,240)=0 exch2_jHi(5,240)=52 exch2_opposingSend(5,240)=3 exch2_pij(1,5,240)=1 exch2_pij(2,5,240)=0 exch2_pij(3,5,240)=0 exch2_pij(4,5,240)=1 exch2_oi(5,240)=0 exch2_oj(5,240)=0 RETURN END SUBROUTINE W2_E2SETUP_241 C Topology for tile 241 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(241)=34 exch2_tNy(241)=51 exch2_tBasex(241)=0 exch2_tBasey(241)=306 exch2_txGlobalo(241)=511 exch2_tyGlobalo(241)=307 exch2_isWedge(241)=1 exch2_isNedge(241)=0 exch2_isEedge(241)=0 exch2_isSedge(241)=0 exch2_myFace(241)=2 exch2_mydNx(241)=510 exch2_mydNy(241)=510 exch2_nNeighbours(241)=4 exch2_neighbourId(1,241)=256 exch2_iLo(1,241)=0 exch2_iHi(1,241)=35 exch2_jLo(1,241)=52 exch2_jHi(1,241)=52 exch2_opposingSend(1,241)=2 exch2_pij(1,1,241)=1 exch2_pij(2,1,241)=0 exch2_pij(3,1,241)=0 exch2_pij(4,1,241)=1 exch2_oi(1,241)=0 exch2_oj(1,241)=0 exch2_neighbourId(2,241)=226 exch2_iLo(2,241)=0 exch2_iHi(2,241)=35 exch2_jLo(2,241)=0 exch2_jHi(2,241)=0 exch2_opposingSend(2,241)=1 exch2_pij(1,2,241)=1 exch2_pij(2,2,241)=0 exch2_pij(3,2,241)=0 exch2_pij(4,2,241)=1 exch2_oi(2,241)=0 exch2_oj(2,241)=0 exch2_neighbourId(3,241)=242 exch2_iLo(3,241)=35 exch2_iHi(3,241)=35 exch2_jLo(3,241)=0 exch2_jHi(3,241)=52 exch2_opposingSend(3,241)=4 exch2_pij(1,3,241)=1 exch2_pij(2,3,241)=0 exch2_pij(3,3,241)=0 exch2_pij(4,3,241)=1 exch2_oi(3,241)=0 exch2_oj(3,241)=0 exch2_neighbourId(4,241)=105 exch2_iLo(4,241)=0 exch2_iHi(4,241)=0 exch2_jLo(4,241)=0 exch2_jHi(4,241)=52 exch2_opposingSend(4,241)=3 exch2_pij(1,4,241)=1 exch2_pij(2,4,241)=0 exch2_pij(3,4,241)=0 exch2_pij(4,4,241)=1 exch2_oi(4,241)=-510 exch2_oj(4,241)=0 RETURN END SUBROUTINE W2_E2SETUP_242 C Topology for tile 242 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(242)=34 exch2_tNy(242)=51 exch2_tBasex(242)=34 exch2_tBasey(242)=306 exch2_txGlobalo(242)=545 exch2_tyGlobalo(242)=307 exch2_isWedge(242)=0 exch2_isNedge(242)=0 exch2_isEedge(242)=0 exch2_isSedge(242)=0 exch2_myFace(242)=2 exch2_mydNx(242)=510 exch2_mydNy(242)=510 exch2_nNeighbours(242)=4 exch2_neighbourId(1,242)=257 exch2_iLo(1,242)=0 exch2_iHi(1,242)=35 exch2_jLo(1,242)=52 exch2_jHi(1,242)=52 exch2_opposingSend(1,242)=2 exch2_pij(1,1,242)=1 exch2_pij(2,1,242)=0 exch2_pij(3,1,242)=0 exch2_pij(4,1,242)=1 exch2_oi(1,242)=0 exch2_oj(1,242)=0 exch2_neighbourId(2,242)=227 exch2_iLo(2,242)=0 exch2_iHi(2,242)=35 exch2_jLo(2,242)=0 exch2_jHi(2,242)=0 exch2_opposingSend(2,242)=1 exch2_pij(1,2,242)=1 exch2_pij(2,2,242)=0 exch2_pij(3,2,242)=0 exch2_pij(4,2,242)=1 exch2_oi(2,242)=0 exch2_oj(2,242)=0 exch2_neighbourId(3,242)=243 exch2_iLo(3,242)=35 exch2_iHi(3,242)=35 exch2_jLo(3,242)=0 exch2_jHi(3,242)=52 exch2_opposingSend(3,242)=4 exch2_pij(1,3,242)=1 exch2_pij(2,3,242)=0 exch2_pij(3,3,242)=0 exch2_pij(4,3,242)=1 exch2_oi(3,242)=0 exch2_oj(3,242)=0 exch2_neighbourId(4,242)=241 exch2_iLo(4,242)=0 exch2_iHi(4,242)=0 exch2_jLo(4,242)=0 exch2_jHi(4,242)=52 exch2_opposingSend(4,242)=3 exch2_pij(1,4,242)=1 exch2_pij(2,4,242)=0 exch2_pij(3,4,242)=0 exch2_pij(4,4,242)=1 exch2_oi(4,242)=0 exch2_oj(4,242)=0 RETURN END SUBROUTINE W2_E2SETUP_243 C Topology for tile 243 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(243)=34 exch2_tNy(243)=51 exch2_tBasex(243)=68 exch2_tBasey(243)=306 exch2_txGlobalo(243)=579 exch2_tyGlobalo(243)=307 exch2_isWedge(243)=0 exch2_isNedge(243)=0 exch2_isEedge(243)=0 exch2_isSedge(243)=0 exch2_myFace(243)=2 exch2_mydNx(243)=510 exch2_mydNy(243)=510 exch2_nNeighbours(243)=4 exch2_neighbourId(1,243)=258 exch2_iLo(1,243)=0 exch2_iHi(1,243)=35 exch2_jLo(1,243)=52 exch2_jHi(1,243)=52 exch2_opposingSend(1,243)=2 exch2_pij(1,1,243)=1 exch2_pij(2,1,243)=0 exch2_pij(3,1,243)=0 exch2_pij(4,1,243)=1 exch2_oi(1,243)=0 exch2_oj(1,243)=0 exch2_neighbourId(2,243)=228 exch2_iLo(2,243)=0 exch2_iHi(2,243)=35 exch2_jLo(2,243)=0 exch2_jHi(2,243)=0 exch2_opposingSend(2,243)=1 exch2_pij(1,2,243)=1 exch2_pij(2,2,243)=0 exch2_pij(3,2,243)=0 exch2_pij(4,2,243)=1 exch2_oi(2,243)=0 exch2_oj(2,243)=0 exch2_neighbourId(3,243)=244 exch2_iLo(3,243)=35 exch2_iHi(3,243)=35 exch2_jLo(3,243)=0 exch2_jHi(3,243)=52 exch2_opposingSend(3,243)=4 exch2_pij(1,3,243)=1 exch2_pij(2,3,243)=0 exch2_pij(3,3,243)=0 exch2_pij(4,3,243)=1 exch2_oi(3,243)=0 exch2_oj(3,243)=0 exch2_neighbourId(4,243)=242 exch2_iLo(4,243)=0 exch2_iHi(4,243)=0 exch2_jLo(4,243)=0 exch2_jHi(4,243)=52 exch2_opposingSend(4,243)=3 exch2_pij(1,4,243)=1 exch2_pij(2,4,243)=0 exch2_pij(3,4,243)=0 exch2_pij(4,4,243)=1 exch2_oi(4,243)=0 exch2_oj(4,243)=0 RETURN END SUBROUTINE W2_E2SETUP_244 C Topology for tile 244 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(244)=34 exch2_tNy(244)=51 exch2_tBasex(244)=102 exch2_tBasey(244)=306 exch2_txGlobalo(244)=613 exch2_tyGlobalo(244)=307 exch2_isWedge(244)=0 exch2_isNedge(244)=0 exch2_isEedge(244)=0 exch2_isSedge(244)=0 exch2_myFace(244)=2 exch2_mydNx(244)=510 exch2_mydNy(244)=510 exch2_nNeighbours(244)=4 exch2_neighbourId(1,244)=259 exch2_iLo(1,244)=0 exch2_iHi(1,244)=35 exch2_jLo(1,244)=52 exch2_jHi(1,244)=52 exch2_opposingSend(1,244)=2 exch2_pij(1,1,244)=1 exch2_pij(2,1,244)=0 exch2_pij(3,1,244)=0 exch2_pij(4,1,244)=1 exch2_oi(1,244)=0 exch2_oj(1,244)=0 exch2_neighbourId(2,244)=229 exch2_iLo(2,244)=0 exch2_iHi(2,244)=35 exch2_jLo(2,244)=0 exch2_jHi(2,244)=0 exch2_opposingSend(2,244)=1 exch2_pij(1,2,244)=1 exch2_pij(2,2,244)=0 exch2_pij(3,2,244)=0 exch2_pij(4,2,244)=1 exch2_oi(2,244)=0 exch2_oj(2,244)=0 exch2_neighbourId(3,244)=245 exch2_iLo(3,244)=35 exch2_iHi(3,244)=35 exch2_jLo(3,244)=0 exch2_jHi(3,244)=52 exch2_opposingSend(3,244)=4 exch2_pij(1,3,244)=1 exch2_pij(2,3,244)=0 exch2_pij(3,3,244)=0 exch2_pij(4,3,244)=1 exch2_oi(3,244)=0 exch2_oj(3,244)=0 exch2_neighbourId(4,244)=243 exch2_iLo(4,244)=0 exch2_iHi(4,244)=0 exch2_jLo(4,244)=0 exch2_jHi(4,244)=52 exch2_opposingSend(4,244)=3 exch2_pij(1,4,244)=1 exch2_pij(2,4,244)=0 exch2_pij(3,4,244)=0 exch2_pij(4,4,244)=1 exch2_oi(4,244)=0 exch2_oj(4,244)=0 RETURN END SUBROUTINE W2_E2SETUP_245 C Topology for tile 245 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(245)=34 exch2_tNy(245)=51 exch2_tBasex(245)=136 exch2_tBasey(245)=306 exch2_txGlobalo(245)=647 exch2_tyGlobalo(245)=307 exch2_isWedge(245)=0 exch2_isNedge(245)=0 exch2_isEedge(245)=0 exch2_isSedge(245)=0 exch2_myFace(245)=2 exch2_mydNx(245)=510 exch2_mydNy(245)=510 exch2_nNeighbours(245)=4 exch2_neighbourId(1,245)=260 exch2_iLo(1,245)=0 exch2_iHi(1,245)=35 exch2_jLo(1,245)=52 exch2_jHi(1,245)=52 exch2_opposingSend(1,245)=2 exch2_pij(1,1,245)=1 exch2_pij(2,1,245)=0 exch2_pij(3,1,245)=0 exch2_pij(4,1,245)=1 exch2_oi(1,245)=0 exch2_oj(1,245)=0 exch2_neighbourId(2,245)=230 exch2_iLo(2,245)=0 exch2_iHi(2,245)=35 exch2_jLo(2,245)=0 exch2_jHi(2,245)=0 exch2_opposingSend(2,245)=1 exch2_pij(1,2,245)=1 exch2_pij(2,2,245)=0 exch2_pij(3,2,245)=0 exch2_pij(4,2,245)=1 exch2_oi(2,245)=0 exch2_oj(2,245)=0 exch2_neighbourId(3,245)=246 exch2_iLo(3,245)=35 exch2_iHi(3,245)=35 exch2_jLo(3,245)=0 exch2_jHi(3,245)=52 exch2_opposingSend(3,245)=4 exch2_pij(1,3,245)=1 exch2_pij(2,3,245)=0 exch2_pij(3,3,245)=0 exch2_pij(4,3,245)=1 exch2_oi(3,245)=0 exch2_oj(3,245)=0 exch2_neighbourId(4,245)=244 exch2_iLo(4,245)=0 exch2_iHi(4,245)=0 exch2_jLo(4,245)=0 exch2_jHi(4,245)=52 exch2_opposingSend(4,245)=3 exch2_pij(1,4,245)=1 exch2_pij(2,4,245)=0 exch2_pij(3,4,245)=0 exch2_pij(4,4,245)=1 exch2_oi(4,245)=0 exch2_oj(4,245)=0 RETURN END SUBROUTINE W2_E2SETUP_246 C Topology for tile 246 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(246)=34 exch2_tNy(246)=51 exch2_tBasex(246)=170 exch2_tBasey(246)=306 exch2_txGlobalo(246)=681 exch2_tyGlobalo(246)=307 exch2_isWedge(246)=0 exch2_isNedge(246)=0 exch2_isEedge(246)=0 exch2_isSedge(246)=0 exch2_myFace(246)=2 exch2_mydNx(246)=510 exch2_mydNy(246)=510 exch2_nNeighbours(246)=4 exch2_neighbourId(1,246)=261 exch2_iLo(1,246)=0 exch2_iHi(1,246)=35 exch2_jLo(1,246)=52 exch2_jHi(1,246)=52 exch2_opposingSend(1,246)=2 exch2_pij(1,1,246)=1 exch2_pij(2,1,246)=0 exch2_pij(3,1,246)=0 exch2_pij(4,1,246)=1 exch2_oi(1,246)=0 exch2_oj(1,246)=0 exch2_neighbourId(2,246)=231 exch2_iLo(2,246)=0 exch2_iHi(2,246)=35 exch2_jLo(2,246)=0 exch2_jHi(2,246)=0 exch2_opposingSend(2,246)=1 exch2_pij(1,2,246)=1 exch2_pij(2,2,246)=0 exch2_pij(3,2,246)=0 exch2_pij(4,2,246)=1 exch2_oi(2,246)=0 exch2_oj(2,246)=0 exch2_neighbourId(3,246)=247 exch2_iLo(3,246)=35 exch2_iHi(3,246)=35 exch2_jLo(3,246)=0 exch2_jHi(3,246)=52 exch2_opposingSend(3,246)=4 exch2_pij(1,3,246)=1 exch2_pij(2,3,246)=0 exch2_pij(3,3,246)=0 exch2_pij(4,3,246)=1 exch2_oi(3,246)=0 exch2_oj(3,246)=0 exch2_neighbourId(4,246)=245 exch2_iLo(4,246)=0 exch2_iHi(4,246)=0 exch2_jLo(4,246)=0 exch2_jHi(4,246)=52 exch2_opposingSend(4,246)=3 exch2_pij(1,4,246)=1 exch2_pij(2,4,246)=0 exch2_pij(3,4,246)=0 exch2_pij(4,4,246)=1 exch2_oi(4,246)=0 exch2_oj(4,246)=0 RETURN END SUBROUTINE W2_E2SETUP_247 C Topology for tile 247 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(247)=34 exch2_tNy(247)=51 exch2_tBasex(247)=204 exch2_tBasey(247)=306 exch2_txGlobalo(247)=715 exch2_tyGlobalo(247)=307 exch2_isWedge(247)=0 exch2_isNedge(247)=0 exch2_isEedge(247)=0 exch2_isSedge(247)=0 exch2_myFace(247)=2 exch2_mydNx(247)=510 exch2_mydNy(247)=510 exch2_nNeighbours(247)=4 exch2_neighbourId(1,247)=262 exch2_iLo(1,247)=0 exch2_iHi(1,247)=35 exch2_jLo(1,247)=52 exch2_jHi(1,247)=52 exch2_opposingSend(1,247)=2 exch2_pij(1,1,247)=1 exch2_pij(2,1,247)=0 exch2_pij(3,1,247)=0 exch2_pij(4,1,247)=1 exch2_oi(1,247)=0 exch2_oj(1,247)=0 exch2_neighbourId(2,247)=232 exch2_iLo(2,247)=0 exch2_iHi(2,247)=35 exch2_jLo(2,247)=0 exch2_jHi(2,247)=0 exch2_opposingSend(2,247)=1 exch2_pij(1,2,247)=1 exch2_pij(2,2,247)=0 exch2_pij(3,2,247)=0 exch2_pij(4,2,247)=1 exch2_oi(2,247)=0 exch2_oj(2,247)=0 exch2_neighbourId(3,247)=248 exch2_iLo(3,247)=35 exch2_iHi(3,247)=35 exch2_jLo(3,247)=0 exch2_jHi(3,247)=52 exch2_opposingSend(3,247)=4 exch2_pij(1,3,247)=1 exch2_pij(2,3,247)=0 exch2_pij(3,3,247)=0 exch2_pij(4,3,247)=1 exch2_oi(3,247)=0 exch2_oj(3,247)=0 exch2_neighbourId(4,247)=246 exch2_iLo(4,247)=0 exch2_iHi(4,247)=0 exch2_jLo(4,247)=0 exch2_jHi(4,247)=52 exch2_opposingSend(4,247)=3 exch2_pij(1,4,247)=1 exch2_pij(2,4,247)=0 exch2_pij(3,4,247)=0 exch2_pij(4,4,247)=1 exch2_oi(4,247)=0 exch2_oj(4,247)=0 RETURN END SUBROUTINE W2_E2SETUP_248 C Topology for tile 248 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(248)=34 exch2_tNy(248)=51 exch2_tBasex(248)=238 exch2_tBasey(248)=306 exch2_txGlobalo(248)=749 exch2_tyGlobalo(248)=307 exch2_isWedge(248)=0 exch2_isNedge(248)=0 exch2_isEedge(248)=0 exch2_isSedge(248)=0 exch2_myFace(248)=2 exch2_mydNx(248)=510 exch2_mydNy(248)=510 exch2_nNeighbours(248)=4 exch2_neighbourId(1,248)=263 exch2_iLo(1,248)=0 exch2_iHi(1,248)=35 exch2_jLo(1,248)=52 exch2_jHi(1,248)=52 exch2_opposingSend(1,248)=2 exch2_pij(1,1,248)=1 exch2_pij(2,1,248)=0 exch2_pij(3,1,248)=0 exch2_pij(4,1,248)=1 exch2_oi(1,248)=0 exch2_oj(1,248)=0 exch2_neighbourId(2,248)=233 exch2_iLo(2,248)=0 exch2_iHi(2,248)=35 exch2_jLo(2,248)=0 exch2_jHi(2,248)=0 exch2_opposingSend(2,248)=1 exch2_pij(1,2,248)=1 exch2_pij(2,2,248)=0 exch2_pij(3,2,248)=0 exch2_pij(4,2,248)=1 exch2_oi(2,248)=0 exch2_oj(2,248)=0 exch2_neighbourId(3,248)=249 exch2_iLo(3,248)=35 exch2_iHi(3,248)=35 exch2_jLo(3,248)=0 exch2_jHi(3,248)=52 exch2_opposingSend(3,248)=4 exch2_pij(1,3,248)=1 exch2_pij(2,3,248)=0 exch2_pij(3,3,248)=0 exch2_pij(4,3,248)=1 exch2_oi(3,248)=0 exch2_oj(3,248)=0 exch2_neighbourId(4,248)=247 exch2_iLo(4,248)=0 exch2_iHi(4,248)=0 exch2_jLo(4,248)=0 exch2_jHi(4,248)=52 exch2_opposingSend(4,248)=3 exch2_pij(1,4,248)=1 exch2_pij(2,4,248)=0 exch2_pij(3,4,248)=0 exch2_pij(4,4,248)=1 exch2_oi(4,248)=0 exch2_oj(4,248)=0 RETURN END SUBROUTINE W2_E2SETUP_249 C Topology for tile 249 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(249)=34 exch2_tNy(249)=51 exch2_tBasex(249)=272 exch2_tBasey(249)=306 exch2_txGlobalo(249)=783 exch2_tyGlobalo(249)=307 exch2_isWedge(249)=0 exch2_isNedge(249)=0 exch2_isEedge(249)=0 exch2_isSedge(249)=0 exch2_myFace(249)=2 exch2_mydNx(249)=510 exch2_mydNy(249)=510 exch2_nNeighbours(249)=4 exch2_neighbourId(1,249)=264 exch2_iLo(1,249)=0 exch2_iHi(1,249)=35 exch2_jLo(1,249)=52 exch2_jHi(1,249)=52 exch2_opposingSend(1,249)=2 exch2_pij(1,1,249)=1 exch2_pij(2,1,249)=0 exch2_pij(3,1,249)=0 exch2_pij(4,1,249)=1 exch2_oi(1,249)=0 exch2_oj(1,249)=0 exch2_neighbourId(2,249)=234 exch2_iLo(2,249)=0 exch2_iHi(2,249)=35 exch2_jLo(2,249)=0 exch2_jHi(2,249)=0 exch2_opposingSend(2,249)=1 exch2_pij(1,2,249)=1 exch2_pij(2,2,249)=0 exch2_pij(3,2,249)=0 exch2_pij(4,2,249)=1 exch2_oi(2,249)=0 exch2_oj(2,249)=0 exch2_neighbourId(3,249)=250 exch2_iLo(3,249)=35 exch2_iHi(3,249)=35 exch2_jLo(3,249)=0 exch2_jHi(3,249)=52 exch2_opposingSend(3,249)=4 exch2_pij(1,3,249)=1 exch2_pij(2,3,249)=0 exch2_pij(3,3,249)=0 exch2_pij(4,3,249)=1 exch2_oi(3,249)=0 exch2_oj(3,249)=0 exch2_neighbourId(4,249)=248 exch2_iLo(4,249)=0 exch2_iHi(4,249)=0 exch2_jLo(4,249)=0 exch2_jHi(4,249)=52 exch2_opposingSend(4,249)=3 exch2_pij(1,4,249)=1 exch2_pij(2,4,249)=0 exch2_pij(3,4,249)=0 exch2_pij(4,4,249)=1 exch2_oi(4,249)=0 exch2_oj(4,249)=0 RETURN END SUBROUTINE W2_E2SETUP_250 C Topology for tile 250 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(250)=34 exch2_tNy(250)=51 exch2_tBasex(250)=306 exch2_tBasey(250)=306 exch2_txGlobalo(250)=817 exch2_tyGlobalo(250)=307 exch2_isWedge(250)=0 exch2_isNedge(250)=0 exch2_isEedge(250)=0 exch2_isSedge(250)=0 exch2_myFace(250)=2 exch2_mydNx(250)=510 exch2_mydNy(250)=510 exch2_nNeighbours(250)=4 exch2_neighbourId(1,250)=265 exch2_iLo(1,250)=0 exch2_iHi(1,250)=35 exch2_jLo(1,250)=52 exch2_jHi(1,250)=52 exch2_opposingSend(1,250)=2 exch2_pij(1,1,250)=1 exch2_pij(2,1,250)=0 exch2_pij(3,1,250)=0 exch2_pij(4,1,250)=1 exch2_oi(1,250)=0 exch2_oj(1,250)=0 exch2_neighbourId(2,250)=235 exch2_iLo(2,250)=0 exch2_iHi(2,250)=35 exch2_jLo(2,250)=0 exch2_jHi(2,250)=0 exch2_opposingSend(2,250)=1 exch2_pij(1,2,250)=1 exch2_pij(2,2,250)=0 exch2_pij(3,2,250)=0 exch2_pij(4,2,250)=1 exch2_oi(2,250)=0 exch2_oj(2,250)=0 exch2_neighbourId(3,250)=251 exch2_iLo(3,250)=35 exch2_iHi(3,250)=35 exch2_jLo(3,250)=0 exch2_jHi(3,250)=52 exch2_opposingSend(3,250)=4 exch2_pij(1,3,250)=1 exch2_pij(2,3,250)=0 exch2_pij(3,3,250)=0 exch2_pij(4,3,250)=1 exch2_oi(3,250)=0 exch2_oj(3,250)=0 exch2_neighbourId(4,250)=249 exch2_iLo(4,250)=0 exch2_iHi(4,250)=0 exch2_jLo(4,250)=0 exch2_jHi(4,250)=52 exch2_opposingSend(4,250)=3 exch2_pij(1,4,250)=1 exch2_pij(2,4,250)=0 exch2_pij(3,4,250)=0 exch2_pij(4,4,250)=1 exch2_oi(4,250)=0 exch2_oj(4,250)=0 RETURN END SUBROUTINE W2_E2SETUP_251 C Topology for tile 251 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(251)=34 exch2_tNy(251)=51 exch2_tBasex(251)=340 exch2_tBasey(251)=306 exch2_txGlobalo(251)=851 exch2_tyGlobalo(251)=307 exch2_isWedge(251)=0 exch2_isNedge(251)=0 exch2_isEedge(251)=0 exch2_isSedge(251)=0 exch2_myFace(251)=2 exch2_mydNx(251)=510 exch2_mydNy(251)=510 exch2_nNeighbours(251)=4 exch2_neighbourId(1,251)=266 exch2_iLo(1,251)=0 exch2_iHi(1,251)=35 exch2_jLo(1,251)=52 exch2_jHi(1,251)=52 exch2_opposingSend(1,251)=2 exch2_pij(1,1,251)=1 exch2_pij(2,1,251)=0 exch2_pij(3,1,251)=0 exch2_pij(4,1,251)=1 exch2_oi(1,251)=0 exch2_oj(1,251)=0 exch2_neighbourId(2,251)=236 exch2_iLo(2,251)=0 exch2_iHi(2,251)=35 exch2_jLo(2,251)=0 exch2_jHi(2,251)=0 exch2_opposingSend(2,251)=1 exch2_pij(1,2,251)=1 exch2_pij(2,2,251)=0 exch2_pij(3,2,251)=0 exch2_pij(4,2,251)=1 exch2_oi(2,251)=0 exch2_oj(2,251)=0 exch2_neighbourId(3,251)=252 exch2_iLo(3,251)=35 exch2_iHi(3,251)=35 exch2_jLo(3,251)=0 exch2_jHi(3,251)=52 exch2_opposingSend(3,251)=4 exch2_pij(1,3,251)=1 exch2_pij(2,3,251)=0 exch2_pij(3,3,251)=0 exch2_pij(4,3,251)=1 exch2_oi(3,251)=0 exch2_oj(3,251)=0 exch2_neighbourId(4,251)=250 exch2_iLo(4,251)=0 exch2_iHi(4,251)=0 exch2_jLo(4,251)=0 exch2_jHi(4,251)=52 exch2_opposingSend(4,251)=3 exch2_pij(1,4,251)=1 exch2_pij(2,4,251)=0 exch2_pij(3,4,251)=0 exch2_pij(4,4,251)=1 exch2_oi(4,251)=0 exch2_oj(4,251)=0 RETURN END SUBROUTINE W2_E2SETUP_252 C Topology for tile 252 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(252)=34 exch2_tNy(252)=51 exch2_tBasex(252)=374 exch2_tBasey(252)=306 exch2_txGlobalo(252)=885 exch2_tyGlobalo(252)=307 exch2_isWedge(252)=0 exch2_isNedge(252)=0 exch2_isEedge(252)=0 exch2_isSedge(252)=0 exch2_myFace(252)=2 exch2_mydNx(252)=510 exch2_mydNy(252)=510 exch2_nNeighbours(252)=4 exch2_neighbourId(1,252)=267 exch2_iLo(1,252)=0 exch2_iHi(1,252)=35 exch2_jLo(1,252)=52 exch2_jHi(1,252)=52 exch2_opposingSend(1,252)=2 exch2_pij(1,1,252)=1 exch2_pij(2,1,252)=0 exch2_pij(3,1,252)=0 exch2_pij(4,1,252)=1 exch2_oi(1,252)=0 exch2_oj(1,252)=0 exch2_neighbourId(2,252)=237 exch2_iLo(2,252)=0 exch2_iHi(2,252)=35 exch2_jLo(2,252)=0 exch2_jHi(2,252)=0 exch2_opposingSend(2,252)=1 exch2_pij(1,2,252)=1 exch2_pij(2,2,252)=0 exch2_pij(3,2,252)=0 exch2_pij(4,2,252)=1 exch2_oi(2,252)=0 exch2_oj(2,252)=0 exch2_neighbourId(3,252)=253 exch2_iLo(3,252)=35 exch2_iHi(3,252)=35 exch2_jLo(3,252)=0 exch2_jHi(3,252)=52 exch2_opposingSend(3,252)=4 exch2_pij(1,3,252)=1 exch2_pij(2,3,252)=0 exch2_pij(3,3,252)=0 exch2_pij(4,3,252)=1 exch2_oi(3,252)=0 exch2_oj(3,252)=0 exch2_neighbourId(4,252)=251 exch2_iLo(4,252)=0 exch2_iHi(4,252)=0 exch2_jLo(4,252)=0 exch2_jHi(4,252)=52 exch2_opposingSend(4,252)=3 exch2_pij(1,4,252)=1 exch2_pij(2,4,252)=0 exch2_pij(3,4,252)=0 exch2_pij(4,4,252)=1 exch2_oi(4,252)=0 exch2_oj(4,252)=0 RETURN END SUBROUTINE W2_E2SETUP_253 C Topology for tile 253 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(253)=34 exch2_tNy(253)=51 exch2_tBasex(253)=408 exch2_tBasey(253)=306 exch2_txGlobalo(253)=919 exch2_tyGlobalo(253)=307 exch2_isWedge(253)=0 exch2_isNedge(253)=0 exch2_isEedge(253)=0 exch2_isSedge(253)=0 exch2_myFace(253)=2 exch2_mydNx(253)=510 exch2_mydNy(253)=510 exch2_nNeighbours(253)=4 exch2_neighbourId(1,253)=268 exch2_iLo(1,253)=0 exch2_iHi(1,253)=35 exch2_jLo(1,253)=52 exch2_jHi(1,253)=52 exch2_opposingSend(1,253)=2 exch2_pij(1,1,253)=1 exch2_pij(2,1,253)=0 exch2_pij(3,1,253)=0 exch2_pij(4,1,253)=1 exch2_oi(1,253)=0 exch2_oj(1,253)=0 exch2_neighbourId(2,253)=238 exch2_iLo(2,253)=0 exch2_iHi(2,253)=35 exch2_jLo(2,253)=0 exch2_jHi(2,253)=0 exch2_opposingSend(2,253)=1 exch2_pij(1,2,253)=1 exch2_pij(2,2,253)=0 exch2_pij(3,2,253)=0 exch2_pij(4,2,253)=1 exch2_oi(2,253)=0 exch2_oj(2,253)=0 exch2_neighbourId(3,253)=254 exch2_iLo(3,253)=35 exch2_iHi(3,253)=35 exch2_jLo(3,253)=0 exch2_jHi(3,253)=52 exch2_opposingSend(3,253)=4 exch2_pij(1,3,253)=1 exch2_pij(2,3,253)=0 exch2_pij(3,3,253)=0 exch2_pij(4,3,253)=1 exch2_oi(3,253)=0 exch2_oj(3,253)=0 exch2_neighbourId(4,253)=252 exch2_iLo(4,253)=0 exch2_iHi(4,253)=0 exch2_jLo(4,253)=0 exch2_jHi(4,253)=52 exch2_opposingSend(4,253)=3 exch2_pij(1,4,253)=1 exch2_pij(2,4,253)=0 exch2_pij(3,4,253)=0 exch2_pij(4,4,253)=1 exch2_oi(4,253)=0 exch2_oj(4,253)=0 RETURN END SUBROUTINE W2_E2SETUP_254 C Topology for tile 254 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(254)=34 exch2_tNy(254)=51 exch2_tBasex(254)=442 exch2_tBasey(254)=306 exch2_txGlobalo(254)=953 exch2_tyGlobalo(254)=307 exch2_isWedge(254)=0 exch2_isNedge(254)=0 exch2_isEedge(254)=0 exch2_isSedge(254)=0 exch2_myFace(254)=2 exch2_mydNx(254)=510 exch2_mydNy(254)=510 exch2_nNeighbours(254)=4 exch2_neighbourId(1,254)=269 exch2_iLo(1,254)=0 exch2_iHi(1,254)=35 exch2_jLo(1,254)=52 exch2_jHi(1,254)=52 exch2_opposingSend(1,254)=2 exch2_pij(1,1,254)=1 exch2_pij(2,1,254)=0 exch2_pij(3,1,254)=0 exch2_pij(4,1,254)=1 exch2_oi(1,254)=0 exch2_oj(1,254)=0 exch2_neighbourId(2,254)=239 exch2_iLo(2,254)=0 exch2_iHi(2,254)=35 exch2_jLo(2,254)=0 exch2_jHi(2,254)=0 exch2_opposingSend(2,254)=1 exch2_pij(1,2,254)=1 exch2_pij(2,2,254)=0 exch2_pij(3,2,254)=0 exch2_pij(4,2,254)=1 exch2_oi(2,254)=0 exch2_oj(2,254)=0 exch2_neighbourId(3,254)=255 exch2_iLo(3,254)=35 exch2_iHi(3,254)=35 exch2_jLo(3,254)=0 exch2_jHi(3,254)=52 exch2_opposingSend(3,254)=5 exch2_pij(1,3,254)=1 exch2_pij(2,3,254)=0 exch2_pij(3,3,254)=0 exch2_pij(4,3,254)=1 exch2_oi(3,254)=0 exch2_oj(3,254)=0 exch2_neighbourId(4,254)=253 exch2_iLo(4,254)=0 exch2_iHi(4,254)=0 exch2_jLo(4,254)=0 exch2_jHi(4,254)=52 exch2_opposingSend(4,254)=3 exch2_pij(1,4,254)=1 exch2_pij(2,4,254)=0 exch2_pij(3,4,254)=0 exch2_pij(4,4,254)=1 exch2_oi(4,254)=0 exch2_oj(4,254)=0 RETURN END SUBROUTINE W2_E2SETUP_255 C Topology for tile 255 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(255)=34 exch2_tNy(255)=51 exch2_tBasex(255)=476 exch2_tBasey(255)=306 exch2_txGlobalo(255)=987 exch2_tyGlobalo(255)=307 exch2_isWedge(255)=0 exch2_isNedge(255)=0 exch2_isEedge(255)=1 exch2_isSedge(255)=0 exch2_myFace(255)=2 exch2_mydNx(255)=510 exch2_mydNy(255)=510 exch2_nNeighbours(255)=5 exch2_neighbourId(1,255)=270 exch2_iLo(1,255)=0 exch2_iHi(1,255)=35 exch2_jLo(1,255)=52 exch2_jHi(1,255)=52 exch2_opposingSend(1,255)=2 exch2_pij(1,1,255)=1 exch2_pij(2,1,255)=0 exch2_pij(3,1,255)=0 exch2_pij(4,1,255)=1 exch2_oi(1,255)=0 exch2_oj(1,255)=0 exch2_neighbourId(2,255)=240 exch2_iLo(2,255)=0 exch2_iHi(2,255)=35 exch2_jLo(2,255)=0 exch2_jHi(2,255)=0 exch2_opposingSend(2,255)=1 exch2_pij(1,2,255)=1 exch2_pij(2,2,255)=0 exch2_pij(3,2,255)=0 exch2_pij(4,2,255)=1 exch2_oi(2,255)=0 exch2_oj(2,255)=0 exch2_neighbourId(3,255)=455 exch2_iLo(3,255)=35 exch2_iHi(3,255)=35 exch2_jLo(3,255)=34 exch2_jHi(3,255)=52 exch2_opposingSend(3,255)=2 exch2_pij(1,3,255)=0 exch2_pij(2,3,255)=1 exch2_pij(3,3,255)=-1 exch2_pij(4,3,255)=0 exch2_oi(3,255)=510 exch2_oj(3,255)=511 exch2_neighbourId(4,255)=456 exch2_iLo(4,255)=35 exch2_iHi(4,255)=35 exch2_jLo(4,255)=0 exch2_jHi(4,255)=35 exch2_opposingSend(4,255)=2 exch2_pij(1,4,255)=0 exch2_pij(2,4,255)=1 exch2_pij(3,4,255)=-1 exch2_pij(4,4,255)=0 exch2_oi(4,255)=510 exch2_oj(4,255)=511 exch2_neighbourId(5,255)=254 exch2_iLo(5,255)=0 exch2_iHi(5,255)=0 exch2_jLo(5,255)=0 exch2_jHi(5,255)=52 exch2_opposingSend(5,255)=3 exch2_pij(1,5,255)=1 exch2_pij(2,5,255)=0 exch2_pij(3,5,255)=0 exch2_pij(4,5,255)=1 exch2_oi(5,255)=0 exch2_oj(5,255)=0 RETURN END SUBROUTINE W2_E2SETUP_256 C Topology for tile 256 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(256)=34 exch2_tNy(256)=51 exch2_tBasex(256)=0 exch2_tBasey(256)=357 exch2_txGlobalo(256)=511 exch2_tyGlobalo(256)=358 exch2_isWedge(256)=1 exch2_isNedge(256)=0 exch2_isEedge(256)=0 exch2_isSedge(256)=0 exch2_myFace(256)=2 exch2_mydNx(256)=510 exch2_mydNy(256)=510 exch2_nNeighbours(256)=4 exch2_neighbourId(1,256)=271 exch2_iLo(1,256)=0 exch2_iHi(1,256)=35 exch2_jLo(1,256)=52 exch2_jHi(1,256)=52 exch2_opposingSend(1,256)=2 exch2_pij(1,1,256)=1 exch2_pij(2,1,256)=0 exch2_pij(3,1,256)=0 exch2_pij(4,1,256)=1 exch2_oi(1,256)=0 exch2_oj(1,256)=0 exch2_neighbourId(2,256)=241 exch2_iLo(2,256)=0 exch2_iHi(2,256)=35 exch2_jLo(2,256)=0 exch2_jHi(2,256)=0 exch2_opposingSend(2,256)=1 exch2_pij(1,2,256)=1 exch2_pij(2,2,256)=0 exch2_pij(3,2,256)=0 exch2_pij(4,2,256)=1 exch2_oi(2,256)=0 exch2_oj(2,256)=0 exch2_neighbourId(3,256)=257 exch2_iLo(3,256)=35 exch2_iHi(3,256)=35 exch2_jLo(3,256)=0 exch2_jHi(3,256)=52 exch2_opposingSend(3,256)=4 exch2_pij(1,3,256)=1 exch2_pij(2,3,256)=0 exch2_pij(3,3,256)=0 exch2_pij(4,3,256)=1 exch2_oi(3,256)=0 exch2_oj(3,256)=0 exch2_neighbourId(4,256)=120 exch2_iLo(4,256)=0 exch2_iHi(4,256)=0 exch2_jLo(4,256)=0 exch2_jHi(4,256)=52 exch2_opposingSend(4,256)=3 exch2_pij(1,4,256)=1 exch2_pij(2,4,256)=0 exch2_pij(3,4,256)=0 exch2_pij(4,4,256)=1 exch2_oi(4,256)=-510 exch2_oj(4,256)=0 RETURN END SUBROUTINE W2_E2SETUP_257 C Topology for tile 257 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(257)=34 exch2_tNy(257)=51 exch2_tBasex(257)=34 exch2_tBasey(257)=357 exch2_txGlobalo(257)=545 exch2_tyGlobalo(257)=358 exch2_isWedge(257)=0 exch2_isNedge(257)=0 exch2_isEedge(257)=0 exch2_isSedge(257)=0 exch2_myFace(257)=2 exch2_mydNx(257)=510 exch2_mydNy(257)=510 exch2_nNeighbours(257)=4 exch2_neighbourId(1,257)=272 exch2_iLo(1,257)=0 exch2_iHi(1,257)=35 exch2_jLo(1,257)=52 exch2_jHi(1,257)=52 exch2_opposingSend(1,257)=2 exch2_pij(1,1,257)=1 exch2_pij(2,1,257)=0 exch2_pij(3,1,257)=0 exch2_pij(4,1,257)=1 exch2_oi(1,257)=0 exch2_oj(1,257)=0 exch2_neighbourId(2,257)=242 exch2_iLo(2,257)=0 exch2_iHi(2,257)=35 exch2_jLo(2,257)=0 exch2_jHi(2,257)=0 exch2_opposingSend(2,257)=1 exch2_pij(1,2,257)=1 exch2_pij(2,2,257)=0 exch2_pij(3,2,257)=0 exch2_pij(4,2,257)=1 exch2_oi(2,257)=0 exch2_oj(2,257)=0 exch2_neighbourId(3,257)=258 exch2_iLo(3,257)=35 exch2_iHi(3,257)=35 exch2_jLo(3,257)=0 exch2_jHi(3,257)=52 exch2_opposingSend(3,257)=4 exch2_pij(1,3,257)=1 exch2_pij(2,3,257)=0 exch2_pij(3,3,257)=0 exch2_pij(4,3,257)=1 exch2_oi(3,257)=0 exch2_oj(3,257)=0 exch2_neighbourId(4,257)=256 exch2_iLo(4,257)=0 exch2_iHi(4,257)=0 exch2_jLo(4,257)=0 exch2_jHi(4,257)=52 exch2_opposingSend(4,257)=3 exch2_pij(1,4,257)=1 exch2_pij(2,4,257)=0 exch2_pij(3,4,257)=0 exch2_pij(4,4,257)=1 exch2_oi(4,257)=0 exch2_oj(4,257)=0 RETURN END SUBROUTINE W2_E2SETUP_258 C Topology for tile 258 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(258)=34 exch2_tNy(258)=51 exch2_tBasex(258)=68 exch2_tBasey(258)=357 exch2_txGlobalo(258)=579 exch2_tyGlobalo(258)=358 exch2_isWedge(258)=0 exch2_isNedge(258)=0 exch2_isEedge(258)=0 exch2_isSedge(258)=0 exch2_myFace(258)=2 exch2_mydNx(258)=510 exch2_mydNy(258)=510 exch2_nNeighbours(258)=4 exch2_neighbourId(1,258)=273 exch2_iLo(1,258)=0 exch2_iHi(1,258)=35 exch2_jLo(1,258)=52 exch2_jHi(1,258)=52 exch2_opposingSend(1,258)=2 exch2_pij(1,1,258)=1 exch2_pij(2,1,258)=0 exch2_pij(3,1,258)=0 exch2_pij(4,1,258)=1 exch2_oi(1,258)=0 exch2_oj(1,258)=0 exch2_neighbourId(2,258)=243 exch2_iLo(2,258)=0 exch2_iHi(2,258)=35 exch2_jLo(2,258)=0 exch2_jHi(2,258)=0 exch2_opposingSend(2,258)=1 exch2_pij(1,2,258)=1 exch2_pij(2,2,258)=0 exch2_pij(3,2,258)=0 exch2_pij(4,2,258)=1 exch2_oi(2,258)=0 exch2_oj(2,258)=0 exch2_neighbourId(3,258)=259 exch2_iLo(3,258)=35 exch2_iHi(3,258)=35 exch2_jLo(3,258)=0 exch2_jHi(3,258)=52 exch2_opposingSend(3,258)=4 exch2_pij(1,3,258)=1 exch2_pij(2,3,258)=0 exch2_pij(3,3,258)=0 exch2_pij(4,3,258)=1 exch2_oi(3,258)=0 exch2_oj(3,258)=0 exch2_neighbourId(4,258)=257 exch2_iLo(4,258)=0 exch2_iHi(4,258)=0 exch2_jLo(4,258)=0 exch2_jHi(4,258)=52 exch2_opposingSend(4,258)=3 exch2_pij(1,4,258)=1 exch2_pij(2,4,258)=0 exch2_pij(3,4,258)=0 exch2_pij(4,4,258)=1 exch2_oi(4,258)=0 exch2_oj(4,258)=0 RETURN END SUBROUTINE W2_E2SETUP_259 C Topology for tile 259 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(259)=34 exch2_tNy(259)=51 exch2_tBasex(259)=102 exch2_tBasey(259)=357 exch2_txGlobalo(259)=613 exch2_tyGlobalo(259)=358 exch2_isWedge(259)=0 exch2_isNedge(259)=0 exch2_isEedge(259)=0 exch2_isSedge(259)=0 exch2_myFace(259)=2 exch2_mydNx(259)=510 exch2_mydNy(259)=510 exch2_nNeighbours(259)=4 exch2_neighbourId(1,259)=274 exch2_iLo(1,259)=0 exch2_iHi(1,259)=35 exch2_jLo(1,259)=52 exch2_jHi(1,259)=52 exch2_opposingSend(1,259)=2 exch2_pij(1,1,259)=1 exch2_pij(2,1,259)=0 exch2_pij(3,1,259)=0 exch2_pij(4,1,259)=1 exch2_oi(1,259)=0 exch2_oj(1,259)=0 exch2_neighbourId(2,259)=244 exch2_iLo(2,259)=0 exch2_iHi(2,259)=35 exch2_jLo(2,259)=0 exch2_jHi(2,259)=0 exch2_opposingSend(2,259)=1 exch2_pij(1,2,259)=1 exch2_pij(2,2,259)=0 exch2_pij(3,2,259)=0 exch2_pij(4,2,259)=1 exch2_oi(2,259)=0 exch2_oj(2,259)=0 exch2_neighbourId(3,259)=260 exch2_iLo(3,259)=35 exch2_iHi(3,259)=35 exch2_jLo(3,259)=0 exch2_jHi(3,259)=52 exch2_opposingSend(3,259)=4 exch2_pij(1,3,259)=1 exch2_pij(2,3,259)=0 exch2_pij(3,3,259)=0 exch2_pij(4,3,259)=1 exch2_oi(3,259)=0 exch2_oj(3,259)=0 exch2_neighbourId(4,259)=258 exch2_iLo(4,259)=0 exch2_iHi(4,259)=0 exch2_jLo(4,259)=0 exch2_jHi(4,259)=52 exch2_opposingSend(4,259)=3 exch2_pij(1,4,259)=1 exch2_pij(2,4,259)=0 exch2_pij(3,4,259)=0 exch2_pij(4,4,259)=1 exch2_oi(4,259)=0 exch2_oj(4,259)=0 RETURN END SUBROUTINE W2_E2SETUP_260 C Topology for tile 260 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(260)=34 exch2_tNy(260)=51 exch2_tBasex(260)=136 exch2_tBasey(260)=357 exch2_txGlobalo(260)=647 exch2_tyGlobalo(260)=358 exch2_isWedge(260)=0 exch2_isNedge(260)=0 exch2_isEedge(260)=0 exch2_isSedge(260)=0 exch2_myFace(260)=2 exch2_mydNx(260)=510 exch2_mydNy(260)=510 exch2_nNeighbours(260)=4 exch2_neighbourId(1,260)=275 exch2_iLo(1,260)=0 exch2_iHi(1,260)=35 exch2_jLo(1,260)=52 exch2_jHi(1,260)=52 exch2_opposingSend(1,260)=2 exch2_pij(1,1,260)=1 exch2_pij(2,1,260)=0 exch2_pij(3,1,260)=0 exch2_pij(4,1,260)=1 exch2_oi(1,260)=0 exch2_oj(1,260)=0 exch2_neighbourId(2,260)=245 exch2_iLo(2,260)=0 exch2_iHi(2,260)=35 exch2_jLo(2,260)=0 exch2_jHi(2,260)=0 exch2_opposingSend(2,260)=1 exch2_pij(1,2,260)=1 exch2_pij(2,2,260)=0 exch2_pij(3,2,260)=0 exch2_pij(4,2,260)=1 exch2_oi(2,260)=0 exch2_oj(2,260)=0 exch2_neighbourId(3,260)=261 exch2_iLo(3,260)=35 exch2_iHi(3,260)=35 exch2_jLo(3,260)=0 exch2_jHi(3,260)=52 exch2_opposingSend(3,260)=4 exch2_pij(1,3,260)=1 exch2_pij(2,3,260)=0 exch2_pij(3,3,260)=0 exch2_pij(4,3,260)=1 exch2_oi(3,260)=0 exch2_oj(3,260)=0 exch2_neighbourId(4,260)=259 exch2_iLo(4,260)=0 exch2_iHi(4,260)=0 exch2_jLo(4,260)=0 exch2_jHi(4,260)=52 exch2_opposingSend(4,260)=3 exch2_pij(1,4,260)=1 exch2_pij(2,4,260)=0 exch2_pij(3,4,260)=0 exch2_pij(4,4,260)=1 exch2_oi(4,260)=0 exch2_oj(4,260)=0 RETURN END SUBROUTINE W2_E2SETUP_261 C Topology for tile 261 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(261)=34 exch2_tNy(261)=51 exch2_tBasex(261)=170 exch2_tBasey(261)=357 exch2_txGlobalo(261)=681 exch2_tyGlobalo(261)=358 exch2_isWedge(261)=0 exch2_isNedge(261)=0 exch2_isEedge(261)=0 exch2_isSedge(261)=0 exch2_myFace(261)=2 exch2_mydNx(261)=510 exch2_mydNy(261)=510 exch2_nNeighbours(261)=4 exch2_neighbourId(1,261)=276 exch2_iLo(1,261)=0 exch2_iHi(1,261)=35 exch2_jLo(1,261)=52 exch2_jHi(1,261)=52 exch2_opposingSend(1,261)=2 exch2_pij(1,1,261)=1 exch2_pij(2,1,261)=0 exch2_pij(3,1,261)=0 exch2_pij(4,1,261)=1 exch2_oi(1,261)=0 exch2_oj(1,261)=0 exch2_neighbourId(2,261)=246 exch2_iLo(2,261)=0 exch2_iHi(2,261)=35 exch2_jLo(2,261)=0 exch2_jHi(2,261)=0 exch2_opposingSend(2,261)=1 exch2_pij(1,2,261)=1 exch2_pij(2,2,261)=0 exch2_pij(3,2,261)=0 exch2_pij(4,2,261)=1 exch2_oi(2,261)=0 exch2_oj(2,261)=0 exch2_neighbourId(3,261)=262 exch2_iLo(3,261)=35 exch2_iHi(3,261)=35 exch2_jLo(3,261)=0 exch2_jHi(3,261)=52 exch2_opposingSend(3,261)=4 exch2_pij(1,3,261)=1 exch2_pij(2,3,261)=0 exch2_pij(3,3,261)=0 exch2_pij(4,3,261)=1 exch2_oi(3,261)=0 exch2_oj(3,261)=0 exch2_neighbourId(4,261)=260 exch2_iLo(4,261)=0 exch2_iHi(4,261)=0 exch2_jLo(4,261)=0 exch2_jHi(4,261)=52 exch2_opposingSend(4,261)=3 exch2_pij(1,4,261)=1 exch2_pij(2,4,261)=0 exch2_pij(3,4,261)=0 exch2_pij(4,4,261)=1 exch2_oi(4,261)=0 exch2_oj(4,261)=0 RETURN END SUBROUTINE W2_E2SETUP_262 C Topology for tile 262 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(262)=34 exch2_tNy(262)=51 exch2_tBasex(262)=204 exch2_tBasey(262)=357 exch2_txGlobalo(262)=715 exch2_tyGlobalo(262)=358 exch2_isWedge(262)=0 exch2_isNedge(262)=0 exch2_isEedge(262)=0 exch2_isSedge(262)=0 exch2_myFace(262)=2 exch2_mydNx(262)=510 exch2_mydNy(262)=510 exch2_nNeighbours(262)=4 exch2_neighbourId(1,262)=277 exch2_iLo(1,262)=0 exch2_iHi(1,262)=35 exch2_jLo(1,262)=52 exch2_jHi(1,262)=52 exch2_opposingSend(1,262)=2 exch2_pij(1,1,262)=1 exch2_pij(2,1,262)=0 exch2_pij(3,1,262)=0 exch2_pij(4,1,262)=1 exch2_oi(1,262)=0 exch2_oj(1,262)=0 exch2_neighbourId(2,262)=247 exch2_iLo(2,262)=0 exch2_iHi(2,262)=35 exch2_jLo(2,262)=0 exch2_jHi(2,262)=0 exch2_opposingSend(2,262)=1 exch2_pij(1,2,262)=1 exch2_pij(2,2,262)=0 exch2_pij(3,2,262)=0 exch2_pij(4,2,262)=1 exch2_oi(2,262)=0 exch2_oj(2,262)=0 exch2_neighbourId(3,262)=263 exch2_iLo(3,262)=35 exch2_iHi(3,262)=35 exch2_jLo(3,262)=0 exch2_jHi(3,262)=52 exch2_opposingSend(3,262)=4 exch2_pij(1,3,262)=1 exch2_pij(2,3,262)=0 exch2_pij(3,3,262)=0 exch2_pij(4,3,262)=1 exch2_oi(3,262)=0 exch2_oj(3,262)=0 exch2_neighbourId(4,262)=261 exch2_iLo(4,262)=0 exch2_iHi(4,262)=0 exch2_jLo(4,262)=0 exch2_jHi(4,262)=52 exch2_opposingSend(4,262)=3 exch2_pij(1,4,262)=1 exch2_pij(2,4,262)=0 exch2_pij(3,4,262)=0 exch2_pij(4,4,262)=1 exch2_oi(4,262)=0 exch2_oj(4,262)=0 RETURN END SUBROUTINE W2_E2SETUP_263 C Topology for tile 263 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(263)=34 exch2_tNy(263)=51 exch2_tBasex(263)=238 exch2_tBasey(263)=357 exch2_txGlobalo(263)=749 exch2_tyGlobalo(263)=358 exch2_isWedge(263)=0 exch2_isNedge(263)=0 exch2_isEedge(263)=0 exch2_isSedge(263)=0 exch2_myFace(263)=2 exch2_mydNx(263)=510 exch2_mydNy(263)=510 exch2_nNeighbours(263)=4 exch2_neighbourId(1,263)=278 exch2_iLo(1,263)=0 exch2_iHi(1,263)=35 exch2_jLo(1,263)=52 exch2_jHi(1,263)=52 exch2_opposingSend(1,263)=2 exch2_pij(1,1,263)=1 exch2_pij(2,1,263)=0 exch2_pij(3,1,263)=0 exch2_pij(4,1,263)=1 exch2_oi(1,263)=0 exch2_oj(1,263)=0 exch2_neighbourId(2,263)=248 exch2_iLo(2,263)=0 exch2_iHi(2,263)=35 exch2_jLo(2,263)=0 exch2_jHi(2,263)=0 exch2_opposingSend(2,263)=1 exch2_pij(1,2,263)=1 exch2_pij(2,2,263)=0 exch2_pij(3,2,263)=0 exch2_pij(4,2,263)=1 exch2_oi(2,263)=0 exch2_oj(2,263)=0 exch2_neighbourId(3,263)=264 exch2_iLo(3,263)=35 exch2_iHi(3,263)=35 exch2_jLo(3,263)=0 exch2_jHi(3,263)=52 exch2_opposingSend(3,263)=4 exch2_pij(1,3,263)=1 exch2_pij(2,3,263)=0 exch2_pij(3,3,263)=0 exch2_pij(4,3,263)=1 exch2_oi(3,263)=0 exch2_oj(3,263)=0 exch2_neighbourId(4,263)=262 exch2_iLo(4,263)=0 exch2_iHi(4,263)=0 exch2_jLo(4,263)=0 exch2_jHi(4,263)=52 exch2_opposingSend(4,263)=3 exch2_pij(1,4,263)=1 exch2_pij(2,4,263)=0 exch2_pij(3,4,263)=0 exch2_pij(4,4,263)=1 exch2_oi(4,263)=0 exch2_oj(4,263)=0 RETURN END SUBROUTINE W2_E2SETUP_264 C Topology for tile 264 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(264)=34 exch2_tNy(264)=51 exch2_tBasex(264)=272 exch2_tBasey(264)=357 exch2_txGlobalo(264)=783 exch2_tyGlobalo(264)=358 exch2_isWedge(264)=0 exch2_isNedge(264)=0 exch2_isEedge(264)=0 exch2_isSedge(264)=0 exch2_myFace(264)=2 exch2_mydNx(264)=510 exch2_mydNy(264)=510 exch2_nNeighbours(264)=4 exch2_neighbourId(1,264)=279 exch2_iLo(1,264)=0 exch2_iHi(1,264)=35 exch2_jLo(1,264)=52 exch2_jHi(1,264)=52 exch2_opposingSend(1,264)=2 exch2_pij(1,1,264)=1 exch2_pij(2,1,264)=0 exch2_pij(3,1,264)=0 exch2_pij(4,1,264)=1 exch2_oi(1,264)=0 exch2_oj(1,264)=0 exch2_neighbourId(2,264)=249 exch2_iLo(2,264)=0 exch2_iHi(2,264)=35 exch2_jLo(2,264)=0 exch2_jHi(2,264)=0 exch2_opposingSend(2,264)=1 exch2_pij(1,2,264)=1 exch2_pij(2,2,264)=0 exch2_pij(3,2,264)=0 exch2_pij(4,2,264)=1 exch2_oi(2,264)=0 exch2_oj(2,264)=0 exch2_neighbourId(3,264)=265 exch2_iLo(3,264)=35 exch2_iHi(3,264)=35 exch2_jLo(3,264)=0 exch2_jHi(3,264)=52 exch2_opposingSend(3,264)=4 exch2_pij(1,3,264)=1 exch2_pij(2,3,264)=0 exch2_pij(3,3,264)=0 exch2_pij(4,3,264)=1 exch2_oi(3,264)=0 exch2_oj(3,264)=0 exch2_neighbourId(4,264)=263 exch2_iLo(4,264)=0 exch2_iHi(4,264)=0 exch2_jLo(4,264)=0 exch2_jHi(4,264)=52 exch2_opposingSend(4,264)=3 exch2_pij(1,4,264)=1 exch2_pij(2,4,264)=0 exch2_pij(3,4,264)=0 exch2_pij(4,4,264)=1 exch2_oi(4,264)=0 exch2_oj(4,264)=0 RETURN END SUBROUTINE W2_E2SETUP_265 C Topology for tile 265 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(265)=34 exch2_tNy(265)=51 exch2_tBasex(265)=306 exch2_tBasey(265)=357 exch2_txGlobalo(265)=817 exch2_tyGlobalo(265)=358 exch2_isWedge(265)=0 exch2_isNedge(265)=0 exch2_isEedge(265)=0 exch2_isSedge(265)=0 exch2_myFace(265)=2 exch2_mydNx(265)=510 exch2_mydNy(265)=510 exch2_nNeighbours(265)=4 exch2_neighbourId(1,265)=280 exch2_iLo(1,265)=0 exch2_iHi(1,265)=35 exch2_jLo(1,265)=52 exch2_jHi(1,265)=52 exch2_opposingSend(1,265)=2 exch2_pij(1,1,265)=1 exch2_pij(2,1,265)=0 exch2_pij(3,1,265)=0 exch2_pij(4,1,265)=1 exch2_oi(1,265)=0 exch2_oj(1,265)=0 exch2_neighbourId(2,265)=250 exch2_iLo(2,265)=0 exch2_iHi(2,265)=35 exch2_jLo(2,265)=0 exch2_jHi(2,265)=0 exch2_opposingSend(2,265)=1 exch2_pij(1,2,265)=1 exch2_pij(2,2,265)=0 exch2_pij(3,2,265)=0 exch2_pij(4,2,265)=1 exch2_oi(2,265)=0 exch2_oj(2,265)=0 exch2_neighbourId(3,265)=266 exch2_iLo(3,265)=35 exch2_iHi(3,265)=35 exch2_jLo(3,265)=0 exch2_jHi(3,265)=52 exch2_opposingSend(3,265)=4 exch2_pij(1,3,265)=1 exch2_pij(2,3,265)=0 exch2_pij(3,3,265)=0 exch2_pij(4,3,265)=1 exch2_oi(3,265)=0 exch2_oj(3,265)=0 exch2_neighbourId(4,265)=264 exch2_iLo(4,265)=0 exch2_iHi(4,265)=0 exch2_jLo(4,265)=0 exch2_jHi(4,265)=52 exch2_opposingSend(4,265)=3 exch2_pij(1,4,265)=1 exch2_pij(2,4,265)=0 exch2_pij(3,4,265)=0 exch2_pij(4,4,265)=1 exch2_oi(4,265)=0 exch2_oj(4,265)=0 RETURN END SUBROUTINE W2_E2SETUP_266 C Topology for tile 266 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(266)=34 exch2_tNy(266)=51 exch2_tBasex(266)=340 exch2_tBasey(266)=357 exch2_txGlobalo(266)=851 exch2_tyGlobalo(266)=358 exch2_isWedge(266)=0 exch2_isNedge(266)=0 exch2_isEedge(266)=0 exch2_isSedge(266)=0 exch2_myFace(266)=2 exch2_mydNx(266)=510 exch2_mydNy(266)=510 exch2_nNeighbours(266)=4 exch2_neighbourId(1,266)=281 exch2_iLo(1,266)=0 exch2_iHi(1,266)=35 exch2_jLo(1,266)=52 exch2_jHi(1,266)=52 exch2_opposingSend(1,266)=2 exch2_pij(1,1,266)=1 exch2_pij(2,1,266)=0 exch2_pij(3,1,266)=0 exch2_pij(4,1,266)=1 exch2_oi(1,266)=0 exch2_oj(1,266)=0 exch2_neighbourId(2,266)=251 exch2_iLo(2,266)=0 exch2_iHi(2,266)=35 exch2_jLo(2,266)=0 exch2_jHi(2,266)=0 exch2_opposingSend(2,266)=1 exch2_pij(1,2,266)=1 exch2_pij(2,2,266)=0 exch2_pij(3,2,266)=0 exch2_pij(4,2,266)=1 exch2_oi(2,266)=0 exch2_oj(2,266)=0 exch2_neighbourId(3,266)=267 exch2_iLo(3,266)=35 exch2_iHi(3,266)=35 exch2_jLo(3,266)=0 exch2_jHi(3,266)=52 exch2_opposingSend(3,266)=4 exch2_pij(1,3,266)=1 exch2_pij(2,3,266)=0 exch2_pij(3,3,266)=0 exch2_pij(4,3,266)=1 exch2_oi(3,266)=0 exch2_oj(3,266)=0 exch2_neighbourId(4,266)=265 exch2_iLo(4,266)=0 exch2_iHi(4,266)=0 exch2_jLo(4,266)=0 exch2_jHi(4,266)=52 exch2_opposingSend(4,266)=3 exch2_pij(1,4,266)=1 exch2_pij(2,4,266)=0 exch2_pij(3,4,266)=0 exch2_pij(4,4,266)=1 exch2_oi(4,266)=0 exch2_oj(4,266)=0 RETURN END SUBROUTINE W2_E2SETUP_267 C Topology for tile 267 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(267)=34 exch2_tNy(267)=51 exch2_tBasex(267)=374 exch2_tBasey(267)=357 exch2_txGlobalo(267)=885 exch2_tyGlobalo(267)=358 exch2_isWedge(267)=0 exch2_isNedge(267)=0 exch2_isEedge(267)=0 exch2_isSedge(267)=0 exch2_myFace(267)=2 exch2_mydNx(267)=510 exch2_mydNy(267)=510 exch2_nNeighbours(267)=4 exch2_neighbourId(1,267)=282 exch2_iLo(1,267)=0 exch2_iHi(1,267)=35 exch2_jLo(1,267)=52 exch2_jHi(1,267)=52 exch2_opposingSend(1,267)=2 exch2_pij(1,1,267)=1 exch2_pij(2,1,267)=0 exch2_pij(3,1,267)=0 exch2_pij(4,1,267)=1 exch2_oi(1,267)=0 exch2_oj(1,267)=0 exch2_neighbourId(2,267)=252 exch2_iLo(2,267)=0 exch2_iHi(2,267)=35 exch2_jLo(2,267)=0 exch2_jHi(2,267)=0 exch2_opposingSend(2,267)=1 exch2_pij(1,2,267)=1 exch2_pij(2,2,267)=0 exch2_pij(3,2,267)=0 exch2_pij(4,2,267)=1 exch2_oi(2,267)=0 exch2_oj(2,267)=0 exch2_neighbourId(3,267)=268 exch2_iLo(3,267)=35 exch2_iHi(3,267)=35 exch2_jLo(3,267)=0 exch2_jHi(3,267)=52 exch2_opposingSend(3,267)=4 exch2_pij(1,3,267)=1 exch2_pij(2,3,267)=0 exch2_pij(3,3,267)=0 exch2_pij(4,3,267)=1 exch2_oi(3,267)=0 exch2_oj(3,267)=0 exch2_neighbourId(4,267)=266 exch2_iLo(4,267)=0 exch2_iHi(4,267)=0 exch2_jLo(4,267)=0 exch2_jHi(4,267)=52 exch2_opposingSend(4,267)=3 exch2_pij(1,4,267)=1 exch2_pij(2,4,267)=0 exch2_pij(3,4,267)=0 exch2_pij(4,4,267)=1 exch2_oi(4,267)=0 exch2_oj(4,267)=0 RETURN END SUBROUTINE W2_E2SETUP_268 C Topology for tile 268 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(268)=34 exch2_tNy(268)=51 exch2_tBasex(268)=408 exch2_tBasey(268)=357 exch2_txGlobalo(268)=919 exch2_tyGlobalo(268)=358 exch2_isWedge(268)=0 exch2_isNedge(268)=0 exch2_isEedge(268)=0 exch2_isSedge(268)=0 exch2_myFace(268)=2 exch2_mydNx(268)=510 exch2_mydNy(268)=510 exch2_nNeighbours(268)=4 exch2_neighbourId(1,268)=283 exch2_iLo(1,268)=0 exch2_iHi(1,268)=35 exch2_jLo(1,268)=52 exch2_jHi(1,268)=52 exch2_opposingSend(1,268)=2 exch2_pij(1,1,268)=1 exch2_pij(2,1,268)=0 exch2_pij(3,1,268)=0 exch2_pij(4,1,268)=1 exch2_oi(1,268)=0 exch2_oj(1,268)=0 exch2_neighbourId(2,268)=253 exch2_iLo(2,268)=0 exch2_iHi(2,268)=35 exch2_jLo(2,268)=0 exch2_jHi(2,268)=0 exch2_opposingSend(2,268)=1 exch2_pij(1,2,268)=1 exch2_pij(2,2,268)=0 exch2_pij(3,2,268)=0 exch2_pij(4,2,268)=1 exch2_oi(2,268)=0 exch2_oj(2,268)=0 exch2_neighbourId(3,268)=269 exch2_iLo(3,268)=35 exch2_iHi(3,268)=35 exch2_jLo(3,268)=0 exch2_jHi(3,268)=52 exch2_opposingSend(3,268)=4 exch2_pij(1,3,268)=1 exch2_pij(2,3,268)=0 exch2_pij(3,3,268)=0 exch2_pij(4,3,268)=1 exch2_oi(3,268)=0 exch2_oj(3,268)=0 exch2_neighbourId(4,268)=267 exch2_iLo(4,268)=0 exch2_iHi(4,268)=0 exch2_jLo(4,268)=0 exch2_jHi(4,268)=52 exch2_opposingSend(4,268)=3 exch2_pij(1,4,268)=1 exch2_pij(2,4,268)=0 exch2_pij(3,4,268)=0 exch2_pij(4,4,268)=1 exch2_oi(4,268)=0 exch2_oj(4,268)=0 RETURN END SUBROUTINE W2_E2SETUP_269 C Topology for tile 269 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(269)=34 exch2_tNy(269)=51 exch2_tBasex(269)=442 exch2_tBasey(269)=357 exch2_txGlobalo(269)=953 exch2_tyGlobalo(269)=358 exch2_isWedge(269)=0 exch2_isNedge(269)=0 exch2_isEedge(269)=0 exch2_isSedge(269)=0 exch2_myFace(269)=2 exch2_mydNx(269)=510 exch2_mydNy(269)=510 exch2_nNeighbours(269)=4 exch2_neighbourId(1,269)=284 exch2_iLo(1,269)=0 exch2_iHi(1,269)=35 exch2_jLo(1,269)=52 exch2_jHi(1,269)=52 exch2_opposingSend(1,269)=2 exch2_pij(1,1,269)=1 exch2_pij(2,1,269)=0 exch2_pij(3,1,269)=0 exch2_pij(4,1,269)=1 exch2_oi(1,269)=0 exch2_oj(1,269)=0 exch2_neighbourId(2,269)=254 exch2_iLo(2,269)=0 exch2_iHi(2,269)=35 exch2_jLo(2,269)=0 exch2_jHi(2,269)=0 exch2_opposingSend(2,269)=1 exch2_pij(1,2,269)=1 exch2_pij(2,2,269)=0 exch2_pij(3,2,269)=0 exch2_pij(4,2,269)=1 exch2_oi(2,269)=0 exch2_oj(2,269)=0 exch2_neighbourId(3,269)=270 exch2_iLo(3,269)=35 exch2_iHi(3,269)=35 exch2_jLo(3,269)=0 exch2_jHi(3,269)=52 exch2_opposingSend(3,269)=5 exch2_pij(1,3,269)=1 exch2_pij(2,3,269)=0 exch2_pij(3,3,269)=0 exch2_pij(4,3,269)=1 exch2_oi(3,269)=0 exch2_oj(3,269)=0 exch2_neighbourId(4,269)=268 exch2_iLo(4,269)=0 exch2_iHi(4,269)=0 exch2_jLo(4,269)=0 exch2_jHi(4,269)=52 exch2_opposingSend(4,269)=3 exch2_pij(1,4,269)=1 exch2_pij(2,4,269)=0 exch2_pij(3,4,269)=0 exch2_pij(4,4,269)=1 exch2_oi(4,269)=0 exch2_oj(4,269)=0 RETURN END SUBROUTINE W2_E2SETUP_270 C Topology for tile 270 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(270)=34 exch2_tNy(270)=51 exch2_tBasex(270)=476 exch2_tBasey(270)=357 exch2_txGlobalo(270)=987 exch2_tyGlobalo(270)=358 exch2_isWedge(270)=0 exch2_isNedge(270)=0 exch2_isEedge(270)=1 exch2_isSedge(270)=0 exch2_myFace(270)=2 exch2_mydNx(270)=510 exch2_mydNy(270)=510 exch2_nNeighbours(270)=5 exch2_neighbourId(1,270)=285 exch2_iLo(1,270)=0 exch2_iHi(1,270)=35 exch2_jLo(1,270)=52 exch2_jHi(1,270)=52 exch2_opposingSend(1,270)=2 exch2_pij(1,1,270)=1 exch2_pij(2,1,270)=0 exch2_pij(3,1,270)=0 exch2_pij(4,1,270)=1 exch2_oi(1,270)=0 exch2_oj(1,270)=0 exch2_neighbourId(2,270)=255 exch2_iLo(2,270)=0 exch2_iHi(2,270)=35 exch2_jLo(2,270)=0 exch2_jHi(2,270)=0 exch2_opposingSend(2,270)=1 exch2_pij(1,2,270)=1 exch2_pij(2,2,270)=0 exch2_pij(3,2,270)=0 exch2_pij(4,2,270)=1 exch2_oi(2,270)=0 exch2_oj(2,270)=0 exch2_neighbourId(3,270)=454 exch2_iLo(3,270)=35 exch2_iHi(3,270)=35 exch2_jLo(3,270)=17 exch2_jHi(3,270)=52 exch2_opposingSend(3,270)=2 exch2_pij(1,3,270)=0 exch2_pij(2,3,270)=1 exch2_pij(3,3,270)=-1 exch2_pij(4,3,270)=0 exch2_oi(3,270)=510 exch2_oj(3,270)=511 exch2_neighbourId(4,270)=455 exch2_iLo(4,270)=35 exch2_iHi(4,270)=35 exch2_jLo(4,270)=0 exch2_jHi(4,270)=18 exch2_opposingSend(4,270)=3 exch2_pij(1,4,270)=0 exch2_pij(2,4,270)=1 exch2_pij(3,4,270)=-1 exch2_pij(4,4,270)=0 exch2_oi(4,270)=510 exch2_oj(4,270)=511 exch2_neighbourId(5,270)=269 exch2_iLo(5,270)=0 exch2_iHi(5,270)=0 exch2_jLo(5,270)=0 exch2_jHi(5,270)=52 exch2_opposingSend(5,270)=3 exch2_pij(1,5,270)=1 exch2_pij(2,5,270)=0 exch2_pij(3,5,270)=0 exch2_pij(4,5,270)=1 exch2_oi(5,270)=0 exch2_oj(5,270)=0 RETURN END SUBROUTINE W2_E2SETUP_271 C Topology for tile 271 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(271)=34 exch2_tNy(271)=51 exch2_tBasex(271)=0 exch2_tBasey(271)=408 exch2_txGlobalo(271)=511 exch2_tyGlobalo(271)=409 exch2_isWedge(271)=1 exch2_isNedge(271)=0 exch2_isEedge(271)=0 exch2_isSedge(271)=0 exch2_myFace(271)=2 exch2_mydNx(271)=510 exch2_mydNy(271)=510 exch2_nNeighbours(271)=4 exch2_neighbourId(1,271)=286 exch2_iLo(1,271)=0 exch2_iHi(1,271)=35 exch2_jLo(1,271)=52 exch2_jHi(1,271)=52 exch2_opposingSend(1,271)=2 exch2_pij(1,1,271)=1 exch2_pij(2,1,271)=0 exch2_pij(3,1,271)=0 exch2_pij(4,1,271)=1 exch2_oi(1,271)=0 exch2_oj(1,271)=0 exch2_neighbourId(2,271)=256 exch2_iLo(2,271)=0 exch2_iHi(2,271)=35 exch2_jLo(2,271)=0 exch2_jHi(2,271)=0 exch2_opposingSend(2,271)=1 exch2_pij(1,2,271)=1 exch2_pij(2,2,271)=0 exch2_pij(3,2,271)=0 exch2_pij(4,2,271)=1 exch2_oi(2,271)=0 exch2_oj(2,271)=0 exch2_neighbourId(3,271)=272 exch2_iLo(3,271)=35 exch2_iHi(3,271)=35 exch2_jLo(3,271)=0 exch2_jHi(3,271)=52 exch2_opposingSend(3,271)=4 exch2_pij(1,3,271)=1 exch2_pij(2,3,271)=0 exch2_pij(3,3,271)=0 exch2_pij(4,3,271)=1 exch2_oi(3,271)=0 exch2_oj(3,271)=0 exch2_neighbourId(4,271)=135 exch2_iLo(4,271)=0 exch2_iHi(4,271)=0 exch2_jLo(4,271)=0 exch2_jHi(4,271)=52 exch2_opposingSend(4,271)=3 exch2_pij(1,4,271)=1 exch2_pij(2,4,271)=0 exch2_pij(3,4,271)=0 exch2_pij(4,4,271)=1 exch2_oi(4,271)=-510 exch2_oj(4,271)=0 RETURN END SUBROUTINE W2_E2SETUP_272 C Topology for tile 272 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(272)=34 exch2_tNy(272)=51 exch2_tBasex(272)=34 exch2_tBasey(272)=408 exch2_txGlobalo(272)=545 exch2_tyGlobalo(272)=409 exch2_isWedge(272)=0 exch2_isNedge(272)=0 exch2_isEedge(272)=0 exch2_isSedge(272)=0 exch2_myFace(272)=2 exch2_mydNx(272)=510 exch2_mydNy(272)=510 exch2_nNeighbours(272)=4 exch2_neighbourId(1,272)=287 exch2_iLo(1,272)=0 exch2_iHi(1,272)=35 exch2_jLo(1,272)=52 exch2_jHi(1,272)=52 exch2_opposingSend(1,272)=2 exch2_pij(1,1,272)=1 exch2_pij(2,1,272)=0 exch2_pij(3,1,272)=0 exch2_pij(4,1,272)=1 exch2_oi(1,272)=0 exch2_oj(1,272)=0 exch2_neighbourId(2,272)=257 exch2_iLo(2,272)=0 exch2_iHi(2,272)=35 exch2_jLo(2,272)=0 exch2_jHi(2,272)=0 exch2_opposingSend(2,272)=1 exch2_pij(1,2,272)=1 exch2_pij(2,2,272)=0 exch2_pij(3,2,272)=0 exch2_pij(4,2,272)=1 exch2_oi(2,272)=0 exch2_oj(2,272)=0 exch2_neighbourId(3,272)=273 exch2_iLo(3,272)=35 exch2_iHi(3,272)=35 exch2_jLo(3,272)=0 exch2_jHi(3,272)=52 exch2_opposingSend(3,272)=4 exch2_pij(1,3,272)=1 exch2_pij(2,3,272)=0 exch2_pij(3,3,272)=0 exch2_pij(4,3,272)=1 exch2_oi(3,272)=0 exch2_oj(3,272)=0 exch2_neighbourId(4,272)=271 exch2_iLo(4,272)=0 exch2_iHi(4,272)=0 exch2_jLo(4,272)=0 exch2_jHi(4,272)=52 exch2_opposingSend(4,272)=3 exch2_pij(1,4,272)=1 exch2_pij(2,4,272)=0 exch2_pij(3,4,272)=0 exch2_pij(4,4,272)=1 exch2_oi(4,272)=0 exch2_oj(4,272)=0 RETURN END SUBROUTINE W2_E2SETUP_273 C Topology for tile 273 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(273)=34 exch2_tNy(273)=51 exch2_tBasex(273)=68 exch2_tBasey(273)=408 exch2_txGlobalo(273)=579 exch2_tyGlobalo(273)=409 exch2_isWedge(273)=0 exch2_isNedge(273)=0 exch2_isEedge(273)=0 exch2_isSedge(273)=0 exch2_myFace(273)=2 exch2_mydNx(273)=510 exch2_mydNy(273)=510 exch2_nNeighbours(273)=4 exch2_neighbourId(1,273)=288 exch2_iLo(1,273)=0 exch2_iHi(1,273)=35 exch2_jLo(1,273)=52 exch2_jHi(1,273)=52 exch2_opposingSend(1,273)=2 exch2_pij(1,1,273)=1 exch2_pij(2,1,273)=0 exch2_pij(3,1,273)=0 exch2_pij(4,1,273)=1 exch2_oi(1,273)=0 exch2_oj(1,273)=0 exch2_neighbourId(2,273)=258 exch2_iLo(2,273)=0 exch2_iHi(2,273)=35 exch2_jLo(2,273)=0 exch2_jHi(2,273)=0 exch2_opposingSend(2,273)=1 exch2_pij(1,2,273)=1 exch2_pij(2,2,273)=0 exch2_pij(3,2,273)=0 exch2_pij(4,2,273)=1 exch2_oi(2,273)=0 exch2_oj(2,273)=0 exch2_neighbourId(3,273)=274 exch2_iLo(3,273)=35 exch2_iHi(3,273)=35 exch2_jLo(3,273)=0 exch2_jHi(3,273)=52 exch2_opposingSend(3,273)=4 exch2_pij(1,3,273)=1 exch2_pij(2,3,273)=0 exch2_pij(3,3,273)=0 exch2_pij(4,3,273)=1 exch2_oi(3,273)=0 exch2_oj(3,273)=0 exch2_neighbourId(4,273)=272 exch2_iLo(4,273)=0 exch2_iHi(4,273)=0 exch2_jLo(4,273)=0 exch2_jHi(4,273)=52 exch2_opposingSend(4,273)=3 exch2_pij(1,4,273)=1 exch2_pij(2,4,273)=0 exch2_pij(3,4,273)=0 exch2_pij(4,4,273)=1 exch2_oi(4,273)=0 exch2_oj(4,273)=0 RETURN END SUBROUTINE W2_E2SETUP_274 C Topology for tile 274 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(274)=34 exch2_tNy(274)=51 exch2_tBasex(274)=102 exch2_tBasey(274)=408 exch2_txGlobalo(274)=613 exch2_tyGlobalo(274)=409 exch2_isWedge(274)=0 exch2_isNedge(274)=0 exch2_isEedge(274)=0 exch2_isSedge(274)=0 exch2_myFace(274)=2 exch2_mydNx(274)=510 exch2_mydNy(274)=510 exch2_nNeighbours(274)=4 exch2_neighbourId(1,274)=289 exch2_iLo(1,274)=0 exch2_iHi(1,274)=35 exch2_jLo(1,274)=52 exch2_jHi(1,274)=52 exch2_opposingSend(1,274)=2 exch2_pij(1,1,274)=1 exch2_pij(2,1,274)=0 exch2_pij(3,1,274)=0 exch2_pij(4,1,274)=1 exch2_oi(1,274)=0 exch2_oj(1,274)=0 exch2_neighbourId(2,274)=259 exch2_iLo(2,274)=0 exch2_iHi(2,274)=35 exch2_jLo(2,274)=0 exch2_jHi(2,274)=0 exch2_opposingSend(2,274)=1 exch2_pij(1,2,274)=1 exch2_pij(2,2,274)=0 exch2_pij(3,2,274)=0 exch2_pij(4,2,274)=1 exch2_oi(2,274)=0 exch2_oj(2,274)=0 exch2_neighbourId(3,274)=275 exch2_iLo(3,274)=35 exch2_iHi(3,274)=35 exch2_jLo(3,274)=0 exch2_jHi(3,274)=52 exch2_opposingSend(3,274)=4 exch2_pij(1,3,274)=1 exch2_pij(2,3,274)=0 exch2_pij(3,3,274)=0 exch2_pij(4,3,274)=1 exch2_oi(3,274)=0 exch2_oj(3,274)=0 exch2_neighbourId(4,274)=273 exch2_iLo(4,274)=0 exch2_iHi(4,274)=0 exch2_jLo(4,274)=0 exch2_jHi(4,274)=52 exch2_opposingSend(4,274)=3 exch2_pij(1,4,274)=1 exch2_pij(2,4,274)=0 exch2_pij(3,4,274)=0 exch2_pij(4,4,274)=1 exch2_oi(4,274)=0 exch2_oj(4,274)=0 RETURN END SUBROUTINE W2_E2SETUP_275 C Topology for tile 275 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(275)=34 exch2_tNy(275)=51 exch2_tBasex(275)=136 exch2_tBasey(275)=408 exch2_txGlobalo(275)=647 exch2_tyGlobalo(275)=409 exch2_isWedge(275)=0 exch2_isNedge(275)=0 exch2_isEedge(275)=0 exch2_isSedge(275)=0 exch2_myFace(275)=2 exch2_mydNx(275)=510 exch2_mydNy(275)=510 exch2_nNeighbours(275)=4 exch2_neighbourId(1,275)=290 exch2_iLo(1,275)=0 exch2_iHi(1,275)=35 exch2_jLo(1,275)=52 exch2_jHi(1,275)=52 exch2_opposingSend(1,275)=2 exch2_pij(1,1,275)=1 exch2_pij(2,1,275)=0 exch2_pij(3,1,275)=0 exch2_pij(4,1,275)=1 exch2_oi(1,275)=0 exch2_oj(1,275)=0 exch2_neighbourId(2,275)=260 exch2_iLo(2,275)=0 exch2_iHi(2,275)=35 exch2_jLo(2,275)=0 exch2_jHi(2,275)=0 exch2_opposingSend(2,275)=1 exch2_pij(1,2,275)=1 exch2_pij(2,2,275)=0 exch2_pij(3,2,275)=0 exch2_pij(4,2,275)=1 exch2_oi(2,275)=0 exch2_oj(2,275)=0 exch2_neighbourId(3,275)=276 exch2_iLo(3,275)=35 exch2_iHi(3,275)=35 exch2_jLo(3,275)=0 exch2_jHi(3,275)=52 exch2_opposingSend(3,275)=4 exch2_pij(1,3,275)=1 exch2_pij(2,3,275)=0 exch2_pij(3,3,275)=0 exch2_pij(4,3,275)=1 exch2_oi(3,275)=0 exch2_oj(3,275)=0 exch2_neighbourId(4,275)=274 exch2_iLo(4,275)=0 exch2_iHi(4,275)=0 exch2_jLo(4,275)=0 exch2_jHi(4,275)=52 exch2_opposingSend(4,275)=3 exch2_pij(1,4,275)=1 exch2_pij(2,4,275)=0 exch2_pij(3,4,275)=0 exch2_pij(4,4,275)=1 exch2_oi(4,275)=0 exch2_oj(4,275)=0 RETURN END SUBROUTINE W2_E2SETUP_276 C Topology for tile 276 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(276)=34 exch2_tNy(276)=51 exch2_tBasex(276)=170 exch2_tBasey(276)=408 exch2_txGlobalo(276)=681 exch2_tyGlobalo(276)=409 exch2_isWedge(276)=0 exch2_isNedge(276)=0 exch2_isEedge(276)=0 exch2_isSedge(276)=0 exch2_myFace(276)=2 exch2_mydNx(276)=510 exch2_mydNy(276)=510 exch2_nNeighbours(276)=4 exch2_neighbourId(1,276)=291 exch2_iLo(1,276)=0 exch2_iHi(1,276)=35 exch2_jLo(1,276)=52 exch2_jHi(1,276)=52 exch2_opposingSend(1,276)=2 exch2_pij(1,1,276)=1 exch2_pij(2,1,276)=0 exch2_pij(3,1,276)=0 exch2_pij(4,1,276)=1 exch2_oi(1,276)=0 exch2_oj(1,276)=0 exch2_neighbourId(2,276)=261 exch2_iLo(2,276)=0 exch2_iHi(2,276)=35 exch2_jLo(2,276)=0 exch2_jHi(2,276)=0 exch2_opposingSend(2,276)=1 exch2_pij(1,2,276)=1 exch2_pij(2,2,276)=0 exch2_pij(3,2,276)=0 exch2_pij(4,2,276)=1 exch2_oi(2,276)=0 exch2_oj(2,276)=0 exch2_neighbourId(3,276)=277 exch2_iLo(3,276)=35 exch2_iHi(3,276)=35 exch2_jLo(3,276)=0 exch2_jHi(3,276)=52 exch2_opposingSend(3,276)=4 exch2_pij(1,3,276)=1 exch2_pij(2,3,276)=0 exch2_pij(3,3,276)=0 exch2_pij(4,3,276)=1 exch2_oi(3,276)=0 exch2_oj(3,276)=0 exch2_neighbourId(4,276)=275 exch2_iLo(4,276)=0 exch2_iHi(4,276)=0 exch2_jLo(4,276)=0 exch2_jHi(4,276)=52 exch2_opposingSend(4,276)=3 exch2_pij(1,4,276)=1 exch2_pij(2,4,276)=0 exch2_pij(3,4,276)=0 exch2_pij(4,4,276)=1 exch2_oi(4,276)=0 exch2_oj(4,276)=0 RETURN END SUBROUTINE W2_E2SETUP_277 C Topology for tile 277 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(277)=34 exch2_tNy(277)=51 exch2_tBasex(277)=204 exch2_tBasey(277)=408 exch2_txGlobalo(277)=715 exch2_tyGlobalo(277)=409 exch2_isWedge(277)=0 exch2_isNedge(277)=0 exch2_isEedge(277)=0 exch2_isSedge(277)=0 exch2_myFace(277)=2 exch2_mydNx(277)=510 exch2_mydNy(277)=510 exch2_nNeighbours(277)=4 exch2_neighbourId(1,277)=292 exch2_iLo(1,277)=0 exch2_iHi(1,277)=35 exch2_jLo(1,277)=52 exch2_jHi(1,277)=52 exch2_opposingSend(1,277)=2 exch2_pij(1,1,277)=1 exch2_pij(2,1,277)=0 exch2_pij(3,1,277)=0 exch2_pij(4,1,277)=1 exch2_oi(1,277)=0 exch2_oj(1,277)=0 exch2_neighbourId(2,277)=262 exch2_iLo(2,277)=0 exch2_iHi(2,277)=35 exch2_jLo(2,277)=0 exch2_jHi(2,277)=0 exch2_opposingSend(2,277)=1 exch2_pij(1,2,277)=1 exch2_pij(2,2,277)=0 exch2_pij(3,2,277)=0 exch2_pij(4,2,277)=1 exch2_oi(2,277)=0 exch2_oj(2,277)=0 exch2_neighbourId(3,277)=278 exch2_iLo(3,277)=35 exch2_iHi(3,277)=35 exch2_jLo(3,277)=0 exch2_jHi(3,277)=52 exch2_opposingSend(3,277)=4 exch2_pij(1,3,277)=1 exch2_pij(2,3,277)=0 exch2_pij(3,3,277)=0 exch2_pij(4,3,277)=1 exch2_oi(3,277)=0 exch2_oj(3,277)=0 exch2_neighbourId(4,277)=276 exch2_iLo(4,277)=0 exch2_iHi(4,277)=0 exch2_jLo(4,277)=0 exch2_jHi(4,277)=52 exch2_opposingSend(4,277)=3 exch2_pij(1,4,277)=1 exch2_pij(2,4,277)=0 exch2_pij(3,4,277)=0 exch2_pij(4,4,277)=1 exch2_oi(4,277)=0 exch2_oj(4,277)=0 RETURN END SUBROUTINE W2_E2SETUP_278 C Topology for tile 278 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(278)=34 exch2_tNy(278)=51 exch2_tBasex(278)=238 exch2_tBasey(278)=408 exch2_txGlobalo(278)=749 exch2_tyGlobalo(278)=409 exch2_isWedge(278)=0 exch2_isNedge(278)=0 exch2_isEedge(278)=0 exch2_isSedge(278)=0 exch2_myFace(278)=2 exch2_mydNx(278)=510 exch2_mydNy(278)=510 exch2_nNeighbours(278)=4 exch2_neighbourId(1,278)=293 exch2_iLo(1,278)=0 exch2_iHi(1,278)=35 exch2_jLo(1,278)=52 exch2_jHi(1,278)=52 exch2_opposingSend(1,278)=2 exch2_pij(1,1,278)=1 exch2_pij(2,1,278)=0 exch2_pij(3,1,278)=0 exch2_pij(4,1,278)=1 exch2_oi(1,278)=0 exch2_oj(1,278)=0 exch2_neighbourId(2,278)=263 exch2_iLo(2,278)=0 exch2_iHi(2,278)=35 exch2_jLo(2,278)=0 exch2_jHi(2,278)=0 exch2_opposingSend(2,278)=1 exch2_pij(1,2,278)=1 exch2_pij(2,2,278)=0 exch2_pij(3,2,278)=0 exch2_pij(4,2,278)=1 exch2_oi(2,278)=0 exch2_oj(2,278)=0 exch2_neighbourId(3,278)=279 exch2_iLo(3,278)=35 exch2_iHi(3,278)=35 exch2_jLo(3,278)=0 exch2_jHi(3,278)=52 exch2_opposingSend(3,278)=4 exch2_pij(1,3,278)=1 exch2_pij(2,3,278)=0 exch2_pij(3,3,278)=0 exch2_pij(4,3,278)=1 exch2_oi(3,278)=0 exch2_oj(3,278)=0 exch2_neighbourId(4,278)=277 exch2_iLo(4,278)=0 exch2_iHi(4,278)=0 exch2_jLo(4,278)=0 exch2_jHi(4,278)=52 exch2_opposingSend(4,278)=3 exch2_pij(1,4,278)=1 exch2_pij(2,4,278)=0 exch2_pij(3,4,278)=0 exch2_pij(4,4,278)=1 exch2_oi(4,278)=0 exch2_oj(4,278)=0 RETURN END SUBROUTINE W2_E2SETUP_279 C Topology for tile 279 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(279)=34 exch2_tNy(279)=51 exch2_tBasex(279)=272 exch2_tBasey(279)=408 exch2_txGlobalo(279)=783 exch2_tyGlobalo(279)=409 exch2_isWedge(279)=0 exch2_isNedge(279)=0 exch2_isEedge(279)=0 exch2_isSedge(279)=0 exch2_myFace(279)=2 exch2_mydNx(279)=510 exch2_mydNy(279)=510 exch2_nNeighbours(279)=4 exch2_neighbourId(1,279)=294 exch2_iLo(1,279)=0 exch2_iHi(1,279)=35 exch2_jLo(1,279)=52 exch2_jHi(1,279)=52 exch2_opposingSend(1,279)=2 exch2_pij(1,1,279)=1 exch2_pij(2,1,279)=0 exch2_pij(3,1,279)=0 exch2_pij(4,1,279)=1 exch2_oi(1,279)=0 exch2_oj(1,279)=0 exch2_neighbourId(2,279)=264 exch2_iLo(2,279)=0 exch2_iHi(2,279)=35 exch2_jLo(2,279)=0 exch2_jHi(2,279)=0 exch2_opposingSend(2,279)=1 exch2_pij(1,2,279)=1 exch2_pij(2,2,279)=0 exch2_pij(3,2,279)=0 exch2_pij(4,2,279)=1 exch2_oi(2,279)=0 exch2_oj(2,279)=0 exch2_neighbourId(3,279)=280 exch2_iLo(3,279)=35 exch2_iHi(3,279)=35 exch2_jLo(3,279)=0 exch2_jHi(3,279)=52 exch2_opposingSend(3,279)=4 exch2_pij(1,3,279)=1 exch2_pij(2,3,279)=0 exch2_pij(3,3,279)=0 exch2_pij(4,3,279)=1 exch2_oi(3,279)=0 exch2_oj(3,279)=0 exch2_neighbourId(4,279)=278 exch2_iLo(4,279)=0 exch2_iHi(4,279)=0 exch2_jLo(4,279)=0 exch2_jHi(4,279)=52 exch2_opposingSend(4,279)=3 exch2_pij(1,4,279)=1 exch2_pij(2,4,279)=0 exch2_pij(3,4,279)=0 exch2_pij(4,4,279)=1 exch2_oi(4,279)=0 exch2_oj(4,279)=0 RETURN END SUBROUTINE W2_E2SETUP_280 C Topology for tile 280 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(280)=34 exch2_tNy(280)=51 exch2_tBasex(280)=306 exch2_tBasey(280)=408 exch2_txGlobalo(280)=817 exch2_tyGlobalo(280)=409 exch2_isWedge(280)=0 exch2_isNedge(280)=0 exch2_isEedge(280)=0 exch2_isSedge(280)=0 exch2_myFace(280)=2 exch2_mydNx(280)=510 exch2_mydNy(280)=510 exch2_nNeighbours(280)=4 exch2_neighbourId(1,280)=295 exch2_iLo(1,280)=0 exch2_iHi(1,280)=35 exch2_jLo(1,280)=52 exch2_jHi(1,280)=52 exch2_opposingSend(1,280)=2 exch2_pij(1,1,280)=1 exch2_pij(2,1,280)=0 exch2_pij(3,1,280)=0 exch2_pij(4,1,280)=1 exch2_oi(1,280)=0 exch2_oj(1,280)=0 exch2_neighbourId(2,280)=265 exch2_iLo(2,280)=0 exch2_iHi(2,280)=35 exch2_jLo(2,280)=0 exch2_jHi(2,280)=0 exch2_opposingSend(2,280)=1 exch2_pij(1,2,280)=1 exch2_pij(2,2,280)=0 exch2_pij(3,2,280)=0 exch2_pij(4,2,280)=1 exch2_oi(2,280)=0 exch2_oj(2,280)=0 exch2_neighbourId(3,280)=281 exch2_iLo(3,280)=35 exch2_iHi(3,280)=35 exch2_jLo(3,280)=0 exch2_jHi(3,280)=52 exch2_opposingSend(3,280)=4 exch2_pij(1,3,280)=1 exch2_pij(2,3,280)=0 exch2_pij(3,3,280)=0 exch2_pij(4,3,280)=1 exch2_oi(3,280)=0 exch2_oj(3,280)=0 exch2_neighbourId(4,280)=279 exch2_iLo(4,280)=0 exch2_iHi(4,280)=0 exch2_jLo(4,280)=0 exch2_jHi(4,280)=52 exch2_opposingSend(4,280)=3 exch2_pij(1,4,280)=1 exch2_pij(2,4,280)=0 exch2_pij(3,4,280)=0 exch2_pij(4,4,280)=1 exch2_oi(4,280)=0 exch2_oj(4,280)=0 RETURN END SUBROUTINE W2_E2SETUP_281 C Topology for tile 281 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(281)=34 exch2_tNy(281)=51 exch2_tBasex(281)=340 exch2_tBasey(281)=408 exch2_txGlobalo(281)=851 exch2_tyGlobalo(281)=409 exch2_isWedge(281)=0 exch2_isNedge(281)=0 exch2_isEedge(281)=0 exch2_isSedge(281)=0 exch2_myFace(281)=2 exch2_mydNx(281)=510 exch2_mydNy(281)=510 exch2_nNeighbours(281)=4 exch2_neighbourId(1,281)=296 exch2_iLo(1,281)=0 exch2_iHi(1,281)=35 exch2_jLo(1,281)=52 exch2_jHi(1,281)=52 exch2_opposingSend(1,281)=2 exch2_pij(1,1,281)=1 exch2_pij(2,1,281)=0 exch2_pij(3,1,281)=0 exch2_pij(4,1,281)=1 exch2_oi(1,281)=0 exch2_oj(1,281)=0 exch2_neighbourId(2,281)=266 exch2_iLo(2,281)=0 exch2_iHi(2,281)=35 exch2_jLo(2,281)=0 exch2_jHi(2,281)=0 exch2_opposingSend(2,281)=1 exch2_pij(1,2,281)=1 exch2_pij(2,2,281)=0 exch2_pij(3,2,281)=0 exch2_pij(4,2,281)=1 exch2_oi(2,281)=0 exch2_oj(2,281)=0 exch2_neighbourId(3,281)=282 exch2_iLo(3,281)=35 exch2_iHi(3,281)=35 exch2_jLo(3,281)=0 exch2_jHi(3,281)=52 exch2_opposingSend(3,281)=4 exch2_pij(1,3,281)=1 exch2_pij(2,3,281)=0 exch2_pij(3,3,281)=0 exch2_pij(4,3,281)=1 exch2_oi(3,281)=0 exch2_oj(3,281)=0 exch2_neighbourId(4,281)=280 exch2_iLo(4,281)=0 exch2_iHi(4,281)=0 exch2_jLo(4,281)=0 exch2_jHi(4,281)=52 exch2_opposingSend(4,281)=3 exch2_pij(1,4,281)=1 exch2_pij(2,4,281)=0 exch2_pij(3,4,281)=0 exch2_pij(4,4,281)=1 exch2_oi(4,281)=0 exch2_oj(4,281)=0 RETURN END SUBROUTINE W2_E2SETUP_282 C Topology for tile 282 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(282)=34 exch2_tNy(282)=51 exch2_tBasex(282)=374 exch2_tBasey(282)=408 exch2_txGlobalo(282)=885 exch2_tyGlobalo(282)=409 exch2_isWedge(282)=0 exch2_isNedge(282)=0 exch2_isEedge(282)=0 exch2_isSedge(282)=0 exch2_myFace(282)=2 exch2_mydNx(282)=510 exch2_mydNy(282)=510 exch2_nNeighbours(282)=4 exch2_neighbourId(1,282)=297 exch2_iLo(1,282)=0 exch2_iHi(1,282)=35 exch2_jLo(1,282)=52 exch2_jHi(1,282)=52 exch2_opposingSend(1,282)=2 exch2_pij(1,1,282)=1 exch2_pij(2,1,282)=0 exch2_pij(3,1,282)=0 exch2_pij(4,1,282)=1 exch2_oi(1,282)=0 exch2_oj(1,282)=0 exch2_neighbourId(2,282)=267 exch2_iLo(2,282)=0 exch2_iHi(2,282)=35 exch2_jLo(2,282)=0 exch2_jHi(2,282)=0 exch2_opposingSend(2,282)=1 exch2_pij(1,2,282)=1 exch2_pij(2,2,282)=0 exch2_pij(3,2,282)=0 exch2_pij(4,2,282)=1 exch2_oi(2,282)=0 exch2_oj(2,282)=0 exch2_neighbourId(3,282)=283 exch2_iLo(3,282)=35 exch2_iHi(3,282)=35 exch2_jLo(3,282)=0 exch2_jHi(3,282)=52 exch2_opposingSend(3,282)=4 exch2_pij(1,3,282)=1 exch2_pij(2,3,282)=0 exch2_pij(3,3,282)=0 exch2_pij(4,3,282)=1 exch2_oi(3,282)=0 exch2_oj(3,282)=0 exch2_neighbourId(4,282)=281 exch2_iLo(4,282)=0 exch2_iHi(4,282)=0 exch2_jLo(4,282)=0 exch2_jHi(4,282)=52 exch2_opposingSend(4,282)=3 exch2_pij(1,4,282)=1 exch2_pij(2,4,282)=0 exch2_pij(3,4,282)=0 exch2_pij(4,4,282)=1 exch2_oi(4,282)=0 exch2_oj(4,282)=0 RETURN END SUBROUTINE W2_E2SETUP_283 C Topology for tile 283 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(283)=34 exch2_tNy(283)=51 exch2_tBasex(283)=408 exch2_tBasey(283)=408 exch2_txGlobalo(283)=919 exch2_tyGlobalo(283)=409 exch2_isWedge(283)=0 exch2_isNedge(283)=0 exch2_isEedge(283)=0 exch2_isSedge(283)=0 exch2_myFace(283)=2 exch2_mydNx(283)=510 exch2_mydNy(283)=510 exch2_nNeighbours(283)=4 exch2_neighbourId(1,283)=298 exch2_iLo(1,283)=0 exch2_iHi(1,283)=35 exch2_jLo(1,283)=52 exch2_jHi(1,283)=52 exch2_opposingSend(1,283)=2 exch2_pij(1,1,283)=1 exch2_pij(2,1,283)=0 exch2_pij(3,1,283)=0 exch2_pij(4,1,283)=1 exch2_oi(1,283)=0 exch2_oj(1,283)=0 exch2_neighbourId(2,283)=268 exch2_iLo(2,283)=0 exch2_iHi(2,283)=35 exch2_jLo(2,283)=0 exch2_jHi(2,283)=0 exch2_opposingSend(2,283)=1 exch2_pij(1,2,283)=1 exch2_pij(2,2,283)=0 exch2_pij(3,2,283)=0 exch2_pij(4,2,283)=1 exch2_oi(2,283)=0 exch2_oj(2,283)=0 exch2_neighbourId(3,283)=284 exch2_iLo(3,283)=35 exch2_iHi(3,283)=35 exch2_jLo(3,283)=0 exch2_jHi(3,283)=52 exch2_opposingSend(3,283)=4 exch2_pij(1,3,283)=1 exch2_pij(2,3,283)=0 exch2_pij(3,3,283)=0 exch2_pij(4,3,283)=1 exch2_oi(3,283)=0 exch2_oj(3,283)=0 exch2_neighbourId(4,283)=282 exch2_iLo(4,283)=0 exch2_iHi(4,283)=0 exch2_jLo(4,283)=0 exch2_jHi(4,283)=52 exch2_opposingSend(4,283)=3 exch2_pij(1,4,283)=1 exch2_pij(2,4,283)=0 exch2_pij(3,4,283)=0 exch2_pij(4,4,283)=1 exch2_oi(4,283)=0 exch2_oj(4,283)=0 RETURN END SUBROUTINE W2_E2SETUP_284 C Topology for tile 284 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(284)=34 exch2_tNy(284)=51 exch2_tBasex(284)=442 exch2_tBasey(284)=408 exch2_txGlobalo(284)=953 exch2_tyGlobalo(284)=409 exch2_isWedge(284)=0 exch2_isNedge(284)=0 exch2_isEedge(284)=0 exch2_isSedge(284)=0 exch2_myFace(284)=2 exch2_mydNx(284)=510 exch2_mydNy(284)=510 exch2_nNeighbours(284)=4 exch2_neighbourId(1,284)=299 exch2_iLo(1,284)=0 exch2_iHi(1,284)=35 exch2_jLo(1,284)=52 exch2_jHi(1,284)=52 exch2_opposingSend(1,284)=2 exch2_pij(1,1,284)=1 exch2_pij(2,1,284)=0 exch2_pij(3,1,284)=0 exch2_pij(4,1,284)=1 exch2_oi(1,284)=0 exch2_oj(1,284)=0 exch2_neighbourId(2,284)=269 exch2_iLo(2,284)=0 exch2_iHi(2,284)=35 exch2_jLo(2,284)=0 exch2_jHi(2,284)=0 exch2_opposingSend(2,284)=1 exch2_pij(1,2,284)=1 exch2_pij(2,2,284)=0 exch2_pij(3,2,284)=0 exch2_pij(4,2,284)=1 exch2_oi(2,284)=0 exch2_oj(2,284)=0 exch2_neighbourId(3,284)=285 exch2_iLo(3,284)=35 exch2_iHi(3,284)=35 exch2_jLo(3,284)=0 exch2_jHi(3,284)=52 exch2_opposingSend(3,284)=5 exch2_pij(1,3,284)=1 exch2_pij(2,3,284)=0 exch2_pij(3,3,284)=0 exch2_pij(4,3,284)=1 exch2_oi(3,284)=0 exch2_oj(3,284)=0 exch2_neighbourId(4,284)=283 exch2_iLo(4,284)=0 exch2_iHi(4,284)=0 exch2_jLo(4,284)=0 exch2_jHi(4,284)=52 exch2_opposingSend(4,284)=3 exch2_pij(1,4,284)=1 exch2_pij(2,4,284)=0 exch2_pij(3,4,284)=0 exch2_pij(4,4,284)=1 exch2_oi(4,284)=0 exch2_oj(4,284)=0 RETURN END SUBROUTINE W2_E2SETUP_285 C Topology for tile 285 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(285)=34 exch2_tNy(285)=51 exch2_tBasex(285)=476 exch2_tBasey(285)=408 exch2_txGlobalo(285)=987 exch2_tyGlobalo(285)=409 exch2_isWedge(285)=0 exch2_isNedge(285)=0 exch2_isEedge(285)=1 exch2_isSedge(285)=0 exch2_myFace(285)=2 exch2_mydNx(285)=510 exch2_mydNy(285)=510 exch2_nNeighbours(285)=5 exch2_neighbourId(1,285)=300 exch2_iLo(1,285)=0 exch2_iHi(1,285)=35 exch2_jLo(1,285)=52 exch2_jHi(1,285)=52 exch2_opposingSend(1,285)=2 exch2_pij(1,1,285)=1 exch2_pij(2,1,285)=0 exch2_pij(3,1,285)=0 exch2_pij(4,1,285)=1 exch2_oi(1,285)=0 exch2_oj(1,285)=0 exch2_neighbourId(2,285)=270 exch2_iLo(2,285)=0 exch2_iHi(2,285)=35 exch2_jLo(2,285)=0 exch2_jHi(2,285)=0 exch2_opposingSend(2,285)=1 exch2_pij(1,2,285)=1 exch2_pij(2,2,285)=0 exch2_pij(3,2,285)=0 exch2_pij(4,2,285)=1 exch2_oi(2,285)=0 exch2_oj(2,285)=0 exch2_neighbourId(3,285)=452 exch2_iLo(3,285)=35 exch2_iHi(3,285)=35 exch2_jLo(3,285)=34 exch2_jHi(3,285)=52 exch2_opposingSend(3,285)=2 exch2_pij(1,3,285)=0 exch2_pij(2,3,285)=1 exch2_pij(3,3,285)=-1 exch2_pij(4,3,285)=0 exch2_oi(3,285)=510 exch2_oj(3,285)=511 exch2_neighbourId(4,285)=453 exch2_iLo(4,285)=35 exch2_iHi(4,285)=35 exch2_jLo(4,285)=0 exch2_jHi(4,285)=35 exch2_opposingSend(4,285)=2 exch2_pij(1,4,285)=0 exch2_pij(2,4,285)=1 exch2_pij(3,4,285)=-1 exch2_pij(4,4,285)=0 exch2_oi(4,285)=510 exch2_oj(4,285)=511 exch2_neighbourId(5,285)=284 exch2_iLo(5,285)=0 exch2_iHi(5,285)=0 exch2_jLo(5,285)=0 exch2_jHi(5,285)=52 exch2_opposingSend(5,285)=3 exch2_pij(1,5,285)=1 exch2_pij(2,5,285)=0 exch2_pij(3,5,285)=0 exch2_pij(4,5,285)=1 exch2_oi(5,285)=0 exch2_oj(5,285)=0 RETURN END SUBROUTINE W2_E2SETUP_286 C Topology for tile 286 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(286)=34 exch2_tNy(286)=51 exch2_tBasex(286)=0 exch2_tBasey(286)=459 exch2_txGlobalo(286)=511 exch2_tyGlobalo(286)=460 exch2_isWedge(286)=1 exch2_isNedge(286)=1 exch2_isEedge(286)=0 exch2_isSedge(286)=0 exch2_myFace(286)=2 exch2_mydNx(286)=510 exch2_mydNy(286)=510 exch2_nNeighbours(286)=4 exch2_neighbourId(1,286)=301 exch2_iLo(1,286)=0 exch2_iHi(1,286)=35 exch2_jLo(1,286)=52 exch2_jHi(1,286)=52 exch2_opposingSend(1,286)=2 exch2_pij(1,1,286)=1 exch2_pij(2,1,286)=0 exch2_pij(3,1,286)=0 exch2_pij(4,1,286)=1 exch2_oi(1,286)=0 exch2_oj(1,286)=510 exch2_neighbourId(2,286)=271 exch2_iLo(2,286)=0 exch2_iHi(2,286)=35 exch2_jLo(2,286)=0 exch2_jHi(2,286)=0 exch2_opposingSend(2,286)=1 exch2_pij(1,2,286)=1 exch2_pij(2,2,286)=0 exch2_pij(3,2,286)=0 exch2_pij(4,2,286)=1 exch2_oi(2,286)=0 exch2_oj(2,286)=0 exch2_neighbourId(3,286)=287 exch2_iLo(3,286)=35 exch2_iHi(3,286)=35 exch2_jLo(3,286)=0 exch2_jHi(3,286)=52 exch2_opposingSend(3,286)=4 exch2_pij(1,3,286)=1 exch2_pij(2,3,286)=0 exch2_pij(3,3,286)=0 exch2_pij(4,3,286)=1 exch2_oi(3,286)=0 exch2_oj(3,286)=0 exch2_neighbourId(4,286)=150 exch2_iLo(4,286)=0 exch2_iHi(4,286)=0 exch2_jLo(4,286)=0 exch2_jHi(4,286)=52 exch2_opposingSend(4,286)=3 exch2_pij(1,4,286)=1 exch2_pij(2,4,286)=0 exch2_pij(3,4,286)=0 exch2_pij(4,4,286)=1 exch2_oi(4,286)=-510 exch2_oj(4,286)=0 RETURN END SUBROUTINE W2_E2SETUP_287 C Topology for tile 287 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(287)=34 exch2_tNy(287)=51 exch2_tBasex(287)=34 exch2_tBasey(287)=459 exch2_txGlobalo(287)=545 exch2_tyGlobalo(287)=460 exch2_isWedge(287)=0 exch2_isNedge(287)=1 exch2_isEedge(287)=0 exch2_isSedge(287)=0 exch2_myFace(287)=2 exch2_mydNx(287)=510 exch2_mydNy(287)=510 exch2_nNeighbours(287)=4 exch2_neighbourId(1,287)=302 exch2_iLo(1,287)=0 exch2_iHi(1,287)=35 exch2_jLo(1,287)=52 exch2_jHi(1,287)=52 exch2_opposingSend(1,287)=2 exch2_pij(1,1,287)=1 exch2_pij(2,1,287)=0 exch2_pij(3,1,287)=0 exch2_pij(4,1,287)=1 exch2_oi(1,287)=0 exch2_oj(1,287)=510 exch2_neighbourId(2,287)=272 exch2_iLo(2,287)=0 exch2_iHi(2,287)=35 exch2_jLo(2,287)=0 exch2_jHi(2,287)=0 exch2_opposingSend(2,287)=1 exch2_pij(1,2,287)=1 exch2_pij(2,2,287)=0 exch2_pij(3,2,287)=0 exch2_pij(4,2,287)=1 exch2_oi(2,287)=0 exch2_oj(2,287)=0 exch2_neighbourId(3,287)=288 exch2_iLo(3,287)=35 exch2_iHi(3,287)=35 exch2_jLo(3,287)=0 exch2_jHi(3,287)=52 exch2_opposingSend(3,287)=4 exch2_pij(1,3,287)=1 exch2_pij(2,3,287)=0 exch2_pij(3,3,287)=0 exch2_pij(4,3,287)=1 exch2_oi(3,287)=0 exch2_oj(3,287)=0 exch2_neighbourId(4,287)=286 exch2_iLo(4,287)=0 exch2_iHi(4,287)=0 exch2_jLo(4,287)=0 exch2_jHi(4,287)=52 exch2_opposingSend(4,287)=3 exch2_pij(1,4,287)=1 exch2_pij(2,4,287)=0 exch2_pij(3,4,287)=0 exch2_pij(4,4,287)=1 exch2_oi(4,287)=0 exch2_oj(4,287)=0 RETURN END SUBROUTINE W2_E2SETUP_288 C Topology for tile 288 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(288)=34 exch2_tNy(288)=51 exch2_tBasex(288)=68 exch2_tBasey(288)=459 exch2_txGlobalo(288)=579 exch2_tyGlobalo(288)=460 exch2_isWedge(288)=0 exch2_isNedge(288)=1 exch2_isEedge(288)=0 exch2_isSedge(288)=0 exch2_myFace(288)=2 exch2_mydNx(288)=510 exch2_mydNy(288)=510 exch2_nNeighbours(288)=4 exch2_neighbourId(1,288)=303 exch2_iLo(1,288)=0 exch2_iHi(1,288)=35 exch2_jLo(1,288)=52 exch2_jHi(1,288)=52 exch2_opposingSend(1,288)=2 exch2_pij(1,1,288)=1 exch2_pij(2,1,288)=0 exch2_pij(3,1,288)=0 exch2_pij(4,1,288)=1 exch2_oi(1,288)=0 exch2_oj(1,288)=510 exch2_neighbourId(2,288)=273 exch2_iLo(2,288)=0 exch2_iHi(2,288)=35 exch2_jLo(2,288)=0 exch2_jHi(2,288)=0 exch2_opposingSend(2,288)=1 exch2_pij(1,2,288)=1 exch2_pij(2,2,288)=0 exch2_pij(3,2,288)=0 exch2_pij(4,2,288)=1 exch2_oi(2,288)=0 exch2_oj(2,288)=0 exch2_neighbourId(3,288)=289 exch2_iLo(3,288)=35 exch2_iHi(3,288)=35 exch2_jLo(3,288)=0 exch2_jHi(3,288)=52 exch2_opposingSend(3,288)=4 exch2_pij(1,3,288)=1 exch2_pij(2,3,288)=0 exch2_pij(3,3,288)=0 exch2_pij(4,3,288)=1 exch2_oi(3,288)=0 exch2_oj(3,288)=0 exch2_neighbourId(4,288)=287 exch2_iLo(4,288)=0 exch2_iHi(4,288)=0 exch2_jLo(4,288)=0 exch2_jHi(4,288)=52 exch2_opposingSend(4,288)=3 exch2_pij(1,4,288)=1 exch2_pij(2,4,288)=0 exch2_pij(3,4,288)=0 exch2_pij(4,4,288)=1 exch2_oi(4,288)=0 exch2_oj(4,288)=0 RETURN END SUBROUTINE W2_E2SETUP_289 C Topology for tile 289 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(289)=34 exch2_tNy(289)=51 exch2_tBasex(289)=102 exch2_tBasey(289)=459 exch2_txGlobalo(289)=613 exch2_tyGlobalo(289)=460 exch2_isWedge(289)=0 exch2_isNedge(289)=1 exch2_isEedge(289)=0 exch2_isSedge(289)=0 exch2_myFace(289)=2 exch2_mydNx(289)=510 exch2_mydNy(289)=510 exch2_nNeighbours(289)=4 exch2_neighbourId(1,289)=304 exch2_iLo(1,289)=0 exch2_iHi(1,289)=35 exch2_jLo(1,289)=52 exch2_jHi(1,289)=52 exch2_opposingSend(1,289)=2 exch2_pij(1,1,289)=1 exch2_pij(2,1,289)=0 exch2_pij(3,1,289)=0 exch2_pij(4,1,289)=1 exch2_oi(1,289)=0 exch2_oj(1,289)=510 exch2_neighbourId(2,289)=274 exch2_iLo(2,289)=0 exch2_iHi(2,289)=35 exch2_jLo(2,289)=0 exch2_jHi(2,289)=0 exch2_opposingSend(2,289)=1 exch2_pij(1,2,289)=1 exch2_pij(2,2,289)=0 exch2_pij(3,2,289)=0 exch2_pij(4,2,289)=1 exch2_oi(2,289)=0 exch2_oj(2,289)=0 exch2_neighbourId(3,289)=290 exch2_iLo(3,289)=35 exch2_iHi(3,289)=35 exch2_jLo(3,289)=0 exch2_jHi(3,289)=52 exch2_opposingSend(3,289)=4 exch2_pij(1,3,289)=1 exch2_pij(2,3,289)=0 exch2_pij(3,3,289)=0 exch2_pij(4,3,289)=1 exch2_oi(3,289)=0 exch2_oj(3,289)=0 exch2_neighbourId(4,289)=288 exch2_iLo(4,289)=0 exch2_iHi(4,289)=0 exch2_jLo(4,289)=0 exch2_jHi(4,289)=52 exch2_opposingSend(4,289)=3 exch2_pij(1,4,289)=1 exch2_pij(2,4,289)=0 exch2_pij(3,4,289)=0 exch2_pij(4,4,289)=1 exch2_oi(4,289)=0 exch2_oj(4,289)=0 RETURN END SUBROUTINE W2_E2SETUP_290 C Topology for tile 290 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(290)=34 exch2_tNy(290)=51 exch2_tBasex(290)=136 exch2_tBasey(290)=459 exch2_txGlobalo(290)=647 exch2_tyGlobalo(290)=460 exch2_isWedge(290)=0 exch2_isNedge(290)=1 exch2_isEedge(290)=0 exch2_isSedge(290)=0 exch2_myFace(290)=2 exch2_mydNx(290)=510 exch2_mydNy(290)=510 exch2_nNeighbours(290)=4 exch2_neighbourId(1,290)=305 exch2_iLo(1,290)=0 exch2_iHi(1,290)=35 exch2_jLo(1,290)=52 exch2_jHi(1,290)=52 exch2_opposingSend(1,290)=2 exch2_pij(1,1,290)=1 exch2_pij(2,1,290)=0 exch2_pij(3,1,290)=0 exch2_pij(4,1,290)=1 exch2_oi(1,290)=0 exch2_oj(1,290)=510 exch2_neighbourId(2,290)=275 exch2_iLo(2,290)=0 exch2_iHi(2,290)=35 exch2_jLo(2,290)=0 exch2_jHi(2,290)=0 exch2_opposingSend(2,290)=1 exch2_pij(1,2,290)=1 exch2_pij(2,2,290)=0 exch2_pij(3,2,290)=0 exch2_pij(4,2,290)=1 exch2_oi(2,290)=0 exch2_oj(2,290)=0 exch2_neighbourId(3,290)=291 exch2_iLo(3,290)=35 exch2_iHi(3,290)=35 exch2_jLo(3,290)=0 exch2_jHi(3,290)=52 exch2_opposingSend(3,290)=4 exch2_pij(1,3,290)=1 exch2_pij(2,3,290)=0 exch2_pij(3,3,290)=0 exch2_pij(4,3,290)=1 exch2_oi(3,290)=0 exch2_oj(3,290)=0 exch2_neighbourId(4,290)=289 exch2_iLo(4,290)=0 exch2_iHi(4,290)=0 exch2_jLo(4,290)=0 exch2_jHi(4,290)=52 exch2_opposingSend(4,290)=3 exch2_pij(1,4,290)=1 exch2_pij(2,4,290)=0 exch2_pij(3,4,290)=0 exch2_pij(4,4,290)=1 exch2_oi(4,290)=0 exch2_oj(4,290)=0 RETURN END SUBROUTINE W2_E2SETUP_291 C Topology for tile 291 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(291)=34 exch2_tNy(291)=51 exch2_tBasex(291)=170 exch2_tBasey(291)=459 exch2_txGlobalo(291)=681 exch2_tyGlobalo(291)=460 exch2_isWedge(291)=0 exch2_isNedge(291)=1 exch2_isEedge(291)=0 exch2_isSedge(291)=0 exch2_myFace(291)=2 exch2_mydNx(291)=510 exch2_mydNy(291)=510 exch2_nNeighbours(291)=4 exch2_neighbourId(1,291)=306 exch2_iLo(1,291)=0 exch2_iHi(1,291)=35 exch2_jLo(1,291)=52 exch2_jHi(1,291)=52 exch2_opposingSend(1,291)=2 exch2_pij(1,1,291)=1 exch2_pij(2,1,291)=0 exch2_pij(3,1,291)=0 exch2_pij(4,1,291)=1 exch2_oi(1,291)=0 exch2_oj(1,291)=510 exch2_neighbourId(2,291)=276 exch2_iLo(2,291)=0 exch2_iHi(2,291)=35 exch2_jLo(2,291)=0 exch2_jHi(2,291)=0 exch2_opposingSend(2,291)=1 exch2_pij(1,2,291)=1 exch2_pij(2,2,291)=0 exch2_pij(3,2,291)=0 exch2_pij(4,2,291)=1 exch2_oi(2,291)=0 exch2_oj(2,291)=0 exch2_neighbourId(3,291)=292 exch2_iLo(3,291)=35 exch2_iHi(3,291)=35 exch2_jLo(3,291)=0 exch2_jHi(3,291)=52 exch2_opposingSend(3,291)=4 exch2_pij(1,3,291)=1 exch2_pij(2,3,291)=0 exch2_pij(3,3,291)=0 exch2_pij(4,3,291)=1 exch2_oi(3,291)=0 exch2_oj(3,291)=0 exch2_neighbourId(4,291)=290 exch2_iLo(4,291)=0 exch2_iHi(4,291)=0 exch2_jLo(4,291)=0 exch2_jHi(4,291)=52 exch2_opposingSend(4,291)=3 exch2_pij(1,4,291)=1 exch2_pij(2,4,291)=0 exch2_pij(3,4,291)=0 exch2_pij(4,4,291)=1 exch2_oi(4,291)=0 exch2_oj(4,291)=0 RETURN END SUBROUTINE W2_E2SETUP_292 C Topology for tile 292 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(292)=34 exch2_tNy(292)=51 exch2_tBasex(292)=204 exch2_tBasey(292)=459 exch2_txGlobalo(292)=715 exch2_tyGlobalo(292)=460 exch2_isWedge(292)=0 exch2_isNedge(292)=1 exch2_isEedge(292)=0 exch2_isSedge(292)=0 exch2_myFace(292)=2 exch2_mydNx(292)=510 exch2_mydNy(292)=510 exch2_nNeighbours(292)=4 exch2_neighbourId(1,292)=307 exch2_iLo(1,292)=0 exch2_iHi(1,292)=35 exch2_jLo(1,292)=52 exch2_jHi(1,292)=52 exch2_opposingSend(1,292)=2 exch2_pij(1,1,292)=1 exch2_pij(2,1,292)=0 exch2_pij(3,1,292)=0 exch2_pij(4,1,292)=1 exch2_oi(1,292)=0 exch2_oj(1,292)=510 exch2_neighbourId(2,292)=277 exch2_iLo(2,292)=0 exch2_iHi(2,292)=35 exch2_jLo(2,292)=0 exch2_jHi(2,292)=0 exch2_opposingSend(2,292)=1 exch2_pij(1,2,292)=1 exch2_pij(2,2,292)=0 exch2_pij(3,2,292)=0 exch2_pij(4,2,292)=1 exch2_oi(2,292)=0 exch2_oj(2,292)=0 exch2_neighbourId(3,292)=293 exch2_iLo(3,292)=35 exch2_iHi(3,292)=35 exch2_jLo(3,292)=0 exch2_jHi(3,292)=52 exch2_opposingSend(3,292)=4 exch2_pij(1,3,292)=1 exch2_pij(2,3,292)=0 exch2_pij(3,3,292)=0 exch2_pij(4,3,292)=1 exch2_oi(3,292)=0 exch2_oj(3,292)=0 exch2_neighbourId(4,292)=291 exch2_iLo(4,292)=0 exch2_iHi(4,292)=0 exch2_jLo(4,292)=0 exch2_jHi(4,292)=52 exch2_opposingSend(4,292)=3 exch2_pij(1,4,292)=1 exch2_pij(2,4,292)=0 exch2_pij(3,4,292)=0 exch2_pij(4,4,292)=1 exch2_oi(4,292)=0 exch2_oj(4,292)=0 RETURN END SUBROUTINE W2_E2SETUP_293 C Topology for tile 293 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(293)=34 exch2_tNy(293)=51 exch2_tBasex(293)=238 exch2_tBasey(293)=459 exch2_txGlobalo(293)=749 exch2_tyGlobalo(293)=460 exch2_isWedge(293)=0 exch2_isNedge(293)=1 exch2_isEedge(293)=0 exch2_isSedge(293)=0 exch2_myFace(293)=2 exch2_mydNx(293)=510 exch2_mydNy(293)=510 exch2_nNeighbours(293)=4 exch2_neighbourId(1,293)=308 exch2_iLo(1,293)=0 exch2_iHi(1,293)=35 exch2_jLo(1,293)=52 exch2_jHi(1,293)=52 exch2_opposingSend(1,293)=2 exch2_pij(1,1,293)=1 exch2_pij(2,1,293)=0 exch2_pij(3,1,293)=0 exch2_pij(4,1,293)=1 exch2_oi(1,293)=0 exch2_oj(1,293)=510 exch2_neighbourId(2,293)=278 exch2_iLo(2,293)=0 exch2_iHi(2,293)=35 exch2_jLo(2,293)=0 exch2_jHi(2,293)=0 exch2_opposingSend(2,293)=1 exch2_pij(1,2,293)=1 exch2_pij(2,2,293)=0 exch2_pij(3,2,293)=0 exch2_pij(4,2,293)=1 exch2_oi(2,293)=0 exch2_oj(2,293)=0 exch2_neighbourId(3,293)=294 exch2_iLo(3,293)=35 exch2_iHi(3,293)=35 exch2_jLo(3,293)=0 exch2_jHi(3,293)=52 exch2_opposingSend(3,293)=4 exch2_pij(1,3,293)=1 exch2_pij(2,3,293)=0 exch2_pij(3,3,293)=0 exch2_pij(4,3,293)=1 exch2_oi(3,293)=0 exch2_oj(3,293)=0 exch2_neighbourId(4,293)=292 exch2_iLo(4,293)=0 exch2_iHi(4,293)=0 exch2_jLo(4,293)=0 exch2_jHi(4,293)=52 exch2_opposingSend(4,293)=3 exch2_pij(1,4,293)=1 exch2_pij(2,4,293)=0 exch2_pij(3,4,293)=0 exch2_pij(4,4,293)=1 exch2_oi(4,293)=0 exch2_oj(4,293)=0 RETURN END SUBROUTINE W2_E2SETUP_294 C Topology for tile 294 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(294)=34 exch2_tNy(294)=51 exch2_tBasex(294)=272 exch2_tBasey(294)=459 exch2_txGlobalo(294)=783 exch2_tyGlobalo(294)=460 exch2_isWedge(294)=0 exch2_isNedge(294)=1 exch2_isEedge(294)=0 exch2_isSedge(294)=0 exch2_myFace(294)=2 exch2_mydNx(294)=510 exch2_mydNy(294)=510 exch2_nNeighbours(294)=4 exch2_neighbourId(1,294)=309 exch2_iLo(1,294)=0 exch2_iHi(1,294)=35 exch2_jLo(1,294)=52 exch2_jHi(1,294)=52 exch2_opposingSend(1,294)=2 exch2_pij(1,1,294)=1 exch2_pij(2,1,294)=0 exch2_pij(3,1,294)=0 exch2_pij(4,1,294)=1 exch2_oi(1,294)=0 exch2_oj(1,294)=510 exch2_neighbourId(2,294)=279 exch2_iLo(2,294)=0 exch2_iHi(2,294)=35 exch2_jLo(2,294)=0 exch2_jHi(2,294)=0 exch2_opposingSend(2,294)=1 exch2_pij(1,2,294)=1 exch2_pij(2,2,294)=0 exch2_pij(3,2,294)=0 exch2_pij(4,2,294)=1 exch2_oi(2,294)=0 exch2_oj(2,294)=0 exch2_neighbourId(3,294)=295 exch2_iLo(3,294)=35 exch2_iHi(3,294)=35 exch2_jLo(3,294)=0 exch2_jHi(3,294)=52 exch2_opposingSend(3,294)=4 exch2_pij(1,3,294)=1 exch2_pij(2,3,294)=0 exch2_pij(3,3,294)=0 exch2_pij(4,3,294)=1 exch2_oi(3,294)=0 exch2_oj(3,294)=0 exch2_neighbourId(4,294)=293 exch2_iLo(4,294)=0 exch2_iHi(4,294)=0 exch2_jLo(4,294)=0 exch2_jHi(4,294)=52 exch2_opposingSend(4,294)=3 exch2_pij(1,4,294)=1 exch2_pij(2,4,294)=0 exch2_pij(3,4,294)=0 exch2_pij(4,4,294)=1 exch2_oi(4,294)=0 exch2_oj(4,294)=0 RETURN END SUBROUTINE W2_E2SETUP_295 C Topology for tile 295 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(295)=34 exch2_tNy(295)=51 exch2_tBasex(295)=306 exch2_tBasey(295)=459 exch2_txGlobalo(295)=817 exch2_tyGlobalo(295)=460 exch2_isWedge(295)=0 exch2_isNedge(295)=1 exch2_isEedge(295)=0 exch2_isSedge(295)=0 exch2_myFace(295)=2 exch2_mydNx(295)=510 exch2_mydNy(295)=510 exch2_nNeighbours(295)=4 exch2_neighbourId(1,295)=310 exch2_iLo(1,295)=0 exch2_iHi(1,295)=35 exch2_jLo(1,295)=52 exch2_jHi(1,295)=52 exch2_opposingSend(1,295)=2 exch2_pij(1,1,295)=1 exch2_pij(2,1,295)=0 exch2_pij(3,1,295)=0 exch2_pij(4,1,295)=1 exch2_oi(1,295)=0 exch2_oj(1,295)=510 exch2_neighbourId(2,295)=280 exch2_iLo(2,295)=0 exch2_iHi(2,295)=35 exch2_jLo(2,295)=0 exch2_jHi(2,295)=0 exch2_opposingSend(2,295)=1 exch2_pij(1,2,295)=1 exch2_pij(2,2,295)=0 exch2_pij(3,2,295)=0 exch2_pij(4,2,295)=1 exch2_oi(2,295)=0 exch2_oj(2,295)=0 exch2_neighbourId(3,295)=296 exch2_iLo(3,295)=35 exch2_iHi(3,295)=35 exch2_jLo(3,295)=0 exch2_jHi(3,295)=52 exch2_opposingSend(3,295)=4 exch2_pij(1,3,295)=1 exch2_pij(2,3,295)=0 exch2_pij(3,3,295)=0 exch2_pij(4,3,295)=1 exch2_oi(3,295)=0 exch2_oj(3,295)=0 exch2_neighbourId(4,295)=294 exch2_iLo(4,295)=0 exch2_iHi(4,295)=0 exch2_jLo(4,295)=0 exch2_jHi(4,295)=52 exch2_opposingSend(4,295)=3 exch2_pij(1,4,295)=1 exch2_pij(2,4,295)=0 exch2_pij(3,4,295)=0 exch2_pij(4,4,295)=1 exch2_oi(4,295)=0 exch2_oj(4,295)=0 RETURN END SUBROUTINE W2_E2SETUP_296 C Topology for tile 296 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(296)=34 exch2_tNy(296)=51 exch2_tBasex(296)=340 exch2_tBasey(296)=459 exch2_txGlobalo(296)=851 exch2_tyGlobalo(296)=460 exch2_isWedge(296)=0 exch2_isNedge(296)=1 exch2_isEedge(296)=0 exch2_isSedge(296)=0 exch2_myFace(296)=2 exch2_mydNx(296)=510 exch2_mydNy(296)=510 exch2_nNeighbours(296)=4 exch2_neighbourId(1,296)=311 exch2_iLo(1,296)=0 exch2_iHi(1,296)=35 exch2_jLo(1,296)=52 exch2_jHi(1,296)=52 exch2_opposingSend(1,296)=2 exch2_pij(1,1,296)=1 exch2_pij(2,1,296)=0 exch2_pij(3,1,296)=0 exch2_pij(4,1,296)=1 exch2_oi(1,296)=0 exch2_oj(1,296)=510 exch2_neighbourId(2,296)=281 exch2_iLo(2,296)=0 exch2_iHi(2,296)=35 exch2_jLo(2,296)=0 exch2_jHi(2,296)=0 exch2_opposingSend(2,296)=1 exch2_pij(1,2,296)=1 exch2_pij(2,2,296)=0 exch2_pij(3,2,296)=0 exch2_pij(4,2,296)=1 exch2_oi(2,296)=0 exch2_oj(2,296)=0 exch2_neighbourId(3,296)=297 exch2_iLo(3,296)=35 exch2_iHi(3,296)=35 exch2_jLo(3,296)=0 exch2_jHi(3,296)=52 exch2_opposingSend(3,296)=4 exch2_pij(1,3,296)=1 exch2_pij(2,3,296)=0 exch2_pij(3,3,296)=0 exch2_pij(4,3,296)=1 exch2_oi(3,296)=0 exch2_oj(3,296)=0 exch2_neighbourId(4,296)=295 exch2_iLo(4,296)=0 exch2_iHi(4,296)=0 exch2_jLo(4,296)=0 exch2_jHi(4,296)=52 exch2_opposingSend(4,296)=3 exch2_pij(1,4,296)=1 exch2_pij(2,4,296)=0 exch2_pij(3,4,296)=0 exch2_pij(4,4,296)=1 exch2_oi(4,296)=0 exch2_oj(4,296)=0 RETURN END SUBROUTINE W2_E2SETUP_297 C Topology for tile 297 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(297)=34 exch2_tNy(297)=51 exch2_tBasex(297)=374 exch2_tBasey(297)=459 exch2_txGlobalo(297)=885 exch2_tyGlobalo(297)=460 exch2_isWedge(297)=0 exch2_isNedge(297)=1 exch2_isEedge(297)=0 exch2_isSedge(297)=0 exch2_myFace(297)=2 exch2_mydNx(297)=510 exch2_mydNy(297)=510 exch2_nNeighbours(297)=4 exch2_neighbourId(1,297)=312 exch2_iLo(1,297)=0 exch2_iHi(1,297)=35 exch2_jLo(1,297)=52 exch2_jHi(1,297)=52 exch2_opposingSend(1,297)=2 exch2_pij(1,1,297)=1 exch2_pij(2,1,297)=0 exch2_pij(3,1,297)=0 exch2_pij(4,1,297)=1 exch2_oi(1,297)=0 exch2_oj(1,297)=510 exch2_neighbourId(2,297)=282 exch2_iLo(2,297)=0 exch2_iHi(2,297)=35 exch2_jLo(2,297)=0 exch2_jHi(2,297)=0 exch2_opposingSend(2,297)=1 exch2_pij(1,2,297)=1 exch2_pij(2,2,297)=0 exch2_pij(3,2,297)=0 exch2_pij(4,2,297)=1 exch2_oi(2,297)=0 exch2_oj(2,297)=0 exch2_neighbourId(3,297)=298 exch2_iLo(3,297)=35 exch2_iHi(3,297)=35 exch2_jLo(3,297)=0 exch2_jHi(3,297)=52 exch2_opposingSend(3,297)=4 exch2_pij(1,3,297)=1 exch2_pij(2,3,297)=0 exch2_pij(3,3,297)=0 exch2_pij(4,3,297)=1 exch2_oi(3,297)=0 exch2_oj(3,297)=0 exch2_neighbourId(4,297)=296 exch2_iLo(4,297)=0 exch2_iHi(4,297)=0 exch2_jLo(4,297)=0 exch2_jHi(4,297)=52 exch2_opposingSend(4,297)=3 exch2_pij(1,4,297)=1 exch2_pij(2,4,297)=0 exch2_pij(3,4,297)=0 exch2_pij(4,4,297)=1 exch2_oi(4,297)=0 exch2_oj(4,297)=0 RETURN END SUBROUTINE W2_E2SETUP_298 C Topology for tile 298 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(298)=34 exch2_tNy(298)=51 exch2_tBasex(298)=408 exch2_tBasey(298)=459 exch2_txGlobalo(298)=919 exch2_tyGlobalo(298)=460 exch2_isWedge(298)=0 exch2_isNedge(298)=1 exch2_isEedge(298)=0 exch2_isSedge(298)=0 exch2_myFace(298)=2 exch2_mydNx(298)=510 exch2_mydNy(298)=510 exch2_nNeighbours(298)=4 exch2_neighbourId(1,298)=313 exch2_iLo(1,298)=0 exch2_iHi(1,298)=35 exch2_jLo(1,298)=52 exch2_jHi(1,298)=52 exch2_opposingSend(1,298)=2 exch2_pij(1,1,298)=1 exch2_pij(2,1,298)=0 exch2_pij(3,1,298)=0 exch2_pij(4,1,298)=1 exch2_oi(1,298)=0 exch2_oj(1,298)=510 exch2_neighbourId(2,298)=283 exch2_iLo(2,298)=0 exch2_iHi(2,298)=35 exch2_jLo(2,298)=0 exch2_jHi(2,298)=0 exch2_opposingSend(2,298)=1 exch2_pij(1,2,298)=1 exch2_pij(2,2,298)=0 exch2_pij(3,2,298)=0 exch2_pij(4,2,298)=1 exch2_oi(2,298)=0 exch2_oj(2,298)=0 exch2_neighbourId(3,298)=299 exch2_iLo(3,298)=35 exch2_iHi(3,298)=35 exch2_jLo(3,298)=0 exch2_jHi(3,298)=52 exch2_opposingSend(3,298)=4 exch2_pij(1,3,298)=1 exch2_pij(2,3,298)=0 exch2_pij(3,3,298)=0 exch2_pij(4,3,298)=1 exch2_oi(3,298)=0 exch2_oj(3,298)=0 exch2_neighbourId(4,298)=297 exch2_iLo(4,298)=0 exch2_iHi(4,298)=0 exch2_jLo(4,298)=0 exch2_jHi(4,298)=52 exch2_opposingSend(4,298)=3 exch2_pij(1,4,298)=1 exch2_pij(2,4,298)=0 exch2_pij(3,4,298)=0 exch2_pij(4,4,298)=1 exch2_oi(4,298)=0 exch2_oj(4,298)=0 RETURN END SUBROUTINE W2_E2SETUP_299 C Topology for tile 299 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(299)=34 exch2_tNy(299)=51 exch2_tBasex(299)=442 exch2_tBasey(299)=459 exch2_txGlobalo(299)=953 exch2_tyGlobalo(299)=460 exch2_isWedge(299)=0 exch2_isNedge(299)=1 exch2_isEedge(299)=0 exch2_isSedge(299)=0 exch2_myFace(299)=2 exch2_mydNx(299)=510 exch2_mydNy(299)=510 exch2_nNeighbours(299)=4 exch2_neighbourId(1,299)=314 exch2_iLo(1,299)=0 exch2_iHi(1,299)=35 exch2_jLo(1,299)=52 exch2_jHi(1,299)=52 exch2_opposingSend(1,299)=2 exch2_pij(1,1,299)=1 exch2_pij(2,1,299)=0 exch2_pij(3,1,299)=0 exch2_pij(4,1,299)=1 exch2_oi(1,299)=0 exch2_oj(1,299)=510 exch2_neighbourId(2,299)=284 exch2_iLo(2,299)=0 exch2_iHi(2,299)=35 exch2_jLo(2,299)=0 exch2_jHi(2,299)=0 exch2_opposingSend(2,299)=1 exch2_pij(1,2,299)=1 exch2_pij(2,2,299)=0 exch2_pij(3,2,299)=0 exch2_pij(4,2,299)=1 exch2_oi(2,299)=0 exch2_oj(2,299)=0 exch2_neighbourId(3,299)=300 exch2_iLo(3,299)=35 exch2_iHi(3,299)=35 exch2_jLo(3,299)=0 exch2_jHi(3,299)=52 exch2_opposingSend(3,299)=5 exch2_pij(1,3,299)=1 exch2_pij(2,3,299)=0 exch2_pij(3,3,299)=0 exch2_pij(4,3,299)=1 exch2_oi(3,299)=0 exch2_oj(3,299)=0 exch2_neighbourId(4,299)=298 exch2_iLo(4,299)=0 exch2_iHi(4,299)=0 exch2_jLo(4,299)=0 exch2_jHi(4,299)=52 exch2_opposingSend(4,299)=3 exch2_pij(1,4,299)=1 exch2_pij(2,4,299)=0 exch2_pij(3,4,299)=0 exch2_pij(4,4,299)=1 exch2_oi(4,299)=0 exch2_oj(4,299)=0 RETURN END SUBROUTINE W2_E2SETUP_300 C Topology for tile 300 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(300)=34 exch2_tNy(300)=51 exch2_tBasex(300)=476 exch2_tBasey(300)=459 exch2_txGlobalo(300)=987 exch2_tyGlobalo(300)=460 exch2_isWedge(300)=0 exch2_isNedge(300)=1 exch2_isEedge(300)=1 exch2_isSedge(300)=0 exch2_myFace(300)=2 exch2_mydNx(300)=510 exch2_mydNy(300)=510 exch2_nNeighbours(300)=5 exch2_neighbourId(1,300)=315 exch2_iLo(1,300)=0 exch2_iHi(1,300)=35 exch2_jLo(1,300)=52 exch2_jHi(1,300)=52 exch2_opposingSend(1,300)=2 exch2_pij(1,1,300)=1 exch2_pij(2,1,300)=0 exch2_pij(3,1,300)=0 exch2_pij(4,1,300)=1 exch2_oi(1,300)=0 exch2_oj(1,300)=510 exch2_neighbourId(2,300)=285 exch2_iLo(2,300)=0 exch2_iHi(2,300)=35 exch2_jLo(2,300)=0 exch2_jHi(2,300)=0 exch2_opposingSend(2,300)=1 exch2_pij(1,2,300)=1 exch2_pij(2,2,300)=0 exch2_pij(3,2,300)=0 exch2_pij(4,2,300)=1 exch2_oi(2,300)=0 exch2_oj(2,300)=0 exch2_neighbourId(3,300)=451 exch2_iLo(3,300)=35 exch2_iHi(3,300)=35 exch2_jLo(3,300)=17 exch2_jHi(3,300)=52 exch2_opposingSend(3,300)=2 exch2_pij(1,3,300)=0 exch2_pij(2,3,300)=1 exch2_pij(3,3,300)=-1 exch2_pij(4,3,300)=0 exch2_oi(3,300)=510 exch2_oj(3,300)=511 exch2_neighbourId(4,300)=452 exch2_iLo(4,300)=35 exch2_iHi(4,300)=35 exch2_jLo(4,300)=0 exch2_jHi(4,300)=18 exch2_opposingSend(4,300)=3 exch2_pij(1,4,300)=0 exch2_pij(2,4,300)=1 exch2_pij(3,4,300)=-1 exch2_pij(4,4,300)=0 exch2_oi(4,300)=510 exch2_oj(4,300)=511 exch2_neighbourId(5,300)=299 exch2_iLo(5,300)=0 exch2_iHi(5,300)=0 exch2_jLo(5,300)=0 exch2_jHi(5,300)=52 exch2_opposingSend(5,300)=3 exch2_pij(1,5,300)=1 exch2_pij(2,5,300)=0 exch2_pij(3,5,300)=0 exch2_pij(4,5,300)=1 exch2_oi(5,300)=0 exch2_oj(5,300)=0 RETURN END SUBROUTINE W2_E2SETUP_301 C Topology for tile 301 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(301)=34 exch2_tNy(301)=51 exch2_tBasex(301)=0 exch2_tBasey(301)=0 exch2_txGlobalo(301)=1021 exch2_tyGlobalo(301)=1 exch2_isWedge(301)=1 exch2_isNedge(301)=0 exch2_isEedge(301)=0 exch2_isSedge(301)=1 exch2_myFace(301)=3 exch2_mydNx(301)=510 exch2_mydNy(301)=510 exch2_nNeighbours(301)=5 exch2_neighbourId(1,301)=316 exch2_iLo(1,301)=0 exch2_iHi(1,301)=35 exch2_jLo(1,301)=52 exch2_jHi(1,301)=52 exch2_opposingSend(1,301)=2 exch2_pij(1,1,301)=1 exch2_pij(2,1,301)=0 exch2_pij(3,1,301)=0 exch2_pij(4,1,301)=1 exch2_oi(1,301)=0 exch2_oj(1,301)=0 exch2_neighbourId(2,301)=286 exch2_iLo(2,301)=0 exch2_iHi(2,301)=35 exch2_jLo(2,301)=0 exch2_jHi(2,301)=0 exch2_opposingSend(2,301)=1 exch2_pij(1,2,301)=1 exch2_pij(2,2,301)=0 exch2_pij(3,2,301)=0 exch2_pij(4,2,301)=1 exch2_oi(2,301)=0 exch2_oj(2,301)=-510 exch2_neighbourId(3,301)=302 exch2_iLo(3,301)=35 exch2_iHi(3,301)=35 exch2_jLo(3,301)=0 exch2_jHi(3,301)=52 exch2_opposingSend(3,301)=4 exch2_pij(1,3,301)=1 exch2_pij(2,3,301)=0 exch2_pij(3,3,301)=0 exch2_pij(4,3,301)=1 exch2_oi(3,301)=0 exch2_oj(3,301)=0 exch2_neighbourId(4,301)=149 exch2_iLo(4,301)=0 exch2_iHi(4,301)=0 exch2_jLo(4,301)=34 exch2_jHi(4,301)=52 exch2_opposingSend(4,301)=1 exch2_pij(1,4,301)=0 exch2_pij(2,4,301)=1 exch2_pij(3,4,301)=-1 exch2_pij(4,4,301)=0 exch2_oi(4,301)=-510 exch2_oj(4,301)=511 exch2_neighbourId(5,301)=150 exch2_iLo(5,301)=0 exch2_iHi(5,301)=0 exch2_jLo(5,301)=0 exch2_jHi(5,301)=35 exch2_opposingSend(5,301)=1 exch2_pij(1,5,301)=0 exch2_pij(2,5,301)=1 exch2_pij(3,5,301)=-1 exch2_pij(4,5,301)=0 exch2_oi(5,301)=-510 exch2_oj(5,301)=511 RETURN END SUBROUTINE W2_E2SETUP_302 C Topology for tile 302 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(302)=34 exch2_tNy(302)=51 exch2_tBasex(302)=34 exch2_tBasey(302)=0 exch2_txGlobalo(302)=1055 exch2_tyGlobalo(302)=1 exch2_isWedge(302)=0 exch2_isNedge(302)=0 exch2_isEedge(302)=0 exch2_isSedge(302)=1 exch2_myFace(302)=3 exch2_mydNx(302)=510 exch2_mydNy(302)=510 exch2_nNeighbours(302)=4 exch2_neighbourId(1,302)=317 exch2_iLo(1,302)=0 exch2_iHi(1,302)=35 exch2_jLo(1,302)=52 exch2_jHi(1,302)=52 exch2_opposingSend(1,302)=2 exch2_pij(1,1,302)=1 exch2_pij(2,1,302)=0 exch2_pij(3,1,302)=0 exch2_pij(4,1,302)=1 exch2_oi(1,302)=0 exch2_oj(1,302)=0 exch2_neighbourId(2,302)=287 exch2_iLo(2,302)=0 exch2_iHi(2,302)=35 exch2_jLo(2,302)=0 exch2_jHi(2,302)=0 exch2_opposingSend(2,302)=1 exch2_pij(1,2,302)=1 exch2_pij(2,2,302)=0 exch2_pij(3,2,302)=0 exch2_pij(4,2,302)=1 exch2_oi(2,302)=0 exch2_oj(2,302)=-510 exch2_neighbourId(3,302)=303 exch2_iLo(3,302)=35 exch2_iHi(3,302)=35 exch2_jLo(3,302)=0 exch2_jHi(3,302)=52 exch2_opposingSend(3,302)=4 exch2_pij(1,3,302)=1 exch2_pij(2,3,302)=0 exch2_pij(3,3,302)=0 exch2_pij(4,3,302)=1 exch2_oi(3,302)=0 exch2_oj(3,302)=0 exch2_neighbourId(4,302)=301 exch2_iLo(4,302)=0 exch2_iHi(4,302)=0 exch2_jLo(4,302)=0 exch2_jHi(4,302)=52 exch2_opposingSend(4,302)=3 exch2_pij(1,4,302)=1 exch2_pij(2,4,302)=0 exch2_pij(3,4,302)=0 exch2_pij(4,4,302)=1 exch2_oi(4,302)=0 exch2_oj(4,302)=0 RETURN END SUBROUTINE W2_E2SETUP_303 C Topology for tile 303 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(303)=34 exch2_tNy(303)=51 exch2_tBasex(303)=68 exch2_tBasey(303)=0 exch2_txGlobalo(303)=1089 exch2_tyGlobalo(303)=1 exch2_isWedge(303)=0 exch2_isNedge(303)=0 exch2_isEedge(303)=0 exch2_isSedge(303)=1 exch2_myFace(303)=3 exch2_mydNx(303)=510 exch2_mydNy(303)=510 exch2_nNeighbours(303)=4 exch2_neighbourId(1,303)=318 exch2_iLo(1,303)=0 exch2_iHi(1,303)=35 exch2_jLo(1,303)=52 exch2_jHi(1,303)=52 exch2_opposingSend(1,303)=2 exch2_pij(1,1,303)=1 exch2_pij(2,1,303)=0 exch2_pij(3,1,303)=0 exch2_pij(4,1,303)=1 exch2_oi(1,303)=0 exch2_oj(1,303)=0 exch2_neighbourId(2,303)=288 exch2_iLo(2,303)=0 exch2_iHi(2,303)=35 exch2_jLo(2,303)=0 exch2_jHi(2,303)=0 exch2_opposingSend(2,303)=1 exch2_pij(1,2,303)=1 exch2_pij(2,2,303)=0 exch2_pij(3,2,303)=0 exch2_pij(4,2,303)=1 exch2_oi(2,303)=0 exch2_oj(2,303)=-510 exch2_neighbourId(3,303)=304 exch2_iLo(3,303)=35 exch2_iHi(3,303)=35 exch2_jLo(3,303)=0 exch2_jHi(3,303)=52 exch2_opposingSend(3,303)=4 exch2_pij(1,3,303)=1 exch2_pij(2,3,303)=0 exch2_pij(3,3,303)=0 exch2_pij(4,3,303)=1 exch2_oi(3,303)=0 exch2_oj(3,303)=0 exch2_neighbourId(4,303)=302 exch2_iLo(4,303)=0 exch2_iHi(4,303)=0 exch2_jLo(4,303)=0 exch2_jHi(4,303)=52 exch2_opposingSend(4,303)=3 exch2_pij(1,4,303)=1 exch2_pij(2,4,303)=0 exch2_pij(3,4,303)=0 exch2_pij(4,4,303)=1 exch2_oi(4,303)=0 exch2_oj(4,303)=0 RETURN END SUBROUTINE W2_E2SETUP_304 C Topology for tile 304 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(304)=34 exch2_tNy(304)=51 exch2_tBasex(304)=102 exch2_tBasey(304)=0 exch2_txGlobalo(304)=1123 exch2_tyGlobalo(304)=1 exch2_isWedge(304)=0 exch2_isNedge(304)=0 exch2_isEedge(304)=0 exch2_isSedge(304)=1 exch2_myFace(304)=3 exch2_mydNx(304)=510 exch2_mydNy(304)=510 exch2_nNeighbours(304)=4 exch2_neighbourId(1,304)=319 exch2_iLo(1,304)=0 exch2_iHi(1,304)=35 exch2_jLo(1,304)=52 exch2_jHi(1,304)=52 exch2_opposingSend(1,304)=2 exch2_pij(1,1,304)=1 exch2_pij(2,1,304)=0 exch2_pij(3,1,304)=0 exch2_pij(4,1,304)=1 exch2_oi(1,304)=0 exch2_oj(1,304)=0 exch2_neighbourId(2,304)=289 exch2_iLo(2,304)=0 exch2_iHi(2,304)=35 exch2_jLo(2,304)=0 exch2_jHi(2,304)=0 exch2_opposingSend(2,304)=1 exch2_pij(1,2,304)=1 exch2_pij(2,2,304)=0 exch2_pij(3,2,304)=0 exch2_pij(4,2,304)=1 exch2_oi(2,304)=0 exch2_oj(2,304)=-510 exch2_neighbourId(3,304)=305 exch2_iLo(3,304)=35 exch2_iHi(3,304)=35 exch2_jLo(3,304)=0 exch2_jHi(3,304)=52 exch2_opposingSend(3,304)=4 exch2_pij(1,3,304)=1 exch2_pij(2,3,304)=0 exch2_pij(3,3,304)=0 exch2_pij(4,3,304)=1 exch2_oi(3,304)=0 exch2_oj(3,304)=0 exch2_neighbourId(4,304)=303 exch2_iLo(4,304)=0 exch2_iHi(4,304)=0 exch2_jLo(4,304)=0 exch2_jHi(4,304)=52 exch2_opposingSend(4,304)=3 exch2_pij(1,4,304)=1 exch2_pij(2,4,304)=0 exch2_pij(3,4,304)=0 exch2_pij(4,4,304)=1 exch2_oi(4,304)=0 exch2_oj(4,304)=0 RETURN END SUBROUTINE W2_E2SETUP_305 C Topology for tile 305 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(305)=34 exch2_tNy(305)=51 exch2_tBasex(305)=136 exch2_tBasey(305)=0 exch2_txGlobalo(305)=1157 exch2_tyGlobalo(305)=1 exch2_isWedge(305)=0 exch2_isNedge(305)=0 exch2_isEedge(305)=0 exch2_isSedge(305)=1 exch2_myFace(305)=3 exch2_mydNx(305)=510 exch2_mydNy(305)=510 exch2_nNeighbours(305)=4 exch2_neighbourId(1,305)=320 exch2_iLo(1,305)=0 exch2_iHi(1,305)=35 exch2_jLo(1,305)=52 exch2_jHi(1,305)=52 exch2_opposingSend(1,305)=2 exch2_pij(1,1,305)=1 exch2_pij(2,1,305)=0 exch2_pij(3,1,305)=0 exch2_pij(4,1,305)=1 exch2_oi(1,305)=0 exch2_oj(1,305)=0 exch2_neighbourId(2,305)=290 exch2_iLo(2,305)=0 exch2_iHi(2,305)=35 exch2_jLo(2,305)=0 exch2_jHi(2,305)=0 exch2_opposingSend(2,305)=1 exch2_pij(1,2,305)=1 exch2_pij(2,2,305)=0 exch2_pij(3,2,305)=0 exch2_pij(4,2,305)=1 exch2_oi(2,305)=0 exch2_oj(2,305)=-510 exch2_neighbourId(3,305)=306 exch2_iLo(3,305)=35 exch2_iHi(3,305)=35 exch2_jLo(3,305)=0 exch2_jHi(3,305)=52 exch2_opposingSend(3,305)=4 exch2_pij(1,3,305)=1 exch2_pij(2,3,305)=0 exch2_pij(3,3,305)=0 exch2_pij(4,3,305)=1 exch2_oi(3,305)=0 exch2_oj(3,305)=0 exch2_neighbourId(4,305)=304 exch2_iLo(4,305)=0 exch2_iHi(4,305)=0 exch2_jLo(4,305)=0 exch2_jHi(4,305)=52 exch2_opposingSend(4,305)=3 exch2_pij(1,4,305)=1 exch2_pij(2,4,305)=0 exch2_pij(3,4,305)=0 exch2_pij(4,4,305)=1 exch2_oi(4,305)=0 exch2_oj(4,305)=0 RETURN END SUBROUTINE W2_E2SETUP_306 C Topology for tile 306 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(306)=34 exch2_tNy(306)=51 exch2_tBasex(306)=170 exch2_tBasey(306)=0 exch2_txGlobalo(306)=1191 exch2_tyGlobalo(306)=1 exch2_isWedge(306)=0 exch2_isNedge(306)=0 exch2_isEedge(306)=0 exch2_isSedge(306)=1 exch2_myFace(306)=3 exch2_mydNx(306)=510 exch2_mydNy(306)=510 exch2_nNeighbours(306)=4 exch2_neighbourId(1,306)=321 exch2_iLo(1,306)=0 exch2_iHi(1,306)=35 exch2_jLo(1,306)=52 exch2_jHi(1,306)=52 exch2_opposingSend(1,306)=2 exch2_pij(1,1,306)=1 exch2_pij(2,1,306)=0 exch2_pij(3,1,306)=0 exch2_pij(4,1,306)=1 exch2_oi(1,306)=0 exch2_oj(1,306)=0 exch2_neighbourId(2,306)=291 exch2_iLo(2,306)=0 exch2_iHi(2,306)=35 exch2_jLo(2,306)=0 exch2_jHi(2,306)=0 exch2_opposingSend(2,306)=1 exch2_pij(1,2,306)=1 exch2_pij(2,2,306)=0 exch2_pij(3,2,306)=0 exch2_pij(4,2,306)=1 exch2_oi(2,306)=0 exch2_oj(2,306)=-510 exch2_neighbourId(3,306)=307 exch2_iLo(3,306)=35 exch2_iHi(3,306)=35 exch2_jLo(3,306)=0 exch2_jHi(3,306)=52 exch2_opposingSend(3,306)=4 exch2_pij(1,3,306)=1 exch2_pij(2,3,306)=0 exch2_pij(3,3,306)=0 exch2_pij(4,3,306)=1 exch2_oi(3,306)=0 exch2_oj(3,306)=0 exch2_neighbourId(4,306)=305 exch2_iLo(4,306)=0 exch2_iHi(4,306)=0 exch2_jLo(4,306)=0 exch2_jHi(4,306)=52 exch2_opposingSend(4,306)=3 exch2_pij(1,4,306)=1 exch2_pij(2,4,306)=0 exch2_pij(3,4,306)=0 exch2_pij(4,4,306)=1 exch2_oi(4,306)=0 exch2_oj(4,306)=0 RETURN END SUBROUTINE W2_E2SETUP_307 C Topology for tile 307 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(307)=34 exch2_tNy(307)=51 exch2_tBasex(307)=204 exch2_tBasey(307)=0 exch2_txGlobalo(307)=1225 exch2_tyGlobalo(307)=1 exch2_isWedge(307)=0 exch2_isNedge(307)=0 exch2_isEedge(307)=0 exch2_isSedge(307)=1 exch2_myFace(307)=3 exch2_mydNx(307)=510 exch2_mydNy(307)=510 exch2_nNeighbours(307)=4 exch2_neighbourId(1,307)=322 exch2_iLo(1,307)=0 exch2_iHi(1,307)=35 exch2_jLo(1,307)=52 exch2_jHi(1,307)=52 exch2_opposingSend(1,307)=2 exch2_pij(1,1,307)=1 exch2_pij(2,1,307)=0 exch2_pij(3,1,307)=0 exch2_pij(4,1,307)=1 exch2_oi(1,307)=0 exch2_oj(1,307)=0 exch2_neighbourId(2,307)=292 exch2_iLo(2,307)=0 exch2_iHi(2,307)=35 exch2_jLo(2,307)=0 exch2_jHi(2,307)=0 exch2_opposingSend(2,307)=1 exch2_pij(1,2,307)=1 exch2_pij(2,2,307)=0 exch2_pij(3,2,307)=0 exch2_pij(4,2,307)=1 exch2_oi(2,307)=0 exch2_oj(2,307)=-510 exch2_neighbourId(3,307)=308 exch2_iLo(3,307)=35 exch2_iHi(3,307)=35 exch2_jLo(3,307)=0 exch2_jHi(3,307)=52 exch2_opposingSend(3,307)=4 exch2_pij(1,3,307)=1 exch2_pij(2,3,307)=0 exch2_pij(3,3,307)=0 exch2_pij(4,3,307)=1 exch2_oi(3,307)=0 exch2_oj(3,307)=0 exch2_neighbourId(4,307)=306 exch2_iLo(4,307)=0 exch2_iHi(4,307)=0 exch2_jLo(4,307)=0 exch2_jHi(4,307)=52 exch2_opposingSend(4,307)=3 exch2_pij(1,4,307)=1 exch2_pij(2,4,307)=0 exch2_pij(3,4,307)=0 exch2_pij(4,4,307)=1 exch2_oi(4,307)=0 exch2_oj(4,307)=0 RETURN END SUBROUTINE W2_E2SETUP_308 C Topology for tile 308 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(308)=34 exch2_tNy(308)=51 exch2_tBasex(308)=238 exch2_tBasey(308)=0 exch2_txGlobalo(308)=1259 exch2_tyGlobalo(308)=1 exch2_isWedge(308)=0 exch2_isNedge(308)=0 exch2_isEedge(308)=0 exch2_isSedge(308)=1 exch2_myFace(308)=3 exch2_mydNx(308)=510 exch2_mydNy(308)=510 exch2_nNeighbours(308)=4 exch2_neighbourId(1,308)=323 exch2_iLo(1,308)=0 exch2_iHi(1,308)=35 exch2_jLo(1,308)=52 exch2_jHi(1,308)=52 exch2_opposingSend(1,308)=2 exch2_pij(1,1,308)=1 exch2_pij(2,1,308)=0 exch2_pij(3,1,308)=0 exch2_pij(4,1,308)=1 exch2_oi(1,308)=0 exch2_oj(1,308)=0 exch2_neighbourId(2,308)=293 exch2_iLo(2,308)=0 exch2_iHi(2,308)=35 exch2_jLo(2,308)=0 exch2_jHi(2,308)=0 exch2_opposingSend(2,308)=1 exch2_pij(1,2,308)=1 exch2_pij(2,2,308)=0 exch2_pij(3,2,308)=0 exch2_pij(4,2,308)=1 exch2_oi(2,308)=0 exch2_oj(2,308)=-510 exch2_neighbourId(3,308)=309 exch2_iLo(3,308)=35 exch2_iHi(3,308)=35 exch2_jLo(3,308)=0 exch2_jHi(3,308)=52 exch2_opposingSend(3,308)=4 exch2_pij(1,3,308)=1 exch2_pij(2,3,308)=0 exch2_pij(3,3,308)=0 exch2_pij(4,3,308)=1 exch2_oi(3,308)=0 exch2_oj(3,308)=0 exch2_neighbourId(4,308)=307 exch2_iLo(4,308)=0 exch2_iHi(4,308)=0 exch2_jLo(4,308)=0 exch2_jHi(4,308)=52 exch2_opposingSend(4,308)=3 exch2_pij(1,4,308)=1 exch2_pij(2,4,308)=0 exch2_pij(3,4,308)=0 exch2_pij(4,4,308)=1 exch2_oi(4,308)=0 exch2_oj(4,308)=0 RETURN END SUBROUTINE W2_E2SETUP_309 C Topology for tile 309 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(309)=34 exch2_tNy(309)=51 exch2_tBasex(309)=272 exch2_tBasey(309)=0 exch2_txGlobalo(309)=1293 exch2_tyGlobalo(309)=1 exch2_isWedge(309)=0 exch2_isNedge(309)=0 exch2_isEedge(309)=0 exch2_isSedge(309)=1 exch2_myFace(309)=3 exch2_mydNx(309)=510 exch2_mydNy(309)=510 exch2_nNeighbours(309)=4 exch2_neighbourId(1,309)=324 exch2_iLo(1,309)=0 exch2_iHi(1,309)=35 exch2_jLo(1,309)=52 exch2_jHi(1,309)=52 exch2_opposingSend(1,309)=2 exch2_pij(1,1,309)=1 exch2_pij(2,1,309)=0 exch2_pij(3,1,309)=0 exch2_pij(4,1,309)=1 exch2_oi(1,309)=0 exch2_oj(1,309)=0 exch2_neighbourId(2,309)=294 exch2_iLo(2,309)=0 exch2_iHi(2,309)=35 exch2_jLo(2,309)=0 exch2_jHi(2,309)=0 exch2_opposingSend(2,309)=1 exch2_pij(1,2,309)=1 exch2_pij(2,2,309)=0 exch2_pij(3,2,309)=0 exch2_pij(4,2,309)=1 exch2_oi(2,309)=0 exch2_oj(2,309)=-510 exch2_neighbourId(3,309)=310 exch2_iLo(3,309)=35 exch2_iHi(3,309)=35 exch2_jLo(3,309)=0 exch2_jHi(3,309)=52 exch2_opposingSend(3,309)=4 exch2_pij(1,3,309)=1 exch2_pij(2,3,309)=0 exch2_pij(3,3,309)=0 exch2_pij(4,3,309)=1 exch2_oi(3,309)=0 exch2_oj(3,309)=0 exch2_neighbourId(4,309)=308 exch2_iLo(4,309)=0 exch2_iHi(4,309)=0 exch2_jLo(4,309)=0 exch2_jHi(4,309)=52 exch2_opposingSend(4,309)=3 exch2_pij(1,4,309)=1 exch2_pij(2,4,309)=0 exch2_pij(3,4,309)=0 exch2_pij(4,4,309)=1 exch2_oi(4,309)=0 exch2_oj(4,309)=0 RETURN END SUBROUTINE W2_E2SETUP_310 C Topology for tile 310 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(310)=34 exch2_tNy(310)=51 exch2_tBasex(310)=306 exch2_tBasey(310)=0 exch2_txGlobalo(310)=1327 exch2_tyGlobalo(310)=1 exch2_isWedge(310)=0 exch2_isNedge(310)=0 exch2_isEedge(310)=0 exch2_isSedge(310)=1 exch2_myFace(310)=3 exch2_mydNx(310)=510 exch2_mydNy(310)=510 exch2_nNeighbours(310)=4 exch2_neighbourId(1,310)=325 exch2_iLo(1,310)=0 exch2_iHi(1,310)=35 exch2_jLo(1,310)=52 exch2_jHi(1,310)=52 exch2_opposingSend(1,310)=2 exch2_pij(1,1,310)=1 exch2_pij(2,1,310)=0 exch2_pij(3,1,310)=0 exch2_pij(4,1,310)=1 exch2_oi(1,310)=0 exch2_oj(1,310)=0 exch2_neighbourId(2,310)=295 exch2_iLo(2,310)=0 exch2_iHi(2,310)=35 exch2_jLo(2,310)=0 exch2_jHi(2,310)=0 exch2_opposingSend(2,310)=1 exch2_pij(1,2,310)=1 exch2_pij(2,2,310)=0 exch2_pij(3,2,310)=0 exch2_pij(4,2,310)=1 exch2_oi(2,310)=0 exch2_oj(2,310)=-510 exch2_neighbourId(3,310)=311 exch2_iLo(3,310)=35 exch2_iHi(3,310)=35 exch2_jLo(3,310)=0 exch2_jHi(3,310)=52 exch2_opposingSend(3,310)=4 exch2_pij(1,3,310)=1 exch2_pij(2,3,310)=0 exch2_pij(3,3,310)=0 exch2_pij(4,3,310)=1 exch2_oi(3,310)=0 exch2_oj(3,310)=0 exch2_neighbourId(4,310)=309 exch2_iLo(4,310)=0 exch2_iHi(4,310)=0 exch2_jLo(4,310)=0 exch2_jHi(4,310)=52 exch2_opposingSend(4,310)=3 exch2_pij(1,4,310)=1 exch2_pij(2,4,310)=0 exch2_pij(3,4,310)=0 exch2_pij(4,4,310)=1 exch2_oi(4,310)=0 exch2_oj(4,310)=0 RETURN END SUBROUTINE W2_E2SETUP_311 C Topology for tile 311 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(311)=34 exch2_tNy(311)=51 exch2_tBasex(311)=340 exch2_tBasey(311)=0 exch2_txGlobalo(311)=1361 exch2_tyGlobalo(311)=1 exch2_isWedge(311)=0 exch2_isNedge(311)=0 exch2_isEedge(311)=0 exch2_isSedge(311)=1 exch2_myFace(311)=3 exch2_mydNx(311)=510 exch2_mydNy(311)=510 exch2_nNeighbours(311)=4 exch2_neighbourId(1,311)=326 exch2_iLo(1,311)=0 exch2_iHi(1,311)=35 exch2_jLo(1,311)=52 exch2_jHi(1,311)=52 exch2_opposingSend(1,311)=2 exch2_pij(1,1,311)=1 exch2_pij(2,1,311)=0 exch2_pij(3,1,311)=0 exch2_pij(4,1,311)=1 exch2_oi(1,311)=0 exch2_oj(1,311)=0 exch2_neighbourId(2,311)=296 exch2_iLo(2,311)=0 exch2_iHi(2,311)=35 exch2_jLo(2,311)=0 exch2_jHi(2,311)=0 exch2_opposingSend(2,311)=1 exch2_pij(1,2,311)=1 exch2_pij(2,2,311)=0 exch2_pij(3,2,311)=0 exch2_pij(4,2,311)=1 exch2_oi(2,311)=0 exch2_oj(2,311)=-510 exch2_neighbourId(3,311)=312 exch2_iLo(3,311)=35 exch2_iHi(3,311)=35 exch2_jLo(3,311)=0 exch2_jHi(3,311)=52 exch2_opposingSend(3,311)=4 exch2_pij(1,3,311)=1 exch2_pij(2,3,311)=0 exch2_pij(3,3,311)=0 exch2_pij(4,3,311)=1 exch2_oi(3,311)=0 exch2_oj(3,311)=0 exch2_neighbourId(4,311)=310 exch2_iLo(4,311)=0 exch2_iHi(4,311)=0 exch2_jLo(4,311)=0 exch2_jHi(4,311)=52 exch2_opposingSend(4,311)=3 exch2_pij(1,4,311)=1 exch2_pij(2,4,311)=0 exch2_pij(3,4,311)=0 exch2_pij(4,4,311)=1 exch2_oi(4,311)=0 exch2_oj(4,311)=0 RETURN END SUBROUTINE W2_E2SETUP_312 C Topology for tile 312 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(312)=34 exch2_tNy(312)=51 exch2_tBasex(312)=374 exch2_tBasey(312)=0 exch2_txGlobalo(312)=1395 exch2_tyGlobalo(312)=1 exch2_isWedge(312)=0 exch2_isNedge(312)=0 exch2_isEedge(312)=0 exch2_isSedge(312)=1 exch2_myFace(312)=3 exch2_mydNx(312)=510 exch2_mydNy(312)=510 exch2_nNeighbours(312)=4 exch2_neighbourId(1,312)=327 exch2_iLo(1,312)=0 exch2_iHi(1,312)=35 exch2_jLo(1,312)=52 exch2_jHi(1,312)=52 exch2_opposingSend(1,312)=2 exch2_pij(1,1,312)=1 exch2_pij(2,1,312)=0 exch2_pij(3,1,312)=0 exch2_pij(4,1,312)=1 exch2_oi(1,312)=0 exch2_oj(1,312)=0 exch2_neighbourId(2,312)=297 exch2_iLo(2,312)=0 exch2_iHi(2,312)=35 exch2_jLo(2,312)=0 exch2_jHi(2,312)=0 exch2_opposingSend(2,312)=1 exch2_pij(1,2,312)=1 exch2_pij(2,2,312)=0 exch2_pij(3,2,312)=0 exch2_pij(4,2,312)=1 exch2_oi(2,312)=0 exch2_oj(2,312)=-510 exch2_neighbourId(3,312)=313 exch2_iLo(3,312)=35 exch2_iHi(3,312)=35 exch2_jLo(3,312)=0 exch2_jHi(3,312)=52 exch2_opposingSend(3,312)=4 exch2_pij(1,3,312)=1 exch2_pij(2,3,312)=0 exch2_pij(3,3,312)=0 exch2_pij(4,3,312)=1 exch2_oi(3,312)=0 exch2_oj(3,312)=0 exch2_neighbourId(4,312)=311 exch2_iLo(4,312)=0 exch2_iHi(4,312)=0 exch2_jLo(4,312)=0 exch2_jHi(4,312)=52 exch2_opposingSend(4,312)=3 exch2_pij(1,4,312)=1 exch2_pij(2,4,312)=0 exch2_pij(3,4,312)=0 exch2_pij(4,4,312)=1 exch2_oi(4,312)=0 exch2_oj(4,312)=0 RETURN END SUBROUTINE W2_E2SETUP_313 C Topology for tile 313 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(313)=34 exch2_tNy(313)=51 exch2_tBasex(313)=408 exch2_tBasey(313)=0 exch2_txGlobalo(313)=1429 exch2_tyGlobalo(313)=1 exch2_isWedge(313)=0 exch2_isNedge(313)=0 exch2_isEedge(313)=0 exch2_isSedge(313)=1 exch2_myFace(313)=3 exch2_mydNx(313)=510 exch2_mydNy(313)=510 exch2_nNeighbours(313)=4 exch2_neighbourId(1,313)=328 exch2_iLo(1,313)=0 exch2_iHi(1,313)=35 exch2_jLo(1,313)=52 exch2_jHi(1,313)=52 exch2_opposingSend(1,313)=2 exch2_pij(1,1,313)=1 exch2_pij(2,1,313)=0 exch2_pij(3,1,313)=0 exch2_pij(4,1,313)=1 exch2_oi(1,313)=0 exch2_oj(1,313)=0 exch2_neighbourId(2,313)=298 exch2_iLo(2,313)=0 exch2_iHi(2,313)=35 exch2_jLo(2,313)=0 exch2_jHi(2,313)=0 exch2_opposingSend(2,313)=1 exch2_pij(1,2,313)=1 exch2_pij(2,2,313)=0 exch2_pij(3,2,313)=0 exch2_pij(4,2,313)=1 exch2_oi(2,313)=0 exch2_oj(2,313)=-510 exch2_neighbourId(3,313)=314 exch2_iLo(3,313)=35 exch2_iHi(3,313)=35 exch2_jLo(3,313)=0 exch2_jHi(3,313)=52 exch2_opposingSend(3,313)=4 exch2_pij(1,3,313)=1 exch2_pij(2,3,313)=0 exch2_pij(3,3,313)=0 exch2_pij(4,3,313)=1 exch2_oi(3,313)=0 exch2_oj(3,313)=0 exch2_neighbourId(4,313)=312 exch2_iLo(4,313)=0 exch2_iHi(4,313)=0 exch2_jLo(4,313)=0 exch2_jHi(4,313)=52 exch2_opposingSend(4,313)=3 exch2_pij(1,4,313)=1 exch2_pij(2,4,313)=0 exch2_pij(3,4,313)=0 exch2_pij(4,4,313)=1 exch2_oi(4,313)=0 exch2_oj(4,313)=0 RETURN END SUBROUTINE W2_E2SETUP_314 C Topology for tile 314 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(314)=34 exch2_tNy(314)=51 exch2_tBasex(314)=442 exch2_tBasey(314)=0 exch2_txGlobalo(314)=1463 exch2_tyGlobalo(314)=1 exch2_isWedge(314)=0 exch2_isNedge(314)=0 exch2_isEedge(314)=0 exch2_isSedge(314)=1 exch2_myFace(314)=3 exch2_mydNx(314)=510 exch2_mydNy(314)=510 exch2_nNeighbours(314)=4 exch2_neighbourId(1,314)=329 exch2_iLo(1,314)=0 exch2_iHi(1,314)=35 exch2_jLo(1,314)=52 exch2_jHi(1,314)=52 exch2_opposingSend(1,314)=2 exch2_pij(1,1,314)=1 exch2_pij(2,1,314)=0 exch2_pij(3,1,314)=0 exch2_pij(4,1,314)=1 exch2_oi(1,314)=0 exch2_oj(1,314)=0 exch2_neighbourId(2,314)=299 exch2_iLo(2,314)=0 exch2_iHi(2,314)=35 exch2_jLo(2,314)=0 exch2_jHi(2,314)=0 exch2_opposingSend(2,314)=1 exch2_pij(1,2,314)=1 exch2_pij(2,2,314)=0 exch2_pij(3,2,314)=0 exch2_pij(4,2,314)=1 exch2_oi(2,314)=0 exch2_oj(2,314)=-510 exch2_neighbourId(3,314)=315 exch2_iLo(3,314)=35 exch2_iHi(3,314)=35 exch2_jLo(3,314)=0 exch2_jHi(3,314)=52 exch2_opposingSend(3,314)=4 exch2_pij(1,3,314)=1 exch2_pij(2,3,314)=0 exch2_pij(3,3,314)=0 exch2_pij(4,3,314)=1 exch2_oi(3,314)=0 exch2_oj(3,314)=0 exch2_neighbourId(4,314)=313 exch2_iLo(4,314)=0 exch2_iHi(4,314)=0 exch2_jLo(4,314)=0 exch2_jHi(4,314)=52 exch2_opposingSend(4,314)=3 exch2_pij(1,4,314)=1 exch2_pij(2,4,314)=0 exch2_pij(3,4,314)=0 exch2_pij(4,4,314)=1 exch2_oi(4,314)=0 exch2_oj(4,314)=0 RETURN END SUBROUTINE W2_E2SETUP_315 C Topology for tile 315 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(315)=34 exch2_tNy(315)=51 exch2_tBasex(315)=476 exch2_tBasey(315)=0 exch2_txGlobalo(315)=1497 exch2_tyGlobalo(315)=1 exch2_isWedge(315)=0 exch2_isNedge(315)=0 exch2_isEedge(315)=1 exch2_isSedge(315)=1 exch2_myFace(315)=3 exch2_mydNx(315)=510 exch2_mydNy(315)=510 exch2_nNeighbours(315)=4 exch2_neighbourId(1,315)=330 exch2_iLo(1,315)=0 exch2_iHi(1,315)=35 exch2_jLo(1,315)=52 exch2_jHi(1,315)=52 exch2_opposingSend(1,315)=2 exch2_pij(1,1,315)=1 exch2_pij(2,1,315)=0 exch2_pij(3,1,315)=0 exch2_pij(4,1,315)=1 exch2_oi(1,315)=0 exch2_oj(1,315)=0 exch2_neighbourId(2,315)=300 exch2_iLo(2,315)=0 exch2_iHi(2,315)=35 exch2_jLo(2,315)=0 exch2_jHi(2,315)=0 exch2_opposingSend(2,315)=1 exch2_pij(1,2,315)=1 exch2_pij(2,2,315)=0 exch2_pij(3,2,315)=0 exch2_pij(4,2,315)=1 exch2_oi(2,315)=0 exch2_oj(2,315)=-510 exch2_neighbourId(3,315)=451 exch2_iLo(3,315)=35 exch2_iHi(3,315)=35 exch2_jLo(3,315)=0 exch2_jHi(3,315)=52 exch2_opposingSend(3,315)=4 exch2_pij(1,3,315)=1 exch2_pij(2,3,315)=0 exch2_pij(3,3,315)=0 exch2_pij(4,3,315)=1 exch2_oi(3,315)=510 exch2_oj(3,315)=0 exch2_neighbourId(4,315)=314 exch2_iLo(4,315)=0 exch2_iHi(4,315)=0 exch2_jLo(4,315)=0 exch2_jHi(4,315)=52 exch2_opposingSend(4,315)=3 exch2_pij(1,4,315)=1 exch2_pij(2,4,315)=0 exch2_pij(3,4,315)=0 exch2_pij(4,4,315)=1 exch2_oi(4,315)=0 exch2_oj(4,315)=0 RETURN END SUBROUTINE W2_E2SETUP_316 C Topology for tile 316 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(316)=34 exch2_tNy(316)=51 exch2_tBasex(316)=0 exch2_tBasey(316)=51 exch2_txGlobalo(316)=1021 exch2_tyGlobalo(316)=52 exch2_isWedge(316)=1 exch2_isNedge(316)=0 exch2_isEedge(316)=0 exch2_isSedge(316)=0 exch2_myFace(316)=3 exch2_mydNx(316)=510 exch2_mydNy(316)=510 exch2_nNeighbours(316)=5 exch2_neighbourId(1,316)=331 exch2_iLo(1,316)=0 exch2_iHi(1,316)=35 exch2_jLo(1,316)=52 exch2_jHi(1,316)=52 exch2_opposingSend(1,316)=2 exch2_pij(1,1,316)=1 exch2_pij(2,1,316)=0 exch2_pij(3,1,316)=0 exch2_pij(4,1,316)=1 exch2_oi(1,316)=0 exch2_oj(1,316)=0 exch2_neighbourId(2,316)=301 exch2_iLo(2,316)=0 exch2_iHi(2,316)=35 exch2_jLo(2,316)=0 exch2_jHi(2,316)=0 exch2_opposingSend(2,316)=1 exch2_pij(1,2,316)=1 exch2_pij(2,2,316)=0 exch2_pij(3,2,316)=0 exch2_pij(4,2,316)=1 exch2_oi(2,316)=0 exch2_oj(2,316)=0 exch2_neighbourId(3,316)=317 exch2_iLo(3,316)=35 exch2_iHi(3,316)=35 exch2_jLo(3,316)=0 exch2_jHi(3,316)=52 exch2_opposingSend(3,316)=4 exch2_pij(1,3,316)=1 exch2_pij(2,3,316)=0 exch2_pij(3,3,316)=0 exch2_pij(4,3,316)=1 exch2_oi(3,316)=0 exch2_oj(3,316)=0 exch2_neighbourId(4,316)=148 exch2_iLo(4,316)=0 exch2_iHi(4,316)=0 exch2_jLo(4,316)=17 exch2_jHi(4,316)=52 exch2_opposingSend(4,316)=1 exch2_pij(1,4,316)=0 exch2_pij(2,4,316)=1 exch2_pij(3,4,316)=-1 exch2_pij(4,4,316)=0 exch2_oi(4,316)=-510 exch2_oj(4,316)=511 exch2_neighbourId(5,316)=149 exch2_iLo(5,316)=0 exch2_iHi(5,316)=0 exch2_jLo(5,316)=0 exch2_jHi(5,316)=18 exch2_opposingSend(5,316)=2 exch2_pij(1,5,316)=0 exch2_pij(2,5,316)=1 exch2_pij(3,5,316)=-1 exch2_pij(4,5,316)=0 exch2_oi(5,316)=-510 exch2_oj(5,316)=511 RETURN END SUBROUTINE W2_E2SETUP_317 C Topology for tile 317 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(317)=34 exch2_tNy(317)=51 exch2_tBasex(317)=34 exch2_tBasey(317)=51 exch2_txGlobalo(317)=1055 exch2_tyGlobalo(317)=52 exch2_isWedge(317)=0 exch2_isNedge(317)=0 exch2_isEedge(317)=0 exch2_isSedge(317)=0 exch2_myFace(317)=3 exch2_mydNx(317)=510 exch2_mydNy(317)=510 exch2_nNeighbours(317)=4 exch2_neighbourId(1,317)=332 exch2_iLo(1,317)=0 exch2_iHi(1,317)=35 exch2_jLo(1,317)=52 exch2_jHi(1,317)=52 exch2_opposingSend(1,317)=2 exch2_pij(1,1,317)=1 exch2_pij(2,1,317)=0 exch2_pij(3,1,317)=0 exch2_pij(4,1,317)=1 exch2_oi(1,317)=0 exch2_oj(1,317)=0 exch2_neighbourId(2,317)=302 exch2_iLo(2,317)=0 exch2_iHi(2,317)=35 exch2_jLo(2,317)=0 exch2_jHi(2,317)=0 exch2_opposingSend(2,317)=1 exch2_pij(1,2,317)=1 exch2_pij(2,2,317)=0 exch2_pij(3,2,317)=0 exch2_pij(4,2,317)=1 exch2_oi(2,317)=0 exch2_oj(2,317)=0 exch2_neighbourId(3,317)=318 exch2_iLo(3,317)=35 exch2_iHi(3,317)=35 exch2_jLo(3,317)=0 exch2_jHi(3,317)=52 exch2_opposingSend(3,317)=4 exch2_pij(1,3,317)=1 exch2_pij(2,3,317)=0 exch2_pij(3,3,317)=0 exch2_pij(4,3,317)=1 exch2_oi(3,317)=0 exch2_oj(3,317)=0 exch2_neighbourId(4,317)=316 exch2_iLo(4,317)=0 exch2_iHi(4,317)=0 exch2_jLo(4,317)=0 exch2_jHi(4,317)=52 exch2_opposingSend(4,317)=3 exch2_pij(1,4,317)=1 exch2_pij(2,4,317)=0 exch2_pij(3,4,317)=0 exch2_pij(4,4,317)=1 exch2_oi(4,317)=0 exch2_oj(4,317)=0 RETURN END SUBROUTINE W2_E2SETUP_318 C Topology for tile 318 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(318)=34 exch2_tNy(318)=51 exch2_tBasex(318)=68 exch2_tBasey(318)=51 exch2_txGlobalo(318)=1089 exch2_tyGlobalo(318)=52 exch2_isWedge(318)=0 exch2_isNedge(318)=0 exch2_isEedge(318)=0 exch2_isSedge(318)=0 exch2_myFace(318)=3 exch2_mydNx(318)=510 exch2_mydNy(318)=510 exch2_nNeighbours(318)=4 exch2_neighbourId(1,318)=333 exch2_iLo(1,318)=0 exch2_iHi(1,318)=35 exch2_jLo(1,318)=52 exch2_jHi(1,318)=52 exch2_opposingSend(1,318)=2 exch2_pij(1,1,318)=1 exch2_pij(2,1,318)=0 exch2_pij(3,1,318)=0 exch2_pij(4,1,318)=1 exch2_oi(1,318)=0 exch2_oj(1,318)=0 exch2_neighbourId(2,318)=303 exch2_iLo(2,318)=0 exch2_iHi(2,318)=35 exch2_jLo(2,318)=0 exch2_jHi(2,318)=0 exch2_opposingSend(2,318)=1 exch2_pij(1,2,318)=1 exch2_pij(2,2,318)=0 exch2_pij(3,2,318)=0 exch2_pij(4,2,318)=1 exch2_oi(2,318)=0 exch2_oj(2,318)=0 exch2_neighbourId(3,318)=319 exch2_iLo(3,318)=35 exch2_iHi(3,318)=35 exch2_jLo(3,318)=0 exch2_jHi(3,318)=52 exch2_opposingSend(3,318)=4 exch2_pij(1,3,318)=1 exch2_pij(2,3,318)=0 exch2_pij(3,3,318)=0 exch2_pij(4,3,318)=1 exch2_oi(3,318)=0 exch2_oj(3,318)=0 exch2_neighbourId(4,318)=317 exch2_iLo(4,318)=0 exch2_iHi(4,318)=0 exch2_jLo(4,318)=0 exch2_jHi(4,318)=52 exch2_opposingSend(4,318)=3 exch2_pij(1,4,318)=1 exch2_pij(2,4,318)=0 exch2_pij(3,4,318)=0 exch2_pij(4,4,318)=1 exch2_oi(4,318)=0 exch2_oj(4,318)=0 RETURN END SUBROUTINE W2_E2SETUP_319 C Topology for tile 319 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(319)=34 exch2_tNy(319)=51 exch2_tBasex(319)=102 exch2_tBasey(319)=51 exch2_txGlobalo(319)=1123 exch2_tyGlobalo(319)=52 exch2_isWedge(319)=0 exch2_isNedge(319)=0 exch2_isEedge(319)=0 exch2_isSedge(319)=0 exch2_myFace(319)=3 exch2_mydNx(319)=510 exch2_mydNy(319)=510 exch2_nNeighbours(319)=4 exch2_neighbourId(1,319)=334 exch2_iLo(1,319)=0 exch2_iHi(1,319)=35 exch2_jLo(1,319)=52 exch2_jHi(1,319)=52 exch2_opposingSend(1,319)=2 exch2_pij(1,1,319)=1 exch2_pij(2,1,319)=0 exch2_pij(3,1,319)=0 exch2_pij(4,1,319)=1 exch2_oi(1,319)=0 exch2_oj(1,319)=0 exch2_neighbourId(2,319)=304 exch2_iLo(2,319)=0 exch2_iHi(2,319)=35 exch2_jLo(2,319)=0 exch2_jHi(2,319)=0 exch2_opposingSend(2,319)=1 exch2_pij(1,2,319)=1 exch2_pij(2,2,319)=0 exch2_pij(3,2,319)=0 exch2_pij(4,2,319)=1 exch2_oi(2,319)=0 exch2_oj(2,319)=0 exch2_neighbourId(3,319)=320 exch2_iLo(3,319)=35 exch2_iHi(3,319)=35 exch2_jLo(3,319)=0 exch2_jHi(3,319)=52 exch2_opposingSend(3,319)=4 exch2_pij(1,3,319)=1 exch2_pij(2,3,319)=0 exch2_pij(3,3,319)=0 exch2_pij(4,3,319)=1 exch2_oi(3,319)=0 exch2_oj(3,319)=0 exch2_neighbourId(4,319)=318 exch2_iLo(4,319)=0 exch2_iHi(4,319)=0 exch2_jLo(4,319)=0 exch2_jHi(4,319)=52 exch2_opposingSend(4,319)=3 exch2_pij(1,4,319)=1 exch2_pij(2,4,319)=0 exch2_pij(3,4,319)=0 exch2_pij(4,4,319)=1 exch2_oi(4,319)=0 exch2_oj(4,319)=0 RETURN END SUBROUTINE W2_E2SETUP_320 C Topology for tile 320 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(320)=34 exch2_tNy(320)=51 exch2_tBasex(320)=136 exch2_tBasey(320)=51 exch2_txGlobalo(320)=1157 exch2_tyGlobalo(320)=52 exch2_isWedge(320)=0 exch2_isNedge(320)=0 exch2_isEedge(320)=0 exch2_isSedge(320)=0 exch2_myFace(320)=3 exch2_mydNx(320)=510 exch2_mydNy(320)=510 exch2_nNeighbours(320)=4 exch2_neighbourId(1,320)=335 exch2_iLo(1,320)=0 exch2_iHi(1,320)=35 exch2_jLo(1,320)=52 exch2_jHi(1,320)=52 exch2_opposingSend(1,320)=2 exch2_pij(1,1,320)=1 exch2_pij(2,1,320)=0 exch2_pij(3,1,320)=0 exch2_pij(4,1,320)=1 exch2_oi(1,320)=0 exch2_oj(1,320)=0 exch2_neighbourId(2,320)=305 exch2_iLo(2,320)=0 exch2_iHi(2,320)=35 exch2_jLo(2,320)=0 exch2_jHi(2,320)=0 exch2_opposingSend(2,320)=1 exch2_pij(1,2,320)=1 exch2_pij(2,2,320)=0 exch2_pij(3,2,320)=0 exch2_pij(4,2,320)=1 exch2_oi(2,320)=0 exch2_oj(2,320)=0 exch2_neighbourId(3,320)=321 exch2_iLo(3,320)=35 exch2_iHi(3,320)=35 exch2_jLo(3,320)=0 exch2_jHi(3,320)=52 exch2_opposingSend(3,320)=4 exch2_pij(1,3,320)=1 exch2_pij(2,3,320)=0 exch2_pij(3,3,320)=0 exch2_pij(4,3,320)=1 exch2_oi(3,320)=0 exch2_oj(3,320)=0 exch2_neighbourId(4,320)=319 exch2_iLo(4,320)=0 exch2_iHi(4,320)=0 exch2_jLo(4,320)=0 exch2_jHi(4,320)=52 exch2_opposingSend(4,320)=3 exch2_pij(1,4,320)=1 exch2_pij(2,4,320)=0 exch2_pij(3,4,320)=0 exch2_pij(4,4,320)=1 exch2_oi(4,320)=0 exch2_oj(4,320)=0 RETURN END SUBROUTINE W2_E2SETUP_321 C Topology for tile 321 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(321)=34 exch2_tNy(321)=51 exch2_tBasex(321)=170 exch2_tBasey(321)=51 exch2_txGlobalo(321)=1191 exch2_tyGlobalo(321)=52 exch2_isWedge(321)=0 exch2_isNedge(321)=0 exch2_isEedge(321)=0 exch2_isSedge(321)=0 exch2_myFace(321)=3 exch2_mydNx(321)=510 exch2_mydNy(321)=510 exch2_nNeighbours(321)=4 exch2_neighbourId(1,321)=336 exch2_iLo(1,321)=0 exch2_iHi(1,321)=35 exch2_jLo(1,321)=52 exch2_jHi(1,321)=52 exch2_opposingSend(1,321)=2 exch2_pij(1,1,321)=1 exch2_pij(2,1,321)=0 exch2_pij(3,1,321)=0 exch2_pij(4,1,321)=1 exch2_oi(1,321)=0 exch2_oj(1,321)=0 exch2_neighbourId(2,321)=306 exch2_iLo(2,321)=0 exch2_iHi(2,321)=35 exch2_jLo(2,321)=0 exch2_jHi(2,321)=0 exch2_opposingSend(2,321)=1 exch2_pij(1,2,321)=1 exch2_pij(2,2,321)=0 exch2_pij(3,2,321)=0 exch2_pij(4,2,321)=1 exch2_oi(2,321)=0 exch2_oj(2,321)=0 exch2_neighbourId(3,321)=322 exch2_iLo(3,321)=35 exch2_iHi(3,321)=35 exch2_jLo(3,321)=0 exch2_jHi(3,321)=52 exch2_opposingSend(3,321)=4 exch2_pij(1,3,321)=1 exch2_pij(2,3,321)=0 exch2_pij(3,3,321)=0 exch2_pij(4,3,321)=1 exch2_oi(3,321)=0 exch2_oj(3,321)=0 exch2_neighbourId(4,321)=320 exch2_iLo(4,321)=0 exch2_iHi(4,321)=0 exch2_jLo(4,321)=0 exch2_jHi(4,321)=52 exch2_opposingSend(4,321)=3 exch2_pij(1,4,321)=1 exch2_pij(2,4,321)=0 exch2_pij(3,4,321)=0 exch2_pij(4,4,321)=1 exch2_oi(4,321)=0 exch2_oj(4,321)=0 RETURN END SUBROUTINE W2_E2SETUP_322 C Topology for tile 322 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(322)=34 exch2_tNy(322)=51 exch2_tBasex(322)=204 exch2_tBasey(322)=51 exch2_txGlobalo(322)=1225 exch2_tyGlobalo(322)=52 exch2_isWedge(322)=0 exch2_isNedge(322)=0 exch2_isEedge(322)=0 exch2_isSedge(322)=0 exch2_myFace(322)=3 exch2_mydNx(322)=510 exch2_mydNy(322)=510 exch2_nNeighbours(322)=4 exch2_neighbourId(1,322)=337 exch2_iLo(1,322)=0 exch2_iHi(1,322)=35 exch2_jLo(1,322)=52 exch2_jHi(1,322)=52 exch2_opposingSend(1,322)=2 exch2_pij(1,1,322)=1 exch2_pij(2,1,322)=0 exch2_pij(3,1,322)=0 exch2_pij(4,1,322)=1 exch2_oi(1,322)=0 exch2_oj(1,322)=0 exch2_neighbourId(2,322)=307 exch2_iLo(2,322)=0 exch2_iHi(2,322)=35 exch2_jLo(2,322)=0 exch2_jHi(2,322)=0 exch2_opposingSend(2,322)=1 exch2_pij(1,2,322)=1 exch2_pij(2,2,322)=0 exch2_pij(3,2,322)=0 exch2_pij(4,2,322)=1 exch2_oi(2,322)=0 exch2_oj(2,322)=0 exch2_neighbourId(3,322)=323 exch2_iLo(3,322)=35 exch2_iHi(3,322)=35 exch2_jLo(3,322)=0 exch2_jHi(3,322)=52 exch2_opposingSend(3,322)=4 exch2_pij(1,3,322)=1 exch2_pij(2,3,322)=0 exch2_pij(3,3,322)=0 exch2_pij(4,3,322)=1 exch2_oi(3,322)=0 exch2_oj(3,322)=0 exch2_neighbourId(4,322)=321 exch2_iLo(4,322)=0 exch2_iHi(4,322)=0 exch2_jLo(4,322)=0 exch2_jHi(4,322)=52 exch2_opposingSend(4,322)=3 exch2_pij(1,4,322)=1 exch2_pij(2,4,322)=0 exch2_pij(3,4,322)=0 exch2_pij(4,4,322)=1 exch2_oi(4,322)=0 exch2_oj(4,322)=0 RETURN END SUBROUTINE W2_E2SETUP_323 C Topology for tile 323 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(323)=34 exch2_tNy(323)=51 exch2_tBasex(323)=238 exch2_tBasey(323)=51 exch2_txGlobalo(323)=1259 exch2_tyGlobalo(323)=52 exch2_isWedge(323)=0 exch2_isNedge(323)=0 exch2_isEedge(323)=0 exch2_isSedge(323)=0 exch2_myFace(323)=3 exch2_mydNx(323)=510 exch2_mydNy(323)=510 exch2_nNeighbours(323)=4 exch2_neighbourId(1,323)=338 exch2_iLo(1,323)=0 exch2_iHi(1,323)=35 exch2_jLo(1,323)=52 exch2_jHi(1,323)=52 exch2_opposingSend(1,323)=2 exch2_pij(1,1,323)=1 exch2_pij(2,1,323)=0 exch2_pij(3,1,323)=0 exch2_pij(4,1,323)=1 exch2_oi(1,323)=0 exch2_oj(1,323)=0 exch2_neighbourId(2,323)=308 exch2_iLo(2,323)=0 exch2_iHi(2,323)=35 exch2_jLo(2,323)=0 exch2_jHi(2,323)=0 exch2_opposingSend(2,323)=1 exch2_pij(1,2,323)=1 exch2_pij(2,2,323)=0 exch2_pij(3,2,323)=0 exch2_pij(4,2,323)=1 exch2_oi(2,323)=0 exch2_oj(2,323)=0 exch2_neighbourId(3,323)=324 exch2_iLo(3,323)=35 exch2_iHi(3,323)=35 exch2_jLo(3,323)=0 exch2_jHi(3,323)=52 exch2_opposingSend(3,323)=4 exch2_pij(1,3,323)=1 exch2_pij(2,3,323)=0 exch2_pij(3,3,323)=0 exch2_pij(4,3,323)=1 exch2_oi(3,323)=0 exch2_oj(3,323)=0 exch2_neighbourId(4,323)=322 exch2_iLo(4,323)=0 exch2_iHi(4,323)=0 exch2_jLo(4,323)=0 exch2_jHi(4,323)=52 exch2_opposingSend(4,323)=3 exch2_pij(1,4,323)=1 exch2_pij(2,4,323)=0 exch2_pij(3,4,323)=0 exch2_pij(4,4,323)=1 exch2_oi(4,323)=0 exch2_oj(4,323)=0 RETURN END SUBROUTINE W2_E2SETUP_324 C Topology for tile 324 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(324)=34 exch2_tNy(324)=51 exch2_tBasex(324)=272 exch2_tBasey(324)=51 exch2_txGlobalo(324)=1293 exch2_tyGlobalo(324)=52 exch2_isWedge(324)=0 exch2_isNedge(324)=0 exch2_isEedge(324)=0 exch2_isSedge(324)=0 exch2_myFace(324)=3 exch2_mydNx(324)=510 exch2_mydNy(324)=510 exch2_nNeighbours(324)=4 exch2_neighbourId(1,324)=339 exch2_iLo(1,324)=0 exch2_iHi(1,324)=35 exch2_jLo(1,324)=52 exch2_jHi(1,324)=52 exch2_opposingSend(1,324)=2 exch2_pij(1,1,324)=1 exch2_pij(2,1,324)=0 exch2_pij(3,1,324)=0 exch2_pij(4,1,324)=1 exch2_oi(1,324)=0 exch2_oj(1,324)=0 exch2_neighbourId(2,324)=309 exch2_iLo(2,324)=0 exch2_iHi(2,324)=35 exch2_jLo(2,324)=0 exch2_jHi(2,324)=0 exch2_opposingSend(2,324)=1 exch2_pij(1,2,324)=1 exch2_pij(2,2,324)=0 exch2_pij(3,2,324)=0 exch2_pij(4,2,324)=1 exch2_oi(2,324)=0 exch2_oj(2,324)=0 exch2_neighbourId(3,324)=325 exch2_iLo(3,324)=35 exch2_iHi(3,324)=35 exch2_jLo(3,324)=0 exch2_jHi(3,324)=52 exch2_opposingSend(3,324)=4 exch2_pij(1,3,324)=1 exch2_pij(2,3,324)=0 exch2_pij(3,3,324)=0 exch2_pij(4,3,324)=1 exch2_oi(3,324)=0 exch2_oj(3,324)=0 exch2_neighbourId(4,324)=323 exch2_iLo(4,324)=0 exch2_iHi(4,324)=0 exch2_jLo(4,324)=0 exch2_jHi(4,324)=52 exch2_opposingSend(4,324)=3 exch2_pij(1,4,324)=1 exch2_pij(2,4,324)=0 exch2_pij(3,4,324)=0 exch2_pij(4,4,324)=1 exch2_oi(4,324)=0 exch2_oj(4,324)=0 RETURN END SUBROUTINE W2_E2SETUP_325 C Topology for tile 325 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(325)=34 exch2_tNy(325)=51 exch2_tBasex(325)=306 exch2_tBasey(325)=51 exch2_txGlobalo(325)=1327 exch2_tyGlobalo(325)=52 exch2_isWedge(325)=0 exch2_isNedge(325)=0 exch2_isEedge(325)=0 exch2_isSedge(325)=0 exch2_myFace(325)=3 exch2_mydNx(325)=510 exch2_mydNy(325)=510 exch2_nNeighbours(325)=4 exch2_neighbourId(1,325)=340 exch2_iLo(1,325)=0 exch2_iHi(1,325)=35 exch2_jLo(1,325)=52 exch2_jHi(1,325)=52 exch2_opposingSend(1,325)=2 exch2_pij(1,1,325)=1 exch2_pij(2,1,325)=0 exch2_pij(3,1,325)=0 exch2_pij(4,1,325)=1 exch2_oi(1,325)=0 exch2_oj(1,325)=0 exch2_neighbourId(2,325)=310 exch2_iLo(2,325)=0 exch2_iHi(2,325)=35 exch2_jLo(2,325)=0 exch2_jHi(2,325)=0 exch2_opposingSend(2,325)=1 exch2_pij(1,2,325)=1 exch2_pij(2,2,325)=0 exch2_pij(3,2,325)=0 exch2_pij(4,2,325)=1 exch2_oi(2,325)=0 exch2_oj(2,325)=0 exch2_neighbourId(3,325)=326 exch2_iLo(3,325)=35 exch2_iHi(3,325)=35 exch2_jLo(3,325)=0 exch2_jHi(3,325)=52 exch2_opposingSend(3,325)=4 exch2_pij(1,3,325)=1 exch2_pij(2,3,325)=0 exch2_pij(3,3,325)=0 exch2_pij(4,3,325)=1 exch2_oi(3,325)=0 exch2_oj(3,325)=0 exch2_neighbourId(4,325)=324 exch2_iLo(4,325)=0 exch2_iHi(4,325)=0 exch2_jLo(4,325)=0 exch2_jHi(4,325)=52 exch2_opposingSend(4,325)=3 exch2_pij(1,4,325)=1 exch2_pij(2,4,325)=0 exch2_pij(3,4,325)=0 exch2_pij(4,4,325)=1 exch2_oi(4,325)=0 exch2_oj(4,325)=0 RETURN END SUBROUTINE W2_E2SETUP_326 C Topology for tile 326 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(326)=34 exch2_tNy(326)=51 exch2_tBasex(326)=340 exch2_tBasey(326)=51 exch2_txGlobalo(326)=1361 exch2_tyGlobalo(326)=52 exch2_isWedge(326)=0 exch2_isNedge(326)=0 exch2_isEedge(326)=0 exch2_isSedge(326)=0 exch2_myFace(326)=3 exch2_mydNx(326)=510 exch2_mydNy(326)=510 exch2_nNeighbours(326)=4 exch2_neighbourId(1,326)=341 exch2_iLo(1,326)=0 exch2_iHi(1,326)=35 exch2_jLo(1,326)=52 exch2_jHi(1,326)=52 exch2_opposingSend(1,326)=2 exch2_pij(1,1,326)=1 exch2_pij(2,1,326)=0 exch2_pij(3,1,326)=0 exch2_pij(4,1,326)=1 exch2_oi(1,326)=0 exch2_oj(1,326)=0 exch2_neighbourId(2,326)=311 exch2_iLo(2,326)=0 exch2_iHi(2,326)=35 exch2_jLo(2,326)=0 exch2_jHi(2,326)=0 exch2_opposingSend(2,326)=1 exch2_pij(1,2,326)=1 exch2_pij(2,2,326)=0 exch2_pij(3,2,326)=0 exch2_pij(4,2,326)=1 exch2_oi(2,326)=0 exch2_oj(2,326)=0 exch2_neighbourId(3,326)=327 exch2_iLo(3,326)=35 exch2_iHi(3,326)=35 exch2_jLo(3,326)=0 exch2_jHi(3,326)=52 exch2_opposingSend(3,326)=4 exch2_pij(1,3,326)=1 exch2_pij(2,3,326)=0 exch2_pij(3,3,326)=0 exch2_pij(4,3,326)=1 exch2_oi(3,326)=0 exch2_oj(3,326)=0 exch2_neighbourId(4,326)=325 exch2_iLo(4,326)=0 exch2_iHi(4,326)=0 exch2_jLo(4,326)=0 exch2_jHi(4,326)=52 exch2_opposingSend(4,326)=3 exch2_pij(1,4,326)=1 exch2_pij(2,4,326)=0 exch2_pij(3,4,326)=0 exch2_pij(4,4,326)=1 exch2_oi(4,326)=0 exch2_oj(4,326)=0 RETURN END SUBROUTINE W2_E2SETUP_327 C Topology for tile 327 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(327)=34 exch2_tNy(327)=51 exch2_tBasex(327)=374 exch2_tBasey(327)=51 exch2_txGlobalo(327)=1395 exch2_tyGlobalo(327)=52 exch2_isWedge(327)=0 exch2_isNedge(327)=0 exch2_isEedge(327)=0 exch2_isSedge(327)=0 exch2_myFace(327)=3 exch2_mydNx(327)=510 exch2_mydNy(327)=510 exch2_nNeighbours(327)=4 exch2_neighbourId(1,327)=342 exch2_iLo(1,327)=0 exch2_iHi(1,327)=35 exch2_jLo(1,327)=52 exch2_jHi(1,327)=52 exch2_opposingSend(1,327)=2 exch2_pij(1,1,327)=1 exch2_pij(2,1,327)=0 exch2_pij(3,1,327)=0 exch2_pij(4,1,327)=1 exch2_oi(1,327)=0 exch2_oj(1,327)=0 exch2_neighbourId(2,327)=312 exch2_iLo(2,327)=0 exch2_iHi(2,327)=35 exch2_jLo(2,327)=0 exch2_jHi(2,327)=0 exch2_opposingSend(2,327)=1 exch2_pij(1,2,327)=1 exch2_pij(2,2,327)=0 exch2_pij(3,2,327)=0 exch2_pij(4,2,327)=1 exch2_oi(2,327)=0 exch2_oj(2,327)=0 exch2_neighbourId(3,327)=328 exch2_iLo(3,327)=35 exch2_iHi(3,327)=35 exch2_jLo(3,327)=0 exch2_jHi(3,327)=52 exch2_opposingSend(3,327)=4 exch2_pij(1,3,327)=1 exch2_pij(2,3,327)=0 exch2_pij(3,3,327)=0 exch2_pij(4,3,327)=1 exch2_oi(3,327)=0 exch2_oj(3,327)=0 exch2_neighbourId(4,327)=326 exch2_iLo(4,327)=0 exch2_iHi(4,327)=0 exch2_jLo(4,327)=0 exch2_jHi(4,327)=52 exch2_opposingSend(4,327)=3 exch2_pij(1,4,327)=1 exch2_pij(2,4,327)=0 exch2_pij(3,4,327)=0 exch2_pij(4,4,327)=1 exch2_oi(4,327)=0 exch2_oj(4,327)=0 RETURN END SUBROUTINE W2_E2SETUP_328 C Topology for tile 328 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(328)=34 exch2_tNy(328)=51 exch2_tBasex(328)=408 exch2_tBasey(328)=51 exch2_txGlobalo(328)=1429 exch2_tyGlobalo(328)=52 exch2_isWedge(328)=0 exch2_isNedge(328)=0 exch2_isEedge(328)=0 exch2_isSedge(328)=0 exch2_myFace(328)=3 exch2_mydNx(328)=510 exch2_mydNy(328)=510 exch2_nNeighbours(328)=4 exch2_neighbourId(1,328)=343 exch2_iLo(1,328)=0 exch2_iHi(1,328)=35 exch2_jLo(1,328)=52 exch2_jHi(1,328)=52 exch2_opposingSend(1,328)=2 exch2_pij(1,1,328)=1 exch2_pij(2,1,328)=0 exch2_pij(3,1,328)=0 exch2_pij(4,1,328)=1 exch2_oi(1,328)=0 exch2_oj(1,328)=0 exch2_neighbourId(2,328)=313 exch2_iLo(2,328)=0 exch2_iHi(2,328)=35 exch2_jLo(2,328)=0 exch2_jHi(2,328)=0 exch2_opposingSend(2,328)=1 exch2_pij(1,2,328)=1 exch2_pij(2,2,328)=0 exch2_pij(3,2,328)=0 exch2_pij(4,2,328)=1 exch2_oi(2,328)=0 exch2_oj(2,328)=0 exch2_neighbourId(3,328)=329 exch2_iLo(3,328)=35 exch2_iHi(3,328)=35 exch2_jLo(3,328)=0 exch2_jHi(3,328)=52 exch2_opposingSend(3,328)=4 exch2_pij(1,3,328)=1 exch2_pij(2,3,328)=0 exch2_pij(3,3,328)=0 exch2_pij(4,3,328)=1 exch2_oi(3,328)=0 exch2_oj(3,328)=0 exch2_neighbourId(4,328)=327 exch2_iLo(4,328)=0 exch2_iHi(4,328)=0 exch2_jLo(4,328)=0 exch2_jHi(4,328)=52 exch2_opposingSend(4,328)=3 exch2_pij(1,4,328)=1 exch2_pij(2,4,328)=0 exch2_pij(3,4,328)=0 exch2_pij(4,4,328)=1 exch2_oi(4,328)=0 exch2_oj(4,328)=0 RETURN END SUBROUTINE W2_E2SETUP_329 C Topology for tile 329 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(329)=34 exch2_tNy(329)=51 exch2_tBasex(329)=442 exch2_tBasey(329)=51 exch2_txGlobalo(329)=1463 exch2_tyGlobalo(329)=52 exch2_isWedge(329)=0 exch2_isNedge(329)=0 exch2_isEedge(329)=0 exch2_isSedge(329)=0 exch2_myFace(329)=3 exch2_mydNx(329)=510 exch2_mydNy(329)=510 exch2_nNeighbours(329)=4 exch2_neighbourId(1,329)=344 exch2_iLo(1,329)=0 exch2_iHi(1,329)=35 exch2_jLo(1,329)=52 exch2_jHi(1,329)=52 exch2_opposingSend(1,329)=2 exch2_pij(1,1,329)=1 exch2_pij(2,1,329)=0 exch2_pij(3,1,329)=0 exch2_pij(4,1,329)=1 exch2_oi(1,329)=0 exch2_oj(1,329)=0 exch2_neighbourId(2,329)=314 exch2_iLo(2,329)=0 exch2_iHi(2,329)=35 exch2_jLo(2,329)=0 exch2_jHi(2,329)=0 exch2_opposingSend(2,329)=1 exch2_pij(1,2,329)=1 exch2_pij(2,2,329)=0 exch2_pij(3,2,329)=0 exch2_pij(4,2,329)=1 exch2_oi(2,329)=0 exch2_oj(2,329)=0 exch2_neighbourId(3,329)=330 exch2_iLo(3,329)=35 exch2_iHi(3,329)=35 exch2_jLo(3,329)=0 exch2_jHi(3,329)=52 exch2_opposingSend(3,329)=4 exch2_pij(1,3,329)=1 exch2_pij(2,3,329)=0 exch2_pij(3,3,329)=0 exch2_pij(4,3,329)=1 exch2_oi(3,329)=0 exch2_oj(3,329)=0 exch2_neighbourId(4,329)=328 exch2_iLo(4,329)=0 exch2_iHi(4,329)=0 exch2_jLo(4,329)=0 exch2_jHi(4,329)=52 exch2_opposingSend(4,329)=3 exch2_pij(1,4,329)=1 exch2_pij(2,4,329)=0 exch2_pij(3,4,329)=0 exch2_pij(4,4,329)=1 exch2_oi(4,329)=0 exch2_oj(4,329)=0 RETURN END SUBROUTINE W2_E2SETUP_330 C Topology for tile 330 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(330)=34 exch2_tNy(330)=51 exch2_tBasex(330)=476 exch2_tBasey(330)=51 exch2_txGlobalo(330)=1497 exch2_tyGlobalo(330)=52 exch2_isWedge(330)=0 exch2_isNedge(330)=0 exch2_isEedge(330)=1 exch2_isSedge(330)=0 exch2_myFace(330)=3 exch2_mydNx(330)=510 exch2_mydNy(330)=510 exch2_nNeighbours(330)=4 exch2_neighbourId(1,330)=345 exch2_iLo(1,330)=0 exch2_iHi(1,330)=35 exch2_jLo(1,330)=52 exch2_jHi(1,330)=52 exch2_opposingSend(1,330)=2 exch2_pij(1,1,330)=1 exch2_pij(2,1,330)=0 exch2_pij(3,1,330)=0 exch2_pij(4,1,330)=1 exch2_oi(1,330)=0 exch2_oj(1,330)=0 exch2_neighbourId(2,330)=315 exch2_iLo(2,330)=0 exch2_iHi(2,330)=35 exch2_jLo(2,330)=0 exch2_jHi(2,330)=0 exch2_opposingSend(2,330)=1 exch2_pij(1,2,330)=1 exch2_pij(2,2,330)=0 exch2_pij(3,2,330)=0 exch2_pij(4,2,330)=1 exch2_oi(2,330)=0 exch2_oj(2,330)=0 exch2_neighbourId(3,330)=466 exch2_iLo(3,330)=35 exch2_iHi(3,330)=35 exch2_jLo(3,330)=0 exch2_jHi(3,330)=52 exch2_opposingSend(3,330)=4 exch2_pij(1,3,330)=1 exch2_pij(2,3,330)=0 exch2_pij(3,3,330)=0 exch2_pij(4,3,330)=1 exch2_oi(3,330)=510 exch2_oj(3,330)=0 exch2_neighbourId(4,330)=329 exch2_iLo(4,330)=0 exch2_iHi(4,330)=0 exch2_jLo(4,330)=0 exch2_jHi(4,330)=52 exch2_opposingSend(4,330)=3 exch2_pij(1,4,330)=1 exch2_pij(2,4,330)=0 exch2_pij(3,4,330)=0 exch2_pij(4,4,330)=1 exch2_oi(4,330)=0 exch2_oj(4,330)=0 RETURN END SUBROUTINE W2_E2SETUP_331 C Topology for tile 331 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(331)=34 exch2_tNy(331)=51 exch2_tBasex(331)=0 exch2_tBasey(331)=102 exch2_txGlobalo(331)=1021 exch2_tyGlobalo(331)=103 exch2_isWedge(331)=1 exch2_isNedge(331)=0 exch2_isEedge(331)=0 exch2_isSedge(331)=0 exch2_myFace(331)=3 exch2_mydNx(331)=510 exch2_mydNy(331)=510 exch2_nNeighbours(331)=5 exch2_neighbourId(1,331)=346 exch2_iLo(1,331)=0 exch2_iHi(1,331)=35 exch2_jLo(1,331)=52 exch2_jHi(1,331)=52 exch2_opposingSend(1,331)=2 exch2_pij(1,1,331)=1 exch2_pij(2,1,331)=0 exch2_pij(3,1,331)=0 exch2_pij(4,1,331)=1 exch2_oi(1,331)=0 exch2_oj(1,331)=0 exch2_neighbourId(2,331)=316 exch2_iLo(2,331)=0 exch2_iHi(2,331)=35 exch2_jLo(2,331)=0 exch2_jHi(2,331)=0 exch2_opposingSend(2,331)=1 exch2_pij(1,2,331)=1 exch2_pij(2,2,331)=0 exch2_pij(3,2,331)=0 exch2_pij(4,2,331)=1 exch2_oi(2,331)=0 exch2_oj(2,331)=0 exch2_neighbourId(3,331)=332 exch2_iLo(3,331)=35 exch2_iHi(3,331)=35 exch2_jLo(3,331)=0 exch2_jHi(3,331)=52 exch2_opposingSend(3,331)=4 exch2_pij(1,3,331)=1 exch2_pij(2,3,331)=0 exch2_pij(3,3,331)=0 exch2_pij(4,3,331)=1 exch2_oi(3,331)=0 exch2_oj(3,331)=0 exch2_neighbourId(4,331)=146 exch2_iLo(4,331)=0 exch2_iHi(4,331)=0 exch2_jLo(4,331)=34 exch2_jHi(4,331)=52 exch2_opposingSend(4,331)=1 exch2_pij(1,4,331)=0 exch2_pij(2,4,331)=1 exch2_pij(3,4,331)=-1 exch2_pij(4,4,331)=0 exch2_oi(4,331)=-510 exch2_oj(4,331)=511 exch2_neighbourId(5,331)=147 exch2_iLo(5,331)=0 exch2_iHi(5,331)=0 exch2_jLo(5,331)=0 exch2_jHi(5,331)=35 exch2_opposingSend(5,331)=1 exch2_pij(1,5,331)=0 exch2_pij(2,5,331)=1 exch2_pij(3,5,331)=-1 exch2_pij(4,5,331)=0 exch2_oi(5,331)=-510 exch2_oj(5,331)=511 RETURN END SUBROUTINE W2_E2SETUP_332 C Topology for tile 332 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(332)=34 exch2_tNy(332)=51 exch2_tBasex(332)=34 exch2_tBasey(332)=102 exch2_txGlobalo(332)=1055 exch2_tyGlobalo(332)=103 exch2_isWedge(332)=0 exch2_isNedge(332)=0 exch2_isEedge(332)=0 exch2_isSedge(332)=0 exch2_myFace(332)=3 exch2_mydNx(332)=510 exch2_mydNy(332)=510 exch2_nNeighbours(332)=4 exch2_neighbourId(1,332)=347 exch2_iLo(1,332)=0 exch2_iHi(1,332)=35 exch2_jLo(1,332)=52 exch2_jHi(1,332)=52 exch2_opposingSend(1,332)=2 exch2_pij(1,1,332)=1 exch2_pij(2,1,332)=0 exch2_pij(3,1,332)=0 exch2_pij(4,1,332)=1 exch2_oi(1,332)=0 exch2_oj(1,332)=0 exch2_neighbourId(2,332)=317 exch2_iLo(2,332)=0 exch2_iHi(2,332)=35 exch2_jLo(2,332)=0 exch2_jHi(2,332)=0 exch2_opposingSend(2,332)=1 exch2_pij(1,2,332)=1 exch2_pij(2,2,332)=0 exch2_pij(3,2,332)=0 exch2_pij(4,2,332)=1 exch2_oi(2,332)=0 exch2_oj(2,332)=0 exch2_neighbourId(3,332)=333 exch2_iLo(3,332)=35 exch2_iHi(3,332)=35 exch2_jLo(3,332)=0 exch2_jHi(3,332)=52 exch2_opposingSend(3,332)=4 exch2_pij(1,3,332)=1 exch2_pij(2,3,332)=0 exch2_pij(3,3,332)=0 exch2_pij(4,3,332)=1 exch2_oi(3,332)=0 exch2_oj(3,332)=0 exch2_neighbourId(4,332)=331 exch2_iLo(4,332)=0 exch2_iHi(4,332)=0 exch2_jLo(4,332)=0 exch2_jHi(4,332)=52 exch2_opposingSend(4,332)=3 exch2_pij(1,4,332)=1 exch2_pij(2,4,332)=0 exch2_pij(3,4,332)=0 exch2_pij(4,4,332)=1 exch2_oi(4,332)=0 exch2_oj(4,332)=0 RETURN END SUBROUTINE W2_E2SETUP_333 C Topology for tile 333 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(333)=34 exch2_tNy(333)=51 exch2_tBasex(333)=68 exch2_tBasey(333)=102 exch2_txGlobalo(333)=1089 exch2_tyGlobalo(333)=103 exch2_isWedge(333)=0 exch2_isNedge(333)=0 exch2_isEedge(333)=0 exch2_isSedge(333)=0 exch2_myFace(333)=3 exch2_mydNx(333)=510 exch2_mydNy(333)=510 exch2_nNeighbours(333)=4 exch2_neighbourId(1,333)=348 exch2_iLo(1,333)=0 exch2_iHi(1,333)=35 exch2_jLo(1,333)=52 exch2_jHi(1,333)=52 exch2_opposingSend(1,333)=2 exch2_pij(1,1,333)=1 exch2_pij(2,1,333)=0 exch2_pij(3,1,333)=0 exch2_pij(4,1,333)=1 exch2_oi(1,333)=0 exch2_oj(1,333)=0 exch2_neighbourId(2,333)=318 exch2_iLo(2,333)=0 exch2_iHi(2,333)=35 exch2_jLo(2,333)=0 exch2_jHi(2,333)=0 exch2_opposingSend(2,333)=1 exch2_pij(1,2,333)=1 exch2_pij(2,2,333)=0 exch2_pij(3,2,333)=0 exch2_pij(4,2,333)=1 exch2_oi(2,333)=0 exch2_oj(2,333)=0 exch2_neighbourId(3,333)=334 exch2_iLo(3,333)=35 exch2_iHi(3,333)=35 exch2_jLo(3,333)=0 exch2_jHi(3,333)=52 exch2_opposingSend(3,333)=4 exch2_pij(1,3,333)=1 exch2_pij(2,3,333)=0 exch2_pij(3,3,333)=0 exch2_pij(4,3,333)=1 exch2_oi(3,333)=0 exch2_oj(3,333)=0 exch2_neighbourId(4,333)=332 exch2_iLo(4,333)=0 exch2_iHi(4,333)=0 exch2_jLo(4,333)=0 exch2_jHi(4,333)=52 exch2_opposingSend(4,333)=3 exch2_pij(1,4,333)=1 exch2_pij(2,4,333)=0 exch2_pij(3,4,333)=0 exch2_pij(4,4,333)=1 exch2_oi(4,333)=0 exch2_oj(4,333)=0 RETURN END SUBROUTINE W2_E2SETUP_334 C Topology for tile 334 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(334)=34 exch2_tNy(334)=51 exch2_tBasex(334)=102 exch2_tBasey(334)=102 exch2_txGlobalo(334)=1123 exch2_tyGlobalo(334)=103 exch2_isWedge(334)=0 exch2_isNedge(334)=0 exch2_isEedge(334)=0 exch2_isSedge(334)=0 exch2_myFace(334)=3 exch2_mydNx(334)=510 exch2_mydNy(334)=510 exch2_nNeighbours(334)=4 exch2_neighbourId(1,334)=349 exch2_iLo(1,334)=0 exch2_iHi(1,334)=35 exch2_jLo(1,334)=52 exch2_jHi(1,334)=52 exch2_opposingSend(1,334)=2 exch2_pij(1,1,334)=1 exch2_pij(2,1,334)=0 exch2_pij(3,1,334)=0 exch2_pij(4,1,334)=1 exch2_oi(1,334)=0 exch2_oj(1,334)=0 exch2_neighbourId(2,334)=319 exch2_iLo(2,334)=0 exch2_iHi(2,334)=35 exch2_jLo(2,334)=0 exch2_jHi(2,334)=0 exch2_opposingSend(2,334)=1 exch2_pij(1,2,334)=1 exch2_pij(2,2,334)=0 exch2_pij(3,2,334)=0 exch2_pij(4,2,334)=1 exch2_oi(2,334)=0 exch2_oj(2,334)=0 exch2_neighbourId(3,334)=335 exch2_iLo(3,334)=35 exch2_iHi(3,334)=35 exch2_jLo(3,334)=0 exch2_jHi(3,334)=52 exch2_opposingSend(3,334)=4 exch2_pij(1,3,334)=1 exch2_pij(2,3,334)=0 exch2_pij(3,3,334)=0 exch2_pij(4,3,334)=1 exch2_oi(3,334)=0 exch2_oj(3,334)=0 exch2_neighbourId(4,334)=333 exch2_iLo(4,334)=0 exch2_iHi(4,334)=0 exch2_jLo(4,334)=0 exch2_jHi(4,334)=52 exch2_opposingSend(4,334)=3 exch2_pij(1,4,334)=1 exch2_pij(2,4,334)=0 exch2_pij(3,4,334)=0 exch2_pij(4,4,334)=1 exch2_oi(4,334)=0 exch2_oj(4,334)=0 RETURN END SUBROUTINE W2_E2SETUP_335 C Topology for tile 335 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(335)=34 exch2_tNy(335)=51 exch2_tBasex(335)=136 exch2_tBasey(335)=102 exch2_txGlobalo(335)=1157 exch2_tyGlobalo(335)=103 exch2_isWedge(335)=0 exch2_isNedge(335)=0 exch2_isEedge(335)=0 exch2_isSedge(335)=0 exch2_myFace(335)=3 exch2_mydNx(335)=510 exch2_mydNy(335)=510 exch2_nNeighbours(335)=4 exch2_neighbourId(1,335)=350 exch2_iLo(1,335)=0 exch2_iHi(1,335)=35 exch2_jLo(1,335)=52 exch2_jHi(1,335)=52 exch2_opposingSend(1,335)=2 exch2_pij(1,1,335)=1 exch2_pij(2,1,335)=0 exch2_pij(3,1,335)=0 exch2_pij(4,1,335)=1 exch2_oi(1,335)=0 exch2_oj(1,335)=0 exch2_neighbourId(2,335)=320 exch2_iLo(2,335)=0 exch2_iHi(2,335)=35 exch2_jLo(2,335)=0 exch2_jHi(2,335)=0 exch2_opposingSend(2,335)=1 exch2_pij(1,2,335)=1 exch2_pij(2,2,335)=0 exch2_pij(3,2,335)=0 exch2_pij(4,2,335)=1 exch2_oi(2,335)=0 exch2_oj(2,335)=0 exch2_neighbourId(3,335)=336 exch2_iLo(3,335)=35 exch2_iHi(3,335)=35 exch2_jLo(3,335)=0 exch2_jHi(3,335)=52 exch2_opposingSend(3,335)=4 exch2_pij(1,3,335)=1 exch2_pij(2,3,335)=0 exch2_pij(3,3,335)=0 exch2_pij(4,3,335)=1 exch2_oi(3,335)=0 exch2_oj(3,335)=0 exch2_neighbourId(4,335)=334 exch2_iLo(4,335)=0 exch2_iHi(4,335)=0 exch2_jLo(4,335)=0 exch2_jHi(4,335)=52 exch2_opposingSend(4,335)=3 exch2_pij(1,4,335)=1 exch2_pij(2,4,335)=0 exch2_pij(3,4,335)=0 exch2_pij(4,4,335)=1 exch2_oi(4,335)=0 exch2_oj(4,335)=0 RETURN END SUBROUTINE W2_E2SETUP_336 C Topology for tile 336 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(336)=34 exch2_tNy(336)=51 exch2_tBasex(336)=170 exch2_tBasey(336)=102 exch2_txGlobalo(336)=1191 exch2_tyGlobalo(336)=103 exch2_isWedge(336)=0 exch2_isNedge(336)=0 exch2_isEedge(336)=0 exch2_isSedge(336)=0 exch2_myFace(336)=3 exch2_mydNx(336)=510 exch2_mydNy(336)=510 exch2_nNeighbours(336)=4 exch2_neighbourId(1,336)=351 exch2_iLo(1,336)=0 exch2_iHi(1,336)=35 exch2_jLo(1,336)=52 exch2_jHi(1,336)=52 exch2_opposingSend(1,336)=2 exch2_pij(1,1,336)=1 exch2_pij(2,1,336)=0 exch2_pij(3,1,336)=0 exch2_pij(4,1,336)=1 exch2_oi(1,336)=0 exch2_oj(1,336)=0 exch2_neighbourId(2,336)=321 exch2_iLo(2,336)=0 exch2_iHi(2,336)=35 exch2_jLo(2,336)=0 exch2_jHi(2,336)=0 exch2_opposingSend(2,336)=1 exch2_pij(1,2,336)=1 exch2_pij(2,2,336)=0 exch2_pij(3,2,336)=0 exch2_pij(4,2,336)=1 exch2_oi(2,336)=0 exch2_oj(2,336)=0 exch2_neighbourId(3,336)=337 exch2_iLo(3,336)=35 exch2_iHi(3,336)=35 exch2_jLo(3,336)=0 exch2_jHi(3,336)=52 exch2_opposingSend(3,336)=4 exch2_pij(1,3,336)=1 exch2_pij(2,3,336)=0 exch2_pij(3,3,336)=0 exch2_pij(4,3,336)=1 exch2_oi(3,336)=0 exch2_oj(3,336)=0 exch2_neighbourId(4,336)=335 exch2_iLo(4,336)=0 exch2_iHi(4,336)=0 exch2_jLo(4,336)=0 exch2_jHi(4,336)=52 exch2_opposingSend(4,336)=3 exch2_pij(1,4,336)=1 exch2_pij(2,4,336)=0 exch2_pij(3,4,336)=0 exch2_pij(4,4,336)=1 exch2_oi(4,336)=0 exch2_oj(4,336)=0 RETURN END SUBROUTINE W2_E2SETUP_337 C Topology for tile 337 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(337)=34 exch2_tNy(337)=51 exch2_tBasex(337)=204 exch2_tBasey(337)=102 exch2_txGlobalo(337)=1225 exch2_tyGlobalo(337)=103 exch2_isWedge(337)=0 exch2_isNedge(337)=0 exch2_isEedge(337)=0 exch2_isSedge(337)=0 exch2_myFace(337)=3 exch2_mydNx(337)=510 exch2_mydNy(337)=510 exch2_nNeighbours(337)=4 exch2_neighbourId(1,337)=352 exch2_iLo(1,337)=0 exch2_iHi(1,337)=35 exch2_jLo(1,337)=52 exch2_jHi(1,337)=52 exch2_opposingSend(1,337)=2 exch2_pij(1,1,337)=1 exch2_pij(2,1,337)=0 exch2_pij(3,1,337)=0 exch2_pij(4,1,337)=1 exch2_oi(1,337)=0 exch2_oj(1,337)=0 exch2_neighbourId(2,337)=322 exch2_iLo(2,337)=0 exch2_iHi(2,337)=35 exch2_jLo(2,337)=0 exch2_jHi(2,337)=0 exch2_opposingSend(2,337)=1 exch2_pij(1,2,337)=1 exch2_pij(2,2,337)=0 exch2_pij(3,2,337)=0 exch2_pij(4,2,337)=1 exch2_oi(2,337)=0 exch2_oj(2,337)=0 exch2_neighbourId(3,337)=338 exch2_iLo(3,337)=35 exch2_iHi(3,337)=35 exch2_jLo(3,337)=0 exch2_jHi(3,337)=52 exch2_opposingSend(3,337)=4 exch2_pij(1,3,337)=1 exch2_pij(2,3,337)=0 exch2_pij(3,3,337)=0 exch2_pij(4,3,337)=1 exch2_oi(3,337)=0 exch2_oj(3,337)=0 exch2_neighbourId(4,337)=336 exch2_iLo(4,337)=0 exch2_iHi(4,337)=0 exch2_jLo(4,337)=0 exch2_jHi(4,337)=52 exch2_opposingSend(4,337)=3 exch2_pij(1,4,337)=1 exch2_pij(2,4,337)=0 exch2_pij(3,4,337)=0 exch2_pij(4,4,337)=1 exch2_oi(4,337)=0 exch2_oj(4,337)=0 RETURN END SUBROUTINE W2_E2SETUP_338 C Topology for tile 338 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(338)=34 exch2_tNy(338)=51 exch2_tBasex(338)=238 exch2_tBasey(338)=102 exch2_txGlobalo(338)=1259 exch2_tyGlobalo(338)=103 exch2_isWedge(338)=0 exch2_isNedge(338)=0 exch2_isEedge(338)=0 exch2_isSedge(338)=0 exch2_myFace(338)=3 exch2_mydNx(338)=510 exch2_mydNy(338)=510 exch2_nNeighbours(338)=4 exch2_neighbourId(1,338)=353 exch2_iLo(1,338)=0 exch2_iHi(1,338)=35 exch2_jLo(1,338)=52 exch2_jHi(1,338)=52 exch2_opposingSend(1,338)=2 exch2_pij(1,1,338)=1 exch2_pij(2,1,338)=0 exch2_pij(3,1,338)=0 exch2_pij(4,1,338)=1 exch2_oi(1,338)=0 exch2_oj(1,338)=0 exch2_neighbourId(2,338)=323 exch2_iLo(2,338)=0 exch2_iHi(2,338)=35 exch2_jLo(2,338)=0 exch2_jHi(2,338)=0 exch2_opposingSend(2,338)=1 exch2_pij(1,2,338)=1 exch2_pij(2,2,338)=0 exch2_pij(3,2,338)=0 exch2_pij(4,2,338)=1 exch2_oi(2,338)=0 exch2_oj(2,338)=0 exch2_neighbourId(3,338)=339 exch2_iLo(3,338)=35 exch2_iHi(3,338)=35 exch2_jLo(3,338)=0 exch2_jHi(3,338)=52 exch2_opposingSend(3,338)=4 exch2_pij(1,3,338)=1 exch2_pij(2,3,338)=0 exch2_pij(3,3,338)=0 exch2_pij(4,3,338)=1 exch2_oi(3,338)=0 exch2_oj(3,338)=0 exch2_neighbourId(4,338)=337 exch2_iLo(4,338)=0 exch2_iHi(4,338)=0 exch2_jLo(4,338)=0 exch2_jHi(4,338)=52 exch2_opposingSend(4,338)=3 exch2_pij(1,4,338)=1 exch2_pij(2,4,338)=0 exch2_pij(3,4,338)=0 exch2_pij(4,4,338)=1 exch2_oi(4,338)=0 exch2_oj(4,338)=0 RETURN END SUBROUTINE W2_E2SETUP_339 C Topology for tile 339 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(339)=34 exch2_tNy(339)=51 exch2_tBasex(339)=272 exch2_tBasey(339)=102 exch2_txGlobalo(339)=1293 exch2_tyGlobalo(339)=103 exch2_isWedge(339)=0 exch2_isNedge(339)=0 exch2_isEedge(339)=0 exch2_isSedge(339)=0 exch2_myFace(339)=3 exch2_mydNx(339)=510 exch2_mydNy(339)=510 exch2_nNeighbours(339)=4 exch2_neighbourId(1,339)=354 exch2_iLo(1,339)=0 exch2_iHi(1,339)=35 exch2_jLo(1,339)=52 exch2_jHi(1,339)=52 exch2_opposingSend(1,339)=2 exch2_pij(1,1,339)=1 exch2_pij(2,1,339)=0 exch2_pij(3,1,339)=0 exch2_pij(4,1,339)=1 exch2_oi(1,339)=0 exch2_oj(1,339)=0 exch2_neighbourId(2,339)=324 exch2_iLo(2,339)=0 exch2_iHi(2,339)=35 exch2_jLo(2,339)=0 exch2_jHi(2,339)=0 exch2_opposingSend(2,339)=1 exch2_pij(1,2,339)=1 exch2_pij(2,2,339)=0 exch2_pij(3,2,339)=0 exch2_pij(4,2,339)=1 exch2_oi(2,339)=0 exch2_oj(2,339)=0 exch2_neighbourId(3,339)=340 exch2_iLo(3,339)=35 exch2_iHi(3,339)=35 exch2_jLo(3,339)=0 exch2_jHi(3,339)=52 exch2_opposingSend(3,339)=4 exch2_pij(1,3,339)=1 exch2_pij(2,3,339)=0 exch2_pij(3,3,339)=0 exch2_pij(4,3,339)=1 exch2_oi(3,339)=0 exch2_oj(3,339)=0 exch2_neighbourId(4,339)=338 exch2_iLo(4,339)=0 exch2_iHi(4,339)=0 exch2_jLo(4,339)=0 exch2_jHi(4,339)=52 exch2_opposingSend(4,339)=3 exch2_pij(1,4,339)=1 exch2_pij(2,4,339)=0 exch2_pij(3,4,339)=0 exch2_pij(4,4,339)=1 exch2_oi(4,339)=0 exch2_oj(4,339)=0 RETURN END SUBROUTINE W2_E2SETUP_340 C Topology for tile 340 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(340)=34 exch2_tNy(340)=51 exch2_tBasex(340)=306 exch2_tBasey(340)=102 exch2_txGlobalo(340)=1327 exch2_tyGlobalo(340)=103 exch2_isWedge(340)=0 exch2_isNedge(340)=0 exch2_isEedge(340)=0 exch2_isSedge(340)=0 exch2_myFace(340)=3 exch2_mydNx(340)=510 exch2_mydNy(340)=510 exch2_nNeighbours(340)=4 exch2_neighbourId(1,340)=355 exch2_iLo(1,340)=0 exch2_iHi(1,340)=35 exch2_jLo(1,340)=52 exch2_jHi(1,340)=52 exch2_opposingSend(1,340)=2 exch2_pij(1,1,340)=1 exch2_pij(2,1,340)=0 exch2_pij(3,1,340)=0 exch2_pij(4,1,340)=1 exch2_oi(1,340)=0 exch2_oj(1,340)=0 exch2_neighbourId(2,340)=325 exch2_iLo(2,340)=0 exch2_iHi(2,340)=35 exch2_jLo(2,340)=0 exch2_jHi(2,340)=0 exch2_opposingSend(2,340)=1 exch2_pij(1,2,340)=1 exch2_pij(2,2,340)=0 exch2_pij(3,2,340)=0 exch2_pij(4,2,340)=1 exch2_oi(2,340)=0 exch2_oj(2,340)=0 exch2_neighbourId(3,340)=341 exch2_iLo(3,340)=35 exch2_iHi(3,340)=35 exch2_jLo(3,340)=0 exch2_jHi(3,340)=52 exch2_opposingSend(3,340)=4 exch2_pij(1,3,340)=1 exch2_pij(2,3,340)=0 exch2_pij(3,3,340)=0 exch2_pij(4,3,340)=1 exch2_oi(3,340)=0 exch2_oj(3,340)=0 exch2_neighbourId(4,340)=339 exch2_iLo(4,340)=0 exch2_iHi(4,340)=0 exch2_jLo(4,340)=0 exch2_jHi(4,340)=52 exch2_opposingSend(4,340)=3 exch2_pij(1,4,340)=1 exch2_pij(2,4,340)=0 exch2_pij(3,4,340)=0 exch2_pij(4,4,340)=1 exch2_oi(4,340)=0 exch2_oj(4,340)=0 RETURN END SUBROUTINE W2_E2SETUP_341 C Topology for tile 341 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(341)=34 exch2_tNy(341)=51 exch2_tBasex(341)=340 exch2_tBasey(341)=102 exch2_txGlobalo(341)=1361 exch2_tyGlobalo(341)=103 exch2_isWedge(341)=0 exch2_isNedge(341)=0 exch2_isEedge(341)=0 exch2_isSedge(341)=0 exch2_myFace(341)=3 exch2_mydNx(341)=510 exch2_mydNy(341)=510 exch2_nNeighbours(341)=4 exch2_neighbourId(1,341)=356 exch2_iLo(1,341)=0 exch2_iHi(1,341)=35 exch2_jLo(1,341)=52 exch2_jHi(1,341)=52 exch2_opposingSend(1,341)=2 exch2_pij(1,1,341)=1 exch2_pij(2,1,341)=0 exch2_pij(3,1,341)=0 exch2_pij(4,1,341)=1 exch2_oi(1,341)=0 exch2_oj(1,341)=0 exch2_neighbourId(2,341)=326 exch2_iLo(2,341)=0 exch2_iHi(2,341)=35 exch2_jLo(2,341)=0 exch2_jHi(2,341)=0 exch2_opposingSend(2,341)=1 exch2_pij(1,2,341)=1 exch2_pij(2,2,341)=0 exch2_pij(3,2,341)=0 exch2_pij(4,2,341)=1 exch2_oi(2,341)=0 exch2_oj(2,341)=0 exch2_neighbourId(3,341)=342 exch2_iLo(3,341)=35 exch2_iHi(3,341)=35 exch2_jLo(3,341)=0 exch2_jHi(3,341)=52 exch2_opposingSend(3,341)=4 exch2_pij(1,3,341)=1 exch2_pij(2,3,341)=0 exch2_pij(3,3,341)=0 exch2_pij(4,3,341)=1 exch2_oi(3,341)=0 exch2_oj(3,341)=0 exch2_neighbourId(4,341)=340 exch2_iLo(4,341)=0 exch2_iHi(4,341)=0 exch2_jLo(4,341)=0 exch2_jHi(4,341)=52 exch2_opposingSend(4,341)=3 exch2_pij(1,4,341)=1 exch2_pij(2,4,341)=0 exch2_pij(3,4,341)=0 exch2_pij(4,4,341)=1 exch2_oi(4,341)=0 exch2_oj(4,341)=0 RETURN END SUBROUTINE W2_E2SETUP_342 C Topology for tile 342 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(342)=34 exch2_tNy(342)=51 exch2_tBasex(342)=374 exch2_tBasey(342)=102 exch2_txGlobalo(342)=1395 exch2_tyGlobalo(342)=103 exch2_isWedge(342)=0 exch2_isNedge(342)=0 exch2_isEedge(342)=0 exch2_isSedge(342)=0 exch2_myFace(342)=3 exch2_mydNx(342)=510 exch2_mydNy(342)=510 exch2_nNeighbours(342)=4 exch2_neighbourId(1,342)=357 exch2_iLo(1,342)=0 exch2_iHi(1,342)=35 exch2_jLo(1,342)=52 exch2_jHi(1,342)=52 exch2_opposingSend(1,342)=2 exch2_pij(1,1,342)=1 exch2_pij(2,1,342)=0 exch2_pij(3,1,342)=0 exch2_pij(4,1,342)=1 exch2_oi(1,342)=0 exch2_oj(1,342)=0 exch2_neighbourId(2,342)=327 exch2_iLo(2,342)=0 exch2_iHi(2,342)=35 exch2_jLo(2,342)=0 exch2_jHi(2,342)=0 exch2_opposingSend(2,342)=1 exch2_pij(1,2,342)=1 exch2_pij(2,2,342)=0 exch2_pij(3,2,342)=0 exch2_pij(4,2,342)=1 exch2_oi(2,342)=0 exch2_oj(2,342)=0 exch2_neighbourId(3,342)=343 exch2_iLo(3,342)=35 exch2_iHi(3,342)=35 exch2_jLo(3,342)=0 exch2_jHi(3,342)=52 exch2_opposingSend(3,342)=4 exch2_pij(1,3,342)=1 exch2_pij(2,3,342)=0 exch2_pij(3,3,342)=0 exch2_pij(4,3,342)=1 exch2_oi(3,342)=0 exch2_oj(3,342)=0 exch2_neighbourId(4,342)=341 exch2_iLo(4,342)=0 exch2_iHi(4,342)=0 exch2_jLo(4,342)=0 exch2_jHi(4,342)=52 exch2_opposingSend(4,342)=3 exch2_pij(1,4,342)=1 exch2_pij(2,4,342)=0 exch2_pij(3,4,342)=0 exch2_pij(4,4,342)=1 exch2_oi(4,342)=0 exch2_oj(4,342)=0 RETURN END SUBROUTINE W2_E2SETUP_343 C Topology for tile 343 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(343)=34 exch2_tNy(343)=51 exch2_tBasex(343)=408 exch2_tBasey(343)=102 exch2_txGlobalo(343)=1429 exch2_tyGlobalo(343)=103 exch2_isWedge(343)=0 exch2_isNedge(343)=0 exch2_isEedge(343)=0 exch2_isSedge(343)=0 exch2_myFace(343)=3 exch2_mydNx(343)=510 exch2_mydNy(343)=510 exch2_nNeighbours(343)=4 exch2_neighbourId(1,343)=358 exch2_iLo(1,343)=0 exch2_iHi(1,343)=35 exch2_jLo(1,343)=52 exch2_jHi(1,343)=52 exch2_opposingSend(1,343)=2 exch2_pij(1,1,343)=1 exch2_pij(2,1,343)=0 exch2_pij(3,1,343)=0 exch2_pij(4,1,343)=1 exch2_oi(1,343)=0 exch2_oj(1,343)=0 exch2_neighbourId(2,343)=328 exch2_iLo(2,343)=0 exch2_iHi(2,343)=35 exch2_jLo(2,343)=0 exch2_jHi(2,343)=0 exch2_opposingSend(2,343)=1 exch2_pij(1,2,343)=1 exch2_pij(2,2,343)=0 exch2_pij(3,2,343)=0 exch2_pij(4,2,343)=1 exch2_oi(2,343)=0 exch2_oj(2,343)=0 exch2_neighbourId(3,343)=344 exch2_iLo(3,343)=35 exch2_iHi(3,343)=35 exch2_jLo(3,343)=0 exch2_jHi(3,343)=52 exch2_opposingSend(3,343)=4 exch2_pij(1,3,343)=1 exch2_pij(2,3,343)=0 exch2_pij(3,3,343)=0 exch2_pij(4,3,343)=1 exch2_oi(3,343)=0 exch2_oj(3,343)=0 exch2_neighbourId(4,343)=342 exch2_iLo(4,343)=0 exch2_iHi(4,343)=0 exch2_jLo(4,343)=0 exch2_jHi(4,343)=52 exch2_opposingSend(4,343)=3 exch2_pij(1,4,343)=1 exch2_pij(2,4,343)=0 exch2_pij(3,4,343)=0 exch2_pij(4,4,343)=1 exch2_oi(4,343)=0 exch2_oj(4,343)=0 RETURN END SUBROUTINE W2_E2SETUP_344 C Topology for tile 344 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(344)=34 exch2_tNy(344)=51 exch2_tBasex(344)=442 exch2_tBasey(344)=102 exch2_txGlobalo(344)=1463 exch2_tyGlobalo(344)=103 exch2_isWedge(344)=0 exch2_isNedge(344)=0 exch2_isEedge(344)=0 exch2_isSedge(344)=0 exch2_myFace(344)=3 exch2_mydNx(344)=510 exch2_mydNy(344)=510 exch2_nNeighbours(344)=4 exch2_neighbourId(1,344)=359 exch2_iLo(1,344)=0 exch2_iHi(1,344)=35 exch2_jLo(1,344)=52 exch2_jHi(1,344)=52 exch2_opposingSend(1,344)=2 exch2_pij(1,1,344)=1 exch2_pij(2,1,344)=0 exch2_pij(3,1,344)=0 exch2_pij(4,1,344)=1 exch2_oi(1,344)=0 exch2_oj(1,344)=0 exch2_neighbourId(2,344)=329 exch2_iLo(2,344)=0 exch2_iHi(2,344)=35 exch2_jLo(2,344)=0 exch2_jHi(2,344)=0 exch2_opposingSend(2,344)=1 exch2_pij(1,2,344)=1 exch2_pij(2,2,344)=0 exch2_pij(3,2,344)=0 exch2_pij(4,2,344)=1 exch2_oi(2,344)=0 exch2_oj(2,344)=0 exch2_neighbourId(3,344)=345 exch2_iLo(3,344)=35 exch2_iHi(3,344)=35 exch2_jLo(3,344)=0 exch2_jHi(3,344)=52 exch2_opposingSend(3,344)=4 exch2_pij(1,3,344)=1 exch2_pij(2,3,344)=0 exch2_pij(3,3,344)=0 exch2_pij(4,3,344)=1 exch2_oi(3,344)=0 exch2_oj(3,344)=0 exch2_neighbourId(4,344)=343 exch2_iLo(4,344)=0 exch2_iHi(4,344)=0 exch2_jLo(4,344)=0 exch2_jHi(4,344)=52 exch2_opposingSend(4,344)=3 exch2_pij(1,4,344)=1 exch2_pij(2,4,344)=0 exch2_pij(3,4,344)=0 exch2_pij(4,4,344)=1 exch2_oi(4,344)=0 exch2_oj(4,344)=0 RETURN END SUBROUTINE W2_E2SETUP_345 C Topology for tile 345 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(345)=34 exch2_tNy(345)=51 exch2_tBasex(345)=476 exch2_tBasey(345)=102 exch2_txGlobalo(345)=1497 exch2_tyGlobalo(345)=103 exch2_isWedge(345)=0 exch2_isNedge(345)=0 exch2_isEedge(345)=1 exch2_isSedge(345)=0 exch2_myFace(345)=3 exch2_mydNx(345)=510 exch2_mydNy(345)=510 exch2_nNeighbours(345)=4 exch2_neighbourId(1,345)=360 exch2_iLo(1,345)=0 exch2_iHi(1,345)=35 exch2_jLo(1,345)=52 exch2_jHi(1,345)=52 exch2_opposingSend(1,345)=2 exch2_pij(1,1,345)=1 exch2_pij(2,1,345)=0 exch2_pij(3,1,345)=0 exch2_pij(4,1,345)=1 exch2_oi(1,345)=0 exch2_oj(1,345)=0 exch2_neighbourId(2,345)=330 exch2_iLo(2,345)=0 exch2_iHi(2,345)=35 exch2_jLo(2,345)=0 exch2_jHi(2,345)=0 exch2_opposingSend(2,345)=1 exch2_pij(1,2,345)=1 exch2_pij(2,2,345)=0 exch2_pij(3,2,345)=0 exch2_pij(4,2,345)=1 exch2_oi(2,345)=0 exch2_oj(2,345)=0 exch2_neighbourId(3,345)=481 exch2_iLo(3,345)=35 exch2_iHi(3,345)=35 exch2_jLo(3,345)=0 exch2_jHi(3,345)=52 exch2_opposingSend(3,345)=4 exch2_pij(1,3,345)=1 exch2_pij(2,3,345)=0 exch2_pij(3,3,345)=0 exch2_pij(4,3,345)=1 exch2_oi(3,345)=510 exch2_oj(3,345)=0 exch2_neighbourId(4,345)=344 exch2_iLo(4,345)=0 exch2_iHi(4,345)=0 exch2_jLo(4,345)=0 exch2_jHi(4,345)=52 exch2_opposingSend(4,345)=3 exch2_pij(1,4,345)=1 exch2_pij(2,4,345)=0 exch2_pij(3,4,345)=0 exch2_pij(4,4,345)=1 exch2_oi(4,345)=0 exch2_oj(4,345)=0 RETURN END SUBROUTINE W2_E2SETUP_346 C Topology for tile 346 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(346)=34 exch2_tNy(346)=51 exch2_tBasex(346)=0 exch2_tBasey(346)=153 exch2_txGlobalo(346)=1021 exch2_tyGlobalo(346)=154 exch2_isWedge(346)=1 exch2_isNedge(346)=0 exch2_isEedge(346)=0 exch2_isSedge(346)=0 exch2_myFace(346)=3 exch2_mydNx(346)=510 exch2_mydNy(346)=510 exch2_nNeighbours(346)=5 exch2_neighbourId(1,346)=361 exch2_iLo(1,346)=0 exch2_iHi(1,346)=35 exch2_jLo(1,346)=52 exch2_jHi(1,346)=52 exch2_opposingSend(1,346)=2 exch2_pij(1,1,346)=1 exch2_pij(2,1,346)=0 exch2_pij(3,1,346)=0 exch2_pij(4,1,346)=1 exch2_oi(1,346)=0 exch2_oj(1,346)=0 exch2_neighbourId(2,346)=331 exch2_iLo(2,346)=0 exch2_iHi(2,346)=35 exch2_jLo(2,346)=0 exch2_jHi(2,346)=0 exch2_opposingSend(2,346)=1 exch2_pij(1,2,346)=1 exch2_pij(2,2,346)=0 exch2_pij(3,2,346)=0 exch2_pij(4,2,346)=1 exch2_oi(2,346)=0 exch2_oj(2,346)=0 exch2_neighbourId(3,346)=347 exch2_iLo(3,346)=35 exch2_iHi(3,346)=35 exch2_jLo(3,346)=0 exch2_jHi(3,346)=52 exch2_opposingSend(3,346)=4 exch2_pij(1,3,346)=1 exch2_pij(2,3,346)=0 exch2_pij(3,3,346)=0 exch2_pij(4,3,346)=1 exch2_oi(3,346)=0 exch2_oj(3,346)=0 exch2_neighbourId(4,346)=145 exch2_iLo(4,346)=0 exch2_iHi(4,346)=0 exch2_jLo(4,346)=17 exch2_jHi(4,346)=52 exch2_opposingSend(4,346)=1 exch2_pij(1,4,346)=0 exch2_pij(2,4,346)=1 exch2_pij(3,4,346)=-1 exch2_pij(4,4,346)=0 exch2_oi(4,346)=-510 exch2_oj(4,346)=511 exch2_neighbourId(5,346)=146 exch2_iLo(5,346)=0 exch2_iHi(5,346)=0 exch2_jLo(5,346)=0 exch2_jHi(5,346)=18 exch2_opposingSend(5,346)=2 exch2_pij(1,5,346)=0 exch2_pij(2,5,346)=1 exch2_pij(3,5,346)=-1 exch2_pij(4,5,346)=0 exch2_oi(5,346)=-510 exch2_oj(5,346)=511 RETURN END SUBROUTINE W2_E2SETUP_347 C Topology for tile 347 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(347)=34 exch2_tNy(347)=51 exch2_tBasex(347)=34 exch2_tBasey(347)=153 exch2_txGlobalo(347)=1055 exch2_tyGlobalo(347)=154 exch2_isWedge(347)=0 exch2_isNedge(347)=0 exch2_isEedge(347)=0 exch2_isSedge(347)=0 exch2_myFace(347)=3 exch2_mydNx(347)=510 exch2_mydNy(347)=510 exch2_nNeighbours(347)=4 exch2_neighbourId(1,347)=362 exch2_iLo(1,347)=0 exch2_iHi(1,347)=35 exch2_jLo(1,347)=52 exch2_jHi(1,347)=52 exch2_opposingSend(1,347)=2 exch2_pij(1,1,347)=1 exch2_pij(2,1,347)=0 exch2_pij(3,1,347)=0 exch2_pij(4,1,347)=1 exch2_oi(1,347)=0 exch2_oj(1,347)=0 exch2_neighbourId(2,347)=332 exch2_iLo(2,347)=0 exch2_iHi(2,347)=35 exch2_jLo(2,347)=0 exch2_jHi(2,347)=0 exch2_opposingSend(2,347)=1 exch2_pij(1,2,347)=1 exch2_pij(2,2,347)=0 exch2_pij(3,2,347)=0 exch2_pij(4,2,347)=1 exch2_oi(2,347)=0 exch2_oj(2,347)=0 exch2_neighbourId(3,347)=348 exch2_iLo(3,347)=35 exch2_iHi(3,347)=35 exch2_jLo(3,347)=0 exch2_jHi(3,347)=52 exch2_opposingSend(3,347)=4 exch2_pij(1,3,347)=1 exch2_pij(2,3,347)=0 exch2_pij(3,3,347)=0 exch2_pij(4,3,347)=1 exch2_oi(3,347)=0 exch2_oj(3,347)=0 exch2_neighbourId(4,347)=346 exch2_iLo(4,347)=0 exch2_iHi(4,347)=0 exch2_jLo(4,347)=0 exch2_jHi(4,347)=52 exch2_opposingSend(4,347)=3 exch2_pij(1,4,347)=1 exch2_pij(2,4,347)=0 exch2_pij(3,4,347)=0 exch2_pij(4,4,347)=1 exch2_oi(4,347)=0 exch2_oj(4,347)=0 RETURN END SUBROUTINE W2_E2SETUP_348 C Topology for tile 348 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(348)=34 exch2_tNy(348)=51 exch2_tBasex(348)=68 exch2_tBasey(348)=153 exch2_txGlobalo(348)=1089 exch2_tyGlobalo(348)=154 exch2_isWedge(348)=0 exch2_isNedge(348)=0 exch2_isEedge(348)=0 exch2_isSedge(348)=0 exch2_myFace(348)=3 exch2_mydNx(348)=510 exch2_mydNy(348)=510 exch2_nNeighbours(348)=4 exch2_neighbourId(1,348)=363 exch2_iLo(1,348)=0 exch2_iHi(1,348)=35 exch2_jLo(1,348)=52 exch2_jHi(1,348)=52 exch2_opposingSend(1,348)=2 exch2_pij(1,1,348)=1 exch2_pij(2,1,348)=0 exch2_pij(3,1,348)=0 exch2_pij(4,1,348)=1 exch2_oi(1,348)=0 exch2_oj(1,348)=0 exch2_neighbourId(2,348)=333 exch2_iLo(2,348)=0 exch2_iHi(2,348)=35 exch2_jLo(2,348)=0 exch2_jHi(2,348)=0 exch2_opposingSend(2,348)=1 exch2_pij(1,2,348)=1 exch2_pij(2,2,348)=0 exch2_pij(3,2,348)=0 exch2_pij(4,2,348)=1 exch2_oi(2,348)=0 exch2_oj(2,348)=0 exch2_neighbourId(3,348)=349 exch2_iLo(3,348)=35 exch2_iHi(3,348)=35 exch2_jLo(3,348)=0 exch2_jHi(3,348)=52 exch2_opposingSend(3,348)=4 exch2_pij(1,3,348)=1 exch2_pij(2,3,348)=0 exch2_pij(3,3,348)=0 exch2_pij(4,3,348)=1 exch2_oi(3,348)=0 exch2_oj(3,348)=0 exch2_neighbourId(4,348)=347 exch2_iLo(4,348)=0 exch2_iHi(4,348)=0 exch2_jLo(4,348)=0 exch2_jHi(4,348)=52 exch2_opposingSend(4,348)=3 exch2_pij(1,4,348)=1 exch2_pij(2,4,348)=0 exch2_pij(3,4,348)=0 exch2_pij(4,4,348)=1 exch2_oi(4,348)=0 exch2_oj(4,348)=0 RETURN END SUBROUTINE W2_E2SETUP_349 C Topology for tile 349 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(349)=34 exch2_tNy(349)=51 exch2_tBasex(349)=102 exch2_tBasey(349)=153 exch2_txGlobalo(349)=1123 exch2_tyGlobalo(349)=154 exch2_isWedge(349)=0 exch2_isNedge(349)=0 exch2_isEedge(349)=0 exch2_isSedge(349)=0 exch2_myFace(349)=3 exch2_mydNx(349)=510 exch2_mydNy(349)=510 exch2_nNeighbours(349)=4 exch2_neighbourId(1,349)=364 exch2_iLo(1,349)=0 exch2_iHi(1,349)=35 exch2_jLo(1,349)=52 exch2_jHi(1,349)=52 exch2_opposingSend(1,349)=2 exch2_pij(1,1,349)=1 exch2_pij(2,1,349)=0 exch2_pij(3,1,349)=0 exch2_pij(4,1,349)=1 exch2_oi(1,349)=0 exch2_oj(1,349)=0 exch2_neighbourId(2,349)=334 exch2_iLo(2,349)=0 exch2_iHi(2,349)=35 exch2_jLo(2,349)=0 exch2_jHi(2,349)=0 exch2_opposingSend(2,349)=1 exch2_pij(1,2,349)=1 exch2_pij(2,2,349)=0 exch2_pij(3,2,349)=0 exch2_pij(4,2,349)=1 exch2_oi(2,349)=0 exch2_oj(2,349)=0 exch2_neighbourId(3,349)=350 exch2_iLo(3,349)=35 exch2_iHi(3,349)=35 exch2_jLo(3,349)=0 exch2_jHi(3,349)=52 exch2_opposingSend(3,349)=4 exch2_pij(1,3,349)=1 exch2_pij(2,3,349)=0 exch2_pij(3,3,349)=0 exch2_pij(4,3,349)=1 exch2_oi(3,349)=0 exch2_oj(3,349)=0 exch2_neighbourId(4,349)=348 exch2_iLo(4,349)=0 exch2_iHi(4,349)=0 exch2_jLo(4,349)=0 exch2_jHi(4,349)=52 exch2_opposingSend(4,349)=3 exch2_pij(1,4,349)=1 exch2_pij(2,4,349)=0 exch2_pij(3,4,349)=0 exch2_pij(4,4,349)=1 exch2_oi(4,349)=0 exch2_oj(4,349)=0 RETURN END SUBROUTINE W2_E2SETUP_350 C Topology for tile 350 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(350)=34 exch2_tNy(350)=51 exch2_tBasex(350)=136 exch2_tBasey(350)=153 exch2_txGlobalo(350)=1157 exch2_tyGlobalo(350)=154 exch2_isWedge(350)=0 exch2_isNedge(350)=0 exch2_isEedge(350)=0 exch2_isSedge(350)=0 exch2_myFace(350)=3 exch2_mydNx(350)=510 exch2_mydNy(350)=510 exch2_nNeighbours(350)=4 exch2_neighbourId(1,350)=365 exch2_iLo(1,350)=0 exch2_iHi(1,350)=35 exch2_jLo(1,350)=52 exch2_jHi(1,350)=52 exch2_opposingSend(1,350)=2 exch2_pij(1,1,350)=1 exch2_pij(2,1,350)=0 exch2_pij(3,1,350)=0 exch2_pij(4,1,350)=1 exch2_oi(1,350)=0 exch2_oj(1,350)=0 exch2_neighbourId(2,350)=335 exch2_iLo(2,350)=0 exch2_iHi(2,350)=35 exch2_jLo(2,350)=0 exch2_jHi(2,350)=0 exch2_opposingSend(2,350)=1 exch2_pij(1,2,350)=1 exch2_pij(2,2,350)=0 exch2_pij(3,2,350)=0 exch2_pij(4,2,350)=1 exch2_oi(2,350)=0 exch2_oj(2,350)=0 exch2_neighbourId(3,350)=351 exch2_iLo(3,350)=35 exch2_iHi(3,350)=35 exch2_jLo(3,350)=0 exch2_jHi(3,350)=52 exch2_opposingSend(3,350)=4 exch2_pij(1,3,350)=1 exch2_pij(2,3,350)=0 exch2_pij(3,3,350)=0 exch2_pij(4,3,350)=1 exch2_oi(3,350)=0 exch2_oj(3,350)=0 exch2_neighbourId(4,350)=349 exch2_iLo(4,350)=0 exch2_iHi(4,350)=0 exch2_jLo(4,350)=0 exch2_jHi(4,350)=52 exch2_opposingSend(4,350)=3 exch2_pij(1,4,350)=1 exch2_pij(2,4,350)=0 exch2_pij(3,4,350)=0 exch2_pij(4,4,350)=1 exch2_oi(4,350)=0 exch2_oj(4,350)=0 RETURN END SUBROUTINE W2_E2SETUP_351 C Topology for tile 351 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(351)=34 exch2_tNy(351)=51 exch2_tBasex(351)=170 exch2_tBasey(351)=153 exch2_txGlobalo(351)=1191 exch2_tyGlobalo(351)=154 exch2_isWedge(351)=0 exch2_isNedge(351)=0 exch2_isEedge(351)=0 exch2_isSedge(351)=0 exch2_myFace(351)=3 exch2_mydNx(351)=510 exch2_mydNy(351)=510 exch2_nNeighbours(351)=4 exch2_neighbourId(1,351)=366 exch2_iLo(1,351)=0 exch2_iHi(1,351)=35 exch2_jLo(1,351)=52 exch2_jHi(1,351)=52 exch2_opposingSend(1,351)=2 exch2_pij(1,1,351)=1 exch2_pij(2,1,351)=0 exch2_pij(3,1,351)=0 exch2_pij(4,1,351)=1 exch2_oi(1,351)=0 exch2_oj(1,351)=0 exch2_neighbourId(2,351)=336 exch2_iLo(2,351)=0 exch2_iHi(2,351)=35 exch2_jLo(2,351)=0 exch2_jHi(2,351)=0 exch2_opposingSend(2,351)=1 exch2_pij(1,2,351)=1 exch2_pij(2,2,351)=0 exch2_pij(3,2,351)=0 exch2_pij(4,2,351)=1 exch2_oi(2,351)=0 exch2_oj(2,351)=0 exch2_neighbourId(3,351)=352 exch2_iLo(3,351)=35 exch2_iHi(3,351)=35 exch2_jLo(3,351)=0 exch2_jHi(3,351)=52 exch2_opposingSend(3,351)=4 exch2_pij(1,3,351)=1 exch2_pij(2,3,351)=0 exch2_pij(3,3,351)=0 exch2_pij(4,3,351)=1 exch2_oi(3,351)=0 exch2_oj(3,351)=0 exch2_neighbourId(4,351)=350 exch2_iLo(4,351)=0 exch2_iHi(4,351)=0 exch2_jLo(4,351)=0 exch2_jHi(4,351)=52 exch2_opposingSend(4,351)=3 exch2_pij(1,4,351)=1 exch2_pij(2,4,351)=0 exch2_pij(3,4,351)=0 exch2_pij(4,4,351)=1 exch2_oi(4,351)=0 exch2_oj(4,351)=0 RETURN END SUBROUTINE W2_E2SETUP_352 C Topology for tile 352 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(352)=34 exch2_tNy(352)=51 exch2_tBasex(352)=204 exch2_tBasey(352)=153 exch2_txGlobalo(352)=1225 exch2_tyGlobalo(352)=154 exch2_isWedge(352)=0 exch2_isNedge(352)=0 exch2_isEedge(352)=0 exch2_isSedge(352)=0 exch2_myFace(352)=3 exch2_mydNx(352)=510 exch2_mydNy(352)=510 exch2_nNeighbours(352)=4 exch2_neighbourId(1,352)=367 exch2_iLo(1,352)=0 exch2_iHi(1,352)=35 exch2_jLo(1,352)=52 exch2_jHi(1,352)=52 exch2_opposingSend(1,352)=2 exch2_pij(1,1,352)=1 exch2_pij(2,1,352)=0 exch2_pij(3,1,352)=0 exch2_pij(4,1,352)=1 exch2_oi(1,352)=0 exch2_oj(1,352)=0 exch2_neighbourId(2,352)=337 exch2_iLo(2,352)=0 exch2_iHi(2,352)=35 exch2_jLo(2,352)=0 exch2_jHi(2,352)=0 exch2_opposingSend(2,352)=1 exch2_pij(1,2,352)=1 exch2_pij(2,2,352)=0 exch2_pij(3,2,352)=0 exch2_pij(4,2,352)=1 exch2_oi(2,352)=0 exch2_oj(2,352)=0 exch2_neighbourId(3,352)=353 exch2_iLo(3,352)=35 exch2_iHi(3,352)=35 exch2_jLo(3,352)=0 exch2_jHi(3,352)=52 exch2_opposingSend(3,352)=4 exch2_pij(1,3,352)=1 exch2_pij(2,3,352)=0 exch2_pij(3,3,352)=0 exch2_pij(4,3,352)=1 exch2_oi(3,352)=0 exch2_oj(3,352)=0 exch2_neighbourId(4,352)=351 exch2_iLo(4,352)=0 exch2_iHi(4,352)=0 exch2_jLo(4,352)=0 exch2_jHi(4,352)=52 exch2_opposingSend(4,352)=3 exch2_pij(1,4,352)=1 exch2_pij(2,4,352)=0 exch2_pij(3,4,352)=0 exch2_pij(4,4,352)=1 exch2_oi(4,352)=0 exch2_oj(4,352)=0 RETURN END SUBROUTINE W2_E2SETUP_353 C Topology for tile 353 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(353)=34 exch2_tNy(353)=51 exch2_tBasex(353)=238 exch2_tBasey(353)=153 exch2_txGlobalo(353)=1259 exch2_tyGlobalo(353)=154 exch2_isWedge(353)=0 exch2_isNedge(353)=0 exch2_isEedge(353)=0 exch2_isSedge(353)=0 exch2_myFace(353)=3 exch2_mydNx(353)=510 exch2_mydNy(353)=510 exch2_nNeighbours(353)=4 exch2_neighbourId(1,353)=368 exch2_iLo(1,353)=0 exch2_iHi(1,353)=35 exch2_jLo(1,353)=52 exch2_jHi(1,353)=52 exch2_opposingSend(1,353)=2 exch2_pij(1,1,353)=1 exch2_pij(2,1,353)=0 exch2_pij(3,1,353)=0 exch2_pij(4,1,353)=1 exch2_oi(1,353)=0 exch2_oj(1,353)=0 exch2_neighbourId(2,353)=338 exch2_iLo(2,353)=0 exch2_iHi(2,353)=35 exch2_jLo(2,353)=0 exch2_jHi(2,353)=0 exch2_opposingSend(2,353)=1 exch2_pij(1,2,353)=1 exch2_pij(2,2,353)=0 exch2_pij(3,2,353)=0 exch2_pij(4,2,353)=1 exch2_oi(2,353)=0 exch2_oj(2,353)=0 exch2_neighbourId(3,353)=354 exch2_iLo(3,353)=35 exch2_iHi(3,353)=35 exch2_jLo(3,353)=0 exch2_jHi(3,353)=52 exch2_opposingSend(3,353)=4 exch2_pij(1,3,353)=1 exch2_pij(2,3,353)=0 exch2_pij(3,3,353)=0 exch2_pij(4,3,353)=1 exch2_oi(3,353)=0 exch2_oj(3,353)=0 exch2_neighbourId(4,353)=352 exch2_iLo(4,353)=0 exch2_iHi(4,353)=0 exch2_jLo(4,353)=0 exch2_jHi(4,353)=52 exch2_opposingSend(4,353)=3 exch2_pij(1,4,353)=1 exch2_pij(2,4,353)=0 exch2_pij(3,4,353)=0 exch2_pij(4,4,353)=1 exch2_oi(4,353)=0 exch2_oj(4,353)=0 RETURN END SUBROUTINE W2_E2SETUP_354 C Topology for tile 354 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(354)=34 exch2_tNy(354)=51 exch2_tBasex(354)=272 exch2_tBasey(354)=153 exch2_txGlobalo(354)=1293 exch2_tyGlobalo(354)=154 exch2_isWedge(354)=0 exch2_isNedge(354)=0 exch2_isEedge(354)=0 exch2_isSedge(354)=0 exch2_myFace(354)=3 exch2_mydNx(354)=510 exch2_mydNy(354)=510 exch2_nNeighbours(354)=4 exch2_neighbourId(1,354)=369 exch2_iLo(1,354)=0 exch2_iHi(1,354)=35 exch2_jLo(1,354)=52 exch2_jHi(1,354)=52 exch2_opposingSend(1,354)=2 exch2_pij(1,1,354)=1 exch2_pij(2,1,354)=0 exch2_pij(3,1,354)=0 exch2_pij(4,1,354)=1 exch2_oi(1,354)=0 exch2_oj(1,354)=0 exch2_neighbourId(2,354)=339 exch2_iLo(2,354)=0 exch2_iHi(2,354)=35 exch2_jLo(2,354)=0 exch2_jHi(2,354)=0 exch2_opposingSend(2,354)=1 exch2_pij(1,2,354)=1 exch2_pij(2,2,354)=0 exch2_pij(3,2,354)=0 exch2_pij(4,2,354)=1 exch2_oi(2,354)=0 exch2_oj(2,354)=0 exch2_neighbourId(3,354)=355 exch2_iLo(3,354)=35 exch2_iHi(3,354)=35 exch2_jLo(3,354)=0 exch2_jHi(3,354)=52 exch2_opposingSend(3,354)=4 exch2_pij(1,3,354)=1 exch2_pij(2,3,354)=0 exch2_pij(3,3,354)=0 exch2_pij(4,3,354)=1 exch2_oi(3,354)=0 exch2_oj(3,354)=0 exch2_neighbourId(4,354)=353 exch2_iLo(4,354)=0 exch2_iHi(4,354)=0 exch2_jLo(4,354)=0 exch2_jHi(4,354)=52 exch2_opposingSend(4,354)=3 exch2_pij(1,4,354)=1 exch2_pij(2,4,354)=0 exch2_pij(3,4,354)=0 exch2_pij(4,4,354)=1 exch2_oi(4,354)=0 exch2_oj(4,354)=0 RETURN END SUBROUTINE W2_E2SETUP_355 C Topology for tile 355 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(355)=34 exch2_tNy(355)=51 exch2_tBasex(355)=306 exch2_tBasey(355)=153 exch2_txGlobalo(355)=1327 exch2_tyGlobalo(355)=154 exch2_isWedge(355)=0 exch2_isNedge(355)=0 exch2_isEedge(355)=0 exch2_isSedge(355)=0 exch2_myFace(355)=3 exch2_mydNx(355)=510 exch2_mydNy(355)=510 exch2_nNeighbours(355)=4 exch2_neighbourId(1,355)=370 exch2_iLo(1,355)=0 exch2_iHi(1,355)=35 exch2_jLo(1,355)=52 exch2_jHi(1,355)=52 exch2_opposingSend(1,355)=2 exch2_pij(1,1,355)=1 exch2_pij(2,1,355)=0 exch2_pij(3,1,355)=0 exch2_pij(4,1,355)=1 exch2_oi(1,355)=0 exch2_oj(1,355)=0 exch2_neighbourId(2,355)=340 exch2_iLo(2,355)=0 exch2_iHi(2,355)=35 exch2_jLo(2,355)=0 exch2_jHi(2,355)=0 exch2_opposingSend(2,355)=1 exch2_pij(1,2,355)=1 exch2_pij(2,2,355)=0 exch2_pij(3,2,355)=0 exch2_pij(4,2,355)=1 exch2_oi(2,355)=0 exch2_oj(2,355)=0 exch2_neighbourId(3,355)=356 exch2_iLo(3,355)=35 exch2_iHi(3,355)=35 exch2_jLo(3,355)=0 exch2_jHi(3,355)=52 exch2_opposingSend(3,355)=4 exch2_pij(1,3,355)=1 exch2_pij(2,3,355)=0 exch2_pij(3,3,355)=0 exch2_pij(4,3,355)=1 exch2_oi(3,355)=0 exch2_oj(3,355)=0 exch2_neighbourId(4,355)=354 exch2_iLo(4,355)=0 exch2_iHi(4,355)=0 exch2_jLo(4,355)=0 exch2_jHi(4,355)=52 exch2_opposingSend(4,355)=3 exch2_pij(1,4,355)=1 exch2_pij(2,4,355)=0 exch2_pij(3,4,355)=0 exch2_pij(4,4,355)=1 exch2_oi(4,355)=0 exch2_oj(4,355)=0 RETURN END SUBROUTINE W2_E2SETUP_356 C Topology for tile 356 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(356)=34 exch2_tNy(356)=51 exch2_tBasex(356)=340 exch2_tBasey(356)=153 exch2_txGlobalo(356)=1361 exch2_tyGlobalo(356)=154 exch2_isWedge(356)=0 exch2_isNedge(356)=0 exch2_isEedge(356)=0 exch2_isSedge(356)=0 exch2_myFace(356)=3 exch2_mydNx(356)=510 exch2_mydNy(356)=510 exch2_nNeighbours(356)=4 exch2_neighbourId(1,356)=371 exch2_iLo(1,356)=0 exch2_iHi(1,356)=35 exch2_jLo(1,356)=52 exch2_jHi(1,356)=52 exch2_opposingSend(1,356)=2 exch2_pij(1,1,356)=1 exch2_pij(2,1,356)=0 exch2_pij(3,1,356)=0 exch2_pij(4,1,356)=1 exch2_oi(1,356)=0 exch2_oj(1,356)=0 exch2_neighbourId(2,356)=341 exch2_iLo(2,356)=0 exch2_iHi(2,356)=35 exch2_jLo(2,356)=0 exch2_jHi(2,356)=0 exch2_opposingSend(2,356)=1 exch2_pij(1,2,356)=1 exch2_pij(2,2,356)=0 exch2_pij(3,2,356)=0 exch2_pij(4,2,356)=1 exch2_oi(2,356)=0 exch2_oj(2,356)=0 exch2_neighbourId(3,356)=357 exch2_iLo(3,356)=35 exch2_iHi(3,356)=35 exch2_jLo(3,356)=0 exch2_jHi(3,356)=52 exch2_opposingSend(3,356)=4 exch2_pij(1,3,356)=1 exch2_pij(2,3,356)=0 exch2_pij(3,3,356)=0 exch2_pij(4,3,356)=1 exch2_oi(3,356)=0 exch2_oj(3,356)=0 exch2_neighbourId(4,356)=355 exch2_iLo(4,356)=0 exch2_iHi(4,356)=0 exch2_jLo(4,356)=0 exch2_jHi(4,356)=52 exch2_opposingSend(4,356)=3 exch2_pij(1,4,356)=1 exch2_pij(2,4,356)=0 exch2_pij(3,4,356)=0 exch2_pij(4,4,356)=1 exch2_oi(4,356)=0 exch2_oj(4,356)=0 RETURN END SUBROUTINE W2_E2SETUP_357 C Topology for tile 357 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(357)=34 exch2_tNy(357)=51 exch2_tBasex(357)=374 exch2_tBasey(357)=153 exch2_txGlobalo(357)=1395 exch2_tyGlobalo(357)=154 exch2_isWedge(357)=0 exch2_isNedge(357)=0 exch2_isEedge(357)=0 exch2_isSedge(357)=0 exch2_myFace(357)=3 exch2_mydNx(357)=510 exch2_mydNy(357)=510 exch2_nNeighbours(357)=4 exch2_neighbourId(1,357)=372 exch2_iLo(1,357)=0 exch2_iHi(1,357)=35 exch2_jLo(1,357)=52 exch2_jHi(1,357)=52 exch2_opposingSend(1,357)=2 exch2_pij(1,1,357)=1 exch2_pij(2,1,357)=0 exch2_pij(3,1,357)=0 exch2_pij(4,1,357)=1 exch2_oi(1,357)=0 exch2_oj(1,357)=0 exch2_neighbourId(2,357)=342 exch2_iLo(2,357)=0 exch2_iHi(2,357)=35 exch2_jLo(2,357)=0 exch2_jHi(2,357)=0 exch2_opposingSend(2,357)=1 exch2_pij(1,2,357)=1 exch2_pij(2,2,357)=0 exch2_pij(3,2,357)=0 exch2_pij(4,2,357)=1 exch2_oi(2,357)=0 exch2_oj(2,357)=0 exch2_neighbourId(3,357)=358 exch2_iLo(3,357)=35 exch2_iHi(3,357)=35 exch2_jLo(3,357)=0 exch2_jHi(3,357)=52 exch2_opposingSend(3,357)=4 exch2_pij(1,3,357)=1 exch2_pij(2,3,357)=0 exch2_pij(3,3,357)=0 exch2_pij(4,3,357)=1 exch2_oi(3,357)=0 exch2_oj(3,357)=0 exch2_neighbourId(4,357)=356 exch2_iLo(4,357)=0 exch2_iHi(4,357)=0 exch2_jLo(4,357)=0 exch2_jHi(4,357)=52 exch2_opposingSend(4,357)=3 exch2_pij(1,4,357)=1 exch2_pij(2,4,357)=0 exch2_pij(3,4,357)=0 exch2_pij(4,4,357)=1 exch2_oi(4,357)=0 exch2_oj(4,357)=0 RETURN END SUBROUTINE W2_E2SETUP_358 C Topology for tile 358 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(358)=34 exch2_tNy(358)=51 exch2_tBasex(358)=408 exch2_tBasey(358)=153 exch2_txGlobalo(358)=1429 exch2_tyGlobalo(358)=154 exch2_isWedge(358)=0 exch2_isNedge(358)=0 exch2_isEedge(358)=0 exch2_isSedge(358)=0 exch2_myFace(358)=3 exch2_mydNx(358)=510 exch2_mydNy(358)=510 exch2_nNeighbours(358)=4 exch2_neighbourId(1,358)=373 exch2_iLo(1,358)=0 exch2_iHi(1,358)=35 exch2_jLo(1,358)=52 exch2_jHi(1,358)=52 exch2_opposingSend(1,358)=2 exch2_pij(1,1,358)=1 exch2_pij(2,1,358)=0 exch2_pij(3,1,358)=0 exch2_pij(4,1,358)=1 exch2_oi(1,358)=0 exch2_oj(1,358)=0 exch2_neighbourId(2,358)=343 exch2_iLo(2,358)=0 exch2_iHi(2,358)=35 exch2_jLo(2,358)=0 exch2_jHi(2,358)=0 exch2_opposingSend(2,358)=1 exch2_pij(1,2,358)=1 exch2_pij(2,2,358)=0 exch2_pij(3,2,358)=0 exch2_pij(4,2,358)=1 exch2_oi(2,358)=0 exch2_oj(2,358)=0 exch2_neighbourId(3,358)=359 exch2_iLo(3,358)=35 exch2_iHi(3,358)=35 exch2_jLo(3,358)=0 exch2_jHi(3,358)=52 exch2_opposingSend(3,358)=4 exch2_pij(1,3,358)=1 exch2_pij(2,3,358)=0 exch2_pij(3,3,358)=0 exch2_pij(4,3,358)=1 exch2_oi(3,358)=0 exch2_oj(3,358)=0 exch2_neighbourId(4,358)=357 exch2_iLo(4,358)=0 exch2_iHi(4,358)=0 exch2_jLo(4,358)=0 exch2_jHi(4,358)=52 exch2_opposingSend(4,358)=3 exch2_pij(1,4,358)=1 exch2_pij(2,4,358)=0 exch2_pij(3,4,358)=0 exch2_pij(4,4,358)=1 exch2_oi(4,358)=0 exch2_oj(4,358)=0 RETURN END SUBROUTINE W2_E2SETUP_359 C Topology for tile 359 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(359)=34 exch2_tNy(359)=51 exch2_tBasex(359)=442 exch2_tBasey(359)=153 exch2_txGlobalo(359)=1463 exch2_tyGlobalo(359)=154 exch2_isWedge(359)=0 exch2_isNedge(359)=0 exch2_isEedge(359)=0 exch2_isSedge(359)=0 exch2_myFace(359)=3 exch2_mydNx(359)=510 exch2_mydNy(359)=510 exch2_nNeighbours(359)=4 exch2_neighbourId(1,359)=374 exch2_iLo(1,359)=0 exch2_iHi(1,359)=35 exch2_jLo(1,359)=52 exch2_jHi(1,359)=52 exch2_opposingSend(1,359)=2 exch2_pij(1,1,359)=1 exch2_pij(2,1,359)=0 exch2_pij(3,1,359)=0 exch2_pij(4,1,359)=1 exch2_oi(1,359)=0 exch2_oj(1,359)=0 exch2_neighbourId(2,359)=344 exch2_iLo(2,359)=0 exch2_iHi(2,359)=35 exch2_jLo(2,359)=0 exch2_jHi(2,359)=0 exch2_opposingSend(2,359)=1 exch2_pij(1,2,359)=1 exch2_pij(2,2,359)=0 exch2_pij(3,2,359)=0 exch2_pij(4,2,359)=1 exch2_oi(2,359)=0 exch2_oj(2,359)=0 exch2_neighbourId(3,359)=360 exch2_iLo(3,359)=35 exch2_iHi(3,359)=35 exch2_jLo(3,359)=0 exch2_jHi(3,359)=52 exch2_opposingSend(3,359)=4 exch2_pij(1,3,359)=1 exch2_pij(2,3,359)=0 exch2_pij(3,3,359)=0 exch2_pij(4,3,359)=1 exch2_oi(3,359)=0 exch2_oj(3,359)=0 exch2_neighbourId(4,359)=358 exch2_iLo(4,359)=0 exch2_iHi(4,359)=0 exch2_jLo(4,359)=0 exch2_jHi(4,359)=52 exch2_opposingSend(4,359)=3 exch2_pij(1,4,359)=1 exch2_pij(2,4,359)=0 exch2_pij(3,4,359)=0 exch2_pij(4,4,359)=1 exch2_oi(4,359)=0 exch2_oj(4,359)=0 RETURN END SUBROUTINE W2_E2SETUP_360 C Topology for tile 360 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(360)=34 exch2_tNy(360)=51 exch2_tBasex(360)=476 exch2_tBasey(360)=153 exch2_txGlobalo(360)=1497 exch2_tyGlobalo(360)=154 exch2_isWedge(360)=0 exch2_isNedge(360)=0 exch2_isEedge(360)=1 exch2_isSedge(360)=0 exch2_myFace(360)=3 exch2_mydNx(360)=510 exch2_mydNy(360)=510 exch2_nNeighbours(360)=4 exch2_neighbourId(1,360)=375 exch2_iLo(1,360)=0 exch2_iHi(1,360)=35 exch2_jLo(1,360)=52 exch2_jHi(1,360)=52 exch2_opposingSend(1,360)=2 exch2_pij(1,1,360)=1 exch2_pij(2,1,360)=0 exch2_pij(3,1,360)=0 exch2_pij(4,1,360)=1 exch2_oi(1,360)=0 exch2_oj(1,360)=0 exch2_neighbourId(2,360)=345 exch2_iLo(2,360)=0 exch2_iHi(2,360)=35 exch2_jLo(2,360)=0 exch2_jHi(2,360)=0 exch2_opposingSend(2,360)=1 exch2_pij(1,2,360)=1 exch2_pij(2,2,360)=0 exch2_pij(3,2,360)=0 exch2_pij(4,2,360)=1 exch2_oi(2,360)=0 exch2_oj(2,360)=0 exch2_neighbourId(3,360)=496 exch2_iLo(3,360)=35 exch2_iHi(3,360)=35 exch2_jLo(3,360)=0 exch2_jHi(3,360)=52 exch2_opposingSend(3,360)=4 exch2_pij(1,3,360)=1 exch2_pij(2,3,360)=0 exch2_pij(3,3,360)=0 exch2_pij(4,3,360)=1 exch2_oi(3,360)=510 exch2_oj(3,360)=0 exch2_neighbourId(4,360)=359 exch2_iLo(4,360)=0 exch2_iHi(4,360)=0 exch2_jLo(4,360)=0 exch2_jHi(4,360)=52 exch2_opposingSend(4,360)=3 exch2_pij(1,4,360)=1 exch2_pij(2,4,360)=0 exch2_pij(3,4,360)=0 exch2_pij(4,4,360)=1 exch2_oi(4,360)=0 exch2_oj(4,360)=0 RETURN END SUBROUTINE W2_E2SETUP_361 C Topology for tile 361 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(361)=34 exch2_tNy(361)=51 exch2_tBasex(361)=0 exch2_tBasey(361)=204 exch2_txGlobalo(361)=1021 exch2_tyGlobalo(361)=205 exch2_isWedge(361)=1 exch2_isNedge(361)=0 exch2_isEedge(361)=0 exch2_isSedge(361)=0 exch2_myFace(361)=3 exch2_mydNx(361)=510 exch2_mydNy(361)=510 exch2_nNeighbours(361)=5 exch2_neighbourId(1,361)=376 exch2_iLo(1,361)=0 exch2_iHi(1,361)=35 exch2_jLo(1,361)=52 exch2_jHi(1,361)=52 exch2_opposingSend(1,361)=2 exch2_pij(1,1,361)=1 exch2_pij(2,1,361)=0 exch2_pij(3,1,361)=0 exch2_pij(4,1,361)=1 exch2_oi(1,361)=0 exch2_oj(1,361)=0 exch2_neighbourId(2,361)=346 exch2_iLo(2,361)=0 exch2_iHi(2,361)=35 exch2_jLo(2,361)=0 exch2_jHi(2,361)=0 exch2_opposingSend(2,361)=1 exch2_pij(1,2,361)=1 exch2_pij(2,2,361)=0 exch2_pij(3,2,361)=0 exch2_pij(4,2,361)=1 exch2_oi(2,361)=0 exch2_oj(2,361)=0 exch2_neighbourId(3,361)=362 exch2_iLo(3,361)=35 exch2_iHi(3,361)=35 exch2_jLo(3,361)=0 exch2_jHi(3,361)=52 exch2_opposingSend(3,361)=4 exch2_pij(1,3,361)=1 exch2_pij(2,3,361)=0 exch2_pij(3,3,361)=0 exch2_pij(4,3,361)=1 exch2_oi(3,361)=0 exch2_oj(3,361)=0 exch2_neighbourId(4,361)=143 exch2_iLo(4,361)=0 exch2_iHi(4,361)=0 exch2_jLo(4,361)=34 exch2_jHi(4,361)=52 exch2_opposingSend(4,361)=1 exch2_pij(1,4,361)=0 exch2_pij(2,4,361)=1 exch2_pij(3,4,361)=-1 exch2_pij(4,4,361)=0 exch2_oi(4,361)=-510 exch2_oj(4,361)=511 exch2_neighbourId(5,361)=144 exch2_iLo(5,361)=0 exch2_iHi(5,361)=0 exch2_jLo(5,361)=0 exch2_jHi(5,361)=35 exch2_opposingSend(5,361)=1 exch2_pij(1,5,361)=0 exch2_pij(2,5,361)=1 exch2_pij(3,5,361)=-1 exch2_pij(4,5,361)=0 exch2_oi(5,361)=-510 exch2_oj(5,361)=511 RETURN END SUBROUTINE W2_E2SETUP_362 C Topology for tile 362 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(362)=34 exch2_tNy(362)=51 exch2_tBasex(362)=34 exch2_tBasey(362)=204 exch2_txGlobalo(362)=1055 exch2_tyGlobalo(362)=205 exch2_isWedge(362)=0 exch2_isNedge(362)=0 exch2_isEedge(362)=0 exch2_isSedge(362)=0 exch2_myFace(362)=3 exch2_mydNx(362)=510 exch2_mydNy(362)=510 exch2_nNeighbours(362)=4 exch2_neighbourId(1,362)=377 exch2_iLo(1,362)=0 exch2_iHi(1,362)=35 exch2_jLo(1,362)=52 exch2_jHi(1,362)=52 exch2_opposingSend(1,362)=2 exch2_pij(1,1,362)=1 exch2_pij(2,1,362)=0 exch2_pij(3,1,362)=0 exch2_pij(4,1,362)=1 exch2_oi(1,362)=0 exch2_oj(1,362)=0 exch2_neighbourId(2,362)=347 exch2_iLo(2,362)=0 exch2_iHi(2,362)=35 exch2_jLo(2,362)=0 exch2_jHi(2,362)=0 exch2_opposingSend(2,362)=1 exch2_pij(1,2,362)=1 exch2_pij(2,2,362)=0 exch2_pij(3,2,362)=0 exch2_pij(4,2,362)=1 exch2_oi(2,362)=0 exch2_oj(2,362)=0 exch2_neighbourId(3,362)=363 exch2_iLo(3,362)=35 exch2_iHi(3,362)=35 exch2_jLo(3,362)=0 exch2_jHi(3,362)=52 exch2_opposingSend(3,362)=4 exch2_pij(1,3,362)=1 exch2_pij(2,3,362)=0 exch2_pij(3,3,362)=0 exch2_pij(4,3,362)=1 exch2_oi(3,362)=0 exch2_oj(3,362)=0 exch2_neighbourId(4,362)=361 exch2_iLo(4,362)=0 exch2_iHi(4,362)=0 exch2_jLo(4,362)=0 exch2_jHi(4,362)=52 exch2_opposingSend(4,362)=3 exch2_pij(1,4,362)=1 exch2_pij(2,4,362)=0 exch2_pij(3,4,362)=0 exch2_pij(4,4,362)=1 exch2_oi(4,362)=0 exch2_oj(4,362)=0 RETURN END SUBROUTINE W2_E2SETUP_363 C Topology for tile 363 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(363)=34 exch2_tNy(363)=51 exch2_tBasex(363)=68 exch2_tBasey(363)=204 exch2_txGlobalo(363)=1089 exch2_tyGlobalo(363)=205 exch2_isWedge(363)=0 exch2_isNedge(363)=0 exch2_isEedge(363)=0 exch2_isSedge(363)=0 exch2_myFace(363)=3 exch2_mydNx(363)=510 exch2_mydNy(363)=510 exch2_nNeighbours(363)=4 exch2_neighbourId(1,363)=378 exch2_iLo(1,363)=0 exch2_iHi(1,363)=35 exch2_jLo(1,363)=52 exch2_jHi(1,363)=52 exch2_opposingSend(1,363)=2 exch2_pij(1,1,363)=1 exch2_pij(2,1,363)=0 exch2_pij(3,1,363)=0 exch2_pij(4,1,363)=1 exch2_oi(1,363)=0 exch2_oj(1,363)=0 exch2_neighbourId(2,363)=348 exch2_iLo(2,363)=0 exch2_iHi(2,363)=35 exch2_jLo(2,363)=0 exch2_jHi(2,363)=0 exch2_opposingSend(2,363)=1 exch2_pij(1,2,363)=1 exch2_pij(2,2,363)=0 exch2_pij(3,2,363)=0 exch2_pij(4,2,363)=1 exch2_oi(2,363)=0 exch2_oj(2,363)=0 exch2_neighbourId(3,363)=364 exch2_iLo(3,363)=35 exch2_iHi(3,363)=35 exch2_jLo(3,363)=0 exch2_jHi(3,363)=52 exch2_opposingSend(3,363)=4 exch2_pij(1,3,363)=1 exch2_pij(2,3,363)=0 exch2_pij(3,3,363)=0 exch2_pij(4,3,363)=1 exch2_oi(3,363)=0 exch2_oj(3,363)=0 exch2_neighbourId(4,363)=362 exch2_iLo(4,363)=0 exch2_iHi(4,363)=0 exch2_jLo(4,363)=0 exch2_jHi(4,363)=52 exch2_opposingSend(4,363)=3 exch2_pij(1,4,363)=1 exch2_pij(2,4,363)=0 exch2_pij(3,4,363)=0 exch2_pij(4,4,363)=1 exch2_oi(4,363)=0 exch2_oj(4,363)=0 RETURN END SUBROUTINE W2_E2SETUP_364 C Topology for tile 364 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(364)=34 exch2_tNy(364)=51 exch2_tBasex(364)=102 exch2_tBasey(364)=204 exch2_txGlobalo(364)=1123 exch2_tyGlobalo(364)=205 exch2_isWedge(364)=0 exch2_isNedge(364)=0 exch2_isEedge(364)=0 exch2_isSedge(364)=0 exch2_myFace(364)=3 exch2_mydNx(364)=510 exch2_mydNy(364)=510 exch2_nNeighbours(364)=4 exch2_neighbourId(1,364)=379 exch2_iLo(1,364)=0 exch2_iHi(1,364)=35 exch2_jLo(1,364)=52 exch2_jHi(1,364)=52 exch2_opposingSend(1,364)=2 exch2_pij(1,1,364)=1 exch2_pij(2,1,364)=0 exch2_pij(3,1,364)=0 exch2_pij(4,1,364)=1 exch2_oi(1,364)=0 exch2_oj(1,364)=0 exch2_neighbourId(2,364)=349 exch2_iLo(2,364)=0 exch2_iHi(2,364)=35 exch2_jLo(2,364)=0 exch2_jHi(2,364)=0 exch2_opposingSend(2,364)=1 exch2_pij(1,2,364)=1 exch2_pij(2,2,364)=0 exch2_pij(3,2,364)=0 exch2_pij(4,2,364)=1 exch2_oi(2,364)=0 exch2_oj(2,364)=0 exch2_neighbourId(3,364)=365 exch2_iLo(3,364)=35 exch2_iHi(3,364)=35 exch2_jLo(3,364)=0 exch2_jHi(3,364)=52 exch2_opposingSend(3,364)=4 exch2_pij(1,3,364)=1 exch2_pij(2,3,364)=0 exch2_pij(3,3,364)=0 exch2_pij(4,3,364)=1 exch2_oi(3,364)=0 exch2_oj(3,364)=0 exch2_neighbourId(4,364)=363 exch2_iLo(4,364)=0 exch2_iHi(4,364)=0 exch2_jLo(4,364)=0 exch2_jHi(4,364)=52 exch2_opposingSend(4,364)=3 exch2_pij(1,4,364)=1 exch2_pij(2,4,364)=0 exch2_pij(3,4,364)=0 exch2_pij(4,4,364)=1 exch2_oi(4,364)=0 exch2_oj(4,364)=0 RETURN END SUBROUTINE W2_E2SETUP_365 C Topology for tile 365 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(365)=34 exch2_tNy(365)=51 exch2_tBasex(365)=136 exch2_tBasey(365)=204 exch2_txGlobalo(365)=1157 exch2_tyGlobalo(365)=205 exch2_isWedge(365)=0 exch2_isNedge(365)=0 exch2_isEedge(365)=0 exch2_isSedge(365)=0 exch2_myFace(365)=3 exch2_mydNx(365)=510 exch2_mydNy(365)=510 exch2_nNeighbours(365)=4 exch2_neighbourId(1,365)=380 exch2_iLo(1,365)=0 exch2_iHi(1,365)=35 exch2_jLo(1,365)=52 exch2_jHi(1,365)=52 exch2_opposingSend(1,365)=2 exch2_pij(1,1,365)=1 exch2_pij(2,1,365)=0 exch2_pij(3,1,365)=0 exch2_pij(4,1,365)=1 exch2_oi(1,365)=0 exch2_oj(1,365)=0 exch2_neighbourId(2,365)=350 exch2_iLo(2,365)=0 exch2_iHi(2,365)=35 exch2_jLo(2,365)=0 exch2_jHi(2,365)=0 exch2_opposingSend(2,365)=1 exch2_pij(1,2,365)=1 exch2_pij(2,2,365)=0 exch2_pij(3,2,365)=0 exch2_pij(4,2,365)=1 exch2_oi(2,365)=0 exch2_oj(2,365)=0 exch2_neighbourId(3,365)=366 exch2_iLo(3,365)=35 exch2_iHi(3,365)=35 exch2_jLo(3,365)=0 exch2_jHi(3,365)=52 exch2_opposingSend(3,365)=4 exch2_pij(1,3,365)=1 exch2_pij(2,3,365)=0 exch2_pij(3,3,365)=0 exch2_pij(4,3,365)=1 exch2_oi(3,365)=0 exch2_oj(3,365)=0 exch2_neighbourId(4,365)=364 exch2_iLo(4,365)=0 exch2_iHi(4,365)=0 exch2_jLo(4,365)=0 exch2_jHi(4,365)=52 exch2_opposingSend(4,365)=3 exch2_pij(1,4,365)=1 exch2_pij(2,4,365)=0 exch2_pij(3,4,365)=0 exch2_pij(4,4,365)=1 exch2_oi(4,365)=0 exch2_oj(4,365)=0 RETURN END SUBROUTINE W2_E2SETUP_366 C Topology for tile 366 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(366)=34 exch2_tNy(366)=51 exch2_tBasex(366)=170 exch2_tBasey(366)=204 exch2_txGlobalo(366)=1191 exch2_tyGlobalo(366)=205 exch2_isWedge(366)=0 exch2_isNedge(366)=0 exch2_isEedge(366)=0 exch2_isSedge(366)=0 exch2_myFace(366)=3 exch2_mydNx(366)=510 exch2_mydNy(366)=510 exch2_nNeighbours(366)=4 exch2_neighbourId(1,366)=381 exch2_iLo(1,366)=0 exch2_iHi(1,366)=35 exch2_jLo(1,366)=52 exch2_jHi(1,366)=52 exch2_opposingSend(1,366)=2 exch2_pij(1,1,366)=1 exch2_pij(2,1,366)=0 exch2_pij(3,1,366)=0 exch2_pij(4,1,366)=1 exch2_oi(1,366)=0 exch2_oj(1,366)=0 exch2_neighbourId(2,366)=351 exch2_iLo(2,366)=0 exch2_iHi(2,366)=35 exch2_jLo(2,366)=0 exch2_jHi(2,366)=0 exch2_opposingSend(2,366)=1 exch2_pij(1,2,366)=1 exch2_pij(2,2,366)=0 exch2_pij(3,2,366)=0 exch2_pij(4,2,366)=1 exch2_oi(2,366)=0 exch2_oj(2,366)=0 exch2_neighbourId(3,366)=367 exch2_iLo(3,366)=35 exch2_iHi(3,366)=35 exch2_jLo(3,366)=0 exch2_jHi(3,366)=52 exch2_opposingSend(3,366)=4 exch2_pij(1,3,366)=1 exch2_pij(2,3,366)=0 exch2_pij(3,3,366)=0 exch2_pij(4,3,366)=1 exch2_oi(3,366)=0 exch2_oj(3,366)=0 exch2_neighbourId(4,366)=365 exch2_iLo(4,366)=0 exch2_iHi(4,366)=0 exch2_jLo(4,366)=0 exch2_jHi(4,366)=52 exch2_opposingSend(4,366)=3 exch2_pij(1,4,366)=1 exch2_pij(2,4,366)=0 exch2_pij(3,4,366)=0 exch2_pij(4,4,366)=1 exch2_oi(4,366)=0 exch2_oj(4,366)=0 RETURN END SUBROUTINE W2_E2SETUP_367 C Topology for tile 367 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(367)=34 exch2_tNy(367)=51 exch2_tBasex(367)=204 exch2_tBasey(367)=204 exch2_txGlobalo(367)=1225 exch2_tyGlobalo(367)=205 exch2_isWedge(367)=0 exch2_isNedge(367)=0 exch2_isEedge(367)=0 exch2_isSedge(367)=0 exch2_myFace(367)=3 exch2_mydNx(367)=510 exch2_mydNy(367)=510 exch2_nNeighbours(367)=4 exch2_neighbourId(1,367)=382 exch2_iLo(1,367)=0 exch2_iHi(1,367)=35 exch2_jLo(1,367)=52 exch2_jHi(1,367)=52 exch2_opposingSend(1,367)=2 exch2_pij(1,1,367)=1 exch2_pij(2,1,367)=0 exch2_pij(3,1,367)=0 exch2_pij(4,1,367)=1 exch2_oi(1,367)=0 exch2_oj(1,367)=0 exch2_neighbourId(2,367)=352 exch2_iLo(2,367)=0 exch2_iHi(2,367)=35 exch2_jLo(2,367)=0 exch2_jHi(2,367)=0 exch2_opposingSend(2,367)=1 exch2_pij(1,2,367)=1 exch2_pij(2,2,367)=0 exch2_pij(3,2,367)=0 exch2_pij(4,2,367)=1 exch2_oi(2,367)=0 exch2_oj(2,367)=0 exch2_neighbourId(3,367)=368 exch2_iLo(3,367)=35 exch2_iHi(3,367)=35 exch2_jLo(3,367)=0 exch2_jHi(3,367)=52 exch2_opposingSend(3,367)=4 exch2_pij(1,3,367)=1 exch2_pij(2,3,367)=0 exch2_pij(3,3,367)=0 exch2_pij(4,3,367)=1 exch2_oi(3,367)=0 exch2_oj(3,367)=0 exch2_neighbourId(4,367)=366 exch2_iLo(4,367)=0 exch2_iHi(4,367)=0 exch2_jLo(4,367)=0 exch2_jHi(4,367)=52 exch2_opposingSend(4,367)=3 exch2_pij(1,4,367)=1 exch2_pij(2,4,367)=0 exch2_pij(3,4,367)=0 exch2_pij(4,4,367)=1 exch2_oi(4,367)=0 exch2_oj(4,367)=0 RETURN END SUBROUTINE W2_E2SETUP_368 C Topology for tile 368 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(368)=34 exch2_tNy(368)=51 exch2_tBasex(368)=238 exch2_tBasey(368)=204 exch2_txGlobalo(368)=1259 exch2_tyGlobalo(368)=205 exch2_isWedge(368)=0 exch2_isNedge(368)=0 exch2_isEedge(368)=0 exch2_isSedge(368)=0 exch2_myFace(368)=3 exch2_mydNx(368)=510 exch2_mydNy(368)=510 exch2_nNeighbours(368)=4 exch2_neighbourId(1,368)=383 exch2_iLo(1,368)=0 exch2_iHi(1,368)=35 exch2_jLo(1,368)=52 exch2_jHi(1,368)=52 exch2_opposingSend(1,368)=2 exch2_pij(1,1,368)=1 exch2_pij(2,1,368)=0 exch2_pij(3,1,368)=0 exch2_pij(4,1,368)=1 exch2_oi(1,368)=0 exch2_oj(1,368)=0 exch2_neighbourId(2,368)=353 exch2_iLo(2,368)=0 exch2_iHi(2,368)=35 exch2_jLo(2,368)=0 exch2_jHi(2,368)=0 exch2_opposingSend(2,368)=1 exch2_pij(1,2,368)=1 exch2_pij(2,2,368)=0 exch2_pij(3,2,368)=0 exch2_pij(4,2,368)=1 exch2_oi(2,368)=0 exch2_oj(2,368)=0 exch2_neighbourId(3,368)=369 exch2_iLo(3,368)=35 exch2_iHi(3,368)=35 exch2_jLo(3,368)=0 exch2_jHi(3,368)=52 exch2_opposingSend(3,368)=4 exch2_pij(1,3,368)=1 exch2_pij(2,3,368)=0 exch2_pij(3,3,368)=0 exch2_pij(4,3,368)=1 exch2_oi(3,368)=0 exch2_oj(3,368)=0 exch2_neighbourId(4,368)=367 exch2_iLo(4,368)=0 exch2_iHi(4,368)=0 exch2_jLo(4,368)=0 exch2_jHi(4,368)=52 exch2_opposingSend(4,368)=3 exch2_pij(1,4,368)=1 exch2_pij(2,4,368)=0 exch2_pij(3,4,368)=0 exch2_pij(4,4,368)=1 exch2_oi(4,368)=0 exch2_oj(4,368)=0 RETURN END SUBROUTINE W2_E2SETUP_369 C Topology for tile 369 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(369)=34 exch2_tNy(369)=51 exch2_tBasex(369)=272 exch2_tBasey(369)=204 exch2_txGlobalo(369)=1293 exch2_tyGlobalo(369)=205 exch2_isWedge(369)=0 exch2_isNedge(369)=0 exch2_isEedge(369)=0 exch2_isSedge(369)=0 exch2_myFace(369)=3 exch2_mydNx(369)=510 exch2_mydNy(369)=510 exch2_nNeighbours(369)=4 exch2_neighbourId(1,369)=384 exch2_iLo(1,369)=0 exch2_iHi(1,369)=35 exch2_jLo(1,369)=52 exch2_jHi(1,369)=52 exch2_opposingSend(1,369)=2 exch2_pij(1,1,369)=1 exch2_pij(2,1,369)=0 exch2_pij(3,1,369)=0 exch2_pij(4,1,369)=1 exch2_oi(1,369)=0 exch2_oj(1,369)=0 exch2_neighbourId(2,369)=354 exch2_iLo(2,369)=0 exch2_iHi(2,369)=35 exch2_jLo(2,369)=0 exch2_jHi(2,369)=0 exch2_opposingSend(2,369)=1 exch2_pij(1,2,369)=1 exch2_pij(2,2,369)=0 exch2_pij(3,2,369)=0 exch2_pij(4,2,369)=1 exch2_oi(2,369)=0 exch2_oj(2,369)=0 exch2_neighbourId(3,369)=370 exch2_iLo(3,369)=35 exch2_iHi(3,369)=35 exch2_jLo(3,369)=0 exch2_jHi(3,369)=52 exch2_opposingSend(3,369)=4 exch2_pij(1,3,369)=1 exch2_pij(2,3,369)=0 exch2_pij(3,3,369)=0 exch2_pij(4,3,369)=1 exch2_oi(3,369)=0 exch2_oj(3,369)=0 exch2_neighbourId(4,369)=368 exch2_iLo(4,369)=0 exch2_iHi(4,369)=0 exch2_jLo(4,369)=0 exch2_jHi(4,369)=52 exch2_opposingSend(4,369)=3 exch2_pij(1,4,369)=1 exch2_pij(2,4,369)=0 exch2_pij(3,4,369)=0 exch2_pij(4,4,369)=1 exch2_oi(4,369)=0 exch2_oj(4,369)=0 RETURN END SUBROUTINE W2_E2SETUP_370 C Topology for tile 370 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(370)=34 exch2_tNy(370)=51 exch2_tBasex(370)=306 exch2_tBasey(370)=204 exch2_txGlobalo(370)=1327 exch2_tyGlobalo(370)=205 exch2_isWedge(370)=0 exch2_isNedge(370)=0 exch2_isEedge(370)=0 exch2_isSedge(370)=0 exch2_myFace(370)=3 exch2_mydNx(370)=510 exch2_mydNy(370)=510 exch2_nNeighbours(370)=4 exch2_neighbourId(1,370)=385 exch2_iLo(1,370)=0 exch2_iHi(1,370)=35 exch2_jLo(1,370)=52 exch2_jHi(1,370)=52 exch2_opposingSend(1,370)=2 exch2_pij(1,1,370)=1 exch2_pij(2,1,370)=0 exch2_pij(3,1,370)=0 exch2_pij(4,1,370)=1 exch2_oi(1,370)=0 exch2_oj(1,370)=0 exch2_neighbourId(2,370)=355 exch2_iLo(2,370)=0 exch2_iHi(2,370)=35 exch2_jLo(2,370)=0 exch2_jHi(2,370)=0 exch2_opposingSend(2,370)=1 exch2_pij(1,2,370)=1 exch2_pij(2,2,370)=0 exch2_pij(3,2,370)=0 exch2_pij(4,2,370)=1 exch2_oi(2,370)=0 exch2_oj(2,370)=0 exch2_neighbourId(3,370)=371 exch2_iLo(3,370)=35 exch2_iHi(3,370)=35 exch2_jLo(3,370)=0 exch2_jHi(3,370)=52 exch2_opposingSend(3,370)=4 exch2_pij(1,3,370)=1 exch2_pij(2,3,370)=0 exch2_pij(3,3,370)=0 exch2_pij(4,3,370)=1 exch2_oi(3,370)=0 exch2_oj(3,370)=0 exch2_neighbourId(4,370)=369 exch2_iLo(4,370)=0 exch2_iHi(4,370)=0 exch2_jLo(4,370)=0 exch2_jHi(4,370)=52 exch2_opposingSend(4,370)=3 exch2_pij(1,4,370)=1 exch2_pij(2,4,370)=0 exch2_pij(3,4,370)=0 exch2_pij(4,4,370)=1 exch2_oi(4,370)=0 exch2_oj(4,370)=0 RETURN END SUBROUTINE W2_E2SETUP_371 C Topology for tile 371 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(371)=34 exch2_tNy(371)=51 exch2_tBasex(371)=340 exch2_tBasey(371)=204 exch2_txGlobalo(371)=1361 exch2_tyGlobalo(371)=205 exch2_isWedge(371)=0 exch2_isNedge(371)=0 exch2_isEedge(371)=0 exch2_isSedge(371)=0 exch2_myFace(371)=3 exch2_mydNx(371)=510 exch2_mydNy(371)=510 exch2_nNeighbours(371)=4 exch2_neighbourId(1,371)=386 exch2_iLo(1,371)=0 exch2_iHi(1,371)=35 exch2_jLo(1,371)=52 exch2_jHi(1,371)=52 exch2_opposingSend(1,371)=2 exch2_pij(1,1,371)=1 exch2_pij(2,1,371)=0 exch2_pij(3,1,371)=0 exch2_pij(4,1,371)=1 exch2_oi(1,371)=0 exch2_oj(1,371)=0 exch2_neighbourId(2,371)=356 exch2_iLo(2,371)=0 exch2_iHi(2,371)=35 exch2_jLo(2,371)=0 exch2_jHi(2,371)=0 exch2_opposingSend(2,371)=1 exch2_pij(1,2,371)=1 exch2_pij(2,2,371)=0 exch2_pij(3,2,371)=0 exch2_pij(4,2,371)=1 exch2_oi(2,371)=0 exch2_oj(2,371)=0 exch2_neighbourId(3,371)=372 exch2_iLo(3,371)=35 exch2_iHi(3,371)=35 exch2_jLo(3,371)=0 exch2_jHi(3,371)=52 exch2_opposingSend(3,371)=4 exch2_pij(1,3,371)=1 exch2_pij(2,3,371)=0 exch2_pij(3,3,371)=0 exch2_pij(4,3,371)=1 exch2_oi(3,371)=0 exch2_oj(3,371)=0 exch2_neighbourId(4,371)=370 exch2_iLo(4,371)=0 exch2_iHi(4,371)=0 exch2_jLo(4,371)=0 exch2_jHi(4,371)=52 exch2_opposingSend(4,371)=3 exch2_pij(1,4,371)=1 exch2_pij(2,4,371)=0 exch2_pij(3,4,371)=0 exch2_pij(4,4,371)=1 exch2_oi(4,371)=0 exch2_oj(4,371)=0 RETURN END SUBROUTINE W2_E2SETUP_372 C Topology for tile 372 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(372)=34 exch2_tNy(372)=51 exch2_tBasex(372)=374 exch2_tBasey(372)=204 exch2_txGlobalo(372)=1395 exch2_tyGlobalo(372)=205 exch2_isWedge(372)=0 exch2_isNedge(372)=0 exch2_isEedge(372)=0 exch2_isSedge(372)=0 exch2_myFace(372)=3 exch2_mydNx(372)=510 exch2_mydNy(372)=510 exch2_nNeighbours(372)=4 exch2_neighbourId(1,372)=387 exch2_iLo(1,372)=0 exch2_iHi(1,372)=35 exch2_jLo(1,372)=52 exch2_jHi(1,372)=52 exch2_opposingSend(1,372)=2 exch2_pij(1,1,372)=1 exch2_pij(2,1,372)=0 exch2_pij(3,1,372)=0 exch2_pij(4,1,372)=1 exch2_oi(1,372)=0 exch2_oj(1,372)=0 exch2_neighbourId(2,372)=357 exch2_iLo(2,372)=0 exch2_iHi(2,372)=35 exch2_jLo(2,372)=0 exch2_jHi(2,372)=0 exch2_opposingSend(2,372)=1 exch2_pij(1,2,372)=1 exch2_pij(2,2,372)=0 exch2_pij(3,2,372)=0 exch2_pij(4,2,372)=1 exch2_oi(2,372)=0 exch2_oj(2,372)=0 exch2_neighbourId(3,372)=373 exch2_iLo(3,372)=35 exch2_iHi(3,372)=35 exch2_jLo(3,372)=0 exch2_jHi(3,372)=52 exch2_opposingSend(3,372)=4 exch2_pij(1,3,372)=1 exch2_pij(2,3,372)=0 exch2_pij(3,3,372)=0 exch2_pij(4,3,372)=1 exch2_oi(3,372)=0 exch2_oj(3,372)=0 exch2_neighbourId(4,372)=371 exch2_iLo(4,372)=0 exch2_iHi(4,372)=0 exch2_jLo(4,372)=0 exch2_jHi(4,372)=52 exch2_opposingSend(4,372)=3 exch2_pij(1,4,372)=1 exch2_pij(2,4,372)=0 exch2_pij(3,4,372)=0 exch2_pij(4,4,372)=1 exch2_oi(4,372)=0 exch2_oj(4,372)=0 RETURN END SUBROUTINE W2_E2SETUP_373 C Topology for tile 373 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(373)=34 exch2_tNy(373)=51 exch2_tBasex(373)=408 exch2_tBasey(373)=204 exch2_txGlobalo(373)=1429 exch2_tyGlobalo(373)=205 exch2_isWedge(373)=0 exch2_isNedge(373)=0 exch2_isEedge(373)=0 exch2_isSedge(373)=0 exch2_myFace(373)=3 exch2_mydNx(373)=510 exch2_mydNy(373)=510 exch2_nNeighbours(373)=4 exch2_neighbourId(1,373)=388 exch2_iLo(1,373)=0 exch2_iHi(1,373)=35 exch2_jLo(1,373)=52 exch2_jHi(1,373)=52 exch2_opposingSend(1,373)=2 exch2_pij(1,1,373)=1 exch2_pij(2,1,373)=0 exch2_pij(3,1,373)=0 exch2_pij(4,1,373)=1 exch2_oi(1,373)=0 exch2_oj(1,373)=0 exch2_neighbourId(2,373)=358 exch2_iLo(2,373)=0 exch2_iHi(2,373)=35 exch2_jLo(2,373)=0 exch2_jHi(2,373)=0 exch2_opposingSend(2,373)=1 exch2_pij(1,2,373)=1 exch2_pij(2,2,373)=0 exch2_pij(3,2,373)=0 exch2_pij(4,2,373)=1 exch2_oi(2,373)=0 exch2_oj(2,373)=0 exch2_neighbourId(3,373)=374 exch2_iLo(3,373)=35 exch2_iHi(3,373)=35 exch2_jLo(3,373)=0 exch2_jHi(3,373)=52 exch2_opposingSend(3,373)=4 exch2_pij(1,3,373)=1 exch2_pij(2,3,373)=0 exch2_pij(3,3,373)=0 exch2_pij(4,3,373)=1 exch2_oi(3,373)=0 exch2_oj(3,373)=0 exch2_neighbourId(4,373)=372 exch2_iLo(4,373)=0 exch2_iHi(4,373)=0 exch2_jLo(4,373)=0 exch2_jHi(4,373)=52 exch2_opposingSend(4,373)=3 exch2_pij(1,4,373)=1 exch2_pij(2,4,373)=0 exch2_pij(3,4,373)=0 exch2_pij(4,4,373)=1 exch2_oi(4,373)=0 exch2_oj(4,373)=0 RETURN END SUBROUTINE W2_E2SETUP_374 C Topology for tile 374 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(374)=34 exch2_tNy(374)=51 exch2_tBasex(374)=442 exch2_tBasey(374)=204 exch2_txGlobalo(374)=1463 exch2_tyGlobalo(374)=205 exch2_isWedge(374)=0 exch2_isNedge(374)=0 exch2_isEedge(374)=0 exch2_isSedge(374)=0 exch2_myFace(374)=3 exch2_mydNx(374)=510 exch2_mydNy(374)=510 exch2_nNeighbours(374)=4 exch2_neighbourId(1,374)=389 exch2_iLo(1,374)=0 exch2_iHi(1,374)=35 exch2_jLo(1,374)=52 exch2_jHi(1,374)=52 exch2_opposingSend(1,374)=2 exch2_pij(1,1,374)=1 exch2_pij(2,1,374)=0 exch2_pij(3,1,374)=0 exch2_pij(4,1,374)=1 exch2_oi(1,374)=0 exch2_oj(1,374)=0 exch2_neighbourId(2,374)=359 exch2_iLo(2,374)=0 exch2_iHi(2,374)=35 exch2_jLo(2,374)=0 exch2_jHi(2,374)=0 exch2_opposingSend(2,374)=1 exch2_pij(1,2,374)=1 exch2_pij(2,2,374)=0 exch2_pij(3,2,374)=0 exch2_pij(4,2,374)=1 exch2_oi(2,374)=0 exch2_oj(2,374)=0 exch2_neighbourId(3,374)=375 exch2_iLo(3,374)=35 exch2_iHi(3,374)=35 exch2_jLo(3,374)=0 exch2_jHi(3,374)=52 exch2_opposingSend(3,374)=4 exch2_pij(1,3,374)=1 exch2_pij(2,3,374)=0 exch2_pij(3,3,374)=0 exch2_pij(4,3,374)=1 exch2_oi(3,374)=0 exch2_oj(3,374)=0 exch2_neighbourId(4,374)=373 exch2_iLo(4,374)=0 exch2_iHi(4,374)=0 exch2_jLo(4,374)=0 exch2_jHi(4,374)=52 exch2_opposingSend(4,374)=3 exch2_pij(1,4,374)=1 exch2_pij(2,4,374)=0 exch2_pij(3,4,374)=0 exch2_pij(4,4,374)=1 exch2_oi(4,374)=0 exch2_oj(4,374)=0 RETURN END SUBROUTINE W2_E2SETUP_375 C Topology for tile 375 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(375)=34 exch2_tNy(375)=51 exch2_tBasex(375)=476 exch2_tBasey(375)=204 exch2_txGlobalo(375)=1497 exch2_tyGlobalo(375)=205 exch2_isWedge(375)=0 exch2_isNedge(375)=0 exch2_isEedge(375)=1 exch2_isSedge(375)=0 exch2_myFace(375)=3 exch2_mydNx(375)=510 exch2_mydNy(375)=510 exch2_nNeighbours(375)=4 exch2_neighbourId(1,375)=390 exch2_iLo(1,375)=0 exch2_iHi(1,375)=35 exch2_jLo(1,375)=52 exch2_jHi(1,375)=52 exch2_opposingSend(1,375)=2 exch2_pij(1,1,375)=1 exch2_pij(2,1,375)=0 exch2_pij(3,1,375)=0 exch2_pij(4,1,375)=1 exch2_oi(1,375)=0 exch2_oj(1,375)=0 exch2_neighbourId(2,375)=360 exch2_iLo(2,375)=0 exch2_iHi(2,375)=35 exch2_jLo(2,375)=0 exch2_jHi(2,375)=0 exch2_opposingSend(2,375)=1 exch2_pij(1,2,375)=1 exch2_pij(2,2,375)=0 exch2_pij(3,2,375)=0 exch2_pij(4,2,375)=1 exch2_oi(2,375)=0 exch2_oj(2,375)=0 exch2_neighbourId(3,375)=511 exch2_iLo(3,375)=35 exch2_iHi(3,375)=35 exch2_jLo(3,375)=0 exch2_jHi(3,375)=52 exch2_opposingSend(3,375)=4 exch2_pij(1,3,375)=1 exch2_pij(2,3,375)=0 exch2_pij(3,3,375)=0 exch2_pij(4,3,375)=1 exch2_oi(3,375)=510 exch2_oj(3,375)=0 exch2_neighbourId(4,375)=374 exch2_iLo(4,375)=0 exch2_iHi(4,375)=0 exch2_jLo(4,375)=0 exch2_jHi(4,375)=52 exch2_opposingSend(4,375)=3 exch2_pij(1,4,375)=1 exch2_pij(2,4,375)=0 exch2_pij(3,4,375)=0 exch2_pij(4,4,375)=1 exch2_oi(4,375)=0 exch2_oj(4,375)=0 RETURN END SUBROUTINE W2_E2SETUP_376 C Topology for tile 376 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(376)=34 exch2_tNy(376)=51 exch2_tBasex(376)=0 exch2_tBasey(376)=255 exch2_txGlobalo(376)=1021 exch2_tyGlobalo(376)=256 exch2_isWedge(376)=1 exch2_isNedge(376)=0 exch2_isEedge(376)=0 exch2_isSedge(376)=0 exch2_myFace(376)=3 exch2_mydNx(376)=510 exch2_mydNy(376)=510 exch2_nNeighbours(376)=5 exch2_neighbourId(1,376)=391 exch2_iLo(1,376)=0 exch2_iHi(1,376)=35 exch2_jLo(1,376)=52 exch2_jHi(1,376)=52 exch2_opposingSend(1,376)=2 exch2_pij(1,1,376)=1 exch2_pij(2,1,376)=0 exch2_pij(3,1,376)=0 exch2_pij(4,1,376)=1 exch2_oi(1,376)=0 exch2_oj(1,376)=0 exch2_neighbourId(2,376)=361 exch2_iLo(2,376)=0 exch2_iHi(2,376)=35 exch2_jLo(2,376)=0 exch2_jHi(2,376)=0 exch2_opposingSend(2,376)=1 exch2_pij(1,2,376)=1 exch2_pij(2,2,376)=0 exch2_pij(3,2,376)=0 exch2_pij(4,2,376)=1 exch2_oi(2,376)=0 exch2_oj(2,376)=0 exch2_neighbourId(3,376)=377 exch2_iLo(3,376)=35 exch2_iHi(3,376)=35 exch2_jLo(3,376)=0 exch2_jHi(3,376)=52 exch2_opposingSend(3,376)=4 exch2_pij(1,3,376)=1 exch2_pij(2,3,376)=0 exch2_pij(3,3,376)=0 exch2_pij(4,3,376)=1 exch2_oi(3,376)=0 exch2_oj(3,376)=0 exch2_neighbourId(4,376)=142 exch2_iLo(4,376)=0 exch2_iHi(4,376)=0 exch2_jLo(4,376)=17 exch2_jHi(4,376)=52 exch2_opposingSend(4,376)=1 exch2_pij(1,4,376)=0 exch2_pij(2,4,376)=1 exch2_pij(3,4,376)=-1 exch2_pij(4,4,376)=0 exch2_oi(4,376)=-510 exch2_oj(4,376)=511 exch2_neighbourId(5,376)=143 exch2_iLo(5,376)=0 exch2_iHi(5,376)=0 exch2_jLo(5,376)=0 exch2_jHi(5,376)=18 exch2_opposingSend(5,376)=2 exch2_pij(1,5,376)=0 exch2_pij(2,5,376)=1 exch2_pij(3,5,376)=-1 exch2_pij(4,5,376)=0 exch2_oi(5,376)=-510 exch2_oj(5,376)=511 RETURN END SUBROUTINE W2_E2SETUP_377 C Topology for tile 377 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(377)=34 exch2_tNy(377)=51 exch2_tBasex(377)=34 exch2_tBasey(377)=255 exch2_txGlobalo(377)=1055 exch2_tyGlobalo(377)=256 exch2_isWedge(377)=0 exch2_isNedge(377)=0 exch2_isEedge(377)=0 exch2_isSedge(377)=0 exch2_myFace(377)=3 exch2_mydNx(377)=510 exch2_mydNy(377)=510 exch2_nNeighbours(377)=4 exch2_neighbourId(1,377)=392 exch2_iLo(1,377)=0 exch2_iHi(1,377)=35 exch2_jLo(1,377)=52 exch2_jHi(1,377)=52 exch2_opposingSend(1,377)=2 exch2_pij(1,1,377)=1 exch2_pij(2,1,377)=0 exch2_pij(3,1,377)=0 exch2_pij(4,1,377)=1 exch2_oi(1,377)=0 exch2_oj(1,377)=0 exch2_neighbourId(2,377)=362 exch2_iLo(2,377)=0 exch2_iHi(2,377)=35 exch2_jLo(2,377)=0 exch2_jHi(2,377)=0 exch2_opposingSend(2,377)=1 exch2_pij(1,2,377)=1 exch2_pij(2,2,377)=0 exch2_pij(3,2,377)=0 exch2_pij(4,2,377)=1 exch2_oi(2,377)=0 exch2_oj(2,377)=0 exch2_neighbourId(3,377)=378 exch2_iLo(3,377)=35 exch2_iHi(3,377)=35 exch2_jLo(3,377)=0 exch2_jHi(3,377)=52 exch2_opposingSend(3,377)=4 exch2_pij(1,3,377)=1 exch2_pij(2,3,377)=0 exch2_pij(3,3,377)=0 exch2_pij(4,3,377)=1 exch2_oi(3,377)=0 exch2_oj(3,377)=0 exch2_neighbourId(4,377)=376 exch2_iLo(4,377)=0 exch2_iHi(4,377)=0 exch2_jLo(4,377)=0 exch2_jHi(4,377)=52 exch2_opposingSend(4,377)=3 exch2_pij(1,4,377)=1 exch2_pij(2,4,377)=0 exch2_pij(3,4,377)=0 exch2_pij(4,4,377)=1 exch2_oi(4,377)=0 exch2_oj(4,377)=0 RETURN END SUBROUTINE W2_E2SETUP_378 C Topology for tile 378 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(378)=34 exch2_tNy(378)=51 exch2_tBasex(378)=68 exch2_tBasey(378)=255 exch2_txGlobalo(378)=1089 exch2_tyGlobalo(378)=256 exch2_isWedge(378)=0 exch2_isNedge(378)=0 exch2_isEedge(378)=0 exch2_isSedge(378)=0 exch2_myFace(378)=3 exch2_mydNx(378)=510 exch2_mydNy(378)=510 exch2_nNeighbours(378)=4 exch2_neighbourId(1,378)=393 exch2_iLo(1,378)=0 exch2_iHi(1,378)=35 exch2_jLo(1,378)=52 exch2_jHi(1,378)=52 exch2_opposingSend(1,378)=2 exch2_pij(1,1,378)=1 exch2_pij(2,1,378)=0 exch2_pij(3,1,378)=0 exch2_pij(4,1,378)=1 exch2_oi(1,378)=0 exch2_oj(1,378)=0 exch2_neighbourId(2,378)=363 exch2_iLo(2,378)=0 exch2_iHi(2,378)=35 exch2_jLo(2,378)=0 exch2_jHi(2,378)=0 exch2_opposingSend(2,378)=1 exch2_pij(1,2,378)=1 exch2_pij(2,2,378)=0 exch2_pij(3,2,378)=0 exch2_pij(4,2,378)=1 exch2_oi(2,378)=0 exch2_oj(2,378)=0 exch2_neighbourId(3,378)=379 exch2_iLo(3,378)=35 exch2_iHi(3,378)=35 exch2_jLo(3,378)=0 exch2_jHi(3,378)=52 exch2_opposingSend(3,378)=4 exch2_pij(1,3,378)=1 exch2_pij(2,3,378)=0 exch2_pij(3,3,378)=0 exch2_pij(4,3,378)=1 exch2_oi(3,378)=0 exch2_oj(3,378)=0 exch2_neighbourId(4,378)=377 exch2_iLo(4,378)=0 exch2_iHi(4,378)=0 exch2_jLo(4,378)=0 exch2_jHi(4,378)=52 exch2_opposingSend(4,378)=3 exch2_pij(1,4,378)=1 exch2_pij(2,4,378)=0 exch2_pij(3,4,378)=0 exch2_pij(4,4,378)=1 exch2_oi(4,378)=0 exch2_oj(4,378)=0 RETURN END SUBROUTINE W2_E2SETUP_379 C Topology for tile 379 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(379)=34 exch2_tNy(379)=51 exch2_tBasex(379)=102 exch2_tBasey(379)=255 exch2_txGlobalo(379)=1123 exch2_tyGlobalo(379)=256 exch2_isWedge(379)=0 exch2_isNedge(379)=0 exch2_isEedge(379)=0 exch2_isSedge(379)=0 exch2_myFace(379)=3 exch2_mydNx(379)=510 exch2_mydNy(379)=510 exch2_nNeighbours(379)=4 exch2_neighbourId(1,379)=394 exch2_iLo(1,379)=0 exch2_iHi(1,379)=35 exch2_jLo(1,379)=52 exch2_jHi(1,379)=52 exch2_opposingSend(1,379)=2 exch2_pij(1,1,379)=1 exch2_pij(2,1,379)=0 exch2_pij(3,1,379)=0 exch2_pij(4,1,379)=1 exch2_oi(1,379)=0 exch2_oj(1,379)=0 exch2_neighbourId(2,379)=364 exch2_iLo(2,379)=0 exch2_iHi(2,379)=35 exch2_jLo(2,379)=0 exch2_jHi(2,379)=0 exch2_opposingSend(2,379)=1 exch2_pij(1,2,379)=1 exch2_pij(2,2,379)=0 exch2_pij(3,2,379)=0 exch2_pij(4,2,379)=1 exch2_oi(2,379)=0 exch2_oj(2,379)=0 exch2_neighbourId(3,379)=380 exch2_iLo(3,379)=35 exch2_iHi(3,379)=35 exch2_jLo(3,379)=0 exch2_jHi(3,379)=52 exch2_opposingSend(3,379)=4 exch2_pij(1,3,379)=1 exch2_pij(2,3,379)=0 exch2_pij(3,3,379)=0 exch2_pij(4,3,379)=1 exch2_oi(3,379)=0 exch2_oj(3,379)=0 exch2_neighbourId(4,379)=378 exch2_iLo(4,379)=0 exch2_iHi(4,379)=0 exch2_jLo(4,379)=0 exch2_jHi(4,379)=52 exch2_opposingSend(4,379)=3 exch2_pij(1,4,379)=1 exch2_pij(2,4,379)=0 exch2_pij(3,4,379)=0 exch2_pij(4,4,379)=1 exch2_oi(4,379)=0 exch2_oj(4,379)=0 RETURN END SUBROUTINE W2_E2SETUP_380 C Topology for tile 380 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(380)=34 exch2_tNy(380)=51 exch2_tBasex(380)=136 exch2_tBasey(380)=255 exch2_txGlobalo(380)=1157 exch2_tyGlobalo(380)=256 exch2_isWedge(380)=0 exch2_isNedge(380)=0 exch2_isEedge(380)=0 exch2_isSedge(380)=0 exch2_myFace(380)=3 exch2_mydNx(380)=510 exch2_mydNy(380)=510 exch2_nNeighbours(380)=4 exch2_neighbourId(1,380)=395 exch2_iLo(1,380)=0 exch2_iHi(1,380)=35 exch2_jLo(1,380)=52 exch2_jHi(1,380)=52 exch2_opposingSend(1,380)=2 exch2_pij(1,1,380)=1 exch2_pij(2,1,380)=0 exch2_pij(3,1,380)=0 exch2_pij(4,1,380)=1 exch2_oi(1,380)=0 exch2_oj(1,380)=0 exch2_neighbourId(2,380)=365 exch2_iLo(2,380)=0 exch2_iHi(2,380)=35 exch2_jLo(2,380)=0 exch2_jHi(2,380)=0 exch2_opposingSend(2,380)=1 exch2_pij(1,2,380)=1 exch2_pij(2,2,380)=0 exch2_pij(3,2,380)=0 exch2_pij(4,2,380)=1 exch2_oi(2,380)=0 exch2_oj(2,380)=0 exch2_neighbourId(3,380)=381 exch2_iLo(3,380)=35 exch2_iHi(3,380)=35 exch2_jLo(3,380)=0 exch2_jHi(3,380)=52 exch2_opposingSend(3,380)=4 exch2_pij(1,3,380)=1 exch2_pij(2,3,380)=0 exch2_pij(3,3,380)=0 exch2_pij(4,3,380)=1 exch2_oi(3,380)=0 exch2_oj(3,380)=0 exch2_neighbourId(4,380)=379 exch2_iLo(4,380)=0 exch2_iHi(4,380)=0 exch2_jLo(4,380)=0 exch2_jHi(4,380)=52 exch2_opposingSend(4,380)=3 exch2_pij(1,4,380)=1 exch2_pij(2,4,380)=0 exch2_pij(3,4,380)=0 exch2_pij(4,4,380)=1 exch2_oi(4,380)=0 exch2_oj(4,380)=0 RETURN END SUBROUTINE W2_E2SETUP_381 C Topology for tile 381 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(381)=34 exch2_tNy(381)=51 exch2_tBasex(381)=170 exch2_tBasey(381)=255 exch2_txGlobalo(381)=1191 exch2_tyGlobalo(381)=256 exch2_isWedge(381)=0 exch2_isNedge(381)=0 exch2_isEedge(381)=0 exch2_isSedge(381)=0 exch2_myFace(381)=3 exch2_mydNx(381)=510 exch2_mydNy(381)=510 exch2_nNeighbours(381)=4 exch2_neighbourId(1,381)=396 exch2_iLo(1,381)=0 exch2_iHi(1,381)=35 exch2_jLo(1,381)=52 exch2_jHi(1,381)=52 exch2_opposingSend(1,381)=2 exch2_pij(1,1,381)=1 exch2_pij(2,1,381)=0 exch2_pij(3,1,381)=0 exch2_pij(4,1,381)=1 exch2_oi(1,381)=0 exch2_oj(1,381)=0 exch2_neighbourId(2,381)=366 exch2_iLo(2,381)=0 exch2_iHi(2,381)=35 exch2_jLo(2,381)=0 exch2_jHi(2,381)=0 exch2_opposingSend(2,381)=1 exch2_pij(1,2,381)=1 exch2_pij(2,2,381)=0 exch2_pij(3,2,381)=0 exch2_pij(4,2,381)=1 exch2_oi(2,381)=0 exch2_oj(2,381)=0 exch2_neighbourId(3,381)=382 exch2_iLo(3,381)=35 exch2_iHi(3,381)=35 exch2_jLo(3,381)=0 exch2_jHi(3,381)=52 exch2_opposingSend(3,381)=4 exch2_pij(1,3,381)=1 exch2_pij(2,3,381)=0 exch2_pij(3,3,381)=0 exch2_pij(4,3,381)=1 exch2_oi(3,381)=0 exch2_oj(3,381)=0 exch2_neighbourId(4,381)=380 exch2_iLo(4,381)=0 exch2_iHi(4,381)=0 exch2_jLo(4,381)=0 exch2_jHi(4,381)=52 exch2_opposingSend(4,381)=3 exch2_pij(1,4,381)=1 exch2_pij(2,4,381)=0 exch2_pij(3,4,381)=0 exch2_pij(4,4,381)=1 exch2_oi(4,381)=0 exch2_oj(4,381)=0 RETURN END SUBROUTINE W2_E2SETUP_382 C Topology for tile 382 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(382)=34 exch2_tNy(382)=51 exch2_tBasex(382)=204 exch2_tBasey(382)=255 exch2_txGlobalo(382)=1225 exch2_tyGlobalo(382)=256 exch2_isWedge(382)=0 exch2_isNedge(382)=0 exch2_isEedge(382)=0 exch2_isSedge(382)=0 exch2_myFace(382)=3 exch2_mydNx(382)=510 exch2_mydNy(382)=510 exch2_nNeighbours(382)=4 exch2_neighbourId(1,382)=397 exch2_iLo(1,382)=0 exch2_iHi(1,382)=35 exch2_jLo(1,382)=52 exch2_jHi(1,382)=52 exch2_opposingSend(1,382)=2 exch2_pij(1,1,382)=1 exch2_pij(2,1,382)=0 exch2_pij(3,1,382)=0 exch2_pij(4,1,382)=1 exch2_oi(1,382)=0 exch2_oj(1,382)=0 exch2_neighbourId(2,382)=367 exch2_iLo(2,382)=0 exch2_iHi(2,382)=35 exch2_jLo(2,382)=0 exch2_jHi(2,382)=0 exch2_opposingSend(2,382)=1 exch2_pij(1,2,382)=1 exch2_pij(2,2,382)=0 exch2_pij(3,2,382)=0 exch2_pij(4,2,382)=1 exch2_oi(2,382)=0 exch2_oj(2,382)=0 exch2_neighbourId(3,382)=383 exch2_iLo(3,382)=35 exch2_iHi(3,382)=35 exch2_jLo(3,382)=0 exch2_jHi(3,382)=52 exch2_opposingSend(3,382)=4 exch2_pij(1,3,382)=1 exch2_pij(2,3,382)=0 exch2_pij(3,3,382)=0 exch2_pij(4,3,382)=1 exch2_oi(3,382)=0 exch2_oj(3,382)=0 exch2_neighbourId(4,382)=381 exch2_iLo(4,382)=0 exch2_iHi(4,382)=0 exch2_jLo(4,382)=0 exch2_jHi(4,382)=52 exch2_opposingSend(4,382)=3 exch2_pij(1,4,382)=1 exch2_pij(2,4,382)=0 exch2_pij(3,4,382)=0 exch2_pij(4,4,382)=1 exch2_oi(4,382)=0 exch2_oj(4,382)=0 RETURN END SUBROUTINE W2_E2SETUP_383 C Topology for tile 383 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(383)=34 exch2_tNy(383)=51 exch2_tBasex(383)=238 exch2_tBasey(383)=255 exch2_txGlobalo(383)=1259 exch2_tyGlobalo(383)=256 exch2_isWedge(383)=0 exch2_isNedge(383)=0 exch2_isEedge(383)=0 exch2_isSedge(383)=0 exch2_myFace(383)=3 exch2_mydNx(383)=510 exch2_mydNy(383)=510 exch2_nNeighbours(383)=4 exch2_neighbourId(1,383)=398 exch2_iLo(1,383)=0 exch2_iHi(1,383)=35 exch2_jLo(1,383)=52 exch2_jHi(1,383)=52 exch2_opposingSend(1,383)=2 exch2_pij(1,1,383)=1 exch2_pij(2,1,383)=0 exch2_pij(3,1,383)=0 exch2_pij(4,1,383)=1 exch2_oi(1,383)=0 exch2_oj(1,383)=0 exch2_neighbourId(2,383)=368 exch2_iLo(2,383)=0 exch2_iHi(2,383)=35 exch2_jLo(2,383)=0 exch2_jHi(2,383)=0 exch2_opposingSend(2,383)=1 exch2_pij(1,2,383)=1 exch2_pij(2,2,383)=0 exch2_pij(3,2,383)=0 exch2_pij(4,2,383)=1 exch2_oi(2,383)=0 exch2_oj(2,383)=0 exch2_neighbourId(3,383)=384 exch2_iLo(3,383)=35 exch2_iHi(3,383)=35 exch2_jLo(3,383)=0 exch2_jHi(3,383)=52 exch2_opposingSend(3,383)=4 exch2_pij(1,3,383)=1 exch2_pij(2,3,383)=0 exch2_pij(3,3,383)=0 exch2_pij(4,3,383)=1 exch2_oi(3,383)=0 exch2_oj(3,383)=0 exch2_neighbourId(4,383)=382 exch2_iLo(4,383)=0 exch2_iHi(4,383)=0 exch2_jLo(4,383)=0 exch2_jHi(4,383)=52 exch2_opposingSend(4,383)=3 exch2_pij(1,4,383)=1 exch2_pij(2,4,383)=0 exch2_pij(3,4,383)=0 exch2_pij(4,4,383)=1 exch2_oi(4,383)=0 exch2_oj(4,383)=0 RETURN END SUBROUTINE W2_E2SETUP_384 C Topology for tile 384 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(384)=34 exch2_tNy(384)=51 exch2_tBasex(384)=272 exch2_tBasey(384)=255 exch2_txGlobalo(384)=1293 exch2_tyGlobalo(384)=256 exch2_isWedge(384)=0 exch2_isNedge(384)=0 exch2_isEedge(384)=0 exch2_isSedge(384)=0 exch2_myFace(384)=3 exch2_mydNx(384)=510 exch2_mydNy(384)=510 exch2_nNeighbours(384)=4 exch2_neighbourId(1,384)=399 exch2_iLo(1,384)=0 exch2_iHi(1,384)=35 exch2_jLo(1,384)=52 exch2_jHi(1,384)=52 exch2_opposingSend(1,384)=2 exch2_pij(1,1,384)=1 exch2_pij(2,1,384)=0 exch2_pij(3,1,384)=0 exch2_pij(4,1,384)=1 exch2_oi(1,384)=0 exch2_oj(1,384)=0 exch2_neighbourId(2,384)=369 exch2_iLo(2,384)=0 exch2_iHi(2,384)=35 exch2_jLo(2,384)=0 exch2_jHi(2,384)=0 exch2_opposingSend(2,384)=1 exch2_pij(1,2,384)=1 exch2_pij(2,2,384)=0 exch2_pij(3,2,384)=0 exch2_pij(4,2,384)=1 exch2_oi(2,384)=0 exch2_oj(2,384)=0 exch2_neighbourId(3,384)=385 exch2_iLo(3,384)=35 exch2_iHi(3,384)=35 exch2_jLo(3,384)=0 exch2_jHi(3,384)=52 exch2_opposingSend(3,384)=4 exch2_pij(1,3,384)=1 exch2_pij(2,3,384)=0 exch2_pij(3,3,384)=0 exch2_pij(4,3,384)=1 exch2_oi(3,384)=0 exch2_oj(3,384)=0 exch2_neighbourId(4,384)=383 exch2_iLo(4,384)=0 exch2_iHi(4,384)=0 exch2_jLo(4,384)=0 exch2_jHi(4,384)=52 exch2_opposingSend(4,384)=3 exch2_pij(1,4,384)=1 exch2_pij(2,4,384)=0 exch2_pij(3,4,384)=0 exch2_pij(4,4,384)=1 exch2_oi(4,384)=0 exch2_oj(4,384)=0 RETURN END SUBROUTINE W2_E2SETUP_385 C Topology for tile 385 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(385)=34 exch2_tNy(385)=51 exch2_tBasex(385)=306 exch2_tBasey(385)=255 exch2_txGlobalo(385)=1327 exch2_tyGlobalo(385)=256 exch2_isWedge(385)=0 exch2_isNedge(385)=0 exch2_isEedge(385)=0 exch2_isSedge(385)=0 exch2_myFace(385)=3 exch2_mydNx(385)=510 exch2_mydNy(385)=510 exch2_nNeighbours(385)=4 exch2_neighbourId(1,385)=400 exch2_iLo(1,385)=0 exch2_iHi(1,385)=35 exch2_jLo(1,385)=52 exch2_jHi(1,385)=52 exch2_opposingSend(1,385)=2 exch2_pij(1,1,385)=1 exch2_pij(2,1,385)=0 exch2_pij(3,1,385)=0 exch2_pij(4,1,385)=1 exch2_oi(1,385)=0 exch2_oj(1,385)=0 exch2_neighbourId(2,385)=370 exch2_iLo(2,385)=0 exch2_iHi(2,385)=35 exch2_jLo(2,385)=0 exch2_jHi(2,385)=0 exch2_opposingSend(2,385)=1 exch2_pij(1,2,385)=1 exch2_pij(2,2,385)=0 exch2_pij(3,2,385)=0 exch2_pij(4,2,385)=1 exch2_oi(2,385)=0 exch2_oj(2,385)=0 exch2_neighbourId(3,385)=386 exch2_iLo(3,385)=35 exch2_iHi(3,385)=35 exch2_jLo(3,385)=0 exch2_jHi(3,385)=52 exch2_opposingSend(3,385)=4 exch2_pij(1,3,385)=1 exch2_pij(2,3,385)=0 exch2_pij(3,3,385)=0 exch2_pij(4,3,385)=1 exch2_oi(3,385)=0 exch2_oj(3,385)=0 exch2_neighbourId(4,385)=384 exch2_iLo(4,385)=0 exch2_iHi(4,385)=0 exch2_jLo(4,385)=0 exch2_jHi(4,385)=52 exch2_opposingSend(4,385)=3 exch2_pij(1,4,385)=1 exch2_pij(2,4,385)=0 exch2_pij(3,4,385)=0 exch2_pij(4,4,385)=1 exch2_oi(4,385)=0 exch2_oj(4,385)=0 RETURN END SUBROUTINE W2_E2SETUP_386 C Topology for tile 386 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(386)=34 exch2_tNy(386)=51 exch2_tBasex(386)=340 exch2_tBasey(386)=255 exch2_txGlobalo(386)=1361 exch2_tyGlobalo(386)=256 exch2_isWedge(386)=0 exch2_isNedge(386)=0 exch2_isEedge(386)=0 exch2_isSedge(386)=0 exch2_myFace(386)=3 exch2_mydNx(386)=510 exch2_mydNy(386)=510 exch2_nNeighbours(386)=4 exch2_neighbourId(1,386)=401 exch2_iLo(1,386)=0 exch2_iHi(1,386)=35 exch2_jLo(1,386)=52 exch2_jHi(1,386)=52 exch2_opposingSend(1,386)=2 exch2_pij(1,1,386)=1 exch2_pij(2,1,386)=0 exch2_pij(3,1,386)=0 exch2_pij(4,1,386)=1 exch2_oi(1,386)=0 exch2_oj(1,386)=0 exch2_neighbourId(2,386)=371 exch2_iLo(2,386)=0 exch2_iHi(2,386)=35 exch2_jLo(2,386)=0 exch2_jHi(2,386)=0 exch2_opposingSend(2,386)=1 exch2_pij(1,2,386)=1 exch2_pij(2,2,386)=0 exch2_pij(3,2,386)=0 exch2_pij(4,2,386)=1 exch2_oi(2,386)=0 exch2_oj(2,386)=0 exch2_neighbourId(3,386)=387 exch2_iLo(3,386)=35 exch2_iHi(3,386)=35 exch2_jLo(3,386)=0 exch2_jHi(3,386)=52 exch2_opposingSend(3,386)=4 exch2_pij(1,3,386)=1 exch2_pij(2,3,386)=0 exch2_pij(3,3,386)=0 exch2_pij(4,3,386)=1 exch2_oi(3,386)=0 exch2_oj(3,386)=0 exch2_neighbourId(4,386)=385 exch2_iLo(4,386)=0 exch2_iHi(4,386)=0 exch2_jLo(4,386)=0 exch2_jHi(4,386)=52 exch2_opposingSend(4,386)=3 exch2_pij(1,4,386)=1 exch2_pij(2,4,386)=0 exch2_pij(3,4,386)=0 exch2_pij(4,4,386)=1 exch2_oi(4,386)=0 exch2_oj(4,386)=0 RETURN END SUBROUTINE W2_E2SETUP_387 C Topology for tile 387 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(387)=34 exch2_tNy(387)=51 exch2_tBasex(387)=374 exch2_tBasey(387)=255 exch2_txGlobalo(387)=1395 exch2_tyGlobalo(387)=256 exch2_isWedge(387)=0 exch2_isNedge(387)=0 exch2_isEedge(387)=0 exch2_isSedge(387)=0 exch2_myFace(387)=3 exch2_mydNx(387)=510 exch2_mydNy(387)=510 exch2_nNeighbours(387)=4 exch2_neighbourId(1,387)=402 exch2_iLo(1,387)=0 exch2_iHi(1,387)=35 exch2_jLo(1,387)=52 exch2_jHi(1,387)=52 exch2_opposingSend(1,387)=2 exch2_pij(1,1,387)=1 exch2_pij(2,1,387)=0 exch2_pij(3,1,387)=0 exch2_pij(4,1,387)=1 exch2_oi(1,387)=0 exch2_oj(1,387)=0 exch2_neighbourId(2,387)=372 exch2_iLo(2,387)=0 exch2_iHi(2,387)=35 exch2_jLo(2,387)=0 exch2_jHi(2,387)=0 exch2_opposingSend(2,387)=1 exch2_pij(1,2,387)=1 exch2_pij(2,2,387)=0 exch2_pij(3,2,387)=0 exch2_pij(4,2,387)=1 exch2_oi(2,387)=0 exch2_oj(2,387)=0 exch2_neighbourId(3,387)=388 exch2_iLo(3,387)=35 exch2_iHi(3,387)=35 exch2_jLo(3,387)=0 exch2_jHi(3,387)=52 exch2_opposingSend(3,387)=4 exch2_pij(1,3,387)=1 exch2_pij(2,3,387)=0 exch2_pij(3,3,387)=0 exch2_pij(4,3,387)=1 exch2_oi(3,387)=0 exch2_oj(3,387)=0 exch2_neighbourId(4,387)=386 exch2_iLo(4,387)=0 exch2_iHi(4,387)=0 exch2_jLo(4,387)=0 exch2_jHi(4,387)=52 exch2_opposingSend(4,387)=3 exch2_pij(1,4,387)=1 exch2_pij(2,4,387)=0 exch2_pij(3,4,387)=0 exch2_pij(4,4,387)=1 exch2_oi(4,387)=0 exch2_oj(4,387)=0 RETURN END SUBROUTINE W2_E2SETUP_388 C Topology for tile 388 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(388)=34 exch2_tNy(388)=51 exch2_tBasex(388)=408 exch2_tBasey(388)=255 exch2_txGlobalo(388)=1429 exch2_tyGlobalo(388)=256 exch2_isWedge(388)=0 exch2_isNedge(388)=0 exch2_isEedge(388)=0 exch2_isSedge(388)=0 exch2_myFace(388)=3 exch2_mydNx(388)=510 exch2_mydNy(388)=510 exch2_nNeighbours(388)=4 exch2_neighbourId(1,388)=403 exch2_iLo(1,388)=0 exch2_iHi(1,388)=35 exch2_jLo(1,388)=52 exch2_jHi(1,388)=52 exch2_opposingSend(1,388)=2 exch2_pij(1,1,388)=1 exch2_pij(2,1,388)=0 exch2_pij(3,1,388)=0 exch2_pij(4,1,388)=1 exch2_oi(1,388)=0 exch2_oj(1,388)=0 exch2_neighbourId(2,388)=373 exch2_iLo(2,388)=0 exch2_iHi(2,388)=35 exch2_jLo(2,388)=0 exch2_jHi(2,388)=0 exch2_opposingSend(2,388)=1 exch2_pij(1,2,388)=1 exch2_pij(2,2,388)=0 exch2_pij(3,2,388)=0 exch2_pij(4,2,388)=1 exch2_oi(2,388)=0 exch2_oj(2,388)=0 exch2_neighbourId(3,388)=389 exch2_iLo(3,388)=35 exch2_iHi(3,388)=35 exch2_jLo(3,388)=0 exch2_jHi(3,388)=52 exch2_opposingSend(3,388)=4 exch2_pij(1,3,388)=1 exch2_pij(2,3,388)=0 exch2_pij(3,3,388)=0 exch2_pij(4,3,388)=1 exch2_oi(3,388)=0 exch2_oj(3,388)=0 exch2_neighbourId(4,388)=387 exch2_iLo(4,388)=0 exch2_iHi(4,388)=0 exch2_jLo(4,388)=0 exch2_jHi(4,388)=52 exch2_opposingSend(4,388)=3 exch2_pij(1,4,388)=1 exch2_pij(2,4,388)=0 exch2_pij(3,4,388)=0 exch2_pij(4,4,388)=1 exch2_oi(4,388)=0 exch2_oj(4,388)=0 RETURN END SUBROUTINE W2_E2SETUP_389 C Topology for tile 389 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(389)=34 exch2_tNy(389)=51 exch2_tBasex(389)=442 exch2_tBasey(389)=255 exch2_txGlobalo(389)=1463 exch2_tyGlobalo(389)=256 exch2_isWedge(389)=0 exch2_isNedge(389)=0 exch2_isEedge(389)=0 exch2_isSedge(389)=0 exch2_myFace(389)=3 exch2_mydNx(389)=510 exch2_mydNy(389)=510 exch2_nNeighbours(389)=4 exch2_neighbourId(1,389)=404 exch2_iLo(1,389)=0 exch2_iHi(1,389)=35 exch2_jLo(1,389)=52 exch2_jHi(1,389)=52 exch2_opposingSend(1,389)=2 exch2_pij(1,1,389)=1 exch2_pij(2,1,389)=0 exch2_pij(3,1,389)=0 exch2_pij(4,1,389)=1 exch2_oi(1,389)=0 exch2_oj(1,389)=0 exch2_neighbourId(2,389)=374 exch2_iLo(2,389)=0 exch2_iHi(2,389)=35 exch2_jLo(2,389)=0 exch2_jHi(2,389)=0 exch2_opposingSend(2,389)=1 exch2_pij(1,2,389)=1 exch2_pij(2,2,389)=0 exch2_pij(3,2,389)=0 exch2_pij(4,2,389)=1 exch2_oi(2,389)=0 exch2_oj(2,389)=0 exch2_neighbourId(3,389)=390 exch2_iLo(3,389)=35 exch2_iHi(3,389)=35 exch2_jLo(3,389)=0 exch2_jHi(3,389)=52 exch2_opposingSend(3,389)=4 exch2_pij(1,3,389)=1 exch2_pij(2,3,389)=0 exch2_pij(3,3,389)=0 exch2_pij(4,3,389)=1 exch2_oi(3,389)=0 exch2_oj(3,389)=0 exch2_neighbourId(4,389)=388 exch2_iLo(4,389)=0 exch2_iHi(4,389)=0 exch2_jLo(4,389)=0 exch2_jHi(4,389)=52 exch2_opposingSend(4,389)=3 exch2_pij(1,4,389)=1 exch2_pij(2,4,389)=0 exch2_pij(3,4,389)=0 exch2_pij(4,4,389)=1 exch2_oi(4,389)=0 exch2_oj(4,389)=0 RETURN END SUBROUTINE W2_E2SETUP_390 C Topology for tile 390 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(390)=34 exch2_tNy(390)=51 exch2_tBasex(390)=476 exch2_tBasey(390)=255 exch2_txGlobalo(390)=1497 exch2_tyGlobalo(390)=256 exch2_isWedge(390)=0 exch2_isNedge(390)=0 exch2_isEedge(390)=1 exch2_isSedge(390)=0 exch2_myFace(390)=3 exch2_mydNx(390)=510 exch2_mydNy(390)=510 exch2_nNeighbours(390)=4 exch2_neighbourId(1,390)=405 exch2_iLo(1,390)=0 exch2_iHi(1,390)=35 exch2_jLo(1,390)=52 exch2_jHi(1,390)=52 exch2_opposingSend(1,390)=2 exch2_pij(1,1,390)=1 exch2_pij(2,1,390)=0 exch2_pij(3,1,390)=0 exch2_pij(4,1,390)=1 exch2_oi(1,390)=0 exch2_oj(1,390)=0 exch2_neighbourId(2,390)=375 exch2_iLo(2,390)=0 exch2_iHi(2,390)=35 exch2_jLo(2,390)=0 exch2_jHi(2,390)=0 exch2_opposingSend(2,390)=1 exch2_pij(1,2,390)=1 exch2_pij(2,2,390)=0 exch2_pij(3,2,390)=0 exch2_pij(4,2,390)=1 exch2_oi(2,390)=0 exch2_oj(2,390)=0 exch2_neighbourId(3,390)=526 exch2_iLo(3,390)=35 exch2_iHi(3,390)=35 exch2_jLo(3,390)=0 exch2_jHi(3,390)=52 exch2_opposingSend(3,390)=4 exch2_pij(1,3,390)=1 exch2_pij(2,3,390)=0 exch2_pij(3,3,390)=0 exch2_pij(4,3,390)=1 exch2_oi(3,390)=510 exch2_oj(3,390)=0 exch2_neighbourId(4,390)=389 exch2_iLo(4,390)=0 exch2_iHi(4,390)=0 exch2_jLo(4,390)=0 exch2_jHi(4,390)=52 exch2_opposingSend(4,390)=3 exch2_pij(1,4,390)=1 exch2_pij(2,4,390)=0 exch2_pij(3,4,390)=0 exch2_pij(4,4,390)=1 exch2_oi(4,390)=0 exch2_oj(4,390)=0 RETURN END SUBROUTINE W2_E2SETUP_391 C Topology for tile 391 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(391)=34 exch2_tNy(391)=51 exch2_tBasex(391)=0 exch2_tBasey(391)=306 exch2_txGlobalo(391)=1021 exch2_tyGlobalo(391)=307 exch2_isWedge(391)=1 exch2_isNedge(391)=0 exch2_isEedge(391)=0 exch2_isSedge(391)=0 exch2_myFace(391)=3 exch2_mydNx(391)=510 exch2_mydNy(391)=510 exch2_nNeighbours(391)=5 exch2_neighbourId(1,391)=406 exch2_iLo(1,391)=0 exch2_iHi(1,391)=35 exch2_jLo(1,391)=52 exch2_jHi(1,391)=52 exch2_opposingSend(1,391)=2 exch2_pij(1,1,391)=1 exch2_pij(2,1,391)=0 exch2_pij(3,1,391)=0 exch2_pij(4,1,391)=1 exch2_oi(1,391)=0 exch2_oj(1,391)=0 exch2_neighbourId(2,391)=376 exch2_iLo(2,391)=0 exch2_iHi(2,391)=35 exch2_jLo(2,391)=0 exch2_jHi(2,391)=0 exch2_opposingSend(2,391)=1 exch2_pij(1,2,391)=1 exch2_pij(2,2,391)=0 exch2_pij(3,2,391)=0 exch2_pij(4,2,391)=1 exch2_oi(2,391)=0 exch2_oj(2,391)=0 exch2_neighbourId(3,391)=392 exch2_iLo(3,391)=35 exch2_iHi(3,391)=35 exch2_jLo(3,391)=0 exch2_jHi(3,391)=52 exch2_opposingSend(3,391)=4 exch2_pij(1,3,391)=1 exch2_pij(2,3,391)=0 exch2_pij(3,3,391)=0 exch2_pij(4,3,391)=1 exch2_oi(3,391)=0 exch2_oj(3,391)=0 exch2_neighbourId(4,391)=140 exch2_iLo(4,391)=0 exch2_iHi(4,391)=0 exch2_jLo(4,391)=34 exch2_jHi(4,391)=52 exch2_opposingSend(4,391)=1 exch2_pij(1,4,391)=0 exch2_pij(2,4,391)=1 exch2_pij(3,4,391)=-1 exch2_pij(4,4,391)=0 exch2_oi(4,391)=-510 exch2_oj(4,391)=511 exch2_neighbourId(5,391)=141 exch2_iLo(5,391)=0 exch2_iHi(5,391)=0 exch2_jLo(5,391)=0 exch2_jHi(5,391)=35 exch2_opposingSend(5,391)=1 exch2_pij(1,5,391)=0 exch2_pij(2,5,391)=1 exch2_pij(3,5,391)=-1 exch2_pij(4,5,391)=0 exch2_oi(5,391)=-510 exch2_oj(5,391)=511 RETURN END SUBROUTINE W2_E2SETUP_392 C Topology for tile 392 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(392)=34 exch2_tNy(392)=51 exch2_tBasex(392)=34 exch2_tBasey(392)=306 exch2_txGlobalo(392)=1055 exch2_tyGlobalo(392)=307 exch2_isWedge(392)=0 exch2_isNedge(392)=0 exch2_isEedge(392)=0 exch2_isSedge(392)=0 exch2_myFace(392)=3 exch2_mydNx(392)=510 exch2_mydNy(392)=510 exch2_nNeighbours(392)=4 exch2_neighbourId(1,392)=407 exch2_iLo(1,392)=0 exch2_iHi(1,392)=35 exch2_jLo(1,392)=52 exch2_jHi(1,392)=52 exch2_opposingSend(1,392)=2 exch2_pij(1,1,392)=1 exch2_pij(2,1,392)=0 exch2_pij(3,1,392)=0 exch2_pij(4,1,392)=1 exch2_oi(1,392)=0 exch2_oj(1,392)=0 exch2_neighbourId(2,392)=377 exch2_iLo(2,392)=0 exch2_iHi(2,392)=35 exch2_jLo(2,392)=0 exch2_jHi(2,392)=0 exch2_opposingSend(2,392)=1 exch2_pij(1,2,392)=1 exch2_pij(2,2,392)=0 exch2_pij(3,2,392)=0 exch2_pij(4,2,392)=1 exch2_oi(2,392)=0 exch2_oj(2,392)=0 exch2_neighbourId(3,392)=393 exch2_iLo(3,392)=35 exch2_iHi(3,392)=35 exch2_jLo(3,392)=0 exch2_jHi(3,392)=52 exch2_opposingSend(3,392)=4 exch2_pij(1,3,392)=1 exch2_pij(2,3,392)=0 exch2_pij(3,3,392)=0 exch2_pij(4,3,392)=1 exch2_oi(3,392)=0 exch2_oj(3,392)=0 exch2_neighbourId(4,392)=391 exch2_iLo(4,392)=0 exch2_iHi(4,392)=0 exch2_jLo(4,392)=0 exch2_jHi(4,392)=52 exch2_opposingSend(4,392)=3 exch2_pij(1,4,392)=1 exch2_pij(2,4,392)=0 exch2_pij(3,4,392)=0 exch2_pij(4,4,392)=1 exch2_oi(4,392)=0 exch2_oj(4,392)=0 RETURN END SUBROUTINE W2_E2SETUP_393 C Topology for tile 393 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(393)=34 exch2_tNy(393)=51 exch2_tBasex(393)=68 exch2_tBasey(393)=306 exch2_txGlobalo(393)=1089 exch2_tyGlobalo(393)=307 exch2_isWedge(393)=0 exch2_isNedge(393)=0 exch2_isEedge(393)=0 exch2_isSedge(393)=0 exch2_myFace(393)=3 exch2_mydNx(393)=510 exch2_mydNy(393)=510 exch2_nNeighbours(393)=4 exch2_neighbourId(1,393)=408 exch2_iLo(1,393)=0 exch2_iHi(1,393)=35 exch2_jLo(1,393)=52 exch2_jHi(1,393)=52 exch2_opposingSend(1,393)=2 exch2_pij(1,1,393)=1 exch2_pij(2,1,393)=0 exch2_pij(3,1,393)=0 exch2_pij(4,1,393)=1 exch2_oi(1,393)=0 exch2_oj(1,393)=0 exch2_neighbourId(2,393)=378 exch2_iLo(2,393)=0 exch2_iHi(2,393)=35 exch2_jLo(2,393)=0 exch2_jHi(2,393)=0 exch2_opposingSend(2,393)=1 exch2_pij(1,2,393)=1 exch2_pij(2,2,393)=0 exch2_pij(3,2,393)=0 exch2_pij(4,2,393)=1 exch2_oi(2,393)=0 exch2_oj(2,393)=0 exch2_neighbourId(3,393)=394 exch2_iLo(3,393)=35 exch2_iHi(3,393)=35 exch2_jLo(3,393)=0 exch2_jHi(3,393)=52 exch2_opposingSend(3,393)=4 exch2_pij(1,3,393)=1 exch2_pij(2,3,393)=0 exch2_pij(3,3,393)=0 exch2_pij(4,3,393)=1 exch2_oi(3,393)=0 exch2_oj(3,393)=0 exch2_neighbourId(4,393)=392 exch2_iLo(4,393)=0 exch2_iHi(4,393)=0 exch2_jLo(4,393)=0 exch2_jHi(4,393)=52 exch2_opposingSend(4,393)=3 exch2_pij(1,4,393)=1 exch2_pij(2,4,393)=0 exch2_pij(3,4,393)=0 exch2_pij(4,4,393)=1 exch2_oi(4,393)=0 exch2_oj(4,393)=0 RETURN END SUBROUTINE W2_E2SETUP_394 C Topology for tile 394 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(394)=34 exch2_tNy(394)=51 exch2_tBasex(394)=102 exch2_tBasey(394)=306 exch2_txGlobalo(394)=1123 exch2_tyGlobalo(394)=307 exch2_isWedge(394)=0 exch2_isNedge(394)=0 exch2_isEedge(394)=0 exch2_isSedge(394)=0 exch2_myFace(394)=3 exch2_mydNx(394)=510 exch2_mydNy(394)=510 exch2_nNeighbours(394)=4 exch2_neighbourId(1,394)=409 exch2_iLo(1,394)=0 exch2_iHi(1,394)=35 exch2_jLo(1,394)=52 exch2_jHi(1,394)=52 exch2_opposingSend(1,394)=2 exch2_pij(1,1,394)=1 exch2_pij(2,1,394)=0 exch2_pij(3,1,394)=0 exch2_pij(4,1,394)=1 exch2_oi(1,394)=0 exch2_oj(1,394)=0 exch2_neighbourId(2,394)=379 exch2_iLo(2,394)=0 exch2_iHi(2,394)=35 exch2_jLo(2,394)=0 exch2_jHi(2,394)=0 exch2_opposingSend(2,394)=1 exch2_pij(1,2,394)=1 exch2_pij(2,2,394)=0 exch2_pij(3,2,394)=0 exch2_pij(4,2,394)=1 exch2_oi(2,394)=0 exch2_oj(2,394)=0 exch2_neighbourId(3,394)=395 exch2_iLo(3,394)=35 exch2_iHi(3,394)=35 exch2_jLo(3,394)=0 exch2_jHi(3,394)=52 exch2_opposingSend(3,394)=4 exch2_pij(1,3,394)=1 exch2_pij(2,3,394)=0 exch2_pij(3,3,394)=0 exch2_pij(4,3,394)=1 exch2_oi(3,394)=0 exch2_oj(3,394)=0 exch2_neighbourId(4,394)=393 exch2_iLo(4,394)=0 exch2_iHi(4,394)=0 exch2_jLo(4,394)=0 exch2_jHi(4,394)=52 exch2_opposingSend(4,394)=3 exch2_pij(1,4,394)=1 exch2_pij(2,4,394)=0 exch2_pij(3,4,394)=0 exch2_pij(4,4,394)=1 exch2_oi(4,394)=0 exch2_oj(4,394)=0 RETURN END SUBROUTINE W2_E2SETUP_395 C Topology for tile 395 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(395)=34 exch2_tNy(395)=51 exch2_tBasex(395)=136 exch2_tBasey(395)=306 exch2_txGlobalo(395)=1157 exch2_tyGlobalo(395)=307 exch2_isWedge(395)=0 exch2_isNedge(395)=0 exch2_isEedge(395)=0 exch2_isSedge(395)=0 exch2_myFace(395)=3 exch2_mydNx(395)=510 exch2_mydNy(395)=510 exch2_nNeighbours(395)=4 exch2_neighbourId(1,395)=410 exch2_iLo(1,395)=0 exch2_iHi(1,395)=35 exch2_jLo(1,395)=52 exch2_jHi(1,395)=52 exch2_opposingSend(1,395)=2 exch2_pij(1,1,395)=1 exch2_pij(2,1,395)=0 exch2_pij(3,1,395)=0 exch2_pij(4,1,395)=1 exch2_oi(1,395)=0 exch2_oj(1,395)=0 exch2_neighbourId(2,395)=380 exch2_iLo(2,395)=0 exch2_iHi(2,395)=35 exch2_jLo(2,395)=0 exch2_jHi(2,395)=0 exch2_opposingSend(2,395)=1 exch2_pij(1,2,395)=1 exch2_pij(2,2,395)=0 exch2_pij(3,2,395)=0 exch2_pij(4,2,395)=1 exch2_oi(2,395)=0 exch2_oj(2,395)=0 exch2_neighbourId(3,395)=396 exch2_iLo(3,395)=35 exch2_iHi(3,395)=35 exch2_jLo(3,395)=0 exch2_jHi(3,395)=52 exch2_opposingSend(3,395)=4 exch2_pij(1,3,395)=1 exch2_pij(2,3,395)=0 exch2_pij(3,3,395)=0 exch2_pij(4,3,395)=1 exch2_oi(3,395)=0 exch2_oj(3,395)=0 exch2_neighbourId(4,395)=394 exch2_iLo(4,395)=0 exch2_iHi(4,395)=0 exch2_jLo(4,395)=0 exch2_jHi(4,395)=52 exch2_opposingSend(4,395)=3 exch2_pij(1,4,395)=1 exch2_pij(2,4,395)=0 exch2_pij(3,4,395)=0 exch2_pij(4,4,395)=1 exch2_oi(4,395)=0 exch2_oj(4,395)=0 RETURN END SUBROUTINE W2_E2SETUP_396 C Topology for tile 396 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(396)=34 exch2_tNy(396)=51 exch2_tBasex(396)=170 exch2_tBasey(396)=306 exch2_txGlobalo(396)=1191 exch2_tyGlobalo(396)=307 exch2_isWedge(396)=0 exch2_isNedge(396)=0 exch2_isEedge(396)=0 exch2_isSedge(396)=0 exch2_myFace(396)=3 exch2_mydNx(396)=510 exch2_mydNy(396)=510 exch2_nNeighbours(396)=4 exch2_neighbourId(1,396)=411 exch2_iLo(1,396)=0 exch2_iHi(1,396)=35 exch2_jLo(1,396)=52 exch2_jHi(1,396)=52 exch2_opposingSend(1,396)=2 exch2_pij(1,1,396)=1 exch2_pij(2,1,396)=0 exch2_pij(3,1,396)=0 exch2_pij(4,1,396)=1 exch2_oi(1,396)=0 exch2_oj(1,396)=0 exch2_neighbourId(2,396)=381 exch2_iLo(2,396)=0 exch2_iHi(2,396)=35 exch2_jLo(2,396)=0 exch2_jHi(2,396)=0 exch2_opposingSend(2,396)=1 exch2_pij(1,2,396)=1 exch2_pij(2,2,396)=0 exch2_pij(3,2,396)=0 exch2_pij(4,2,396)=1 exch2_oi(2,396)=0 exch2_oj(2,396)=0 exch2_neighbourId(3,396)=397 exch2_iLo(3,396)=35 exch2_iHi(3,396)=35 exch2_jLo(3,396)=0 exch2_jHi(3,396)=52 exch2_opposingSend(3,396)=4 exch2_pij(1,3,396)=1 exch2_pij(2,3,396)=0 exch2_pij(3,3,396)=0 exch2_pij(4,3,396)=1 exch2_oi(3,396)=0 exch2_oj(3,396)=0 exch2_neighbourId(4,396)=395 exch2_iLo(4,396)=0 exch2_iHi(4,396)=0 exch2_jLo(4,396)=0 exch2_jHi(4,396)=52 exch2_opposingSend(4,396)=3 exch2_pij(1,4,396)=1 exch2_pij(2,4,396)=0 exch2_pij(3,4,396)=0 exch2_pij(4,4,396)=1 exch2_oi(4,396)=0 exch2_oj(4,396)=0 RETURN END SUBROUTINE W2_E2SETUP_397 C Topology for tile 397 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(397)=34 exch2_tNy(397)=51 exch2_tBasex(397)=204 exch2_tBasey(397)=306 exch2_txGlobalo(397)=1225 exch2_tyGlobalo(397)=307 exch2_isWedge(397)=0 exch2_isNedge(397)=0 exch2_isEedge(397)=0 exch2_isSedge(397)=0 exch2_myFace(397)=3 exch2_mydNx(397)=510 exch2_mydNy(397)=510 exch2_nNeighbours(397)=4 exch2_neighbourId(1,397)=412 exch2_iLo(1,397)=0 exch2_iHi(1,397)=35 exch2_jLo(1,397)=52 exch2_jHi(1,397)=52 exch2_opposingSend(1,397)=2 exch2_pij(1,1,397)=1 exch2_pij(2,1,397)=0 exch2_pij(3,1,397)=0 exch2_pij(4,1,397)=1 exch2_oi(1,397)=0 exch2_oj(1,397)=0 exch2_neighbourId(2,397)=382 exch2_iLo(2,397)=0 exch2_iHi(2,397)=35 exch2_jLo(2,397)=0 exch2_jHi(2,397)=0 exch2_opposingSend(2,397)=1 exch2_pij(1,2,397)=1 exch2_pij(2,2,397)=0 exch2_pij(3,2,397)=0 exch2_pij(4,2,397)=1 exch2_oi(2,397)=0 exch2_oj(2,397)=0 exch2_neighbourId(3,397)=398 exch2_iLo(3,397)=35 exch2_iHi(3,397)=35 exch2_jLo(3,397)=0 exch2_jHi(3,397)=52 exch2_opposingSend(3,397)=4 exch2_pij(1,3,397)=1 exch2_pij(2,3,397)=0 exch2_pij(3,3,397)=0 exch2_pij(4,3,397)=1 exch2_oi(3,397)=0 exch2_oj(3,397)=0 exch2_neighbourId(4,397)=396 exch2_iLo(4,397)=0 exch2_iHi(4,397)=0 exch2_jLo(4,397)=0 exch2_jHi(4,397)=52 exch2_opposingSend(4,397)=3 exch2_pij(1,4,397)=1 exch2_pij(2,4,397)=0 exch2_pij(3,4,397)=0 exch2_pij(4,4,397)=1 exch2_oi(4,397)=0 exch2_oj(4,397)=0 RETURN END SUBROUTINE W2_E2SETUP_398 C Topology for tile 398 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(398)=34 exch2_tNy(398)=51 exch2_tBasex(398)=238 exch2_tBasey(398)=306 exch2_txGlobalo(398)=1259 exch2_tyGlobalo(398)=307 exch2_isWedge(398)=0 exch2_isNedge(398)=0 exch2_isEedge(398)=0 exch2_isSedge(398)=0 exch2_myFace(398)=3 exch2_mydNx(398)=510 exch2_mydNy(398)=510 exch2_nNeighbours(398)=4 exch2_neighbourId(1,398)=413 exch2_iLo(1,398)=0 exch2_iHi(1,398)=35 exch2_jLo(1,398)=52 exch2_jHi(1,398)=52 exch2_opposingSend(1,398)=2 exch2_pij(1,1,398)=1 exch2_pij(2,1,398)=0 exch2_pij(3,1,398)=0 exch2_pij(4,1,398)=1 exch2_oi(1,398)=0 exch2_oj(1,398)=0 exch2_neighbourId(2,398)=383 exch2_iLo(2,398)=0 exch2_iHi(2,398)=35 exch2_jLo(2,398)=0 exch2_jHi(2,398)=0 exch2_opposingSend(2,398)=1 exch2_pij(1,2,398)=1 exch2_pij(2,2,398)=0 exch2_pij(3,2,398)=0 exch2_pij(4,2,398)=1 exch2_oi(2,398)=0 exch2_oj(2,398)=0 exch2_neighbourId(3,398)=399 exch2_iLo(3,398)=35 exch2_iHi(3,398)=35 exch2_jLo(3,398)=0 exch2_jHi(3,398)=52 exch2_opposingSend(3,398)=4 exch2_pij(1,3,398)=1 exch2_pij(2,3,398)=0 exch2_pij(3,3,398)=0 exch2_pij(4,3,398)=1 exch2_oi(3,398)=0 exch2_oj(3,398)=0 exch2_neighbourId(4,398)=397 exch2_iLo(4,398)=0 exch2_iHi(4,398)=0 exch2_jLo(4,398)=0 exch2_jHi(4,398)=52 exch2_opposingSend(4,398)=3 exch2_pij(1,4,398)=1 exch2_pij(2,4,398)=0 exch2_pij(3,4,398)=0 exch2_pij(4,4,398)=1 exch2_oi(4,398)=0 exch2_oj(4,398)=0 RETURN END SUBROUTINE W2_E2SETUP_399 C Topology for tile 399 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(399)=34 exch2_tNy(399)=51 exch2_tBasex(399)=272 exch2_tBasey(399)=306 exch2_txGlobalo(399)=1293 exch2_tyGlobalo(399)=307 exch2_isWedge(399)=0 exch2_isNedge(399)=0 exch2_isEedge(399)=0 exch2_isSedge(399)=0 exch2_myFace(399)=3 exch2_mydNx(399)=510 exch2_mydNy(399)=510 exch2_nNeighbours(399)=4 exch2_neighbourId(1,399)=414 exch2_iLo(1,399)=0 exch2_iHi(1,399)=35 exch2_jLo(1,399)=52 exch2_jHi(1,399)=52 exch2_opposingSend(1,399)=2 exch2_pij(1,1,399)=1 exch2_pij(2,1,399)=0 exch2_pij(3,1,399)=0 exch2_pij(4,1,399)=1 exch2_oi(1,399)=0 exch2_oj(1,399)=0 exch2_neighbourId(2,399)=384 exch2_iLo(2,399)=0 exch2_iHi(2,399)=35 exch2_jLo(2,399)=0 exch2_jHi(2,399)=0 exch2_opposingSend(2,399)=1 exch2_pij(1,2,399)=1 exch2_pij(2,2,399)=0 exch2_pij(3,2,399)=0 exch2_pij(4,2,399)=1 exch2_oi(2,399)=0 exch2_oj(2,399)=0 exch2_neighbourId(3,399)=400 exch2_iLo(3,399)=35 exch2_iHi(3,399)=35 exch2_jLo(3,399)=0 exch2_jHi(3,399)=52 exch2_opposingSend(3,399)=4 exch2_pij(1,3,399)=1 exch2_pij(2,3,399)=0 exch2_pij(3,3,399)=0 exch2_pij(4,3,399)=1 exch2_oi(3,399)=0 exch2_oj(3,399)=0 exch2_neighbourId(4,399)=398 exch2_iLo(4,399)=0 exch2_iHi(4,399)=0 exch2_jLo(4,399)=0 exch2_jHi(4,399)=52 exch2_opposingSend(4,399)=3 exch2_pij(1,4,399)=1 exch2_pij(2,4,399)=0 exch2_pij(3,4,399)=0 exch2_pij(4,4,399)=1 exch2_oi(4,399)=0 exch2_oj(4,399)=0 RETURN END SUBROUTINE W2_E2SETUP_400 C Topology for tile 400 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(400)=34 exch2_tNy(400)=51 exch2_tBasex(400)=306 exch2_tBasey(400)=306 exch2_txGlobalo(400)=1327 exch2_tyGlobalo(400)=307 exch2_isWedge(400)=0 exch2_isNedge(400)=0 exch2_isEedge(400)=0 exch2_isSedge(400)=0 exch2_myFace(400)=3 exch2_mydNx(400)=510 exch2_mydNy(400)=510 exch2_nNeighbours(400)=4 exch2_neighbourId(1,400)=415 exch2_iLo(1,400)=0 exch2_iHi(1,400)=35 exch2_jLo(1,400)=52 exch2_jHi(1,400)=52 exch2_opposingSend(1,400)=2 exch2_pij(1,1,400)=1 exch2_pij(2,1,400)=0 exch2_pij(3,1,400)=0 exch2_pij(4,1,400)=1 exch2_oi(1,400)=0 exch2_oj(1,400)=0 exch2_neighbourId(2,400)=385 exch2_iLo(2,400)=0 exch2_iHi(2,400)=35 exch2_jLo(2,400)=0 exch2_jHi(2,400)=0 exch2_opposingSend(2,400)=1 exch2_pij(1,2,400)=1 exch2_pij(2,2,400)=0 exch2_pij(3,2,400)=0 exch2_pij(4,2,400)=1 exch2_oi(2,400)=0 exch2_oj(2,400)=0 exch2_neighbourId(3,400)=401 exch2_iLo(3,400)=35 exch2_iHi(3,400)=35 exch2_jLo(3,400)=0 exch2_jHi(3,400)=52 exch2_opposingSend(3,400)=4 exch2_pij(1,3,400)=1 exch2_pij(2,3,400)=0 exch2_pij(3,3,400)=0 exch2_pij(4,3,400)=1 exch2_oi(3,400)=0 exch2_oj(3,400)=0 exch2_neighbourId(4,400)=399 exch2_iLo(4,400)=0 exch2_iHi(4,400)=0 exch2_jLo(4,400)=0 exch2_jHi(4,400)=52 exch2_opposingSend(4,400)=3 exch2_pij(1,4,400)=1 exch2_pij(2,4,400)=0 exch2_pij(3,4,400)=0 exch2_pij(4,4,400)=1 exch2_oi(4,400)=0 exch2_oj(4,400)=0 RETURN END SUBROUTINE W2_E2SETUP_401 C Topology for tile 401 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(401)=34 exch2_tNy(401)=51 exch2_tBasex(401)=340 exch2_tBasey(401)=306 exch2_txGlobalo(401)=1361 exch2_tyGlobalo(401)=307 exch2_isWedge(401)=0 exch2_isNedge(401)=0 exch2_isEedge(401)=0 exch2_isSedge(401)=0 exch2_myFace(401)=3 exch2_mydNx(401)=510 exch2_mydNy(401)=510 exch2_nNeighbours(401)=4 exch2_neighbourId(1,401)=416 exch2_iLo(1,401)=0 exch2_iHi(1,401)=35 exch2_jLo(1,401)=52 exch2_jHi(1,401)=52 exch2_opposingSend(1,401)=2 exch2_pij(1,1,401)=1 exch2_pij(2,1,401)=0 exch2_pij(3,1,401)=0 exch2_pij(4,1,401)=1 exch2_oi(1,401)=0 exch2_oj(1,401)=0 exch2_neighbourId(2,401)=386 exch2_iLo(2,401)=0 exch2_iHi(2,401)=35 exch2_jLo(2,401)=0 exch2_jHi(2,401)=0 exch2_opposingSend(2,401)=1 exch2_pij(1,2,401)=1 exch2_pij(2,2,401)=0 exch2_pij(3,2,401)=0 exch2_pij(4,2,401)=1 exch2_oi(2,401)=0 exch2_oj(2,401)=0 exch2_neighbourId(3,401)=402 exch2_iLo(3,401)=35 exch2_iHi(3,401)=35 exch2_jLo(3,401)=0 exch2_jHi(3,401)=52 exch2_opposingSend(3,401)=4 exch2_pij(1,3,401)=1 exch2_pij(2,3,401)=0 exch2_pij(3,3,401)=0 exch2_pij(4,3,401)=1 exch2_oi(3,401)=0 exch2_oj(3,401)=0 exch2_neighbourId(4,401)=400 exch2_iLo(4,401)=0 exch2_iHi(4,401)=0 exch2_jLo(4,401)=0 exch2_jHi(4,401)=52 exch2_opposingSend(4,401)=3 exch2_pij(1,4,401)=1 exch2_pij(2,4,401)=0 exch2_pij(3,4,401)=0 exch2_pij(4,4,401)=1 exch2_oi(4,401)=0 exch2_oj(4,401)=0 RETURN END SUBROUTINE W2_E2SETUP_402 C Topology for tile 402 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(402)=34 exch2_tNy(402)=51 exch2_tBasex(402)=374 exch2_tBasey(402)=306 exch2_txGlobalo(402)=1395 exch2_tyGlobalo(402)=307 exch2_isWedge(402)=0 exch2_isNedge(402)=0 exch2_isEedge(402)=0 exch2_isSedge(402)=0 exch2_myFace(402)=3 exch2_mydNx(402)=510 exch2_mydNy(402)=510 exch2_nNeighbours(402)=4 exch2_neighbourId(1,402)=417 exch2_iLo(1,402)=0 exch2_iHi(1,402)=35 exch2_jLo(1,402)=52 exch2_jHi(1,402)=52 exch2_opposingSend(1,402)=2 exch2_pij(1,1,402)=1 exch2_pij(2,1,402)=0 exch2_pij(3,1,402)=0 exch2_pij(4,1,402)=1 exch2_oi(1,402)=0 exch2_oj(1,402)=0 exch2_neighbourId(2,402)=387 exch2_iLo(2,402)=0 exch2_iHi(2,402)=35 exch2_jLo(2,402)=0 exch2_jHi(2,402)=0 exch2_opposingSend(2,402)=1 exch2_pij(1,2,402)=1 exch2_pij(2,2,402)=0 exch2_pij(3,2,402)=0 exch2_pij(4,2,402)=1 exch2_oi(2,402)=0 exch2_oj(2,402)=0 exch2_neighbourId(3,402)=403 exch2_iLo(3,402)=35 exch2_iHi(3,402)=35 exch2_jLo(3,402)=0 exch2_jHi(3,402)=52 exch2_opposingSend(3,402)=4 exch2_pij(1,3,402)=1 exch2_pij(2,3,402)=0 exch2_pij(3,3,402)=0 exch2_pij(4,3,402)=1 exch2_oi(3,402)=0 exch2_oj(3,402)=0 exch2_neighbourId(4,402)=401 exch2_iLo(4,402)=0 exch2_iHi(4,402)=0 exch2_jLo(4,402)=0 exch2_jHi(4,402)=52 exch2_opposingSend(4,402)=3 exch2_pij(1,4,402)=1 exch2_pij(2,4,402)=0 exch2_pij(3,4,402)=0 exch2_pij(4,4,402)=1 exch2_oi(4,402)=0 exch2_oj(4,402)=0 RETURN END SUBROUTINE W2_E2SETUP_403 C Topology for tile 403 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(403)=34 exch2_tNy(403)=51 exch2_tBasex(403)=408 exch2_tBasey(403)=306 exch2_txGlobalo(403)=1429 exch2_tyGlobalo(403)=307 exch2_isWedge(403)=0 exch2_isNedge(403)=0 exch2_isEedge(403)=0 exch2_isSedge(403)=0 exch2_myFace(403)=3 exch2_mydNx(403)=510 exch2_mydNy(403)=510 exch2_nNeighbours(403)=4 exch2_neighbourId(1,403)=418 exch2_iLo(1,403)=0 exch2_iHi(1,403)=35 exch2_jLo(1,403)=52 exch2_jHi(1,403)=52 exch2_opposingSend(1,403)=2 exch2_pij(1,1,403)=1 exch2_pij(2,1,403)=0 exch2_pij(3,1,403)=0 exch2_pij(4,1,403)=1 exch2_oi(1,403)=0 exch2_oj(1,403)=0 exch2_neighbourId(2,403)=388 exch2_iLo(2,403)=0 exch2_iHi(2,403)=35 exch2_jLo(2,403)=0 exch2_jHi(2,403)=0 exch2_opposingSend(2,403)=1 exch2_pij(1,2,403)=1 exch2_pij(2,2,403)=0 exch2_pij(3,2,403)=0 exch2_pij(4,2,403)=1 exch2_oi(2,403)=0 exch2_oj(2,403)=0 exch2_neighbourId(3,403)=404 exch2_iLo(3,403)=35 exch2_iHi(3,403)=35 exch2_jLo(3,403)=0 exch2_jHi(3,403)=52 exch2_opposingSend(3,403)=4 exch2_pij(1,3,403)=1 exch2_pij(2,3,403)=0 exch2_pij(3,3,403)=0 exch2_pij(4,3,403)=1 exch2_oi(3,403)=0 exch2_oj(3,403)=0 exch2_neighbourId(4,403)=402 exch2_iLo(4,403)=0 exch2_iHi(4,403)=0 exch2_jLo(4,403)=0 exch2_jHi(4,403)=52 exch2_opposingSend(4,403)=3 exch2_pij(1,4,403)=1 exch2_pij(2,4,403)=0 exch2_pij(3,4,403)=0 exch2_pij(4,4,403)=1 exch2_oi(4,403)=0 exch2_oj(4,403)=0 RETURN END SUBROUTINE W2_E2SETUP_404 C Topology for tile 404 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(404)=34 exch2_tNy(404)=51 exch2_tBasex(404)=442 exch2_tBasey(404)=306 exch2_txGlobalo(404)=1463 exch2_tyGlobalo(404)=307 exch2_isWedge(404)=0 exch2_isNedge(404)=0 exch2_isEedge(404)=0 exch2_isSedge(404)=0 exch2_myFace(404)=3 exch2_mydNx(404)=510 exch2_mydNy(404)=510 exch2_nNeighbours(404)=4 exch2_neighbourId(1,404)=419 exch2_iLo(1,404)=0 exch2_iHi(1,404)=35 exch2_jLo(1,404)=52 exch2_jHi(1,404)=52 exch2_opposingSend(1,404)=2 exch2_pij(1,1,404)=1 exch2_pij(2,1,404)=0 exch2_pij(3,1,404)=0 exch2_pij(4,1,404)=1 exch2_oi(1,404)=0 exch2_oj(1,404)=0 exch2_neighbourId(2,404)=389 exch2_iLo(2,404)=0 exch2_iHi(2,404)=35 exch2_jLo(2,404)=0 exch2_jHi(2,404)=0 exch2_opposingSend(2,404)=1 exch2_pij(1,2,404)=1 exch2_pij(2,2,404)=0 exch2_pij(3,2,404)=0 exch2_pij(4,2,404)=1 exch2_oi(2,404)=0 exch2_oj(2,404)=0 exch2_neighbourId(3,404)=405 exch2_iLo(3,404)=35 exch2_iHi(3,404)=35 exch2_jLo(3,404)=0 exch2_jHi(3,404)=52 exch2_opposingSend(3,404)=4 exch2_pij(1,3,404)=1 exch2_pij(2,3,404)=0 exch2_pij(3,3,404)=0 exch2_pij(4,3,404)=1 exch2_oi(3,404)=0 exch2_oj(3,404)=0 exch2_neighbourId(4,404)=403 exch2_iLo(4,404)=0 exch2_iHi(4,404)=0 exch2_jLo(4,404)=0 exch2_jHi(4,404)=52 exch2_opposingSend(4,404)=3 exch2_pij(1,4,404)=1 exch2_pij(2,4,404)=0 exch2_pij(3,4,404)=0 exch2_pij(4,4,404)=1 exch2_oi(4,404)=0 exch2_oj(4,404)=0 RETURN END SUBROUTINE W2_E2SETUP_405 C Topology for tile 405 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(405)=34 exch2_tNy(405)=51 exch2_tBasex(405)=476 exch2_tBasey(405)=306 exch2_txGlobalo(405)=1497 exch2_tyGlobalo(405)=307 exch2_isWedge(405)=0 exch2_isNedge(405)=0 exch2_isEedge(405)=1 exch2_isSedge(405)=0 exch2_myFace(405)=3 exch2_mydNx(405)=510 exch2_mydNy(405)=510 exch2_nNeighbours(405)=4 exch2_neighbourId(1,405)=420 exch2_iLo(1,405)=0 exch2_iHi(1,405)=35 exch2_jLo(1,405)=52 exch2_jHi(1,405)=52 exch2_opposingSend(1,405)=2 exch2_pij(1,1,405)=1 exch2_pij(2,1,405)=0 exch2_pij(3,1,405)=0 exch2_pij(4,1,405)=1 exch2_oi(1,405)=0 exch2_oj(1,405)=0 exch2_neighbourId(2,405)=390 exch2_iLo(2,405)=0 exch2_iHi(2,405)=35 exch2_jLo(2,405)=0 exch2_jHi(2,405)=0 exch2_opposingSend(2,405)=1 exch2_pij(1,2,405)=1 exch2_pij(2,2,405)=0 exch2_pij(3,2,405)=0 exch2_pij(4,2,405)=1 exch2_oi(2,405)=0 exch2_oj(2,405)=0 exch2_neighbourId(3,405)=541 exch2_iLo(3,405)=35 exch2_iHi(3,405)=35 exch2_jLo(3,405)=0 exch2_jHi(3,405)=52 exch2_opposingSend(3,405)=4 exch2_pij(1,3,405)=1 exch2_pij(2,3,405)=0 exch2_pij(3,3,405)=0 exch2_pij(4,3,405)=1 exch2_oi(3,405)=510 exch2_oj(3,405)=0 exch2_neighbourId(4,405)=404 exch2_iLo(4,405)=0 exch2_iHi(4,405)=0 exch2_jLo(4,405)=0 exch2_jHi(4,405)=52 exch2_opposingSend(4,405)=3 exch2_pij(1,4,405)=1 exch2_pij(2,4,405)=0 exch2_pij(3,4,405)=0 exch2_pij(4,4,405)=1 exch2_oi(4,405)=0 exch2_oj(4,405)=0 RETURN END SUBROUTINE W2_E2SETUP_406 C Topology for tile 406 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(406)=34 exch2_tNy(406)=51 exch2_tBasex(406)=0 exch2_tBasey(406)=357 exch2_txGlobalo(406)=1021 exch2_tyGlobalo(406)=358 exch2_isWedge(406)=1 exch2_isNedge(406)=0 exch2_isEedge(406)=0 exch2_isSedge(406)=0 exch2_myFace(406)=3 exch2_mydNx(406)=510 exch2_mydNy(406)=510 exch2_nNeighbours(406)=5 exch2_neighbourId(1,406)=421 exch2_iLo(1,406)=0 exch2_iHi(1,406)=35 exch2_jLo(1,406)=52 exch2_jHi(1,406)=52 exch2_opposingSend(1,406)=2 exch2_pij(1,1,406)=1 exch2_pij(2,1,406)=0 exch2_pij(3,1,406)=0 exch2_pij(4,1,406)=1 exch2_oi(1,406)=0 exch2_oj(1,406)=0 exch2_neighbourId(2,406)=391 exch2_iLo(2,406)=0 exch2_iHi(2,406)=35 exch2_jLo(2,406)=0 exch2_jHi(2,406)=0 exch2_opposingSend(2,406)=1 exch2_pij(1,2,406)=1 exch2_pij(2,2,406)=0 exch2_pij(3,2,406)=0 exch2_pij(4,2,406)=1 exch2_oi(2,406)=0 exch2_oj(2,406)=0 exch2_neighbourId(3,406)=407 exch2_iLo(3,406)=35 exch2_iHi(3,406)=35 exch2_jLo(3,406)=0 exch2_jHi(3,406)=52 exch2_opposingSend(3,406)=4 exch2_pij(1,3,406)=1 exch2_pij(2,3,406)=0 exch2_pij(3,3,406)=0 exch2_pij(4,3,406)=1 exch2_oi(3,406)=0 exch2_oj(3,406)=0 exch2_neighbourId(4,406)=139 exch2_iLo(4,406)=0 exch2_iHi(4,406)=0 exch2_jLo(4,406)=17 exch2_jHi(4,406)=52 exch2_opposingSend(4,406)=1 exch2_pij(1,4,406)=0 exch2_pij(2,4,406)=1 exch2_pij(3,4,406)=-1 exch2_pij(4,4,406)=0 exch2_oi(4,406)=-510 exch2_oj(4,406)=511 exch2_neighbourId(5,406)=140 exch2_iLo(5,406)=0 exch2_iHi(5,406)=0 exch2_jLo(5,406)=0 exch2_jHi(5,406)=18 exch2_opposingSend(5,406)=2 exch2_pij(1,5,406)=0 exch2_pij(2,5,406)=1 exch2_pij(3,5,406)=-1 exch2_pij(4,5,406)=0 exch2_oi(5,406)=-510 exch2_oj(5,406)=511 RETURN END SUBROUTINE W2_E2SETUP_407 C Topology for tile 407 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(407)=34 exch2_tNy(407)=51 exch2_tBasex(407)=34 exch2_tBasey(407)=357 exch2_txGlobalo(407)=1055 exch2_tyGlobalo(407)=358 exch2_isWedge(407)=0 exch2_isNedge(407)=0 exch2_isEedge(407)=0 exch2_isSedge(407)=0 exch2_myFace(407)=3 exch2_mydNx(407)=510 exch2_mydNy(407)=510 exch2_nNeighbours(407)=4 exch2_neighbourId(1,407)=422 exch2_iLo(1,407)=0 exch2_iHi(1,407)=35 exch2_jLo(1,407)=52 exch2_jHi(1,407)=52 exch2_opposingSend(1,407)=2 exch2_pij(1,1,407)=1 exch2_pij(2,1,407)=0 exch2_pij(3,1,407)=0 exch2_pij(4,1,407)=1 exch2_oi(1,407)=0 exch2_oj(1,407)=0 exch2_neighbourId(2,407)=392 exch2_iLo(2,407)=0 exch2_iHi(2,407)=35 exch2_jLo(2,407)=0 exch2_jHi(2,407)=0 exch2_opposingSend(2,407)=1 exch2_pij(1,2,407)=1 exch2_pij(2,2,407)=0 exch2_pij(3,2,407)=0 exch2_pij(4,2,407)=1 exch2_oi(2,407)=0 exch2_oj(2,407)=0 exch2_neighbourId(3,407)=408 exch2_iLo(3,407)=35 exch2_iHi(3,407)=35 exch2_jLo(3,407)=0 exch2_jHi(3,407)=52 exch2_opposingSend(3,407)=4 exch2_pij(1,3,407)=1 exch2_pij(2,3,407)=0 exch2_pij(3,3,407)=0 exch2_pij(4,3,407)=1 exch2_oi(3,407)=0 exch2_oj(3,407)=0 exch2_neighbourId(4,407)=406 exch2_iLo(4,407)=0 exch2_iHi(4,407)=0 exch2_jLo(4,407)=0 exch2_jHi(4,407)=52 exch2_opposingSend(4,407)=3 exch2_pij(1,4,407)=1 exch2_pij(2,4,407)=0 exch2_pij(3,4,407)=0 exch2_pij(4,4,407)=1 exch2_oi(4,407)=0 exch2_oj(4,407)=0 RETURN END SUBROUTINE W2_E2SETUP_408 C Topology for tile 408 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(408)=34 exch2_tNy(408)=51 exch2_tBasex(408)=68 exch2_tBasey(408)=357 exch2_txGlobalo(408)=1089 exch2_tyGlobalo(408)=358 exch2_isWedge(408)=0 exch2_isNedge(408)=0 exch2_isEedge(408)=0 exch2_isSedge(408)=0 exch2_myFace(408)=3 exch2_mydNx(408)=510 exch2_mydNy(408)=510 exch2_nNeighbours(408)=4 exch2_neighbourId(1,408)=423 exch2_iLo(1,408)=0 exch2_iHi(1,408)=35 exch2_jLo(1,408)=52 exch2_jHi(1,408)=52 exch2_opposingSend(1,408)=2 exch2_pij(1,1,408)=1 exch2_pij(2,1,408)=0 exch2_pij(3,1,408)=0 exch2_pij(4,1,408)=1 exch2_oi(1,408)=0 exch2_oj(1,408)=0 exch2_neighbourId(2,408)=393 exch2_iLo(2,408)=0 exch2_iHi(2,408)=35 exch2_jLo(2,408)=0 exch2_jHi(2,408)=0 exch2_opposingSend(2,408)=1 exch2_pij(1,2,408)=1 exch2_pij(2,2,408)=0 exch2_pij(3,2,408)=0 exch2_pij(4,2,408)=1 exch2_oi(2,408)=0 exch2_oj(2,408)=0 exch2_neighbourId(3,408)=409 exch2_iLo(3,408)=35 exch2_iHi(3,408)=35 exch2_jLo(3,408)=0 exch2_jHi(3,408)=52 exch2_opposingSend(3,408)=4 exch2_pij(1,3,408)=1 exch2_pij(2,3,408)=0 exch2_pij(3,3,408)=0 exch2_pij(4,3,408)=1 exch2_oi(3,408)=0 exch2_oj(3,408)=0 exch2_neighbourId(4,408)=407 exch2_iLo(4,408)=0 exch2_iHi(4,408)=0 exch2_jLo(4,408)=0 exch2_jHi(4,408)=52 exch2_opposingSend(4,408)=3 exch2_pij(1,4,408)=1 exch2_pij(2,4,408)=0 exch2_pij(3,4,408)=0 exch2_pij(4,4,408)=1 exch2_oi(4,408)=0 exch2_oj(4,408)=0 RETURN END SUBROUTINE W2_E2SETUP_409 C Topology for tile 409 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(409)=34 exch2_tNy(409)=51 exch2_tBasex(409)=102 exch2_tBasey(409)=357 exch2_txGlobalo(409)=1123 exch2_tyGlobalo(409)=358 exch2_isWedge(409)=0 exch2_isNedge(409)=0 exch2_isEedge(409)=0 exch2_isSedge(409)=0 exch2_myFace(409)=3 exch2_mydNx(409)=510 exch2_mydNy(409)=510 exch2_nNeighbours(409)=4 exch2_neighbourId(1,409)=424 exch2_iLo(1,409)=0 exch2_iHi(1,409)=35 exch2_jLo(1,409)=52 exch2_jHi(1,409)=52 exch2_opposingSend(1,409)=2 exch2_pij(1,1,409)=1 exch2_pij(2,1,409)=0 exch2_pij(3,1,409)=0 exch2_pij(4,1,409)=1 exch2_oi(1,409)=0 exch2_oj(1,409)=0 exch2_neighbourId(2,409)=394 exch2_iLo(2,409)=0 exch2_iHi(2,409)=35 exch2_jLo(2,409)=0 exch2_jHi(2,409)=0 exch2_opposingSend(2,409)=1 exch2_pij(1,2,409)=1 exch2_pij(2,2,409)=0 exch2_pij(3,2,409)=0 exch2_pij(4,2,409)=1 exch2_oi(2,409)=0 exch2_oj(2,409)=0 exch2_neighbourId(3,409)=410 exch2_iLo(3,409)=35 exch2_iHi(3,409)=35 exch2_jLo(3,409)=0 exch2_jHi(3,409)=52 exch2_opposingSend(3,409)=4 exch2_pij(1,3,409)=1 exch2_pij(2,3,409)=0 exch2_pij(3,3,409)=0 exch2_pij(4,3,409)=1 exch2_oi(3,409)=0 exch2_oj(3,409)=0 exch2_neighbourId(4,409)=408 exch2_iLo(4,409)=0 exch2_iHi(4,409)=0 exch2_jLo(4,409)=0 exch2_jHi(4,409)=52 exch2_opposingSend(4,409)=3 exch2_pij(1,4,409)=1 exch2_pij(2,4,409)=0 exch2_pij(3,4,409)=0 exch2_pij(4,4,409)=1 exch2_oi(4,409)=0 exch2_oj(4,409)=0 RETURN END SUBROUTINE W2_E2SETUP_410 C Topology for tile 410 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(410)=34 exch2_tNy(410)=51 exch2_tBasex(410)=136 exch2_tBasey(410)=357 exch2_txGlobalo(410)=1157 exch2_tyGlobalo(410)=358 exch2_isWedge(410)=0 exch2_isNedge(410)=0 exch2_isEedge(410)=0 exch2_isSedge(410)=0 exch2_myFace(410)=3 exch2_mydNx(410)=510 exch2_mydNy(410)=510 exch2_nNeighbours(410)=4 exch2_neighbourId(1,410)=425 exch2_iLo(1,410)=0 exch2_iHi(1,410)=35 exch2_jLo(1,410)=52 exch2_jHi(1,410)=52 exch2_opposingSend(1,410)=2 exch2_pij(1,1,410)=1 exch2_pij(2,1,410)=0 exch2_pij(3,1,410)=0 exch2_pij(4,1,410)=1 exch2_oi(1,410)=0 exch2_oj(1,410)=0 exch2_neighbourId(2,410)=395 exch2_iLo(2,410)=0 exch2_iHi(2,410)=35 exch2_jLo(2,410)=0 exch2_jHi(2,410)=0 exch2_opposingSend(2,410)=1 exch2_pij(1,2,410)=1 exch2_pij(2,2,410)=0 exch2_pij(3,2,410)=0 exch2_pij(4,2,410)=1 exch2_oi(2,410)=0 exch2_oj(2,410)=0 exch2_neighbourId(3,410)=411 exch2_iLo(3,410)=35 exch2_iHi(3,410)=35 exch2_jLo(3,410)=0 exch2_jHi(3,410)=52 exch2_opposingSend(3,410)=4 exch2_pij(1,3,410)=1 exch2_pij(2,3,410)=0 exch2_pij(3,3,410)=0 exch2_pij(4,3,410)=1 exch2_oi(3,410)=0 exch2_oj(3,410)=0 exch2_neighbourId(4,410)=409 exch2_iLo(4,410)=0 exch2_iHi(4,410)=0 exch2_jLo(4,410)=0 exch2_jHi(4,410)=52 exch2_opposingSend(4,410)=3 exch2_pij(1,4,410)=1 exch2_pij(2,4,410)=0 exch2_pij(3,4,410)=0 exch2_pij(4,4,410)=1 exch2_oi(4,410)=0 exch2_oj(4,410)=0 RETURN END SUBROUTINE W2_E2SETUP_411 C Topology for tile 411 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(411)=34 exch2_tNy(411)=51 exch2_tBasex(411)=170 exch2_tBasey(411)=357 exch2_txGlobalo(411)=1191 exch2_tyGlobalo(411)=358 exch2_isWedge(411)=0 exch2_isNedge(411)=0 exch2_isEedge(411)=0 exch2_isSedge(411)=0 exch2_myFace(411)=3 exch2_mydNx(411)=510 exch2_mydNy(411)=510 exch2_nNeighbours(411)=4 exch2_neighbourId(1,411)=426 exch2_iLo(1,411)=0 exch2_iHi(1,411)=35 exch2_jLo(1,411)=52 exch2_jHi(1,411)=52 exch2_opposingSend(1,411)=2 exch2_pij(1,1,411)=1 exch2_pij(2,1,411)=0 exch2_pij(3,1,411)=0 exch2_pij(4,1,411)=1 exch2_oi(1,411)=0 exch2_oj(1,411)=0 exch2_neighbourId(2,411)=396 exch2_iLo(2,411)=0 exch2_iHi(2,411)=35 exch2_jLo(2,411)=0 exch2_jHi(2,411)=0 exch2_opposingSend(2,411)=1 exch2_pij(1,2,411)=1 exch2_pij(2,2,411)=0 exch2_pij(3,2,411)=0 exch2_pij(4,2,411)=1 exch2_oi(2,411)=0 exch2_oj(2,411)=0 exch2_neighbourId(3,411)=412 exch2_iLo(3,411)=35 exch2_iHi(3,411)=35 exch2_jLo(3,411)=0 exch2_jHi(3,411)=52 exch2_opposingSend(3,411)=4 exch2_pij(1,3,411)=1 exch2_pij(2,3,411)=0 exch2_pij(3,3,411)=0 exch2_pij(4,3,411)=1 exch2_oi(3,411)=0 exch2_oj(3,411)=0 exch2_neighbourId(4,411)=410 exch2_iLo(4,411)=0 exch2_iHi(4,411)=0 exch2_jLo(4,411)=0 exch2_jHi(4,411)=52 exch2_opposingSend(4,411)=3 exch2_pij(1,4,411)=1 exch2_pij(2,4,411)=0 exch2_pij(3,4,411)=0 exch2_pij(4,4,411)=1 exch2_oi(4,411)=0 exch2_oj(4,411)=0 RETURN END SUBROUTINE W2_E2SETUP_412 C Topology for tile 412 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(412)=34 exch2_tNy(412)=51 exch2_tBasex(412)=204 exch2_tBasey(412)=357 exch2_txGlobalo(412)=1225 exch2_tyGlobalo(412)=358 exch2_isWedge(412)=0 exch2_isNedge(412)=0 exch2_isEedge(412)=0 exch2_isSedge(412)=0 exch2_myFace(412)=3 exch2_mydNx(412)=510 exch2_mydNy(412)=510 exch2_nNeighbours(412)=4 exch2_neighbourId(1,412)=427 exch2_iLo(1,412)=0 exch2_iHi(1,412)=35 exch2_jLo(1,412)=52 exch2_jHi(1,412)=52 exch2_opposingSend(1,412)=2 exch2_pij(1,1,412)=1 exch2_pij(2,1,412)=0 exch2_pij(3,1,412)=0 exch2_pij(4,1,412)=1 exch2_oi(1,412)=0 exch2_oj(1,412)=0 exch2_neighbourId(2,412)=397 exch2_iLo(2,412)=0 exch2_iHi(2,412)=35 exch2_jLo(2,412)=0 exch2_jHi(2,412)=0 exch2_opposingSend(2,412)=1 exch2_pij(1,2,412)=1 exch2_pij(2,2,412)=0 exch2_pij(3,2,412)=0 exch2_pij(4,2,412)=1 exch2_oi(2,412)=0 exch2_oj(2,412)=0 exch2_neighbourId(3,412)=413 exch2_iLo(3,412)=35 exch2_iHi(3,412)=35 exch2_jLo(3,412)=0 exch2_jHi(3,412)=52 exch2_opposingSend(3,412)=4 exch2_pij(1,3,412)=1 exch2_pij(2,3,412)=0 exch2_pij(3,3,412)=0 exch2_pij(4,3,412)=1 exch2_oi(3,412)=0 exch2_oj(3,412)=0 exch2_neighbourId(4,412)=411 exch2_iLo(4,412)=0 exch2_iHi(4,412)=0 exch2_jLo(4,412)=0 exch2_jHi(4,412)=52 exch2_opposingSend(4,412)=3 exch2_pij(1,4,412)=1 exch2_pij(2,4,412)=0 exch2_pij(3,4,412)=0 exch2_pij(4,4,412)=1 exch2_oi(4,412)=0 exch2_oj(4,412)=0 RETURN END SUBROUTINE W2_E2SETUP_413 C Topology for tile 413 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(413)=34 exch2_tNy(413)=51 exch2_tBasex(413)=238 exch2_tBasey(413)=357 exch2_txGlobalo(413)=1259 exch2_tyGlobalo(413)=358 exch2_isWedge(413)=0 exch2_isNedge(413)=0 exch2_isEedge(413)=0 exch2_isSedge(413)=0 exch2_myFace(413)=3 exch2_mydNx(413)=510 exch2_mydNy(413)=510 exch2_nNeighbours(413)=4 exch2_neighbourId(1,413)=428 exch2_iLo(1,413)=0 exch2_iHi(1,413)=35 exch2_jLo(1,413)=52 exch2_jHi(1,413)=52 exch2_opposingSend(1,413)=2 exch2_pij(1,1,413)=1 exch2_pij(2,1,413)=0 exch2_pij(3,1,413)=0 exch2_pij(4,1,413)=1 exch2_oi(1,413)=0 exch2_oj(1,413)=0 exch2_neighbourId(2,413)=398 exch2_iLo(2,413)=0 exch2_iHi(2,413)=35 exch2_jLo(2,413)=0 exch2_jHi(2,413)=0 exch2_opposingSend(2,413)=1 exch2_pij(1,2,413)=1 exch2_pij(2,2,413)=0 exch2_pij(3,2,413)=0 exch2_pij(4,2,413)=1 exch2_oi(2,413)=0 exch2_oj(2,413)=0 exch2_neighbourId(3,413)=414 exch2_iLo(3,413)=35 exch2_iHi(3,413)=35 exch2_jLo(3,413)=0 exch2_jHi(3,413)=52 exch2_opposingSend(3,413)=4 exch2_pij(1,3,413)=1 exch2_pij(2,3,413)=0 exch2_pij(3,3,413)=0 exch2_pij(4,3,413)=1 exch2_oi(3,413)=0 exch2_oj(3,413)=0 exch2_neighbourId(4,413)=412 exch2_iLo(4,413)=0 exch2_iHi(4,413)=0 exch2_jLo(4,413)=0 exch2_jHi(4,413)=52 exch2_opposingSend(4,413)=3 exch2_pij(1,4,413)=1 exch2_pij(2,4,413)=0 exch2_pij(3,4,413)=0 exch2_pij(4,4,413)=1 exch2_oi(4,413)=0 exch2_oj(4,413)=0 RETURN END SUBROUTINE W2_E2SETUP_414 C Topology for tile 414 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(414)=34 exch2_tNy(414)=51 exch2_tBasex(414)=272 exch2_tBasey(414)=357 exch2_txGlobalo(414)=1293 exch2_tyGlobalo(414)=358 exch2_isWedge(414)=0 exch2_isNedge(414)=0 exch2_isEedge(414)=0 exch2_isSedge(414)=0 exch2_myFace(414)=3 exch2_mydNx(414)=510 exch2_mydNy(414)=510 exch2_nNeighbours(414)=4 exch2_neighbourId(1,414)=429 exch2_iLo(1,414)=0 exch2_iHi(1,414)=35 exch2_jLo(1,414)=52 exch2_jHi(1,414)=52 exch2_opposingSend(1,414)=2 exch2_pij(1,1,414)=1 exch2_pij(2,1,414)=0 exch2_pij(3,1,414)=0 exch2_pij(4,1,414)=1 exch2_oi(1,414)=0 exch2_oj(1,414)=0 exch2_neighbourId(2,414)=399 exch2_iLo(2,414)=0 exch2_iHi(2,414)=35 exch2_jLo(2,414)=0 exch2_jHi(2,414)=0 exch2_opposingSend(2,414)=1 exch2_pij(1,2,414)=1 exch2_pij(2,2,414)=0 exch2_pij(3,2,414)=0 exch2_pij(4,2,414)=1 exch2_oi(2,414)=0 exch2_oj(2,414)=0 exch2_neighbourId(3,414)=415 exch2_iLo(3,414)=35 exch2_iHi(3,414)=35 exch2_jLo(3,414)=0 exch2_jHi(3,414)=52 exch2_opposingSend(3,414)=4 exch2_pij(1,3,414)=1 exch2_pij(2,3,414)=0 exch2_pij(3,3,414)=0 exch2_pij(4,3,414)=1 exch2_oi(3,414)=0 exch2_oj(3,414)=0 exch2_neighbourId(4,414)=413 exch2_iLo(4,414)=0 exch2_iHi(4,414)=0 exch2_jLo(4,414)=0 exch2_jHi(4,414)=52 exch2_opposingSend(4,414)=3 exch2_pij(1,4,414)=1 exch2_pij(2,4,414)=0 exch2_pij(3,4,414)=0 exch2_pij(4,4,414)=1 exch2_oi(4,414)=0 exch2_oj(4,414)=0 RETURN END SUBROUTINE W2_E2SETUP_415 C Topology for tile 415 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(415)=34 exch2_tNy(415)=51 exch2_tBasex(415)=306 exch2_tBasey(415)=357 exch2_txGlobalo(415)=1327 exch2_tyGlobalo(415)=358 exch2_isWedge(415)=0 exch2_isNedge(415)=0 exch2_isEedge(415)=0 exch2_isSedge(415)=0 exch2_myFace(415)=3 exch2_mydNx(415)=510 exch2_mydNy(415)=510 exch2_nNeighbours(415)=4 exch2_neighbourId(1,415)=430 exch2_iLo(1,415)=0 exch2_iHi(1,415)=35 exch2_jLo(1,415)=52 exch2_jHi(1,415)=52 exch2_opposingSend(1,415)=2 exch2_pij(1,1,415)=1 exch2_pij(2,1,415)=0 exch2_pij(3,1,415)=0 exch2_pij(4,1,415)=1 exch2_oi(1,415)=0 exch2_oj(1,415)=0 exch2_neighbourId(2,415)=400 exch2_iLo(2,415)=0 exch2_iHi(2,415)=35 exch2_jLo(2,415)=0 exch2_jHi(2,415)=0 exch2_opposingSend(2,415)=1 exch2_pij(1,2,415)=1 exch2_pij(2,2,415)=0 exch2_pij(3,2,415)=0 exch2_pij(4,2,415)=1 exch2_oi(2,415)=0 exch2_oj(2,415)=0 exch2_neighbourId(3,415)=416 exch2_iLo(3,415)=35 exch2_iHi(3,415)=35 exch2_jLo(3,415)=0 exch2_jHi(3,415)=52 exch2_opposingSend(3,415)=4 exch2_pij(1,3,415)=1 exch2_pij(2,3,415)=0 exch2_pij(3,3,415)=0 exch2_pij(4,3,415)=1 exch2_oi(3,415)=0 exch2_oj(3,415)=0 exch2_neighbourId(4,415)=414 exch2_iLo(4,415)=0 exch2_iHi(4,415)=0 exch2_jLo(4,415)=0 exch2_jHi(4,415)=52 exch2_opposingSend(4,415)=3 exch2_pij(1,4,415)=1 exch2_pij(2,4,415)=0 exch2_pij(3,4,415)=0 exch2_pij(4,4,415)=1 exch2_oi(4,415)=0 exch2_oj(4,415)=0 RETURN END SUBROUTINE W2_E2SETUP_416 C Topology for tile 416 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(416)=34 exch2_tNy(416)=51 exch2_tBasex(416)=340 exch2_tBasey(416)=357 exch2_txGlobalo(416)=1361 exch2_tyGlobalo(416)=358 exch2_isWedge(416)=0 exch2_isNedge(416)=0 exch2_isEedge(416)=0 exch2_isSedge(416)=0 exch2_myFace(416)=3 exch2_mydNx(416)=510 exch2_mydNy(416)=510 exch2_nNeighbours(416)=4 exch2_neighbourId(1,416)=431 exch2_iLo(1,416)=0 exch2_iHi(1,416)=35 exch2_jLo(1,416)=52 exch2_jHi(1,416)=52 exch2_opposingSend(1,416)=2 exch2_pij(1,1,416)=1 exch2_pij(2,1,416)=0 exch2_pij(3,1,416)=0 exch2_pij(4,1,416)=1 exch2_oi(1,416)=0 exch2_oj(1,416)=0 exch2_neighbourId(2,416)=401 exch2_iLo(2,416)=0 exch2_iHi(2,416)=35 exch2_jLo(2,416)=0 exch2_jHi(2,416)=0 exch2_opposingSend(2,416)=1 exch2_pij(1,2,416)=1 exch2_pij(2,2,416)=0 exch2_pij(3,2,416)=0 exch2_pij(4,2,416)=1 exch2_oi(2,416)=0 exch2_oj(2,416)=0 exch2_neighbourId(3,416)=417 exch2_iLo(3,416)=35 exch2_iHi(3,416)=35 exch2_jLo(3,416)=0 exch2_jHi(3,416)=52 exch2_opposingSend(3,416)=4 exch2_pij(1,3,416)=1 exch2_pij(2,3,416)=0 exch2_pij(3,3,416)=0 exch2_pij(4,3,416)=1 exch2_oi(3,416)=0 exch2_oj(3,416)=0 exch2_neighbourId(4,416)=415 exch2_iLo(4,416)=0 exch2_iHi(4,416)=0 exch2_jLo(4,416)=0 exch2_jHi(4,416)=52 exch2_opposingSend(4,416)=3 exch2_pij(1,4,416)=1 exch2_pij(2,4,416)=0 exch2_pij(3,4,416)=0 exch2_pij(4,4,416)=1 exch2_oi(4,416)=0 exch2_oj(4,416)=0 RETURN END SUBROUTINE W2_E2SETUP_417 C Topology for tile 417 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(417)=34 exch2_tNy(417)=51 exch2_tBasex(417)=374 exch2_tBasey(417)=357 exch2_txGlobalo(417)=1395 exch2_tyGlobalo(417)=358 exch2_isWedge(417)=0 exch2_isNedge(417)=0 exch2_isEedge(417)=0 exch2_isSedge(417)=0 exch2_myFace(417)=3 exch2_mydNx(417)=510 exch2_mydNy(417)=510 exch2_nNeighbours(417)=4 exch2_neighbourId(1,417)=432 exch2_iLo(1,417)=0 exch2_iHi(1,417)=35 exch2_jLo(1,417)=52 exch2_jHi(1,417)=52 exch2_opposingSend(1,417)=2 exch2_pij(1,1,417)=1 exch2_pij(2,1,417)=0 exch2_pij(3,1,417)=0 exch2_pij(4,1,417)=1 exch2_oi(1,417)=0 exch2_oj(1,417)=0 exch2_neighbourId(2,417)=402 exch2_iLo(2,417)=0 exch2_iHi(2,417)=35 exch2_jLo(2,417)=0 exch2_jHi(2,417)=0 exch2_opposingSend(2,417)=1 exch2_pij(1,2,417)=1 exch2_pij(2,2,417)=0 exch2_pij(3,2,417)=0 exch2_pij(4,2,417)=1 exch2_oi(2,417)=0 exch2_oj(2,417)=0 exch2_neighbourId(3,417)=418 exch2_iLo(3,417)=35 exch2_iHi(3,417)=35 exch2_jLo(3,417)=0 exch2_jHi(3,417)=52 exch2_opposingSend(3,417)=4 exch2_pij(1,3,417)=1 exch2_pij(2,3,417)=0 exch2_pij(3,3,417)=0 exch2_pij(4,3,417)=1 exch2_oi(3,417)=0 exch2_oj(3,417)=0 exch2_neighbourId(4,417)=416 exch2_iLo(4,417)=0 exch2_iHi(4,417)=0 exch2_jLo(4,417)=0 exch2_jHi(4,417)=52 exch2_opposingSend(4,417)=3 exch2_pij(1,4,417)=1 exch2_pij(2,4,417)=0 exch2_pij(3,4,417)=0 exch2_pij(4,4,417)=1 exch2_oi(4,417)=0 exch2_oj(4,417)=0 RETURN END SUBROUTINE W2_E2SETUP_418 C Topology for tile 418 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(418)=34 exch2_tNy(418)=51 exch2_tBasex(418)=408 exch2_tBasey(418)=357 exch2_txGlobalo(418)=1429 exch2_tyGlobalo(418)=358 exch2_isWedge(418)=0 exch2_isNedge(418)=0 exch2_isEedge(418)=0 exch2_isSedge(418)=0 exch2_myFace(418)=3 exch2_mydNx(418)=510 exch2_mydNy(418)=510 exch2_nNeighbours(418)=4 exch2_neighbourId(1,418)=433 exch2_iLo(1,418)=0 exch2_iHi(1,418)=35 exch2_jLo(1,418)=52 exch2_jHi(1,418)=52 exch2_opposingSend(1,418)=2 exch2_pij(1,1,418)=1 exch2_pij(2,1,418)=0 exch2_pij(3,1,418)=0 exch2_pij(4,1,418)=1 exch2_oi(1,418)=0 exch2_oj(1,418)=0 exch2_neighbourId(2,418)=403 exch2_iLo(2,418)=0 exch2_iHi(2,418)=35 exch2_jLo(2,418)=0 exch2_jHi(2,418)=0 exch2_opposingSend(2,418)=1 exch2_pij(1,2,418)=1 exch2_pij(2,2,418)=0 exch2_pij(3,2,418)=0 exch2_pij(4,2,418)=1 exch2_oi(2,418)=0 exch2_oj(2,418)=0 exch2_neighbourId(3,418)=419 exch2_iLo(3,418)=35 exch2_iHi(3,418)=35 exch2_jLo(3,418)=0 exch2_jHi(3,418)=52 exch2_opposingSend(3,418)=4 exch2_pij(1,3,418)=1 exch2_pij(2,3,418)=0 exch2_pij(3,3,418)=0 exch2_pij(4,3,418)=1 exch2_oi(3,418)=0 exch2_oj(3,418)=0 exch2_neighbourId(4,418)=417 exch2_iLo(4,418)=0 exch2_iHi(4,418)=0 exch2_jLo(4,418)=0 exch2_jHi(4,418)=52 exch2_opposingSend(4,418)=3 exch2_pij(1,4,418)=1 exch2_pij(2,4,418)=0 exch2_pij(3,4,418)=0 exch2_pij(4,4,418)=1 exch2_oi(4,418)=0 exch2_oj(4,418)=0 RETURN END SUBROUTINE W2_E2SETUP_419 C Topology for tile 419 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(419)=34 exch2_tNy(419)=51 exch2_tBasex(419)=442 exch2_tBasey(419)=357 exch2_txGlobalo(419)=1463 exch2_tyGlobalo(419)=358 exch2_isWedge(419)=0 exch2_isNedge(419)=0 exch2_isEedge(419)=0 exch2_isSedge(419)=0 exch2_myFace(419)=3 exch2_mydNx(419)=510 exch2_mydNy(419)=510 exch2_nNeighbours(419)=4 exch2_neighbourId(1,419)=434 exch2_iLo(1,419)=0 exch2_iHi(1,419)=35 exch2_jLo(1,419)=52 exch2_jHi(1,419)=52 exch2_opposingSend(1,419)=2 exch2_pij(1,1,419)=1 exch2_pij(2,1,419)=0 exch2_pij(3,1,419)=0 exch2_pij(4,1,419)=1 exch2_oi(1,419)=0 exch2_oj(1,419)=0 exch2_neighbourId(2,419)=404 exch2_iLo(2,419)=0 exch2_iHi(2,419)=35 exch2_jLo(2,419)=0 exch2_jHi(2,419)=0 exch2_opposingSend(2,419)=1 exch2_pij(1,2,419)=1 exch2_pij(2,2,419)=0 exch2_pij(3,2,419)=0 exch2_pij(4,2,419)=1 exch2_oi(2,419)=0 exch2_oj(2,419)=0 exch2_neighbourId(3,419)=420 exch2_iLo(3,419)=35 exch2_iHi(3,419)=35 exch2_jLo(3,419)=0 exch2_jHi(3,419)=52 exch2_opposingSend(3,419)=4 exch2_pij(1,3,419)=1 exch2_pij(2,3,419)=0 exch2_pij(3,3,419)=0 exch2_pij(4,3,419)=1 exch2_oi(3,419)=0 exch2_oj(3,419)=0 exch2_neighbourId(4,419)=418 exch2_iLo(4,419)=0 exch2_iHi(4,419)=0 exch2_jLo(4,419)=0 exch2_jHi(4,419)=52 exch2_opposingSend(4,419)=3 exch2_pij(1,4,419)=1 exch2_pij(2,4,419)=0 exch2_pij(3,4,419)=0 exch2_pij(4,4,419)=1 exch2_oi(4,419)=0 exch2_oj(4,419)=0 RETURN END SUBROUTINE W2_E2SETUP_420 C Topology for tile 420 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(420)=34 exch2_tNy(420)=51 exch2_tBasex(420)=476 exch2_tBasey(420)=357 exch2_txGlobalo(420)=1497 exch2_tyGlobalo(420)=358 exch2_isWedge(420)=0 exch2_isNedge(420)=0 exch2_isEedge(420)=1 exch2_isSedge(420)=0 exch2_myFace(420)=3 exch2_mydNx(420)=510 exch2_mydNy(420)=510 exch2_nNeighbours(420)=4 exch2_neighbourId(1,420)=435 exch2_iLo(1,420)=0 exch2_iHi(1,420)=35 exch2_jLo(1,420)=52 exch2_jHi(1,420)=52 exch2_opposingSend(1,420)=2 exch2_pij(1,1,420)=1 exch2_pij(2,1,420)=0 exch2_pij(3,1,420)=0 exch2_pij(4,1,420)=1 exch2_oi(1,420)=0 exch2_oj(1,420)=0 exch2_neighbourId(2,420)=405 exch2_iLo(2,420)=0 exch2_iHi(2,420)=35 exch2_jLo(2,420)=0 exch2_jHi(2,420)=0 exch2_opposingSend(2,420)=1 exch2_pij(1,2,420)=1 exch2_pij(2,2,420)=0 exch2_pij(3,2,420)=0 exch2_pij(4,2,420)=1 exch2_oi(2,420)=0 exch2_oj(2,420)=0 exch2_neighbourId(3,420)=556 exch2_iLo(3,420)=35 exch2_iHi(3,420)=35 exch2_jLo(3,420)=0 exch2_jHi(3,420)=52 exch2_opposingSend(3,420)=4 exch2_pij(1,3,420)=1 exch2_pij(2,3,420)=0 exch2_pij(3,3,420)=0 exch2_pij(4,3,420)=1 exch2_oi(3,420)=510 exch2_oj(3,420)=0 exch2_neighbourId(4,420)=419 exch2_iLo(4,420)=0 exch2_iHi(4,420)=0 exch2_jLo(4,420)=0 exch2_jHi(4,420)=52 exch2_opposingSend(4,420)=3 exch2_pij(1,4,420)=1 exch2_pij(2,4,420)=0 exch2_pij(3,4,420)=0 exch2_pij(4,4,420)=1 exch2_oi(4,420)=0 exch2_oj(4,420)=0 RETURN END SUBROUTINE W2_E2SETUP_421 C Topology for tile 421 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(421)=34 exch2_tNy(421)=51 exch2_tBasex(421)=0 exch2_tBasey(421)=408 exch2_txGlobalo(421)=1021 exch2_tyGlobalo(421)=409 exch2_isWedge(421)=1 exch2_isNedge(421)=0 exch2_isEedge(421)=0 exch2_isSedge(421)=0 exch2_myFace(421)=3 exch2_mydNx(421)=510 exch2_mydNy(421)=510 exch2_nNeighbours(421)=5 exch2_neighbourId(1,421)=436 exch2_iLo(1,421)=0 exch2_iHi(1,421)=35 exch2_jLo(1,421)=52 exch2_jHi(1,421)=52 exch2_opposingSend(1,421)=2 exch2_pij(1,1,421)=1 exch2_pij(2,1,421)=0 exch2_pij(3,1,421)=0 exch2_pij(4,1,421)=1 exch2_oi(1,421)=0 exch2_oj(1,421)=0 exch2_neighbourId(2,421)=406 exch2_iLo(2,421)=0 exch2_iHi(2,421)=35 exch2_jLo(2,421)=0 exch2_jHi(2,421)=0 exch2_opposingSend(2,421)=1 exch2_pij(1,2,421)=1 exch2_pij(2,2,421)=0 exch2_pij(3,2,421)=0 exch2_pij(4,2,421)=1 exch2_oi(2,421)=0 exch2_oj(2,421)=0 exch2_neighbourId(3,421)=422 exch2_iLo(3,421)=35 exch2_iHi(3,421)=35 exch2_jLo(3,421)=0 exch2_jHi(3,421)=52 exch2_opposingSend(3,421)=4 exch2_pij(1,3,421)=1 exch2_pij(2,3,421)=0 exch2_pij(3,3,421)=0 exch2_pij(4,3,421)=1 exch2_oi(3,421)=0 exch2_oj(3,421)=0 exch2_neighbourId(4,421)=137 exch2_iLo(4,421)=0 exch2_iHi(4,421)=0 exch2_jLo(4,421)=34 exch2_jHi(4,421)=52 exch2_opposingSend(4,421)=1 exch2_pij(1,4,421)=0 exch2_pij(2,4,421)=1 exch2_pij(3,4,421)=-1 exch2_pij(4,4,421)=0 exch2_oi(4,421)=-510 exch2_oj(4,421)=511 exch2_neighbourId(5,421)=138 exch2_iLo(5,421)=0 exch2_iHi(5,421)=0 exch2_jLo(5,421)=0 exch2_jHi(5,421)=35 exch2_opposingSend(5,421)=1 exch2_pij(1,5,421)=0 exch2_pij(2,5,421)=1 exch2_pij(3,5,421)=-1 exch2_pij(4,5,421)=0 exch2_oi(5,421)=-510 exch2_oj(5,421)=511 RETURN END SUBROUTINE W2_E2SETUP_422 C Topology for tile 422 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(422)=34 exch2_tNy(422)=51 exch2_tBasex(422)=34 exch2_tBasey(422)=408 exch2_txGlobalo(422)=1055 exch2_tyGlobalo(422)=409 exch2_isWedge(422)=0 exch2_isNedge(422)=0 exch2_isEedge(422)=0 exch2_isSedge(422)=0 exch2_myFace(422)=3 exch2_mydNx(422)=510 exch2_mydNy(422)=510 exch2_nNeighbours(422)=4 exch2_neighbourId(1,422)=437 exch2_iLo(1,422)=0 exch2_iHi(1,422)=35 exch2_jLo(1,422)=52 exch2_jHi(1,422)=52 exch2_opposingSend(1,422)=3 exch2_pij(1,1,422)=1 exch2_pij(2,1,422)=0 exch2_pij(3,1,422)=0 exch2_pij(4,1,422)=1 exch2_oi(1,422)=0 exch2_oj(1,422)=0 exch2_neighbourId(2,422)=407 exch2_iLo(2,422)=0 exch2_iHi(2,422)=35 exch2_jLo(2,422)=0 exch2_jHi(2,422)=0 exch2_opposingSend(2,422)=1 exch2_pij(1,2,422)=1 exch2_pij(2,2,422)=0 exch2_pij(3,2,422)=0 exch2_pij(4,2,422)=1 exch2_oi(2,422)=0 exch2_oj(2,422)=0 exch2_neighbourId(3,422)=423 exch2_iLo(3,422)=35 exch2_iHi(3,422)=35 exch2_jLo(3,422)=0 exch2_jHi(3,422)=52 exch2_opposingSend(3,422)=4 exch2_pij(1,3,422)=1 exch2_pij(2,3,422)=0 exch2_pij(3,3,422)=0 exch2_pij(4,3,422)=1 exch2_oi(3,422)=0 exch2_oj(3,422)=0 exch2_neighbourId(4,422)=421 exch2_iLo(4,422)=0 exch2_iHi(4,422)=0 exch2_jLo(4,422)=0 exch2_jHi(4,422)=52 exch2_opposingSend(4,422)=3 exch2_pij(1,4,422)=1 exch2_pij(2,4,422)=0 exch2_pij(3,4,422)=0 exch2_pij(4,4,422)=1 exch2_oi(4,422)=0 exch2_oj(4,422)=0 RETURN END SUBROUTINE W2_E2SETUP_423 C Topology for tile 423 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(423)=34 exch2_tNy(423)=51 exch2_tBasex(423)=68 exch2_tBasey(423)=408 exch2_txGlobalo(423)=1089 exch2_tyGlobalo(423)=409 exch2_isWedge(423)=0 exch2_isNedge(423)=0 exch2_isEedge(423)=0 exch2_isSedge(423)=0 exch2_myFace(423)=3 exch2_mydNx(423)=510 exch2_mydNy(423)=510 exch2_nNeighbours(423)=4 exch2_neighbourId(1,423)=438 exch2_iLo(1,423)=0 exch2_iHi(1,423)=35 exch2_jLo(1,423)=52 exch2_jHi(1,423)=52 exch2_opposingSend(1,423)=2 exch2_pij(1,1,423)=1 exch2_pij(2,1,423)=0 exch2_pij(3,1,423)=0 exch2_pij(4,1,423)=1 exch2_oi(1,423)=0 exch2_oj(1,423)=0 exch2_neighbourId(2,423)=408 exch2_iLo(2,423)=0 exch2_iHi(2,423)=35 exch2_jLo(2,423)=0 exch2_jHi(2,423)=0 exch2_opposingSend(2,423)=1 exch2_pij(1,2,423)=1 exch2_pij(2,2,423)=0 exch2_pij(3,2,423)=0 exch2_pij(4,2,423)=1 exch2_oi(2,423)=0 exch2_oj(2,423)=0 exch2_neighbourId(3,423)=424 exch2_iLo(3,423)=35 exch2_iHi(3,423)=35 exch2_jLo(3,423)=0 exch2_jHi(3,423)=52 exch2_opposingSend(3,423)=4 exch2_pij(1,3,423)=1 exch2_pij(2,3,423)=0 exch2_pij(3,3,423)=0 exch2_pij(4,3,423)=1 exch2_oi(3,423)=0 exch2_oj(3,423)=0 exch2_neighbourId(4,423)=422 exch2_iLo(4,423)=0 exch2_iHi(4,423)=0 exch2_jLo(4,423)=0 exch2_jHi(4,423)=52 exch2_opposingSend(4,423)=3 exch2_pij(1,4,423)=1 exch2_pij(2,4,423)=0 exch2_pij(3,4,423)=0 exch2_pij(4,4,423)=1 exch2_oi(4,423)=0 exch2_oj(4,423)=0 RETURN END SUBROUTINE W2_E2SETUP_424 C Topology for tile 424 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(424)=34 exch2_tNy(424)=51 exch2_tBasex(424)=102 exch2_tBasey(424)=408 exch2_txGlobalo(424)=1123 exch2_tyGlobalo(424)=409 exch2_isWedge(424)=0 exch2_isNedge(424)=0 exch2_isEedge(424)=0 exch2_isSedge(424)=0 exch2_myFace(424)=3 exch2_mydNx(424)=510 exch2_mydNy(424)=510 exch2_nNeighbours(424)=4 exch2_neighbourId(1,424)=439 exch2_iLo(1,424)=0 exch2_iHi(1,424)=35 exch2_jLo(1,424)=52 exch2_jHi(1,424)=52 exch2_opposingSend(1,424)=2 exch2_pij(1,1,424)=1 exch2_pij(2,1,424)=0 exch2_pij(3,1,424)=0 exch2_pij(4,1,424)=1 exch2_oi(1,424)=0 exch2_oj(1,424)=0 exch2_neighbourId(2,424)=409 exch2_iLo(2,424)=0 exch2_iHi(2,424)=35 exch2_jLo(2,424)=0 exch2_jHi(2,424)=0 exch2_opposingSend(2,424)=1 exch2_pij(1,2,424)=1 exch2_pij(2,2,424)=0 exch2_pij(3,2,424)=0 exch2_pij(4,2,424)=1 exch2_oi(2,424)=0 exch2_oj(2,424)=0 exch2_neighbourId(3,424)=425 exch2_iLo(3,424)=35 exch2_iHi(3,424)=35 exch2_jLo(3,424)=0 exch2_jHi(3,424)=52 exch2_opposingSend(3,424)=4 exch2_pij(1,3,424)=1 exch2_pij(2,3,424)=0 exch2_pij(3,3,424)=0 exch2_pij(4,3,424)=1 exch2_oi(3,424)=0 exch2_oj(3,424)=0 exch2_neighbourId(4,424)=423 exch2_iLo(4,424)=0 exch2_iHi(4,424)=0 exch2_jLo(4,424)=0 exch2_jHi(4,424)=52 exch2_opposingSend(4,424)=3 exch2_pij(1,4,424)=1 exch2_pij(2,4,424)=0 exch2_pij(3,4,424)=0 exch2_pij(4,4,424)=1 exch2_oi(4,424)=0 exch2_oj(4,424)=0 RETURN END SUBROUTINE W2_E2SETUP_425 C Topology for tile 425 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(425)=34 exch2_tNy(425)=51 exch2_tBasex(425)=136 exch2_tBasey(425)=408 exch2_txGlobalo(425)=1157 exch2_tyGlobalo(425)=409 exch2_isWedge(425)=0 exch2_isNedge(425)=0 exch2_isEedge(425)=0 exch2_isSedge(425)=0 exch2_myFace(425)=3 exch2_mydNx(425)=510 exch2_mydNy(425)=510 exch2_nNeighbours(425)=4 exch2_neighbourId(1,425)=440 exch2_iLo(1,425)=0 exch2_iHi(1,425)=35 exch2_jLo(1,425)=52 exch2_jHi(1,425)=52 exch2_opposingSend(1,425)=3 exch2_pij(1,1,425)=1 exch2_pij(2,1,425)=0 exch2_pij(3,1,425)=0 exch2_pij(4,1,425)=1 exch2_oi(1,425)=0 exch2_oj(1,425)=0 exch2_neighbourId(2,425)=410 exch2_iLo(2,425)=0 exch2_iHi(2,425)=35 exch2_jLo(2,425)=0 exch2_jHi(2,425)=0 exch2_opposingSend(2,425)=1 exch2_pij(1,2,425)=1 exch2_pij(2,2,425)=0 exch2_pij(3,2,425)=0 exch2_pij(4,2,425)=1 exch2_oi(2,425)=0 exch2_oj(2,425)=0 exch2_neighbourId(3,425)=426 exch2_iLo(3,425)=35 exch2_iHi(3,425)=35 exch2_jLo(3,425)=0 exch2_jHi(3,425)=52 exch2_opposingSend(3,425)=4 exch2_pij(1,3,425)=1 exch2_pij(2,3,425)=0 exch2_pij(3,3,425)=0 exch2_pij(4,3,425)=1 exch2_oi(3,425)=0 exch2_oj(3,425)=0 exch2_neighbourId(4,425)=424 exch2_iLo(4,425)=0 exch2_iHi(4,425)=0 exch2_jLo(4,425)=0 exch2_jHi(4,425)=52 exch2_opposingSend(4,425)=3 exch2_pij(1,4,425)=1 exch2_pij(2,4,425)=0 exch2_pij(3,4,425)=0 exch2_pij(4,4,425)=1 exch2_oi(4,425)=0 exch2_oj(4,425)=0 RETURN END SUBROUTINE W2_E2SETUP_426 C Topology for tile 426 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(426)=34 exch2_tNy(426)=51 exch2_tBasex(426)=170 exch2_tBasey(426)=408 exch2_txGlobalo(426)=1191 exch2_tyGlobalo(426)=409 exch2_isWedge(426)=0 exch2_isNedge(426)=0 exch2_isEedge(426)=0 exch2_isSedge(426)=0 exch2_myFace(426)=3 exch2_mydNx(426)=510 exch2_mydNy(426)=510 exch2_nNeighbours(426)=4 exch2_neighbourId(1,426)=441 exch2_iLo(1,426)=0 exch2_iHi(1,426)=35 exch2_jLo(1,426)=52 exch2_jHi(1,426)=52 exch2_opposingSend(1,426)=2 exch2_pij(1,1,426)=1 exch2_pij(2,1,426)=0 exch2_pij(3,1,426)=0 exch2_pij(4,1,426)=1 exch2_oi(1,426)=0 exch2_oj(1,426)=0 exch2_neighbourId(2,426)=411 exch2_iLo(2,426)=0 exch2_iHi(2,426)=35 exch2_jLo(2,426)=0 exch2_jHi(2,426)=0 exch2_opposingSend(2,426)=1 exch2_pij(1,2,426)=1 exch2_pij(2,2,426)=0 exch2_pij(3,2,426)=0 exch2_pij(4,2,426)=1 exch2_oi(2,426)=0 exch2_oj(2,426)=0 exch2_neighbourId(3,426)=427 exch2_iLo(3,426)=35 exch2_iHi(3,426)=35 exch2_jLo(3,426)=0 exch2_jHi(3,426)=52 exch2_opposingSend(3,426)=4 exch2_pij(1,3,426)=1 exch2_pij(2,3,426)=0 exch2_pij(3,3,426)=0 exch2_pij(4,3,426)=1 exch2_oi(3,426)=0 exch2_oj(3,426)=0 exch2_neighbourId(4,426)=425 exch2_iLo(4,426)=0 exch2_iHi(4,426)=0 exch2_jLo(4,426)=0 exch2_jHi(4,426)=52 exch2_opposingSend(4,426)=3 exch2_pij(1,4,426)=1 exch2_pij(2,4,426)=0 exch2_pij(3,4,426)=0 exch2_pij(4,4,426)=1 exch2_oi(4,426)=0 exch2_oj(4,426)=0 RETURN END SUBROUTINE W2_E2SETUP_427 C Topology for tile 427 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(427)=34 exch2_tNy(427)=51 exch2_tBasex(427)=204 exch2_tBasey(427)=408 exch2_txGlobalo(427)=1225 exch2_tyGlobalo(427)=409 exch2_isWedge(427)=0 exch2_isNedge(427)=0 exch2_isEedge(427)=0 exch2_isSedge(427)=0 exch2_myFace(427)=3 exch2_mydNx(427)=510 exch2_mydNy(427)=510 exch2_nNeighbours(427)=4 exch2_neighbourId(1,427)=442 exch2_iLo(1,427)=0 exch2_iHi(1,427)=35 exch2_jLo(1,427)=52 exch2_jHi(1,427)=52 exch2_opposingSend(1,427)=2 exch2_pij(1,1,427)=1 exch2_pij(2,1,427)=0 exch2_pij(3,1,427)=0 exch2_pij(4,1,427)=1 exch2_oi(1,427)=0 exch2_oj(1,427)=0 exch2_neighbourId(2,427)=412 exch2_iLo(2,427)=0 exch2_iHi(2,427)=35 exch2_jLo(2,427)=0 exch2_jHi(2,427)=0 exch2_opposingSend(2,427)=1 exch2_pij(1,2,427)=1 exch2_pij(2,2,427)=0 exch2_pij(3,2,427)=0 exch2_pij(4,2,427)=1 exch2_oi(2,427)=0 exch2_oj(2,427)=0 exch2_neighbourId(3,427)=428 exch2_iLo(3,427)=35 exch2_iHi(3,427)=35 exch2_jLo(3,427)=0 exch2_jHi(3,427)=52 exch2_opposingSend(3,427)=4 exch2_pij(1,3,427)=1 exch2_pij(2,3,427)=0 exch2_pij(3,3,427)=0 exch2_pij(4,3,427)=1 exch2_oi(3,427)=0 exch2_oj(3,427)=0 exch2_neighbourId(4,427)=426 exch2_iLo(4,427)=0 exch2_iHi(4,427)=0 exch2_jLo(4,427)=0 exch2_jHi(4,427)=52 exch2_opposingSend(4,427)=3 exch2_pij(1,4,427)=1 exch2_pij(2,4,427)=0 exch2_pij(3,4,427)=0 exch2_pij(4,4,427)=1 exch2_oi(4,427)=0 exch2_oj(4,427)=0 RETURN END SUBROUTINE W2_E2SETUP_428 C Topology for tile 428 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(428)=34 exch2_tNy(428)=51 exch2_tBasex(428)=238 exch2_tBasey(428)=408 exch2_txGlobalo(428)=1259 exch2_tyGlobalo(428)=409 exch2_isWedge(428)=0 exch2_isNedge(428)=0 exch2_isEedge(428)=0 exch2_isSedge(428)=0 exch2_myFace(428)=3 exch2_mydNx(428)=510 exch2_mydNy(428)=510 exch2_nNeighbours(428)=4 exch2_neighbourId(1,428)=443 exch2_iLo(1,428)=0 exch2_iHi(1,428)=35 exch2_jLo(1,428)=52 exch2_jHi(1,428)=52 exch2_opposingSend(1,428)=3 exch2_pij(1,1,428)=1 exch2_pij(2,1,428)=0 exch2_pij(3,1,428)=0 exch2_pij(4,1,428)=1 exch2_oi(1,428)=0 exch2_oj(1,428)=0 exch2_neighbourId(2,428)=413 exch2_iLo(2,428)=0 exch2_iHi(2,428)=35 exch2_jLo(2,428)=0 exch2_jHi(2,428)=0 exch2_opposingSend(2,428)=1 exch2_pij(1,2,428)=1 exch2_pij(2,2,428)=0 exch2_pij(3,2,428)=0 exch2_pij(4,2,428)=1 exch2_oi(2,428)=0 exch2_oj(2,428)=0 exch2_neighbourId(3,428)=429 exch2_iLo(3,428)=35 exch2_iHi(3,428)=35 exch2_jLo(3,428)=0 exch2_jHi(3,428)=52 exch2_opposingSend(3,428)=4 exch2_pij(1,3,428)=1 exch2_pij(2,3,428)=0 exch2_pij(3,3,428)=0 exch2_pij(4,3,428)=1 exch2_oi(3,428)=0 exch2_oj(3,428)=0 exch2_neighbourId(4,428)=427 exch2_iLo(4,428)=0 exch2_iHi(4,428)=0 exch2_jLo(4,428)=0 exch2_jHi(4,428)=52 exch2_opposingSend(4,428)=3 exch2_pij(1,4,428)=1 exch2_pij(2,4,428)=0 exch2_pij(3,4,428)=0 exch2_pij(4,4,428)=1 exch2_oi(4,428)=0 exch2_oj(4,428)=0 RETURN END SUBROUTINE W2_E2SETUP_429 C Topology for tile 429 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(429)=34 exch2_tNy(429)=51 exch2_tBasex(429)=272 exch2_tBasey(429)=408 exch2_txGlobalo(429)=1293 exch2_tyGlobalo(429)=409 exch2_isWedge(429)=0 exch2_isNedge(429)=0 exch2_isEedge(429)=0 exch2_isSedge(429)=0 exch2_myFace(429)=3 exch2_mydNx(429)=510 exch2_mydNy(429)=510 exch2_nNeighbours(429)=4 exch2_neighbourId(1,429)=444 exch2_iLo(1,429)=0 exch2_iHi(1,429)=35 exch2_jLo(1,429)=52 exch2_jHi(1,429)=52 exch2_opposingSend(1,429)=2 exch2_pij(1,1,429)=1 exch2_pij(2,1,429)=0 exch2_pij(3,1,429)=0 exch2_pij(4,1,429)=1 exch2_oi(1,429)=0 exch2_oj(1,429)=0 exch2_neighbourId(2,429)=414 exch2_iLo(2,429)=0 exch2_iHi(2,429)=35 exch2_jLo(2,429)=0 exch2_jHi(2,429)=0 exch2_opposingSend(2,429)=1 exch2_pij(1,2,429)=1 exch2_pij(2,2,429)=0 exch2_pij(3,2,429)=0 exch2_pij(4,2,429)=1 exch2_oi(2,429)=0 exch2_oj(2,429)=0 exch2_neighbourId(3,429)=430 exch2_iLo(3,429)=35 exch2_iHi(3,429)=35 exch2_jLo(3,429)=0 exch2_jHi(3,429)=52 exch2_opposingSend(3,429)=4 exch2_pij(1,3,429)=1 exch2_pij(2,3,429)=0 exch2_pij(3,3,429)=0 exch2_pij(4,3,429)=1 exch2_oi(3,429)=0 exch2_oj(3,429)=0 exch2_neighbourId(4,429)=428 exch2_iLo(4,429)=0 exch2_iHi(4,429)=0 exch2_jLo(4,429)=0 exch2_jHi(4,429)=52 exch2_opposingSend(4,429)=3 exch2_pij(1,4,429)=1 exch2_pij(2,4,429)=0 exch2_pij(3,4,429)=0 exch2_pij(4,4,429)=1 exch2_oi(4,429)=0 exch2_oj(4,429)=0 RETURN END SUBROUTINE W2_E2SETUP_430 C Topology for tile 430 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(430)=34 exch2_tNy(430)=51 exch2_tBasex(430)=306 exch2_tBasey(430)=408 exch2_txGlobalo(430)=1327 exch2_tyGlobalo(430)=409 exch2_isWedge(430)=0 exch2_isNedge(430)=0 exch2_isEedge(430)=0 exch2_isSedge(430)=0 exch2_myFace(430)=3 exch2_mydNx(430)=510 exch2_mydNy(430)=510 exch2_nNeighbours(430)=4 exch2_neighbourId(1,430)=445 exch2_iLo(1,430)=0 exch2_iHi(1,430)=35 exch2_jLo(1,430)=52 exch2_jHi(1,430)=52 exch2_opposingSend(1,430)=2 exch2_pij(1,1,430)=1 exch2_pij(2,1,430)=0 exch2_pij(3,1,430)=0 exch2_pij(4,1,430)=1 exch2_oi(1,430)=0 exch2_oj(1,430)=0 exch2_neighbourId(2,430)=415 exch2_iLo(2,430)=0 exch2_iHi(2,430)=35 exch2_jLo(2,430)=0 exch2_jHi(2,430)=0 exch2_opposingSend(2,430)=1 exch2_pij(1,2,430)=1 exch2_pij(2,2,430)=0 exch2_pij(3,2,430)=0 exch2_pij(4,2,430)=1 exch2_oi(2,430)=0 exch2_oj(2,430)=0 exch2_neighbourId(3,430)=431 exch2_iLo(3,430)=35 exch2_iHi(3,430)=35 exch2_jLo(3,430)=0 exch2_jHi(3,430)=52 exch2_opposingSend(3,430)=4 exch2_pij(1,3,430)=1 exch2_pij(2,3,430)=0 exch2_pij(3,3,430)=0 exch2_pij(4,3,430)=1 exch2_oi(3,430)=0 exch2_oj(3,430)=0 exch2_neighbourId(4,430)=429 exch2_iLo(4,430)=0 exch2_iHi(4,430)=0 exch2_jLo(4,430)=0 exch2_jHi(4,430)=52 exch2_opposingSend(4,430)=3 exch2_pij(1,4,430)=1 exch2_pij(2,4,430)=0 exch2_pij(3,4,430)=0 exch2_pij(4,4,430)=1 exch2_oi(4,430)=0 exch2_oj(4,430)=0 RETURN END SUBROUTINE W2_E2SETUP_431 C Topology for tile 431 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(431)=34 exch2_tNy(431)=51 exch2_tBasex(431)=340 exch2_tBasey(431)=408 exch2_txGlobalo(431)=1361 exch2_tyGlobalo(431)=409 exch2_isWedge(431)=0 exch2_isNedge(431)=0 exch2_isEedge(431)=0 exch2_isSedge(431)=0 exch2_myFace(431)=3 exch2_mydNx(431)=510 exch2_mydNy(431)=510 exch2_nNeighbours(431)=4 exch2_neighbourId(1,431)=446 exch2_iLo(1,431)=0 exch2_iHi(1,431)=35 exch2_jLo(1,431)=52 exch2_jHi(1,431)=52 exch2_opposingSend(1,431)=3 exch2_pij(1,1,431)=1 exch2_pij(2,1,431)=0 exch2_pij(3,1,431)=0 exch2_pij(4,1,431)=1 exch2_oi(1,431)=0 exch2_oj(1,431)=0 exch2_neighbourId(2,431)=416 exch2_iLo(2,431)=0 exch2_iHi(2,431)=35 exch2_jLo(2,431)=0 exch2_jHi(2,431)=0 exch2_opposingSend(2,431)=1 exch2_pij(1,2,431)=1 exch2_pij(2,2,431)=0 exch2_pij(3,2,431)=0 exch2_pij(4,2,431)=1 exch2_oi(2,431)=0 exch2_oj(2,431)=0 exch2_neighbourId(3,431)=432 exch2_iLo(3,431)=35 exch2_iHi(3,431)=35 exch2_jLo(3,431)=0 exch2_jHi(3,431)=52 exch2_opposingSend(3,431)=4 exch2_pij(1,3,431)=1 exch2_pij(2,3,431)=0 exch2_pij(3,3,431)=0 exch2_pij(4,3,431)=1 exch2_oi(3,431)=0 exch2_oj(3,431)=0 exch2_neighbourId(4,431)=430 exch2_iLo(4,431)=0 exch2_iHi(4,431)=0 exch2_jLo(4,431)=0 exch2_jHi(4,431)=52 exch2_opposingSend(4,431)=3 exch2_pij(1,4,431)=1 exch2_pij(2,4,431)=0 exch2_pij(3,4,431)=0 exch2_pij(4,4,431)=1 exch2_oi(4,431)=0 exch2_oj(4,431)=0 RETURN END SUBROUTINE W2_E2SETUP_432 C Topology for tile 432 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(432)=34 exch2_tNy(432)=51 exch2_tBasex(432)=374 exch2_tBasey(432)=408 exch2_txGlobalo(432)=1395 exch2_tyGlobalo(432)=409 exch2_isWedge(432)=0 exch2_isNedge(432)=0 exch2_isEedge(432)=0 exch2_isSedge(432)=0 exch2_myFace(432)=3 exch2_mydNx(432)=510 exch2_mydNy(432)=510 exch2_nNeighbours(432)=4 exch2_neighbourId(1,432)=447 exch2_iLo(1,432)=0 exch2_iHi(1,432)=35 exch2_jLo(1,432)=52 exch2_jHi(1,432)=52 exch2_opposingSend(1,432)=2 exch2_pij(1,1,432)=1 exch2_pij(2,1,432)=0 exch2_pij(3,1,432)=0 exch2_pij(4,1,432)=1 exch2_oi(1,432)=0 exch2_oj(1,432)=0 exch2_neighbourId(2,432)=417 exch2_iLo(2,432)=0 exch2_iHi(2,432)=35 exch2_jLo(2,432)=0 exch2_jHi(2,432)=0 exch2_opposingSend(2,432)=1 exch2_pij(1,2,432)=1 exch2_pij(2,2,432)=0 exch2_pij(3,2,432)=0 exch2_pij(4,2,432)=1 exch2_oi(2,432)=0 exch2_oj(2,432)=0 exch2_neighbourId(3,432)=433 exch2_iLo(3,432)=35 exch2_iHi(3,432)=35 exch2_jLo(3,432)=0 exch2_jHi(3,432)=52 exch2_opposingSend(3,432)=4 exch2_pij(1,3,432)=1 exch2_pij(2,3,432)=0 exch2_pij(3,3,432)=0 exch2_pij(4,3,432)=1 exch2_oi(3,432)=0 exch2_oj(3,432)=0 exch2_neighbourId(4,432)=431 exch2_iLo(4,432)=0 exch2_iHi(4,432)=0 exch2_jLo(4,432)=0 exch2_jHi(4,432)=52 exch2_opposingSend(4,432)=3 exch2_pij(1,4,432)=1 exch2_pij(2,4,432)=0 exch2_pij(3,4,432)=0 exch2_pij(4,4,432)=1 exch2_oi(4,432)=0 exch2_oj(4,432)=0 RETURN END SUBROUTINE W2_E2SETUP_433 C Topology for tile 433 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(433)=34 exch2_tNy(433)=51 exch2_tBasex(433)=408 exch2_tBasey(433)=408 exch2_txGlobalo(433)=1429 exch2_tyGlobalo(433)=409 exch2_isWedge(433)=0 exch2_isNedge(433)=0 exch2_isEedge(433)=0 exch2_isSedge(433)=0 exch2_myFace(433)=3 exch2_mydNx(433)=510 exch2_mydNy(433)=510 exch2_nNeighbours(433)=4 exch2_neighbourId(1,433)=448 exch2_iLo(1,433)=0 exch2_iHi(1,433)=35 exch2_jLo(1,433)=52 exch2_jHi(1,433)=52 exch2_opposingSend(1,433)=2 exch2_pij(1,1,433)=1 exch2_pij(2,1,433)=0 exch2_pij(3,1,433)=0 exch2_pij(4,1,433)=1 exch2_oi(1,433)=0 exch2_oj(1,433)=0 exch2_neighbourId(2,433)=418 exch2_iLo(2,433)=0 exch2_iHi(2,433)=35 exch2_jLo(2,433)=0 exch2_jHi(2,433)=0 exch2_opposingSend(2,433)=1 exch2_pij(1,2,433)=1 exch2_pij(2,2,433)=0 exch2_pij(3,2,433)=0 exch2_pij(4,2,433)=1 exch2_oi(2,433)=0 exch2_oj(2,433)=0 exch2_neighbourId(3,433)=434 exch2_iLo(3,433)=35 exch2_iHi(3,433)=35 exch2_jLo(3,433)=0 exch2_jHi(3,433)=52 exch2_opposingSend(3,433)=4 exch2_pij(1,3,433)=1 exch2_pij(2,3,433)=0 exch2_pij(3,3,433)=0 exch2_pij(4,3,433)=1 exch2_oi(3,433)=0 exch2_oj(3,433)=0 exch2_neighbourId(4,433)=432 exch2_iLo(4,433)=0 exch2_iHi(4,433)=0 exch2_jLo(4,433)=0 exch2_jHi(4,433)=52 exch2_opposingSend(4,433)=3 exch2_pij(1,4,433)=1 exch2_pij(2,4,433)=0 exch2_pij(3,4,433)=0 exch2_pij(4,4,433)=1 exch2_oi(4,433)=0 exch2_oj(4,433)=0 RETURN END SUBROUTINE W2_E2SETUP_434 C Topology for tile 434 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(434)=34 exch2_tNy(434)=51 exch2_tBasex(434)=442 exch2_tBasey(434)=408 exch2_txGlobalo(434)=1463 exch2_tyGlobalo(434)=409 exch2_isWedge(434)=0 exch2_isNedge(434)=0 exch2_isEedge(434)=0 exch2_isSedge(434)=0 exch2_myFace(434)=3 exch2_mydNx(434)=510 exch2_mydNy(434)=510 exch2_nNeighbours(434)=4 exch2_neighbourId(1,434)=449 exch2_iLo(1,434)=0 exch2_iHi(1,434)=35 exch2_jLo(1,434)=52 exch2_jHi(1,434)=52 exch2_opposingSend(1,434)=3 exch2_pij(1,1,434)=1 exch2_pij(2,1,434)=0 exch2_pij(3,1,434)=0 exch2_pij(4,1,434)=1 exch2_oi(1,434)=0 exch2_oj(1,434)=0 exch2_neighbourId(2,434)=419 exch2_iLo(2,434)=0 exch2_iHi(2,434)=35 exch2_jLo(2,434)=0 exch2_jHi(2,434)=0 exch2_opposingSend(2,434)=1 exch2_pij(1,2,434)=1 exch2_pij(2,2,434)=0 exch2_pij(3,2,434)=0 exch2_pij(4,2,434)=1 exch2_oi(2,434)=0 exch2_oj(2,434)=0 exch2_neighbourId(3,434)=435 exch2_iLo(3,434)=35 exch2_iHi(3,434)=35 exch2_jLo(3,434)=0 exch2_jHi(3,434)=52 exch2_opposingSend(3,434)=4 exch2_pij(1,3,434)=1 exch2_pij(2,3,434)=0 exch2_pij(3,3,434)=0 exch2_pij(4,3,434)=1 exch2_oi(3,434)=0 exch2_oj(3,434)=0 exch2_neighbourId(4,434)=433 exch2_iLo(4,434)=0 exch2_iHi(4,434)=0 exch2_jLo(4,434)=0 exch2_jHi(4,434)=52 exch2_opposingSend(4,434)=3 exch2_pij(1,4,434)=1 exch2_pij(2,4,434)=0 exch2_pij(3,4,434)=0 exch2_pij(4,4,434)=1 exch2_oi(4,434)=0 exch2_oj(4,434)=0 RETURN END SUBROUTINE W2_E2SETUP_435 C Topology for tile 435 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(435)=34 exch2_tNy(435)=51 exch2_tBasex(435)=476 exch2_tBasey(435)=408 exch2_txGlobalo(435)=1497 exch2_tyGlobalo(435)=409 exch2_isWedge(435)=0 exch2_isNedge(435)=0 exch2_isEedge(435)=1 exch2_isSedge(435)=0 exch2_myFace(435)=3 exch2_mydNx(435)=510 exch2_mydNy(435)=510 exch2_nNeighbours(435)=4 exch2_neighbourId(1,435)=450 exch2_iLo(1,435)=0 exch2_iHi(1,435)=35 exch2_jLo(1,435)=52 exch2_jHi(1,435)=52 exch2_opposingSend(1,435)=2 exch2_pij(1,1,435)=1 exch2_pij(2,1,435)=0 exch2_pij(3,1,435)=0 exch2_pij(4,1,435)=1 exch2_oi(1,435)=0 exch2_oj(1,435)=0 exch2_neighbourId(2,435)=420 exch2_iLo(2,435)=0 exch2_iHi(2,435)=35 exch2_jLo(2,435)=0 exch2_jHi(2,435)=0 exch2_opposingSend(2,435)=1 exch2_pij(1,2,435)=1 exch2_pij(2,2,435)=0 exch2_pij(3,2,435)=0 exch2_pij(4,2,435)=1 exch2_oi(2,435)=0 exch2_oj(2,435)=0 exch2_neighbourId(3,435)=571 exch2_iLo(3,435)=35 exch2_iHi(3,435)=35 exch2_jLo(3,435)=0 exch2_jHi(3,435)=52 exch2_opposingSend(3,435)=4 exch2_pij(1,3,435)=1 exch2_pij(2,3,435)=0 exch2_pij(3,3,435)=0 exch2_pij(4,3,435)=1 exch2_oi(3,435)=510 exch2_oj(3,435)=0 exch2_neighbourId(4,435)=434 exch2_iLo(4,435)=0 exch2_iHi(4,435)=0 exch2_jLo(4,435)=0 exch2_jHi(4,435)=52 exch2_opposingSend(4,435)=3 exch2_pij(1,4,435)=1 exch2_pij(2,4,435)=0 exch2_pij(3,4,435)=0 exch2_pij(4,4,435)=1 exch2_oi(4,435)=0 exch2_oj(4,435)=0 RETURN END SUBROUTINE W2_E2SETUP_436 C Topology for tile 436 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(436)=34 exch2_tNy(436)=51 exch2_tBasex(436)=0 exch2_tBasey(436)=459 exch2_txGlobalo(436)=1021 exch2_tyGlobalo(436)=460 exch2_isWedge(436)=1 exch2_isNedge(436)=1 exch2_isEedge(436)=0 exch2_isSedge(436)=0 exch2_myFace(436)=3 exch2_mydNx(436)=510 exch2_mydNy(436)=510 exch2_nNeighbours(436)=5 exch2_neighbourId(1,436)=736 exch2_iLo(1,436)=0 exch2_iHi(1,436)=35 exch2_jLo(1,436)=52 exch2_jHi(1,436)=52 exch2_opposingSend(1,436)=4 exch2_pij(1,1,436)=0 exch2_pij(2,1,436)=-1 exch2_pij(3,1,436)=1 exch2_pij(4,1,436)=0 exch2_oi(1,436)=511 exch2_oj(1,436)=510 exch2_neighbourId(2,436)=421 exch2_iLo(2,436)=0 exch2_iHi(2,436)=35 exch2_jLo(2,436)=0 exch2_jHi(2,436)=0 exch2_opposingSend(2,436)=1 exch2_pij(1,2,436)=1 exch2_pij(2,2,436)=0 exch2_pij(3,2,436)=0 exch2_pij(4,2,436)=1 exch2_oi(2,436)=0 exch2_oj(2,436)=0 exch2_neighbourId(3,436)=437 exch2_iLo(3,436)=35 exch2_iHi(3,436)=35 exch2_jLo(3,436)=0 exch2_jHi(3,436)=52 exch2_opposingSend(3,436)=5 exch2_pij(1,3,436)=1 exch2_pij(2,3,436)=0 exch2_pij(3,3,436)=0 exch2_pij(4,3,436)=1 exch2_oi(3,436)=0 exch2_oj(3,436)=0 exch2_neighbourId(4,436)=136 exch2_iLo(4,436)=0 exch2_iHi(4,436)=0 exch2_jLo(4,436)=17 exch2_jHi(4,436)=52 exch2_opposingSend(4,436)=1 exch2_pij(1,4,436)=0 exch2_pij(2,4,436)=1 exch2_pij(3,4,436)=-1 exch2_pij(4,4,436)=0 exch2_oi(4,436)=-510 exch2_oj(4,436)=511 exch2_neighbourId(5,436)=137 exch2_iLo(5,436)=0 exch2_iHi(5,436)=0 exch2_jLo(5,436)=0 exch2_jHi(5,436)=18 exch2_opposingSend(5,436)=2 exch2_pij(1,5,436)=0 exch2_pij(2,5,436)=1 exch2_pij(3,5,436)=-1 exch2_pij(4,5,436)=0 exch2_oi(5,436)=-510 exch2_oj(5,436)=511 RETURN END SUBROUTINE W2_E2SETUP_437 C Topology for tile 437 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(437)=34 exch2_tNy(437)=51 exch2_tBasex(437)=34 exch2_tBasey(437)=459 exch2_txGlobalo(437)=1055 exch2_tyGlobalo(437)=460 exch2_isWedge(437)=0 exch2_isNedge(437)=1 exch2_isEedge(437)=0 exch2_isSedge(437)=0 exch2_myFace(437)=3 exch2_mydNx(437)=510 exch2_mydNy(437)=510 exch2_nNeighbours(437)=5 exch2_neighbourId(1,437)=721 exch2_iLo(1,437)=17 exch2_iHi(1,437)=35 exch2_jLo(1,437)=52 exch2_jHi(1,437)=52 exch2_opposingSend(1,437)=4 exch2_pij(1,1,437)=0 exch2_pij(2,1,437)=-1 exch2_pij(3,1,437)=1 exch2_pij(4,1,437)=0 exch2_oi(1,437)=511 exch2_oj(1,437)=510 exch2_neighbourId(2,437)=736 exch2_iLo(2,437)=0 exch2_iHi(2,437)=18 exch2_jLo(2,437)=52 exch2_jHi(2,437)=52 exch2_opposingSend(2,437)=5 exch2_pij(1,2,437)=0 exch2_pij(2,2,437)=-1 exch2_pij(3,2,437)=1 exch2_pij(4,2,437)=0 exch2_oi(2,437)=511 exch2_oj(2,437)=510 exch2_neighbourId(3,437)=422 exch2_iLo(3,437)=0 exch2_iHi(3,437)=35 exch2_jLo(3,437)=0 exch2_jHi(3,437)=0 exch2_opposingSend(3,437)=1 exch2_pij(1,3,437)=1 exch2_pij(2,3,437)=0 exch2_pij(3,3,437)=0 exch2_pij(4,3,437)=1 exch2_oi(3,437)=0 exch2_oj(3,437)=0 exch2_neighbourId(4,437)=438 exch2_iLo(4,437)=35 exch2_iHi(4,437)=35 exch2_jLo(4,437)=0 exch2_jHi(4,437)=52 exch2_opposingSend(4,437)=4 exch2_pij(1,4,437)=1 exch2_pij(2,4,437)=0 exch2_pij(3,4,437)=0 exch2_pij(4,4,437)=1 exch2_oi(4,437)=0 exch2_oj(4,437)=0 exch2_neighbourId(5,437)=436 exch2_iLo(5,437)=0 exch2_iHi(5,437)=0 exch2_jLo(5,437)=0 exch2_jHi(5,437)=52 exch2_opposingSend(5,437)=3 exch2_pij(1,5,437)=1 exch2_pij(2,5,437)=0 exch2_pij(3,5,437)=0 exch2_pij(4,5,437)=1 exch2_oi(5,437)=0 exch2_oj(5,437)=0 RETURN END SUBROUTINE W2_E2SETUP_438 C Topology for tile 438 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(438)=34 exch2_tNy(438)=51 exch2_tBasex(438)=68 exch2_tBasey(438)=459 exch2_txGlobalo(438)=1089 exch2_tyGlobalo(438)=460 exch2_isWedge(438)=0 exch2_isNedge(438)=1 exch2_isEedge(438)=0 exch2_isSedge(438)=0 exch2_myFace(438)=3 exch2_mydNx(438)=510 exch2_mydNy(438)=510 exch2_nNeighbours(438)=4 exch2_neighbourId(1,438)=721 exch2_iLo(1,438)=0 exch2_iHi(1,438)=35 exch2_jLo(1,438)=52 exch2_jHi(1,438)=52 exch2_opposingSend(1,438)=5 exch2_pij(1,1,438)=0 exch2_pij(2,1,438)=-1 exch2_pij(3,1,438)=1 exch2_pij(4,1,438)=0 exch2_oi(1,438)=511 exch2_oj(1,438)=510 exch2_neighbourId(2,438)=423 exch2_iLo(2,438)=0 exch2_iHi(2,438)=35 exch2_jLo(2,438)=0 exch2_jHi(2,438)=0 exch2_opposingSend(2,438)=1 exch2_pij(1,2,438)=1 exch2_pij(2,2,438)=0 exch2_pij(3,2,438)=0 exch2_pij(4,2,438)=1 exch2_oi(2,438)=0 exch2_oj(2,438)=0 exch2_neighbourId(3,438)=439 exch2_iLo(3,438)=35 exch2_iHi(3,438)=35 exch2_jLo(3,438)=0 exch2_jHi(3,438)=52 exch2_opposingSend(3,438)=4 exch2_pij(1,3,438)=1 exch2_pij(2,3,438)=0 exch2_pij(3,3,438)=0 exch2_pij(4,3,438)=1 exch2_oi(3,438)=0 exch2_oj(3,438)=0 exch2_neighbourId(4,438)=437 exch2_iLo(4,438)=0 exch2_iHi(4,438)=0 exch2_jLo(4,438)=0 exch2_jHi(4,438)=52 exch2_opposingSend(4,438)=4 exch2_pij(1,4,438)=1 exch2_pij(2,4,438)=0 exch2_pij(3,4,438)=0 exch2_pij(4,4,438)=1 exch2_oi(4,438)=0 exch2_oj(4,438)=0 RETURN END SUBROUTINE W2_E2SETUP_439 C Topology for tile 439 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(439)=34 exch2_tNy(439)=51 exch2_tBasex(439)=102 exch2_tBasey(439)=459 exch2_txGlobalo(439)=1123 exch2_tyGlobalo(439)=460 exch2_isWedge(439)=0 exch2_isNedge(439)=1 exch2_isEedge(439)=0 exch2_isSedge(439)=0 exch2_myFace(439)=3 exch2_mydNx(439)=510 exch2_mydNy(439)=510 exch2_nNeighbours(439)=4 exch2_neighbourId(1,439)=706 exch2_iLo(1,439)=0 exch2_iHi(1,439)=35 exch2_jLo(1,439)=52 exch2_jHi(1,439)=52 exch2_opposingSend(1,439)=4 exch2_pij(1,1,439)=0 exch2_pij(2,1,439)=-1 exch2_pij(3,1,439)=1 exch2_pij(4,1,439)=0 exch2_oi(1,439)=511 exch2_oj(1,439)=510 exch2_neighbourId(2,439)=424 exch2_iLo(2,439)=0 exch2_iHi(2,439)=35 exch2_jLo(2,439)=0 exch2_jHi(2,439)=0 exch2_opposingSend(2,439)=1 exch2_pij(1,2,439)=1 exch2_pij(2,2,439)=0 exch2_pij(3,2,439)=0 exch2_pij(4,2,439)=1 exch2_oi(2,439)=0 exch2_oj(2,439)=0 exch2_neighbourId(3,439)=440 exch2_iLo(3,439)=35 exch2_iHi(3,439)=35 exch2_jLo(3,439)=0 exch2_jHi(3,439)=52 exch2_opposingSend(3,439)=5 exch2_pij(1,3,439)=1 exch2_pij(2,3,439)=0 exch2_pij(3,3,439)=0 exch2_pij(4,3,439)=1 exch2_oi(3,439)=0 exch2_oj(3,439)=0 exch2_neighbourId(4,439)=438 exch2_iLo(4,439)=0 exch2_iHi(4,439)=0 exch2_jLo(4,439)=0 exch2_jHi(4,439)=52 exch2_opposingSend(4,439)=3 exch2_pij(1,4,439)=1 exch2_pij(2,4,439)=0 exch2_pij(3,4,439)=0 exch2_pij(4,4,439)=1 exch2_oi(4,439)=0 exch2_oj(4,439)=0 RETURN END SUBROUTINE W2_E2SETUP_440 C Topology for tile 440 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(440)=34 exch2_tNy(440)=51 exch2_tBasex(440)=136 exch2_tBasey(440)=459 exch2_txGlobalo(440)=1157 exch2_tyGlobalo(440)=460 exch2_isWedge(440)=0 exch2_isNedge(440)=1 exch2_isEedge(440)=0 exch2_isSedge(440)=0 exch2_myFace(440)=3 exch2_mydNx(440)=510 exch2_mydNy(440)=510 exch2_nNeighbours(440)=5 exch2_neighbourId(1,440)=691 exch2_iLo(1,440)=17 exch2_iHi(1,440)=35 exch2_jLo(1,440)=52 exch2_jHi(1,440)=52 exch2_opposingSend(1,440)=4 exch2_pij(1,1,440)=0 exch2_pij(2,1,440)=-1 exch2_pij(3,1,440)=1 exch2_pij(4,1,440)=0 exch2_oi(1,440)=511 exch2_oj(1,440)=510 exch2_neighbourId(2,440)=706 exch2_iLo(2,440)=0 exch2_iHi(2,440)=18 exch2_jLo(2,440)=52 exch2_jHi(2,440)=52 exch2_opposingSend(2,440)=5 exch2_pij(1,2,440)=0 exch2_pij(2,2,440)=-1 exch2_pij(3,2,440)=1 exch2_pij(4,2,440)=0 exch2_oi(2,440)=511 exch2_oj(2,440)=510 exch2_neighbourId(3,440)=425 exch2_iLo(3,440)=0 exch2_iHi(3,440)=35 exch2_jLo(3,440)=0 exch2_jHi(3,440)=0 exch2_opposingSend(3,440)=1 exch2_pij(1,3,440)=1 exch2_pij(2,3,440)=0 exch2_pij(3,3,440)=0 exch2_pij(4,3,440)=1 exch2_oi(3,440)=0 exch2_oj(3,440)=0 exch2_neighbourId(4,440)=441 exch2_iLo(4,440)=35 exch2_iHi(4,440)=35 exch2_jLo(4,440)=0 exch2_jHi(4,440)=52 exch2_opposingSend(4,440)=4 exch2_pij(1,4,440)=1 exch2_pij(2,4,440)=0 exch2_pij(3,4,440)=0 exch2_pij(4,4,440)=1 exch2_oi(4,440)=0 exch2_oj(4,440)=0 exch2_neighbourId(5,440)=439 exch2_iLo(5,440)=0 exch2_iHi(5,440)=0 exch2_jLo(5,440)=0 exch2_jHi(5,440)=52 exch2_opposingSend(5,440)=3 exch2_pij(1,5,440)=1 exch2_pij(2,5,440)=0 exch2_pij(3,5,440)=0 exch2_pij(4,5,440)=1 exch2_oi(5,440)=0 exch2_oj(5,440)=0 RETURN END SUBROUTINE W2_E2SETUP_441 C Topology for tile 441 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(441)=34 exch2_tNy(441)=51 exch2_tBasex(441)=170 exch2_tBasey(441)=459 exch2_txGlobalo(441)=1191 exch2_tyGlobalo(441)=460 exch2_isWedge(441)=0 exch2_isNedge(441)=1 exch2_isEedge(441)=0 exch2_isSedge(441)=0 exch2_myFace(441)=3 exch2_mydNx(441)=510 exch2_mydNy(441)=510 exch2_nNeighbours(441)=4 exch2_neighbourId(1,441)=691 exch2_iLo(1,441)=0 exch2_iHi(1,441)=35 exch2_jLo(1,441)=52 exch2_jHi(1,441)=52 exch2_opposingSend(1,441)=5 exch2_pij(1,1,441)=0 exch2_pij(2,1,441)=-1 exch2_pij(3,1,441)=1 exch2_pij(4,1,441)=0 exch2_oi(1,441)=511 exch2_oj(1,441)=510 exch2_neighbourId(2,441)=426 exch2_iLo(2,441)=0 exch2_iHi(2,441)=35 exch2_jLo(2,441)=0 exch2_jHi(2,441)=0 exch2_opposingSend(2,441)=1 exch2_pij(1,2,441)=1 exch2_pij(2,2,441)=0 exch2_pij(3,2,441)=0 exch2_pij(4,2,441)=1 exch2_oi(2,441)=0 exch2_oj(2,441)=0 exch2_neighbourId(3,441)=442 exch2_iLo(3,441)=35 exch2_iHi(3,441)=35 exch2_jLo(3,441)=0 exch2_jHi(3,441)=52 exch2_opposingSend(3,441)=4 exch2_pij(1,3,441)=1 exch2_pij(2,3,441)=0 exch2_pij(3,3,441)=0 exch2_pij(4,3,441)=1 exch2_oi(3,441)=0 exch2_oj(3,441)=0 exch2_neighbourId(4,441)=440 exch2_iLo(4,441)=0 exch2_iHi(4,441)=0 exch2_jLo(4,441)=0 exch2_jHi(4,441)=52 exch2_opposingSend(4,441)=4 exch2_pij(1,4,441)=1 exch2_pij(2,4,441)=0 exch2_pij(3,4,441)=0 exch2_pij(4,4,441)=1 exch2_oi(4,441)=0 exch2_oj(4,441)=0 RETURN END SUBROUTINE W2_E2SETUP_442 C Topology for tile 442 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(442)=34 exch2_tNy(442)=51 exch2_tBasex(442)=204 exch2_tBasey(442)=459 exch2_txGlobalo(442)=1225 exch2_tyGlobalo(442)=460 exch2_isWedge(442)=0 exch2_isNedge(442)=1 exch2_isEedge(442)=0 exch2_isSedge(442)=0 exch2_myFace(442)=3 exch2_mydNx(442)=510 exch2_mydNy(442)=510 exch2_nNeighbours(442)=4 exch2_neighbourId(1,442)=676 exch2_iLo(1,442)=0 exch2_iHi(1,442)=35 exch2_jLo(1,442)=52 exch2_jHi(1,442)=52 exch2_opposingSend(1,442)=4 exch2_pij(1,1,442)=0 exch2_pij(2,1,442)=-1 exch2_pij(3,1,442)=1 exch2_pij(4,1,442)=0 exch2_oi(1,442)=511 exch2_oj(1,442)=510 exch2_neighbourId(2,442)=427 exch2_iLo(2,442)=0 exch2_iHi(2,442)=35 exch2_jLo(2,442)=0 exch2_jHi(2,442)=0 exch2_opposingSend(2,442)=1 exch2_pij(1,2,442)=1 exch2_pij(2,2,442)=0 exch2_pij(3,2,442)=0 exch2_pij(4,2,442)=1 exch2_oi(2,442)=0 exch2_oj(2,442)=0 exch2_neighbourId(3,442)=443 exch2_iLo(3,442)=35 exch2_iHi(3,442)=35 exch2_jLo(3,442)=0 exch2_jHi(3,442)=52 exch2_opposingSend(3,442)=5 exch2_pij(1,3,442)=1 exch2_pij(2,3,442)=0 exch2_pij(3,3,442)=0 exch2_pij(4,3,442)=1 exch2_oi(3,442)=0 exch2_oj(3,442)=0 exch2_neighbourId(4,442)=441 exch2_iLo(4,442)=0 exch2_iHi(4,442)=0 exch2_jLo(4,442)=0 exch2_jHi(4,442)=52 exch2_opposingSend(4,442)=3 exch2_pij(1,4,442)=1 exch2_pij(2,4,442)=0 exch2_pij(3,4,442)=0 exch2_pij(4,4,442)=1 exch2_oi(4,442)=0 exch2_oj(4,442)=0 RETURN END SUBROUTINE W2_E2SETUP_443 C Topology for tile 443 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(443)=34 exch2_tNy(443)=51 exch2_tBasex(443)=238 exch2_tBasey(443)=459 exch2_txGlobalo(443)=1259 exch2_tyGlobalo(443)=460 exch2_isWedge(443)=0 exch2_isNedge(443)=1 exch2_isEedge(443)=0 exch2_isSedge(443)=0 exch2_myFace(443)=3 exch2_mydNx(443)=510 exch2_mydNy(443)=510 exch2_nNeighbours(443)=5 exch2_neighbourId(1,443)=661 exch2_iLo(1,443)=17 exch2_iHi(1,443)=35 exch2_jLo(1,443)=52 exch2_jHi(1,443)=52 exch2_opposingSend(1,443)=4 exch2_pij(1,1,443)=0 exch2_pij(2,1,443)=-1 exch2_pij(3,1,443)=1 exch2_pij(4,1,443)=0 exch2_oi(1,443)=511 exch2_oj(1,443)=510 exch2_neighbourId(2,443)=676 exch2_iLo(2,443)=0 exch2_iHi(2,443)=18 exch2_jLo(2,443)=52 exch2_jHi(2,443)=52 exch2_opposingSend(2,443)=5 exch2_pij(1,2,443)=0 exch2_pij(2,2,443)=-1 exch2_pij(3,2,443)=1 exch2_pij(4,2,443)=0 exch2_oi(2,443)=511 exch2_oj(2,443)=510 exch2_neighbourId(3,443)=428 exch2_iLo(3,443)=0 exch2_iHi(3,443)=35 exch2_jLo(3,443)=0 exch2_jHi(3,443)=0 exch2_opposingSend(3,443)=1 exch2_pij(1,3,443)=1 exch2_pij(2,3,443)=0 exch2_pij(3,3,443)=0 exch2_pij(4,3,443)=1 exch2_oi(3,443)=0 exch2_oj(3,443)=0 exch2_neighbourId(4,443)=444 exch2_iLo(4,443)=35 exch2_iHi(4,443)=35 exch2_jLo(4,443)=0 exch2_jHi(4,443)=52 exch2_opposingSend(4,443)=4 exch2_pij(1,4,443)=1 exch2_pij(2,4,443)=0 exch2_pij(3,4,443)=0 exch2_pij(4,4,443)=1 exch2_oi(4,443)=0 exch2_oj(4,443)=0 exch2_neighbourId(5,443)=442 exch2_iLo(5,443)=0 exch2_iHi(5,443)=0 exch2_jLo(5,443)=0 exch2_jHi(5,443)=52 exch2_opposingSend(5,443)=3 exch2_pij(1,5,443)=1 exch2_pij(2,5,443)=0 exch2_pij(3,5,443)=0 exch2_pij(4,5,443)=1 exch2_oi(5,443)=0 exch2_oj(5,443)=0 RETURN END SUBROUTINE W2_E2SETUP_444 C Topology for tile 444 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(444)=34 exch2_tNy(444)=51 exch2_tBasex(444)=272 exch2_tBasey(444)=459 exch2_txGlobalo(444)=1293 exch2_tyGlobalo(444)=460 exch2_isWedge(444)=0 exch2_isNedge(444)=1 exch2_isEedge(444)=0 exch2_isSedge(444)=0 exch2_myFace(444)=3 exch2_mydNx(444)=510 exch2_mydNy(444)=510 exch2_nNeighbours(444)=4 exch2_neighbourId(1,444)=661 exch2_iLo(1,444)=0 exch2_iHi(1,444)=35 exch2_jLo(1,444)=52 exch2_jHi(1,444)=52 exch2_opposingSend(1,444)=5 exch2_pij(1,1,444)=0 exch2_pij(2,1,444)=-1 exch2_pij(3,1,444)=1 exch2_pij(4,1,444)=0 exch2_oi(1,444)=511 exch2_oj(1,444)=510 exch2_neighbourId(2,444)=429 exch2_iLo(2,444)=0 exch2_iHi(2,444)=35 exch2_jLo(2,444)=0 exch2_jHi(2,444)=0 exch2_opposingSend(2,444)=1 exch2_pij(1,2,444)=1 exch2_pij(2,2,444)=0 exch2_pij(3,2,444)=0 exch2_pij(4,2,444)=1 exch2_oi(2,444)=0 exch2_oj(2,444)=0 exch2_neighbourId(3,444)=445 exch2_iLo(3,444)=35 exch2_iHi(3,444)=35 exch2_jLo(3,444)=0 exch2_jHi(3,444)=52 exch2_opposingSend(3,444)=4 exch2_pij(1,3,444)=1 exch2_pij(2,3,444)=0 exch2_pij(3,3,444)=0 exch2_pij(4,3,444)=1 exch2_oi(3,444)=0 exch2_oj(3,444)=0 exch2_neighbourId(4,444)=443 exch2_iLo(4,444)=0 exch2_iHi(4,444)=0 exch2_jLo(4,444)=0 exch2_jHi(4,444)=52 exch2_opposingSend(4,444)=4 exch2_pij(1,4,444)=1 exch2_pij(2,4,444)=0 exch2_pij(3,4,444)=0 exch2_pij(4,4,444)=1 exch2_oi(4,444)=0 exch2_oj(4,444)=0 RETURN END SUBROUTINE W2_E2SETUP_445 C Topology for tile 445 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(445)=34 exch2_tNy(445)=51 exch2_tBasex(445)=306 exch2_tBasey(445)=459 exch2_txGlobalo(445)=1327 exch2_tyGlobalo(445)=460 exch2_isWedge(445)=0 exch2_isNedge(445)=1 exch2_isEedge(445)=0 exch2_isSedge(445)=0 exch2_myFace(445)=3 exch2_mydNx(445)=510 exch2_mydNy(445)=510 exch2_nNeighbours(445)=4 exch2_neighbourId(1,445)=646 exch2_iLo(1,445)=0 exch2_iHi(1,445)=35 exch2_jLo(1,445)=52 exch2_jHi(1,445)=52 exch2_opposingSend(1,445)=4 exch2_pij(1,1,445)=0 exch2_pij(2,1,445)=-1 exch2_pij(3,1,445)=1 exch2_pij(4,1,445)=0 exch2_oi(1,445)=511 exch2_oj(1,445)=510 exch2_neighbourId(2,445)=430 exch2_iLo(2,445)=0 exch2_iHi(2,445)=35 exch2_jLo(2,445)=0 exch2_jHi(2,445)=0 exch2_opposingSend(2,445)=1 exch2_pij(1,2,445)=1 exch2_pij(2,2,445)=0 exch2_pij(3,2,445)=0 exch2_pij(4,2,445)=1 exch2_oi(2,445)=0 exch2_oj(2,445)=0 exch2_neighbourId(3,445)=446 exch2_iLo(3,445)=35 exch2_iHi(3,445)=35 exch2_jLo(3,445)=0 exch2_jHi(3,445)=52 exch2_opposingSend(3,445)=5 exch2_pij(1,3,445)=1 exch2_pij(2,3,445)=0 exch2_pij(3,3,445)=0 exch2_pij(4,3,445)=1 exch2_oi(3,445)=0 exch2_oj(3,445)=0 exch2_neighbourId(4,445)=444 exch2_iLo(4,445)=0 exch2_iHi(4,445)=0 exch2_jLo(4,445)=0 exch2_jHi(4,445)=52 exch2_opposingSend(4,445)=3 exch2_pij(1,4,445)=1 exch2_pij(2,4,445)=0 exch2_pij(3,4,445)=0 exch2_pij(4,4,445)=1 exch2_oi(4,445)=0 exch2_oj(4,445)=0 RETURN END SUBROUTINE W2_E2SETUP_446 C Topology for tile 446 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(446)=34 exch2_tNy(446)=51 exch2_tBasex(446)=340 exch2_tBasey(446)=459 exch2_txGlobalo(446)=1361 exch2_tyGlobalo(446)=460 exch2_isWedge(446)=0 exch2_isNedge(446)=1 exch2_isEedge(446)=0 exch2_isSedge(446)=0 exch2_myFace(446)=3 exch2_mydNx(446)=510 exch2_mydNy(446)=510 exch2_nNeighbours(446)=5 exch2_neighbourId(1,446)=631 exch2_iLo(1,446)=17 exch2_iHi(1,446)=35 exch2_jLo(1,446)=52 exch2_jHi(1,446)=52 exch2_opposingSend(1,446)=4 exch2_pij(1,1,446)=0 exch2_pij(2,1,446)=-1 exch2_pij(3,1,446)=1 exch2_pij(4,1,446)=0 exch2_oi(1,446)=511 exch2_oj(1,446)=510 exch2_neighbourId(2,446)=646 exch2_iLo(2,446)=0 exch2_iHi(2,446)=18 exch2_jLo(2,446)=52 exch2_jHi(2,446)=52 exch2_opposingSend(2,446)=5 exch2_pij(1,2,446)=0 exch2_pij(2,2,446)=-1 exch2_pij(3,2,446)=1 exch2_pij(4,2,446)=0 exch2_oi(2,446)=511 exch2_oj(2,446)=510 exch2_neighbourId(3,446)=431 exch2_iLo(3,446)=0 exch2_iHi(3,446)=35 exch2_jLo(3,446)=0 exch2_jHi(3,446)=0 exch2_opposingSend(3,446)=1 exch2_pij(1,3,446)=1 exch2_pij(2,3,446)=0 exch2_pij(3,3,446)=0 exch2_pij(4,3,446)=1 exch2_oi(3,446)=0 exch2_oj(3,446)=0 exch2_neighbourId(4,446)=447 exch2_iLo(4,446)=35 exch2_iHi(4,446)=35 exch2_jLo(4,446)=0 exch2_jHi(4,446)=52 exch2_opposingSend(4,446)=4 exch2_pij(1,4,446)=1 exch2_pij(2,4,446)=0 exch2_pij(3,4,446)=0 exch2_pij(4,4,446)=1 exch2_oi(4,446)=0 exch2_oj(4,446)=0 exch2_neighbourId(5,446)=445 exch2_iLo(5,446)=0 exch2_iHi(5,446)=0 exch2_jLo(5,446)=0 exch2_jHi(5,446)=52 exch2_opposingSend(5,446)=3 exch2_pij(1,5,446)=1 exch2_pij(2,5,446)=0 exch2_pij(3,5,446)=0 exch2_pij(4,5,446)=1 exch2_oi(5,446)=0 exch2_oj(5,446)=0 RETURN END SUBROUTINE W2_E2SETUP_447 C Topology for tile 447 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(447)=34 exch2_tNy(447)=51 exch2_tBasex(447)=374 exch2_tBasey(447)=459 exch2_txGlobalo(447)=1395 exch2_tyGlobalo(447)=460 exch2_isWedge(447)=0 exch2_isNedge(447)=1 exch2_isEedge(447)=0 exch2_isSedge(447)=0 exch2_myFace(447)=3 exch2_mydNx(447)=510 exch2_mydNy(447)=510 exch2_nNeighbours(447)=4 exch2_neighbourId(1,447)=631 exch2_iLo(1,447)=0 exch2_iHi(1,447)=35 exch2_jLo(1,447)=52 exch2_jHi(1,447)=52 exch2_opposingSend(1,447)=5 exch2_pij(1,1,447)=0 exch2_pij(2,1,447)=-1 exch2_pij(3,1,447)=1 exch2_pij(4,1,447)=0 exch2_oi(1,447)=511 exch2_oj(1,447)=510 exch2_neighbourId(2,447)=432 exch2_iLo(2,447)=0 exch2_iHi(2,447)=35 exch2_jLo(2,447)=0 exch2_jHi(2,447)=0 exch2_opposingSend(2,447)=1 exch2_pij(1,2,447)=1 exch2_pij(2,2,447)=0 exch2_pij(3,2,447)=0 exch2_pij(4,2,447)=1 exch2_oi(2,447)=0 exch2_oj(2,447)=0 exch2_neighbourId(3,447)=448 exch2_iLo(3,447)=35 exch2_iHi(3,447)=35 exch2_jLo(3,447)=0 exch2_jHi(3,447)=52 exch2_opposingSend(3,447)=4 exch2_pij(1,3,447)=1 exch2_pij(2,3,447)=0 exch2_pij(3,3,447)=0 exch2_pij(4,3,447)=1 exch2_oi(3,447)=0 exch2_oj(3,447)=0 exch2_neighbourId(4,447)=446 exch2_iLo(4,447)=0 exch2_iHi(4,447)=0 exch2_jLo(4,447)=0 exch2_jHi(4,447)=52 exch2_opposingSend(4,447)=4 exch2_pij(1,4,447)=1 exch2_pij(2,4,447)=0 exch2_pij(3,4,447)=0 exch2_pij(4,4,447)=1 exch2_oi(4,447)=0 exch2_oj(4,447)=0 RETURN END SUBROUTINE W2_E2SETUP_448 C Topology for tile 448 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(448)=34 exch2_tNy(448)=51 exch2_tBasex(448)=408 exch2_tBasey(448)=459 exch2_txGlobalo(448)=1429 exch2_tyGlobalo(448)=460 exch2_isWedge(448)=0 exch2_isNedge(448)=1 exch2_isEedge(448)=0 exch2_isSedge(448)=0 exch2_myFace(448)=3 exch2_mydNx(448)=510 exch2_mydNy(448)=510 exch2_nNeighbours(448)=4 exch2_neighbourId(1,448)=616 exch2_iLo(1,448)=0 exch2_iHi(1,448)=35 exch2_jLo(1,448)=52 exch2_jHi(1,448)=52 exch2_opposingSend(1,448)=4 exch2_pij(1,1,448)=0 exch2_pij(2,1,448)=-1 exch2_pij(3,1,448)=1 exch2_pij(4,1,448)=0 exch2_oi(1,448)=511 exch2_oj(1,448)=510 exch2_neighbourId(2,448)=433 exch2_iLo(2,448)=0 exch2_iHi(2,448)=35 exch2_jLo(2,448)=0 exch2_jHi(2,448)=0 exch2_opposingSend(2,448)=1 exch2_pij(1,2,448)=1 exch2_pij(2,2,448)=0 exch2_pij(3,2,448)=0 exch2_pij(4,2,448)=1 exch2_oi(2,448)=0 exch2_oj(2,448)=0 exch2_neighbourId(3,448)=449 exch2_iLo(3,448)=35 exch2_iHi(3,448)=35 exch2_jLo(3,448)=0 exch2_jHi(3,448)=52 exch2_opposingSend(3,448)=5 exch2_pij(1,3,448)=1 exch2_pij(2,3,448)=0 exch2_pij(3,3,448)=0 exch2_pij(4,3,448)=1 exch2_oi(3,448)=0 exch2_oj(3,448)=0 exch2_neighbourId(4,448)=447 exch2_iLo(4,448)=0 exch2_iHi(4,448)=0 exch2_jLo(4,448)=0 exch2_jHi(4,448)=52 exch2_opposingSend(4,448)=3 exch2_pij(1,4,448)=1 exch2_pij(2,4,448)=0 exch2_pij(3,4,448)=0 exch2_pij(4,4,448)=1 exch2_oi(4,448)=0 exch2_oj(4,448)=0 RETURN END SUBROUTINE W2_E2SETUP_449 C Topology for tile 449 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(449)=34 exch2_tNy(449)=51 exch2_tBasex(449)=442 exch2_tBasey(449)=459 exch2_txGlobalo(449)=1463 exch2_tyGlobalo(449)=460 exch2_isWedge(449)=0 exch2_isNedge(449)=1 exch2_isEedge(449)=0 exch2_isSedge(449)=0 exch2_myFace(449)=3 exch2_mydNx(449)=510 exch2_mydNy(449)=510 exch2_nNeighbours(449)=5 exch2_neighbourId(1,449)=601 exch2_iLo(1,449)=17 exch2_iHi(1,449)=35 exch2_jLo(1,449)=52 exch2_jHi(1,449)=52 exch2_opposingSend(1,449)=4 exch2_pij(1,1,449)=0 exch2_pij(2,1,449)=-1 exch2_pij(3,1,449)=1 exch2_pij(4,1,449)=0 exch2_oi(1,449)=511 exch2_oj(1,449)=510 exch2_neighbourId(2,449)=616 exch2_iLo(2,449)=0 exch2_iHi(2,449)=18 exch2_jLo(2,449)=52 exch2_jHi(2,449)=52 exch2_opposingSend(2,449)=5 exch2_pij(1,2,449)=0 exch2_pij(2,2,449)=-1 exch2_pij(3,2,449)=1 exch2_pij(4,2,449)=0 exch2_oi(2,449)=511 exch2_oj(2,449)=510 exch2_neighbourId(3,449)=434 exch2_iLo(3,449)=0 exch2_iHi(3,449)=35 exch2_jLo(3,449)=0 exch2_jHi(3,449)=0 exch2_opposingSend(3,449)=1 exch2_pij(1,3,449)=1 exch2_pij(2,3,449)=0 exch2_pij(3,3,449)=0 exch2_pij(4,3,449)=1 exch2_oi(3,449)=0 exch2_oj(3,449)=0 exch2_neighbourId(4,449)=450 exch2_iLo(4,449)=35 exch2_iHi(4,449)=35 exch2_jLo(4,449)=0 exch2_jHi(4,449)=52 exch2_opposingSend(4,449)=4 exch2_pij(1,4,449)=1 exch2_pij(2,4,449)=0 exch2_pij(3,4,449)=0 exch2_pij(4,4,449)=1 exch2_oi(4,449)=0 exch2_oj(4,449)=0 exch2_neighbourId(5,449)=448 exch2_iLo(5,449)=0 exch2_iHi(5,449)=0 exch2_jLo(5,449)=0 exch2_jHi(5,449)=52 exch2_opposingSend(5,449)=3 exch2_pij(1,5,449)=1 exch2_pij(2,5,449)=0 exch2_pij(3,5,449)=0 exch2_pij(4,5,449)=1 exch2_oi(5,449)=0 exch2_oj(5,449)=0 RETURN END SUBROUTINE W2_E2SETUP_450 C Topology for tile 450 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(450)=34 exch2_tNy(450)=51 exch2_tBasex(450)=476 exch2_tBasey(450)=459 exch2_txGlobalo(450)=1497 exch2_tyGlobalo(450)=460 exch2_isWedge(450)=0 exch2_isNedge(450)=1 exch2_isEedge(450)=1 exch2_isSedge(450)=0 exch2_myFace(450)=3 exch2_mydNx(450)=510 exch2_mydNy(450)=510 exch2_nNeighbours(450)=4 exch2_neighbourId(1,450)=601 exch2_iLo(1,450)=0 exch2_iHi(1,450)=35 exch2_jLo(1,450)=52 exch2_jHi(1,450)=52 exch2_opposingSend(1,450)=5 exch2_pij(1,1,450)=0 exch2_pij(2,1,450)=-1 exch2_pij(3,1,450)=1 exch2_pij(4,1,450)=0 exch2_oi(1,450)=511 exch2_oj(1,450)=510 exch2_neighbourId(2,450)=435 exch2_iLo(2,450)=0 exch2_iHi(2,450)=35 exch2_jLo(2,450)=0 exch2_jHi(2,450)=0 exch2_opposingSend(2,450)=1 exch2_pij(1,2,450)=1 exch2_pij(2,2,450)=0 exch2_pij(3,2,450)=0 exch2_pij(4,2,450)=1 exch2_oi(2,450)=0 exch2_oj(2,450)=0 exch2_neighbourId(3,450)=586 exch2_iLo(3,450)=35 exch2_iHi(3,450)=35 exch2_jLo(3,450)=0 exch2_jHi(3,450)=52 exch2_opposingSend(3,450)=4 exch2_pij(1,3,450)=1 exch2_pij(2,3,450)=0 exch2_pij(3,3,450)=0 exch2_pij(4,3,450)=1 exch2_oi(3,450)=510 exch2_oj(3,450)=0 exch2_neighbourId(4,450)=449 exch2_iLo(4,450)=0 exch2_iHi(4,450)=0 exch2_jLo(4,450)=0 exch2_jHi(4,450)=52 exch2_opposingSend(4,450)=4 exch2_pij(1,4,450)=1 exch2_pij(2,4,450)=0 exch2_pij(3,4,450)=0 exch2_pij(4,4,450)=1 exch2_oi(4,450)=0 exch2_oj(4,450)=0 RETURN END SUBROUTINE W2_E2SETUP_451 C Topology for tile 451 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(451)=34 exch2_tNy(451)=51 exch2_tBasex(451)=0 exch2_tBasey(451)=0 exch2_txGlobalo(451)=1531 exch2_tyGlobalo(451)=1 exch2_isWedge(451)=1 exch2_isNedge(451)=0 exch2_isEedge(451)=0 exch2_isSedge(451)=1 exch2_myFace(451)=4 exch2_mydNx(451)=510 exch2_mydNy(451)=510 exch2_nNeighbours(451)=4 exch2_neighbourId(1,451)=466 exch2_iLo(1,451)=0 exch2_iHi(1,451)=35 exch2_jLo(1,451)=52 exch2_jHi(1,451)=52 exch2_opposingSend(1,451)=2 exch2_pij(1,1,451)=1 exch2_pij(2,1,451)=0 exch2_pij(3,1,451)=0 exch2_pij(4,1,451)=1 exch2_oi(1,451)=0 exch2_oj(1,451)=0 exch2_neighbourId(2,451)=300 exch2_iLo(2,451)=0 exch2_iHi(2,451)=35 exch2_jLo(2,451)=0 exch2_jHi(2,451)=0 exch2_opposingSend(2,451)=3 exch2_pij(1,2,451)=0 exch2_pij(2,2,451)=-1 exch2_pij(3,2,451)=1 exch2_pij(4,2,451)=0 exch2_oi(2,451)=511 exch2_oj(2,451)=-510 exch2_neighbourId(3,451)=452 exch2_iLo(3,451)=35 exch2_iHi(3,451)=35 exch2_jLo(3,451)=0 exch2_jHi(3,451)=52 exch2_opposingSend(3,451)=5 exch2_pij(1,3,451)=1 exch2_pij(2,3,451)=0 exch2_pij(3,3,451)=0 exch2_pij(4,3,451)=1 exch2_oi(3,451)=0 exch2_oj(3,451)=0 exch2_neighbourId(4,451)=315 exch2_iLo(4,451)=0 exch2_iHi(4,451)=0 exch2_jLo(4,451)=0 exch2_jHi(4,451)=52 exch2_opposingSend(4,451)=3 exch2_pij(1,4,451)=1 exch2_pij(2,4,451)=0 exch2_pij(3,4,451)=0 exch2_pij(4,4,451)=1 exch2_oi(4,451)=-510 exch2_oj(4,451)=0 RETURN END SUBROUTINE W2_E2SETUP_452 C Topology for tile 452 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(452)=34 exch2_tNy(452)=51 exch2_tBasex(452)=34 exch2_tBasey(452)=0 exch2_txGlobalo(452)=1565 exch2_tyGlobalo(452)=1 exch2_isWedge(452)=0 exch2_isNedge(452)=0 exch2_isEedge(452)=0 exch2_isSedge(452)=1 exch2_myFace(452)=4 exch2_mydNx(452)=510 exch2_mydNy(452)=510 exch2_nNeighbours(452)=5 exch2_neighbourId(1,452)=467 exch2_iLo(1,452)=0 exch2_iHi(1,452)=35 exch2_jLo(1,452)=52 exch2_jHi(1,452)=52 exch2_opposingSend(1,452)=2 exch2_pij(1,1,452)=1 exch2_pij(2,1,452)=0 exch2_pij(3,1,452)=0 exch2_pij(4,1,452)=1 exch2_oi(1,452)=0 exch2_oj(1,452)=0 exch2_neighbourId(2,452)=285 exch2_iLo(2,452)=17 exch2_iHi(2,452)=35 exch2_jLo(2,452)=0 exch2_jHi(2,452)=0 exch2_opposingSend(2,452)=3 exch2_pij(1,2,452)=0 exch2_pij(2,2,452)=-1 exch2_pij(3,2,452)=1 exch2_pij(4,2,452)=0 exch2_oi(2,452)=511 exch2_oj(2,452)=-510 exch2_neighbourId(3,452)=300 exch2_iLo(3,452)=0 exch2_iHi(3,452)=18 exch2_jLo(3,452)=0 exch2_jHi(3,452)=0 exch2_opposingSend(3,452)=4 exch2_pij(1,3,452)=0 exch2_pij(2,3,452)=-1 exch2_pij(3,3,452)=1 exch2_pij(4,3,452)=0 exch2_oi(3,452)=511 exch2_oj(3,452)=-510 exch2_neighbourId(4,452)=453 exch2_iLo(4,452)=35 exch2_iHi(4,452)=35 exch2_jLo(4,452)=0 exch2_jHi(4,452)=52 exch2_opposingSend(4,452)=4 exch2_pij(1,4,452)=1 exch2_pij(2,4,452)=0 exch2_pij(3,4,452)=0 exch2_pij(4,4,452)=1 exch2_oi(4,452)=0 exch2_oj(4,452)=0 exch2_neighbourId(5,452)=451 exch2_iLo(5,452)=0 exch2_iHi(5,452)=0 exch2_jLo(5,452)=0 exch2_jHi(5,452)=52 exch2_opposingSend(5,452)=3 exch2_pij(1,5,452)=1 exch2_pij(2,5,452)=0 exch2_pij(3,5,452)=0 exch2_pij(4,5,452)=1 exch2_oi(5,452)=0 exch2_oj(5,452)=0 RETURN END SUBROUTINE W2_E2SETUP_453 C Topology for tile 453 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(453)=34 exch2_tNy(453)=51 exch2_tBasex(453)=68 exch2_tBasey(453)=0 exch2_txGlobalo(453)=1599 exch2_tyGlobalo(453)=1 exch2_isWedge(453)=0 exch2_isNedge(453)=0 exch2_isEedge(453)=0 exch2_isSedge(453)=1 exch2_myFace(453)=4 exch2_mydNx(453)=510 exch2_mydNy(453)=510 exch2_nNeighbours(453)=4 exch2_neighbourId(1,453)=468 exch2_iLo(1,453)=0 exch2_iHi(1,453)=35 exch2_jLo(1,453)=52 exch2_jHi(1,453)=52 exch2_opposingSend(1,453)=2 exch2_pij(1,1,453)=1 exch2_pij(2,1,453)=0 exch2_pij(3,1,453)=0 exch2_pij(4,1,453)=1 exch2_oi(1,453)=0 exch2_oj(1,453)=0 exch2_neighbourId(2,453)=285 exch2_iLo(2,453)=0 exch2_iHi(2,453)=35 exch2_jLo(2,453)=0 exch2_jHi(2,453)=0 exch2_opposingSend(2,453)=4 exch2_pij(1,2,453)=0 exch2_pij(2,2,453)=-1 exch2_pij(3,2,453)=1 exch2_pij(4,2,453)=0 exch2_oi(2,453)=511 exch2_oj(2,453)=-510 exch2_neighbourId(3,453)=454 exch2_iLo(3,453)=35 exch2_iHi(3,453)=35 exch2_jLo(3,453)=0 exch2_jHi(3,453)=52 exch2_opposingSend(3,453)=4 exch2_pij(1,3,453)=1 exch2_pij(2,3,453)=0 exch2_pij(3,3,453)=0 exch2_pij(4,3,453)=1 exch2_oi(3,453)=0 exch2_oj(3,453)=0 exch2_neighbourId(4,453)=452 exch2_iLo(4,453)=0 exch2_iHi(4,453)=0 exch2_jLo(4,453)=0 exch2_jHi(4,453)=52 exch2_opposingSend(4,453)=4 exch2_pij(1,4,453)=1 exch2_pij(2,4,453)=0 exch2_pij(3,4,453)=0 exch2_pij(4,4,453)=1 exch2_oi(4,453)=0 exch2_oj(4,453)=0 RETURN END SUBROUTINE W2_E2SETUP_454 C Topology for tile 454 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(454)=34 exch2_tNy(454)=51 exch2_tBasex(454)=102 exch2_tBasey(454)=0 exch2_txGlobalo(454)=1633 exch2_tyGlobalo(454)=1 exch2_isWedge(454)=0 exch2_isNedge(454)=0 exch2_isEedge(454)=0 exch2_isSedge(454)=1 exch2_myFace(454)=4 exch2_mydNx(454)=510 exch2_mydNy(454)=510 exch2_nNeighbours(454)=4 exch2_neighbourId(1,454)=469 exch2_iLo(1,454)=0 exch2_iHi(1,454)=35 exch2_jLo(1,454)=52 exch2_jHi(1,454)=52 exch2_opposingSend(1,454)=2 exch2_pij(1,1,454)=1 exch2_pij(2,1,454)=0 exch2_pij(3,1,454)=0 exch2_pij(4,1,454)=1 exch2_oi(1,454)=0 exch2_oj(1,454)=0 exch2_neighbourId(2,454)=270 exch2_iLo(2,454)=0 exch2_iHi(2,454)=35 exch2_jLo(2,454)=0 exch2_jHi(2,454)=0 exch2_opposingSend(2,454)=3 exch2_pij(1,2,454)=0 exch2_pij(2,2,454)=-1 exch2_pij(3,2,454)=1 exch2_pij(4,2,454)=0 exch2_oi(2,454)=511 exch2_oj(2,454)=-510 exch2_neighbourId(3,454)=455 exch2_iLo(3,454)=35 exch2_iHi(3,454)=35 exch2_jLo(3,454)=0 exch2_jHi(3,454)=52 exch2_opposingSend(3,454)=5 exch2_pij(1,3,454)=1 exch2_pij(2,3,454)=0 exch2_pij(3,3,454)=0 exch2_pij(4,3,454)=1 exch2_oi(3,454)=0 exch2_oj(3,454)=0 exch2_neighbourId(4,454)=453 exch2_iLo(4,454)=0 exch2_iHi(4,454)=0 exch2_jLo(4,454)=0 exch2_jHi(4,454)=52 exch2_opposingSend(4,454)=3 exch2_pij(1,4,454)=1 exch2_pij(2,4,454)=0 exch2_pij(3,4,454)=0 exch2_pij(4,4,454)=1 exch2_oi(4,454)=0 exch2_oj(4,454)=0 RETURN END SUBROUTINE W2_E2SETUP_455 C Topology for tile 455 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(455)=34 exch2_tNy(455)=51 exch2_tBasex(455)=136 exch2_tBasey(455)=0 exch2_txGlobalo(455)=1667 exch2_tyGlobalo(455)=1 exch2_isWedge(455)=0 exch2_isNedge(455)=0 exch2_isEedge(455)=0 exch2_isSedge(455)=1 exch2_myFace(455)=4 exch2_mydNx(455)=510 exch2_mydNy(455)=510 exch2_nNeighbours(455)=5 exch2_neighbourId(1,455)=470 exch2_iLo(1,455)=0 exch2_iHi(1,455)=35 exch2_jLo(1,455)=52 exch2_jHi(1,455)=52 exch2_opposingSend(1,455)=2 exch2_pij(1,1,455)=1 exch2_pij(2,1,455)=0 exch2_pij(3,1,455)=0 exch2_pij(4,1,455)=1 exch2_oi(1,455)=0 exch2_oj(1,455)=0 exch2_neighbourId(2,455)=255 exch2_iLo(2,455)=17 exch2_iHi(2,455)=35 exch2_jLo(2,455)=0 exch2_jHi(2,455)=0 exch2_opposingSend(2,455)=3 exch2_pij(1,2,455)=0 exch2_pij(2,2,455)=-1 exch2_pij(3,2,455)=1 exch2_pij(4,2,455)=0 exch2_oi(2,455)=511 exch2_oj(2,455)=-510 exch2_neighbourId(3,455)=270 exch2_iLo(3,455)=0 exch2_iHi(3,455)=18 exch2_jLo(3,455)=0 exch2_jHi(3,455)=0 exch2_opposingSend(3,455)=4 exch2_pij(1,3,455)=0 exch2_pij(2,3,455)=-1 exch2_pij(3,3,455)=1 exch2_pij(4,3,455)=0 exch2_oi(3,455)=511 exch2_oj(3,455)=-510 exch2_neighbourId(4,455)=456 exch2_iLo(4,455)=35 exch2_iHi(4,455)=35 exch2_jLo(4,455)=0 exch2_jHi(4,455)=52 exch2_opposingSend(4,455)=4 exch2_pij(1,4,455)=1 exch2_pij(2,4,455)=0 exch2_pij(3,4,455)=0 exch2_pij(4,4,455)=1 exch2_oi(4,455)=0 exch2_oj(4,455)=0 exch2_neighbourId(5,455)=454 exch2_iLo(5,455)=0 exch2_iHi(5,455)=0 exch2_jLo(5,455)=0 exch2_jHi(5,455)=52 exch2_opposingSend(5,455)=3 exch2_pij(1,5,455)=1 exch2_pij(2,5,455)=0 exch2_pij(3,5,455)=0 exch2_pij(4,5,455)=1 exch2_oi(5,455)=0 exch2_oj(5,455)=0 RETURN END SUBROUTINE W2_E2SETUP_456 C Topology for tile 456 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(456)=34 exch2_tNy(456)=51 exch2_tBasex(456)=170 exch2_tBasey(456)=0 exch2_txGlobalo(456)=1701 exch2_tyGlobalo(456)=1 exch2_isWedge(456)=0 exch2_isNedge(456)=0 exch2_isEedge(456)=0 exch2_isSedge(456)=1 exch2_myFace(456)=4 exch2_mydNx(456)=510 exch2_mydNy(456)=510 exch2_nNeighbours(456)=4 exch2_neighbourId(1,456)=471 exch2_iLo(1,456)=0 exch2_iHi(1,456)=35 exch2_jLo(1,456)=52 exch2_jHi(1,456)=52 exch2_opposingSend(1,456)=2 exch2_pij(1,1,456)=1 exch2_pij(2,1,456)=0 exch2_pij(3,1,456)=0 exch2_pij(4,1,456)=1 exch2_oi(1,456)=0 exch2_oj(1,456)=0 exch2_neighbourId(2,456)=255 exch2_iLo(2,456)=0 exch2_iHi(2,456)=35 exch2_jLo(2,456)=0 exch2_jHi(2,456)=0 exch2_opposingSend(2,456)=4 exch2_pij(1,2,456)=0 exch2_pij(2,2,456)=-1 exch2_pij(3,2,456)=1 exch2_pij(4,2,456)=0 exch2_oi(2,456)=511 exch2_oj(2,456)=-510 exch2_neighbourId(3,456)=457 exch2_iLo(3,456)=35 exch2_iHi(3,456)=35 exch2_jLo(3,456)=0 exch2_jHi(3,456)=52 exch2_opposingSend(3,456)=4 exch2_pij(1,3,456)=1 exch2_pij(2,3,456)=0 exch2_pij(3,3,456)=0 exch2_pij(4,3,456)=1 exch2_oi(3,456)=0 exch2_oj(3,456)=0 exch2_neighbourId(4,456)=455 exch2_iLo(4,456)=0 exch2_iHi(4,456)=0 exch2_jLo(4,456)=0 exch2_jHi(4,456)=52 exch2_opposingSend(4,456)=4 exch2_pij(1,4,456)=1 exch2_pij(2,4,456)=0 exch2_pij(3,4,456)=0 exch2_pij(4,4,456)=1 exch2_oi(4,456)=0 exch2_oj(4,456)=0 RETURN END SUBROUTINE W2_E2SETUP_457 C Topology for tile 457 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(457)=34 exch2_tNy(457)=51 exch2_tBasex(457)=204 exch2_tBasey(457)=0 exch2_txGlobalo(457)=1735 exch2_tyGlobalo(457)=1 exch2_isWedge(457)=0 exch2_isNedge(457)=0 exch2_isEedge(457)=0 exch2_isSedge(457)=1 exch2_myFace(457)=4 exch2_mydNx(457)=510 exch2_mydNy(457)=510 exch2_nNeighbours(457)=4 exch2_neighbourId(1,457)=472 exch2_iLo(1,457)=0 exch2_iHi(1,457)=35 exch2_jLo(1,457)=52 exch2_jHi(1,457)=52 exch2_opposingSend(1,457)=2 exch2_pij(1,1,457)=1 exch2_pij(2,1,457)=0 exch2_pij(3,1,457)=0 exch2_pij(4,1,457)=1 exch2_oi(1,457)=0 exch2_oj(1,457)=0 exch2_neighbourId(2,457)=240 exch2_iLo(2,457)=0 exch2_iHi(2,457)=35 exch2_jLo(2,457)=0 exch2_jHi(2,457)=0 exch2_opposingSend(2,457)=3 exch2_pij(1,2,457)=0 exch2_pij(2,2,457)=-1 exch2_pij(3,2,457)=1 exch2_pij(4,2,457)=0 exch2_oi(2,457)=511 exch2_oj(2,457)=-510 exch2_neighbourId(3,457)=458 exch2_iLo(3,457)=35 exch2_iHi(3,457)=35 exch2_jLo(3,457)=0 exch2_jHi(3,457)=52 exch2_opposingSend(3,457)=5 exch2_pij(1,3,457)=1 exch2_pij(2,3,457)=0 exch2_pij(3,3,457)=0 exch2_pij(4,3,457)=1 exch2_oi(3,457)=0 exch2_oj(3,457)=0 exch2_neighbourId(4,457)=456 exch2_iLo(4,457)=0 exch2_iHi(4,457)=0 exch2_jLo(4,457)=0 exch2_jHi(4,457)=52 exch2_opposingSend(4,457)=3 exch2_pij(1,4,457)=1 exch2_pij(2,4,457)=0 exch2_pij(3,4,457)=0 exch2_pij(4,4,457)=1 exch2_oi(4,457)=0 exch2_oj(4,457)=0 RETURN END SUBROUTINE W2_E2SETUP_458 C Topology for tile 458 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(458)=34 exch2_tNy(458)=51 exch2_tBasex(458)=238 exch2_tBasey(458)=0 exch2_txGlobalo(458)=1769 exch2_tyGlobalo(458)=1 exch2_isWedge(458)=0 exch2_isNedge(458)=0 exch2_isEedge(458)=0 exch2_isSedge(458)=1 exch2_myFace(458)=4 exch2_mydNx(458)=510 exch2_mydNy(458)=510 exch2_nNeighbours(458)=5 exch2_neighbourId(1,458)=473 exch2_iLo(1,458)=0 exch2_iHi(1,458)=35 exch2_jLo(1,458)=52 exch2_jHi(1,458)=52 exch2_opposingSend(1,458)=2 exch2_pij(1,1,458)=1 exch2_pij(2,1,458)=0 exch2_pij(3,1,458)=0 exch2_pij(4,1,458)=1 exch2_oi(1,458)=0 exch2_oj(1,458)=0 exch2_neighbourId(2,458)=225 exch2_iLo(2,458)=17 exch2_iHi(2,458)=35 exch2_jLo(2,458)=0 exch2_jHi(2,458)=0 exch2_opposingSend(2,458)=3 exch2_pij(1,2,458)=0 exch2_pij(2,2,458)=-1 exch2_pij(3,2,458)=1 exch2_pij(4,2,458)=0 exch2_oi(2,458)=511 exch2_oj(2,458)=-510 exch2_neighbourId(3,458)=240 exch2_iLo(3,458)=0 exch2_iHi(3,458)=18 exch2_jLo(3,458)=0 exch2_jHi(3,458)=0 exch2_opposingSend(3,458)=4 exch2_pij(1,3,458)=0 exch2_pij(2,3,458)=-1 exch2_pij(3,3,458)=1 exch2_pij(4,3,458)=0 exch2_oi(3,458)=511 exch2_oj(3,458)=-510 exch2_neighbourId(4,458)=459 exch2_iLo(4,458)=35 exch2_iHi(4,458)=35 exch2_jLo(4,458)=0 exch2_jHi(4,458)=52 exch2_opposingSend(4,458)=4 exch2_pij(1,4,458)=1 exch2_pij(2,4,458)=0 exch2_pij(3,4,458)=0 exch2_pij(4,4,458)=1 exch2_oi(4,458)=0 exch2_oj(4,458)=0 exch2_neighbourId(5,458)=457 exch2_iLo(5,458)=0 exch2_iHi(5,458)=0 exch2_jLo(5,458)=0 exch2_jHi(5,458)=52 exch2_opposingSend(5,458)=3 exch2_pij(1,5,458)=1 exch2_pij(2,5,458)=0 exch2_pij(3,5,458)=0 exch2_pij(4,5,458)=1 exch2_oi(5,458)=0 exch2_oj(5,458)=0 RETURN END SUBROUTINE W2_E2SETUP_459 C Topology for tile 459 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(459)=34 exch2_tNy(459)=51 exch2_tBasex(459)=272 exch2_tBasey(459)=0 exch2_txGlobalo(459)=1803 exch2_tyGlobalo(459)=1 exch2_isWedge(459)=0 exch2_isNedge(459)=0 exch2_isEedge(459)=0 exch2_isSedge(459)=1 exch2_myFace(459)=4 exch2_mydNx(459)=510 exch2_mydNy(459)=510 exch2_nNeighbours(459)=4 exch2_neighbourId(1,459)=474 exch2_iLo(1,459)=0 exch2_iHi(1,459)=35 exch2_jLo(1,459)=52 exch2_jHi(1,459)=52 exch2_opposingSend(1,459)=2 exch2_pij(1,1,459)=1 exch2_pij(2,1,459)=0 exch2_pij(3,1,459)=0 exch2_pij(4,1,459)=1 exch2_oi(1,459)=0 exch2_oj(1,459)=0 exch2_neighbourId(2,459)=225 exch2_iLo(2,459)=0 exch2_iHi(2,459)=35 exch2_jLo(2,459)=0 exch2_jHi(2,459)=0 exch2_opposingSend(2,459)=4 exch2_pij(1,2,459)=0 exch2_pij(2,2,459)=-1 exch2_pij(3,2,459)=1 exch2_pij(4,2,459)=0 exch2_oi(2,459)=511 exch2_oj(2,459)=-510 exch2_neighbourId(3,459)=460 exch2_iLo(3,459)=35 exch2_iHi(3,459)=35 exch2_jLo(3,459)=0 exch2_jHi(3,459)=52 exch2_opposingSend(3,459)=4 exch2_pij(1,3,459)=1 exch2_pij(2,3,459)=0 exch2_pij(3,3,459)=0 exch2_pij(4,3,459)=1 exch2_oi(3,459)=0 exch2_oj(3,459)=0 exch2_neighbourId(4,459)=458 exch2_iLo(4,459)=0 exch2_iHi(4,459)=0 exch2_jLo(4,459)=0 exch2_jHi(4,459)=52 exch2_opposingSend(4,459)=4 exch2_pij(1,4,459)=1 exch2_pij(2,4,459)=0 exch2_pij(3,4,459)=0 exch2_pij(4,4,459)=1 exch2_oi(4,459)=0 exch2_oj(4,459)=0 RETURN END SUBROUTINE W2_E2SETUP_460 C Topology for tile 460 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(460)=34 exch2_tNy(460)=51 exch2_tBasex(460)=306 exch2_tBasey(460)=0 exch2_txGlobalo(460)=1837 exch2_tyGlobalo(460)=1 exch2_isWedge(460)=0 exch2_isNedge(460)=0 exch2_isEedge(460)=0 exch2_isSedge(460)=1 exch2_myFace(460)=4 exch2_mydNx(460)=510 exch2_mydNy(460)=510 exch2_nNeighbours(460)=4 exch2_neighbourId(1,460)=475 exch2_iLo(1,460)=0 exch2_iHi(1,460)=35 exch2_jLo(1,460)=52 exch2_jHi(1,460)=52 exch2_opposingSend(1,460)=2 exch2_pij(1,1,460)=1 exch2_pij(2,1,460)=0 exch2_pij(3,1,460)=0 exch2_pij(4,1,460)=1 exch2_oi(1,460)=0 exch2_oj(1,460)=0 exch2_neighbourId(2,460)=210 exch2_iLo(2,460)=0 exch2_iHi(2,460)=35 exch2_jLo(2,460)=0 exch2_jHi(2,460)=0 exch2_opposingSend(2,460)=3 exch2_pij(1,2,460)=0 exch2_pij(2,2,460)=-1 exch2_pij(3,2,460)=1 exch2_pij(4,2,460)=0 exch2_oi(2,460)=511 exch2_oj(2,460)=-510 exch2_neighbourId(3,460)=461 exch2_iLo(3,460)=35 exch2_iHi(3,460)=35 exch2_jLo(3,460)=0 exch2_jHi(3,460)=52 exch2_opposingSend(3,460)=5 exch2_pij(1,3,460)=1 exch2_pij(2,3,460)=0 exch2_pij(3,3,460)=0 exch2_pij(4,3,460)=1 exch2_oi(3,460)=0 exch2_oj(3,460)=0 exch2_neighbourId(4,460)=459 exch2_iLo(4,460)=0 exch2_iHi(4,460)=0 exch2_jLo(4,460)=0 exch2_jHi(4,460)=52 exch2_opposingSend(4,460)=3 exch2_pij(1,4,460)=1 exch2_pij(2,4,460)=0 exch2_pij(3,4,460)=0 exch2_pij(4,4,460)=1 exch2_oi(4,460)=0 exch2_oj(4,460)=0 RETURN END SUBROUTINE W2_E2SETUP_461 C Topology for tile 461 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(461)=34 exch2_tNy(461)=51 exch2_tBasex(461)=340 exch2_tBasey(461)=0 exch2_txGlobalo(461)=1871 exch2_tyGlobalo(461)=1 exch2_isWedge(461)=0 exch2_isNedge(461)=0 exch2_isEedge(461)=0 exch2_isSedge(461)=1 exch2_myFace(461)=4 exch2_mydNx(461)=510 exch2_mydNy(461)=510 exch2_nNeighbours(461)=5 exch2_neighbourId(1,461)=476 exch2_iLo(1,461)=0 exch2_iHi(1,461)=35 exch2_jLo(1,461)=52 exch2_jHi(1,461)=52 exch2_opposingSend(1,461)=2 exch2_pij(1,1,461)=1 exch2_pij(2,1,461)=0 exch2_pij(3,1,461)=0 exch2_pij(4,1,461)=1 exch2_oi(1,461)=0 exch2_oj(1,461)=0 exch2_neighbourId(2,461)=195 exch2_iLo(2,461)=17 exch2_iHi(2,461)=35 exch2_jLo(2,461)=0 exch2_jHi(2,461)=0 exch2_opposingSend(2,461)=3 exch2_pij(1,2,461)=0 exch2_pij(2,2,461)=-1 exch2_pij(3,2,461)=1 exch2_pij(4,2,461)=0 exch2_oi(2,461)=511 exch2_oj(2,461)=-510 exch2_neighbourId(3,461)=210 exch2_iLo(3,461)=0 exch2_iHi(3,461)=18 exch2_jLo(3,461)=0 exch2_jHi(3,461)=0 exch2_opposingSend(3,461)=4 exch2_pij(1,3,461)=0 exch2_pij(2,3,461)=-1 exch2_pij(3,3,461)=1 exch2_pij(4,3,461)=0 exch2_oi(3,461)=511 exch2_oj(3,461)=-510 exch2_neighbourId(4,461)=462 exch2_iLo(4,461)=35 exch2_iHi(4,461)=35 exch2_jLo(4,461)=0 exch2_jHi(4,461)=52 exch2_opposingSend(4,461)=4 exch2_pij(1,4,461)=1 exch2_pij(2,4,461)=0 exch2_pij(3,4,461)=0 exch2_pij(4,4,461)=1 exch2_oi(4,461)=0 exch2_oj(4,461)=0 exch2_neighbourId(5,461)=460 exch2_iLo(5,461)=0 exch2_iHi(5,461)=0 exch2_jLo(5,461)=0 exch2_jHi(5,461)=52 exch2_opposingSend(5,461)=3 exch2_pij(1,5,461)=1 exch2_pij(2,5,461)=0 exch2_pij(3,5,461)=0 exch2_pij(4,5,461)=1 exch2_oi(5,461)=0 exch2_oj(5,461)=0 RETURN END SUBROUTINE W2_E2SETUP_462 C Topology for tile 462 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(462)=34 exch2_tNy(462)=51 exch2_tBasex(462)=374 exch2_tBasey(462)=0 exch2_txGlobalo(462)=1905 exch2_tyGlobalo(462)=1 exch2_isWedge(462)=0 exch2_isNedge(462)=0 exch2_isEedge(462)=0 exch2_isSedge(462)=1 exch2_myFace(462)=4 exch2_mydNx(462)=510 exch2_mydNy(462)=510 exch2_nNeighbours(462)=4 exch2_neighbourId(1,462)=477 exch2_iLo(1,462)=0 exch2_iHi(1,462)=35 exch2_jLo(1,462)=52 exch2_jHi(1,462)=52 exch2_opposingSend(1,462)=2 exch2_pij(1,1,462)=1 exch2_pij(2,1,462)=0 exch2_pij(3,1,462)=0 exch2_pij(4,1,462)=1 exch2_oi(1,462)=0 exch2_oj(1,462)=0 exch2_neighbourId(2,462)=195 exch2_iLo(2,462)=0 exch2_iHi(2,462)=35 exch2_jLo(2,462)=0 exch2_jHi(2,462)=0 exch2_opposingSend(2,462)=4 exch2_pij(1,2,462)=0 exch2_pij(2,2,462)=-1 exch2_pij(3,2,462)=1 exch2_pij(4,2,462)=0 exch2_oi(2,462)=511 exch2_oj(2,462)=-510 exch2_neighbourId(3,462)=463 exch2_iLo(3,462)=35 exch2_iHi(3,462)=35 exch2_jLo(3,462)=0 exch2_jHi(3,462)=52 exch2_opposingSend(3,462)=4 exch2_pij(1,3,462)=1 exch2_pij(2,3,462)=0 exch2_pij(3,3,462)=0 exch2_pij(4,3,462)=1 exch2_oi(3,462)=0 exch2_oj(3,462)=0 exch2_neighbourId(4,462)=461 exch2_iLo(4,462)=0 exch2_iHi(4,462)=0 exch2_jLo(4,462)=0 exch2_jHi(4,462)=52 exch2_opposingSend(4,462)=4 exch2_pij(1,4,462)=1 exch2_pij(2,4,462)=0 exch2_pij(3,4,462)=0 exch2_pij(4,4,462)=1 exch2_oi(4,462)=0 exch2_oj(4,462)=0 RETURN END SUBROUTINE W2_E2SETUP_463 C Topology for tile 463 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(463)=34 exch2_tNy(463)=51 exch2_tBasex(463)=408 exch2_tBasey(463)=0 exch2_txGlobalo(463)=1939 exch2_tyGlobalo(463)=1 exch2_isWedge(463)=0 exch2_isNedge(463)=0 exch2_isEedge(463)=0 exch2_isSedge(463)=1 exch2_myFace(463)=4 exch2_mydNx(463)=510 exch2_mydNy(463)=510 exch2_nNeighbours(463)=4 exch2_neighbourId(1,463)=478 exch2_iLo(1,463)=0 exch2_iHi(1,463)=35 exch2_jLo(1,463)=52 exch2_jHi(1,463)=52 exch2_opposingSend(1,463)=2 exch2_pij(1,1,463)=1 exch2_pij(2,1,463)=0 exch2_pij(3,1,463)=0 exch2_pij(4,1,463)=1 exch2_oi(1,463)=0 exch2_oj(1,463)=0 exch2_neighbourId(2,463)=180 exch2_iLo(2,463)=0 exch2_iHi(2,463)=35 exch2_jLo(2,463)=0 exch2_jHi(2,463)=0 exch2_opposingSend(2,463)=3 exch2_pij(1,2,463)=0 exch2_pij(2,2,463)=-1 exch2_pij(3,2,463)=1 exch2_pij(4,2,463)=0 exch2_oi(2,463)=511 exch2_oj(2,463)=-510 exch2_neighbourId(3,463)=464 exch2_iLo(3,463)=35 exch2_iHi(3,463)=35 exch2_jLo(3,463)=0 exch2_jHi(3,463)=52 exch2_opposingSend(3,463)=5 exch2_pij(1,3,463)=1 exch2_pij(2,3,463)=0 exch2_pij(3,3,463)=0 exch2_pij(4,3,463)=1 exch2_oi(3,463)=0 exch2_oj(3,463)=0 exch2_neighbourId(4,463)=462 exch2_iLo(4,463)=0 exch2_iHi(4,463)=0 exch2_jLo(4,463)=0 exch2_jHi(4,463)=52 exch2_opposingSend(4,463)=3 exch2_pij(1,4,463)=1 exch2_pij(2,4,463)=0 exch2_pij(3,4,463)=0 exch2_pij(4,4,463)=1 exch2_oi(4,463)=0 exch2_oj(4,463)=0 RETURN END SUBROUTINE W2_E2SETUP_464 C Topology for tile 464 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(464)=34 exch2_tNy(464)=51 exch2_tBasex(464)=442 exch2_tBasey(464)=0 exch2_txGlobalo(464)=1973 exch2_tyGlobalo(464)=1 exch2_isWedge(464)=0 exch2_isNedge(464)=0 exch2_isEedge(464)=0 exch2_isSedge(464)=1 exch2_myFace(464)=4 exch2_mydNx(464)=510 exch2_mydNy(464)=510 exch2_nNeighbours(464)=5 exch2_neighbourId(1,464)=479 exch2_iLo(1,464)=0 exch2_iHi(1,464)=35 exch2_jLo(1,464)=52 exch2_jHi(1,464)=52 exch2_opposingSend(1,464)=2 exch2_pij(1,1,464)=1 exch2_pij(2,1,464)=0 exch2_pij(3,1,464)=0 exch2_pij(4,1,464)=1 exch2_oi(1,464)=0 exch2_oj(1,464)=0 exch2_neighbourId(2,464)=165 exch2_iLo(2,464)=17 exch2_iHi(2,464)=35 exch2_jLo(2,464)=0 exch2_jHi(2,464)=0 exch2_opposingSend(2,464)=3 exch2_pij(1,2,464)=0 exch2_pij(2,2,464)=-1 exch2_pij(3,2,464)=1 exch2_pij(4,2,464)=0 exch2_oi(2,464)=511 exch2_oj(2,464)=-510 exch2_neighbourId(3,464)=180 exch2_iLo(3,464)=0 exch2_iHi(3,464)=18 exch2_jLo(3,464)=0 exch2_jHi(3,464)=0 exch2_opposingSend(3,464)=4 exch2_pij(1,3,464)=0 exch2_pij(2,3,464)=-1 exch2_pij(3,3,464)=1 exch2_pij(4,3,464)=0 exch2_oi(3,464)=511 exch2_oj(3,464)=-510 exch2_neighbourId(4,464)=465 exch2_iLo(4,464)=35 exch2_iHi(4,464)=35 exch2_jLo(4,464)=0 exch2_jHi(4,464)=52 exch2_opposingSend(4,464)=5 exch2_pij(1,4,464)=1 exch2_pij(2,4,464)=0 exch2_pij(3,4,464)=0 exch2_pij(4,4,464)=1 exch2_oi(4,464)=0 exch2_oj(4,464)=0 exch2_neighbourId(5,464)=463 exch2_iLo(5,464)=0 exch2_iHi(5,464)=0 exch2_jLo(5,464)=0 exch2_jHi(5,464)=52 exch2_opposingSend(5,464)=3 exch2_pij(1,5,464)=1 exch2_pij(2,5,464)=0 exch2_pij(3,5,464)=0 exch2_pij(4,5,464)=1 exch2_oi(5,464)=0 exch2_oj(5,464)=0 RETURN END SUBROUTINE W2_E2SETUP_465 C Topology for tile 465 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(465)=34 exch2_tNy(465)=51 exch2_tBasex(465)=476 exch2_tBasey(465)=0 exch2_txGlobalo(465)=2007 exch2_tyGlobalo(465)=1 exch2_isWedge(465)=0 exch2_isNedge(465)=0 exch2_isEedge(465)=1 exch2_isSedge(465)=1 exch2_myFace(465)=4 exch2_mydNx(465)=510 exch2_mydNy(465)=510 exch2_nNeighbours(465)=5 exch2_neighbourId(1,465)=480 exch2_iLo(1,465)=0 exch2_iHi(1,465)=35 exch2_jLo(1,465)=52 exch2_jHi(1,465)=52 exch2_opposingSend(1,465)=2 exch2_pij(1,1,465)=1 exch2_pij(2,1,465)=0 exch2_pij(3,1,465)=0 exch2_pij(4,1,465)=1 exch2_oi(1,465)=0 exch2_oj(1,465)=0 exch2_neighbourId(2,465)=165 exch2_iLo(2,465)=0 exch2_iHi(2,465)=35 exch2_jLo(2,465)=0 exch2_jHi(2,465)=0 exch2_opposingSend(2,465)=4 exch2_pij(1,2,465)=0 exch2_pij(2,2,465)=-1 exch2_pij(3,2,465)=1 exch2_pij(4,2,465)=0 exch2_oi(2,465)=511 exch2_oj(2,465)=-510 exch2_neighbourId(3,465)=764 exch2_iLo(3,465)=35 exch2_iHi(3,465)=35 exch2_jLo(3,465)=34 exch2_jHi(3,465)=52 exch2_opposingSend(3,465)=2 exch2_pij(1,3,465)=0 exch2_pij(2,3,465)=1 exch2_pij(3,3,465)=-1 exch2_pij(4,3,465)=0 exch2_oi(3,465)=510 exch2_oj(3,465)=511 exch2_neighbourId(4,465)=765 exch2_iLo(4,465)=35 exch2_iHi(4,465)=35 exch2_jLo(4,465)=0 exch2_jHi(4,465)=35 exch2_opposingSend(4,465)=2 exch2_pij(1,4,465)=0 exch2_pij(2,4,465)=1 exch2_pij(3,4,465)=-1 exch2_pij(4,4,465)=0 exch2_oi(4,465)=510 exch2_oj(4,465)=511 exch2_neighbourId(5,465)=464 exch2_iLo(5,465)=0 exch2_iHi(5,465)=0 exch2_jLo(5,465)=0 exch2_jHi(5,465)=52 exch2_opposingSend(5,465)=4 exch2_pij(1,5,465)=1 exch2_pij(2,5,465)=0 exch2_pij(3,5,465)=0 exch2_pij(4,5,465)=1 exch2_oi(5,465)=0 exch2_oj(5,465)=0 RETURN END SUBROUTINE W2_E2SETUP_466 C Topology for tile 466 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(466)=34 exch2_tNy(466)=51 exch2_tBasex(466)=0 exch2_tBasey(466)=51 exch2_txGlobalo(466)=1531 exch2_tyGlobalo(466)=52 exch2_isWedge(466)=1 exch2_isNedge(466)=0 exch2_isEedge(466)=0 exch2_isSedge(466)=0 exch2_myFace(466)=4 exch2_mydNx(466)=510 exch2_mydNy(466)=510 exch2_nNeighbours(466)=4 exch2_neighbourId(1,466)=481 exch2_iLo(1,466)=0 exch2_iHi(1,466)=35 exch2_jLo(1,466)=52 exch2_jHi(1,466)=52 exch2_opposingSend(1,466)=2 exch2_pij(1,1,466)=1 exch2_pij(2,1,466)=0 exch2_pij(3,1,466)=0 exch2_pij(4,1,466)=1 exch2_oi(1,466)=0 exch2_oj(1,466)=0 exch2_neighbourId(2,466)=451 exch2_iLo(2,466)=0 exch2_iHi(2,466)=35 exch2_jLo(2,466)=0 exch2_jHi(2,466)=0 exch2_opposingSend(2,466)=1 exch2_pij(1,2,466)=1 exch2_pij(2,2,466)=0 exch2_pij(3,2,466)=0 exch2_pij(4,2,466)=1 exch2_oi(2,466)=0 exch2_oj(2,466)=0 exch2_neighbourId(3,466)=467 exch2_iLo(3,466)=35 exch2_iHi(3,466)=35 exch2_jLo(3,466)=0 exch2_jHi(3,466)=52 exch2_opposingSend(3,466)=4 exch2_pij(1,3,466)=1 exch2_pij(2,3,466)=0 exch2_pij(3,3,466)=0 exch2_pij(4,3,466)=1 exch2_oi(3,466)=0 exch2_oj(3,466)=0 exch2_neighbourId(4,466)=330 exch2_iLo(4,466)=0 exch2_iHi(4,466)=0 exch2_jLo(4,466)=0 exch2_jHi(4,466)=52 exch2_opposingSend(4,466)=3 exch2_pij(1,4,466)=1 exch2_pij(2,4,466)=0 exch2_pij(3,4,466)=0 exch2_pij(4,4,466)=1 exch2_oi(4,466)=-510 exch2_oj(4,466)=0 RETURN END SUBROUTINE W2_E2SETUP_467 C Topology for tile 467 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(467)=34 exch2_tNy(467)=51 exch2_tBasex(467)=34 exch2_tBasey(467)=51 exch2_txGlobalo(467)=1565 exch2_tyGlobalo(467)=52 exch2_isWedge(467)=0 exch2_isNedge(467)=0 exch2_isEedge(467)=0 exch2_isSedge(467)=0 exch2_myFace(467)=4 exch2_mydNx(467)=510 exch2_mydNy(467)=510 exch2_nNeighbours(467)=4 exch2_neighbourId(1,467)=482 exch2_iLo(1,467)=0 exch2_iHi(1,467)=35 exch2_jLo(1,467)=52 exch2_jHi(1,467)=52 exch2_opposingSend(1,467)=2 exch2_pij(1,1,467)=1 exch2_pij(2,1,467)=0 exch2_pij(3,1,467)=0 exch2_pij(4,1,467)=1 exch2_oi(1,467)=0 exch2_oj(1,467)=0 exch2_neighbourId(2,467)=452 exch2_iLo(2,467)=0 exch2_iHi(2,467)=35 exch2_jLo(2,467)=0 exch2_jHi(2,467)=0 exch2_opposingSend(2,467)=1 exch2_pij(1,2,467)=1 exch2_pij(2,2,467)=0 exch2_pij(3,2,467)=0 exch2_pij(4,2,467)=1 exch2_oi(2,467)=0 exch2_oj(2,467)=0 exch2_neighbourId(3,467)=468 exch2_iLo(3,467)=35 exch2_iHi(3,467)=35 exch2_jLo(3,467)=0 exch2_jHi(3,467)=52 exch2_opposingSend(3,467)=4 exch2_pij(1,3,467)=1 exch2_pij(2,3,467)=0 exch2_pij(3,3,467)=0 exch2_pij(4,3,467)=1 exch2_oi(3,467)=0 exch2_oj(3,467)=0 exch2_neighbourId(4,467)=466 exch2_iLo(4,467)=0 exch2_iHi(4,467)=0 exch2_jLo(4,467)=0 exch2_jHi(4,467)=52 exch2_opposingSend(4,467)=3 exch2_pij(1,4,467)=1 exch2_pij(2,4,467)=0 exch2_pij(3,4,467)=0 exch2_pij(4,4,467)=1 exch2_oi(4,467)=0 exch2_oj(4,467)=0 RETURN END SUBROUTINE W2_E2SETUP_468 C Topology for tile 468 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(468)=34 exch2_tNy(468)=51 exch2_tBasex(468)=68 exch2_tBasey(468)=51 exch2_txGlobalo(468)=1599 exch2_tyGlobalo(468)=52 exch2_isWedge(468)=0 exch2_isNedge(468)=0 exch2_isEedge(468)=0 exch2_isSedge(468)=0 exch2_myFace(468)=4 exch2_mydNx(468)=510 exch2_mydNy(468)=510 exch2_nNeighbours(468)=4 exch2_neighbourId(1,468)=483 exch2_iLo(1,468)=0 exch2_iHi(1,468)=35 exch2_jLo(1,468)=52 exch2_jHi(1,468)=52 exch2_opposingSend(1,468)=2 exch2_pij(1,1,468)=1 exch2_pij(2,1,468)=0 exch2_pij(3,1,468)=0 exch2_pij(4,1,468)=1 exch2_oi(1,468)=0 exch2_oj(1,468)=0 exch2_neighbourId(2,468)=453 exch2_iLo(2,468)=0 exch2_iHi(2,468)=35 exch2_jLo(2,468)=0 exch2_jHi(2,468)=0 exch2_opposingSend(2,468)=1 exch2_pij(1,2,468)=1 exch2_pij(2,2,468)=0 exch2_pij(3,2,468)=0 exch2_pij(4,2,468)=1 exch2_oi(2,468)=0 exch2_oj(2,468)=0 exch2_neighbourId(3,468)=469 exch2_iLo(3,468)=35 exch2_iHi(3,468)=35 exch2_jLo(3,468)=0 exch2_jHi(3,468)=52 exch2_opposingSend(3,468)=4 exch2_pij(1,3,468)=1 exch2_pij(2,3,468)=0 exch2_pij(3,3,468)=0 exch2_pij(4,3,468)=1 exch2_oi(3,468)=0 exch2_oj(3,468)=0 exch2_neighbourId(4,468)=467 exch2_iLo(4,468)=0 exch2_iHi(4,468)=0 exch2_jLo(4,468)=0 exch2_jHi(4,468)=52 exch2_opposingSend(4,468)=3 exch2_pij(1,4,468)=1 exch2_pij(2,4,468)=0 exch2_pij(3,4,468)=0 exch2_pij(4,4,468)=1 exch2_oi(4,468)=0 exch2_oj(4,468)=0 RETURN END SUBROUTINE W2_E2SETUP_469 C Topology for tile 469 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(469)=34 exch2_tNy(469)=51 exch2_tBasex(469)=102 exch2_tBasey(469)=51 exch2_txGlobalo(469)=1633 exch2_tyGlobalo(469)=52 exch2_isWedge(469)=0 exch2_isNedge(469)=0 exch2_isEedge(469)=0 exch2_isSedge(469)=0 exch2_myFace(469)=4 exch2_mydNx(469)=510 exch2_mydNy(469)=510 exch2_nNeighbours(469)=4 exch2_neighbourId(1,469)=484 exch2_iLo(1,469)=0 exch2_iHi(1,469)=35 exch2_jLo(1,469)=52 exch2_jHi(1,469)=52 exch2_opposingSend(1,469)=2 exch2_pij(1,1,469)=1 exch2_pij(2,1,469)=0 exch2_pij(3,1,469)=0 exch2_pij(4,1,469)=1 exch2_oi(1,469)=0 exch2_oj(1,469)=0 exch2_neighbourId(2,469)=454 exch2_iLo(2,469)=0 exch2_iHi(2,469)=35 exch2_jLo(2,469)=0 exch2_jHi(2,469)=0 exch2_opposingSend(2,469)=1 exch2_pij(1,2,469)=1 exch2_pij(2,2,469)=0 exch2_pij(3,2,469)=0 exch2_pij(4,2,469)=1 exch2_oi(2,469)=0 exch2_oj(2,469)=0 exch2_neighbourId(3,469)=470 exch2_iLo(3,469)=35 exch2_iHi(3,469)=35 exch2_jLo(3,469)=0 exch2_jHi(3,469)=52 exch2_opposingSend(3,469)=4 exch2_pij(1,3,469)=1 exch2_pij(2,3,469)=0 exch2_pij(3,3,469)=0 exch2_pij(4,3,469)=1 exch2_oi(3,469)=0 exch2_oj(3,469)=0 exch2_neighbourId(4,469)=468 exch2_iLo(4,469)=0 exch2_iHi(4,469)=0 exch2_jLo(4,469)=0 exch2_jHi(4,469)=52 exch2_opposingSend(4,469)=3 exch2_pij(1,4,469)=1 exch2_pij(2,4,469)=0 exch2_pij(3,4,469)=0 exch2_pij(4,4,469)=1 exch2_oi(4,469)=0 exch2_oj(4,469)=0 RETURN END SUBROUTINE W2_E2SETUP_470 C Topology for tile 470 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(470)=34 exch2_tNy(470)=51 exch2_tBasex(470)=136 exch2_tBasey(470)=51 exch2_txGlobalo(470)=1667 exch2_tyGlobalo(470)=52 exch2_isWedge(470)=0 exch2_isNedge(470)=0 exch2_isEedge(470)=0 exch2_isSedge(470)=0 exch2_myFace(470)=4 exch2_mydNx(470)=510 exch2_mydNy(470)=510 exch2_nNeighbours(470)=4 exch2_neighbourId(1,470)=485 exch2_iLo(1,470)=0 exch2_iHi(1,470)=35 exch2_jLo(1,470)=52 exch2_jHi(1,470)=52 exch2_opposingSend(1,470)=2 exch2_pij(1,1,470)=1 exch2_pij(2,1,470)=0 exch2_pij(3,1,470)=0 exch2_pij(4,1,470)=1 exch2_oi(1,470)=0 exch2_oj(1,470)=0 exch2_neighbourId(2,470)=455 exch2_iLo(2,470)=0 exch2_iHi(2,470)=35 exch2_jLo(2,470)=0 exch2_jHi(2,470)=0 exch2_opposingSend(2,470)=1 exch2_pij(1,2,470)=1 exch2_pij(2,2,470)=0 exch2_pij(3,2,470)=0 exch2_pij(4,2,470)=1 exch2_oi(2,470)=0 exch2_oj(2,470)=0 exch2_neighbourId(3,470)=471 exch2_iLo(3,470)=35 exch2_iHi(3,470)=35 exch2_jLo(3,470)=0 exch2_jHi(3,470)=52 exch2_opposingSend(3,470)=4 exch2_pij(1,3,470)=1 exch2_pij(2,3,470)=0 exch2_pij(3,3,470)=0 exch2_pij(4,3,470)=1 exch2_oi(3,470)=0 exch2_oj(3,470)=0 exch2_neighbourId(4,470)=469 exch2_iLo(4,470)=0 exch2_iHi(4,470)=0 exch2_jLo(4,470)=0 exch2_jHi(4,470)=52 exch2_opposingSend(4,470)=3 exch2_pij(1,4,470)=1 exch2_pij(2,4,470)=0 exch2_pij(3,4,470)=0 exch2_pij(4,4,470)=1 exch2_oi(4,470)=0 exch2_oj(4,470)=0 RETURN END SUBROUTINE W2_E2SETUP_471 C Topology for tile 471 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(471)=34 exch2_tNy(471)=51 exch2_tBasex(471)=170 exch2_tBasey(471)=51 exch2_txGlobalo(471)=1701 exch2_tyGlobalo(471)=52 exch2_isWedge(471)=0 exch2_isNedge(471)=0 exch2_isEedge(471)=0 exch2_isSedge(471)=0 exch2_myFace(471)=4 exch2_mydNx(471)=510 exch2_mydNy(471)=510 exch2_nNeighbours(471)=4 exch2_neighbourId(1,471)=486 exch2_iLo(1,471)=0 exch2_iHi(1,471)=35 exch2_jLo(1,471)=52 exch2_jHi(1,471)=52 exch2_opposingSend(1,471)=2 exch2_pij(1,1,471)=1 exch2_pij(2,1,471)=0 exch2_pij(3,1,471)=0 exch2_pij(4,1,471)=1 exch2_oi(1,471)=0 exch2_oj(1,471)=0 exch2_neighbourId(2,471)=456 exch2_iLo(2,471)=0 exch2_iHi(2,471)=35 exch2_jLo(2,471)=0 exch2_jHi(2,471)=0 exch2_opposingSend(2,471)=1 exch2_pij(1,2,471)=1 exch2_pij(2,2,471)=0 exch2_pij(3,2,471)=0 exch2_pij(4,2,471)=1 exch2_oi(2,471)=0 exch2_oj(2,471)=0 exch2_neighbourId(3,471)=472 exch2_iLo(3,471)=35 exch2_iHi(3,471)=35 exch2_jLo(3,471)=0 exch2_jHi(3,471)=52 exch2_opposingSend(3,471)=4 exch2_pij(1,3,471)=1 exch2_pij(2,3,471)=0 exch2_pij(3,3,471)=0 exch2_pij(4,3,471)=1 exch2_oi(3,471)=0 exch2_oj(3,471)=0 exch2_neighbourId(4,471)=470 exch2_iLo(4,471)=0 exch2_iHi(4,471)=0 exch2_jLo(4,471)=0 exch2_jHi(4,471)=52 exch2_opposingSend(4,471)=3 exch2_pij(1,4,471)=1 exch2_pij(2,4,471)=0 exch2_pij(3,4,471)=0 exch2_pij(4,4,471)=1 exch2_oi(4,471)=0 exch2_oj(4,471)=0 RETURN END SUBROUTINE W2_E2SETUP_472 C Topology for tile 472 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(472)=34 exch2_tNy(472)=51 exch2_tBasex(472)=204 exch2_tBasey(472)=51 exch2_txGlobalo(472)=1735 exch2_tyGlobalo(472)=52 exch2_isWedge(472)=0 exch2_isNedge(472)=0 exch2_isEedge(472)=0 exch2_isSedge(472)=0 exch2_myFace(472)=4 exch2_mydNx(472)=510 exch2_mydNy(472)=510 exch2_nNeighbours(472)=4 exch2_neighbourId(1,472)=487 exch2_iLo(1,472)=0 exch2_iHi(1,472)=35 exch2_jLo(1,472)=52 exch2_jHi(1,472)=52 exch2_opposingSend(1,472)=2 exch2_pij(1,1,472)=1 exch2_pij(2,1,472)=0 exch2_pij(3,1,472)=0 exch2_pij(4,1,472)=1 exch2_oi(1,472)=0 exch2_oj(1,472)=0 exch2_neighbourId(2,472)=457 exch2_iLo(2,472)=0 exch2_iHi(2,472)=35 exch2_jLo(2,472)=0 exch2_jHi(2,472)=0 exch2_opposingSend(2,472)=1 exch2_pij(1,2,472)=1 exch2_pij(2,2,472)=0 exch2_pij(3,2,472)=0 exch2_pij(4,2,472)=1 exch2_oi(2,472)=0 exch2_oj(2,472)=0 exch2_neighbourId(3,472)=473 exch2_iLo(3,472)=35 exch2_iHi(3,472)=35 exch2_jLo(3,472)=0 exch2_jHi(3,472)=52 exch2_opposingSend(3,472)=4 exch2_pij(1,3,472)=1 exch2_pij(2,3,472)=0 exch2_pij(3,3,472)=0 exch2_pij(4,3,472)=1 exch2_oi(3,472)=0 exch2_oj(3,472)=0 exch2_neighbourId(4,472)=471 exch2_iLo(4,472)=0 exch2_iHi(4,472)=0 exch2_jLo(4,472)=0 exch2_jHi(4,472)=52 exch2_opposingSend(4,472)=3 exch2_pij(1,4,472)=1 exch2_pij(2,4,472)=0 exch2_pij(3,4,472)=0 exch2_pij(4,4,472)=1 exch2_oi(4,472)=0 exch2_oj(4,472)=0 RETURN END SUBROUTINE W2_E2SETUP_473 C Topology for tile 473 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(473)=34 exch2_tNy(473)=51 exch2_tBasex(473)=238 exch2_tBasey(473)=51 exch2_txGlobalo(473)=1769 exch2_tyGlobalo(473)=52 exch2_isWedge(473)=0 exch2_isNedge(473)=0 exch2_isEedge(473)=0 exch2_isSedge(473)=0 exch2_myFace(473)=4 exch2_mydNx(473)=510 exch2_mydNy(473)=510 exch2_nNeighbours(473)=4 exch2_neighbourId(1,473)=488 exch2_iLo(1,473)=0 exch2_iHi(1,473)=35 exch2_jLo(1,473)=52 exch2_jHi(1,473)=52 exch2_opposingSend(1,473)=2 exch2_pij(1,1,473)=1 exch2_pij(2,1,473)=0 exch2_pij(3,1,473)=0 exch2_pij(4,1,473)=1 exch2_oi(1,473)=0 exch2_oj(1,473)=0 exch2_neighbourId(2,473)=458 exch2_iLo(2,473)=0 exch2_iHi(2,473)=35 exch2_jLo(2,473)=0 exch2_jHi(2,473)=0 exch2_opposingSend(2,473)=1 exch2_pij(1,2,473)=1 exch2_pij(2,2,473)=0 exch2_pij(3,2,473)=0 exch2_pij(4,2,473)=1 exch2_oi(2,473)=0 exch2_oj(2,473)=0 exch2_neighbourId(3,473)=474 exch2_iLo(3,473)=35 exch2_iHi(3,473)=35 exch2_jLo(3,473)=0 exch2_jHi(3,473)=52 exch2_opposingSend(3,473)=4 exch2_pij(1,3,473)=1 exch2_pij(2,3,473)=0 exch2_pij(3,3,473)=0 exch2_pij(4,3,473)=1 exch2_oi(3,473)=0 exch2_oj(3,473)=0 exch2_neighbourId(4,473)=472 exch2_iLo(4,473)=0 exch2_iHi(4,473)=0 exch2_jLo(4,473)=0 exch2_jHi(4,473)=52 exch2_opposingSend(4,473)=3 exch2_pij(1,4,473)=1 exch2_pij(2,4,473)=0 exch2_pij(3,4,473)=0 exch2_pij(4,4,473)=1 exch2_oi(4,473)=0 exch2_oj(4,473)=0 RETURN END SUBROUTINE W2_E2SETUP_474 C Topology for tile 474 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(474)=34 exch2_tNy(474)=51 exch2_tBasex(474)=272 exch2_tBasey(474)=51 exch2_txGlobalo(474)=1803 exch2_tyGlobalo(474)=52 exch2_isWedge(474)=0 exch2_isNedge(474)=0 exch2_isEedge(474)=0 exch2_isSedge(474)=0 exch2_myFace(474)=4 exch2_mydNx(474)=510 exch2_mydNy(474)=510 exch2_nNeighbours(474)=4 exch2_neighbourId(1,474)=489 exch2_iLo(1,474)=0 exch2_iHi(1,474)=35 exch2_jLo(1,474)=52 exch2_jHi(1,474)=52 exch2_opposingSend(1,474)=2 exch2_pij(1,1,474)=1 exch2_pij(2,1,474)=0 exch2_pij(3,1,474)=0 exch2_pij(4,1,474)=1 exch2_oi(1,474)=0 exch2_oj(1,474)=0 exch2_neighbourId(2,474)=459 exch2_iLo(2,474)=0 exch2_iHi(2,474)=35 exch2_jLo(2,474)=0 exch2_jHi(2,474)=0 exch2_opposingSend(2,474)=1 exch2_pij(1,2,474)=1 exch2_pij(2,2,474)=0 exch2_pij(3,2,474)=0 exch2_pij(4,2,474)=1 exch2_oi(2,474)=0 exch2_oj(2,474)=0 exch2_neighbourId(3,474)=475 exch2_iLo(3,474)=35 exch2_iHi(3,474)=35 exch2_jLo(3,474)=0 exch2_jHi(3,474)=52 exch2_opposingSend(3,474)=4 exch2_pij(1,3,474)=1 exch2_pij(2,3,474)=0 exch2_pij(3,3,474)=0 exch2_pij(4,3,474)=1 exch2_oi(3,474)=0 exch2_oj(3,474)=0 exch2_neighbourId(4,474)=473 exch2_iLo(4,474)=0 exch2_iHi(4,474)=0 exch2_jLo(4,474)=0 exch2_jHi(4,474)=52 exch2_opposingSend(4,474)=3 exch2_pij(1,4,474)=1 exch2_pij(2,4,474)=0 exch2_pij(3,4,474)=0 exch2_pij(4,4,474)=1 exch2_oi(4,474)=0 exch2_oj(4,474)=0 RETURN END SUBROUTINE W2_E2SETUP_475 C Topology for tile 475 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(475)=34 exch2_tNy(475)=51 exch2_tBasex(475)=306 exch2_tBasey(475)=51 exch2_txGlobalo(475)=1837 exch2_tyGlobalo(475)=52 exch2_isWedge(475)=0 exch2_isNedge(475)=0 exch2_isEedge(475)=0 exch2_isSedge(475)=0 exch2_myFace(475)=4 exch2_mydNx(475)=510 exch2_mydNy(475)=510 exch2_nNeighbours(475)=4 exch2_neighbourId(1,475)=490 exch2_iLo(1,475)=0 exch2_iHi(1,475)=35 exch2_jLo(1,475)=52 exch2_jHi(1,475)=52 exch2_opposingSend(1,475)=2 exch2_pij(1,1,475)=1 exch2_pij(2,1,475)=0 exch2_pij(3,1,475)=0 exch2_pij(4,1,475)=1 exch2_oi(1,475)=0 exch2_oj(1,475)=0 exch2_neighbourId(2,475)=460 exch2_iLo(2,475)=0 exch2_iHi(2,475)=35 exch2_jLo(2,475)=0 exch2_jHi(2,475)=0 exch2_opposingSend(2,475)=1 exch2_pij(1,2,475)=1 exch2_pij(2,2,475)=0 exch2_pij(3,2,475)=0 exch2_pij(4,2,475)=1 exch2_oi(2,475)=0 exch2_oj(2,475)=0 exch2_neighbourId(3,475)=476 exch2_iLo(3,475)=35 exch2_iHi(3,475)=35 exch2_jLo(3,475)=0 exch2_jHi(3,475)=52 exch2_opposingSend(3,475)=4 exch2_pij(1,3,475)=1 exch2_pij(2,3,475)=0 exch2_pij(3,3,475)=0 exch2_pij(4,3,475)=1 exch2_oi(3,475)=0 exch2_oj(3,475)=0 exch2_neighbourId(4,475)=474 exch2_iLo(4,475)=0 exch2_iHi(4,475)=0 exch2_jLo(4,475)=0 exch2_jHi(4,475)=52 exch2_opposingSend(4,475)=3 exch2_pij(1,4,475)=1 exch2_pij(2,4,475)=0 exch2_pij(3,4,475)=0 exch2_pij(4,4,475)=1 exch2_oi(4,475)=0 exch2_oj(4,475)=0 RETURN END SUBROUTINE W2_E2SETUP_476 C Topology for tile 476 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(476)=34 exch2_tNy(476)=51 exch2_tBasex(476)=340 exch2_tBasey(476)=51 exch2_txGlobalo(476)=1871 exch2_tyGlobalo(476)=52 exch2_isWedge(476)=0 exch2_isNedge(476)=0 exch2_isEedge(476)=0 exch2_isSedge(476)=0 exch2_myFace(476)=4 exch2_mydNx(476)=510 exch2_mydNy(476)=510 exch2_nNeighbours(476)=4 exch2_neighbourId(1,476)=491 exch2_iLo(1,476)=0 exch2_iHi(1,476)=35 exch2_jLo(1,476)=52 exch2_jHi(1,476)=52 exch2_opposingSend(1,476)=2 exch2_pij(1,1,476)=1 exch2_pij(2,1,476)=0 exch2_pij(3,1,476)=0 exch2_pij(4,1,476)=1 exch2_oi(1,476)=0 exch2_oj(1,476)=0 exch2_neighbourId(2,476)=461 exch2_iLo(2,476)=0 exch2_iHi(2,476)=35 exch2_jLo(2,476)=0 exch2_jHi(2,476)=0 exch2_opposingSend(2,476)=1 exch2_pij(1,2,476)=1 exch2_pij(2,2,476)=0 exch2_pij(3,2,476)=0 exch2_pij(4,2,476)=1 exch2_oi(2,476)=0 exch2_oj(2,476)=0 exch2_neighbourId(3,476)=477 exch2_iLo(3,476)=35 exch2_iHi(3,476)=35 exch2_jLo(3,476)=0 exch2_jHi(3,476)=52 exch2_opposingSend(3,476)=4 exch2_pij(1,3,476)=1 exch2_pij(2,3,476)=0 exch2_pij(3,3,476)=0 exch2_pij(4,3,476)=1 exch2_oi(3,476)=0 exch2_oj(3,476)=0 exch2_neighbourId(4,476)=475 exch2_iLo(4,476)=0 exch2_iHi(4,476)=0 exch2_jLo(4,476)=0 exch2_jHi(4,476)=52 exch2_opposingSend(4,476)=3 exch2_pij(1,4,476)=1 exch2_pij(2,4,476)=0 exch2_pij(3,4,476)=0 exch2_pij(4,4,476)=1 exch2_oi(4,476)=0 exch2_oj(4,476)=0 RETURN END SUBROUTINE W2_E2SETUP_477 C Topology for tile 477 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(477)=34 exch2_tNy(477)=51 exch2_tBasex(477)=374 exch2_tBasey(477)=51 exch2_txGlobalo(477)=1905 exch2_tyGlobalo(477)=52 exch2_isWedge(477)=0 exch2_isNedge(477)=0 exch2_isEedge(477)=0 exch2_isSedge(477)=0 exch2_myFace(477)=4 exch2_mydNx(477)=510 exch2_mydNy(477)=510 exch2_nNeighbours(477)=4 exch2_neighbourId(1,477)=492 exch2_iLo(1,477)=0 exch2_iHi(1,477)=35 exch2_jLo(1,477)=52 exch2_jHi(1,477)=52 exch2_opposingSend(1,477)=2 exch2_pij(1,1,477)=1 exch2_pij(2,1,477)=0 exch2_pij(3,1,477)=0 exch2_pij(4,1,477)=1 exch2_oi(1,477)=0 exch2_oj(1,477)=0 exch2_neighbourId(2,477)=462 exch2_iLo(2,477)=0 exch2_iHi(2,477)=35 exch2_jLo(2,477)=0 exch2_jHi(2,477)=0 exch2_opposingSend(2,477)=1 exch2_pij(1,2,477)=1 exch2_pij(2,2,477)=0 exch2_pij(3,2,477)=0 exch2_pij(4,2,477)=1 exch2_oi(2,477)=0 exch2_oj(2,477)=0 exch2_neighbourId(3,477)=478 exch2_iLo(3,477)=35 exch2_iHi(3,477)=35 exch2_jLo(3,477)=0 exch2_jHi(3,477)=52 exch2_opposingSend(3,477)=4 exch2_pij(1,3,477)=1 exch2_pij(2,3,477)=0 exch2_pij(3,3,477)=0 exch2_pij(4,3,477)=1 exch2_oi(3,477)=0 exch2_oj(3,477)=0 exch2_neighbourId(4,477)=476 exch2_iLo(4,477)=0 exch2_iHi(4,477)=0 exch2_jLo(4,477)=0 exch2_jHi(4,477)=52 exch2_opposingSend(4,477)=3 exch2_pij(1,4,477)=1 exch2_pij(2,4,477)=0 exch2_pij(3,4,477)=0 exch2_pij(4,4,477)=1 exch2_oi(4,477)=0 exch2_oj(4,477)=0 RETURN END SUBROUTINE W2_E2SETUP_478 C Topology for tile 478 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(478)=34 exch2_tNy(478)=51 exch2_tBasex(478)=408 exch2_tBasey(478)=51 exch2_txGlobalo(478)=1939 exch2_tyGlobalo(478)=52 exch2_isWedge(478)=0 exch2_isNedge(478)=0 exch2_isEedge(478)=0 exch2_isSedge(478)=0 exch2_myFace(478)=4 exch2_mydNx(478)=510 exch2_mydNy(478)=510 exch2_nNeighbours(478)=4 exch2_neighbourId(1,478)=493 exch2_iLo(1,478)=0 exch2_iHi(1,478)=35 exch2_jLo(1,478)=52 exch2_jHi(1,478)=52 exch2_opposingSend(1,478)=2 exch2_pij(1,1,478)=1 exch2_pij(2,1,478)=0 exch2_pij(3,1,478)=0 exch2_pij(4,1,478)=1 exch2_oi(1,478)=0 exch2_oj(1,478)=0 exch2_neighbourId(2,478)=463 exch2_iLo(2,478)=0 exch2_iHi(2,478)=35 exch2_jLo(2,478)=0 exch2_jHi(2,478)=0 exch2_opposingSend(2,478)=1 exch2_pij(1,2,478)=1 exch2_pij(2,2,478)=0 exch2_pij(3,2,478)=0 exch2_pij(4,2,478)=1 exch2_oi(2,478)=0 exch2_oj(2,478)=0 exch2_neighbourId(3,478)=479 exch2_iLo(3,478)=35 exch2_iHi(3,478)=35 exch2_jLo(3,478)=0 exch2_jHi(3,478)=52 exch2_opposingSend(3,478)=4 exch2_pij(1,3,478)=1 exch2_pij(2,3,478)=0 exch2_pij(3,3,478)=0 exch2_pij(4,3,478)=1 exch2_oi(3,478)=0 exch2_oj(3,478)=0 exch2_neighbourId(4,478)=477 exch2_iLo(4,478)=0 exch2_iHi(4,478)=0 exch2_jLo(4,478)=0 exch2_jHi(4,478)=52 exch2_opposingSend(4,478)=3 exch2_pij(1,4,478)=1 exch2_pij(2,4,478)=0 exch2_pij(3,4,478)=0 exch2_pij(4,4,478)=1 exch2_oi(4,478)=0 exch2_oj(4,478)=0 RETURN END SUBROUTINE W2_E2SETUP_479 C Topology for tile 479 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(479)=34 exch2_tNy(479)=51 exch2_tBasex(479)=442 exch2_tBasey(479)=51 exch2_txGlobalo(479)=1973 exch2_tyGlobalo(479)=52 exch2_isWedge(479)=0 exch2_isNedge(479)=0 exch2_isEedge(479)=0 exch2_isSedge(479)=0 exch2_myFace(479)=4 exch2_mydNx(479)=510 exch2_mydNy(479)=510 exch2_nNeighbours(479)=4 exch2_neighbourId(1,479)=494 exch2_iLo(1,479)=0 exch2_iHi(1,479)=35 exch2_jLo(1,479)=52 exch2_jHi(1,479)=52 exch2_opposingSend(1,479)=2 exch2_pij(1,1,479)=1 exch2_pij(2,1,479)=0 exch2_pij(3,1,479)=0 exch2_pij(4,1,479)=1 exch2_oi(1,479)=0 exch2_oj(1,479)=0 exch2_neighbourId(2,479)=464 exch2_iLo(2,479)=0 exch2_iHi(2,479)=35 exch2_jLo(2,479)=0 exch2_jHi(2,479)=0 exch2_opposingSend(2,479)=1 exch2_pij(1,2,479)=1 exch2_pij(2,2,479)=0 exch2_pij(3,2,479)=0 exch2_pij(4,2,479)=1 exch2_oi(2,479)=0 exch2_oj(2,479)=0 exch2_neighbourId(3,479)=480 exch2_iLo(3,479)=35 exch2_iHi(3,479)=35 exch2_jLo(3,479)=0 exch2_jHi(3,479)=52 exch2_opposingSend(3,479)=5 exch2_pij(1,3,479)=1 exch2_pij(2,3,479)=0 exch2_pij(3,3,479)=0 exch2_pij(4,3,479)=1 exch2_oi(3,479)=0 exch2_oj(3,479)=0 exch2_neighbourId(4,479)=478 exch2_iLo(4,479)=0 exch2_iHi(4,479)=0 exch2_jLo(4,479)=0 exch2_jHi(4,479)=52 exch2_opposingSend(4,479)=3 exch2_pij(1,4,479)=1 exch2_pij(2,4,479)=0 exch2_pij(3,4,479)=0 exch2_pij(4,4,479)=1 exch2_oi(4,479)=0 exch2_oj(4,479)=0 RETURN END SUBROUTINE W2_E2SETUP_480 C Topology for tile 480 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(480)=34 exch2_tNy(480)=51 exch2_tBasex(480)=476 exch2_tBasey(480)=51 exch2_txGlobalo(480)=2007 exch2_tyGlobalo(480)=52 exch2_isWedge(480)=0 exch2_isNedge(480)=0 exch2_isEedge(480)=1 exch2_isSedge(480)=0 exch2_myFace(480)=4 exch2_mydNx(480)=510 exch2_mydNy(480)=510 exch2_nNeighbours(480)=5 exch2_neighbourId(1,480)=495 exch2_iLo(1,480)=0 exch2_iHi(1,480)=35 exch2_jLo(1,480)=52 exch2_jHi(1,480)=52 exch2_opposingSend(1,480)=2 exch2_pij(1,1,480)=1 exch2_pij(2,1,480)=0 exch2_pij(3,1,480)=0 exch2_pij(4,1,480)=1 exch2_oi(1,480)=0 exch2_oj(1,480)=0 exch2_neighbourId(2,480)=465 exch2_iLo(2,480)=0 exch2_iHi(2,480)=35 exch2_jLo(2,480)=0 exch2_jHi(2,480)=0 exch2_opposingSend(2,480)=1 exch2_pij(1,2,480)=1 exch2_pij(2,2,480)=0 exch2_pij(3,2,480)=0 exch2_pij(4,2,480)=1 exch2_oi(2,480)=0 exch2_oj(2,480)=0 exch2_neighbourId(3,480)=763 exch2_iLo(3,480)=35 exch2_iHi(3,480)=35 exch2_jLo(3,480)=17 exch2_jHi(3,480)=52 exch2_opposingSend(3,480)=2 exch2_pij(1,3,480)=0 exch2_pij(2,3,480)=1 exch2_pij(3,3,480)=-1 exch2_pij(4,3,480)=0 exch2_oi(3,480)=510 exch2_oj(3,480)=511 exch2_neighbourId(4,480)=764 exch2_iLo(4,480)=35 exch2_iHi(4,480)=35 exch2_jLo(4,480)=0 exch2_jHi(4,480)=18 exch2_opposingSend(4,480)=3 exch2_pij(1,4,480)=0 exch2_pij(2,4,480)=1 exch2_pij(3,4,480)=-1 exch2_pij(4,4,480)=0 exch2_oi(4,480)=510 exch2_oj(4,480)=511 exch2_neighbourId(5,480)=479 exch2_iLo(5,480)=0 exch2_iHi(5,480)=0 exch2_jLo(5,480)=0 exch2_jHi(5,480)=52 exch2_opposingSend(5,480)=3 exch2_pij(1,5,480)=1 exch2_pij(2,5,480)=0 exch2_pij(3,5,480)=0 exch2_pij(4,5,480)=1 exch2_oi(5,480)=0 exch2_oj(5,480)=0 RETURN END SUBROUTINE W2_E2SETUP_481 C Topology for tile 481 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(481)=34 exch2_tNy(481)=51 exch2_tBasex(481)=0 exch2_tBasey(481)=102 exch2_txGlobalo(481)=1531 exch2_tyGlobalo(481)=103 exch2_isWedge(481)=1 exch2_isNedge(481)=0 exch2_isEedge(481)=0 exch2_isSedge(481)=0 exch2_myFace(481)=4 exch2_mydNx(481)=510 exch2_mydNy(481)=510 exch2_nNeighbours(481)=4 exch2_neighbourId(1,481)=496 exch2_iLo(1,481)=0 exch2_iHi(1,481)=35 exch2_jLo(1,481)=52 exch2_jHi(1,481)=52 exch2_opposingSend(1,481)=2 exch2_pij(1,1,481)=1 exch2_pij(2,1,481)=0 exch2_pij(3,1,481)=0 exch2_pij(4,1,481)=1 exch2_oi(1,481)=0 exch2_oj(1,481)=0 exch2_neighbourId(2,481)=466 exch2_iLo(2,481)=0 exch2_iHi(2,481)=35 exch2_jLo(2,481)=0 exch2_jHi(2,481)=0 exch2_opposingSend(2,481)=1 exch2_pij(1,2,481)=1 exch2_pij(2,2,481)=0 exch2_pij(3,2,481)=0 exch2_pij(4,2,481)=1 exch2_oi(2,481)=0 exch2_oj(2,481)=0 exch2_neighbourId(3,481)=482 exch2_iLo(3,481)=35 exch2_iHi(3,481)=35 exch2_jLo(3,481)=0 exch2_jHi(3,481)=52 exch2_opposingSend(3,481)=4 exch2_pij(1,3,481)=1 exch2_pij(2,3,481)=0 exch2_pij(3,3,481)=0 exch2_pij(4,3,481)=1 exch2_oi(3,481)=0 exch2_oj(3,481)=0 exch2_neighbourId(4,481)=345 exch2_iLo(4,481)=0 exch2_iHi(4,481)=0 exch2_jLo(4,481)=0 exch2_jHi(4,481)=52 exch2_opposingSend(4,481)=3 exch2_pij(1,4,481)=1 exch2_pij(2,4,481)=0 exch2_pij(3,4,481)=0 exch2_pij(4,4,481)=1 exch2_oi(4,481)=-510 exch2_oj(4,481)=0 RETURN END SUBROUTINE W2_E2SETUP_482 C Topology for tile 482 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(482)=34 exch2_tNy(482)=51 exch2_tBasex(482)=34 exch2_tBasey(482)=102 exch2_txGlobalo(482)=1565 exch2_tyGlobalo(482)=103 exch2_isWedge(482)=0 exch2_isNedge(482)=0 exch2_isEedge(482)=0 exch2_isSedge(482)=0 exch2_myFace(482)=4 exch2_mydNx(482)=510 exch2_mydNy(482)=510 exch2_nNeighbours(482)=4 exch2_neighbourId(1,482)=497 exch2_iLo(1,482)=0 exch2_iHi(1,482)=35 exch2_jLo(1,482)=52 exch2_jHi(1,482)=52 exch2_opposingSend(1,482)=2 exch2_pij(1,1,482)=1 exch2_pij(2,1,482)=0 exch2_pij(3,1,482)=0 exch2_pij(4,1,482)=1 exch2_oi(1,482)=0 exch2_oj(1,482)=0 exch2_neighbourId(2,482)=467 exch2_iLo(2,482)=0 exch2_iHi(2,482)=35 exch2_jLo(2,482)=0 exch2_jHi(2,482)=0 exch2_opposingSend(2,482)=1 exch2_pij(1,2,482)=1 exch2_pij(2,2,482)=0 exch2_pij(3,2,482)=0 exch2_pij(4,2,482)=1 exch2_oi(2,482)=0 exch2_oj(2,482)=0 exch2_neighbourId(3,482)=483 exch2_iLo(3,482)=35 exch2_iHi(3,482)=35 exch2_jLo(3,482)=0 exch2_jHi(3,482)=52 exch2_opposingSend(3,482)=4 exch2_pij(1,3,482)=1 exch2_pij(2,3,482)=0 exch2_pij(3,3,482)=0 exch2_pij(4,3,482)=1 exch2_oi(3,482)=0 exch2_oj(3,482)=0 exch2_neighbourId(4,482)=481 exch2_iLo(4,482)=0 exch2_iHi(4,482)=0 exch2_jLo(4,482)=0 exch2_jHi(4,482)=52 exch2_opposingSend(4,482)=3 exch2_pij(1,4,482)=1 exch2_pij(2,4,482)=0 exch2_pij(3,4,482)=0 exch2_pij(4,4,482)=1 exch2_oi(4,482)=0 exch2_oj(4,482)=0 RETURN END SUBROUTINE W2_E2SETUP_483 C Topology for tile 483 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(483)=34 exch2_tNy(483)=51 exch2_tBasex(483)=68 exch2_tBasey(483)=102 exch2_txGlobalo(483)=1599 exch2_tyGlobalo(483)=103 exch2_isWedge(483)=0 exch2_isNedge(483)=0 exch2_isEedge(483)=0 exch2_isSedge(483)=0 exch2_myFace(483)=4 exch2_mydNx(483)=510 exch2_mydNy(483)=510 exch2_nNeighbours(483)=4 exch2_neighbourId(1,483)=498 exch2_iLo(1,483)=0 exch2_iHi(1,483)=35 exch2_jLo(1,483)=52 exch2_jHi(1,483)=52 exch2_opposingSend(1,483)=2 exch2_pij(1,1,483)=1 exch2_pij(2,1,483)=0 exch2_pij(3,1,483)=0 exch2_pij(4,1,483)=1 exch2_oi(1,483)=0 exch2_oj(1,483)=0 exch2_neighbourId(2,483)=468 exch2_iLo(2,483)=0 exch2_iHi(2,483)=35 exch2_jLo(2,483)=0 exch2_jHi(2,483)=0 exch2_opposingSend(2,483)=1 exch2_pij(1,2,483)=1 exch2_pij(2,2,483)=0 exch2_pij(3,2,483)=0 exch2_pij(4,2,483)=1 exch2_oi(2,483)=0 exch2_oj(2,483)=0 exch2_neighbourId(3,483)=484 exch2_iLo(3,483)=35 exch2_iHi(3,483)=35 exch2_jLo(3,483)=0 exch2_jHi(3,483)=52 exch2_opposingSend(3,483)=4 exch2_pij(1,3,483)=1 exch2_pij(2,3,483)=0 exch2_pij(3,3,483)=0 exch2_pij(4,3,483)=1 exch2_oi(3,483)=0 exch2_oj(3,483)=0 exch2_neighbourId(4,483)=482 exch2_iLo(4,483)=0 exch2_iHi(4,483)=0 exch2_jLo(4,483)=0 exch2_jHi(4,483)=52 exch2_opposingSend(4,483)=3 exch2_pij(1,4,483)=1 exch2_pij(2,4,483)=0 exch2_pij(3,4,483)=0 exch2_pij(4,4,483)=1 exch2_oi(4,483)=0 exch2_oj(4,483)=0 RETURN END SUBROUTINE W2_E2SETUP_484 C Topology for tile 484 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(484)=34 exch2_tNy(484)=51 exch2_tBasex(484)=102 exch2_tBasey(484)=102 exch2_txGlobalo(484)=1633 exch2_tyGlobalo(484)=103 exch2_isWedge(484)=0 exch2_isNedge(484)=0 exch2_isEedge(484)=0 exch2_isSedge(484)=0 exch2_myFace(484)=4 exch2_mydNx(484)=510 exch2_mydNy(484)=510 exch2_nNeighbours(484)=4 exch2_neighbourId(1,484)=499 exch2_iLo(1,484)=0 exch2_iHi(1,484)=35 exch2_jLo(1,484)=52 exch2_jHi(1,484)=52 exch2_opposingSend(1,484)=2 exch2_pij(1,1,484)=1 exch2_pij(2,1,484)=0 exch2_pij(3,1,484)=0 exch2_pij(4,1,484)=1 exch2_oi(1,484)=0 exch2_oj(1,484)=0 exch2_neighbourId(2,484)=469 exch2_iLo(2,484)=0 exch2_iHi(2,484)=35 exch2_jLo(2,484)=0 exch2_jHi(2,484)=0 exch2_opposingSend(2,484)=1 exch2_pij(1,2,484)=1 exch2_pij(2,2,484)=0 exch2_pij(3,2,484)=0 exch2_pij(4,2,484)=1 exch2_oi(2,484)=0 exch2_oj(2,484)=0 exch2_neighbourId(3,484)=485 exch2_iLo(3,484)=35 exch2_iHi(3,484)=35 exch2_jLo(3,484)=0 exch2_jHi(3,484)=52 exch2_opposingSend(3,484)=4 exch2_pij(1,3,484)=1 exch2_pij(2,3,484)=0 exch2_pij(3,3,484)=0 exch2_pij(4,3,484)=1 exch2_oi(3,484)=0 exch2_oj(3,484)=0 exch2_neighbourId(4,484)=483 exch2_iLo(4,484)=0 exch2_iHi(4,484)=0 exch2_jLo(4,484)=0 exch2_jHi(4,484)=52 exch2_opposingSend(4,484)=3 exch2_pij(1,4,484)=1 exch2_pij(2,4,484)=0 exch2_pij(3,4,484)=0 exch2_pij(4,4,484)=1 exch2_oi(4,484)=0 exch2_oj(4,484)=0 RETURN END SUBROUTINE W2_E2SETUP_485 C Topology for tile 485 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(485)=34 exch2_tNy(485)=51 exch2_tBasex(485)=136 exch2_tBasey(485)=102 exch2_txGlobalo(485)=1667 exch2_tyGlobalo(485)=103 exch2_isWedge(485)=0 exch2_isNedge(485)=0 exch2_isEedge(485)=0 exch2_isSedge(485)=0 exch2_myFace(485)=4 exch2_mydNx(485)=510 exch2_mydNy(485)=510 exch2_nNeighbours(485)=4 exch2_neighbourId(1,485)=500 exch2_iLo(1,485)=0 exch2_iHi(1,485)=35 exch2_jLo(1,485)=52 exch2_jHi(1,485)=52 exch2_opposingSend(1,485)=2 exch2_pij(1,1,485)=1 exch2_pij(2,1,485)=0 exch2_pij(3,1,485)=0 exch2_pij(4,1,485)=1 exch2_oi(1,485)=0 exch2_oj(1,485)=0 exch2_neighbourId(2,485)=470 exch2_iLo(2,485)=0 exch2_iHi(2,485)=35 exch2_jLo(2,485)=0 exch2_jHi(2,485)=0 exch2_opposingSend(2,485)=1 exch2_pij(1,2,485)=1 exch2_pij(2,2,485)=0 exch2_pij(3,2,485)=0 exch2_pij(4,2,485)=1 exch2_oi(2,485)=0 exch2_oj(2,485)=0 exch2_neighbourId(3,485)=486 exch2_iLo(3,485)=35 exch2_iHi(3,485)=35 exch2_jLo(3,485)=0 exch2_jHi(3,485)=52 exch2_opposingSend(3,485)=4 exch2_pij(1,3,485)=1 exch2_pij(2,3,485)=0 exch2_pij(3,3,485)=0 exch2_pij(4,3,485)=1 exch2_oi(3,485)=0 exch2_oj(3,485)=0 exch2_neighbourId(4,485)=484 exch2_iLo(4,485)=0 exch2_iHi(4,485)=0 exch2_jLo(4,485)=0 exch2_jHi(4,485)=52 exch2_opposingSend(4,485)=3 exch2_pij(1,4,485)=1 exch2_pij(2,4,485)=0 exch2_pij(3,4,485)=0 exch2_pij(4,4,485)=1 exch2_oi(4,485)=0 exch2_oj(4,485)=0 RETURN END SUBROUTINE W2_E2SETUP_486 C Topology for tile 486 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(486)=34 exch2_tNy(486)=51 exch2_tBasex(486)=170 exch2_tBasey(486)=102 exch2_txGlobalo(486)=1701 exch2_tyGlobalo(486)=103 exch2_isWedge(486)=0 exch2_isNedge(486)=0 exch2_isEedge(486)=0 exch2_isSedge(486)=0 exch2_myFace(486)=4 exch2_mydNx(486)=510 exch2_mydNy(486)=510 exch2_nNeighbours(486)=4 exch2_neighbourId(1,486)=501 exch2_iLo(1,486)=0 exch2_iHi(1,486)=35 exch2_jLo(1,486)=52 exch2_jHi(1,486)=52 exch2_opposingSend(1,486)=2 exch2_pij(1,1,486)=1 exch2_pij(2,1,486)=0 exch2_pij(3,1,486)=0 exch2_pij(4,1,486)=1 exch2_oi(1,486)=0 exch2_oj(1,486)=0 exch2_neighbourId(2,486)=471 exch2_iLo(2,486)=0 exch2_iHi(2,486)=35 exch2_jLo(2,486)=0 exch2_jHi(2,486)=0 exch2_opposingSend(2,486)=1 exch2_pij(1,2,486)=1 exch2_pij(2,2,486)=0 exch2_pij(3,2,486)=0 exch2_pij(4,2,486)=1 exch2_oi(2,486)=0 exch2_oj(2,486)=0 exch2_neighbourId(3,486)=487 exch2_iLo(3,486)=35 exch2_iHi(3,486)=35 exch2_jLo(3,486)=0 exch2_jHi(3,486)=52 exch2_opposingSend(3,486)=4 exch2_pij(1,3,486)=1 exch2_pij(2,3,486)=0 exch2_pij(3,3,486)=0 exch2_pij(4,3,486)=1 exch2_oi(3,486)=0 exch2_oj(3,486)=0 exch2_neighbourId(4,486)=485 exch2_iLo(4,486)=0 exch2_iHi(4,486)=0 exch2_jLo(4,486)=0 exch2_jHi(4,486)=52 exch2_opposingSend(4,486)=3 exch2_pij(1,4,486)=1 exch2_pij(2,4,486)=0 exch2_pij(3,4,486)=0 exch2_pij(4,4,486)=1 exch2_oi(4,486)=0 exch2_oj(4,486)=0 RETURN END SUBROUTINE W2_E2SETUP_487 C Topology for tile 487 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(487)=34 exch2_tNy(487)=51 exch2_tBasex(487)=204 exch2_tBasey(487)=102 exch2_txGlobalo(487)=1735 exch2_tyGlobalo(487)=103 exch2_isWedge(487)=0 exch2_isNedge(487)=0 exch2_isEedge(487)=0 exch2_isSedge(487)=0 exch2_myFace(487)=4 exch2_mydNx(487)=510 exch2_mydNy(487)=510 exch2_nNeighbours(487)=4 exch2_neighbourId(1,487)=502 exch2_iLo(1,487)=0 exch2_iHi(1,487)=35 exch2_jLo(1,487)=52 exch2_jHi(1,487)=52 exch2_opposingSend(1,487)=2 exch2_pij(1,1,487)=1 exch2_pij(2,1,487)=0 exch2_pij(3,1,487)=0 exch2_pij(4,1,487)=1 exch2_oi(1,487)=0 exch2_oj(1,487)=0 exch2_neighbourId(2,487)=472 exch2_iLo(2,487)=0 exch2_iHi(2,487)=35 exch2_jLo(2,487)=0 exch2_jHi(2,487)=0 exch2_opposingSend(2,487)=1 exch2_pij(1,2,487)=1 exch2_pij(2,2,487)=0 exch2_pij(3,2,487)=0 exch2_pij(4,2,487)=1 exch2_oi(2,487)=0 exch2_oj(2,487)=0 exch2_neighbourId(3,487)=488 exch2_iLo(3,487)=35 exch2_iHi(3,487)=35 exch2_jLo(3,487)=0 exch2_jHi(3,487)=52 exch2_opposingSend(3,487)=4 exch2_pij(1,3,487)=1 exch2_pij(2,3,487)=0 exch2_pij(3,3,487)=0 exch2_pij(4,3,487)=1 exch2_oi(3,487)=0 exch2_oj(3,487)=0 exch2_neighbourId(4,487)=486 exch2_iLo(4,487)=0 exch2_iHi(4,487)=0 exch2_jLo(4,487)=0 exch2_jHi(4,487)=52 exch2_opposingSend(4,487)=3 exch2_pij(1,4,487)=1 exch2_pij(2,4,487)=0 exch2_pij(3,4,487)=0 exch2_pij(4,4,487)=1 exch2_oi(4,487)=0 exch2_oj(4,487)=0 RETURN END SUBROUTINE W2_E2SETUP_488 C Topology for tile 488 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(488)=34 exch2_tNy(488)=51 exch2_tBasex(488)=238 exch2_tBasey(488)=102 exch2_txGlobalo(488)=1769 exch2_tyGlobalo(488)=103 exch2_isWedge(488)=0 exch2_isNedge(488)=0 exch2_isEedge(488)=0 exch2_isSedge(488)=0 exch2_myFace(488)=4 exch2_mydNx(488)=510 exch2_mydNy(488)=510 exch2_nNeighbours(488)=4 exch2_neighbourId(1,488)=503 exch2_iLo(1,488)=0 exch2_iHi(1,488)=35 exch2_jLo(1,488)=52 exch2_jHi(1,488)=52 exch2_opposingSend(1,488)=2 exch2_pij(1,1,488)=1 exch2_pij(2,1,488)=0 exch2_pij(3,1,488)=0 exch2_pij(4,1,488)=1 exch2_oi(1,488)=0 exch2_oj(1,488)=0 exch2_neighbourId(2,488)=473 exch2_iLo(2,488)=0 exch2_iHi(2,488)=35 exch2_jLo(2,488)=0 exch2_jHi(2,488)=0 exch2_opposingSend(2,488)=1 exch2_pij(1,2,488)=1 exch2_pij(2,2,488)=0 exch2_pij(3,2,488)=0 exch2_pij(4,2,488)=1 exch2_oi(2,488)=0 exch2_oj(2,488)=0 exch2_neighbourId(3,488)=489 exch2_iLo(3,488)=35 exch2_iHi(3,488)=35 exch2_jLo(3,488)=0 exch2_jHi(3,488)=52 exch2_opposingSend(3,488)=4 exch2_pij(1,3,488)=1 exch2_pij(2,3,488)=0 exch2_pij(3,3,488)=0 exch2_pij(4,3,488)=1 exch2_oi(3,488)=0 exch2_oj(3,488)=0 exch2_neighbourId(4,488)=487 exch2_iLo(4,488)=0 exch2_iHi(4,488)=0 exch2_jLo(4,488)=0 exch2_jHi(4,488)=52 exch2_opposingSend(4,488)=3 exch2_pij(1,4,488)=1 exch2_pij(2,4,488)=0 exch2_pij(3,4,488)=0 exch2_pij(4,4,488)=1 exch2_oi(4,488)=0 exch2_oj(4,488)=0 RETURN END SUBROUTINE W2_E2SETUP_489 C Topology for tile 489 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(489)=34 exch2_tNy(489)=51 exch2_tBasex(489)=272 exch2_tBasey(489)=102 exch2_txGlobalo(489)=1803 exch2_tyGlobalo(489)=103 exch2_isWedge(489)=0 exch2_isNedge(489)=0 exch2_isEedge(489)=0 exch2_isSedge(489)=0 exch2_myFace(489)=4 exch2_mydNx(489)=510 exch2_mydNy(489)=510 exch2_nNeighbours(489)=4 exch2_neighbourId(1,489)=504 exch2_iLo(1,489)=0 exch2_iHi(1,489)=35 exch2_jLo(1,489)=52 exch2_jHi(1,489)=52 exch2_opposingSend(1,489)=2 exch2_pij(1,1,489)=1 exch2_pij(2,1,489)=0 exch2_pij(3,1,489)=0 exch2_pij(4,1,489)=1 exch2_oi(1,489)=0 exch2_oj(1,489)=0 exch2_neighbourId(2,489)=474 exch2_iLo(2,489)=0 exch2_iHi(2,489)=35 exch2_jLo(2,489)=0 exch2_jHi(2,489)=0 exch2_opposingSend(2,489)=1 exch2_pij(1,2,489)=1 exch2_pij(2,2,489)=0 exch2_pij(3,2,489)=0 exch2_pij(4,2,489)=1 exch2_oi(2,489)=0 exch2_oj(2,489)=0 exch2_neighbourId(3,489)=490 exch2_iLo(3,489)=35 exch2_iHi(3,489)=35 exch2_jLo(3,489)=0 exch2_jHi(3,489)=52 exch2_opposingSend(3,489)=4 exch2_pij(1,3,489)=1 exch2_pij(2,3,489)=0 exch2_pij(3,3,489)=0 exch2_pij(4,3,489)=1 exch2_oi(3,489)=0 exch2_oj(3,489)=0 exch2_neighbourId(4,489)=488 exch2_iLo(4,489)=0 exch2_iHi(4,489)=0 exch2_jLo(4,489)=0 exch2_jHi(4,489)=52 exch2_opposingSend(4,489)=3 exch2_pij(1,4,489)=1 exch2_pij(2,4,489)=0 exch2_pij(3,4,489)=0 exch2_pij(4,4,489)=1 exch2_oi(4,489)=0 exch2_oj(4,489)=0 RETURN END SUBROUTINE W2_E2SETUP_490 C Topology for tile 490 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(490)=34 exch2_tNy(490)=51 exch2_tBasex(490)=306 exch2_tBasey(490)=102 exch2_txGlobalo(490)=1837 exch2_tyGlobalo(490)=103 exch2_isWedge(490)=0 exch2_isNedge(490)=0 exch2_isEedge(490)=0 exch2_isSedge(490)=0 exch2_myFace(490)=4 exch2_mydNx(490)=510 exch2_mydNy(490)=510 exch2_nNeighbours(490)=4 exch2_neighbourId(1,490)=505 exch2_iLo(1,490)=0 exch2_iHi(1,490)=35 exch2_jLo(1,490)=52 exch2_jHi(1,490)=52 exch2_opposingSend(1,490)=2 exch2_pij(1,1,490)=1 exch2_pij(2,1,490)=0 exch2_pij(3,1,490)=0 exch2_pij(4,1,490)=1 exch2_oi(1,490)=0 exch2_oj(1,490)=0 exch2_neighbourId(2,490)=475 exch2_iLo(2,490)=0 exch2_iHi(2,490)=35 exch2_jLo(2,490)=0 exch2_jHi(2,490)=0 exch2_opposingSend(2,490)=1 exch2_pij(1,2,490)=1 exch2_pij(2,2,490)=0 exch2_pij(3,2,490)=0 exch2_pij(4,2,490)=1 exch2_oi(2,490)=0 exch2_oj(2,490)=0 exch2_neighbourId(3,490)=491 exch2_iLo(3,490)=35 exch2_iHi(3,490)=35 exch2_jLo(3,490)=0 exch2_jHi(3,490)=52 exch2_opposingSend(3,490)=4 exch2_pij(1,3,490)=1 exch2_pij(2,3,490)=0 exch2_pij(3,3,490)=0 exch2_pij(4,3,490)=1 exch2_oi(3,490)=0 exch2_oj(3,490)=0 exch2_neighbourId(4,490)=489 exch2_iLo(4,490)=0 exch2_iHi(4,490)=0 exch2_jLo(4,490)=0 exch2_jHi(4,490)=52 exch2_opposingSend(4,490)=3 exch2_pij(1,4,490)=1 exch2_pij(2,4,490)=0 exch2_pij(3,4,490)=0 exch2_pij(4,4,490)=1 exch2_oi(4,490)=0 exch2_oj(4,490)=0 RETURN END SUBROUTINE W2_E2SETUP_491 C Topology for tile 491 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(491)=34 exch2_tNy(491)=51 exch2_tBasex(491)=340 exch2_tBasey(491)=102 exch2_txGlobalo(491)=1871 exch2_tyGlobalo(491)=103 exch2_isWedge(491)=0 exch2_isNedge(491)=0 exch2_isEedge(491)=0 exch2_isSedge(491)=0 exch2_myFace(491)=4 exch2_mydNx(491)=510 exch2_mydNy(491)=510 exch2_nNeighbours(491)=4 exch2_neighbourId(1,491)=506 exch2_iLo(1,491)=0 exch2_iHi(1,491)=35 exch2_jLo(1,491)=52 exch2_jHi(1,491)=52 exch2_opposingSend(1,491)=2 exch2_pij(1,1,491)=1 exch2_pij(2,1,491)=0 exch2_pij(3,1,491)=0 exch2_pij(4,1,491)=1 exch2_oi(1,491)=0 exch2_oj(1,491)=0 exch2_neighbourId(2,491)=476 exch2_iLo(2,491)=0 exch2_iHi(2,491)=35 exch2_jLo(2,491)=0 exch2_jHi(2,491)=0 exch2_opposingSend(2,491)=1 exch2_pij(1,2,491)=1 exch2_pij(2,2,491)=0 exch2_pij(3,2,491)=0 exch2_pij(4,2,491)=1 exch2_oi(2,491)=0 exch2_oj(2,491)=0 exch2_neighbourId(3,491)=492 exch2_iLo(3,491)=35 exch2_iHi(3,491)=35 exch2_jLo(3,491)=0 exch2_jHi(3,491)=52 exch2_opposingSend(3,491)=4 exch2_pij(1,3,491)=1 exch2_pij(2,3,491)=0 exch2_pij(3,3,491)=0 exch2_pij(4,3,491)=1 exch2_oi(3,491)=0 exch2_oj(3,491)=0 exch2_neighbourId(4,491)=490 exch2_iLo(4,491)=0 exch2_iHi(4,491)=0 exch2_jLo(4,491)=0 exch2_jHi(4,491)=52 exch2_opposingSend(4,491)=3 exch2_pij(1,4,491)=1 exch2_pij(2,4,491)=0 exch2_pij(3,4,491)=0 exch2_pij(4,4,491)=1 exch2_oi(4,491)=0 exch2_oj(4,491)=0 RETURN END SUBROUTINE W2_E2SETUP_492 C Topology for tile 492 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(492)=34 exch2_tNy(492)=51 exch2_tBasex(492)=374 exch2_tBasey(492)=102 exch2_txGlobalo(492)=1905 exch2_tyGlobalo(492)=103 exch2_isWedge(492)=0 exch2_isNedge(492)=0 exch2_isEedge(492)=0 exch2_isSedge(492)=0 exch2_myFace(492)=4 exch2_mydNx(492)=510 exch2_mydNy(492)=510 exch2_nNeighbours(492)=4 exch2_neighbourId(1,492)=507 exch2_iLo(1,492)=0 exch2_iHi(1,492)=35 exch2_jLo(1,492)=52 exch2_jHi(1,492)=52 exch2_opposingSend(1,492)=2 exch2_pij(1,1,492)=1 exch2_pij(2,1,492)=0 exch2_pij(3,1,492)=0 exch2_pij(4,1,492)=1 exch2_oi(1,492)=0 exch2_oj(1,492)=0 exch2_neighbourId(2,492)=477 exch2_iLo(2,492)=0 exch2_iHi(2,492)=35 exch2_jLo(2,492)=0 exch2_jHi(2,492)=0 exch2_opposingSend(2,492)=1 exch2_pij(1,2,492)=1 exch2_pij(2,2,492)=0 exch2_pij(3,2,492)=0 exch2_pij(4,2,492)=1 exch2_oi(2,492)=0 exch2_oj(2,492)=0 exch2_neighbourId(3,492)=493 exch2_iLo(3,492)=35 exch2_iHi(3,492)=35 exch2_jLo(3,492)=0 exch2_jHi(3,492)=52 exch2_opposingSend(3,492)=4 exch2_pij(1,3,492)=1 exch2_pij(2,3,492)=0 exch2_pij(3,3,492)=0 exch2_pij(4,3,492)=1 exch2_oi(3,492)=0 exch2_oj(3,492)=0 exch2_neighbourId(4,492)=491 exch2_iLo(4,492)=0 exch2_iHi(4,492)=0 exch2_jLo(4,492)=0 exch2_jHi(4,492)=52 exch2_opposingSend(4,492)=3 exch2_pij(1,4,492)=1 exch2_pij(2,4,492)=0 exch2_pij(3,4,492)=0 exch2_pij(4,4,492)=1 exch2_oi(4,492)=0 exch2_oj(4,492)=0 RETURN END SUBROUTINE W2_E2SETUP_493 C Topology for tile 493 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(493)=34 exch2_tNy(493)=51 exch2_tBasex(493)=408 exch2_tBasey(493)=102 exch2_txGlobalo(493)=1939 exch2_tyGlobalo(493)=103 exch2_isWedge(493)=0 exch2_isNedge(493)=0 exch2_isEedge(493)=0 exch2_isSedge(493)=0 exch2_myFace(493)=4 exch2_mydNx(493)=510 exch2_mydNy(493)=510 exch2_nNeighbours(493)=4 exch2_neighbourId(1,493)=508 exch2_iLo(1,493)=0 exch2_iHi(1,493)=35 exch2_jLo(1,493)=52 exch2_jHi(1,493)=52 exch2_opposingSend(1,493)=2 exch2_pij(1,1,493)=1 exch2_pij(2,1,493)=0 exch2_pij(3,1,493)=0 exch2_pij(4,1,493)=1 exch2_oi(1,493)=0 exch2_oj(1,493)=0 exch2_neighbourId(2,493)=478 exch2_iLo(2,493)=0 exch2_iHi(2,493)=35 exch2_jLo(2,493)=0 exch2_jHi(2,493)=0 exch2_opposingSend(2,493)=1 exch2_pij(1,2,493)=1 exch2_pij(2,2,493)=0 exch2_pij(3,2,493)=0 exch2_pij(4,2,493)=1 exch2_oi(2,493)=0 exch2_oj(2,493)=0 exch2_neighbourId(3,493)=494 exch2_iLo(3,493)=35 exch2_iHi(3,493)=35 exch2_jLo(3,493)=0 exch2_jHi(3,493)=52 exch2_opposingSend(3,493)=4 exch2_pij(1,3,493)=1 exch2_pij(2,3,493)=0 exch2_pij(3,3,493)=0 exch2_pij(4,3,493)=1 exch2_oi(3,493)=0 exch2_oj(3,493)=0 exch2_neighbourId(4,493)=492 exch2_iLo(4,493)=0 exch2_iHi(4,493)=0 exch2_jLo(4,493)=0 exch2_jHi(4,493)=52 exch2_opposingSend(4,493)=3 exch2_pij(1,4,493)=1 exch2_pij(2,4,493)=0 exch2_pij(3,4,493)=0 exch2_pij(4,4,493)=1 exch2_oi(4,493)=0 exch2_oj(4,493)=0 RETURN END SUBROUTINE W2_E2SETUP_494 C Topology for tile 494 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(494)=34 exch2_tNy(494)=51 exch2_tBasex(494)=442 exch2_tBasey(494)=102 exch2_txGlobalo(494)=1973 exch2_tyGlobalo(494)=103 exch2_isWedge(494)=0 exch2_isNedge(494)=0 exch2_isEedge(494)=0 exch2_isSedge(494)=0 exch2_myFace(494)=4 exch2_mydNx(494)=510 exch2_mydNy(494)=510 exch2_nNeighbours(494)=4 exch2_neighbourId(1,494)=509 exch2_iLo(1,494)=0 exch2_iHi(1,494)=35 exch2_jLo(1,494)=52 exch2_jHi(1,494)=52 exch2_opposingSend(1,494)=2 exch2_pij(1,1,494)=1 exch2_pij(2,1,494)=0 exch2_pij(3,1,494)=0 exch2_pij(4,1,494)=1 exch2_oi(1,494)=0 exch2_oj(1,494)=0 exch2_neighbourId(2,494)=479 exch2_iLo(2,494)=0 exch2_iHi(2,494)=35 exch2_jLo(2,494)=0 exch2_jHi(2,494)=0 exch2_opposingSend(2,494)=1 exch2_pij(1,2,494)=1 exch2_pij(2,2,494)=0 exch2_pij(3,2,494)=0 exch2_pij(4,2,494)=1 exch2_oi(2,494)=0 exch2_oj(2,494)=0 exch2_neighbourId(3,494)=495 exch2_iLo(3,494)=35 exch2_iHi(3,494)=35 exch2_jLo(3,494)=0 exch2_jHi(3,494)=52 exch2_opposingSend(3,494)=5 exch2_pij(1,3,494)=1 exch2_pij(2,3,494)=0 exch2_pij(3,3,494)=0 exch2_pij(4,3,494)=1 exch2_oi(3,494)=0 exch2_oj(3,494)=0 exch2_neighbourId(4,494)=493 exch2_iLo(4,494)=0 exch2_iHi(4,494)=0 exch2_jLo(4,494)=0 exch2_jHi(4,494)=52 exch2_opposingSend(4,494)=3 exch2_pij(1,4,494)=1 exch2_pij(2,4,494)=0 exch2_pij(3,4,494)=0 exch2_pij(4,4,494)=1 exch2_oi(4,494)=0 exch2_oj(4,494)=0 RETURN END SUBROUTINE W2_E2SETUP_495 C Topology for tile 495 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(495)=34 exch2_tNy(495)=51 exch2_tBasex(495)=476 exch2_tBasey(495)=102 exch2_txGlobalo(495)=2007 exch2_tyGlobalo(495)=103 exch2_isWedge(495)=0 exch2_isNedge(495)=0 exch2_isEedge(495)=1 exch2_isSedge(495)=0 exch2_myFace(495)=4 exch2_mydNx(495)=510 exch2_mydNy(495)=510 exch2_nNeighbours(495)=5 exch2_neighbourId(1,495)=510 exch2_iLo(1,495)=0 exch2_iHi(1,495)=35 exch2_jLo(1,495)=52 exch2_jHi(1,495)=52 exch2_opposingSend(1,495)=2 exch2_pij(1,1,495)=1 exch2_pij(2,1,495)=0 exch2_pij(3,1,495)=0 exch2_pij(4,1,495)=1 exch2_oi(1,495)=0 exch2_oj(1,495)=0 exch2_neighbourId(2,495)=480 exch2_iLo(2,495)=0 exch2_iHi(2,495)=35 exch2_jLo(2,495)=0 exch2_jHi(2,495)=0 exch2_opposingSend(2,495)=1 exch2_pij(1,2,495)=1 exch2_pij(2,2,495)=0 exch2_pij(3,2,495)=0 exch2_pij(4,2,495)=1 exch2_oi(2,495)=0 exch2_oj(2,495)=0 exch2_neighbourId(3,495)=761 exch2_iLo(3,495)=35 exch2_iHi(3,495)=35 exch2_jLo(3,495)=34 exch2_jHi(3,495)=52 exch2_opposingSend(3,495)=2 exch2_pij(1,3,495)=0 exch2_pij(2,3,495)=1 exch2_pij(3,3,495)=-1 exch2_pij(4,3,495)=0 exch2_oi(3,495)=510 exch2_oj(3,495)=511 exch2_neighbourId(4,495)=762 exch2_iLo(4,495)=35 exch2_iHi(4,495)=35 exch2_jLo(4,495)=0 exch2_jHi(4,495)=35 exch2_opposingSend(4,495)=2 exch2_pij(1,4,495)=0 exch2_pij(2,4,495)=1 exch2_pij(3,4,495)=-1 exch2_pij(4,4,495)=0 exch2_oi(4,495)=510 exch2_oj(4,495)=511 exch2_neighbourId(5,495)=494 exch2_iLo(5,495)=0 exch2_iHi(5,495)=0 exch2_jLo(5,495)=0 exch2_jHi(5,495)=52 exch2_opposingSend(5,495)=3 exch2_pij(1,5,495)=1 exch2_pij(2,5,495)=0 exch2_pij(3,5,495)=0 exch2_pij(4,5,495)=1 exch2_oi(5,495)=0 exch2_oj(5,495)=0 RETURN END SUBROUTINE W2_E2SETUP_496 C Topology for tile 496 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(496)=34 exch2_tNy(496)=51 exch2_tBasex(496)=0 exch2_tBasey(496)=153 exch2_txGlobalo(496)=1531 exch2_tyGlobalo(496)=154 exch2_isWedge(496)=1 exch2_isNedge(496)=0 exch2_isEedge(496)=0 exch2_isSedge(496)=0 exch2_myFace(496)=4 exch2_mydNx(496)=510 exch2_mydNy(496)=510 exch2_nNeighbours(496)=4 exch2_neighbourId(1,496)=511 exch2_iLo(1,496)=0 exch2_iHi(1,496)=35 exch2_jLo(1,496)=52 exch2_jHi(1,496)=52 exch2_opposingSend(1,496)=2 exch2_pij(1,1,496)=1 exch2_pij(2,1,496)=0 exch2_pij(3,1,496)=0 exch2_pij(4,1,496)=1 exch2_oi(1,496)=0 exch2_oj(1,496)=0 exch2_neighbourId(2,496)=481 exch2_iLo(2,496)=0 exch2_iHi(2,496)=35 exch2_jLo(2,496)=0 exch2_jHi(2,496)=0 exch2_opposingSend(2,496)=1 exch2_pij(1,2,496)=1 exch2_pij(2,2,496)=0 exch2_pij(3,2,496)=0 exch2_pij(4,2,496)=1 exch2_oi(2,496)=0 exch2_oj(2,496)=0 exch2_neighbourId(3,496)=497 exch2_iLo(3,496)=35 exch2_iHi(3,496)=35 exch2_jLo(3,496)=0 exch2_jHi(3,496)=52 exch2_opposingSend(3,496)=4 exch2_pij(1,3,496)=1 exch2_pij(2,3,496)=0 exch2_pij(3,3,496)=0 exch2_pij(4,3,496)=1 exch2_oi(3,496)=0 exch2_oj(3,496)=0 exch2_neighbourId(4,496)=360 exch2_iLo(4,496)=0 exch2_iHi(4,496)=0 exch2_jLo(4,496)=0 exch2_jHi(4,496)=52 exch2_opposingSend(4,496)=3 exch2_pij(1,4,496)=1 exch2_pij(2,4,496)=0 exch2_pij(3,4,496)=0 exch2_pij(4,4,496)=1 exch2_oi(4,496)=-510 exch2_oj(4,496)=0 RETURN END SUBROUTINE W2_E2SETUP_497 C Topology for tile 497 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(497)=34 exch2_tNy(497)=51 exch2_tBasex(497)=34 exch2_tBasey(497)=153 exch2_txGlobalo(497)=1565 exch2_tyGlobalo(497)=154 exch2_isWedge(497)=0 exch2_isNedge(497)=0 exch2_isEedge(497)=0 exch2_isSedge(497)=0 exch2_myFace(497)=4 exch2_mydNx(497)=510 exch2_mydNy(497)=510 exch2_nNeighbours(497)=4 exch2_neighbourId(1,497)=512 exch2_iLo(1,497)=0 exch2_iHi(1,497)=35 exch2_jLo(1,497)=52 exch2_jHi(1,497)=52 exch2_opposingSend(1,497)=2 exch2_pij(1,1,497)=1 exch2_pij(2,1,497)=0 exch2_pij(3,1,497)=0 exch2_pij(4,1,497)=1 exch2_oi(1,497)=0 exch2_oj(1,497)=0 exch2_neighbourId(2,497)=482 exch2_iLo(2,497)=0 exch2_iHi(2,497)=35 exch2_jLo(2,497)=0 exch2_jHi(2,497)=0 exch2_opposingSend(2,497)=1 exch2_pij(1,2,497)=1 exch2_pij(2,2,497)=0 exch2_pij(3,2,497)=0 exch2_pij(4,2,497)=1 exch2_oi(2,497)=0 exch2_oj(2,497)=0 exch2_neighbourId(3,497)=498 exch2_iLo(3,497)=35 exch2_iHi(3,497)=35 exch2_jLo(3,497)=0 exch2_jHi(3,497)=52 exch2_opposingSend(3,497)=4 exch2_pij(1,3,497)=1 exch2_pij(2,3,497)=0 exch2_pij(3,3,497)=0 exch2_pij(4,3,497)=1 exch2_oi(3,497)=0 exch2_oj(3,497)=0 exch2_neighbourId(4,497)=496 exch2_iLo(4,497)=0 exch2_iHi(4,497)=0 exch2_jLo(4,497)=0 exch2_jHi(4,497)=52 exch2_opposingSend(4,497)=3 exch2_pij(1,4,497)=1 exch2_pij(2,4,497)=0 exch2_pij(3,4,497)=0 exch2_pij(4,4,497)=1 exch2_oi(4,497)=0 exch2_oj(4,497)=0 RETURN END SUBROUTINE W2_E2SETUP_498 C Topology for tile 498 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(498)=34 exch2_tNy(498)=51 exch2_tBasex(498)=68 exch2_tBasey(498)=153 exch2_txGlobalo(498)=1599 exch2_tyGlobalo(498)=154 exch2_isWedge(498)=0 exch2_isNedge(498)=0 exch2_isEedge(498)=0 exch2_isSedge(498)=0 exch2_myFace(498)=4 exch2_mydNx(498)=510 exch2_mydNy(498)=510 exch2_nNeighbours(498)=4 exch2_neighbourId(1,498)=513 exch2_iLo(1,498)=0 exch2_iHi(1,498)=35 exch2_jLo(1,498)=52 exch2_jHi(1,498)=52 exch2_opposingSend(1,498)=2 exch2_pij(1,1,498)=1 exch2_pij(2,1,498)=0 exch2_pij(3,1,498)=0 exch2_pij(4,1,498)=1 exch2_oi(1,498)=0 exch2_oj(1,498)=0 exch2_neighbourId(2,498)=483 exch2_iLo(2,498)=0 exch2_iHi(2,498)=35 exch2_jLo(2,498)=0 exch2_jHi(2,498)=0 exch2_opposingSend(2,498)=1 exch2_pij(1,2,498)=1 exch2_pij(2,2,498)=0 exch2_pij(3,2,498)=0 exch2_pij(4,2,498)=1 exch2_oi(2,498)=0 exch2_oj(2,498)=0 exch2_neighbourId(3,498)=499 exch2_iLo(3,498)=35 exch2_iHi(3,498)=35 exch2_jLo(3,498)=0 exch2_jHi(3,498)=52 exch2_opposingSend(3,498)=4 exch2_pij(1,3,498)=1 exch2_pij(2,3,498)=0 exch2_pij(3,3,498)=0 exch2_pij(4,3,498)=1 exch2_oi(3,498)=0 exch2_oj(3,498)=0 exch2_neighbourId(4,498)=497 exch2_iLo(4,498)=0 exch2_iHi(4,498)=0 exch2_jLo(4,498)=0 exch2_jHi(4,498)=52 exch2_opposingSend(4,498)=3 exch2_pij(1,4,498)=1 exch2_pij(2,4,498)=0 exch2_pij(3,4,498)=0 exch2_pij(4,4,498)=1 exch2_oi(4,498)=0 exch2_oj(4,498)=0 RETURN END SUBROUTINE W2_E2SETUP_499 C Topology for tile 499 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(499)=34 exch2_tNy(499)=51 exch2_tBasex(499)=102 exch2_tBasey(499)=153 exch2_txGlobalo(499)=1633 exch2_tyGlobalo(499)=154 exch2_isWedge(499)=0 exch2_isNedge(499)=0 exch2_isEedge(499)=0 exch2_isSedge(499)=0 exch2_myFace(499)=4 exch2_mydNx(499)=510 exch2_mydNy(499)=510 exch2_nNeighbours(499)=4 exch2_neighbourId(1,499)=514 exch2_iLo(1,499)=0 exch2_iHi(1,499)=35 exch2_jLo(1,499)=52 exch2_jHi(1,499)=52 exch2_opposingSend(1,499)=2 exch2_pij(1,1,499)=1 exch2_pij(2,1,499)=0 exch2_pij(3,1,499)=0 exch2_pij(4,1,499)=1 exch2_oi(1,499)=0 exch2_oj(1,499)=0 exch2_neighbourId(2,499)=484 exch2_iLo(2,499)=0 exch2_iHi(2,499)=35 exch2_jLo(2,499)=0 exch2_jHi(2,499)=0 exch2_opposingSend(2,499)=1 exch2_pij(1,2,499)=1 exch2_pij(2,2,499)=0 exch2_pij(3,2,499)=0 exch2_pij(4,2,499)=1 exch2_oi(2,499)=0 exch2_oj(2,499)=0 exch2_neighbourId(3,499)=500 exch2_iLo(3,499)=35 exch2_iHi(3,499)=35 exch2_jLo(3,499)=0 exch2_jHi(3,499)=52 exch2_opposingSend(3,499)=4 exch2_pij(1,3,499)=1 exch2_pij(2,3,499)=0 exch2_pij(3,3,499)=0 exch2_pij(4,3,499)=1 exch2_oi(3,499)=0 exch2_oj(3,499)=0 exch2_neighbourId(4,499)=498 exch2_iLo(4,499)=0 exch2_iHi(4,499)=0 exch2_jLo(4,499)=0 exch2_jHi(4,499)=52 exch2_opposingSend(4,499)=3 exch2_pij(1,4,499)=1 exch2_pij(2,4,499)=0 exch2_pij(3,4,499)=0 exch2_pij(4,4,499)=1 exch2_oi(4,499)=0 exch2_oj(4,499)=0 RETURN END SUBROUTINE W2_E2SETUP_500 C Topology for tile 500 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(500)=34 exch2_tNy(500)=51 exch2_tBasex(500)=136 exch2_tBasey(500)=153 exch2_txGlobalo(500)=1667 exch2_tyGlobalo(500)=154 exch2_isWedge(500)=0 exch2_isNedge(500)=0 exch2_isEedge(500)=0 exch2_isSedge(500)=0 exch2_myFace(500)=4 exch2_mydNx(500)=510 exch2_mydNy(500)=510 exch2_nNeighbours(500)=4 exch2_neighbourId(1,500)=515 exch2_iLo(1,500)=0 exch2_iHi(1,500)=35 exch2_jLo(1,500)=52 exch2_jHi(1,500)=52 exch2_opposingSend(1,500)=2 exch2_pij(1,1,500)=1 exch2_pij(2,1,500)=0 exch2_pij(3,1,500)=0 exch2_pij(4,1,500)=1 exch2_oi(1,500)=0 exch2_oj(1,500)=0 exch2_neighbourId(2,500)=485 exch2_iLo(2,500)=0 exch2_iHi(2,500)=35 exch2_jLo(2,500)=0 exch2_jHi(2,500)=0 exch2_opposingSend(2,500)=1 exch2_pij(1,2,500)=1 exch2_pij(2,2,500)=0 exch2_pij(3,2,500)=0 exch2_pij(4,2,500)=1 exch2_oi(2,500)=0 exch2_oj(2,500)=0 exch2_neighbourId(3,500)=501 exch2_iLo(3,500)=35 exch2_iHi(3,500)=35 exch2_jLo(3,500)=0 exch2_jHi(3,500)=52 exch2_opposingSend(3,500)=4 exch2_pij(1,3,500)=1 exch2_pij(2,3,500)=0 exch2_pij(3,3,500)=0 exch2_pij(4,3,500)=1 exch2_oi(3,500)=0 exch2_oj(3,500)=0 exch2_neighbourId(4,500)=499 exch2_iLo(4,500)=0 exch2_iHi(4,500)=0 exch2_jLo(4,500)=0 exch2_jHi(4,500)=52 exch2_opposingSend(4,500)=3 exch2_pij(1,4,500)=1 exch2_pij(2,4,500)=0 exch2_pij(3,4,500)=0 exch2_pij(4,4,500)=1 exch2_oi(4,500)=0 exch2_oj(4,500)=0 RETURN END SUBROUTINE W2_E2SETUP_501 C Topology for tile 501 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(501)=34 exch2_tNy(501)=51 exch2_tBasex(501)=170 exch2_tBasey(501)=153 exch2_txGlobalo(501)=1701 exch2_tyGlobalo(501)=154 exch2_isWedge(501)=0 exch2_isNedge(501)=0 exch2_isEedge(501)=0 exch2_isSedge(501)=0 exch2_myFace(501)=4 exch2_mydNx(501)=510 exch2_mydNy(501)=510 exch2_nNeighbours(501)=4 exch2_neighbourId(1,501)=516 exch2_iLo(1,501)=0 exch2_iHi(1,501)=35 exch2_jLo(1,501)=52 exch2_jHi(1,501)=52 exch2_opposingSend(1,501)=2 exch2_pij(1,1,501)=1 exch2_pij(2,1,501)=0 exch2_pij(3,1,501)=0 exch2_pij(4,1,501)=1 exch2_oi(1,501)=0 exch2_oj(1,501)=0 exch2_neighbourId(2,501)=486 exch2_iLo(2,501)=0 exch2_iHi(2,501)=35 exch2_jLo(2,501)=0 exch2_jHi(2,501)=0 exch2_opposingSend(2,501)=1 exch2_pij(1,2,501)=1 exch2_pij(2,2,501)=0 exch2_pij(3,2,501)=0 exch2_pij(4,2,501)=1 exch2_oi(2,501)=0 exch2_oj(2,501)=0 exch2_neighbourId(3,501)=502 exch2_iLo(3,501)=35 exch2_iHi(3,501)=35 exch2_jLo(3,501)=0 exch2_jHi(3,501)=52 exch2_opposingSend(3,501)=4 exch2_pij(1,3,501)=1 exch2_pij(2,3,501)=0 exch2_pij(3,3,501)=0 exch2_pij(4,3,501)=1 exch2_oi(3,501)=0 exch2_oj(3,501)=0 exch2_neighbourId(4,501)=500 exch2_iLo(4,501)=0 exch2_iHi(4,501)=0 exch2_jLo(4,501)=0 exch2_jHi(4,501)=52 exch2_opposingSend(4,501)=3 exch2_pij(1,4,501)=1 exch2_pij(2,4,501)=0 exch2_pij(3,4,501)=0 exch2_pij(4,4,501)=1 exch2_oi(4,501)=0 exch2_oj(4,501)=0 RETURN END SUBROUTINE W2_E2SETUP_502 C Topology for tile 502 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(502)=34 exch2_tNy(502)=51 exch2_tBasex(502)=204 exch2_tBasey(502)=153 exch2_txGlobalo(502)=1735 exch2_tyGlobalo(502)=154 exch2_isWedge(502)=0 exch2_isNedge(502)=0 exch2_isEedge(502)=0 exch2_isSedge(502)=0 exch2_myFace(502)=4 exch2_mydNx(502)=510 exch2_mydNy(502)=510 exch2_nNeighbours(502)=4 exch2_neighbourId(1,502)=517 exch2_iLo(1,502)=0 exch2_iHi(1,502)=35 exch2_jLo(1,502)=52 exch2_jHi(1,502)=52 exch2_opposingSend(1,502)=2 exch2_pij(1,1,502)=1 exch2_pij(2,1,502)=0 exch2_pij(3,1,502)=0 exch2_pij(4,1,502)=1 exch2_oi(1,502)=0 exch2_oj(1,502)=0 exch2_neighbourId(2,502)=487 exch2_iLo(2,502)=0 exch2_iHi(2,502)=35 exch2_jLo(2,502)=0 exch2_jHi(2,502)=0 exch2_opposingSend(2,502)=1 exch2_pij(1,2,502)=1 exch2_pij(2,2,502)=0 exch2_pij(3,2,502)=0 exch2_pij(4,2,502)=1 exch2_oi(2,502)=0 exch2_oj(2,502)=0 exch2_neighbourId(3,502)=503 exch2_iLo(3,502)=35 exch2_iHi(3,502)=35 exch2_jLo(3,502)=0 exch2_jHi(3,502)=52 exch2_opposingSend(3,502)=4 exch2_pij(1,3,502)=1 exch2_pij(2,3,502)=0 exch2_pij(3,3,502)=0 exch2_pij(4,3,502)=1 exch2_oi(3,502)=0 exch2_oj(3,502)=0 exch2_neighbourId(4,502)=501 exch2_iLo(4,502)=0 exch2_iHi(4,502)=0 exch2_jLo(4,502)=0 exch2_jHi(4,502)=52 exch2_opposingSend(4,502)=3 exch2_pij(1,4,502)=1 exch2_pij(2,4,502)=0 exch2_pij(3,4,502)=0 exch2_pij(4,4,502)=1 exch2_oi(4,502)=0 exch2_oj(4,502)=0 RETURN END SUBROUTINE W2_E2SETUP_503 C Topology for tile 503 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(503)=34 exch2_tNy(503)=51 exch2_tBasex(503)=238 exch2_tBasey(503)=153 exch2_txGlobalo(503)=1769 exch2_tyGlobalo(503)=154 exch2_isWedge(503)=0 exch2_isNedge(503)=0 exch2_isEedge(503)=0 exch2_isSedge(503)=0 exch2_myFace(503)=4 exch2_mydNx(503)=510 exch2_mydNy(503)=510 exch2_nNeighbours(503)=4 exch2_neighbourId(1,503)=518 exch2_iLo(1,503)=0 exch2_iHi(1,503)=35 exch2_jLo(1,503)=52 exch2_jHi(1,503)=52 exch2_opposingSend(1,503)=2 exch2_pij(1,1,503)=1 exch2_pij(2,1,503)=0 exch2_pij(3,1,503)=0 exch2_pij(4,1,503)=1 exch2_oi(1,503)=0 exch2_oj(1,503)=0 exch2_neighbourId(2,503)=488 exch2_iLo(2,503)=0 exch2_iHi(2,503)=35 exch2_jLo(2,503)=0 exch2_jHi(2,503)=0 exch2_opposingSend(2,503)=1 exch2_pij(1,2,503)=1 exch2_pij(2,2,503)=0 exch2_pij(3,2,503)=0 exch2_pij(4,2,503)=1 exch2_oi(2,503)=0 exch2_oj(2,503)=0 exch2_neighbourId(3,503)=504 exch2_iLo(3,503)=35 exch2_iHi(3,503)=35 exch2_jLo(3,503)=0 exch2_jHi(3,503)=52 exch2_opposingSend(3,503)=4 exch2_pij(1,3,503)=1 exch2_pij(2,3,503)=0 exch2_pij(3,3,503)=0 exch2_pij(4,3,503)=1 exch2_oi(3,503)=0 exch2_oj(3,503)=0 exch2_neighbourId(4,503)=502 exch2_iLo(4,503)=0 exch2_iHi(4,503)=0 exch2_jLo(4,503)=0 exch2_jHi(4,503)=52 exch2_opposingSend(4,503)=3 exch2_pij(1,4,503)=1 exch2_pij(2,4,503)=0 exch2_pij(3,4,503)=0 exch2_pij(4,4,503)=1 exch2_oi(4,503)=0 exch2_oj(4,503)=0 RETURN END SUBROUTINE W2_E2SETUP_504 C Topology for tile 504 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(504)=34 exch2_tNy(504)=51 exch2_tBasex(504)=272 exch2_tBasey(504)=153 exch2_txGlobalo(504)=1803 exch2_tyGlobalo(504)=154 exch2_isWedge(504)=0 exch2_isNedge(504)=0 exch2_isEedge(504)=0 exch2_isSedge(504)=0 exch2_myFace(504)=4 exch2_mydNx(504)=510 exch2_mydNy(504)=510 exch2_nNeighbours(504)=4 exch2_neighbourId(1,504)=519 exch2_iLo(1,504)=0 exch2_iHi(1,504)=35 exch2_jLo(1,504)=52 exch2_jHi(1,504)=52 exch2_opposingSend(1,504)=2 exch2_pij(1,1,504)=1 exch2_pij(2,1,504)=0 exch2_pij(3,1,504)=0 exch2_pij(4,1,504)=1 exch2_oi(1,504)=0 exch2_oj(1,504)=0 exch2_neighbourId(2,504)=489 exch2_iLo(2,504)=0 exch2_iHi(2,504)=35 exch2_jLo(2,504)=0 exch2_jHi(2,504)=0 exch2_opposingSend(2,504)=1 exch2_pij(1,2,504)=1 exch2_pij(2,2,504)=0 exch2_pij(3,2,504)=0 exch2_pij(4,2,504)=1 exch2_oi(2,504)=0 exch2_oj(2,504)=0 exch2_neighbourId(3,504)=505 exch2_iLo(3,504)=35 exch2_iHi(3,504)=35 exch2_jLo(3,504)=0 exch2_jHi(3,504)=52 exch2_opposingSend(3,504)=4 exch2_pij(1,3,504)=1 exch2_pij(2,3,504)=0 exch2_pij(3,3,504)=0 exch2_pij(4,3,504)=1 exch2_oi(3,504)=0 exch2_oj(3,504)=0 exch2_neighbourId(4,504)=503 exch2_iLo(4,504)=0 exch2_iHi(4,504)=0 exch2_jLo(4,504)=0 exch2_jHi(4,504)=52 exch2_opposingSend(4,504)=3 exch2_pij(1,4,504)=1 exch2_pij(2,4,504)=0 exch2_pij(3,4,504)=0 exch2_pij(4,4,504)=1 exch2_oi(4,504)=0 exch2_oj(4,504)=0 RETURN END SUBROUTINE W2_E2SETUP_505 C Topology for tile 505 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(505)=34 exch2_tNy(505)=51 exch2_tBasex(505)=306 exch2_tBasey(505)=153 exch2_txGlobalo(505)=1837 exch2_tyGlobalo(505)=154 exch2_isWedge(505)=0 exch2_isNedge(505)=0 exch2_isEedge(505)=0 exch2_isSedge(505)=0 exch2_myFace(505)=4 exch2_mydNx(505)=510 exch2_mydNy(505)=510 exch2_nNeighbours(505)=4 exch2_neighbourId(1,505)=520 exch2_iLo(1,505)=0 exch2_iHi(1,505)=35 exch2_jLo(1,505)=52 exch2_jHi(1,505)=52 exch2_opposingSend(1,505)=2 exch2_pij(1,1,505)=1 exch2_pij(2,1,505)=0 exch2_pij(3,1,505)=0 exch2_pij(4,1,505)=1 exch2_oi(1,505)=0 exch2_oj(1,505)=0 exch2_neighbourId(2,505)=490 exch2_iLo(2,505)=0 exch2_iHi(2,505)=35 exch2_jLo(2,505)=0 exch2_jHi(2,505)=0 exch2_opposingSend(2,505)=1 exch2_pij(1,2,505)=1 exch2_pij(2,2,505)=0 exch2_pij(3,2,505)=0 exch2_pij(4,2,505)=1 exch2_oi(2,505)=0 exch2_oj(2,505)=0 exch2_neighbourId(3,505)=506 exch2_iLo(3,505)=35 exch2_iHi(3,505)=35 exch2_jLo(3,505)=0 exch2_jHi(3,505)=52 exch2_opposingSend(3,505)=4 exch2_pij(1,3,505)=1 exch2_pij(2,3,505)=0 exch2_pij(3,3,505)=0 exch2_pij(4,3,505)=1 exch2_oi(3,505)=0 exch2_oj(3,505)=0 exch2_neighbourId(4,505)=504 exch2_iLo(4,505)=0 exch2_iHi(4,505)=0 exch2_jLo(4,505)=0 exch2_jHi(4,505)=52 exch2_opposingSend(4,505)=3 exch2_pij(1,4,505)=1 exch2_pij(2,4,505)=0 exch2_pij(3,4,505)=0 exch2_pij(4,4,505)=1 exch2_oi(4,505)=0 exch2_oj(4,505)=0 RETURN END SUBROUTINE W2_E2SETUP_506 C Topology for tile 506 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(506)=34 exch2_tNy(506)=51 exch2_tBasex(506)=340 exch2_tBasey(506)=153 exch2_txGlobalo(506)=1871 exch2_tyGlobalo(506)=154 exch2_isWedge(506)=0 exch2_isNedge(506)=0 exch2_isEedge(506)=0 exch2_isSedge(506)=0 exch2_myFace(506)=4 exch2_mydNx(506)=510 exch2_mydNy(506)=510 exch2_nNeighbours(506)=4 exch2_neighbourId(1,506)=521 exch2_iLo(1,506)=0 exch2_iHi(1,506)=35 exch2_jLo(1,506)=52 exch2_jHi(1,506)=52 exch2_opposingSend(1,506)=2 exch2_pij(1,1,506)=1 exch2_pij(2,1,506)=0 exch2_pij(3,1,506)=0 exch2_pij(4,1,506)=1 exch2_oi(1,506)=0 exch2_oj(1,506)=0 exch2_neighbourId(2,506)=491 exch2_iLo(2,506)=0 exch2_iHi(2,506)=35 exch2_jLo(2,506)=0 exch2_jHi(2,506)=0 exch2_opposingSend(2,506)=1 exch2_pij(1,2,506)=1 exch2_pij(2,2,506)=0 exch2_pij(3,2,506)=0 exch2_pij(4,2,506)=1 exch2_oi(2,506)=0 exch2_oj(2,506)=0 exch2_neighbourId(3,506)=507 exch2_iLo(3,506)=35 exch2_iHi(3,506)=35 exch2_jLo(3,506)=0 exch2_jHi(3,506)=52 exch2_opposingSend(3,506)=4 exch2_pij(1,3,506)=1 exch2_pij(2,3,506)=0 exch2_pij(3,3,506)=0 exch2_pij(4,3,506)=1 exch2_oi(3,506)=0 exch2_oj(3,506)=0 exch2_neighbourId(4,506)=505 exch2_iLo(4,506)=0 exch2_iHi(4,506)=0 exch2_jLo(4,506)=0 exch2_jHi(4,506)=52 exch2_opposingSend(4,506)=3 exch2_pij(1,4,506)=1 exch2_pij(2,4,506)=0 exch2_pij(3,4,506)=0 exch2_pij(4,4,506)=1 exch2_oi(4,506)=0 exch2_oj(4,506)=0 RETURN END SUBROUTINE W2_E2SETUP_507 C Topology for tile 507 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(507)=34 exch2_tNy(507)=51 exch2_tBasex(507)=374 exch2_tBasey(507)=153 exch2_txGlobalo(507)=1905 exch2_tyGlobalo(507)=154 exch2_isWedge(507)=0 exch2_isNedge(507)=0 exch2_isEedge(507)=0 exch2_isSedge(507)=0 exch2_myFace(507)=4 exch2_mydNx(507)=510 exch2_mydNy(507)=510 exch2_nNeighbours(507)=4 exch2_neighbourId(1,507)=522 exch2_iLo(1,507)=0 exch2_iHi(1,507)=35 exch2_jLo(1,507)=52 exch2_jHi(1,507)=52 exch2_opposingSend(1,507)=2 exch2_pij(1,1,507)=1 exch2_pij(2,1,507)=0 exch2_pij(3,1,507)=0 exch2_pij(4,1,507)=1 exch2_oi(1,507)=0 exch2_oj(1,507)=0 exch2_neighbourId(2,507)=492 exch2_iLo(2,507)=0 exch2_iHi(2,507)=35 exch2_jLo(2,507)=0 exch2_jHi(2,507)=0 exch2_opposingSend(2,507)=1 exch2_pij(1,2,507)=1 exch2_pij(2,2,507)=0 exch2_pij(3,2,507)=0 exch2_pij(4,2,507)=1 exch2_oi(2,507)=0 exch2_oj(2,507)=0 exch2_neighbourId(3,507)=508 exch2_iLo(3,507)=35 exch2_iHi(3,507)=35 exch2_jLo(3,507)=0 exch2_jHi(3,507)=52 exch2_opposingSend(3,507)=4 exch2_pij(1,3,507)=1 exch2_pij(2,3,507)=0 exch2_pij(3,3,507)=0 exch2_pij(4,3,507)=1 exch2_oi(3,507)=0 exch2_oj(3,507)=0 exch2_neighbourId(4,507)=506 exch2_iLo(4,507)=0 exch2_iHi(4,507)=0 exch2_jLo(4,507)=0 exch2_jHi(4,507)=52 exch2_opposingSend(4,507)=3 exch2_pij(1,4,507)=1 exch2_pij(2,4,507)=0 exch2_pij(3,4,507)=0 exch2_pij(4,4,507)=1 exch2_oi(4,507)=0 exch2_oj(4,507)=0 RETURN END SUBROUTINE W2_E2SETUP_508 C Topology for tile 508 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(508)=34 exch2_tNy(508)=51 exch2_tBasex(508)=408 exch2_tBasey(508)=153 exch2_txGlobalo(508)=1939 exch2_tyGlobalo(508)=154 exch2_isWedge(508)=0 exch2_isNedge(508)=0 exch2_isEedge(508)=0 exch2_isSedge(508)=0 exch2_myFace(508)=4 exch2_mydNx(508)=510 exch2_mydNy(508)=510 exch2_nNeighbours(508)=4 exch2_neighbourId(1,508)=523 exch2_iLo(1,508)=0 exch2_iHi(1,508)=35 exch2_jLo(1,508)=52 exch2_jHi(1,508)=52 exch2_opposingSend(1,508)=2 exch2_pij(1,1,508)=1 exch2_pij(2,1,508)=0 exch2_pij(3,1,508)=0 exch2_pij(4,1,508)=1 exch2_oi(1,508)=0 exch2_oj(1,508)=0 exch2_neighbourId(2,508)=493 exch2_iLo(2,508)=0 exch2_iHi(2,508)=35 exch2_jLo(2,508)=0 exch2_jHi(2,508)=0 exch2_opposingSend(2,508)=1 exch2_pij(1,2,508)=1 exch2_pij(2,2,508)=0 exch2_pij(3,2,508)=0 exch2_pij(4,2,508)=1 exch2_oi(2,508)=0 exch2_oj(2,508)=0 exch2_neighbourId(3,508)=509 exch2_iLo(3,508)=35 exch2_iHi(3,508)=35 exch2_jLo(3,508)=0 exch2_jHi(3,508)=52 exch2_opposingSend(3,508)=4 exch2_pij(1,3,508)=1 exch2_pij(2,3,508)=0 exch2_pij(3,3,508)=0 exch2_pij(4,3,508)=1 exch2_oi(3,508)=0 exch2_oj(3,508)=0 exch2_neighbourId(4,508)=507 exch2_iLo(4,508)=0 exch2_iHi(4,508)=0 exch2_jLo(4,508)=0 exch2_jHi(4,508)=52 exch2_opposingSend(4,508)=3 exch2_pij(1,4,508)=1 exch2_pij(2,4,508)=0 exch2_pij(3,4,508)=0 exch2_pij(4,4,508)=1 exch2_oi(4,508)=0 exch2_oj(4,508)=0 RETURN END SUBROUTINE W2_E2SETUP_509 C Topology for tile 509 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(509)=34 exch2_tNy(509)=51 exch2_tBasex(509)=442 exch2_tBasey(509)=153 exch2_txGlobalo(509)=1973 exch2_tyGlobalo(509)=154 exch2_isWedge(509)=0 exch2_isNedge(509)=0 exch2_isEedge(509)=0 exch2_isSedge(509)=0 exch2_myFace(509)=4 exch2_mydNx(509)=510 exch2_mydNy(509)=510 exch2_nNeighbours(509)=4 exch2_neighbourId(1,509)=524 exch2_iLo(1,509)=0 exch2_iHi(1,509)=35 exch2_jLo(1,509)=52 exch2_jHi(1,509)=52 exch2_opposingSend(1,509)=2 exch2_pij(1,1,509)=1 exch2_pij(2,1,509)=0 exch2_pij(3,1,509)=0 exch2_pij(4,1,509)=1 exch2_oi(1,509)=0 exch2_oj(1,509)=0 exch2_neighbourId(2,509)=494 exch2_iLo(2,509)=0 exch2_iHi(2,509)=35 exch2_jLo(2,509)=0 exch2_jHi(2,509)=0 exch2_opposingSend(2,509)=1 exch2_pij(1,2,509)=1 exch2_pij(2,2,509)=0 exch2_pij(3,2,509)=0 exch2_pij(4,2,509)=1 exch2_oi(2,509)=0 exch2_oj(2,509)=0 exch2_neighbourId(3,509)=510 exch2_iLo(3,509)=35 exch2_iHi(3,509)=35 exch2_jLo(3,509)=0 exch2_jHi(3,509)=52 exch2_opposingSend(3,509)=5 exch2_pij(1,3,509)=1 exch2_pij(2,3,509)=0 exch2_pij(3,3,509)=0 exch2_pij(4,3,509)=1 exch2_oi(3,509)=0 exch2_oj(3,509)=0 exch2_neighbourId(4,509)=508 exch2_iLo(4,509)=0 exch2_iHi(4,509)=0 exch2_jLo(4,509)=0 exch2_jHi(4,509)=52 exch2_opposingSend(4,509)=3 exch2_pij(1,4,509)=1 exch2_pij(2,4,509)=0 exch2_pij(3,4,509)=0 exch2_pij(4,4,509)=1 exch2_oi(4,509)=0 exch2_oj(4,509)=0 RETURN END SUBROUTINE W2_E2SETUP_510 C Topology for tile 510 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(510)=34 exch2_tNy(510)=51 exch2_tBasex(510)=476 exch2_tBasey(510)=153 exch2_txGlobalo(510)=2007 exch2_tyGlobalo(510)=154 exch2_isWedge(510)=0 exch2_isNedge(510)=0 exch2_isEedge(510)=1 exch2_isSedge(510)=0 exch2_myFace(510)=4 exch2_mydNx(510)=510 exch2_mydNy(510)=510 exch2_nNeighbours(510)=5 exch2_neighbourId(1,510)=525 exch2_iLo(1,510)=0 exch2_iHi(1,510)=35 exch2_jLo(1,510)=52 exch2_jHi(1,510)=52 exch2_opposingSend(1,510)=2 exch2_pij(1,1,510)=1 exch2_pij(2,1,510)=0 exch2_pij(3,1,510)=0 exch2_pij(4,1,510)=1 exch2_oi(1,510)=0 exch2_oj(1,510)=0 exch2_neighbourId(2,510)=495 exch2_iLo(2,510)=0 exch2_iHi(2,510)=35 exch2_jLo(2,510)=0 exch2_jHi(2,510)=0 exch2_opposingSend(2,510)=1 exch2_pij(1,2,510)=1 exch2_pij(2,2,510)=0 exch2_pij(3,2,510)=0 exch2_pij(4,2,510)=1 exch2_oi(2,510)=0 exch2_oj(2,510)=0 exch2_neighbourId(3,510)=760 exch2_iLo(3,510)=35 exch2_iHi(3,510)=35 exch2_jLo(3,510)=17 exch2_jHi(3,510)=52 exch2_opposingSend(3,510)=2 exch2_pij(1,3,510)=0 exch2_pij(2,3,510)=1 exch2_pij(3,3,510)=-1 exch2_pij(4,3,510)=0 exch2_oi(3,510)=510 exch2_oj(3,510)=511 exch2_neighbourId(4,510)=761 exch2_iLo(4,510)=35 exch2_iHi(4,510)=35 exch2_jLo(4,510)=0 exch2_jHi(4,510)=18 exch2_opposingSend(4,510)=3 exch2_pij(1,4,510)=0 exch2_pij(2,4,510)=1 exch2_pij(3,4,510)=-1 exch2_pij(4,4,510)=0 exch2_oi(4,510)=510 exch2_oj(4,510)=511 exch2_neighbourId(5,510)=509 exch2_iLo(5,510)=0 exch2_iHi(5,510)=0 exch2_jLo(5,510)=0 exch2_jHi(5,510)=52 exch2_opposingSend(5,510)=3 exch2_pij(1,5,510)=1 exch2_pij(2,5,510)=0 exch2_pij(3,5,510)=0 exch2_pij(4,5,510)=1 exch2_oi(5,510)=0 exch2_oj(5,510)=0 RETURN END SUBROUTINE W2_E2SETUP_511 C Topology for tile 511 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(511)=34 exch2_tNy(511)=51 exch2_tBasex(511)=0 exch2_tBasey(511)=204 exch2_txGlobalo(511)=1531 exch2_tyGlobalo(511)=205 exch2_isWedge(511)=1 exch2_isNedge(511)=0 exch2_isEedge(511)=0 exch2_isSedge(511)=0 exch2_myFace(511)=4 exch2_mydNx(511)=510 exch2_mydNy(511)=510 exch2_nNeighbours(511)=4 exch2_neighbourId(1,511)=526 exch2_iLo(1,511)=0 exch2_iHi(1,511)=35 exch2_jLo(1,511)=52 exch2_jHi(1,511)=52 exch2_opposingSend(1,511)=2 exch2_pij(1,1,511)=1 exch2_pij(2,1,511)=0 exch2_pij(3,1,511)=0 exch2_pij(4,1,511)=1 exch2_oi(1,511)=0 exch2_oj(1,511)=0 exch2_neighbourId(2,511)=496 exch2_iLo(2,511)=0 exch2_iHi(2,511)=35 exch2_jLo(2,511)=0 exch2_jHi(2,511)=0 exch2_opposingSend(2,511)=1 exch2_pij(1,2,511)=1 exch2_pij(2,2,511)=0 exch2_pij(3,2,511)=0 exch2_pij(4,2,511)=1 exch2_oi(2,511)=0 exch2_oj(2,511)=0 exch2_neighbourId(3,511)=512 exch2_iLo(3,511)=35 exch2_iHi(3,511)=35 exch2_jLo(3,511)=0 exch2_jHi(3,511)=52 exch2_opposingSend(3,511)=4 exch2_pij(1,3,511)=1 exch2_pij(2,3,511)=0 exch2_pij(3,3,511)=0 exch2_pij(4,3,511)=1 exch2_oi(3,511)=0 exch2_oj(3,511)=0 exch2_neighbourId(4,511)=375 exch2_iLo(4,511)=0 exch2_iHi(4,511)=0 exch2_jLo(4,511)=0 exch2_jHi(4,511)=52 exch2_opposingSend(4,511)=3 exch2_pij(1,4,511)=1 exch2_pij(2,4,511)=0 exch2_pij(3,4,511)=0 exch2_pij(4,4,511)=1 exch2_oi(4,511)=-510 exch2_oj(4,511)=0 RETURN END SUBROUTINE W2_E2SETUP_512 C Topology for tile 512 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(512)=34 exch2_tNy(512)=51 exch2_tBasex(512)=34 exch2_tBasey(512)=204 exch2_txGlobalo(512)=1565 exch2_tyGlobalo(512)=205 exch2_isWedge(512)=0 exch2_isNedge(512)=0 exch2_isEedge(512)=0 exch2_isSedge(512)=0 exch2_myFace(512)=4 exch2_mydNx(512)=510 exch2_mydNy(512)=510 exch2_nNeighbours(512)=4 exch2_neighbourId(1,512)=527 exch2_iLo(1,512)=0 exch2_iHi(1,512)=35 exch2_jLo(1,512)=52 exch2_jHi(1,512)=52 exch2_opposingSend(1,512)=2 exch2_pij(1,1,512)=1 exch2_pij(2,1,512)=0 exch2_pij(3,1,512)=0 exch2_pij(4,1,512)=1 exch2_oi(1,512)=0 exch2_oj(1,512)=0 exch2_neighbourId(2,512)=497 exch2_iLo(2,512)=0 exch2_iHi(2,512)=35 exch2_jLo(2,512)=0 exch2_jHi(2,512)=0 exch2_opposingSend(2,512)=1 exch2_pij(1,2,512)=1 exch2_pij(2,2,512)=0 exch2_pij(3,2,512)=0 exch2_pij(4,2,512)=1 exch2_oi(2,512)=0 exch2_oj(2,512)=0 exch2_neighbourId(3,512)=513 exch2_iLo(3,512)=35 exch2_iHi(3,512)=35 exch2_jLo(3,512)=0 exch2_jHi(3,512)=52 exch2_opposingSend(3,512)=4 exch2_pij(1,3,512)=1 exch2_pij(2,3,512)=0 exch2_pij(3,3,512)=0 exch2_pij(4,3,512)=1 exch2_oi(3,512)=0 exch2_oj(3,512)=0 exch2_neighbourId(4,512)=511 exch2_iLo(4,512)=0 exch2_iHi(4,512)=0 exch2_jLo(4,512)=0 exch2_jHi(4,512)=52 exch2_opposingSend(4,512)=3 exch2_pij(1,4,512)=1 exch2_pij(2,4,512)=0 exch2_pij(3,4,512)=0 exch2_pij(4,4,512)=1 exch2_oi(4,512)=0 exch2_oj(4,512)=0 RETURN END SUBROUTINE W2_E2SETUP_513 C Topology for tile 513 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(513)=34 exch2_tNy(513)=51 exch2_tBasex(513)=68 exch2_tBasey(513)=204 exch2_txGlobalo(513)=1599 exch2_tyGlobalo(513)=205 exch2_isWedge(513)=0 exch2_isNedge(513)=0 exch2_isEedge(513)=0 exch2_isSedge(513)=0 exch2_myFace(513)=4 exch2_mydNx(513)=510 exch2_mydNy(513)=510 exch2_nNeighbours(513)=4 exch2_neighbourId(1,513)=528 exch2_iLo(1,513)=0 exch2_iHi(1,513)=35 exch2_jLo(1,513)=52 exch2_jHi(1,513)=52 exch2_opposingSend(1,513)=2 exch2_pij(1,1,513)=1 exch2_pij(2,1,513)=0 exch2_pij(3,1,513)=0 exch2_pij(4,1,513)=1 exch2_oi(1,513)=0 exch2_oj(1,513)=0 exch2_neighbourId(2,513)=498 exch2_iLo(2,513)=0 exch2_iHi(2,513)=35 exch2_jLo(2,513)=0 exch2_jHi(2,513)=0 exch2_opposingSend(2,513)=1 exch2_pij(1,2,513)=1 exch2_pij(2,2,513)=0 exch2_pij(3,2,513)=0 exch2_pij(4,2,513)=1 exch2_oi(2,513)=0 exch2_oj(2,513)=0 exch2_neighbourId(3,513)=514 exch2_iLo(3,513)=35 exch2_iHi(3,513)=35 exch2_jLo(3,513)=0 exch2_jHi(3,513)=52 exch2_opposingSend(3,513)=4 exch2_pij(1,3,513)=1 exch2_pij(2,3,513)=0 exch2_pij(3,3,513)=0 exch2_pij(4,3,513)=1 exch2_oi(3,513)=0 exch2_oj(3,513)=0 exch2_neighbourId(4,513)=512 exch2_iLo(4,513)=0 exch2_iHi(4,513)=0 exch2_jLo(4,513)=0 exch2_jHi(4,513)=52 exch2_opposingSend(4,513)=3 exch2_pij(1,4,513)=1 exch2_pij(2,4,513)=0 exch2_pij(3,4,513)=0 exch2_pij(4,4,513)=1 exch2_oi(4,513)=0 exch2_oj(4,513)=0 RETURN END SUBROUTINE W2_E2SETUP_514 C Topology for tile 514 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(514)=34 exch2_tNy(514)=51 exch2_tBasex(514)=102 exch2_tBasey(514)=204 exch2_txGlobalo(514)=1633 exch2_tyGlobalo(514)=205 exch2_isWedge(514)=0 exch2_isNedge(514)=0 exch2_isEedge(514)=0 exch2_isSedge(514)=0 exch2_myFace(514)=4 exch2_mydNx(514)=510 exch2_mydNy(514)=510 exch2_nNeighbours(514)=4 exch2_neighbourId(1,514)=529 exch2_iLo(1,514)=0 exch2_iHi(1,514)=35 exch2_jLo(1,514)=52 exch2_jHi(1,514)=52 exch2_opposingSend(1,514)=2 exch2_pij(1,1,514)=1 exch2_pij(2,1,514)=0 exch2_pij(3,1,514)=0 exch2_pij(4,1,514)=1 exch2_oi(1,514)=0 exch2_oj(1,514)=0 exch2_neighbourId(2,514)=499 exch2_iLo(2,514)=0 exch2_iHi(2,514)=35 exch2_jLo(2,514)=0 exch2_jHi(2,514)=0 exch2_opposingSend(2,514)=1 exch2_pij(1,2,514)=1 exch2_pij(2,2,514)=0 exch2_pij(3,2,514)=0 exch2_pij(4,2,514)=1 exch2_oi(2,514)=0 exch2_oj(2,514)=0 exch2_neighbourId(3,514)=515 exch2_iLo(3,514)=35 exch2_iHi(3,514)=35 exch2_jLo(3,514)=0 exch2_jHi(3,514)=52 exch2_opposingSend(3,514)=4 exch2_pij(1,3,514)=1 exch2_pij(2,3,514)=0 exch2_pij(3,3,514)=0 exch2_pij(4,3,514)=1 exch2_oi(3,514)=0 exch2_oj(3,514)=0 exch2_neighbourId(4,514)=513 exch2_iLo(4,514)=0 exch2_iHi(4,514)=0 exch2_jLo(4,514)=0 exch2_jHi(4,514)=52 exch2_opposingSend(4,514)=3 exch2_pij(1,4,514)=1 exch2_pij(2,4,514)=0 exch2_pij(3,4,514)=0 exch2_pij(4,4,514)=1 exch2_oi(4,514)=0 exch2_oj(4,514)=0 RETURN END SUBROUTINE W2_E2SETUP_515 C Topology for tile 515 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(515)=34 exch2_tNy(515)=51 exch2_tBasex(515)=136 exch2_tBasey(515)=204 exch2_txGlobalo(515)=1667 exch2_tyGlobalo(515)=205 exch2_isWedge(515)=0 exch2_isNedge(515)=0 exch2_isEedge(515)=0 exch2_isSedge(515)=0 exch2_myFace(515)=4 exch2_mydNx(515)=510 exch2_mydNy(515)=510 exch2_nNeighbours(515)=4 exch2_neighbourId(1,515)=530 exch2_iLo(1,515)=0 exch2_iHi(1,515)=35 exch2_jLo(1,515)=52 exch2_jHi(1,515)=52 exch2_opposingSend(1,515)=2 exch2_pij(1,1,515)=1 exch2_pij(2,1,515)=0 exch2_pij(3,1,515)=0 exch2_pij(4,1,515)=1 exch2_oi(1,515)=0 exch2_oj(1,515)=0 exch2_neighbourId(2,515)=500 exch2_iLo(2,515)=0 exch2_iHi(2,515)=35 exch2_jLo(2,515)=0 exch2_jHi(2,515)=0 exch2_opposingSend(2,515)=1 exch2_pij(1,2,515)=1 exch2_pij(2,2,515)=0 exch2_pij(3,2,515)=0 exch2_pij(4,2,515)=1 exch2_oi(2,515)=0 exch2_oj(2,515)=0 exch2_neighbourId(3,515)=516 exch2_iLo(3,515)=35 exch2_iHi(3,515)=35 exch2_jLo(3,515)=0 exch2_jHi(3,515)=52 exch2_opposingSend(3,515)=4 exch2_pij(1,3,515)=1 exch2_pij(2,3,515)=0 exch2_pij(3,3,515)=0 exch2_pij(4,3,515)=1 exch2_oi(3,515)=0 exch2_oj(3,515)=0 exch2_neighbourId(4,515)=514 exch2_iLo(4,515)=0 exch2_iHi(4,515)=0 exch2_jLo(4,515)=0 exch2_jHi(4,515)=52 exch2_opposingSend(4,515)=3 exch2_pij(1,4,515)=1 exch2_pij(2,4,515)=0 exch2_pij(3,4,515)=0 exch2_pij(4,4,515)=1 exch2_oi(4,515)=0 exch2_oj(4,515)=0 RETURN END SUBROUTINE W2_E2SETUP_516 C Topology for tile 516 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(516)=34 exch2_tNy(516)=51 exch2_tBasex(516)=170 exch2_tBasey(516)=204 exch2_txGlobalo(516)=1701 exch2_tyGlobalo(516)=205 exch2_isWedge(516)=0 exch2_isNedge(516)=0 exch2_isEedge(516)=0 exch2_isSedge(516)=0 exch2_myFace(516)=4 exch2_mydNx(516)=510 exch2_mydNy(516)=510 exch2_nNeighbours(516)=4 exch2_neighbourId(1,516)=531 exch2_iLo(1,516)=0 exch2_iHi(1,516)=35 exch2_jLo(1,516)=52 exch2_jHi(1,516)=52 exch2_opposingSend(1,516)=2 exch2_pij(1,1,516)=1 exch2_pij(2,1,516)=0 exch2_pij(3,1,516)=0 exch2_pij(4,1,516)=1 exch2_oi(1,516)=0 exch2_oj(1,516)=0 exch2_neighbourId(2,516)=501 exch2_iLo(2,516)=0 exch2_iHi(2,516)=35 exch2_jLo(2,516)=0 exch2_jHi(2,516)=0 exch2_opposingSend(2,516)=1 exch2_pij(1,2,516)=1 exch2_pij(2,2,516)=0 exch2_pij(3,2,516)=0 exch2_pij(4,2,516)=1 exch2_oi(2,516)=0 exch2_oj(2,516)=0 exch2_neighbourId(3,516)=517 exch2_iLo(3,516)=35 exch2_iHi(3,516)=35 exch2_jLo(3,516)=0 exch2_jHi(3,516)=52 exch2_opposingSend(3,516)=4 exch2_pij(1,3,516)=1 exch2_pij(2,3,516)=0 exch2_pij(3,3,516)=0 exch2_pij(4,3,516)=1 exch2_oi(3,516)=0 exch2_oj(3,516)=0 exch2_neighbourId(4,516)=515 exch2_iLo(4,516)=0 exch2_iHi(4,516)=0 exch2_jLo(4,516)=0 exch2_jHi(4,516)=52 exch2_opposingSend(4,516)=3 exch2_pij(1,4,516)=1 exch2_pij(2,4,516)=0 exch2_pij(3,4,516)=0 exch2_pij(4,4,516)=1 exch2_oi(4,516)=0 exch2_oj(4,516)=0 RETURN END SUBROUTINE W2_E2SETUP_517 C Topology for tile 517 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(517)=34 exch2_tNy(517)=51 exch2_tBasex(517)=204 exch2_tBasey(517)=204 exch2_txGlobalo(517)=1735 exch2_tyGlobalo(517)=205 exch2_isWedge(517)=0 exch2_isNedge(517)=0 exch2_isEedge(517)=0 exch2_isSedge(517)=0 exch2_myFace(517)=4 exch2_mydNx(517)=510 exch2_mydNy(517)=510 exch2_nNeighbours(517)=4 exch2_neighbourId(1,517)=532 exch2_iLo(1,517)=0 exch2_iHi(1,517)=35 exch2_jLo(1,517)=52 exch2_jHi(1,517)=52 exch2_opposingSend(1,517)=2 exch2_pij(1,1,517)=1 exch2_pij(2,1,517)=0 exch2_pij(3,1,517)=0 exch2_pij(4,1,517)=1 exch2_oi(1,517)=0 exch2_oj(1,517)=0 exch2_neighbourId(2,517)=502 exch2_iLo(2,517)=0 exch2_iHi(2,517)=35 exch2_jLo(2,517)=0 exch2_jHi(2,517)=0 exch2_opposingSend(2,517)=1 exch2_pij(1,2,517)=1 exch2_pij(2,2,517)=0 exch2_pij(3,2,517)=0 exch2_pij(4,2,517)=1 exch2_oi(2,517)=0 exch2_oj(2,517)=0 exch2_neighbourId(3,517)=518 exch2_iLo(3,517)=35 exch2_iHi(3,517)=35 exch2_jLo(3,517)=0 exch2_jHi(3,517)=52 exch2_opposingSend(3,517)=4 exch2_pij(1,3,517)=1 exch2_pij(2,3,517)=0 exch2_pij(3,3,517)=0 exch2_pij(4,3,517)=1 exch2_oi(3,517)=0 exch2_oj(3,517)=0 exch2_neighbourId(4,517)=516 exch2_iLo(4,517)=0 exch2_iHi(4,517)=0 exch2_jLo(4,517)=0 exch2_jHi(4,517)=52 exch2_opposingSend(4,517)=3 exch2_pij(1,4,517)=1 exch2_pij(2,4,517)=0 exch2_pij(3,4,517)=0 exch2_pij(4,4,517)=1 exch2_oi(4,517)=0 exch2_oj(4,517)=0 RETURN END SUBROUTINE W2_E2SETUP_518 C Topology for tile 518 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(518)=34 exch2_tNy(518)=51 exch2_tBasex(518)=238 exch2_tBasey(518)=204 exch2_txGlobalo(518)=1769 exch2_tyGlobalo(518)=205 exch2_isWedge(518)=0 exch2_isNedge(518)=0 exch2_isEedge(518)=0 exch2_isSedge(518)=0 exch2_myFace(518)=4 exch2_mydNx(518)=510 exch2_mydNy(518)=510 exch2_nNeighbours(518)=4 exch2_neighbourId(1,518)=533 exch2_iLo(1,518)=0 exch2_iHi(1,518)=35 exch2_jLo(1,518)=52 exch2_jHi(1,518)=52 exch2_opposingSend(1,518)=2 exch2_pij(1,1,518)=1 exch2_pij(2,1,518)=0 exch2_pij(3,1,518)=0 exch2_pij(4,1,518)=1 exch2_oi(1,518)=0 exch2_oj(1,518)=0 exch2_neighbourId(2,518)=503 exch2_iLo(2,518)=0 exch2_iHi(2,518)=35 exch2_jLo(2,518)=0 exch2_jHi(2,518)=0 exch2_opposingSend(2,518)=1 exch2_pij(1,2,518)=1 exch2_pij(2,2,518)=0 exch2_pij(3,2,518)=0 exch2_pij(4,2,518)=1 exch2_oi(2,518)=0 exch2_oj(2,518)=0 exch2_neighbourId(3,518)=519 exch2_iLo(3,518)=35 exch2_iHi(3,518)=35 exch2_jLo(3,518)=0 exch2_jHi(3,518)=52 exch2_opposingSend(3,518)=4 exch2_pij(1,3,518)=1 exch2_pij(2,3,518)=0 exch2_pij(3,3,518)=0 exch2_pij(4,3,518)=1 exch2_oi(3,518)=0 exch2_oj(3,518)=0 exch2_neighbourId(4,518)=517 exch2_iLo(4,518)=0 exch2_iHi(4,518)=0 exch2_jLo(4,518)=0 exch2_jHi(4,518)=52 exch2_opposingSend(4,518)=3 exch2_pij(1,4,518)=1 exch2_pij(2,4,518)=0 exch2_pij(3,4,518)=0 exch2_pij(4,4,518)=1 exch2_oi(4,518)=0 exch2_oj(4,518)=0 RETURN END SUBROUTINE W2_E2SETUP_519 C Topology for tile 519 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(519)=34 exch2_tNy(519)=51 exch2_tBasex(519)=272 exch2_tBasey(519)=204 exch2_txGlobalo(519)=1803 exch2_tyGlobalo(519)=205 exch2_isWedge(519)=0 exch2_isNedge(519)=0 exch2_isEedge(519)=0 exch2_isSedge(519)=0 exch2_myFace(519)=4 exch2_mydNx(519)=510 exch2_mydNy(519)=510 exch2_nNeighbours(519)=4 exch2_neighbourId(1,519)=534 exch2_iLo(1,519)=0 exch2_iHi(1,519)=35 exch2_jLo(1,519)=52 exch2_jHi(1,519)=52 exch2_opposingSend(1,519)=2 exch2_pij(1,1,519)=1 exch2_pij(2,1,519)=0 exch2_pij(3,1,519)=0 exch2_pij(4,1,519)=1 exch2_oi(1,519)=0 exch2_oj(1,519)=0 exch2_neighbourId(2,519)=504 exch2_iLo(2,519)=0 exch2_iHi(2,519)=35 exch2_jLo(2,519)=0 exch2_jHi(2,519)=0 exch2_opposingSend(2,519)=1 exch2_pij(1,2,519)=1 exch2_pij(2,2,519)=0 exch2_pij(3,2,519)=0 exch2_pij(4,2,519)=1 exch2_oi(2,519)=0 exch2_oj(2,519)=0 exch2_neighbourId(3,519)=520 exch2_iLo(3,519)=35 exch2_iHi(3,519)=35 exch2_jLo(3,519)=0 exch2_jHi(3,519)=52 exch2_opposingSend(3,519)=4 exch2_pij(1,3,519)=1 exch2_pij(2,3,519)=0 exch2_pij(3,3,519)=0 exch2_pij(4,3,519)=1 exch2_oi(3,519)=0 exch2_oj(3,519)=0 exch2_neighbourId(4,519)=518 exch2_iLo(4,519)=0 exch2_iHi(4,519)=0 exch2_jLo(4,519)=0 exch2_jHi(4,519)=52 exch2_opposingSend(4,519)=3 exch2_pij(1,4,519)=1 exch2_pij(2,4,519)=0 exch2_pij(3,4,519)=0 exch2_pij(4,4,519)=1 exch2_oi(4,519)=0 exch2_oj(4,519)=0 RETURN END SUBROUTINE W2_E2SETUP_520 C Topology for tile 520 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(520)=34 exch2_tNy(520)=51 exch2_tBasex(520)=306 exch2_tBasey(520)=204 exch2_txGlobalo(520)=1837 exch2_tyGlobalo(520)=205 exch2_isWedge(520)=0 exch2_isNedge(520)=0 exch2_isEedge(520)=0 exch2_isSedge(520)=0 exch2_myFace(520)=4 exch2_mydNx(520)=510 exch2_mydNy(520)=510 exch2_nNeighbours(520)=4 exch2_neighbourId(1,520)=535 exch2_iLo(1,520)=0 exch2_iHi(1,520)=35 exch2_jLo(1,520)=52 exch2_jHi(1,520)=52 exch2_opposingSend(1,520)=2 exch2_pij(1,1,520)=1 exch2_pij(2,1,520)=0 exch2_pij(3,1,520)=0 exch2_pij(4,1,520)=1 exch2_oi(1,520)=0 exch2_oj(1,520)=0 exch2_neighbourId(2,520)=505 exch2_iLo(2,520)=0 exch2_iHi(2,520)=35 exch2_jLo(2,520)=0 exch2_jHi(2,520)=0 exch2_opposingSend(2,520)=1 exch2_pij(1,2,520)=1 exch2_pij(2,2,520)=0 exch2_pij(3,2,520)=0 exch2_pij(4,2,520)=1 exch2_oi(2,520)=0 exch2_oj(2,520)=0 exch2_neighbourId(3,520)=521 exch2_iLo(3,520)=35 exch2_iHi(3,520)=35 exch2_jLo(3,520)=0 exch2_jHi(3,520)=52 exch2_opposingSend(3,520)=4 exch2_pij(1,3,520)=1 exch2_pij(2,3,520)=0 exch2_pij(3,3,520)=0 exch2_pij(4,3,520)=1 exch2_oi(3,520)=0 exch2_oj(3,520)=0 exch2_neighbourId(4,520)=519 exch2_iLo(4,520)=0 exch2_iHi(4,520)=0 exch2_jLo(4,520)=0 exch2_jHi(4,520)=52 exch2_opposingSend(4,520)=3 exch2_pij(1,4,520)=1 exch2_pij(2,4,520)=0 exch2_pij(3,4,520)=0 exch2_pij(4,4,520)=1 exch2_oi(4,520)=0 exch2_oj(4,520)=0 RETURN END SUBROUTINE W2_E2SETUP_521 C Topology for tile 521 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(521)=34 exch2_tNy(521)=51 exch2_tBasex(521)=340 exch2_tBasey(521)=204 exch2_txGlobalo(521)=1871 exch2_tyGlobalo(521)=205 exch2_isWedge(521)=0 exch2_isNedge(521)=0 exch2_isEedge(521)=0 exch2_isSedge(521)=0 exch2_myFace(521)=4 exch2_mydNx(521)=510 exch2_mydNy(521)=510 exch2_nNeighbours(521)=4 exch2_neighbourId(1,521)=536 exch2_iLo(1,521)=0 exch2_iHi(1,521)=35 exch2_jLo(1,521)=52 exch2_jHi(1,521)=52 exch2_opposingSend(1,521)=2 exch2_pij(1,1,521)=1 exch2_pij(2,1,521)=0 exch2_pij(3,1,521)=0 exch2_pij(4,1,521)=1 exch2_oi(1,521)=0 exch2_oj(1,521)=0 exch2_neighbourId(2,521)=506 exch2_iLo(2,521)=0 exch2_iHi(2,521)=35 exch2_jLo(2,521)=0 exch2_jHi(2,521)=0 exch2_opposingSend(2,521)=1 exch2_pij(1,2,521)=1 exch2_pij(2,2,521)=0 exch2_pij(3,2,521)=0 exch2_pij(4,2,521)=1 exch2_oi(2,521)=0 exch2_oj(2,521)=0 exch2_neighbourId(3,521)=522 exch2_iLo(3,521)=35 exch2_iHi(3,521)=35 exch2_jLo(3,521)=0 exch2_jHi(3,521)=52 exch2_opposingSend(3,521)=4 exch2_pij(1,3,521)=1 exch2_pij(2,3,521)=0 exch2_pij(3,3,521)=0 exch2_pij(4,3,521)=1 exch2_oi(3,521)=0 exch2_oj(3,521)=0 exch2_neighbourId(4,521)=520 exch2_iLo(4,521)=0 exch2_iHi(4,521)=0 exch2_jLo(4,521)=0 exch2_jHi(4,521)=52 exch2_opposingSend(4,521)=3 exch2_pij(1,4,521)=1 exch2_pij(2,4,521)=0 exch2_pij(3,4,521)=0 exch2_pij(4,4,521)=1 exch2_oi(4,521)=0 exch2_oj(4,521)=0 RETURN END SUBROUTINE W2_E2SETUP_522 C Topology for tile 522 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(522)=34 exch2_tNy(522)=51 exch2_tBasex(522)=374 exch2_tBasey(522)=204 exch2_txGlobalo(522)=1905 exch2_tyGlobalo(522)=205 exch2_isWedge(522)=0 exch2_isNedge(522)=0 exch2_isEedge(522)=0 exch2_isSedge(522)=0 exch2_myFace(522)=4 exch2_mydNx(522)=510 exch2_mydNy(522)=510 exch2_nNeighbours(522)=4 exch2_neighbourId(1,522)=537 exch2_iLo(1,522)=0 exch2_iHi(1,522)=35 exch2_jLo(1,522)=52 exch2_jHi(1,522)=52 exch2_opposingSend(1,522)=2 exch2_pij(1,1,522)=1 exch2_pij(2,1,522)=0 exch2_pij(3,1,522)=0 exch2_pij(4,1,522)=1 exch2_oi(1,522)=0 exch2_oj(1,522)=0 exch2_neighbourId(2,522)=507 exch2_iLo(2,522)=0 exch2_iHi(2,522)=35 exch2_jLo(2,522)=0 exch2_jHi(2,522)=0 exch2_opposingSend(2,522)=1 exch2_pij(1,2,522)=1 exch2_pij(2,2,522)=0 exch2_pij(3,2,522)=0 exch2_pij(4,2,522)=1 exch2_oi(2,522)=0 exch2_oj(2,522)=0 exch2_neighbourId(3,522)=523 exch2_iLo(3,522)=35 exch2_iHi(3,522)=35 exch2_jLo(3,522)=0 exch2_jHi(3,522)=52 exch2_opposingSend(3,522)=4 exch2_pij(1,3,522)=1 exch2_pij(2,3,522)=0 exch2_pij(3,3,522)=0 exch2_pij(4,3,522)=1 exch2_oi(3,522)=0 exch2_oj(3,522)=0 exch2_neighbourId(4,522)=521 exch2_iLo(4,522)=0 exch2_iHi(4,522)=0 exch2_jLo(4,522)=0 exch2_jHi(4,522)=52 exch2_opposingSend(4,522)=3 exch2_pij(1,4,522)=1 exch2_pij(2,4,522)=0 exch2_pij(3,4,522)=0 exch2_pij(4,4,522)=1 exch2_oi(4,522)=0 exch2_oj(4,522)=0 RETURN END SUBROUTINE W2_E2SETUP_523 C Topology for tile 523 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(523)=34 exch2_tNy(523)=51 exch2_tBasex(523)=408 exch2_tBasey(523)=204 exch2_txGlobalo(523)=1939 exch2_tyGlobalo(523)=205 exch2_isWedge(523)=0 exch2_isNedge(523)=0 exch2_isEedge(523)=0 exch2_isSedge(523)=0 exch2_myFace(523)=4 exch2_mydNx(523)=510 exch2_mydNy(523)=510 exch2_nNeighbours(523)=4 exch2_neighbourId(1,523)=538 exch2_iLo(1,523)=0 exch2_iHi(1,523)=35 exch2_jLo(1,523)=52 exch2_jHi(1,523)=52 exch2_opposingSend(1,523)=2 exch2_pij(1,1,523)=1 exch2_pij(2,1,523)=0 exch2_pij(3,1,523)=0 exch2_pij(4,1,523)=1 exch2_oi(1,523)=0 exch2_oj(1,523)=0 exch2_neighbourId(2,523)=508 exch2_iLo(2,523)=0 exch2_iHi(2,523)=35 exch2_jLo(2,523)=0 exch2_jHi(2,523)=0 exch2_opposingSend(2,523)=1 exch2_pij(1,2,523)=1 exch2_pij(2,2,523)=0 exch2_pij(3,2,523)=0 exch2_pij(4,2,523)=1 exch2_oi(2,523)=0 exch2_oj(2,523)=0 exch2_neighbourId(3,523)=524 exch2_iLo(3,523)=35 exch2_iHi(3,523)=35 exch2_jLo(3,523)=0 exch2_jHi(3,523)=52 exch2_opposingSend(3,523)=4 exch2_pij(1,3,523)=1 exch2_pij(2,3,523)=0 exch2_pij(3,3,523)=0 exch2_pij(4,3,523)=1 exch2_oi(3,523)=0 exch2_oj(3,523)=0 exch2_neighbourId(4,523)=522 exch2_iLo(4,523)=0 exch2_iHi(4,523)=0 exch2_jLo(4,523)=0 exch2_jHi(4,523)=52 exch2_opposingSend(4,523)=3 exch2_pij(1,4,523)=1 exch2_pij(2,4,523)=0 exch2_pij(3,4,523)=0 exch2_pij(4,4,523)=1 exch2_oi(4,523)=0 exch2_oj(4,523)=0 RETURN END SUBROUTINE W2_E2SETUP_524 C Topology for tile 524 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(524)=34 exch2_tNy(524)=51 exch2_tBasex(524)=442 exch2_tBasey(524)=204 exch2_txGlobalo(524)=1973 exch2_tyGlobalo(524)=205 exch2_isWedge(524)=0 exch2_isNedge(524)=0 exch2_isEedge(524)=0 exch2_isSedge(524)=0 exch2_myFace(524)=4 exch2_mydNx(524)=510 exch2_mydNy(524)=510 exch2_nNeighbours(524)=4 exch2_neighbourId(1,524)=539 exch2_iLo(1,524)=0 exch2_iHi(1,524)=35 exch2_jLo(1,524)=52 exch2_jHi(1,524)=52 exch2_opposingSend(1,524)=2 exch2_pij(1,1,524)=1 exch2_pij(2,1,524)=0 exch2_pij(3,1,524)=0 exch2_pij(4,1,524)=1 exch2_oi(1,524)=0 exch2_oj(1,524)=0 exch2_neighbourId(2,524)=509 exch2_iLo(2,524)=0 exch2_iHi(2,524)=35 exch2_jLo(2,524)=0 exch2_jHi(2,524)=0 exch2_opposingSend(2,524)=1 exch2_pij(1,2,524)=1 exch2_pij(2,2,524)=0 exch2_pij(3,2,524)=0 exch2_pij(4,2,524)=1 exch2_oi(2,524)=0 exch2_oj(2,524)=0 exch2_neighbourId(3,524)=525 exch2_iLo(3,524)=35 exch2_iHi(3,524)=35 exch2_jLo(3,524)=0 exch2_jHi(3,524)=52 exch2_opposingSend(3,524)=5 exch2_pij(1,3,524)=1 exch2_pij(2,3,524)=0 exch2_pij(3,3,524)=0 exch2_pij(4,3,524)=1 exch2_oi(3,524)=0 exch2_oj(3,524)=0 exch2_neighbourId(4,524)=523 exch2_iLo(4,524)=0 exch2_iHi(4,524)=0 exch2_jLo(4,524)=0 exch2_jHi(4,524)=52 exch2_opposingSend(4,524)=3 exch2_pij(1,4,524)=1 exch2_pij(2,4,524)=0 exch2_pij(3,4,524)=0 exch2_pij(4,4,524)=1 exch2_oi(4,524)=0 exch2_oj(4,524)=0 RETURN END SUBROUTINE W2_E2SETUP_525 C Topology for tile 525 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(525)=34 exch2_tNy(525)=51 exch2_tBasex(525)=476 exch2_tBasey(525)=204 exch2_txGlobalo(525)=2007 exch2_tyGlobalo(525)=205 exch2_isWedge(525)=0 exch2_isNedge(525)=0 exch2_isEedge(525)=1 exch2_isSedge(525)=0 exch2_myFace(525)=4 exch2_mydNx(525)=510 exch2_mydNy(525)=510 exch2_nNeighbours(525)=5 exch2_neighbourId(1,525)=540 exch2_iLo(1,525)=0 exch2_iHi(1,525)=35 exch2_jLo(1,525)=52 exch2_jHi(1,525)=52 exch2_opposingSend(1,525)=2 exch2_pij(1,1,525)=1 exch2_pij(2,1,525)=0 exch2_pij(3,1,525)=0 exch2_pij(4,1,525)=1 exch2_oi(1,525)=0 exch2_oj(1,525)=0 exch2_neighbourId(2,525)=510 exch2_iLo(2,525)=0 exch2_iHi(2,525)=35 exch2_jLo(2,525)=0 exch2_jHi(2,525)=0 exch2_opposingSend(2,525)=1 exch2_pij(1,2,525)=1 exch2_pij(2,2,525)=0 exch2_pij(3,2,525)=0 exch2_pij(4,2,525)=1 exch2_oi(2,525)=0 exch2_oj(2,525)=0 exch2_neighbourId(3,525)=758 exch2_iLo(3,525)=35 exch2_iHi(3,525)=35 exch2_jLo(3,525)=34 exch2_jHi(3,525)=52 exch2_opposingSend(3,525)=2 exch2_pij(1,3,525)=0 exch2_pij(2,3,525)=1 exch2_pij(3,3,525)=-1 exch2_pij(4,3,525)=0 exch2_oi(3,525)=510 exch2_oj(3,525)=511 exch2_neighbourId(4,525)=759 exch2_iLo(4,525)=35 exch2_iHi(4,525)=35 exch2_jLo(4,525)=0 exch2_jHi(4,525)=35 exch2_opposingSend(4,525)=2 exch2_pij(1,4,525)=0 exch2_pij(2,4,525)=1 exch2_pij(3,4,525)=-1 exch2_pij(4,4,525)=0 exch2_oi(4,525)=510 exch2_oj(4,525)=511 exch2_neighbourId(5,525)=524 exch2_iLo(5,525)=0 exch2_iHi(5,525)=0 exch2_jLo(5,525)=0 exch2_jHi(5,525)=52 exch2_opposingSend(5,525)=3 exch2_pij(1,5,525)=1 exch2_pij(2,5,525)=0 exch2_pij(3,5,525)=0 exch2_pij(4,5,525)=1 exch2_oi(5,525)=0 exch2_oj(5,525)=0 RETURN END SUBROUTINE W2_E2SETUP_526 C Topology for tile 526 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(526)=34 exch2_tNy(526)=51 exch2_tBasex(526)=0 exch2_tBasey(526)=255 exch2_txGlobalo(526)=1531 exch2_tyGlobalo(526)=256 exch2_isWedge(526)=1 exch2_isNedge(526)=0 exch2_isEedge(526)=0 exch2_isSedge(526)=0 exch2_myFace(526)=4 exch2_mydNx(526)=510 exch2_mydNy(526)=510 exch2_nNeighbours(526)=4 exch2_neighbourId(1,526)=541 exch2_iLo(1,526)=0 exch2_iHi(1,526)=35 exch2_jLo(1,526)=52 exch2_jHi(1,526)=52 exch2_opposingSend(1,526)=2 exch2_pij(1,1,526)=1 exch2_pij(2,1,526)=0 exch2_pij(3,1,526)=0 exch2_pij(4,1,526)=1 exch2_oi(1,526)=0 exch2_oj(1,526)=0 exch2_neighbourId(2,526)=511 exch2_iLo(2,526)=0 exch2_iHi(2,526)=35 exch2_jLo(2,526)=0 exch2_jHi(2,526)=0 exch2_opposingSend(2,526)=1 exch2_pij(1,2,526)=1 exch2_pij(2,2,526)=0 exch2_pij(3,2,526)=0 exch2_pij(4,2,526)=1 exch2_oi(2,526)=0 exch2_oj(2,526)=0 exch2_neighbourId(3,526)=527 exch2_iLo(3,526)=35 exch2_iHi(3,526)=35 exch2_jLo(3,526)=0 exch2_jHi(3,526)=52 exch2_opposingSend(3,526)=4 exch2_pij(1,3,526)=1 exch2_pij(2,3,526)=0 exch2_pij(3,3,526)=0 exch2_pij(4,3,526)=1 exch2_oi(3,526)=0 exch2_oj(3,526)=0 exch2_neighbourId(4,526)=390 exch2_iLo(4,526)=0 exch2_iHi(4,526)=0 exch2_jLo(4,526)=0 exch2_jHi(4,526)=52 exch2_opposingSend(4,526)=3 exch2_pij(1,4,526)=1 exch2_pij(2,4,526)=0 exch2_pij(3,4,526)=0 exch2_pij(4,4,526)=1 exch2_oi(4,526)=-510 exch2_oj(4,526)=0 RETURN END SUBROUTINE W2_E2SETUP_527 C Topology for tile 527 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(527)=34 exch2_tNy(527)=51 exch2_tBasex(527)=34 exch2_tBasey(527)=255 exch2_txGlobalo(527)=1565 exch2_tyGlobalo(527)=256 exch2_isWedge(527)=0 exch2_isNedge(527)=0 exch2_isEedge(527)=0 exch2_isSedge(527)=0 exch2_myFace(527)=4 exch2_mydNx(527)=510 exch2_mydNy(527)=510 exch2_nNeighbours(527)=4 exch2_neighbourId(1,527)=542 exch2_iLo(1,527)=0 exch2_iHi(1,527)=35 exch2_jLo(1,527)=52 exch2_jHi(1,527)=52 exch2_opposingSend(1,527)=2 exch2_pij(1,1,527)=1 exch2_pij(2,1,527)=0 exch2_pij(3,1,527)=0 exch2_pij(4,1,527)=1 exch2_oi(1,527)=0 exch2_oj(1,527)=0 exch2_neighbourId(2,527)=512 exch2_iLo(2,527)=0 exch2_iHi(2,527)=35 exch2_jLo(2,527)=0 exch2_jHi(2,527)=0 exch2_opposingSend(2,527)=1 exch2_pij(1,2,527)=1 exch2_pij(2,2,527)=0 exch2_pij(3,2,527)=0 exch2_pij(4,2,527)=1 exch2_oi(2,527)=0 exch2_oj(2,527)=0 exch2_neighbourId(3,527)=528 exch2_iLo(3,527)=35 exch2_iHi(3,527)=35 exch2_jLo(3,527)=0 exch2_jHi(3,527)=52 exch2_opposingSend(3,527)=4 exch2_pij(1,3,527)=1 exch2_pij(2,3,527)=0 exch2_pij(3,3,527)=0 exch2_pij(4,3,527)=1 exch2_oi(3,527)=0 exch2_oj(3,527)=0 exch2_neighbourId(4,527)=526 exch2_iLo(4,527)=0 exch2_iHi(4,527)=0 exch2_jLo(4,527)=0 exch2_jHi(4,527)=52 exch2_opposingSend(4,527)=3 exch2_pij(1,4,527)=1 exch2_pij(2,4,527)=0 exch2_pij(3,4,527)=0 exch2_pij(4,4,527)=1 exch2_oi(4,527)=0 exch2_oj(4,527)=0 RETURN END SUBROUTINE W2_E2SETUP_528 C Topology for tile 528 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(528)=34 exch2_tNy(528)=51 exch2_tBasex(528)=68 exch2_tBasey(528)=255 exch2_txGlobalo(528)=1599 exch2_tyGlobalo(528)=256 exch2_isWedge(528)=0 exch2_isNedge(528)=0 exch2_isEedge(528)=0 exch2_isSedge(528)=0 exch2_myFace(528)=4 exch2_mydNx(528)=510 exch2_mydNy(528)=510 exch2_nNeighbours(528)=4 exch2_neighbourId(1,528)=543 exch2_iLo(1,528)=0 exch2_iHi(1,528)=35 exch2_jLo(1,528)=52 exch2_jHi(1,528)=52 exch2_opposingSend(1,528)=2 exch2_pij(1,1,528)=1 exch2_pij(2,1,528)=0 exch2_pij(3,1,528)=0 exch2_pij(4,1,528)=1 exch2_oi(1,528)=0 exch2_oj(1,528)=0 exch2_neighbourId(2,528)=513 exch2_iLo(2,528)=0 exch2_iHi(2,528)=35 exch2_jLo(2,528)=0 exch2_jHi(2,528)=0 exch2_opposingSend(2,528)=1 exch2_pij(1,2,528)=1 exch2_pij(2,2,528)=0 exch2_pij(3,2,528)=0 exch2_pij(4,2,528)=1 exch2_oi(2,528)=0 exch2_oj(2,528)=0 exch2_neighbourId(3,528)=529 exch2_iLo(3,528)=35 exch2_iHi(3,528)=35 exch2_jLo(3,528)=0 exch2_jHi(3,528)=52 exch2_opposingSend(3,528)=4 exch2_pij(1,3,528)=1 exch2_pij(2,3,528)=0 exch2_pij(3,3,528)=0 exch2_pij(4,3,528)=1 exch2_oi(3,528)=0 exch2_oj(3,528)=0 exch2_neighbourId(4,528)=527 exch2_iLo(4,528)=0 exch2_iHi(4,528)=0 exch2_jLo(4,528)=0 exch2_jHi(4,528)=52 exch2_opposingSend(4,528)=3 exch2_pij(1,4,528)=1 exch2_pij(2,4,528)=0 exch2_pij(3,4,528)=0 exch2_pij(4,4,528)=1 exch2_oi(4,528)=0 exch2_oj(4,528)=0 RETURN END SUBROUTINE W2_E2SETUP_529 C Topology for tile 529 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(529)=34 exch2_tNy(529)=51 exch2_tBasex(529)=102 exch2_tBasey(529)=255 exch2_txGlobalo(529)=1633 exch2_tyGlobalo(529)=256 exch2_isWedge(529)=0 exch2_isNedge(529)=0 exch2_isEedge(529)=0 exch2_isSedge(529)=0 exch2_myFace(529)=4 exch2_mydNx(529)=510 exch2_mydNy(529)=510 exch2_nNeighbours(529)=4 exch2_neighbourId(1,529)=544 exch2_iLo(1,529)=0 exch2_iHi(1,529)=35 exch2_jLo(1,529)=52 exch2_jHi(1,529)=52 exch2_opposingSend(1,529)=2 exch2_pij(1,1,529)=1 exch2_pij(2,1,529)=0 exch2_pij(3,1,529)=0 exch2_pij(4,1,529)=1 exch2_oi(1,529)=0 exch2_oj(1,529)=0 exch2_neighbourId(2,529)=514 exch2_iLo(2,529)=0 exch2_iHi(2,529)=35 exch2_jLo(2,529)=0 exch2_jHi(2,529)=0 exch2_opposingSend(2,529)=1 exch2_pij(1,2,529)=1 exch2_pij(2,2,529)=0 exch2_pij(3,2,529)=0 exch2_pij(4,2,529)=1 exch2_oi(2,529)=0 exch2_oj(2,529)=0 exch2_neighbourId(3,529)=530 exch2_iLo(3,529)=35 exch2_iHi(3,529)=35 exch2_jLo(3,529)=0 exch2_jHi(3,529)=52 exch2_opposingSend(3,529)=4 exch2_pij(1,3,529)=1 exch2_pij(2,3,529)=0 exch2_pij(3,3,529)=0 exch2_pij(4,3,529)=1 exch2_oi(3,529)=0 exch2_oj(3,529)=0 exch2_neighbourId(4,529)=528 exch2_iLo(4,529)=0 exch2_iHi(4,529)=0 exch2_jLo(4,529)=0 exch2_jHi(4,529)=52 exch2_opposingSend(4,529)=3 exch2_pij(1,4,529)=1 exch2_pij(2,4,529)=0 exch2_pij(3,4,529)=0 exch2_pij(4,4,529)=1 exch2_oi(4,529)=0 exch2_oj(4,529)=0 RETURN END SUBROUTINE W2_E2SETUP_530 C Topology for tile 530 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(530)=34 exch2_tNy(530)=51 exch2_tBasex(530)=136 exch2_tBasey(530)=255 exch2_txGlobalo(530)=1667 exch2_tyGlobalo(530)=256 exch2_isWedge(530)=0 exch2_isNedge(530)=0 exch2_isEedge(530)=0 exch2_isSedge(530)=0 exch2_myFace(530)=4 exch2_mydNx(530)=510 exch2_mydNy(530)=510 exch2_nNeighbours(530)=4 exch2_neighbourId(1,530)=545 exch2_iLo(1,530)=0 exch2_iHi(1,530)=35 exch2_jLo(1,530)=52 exch2_jHi(1,530)=52 exch2_opposingSend(1,530)=2 exch2_pij(1,1,530)=1 exch2_pij(2,1,530)=0 exch2_pij(3,1,530)=0 exch2_pij(4,1,530)=1 exch2_oi(1,530)=0 exch2_oj(1,530)=0 exch2_neighbourId(2,530)=515 exch2_iLo(2,530)=0 exch2_iHi(2,530)=35 exch2_jLo(2,530)=0 exch2_jHi(2,530)=0 exch2_opposingSend(2,530)=1 exch2_pij(1,2,530)=1 exch2_pij(2,2,530)=0 exch2_pij(3,2,530)=0 exch2_pij(4,2,530)=1 exch2_oi(2,530)=0 exch2_oj(2,530)=0 exch2_neighbourId(3,530)=531 exch2_iLo(3,530)=35 exch2_iHi(3,530)=35 exch2_jLo(3,530)=0 exch2_jHi(3,530)=52 exch2_opposingSend(3,530)=4 exch2_pij(1,3,530)=1 exch2_pij(2,3,530)=0 exch2_pij(3,3,530)=0 exch2_pij(4,3,530)=1 exch2_oi(3,530)=0 exch2_oj(3,530)=0 exch2_neighbourId(4,530)=529 exch2_iLo(4,530)=0 exch2_iHi(4,530)=0 exch2_jLo(4,530)=0 exch2_jHi(4,530)=52 exch2_opposingSend(4,530)=3 exch2_pij(1,4,530)=1 exch2_pij(2,4,530)=0 exch2_pij(3,4,530)=0 exch2_pij(4,4,530)=1 exch2_oi(4,530)=0 exch2_oj(4,530)=0 RETURN END SUBROUTINE W2_E2SETUP_531 C Topology for tile 531 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(531)=34 exch2_tNy(531)=51 exch2_tBasex(531)=170 exch2_tBasey(531)=255 exch2_txGlobalo(531)=1701 exch2_tyGlobalo(531)=256 exch2_isWedge(531)=0 exch2_isNedge(531)=0 exch2_isEedge(531)=0 exch2_isSedge(531)=0 exch2_myFace(531)=4 exch2_mydNx(531)=510 exch2_mydNy(531)=510 exch2_nNeighbours(531)=4 exch2_neighbourId(1,531)=546 exch2_iLo(1,531)=0 exch2_iHi(1,531)=35 exch2_jLo(1,531)=52 exch2_jHi(1,531)=52 exch2_opposingSend(1,531)=2 exch2_pij(1,1,531)=1 exch2_pij(2,1,531)=0 exch2_pij(3,1,531)=0 exch2_pij(4,1,531)=1 exch2_oi(1,531)=0 exch2_oj(1,531)=0 exch2_neighbourId(2,531)=516 exch2_iLo(2,531)=0 exch2_iHi(2,531)=35 exch2_jLo(2,531)=0 exch2_jHi(2,531)=0 exch2_opposingSend(2,531)=1 exch2_pij(1,2,531)=1 exch2_pij(2,2,531)=0 exch2_pij(3,2,531)=0 exch2_pij(4,2,531)=1 exch2_oi(2,531)=0 exch2_oj(2,531)=0 exch2_neighbourId(3,531)=532 exch2_iLo(3,531)=35 exch2_iHi(3,531)=35 exch2_jLo(3,531)=0 exch2_jHi(3,531)=52 exch2_opposingSend(3,531)=4 exch2_pij(1,3,531)=1 exch2_pij(2,3,531)=0 exch2_pij(3,3,531)=0 exch2_pij(4,3,531)=1 exch2_oi(3,531)=0 exch2_oj(3,531)=0 exch2_neighbourId(4,531)=530 exch2_iLo(4,531)=0 exch2_iHi(4,531)=0 exch2_jLo(4,531)=0 exch2_jHi(4,531)=52 exch2_opposingSend(4,531)=3 exch2_pij(1,4,531)=1 exch2_pij(2,4,531)=0 exch2_pij(3,4,531)=0 exch2_pij(4,4,531)=1 exch2_oi(4,531)=0 exch2_oj(4,531)=0 RETURN END SUBROUTINE W2_E2SETUP_532 C Topology for tile 532 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(532)=34 exch2_tNy(532)=51 exch2_tBasex(532)=204 exch2_tBasey(532)=255 exch2_txGlobalo(532)=1735 exch2_tyGlobalo(532)=256 exch2_isWedge(532)=0 exch2_isNedge(532)=0 exch2_isEedge(532)=0 exch2_isSedge(532)=0 exch2_myFace(532)=4 exch2_mydNx(532)=510 exch2_mydNy(532)=510 exch2_nNeighbours(532)=4 exch2_neighbourId(1,532)=547 exch2_iLo(1,532)=0 exch2_iHi(1,532)=35 exch2_jLo(1,532)=52 exch2_jHi(1,532)=52 exch2_opposingSend(1,532)=2 exch2_pij(1,1,532)=1 exch2_pij(2,1,532)=0 exch2_pij(3,1,532)=0 exch2_pij(4,1,532)=1 exch2_oi(1,532)=0 exch2_oj(1,532)=0 exch2_neighbourId(2,532)=517 exch2_iLo(2,532)=0 exch2_iHi(2,532)=35 exch2_jLo(2,532)=0 exch2_jHi(2,532)=0 exch2_opposingSend(2,532)=1 exch2_pij(1,2,532)=1 exch2_pij(2,2,532)=0 exch2_pij(3,2,532)=0 exch2_pij(4,2,532)=1 exch2_oi(2,532)=0 exch2_oj(2,532)=0 exch2_neighbourId(3,532)=533 exch2_iLo(3,532)=35 exch2_iHi(3,532)=35 exch2_jLo(3,532)=0 exch2_jHi(3,532)=52 exch2_opposingSend(3,532)=4 exch2_pij(1,3,532)=1 exch2_pij(2,3,532)=0 exch2_pij(3,3,532)=0 exch2_pij(4,3,532)=1 exch2_oi(3,532)=0 exch2_oj(3,532)=0 exch2_neighbourId(4,532)=531 exch2_iLo(4,532)=0 exch2_iHi(4,532)=0 exch2_jLo(4,532)=0 exch2_jHi(4,532)=52 exch2_opposingSend(4,532)=3 exch2_pij(1,4,532)=1 exch2_pij(2,4,532)=0 exch2_pij(3,4,532)=0 exch2_pij(4,4,532)=1 exch2_oi(4,532)=0 exch2_oj(4,532)=0 RETURN END SUBROUTINE W2_E2SETUP_533 C Topology for tile 533 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(533)=34 exch2_tNy(533)=51 exch2_tBasex(533)=238 exch2_tBasey(533)=255 exch2_txGlobalo(533)=1769 exch2_tyGlobalo(533)=256 exch2_isWedge(533)=0 exch2_isNedge(533)=0 exch2_isEedge(533)=0 exch2_isSedge(533)=0 exch2_myFace(533)=4 exch2_mydNx(533)=510 exch2_mydNy(533)=510 exch2_nNeighbours(533)=4 exch2_neighbourId(1,533)=548 exch2_iLo(1,533)=0 exch2_iHi(1,533)=35 exch2_jLo(1,533)=52 exch2_jHi(1,533)=52 exch2_opposingSend(1,533)=2 exch2_pij(1,1,533)=1 exch2_pij(2,1,533)=0 exch2_pij(3,1,533)=0 exch2_pij(4,1,533)=1 exch2_oi(1,533)=0 exch2_oj(1,533)=0 exch2_neighbourId(2,533)=518 exch2_iLo(2,533)=0 exch2_iHi(2,533)=35 exch2_jLo(2,533)=0 exch2_jHi(2,533)=0 exch2_opposingSend(2,533)=1 exch2_pij(1,2,533)=1 exch2_pij(2,2,533)=0 exch2_pij(3,2,533)=0 exch2_pij(4,2,533)=1 exch2_oi(2,533)=0 exch2_oj(2,533)=0 exch2_neighbourId(3,533)=534 exch2_iLo(3,533)=35 exch2_iHi(3,533)=35 exch2_jLo(3,533)=0 exch2_jHi(3,533)=52 exch2_opposingSend(3,533)=4 exch2_pij(1,3,533)=1 exch2_pij(2,3,533)=0 exch2_pij(3,3,533)=0 exch2_pij(4,3,533)=1 exch2_oi(3,533)=0 exch2_oj(3,533)=0 exch2_neighbourId(4,533)=532 exch2_iLo(4,533)=0 exch2_iHi(4,533)=0 exch2_jLo(4,533)=0 exch2_jHi(4,533)=52 exch2_opposingSend(4,533)=3 exch2_pij(1,4,533)=1 exch2_pij(2,4,533)=0 exch2_pij(3,4,533)=0 exch2_pij(4,4,533)=1 exch2_oi(4,533)=0 exch2_oj(4,533)=0 RETURN END SUBROUTINE W2_E2SETUP_534 C Topology for tile 534 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(534)=34 exch2_tNy(534)=51 exch2_tBasex(534)=272 exch2_tBasey(534)=255 exch2_txGlobalo(534)=1803 exch2_tyGlobalo(534)=256 exch2_isWedge(534)=0 exch2_isNedge(534)=0 exch2_isEedge(534)=0 exch2_isSedge(534)=0 exch2_myFace(534)=4 exch2_mydNx(534)=510 exch2_mydNy(534)=510 exch2_nNeighbours(534)=4 exch2_neighbourId(1,534)=549 exch2_iLo(1,534)=0 exch2_iHi(1,534)=35 exch2_jLo(1,534)=52 exch2_jHi(1,534)=52 exch2_opposingSend(1,534)=2 exch2_pij(1,1,534)=1 exch2_pij(2,1,534)=0 exch2_pij(3,1,534)=0 exch2_pij(4,1,534)=1 exch2_oi(1,534)=0 exch2_oj(1,534)=0 exch2_neighbourId(2,534)=519 exch2_iLo(2,534)=0 exch2_iHi(2,534)=35 exch2_jLo(2,534)=0 exch2_jHi(2,534)=0 exch2_opposingSend(2,534)=1 exch2_pij(1,2,534)=1 exch2_pij(2,2,534)=0 exch2_pij(3,2,534)=0 exch2_pij(4,2,534)=1 exch2_oi(2,534)=0 exch2_oj(2,534)=0 exch2_neighbourId(3,534)=535 exch2_iLo(3,534)=35 exch2_iHi(3,534)=35 exch2_jLo(3,534)=0 exch2_jHi(3,534)=52 exch2_opposingSend(3,534)=4 exch2_pij(1,3,534)=1 exch2_pij(2,3,534)=0 exch2_pij(3,3,534)=0 exch2_pij(4,3,534)=1 exch2_oi(3,534)=0 exch2_oj(3,534)=0 exch2_neighbourId(4,534)=533 exch2_iLo(4,534)=0 exch2_iHi(4,534)=0 exch2_jLo(4,534)=0 exch2_jHi(4,534)=52 exch2_opposingSend(4,534)=3 exch2_pij(1,4,534)=1 exch2_pij(2,4,534)=0 exch2_pij(3,4,534)=0 exch2_pij(4,4,534)=1 exch2_oi(4,534)=0 exch2_oj(4,534)=0 RETURN END SUBROUTINE W2_E2SETUP_535 C Topology for tile 535 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(535)=34 exch2_tNy(535)=51 exch2_tBasex(535)=306 exch2_tBasey(535)=255 exch2_txGlobalo(535)=1837 exch2_tyGlobalo(535)=256 exch2_isWedge(535)=0 exch2_isNedge(535)=0 exch2_isEedge(535)=0 exch2_isSedge(535)=0 exch2_myFace(535)=4 exch2_mydNx(535)=510 exch2_mydNy(535)=510 exch2_nNeighbours(535)=4 exch2_neighbourId(1,535)=550 exch2_iLo(1,535)=0 exch2_iHi(1,535)=35 exch2_jLo(1,535)=52 exch2_jHi(1,535)=52 exch2_opposingSend(1,535)=2 exch2_pij(1,1,535)=1 exch2_pij(2,1,535)=0 exch2_pij(3,1,535)=0 exch2_pij(4,1,535)=1 exch2_oi(1,535)=0 exch2_oj(1,535)=0 exch2_neighbourId(2,535)=520 exch2_iLo(2,535)=0 exch2_iHi(2,535)=35 exch2_jLo(2,535)=0 exch2_jHi(2,535)=0 exch2_opposingSend(2,535)=1 exch2_pij(1,2,535)=1 exch2_pij(2,2,535)=0 exch2_pij(3,2,535)=0 exch2_pij(4,2,535)=1 exch2_oi(2,535)=0 exch2_oj(2,535)=0 exch2_neighbourId(3,535)=536 exch2_iLo(3,535)=35 exch2_iHi(3,535)=35 exch2_jLo(3,535)=0 exch2_jHi(3,535)=52 exch2_opposingSend(3,535)=4 exch2_pij(1,3,535)=1 exch2_pij(2,3,535)=0 exch2_pij(3,3,535)=0 exch2_pij(4,3,535)=1 exch2_oi(3,535)=0 exch2_oj(3,535)=0 exch2_neighbourId(4,535)=534 exch2_iLo(4,535)=0 exch2_iHi(4,535)=0 exch2_jLo(4,535)=0 exch2_jHi(4,535)=52 exch2_opposingSend(4,535)=3 exch2_pij(1,4,535)=1 exch2_pij(2,4,535)=0 exch2_pij(3,4,535)=0 exch2_pij(4,4,535)=1 exch2_oi(4,535)=0 exch2_oj(4,535)=0 RETURN END SUBROUTINE W2_E2SETUP_536 C Topology for tile 536 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(536)=34 exch2_tNy(536)=51 exch2_tBasex(536)=340 exch2_tBasey(536)=255 exch2_txGlobalo(536)=1871 exch2_tyGlobalo(536)=256 exch2_isWedge(536)=0 exch2_isNedge(536)=0 exch2_isEedge(536)=0 exch2_isSedge(536)=0 exch2_myFace(536)=4 exch2_mydNx(536)=510 exch2_mydNy(536)=510 exch2_nNeighbours(536)=4 exch2_neighbourId(1,536)=551 exch2_iLo(1,536)=0 exch2_iHi(1,536)=35 exch2_jLo(1,536)=52 exch2_jHi(1,536)=52 exch2_opposingSend(1,536)=2 exch2_pij(1,1,536)=1 exch2_pij(2,1,536)=0 exch2_pij(3,1,536)=0 exch2_pij(4,1,536)=1 exch2_oi(1,536)=0 exch2_oj(1,536)=0 exch2_neighbourId(2,536)=521 exch2_iLo(2,536)=0 exch2_iHi(2,536)=35 exch2_jLo(2,536)=0 exch2_jHi(2,536)=0 exch2_opposingSend(2,536)=1 exch2_pij(1,2,536)=1 exch2_pij(2,2,536)=0 exch2_pij(3,2,536)=0 exch2_pij(4,2,536)=1 exch2_oi(2,536)=0 exch2_oj(2,536)=0 exch2_neighbourId(3,536)=537 exch2_iLo(3,536)=35 exch2_iHi(3,536)=35 exch2_jLo(3,536)=0 exch2_jHi(3,536)=52 exch2_opposingSend(3,536)=4 exch2_pij(1,3,536)=1 exch2_pij(2,3,536)=0 exch2_pij(3,3,536)=0 exch2_pij(4,3,536)=1 exch2_oi(3,536)=0 exch2_oj(3,536)=0 exch2_neighbourId(4,536)=535 exch2_iLo(4,536)=0 exch2_iHi(4,536)=0 exch2_jLo(4,536)=0 exch2_jHi(4,536)=52 exch2_opposingSend(4,536)=3 exch2_pij(1,4,536)=1 exch2_pij(2,4,536)=0 exch2_pij(3,4,536)=0 exch2_pij(4,4,536)=1 exch2_oi(4,536)=0 exch2_oj(4,536)=0 RETURN END SUBROUTINE W2_E2SETUP_537 C Topology for tile 537 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(537)=34 exch2_tNy(537)=51 exch2_tBasex(537)=374 exch2_tBasey(537)=255 exch2_txGlobalo(537)=1905 exch2_tyGlobalo(537)=256 exch2_isWedge(537)=0 exch2_isNedge(537)=0 exch2_isEedge(537)=0 exch2_isSedge(537)=0 exch2_myFace(537)=4 exch2_mydNx(537)=510 exch2_mydNy(537)=510 exch2_nNeighbours(537)=4 exch2_neighbourId(1,537)=552 exch2_iLo(1,537)=0 exch2_iHi(1,537)=35 exch2_jLo(1,537)=52 exch2_jHi(1,537)=52 exch2_opposingSend(1,537)=2 exch2_pij(1,1,537)=1 exch2_pij(2,1,537)=0 exch2_pij(3,1,537)=0 exch2_pij(4,1,537)=1 exch2_oi(1,537)=0 exch2_oj(1,537)=0 exch2_neighbourId(2,537)=522 exch2_iLo(2,537)=0 exch2_iHi(2,537)=35 exch2_jLo(2,537)=0 exch2_jHi(2,537)=0 exch2_opposingSend(2,537)=1 exch2_pij(1,2,537)=1 exch2_pij(2,2,537)=0 exch2_pij(3,2,537)=0 exch2_pij(4,2,537)=1 exch2_oi(2,537)=0 exch2_oj(2,537)=0 exch2_neighbourId(3,537)=538 exch2_iLo(3,537)=35 exch2_iHi(3,537)=35 exch2_jLo(3,537)=0 exch2_jHi(3,537)=52 exch2_opposingSend(3,537)=4 exch2_pij(1,3,537)=1 exch2_pij(2,3,537)=0 exch2_pij(3,3,537)=0 exch2_pij(4,3,537)=1 exch2_oi(3,537)=0 exch2_oj(3,537)=0 exch2_neighbourId(4,537)=536 exch2_iLo(4,537)=0 exch2_iHi(4,537)=0 exch2_jLo(4,537)=0 exch2_jHi(4,537)=52 exch2_opposingSend(4,537)=3 exch2_pij(1,4,537)=1 exch2_pij(2,4,537)=0 exch2_pij(3,4,537)=0 exch2_pij(4,4,537)=1 exch2_oi(4,537)=0 exch2_oj(4,537)=0 RETURN END SUBROUTINE W2_E2SETUP_538 C Topology for tile 538 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(538)=34 exch2_tNy(538)=51 exch2_tBasex(538)=408 exch2_tBasey(538)=255 exch2_txGlobalo(538)=1939 exch2_tyGlobalo(538)=256 exch2_isWedge(538)=0 exch2_isNedge(538)=0 exch2_isEedge(538)=0 exch2_isSedge(538)=0 exch2_myFace(538)=4 exch2_mydNx(538)=510 exch2_mydNy(538)=510 exch2_nNeighbours(538)=4 exch2_neighbourId(1,538)=553 exch2_iLo(1,538)=0 exch2_iHi(1,538)=35 exch2_jLo(1,538)=52 exch2_jHi(1,538)=52 exch2_opposingSend(1,538)=2 exch2_pij(1,1,538)=1 exch2_pij(2,1,538)=0 exch2_pij(3,1,538)=0 exch2_pij(4,1,538)=1 exch2_oi(1,538)=0 exch2_oj(1,538)=0 exch2_neighbourId(2,538)=523 exch2_iLo(2,538)=0 exch2_iHi(2,538)=35 exch2_jLo(2,538)=0 exch2_jHi(2,538)=0 exch2_opposingSend(2,538)=1 exch2_pij(1,2,538)=1 exch2_pij(2,2,538)=0 exch2_pij(3,2,538)=0 exch2_pij(4,2,538)=1 exch2_oi(2,538)=0 exch2_oj(2,538)=0 exch2_neighbourId(3,538)=539 exch2_iLo(3,538)=35 exch2_iHi(3,538)=35 exch2_jLo(3,538)=0 exch2_jHi(3,538)=52 exch2_opposingSend(3,538)=4 exch2_pij(1,3,538)=1 exch2_pij(2,3,538)=0 exch2_pij(3,3,538)=0 exch2_pij(4,3,538)=1 exch2_oi(3,538)=0 exch2_oj(3,538)=0 exch2_neighbourId(4,538)=537 exch2_iLo(4,538)=0 exch2_iHi(4,538)=0 exch2_jLo(4,538)=0 exch2_jHi(4,538)=52 exch2_opposingSend(4,538)=3 exch2_pij(1,4,538)=1 exch2_pij(2,4,538)=0 exch2_pij(3,4,538)=0 exch2_pij(4,4,538)=1 exch2_oi(4,538)=0 exch2_oj(4,538)=0 RETURN END SUBROUTINE W2_E2SETUP_539 C Topology for tile 539 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(539)=34 exch2_tNy(539)=51 exch2_tBasex(539)=442 exch2_tBasey(539)=255 exch2_txGlobalo(539)=1973 exch2_tyGlobalo(539)=256 exch2_isWedge(539)=0 exch2_isNedge(539)=0 exch2_isEedge(539)=0 exch2_isSedge(539)=0 exch2_myFace(539)=4 exch2_mydNx(539)=510 exch2_mydNy(539)=510 exch2_nNeighbours(539)=4 exch2_neighbourId(1,539)=554 exch2_iLo(1,539)=0 exch2_iHi(1,539)=35 exch2_jLo(1,539)=52 exch2_jHi(1,539)=52 exch2_opposingSend(1,539)=2 exch2_pij(1,1,539)=1 exch2_pij(2,1,539)=0 exch2_pij(3,1,539)=0 exch2_pij(4,1,539)=1 exch2_oi(1,539)=0 exch2_oj(1,539)=0 exch2_neighbourId(2,539)=524 exch2_iLo(2,539)=0 exch2_iHi(2,539)=35 exch2_jLo(2,539)=0 exch2_jHi(2,539)=0 exch2_opposingSend(2,539)=1 exch2_pij(1,2,539)=1 exch2_pij(2,2,539)=0 exch2_pij(3,2,539)=0 exch2_pij(4,2,539)=1 exch2_oi(2,539)=0 exch2_oj(2,539)=0 exch2_neighbourId(3,539)=540 exch2_iLo(3,539)=35 exch2_iHi(3,539)=35 exch2_jLo(3,539)=0 exch2_jHi(3,539)=52 exch2_opposingSend(3,539)=5 exch2_pij(1,3,539)=1 exch2_pij(2,3,539)=0 exch2_pij(3,3,539)=0 exch2_pij(4,3,539)=1 exch2_oi(3,539)=0 exch2_oj(3,539)=0 exch2_neighbourId(4,539)=538 exch2_iLo(4,539)=0 exch2_iHi(4,539)=0 exch2_jLo(4,539)=0 exch2_jHi(4,539)=52 exch2_opposingSend(4,539)=3 exch2_pij(1,4,539)=1 exch2_pij(2,4,539)=0 exch2_pij(3,4,539)=0 exch2_pij(4,4,539)=1 exch2_oi(4,539)=0 exch2_oj(4,539)=0 RETURN END SUBROUTINE W2_E2SETUP_540 C Topology for tile 540 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(540)=34 exch2_tNy(540)=51 exch2_tBasex(540)=476 exch2_tBasey(540)=255 exch2_txGlobalo(540)=2007 exch2_tyGlobalo(540)=256 exch2_isWedge(540)=0 exch2_isNedge(540)=0 exch2_isEedge(540)=1 exch2_isSedge(540)=0 exch2_myFace(540)=4 exch2_mydNx(540)=510 exch2_mydNy(540)=510 exch2_nNeighbours(540)=5 exch2_neighbourId(1,540)=555 exch2_iLo(1,540)=0 exch2_iHi(1,540)=35 exch2_jLo(1,540)=52 exch2_jHi(1,540)=52 exch2_opposingSend(1,540)=2 exch2_pij(1,1,540)=1 exch2_pij(2,1,540)=0 exch2_pij(3,1,540)=0 exch2_pij(4,1,540)=1 exch2_oi(1,540)=0 exch2_oj(1,540)=0 exch2_neighbourId(2,540)=525 exch2_iLo(2,540)=0 exch2_iHi(2,540)=35 exch2_jLo(2,540)=0 exch2_jHi(2,540)=0 exch2_opposingSend(2,540)=1 exch2_pij(1,2,540)=1 exch2_pij(2,2,540)=0 exch2_pij(3,2,540)=0 exch2_pij(4,2,540)=1 exch2_oi(2,540)=0 exch2_oj(2,540)=0 exch2_neighbourId(3,540)=757 exch2_iLo(3,540)=35 exch2_iHi(3,540)=35 exch2_jLo(3,540)=17 exch2_jHi(3,540)=52 exch2_opposingSend(3,540)=2 exch2_pij(1,3,540)=0 exch2_pij(2,3,540)=1 exch2_pij(3,3,540)=-1 exch2_pij(4,3,540)=0 exch2_oi(3,540)=510 exch2_oj(3,540)=511 exch2_neighbourId(4,540)=758 exch2_iLo(4,540)=35 exch2_iHi(4,540)=35 exch2_jLo(4,540)=0 exch2_jHi(4,540)=18 exch2_opposingSend(4,540)=3 exch2_pij(1,4,540)=0 exch2_pij(2,4,540)=1 exch2_pij(3,4,540)=-1 exch2_pij(4,4,540)=0 exch2_oi(4,540)=510 exch2_oj(4,540)=511 exch2_neighbourId(5,540)=539 exch2_iLo(5,540)=0 exch2_iHi(5,540)=0 exch2_jLo(5,540)=0 exch2_jHi(5,540)=52 exch2_opposingSend(5,540)=3 exch2_pij(1,5,540)=1 exch2_pij(2,5,540)=0 exch2_pij(3,5,540)=0 exch2_pij(4,5,540)=1 exch2_oi(5,540)=0 exch2_oj(5,540)=0 RETURN END SUBROUTINE W2_E2SETUP_541 C Topology for tile 541 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(541)=34 exch2_tNy(541)=51 exch2_tBasex(541)=0 exch2_tBasey(541)=306 exch2_txGlobalo(541)=1531 exch2_tyGlobalo(541)=307 exch2_isWedge(541)=1 exch2_isNedge(541)=0 exch2_isEedge(541)=0 exch2_isSedge(541)=0 exch2_myFace(541)=4 exch2_mydNx(541)=510 exch2_mydNy(541)=510 exch2_nNeighbours(541)=4 exch2_neighbourId(1,541)=556 exch2_iLo(1,541)=0 exch2_iHi(1,541)=35 exch2_jLo(1,541)=52 exch2_jHi(1,541)=52 exch2_opposingSend(1,541)=2 exch2_pij(1,1,541)=1 exch2_pij(2,1,541)=0 exch2_pij(3,1,541)=0 exch2_pij(4,1,541)=1 exch2_oi(1,541)=0 exch2_oj(1,541)=0 exch2_neighbourId(2,541)=526 exch2_iLo(2,541)=0 exch2_iHi(2,541)=35 exch2_jLo(2,541)=0 exch2_jHi(2,541)=0 exch2_opposingSend(2,541)=1 exch2_pij(1,2,541)=1 exch2_pij(2,2,541)=0 exch2_pij(3,2,541)=0 exch2_pij(4,2,541)=1 exch2_oi(2,541)=0 exch2_oj(2,541)=0 exch2_neighbourId(3,541)=542 exch2_iLo(3,541)=35 exch2_iHi(3,541)=35 exch2_jLo(3,541)=0 exch2_jHi(3,541)=52 exch2_opposingSend(3,541)=4 exch2_pij(1,3,541)=1 exch2_pij(2,3,541)=0 exch2_pij(3,3,541)=0 exch2_pij(4,3,541)=1 exch2_oi(3,541)=0 exch2_oj(3,541)=0 exch2_neighbourId(4,541)=405 exch2_iLo(4,541)=0 exch2_iHi(4,541)=0 exch2_jLo(4,541)=0 exch2_jHi(4,541)=52 exch2_opposingSend(4,541)=3 exch2_pij(1,4,541)=1 exch2_pij(2,4,541)=0 exch2_pij(3,4,541)=0 exch2_pij(4,4,541)=1 exch2_oi(4,541)=-510 exch2_oj(4,541)=0 RETURN END SUBROUTINE W2_E2SETUP_542 C Topology for tile 542 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(542)=34 exch2_tNy(542)=51 exch2_tBasex(542)=34 exch2_tBasey(542)=306 exch2_txGlobalo(542)=1565 exch2_tyGlobalo(542)=307 exch2_isWedge(542)=0 exch2_isNedge(542)=0 exch2_isEedge(542)=0 exch2_isSedge(542)=0 exch2_myFace(542)=4 exch2_mydNx(542)=510 exch2_mydNy(542)=510 exch2_nNeighbours(542)=4 exch2_neighbourId(1,542)=557 exch2_iLo(1,542)=0 exch2_iHi(1,542)=35 exch2_jLo(1,542)=52 exch2_jHi(1,542)=52 exch2_opposingSend(1,542)=2 exch2_pij(1,1,542)=1 exch2_pij(2,1,542)=0 exch2_pij(3,1,542)=0 exch2_pij(4,1,542)=1 exch2_oi(1,542)=0 exch2_oj(1,542)=0 exch2_neighbourId(2,542)=527 exch2_iLo(2,542)=0 exch2_iHi(2,542)=35 exch2_jLo(2,542)=0 exch2_jHi(2,542)=0 exch2_opposingSend(2,542)=1 exch2_pij(1,2,542)=1 exch2_pij(2,2,542)=0 exch2_pij(3,2,542)=0 exch2_pij(4,2,542)=1 exch2_oi(2,542)=0 exch2_oj(2,542)=0 exch2_neighbourId(3,542)=543 exch2_iLo(3,542)=35 exch2_iHi(3,542)=35 exch2_jLo(3,542)=0 exch2_jHi(3,542)=52 exch2_opposingSend(3,542)=4 exch2_pij(1,3,542)=1 exch2_pij(2,3,542)=0 exch2_pij(3,3,542)=0 exch2_pij(4,3,542)=1 exch2_oi(3,542)=0 exch2_oj(3,542)=0 exch2_neighbourId(4,542)=541 exch2_iLo(4,542)=0 exch2_iHi(4,542)=0 exch2_jLo(4,542)=0 exch2_jHi(4,542)=52 exch2_opposingSend(4,542)=3 exch2_pij(1,4,542)=1 exch2_pij(2,4,542)=0 exch2_pij(3,4,542)=0 exch2_pij(4,4,542)=1 exch2_oi(4,542)=0 exch2_oj(4,542)=0 RETURN END SUBROUTINE W2_E2SETUP_543 C Topology for tile 543 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(543)=34 exch2_tNy(543)=51 exch2_tBasex(543)=68 exch2_tBasey(543)=306 exch2_txGlobalo(543)=1599 exch2_tyGlobalo(543)=307 exch2_isWedge(543)=0 exch2_isNedge(543)=0 exch2_isEedge(543)=0 exch2_isSedge(543)=0 exch2_myFace(543)=4 exch2_mydNx(543)=510 exch2_mydNy(543)=510 exch2_nNeighbours(543)=4 exch2_neighbourId(1,543)=558 exch2_iLo(1,543)=0 exch2_iHi(1,543)=35 exch2_jLo(1,543)=52 exch2_jHi(1,543)=52 exch2_opposingSend(1,543)=2 exch2_pij(1,1,543)=1 exch2_pij(2,1,543)=0 exch2_pij(3,1,543)=0 exch2_pij(4,1,543)=1 exch2_oi(1,543)=0 exch2_oj(1,543)=0 exch2_neighbourId(2,543)=528 exch2_iLo(2,543)=0 exch2_iHi(2,543)=35 exch2_jLo(2,543)=0 exch2_jHi(2,543)=0 exch2_opposingSend(2,543)=1 exch2_pij(1,2,543)=1 exch2_pij(2,2,543)=0 exch2_pij(3,2,543)=0 exch2_pij(4,2,543)=1 exch2_oi(2,543)=0 exch2_oj(2,543)=0 exch2_neighbourId(3,543)=544 exch2_iLo(3,543)=35 exch2_iHi(3,543)=35 exch2_jLo(3,543)=0 exch2_jHi(3,543)=52 exch2_opposingSend(3,543)=4 exch2_pij(1,3,543)=1 exch2_pij(2,3,543)=0 exch2_pij(3,3,543)=0 exch2_pij(4,3,543)=1 exch2_oi(3,543)=0 exch2_oj(3,543)=0 exch2_neighbourId(4,543)=542 exch2_iLo(4,543)=0 exch2_iHi(4,543)=0 exch2_jLo(4,543)=0 exch2_jHi(4,543)=52 exch2_opposingSend(4,543)=3 exch2_pij(1,4,543)=1 exch2_pij(2,4,543)=0 exch2_pij(3,4,543)=0 exch2_pij(4,4,543)=1 exch2_oi(4,543)=0 exch2_oj(4,543)=0 RETURN END SUBROUTINE W2_E2SETUP_544 C Topology for tile 544 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(544)=34 exch2_tNy(544)=51 exch2_tBasex(544)=102 exch2_tBasey(544)=306 exch2_txGlobalo(544)=1633 exch2_tyGlobalo(544)=307 exch2_isWedge(544)=0 exch2_isNedge(544)=0 exch2_isEedge(544)=0 exch2_isSedge(544)=0 exch2_myFace(544)=4 exch2_mydNx(544)=510 exch2_mydNy(544)=510 exch2_nNeighbours(544)=4 exch2_neighbourId(1,544)=559 exch2_iLo(1,544)=0 exch2_iHi(1,544)=35 exch2_jLo(1,544)=52 exch2_jHi(1,544)=52 exch2_opposingSend(1,544)=2 exch2_pij(1,1,544)=1 exch2_pij(2,1,544)=0 exch2_pij(3,1,544)=0 exch2_pij(4,1,544)=1 exch2_oi(1,544)=0 exch2_oj(1,544)=0 exch2_neighbourId(2,544)=529 exch2_iLo(2,544)=0 exch2_iHi(2,544)=35 exch2_jLo(2,544)=0 exch2_jHi(2,544)=0 exch2_opposingSend(2,544)=1 exch2_pij(1,2,544)=1 exch2_pij(2,2,544)=0 exch2_pij(3,2,544)=0 exch2_pij(4,2,544)=1 exch2_oi(2,544)=0 exch2_oj(2,544)=0 exch2_neighbourId(3,544)=545 exch2_iLo(3,544)=35 exch2_iHi(3,544)=35 exch2_jLo(3,544)=0 exch2_jHi(3,544)=52 exch2_opposingSend(3,544)=4 exch2_pij(1,3,544)=1 exch2_pij(2,3,544)=0 exch2_pij(3,3,544)=0 exch2_pij(4,3,544)=1 exch2_oi(3,544)=0 exch2_oj(3,544)=0 exch2_neighbourId(4,544)=543 exch2_iLo(4,544)=0 exch2_iHi(4,544)=0 exch2_jLo(4,544)=0 exch2_jHi(4,544)=52 exch2_opposingSend(4,544)=3 exch2_pij(1,4,544)=1 exch2_pij(2,4,544)=0 exch2_pij(3,4,544)=0 exch2_pij(4,4,544)=1 exch2_oi(4,544)=0 exch2_oj(4,544)=0 RETURN END SUBROUTINE W2_E2SETUP_545 C Topology for tile 545 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(545)=34 exch2_tNy(545)=51 exch2_tBasex(545)=136 exch2_tBasey(545)=306 exch2_txGlobalo(545)=1667 exch2_tyGlobalo(545)=307 exch2_isWedge(545)=0 exch2_isNedge(545)=0 exch2_isEedge(545)=0 exch2_isSedge(545)=0 exch2_myFace(545)=4 exch2_mydNx(545)=510 exch2_mydNy(545)=510 exch2_nNeighbours(545)=4 exch2_neighbourId(1,545)=560 exch2_iLo(1,545)=0 exch2_iHi(1,545)=35 exch2_jLo(1,545)=52 exch2_jHi(1,545)=52 exch2_opposingSend(1,545)=2 exch2_pij(1,1,545)=1 exch2_pij(2,1,545)=0 exch2_pij(3,1,545)=0 exch2_pij(4,1,545)=1 exch2_oi(1,545)=0 exch2_oj(1,545)=0 exch2_neighbourId(2,545)=530 exch2_iLo(2,545)=0 exch2_iHi(2,545)=35 exch2_jLo(2,545)=0 exch2_jHi(2,545)=0 exch2_opposingSend(2,545)=1 exch2_pij(1,2,545)=1 exch2_pij(2,2,545)=0 exch2_pij(3,2,545)=0 exch2_pij(4,2,545)=1 exch2_oi(2,545)=0 exch2_oj(2,545)=0 exch2_neighbourId(3,545)=546 exch2_iLo(3,545)=35 exch2_iHi(3,545)=35 exch2_jLo(3,545)=0 exch2_jHi(3,545)=52 exch2_opposingSend(3,545)=4 exch2_pij(1,3,545)=1 exch2_pij(2,3,545)=0 exch2_pij(3,3,545)=0 exch2_pij(4,3,545)=1 exch2_oi(3,545)=0 exch2_oj(3,545)=0 exch2_neighbourId(4,545)=544 exch2_iLo(4,545)=0 exch2_iHi(4,545)=0 exch2_jLo(4,545)=0 exch2_jHi(4,545)=52 exch2_opposingSend(4,545)=3 exch2_pij(1,4,545)=1 exch2_pij(2,4,545)=0 exch2_pij(3,4,545)=0 exch2_pij(4,4,545)=1 exch2_oi(4,545)=0 exch2_oj(4,545)=0 RETURN END SUBROUTINE W2_E2SETUP_546 C Topology for tile 546 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(546)=34 exch2_tNy(546)=51 exch2_tBasex(546)=170 exch2_tBasey(546)=306 exch2_txGlobalo(546)=1701 exch2_tyGlobalo(546)=307 exch2_isWedge(546)=0 exch2_isNedge(546)=0 exch2_isEedge(546)=0 exch2_isSedge(546)=0 exch2_myFace(546)=4 exch2_mydNx(546)=510 exch2_mydNy(546)=510 exch2_nNeighbours(546)=4 exch2_neighbourId(1,546)=561 exch2_iLo(1,546)=0 exch2_iHi(1,546)=35 exch2_jLo(1,546)=52 exch2_jHi(1,546)=52 exch2_opposingSend(1,546)=2 exch2_pij(1,1,546)=1 exch2_pij(2,1,546)=0 exch2_pij(3,1,546)=0 exch2_pij(4,1,546)=1 exch2_oi(1,546)=0 exch2_oj(1,546)=0 exch2_neighbourId(2,546)=531 exch2_iLo(2,546)=0 exch2_iHi(2,546)=35 exch2_jLo(2,546)=0 exch2_jHi(2,546)=0 exch2_opposingSend(2,546)=1 exch2_pij(1,2,546)=1 exch2_pij(2,2,546)=0 exch2_pij(3,2,546)=0 exch2_pij(4,2,546)=1 exch2_oi(2,546)=0 exch2_oj(2,546)=0 exch2_neighbourId(3,546)=547 exch2_iLo(3,546)=35 exch2_iHi(3,546)=35 exch2_jLo(3,546)=0 exch2_jHi(3,546)=52 exch2_opposingSend(3,546)=4 exch2_pij(1,3,546)=1 exch2_pij(2,3,546)=0 exch2_pij(3,3,546)=0 exch2_pij(4,3,546)=1 exch2_oi(3,546)=0 exch2_oj(3,546)=0 exch2_neighbourId(4,546)=545 exch2_iLo(4,546)=0 exch2_iHi(4,546)=0 exch2_jLo(4,546)=0 exch2_jHi(4,546)=52 exch2_opposingSend(4,546)=3 exch2_pij(1,4,546)=1 exch2_pij(2,4,546)=0 exch2_pij(3,4,546)=0 exch2_pij(4,4,546)=1 exch2_oi(4,546)=0 exch2_oj(4,546)=0 RETURN END SUBROUTINE W2_E2SETUP_547 C Topology for tile 547 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(547)=34 exch2_tNy(547)=51 exch2_tBasex(547)=204 exch2_tBasey(547)=306 exch2_txGlobalo(547)=1735 exch2_tyGlobalo(547)=307 exch2_isWedge(547)=0 exch2_isNedge(547)=0 exch2_isEedge(547)=0 exch2_isSedge(547)=0 exch2_myFace(547)=4 exch2_mydNx(547)=510 exch2_mydNy(547)=510 exch2_nNeighbours(547)=4 exch2_neighbourId(1,547)=562 exch2_iLo(1,547)=0 exch2_iHi(1,547)=35 exch2_jLo(1,547)=52 exch2_jHi(1,547)=52 exch2_opposingSend(1,547)=2 exch2_pij(1,1,547)=1 exch2_pij(2,1,547)=0 exch2_pij(3,1,547)=0 exch2_pij(4,1,547)=1 exch2_oi(1,547)=0 exch2_oj(1,547)=0 exch2_neighbourId(2,547)=532 exch2_iLo(2,547)=0 exch2_iHi(2,547)=35 exch2_jLo(2,547)=0 exch2_jHi(2,547)=0 exch2_opposingSend(2,547)=1 exch2_pij(1,2,547)=1 exch2_pij(2,2,547)=0 exch2_pij(3,2,547)=0 exch2_pij(4,2,547)=1 exch2_oi(2,547)=0 exch2_oj(2,547)=0 exch2_neighbourId(3,547)=548 exch2_iLo(3,547)=35 exch2_iHi(3,547)=35 exch2_jLo(3,547)=0 exch2_jHi(3,547)=52 exch2_opposingSend(3,547)=4 exch2_pij(1,3,547)=1 exch2_pij(2,3,547)=0 exch2_pij(3,3,547)=0 exch2_pij(4,3,547)=1 exch2_oi(3,547)=0 exch2_oj(3,547)=0 exch2_neighbourId(4,547)=546 exch2_iLo(4,547)=0 exch2_iHi(4,547)=0 exch2_jLo(4,547)=0 exch2_jHi(4,547)=52 exch2_opposingSend(4,547)=3 exch2_pij(1,4,547)=1 exch2_pij(2,4,547)=0 exch2_pij(3,4,547)=0 exch2_pij(4,4,547)=1 exch2_oi(4,547)=0 exch2_oj(4,547)=0 RETURN END SUBROUTINE W2_E2SETUP_548 C Topology for tile 548 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(548)=34 exch2_tNy(548)=51 exch2_tBasex(548)=238 exch2_tBasey(548)=306 exch2_txGlobalo(548)=1769 exch2_tyGlobalo(548)=307 exch2_isWedge(548)=0 exch2_isNedge(548)=0 exch2_isEedge(548)=0 exch2_isSedge(548)=0 exch2_myFace(548)=4 exch2_mydNx(548)=510 exch2_mydNy(548)=510 exch2_nNeighbours(548)=4 exch2_neighbourId(1,548)=563 exch2_iLo(1,548)=0 exch2_iHi(1,548)=35 exch2_jLo(1,548)=52 exch2_jHi(1,548)=52 exch2_opposingSend(1,548)=2 exch2_pij(1,1,548)=1 exch2_pij(2,1,548)=0 exch2_pij(3,1,548)=0 exch2_pij(4,1,548)=1 exch2_oi(1,548)=0 exch2_oj(1,548)=0 exch2_neighbourId(2,548)=533 exch2_iLo(2,548)=0 exch2_iHi(2,548)=35 exch2_jLo(2,548)=0 exch2_jHi(2,548)=0 exch2_opposingSend(2,548)=1 exch2_pij(1,2,548)=1 exch2_pij(2,2,548)=0 exch2_pij(3,2,548)=0 exch2_pij(4,2,548)=1 exch2_oi(2,548)=0 exch2_oj(2,548)=0 exch2_neighbourId(3,548)=549 exch2_iLo(3,548)=35 exch2_iHi(3,548)=35 exch2_jLo(3,548)=0 exch2_jHi(3,548)=52 exch2_opposingSend(3,548)=4 exch2_pij(1,3,548)=1 exch2_pij(2,3,548)=0 exch2_pij(3,3,548)=0 exch2_pij(4,3,548)=1 exch2_oi(3,548)=0 exch2_oj(3,548)=0 exch2_neighbourId(4,548)=547 exch2_iLo(4,548)=0 exch2_iHi(4,548)=0 exch2_jLo(4,548)=0 exch2_jHi(4,548)=52 exch2_opposingSend(4,548)=3 exch2_pij(1,4,548)=1 exch2_pij(2,4,548)=0 exch2_pij(3,4,548)=0 exch2_pij(4,4,548)=1 exch2_oi(4,548)=0 exch2_oj(4,548)=0 RETURN END SUBROUTINE W2_E2SETUP_549 C Topology for tile 549 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(549)=34 exch2_tNy(549)=51 exch2_tBasex(549)=272 exch2_tBasey(549)=306 exch2_txGlobalo(549)=1803 exch2_tyGlobalo(549)=307 exch2_isWedge(549)=0 exch2_isNedge(549)=0 exch2_isEedge(549)=0 exch2_isSedge(549)=0 exch2_myFace(549)=4 exch2_mydNx(549)=510 exch2_mydNy(549)=510 exch2_nNeighbours(549)=4 exch2_neighbourId(1,549)=564 exch2_iLo(1,549)=0 exch2_iHi(1,549)=35 exch2_jLo(1,549)=52 exch2_jHi(1,549)=52 exch2_opposingSend(1,549)=2 exch2_pij(1,1,549)=1 exch2_pij(2,1,549)=0 exch2_pij(3,1,549)=0 exch2_pij(4,1,549)=1 exch2_oi(1,549)=0 exch2_oj(1,549)=0 exch2_neighbourId(2,549)=534 exch2_iLo(2,549)=0 exch2_iHi(2,549)=35 exch2_jLo(2,549)=0 exch2_jHi(2,549)=0 exch2_opposingSend(2,549)=1 exch2_pij(1,2,549)=1 exch2_pij(2,2,549)=0 exch2_pij(3,2,549)=0 exch2_pij(4,2,549)=1 exch2_oi(2,549)=0 exch2_oj(2,549)=0 exch2_neighbourId(3,549)=550 exch2_iLo(3,549)=35 exch2_iHi(3,549)=35 exch2_jLo(3,549)=0 exch2_jHi(3,549)=52 exch2_opposingSend(3,549)=4 exch2_pij(1,3,549)=1 exch2_pij(2,3,549)=0 exch2_pij(3,3,549)=0 exch2_pij(4,3,549)=1 exch2_oi(3,549)=0 exch2_oj(3,549)=0 exch2_neighbourId(4,549)=548 exch2_iLo(4,549)=0 exch2_iHi(4,549)=0 exch2_jLo(4,549)=0 exch2_jHi(4,549)=52 exch2_opposingSend(4,549)=3 exch2_pij(1,4,549)=1 exch2_pij(2,4,549)=0 exch2_pij(3,4,549)=0 exch2_pij(4,4,549)=1 exch2_oi(4,549)=0 exch2_oj(4,549)=0 RETURN END SUBROUTINE W2_E2SETUP_550 C Topology for tile 550 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(550)=34 exch2_tNy(550)=51 exch2_tBasex(550)=306 exch2_tBasey(550)=306 exch2_txGlobalo(550)=1837 exch2_tyGlobalo(550)=307 exch2_isWedge(550)=0 exch2_isNedge(550)=0 exch2_isEedge(550)=0 exch2_isSedge(550)=0 exch2_myFace(550)=4 exch2_mydNx(550)=510 exch2_mydNy(550)=510 exch2_nNeighbours(550)=4 exch2_neighbourId(1,550)=565 exch2_iLo(1,550)=0 exch2_iHi(1,550)=35 exch2_jLo(1,550)=52 exch2_jHi(1,550)=52 exch2_opposingSend(1,550)=2 exch2_pij(1,1,550)=1 exch2_pij(2,1,550)=0 exch2_pij(3,1,550)=0 exch2_pij(4,1,550)=1 exch2_oi(1,550)=0 exch2_oj(1,550)=0 exch2_neighbourId(2,550)=535 exch2_iLo(2,550)=0 exch2_iHi(2,550)=35 exch2_jLo(2,550)=0 exch2_jHi(2,550)=0 exch2_opposingSend(2,550)=1 exch2_pij(1,2,550)=1 exch2_pij(2,2,550)=0 exch2_pij(3,2,550)=0 exch2_pij(4,2,550)=1 exch2_oi(2,550)=0 exch2_oj(2,550)=0 exch2_neighbourId(3,550)=551 exch2_iLo(3,550)=35 exch2_iHi(3,550)=35 exch2_jLo(3,550)=0 exch2_jHi(3,550)=52 exch2_opposingSend(3,550)=4 exch2_pij(1,3,550)=1 exch2_pij(2,3,550)=0 exch2_pij(3,3,550)=0 exch2_pij(4,3,550)=1 exch2_oi(3,550)=0 exch2_oj(3,550)=0 exch2_neighbourId(4,550)=549 exch2_iLo(4,550)=0 exch2_iHi(4,550)=0 exch2_jLo(4,550)=0 exch2_jHi(4,550)=52 exch2_opposingSend(4,550)=3 exch2_pij(1,4,550)=1 exch2_pij(2,4,550)=0 exch2_pij(3,4,550)=0 exch2_pij(4,4,550)=1 exch2_oi(4,550)=0 exch2_oj(4,550)=0 RETURN END SUBROUTINE W2_E2SETUP_551 C Topology for tile 551 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(551)=34 exch2_tNy(551)=51 exch2_tBasex(551)=340 exch2_tBasey(551)=306 exch2_txGlobalo(551)=1871 exch2_tyGlobalo(551)=307 exch2_isWedge(551)=0 exch2_isNedge(551)=0 exch2_isEedge(551)=0 exch2_isSedge(551)=0 exch2_myFace(551)=4 exch2_mydNx(551)=510 exch2_mydNy(551)=510 exch2_nNeighbours(551)=4 exch2_neighbourId(1,551)=566 exch2_iLo(1,551)=0 exch2_iHi(1,551)=35 exch2_jLo(1,551)=52 exch2_jHi(1,551)=52 exch2_opposingSend(1,551)=2 exch2_pij(1,1,551)=1 exch2_pij(2,1,551)=0 exch2_pij(3,1,551)=0 exch2_pij(4,1,551)=1 exch2_oi(1,551)=0 exch2_oj(1,551)=0 exch2_neighbourId(2,551)=536 exch2_iLo(2,551)=0 exch2_iHi(2,551)=35 exch2_jLo(2,551)=0 exch2_jHi(2,551)=0 exch2_opposingSend(2,551)=1 exch2_pij(1,2,551)=1 exch2_pij(2,2,551)=0 exch2_pij(3,2,551)=0 exch2_pij(4,2,551)=1 exch2_oi(2,551)=0 exch2_oj(2,551)=0 exch2_neighbourId(3,551)=552 exch2_iLo(3,551)=35 exch2_iHi(3,551)=35 exch2_jLo(3,551)=0 exch2_jHi(3,551)=52 exch2_opposingSend(3,551)=4 exch2_pij(1,3,551)=1 exch2_pij(2,3,551)=0 exch2_pij(3,3,551)=0 exch2_pij(4,3,551)=1 exch2_oi(3,551)=0 exch2_oj(3,551)=0 exch2_neighbourId(4,551)=550 exch2_iLo(4,551)=0 exch2_iHi(4,551)=0 exch2_jLo(4,551)=0 exch2_jHi(4,551)=52 exch2_opposingSend(4,551)=3 exch2_pij(1,4,551)=1 exch2_pij(2,4,551)=0 exch2_pij(3,4,551)=0 exch2_pij(4,4,551)=1 exch2_oi(4,551)=0 exch2_oj(4,551)=0 RETURN END SUBROUTINE W2_E2SETUP_552 C Topology for tile 552 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(552)=34 exch2_tNy(552)=51 exch2_tBasex(552)=374 exch2_tBasey(552)=306 exch2_txGlobalo(552)=1905 exch2_tyGlobalo(552)=307 exch2_isWedge(552)=0 exch2_isNedge(552)=0 exch2_isEedge(552)=0 exch2_isSedge(552)=0 exch2_myFace(552)=4 exch2_mydNx(552)=510 exch2_mydNy(552)=510 exch2_nNeighbours(552)=4 exch2_neighbourId(1,552)=567 exch2_iLo(1,552)=0 exch2_iHi(1,552)=35 exch2_jLo(1,552)=52 exch2_jHi(1,552)=52 exch2_opposingSend(1,552)=2 exch2_pij(1,1,552)=1 exch2_pij(2,1,552)=0 exch2_pij(3,1,552)=0 exch2_pij(4,1,552)=1 exch2_oi(1,552)=0 exch2_oj(1,552)=0 exch2_neighbourId(2,552)=537 exch2_iLo(2,552)=0 exch2_iHi(2,552)=35 exch2_jLo(2,552)=0 exch2_jHi(2,552)=0 exch2_opposingSend(2,552)=1 exch2_pij(1,2,552)=1 exch2_pij(2,2,552)=0 exch2_pij(3,2,552)=0 exch2_pij(4,2,552)=1 exch2_oi(2,552)=0 exch2_oj(2,552)=0 exch2_neighbourId(3,552)=553 exch2_iLo(3,552)=35 exch2_iHi(3,552)=35 exch2_jLo(3,552)=0 exch2_jHi(3,552)=52 exch2_opposingSend(3,552)=4 exch2_pij(1,3,552)=1 exch2_pij(2,3,552)=0 exch2_pij(3,3,552)=0 exch2_pij(4,3,552)=1 exch2_oi(3,552)=0 exch2_oj(3,552)=0 exch2_neighbourId(4,552)=551 exch2_iLo(4,552)=0 exch2_iHi(4,552)=0 exch2_jLo(4,552)=0 exch2_jHi(4,552)=52 exch2_opposingSend(4,552)=3 exch2_pij(1,4,552)=1 exch2_pij(2,4,552)=0 exch2_pij(3,4,552)=0 exch2_pij(4,4,552)=1 exch2_oi(4,552)=0 exch2_oj(4,552)=0 RETURN END SUBROUTINE W2_E2SETUP_553 C Topology for tile 553 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(553)=34 exch2_tNy(553)=51 exch2_tBasex(553)=408 exch2_tBasey(553)=306 exch2_txGlobalo(553)=1939 exch2_tyGlobalo(553)=307 exch2_isWedge(553)=0 exch2_isNedge(553)=0 exch2_isEedge(553)=0 exch2_isSedge(553)=0 exch2_myFace(553)=4 exch2_mydNx(553)=510 exch2_mydNy(553)=510 exch2_nNeighbours(553)=4 exch2_neighbourId(1,553)=568 exch2_iLo(1,553)=0 exch2_iHi(1,553)=35 exch2_jLo(1,553)=52 exch2_jHi(1,553)=52 exch2_opposingSend(1,553)=2 exch2_pij(1,1,553)=1 exch2_pij(2,1,553)=0 exch2_pij(3,1,553)=0 exch2_pij(4,1,553)=1 exch2_oi(1,553)=0 exch2_oj(1,553)=0 exch2_neighbourId(2,553)=538 exch2_iLo(2,553)=0 exch2_iHi(2,553)=35 exch2_jLo(2,553)=0 exch2_jHi(2,553)=0 exch2_opposingSend(2,553)=1 exch2_pij(1,2,553)=1 exch2_pij(2,2,553)=0 exch2_pij(3,2,553)=0 exch2_pij(4,2,553)=1 exch2_oi(2,553)=0 exch2_oj(2,553)=0 exch2_neighbourId(3,553)=554 exch2_iLo(3,553)=35 exch2_iHi(3,553)=35 exch2_jLo(3,553)=0 exch2_jHi(3,553)=52 exch2_opposingSend(3,553)=4 exch2_pij(1,3,553)=1 exch2_pij(2,3,553)=0 exch2_pij(3,3,553)=0 exch2_pij(4,3,553)=1 exch2_oi(3,553)=0 exch2_oj(3,553)=0 exch2_neighbourId(4,553)=552 exch2_iLo(4,553)=0 exch2_iHi(4,553)=0 exch2_jLo(4,553)=0 exch2_jHi(4,553)=52 exch2_opposingSend(4,553)=3 exch2_pij(1,4,553)=1 exch2_pij(2,4,553)=0 exch2_pij(3,4,553)=0 exch2_pij(4,4,553)=1 exch2_oi(4,553)=0 exch2_oj(4,553)=0 RETURN END SUBROUTINE W2_E2SETUP_554 C Topology for tile 554 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(554)=34 exch2_tNy(554)=51 exch2_tBasex(554)=442 exch2_tBasey(554)=306 exch2_txGlobalo(554)=1973 exch2_tyGlobalo(554)=307 exch2_isWedge(554)=0 exch2_isNedge(554)=0 exch2_isEedge(554)=0 exch2_isSedge(554)=0 exch2_myFace(554)=4 exch2_mydNx(554)=510 exch2_mydNy(554)=510 exch2_nNeighbours(554)=4 exch2_neighbourId(1,554)=569 exch2_iLo(1,554)=0 exch2_iHi(1,554)=35 exch2_jLo(1,554)=52 exch2_jHi(1,554)=52 exch2_opposingSend(1,554)=2 exch2_pij(1,1,554)=1 exch2_pij(2,1,554)=0 exch2_pij(3,1,554)=0 exch2_pij(4,1,554)=1 exch2_oi(1,554)=0 exch2_oj(1,554)=0 exch2_neighbourId(2,554)=539 exch2_iLo(2,554)=0 exch2_iHi(2,554)=35 exch2_jLo(2,554)=0 exch2_jHi(2,554)=0 exch2_opposingSend(2,554)=1 exch2_pij(1,2,554)=1 exch2_pij(2,2,554)=0 exch2_pij(3,2,554)=0 exch2_pij(4,2,554)=1 exch2_oi(2,554)=0 exch2_oj(2,554)=0 exch2_neighbourId(3,554)=555 exch2_iLo(3,554)=35 exch2_iHi(3,554)=35 exch2_jLo(3,554)=0 exch2_jHi(3,554)=52 exch2_opposingSend(3,554)=5 exch2_pij(1,3,554)=1 exch2_pij(2,3,554)=0 exch2_pij(3,3,554)=0 exch2_pij(4,3,554)=1 exch2_oi(3,554)=0 exch2_oj(3,554)=0 exch2_neighbourId(4,554)=553 exch2_iLo(4,554)=0 exch2_iHi(4,554)=0 exch2_jLo(4,554)=0 exch2_jHi(4,554)=52 exch2_opposingSend(4,554)=3 exch2_pij(1,4,554)=1 exch2_pij(2,4,554)=0 exch2_pij(3,4,554)=0 exch2_pij(4,4,554)=1 exch2_oi(4,554)=0 exch2_oj(4,554)=0 RETURN END SUBROUTINE W2_E2SETUP_555 C Topology for tile 555 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(555)=34 exch2_tNy(555)=51 exch2_tBasex(555)=476 exch2_tBasey(555)=306 exch2_txGlobalo(555)=2007 exch2_tyGlobalo(555)=307 exch2_isWedge(555)=0 exch2_isNedge(555)=0 exch2_isEedge(555)=1 exch2_isSedge(555)=0 exch2_myFace(555)=4 exch2_mydNx(555)=510 exch2_mydNy(555)=510 exch2_nNeighbours(555)=5 exch2_neighbourId(1,555)=570 exch2_iLo(1,555)=0 exch2_iHi(1,555)=35 exch2_jLo(1,555)=52 exch2_jHi(1,555)=52 exch2_opposingSend(1,555)=2 exch2_pij(1,1,555)=1 exch2_pij(2,1,555)=0 exch2_pij(3,1,555)=0 exch2_pij(4,1,555)=1 exch2_oi(1,555)=0 exch2_oj(1,555)=0 exch2_neighbourId(2,555)=540 exch2_iLo(2,555)=0 exch2_iHi(2,555)=35 exch2_jLo(2,555)=0 exch2_jHi(2,555)=0 exch2_opposingSend(2,555)=1 exch2_pij(1,2,555)=1 exch2_pij(2,2,555)=0 exch2_pij(3,2,555)=0 exch2_pij(4,2,555)=1 exch2_oi(2,555)=0 exch2_oj(2,555)=0 exch2_neighbourId(3,555)=755 exch2_iLo(3,555)=35 exch2_iHi(3,555)=35 exch2_jLo(3,555)=34 exch2_jHi(3,555)=52 exch2_opposingSend(3,555)=2 exch2_pij(1,3,555)=0 exch2_pij(2,3,555)=1 exch2_pij(3,3,555)=-1 exch2_pij(4,3,555)=0 exch2_oi(3,555)=510 exch2_oj(3,555)=511 exch2_neighbourId(4,555)=756 exch2_iLo(4,555)=35 exch2_iHi(4,555)=35 exch2_jLo(4,555)=0 exch2_jHi(4,555)=35 exch2_opposingSend(4,555)=2 exch2_pij(1,4,555)=0 exch2_pij(2,4,555)=1 exch2_pij(3,4,555)=-1 exch2_pij(4,4,555)=0 exch2_oi(4,555)=510 exch2_oj(4,555)=511 exch2_neighbourId(5,555)=554 exch2_iLo(5,555)=0 exch2_iHi(5,555)=0 exch2_jLo(5,555)=0 exch2_jHi(5,555)=52 exch2_opposingSend(5,555)=3 exch2_pij(1,5,555)=1 exch2_pij(2,5,555)=0 exch2_pij(3,5,555)=0 exch2_pij(4,5,555)=1 exch2_oi(5,555)=0 exch2_oj(5,555)=0 RETURN END SUBROUTINE W2_E2SETUP_556 C Topology for tile 556 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(556)=34 exch2_tNy(556)=51 exch2_tBasex(556)=0 exch2_tBasey(556)=357 exch2_txGlobalo(556)=1531 exch2_tyGlobalo(556)=358 exch2_isWedge(556)=1 exch2_isNedge(556)=0 exch2_isEedge(556)=0 exch2_isSedge(556)=0 exch2_myFace(556)=4 exch2_mydNx(556)=510 exch2_mydNy(556)=510 exch2_nNeighbours(556)=4 exch2_neighbourId(1,556)=571 exch2_iLo(1,556)=0 exch2_iHi(1,556)=35 exch2_jLo(1,556)=52 exch2_jHi(1,556)=52 exch2_opposingSend(1,556)=2 exch2_pij(1,1,556)=1 exch2_pij(2,1,556)=0 exch2_pij(3,1,556)=0 exch2_pij(4,1,556)=1 exch2_oi(1,556)=0 exch2_oj(1,556)=0 exch2_neighbourId(2,556)=541 exch2_iLo(2,556)=0 exch2_iHi(2,556)=35 exch2_jLo(2,556)=0 exch2_jHi(2,556)=0 exch2_opposingSend(2,556)=1 exch2_pij(1,2,556)=1 exch2_pij(2,2,556)=0 exch2_pij(3,2,556)=0 exch2_pij(4,2,556)=1 exch2_oi(2,556)=0 exch2_oj(2,556)=0 exch2_neighbourId(3,556)=557 exch2_iLo(3,556)=35 exch2_iHi(3,556)=35 exch2_jLo(3,556)=0 exch2_jHi(3,556)=52 exch2_opposingSend(3,556)=4 exch2_pij(1,3,556)=1 exch2_pij(2,3,556)=0 exch2_pij(3,3,556)=0 exch2_pij(4,3,556)=1 exch2_oi(3,556)=0 exch2_oj(3,556)=0 exch2_neighbourId(4,556)=420 exch2_iLo(4,556)=0 exch2_iHi(4,556)=0 exch2_jLo(4,556)=0 exch2_jHi(4,556)=52 exch2_opposingSend(4,556)=3 exch2_pij(1,4,556)=1 exch2_pij(2,4,556)=0 exch2_pij(3,4,556)=0 exch2_pij(4,4,556)=1 exch2_oi(4,556)=-510 exch2_oj(4,556)=0 RETURN END SUBROUTINE W2_E2SETUP_557 C Topology for tile 557 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(557)=34 exch2_tNy(557)=51 exch2_tBasex(557)=34 exch2_tBasey(557)=357 exch2_txGlobalo(557)=1565 exch2_tyGlobalo(557)=358 exch2_isWedge(557)=0 exch2_isNedge(557)=0 exch2_isEedge(557)=0 exch2_isSedge(557)=0 exch2_myFace(557)=4 exch2_mydNx(557)=510 exch2_mydNy(557)=510 exch2_nNeighbours(557)=4 exch2_neighbourId(1,557)=572 exch2_iLo(1,557)=0 exch2_iHi(1,557)=35 exch2_jLo(1,557)=52 exch2_jHi(1,557)=52 exch2_opposingSend(1,557)=2 exch2_pij(1,1,557)=1 exch2_pij(2,1,557)=0 exch2_pij(3,1,557)=0 exch2_pij(4,1,557)=1 exch2_oi(1,557)=0 exch2_oj(1,557)=0 exch2_neighbourId(2,557)=542 exch2_iLo(2,557)=0 exch2_iHi(2,557)=35 exch2_jLo(2,557)=0 exch2_jHi(2,557)=0 exch2_opposingSend(2,557)=1 exch2_pij(1,2,557)=1 exch2_pij(2,2,557)=0 exch2_pij(3,2,557)=0 exch2_pij(4,2,557)=1 exch2_oi(2,557)=0 exch2_oj(2,557)=0 exch2_neighbourId(3,557)=558 exch2_iLo(3,557)=35 exch2_iHi(3,557)=35 exch2_jLo(3,557)=0 exch2_jHi(3,557)=52 exch2_opposingSend(3,557)=4 exch2_pij(1,3,557)=1 exch2_pij(2,3,557)=0 exch2_pij(3,3,557)=0 exch2_pij(4,3,557)=1 exch2_oi(3,557)=0 exch2_oj(3,557)=0 exch2_neighbourId(4,557)=556 exch2_iLo(4,557)=0 exch2_iHi(4,557)=0 exch2_jLo(4,557)=0 exch2_jHi(4,557)=52 exch2_opposingSend(4,557)=3 exch2_pij(1,4,557)=1 exch2_pij(2,4,557)=0 exch2_pij(3,4,557)=0 exch2_pij(4,4,557)=1 exch2_oi(4,557)=0 exch2_oj(4,557)=0 RETURN END SUBROUTINE W2_E2SETUP_558 C Topology for tile 558 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(558)=34 exch2_tNy(558)=51 exch2_tBasex(558)=68 exch2_tBasey(558)=357 exch2_txGlobalo(558)=1599 exch2_tyGlobalo(558)=358 exch2_isWedge(558)=0 exch2_isNedge(558)=0 exch2_isEedge(558)=0 exch2_isSedge(558)=0 exch2_myFace(558)=4 exch2_mydNx(558)=510 exch2_mydNy(558)=510 exch2_nNeighbours(558)=4 exch2_neighbourId(1,558)=573 exch2_iLo(1,558)=0 exch2_iHi(1,558)=35 exch2_jLo(1,558)=52 exch2_jHi(1,558)=52 exch2_opposingSend(1,558)=2 exch2_pij(1,1,558)=1 exch2_pij(2,1,558)=0 exch2_pij(3,1,558)=0 exch2_pij(4,1,558)=1 exch2_oi(1,558)=0 exch2_oj(1,558)=0 exch2_neighbourId(2,558)=543 exch2_iLo(2,558)=0 exch2_iHi(2,558)=35 exch2_jLo(2,558)=0 exch2_jHi(2,558)=0 exch2_opposingSend(2,558)=1 exch2_pij(1,2,558)=1 exch2_pij(2,2,558)=0 exch2_pij(3,2,558)=0 exch2_pij(4,2,558)=1 exch2_oi(2,558)=0 exch2_oj(2,558)=0 exch2_neighbourId(3,558)=559 exch2_iLo(3,558)=35 exch2_iHi(3,558)=35 exch2_jLo(3,558)=0 exch2_jHi(3,558)=52 exch2_opposingSend(3,558)=4 exch2_pij(1,3,558)=1 exch2_pij(2,3,558)=0 exch2_pij(3,3,558)=0 exch2_pij(4,3,558)=1 exch2_oi(3,558)=0 exch2_oj(3,558)=0 exch2_neighbourId(4,558)=557 exch2_iLo(4,558)=0 exch2_iHi(4,558)=0 exch2_jLo(4,558)=0 exch2_jHi(4,558)=52 exch2_opposingSend(4,558)=3 exch2_pij(1,4,558)=1 exch2_pij(2,4,558)=0 exch2_pij(3,4,558)=0 exch2_pij(4,4,558)=1 exch2_oi(4,558)=0 exch2_oj(4,558)=0 RETURN END SUBROUTINE W2_E2SETUP_559 C Topology for tile 559 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(559)=34 exch2_tNy(559)=51 exch2_tBasex(559)=102 exch2_tBasey(559)=357 exch2_txGlobalo(559)=1633 exch2_tyGlobalo(559)=358 exch2_isWedge(559)=0 exch2_isNedge(559)=0 exch2_isEedge(559)=0 exch2_isSedge(559)=0 exch2_myFace(559)=4 exch2_mydNx(559)=510 exch2_mydNy(559)=510 exch2_nNeighbours(559)=4 exch2_neighbourId(1,559)=574 exch2_iLo(1,559)=0 exch2_iHi(1,559)=35 exch2_jLo(1,559)=52 exch2_jHi(1,559)=52 exch2_opposingSend(1,559)=2 exch2_pij(1,1,559)=1 exch2_pij(2,1,559)=0 exch2_pij(3,1,559)=0 exch2_pij(4,1,559)=1 exch2_oi(1,559)=0 exch2_oj(1,559)=0 exch2_neighbourId(2,559)=544 exch2_iLo(2,559)=0 exch2_iHi(2,559)=35 exch2_jLo(2,559)=0 exch2_jHi(2,559)=0 exch2_opposingSend(2,559)=1 exch2_pij(1,2,559)=1 exch2_pij(2,2,559)=0 exch2_pij(3,2,559)=0 exch2_pij(4,2,559)=1 exch2_oi(2,559)=0 exch2_oj(2,559)=0 exch2_neighbourId(3,559)=560 exch2_iLo(3,559)=35 exch2_iHi(3,559)=35 exch2_jLo(3,559)=0 exch2_jHi(3,559)=52 exch2_opposingSend(3,559)=4 exch2_pij(1,3,559)=1 exch2_pij(2,3,559)=0 exch2_pij(3,3,559)=0 exch2_pij(4,3,559)=1 exch2_oi(3,559)=0 exch2_oj(3,559)=0 exch2_neighbourId(4,559)=558 exch2_iLo(4,559)=0 exch2_iHi(4,559)=0 exch2_jLo(4,559)=0 exch2_jHi(4,559)=52 exch2_opposingSend(4,559)=3 exch2_pij(1,4,559)=1 exch2_pij(2,4,559)=0 exch2_pij(3,4,559)=0 exch2_pij(4,4,559)=1 exch2_oi(4,559)=0 exch2_oj(4,559)=0 RETURN END SUBROUTINE W2_E2SETUP_560 C Topology for tile 560 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(560)=34 exch2_tNy(560)=51 exch2_tBasex(560)=136 exch2_tBasey(560)=357 exch2_txGlobalo(560)=1667 exch2_tyGlobalo(560)=358 exch2_isWedge(560)=0 exch2_isNedge(560)=0 exch2_isEedge(560)=0 exch2_isSedge(560)=0 exch2_myFace(560)=4 exch2_mydNx(560)=510 exch2_mydNy(560)=510 exch2_nNeighbours(560)=4 exch2_neighbourId(1,560)=575 exch2_iLo(1,560)=0 exch2_iHi(1,560)=35 exch2_jLo(1,560)=52 exch2_jHi(1,560)=52 exch2_opposingSend(1,560)=2 exch2_pij(1,1,560)=1 exch2_pij(2,1,560)=0 exch2_pij(3,1,560)=0 exch2_pij(4,1,560)=1 exch2_oi(1,560)=0 exch2_oj(1,560)=0 exch2_neighbourId(2,560)=545 exch2_iLo(2,560)=0 exch2_iHi(2,560)=35 exch2_jLo(2,560)=0 exch2_jHi(2,560)=0 exch2_opposingSend(2,560)=1 exch2_pij(1,2,560)=1 exch2_pij(2,2,560)=0 exch2_pij(3,2,560)=0 exch2_pij(4,2,560)=1 exch2_oi(2,560)=0 exch2_oj(2,560)=0 exch2_neighbourId(3,560)=561 exch2_iLo(3,560)=35 exch2_iHi(3,560)=35 exch2_jLo(3,560)=0 exch2_jHi(3,560)=52 exch2_opposingSend(3,560)=4 exch2_pij(1,3,560)=1 exch2_pij(2,3,560)=0 exch2_pij(3,3,560)=0 exch2_pij(4,3,560)=1 exch2_oi(3,560)=0 exch2_oj(3,560)=0 exch2_neighbourId(4,560)=559 exch2_iLo(4,560)=0 exch2_iHi(4,560)=0 exch2_jLo(4,560)=0 exch2_jHi(4,560)=52 exch2_opposingSend(4,560)=3 exch2_pij(1,4,560)=1 exch2_pij(2,4,560)=0 exch2_pij(3,4,560)=0 exch2_pij(4,4,560)=1 exch2_oi(4,560)=0 exch2_oj(4,560)=0 RETURN END SUBROUTINE W2_E2SETUP_561 C Topology for tile 561 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(561)=34 exch2_tNy(561)=51 exch2_tBasex(561)=170 exch2_tBasey(561)=357 exch2_txGlobalo(561)=1701 exch2_tyGlobalo(561)=358 exch2_isWedge(561)=0 exch2_isNedge(561)=0 exch2_isEedge(561)=0 exch2_isSedge(561)=0 exch2_myFace(561)=4 exch2_mydNx(561)=510 exch2_mydNy(561)=510 exch2_nNeighbours(561)=4 exch2_neighbourId(1,561)=576 exch2_iLo(1,561)=0 exch2_iHi(1,561)=35 exch2_jLo(1,561)=52 exch2_jHi(1,561)=52 exch2_opposingSend(1,561)=2 exch2_pij(1,1,561)=1 exch2_pij(2,1,561)=0 exch2_pij(3,1,561)=0 exch2_pij(4,1,561)=1 exch2_oi(1,561)=0 exch2_oj(1,561)=0 exch2_neighbourId(2,561)=546 exch2_iLo(2,561)=0 exch2_iHi(2,561)=35 exch2_jLo(2,561)=0 exch2_jHi(2,561)=0 exch2_opposingSend(2,561)=1 exch2_pij(1,2,561)=1 exch2_pij(2,2,561)=0 exch2_pij(3,2,561)=0 exch2_pij(4,2,561)=1 exch2_oi(2,561)=0 exch2_oj(2,561)=0 exch2_neighbourId(3,561)=562 exch2_iLo(3,561)=35 exch2_iHi(3,561)=35 exch2_jLo(3,561)=0 exch2_jHi(3,561)=52 exch2_opposingSend(3,561)=4 exch2_pij(1,3,561)=1 exch2_pij(2,3,561)=0 exch2_pij(3,3,561)=0 exch2_pij(4,3,561)=1 exch2_oi(3,561)=0 exch2_oj(3,561)=0 exch2_neighbourId(4,561)=560 exch2_iLo(4,561)=0 exch2_iHi(4,561)=0 exch2_jLo(4,561)=0 exch2_jHi(4,561)=52 exch2_opposingSend(4,561)=3 exch2_pij(1,4,561)=1 exch2_pij(2,4,561)=0 exch2_pij(3,4,561)=0 exch2_pij(4,4,561)=1 exch2_oi(4,561)=0 exch2_oj(4,561)=0 RETURN END SUBROUTINE W2_E2SETUP_562 C Topology for tile 562 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(562)=34 exch2_tNy(562)=51 exch2_tBasex(562)=204 exch2_tBasey(562)=357 exch2_txGlobalo(562)=1735 exch2_tyGlobalo(562)=358 exch2_isWedge(562)=0 exch2_isNedge(562)=0 exch2_isEedge(562)=0 exch2_isSedge(562)=0 exch2_myFace(562)=4 exch2_mydNx(562)=510 exch2_mydNy(562)=510 exch2_nNeighbours(562)=4 exch2_neighbourId(1,562)=577 exch2_iLo(1,562)=0 exch2_iHi(1,562)=35 exch2_jLo(1,562)=52 exch2_jHi(1,562)=52 exch2_opposingSend(1,562)=2 exch2_pij(1,1,562)=1 exch2_pij(2,1,562)=0 exch2_pij(3,1,562)=0 exch2_pij(4,1,562)=1 exch2_oi(1,562)=0 exch2_oj(1,562)=0 exch2_neighbourId(2,562)=547 exch2_iLo(2,562)=0 exch2_iHi(2,562)=35 exch2_jLo(2,562)=0 exch2_jHi(2,562)=0 exch2_opposingSend(2,562)=1 exch2_pij(1,2,562)=1 exch2_pij(2,2,562)=0 exch2_pij(3,2,562)=0 exch2_pij(4,2,562)=1 exch2_oi(2,562)=0 exch2_oj(2,562)=0 exch2_neighbourId(3,562)=563 exch2_iLo(3,562)=35 exch2_iHi(3,562)=35 exch2_jLo(3,562)=0 exch2_jHi(3,562)=52 exch2_opposingSend(3,562)=4 exch2_pij(1,3,562)=1 exch2_pij(2,3,562)=0 exch2_pij(3,3,562)=0 exch2_pij(4,3,562)=1 exch2_oi(3,562)=0 exch2_oj(3,562)=0 exch2_neighbourId(4,562)=561 exch2_iLo(4,562)=0 exch2_iHi(4,562)=0 exch2_jLo(4,562)=0 exch2_jHi(4,562)=52 exch2_opposingSend(4,562)=3 exch2_pij(1,4,562)=1 exch2_pij(2,4,562)=0 exch2_pij(3,4,562)=0 exch2_pij(4,4,562)=1 exch2_oi(4,562)=0 exch2_oj(4,562)=0 RETURN END SUBROUTINE W2_E2SETUP_563 C Topology for tile 563 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(563)=34 exch2_tNy(563)=51 exch2_tBasex(563)=238 exch2_tBasey(563)=357 exch2_txGlobalo(563)=1769 exch2_tyGlobalo(563)=358 exch2_isWedge(563)=0 exch2_isNedge(563)=0 exch2_isEedge(563)=0 exch2_isSedge(563)=0 exch2_myFace(563)=4 exch2_mydNx(563)=510 exch2_mydNy(563)=510 exch2_nNeighbours(563)=4 exch2_neighbourId(1,563)=578 exch2_iLo(1,563)=0 exch2_iHi(1,563)=35 exch2_jLo(1,563)=52 exch2_jHi(1,563)=52 exch2_opposingSend(1,563)=2 exch2_pij(1,1,563)=1 exch2_pij(2,1,563)=0 exch2_pij(3,1,563)=0 exch2_pij(4,1,563)=1 exch2_oi(1,563)=0 exch2_oj(1,563)=0 exch2_neighbourId(2,563)=548 exch2_iLo(2,563)=0 exch2_iHi(2,563)=35 exch2_jLo(2,563)=0 exch2_jHi(2,563)=0 exch2_opposingSend(2,563)=1 exch2_pij(1,2,563)=1 exch2_pij(2,2,563)=0 exch2_pij(3,2,563)=0 exch2_pij(4,2,563)=1 exch2_oi(2,563)=0 exch2_oj(2,563)=0 exch2_neighbourId(3,563)=564 exch2_iLo(3,563)=35 exch2_iHi(3,563)=35 exch2_jLo(3,563)=0 exch2_jHi(3,563)=52 exch2_opposingSend(3,563)=4 exch2_pij(1,3,563)=1 exch2_pij(2,3,563)=0 exch2_pij(3,3,563)=0 exch2_pij(4,3,563)=1 exch2_oi(3,563)=0 exch2_oj(3,563)=0 exch2_neighbourId(4,563)=562 exch2_iLo(4,563)=0 exch2_iHi(4,563)=0 exch2_jLo(4,563)=0 exch2_jHi(4,563)=52 exch2_opposingSend(4,563)=3 exch2_pij(1,4,563)=1 exch2_pij(2,4,563)=0 exch2_pij(3,4,563)=0 exch2_pij(4,4,563)=1 exch2_oi(4,563)=0 exch2_oj(4,563)=0 RETURN END SUBROUTINE W2_E2SETUP_564 C Topology for tile 564 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(564)=34 exch2_tNy(564)=51 exch2_tBasex(564)=272 exch2_tBasey(564)=357 exch2_txGlobalo(564)=1803 exch2_tyGlobalo(564)=358 exch2_isWedge(564)=0 exch2_isNedge(564)=0 exch2_isEedge(564)=0 exch2_isSedge(564)=0 exch2_myFace(564)=4 exch2_mydNx(564)=510 exch2_mydNy(564)=510 exch2_nNeighbours(564)=4 exch2_neighbourId(1,564)=579 exch2_iLo(1,564)=0 exch2_iHi(1,564)=35 exch2_jLo(1,564)=52 exch2_jHi(1,564)=52 exch2_opposingSend(1,564)=2 exch2_pij(1,1,564)=1 exch2_pij(2,1,564)=0 exch2_pij(3,1,564)=0 exch2_pij(4,1,564)=1 exch2_oi(1,564)=0 exch2_oj(1,564)=0 exch2_neighbourId(2,564)=549 exch2_iLo(2,564)=0 exch2_iHi(2,564)=35 exch2_jLo(2,564)=0 exch2_jHi(2,564)=0 exch2_opposingSend(2,564)=1 exch2_pij(1,2,564)=1 exch2_pij(2,2,564)=0 exch2_pij(3,2,564)=0 exch2_pij(4,2,564)=1 exch2_oi(2,564)=0 exch2_oj(2,564)=0 exch2_neighbourId(3,564)=565 exch2_iLo(3,564)=35 exch2_iHi(3,564)=35 exch2_jLo(3,564)=0 exch2_jHi(3,564)=52 exch2_opposingSend(3,564)=4 exch2_pij(1,3,564)=1 exch2_pij(2,3,564)=0 exch2_pij(3,3,564)=0 exch2_pij(4,3,564)=1 exch2_oi(3,564)=0 exch2_oj(3,564)=0 exch2_neighbourId(4,564)=563 exch2_iLo(4,564)=0 exch2_iHi(4,564)=0 exch2_jLo(4,564)=0 exch2_jHi(4,564)=52 exch2_opposingSend(4,564)=3 exch2_pij(1,4,564)=1 exch2_pij(2,4,564)=0 exch2_pij(3,4,564)=0 exch2_pij(4,4,564)=1 exch2_oi(4,564)=0 exch2_oj(4,564)=0 RETURN END SUBROUTINE W2_E2SETUP_565 C Topology for tile 565 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(565)=34 exch2_tNy(565)=51 exch2_tBasex(565)=306 exch2_tBasey(565)=357 exch2_txGlobalo(565)=1837 exch2_tyGlobalo(565)=358 exch2_isWedge(565)=0 exch2_isNedge(565)=0 exch2_isEedge(565)=0 exch2_isSedge(565)=0 exch2_myFace(565)=4 exch2_mydNx(565)=510 exch2_mydNy(565)=510 exch2_nNeighbours(565)=4 exch2_neighbourId(1,565)=580 exch2_iLo(1,565)=0 exch2_iHi(1,565)=35 exch2_jLo(1,565)=52 exch2_jHi(1,565)=52 exch2_opposingSend(1,565)=2 exch2_pij(1,1,565)=1 exch2_pij(2,1,565)=0 exch2_pij(3,1,565)=0 exch2_pij(4,1,565)=1 exch2_oi(1,565)=0 exch2_oj(1,565)=0 exch2_neighbourId(2,565)=550 exch2_iLo(2,565)=0 exch2_iHi(2,565)=35 exch2_jLo(2,565)=0 exch2_jHi(2,565)=0 exch2_opposingSend(2,565)=1 exch2_pij(1,2,565)=1 exch2_pij(2,2,565)=0 exch2_pij(3,2,565)=0 exch2_pij(4,2,565)=1 exch2_oi(2,565)=0 exch2_oj(2,565)=0 exch2_neighbourId(3,565)=566 exch2_iLo(3,565)=35 exch2_iHi(3,565)=35 exch2_jLo(3,565)=0 exch2_jHi(3,565)=52 exch2_opposingSend(3,565)=4 exch2_pij(1,3,565)=1 exch2_pij(2,3,565)=0 exch2_pij(3,3,565)=0 exch2_pij(4,3,565)=1 exch2_oi(3,565)=0 exch2_oj(3,565)=0 exch2_neighbourId(4,565)=564 exch2_iLo(4,565)=0 exch2_iHi(4,565)=0 exch2_jLo(4,565)=0 exch2_jHi(4,565)=52 exch2_opposingSend(4,565)=3 exch2_pij(1,4,565)=1 exch2_pij(2,4,565)=0 exch2_pij(3,4,565)=0 exch2_pij(4,4,565)=1 exch2_oi(4,565)=0 exch2_oj(4,565)=0 RETURN END SUBROUTINE W2_E2SETUP_566 C Topology for tile 566 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(566)=34 exch2_tNy(566)=51 exch2_tBasex(566)=340 exch2_tBasey(566)=357 exch2_txGlobalo(566)=1871 exch2_tyGlobalo(566)=358 exch2_isWedge(566)=0 exch2_isNedge(566)=0 exch2_isEedge(566)=0 exch2_isSedge(566)=0 exch2_myFace(566)=4 exch2_mydNx(566)=510 exch2_mydNy(566)=510 exch2_nNeighbours(566)=4 exch2_neighbourId(1,566)=581 exch2_iLo(1,566)=0 exch2_iHi(1,566)=35 exch2_jLo(1,566)=52 exch2_jHi(1,566)=52 exch2_opposingSend(1,566)=2 exch2_pij(1,1,566)=1 exch2_pij(2,1,566)=0 exch2_pij(3,1,566)=0 exch2_pij(4,1,566)=1 exch2_oi(1,566)=0 exch2_oj(1,566)=0 exch2_neighbourId(2,566)=551 exch2_iLo(2,566)=0 exch2_iHi(2,566)=35 exch2_jLo(2,566)=0 exch2_jHi(2,566)=0 exch2_opposingSend(2,566)=1 exch2_pij(1,2,566)=1 exch2_pij(2,2,566)=0 exch2_pij(3,2,566)=0 exch2_pij(4,2,566)=1 exch2_oi(2,566)=0 exch2_oj(2,566)=0 exch2_neighbourId(3,566)=567 exch2_iLo(3,566)=35 exch2_iHi(3,566)=35 exch2_jLo(3,566)=0 exch2_jHi(3,566)=52 exch2_opposingSend(3,566)=4 exch2_pij(1,3,566)=1 exch2_pij(2,3,566)=0 exch2_pij(3,3,566)=0 exch2_pij(4,3,566)=1 exch2_oi(3,566)=0 exch2_oj(3,566)=0 exch2_neighbourId(4,566)=565 exch2_iLo(4,566)=0 exch2_iHi(4,566)=0 exch2_jLo(4,566)=0 exch2_jHi(4,566)=52 exch2_opposingSend(4,566)=3 exch2_pij(1,4,566)=1 exch2_pij(2,4,566)=0 exch2_pij(3,4,566)=0 exch2_pij(4,4,566)=1 exch2_oi(4,566)=0 exch2_oj(4,566)=0 RETURN END SUBROUTINE W2_E2SETUP_567 C Topology for tile 567 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(567)=34 exch2_tNy(567)=51 exch2_tBasex(567)=374 exch2_tBasey(567)=357 exch2_txGlobalo(567)=1905 exch2_tyGlobalo(567)=358 exch2_isWedge(567)=0 exch2_isNedge(567)=0 exch2_isEedge(567)=0 exch2_isSedge(567)=0 exch2_myFace(567)=4 exch2_mydNx(567)=510 exch2_mydNy(567)=510 exch2_nNeighbours(567)=4 exch2_neighbourId(1,567)=582 exch2_iLo(1,567)=0 exch2_iHi(1,567)=35 exch2_jLo(1,567)=52 exch2_jHi(1,567)=52 exch2_opposingSend(1,567)=2 exch2_pij(1,1,567)=1 exch2_pij(2,1,567)=0 exch2_pij(3,1,567)=0 exch2_pij(4,1,567)=1 exch2_oi(1,567)=0 exch2_oj(1,567)=0 exch2_neighbourId(2,567)=552 exch2_iLo(2,567)=0 exch2_iHi(2,567)=35 exch2_jLo(2,567)=0 exch2_jHi(2,567)=0 exch2_opposingSend(2,567)=1 exch2_pij(1,2,567)=1 exch2_pij(2,2,567)=0 exch2_pij(3,2,567)=0 exch2_pij(4,2,567)=1 exch2_oi(2,567)=0 exch2_oj(2,567)=0 exch2_neighbourId(3,567)=568 exch2_iLo(3,567)=35 exch2_iHi(3,567)=35 exch2_jLo(3,567)=0 exch2_jHi(3,567)=52 exch2_opposingSend(3,567)=4 exch2_pij(1,3,567)=1 exch2_pij(2,3,567)=0 exch2_pij(3,3,567)=0 exch2_pij(4,3,567)=1 exch2_oi(3,567)=0 exch2_oj(3,567)=0 exch2_neighbourId(4,567)=566 exch2_iLo(4,567)=0 exch2_iHi(4,567)=0 exch2_jLo(4,567)=0 exch2_jHi(4,567)=52 exch2_opposingSend(4,567)=3 exch2_pij(1,4,567)=1 exch2_pij(2,4,567)=0 exch2_pij(3,4,567)=0 exch2_pij(4,4,567)=1 exch2_oi(4,567)=0 exch2_oj(4,567)=0 RETURN END SUBROUTINE W2_E2SETUP_568 C Topology for tile 568 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(568)=34 exch2_tNy(568)=51 exch2_tBasex(568)=408 exch2_tBasey(568)=357 exch2_txGlobalo(568)=1939 exch2_tyGlobalo(568)=358 exch2_isWedge(568)=0 exch2_isNedge(568)=0 exch2_isEedge(568)=0 exch2_isSedge(568)=0 exch2_myFace(568)=4 exch2_mydNx(568)=510 exch2_mydNy(568)=510 exch2_nNeighbours(568)=4 exch2_neighbourId(1,568)=583 exch2_iLo(1,568)=0 exch2_iHi(1,568)=35 exch2_jLo(1,568)=52 exch2_jHi(1,568)=52 exch2_opposingSend(1,568)=2 exch2_pij(1,1,568)=1 exch2_pij(2,1,568)=0 exch2_pij(3,1,568)=0 exch2_pij(4,1,568)=1 exch2_oi(1,568)=0 exch2_oj(1,568)=0 exch2_neighbourId(2,568)=553 exch2_iLo(2,568)=0 exch2_iHi(2,568)=35 exch2_jLo(2,568)=0 exch2_jHi(2,568)=0 exch2_opposingSend(2,568)=1 exch2_pij(1,2,568)=1 exch2_pij(2,2,568)=0 exch2_pij(3,2,568)=0 exch2_pij(4,2,568)=1 exch2_oi(2,568)=0 exch2_oj(2,568)=0 exch2_neighbourId(3,568)=569 exch2_iLo(3,568)=35 exch2_iHi(3,568)=35 exch2_jLo(3,568)=0 exch2_jHi(3,568)=52 exch2_opposingSend(3,568)=4 exch2_pij(1,3,568)=1 exch2_pij(2,3,568)=0 exch2_pij(3,3,568)=0 exch2_pij(4,3,568)=1 exch2_oi(3,568)=0 exch2_oj(3,568)=0 exch2_neighbourId(4,568)=567 exch2_iLo(4,568)=0 exch2_iHi(4,568)=0 exch2_jLo(4,568)=0 exch2_jHi(4,568)=52 exch2_opposingSend(4,568)=3 exch2_pij(1,4,568)=1 exch2_pij(2,4,568)=0 exch2_pij(3,4,568)=0 exch2_pij(4,4,568)=1 exch2_oi(4,568)=0 exch2_oj(4,568)=0 RETURN END SUBROUTINE W2_E2SETUP_569 C Topology for tile 569 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(569)=34 exch2_tNy(569)=51 exch2_tBasex(569)=442 exch2_tBasey(569)=357 exch2_txGlobalo(569)=1973 exch2_tyGlobalo(569)=358 exch2_isWedge(569)=0 exch2_isNedge(569)=0 exch2_isEedge(569)=0 exch2_isSedge(569)=0 exch2_myFace(569)=4 exch2_mydNx(569)=510 exch2_mydNy(569)=510 exch2_nNeighbours(569)=4 exch2_neighbourId(1,569)=584 exch2_iLo(1,569)=0 exch2_iHi(1,569)=35 exch2_jLo(1,569)=52 exch2_jHi(1,569)=52 exch2_opposingSend(1,569)=2 exch2_pij(1,1,569)=1 exch2_pij(2,1,569)=0 exch2_pij(3,1,569)=0 exch2_pij(4,1,569)=1 exch2_oi(1,569)=0 exch2_oj(1,569)=0 exch2_neighbourId(2,569)=554 exch2_iLo(2,569)=0 exch2_iHi(2,569)=35 exch2_jLo(2,569)=0 exch2_jHi(2,569)=0 exch2_opposingSend(2,569)=1 exch2_pij(1,2,569)=1 exch2_pij(2,2,569)=0 exch2_pij(3,2,569)=0 exch2_pij(4,2,569)=1 exch2_oi(2,569)=0 exch2_oj(2,569)=0 exch2_neighbourId(3,569)=570 exch2_iLo(3,569)=35 exch2_iHi(3,569)=35 exch2_jLo(3,569)=0 exch2_jHi(3,569)=52 exch2_opposingSend(3,569)=5 exch2_pij(1,3,569)=1 exch2_pij(2,3,569)=0 exch2_pij(3,3,569)=0 exch2_pij(4,3,569)=1 exch2_oi(3,569)=0 exch2_oj(3,569)=0 exch2_neighbourId(4,569)=568 exch2_iLo(4,569)=0 exch2_iHi(4,569)=0 exch2_jLo(4,569)=0 exch2_jHi(4,569)=52 exch2_opposingSend(4,569)=3 exch2_pij(1,4,569)=1 exch2_pij(2,4,569)=0 exch2_pij(3,4,569)=0 exch2_pij(4,4,569)=1 exch2_oi(4,569)=0 exch2_oj(4,569)=0 RETURN END SUBROUTINE W2_E2SETUP_570 C Topology for tile 570 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(570)=34 exch2_tNy(570)=51 exch2_tBasex(570)=476 exch2_tBasey(570)=357 exch2_txGlobalo(570)=2007 exch2_tyGlobalo(570)=358 exch2_isWedge(570)=0 exch2_isNedge(570)=0 exch2_isEedge(570)=1 exch2_isSedge(570)=0 exch2_myFace(570)=4 exch2_mydNx(570)=510 exch2_mydNy(570)=510 exch2_nNeighbours(570)=5 exch2_neighbourId(1,570)=585 exch2_iLo(1,570)=0 exch2_iHi(1,570)=35 exch2_jLo(1,570)=52 exch2_jHi(1,570)=52 exch2_opposingSend(1,570)=2 exch2_pij(1,1,570)=1 exch2_pij(2,1,570)=0 exch2_pij(3,1,570)=0 exch2_pij(4,1,570)=1 exch2_oi(1,570)=0 exch2_oj(1,570)=0 exch2_neighbourId(2,570)=555 exch2_iLo(2,570)=0 exch2_iHi(2,570)=35 exch2_jLo(2,570)=0 exch2_jHi(2,570)=0 exch2_opposingSend(2,570)=1 exch2_pij(1,2,570)=1 exch2_pij(2,2,570)=0 exch2_pij(3,2,570)=0 exch2_pij(4,2,570)=1 exch2_oi(2,570)=0 exch2_oj(2,570)=0 exch2_neighbourId(3,570)=754 exch2_iLo(3,570)=35 exch2_iHi(3,570)=35 exch2_jLo(3,570)=17 exch2_jHi(3,570)=52 exch2_opposingSend(3,570)=2 exch2_pij(1,3,570)=0 exch2_pij(2,3,570)=1 exch2_pij(3,3,570)=-1 exch2_pij(4,3,570)=0 exch2_oi(3,570)=510 exch2_oj(3,570)=511 exch2_neighbourId(4,570)=755 exch2_iLo(4,570)=35 exch2_iHi(4,570)=35 exch2_jLo(4,570)=0 exch2_jHi(4,570)=18 exch2_opposingSend(4,570)=3 exch2_pij(1,4,570)=0 exch2_pij(2,4,570)=1 exch2_pij(3,4,570)=-1 exch2_pij(4,4,570)=0 exch2_oi(4,570)=510 exch2_oj(4,570)=511 exch2_neighbourId(5,570)=569 exch2_iLo(5,570)=0 exch2_iHi(5,570)=0 exch2_jLo(5,570)=0 exch2_jHi(5,570)=52 exch2_opposingSend(5,570)=3 exch2_pij(1,5,570)=1 exch2_pij(2,5,570)=0 exch2_pij(3,5,570)=0 exch2_pij(4,5,570)=1 exch2_oi(5,570)=0 exch2_oj(5,570)=0 RETURN END SUBROUTINE W2_E2SETUP_571 C Topology for tile 571 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(571)=34 exch2_tNy(571)=51 exch2_tBasex(571)=0 exch2_tBasey(571)=408 exch2_txGlobalo(571)=1531 exch2_tyGlobalo(571)=409 exch2_isWedge(571)=1 exch2_isNedge(571)=0 exch2_isEedge(571)=0 exch2_isSedge(571)=0 exch2_myFace(571)=4 exch2_mydNx(571)=510 exch2_mydNy(571)=510 exch2_nNeighbours(571)=4 exch2_neighbourId(1,571)=586 exch2_iLo(1,571)=0 exch2_iHi(1,571)=35 exch2_jLo(1,571)=52 exch2_jHi(1,571)=52 exch2_opposingSend(1,571)=2 exch2_pij(1,1,571)=1 exch2_pij(2,1,571)=0 exch2_pij(3,1,571)=0 exch2_pij(4,1,571)=1 exch2_oi(1,571)=0 exch2_oj(1,571)=0 exch2_neighbourId(2,571)=556 exch2_iLo(2,571)=0 exch2_iHi(2,571)=35 exch2_jLo(2,571)=0 exch2_jHi(2,571)=0 exch2_opposingSend(2,571)=1 exch2_pij(1,2,571)=1 exch2_pij(2,2,571)=0 exch2_pij(3,2,571)=0 exch2_pij(4,2,571)=1 exch2_oi(2,571)=0 exch2_oj(2,571)=0 exch2_neighbourId(3,571)=572 exch2_iLo(3,571)=35 exch2_iHi(3,571)=35 exch2_jLo(3,571)=0 exch2_jHi(3,571)=52 exch2_opposingSend(3,571)=4 exch2_pij(1,3,571)=1 exch2_pij(2,3,571)=0 exch2_pij(3,3,571)=0 exch2_pij(4,3,571)=1 exch2_oi(3,571)=0 exch2_oj(3,571)=0 exch2_neighbourId(4,571)=435 exch2_iLo(4,571)=0 exch2_iHi(4,571)=0 exch2_jLo(4,571)=0 exch2_jHi(4,571)=52 exch2_opposingSend(4,571)=3 exch2_pij(1,4,571)=1 exch2_pij(2,4,571)=0 exch2_pij(3,4,571)=0 exch2_pij(4,4,571)=1 exch2_oi(4,571)=-510 exch2_oj(4,571)=0 RETURN END SUBROUTINE W2_E2SETUP_572 C Topology for tile 572 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(572)=34 exch2_tNy(572)=51 exch2_tBasex(572)=34 exch2_tBasey(572)=408 exch2_txGlobalo(572)=1565 exch2_tyGlobalo(572)=409 exch2_isWedge(572)=0 exch2_isNedge(572)=0 exch2_isEedge(572)=0 exch2_isSedge(572)=0 exch2_myFace(572)=4 exch2_mydNx(572)=510 exch2_mydNy(572)=510 exch2_nNeighbours(572)=4 exch2_neighbourId(1,572)=587 exch2_iLo(1,572)=0 exch2_iHi(1,572)=35 exch2_jLo(1,572)=52 exch2_jHi(1,572)=52 exch2_opposingSend(1,572)=2 exch2_pij(1,1,572)=1 exch2_pij(2,1,572)=0 exch2_pij(3,1,572)=0 exch2_pij(4,1,572)=1 exch2_oi(1,572)=0 exch2_oj(1,572)=0 exch2_neighbourId(2,572)=557 exch2_iLo(2,572)=0 exch2_iHi(2,572)=35 exch2_jLo(2,572)=0 exch2_jHi(2,572)=0 exch2_opposingSend(2,572)=1 exch2_pij(1,2,572)=1 exch2_pij(2,2,572)=0 exch2_pij(3,2,572)=0 exch2_pij(4,2,572)=1 exch2_oi(2,572)=0 exch2_oj(2,572)=0 exch2_neighbourId(3,572)=573 exch2_iLo(3,572)=35 exch2_iHi(3,572)=35 exch2_jLo(3,572)=0 exch2_jHi(3,572)=52 exch2_opposingSend(3,572)=4 exch2_pij(1,3,572)=1 exch2_pij(2,3,572)=0 exch2_pij(3,3,572)=0 exch2_pij(4,3,572)=1 exch2_oi(3,572)=0 exch2_oj(3,572)=0 exch2_neighbourId(4,572)=571 exch2_iLo(4,572)=0 exch2_iHi(4,572)=0 exch2_jLo(4,572)=0 exch2_jHi(4,572)=52 exch2_opposingSend(4,572)=3 exch2_pij(1,4,572)=1 exch2_pij(2,4,572)=0 exch2_pij(3,4,572)=0 exch2_pij(4,4,572)=1 exch2_oi(4,572)=0 exch2_oj(4,572)=0 RETURN END SUBROUTINE W2_E2SETUP_573 C Topology for tile 573 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(573)=34 exch2_tNy(573)=51 exch2_tBasex(573)=68 exch2_tBasey(573)=408 exch2_txGlobalo(573)=1599 exch2_tyGlobalo(573)=409 exch2_isWedge(573)=0 exch2_isNedge(573)=0 exch2_isEedge(573)=0 exch2_isSedge(573)=0 exch2_myFace(573)=4 exch2_mydNx(573)=510 exch2_mydNy(573)=510 exch2_nNeighbours(573)=4 exch2_neighbourId(1,573)=588 exch2_iLo(1,573)=0 exch2_iHi(1,573)=35 exch2_jLo(1,573)=52 exch2_jHi(1,573)=52 exch2_opposingSend(1,573)=2 exch2_pij(1,1,573)=1 exch2_pij(2,1,573)=0 exch2_pij(3,1,573)=0 exch2_pij(4,1,573)=1 exch2_oi(1,573)=0 exch2_oj(1,573)=0 exch2_neighbourId(2,573)=558 exch2_iLo(2,573)=0 exch2_iHi(2,573)=35 exch2_jLo(2,573)=0 exch2_jHi(2,573)=0 exch2_opposingSend(2,573)=1 exch2_pij(1,2,573)=1 exch2_pij(2,2,573)=0 exch2_pij(3,2,573)=0 exch2_pij(4,2,573)=1 exch2_oi(2,573)=0 exch2_oj(2,573)=0 exch2_neighbourId(3,573)=574 exch2_iLo(3,573)=35 exch2_iHi(3,573)=35 exch2_jLo(3,573)=0 exch2_jHi(3,573)=52 exch2_opposingSend(3,573)=4 exch2_pij(1,3,573)=1 exch2_pij(2,3,573)=0 exch2_pij(3,3,573)=0 exch2_pij(4,3,573)=1 exch2_oi(3,573)=0 exch2_oj(3,573)=0 exch2_neighbourId(4,573)=572 exch2_iLo(4,573)=0 exch2_iHi(4,573)=0 exch2_jLo(4,573)=0 exch2_jHi(4,573)=52 exch2_opposingSend(4,573)=3 exch2_pij(1,4,573)=1 exch2_pij(2,4,573)=0 exch2_pij(3,4,573)=0 exch2_pij(4,4,573)=1 exch2_oi(4,573)=0 exch2_oj(4,573)=0 RETURN END SUBROUTINE W2_E2SETUP_574 C Topology for tile 574 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(574)=34 exch2_tNy(574)=51 exch2_tBasex(574)=102 exch2_tBasey(574)=408 exch2_txGlobalo(574)=1633 exch2_tyGlobalo(574)=409 exch2_isWedge(574)=0 exch2_isNedge(574)=0 exch2_isEedge(574)=0 exch2_isSedge(574)=0 exch2_myFace(574)=4 exch2_mydNx(574)=510 exch2_mydNy(574)=510 exch2_nNeighbours(574)=4 exch2_neighbourId(1,574)=589 exch2_iLo(1,574)=0 exch2_iHi(1,574)=35 exch2_jLo(1,574)=52 exch2_jHi(1,574)=52 exch2_opposingSend(1,574)=2 exch2_pij(1,1,574)=1 exch2_pij(2,1,574)=0 exch2_pij(3,1,574)=0 exch2_pij(4,1,574)=1 exch2_oi(1,574)=0 exch2_oj(1,574)=0 exch2_neighbourId(2,574)=559 exch2_iLo(2,574)=0 exch2_iHi(2,574)=35 exch2_jLo(2,574)=0 exch2_jHi(2,574)=0 exch2_opposingSend(2,574)=1 exch2_pij(1,2,574)=1 exch2_pij(2,2,574)=0 exch2_pij(3,2,574)=0 exch2_pij(4,2,574)=1 exch2_oi(2,574)=0 exch2_oj(2,574)=0 exch2_neighbourId(3,574)=575 exch2_iLo(3,574)=35 exch2_iHi(3,574)=35 exch2_jLo(3,574)=0 exch2_jHi(3,574)=52 exch2_opposingSend(3,574)=4 exch2_pij(1,3,574)=1 exch2_pij(2,3,574)=0 exch2_pij(3,3,574)=0 exch2_pij(4,3,574)=1 exch2_oi(3,574)=0 exch2_oj(3,574)=0 exch2_neighbourId(4,574)=573 exch2_iLo(4,574)=0 exch2_iHi(4,574)=0 exch2_jLo(4,574)=0 exch2_jHi(4,574)=52 exch2_opposingSend(4,574)=3 exch2_pij(1,4,574)=1 exch2_pij(2,4,574)=0 exch2_pij(3,4,574)=0 exch2_pij(4,4,574)=1 exch2_oi(4,574)=0 exch2_oj(4,574)=0 RETURN END SUBROUTINE W2_E2SETUP_575 C Topology for tile 575 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(575)=34 exch2_tNy(575)=51 exch2_tBasex(575)=136 exch2_tBasey(575)=408 exch2_txGlobalo(575)=1667 exch2_tyGlobalo(575)=409 exch2_isWedge(575)=0 exch2_isNedge(575)=0 exch2_isEedge(575)=0 exch2_isSedge(575)=0 exch2_myFace(575)=4 exch2_mydNx(575)=510 exch2_mydNy(575)=510 exch2_nNeighbours(575)=4 exch2_neighbourId(1,575)=590 exch2_iLo(1,575)=0 exch2_iHi(1,575)=35 exch2_jLo(1,575)=52 exch2_jHi(1,575)=52 exch2_opposingSend(1,575)=2 exch2_pij(1,1,575)=1 exch2_pij(2,1,575)=0 exch2_pij(3,1,575)=0 exch2_pij(4,1,575)=1 exch2_oi(1,575)=0 exch2_oj(1,575)=0 exch2_neighbourId(2,575)=560 exch2_iLo(2,575)=0 exch2_iHi(2,575)=35 exch2_jLo(2,575)=0 exch2_jHi(2,575)=0 exch2_opposingSend(2,575)=1 exch2_pij(1,2,575)=1 exch2_pij(2,2,575)=0 exch2_pij(3,2,575)=0 exch2_pij(4,2,575)=1 exch2_oi(2,575)=0 exch2_oj(2,575)=0 exch2_neighbourId(3,575)=576 exch2_iLo(3,575)=35 exch2_iHi(3,575)=35 exch2_jLo(3,575)=0 exch2_jHi(3,575)=52 exch2_opposingSend(3,575)=4 exch2_pij(1,3,575)=1 exch2_pij(2,3,575)=0 exch2_pij(3,3,575)=0 exch2_pij(4,3,575)=1 exch2_oi(3,575)=0 exch2_oj(3,575)=0 exch2_neighbourId(4,575)=574 exch2_iLo(4,575)=0 exch2_iHi(4,575)=0 exch2_jLo(4,575)=0 exch2_jHi(4,575)=52 exch2_opposingSend(4,575)=3 exch2_pij(1,4,575)=1 exch2_pij(2,4,575)=0 exch2_pij(3,4,575)=0 exch2_pij(4,4,575)=1 exch2_oi(4,575)=0 exch2_oj(4,575)=0 RETURN END SUBROUTINE W2_E2SETUP_576 C Topology for tile 576 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(576)=34 exch2_tNy(576)=51 exch2_tBasex(576)=170 exch2_tBasey(576)=408 exch2_txGlobalo(576)=1701 exch2_tyGlobalo(576)=409 exch2_isWedge(576)=0 exch2_isNedge(576)=0 exch2_isEedge(576)=0 exch2_isSedge(576)=0 exch2_myFace(576)=4 exch2_mydNx(576)=510 exch2_mydNy(576)=510 exch2_nNeighbours(576)=4 exch2_neighbourId(1,576)=591 exch2_iLo(1,576)=0 exch2_iHi(1,576)=35 exch2_jLo(1,576)=52 exch2_jHi(1,576)=52 exch2_opposingSend(1,576)=2 exch2_pij(1,1,576)=1 exch2_pij(2,1,576)=0 exch2_pij(3,1,576)=0 exch2_pij(4,1,576)=1 exch2_oi(1,576)=0 exch2_oj(1,576)=0 exch2_neighbourId(2,576)=561 exch2_iLo(2,576)=0 exch2_iHi(2,576)=35 exch2_jLo(2,576)=0 exch2_jHi(2,576)=0 exch2_opposingSend(2,576)=1 exch2_pij(1,2,576)=1 exch2_pij(2,2,576)=0 exch2_pij(3,2,576)=0 exch2_pij(4,2,576)=1 exch2_oi(2,576)=0 exch2_oj(2,576)=0 exch2_neighbourId(3,576)=577 exch2_iLo(3,576)=35 exch2_iHi(3,576)=35 exch2_jLo(3,576)=0 exch2_jHi(3,576)=52 exch2_opposingSend(3,576)=4 exch2_pij(1,3,576)=1 exch2_pij(2,3,576)=0 exch2_pij(3,3,576)=0 exch2_pij(4,3,576)=1 exch2_oi(3,576)=0 exch2_oj(3,576)=0 exch2_neighbourId(4,576)=575 exch2_iLo(4,576)=0 exch2_iHi(4,576)=0 exch2_jLo(4,576)=0 exch2_jHi(4,576)=52 exch2_opposingSend(4,576)=3 exch2_pij(1,4,576)=1 exch2_pij(2,4,576)=0 exch2_pij(3,4,576)=0 exch2_pij(4,4,576)=1 exch2_oi(4,576)=0 exch2_oj(4,576)=0 RETURN END SUBROUTINE W2_E2SETUP_577 C Topology for tile 577 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(577)=34 exch2_tNy(577)=51 exch2_tBasex(577)=204 exch2_tBasey(577)=408 exch2_txGlobalo(577)=1735 exch2_tyGlobalo(577)=409 exch2_isWedge(577)=0 exch2_isNedge(577)=0 exch2_isEedge(577)=0 exch2_isSedge(577)=0 exch2_myFace(577)=4 exch2_mydNx(577)=510 exch2_mydNy(577)=510 exch2_nNeighbours(577)=4 exch2_neighbourId(1,577)=592 exch2_iLo(1,577)=0 exch2_iHi(1,577)=35 exch2_jLo(1,577)=52 exch2_jHi(1,577)=52 exch2_opposingSend(1,577)=2 exch2_pij(1,1,577)=1 exch2_pij(2,1,577)=0 exch2_pij(3,1,577)=0 exch2_pij(4,1,577)=1 exch2_oi(1,577)=0 exch2_oj(1,577)=0 exch2_neighbourId(2,577)=562 exch2_iLo(2,577)=0 exch2_iHi(2,577)=35 exch2_jLo(2,577)=0 exch2_jHi(2,577)=0 exch2_opposingSend(2,577)=1 exch2_pij(1,2,577)=1 exch2_pij(2,2,577)=0 exch2_pij(3,2,577)=0 exch2_pij(4,2,577)=1 exch2_oi(2,577)=0 exch2_oj(2,577)=0 exch2_neighbourId(3,577)=578 exch2_iLo(3,577)=35 exch2_iHi(3,577)=35 exch2_jLo(3,577)=0 exch2_jHi(3,577)=52 exch2_opposingSend(3,577)=4 exch2_pij(1,3,577)=1 exch2_pij(2,3,577)=0 exch2_pij(3,3,577)=0 exch2_pij(4,3,577)=1 exch2_oi(3,577)=0 exch2_oj(3,577)=0 exch2_neighbourId(4,577)=576 exch2_iLo(4,577)=0 exch2_iHi(4,577)=0 exch2_jLo(4,577)=0 exch2_jHi(4,577)=52 exch2_opposingSend(4,577)=3 exch2_pij(1,4,577)=1 exch2_pij(2,4,577)=0 exch2_pij(3,4,577)=0 exch2_pij(4,4,577)=1 exch2_oi(4,577)=0 exch2_oj(4,577)=0 RETURN END SUBROUTINE W2_E2SETUP_578 C Topology for tile 578 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(578)=34 exch2_tNy(578)=51 exch2_tBasex(578)=238 exch2_tBasey(578)=408 exch2_txGlobalo(578)=1769 exch2_tyGlobalo(578)=409 exch2_isWedge(578)=0 exch2_isNedge(578)=0 exch2_isEedge(578)=0 exch2_isSedge(578)=0 exch2_myFace(578)=4 exch2_mydNx(578)=510 exch2_mydNy(578)=510 exch2_nNeighbours(578)=4 exch2_neighbourId(1,578)=593 exch2_iLo(1,578)=0 exch2_iHi(1,578)=35 exch2_jLo(1,578)=52 exch2_jHi(1,578)=52 exch2_opposingSend(1,578)=2 exch2_pij(1,1,578)=1 exch2_pij(2,1,578)=0 exch2_pij(3,1,578)=0 exch2_pij(4,1,578)=1 exch2_oi(1,578)=0 exch2_oj(1,578)=0 exch2_neighbourId(2,578)=563 exch2_iLo(2,578)=0 exch2_iHi(2,578)=35 exch2_jLo(2,578)=0 exch2_jHi(2,578)=0 exch2_opposingSend(2,578)=1 exch2_pij(1,2,578)=1 exch2_pij(2,2,578)=0 exch2_pij(3,2,578)=0 exch2_pij(4,2,578)=1 exch2_oi(2,578)=0 exch2_oj(2,578)=0 exch2_neighbourId(3,578)=579 exch2_iLo(3,578)=35 exch2_iHi(3,578)=35 exch2_jLo(3,578)=0 exch2_jHi(3,578)=52 exch2_opposingSend(3,578)=4 exch2_pij(1,3,578)=1 exch2_pij(2,3,578)=0 exch2_pij(3,3,578)=0 exch2_pij(4,3,578)=1 exch2_oi(3,578)=0 exch2_oj(3,578)=0 exch2_neighbourId(4,578)=577 exch2_iLo(4,578)=0 exch2_iHi(4,578)=0 exch2_jLo(4,578)=0 exch2_jHi(4,578)=52 exch2_opposingSend(4,578)=3 exch2_pij(1,4,578)=1 exch2_pij(2,4,578)=0 exch2_pij(3,4,578)=0 exch2_pij(4,4,578)=1 exch2_oi(4,578)=0 exch2_oj(4,578)=0 RETURN END SUBROUTINE W2_E2SETUP_579 C Topology for tile 579 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(579)=34 exch2_tNy(579)=51 exch2_tBasex(579)=272 exch2_tBasey(579)=408 exch2_txGlobalo(579)=1803 exch2_tyGlobalo(579)=409 exch2_isWedge(579)=0 exch2_isNedge(579)=0 exch2_isEedge(579)=0 exch2_isSedge(579)=0 exch2_myFace(579)=4 exch2_mydNx(579)=510 exch2_mydNy(579)=510 exch2_nNeighbours(579)=4 exch2_neighbourId(1,579)=594 exch2_iLo(1,579)=0 exch2_iHi(1,579)=35 exch2_jLo(1,579)=52 exch2_jHi(1,579)=52 exch2_opposingSend(1,579)=2 exch2_pij(1,1,579)=1 exch2_pij(2,1,579)=0 exch2_pij(3,1,579)=0 exch2_pij(4,1,579)=1 exch2_oi(1,579)=0 exch2_oj(1,579)=0 exch2_neighbourId(2,579)=564 exch2_iLo(2,579)=0 exch2_iHi(2,579)=35 exch2_jLo(2,579)=0 exch2_jHi(2,579)=0 exch2_opposingSend(2,579)=1 exch2_pij(1,2,579)=1 exch2_pij(2,2,579)=0 exch2_pij(3,2,579)=0 exch2_pij(4,2,579)=1 exch2_oi(2,579)=0 exch2_oj(2,579)=0 exch2_neighbourId(3,579)=580 exch2_iLo(3,579)=35 exch2_iHi(3,579)=35 exch2_jLo(3,579)=0 exch2_jHi(3,579)=52 exch2_opposingSend(3,579)=4 exch2_pij(1,3,579)=1 exch2_pij(2,3,579)=0 exch2_pij(3,3,579)=0 exch2_pij(4,3,579)=1 exch2_oi(3,579)=0 exch2_oj(3,579)=0 exch2_neighbourId(4,579)=578 exch2_iLo(4,579)=0 exch2_iHi(4,579)=0 exch2_jLo(4,579)=0 exch2_jHi(4,579)=52 exch2_opposingSend(4,579)=3 exch2_pij(1,4,579)=1 exch2_pij(2,4,579)=0 exch2_pij(3,4,579)=0 exch2_pij(4,4,579)=1 exch2_oi(4,579)=0 exch2_oj(4,579)=0 RETURN END SUBROUTINE W2_E2SETUP_580 C Topology for tile 580 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(580)=34 exch2_tNy(580)=51 exch2_tBasex(580)=306 exch2_tBasey(580)=408 exch2_txGlobalo(580)=1837 exch2_tyGlobalo(580)=409 exch2_isWedge(580)=0 exch2_isNedge(580)=0 exch2_isEedge(580)=0 exch2_isSedge(580)=0 exch2_myFace(580)=4 exch2_mydNx(580)=510 exch2_mydNy(580)=510 exch2_nNeighbours(580)=4 exch2_neighbourId(1,580)=595 exch2_iLo(1,580)=0 exch2_iHi(1,580)=35 exch2_jLo(1,580)=52 exch2_jHi(1,580)=52 exch2_opposingSend(1,580)=2 exch2_pij(1,1,580)=1 exch2_pij(2,1,580)=0 exch2_pij(3,1,580)=0 exch2_pij(4,1,580)=1 exch2_oi(1,580)=0 exch2_oj(1,580)=0 exch2_neighbourId(2,580)=565 exch2_iLo(2,580)=0 exch2_iHi(2,580)=35 exch2_jLo(2,580)=0 exch2_jHi(2,580)=0 exch2_opposingSend(2,580)=1 exch2_pij(1,2,580)=1 exch2_pij(2,2,580)=0 exch2_pij(3,2,580)=0 exch2_pij(4,2,580)=1 exch2_oi(2,580)=0 exch2_oj(2,580)=0 exch2_neighbourId(3,580)=581 exch2_iLo(3,580)=35 exch2_iHi(3,580)=35 exch2_jLo(3,580)=0 exch2_jHi(3,580)=52 exch2_opposingSend(3,580)=4 exch2_pij(1,3,580)=1 exch2_pij(2,3,580)=0 exch2_pij(3,3,580)=0 exch2_pij(4,3,580)=1 exch2_oi(3,580)=0 exch2_oj(3,580)=0 exch2_neighbourId(4,580)=579 exch2_iLo(4,580)=0 exch2_iHi(4,580)=0 exch2_jLo(4,580)=0 exch2_jHi(4,580)=52 exch2_opposingSend(4,580)=3 exch2_pij(1,4,580)=1 exch2_pij(2,4,580)=0 exch2_pij(3,4,580)=0 exch2_pij(4,4,580)=1 exch2_oi(4,580)=0 exch2_oj(4,580)=0 RETURN END SUBROUTINE W2_E2SETUP_581 C Topology for tile 581 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(581)=34 exch2_tNy(581)=51 exch2_tBasex(581)=340 exch2_tBasey(581)=408 exch2_txGlobalo(581)=1871 exch2_tyGlobalo(581)=409 exch2_isWedge(581)=0 exch2_isNedge(581)=0 exch2_isEedge(581)=0 exch2_isSedge(581)=0 exch2_myFace(581)=4 exch2_mydNx(581)=510 exch2_mydNy(581)=510 exch2_nNeighbours(581)=4 exch2_neighbourId(1,581)=596 exch2_iLo(1,581)=0 exch2_iHi(1,581)=35 exch2_jLo(1,581)=52 exch2_jHi(1,581)=52 exch2_opposingSend(1,581)=2 exch2_pij(1,1,581)=1 exch2_pij(2,1,581)=0 exch2_pij(3,1,581)=0 exch2_pij(4,1,581)=1 exch2_oi(1,581)=0 exch2_oj(1,581)=0 exch2_neighbourId(2,581)=566 exch2_iLo(2,581)=0 exch2_iHi(2,581)=35 exch2_jLo(2,581)=0 exch2_jHi(2,581)=0 exch2_opposingSend(2,581)=1 exch2_pij(1,2,581)=1 exch2_pij(2,2,581)=0 exch2_pij(3,2,581)=0 exch2_pij(4,2,581)=1 exch2_oi(2,581)=0 exch2_oj(2,581)=0 exch2_neighbourId(3,581)=582 exch2_iLo(3,581)=35 exch2_iHi(3,581)=35 exch2_jLo(3,581)=0 exch2_jHi(3,581)=52 exch2_opposingSend(3,581)=4 exch2_pij(1,3,581)=1 exch2_pij(2,3,581)=0 exch2_pij(3,3,581)=0 exch2_pij(4,3,581)=1 exch2_oi(3,581)=0 exch2_oj(3,581)=0 exch2_neighbourId(4,581)=580 exch2_iLo(4,581)=0 exch2_iHi(4,581)=0 exch2_jLo(4,581)=0 exch2_jHi(4,581)=52 exch2_opposingSend(4,581)=3 exch2_pij(1,4,581)=1 exch2_pij(2,4,581)=0 exch2_pij(3,4,581)=0 exch2_pij(4,4,581)=1 exch2_oi(4,581)=0 exch2_oj(4,581)=0 RETURN END SUBROUTINE W2_E2SETUP_582 C Topology for tile 582 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(582)=34 exch2_tNy(582)=51 exch2_tBasex(582)=374 exch2_tBasey(582)=408 exch2_txGlobalo(582)=1905 exch2_tyGlobalo(582)=409 exch2_isWedge(582)=0 exch2_isNedge(582)=0 exch2_isEedge(582)=0 exch2_isSedge(582)=0 exch2_myFace(582)=4 exch2_mydNx(582)=510 exch2_mydNy(582)=510 exch2_nNeighbours(582)=4 exch2_neighbourId(1,582)=597 exch2_iLo(1,582)=0 exch2_iHi(1,582)=35 exch2_jLo(1,582)=52 exch2_jHi(1,582)=52 exch2_opposingSend(1,582)=2 exch2_pij(1,1,582)=1 exch2_pij(2,1,582)=0 exch2_pij(3,1,582)=0 exch2_pij(4,1,582)=1 exch2_oi(1,582)=0 exch2_oj(1,582)=0 exch2_neighbourId(2,582)=567 exch2_iLo(2,582)=0 exch2_iHi(2,582)=35 exch2_jLo(2,582)=0 exch2_jHi(2,582)=0 exch2_opposingSend(2,582)=1 exch2_pij(1,2,582)=1 exch2_pij(2,2,582)=0 exch2_pij(3,2,582)=0 exch2_pij(4,2,582)=1 exch2_oi(2,582)=0 exch2_oj(2,582)=0 exch2_neighbourId(3,582)=583 exch2_iLo(3,582)=35 exch2_iHi(3,582)=35 exch2_jLo(3,582)=0 exch2_jHi(3,582)=52 exch2_opposingSend(3,582)=4 exch2_pij(1,3,582)=1 exch2_pij(2,3,582)=0 exch2_pij(3,3,582)=0 exch2_pij(4,3,582)=1 exch2_oi(3,582)=0 exch2_oj(3,582)=0 exch2_neighbourId(4,582)=581 exch2_iLo(4,582)=0 exch2_iHi(4,582)=0 exch2_jLo(4,582)=0 exch2_jHi(4,582)=52 exch2_opposingSend(4,582)=3 exch2_pij(1,4,582)=1 exch2_pij(2,4,582)=0 exch2_pij(3,4,582)=0 exch2_pij(4,4,582)=1 exch2_oi(4,582)=0 exch2_oj(4,582)=0 RETURN END SUBROUTINE W2_E2SETUP_583 C Topology for tile 583 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(583)=34 exch2_tNy(583)=51 exch2_tBasex(583)=408 exch2_tBasey(583)=408 exch2_txGlobalo(583)=1939 exch2_tyGlobalo(583)=409 exch2_isWedge(583)=0 exch2_isNedge(583)=0 exch2_isEedge(583)=0 exch2_isSedge(583)=0 exch2_myFace(583)=4 exch2_mydNx(583)=510 exch2_mydNy(583)=510 exch2_nNeighbours(583)=4 exch2_neighbourId(1,583)=598 exch2_iLo(1,583)=0 exch2_iHi(1,583)=35 exch2_jLo(1,583)=52 exch2_jHi(1,583)=52 exch2_opposingSend(1,583)=2 exch2_pij(1,1,583)=1 exch2_pij(2,1,583)=0 exch2_pij(3,1,583)=0 exch2_pij(4,1,583)=1 exch2_oi(1,583)=0 exch2_oj(1,583)=0 exch2_neighbourId(2,583)=568 exch2_iLo(2,583)=0 exch2_iHi(2,583)=35 exch2_jLo(2,583)=0 exch2_jHi(2,583)=0 exch2_opposingSend(2,583)=1 exch2_pij(1,2,583)=1 exch2_pij(2,2,583)=0 exch2_pij(3,2,583)=0 exch2_pij(4,2,583)=1 exch2_oi(2,583)=0 exch2_oj(2,583)=0 exch2_neighbourId(3,583)=584 exch2_iLo(3,583)=35 exch2_iHi(3,583)=35 exch2_jLo(3,583)=0 exch2_jHi(3,583)=52 exch2_opposingSend(3,583)=4 exch2_pij(1,3,583)=1 exch2_pij(2,3,583)=0 exch2_pij(3,3,583)=0 exch2_pij(4,3,583)=1 exch2_oi(3,583)=0 exch2_oj(3,583)=0 exch2_neighbourId(4,583)=582 exch2_iLo(4,583)=0 exch2_iHi(4,583)=0 exch2_jLo(4,583)=0 exch2_jHi(4,583)=52 exch2_opposingSend(4,583)=3 exch2_pij(1,4,583)=1 exch2_pij(2,4,583)=0 exch2_pij(3,4,583)=0 exch2_pij(4,4,583)=1 exch2_oi(4,583)=0 exch2_oj(4,583)=0 RETURN END SUBROUTINE W2_E2SETUP_584 C Topology for tile 584 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(584)=34 exch2_tNy(584)=51 exch2_tBasex(584)=442 exch2_tBasey(584)=408 exch2_txGlobalo(584)=1973 exch2_tyGlobalo(584)=409 exch2_isWedge(584)=0 exch2_isNedge(584)=0 exch2_isEedge(584)=0 exch2_isSedge(584)=0 exch2_myFace(584)=4 exch2_mydNx(584)=510 exch2_mydNy(584)=510 exch2_nNeighbours(584)=4 exch2_neighbourId(1,584)=599 exch2_iLo(1,584)=0 exch2_iHi(1,584)=35 exch2_jLo(1,584)=52 exch2_jHi(1,584)=52 exch2_opposingSend(1,584)=2 exch2_pij(1,1,584)=1 exch2_pij(2,1,584)=0 exch2_pij(3,1,584)=0 exch2_pij(4,1,584)=1 exch2_oi(1,584)=0 exch2_oj(1,584)=0 exch2_neighbourId(2,584)=569 exch2_iLo(2,584)=0 exch2_iHi(2,584)=35 exch2_jLo(2,584)=0 exch2_jHi(2,584)=0 exch2_opposingSend(2,584)=1 exch2_pij(1,2,584)=1 exch2_pij(2,2,584)=0 exch2_pij(3,2,584)=0 exch2_pij(4,2,584)=1 exch2_oi(2,584)=0 exch2_oj(2,584)=0 exch2_neighbourId(3,584)=585 exch2_iLo(3,584)=35 exch2_iHi(3,584)=35 exch2_jLo(3,584)=0 exch2_jHi(3,584)=52 exch2_opposingSend(3,584)=5 exch2_pij(1,3,584)=1 exch2_pij(2,3,584)=0 exch2_pij(3,3,584)=0 exch2_pij(4,3,584)=1 exch2_oi(3,584)=0 exch2_oj(3,584)=0 exch2_neighbourId(4,584)=583 exch2_iLo(4,584)=0 exch2_iHi(4,584)=0 exch2_jLo(4,584)=0 exch2_jHi(4,584)=52 exch2_opposingSend(4,584)=3 exch2_pij(1,4,584)=1 exch2_pij(2,4,584)=0 exch2_pij(3,4,584)=0 exch2_pij(4,4,584)=1 exch2_oi(4,584)=0 exch2_oj(4,584)=0 RETURN END SUBROUTINE W2_E2SETUP_585 C Topology for tile 585 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(585)=34 exch2_tNy(585)=51 exch2_tBasex(585)=476 exch2_tBasey(585)=408 exch2_txGlobalo(585)=2007 exch2_tyGlobalo(585)=409 exch2_isWedge(585)=0 exch2_isNedge(585)=0 exch2_isEedge(585)=1 exch2_isSedge(585)=0 exch2_myFace(585)=4 exch2_mydNx(585)=510 exch2_mydNy(585)=510 exch2_nNeighbours(585)=5 exch2_neighbourId(1,585)=600 exch2_iLo(1,585)=0 exch2_iHi(1,585)=35 exch2_jLo(1,585)=52 exch2_jHi(1,585)=52 exch2_opposingSend(1,585)=2 exch2_pij(1,1,585)=1 exch2_pij(2,1,585)=0 exch2_pij(3,1,585)=0 exch2_pij(4,1,585)=1 exch2_oi(1,585)=0 exch2_oj(1,585)=0 exch2_neighbourId(2,585)=570 exch2_iLo(2,585)=0 exch2_iHi(2,585)=35 exch2_jLo(2,585)=0 exch2_jHi(2,585)=0 exch2_opposingSend(2,585)=1 exch2_pij(1,2,585)=1 exch2_pij(2,2,585)=0 exch2_pij(3,2,585)=0 exch2_pij(4,2,585)=1 exch2_oi(2,585)=0 exch2_oj(2,585)=0 exch2_neighbourId(3,585)=752 exch2_iLo(3,585)=35 exch2_iHi(3,585)=35 exch2_jLo(3,585)=34 exch2_jHi(3,585)=52 exch2_opposingSend(3,585)=2 exch2_pij(1,3,585)=0 exch2_pij(2,3,585)=1 exch2_pij(3,3,585)=-1 exch2_pij(4,3,585)=0 exch2_oi(3,585)=510 exch2_oj(3,585)=511 exch2_neighbourId(4,585)=753 exch2_iLo(4,585)=35 exch2_iHi(4,585)=35 exch2_jLo(4,585)=0 exch2_jHi(4,585)=35 exch2_opposingSend(4,585)=2 exch2_pij(1,4,585)=0 exch2_pij(2,4,585)=1 exch2_pij(3,4,585)=-1 exch2_pij(4,4,585)=0 exch2_oi(4,585)=510 exch2_oj(4,585)=511 exch2_neighbourId(5,585)=584 exch2_iLo(5,585)=0 exch2_iHi(5,585)=0 exch2_jLo(5,585)=0 exch2_jHi(5,585)=52 exch2_opposingSend(5,585)=3 exch2_pij(1,5,585)=1 exch2_pij(2,5,585)=0 exch2_pij(3,5,585)=0 exch2_pij(4,5,585)=1 exch2_oi(5,585)=0 exch2_oj(5,585)=0 RETURN END SUBROUTINE W2_E2SETUP_586 C Topology for tile 586 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(586)=34 exch2_tNy(586)=51 exch2_tBasex(586)=0 exch2_tBasey(586)=459 exch2_txGlobalo(586)=1531 exch2_tyGlobalo(586)=460 exch2_isWedge(586)=1 exch2_isNedge(586)=1 exch2_isEedge(586)=0 exch2_isSedge(586)=0 exch2_myFace(586)=4 exch2_mydNx(586)=510 exch2_mydNy(586)=510 exch2_nNeighbours(586)=4 exch2_neighbourId(1,586)=601 exch2_iLo(1,586)=0 exch2_iHi(1,586)=35 exch2_jLo(1,586)=52 exch2_jHi(1,586)=52 exch2_opposingSend(1,586)=2 exch2_pij(1,1,586)=1 exch2_pij(2,1,586)=0 exch2_pij(3,1,586)=0 exch2_pij(4,1,586)=1 exch2_oi(1,586)=0 exch2_oj(1,586)=510 exch2_neighbourId(2,586)=571 exch2_iLo(2,586)=0 exch2_iHi(2,586)=35 exch2_jLo(2,586)=0 exch2_jHi(2,586)=0 exch2_opposingSend(2,586)=1 exch2_pij(1,2,586)=1 exch2_pij(2,2,586)=0 exch2_pij(3,2,586)=0 exch2_pij(4,2,586)=1 exch2_oi(2,586)=0 exch2_oj(2,586)=0 exch2_neighbourId(3,586)=587 exch2_iLo(3,586)=35 exch2_iHi(3,586)=35 exch2_jLo(3,586)=0 exch2_jHi(3,586)=52 exch2_opposingSend(3,586)=4 exch2_pij(1,3,586)=1 exch2_pij(2,3,586)=0 exch2_pij(3,3,586)=0 exch2_pij(4,3,586)=1 exch2_oi(3,586)=0 exch2_oj(3,586)=0 exch2_neighbourId(4,586)=450 exch2_iLo(4,586)=0 exch2_iHi(4,586)=0 exch2_jLo(4,586)=0 exch2_jHi(4,586)=52 exch2_opposingSend(4,586)=3 exch2_pij(1,4,586)=1 exch2_pij(2,4,586)=0 exch2_pij(3,4,586)=0 exch2_pij(4,4,586)=1 exch2_oi(4,586)=-510 exch2_oj(4,586)=0 RETURN END SUBROUTINE W2_E2SETUP_587 C Topology for tile 587 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(587)=34 exch2_tNy(587)=51 exch2_tBasex(587)=34 exch2_tBasey(587)=459 exch2_txGlobalo(587)=1565 exch2_tyGlobalo(587)=460 exch2_isWedge(587)=0 exch2_isNedge(587)=1 exch2_isEedge(587)=0 exch2_isSedge(587)=0 exch2_myFace(587)=4 exch2_mydNx(587)=510 exch2_mydNy(587)=510 exch2_nNeighbours(587)=4 exch2_neighbourId(1,587)=602 exch2_iLo(1,587)=0 exch2_iHi(1,587)=35 exch2_jLo(1,587)=52 exch2_jHi(1,587)=52 exch2_opposingSend(1,587)=2 exch2_pij(1,1,587)=1 exch2_pij(2,1,587)=0 exch2_pij(3,1,587)=0 exch2_pij(4,1,587)=1 exch2_oi(1,587)=0 exch2_oj(1,587)=510 exch2_neighbourId(2,587)=572 exch2_iLo(2,587)=0 exch2_iHi(2,587)=35 exch2_jLo(2,587)=0 exch2_jHi(2,587)=0 exch2_opposingSend(2,587)=1 exch2_pij(1,2,587)=1 exch2_pij(2,2,587)=0 exch2_pij(3,2,587)=0 exch2_pij(4,2,587)=1 exch2_oi(2,587)=0 exch2_oj(2,587)=0 exch2_neighbourId(3,587)=588 exch2_iLo(3,587)=35 exch2_iHi(3,587)=35 exch2_jLo(3,587)=0 exch2_jHi(3,587)=52 exch2_opposingSend(3,587)=4 exch2_pij(1,3,587)=1 exch2_pij(2,3,587)=0 exch2_pij(3,3,587)=0 exch2_pij(4,3,587)=1 exch2_oi(3,587)=0 exch2_oj(3,587)=0 exch2_neighbourId(4,587)=586 exch2_iLo(4,587)=0 exch2_iHi(4,587)=0 exch2_jLo(4,587)=0 exch2_jHi(4,587)=52 exch2_opposingSend(4,587)=3 exch2_pij(1,4,587)=1 exch2_pij(2,4,587)=0 exch2_pij(3,4,587)=0 exch2_pij(4,4,587)=1 exch2_oi(4,587)=0 exch2_oj(4,587)=0 RETURN END SUBROUTINE W2_E2SETUP_588 C Topology for tile 588 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(588)=34 exch2_tNy(588)=51 exch2_tBasex(588)=68 exch2_tBasey(588)=459 exch2_txGlobalo(588)=1599 exch2_tyGlobalo(588)=460 exch2_isWedge(588)=0 exch2_isNedge(588)=1 exch2_isEedge(588)=0 exch2_isSedge(588)=0 exch2_myFace(588)=4 exch2_mydNx(588)=510 exch2_mydNy(588)=510 exch2_nNeighbours(588)=4 exch2_neighbourId(1,588)=603 exch2_iLo(1,588)=0 exch2_iHi(1,588)=35 exch2_jLo(1,588)=52 exch2_jHi(1,588)=52 exch2_opposingSend(1,588)=2 exch2_pij(1,1,588)=1 exch2_pij(2,1,588)=0 exch2_pij(3,1,588)=0 exch2_pij(4,1,588)=1 exch2_oi(1,588)=0 exch2_oj(1,588)=510 exch2_neighbourId(2,588)=573 exch2_iLo(2,588)=0 exch2_iHi(2,588)=35 exch2_jLo(2,588)=0 exch2_jHi(2,588)=0 exch2_opposingSend(2,588)=1 exch2_pij(1,2,588)=1 exch2_pij(2,2,588)=0 exch2_pij(3,2,588)=0 exch2_pij(4,2,588)=1 exch2_oi(2,588)=0 exch2_oj(2,588)=0 exch2_neighbourId(3,588)=589 exch2_iLo(3,588)=35 exch2_iHi(3,588)=35 exch2_jLo(3,588)=0 exch2_jHi(3,588)=52 exch2_opposingSend(3,588)=4 exch2_pij(1,3,588)=1 exch2_pij(2,3,588)=0 exch2_pij(3,3,588)=0 exch2_pij(4,3,588)=1 exch2_oi(3,588)=0 exch2_oj(3,588)=0 exch2_neighbourId(4,588)=587 exch2_iLo(4,588)=0 exch2_iHi(4,588)=0 exch2_jLo(4,588)=0 exch2_jHi(4,588)=52 exch2_opposingSend(4,588)=3 exch2_pij(1,4,588)=1 exch2_pij(2,4,588)=0 exch2_pij(3,4,588)=0 exch2_pij(4,4,588)=1 exch2_oi(4,588)=0 exch2_oj(4,588)=0 RETURN END SUBROUTINE W2_E2SETUP_589 C Topology for tile 589 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(589)=34 exch2_tNy(589)=51 exch2_tBasex(589)=102 exch2_tBasey(589)=459 exch2_txGlobalo(589)=1633 exch2_tyGlobalo(589)=460 exch2_isWedge(589)=0 exch2_isNedge(589)=1 exch2_isEedge(589)=0 exch2_isSedge(589)=0 exch2_myFace(589)=4 exch2_mydNx(589)=510 exch2_mydNy(589)=510 exch2_nNeighbours(589)=4 exch2_neighbourId(1,589)=604 exch2_iLo(1,589)=0 exch2_iHi(1,589)=35 exch2_jLo(1,589)=52 exch2_jHi(1,589)=52 exch2_opposingSend(1,589)=2 exch2_pij(1,1,589)=1 exch2_pij(2,1,589)=0 exch2_pij(3,1,589)=0 exch2_pij(4,1,589)=1 exch2_oi(1,589)=0 exch2_oj(1,589)=510 exch2_neighbourId(2,589)=574 exch2_iLo(2,589)=0 exch2_iHi(2,589)=35 exch2_jLo(2,589)=0 exch2_jHi(2,589)=0 exch2_opposingSend(2,589)=1 exch2_pij(1,2,589)=1 exch2_pij(2,2,589)=0 exch2_pij(3,2,589)=0 exch2_pij(4,2,589)=1 exch2_oi(2,589)=0 exch2_oj(2,589)=0 exch2_neighbourId(3,589)=590 exch2_iLo(3,589)=35 exch2_iHi(3,589)=35 exch2_jLo(3,589)=0 exch2_jHi(3,589)=52 exch2_opposingSend(3,589)=4 exch2_pij(1,3,589)=1 exch2_pij(2,3,589)=0 exch2_pij(3,3,589)=0 exch2_pij(4,3,589)=1 exch2_oi(3,589)=0 exch2_oj(3,589)=0 exch2_neighbourId(4,589)=588 exch2_iLo(4,589)=0 exch2_iHi(4,589)=0 exch2_jLo(4,589)=0 exch2_jHi(4,589)=52 exch2_opposingSend(4,589)=3 exch2_pij(1,4,589)=1 exch2_pij(2,4,589)=0 exch2_pij(3,4,589)=0 exch2_pij(4,4,589)=1 exch2_oi(4,589)=0 exch2_oj(4,589)=0 RETURN END SUBROUTINE W2_E2SETUP_590 C Topology for tile 590 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(590)=34 exch2_tNy(590)=51 exch2_tBasex(590)=136 exch2_tBasey(590)=459 exch2_txGlobalo(590)=1667 exch2_tyGlobalo(590)=460 exch2_isWedge(590)=0 exch2_isNedge(590)=1 exch2_isEedge(590)=0 exch2_isSedge(590)=0 exch2_myFace(590)=4 exch2_mydNx(590)=510 exch2_mydNy(590)=510 exch2_nNeighbours(590)=4 exch2_neighbourId(1,590)=605 exch2_iLo(1,590)=0 exch2_iHi(1,590)=35 exch2_jLo(1,590)=52 exch2_jHi(1,590)=52 exch2_opposingSend(1,590)=2 exch2_pij(1,1,590)=1 exch2_pij(2,1,590)=0 exch2_pij(3,1,590)=0 exch2_pij(4,1,590)=1 exch2_oi(1,590)=0 exch2_oj(1,590)=510 exch2_neighbourId(2,590)=575 exch2_iLo(2,590)=0 exch2_iHi(2,590)=35 exch2_jLo(2,590)=0 exch2_jHi(2,590)=0 exch2_opposingSend(2,590)=1 exch2_pij(1,2,590)=1 exch2_pij(2,2,590)=0 exch2_pij(3,2,590)=0 exch2_pij(4,2,590)=1 exch2_oi(2,590)=0 exch2_oj(2,590)=0 exch2_neighbourId(3,590)=591 exch2_iLo(3,590)=35 exch2_iHi(3,590)=35 exch2_jLo(3,590)=0 exch2_jHi(3,590)=52 exch2_opposingSend(3,590)=4 exch2_pij(1,3,590)=1 exch2_pij(2,3,590)=0 exch2_pij(3,3,590)=0 exch2_pij(4,3,590)=1 exch2_oi(3,590)=0 exch2_oj(3,590)=0 exch2_neighbourId(4,590)=589 exch2_iLo(4,590)=0 exch2_iHi(4,590)=0 exch2_jLo(4,590)=0 exch2_jHi(4,590)=52 exch2_opposingSend(4,590)=3 exch2_pij(1,4,590)=1 exch2_pij(2,4,590)=0 exch2_pij(3,4,590)=0 exch2_pij(4,4,590)=1 exch2_oi(4,590)=0 exch2_oj(4,590)=0 RETURN END SUBROUTINE W2_E2SETUP_591 C Topology for tile 591 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(591)=34 exch2_tNy(591)=51 exch2_tBasex(591)=170 exch2_tBasey(591)=459 exch2_txGlobalo(591)=1701 exch2_tyGlobalo(591)=460 exch2_isWedge(591)=0 exch2_isNedge(591)=1 exch2_isEedge(591)=0 exch2_isSedge(591)=0 exch2_myFace(591)=4 exch2_mydNx(591)=510 exch2_mydNy(591)=510 exch2_nNeighbours(591)=4 exch2_neighbourId(1,591)=606 exch2_iLo(1,591)=0 exch2_iHi(1,591)=35 exch2_jLo(1,591)=52 exch2_jHi(1,591)=52 exch2_opposingSend(1,591)=2 exch2_pij(1,1,591)=1 exch2_pij(2,1,591)=0 exch2_pij(3,1,591)=0 exch2_pij(4,1,591)=1 exch2_oi(1,591)=0 exch2_oj(1,591)=510 exch2_neighbourId(2,591)=576 exch2_iLo(2,591)=0 exch2_iHi(2,591)=35 exch2_jLo(2,591)=0 exch2_jHi(2,591)=0 exch2_opposingSend(2,591)=1 exch2_pij(1,2,591)=1 exch2_pij(2,2,591)=0 exch2_pij(3,2,591)=0 exch2_pij(4,2,591)=1 exch2_oi(2,591)=0 exch2_oj(2,591)=0 exch2_neighbourId(3,591)=592 exch2_iLo(3,591)=35 exch2_iHi(3,591)=35 exch2_jLo(3,591)=0 exch2_jHi(3,591)=52 exch2_opposingSend(3,591)=4 exch2_pij(1,3,591)=1 exch2_pij(2,3,591)=0 exch2_pij(3,3,591)=0 exch2_pij(4,3,591)=1 exch2_oi(3,591)=0 exch2_oj(3,591)=0 exch2_neighbourId(4,591)=590 exch2_iLo(4,591)=0 exch2_iHi(4,591)=0 exch2_jLo(4,591)=0 exch2_jHi(4,591)=52 exch2_opposingSend(4,591)=3 exch2_pij(1,4,591)=1 exch2_pij(2,4,591)=0 exch2_pij(3,4,591)=0 exch2_pij(4,4,591)=1 exch2_oi(4,591)=0 exch2_oj(4,591)=0 RETURN END SUBROUTINE W2_E2SETUP_592 C Topology for tile 592 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(592)=34 exch2_tNy(592)=51 exch2_tBasex(592)=204 exch2_tBasey(592)=459 exch2_txGlobalo(592)=1735 exch2_tyGlobalo(592)=460 exch2_isWedge(592)=0 exch2_isNedge(592)=1 exch2_isEedge(592)=0 exch2_isSedge(592)=0 exch2_myFace(592)=4 exch2_mydNx(592)=510 exch2_mydNy(592)=510 exch2_nNeighbours(592)=4 exch2_neighbourId(1,592)=607 exch2_iLo(1,592)=0 exch2_iHi(1,592)=35 exch2_jLo(1,592)=52 exch2_jHi(1,592)=52 exch2_opposingSend(1,592)=2 exch2_pij(1,1,592)=1 exch2_pij(2,1,592)=0 exch2_pij(3,1,592)=0 exch2_pij(4,1,592)=1 exch2_oi(1,592)=0 exch2_oj(1,592)=510 exch2_neighbourId(2,592)=577 exch2_iLo(2,592)=0 exch2_iHi(2,592)=35 exch2_jLo(2,592)=0 exch2_jHi(2,592)=0 exch2_opposingSend(2,592)=1 exch2_pij(1,2,592)=1 exch2_pij(2,2,592)=0 exch2_pij(3,2,592)=0 exch2_pij(4,2,592)=1 exch2_oi(2,592)=0 exch2_oj(2,592)=0 exch2_neighbourId(3,592)=593 exch2_iLo(3,592)=35 exch2_iHi(3,592)=35 exch2_jLo(3,592)=0 exch2_jHi(3,592)=52 exch2_opposingSend(3,592)=4 exch2_pij(1,3,592)=1 exch2_pij(2,3,592)=0 exch2_pij(3,3,592)=0 exch2_pij(4,3,592)=1 exch2_oi(3,592)=0 exch2_oj(3,592)=0 exch2_neighbourId(4,592)=591 exch2_iLo(4,592)=0 exch2_iHi(4,592)=0 exch2_jLo(4,592)=0 exch2_jHi(4,592)=52 exch2_opposingSend(4,592)=3 exch2_pij(1,4,592)=1 exch2_pij(2,4,592)=0 exch2_pij(3,4,592)=0 exch2_pij(4,4,592)=1 exch2_oi(4,592)=0 exch2_oj(4,592)=0 RETURN END SUBROUTINE W2_E2SETUP_593 C Topology for tile 593 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(593)=34 exch2_tNy(593)=51 exch2_tBasex(593)=238 exch2_tBasey(593)=459 exch2_txGlobalo(593)=1769 exch2_tyGlobalo(593)=460 exch2_isWedge(593)=0 exch2_isNedge(593)=1 exch2_isEedge(593)=0 exch2_isSedge(593)=0 exch2_myFace(593)=4 exch2_mydNx(593)=510 exch2_mydNy(593)=510 exch2_nNeighbours(593)=4 exch2_neighbourId(1,593)=608 exch2_iLo(1,593)=0 exch2_iHi(1,593)=35 exch2_jLo(1,593)=52 exch2_jHi(1,593)=52 exch2_opposingSend(1,593)=2 exch2_pij(1,1,593)=1 exch2_pij(2,1,593)=0 exch2_pij(3,1,593)=0 exch2_pij(4,1,593)=1 exch2_oi(1,593)=0 exch2_oj(1,593)=510 exch2_neighbourId(2,593)=578 exch2_iLo(2,593)=0 exch2_iHi(2,593)=35 exch2_jLo(2,593)=0 exch2_jHi(2,593)=0 exch2_opposingSend(2,593)=1 exch2_pij(1,2,593)=1 exch2_pij(2,2,593)=0 exch2_pij(3,2,593)=0 exch2_pij(4,2,593)=1 exch2_oi(2,593)=0 exch2_oj(2,593)=0 exch2_neighbourId(3,593)=594 exch2_iLo(3,593)=35 exch2_iHi(3,593)=35 exch2_jLo(3,593)=0 exch2_jHi(3,593)=52 exch2_opposingSend(3,593)=4 exch2_pij(1,3,593)=1 exch2_pij(2,3,593)=0 exch2_pij(3,3,593)=0 exch2_pij(4,3,593)=1 exch2_oi(3,593)=0 exch2_oj(3,593)=0 exch2_neighbourId(4,593)=592 exch2_iLo(4,593)=0 exch2_iHi(4,593)=0 exch2_jLo(4,593)=0 exch2_jHi(4,593)=52 exch2_opposingSend(4,593)=3 exch2_pij(1,4,593)=1 exch2_pij(2,4,593)=0 exch2_pij(3,4,593)=0 exch2_pij(4,4,593)=1 exch2_oi(4,593)=0 exch2_oj(4,593)=0 RETURN END SUBROUTINE W2_E2SETUP_594 C Topology for tile 594 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(594)=34 exch2_tNy(594)=51 exch2_tBasex(594)=272 exch2_tBasey(594)=459 exch2_txGlobalo(594)=1803 exch2_tyGlobalo(594)=460 exch2_isWedge(594)=0 exch2_isNedge(594)=1 exch2_isEedge(594)=0 exch2_isSedge(594)=0 exch2_myFace(594)=4 exch2_mydNx(594)=510 exch2_mydNy(594)=510 exch2_nNeighbours(594)=4 exch2_neighbourId(1,594)=609 exch2_iLo(1,594)=0 exch2_iHi(1,594)=35 exch2_jLo(1,594)=52 exch2_jHi(1,594)=52 exch2_opposingSend(1,594)=2 exch2_pij(1,1,594)=1 exch2_pij(2,1,594)=0 exch2_pij(3,1,594)=0 exch2_pij(4,1,594)=1 exch2_oi(1,594)=0 exch2_oj(1,594)=510 exch2_neighbourId(2,594)=579 exch2_iLo(2,594)=0 exch2_iHi(2,594)=35 exch2_jLo(2,594)=0 exch2_jHi(2,594)=0 exch2_opposingSend(2,594)=1 exch2_pij(1,2,594)=1 exch2_pij(2,2,594)=0 exch2_pij(3,2,594)=0 exch2_pij(4,2,594)=1 exch2_oi(2,594)=0 exch2_oj(2,594)=0 exch2_neighbourId(3,594)=595 exch2_iLo(3,594)=35 exch2_iHi(3,594)=35 exch2_jLo(3,594)=0 exch2_jHi(3,594)=52 exch2_opposingSend(3,594)=4 exch2_pij(1,3,594)=1 exch2_pij(2,3,594)=0 exch2_pij(3,3,594)=0 exch2_pij(4,3,594)=1 exch2_oi(3,594)=0 exch2_oj(3,594)=0 exch2_neighbourId(4,594)=593 exch2_iLo(4,594)=0 exch2_iHi(4,594)=0 exch2_jLo(4,594)=0 exch2_jHi(4,594)=52 exch2_opposingSend(4,594)=3 exch2_pij(1,4,594)=1 exch2_pij(2,4,594)=0 exch2_pij(3,4,594)=0 exch2_pij(4,4,594)=1 exch2_oi(4,594)=0 exch2_oj(4,594)=0 RETURN END SUBROUTINE W2_E2SETUP_595 C Topology for tile 595 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(595)=34 exch2_tNy(595)=51 exch2_tBasex(595)=306 exch2_tBasey(595)=459 exch2_txGlobalo(595)=1837 exch2_tyGlobalo(595)=460 exch2_isWedge(595)=0 exch2_isNedge(595)=1 exch2_isEedge(595)=0 exch2_isSedge(595)=0 exch2_myFace(595)=4 exch2_mydNx(595)=510 exch2_mydNy(595)=510 exch2_nNeighbours(595)=4 exch2_neighbourId(1,595)=610 exch2_iLo(1,595)=0 exch2_iHi(1,595)=35 exch2_jLo(1,595)=52 exch2_jHi(1,595)=52 exch2_opposingSend(1,595)=2 exch2_pij(1,1,595)=1 exch2_pij(2,1,595)=0 exch2_pij(3,1,595)=0 exch2_pij(4,1,595)=1 exch2_oi(1,595)=0 exch2_oj(1,595)=510 exch2_neighbourId(2,595)=580 exch2_iLo(2,595)=0 exch2_iHi(2,595)=35 exch2_jLo(2,595)=0 exch2_jHi(2,595)=0 exch2_opposingSend(2,595)=1 exch2_pij(1,2,595)=1 exch2_pij(2,2,595)=0 exch2_pij(3,2,595)=0 exch2_pij(4,2,595)=1 exch2_oi(2,595)=0 exch2_oj(2,595)=0 exch2_neighbourId(3,595)=596 exch2_iLo(3,595)=35 exch2_iHi(3,595)=35 exch2_jLo(3,595)=0 exch2_jHi(3,595)=52 exch2_opposingSend(3,595)=4 exch2_pij(1,3,595)=1 exch2_pij(2,3,595)=0 exch2_pij(3,3,595)=0 exch2_pij(4,3,595)=1 exch2_oi(3,595)=0 exch2_oj(3,595)=0 exch2_neighbourId(4,595)=594 exch2_iLo(4,595)=0 exch2_iHi(4,595)=0 exch2_jLo(4,595)=0 exch2_jHi(4,595)=52 exch2_opposingSend(4,595)=3 exch2_pij(1,4,595)=1 exch2_pij(2,4,595)=0 exch2_pij(3,4,595)=0 exch2_pij(4,4,595)=1 exch2_oi(4,595)=0 exch2_oj(4,595)=0 RETURN END SUBROUTINE W2_E2SETUP_596 C Topology for tile 596 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(596)=34 exch2_tNy(596)=51 exch2_tBasex(596)=340 exch2_tBasey(596)=459 exch2_txGlobalo(596)=1871 exch2_tyGlobalo(596)=460 exch2_isWedge(596)=0 exch2_isNedge(596)=1 exch2_isEedge(596)=0 exch2_isSedge(596)=0 exch2_myFace(596)=4 exch2_mydNx(596)=510 exch2_mydNy(596)=510 exch2_nNeighbours(596)=4 exch2_neighbourId(1,596)=611 exch2_iLo(1,596)=0 exch2_iHi(1,596)=35 exch2_jLo(1,596)=52 exch2_jHi(1,596)=52 exch2_opposingSend(1,596)=2 exch2_pij(1,1,596)=1 exch2_pij(2,1,596)=0 exch2_pij(3,1,596)=0 exch2_pij(4,1,596)=1 exch2_oi(1,596)=0 exch2_oj(1,596)=510 exch2_neighbourId(2,596)=581 exch2_iLo(2,596)=0 exch2_iHi(2,596)=35 exch2_jLo(2,596)=0 exch2_jHi(2,596)=0 exch2_opposingSend(2,596)=1 exch2_pij(1,2,596)=1 exch2_pij(2,2,596)=0 exch2_pij(3,2,596)=0 exch2_pij(4,2,596)=1 exch2_oi(2,596)=0 exch2_oj(2,596)=0 exch2_neighbourId(3,596)=597 exch2_iLo(3,596)=35 exch2_iHi(3,596)=35 exch2_jLo(3,596)=0 exch2_jHi(3,596)=52 exch2_opposingSend(3,596)=4 exch2_pij(1,3,596)=1 exch2_pij(2,3,596)=0 exch2_pij(3,3,596)=0 exch2_pij(4,3,596)=1 exch2_oi(3,596)=0 exch2_oj(3,596)=0 exch2_neighbourId(4,596)=595 exch2_iLo(4,596)=0 exch2_iHi(4,596)=0 exch2_jLo(4,596)=0 exch2_jHi(4,596)=52 exch2_opposingSend(4,596)=3 exch2_pij(1,4,596)=1 exch2_pij(2,4,596)=0 exch2_pij(3,4,596)=0 exch2_pij(4,4,596)=1 exch2_oi(4,596)=0 exch2_oj(4,596)=0 RETURN END SUBROUTINE W2_E2SETUP_597 C Topology for tile 597 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(597)=34 exch2_tNy(597)=51 exch2_tBasex(597)=374 exch2_tBasey(597)=459 exch2_txGlobalo(597)=1905 exch2_tyGlobalo(597)=460 exch2_isWedge(597)=0 exch2_isNedge(597)=1 exch2_isEedge(597)=0 exch2_isSedge(597)=0 exch2_myFace(597)=4 exch2_mydNx(597)=510 exch2_mydNy(597)=510 exch2_nNeighbours(597)=4 exch2_neighbourId(1,597)=612 exch2_iLo(1,597)=0 exch2_iHi(1,597)=35 exch2_jLo(1,597)=52 exch2_jHi(1,597)=52 exch2_opposingSend(1,597)=2 exch2_pij(1,1,597)=1 exch2_pij(2,1,597)=0 exch2_pij(3,1,597)=0 exch2_pij(4,1,597)=1 exch2_oi(1,597)=0 exch2_oj(1,597)=510 exch2_neighbourId(2,597)=582 exch2_iLo(2,597)=0 exch2_iHi(2,597)=35 exch2_jLo(2,597)=0 exch2_jHi(2,597)=0 exch2_opposingSend(2,597)=1 exch2_pij(1,2,597)=1 exch2_pij(2,2,597)=0 exch2_pij(3,2,597)=0 exch2_pij(4,2,597)=1 exch2_oi(2,597)=0 exch2_oj(2,597)=0 exch2_neighbourId(3,597)=598 exch2_iLo(3,597)=35 exch2_iHi(3,597)=35 exch2_jLo(3,597)=0 exch2_jHi(3,597)=52 exch2_opposingSend(3,597)=4 exch2_pij(1,3,597)=1 exch2_pij(2,3,597)=0 exch2_pij(3,3,597)=0 exch2_pij(4,3,597)=1 exch2_oi(3,597)=0 exch2_oj(3,597)=0 exch2_neighbourId(4,597)=596 exch2_iLo(4,597)=0 exch2_iHi(4,597)=0 exch2_jLo(4,597)=0 exch2_jHi(4,597)=52 exch2_opposingSend(4,597)=3 exch2_pij(1,4,597)=1 exch2_pij(2,4,597)=0 exch2_pij(3,4,597)=0 exch2_pij(4,4,597)=1 exch2_oi(4,597)=0 exch2_oj(4,597)=0 RETURN END SUBROUTINE W2_E2SETUP_598 C Topology for tile 598 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(598)=34 exch2_tNy(598)=51 exch2_tBasex(598)=408 exch2_tBasey(598)=459 exch2_txGlobalo(598)=1939 exch2_tyGlobalo(598)=460 exch2_isWedge(598)=0 exch2_isNedge(598)=1 exch2_isEedge(598)=0 exch2_isSedge(598)=0 exch2_myFace(598)=4 exch2_mydNx(598)=510 exch2_mydNy(598)=510 exch2_nNeighbours(598)=4 exch2_neighbourId(1,598)=613 exch2_iLo(1,598)=0 exch2_iHi(1,598)=35 exch2_jLo(1,598)=52 exch2_jHi(1,598)=52 exch2_opposingSend(1,598)=2 exch2_pij(1,1,598)=1 exch2_pij(2,1,598)=0 exch2_pij(3,1,598)=0 exch2_pij(4,1,598)=1 exch2_oi(1,598)=0 exch2_oj(1,598)=510 exch2_neighbourId(2,598)=583 exch2_iLo(2,598)=0 exch2_iHi(2,598)=35 exch2_jLo(2,598)=0 exch2_jHi(2,598)=0 exch2_opposingSend(2,598)=1 exch2_pij(1,2,598)=1 exch2_pij(2,2,598)=0 exch2_pij(3,2,598)=0 exch2_pij(4,2,598)=1 exch2_oi(2,598)=0 exch2_oj(2,598)=0 exch2_neighbourId(3,598)=599 exch2_iLo(3,598)=35 exch2_iHi(3,598)=35 exch2_jLo(3,598)=0 exch2_jHi(3,598)=52 exch2_opposingSend(3,598)=4 exch2_pij(1,3,598)=1 exch2_pij(2,3,598)=0 exch2_pij(3,3,598)=0 exch2_pij(4,3,598)=1 exch2_oi(3,598)=0 exch2_oj(3,598)=0 exch2_neighbourId(4,598)=597 exch2_iLo(4,598)=0 exch2_iHi(4,598)=0 exch2_jLo(4,598)=0 exch2_jHi(4,598)=52 exch2_opposingSend(4,598)=3 exch2_pij(1,4,598)=1 exch2_pij(2,4,598)=0 exch2_pij(3,4,598)=0 exch2_pij(4,4,598)=1 exch2_oi(4,598)=0 exch2_oj(4,598)=0 RETURN END SUBROUTINE W2_E2SETUP_599 C Topology for tile 599 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(599)=34 exch2_tNy(599)=51 exch2_tBasex(599)=442 exch2_tBasey(599)=459 exch2_txGlobalo(599)=1973 exch2_tyGlobalo(599)=460 exch2_isWedge(599)=0 exch2_isNedge(599)=1 exch2_isEedge(599)=0 exch2_isSedge(599)=0 exch2_myFace(599)=4 exch2_mydNx(599)=510 exch2_mydNy(599)=510 exch2_nNeighbours(599)=4 exch2_neighbourId(1,599)=614 exch2_iLo(1,599)=0 exch2_iHi(1,599)=35 exch2_jLo(1,599)=52 exch2_jHi(1,599)=52 exch2_opposingSend(1,599)=2 exch2_pij(1,1,599)=1 exch2_pij(2,1,599)=0 exch2_pij(3,1,599)=0 exch2_pij(4,1,599)=1 exch2_oi(1,599)=0 exch2_oj(1,599)=510 exch2_neighbourId(2,599)=584 exch2_iLo(2,599)=0 exch2_iHi(2,599)=35 exch2_jLo(2,599)=0 exch2_jHi(2,599)=0 exch2_opposingSend(2,599)=1 exch2_pij(1,2,599)=1 exch2_pij(2,2,599)=0 exch2_pij(3,2,599)=0 exch2_pij(4,2,599)=1 exch2_oi(2,599)=0 exch2_oj(2,599)=0 exch2_neighbourId(3,599)=600 exch2_iLo(3,599)=35 exch2_iHi(3,599)=35 exch2_jLo(3,599)=0 exch2_jHi(3,599)=52 exch2_opposingSend(3,599)=5 exch2_pij(1,3,599)=1 exch2_pij(2,3,599)=0 exch2_pij(3,3,599)=0 exch2_pij(4,3,599)=1 exch2_oi(3,599)=0 exch2_oj(3,599)=0 exch2_neighbourId(4,599)=598 exch2_iLo(4,599)=0 exch2_iHi(4,599)=0 exch2_jLo(4,599)=0 exch2_jHi(4,599)=52 exch2_opposingSend(4,599)=3 exch2_pij(1,4,599)=1 exch2_pij(2,4,599)=0 exch2_pij(3,4,599)=0 exch2_pij(4,4,599)=1 exch2_oi(4,599)=0 exch2_oj(4,599)=0 RETURN END SUBROUTINE W2_E2SETUP_600 C Topology for tile 600 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(600)=34 exch2_tNy(600)=51 exch2_tBasex(600)=476 exch2_tBasey(600)=459 exch2_txGlobalo(600)=2007 exch2_tyGlobalo(600)=460 exch2_isWedge(600)=0 exch2_isNedge(600)=1 exch2_isEedge(600)=1 exch2_isSedge(600)=0 exch2_myFace(600)=4 exch2_mydNx(600)=510 exch2_mydNy(600)=510 exch2_nNeighbours(600)=5 exch2_neighbourId(1,600)=615 exch2_iLo(1,600)=0 exch2_iHi(1,600)=35 exch2_jLo(1,600)=52 exch2_jHi(1,600)=52 exch2_opposingSend(1,600)=2 exch2_pij(1,1,600)=1 exch2_pij(2,1,600)=0 exch2_pij(3,1,600)=0 exch2_pij(4,1,600)=1 exch2_oi(1,600)=0 exch2_oj(1,600)=510 exch2_neighbourId(2,600)=585 exch2_iLo(2,600)=0 exch2_iHi(2,600)=35 exch2_jLo(2,600)=0 exch2_jHi(2,600)=0 exch2_opposingSend(2,600)=1 exch2_pij(1,2,600)=1 exch2_pij(2,2,600)=0 exch2_pij(3,2,600)=0 exch2_pij(4,2,600)=1 exch2_oi(2,600)=0 exch2_oj(2,600)=0 exch2_neighbourId(3,600)=751 exch2_iLo(3,600)=35 exch2_iHi(3,600)=35 exch2_jLo(3,600)=17 exch2_jHi(3,600)=52 exch2_opposingSend(3,600)=2 exch2_pij(1,3,600)=0 exch2_pij(2,3,600)=1 exch2_pij(3,3,600)=-1 exch2_pij(4,3,600)=0 exch2_oi(3,600)=510 exch2_oj(3,600)=511 exch2_neighbourId(4,600)=752 exch2_iLo(4,600)=35 exch2_iHi(4,600)=35 exch2_jLo(4,600)=0 exch2_jHi(4,600)=18 exch2_opposingSend(4,600)=3 exch2_pij(1,4,600)=0 exch2_pij(2,4,600)=1 exch2_pij(3,4,600)=-1 exch2_pij(4,4,600)=0 exch2_oi(4,600)=510 exch2_oj(4,600)=511 exch2_neighbourId(5,600)=599 exch2_iLo(5,600)=0 exch2_iHi(5,600)=0 exch2_jLo(5,600)=0 exch2_jHi(5,600)=52 exch2_opposingSend(5,600)=3 exch2_pij(1,5,600)=1 exch2_pij(2,5,600)=0 exch2_pij(3,5,600)=0 exch2_pij(4,5,600)=1 exch2_oi(5,600)=0 exch2_oj(5,600)=0 RETURN END SUBROUTINE W2_E2SETUP_601 C Topology for tile 601 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(601)=34 exch2_tNy(601)=51 exch2_tBasex(601)=0 exch2_tBasey(601)=0 exch2_txGlobalo(601)=2041 exch2_tyGlobalo(601)=1 exch2_isWedge(601)=1 exch2_isNedge(601)=0 exch2_isEedge(601)=0 exch2_isSedge(601)=1 exch2_myFace(601)=5 exch2_mydNx(601)=510 exch2_mydNy(601)=510 exch2_nNeighbours(601)=5 exch2_neighbourId(1,601)=616 exch2_iLo(1,601)=0 exch2_iHi(1,601)=35 exch2_jLo(1,601)=52 exch2_jHi(1,601)=52 exch2_opposingSend(1,601)=2 exch2_pij(1,1,601)=1 exch2_pij(2,1,601)=0 exch2_pij(3,1,601)=0 exch2_pij(4,1,601)=1 exch2_oi(1,601)=0 exch2_oj(1,601)=0 exch2_neighbourId(2,601)=586 exch2_iLo(2,601)=0 exch2_iHi(2,601)=35 exch2_jLo(2,601)=0 exch2_jHi(2,601)=0 exch2_opposingSend(2,601)=1 exch2_pij(1,2,601)=1 exch2_pij(2,2,601)=0 exch2_pij(3,2,601)=0 exch2_pij(4,2,601)=1 exch2_oi(2,601)=0 exch2_oj(2,601)=-510 exch2_neighbourId(3,601)=602 exch2_iLo(3,601)=35 exch2_iHi(3,601)=35 exch2_jLo(3,601)=0 exch2_jHi(3,601)=52 exch2_opposingSend(3,601)=4 exch2_pij(1,3,601)=1 exch2_pij(2,3,601)=0 exch2_pij(3,3,601)=0 exch2_pij(4,3,601)=1 exch2_oi(3,601)=0 exch2_oj(3,601)=0 exch2_neighbourId(4,601)=449 exch2_iLo(4,601)=0 exch2_iHi(4,601)=0 exch2_jLo(4,601)=34 exch2_jHi(4,601)=52 exch2_opposingSend(4,601)=1 exch2_pij(1,4,601)=0 exch2_pij(2,4,601)=1 exch2_pij(3,4,601)=-1 exch2_pij(4,4,601)=0 exch2_oi(4,601)=-510 exch2_oj(4,601)=511 exch2_neighbourId(5,601)=450 exch2_iLo(5,601)=0 exch2_iHi(5,601)=0 exch2_jLo(5,601)=0 exch2_jHi(5,601)=35 exch2_opposingSend(5,601)=1 exch2_pij(1,5,601)=0 exch2_pij(2,5,601)=1 exch2_pij(3,5,601)=-1 exch2_pij(4,5,601)=0 exch2_oi(5,601)=-510 exch2_oj(5,601)=511 RETURN END SUBROUTINE W2_E2SETUP_602 C Topology for tile 602 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(602)=34 exch2_tNy(602)=51 exch2_tBasex(602)=34 exch2_tBasey(602)=0 exch2_txGlobalo(602)=2075 exch2_tyGlobalo(602)=1 exch2_isWedge(602)=0 exch2_isNedge(602)=0 exch2_isEedge(602)=0 exch2_isSedge(602)=1 exch2_myFace(602)=5 exch2_mydNx(602)=510 exch2_mydNy(602)=510 exch2_nNeighbours(602)=4 exch2_neighbourId(1,602)=617 exch2_iLo(1,602)=0 exch2_iHi(1,602)=35 exch2_jLo(1,602)=52 exch2_jHi(1,602)=52 exch2_opposingSend(1,602)=2 exch2_pij(1,1,602)=1 exch2_pij(2,1,602)=0 exch2_pij(3,1,602)=0 exch2_pij(4,1,602)=1 exch2_oi(1,602)=0 exch2_oj(1,602)=0 exch2_neighbourId(2,602)=587 exch2_iLo(2,602)=0 exch2_iHi(2,602)=35 exch2_jLo(2,602)=0 exch2_jHi(2,602)=0 exch2_opposingSend(2,602)=1 exch2_pij(1,2,602)=1 exch2_pij(2,2,602)=0 exch2_pij(3,2,602)=0 exch2_pij(4,2,602)=1 exch2_oi(2,602)=0 exch2_oj(2,602)=-510 exch2_neighbourId(3,602)=603 exch2_iLo(3,602)=35 exch2_iHi(3,602)=35 exch2_jLo(3,602)=0 exch2_jHi(3,602)=52 exch2_opposingSend(3,602)=4 exch2_pij(1,3,602)=1 exch2_pij(2,3,602)=0 exch2_pij(3,3,602)=0 exch2_pij(4,3,602)=1 exch2_oi(3,602)=0 exch2_oj(3,602)=0 exch2_neighbourId(4,602)=601 exch2_iLo(4,602)=0 exch2_iHi(4,602)=0 exch2_jLo(4,602)=0 exch2_jHi(4,602)=52 exch2_opposingSend(4,602)=3 exch2_pij(1,4,602)=1 exch2_pij(2,4,602)=0 exch2_pij(3,4,602)=0 exch2_pij(4,4,602)=1 exch2_oi(4,602)=0 exch2_oj(4,602)=0 RETURN END SUBROUTINE W2_E2SETUP_603 C Topology for tile 603 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(603)=34 exch2_tNy(603)=51 exch2_tBasex(603)=68 exch2_tBasey(603)=0 exch2_txGlobalo(603)=2109 exch2_tyGlobalo(603)=1 exch2_isWedge(603)=0 exch2_isNedge(603)=0 exch2_isEedge(603)=0 exch2_isSedge(603)=1 exch2_myFace(603)=5 exch2_mydNx(603)=510 exch2_mydNy(603)=510 exch2_nNeighbours(603)=4 exch2_neighbourId(1,603)=618 exch2_iLo(1,603)=0 exch2_iHi(1,603)=35 exch2_jLo(1,603)=52 exch2_jHi(1,603)=52 exch2_opposingSend(1,603)=2 exch2_pij(1,1,603)=1 exch2_pij(2,1,603)=0 exch2_pij(3,1,603)=0 exch2_pij(4,1,603)=1 exch2_oi(1,603)=0 exch2_oj(1,603)=0 exch2_neighbourId(2,603)=588 exch2_iLo(2,603)=0 exch2_iHi(2,603)=35 exch2_jLo(2,603)=0 exch2_jHi(2,603)=0 exch2_opposingSend(2,603)=1 exch2_pij(1,2,603)=1 exch2_pij(2,2,603)=0 exch2_pij(3,2,603)=0 exch2_pij(4,2,603)=1 exch2_oi(2,603)=0 exch2_oj(2,603)=-510 exch2_neighbourId(3,603)=604 exch2_iLo(3,603)=35 exch2_iHi(3,603)=35 exch2_jLo(3,603)=0 exch2_jHi(3,603)=52 exch2_opposingSend(3,603)=4 exch2_pij(1,3,603)=1 exch2_pij(2,3,603)=0 exch2_pij(3,3,603)=0 exch2_pij(4,3,603)=1 exch2_oi(3,603)=0 exch2_oj(3,603)=0 exch2_neighbourId(4,603)=602 exch2_iLo(4,603)=0 exch2_iHi(4,603)=0 exch2_jLo(4,603)=0 exch2_jHi(4,603)=52 exch2_opposingSend(4,603)=3 exch2_pij(1,4,603)=1 exch2_pij(2,4,603)=0 exch2_pij(3,4,603)=0 exch2_pij(4,4,603)=1 exch2_oi(4,603)=0 exch2_oj(4,603)=0 RETURN END SUBROUTINE W2_E2SETUP_604 C Topology for tile 604 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(604)=34 exch2_tNy(604)=51 exch2_tBasex(604)=102 exch2_tBasey(604)=0 exch2_txGlobalo(604)=2143 exch2_tyGlobalo(604)=1 exch2_isWedge(604)=0 exch2_isNedge(604)=0 exch2_isEedge(604)=0 exch2_isSedge(604)=1 exch2_myFace(604)=5 exch2_mydNx(604)=510 exch2_mydNy(604)=510 exch2_nNeighbours(604)=4 exch2_neighbourId(1,604)=619 exch2_iLo(1,604)=0 exch2_iHi(1,604)=35 exch2_jLo(1,604)=52 exch2_jHi(1,604)=52 exch2_opposingSend(1,604)=2 exch2_pij(1,1,604)=1 exch2_pij(2,1,604)=0 exch2_pij(3,1,604)=0 exch2_pij(4,1,604)=1 exch2_oi(1,604)=0 exch2_oj(1,604)=0 exch2_neighbourId(2,604)=589 exch2_iLo(2,604)=0 exch2_iHi(2,604)=35 exch2_jLo(2,604)=0 exch2_jHi(2,604)=0 exch2_opposingSend(2,604)=1 exch2_pij(1,2,604)=1 exch2_pij(2,2,604)=0 exch2_pij(3,2,604)=0 exch2_pij(4,2,604)=1 exch2_oi(2,604)=0 exch2_oj(2,604)=-510 exch2_neighbourId(3,604)=605 exch2_iLo(3,604)=35 exch2_iHi(3,604)=35 exch2_jLo(3,604)=0 exch2_jHi(3,604)=52 exch2_opposingSend(3,604)=4 exch2_pij(1,3,604)=1 exch2_pij(2,3,604)=0 exch2_pij(3,3,604)=0 exch2_pij(4,3,604)=1 exch2_oi(3,604)=0 exch2_oj(3,604)=0 exch2_neighbourId(4,604)=603 exch2_iLo(4,604)=0 exch2_iHi(4,604)=0 exch2_jLo(4,604)=0 exch2_jHi(4,604)=52 exch2_opposingSend(4,604)=3 exch2_pij(1,4,604)=1 exch2_pij(2,4,604)=0 exch2_pij(3,4,604)=0 exch2_pij(4,4,604)=1 exch2_oi(4,604)=0 exch2_oj(4,604)=0 RETURN END SUBROUTINE W2_E2SETUP_605 C Topology for tile 605 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(605)=34 exch2_tNy(605)=51 exch2_tBasex(605)=136 exch2_tBasey(605)=0 exch2_txGlobalo(605)=2177 exch2_tyGlobalo(605)=1 exch2_isWedge(605)=0 exch2_isNedge(605)=0 exch2_isEedge(605)=0 exch2_isSedge(605)=1 exch2_myFace(605)=5 exch2_mydNx(605)=510 exch2_mydNy(605)=510 exch2_nNeighbours(605)=4 exch2_neighbourId(1,605)=620 exch2_iLo(1,605)=0 exch2_iHi(1,605)=35 exch2_jLo(1,605)=52 exch2_jHi(1,605)=52 exch2_opposingSend(1,605)=2 exch2_pij(1,1,605)=1 exch2_pij(2,1,605)=0 exch2_pij(3,1,605)=0 exch2_pij(4,1,605)=1 exch2_oi(1,605)=0 exch2_oj(1,605)=0 exch2_neighbourId(2,605)=590 exch2_iLo(2,605)=0 exch2_iHi(2,605)=35 exch2_jLo(2,605)=0 exch2_jHi(2,605)=0 exch2_opposingSend(2,605)=1 exch2_pij(1,2,605)=1 exch2_pij(2,2,605)=0 exch2_pij(3,2,605)=0 exch2_pij(4,2,605)=1 exch2_oi(2,605)=0 exch2_oj(2,605)=-510 exch2_neighbourId(3,605)=606 exch2_iLo(3,605)=35 exch2_iHi(3,605)=35 exch2_jLo(3,605)=0 exch2_jHi(3,605)=52 exch2_opposingSend(3,605)=4 exch2_pij(1,3,605)=1 exch2_pij(2,3,605)=0 exch2_pij(3,3,605)=0 exch2_pij(4,3,605)=1 exch2_oi(3,605)=0 exch2_oj(3,605)=0 exch2_neighbourId(4,605)=604 exch2_iLo(4,605)=0 exch2_iHi(4,605)=0 exch2_jLo(4,605)=0 exch2_jHi(4,605)=52 exch2_opposingSend(4,605)=3 exch2_pij(1,4,605)=1 exch2_pij(2,4,605)=0 exch2_pij(3,4,605)=0 exch2_pij(4,4,605)=1 exch2_oi(4,605)=0 exch2_oj(4,605)=0 RETURN END SUBROUTINE W2_E2SETUP_606 C Topology for tile 606 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(606)=34 exch2_tNy(606)=51 exch2_tBasex(606)=170 exch2_tBasey(606)=0 exch2_txGlobalo(606)=2211 exch2_tyGlobalo(606)=1 exch2_isWedge(606)=0 exch2_isNedge(606)=0 exch2_isEedge(606)=0 exch2_isSedge(606)=1 exch2_myFace(606)=5 exch2_mydNx(606)=510 exch2_mydNy(606)=510 exch2_nNeighbours(606)=4 exch2_neighbourId(1,606)=621 exch2_iLo(1,606)=0 exch2_iHi(1,606)=35 exch2_jLo(1,606)=52 exch2_jHi(1,606)=52 exch2_opposingSend(1,606)=2 exch2_pij(1,1,606)=1 exch2_pij(2,1,606)=0 exch2_pij(3,1,606)=0 exch2_pij(4,1,606)=1 exch2_oi(1,606)=0 exch2_oj(1,606)=0 exch2_neighbourId(2,606)=591 exch2_iLo(2,606)=0 exch2_iHi(2,606)=35 exch2_jLo(2,606)=0 exch2_jHi(2,606)=0 exch2_opposingSend(2,606)=1 exch2_pij(1,2,606)=1 exch2_pij(2,2,606)=0 exch2_pij(3,2,606)=0 exch2_pij(4,2,606)=1 exch2_oi(2,606)=0 exch2_oj(2,606)=-510 exch2_neighbourId(3,606)=607 exch2_iLo(3,606)=35 exch2_iHi(3,606)=35 exch2_jLo(3,606)=0 exch2_jHi(3,606)=52 exch2_opposingSend(3,606)=4 exch2_pij(1,3,606)=1 exch2_pij(2,3,606)=0 exch2_pij(3,3,606)=0 exch2_pij(4,3,606)=1 exch2_oi(3,606)=0 exch2_oj(3,606)=0 exch2_neighbourId(4,606)=605 exch2_iLo(4,606)=0 exch2_iHi(4,606)=0 exch2_jLo(4,606)=0 exch2_jHi(4,606)=52 exch2_opposingSend(4,606)=3 exch2_pij(1,4,606)=1 exch2_pij(2,4,606)=0 exch2_pij(3,4,606)=0 exch2_pij(4,4,606)=1 exch2_oi(4,606)=0 exch2_oj(4,606)=0 RETURN END SUBROUTINE W2_E2SETUP_607 C Topology for tile 607 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(607)=34 exch2_tNy(607)=51 exch2_tBasex(607)=204 exch2_tBasey(607)=0 exch2_txGlobalo(607)=2245 exch2_tyGlobalo(607)=1 exch2_isWedge(607)=0 exch2_isNedge(607)=0 exch2_isEedge(607)=0 exch2_isSedge(607)=1 exch2_myFace(607)=5 exch2_mydNx(607)=510 exch2_mydNy(607)=510 exch2_nNeighbours(607)=4 exch2_neighbourId(1,607)=622 exch2_iLo(1,607)=0 exch2_iHi(1,607)=35 exch2_jLo(1,607)=52 exch2_jHi(1,607)=52 exch2_opposingSend(1,607)=2 exch2_pij(1,1,607)=1 exch2_pij(2,1,607)=0 exch2_pij(3,1,607)=0 exch2_pij(4,1,607)=1 exch2_oi(1,607)=0 exch2_oj(1,607)=0 exch2_neighbourId(2,607)=592 exch2_iLo(2,607)=0 exch2_iHi(2,607)=35 exch2_jLo(2,607)=0 exch2_jHi(2,607)=0 exch2_opposingSend(2,607)=1 exch2_pij(1,2,607)=1 exch2_pij(2,2,607)=0 exch2_pij(3,2,607)=0 exch2_pij(4,2,607)=1 exch2_oi(2,607)=0 exch2_oj(2,607)=-510 exch2_neighbourId(3,607)=608 exch2_iLo(3,607)=35 exch2_iHi(3,607)=35 exch2_jLo(3,607)=0 exch2_jHi(3,607)=52 exch2_opposingSend(3,607)=4 exch2_pij(1,3,607)=1 exch2_pij(2,3,607)=0 exch2_pij(3,3,607)=0 exch2_pij(4,3,607)=1 exch2_oi(3,607)=0 exch2_oj(3,607)=0 exch2_neighbourId(4,607)=606 exch2_iLo(4,607)=0 exch2_iHi(4,607)=0 exch2_jLo(4,607)=0 exch2_jHi(4,607)=52 exch2_opposingSend(4,607)=3 exch2_pij(1,4,607)=1 exch2_pij(2,4,607)=0 exch2_pij(3,4,607)=0 exch2_pij(4,4,607)=1 exch2_oi(4,607)=0 exch2_oj(4,607)=0 RETURN END SUBROUTINE W2_E2SETUP_608 C Topology for tile 608 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(608)=34 exch2_tNy(608)=51 exch2_tBasex(608)=238 exch2_tBasey(608)=0 exch2_txGlobalo(608)=2279 exch2_tyGlobalo(608)=1 exch2_isWedge(608)=0 exch2_isNedge(608)=0 exch2_isEedge(608)=0 exch2_isSedge(608)=1 exch2_myFace(608)=5 exch2_mydNx(608)=510 exch2_mydNy(608)=510 exch2_nNeighbours(608)=4 exch2_neighbourId(1,608)=623 exch2_iLo(1,608)=0 exch2_iHi(1,608)=35 exch2_jLo(1,608)=52 exch2_jHi(1,608)=52 exch2_opposingSend(1,608)=2 exch2_pij(1,1,608)=1 exch2_pij(2,1,608)=0 exch2_pij(3,1,608)=0 exch2_pij(4,1,608)=1 exch2_oi(1,608)=0 exch2_oj(1,608)=0 exch2_neighbourId(2,608)=593 exch2_iLo(2,608)=0 exch2_iHi(2,608)=35 exch2_jLo(2,608)=0 exch2_jHi(2,608)=0 exch2_opposingSend(2,608)=1 exch2_pij(1,2,608)=1 exch2_pij(2,2,608)=0 exch2_pij(3,2,608)=0 exch2_pij(4,2,608)=1 exch2_oi(2,608)=0 exch2_oj(2,608)=-510 exch2_neighbourId(3,608)=609 exch2_iLo(3,608)=35 exch2_iHi(3,608)=35 exch2_jLo(3,608)=0 exch2_jHi(3,608)=52 exch2_opposingSend(3,608)=4 exch2_pij(1,3,608)=1 exch2_pij(2,3,608)=0 exch2_pij(3,3,608)=0 exch2_pij(4,3,608)=1 exch2_oi(3,608)=0 exch2_oj(3,608)=0 exch2_neighbourId(4,608)=607 exch2_iLo(4,608)=0 exch2_iHi(4,608)=0 exch2_jLo(4,608)=0 exch2_jHi(4,608)=52 exch2_opposingSend(4,608)=3 exch2_pij(1,4,608)=1 exch2_pij(2,4,608)=0 exch2_pij(3,4,608)=0 exch2_pij(4,4,608)=1 exch2_oi(4,608)=0 exch2_oj(4,608)=0 RETURN END SUBROUTINE W2_E2SETUP_609 C Topology for tile 609 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(609)=34 exch2_tNy(609)=51 exch2_tBasex(609)=272 exch2_tBasey(609)=0 exch2_txGlobalo(609)=2313 exch2_tyGlobalo(609)=1 exch2_isWedge(609)=0 exch2_isNedge(609)=0 exch2_isEedge(609)=0 exch2_isSedge(609)=1 exch2_myFace(609)=5 exch2_mydNx(609)=510 exch2_mydNy(609)=510 exch2_nNeighbours(609)=4 exch2_neighbourId(1,609)=624 exch2_iLo(1,609)=0 exch2_iHi(1,609)=35 exch2_jLo(1,609)=52 exch2_jHi(1,609)=52 exch2_opposingSend(1,609)=2 exch2_pij(1,1,609)=1 exch2_pij(2,1,609)=0 exch2_pij(3,1,609)=0 exch2_pij(4,1,609)=1 exch2_oi(1,609)=0 exch2_oj(1,609)=0 exch2_neighbourId(2,609)=594 exch2_iLo(2,609)=0 exch2_iHi(2,609)=35 exch2_jLo(2,609)=0 exch2_jHi(2,609)=0 exch2_opposingSend(2,609)=1 exch2_pij(1,2,609)=1 exch2_pij(2,2,609)=0 exch2_pij(3,2,609)=0 exch2_pij(4,2,609)=1 exch2_oi(2,609)=0 exch2_oj(2,609)=-510 exch2_neighbourId(3,609)=610 exch2_iLo(3,609)=35 exch2_iHi(3,609)=35 exch2_jLo(3,609)=0 exch2_jHi(3,609)=52 exch2_opposingSend(3,609)=4 exch2_pij(1,3,609)=1 exch2_pij(2,3,609)=0 exch2_pij(3,3,609)=0 exch2_pij(4,3,609)=1 exch2_oi(3,609)=0 exch2_oj(3,609)=0 exch2_neighbourId(4,609)=608 exch2_iLo(4,609)=0 exch2_iHi(4,609)=0 exch2_jLo(4,609)=0 exch2_jHi(4,609)=52 exch2_opposingSend(4,609)=3 exch2_pij(1,4,609)=1 exch2_pij(2,4,609)=0 exch2_pij(3,4,609)=0 exch2_pij(4,4,609)=1 exch2_oi(4,609)=0 exch2_oj(4,609)=0 RETURN END SUBROUTINE W2_E2SETUP_610 C Topology for tile 610 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(610)=34 exch2_tNy(610)=51 exch2_tBasex(610)=306 exch2_tBasey(610)=0 exch2_txGlobalo(610)=2347 exch2_tyGlobalo(610)=1 exch2_isWedge(610)=0 exch2_isNedge(610)=0 exch2_isEedge(610)=0 exch2_isSedge(610)=1 exch2_myFace(610)=5 exch2_mydNx(610)=510 exch2_mydNy(610)=510 exch2_nNeighbours(610)=4 exch2_neighbourId(1,610)=625 exch2_iLo(1,610)=0 exch2_iHi(1,610)=35 exch2_jLo(1,610)=52 exch2_jHi(1,610)=52 exch2_opposingSend(1,610)=2 exch2_pij(1,1,610)=1 exch2_pij(2,1,610)=0 exch2_pij(3,1,610)=0 exch2_pij(4,1,610)=1 exch2_oi(1,610)=0 exch2_oj(1,610)=0 exch2_neighbourId(2,610)=595 exch2_iLo(2,610)=0 exch2_iHi(2,610)=35 exch2_jLo(2,610)=0 exch2_jHi(2,610)=0 exch2_opposingSend(2,610)=1 exch2_pij(1,2,610)=1 exch2_pij(2,2,610)=0 exch2_pij(3,2,610)=0 exch2_pij(4,2,610)=1 exch2_oi(2,610)=0 exch2_oj(2,610)=-510 exch2_neighbourId(3,610)=611 exch2_iLo(3,610)=35 exch2_iHi(3,610)=35 exch2_jLo(3,610)=0 exch2_jHi(3,610)=52 exch2_opposingSend(3,610)=4 exch2_pij(1,3,610)=1 exch2_pij(2,3,610)=0 exch2_pij(3,3,610)=0 exch2_pij(4,3,610)=1 exch2_oi(3,610)=0 exch2_oj(3,610)=0 exch2_neighbourId(4,610)=609 exch2_iLo(4,610)=0 exch2_iHi(4,610)=0 exch2_jLo(4,610)=0 exch2_jHi(4,610)=52 exch2_opposingSend(4,610)=3 exch2_pij(1,4,610)=1 exch2_pij(2,4,610)=0 exch2_pij(3,4,610)=0 exch2_pij(4,4,610)=1 exch2_oi(4,610)=0 exch2_oj(4,610)=0 RETURN END SUBROUTINE W2_E2SETUP_611 C Topology for tile 611 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(611)=34 exch2_tNy(611)=51 exch2_tBasex(611)=340 exch2_tBasey(611)=0 exch2_txGlobalo(611)=2381 exch2_tyGlobalo(611)=1 exch2_isWedge(611)=0 exch2_isNedge(611)=0 exch2_isEedge(611)=0 exch2_isSedge(611)=1 exch2_myFace(611)=5 exch2_mydNx(611)=510 exch2_mydNy(611)=510 exch2_nNeighbours(611)=4 exch2_neighbourId(1,611)=626 exch2_iLo(1,611)=0 exch2_iHi(1,611)=35 exch2_jLo(1,611)=52 exch2_jHi(1,611)=52 exch2_opposingSend(1,611)=2 exch2_pij(1,1,611)=1 exch2_pij(2,1,611)=0 exch2_pij(3,1,611)=0 exch2_pij(4,1,611)=1 exch2_oi(1,611)=0 exch2_oj(1,611)=0 exch2_neighbourId(2,611)=596 exch2_iLo(2,611)=0 exch2_iHi(2,611)=35 exch2_jLo(2,611)=0 exch2_jHi(2,611)=0 exch2_opposingSend(2,611)=1 exch2_pij(1,2,611)=1 exch2_pij(2,2,611)=0 exch2_pij(3,2,611)=0 exch2_pij(4,2,611)=1 exch2_oi(2,611)=0 exch2_oj(2,611)=-510 exch2_neighbourId(3,611)=612 exch2_iLo(3,611)=35 exch2_iHi(3,611)=35 exch2_jLo(3,611)=0 exch2_jHi(3,611)=52 exch2_opposingSend(3,611)=4 exch2_pij(1,3,611)=1 exch2_pij(2,3,611)=0 exch2_pij(3,3,611)=0 exch2_pij(4,3,611)=1 exch2_oi(3,611)=0 exch2_oj(3,611)=0 exch2_neighbourId(4,611)=610 exch2_iLo(4,611)=0 exch2_iHi(4,611)=0 exch2_jLo(4,611)=0 exch2_jHi(4,611)=52 exch2_opposingSend(4,611)=3 exch2_pij(1,4,611)=1 exch2_pij(2,4,611)=0 exch2_pij(3,4,611)=0 exch2_pij(4,4,611)=1 exch2_oi(4,611)=0 exch2_oj(4,611)=0 RETURN END SUBROUTINE W2_E2SETUP_612 C Topology for tile 612 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(612)=34 exch2_tNy(612)=51 exch2_tBasex(612)=374 exch2_tBasey(612)=0 exch2_txGlobalo(612)=2415 exch2_tyGlobalo(612)=1 exch2_isWedge(612)=0 exch2_isNedge(612)=0 exch2_isEedge(612)=0 exch2_isSedge(612)=1 exch2_myFace(612)=5 exch2_mydNx(612)=510 exch2_mydNy(612)=510 exch2_nNeighbours(612)=4 exch2_neighbourId(1,612)=627 exch2_iLo(1,612)=0 exch2_iHi(1,612)=35 exch2_jLo(1,612)=52 exch2_jHi(1,612)=52 exch2_opposingSend(1,612)=2 exch2_pij(1,1,612)=1 exch2_pij(2,1,612)=0 exch2_pij(3,1,612)=0 exch2_pij(4,1,612)=1 exch2_oi(1,612)=0 exch2_oj(1,612)=0 exch2_neighbourId(2,612)=597 exch2_iLo(2,612)=0 exch2_iHi(2,612)=35 exch2_jLo(2,612)=0 exch2_jHi(2,612)=0 exch2_opposingSend(2,612)=1 exch2_pij(1,2,612)=1 exch2_pij(2,2,612)=0 exch2_pij(3,2,612)=0 exch2_pij(4,2,612)=1 exch2_oi(2,612)=0 exch2_oj(2,612)=-510 exch2_neighbourId(3,612)=613 exch2_iLo(3,612)=35 exch2_iHi(3,612)=35 exch2_jLo(3,612)=0 exch2_jHi(3,612)=52 exch2_opposingSend(3,612)=4 exch2_pij(1,3,612)=1 exch2_pij(2,3,612)=0 exch2_pij(3,3,612)=0 exch2_pij(4,3,612)=1 exch2_oi(3,612)=0 exch2_oj(3,612)=0 exch2_neighbourId(4,612)=611 exch2_iLo(4,612)=0 exch2_iHi(4,612)=0 exch2_jLo(4,612)=0 exch2_jHi(4,612)=52 exch2_opposingSend(4,612)=3 exch2_pij(1,4,612)=1 exch2_pij(2,4,612)=0 exch2_pij(3,4,612)=0 exch2_pij(4,4,612)=1 exch2_oi(4,612)=0 exch2_oj(4,612)=0 RETURN END SUBROUTINE W2_E2SETUP_613 C Topology for tile 613 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(613)=34 exch2_tNy(613)=51 exch2_tBasex(613)=408 exch2_tBasey(613)=0 exch2_txGlobalo(613)=2449 exch2_tyGlobalo(613)=1 exch2_isWedge(613)=0 exch2_isNedge(613)=0 exch2_isEedge(613)=0 exch2_isSedge(613)=1 exch2_myFace(613)=5 exch2_mydNx(613)=510 exch2_mydNy(613)=510 exch2_nNeighbours(613)=4 exch2_neighbourId(1,613)=628 exch2_iLo(1,613)=0 exch2_iHi(1,613)=35 exch2_jLo(1,613)=52 exch2_jHi(1,613)=52 exch2_opposingSend(1,613)=2 exch2_pij(1,1,613)=1 exch2_pij(2,1,613)=0 exch2_pij(3,1,613)=0 exch2_pij(4,1,613)=1 exch2_oi(1,613)=0 exch2_oj(1,613)=0 exch2_neighbourId(2,613)=598 exch2_iLo(2,613)=0 exch2_iHi(2,613)=35 exch2_jLo(2,613)=0 exch2_jHi(2,613)=0 exch2_opposingSend(2,613)=1 exch2_pij(1,2,613)=1 exch2_pij(2,2,613)=0 exch2_pij(3,2,613)=0 exch2_pij(4,2,613)=1 exch2_oi(2,613)=0 exch2_oj(2,613)=-510 exch2_neighbourId(3,613)=614 exch2_iLo(3,613)=35 exch2_iHi(3,613)=35 exch2_jLo(3,613)=0 exch2_jHi(3,613)=52 exch2_opposingSend(3,613)=4 exch2_pij(1,3,613)=1 exch2_pij(2,3,613)=0 exch2_pij(3,3,613)=0 exch2_pij(4,3,613)=1 exch2_oi(3,613)=0 exch2_oj(3,613)=0 exch2_neighbourId(4,613)=612 exch2_iLo(4,613)=0 exch2_iHi(4,613)=0 exch2_jLo(4,613)=0 exch2_jHi(4,613)=52 exch2_opposingSend(4,613)=3 exch2_pij(1,4,613)=1 exch2_pij(2,4,613)=0 exch2_pij(3,4,613)=0 exch2_pij(4,4,613)=1 exch2_oi(4,613)=0 exch2_oj(4,613)=0 RETURN END SUBROUTINE W2_E2SETUP_614 C Topology for tile 614 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(614)=34 exch2_tNy(614)=51 exch2_tBasex(614)=442 exch2_tBasey(614)=0 exch2_txGlobalo(614)=2483 exch2_tyGlobalo(614)=1 exch2_isWedge(614)=0 exch2_isNedge(614)=0 exch2_isEedge(614)=0 exch2_isSedge(614)=1 exch2_myFace(614)=5 exch2_mydNx(614)=510 exch2_mydNy(614)=510 exch2_nNeighbours(614)=4 exch2_neighbourId(1,614)=629 exch2_iLo(1,614)=0 exch2_iHi(1,614)=35 exch2_jLo(1,614)=52 exch2_jHi(1,614)=52 exch2_opposingSend(1,614)=2 exch2_pij(1,1,614)=1 exch2_pij(2,1,614)=0 exch2_pij(3,1,614)=0 exch2_pij(4,1,614)=1 exch2_oi(1,614)=0 exch2_oj(1,614)=0 exch2_neighbourId(2,614)=599 exch2_iLo(2,614)=0 exch2_iHi(2,614)=35 exch2_jLo(2,614)=0 exch2_jHi(2,614)=0 exch2_opposingSend(2,614)=1 exch2_pij(1,2,614)=1 exch2_pij(2,2,614)=0 exch2_pij(3,2,614)=0 exch2_pij(4,2,614)=1 exch2_oi(2,614)=0 exch2_oj(2,614)=-510 exch2_neighbourId(3,614)=615 exch2_iLo(3,614)=35 exch2_iHi(3,614)=35 exch2_jLo(3,614)=0 exch2_jHi(3,614)=52 exch2_opposingSend(3,614)=4 exch2_pij(1,3,614)=1 exch2_pij(2,3,614)=0 exch2_pij(3,3,614)=0 exch2_pij(4,3,614)=1 exch2_oi(3,614)=0 exch2_oj(3,614)=0 exch2_neighbourId(4,614)=613 exch2_iLo(4,614)=0 exch2_iHi(4,614)=0 exch2_jLo(4,614)=0 exch2_jHi(4,614)=52 exch2_opposingSend(4,614)=3 exch2_pij(1,4,614)=1 exch2_pij(2,4,614)=0 exch2_pij(3,4,614)=0 exch2_pij(4,4,614)=1 exch2_oi(4,614)=0 exch2_oj(4,614)=0 RETURN END SUBROUTINE W2_E2SETUP_615 C Topology for tile 615 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(615)=34 exch2_tNy(615)=51 exch2_tBasex(615)=476 exch2_tBasey(615)=0 exch2_txGlobalo(615)=2517 exch2_tyGlobalo(615)=1 exch2_isWedge(615)=0 exch2_isNedge(615)=0 exch2_isEedge(615)=1 exch2_isSedge(615)=1 exch2_myFace(615)=5 exch2_mydNx(615)=510 exch2_mydNy(615)=510 exch2_nNeighbours(615)=4 exch2_neighbourId(1,615)=630 exch2_iLo(1,615)=0 exch2_iHi(1,615)=35 exch2_jLo(1,615)=52 exch2_jHi(1,615)=52 exch2_opposingSend(1,615)=2 exch2_pij(1,1,615)=1 exch2_pij(2,1,615)=0 exch2_pij(3,1,615)=0 exch2_pij(4,1,615)=1 exch2_oi(1,615)=0 exch2_oj(1,615)=0 exch2_neighbourId(2,615)=600 exch2_iLo(2,615)=0 exch2_iHi(2,615)=35 exch2_jLo(2,615)=0 exch2_jHi(2,615)=0 exch2_opposingSend(2,615)=1 exch2_pij(1,2,615)=1 exch2_pij(2,2,615)=0 exch2_pij(3,2,615)=0 exch2_pij(4,2,615)=1 exch2_oi(2,615)=0 exch2_oj(2,615)=-510 exch2_neighbourId(3,615)=751 exch2_iLo(3,615)=35 exch2_iHi(3,615)=35 exch2_jLo(3,615)=0 exch2_jHi(3,615)=52 exch2_opposingSend(3,615)=4 exch2_pij(1,3,615)=1 exch2_pij(2,3,615)=0 exch2_pij(3,3,615)=0 exch2_pij(4,3,615)=1 exch2_oi(3,615)=510 exch2_oj(3,615)=0 exch2_neighbourId(4,615)=614 exch2_iLo(4,615)=0 exch2_iHi(4,615)=0 exch2_jLo(4,615)=0 exch2_jHi(4,615)=52 exch2_opposingSend(4,615)=3 exch2_pij(1,4,615)=1 exch2_pij(2,4,615)=0 exch2_pij(3,4,615)=0 exch2_pij(4,4,615)=1 exch2_oi(4,615)=0 exch2_oj(4,615)=0 RETURN END SUBROUTINE W2_E2SETUP_616 C Topology for tile 616 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(616)=34 exch2_tNy(616)=51 exch2_tBasex(616)=0 exch2_tBasey(616)=51 exch2_txGlobalo(616)=2041 exch2_tyGlobalo(616)=52 exch2_isWedge(616)=1 exch2_isNedge(616)=0 exch2_isEedge(616)=0 exch2_isSedge(616)=0 exch2_myFace(616)=5 exch2_mydNx(616)=510 exch2_mydNy(616)=510 exch2_nNeighbours(616)=5 exch2_neighbourId(1,616)=631 exch2_iLo(1,616)=0 exch2_iHi(1,616)=35 exch2_jLo(1,616)=52 exch2_jHi(1,616)=52 exch2_opposingSend(1,616)=2 exch2_pij(1,1,616)=1 exch2_pij(2,1,616)=0 exch2_pij(3,1,616)=0 exch2_pij(4,1,616)=1 exch2_oi(1,616)=0 exch2_oj(1,616)=0 exch2_neighbourId(2,616)=601 exch2_iLo(2,616)=0 exch2_iHi(2,616)=35 exch2_jLo(2,616)=0 exch2_jHi(2,616)=0 exch2_opposingSend(2,616)=1 exch2_pij(1,2,616)=1 exch2_pij(2,2,616)=0 exch2_pij(3,2,616)=0 exch2_pij(4,2,616)=1 exch2_oi(2,616)=0 exch2_oj(2,616)=0 exch2_neighbourId(3,616)=617 exch2_iLo(3,616)=35 exch2_iHi(3,616)=35 exch2_jLo(3,616)=0 exch2_jHi(3,616)=52 exch2_opposingSend(3,616)=4 exch2_pij(1,3,616)=1 exch2_pij(2,3,616)=0 exch2_pij(3,3,616)=0 exch2_pij(4,3,616)=1 exch2_oi(3,616)=0 exch2_oj(3,616)=0 exch2_neighbourId(4,616)=448 exch2_iLo(4,616)=0 exch2_iHi(4,616)=0 exch2_jLo(4,616)=17 exch2_jHi(4,616)=52 exch2_opposingSend(4,616)=1 exch2_pij(1,4,616)=0 exch2_pij(2,4,616)=1 exch2_pij(3,4,616)=-1 exch2_pij(4,4,616)=0 exch2_oi(4,616)=-510 exch2_oj(4,616)=511 exch2_neighbourId(5,616)=449 exch2_iLo(5,616)=0 exch2_iHi(5,616)=0 exch2_jLo(5,616)=0 exch2_jHi(5,616)=18 exch2_opposingSend(5,616)=2 exch2_pij(1,5,616)=0 exch2_pij(2,5,616)=1 exch2_pij(3,5,616)=-1 exch2_pij(4,5,616)=0 exch2_oi(5,616)=-510 exch2_oj(5,616)=511 RETURN END SUBROUTINE W2_E2SETUP_617 C Topology for tile 617 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(617)=34 exch2_tNy(617)=51 exch2_tBasex(617)=34 exch2_tBasey(617)=51 exch2_txGlobalo(617)=2075 exch2_tyGlobalo(617)=52 exch2_isWedge(617)=0 exch2_isNedge(617)=0 exch2_isEedge(617)=0 exch2_isSedge(617)=0 exch2_myFace(617)=5 exch2_mydNx(617)=510 exch2_mydNy(617)=510 exch2_nNeighbours(617)=4 exch2_neighbourId(1,617)=632 exch2_iLo(1,617)=0 exch2_iHi(1,617)=35 exch2_jLo(1,617)=52 exch2_jHi(1,617)=52 exch2_opposingSend(1,617)=2 exch2_pij(1,1,617)=1 exch2_pij(2,1,617)=0 exch2_pij(3,1,617)=0 exch2_pij(4,1,617)=1 exch2_oi(1,617)=0 exch2_oj(1,617)=0 exch2_neighbourId(2,617)=602 exch2_iLo(2,617)=0 exch2_iHi(2,617)=35 exch2_jLo(2,617)=0 exch2_jHi(2,617)=0 exch2_opposingSend(2,617)=1 exch2_pij(1,2,617)=1 exch2_pij(2,2,617)=0 exch2_pij(3,2,617)=0 exch2_pij(4,2,617)=1 exch2_oi(2,617)=0 exch2_oj(2,617)=0 exch2_neighbourId(3,617)=618 exch2_iLo(3,617)=35 exch2_iHi(3,617)=35 exch2_jLo(3,617)=0 exch2_jHi(3,617)=52 exch2_opposingSend(3,617)=4 exch2_pij(1,3,617)=1 exch2_pij(2,3,617)=0 exch2_pij(3,3,617)=0 exch2_pij(4,3,617)=1 exch2_oi(3,617)=0 exch2_oj(3,617)=0 exch2_neighbourId(4,617)=616 exch2_iLo(4,617)=0 exch2_iHi(4,617)=0 exch2_jLo(4,617)=0 exch2_jHi(4,617)=52 exch2_opposingSend(4,617)=3 exch2_pij(1,4,617)=1 exch2_pij(2,4,617)=0 exch2_pij(3,4,617)=0 exch2_pij(4,4,617)=1 exch2_oi(4,617)=0 exch2_oj(4,617)=0 RETURN END SUBROUTINE W2_E2SETUP_618 C Topology for tile 618 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(618)=34 exch2_tNy(618)=51 exch2_tBasex(618)=68 exch2_tBasey(618)=51 exch2_txGlobalo(618)=2109 exch2_tyGlobalo(618)=52 exch2_isWedge(618)=0 exch2_isNedge(618)=0 exch2_isEedge(618)=0 exch2_isSedge(618)=0 exch2_myFace(618)=5 exch2_mydNx(618)=510 exch2_mydNy(618)=510 exch2_nNeighbours(618)=4 exch2_neighbourId(1,618)=633 exch2_iLo(1,618)=0 exch2_iHi(1,618)=35 exch2_jLo(1,618)=52 exch2_jHi(1,618)=52 exch2_opposingSend(1,618)=2 exch2_pij(1,1,618)=1 exch2_pij(2,1,618)=0 exch2_pij(3,1,618)=0 exch2_pij(4,1,618)=1 exch2_oi(1,618)=0 exch2_oj(1,618)=0 exch2_neighbourId(2,618)=603 exch2_iLo(2,618)=0 exch2_iHi(2,618)=35 exch2_jLo(2,618)=0 exch2_jHi(2,618)=0 exch2_opposingSend(2,618)=1 exch2_pij(1,2,618)=1 exch2_pij(2,2,618)=0 exch2_pij(3,2,618)=0 exch2_pij(4,2,618)=1 exch2_oi(2,618)=0 exch2_oj(2,618)=0 exch2_neighbourId(3,618)=619 exch2_iLo(3,618)=35 exch2_iHi(3,618)=35 exch2_jLo(3,618)=0 exch2_jHi(3,618)=52 exch2_opposingSend(3,618)=4 exch2_pij(1,3,618)=1 exch2_pij(2,3,618)=0 exch2_pij(3,3,618)=0 exch2_pij(4,3,618)=1 exch2_oi(3,618)=0 exch2_oj(3,618)=0 exch2_neighbourId(4,618)=617 exch2_iLo(4,618)=0 exch2_iHi(4,618)=0 exch2_jLo(4,618)=0 exch2_jHi(4,618)=52 exch2_opposingSend(4,618)=3 exch2_pij(1,4,618)=1 exch2_pij(2,4,618)=0 exch2_pij(3,4,618)=0 exch2_pij(4,4,618)=1 exch2_oi(4,618)=0 exch2_oj(4,618)=0 RETURN END SUBROUTINE W2_E2SETUP_619 C Topology for tile 619 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(619)=34 exch2_tNy(619)=51 exch2_tBasex(619)=102 exch2_tBasey(619)=51 exch2_txGlobalo(619)=2143 exch2_tyGlobalo(619)=52 exch2_isWedge(619)=0 exch2_isNedge(619)=0 exch2_isEedge(619)=0 exch2_isSedge(619)=0 exch2_myFace(619)=5 exch2_mydNx(619)=510 exch2_mydNy(619)=510 exch2_nNeighbours(619)=4 exch2_neighbourId(1,619)=634 exch2_iLo(1,619)=0 exch2_iHi(1,619)=35 exch2_jLo(1,619)=52 exch2_jHi(1,619)=52 exch2_opposingSend(1,619)=2 exch2_pij(1,1,619)=1 exch2_pij(2,1,619)=0 exch2_pij(3,1,619)=0 exch2_pij(4,1,619)=1 exch2_oi(1,619)=0 exch2_oj(1,619)=0 exch2_neighbourId(2,619)=604 exch2_iLo(2,619)=0 exch2_iHi(2,619)=35 exch2_jLo(2,619)=0 exch2_jHi(2,619)=0 exch2_opposingSend(2,619)=1 exch2_pij(1,2,619)=1 exch2_pij(2,2,619)=0 exch2_pij(3,2,619)=0 exch2_pij(4,2,619)=1 exch2_oi(2,619)=0 exch2_oj(2,619)=0 exch2_neighbourId(3,619)=620 exch2_iLo(3,619)=35 exch2_iHi(3,619)=35 exch2_jLo(3,619)=0 exch2_jHi(3,619)=52 exch2_opposingSend(3,619)=4 exch2_pij(1,3,619)=1 exch2_pij(2,3,619)=0 exch2_pij(3,3,619)=0 exch2_pij(4,3,619)=1 exch2_oi(3,619)=0 exch2_oj(3,619)=0 exch2_neighbourId(4,619)=618 exch2_iLo(4,619)=0 exch2_iHi(4,619)=0 exch2_jLo(4,619)=0 exch2_jHi(4,619)=52 exch2_opposingSend(4,619)=3 exch2_pij(1,4,619)=1 exch2_pij(2,4,619)=0 exch2_pij(3,4,619)=0 exch2_pij(4,4,619)=1 exch2_oi(4,619)=0 exch2_oj(4,619)=0 RETURN END SUBROUTINE W2_E2SETUP_620 C Topology for tile 620 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(620)=34 exch2_tNy(620)=51 exch2_tBasex(620)=136 exch2_tBasey(620)=51 exch2_txGlobalo(620)=2177 exch2_tyGlobalo(620)=52 exch2_isWedge(620)=0 exch2_isNedge(620)=0 exch2_isEedge(620)=0 exch2_isSedge(620)=0 exch2_myFace(620)=5 exch2_mydNx(620)=510 exch2_mydNy(620)=510 exch2_nNeighbours(620)=4 exch2_neighbourId(1,620)=635 exch2_iLo(1,620)=0 exch2_iHi(1,620)=35 exch2_jLo(1,620)=52 exch2_jHi(1,620)=52 exch2_opposingSend(1,620)=2 exch2_pij(1,1,620)=1 exch2_pij(2,1,620)=0 exch2_pij(3,1,620)=0 exch2_pij(4,1,620)=1 exch2_oi(1,620)=0 exch2_oj(1,620)=0 exch2_neighbourId(2,620)=605 exch2_iLo(2,620)=0 exch2_iHi(2,620)=35 exch2_jLo(2,620)=0 exch2_jHi(2,620)=0 exch2_opposingSend(2,620)=1 exch2_pij(1,2,620)=1 exch2_pij(2,2,620)=0 exch2_pij(3,2,620)=0 exch2_pij(4,2,620)=1 exch2_oi(2,620)=0 exch2_oj(2,620)=0 exch2_neighbourId(3,620)=621 exch2_iLo(3,620)=35 exch2_iHi(3,620)=35 exch2_jLo(3,620)=0 exch2_jHi(3,620)=52 exch2_opposingSend(3,620)=4 exch2_pij(1,3,620)=1 exch2_pij(2,3,620)=0 exch2_pij(3,3,620)=0 exch2_pij(4,3,620)=1 exch2_oi(3,620)=0 exch2_oj(3,620)=0 exch2_neighbourId(4,620)=619 exch2_iLo(4,620)=0 exch2_iHi(4,620)=0 exch2_jLo(4,620)=0 exch2_jHi(4,620)=52 exch2_opposingSend(4,620)=3 exch2_pij(1,4,620)=1 exch2_pij(2,4,620)=0 exch2_pij(3,4,620)=0 exch2_pij(4,4,620)=1 exch2_oi(4,620)=0 exch2_oj(4,620)=0 RETURN END SUBROUTINE W2_E2SETUP_621 C Topology for tile 621 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(621)=34 exch2_tNy(621)=51 exch2_tBasex(621)=170 exch2_tBasey(621)=51 exch2_txGlobalo(621)=2211 exch2_tyGlobalo(621)=52 exch2_isWedge(621)=0 exch2_isNedge(621)=0 exch2_isEedge(621)=0 exch2_isSedge(621)=0 exch2_myFace(621)=5 exch2_mydNx(621)=510 exch2_mydNy(621)=510 exch2_nNeighbours(621)=4 exch2_neighbourId(1,621)=636 exch2_iLo(1,621)=0 exch2_iHi(1,621)=35 exch2_jLo(1,621)=52 exch2_jHi(1,621)=52 exch2_opposingSend(1,621)=2 exch2_pij(1,1,621)=1 exch2_pij(2,1,621)=0 exch2_pij(3,1,621)=0 exch2_pij(4,1,621)=1 exch2_oi(1,621)=0 exch2_oj(1,621)=0 exch2_neighbourId(2,621)=606 exch2_iLo(2,621)=0 exch2_iHi(2,621)=35 exch2_jLo(2,621)=0 exch2_jHi(2,621)=0 exch2_opposingSend(2,621)=1 exch2_pij(1,2,621)=1 exch2_pij(2,2,621)=0 exch2_pij(3,2,621)=0 exch2_pij(4,2,621)=1 exch2_oi(2,621)=0 exch2_oj(2,621)=0 exch2_neighbourId(3,621)=622 exch2_iLo(3,621)=35 exch2_iHi(3,621)=35 exch2_jLo(3,621)=0 exch2_jHi(3,621)=52 exch2_opposingSend(3,621)=4 exch2_pij(1,3,621)=1 exch2_pij(2,3,621)=0 exch2_pij(3,3,621)=0 exch2_pij(4,3,621)=1 exch2_oi(3,621)=0 exch2_oj(3,621)=0 exch2_neighbourId(4,621)=620 exch2_iLo(4,621)=0 exch2_iHi(4,621)=0 exch2_jLo(4,621)=0 exch2_jHi(4,621)=52 exch2_opposingSend(4,621)=3 exch2_pij(1,4,621)=1 exch2_pij(2,4,621)=0 exch2_pij(3,4,621)=0 exch2_pij(4,4,621)=1 exch2_oi(4,621)=0 exch2_oj(4,621)=0 RETURN END SUBROUTINE W2_E2SETUP_622 C Topology for tile 622 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(622)=34 exch2_tNy(622)=51 exch2_tBasex(622)=204 exch2_tBasey(622)=51 exch2_txGlobalo(622)=2245 exch2_tyGlobalo(622)=52 exch2_isWedge(622)=0 exch2_isNedge(622)=0 exch2_isEedge(622)=0 exch2_isSedge(622)=0 exch2_myFace(622)=5 exch2_mydNx(622)=510 exch2_mydNy(622)=510 exch2_nNeighbours(622)=4 exch2_neighbourId(1,622)=637 exch2_iLo(1,622)=0 exch2_iHi(1,622)=35 exch2_jLo(1,622)=52 exch2_jHi(1,622)=52 exch2_opposingSend(1,622)=2 exch2_pij(1,1,622)=1 exch2_pij(2,1,622)=0 exch2_pij(3,1,622)=0 exch2_pij(4,1,622)=1 exch2_oi(1,622)=0 exch2_oj(1,622)=0 exch2_neighbourId(2,622)=607 exch2_iLo(2,622)=0 exch2_iHi(2,622)=35 exch2_jLo(2,622)=0 exch2_jHi(2,622)=0 exch2_opposingSend(2,622)=1 exch2_pij(1,2,622)=1 exch2_pij(2,2,622)=0 exch2_pij(3,2,622)=0 exch2_pij(4,2,622)=1 exch2_oi(2,622)=0 exch2_oj(2,622)=0 exch2_neighbourId(3,622)=623 exch2_iLo(3,622)=35 exch2_iHi(3,622)=35 exch2_jLo(3,622)=0 exch2_jHi(3,622)=52 exch2_opposingSend(3,622)=4 exch2_pij(1,3,622)=1 exch2_pij(2,3,622)=0 exch2_pij(3,3,622)=0 exch2_pij(4,3,622)=1 exch2_oi(3,622)=0 exch2_oj(3,622)=0 exch2_neighbourId(4,622)=621 exch2_iLo(4,622)=0 exch2_iHi(4,622)=0 exch2_jLo(4,622)=0 exch2_jHi(4,622)=52 exch2_opposingSend(4,622)=3 exch2_pij(1,4,622)=1 exch2_pij(2,4,622)=0 exch2_pij(3,4,622)=0 exch2_pij(4,4,622)=1 exch2_oi(4,622)=0 exch2_oj(4,622)=0 RETURN END SUBROUTINE W2_E2SETUP_623 C Topology for tile 623 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(623)=34 exch2_tNy(623)=51 exch2_tBasex(623)=238 exch2_tBasey(623)=51 exch2_txGlobalo(623)=2279 exch2_tyGlobalo(623)=52 exch2_isWedge(623)=0 exch2_isNedge(623)=0 exch2_isEedge(623)=0 exch2_isSedge(623)=0 exch2_myFace(623)=5 exch2_mydNx(623)=510 exch2_mydNy(623)=510 exch2_nNeighbours(623)=4 exch2_neighbourId(1,623)=638 exch2_iLo(1,623)=0 exch2_iHi(1,623)=35 exch2_jLo(1,623)=52 exch2_jHi(1,623)=52 exch2_opposingSend(1,623)=2 exch2_pij(1,1,623)=1 exch2_pij(2,1,623)=0 exch2_pij(3,1,623)=0 exch2_pij(4,1,623)=1 exch2_oi(1,623)=0 exch2_oj(1,623)=0 exch2_neighbourId(2,623)=608 exch2_iLo(2,623)=0 exch2_iHi(2,623)=35 exch2_jLo(2,623)=0 exch2_jHi(2,623)=0 exch2_opposingSend(2,623)=1 exch2_pij(1,2,623)=1 exch2_pij(2,2,623)=0 exch2_pij(3,2,623)=0 exch2_pij(4,2,623)=1 exch2_oi(2,623)=0 exch2_oj(2,623)=0 exch2_neighbourId(3,623)=624 exch2_iLo(3,623)=35 exch2_iHi(3,623)=35 exch2_jLo(3,623)=0 exch2_jHi(3,623)=52 exch2_opposingSend(3,623)=4 exch2_pij(1,3,623)=1 exch2_pij(2,3,623)=0 exch2_pij(3,3,623)=0 exch2_pij(4,3,623)=1 exch2_oi(3,623)=0 exch2_oj(3,623)=0 exch2_neighbourId(4,623)=622 exch2_iLo(4,623)=0 exch2_iHi(4,623)=0 exch2_jLo(4,623)=0 exch2_jHi(4,623)=52 exch2_opposingSend(4,623)=3 exch2_pij(1,4,623)=1 exch2_pij(2,4,623)=0 exch2_pij(3,4,623)=0 exch2_pij(4,4,623)=1 exch2_oi(4,623)=0 exch2_oj(4,623)=0 RETURN END SUBROUTINE W2_E2SETUP_624 C Topology for tile 624 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(624)=34 exch2_tNy(624)=51 exch2_tBasex(624)=272 exch2_tBasey(624)=51 exch2_txGlobalo(624)=2313 exch2_tyGlobalo(624)=52 exch2_isWedge(624)=0 exch2_isNedge(624)=0 exch2_isEedge(624)=0 exch2_isSedge(624)=0 exch2_myFace(624)=5 exch2_mydNx(624)=510 exch2_mydNy(624)=510 exch2_nNeighbours(624)=4 exch2_neighbourId(1,624)=639 exch2_iLo(1,624)=0 exch2_iHi(1,624)=35 exch2_jLo(1,624)=52 exch2_jHi(1,624)=52 exch2_opposingSend(1,624)=2 exch2_pij(1,1,624)=1 exch2_pij(2,1,624)=0 exch2_pij(3,1,624)=0 exch2_pij(4,1,624)=1 exch2_oi(1,624)=0 exch2_oj(1,624)=0 exch2_neighbourId(2,624)=609 exch2_iLo(2,624)=0 exch2_iHi(2,624)=35 exch2_jLo(2,624)=0 exch2_jHi(2,624)=0 exch2_opposingSend(2,624)=1 exch2_pij(1,2,624)=1 exch2_pij(2,2,624)=0 exch2_pij(3,2,624)=0 exch2_pij(4,2,624)=1 exch2_oi(2,624)=0 exch2_oj(2,624)=0 exch2_neighbourId(3,624)=625 exch2_iLo(3,624)=35 exch2_iHi(3,624)=35 exch2_jLo(3,624)=0 exch2_jHi(3,624)=52 exch2_opposingSend(3,624)=4 exch2_pij(1,3,624)=1 exch2_pij(2,3,624)=0 exch2_pij(3,3,624)=0 exch2_pij(4,3,624)=1 exch2_oi(3,624)=0 exch2_oj(3,624)=0 exch2_neighbourId(4,624)=623 exch2_iLo(4,624)=0 exch2_iHi(4,624)=0 exch2_jLo(4,624)=0 exch2_jHi(4,624)=52 exch2_opposingSend(4,624)=3 exch2_pij(1,4,624)=1 exch2_pij(2,4,624)=0 exch2_pij(3,4,624)=0 exch2_pij(4,4,624)=1 exch2_oi(4,624)=0 exch2_oj(4,624)=0 RETURN END SUBROUTINE W2_E2SETUP_625 C Topology for tile 625 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(625)=34 exch2_tNy(625)=51 exch2_tBasex(625)=306 exch2_tBasey(625)=51 exch2_txGlobalo(625)=2347 exch2_tyGlobalo(625)=52 exch2_isWedge(625)=0 exch2_isNedge(625)=0 exch2_isEedge(625)=0 exch2_isSedge(625)=0 exch2_myFace(625)=5 exch2_mydNx(625)=510 exch2_mydNy(625)=510 exch2_nNeighbours(625)=4 exch2_neighbourId(1,625)=640 exch2_iLo(1,625)=0 exch2_iHi(1,625)=35 exch2_jLo(1,625)=52 exch2_jHi(1,625)=52 exch2_opposingSend(1,625)=2 exch2_pij(1,1,625)=1 exch2_pij(2,1,625)=0 exch2_pij(3,1,625)=0 exch2_pij(4,1,625)=1 exch2_oi(1,625)=0 exch2_oj(1,625)=0 exch2_neighbourId(2,625)=610 exch2_iLo(2,625)=0 exch2_iHi(2,625)=35 exch2_jLo(2,625)=0 exch2_jHi(2,625)=0 exch2_opposingSend(2,625)=1 exch2_pij(1,2,625)=1 exch2_pij(2,2,625)=0 exch2_pij(3,2,625)=0 exch2_pij(4,2,625)=1 exch2_oi(2,625)=0 exch2_oj(2,625)=0 exch2_neighbourId(3,625)=626 exch2_iLo(3,625)=35 exch2_iHi(3,625)=35 exch2_jLo(3,625)=0 exch2_jHi(3,625)=52 exch2_opposingSend(3,625)=4 exch2_pij(1,3,625)=1 exch2_pij(2,3,625)=0 exch2_pij(3,3,625)=0 exch2_pij(4,3,625)=1 exch2_oi(3,625)=0 exch2_oj(3,625)=0 exch2_neighbourId(4,625)=624 exch2_iLo(4,625)=0 exch2_iHi(4,625)=0 exch2_jLo(4,625)=0 exch2_jHi(4,625)=52 exch2_opposingSend(4,625)=3 exch2_pij(1,4,625)=1 exch2_pij(2,4,625)=0 exch2_pij(3,4,625)=0 exch2_pij(4,4,625)=1 exch2_oi(4,625)=0 exch2_oj(4,625)=0 RETURN END SUBROUTINE W2_E2SETUP_626 C Topology for tile 626 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(626)=34 exch2_tNy(626)=51 exch2_tBasex(626)=340 exch2_tBasey(626)=51 exch2_txGlobalo(626)=2381 exch2_tyGlobalo(626)=52 exch2_isWedge(626)=0 exch2_isNedge(626)=0 exch2_isEedge(626)=0 exch2_isSedge(626)=0 exch2_myFace(626)=5 exch2_mydNx(626)=510 exch2_mydNy(626)=510 exch2_nNeighbours(626)=4 exch2_neighbourId(1,626)=641 exch2_iLo(1,626)=0 exch2_iHi(1,626)=35 exch2_jLo(1,626)=52 exch2_jHi(1,626)=52 exch2_opposingSend(1,626)=2 exch2_pij(1,1,626)=1 exch2_pij(2,1,626)=0 exch2_pij(3,1,626)=0 exch2_pij(4,1,626)=1 exch2_oi(1,626)=0 exch2_oj(1,626)=0 exch2_neighbourId(2,626)=611 exch2_iLo(2,626)=0 exch2_iHi(2,626)=35 exch2_jLo(2,626)=0 exch2_jHi(2,626)=0 exch2_opposingSend(2,626)=1 exch2_pij(1,2,626)=1 exch2_pij(2,2,626)=0 exch2_pij(3,2,626)=0 exch2_pij(4,2,626)=1 exch2_oi(2,626)=0 exch2_oj(2,626)=0 exch2_neighbourId(3,626)=627 exch2_iLo(3,626)=35 exch2_iHi(3,626)=35 exch2_jLo(3,626)=0 exch2_jHi(3,626)=52 exch2_opposingSend(3,626)=4 exch2_pij(1,3,626)=1 exch2_pij(2,3,626)=0 exch2_pij(3,3,626)=0 exch2_pij(4,3,626)=1 exch2_oi(3,626)=0 exch2_oj(3,626)=0 exch2_neighbourId(4,626)=625 exch2_iLo(4,626)=0 exch2_iHi(4,626)=0 exch2_jLo(4,626)=0 exch2_jHi(4,626)=52 exch2_opposingSend(4,626)=3 exch2_pij(1,4,626)=1 exch2_pij(2,4,626)=0 exch2_pij(3,4,626)=0 exch2_pij(4,4,626)=1 exch2_oi(4,626)=0 exch2_oj(4,626)=0 RETURN END SUBROUTINE W2_E2SETUP_627 C Topology for tile 627 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(627)=34 exch2_tNy(627)=51 exch2_tBasex(627)=374 exch2_tBasey(627)=51 exch2_txGlobalo(627)=2415 exch2_tyGlobalo(627)=52 exch2_isWedge(627)=0 exch2_isNedge(627)=0 exch2_isEedge(627)=0 exch2_isSedge(627)=0 exch2_myFace(627)=5 exch2_mydNx(627)=510 exch2_mydNy(627)=510 exch2_nNeighbours(627)=4 exch2_neighbourId(1,627)=642 exch2_iLo(1,627)=0 exch2_iHi(1,627)=35 exch2_jLo(1,627)=52 exch2_jHi(1,627)=52 exch2_opposingSend(1,627)=2 exch2_pij(1,1,627)=1 exch2_pij(2,1,627)=0 exch2_pij(3,1,627)=0 exch2_pij(4,1,627)=1 exch2_oi(1,627)=0 exch2_oj(1,627)=0 exch2_neighbourId(2,627)=612 exch2_iLo(2,627)=0 exch2_iHi(2,627)=35 exch2_jLo(2,627)=0 exch2_jHi(2,627)=0 exch2_opposingSend(2,627)=1 exch2_pij(1,2,627)=1 exch2_pij(2,2,627)=0 exch2_pij(3,2,627)=0 exch2_pij(4,2,627)=1 exch2_oi(2,627)=0 exch2_oj(2,627)=0 exch2_neighbourId(3,627)=628 exch2_iLo(3,627)=35 exch2_iHi(3,627)=35 exch2_jLo(3,627)=0 exch2_jHi(3,627)=52 exch2_opposingSend(3,627)=4 exch2_pij(1,3,627)=1 exch2_pij(2,3,627)=0 exch2_pij(3,3,627)=0 exch2_pij(4,3,627)=1 exch2_oi(3,627)=0 exch2_oj(3,627)=0 exch2_neighbourId(4,627)=626 exch2_iLo(4,627)=0 exch2_iHi(4,627)=0 exch2_jLo(4,627)=0 exch2_jHi(4,627)=52 exch2_opposingSend(4,627)=3 exch2_pij(1,4,627)=1 exch2_pij(2,4,627)=0 exch2_pij(3,4,627)=0 exch2_pij(4,4,627)=1 exch2_oi(4,627)=0 exch2_oj(4,627)=0 RETURN END SUBROUTINE W2_E2SETUP_628 C Topology for tile 628 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(628)=34 exch2_tNy(628)=51 exch2_tBasex(628)=408 exch2_tBasey(628)=51 exch2_txGlobalo(628)=2449 exch2_tyGlobalo(628)=52 exch2_isWedge(628)=0 exch2_isNedge(628)=0 exch2_isEedge(628)=0 exch2_isSedge(628)=0 exch2_myFace(628)=5 exch2_mydNx(628)=510 exch2_mydNy(628)=510 exch2_nNeighbours(628)=4 exch2_neighbourId(1,628)=643 exch2_iLo(1,628)=0 exch2_iHi(1,628)=35 exch2_jLo(1,628)=52 exch2_jHi(1,628)=52 exch2_opposingSend(1,628)=2 exch2_pij(1,1,628)=1 exch2_pij(2,1,628)=0 exch2_pij(3,1,628)=0 exch2_pij(4,1,628)=1 exch2_oi(1,628)=0 exch2_oj(1,628)=0 exch2_neighbourId(2,628)=613 exch2_iLo(2,628)=0 exch2_iHi(2,628)=35 exch2_jLo(2,628)=0 exch2_jHi(2,628)=0 exch2_opposingSend(2,628)=1 exch2_pij(1,2,628)=1 exch2_pij(2,2,628)=0 exch2_pij(3,2,628)=0 exch2_pij(4,2,628)=1 exch2_oi(2,628)=0 exch2_oj(2,628)=0 exch2_neighbourId(3,628)=629 exch2_iLo(3,628)=35 exch2_iHi(3,628)=35 exch2_jLo(3,628)=0 exch2_jHi(3,628)=52 exch2_opposingSend(3,628)=4 exch2_pij(1,3,628)=1 exch2_pij(2,3,628)=0 exch2_pij(3,3,628)=0 exch2_pij(4,3,628)=1 exch2_oi(3,628)=0 exch2_oj(3,628)=0 exch2_neighbourId(4,628)=627 exch2_iLo(4,628)=0 exch2_iHi(4,628)=0 exch2_jLo(4,628)=0 exch2_jHi(4,628)=52 exch2_opposingSend(4,628)=3 exch2_pij(1,4,628)=1 exch2_pij(2,4,628)=0 exch2_pij(3,4,628)=0 exch2_pij(4,4,628)=1 exch2_oi(4,628)=0 exch2_oj(4,628)=0 RETURN END SUBROUTINE W2_E2SETUP_629 C Topology for tile 629 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(629)=34 exch2_tNy(629)=51 exch2_tBasex(629)=442 exch2_tBasey(629)=51 exch2_txGlobalo(629)=2483 exch2_tyGlobalo(629)=52 exch2_isWedge(629)=0 exch2_isNedge(629)=0 exch2_isEedge(629)=0 exch2_isSedge(629)=0 exch2_myFace(629)=5 exch2_mydNx(629)=510 exch2_mydNy(629)=510 exch2_nNeighbours(629)=4 exch2_neighbourId(1,629)=644 exch2_iLo(1,629)=0 exch2_iHi(1,629)=35 exch2_jLo(1,629)=52 exch2_jHi(1,629)=52 exch2_opposingSend(1,629)=2 exch2_pij(1,1,629)=1 exch2_pij(2,1,629)=0 exch2_pij(3,1,629)=0 exch2_pij(4,1,629)=1 exch2_oi(1,629)=0 exch2_oj(1,629)=0 exch2_neighbourId(2,629)=614 exch2_iLo(2,629)=0 exch2_iHi(2,629)=35 exch2_jLo(2,629)=0 exch2_jHi(2,629)=0 exch2_opposingSend(2,629)=1 exch2_pij(1,2,629)=1 exch2_pij(2,2,629)=0 exch2_pij(3,2,629)=0 exch2_pij(4,2,629)=1 exch2_oi(2,629)=0 exch2_oj(2,629)=0 exch2_neighbourId(3,629)=630 exch2_iLo(3,629)=35 exch2_iHi(3,629)=35 exch2_jLo(3,629)=0 exch2_jHi(3,629)=52 exch2_opposingSend(3,629)=4 exch2_pij(1,3,629)=1 exch2_pij(2,3,629)=0 exch2_pij(3,3,629)=0 exch2_pij(4,3,629)=1 exch2_oi(3,629)=0 exch2_oj(3,629)=0 exch2_neighbourId(4,629)=628 exch2_iLo(4,629)=0 exch2_iHi(4,629)=0 exch2_jLo(4,629)=0 exch2_jHi(4,629)=52 exch2_opposingSend(4,629)=3 exch2_pij(1,4,629)=1 exch2_pij(2,4,629)=0 exch2_pij(3,4,629)=0 exch2_pij(4,4,629)=1 exch2_oi(4,629)=0 exch2_oj(4,629)=0 RETURN END SUBROUTINE W2_E2SETUP_630 C Topology for tile 630 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(630)=34 exch2_tNy(630)=51 exch2_tBasex(630)=476 exch2_tBasey(630)=51 exch2_txGlobalo(630)=2517 exch2_tyGlobalo(630)=52 exch2_isWedge(630)=0 exch2_isNedge(630)=0 exch2_isEedge(630)=1 exch2_isSedge(630)=0 exch2_myFace(630)=5 exch2_mydNx(630)=510 exch2_mydNy(630)=510 exch2_nNeighbours(630)=4 exch2_neighbourId(1,630)=645 exch2_iLo(1,630)=0 exch2_iHi(1,630)=35 exch2_jLo(1,630)=52 exch2_jHi(1,630)=52 exch2_opposingSend(1,630)=2 exch2_pij(1,1,630)=1 exch2_pij(2,1,630)=0 exch2_pij(3,1,630)=0 exch2_pij(4,1,630)=1 exch2_oi(1,630)=0 exch2_oj(1,630)=0 exch2_neighbourId(2,630)=615 exch2_iLo(2,630)=0 exch2_iHi(2,630)=35 exch2_jLo(2,630)=0 exch2_jHi(2,630)=0 exch2_opposingSend(2,630)=1 exch2_pij(1,2,630)=1 exch2_pij(2,2,630)=0 exch2_pij(3,2,630)=0 exch2_pij(4,2,630)=1 exch2_oi(2,630)=0 exch2_oj(2,630)=0 exch2_neighbourId(3,630)=766 exch2_iLo(3,630)=35 exch2_iHi(3,630)=35 exch2_jLo(3,630)=0 exch2_jHi(3,630)=52 exch2_opposingSend(3,630)=4 exch2_pij(1,3,630)=1 exch2_pij(2,3,630)=0 exch2_pij(3,3,630)=0 exch2_pij(4,3,630)=1 exch2_oi(3,630)=510 exch2_oj(3,630)=0 exch2_neighbourId(4,630)=629 exch2_iLo(4,630)=0 exch2_iHi(4,630)=0 exch2_jLo(4,630)=0 exch2_jHi(4,630)=52 exch2_opposingSend(4,630)=3 exch2_pij(1,4,630)=1 exch2_pij(2,4,630)=0 exch2_pij(3,4,630)=0 exch2_pij(4,4,630)=1 exch2_oi(4,630)=0 exch2_oj(4,630)=0 RETURN END SUBROUTINE W2_E2SETUP_631 C Topology for tile 631 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(631)=34 exch2_tNy(631)=51 exch2_tBasex(631)=0 exch2_tBasey(631)=102 exch2_txGlobalo(631)=2041 exch2_tyGlobalo(631)=103 exch2_isWedge(631)=1 exch2_isNedge(631)=0 exch2_isEedge(631)=0 exch2_isSedge(631)=0 exch2_myFace(631)=5 exch2_mydNx(631)=510 exch2_mydNy(631)=510 exch2_nNeighbours(631)=5 exch2_neighbourId(1,631)=646 exch2_iLo(1,631)=0 exch2_iHi(1,631)=35 exch2_jLo(1,631)=52 exch2_jHi(1,631)=52 exch2_opposingSend(1,631)=2 exch2_pij(1,1,631)=1 exch2_pij(2,1,631)=0 exch2_pij(3,1,631)=0 exch2_pij(4,1,631)=1 exch2_oi(1,631)=0 exch2_oj(1,631)=0 exch2_neighbourId(2,631)=616 exch2_iLo(2,631)=0 exch2_iHi(2,631)=35 exch2_jLo(2,631)=0 exch2_jHi(2,631)=0 exch2_opposingSend(2,631)=1 exch2_pij(1,2,631)=1 exch2_pij(2,2,631)=0 exch2_pij(3,2,631)=0 exch2_pij(4,2,631)=1 exch2_oi(2,631)=0 exch2_oj(2,631)=0 exch2_neighbourId(3,631)=632 exch2_iLo(3,631)=35 exch2_iHi(3,631)=35 exch2_jLo(3,631)=0 exch2_jHi(3,631)=52 exch2_opposingSend(3,631)=4 exch2_pij(1,3,631)=1 exch2_pij(2,3,631)=0 exch2_pij(3,3,631)=0 exch2_pij(4,3,631)=1 exch2_oi(3,631)=0 exch2_oj(3,631)=0 exch2_neighbourId(4,631)=446 exch2_iLo(4,631)=0 exch2_iHi(4,631)=0 exch2_jLo(4,631)=34 exch2_jHi(4,631)=52 exch2_opposingSend(4,631)=1 exch2_pij(1,4,631)=0 exch2_pij(2,4,631)=1 exch2_pij(3,4,631)=-1 exch2_pij(4,4,631)=0 exch2_oi(4,631)=-510 exch2_oj(4,631)=511 exch2_neighbourId(5,631)=447 exch2_iLo(5,631)=0 exch2_iHi(5,631)=0 exch2_jLo(5,631)=0 exch2_jHi(5,631)=35 exch2_opposingSend(5,631)=1 exch2_pij(1,5,631)=0 exch2_pij(2,5,631)=1 exch2_pij(3,5,631)=-1 exch2_pij(4,5,631)=0 exch2_oi(5,631)=-510 exch2_oj(5,631)=511 RETURN END SUBROUTINE W2_E2SETUP_632 C Topology for tile 632 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(632)=34 exch2_tNy(632)=51 exch2_tBasex(632)=34 exch2_tBasey(632)=102 exch2_txGlobalo(632)=2075 exch2_tyGlobalo(632)=103 exch2_isWedge(632)=0 exch2_isNedge(632)=0 exch2_isEedge(632)=0 exch2_isSedge(632)=0 exch2_myFace(632)=5 exch2_mydNx(632)=510 exch2_mydNy(632)=510 exch2_nNeighbours(632)=4 exch2_neighbourId(1,632)=647 exch2_iLo(1,632)=0 exch2_iHi(1,632)=35 exch2_jLo(1,632)=52 exch2_jHi(1,632)=52 exch2_opposingSend(1,632)=2 exch2_pij(1,1,632)=1 exch2_pij(2,1,632)=0 exch2_pij(3,1,632)=0 exch2_pij(4,1,632)=1 exch2_oi(1,632)=0 exch2_oj(1,632)=0 exch2_neighbourId(2,632)=617 exch2_iLo(2,632)=0 exch2_iHi(2,632)=35 exch2_jLo(2,632)=0 exch2_jHi(2,632)=0 exch2_opposingSend(2,632)=1 exch2_pij(1,2,632)=1 exch2_pij(2,2,632)=0 exch2_pij(3,2,632)=0 exch2_pij(4,2,632)=1 exch2_oi(2,632)=0 exch2_oj(2,632)=0 exch2_neighbourId(3,632)=633 exch2_iLo(3,632)=35 exch2_iHi(3,632)=35 exch2_jLo(3,632)=0 exch2_jHi(3,632)=52 exch2_opposingSend(3,632)=4 exch2_pij(1,3,632)=1 exch2_pij(2,3,632)=0 exch2_pij(3,3,632)=0 exch2_pij(4,3,632)=1 exch2_oi(3,632)=0 exch2_oj(3,632)=0 exch2_neighbourId(4,632)=631 exch2_iLo(4,632)=0 exch2_iHi(4,632)=0 exch2_jLo(4,632)=0 exch2_jHi(4,632)=52 exch2_opposingSend(4,632)=3 exch2_pij(1,4,632)=1 exch2_pij(2,4,632)=0 exch2_pij(3,4,632)=0 exch2_pij(4,4,632)=1 exch2_oi(4,632)=0 exch2_oj(4,632)=0 RETURN END SUBROUTINE W2_E2SETUP_633 C Topology for tile 633 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(633)=34 exch2_tNy(633)=51 exch2_tBasex(633)=68 exch2_tBasey(633)=102 exch2_txGlobalo(633)=2109 exch2_tyGlobalo(633)=103 exch2_isWedge(633)=0 exch2_isNedge(633)=0 exch2_isEedge(633)=0 exch2_isSedge(633)=0 exch2_myFace(633)=5 exch2_mydNx(633)=510 exch2_mydNy(633)=510 exch2_nNeighbours(633)=4 exch2_neighbourId(1,633)=648 exch2_iLo(1,633)=0 exch2_iHi(1,633)=35 exch2_jLo(1,633)=52 exch2_jHi(1,633)=52 exch2_opposingSend(1,633)=2 exch2_pij(1,1,633)=1 exch2_pij(2,1,633)=0 exch2_pij(3,1,633)=0 exch2_pij(4,1,633)=1 exch2_oi(1,633)=0 exch2_oj(1,633)=0 exch2_neighbourId(2,633)=618 exch2_iLo(2,633)=0 exch2_iHi(2,633)=35 exch2_jLo(2,633)=0 exch2_jHi(2,633)=0 exch2_opposingSend(2,633)=1 exch2_pij(1,2,633)=1 exch2_pij(2,2,633)=0 exch2_pij(3,2,633)=0 exch2_pij(4,2,633)=1 exch2_oi(2,633)=0 exch2_oj(2,633)=0 exch2_neighbourId(3,633)=634 exch2_iLo(3,633)=35 exch2_iHi(3,633)=35 exch2_jLo(3,633)=0 exch2_jHi(3,633)=52 exch2_opposingSend(3,633)=4 exch2_pij(1,3,633)=1 exch2_pij(2,3,633)=0 exch2_pij(3,3,633)=0 exch2_pij(4,3,633)=1 exch2_oi(3,633)=0 exch2_oj(3,633)=0 exch2_neighbourId(4,633)=632 exch2_iLo(4,633)=0 exch2_iHi(4,633)=0 exch2_jLo(4,633)=0 exch2_jHi(4,633)=52 exch2_opposingSend(4,633)=3 exch2_pij(1,4,633)=1 exch2_pij(2,4,633)=0 exch2_pij(3,4,633)=0 exch2_pij(4,4,633)=1 exch2_oi(4,633)=0 exch2_oj(4,633)=0 RETURN END SUBROUTINE W2_E2SETUP_634 C Topology for tile 634 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(634)=34 exch2_tNy(634)=51 exch2_tBasex(634)=102 exch2_tBasey(634)=102 exch2_txGlobalo(634)=2143 exch2_tyGlobalo(634)=103 exch2_isWedge(634)=0 exch2_isNedge(634)=0 exch2_isEedge(634)=0 exch2_isSedge(634)=0 exch2_myFace(634)=5 exch2_mydNx(634)=510 exch2_mydNy(634)=510 exch2_nNeighbours(634)=4 exch2_neighbourId(1,634)=649 exch2_iLo(1,634)=0 exch2_iHi(1,634)=35 exch2_jLo(1,634)=52 exch2_jHi(1,634)=52 exch2_opposingSend(1,634)=2 exch2_pij(1,1,634)=1 exch2_pij(2,1,634)=0 exch2_pij(3,1,634)=0 exch2_pij(4,1,634)=1 exch2_oi(1,634)=0 exch2_oj(1,634)=0 exch2_neighbourId(2,634)=619 exch2_iLo(2,634)=0 exch2_iHi(2,634)=35 exch2_jLo(2,634)=0 exch2_jHi(2,634)=0 exch2_opposingSend(2,634)=1 exch2_pij(1,2,634)=1 exch2_pij(2,2,634)=0 exch2_pij(3,2,634)=0 exch2_pij(4,2,634)=1 exch2_oi(2,634)=0 exch2_oj(2,634)=0 exch2_neighbourId(3,634)=635 exch2_iLo(3,634)=35 exch2_iHi(3,634)=35 exch2_jLo(3,634)=0 exch2_jHi(3,634)=52 exch2_opposingSend(3,634)=4 exch2_pij(1,3,634)=1 exch2_pij(2,3,634)=0 exch2_pij(3,3,634)=0 exch2_pij(4,3,634)=1 exch2_oi(3,634)=0 exch2_oj(3,634)=0 exch2_neighbourId(4,634)=633 exch2_iLo(4,634)=0 exch2_iHi(4,634)=0 exch2_jLo(4,634)=0 exch2_jHi(4,634)=52 exch2_opposingSend(4,634)=3 exch2_pij(1,4,634)=1 exch2_pij(2,4,634)=0 exch2_pij(3,4,634)=0 exch2_pij(4,4,634)=1 exch2_oi(4,634)=0 exch2_oj(4,634)=0 RETURN END SUBROUTINE W2_E2SETUP_635 C Topology for tile 635 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(635)=34 exch2_tNy(635)=51 exch2_tBasex(635)=136 exch2_tBasey(635)=102 exch2_txGlobalo(635)=2177 exch2_tyGlobalo(635)=103 exch2_isWedge(635)=0 exch2_isNedge(635)=0 exch2_isEedge(635)=0 exch2_isSedge(635)=0 exch2_myFace(635)=5 exch2_mydNx(635)=510 exch2_mydNy(635)=510 exch2_nNeighbours(635)=4 exch2_neighbourId(1,635)=650 exch2_iLo(1,635)=0 exch2_iHi(1,635)=35 exch2_jLo(1,635)=52 exch2_jHi(1,635)=52 exch2_opposingSend(1,635)=2 exch2_pij(1,1,635)=1 exch2_pij(2,1,635)=0 exch2_pij(3,1,635)=0 exch2_pij(4,1,635)=1 exch2_oi(1,635)=0 exch2_oj(1,635)=0 exch2_neighbourId(2,635)=620 exch2_iLo(2,635)=0 exch2_iHi(2,635)=35 exch2_jLo(2,635)=0 exch2_jHi(2,635)=0 exch2_opposingSend(2,635)=1 exch2_pij(1,2,635)=1 exch2_pij(2,2,635)=0 exch2_pij(3,2,635)=0 exch2_pij(4,2,635)=1 exch2_oi(2,635)=0 exch2_oj(2,635)=0 exch2_neighbourId(3,635)=636 exch2_iLo(3,635)=35 exch2_iHi(3,635)=35 exch2_jLo(3,635)=0 exch2_jHi(3,635)=52 exch2_opposingSend(3,635)=4 exch2_pij(1,3,635)=1 exch2_pij(2,3,635)=0 exch2_pij(3,3,635)=0 exch2_pij(4,3,635)=1 exch2_oi(3,635)=0 exch2_oj(3,635)=0 exch2_neighbourId(4,635)=634 exch2_iLo(4,635)=0 exch2_iHi(4,635)=0 exch2_jLo(4,635)=0 exch2_jHi(4,635)=52 exch2_opposingSend(4,635)=3 exch2_pij(1,4,635)=1 exch2_pij(2,4,635)=0 exch2_pij(3,4,635)=0 exch2_pij(4,4,635)=1 exch2_oi(4,635)=0 exch2_oj(4,635)=0 RETURN END SUBROUTINE W2_E2SETUP_636 C Topology for tile 636 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(636)=34 exch2_tNy(636)=51 exch2_tBasex(636)=170 exch2_tBasey(636)=102 exch2_txGlobalo(636)=2211 exch2_tyGlobalo(636)=103 exch2_isWedge(636)=0 exch2_isNedge(636)=0 exch2_isEedge(636)=0 exch2_isSedge(636)=0 exch2_myFace(636)=5 exch2_mydNx(636)=510 exch2_mydNy(636)=510 exch2_nNeighbours(636)=4 exch2_neighbourId(1,636)=651 exch2_iLo(1,636)=0 exch2_iHi(1,636)=35 exch2_jLo(1,636)=52 exch2_jHi(1,636)=52 exch2_opposingSend(1,636)=2 exch2_pij(1,1,636)=1 exch2_pij(2,1,636)=0 exch2_pij(3,1,636)=0 exch2_pij(4,1,636)=1 exch2_oi(1,636)=0 exch2_oj(1,636)=0 exch2_neighbourId(2,636)=621 exch2_iLo(2,636)=0 exch2_iHi(2,636)=35 exch2_jLo(2,636)=0 exch2_jHi(2,636)=0 exch2_opposingSend(2,636)=1 exch2_pij(1,2,636)=1 exch2_pij(2,2,636)=0 exch2_pij(3,2,636)=0 exch2_pij(4,2,636)=1 exch2_oi(2,636)=0 exch2_oj(2,636)=0 exch2_neighbourId(3,636)=637 exch2_iLo(3,636)=35 exch2_iHi(3,636)=35 exch2_jLo(3,636)=0 exch2_jHi(3,636)=52 exch2_opposingSend(3,636)=4 exch2_pij(1,3,636)=1 exch2_pij(2,3,636)=0 exch2_pij(3,3,636)=0 exch2_pij(4,3,636)=1 exch2_oi(3,636)=0 exch2_oj(3,636)=0 exch2_neighbourId(4,636)=635 exch2_iLo(4,636)=0 exch2_iHi(4,636)=0 exch2_jLo(4,636)=0 exch2_jHi(4,636)=52 exch2_opposingSend(4,636)=3 exch2_pij(1,4,636)=1 exch2_pij(2,4,636)=0 exch2_pij(3,4,636)=0 exch2_pij(4,4,636)=1 exch2_oi(4,636)=0 exch2_oj(4,636)=0 RETURN END SUBROUTINE W2_E2SETUP_637 C Topology for tile 637 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(637)=34 exch2_tNy(637)=51 exch2_tBasex(637)=204 exch2_tBasey(637)=102 exch2_txGlobalo(637)=2245 exch2_tyGlobalo(637)=103 exch2_isWedge(637)=0 exch2_isNedge(637)=0 exch2_isEedge(637)=0 exch2_isSedge(637)=0 exch2_myFace(637)=5 exch2_mydNx(637)=510 exch2_mydNy(637)=510 exch2_nNeighbours(637)=4 exch2_neighbourId(1,637)=652 exch2_iLo(1,637)=0 exch2_iHi(1,637)=35 exch2_jLo(1,637)=52 exch2_jHi(1,637)=52 exch2_opposingSend(1,637)=2 exch2_pij(1,1,637)=1 exch2_pij(2,1,637)=0 exch2_pij(3,1,637)=0 exch2_pij(4,1,637)=1 exch2_oi(1,637)=0 exch2_oj(1,637)=0 exch2_neighbourId(2,637)=622 exch2_iLo(2,637)=0 exch2_iHi(2,637)=35 exch2_jLo(2,637)=0 exch2_jHi(2,637)=0 exch2_opposingSend(2,637)=1 exch2_pij(1,2,637)=1 exch2_pij(2,2,637)=0 exch2_pij(3,2,637)=0 exch2_pij(4,2,637)=1 exch2_oi(2,637)=0 exch2_oj(2,637)=0 exch2_neighbourId(3,637)=638 exch2_iLo(3,637)=35 exch2_iHi(3,637)=35 exch2_jLo(3,637)=0 exch2_jHi(3,637)=52 exch2_opposingSend(3,637)=4 exch2_pij(1,3,637)=1 exch2_pij(2,3,637)=0 exch2_pij(3,3,637)=0 exch2_pij(4,3,637)=1 exch2_oi(3,637)=0 exch2_oj(3,637)=0 exch2_neighbourId(4,637)=636 exch2_iLo(4,637)=0 exch2_iHi(4,637)=0 exch2_jLo(4,637)=0 exch2_jHi(4,637)=52 exch2_opposingSend(4,637)=3 exch2_pij(1,4,637)=1 exch2_pij(2,4,637)=0 exch2_pij(3,4,637)=0 exch2_pij(4,4,637)=1 exch2_oi(4,637)=0 exch2_oj(4,637)=0 RETURN END SUBROUTINE W2_E2SETUP_638 C Topology for tile 638 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(638)=34 exch2_tNy(638)=51 exch2_tBasex(638)=238 exch2_tBasey(638)=102 exch2_txGlobalo(638)=2279 exch2_tyGlobalo(638)=103 exch2_isWedge(638)=0 exch2_isNedge(638)=0 exch2_isEedge(638)=0 exch2_isSedge(638)=0 exch2_myFace(638)=5 exch2_mydNx(638)=510 exch2_mydNy(638)=510 exch2_nNeighbours(638)=4 exch2_neighbourId(1,638)=653 exch2_iLo(1,638)=0 exch2_iHi(1,638)=35 exch2_jLo(1,638)=52 exch2_jHi(1,638)=52 exch2_opposingSend(1,638)=2 exch2_pij(1,1,638)=1 exch2_pij(2,1,638)=0 exch2_pij(3,1,638)=0 exch2_pij(4,1,638)=1 exch2_oi(1,638)=0 exch2_oj(1,638)=0 exch2_neighbourId(2,638)=623 exch2_iLo(2,638)=0 exch2_iHi(2,638)=35 exch2_jLo(2,638)=0 exch2_jHi(2,638)=0 exch2_opposingSend(2,638)=1 exch2_pij(1,2,638)=1 exch2_pij(2,2,638)=0 exch2_pij(3,2,638)=0 exch2_pij(4,2,638)=1 exch2_oi(2,638)=0 exch2_oj(2,638)=0 exch2_neighbourId(3,638)=639 exch2_iLo(3,638)=35 exch2_iHi(3,638)=35 exch2_jLo(3,638)=0 exch2_jHi(3,638)=52 exch2_opposingSend(3,638)=4 exch2_pij(1,3,638)=1 exch2_pij(2,3,638)=0 exch2_pij(3,3,638)=0 exch2_pij(4,3,638)=1 exch2_oi(3,638)=0 exch2_oj(3,638)=0 exch2_neighbourId(4,638)=637 exch2_iLo(4,638)=0 exch2_iHi(4,638)=0 exch2_jLo(4,638)=0 exch2_jHi(4,638)=52 exch2_opposingSend(4,638)=3 exch2_pij(1,4,638)=1 exch2_pij(2,4,638)=0 exch2_pij(3,4,638)=0 exch2_pij(4,4,638)=1 exch2_oi(4,638)=0 exch2_oj(4,638)=0 RETURN END SUBROUTINE W2_E2SETUP_639 C Topology for tile 639 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(639)=34 exch2_tNy(639)=51 exch2_tBasex(639)=272 exch2_tBasey(639)=102 exch2_txGlobalo(639)=2313 exch2_tyGlobalo(639)=103 exch2_isWedge(639)=0 exch2_isNedge(639)=0 exch2_isEedge(639)=0 exch2_isSedge(639)=0 exch2_myFace(639)=5 exch2_mydNx(639)=510 exch2_mydNy(639)=510 exch2_nNeighbours(639)=4 exch2_neighbourId(1,639)=654 exch2_iLo(1,639)=0 exch2_iHi(1,639)=35 exch2_jLo(1,639)=52 exch2_jHi(1,639)=52 exch2_opposingSend(1,639)=2 exch2_pij(1,1,639)=1 exch2_pij(2,1,639)=0 exch2_pij(3,1,639)=0 exch2_pij(4,1,639)=1 exch2_oi(1,639)=0 exch2_oj(1,639)=0 exch2_neighbourId(2,639)=624 exch2_iLo(2,639)=0 exch2_iHi(2,639)=35 exch2_jLo(2,639)=0 exch2_jHi(2,639)=0 exch2_opposingSend(2,639)=1 exch2_pij(1,2,639)=1 exch2_pij(2,2,639)=0 exch2_pij(3,2,639)=0 exch2_pij(4,2,639)=1 exch2_oi(2,639)=0 exch2_oj(2,639)=0 exch2_neighbourId(3,639)=640 exch2_iLo(3,639)=35 exch2_iHi(3,639)=35 exch2_jLo(3,639)=0 exch2_jHi(3,639)=52 exch2_opposingSend(3,639)=4 exch2_pij(1,3,639)=1 exch2_pij(2,3,639)=0 exch2_pij(3,3,639)=0 exch2_pij(4,3,639)=1 exch2_oi(3,639)=0 exch2_oj(3,639)=0 exch2_neighbourId(4,639)=638 exch2_iLo(4,639)=0 exch2_iHi(4,639)=0 exch2_jLo(4,639)=0 exch2_jHi(4,639)=52 exch2_opposingSend(4,639)=3 exch2_pij(1,4,639)=1 exch2_pij(2,4,639)=0 exch2_pij(3,4,639)=0 exch2_pij(4,4,639)=1 exch2_oi(4,639)=0 exch2_oj(4,639)=0 RETURN END SUBROUTINE W2_E2SETUP_640 C Topology for tile 640 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(640)=34 exch2_tNy(640)=51 exch2_tBasex(640)=306 exch2_tBasey(640)=102 exch2_txGlobalo(640)=2347 exch2_tyGlobalo(640)=103 exch2_isWedge(640)=0 exch2_isNedge(640)=0 exch2_isEedge(640)=0 exch2_isSedge(640)=0 exch2_myFace(640)=5 exch2_mydNx(640)=510 exch2_mydNy(640)=510 exch2_nNeighbours(640)=4 exch2_neighbourId(1,640)=655 exch2_iLo(1,640)=0 exch2_iHi(1,640)=35 exch2_jLo(1,640)=52 exch2_jHi(1,640)=52 exch2_opposingSend(1,640)=2 exch2_pij(1,1,640)=1 exch2_pij(2,1,640)=0 exch2_pij(3,1,640)=0 exch2_pij(4,1,640)=1 exch2_oi(1,640)=0 exch2_oj(1,640)=0 exch2_neighbourId(2,640)=625 exch2_iLo(2,640)=0 exch2_iHi(2,640)=35 exch2_jLo(2,640)=0 exch2_jHi(2,640)=0 exch2_opposingSend(2,640)=1 exch2_pij(1,2,640)=1 exch2_pij(2,2,640)=0 exch2_pij(3,2,640)=0 exch2_pij(4,2,640)=1 exch2_oi(2,640)=0 exch2_oj(2,640)=0 exch2_neighbourId(3,640)=641 exch2_iLo(3,640)=35 exch2_iHi(3,640)=35 exch2_jLo(3,640)=0 exch2_jHi(3,640)=52 exch2_opposingSend(3,640)=4 exch2_pij(1,3,640)=1 exch2_pij(2,3,640)=0 exch2_pij(3,3,640)=0 exch2_pij(4,3,640)=1 exch2_oi(3,640)=0 exch2_oj(3,640)=0 exch2_neighbourId(4,640)=639 exch2_iLo(4,640)=0 exch2_iHi(4,640)=0 exch2_jLo(4,640)=0 exch2_jHi(4,640)=52 exch2_opposingSend(4,640)=3 exch2_pij(1,4,640)=1 exch2_pij(2,4,640)=0 exch2_pij(3,4,640)=0 exch2_pij(4,4,640)=1 exch2_oi(4,640)=0 exch2_oj(4,640)=0 RETURN END SUBROUTINE W2_E2SETUP_641 C Topology for tile 641 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(641)=34 exch2_tNy(641)=51 exch2_tBasex(641)=340 exch2_tBasey(641)=102 exch2_txGlobalo(641)=2381 exch2_tyGlobalo(641)=103 exch2_isWedge(641)=0 exch2_isNedge(641)=0 exch2_isEedge(641)=0 exch2_isSedge(641)=0 exch2_myFace(641)=5 exch2_mydNx(641)=510 exch2_mydNy(641)=510 exch2_nNeighbours(641)=4 exch2_neighbourId(1,641)=656 exch2_iLo(1,641)=0 exch2_iHi(1,641)=35 exch2_jLo(1,641)=52 exch2_jHi(1,641)=52 exch2_opposingSend(1,641)=2 exch2_pij(1,1,641)=1 exch2_pij(2,1,641)=0 exch2_pij(3,1,641)=0 exch2_pij(4,1,641)=1 exch2_oi(1,641)=0 exch2_oj(1,641)=0 exch2_neighbourId(2,641)=626 exch2_iLo(2,641)=0 exch2_iHi(2,641)=35 exch2_jLo(2,641)=0 exch2_jHi(2,641)=0 exch2_opposingSend(2,641)=1 exch2_pij(1,2,641)=1 exch2_pij(2,2,641)=0 exch2_pij(3,2,641)=0 exch2_pij(4,2,641)=1 exch2_oi(2,641)=0 exch2_oj(2,641)=0 exch2_neighbourId(3,641)=642 exch2_iLo(3,641)=35 exch2_iHi(3,641)=35 exch2_jLo(3,641)=0 exch2_jHi(3,641)=52 exch2_opposingSend(3,641)=4 exch2_pij(1,3,641)=1 exch2_pij(2,3,641)=0 exch2_pij(3,3,641)=0 exch2_pij(4,3,641)=1 exch2_oi(3,641)=0 exch2_oj(3,641)=0 exch2_neighbourId(4,641)=640 exch2_iLo(4,641)=0 exch2_iHi(4,641)=0 exch2_jLo(4,641)=0 exch2_jHi(4,641)=52 exch2_opposingSend(4,641)=3 exch2_pij(1,4,641)=1 exch2_pij(2,4,641)=0 exch2_pij(3,4,641)=0 exch2_pij(4,4,641)=1 exch2_oi(4,641)=0 exch2_oj(4,641)=0 RETURN END SUBROUTINE W2_E2SETUP_642 C Topology for tile 642 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(642)=34 exch2_tNy(642)=51 exch2_tBasex(642)=374 exch2_tBasey(642)=102 exch2_txGlobalo(642)=2415 exch2_tyGlobalo(642)=103 exch2_isWedge(642)=0 exch2_isNedge(642)=0 exch2_isEedge(642)=0 exch2_isSedge(642)=0 exch2_myFace(642)=5 exch2_mydNx(642)=510 exch2_mydNy(642)=510 exch2_nNeighbours(642)=4 exch2_neighbourId(1,642)=657 exch2_iLo(1,642)=0 exch2_iHi(1,642)=35 exch2_jLo(1,642)=52 exch2_jHi(1,642)=52 exch2_opposingSend(1,642)=2 exch2_pij(1,1,642)=1 exch2_pij(2,1,642)=0 exch2_pij(3,1,642)=0 exch2_pij(4,1,642)=1 exch2_oi(1,642)=0 exch2_oj(1,642)=0 exch2_neighbourId(2,642)=627 exch2_iLo(2,642)=0 exch2_iHi(2,642)=35 exch2_jLo(2,642)=0 exch2_jHi(2,642)=0 exch2_opposingSend(2,642)=1 exch2_pij(1,2,642)=1 exch2_pij(2,2,642)=0 exch2_pij(3,2,642)=0 exch2_pij(4,2,642)=1 exch2_oi(2,642)=0 exch2_oj(2,642)=0 exch2_neighbourId(3,642)=643 exch2_iLo(3,642)=35 exch2_iHi(3,642)=35 exch2_jLo(3,642)=0 exch2_jHi(3,642)=52 exch2_opposingSend(3,642)=4 exch2_pij(1,3,642)=1 exch2_pij(2,3,642)=0 exch2_pij(3,3,642)=0 exch2_pij(4,3,642)=1 exch2_oi(3,642)=0 exch2_oj(3,642)=0 exch2_neighbourId(4,642)=641 exch2_iLo(4,642)=0 exch2_iHi(4,642)=0 exch2_jLo(4,642)=0 exch2_jHi(4,642)=52 exch2_opposingSend(4,642)=3 exch2_pij(1,4,642)=1 exch2_pij(2,4,642)=0 exch2_pij(3,4,642)=0 exch2_pij(4,4,642)=1 exch2_oi(4,642)=0 exch2_oj(4,642)=0 RETURN END SUBROUTINE W2_E2SETUP_643 C Topology for tile 643 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(643)=34 exch2_tNy(643)=51 exch2_tBasex(643)=408 exch2_tBasey(643)=102 exch2_txGlobalo(643)=2449 exch2_tyGlobalo(643)=103 exch2_isWedge(643)=0 exch2_isNedge(643)=0 exch2_isEedge(643)=0 exch2_isSedge(643)=0 exch2_myFace(643)=5 exch2_mydNx(643)=510 exch2_mydNy(643)=510 exch2_nNeighbours(643)=4 exch2_neighbourId(1,643)=658 exch2_iLo(1,643)=0 exch2_iHi(1,643)=35 exch2_jLo(1,643)=52 exch2_jHi(1,643)=52 exch2_opposingSend(1,643)=2 exch2_pij(1,1,643)=1 exch2_pij(2,1,643)=0 exch2_pij(3,1,643)=0 exch2_pij(4,1,643)=1 exch2_oi(1,643)=0 exch2_oj(1,643)=0 exch2_neighbourId(2,643)=628 exch2_iLo(2,643)=0 exch2_iHi(2,643)=35 exch2_jLo(2,643)=0 exch2_jHi(2,643)=0 exch2_opposingSend(2,643)=1 exch2_pij(1,2,643)=1 exch2_pij(2,2,643)=0 exch2_pij(3,2,643)=0 exch2_pij(4,2,643)=1 exch2_oi(2,643)=0 exch2_oj(2,643)=0 exch2_neighbourId(3,643)=644 exch2_iLo(3,643)=35 exch2_iHi(3,643)=35 exch2_jLo(3,643)=0 exch2_jHi(3,643)=52 exch2_opposingSend(3,643)=4 exch2_pij(1,3,643)=1 exch2_pij(2,3,643)=0 exch2_pij(3,3,643)=0 exch2_pij(4,3,643)=1 exch2_oi(3,643)=0 exch2_oj(3,643)=0 exch2_neighbourId(4,643)=642 exch2_iLo(4,643)=0 exch2_iHi(4,643)=0 exch2_jLo(4,643)=0 exch2_jHi(4,643)=52 exch2_opposingSend(4,643)=3 exch2_pij(1,4,643)=1 exch2_pij(2,4,643)=0 exch2_pij(3,4,643)=0 exch2_pij(4,4,643)=1 exch2_oi(4,643)=0 exch2_oj(4,643)=0 RETURN END SUBROUTINE W2_E2SETUP_644 C Topology for tile 644 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(644)=34 exch2_tNy(644)=51 exch2_tBasex(644)=442 exch2_tBasey(644)=102 exch2_txGlobalo(644)=2483 exch2_tyGlobalo(644)=103 exch2_isWedge(644)=0 exch2_isNedge(644)=0 exch2_isEedge(644)=0 exch2_isSedge(644)=0 exch2_myFace(644)=5 exch2_mydNx(644)=510 exch2_mydNy(644)=510 exch2_nNeighbours(644)=4 exch2_neighbourId(1,644)=659 exch2_iLo(1,644)=0 exch2_iHi(1,644)=35 exch2_jLo(1,644)=52 exch2_jHi(1,644)=52 exch2_opposingSend(1,644)=2 exch2_pij(1,1,644)=1 exch2_pij(2,1,644)=0 exch2_pij(3,1,644)=0 exch2_pij(4,1,644)=1 exch2_oi(1,644)=0 exch2_oj(1,644)=0 exch2_neighbourId(2,644)=629 exch2_iLo(2,644)=0 exch2_iHi(2,644)=35 exch2_jLo(2,644)=0 exch2_jHi(2,644)=0 exch2_opposingSend(2,644)=1 exch2_pij(1,2,644)=1 exch2_pij(2,2,644)=0 exch2_pij(3,2,644)=0 exch2_pij(4,2,644)=1 exch2_oi(2,644)=0 exch2_oj(2,644)=0 exch2_neighbourId(3,644)=645 exch2_iLo(3,644)=35 exch2_iHi(3,644)=35 exch2_jLo(3,644)=0 exch2_jHi(3,644)=52 exch2_opposingSend(3,644)=4 exch2_pij(1,3,644)=1 exch2_pij(2,3,644)=0 exch2_pij(3,3,644)=0 exch2_pij(4,3,644)=1 exch2_oi(3,644)=0 exch2_oj(3,644)=0 exch2_neighbourId(4,644)=643 exch2_iLo(4,644)=0 exch2_iHi(4,644)=0 exch2_jLo(4,644)=0 exch2_jHi(4,644)=52 exch2_opposingSend(4,644)=3 exch2_pij(1,4,644)=1 exch2_pij(2,4,644)=0 exch2_pij(3,4,644)=0 exch2_pij(4,4,644)=1 exch2_oi(4,644)=0 exch2_oj(4,644)=0 RETURN END SUBROUTINE W2_E2SETUP_645 C Topology for tile 645 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(645)=34 exch2_tNy(645)=51 exch2_tBasex(645)=476 exch2_tBasey(645)=102 exch2_txGlobalo(645)=2517 exch2_tyGlobalo(645)=103 exch2_isWedge(645)=0 exch2_isNedge(645)=0 exch2_isEedge(645)=1 exch2_isSedge(645)=0 exch2_myFace(645)=5 exch2_mydNx(645)=510 exch2_mydNy(645)=510 exch2_nNeighbours(645)=4 exch2_neighbourId(1,645)=660 exch2_iLo(1,645)=0 exch2_iHi(1,645)=35 exch2_jLo(1,645)=52 exch2_jHi(1,645)=52 exch2_opposingSend(1,645)=2 exch2_pij(1,1,645)=1 exch2_pij(2,1,645)=0 exch2_pij(3,1,645)=0 exch2_pij(4,1,645)=1 exch2_oi(1,645)=0 exch2_oj(1,645)=0 exch2_neighbourId(2,645)=630 exch2_iLo(2,645)=0 exch2_iHi(2,645)=35 exch2_jLo(2,645)=0 exch2_jHi(2,645)=0 exch2_opposingSend(2,645)=1 exch2_pij(1,2,645)=1 exch2_pij(2,2,645)=0 exch2_pij(3,2,645)=0 exch2_pij(4,2,645)=1 exch2_oi(2,645)=0 exch2_oj(2,645)=0 exch2_neighbourId(3,645)=781 exch2_iLo(3,645)=35 exch2_iHi(3,645)=35 exch2_jLo(3,645)=0 exch2_jHi(3,645)=52 exch2_opposingSend(3,645)=4 exch2_pij(1,3,645)=1 exch2_pij(2,3,645)=0 exch2_pij(3,3,645)=0 exch2_pij(4,3,645)=1 exch2_oi(3,645)=510 exch2_oj(3,645)=0 exch2_neighbourId(4,645)=644 exch2_iLo(4,645)=0 exch2_iHi(4,645)=0 exch2_jLo(4,645)=0 exch2_jHi(4,645)=52 exch2_opposingSend(4,645)=3 exch2_pij(1,4,645)=1 exch2_pij(2,4,645)=0 exch2_pij(3,4,645)=0 exch2_pij(4,4,645)=1 exch2_oi(4,645)=0 exch2_oj(4,645)=0 RETURN END SUBROUTINE W2_E2SETUP_646 C Topology for tile 646 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(646)=34 exch2_tNy(646)=51 exch2_tBasex(646)=0 exch2_tBasey(646)=153 exch2_txGlobalo(646)=2041 exch2_tyGlobalo(646)=154 exch2_isWedge(646)=1 exch2_isNedge(646)=0 exch2_isEedge(646)=0 exch2_isSedge(646)=0 exch2_myFace(646)=5 exch2_mydNx(646)=510 exch2_mydNy(646)=510 exch2_nNeighbours(646)=5 exch2_neighbourId(1,646)=661 exch2_iLo(1,646)=0 exch2_iHi(1,646)=35 exch2_jLo(1,646)=52 exch2_jHi(1,646)=52 exch2_opposingSend(1,646)=2 exch2_pij(1,1,646)=1 exch2_pij(2,1,646)=0 exch2_pij(3,1,646)=0 exch2_pij(4,1,646)=1 exch2_oi(1,646)=0 exch2_oj(1,646)=0 exch2_neighbourId(2,646)=631 exch2_iLo(2,646)=0 exch2_iHi(2,646)=35 exch2_jLo(2,646)=0 exch2_jHi(2,646)=0 exch2_opposingSend(2,646)=1 exch2_pij(1,2,646)=1 exch2_pij(2,2,646)=0 exch2_pij(3,2,646)=0 exch2_pij(4,2,646)=1 exch2_oi(2,646)=0 exch2_oj(2,646)=0 exch2_neighbourId(3,646)=647 exch2_iLo(3,646)=35 exch2_iHi(3,646)=35 exch2_jLo(3,646)=0 exch2_jHi(3,646)=52 exch2_opposingSend(3,646)=4 exch2_pij(1,3,646)=1 exch2_pij(2,3,646)=0 exch2_pij(3,3,646)=0 exch2_pij(4,3,646)=1 exch2_oi(3,646)=0 exch2_oj(3,646)=0 exch2_neighbourId(4,646)=445 exch2_iLo(4,646)=0 exch2_iHi(4,646)=0 exch2_jLo(4,646)=17 exch2_jHi(4,646)=52 exch2_opposingSend(4,646)=1 exch2_pij(1,4,646)=0 exch2_pij(2,4,646)=1 exch2_pij(3,4,646)=-1 exch2_pij(4,4,646)=0 exch2_oi(4,646)=-510 exch2_oj(4,646)=511 exch2_neighbourId(5,646)=446 exch2_iLo(5,646)=0 exch2_iHi(5,646)=0 exch2_jLo(5,646)=0 exch2_jHi(5,646)=18 exch2_opposingSend(5,646)=2 exch2_pij(1,5,646)=0 exch2_pij(2,5,646)=1 exch2_pij(3,5,646)=-1 exch2_pij(4,5,646)=0 exch2_oi(5,646)=-510 exch2_oj(5,646)=511 RETURN END SUBROUTINE W2_E2SETUP_647 C Topology for tile 647 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(647)=34 exch2_tNy(647)=51 exch2_tBasex(647)=34 exch2_tBasey(647)=153 exch2_txGlobalo(647)=2075 exch2_tyGlobalo(647)=154 exch2_isWedge(647)=0 exch2_isNedge(647)=0 exch2_isEedge(647)=0 exch2_isSedge(647)=0 exch2_myFace(647)=5 exch2_mydNx(647)=510 exch2_mydNy(647)=510 exch2_nNeighbours(647)=4 exch2_neighbourId(1,647)=662 exch2_iLo(1,647)=0 exch2_iHi(1,647)=35 exch2_jLo(1,647)=52 exch2_jHi(1,647)=52 exch2_opposingSend(1,647)=2 exch2_pij(1,1,647)=1 exch2_pij(2,1,647)=0 exch2_pij(3,1,647)=0 exch2_pij(4,1,647)=1 exch2_oi(1,647)=0 exch2_oj(1,647)=0 exch2_neighbourId(2,647)=632 exch2_iLo(2,647)=0 exch2_iHi(2,647)=35 exch2_jLo(2,647)=0 exch2_jHi(2,647)=0 exch2_opposingSend(2,647)=1 exch2_pij(1,2,647)=1 exch2_pij(2,2,647)=0 exch2_pij(3,2,647)=0 exch2_pij(4,2,647)=1 exch2_oi(2,647)=0 exch2_oj(2,647)=0 exch2_neighbourId(3,647)=648 exch2_iLo(3,647)=35 exch2_iHi(3,647)=35 exch2_jLo(3,647)=0 exch2_jHi(3,647)=52 exch2_opposingSend(3,647)=4 exch2_pij(1,3,647)=1 exch2_pij(2,3,647)=0 exch2_pij(3,3,647)=0 exch2_pij(4,3,647)=1 exch2_oi(3,647)=0 exch2_oj(3,647)=0 exch2_neighbourId(4,647)=646 exch2_iLo(4,647)=0 exch2_iHi(4,647)=0 exch2_jLo(4,647)=0 exch2_jHi(4,647)=52 exch2_opposingSend(4,647)=3 exch2_pij(1,4,647)=1 exch2_pij(2,4,647)=0 exch2_pij(3,4,647)=0 exch2_pij(4,4,647)=1 exch2_oi(4,647)=0 exch2_oj(4,647)=0 RETURN END SUBROUTINE W2_E2SETUP_648 C Topology for tile 648 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(648)=34 exch2_tNy(648)=51 exch2_tBasex(648)=68 exch2_tBasey(648)=153 exch2_txGlobalo(648)=2109 exch2_tyGlobalo(648)=154 exch2_isWedge(648)=0 exch2_isNedge(648)=0 exch2_isEedge(648)=0 exch2_isSedge(648)=0 exch2_myFace(648)=5 exch2_mydNx(648)=510 exch2_mydNy(648)=510 exch2_nNeighbours(648)=4 exch2_neighbourId(1,648)=663 exch2_iLo(1,648)=0 exch2_iHi(1,648)=35 exch2_jLo(1,648)=52 exch2_jHi(1,648)=52 exch2_opposingSend(1,648)=2 exch2_pij(1,1,648)=1 exch2_pij(2,1,648)=0 exch2_pij(3,1,648)=0 exch2_pij(4,1,648)=1 exch2_oi(1,648)=0 exch2_oj(1,648)=0 exch2_neighbourId(2,648)=633 exch2_iLo(2,648)=0 exch2_iHi(2,648)=35 exch2_jLo(2,648)=0 exch2_jHi(2,648)=0 exch2_opposingSend(2,648)=1 exch2_pij(1,2,648)=1 exch2_pij(2,2,648)=0 exch2_pij(3,2,648)=0 exch2_pij(4,2,648)=1 exch2_oi(2,648)=0 exch2_oj(2,648)=0 exch2_neighbourId(3,648)=649 exch2_iLo(3,648)=35 exch2_iHi(3,648)=35 exch2_jLo(3,648)=0 exch2_jHi(3,648)=52 exch2_opposingSend(3,648)=4 exch2_pij(1,3,648)=1 exch2_pij(2,3,648)=0 exch2_pij(3,3,648)=0 exch2_pij(4,3,648)=1 exch2_oi(3,648)=0 exch2_oj(3,648)=0 exch2_neighbourId(4,648)=647 exch2_iLo(4,648)=0 exch2_iHi(4,648)=0 exch2_jLo(4,648)=0 exch2_jHi(4,648)=52 exch2_opposingSend(4,648)=3 exch2_pij(1,4,648)=1 exch2_pij(2,4,648)=0 exch2_pij(3,4,648)=0 exch2_pij(4,4,648)=1 exch2_oi(4,648)=0 exch2_oj(4,648)=0 RETURN END SUBROUTINE W2_E2SETUP_649 C Topology for tile 649 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(649)=34 exch2_tNy(649)=51 exch2_tBasex(649)=102 exch2_tBasey(649)=153 exch2_txGlobalo(649)=2143 exch2_tyGlobalo(649)=154 exch2_isWedge(649)=0 exch2_isNedge(649)=0 exch2_isEedge(649)=0 exch2_isSedge(649)=0 exch2_myFace(649)=5 exch2_mydNx(649)=510 exch2_mydNy(649)=510 exch2_nNeighbours(649)=4 exch2_neighbourId(1,649)=664 exch2_iLo(1,649)=0 exch2_iHi(1,649)=35 exch2_jLo(1,649)=52 exch2_jHi(1,649)=52 exch2_opposingSend(1,649)=2 exch2_pij(1,1,649)=1 exch2_pij(2,1,649)=0 exch2_pij(3,1,649)=0 exch2_pij(4,1,649)=1 exch2_oi(1,649)=0 exch2_oj(1,649)=0 exch2_neighbourId(2,649)=634 exch2_iLo(2,649)=0 exch2_iHi(2,649)=35 exch2_jLo(2,649)=0 exch2_jHi(2,649)=0 exch2_opposingSend(2,649)=1 exch2_pij(1,2,649)=1 exch2_pij(2,2,649)=0 exch2_pij(3,2,649)=0 exch2_pij(4,2,649)=1 exch2_oi(2,649)=0 exch2_oj(2,649)=0 exch2_neighbourId(3,649)=650 exch2_iLo(3,649)=35 exch2_iHi(3,649)=35 exch2_jLo(3,649)=0 exch2_jHi(3,649)=52 exch2_opposingSend(3,649)=4 exch2_pij(1,3,649)=1 exch2_pij(2,3,649)=0 exch2_pij(3,3,649)=0 exch2_pij(4,3,649)=1 exch2_oi(3,649)=0 exch2_oj(3,649)=0 exch2_neighbourId(4,649)=648 exch2_iLo(4,649)=0 exch2_iHi(4,649)=0 exch2_jLo(4,649)=0 exch2_jHi(4,649)=52 exch2_opposingSend(4,649)=3 exch2_pij(1,4,649)=1 exch2_pij(2,4,649)=0 exch2_pij(3,4,649)=0 exch2_pij(4,4,649)=1 exch2_oi(4,649)=0 exch2_oj(4,649)=0 RETURN END SUBROUTINE W2_E2SETUP_650 C Topology for tile 650 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(650)=34 exch2_tNy(650)=51 exch2_tBasex(650)=136 exch2_tBasey(650)=153 exch2_txGlobalo(650)=2177 exch2_tyGlobalo(650)=154 exch2_isWedge(650)=0 exch2_isNedge(650)=0 exch2_isEedge(650)=0 exch2_isSedge(650)=0 exch2_myFace(650)=5 exch2_mydNx(650)=510 exch2_mydNy(650)=510 exch2_nNeighbours(650)=4 exch2_neighbourId(1,650)=665 exch2_iLo(1,650)=0 exch2_iHi(1,650)=35 exch2_jLo(1,650)=52 exch2_jHi(1,650)=52 exch2_opposingSend(1,650)=2 exch2_pij(1,1,650)=1 exch2_pij(2,1,650)=0 exch2_pij(3,1,650)=0 exch2_pij(4,1,650)=1 exch2_oi(1,650)=0 exch2_oj(1,650)=0 exch2_neighbourId(2,650)=635 exch2_iLo(2,650)=0 exch2_iHi(2,650)=35 exch2_jLo(2,650)=0 exch2_jHi(2,650)=0 exch2_opposingSend(2,650)=1 exch2_pij(1,2,650)=1 exch2_pij(2,2,650)=0 exch2_pij(3,2,650)=0 exch2_pij(4,2,650)=1 exch2_oi(2,650)=0 exch2_oj(2,650)=0 exch2_neighbourId(3,650)=651 exch2_iLo(3,650)=35 exch2_iHi(3,650)=35 exch2_jLo(3,650)=0 exch2_jHi(3,650)=52 exch2_opposingSend(3,650)=4 exch2_pij(1,3,650)=1 exch2_pij(2,3,650)=0 exch2_pij(3,3,650)=0 exch2_pij(4,3,650)=1 exch2_oi(3,650)=0 exch2_oj(3,650)=0 exch2_neighbourId(4,650)=649 exch2_iLo(4,650)=0 exch2_iHi(4,650)=0 exch2_jLo(4,650)=0 exch2_jHi(4,650)=52 exch2_opposingSend(4,650)=3 exch2_pij(1,4,650)=1 exch2_pij(2,4,650)=0 exch2_pij(3,4,650)=0 exch2_pij(4,4,650)=1 exch2_oi(4,650)=0 exch2_oj(4,650)=0 RETURN END SUBROUTINE W2_E2SETUP_651 C Topology for tile 651 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(651)=34 exch2_tNy(651)=51 exch2_tBasex(651)=170 exch2_tBasey(651)=153 exch2_txGlobalo(651)=2211 exch2_tyGlobalo(651)=154 exch2_isWedge(651)=0 exch2_isNedge(651)=0 exch2_isEedge(651)=0 exch2_isSedge(651)=0 exch2_myFace(651)=5 exch2_mydNx(651)=510 exch2_mydNy(651)=510 exch2_nNeighbours(651)=4 exch2_neighbourId(1,651)=666 exch2_iLo(1,651)=0 exch2_iHi(1,651)=35 exch2_jLo(1,651)=52 exch2_jHi(1,651)=52 exch2_opposingSend(1,651)=2 exch2_pij(1,1,651)=1 exch2_pij(2,1,651)=0 exch2_pij(3,1,651)=0 exch2_pij(4,1,651)=1 exch2_oi(1,651)=0 exch2_oj(1,651)=0 exch2_neighbourId(2,651)=636 exch2_iLo(2,651)=0 exch2_iHi(2,651)=35 exch2_jLo(2,651)=0 exch2_jHi(2,651)=0 exch2_opposingSend(2,651)=1 exch2_pij(1,2,651)=1 exch2_pij(2,2,651)=0 exch2_pij(3,2,651)=0 exch2_pij(4,2,651)=1 exch2_oi(2,651)=0 exch2_oj(2,651)=0 exch2_neighbourId(3,651)=652 exch2_iLo(3,651)=35 exch2_iHi(3,651)=35 exch2_jLo(3,651)=0 exch2_jHi(3,651)=52 exch2_opposingSend(3,651)=4 exch2_pij(1,3,651)=1 exch2_pij(2,3,651)=0 exch2_pij(3,3,651)=0 exch2_pij(4,3,651)=1 exch2_oi(3,651)=0 exch2_oj(3,651)=0 exch2_neighbourId(4,651)=650 exch2_iLo(4,651)=0 exch2_iHi(4,651)=0 exch2_jLo(4,651)=0 exch2_jHi(4,651)=52 exch2_opposingSend(4,651)=3 exch2_pij(1,4,651)=1 exch2_pij(2,4,651)=0 exch2_pij(3,4,651)=0 exch2_pij(4,4,651)=1 exch2_oi(4,651)=0 exch2_oj(4,651)=0 RETURN END SUBROUTINE W2_E2SETUP_652 C Topology for tile 652 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(652)=34 exch2_tNy(652)=51 exch2_tBasex(652)=204 exch2_tBasey(652)=153 exch2_txGlobalo(652)=2245 exch2_tyGlobalo(652)=154 exch2_isWedge(652)=0 exch2_isNedge(652)=0 exch2_isEedge(652)=0 exch2_isSedge(652)=0 exch2_myFace(652)=5 exch2_mydNx(652)=510 exch2_mydNy(652)=510 exch2_nNeighbours(652)=4 exch2_neighbourId(1,652)=667 exch2_iLo(1,652)=0 exch2_iHi(1,652)=35 exch2_jLo(1,652)=52 exch2_jHi(1,652)=52 exch2_opposingSend(1,652)=2 exch2_pij(1,1,652)=1 exch2_pij(2,1,652)=0 exch2_pij(3,1,652)=0 exch2_pij(4,1,652)=1 exch2_oi(1,652)=0 exch2_oj(1,652)=0 exch2_neighbourId(2,652)=637 exch2_iLo(2,652)=0 exch2_iHi(2,652)=35 exch2_jLo(2,652)=0 exch2_jHi(2,652)=0 exch2_opposingSend(2,652)=1 exch2_pij(1,2,652)=1 exch2_pij(2,2,652)=0 exch2_pij(3,2,652)=0 exch2_pij(4,2,652)=1 exch2_oi(2,652)=0 exch2_oj(2,652)=0 exch2_neighbourId(3,652)=653 exch2_iLo(3,652)=35 exch2_iHi(3,652)=35 exch2_jLo(3,652)=0 exch2_jHi(3,652)=52 exch2_opposingSend(3,652)=4 exch2_pij(1,3,652)=1 exch2_pij(2,3,652)=0 exch2_pij(3,3,652)=0 exch2_pij(4,3,652)=1 exch2_oi(3,652)=0 exch2_oj(3,652)=0 exch2_neighbourId(4,652)=651 exch2_iLo(4,652)=0 exch2_iHi(4,652)=0 exch2_jLo(4,652)=0 exch2_jHi(4,652)=52 exch2_opposingSend(4,652)=3 exch2_pij(1,4,652)=1 exch2_pij(2,4,652)=0 exch2_pij(3,4,652)=0 exch2_pij(4,4,652)=1 exch2_oi(4,652)=0 exch2_oj(4,652)=0 RETURN END SUBROUTINE W2_E2SETUP_653 C Topology for tile 653 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(653)=34 exch2_tNy(653)=51 exch2_tBasex(653)=238 exch2_tBasey(653)=153 exch2_txGlobalo(653)=2279 exch2_tyGlobalo(653)=154 exch2_isWedge(653)=0 exch2_isNedge(653)=0 exch2_isEedge(653)=0 exch2_isSedge(653)=0 exch2_myFace(653)=5 exch2_mydNx(653)=510 exch2_mydNy(653)=510 exch2_nNeighbours(653)=4 exch2_neighbourId(1,653)=668 exch2_iLo(1,653)=0 exch2_iHi(1,653)=35 exch2_jLo(1,653)=52 exch2_jHi(1,653)=52 exch2_opposingSend(1,653)=2 exch2_pij(1,1,653)=1 exch2_pij(2,1,653)=0 exch2_pij(3,1,653)=0 exch2_pij(4,1,653)=1 exch2_oi(1,653)=0 exch2_oj(1,653)=0 exch2_neighbourId(2,653)=638 exch2_iLo(2,653)=0 exch2_iHi(2,653)=35 exch2_jLo(2,653)=0 exch2_jHi(2,653)=0 exch2_opposingSend(2,653)=1 exch2_pij(1,2,653)=1 exch2_pij(2,2,653)=0 exch2_pij(3,2,653)=0 exch2_pij(4,2,653)=1 exch2_oi(2,653)=0 exch2_oj(2,653)=0 exch2_neighbourId(3,653)=654 exch2_iLo(3,653)=35 exch2_iHi(3,653)=35 exch2_jLo(3,653)=0 exch2_jHi(3,653)=52 exch2_opposingSend(3,653)=4 exch2_pij(1,3,653)=1 exch2_pij(2,3,653)=0 exch2_pij(3,3,653)=0 exch2_pij(4,3,653)=1 exch2_oi(3,653)=0 exch2_oj(3,653)=0 exch2_neighbourId(4,653)=652 exch2_iLo(4,653)=0 exch2_iHi(4,653)=0 exch2_jLo(4,653)=0 exch2_jHi(4,653)=52 exch2_opposingSend(4,653)=3 exch2_pij(1,4,653)=1 exch2_pij(2,4,653)=0 exch2_pij(3,4,653)=0 exch2_pij(4,4,653)=1 exch2_oi(4,653)=0 exch2_oj(4,653)=0 RETURN END SUBROUTINE W2_E2SETUP_654 C Topology for tile 654 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(654)=34 exch2_tNy(654)=51 exch2_tBasex(654)=272 exch2_tBasey(654)=153 exch2_txGlobalo(654)=2313 exch2_tyGlobalo(654)=154 exch2_isWedge(654)=0 exch2_isNedge(654)=0 exch2_isEedge(654)=0 exch2_isSedge(654)=0 exch2_myFace(654)=5 exch2_mydNx(654)=510 exch2_mydNy(654)=510 exch2_nNeighbours(654)=4 exch2_neighbourId(1,654)=669 exch2_iLo(1,654)=0 exch2_iHi(1,654)=35 exch2_jLo(1,654)=52 exch2_jHi(1,654)=52 exch2_opposingSend(1,654)=2 exch2_pij(1,1,654)=1 exch2_pij(2,1,654)=0 exch2_pij(3,1,654)=0 exch2_pij(4,1,654)=1 exch2_oi(1,654)=0 exch2_oj(1,654)=0 exch2_neighbourId(2,654)=639 exch2_iLo(2,654)=0 exch2_iHi(2,654)=35 exch2_jLo(2,654)=0 exch2_jHi(2,654)=0 exch2_opposingSend(2,654)=1 exch2_pij(1,2,654)=1 exch2_pij(2,2,654)=0 exch2_pij(3,2,654)=0 exch2_pij(4,2,654)=1 exch2_oi(2,654)=0 exch2_oj(2,654)=0 exch2_neighbourId(3,654)=655 exch2_iLo(3,654)=35 exch2_iHi(3,654)=35 exch2_jLo(3,654)=0 exch2_jHi(3,654)=52 exch2_opposingSend(3,654)=4 exch2_pij(1,3,654)=1 exch2_pij(2,3,654)=0 exch2_pij(3,3,654)=0 exch2_pij(4,3,654)=1 exch2_oi(3,654)=0 exch2_oj(3,654)=0 exch2_neighbourId(4,654)=653 exch2_iLo(4,654)=0 exch2_iHi(4,654)=0 exch2_jLo(4,654)=0 exch2_jHi(4,654)=52 exch2_opposingSend(4,654)=3 exch2_pij(1,4,654)=1 exch2_pij(2,4,654)=0 exch2_pij(3,4,654)=0 exch2_pij(4,4,654)=1 exch2_oi(4,654)=0 exch2_oj(4,654)=0 RETURN END SUBROUTINE W2_E2SETUP_655 C Topology for tile 655 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(655)=34 exch2_tNy(655)=51 exch2_tBasex(655)=306 exch2_tBasey(655)=153 exch2_txGlobalo(655)=2347 exch2_tyGlobalo(655)=154 exch2_isWedge(655)=0 exch2_isNedge(655)=0 exch2_isEedge(655)=0 exch2_isSedge(655)=0 exch2_myFace(655)=5 exch2_mydNx(655)=510 exch2_mydNy(655)=510 exch2_nNeighbours(655)=4 exch2_neighbourId(1,655)=670 exch2_iLo(1,655)=0 exch2_iHi(1,655)=35 exch2_jLo(1,655)=52 exch2_jHi(1,655)=52 exch2_opposingSend(1,655)=2 exch2_pij(1,1,655)=1 exch2_pij(2,1,655)=0 exch2_pij(3,1,655)=0 exch2_pij(4,1,655)=1 exch2_oi(1,655)=0 exch2_oj(1,655)=0 exch2_neighbourId(2,655)=640 exch2_iLo(2,655)=0 exch2_iHi(2,655)=35 exch2_jLo(2,655)=0 exch2_jHi(2,655)=0 exch2_opposingSend(2,655)=1 exch2_pij(1,2,655)=1 exch2_pij(2,2,655)=0 exch2_pij(3,2,655)=0 exch2_pij(4,2,655)=1 exch2_oi(2,655)=0 exch2_oj(2,655)=0 exch2_neighbourId(3,655)=656 exch2_iLo(3,655)=35 exch2_iHi(3,655)=35 exch2_jLo(3,655)=0 exch2_jHi(3,655)=52 exch2_opposingSend(3,655)=4 exch2_pij(1,3,655)=1 exch2_pij(2,3,655)=0 exch2_pij(3,3,655)=0 exch2_pij(4,3,655)=1 exch2_oi(3,655)=0 exch2_oj(3,655)=0 exch2_neighbourId(4,655)=654 exch2_iLo(4,655)=0 exch2_iHi(4,655)=0 exch2_jLo(4,655)=0 exch2_jHi(4,655)=52 exch2_opposingSend(4,655)=3 exch2_pij(1,4,655)=1 exch2_pij(2,4,655)=0 exch2_pij(3,4,655)=0 exch2_pij(4,4,655)=1 exch2_oi(4,655)=0 exch2_oj(4,655)=0 RETURN END SUBROUTINE W2_E2SETUP_656 C Topology for tile 656 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(656)=34 exch2_tNy(656)=51 exch2_tBasex(656)=340 exch2_tBasey(656)=153 exch2_txGlobalo(656)=2381 exch2_tyGlobalo(656)=154 exch2_isWedge(656)=0 exch2_isNedge(656)=0 exch2_isEedge(656)=0 exch2_isSedge(656)=0 exch2_myFace(656)=5 exch2_mydNx(656)=510 exch2_mydNy(656)=510 exch2_nNeighbours(656)=4 exch2_neighbourId(1,656)=671 exch2_iLo(1,656)=0 exch2_iHi(1,656)=35 exch2_jLo(1,656)=52 exch2_jHi(1,656)=52 exch2_opposingSend(1,656)=2 exch2_pij(1,1,656)=1 exch2_pij(2,1,656)=0 exch2_pij(3,1,656)=0 exch2_pij(4,1,656)=1 exch2_oi(1,656)=0 exch2_oj(1,656)=0 exch2_neighbourId(2,656)=641 exch2_iLo(2,656)=0 exch2_iHi(2,656)=35 exch2_jLo(2,656)=0 exch2_jHi(2,656)=0 exch2_opposingSend(2,656)=1 exch2_pij(1,2,656)=1 exch2_pij(2,2,656)=0 exch2_pij(3,2,656)=0 exch2_pij(4,2,656)=1 exch2_oi(2,656)=0 exch2_oj(2,656)=0 exch2_neighbourId(3,656)=657 exch2_iLo(3,656)=35 exch2_iHi(3,656)=35 exch2_jLo(3,656)=0 exch2_jHi(3,656)=52 exch2_opposingSend(3,656)=4 exch2_pij(1,3,656)=1 exch2_pij(2,3,656)=0 exch2_pij(3,3,656)=0 exch2_pij(4,3,656)=1 exch2_oi(3,656)=0 exch2_oj(3,656)=0 exch2_neighbourId(4,656)=655 exch2_iLo(4,656)=0 exch2_iHi(4,656)=0 exch2_jLo(4,656)=0 exch2_jHi(4,656)=52 exch2_opposingSend(4,656)=3 exch2_pij(1,4,656)=1 exch2_pij(2,4,656)=0 exch2_pij(3,4,656)=0 exch2_pij(4,4,656)=1 exch2_oi(4,656)=0 exch2_oj(4,656)=0 RETURN END SUBROUTINE W2_E2SETUP_657 C Topology for tile 657 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(657)=34 exch2_tNy(657)=51 exch2_tBasex(657)=374 exch2_tBasey(657)=153 exch2_txGlobalo(657)=2415 exch2_tyGlobalo(657)=154 exch2_isWedge(657)=0 exch2_isNedge(657)=0 exch2_isEedge(657)=0 exch2_isSedge(657)=0 exch2_myFace(657)=5 exch2_mydNx(657)=510 exch2_mydNy(657)=510 exch2_nNeighbours(657)=4 exch2_neighbourId(1,657)=672 exch2_iLo(1,657)=0 exch2_iHi(1,657)=35 exch2_jLo(1,657)=52 exch2_jHi(1,657)=52 exch2_opposingSend(1,657)=2 exch2_pij(1,1,657)=1 exch2_pij(2,1,657)=0 exch2_pij(3,1,657)=0 exch2_pij(4,1,657)=1 exch2_oi(1,657)=0 exch2_oj(1,657)=0 exch2_neighbourId(2,657)=642 exch2_iLo(2,657)=0 exch2_iHi(2,657)=35 exch2_jLo(2,657)=0 exch2_jHi(2,657)=0 exch2_opposingSend(2,657)=1 exch2_pij(1,2,657)=1 exch2_pij(2,2,657)=0 exch2_pij(3,2,657)=0 exch2_pij(4,2,657)=1 exch2_oi(2,657)=0 exch2_oj(2,657)=0 exch2_neighbourId(3,657)=658 exch2_iLo(3,657)=35 exch2_iHi(3,657)=35 exch2_jLo(3,657)=0 exch2_jHi(3,657)=52 exch2_opposingSend(3,657)=4 exch2_pij(1,3,657)=1 exch2_pij(2,3,657)=0 exch2_pij(3,3,657)=0 exch2_pij(4,3,657)=1 exch2_oi(3,657)=0 exch2_oj(3,657)=0 exch2_neighbourId(4,657)=656 exch2_iLo(4,657)=0 exch2_iHi(4,657)=0 exch2_jLo(4,657)=0 exch2_jHi(4,657)=52 exch2_opposingSend(4,657)=3 exch2_pij(1,4,657)=1 exch2_pij(2,4,657)=0 exch2_pij(3,4,657)=0 exch2_pij(4,4,657)=1 exch2_oi(4,657)=0 exch2_oj(4,657)=0 RETURN END SUBROUTINE W2_E2SETUP_658 C Topology for tile 658 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(658)=34 exch2_tNy(658)=51 exch2_tBasex(658)=408 exch2_tBasey(658)=153 exch2_txGlobalo(658)=2449 exch2_tyGlobalo(658)=154 exch2_isWedge(658)=0 exch2_isNedge(658)=0 exch2_isEedge(658)=0 exch2_isSedge(658)=0 exch2_myFace(658)=5 exch2_mydNx(658)=510 exch2_mydNy(658)=510 exch2_nNeighbours(658)=4 exch2_neighbourId(1,658)=673 exch2_iLo(1,658)=0 exch2_iHi(1,658)=35 exch2_jLo(1,658)=52 exch2_jHi(1,658)=52 exch2_opposingSend(1,658)=2 exch2_pij(1,1,658)=1 exch2_pij(2,1,658)=0 exch2_pij(3,1,658)=0 exch2_pij(4,1,658)=1 exch2_oi(1,658)=0 exch2_oj(1,658)=0 exch2_neighbourId(2,658)=643 exch2_iLo(2,658)=0 exch2_iHi(2,658)=35 exch2_jLo(2,658)=0 exch2_jHi(2,658)=0 exch2_opposingSend(2,658)=1 exch2_pij(1,2,658)=1 exch2_pij(2,2,658)=0 exch2_pij(3,2,658)=0 exch2_pij(4,2,658)=1 exch2_oi(2,658)=0 exch2_oj(2,658)=0 exch2_neighbourId(3,658)=659 exch2_iLo(3,658)=35 exch2_iHi(3,658)=35 exch2_jLo(3,658)=0 exch2_jHi(3,658)=52 exch2_opposingSend(3,658)=4 exch2_pij(1,3,658)=1 exch2_pij(2,3,658)=0 exch2_pij(3,3,658)=0 exch2_pij(4,3,658)=1 exch2_oi(3,658)=0 exch2_oj(3,658)=0 exch2_neighbourId(4,658)=657 exch2_iLo(4,658)=0 exch2_iHi(4,658)=0 exch2_jLo(4,658)=0 exch2_jHi(4,658)=52 exch2_opposingSend(4,658)=3 exch2_pij(1,4,658)=1 exch2_pij(2,4,658)=0 exch2_pij(3,4,658)=0 exch2_pij(4,4,658)=1 exch2_oi(4,658)=0 exch2_oj(4,658)=0 RETURN END SUBROUTINE W2_E2SETUP_659 C Topology for tile 659 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(659)=34 exch2_tNy(659)=51 exch2_tBasex(659)=442 exch2_tBasey(659)=153 exch2_txGlobalo(659)=2483 exch2_tyGlobalo(659)=154 exch2_isWedge(659)=0 exch2_isNedge(659)=0 exch2_isEedge(659)=0 exch2_isSedge(659)=0 exch2_myFace(659)=5 exch2_mydNx(659)=510 exch2_mydNy(659)=510 exch2_nNeighbours(659)=4 exch2_neighbourId(1,659)=674 exch2_iLo(1,659)=0 exch2_iHi(1,659)=35 exch2_jLo(1,659)=52 exch2_jHi(1,659)=52 exch2_opposingSend(1,659)=2 exch2_pij(1,1,659)=1 exch2_pij(2,1,659)=0 exch2_pij(3,1,659)=0 exch2_pij(4,1,659)=1 exch2_oi(1,659)=0 exch2_oj(1,659)=0 exch2_neighbourId(2,659)=644 exch2_iLo(2,659)=0 exch2_iHi(2,659)=35 exch2_jLo(2,659)=0 exch2_jHi(2,659)=0 exch2_opposingSend(2,659)=1 exch2_pij(1,2,659)=1 exch2_pij(2,2,659)=0 exch2_pij(3,2,659)=0 exch2_pij(4,2,659)=1 exch2_oi(2,659)=0 exch2_oj(2,659)=0 exch2_neighbourId(3,659)=660 exch2_iLo(3,659)=35 exch2_iHi(3,659)=35 exch2_jLo(3,659)=0 exch2_jHi(3,659)=52 exch2_opposingSend(3,659)=4 exch2_pij(1,3,659)=1 exch2_pij(2,3,659)=0 exch2_pij(3,3,659)=0 exch2_pij(4,3,659)=1 exch2_oi(3,659)=0 exch2_oj(3,659)=0 exch2_neighbourId(4,659)=658 exch2_iLo(4,659)=0 exch2_iHi(4,659)=0 exch2_jLo(4,659)=0 exch2_jHi(4,659)=52 exch2_opposingSend(4,659)=3 exch2_pij(1,4,659)=1 exch2_pij(2,4,659)=0 exch2_pij(3,4,659)=0 exch2_pij(4,4,659)=1 exch2_oi(4,659)=0 exch2_oj(4,659)=0 RETURN END SUBROUTINE W2_E2SETUP_660 C Topology for tile 660 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(660)=34 exch2_tNy(660)=51 exch2_tBasex(660)=476 exch2_tBasey(660)=153 exch2_txGlobalo(660)=2517 exch2_tyGlobalo(660)=154 exch2_isWedge(660)=0 exch2_isNedge(660)=0 exch2_isEedge(660)=1 exch2_isSedge(660)=0 exch2_myFace(660)=5 exch2_mydNx(660)=510 exch2_mydNy(660)=510 exch2_nNeighbours(660)=4 exch2_neighbourId(1,660)=675 exch2_iLo(1,660)=0 exch2_iHi(1,660)=35 exch2_jLo(1,660)=52 exch2_jHi(1,660)=52 exch2_opposingSend(1,660)=2 exch2_pij(1,1,660)=1 exch2_pij(2,1,660)=0 exch2_pij(3,1,660)=0 exch2_pij(4,1,660)=1 exch2_oi(1,660)=0 exch2_oj(1,660)=0 exch2_neighbourId(2,660)=645 exch2_iLo(2,660)=0 exch2_iHi(2,660)=35 exch2_jLo(2,660)=0 exch2_jHi(2,660)=0 exch2_opposingSend(2,660)=1 exch2_pij(1,2,660)=1 exch2_pij(2,2,660)=0 exch2_pij(3,2,660)=0 exch2_pij(4,2,660)=1 exch2_oi(2,660)=0 exch2_oj(2,660)=0 exch2_neighbourId(3,660)=796 exch2_iLo(3,660)=35 exch2_iHi(3,660)=35 exch2_jLo(3,660)=0 exch2_jHi(3,660)=52 exch2_opposingSend(3,660)=4 exch2_pij(1,3,660)=1 exch2_pij(2,3,660)=0 exch2_pij(3,3,660)=0 exch2_pij(4,3,660)=1 exch2_oi(3,660)=510 exch2_oj(3,660)=0 exch2_neighbourId(4,660)=659 exch2_iLo(4,660)=0 exch2_iHi(4,660)=0 exch2_jLo(4,660)=0 exch2_jHi(4,660)=52 exch2_opposingSend(4,660)=3 exch2_pij(1,4,660)=1 exch2_pij(2,4,660)=0 exch2_pij(3,4,660)=0 exch2_pij(4,4,660)=1 exch2_oi(4,660)=0 exch2_oj(4,660)=0 RETURN END SUBROUTINE W2_E2SETUP_661 C Topology for tile 661 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(661)=34 exch2_tNy(661)=51 exch2_tBasex(661)=0 exch2_tBasey(661)=204 exch2_txGlobalo(661)=2041 exch2_tyGlobalo(661)=205 exch2_isWedge(661)=1 exch2_isNedge(661)=0 exch2_isEedge(661)=0 exch2_isSedge(661)=0 exch2_myFace(661)=5 exch2_mydNx(661)=510 exch2_mydNy(661)=510 exch2_nNeighbours(661)=5 exch2_neighbourId(1,661)=676 exch2_iLo(1,661)=0 exch2_iHi(1,661)=35 exch2_jLo(1,661)=52 exch2_jHi(1,661)=52 exch2_opposingSend(1,661)=2 exch2_pij(1,1,661)=1 exch2_pij(2,1,661)=0 exch2_pij(3,1,661)=0 exch2_pij(4,1,661)=1 exch2_oi(1,661)=0 exch2_oj(1,661)=0 exch2_neighbourId(2,661)=646 exch2_iLo(2,661)=0 exch2_iHi(2,661)=35 exch2_jLo(2,661)=0 exch2_jHi(2,661)=0 exch2_opposingSend(2,661)=1 exch2_pij(1,2,661)=1 exch2_pij(2,2,661)=0 exch2_pij(3,2,661)=0 exch2_pij(4,2,661)=1 exch2_oi(2,661)=0 exch2_oj(2,661)=0 exch2_neighbourId(3,661)=662 exch2_iLo(3,661)=35 exch2_iHi(3,661)=35 exch2_jLo(3,661)=0 exch2_jHi(3,661)=52 exch2_opposingSend(3,661)=4 exch2_pij(1,3,661)=1 exch2_pij(2,3,661)=0 exch2_pij(3,3,661)=0 exch2_pij(4,3,661)=1 exch2_oi(3,661)=0 exch2_oj(3,661)=0 exch2_neighbourId(4,661)=443 exch2_iLo(4,661)=0 exch2_iHi(4,661)=0 exch2_jLo(4,661)=34 exch2_jHi(4,661)=52 exch2_opposingSend(4,661)=1 exch2_pij(1,4,661)=0 exch2_pij(2,4,661)=1 exch2_pij(3,4,661)=-1 exch2_pij(4,4,661)=0 exch2_oi(4,661)=-510 exch2_oj(4,661)=511 exch2_neighbourId(5,661)=444 exch2_iLo(5,661)=0 exch2_iHi(5,661)=0 exch2_jLo(5,661)=0 exch2_jHi(5,661)=35 exch2_opposingSend(5,661)=1 exch2_pij(1,5,661)=0 exch2_pij(2,5,661)=1 exch2_pij(3,5,661)=-1 exch2_pij(4,5,661)=0 exch2_oi(5,661)=-510 exch2_oj(5,661)=511 RETURN END SUBROUTINE W2_E2SETUP_662 C Topology for tile 662 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(662)=34 exch2_tNy(662)=51 exch2_tBasex(662)=34 exch2_tBasey(662)=204 exch2_txGlobalo(662)=2075 exch2_tyGlobalo(662)=205 exch2_isWedge(662)=0 exch2_isNedge(662)=0 exch2_isEedge(662)=0 exch2_isSedge(662)=0 exch2_myFace(662)=5 exch2_mydNx(662)=510 exch2_mydNy(662)=510 exch2_nNeighbours(662)=4 exch2_neighbourId(1,662)=677 exch2_iLo(1,662)=0 exch2_iHi(1,662)=35 exch2_jLo(1,662)=52 exch2_jHi(1,662)=52 exch2_opposingSend(1,662)=2 exch2_pij(1,1,662)=1 exch2_pij(2,1,662)=0 exch2_pij(3,1,662)=0 exch2_pij(4,1,662)=1 exch2_oi(1,662)=0 exch2_oj(1,662)=0 exch2_neighbourId(2,662)=647 exch2_iLo(2,662)=0 exch2_iHi(2,662)=35 exch2_jLo(2,662)=0 exch2_jHi(2,662)=0 exch2_opposingSend(2,662)=1 exch2_pij(1,2,662)=1 exch2_pij(2,2,662)=0 exch2_pij(3,2,662)=0 exch2_pij(4,2,662)=1 exch2_oi(2,662)=0 exch2_oj(2,662)=0 exch2_neighbourId(3,662)=663 exch2_iLo(3,662)=35 exch2_iHi(3,662)=35 exch2_jLo(3,662)=0 exch2_jHi(3,662)=52 exch2_opposingSend(3,662)=4 exch2_pij(1,3,662)=1 exch2_pij(2,3,662)=0 exch2_pij(3,3,662)=0 exch2_pij(4,3,662)=1 exch2_oi(3,662)=0 exch2_oj(3,662)=0 exch2_neighbourId(4,662)=661 exch2_iLo(4,662)=0 exch2_iHi(4,662)=0 exch2_jLo(4,662)=0 exch2_jHi(4,662)=52 exch2_opposingSend(4,662)=3 exch2_pij(1,4,662)=1 exch2_pij(2,4,662)=0 exch2_pij(3,4,662)=0 exch2_pij(4,4,662)=1 exch2_oi(4,662)=0 exch2_oj(4,662)=0 RETURN END SUBROUTINE W2_E2SETUP_663 C Topology for tile 663 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(663)=34 exch2_tNy(663)=51 exch2_tBasex(663)=68 exch2_tBasey(663)=204 exch2_txGlobalo(663)=2109 exch2_tyGlobalo(663)=205 exch2_isWedge(663)=0 exch2_isNedge(663)=0 exch2_isEedge(663)=0 exch2_isSedge(663)=0 exch2_myFace(663)=5 exch2_mydNx(663)=510 exch2_mydNy(663)=510 exch2_nNeighbours(663)=4 exch2_neighbourId(1,663)=678 exch2_iLo(1,663)=0 exch2_iHi(1,663)=35 exch2_jLo(1,663)=52 exch2_jHi(1,663)=52 exch2_opposingSend(1,663)=2 exch2_pij(1,1,663)=1 exch2_pij(2,1,663)=0 exch2_pij(3,1,663)=0 exch2_pij(4,1,663)=1 exch2_oi(1,663)=0 exch2_oj(1,663)=0 exch2_neighbourId(2,663)=648 exch2_iLo(2,663)=0 exch2_iHi(2,663)=35 exch2_jLo(2,663)=0 exch2_jHi(2,663)=0 exch2_opposingSend(2,663)=1 exch2_pij(1,2,663)=1 exch2_pij(2,2,663)=0 exch2_pij(3,2,663)=0 exch2_pij(4,2,663)=1 exch2_oi(2,663)=0 exch2_oj(2,663)=0 exch2_neighbourId(3,663)=664 exch2_iLo(3,663)=35 exch2_iHi(3,663)=35 exch2_jLo(3,663)=0 exch2_jHi(3,663)=52 exch2_opposingSend(3,663)=4 exch2_pij(1,3,663)=1 exch2_pij(2,3,663)=0 exch2_pij(3,3,663)=0 exch2_pij(4,3,663)=1 exch2_oi(3,663)=0 exch2_oj(3,663)=0 exch2_neighbourId(4,663)=662 exch2_iLo(4,663)=0 exch2_iHi(4,663)=0 exch2_jLo(4,663)=0 exch2_jHi(4,663)=52 exch2_opposingSend(4,663)=3 exch2_pij(1,4,663)=1 exch2_pij(2,4,663)=0 exch2_pij(3,4,663)=0 exch2_pij(4,4,663)=1 exch2_oi(4,663)=0 exch2_oj(4,663)=0 RETURN END SUBROUTINE W2_E2SETUP_664 C Topology for tile 664 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(664)=34 exch2_tNy(664)=51 exch2_tBasex(664)=102 exch2_tBasey(664)=204 exch2_txGlobalo(664)=2143 exch2_tyGlobalo(664)=205 exch2_isWedge(664)=0 exch2_isNedge(664)=0 exch2_isEedge(664)=0 exch2_isSedge(664)=0 exch2_myFace(664)=5 exch2_mydNx(664)=510 exch2_mydNy(664)=510 exch2_nNeighbours(664)=4 exch2_neighbourId(1,664)=679 exch2_iLo(1,664)=0 exch2_iHi(1,664)=35 exch2_jLo(1,664)=52 exch2_jHi(1,664)=52 exch2_opposingSend(1,664)=2 exch2_pij(1,1,664)=1 exch2_pij(2,1,664)=0 exch2_pij(3,1,664)=0 exch2_pij(4,1,664)=1 exch2_oi(1,664)=0 exch2_oj(1,664)=0 exch2_neighbourId(2,664)=649 exch2_iLo(2,664)=0 exch2_iHi(2,664)=35 exch2_jLo(2,664)=0 exch2_jHi(2,664)=0 exch2_opposingSend(2,664)=1 exch2_pij(1,2,664)=1 exch2_pij(2,2,664)=0 exch2_pij(3,2,664)=0 exch2_pij(4,2,664)=1 exch2_oi(2,664)=0 exch2_oj(2,664)=0 exch2_neighbourId(3,664)=665 exch2_iLo(3,664)=35 exch2_iHi(3,664)=35 exch2_jLo(3,664)=0 exch2_jHi(3,664)=52 exch2_opposingSend(3,664)=4 exch2_pij(1,3,664)=1 exch2_pij(2,3,664)=0 exch2_pij(3,3,664)=0 exch2_pij(4,3,664)=1 exch2_oi(3,664)=0 exch2_oj(3,664)=0 exch2_neighbourId(4,664)=663 exch2_iLo(4,664)=0 exch2_iHi(4,664)=0 exch2_jLo(4,664)=0 exch2_jHi(4,664)=52 exch2_opposingSend(4,664)=3 exch2_pij(1,4,664)=1 exch2_pij(2,4,664)=0 exch2_pij(3,4,664)=0 exch2_pij(4,4,664)=1 exch2_oi(4,664)=0 exch2_oj(4,664)=0 RETURN END SUBROUTINE W2_E2SETUP_665 C Topology for tile 665 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(665)=34 exch2_tNy(665)=51 exch2_tBasex(665)=136 exch2_tBasey(665)=204 exch2_txGlobalo(665)=2177 exch2_tyGlobalo(665)=205 exch2_isWedge(665)=0 exch2_isNedge(665)=0 exch2_isEedge(665)=0 exch2_isSedge(665)=0 exch2_myFace(665)=5 exch2_mydNx(665)=510 exch2_mydNy(665)=510 exch2_nNeighbours(665)=4 exch2_neighbourId(1,665)=680 exch2_iLo(1,665)=0 exch2_iHi(1,665)=35 exch2_jLo(1,665)=52 exch2_jHi(1,665)=52 exch2_opposingSend(1,665)=2 exch2_pij(1,1,665)=1 exch2_pij(2,1,665)=0 exch2_pij(3,1,665)=0 exch2_pij(4,1,665)=1 exch2_oi(1,665)=0 exch2_oj(1,665)=0 exch2_neighbourId(2,665)=650 exch2_iLo(2,665)=0 exch2_iHi(2,665)=35 exch2_jLo(2,665)=0 exch2_jHi(2,665)=0 exch2_opposingSend(2,665)=1 exch2_pij(1,2,665)=1 exch2_pij(2,2,665)=0 exch2_pij(3,2,665)=0 exch2_pij(4,2,665)=1 exch2_oi(2,665)=0 exch2_oj(2,665)=0 exch2_neighbourId(3,665)=666 exch2_iLo(3,665)=35 exch2_iHi(3,665)=35 exch2_jLo(3,665)=0 exch2_jHi(3,665)=52 exch2_opposingSend(3,665)=4 exch2_pij(1,3,665)=1 exch2_pij(2,3,665)=0 exch2_pij(3,3,665)=0 exch2_pij(4,3,665)=1 exch2_oi(3,665)=0 exch2_oj(3,665)=0 exch2_neighbourId(4,665)=664 exch2_iLo(4,665)=0 exch2_iHi(4,665)=0 exch2_jLo(4,665)=0 exch2_jHi(4,665)=52 exch2_opposingSend(4,665)=3 exch2_pij(1,4,665)=1 exch2_pij(2,4,665)=0 exch2_pij(3,4,665)=0 exch2_pij(4,4,665)=1 exch2_oi(4,665)=0 exch2_oj(4,665)=0 RETURN END SUBROUTINE W2_E2SETUP_666 C Topology for tile 666 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(666)=34 exch2_tNy(666)=51 exch2_tBasex(666)=170 exch2_tBasey(666)=204 exch2_txGlobalo(666)=2211 exch2_tyGlobalo(666)=205 exch2_isWedge(666)=0 exch2_isNedge(666)=0 exch2_isEedge(666)=0 exch2_isSedge(666)=0 exch2_myFace(666)=5 exch2_mydNx(666)=510 exch2_mydNy(666)=510 exch2_nNeighbours(666)=4 exch2_neighbourId(1,666)=681 exch2_iLo(1,666)=0 exch2_iHi(1,666)=35 exch2_jLo(1,666)=52 exch2_jHi(1,666)=52 exch2_opposingSend(1,666)=2 exch2_pij(1,1,666)=1 exch2_pij(2,1,666)=0 exch2_pij(3,1,666)=0 exch2_pij(4,1,666)=1 exch2_oi(1,666)=0 exch2_oj(1,666)=0 exch2_neighbourId(2,666)=651 exch2_iLo(2,666)=0 exch2_iHi(2,666)=35 exch2_jLo(2,666)=0 exch2_jHi(2,666)=0 exch2_opposingSend(2,666)=1 exch2_pij(1,2,666)=1 exch2_pij(2,2,666)=0 exch2_pij(3,2,666)=0 exch2_pij(4,2,666)=1 exch2_oi(2,666)=0 exch2_oj(2,666)=0 exch2_neighbourId(3,666)=667 exch2_iLo(3,666)=35 exch2_iHi(3,666)=35 exch2_jLo(3,666)=0 exch2_jHi(3,666)=52 exch2_opposingSend(3,666)=4 exch2_pij(1,3,666)=1 exch2_pij(2,3,666)=0 exch2_pij(3,3,666)=0 exch2_pij(4,3,666)=1 exch2_oi(3,666)=0 exch2_oj(3,666)=0 exch2_neighbourId(4,666)=665 exch2_iLo(4,666)=0 exch2_iHi(4,666)=0 exch2_jLo(4,666)=0 exch2_jHi(4,666)=52 exch2_opposingSend(4,666)=3 exch2_pij(1,4,666)=1 exch2_pij(2,4,666)=0 exch2_pij(3,4,666)=0 exch2_pij(4,4,666)=1 exch2_oi(4,666)=0 exch2_oj(4,666)=0 RETURN END SUBROUTINE W2_E2SETUP_667 C Topology for tile 667 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(667)=34 exch2_tNy(667)=51 exch2_tBasex(667)=204 exch2_tBasey(667)=204 exch2_txGlobalo(667)=2245 exch2_tyGlobalo(667)=205 exch2_isWedge(667)=0 exch2_isNedge(667)=0 exch2_isEedge(667)=0 exch2_isSedge(667)=0 exch2_myFace(667)=5 exch2_mydNx(667)=510 exch2_mydNy(667)=510 exch2_nNeighbours(667)=4 exch2_neighbourId(1,667)=682 exch2_iLo(1,667)=0 exch2_iHi(1,667)=35 exch2_jLo(1,667)=52 exch2_jHi(1,667)=52 exch2_opposingSend(1,667)=2 exch2_pij(1,1,667)=1 exch2_pij(2,1,667)=0 exch2_pij(3,1,667)=0 exch2_pij(4,1,667)=1 exch2_oi(1,667)=0 exch2_oj(1,667)=0 exch2_neighbourId(2,667)=652 exch2_iLo(2,667)=0 exch2_iHi(2,667)=35 exch2_jLo(2,667)=0 exch2_jHi(2,667)=0 exch2_opposingSend(2,667)=1 exch2_pij(1,2,667)=1 exch2_pij(2,2,667)=0 exch2_pij(3,2,667)=0 exch2_pij(4,2,667)=1 exch2_oi(2,667)=0 exch2_oj(2,667)=0 exch2_neighbourId(3,667)=668 exch2_iLo(3,667)=35 exch2_iHi(3,667)=35 exch2_jLo(3,667)=0 exch2_jHi(3,667)=52 exch2_opposingSend(3,667)=4 exch2_pij(1,3,667)=1 exch2_pij(2,3,667)=0 exch2_pij(3,3,667)=0 exch2_pij(4,3,667)=1 exch2_oi(3,667)=0 exch2_oj(3,667)=0 exch2_neighbourId(4,667)=666 exch2_iLo(4,667)=0 exch2_iHi(4,667)=0 exch2_jLo(4,667)=0 exch2_jHi(4,667)=52 exch2_opposingSend(4,667)=3 exch2_pij(1,4,667)=1 exch2_pij(2,4,667)=0 exch2_pij(3,4,667)=0 exch2_pij(4,4,667)=1 exch2_oi(4,667)=0 exch2_oj(4,667)=0 RETURN END SUBROUTINE W2_E2SETUP_668 C Topology for tile 668 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(668)=34 exch2_tNy(668)=51 exch2_tBasex(668)=238 exch2_tBasey(668)=204 exch2_txGlobalo(668)=2279 exch2_tyGlobalo(668)=205 exch2_isWedge(668)=0 exch2_isNedge(668)=0 exch2_isEedge(668)=0 exch2_isSedge(668)=0 exch2_myFace(668)=5 exch2_mydNx(668)=510 exch2_mydNy(668)=510 exch2_nNeighbours(668)=4 exch2_neighbourId(1,668)=683 exch2_iLo(1,668)=0 exch2_iHi(1,668)=35 exch2_jLo(1,668)=52 exch2_jHi(1,668)=52 exch2_opposingSend(1,668)=2 exch2_pij(1,1,668)=1 exch2_pij(2,1,668)=0 exch2_pij(3,1,668)=0 exch2_pij(4,1,668)=1 exch2_oi(1,668)=0 exch2_oj(1,668)=0 exch2_neighbourId(2,668)=653 exch2_iLo(2,668)=0 exch2_iHi(2,668)=35 exch2_jLo(2,668)=0 exch2_jHi(2,668)=0 exch2_opposingSend(2,668)=1 exch2_pij(1,2,668)=1 exch2_pij(2,2,668)=0 exch2_pij(3,2,668)=0 exch2_pij(4,2,668)=1 exch2_oi(2,668)=0 exch2_oj(2,668)=0 exch2_neighbourId(3,668)=669 exch2_iLo(3,668)=35 exch2_iHi(3,668)=35 exch2_jLo(3,668)=0 exch2_jHi(3,668)=52 exch2_opposingSend(3,668)=4 exch2_pij(1,3,668)=1 exch2_pij(2,3,668)=0 exch2_pij(3,3,668)=0 exch2_pij(4,3,668)=1 exch2_oi(3,668)=0 exch2_oj(3,668)=0 exch2_neighbourId(4,668)=667 exch2_iLo(4,668)=0 exch2_iHi(4,668)=0 exch2_jLo(4,668)=0 exch2_jHi(4,668)=52 exch2_opposingSend(4,668)=3 exch2_pij(1,4,668)=1 exch2_pij(2,4,668)=0 exch2_pij(3,4,668)=0 exch2_pij(4,4,668)=1 exch2_oi(4,668)=0 exch2_oj(4,668)=0 RETURN END SUBROUTINE W2_E2SETUP_669 C Topology for tile 669 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(669)=34 exch2_tNy(669)=51 exch2_tBasex(669)=272 exch2_tBasey(669)=204 exch2_txGlobalo(669)=2313 exch2_tyGlobalo(669)=205 exch2_isWedge(669)=0 exch2_isNedge(669)=0 exch2_isEedge(669)=0 exch2_isSedge(669)=0 exch2_myFace(669)=5 exch2_mydNx(669)=510 exch2_mydNy(669)=510 exch2_nNeighbours(669)=4 exch2_neighbourId(1,669)=684 exch2_iLo(1,669)=0 exch2_iHi(1,669)=35 exch2_jLo(1,669)=52 exch2_jHi(1,669)=52 exch2_opposingSend(1,669)=2 exch2_pij(1,1,669)=1 exch2_pij(2,1,669)=0 exch2_pij(3,1,669)=0 exch2_pij(4,1,669)=1 exch2_oi(1,669)=0 exch2_oj(1,669)=0 exch2_neighbourId(2,669)=654 exch2_iLo(2,669)=0 exch2_iHi(2,669)=35 exch2_jLo(2,669)=0 exch2_jHi(2,669)=0 exch2_opposingSend(2,669)=1 exch2_pij(1,2,669)=1 exch2_pij(2,2,669)=0 exch2_pij(3,2,669)=0 exch2_pij(4,2,669)=1 exch2_oi(2,669)=0 exch2_oj(2,669)=0 exch2_neighbourId(3,669)=670 exch2_iLo(3,669)=35 exch2_iHi(3,669)=35 exch2_jLo(3,669)=0 exch2_jHi(3,669)=52 exch2_opposingSend(3,669)=4 exch2_pij(1,3,669)=1 exch2_pij(2,3,669)=0 exch2_pij(3,3,669)=0 exch2_pij(4,3,669)=1 exch2_oi(3,669)=0 exch2_oj(3,669)=0 exch2_neighbourId(4,669)=668 exch2_iLo(4,669)=0 exch2_iHi(4,669)=0 exch2_jLo(4,669)=0 exch2_jHi(4,669)=52 exch2_opposingSend(4,669)=3 exch2_pij(1,4,669)=1 exch2_pij(2,4,669)=0 exch2_pij(3,4,669)=0 exch2_pij(4,4,669)=1 exch2_oi(4,669)=0 exch2_oj(4,669)=0 RETURN END SUBROUTINE W2_E2SETUP_670 C Topology for tile 670 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(670)=34 exch2_tNy(670)=51 exch2_tBasex(670)=306 exch2_tBasey(670)=204 exch2_txGlobalo(670)=2347 exch2_tyGlobalo(670)=205 exch2_isWedge(670)=0 exch2_isNedge(670)=0 exch2_isEedge(670)=0 exch2_isSedge(670)=0 exch2_myFace(670)=5 exch2_mydNx(670)=510 exch2_mydNy(670)=510 exch2_nNeighbours(670)=4 exch2_neighbourId(1,670)=685 exch2_iLo(1,670)=0 exch2_iHi(1,670)=35 exch2_jLo(1,670)=52 exch2_jHi(1,670)=52 exch2_opposingSend(1,670)=2 exch2_pij(1,1,670)=1 exch2_pij(2,1,670)=0 exch2_pij(3,1,670)=0 exch2_pij(4,1,670)=1 exch2_oi(1,670)=0 exch2_oj(1,670)=0 exch2_neighbourId(2,670)=655 exch2_iLo(2,670)=0 exch2_iHi(2,670)=35 exch2_jLo(2,670)=0 exch2_jHi(2,670)=0 exch2_opposingSend(2,670)=1 exch2_pij(1,2,670)=1 exch2_pij(2,2,670)=0 exch2_pij(3,2,670)=0 exch2_pij(4,2,670)=1 exch2_oi(2,670)=0 exch2_oj(2,670)=0 exch2_neighbourId(3,670)=671 exch2_iLo(3,670)=35 exch2_iHi(3,670)=35 exch2_jLo(3,670)=0 exch2_jHi(3,670)=52 exch2_opposingSend(3,670)=4 exch2_pij(1,3,670)=1 exch2_pij(2,3,670)=0 exch2_pij(3,3,670)=0 exch2_pij(4,3,670)=1 exch2_oi(3,670)=0 exch2_oj(3,670)=0 exch2_neighbourId(4,670)=669 exch2_iLo(4,670)=0 exch2_iHi(4,670)=0 exch2_jLo(4,670)=0 exch2_jHi(4,670)=52 exch2_opposingSend(4,670)=3 exch2_pij(1,4,670)=1 exch2_pij(2,4,670)=0 exch2_pij(3,4,670)=0 exch2_pij(4,4,670)=1 exch2_oi(4,670)=0 exch2_oj(4,670)=0 RETURN END SUBROUTINE W2_E2SETUP_671 C Topology for tile 671 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(671)=34 exch2_tNy(671)=51 exch2_tBasex(671)=340 exch2_tBasey(671)=204 exch2_txGlobalo(671)=2381 exch2_tyGlobalo(671)=205 exch2_isWedge(671)=0 exch2_isNedge(671)=0 exch2_isEedge(671)=0 exch2_isSedge(671)=0 exch2_myFace(671)=5 exch2_mydNx(671)=510 exch2_mydNy(671)=510 exch2_nNeighbours(671)=4 exch2_neighbourId(1,671)=686 exch2_iLo(1,671)=0 exch2_iHi(1,671)=35 exch2_jLo(1,671)=52 exch2_jHi(1,671)=52 exch2_opposingSend(1,671)=2 exch2_pij(1,1,671)=1 exch2_pij(2,1,671)=0 exch2_pij(3,1,671)=0 exch2_pij(4,1,671)=1 exch2_oi(1,671)=0 exch2_oj(1,671)=0 exch2_neighbourId(2,671)=656 exch2_iLo(2,671)=0 exch2_iHi(2,671)=35 exch2_jLo(2,671)=0 exch2_jHi(2,671)=0 exch2_opposingSend(2,671)=1 exch2_pij(1,2,671)=1 exch2_pij(2,2,671)=0 exch2_pij(3,2,671)=0 exch2_pij(4,2,671)=1 exch2_oi(2,671)=0 exch2_oj(2,671)=0 exch2_neighbourId(3,671)=672 exch2_iLo(3,671)=35 exch2_iHi(3,671)=35 exch2_jLo(3,671)=0 exch2_jHi(3,671)=52 exch2_opposingSend(3,671)=4 exch2_pij(1,3,671)=1 exch2_pij(2,3,671)=0 exch2_pij(3,3,671)=0 exch2_pij(4,3,671)=1 exch2_oi(3,671)=0 exch2_oj(3,671)=0 exch2_neighbourId(4,671)=670 exch2_iLo(4,671)=0 exch2_iHi(4,671)=0 exch2_jLo(4,671)=0 exch2_jHi(4,671)=52 exch2_opposingSend(4,671)=3 exch2_pij(1,4,671)=1 exch2_pij(2,4,671)=0 exch2_pij(3,4,671)=0 exch2_pij(4,4,671)=1 exch2_oi(4,671)=0 exch2_oj(4,671)=0 RETURN END SUBROUTINE W2_E2SETUP_672 C Topology for tile 672 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(672)=34 exch2_tNy(672)=51 exch2_tBasex(672)=374 exch2_tBasey(672)=204 exch2_txGlobalo(672)=2415 exch2_tyGlobalo(672)=205 exch2_isWedge(672)=0 exch2_isNedge(672)=0 exch2_isEedge(672)=0 exch2_isSedge(672)=0 exch2_myFace(672)=5 exch2_mydNx(672)=510 exch2_mydNy(672)=510 exch2_nNeighbours(672)=4 exch2_neighbourId(1,672)=687 exch2_iLo(1,672)=0 exch2_iHi(1,672)=35 exch2_jLo(1,672)=52 exch2_jHi(1,672)=52 exch2_opposingSend(1,672)=2 exch2_pij(1,1,672)=1 exch2_pij(2,1,672)=0 exch2_pij(3,1,672)=0 exch2_pij(4,1,672)=1 exch2_oi(1,672)=0 exch2_oj(1,672)=0 exch2_neighbourId(2,672)=657 exch2_iLo(2,672)=0 exch2_iHi(2,672)=35 exch2_jLo(2,672)=0 exch2_jHi(2,672)=0 exch2_opposingSend(2,672)=1 exch2_pij(1,2,672)=1 exch2_pij(2,2,672)=0 exch2_pij(3,2,672)=0 exch2_pij(4,2,672)=1 exch2_oi(2,672)=0 exch2_oj(2,672)=0 exch2_neighbourId(3,672)=673 exch2_iLo(3,672)=35 exch2_iHi(3,672)=35 exch2_jLo(3,672)=0 exch2_jHi(3,672)=52 exch2_opposingSend(3,672)=4 exch2_pij(1,3,672)=1 exch2_pij(2,3,672)=0 exch2_pij(3,3,672)=0 exch2_pij(4,3,672)=1 exch2_oi(3,672)=0 exch2_oj(3,672)=0 exch2_neighbourId(4,672)=671 exch2_iLo(4,672)=0 exch2_iHi(4,672)=0 exch2_jLo(4,672)=0 exch2_jHi(4,672)=52 exch2_opposingSend(4,672)=3 exch2_pij(1,4,672)=1 exch2_pij(2,4,672)=0 exch2_pij(3,4,672)=0 exch2_pij(4,4,672)=1 exch2_oi(4,672)=0 exch2_oj(4,672)=0 RETURN END SUBROUTINE W2_E2SETUP_673 C Topology for tile 673 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(673)=34 exch2_tNy(673)=51 exch2_tBasex(673)=408 exch2_tBasey(673)=204 exch2_txGlobalo(673)=2449 exch2_tyGlobalo(673)=205 exch2_isWedge(673)=0 exch2_isNedge(673)=0 exch2_isEedge(673)=0 exch2_isSedge(673)=0 exch2_myFace(673)=5 exch2_mydNx(673)=510 exch2_mydNy(673)=510 exch2_nNeighbours(673)=4 exch2_neighbourId(1,673)=688 exch2_iLo(1,673)=0 exch2_iHi(1,673)=35 exch2_jLo(1,673)=52 exch2_jHi(1,673)=52 exch2_opposingSend(1,673)=2 exch2_pij(1,1,673)=1 exch2_pij(2,1,673)=0 exch2_pij(3,1,673)=0 exch2_pij(4,1,673)=1 exch2_oi(1,673)=0 exch2_oj(1,673)=0 exch2_neighbourId(2,673)=658 exch2_iLo(2,673)=0 exch2_iHi(2,673)=35 exch2_jLo(2,673)=0 exch2_jHi(2,673)=0 exch2_opposingSend(2,673)=1 exch2_pij(1,2,673)=1 exch2_pij(2,2,673)=0 exch2_pij(3,2,673)=0 exch2_pij(4,2,673)=1 exch2_oi(2,673)=0 exch2_oj(2,673)=0 exch2_neighbourId(3,673)=674 exch2_iLo(3,673)=35 exch2_iHi(3,673)=35 exch2_jLo(3,673)=0 exch2_jHi(3,673)=52 exch2_opposingSend(3,673)=4 exch2_pij(1,3,673)=1 exch2_pij(2,3,673)=0 exch2_pij(3,3,673)=0 exch2_pij(4,3,673)=1 exch2_oi(3,673)=0 exch2_oj(3,673)=0 exch2_neighbourId(4,673)=672 exch2_iLo(4,673)=0 exch2_iHi(4,673)=0 exch2_jLo(4,673)=0 exch2_jHi(4,673)=52 exch2_opposingSend(4,673)=3 exch2_pij(1,4,673)=1 exch2_pij(2,4,673)=0 exch2_pij(3,4,673)=0 exch2_pij(4,4,673)=1 exch2_oi(4,673)=0 exch2_oj(4,673)=0 RETURN END SUBROUTINE W2_E2SETUP_674 C Topology for tile 674 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(674)=34 exch2_tNy(674)=51 exch2_tBasex(674)=442 exch2_tBasey(674)=204 exch2_txGlobalo(674)=2483 exch2_tyGlobalo(674)=205 exch2_isWedge(674)=0 exch2_isNedge(674)=0 exch2_isEedge(674)=0 exch2_isSedge(674)=0 exch2_myFace(674)=5 exch2_mydNx(674)=510 exch2_mydNy(674)=510 exch2_nNeighbours(674)=4 exch2_neighbourId(1,674)=689 exch2_iLo(1,674)=0 exch2_iHi(1,674)=35 exch2_jLo(1,674)=52 exch2_jHi(1,674)=52 exch2_opposingSend(1,674)=2 exch2_pij(1,1,674)=1 exch2_pij(2,1,674)=0 exch2_pij(3,1,674)=0 exch2_pij(4,1,674)=1 exch2_oi(1,674)=0 exch2_oj(1,674)=0 exch2_neighbourId(2,674)=659 exch2_iLo(2,674)=0 exch2_iHi(2,674)=35 exch2_jLo(2,674)=0 exch2_jHi(2,674)=0 exch2_opposingSend(2,674)=1 exch2_pij(1,2,674)=1 exch2_pij(2,2,674)=0 exch2_pij(3,2,674)=0 exch2_pij(4,2,674)=1 exch2_oi(2,674)=0 exch2_oj(2,674)=0 exch2_neighbourId(3,674)=675 exch2_iLo(3,674)=35 exch2_iHi(3,674)=35 exch2_jLo(3,674)=0 exch2_jHi(3,674)=52 exch2_opposingSend(3,674)=4 exch2_pij(1,3,674)=1 exch2_pij(2,3,674)=0 exch2_pij(3,3,674)=0 exch2_pij(4,3,674)=1 exch2_oi(3,674)=0 exch2_oj(3,674)=0 exch2_neighbourId(4,674)=673 exch2_iLo(4,674)=0 exch2_iHi(4,674)=0 exch2_jLo(4,674)=0 exch2_jHi(4,674)=52 exch2_opposingSend(4,674)=3 exch2_pij(1,4,674)=1 exch2_pij(2,4,674)=0 exch2_pij(3,4,674)=0 exch2_pij(4,4,674)=1 exch2_oi(4,674)=0 exch2_oj(4,674)=0 RETURN END SUBROUTINE W2_E2SETUP_675 C Topology for tile 675 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(675)=34 exch2_tNy(675)=51 exch2_tBasex(675)=476 exch2_tBasey(675)=204 exch2_txGlobalo(675)=2517 exch2_tyGlobalo(675)=205 exch2_isWedge(675)=0 exch2_isNedge(675)=0 exch2_isEedge(675)=1 exch2_isSedge(675)=0 exch2_myFace(675)=5 exch2_mydNx(675)=510 exch2_mydNy(675)=510 exch2_nNeighbours(675)=4 exch2_neighbourId(1,675)=690 exch2_iLo(1,675)=0 exch2_iHi(1,675)=35 exch2_jLo(1,675)=52 exch2_jHi(1,675)=52 exch2_opposingSend(1,675)=2 exch2_pij(1,1,675)=1 exch2_pij(2,1,675)=0 exch2_pij(3,1,675)=0 exch2_pij(4,1,675)=1 exch2_oi(1,675)=0 exch2_oj(1,675)=0 exch2_neighbourId(2,675)=660 exch2_iLo(2,675)=0 exch2_iHi(2,675)=35 exch2_jLo(2,675)=0 exch2_jHi(2,675)=0 exch2_opposingSend(2,675)=1 exch2_pij(1,2,675)=1 exch2_pij(2,2,675)=0 exch2_pij(3,2,675)=0 exch2_pij(4,2,675)=1 exch2_oi(2,675)=0 exch2_oj(2,675)=0 exch2_neighbourId(3,675)=811 exch2_iLo(3,675)=35 exch2_iHi(3,675)=35 exch2_jLo(3,675)=0 exch2_jHi(3,675)=52 exch2_opposingSend(3,675)=4 exch2_pij(1,3,675)=1 exch2_pij(2,3,675)=0 exch2_pij(3,3,675)=0 exch2_pij(4,3,675)=1 exch2_oi(3,675)=510 exch2_oj(3,675)=0 exch2_neighbourId(4,675)=674 exch2_iLo(4,675)=0 exch2_iHi(4,675)=0 exch2_jLo(4,675)=0 exch2_jHi(4,675)=52 exch2_opposingSend(4,675)=3 exch2_pij(1,4,675)=1 exch2_pij(2,4,675)=0 exch2_pij(3,4,675)=0 exch2_pij(4,4,675)=1 exch2_oi(4,675)=0 exch2_oj(4,675)=0 RETURN END SUBROUTINE W2_E2SETUP_676 C Topology for tile 676 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(676)=34 exch2_tNy(676)=51 exch2_tBasex(676)=0 exch2_tBasey(676)=255 exch2_txGlobalo(676)=2041 exch2_tyGlobalo(676)=256 exch2_isWedge(676)=1 exch2_isNedge(676)=0 exch2_isEedge(676)=0 exch2_isSedge(676)=0 exch2_myFace(676)=5 exch2_mydNx(676)=510 exch2_mydNy(676)=510 exch2_nNeighbours(676)=5 exch2_neighbourId(1,676)=691 exch2_iLo(1,676)=0 exch2_iHi(1,676)=35 exch2_jLo(1,676)=52 exch2_jHi(1,676)=52 exch2_opposingSend(1,676)=2 exch2_pij(1,1,676)=1 exch2_pij(2,1,676)=0 exch2_pij(3,1,676)=0 exch2_pij(4,1,676)=1 exch2_oi(1,676)=0 exch2_oj(1,676)=0 exch2_neighbourId(2,676)=661 exch2_iLo(2,676)=0 exch2_iHi(2,676)=35 exch2_jLo(2,676)=0 exch2_jHi(2,676)=0 exch2_opposingSend(2,676)=1 exch2_pij(1,2,676)=1 exch2_pij(2,2,676)=0 exch2_pij(3,2,676)=0 exch2_pij(4,2,676)=1 exch2_oi(2,676)=0 exch2_oj(2,676)=0 exch2_neighbourId(3,676)=677 exch2_iLo(3,676)=35 exch2_iHi(3,676)=35 exch2_jLo(3,676)=0 exch2_jHi(3,676)=52 exch2_opposingSend(3,676)=4 exch2_pij(1,3,676)=1 exch2_pij(2,3,676)=0 exch2_pij(3,3,676)=0 exch2_pij(4,3,676)=1 exch2_oi(3,676)=0 exch2_oj(3,676)=0 exch2_neighbourId(4,676)=442 exch2_iLo(4,676)=0 exch2_iHi(4,676)=0 exch2_jLo(4,676)=17 exch2_jHi(4,676)=52 exch2_opposingSend(4,676)=1 exch2_pij(1,4,676)=0 exch2_pij(2,4,676)=1 exch2_pij(3,4,676)=-1 exch2_pij(4,4,676)=0 exch2_oi(4,676)=-510 exch2_oj(4,676)=511 exch2_neighbourId(5,676)=443 exch2_iLo(5,676)=0 exch2_iHi(5,676)=0 exch2_jLo(5,676)=0 exch2_jHi(5,676)=18 exch2_opposingSend(5,676)=2 exch2_pij(1,5,676)=0 exch2_pij(2,5,676)=1 exch2_pij(3,5,676)=-1 exch2_pij(4,5,676)=0 exch2_oi(5,676)=-510 exch2_oj(5,676)=511 RETURN END SUBROUTINE W2_E2SETUP_677 C Topology for tile 677 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(677)=34 exch2_tNy(677)=51 exch2_tBasex(677)=34 exch2_tBasey(677)=255 exch2_txGlobalo(677)=2075 exch2_tyGlobalo(677)=256 exch2_isWedge(677)=0 exch2_isNedge(677)=0 exch2_isEedge(677)=0 exch2_isSedge(677)=0 exch2_myFace(677)=5 exch2_mydNx(677)=510 exch2_mydNy(677)=510 exch2_nNeighbours(677)=4 exch2_neighbourId(1,677)=692 exch2_iLo(1,677)=0 exch2_iHi(1,677)=35 exch2_jLo(1,677)=52 exch2_jHi(1,677)=52 exch2_opposingSend(1,677)=2 exch2_pij(1,1,677)=1 exch2_pij(2,1,677)=0 exch2_pij(3,1,677)=0 exch2_pij(4,1,677)=1 exch2_oi(1,677)=0 exch2_oj(1,677)=0 exch2_neighbourId(2,677)=662 exch2_iLo(2,677)=0 exch2_iHi(2,677)=35 exch2_jLo(2,677)=0 exch2_jHi(2,677)=0 exch2_opposingSend(2,677)=1 exch2_pij(1,2,677)=1 exch2_pij(2,2,677)=0 exch2_pij(3,2,677)=0 exch2_pij(4,2,677)=1 exch2_oi(2,677)=0 exch2_oj(2,677)=0 exch2_neighbourId(3,677)=678 exch2_iLo(3,677)=35 exch2_iHi(3,677)=35 exch2_jLo(3,677)=0 exch2_jHi(3,677)=52 exch2_opposingSend(3,677)=4 exch2_pij(1,3,677)=1 exch2_pij(2,3,677)=0 exch2_pij(3,3,677)=0 exch2_pij(4,3,677)=1 exch2_oi(3,677)=0 exch2_oj(3,677)=0 exch2_neighbourId(4,677)=676 exch2_iLo(4,677)=0 exch2_iHi(4,677)=0 exch2_jLo(4,677)=0 exch2_jHi(4,677)=52 exch2_opposingSend(4,677)=3 exch2_pij(1,4,677)=1 exch2_pij(2,4,677)=0 exch2_pij(3,4,677)=0 exch2_pij(4,4,677)=1 exch2_oi(4,677)=0 exch2_oj(4,677)=0 RETURN END SUBROUTINE W2_E2SETUP_678 C Topology for tile 678 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(678)=34 exch2_tNy(678)=51 exch2_tBasex(678)=68 exch2_tBasey(678)=255 exch2_txGlobalo(678)=2109 exch2_tyGlobalo(678)=256 exch2_isWedge(678)=0 exch2_isNedge(678)=0 exch2_isEedge(678)=0 exch2_isSedge(678)=0 exch2_myFace(678)=5 exch2_mydNx(678)=510 exch2_mydNy(678)=510 exch2_nNeighbours(678)=4 exch2_neighbourId(1,678)=693 exch2_iLo(1,678)=0 exch2_iHi(1,678)=35 exch2_jLo(1,678)=52 exch2_jHi(1,678)=52 exch2_opposingSend(1,678)=2 exch2_pij(1,1,678)=1 exch2_pij(2,1,678)=0 exch2_pij(3,1,678)=0 exch2_pij(4,1,678)=1 exch2_oi(1,678)=0 exch2_oj(1,678)=0 exch2_neighbourId(2,678)=663 exch2_iLo(2,678)=0 exch2_iHi(2,678)=35 exch2_jLo(2,678)=0 exch2_jHi(2,678)=0 exch2_opposingSend(2,678)=1 exch2_pij(1,2,678)=1 exch2_pij(2,2,678)=0 exch2_pij(3,2,678)=0 exch2_pij(4,2,678)=1 exch2_oi(2,678)=0 exch2_oj(2,678)=0 exch2_neighbourId(3,678)=679 exch2_iLo(3,678)=35 exch2_iHi(3,678)=35 exch2_jLo(3,678)=0 exch2_jHi(3,678)=52 exch2_opposingSend(3,678)=4 exch2_pij(1,3,678)=1 exch2_pij(2,3,678)=0 exch2_pij(3,3,678)=0 exch2_pij(4,3,678)=1 exch2_oi(3,678)=0 exch2_oj(3,678)=0 exch2_neighbourId(4,678)=677 exch2_iLo(4,678)=0 exch2_iHi(4,678)=0 exch2_jLo(4,678)=0 exch2_jHi(4,678)=52 exch2_opposingSend(4,678)=3 exch2_pij(1,4,678)=1 exch2_pij(2,4,678)=0 exch2_pij(3,4,678)=0 exch2_pij(4,4,678)=1 exch2_oi(4,678)=0 exch2_oj(4,678)=0 RETURN END SUBROUTINE W2_E2SETUP_679 C Topology for tile 679 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(679)=34 exch2_tNy(679)=51 exch2_tBasex(679)=102 exch2_tBasey(679)=255 exch2_txGlobalo(679)=2143 exch2_tyGlobalo(679)=256 exch2_isWedge(679)=0 exch2_isNedge(679)=0 exch2_isEedge(679)=0 exch2_isSedge(679)=0 exch2_myFace(679)=5 exch2_mydNx(679)=510 exch2_mydNy(679)=510 exch2_nNeighbours(679)=4 exch2_neighbourId(1,679)=694 exch2_iLo(1,679)=0 exch2_iHi(1,679)=35 exch2_jLo(1,679)=52 exch2_jHi(1,679)=52 exch2_opposingSend(1,679)=2 exch2_pij(1,1,679)=1 exch2_pij(2,1,679)=0 exch2_pij(3,1,679)=0 exch2_pij(4,1,679)=1 exch2_oi(1,679)=0 exch2_oj(1,679)=0 exch2_neighbourId(2,679)=664 exch2_iLo(2,679)=0 exch2_iHi(2,679)=35 exch2_jLo(2,679)=0 exch2_jHi(2,679)=0 exch2_opposingSend(2,679)=1 exch2_pij(1,2,679)=1 exch2_pij(2,2,679)=0 exch2_pij(3,2,679)=0 exch2_pij(4,2,679)=1 exch2_oi(2,679)=0 exch2_oj(2,679)=0 exch2_neighbourId(3,679)=680 exch2_iLo(3,679)=35 exch2_iHi(3,679)=35 exch2_jLo(3,679)=0 exch2_jHi(3,679)=52 exch2_opposingSend(3,679)=4 exch2_pij(1,3,679)=1 exch2_pij(2,3,679)=0 exch2_pij(3,3,679)=0 exch2_pij(4,3,679)=1 exch2_oi(3,679)=0 exch2_oj(3,679)=0 exch2_neighbourId(4,679)=678 exch2_iLo(4,679)=0 exch2_iHi(4,679)=0 exch2_jLo(4,679)=0 exch2_jHi(4,679)=52 exch2_opposingSend(4,679)=3 exch2_pij(1,4,679)=1 exch2_pij(2,4,679)=0 exch2_pij(3,4,679)=0 exch2_pij(4,4,679)=1 exch2_oi(4,679)=0 exch2_oj(4,679)=0 RETURN END SUBROUTINE W2_E2SETUP_680 C Topology for tile 680 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(680)=34 exch2_tNy(680)=51 exch2_tBasex(680)=136 exch2_tBasey(680)=255 exch2_txGlobalo(680)=2177 exch2_tyGlobalo(680)=256 exch2_isWedge(680)=0 exch2_isNedge(680)=0 exch2_isEedge(680)=0 exch2_isSedge(680)=0 exch2_myFace(680)=5 exch2_mydNx(680)=510 exch2_mydNy(680)=510 exch2_nNeighbours(680)=4 exch2_neighbourId(1,680)=695 exch2_iLo(1,680)=0 exch2_iHi(1,680)=35 exch2_jLo(1,680)=52 exch2_jHi(1,680)=52 exch2_opposingSend(1,680)=2 exch2_pij(1,1,680)=1 exch2_pij(2,1,680)=0 exch2_pij(3,1,680)=0 exch2_pij(4,1,680)=1 exch2_oi(1,680)=0 exch2_oj(1,680)=0 exch2_neighbourId(2,680)=665 exch2_iLo(2,680)=0 exch2_iHi(2,680)=35 exch2_jLo(2,680)=0 exch2_jHi(2,680)=0 exch2_opposingSend(2,680)=1 exch2_pij(1,2,680)=1 exch2_pij(2,2,680)=0 exch2_pij(3,2,680)=0 exch2_pij(4,2,680)=1 exch2_oi(2,680)=0 exch2_oj(2,680)=0 exch2_neighbourId(3,680)=681 exch2_iLo(3,680)=35 exch2_iHi(3,680)=35 exch2_jLo(3,680)=0 exch2_jHi(3,680)=52 exch2_opposingSend(3,680)=4 exch2_pij(1,3,680)=1 exch2_pij(2,3,680)=0 exch2_pij(3,3,680)=0 exch2_pij(4,3,680)=1 exch2_oi(3,680)=0 exch2_oj(3,680)=0 exch2_neighbourId(4,680)=679 exch2_iLo(4,680)=0 exch2_iHi(4,680)=0 exch2_jLo(4,680)=0 exch2_jHi(4,680)=52 exch2_opposingSend(4,680)=3 exch2_pij(1,4,680)=1 exch2_pij(2,4,680)=0 exch2_pij(3,4,680)=0 exch2_pij(4,4,680)=1 exch2_oi(4,680)=0 exch2_oj(4,680)=0 RETURN END SUBROUTINE W2_E2SETUP_681 C Topology for tile 681 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(681)=34 exch2_tNy(681)=51 exch2_tBasex(681)=170 exch2_tBasey(681)=255 exch2_txGlobalo(681)=2211 exch2_tyGlobalo(681)=256 exch2_isWedge(681)=0 exch2_isNedge(681)=0 exch2_isEedge(681)=0 exch2_isSedge(681)=0 exch2_myFace(681)=5 exch2_mydNx(681)=510 exch2_mydNy(681)=510 exch2_nNeighbours(681)=4 exch2_neighbourId(1,681)=696 exch2_iLo(1,681)=0 exch2_iHi(1,681)=35 exch2_jLo(1,681)=52 exch2_jHi(1,681)=52 exch2_opposingSend(1,681)=2 exch2_pij(1,1,681)=1 exch2_pij(2,1,681)=0 exch2_pij(3,1,681)=0 exch2_pij(4,1,681)=1 exch2_oi(1,681)=0 exch2_oj(1,681)=0 exch2_neighbourId(2,681)=666 exch2_iLo(2,681)=0 exch2_iHi(2,681)=35 exch2_jLo(2,681)=0 exch2_jHi(2,681)=0 exch2_opposingSend(2,681)=1 exch2_pij(1,2,681)=1 exch2_pij(2,2,681)=0 exch2_pij(3,2,681)=0 exch2_pij(4,2,681)=1 exch2_oi(2,681)=0 exch2_oj(2,681)=0 exch2_neighbourId(3,681)=682 exch2_iLo(3,681)=35 exch2_iHi(3,681)=35 exch2_jLo(3,681)=0 exch2_jHi(3,681)=52 exch2_opposingSend(3,681)=4 exch2_pij(1,3,681)=1 exch2_pij(2,3,681)=0 exch2_pij(3,3,681)=0 exch2_pij(4,3,681)=1 exch2_oi(3,681)=0 exch2_oj(3,681)=0 exch2_neighbourId(4,681)=680 exch2_iLo(4,681)=0 exch2_iHi(4,681)=0 exch2_jLo(4,681)=0 exch2_jHi(4,681)=52 exch2_opposingSend(4,681)=3 exch2_pij(1,4,681)=1 exch2_pij(2,4,681)=0 exch2_pij(3,4,681)=0 exch2_pij(4,4,681)=1 exch2_oi(4,681)=0 exch2_oj(4,681)=0 RETURN END SUBROUTINE W2_E2SETUP_682 C Topology for tile 682 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(682)=34 exch2_tNy(682)=51 exch2_tBasex(682)=204 exch2_tBasey(682)=255 exch2_txGlobalo(682)=2245 exch2_tyGlobalo(682)=256 exch2_isWedge(682)=0 exch2_isNedge(682)=0 exch2_isEedge(682)=0 exch2_isSedge(682)=0 exch2_myFace(682)=5 exch2_mydNx(682)=510 exch2_mydNy(682)=510 exch2_nNeighbours(682)=4 exch2_neighbourId(1,682)=697 exch2_iLo(1,682)=0 exch2_iHi(1,682)=35 exch2_jLo(1,682)=52 exch2_jHi(1,682)=52 exch2_opposingSend(1,682)=2 exch2_pij(1,1,682)=1 exch2_pij(2,1,682)=0 exch2_pij(3,1,682)=0 exch2_pij(4,1,682)=1 exch2_oi(1,682)=0 exch2_oj(1,682)=0 exch2_neighbourId(2,682)=667 exch2_iLo(2,682)=0 exch2_iHi(2,682)=35 exch2_jLo(2,682)=0 exch2_jHi(2,682)=0 exch2_opposingSend(2,682)=1 exch2_pij(1,2,682)=1 exch2_pij(2,2,682)=0 exch2_pij(3,2,682)=0 exch2_pij(4,2,682)=1 exch2_oi(2,682)=0 exch2_oj(2,682)=0 exch2_neighbourId(3,682)=683 exch2_iLo(3,682)=35 exch2_iHi(3,682)=35 exch2_jLo(3,682)=0 exch2_jHi(3,682)=52 exch2_opposingSend(3,682)=4 exch2_pij(1,3,682)=1 exch2_pij(2,3,682)=0 exch2_pij(3,3,682)=0 exch2_pij(4,3,682)=1 exch2_oi(3,682)=0 exch2_oj(3,682)=0 exch2_neighbourId(4,682)=681 exch2_iLo(4,682)=0 exch2_iHi(4,682)=0 exch2_jLo(4,682)=0 exch2_jHi(4,682)=52 exch2_opposingSend(4,682)=3 exch2_pij(1,4,682)=1 exch2_pij(2,4,682)=0 exch2_pij(3,4,682)=0 exch2_pij(4,4,682)=1 exch2_oi(4,682)=0 exch2_oj(4,682)=0 RETURN END SUBROUTINE W2_E2SETUP_683 C Topology for tile 683 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(683)=34 exch2_tNy(683)=51 exch2_tBasex(683)=238 exch2_tBasey(683)=255 exch2_txGlobalo(683)=2279 exch2_tyGlobalo(683)=256 exch2_isWedge(683)=0 exch2_isNedge(683)=0 exch2_isEedge(683)=0 exch2_isSedge(683)=0 exch2_myFace(683)=5 exch2_mydNx(683)=510 exch2_mydNy(683)=510 exch2_nNeighbours(683)=4 exch2_neighbourId(1,683)=698 exch2_iLo(1,683)=0 exch2_iHi(1,683)=35 exch2_jLo(1,683)=52 exch2_jHi(1,683)=52 exch2_opposingSend(1,683)=2 exch2_pij(1,1,683)=1 exch2_pij(2,1,683)=0 exch2_pij(3,1,683)=0 exch2_pij(4,1,683)=1 exch2_oi(1,683)=0 exch2_oj(1,683)=0 exch2_neighbourId(2,683)=668 exch2_iLo(2,683)=0 exch2_iHi(2,683)=35 exch2_jLo(2,683)=0 exch2_jHi(2,683)=0 exch2_opposingSend(2,683)=1 exch2_pij(1,2,683)=1 exch2_pij(2,2,683)=0 exch2_pij(3,2,683)=0 exch2_pij(4,2,683)=1 exch2_oi(2,683)=0 exch2_oj(2,683)=0 exch2_neighbourId(3,683)=684 exch2_iLo(3,683)=35 exch2_iHi(3,683)=35 exch2_jLo(3,683)=0 exch2_jHi(3,683)=52 exch2_opposingSend(3,683)=4 exch2_pij(1,3,683)=1 exch2_pij(2,3,683)=0 exch2_pij(3,3,683)=0 exch2_pij(4,3,683)=1 exch2_oi(3,683)=0 exch2_oj(3,683)=0 exch2_neighbourId(4,683)=682 exch2_iLo(4,683)=0 exch2_iHi(4,683)=0 exch2_jLo(4,683)=0 exch2_jHi(4,683)=52 exch2_opposingSend(4,683)=3 exch2_pij(1,4,683)=1 exch2_pij(2,4,683)=0 exch2_pij(3,4,683)=0 exch2_pij(4,4,683)=1 exch2_oi(4,683)=0 exch2_oj(4,683)=0 RETURN END SUBROUTINE W2_E2SETUP_684 C Topology for tile 684 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(684)=34 exch2_tNy(684)=51 exch2_tBasex(684)=272 exch2_tBasey(684)=255 exch2_txGlobalo(684)=2313 exch2_tyGlobalo(684)=256 exch2_isWedge(684)=0 exch2_isNedge(684)=0 exch2_isEedge(684)=0 exch2_isSedge(684)=0 exch2_myFace(684)=5 exch2_mydNx(684)=510 exch2_mydNy(684)=510 exch2_nNeighbours(684)=4 exch2_neighbourId(1,684)=699 exch2_iLo(1,684)=0 exch2_iHi(1,684)=35 exch2_jLo(1,684)=52 exch2_jHi(1,684)=52 exch2_opposingSend(1,684)=2 exch2_pij(1,1,684)=1 exch2_pij(2,1,684)=0 exch2_pij(3,1,684)=0 exch2_pij(4,1,684)=1 exch2_oi(1,684)=0 exch2_oj(1,684)=0 exch2_neighbourId(2,684)=669 exch2_iLo(2,684)=0 exch2_iHi(2,684)=35 exch2_jLo(2,684)=0 exch2_jHi(2,684)=0 exch2_opposingSend(2,684)=1 exch2_pij(1,2,684)=1 exch2_pij(2,2,684)=0 exch2_pij(3,2,684)=0 exch2_pij(4,2,684)=1 exch2_oi(2,684)=0 exch2_oj(2,684)=0 exch2_neighbourId(3,684)=685 exch2_iLo(3,684)=35 exch2_iHi(3,684)=35 exch2_jLo(3,684)=0 exch2_jHi(3,684)=52 exch2_opposingSend(3,684)=4 exch2_pij(1,3,684)=1 exch2_pij(2,3,684)=0 exch2_pij(3,3,684)=0 exch2_pij(4,3,684)=1 exch2_oi(3,684)=0 exch2_oj(3,684)=0 exch2_neighbourId(4,684)=683 exch2_iLo(4,684)=0 exch2_iHi(4,684)=0 exch2_jLo(4,684)=0 exch2_jHi(4,684)=52 exch2_opposingSend(4,684)=3 exch2_pij(1,4,684)=1 exch2_pij(2,4,684)=0 exch2_pij(3,4,684)=0 exch2_pij(4,4,684)=1 exch2_oi(4,684)=0 exch2_oj(4,684)=0 RETURN END SUBROUTINE W2_E2SETUP_685 C Topology for tile 685 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(685)=34 exch2_tNy(685)=51 exch2_tBasex(685)=306 exch2_tBasey(685)=255 exch2_txGlobalo(685)=2347 exch2_tyGlobalo(685)=256 exch2_isWedge(685)=0 exch2_isNedge(685)=0 exch2_isEedge(685)=0 exch2_isSedge(685)=0 exch2_myFace(685)=5 exch2_mydNx(685)=510 exch2_mydNy(685)=510 exch2_nNeighbours(685)=4 exch2_neighbourId(1,685)=700 exch2_iLo(1,685)=0 exch2_iHi(1,685)=35 exch2_jLo(1,685)=52 exch2_jHi(1,685)=52 exch2_opposingSend(1,685)=2 exch2_pij(1,1,685)=1 exch2_pij(2,1,685)=0 exch2_pij(3,1,685)=0 exch2_pij(4,1,685)=1 exch2_oi(1,685)=0 exch2_oj(1,685)=0 exch2_neighbourId(2,685)=670 exch2_iLo(2,685)=0 exch2_iHi(2,685)=35 exch2_jLo(2,685)=0 exch2_jHi(2,685)=0 exch2_opposingSend(2,685)=1 exch2_pij(1,2,685)=1 exch2_pij(2,2,685)=0 exch2_pij(3,2,685)=0 exch2_pij(4,2,685)=1 exch2_oi(2,685)=0 exch2_oj(2,685)=0 exch2_neighbourId(3,685)=686 exch2_iLo(3,685)=35 exch2_iHi(3,685)=35 exch2_jLo(3,685)=0 exch2_jHi(3,685)=52 exch2_opposingSend(3,685)=4 exch2_pij(1,3,685)=1 exch2_pij(2,3,685)=0 exch2_pij(3,3,685)=0 exch2_pij(4,3,685)=1 exch2_oi(3,685)=0 exch2_oj(3,685)=0 exch2_neighbourId(4,685)=684 exch2_iLo(4,685)=0 exch2_iHi(4,685)=0 exch2_jLo(4,685)=0 exch2_jHi(4,685)=52 exch2_opposingSend(4,685)=3 exch2_pij(1,4,685)=1 exch2_pij(2,4,685)=0 exch2_pij(3,4,685)=0 exch2_pij(4,4,685)=1 exch2_oi(4,685)=0 exch2_oj(4,685)=0 RETURN END SUBROUTINE W2_E2SETUP_686 C Topology for tile 686 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(686)=34 exch2_tNy(686)=51 exch2_tBasex(686)=340 exch2_tBasey(686)=255 exch2_txGlobalo(686)=2381 exch2_tyGlobalo(686)=256 exch2_isWedge(686)=0 exch2_isNedge(686)=0 exch2_isEedge(686)=0 exch2_isSedge(686)=0 exch2_myFace(686)=5 exch2_mydNx(686)=510 exch2_mydNy(686)=510 exch2_nNeighbours(686)=4 exch2_neighbourId(1,686)=701 exch2_iLo(1,686)=0 exch2_iHi(1,686)=35 exch2_jLo(1,686)=52 exch2_jHi(1,686)=52 exch2_opposingSend(1,686)=2 exch2_pij(1,1,686)=1 exch2_pij(2,1,686)=0 exch2_pij(3,1,686)=0 exch2_pij(4,1,686)=1 exch2_oi(1,686)=0 exch2_oj(1,686)=0 exch2_neighbourId(2,686)=671 exch2_iLo(2,686)=0 exch2_iHi(2,686)=35 exch2_jLo(2,686)=0 exch2_jHi(2,686)=0 exch2_opposingSend(2,686)=1 exch2_pij(1,2,686)=1 exch2_pij(2,2,686)=0 exch2_pij(3,2,686)=0 exch2_pij(4,2,686)=1 exch2_oi(2,686)=0 exch2_oj(2,686)=0 exch2_neighbourId(3,686)=687 exch2_iLo(3,686)=35 exch2_iHi(3,686)=35 exch2_jLo(3,686)=0 exch2_jHi(3,686)=52 exch2_opposingSend(3,686)=4 exch2_pij(1,3,686)=1 exch2_pij(2,3,686)=0 exch2_pij(3,3,686)=0 exch2_pij(4,3,686)=1 exch2_oi(3,686)=0 exch2_oj(3,686)=0 exch2_neighbourId(4,686)=685 exch2_iLo(4,686)=0 exch2_iHi(4,686)=0 exch2_jLo(4,686)=0 exch2_jHi(4,686)=52 exch2_opposingSend(4,686)=3 exch2_pij(1,4,686)=1 exch2_pij(2,4,686)=0 exch2_pij(3,4,686)=0 exch2_pij(4,4,686)=1 exch2_oi(4,686)=0 exch2_oj(4,686)=0 RETURN END SUBROUTINE W2_E2SETUP_687 C Topology for tile 687 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(687)=34 exch2_tNy(687)=51 exch2_tBasex(687)=374 exch2_tBasey(687)=255 exch2_txGlobalo(687)=2415 exch2_tyGlobalo(687)=256 exch2_isWedge(687)=0 exch2_isNedge(687)=0 exch2_isEedge(687)=0 exch2_isSedge(687)=0 exch2_myFace(687)=5 exch2_mydNx(687)=510 exch2_mydNy(687)=510 exch2_nNeighbours(687)=4 exch2_neighbourId(1,687)=702 exch2_iLo(1,687)=0 exch2_iHi(1,687)=35 exch2_jLo(1,687)=52 exch2_jHi(1,687)=52 exch2_opposingSend(1,687)=2 exch2_pij(1,1,687)=1 exch2_pij(2,1,687)=0 exch2_pij(3,1,687)=0 exch2_pij(4,1,687)=1 exch2_oi(1,687)=0 exch2_oj(1,687)=0 exch2_neighbourId(2,687)=672 exch2_iLo(2,687)=0 exch2_iHi(2,687)=35 exch2_jLo(2,687)=0 exch2_jHi(2,687)=0 exch2_opposingSend(2,687)=1 exch2_pij(1,2,687)=1 exch2_pij(2,2,687)=0 exch2_pij(3,2,687)=0 exch2_pij(4,2,687)=1 exch2_oi(2,687)=0 exch2_oj(2,687)=0 exch2_neighbourId(3,687)=688 exch2_iLo(3,687)=35 exch2_iHi(3,687)=35 exch2_jLo(3,687)=0 exch2_jHi(3,687)=52 exch2_opposingSend(3,687)=4 exch2_pij(1,3,687)=1 exch2_pij(2,3,687)=0 exch2_pij(3,3,687)=0 exch2_pij(4,3,687)=1 exch2_oi(3,687)=0 exch2_oj(3,687)=0 exch2_neighbourId(4,687)=686 exch2_iLo(4,687)=0 exch2_iHi(4,687)=0 exch2_jLo(4,687)=0 exch2_jHi(4,687)=52 exch2_opposingSend(4,687)=3 exch2_pij(1,4,687)=1 exch2_pij(2,4,687)=0 exch2_pij(3,4,687)=0 exch2_pij(4,4,687)=1 exch2_oi(4,687)=0 exch2_oj(4,687)=0 RETURN END SUBROUTINE W2_E2SETUP_688 C Topology for tile 688 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(688)=34 exch2_tNy(688)=51 exch2_tBasex(688)=408 exch2_tBasey(688)=255 exch2_txGlobalo(688)=2449 exch2_tyGlobalo(688)=256 exch2_isWedge(688)=0 exch2_isNedge(688)=0 exch2_isEedge(688)=0 exch2_isSedge(688)=0 exch2_myFace(688)=5 exch2_mydNx(688)=510 exch2_mydNy(688)=510 exch2_nNeighbours(688)=4 exch2_neighbourId(1,688)=703 exch2_iLo(1,688)=0 exch2_iHi(1,688)=35 exch2_jLo(1,688)=52 exch2_jHi(1,688)=52 exch2_opposingSend(1,688)=2 exch2_pij(1,1,688)=1 exch2_pij(2,1,688)=0 exch2_pij(3,1,688)=0 exch2_pij(4,1,688)=1 exch2_oi(1,688)=0 exch2_oj(1,688)=0 exch2_neighbourId(2,688)=673 exch2_iLo(2,688)=0 exch2_iHi(2,688)=35 exch2_jLo(2,688)=0 exch2_jHi(2,688)=0 exch2_opposingSend(2,688)=1 exch2_pij(1,2,688)=1 exch2_pij(2,2,688)=0 exch2_pij(3,2,688)=0 exch2_pij(4,2,688)=1 exch2_oi(2,688)=0 exch2_oj(2,688)=0 exch2_neighbourId(3,688)=689 exch2_iLo(3,688)=35 exch2_iHi(3,688)=35 exch2_jLo(3,688)=0 exch2_jHi(3,688)=52 exch2_opposingSend(3,688)=4 exch2_pij(1,3,688)=1 exch2_pij(2,3,688)=0 exch2_pij(3,3,688)=0 exch2_pij(4,3,688)=1 exch2_oi(3,688)=0 exch2_oj(3,688)=0 exch2_neighbourId(4,688)=687 exch2_iLo(4,688)=0 exch2_iHi(4,688)=0 exch2_jLo(4,688)=0 exch2_jHi(4,688)=52 exch2_opposingSend(4,688)=3 exch2_pij(1,4,688)=1 exch2_pij(2,4,688)=0 exch2_pij(3,4,688)=0 exch2_pij(4,4,688)=1 exch2_oi(4,688)=0 exch2_oj(4,688)=0 RETURN END SUBROUTINE W2_E2SETUP_689 C Topology for tile 689 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(689)=34 exch2_tNy(689)=51 exch2_tBasex(689)=442 exch2_tBasey(689)=255 exch2_txGlobalo(689)=2483 exch2_tyGlobalo(689)=256 exch2_isWedge(689)=0 exch2_isNedge(689)=0 exch2_isEedge(689)=0 exch2_isSedge(689)=0 exch2_myFace(689)=5 exch2_mydNx(689)=510 exch2_mydNy(689)=510 exch2_nNeighbours(689)=4 exch2_neighbourId(1,689)=704 exch2_iLo(1,689)=0 exch2_iHi(1,689)=35 exch2_jLo(1,689)=52 exch2_jHi(1,689)=52 exch2_opposingSend(1,689)=2 exch2_pij(1,1,689)=1 exch2_pij(2,1,689)=0 exch2_pij(3,1,689)=0 exch2_pij(4,1,689)=1 exch2_oi(1,689)=0 exch2_oj(1,689)=0 exch2_neighbourId(2,689)=674 exch2_iLo(2,689)=0 exch2_iHi(2,689)=35 exch2_jLo(2,689)=0 exch2_jHi(2,689)=0 exch2_opposingSend(2,689)=1 exch2_pij(1,2,689)=1 exch2_pij(2,2,689)=0 exch2_pij(3,2,689)=0 exch2_pij(4,2,689)=1 exch2_oi(2,689)=0 exch2_oj(2,689)=0 exch2_neighbourId(3,689)=690 exch2_iLo(3,689)=35 exch2_iHi(3,689)=35 exch2_jLo(3,689)=0 exch2_jHi(3,689)=52 exch2_opposingSend(3,689)=4 exch2_pij(1,3,689)=1 exch2_pij(2,3,689)=0 exch2_pij(3,3,689)=0 exch2_pij(4,3,689)=1 exch2_oi(3,689)=0 exch2_oj(3,689)=0 exch2_neighbourId(4,689)=688 exch2_iLo(4,689)=0 exch2_iHi(4,689)=0 exch2_jLo(4,689)=0 exch2_jHi(4,689)=52 exch2_opposingSend(4,689)=3 exch2_pij(1,4,689)=1 exch2_pij(2,4,689)=0 exch2_pij(3,4,689)=0 exch2_pij(4,4,689)=1 exch2_oi(4,689)=0 exch2_oj(4,689)=0 RETURN END SUBROUTINE W2_E2SETUP_690 C Topology for tile 690 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(690)=34 exch2_tNy(690)=51 exch2_tBasex(690)=476 exch2_tBasey(690)=255 exch2_txGlobalo(690)=2517 exch2_tyGlobalo(690)=256 exch2_isWedge(690)=0 exch2_isNedge(690)=0 exch2_isEedge(690)=1 exch2_isSedge(690)=0 exch2_myFace(690)=5 exch2_mydNx(690)=510 exch2_mydNy(690)=510 exch2_nNeighbours(690)=4 exch2_neighbourId(1,690)=705 exch2_iLo(1,690)=0 exch2_iHi(1,690)=35 exch2_jLo(1,690)=52 exch2_jHi(1,690)=52 exch2_opposingSend(1,690)=2 exch2_pij(1,1,690)=1 exch2_pij(2,1,690)=0 exch2_pij(3,1,690)=0 exch2_pij(4,1,690)=1 exch2_oi(1,690)=0 exch2_oj(1,690)=0 exch2_neighbourId(2,690)=675 exch2_iLo(2,690)=0 exch2_iHi(2,690)=35 exch2_jLo(2,690)=0 exch2_jHi(2,690)=0 exch2_opposingSend(2,690)=1 exch2_pij(1,2,690)=1 exch2_pij(2,2,690)=0 exch2_pij(3,2,690)=0 exch2_pij(4,2,690)=1 exch2_oi(2,690)=0 exch2_oj(2,690)=0 exch2_neighbourId(3,690)=826 exch2_iLo(3,690)=35 exch2_iHi(3,690)=35 exch2_jLo(3,690)=0 exch2_jHi(3,690)=52 exch2_opposingSend(3,690)=4 exch2_pij(1,3,690)=1 exch2_pij(2,3,690)=0 exch2_pij(3,3,690)=0 exch2_pij(4,3,690)=1 exch2_oi(3,690)=510 exch2_oj(3,690)=0 exch2_neighbourId(4,690)=689 exch2_iLo(4,690)=0 exch2_iHi(4,690)=0 exch2_jLo(4,690)=0 exch2_jHi(4,690)=52 exch2_opposingSend(4,690)=3 exch2_pij(1,4,690)=1 exch2_pij(2,4,690)=0 exch2_pij(3,4,690)=0 exch2_pij(4,4,690)=1 exch2_oi(4,690)=0 exch2_oj(4,690)=0 RETURN END SUBROUTINE W2_E2SETUP_691 C Topology for tile 691 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(691)=34 exch2_tNy(691)=51 exch2_tBasex(691)=0 exch2_tBasey(691)=306 exch2_txGlobalo(691)=2041 exch2_tyGlobalo(691)=307 exch2_isWedge(691)=1 exch2_isNedge(691)=0 exch2_isEedge(691)=0 exch2_isSedge(691)=0 exch2_myFace(691)=5 exch2_mydNx(691)=510 exch2_mydNy(691)=510 exch2_nNeighbours(691)=5 exch2_neighbourId(1,691)=706 exch2_iLo(1,691)=0 exch2_iHi(1,691)=35 exch2_jLo(1,691)=52 exch2_jHi(1,691)=52 exch2_opposingSend(1,691)=2 exch2_pij(1,1,691)=1 exch2_pij(2,1,691)=0 exch2_pij(3,1,691)=0 exch2_pij(4,1,691)=1 exch2_oi(1,691)=0 exch2_oj(1,691)=0 exch2_neighbourId(2,691)=676 exch2_iLo(2,691)=0 exch2_iHi(2,691)=35 exch2_jLo(2,691)=0 exch2_jHi(2,691)=0 exch2_opposingSend(2,691)=1 exch2_pij(1,2,691)=1 exch2_pij(2,2,691)=0 exch2_pij(3,2,691)=0 exch2_pij(4,2,691)=1 exch2_oi(2,691)=0 exch2_oj(2,691)=0 exch2_neighbourId(3,691)=692 exch2_iLo(3,691)=35 exch2_iHi(3,691)=35 exch2_jLo(3,691)=0 exch2_jHi(3,691)=52 exch2_opposingSend(3,691)=4 exch2_pij(1,3,691)=1 exch2_pij(2,3,691)=0 exch2_pij(3,3,691)=0 exch2_pij(4,3,691)=1 exch2_oi(3,691)=0 exch2_oj(3,691)=0 exch2_neighbourId(4,691)=440 exch2_iLo(4,691)=0 exch2_iHi(4,691)=0 exch2_jLo(4,691)=34 exch2_jHi(4,691)=52 exch2_opposingSend(4,691)=1 exch2_pij(1,4,691)=0 exch2_pij(2,4,691)=1 exch2_pij(3,4,691)=-1 exch2_pij(4,4,691)=0 exch2_oi(4,691)=-510 exch2_oj(4,691)=511 exch2_neighbourId(5,691)=441 exch2_iLo(5,691)=0 exch2_iHi(5,691)=0 exch2_jLo(5,691)=0 exch2_jHi(5,691)=35 exch2_opposingSend(5,691)=1 exch2_pij(1,5,691)=0 exch2_pij(2,5,691)=1 exch2_pij(3,5,691)=-1 exch2_pij(4,5,691)=0 exch2_oi(5,691)=-510 exch2_oj(5,691)=511 RETURN END SUBROUTINE W2_E2SETUP_692 C Topology for tile 692 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(692)=34 exch2_tNy(692)=51 exch2_tBasex(692)=34 exch2_tBasey(692)=306 exch2_txGlobalo(692)=2075 exch2_tyGlobalo(692)=307 exch2_isWedge(692)=0 exch2_isNedge(692)=0 exch2_isEedge(692)=0 exch2_isSedge(692)=0 exch2_myFace(692)=5 exch2_mydNx(692)=510 exch2_mydNy(692)=510 exch2_nNeighbours(692)=4 exch2_neighbourId(1,692)=707 exch2_iLo(1,692)=0 exch2_iHi(1,692)=35 exch2_jLo(1,692)=52 exch2_jHi(1,692)=52 exch2_opposingSend(1,692)=2 exch2_pij(1,1,692)=1 exch2_pij(2,1,692)=0 exch2_pij(3,1,692)=0 exch2_pij(4,1,692)=1 exch2_oi(1,692)=0 exch2_oj(1,692)=0 exch2_neighbourId(2,692)=677 exch2_iLo(2,692)=0 exch2_iHi(2,692)=35 exch2_jLo(2,692)=0 exch2_jHi(2,692)=0 exch2_opposingSend(2,692)=1 exch2_pij(1,2,692)=1 exch2_pij(2,2,692)=0 exch2_pij(3,2,692)=0 exch2_pij(4,2,692)=1 exch2_oi(2,692)=0 exch2_oj(2,692)=0 exch2_neighbourId(3,692)=693 exch2_iLo(3,692)=35 exch2_iHi(3,692)=35 exch2_jLo(3,692)=0 exch2_jHi(3,692)=52 exch2_opposingSend(3,692)=4 exch2_pij(1,3,692)=1 exch2_pij(2,3,692)=0 exch2_pij(3,3,692)=0 exch2_pij(4,3,692)=1 exch2_oi(3,692)=0 exch2_oj(3,692)=0 exch2_neighbourId(4,692)=691 exch2_iLo(4,692)=0 exch2_iHi(4,692)=0 exch2_jLo(4,692)=0 exch2_jHi(4,692)=52 exch2_opposingSend(4,692)=3 exch2_pij(1,4,692)=1 exch2_pij(2,4,692)=0 exch2_pij(3,4,692)=0 exch2_pij(4,4,692)=1 exch2_oi(4,692)=0 exch2_oj(4,692)=0 RETURN END SUBROUTINE W2_E2SETUP_693 C Topology for tile 693 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(693)=34 exch2_tNy(693)=51 exch2_tBasex(693)=68 exch2_tBasey(693)=306 exch2_txGlobalo(693)=2109 exch2_tyGlobalo(693)=307 exch2_isWedge(693)=0 exch2_isNedge(693)=0 exch2_isEedge(693)=0 exch2_isSedge(693)=0 exch2_myFace(693)=5 exch2_mydNx(693)=510 exch2_mydNy(693)=510 exch2_nNeighbours(693)=4 exch2_neighbourId(1,693)=708 exch2_iLo(1,693)=0 exch2_iHi(1,693)=35 exch2_jLo(1,693)=52 exch2_jHi(1,693)=52 exch2_opposingSend(1,693)=2 exch2_pij(1,1,693)=1 exch2_pij(2,1,693)=0 exch2_pij(3,1,693)=0 exch2_pij(4,1,693)=1 exch2_oi(1,693)=0 exch2_oj(1,693)=0 exch2_neighbourId(2,693)=678 exch2_iLo(2,693)=0 exch2_iHi(2,693)=35 exch2_jLo(2,693)=0 exch2_jHi(2,693)=0 exch2_opposingSend(2,693)=1 exch2_pij(1,2,693)=1 exch2_pij(2,2,693)=0 exch2_pij(3,2,693)=0 exch2_pij(4,2,693)=1 exch2_oi(2,693)=0 exch2_oj(2,693)=0 exch2_neighbourId(3,693)=694 exch2_iLo(3,693)=35 exch2_iHi(3,693)=35 exch2_jLo(3,693)=0 exch2_jHi(3,693)=52 exch2_opposingSend(3,693)=4 exch2_pij(1,3,693)=1 exch2_pij(2,3,693)=0 exch2_pij(3,3,693)=0 exch2_pij(4,3,693)=1 exch2_oi(3,693)=0 exch2_oj(3,693)=0 exch2_neighbourId(4,693)=692 exch2_iLo(4,693)=0 exch2_iHi(4,693)=0 exch2_jLo(4,693)=0 exch2_jHi(4,693)=52 exch2_opposingSend(4,693)=3 exch2_pij(1,4,693)=1 exch2_pij(2,4,693)=0 exch2_pij(3,4,693)=0 exch2_pij(4,4,693)=1 exch2_oi(4,693)=0 exch2_oj(4,693)=0 RETURN END SUBROUTINE W2_E2SETUP_694 C Topology for tile 694 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(694)=34 exch2_tNy(694)=51 exch2_tBasex(694)=102 exch2_tBasey(694)=306 exch2_txGlobalo(694)=2143 exch2_tyGlobalo(694)=307 exch2_isWedge(694)=0 exch2_isNedge(694)=0 exch2_isEedge(694)=0 exch2_isSedge(694)=0 exch2_myFace(694)=5 exch2_mydNx(694)=510 exch2_mydNy(694)=510 exch2_nNeighbours(694)=4 exch2_neighbourId(1,694)=709 exch2_iLo(1,694)=0 exch2_iHi(1,694)=35 exch2_jLo(1,694)=52 exch2_jHi(1,694)=52 exch2_opposingSend(1,694)=2 exch2_pij(1,1,694)=1 exch2_pij(2,1,694)=0 exch2_pij(3,1,694)=0 exch2_pij(4,1,694)=1 exch2_oi(1,694)=0 exch2_oj(1,694)=0 exch2_neighbourId(2,694)=679 exch2_iLo(2,694)=0 exch2_iHi(2,694)=35 exch2_jLo(2,694)=0 exch2_jHi(2,694)=0 exch2_opposingSend(2,694)=1 exch2_pij(1,2,694)=1 exch2_pij(2,2,694)=0 exch2_pij(3,2,694)=0 exch2_pij(4,2,694)=1 exch2_oi(2,694)=0 exch2_oj(2,694)=0 exch2_neighbourId(3,694)=695 exch2_iLo(3,694)=35 exch2_iHi(3,694)=35 exch2_jLo(3,694)=0 exch2_jHi(3,694)=52 exch2_opposingSend(3,694)=4 exch2_pij(1,3,694)=1 exch2_pij(2,3,694)=0 exch2_pij(3,3,694)=0 exch2_pij(4,3,694)=1 exch2_oi(3,694)=0 exch2_oj(3,694)=0 exch2_neighbourId(4,694)=693 exch2_iLo(4,694)=0 exch2_iHi(4,694)=0 exch2_jLo(4,694)=0 exch2_jHi(4,694)=52 exch2_opposingSend(4,694)=3 exch2_pij(1,4,694)=1 exch2_pij(2,4,694)=0 exch2_pij(3,4,694)=0 exch2_pij(4,4,694)=1 exch2_oi(4,694)=0 exch2_oj(4,694)=0 RETURN END SUBROUTINE W2_E2SETUP_695 C Topology for tile 695 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(695)=34 exch2_tNy(695)=51 exch2_tBasex(695)=136 exch2_tBasey(695)=306 exch2_txGlobalo(695)=2177 exch2_tyGlobalo(695)=307 exch2_isWedge(695)=0 exch2_isNedge(695)=0 exch2_isEedge(695)=0 exch2_isSedge(695)=0 exch2_myFace(695)=5 exch2_mydNx(695)=510 exch2_mydNy(695)=510 exch2_nNeighbours(695)=4 exch2_neighbourId(1,695)=710 exch2_iLo(1,695)=0 exch2_iHi(1,695)=35 exch2_jLo(1,695)=52 exch2_jHi(1,695)=52 exch2_opposingSend(1,695)=2 exch2_pij(1,1,695)=1 exch2_pij(2,1,695)=0 exch2_pij(3,1,695)=0 exch2_pij(4,1,695)=1 exch2_oi(1,695)=0 exch2_oj(1,695)=0 exch2_neighbourId(2,695)=680 exch2_iLo(2,695)=0 exch2_iHi(2,695)=35 exch2_jLo(2,695)=0 exch2_jHi(2,695)=0 exch2_opposingSend(2,695)=1 exch2_pij(1,2,695)=1 exch2_pij(2,2,695)=0 exch2_pij(3,2,695)=0 exch2_pij(4,2,695)=1 exch2_oi(2,695)=0 exch2_oj(2,695)=0 exch2_neighbourId(3,695)=696 exch2_iLo(3,695)=35 exch2_iHi(3,695)=35 exch2_jLo(3,695)=0 exch2_jHi(3,695)=52 exch2_opposingSend(3,695)=4 exch2_pij(1,3,695)=1 exch2_pij(2,3,695)=0 exch2_pij(3,3,695)=0 exch2_pij(4,3,695)=1 exch2_oi(3,695)=0 exch2_oj(3,695)=0 exch2_neighbourId(4,695)=694 exch2_iLo(4,695)=0 exch2_iHi(4,695)=0 exch2_jLo(4,695)=0 exch2_jHi(4,695)=52 exch2_opposingSend(4,695)=3 exch2_pij(1,4,695)=1 exch2_pij(2,4,695)=0 exch2_pij(3,4,695)=0 exch2_pij(4,4,695)=1 exch2_oi(4,695)=0 exch2_oj(4,695)=0 RETURN END SUBROUTINE W2_E2SETUP_696 C Topology for tile 696 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(696)=34 exch2_tNy(696)=51 exch2_tBasex(696)=170 exch2_tBasey(696)=306 exch2_txGlobalo(696)=2211 exch2_tyGlobalo(696)=307 exch2_isWedge(696)=0 exch2_isNedge(696)=0 exch2_isEedge(696)=0 exch2_isSedge(696)=0 exch2_myFace(696)=5 exch2_mydNx(696)=510 exch2_mydNy(696)=510 exch2_nNeighbours(696)=4 exch2_neighbourId(1,696)=711 exch2_iLo(1,696)=0 exch2_iHi(1,696)=35 exch2_jLo(1,696)=52 exch2_jHi(1,696)=52 exch2_opposingSend(1,696)=2 exch2_pij(1,1,696)=1 exch2_pij(2,1,696)=0 exch2_pij(3,1,696)=0 exch2_pij(4,1,696)=1 exch2_oi(1,696)=0 exch2_oj(1,696)=0 exch2_neighbourId(2,696)=681 exch2_iLo(2,696)=0 exch2_iHi(2,696)=35 exch2_jLo(2,696)=0 exch2_jHi(2,696)=0 exch2_opposingSend(2,696)=1 exch2_pij(1,2,696)=1 exch2_pij(2,2,696)=0 exch2_pij(3,2,696)=0 exch2_pij(4,2,696)=1 exch2_oi(2,696)=0 exch2_oj(2,696)=0 exch2_neighbourId(3,696)=697 exch2_iLo(3,696)=35 exch2_iHi(3,696)=35 exch2_jLo(3,696)=0 exch2_jHi(3,696)=52 exch2_opposingSend(3,696)=4 exch2_pij(1,3,696)=1 exch2_pij(2,3,696)=0 exch2_pij(3,3,696)=0 exch2_pij(4,3,696)=1 exch2_oi(3,696)=0 exch2_oj(3,696)=0 exch2_neighbourId(4,696)=695 exch2_iLo(4,696)=0 exch2_iHi(4,696)=0 exch2_jLo(4,696)=0 exch2_jHi(4,696)=52 exch2_opposingSend(4,696)=3 exch2_pij(1,4,696)=1 exch2_pij(2,4,696)=0 exch2_pij(3,4,696)=0 exch2_pij(4,4,696)=1 exch2_oi(4,696)=0 exch2_oj(4,696)=0 RETURN END SUBROUTINE W2_E2SETUP_697 C Topology for tile 697 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(697)=34 exch2_tNy(697)=51 exch2_tBasex(697)=204 exch2_tBasey(697)=306 exch2_txGlobalo(697)=2245 exch2_tyGlobalo(697)=307 exch2_isWedge(697)=0 exch2_isNedge(697)=0 exch2_isEedge(697)=0 exch2_isSedge(697)=0 exch2_myFace(697)=5 exch2_mydNx(697)=510 exch2_mydNy(697)=510 exch2_nNeighbours(697)=4 exch2_neighbourId(1,697)=712 exch2_iLo(1,697)=0 exch2_iHi(1,697)=35 exch2_jLo(1,697)=52 exch2_jHi(1,697)=52 exch2_opposingSend(1,697)=2 exch2_pij(1,1,697)=1 exch2_pij(2,1,697)=0 exch2_pij(3,1,697)=0 exch2_pij(4,1,697)=1 exch2_oi(1,697)=0 exch2_oj(1,697)=0 exch2_neighbourId(2,697)=682 exch2_iLo(2,697)=0 exch2_iHi(2,697)=35 exch2_jLo(2,697)=0 exch2_jHi(2,697)=0 exch2_opposingSend(2,697)=1 exch2_pij(1,2,697)=1 exch2_pij(2,2,697)=0 exch2_pij(3,2,697)=0 exch2_pij(4,2,697)=1 exch2_oi(2,697)=0 exch2_oj(2,697)=0 exch2_neighbourId(3,697)=698 exch2_iLo(3,697)=35 exch2_iHi(3,697)=35 exch2_jLo(3,697)=0 exch2_jHi(3,697)=52 exch2_opposingSend(3,697)=4 exch2_pij(1,3,697)=1 exch2_pij(2,3,697)=0 exch2_pij(3,3,697)=0 exch2_pij(4,3,697)=1 exch2_oi(3,697)=0 exch2_oj(3,697)=0 exch2_neighbourId(4,697)=696 exch2_iLo(4,697)=0 exch2_iHi(4,697)=0 exch2_jLo(4,697)=0 exch2_jHi(4,697)=52 exch2_opposingSend(4,697)=3 exch2_pij(1,4,697)=1 exch2_pij(2,4,697)=0 exch2_pij(3,4,697)=0 exch2_pij(4,4,697)=1 exch2_oi(4,697)=0 exch2_oj(4,697)=0 RETURN END SUBROUTINE W2_E2SETUP_698 C Topology for tile 698 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(698)=34 exch2_tNy(698)=51 exch2_tBasex(698)=238 exch2_tBasey(698)=306 exch2_txGlobalo(698)=2279 exch2_tyGlobalo(698)=307 exch2_isWedge(698)=0 exch2_isNedge(698)=0 exch2_isEedge(698)=0 exch2_isSedge(698)=0 exch2_myFace(698)=5 exch2_mydNx(698)=510 exch2_mydNy(698)=510 exch2_nNeighbours(698)=4 exch2_neighbourId(1,698)=713 exch2_iLo(1,698)=0 exch2_iHi(1,698)=35 exch2_jLo(1,698)=52 exch2_jHi(1,698)=52 exch2_opposingSend(1,698)=2 exch2_pij(1,1,698)=1 exch2_pij(2,1,698)=0 exch2_pij(3,1,698)=0 exch2_pij(4,1,698)=1 exch2_oi(1,698)=0 exch2_oj(1,698)=0 exch2_neighbourId(2,698)=683 exch2_iLo(2,698)=0 exch2_iHi(2,698)=35 exch2_jLo(2,698)=0 exch2_jHi(2,698)=0 exch2_opposingSend(2,698)=1 exch2_pij(1,2,698)=1 exch2_pij(2,2,698)=0 exch2_pij(3,2,698)=0 exch2_pij(4,2,698)=1 exch2_oi(2,698)=0 exch2_oj(2,698)=0 exch2_neighbourId(3,698)=699 exch2_iLo(3,698)=35 exch2_iHi(3,698)=35 exch2_jLo(3,698)=0 exch2_jHi(3,698)=52 exch2_opposingSend(3,698)=4 exch2_pij(1,3,698)=1 exch2_pij(2,3,698)=0 exch2_pij(3,3,698)=0 exch2_pij(4,3,698)=1 exch2_oi(3,698)=0 exch2_oj(3,698)=0 exch2_neighbourId(4,698)=697 exch2_iLo(4,698)=0 exch2_iHi(4,698)=0 exch2_jLo(4,698)=0 exch2_jHi(4,698)=52 exch2_opposingSend(4,698)=3 exch2_pij(1,4,698)=1 exch2_pij(2,4,698)=0 exch2_pij(3,4,698)=0 exch2_pij(4,4,698)=1 exch2_oi(4,698)=0 exch2_oj(4,698)=0 RETURN END SUBROUTINE W2_E2SETUP_699 C Topology for tile 699 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(699)=34 exch2_tNy(699)=51 exch2_tBasex(699)=272 exch2_tBasey(699)=306 exch2_txGlobalo(699)=2313 exch2_tyGlobalo(699)=307 exch2_isWedge(699)=0 exch2_isNedge(699)=0 exch2_isEedge(699)=0 exch2_isSedge(699)=0 exch2_myFace(699)=5 exch2_mydNx(699)=510 exch2_mydNy(699)=510 exch2_nNeighbours(699)=4 exch2_neighbourId(1,699)=714 exch2_iLo(1,699)=0 exch2_iHi(1,699)=35 exch2_jLo(1,699)=52 exch2_jHi(1,699)=52 exch2_opposingSend(1,699)=2 exch2_pij(1,1,699)=1 exch2_pij(2,1,699)=0 exch2_pij(3,1,699)=0 exch2_pij(4,1,699)=1 exch2_oi(1,699)=0 exch2_oj(1,699)=0 exch2_neighbourId(2,699)=684 exch2_iLo(2,699)=0 exch2_iHi(2,699)=35 exch2_jLo(2,699)=0 exch2_jHi(2,699)=0 exch2_opposingSend(2,699)=1 exch2_pij(1,2,699)=1 exch2_pij(2,2,699)=0 exch2_pij(3,2,699)=0 exch2_pij(4,2,699)=1 exch2_oi(2,699)=0 exch2_oj(2,699)=0 exch2_neighbourId(3,699)=700 exch2_iLo(3,699)=35 exch2_iHi(3,699)=35 exch2_jLo(3,699)=0 exch2_jHi(3,699)=52 exch2_opposingSend(3,699)=4 exch2_pij(1,3,699)=1 exch2_pij(2,3,699)=0 exch2_pij(3,3,699)=0 exch2_pij(4,3,699)=1 exch2_oi(3,699)=0 exch2_oj(3,699)=0 exch2_neighbourId(4,699)=698 exch2_iLo(4,699)=0 exch2_iHi(4,699)=0 exch2_jLo(4,699)=0 exch2_jHi(4,699)=52 exch2_opposingSend(4,699)=3 exch2_pij(1,4,699)=1 exch2_pij(2,4,699)=0 exch2_pij(3,4,699)=0 exch2_pij(4,4,699)=1 exch2_oi(4,699)=0 exch2_oj(4,699)=0 RETURN END SUBROUTINE W2_E2SETUP_700 C Topology for tile 700 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(700)=34 exch2_tNy(700)=51 exch2_tBasex(700)=306 exch2_tBasey(700)=306 exch2_txGlobalo(700)=2347 exch2_tyGlobalo(700)=307 exch2_isWedge(700)=0 exch2_isNedge(700)=0 exch2_isEedge(700)=0 exch2_isSedge(700)=0 exch2_myFace(700)=5 exch2_mydNx(700)=510 exch2_mydNy(700)=510 exch2_nNeighbours(700)=4 exch2_neighbourId(1,700)=715 exch2_iLo(1,700)=0 exch2_iHi(1,700)=35 exch2_jLo(1,700)=52 exch2_jHi(1,700)=52 exch2_opposingSend(1,700)=2 exch2_pij(1,1,700)=1 exch2_pij(2,1,700)=0 exch2_pij(3,1,700)=0 exch2_pij(4,1,700)=1 exch2_oi(1,700)=0 exch2_oj(1,700)=0 exch2_neighbourId(2,700)=685 exch2_iLo(2,700)=0 exch2_iHi(2,700)=35 exch2_jLo(2,700)=0 exch2_jHi(2,700)=0 exch2_opposingSend(2,700)=1 exch2_pij(1,2,700)=1 exch2_pij(2,2,700)=0 exch2_pij(3,2,700)=0 exch2_pij(4,2,700)=1 exch2_oi(2,700)=0 exch2_oj(2,700)=0 exch2_neighbourId(3,700)=701 exch2_iLo(3,700)=35 exch2_iHi(3,700)=35 exch2_jLo(3,700)=0 exch2_jHi(3,700)=52 exch2_opposingSend(3,700)=4 exch2_pij(1,3,700)=1 exch2_pij(2,3,700)=0 exch2_pij(3,3,700)=0 exch2_pij(4,3,700)=1 exch2_oi(3,700)=0 exch2_oj(3,700)=0 exch2_neighbourId(4,700)=699 exch2_iLo(4,700)=0 exch2_iHi(4,700)=0 exch2_jLo(4,700)=0 exch2_jHi(4,700)=52 exch2_opposingSend(4,700)=3 exch2_pij(1,4,700)=1 exch2_pij(2,4,700)=0 exch2_pij(3,4,700)=0 exch2_pij(4,4,700)=1 exch2_oi(4,700)=0 exch2_oj(4,700)=0 RETURN END SUBROUTINE W2_E2SETUP_701 C Topology for tile 701 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(701)=34 exch2_tNy(701)=51 exch2_tBasex(701)=340 exch2_tBasey(701)=306 exch2_txGlobalo(701)=2381 exch2_tyGlobalo(701)=307 exch2_isWedge(701)=0 exch2_isNedge(701)=0 exch2_isEedge(701)=0 exch2_isSedge(701)=0 exch2_myFace(701)=5 exch2_mydNx(701)=510 exch2_mydNy(701)=510 exch2_nNeighbours(701)=4 exch2_neighbourId(1,701)=716 exch2_iLo(1,701)=0 exch2_iHi(1,701)=35 exch2_jLo(1,701)=52 exch2_jHi(1,701)=52 exch2_opposingSend(1,701)=2 exch2_pij(1,1,701)=1 exch2_pij(2,1,701)=0 exch2_pij(3,1,701)=0 exch2_pij(4,1,701)=1 exch2_oi(1,701)=0 exch2_oj(1,701)=0 exch2_neighbourId(2,701)=686 exch2_iLo(2,701)=0 exch2_iHi(2,701)=35 exch2_jLo(2,701)=0 exch2_jHi(2,701)=0 exch2_opposingSend(2,701)=1 exch2_pij(1,2,701)=1 exch2_pij(2,2,701)=0 exch2_pij(3,2,701)=0 exch2_pij(4,2,701)=1 exch2_oi(2,701)=0 exch2_oj(2,701)=0 exch2_neighbourId(3,701)=702 exch2_iLo(3,701)=35 exch2_iHi(3,701)=35 exch2_jLo(3,701)=0 exch2_jHi(3,701)=52 exch2_opposingSend(3,701)=4 exch2_pij(1,3,701)=1 exch2_pij(2,3,701)=0 exch2_pij(3,3,701)=0 exch2_pij(4,3,701)=1 exch2_oi(3,701)=0 exch2_oj(3,701)=0 exch2_neighbourId(4,701)=700 exch2_iLo(4,701)=0 exch2_iHi(4,701)=0 exch2_jLo(4,701)=0 exch2_jHi(4,701)=52 exch2_opposingSend(4,701)=3 exch2_pij(1,4,701)=1 exch2_pij(2,4,701)=0 exch2_pij(3,4,701)=0 exch2_pij(4,4,701)=1 exch2_oi(4,701)=0 exch2_oj(4,701)=0 RETURN END SUBROUTINE W2_E2SETUP_702 C Topology for tile 702 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(702)=34 exch2_tNy(702)=51 exch2_tBasex(702)=374 exch2_tBasey(702)=306 exch2_txGlobalo(702)=2415 exch2_tyGlobalo(702)=307 exch2_isWedge(702)=0 exch2_isNedge(702)=0 exch2_isEedge(702)=0 exch2_isSedge(702)=0 exch2_myFace(702)=5 exch2_mydNx(702)=510 exch2_mydNy(702)=510 exch2_nNeighbours(702)=4 exch2_neighbourId(1,702)=717 exch2_iLo(1,702)=0 exch2_iHi(1,702)=35 exch2_jLo(1,702)=52 exch2_jHi(1,702)=52 exch2_opposingSend(1,702)=2 exch2_pij(1,1,702)=1 exch2_pij(2,1,702)=0 exch2_pij(3,1,702)=0 exch2_pij(4,1,702)=1 exch2_oi(1,702)=0 exch2_oj(1,702)=0 exch2_neighbourId(2,702)=687 exch2_iLo(2,702)=0 exch2_iHi(2,702)=35 exch2_jLo(2,702)=0 exch2_jHi(2,702)=0 exch2_opposingSend(2,702)=1 exch2_pij(1,2,702)=1 exch2_pij(2,2,702)=0 exch2_pij(3,2,702)=0 exch2_pij(4,2,702)=1 exch2_oi(2,702)=0 exch2_oj(2,702)=0 exch2_neighbourId(3,702)=703 exch2_iLo(3,702)=35 exch2_iHi(3,702)=35 exch2_jLo(3,702)=0 exch2_jHi(3,702)=52 exch2_opposingSend(3,702)=4 exch2_pij(1,3,702)=1 exch2_pij(2,3,702)=0 exch2_pij(3,3,702)=0 exch2_pij(4,3,702)=1 exch2_oi(3,702)=0 exch2_oj(3,702)=0 exch2_neighbourId(4,702)=701 exch2_iLo(4,702)=0 exch2_iHi(4,702)=0 exch2_jLo(4,702)=0 exch2_jHi(4,702)=52 exch2_opposingSend(4,702)=3 exch2_pij(1,4,702)=1 exch2_pij(2,4,702)=0 exch2_pij(3,4,702)=0 exch2_pij(4,4,702)=1 exch2_oi(4,702)=0 exch2_oj(4,702)=0 RETURN END SUBROUTINE W2_E2SETUP_703 C Topology for tile 703 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(703)=34 exch2_tNy(703)=51 exch2_tBasex(703)=408 exch2_tBasey(703)=306 exch2_txGlobalo(703)=2449 exch2_tyGlobalo(703)=307 exch2_isWedge(703)=0 exch2_isNedge(703)=0 exch2_isEedge(703)=0 exch2_isSedge(703)=0 exch2_myFace(703)=5 exch2_mydNx(703)=510 exch2_mydNy(703)=510 exch2_nNeighbours(703)=4 exch2_neighbourId(1,703)=718 exch2_iLo(1,703)=0 exch2_iHi(1,703)=35 exch2_jLo(1,703)=52 exch2_jHi(1,703)=52 exch2_opposingSend(1,703)=2 exch2_pij(1,1,703)=1 exch2_pij(2,1,703)=0 exch2_pij(3,1,703)=0 exch2_pij(4,1,703)=1 exch2_oi(1,703)=0 exch2_oj(1,703)=0 exch2_neighbourId(2,703)=688 exch2_iLo(2,703)=0 exch2_iHi(2,703)=35 exch2_jLo(2,703)=0 exch2_jHi(2,703)=0 exch2_opposingSend(2,703)=1 exch2_pij(1,2,703)=1 exch2_pij(2,2,703)=0 exch2_pij(3,2,703)=0 exch2_pij(4,2,703)=1 exch2_oi(2,703)=0 exch2_oj(2,703)=0 exch2_neighbourId(3,703)=704 exch2_iLo(3,703)=35 exch2_iHi(3,703)=35 exch2_jLo(3,703)=0 exch2_jHi(3,703)=52 exch2_opposingSend(3,703)=4 exch2_pij(1,3,703)=1 exch2_pij(2,3,703)=0 exch2_pij(3,3,703)=0 exch2_pij(4,3,703)=1 exch2_oi(3,703)=0 exch2_oj(3,703)=0 exch2_neighbourId(4,703)=702 exch2_iLo(4,703)=0 exch2_iHi(4,703)=0 exch2_jLo(4,703)=0 exch2_jHi(4,703)=52 exch2_opposingSend(4,703)=3 exch2_pij(1,4,703)=1 exch2_pij(2,4,703)=0 exch2_pij(3,4,703)=0 exch2_pij(4,4,703)=1 exch2_oi(4,703)=0 exch2_oj(4,703)=0 RETURN END SUBROUTINE W2_E2SETUP_704 C Topology for tile 704 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(704)=34 exch2_tNy(704)=51 exch2_tBasex(704)=442 exch2_tBasey(704)=306 exch2_txGlobalo(704)=2483 exch2_tyGlobalo(704)=307 exch2_isWedge(704)=0 exch2_isNedge(704)=0 exch2_isEedge(704)=0 exch2_isSedge(704)=0 exch2_myFace(704)=5 exch2_mydNx(704)=510 exch2_mydNy(704)=510 exch2_nNeighbours(704)=4 exch2_neighbourId(1,704)=719 exch2_iLo(1,704)=0 exch2_iHi(1,704)=35 exch2_jLo(1,704)=52 exch2_jHi(1,704)=52 exch2_opposingSend(1,704)=2 exch2_pij(1,1,704)=1 exch2_pij(2,1,704)=0 exch2_pij(3,1,704)=0 exch2_pij(4,1,704)=1 exch2_oi(1,704)=0 exch2_oj(1,704)=0 exch2_neighbourId(2,704)=689 exch2_iLo(2,704)=0 exch2_iHi(2,704)=35 exch2_jLo(2,704)=0 exch2_jHi(2,704)=0 exch2_opposingSend(2,704)=1 exch2_pij(1,2,704)=1 exch2_pij(2,2,704)=0 exch2_pij(3,2,704)=0 exch2_pij(4,2,704)=1 exch2_oi(2,704)=0 exch2_oj(2,704)=0 exch2_neighbourId(3,704)=705 exch2_iLo(3,704)=35 exch2_iHi(3,704)=35 exch2_jLo(3,704)=0 exch2_jHi(3,704)=52 exch2_opposingSend(3,704)=4 exch2_pij(1,3,704)=1 exch2_pij(2,3,704)=0 exch2_pij(3,3,704)=0 exch2_pij(4,3,704)=1 exch2_oi(3,704)=0 exch2_oj(3,704)=0 exch2_neighbourId(4,704)=703 exch2_iLo(4,704)=0 exch2_iHi(4,704)=0 exch2_jLo(4,704)=0 exch2_jHi(4,704)=52 exch2_opposingSend(4,704)=3 exch2_pij(1,4,704)=1 exch2_pij(2,4,704)=0 exch2_pij(3,4,704)=0 exch2_pij(4,4,704)=1 exch2_oi(4,704)=0 exch2_oj(4,704)=0 RETURN END SUBROUTINE W2_E2SETUP_705 C Topology for tile 705 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(705)=34 exch2_tNy(705)=51 exch2_tBasex(705)=476 exch2_tBasey(705)=306 exch2_txGlobalo(705)=2517 exch2_tyGlobalo(705)=307 exch2_isWedge(705)=0 exch2_isNedge(705)=0 exch2_isEedge(705)=1 exch2_isSedge(705)=0 exch2_myFace(705)=5 exch2_mydNx(705)=510 exch2_mydNy(705)=510 exch2_nNeighbours(705)=4 exch2_neighbourId(1,705)=720 exch2_iLo(1,705)=0 exch2_iHi(1,705)=35 exch2_jLo(1,705)=52 exch2_jHi(1,705)=52 exch2_opposingSend(1,705)=2 exch2_pij(1,1,705)=1 exch2_pij(2,1,705)=0 exch2_pij(3,1,705)=0 exch2_pij(4,1,705)=1 exch2_oi(1,705)=0 exch2_oj(1,705)=0 exch2_neighbourId(2,705)=690 exch2_iLo(2,705)=0 exch2_iHi(2,705)=35 exch2_jLo(2,705)=0 exch2_jHi(2,705)=0 exch2_opposingSend(2,705)=1 exch2_pij(1,2,705)=1 exch2_pij(2,2,705)=0 exch2_pij(3,2,705)=0 exch2_pij(4,2,705)=1 exch2_oi(2,705)=0 exch2_oj(2,705)=0 exch2_neighbourId(3,705)=841 exch2_iLo(3,705)=35 exch2_iHi(3,705)=35 exch2_jLo(3,705)=0 exch2_jHi(3,705)=52 exch2_opposingSend(3,705)=4 exch2_pij(1,3,705)=1 exch2_pij(2,3,705)=0 exch2_pij(3,3,705)=0 exch2_pij(4,3,705)=1 exch2_oi(3,705)=510 exch2_oj(3,705)=0 exch2_neighbourId(4,705)=704 exch2_iLo(4,705)=0 exch2_iHi(4,705)=0 exch2_jLo(4,705)=0 exch2_jHi(4,705)=52 exch2_opposingSend(4,705)=3 exch2_pij(1,4,705)=1 exch2_pij(2,4,705)=0 exch2_pij(3,4,705)=0 exch2_pij(4,4,705)=1 exch2_oi(4,705)=0 exch2_oj(4,705)=0 RETURN END SUBROUTINE W2_E2SETUP_706 C Topology for tile 706 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(706)=34 exch2_tNy(706)=51 exch2_tBasex(706)=0 exch2_tBasey(706)=357 exch2_txGlobalo(706)=2041 exch2_tyGlobalo(706)=358 exch2_isWedge(706)=1 exch2_isNedge(706)=0 exch2_isEedge(706)=0 exch2_isSedge(706)=0 exch2_myFace(706)=5 exch2_mydNx(706)=510 exch2_mydNy(706)=510 exch2_nNeighbours(706)=5 exch2_neighbourId(1,706)=721 exch2_iLo(1,706)=0 exch2_iHi(1,706)=35 exch2_jLo(1,706)=52 exch2_jHi(1,706)=52 exch2_opposingSend(1,706)=2 exch2_pij(1,1,706)=1 exch2_pij(2,1,706)=0 exch2_pij(3,1,706)=0 exch2_pij(4,1,706)=1 exch2_oi(1,706)=0 exch2_oj(1,706)=0 exch2_neighbourId(2,706)=691 exch2_iLo(2,706)=0 exch2_iHi(2,706)=35 exch2_jLo(2,706)=0 exch2_jHi(2,706)=0 exch2_opposingSend(2,706)=1 exch2_pij(1,2,706)=1 exch2_pij(2,2,706)=0 exch2_pij(3,2,706)=0 exch2_pij(4,2,706)=1 exch2_oi(2,706)=0 exch2_oj(2,706)=0 exch2_neighbourId(3,706)=707 exch2_iLo(3,706)=35 exch2_iHi(3,706)=35 exch2_jLo(3,706)=0 exch2_jHi(3,706)=52 exch2_opposingSend(3,706)=4 exch2_pij(1,3,706)=1 exch2_pij(2,3,706)=0 exch2_pij(3,3,706)=0 exch2_pij(4,3,706)=1 exch2_oi(3,706)=0 exch2_oj(3,706)=0 exch2_neighbourId(4,706)=439 exch2_iLo(4,706)=0 exch2_iHi(4,706)=0 exch2_jLo(4,706)=17 exch2_jHi(4,706)=52 exch2_opposingSend(4,706)=1 exch2_pij(1,4,706)=0 exch2_pij(2,4,706)=1 exch2_pij(3,4,706)=-1 exch2_pij(4,4,706)=0 exch2_oi(4,706)=-510 exch2_oj(4,706)=511 exch2_neighbourId(5,706)=440 exch2_iLo(5,706)=0 exch2_iHi(5,706)=0 exch2_jLo(5,706)=0 exch2_jHi(5,706)=18 exch2_opposingSend(5,706)=2 exch2_pij(1,5,706)=0 exch2_pij(2,5,706)=1 exch2_pij(3,5,706)=-1 exch2_pij(4,5,706)=0 exch2_oi(5,706)=-510 exch2_oj(5,706)=511 RETURN END SUBROUTINE W2_E2SETUP_707 C Topology for tile 707 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(707)=34 exch2_tNy(707)=51 exch2_tBasex(707)=34 exch2_tBasey(707)=357 exch2_txGlobalo(707)=2075 exch2_tyGlobalo(707)=358 exch2_isWedge(707)=0 exch2_isNedge(707)=0 exch2_isEedge(707)=0 exch2_isSedge(707)=0 exch2_myFace(707)=5 exch2_mydNx(707)=510 exch2_mydNy(707)=510 exch2_nNeighbours(707)=4 exch2_neighbourId(1,707)=722 exch2_iLo(1,707)=0 exch2_iHi(1,707)=35 exch2_jLo(1,707)=52 exch2_jHi(1,707)=52 exch2_opposingSend(1,707)=2 exch2_pij(1,1,707)=1 exch2_pij(2,1,707)=0 exch2_pij(3,1,707)=0 exch2_pij(4,1,707)=1 exch2_oi(1,707)=0 exch2_oj(1,707)=0 exch2_neighbourId(2,707)=692 exch2_iLo(2,707)=0 exch2_iHi(2,707)=35 exch2_jLo(2,707)=0 exch2_jHi(2,707)=0 exch2_opposingSend(2,707)=1 exch2_pij(1,2,707)=1 exch2_pij(2,2,707)=0 exch2_pij(3,2,707)=0 exch2_pij(4,2,707)=1 exch2_oi(2,707)=0 exch2_oj(2,707)=0 exch2_neighbourId(3,707)=708 exch2_iLo(3,707)=35 exch2_iHi(3,707)=35 exch2_jLo(3,707)=0 exch2_jHi(3,707)=52 exch2_opposingSend(3,707)=4 exch2_pij(1,3,707)=1 exch2_pij(2,3,707)=0 exch2_pij(3,3,707)=0 exch2_pij(4,3,707)=1 exch2_oi(3,707)=0 exch2_oj(3,707)=0 exch2_neighbourId(4,707)=706 exch2_iLo(4,707)=0 exch2_iHi(4,707)=0 exch2_jLo(4,707)=0 exch2_jHi(4,707)=52 exch2_opposingSend(4,707)=3 exch2_pij(1,4,707)=1 exch2_pij(2,4,707)=0 exch2_pij(3,4,707)=0 exch2_pij(4,4,707)=1 exch2_oi(4,707)=0 exch2_oj(4,707)=0 RETURN END SUBROUTINE W2_E2SETUP_708 C Topology for tile 708 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(708)=34 exch2_tNy(708)=51 exch2_tBasex(708)=68 exch2_tBasey(708)=357 exch2_txGlobalo(708)=2109 exch2_tyGlobalo(708)=358 exch2_isWedge(708)=0 exch2_isNedge(708)=0 exch2_isEedge(708)=0 exch2_isSedge(708)=0 exch2_myFace(708)=5 exch2_mydNx(708)=510 exch2_mydNy(708)=510 exch2_nNeighbours(708)=4 exch2_neighbourId(1,708)=723 exch2_iLo(1,708)=0 exch2_iHi(1,708)=35 exch2_jLo(1,708)=52 exch2_jHi(1,708)=52 exch2_opposingSend(1,708)=2 exch2_pij(1,1,708)=1 exch2_pij(2,1,708)=0 exch2_pij(3,1,708)=0 exch2_pij(4,1,708)=1 exch2_oi(1,708)=0 exch2_oj(1,708)=0 exch2_neighbourId(2,708)=693 exch2_iLo(2,708)=0 exch2_iHi(2,708)=35 exch2_jLo(2,708)=0 exch2_jHi(2,708)=0 exch2_opposingSend(2,708)=1 exch2_pij(1,2,708)=1 exch2_pij(2,2,708)=0 exch2_pij(3,2,708)=0 exch2_pij(4,2,708)=1 exch2_oi(2,708)=0 exch2_oj(2,708)=0 exch2_neighbourId(3,708)=709 exch2_iLo(3,708)=35 exch2_iHi(3,708)=35 exch2_jLo(3,708)=0 exch2_jHi(3,708)=52 exch2_opposingSend(3,708)=4 exch2_pij(1,3,708)=1 exch2_pij(2,3,708)=0 exch2_pij(3,3,708)=0 exch2_pij(4,3,708)=1 exch2_oi(3,708)=0 exch2_oj(3,708)=0 exch2_neighbourId(4,708)=707 exch2_iLo(4,708)=0 exch2_iHi(4,708)=0 exch2_jLo(4,708)=0 exch2_jHi(4,708)=52 exch2_opposingSend(4,708)=3 exch2_pij(1,4,708)=1 exch2_pij(2,4,708)=0 exch2_pij(3,4,708)=0 exch2_pij(4,4,708)=1 exch2_oi(4,708)=0 exch2_oj(4,708)=0 RETURN END SUBROUTINE W2_E2SETUP_709 C Topology for tile 709 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(709)=34 exch2_tNy(709)=51 exch2_tBasex(709)=102 exch2_tBasey(709)=357 exch2_txGlobalo(709)=2143 exch2_tyGlobalo(709)=358 exch2_isWedge(709)=0 exch2_isNedge(709)=0 exch2_isEedge(709)=0 exch2_isSedge(709)=0 exch2_myFace(709)=5 exch2_mydNx(709)=510 exch2_mydNy(709)=510 exch2_nNeighbours(709)=4 exch2_neighbourId(1,709)=724 exch2_iLo(1,709)=0 exch2_iHi(1,709)=35 exch2_jLo(1,709)=52 exch2_jHi(1,709)=52 exch2_opposingSend(1,709)=2 exch2_pij(1,1,709)=1 exch2_pij(2,1,709)=0 exch2_pij(3,1,709)=0 exch2_pij(4,1,709)=1 exch2_oi(1,709)=0 exch2_oj(1,709)=0 exch2_neighbourId(2,709)=694 exch2_iLo(2,709)=0 exch2_iHi(2,709)=35 exch2_jLo(2,709)=0 exch2_jHi(2,709)=0 exch2_opposingSend(2,709)=1 exch2_pij(1,2,709)=1 exch2_pij(2,2,709)=0 exch2_pij(3,2,709)=0 exch2_pij(4,2,709)=1 exch2_oi(2,709)=0 exch2_oj(2,709)=0 exch2_neighbourId(3,709)=710 exch2_iLo(3,709)=35 exch2_iHi(3,709)=35 exch2_jLo(3,709)=0 exch2_jHi(3,709)=52 exch2_opposingSend(3,709)=4 exch2_pij(1,3,709)=1 exch2_pij(2,3,709)=0 exch2_pij(3,3,709)=0 exch2_pij(4,3,709)=1 exch2_oi(3,709)=0 exch2_oj(3,709)=0 exch2_neighbourId(4,709)=708 exch2_iLo(4,709)=0 exch2_iHi(4,709)=0 exch2_jLo(4,709)=0 exch2_jHi(4,709)=52 exch2_opposingSend(4,709)=3 exch2_pij(1,4,709)=1 exch2_pij(2,4,709)=0 exch2_pij(3,4,709)=0 exch2_pij(4,4,709)=1 exch2_oi(4,709)=0 exch2_oj(4,709)=0 RETURN END SUBROUTINE W2_E2SETUP_710 C Topology for tile 710 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(710)=34 exch2_tNy(710)=51 exch2_tBasex(710)=136 exch2_tBasey(710)=357 exch2_txGlobalo(710)=2177 exch2_tyGlobalo(710)=358 exch2_isWedge(710)=0 exch2_isNedge(710)=0 exch2_isEedge(710)=0 exch2_isSedge(710)=0 exch2_myFace(710)=5 exch2_mydNx(710)=510 exch2_mydNy(710)=510 exch2_nNeighbours(710)=4 exch2_neighbourId(1,710)=725 exch2_iLo(1,710)=0 exch2_iHi(1,710)=35 exch2_jLo(1,710)=52 exch2_jHi(1,710)=52 exch2_opposingSend(1,710)=2 exch2_pij(1,1,710)=1 exch2_pij(2,1,710)=0 exch2_pij(3,1,710)=0 exch2_pij(4,1,710)=1 exch2_oi(1,710)=0 exch2_oj(1,710)=0 exch2_neighbourId(2,710)=695 exch2_iLo(2,710)=0 exch2_iHi(2,710)=35 exch2_jLo(2,710)=0 exch2_jHi(2,710)=0 exch2_opposingSend(2,710)=1 exch2_pij(1,2,710)=1 exch2_pij(2,2,710)=0 exch2_pij(3,2,710)=0 exch2_pij(4,2,710)=1 exch2_oi(2,710)=0 exch2_oj(2,710)=0 exch2_neighbourId(3,710)=711 exch2_iLo(3,710)=35 exch2_iHi(3,710)=35 exch2_jLo(3,710)=0 exch2_jHi(3,710)=52 exch2_opposingSend(3,710)=4 exch2_pij(1,3,710)=1 exch2_pij(2,3,710)=0 exch2_pij(3,3,710)=0 exch2_pij(4,3,710)=1 exch2_oi(3,710)=0 exch2_oj(3,710)=0 exch2_neighbourId(4,710)=709 exch2_iLo(4,710)=0 exch2_iHi(4,710)=0 exch2_jLo(4,710)=0 exch2_jHi(4,710)=52 exch2_opposingSend(4,710)=3 exch2_pij(1,4,710)=1 exch2_pij(2,4,710)=0 exch2_pij(3,4,710)=0 exch2_pij(4,4,710)=1 exch2_oi(4,710)=0 exch2_oj(4,710)=0 RETURN END SUBROUTINE W2_E2SETUP_711 C Topology for tile 711 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(711)=34 exch2_tNy(711)=51 exch2_tBasex(711)=170 exch2_tBasey(711)=357 exch2_txGlobalo(711)=2211 exch2_tyGlobalo(711)=358 exch2_isWedge(711)=0 exch2_isNedge(711)=0 exch2_isEedge(711)=0 exch2_isSedge(711)=0 exch2_myFace(711)=5 exch2_mydNx(711)=510 exch2_mydNy(711)=510 exch2_nNeighbours(711)=4 exch2_neighbourId(1,711)=726 exch2_iLo(1,711)=0 exch2_iHi(1,711)=35 exch2_jLo(1,711)=52 exch2_jHi(1,711)=52 exch2_opposingSend(1,711)=2 exch2_pij(1,1,711)=1 exch2_pij(2,1,711)=0 exch2_pij(3,1,711)=0 exch2_pij(4,1,711)=1 exch2_oi(1,711)=0 exch2_oj(1,711)=0 exch2_neighbourId(2,711)=696 exch2_iLo(2,711)=0 exch2_iHi(2,711)=35 exch2_jLo(2,711)=0 exch2_jHi(2,711)=0 exch2_opposingSend(2,711)=1 exch2_pij(1,2,711)=1 exch2_pij(2,2,711)=0 exch2_pij(3,2,711)=0 exch2_pij(4,2,711)=1 exch2_oi(2,711)=0 exch2_oj(2,711)=0 exch2_neighbourId(3,711)=712 exch2_iLo(3,711)=35 exch2_iHi(3,711)=35 exch2_jLo(3,711)=0 exch2_jHi(3,711)=52 exch2_opposingSend(3,711)=4 exch2_pij(1,3,711)=1 exch2_pij(2,3,711)=0 exch2_pij(3,3,711)=0 exch2_pij(4,3,711)=1 exch2_oi(3,711)=0 exch2_oj(3,711)=0 exch2_neighbourId(4,711)=710 exch2_iLo(4,711)=0 exch2_iHi(4,711)=0 exch2_jLo(4,711)=0 exch2_jHi(4,711)=52 exch2_opposingSend(4,711)=3 exch2_pij(1,4,711)=1 exch2_pij(2,4,711)=0 exch2_pij(3,4,711)=0 exch2_pij(4,4,711)=1 exch2_oi(4,711)=0 exch2_oj(4,711)=0 RETURN END SUBROUTINE W2_E2SETUP_712 C Topology for tile 712 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(712)=34 exch2_tNy(712)=51 exch2_tBasex(712)=204 exch2_tBasey(712)=357 exch2_txGlobalo(712)=2245 exch2_tyGlobalo(712)=358 exch2_isWedge(712)=0 exch2_isNedge(712)=0 exch2_isEedge(712)=0 exch2_isSedge(712)=0 exch2_myFace(712)=5 exch2_mydNx(712)=510 exch2_mydNy(712)=510 exch2_nNeighbours(712)=4 exch2_neighbourId(1,712)=727 exch2_iLo(1,712)=0 exch2_iHi(1,712)=35 exch2_jLo(1,712)=52 exch2_jHi(1,712)=52 exch2_opposingSend(1,712)=2 exch2_pij(1,1,712)=1 exch2_pij(2,1,712)=0 exch2_pij(3,1,712)=0 exch2_pij(4,1,712)=1 exch2_oi(1,712)=0 exch2_oj(1,712)=0 exch2_neighbourId(2,712)=697 exch2_iLo(2,712)=0 exch2_iHi(2,712)=35 exch2_jLo(2,712)=0 exch2_jHi(2,712)=0 exch2_opposingSend(2,712)=1 exch2_pij(1,2,712)=1 exch2_pij(2,2,712)=0 exch2_pij(3,2,712)=0 exch2_pij(4,2,712)=1 exch2_oi(2,712)=0 exch2_oj(2,712)=0 exch2_neighbourId(3,712)=713 exch2_iLo(3,712)=35 exch2_iHi(3,712)=35 exch2_jLo(3,712)=0 exch2_jHi(3,712)=52 exch2_opposingSend(3,712)=4 exch2_pij(1,3,712)=1 exch2_pij(2,3,712)=0 exch2_pij(3,3,712)=0 exch2_pij(4,3,712)=1 exch2_oi(3,712)=0 exch2_oj(3,712)=0 exch2_neighbourId(4,712)=711 exch2_iLo(4,712)=0 exch2_iHi(4,712)=0 exch2_jLo(4,712)=0 exch2_jHi(4,712)=52 exch2_opposingSend(4,712)=3 exch2_pij(1,4,712)=1 exch2_pij(2,4,712)=0 exch2_pij(3,4,712)=0 exch2_pij(4,4,712)=1 exch2_oi(4,712)=0 exch2_oj(4,712)=0 RETURN END SUBROUTINE W2_E2SETUP_713 C Topology for tile 713 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(713)=34 exch2_tNy(713)=51 exch2_tBasex(713)=238 exch2_tBasey(713)=357 exch2_txGlobalo(713)=2279 exch2_tyGlobalo(713)=358 exch2_isWedge(713)=0 exch2_isNedge(713)=0 exch2_isEedge(713)=0 exch2_isSedge(713)=0 exch2_myFace(713)=5 exch2_mydNx(713)=510 exch2_mydNy(713)=510 exch2_nNeighbours(713)=4 exch2_neighbourId(1,713)=728 exch2_iLo(1,713)=0 exch2_iHi(1,713)=35 exch2_jLo(1,713)=52 exch2_jHi(1,713)=52 exch2_opposingSend(1,713)=2 exch2_pij(1,1,713)=1 exch2_pij(2,1,713)=0 exch2_pij(3,1,713)=0 exch2_pij(4,1,713)=1 exch2_oi(1,713)=0 exch2_oj(1,713)=0 exch2_neighbourId(2,713)=698 exch2_iLo(2,713)=0 exch2_iHi(2,713)=35 exch2_jLo(2,713)=0 exch2_jHi(2,713)=0 exch2_opposingSend(2,713)=1 exch2_pij(1,2,713)=1 exch2_pij(2,2,713)=0 exch2_pij(3,2,713)=0 exch2_pij(4,2,713)=1 exch2_oi(2,713)=0 exch2_oj(2,713)=0 exch2_neighbourId(3,713)=714 exch2_iLo(3,713)=35 exch2_iHi(3,713)=35 exch2_jLo(3,713)=0 exch2_jHi(3,713)=52 exch2_opposingSend(3,713)=4 exch2_pij(1,3,713)=1 exch2_pij(2,3,713)=0 exch2_pij(3,3,713)=0 exch2_pij(4,3,713)=1 exch2_oi(3,713)=0 exch2_oj(3,713)=0 exch2_neighbourId(4,713)=712 exch2_iLo(4,713)=0 exch2_iHi(4,713)=0 exch2_jLo(4,713)=0 exch2_jHi(4,713)=52 exch2_opposingSend(4,713)=3 exch2_pij(1,4,713)=1 exch2_pij(2,4,713)=0 exch2_pij(3,4,713)=0 exch2_pij(4,4,713)=1 exch2_oi(4,713)=0 exch2_oj(4,713)=0 RETURN END SUBROUTINE W2_E2SETUP_714 C Topology for tile 714 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(714)=34 exch2_tNy(714)=51 exch2_tBasex(714)=272 exch2_tBasey(714)=357 exch2_txGlobalo(714)=2313 exch2_tyGlobalo(714)=358 exch2_isWedge(714)=0 exch2_isNedge(714)=0 exch2_isEedge(714)=0 exch2_isSedge(714)=0 exch2_myFace(714)=5 exch2_mydNx(714)=510 exch2_mydNy(714)=510 exch2_nNeighbours(714)=4 exch2_neighbourId(1,714)=729 exch2_iLo(1,714)=0 exch2_iHi(1,714)=35 exch2_jLo(1,714)=52 exch2_jHi(1,714)=52 exch2_opposingSend(1,714)=2 exch2_pij(1,1,714)=1 exch2_pij(2,1,714)=0 exch2_pij(3,1,714)=0 exch2_pij(4,1,714)=1 exch2_oi(1,714)=0 exch2_oj(1,714)=0 exch2_neighbourId(2,714)=699 exch2_iLo(2,714)=0 exch2_iHi(2,714)=35 exch2_jLo(2,714)=0 exch2_jHi(2,714)=0 exch2_opposingSend(2,714)=1 exch2_pij(1,2,714)=1 exch2_pij(2,2,714)=0 exch2_pij(3,2,714)=0 exch2_pij(4,2,714)=1 exch2_oi(2,714)=0 exch2_oj(2,714)=0 exch2_neighbourId(3,714)=715 exch2_iLo(3,714)=35 exch2_iHi(3,714)=35 exch2_jLo(3,714)=0 exch2_jHi(3,714)=52 exch2_opposingSend(3,714)=4 exch2_pij(1,3,714)=1 exch2_pij(2,3,714)=0 exch2_pij(3,3,714)=0 exch2_pij(4,3,714)=1 exch2_oi(3,714)=0 exch2_oj(3,714)=0 exch2_neighbourId(4,714)=713 exch2_iLo(4,714)=0 exch2_iHi(4,714)=0 exch2_jLo(4,714)=0 exch2_jHi(4,714)=52 exch2_opposingSend(4,714)=3 exch2_pij(1,4,714)=1 exch2_pij(2,4,714)=0 exch2_pij(3,4,714)=0 exch2_pij(4,4,714)=1 exch2_oi(4,714)=0 exch2_oj(4,714)=0 RETURN END SUBROUTINE W2_E2SETUP_715 C Topology for tile 715 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(715)=34 exch2_tNy(715)=51 exch2_tBasex(715)=306 exch2_tBasey(715)=357 exch2_txGlobalo(715)=2347 exch2_tyGlobalo(715)=358 exch2_isWedge(715)=0 exch2_isNedge(715)=0 exch2_isEedge(715)=0 exch2_isSedge(715)=0 exch2_myFace(715)=5 exch2_mydNx(715)=510 exch2_mydNy(715)=510 exch2_nNeighbours(715)=4 exch2_neighbourId(1,715)=730 exch2_iLo(1,715)=0 exch2_iHi(1,715)=35 exch2_jLo(1,715)=52 exch2_jHi(1,715)=52 exch2_opposingSend(1,715)=2 exch2_pij(1,1,715)=1 exch2_pij(2,1,715)=0 exch2_pij(3,1,715)=0 exch2_pij(4,1,715)=1 exch2_oi(1,715)=0 exch2_oj(1,715)=0 exch2_neighbourId(2,715)=700 exch2_iLo(2,715)=0 exch2_iHi(2,715)=35 exch2_jLo(2,715)=0 exch2_jHi(2,715)=0 exch2_opposingSend(2,715)=1 exch2_pij(1,2,715)=1 exch2_pij(2,2,715)=0 exch2_pij(3,2,715)=0 exch2_pij(4,2,715)=1 exch2_oi(2,715)=0 exch2_oj(2,715)=0 exch2_neighbourId(3,715)=716 exch2_iLo(3,715)=35 exch2_iHi(3,715)=35 exch2_jLo(3,715)=0 exch2_jHi(3,715)=52 exch2_opposingSend(3,715)=4 exch2_pij(1,3,715)=1 exch2_pij(2,3,715)=0 exch2_pij(3,3,715)=0 exch2_pij(4,3,715)=1 exch2_oi(3,715)=0 exch2_oj(3,715)=0 exch2_neighbourId(4,715)=714 exch2_iLo(4,715)=0 exch2_iHi(4,715)=0 exch2_jLo(4,715)=0 exch2_jHi(4,715)=52 exch2_opposingSend(4,715)=3 exch2_pij(1,4,715)=1 exch2_pij(2,4,715)=0 exch2_pij(3,4,715)=0 exch2_pij(4,4,715)=1 exch2_oi(4,715)=0 exch2_oj(4,715)=0 RETURN END SUBROUTINE W2_E2SETUP_716 C Topology for tile 716 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(716)=34 exch2_tNy(716)=51 exch2_tBasex(716)=340 exch2_tBasey(716)=357 exch2_txGlobalo(716)=2381 exch2_tyGlobalo(716)=358 exch2_isWedge(716)=0 exch2_isNedge(716)=0 exch2_isEedge(716)=0 exch2_isSedge(716)=0 exch2_myFace(716)=5 exch2_mydNx(716)=510 exch2_mydNy(716)=510 exch2_nNeighbours(716)=4 exch2_neighbourId(1,716)=731 exch2_iLo(1,716)=0 exch2_iHi(1,716)=35 exch2_jLo(1,716)=52 exch2_jHi(1,716)=52 exch2_opposingSend(1,716)=2 exch2_pij(1,1,716)=1 exch2_pij(2,1,716)=0 exch2_pij(3,1,716)=0 exch2_pij(4,1,716)=1 exch2_oi(1,716)=0 exch2_oj(1,716)=0 exch2_neighbourId(2,716)=701 exch2_iLo(2,716)=0 exch2_iHi(2,716)=35 exch2_jLo(2,716)=0 exch2_jHi(2,716)=0 exch2_opposingSend(2,716)=1 exch2_pij(1,2,716)=1 exch2_pij(2,2,716)=0 exch2_pij(3,2,716)=0 exch2_pij(4,2,716)=1 exch2_oi(2,716)=0 exch2_oj(2,716)=0 exch2_neighbourId(3,716)=717 exch2_iLo(3,716)=35 exch2_iHi(3,716)=35 exch2_jLo(3,716)=0 exch2_jHi(3,716)=52 exch2_opposingSend(3,716)=4 exch2_pij(1,3,716)=1 exch2_pij(2,3,716)=0 exch2_pij(3,3,716)=0 exch2_pij(4,3,716)=1 exch2_oi(3,716)=0 exch2_oj(3,716)=0 exch2_neighbourId(4,716)=715 exch2_iLo(4,716)=0 exch2_iHi(4,716)=0 exch2_jLo(4,716)=0 exch2_jHi(4,716)=52 exch2_opposingSend(4,716)=3 exch2_pij(1,4,716)=1 exch2_pij(2,4,716)=0 exch2_pij(3,4,716)=0 exch2_pij(4,4,716)=1 exch2_oi(4,716)=0 exch2_oj(4,716)=0 RETURN END SUBROUTINE W2_E2SETUP_717 C Topology for tile 717 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(717)=34 exch2_tNy(717)=51 exch2_tBasex(717)=374 exch2_tBasey(717)=357 exch2_txGlobalo(717)=2415 exch2_tyGlobalo(717)=358 exch2_isWedge(717)=0 exch2_isNedge(717)=0 exch2_isEedge(717)=0 exch2_isSedge(717)=0 exch2_myFace(717)=5 exch2_mydNx(717)=510 exch2_mydNy(717)=510 exch2_nNeighbours(717)=4 exch2_neighbourId(1,717)=732 exch2_iLo(1,717)=0 exch2_iHi(1,717)=35 exch2_jLo(1,717)=52 exch2_jHi(1,717)=52 exch2_opposingSend(1,717)=2 exch2_pij(1,1,717)=1 exch2_pij(2,1,717)=0 exch2_pij(3,1,717)=0 exch2_pij(4,1,717)=1 exch2_oi(1,717)=0 exch2_oj(1,717)=0 exch2_neighbourId(2,717)=702 exch2_iLo(2,717)=0 exch2_iHi(2,717)=35 exch2_jLo(2,717)=0 exch2_jHi(2,717)=0 exch2_opposingSend(2,717)=1 exch2_pij(1,2,717)=1 exch2_pij(2,2,717)=0 exch2_pij(3,2,717)=0 exch2_pij(4,2,717)=1 exch2_oi(2,717)=0 exch2_oj(2,717)=0 exch2_neighbourId(3,717)=718 exch2_iLo(3,717)=35 exch2_iHi(3,717)=35 exch2_jLo(3,717)=0 exch2_jHi(3,717)=52 exch2_opposingSend(3,717)=4 exch2_pij(1,3,717)=1 exch2_pij(2,3,717)=0 exch2_pij(3,3,717)=0 exch2_pij(4,3,717)=1 exch2_oi(3,717)=0 exch2_oj(3,717)=0 exch2_neighbourId(4,717)=716 exch2_iLo(4,717)=0 exch2_iHi(4,717)=0 exch2_jLo(4,717)=0 exch2_jHi(4,717)=52 exch2_opposingSend(4,717)=3 exch2_pij(1,4,717)=1 exch2_pij(2,4,717)=0 exch2_pij(3,4,717)=0 exch2_pij(4,4,717)=1 exch2_oi(4,717)=0 exch2_oj(4,717)=0 RETURN END SUBROUTINE W2_E2SETUP_718 C Topology for tile 718 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(718)=34 exch2_tNy(718)=51 exch2_tBasex(718)=408 exch2_tBasey(718)=357 exch2_txGlobalo(718)=2449 exch2_tyGlobalo(718)=358 exch2_isWedge(718)=0 exch2_isNedge(718)=0 exch2_isEedge(718)=0 exch2_isSedge(718)=0 exch2_myFace(718)=5 exch2_mydNx(718)=510 exch2_mydNy(718)=510 exch2_nNeighbours(718)=4 exch2_neighbourId(1,718)=733 exch2_iLo(1,718)=0 exch2_iHi(1,718)=35 exch2_jLo(1,718)=52 exch2_jHi(1,718)=52 exch2_opposingSend(1,718)=2 exch2_pij(1,1,718)=1 exch2_pij(2,1,718)=0 exch2_pij(3,1,718)=0 exch2_pij(4,1,718)=1 exch2_oi(1,718)=0 exch2_oj(1,718)=0 exch2_neighbourId(2,718)=703 exch2_iLo(2,718)=0 exch2_iHi(2,718)=35 exch2_jLo(2,718)=0 exch2_jHi(2,718)=0 exch2_opposingSend(2,718)=1 exch2_pij(1,2,718)=1 exch2_pij(2,2,718)=0 exch2_pij(3,2,718)=0 exch2_pij(4,2,718)=1 exch2_oi(2,718)=0 exch2_oj(2,718)=0 exch2_neighbourId(3,718)=719 exch2_iLo(3,718)=35 exch2_iHi(3,718)=35 exch2_jLo(3,718)=0 exch2_jHi(3,718)=52 exch2_opposingSend(3,718)=4 exch2_pij(1,3,718)=1 exch2_pij(2,3,718)=0 exch2_pij(3,3,718)=0 exch2_pij(4,3,718)=1 exch2_oi(3,718)=0 exch2_oj(3,718)=0 exch2_neighbourId(4,718)=717 exch2_iLo(4,718)=0 exch2_iHi(4,718)=0 exch2_jLo(4,718)=0 exch2_jHi(4,718)=52 exch2_opposingSend(4,718)=3 exch2_pij(1,4,718)=1 exch2_pij(2,4,718)=0 exch2_pij(3,4,718)=0 exch2_pij(4,4,718)=1 exch2_oi(4,718)=0 exch2_oj(4,718)=0 RETURN END SUBROUTINE W2_E2SETUP_719 C Topology for tile 719 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(719)=34 exch2_tNy(719)=51 exch2_tBasex(719)=442 exch2_tBasey(719)=357 exch2_txGlobalo(719)=2483 exch2_tyGlobalo(719)=358 exch2_isWedge(719)=0 exch2_isNedge(719)=0 exch2_isEedge(719)=0 exch2_isSedge(719)=0 exch2_myFace(719)=5 exch2_mydNx(719)=510 exch2_mydNy(719)=510 exch2_nNeighbours(719)=4 exch2_neighbourId(1,719)=734 exch2_iLo(1,719)=0 exch2_iHi(1,719)=35 exch2_jLo(1,719)=52 exch2_jHi(1,719)=52 exch2_opposingSend(1,719)=2 exch2_pij(1,1,719)=1 exch2_pij(2,1,719)=0 exch2_pij(3,1,719)=0 exch2_pij(4,1,719)=1 exch2_oi(1,719)=0 exch2_oj(1,719)=0 exch2_neighbourId(2,719)=704 exch2_iLo(2,719)=0 exch2_iHi(2,719)=35 exch2_jLo(2,719)=0 exch2_jHi(2,719)=0 exch2_opposingSend(2,719)=1 exch2_pij(1,2,719)=1 exch2_pij(2,2,719)=0 exch2_pij(3,2,719)=0 exch2_pij(4,2,719)=1 exch2_oi(2,719)=0 exch2_oj(2,719)=0 exch2_neighbourId(3,719)=720 exch2_iLo(3,719)=35 exch2_iHi(3,719)=35 exch2_jLo(3,719)=0 exch2_jHi(3,719)=52 exch2_opposingSend(3,719)=4 exch2_pij(1,3,719)=1 exch2_pij(2,3,719)=0 exch2_pij(3,3,719)=0 exch2_pij(4,3,719)=1 exch2_oi(3,719)=0 exch2_oj(3,719)=0 exch2_neighbourId(4,719)=718 exch2_iLo(4,719)=0 exch2_iHi(4,719)=0 exch2_jLo(4,719)=0 exch2_jHi(4,719)=52 exch2_opposingSend(4,719)=3 exch2_pij(1,4,719)=1 exch2_pij(2,4,719)=0 exch2_pij(3,4,719)=0 exch2_pij(4,4,719)=1 exch2_oi(4,719)=0 exch2_oj(4,719)=0 RETURN END SUBROUTINE W2_E2SETUP_720 C Topology for tile 720 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(720)=34 exch2_tNy(720)=51 exch2_tBasex(720)=476 exch2_tBasey(720)=357 exch2_txGlobalo(720)=2517 exch2_tyGlobalo(720)=358 exch2_isWedge(720)=0 exch2_isNedge(720)=0 exch2_isEedge(720)=1 exch2_isSedge(720)=0 exch2_myFace(720)=5 exch2_mydNx(720)=510 exch2_mydNy(720)=510 exch2_nNeighbours(720)=4 exch2_neighbourId(1,720)=735 exch2_iLo(1,720)=0 exch2_iHi(1,720)=35 exch2_jLo(1,720)=52 exch2_jHi(1,720)=52 exch2_opposingSend(1,720)=2 exch2_pij(1,1,720)=1 exch2_pij(2,1,720)=0 exch2_pij(3,1,720)=0 exch2_pij(4,1,720)=1 exch2_oi(1,720)=0 exch2_oj(1,720)=0 exch2_neighbourId(2,720)=705 exch2_iLo(2,720)=0 exch2_iHi(2,720)=35 exch2_jLo(2,720)=0 exch2_jHi(2,720)=0 exch2_opposingSend(2,720)=1 exch2_pij(1,2,720)=1 exch2_pij(2,2,720)=0 exch2_pij(3,2,720)=0 exch2_pij(4,2,720)=1 exch2_oi(2,720)=0 exch2_oj(2,720)=0 exch2_neighbourId(3,720)=856 exch2_iLo(3,720)=35 exch2_iHi(3,720)=35 exch2_jLo(3,720)=0 exch2_jHi(3,720)=52 exch2_opposingSend(3,720)=4 exch2_pij(1,3,720)=1 exch2_pij(2,3,720)=0 exch2_pij(3,3,720)=0 exch2_pij(4,3,720)=1 exch2_oi(3,720)=510 exch2_oj(3,720)=0 exch2_neighbourId(4,720)=719 exch2_iLo(4,720)=0 exch2_iHi(4,720)=0 exch2_jLo(4,720)=0 exch2_jHi(4,720)=52 exch2_opposingSend(4,720)=3 exch2_pij(1,4,720)=1 exch2_pij(2,4,720)=0 exch2_pij(3,4,720)=0 exch2_pij(4,4,720)=1 exch2_oi(4,720)=0 exch2_oj(4,720)=0 RETURN END SUBROUTINE W2_E2SETUP_721 C Topology for tile 721 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(721)=34 exch2_tNy(721)=51 exch2_tBasex(721)=0 exch2_tBasey(721)=408 exch2_txGlobalo(721)=2041 exch2_tyGlobalo(721)=409 exch2_isWedge(721)=1 exch2_isNedge(721)=0 exch2_isEedge(721)=0 exch2_isSedge(721)=0 exch2_myFace(721)=5 exch2_mydNx(721)=510 exch2_mydNy(721)=510 exch2_nNeighbours(721)=5 exch2_neighbourId(1,721)=736 exch2_iLo(1,721)=0 exch2_iHi(1,721)=35 exch2_jLo(1,721)=52 exch2_jHi(1,721)=52 exch2_opposingSend(1,721)=2 exch2_pij(1,1,721)=1 exch2_pij(2,1,721)=0 exch2_pij(3,1,721)=0 exch2_pij(4,1,721)=1 exch2_oi(1,721)=0 exch2_oj(1,721)=0 exch2_neighbourId(2,721)=706 exch2_iLo(2,721)=0 exch2_iHi(2,721)=35 exch2_jLo(2,721)=0 exch2_jHi(2,721)=0 exch2_opposingSend(2,721)=1 exch2_pij(1,2,721)=1 exch2_pij(2,2,721)=0 exch2_pij(3,2,721)=0 exch2_pij(4,2,721)=1 exch2_oi(2,721)=0 exch2_oj(2,721)=0 exch2_neighbourId(3,721)=722 exch2_iLo(3,721)=35 exch2_iHi(3,721)=35 exch2_jLo(3,721)=0 exch2_jHi(3,721)=52 exch2_opposingSend(3,721)=4 exch2_pij(1,3,721)=1 exch2_pij(2,3,721)=0 exch2_pij(3,3,721)=0 exch2_pij(4,3,721)=1 exch2_oi(3,721)=0 exch2_oj(3,721)=0 exch2_neighbourId(4,721)=437 exch2_iLo(4,721)=0 exch2_iHi(4,721)=0 exch2_jLo(4,721)=34 exch2_jHi(4,721)=52 exch2_opposingSend(4,721)=1 exch2_pij(1,4,721)=0 exch2_pij(2,4,721)=1 exch2_pij(3,4,721)=-1 exch2_pij(4,4,721)=0 exch2_oi(4,721)=-510 exch2_oj(4,721)=511 exch2_neighbourId(5,721)=438 exch2_iLo(5,721)=0 exch2_iHi(5,721)=0 exch2_jLo(5,721)=0 exch2_jHi(5,721)=35 exch2_opposingSend(5,721)=1 exch2_pij(1,5,721)=0 exch2_pij(2,5,721)=1 exch2_pij(3,5,721)=-1 exch2_pij(4,5,721)=0 exch2_oi(5,721)=-510 exch2_oj(5,721)=511 RETURN END SUBROUTINE W2_E2SETUP_722 C Topology for tile 722 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(722)=34 exch2_tNy(722)=51 exch2_tBasex(722)=34 exch2_tBasey(722)=408 exch2_txGlobalo(722)=2075 exch2_tyGlobalo(722)=409 exch2_isWedge(722)=0 exch2_isNedge(722)=0 exch2_isEedge(722)=0 exch2_isSedge(722)=0 exch2_myFace(722)=5 exch2_mydNx(722)=510 exch2_mydNy(722)=510 exch2_nNeighbours(722)=4 exch2_neighbourId(1,722)=737 exch2_iLo(1,722)=0 exch2_iHi(1,722)=35 exch2_jLo(1,722)=52 exch2_jHi(1,722)=52 exch2_opposingSend(1,722)=3 exch2_pij(1,1,722)=1 exch2_pij(2,1,722)=0 exch2_pij(3,1,722)=0 exch2_pij(4,1,722)=1 exch2_oi(1,722)=0 exch2_oj(1,722)=0 exch2_neighbourId(2,722)=707 exch2_iLo(2,722)=0 exch2_iHi(2,722)=35 exch2_jLo(2,722)=0 exch2_jHi(2,722)=0 exch2_opposingSend(2,722)=1 exch2_pij(1,2,722)=1 exch2_pij(2,2,722)=0 exch2_pij(3,2,722)=0 exch2_pij(4,2,722)=1 exch2_oi(2,722)=0 exch2_oj(2,722)=0 exch2_neighbourId(3,722)=723 exch2_iLo(3,722)=35 exch2_iHi(3,722)=35 exch2_jLo(3,722)=0 exch2_jHi(3,722)=52 exch2_opposingSend(3,722)=4 exch2_pij(1,3,722)=1 exch2_pij(2,3,722)=0 exch2_pij(3,3,722)=0 exch2_pij(4,3,722)=1 exch2_oi(3,722)=0 exch2_oj(3,722)=0 exch2_neighbourId(4,722)=721 exch2_iLo(4,722)=0 exch2_iHi(4,722)=0 exch2_jLo(4,722)=0 exch2_jHi(4,722)=52 exch2_opposingSend(4,722)=3 exch2_pij(1,4,722)=1 exch2_pij(2,4,722)=0 exch2_pij(3,4,722)=0 exch2_pij(4,4,722)=1 exch2_oi(4,722)=0 exch2_oj(4,722)=0 RETURN END SUBROUTINE W2_E2SETUP_723 C Topology for tile 723 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(723)=34 exch2_tNy(723)=51 exch2_tBasex(723)=68 exch2_tBasey(723)=408 exch2_txGlobalo(723)=2109 exch2_tyGlobalo(723)=409 exch2_isWedge(723)=0 exch2_isNedge(723)=0 exch2_isEedge(723)=0 exch2_isSedge(723)=0 exch2_myFace(723)=5 exch2_mydNx(723)=510 exch2_mydNy(723)=510 exch2_nNeighbours(723)=4 exch2_neighbourId(1,723)=738 exch2_iLo(1,723)=0 exch2_iHi(1,723)=35 exch2_jLo(1,723)=52 exch2_jHi(1,723)=52 exch2_opposingSend(1,723)=2 exch2_pij(1,1,723)=1 exch2_pij(2,1,723)=0 exch2_pij(3,1,723)=0 exch2_pij(4,1,723)=1 exch2_oi(1,723)=0 exch2_oj(1,723)=0 exch2_neighbourId(2,723)=708 exch2_iLo(2,723)=0 exch2_iHi(2,723)=35 exch2_jLo(2,723)=0 exch2_jHi(2,723)=0 exch2_opposingSend(2,723)=1 exch2_pij(1,2,723)=1 exch2_pij(2,2,723)=0 exch2_pij(3,2,723)=0 exch2_pij(4,2,723)=1 exch2_oi(2,723)=0 exch2_oj(2,723)=0 exch2_neighbourId(3,723)=724 exch2_iLo(3,723)=35 exch2_iHi(3,723)=35 exch2_jLo(3,723)=0 exch2_jHi(3,723)=52 exch2_opposingSend(3,723)=4 exch2_pij(1,3,723)=1 exch2_pij(2,3,723)=0 exch2_pij(3,3,723)=0 exch2_pij(4,3,723)=1 exch2_oi(3,723)=0 exch2_oj(3,723)=0 exch2_neighbourId(4,723)=722 exch2_iLo(4,723)=0 exch2_iHi(4,723)=0 exch2_jLo(4,723)=0 exch2_jHi(4,723)=52 exch2_opposingSend(4,723)=3 exch2_pij(1,4,723)=1 exch2_pij(2,4,723)=0 exch2_pij(3,4,723)=0 exch2_pij(4,4,723)=1 exch2_oi(4,723)=0 exch2_oj(4,723)=0 RETURN END SUBROUTINE W2_E2SETUP_724 C Topology for tile 724 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(724)=34 exch2_tNy(724)=51 exch2_tBasex(724)=102 exch2_tBasey(724)=408 exch2_txGlobalo(724)=2143 exch2_tyGlobalo(724)=409 exch2_isWedge(724)=0 exch2_isNedge(724)=0 exch2_isEedge(724)=0 exch2_isSedge(724)=0 exch2_myFace(724)=5 exch2_mydNx(724)=510 exch2_mydNy(724)=510 exch2_nNeighbours(724)=4 exch2_neighbourId(1,724)=739 exch2_iLo(1,724)=0 exch2_iHi(1,724)=35 exch2_jLo(1,724)=52 exch2_jHi(1,724)=52 exch2_opposingSend(1,724)=2 exch2_pij(1,1,724)=1 exch2_pij(2,1,724)=0 exch2_pij(3,1,724)=0 exch2_pij(4,1,724)=1 exch2_oi(1,724)=0 exch2_oj(1,724)=0 exch2_neighbourId(2,724)=709 exch2_iLo(2,724)=0 exch2_iHi(2,724)=35 exch2_jLo(2,724)=0 exch2_jHi(2,724)=0 exch2_opposingSend(2,724)=1 exch2_pij(1,2,724)=1 exch2_pij(2,2,724)=0 exch2_pij(3,2,724)=0 exch2_pij(4,2,724)=1 exch2_oi(2,724)=0 exch2_oj(2,724)=0 exch2_neighbourId(3,724)=725 exch2_iLo(3,724)=35 exch2_iHi(3,724)=35 exch2_jLo(3,724)=0 exch2_jHi(3,724)=52 exch2_opposingSend(3,724)=4 exch2_pij(1,3,724)=1 exch2_pij(2,3,724)=0 exch2_pij(3,3,724)=0 exch2_pij(4,3,724)=1 exch2_oi(3,724)=0 exch2_oj(3,724)=0 exch2_neighbourId(4,724)=723 exch2_iLo(4,724)=0 exch2_iHi(4,724)=0 exch2_jLo(4,724)=0 exch2_jHi(4,724)=52 exch2_opposingSend(4,724)=3 exch2_pij(1,4,724)=1 exch2_pij(2,4,724)=0 exch2_pij(3,4,724)=0 exch2_pij(4,4,724)=1 exch2_oi(4,724)=0 exch2_oj(4,724)=0 RETURN END SUBROUTINE W2_E2SETUP_725 C Topology for tile 725 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(725)=34 exch2_tNy(725)=51 exch2_tBasex(725)=136 exch2_tBasey(725)=408 exch2_txGlobalo(725)=2177 exch2_tyGlobalo(725)=409 exch2_isWedge(725)=0 exch2_isNedge(725)=0 exch2_isEedge(725)=0 exch2_isSedge(725)=0 exch2_myFace(725)=5 exch2_mydNx(725)=510 exch2_mydNy(725)=510 exch2_nNeighbours(725)=4 exch2_neighbourId(1,725)=740 exch2_iLo(1,725)=0 exch2_iHi(1,725)=35 exch2_jLo(1,725)=52 exch2_jHi(1,725)=52 exch2_opposingSend(1,725)=3 exch2_pij(1,1,725)=1 exch2_pij(2,1,725)=0 exch2_pij(3,1,725)=0 exch2_pij(4,1,725)=1 exch2_oi(1,725)=0 exch2_oj(1,725)=0 exch2_neighbourId(2,725)=710 exch2_iLo(2,725)=0 exch2_iHi(2,725)=35 exch2_jLo(2,725)=0 exch2_jHi(2,725)=0 exch2_opposingSend(2,725)=1 exch2_pij(1,2,725)=1 exch2_pij(2,2,725)=0 exch2_pij(3,2,725)=0 exch2_pij(4,2,725)=1 exch2_oi(2,725)=0 exch2_oj(2,725)=0 exch2_neighbourId(3,725)=726 exch2_iLo(3,725)=35 exch2_iHi(3,725)=35 exch2_jLo(3,725)=0 exch2_jHi(3,725)=52 exch2_opposingSend(3,725)=4 exch2_pij(1,3,725)=1 exch2_pij(2,3,725)=0 exch2_pij(3,3,725)=0 exch2_pij(4,3,725)=1 exch2_oi(3,725)=0 exch2_oj(3,725)=0 exch2_neighbourId(4,725)=724 exch2_iLo(4,725)=0 exch2_iHi(4,725)=0 exch2_jLo(4,725)=0 exch2_jHi(4,725)=52 exch2_opposingSend(4,725)=3 exch2_pij(1,4,725)=1 exch2_pij(2,4,725)=0 exch2_pij(3,4,725)=0 exch2_pij(4,4,725)=1 exch2_oi(4,725)=0 exch2_oj(4,725)=0 RETURN END SUBROUTINE W2_E2SETUP_726 C Topology for tile 726 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(726)=34 exch2_tNy(726)=51 exch2_tBasex(726)=170 exch2_tBasey(726)=408 exch2_txGlobalo(726)=2211 exch2_tyGlobalo(726)=409 exch2_isWedge(726)=0 exch2_isNedge(726)=0 exch2_isEedge(726)=0 exch2_isSedge(726)=0 exch2_myFace(726)=5 exch2_mydNx(726)=510 exch2_mydNy(726)=510 exch2_nNeighbours(726)=4 exch2_neighbourId(1,726)=741 exch2_iLo(1,726)=0 exch2_iHi(1,726)=35 exch2_jLo(1,726)=52 exch2_jHi(1,726)=52 exch2_opposingSend(1,726)=2 exch2_pij(1,1,726)=1 exch2_pij(2,1,726)=0 exch2_pij(3,1,726)=0 exch2_pij(4,1,726)=1 exch2_oi(1,726)=0 exch2_oj(1,726)=0 exch2_neighbourId(2,726)=711 exch2_iLo(2,726)=0 exch2_iHi(2,726)=35 exch2_jLo(2,726)=0 exch2_jHi(2,726)=0 exch2_opposingSend(2,726)=1 exch2_pij(1,2,726)=1 exch2_pij(2,2,726)=0 exch2_pij(3,2,726)=0 exch2_pij(4,2,726)=1 exch2_oi(2,726)=0 exch2_oj(2,726)=0 exch2_neighbourId(3,726)=727 exch2_iLo(3,726)=35 exch2_iHi(3,726)=35 exch2_jLo(3,726)=0 exch2_jHi(3,726)=52 exch2_opposingSend(3,726)=4 exch2_pij(1,3,726)=1 exch2_pij(2,3,726)=0 exch2_pij(3,3,726)=0 exch2_pij(4,3,726)=1 exch2_oi(3,726)=0 exch2_oj(3,726)=0 exch2_neighbourId(4,726)=725 exch2_iLo(4,726)=0 exch2_iHi(4,726)=0 exch2_jLo(4,726)=0 exch2_jHi(4,726)=52 exch2_opposingSend(4,726)=3 exch2_pij(1,4,726)=1 exch2_pij(2,4,726)=0 exch2_pij(3,4,726)=0 exch2_pij(4,4,726)=1 exch2_oi(4,726)=0 exch2_oj(4,726)=0 RETURN END SUBROUTINE W2_E2SETUP_727 C Topology for tile 727 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(727)=34 exch2_tNy(727)=51 exch2_tBasex(727)=204 exch2_tBasey(727)=408 exch2_txGlobalo(727)=2245 exch2_tyGlobalo(727)=409 exch2_isWedge(727)=0 exch2_isNedge(727)=0 exch2_isEedge(727)=0 exch2_isSedge(727)=0 exch2_myFace(727)=5 exch2_mydNx(727)=510 exch2_mydNy(727)=510 exch2_nNeighbours(727)=4 exch2_neighbourId(1,727)=742 exch2_iLo(1,727)=0 exch2_iHi(1,727)=35 exch2_jLo(1,727)=52 exch2_jHi(1,727)=52 exch2_opposingSend(1,727)=2 exch2_pij(1,1,727)=1 exch2_pij(2,1,727)=0 exch2_pij(3,1,727)=0 exch2_pij(4,1,727)=1 exch2_oi(1,727)=0 exch2_oj(1,727)=0 exch2_neighbourId(2,727)=712 exch2_iLo(2,727)=0 exch2_iHi(2,727)=35 exch2_jLo(2,727)=0 exch2_jHi(2,727)=0 exch2_opposingSend(2,727)=1 exch2_pij(1,2,727)=1 exch2_pij(2,2,727)=0 exch2_pij(3,2,727)=0 exch2_pij(4,2,727)=1 exch2_oi(2,727)=0 exch2_oj(2,727)=0 exch2_neighbourId(3,727)=728 exch2_iLo(3,727)=35 exch2_iHi(3,727)=35 exch2_jLo(3,727)=0 exch2_jHi(3,727)=52 exch2_opposingSend(3,727)=4 exch2_pij(1,3,727)=1 exch2_pij(2,3,727)=0 exch2_pij(3,3,727)=0 exch2_pij(4,3,727)=1 exch2_oi(3,727)=0 exch2_oj(3,727)=0 exch2_neighbourId(4,727)=726 exch2_iLo(4,727)=0 exch2_iHi(4,727)=0 exch2_jLo(4,727)=0 exch2_jHi(4,727)=52 exch2_opposingSend(4,727)=3 exch2_pij(1,4,727)=1 exch2_pij(2,4,727)=0 exch2_pij(3,4,727)=0 exch2_pij(4,4,727)=1 exch2_oi(4,727)=0 exch2_oj(4,727)=0 RETURN END SUBROUTINE W2_E2SETUP_728 C Topology for tile 728 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(728)=34 exch2_tNy(728)=51 exch2_tBasex(728)=238 exch2_tBasey(728)=408 exch2_txGlobalo(728)=2279 exch2_tyGlobalo(728)=409 exch2_isWedge(728)=0 exch2_isNedge(728)=0 exch2_isEedge(728)=0 exch2_isSedge(728)=0 exch2_myFace(728)=5 exch2_mydNx(728)=510 exch2_mydNy(728)=510 exch2_nNeighbours(728)=4 exch2_neighbourId(1,728)=743 exch2_iLo(1,728)=0 exch2_iHi(1,728)=35 exch2_jLo(1,728)=52 exch2_jHi(1,728)=52 exch2_opposingSend(1,728)=3 exch2_pij(1,1,728)=1 exch2_pij(2,1,728)=0 exch2_pij(3,1,728)=0 exch2_pij(4,1,728)=1 exch2_oi(1,728)=0 exch2_oj(1,728)=0 exch2_neighbourId(2,728)=713 exch2_iLo(2,728)=0 exch2_iHi(2,728)=35 exch2_jLo(2,728)=0 exch2_jHi(2,728)=0 exch2_opposingSend(2,728)=1 exch2_pij(1,2,728)=1 exch2_pij(2,2,728)=0 exch2_pij(3,2,728)=0 exch2_pij(4,2,728)=1 exch2_oi(2,728)=0 exch2_oj(2,728)=0 exch2_neighbourId(3,728)=729 exch2_iLo(3,728)=35 exch2_iHi(3,728)=35 exch2_jLo(3,728)=0 exch2_jHi(3,728)=52 exch2_opposingSend(3,728)=4 exch2_pij(1,3,728)=1 exch2_pij(2,3,728)=0 exch2_pij(3,3,728)=0 exch2_pij(4,3,728)=1 exch2_oi(3,728)=0 exch2_oj(3,728)=0 exch2_neighbourId(4,728)=727 exch2_iLo(4,728)=0 exch2_iHi(4,728)=0 exch2_jLo(4,728)=0 exch2_jHi(4,728)=52 exch2_opposingSend(4,728)=3 exch2_pij(1,4,728)=1 exch2_pij(2,4,728)=0 exch2_pij(3,4,728)=0 exch2_pij(4,4,728)=1 exch2_oi(4,728)=0 exch2_oj(4,728)=0 RETURN END SUBROUTINE W2_E2SETUP_729 C Topology for tile 729 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(729)=34 exch2_tNy(729)=51 exch2_tBasex(729)=272 exch2_tBasey(729)=408 exch2_txGlobalo(729)=2313 exch2_tyGlobalo(729)=409 exch2_isWedge(729)=0 exch2_isNedge(729)=0 exch2_isEedge(729)=0 exch2_isSedge(729)=0 exch2_myFace(729)=5 exch2_mydNx(729)=510 exch2_mydNy(729)=510 exch2_nNeighbours(729)=4 exch2_neighbourId(1,729)=744 exch2_iLo(1,729)=0 exch2_iHi(1,729)=35 exch2_jLo(1,729)=52 exch2_jHi(1,729)=52 exch2_opposingSend(1,729)=2 exch2_pij(1,1,729)=1 exch2_pij(2,1,729)=0 exch2_pij(3,1,729)=0 exch2_pij(4,1,729)=1 exch2_oi(1,729)=0 exch2_oj(1,729)=0 exch2_neighbourId(2,729)=714 exch2_iLo(2,729)=0 exch2_iHi(2,729)=35 exch2_jLo(2,729)=0 exch2_jHi(2,729)=0 exch2_opposingSend(2,729)=1 exch2_pij(1,2,729)=1 exch2_pij(2,2,729)=0 exch2_pij(3,2,729)=0 exch2_pij(4,2,729)=1 exch2_oi(2,729)=0 exch2_oj(2,729)=0 exch2_neighbourId(3,729)=730 exch2_iLo(3,729)=35 exch2_iHi(3,729)=35 exch2_jLo(3,729)=0 exch2_jHi(3,729)=52 exch2_opposingSend(3,729)=4 exch2_pij(1,3,729)=1 exch2_pij(2,3,729)=0 exch2_pij(3,3,729)=0 exch2_pij(4,3,729)=1 exch2_oi(3,729)=0 exch2_oj(3,729)=0 exch2_neighbourId(4,729)=728 exch2_iLo(4,729)=0 exch2_iHi(4,729)=0 exch2_jLo(4,729)=0 exch2_jHi(4,729)=52 exch2_opposingSend(4,729)=3 exch2_pij(1,4,729)=1 exch2_pij(2,4,729)=0 exch2_pij(3,4,729)=0 exch2_pij(4,4,729)=1 exch2_oi(4,729)=0 exch2_oj(4,729)=0 RETURN END SUBROUTINE W2_E2SETUP_730 C Topology for tile 730 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(730)=34 exch2_tNy(730)=51 exch2_tBasex(730)=306 exch2_tBasey(730)=408 exch2_txGlobalo(730)=2347 exch2_tyGlobalo(730)=409 exch2_isWedge(730)=0 exch2_isNedge(730)=0 exch2_isEedge(730)=0 exch2_isSedge(730)=0 exch2_myFace(730)=5 exch2_mydNx(730)=510 exch2_mydNy(730)=510 exch2_nNeighbours(730)=4 exch2_neighbourId(1,730)=745 exch2_iLo(1,730)=0 exch2_iHi(1,730)=35 exch2_jLo(1,730)=52 exch2_jHi(1,730)=52 exch2_opposingSend(1,730)=2 exch2_pij(1,1,730)=1 exch2_pij(2,1,730)=0 exch2_pij(3,1,730)=0 exch2_pij(4,1,730)=1 exch2_oi(1,730)=0 exch2_oj(1,730)=0 exch2_neighbourId(2,730)=715 exch2_iLo(2,730)=0 exch2_iHi(2,730)=35 exch2_jLo(2,730)=0 exch2_jHi(2,730)=0 exch2_opposingSend(2,730)=1 exch2_pij(1,2,730)=1 exch2_pij(2,2,730)=0 exch2_pij(3,2,730)=0 exch2_pij(4,2,730)=1 exch2_oi(2,730)=0 exch2_oj(2,730)=0 exch2_neighbourId(3,730)=731 exch2_iLo(3,730)=35 exch2_iHi(3,730)=35 exch2_jLo(3,730)=0 exch2_jHi(3,730)=52 exch2_opposingSend(3,730)=4 exch2_pij(1,3,730)=1 exch2_pij(2,3,730)=0 exch2_pij(3,3,730)=0 exch2_pij(4,3,730)=1 exch2_oi(3,730)=0 exch2_oj(3,730)=0 exch2_neighbourId(4,730)=729 exch2_iLo(4,730)=0 exch2_iHi(4,730)=0 exch2_jLo(4,730)=0 exch2_jHi(4,730)=52 exch2_opposingSend(4,730)=3 exch2_pij(1,4,730)=1 exch2_pij(2,4,730)=0 exch2_pij(3,4,730)=0 exch2_pij(4,4,730)=1 exch2_oi(4,730)=0 exch2_oj(4,730)=0 RETURN END SUBROUTINE W2_E2SETUP_731 C Topology for tile 731 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(731)=34 exch2_tNy(731)=51 exch2_tBasex(731)=340 exch2_tBasey(731)=408 exch2_txGlobalo(731)=2381 exch2_tyGlobalo(731)=409 exch2_isWedge(731)=0 exch2_isNedge(731)=0 exch2_isEedge(731)=0 exch2_isSedge(731)=0 exch2_myFace(731)=5 exch2_mydNx(731)=510 exch2_mydNy(731)=510 exch2_nNeighbours(731)=4 exch2_neighbourId(1,731)=746 exch2_iLo(1,731)=0 exch2_iHi(1,731)=35 exch2_jLo(1,731)=52 exch2_jHi(1,731)=52 exch2_opposingSend(1,731)=3 exch2_pij(1,1,731)=1 exch2_pij(2,1,731)=0 exch2_pij(3,1,731)=0 exch2_pij(4,1,731)=1 exch2_oi(1,731)=0 exch2_oj(1,731)=0 exch2_neighbourId(2,731)=716 exch2_iLo(2,731)=0 exch2_iHi(2,731)=35 exch2_jLo(2,731)=0 exch2_jHi(2,731)=0 exch2_opposingSend(2,731)=1 exch2_pij(1,2,731)=1 exch2_pij(2,2,731)=0 exch2_pij(3,2,731)=0 exch2_pij(4,2,731)=1 exch2_oi(2,731)=0 exch2_oj(2,731)=0 exch2_neighbourId(3,731)=732 exch2_iLo(3,731)=35 exch2_iHi(3,731)=35 exch2_jLo(3,731)=0 exch2_jHi(3,731)=52 exch2_opposingSend(3,731)=4 exch2_pij(1,3,731)=1 exch2_pij(2,3,731)=0 exch2_pij(3,3,731)=0 exch2_pij(4,3,731)=1 exch2_oi(3,731)=0 exch2_oj(3,731)=0 exch2_neighbourId(4,731)=730 exch2_iLo(4,731)=0 exch2_iHi(4,731)=0 exch2_jLo(4,731)=0 exch2_jHi(4,731)=52 exch2_opposingSend(4,731)=3 exch2_pij(1,4,731)=1 exch2_pij(2,4,731)=0 exch2_pij(3,4,731)=0 exch2_pij(4,4,731)=1 exch2_oi(4,731)=0 exch2_oj(4,731)=0 RETURN END SUBROUTINE W2_E2SETUP_732 C Topology for tile 732 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(732)=34 exch2_tNy(732)=51 exch2_tBasex(732)=374 exch2_tBasey(732)=408 exch2_txGlobalo(732)=2415 exch2_tyGlobalo(732)=409 exch2_isWedge(732)=0 exch2_isNedge(732)=0 exch2_isEedge(732)=0 exch2_isSedge(732)=0 exch2_myFace(732)=5 exch2_mydNx(732)=510 exch2_mydNy(732)=510 exch2_nNeighbours(732)=4 exch2_neighbourId(1,732)=747 exch2_iLo(1,732)=0 exch2_iHi(1,732)=35 exch2_jLo(1,732)=52 exch2_jHi(1,732)=52 exch2_opposingSend(1,732)=2 exch2_pij(1,1,732)=1 exch2_pij(2,1,732)=0 exch2_pij(3,1,732)=0 exch2_pij(4,1,732)=1 exch2_oi(1,732)=0 exch2_oj(1,732)=0 exch2_neighbourId(2,732)=717 exch2_iLo(2,732)=0 exch2_iHi(2,732)=35 exch2_jLo(2,732)=0 exch2_jHi(2,732)=0 exch2_opposingSend(2,732)=1 exch2_pij(1,2,732)=1 exch2_pij(2,2,732)=0 exch2_pij(3,2,732)=0 exch2_pij(4,2,732)=1 exch2_oi(2,732)=0 exch2_oj(2,732)=0 exch2_neighbourId(3,732)=733 exch2_iLo(3,732)=35 exch2_iHi(3,732)=35 exch2_jLo(3,732)=0 exch2_jHi(3,732)=52 exch2_opposingSend(3,732)=4 exch2_pij(1,3,732)=1 exch2_pij(2,3,732)=0 exch2_pij(3,3,732)=0 exch2_pij(4,3,732)=1 exch2_oi(3,732)=0 exch2_oj(3,732)=0 exch2_neighbourId(4,732)=731 exch2_iLo(4,732)=0 exch2_iHi(4,732)=0 exch2_jLo(4,732)=0 exch2_jHi(4,732)=52 exch2_opposingSend(4,732)=3 exch2_pij(1,4,732)=1 exch2_pij(2,4,732)=0 exch2_pij(3,4,732)=0 exch2_pij(4,4,732)=1 exch2_oi(4,732)=0 exch2_oj(4,732)=0 RETURN END SUBROUTINE W2_E2SETUP_733 C Topology for tile 733 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(733)=34 exch2_tNy(733)=51 exch2_tBasex(733)=408 exch2_tBasey(733)=408 exch2_txGlobalo(733)=2449 exch2_tyGlobalo(733)=409 exch2_isWedge(733)=0 exch2_isNedge(733)=0 exch2_isEedge(733)=0 exch2_isSedge(733)=0 exch2_myFace(733)=5 exch2_mydNx(733)=510 exch2_mydNy(733)=510 exch2_nNeighbours(733)=4 exch2_neighbourId(1,733)=748 exch2_iLo(1,733)=0 exch2_iHi(1,733)=35 exch2_jLo(1,733)=52 exch2_jHi(1,733)=52 exch2_opposingSend(1,733)=2 exch2_pij(1,1,733)=1 exch2_pij(2,1,733)=0 exch2_pij(3,1,733)=0 exch2_pij(4,1,733)=1 exch2_oi(1,733)=0 exch2_oj(1,733)=0 exch2_neighbourId(2,733)=718 exch2_iLo(2,733)=0 exch2_iHi(2,733)=35 exch2_jLo(2,733)=0 exch2_jHi(2,733)=0 exch2_opposingSend(2,733)=1 exch2_pij(1,2,733)=1 exch2_pij(2,2,733)=0 exch2_pij(3,2,733)=0 exch2_pij(4,2,733)=1 exch2_oi(2,733)=0 exch2_oj(2,733)=0 exch2_neighbourId(3,733)=734 exch2_iLo(3,733)=35 exch2_iHi(3,733)=35 exch2_jLo(3,733)=0 exch2_jHi(3,733)=52 exch2_opposingSend(3,733)=4 exch2_pij(1,3,733)=1 exch2_pij(2,3,733)=0 exch2_pij(3,3,733)=0 exch2_pij(4,3,733)=1 exch2_oi(3,733)=0 exch2_oj(3,733)=0 exch2_neighbourId(4,733)=732 exch2_iLo(4,733)=0 exch2_iHi(4,733)=0 exch2_jLo(4,733)=0 exch2_jHi(4,733)=52 exch2_opposingSend(4,733)=3 exch2_pij(1,4,733)=1 exch2_pij(2,4,733)=0 exch2_pij(3,4,733)=0 exch2_pij(4,4,733)=1 exch2_oi(4,733)=0 exch2_oj(4,733)=0 RETURN END SUBROUTINE W2_E2SETUP_734 C Topology for tile 734 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(734)=34 exch2_tNy(734)=51 exch2_tBasex(734)=442 exch2_tBasey(734)=408 exch2_txGlobalo(734)=2483 exch2_tyGlobalo(734)=409 exch2_isWedge(734)=0 exch2_isNedge(734)=0 exch2_isEedge(734)=0 exch2_isSedge(734)=0 exch2_myFace(734)=5 exch2_mydNx(734)=510 exch2_mydNy(734)=510 exch2_nNeighbours(734)=4 exch2_neighbourId(1,734)=749 exch2_iLo(1,734)=0 exch2_iHi(1,734)=35 exch2_jLo(1,734)=52 exch2_jHi(1,734)=52 exch2_opposingSend(1,734)=3 exch2_pij(1,1,734)=1 exch2_pij(2,1,734)=0 exch2_pij(3,1,734)=0 exch2_pij(4,1,734)=1 exch2_oi(1,734)=0 exch2_oj(1,734)=0 exch2_neighbourId(2,734)=719 exch2_iLo(2,734)=0 exch2_iHi(2,734)=35 exch2_jLo(2,734)=0 exch2_jHi(2,734)=0 exch2_opposingSend(2,734)=1 exch2_pij(1,2,734)=1 exch2_pij(2,2,734)=0 exch2_pij(3,2,734)=0 exch2_pij(4,2,734)=1 exch2_oi(2,734)=0 exch2_oj(2,734)=0 exch2_neighbourId(3,734)=735 exch2_iLo(3,734)=35 exch2_iHi(3,734)=35 exch2_jLo(3,734)=0 exch2_jHi(3,734)=52 exch2_opposingSend(3,734)=4 exch2_pij(1,3,734)=1 exch2_pij(2,3,734)=0 exch2_pij(3,3,734)=0 exch2_pij(4,3,734)=1 exch2_oi(3,734)=0 exch2_oj(3,734)=0 exch2_neighbourId(4,734)=733 exch2_iLo(4,734)=0 exch2_iHi(4,734)=0 exch2_jLo(4,734)=0 exch2_jHi(4,734)=52 exch2_opposingSend(4,734)=3 exch2_pij(1,4,734)=1 exch2_pij(2,4,734)=0 exch2_pij(3,4,734)=0 exch2_pij(4,4,734)=1 exch2_oi(4,734)=0 exch2_oj(4,734)=0 RETURN END SUBROUTINE W2_E2SETUP_735 C Topology for tile 735 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(735)=34 exch2_tNy(735)=51 exch2_tBasex(735)=476 exch2_tBasey(735)=408 exch2_txGlobalo(735)=2517 exch2_tyGlobalo(735)=409 exch2_isWedge(735)=0 exch2_isNedge(735)=0 exch2_isEedge(735)=1 exch2_isSedge(735)=0 exch2_myFace(735)=5 exch2_mydNx(735)=510 exch2_mydNy(735)=510 exch2_nNeighbours(735)=4 exch2_neighbourId(1,735)=750 exch2_iLo(1,735)=0 exch2_iHi(1,735)=35 exch2_jLo(1,735)=52 exch2_jHi(1,735)=52 exch2_opposingSend(1,735)=2 exch2_pij(1,1,735)=1 exch2_pij(2,1,735)=0 exch2_pij(3,1,735)=0 exch2_pij(4,1,735)=1 exch2_oi(1,735)=0 exch2_oj(1,735)=0 exch2_neighbourId(2,735)=720 exch2_iLo(2,735)=0 exch2_iHi(2,735)=35 exch2_jLo(2,735)=0 exch2_jHi(2,735)=0 exch2_opposingSend(2,735)=1 exch2_pij(1,2,735)=1 exch2_pij(2,2,735)=0 exch2_pij(3,2,735)=0 exch2_pij(4,2,735)=1 exch2_oi(2,735)=0 exch2_oj(2,735)=0 exch2_neighbourId(3,735)=871 exch2_iLo(3,735)=35 exch2_iHi(3,735)=35 exch2_jLo(3,735)=0 exch2_jHi(3,735)=52 exch2_opposingSend(3,735)=4 exch2_pij(1,3,735)=1 exch2_pij(2,3,735)=0 exch2_pij(3,3,735)=0 exch2_pij(4,3,735)=1 exch2_oi(3,735)=510 exch2_oj(3,735)=0 exch2_neighbourId(4,735)=734 exch2_iLo(4,735)=0 exch2_iHi(4,735)=0 exch2_jLo(4,735)=0 exch2_jHi(4,735)=52 exch2_opposingSend(4,735)=3 exch2_pij(1,4,735)=1 exch2_pij(2,4,735)=0 exch2_pij(3,4,735)=0 exch2_pij(4,4,735)=1 exch2_oi(4,735)=0 exch2_oj(4,735)=0 RETURN END SUBROUTINE W2_E2SETUP_736 C Topology for tile 736 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(736)=34 exch2_tNy(736)=51 exch2_tBasex(736)=0 exch2_tBasey(736)=459 exch2_txGlobalo(736)=2041 exch2_tyGlobalo(736)=460 exch2_isWedge(736)=1 exch2_isNedge(736)=1 exch2_isEedge(736)=0 exch2_isSedge(736)=0 exch2_myFace(736)=5 exch2_mydNx(736)=510 exch2_mydNy(736)=510 exch2_nNeighbours(736)=5 exch2_neighbourId(1,736)=136 exch2_iLo(1,736)=0 exch2_iHi(1,736)=35 exch2_jLo(1,736)=52 exch2_jHi(1,736)=52 exch2_opposingSend(1,736)=4 exch2_pij(1,1,736)=0 exch2_pij(2,1,736)=-1 exch2_pij(3,1,736)=1 exch2_pij(4,1,736)=0 exch2_oi(1,736)=511 exch2_oj(1,736)=510 exch2_neighbourId(2,736)=721 exch2_iLo(2,736)=0 exch2_iHi(2,736)=35 exch2_jLo(2,736)=0 exch2_jHi(2,736)=0 exch2_opposingSend(2,736)=1 exch2_pij(1,2,736)=1 exch2_pij(2,2,736)=0 exch2_pij(3,2,736)=0 exch2_pij(4,2,736)=1 exch2_oi(2,736)=0 exch2_oj(2,736)=0 exch2_neighbourId(3,736)=737 exch2_iLo(3,736)=35 exch2_iHi(3,736)=35 exch2_jLo(3,736)=0 exch2_jHi(3,736)=52 exch2_opposingSend(3,736)=5 exch2_pij(1,3,736)=1 exch2_pij(2,3,736)=0 exch2_pij(3,3,736)=0 exch2_pij(4,3,736)=1 exch2_oi(3,736)=0 exch2_oj(3,736)=0 exch2_neighbourId(4,736)=436 exch2_iLo(4,736)=0 exch2_iHi(4,736)=0 exch2_jLo(4,736)=17 exch2_jHi(4,736)=52 exch2_opposingSend(4,736)=1 exch2_pij(1,4,736)=0 exch2_pij(2,4,736)=1 exch2_pij(3,4,736)=-1 exch2_pij(4,4,736)=0 exch2_oi(4,736)=-510 exch2_oj(4,736)=511 exch2_neighbourId(5,736)=437 exch2_iLo(5,736)=0 exch2_iHi(5,736)=0 exch2_jLo(5,736)=0 exch2_jHi(5,736)=18 exch2_opposingSend(5,736)=2 exch2_pij(1,5,736)=0 exch2_pij(2,5,736)=1 exch2_pij(3,5,736)=-1 exch2_pij(4,5,736)=0 exch2_oi(5,736)=-510 exch2_oj(5,736)=511 RETURN END SUBROUTINE W2_E2SETUP_737 C Topology for tile 737 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(737)=34 exch2_tNy(737)=51 exch2_tBasex(737)=34 exch2_tBasey(737)=459 exch2_txGlobalo(737)=2075 exch2_tyGlobalo(737)=460 exch2_isWedge(737)=0 exch2_isNedge(737)=1 exch2_isEedge(737)=0 exch2_isSedge(737)=0 exch2_myFace(737)=5 exch2_mydNx(737)=510 exch2_mydNy(737)=510 exch2_nNeighbours(737)=5 exch2_neighbourId(1,737)=121 exch2_iLo(1,737)=17 exch2_iHi(1,737)=35 exch2_jLo(1,737)=52 exch2_jHi(1,737)=52 exch2_opposingSend(1,737)=4 exch2_pij(1,1,737)=0 exch2_pij(2,1,737)=-1 exch2_pij(3,1,737)=1 exch2_pij(4,1,737)=0 exch2_oi(1,737)=511 exch2_oj(1,737)=510 exch2_neighbourId(2,737)=136 exch2_iLo(2,737)=0 exch2_iHi(2,737)=18 exch2_jLo(2,737)=52 exch2_jHi(2,737)=52 exch2_opposingSend(2,737)=5 exch2_pij(1,2,737)=0 exch2_pij(2,2,737)=-1 exch2_pij(3,2,737)=1 exch2_pij(4,2,737)=0 exch2_oi(2,737)=511 exch2_oj(2,737)=510 exch2_neighbourId(3,737)=722 exch2_iLo(3,737)=0 exch2_iHi(3,737)=35 exch2_jLo(3,737)=0 exch2_jHi(3,737)=0 exch2_opposingSend(3,737)=1 exch2_pij(1,3,737)=1 exch2_pij(2,3,737)=0 exch2_pij(3,3,737)=0 exch2_pij(4,3,737)=1 exch2_oi(3,737)=0 exch2_oj(3,737)=0 exch2_neighbourId(4,737)=738 exch2_iLo(4,737)=35 exch2_iHi(4,737)=35 exch2_jLo(4,737)=0 exch2_jHi(4,737)=52 exch2_opposingSend(4,737)=4 exch2_pij(1,4,737)=1 exch2_pij(2,4,737)=0 exch2_pij(3,4,737)=0 exch2_pij(4,4,737)=1 exch2_oi(4,737)=0 exch2_oj(4,737)=0 exch2_neighbourId(5,737)=736 exch2_iLo(5,737)=0 exch2_iHi(5,737)=0 exch2_jLo(5,737)=0 exch2_jHi(5,737)=52 exch2_opposingSend(5,737)=3 exch2_pij(1,5,737)=1 exch2_pij(2,5,737)=0 exch2_pij(3,5,737)=0 exch2_pij(4,5,737)=1 exch2_oi(5,737)=0 exch2_oj(5,737)=0 RETURN END SUBROUTINE W2_E2SETUP_738 C Topology for tile 738 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(738)=34 exch2_tNy(738)=51 exch2_tBasex(738)=68 exch2_tBasey(738)=459 exch2_txGlobalo(738)=2109 exch2_tyGlobalo(738)=460 exch2_isWedge(738)=0 exch2_isNedge(738)=1 exch2_isEedge(738)=0 exch2_isSedge(738)=0 exch2_myFace(738)=5 exch2_mydNx(738)=510 exch2_mydNy(738)=510 exch2_nNeighbours(738)=4 exch2_neighbourId(1,738)=121 exch2_iLo(1,738)=0 exch2_iHi(1,738)=35 exch2_jLo(1,738)=52 exch2_jHi(1,738)=52 exch2_opposingSend(1,738)=5 exch2_pij(1,1,738)=0 exch2_pij(2,1,738)=-1 exch2_pij(3,1,738)=1 exch2_pij(4,1,738)=0 exch2_oi(1,738)=511 exch2_oj(1,738)=510 exch2_neighbourId(2,738)=723 exch2_iLo(2,738)=0 exch2_iHi(2,738)=35 exch2_jLo(2,738)=0 exch2_jHi(2,738)=0 exch2_opposingSend(2,738)=1 exch2_pij(1,2,738)=1 exch2_pij(2,2,738)=0 exch2_pij(3,2,738)=0 exch2_pij(4,2,738)=1 exch2_oi(2,738)=0 exch2_oj(2,738)=0 exch2_neighbourId(3,738)=739 exch2_iLo(3,738)=35 exch2_iHi(3,738)=35 exch2_jLo(3,738)=0 exch2_jHi(3,738)=52 exch2_opposingSend(3,738)=4 exch2_pij(1,3,738)=1 exch2_pij(2,3,738)=0 exch2_pij(3,3,738)=0 exch2_pij(4,3,738)=1 exch2_oi(3,738)=0 exch2_oj(3,738)=0 exch2_neighbourId(4,738)=737 exch2_iLo(4,738)=0 exch2_iHi(4,738)=0 exch2_jLo(4,738)=0 exch2_jHi(4,738)=52 exch2_opposingSend(4,738)=4 exch2_pij(1,4,738)=1 exch2_pij(2,4,738)=0 exch2_pij(3,4,738)=0 exch2_pij(4,4,738)=1 exch2_oi(4,738)=0 exch2_oj(4,738)=0 RETURN END SUBROUTINE W2_E2SETUP_739 C Topology for tile 739 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(739)=34 exch2_tNy(739)=51 exch2_tBasex(739)=102 exch2_tBasey(739)=459 exch2_txGlobalo(739)=2143 exch2_tyGlobalo(739)=460 exch2_isWedge(739)=0 exch2_isNedge(739)=1 exch2_isEedge(739)=0 exch2_isSedge(739)=0 exch2_myFace(739)=5 exch2_mydNx(739)=510 exch2_mydNy(739)=510 exch2_nNeighbours(739)=4 exch2_neighbourId(1,739)=106 exch2_iLo(1,739)=0 exch2_iHi(1,739)=35 exch2_jLo(1,739)=52 exch2_jHi(1,739)=52 exch2_opposingSend(1,739)=4 exch2_pij(1,1,739)=0 exch2_pij(2,1,739)=-1 exch2_pij(3,1,739)=1 exch2_pij(4,1,739)=0 exch2_oi(1,739)=511 exch2_oj(1,739)=510 exch2_neighbourId(2,739)=724 exch2_iLo(2,739)=0 exch2_iHi(2,739)=35 exch2_jLo(2,739)=0 exch2_jHi(2,739)=0 exch2_opposingSend(2,739)=1 exch2_pij(1,2,739)=1 exch2_pij(2,2,739)=0 exch2_pij(3,2,739)=0 exch2_pij(4,2,739)=1 exch2_oi(2,739)=0 exch2_oj(2,739)=0 exch2_neighbourId(3,739)=740 exch2_iLo(3,739)=35 exch2_iHi(3,739)=35 exch2_jLo(3,739)=0 exch2_jHi(3,739)=52 exch2_opposingSend(3,739)=5 exch2_pij(1,3,739)=1 exch2_pij(2,3,739)=0 exch2_pij(3,3,739)=0 exch2_pij(4,3,739)=1 exch2_oi(3,739)=0 exch2_oj(3,739)=0 exch2_neighbourId(4,739)=738 exch2_iLo(4,739)=0 exch2_iHi(4,739)=0 exch2_jLo(4,739)=0 exch2_jHi(4,739)=52 exch2_opposingSend(4,739)=3 exch2_pij(1,4,739)=1 exch2_pij(2,4,739)=0 exch2_pij(3,4,739)=0 exch2_pij(4,4,739)=1 exch2_oi(4,739)=0 exch2_oj(4,739)=0 RETURN END SUBROUTINE W2_E2SETUP_740 C Topology for tile 740 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(740)=34 exch2_tNy(740)=51 exch2_tBasex(740)=136 exch2_tBasey(740)=459 exch2_txGlobalo(740)=2177 exch2_tyGlobalo(740)=460 exch2_isWedge(740)=0 exch2_isNedge(740)=1 exch2_isEedge(740)=0 exch2_isSedge(740)=0 exch2_myFace(740)=5 exch2_mydNx(740)=510 exch2_mydNy(740)=510 exch2_nNeighbours(740)=5 exch2_neighbourId(1,740)=91 exch2_iLo(1,740)=17 exch2_iHi(1,740)=35 exch2_jLo(1,740)=52 exch2_jHi(1,740)=52 exch2_opposingSend(1,740)=4 exch2_pij(1,1,740)=0 exch2_pij(2,1,740)=-1 exch2_pij(3,1,740)=1 exch2_pij(4,1,740)=0 exch2_oi(1,740)=511 exch2_oj(1,740)=510 exch2_neighbourId(2,740)=106 exch2_iLo(2,740)=0 exch2_iHi(2,740)=18 exch2_jLo(2,740)=52 exch2_jHi(2,740)=52 exch2_opposingSend(2,740)=5 exch2_pij(1,2,740)=0 exch2_pij(2,2,740)=-1 exch2_pij(3,2,740)=1 exch2_pij(4,2,740)=0 exch2_oi(2,740)=511 exch2_oj(2,740)=510 exch2_neighbourId(3,740)=725 exch2_iLo(3,740)=0 exch2_iHi(3,740)=35 exch2_jLo(3,740)=0 exch2_jHi(3,740)=0 exch2_opposingSend(3,740)=1 exch2_pij(1,3,740)=1 exch2_pij(2,3,740)=0 exch2_pij(3,3,740)=0 exch2_pij(4,3,740)=1 exch2_oi(3,740)=0 exch2_oj(3,740)=0 exch2_neighbourId(4,740)=741 exch2_iLo(4,740)=35 exch2_iHi(4,740)=35 exch2_jLo(4,740)=0 exch2_jHi(4,740)=52 exch2_opposingSend(4,740)=4 exch2_pij(1,4,740)=1 exch2_pij(2,4,740)=0 exch2_pij(3,4,740)=0 exch2_pij(4,4,740)=1 exch2_oi(4,740)=0 exch2_oj(4,740)=0 exch2_neighbourId(5,740)=739 exch2_iLo(5,740)=0 exch2_iHi(5,740)=0 exch2_jLo(5,740)=0 exch2_jHi(5,740)=52 exch2_opposingSend(5,740)=3 exch2_pij(1,5,740)=1 exch2_pij(2,5,740)=0 exch2_pij(3,5,740)=0 exch2_pij(4,5,740)=1 exch2_oi(5,740)=0 exch2_oj(5,740)=0 RETURN END SUBROUTINE W2_E2SETUP_741 C Topology for tile 741 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(741)=34 exch2_tNy(741)=51 exch2_tBasex(741)=170 exch2_tBasey(741)=459 exch2_txGlobalo(741)=2211 exch2_tyGlobalo(741)=460 exch2_isWedge(741)=0 exch2_isNedge(741)=1 exch2_isEedge(741)=0 exch2_isSedge(741)=0 exch2_myFace(741)=5 exch2_mydNx(741)=510 exch2_mydNy(741)=510 exch2_nNeighbours(741)=4 exch2_neighbourId(1,741)=91 exch2_iLo(1,741)=0 exch2_iHi(1,741)=35 exch2_jLo(1,741)=52 exch2_jHi(1,741)=52 exch2_opposingSend(1,741)=5 exch2_pij(1,1,741)=0 exch2_pij(2,1,741)=-1 exch2_pij(3,1,741)=1 exch2_pij(4,1,741)=0 exch2_oi(1,741)=511 exch2_oj(1,741)=510 exch2_neighbourId(2,741)=726 exch2_iLo(2,741)=0 exch2_iHi(2,741)=35 exch2_jLo(2,741)=0 exch2_jHi(2,741)=0 exch2_opposingSend(2,741)=1 exch2_pij(1,2,741)=1 exch2_pij(2,2,741)=0 exch2_pij(3,2,741)=0 exch2_pij(4,2,741)=1 exch2_oi(2,741)=0 exch2_oj(2,741)=0 exch2_neighbourId(3,741)=742 exch2_iLo(3,741)=35 exch2_iHi(3,741)=35 exch2_jLo(3,741)=0 exch2_jHi(3,741)=52 exch2_opposingSend(3,741)=4 exch2_pij(1,3,741)=1 exch2_pij(2,3,741)=0 exch2_pij(3,3,741)=0 exch2_pij(4,3,741)=1 exch2_oi(3,741)=0 exch2_oj(3,741)=0 exch2_neighbourId(4,741)=740 exch2_iLo(4,741)=0 exch2_iHi(4,741)=0 exch2_jLo(4,741)=0 exch2_jHi(4,741)=52 exch2_opposingSend(4,741)=4 exch2_pij(1,4,741)=1 exch2_pij(2,4,741)=0 exch2_pij(3,4,741)=0 exch2_pij(4,4,741)=1 exch2_oi(4,741)=0 exch2_oj(4,741)=0 RETURN END SUBROUTINE W2_E2SETUP_742 C Topology for tile 742 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(742)=34 exch2_tNy(742)=51 exch2_tBasex(742)=204 exch2_tBasey(742)=459 exch2_txGlobalo(742)=2245 exch2_tyGlobalo(742)=460 exch2_isWedge(742)=0 exch2_isNedge(742)=1 exch2_isEedge(742)=0 exch2_isSedge(742)=0 exch2_myFace(742)=5 exch2_mydNx(742)=510 exch2_mydNy(742)=510 exch2_nNeighbours(742)=4 exch2_neighbourId(1,742)=76 exch2_iLo(1,742)=0 exch2_iHi(1,742)=35 exch2_jLo(1,742)=52 exch2_jHi(1,742)=52 exch2_opposingSend(1,742)=4 exch2_pij(1,1,742)=0 exch2_pij(2,1,742)=-1 exch2_pij(3,1,742)=1 exch2_pij(4,1,742)=0 exch2_oi(1,742)=511 exch2_oj(1,742)=510 exch2_neighbourId(2,742)=727 exch2_iLo(2,742)=0 exch2_iHi(2,742)=35 exch2_jLo(2,742)=0 exch2_jHi(2,742)=0 exch2_opposingSend(2,742)=1 exch2_pij(1,2,742)=1 exch2_pij(2,2,742)=0 exch2_pij(3,2,742)=0 exch2_pij(4,2,742)=1 exch2_oi(2,742)=0 exch2_oj(2,742)=0 exch2_neighbourId(3,742)=743 exch2_iLo(3,742)=35 exch2_iHi(3,742)=35 exch2_jLo(3,742)=0 exch2_jHi(3,742)=52 exch2_opposingSend(3,742)=5 exch2_pij(1,3,742)=1 exch2_pij(2,3,742)=0 exch2_pij(3,3,742)=0 exch2_pij(4,3,742)=1 exch2_oi(3,742)=0 exch2_oj(3,742)=0 exch2_neighbourId(4,742)=741 exch2_iLo(4,742)=0 exch2_iHi(4,742)=0 exch2_jLo(4,742)=0 exch2_jHi(4,742)=52 exch2_opposingSend(4,742)=3 exch2_pij(1,4,742)=1 exch2_pij(2,4,742)=0 exch2_pij(3,4,742)=0 exch2_pij(4,4,742)=1 exch2_oi(4,742)=0 exch2_oj(4,742)=0 RETURN END SUBROUTINE W2_E2SETUP_743 C Topology for tile 743 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(743)=34 exch2_tNy(743)=51 exch2_tBasex(743)=238 exch2_tBasey(743)=459 exch2_txGlobalo(743)=2279 exch2_tyGlobalo(743)=460 exch2_isWedge(743)=0 exch2_isNedge(743)=1 exch2_isEedge(743)=0 exch2_isSedge(743)=0 exch2_myFace(743)=5 exch2_mydNx(743)=510 exch2_mydNy(743)=510 exch2_nNeighbours(743)=5 exch2_neighbourId(1,743)=61 exch2_iLo(1,743)=17 exch2_iHi(1,743)=35 exch2_jLo(1,743)=52 exch2_jHi(1,743)=52 exch2_opposingSend(1,743)=4 exch2_pij(1,1,743)=0 exch2_pij(2,1,743)=-1 exch2_pij(3,1,743)=1 exch2_pij(4,1,743)=0 exch2_oi(1,743)=511 exch2_oj(1,743)=510 exch2_neighbourId(2,743)=76 exch2_iLo(2,743)=0 exch2_iHi(2,743)=18 exch2_jLo(2,743)=52 exch2_jHi(2,743)=52 exch2_opposingSend(2,743)=5 exch2_pij(1,2,743)=0 exch2_pij(2,2,743)=-1 exch2_pij(3,2,743)=1 exch2_pij(4,2,743)=0 exch2_oi(2,743)=511 exch2_oj(2,743)=510 exch2_neighbourId(3,743)=728 exch2_iLo(3,743)=0 exch2_iHi(3,743)=35 exch2_jLo(3,743)=0 exch2_jHi(3,743)=0 exch2_opposingSend(3,743)=1 exch2_pij(1,3,743)=1 exch2_pij(2,3,743)=0 exch2_pij(3,3,743)=0 exch2_pij(4,3,743)=1 exch2_oi(3,743)=0 exch2_oj(3,743)=0 exch2_neighbourId(4,743)=744 exch2_iLo(4,743)=35 exch2_iHi(4,743)=35 exch2_jLo(4,743)=0 exch2_jHi(4,743)=52 exch2_opposingSend(4,743)=4 exch2_pij(1,4,743)=1 exch2_pij(2,4,743)=0 exch2_pij(3,4,743)=0 exch2_pij(4,4,743)=1 exch2_oi(4,743)=0 exch2_oj(4,743)=0 exch2_neighbourId(5,743)=742 exch2_iLo(5,743)=0 exch2_iHi(5,743)=0 exch2_jLo(5,743)=0 exch2_jHi(5,743)=52 exch2_opposingSend(5,743)=3 exch2_pij(1,5,743)=1 exch2_pij(2,5,743)=0 exch2_pij(3,5,743)=0 exch2_pij(4,5,743)=1 exch2_oi(5,743)=0 exch2_oj(5,743)=0 RETURN END SUBROUTINE W2_E2SETUP_744 C Topology for tile 744 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(744)=34 exch2_tNy(744)=51 exch2_tBasex(744)=272 exch2_tBasey(744)=459 exch2_txGlobalo(744)=2313 exch2_tyGlobalo(744)=460 exch2_isWedge(744)=0 exch2_isNedge(744)=1 exch2_isEedge(744)=0 exch2_isSedge(744)=0 exch2_myFace(744)=5 exch2_mydNx(744)=510 exch2_mydNy(744)=510 exch2_nNeighbours(744)=4 exch2_neighbourId(1,744)=61 exch2_iLo(1,744)=0 exch2_iHi(1,744)=35 exch2_jLo(1,744)=52 exch2_jHi(1,744)=52 exch2_opposingSend(1,744)=5 exch2_pij(1,1,744)=0 exch2_pij(2,1,744)=-1 exch2_pij(3,1,744)=1 exch2_pij(4,1,744)=0 exch2_oi(1,744)=511 exch2_oj(1,744)=510 exch2_neighbourId(2,744)=729 exch2_iLo(2,744)=0 exch2_iHi(2,744)=35 exch2_jLo(2,744)=0 exch2_jHi(2,744)=0 exch2_opposingSend(2,744)=1 exch2_pij(1,2,744)=1 exch2_pij(2,2,744)=0 exch2_pij(3,2,744)=0 exch2_pij(4,2,744)=1 exch2_oi(2,744)=0 exch2_oj(2,744)=0 exch2_neighbourId(3,744)=745 exch2_iLo(3,744)=35 exch2_iHi(3,744)=35 exch2_jLo(3,744)=0 exch2_jHi(3,744)=52 exch2_opposingSend(3,744)=4 exch2_pij(1,3,744)=1 exch2_pij(2,3,744)=0 exch2_pij(3,3,744)=0 exch2_pij(4,3,744)=1 exch2_oi(3,744)=0 exch2_oj(3,744)=0 exch2_neighbourId(4,744)=743 exch2_iLo(4,744)=0 exch2_iHi(4,744)=0 exch2_jLo(4,744)=0 exch2_jHi(4,744)=52 exch2_opposingSend(4,744)=4 exch2_pij(1,4,744)=1 exch2_pij(2,4,744)=0 exch2_pij(3,4,744)=0 exch2_pij(4,4,744)=1 exch2_oi(4,744)=0 exch2_oj(4,744)=0 RETURN END SUBROUTINE W2_E2SETUP_745 C Topology for tile 745 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(745)=34 exch2_tNy(745)=51 exch2_tBasex(745)=306 exch2_tBasey(745)=459 exch2_txGlobalo(745)=2347 exch2_tyGlobalo(745)=460 exch2_isWedge(745)=0 exch2_isNedge(745)=1 exch2_isEedge(745)=0 exch2_isSedge(745)=0 exch2_myFace(745)=5 exch2_mydNx(745)=510 exch2_mydNy(745)=510 exch2_nNeighbours(745)=4 exch2_neighbourId(1,745)=46 exch2_iLo(1,745)=0 exch2_iHi(1,745)=35 exch2_jLo(1,745)=52 exch2_jHi(1,745)=52 exch2_opposingSend(1,745)=4 exch2_pij(1,1,745)=0 exch2_pij(2,1,745)=-1 exch2_pij(3,1,745)=1 exch2_pij(4,1,745)=0 exch2_oi(1,745)=511 exch2_oj(1,745)=510 exch2_neighbourId(2,745)=730 exch2_iLo(2,745)=0 exch2_iHi(2,745)=35 exch2_jLo(2,745)=0 exch2_jHi(2,745)=0 exch2_opposingSend(2,745)=1 exch2_pij(1,2,745)=1 exch2_pij(2,2,745)=0 exch2_pij(3,2,745)=0 exch2_pij(4,2,745)=1 exch2_oi(2,745)=0 exch2_oj(2,745)=0 exch2_neighbourId(3,745)=746 exch2_iLo(3,745)=35 exch2_iHi(3,745)=35 exch2_jLo(3,745)=0 exch2_jHi(3,745)=52 exch2_opposingSend(3,745)=5 exch2_pij(1,3,745)=1 exch2_pij(2,3,745)=0 exch2_pij(3,3,745)=0 exch2_pij(4,3,745)=1 exch2_oi(3,745)=0 exch2_oj(3,745)=0 exch2_neighbourId(4,745)=744 exch2_iLo(4,745)=0 exch2_iHi(4,745)=0 exch2_jLo(4,745)=0 exch2_jHi(4,745)=52 exch2_opposingSend(4,745)=3 exch2_pij(1,4,745)=1 exch2_pij(2,4,745)=0 exch2_pij(3,4,745)=0 exch2_pij(4,4,745)=1 exch2_oi(4,745)=0 exch2_oj(4,745)=0 RETURN END SUBROUTINE W2_E2SETUP_746 C Topology for tile 746 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(746)=34 exch2_tNy(746)=51 exch2_tBasex(746)=340 exch2_tBasey(746)=459 exch2_txGlobalo(746)=2381 exch2_tyGlobalo(746)=460 exch2_isWedge(746)=0 exch2_isNedge(746)=1 exch2_isEedge(746)=0 exch2_isSedge(746)=0 exch2_myFace(746)=5 exch2_mydNx(746)=510 exch2_mydNy(746)=510 exch2_nNeighbours(746)=5 exch2_neighbourId(1,746)=31 exch2_iLo(1,746)=17 exch2_iHi(1,746)=35 exch2_jLo(1,746)=52 exch2_jHi(1,746)=52 exch2_opposingSend(1,746)=4 exch2_pij(1,1,746)=0 exch2_pij(2,1,746)=-1 exch2_pij(3,1,746)=1 exch2_pij(4,1,746)=0 exch2_oi(1,746)=511 exch2_oj(1,746)=510 exch2_neighbourId(2,746)=46 exch2_iLo(2,746)=0 exch2_iHi(2,746)=18 exch2_jLo(2,746)=52 exch2_jHi(2,746)=52 exch2_opposingSend(2,746)=5 exch2_pij(1,2,746)=0 exch2_pij(2,2,746)=-1 exch2_pij(3,2,746)=1 exch2_pij(4,2,746)=0 exch2_oi(2,746)=511 exch2_oj(2,746)=510 exch2_neighbourId(3,746)=731 exch2_iLo(3,746)=0 exch2_iHi(3,746)=35 exch2_jLo(3,746)=0 exch2_jHi(3,746)=0 exch2_opposingSend(3,746)=1 exch2_pij(1,3,746)=1 exch2_pij(2,3,746)=0 exch2_pij(3,3,746)=0 exch2_pij(4,3,746)=1 exch2_oi(3,746)=0 exch2_oj(3,746)=0 exch2_neighbourId(4,746)=747 exch2_iLo(4,746)=35 exch2_iHi(4,746)=35 exch2_jLo(4,746)=0 exch2_jHi(4,746)=52 exch2_opposingSend(4,746)=4 exch2_pij(1,4,746)=1 exch2_pij(2,4,746)=0 exch2_pij(3,4,746)=0 exch2_pij(4,4,746)=1 exch2_oi(4,746)=0 exch2_oj(4,746)=0 exch2_neighbourId(5,746)=745 exch2_iLo(5,746)=0 exch2_iHi(5,746)=0 exch2_jLo(5,746)=0 exch2_jHi(5,746)=52 exch2_opposingSend(5,746)=3 exch2_pij(1,5,746)=1 exch2_pij(2,5,746)=0 exch2_pij(3,5,746)=0 exch2_pij(4,5,746)=1 exch2_oi(5,746)=0 exch2_oj(5,746)=0 RETURN END SUBROUTINE W2_E2SETUP_747 C Topology for tile 747 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(747)=34 exch2_tNy(747)=51 exch2_tBasex(747)=374 exch2_tBasey(747)=459 exch2_txGlobalo(747)=2415 exch2_tyGlobalo(747)=460 exch2_isWedge(747)=0 exch2_isNedge(747)=1 exch2_isEedge(747)=0 exch2_isSedge(747)=0 exch2_myFace(747)=5 exch2_mydNx(747)=510 exch2_mydNy(747)=510 exch2_nNeighbours(747)=4 exch2_neighbourId(1,747)=31 exch2_iLo(1,747)=0 exch2_iHi(1,747)=35 exch2_jLo(1,747)=52 exch2_jHi(1,747)=52 exch2_opposingSend(1,747)=5 exch2_pij(1,1,747)=0 exch2_pij(2,1,747)=-1 exch2_pij(3,1,747)=1 exch2_pij(4,1,747)=0 exch2_oi(1,747)=511 exch2_oj(1,747)=510 exch2_neighbourId(2,747)=732 exch2_iLo(2,747)=0 exch2_iHi(2,747)=35 exch2_jLo(2,747)=0 exch2_jHi(2,747)=0 exch2_opposingSend(2,747)=1 exch2_pij(1,2,747)=1 exch2_pij(2,2,747)=0 exch2_pij(3,2,747)=0 exch2_pij(4,2,747)=1 exch2_oi(2,747)=0 exch2_oj(2,747)=0 exch2_neighbourId(3,747)=748 exch2_iLo(3,747)=35 exch2_iHi(3,747)=35 exch2_jLo(3,747)=0 exch2_jHi(3,747)=52 exch2_opposingSend(3,747)=4 exch2_pij(1,3,747)=1 exch2_pij(2,3,747)=0 exch2_pij(3,3,747)=0 exch2_pij(4,3,747)=1 exch2_oi(3,747)=0 exch2_oj(3,747)=0 exch2_neighbourId(4,747)=746 exch2_iLo(4,747)=0 exch2_iHi(4,747)=0 exch2_jLo(4,747)=0 exch2_jHi(4,747)=52 exch2_opposingSend(4,747)=4 exch2_pij(1,4,747)=1 exch2_pij(2,4,747)=0 exch2_pij(3,4,747)=0 exch2_pij(4,4,747)=1 exch2_oi(4,747)=0 exch2_oj(4,747)=0 RETURN END SUBROUTINE W2_E2SETUP_748 C Topology for tile 748 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(748)=34 exch2_tNy(748)=51 exch2_tBasex(748)=408 exch2_tBasey(748)=459 exch2_txGlobalo(748)=2449 exch2_tyGlobalo(748)=460 exch2_isWedge(748)=0 exch2_isNedge(748)=1 exch2_isEedge(748)=0 exch2_isSedge(748)=0 exch2_myFace(748)=5 exch2_mydNx(748)=510 exch2_mydNy(748)=510 exch2_nNeighbours(748)=4 exch2_neighbourId(1,748)=16 exch2_iLo(1,748)=0 exch2_iHi(1,748)=35 exch2_jLo(1,748)=52 exch2_jHi(1,748)=52 exch2_opposingSend(1,748)=4 exch2_pij(1,1,748)=0 exch2_pij(2,1,748)=-1 exch2_pij(3,1,748)=1 exch2_pij(4,1,748)=0 exch2_oi(1,748)=511 exch2_oj(1,748)=510 exch2_neighbourId(2,748)=733 exch2_iLo(2,748)=0 exch2_iHi(2,748)=35 exch2_jLo(2,748)=0 exch2_jHi(2,748)=0 exch2_opposingSend(2,748)=1 exch2_pij(1,2,748)=1 exch2_pij(2,2,748)=0 exch2_pij(3,2,748)=0 exch2_pij(4,2,748)=1 exch2_oi(2,748)=0 exch2_oj(2,748)=0 exch2_neighbourId(3,748)=749 exch2_iLo(3,748)=35 exch2_iHi(3,748)=35 exch2_jLo(3,748)=0 exch2_jHi(3,748)=52 exch2_opposingSend(3,748)=5 exch2_pij(1,3,748)=1 exch2_pij(2,3,748)=0 exch2_pij(3,3,748)=0 exch2_pij(4,3,748)=1 exch2_oi(3,748)=0 exch2_oj(3,748)=0 exch2_neighbourId(4,748)=747 exch2_iLo(4,748)=0 exch2_iHi(4,748)=0 exch2_jLo(4,748)=0 exch2_jHi(4,748)=52 exch2_opposingSend(4,748)=3 exch2_pij(1,4,748)=1 exch2_pij(2,4,748)=0 exch2_pij(3,4,748)=0 exch2_pij(4,4,748)=1 exch2_oi(4,748)=0 exch2_oj(4,748)=0 RETURN END SUBROUTINE W2_E2SETUP_749 C Topology for tile 749 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(749)=34 exch2_tNy(749)=51 exch2_tBasex(749)=442 exch2_tBasey(749)=459 exch2_txGlobalo(749)=2483 exch2_tyGlobalo(749)=460 exch2_isWedge(749)=0 exch2_isNedge(749)=1 exch2_isEedge(749)=0 exch2_isSedge(749)=0 exch2_myFace(749)=5 exch2_mydNx(749)=510 exch2_mydNy(749)=510 exch2_nNeighbours(749)=5 exch2_neighbourId(1,749)=1 exch2_iLo(1,749)=17 exch2_iHi(1,749)=35 exch2_jLo(1,749)=52 exch2_jHi(1,749)=52 exch2_opposingSend(1,749)=4 exch2_pij(1,1,749)=0 exch2_pij(2,1,749)=-1 exch2_pij(3,1,749)=1 exch2_pij(4,1,749)=0 exch2_oi(1,749)=511 exch2_oj(1,749)=510 exch2_neighbourId(2,749)=16 exch2_iLo(2,749)=0 exch2_iHi(2,749)=18 exch2_jLo(2,749)=52 exch2_jHi(2,749)=52 exch2_opposingSend(2,749)=5 exch2_pij(1,2,749)=0 exch2_pij(2,2,749)=-1 exch2_pij(3,2,749)=1 exch2_pij(4,2,749)=0 exch2_oi(2,749)=511 exch2_oj(2,749)=510 exch2_neighbourId(3,749)=734 exch2_iLo(3,749)=0 exch2_iHi(3,749)=35 exch2_jLo(3,749)=0 exch2_jHi(3,749)=0 exch2_opposingSend(3,749)=1 exch2_pij(1,3,749)=1 exch2_pij(2,3,749)=0 exch2_pij(3,3,749)=0 exch2_pij(4,3,749)=1 exch2_oi(3,749)=0 exch2_oj(3,749)=0 exch2_neighbourId(4,749)=750 exch2_iLo(4,749)=35 exch2_iHi(4,749)=35 exch2_jLo(4,749)=0 exch2_jHi(4,749)=52 exch2_opposingSend(4,749)=4 exch2_pij(1,4,749)=1 exch2_pij(2,4,749)=0 exch2_pij(3,4,749)=0 exch2_pij(4,4,749)=1 exch2_oi(4,749)=0 exch2_oj(4,749)=0 exch2_neighbourId(5,749)=748 exch2_iLo(5,749)=0 exch2_iHi(5,749)=0 exch2_jLo(5,749)=0 exch2_jHi(5,749)=52 exch2_opposingSend(5,749)=3 exch2_pij(1,5,749)=1 exch2_pij(2,5,749)=0 exch2_pij(3,5,749)=0 exch2_pij(4,5,749)=1 exch2_oi(5,749)=0 exch2_oj(5,749)=0 RETURN END SUBROUTINE W2_E2SETUP_750 C Topology for tile 750 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(750)=34 exch2_tNy(750)=51 exch2_tBasex(750)=476 exch2_tBasey(750)=459 exch2_txGlobalo(750)=2517 exch2_tyGlobalo(750)=460 exch2_isWedge(750)=0 exch2_isNedge(750)=1 exch2_isEedge(750)=1 exch2_isSedge(750)=0 exch2_myFace(750)=5 exch2_mydNx(750)=510 exch2_mydNy(750)=510 exch2_nNeighbours(750)=4 exch2_neighbourId(1,750)=1 exch2_iLo(1,750)=0 exch2_iHi(1,750)=35 exch2_jLo(1,750)=52 exch2_jHi(1,750)=52 exch2_opposingSend(1,750)=5 exch2_pij(1,1,750)=0 exch2_pij(2,1,750)=-1 exch2_pij(3,1,750)=1 exch2_pij(4,1,750)=0 exch2_oi(1,750)=511 exch2_oj(1,750)=510 exch2_neighbourId(2,750)=735 exch2_iLo(2,750)=0 exch2_iHi(2,750)=35 exch2_jLo(2,750)=0 exch2_jHi(2,750)=0 exch2_opposingSend(2,750)=1 exch2_pij(1,2,750)=1 exch2_pij(2,2,750)=0 exch2_pij(3,2,750)=0 exch2_pij(4,2,750)=1 exch2_oi(2,750)=0 exch2_oj(2,750)=0 exch2_neighbourId(3,750)=886 exch2_iLo(3,750)=35 exch2_iHi(3,750)=35 exch2_jLo(3,750)=0 exch2_jHi(3,750)=52 exch2_opposingSend(3,750)=4 exch2_pij(1,3,750)=1 exch2_pij(2,3,750)=0 exch2_pij(3,3,750)=0 exch2_pij(4,3,750)=1 exch2_oi(3,750)=510 exch2_oj(3,750)=0 exch2_neighbourId(4,750)=749 exch2_iLo(4,750)=0 exch2_iHi(4,750)=0 exch2_jLo(4,750)=0 exch2_jHi(4,750)=52 exch2_opposingSend(4,750)=4 exch2_pij(1,4,750)=1 exch2_pij(2,4,750)=0 exch2_pij(3,4,750)=0 exch2_pij(4,4,750)=1 exch2_oi(4,750)=0 exch2_oj(4,750)=0 RETURN END SUBROUTINE W2_E2SETUP_751 C Topology for tile 751 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(751)=34 exch2_tNy(751)=51 exch2_tBasex(751)=0 exch2_tBasey(751)=0 exch2_txGlobalo(751)=2551 exch2_tyGlobalo(751)=1 exch2_isWedge(751)=1 exch2_isNedge(751)=0 exch2_isEedge(751)=0 exch2_isSedge(751)=1 exch2_myFace(751)=6 exch2_mydNx(751)=510 exch2_mydNy(751)=510 exch2_nNeighbours(751)=4 exch2_neighbourId(1,751)=766 exch2_iLo(1,751)=0 exch2_iHi(1,751)=35 exch2_jLo(1,751)=52 exch2_jHi(1,751)=52 exch2_opposingSend(1,751)=2 exch2_pij(1,1,751)=1 exch2_pij(2,1,751)=0 exch2_pij(3,1,751)=0 exch2_pij(4,1,751)=1 exch2_oi(1,751)=0 exch2_oj(1,751)=0 exch2_neighbourId(2,751)=600 exch2_iLo(2,751)=0 exch2_iHi(2,751)=35 exch2_jLo(2,751)=0 exch2_jHi(2,751)=0 exch2_opposingSend(2,751)=3 exch2_pij(1,2,751)=0 exch2_pij(2,2,751)=-1 exch2_pij(3,2,751)=1 exch2_pij(4,2,751)=0 exch2_oi(2,751)=511 exch2_oj(2,751)=-510 exch2_neighbourId(3,751)=752 exch2_iLo(3,751)=35 exch2_iHi(3,751)=35 exch2_jLo(3,751)=0 exch2_jHi(3,751)=52 exch2_opposingSend(3,751)=5 exch2_pij(1,3,751)=1 exch2_pij(2,3,751)=0 exch2_pij(3,3,751)=0 exch2_pij(4,3,751)=1 exch2_oi(3,751)=0 exch2_oj(3,751)=0 exch2_neighbourId(4,751)=615 exch2_iLo(4,751)=0 exch2_iHi(4,751)=0 exch2_jLo(4,751)=0 exch2_jHi(4,751)=52 exch2_opposingSend(4,751)=3 exch2_pij(1,4,751)=1 exch2_pij(2,4,751)=0 exch2_pij(3,4,751)=0 exch2_pij(4,4,751)=1 exch2_oi(4,751)=-510 exch2_oj(4,751)=0 RETURN END SUBROUTINE W2_E2SETUP_752 C Topology for tile 752 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(752)=34 exch2_tNy(752)=51 exch2_tBasex(752)=34 exch2_tBasey(752)=0 exch2_txGlobalo(752)=2585 exch2_tyGlobalo(752)=1 exch2_isWedge(752)=0 exch2_isNedge(752)=0 exch2_isEedge(752)=0 exch2_isSedge(752)=1 exch2_myFace(752)=6 exch2_mydNx(752)=510 exch2_mydNy(752)=510 exch2_nNeighbours(752)=5 exch2_neighbourId(1,752)=767 exch2_iLo(1,752)=0 exch2_iHi(1,752)=35 exch2_jLo(1,752)=52 exch2_jHi(1,752)=52 exch2_opposingSend(1,752)=2 exch2_pij(1,1,752)=1 exch2_pij(2,1,752)=0 exch2_pij(3,1,752)=0 exch2_pij(4,1,752)=1 exch2_oi(1,752)=0 exch2_oj(1,752)=0 exch2_neighbourId(2,752)=585 exch2_iLo(2,752)=17 exch2_iHi(2,752)=35 exch2_jLo(2,752)=0 exch2_jHi(2,752)=0 exch2_opposingSend(2,752)=3 exch2_pij(1,2,752)=0 exch2_pij(2,2,752)=-1 exch2_pij(3,2,752)=1 exch2_pij(4,2,752)=0 exch2_oi(2,752)=511 exch2_oj(2,752)=-510 exch2_neighbourId(3,752)=600 exch2_iLo(3,752)=0 exch2_iHi(3,752)=18 exch2_jLo(3,752)=0 exch2_jHi(3,752)=0 exch2_opposingSend(3,752)=4 exch2_pij(1,3,752)=0 exch2_pij(2,3,752)=-1 exch2_pij(3,3,752)=1 exch2_pij(4,3,752)=0 exch2_oi(3,752)=511 exch2_oj(3,752)=-510 exch2_neighbourId(4,752)=753 exch2_iLo(4,752)=35 exch2_iHi(4,752)=35 exch2_jLo(4,752)=0 exch2_jHi(4,752)=52 exch2_opposingSend(4,752)=4 exch2_pij(1,4,752)=1 exch2_pij(2,4,752)=0 exch2_pij(3,4,752)=0 exch2_pij(4,4,752)=1 exch2_oi(4,752)=0 exch2_oj(4,752)=0 exch2_neighbourId(5,752)=751 exch2_iLo(5,752)=0 exch2_iHi(5,752)=0 exch2_jLo(5,752)=0 exch2_jHi(5,752)=52 exch2_opposingSend(5,752)=3 exch2_pij(1,5,752)=1 exch2_pij(2,5,752)=0 exch2_pij(3,5,752)=0 exch2_pij(4,5,752)=1 exch2_oi(5,752)=0 exch2_oj(5,752)=0 RETURN END SUBROUTINE W2_E2SETUP_753 C Topology for tile 753 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(753)=34 exch2_tNy(753)=51 exch2_tBasex(753)=68 exch2_tBasey(753)=0 exch2_txGlobalo(753)=2619 exch2_tyGlobalo(753)=1 exch2_isWedge(753)=0 exch2_isNedge(753)=0 exch2_isEedge(753)=0 exch2_isSedge(753)=1 exch2_myFace(753)=6 exch2_mydNx(753)=510 exch2_mydNy(753)=510 exch2_nNeighbours(753)=4 exch2_neighbourId(1,753)=768 exch2_iLo(1,753)=0 exch2_iHi(1,753)=35 exch2_jLo(1,753)=52 exch2_jHi(1,753)=52 exch2_opposingSend(1,753)=2 exch2_pij(1,1,753)=1 exch2_pij(2,1,753)=0 exch2_pij(3,1,753)=0 exch2_pij(4,1,753)=1 exch2_oi(1,753)=0 exch2_oj(1,753)=0 exch2_neighbourId(2,753)=585 exch2_iLo(2,753)=0 exch2_iHi(2,753)=35 exch2_jLo(2,753)=0 exch2_jHi(2,753)=0 exch2_opposingSend(2,753)=4 exch2_pij(1,2,753)=0 exch2_pij(2,2,753)=-1 exch2_pij(3,2,753)=1 exch2_pij(4,2,753)=0 exch2_oi(2,753)=511 exch2_oj(2,753)=-510 exch2_neighbourId(3,753)=754 exch2_iLo(3,753)=35 exch2_iHi(3,753)=35 exch2_jLo(3,753)=0 exch2_jHi(3,753)=52 exch2_opposingSend(3,753)=4 exch2_pij(1,3,753)=1 exch2_pij(2,3,753)=0 exch2_pij(3,3,753)=0 exch2_pij(4,3,753)=1 exch2_oi(3,753)=0 exch2_oj(3,753)=0 exch2_neighbourId(4,753)=752 exch2_iLo(4,753)=0 exch2_iHi(4,753)=0 exch2_jLo(4,753)=0 exch2_jHi(4,753)=52 exch2_opposingSend(4,753)=4 exch2_pij(1,4,753)=1 exch2_pij(2,4,753)=0 exch2_pij(3,4,753)=0 exch2_pij(4,4,753)=1 exch2_oi(4,753)=0 exch2_oj(4,753)=0 RETURN END SUBROUTINE W2_E2SETUP_754 C Topology for tile 754 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(754)=34 exch2_tNy(754)=51 exch2_tBasex(754)=102 exch2_tBasey(754)=0 exch2_txGlobalo(754)=2653 exch2_tyGlobalo(754)=1 exch2_isWedge(754)=0 exch2_isNedge(754)=0 exch2_isEedge(754)=0 exch2_isSedge(754)=1 exch2_myFace(754)=6 exch2_mydNx(754)=510 exch2_mydNy(754)=510 exch2_nNeighbours(754)=4 exch2_neighbourId(1,754)=769 exch2_iLo(1,754)=0 exch2_iHi(1,754)=35 exch2_jLo(1,754)=52 exch2_jHi(1,754)=52 exch2_opposingSend(1,754)=2 exch2_pij(1,1,754)=1 exch2_pij(2,1,754)=0 exch2_pij(3,1,754)=0 exch2_pij(4,1,754)=1 exch2_oi(1,754)=0 exch2_oj(1,754)=0 exch2_neighbourId(2,754)=570 exch2_iLo(2,754)=0 exch2_iHi(2,754)=35 exch2_jLo(2,754)=0 exch2_jHi(2,754)=0 exch2_opposingSend(2,754)=3 exch2_pij(1,2,754)=0 exch2_pij(2,2,754)=-1 exch2_pij(3,2,754)=1 exch2_pij(4,2,754)=0 exch2_oi(2,754)=511 exch2_oj(2,754)=-510 exch2_neighbourId(3,754)=755 exch2_iLo(3,754)=35 exch2_iHi(3,754)=35 exch2_jLo(3,754)=0 exch2_jHi(3,754)=52 exch2_opposingSend(3,754)=5 exch2_pij(1,3,754)=1 exch2_pij(2,3,754)=0 exch2_pij(3,3,754)=0 exch2_pij(4,3,754)=1 exch2_oi(3,754)=0 exch2_oj(3,754)=0 exch2_neighbourId(4,754)=753 exch2_iLo(4,754)=0 exch2_iHi(4,754)=0 exch2_jLo(4,754)=0 exch2_jHi(4,754)=52 exch2_opposingSend(4,754)=3 exch2_pij(1,4,754)=1 exch2_pij(2,4,754)=0 exch2_pij(3,4,754)=0 exch2_pij(4,4,754)=1 exch2_oi(4,754)=0 exch2_oj(4,754)=0 RETURN END SUBROUTINE W2_E2SETUP_755 C Topology for tile 755 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(755)=34 exch2_tNy(755)=51 exch2_tBasex(755)=136 exch2_tBasey(755)=0 exch2_txGlobalo(755)=2687 exch2_tyGlobalo(755)=1 exch2_isWedge(755)=0 exch2_isNedge(755)=0 exch2_isEedge(755)=0 exch2_isSedge(755)=1 exch2_myFace(755)=6 exch2_mydNx(755)=510 exch2_mydNy(755)=510 exch2_nNeighbours(755)=5 exch2_neighbourId(1,755)=770 exch2_iLo(1,755)=0 exch2_iHi(1,755)=35 exch2_jLo(1,755)=52 exch2_jHi(1,755)=52 exch2_opposingSend(1,755)=2 exch2_pij(1,1,755)=1 exch2_pij(2,1,755)=0 exch2_pij(3,1,755)=0 exch2_pij(4,1,755)=1 exch2_oi(1,755)=0 exch2_oj(1,755)=0 exch2_neighbourId(2,755)=555 exch2_iLo(2,755)=17 exch2_iHi(2,755)=35 exch2_jLo(2,755)=0 exch2_jHi(2,755)=0 exch2_opposingSend(2,755)=3 exch2_pij(1,2,755)=0 exch2_pij(2,2,755)=-1 exch2_pij(3,2,755)=1 exch2_pij(4,2,755)=0 exch2_oi(2,755)=511 exch2_oj(2,755)=-510 exch2_neighbourId(3,755)=570 exch2_iLo(3,755)=0 exch2_iHi(3,755)=18 exch2_jLo(3,755)=0 exch2_jHi(3,755)=0 exch2_opposingSend(3,755)=4 exch2_pij(1,3,755)=0 exch2_pij(2,3,755)=-1 exch2_pij(3,3,755)=1 exch2_pij(4,3,755)=0 exch2_oi(3,755)=511 exch2_oj(3,755)=-510 exch2_neighbourId(4,755)=756 exch2_iLo(4,755)=35 exch2_iHi(4,755)=35 exch2_jLo(4,755)=0 exch2_jHi(4,755)=52 exch2_opposingSend(4,755)=4 exch2_pij(1,4,755)=1 exch2_pij(2,4,755)=0 exch2_pij(3,4,755)=0 exch2_pij(4,4,755)=1 exch2_oi(4,755)=0 exch2_oj(4,755)=0 exch2_neighbourId(5,755)=754 exch2_iLo(5,755)=0 exch2_iHi(5,755)=0 exch2_jLo(5,755)=0 exch2_jHi(5,755)=52 exch2_opposingSend(5,755)=3 exch2_pij(1,5,755)=1 exch2_pij(2,5,755)=0 exch2_pij(3,5,755)=0 exch2_pij(4,5,755)=1 exch2_oi(5,755)=0 exch2_oj(5,755)=0 RETURN END SUBROUTINE W2_E2SETUP_756 C Topology for tile 756 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(756)=34 exch2_tNy(756)=51 exch2_tBasex(756)=170 exch2_tBasey(756)=0 exch2_txGlobalo(756)=2721 exch2_tyGlobalo(756)=1 exch2_isWedge(756)=0 exch2_isNedge(756)=0 exch2_isEedge(756)=0 exch2_isSedge(756)=1 exch2_myFace(756)=6 exch2_mydNx(756)=510 exch2_mydNy(756)=510 exch2_nNeighbours(756)=4 exch2_neighbourId(1,756)=771 exch2_iLo(1,756)=0 exch2_iHi(1,756)=35 exch2_jLo(1,756)=52 exch2_jHi(1,756)=52 exch2_opposingSend(1,756)=2 exch2_pij(1,1,756)=1 exch2_pij(2,1,756)=0 exch2_pij(3,1,756)=0 exch2_pij(4,1,756)=1 exch2_oi(1,756)=0 exch2_oj(1,756)=0 exch2_neighbourId(2,756)=555 exch2_iLo(2,756)=0 exch2_iHi(2,756)=35 exch2_jLo(2,756)=0 exch2_jHi(2,756)=0 exch2_opposingSend(2,756)=4 exch2_pij(1,2,756)=0 exch2_pij(2,2,756)=-1 exch2_pij(3,2,756)=1 exch2_pij(4,2,756)=0 exch2_oi(2,756)=511 exch2_oj(2,756)=-510 exch2_neighbourId(3,756)=757 exch2_iLo(3,756)=35 exch2_iHi(3,756)=35 exch2_jLo(3,756)=0 exch2_jHi(3,756)=52 exch2_opposingSend(3,756)=4 exch2_pij(1,3,756)=1 exch2_pij(2,3,756)=0 exch2_pij(3,3,756)=0 exch2_pij(4,3,756)=1 exch2_oi(3,756)=0 exch2_oj(3,756)=0 exch2_neighbourId(4,756)=755 exch2_iLo(4,756)=0 exch2_iHi(4,756)=0 exch2_jLo(4,756)=0 exch2_jHi(4,756)=52 exch2_opposingSend(4,756)=4 exch2_pij(1,4,756)=1 exch2_pij(2,4,756)=0 exch2_pij(3,4,756)=0 exch2_pij(4,4,756)=1 exch2_oi(4,756)=0 exch2_oj(4,756)=0 RETURN END SUBROUTINE W2_E2SETUP_757 C Topology for tile 757 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(757)=34 exch2_tNy(757)=51 exch2_tBasex(757)=204 exch2_tBasey(757)=0 exch2_txGlobalo(757)=2755 exch2_tyGlobalo(757)=1 exch2_isWedge(757)=0 exch2_isNedge(757)=0 exch2_isEedge(757)=0 exch2_isSedge(757)=1 exch2_myFace(757)=6 exch2_mydNx(757)=510 exch2_mydNy(757)=510 exch2_nNeighbours(757)=4 exch2_neighbourId(1,757)=772 exch2_iLo(1,757)=0 exch2_iHi(1,757)=35 exch2_jLo(1,757)=52 exch2_jHi(1,757)=52 exch2_opposingSend(1,757)=2 exch2_pij(1,1,757)=1 exch2_pij(2,1,757)=0 exch2_pij(3,1,757)=0 exch2_pij(4,1,757)=1 exch2_oi(1,757)=0 exch2_oj(1,757)=0 exch2_neighbourId(2,757)=540 exch2_iLo(2,757)=0 exch2_iHi(2,757)=35 exch2_jLo(2,757)=0 exch2_jHi(2,757)=0 exch2_opposingSend(2,757)=3 exch2_pij(1,2,757)=0 exch2_pij(2,2,757)=-1 exch2_pij(3,2,757)=1 exch2_pij(4,2,757)=0 exch2_oi(2,757)=511 exch2_oj(2,757)=-510 exch2_neighbourId(3,757)=758 exch2_iLo(3,757)=35 exch2_iHi(3,757)=35 exch2_jLo(3,757)=0 exch2_jHi(3,757)=52 exch2_opposingSend(3,757)=5 exch2_pij(1,3,757)=1 exch2_pij(2,3,757)=0 exch2_pij(3,3,757)=0 exch2_pij(4,3,757)=1 exch2_oi(3,757)=0 exch2_oj(3,757)=0 exch2_neighbourId(4,757)=756 exch2_iLo(4,757)=0 exch2_iHi(4,757)=0 exch2_jLo(4,757)=0 exch2_jHi(4,757)=52 exch2_opposingSend(4,757)=3 exch2_pij(1,4,757)=1 exch2_pij(2,4,757)=0 exch2_pij(3,4,757)=0 exch2_pij(4,4,757)=1 exch2_oi(4,757)=0 exch2_oj(4,757)=0 RETURN END SUBROUTINE W2_E2SETUP_758 C Topology for tile 758 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(758)=34 exch2_tNy(758)=51 exch2_tBasex(758)=238 exch2_tBasey(758)=0 exch2_txGlobalo(758)=2789 exch2_tyGlobalo(758)=1 exch2_isWedge(758)=0 exch2_isNedge(758)=0 exch2_isEedge(758)=0 exch2_isSedge(758)=1 exch2_myFace(758)=6 exch2_mydNx(758)=510 exch2_mydNy(758)=510 exch2_nNeighbours(758)=5 exch2_neighbourId(1,758)=773 exch2_iLo(1,758)=0 exch2_iHi(1,758)=35 exch2_jLo(1,758)=52 exch2_jHi(1,758)=52 exch2_opposingSend(1,758)=2 exch2_pij(1,1,758)=1 exch2_pij(2,1,758)=0 exch2_pij(3,1,758)=0 exch2_pij(4,1,758)=1 exch2_oi(1,758)=0 exch2_oj(1,758)=0 exch2_neighbourId(2,758)=525 exch2_iLo(2,758)=17 exch2_iHi(2,758)=35 exch2_jLo(2,758)=0 exch2_jHi(2,758)=0 exch2_opposingSend(2,758)=3 exch2_pij(1,2,758)=0 exch2_pij(2,2,758)=-1 exch2_pij(3,2,758)=1 exch2_pij(4,2,758)=0 exch2_oi(2,758)=511 exch2_oj(2,758)=-510 exch2_neighbourId(3,758)=540 exch2_iLo(3,758)=0 exch2_iHi(3,758)=18 exch2_jLo(3,758)=0 exch2_jHi(3,758)=0 exch2_opposingSend(3,758)=4 exch2_pij(1,3,758)=0 exch2_pij(2,3,758)=-1 exch2_pij(3,3,758)=1 exch2_pij(4,3,758)=0 exch2_oi(3,758)=511 exch2_oj(3,758)=-510 exch2_neighbourId(4,758)=759 exch2_iLo(4,758)=35 exch2_iHi(4,758)=35 exch2_jLo(4,758)=0 exch2_jHi(4,758)=52 exch2_opposingSend(4,758)=4 exch2_pij(1,4,758)=1 exch2_pij(2,4,758)=0 exch2_pij(3,4,758)=0 exch2_pij(4,4,758)=1 exch2_oi(4,758)=0 exch2_oj(4,758)=0 exch2_neighbourId(5,758)=757 exch2_iLo(5,758)=0 exch2_iHi(5,758)=0 exch2_jLo(5,758)=0 exch2_jHi(5,758)=52 exch2_opposingSend(5,758)=3 exch2_pij(1,5,758)=1 exch2_pij(2,5,758)=0 exch2_pij(3,5,758)=0 exch2_pij(4,5,758)=1 exch2_oi(5,758)=0 exch2_oj(5,758)=0 RETURN END SUBROUTINE W2_E2SETUP_759 C Topology for tile 759 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(759)=34 exch2_tNy(759)=51 exch2_tBasex(759)=272 exch2_tBasey(759)=0 exch2_txGlobalo(759)=2823 exch2_tyGlobalo(759)=1 exch2_isWedge(759)=0 exch2_isNedge(759)=0 exch2_isEedge(759)=0 exch2_isSedge(759)=1 exch2_myFace(759)=6 exch2_mydNx(759)=510 exch2_mydNy(759)=510 exch2_nNeighbours(759)=4 exch2_neighbourId(1,759)=774 exch2_iLo(1,759)=0 exch2_iHi(1,759)=35 exch2_jLo(1,759)=52 exch2_jHi(1,759)=52 exch2_opposingSend(1,759)=2 exch2_pij(1,1,759)=1 exch2_pij(2,1,759)=0 exch2_pij(3,1,759)=0 exch2_pij(4,1,759)=1 exch2_oi(1,759)=0 exch2_oj(1,759)=0 exch2_neighbourId(2,759)=525 exch2_iLo(2,759)=0 exch2_iHi(2,759)=35 exch2_jLo(2,759)=0 exch2_jHi(2,759)=0 exch2_opposingSend(2,759)=4 exch2_pij(1,2,759)=0 exch2_pij(2,2,759)=-1 exch2_pij(3,2,759)=1 exch2_pij(4,2,759)=0 exch2_oi(2,759)=511 exch2_oj(2,759)=-510 exch2_neighbourId(3,759)=760 exch2_iLo(3,759)=35 exch2_iHi(3,759)=35 exch2_jLo(3,759)=0 exch2_jHi(3,759)=52 exch2_opposingSend(3,759)=4 exch2_pij(1,3,759)=1 exch2_pij(2,3,759)=0 exch2_pij(3,3,759)=0 exch2_pij(4,3,759)=1 exch2_oi(3,759)=0 exch2_oj(3,759)=0 exch2_neighbourId(4,759)=758 exch2_iLo(4,759)=0 exch2_iHi(4,759)=0 exch2_jLo(4,759)=0 exch2_jHi(4,759)=52 exch2_opposingSend(4,759)=4 exch2_pij(1,4,759)=1 exch2_pij(2,4,759)=0 exch2_pij(3,4,759)=0 exch2_pij(4,4,759)=1 exch2_oi(4,759)=0 exch2_oj(4,759)=0 RETURN END SUBROUTINE W2_E2SETUP_760 C Topology for tile 760 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(760)=34 exch2_tNy(760)=51 exch2_tBasex(760)=306 exch2_tBasey(760)=0 exch2_txGlobalo(760)=2857 exch2_tyGlobalo(760)=1 exch2_isWedge(760)=0 exch2_isNedge(760)=0 exch2_isEedge(760)=0 exch2_isSedge(760)=1 exch2_myFace(760)=6 exch2_mydNx(760)=510 exch2_mydNy(760)=510 exch2_nNeighbours(760)=4 exch2_neighbourId(1,760)=775 exch2_iLo(1,760)=0 exch2_iHi(1,760)=35 exch2_jLo(1,760)=52 exch2_jHi(1,760)=52 exch2_opposingSend(1,760)=2 exch2_pij(1,1,760)=1 exch2_pij(2,1,760)=0 exch2_pij(3,1,760)=0 exch2_pij(4,1,760)=1 exch2_oi(1,760)=0 exch2_oj(1,760)=0 exch2_neighbourId(2,760)=510 exch2_iLo(2,760)=0 exch2_iHi(2,760)=35 exch2_jLo(2,760)=0 exch2_jHi(2,760)=0 exch2_opposingSend(2,760)=3 exch2_pij(1,2,760)=0 exch2_pij(2,2,760)=-1 exch2_pij(3,2,760)=1 exch2_pij(4,2,760)=0 exch2_oi(2,760)=511 exch2_oj(2,760)=-510 exch2_neighbourId(3,760)=761 exch2_iLo(3,760)=35 exch2_iHi(3,760)=35 exch2_jLo(3,760)=0 exch2_jHi(3,760)=52 exch2_opposingSend(3,760)=5 exch2_pij(1,3,760)=1 exch2_pij(2,3,760)=0 exch2_pij(3,3,760)=0 exch2_pij(4,3,760)=1 exch2_oi(3,760)=0 exch2_oj(3,760)=0 exch2_neighbourId(4,760)=759 exch2_iLo(4,760)=0 exch2_iHi(4,760)=0 exch2_jLo(4,760)=0 exch2_jHi(4,760)=52 exch2_opposingSend(4,760)=3 exch2_pij(1,4,760)=1 exch2_pij(2,4,760)=0 exch2_pij(3,4,760)=0 exch2_pij(4,4,760)=1 exch2_oi(4,760)=0 exch2_oj(4,760)=0 RETURN END SUBROUTINE W2_E2SETUP_761 C Topology for tile 761 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(761)=34 exch2_tNy(761)=51 exch2_tBasex(761)=340 exch2_tBasey(761)=0 exch2_txGlobalo(761)=2891 exch2_tyGlobalo(761)=1 exch2_isWedge(761)=0 exch2_isNedge(761)=0 exch2_isEedge(761)=0 exch2_isSedge(761)=1 exch2_myFace(761)=6 exch2_mydNx(761)=510 exch2_mydNy(761)=510 exch2_nNeighbours(761)=5 exch2_neighbourId(1,761)=776 exch2_iLo(1,761)=0 exch2_iHi(1,761)=35 exch2_jLo(1,761)=52 exch2_jHi(1,761)=52 exch2_opposingSend(1,761)=2 exch2_pij(1,1,761)=1 exch2_pij(2,1,761)=0 exch2_pij(3,1,761)=0 exch2_pij(4,1,761)=1 exch2_oi(1,761)=0 exch2_oj(1,761)=0 exch2_neighbourId(2,761)=495 exch2_iLo(2,761)=17 exch2_iHi(2,761)=35 exch2_jLo(2,761)=0 exch2_jHi(2,761)=0 exch2_opposingSend(2,761)=3 exch2_pij(1,2,761)=0 exch2_pij(2,2,761)=-1 exch2_pij(3,2,761)=1 exch2_pij(4,2,761)=0 exch2_oi(2,761)=511 exch2_oj(2,761)=-510 exch2_neighbourId(3,761)=510 exch2_iLo(3,761)=0 exch2_iHi(3,761)=18 exch2_jLo(3,761)=0 exch2_jHi(3,761)=0 exch2_opposingSend(3,761)=4 exch2_pij(1,3,761)=0 exch2_pij(2,3,761)=-1 exch2_pij(3,3,761)=1 exch2_pij(4,3,761)=0 exch2_oi(3,761)=511 exch2_oj(3,761)=-510 exch2_neighbourId(4,761)=762 exch2_iLo(4,761)=35 exch2_iHi(4,761)=35 exch2_jLo(4,761)=0 exch2_jHi(4,761)=52 exch2_opposingSend(4,761)=4 exch2_pij(1,4,761)=1 exch2_pij(2,4,761)=0 exch2_pij(3,4,761)=0 exch2_pij(4,4,761)=1 exch2_oi(4,761)=0 exch2_oj(4,761)=0 exch2_neighbourId(5,761)=760 exch2_iLo(5,761)=0 exch2_iHi(5,761)=0 exch2_jLo(5,761)=0 exch2_jHi(5,761)=52 exch2_opposingSend(5,761)=3 exch2_pij(1,5,761)=1 exch2_pij(2,5,761)=0 exch2_pij(3,5,761)=0 exch2_pij(4,5,761)=1 exch2_oi(5,761)=0 exch2_oj(5,761)=0 RETURN END SUBROUTINE W2_E2SETUP_762 C Topology for tile 762 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(762)=34 exch2_tNy(762)=51 exch2_tBasex(762)=374 exch2_tBasey(762)=0 exch2_txGlobalo(762)=2925 exch2_tyGlobalo(762)=1 exch2_isWedge(762)=0 exch2_isNedge(762)=0 exch2_isEedge(762)=0 exch2_isSedge(762)=1 exch2_myFace(762)=6 exch2_mydNx(762)=510 exch2_mydNy(762)=510 exch2_nNeighbours(762)=4 exch2_neighbourId(1,762)=777 exch2_iLo(1,762)=0 exch2_iHi(1,762)=35 exch2_jLo(1,762)=52 exch2_jHi(1,762)=52 exch2_opposingSend(1,762)=2 exch2_pij(1,1,762)=1 exch2_pij(2,1,762)=0 exch2_pij(3,1,762)=0 exch2_pij(4,1,762)=1 exch2_oi(1,762)=0 exch2_oj(1,762)=0 exch2_neighbourId(2,762)=495 exch2_iLo(2,762)=0 exch2_iHi(2,762)=35 exch2_jLo(2,762)=0 exch2_jHi(2,762)=0 exch2_opposingSend(2,762)=4 exch2_pij(1,2,762)=0 exch2_pij(2,2,762)=-1 exch2_pij(3,2,762)=1 exch2_pij(4,2,762)=0 exch2_oi(2,762)=511 exch2_oj(2,762)=-510 exch2_neighbourId(3,762)=763 exch2_iLo(3,762)=35 exch2_iHi(3,762)=35 exch2_jLo(3,762)=0 exch2_jHi(3,762)=52 exch2_opposingSend(3,762)=4 exch2_pij(1,3,762)=1 exch2_pij(2,3,762)=0 exch2_pij(3,3,762)=0 exch2_pij(4,3,762)=1 exch2_oi(3,762)=0 exch2_oj(3,762)=0 exch2_neighbourId(4,762)=761 exch2_iLo(4,762)=0 exch2_iHi(4,762)=0 exch2_jLo(4,762)=0 exch2_jHi(4,762)=52 exch2_opposingSend(4,762)=4 exch2_pij(1,4,762)=1 exch2_pij(2,4,762)=0 exch2_pij(3,4,762)=0 exch2_pij(4,4,762)=1 exch2_oi(4,762)=0 exch2_oj(4,762)=0 RETURN END SUBROUTINE W2_E2SETUP_763 C Topology for tile 763 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(763)=34 exch2_tNy(763)=51 exch2_tBasex(763)=408 exch2_tBasey(763)=0 exch2_txGlobalo(763)=2959 exch2_tyGlobalo(763)=1 exch2_isWedge(763)=0 exch2_isNedge(763)=0 exch2_isEedge(763)=0 exch2_isSedge(763)=1 exch2_myFace(763)=6 exch2_mydNx(763)=510 exch2_mydNy(763)=510 exch2_nNeighbours(763)=4 exch2_neighbourId(1,763)=778 exch2_iLo(1,763)=0 exch2_iHi(1,763)=35 exch2_jLo(1,763)=52 exch2_jHi(1,763)=52 exch2_opposingSend(1,763)=2 exch2_pij(1,1,763)=1 exch2_pij(2,1,763)=0 exch2_pij(3,1,763)=0 exch2_pij(4,1,763)=1 exch2_oi(1,763)=0 exch2_oj(1,763)=0 exch2_neighbourId(2,763)=480 exch2_iLo(2,763)=0 exch2_iHi(2,763)=35 exch2_jLo(2,763)=0 exch2_jHi(2,763)=0 exch2_opposingSend(2,763)=3 exch2_pij(1,2,763)=0 exch2_pij(2,2,763)=-1 exch2_pij(3,2,763)=1 exch2_pij(4,2,763)=0 exch2_oi(2,763)=511 exch2_oj(2,763)=-510 exch2_neighbourId(3,763)=764 exch2_iLo(3,763)=35 exch2_iHi(3,763)=35 exch2_jLo(3,763)=0 exch2_jHi(3,763)=52 exch2_opposingSend(3,763)=5 exch2_pij(1,3,763)=1 exch2_pij(2,3,763)=0 exch2_pij(3,3,763)=0 exch2_pij(4,3,763)=1 exch2_oi(3,763)=0 exch2_oj(3,763)=0 exch2_neighbourId(4,763)=762 exch2_iLo(4,763)=0 exch2_iHi(4,763)=0 exch2_jLo(4,763)=0 exch2_jHi(4,763)=52 exch2_opposingSend(4,763)=3 exch2_pij(1,4,763)=1 exch2_pij(2,4,763)=0 exch2_pij(3,4,763)=0 exch2_pij(4,4,763)=1 exch2_oi(4,763)=0 exch2_oj(4,763)=0 RETURN END SUBROUTINE W2_E2SETUP_764 C Topology for tile 764 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(764)=34 exch2_tNy(764)=51 exch2_tBasex(764)=442 exch2_tBasey(764)=0 exch2_txGlobalo(764)=2993 exch2_tyGlobalo(764)=1 exch2_isWedge(764)=0 exch2_isNedge(764)=0 exch2_isEedge(764)=0 exch2_isSedge(764)=1 exch2_myFace(764)=6 exch2_mydNx(764)=510 exch2_mydNy(764)=510 exch2_nNeighbours(764)=5 exch2_neighbourId(1,764)=779 exch2_iLo(1,764)=0 exch2_iHi(1,764)=35 exch2_jLo(1,764)=52 exch2_jHi(1,764)=52 exch2_opposingSend(1,764)=2 exch2_pij(1,1,764)=1 exch2_pij(2,1,764)=0 exch2_pij(3,1,764)=0 exch2_pij(4,1,764)=1 exch2_oi(1,764)=0 exch2_oj(1,764)=0 exch2_neighbourId(2,764)=465 exch2_iLo(2,764)=17 exch2_iHi(2,764)=35 exch2_jLo(2,764)=0 exch2_jHi(2,764)=0 exch2_opposingSend(2,764)=3 exch2_pij(1,2,764)=0 exch2_pij(2,2,764)=-1 exch2_pij(3,2,764)=1 exch2_pij(4,2,764)=0 exch2_oi(2,764)=511 exch2_oj(2,764)=-510 exch2_neighbourId(3,764)=480 exch2_iLo(3,764)=0 exch2_iHi(3,764)=18 exch2_jLo(3,764)=0 exch2_jHi(3,764)=0 exch2_opposingSend(3,764)=4 exch2_pij(1,3,764)=0 exch2_pij(2,3,764)=-1 exch2_pij(3,3,764)=1 exch2_pij(4,3,764)=0 exch2_oi(3,764)=511 exch2_oj(3,764)=-510 exch2_neighbourId(4,764)=765 exch2_iLo(4,764)=35 exch2_iHi(4,764)=35 exch2_jLo(4,764)=0 exch2_jHi(4,764)=52 exch2_opposingSend(4,764)=5 exch2_pij(1,4,764)=1 exch2_pij(2,4,764)=0 exch2_pij(3,4,764)=0 exch2_pij(4,4,764)=1 exch2_oi(4,764)=0 exch2_oj(4,764)=0 exch2_neighbourId(5,764)=763 exch2_iLo(5,764)=0 exch2_iHi(5,764)=0 exch2_jLo(5,764)=0 exch2_jHi(5,764)=52 exch2_opposingSend(5,764)=3 exch2_pij(1,5,764)=1 exch2_pij(2,5,764)=0 exch2_pij(3,5,764)=0 exch2_pij(4,5,764)=1 exch2_oi(5,764)=0 exch2_oj(5,764)=0 RETURN END SUBROUTINE W2_E2SETUP_765 C Topology for tile 765 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(765)=34 exch2_tNy(765)=51 exch2_tBasex(765)=476 exch2_tBasey(765)=0 exch2_txGlobalo(765)=3027 exch2_tyGlobalo(765)=1 exch2_isWedge(765)=0 exch2_isNedge(765)=0 exch2_isEedge(765)=1 exch2_isSedge(765)=1 exch2_myFace(765)=6 exch2_mydNx(765)=510 exch2_mydNy(765)=510 exch2_nNeighbours(765)=5 exch2_neighbourId(1,765)=780 exch2_iLo(1,765)=0 exch2_iHi(1,765)=35 exch2_jLo(1,765)=52 exch2_jHi(1,765)=52 exch2_opposingSend(1,765)=2 exch2_pij(1,1,765)=1 exch2_pij(2,1,765)=0 exch2_pij(3,1,765)=0 exch2_pij(4,1,765)=1 exch2_oi(1,765)=0 exch2_oj(1,765)=0 exch2_neighbourId(2,765)=465 exch2_iLo(2,765)=0 exch2_iHi(2,765)=35 exch2_jLo(2,765)=0 exch2_jHi(2,765)=0 exch2_opposingSend(2,765)=4 exch2_pij(1,2,765)=0 exch2_pij(2,2,765)=-1 exch2_pij(3,2,765)=1 exch2_pij(4,2,765)=0 exch2_oi(2,765)=511 exch2_oj(2,765)=-510 exch2_neighbourId(3,765)=164 exch2_iLo(3,765)=35 exch2_iHi(3,765)=35 exch2_jLo(3,765)=34 exch2_jHi(3,765)=52 exch2_opposingSend(3,765)=2 exch2_pij(1,3,765)=0 exch2_pij(2,3,765)=1 exch2_pij(3,3,765)=-1 exch2_pij(4,3,765)=0 exch2_oi(3,765)=510 exch2_oj(3,765)=511 exch2_neighbourId(4,765)=165 exch2_iLo(4,765)=35 exch2_iHi(4,765)=35 exch2_jLo(4,765)=0 exch2_jHi(4,765)=35 exch2_opposingSend(4,765)=2 exch2_pij(1,4,765)=0 exch2_pij(2,4,765)=1 exch2_pij(3,4,765)=-1 exch2_pij(4,4,765)=0 exch2_oi(4,765)=510 exch2_oj(4,765)=511 exch2_neighbourId(5,765)=764 exch2_iLo(5,765)=0 exch2_iHi(5,765)=0 exch2_jLo(5,765)=0 exch2_jHi(5,765)=52 exch2_opposingSend(5,765)=4 exch2_pij(1,5,765)=1 exch2_pij(2,5,765)=0 exch2_pij(3,5,765)=0 exch2_pij(4,5,765)=1 exch2_oi(5,765)=0 exch2_oj(5,765)=0 RETURN END SUBROUTINE W2_E2SETUP_766 C Topology for tile 766 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(766)=34 exch2_tNy(766)=51 exch2_tBasex(766)=0 exch2_tBasey(766)=51 exch2_txGlobalo(766)=2551 exch2_tyGlobalo(766)=52 exch2_isWedge(766)=1 exch2_isNedge(766)=0 exch2_isEedge(766)=0 exch2_isSedge(766)=0 exch2_myFace(766)=6 exch2_mydNx(766)=510 exch2_mydNy(766)=510 exch2_nNeighbours(766)=4 exch2_neighbourId(1,766)=781 exch2_iLo(1,766)=0 exch2_iHi(1,766)=35 exch2_jLo(1,766)=52 exch2_jHi(1,766)=52 exch2_opposingSend(1,766)=2 exch2_pij(1,1,766)=1 exch2_pij(2,1,766)=0 exch2_pij(3,1,766)=0 exch2_pij(4,1,766)=1 exch2_oi(1,766)=0 exch2_oj(1,766)=0 exch2_neighbourId(2,766)=751 exch2_iLo(2,766)=0 exch2_iHi(2,766)=35 exch2_jLo(2,766)=0 exch2_jHi(2,766)=0 exch2_opposingSend(2,766)=1 exch2_pij(1,2,766)=1 exch2_pij(2,2,766)=0 exch2_pij(3,2,766)=0 exch2_pij(4,2,766)=1 exch2_oi(2,766)=0 exch2_oj(2,766)=0 exch2_neighbourId(3,766)=767 exch2_iLo(3,766)=35 exch2_iHi(3,766)=35 exch2_jLo(3,766)=0 exch2_jHi(3,766)=52 exch2_opposingSend(3,766)=4 exch2_pij(1,3,766)=1 exch2_pij(2,3,766)=0 exch2_pij(3,3,766)=0 exch2_pij(4,3,766)=1 exch2_oi(3,766)=0 exch2_oj(3,766)=0 exch2_neighbourId(4,766)=630 exch2_iLo(4,766)=0 exch2_iHi(4,766)=0 exch2_jLo(4,766)=0 exch2_jHi(4,766)=52 exch2_opposingSend(4,766)=3 exch2_pij(1,4,766)=1 exch2_pij(2,4,766)=0 exch2_pij(3,4,766)=0 exch2_pij(4,4,766)=1 exch2_oi(4,766)=-510 exch2_oj(4,766)=0 RETURN END SUBROUTINE W2_E2SETUP_767 C Topology for tile 767 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(767)=34 exch2_tNy(767)=51 exch2_tBasex(767)=34 exch2_tBasey(767)=51 exch2_txGlobalo(767)=2585 exch2_tyGlobalo(767)=52 exch2_isWedge(767)=0 exch2_isNedge(767)=0 exch2_isEedge(767)=0 exch2_isSedge(767)=0 exch2_myFace(767)=6 exch2_mydNx(767)=510 exch2_mydNy(767)=510 exch2_nNeighbours(767)=4 exch2_neighbourId(1,767)=782 exch2_iLo(1,767)=0 exch2_iHi(1,767)=35 exch2_jLo(1,767)=52 exch2_jHi(1,767)=52 exch2_opposingSend(1,767)=2 exch2_pij(1,1,767)=1 exch2_pij(2,1,767)=0 exch2_pij(3,1,767)=0 exch2_pij(4,1,767)=1 exch2_oi(1,767)=0 exch2_oj(1,767)=0 exch2_neighbourId(2,767)=752 exch2_iLo(2,767)=0 exch2_iHi(2,767)=35 exch2_jLo(2,767)=0 exch2_jHi(2,767)=0 exch2_opposingSend(2,767)=1 exch2_pij(1,2,767)=1 exch2_pij(2,2,767)=0 exch2_pij(3,2,767)=0 exch2_pij(4,2,767)=1 exch2_oi(2,767)=0 exch2_oj(2,767)=0 exch2_neighbourId(3,767)=768 exch2_iLo(3,767)=35 exch2_iHi(3,767)=35 exch2_jLo(3,767)=0 exch2_jHi(3,767)=52 exch2_opposingSend(3,767)=4 exch2_pij(1,3,767)=1 exch2_pij(2,3,767)=0 exch2_pij(3,3,767)=0 exch2_pij(4,3,767)=1 exch2_oi(3,767)=0 exch2_oj(3,767)=0 exch2_neighbourId(4,767)=766 exch2_iLo(4,767)=0 exch2_iHi(4,767)=0 exch2_jLo(4,767)=0 exch2_jHi(4,767)=52 exch2_opposingSend(4,767)=3 exch2_pij(1,4,767)=1 exch2_pij(2,4,767)=0 exch2_pij(3,4,767)=0 exch2_pij(4,4,767)=1 exch2_oi(4,767)=0 exch2_oj(4,767)=0 RETURN END SUBROUTINE W2_E2SETUP_768 C Topology for tile 768 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(768)=34 exch2_tNy(768)=51 exch2_tBasex(768)=68 exch2_tBasey(768)=51 exch2_txGlobalo(768)=2619 exch2_tyGlobalo(768)=52 exch2_isWedge(768)=0 exch2_isNedge(768)=0 exch2_isEedge(768)=0 exch2_isSedge(768)=0 exch2_myFace(768)=6 exch2_mydNx(768)=510 exch2_mydNy(768)=510 exch2_nNeighbours(768)=4 exch2_neighbourId(1,768)=783 exch2_iLo(1,768)=0 exch2_iHi(1,768)=35 exch2_jLo(1,768)=52 exch2_jHi(1,768)=52 exch2_opposingSend(1,768)=2 exch2_pij(1,1,768)=1 exch2_pij(2,1,768)=0 exch2_pij(3,1,768)=0 exch2_pij(4,1,768)=1 exch2_oi(1,768)=0 exch2_oj(1,768)=0 exch2_neighbourId(2,768)=753 exch2_iLo(2,768)=0 exch2_iHi(2,768)=35 exch2_jLo(2,768)=0 exch2_jHi(2,768)=0 exch2_opposingSend(2,768)=1 exch2_pij(1,2,768)=1 exch2_pij(2,2,768)=0 exch2_pij(3,2,768)=0 exch2_pij(4,2,768)=1 exch2_oi(2,768)=0 exch2_oj(2,768)=0 exch2_neighbourId(3,768)=769 exch2_iLo(3,768)=35 exch2_iHi(3,768)=35 exch2_jLo(3,768)=0 exch2_jHi(3,768)=52 exch2_opposingSend(3,768)=4 exch2_pij(1,3,768)=1 exch2_pij(2,3,768)=0 exch2_pij(3,3,768)=0 exch2_pij(4,3,768)=1 exch2_oi(3,768)=0 exch2_oj(3,768)=0 exch2_neighbourId(4,768)=767 exch2_iLo(4,768)=0 exch2_iHi(4,768)=0 exch2_jLo(4,768)=0 exch2_jHi(4,768)=52 exch2_opposingSend(4,768)=3 exch2_pij(1,4,768)=1 exch2_pij(2,4,768)=0 exch2_pij(3,4,768)=0 exch2_pij(4,4,768)=1 exch2_oi(4,768)=0 exch2_oj(4,768)=0 RETURN END SUBROUTINE W2_E2SETUP_769 C Topology for tile 769 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(769)=34 exch2_tNy(769)=51 exch2_tBasex(769)=102 exch2_tBasey(769)=51 exch2_txGlobalo(769)=2653 exch2_tyGlobalo(769)=52 exch2_isWedge(769)=0 exch2_isNedge(769)=0 exch2_isEedge(769)=0 exch2_isSedge(769)=0 exch2_myFace(769)=6 exch2_mydNx(769)=510 exch2_mydNy(769)=510 exch2_nNeighbours(769)=4 exch2_neighbourId(1,769)=784 exch2_iLo(1,769)=0 exch2_iHi(1,769)=35 exch2_jLo(1,769)=52 exch2_jHi(1,769)=52 exch2_opposingSend(1,769)=2 exch2_pij(1,1,769)=1 exch2_pij(2,1,769)=0 exch2_pij(3,1,769)=0 exch2_pij(4,1,769)=1 exch2_oi(1,769)=0 exch2_oj(1,769)=0 exch2_neighbourId(2,769)=754 exch2_iLo(2,769)=0 exch2_iHi(2,769)=35 exch2_jLo(2,769)=0 exch2_jHi(2,769)=0 exch2_opposingSend(2,769)=1 exch2_pij(1,2,769)=1 exch2_pij(2,2,769)=0 exch2_pij(3,2,769)=0 exch2_pij(4,2,769)=1 exch2_oi(2,769)=0 exch2_oj(2,769)=0 exch2_neighbourId(3,769)=770 exch2_iLo(3,769)=35 exch2_iHi(3,769)=35 exch2_jLo(3,769)=0 exch2_jHi(3,769)=52 exch2_opposingSend(3,769)=4 exch2_pij(1,3,769)=1 exch2_pij(2,3,769)=0 exch2_pij(3,3,769)=0 exch2_pij(4,3,769)=1 exch2_oi(3,769)=0 exch2_oj(3,769)=0 exch2_neighbourId(4,769)=768 exch2_iLo(4,769)=0 exch2_iHi(4,769)=0 exch2_jLo(4,769)=0 exch2_jHi(4,769)=52 exch2_opposingSend(4,769)=3 exch2_pij(1,4,769)=1 exch2_pij(2,4,769)=0 exch2_pij(3,4,769)=0 exch2_pij(4,4,769)=1 exch2_oi(4,769)=0 exch2_oj(4,769)=0 RETURN END SUBROUTINE W2_E2SETUP_770 C Topology for tile 770 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(770)=34 exch2_tNy(770)=51 exch2_tBasex(770)=136 exch2_tBasey(770)=51 exch2_txGlobalo(770)=2687 exch2_tyGlobalo(770)=52 exch2_isWedge(770)=0 exch2_isNedge(770)=0 exch2_isEedge(770)=0 exch2_isSedge(770)=0 exch2_myFace(770)=6 exch2_mydNx(770)=510 exch2_mydNy(770)=510 exch2_nNeighbours(770)=4 exch2_neighbourId(1,770)=785 exch2_iLo(1,770)=0 exch2_iHi(1,770)=35 exch2_jLo(1,770)=52 exch2_jHi(1,770)=52 exch2_opposingSend(1,770)=2 exch2_pij(1,1,770)=1 exch2_pij(2,1,770)=0 exch2_pij(3,1,770)=0 exch2_pij(4,1,770)=1 exch2_oi(1,770)=0 exch2_oj(1,770)=0 exch2_neighbourId(2,770)=755 exch2_iLo(2,770)=0 exch2_iHi(2,770)=35 exch2_jLo(2,770)=0 exch2_jHi(2,770)=0 exch2_opposingSend(2,770)=1 exch2_pij(1,2,770)=1 exch2_pij(2,2,770)=0 exch2_pij(3,2,770)=0 exch2_pij(4,2,770)=1 exch2_oi(2,770)=0 exch2_oj(2,770)=0 exch2_neighbourId(3,770)=771 exch2_iLo(3,770)=35 exch2_iHi(3,770)=35 exch2_jLo(3,770)=0 exch2_jHi(3,770)=52 exch2_opposingSend(3,770)=4 exch2_pij(1,3,770)=1 exch2_pij(2,3,770)=0 exch2_pij(3,3,770)=0 exch2_pij(4,3,770)=1 exch2_oi(3,770)=0 exch2_oj(3,770)=0 exch2_neighbourId(4,770)=769 exch2_iLo(4,770)=0 exch2_iHi(4,770)=0 exch2_jLo(4,770)=0 exch2_jHi(4,770)=52 exch2_opposingSend(4,770)=3 exch2_pij(1,4,770)=1 exch2_pij(2,4,770)=0 exch2_pij(3,4,770)=0 exch2_pij(4,4,770)=1 exch2_oi(4,770)=0 exch2_oj(4,770)=0 RETURN END SUBROUTINE W2_E2SETUP_771 C Topology for tile 771 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(771)=34 exch2_tNy(771)=51 exch2_tBasex(771)=170 exch2_tBasey(771)=51 exch2_txGlobalo(771)=2721 exch2_tyGlobalo(771)=52 exch2_isWedge(771)=0 exch2_isNedge(771)=0 exch2_isEedge(771)=0 exch2_isSedge(771)=0 exch2_myFace(771)=6 exch2_mydNx(771)=510 exch2_mydNy(771)=510 exch2_nNeighbours(771)=4 exch2_neighbourId(1,771)=786 exch2_iLo(1,771)=0 exch2_iHi(1,771)=35 exch2_jLo(1,771)=52 exch2_jHi(1,771)=52 exch2_opposingSend(1,771)=2 exch2_pij(1,1,771)=1 exch2_pij(2,1,771)=0 exch2_pij(3,1,771)=0 exch2_pij(4,1,771)=1 exch2_oi(1,771)=0 exch2_oj(1,771)=0 exch2_neighbourId(2,771)=756 exch2_iLo(2,771)=0 exch2_iHi(2,771)=35 exch2_jLo(2,771)=0 exch2_jHi(2,771)=0 exch2_opposingSend(2,771)=1 exch2_pij(1,2,771)=1 exch2_pij(2,2,771)=0 exch2_pij(3,2,771)=0 exch2_pij(4,2,771)=1 exch2_oi(2,771)=0 exch2_oj(2,771)=0 exch2_neighbourId(3,771)=772 exch2_iLo(3,771)=35 exch2_iHi(3,771)=35 exch2_jLo(3,771)=0 exch2_jHi(3,771)=52 exch2_opposingSend(3,771)=4 exch2_pij(1,3,771)=1 exch2_pij(2,3,771)=0 exch2_pij(3,3,771)=0 exch2_pij(4,3,771)=1 exch2_oi(3,771)=0 exch2_oj(3,771)=0 exch2_neighbourId(4,771)=770 exch2_iLo(4,771)=0 exch2_iHi(4,771)=0 exch2_jLo(4,771)=0 exch2_jHi(4,771)=52 exch2_opposingSend(4,771)=3 exch2_pij(1,4,771)=1 exch2_pij(2,4,771)=0 exch2_pij(3,4,771)=0 exch2_pij(4,4,771)=1 exch2_oi(4,771)=0 exch2_oj(4,771)=0 RETURN END SUBROUTINE W2_E2SETUP_772 C Topology for tile 772 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(772)=34 exch2_tNy(772)=51 exch2_tBasex(772)=204 exch2_tBasey(772)=51 exch2_txGlobalo(772)=2755 exch2_tyGlobalo(772)=52 exch2_isWedge(772)=0 exch2_isNedge(772)=0 exch2_isEedge(772)=0 exch2_isSedge(772)=0 exch2_myFace(772)=6 exch2_mydNx(772)=510 exch2_mydNy(772)=510 exch2_nNeighbours(772)=4 exch2_neighbourId(1,772)=787 exch2_iLo(1,772)=0 exch2_iHi(1,772)=35 exch2_jLo(1,772)=52 exch2_jHi(1,772)=52 exch2_opposingSend(1,772)=2 exch2_pij(1,1,772)=1 exch2_pij(2,1,772)=0 exch2_pij(3,1,772)=0 exch2_pij(4,1,772)=1 exch2_oi(1,772)=0 exch2_oj(1,772)=0 exch2_neighbourId(2,772)=757 exch2_iLo(2,772)=0 exch2_iHi(2,772)=35 exch2_jLo(2,772)=0 exch2_jHi(2,772)=0 exch2_opposingSend(2,772)=1 exch2_pij(1,2,772)=1 exch2_pij(2,2,772)=0 exch2_pij(3,2,772)=0 exch2_pij(4,2,772)=1 exch2_oi(2,772)=0 exch2_oj(2,772)=0 exch2_neighbourId(3,772)=773 exch2_iLo(3,772)=35 exch2_iHi(3,772)=35 exch2_jLo(3,772)=0 exch2_jHi(3,772)=52 exch2_opposingSend(3,772)=4 exch2_pij(1,3,772)=1 exch2_pij(2,3,772)=0 exch2_pij(3,3,772)=0 exch2_pij(4,3,772)=1 exch2_oi(3,772)=0 exch2_oj(3,772)=0 exch2_neighbourId(4,772)=771 exch2_iLo(4,772)=0 exch2_iHi(4,772)=0 exch2_jLo(4,772)=0 exch2_jHi(4,772)=52 exch2_opposingSend(4,772)=3 exch2_pij(1,4,772)=1 exch2_pij(2,4,772)=0 exch2_pij(3,4,772)=0 exch2_pij(4,4,772)=1 exch2_oi(4,772)=0 exch2_oj(4,772)=0 RETURN END SUBROUTINE W2_E2SETUP_773 C Topology for tile 773 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(773)=34 exch2_tNy(773)=51 exch2_tBasex(773)=238 exch2_tBasey(773)=51 exch2_txGlobalo(773)=2789 exch2_tyGlobalo(773)=52 exch2_isWedge(773)=0 exch2_isNedge(773)=0 exch2_isEedge(773)=0 exch2_isSedge(773)=0 exch2_myFace(773)=6 exch2_mydNx(773)=510 exch2_mydNy(773)=510 exch2_nNeighbours(773)=4 exch2_neighbourId(1,773)=788 exch2_iLo(1,773)=0 exch2_iHi(1,773)=35 exch2_jLo(1,773)=52 exch2_jHi(1,773)=52 exch2_opposingSend(1,773)=2 exch2_pij(1,1,773)=1 exch2_pij(2,1,773)=0 exch2_pij(3,1,773)=0 exch2_pij(4,1,773)=1 exch2_oi(1,773)=0 exch2_oj(1,773)=0 exch2_neighbourId(2,773)=758 exch2_iLo(2,773)=0 exch2_iHi(2,773)=35 exch2_jLo(2,773)=0 exch2_jHi(2,773)=0 exch2_opposingSend(2,773)=1 exch2_pij(1,2,773)=1 exch2_pij(2,2,773)=0 exch2_pij(3,2,773)=0 exch2_pij(4,2,773)=1 exch2_oi(2,773)=0 exch2_oj(2,773)=0 exch2_neighbourId(3,773)=774 exch2_iLo(3,773)=35 exch2_iHi(3,773)=35 exch2_jLo(3,773)=0 exch2_jHi(3,773)=52 exch2_opposingSend(3,773)=4 exch2_pij(1,3,773)=1 exch2_pij(2,3,773)=0 exch2_pij(3,3,773)=0 exch2_pij(4,3,773)=1 exch2_oi(3,773)=0 exch2_oj(3,773)=0 exch2_neighbourId(4,773)=772 exch2_iLo(4,773)=0 exch2_iHi(4,773)=0 exch2_jLo(4,773)=0 exch2_jHi(4,773)=52 exch2_opposingSend(4,773)=3 exch2_pij(1,4,773)=1 exch2_pij(2,4,773)=0 exch2_pij(3,4,773)=0 exch2_pij(4,4,773)=1 exch2_oi(4,773)=0 exch2_oj(4,773)=0 RETURN END SUBROUTINE W2_E2SETUP_774 C Topology for tile 774 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(774)=34 exch2_tNy(774)=51 exch2_tBasex(774)=272 exch2_tBasey(774)=51 exch2_txGlobalo(774)=2823 exch2_tyGlobalo(774)=52 exch2_isWedge(774)=0 exch2_isNedge(774)=0 exch2_isEedge(774)=0 exch2_isSedge(774)=0 exch2_myFace(774)=6 exch2_mydNx(774)=510 exch2_mydNy(774)=510 exch2_nNeighbours(774)=4 exch2_neighbourId(1,774)=789 exch2_iLo(1,774)=0 exch2_iHi(1,774)=35 exch2_jLo(1,774)=52 exch2_jHi(1,774)=52 exch2_opposingSend(1,774)=2 exch2_pij(1,1,774)=1 exch2_pij(2,1,774)=0 exch2_pij(3,1,774)=0 exch2_pij(4,1,774)=1 exch2_oi(1,774)=0 exch2_oj(1,774)=0 exch2_neighbourId(2,774)=759 exch2_iLo(2,774)=0 exch2_iHi(2,774)=35 exch2_jLo(2,774)=0 exch2_jHi(2,774)=0 exch2_opposingSend(2,774)=1 exch2_pij(1,2,774)=1 exch2_pij(2,2,774)=0 exch2_pij(3,2,774)=0 exch2_pij(4,2,774)=1 exch2_oi(2,774)=0 exch2_oj(2,774)=0 exch2_neighbourId(3,774)=775 exch2_iLo(3,774)=35 exch2_iHi(3,774)=35 exch2_jLo(3,774)=0 exch2_jHi(3,774)=52 exch2_opposingSend(3,774)=4 exch2_pij(1,3,774)=1 exch2_pij(2,3,774)=0 exch2_pij(3,3,774)=0 exch2_pij(4,3,774)=1 exch2_oi(3,774)=0 exch2_oj(3,774)=0 exch2_neighbourId(4,774)=773 exch2_iLo(4,774)=0 exch2_iHi(4,774)=0 exch2_jLo(4,774)=0 exch2_jHi(4,774)=52 exch2_opposingSend(4,774)=3 exch2_pij(1,4,774)=1 exch2_pij(2,4,774)=0 exch2_pij(3,4,774)=0 exch2_pij(4,4,774)=1 exch2_oi(4,774)=0 exch2_oj(4,774)=0 RETURN END SUBROUTINE W2_E2SETUP_775 C Topology for tile 775 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(775)=34 exch2_tNy(775)=51 exch2_tBasex(775)=306 exch2_tBasey(775)=51 exch2_txGlobalo(775)=2857 exch2_tyGlobalo(775)=52 exch2_isWedge(775)=0 exch2_isNedge(775)=0 exch2_isEedge(775)=0 exch2_isSedge(775)=0 exch2_myFace(775)=6 exch2_mydNx(775)=510 exch2_mydNy(775)=510 exch2_nNeighbours(775)=4 exch2_neighbourId(1,775)=790 exch2_iLo(1,775)=0 exch2_iHi(1,775)=35 exch2_jLo(1,775)=52 exch2_jHi(1,775)=52 exch2_opposingSend(1,775)=2 exch2_pij(1,1,775)=1 exch2_pij(2,1,775)=0 exch2_pij(3,1,775)=0 exch2_pij(4,1,775)=1 exch2_oi(1,775)=0 exch2_oj(1,775)=0 exch2_neighbourId(2,775)=760 exch2_iLo(2,775)=0 exch2_iHi(2,775)=35 exch2_jLo(2,775)=0 exch2_jHi(2,775)=0 exch2_opposingSend(2,775)=1 exch2_pij(1,2,775)=1 exch2_pij(2,2,775)=0 exch2_pij(3,2,775)=0 exch2_pij(4,2,775)=1 exch2_oi(2,775)=0 exch2_oj(2,775)=0 exch2_neighbourId(3,775)=776 exch2_iLo(3,775)=35 exch2_iHi(3,775)=35 exch2_jLo(3,775)=0 exch2_jHi(3,775)=52 exch2_opposingSend(3,775)=4 exch2_pij(1,3,775)=1 exch2_pij(2,3,775)=0 exch2_pij(3,3,775)=0 exch2_pij(4,3,775)=1 exch2_oi(3,775)=0 exch2_oj(3,775)=0 exch2_neighbourId(4,775)=774 exch2_iLo(4,775)=0 exch2_iHi(4,775)=0 exch2_jLo(4,775)=0 exch2_jHi(4,775)=52 exch2_opposingSend(4,775)=3 exch2_pij(1,4,775)=1 exch2_pij(2,4,775)=0 exch2_pij(3,4,775)=0 exch2_pij(4,4,775)=1 exch2_oi(4,775)=0 exch2_oj(4,775)=0 RETURN END SUBROUTINE W2_E2SETUP_776 C Topology for tile 776 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(776)=34 exch2_tNy(776)=51 exch2_tBasex(776)=340 exch2_tBasey(776)=51 exch2_txGlobalo(776)=2891 exch2_tyGlobalo(776)=52 exch2_isWedge(776)=0 exch2_isNedge(776)=0 exch2_isEedge(776)=0 exch2_isSedge(776)=0 exch2_myFace(776)=6 exch2_mydNx(776)=510 exch2_mydNy(776)=510 exch2_nNeighbours(776)=4 exch2_neighbourId(1,776)=791 exch2_iLo(1,776)=0 exch2_iHi(1,776)=35 exch2_jLo(1,776)=52 exch2_jHi(1,776)=52 exch2_opposingSend(1,776)=2 exch2_pij(1,1,776)=1 exch2_pij(2,1,776)=0 exch2_pij(3,1,776)=0 exch2_pij(4,1,776)=1 exch2_oi(1,776)=0 exch2_oj(1,776)=0 exch2_neighbourId(2,776)=761 exch2_iLo(2,776)=0 exch2_iHi(2,776)=35 exch2_jLo(2,776)=0 exch2_jHi(2,776)=0 exch2_opposingSend(2,776)=1 exch2_pij(1,2,776)=1 exch2_pij(2,2,776)=0 exch2_pij(3,2,776)=0 exch2_pij(4,2,776)=1 exch2_oi(2,776)=0 exch2_oj(2,776)=0 exch2_neighbourId(3,776)=777 exch2_iLo(3,776)=35 exch2_iHi(3,776)=35 exch2_jLo(3,776)=0 exch2_jHi(3,776)=52 exch2_opposingSend(3,776)=4 exch2_pij(1,3,776)=1 exch2_pij(2,3,776)=0 exch2_pij(3,3,776)=0 exch2_pij(4,3,776)=1 exch2_oi(3,776)=0 exch2_oj(3,776)=0 exch2_neighbourId(4,776)=775 exch2_iLo(4,776)=0 exch2_iHi(4,776)=0 exch2_jLo(4,776)=0 exch2_jHi(4,776)=52 exch2_opposingSend(4,776)=3 exch2_pij(1,4,776)=1 exch2_pij(2,4,776)=0 exch2_pij(3,4,776)=0 exch2_pij(4,4,776)=1 exch2_oi(4,776)=0 exch2_oj(4,776)=0 RETURN END SUBROUTINE W2_E2SETUP_777 C Topology for tile 777 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(777)=34 exch2_tNy(777)=51 exch2_tBasex(777)=374 exch2_tBasey(777)=51 exch2_txGlobalo(777)=2925 exch2_tyGlobalo(777)=52 exch2_isWedge(777)=0 exch2_isNedge(777)=0 exch2_isEedge(777)=0 exch2_isSedge(777)=0 exch2_myFace(777)=6 exch2_mydNx(777)=510 exch2_mydNy(777)=510 exch2_nNeighbours(777)=4 exch2_neighbourId(1,777)=792 exch2_iLo(1,777)=0 exch2_iHi(1,777)=35 exch2_jLo(1,777)=52 exch2_jHi(1,777)=52 exch2_opposingSend(1,777)=2 exch2_pij(1,1,777)=1 exch2_pij(2,1,777)=0 exch2_pij(3,1,777)=0 exch2_pij(4,1,777)=1 exch2_oi(1,777)=0 exch2_oj(1,777)=0 exch2_neighbourId(2,777)=762 exch2_iLo(2,777)=0 exch2_iHi(2,777)=35 exch2_jLo(2,777)=0 exch2_jHi(2,777)=0 exch2_opposingSend(2,777)=1 exch2_pij(1,2,777)=1 exch2_pij(2,2,777)=0 exch2_pij(3,2,777)=0 exch2_pij(4,2,777)=1 exch2_oi(2,777)=0 exch2_oj(2,777)=0 exch2_neighbourId(3,777)=778 exch2_iLo(3,777)=35 exch2_iHi(3,777)=35 exch2_jLo(3,777)=0 exch2_jHi(3,777)=52 exch2_opposingSend(3,777)=4 exch2_pij(1,3,777)=1 exch2_pij(2,3,777)=0 exch2_pij(3,3,777)=0 exch2_pij(4,3,777)=1 exch2_oi(3,777)=0 exch2_oj(3,777)=0 exch2_neighbourId(4,777)=776 exch2_iLo(4,777)=0 exch2_iHi(4,777)=0 exch2_jLo(4,777)=0 exch2_jHi(4,777)=52 exch2_opposingSend(4,777)=3 exch2_pij(1,4,777)=1 exch2_pij(2,4,777)=0 exch2_pij(3,4,777)=0 exch2_pij(4,4,777)=1 exch2_oi(4,777)=0 exch2_oj(4,777)=0 RETURN END SUBROUTINE W2_E2SETUP_778 C Topology for tile 778 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(778)=34 exch2_tNy(778)=51 exch2_tBasex(778)=408 exch2_tBasey(778)=51 exch2_txGlobalo(778)=2959 exch2_tyGlobalo(778)=52 exch2_isWedge(778)=0 exch2_isNedge(778)=0 exch2_isEedge(778)=0 exch2_isSedge(778)=0 exch2_myFace(778)=6 exch2_mydNx(778)=510 exch2_mydNy(778)=510 exch2_nNeighbours(778)=4 exch2_neighbourId(1,778)=793 exch2_iLo(1,778)=0 exch2_iHi(1,778)=35 exch2_jLo(1,778)=52 exch2_jHi(1,778)=52 exch2_opposingSend(1,778)=2 exch2_pij(1,1,778)=1 exch2_pij(2,1,778)=0 exch2_pij(3,1,778)=0 exch2_pij(4,1,778)=1 exch2_oi(1,778)=0 exch2_oj(1,778)=0 exch2_neighbourId(2,778)=763 exch2_iLo(2,778)=0 exch2_iHi(2,778)=35 exch2_jLo(2,778)=0 exch2_jHi(2,778)=0 exch2_opposingSend(2,778)=1 exch2_pij(1,2,778)=1 exch2_pij(2,2,778)=0 exch2_pij(3,2,778)=0 exch2_pij(4,2,778)=1 exch2_oi(2,778)=0 exch2_oj(2,778)=0 exch2_neighbourId(3,778)=779 exch2_iLo(3,778)=35 exch2_iHi(3,778)=35 exch2_jLo(3,778)=0 exch2_jHi(3,778)=52 exch2_opposingSend(3,778)=4 exch2_pij(1,3,778)=1 exch2_pij(2,3,778)=0 exch2_pij(3,3,778)=0 exch2_pij(4,3,778)=1 exch2_oi(3,778)=0 exch2_oj(3,778)=0 exch2_neighbourId(4,778)=777 exch2_iLo(4,778)=0 exch2_iHi(4,778)=0 exch2_jLo(4,778)=0 exch2_jHi(4,778)=52 exch2_opposingSend(4,778)=3 exch2_pij(1,4,778)=1 exch2_pij(2,4,778)=0 exch2_pij(3,4,778)=0 exch2_pij(4,4,778)=1 exch2_oi(4,778)=0 exch2_oj(4,778)=0 RETURN END SUBROUTINE W2_E2SETUP_779 C Topology for tile 779 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(779)=34 exch2_tNy(779)=51 exch2_tBasex(779)=442 exch2_tBasey(779)=51 exch2_txGlobalo(779)=2993 exch2_tyGlobalo(779)=52 exch2_isWedge(779)=0 exch2_isNedge(779)=0 exch2_isEedge(779)=0 exch2_isSedge(779)=0 exch2_myFace(779)=6 exch2_mydNx(779)=510 exch2_mydNy(779)=510 exch2_nNeighbours(779)=4 exch2_neighbourId(1,779)=794 exch2_iLo(1,779)=0 exch2_iHi(1,779)=35 exch2_jLo(1,779)=52 exch2_jHi(1,779)=52 exch2_opposingSend(1,779)=2 exch2_pij(1,1,779)=1 exch2_pij(2,1,779)=0 exch2_pij(3,1,779)=0 exch2_pij(4,1,779)=1 exch2_oi(1,779)=0 exch2_oj(1,779)=0 exch2_neighbourId(2,779)=764 exch2_iLo(2,779)=0 exch2_iHi(2,779)=35 exch2_jLo(2,779)=0 exch2_jHi(2,779)=0 exch2_opposingSend(2,779)=1 exch2_pij(1,2,779)=1 exch2_pij(2,2,779)=0 exch2_pij(3,2,779)=0 exch2_pij(4,2,779)=1 exch2_oi(2,779)=0 exch2_oj(2,779)=0 exch2_neighbourId(3,779)=780 exch2_iLo(3,779)=35 exch2_iHi(3,779)=35 exch2_jLo(3,779)=0 exch2_jHi(3,779)=52 exch2_opposingSend(3,779)=5 exch2_pij(1,3,779)=1 exch2_pij(2,3,779)=0 exch2_pij(3,3,779)=0 exch2_pij(4,3,779)=1 exch2_oi(3,779)=0 exch2_oj(3,779)=0 exch2_neighbourId(4,779)=778 exch2_iLo(4,779)=0 exch2_iHi(4,779)=0 exch2_jLo(4,779)=0 exch2_jHi(4,779)=52 exch2_opposingSend(4,779)=3 exch2_pij(1,4,779)=1 exch2_pij(2,4,779)=0 exch2_pij(3,4,779)=0 exch2_pij(4,4,779)=1 exch2_oi(4,779)=0 exch2_oj(4,779)=0 RETURN END SUBROUTINE W2_E2SETUP_780 C Topology for tile 780 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(780)=34 exch2_tNy(780)=51 exch2_tBasex(780)=476 exch2_tBasey(780)=51 exch2_txGlobalo(780)=3027 exch2_tyGlobalo(780)=52 exch2_isWedge(780)=0 exch2_isNedge(780)=0 exch2_isEedge(780)=1 exch2_isSedge(780)=0 exch2_myFace(780)=6 exch2_mydNx(780)=510 exch2_mydNy(780)=510 exch2_nNeighbours(780)=5 exch2_neighbourId(1,780)=795 exch2_iLo(1,780)=0 exch2_iHi(1,780)=35 exch2_jLo(1,780)=52 exch2_jHi(1,780)=52 exch2_opposingSend(1,780)=2 exch2_pij(1,1,780)=1 exch2_pij(2,1,780)=0 exch2_pij(3,1,780)=0 exch2_pij(4,1,780)=1 exch2_oi(1,780)=0 exch2_oj(1,780)=0 exch2_neighbourId(2,780)=765 exch2_iLo(2,780)=0 exch2_iHi(2,780)=35 exch2_jLo(2,780)=0 exch2_jHi(2,780)=0 exch2_opposingSend(2,780)=1 exch2_pij(1,2,780)=1 exch2_pij(2,2,780)=0 exch2_pij(3,2,780)=0 exch2_pij(4,2,780)=1 exch2_oi(2,780)=0 exch2_oj(2,780)=0 exch2_neighbourId(3,780)=163 exch2_iLo(3,780)=35 exch2_iHi(3,780)=35 exch2_jLo(3,780)=17 exch2_jHi(3,780)=52 exch2_opposingSend(3,780)=2 exch2_pij(1,3,780)=0 exch2_pij(2,3,780)=1 exch2_pij(3,3,780)=-1 exch2_pij(4,3,780)=0 exch2_oi(3,780)=510 exch2_oj(3,780)=511 exch2_neighbourId(4,780)=164 exch2_iLo(4,780)=35 exch2_iHi(4,780)=35 exch2_jLo(4,780)=0 exch2_jHi(4,780)=18 exch2_opposingSend(4,780)=3 exch2_pij(1,4,780)=0 exch2_pij(2,4,780)=1 exch2_pij(3,4,780)=-1 exch2_pij(4,4,780)=0 exch2_oi(4,780)=510 exch2_oj(4,780)=511 exch2_neighbourId(5,780)=779 exch2_iLo(5,780)=0 exch2_iHi(5,780)=0 exch2_jLo(5,780)=0 exch2_jHi(5,780)=52 exch2_opposingSend(5,780)=3 exch2_pij(1,5,780)=1 exch2_pij(2,5,780)=0 exch2_pij(3,5,780)=0 exch2_pij(4,5,780)=1 exch2_oi(5,780)=0 exch2_oj(5,780)=0 RETURN END SUBROUTINE W2_E2SETUP_781 C Topology for tile 781 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(781)=34 exch2_tNy(781)=51 exch2_tBasex(781)=0 exch2_tBasey(781)=102 exch2_txGlobalo(781)=2551 exch2_tyGlobalo(781)=103 exch2_isWedge(781)=1 exch2_isNedge(781)=0 exch2_isEedge(781)=0 exch2_isSedge(781)=0 exch2_myFace(781)=6 exch2_mydNx(781)=510 exch2_mydNy(781)=510 exch2_nNeighbours(781)=4 exch2_neighbourId(1,781)=796 exch2_iLo(1,781)=0 exch2_iHi(1,781)=35 exch2_jLo(1,781)=52 exch2_jHi(1,781)=52 exch2_opposingSend(1,781)=2 exch2_pij(1,1,781)=1 exch2_pij(2,1,781)=0 exch2_pij(3,1,781)=0 exch2_pij(4,1,781)=1 exch2_oi(1,781)=0 exch2_oj(1,781)=0 exch2_neighbourId(2,781)=766 exch2_iLo(2,781)=0 exch2_iHi(2,781)=35 exch2_jLo(2,781)=0 exch2_jHi(2,781)=0 exch2_opposingSend(2,781)=1 exch2_pij(1,2,781)=1 exch2_pij(2,2,781)=0 exch2_pij(3,2,781)=0 exch2_pij(4,2,781)=1 exch2_oi(2,781)=0 exch2_oj(2,781)=0 exch2_neighbourId(3,781)=782 exch2_iLo(3,781)=35 exch2_iHi(3,781)=35 exch2_jLo(3,781)=0 exch2_jHi(3,781)=52 exch2_opposingSend(3,781)=4 exch2_pij(1,3,781)=1 exch2_pij(2,3,781)=0 exch2_pij(3,3,781)=0 exch2_pij(4,3,781)=1 exch2_oi(3,781)=0 exch2_oj(3,781)=0 exch2_neighbourId(4,781)=645 exch2_iLo(4,781)=0 exch2_iHi(4,781)=0 exch2_jLo(4,781)=0 exch2_jHi(4,781)=52 exch2_opposingSend(4,781)=3 exch2_pij(1,4,781)=1 exch2_pij(2,4,781)=0 exch2_pij(3,4,781)=0 exch2_pij(4,4,781)=1 exch2_oi(4,781)=-510 exch2_oj(4,781)=0 RETURN END SUBROUTINE W2_E2SETUP_782 C Topology for tile 782 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(782)=34 exch2_tNy(782)=51 exch2_tBasex(782)=34 exch2_tBasey(782)=102 exch2_txGlobalo(782)=2585 exch2_tyGlobalo(782)=103 exch2_isWedge(782)=0 exch2_isNedge(782)=0 exch2_isEedge(782)=0 exch2_isSedge(782)=0 exch2_myFace(782)=6 exch2_mydNx(782)=510 exch2_mydNy(782)=510 exch2_nNeighbours(782)=4 exch2_neighbourId(1,782)=797 exch2_iLo(1,782)=0 exch2_iHi(1,782)=35 exch2_jLo(1,782)=52 exch2_jHi(1,782)=52 exch2_opposingSend(1,782)=2 exch2_pij(1,1,782)=1 exch2_pij(2,1,782)=0 exch2_pij(3,1,782)=0 exch2_pij(4,1,782)=1 exch2_oi(1,782)=0 exch2_oj(1,782)=0 exch2_neighbourId(2,782)=767 exch2_iLo(2,782)=0 exch2_iHi(2,782)=35 exch2_jLo(2,782)=0 exch2_jHi(2,782)=0 exch2_opposingSend(2,782)=1 exch2_pij(1,2,782)=1 exch2_pij(2,2,782)=0 exch2_pij(3,2,782)=0 exch2_pij(4,2,782)=1 exch2_oi(2,782)=0 exch2_oj(2,782)=0 exch2_neighbourId(3,782)=783 exch2_iLo(3,782)=35 exch2_iHi(3,782)=35 exch2_jLo(3,782)=0 exch2_jHi(3,782)=52 exch2_opposingSend(3,782)=4 exch2_pij(1,3,782)=1 exch2_pij(2,3,782)=0 exch2_pij(3,3,782)=0 exch2_pij(4,3,782)=1 exch2_oi(3,782)=0 exch2_oj(3,782)=0 exch2_neighbourId(4,782)=781 exch2_iLo(4,782)=0 exch2_iHi(4,782)=0 exch2_jLo(4,782)=0 exch2_jHi(4,782)=52 exch2_opposingSend(4,782)=3 exch2_pij(1,4,782)=1 exch2_pij(2,4,782)=0 exch2_pij(3,4,782)=0 exch2_pij(4,4,782)=1 exch2_oi(4,782)=0 exch2_oj(4,782)=0 RETURN END SUBROUTINE W2_E2SETUP_783 C Topology for tile 783 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(783)=34 exch2_tNy(783)=51 exch2_tBasex(783)=68 exch2_tBasey(783)=102 exch2_txGlobalo(783)=2619 exch2_tyGlobalo(783)=103 exch2_isWedge(783)=0 exch2_isNedge(783)=0 exch2_isEedge(783)=0 exch2_isSedge(783)=0 exch2_myFace(783)=6 exch2_mydNx(783)=510 exch2_mydNy(783)=510 exch2_nNeighbours(783)=4 exch2_neighbourId(1,783)=798 exch2_iLo(1,783)=0 exch2_iHi(1,783)=35 exch2_jLo(1,783)=52 exch2_jHi(1,783)=52 exch2_opposingSend(1,783)=2 exch2_pij(1,1,783)=1 exch2_pij(2,1,783)=0 exch2_pij(3,1,783)=0 exch2_pij(4,1,783)=1 exch2_oi(1,783)=0 exch2_oj(1,783)=0 exch2_neighbourId(2,783)=768 exch2_iLo(2,783)=0 exch2_iHi(2,783)=35 exch2_jLo(2,783)=0 exch2_jHi(2,783)=0 exch2_opposingSend(2,783)=1 exch2_pij(1,2,783)=1 exch2_pij(2,2,783)=0 exch2_pij(3,2,783)=0 exch2_pij(4,2,783)=1 exch2_oi(2,783)=0 exch2_oj(2,783)=0 exch2_neighbourId(3,783)=784 exch2_iLo(3,783)=35 exch2_iHi(3,783)=35 exch2_jLo(3,783)=0 exch2_jHi(3,783)=52 exch2_opposingSend(3,783)=4 exch2_pij(1,3,783)=1 exch2_pij(2,3,783)=0 exch2_pij(3,3,783)=0 exch2_pij(4,3,783)=1 exch2_oi(3,783)=0 exch2_oj(3,783)=0 exch2_neighbourId(4,783)=782 exch2_iLo(4,783)=0 exch2_iHi(4,783)=0 exch2_jLo(4,783)=0 exch2_jHi(4,783)=52 exch2_opposingSend(4,783)=3 exch2_pij(1,4,783)=1 exch2_pij(2,4,783)=0 exch2_pij(3,4,783)=0 exch2_pij(4,4,783)=1 exch2_oi(4,783)=0 exch2_oj(4,783)=0 RETURN END SUBROUTINE W2_E2SETUP_784 C Topology for tile 784 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(784)=34 exch2_tNy(784)=51 exch2_tBasex(784)=102 exch2_tBasey(784)=102 exch2_txGlobalo(784)=2653 exch2_tyGlobalo(784)=103 exch2_isWedge(784)=0 exch2_isNedge(784)=0 exch2_isEedge(784)=0 exch2_isSedge(784)=0 exch2_myFace(784)=6 exch2_mydNx(784)=510 exch2_mydNy(784)=510 exch2_nNeighbours(784)=4 exch2_neighbourId(1,784)=799 exch2_iLo(1,784)=0 exch2_iHi(1,784)=35 exch2_jLo(1,784)=52 exch2_jHi(1,784)=52 exch2_opposingSend(1,784)=2 exch2_pij(1,1,784)=1 exch2_pij(2,1,784)=0 exch2_pij(3,1,784)=0 exch2_pij(4,1,784)=1 exch2_oi(1,784)=0 exch2_oj(1,784)=0 exch2_neighbourId(2,784)=769 exch2_iLo(2,784)=0 exch2_iHi(2,784)=35 exch2_jLo(2,784)=0 exch2_jHi(2,784)=0 exch2_opposingSend(2,784)=1 exch2_pij(1,2,784)=1 exch2_pij(2,2,784)=0 exch2_pij(3,2,784)=0 exch2_pij(4,2,784)=1 exch2_oi(2,784)=0 exch2_oj(2,784)=0 exch2_neighbourId(3,784)=785 exch2_iLo(3,784)=35 exch2_iHi(3,784)=35 exch2_jLo(3,784)=0 exch2_jHi(3,784)=52 exch2_opposingSend(3,784)=4 exch2_pij(1,3,784)=1 exch2_pij(2,3,784)=0 exch2_pij(3,3,784)=0 exch2_pij(4,3,784)=1 exch2_oi(3,784)=0 exch2_oj(3,784)=0 exch2_neighbourId(4,784)=783 exch2_iLo(4,784)=0 exch2_iHi(4,784)=0 exch2_jLo(4,784)=0 exch2_jHi(4,784)=52 exch2_opposingSend(4,784)=3 exch2_pij(1,4,784)=1 exch2_pij(2,4,784)=0 exch2_pij(3,4,784)=0 exch2_pij(4,4,784)=1 exch2_oi(4,784)=0 exch2_oj(4,784)=0 RETURN END SUBROUTINE W2_E2SETUP_785 C Topology for tile 785 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(785)=34 exch2_tNy(785)=51 exch2_tBasex(785)=136 exch2_tBasey(785)=102 exch2_txGlobalo(785)=2687 exch2_tyGlobalo(785)=103 exch2_isWedge(785)=0 exch2_isNedge(785)=0 exch2_isEedge(785)=0 exch2_isSedge(785)=0 exch2_myFace(785)=6 exch2_mydNx(785)=510 exch2_mydNy(785)=510 exch2_nNeighbours(785)=4 exch2_neighbourId(1,785)=800 exch2_iLo(1,785)=0 exch2_iHi(1,785)=35 exch2_jLo(1,785)=52 exch2_jHi(1,785)=52 exch2_opposingSend(1,785)=2 exch2_pij(1,1,785)=1 exch2_pij(2,1,785)=0 exch2_pij(3,1,785)=0 exch2_pij(4,1,785)=1 exch2_oi(1,785)=0 exch2_oj(1,785)=0 exch2_neighbourId(2,785)=770 exch2_iLo(2,785)=0 exch2_iHi(2,785)=35 exch2_jLo(2,785)=0 exch2_jHi(2,785)=0 exch2_opposingSend(2,785)=1 exch2_pij(1,2,785)=1 exch2_pij(2,2,785)=0 exch2_pij(3,2,785)=0 exch2_pij(4,2,785)=1 exch2_oi(2,785)=0 exch2_oj(2,785)=0 exch2_neighbourId(3,785)=786 exch2_iLo(3,785)=35 exch2_iHi(3,785)=35 exch2_jLo(3,785)=0 exch2_jHi(3,785)=52 exch2_opposingSend(3,785)=4 exch2_pij(1,3,785)=1 exch2_pij(2,3,785)=0 exch2_pij(3,3,785)=0 exch2_pij(4,3,785)=1 exch2_oi(3,785)=0 exch2_oj(3,785)=0 exch2_neighbourId(4,785)=784 exch2_iLo(4,785)=0 exch2_iHi(4,785)=0 exch2_jLo(4,785)=0 exch2_jHi(4,785)=52 exch2_opposingSend(4,785)=3 exch2_pij(1,4,785)=1 exch2_pij(2,4,785)=0 exch2_pij(3,4,785)=0 exch2_pij(4,4,785)=1 exch2_oi(4,785)=0 exch2_oj(4,785)=0 RETURN END SUBROUTINE W2_E2SETUP_786 C Topology for tile 786 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(786)=34 exch2_tNy(786)=51 exch2_tBasex(786)=170 exch2_tBasey(786)=102 exch2_txGlobalo(786)=2721 exch2_tyGlobalo(786)=103 exch2_isWedge(786)=0 exch2_isNedge(786)=0 exch2_isEedge(786)=0 exch2_isSedge(786)=0 exch2_myFace(786)=6 exch2_mydNx(786)=510 exch2_mydNy(786)=510 exch2_nNeighbours(786)=4 exch2_neighbourId(1,786)=801 exch2_iLo(1,786)=0 exch2_iHi(1,786)=35 exch2_jLo(1,786)=52 exch2_jHi(1,786)=52 exch2_opposingSend(1,786)=2 exch2_pij(1,1,786)=1 exch2_pij(2,1,786)=0 exch2_pij(3,1,786)=0 exch2_pij(4,1,786)=1 exch2_oi(1,786)=0 exch2_oj(1,786)=0 exch2_neighbourId(2,786)=771 exch2_iLo(2,786)=0 exch2_iHi(2,786)=35 exch2_jLo(2,786)=0 exch2_jHi(2,786)=0 exch2_opposingSend(2,786)=1 exch2_pij(1,2,786)=1 exch2_pij(2,2,786)=0 exch2_pij(3,2,786)=0 exch2_pij(4,2,786)=1 exch2_oi(2,786)=0 exch2_oj(2,786)=0 exch2_neighbourId(3,786)=787 exch2_iLo(3,786)=35 exch2_iHi(3,786)=35 exch2_jLo(3,786)=0 exch2_jHi(3,786)=52 exch2_opposingSend(3,786)=4 exch2_pij(1,3,786)=1 exch2_pij(2,3,786)=0 exch2_pij(3,3,786)=0 exch2_pij(4,3,786)=1 exch2_oi(3,786)=0 exch2_oj(3,786)=0 exch2_neighbourId(4,786)=785 exch2_iLo(4,786)=0 exch2_iHi(4,786)=0 exch2_jLo(4,786)=0 exch2_jHi(4,786)=52 exch2_opposingSend(4,786)=3 exch2_pij(1,4,786)=1 exch2_pij(2,4,786)=0 exch2_pij(3,4,786)=0 exch2_pij(4,4,786)=1 exch2_oi(4,786)=0 exch2_oj(4,786)=0 RETURN END SUBROUTINE W2_E2SETUP_787 C Topology for tile 787 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(787)=34 exch2_tNy(787)=51 exch2_tBasex(787)=204 exch2_tBasey(787)=102 exch2_txGlobalo(787)=2755 exch2_tyGlobalo(787)=103 exch2_isWedge(787)=0 exch2_isNedge(787)=0 exch2_isEedge(787)=0 exch2_isSedge(787)=0 exch2_myFace(787)=6 exch2_mydNx(787)=510 exch2_mydNy(787)=510 exch2_nNeighbours(787)=4 exch2_neighbourId(1,787)=802 exch2_iLo(1,787)=0 exch2_iHi(1,787)=35 exch2_jLo(1,787)=52 exch2_jHi(1,787)=52 exch2_opposingSend(1,787)=2 exch2_pij(1,1,787)=1 exch2_pij(2,1,787)=0 exch2_pij(3,1,787)=0 exch2_pij(4,1,787)=1 exch2_oi(1,787)=0 exch2_oj(1,787)=0 exch2_neighbourId(2,787)=772 exch2_iLo(2,787)=0 exch2_iHi(2,787)=35 exch2_jLo(2,787)=0 exch2_jHi(2,787)=0 exch2_opposingSend(2,787)=1 exch2_pij(1,2,787)=1 exch2_pij(2,2,787)=0 exch2_pij(3,2,787)=0 exch2_pij(4,2,787)=1 exch2_oi(2,787)=0 exch2_oj(2,787)=0 exch2_neighbourId(3,787)=788 exch2_iLo(3,787)=35 exch2_iHi(3,787)=35 exch2_jLo(3,787)=0 exch2_jHi(3,787)=52 exch2_opposingSend(3,787)=4 exch2_pij(1,3,787)=1 exch2_pij(2,3,787)=0 exch2_pij(3,3,787)=0 exch2_pij(4,3,787)=1 exch2_oi(3,787)=0 exch2_oj(3,787)=0 exch2_neighbourId(4,787)=786 exch2_iLo(4,787)=0 exch2_iHi(4,787)=0 exch2_jLo(4,787)=0 exch2_jHi(4,787)=52 exch2_opposingSend(4,787)=3 exch2_pij(1,4,787)=1 exch2_pij(2,4,787)=0 exch2_pij(3,4,787)=0 exch2_pij(4,4,787)=1 exch2_oi(4,787)=0 exch2_oj(4,787)=0 RETURN END SUBROUTINE W2_E2SETUP_788 C Topology for tile 788 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(788)=34 exch2_tNy(788)=51 exch2_tBasex(788)=238 exch2_tBasey(788)=102 exch2_txGlobalo(788)=2789 exch2_tyGlobalo(788)=103 exch2_isWedge(788)=0 exch2_isNedge(788)=0 exch2_isEedge(788)=0 exch2_isSedge(788)=0 exch2_myFace(788)=6 exch2_mydNx(788)=510 exch2_mydNy(788)=510 exch2_nNeighbours(788)=4 exch2_neighbourId(1,788)=803 exch2_iLo(1,788)=0 exch2_iHi(1,788)=35 exch2_jLo(1,788)=52 exch2_jHi(1,788)=52 exch2_opposingSend(1,788)=2 exch2_pij(1,1,788)=1 exch2_pij(2,1,788)=0 exch2_pij(3,1,788)=0 exch2_pij(4,1,788)=1 exch2_oi(1,788)=0 exch2_oj(1,788)=0 exch2_neighbourId(2,788)=773 exch2_iLo(2,788)=0 exch2_iHi(2,788)=35 exch2_jLo(2,788)=0 exch2_jHi(2,788)=0 exch2_opposingSend(2,788)=1 exch2_pij(1,2,788)=1 exch2_pij(2,2,788)=0 exch2_pij(3,2,788)=0 exch2_pij(4,2,788)=1 exch2_oi(2,788)=0 exch2_oj(2,788)=0 exch2_neighbourId(3,788)=789 exch2_iLo(3,788)=35 exch2_iHi(3,788)=35 exch2_jLo(3,788)=0 exch2_jHi(3,788)=52 exch2_opposingSend(3,788)=4 exch2_pij(1,3,788)=1 exch2_pij(2,3,788)=0 exch2_pij(3,3,788)=0 exch2_pij(4,3,788)=1 exch2_oi(3,788)=0 exch2_oj(3,788)=0 exch2_neighbourId(4,788)=787 exch2_iLo(4,788)=0 exch2_iHi(4,788)=0 exch2_jLo(4,788)=0 exch2_jHi(4,788)=52 exch2_opposingSend(4,788)=3 exch2_pij(1,4,788)=1 exch2_pij(2,4,788)=0 exch2_pij(3,4,788)=0 exch2_pij(4,4,788)=1 exch2_oi(4,788)=0 exch2_oj(4,788)=0 RETURN END SUBROUTINE W2_E2SETUP_789 C Topology for tile 789 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(789)=34 exch2_tNy(789)=51 exch2_tBasex(789)=272 exch2_tBasey(789)=102 exch2_txGlobalo(789)=2823 exch2_tyGlobalo(789)=103 exch2_isWedge(789)=0 exch2_isNedge(789)=0 exch2_isEedge(789)=0 exch2_isSedge(789)=0 exch2_myFace(789)=6 exch2_mydNx(789)=510 exch2_mydNy(789)=510 exch2_nNeighbours(789)=4 exch2_neighbourId(1,789)=804 exch2_iLo(1,789)=0 exch2_iHi(1,789)=35 exch2_jLo(1,789)=52 exch2_jHi(1,789)=52 exch2_opposingSend(1,789)=2 exch2_pij(1,1,789)=1 exch2_pij(2,1,789)=0 exch2_pij(3,1,789)=0 exch2_pij(4,1,789)=1 exch2_oi(1,789)=0 exch2_oj(1,789)=0 exch2_neighbourId(2,789)=774 exch2_iLo(2,789)=0 exch2_iHi(2,789)=35 exch2_jLo(2,789)=0 exch2_jHi(2,789)=0 exch2_opposingSend(2,789)=1 exch2_pij(1,2,789)=1 exch2_pij(2,2,789)=0 exch2_pij(3,2,789)=0 exch2_pij(4,2,789)=1 exch2_oi(2,789)=0 exch2_oj(2,789)=0 exch2_neighbourId(3,789)=790 exch2_iLo(3,789)=35 exch2_iHi(3,789)=35 exch2_jLo(3,789)=0 exch2_jHi(3,789)=52 exch2_opposingSend(3,789)=4 exch2_pij(1,3,789)=1 exch2_pij(2,3,789)=0 exch2_pij(3,3,789)=0 exch2_pij(4,3,789)=1 exch2_oi(3,789)=0 exch2_oj(3,789)=0 exch2_neighbourId(4,789)=788 exch2_iLo(4,789)=0 exch2_iHi(4,789)=0 exch2_jLo(4,789)=0 exch2_jHi(4,789)=52 exch2_opposingSend(4,789)=3 exch2_pij(1,4,789)=1 exch2_pij(2,4,789)=0 exch2_pij(3,4,789)=0 exch2_pij(4,4,789)=1 exch2_oi(4,789)=0 exch2_oj(4,789)=0 RETURN END SUBROUTINE W2_E2SETUP_790 C Topology for tile 790 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(790)=34 exch2_tNy(790)=51 exch2_tBasex(790)=306 exch2_tBasey(790)=102 exch2_txGlobalo(790)=2857 exch2_tyGlobalo(790)=103 exch2_isWedge(790)=0 exch2_isNedge(790)=0 exch2_isEedge(790)=0 exch2_isSedge(790)=0 exch2_myFace(790)=6 exch2_mydNx(790)=510 exch2_mydNy(790)=510 exch2_nNeighbours(790)=4 exch2_neighbourId(1,790)=805 exch2_iLo(1,790)=0 exch2_iHi(1,790)=35 exch2_jLo(1,790)=52 exch2_jHi(1,790)=52 exch2_opposingSend(1,790)=2 exch2_pij(1,1,790)=1 exch2_pij(2,1,790)=0 exch2_pij(3,1,790)=0 exch2_pij(4,1,790)=1 exch2_oi(1,790)=0 exch2_oj(1,790)=0 exch2_neighbourId(2,790)=775 exch2_iLo(2,790)=0 exch2_iHi(2,790)=35 exch2_jLo(2,790)=0 exch2_jHi(2,790)=0 exch2_opposingSend(2,790)=1 exch2_pij(1,2,790)=1 exch2_pij(2,2,790)=0 exch2_pij(3,2,790)=0 exch2_pij(4,2,790)=1 exch2_oi(2,790)=0 exch2_oj(2,790)=0 exch2_neighbourId(3,790)=791 exch2_iLo(3,790)=35 exch2_iHi(3,790)=35 exch2_jLo(3,790)=0 exch2_jHi(3,790)=52 exch2_opposingSend(3,790)=4 exch2_pij(1,3,790)=1 exch2_pij(2,3,790)=0 exch2_pij(3,3,790)=0 exch2_pij(4,3,790)=1 exch2_oi(3,790)=0 exch2_oj(3,790)=0 exch2_neighbourId(4,790)=789 exch2_iLo(4,790)=0 exch2_iHi(4,790)=0 exch2_jLo(4,790)=0 exch2_jHi(4,790)=52 exch2_opposingSend(4,790)=3 exch2_pij(1,4,790)=1 exch2_pij(2,4,790)=0 exch2_pij(3,4,790)=0 exch2_pij(4,4,790)=1 exch2_oi(4,790)=0 exch2_oj(4,790)=0 RETURN END SUBROUTINE W2_E2SETUP_791 C Topology for tile 791 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(791)=34 exch2_tNy(791)=51 exch2_tBasex(791)=340 exch2_tBasey(791)=102 exch2_txGlobalo(791)=2891 exch2_tyGlobalo(791)=103 exch2_isWedge(791)=0 exch2_isNedge(791)=0 exch2_isEedge(791)=0 exch2_isSedge(791)=0 exch2_myFace(791)=6 exch2_mydNx(791)=510 exch2_mydNy(791)=510 exch2_nNeighbours(791)=4 exch2_neighbourId(1,791)=806 exch2_iLo(1,791)=0 exch2_iHi(1,791)=35 exch2_jLo(1,791)=52 exch2_jHi(1,791)=52 exch2_opposingSend(1,791)=2 exch2_pij(1,1,791)=1 exch2_pij(2,1,791)=0 exch2_pij(3,1,791)=0 exch2_pij(4,1,791)=1 exch2_oi(1,791)=0 exch2_oj(1,791)=0 exch2_neighbourId(2,791)=776 exch2_iLo(2,791)=0 exch2_iHi(2,791)=35 exch2_jLo(2,791)=0 exch2_jHi(2,791)=0 exch2_opposingSend(2,791)=1 exch2_pij(1,2,791)=1 exch2_pij(2,2,791)=0 exch2_pij(3,2,791)=0 exch2_pij(4,2,791)=1 exch2_oi(2,791)=0 exch2_oj(2,791)=0 exch2_neighbourId(3,791)=792 exch2_iLo(3,791)=35 exch2_iHi(3,791)=35 exch2_jLo(3,791)=0 exch2_jHi(3,791)=52 exch2_opposingSend(3,791)=4 exch2_pij(1,3,791)=1 exch2_pij(2,3,791)=0 exch2_pij(3,3,791)=0 exch2_pij(4,3,791)=1 exch2_oi(3,791)=0 exch2_oj(3,791)=0 exch2_neighbourId(4,791)=790 exch2_iLo(4,791)=0 exch2_iHi(4,791)=0 exch2_jLo(4,791)=0 exch2_jHi(4,791)=52 exch2_opposingSend(4,791)=3 exch2_pij(1,4,791)=1 exch2_pij(2,4,791)=0 exch2_pij(3,4,791)=0 exch2_pij(4,4,791)=1 exch2_oi(4,791)=0 exch2_oj(4,791)=0 RETURN END SUBROUTINE W2_E2SETUP_792 C Topology for tile 792 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(792)=34 exch2_tNy(792)=51 exch2_tBasex(792)=374 exch2_tBasey(792)=102 exch2_txGlobalo(792)=2925 exch2_tyGlobalo(792)=103 exch2_isWedge(792)=0 exch2_isNedge(792)=0 exch2_isEedge(792)=0 exch2_isSedge(792)=0 exch2_myFace(792)=6 exch2_mydNx(792)=510 exch2_mydNy(792)=510 exch2_nNeighbours(792)=4 exch2_neighbourId(1,792)=807 exch2_iLo(1,792)=0 exch2_iHi(1,792)=35 exch2_jLo(1,792)=52 exch2_jHi(1,792)=52 exch2_opposingSend(1,792)=2 exch2_pij(1,1,792)=1 exch2_pij(2,1,792)=0 exch2_pij(3,1,792)=0 exch2_pij(4,1,792)=1 exch2_oi(1,792)=0 exch2_oj(1,792)=0 exch2_neighbourId(2,792)=777 exch2_iLo(2,792)=0 exch2_iHi(2,792)=35 exch2_jLo(2,792)=0 exch2_jHi(2,792)=0 exch2_opposingSend(2,792)=1 exch2_pij(1,2,792)=1 exch2_pij(2,2,792)=0 exch2_pij(3,2,792)=0 exch2_pij(4,2,792)=1 exch2_oi(2,792)=0 exch2_oj(2,792)=0 exch2_neighbourId(3,792)=793 exch2_iLo(3,792)=35 exch2_iHi(3,792)=35 exch2_jLo(3,792)=0 exch2_jHi(3,792)=52 exch2_opposingSend(3,792)=4 exch2_pij(1,3,792)=1 exch2_pij(2,3,792)=0 exch2_pij(3,3,792)=0 exch2_pij(4,3,792)=1 exch2_oi(3,792)=0 exch2_oj(3,792)=0 exch2_neighbourId(4,792)=791 exch2_iLo(4,792)=0 exch2_iHi(4,792)=0 exch2_jLo(4,792)=0 exch2_jHi(4,792)=52 exch2_opposingSend(4,792)=3 exch2_pij(1,4,792)=1 exch2_pij(2,4,792)=0 exch2_pij(3,4,792)=0 exch2_pij(4,4,792)=1 exch2_oi(4,792)=0 exch2_oj(4,792)=0 RETURN END SUBROUTINE W2_E2SETUP_793 C Topology for tile 793 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(793)=34 exch2_tNy(793)=51 exch2_tBasex(793)=408 exch2_tBasey(793)=102 exch2_txGlobalo(793)=2959 exch2_tyGlobalo(793)=103 exch2_isWedge(793)=0 exch2_isNedge(793)=0 exch2_isEedge(793)=0 exch2_isSedge(793)=0 exch2_myFace(793)=6 exch2_mydNx(793)=510 exch2_mydNy(793)=510 exch2_nNeighbours(793)=4 exch2_neighbourId(1,793)=808 exch2_iLo(1,793)=0 exch2_iHi(1,793)=35 exch2_jLo(1,793)=52 exch2_jHi(1,793)=52 exch2_opposingSend(1,793)=2 exch2_pij(1,1,793)=1 exch2_pij(2,1,793)=0 exch2_pij(3,1,793)=0 exch2_pij(4,1,793)=1 exch2_oi(1,793)=0 exch2_oj(1,793)=0 exch2_neighbourId(2,793)=778 exch2_iLo(2,793)=0 exch2_iHi(2,793)=35 exch2_jLo(2,793)=0 exch2_jHi(2,793)=0 exch2_opposingSend(2,793)=1 exch2_pij(1,2,793)=1 exch2_pij(2,2,793)=0 exch2_pij(3,2,793)=0 exch2_pij(4,2,793)=1 exch2_oi(2,793)=0 exch2_oj(2,793)=0 exch2_neighbourId(3,793)=794 exch2_iLo(3,793)=35 exch2_iHi(3,793)=35 exch2_jLo(3,793)=0 exch2_jHi(3,793)=52 exch2_opposingSend(3,793)=4 exch2_pij(1,3,793)=1 exch2_pij(2,3,793)=0 exch2_pij(3,3,793)=0 exch2_pij(4,3,793)=1 exch2_oi(3,793)=0 exch2_oj(3,793)=0 exch2_neighbourId(4,793)=792 exch2_iLo(4,793)=0 exch2_iHi(4,793)=0 exch2_jLo(4,793)=0 exch2_jHi(4,793)=52 exch2_opposingSend(4,793)=3 exch2_pij(1,4,793)=1 exch2_pij(2,4,793)=0 exch2_pij(3,4,793)=0 exch2_pij(4,4,793)=1 exch2_oi(4,793)=0 exch2_oj(4,793)=0 RETURN END SUBROUTINE W2_E2SETUP_794 C Topology for tile 794 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(794)=34 exch2_tNy(794)=51 exch2_tBasex(794)=442 exch2_tBasey(794)=102 exch2_txGlobalo(794)=2993 exch2_tyGlobalo(794)=103 exch2_isWedge(794)=0 exch2_isNedge(794)=0 exch2_isEedge(794)=0 exch2_isSedge(794)=0 exch2_myFace(794)=6 exch2_mydNx(794)=510 exch2_mydNy(794)=510 exch2_nNeighbours(794)=4 exch2_neighbourId(1,794)=809 exch2_iLo(1,794)=0 exch2_iHi(1,794)=35 exch2_jLo(1,794)=52 exch2_jHi(1,794)=52 exch2_opposingSend(1,794)=2 exch2_pij(1,1,794)=1 exch2_pij(2,1,794)=0 exch2_pij(3,1,794)=0 exch2_pij(4,1,794)=1 exch2_oi(1,794)=0 exch2_oj(1,794)=0 exch2_neighbourId(2,794)=779 exch2_iLo(2,794)=0 exch2_iHi(2,794)=35 exch2_jLo(2,794)=0 exch2_jHi(2,794)=0 exch2_opposingSend(2,794)=1 exch2_pij(1,2,794)=1 exch2_pij(2,2,794)=0 exch2_pij(3,2,794)=0 exch2_pij(4,2,794)=1 exch2_oi(2,794)=0 exch2_oj(2,794)=0 exch2_neighbourId(3,794)=795 exch2_iLo(3,794)=35 exch2_iHi(3,794)=35 exch2_jLo(3,794)=0 exch2_jHi(3,794)=52 exch2_opposingSend(3,794)=5 exch2_pij(1,3,794)=1 exch2_pij(2,3,794)=0 exch2_pij(3,3,794)=0 exch2_pij(4,3,794)=1 exch2_oi(3,794)=0 exch2_oj(3,794)=0 exch2_neighbourId(4,794)=793 exch2_iLo(4,794)=0 exch2_iHi(4,794)=0 exch2_jLo(4,794)=0 exch2_jHi(4,794)=52 exch2_opposingSend(4,794)=3 exch2_pij(1,4,794)=1 exch2_pij(2,4,794)=0 exch2_pij(3,4,794)=0 exch2_pij(4,4,794)=1 exch2_oi(4,794)=0 exch2_oj(4,794)=0 RETURN END SUBROUTINE W2_E2SETUP_795 C Topology for tile 795 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(795)=34 exch2_tNy(795)=51 exch2_tBasex(795)=476 exch2_tBasey(795)=102 exch2_txGlobalo(795)=3027 exch2_tyGlobalo(795)=103 exch2_isWedge(795)=0 exch2_isNedge(795)=0 exch2_isEedge(795)=1 exch2_isSedge(795)=0 exch2_myFace(795)=6 exch2_mydNx(795)=510 exch2_mydNy(795)=510 exch2_nNeighbours(795)=5 exch2_neighbourId(1,795)=810 exch2_iLo(1,795)=0 exch2_iHi(1,795)=35 exch2_jLo(1,795)=52 exch2_jHi(1,795)=52 exch2_opposingSend(1,795)=2 exch2_pij(1,1,795)=1 exch2_pij(2,1,795)=0 exch2_pij(3,1,795)=0 exch2_pij(4,1,795)=1 exch2_oi(1,795)=0 exch2_oj(1,795)=0 exch2_neighbourId(2,795)=780 exch2_iLo(2,795)=0 exch2_iHi(2,795)=35 exch2_jLo(2,795)=0 exch2_jHi(2,795)=0 exch2_opposingSend(2,795)=1 exch2_pij(1,2,795)=1 exch2_pij(2,2,795)=0 exch2_pij(3,2,795)=0 exch2_pij(4,2,795)=1 exch2_oi(2,795)=0 exch2_oj(2,795)=0 exch2_neighbourId(3,795)=161 exch2_iLo(3,795)=35 exch2_iHi(3,795)=35 exch2_jLo(3,795)=34 exch2_jHi(3,795)=52 exch2_opposingSend(3,795)=2 exch2_pij(1,3,795)=0 exch2_pij(2,3,795)=1 exch2_pij(3,3,795)=-1 exch2_pij(4,3,795)=0 exch2_oi(3,795)=510 exch2_oj(3,795)=511 exch2_neighbourId(4,795)=162 exch2_iLo(4,795)=35 exch2_iHi(4,795)=35 exch2_jLo(4,795)=0 exch2_jHi(4,795)=35 exch2_opposingSend(4,795)=2 exch2_pij(1,4,795)=0 exch2_pij(2,4,795)=1 exch2_pij(3,4,795)=-1 exch2_pij(4,4,795)=0 exch2_oi(4,795)=510 exch2_oj(4,795)=511 exch2_neighbourId(5,795)=794 exch2_iLo(5,795)=0 exch2_iHi(5,795)=0 exch2_jLo(5,795)=0 exch2_jHi(5,795)=52 exch2_opposingSend(5,795)=3 exch2_pij(1,5,795)=1 exch2_pij(2,5,795)=0 exch2_pij(3,5,795)=0 exch2_pij(4,5,795)=1 exch2_oi(5,795)=0 exch2_oj(5,795)=0 RETURN END SUBROUTINE W2_E2SETUP_796 C Topology for tile 796 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(796)=34 exch2_tNy(796)=51 exch2_tBasex(796)=0 exch2_tBasey(796)=153 exch2_txGlobalo(796)=2551 exch2_tyGlobalo(796)=154 exch2_isWedge(796)=1 exch2_isNedge(796)=0 exch2_isEedge(796)=0 exch2_isSedge(796)=0 exch2_myFace(796)=6 exch2_mydNx(796)=510 exch2_mydNy(796)=510 exch2_nNeighbours(796)=4 exch2_neighbourId(1,796)=811 exch2_iLo(1,796)=0 exch2_iHi(1,796)=35 exch2_jLo(1,796)=52 exch2_jHi(1,796)=52 exch2_opposingSend(1,796)=2 exch2_pij(1,1,796)=1 exch2_pij(2,1,796)=0 exch2_pij(3,1,796)=0 exch2_pij(4,1,796)=1 exch2_oi(1,796)=0 exch2_oj(1,796)=0 exch2_neighbourId(2,796)=781 exch2_iLo(2,796)=0 exch2_iHi(2,796)=35 exch2_jLo(2,796)=0 exch2_jHi(2,796)=0 exch2_opposingSend(2,796)=1 exch2_pij(1,2,796)=1 exch2_pij(2,2,796)=0 exch2_pij(3,2,796)=0 exch2_pij(4,2,796)=1 exch2_oi(2,796)=0 exch2_oj(2,796)=0 exch2_neighbourId(3,796)=797 exch2_iLo(3,796)=35 exch2_iHi(3,796)=35 exch2_jLo(3,796)=0 exch2_jHi(3,796)=52 exch2_opposingSend(3,796)=4 exch2_pij(1,3,796)=1 exch2_pij(2,3,796)=0 exch2_pij(3,3,796)=0 exch2_pij(4,3,796)=1 exch2_oi(3,796)=0 exch2_oj(3,796)=0 exch2_neighbourId(4,796)=660 exch2_iLo(4,796)=0 exch2_iHi(4,796)=0 exch2_jLo(4,796)=0 exch2_jHi(4,796)=52 exch2_opposingSend(4,796)=3 exch2_pij(1,4,796)=1 exch2_pij(2,4,796)=0 exch2_pij(3,4,796)=0 exch2_pij(4,4,796)=1 exch2_oi(4,796)=-510 exch2_oj(4,796)=0 RETURN END SUBROUTINE W2_E2SETUP_797 C Topology for tile 797 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(797)=34 exch2_tNy(797)=51 exch2_tBasex(797)=34 exch2_tBasey(797)=153 exch2_txGlobalo(797)=2585 exch2_tyGlobalo(797)=154 exch2_isWedge(797)=0 exch2_isNedge(797)=0 exch2_isEedge(797)=0 exch2_isSedge(797)=0 exch2_myFace(797)=6 exch2_mydNx(797)=510 exch2_mydNy(797)=510 exch2_nNeighbours(797)=4 exch2_neighbourId(1,797)=812 exch2_iLo(1,797)=0 exch2_iHi(1,797)=35 exch2_jLo(1,797)=52 exch2_jHi(1,797)=52 exch2_opposingSend(1,797)=2 exch2_pij(1,1,797)=1 exch2_pij(2,1,797)=0 exch2_pij(3,1,797)=0 exch2_pij(4,1,797)=1 exch2_oi(1,797)=0 exch2_oj(1,797)=0 exch2_neighbourId(2,797)=782 exch2_iLo(2,797)=0 exch2_iHi(2,797)=35 exch2_jLo(2,797)=0 exch2_jHi(2,797)=0 exch2_opposingSend(2,797)=1 exch2_pij(1,2,797)=1 exch2_pij(2,2,797)=0 exch2_pij(3,2,797)=0 exch2_pij(4,2,797)=1 exch2_oi(2,797)=0 exch2_oj(2,797)=0 exch2_neighbourId(3,797)=798 exch2_iLo(3,797)=35 exch2_iHi(3,797)=35 exch2_jLo(3,797)=0 exch2_jHi(3,797)=52 exch2_opposingSend(3,797)=4 exch2_pij(1,3,797)=1 exch2_pij(2,3,797)=0 exch2_pij(3,3,797)=0 exch2_pij(4,3,797)=1 exch2_oi(3,797)=0 exch2_oj(3,797)=0 exch2_neighbourId(4,797)=796 exch2_iLo(4,797)=0 exch2_iHi(4,797)=0 exch2_jLo(4,797)=0 exch2_jHi(4,797)=52 exch2_opposingSend(4,797)=3 exch2_pij(1,4,797)=1 exch2_pij(2,4,797)=0 exch2_pij(3,4,797)=0 exch2_pij(4,4,797)=1 exch2_oi(4,797)=0 exch2_oj(4,797)=0 RETURN END SUBROUTINE W2_E2SETUP_798 C Topology for tile 798 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(798)=34 exch2_tNy(798)=51 exch2_tBasex(798)=68 exch2_tBasey(798)=153 exch2_txGlobalo(798)=2619 exch2_tyGlobalo(798)=154 exch2_isWedge(798)=0 exch2_isNedge(798)=0 exch2_isEedge(798)=0 exch2_isSedge(798)=0 exch2_myFace(798)=6 exch2_mydNx(798)=510 exch2_mydNy(798)=510 exch2_nNeighbours(798)=4 exch2_neighbourId(1,798)=813 exch2_iLo(1,798)=0 exch2_iHi(1,798)=35 exch2_jLo(1,798)=52 exch2_jHi(1,798)=52 exch2_opposingSend(1,798)=2 exch2_pij(1,1,798)=1 exch2_pij(2,1,798)=0 exch2_pij(3,1,798)=0 exch2_pij(4,1,798)=1 exch2_oi(1,798)=0 exch2_oj(1,798)=0 exch2_neighbourId(2,798)=783 exch2_iLo(2,798)=0 exch2_iHi(2,798)=35 exch2_jLo(2,798)=0 exch2_jHi(2,798)=0 exch2_opposingSend(2,798)=1 exch2_pij(1,2,798)=1 exch2_pij(2,2,798)=0 exch2_pij(3,2,798)=0 exch2_pij(4,2,798)=1 exch2_oi(2,798)=0 exch2_oj(2,798)=0 exch2_neighbourId(3,798)=799 exch2_iLo(3,798)=35 exch2_iHi(3,798)=35 exch2_jLo(3,798)=0 exch2_jHi(3,798)=52 exch2_opposingSend(3,798)=4 exch2_pij(1,3,798)=1 exch2_pij(2,3,798)=0 exch2_pij(3,3,798)=0 exch2_pij(4,3,798)=1 exch2_oi(3,798)=0 exch2_oj(3,798)=0 exch2_neighbourId(4,798)=797 exch2_iLo(4,798)=0 exch2_iHi(4,798)=0 exch2_jLo(4,798)=0 exch2_jHi(4,798)=52 exch2_opposingSend(4,798)=3 exch2_pij(1,4,798)=1 exch2_pij(2,4,798)=0 exch2_pij(3,4,798)=0 exch2_pij(4,4,798)=1 exch2_oi(4,798)=0 exch2_oj(4,798)=0 RETURN END SUBROUTINE W2_E2SETUP_799 C Topology for tile 799 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(799)=34 exch2_tNy(799)=51 exch2_tBasex(799)=102 exch2_tBasey(799)=153 exch2_txGlobalo(799)=2653 exch2_tyGlobalo(799)=154 exch2_isWedge(799)=0 exch2_isNedge(799)=0 exch2_isEedge(799)=0 exch2_isSedge(799)=0 exch2_myFace(799)=6 exch2_mydNx(799)=510 exch2_mydNy(799)=510 exch2_nNeighbours(799)=4 exch2_neighbourId(1,799)=814 exch2_iLo(1,799)=0 exch2_iHi(1,799)=35 exch2_jLo(1,799)=52 exch2_jHi(1,799)=52 exch2_opposingSend(1,799)=2 exch2_pij(1,1,799)=1 exch2_pij(2,1,799)=0 exch2_pij(3,1,799)=0 exch2_pij(4,1,799)=1 exch2_oi(1,799)=0 exch2_oj(1,799)=0 exch2_neighbourId(2,799)=784 exch2_iLo(2,799)=0 exch2_iHi(2,799)=35 exch2_jLo(2,799)=0 exch2_jHi(2,799)=0 exch2_opposingSend(2,799)=1 exch2_pij(1,2,799)=1 exch2_pij(2,2,799)=0 exch2_pij(3,2,799)=0 exch2_pij(4,2,799)=1 exch2_oi(2,799)=0 exch2_oj(2,799)=0 exch2_neighbourId(3,799)=800 exch2_iLo(3,799)=35 exch2_iHi(3,799)=35 exch2_jLo(3,799)=0 exch2_jHi(3,799)=52 exch2_opposingSend(3,799)=4 exch2_pij(1,3,799)=1 exch2_pij(2,3,799)=0 exch2_pij(3,3,799)=0 exch2_pij(4,3,799)=1 exch2_oi(3,799)=0 exch2_oj(3,799)=0 exch2_neighbourId(4,799)=798 exch2_iLo(4,799)=0 exch2_iHi(4,799)=0 exch2_jLo(4,799)=0 exch2_jHi(4,799)=52 exch2_opposingSend(4,799)=3 exch2_pij(1,4,799)=1 exch2_pij(2,4,799)=0 exch2_pij(3,4,799)=0 exch2_pij(4,4,799)=1 exch2_oi(4,799)=0 exch2_oj(4,799)=0 RETURN END SUBROUTINE W2_E2SETUP_800 C Topology for tile 800 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(800)=34 exch2_tNy(800)=51 exch2_tBasex(800)=136 exch2_tBasey(800)=153 exch2_txGlobalo(800)=2687 exch2_tyGlobalo(800)=154 exch2_isWedge(800)=0 exch2_isNedge(800)=0 exch2_isEedge(800)=0 exch2_isSedge(800)=0 exch2_myFace(800)=6 exch2_mydNx(800)=510 exch2_mydNy(800)=510 exch2_nNeighbours(800)=4 exch2_neighbourId(1,800)=815 exch2_iLo(1,800)=0 exch2_iHi(1,800)=35 exch2_jLo(1,800)=52 exch2_jHi(1,800)=52 exch2_opposingSend(1,800)=2 exch2_pij(1,1,800)=1 exch2_pij(2,1,800)=0 exch2_pij(3,1,800)=0 exch2_pij(4,1,800)=1 exch2_oi(1,800)=0 exch2_oj(1,800)=0 exch2_neighbourId(2,800)=785 exch2_iLo(2,800)=0 exch2_iHi(2,800)=35 exch2_jLo(2,800)=0 exch2_jHi(2,800)=0 exch2_opposingSend(2,800)=1 exch2_pij(1,2,800)=1 exch2_pij(2,2,800)=0 exch2_pij(3,2,800)=0 exch2_pij(4,2,800)=1 exch2_oi(2,800)=0 exch2_oj(2,800)=0 exch2_neighbourId(3,800)=801 exch2_iLo(3,800)=35 exch2_iHi(3,800)=35 exch2_jLo(3,800)=0 exch2_jHi(3,800)=52 exch2_opposingSend(3,800)=4 exch2_pij(1,3,800)=1 exch2_pij(2,3,800)=0 exch2_pij(3,3,800)=0 exch2_pij(4,3,800)=1 exch2_oi(3,800)=0 exch2_oj(3,800)=0 exch2_neighbourId(4,800)=799 exch2_iLo(4,800)=0 exch2_iHi(4,800)=0 exch2_jLo(4,800)=0 exch2_jHi(4,800)=52 exch2_opposingSend(4,800)=3 exch2_pij(1,4,800)=1 exch2_pij(2,4,800)=0 exch2_pij(3,4,800)=0 exch2_pij(4,4,800)=1 exch2_oi(4,800)=0 exch2_oj(4,800)=0 RETURN END SUBROUTINE W2_E2SETUP_801 C Topology for tile 801 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(801)=34 exch2_tNy(801)=51 exch2_tBasex(801)=170 exch2_tBasey(801)=153 exch2_txGlobalo(801)=2721 exch2_tyGlobalo(801)=154 exch2_isWedge(801)=0 exch2_isNedge(801)=0 exch2_isEedge(801)=0 exch2_isSedge(801)=0 exch2_myFace(801)=6 exch2_mydNx(801)=510 exch2_mydNy(801)=510 exch2_nNeighbours(801)=4 exch2_neighbourId(1,801)=816 exch2_iLo(1,801)=0 exch2_iHi(1,801)=35 exch2_jLo(1,801)=52 exch2_jHi(1,801)=52 exch2_opposingSend(1,801)=2 exch2_pij(1,1,801)=1 exch2_pij(2,1,801)=0 exch2_pij(3,1,801)=0 exch2_pij(4,1,801)=1 exch2_oi(1,801)=0 exch2_oj(1,801)=0 exch2_neighbourId(2,801)=786 exch2_iLo(2,801)=0 exch2_iHi(2,801)=35 exch2_jLo(2,801)=0 exch2_jHi(2,801)=0 exch2_opposingSend(2,801)=1 exch2_pij(1,2,801)=1 exch2_pij(2,2,801)=0 exch2_pij(3,2,801)=0 exch2_pij(4,2,801)=1 exch2_oi(2,801)=0 exch2_oj(2,801)=0 exch2_neighbourId(3,801)=802 exch2_iLo(3,801)=35 exch2_iHi(3,801)=35 exch2_jLo(3,801)=0 exch2_jHi(3,801)=52 exch2_opposingSend(3,801)=4 exch2_pij(1,3,801)=1 exch2_pij(2,3,801)=0 exch2_pij(3,3,801)=0 exch2_pij(4,3,801)=1 exch2_oi(3,801)=0 exch2_oj(3,801)=0 exch2_neighbourId(4,801)=800 exch2_iLo(4,801)=0 exch2_iHi(4,801)=0 exch2_jLo(4,801)=0 exch2_jHi(4,801)=52 exch2_opposingSend(4,801)=3 exch2_pij(1,4,801)=1 exch2_pij(2,4,801)=0 exch2_pij(3,4,801)=0 exch2_pij(4,4,801)=1 exch2_oi(4,801)=0 exch2_oj(4,801)=0 RETURN END SUBROUTINE W2_E2SETUP_802 C Topology for tile 802 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(802)=34 exch2_tNy(802)=51 exch2_tBasex(802)=204 exch2_tBasey(802)=153 exch2_txGlobalo(802)=2755 exch2_tyGlobalo(802)=154 exch2_isWedge(802)=0 exch2_isNedge(802)=0 exch2_isEedge(802)=0 exch2_isSedge(802)=0 exch2_myFace(802)=6 exch2_mydNx(802)=510 exch2_mydNy(802)=510 exch2_nNeighbours(802)=4 exch2_neighbourId(1,802)=817 exch2_iLo(1,802)=0 exch2_iHi(1,802)=35 exch2_jLo(1,802)=52 exch2_jHi(1,802)=52 exch2_opposingSend(1,802)=2 exch2_pij(1,1,802)=1 exch2_pij(2,1,802)=0 exch2_pij(3,1,802)=0 exch2_pij(4,1,802)=1 exch2_oi(1,802)=0 exch2_oj(1,802)=0 exch2_neighbourId(2,802)=787 exch2_iLo(2,802)=0 exch2_iHi(2,802)=35 exch2_jLo(2,802)=0 exch2_jHi(2,802)=0 exch2_opposingSend(2,802)=1 exch2_pij(1,2,802)=1 exch2_pij(2,2,802)=0 exch2_pij(3,2,802)=0 exch2_pij(4,2,802)=1 exch2_oi(2,802)=0 exch2_oj(2,802)=0 exch2_neighbourId(3,802)=803 exch2_iLo(3,802)=35 exch2_iHi(3,802)=35 exch2_jLo(3,802)=0 exch2_jHi(3,802)=52 exch2_opposingSend(3,802)=4 exch2_pij(1,3,802)=1 exch2_pij(2,3,802)=0 exch2_pij(3,3,802)=0 exch2_pij(4,3,802)=1 exch2_oi(3,802)=0 exch2_oj(3,802)=0 exch2_neighbourId(4,802)=801 exch2_iLo(4,802)=0 exch2_iHi(4,802)=0 exch2_jLo(4,802)=0 exch2_jHi(4,802)=52 exch2_opposingSend(4,802)=3 exch2_pij(1,4,802)=1 exch2_pij(2,4,802)=0 exch2_pij(3,4,802)=0 exch2_pij(4,4,802)=1 exch2_oi(4,802)=0 exch2_oj(4,802)=0 RETURN END SUBROUTINE W2_E2SETUP_803 C Topology for tile 803 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(803)=34 exch2_tNy(803)=51 exch2_tBasex(803)=238 exch2_tBasey(803)=153 exch2_txGlobalo(803)=2789 exch2_tyGlobalo(803)=154 exch2_isWedge(803)=0 exch2_isNedge(803)=0 exch2_isEedge(803)=0 exch2_isSedge(803)=0 exch2_myFace(803)=6 exch2_mydNx(803)=510 exch2_mydNy(803)=510 exch2_nNeighbours(803)=4 exch2_neighbourId(1,803)=818 exch2_iLo(1,803)=0 exch2_iHi(1,803)=35 exch2_jLo(1,803)=52 exch2_jHi(1,803)=52 exch2_opposingSend(1,803)=2 exch2_pij(1,1,803)=1 exch2_pij(2,1,803)=0 exch2_pij(3,1,803)=0 exch2_pij(4,1,803)=1 exch2_oi(1,803)=0 exch2_oj(1,803)=0 exch2_neighbourId(2,803)=788 exch2_iLo(2,803)=0 exch2_iHi(2,803)=35 exch2_jLo(2,803)=0 exch2_jHi(2,803)=0 exch2_opposingSend(2,803)=1 exch2_pij(1,2,803)=1 exch2_pij(2,2,803)=0 exch2_pij(3,2,803)=0 exch2_pij(4,2,803)=1 exch2_oi(2,803)=0 exch2_oj(2,803)=0 exch2_neighbourId(3,803)=804 exch2_iLo(3,803)=35 exch2_iHi(3,803)=35 exch2_jLo(3,803)=0 exch2_jHi(3,803)=52 exch2_opposingSend(3,803)=4 exch2_pij(1,3,803)=1 exch2_pij(2,3,803)=0 exch2_pij(3,3,803)=0 exch2_pij(4,3,803)=1 exch2_oi(3,803)=0 exch2_oj(3,803)=0 exch2_neighbourId(4,803)=802 exch2_iLo(4,803)=0 exch2_iHi(4,803)=0 exch2_jLo(4,803)=0 exch2_jHi(4,803)=52 exch2_opposingSend(4,803)=3 exch2_pij(1,4,803)=1 exch2_pij(2,4,803)=0 exch2_pij(3,4,803)=0 exch2_pij(4,4,803)=1 exch2_oi(4,803)=0 exch2_oj(4,803)=0 RETURN END SUBROUTINE W2_E2SETUP_804 C Topology for tile 804 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(804)=34 exch2_tNy(804)=51 exch2_tBasex(804)=272 exch2_tBasey(804)=153 exch2_txGlobalo(804)=2823 exch2_tyGlobalo(804)=154 exch2_isWedge(804)=0 exch2_isNedge(804)=0 exch2_isEedge(804)=0 exch2_isSedge(804)=0 exch2_myFace(804)=6 exch2_mydNx(804)=510 exch2_mydNy(804)=510 exch2_nNeighbours(804)=4 exch2_neighbourId(1,804)=819 exch2_iLo(1,804)=0 exch2_iHi(1,804)=35 exch2_jLo(1,804)=52 exch2_jHi(1,804)=52 exch2_opposingSend(1,804)=2 exch2_pij(1,1,804)=1 exch2_pij(2,1,804)=0 exch2_pij(3,1,804)=0 exch2_pij(4,1,804)=1 exch2_oi(1,804)=0 exch2_oj(1,804)=0 exch2_neighbourId(2,804)=789 exch2_iLo(2,804)=0 exch2_iHi(2,804)=35 exch2_jLo(2,804)=0 exch2_jHi(2,804)=0 exch2_opposingSend(2,804)=1 exch2_pij(1,2,804)=1 exch2_pij(2,2,804)=0 exch2_pij(3,2,804)=0 exch2_pij(4,2,804)=1 exch2_oi(2,804)=0 exch2_oj(2,804)=0 exch2_neighbourId(3,804)=805 exch2_iLo(3,804)=35 exch2_iHi(3,804)=35 exch2_jLo(3,804)=0 exch2_jHi(3,804)=52 exch2_opposingSend(3,804)=4 exch2_pij(1,3,804)=1 exch2_pij(2,3,804)=0 exch2_pij(3,3,804)=0 exch2_pij(4,3,804)=1 exch2_oi(3,804)=0 exch2_oj(3,804)=0 exch2_neighbourId(4,804)=803 exch2_iLo(4,804)=0 exch2_iHi(4,804)=0 exch2_jLo(4,804)=0 exch2_jHi(4,804)=52 exch2_opposingSend(4,804)=3 exch2_pij(1,4,804)=1 exch2_pij(2,4,804)=0 exch2_pij(3,4,804)=0 exch2_pij(4,4,804)=1 exch2_oi(4,804)=0 exch2_oj(4,804)=0 RETURN END SUBROUTINE W2_E2SETUP_805 C Topology for tile 805 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(805)=34 exch2_tNy(805)=51 exch2_tBasex(805)=306 exch2_tBasey(805)=153 exch2_txGlobalo(805)=2857 exch2_tyGlobalo(805)=154 exch2_isWedge(805)=0 exch2_isNedge(805)=0 exch2_isEedge(805)=0 exch2_isSedge(805)=0 exch2_myFace(805)=6 exch2_mydNx(805)=510 exch2_mydNy(805)=510 exch2_nNeighbours(805)=4 exch2_neighbourId(1,805)=820 exch2_iLo(1,805)=0 exch2_iHi(1,805)=35 exch2_jLo(1,805)=52 exch2_jHi(1,805)=52 exch2_opposingSend(1,805)=2 exch2_pij(1,1,805)=1 exch2_pij(2,1,805)=0 exch2_pij(3,1,805)=0 exch2_pij(4,1,805)=1 exch2_oi(1,805)=0 exch2_oj(1,805)=0 exch2_neighbourId(2,805)=790 exch2_iLo(2,805)=0 exch2_iHi(2,805)=35 exch2_jLo(2,805)=0 exch2_jHi(2,805)=0 exch2_opposingSend(2,805)=1 exch2_pij(1,2,805)=1 exch2_pij(2,2,805)=0 exch2_pij(3,2,805)=0 exch2_pij(4,2,805)=1 exch2_oi(2,805)=0 exch2_oj(2,805)=0 exch2_neighbourId(3,805)=806 exch2_iLo(3,805)=35 exch2_iHi(3,805)=35 exch2_jLo(3,805)=0 exch2_jHi(3,805)=52 exch2_opposingSend(3,805)=4 exch2_pij(1,3,805)=1 exch2_pij(2,3,805)=0 exch2_pij(3,3,805)=0 exch2_pij(4,3,805)=1 exch2_oi(3,805)=0 exch2_oj(3,805)=0 exch2_neighbourId(4,805)=804 exch2_iLo(4,805)=0 exch2_iHi(4,805)=0 exch2_jLo(4,805)=0 exch2_jHi(4,805)=52 exch2_opposingSend(4,805)=3 exch2_pij(1,4,805)=1 exch2_pij(2,4,805)=0 exch2_pij(3,4,805)=0 exch2_pij(4,4,805)=1 exch2_oi(4,805)=0 exch2_oj(4,805)=0 RETURN END SUBROUTINE W2_E2SETUP_806 C Topology for tile 806 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(806)=34 exch2_tNy(806)=51 exch2_tBasex(806)=340 exch2_tBasey(806)=153 exch2_txGlobalo(806)=2891 exch2_tyGlobalo(806)=154 exch2_isWedge(806)=0 exch2_isNedge(806)=0 exch2_isEedge(806)=0 exch2_isSedge(806)=0 exch2_myFace(806)=6 exch2_mydNx(806)=510 exch2_mydNy(806)=510 exch2_nNeighbours(806)=4 exch2_neighbourId(1,806)=821 exch2_iLo(1,806)=0 exch2_iHi(1,806)=35 exch2_jLo(1,806)=52 exch2_jHi(1,806)=52 exch2_opposingSend(1,806)=2 exch2_pij(1,1,806)=1 exch2_pij(2,1,806)=0 exch2_pij(3,1,806)=0 exch2_pij(4,1,806)=1 exch2_oi(1,806)=0 exch2_oj(1,806)=0 exch2_neighbourId(2,806)=791 exch2_iLo(2,806)=0 exch2_iHi(2,806)=35 exch2_jLo(2,806)=0 exch2_jHi(2,806)=0 exch2_opposingSend(2,806)=1 exch2_pij(1,2,806)=1 exch2_pij(2,2,806)=0 exch2_pij(3,2,806)=0 exch2_pij(4,2,806)=1 exch2_oi(2,806)=0 exch2_oj(2,806)=0 exch2_neighbourId(3,806)=807 exch2_iLo(3,806)=35 exch2_iHi(3,806)=35 exch2_jLo(3,806)=0 exch2_jHi(3,806)=52 exch2_opposingSend(3,806)=4 exch2_pij(1,3,806)=1 exch2_pij(2,3,806)=0 exch2_pij(3,3,806)=0 exch2_pij(4,3,806)=1 exch2_oi(3,806)=0 exch2_oj(3,806)=0 exch2_neighbourId(4,806)=805 exch2_iLo(4,806)=0 exch2_iHi(4,806)=0 exch2_jLo(4,806)=0 exch2_jHi(4,806)=52 exch2_opposingSend(4,806)=3 exch2_pij(1,4,806)=1 exch2_pij(2,4,806)=0 exch2_pij(3,4,806)=0 exch2_pij(4,4,806)=1 exch2_oi(4,806)=0 exch2_oj(4,806)=0 RETURN END SUBROUTINE W2_E2SETUP_807 C Topology for tile 807 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(807)=34 exch2_tNy(807)=51 exch2_tBasex(807)=374 exch2_tBasey(807)=153 exch2_txGlobalo(807)=2925 exch2_tyGlobalo(807)=154 exch2_isWedge(807)=0 exch2_isNedge(807)=0 exch2_isEedge(807)=0 exch2_isSedge(807)=0 exch2_myFace(807)=6 exch2_mydNx(807)=510 exch2_mydNy(807)=510 exch2_nNeighbours(807)=4 exch2_neighbourId(1,807)=822 exch2_iLo(1,807)=0 exch2_iHi(1,807)=35 exch2_jLo(1,807)=52 exch2_jHi(1,807)=52 exch2_opposingSend(1,807)=2 exch2_pij(1,1,807)=1 exch2_pij(2,1,807)=0 exch2_pij(3,1,807)=0 exch2_pij(4,1,807)=1 exch2_oi(1,807)=0 exch2_oj(1,807)=0 exch2_neighbourId(2,807)=792 exch2_iLo(2,807)=0 exch2_iHi(2,807)=35 exch2_jLo(2,807)=0 exch2_jHi(2,807)=0 exch2_opposingSend(2,807)=1 exch2_pij(1,2,807)=1 exch2_pij(2,2,807)=0 exch2_pij(3,2,807)=0 exch2_pij(4,2,807)=1 exch2_oi(2,807)=0 exch2_oj(2,807)=0 exch2_neighbourId(3,807)=808 exch2_iLo(3,807)=35 exch2_iHi(3,807)=35 exch2_jLo(3,807)=0 exch2_jHi(3,807)=52 exch2_opposingSend(3,807)=4 exch2_pij(1,3,807)=1 exch2_pij(2,3,807)=0 exch2_pij(3,3,807)=0 exch2_pij(4,3,807)=1 exch2_oi(3,807)=0 exch2_oj(3,807)=0 exch2_neighbourId(4,807)=806 exch2_iLo(4,807)=0 exch2_iHi(4,807)=0 exch2_jLo(4,807)=0 exch2_jHi(4,807)=52 exch2_opposingSend(4,807)=3 exch2_pij(1,4,807)=1 exch2_pij(2,4,807)=0 exch2_pij(3,4,807)=0 exch2_pij(4,4,807)=1 exch2_oi(4,807)=0 exch2_oj(4,807)=0 RETURN END SUBROUTINE W2_E2SETUP_808 C Topology for tile 808 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(808)=34 exch2_tNy(808)=51 exch2_tBasex(808)=408 exch2_tBasey(808)=153 exch2_txGlobalo(808)=2959 exch2_tyGlobalo(808)=154 exch2_isWedge(808)=0 exch2_isNedge(808)=0 exch2_isEedge(808)=0 exch2_isSedge(808)=0 exch2_myFace(808)=6 exch2_mydNx(808)=510 exch2_mydNy(808)=510 exch2_nNeighbours(808)=4 exch2_neighbourId(1,808)=823 exch2_iLo(1,808)=0 exch2_iHi(1,808)=35 exch2_jLo(1,808)=52 exch2_jHi(1,808)=52 exch2_opposingSend(1,808)=2 exch2_pij(1,1,808)=1 exch2_pij(2,1,808)=0 exch2_pij(3,1,808)=0 exch2_pij(4,1,808)=1 exch2_oi(1,808)=0 exch2_oj(1,808)=0 exch2_neighbourId(2,808)=793 exch2_iLo(2,808)=0 exch2_iHi(2,808)=35 exch2_jLo(2,808)=0 exch2_jHi(2,808)=0 exch2_opposingSend(2,808)=1 exch2_pij(1,2,808)=1 exch2_pij(2,2,808)=0 exch2_pij(3,2,808)=0 exch2_pij(4,2,808)=1 exch2_oi(2,808)=0 exch2_oj(2,808)=0 exch2_neighbourId(3,808)=809 exch2_iLo(3,808)=35 exch2_iHi(3,808)=35 exch2_jLo(3,808)=0 exch2_jHi(3,808)=52 exch2_opposingSend(3,808)=4 exch2_pij(1,3,808)=1 exch2_pij(2,3,808)=0 exch2_pij(3,3,808)=0 exch2_pij(4,3,808)=1 exch2_oi(3,808)=0 exch2_oj(3,808)=0 exch2_neighbourId(4,808)=807 exch2_iLo(4,808)=0 exch2_iHi(4,808)=0 exch2_jLo(4,808)=0 exch2_jHi(4,808)=52 exch2_opposingSend(4,808)=3 exch2_pij(1,4,808)=1 exch2_pij(2,4,808)=0 exch2_pij(3,4,808)=0 exch2_pij(4,4,808)=1 exch2_oi(4,808)=0 exch2_oj(4,808)=0 RETURN END SUBROUTINE W2_E2SETUP_809 C Topology for tile 809 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(809)=34 exch2_tNy(809)=51 exch2_tBasex(809)=442 exch2_tBasey(809)=153 exch2_txGlobalo(809)=2993 exch2_tyGlobalo(809)=154 exch2_isWedge(809)=0 exch2_isNedge(809)=0 exch2_isEedge(809)=0 exch2_isSedge(809)=0 exch2_myFace(809)=6 exch2_mydNx(809)=510 exch2_mydNy(809)=510 exch2_nNeighbours(809)=4 exch2_neighbourId(1,809)=824 exch2_iLo(1,809)=0 exch2_iHi(1,809)=35 exch2_jLo(1,809)=52 exch2_jHi(1,809)=52 exch2_opposingSend(1,809)=2 exch2_pij(1,1,809)=1 exch2_pij(2,1,809)=0 exch2_pij(3,1,809)=0 exch2_pij(4,1,809)=1 exch2_oi(1,809)=0 exch2_oj(1,809)=0 exch2_neighbourId(2,809)=794 exch2_iLo(2,809)=0 exch2_iHi(2,809)=35 exch2_jLo(2,809)=0 exch2_jHi(2,809)=0 exch2_opposingSend(2,809)=1 exch2_pij(1,2,809)=1 exch2_pij(2,2,809)=0 exch2_pij(3,2,809)=0 exch2_pij(4,2,809)=1 exch2_oi(2,809)=0 exch2_oj(2,809)=0 exch2_neighbourId(3,809)=810 exch2_iLo(3,809)=35 exch2_iHi(3,809)=35 exch2_jLo(3,809)=0 exch2_jHi(3,809)=52 exch2_opposingSend(3,809)=5 exch2_pij(1,3,809)=1 exch2_pij(2,3,809)=0 exch2_pij(3,3,809)=0 exch2_pij(4,3,809)=1 exch2_oi(3,809)=0 exch2_oj(3,809)=0 exch2_neighbourId(4,809)=808 exch2_iLo(4,809)=0 exch2_iHi(4,809)=0 exch2_jLo(4,809)=0 exch2_jHi(4,809)=52 exch2_opposingSend(4,809)=3 exch2_pij(1,4,809)=1 exch2_pij(2,4,809)=0 exch2_pij(3,4,809)=0 exch2_pij(4,4,809)=1 exch2_oi(4,809)=0 exch2_oj(4,809)=0 RETURN END SUBROUTINE W2_E2SETUP_810 C Topology for tile 810 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(810)=34 exch2_tNy(810)=51 exch2_tBasex(810)=476 exch2_tBasey(810)=153 exch2_txGlobalo(810)=3027 exch2_tyGlobalo(810)=154 exch2_isWedge(810)=0 exch2_isNedge(810)=0 exch2_isEedge(810)=1 exch2_isSedge(810)=0 exch2_myFace(810)=6 exch2_mydNx(810)=510 exch2_mydNy(810)=510 exch2_nNeighbours(810)=5 exch2_neighbourId(1,810)=825 exch2_iLo(1,810)=0 exch2_iHi(1,810)=35 exch2_jLo(1,810)=52 exch2_jHi(1,810)=52 exch2_opposingSend(1,810)=2 exch2_pij(1,1,810)=1 exch2_pij(2,1,810)=0 exch2_pij(3,1,810)=0 exch2_pij(4,1,810)=1 exch2_oi(1,810)=0 exch2_oj(1,810)=0 exch2_neighbourId(2,810)=795 exch2_iLo(2,810)=0 exch2_iHi(2,810)=35 exch2_jLo(2,810)=0 exch2_jHi(2,810)=0 exch2_opposingSend(2,810)=1 exch2_pij(1,2,810)=1 exch2_pij(2,2,810)=0 exch2_pij(3,2,810)=0 exch2_pij(4,2,810)=1 exch2_oi(2,810)=0 exch2_oj(2,810)=0 exch2_neighbourId(3,810)=160 exch2_iLo(3,810)=35 exch2_iHi(3,810)=35 exch2_jLo(3,810)=17 exch2_jHi(3,810)=52 exch2_opposingSend(3,810)=2 exch2_pij(1,3,810)=0 exch2_pij(2,3,810)=1 exch2_pij(3,3,810)=-1 exch2_pij(4,3,810)=0 exch2_oi(3,810)=510 exch2_oj(3,810)=511 exch2_neighbourId(4,810)=161 exch2_iLo(4,810)=35 exch2_iHi(4,810)=35 exch2_jLo(4,810)=0 exch2_jHi(4,810)=18 exch2_opposingSend(4,810)=3 exch2_pij(1,4,810)=0 exch2_pij(2,4,810)=1 exch2_pij(3,4,810)=-1 exch2_pij(4,4,810)=0 exch2_oi(4,810)=510 exch2_oj(4,810)=511 exch2_neighbourId(5,810)=809 exch2_iLo(5,810)=0 exch2_iHi(5,810)=0 exch2_jLo(5,810)=0 exch2_jHi(5,810)=52 exch2_opposingSend(5,810)=3 exch2_pij(1,5,810)=1 exch2_pij(2,5,810)=0 exch2_pij(3,5,810)=0 exch2_pij(4,5,810)=1 exch2_oi(5,810)=0 exch2_oj(5,810)=0 RETURN END SUBROUTINE W2_E2SETUP_811 C Topology for tile 811 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(811)=34 exch2_tNy(811)=51 exch2_tBasex(811)=0 exch2_tBasey(811)=204 exch2_txGlobalo(811)=2551 exch2_tyGlobalo(811)=205 exch2_isWedge(811)=1 exch2_isNedge(811)=0 exch2_isEedge(811)=0 exch2_isSedge(811)=0 exch2_myFace(811)=6 exch2_mydNx(811)=510 exch2_mydNy(811)=510 exch2_nNeighbours(811)=4 exch2_neighbourId(1,811)=826 exch2_iLo(1,811)=0 exch2_iHi(1,811)=35 exch2_jLo(1,811)=52 exch2_jHi(1,811)=52 exch2_opposingSend(1,811)=2 exch2_pij(1,1,811)=1 exch2_pij(2,1,811)=0 exch2_pij(3,1,811)=0 exch2_pij(4,1,811)=1 exch2_oi(1,811)=0 exch2_oj(1,811)=0 exch2_neighbourId(2,811)=796 exch2_iLo(2,811)=0 exch2_iHi(2,811)=35 exch2_jLo(2,811)=0 exch2_jHi(2,811)=0 exch2_opposingSend(2,811)=1 exch2_pij(1,2,811)=1 exch2_pij(2,2,811)=0 exch2_pij(3,2,811)=0 exch2_pij(4,2,811)=1 exch2_oi(2,811)=0 exch2_oj(2,811)=0 exch2_neighbourId(3,811)=812 exch2_iLo(3,811)=35 exch2_iHi(3,811)=35 exch2_jLo(3,811)=0 exch2_jHi(3,811)=52 exch2_opposingSend(3,811)=4 exch2_pij(1,3,811)=1 exch2_pij(2,3,811)=0 exch2_pij(3,3,811)=0 exch2_pij(4,3,811)=1 exch2_oi(3,811)=0 exch2_oj(3,811)=0 exch2_neighbourId(4,811)=675 exch2_iLo(4,811)=0 exch2_iHi(4,811)=0 exch2_jLo(4,811)=0 exch2_jHi(4,811)=52 exch2_opposingSend(4,811)=3 exch2_pij(1,4,811)=1 exch2_pij(2,4,811)=0 exch2_pij(3,4,811)=0 exch2_pij(4,4,811)=1 exch2_oi(4,811)=-510 exch2_oj(4,811)=0 RETURN END SUBROUTINE W2_E2SETUP_812 C Topology for tile 812 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(812)=34 exch2_tNy(812)=51 exch2_tBasex(812)=34 exch2_tBasey(812)=204 exch2_txGlobalo(812)=2585 exch2_tyGlobalo(812)=205 exch2_isWedge(812)=0 exch2_isNedge(812)=0 exch2_isEedge(812)=0 exch2_isSedge(812)=0 exch2_myFace(812)=6 exch2_mydNx(812)=510 exch2_mydNy(812)=510 exch2_nNeighbours(812)=4 exch2_neighbourId(1,812)=827 exch2_iLo(1,812)=0 exch2_iHi(1,812)=35 exch2_jLo(1,812)=52 exch2_jHi(1,812)=52 exch2_opposingSend(1,812)=2 exch2_pij(1,1,812)=1 exch2_pij(2,1,812)=0 exch2_pij(3,1,812)=0 exch2_pij(4,1,812)=1 exch2_oi(1,812)=0 exch2_oj(1,812)=0 exch2_neighbourId(2,812)=797 exch2_iLo(2,812)=0 exch2_iHi(2,812)=35 exch2_jLo(2,812)=0 exch2_jHi(2,812)=0 exch2_opposingSend(2,812)=1 exch2_pij(1,2,812)=1 exch2_pij(2,2,812)=0 exch2_pij(3,2,812)=0 exch2_pij(4,2,812)=1 exch2_oi(2,812)=0 exch2_oj(2,812)=0 exch2_neighbourId(3,812)=813 exch2_iLo(3,812)=35 exch2_iHi(3,812)=35 exch2_jLo(3,812)=0 exch2_jHi(3,812)=52 exch2_opposingSend(3,812)=4 exch2_pij(1,3,812)=1 exch2_pij(2,3,812)=0 exch2_pij(3,3,812)=0 exch2_pij(4,3,812)=1 exch2_oi(3,812)=0 exch2_oj(3,812)=0 exch2_neighbourId(4,812)=811 exch2_iLo(4,812)=0 exch2_iHi(4,812)=0 exch2_jLo(4,812)=0 exch2_jHi(4,812)=52 exch2_opposingSend(4,812)=3 exch2_pij(1,4,812)=1 exch2_pij(2,4,812)=0 exch2_pij(3,4,812)=0 exch2_pij(4,4,812)=1 exch2_oi(4,812)=0 exch2_oj(4,812)=0 RETURN END SUBROUTINE W2_E2SETUP_813 C Topology for tile 813 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(813)=34 exch2_tNy(813)=51 exch2_tBasex(813)=68 exch2_tBasey(813)=204 exch2_txGlobalo(813)=2619 exch2_tyGlobalo(813)=205 exch2_isWedge(813)=0 exch2_isNedge(813)=0 exch2_isEedge(813)=0 exch2_isSedge(813)=0 exch2_myFace(813)=6 exch2_mydNx(813)=510 exch2_mydNy(813)=510 exch2_nNeighbours(813)=4 exch2_neighbourId(1,813)=828 exch2_iLo(1,813)=0 exch2_iHi(1,813)=35 exch2_jLo(1,813)=52 exch2_jHi(1,813)=52 exch2_opposingSend(1,813)=2 exch2_pij(1,1,813)=1 exch2_pij(2,1,813)=0 exch2_pij(3,1,813)=0 exch2_pij(4,1,813)=1 exch2_oi(1,813)=0 exch2_oj(1,813)=0 exch2_neighbourId(2,813)=798 exch2_iLo(2,813)=0 exch2_iHi(2,813)=35 exch2_jLo(2,813)=0 exch2_jHi(2,813)=0 exch2_opposingSend(2,813)=1 exch2_pij(1,2,813)=1 exch2_pij(2,2,813)=0 exch2_pij(3,2,813)=0 exch2_pij(4,2,813)=1 exch2_oi(2,813)=0 exch2_oj(2,813)=0 exch2_neighbourId(3,813)=814 exch2_iLo(3,813)=35 exch2_iHi(3,813)=35 exch2_jLo(3,813)=0 exch2_jHi(3,813)=52 exch2_opposingSend(3,813)=4 exch2_pij(1,3,813)=1 exch2_pij(2,3,813)=0 exch2_pij(3,3,813)=0 exch2_pij(4,3,813)=1 exch2_oi(3,813)=0 exch2_oj(3,813)=0 exch2_neighbourId(4,813)=812 exch2_iLo(4,813)=0 exch2_iHi(4,813)=0 exch2_jLo(4,813)=0 exch2_jHi(4,813)=52 exch2_opposingSend(4,813)=3 exch2_pij(1,4,813)=1 exch2_pij(2,4,813)=0 exch2_pij(3,4,813)=0 exch2_pij(4,4,813)=1 exch2_oi(4,813)=0 exch2_oj(4,813)=0 RETURN END SUBROUTINE W2_E2SETUP_814 C Topology for tile 814 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(814)=34 exch2_tNy(814)=51 exch2_tBasex(814)=102 exch2_tBasey(814)=204 exch2_txGlobalo(814)=2653 exch2_tyGlobalo(814)=205 exch2_isWedge(814)=0 exch2_isNedge(814)=0 exch2_isEedge(814)=0 exch2_isSedge(814)=0 exch2_myFace(814)=6 exch2_mydNx(814)=510 exch2_mydNy(814)=510 exch2_nNeighbours(814)=4 exch2_neighbourId(1,814)=829 exch2_iLo(1,814)=0 exch2_iHi(1,814)=35 exch2_jLo(1,814)=52 exch2_jHi(1,814)=52 exch2_opposingSend(1,814)=2 exch2_pij(1,1,814)=1 exch2_pij(2,1,814)=0 exch2_pij(3,1,814)=0 exch2_pij(4,1,814)=1 exch2_oi(1,814)=0 exch2_oj(1,814)=0 exch2_neighbourId(2,814)=799 exch2_iLo(2,814)=0 exch2_iHi(2,814)=35 exch2_jLo(2,814)=0 exch2_jHi(2,814)=0 exch2_opposingSend(2,814)=1 exch2_pij(1,2,814)=1 exch2_pij(2,2,814)=0 exch2_pij(3,2,814)=0 exch2_pij(4,2,814)=1 exch2_oi(2,814)=0 exch2_oj(2,814)=0 exch2_neighbourId(3,814)=815 exch2_iLo(3,814)=35 exch2_iHi(3,814)=35 exch2_jLo(3,814)=0 exch2_jHi(3,814)=52 exch2_opposingSend(3,814)=4 exch2_pij(1,3,814)=1 exch2_pij(2,3,814)=0 exch2_pij(3,3,814)=0 exch2_pij(4,3,814)=1 exch2_oi(3,814)=0 exch2_oj(3,814)=0 exch2_neighbourId(4,814)=813 exch2_iLo(4,814)=0 exch2_iHi(4,814)=0 exch2_jLo(4,814)=0 exch2_jHi(4,814)=52 exch2_opposingSend(4,814)=3 exch2_pij(1,4,814)=1 exch2_pij(2,4,814)=0 exch2_pij(3,4,814)=0 exch2_pij(4,4,814)=1 exch2_oi(4,814)=0 exch2_oj(4,814)=0 RETURN END SUBROUTINE W2_E2SETUP_815 C Topology for tile 815 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(815)=34 exch2_tNy(815)=51 exch2_tBasex(815)=136 exch2_tBasey(815)=204 exch2_txGlobalo(815)=2687 exch2_tyGlobalo(815)=205 exch2_isWedge(815)=0 exch2_isNedge(815)=0 exch2_isEedge(815)=0 exch2_isSedge(815)=0 exch2_myFace(815)=6 exch2_mydNx(815)=510 exch2_mydNy(815)=510 exch2_nNeighbours(815)=4 exch2_neighbourId(1,815)=830 exch2_iLo(1,815)=0 exch2_iHi(1,815)=35 exch2_jLo(1,815)=52 exch2_jHi(1,815)=52 exch2_opposingSend(1,815)=2 exch2_pij(1,1,815)=1 exch2_pij(2,1,815)=0 exch2_pij(3,1,815)=0 exch2_pij(4,1,815)=1 exch2_oi(1,815)=0 exch2_oj(1,815)=0 exch2_neighbourId(2,815)=800 exch2_iLo(2,815)=0 exch2_iHi(2,815)=35 exch2_jLo(2,815)=0 exch2_jHi(2,815)=0 exch2_opposingSend(2,815)=1 exch2_pij(1,2,815)=1 exch2_pij(2,2,815)=0 exch2_pij(3,2,815)=0 exch2_pij(4,2,815)=1 exch2_oi(2,815)=0 exch2_oj(2,815)=0 exch2_neighbourId(3,815)=816 exch2_iLo(3,815)=35 exch2_iHi(3,815)=35 exch2_jLo(3,815)=0 exch2_jHi(3,815)=52 exch2_opposingSend(3,815)=4 exch2_pij(1,3,815)=1 exch2_pij(2,3,815)=0 exch2_pij(3,3,815)=0 exch2_pij(4,3,815)=1 exch2_oi(3,815)=0 exch2_oj(3,815)=0 exch2_neighbourId(4,815)=814 exch2_iLo(4,815)=0 exch2_iHi(4,815)=0 exch2_jLo(4,815)=0 exch2_jHi(4,815)=52 exch2_opposingSend(4,815)=3 exch2_pij(1,4,815)=1 exch2_pij(2,4,815)=0 exch2_pij(3,4,815)=0 exch2_pij(4,4,815)=1 exch2_oi(4,815)=0 exch2_oj(4,815)=0 RETURN END SUBROUTINE W2_E2SETUP_816 C Topology for tile 816 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(816)=34 exch2_tNy(816)=51 exch2_tBasex(816)=170 exch2_tBasey(816)=204 exch2_txGlobalo(816)=2721 exch2_tyGlobalo(816)=205 exch2_isWedge(816)=0 exch2_isNedge(816)=0 exch2_isEedge(816)=0 exch2_isSedge(816)=0 exch2_myFace(816)=6 exch2_mydNx(816)=510 exch2_mydNy(816)=510 exch2_nNeighbours(816)=4 exch2_neighbourId(1,816)=831 exch2_iLo(1,816)=0 exch2_iHi(1,816)=35 exch2_jLo(1,816)=52 exch2_jHi(1,816)=52 exch2_opposingSend(1,816)=2 exch2_pij(1,1,816)=1 exch2_pij(2,1,816)=0 exch2_pij(3,1,816)=0 exch2_pij(4,1,816)=1 exch2_oi(1,816)=0 exch2_oj(1,816)=0 exch2_neighbourId(2,816)=801 exch2_iLo(2,816)=0 exch2_iHi(2,816)=35 exch2_jLo(2,816)=0 exch2_jHi(2,816)=0 exch2_opposingSend(2,816)=1 exch2_pij(1,2,816)=1 exch2_pij(2,2,816)=0 exch2_pij(3,2,816)=0 exch2_pij(4,2,816)=1 exch2_oi(2,816)=0 exch2_oj(2,816)=0 exch2_neighbourId(3,816)=817 exch2_iLo(3,816)=35 exch2_iHi(3,816)=35 exch2_jLo(3,816)=0 exch2_jHi(3,816)=52 exch2_opposingSend(3,816)=4 exch2_pij(1,3,816)=1 exch2_pij(2,3,816)=0 exch2_pij(3,3,816)=0 exch2_pij(4,3,816)=1 exch2_oi(3,816)=0 exch2_oj(3,816)=0 exch2_neighbourId(4,816)=815 exch2_iLo(4,816)=0 exch2_iHi(4,816)=0 exch2_jLo(4,816)=0 exch2_jHi(4,816)=52 exch2_opposingSend(4,816)=3 exch2_pij(1,4,816)=1 exch2_pij(2,4,816)=0 exch2_pij(3,4,816)=0 exch2_pij(4,4,816)=1 exch2_oi(4,816)=0 exch2_oj(4,816)=0 RETURN END SUBROUTINE W2_E2SETUP_817 C Topology for tile 817 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(817)=34 exch2_tNy(817)=51 exch2_tBasex(817)=204 exch2_tBasey(817)=204 exch2_txGlobalo(817)=2755 exch2_tyGlobalo(817)=205 exch2_isWedge(817)=0 exch2_isNedge(817)=0 exch2_isEedge(817)=0 exch2_isSedge(817)=0 exch2_myFace(817)=6 exch2_mydNx(817)=510 exch2_mydNy(817)=510 exch2_nNeighbours(817)=4 exch2_neighbourId(1,817)=832 exch2_iLo(1,817)=0 exch2_iHi(1,817)=35 exch2_jLo(1,817)=52 exch2_jHi(1,817)=52 exch2_opposingSend(1,817)=2 exch2_pij(1,1,817)=1 exch2_pij(2,1,817)=0 exch2_pij(3,1,817)=0 exch2_pij(4,1,817)=1 exch2_oi(1,817)=0 exch2_oj(1,817)=0 exch2_neighbourId(2,817)=802 exch2_iLo(2,817)=0 exch2_iHi(2,817)=35 exch2_jLo(2,817)=0 exch2_jHi(2,817)=0 exch2_opposingSend(2,817)=1 exch2_pij(1,2,817)=1 exch2_pij(2,2,817)=0 exch2_pij(3,2,817)=0 exch2_pij(4,2,817)=1 exch2_oi(2,817)=0 exch2_oj(2,817)=0 exch2_neighbourId(3,817)=818 exch2_iLo(3,817)=35 exch2_iHi(3,817)=35 exch2_jLo(3,817)=0 exch2_jHi(3,817)=52 exch2_opposingSend(3,817)=4 exch2_pij(1,3,817)=1 exch2_pij(2,3,817)=0 exch2_pij(3,3,817)=0 exch2_pij(4,3,817)=1 exch2_oi(3,817)=0 exch2_oj(3,817)=0 exch2_neighbourId(4,817)=816 exch2_iLo(4,817)=0 exch2_iHi(4,817)=0 exch2_jLo(4,817)=0 exch2_jHi(4,817)=52 exch2_opposingSend(4,817)=3 exch2_pij(1,4,817)=1 exch2_pij(2,4,817)=0 exch2_pij(3,4,817)=0 exch2_pij(4,4,817)=1 exch2_oi(4,817)=0 exch2_oj(4,817)=0 RETURN END SUBROUTINE W2_E2SETUP_818 C Topology for tile 818 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(818)=34 exch2_tNy(818)=51 exch2_tBasex(818)=238 exch2_tBasey(818)=204 exch2_txGlobalo(818)=2789 exch2_tyGlobalo(818)=205 exch2_isWedge(818)=0 exch2_isNedge(818)=0 exch2_isEedge(818)=0 exch2_isSedge(818)=0 exch2_myFace(818)=6 exch2_mydNx(818)=510 exch2_mydNy(818)=510 exch2_nNeighbours(818)=4 exch2_neighbourId(1,818)=833 exch2_iLo(1,818)=0 exch2_iHi(1,818)=35 exch2_jLo(1,818)=52 exch2_jHi(1,818)=52 exch2_opposingSend(1,818)=2 exch2_pij(1,1,818)=1 exch2_pij(2,1,818)=0 exch2_pij(3,1,818)=0 exch2_pij(4,1,818)=1 exch2_oi(1,818)=0 exch2_oj(1,818)=0 exch2_neighbourId(2,818)=803 exch2_iLo(2,818)=0 exch2_iHi(2,818)=35 exch2_jLo(2,818)=0 exch2_jHi(2,818)=0 exch2_opposingSend(2,818)=1 exch2_pij(1,2,818)=1 exch2_pij(2,2,818)=0 exch2_pij(3,2,818)=0 exch2_pij(4,2,818)=1 exch2_oi(2,818)=0 exch2_oj(2,818)=0 exch2_neighbourId(3,818)=819 exch2_iLo(3,818)=35 exch2_iHi(3,818)=35 exch2_jLo(3,818)=0 exch2_jHi(3,818)=52 exch2_opposingSend(3,818)=4 exch2_pij(1,3,818)=1 exch2_pij(2,3,818)=0 exch2_pij(3,3,818)=0 exch2_pij(4,3,818)=1 exch2_oi(3,818)=0 exch2_oj(3,818)=0 exch2_neighbourId(4,818)=817 exch2_iLo(4,818)=0 exch2_iHi(4,818)=0 exch2_jLo(4,818)=0 exch2_jHi(4,818)=52 exch2_opposingSend(4,818)=3 exch2_pij(1,4,818)=1 exch2_pij(2,4,818)=0 exch2_pij(3,4,818)=0 exch2_pij(4,4,818)=1 exch2_oi(4,818)=0 exch2_oj(4,818)=0 RETURN END SUBROUTINE W2_E2SETUP_819 C Topology for tile 819 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(819)=34 exch2_tNy(819)=51 exch2_tBasex(819)=272 exch2_tBasey(819)=204 exch2_txGlobalo(819)=2823 exch2_tyGlobalo(819)=205 exch2_isWedge(819)=0 exch2_isNedge(819)=0 exch2_isEedge(819)=0 exch2_isSedge(819)=0 exch2_myFace(819)=6 exch2_mydNx(819)=510 exch2_mydNy(819)=510 exch2_nNeighbours(819)=4 exch2_neighbourId(1,819)=834 exch2_iLo(1,819)=0 exch2_iHi(1,819)=35 exch2_jLo(1,819)=52 exch2_jHi(1,819)=52 exch2_opposingSend(1,819)=2 exch2_pij(1,1,819)=1 exch2_pij(2,1,819)=0 exch2_pij(3,1,819)=0 exch2_pij(4,1,819)=1 exch2_oi(1,819)=0 exch2_oj(1,819)=0 exch2_neighbourId(2,819)=804 exch2_iLo(2,819)=0 exch2_iHi(2,819)=35 exch2_jLo(2,819)=0 exch2_jHi(2,819)=0 exch2_opposingSend(2,819)=1 exch2_pij(1,2,819)=1 exch2_pij(2,2,819)=0 exch2_pij(3,2,819)=0 exch2_pij(4,2,819)=1 exch2_oi(2,819)=0 exch2_oj(2,819)=0 exch2_neighbourId(3,819)=820 exch2_iLo(3,819)=35 exch2_iHi(3,819)=35 exch2_jLo(3,819)=0 exch2_jHi(3,819)=52 exch2_opposingSend(3,819)=4 exch2_pij(1,3,819)=1 exch2_pij(2,3,819)=0 exch2_pij(3,3,819)=0 exch2_pij(4,3,819)=1 exch2_oi(3,819)=0 exch2_oj(3,819)=0 exch2_neighbourId(4,819)=818 exch2_iLo(4,819)=0 exch2_iHi(4,819)=0 exch2_jLo(4,819)=0 exch2_jHi(4,819)=52 exch2_opposingSend(4,819)=3 exch2_pij(1,4,819)=1 exch2_pij(2,4,819)=0 exch2_pij(3,4,819)=0 exch2_pij(4,4,819)=1 exch2_oi(4,819)=0 exch2_oj(4,819)=0 RETURN END SUBROUTINE W2_E2SETUP_820 C Topology for tile 820 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(820)=34 exch2_tNy(820)=51 exch2_tBasex(820)=306 exch2_tBasey(820)=204 exch2_txGlobalo(820)=2857 exch2_tyGlobalo(820)=205 exch2_isWedge(820)=0 exch2_isNedge(820)=0 exch2_isEedge(820)=0 exch2_isSedge(820)=0 exch2_myFace(820)=6 exch2_mydNx(820)=510 exch2_mydNy(820)=510 exch2_nNeighbours(820)=4 exch2_neighbourId(1,820)=835 exch2_iLo(1,820)=0 exch2_iHi(1,820)=35 exch2_jLo(1,820)=52 exch2_jHi(1,820)=52 exch2_opposingSend(1,820)=2 exch2_pij(1,1,820)=1 exch2_pij(2,1,820)=0 exch2_pij(3,1,820)=0 exch2_pij(4,1,820)=1 exch2_oi(1,820)=0 exch2_oj(1,820)=0 exch2_neighbourId(2,820)=805 exch2_iLo(2,820)=0 exch2_iHi(2,820)=35 exch2_jLo(2,820)=0 exch2_jHi(2,820)=0 exch2_opposingSend(2,820)=1 exch2_pij(1,2,820)=1 exch2_pij(2,2,820)=0 exch2_pij(3,2,820)=0 exch2_pij(4,2,820)=1 exch2_oi(2,820)=0 exch2_oj(2,820)=0 exch2_neighbourId(3,820)=821 exch2_iLo(3,820)=35 exch2_iHi(3,820)=35 exch2_jLo(3,820)=0 exch2_jHi(3,820)=52 exch2_opposingSend(3,820)=4 exch2_pij(1,3,820)=1 exch2_pij(2,3,820)=0 exch2_pij(3,3,820)=0 exch2_pij(4,3,820)=1 exch2_oi(3,820)=0 exch2_oj(3,820)=0 exch2_neighbourId(4,820)=819 exch2_iLo(4,820)=0 exch2_iHi(4,820)=0 exch2_jLo(4,820)=0 exch2_jHi(4,820)=52 exch2_opposingSend(4,820)=3 exch2_pij(1,4,820)=1 exch2_pij(2,4,820)=0 exch2_pij(3,4,820)=0 exch2_pij(4,4,820)=1 exch2_oi(4,820)=0 exch2_oj(4,820)=0 RETURN END SUBROUTINE W2_E2SETUP_821 C Topology for tile 821 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(821)=34 exch2_tNy(821)=51 exch2_tBasex(821)=340 exch2_tBasey(821)=204 exch2_txGlobalo(821)=2891 exch2_tyGlobalo(821)=205 exch2_isWedge(821)=0 exch2_isNedge(821)=0 exch2_isEedge(821)=0 exch2_isSedge(821)=0 exch2_myFace(821)=6 exch2_mydNx(821)=510 exch2_mydNy(821)=510 exch2_nNeighbours(821)=4 exch2_neighbourId(1,821)=836 exch2_iLo(1,821)=0 exch2_iHi(1,821)=35 exch2_jLo(1,821)=52 exch2_jHi(1,821)=52 exch2_opposingSend(1,821)=2 exch2_pij(1,1,821)=1 exch2_pij(2,1,821)=0 exch2_pij(3,1,821)=0 exch2_pij(4,1,821)=1 exch2_oi(1,821)=0 exch2_oj(1,821)=0 exch2_neighbourId(2,821)=806 exch2_iLo(2,821)=0 exch2_iHi(2,821)=35 exch2_jLo(2,821)=0 exch2_jHi(2,821)=0 exch2_opposingSend(2,821)=1 exch2_pij(1,2,821)=1 exch2_pij(2,2,821)=0 exch2_pij(3,2,821)=0 exch2_pij(4,2,821)=1 exch2_oi(2,821)=0 exch2_oj(2,821)=0 exch2_neighbourId(3,821)=822 exch2_iLo(3,821)=35 exch2_iHi(3,821)=35 exch2_jLo(3,821)=0 exch2_jHi(3,821)=52 exch2_opposingSend(3,821)=4 exch2_pij(1,3,821)=1 exch2_pij(2,3,821)=0 exch2_pij(3,3,821)=0 exch2_pij(4,3,821)=1 exch2_oi(3,821)=0 exch2_oj(3,821)=0 exch2_neighbourId(4,821)=820 exch2_iLo(4,821)=0 exch2_iHi(4,821)=0 exch2_jLo(4,821)=0 exch2_jHi(4,821)=52 exch2_opposingSend(4,821)=3 exch2_pij(1,4,821)=1 exch2_pij(2,4,821)=0 exch2_pij(3,4,821)=0 exch2_pij(4,4,821)=1 exch2_oi(4,821)=0 exch2_oj(4,821)=0 RETURN END SUBROUTINE W2_E2SETUP_822 C Topology for tile 822 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(822)=34 exch2_tNy(822)=51 exch2_tBasex(822)=374 exch2_tBasey(822)=204 exch2_txGlobalo(822)=2925 exch2_tyGlobalo(822)=205 exch2_isWedge(822)=0 exch2_isNedge(822)=0 exch2_isEedge(822)=0 exch2_isSedge(822)=0 exch2_myFace(822)=6 exch2_mydNx(822)=510 exch2_mydNy(822)=510 exch2_nNeighbours(822)=4 exch2_neighbourId(1,822)=837 exch2_iLo(1,822)=0 exch2_iHi(1,822)=35 exch2_jLo(1,822)=52 exch2_jHi(1,822)=52 exch2_opposingSend(1,822)=2 exch2_pij(1,1,822)=1 exch2_pij(2,1,822)=0 exch2_pij(3,1,822)=0 exch2_pij(4,1,822)=1 exch2_oi(1,822)=0 exch2_oj(1,822)=0 exch2_neighbourId(2,822)=807 exch2_iLo(2,822)=0 exch2_iHi(2,822)=35 exch2_jLo(2,822)=0 exch2_jHi(2,822)=0 exch2_opposingSend(2,822)=1 exch2_pij(1,2,822)=1 exch2_pij(2,2,822)=0 exch2_pij(3,2,822)=0 exch2_pij(4,2,822)=1 exch2_oi(2,822)=0 exch2_oj(2,822)=0 exch2_neighbourId(3,822)=823 exch2_iLo(3,822)=35 exch2_iHi(3,822)=35 exch2_jLo(3,822)=0 exch2_jHi(3,822)=52 exch2_opposingSend(3,822)=4 exch2_pij(1,3,822)=1 exch2_pij(2,3,822)=0 exch2_pij(3,3,822)=0 exch2_pij(4,3,822)=1 exch2_oi(3,822)=0 exch2_oj(3,822)=0 exch2_neighbourId(4,822)=821 exch2_iLo(4,822)=0 exch2_iHi(4,822)=0 exch2_jLo(4,822)=0 exch2_jHi(4,822)=52 exch2_opposingSend(4,822)=3 exch2_pij(1,4,822)=1 exch2_pij(2,4,822)=0 exch2_pij(3,4,822)=0 exch2_pij(4,4,822)=1 exch2_oi(4,822)=0 exch2_oj(4,822)=0 RETURN END SUBROUTINE W2_E2SETUP_823 C Topology for tile 823 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(823)=34 exch2_tNy(823)=51 exch2_tBasex(823)=408 exch2_tBasey(823)=204 exch2_txGlobalo(823)=2959 exch2_tyGlobalo(823)=205 exch2_isWedge(823)=0 exch2_isNedge(823)=0 exch2_isEedge(823)=0 exch2_isSedge(823)=0 exch2_myFace(823)=6 exch2_mydNx(823)=510 exch2_mydNy(823)=510 exch2_nNeighbours(823)=4 exch2_neighbourId(1,823)=838 exch2_iLo(1,823)=0 exch2_iHi(1,823)=35 exch2_jLo(1,823)=52 exch2_jHi(1,823)=52 exch2_opposingSend(1,823)=2 exch2_pij(1,1,823)=1 exch2_pij(2,1,823)=0 exch2_pij(3,1,823)=0 exch2_pij(4,1,823)=1 exch2_oi(1,823)=0 exch2_oj(1,823)=0 exch2_neighbourId(2,823)=808 exch2_iLo(2,823)=0 exch2_iHi(2,823)=35 exch2_jLo(2,823)=0 exch2_jHi(2,823)=0 exch2_opposingSend(2,823)=1 exch2_pij(1,2,823)=1 exch2_pij(2,2,823)=0 exch2_pij(3,2,823)=0 exch2_pij(4,2,823)=1 exch2_oi(2,823)=0 exch2_oj(2,823)=0 exch2_neighbourId(3,823)=824 exch2_iLo(3,823)=35 exch2_iHi(3,823)=35 exch2_jLo(3,823)=0 exch2_jHi(3,823)=52 exch2_opposingSend(3,823)=4 exch2_pij(1,3,823)=1 exch2_pij(2,3,823)=0 exch2_pij(3,3,823)=0 exch2_pij(4,3,823)=1 exch2_oi(3,823)=0 exch2_oj(3,823)=0 exch2_neighbourId(4,823)=822 exch2_iLo(4,823)=0 exch2_iHi(4,823)=0 exch2_jLo(4,823)=0 exch2_jHi(4,823)=52 exch2_opposingSend(4,823)=3 exch2_pij(1,4,823)=1 exch2_pij(2,4,823)=0 exch2_pij(3,4,823)=0 exch2_pij(4,4,823)=1 exch2_oi(4,823)=0 exch2_oj(4,823)=0 RETURN END SUBROUTINE W2_E2SETUP_824 C Topology for tile 824 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(824)=34 exch2_tNy(824)=51 exch2_tBasex(824)=442 exch2_tBasey(824)=204 exch2_txGlobalo(824)=2993 exch2_tyGlobalo(824)=205 exch2_isWedge(824)=0 exch2_isNedge(824)=0 exch2_isEedge(824)=0 exch2_isSedge(824)=0 exch2_myFace(824)=6 exch2_mydNx(824)=510 exch2_mydNy(824)=510 exch2_nNeighbours(824)=4 exch2_neighbourId(1,824)=839 exch2_iLo(1,824)=0 exch2_iHi(1,824)=35 exch2_jLo(1,824)=52 exch2_jHi(1,824)=52 exch2_opposingSend(1,824)=2 exch2_pij(1,1,824)=1 exch2_pij(2,1,824)=0 exch2_pij(3,1,824)=0 exch2_pij(4,1,824)=1 exch2_oi(1,824)=0 exch2_oj(1,824)=0 exch2_neighbourId(2,824)=809 exch2_iLo(2,824)=0 exch2_iHi(2,824)=35 exch2_jLo(2,824)=0 exch2_jHi(2,824)=0 exch2_opposingSend(2,824)=1 exch2_pij(1,2,824)=1 exch2_pij(2,2,824)=0 exch2_pij(3,2,824)=0 exch2_pij(4,2,824)=1 exch2_oi(2,824)=0 exch2_oj(2,824)=0 exch2_neighbourId(3,824)=825 exch2_iLo(3,824)=35 exch2_iHi(3,824)=35 exch2_jLo(3,824)=0 exch2_jHi(3,824)=52 exch2_opposingSend(3,824)=5 exch2_pij(1,3,824)=1 exch2_pij(2,3,824)=0 exch2_pij(3,3,824)=0 exch2_pij(4,3,824)=1 exch2_oi(3,824)=0 exch2_oj(3,824)=0 exch2_neighbourId(4,824)=823 exch2_iLo(4,824)=0 exch2_iHi(4,824)=0 exch2_jLo(4,824)=0 exch2_jHi(4,824)=52 exch2_opposingSend(4,824)=3 exch2_pij(1,4,824)=1 exch2_pij(2,4,824)=0 exch2_pij(3,4,824)=0 exch2_pij(4,4,824)=1 exch2_oi(4,824)=0 exch2_oj(4,824)=0 RETURN END SUBROUTINE W2_E2SETUP_825 C Topology for tile 825 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(825)=34 exch2_tNy(825)=51 exch2_tBasex(825)=476 exch2_tBasey(825)=204 exch2_txGlobalo(825)=3027 exch2_tyGlobalo(825)=205 exch2_isWedge(825)=0 exch2_isNedge(825)=0 exch2_isEedge(825)=1 exch2_isSedge(825)=0 exch2_myFace(825)=6 exch2_mydNx(825)=510 exch2_mydNy(825)=510 exch2_nNeighbours(825)=5 exch2_neighbourId(1,825)=840 exch2_iLo(1,825)=0 exch2_iHi(1,825)=35 exch2_jLo(1,825)=52 exch2_jHi(1,825)=52 exch2_opposingSend(1,825)=2 exch2_pij(1,1,825)=1 exch2_pij(2,1,825)=0 exch2_pij(3,1,825)=0 exch2_pij(4,1,825)=1 exch2_oi(1,825)=0 exch2_oj(1,825)=0 exch2_neighbourId(2,825)=810 exch2_iLo(2,825)=0 exch2_iHi(2,825)=35 exch2_jLo(2,825)=0 exch2_jHi(2,825)=0 exch2_opposingSend(2,825)=1 exch2_pij(1,2,825)=1 exch2_pij(2,2,825)=0 exch2_pij(3,2,825)=0 exch2_pij(4,2,825)=1 exch2_oi(2,825)=0 exch2_oj(2,825)=0 exch2_neighbourId(3,825)=158 exch2_iLo(3,825)=35 exch2_iHi(3,825)=35 exch2_jLo(3,825)=34 exch2_jHi(3,825)=52 exch2_opposingSend(3,825)=2 exch2_pij(1,3,825)=0 exch2_pij(2,3,825)=1 exch2_pij(3,3,825)=-1 exch2_pij(4,3,825)=0 exch2_oi(3,825)=510 exch2_oj(3,825)=511 exch2_neighbourId(4,825)=159 exch2_iLo(4,825)=35 exch2_iHi(4,825)=35 exch2_jLo(4,825)=0 exch2_jHi(4,825)=35 exch2_opposingSend(4,825)=2 exch2_pij(1,4,825)=0 exch2_pij(2,4,825)=1 exch2_pij(3,4,825)=-1 exch2_pij(4,4,825)=0 exch2_oi(4,825)=510 exch2_oj(4,825)=511 exch2_neighbourId(5,825)=824 exch2_iLo(5,825)=0 exch2_iHi(5,825)=0 exch2_jLo(5,825)=0 exch2_jHi(5,825)=52 exch2_opposingSend(5,825)=3 exch2_pij(1,5,825)=1 exch2_pij(2,5,825)=0 exch2_pij(3,5,825)=0 exch2_pij(4,5,825)=1 exch2_oi(5,825)=0 exch2_oj(5,825)=0 RETURN END SUBROUTINE W2_E2SETUP_826 C Topology for tile 826 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(826)=34 exch2_tNy(826)=51 exch2_tBasex(826)=0 exch2_tBasey(826)=255 exch2_txGlobalo(826)=2551 exch2_tyGlobalo(826)=256 exch2_isWedge(826)=1 exch2_isNedge(826)=0 exch2_isEedge(826)=0 exch2_isSedge(826)=0 exch2_myFace(826)=6 exch2_mydNx(826)=510 exch2_mydNy(826)=510 exch2_nNeighbours(826)=4 exch2_neighbourId(1,826)=841 exch2_iLo(1,826)=0 exch2_iHi(1,826)=35 exch2_jLo(1,826)=52 exch2_jHi(1,826)=52 exch2_opposingSend(1,826)=2 exch2_pij(1,1,826)=1 exch2_pij(2,1,826)=0 exch2_pij(3,1,826)=0 exch2_pij(4,1,826)=1 exch2_oi(1,826)=0 exch2_oj(1,826)=0 exch2_neighbourId(2,826)=811 exch2_iLo(2,826)=0 exch2_iHi(2,826)=35 exch2_jLo(2,826)=0 exch2_jHi(2,826)=0 exch2_opposingSend(2,826)=1 exch2_pij(1,2,826)=1 exch2_pij(2,2,826)=0 exch2_pij(3,2,826)=0 exch2_pij(4,2,826)=1 exch2_oi(2,826)=0 exch2_oj(2,826)=0 exch2_neighbourId(3,826)=827 exch2_iLo(3,826)=35 exch2_iHi(3,826)=35 exch2_jLo(3,826)=0 exch2_jHi(3,826)=52 exch2_opposingSend(3,826)=4 exch2_pij(1,3,826)=1 exch2_pij(2,3,826)=0 exch2_pij(3,3,826)=0 exch2_pij(4,3,826)=1 exch2_oi(3,826)=0 exch2_oj(3,826)=0 exch2_neighbourId(4,826)=690 exch2_iLo(4,826)=0 exch2_iHi(4,826)=0 exch2_jLo(4,826)=0 exch2_jHi(4,826)=52 exch2_opposingSend(4,826)=3 exch2_pij(1,4,826)=1 exch2_pij(2,4,826)=0 exch2_pij(3,4,826)=0 exch2_pij(4,4,826)=1 exch2_oi(4,826)=-510 exch2_oj(4,826)=0 RETURN END SUBROUTINE W2_E2SETUP_827 C Topology for tile 827 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(827)=34 exch2_tNy(827)=51 exch2_tBasex(827)=34 exch2_tBasey(827)=255 exch2_txGlobalo(827)=2585 exch2_tyGlobalo(827)=256 exch2_isWedge(827)=0 exch2_isNedge(827)=0 exch2_isEedge(827)=0 exch2_isSedge(827)=0 exch2_myFace(827)=6 exch2_mydNx(827)=510 exch2_mydNy(827)=510 exch2_nNeighbours(827)=4 exch2_neighbourId(1,827)=842 exch2_iLo(1,827)=0 exch2_iHi(1,827)=35 exch2_jLo(1,827)=52 exch2_jHi(1,827)=52 exch2_opposingSend(1,827)=2 exch2_pij(1,1,827)=1 exch2_pij(2,1,827)=0 exch2_pij(3,1,827)=0 exch2_pij(4,1,827)=1 exch2_oi(1,827)=0 exch2_oj(1,827)=0 exch2_neighbourId(2,827)=812 exch2_iLo(2,827)=0 exch2_iHi(2,827)=35 exch2_jLo(2,827)=0 exch2_jHi(2,827)=0 exch2_opposingSend(2,827)=1 exch2_pij(1,2,827)=1 exch2_pij(2,2,827)=0 exch2_pij(3,2,827)=0 exch2_pij(4,2,827)=1 exch2_oi(2,827)=0 exch2_oj(2,827)=0 exch2_neighbourId(3,827)=828 exch2_iLo(3,827)=35 exch2_iHi(3,827)=35 exch2_jLo(3,827)=0 exch2_jHi(3,827)=52 exch2_opposingSend(3,827)=4 exch2_pij(1,3,827)=1 exch2_pij(2,3,827)=0 exch2_pij(3,3,827)=0 exch2_pij(4,3,827)=1 exch2_oi(3,827)=0 exch2_oj(3,827)=0 exch2_neighbourId(4,827)=826 exch2_iLo(4,827)=0 exch2_iHi(4,827)=0 exch2_jLo(4,827)=0 exch2_jHi(4,827)=52 exch2_opposingSend(4,827)=3 exch2_pij(1,4,827)=1 exch2_pij(2,4,827)=0 exch2_pij(3,4,827)=0 exch2_pij(4,4,827)=1 exch2_oi(4,827)=0 exch2_oj(4,827)=0 RETURN END SUBROUTINE W2_E2SETUP_828 C Topology for tile 828 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(828)=34 exch2_tNy(828)=51 exch2_tBasex(828)=68 exch2_tBasey(828)=255 exch2_txGlobalo(828)=2619 exch2_tyGlobalo(828)=256 exch2_isWedge(828)=0 exch2_isNedge(828)=0 exch2_isEedge(828)=0 exch2_isSedge(828)=0 exch2_myFace(828)=6 exch2_mydNx(828)=510 exch2_mydNy(828)=510 exch2_nNeighbours(828)=4 exch2_neighbourId(1,828)=843 exch2_iLo(1,828)=0 exch2_iHi(1,828)=35 exch2_jLo(1,828)=52 exch2_jHi(1,828)=52 exch2_opposingSend(1,828)=2 exch2_pij(1,1,828)=1 exch2_pij(2,1,828)=0 exch2_pij(3,1,828)=0 exch2_pij(4,1,828)=1 exch2_oi(1,828)=0 exch2_oj(1,828)=0 exch2_neighbourId(2,828)=813 exch2_iLo(2,828)=0 exch2_iHi(2,828)=35 exch2_jLo(2,828)=0 exch2_jHi(2,828)=0 exch2_opposingSend(2,828)=1 exch2_pij(1,2,828)=1 exch2_pij(2,2,828)=0 exch2_pij(3,2,828)=0 exch2_pij(4,2,828)=1 exch2_oi(2,828)=0 exch2_oj(2,828)=0 exch2_neighbourId(3,828)=829 exch2_iLo(3,828)=35 exch2_iHi(3,828)=35 exch2_jLo(3,828)=0 exch2_jHi(3,828)=52 exch2_opposingSend(3,828)=4 exch2_pij(1,3,828)=1 exch2_pij(2,3,828)=0 exch2_pij(3,3,828)=0 exch2_pij(4,3,828)=1 exch2_oi(3,828)=0 exch2_oj(3,828)=0 exch2_neighbourId(4,828)=827 exch2_iLo(4,828)=0 exch2_iHi(4,828)=0 exch2_jLo(4,828)=0 exch2_jHi(4,828)=52 exch2_opposingSend(4,828)=3 exch2_pij(1,4,828)=1 exch2_pij(2,4,828)=0 exch2_pij(3,4,828)=0 exch2_pij(4,4,828)=1 exch2_oi(4,828)=0 exch2_oj(4,828)=0 RETURN END SUBROUTINE W2_E2SETUP_829 C Topology for tile 829 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(829)=34 exch2_tNy(829)=51 exch2_tBasex(829)=102 exch2_tBasey(829)=255 exch2_txGlobalo(829)=2653 exch2_tyGlobalo(829)=256 exch2_isWedge(829)=0 exch2_isNedge(829)=0 exch2_isEedge(829)=0 exch2_isSedge(829)=0 exch2_myFace(829)=6 exch2_mydNx(829)=510 exch2_mydNy(829)=510 exch2_nNeighbours(829)=4 exch2_neighbourId(1,829)=844 exch2_iLo(1,829)=0 exch2_iHi(1,829)=35 exch2_jLo(1,829)=52 exch2_jHi(1,829)=52 exch2_opposingSend(1,829)=2 exch2_pij(1,1,829)=1 exch2_pij(2,1,829)=0 exch2_pij(3,1,829)=0 exch2_pij(4,1,829)=1 exch2_oi(1,829)=0 exch2_oj(1,829)=0 exch2_neighbourId(2,829)=814 exch2_iLo(2,829)=0 exch2_iHi(2,829)=35 exch2_jLo(2,829)=0 exch2_jHi(2,829)=0 exch2_opposingSend(2,829)=1 exch2_pij(1,2,829)=1 exch2_pij(2,2,829)=0 exch2_pij(3,2,829)=0 exch2_pij(4,2,829)=1 exch2_oi(2,829)=0 exch2_oj(2,829)=0 exch2_neighbourId(3,829)=830 exch2_iLo(3,829)=35 exch2_iHi(3,829)=35 exch2_jLo(3,829)=0 exch2_jHi(3,829)=52 exch2_opposingSend(3,829)=4 exch2_pij(1,3,829)=1 exch2_pij(2,3,829)=0 exch2_pij(3,3,829)=0 exch2_pij(4,3,829)=1 exch2_oi(3,829)=0 exch2_oj(3,829)=0 exch2_neighbourId(4,829)=828 exch2_iLo(4,829)=0 exch2_iHi(4,829)=0 exch2_jLo(4,829)=0 exch2_jHi(4,829)=52 exch2_opposingSend(4,829)=3 exch2_pij(1,4,829)=1 exch2_pij(2,4,829)=0 exch2_pij(3,4,829)=0 exch2_pij(4,4,829)=1 exch2_oi(4,829)=0 exch2_oj(4,829)=0 RETURN END SUBROUTINE W2_E2SETUP_830 C Topology for tile 830 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(830)=34 exch2_tNy(830)=51 exch2_tBasex(830)=136 exch2_tBasey(830)=255 exch2_txGlobalo(830)=2687 exch2_tyGlobalo(830)=256 exch2_isWedge(830)=0 exch2_isNedge(830)=0 exch2_isEedge(830)=0 exch2_isSedge(830)=0 exch2_myFace(830)=6 exch2_mydNx(830)=510 exch2_mydNy(830)=510 exch2_nNeighbours(830)=4 exch2_neighbourId(1,830)=845 exch2_iLo(1,830)=0 exch2_iHi(1,830)=35 exch2_jLo(1,830)=52 exch2_jHi(1,830)=52 exch2_opposingSend(1,830)=2 exch2_pij(1,1,830)=1 exch2_pij(2,1,830)=0 exch2_pij(3,1,830)=0 exch2_pij(4,1,830)=1 exch2_oi(1,830)=0 exch2_oj(1,830)=0 exch2_neighbourId(2,830)=815 exch2_iLo(2,830)=0 exch2_iHi(2,830)=35 exch2_jLo(2,830)=0 exch2_jHi(2,830)=0 exch2_opposingSend(2,830)=1 exch2_pij(1,2,830)=1 exch2_pij(2,2,830)=0 exch2_pij(3,2,830)=0 exch2_pij(4,2,830)=1 exch2_oi(2,830)=0 exch2_oj(2,830)=0 exch2_neighbourId(3,830)=831 exch2_iLo(3,830)=35 exch2_iHi(3,830)=35 exch2_jLo(3,830)=0 exch2_jHi(3,830)=52 exch2_opposingSend(3,830)=4 exch2_pij(1,3,830)=1 exch2_pij(2,3,830)=0 exch2_pij(3,3,830)=0 exch2_pij(4,3,830)=1 exch2_oi(3,830)=0 exch2_oj(3,830)=0 exch2_neighbourId(4,830)=829 exch2_iLo(4,830)=0 exch2_iHi(4,830)=0 exch2_jLo(4,830)=0 exch2_jHi(4,830)=52 exch2_opposingSend(4,830)=3 exch2_pij(1,4,830)=1 exch2_pij(2,4,830)=0 exch2_pij(3,4,830)=0 exch2_pij(4,4,830)=1 exch2_oi(4,830)=0 exch2_oj(4,830)=0 RETURN END SUBROUTINE W2_E2SETUP_831 C Topology for tile 831 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(831)=34 exch2_tNy(831)=51 exch2_tBasex(831)=170 exch2_tBasey(831)=255 exch2_txGlobalo(831)=2721 exch2_tyGlobalo(831)=256 exch2_isWedge(831)=0 exch2_isNedge(831)=0 exch2_isEedge(831)=0 exch2_isSedge(831)=0 exch2_myFace(831)=6 exch2_mydNx(831)=510 exch2_mydNy(831)=510 exch2_nNeighbours(831)=4 exch2_neighbourId(1,831)=846 exch2_iLo(1,831)=0 exch2_iHi(1,831)=35 exch2_jLo(1,831)=52 exch2_jHi(1,831)=52 exch2_opposingSend(1,831)=2 exch2_pij(1,1,831)=1 exch2_pij(2,1,831)=0 exch2_pij(3,1,831)=0 exch2_pij(4,1,831)=1 exch2_oi(1,831)=0 exch2_oj(1,831)=0 exch2_neighbourId(2,831)=816 exch2_iLo(2,831)=0 exch2_iHi(2,831)=35 exch2_jLo(2,831)=0 exch2_jHi(2,831)=0 exch2_opposingSend(2,831)=1 exch2_pij(1,2,831)=1 exch2_pij(2,2,831)=0 exch2_pij(3,2,831)=0 exch2_pij(4,2,831)=1 exch2_oi(2,831)=0 exch2_oj(2,831)=0 exch2_neighbourId(3,831)=832 exch2_iLo(3,831)=35 exch2_iHi(3,831)=35 exch2_jLo(3,831)=0 exch2_jHi(3,831)=52 exch2_opposingSend(3,831)=4 exch2_pij(1,3,831)=1 exch2_pij(2,3,831)=0 exch2_pij(3,3,831)=0 exch2_pij(4,3,831)=1 exch2_oi(3,831)=0 exch2_oj(3,831)=0 exch2_neighbourId(4,831)=830 exch2_iLo(4,831)=0 exch2_iHi(4,831)=0 exch2_jLo(4,831)=0 exch2_jHi(4,831)=52 exch2_opposingSend(4,831)=3 exch2_pij(1,4,831)=1 exch2_pij(2,4,831)=0 exch2_pij(3,4,831)=0 exch2_pij(4,4,831)=1 exch2_oi(4,831)=0 exch2_oj(4,831)=0 RETURN END SUBROUTINE W2_E2SETUP_832 C Topology for tile 832 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(832)=34 exch2_tNy(832)=51 exch2_tBasex(832)=204 exch2_tBasey(832)=255 exch2_txGlobalo(832)=2755 exch2_tyGlobalo(832)=256 exch2_isWedge(832)=0 exch2_isNedge(832)=0 exch2_isEedge(832)=0 exch2_isSedge(832)=0 exch2_myFace(832)=6 exch2_mydNx(832)=510 exch2_mydNy(832)=510 exch2_nNeighbours(832)=4 exch2_neighbourId(1,832)=847 exch2_iLo(1,832)=0 exch2_iHi(1,832)=35 exch2_jLo(1,832)=52 exch2_jHi(1,832)=52 exch2_opposingSend(1,832)=2 exch2_pij(1,1,832)=1 exch2_pij(2,1,832)=0 exch2_pij(3,1,832)=0 exch2_pij(4,1,832)=1 exch2_oi(1,832)=0 exch2_oj(1,832)=0 exch2_neighbourId(2,832)=817 exch2_iLo(2,832)=0 exch2_iHi(2,832)=35 exch2_jLo(2,832)=0 exch2_jHi(2,832)=0 exch2_opposingSend(2,832)=1 exch2_pij(1,2,832)=1 exch2_pij(2,2,832)=0 exch2_pij(3,2,832)=0 exch2_pij(4,2,832)=1 exch2_oi(2,832)=0 exch2_oj(2,832)=0 exch2_neighbourId(3,832)=833 exch2_iLo(3,832)=35 exch2_iHi(3,832)=35 exch2_jLo(3,832)=0 exch2_jHi(3,832)=52 exch2_opposingSend(3,832)=4 exch2_pij(1,3,832)=1 exch2_pij(2,3,832)=0 exch2_pij(3,3,832)=0 exch2_pij(4,3,832)=1 exch2_oi(3,832)=0 exch2_oj(3,832)=0 exch2_neighbourId(4,832)=831 exch2_iLo(4,832)=0 exch2_iHi(4,832)=0 exch2_jLo(4,832)=0 exch2_jHi(4,832)=52 exch2_opposingSend(4,832)=3 exch2_pij(1,4,832)=1 exch2_pij(2,4,832)=0 exch2_pij(3,4,832)=0 exch2_pij(4,4,832)=1 exch2_oi(4,832)=0 exch2_oj(4,832)=0 RETURN END SUBROUTINE W2_E2SETUP_833 C Topology for tile 833 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(833)=34 exch2_tNy(833)=51 exch2_tBasex(833)=238 exch2_tBasey(833)=255 exch2_txGlobalo(833)=2789 exch2_tyGlobalo(833)=256 exch2_isWedge(833)=0 exch2_isNedge(833)=0 exch2_isEedge(833)=0 exch2_isSedge(833)=0 exch2_myFace(833)=6 exch2_mydNx(833)=510 exch2_mydNy(833)=510 exch2_nNeighbours(833)=4 exch2_neighbourId(1,833)=848 exch2_iLo(1,833)=0 exch2_iHi(1,833)=35 exch2_jLo(1,833)=52 exch2_jHi(1,833)=52 exch2_opposingSend(1,833)=2 exch2_pij(1,1,833)=1 exch2_pij(2,1,833)=0 exch2_pij(3,1,833)=0 exch2_pij(4,1,833)=1 exch2_oi(1,833)=0 exch2_oj(1,833)=0 exch2_neighbourId(2,833)=818 exch2_iLo(2,833)=0 exch2_iHi(2,833)=35 exch2_jLo(2,833)=0 exch2_jHi(2,833)=0 exch2_opposingSend(2,833)=1 exch2_pij(1,2,833)=1 exch2_pij(2,2,833)=0 exch2_pij(3,2,833)=0 exch2_pij(4,2,833)=1 exch2_oi(2,833)=0 exch2_oj(2,833)=0 exch2_neighbourId(3,833)=834 exch2_iLo(3,833)=35 exch2_iHi(3,833)=35 exch2_jLo(3,833)=0 exch2_jHi(3,833)=52 exch2_opposingSend(3,833)=4 exch2_pij(1,3,833)=1 exch2_pij(2,3,833)=0 exch2_pij(3,3,833)=0 exch2_pij(4,3,833)=1 exch2_oi(3,833)=0 exch2_oj(3,833)=0 exch2_neighbourId(4,833)=832 exch2_iLo(4,833)=0 exch2_iHi(4,833)=0 exch2_jLo(4,833)=0 exch2_jHi(4,833)=52 exch2_opposingSend(4,833)=3 exch2_pij(1,4,833)=1 exch2_pij(2,4,833)=0 exch2_pij(3,4,833)=0 exch2_pij(4,4,833)=1 exch2_oi(4,833)=0 exch2_oj(4,833)=0 RETURN END SUBROUTINE W2_E2SETUP_834 C Topology for tile 834 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(834)=34 exch2_tNy(834)=51 exch2_tBasex(834)=272 exch2_tBasey(834)=255 exch2_txGlobalo(834)=2823 exch2_tyGlobalo(834)=256 exch2_isWedge(834)=0 exch2_isNedge(834)=0 exch2_isEedge(834)=0 exch2_isSedge(834)=0 exch2_myFace(834)=6 exch2_mydNx(834)=510 exch2_mydNy(834)=510 exch2_nNeighbours(834)=4 exch2_neighbourId(1,834)=849 exch2_iLo(1,834)=0 exch2_iHi(1,834)=35 exch2_jLo(1,834)=52 exch2_jHi(1,834)=52 exch2_opposingSend(1,834)=2 exch2_pij(1,1,834)=1 exch2_pij(2,1,834)=0 exch2_pij(3,1,834)=0 exch2_pij(4,1,834)=1 exch2_oi(1,834)=0 exch2_oj(1,834)=0 exch2_neighbourId(2,834)=819 exch2_iLo(2,834)=0 exch2_iHi(2,834)=35 exch2_jLo(2,834)=0 exch2_jHi(2,834)=0 exch2_opposingSend(2,834)=1 exch2_pij(1,2,834)=1 exch2_pij(2,2,834)=0 exch2_pij(3,2,834)=0 exch2_pij(4,2,834)=1 exch2_oi(2,834)=0 exch2_oj(2,834)=0 exch2_neighbourId(3,834)=835 exch2_iLo(3,834)=35 exch2_iHi(3,834)=35 exch2_jLo(3,834)=0 exch2_jHi(3,834)=52 exch2_opposingSend(3,834)=4 exch2_pij(1,3,834)=1 exch2_pij(2,3,834)=0 exch2_pij(3,3,834)=0 exch2_pij(4,3,834)=1 exch2_oi(3,834)=0 exch2_oj(3,834)=0 exch2_neighbourId(4,834)=833 exch2_iLo(4,834)=0 exch2_iHi(4,834)=0 exch2_jLo(4,834)=0 exch2_jHi(4,834)=52 exch2_opposingSend(4,834)=3 exch2_pij(1,4,834)=1 exch2_pij(2,4,834)=0 exch2_pij(3,4,834)=0 exch2_pij(4,4,834)=1 exch2_oi(4,834)=0 exch2_oj(4,834)=0 RETURN END SUBROUTINE W2_E2SETUP_835 C Topology for tile 835 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(835)=34 exch2_tNy(835)=51 exch2_tBasex(835)=306 exch2_tBasey(835)=255 exch2_txGlobalo(835)=2857 exch2_tyGlobalo(835)=256 exch2_isWedge(835)=0 exch2_isNedge(835)=0 exch2_isEedge(835)=0 exch2_isSedge(835)=0 exch2_myFace(835)=6 exch2_mydNx(835)=510 exch2_mydNy(835)=510 exch2_nNeighbours(835)=4 exch2_neighbourId(1,835)=850 exch2_iLo(1,835)=0 exch2_iHi(1,835)=35 exch2_jLo(1,835)=52 exch2_jHi(1,835)=52 exch2_opposingSend(1,835)=2 exch2_pij(1,1,835)=1 exch2_pij(2,1,835)=0 exch2_pij(3,1,835)=0 exch2_pij(4,1,835)=1 exch2_oi(1,835)=0 exch2_oj(1,835)=0 exch2_neighbourId(2,835)=820 exch2_iLo(2,835)=0 exch2_iHi(2,835)=35 exch2_jLo(2,835)=0 exch2_jHi(2,835)=0 exch2_opposingSend(2,835)=1 exch2_pij(1,2,835)=1 exch2_pij(2,2,835)=0 exch2_pij(3,2,835)=0 exch2_pij(4,2,835)=1 exch2_oi(2,835)=0 exch2_oj(2,835)=0 exch2_neighbourId(3,835)=836 exch2_iLo(3,835)=35 exch2_iHi(3,835)=35 exch2_jLo(3,835)=0 exch2_jHi(3,835)=52 exch2_opposingSend(3,835)=4 exch2_pij(1,3,835)=1 exch2_pij(2,3,835)=0 exch2_pij(3,3,835)=0 exch2_pij(4,3,835)=1 exch2_oi(3,835)=0 exch2_oj(3,835)=0 exch2_neighbourId(4,835)=834 exch2_iLo(4,835)=0 exch2_iHi(4,835)=0 exch2_jLo(4,835)=0 exch2_jHi(4,835)=52 exch2_opposingSend(4,835)=3 exch2_pij(1,4,835)=1 exch2_pij(2,4,835)=0 exch2_pij(3,4,835)=0 exch2_pij(4,4,835)=1 exch2_oi(4,835)=0 exch2_oj(4,835)=0 RETURN END SUBROUTINE W2_E2SETUP_836 C Topology for tile 836 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(836)=34 exch2_tNy(836)=51 exch2_tBasex(836)=340 exch2_tBasey(836)=255 exch2_txGlobalo(836)=2891 exch2_tyGlobalo(836)=256 exch2_isWedge(836)=0 exch2_isNedge(836)=0 exch2_isEedge(836)=0 exch2_isSedge(836)=0 exch2_myFace(836)=6 exch2_mydNx(836)=510 exch2_mydNy(836)=510 exch2_nNeighbours(836)=4 exch2_neighbourId(1,836)=851 exch2_iLo(1,836)=0 exch2_iHi(1,836)=35 exch2_jLo(1,836)=52 exch2_jHi(1,836)=52 exch2_opposingSend(1,836)=2 exch2_pij(1,1,836)=1 exch2_pij(2,1,836)=0 exch2_pij(3,1,836)=0 exch2_pij(4,1,836)=1 exch2_oi(1,836)=0 exch2_oj(1,836)=0 exch2_neighbourId(2,836)=821 exch2_iLo(2,836)=0 exch2_iHi(2,836)=35 exch2_jLo(2,836)=0 exch2_jHi(2,836)=0 exch2_opposingSend(2,836)=1 exch2_pij(1,2,836)=1 exch2_pij(2,2,836)=0 exch2_pij(3,2,836)=0 exch2_pij(4,2,836)=1 exch2_oi(2,836)=0 exch2_oj(2,836)=0 exch2_neighbourId(3,836)=837 exch2_iLo(3,836)=35 exch2_iHi(3,836)=35 exch2_jLo(3,836)=0 exch2_jHi(3,836)=52 exch2_opposingSend(3,836)=4 exch2_pij(1,3,836)=1 exch2_pij(2,3,836)=0 exch2_pij(3,3,836)=0 exch2_pij(4,3,836)=1 exch2_oi(3,836)=0 exch2_oj(3,836)=0 exch2_neighbourId(4,836)=835 exch2_iLo(4,836)=0 exch2_iHi(4,836)=0 exch2_jLo(4,836)=0 exch2_jHi(4,836)=52 exch2_opposingSend(4,836)=3 exch2_pij(1,4,836)=1 exch2_pij(2,4,836)=0 exch2_pij(3,4,836)=0 exch2_pij(4,4,836)=1 exch2_oi(4,836)=0 exch2_oj(4,836)=0 RETURN END SUBROUTINE W2_E2SETUP_837 C Topology for tile 837 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(837)=34 exch2_tNy(837)=51 exch2_tBasex(837)=374 exch2_tBasey(837)=255 exch2_txGlobalo(837)=2925 exch2_tyGlobalo(837)=256 exch2_isWedge(837)=0 exch2_isNedge(837)=0 exch2_isEedge(837)=0 exch2_isSedge(837)=0 exch2_myFace(837)=6 exch2_mydNx(837)=510 exch2_mydNy(837)=510 exch2_nNeighbours(837)=4 exch2_neighbourId(1,837)=852 exch2_iLo(1,837)=0 exch2_iHi(1,837)=35 exch2_jLo(1,837)=52 exch2_jHi(1,837)=52 exch2_opposingSend(1,837)=2 exch2_pij(1,1,837)=1 exch2_pij(2,1,837)=0 exch2_pij(3,1,837)=0 exch2_pij(4,1,837)=1 exch2_oi(1,837)=0 exch2_oj(1,837)=0 exch2_neighbourId(2,837)=822 exch2_iLo(2,837)=0 exch2_iHi(2,837)=35 exch2_jLo(2,837)=0 exch2_jHi(2,837)=0 exch2_opposingSend(2,837)=1 exch2_pij(1,2,837)=1 exch2_pij(2,2,837)=0 exch2_pij(3,2,837)=0 exch2_pij(4,2,837)=1 exch2_oi(2,837)=0 exch2_oj(2,837)=0 exch2_neighbourId(3,837)=838 exch2_iLo(3,837)=35 exch2_iHi(3,837)=35 exch2_jLo(3,837)=0 exch2_jHi(3,837)=52 exch2_opposingSend(3,837)=4 exch2_pij(1,3,837)=1 exch2_pij(2,3,837)=0 exch2_pij(3,3,837)=0 exch2_pij(4,3,837)=1 exch2_oi(3,837)=0 exch2_oj(3,837)=0 exch2_neighbourId(4,837)=836 exch2_iLo(4,837)=0 exch2_iHi(4,837)=0 exch2_jLo(4,837)=0 exch2_jHi(4,837)=52 exch2_opposingSend(4,837)=3 exch2_pij(1,4,837)=1 exch2_pij(2,4,837)=0 exch2_pij(3,4,837)=0 exch2_pij(4,4,837)=1 exch2_oi(4,837)=0 exch2_oj(4,837)=0 RETURN END SUBROUTINE W2_E2SETUP_838 C Topology for tile 838 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(838)=34 exch2_tNy(838)=51 exch2_tBasex(838)=408 exch2_tBasey(838)=255 exch2_txGlobalo(838)=2959 exch2_tyGlobalo(838)=256 exch2_isWedge(838)=0 exch2_isNedge(838)=0 exch2_isEedge(838)=0 exch2_isSedge(838)=0 exch2_myFace(838)=6 exch2_mydNx(838)=510 exch2_mydNy(838)=510 exch2_nNeighbours(838)=4 exch2_neighbourId(1,838)=853 exch2_iLo(1,838)=0 exch2_iHi(1,838)=35 exch2_jLo(1,838)=52 exch2_jHi(1,838)=52 exch2_opposingSend(1,838)=2 exch2_pij(1,1,838)=1 exch2_pij(2,1,838)=0 exch2_pij(3,1,838)=0 exch2_pij(4,1,838)=1 exch2_oi(1,838)=0 exch2_oj(1,838)=0 exch2_neighbourId(2,838)=823 exch2_iLo(2,838)=0 exch2_iHi(2,838)=35 exch2_jLo(2,838)=0 exch2_jHi(2,838)=0 exch2_opposingSend(2,838)=1 exch2_pij(1,2,838)=1 exch2_pij(2,2,838)=0 exch2_pij(3,2,838)=0 exch2_pij(4,2,838)=1 exch2_oi(2,838)=0 exch2_oj(2,838)=0 exch2_neighbourId(3,838)=839 exch2_iLo(3,838)=35 exch2_iHi(3,838)=35 exch2_jLo(3,838)=0 exch2_jHi(3,838)=52 exch2_opposingSend(3,838)=4 exch2_pij(1,3,838)=1 exch2_pij(2,3,838)=0 exch2_pij(3,3,838)=0 exch2_pij(4,3,838)=1 exch2_oi(3,838)=0 exch2_oj(3,838)=0 exch2_neighbourId(4,838)=837 exch2_iLo(4,838)=0 exch2_iHi(4,838)=0 exch2_jLo(4,838)=0 exch2_jHi(4,838)=52 exch2_opposingSend(4,838)=3 exch2_pij(1,4,838)=1 exch2_pij(2,4,838)=0 exch2_pij(3,4,838)=0 exch2_pij(4,4,838)=1 exch2_oi(4,838)=0 exch2_oj(4,838)=0 RETURN END SUBROUTINE W2_E2SETUP_839 C Topology for tile 839 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(839)=34 exch2_tNy(839)=51 exch2_tBasex(839)=442 exch2_tBasey(839)=255 exch2_txGlobalo(839)=2993 exch2_tyGlobalo(839)=256 exch2_isWedge(839)=0 exch2_isNedge(839)=0 exch2_isEedge(839)=0 exch2_isSedge(839)=0 exch2_myFace(839)=6 exch2_mydNx(839)=510 exch2_mydNy(839)=510 exch2_nNeighbours(839)=4 exch2_neighbourId(1,839)=854 exch2_iLo(1,839)=0 exch2_iHi(1,839)=35 exch2_jLo(1,839)=52 exch2_jHi(1,839)=52 exch2_opposingSend(1,839)=2 exch2_pij(1,1,839)=1 exch2_pij(2,1,839)=0 exch2_pij(3,1,839)=0 exch2_pij(4,1,839)=1 exch2_oi(1,839)=0 exch2_oj(1,839)=0 exch2_neighbourId(2,839)=824 exch2_iLo(2,839)=0 exch2_iHi(2,839)=35 exch2_jLo(2,839)=0 exch2_jHi(2,839)=0 exch2_opposingSend(2,839)=1 exch2_pij(1,2,839)=1 exch2_pij(2,2,839)=0 exch2_pij(3,2,839)=0 exch2_pij(4,2,839)=1 exch2_oi(2,839)=0 exch2_oj(2,839)=0 exch2_neighbourId(3,839)=840 exch2_iLo(3,839)=35 exch2_iHi(3,839)=35 exch2_jLo(3,839)=0 exch2_jHi(3,839)=52 exch2_opposingSend(3,839)=5 exch2_pij(1,3,839)=1 exch2_pij(2,3,839)=0 exch2_pij(3,3,839)=0 exch2_pij(4,3,839)=1 exch2_oi(3,839)=0 exch2_oj(3,839)=0 exch2_neighbourId(4,839)=838 exch2_iLo(4,839)=0 exch2_iHi(4,839)=0 exch2_jLo(4,839)=0 exch2_jHi(4,839)=52 exch2_opposingSend(4,839)=3 exch2_pij(1,4,839)=1 exch2_pij(2,4,839)=0 exch2_pij(3,4,839)=0 exch2_pij(4,4,839)=1 exch2_oi(4,839)=0 exch2_oj(4,839)=0 RETURN END SUBROUTINE W2_E2SETUP_840 C Topology for tile 840 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(840)=34 exch2_tNy(840)=51 exch2_tBasex(840)=476 exch2_tBasey(840)=255 exch2_txGlobalo(840)=3027 exch2_tyGlobalo(840)=256 exch2_isWedge(840)=0 exch2_isNedge(840)=0 exch2_isEedge(840)=1 exch2_isSedge(840)=0 exch2_myFace(840)=6 exch2_mydNx(840)=510 exch2_mydNy(840)=510 exch2_nNeighbours(840)=5 exch2_neighbourId(1,840)=855 exch2_iLo(1,840)=0 exch2_iHi(1,840)=35 exch2_jLo(1,840)=52 exch2_jHi(1,840)=52 exch2_opposingSend(1,840)=2 exch2_pij(1,1,840)=1 exch2_pij(2,1,840)=0 exch2_pij(3,1,840)=0 exch2_pij(4,1,840)=1 exch2_oi(1,840)=0 exch2_oj(1,840)=0 exch2_neighbourId(2,840)=825 exch2_iLo(2,840)=0 exch2_iHi(2,840)=35 exch2_jLo(2,840)=0 exch2_jHi(2,840)=0 exch2_opposingSend(2,840)=1 exch2_pij(1,2,840)=1 exch2_pij(2,2,840)=0 exch2_pij(3,2,840)=0 exch2_pij(4,2,840)=1 exch2_oi(2,840)=0 exch2_oj(2,840)=0 exch2_neighbourId(3,840)=157 exch2_iLo(3,840)=35 exch2_iHi(3,840)=35 exch2_jLo(3,840)=17 exch2_jHi(3,840)=52 exch2_opposingSend(3,840)=2 exch2_pij(1,3,840)=0 exch2_pij(2,3,840)=1 exch2_pij(3,3,840)=-1 exch2_pij(4,3,840)=0 exch2_oi(3,840)=510 exch2_oj(3,840)=511 exch2_neighbourId(4,840)=158 exch2_iLo(4,840)=35 exch2_iHi(4,840)=35 exch2_jLo(4,840)=0 exch2_jHi(4,840)=18 exch2_opposingSend(4,840)=3 exch2_pij(1,4,840)=0 exch2_pij(2,4,840)=1 exch2_pij(3,4,840)=-1 exch2_pij(4,4,840)=0 exch2_oi(4,840)=510 exch2_oj(4,840)=511 exch2_neighbourId(5,840)=839 exch2_iLo(5,840)=0 exch2_iHi(5,840)=0 exch2_jLo(5,840)=0 exch2_jHi(5,840)=52 exch2_opposingSend(5,840)=3 exch2_pij(1,5,840)=1 exch2_pij(2,5,840)=0 exch2_pij(3,5,840)=0 exch2_pij(4,5,840)=1 exch2_oi(5,840)=0 exch2_oj(5,840)=0 RETURN END SUBROUTINE W2_E2SETUP_841 C Topology for tile 841 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(841)=34 exch2_tNy(841)=51 exch2_tBasex(841)=0 exch2_tBasey(841)=306 exch2_txGlobalo(841)=2551 exch2_tyGlobalo(841)=307 exch2_isWedge(841)=1 exch2_isNedge(841)=0 exch2_isEedge(841)=0 exch2_isSedge(841)=0 exch2_myFace(841)=6 exch2_mydNx(841)=510 exch2_mydNy(841)=510 exch2_nNeighbours(841)=4 exch2_neighbourId(1,841)=856 exch2_iLo(1,841)=0 exch2_iHi(1,841)=35 exch2_jLo(1,841)=52 exch2_jHi(1,841)=52 exch2_opposingSend(1,841)=2 exch2_pij(1,1,841)=1 exch2_pij(2,1,841)=0 exch2_pij(3,1,841)=0 exch2_pij(4,1,841)=1 exch2_oi(1,841)=0 exch2_oj(1,841)=0 exch2_neighbourId(2,841)=826 exch2_iLo(2,841)=0 exch2_iHi(2,841)=35 exch2_jLo(2,841)=0 exch2_jHi(2,841)=0 exch2_opposingSend(2,841)=1 exch2_pij(1,2,841)=1 exch2_pij(2,2,841)=0 exch2_pij(3,2,841)=0 exch2_pij(4,2,841)=1 exch2_oi(2,841)=0 exch2_oj(2,841)=0 exch2_neighbourId(3,841)=842 exch2_iLo(3,841)=35 exch2_iHi(3,841)=35 exch2_jLo(3,841)=0 exch2_jHi(3,841)=52 exch2_opposingSend(3,841)=4 exch2_pij(1,3,841)=1 exch2_pij(2,3,841)=0 exch2_pij(3,3,841)=0 exch2_pij(4,3,841)=1 exch2_oi(3,841)=0 exch2_oj(3,841)=0 exch2_neighbourId(4,841)=705 exch2_iLo(4,841)=0 exch2_iHi(4,841)=0 exch2_jLo(4,841)=0 exch2_jHi(4,841)=52 exch2_opposingSend(4,841)=3 exch2_pij(1,4,841)=1 exch2_pij(2,4,841)=0 exch2_pij(3,4,841)=0 exch2_pij(4,4,841)=1 exch2_oi(4,841)=-510 exch2_oj(4,841)=0 RETURN END SUBROUTINE W2_E2SETUP_842 C Topology for tile 842 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(842)=34 exch2_tNy(842)=51 exch2_tBasex(842)=34 exch2_tBasey(842)=306 exch2_txGlobalo(842)=2585 exch2_tyGlobalo(842)=307 exch2_isWedge(842)=0 exch2_isNedge(842)=0 exch2_isEedge(842)=0 exch2_isSedge(842)=0 exch2_myFace(842)=6 exch2_mydNx(842)=510 exch2_mydNy(842)=510 exch2_nNeighbours(842)=4 exch2_neighbourId(1,842)=857 exch2_iLo(1,842)=0 exch2_iHi(1,842)=35 exch2_jLo(1,842)=52 exch2_jHi(1,842)=52 exch2_opposingSend(1,842)=2 exch2_pij(1,1,842)=1 exch2_pij(2,1,842)=0 exch2_pij(3,1,842)=0 exch2_pij(4,1,842)=1 exch2_oi(1,842)=0 exch2_oj(1,842)=0 exch2_neighbourId(2,842)=827 exch2_iLo(2,842)=0 exch2_iHi(2,842)=35 exch2_jLo(2,842)=0 exch2_jHi(2,842)=0 exch2_opposingSend(2,842)=1 exch2_pij(1,2,842)=1 exch2_pij(2,2,842)=0 exch2_pij(3,2,842)=0 exch2_pij(4,2,842)=1 exch2_oi(2,842)=0 exch2_oj(2,842)=0 exch2_neighbourId(3,842)=843 exch2_iLo(3,842)=35 exch2_iHi(3,842)=35 exch2_jLo(3,842)=0 exch2_jHi(3,842)=52 exch2_opposingSend(3,842)=4 exch2_pij(1,3,842)=1 exch2_pij(2,3,842)=0 exch2_pij(3,3,842)=0 exch2_pij(4,3,842)=1 exch2_oi(3,842)=0 exch2_oj(3,842)=0 exch2_neighbourId(4,842)=841 exch2_iLo(4,842)=0 exch2_iHi(4,842)=0 exch2_jLo(4,842)=0 exch2_jHi(4,842)=52 exch2_opposingSend(4,842)=3 exch2_pij(1,4,842)=1 exch2_pij(2,4,842)=0 exch2_pij(3,4,842)=0 exch2_pij(4,4,842)=1 exch2_oi(4,842)=0 exch2_oj(4,842)=0 RETURN END SUBROUTINE W2_E2SETUP_843 C Topology for tile 843 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(843)=34 exch2_tNy(843)=51 exch2_tBasex(843)=68 exch2_tBasey(843)=306 exch2_txGlobalo(843)=2619 exch2_tyGlobalo(843)=307 exch2_isWedge(843)=0 exch2_isNedge(843)=0 exch2_isEedge(843)=0 exch2_isSedge(843)=0 exch2_myFace(843)=6 exch2_mydNx(843)=510 exch2_mydNy(843)=510 exch2_nNeighbours(843)=4 exch2_neighbourId(1,843)=858 exch2_iLo(1,843)=0 exch2_iHi(1,843)=35 exch2_jLo(1,843)=52 exch2_jHi(1,843)=52 exch2_opposingSend(1,843)=2 exch2_pij(1,1,843)=1 exch2_pij(2,1,843)=0 exch2_pij(3,1,843)=0 exch2_pij(4,1,843)=1 exch2_oi(1,843)=0 exch2_oj(1,843)=0 exch2_neighbourId(2,843)=828 exch2_iLo(2,843)=0 exch2_iHi(2,843)=35 exch2_jLo(2,843)=0 exch2_jHi(2,843)=0 exch2_opposingSend(2,843)=1 exch2_pij(1,2,843)=1 exch2_pij(2,2,843)=0 exch2_pij(3,2,843)=0 exch2_pij(4,2,843)=1 exch2_oi(2,843)=0 exch2_oj(2,843)=0 exch2_neighbourId(3,843)=844 exch2_iLo(3,843)=35 exch2_iHi(3,843)=35 exch2_jLo(3,843)=0 exch2_jHi(3,843)=52 exch2_opposingSend(3,843)=4 exch2_pij(1,3,843)=1 exch2_pij(2,3,843)=0 exch2_pij(3,3,843)=0 exch2_pij(4,3,843)=1 exch2_oi(3,843)=0 exch2_oj(3,843)=0 exch2_neighbourId(4,843)=842 exch2_iLo(4,843)=0 exch2_iHi(4,843)=0 exch2_jLo(4,843)=0 exch2_jHi(4,843)=52 exch2_opposingSend(4,843)=3 exch2_pij(1,4,843)=1 exch2_pij(2,4,843)=0 exch2_pij(3,4,843)=0 exch2_pij(4,4,843)=1 exch2_oi(4,843)=0 exch2_oj(4,843)=0 RETURN END SUBROUTINE W2_E2SETUP_844 C Topology for tile 844 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(844)=34 exch2_tNy(844)=51 exch2_tBasex(844)=102 exch2_tBasey(844)=306 exch2_txGlobalo(844)=2653 exch2_tyGlobalo(844)=307 exch2_isWedge(844)=0 exch2_isNedge(844)=0 exch2_isEedge(844)=0 exch2_isSedge(844)=0 exch2_myFace(844)=6 exch2_mydNx(844)=510 exch2_mydNy(844)=510 exch2_nNeighbours(844)=4 exch2_neighbourId(1,844)=859 exch2_iLo(1,844)=0 exch2_iHi(1,844)=35 exch2_jLo(1,844)=52 exch2_jHi(1,844)=52 exch2_opposingSend(1,844)=2 exch2_pij(1,1,844)=1 exch2_pij(2,1,844)=0 exch2_pij(3,1,844)=0 exch2_pij(4,1,844)=1 exch2_oi(1,844)=0 exch2_oj(1,844)=0 exch2_neighbourId(2,844)=829 exch2_iLo(2,844)=0 exch2_iHi(2,844)=35 exch2_jLo(2,844)=0 exch2_jHi(2,844)=0 exch2_opposingSend(2,844)=1 exch2_pij(1,2,844)=1 exch2_pij(2,2,844)=0 exch2_pij(3,2,844)=0 exch2_pij(4,2,844)=1 exch2_oi(2,844)=0 exch2_oj(2,844)=0 exch2_neighbourId(3,844)=845 exch2_iLo(3,844)=35 exch2_iHi(3,844)=35 exch2_jLo(3,844)=0 exch2_jHi(3,844)=52 exch2_opposingSend(3,844)=4 exch2_pij(1,3,844)=1 exch2_pij(2,3,844)=0 exch2_pij(3,3,844)=0 exch2_pij(4,3,844)=1 exch2_oi(3,844)=0 exch2_oj(3,844)=0 exch2_neighbourId(4,844)=843 exch2_iLo(4,844)=0 exch2_iHi(4,844)=0 exch2_jLo(4,844)=0 exch2_jHi(4,844)=52 exch2_opposingSend(4,844)=3 exch2_pij(1,4,844)=1 exch2_pij(2,4,844)=0 exch2_pij(3,4,844)=0 exch2_pij(4,4,844)=1 exch2_oi(4,844)=0 exch2_oj(4,844)=0 RETURN END SUBROUTINE W2_E2SETUP_845 C Topology for tile 845 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(845)=34 exch2_tNy(845)=51 exch2_tBasex(845)=136 exch2_tBasey(845)=306 exch2_txGlobalo(845)=2687 exch2_tyGlobalo(845)=307 exch2_isWedge(845)=0 exch2_isNedge(845)=0 exch2_isEedge(845)=0 exch2_isSedge(845)=0 exch2_myFace(845)=6 exch2_mydNx(845)=510 exch2_mydNy(845)=510 exch2_nNeighbours(845)=4 exch2_neighbourId(1,845)=860 exch2_iLo(1,845)=0 exch2_iHi(1,845)=35 exch2_jLo(1,845)=52 exch2_jHi(1,845)=52 exch2_opposingSend(1,845)=2 exch2_pij(1,1,845)=1 exch2_pij(2,1,845)=0 exch2_pij(3,1,845)=0 exch2_pij(4,1,845)=1 exch2_oi(1,845)=0 exch2_oj(1,845)=0 exch2_neighbourId(2,845)=830 exch2_iLo(2,845)=0 exch2_iHi(2,845)=35 exch2_jLo(2,845)=0 exch2_jHi(2,845)=0 exch2_opposingSend(2,845)=1 exch2_pij(1,2,845)=1 exch2_pij(2,2,845)=0 exch2_pij(3,2,845)=0 exch2_pij(4,2,845)=1 exch2_oi(2,845)=0 exch2_oj(2,845)=0 exch2_neighbourId(3,845)=846 exch2_iLo(3,845)=35 exch2_iHi(3,845)=35 exch2_jLo(3,845)=0 exch2_jHi(3,845)=52 exch2_opposingSend(3,845)=4 exch2_pij(1,3,845)=1 exch2_pij(2,3,845)=0 exch2_pij(3,3,845)=0 exch2_pij(4,3,845)=1 exch2_oi(3,845)=0 exch2_oj(3,845)=0 exch2_neighbourId(4,845)=844 exch2_iLo(4,845)=0 exch2_iHi(4,845)=0 exch2_jLo(4,845)=0 exch2_jHi(4,845)=52 exch2_opposingSend(4,845)=3 exch2_pij(1,4,845)=1 exch2_pij(2,4,845)=0 exch2_pij(3,4,845)=0 exch2_pij(4,4,845)=1 exch2_oi(4,845)=0 exch2_oj(4,845)=0 RETURN END SUBROUTINE W2_E2SETUP_846 C Topology for tile 846 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(846)=34 exch2_tNy(846)=51 exch2_tBasex(846)=170 exch2_tBasey(846)=306 exch2_txGlobalo(846)=2721 exch2_tyGlobalo(846)=307 exch2_isWedge(846)=0 exch2_isNedge(846)=0 exch2_isEedge(846)=0 exch2_isSedge(846)=0 exch2_myFace(846)=6 exch2_mydNx(846)=510 exch2_mydNy(846)=510 exch2_nNeighbours(846)=4 exch2_neighbourId(1,846)=861 exch2_iLo(1,846)=0 exch2_iHi(1,846)=35 exch2_jLo(1,846)=52 exch2_jHi(1,846)=52 exch2_opposingSend(1,846)=2 exch2_pij(1,1,846)=1 exch2_pij(2,1,846)=0 exch2_pij(3,1,846)=0 exch2_pij(4,1,846)=1 exch2_oi(1,846)=0 exch2_oj(1,846)=0 exch2_neighbourId(2,846)=831 exch2_iLo(2,846)=0 exch2_iHi(2,846)=35 exch2_jLo(2,846)=0 exch2_jHi(2,846)=0 exch2_opposingSend(2,846)=1 exch2_pij(1,2,846)=1 exch2_pij(2,2,846)=0 exch2_pij(3,2,846)=0 exch2_pij(4,2,846)=1 exch2_oi(2,846)=0 exch2_oj(2,846)=0 exch2_neighbourId(3,846)=847 exch2_iLo(3,846)=35 exch2_iHi(3,846)=35 exch2_jLo(3,846)=0 exch2_jHi(3,846)=52 exch2_opposingSend(3,846)=4 exch2_pij(1,3,846)=1 exch2_pij(2,3,846)=0 exch2_pij(3,3,846)=0 exch2_pij(4,3,846)=1 exch2_oi(3,846)=0 exch2_oj(3,846)=0 exch2_neighbourId(4,846)=845 exch2_iLo(4,846)=0 exch2_iHi(4,846)=0 exch2_jLo(4,846)=0 exch2_jHi(4,846)=52 exch2_opposingSend(4,846)=3 exch2_pij(1,4,846)=1 exch2_pij(2,4,846)=0 exch2_pij(3,4,846)=0 exch2_pij(4,4,846)=1 exch2_oi(4,846)=0 exch2_oj(4,846)=0 RETURN END SUBROUTINE W2_E2SETUP_847 C Topology for tile 847 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(847)=34 exch2_tNy(847)=51 exch2_tBasex(847)=204 exch2_tBasey(847)=306 exch2_txGlobalo(847)=2755 exch2_tyGlobalo(847)=307 exch2_isWedge(847)=0 exch2_isNedge(847)=0 exch2_isEedge(847)=0 exch2_isSedge(847)=0 exch2_myFace(847)=6 exch2_mydNx(847)=510 exch2_mydNy(847)=510 exch2_nNeighbours(847)=4 exch2_neighbourId(1,847)=862 exch2_iLo(1,847)=0 exch2_iHi(1,847)=35 exch2_jLo(1,847)=52 exch2_jHi(1,847)=52 exch2_opposingSend(1,847)=2 exch2_pij(1,1,847)=1 exch2_pij(2,1,847)=0 exch2_pij(3,1,847)=0 exch2_pij(4,1,847)=1 exch2_oi(1,847)=0 exch2_oj(1,847)=0 exch2_neighbourId(2,847)=832 exch2_iLo(2,847)=0 exch2_iHi(2,847)=35 exch2_jLo(2,847)=0 exch2_jHi(2,847)=0 exch2_opposingSend(2,847)=1 exch2_pij(1,2,847)=1 exch2_pij(2,2,847)=0 exch2_pij(3,2,847)=0 exch2_pij(4,2,847)=1 exch2_oi(2,847)=0 exch2_oj(2,847)=0 exch2_neighbourId(3,847)=848 exch2_iLo(3,847)=35 exch2_iHi(3,847)=35 exch2_jLo(3,847)=0 exch2_jHi(3,847)=52 exch2_opposingSend(3,847)=4 exch2_pij(1,3,847)=1 exch2_pij(2,3,847)=0 exch2_pij(3,3,847)=0 exch2_pij(4,3,847)=1 exch2_oi(3,847)=0 exch2_oj(3,847)=0 exch2_neighbourId(4,847)=846 exch2_iLo(4,847)=0 exch2_iHi(4,847)=0 exch2_jLo(4,847)=0 exch2_jHi(4,847)=52 exch2_opposingSend(4,847)=3 exch2_pij(1,4,847)=1 exch2_pij(2,4,847)=0 exch2_pij(3,4,847)=0 exch2_pij(4,4,847)=1 exch2_oi(4,847)=0 exch2_oj(4,847)=0 RETURN END SUBROUTINE W2_E2SETUP_848 C Topology for tile 848 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(848)=34 exch2_tNy(848)=51 exch2_tBasex(848)=238 exch2_tBasey(848)=306 exch2_txGlobalo(848)=2789 exch2_tyGlobalo(848)=307 exch2_isWedge(848)=0 exch2_isNedge(848)=0 exch2_isEedge(848)=0 exch2_isSedge(848)=0 exch2_myFace(848)=6 exch2_mydNx(848)=510 exch2_mydNy(848)=510 exch2_nNeighbours(848)=4 exch2_neighbourId(1,848)=863 exch2_iLo(1,848)=0 exch2_iHi(1,848)=35 exch2_jLo(1,848)=52 exch2_jHi(1,848)=52 exch2_opposingSend(1,848)=2 exch2_pij(1,1,848)=1 exch2_pij(2,1,848)=0 exch2_pij(3,1,848)=0 exch2_pij(4,1,848)=1 exch2_oi(1,848)=0 exch2_oj(1,848)=0 exch2_neighbourId(2,848)=833 exch2_iLo(2,848)=0 exch2_iHi(2,848)=35 exch2_jLo(2,848)=0 exch2_jHi(2,848)=0 exch2_opposingSend(2,848)=1 exch2_pij(1,2,848)=1 exch2_pij(2,2,848)=0 exch2_pij(3,2,848)=0 exch2_pij(4,2,848)=1 exch2_oi(2,848)=0 exch2_oj(2,848)=0 exch2_neighbourId(3,848)=849 exch2_iLo(3,848)=35 exch2_iHi(3,848)=35 exch2_jLo(3,848)=0 exch2_jHi(3,848)=52 exch2_opposingSend(3,848)=4 exch2_pij(1,3,848)=1 exch2_pij(2,3,848)=0 exch2_pij(3,3,848)=0 exch2_pij(4,3,848)=1 exch2_oi(3,848)=0 exch2_oj(3,848)=0 exch2_neighbourId(4,848)=847 exch2_iLo(4,848)=0 exch2_iHi(4,848)=0 exch2_jLo(4,848)=0 exch2_jHi(4,848)=52 exch2_opposingSend(4,848)=3 exch2_pij(1,4,848)=1 exch2_pij(2,4,848)=0 exch2_pij(3,4,848)=0 exch2_pij(4,4,848)=1 exch2_oi(4,848)=0 exch2_oj(4,848)=0 RETURN END SUBROUTINE W2_E2SETUP_849 C Topology for tile 849 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(849)=34 exch2_tNy(849)=51 exch2_tBasex(849)=272 exch2_tBasey(849)=306 exch2_txGlobalo(849)=2823 exch2_tyGlobalo(849)=307 exch2_isWedge(849)=0 exch2_isNedge(849)=0 exch2_isEedge(849)=0 exch2_isSedge(849)=0 exch2_myFace(849)=6 exch2_mydNx(849)=510 exch2_mydNy(849)=510 exch2_nNeighbours(849)=4 exch2_neighbourId(1,849)=864 exch2_iLo(1,849)=0 exch2_iHi(1,849)=35 exch2_jLo(1,849)=52 exch2_jHi(1,849)=52 exch2_opposingSend(1,849)=2 exch2_pij(1,1,849)=1 exch2_pij(2,1,849)=0 exch2_pij(3,1,849)=0 exch2_pij(4,1,849)=1 exch2_oi(1,849)=0 exch2_oj(1,849)=0 exch2_neighbourId(2,849)=834 exch2_iLo(2,849)=0 exch2_iHi(2,849)=35 exch2_jLo(2,849)=0 exch2_jHi(2,849)=0 exch2_opposingSend(2,849)=1 exch2_pij(1,2,849)=1 exch2_pij(2,2,849)=0 exch2_pij(3,2,849)=0 exch2_pij(4,2,849)=1 exch2_oi(2,849)=0 exch2_oj(2,849)=0 exch2_neighbourId(3,849)=850 exch2_iLo(3,849)=35 exch2_iHi(3,849)=35 exch2_jLo(3,849)=0 exch2_jHi(3,849)=52 exch2_opposingSend(3,849)=4 exch2_pij(1,3,849)=1 exch2_pij(2,3,849)=0 exch2_pij(3,3,849)=0 exch2_pij(4,3,849)=1 exch2_oi(3,849)=0 exch2_oj(3,849)=0 exch2_neighbourId(4,849)=848 exch2_iLo(4,849)=0 exch2_iHi(4,849)=0 exch2_jLo(4,849)=0 exch2_jHi(4,849)=52 exch2_opposingSend(4,849)=3 exch2_pij(1,4,849)=1 exch2_pij(2,4,849)=0 exch2_pij(3,4,849)=0 exch2_pij(4,4,849)=1 exch2_oi(4,849)=0 exch2_oj(4,849)=0 RETURN END SUBROUTINE W2_E2SETUP_850 C Topology for tile 850 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(850)=34 exch2_tNy(850)=51 exch2_tBasex(850)=306 exch2_tBasey(850)=306 exch2_txGlobalo(850)=2857 exch2_tyGlobalo(850)=307 exch2_isWedge(850)=0 exch2_isNedge(850)=0 exch2_isEedge(850)=0 exch2_isSedge(850)=0 exch2_myFace(850)=6 exch2_mydNx(850)=510 exch2_mydNy(850)=510 exch2_nNeighbours(850)=4 exch2_neighbourId(1,850)=865 exch2_iLo(1,850)=0 exch2_iHi(1,850)=35 exch2_jLo(1,850)=52 exch2_jHi(1,850)=52 exch2_opposingSend(1,850)=2 exch2_pij(1,1,850)=1 exch2_pij(2,1,850)=0 exch2_pij(3,1,850)=0 exch2_pij(4,1,850)=1 exch2_oi(1,850)=0 exch2_oj(1,850)=0 exch2_neighbourId(2,850)=835 exch2_iLo(2,850)=0 exch2_iHi(2,850)=35 exch2_jLo(2,850)=0 exch2_jHi(2,850)=0 exch2_opposingSend(2,850)=1 exch2_pij(1,2,850)=1 exch2_pij(2,2,850)=0 exch2_pij(3,2,850)=0 exch2_pij(4,2,850)=1 exch2_oi(2,850)=0 exch2_oj(2,850)=0 exch2_neighbourId(3,850)=851 exch2_iLo(3,850)=35 exch2_iHi(3,850)=35 exch2_jLo(3,850)=0 exch2_jHi(3,850)=52 exch2_opposingSend(3,850)=4 exch2_pij(1,3,850)=1 exch2_pij(2,3,850)=0 exch2_pij(3,3,850)=0 exch2_pij(4,3,850)=1 exch2_oi(3,850)=0 exch2_oj(3,850)=0 exch2_neighbourId(4,850)=849 exch2_iLo(4,850)=0 exch2_iHi(4,850)=0 exch2_jLo(4,850)=0 exch2_jHi(4,850)=52 exch2_opposingSend(4,850)=3 exch2_pij(1,4,850)=1 exch2_pij(2,4,850)=0 exch2_pij(3,4,850)=0 exch2_pij(4,4,850)=1 exch2_oi(4,850)=0 exch2_oj(4,850)=0 RETURN END SUBROUTINE W2_E2SETUP_851 C Topology for tile 851 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(851)=34 exch2_tNy(851)=51 exch2_tBasex(851)=340 exch2_tBasey(851)=306 exch2_txGlobalo(851)=2891 exch2_tyGlobalo(851)=307 exch2_isWedge(851)=0 exch2_isNedge(851)=0 exch2_isEedge(851)=0 exch2_isSedge(851)=0 exch2_myFace(851)=6 exch2_mydNx(851)=510 exch2_mydNy(851)=510 exch2_nNeighbours(851)=4 exch2_neighbourId(1,851)=866 exch2_iLo(1,851)=0 exch2_iHi(1,851)=35 exch2_jLo(1,851)=52 exch2_jHi(1,851)=52 exch2_opposingSend(1,851)=2 exch2_pij(1,1,851)=1 exch2_pij(2,1,851)=0 exch2_pij(3,1,851)=0 exch2_pij(4,1,851)=1 exch2_oi(1,851)=0 exch2_oj(1,851)=0 exch2_neighbourId(2,851)=836 exch2_iLo(2,851)=0 exch2_iHi(2,851)=35 exch2_jLo(2,851)=0 exch2_jHi(2,851)=0 exch2_opposingSend(2,851)=1 exch2_pij(1,2,851)=1 exch2_pij(2,2,851)=0 exch2_pij(3,2,851)=0 exch2_pij(4,2,851)=1 exch2_oi(2,851)=0 exch2_oj(2,851)=0 exch2_neighbourId(3,851)=852 exch2_iLo(3,851)=35 exch2_iHi(3,851)=35 exch2_jLo(3,851)=0 exch2_jHi(3,851)=52 exch2_opposingSend(3,851)=4 exch2_pij(1,3,851)=1 exch2_pij(2,3,851)=0 exch2_pij(3,3,851)=0 exch2_pij(4,3,851)=1 exch2_oi(3,851)=0 exch2_oj(3,851)=0 exch2_neighbourId(4,851)=850 exch2_iLo(4,851)=0 exch2_iHi(4,851)=0 exch2_jLo(4,851)=0 exch2_jHi(4,851)=52 exch2_opposingSend(4,851)=3 exch2_pij(1,4,851)=1 exch2_pij(2,4,851)=0 exch2_pij(3,4,851)=0 exch2_pij(4,4,851)=1 exch2_oi(4,851)=0 exch2_oj(4,851)=0 RETURN END SUBROUTINE W2_E2SETUP_852 C Topology for tile 852 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(852)=34 exch2_tNy(852)=51 exch2_tBasex(852)=374 exch2_tBasey(852)=306 exch2_txGlobalo(852)=2925 exch2_tyGlobalo(852)=307 exch2_isWedge(852)=0 exch2_isNedge(852)=0 exch2_isEedge(852)=0 exch2_isSedge(852)=0 exch2_myFace(852)=6 exch2_mydNx(852)=510 exch2_mydNy(852)=510 exch2_nNeighbours(852)=4 exch2_neighbourId(1,852)=867 exch2_iLo(1,852)=0 exch2_iHi(1,852)=35 exch2_jLo(1,852)=52 exch2_jHi(1,852)=52 exch2_opposingSend(1,852)=2 exch2_pij(1,1,852)=1 exch2_pij(2,1,852)=0 exch2_pij(3,1,852)=0 exch2_pij(4,1,852)=1 exch2_oi(1,852)=0 exch2_oj(1,852)=0 exch2_neighbourId(2,852)=837 exch2_iLo(2,852)=0 exch2_iHi(2,852)=35 exch2_jLo(2,852)=0 exch2_jHi(2,852)=0 exch2_opposingSend(2,852)=1 exch2_pij(1,2,852)=1 exch2_pij(2,2,852)=0 exch2_pij(3,2,852)=0 exch2_pij(4,2,852)=1 exch2_oi(2,852)=0 exch2_oj(2,852)=0 exch2_neighbourId(3,852)=853 exch2_iLo(3,852)=35 exch2_iHi(3,852)=35 exch2_jLo(3,852)=0 exch2_jHi(3,852)=52 exch2_opposingSend(3,852)=4 exch2_pij(1,3,852)=1 exch2_pij(2,3,852)=0 exch2_pij(3,3,852)=0 exch2_pij(4,3,852)=1 exch2_oi(3,852)=0 exch2_oj(3,852)=0 exch2_neighbourId(4,852)=851 exch2_iLo(4,852)=0 exch2_iHi(4,852)=0 exch2_jLo(4,852)=0 exch2_jHi(4,852)=52 exch2_opposingSend(4,852)=3 exch2_pij(1,4,852)=1 exch2_pij(2,4,852)=0 exch2_pij(3,4,852)=0 exch2_pij(4,4,852)=1 exch2_oi(4,852)=0 exch2_oj(4,852)=0 RETURN END SUBROUTINE W2_E2SETUP_853 C Topology for tile 853 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(853)=34 exch2_tNy(853)=51 exch2_tBasex(853)=408 exch2_tBasey(853)=306 exch2_txGlobalo(853)=2959 exch2_tyGlobalo(853)=307 exch2_isWedge(853)=0 exch2_isNedge(853)=0 exch2_isEedge(853)=0 exch2_isSedge(853)=0 exch2_myFace(853)=6 exch2_mydNx(853)=510 exch2_mydNy(853)=510 exch2_nNeighbours(853)=4 exch2_neighbourId(1,853)=868 exch2_iLo(1,853)=0 exch2_iHi(1,853)=35 exch2_jLo(1,853)=52 exch2_jHi(1,853)=52 exch2_opposingSend(1,853)=2 exch2_pij(1,1,853)=1 exch2_pij(2,1,853)=0 exch2_pij(3,1,853)=0 exch2_pij(4,1,853)=1 exch2_oi(1,853)=0 exch2_oj(1,853)=0 exch2_neighbourId(2,853)=838 exch2_iLo(2,853)=0 exch2_iHi(2,853)=35 exch2_jLo(2,853)=0 exch2_jHi(2,853)=0 exch2_opposingSend(2,853)=1 exch2_pij(1,2,853)=1 exch2_pij(2,2,853)=0 exch2_pij(3,2,853)=0 exch2_pij(4,2,853)=1 exch2_oi(2,853)=0 exch2_oj(2,853)=0 exch2_neighbourId(3,853)=854 exch2_iLo(3,853)=35 exch2_iHi(3,853)=35 exch2_jLo(3,853)=0 exch2_jHi(3,853)=52 exch2_opposingSend(3,853)=4 exch2_pij(1,3,853)=1 exch2_pij(2,3,853)=0 exch2_pij(3,3,853)=0 exch2_pij(4,3,853)=1 exch2_oi(3,853)=0 exch2_oj(3,853)=0 exch2_neighbourId(4,853)=852 exch2_iLo(4,853)=0 exch2_iHi(4,853)=0 exch2_jLo(4,853)=0 exch2_jHi(4,853)=52 exch2_opposingSend(4,853)=3 exch2_pij(1,4,853)=1 exch2_pij(2,4,853)=0 exch2_pij(3,4,853)=0 exch2_pij(4,4,853)=1 exch2_oi(4,853)=0 exch2_oj(4,853)=0 RETURN END SUBROUTINE W2_E2SETUP_854 C Topology for tile 854 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(854)=34 exch2_tNy(854)=51 exch2_tBasex(854)=442 exch2_tBasey(854)=306 exch2_txGlobalo(854)=2993 exch2_tyGlobalo(854)=307 exch2_isWedge(854)=0 exch2_isNedge(854)=0 exch2_isEedge(854)=0 exch2_isSedge(854)=0 exch2_myFace(854)=6 exch2_mydNx(854)=510 exch2_mydNy(854)=510 exch2_nNeighbours(854)=4 exch2_neighbourId(1,854)=869 exch2_iLo(1,854)=0 exch2_iHi(1,854)=35 exch2_jLo(1,854)=52 exch2_jHi(1,854)=52 exch2_opposingSend(1,854)=2 exch2_pij(1,1,854)=1 exch2_pij(2,1,854)=0 exch2_pij(3,1,854)=0 exch2_pij(4,1,854)=1 exch2_oi(1,854)=0 exch2_oj(1,854)=0 exch2_neighbourId(2,854)=839 exch2_iLo(2,854)=0 exch2_iHi(2,854)=35 exch2_jLo(2,854)=0 exch2_jHi(2,854)=0 exch2_opposingSend(2,854)=1 exch2_pij(1,2,854)=1 exch2_pij(2,2,854)=0 exch2_pij(3,2,854)=0 exch2_pij(4,2,854)=1 exch2_oi(2,854)=0 exch2_oj(2,854)=0 exch2_neighbourId(3,854)=855 exch2_iLo(3,854)=35 exch2_iHi(3,854)=35 exch2_jLo(3,854)=0 exch2_jHi(3,854)=52 exch2_opposingSend(3,854)=5 exch2_pij(1,3,854)=1 exch2_pij(2,3,854)=0 exch2_pij(3,3,854)=0 exch2_pij(4,3,854)=1 exch2_oi(3,854)=0 exch2_oj(3,854)=0 exch2_neighbourId(4,854)=853 exch2_iLo(4,854)=0 exch2_iHi(4,854)=0 exch2_jLo(4,854)=0 exch2_jHi(4,854)=52 exch2_opposingSend(4,854)=3 exch2_pij(1,4,854)=1 exch2_pij(2,4,854)=0 exch2_pij(3,4,854)=0 exch2_pij(4,4,854)=1 exch2_oi(4,854)=0 exch2_oj(4,854)=0 RETURN END SUBROUTINE W2_E2SETUP_855 C Topology for tile 855 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(855)=34 exch2_tNy(855)=51 exch2_tBasex(855)=476 exch2_tBasey(855)=306 exch2_txGlobalo(855)=3027 exch2_tyGlobalo(855)=307 exch2_isWedge(855)=0 exch2_isNedge(855)=0 exch2_isEedge(855)=1 exch2_isSedge(855)=0 exch2_myFace(855)=6 exch2_mydNx(855)=510 exch2_mydNy(855)=510 exch2_nNeighbours(855)=5 exch2_neighbourId(1,855)=870 exch2_iLo(1,855)=0 exch2_iHi(1,855)=35 exch2_jLo(1,855)=52 exch2_jHi(1,855)=52 exch2_opposingSend(1,855)=2 exch2_pij(1,1,855)=1 exch2_pij(2,1,855)=0 exch2_pij(3,1,855)=0 exch2_pij(4,1,855)=1 exch2_oi(1,855)=0 exch2_oj(1,855)=0 exch2_neighbourId(2,855)=840 exch2_iLo(2,855)=0 exch2_iHi(2,855)=35 exch2_jLo(2,855)=0 exch2_jHi(2,855)=0 exch2_opposingSend(2,855)=1 exch2_pij(1,2,855)=1 exch2_pij(2,2,855)=0 exch2_pij(3,2,855)=0 exch2_pij(4,2,855)=1 exch2_oi(2,855)=0 exch2_oj(2,855)=0 exch2_neighbourId(3,855)=155 exch2_iLo(3,855)=35 exch2_iHi(3,855)=35 exch2_jLo(3,855)=34 exch2_jHi(3,855)=52 exch2_opposingSend(3,855)=2 exch2_pij(1,3,855)=0 exch2_pij(2,3,855)=1 exch2_pij(3,3,855)=-1 exch2_pij(4,3,855)=0 exch2_oi(3,855)=510 exch2_oj(3,855)=511 exch2_neighbourId(4,855)=156 exch2_iLo(4,855)=35 exch2_iHi(4,855)=35 exch2_jLo(4,855)=0 exch2_jHi(4,855)=35 exch2_opposingSend(4,855)=2 exch2_pij(1,4,855)=0 exch2_pij(2,4,855)=1 exch2_pij(3,4,855)=-1 exch2_pij(4,4,855)=0 exch2_oi(4,855)=510 exch2_oj(4,855)=511 exch2_neighbourId(5,855)=854 exch2_iLo(5,855)=0 exch2_iHi(5,855)=0 exch2_jLo(5,855)=0 exch2_jHi(5,855)=52 exch2_opposingSend(5,855)=3 exch2_pij(1,5,855)=1 exch2_pij(2,5,855)=0 exch2_pij(3,5,855)=0 exch2_pij(4,5,855)=1 exch2_oi(5,855)=0 exch2_oj(5,855)=0 RETURN END SUBROUTINE W2_E2SETUP_856 C Topology for tile 856 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(856)=34 exch2_tNy(856)=51 exch2_tBasex(856)=0 exch2_tBasey(856)=357 exch2_txGlobalo(856)=2551 exch2_tyGlobalo(856)=358 exch2_isWedge(856)=1 exch2_isNedge(856)=0 exch2_isEedge(856)=0 exch2_isSedge(856)=0 exch2_myFace(856)=6 exch2_mydNx(856)=510 exch2_mydNy(856)=510 exch2_nNeighbours(856)=4 exch2_neighbourId(1,856)=871 exch2_iLo(1,856)=0 exch2_iHi(1,856)=35 exch2_jLo(1,856)=52 exch2_jHi(1,856)=52 exch2_opposingSend(1,856)=2 exch2_pij(1,1,856)=1 exch2_pij(2,1,856)=0 exch2_pij(3,1,856)=0 exch2_pij(4,1,856)=1 exch2_oi(1,856)=0 exch2_oj(1,856)=0 exch2_neighbourId(2,856)=841 exch2_iLo(2,856)=0 exch2_iHi(2,856)=35 exch2_jLo(2,856)=0 exch2_jHi(2,856)=0 exch2_opposingSend(2,856)=1 exch2_pij(1,2,856)=1 exch2_pij(2,2,856)=0 exch2_pij(3,2,856)=0 exch2_pij(4,2,856)=1 exch2_oi(2,856)=0 exch2_oj(2,856)=0 exch2_neighbourId(3,856)=857 exch2_iLo(3,856)=35 exch2_iHi(3,856)=35 exch2_jLo(3,856)=0 exch2_jHi(3,856)=52 exch2_opposingSend(3,856)=4 exch2_pij(1,3,856)=1 exch2_pij(2,3,856)=0 exch2_pij(3,3,856)=0 exch2_pij(4,3,856)=1 exch2_oi(3,856)=0 exch2_oj(3,856)=0 exch2_neighbourId(4,856)=720 exch2_iLo(4,856)=0 exch2_iHi(4,856)=0 exch2_jLo(4,856)=0 exch2_jHi(4,856)=52 exch2_opposingSend(4,856)=3 exch2_pij(1,4,856)=1 exch2_pij(2,4,856)=0 exch2_pij(3,4,856)=0 exch2_pij(4,4,856)=1 exch2_oi(4,856)=-510 exch2_oj(4,856)=0 RETURN END SUBROUTINE W2_E2SETUP_857 C Topology for tile 857 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(857)=34 exch2_tNy(857)=51 exch2_tBasex(857)=34 exch2_tBasey(857)=357 exch2_txGlobalo(857)=2585 exch2_tyGlobalo(857)=358 exch2_isWedge(857)=0 exch2_isNedge(857)=0 exch2_isEedge(857)=0 exch2_isSedge(857)=0 exch2_myFace(857)=6 exch2_mydNx(857)=510 exch2_mydNy(857)=510 exch2_nNeighbours(857)=4 exch2_neighbourId(1,857)=872 exch2_iLo(1,857)=0 exch2_iHi(1,857)=35 exch2_jLo(1,857)=52 exch2_jHi(1,857)=52 exch2_opposingSend(1,857)=2 exch2_pij(1,1,857)=1 exch2_pij(2,1,857)=0 exch2_pij(3,1,857)=0 exch2_pij(4,1,857)=1 exch2_oi(1,857)=0 exch2_oj(1,857)=0 exch2_neighbourId(2,857)=842 exch2_iLo(2,857)=0 exch2_iHi(2,857)=35 exch2_jLo(2,857)=0 exch2_jHi(2,857)=0 exch2_opposingSend(2,857)=1 exch2_pij(1,2,857)=1 exch2_pij(2,2,857)=0 exch2_pij(3,2,857)=0 exch2_pij(4,2,857)=1 exch2_oi(2,857)=0 exch2_oj(2,857)=0 exch2_neighbourId(3,857)=858 exch2_iLo(3,857)=35 exch2_iHi(3,857)=35 exch2_jLo(3,857)=0 exch2_jHi(3,857)=52 exch2_opposingSend(3,857)=4 exch2_pij(1,3,857)=1 exch2_pij(2,3,857)=0 exch2_pij(3,3,857)=0 exch2_pij(4,3,857)=1 exch2_oi(3,857)=0 exch2_oj(3,857)=0 exch2_neighbourId(4,857)=856 exch2_iLo(4,857)=0 exch2_iHi(4,857)=0 exch2_jLo(4,857)=0 exch2_jHi(4,857)=52 exch2_opposingSend(4,857)=3 exch2_pij(1,4,857)=1 exch2_pij(2,4,857)=0 exch2_pij(3,4,857)=0 exch2_pij(4,4,857)=1 exch2_oi(4,857)=0 exch2_oj(4,857)=0 RETURN END SUBROUTINE W2_E2SETUP_858 C Topology for tile 858 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(858)=34 exch2_tNy(858)=51 exch2_tBasex(858)=68 exch2_tBasey(858)=357 exch2_txGlobalo(858)=2619 exch2_tyGlobalo(858)=358 exch2_isWedge(858)=0 exch2_isNedge(858)=0 exch2_isEedge(858)=0 exch2_isSedge(858)=0 exch2_myFace(858)=6 exch2_mydNx(858)=510 exch2_mydNy(858)=510 exch2_nNeighbours(858)=4 exch2_neighbourId(1,858)=873 exch2_iLo(1,858)=0 exch2_iHi(1,858)=35 exch2_jLo(1,858)=52 exch2_jHi(1,858)=52 exch2_opposingSend(1,858)=2 exch2_pij(1,1,858)=1 exch2_pij(2,1,858)=0 exch2_pij(3,1,858)=0 exch2_pij(4,1,858)=1 exch2_oi(1,858)=0 exch2_oj(1,858)=0 exch2_neighbourId(2,858)=843 exch2_iLo(2,858)=0 exch2_iHi(2,858)=35 exch2_jLo(2,858)=0 exch2_jHi(2,858)=0 exch2_opposingSend(2,858)=1 exch2_pij(1,2,858)=1 exch2_pij(2,2,858)=0 exch2_pij(3,2,858)=0 exch2_pij(4,2,858)=1 exch2_oi(2,858)=0 exch2_oj(2,858)=0 exch2_neighbourId(3,858)=859 exch2_iLo(3,858)=35 exch2_iHi(3,858)=35 exch2_jLo(3,858)=0 exch2_jHi(3,858)=52 exch2_opposingSend(3,858)=4 exch2_pij(1,3,858)=1 exch2_pij(2,3,858)=0 exch2_pij(3,3,858)=0 exch2_pij(4,3,858)=1 exch2_oi(3,858)=0 exch2_oj(3,858)=0 exch2_neighbourId(4,858)=857 exch2_iLo(4,858)=0 exch2_iHi(4,858)=0 exch2_jLo(4,858)=0 exch2_jHi(4,858)=52 exch2_opposingSend(4,858)=3 exch2_pij(1,4,858)=1 exch2_pij(2,4,858)=0 exch2_pij(3,4,858)=0 exch2_pij(4,4,858)=1 exch2_oi(4,858)=0 exch2_oj(4,858)=0 RETURN END SUBROUTINE W2_E2SETUP_859 C Topology for tile 859 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(859)=34 exch2_tNy(859)=51 exch2_tBasex(859)=102 exch2_tBasey(859)=357 exch2_txGlobalo(859)=2653 exch2_tyGlobalo(859)=358 exch2_isWedge(859)=0 exch2_isNedge(859)=0 exch2_isEedge(859)=0 exch2_isSedge(859)=0 exch2_myFace(859)=6 exch2_mydNx(859)=510 exch2_mydNy(859)=510 exch2_nNeighbours(859)=4 exch2_neighbourId(1,859)=874 exch2_iLo(1,859)=0 exch2_iHi(1,859)=35 exch2_jLo(1,859)=52 exch2_jHi(1,859)=52 exch2_opposingSend(1,859)=2 exch2_pij(1,1,859)=1 exch2_pij(2,1,859)=0 exch2_pij(3,1,859)=0 exch2_pij(4,1,859)=1 exch2_oi(1,859)=0 exch2_oj(1,859)=0 exch2_neighbourId(2,859)=844 exch2_iLo(2,859)=0 exch2_iHi(2,859)=35 exch2_jLo(2,859)=0 exch2_jHi(2,859)=0 exch2_opposingSend(2,859)=1 exch2_pij(1,2,859)=1 exch2_pij(2,2,859)=0 exch2_pij(3,2,859)=0 exch2_pij(4,2,859)=1 exch2_oi(2,859)=0 exch2_oj(2,859)=0 exch2_neighbourId(3,859)=860 exch2_iLo(3,859)=35 exch2_iHi(3,859)=35 exch2_jLo(3,859)=0 exch2_jHi(3,859)=52 exch2_opposingSend(3,859)=4 exch2_pij(1,3,859)=1 exch2_pij(2,3,859)=0 exch2_pij(3,3,859)=0 exch2_pij(4,3,859)=1 exch2_oi(3,859)=0 exch2_oj(3,859)=0 exch2_neighbourId(4,859)=858 exch2_iLo(4,859)=0 exch2_iHi(4,859)=0 exch2_jLo(4,859)=0 exch2_jHi(4,859)=52 exch2_opposingSend(4,859)=3 exch2_pij(1,4,859)=1 exch2_pij(2,4,859)=0 exch2_pij(3,4,859)=0 exch2_pij(4,4,859)=1 exch2_oi(4,859)=0 exch2_oj(4,859)=0 RETURN END SUBROUTINE W2_E2SETUP_860 C Topology for tile 860 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(860)=34 exch2_tNy(860)=51 exch2_tBasex(860)=136 exch2_tBasey(860)=357 exch2_txGlobalo(860)=2687 exch2_tyGlobalo(860)=358 exch2_isWedge(860)=0 exch2_isNedge(860)=0 exch2_isEedge(860)=0 exch2_isSedge(860)=0 exch2_myFace(860)=6 exch2_mydNx(860)=510 exch2_mydNy(860)=510 exch2_nNeighbours(860)=4 exch2_neighbourId(1,860)=875 exch2_iLo(1,860)=0 exch2_iHi(1,860)=35 exch2_jLo(1,860)=52 exch2_jHi(1,860)=52 exch2_opposingSend(1,860)=2 exch2_pij(1,1,860)=1 exch2_pij(2,1,860)=0 exch2_pij(3,1,860)=0 exch2_pij(4,1,860)=1 exch2_oi(1,860)=0 exch2_oj(1,860)=0 exch2_neighbourId(2,860)=845 exch2_iLo(2,860)=0 exch2_iHi(2,860)=35 exch2_jLo(2,860)=0 exch2_jHi(2,860)=0 exch2_opposingSend(2,860)=1 exch2_pij(1,2,860)=1 exch2_pij(2,2,860)=0 exch2_pij(3,2,860)=0 exch2_pij(4,2,860)=1 exch2_oi(2,860)=0 exch2_oj(2,860)=0 exch2_neighbourId(3,860)=861 exch2_iLo(3,860)=35 exch2_iHi(3,860)=35 exch2_jLo(3,860)=0 exch2_jHi(3,860)=52 exch2_opposingSend(3,860)=4 exch2_pij(1,3,860)=1 exch2_pij(2,3,860)=0 exch2_pij(3,3,860)=0 exch2_pij(4,3,860)=1 exch2_oi(3,860)=0 exch2_oj(3,860)=0 exch2_neighbourId(4,860)=859 exch2_iLo(4,860)=0 exch2_iHi(4,860)=0 exch2_jLo(4,860)=0 exch2_jHi(4,860)=52 exch2_opposingSend(4,860)=3 exch2_pij(1,4,860)=1 exch2_pij(2,4,860)=0 exch2_pij(3,4,860)=0 exch2_pij(4,4,860)=1 exch2_oi(4,860)=0 exch2_oj(4,860)=0 RETURN END SUBROUTINE W2_E2SETUP_861 C Topology for tile 861 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(861)=34 exch2_tNy(861)=51 exch2_tBasex(861)=170 exch2_tBasey(861)=357 exch2_txGlobalo(861)=2721 exch2_tyGlobalo(861)=358 exch2_isWedge(861)=0 exch2_isNedge(861)=0 exch2_isEedge(861)=0 exch2_isSedge(861)=0 exch2_myFace(861)=6 exch2_mydNx(861)=510 exch2_mydNy(861)=510 exch2_nNeighbours(861)=4 exch2_neighbourId(1,861)=876 exch2_iLo(1,861)=0 exch2_iHi(1,861)=35 exch2_jLo(1,861)=52 exch2_jHi(1,861)=52 exch2_opposingSend(1,861)=2 exch2_pij(1,1,861)=1 exch2_pij(2,1,861)=0 exch2_pij(3,1,861)=0 exch2_pij(4,1,861)=1 exch2_oi(1,861)=0 exch2_oj(1,861)=0 exch2_neighbourId(2,861)=846 exch2_iLo(2,861)=0 exch2_iHi(2,861)=35 exch2_jLo(2,861)=0 exch2_jHi(2,861)=0 exch2_opposingSend(2,861)=1 exch2_pij(1,2,861)=1 exch2_pij(2,2,861)=0 exch2_pij(3,2,861)=0 exch2_pij(4,2,861)=1 exch2_oi(2,861)=0 exch2_oj(2,861)=0 exch2_neighbourId(3,861)=862 exch2_iLo(3,861)=35 exch2_iHi(3,861)=35 exch2_jLo(3,861)=0 exch2_jHi(3,861)=52 exch2_opposingSend(3,861)=4 exch2_pij(1,3,861)=1 exch2_pij(2,3,861)=0 exch2_pij(3,3,861)=0 exch2_pij(4,3,861)=1 exch2_oi(3,861)=0 exch2_oj(3,861)=0 exch2_neighbourId(4,861)=860 exch2_iLo(4,861)=0 exch2_iHi(4,861)=0 exch2_jLo(4,861)=0 exch2_jHi(4,861)=52 exch2_opposingSend(4,861)=3 exch2_pij(1,4,861)=1 exch2_pij(2,4,861)=0 exch2_pij(3,4,861)=0 exch2_pij(4,4,861)=1 exch2_oi(4,861)=0 exch2_oj(4,861)=0 RETURN END SUBROUTINE W2_E2SETUP_862 C Topology for tile 862 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(862)=34 exch2_tNy(862)=51 exch2_tBasex(862)=204 exch2_tBasey(862)=357 exch2_txGlobalo(862)=2755 exch2_tyGlobalo(862)=358 exch2_isWedge(862)=0 exch2_isNedge(862)=0 exch2_isEedge(862)=0 exch2_isSedge(862)=0 exch2_myFace(862)=6 exch2_mydNx(862)=510 exch2_mydNy(862)=510 exch2_nNeighbours(862)=4 exch2_neighbourId(1,862)=877 exch2_iLo(1,862)=0 exch2_iHi(1,862)=35 exch2_jLo(1,862)=52 exch2_jHi(1,862)=52 exch2_opposingSend(1,862)=2 exch2_pij(1,1,862)=1 exch2_pij(2,1,862)=0 exch2_pij(3,1,862)=0 exch2_pij(4,1,862)=1 exch2_oi(1,862)=0 exch2_oj(1,862)=0 exch2_neighbourId(2,862)=847 exch2_iLo(2,862)=0 exch2_iHi(2,862)=35 exch2_jLo(2,862)=0 exch2_jHi(2,862)=0 exch2_opposingSend(2,862)=1 exch2_pij(1,2,862)=1 exch2_pij(2,2,862)=0 exch2_pij(3,2,862)=0 exch2_pij(4,2,862)=1 exch2_oi(2,862)=0 exch2_oj(2,862)=0 exch2_neighbourId(3,862)=863 exch2_iLo(3,862)=35 exch2_iHi(3,862)=35 exch2_jLo(3,862)=0 exch2_jHi(3,862)=52 exch2_opposingSend(3,862)=4 exch2_pij(1,3,862)=1 exch2_pij(2,3,862)=0 exch2_pij(3,3,862)=0 exch2_pij(4,3,862)=1 exch2_oi(3,862)=0 exch2_oj(3,862)=0 exch2_neighbourId(4,862)=861 exch2_iLo(4,862)=0 exch2_iHi(4,862)=0 exch2_jLo(4,862)=0 exch2_jHi(4,862)=52 exch2_opposingSend(4,862)=3 exch2_pij(1,4,862)=1 exch2_pij(2,4,862)=0 exch2_pij(3,4,862)=0 exch2_pij(4,4,862)=1 exch2_oi(4,862)=0 exch2_oj(4,862)=0 RETURN END SUBROUTINE W2_E2SETUP_863 C Topology for tile 863 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(863)=34 exch2_tNy(863)=51 exch2_tBasex(863)=238 exch2_tBasey(863)=357 exch2_txGlobalo(863)=2789 exch2_tyGlobalo(863)=358 exch2_isWedge(863)=0 exch2_isNedge(863)=0 exch2_isEedge(863)=0 exch2_isSedge(863)=0 exch2_myFace(863)=6 exch2_mydNx(863)=510 exch2_mydNy(863)=510 exch2_nNeighbours(863)=4 exch2_neighbourId(1,863)=878 exch2_iLo(1,863)=0 exch2_iHi(1,863)=35 exch2_jLo(1,863)=52 exch2_jHi(1,863)=52 exch2_opposingSend(1,863)=2 exch2_pij(1,1,863)=1 exch2_pij(2,1,863)=0 exch2_pij(3,1,863)=0 exch2_pij(4,1,863)=1 exch2_oi(1,863)=0 exch2_oj(1,863)=0 exch2_neighbourId(2,863)=848 exch2_iLo(2,863)=0 exch2_iHi(2,863)=35 exch2_jLo(2,863)=0 exch2_jHi(2,863)=0 exch2_opposingSend(2,863)=1 exch2_pij(1,2,863)=1 exch2_pij(2,2,863)=0 exch2_pij(3,2,863)=0 exch2_pij(4,2,863)=1 exch2_oi(2,863)=0 exch2_oj(2,863)=0 exch2_neighbourId(3,863)=864 exch2_iLo(3,863)=35 exch2_iHi(3,863)=35 exch2_jLo(3,863)=0 exch2_jHi(3,863)=52 exch2_opposingSend(3,863)=4 exch2_pij(1,3,863)=1 exch2_pij(2,3,863)=0 exch2_pij(3,3,863)=0 exch2_pij(4,3,863)=1 exch2_oi(3,863)=0 exch2_oj(3,863)=0 exch2_neighbourId(4,863)=862 exch2_iLo(4,863)=0 exch2_iHi(4,863)=0 exch2_jLo(4,863)=0 exch2_jHi(4,863)=52 exch2_opposingSend(4,863)=3 exch2_pij(1,4,863)=1 exch2_pij(2,4,863)=0 exch2_pij(3,4,863)=0 exch2_pij(4,4,863)=1 exch2_oi(4,863)=0 exch2_oj(4,863)=0 RETURN END SUBROUTINE W2_E2SETUP_864 C Topology for tile 864 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(864)=34 exch2_tNy(864)=51 exch2_tBasex(864)=272 exch2_tBasey(864)=357 exch2_txGlobalo(864)=2823 exch2_tyGlobalo(864)=358 exch2_isWedge(864)=0 exch2_isNedge(864)=0 exch2_isEedge(864)=0 exch2_isSedge(864)=0 exch2_myFace(864)=6 exch2_mydNx(864)=510 exch2_mydNy(864)=510 exch2_nNeighbours(864)=4 exch2_neighbourId(1,864)=879 exch2_iLo(1,864)=0 exch2_iHi(1,864)=35 exch2_jLo(1,864)=52 exch2_jHi(1,864)=52 exch2_opposingSend(1,864)=2 exch2_pij(1,1,864)=1 exch2_pij(2,1,864)=0 exch2_pij(3,1,864)=0 exch2_pij(4,1,864)=1 exch2_oi(1,864)=0 exch2_oj(1,864)=0 exch2_neighbourId(2,864)=849 exch2_iLo(2,864)=0 exch2_iHi(2,864)=35 exch2_jLo(2,864)=0 exch2_jHi(2,864)=0 exch2_opposingSend(2,864)=1 exch2_pij(1,2,864)=1 exch2_pij(2,2,864)=0 exch2_pij(3,2,864)=0 exch2_pij(4,2,864)=1 exch2_oi(2,864)=0 exch2_oj(2,864)=0 exch2_neighbourId(3,864)=865 exch2_iLo(3,864)=35 exch2_iHi(3,864)=35 exch2_jLo(3,864)=0 exch2_jHi(3,864)=52 exch2_opposingSend(3,864)=4 exch2_pij(1,3,864)=1 exch2_pij(2,3,864)=0 exch2_pij(3,3,864)=0 exch2_pij(4,3,864)=1 exch2_oi(3,864)=0 exch2_oj(3,864)=0 exch2_neighbourId(4,864)=863 exch2_iLo(4,864)=0 exch2_iHi(4,864)=0 exch2_jLo(4,864)=0 exch2_jHi(4,864)=52 exch2_opposingSend(4,864)=3 exch2_pij(1,4,864)=1 exch2_pij(2,4,864)=0 exch2_pij(3,4,864)=0 exch2_pij(4,4,864)=1 exch2_oi(4,864)=0 exch2_oj(4,864)=0 RETURN END SUBROUTINE W2_E2SETUP_865 C Topology for tile 865 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(865)=34 exch2_tNy(865)=51 exch2_tBasex(865)=306 exch2_tBasey(865)=357 exch2_txGlobalo(865)=2857 exch2_tyGlobalo(865)=358 exch2_isWedge(865)=0 exch2_isNedge(865)=0 exch2_isEedge(865)=0 exch2_isSedge(865)=0 exch2_myFace(865)=6 exch2_mydNx(865)=510 exch2_mydNy(865)=510 exch2_nNeighbours(865)=4 exch2_neighbourId(1,865)=880 exch2_iLo(1,865)=0 exch2_iHi(1,865)=35 exch2_jLo(1,865)=52 exch2_jHi(1,865)=52 exch2_opposingSend(1,865)=2 exch2_pij(1,1,865)=1 exch2_pij(2,1,865)=0 exch2_pij(3,1,865)=0 exch2_pij(4,1,865)=1 exch2_oi(1,865)=0 exch2_oj(1,865)=0 exch2_neighbourId(2,865)=850 exch2_iLo(2,865)=0 exch2_iHi(2,865)=35 exch2_jLo(2,865)=0 exch2_jHi(2,865)=0 exch2_opposingSend(2,865)=1 exch2_pij(1,2,865)=1 exch2_pij(2,2,865)=0 exch2_pij(3,2,865)=0 exch2_pij(4,2,865)=1 exch2_oi(2,865)=0 exch2_oj(2,865)=0 exch2_neighbourId(3,865)=866 exch2_iLo(3,865)=35 exch2_iHi(3,865)=35 exch2_jLo(3,865)=0 exch2_jHi(3,865)=52 exch2_opposingSend(3,865)=4 exch2_pij(1,3,865)=1 exch2_pij(2,3,865)=0 exch2_pij(3,3,865)=0 exch2_pij(4,3,865)=1 exch2_oi(3,865)=0 exch2_oj(3,865)=0 exch2_neighbourId(4,865)=864 exch2_iLo(4,865)=0 exch2_iHi(4,865)=0 exch2_jLo(4,865)=0 exch2_jHi(4,865)=52 exch2_opposingSend(4,865)=3 exch2_pij(1,4,865)=1 exch2_pij(2,4,865)=0 exch2_pij(3,4,865)=0 exch2_pij(4,4,865)=1 exch2_oi(4,865)=0 exch2_oj(4,865)=0 RETURN END SUBROUTINE W2_E2SETUP_866 C Topology for tile 866 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(866)=34 exch2_tNy(866)=51 exch2_tBasex(866)=340 exch2_tBasey(866)=357 exch2_txGlobalo(866)=2891 exch2_tyGlobalo(866)=358 exch2_isWedge(866)=0 exch2_isNedge(866)=0 exch2_isEedge(866)=0 exch2_isSedge(866)=0 exch2_myFace(866)=6 exch2_mydNx(866)=510 exch2_mydNy(866)=510 exch2_nNeighbours(866)=4 exch2_neighbourId(1,866)=881 exch2_iLo(1,866)=0 exch2_iHi(1,866)=35 exch2_jLo(1,866)=52 exch2_jHi(1,866)=52 exch2_opposingSend(1,866)=2 exch2_pij(1,1,866)=1 exch2_pij(2,1,866)=0 exch2_pij(3,1,866)=0 exch2_pij(4,1,866)=1 exch2_oi(1,866)=0 exch2_oj(1,866)=0 exch2_neighbourId(2,866)=851 exch2_iLo(2,866)=0 exch2_iHi(2,866)=35 exch2_jLo(2,866)=0 exch2_jHi(2,866)=0 exch2_opposingSend(2,866)=1 exch2_pij(1,2,866)=1 exch2_pij(2,2,866)=0 exch2_pij(3,2,866)=0 exch2_pij(4,2,866)=1 exch2_oi(2,866)=0 exch2_oj(2,866)=0 exch2_neighbourId(3,866)=867 exch2_iLo(3,866)=35 exch2_iHi(3,866)=35 exch2_jLo(3,866)=0 exch2_jHi(3,866)=52 exch2_opposingSend(3,866)=4 exch2_pij(1,3,866)=1 exch2_pij(2,3,866)=0 exch2_pij(3,3,866)=0 exch2_pij(4,3,866)=1 exch2_oi(3,866)=0 exch2_oj(3,866)=0 exch2_neighbourId(4,866)=865 exch2_iLo(4,866)=0 exch2_iHi(4,866)=0 exch2_jLo(4,866)=0 exch2_jHi(4,866)=52 exch2_opposingSend(4,866)=3 exch2_pij(1,4,866)=1 exch2_pij(2,4,866)=0 exch2_pij(3,4,866)=0 exch2_pij(4,4,866)=1 exch2_oi(4,866)=0 exch2_oj(4,866)=0 RETURN END SUBROUTINE W2_E2SETUP_867 C Topology for tile 867 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(867)=34 exch2_tNy(867)=51 exch2_tBasex(867)=374 exch2_tBasey(867)=357 exch2_txGlobalo(867)=2925 exch2_tyGlobalo(867)=358 exch2_isWedge(867)=0 exch2_isNedge(867)=0 exch2_isEedge(867)=0 exch2_isSedge(867)=0 exch2_myFace(867)=6 exch2_mydNx(867)=510 exch2_mydNy(867)=510 exch2_nNeighbours(867)=4 exch2_neighbourId(1,867)=882 exch2_iLo(1,867)=0 exch2_iHi(1,867)=35 exch2_jLo(1,867)=52 exch2_jHi(1,867)=52 exch2_opposingSend(1,867)=2 exch2_pij(1,1,867)=1 exch2_pij(2,1,867)=0 exch2_pij(3,1,867)=0 exch2_pij(4,1,867)=1 exch2_oi(1,867)=0 exch2_oj(1,867)=0 exch2_neighbourId(2,867)=852 exch2_iLo(2,867)=0 exch2_iHi(2,867)=35 exch2_jLo(2,867)=0 exch2_jHi(2,867)=0 exch2_opposingSend(2,867)=1 exch2_pij(1,2,867)=1 exch2_pij(2,2,867)=0 exch2_pij(3,2,867)=0 exch2_pij(4,2,867)=1 exch2_oi(2,867)=0 exch2_oj(2,867)=0 exch2_neighbourId(3,867)=868 exch2_iLo(3,867)=35 exch2_iHi(3,867)=35 exch2_jLo(3,867)=0 exch2_jHi(3,867)=52 exch2_opposingSend(3,867)=4 exch2_pij(1,3,867)=1 exch2_pij(2,3,867)=0 exch2_pij(3,3,867)=0 exch2_pij(4,3,867)=1 exch2_oi(3,867)=0 exch2_oj(3,867)=0 exch2_neighbourId(4,867)=866 exch2_iLo(4,867)=0 exch2_iHi(4,867)=0 exch2_jLo(4,867)=0 exch2_jHi(4,867)=52 exch2_opposingSend(4,867)=3 exch2_pij(1,4,867)=1 exch2_pij(2,4,867)=0 exch2_pij(3,4,867)=0 exch2_pij(4,4,867)=1 exch2_oi(4,867)=0 exch2_oj(4,867)=0 RETURN END SUBROUTINE W2_E2SETUP_868 C Topology for tile 868 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(868)=34 exch2_tNy(868)=51 exch2_tBasex(868)=408 exch2_tBasey(868)=357 exch2_txGlobalo(868)=2959 exch2_tyGlobalo(868)=358 exch2_isWedge(868)=0 exch2_isNedge(868)=0 exch2_isEedge(868)=0 exch2_isSedge(868)=0 exch2_myFace(868)=6 exch2_mydNx(868)=510 exch2_mydNy(868)=510 exch2_nNeighbours(868)=4 exch2_neighbourId(1,868)=883 exch2_iLo(1,868)=0 exch2_iHi(1,868)=35 exch2_jLo(1,868)=52 exch2_jHi(1,868)=52 exch2_opposingSend(1,868)=2 exch2_pij(1,1,868)=1 exch2_pij(2,1,868)=0 exch2_pij(3,1,868)=0 exch2_pij(4,1,868)=1 exch2_oi(1,868)=0 exch2_oj(1,868)=0 exch2_neighbourId(2,868)=853 exch2_iLo(2,868)=0 exch2_iHi(2,868)=35 exch2_jLo(2,868)=0 exch2_jHi(2,868)=0 exch2_opposingSend(2,868)=1 exch2_pij(1,2,868)=1 exch2_pij(2,2,868)=0 exch2_pij(3,2,868)=0 exch2_pij(4,2,868)=1 exch2_oi(2,868)=0 exch2_oj(2,868)=0 exch2_neighbourId(3,868)=869 exch2_iLo(3,868)=35 exch2_iHi(3,868)=35 exch2_jLo(3,868)=0 exch2_jHi(3,868)=52 exch2_opposingSend(3,868)=4 exch2_pij(1,3,868)=1 exch2_pij(2,3,868)=0 exch2_pij(3,3,868)=0 exch2_pij(4,3,868)=1 exch2_oi(3,868)=0 exch2_oj(3,868)=0 exch2_neighbourId(4,868)=867 exch2_iLo(4,868)=0 exch2_iHi(4,868)=0 exch2_jLo(4,868)=0 exch2_jHi(4,868)=52 exch2_opposingSend(4,868)=3 exch2_pij(1,4,868)=1 exch2_pij(2,4,868)=0 exch2_pij(3,4,868)=0 exch2_pij(4,4,868)=1 exch2_oi(4,868)=0 exch2_oj(4,868)=0 RETURN END SUBROUTINE W2_E2SETUP_869 C Topology for tile 869 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(869)=34 exch2_tNy(869)=51 exch2_tBasex(869)=442 exch2_tBasey(869)=357 exch2_txGlobalo(869)=2993 exch2_tyGlobalo(869)=358 exch2_isWedge(869)=0 exch2_isNedge(869)=0 exch2_isEedge(869)=0 exch2_isSedge(869)=0 exch2_myFace(869)=6 exch2_mydNx(869)=510 exch2_mydNy(869)=510 exch2_nNeighbours(869)=4 exch2_neighbourId(1,869)=884 exch2_iLo(1,869)=0 exch2_iHi(1,869)=35 exch2_jLo(1,869)=52 exch2_jHi(1,869)=52 exch2_opposingSend(1,869)=2 exch2_pij(1,1,869)=1 exch2_pij(2,1,869)=0 exch2_pij(3,1,869)=0 exch2_pij(4,1,869)=1 exch2_oi(1,869)=0 exch2_oj(1,869)=0 exch2_neighbourId(2,869)=854 exch2_iLo(2,869)=0 exch2_iHi(2,869)=35 exch2_jLo(2,869)=0 exch2_jHi(2,869)=0 exch2_opposingSend(2,869)=1 exch2_pij(1,2,869)=1 exch2_pij(2,2,869)=0 exch2_pij(3,2,869)=0 exch2_pij(4,2,869)=1 exch2_oi(2,869)=0 exch2_oj(2,869)=0 exch2_neighbourId(3,869)=870 exch2_iLo(3,869)=35 exch2_iHi(3,869)=35 exch2_jLo(3,869)=0 exch2_jHi(3,869)=52 exch2_opposingSend(3,869)=5 exch2_pij(1,3,869)=1 exch2_pij(2,3,869)=0 exch2_pij(3,3,869)=0 exch2_pij(4,3,869)=1 exch2_oi(3,869)=0 exch2_oj(3,869)=0 exch2_neighbourId(4,869)=868 exch2_iLo(4,869)=0 exch2_iHi(4,869)=0 exch2_jLo(4,869)=0 exch2_jHi(4,869)=52 exch2_opposingSend(4,869)=3 exch2_pij(1,4,869)=1 exch2_pij(2,4,869)=0 exch2_pij(3,4,869)=0 exch2_pij(4,4,869)=1 exch2_oi(4,869)=0 exch2_oj(4,869)=0 RETURN END SUBROUTINE W2_E2SETUP_870 C Topology for tile 870 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(870)=34 exch2_tNy(870)=51 exch2_tBasex(870)=476 exch2_tBasey(870)=357 exch2_txGlobalo(870)=3027 exch2_tyGlobalo(870)=358 exch2_isWedge(870)=0 exch2_isNedge(870)=0 exch2_isEedge(870)=1 exch2_isSedge(870)=0 exch2_myFace(870)=6 exch2_mydNx(870)=510 exch2_mydNy(870)=510 exch2_nNeighbours(870)=5 exch2_neighbourId(1,870)=885 exch2_iLo(1,870)=0 exch2_iHi(1,870)=35 exch2_jLo(1,870)=52 exch2_jHi(1,870)=52 exch2_opposingSend(1,870)=2 exch2_pij(1,1,870)=1 exch2_pij(2,1,870)=0 exch2_pij(3,1,870)=0 exch2_pij(4,1,870)=1 exch2_oi(1,870)=0 exch2_oj(1,870)=0 exch2_neighbourId(2,870)=855 exch2_iLo(2,870)=0 exch2_iHi(2,870)=35 exch2_jLo(2,870)=0 exch2_jHi(2,870)=0 exch2_opposingSend(2,870)=1 exch2_pij(1,2,870)=1 exch2_pij(2,2,870)=0 exch2_pij(3,2,870)=0 exch2_pij(4,2,870)=1 exch2_oi(2,870)=0 exch2_oj(2,870)=0 exch2_neighbourId(3,870)=154 exch2_iLo(3,870)=35 exch2_iHi(3,870)=35 exch2_jLo(3,870)=17 exch2_jHi(3,870)=52 exch2_opposingSend(3,870)=2 exch2_pij(1,3,870)=0 exch2_pij(2,3,870)=1 exch2_pij(3,3,870)=-1 exch2_pij(4,3,870)=0 exch2_oi(3,870)=510 exch2_oj(3,870)=511 exch2_neighbourId(4,870)=155 exch2_iLo(4,870)=35 exch2_iHi(4,870)=35 exch2_jLo(4,870)=0 exch2_jHi(4,870)=18 exch2_opposingSend(4,870)=3 exch2_pij(1,4,870)=0 exch2_pij(2,4,870)=1 exch2_pij(3,4,870)=-1 exch2_pij(4,4,870)=0 exch2_oi(4,870)=510 exch2_oj(4,870)=511 exch2_neighbourId(5,870)=869 exch2_iLo(5,870)=0 exch2_iHi(5,870)=0 exch2_jLo(5,870)=0 exch2_jHi(5,870)=52 exch2_opposingSend(5,870)=3 exch2_pij(1,5,870)=1 exch2_pij(2,5,870)=0 exch2_pij(3,5,870)=0 exch2_pij(4,5,870)=1 exch2_oi(5,870)=0 exch2_oj(5,870)=0 RETURN END SUBROUTINE W2_E2SETUP_871 C Topology for tile 871 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(871)=34 exch2_tNy(871)=51 exch2_tBasex(871)=0 exch2_tBasey(871)=408 exch2_txGlobalo(871)=2551 exch2_tyGlobalo(871)=409 exch2_isWedge(871)=1 exch2_isNedge(871)=0 exch2_isEedge(871)=0 exch2_isSedge(871)=0 exch2_myFace(871)=6 exch2_mydNx(871)=510 exch2_mydNy(871)=510 exch2_nNeighbours(871)=4 exch2_neighbourId(1,871)=886 exch2_iLo(1,871)=0 exch2_iHi(1,871)=35 exch2_jLo(1,871)=52 exch2_jHi(1,871)=52 exch2_opposingSend(1,871)=2 exch2_pij(1,1,871)=1 exch2_pij(2,1,871)=0 exch2_pij(3,1,871)=0 exch2_pij(4,1,871)=1 exch2_oi(1,871)=0 exch2_oj(1,871)=0 exch2_neighbourId(2,871)=856 exch2_iLo(2,871)=0 exch2_iHi(2,871)=35 exch2_jLo(2,871)=0 exch2_jHi(2,871)=0 exch2_opposingSend(2,871)=1 exch2_pij(1,2,871)=1 exch2_pij(2,2,871)=0 exch2_pij(3,2,871)=0 exch2_pij(4,2,871)=1 exch2_oi(2,871)=0 exch2_oj(2,871)=0 exch2_neighbourId(3,871)=872 exch2_iLo(3,871)=35 exch2_iHi(3,871)=35 exch2_jLo(3,871)=0 exch2_jHi(3,871)=52 exch2_opposingSend(3,871)=4 exch2_pij(1,3,871)=1 exch2_pij(2,3,871)=0 exch2_pij(3,3,871)=0 exch2_pij(4,3,871)=1 exch2_oi(3,871)=0 exch2_oj(3,871)=0 exch2_neighbourId(4,871)=735 exch2_iLo(4,871)=0 exch2_iHi(4,871)=0 exch2_jLo(4,871)=0 exch2_jHi(4,871)=52 exch2_opposingSend(4,871)=3 exch2_pij(1,4,871)=1 exch2_pij(2,4,871)=0 exch2_pij(3,4,871)=0 exch2_pij(4,4,871)=1 exch2_oi(4,871)=-510 exch2_oj(4,871)=0 RETURN END SUBROUTINE W2_E2SETUP_872 C Topology for tile 872 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(872)=34 exch2_tNy(872)=51 exch2_tBasex(872)=34 exch2_tBasey(872)=408 exch2_txGlobalo(872)=2585 exch2_tyGlobalo(872)=409 exch2_isWedge(872)=0 exch2_isNedge(872)=0 exch2_isEedge(872)=0 exch2_isSedge(872)=0 exch2_myFace(872)=6 exch2_mydNx(872)=510 exch2_mydNy(872)=510 exch2_nNeighbours(872)=4 exch2_neighbourId(1,872)=887 exch2_iLo(1,872)=0 exch2_iHi(1,872)=35 exch2_jLo(1,872)=52 exch2_jHi(1,872)=52 exch2_opposingSend(1,872)=2 exch2_pij(1,1,872)=1 exch2_pij(2,1,872)=0 exch2_pij(3,1,872)=0 exch2_pij(4,1,872)=1 exch2_oi(1,872)=0 exch2_oj(1,872)=0 exch2_neighbourId(2,872)=857 exch2_iLo(2,872)=0 exch2_iHi(2,872)=35 exch2_jLo(2,872)=0 exch2_jHi(2,872)=0 exch2_opposingSend(2,872)=1 exch2_pij(1,2,872)=1 exch2_pij(2,2,872)=0 exch2_pij(3,2,872)=0 exch2_pij(4,2,872)=1 exch2_oi(2,872)=0 exch2_oj(2,872)=0 exch2_neighbourId(3,872)=873 exch2_iLo(3,872)=35 exch2_iHi(3,872)=35 exch2_jLo(3,872)=0 exch2_jHi(3,872)=52 exch2_opposingSend(3,872)=4 exch2_pij(1,3,872)=1 exch2_pij(2,3,872)=0 exch2_pij(3,3,872)=0 exch2_pij(4,3,872)=1 exch2_oi(3,872)=0 exch2_oj(3,872)=0 exch2_neighbourId(4,872)=871 exch2_iLo(4,872)=0 exch2_iHi(4,872)=0 exch2_jLo(4,872)=0 exch2_jHi(4,872)=52 exch2_opposingSend(4,872)=3 exch2_pij(1,4,872)=1 exch2_pij(2,4,872)=0 exch2_pij(3,4,872)=0 exch2_pij(4,4,872)=1 exch2_oi(4,872)=0 exch2_oj(4,872)=0 RETURN END SUBROUTINE W2_E2SETUP_873 C Topology for tile 873 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(873)=34 exch2_tNy(873)=51 exch2_tBasex(873)=68 exch2_tBasey(873)=408 exch2_txGlobalo(873)=2619 exch2_tyGlobalo(873)=409 exch2_isWedge(873)=0 exch2_isNedge(873)=0 exch2_isEedge(873)=0 exch2_isSedge(873)=0 exch2_myFace(873)=6 exch2_mydNx(873)=510 exch2_mydNy(873)=510 exch2_nNeighbours(873)=4 exch2_neighbourId(1,873)=888 exch2_iLo(1,873)=0 exch2_iHi(1,873)=35 exch2_jLo(1,873)=52 exch2_jHi(1,873)=52 exch2_opposingSend(1,873)=2 exch2_pij(1,1,873)=1 exch2_pij(2,1,873)=0 exch2_pij(3,1,873)=0 exch2_pij(4,1,873)=1 exch2_oi(1,873)=0 exch2_oj(1,873)=0 exch2_neighbourId(2,873)=858 exch2_iLo(2,873)=0 exch2_iHi(2,873)=35 exch2_jLo(2,873)=0 exch2_jHi(2,873)=0 exch2_opposingSend(2,873)=1 exch2_pij(1,2,873)=1 exch2_pij(2,2,873)=0 exch2_pij(3,2,873)=0 exch2_pij(4,2,873)=1 exch2_oi(2,873)=0 exch2_oj(2,873)=0 exch2_neighbourId(3,873)=874 exch2_iLo(3,873)=35 exch2_iHi(3,873)=35 exch2_jLo(3,873)=0 exch2_jHi(3,873)=52 exch2_opposingSend(3,873)=4 exch2_pij(1,3,873)=1 exch2_pij(2,3,873)=0 exch2_pij(3,3,873)=0 exch2_pij(4,3,873)=1 exch2_oi(3,873)=0 exch2_oj(3,873)=0 exch2_neighbourId(4,873)=872 exch2_iLo(4,873)=0 exch2_iHi(4,873)=0 exch2_jLo(4,873)=0 exch2_jHi(4,873)=52 exch2_opposingSend(4,873)=3 exch2_pij(1,4,873)=1 exch2_pij(2,4,873)=0 exch2_pij(3,4,873)=0 exch2_pij(4,4,873)=1 exch2_oi(4,873)=0 exch2_oj(4,873)=0 RETURN END SUBROUTINE W2_E2SETUP_874 C Topology for tile 874 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(874)=34 exch2_tNy(874)=51 exch2_tBasex(874)=102 exch2_tBasey(874)=408 exch2_txGlobalo(874)=2653 exch2_tyGlobalo(874)=409 exch2_isWedge(874)=0 exch2_isNedge(874)=0 exch2_isEedge(874)=0 exch2_isSedge(874)=0 exch2_myFace(874)=6 exch2_mydNx(874)=510 exch2_mydNy(874)=510 exch2_nNeighbours(874)=4 exch2_neighbourId(1,874)=889 exch2_iLo(1,874)=0 exch2_iHi(1,874)=35 exch2_jLo(1,874)=52 exch2_jHi(1,874)=52 exch2_opposingSend(1,874)=2 exch2_pij(1,1,874)=1 exch2_pij(2,1,874)=0 exch2_pij(3,1,874)=0 exch2_pij(4,1,874)=1 exch2_oi(1,874)=0 exch2_oj(1,874)=0 exch2_neighbourId(2,874)=859 exch2_iLo(2,874)=0 exch2_iHi(2,874)=35 exch2_jLo(2,874)=0 exch2_jHi(2,874)=0 exch2_opposingSend(2,874)=1 exch2_pij(1,2,874)=1 exch2_pij(2,2,874)=0 exch2_pij(3,2,874)=0 exch2_pij(4,2,874)=1 exch2_oi(2,874)=0 exch2_oj(2,874)=0 exch2_neighbourId(3,874)=875 exch2_iLo(3,874)=35 exch2_iHi(3,874)=35 exch2_jLo(3,874)=0 exch2_jHi(3,874)=52 exch2_opposingSend(3,874)=4 exch2_pij(1,3,874)=1 exch2_pij(2,3,874)=0 exch2_pij(3,3,874)=0 exch2_pij(4,3,874)=1 exch2_oi(3,874)=0 exch2_oj(3,874)=0 exch2_neighbourId(4,874)=873 exch2_iLo(4,874)=0 exch2_iHi(4,874)=0 exch2_jLo(4,874)=0 exch2_jHi(4,874)=52 exch2_opposingSend(4,874)=3 exch2_pij(1,4,874)=1 exch2_pij(2,4,874)=0 exch2_pij(3,4,874)=0 exch2_pij(4,4,874)=1 exch2_oi(4,874)=0 exch2_oj(4,874)=0 RETURN END SUBROUTINE W2_E2SETUP_875 C Topology for tile 875 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(875)=34 exch2_tNy(875)=51 exch2_tBasex(875)=136 exch2_tBasey(875)=408 exch2_txGlobalo(875)=2687 exch2_tyGlobalo(875)=409 exch2_isWedge(875)=0 exch2_isNedge(875)=0 exch2_isEedge(875)=0 exch2_isSedge(875)=0 exch2_myFace(875)=6 exch2_mydNx(875)=510 exch2_mydNy(875)=510 exch2_nNeighbours(875)=4 exch2_neighbourId(1,875)=890 exch2_iLo(1,875)=0 exch2_iHi(1,875)=35 exch2_jLo(1,875)=52 exch2_jHi(1,875)=52 exch2_opposingSend(1,875)=2 exch2_pij(1,1,875)=1 exch2_pij(2,1,875)=0 exch2_pij(3,1,875)=0 exch2_pij(4,1,875)=1 exch2_oi(1,875)=0 exch2_oj(1,875)=0 exch2_neighbourId(2,875)=860 exch2_iLo(2,875)=0 exch2_iHi(2,875)=35 exch2_jLo(2,875)=0 exch2_jHi(2,875)=0 exch2_opposingSend(2,875)=1 exch2_pij(1,2,875)=1 exch2_pij(2,2,875)=0 exch2_pij(3,2,875)=0 exch2_pij(4,2,875)=1 exch2_oi(2,875)=0 exch2_oj(2,875)=0 exch2_neighbourId(3,875)=876 exch2_iLo(3,875)=35 exch2_iHi(3,875)=35 exch2_jLo(3,875)=0 exch2_jHi(3,875)=52 exch2_opposingSend(3,875)=4 exch2_pij(1,3,875)=1 exch2_pij(2,3,875)=0 exch2_pij(3,3,875)=0 exch2_pij(4,3,875)=1 exch2_oi(3,875)=0 exch2_oj(3,875)=0 exch2_neighbourId(4,875)=874 exch2_iLo(4,875)=0 exch2_iHi(4,875)=0 exch2_jLo(4,875)=0 exch2_jHi(4,875)=52 exch2_opposingSend(4,875)=3 exch2_pij(1,4,875)=1 exch2_pij(2,4,875)=0 exch2_pij(3,4,875)=0 exch2_pij(4,4,875)=1 exch2_oi(4,875)=0 exch2_oj(4,875)=0 RETURN END SUBROUTINE W2_E2SETUP_876 C Topology for tile 876 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(876)=34 exch2_tNy(876)=51 exch2_tBasex(876)=170 exch2_tBasey(876)=408 exch2_txGlobalo(876)=2721 exch2_tyGlobalo(876)=409 exch2_isWedge(876)=0 exch2_isNedge(876)=0 exch2_isEedge(876)=0 exch2_isSedge(876)=0 exch2_myFace(876)=6 exch2_mydNx(876)=510 exch2_mydNy(876)=510 exch2_nNeighbours(876)=4 exch2_neighbourId(1,876)=891 exch2_iLo(1,876)=0 exch2_iHi(1,876)=35 exch2_jLo(1,876)=52 exch2_jHi(1,876)=52 exch2_opposingSend(1,876)=2 exch2_pij(1,1,876)=1 exch2_pij(2,1,876)=0 exch2_pij(3,1,876)=0 exch2_pij(4,1,876)=1 exch2_oi(1,876)=0 exch2_oj(1,876)=0 exch2_neighbourId(2,876)=861 exch2_iLo(2,876)=0 exch2_iHi(2,876)=35 exch2_jLo(2,876)=0 exch2_jHi(2,876)=0 exch2_opposingSend(2,876)=1 exch2_pij(1,2,876)=1 exch2_pij(2,2,876)=0 exch2_pij(3,2,876)=0 exch2_pij(4,2,876)=1 exch2_oi(2,876)=0 exch2_oj(2,876)=0 exch2_neighbourId(3,876)=877 exch2_iLo(3,876)=35 exch2_iHi(3,876)=35 exch2_jLo(3,876)=0 exch2_jHi(3,876)=52 exch2_opposingSend(3,876)=4 exch2_pij(1,3,876)=1 exch2_pij(2,3,876)=0 exch2_pij(3,3,876)=0 exch2_pij(4,3,876)=1 exch2_oi(3,876)=0 exch2_oj(3,876)=0 exch2_neighbourId(4,876)=875 exch2_iLo(4,876)=0 exch2_iHi(4,876)=0 exch2_jLo(4,876)=0 exch2_jHi(4,876)=52 exch2_opposingSend(4,876)=3 exch2_pij(1,4,876)=1 exch2_pij(2,4,876)=0 exch2_pij(3,4,876)=0 exch2_pij(4,4,876)=1 exch2_oi(4,876)=0 exch2_oj(4,876)=0 RETURN END SUBROUTINE W2_E2SETUP_877 C Topology for tile 877 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(877)=34 exch2_tNy(877)=51 exch2_tBasex(877)=204 exch2_tBasey(877)=408 exch2_txGlobalo(877)=2755 exch2_tyGlobalo(877)=409 exch2_isWedge(877)=0 exch2_isNedge(877)=0 exch2_isEedge(877)=0 exch2_isSedge(877)=0 exch2_myFace(877)=6 exch2_mydNx(877)=510 exch2_mydNy(877)=510 exch2_nNeighbours(877)=4 exch2_neighbourId(1,877)=892 exch2_iLo(1,877)=0 exch2_iHi(1,877)=35 exch2_jLo(1,877)=52 exch2_jHi(1,877)=52 exch2_opposingSend(1,877)=2 exch2_pij(1,1,877)=1 exch2_pij(2,1,877)=0 exch2_pij(3,1,877)=0 exch2_pij(4,1,877)=1 exch2_oi(1,877)=0 exch2_oj(1,877)=0 exch2_neighbourId(2,877)=862 exch2_iLo(2,877)=0 exch2_iHi(2,877)=35 exch2_jLo(2,877)=0 exch2_jHi(2,877)=0 exch2_opposingSend(2,877)=1 exch2_pij(1,2,877)=1 exch2_pij(2,2,877)=0 exch2_pij(3,2,877)=0 exch2_pij(4,2,877)=1 exch2_oi(2,877)=0 exch2_oj(2,877)=0 exch2_neighbourId(3,877)=878 exch2_iLo(3,877)=35 exch2_iHi(3,877)=35 exch2_jLo(3,877)=0 exch2_jHi(3,877)=52 exch2_opposingSend(3,877)=4 exch2_pij(1,3,877)=1 exch2_pij(2,3,877)=0 exch2_pij(3,3,877)=0 exch2_pij(4,3,877)=1 exch2_oi(3,877)=0 exch2_oj(3,877)=0 exch2_neighbourId(4,877)=876 exch2_iLo(4,877)=0 exch2_iHi(4,877)=0 exch2_jLo(4,877)=0 exch2_jHi(4,877)=52 exch2_opposingSend(4,877)=3 exch2_pij(1,4,877)=1 exch2_pij(2,4,877)=0 exch2_pij(3,4,877)=0 exch2_pij(4,4,877)=1 exch2_oi(4,877)=0 exch2_oj(4,877)=0 RETURN END SUBROUTINE W2_E2SETUP_878 C Topology for tile 878 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(878)=34 exch2_tNy(878)=51 exch2_tBasex(878)=238 exch2_tBasey(878)=408 exch2_txGlobalo(878)=2789 exch2_tyGlobalo(878)=409 exch2_isWedge(878)=0 exch2_isNedge(878)=0 exch2_isEedge(878)=0 exch2_isSedge(878)=0 exch2_myFace(878)=6 exch2_mydNx(878)=510 exch2_mydNy(878)=510 exch2_nNeighbours(878)=4 exch2_neighbourId(1,878)=893 exch2_iLo(1,878)=0 exch2_iHi(1,878)=35 exch2_jLo(1,878)=52 exch2_jHi(1,878)=52 exch2_opposingSend(1,878)=2 exch2_pij(1,1,878)=1 exch2_pij(2,1,878)=0 exch2_pij(3,1,878)=0 exch2_pij(4,1,878)=1 exch2_oi(1,878)=0 exch2_oj(1,878)=0 exch2_neighbourId(2,878)=863 exch2_iLo(2,878)=0 exch2_iHi(2,878)=35 exch2_jLo(2,878)=0 exch2_jHi(2,878)=0 exch2_opposingSend(2,878)=1 exch2_pij(1,2,878)=1 exch2_pij(2,2,878)=0 exch2_pij(3,2,878)=0 exch2_pij(4,2,878)=1 exch2_oi(2,878)=0 exch2_oj(2,878)=0 exch2_neighbourId(3,878)=879 exch2_iLo(3,878)=35 exch2_iHi(3,878)=35 exch2_jLo(3,878)=0 exch2_jHi(3,878)=52 exch2_opposingSend(3,878)=4 exch2_pij(1,3,878)=1 exch2_pij(2,3,878)=0 exch2_pij(3,3,878)=0 exch2_pij(4,3,878)=1 exch2_oi(3,878)=0 exch2_oj(3,878)=0 exch2_neighbourId(4,878)=877 exch2_iLo(4,878)=0 exch2_iHi(4,878)=0 exch2_jLo(4,878)=0 exch2_jHi(4,878)=52 exch2_opposingSend(4,878)=3 exch2_pij(1,4,878)=1 exch2_pij(2,4,878)=0 exch2_pij(3,4,878)=0 exch2_pij(4,4,878)=1 exch2_oi(4,878)=0 exch2_oj(4,878)=0 RETURN END SUBROUTINE W2_E2SETUP_879 C Topology for tile 879 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(879)=34 exch2_tNy(879)=51 exch2_tBasex(879)=272 exch2_tBasey(879)=408 exch2_txGlobalo(879)=2823 exch2_tyGlobalo(879)=409 exch2_isWedge(879)=0 exch2_isNedge(879)=0 exch2_isEedge(879)=0 exch2_isSedge(879)=0 exch2_myFace(879)=6 exch2_mydNx(879)=510 exch2_mydNy(879)=510 exch2_nNeighbours(879)=4 exch2_neighbourId(1,879)=894 exch2_iLo(1,879)=0 exch2_iHi(1,879)=35 exch2_jLo(1,879)=52 exch2_jHi(1,879)=52 exch2_opposingSend(1,879)=2 exch2_pij(1,1,879)=1 exch2_pij(2,1,879)=0 exch2_pij(3,1,879)=0 exch2_pij(4,1,879)=1 exch2_oi(1,879)=0 exch2_oj(1,879)=0 exch2_neighbourId(2,879)=864 exch2_iLo(2,879)=0 exch2_iHi(2,879)=35 exch2_jLo(2,879)=0 exch2_jHi(2,879)=0 exch2_opposingSend(2,879)=1 exch2_pij(1,2,879)=1 exch2_pij(2,2,879)=0 exch2_pij(3,2,879)=0 exch2_pij(4,2,879)=1 exch2_oi(2,879)=0 exch2_oj(2,879)=0 exch2_neighbourId(3,879)=880 exch2_iLo(3,879)=35 exch2_iHi(3,879)=35 exch2_jLo(3,879)=0 exch2_jHi(3,879)=52 exch2_opposingSend(3,879)=4 exch2_pij(1,3,879)=1 exch2_pij(2,3,879)=0 exch2_pij(3,3,879)=0 exch2_pij(4,3,879)=1 exch2_oi(3,879)=0 exch2_oj(3,879)=0 exch2_neighbourId(4,879)=878 exch2_iLo(4,879)=0 exch2_iHi(4,879)=0 exch2_jLo(4,879)=0 exch2_jHi(4,879)=52 exch2_opposingSend(4,879)=3 exch2_pij(1,4,879)=1 exch2_pij(2,4,879)=0 exch2_pij(3,4,879)=0 exch2_pij(4,4,879)=1 exch2_oi(4,879)=0 exch2_oj(4,879)=0 RETURN END SUBROUTINE W2_E2SETUP_880 C Topology for tile 880 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(880)=34 exch2_tNy(880)=51 exch2_tBasex(880)=306 exch2_tBasey(880)=408 exch2_txGlobalo(880)=2857 exch2_tyGlobalo(880)=409 exch2_isWedge(880)=0 exch2_isNedge(880)=0 exch2_isEedge(880)=0 exch2_isSedge(880)=0 exch2_myFace(880)=6 exch2_mydNx(880)=510 exch2_mydNy(880)=510 exch2_nNeighbours(880)=4 exch2_neighbourId(1,880)=895 exch2_iLo(1,880)=0 exch2_iHi(1,880)=35 exch2_jLo(1,880)=52 exch2_jHi(1,880)=52 exch2_opposingSend(1,880)=2 exch2_pij(1,1,880)=1 exch2_pij(2,1,880)=0 exch2_pij(3,1,880)=0 exch2_pij(4,1,880)=1 exch2_oi(1,880)=0 exch2_oj(1,880)=0 exch2_neighbourId(2,880)=865 exch2_iLo(2,880)=0 exch2_iHi(2,880)=35 exch2_jLo(2,880)=0 exch2_jHi(2,880)=0 exch2_opposingSend(2,880)=1 exch2_pij(1,2,880)=1 exch2_pij(2,2,880)=0 exch2_pij(3,2,880)=0 exch2_pij(4,2,880)=1 exch2_oi(2,880)=0 exch2_oj(2,880)=0 exch2_neighbourId(3,880)=881 exch2_iLo(3,880)=35 exch2_iHi(3,880)=35 exch2_jLo(3,880)=0 exch2_jHi(3,880)=52 exch2_opposingSend(3,880)=4 exch2_pij(1,3,880)=1 exch2_pij(2,3,880)=0 exch2_pij(3,3,880)=0 exch2_pij(4,3,880)=1 exch2_oi(3,880)=0 exch2_oj(3,880)=0 exch2_neighbourId(4,880)=879 exch2_iLo(4,880)=0 exch2_iHi(4,880)=0 exch2_jLo(4,880)=0 exch2_jHi(4,880)=52 exch2_opposingSend(4,880)=3 exch2_pij(1,4,880)=1 exch2_pij(2,4,880)=0 exch2_pij(3,4,880)=0 exch2_pij(4,4,880)=1 exch2_oi(4,880)=0 exch2_oj(4,880)=0 RETURN END SUBROUTINE W2_E2SETUP_881 C Topology for tile 881 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(881)=34 exch2_tNy(881)=51 exch2_tBasex(881)=340 exch2_tBasey(881)=408 exch2_txGlobalo(881)=2891 exch2_tyGlobalo(881)=409 exch2_isWedge(881)=0 exch2_isNedge(881)=0 exch2_isEedge(881)=0 exch2_isSedge(881)=0 exch2_myFace(881)=6 exch2_mydNx(881)=510 exch2_mydNy(881)=510 exch2_nNeighbours(881)=4 exch2_neighbourId(1,881)=896 exch2_iLo(1,881)=0 exch2_iHi(1,881)=35 exch2_jLo(1,881)=52 exch2_jHi(1,881)=52 exch2_opposingSend(1,881)=2 exch2_pij(1,1,881)=1 exch2_pij(2,1,881)=0 exch2_pij(3,1,881)=0 exch2_pij(4,1,881)=1 exch2_oi(1,881)=0 exch2_oj(1,881)=0 exch2_neighbourId(2,881)=866 exch2_iLo(2,881)=0 exch2_iHi(2,881)=35 exch2_jLo(2,881)=0 exch2_jHi(2,881)=0 exch2_opposingSend(2,881)=1 exch2_pij(1,2,881)=1 exch2_pij(2,2,881)=0 exch2_pij(3,2,881)=0 exch2_pij(4,2,881)=1 exch2_oi(2,881)=0 exch2_oj(2,881)=0 exch2_neighbourId(3,881)=882 exch2_iLo(3,881)=35 exch2_iHi(3,881)=35 exch2_jLo(3,881)=0 exch2_jHi(3,881)=52 exch2_opposingSend(3,881)=4 exch2_pij(1,3,881)=1 exch2_pij(2,3,881)=0 exch2_pij(3,3,881)=0 exch2_pij(4,3,881)=1 exch2_oi(3,881)=0 exch2_oj(3,881)=0 exch2_neighbourId(4,881)=880 exch2_iLo(4,881)=0 exch2_iHi(4,881)=0 exch2_jLo(4,881)=0 exch2_jHi(4,881)=52 exch2_opposingSend(4,881)=3 exch2_pij(1,4,881)=1 exch2_pij(2,4,881)=0 exch2_pij(3,4,881)=0 exch2_pij(4,4,881)=1 exch2_oi(4,881)=0 exch2_oj(4,881)=0 RETURN END SUBROUTINE W2_E2SETUP_882 C Topology for tile 882 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(882)=34 exch2_tNy(882)=51 exch2_tBasex(882)=374 exch2_tBasey(882)=408 exch2_txGlobalo(882)=2925 exch2_tyGlobalo(882)=409 exch2_isWedge(882)=0 exch2_isNedge(882)=0 exch2_isEedge(882)=0 exch2_isSedge(882)=0 exch2_myFace(882)=6 exch2_mydNx(882)=510 exch2_mydNy(882)=510 exch2_nNeighbours(882)=4 exch2_neighbourId(1,882)=897 exch2_iLo(1,882)=0 exch2_iHi(1,882)=35 exch2_jLo(1,882)=52 exch2_jHi(1,882)=52 exch2_opposingSend(1,882)=2 exch2_pij(1,1,882)=1 exch2_pij(2,1,882)=0 exch2_pij(3,1,882)=0 exch2_pij(4,1,882)=1 exch2_oi(1,882)=0 exch2_oj(1,882)=0 exch2_neighbourId(2,882)=867 exch2_iLo(2,882)=0 exch2_iHi(2,882)=35 exch2_jLo(2,882)=0 exch2_jHi(2,882)=0 exch2_opposingSend(2,882)=1 exch2_pij(1,2,882)=1 exch2_pij(2,2,882)=0 exch2_pij(3,2,882)=0 exch2_pij(4,2,882)=1 exch2_oi(2,882)=0 exch2_oj(2,882)=0 exch2_neighbourId(3,882)=883 exch2_iLo(3,882)=35 exch2_iHi(3,882)=35 exch2_jLo(3,882)=0 exch2_jHi(3,882)=52 exch2_opposingSend(3,882)=4 exch2_pij(1,3,882)=1 exch2_pij(2,3,882)=0 exch2_pij(3,3,882)=0 exch2_pij(4,3,882)=1 exch2_oi(3,882)=0 exch2_oj(3,882)=0 exch2_neighbourId(4,882)=881 exch2_iLo(4,882)=0 exch2_iHi(4,882)=0 exch2_jLo(4,882)=0 exch2_jHi(4,882)=52 exch2_opposingSend(4,882)=3 exch2_pij(1,4,882)=1 exch2_pij(2,4,882)=0 exch2_pij(3,4,882)=0 exch2_pij(4,4,882)=1 exch2_oi(4,882)=0 exch2_oj(4,882)=0 RETURN END SUBROUTINE W2_E2SETUP_883 C Topology for tile 883 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(883)=34 exch2_tNy(883)=51 exch2_tBasex(883)=408 exch2_tBasey(883)=408 exch2_txGlobalo(883)=2959 exch2_tyGlobalo(883)=409 exch2_isWedge(883)=0 exch2_isNedge(883)=0 exch2_isEedge(883)=0 exch2_isSedge(883)=0 exch2_myFace(883)=6 exch2_mydNx(883)=510 exch2_mydNy(883)=510 exch2_nNeighbours(883)=4 exch2_neighbourId(1,883)=898 exch2_iLo(1,883)=0 exch2_iHi(1,883)=35 exch2_jLo(1,883)=52 exch2_jHi(1,883)=52 exch2_opposingSend(1,883)=2 exch2_pij(1,1,883)=1 exch2_pij(2,1,883)=0 exch2_pij(3,1,883)=0 exch2_pij(4,1,883)=1 exch2_oi(1,883)=0 exch2_oj(1,883)=0 exch2_neighbourId(2,883)=868 exch2_iLo(2,883)=0 exch2_iHi(2,883)=35 exch2_jLo(2,883)=0 exch2_jHi(2,883)=0 exch2_opposingSend(2,883)=1 exch2_pij(1,2,883)=1 exch2_pij(2,2,883)=0 exch2_pij(3,2,883)=0 exch2_pij(4,2,883)=1 exch2_oi(2,883)=0 exch2_oj(2,883)=0 exch2_neighbourId(3,883)=884 exch2_iLo(3,883)=35 exch2_iHi(3,883)=35 exch2_jLo(3,883)=0 exch2_jHi(3,883)=52 exch2_opposingSend(3,883)=4 exch2_pij(1,3,883)=1 exch2_pij(2,3,883)=0 exch2_pij(3,3,883)=0 exch2_pij(4,3,883)=1 exch2_oi(3,883)=0 exch2_oj(3,883)=0 exch2_neighbourId(4,883)=882 exch2_iLo(4,883)=0 exch2_iHi(4,883)=0 exch2_jLo(4,883)=0 exch2_jHi(4,883)=52 exch2_opposingSend(4,883)=3 exch2_pij(1,4,883)=1 exch2_pij(2,4,883)=0 exch2_pij(3,4,883)=0 exch2_pij(4,4,883)=1 exch2_oi(4,883)=0 exch2_oj(4,883)=0 RETURN END SUBROUTINE W2_E2SETUP_884 C Topology for tile 884 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(884)=34 exch2_tNy(884)=51 exch2_tBasex(884)=442 exch2_tBasey(884)=408 exch2_txGlobalo(884)=2993 exch2_tyGlobalo(884)=409 exch2_isWedge(884)=0 exch2_isNedge(884)=0 exch2_isEedge(884)=0 exch2_isSedge(884)=0 exch2_myFace(884)=6 exch2_mydNx(884)=510 exch2_mydNy(884)=510 exch2_nNeighbours(884)=4 exch2_neighbourId(1,884)=899 exch2_iLo(1,884)=0 exch2_iHi(1,884)=35 exch2_jLo(1,884)=52 exch2_jHi(1,884)=52 exch2_opposingSend(1,884)=2 exch2_pij(1,1,884)=1 exch2_pij(2,1,884)=0 exch2_pij(3,1,884)=0 exch2_pij(4,1,884)=1 exch2_oi(1,884)=0 exch2_oj(1,884)=0 exch2_neighbourId(2,884)=869 exch2_iLo(2,884)=0 exch2_iHi(2,884)=35 exch2_jLo(2,884)=0 exch2_jHi(2,884)=0 exch2_opposingSend(2,884)=1 exch2_pij(1,2,884)=1 exch2_pij(2,2,884)=0 exch2_pij(3,2,884)=0 exch2_pij(4,2,884)=1 exch2_oi(2,884)=0 exch2_oj(2,884)=0 exch2_neighbourId(3,884)=885 exch2_iLo(3,884)=35 exch2_iHi(3,884)=35 exch2_jLo(3,884)=0 exch2_jHi(3,884)=52 exch2_opposingSend(3,884)=5 exch2_pij(1,3,884)=1 exch2_pij(2,3,884)=0 exch2_pij(3,3,884)=0 exch2_pij(4,3,884)=1 exch2_oi(3,884)=0 exch2_oj(3,884)=0 exch2_neighbourId(4,884)=883 exch2_iLo(4,884)=0 exch2_iHi(4,884)=0 exch2_jLo(4,884)=0 exch2_jHi(4,884)=52 exch2_opposingSend(4,884)=3 exch2_pij(1,4,884)=1 exch2_pij(2,4,884)=0 exch2_pij(3,4,884)=0 exch2_pij(4,4,884)=1 exch2_oi(4,884)=0 exch2_oj(4,884)=0 RETURN END SUBROUTINE W2_E2SETUP_885 C Topology for tile 885 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(885)=34 exch2_tNy(885)=51 exch2_tBasex(885)=476 exch2_tBasey(885)=408 exch2_txGlobalo(885)=3027 exch2_tyGlobalo(885)=409 exch2_isWedge(885)=0 exch2_isNedge(885)=0 exch2_isEedge(885)=1 exch2_isSedge(885)=0 exch2_myFace(885)=6 exch2_mydNx(885)=510 exch2_mydNy(885)=510 exch2_nNeighbours(885)=5 exch2_neighbourId(1,885)=900 exch2_iLo(1,885)=0 exch2_iHi(1,885)=35 exch2_jLo(1,885)=52 exch2_jHi(1,885)=52 exch2_opposingSend(1,885)=2 exch2_pij(1,1,885)=1 exch2_pij(2,1,885)=0 exch2_pij(3,1,885)=0 exch2_pij(4,1,885)=1 exch2_oi(1,885)=0 exch2_oj(1,885)=0 exch2_neighbourId(2,885)=870 exch2_iLo(2,885)=0 exch2_iHi(2,885)=35 exch2_jLo(2,885)=0 exch2_jHi(2,885)=0 exch2_opposingSend(2,885)=1 exch2_pij(1,2,885)=1 exch2_pij(2,2,885)=0 exch2_pij(3,2,885)=0 exch2_pij(4,2,885)=1 exch2_oi(2,885)=0 exch2_oj(2,885)=0 exch2_neighbourId(3,885)=152 exch2_iLo(3,885)=35 exch2_iHi(3,885)=35 exch2_jLo(3,885)=34 exch2_jHi(3,885)=52 exch2_opposingSend(3,885)=2 exch2_pij(1,3,885)=0 exch2_pij(2,3,885)=1 exch2_pij(3,3,885)=-1 exch2_pij(4,3,885)=0 exch2_oi(3,885)=510 exch2_oj(3,885)=511 exch2_neighbourId(4,885)=153 exch2_iLo(4,885)=35 exch2_iHi(4,885)=35 exch2_jLo(4,885)=0 exch2_jHi(4,885)=35 exch2_opposingSend(4,885)=2 exch2_pij(1,4,885)=0 exch2_pij(2,4,885)=1 exch2_pij(3,4,885)=-1 exch2_pij(4,4,885)=0 exch2_oi(4,885)=510 exch2_oj(4,885)=511 exch2_neighbourId(5,885)=884 exch2_iLo(5,885)=0 exch2_iHi(5,885)=0 exch2_jLo(5,885)=0 exch2_jHi(5,885)=52 exch2_opposingSend(5,885)=3 exch2_pij(1,5,885)=1 exch2_pij(2,5,885)=0 exch2_pij(3,5,885)=0 exch2_pij(4,5,885)=1 exch2_oi(5,885)=0 exch2_oj(5,885)=0 RETURN END SUBROUTINE W2_E2SETUP_886 C Topology for tile 886 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(886)=34 exch2_tNy(886)=51 exch2_tBasex(886)=0 exch2_tBasey(886)=459 exch2_txGlobalo(886)=2551 exch2_tyGlobalo(886)=460 exch2_isWedge(886)=1 exch2_isNedge(886)=1 exch2_isEedge(886)=0 exch2_isSedge(886)=0 exch2_myFace(886)=6 exch2_mydNx(886)=510 exch2_mydNy(886)=510 exch2_nNeighbours(886)=4 exch2_neighbourId(1,886)=1 exch2_iLo(1,886)=0 exch2_iHi(1,886)=35 exch2_jLo(1,886)=52 exch2_jHi(1,886)=52 exch2_opposingSend(1,886)=2 exch2_pij(1,1,886)=1 exch2_pij(2,1,886)=0 exch2_pij(3,1,886)=0 exch2_pij(4,1,886)=1 exch2_oi(1,886)=0 exch2_oj(1,886)=510 exch2_neighbourId(2,886)=871 exch2_iLo(2,886)=0 exch2_iHi(2,886)=35 exch2_jLo(2,886)=0 exch2_jHi(2,886)=0 exch2_opposingSend(2,886)=1 exch2_pij(1,2,886)=1 exch2_pij(2,2,886)=0 exch2_pij(3,2,886)=0 exch2_pij(4,2,886)=1 exch2_oi(2,886)=0 exch2_oj(2,886)=0 exch2_neighbourId(3,886)=887 exch2_iLo(3,886)=35 exch2_iHi(3,886)=35 exch2_jLo(3,886)=0 exch2_jHi(3,886)=52 exch2_opposingSend(3,886)=4 exch2_pij(1,3,886)=1 exch2_pij(2,3,886)=0 exch2_pij(3,3,886)=0 exch2_pij(4,3,886)=1 exch2_oi(3,886)=0 exch2_oj(3,886)=0 exch2_neighbourId(4,886)=750 exch2_iLo(4,886)=0 exch2_iHi(4,886)=0 exch2_jLo(4,886)=0 exch2_jHi(4,886)=52 exch2_opposingSend(4,886)=3 exch2_pij(1,4,886)=1 exch2_pij(2,4,886)=0 exch2_pij(3,4,886)=0 exch2_pij(4,4,886)=1 exch2_oi(4,886)=-510 exch2_oj(4,886)=0 RETURN END SUBROUTINE W2_E2SETUP_887 C Topology for tile 887 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(887)=34 exch2_tNy(887)=51 exch2_tBasex(887)=34 exch2_tBasey(887)=459 exch2_txGlobalo(887)=2585 exch2_tyGlobalo(887)=460 exch2_isWedge(887)=0 exch2_isNedge(887)=1 exch2_isEedge(887)=0 exch2_isSedge(887)=0 exch2_myFace(887)=6 exch2_mydNx(887)=510 exch2_mydNy(887)=510 exch2_nNeighbours(887)=4 exch2_neighbourId(1,887)=2 exch2_iLo(1,887)=0 exch2_iHi(1,887)=35 exch2_jLo(1,887)=52 exch2_jHi(1,887)=52 exch2_opposingSend(1,887)=2 exch2_pij(1,1,887)=1 exch2_pij(2,1,887)=0 exch2_pij(3,1,887)=0 exch2_pij(4,1,887)=1 exch2_oi(1,887)=0 exch2_oj(1,887)=510 exch2_neighbourId(2,887)=872 exch2_iLo(2,887)=0 exch2_iHi(2,887)=35 exch2_jLo(2,887)=0 exch2_jHi(2,887)=0 exch2_opposingSend(2,887)=1 exch2_pij(1,2,887)=1 exch2_pij(2,2,887)=0 exch2_pij(3,2,887)=0 exch2_pij(4,2,887)=1 exch2_oi(2,887)=0 exch2_oj(2,887)=0 exch2_neighbourId(3,887)=888 exch2_iLo(3,887)=35 exch2_iHi(3,887)=35 exch2_jLo(3,887)=0 exch2_jHi(3,887)=52 exch2_opposingSend(3,887)=4 exch2_pij(1,3,887)=1 exch2_pij(2,3,887)=0 exch2_pij(3,3,887)=0 exch2_pij(4,3,887)=1 exch2_oi(3,887)=0 exch2_oj(3,887)=0 exch2_neighbourId(4,887)=886 exch2_iLo(4,887)=0 exch2_iHi(4,887)=0 exch2_jLo(4,887)=0 exch2_jHi(4,887)=52 exch2_opposingSend(4,887)=3 exch2_pij(1,4,887)=1 exch2_pij(2,4,887)=0 exch2_pij(3,4,887)=0 exch2_pij(4,4,887)=1 exch2_oi(4,887)=0 exch2_oj(4,887)=0 RETURN END SUBROUTINE W2_E2SETUP_888 C Topology for tile 888 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(888)=34 exch2_tNy(888)=51 exch2_tBasex(888)=68 exch2_tBasey(888)=459 exch2_txGlobalo(888)=2619 exch2_tyGlobalo(888)=460 exch2_isWedge(888)=0 exch2_isNedge(888)=1 exch2_isEedge(888)=0 exch2_isSedge(888)=0 exch2_myFace(888)=6 exch2_mydNx(888)=510 exch2_mydNy(888)=510 exch2_nNeighbours(888)=4 exch2_neighbourId(1,888)=3 exch2_iLo(1,888)=0 exch2_iHi(1,888)=35 exch2_jLo(1,888)=52 exch2_jHi(1,888)=52 exch2_opposingSend(1,888)=2 exch2_pij(1,1,888)=1 exch2_pij(2,1,888)=0 exch2_pij(3,1,888)=0 exch2_pij(4,1,888)=1 exch2_oi(1,888)=0 exch2_oj(1,888)=510 exch2_neighbourId(2,888)=873 exch2_iLo(2,888)=0 exch2_iHi(2,888)=35 exch2_jLo(2,888)=0 exch2_jHi(2,888)=0 exch2_opposingSend(2,888)=1 exch2_pij(1,2,888)=1 exch2_pij(2,2,888)=0 exch2_pij(3,2,888)=0 exch2_pij(4,2,888)=1 exch2_oi(2,888)=0 exch2_oj(2,888)=0 exch2_neighbourId(3,888)=889 exch2_iLo(3,888)=35 exch2_iHi(3,888)=35 exch2_jLo(3,888)=0 exch2_jHi(3,888)=52 exch2_opposingSend(3,888)=4 exch2_pij(1,3,888)=1 exch2_pij(2,3,888)=0 exch2_pij(3,3,888)=0 exch2_pij(4,3,888)=1 exch2_oi(3,888)=0 exch2_oj(3,888)=0 exch2_neighbourId(4,888)=887 exch2_iLo(4,888)=0 exch2_iHi(4,888)=0 exch2_jLo(4,888)=0 exch2_jHi(4,888)=52 exch2_opposingSend(4,888)=3 exch2_pij(1,4,888)=1 exch2_pij(2,4,888)=0 exch2_pij(3,4,888)=0 exch2_pij(4,4,888)=1 exch2_oi(4,888)=0 exch2_oj(4,888)=0 RETURN END SUBROUTINE W2_E2SETUP_889 C Topology for tile 889 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(889)=34 exch2_tNy(889)=51 exch2_tBasex(889)=102 exch2_tBasey(889)=459 exch2_txGlobalo(889)=2653 exch2_tyGlobalo(889)=460 exch2_isWedge(889)=0 exch2_isNedge(889)=1 exch2_isEedge(889)=0 exch2_isSedge(889)=0 exch2_myFace(889)=6 exch2_mydNx(889)=510 exch2_mydNy(889)=510 exch2_nNeighbours(889)=4 exch2_neighbourId(1,889)=4 exch2_iLo(1,889)=0 exch2_iHi(1,889)=35 exch2_jLo(1,889)=52 exch2_jHi(1,889)=52 exch2_opposingSend(1,889)=2 exch2_pij(1,1,889)=1 exch2_pij(2,1,889)=0 exch2_pij(3,1,889)=0 exch2_pij(4,1,889)=1 exch2_oi(1,889)=0 exch2_oj(1,889)=510 exch2_neighbourId(2,889)=874 exch2_iLo(2,889)=0 exch2_iHi(2,889)=35 exch2_jLo(2,889)=0 exch2_jHi(2,889)=0 exch2_opposingSend(2,889)=1 exch2_pij(1,2,889)=1 exch2_pij(2,2,889)=0 exch2_pij(3,2,889)=0 exch2_pij(4,2,889)=1 exch2_oi(2,889)=0 exch2_oj(2,889)=0 exch2_neighbourId(3,889)=890 exch2_iLo(3,889)=35 exch2_iHi(3,889)=35 exch2_jLo(3,889)=0 exch2_jHi(3,889)=52 exch2_opposingSend(3,889)=4 exch2_pij(1,3,889)=1 exch2_pij(2,3,889)=0 exch2_pij(3,3,889)=0 exch2_pij(4,3,889)=1 exch2_oi(3,889)=0 exch2_oj(3,889)=0 exch2_neighbourId(4,889)=888 exch2_iLo(4,889)=0 exch2_iHi(4,889)=0 exch2_jLo(4,889)=0 exch2_jHi(4,889)=52 exch2_opposingSend(4,889)=3 exch2_pij(1,4,889)=1 exch2_pij(2,4,889)=0 exch2_pij(3,4,889)=0 exch2_pij(4,4,889)=1 exch2_oi(4,889)=0 exch2_oj(4,889)=0 RETURN END SUBROUTINE W2_E2SETUP_890 C Topology for tile 890 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(890)=34 exch2_tNy(890)=51 exch2_tBasex(890)=136 exch2_tBasey(890)=459 exch2_txGlobalo(890)=2687 exch2_tyGlobalo(890)=460 exch2_isWedge(890)=0 exch2_isNedge(890)=1 exch2_isEedge(890)=0 exch2_isSedge(890)=0 exch2_myFace(890)=6 exch2_mydNx(890)=510 exch2_mydNy(890)=510 exch2_nNeighbours(890)=4 exch2_neighbourId(1,890)=5 exch2_iLo(1,890)=0 exch2_iHi(1,890)=35 exch2_jLo(1,890)=52 exch2_jHi(1,890)=52 exch2_opposingSend(1,890)=2 exch2_pij(1,1,890)=1 exch2_pij(2,1,890)=0 exch2_pij(3,1,890)=0 exch2_pij(4,1,890)=1 exch2_oi(1,890)=0 exch2_oj(1,890)=510 exch2_neighbourId(2,890)=875 exch2_iLo(2,890)=0 exch2_iHi(2,890)=35 exch2_jLo(2,890)=0 exch2_jHi(2,890)=0 exch2_opposingSend(2,890)=1 exch2_pij(1,2,890)=1 exch2_pij(2,2,890)=0 exch2_pij(3,2,890)=0 exch2_pij(4,2,890)=1 exch2_oi(2,890)=0 exch2_oj(2,890)=0 exch2_neighbourId(3,890)=891 exch2_iLo(3,890)=35 exch2_iHi(3,890)=35 exch2_jLo(3,890)=0 exch2_jHi(3,890)=52 exch2_opposingSend(3,890)=4 exch2_pij(1,3,890)=1 exch2_pij(2,3,890)=0 exch2_pij(3,3,890)=0 exch2_pij(4,3,890)=1 exch2_oi(3,890)=0 exch2_oj(3,890)=0 exch2_neighbourId(4,890)=889 exch2_iLo(4,890)=0 exch2_iHi(4,890)=0 exch2_jLo(4,890)=0 exch2_jHi(4,890)=52 exch2_opposingSend(4,890)=3 exch2_pij(1,4,890)=1 exch2_pij(2,4,890)=0 exch2_pij(3,4,890)=0 exch2_pij(4,4,890)=1 exch2_oi(4,890)=0 exch2_oj(4,890)=0 RETURN END SUBROUTINE W2_E2SETUP_891 C Topology for tile 891 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(891)=34 exch2_tNy(891)=51 exch2_tBasex(891)=170 exch2_tBasey(891)=459 exch2_txGlobalo(891)=2721 exch2_tyGlobalo(891)=460 exch2_isWedge(891)=0 exch2_isNedge(891)=1 exch2_isEedge(891)=0 exch2_isSedge(891)=0 exch2_myFace(891)=6 exch2_mydNx(891)=510 exch2_mydNy(891)=510 exch2_nNeighbours(891)=4 exch2_neighbourId(1,891)=6 exch2_iLo(1,891)=0 exch2_iHi(1,891)=35 exch2_jLo(1,891)=52 exch2_jHi(1,891)=52 exch2_opposingSend(1,891)=2 exch2_pij(1,1,891)=1 exch2_pij(2,1,891)=0 exch2_pij(3,1,891)=0 exch2_pij(4,1,891)=1 exch2_oi(1,891)=0 exch2_oj(1,891)=510 exch2_neighbourId(2,891)=876 exch2_iLo(2,891)=0 exch2_iHi(2,891)=35 exch2_jLo(2,891)=0 exch2_jHi(2,891)=0 exch2_opposingSend(2,891)=1 exch2_pij(1,2,891)=1 exch2_pij(2,2,891)=0 exch2_pij(3,2,891)=0 exch2_pij(4,2,891)=1 exch2_oi(2,891)=0 exch2_oj(2,891)=0 exch2_neighbourId(3,891)=892 exch2_iLo(3,891)=35 exch2_iHi(3,891)=35 exch2_jLo(3,891)=0 exch2_jHi(3,891)=52 exch2_opposingSend(3,891)=4 exch2_pij(1,3,891)=1 exch2_pij(2,3,891)=0 exch2_pij(3,3,891)=0 exch2_pij(4,3,891)=1 exch2_oi(3,891)=0 exch2_oj(3,891)=0 exch2_neighbourId(4,891)=890 exch2_iLo(4,891)=0 exch2_iHi(4,891)=0 exch2_jLo(4,891)=0 exch2_jHi(4,891)=52 exch2_opposingSend(4,891)=3 exch2_pij(1,4,891)=1 exch2_pij(2,4,891)=0 exch2_pij(3,4,891)=0 exch2_pij(4,4,891)=1 exch2_oi(4,891)=0 exch2_oj(4,891)=0 RETURN END SUBROUTINE W2_E2SETUP_892 C Topology for tile 892 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(892)=34 exch2_tNy(892)=51 exch2_tBasex(892)=204 exch2_tBasey(892)=459 exch2_txGlobalo(892)=2755 exch2_tyGlobalo(892)=460 exch2_isWedge(892)=0 exch2_isNedge(892)=1 exch2_isEedge(892)=0 exch2_isSedge(892)=0 exch2_myFace(892)=6 exch2_mydNx(892)=510 exch2_mydNy(892)=510 exch2_nNeighbours(892)=4 exch2_neighbourId(1,892)=7 exch2_iLo(1,892)=0 exch2_iHi(1,892)=35 exch2_jLo(1,892)=52 exch2_jHi(1,892)=52 exch2_opposingSend(1,892)=2 exch2_pij(1,1,892)=1 exch2_pij(2,1,892)=0 exch2_pij(3,1,892)=0 exch2_pij(4,1,892)=1 exch2_oi(1,892)=0 exch2_oj(1,892)=510 exch2_neighbourId(2,892)=877 exch2_iLo(2,892)=0 exch2_iHi(2,892)=35 exch2_jLo(2,892)=0 exch2_jHi(2,892)=0 exch2_opposingSend(2,892)=1 exch2_pij(1,2,892)=1 exch2_pij(2,2,892)=0 exch2_pij(3,2,892)=0 exch2_pij(4,2,892)=1 exch2_oi(2,892)=0 exch2_oj(2,892)=0 exch2_neighbourId(3,892)=893 exch2_iLo(3,892)=35 exch2_iHi(3,892)=35 exch2_jLo(3,892)=0 exch2_jHi(3,892)=52 exch2_opposingSend(3,892)=4 exch2_pij(1,3,892)=1 exch2_pij(2,3,892)=0 exch2_pij(3,3,892)=0 exch2_pij(4,3,892)=1 exch2_oi(3,892)=0 exch2_oj(3,892)=0 exch2_neighbourId(4,892)=891 exch2_iLo(4,892)=0 exch2_iHi(4,892)=0 exch2_jLo(4,892)=0 exch2_jHi(4,892)=52 exch2_opposingSend(4,892)=3 exch2_pij(1,4,892)=1 exch2_pij(2,4,892)=0 exch2_pij(3,4,892)=0 exch2_pij(4,4,892)=1 exch2_oi(4,892)=0 exch2_oj(4,892)=0 RETURN END SUBROUTINE W2_E2SETUP_893 C Topology for tile 893 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(893)=34 exch2_tNy(893)=51 exch2_tBasex(893)=238 exch2_tBasey(893)=459 exch2_txGlobalo(893)=2789 exch2_tyGlobalo(893)=460 exch2_isWedge(893)=0 exch2_isNedge(893)=1 exch2_isEedge(893)=0 exch2_isSedge(893)=0 exch2_myFace(893)=6 exch2_mydNx(893)=510 exch2_mydNy(893)=510 exch2_nNeighbours(893)=4 exch2_neighbourId(1,893)=8 exch2_iLo(1,893)=0 exch2_iHi(1,893)=35 exch2_jLo(1,893)=52 exch2_jHi(1,893)=52 exch2_opposingSend(1,893)=2 exch2_pij(1,1,893)=1 exch2_pij(2,1,893)=0 exch2_pij(3,1,893)=0 exch2_pij(4,1,893)=1 exch2_oi(1,893)=0 exch2_oj(1,893)=510 exch2_neighbourId(2,893)=878 exch2_iLo(2,893)=0 exch2_iHi(2,893)=35 exch2_jLo(2,893)=0 exch2_jHi(2,893)=0 exch2_opposingSend(2,893)=1 exch2_pij(1,2,893)=1 exch2_pij(2,2,893)=0 exch2_pij(3,2,893)=0 exch2_pij(4,2,893)=1 exch2_oi(2,893)=0 exch2_oj(2,893)=0 exch2_neighbourId(3,893)=894 exch2_iLo(3,893)=35 exch2_iHi(3,893)=35 exch2_jLo(3,893)=0 exch2_jHi(3,893)=52 exch2_opposingSend(3,893)=4 exch2_pij(1,3,893)=1 exch2_pij(2,3,893)=0 exch2_pij(3,3,893)=0 exch2_pij(4,3,893)=1 exch2_oi(3,893)=0 exch2_oj(3,893)=0 exch2_neighbourId(4,893)=892 exch2_iLo(4,893)=0 exch2_iHi(4,893)=0 exch2_jLo(4,893)=0 exch2_jHi(4,893)=52 exch2_opposingSend(4,893)=3 exch2_pij(1,4,893)=1 exch2_pij(2,4,893)=0 exch2_pij(3,4,893)=0 exch2_pij(4,4,893)=1 exch2_oi(4,893)=0 exch2_oj(4,893)=0 RETURN END SUBROUTINE W2_E2SETUP_894 C Topology for tile 894 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(894)=34 exch2_tNy(894)=51 exch2_tBasex(894)=272 exch2_tBasey(894)=459 exch2_txGlobalo(894)=2823 exch2_tyGlobalo(894)=460 exch2_isWedge(894)=0 exch2_isNedge(894)=1 exch2_isEedge(894)=0 exch2_isSedge(894)=0 exch2_myFace(894)=6 exch2_mydNx(894)=510 exch2_mydNy(894)=510 exch2_nNeighbours(894)=4 exch2_neighbourId(1,894)=9 exch2_iLo(1,894)=0 exch2_iHi(1,894)=35 exch2_jLo(1,894)=52 exch2_jHi(1,894)=52 exch2_opposingSend(1,894)=2 exch2_pij(1,1,894)=1 exch2_pij(2,1,894)=0 exch2_pij(3,1,894)=0 exch2_pij(4,1,894)=1 exch2_oi(1,894)=0 exch2_oj(1,894)=510 exch2_neighbourId(2,894)=879 exch2_iLo(2,894)=0 exch2_iHi(2,894)=35 exch2_jLo(2,894)=0 exch2_jHi(2,894)=0 exch2_opposingSend(2,894)=1 exch2_pij(1,2,894)=1 exch2_pij(2,2,894)=0 exch2_pij(3,2,894)=0 exch2_pij(4,2,894)=1 exch2_oi(2,894)=0 exch2_oj(2,894)=0 exch2_neighbourId(3,894)=895 exch2_iLo(3,894)=35 exch2_iHi(3,894)=35 exch2_jLo(3,894)=0 exch2_jHi(3,894)=52 exch2_opposingSend(3,894)=4 exch2_pij(1,3,894)=1 exch2_pij(2,3,894)=0 exch2_pij(3,3,894)=0 exch2_pij(4,3,894)=1 exch2_oi(3,894)=0 exch2_oj(3,894)=0 exch2_neighbourId(4,894)=893 exch2_iLo(4,894)=0 exch2_iHi(4,894)=0 exch2_jLo(4,894)=0 exch2_jHi(4,894)=52 exch2_opposingSend(4,894)=3 exch2_pij(1,4,894)=1 exch2_pij(2,4,894)=0 exch2_pij(3,4,894)=0 exch2_pij(4,4,894)=1 exch2_oi(4,894)=0 exch2_oj(4,894)=0 RETURN END SUBROUTINE W2_E2SETUP_895 C Topology for tile 895 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(895)=34 exch2_tNy(895)=51 exch2_tBasex(895)=306 exch2_tBasey(895)=459 exch2_txGlobalo(895)=2857 exch2_tyGlobalo(895)=460 exch2_isWedge(895)=0 exch2_isNedge(895)=1 exch2_isEedge(895)=0 exch2_isSedge(895)=0 exch2_myFace(895)=6 exch2_mydNx(895)=510 exch2_mydNy(895)=510 exch2_nNeighbours(895)=4 exch2_neighbourId(1,895)=10 exch2_iLo(1,895)=0 exch2_iHi(1,895)=35 exch2_jLo(1,895)=52 exch2_jHi(1,895)=52 exch2_opposingSend(1,895)=2 exch2_pij(1,1,895)=1 exch2_pij(2,1,895)=0 exch2_pij(3,1,895)=0 exch2_pij(4,1,895)=1 exch2_oi(1,895)=0 exch2_oj(1,895)=510 exch2_neighbourId(2,895)=880 exch2_iLo(2,895)=0 exch2_iHi(2,895)=35 exch2_jLo(2,895)=0 exch2_jHi(2,895)=0 exch2_opposingSend(2,895)=1 exch2_pij(1,2,895)=1 exch2_pij(2,2,895)=0 exch2_pij(3,2,895)=0 exch2_pij(4,2,895)=1 exch2_oi(2,895)=0 exch2_oj(2,895)=0 exch2_neighbourId(3,895)=896 exch2_iLo(3,895)=35 exch2_iHi(3,895)=35 exch2_jLo(3,895)=0 exch2_jHi(3,895)=52 exch2_opposingSend(3,895)=4 exch2_pij(1,3,895)=1 exch2_pij(2,3,895)=0 exch2_pij(3,3,895)=0 exch2_pij(4,3,895)=1 exch2_oi(3,895)=0 exch2_oj(3,895)=0 exch2_neighbourId(4,895)=894 exch2_iLo(4,895)=0 exch2_iHi(4,895)=0 exch2_jLo(4,895)=0 exch2_jHi(4,895)=52 exch2_opposingSend(4,895)=3 exch2_pij(1,4,895)=1 exch2_pij(2,4,895)=0 exch2_pij(3,4,895)=0 exch2_pij(4,4,895)=1 exch2_oi(4,895)=0 exch2_oj(4,895)=0 RETURN END SUBROUTINE W2_E2SETUP_896 C Topology for tile 896 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(896)=34 exch2_tNy(896)=51 exch2_tBasex(896)=340 exch2_tBasey(896)=459 exch2_txGlobalo(896)=2891 exch2_tyGlobalo(896)=460 exch2_isWedge(896)=0 exch2_isNedge(896)=1 exch2_isEedge(896)=0 exch2_isSedge(896)=0 exch2_myFace(896)=6 exch2_mydNx(896)=510 exch2_mydNy(896)=510 exch2_nNeighbours(896)=4 exch2_neighbourId(1,896)=11 exch2_iLo(1,896)=0 exch2_iHi(1,896)=35 exch2_jLo(1,896)=52 exch2_jHi(1,896)=52 exch2_opposingSend(1,896)=2 exch2_pij(1,1,896)=1 exch2_pij(2,1,896)=0 exch2_pij(3,1,896)=0 exch2_pij(4,1,896)=1 exch2_oi(1,896)=0 exch2_oj(1,896)=510 exch2_neighbourId(2,896)=881 exch2_iLo(2,896)=0 exch2_iHi(2,896)=35 exch2_jLo(2,896)=0 exch2_jHi(2,896)=0 exch2_opposingSend(2,896)=1 exch2_pij(1,2,896)=1 exch2_pij(2,2,896)=0 exch2_pij(3,2,896)=0 exch2_pij(4,2,896)=1 exch2_oi(2,896)=0 exch2_oj(2,896)=0 exch2_neighbourId(3,896)=897 exch2_iLo(3,896)=35 exch2_iHi(3,896)=35 exch2_jLo(3,896)=0 exch2_jHi(3,896)=52 exch2_opposingSend(3,896)=4 exch2_pij(1,3,896)=1 exch2_pij(2,3,896)=0 exch2_pij(3,3,896)=0 exch2_pij(4,3,896)=1 exch2_oi(3,896)=0 exch2_oj(3,896)=0 exch2_neighbourId(4,896)=895 exch2_iLo(4,896)=0 exch2_iHi(4,896)=0 exch2_jLo(4,896)=0 exch2_jHi(4,896)=52 exch2_opposingSend(4,896)=3 exch2_pij(1,4,896)=1 exch2_pij(2,4,896)=0 exch2_pij(3,4,896)=0 exch2_pij(4,4,896)=1 exch2_oi(4,896)=0 exch2_oj(4,896)=0 RETURN END SUBROUTINE W2_E2SETUP_897 C Topology for tile 897 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(897)=34 exch2_tNy(897)=51 exch2_tBasex(897)=374 exch2_tBasey(897)=459 exch2_txGlobalo(897)=2925 exch2_tyGlobalo(897)=460 exch2_isWedge(897)=0 exch2_isNedge(897)=1 exch2_isEedge(897)=0 exch2_isSedge(897)=0 exch2_myFace(897)=6 exch2_mydNx(897)=510 exch2_mydNy(897)=510 exch2_nNeighbours(897)=4 exch2_neighbourId(1,897)=12 exch2_iLo(1,897)=0 exch2_iHi(1,897)=35 exch2_jLo(1,897)=52 exch2_jHi(1,897)=52 exch2_opposingSend(1,897)=2 exch2_pij(1,1,897)=1 exch2_pij(2,1,897)=0 exch2_pij(3,1,897)=0 exch2_pij(4,1,897)=1 exch2_oi(1,897)=0 exch2_oj(1,897)=510 exch2_neighbourId(2,897)=882 exch2_iLo(2,897)=0 exch2_iHi(2,897)=35 exch2_jLo(2,897)=0 exch2_jHi(2,897)=0 exch2_opposingSend(2,897)=1 exch2_pij(1,2,897)=1 exch2_pij(2,2,897)=0 exch2_pij(3,2,897)=0 exch2_pij(4,2,897)=1 exch2_oi(2,897)=0 exch2_oj(2,897)=0 exch2_neighbourId(3,897)=898 exch2_iLo(3,897)=35 exch2_iHi(3,897)=35 exch2_jLo(3,897)=0 exch2_jHi(3,897)=52 exch2_opposingSend(3,897)=4 exch2_pij(1,3,897)=1 exch2_pij(2,3,897)=0 exch2_pij(3,3,897)=0 exch2_pij(4,3,897)=1 exch2_oi(3,897)=0 exch2_oj(3,897)=0 exch2_neighbourId(4,897)=896 exch2_iLo(4,897)=0 exch2_iHi(4,897)=0 exch2_jLo(4,897)=0 exch2_jHi(4,897)=52 exch2_opposingSend(4,897)=3 exch2_pij(1,4,897)=1 exch2_pij(2,4,897)=0 exch2_pij(3,4,897)=0 exch2_pij(4,4,897)=1 exch2_oi(4,897)=0 exch2_oj(4,897)=0 RETURN END SUBROUTINE W2_E2SETUP_898 C Topology for tile 898 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(898)=34 exch2_tNy(898)=51 exch2_tBasex(898)=408 exch2_tBasey(898)=459 exch2_txGlobalo(898)=2959 exch2_tyGlobalo(898)=460 exch2_isWedge(898)=0 exch2_isNedge(898)=1 exch2_isEedge(898)=0 exch2_isSedge(898)=0 exch2_myFace(898)=6 exch2_mydNx(898)=510 exch2_mydNy(898)=510 exch2_nNeighbours(898)=4 exch2_neighbourId(1,898)=13 exch2_iLo(1,898)=0 exch2_iHi(1,898)=35 exch2_jLo(1,898)=52 exch2_jHi(1,898)=52 exch2_opposingSend(1,898)=2 exch2_pij(1,1,898)=1 exch2_pij(2,1,898)=0 exch2_pij(3,1,898)=0 exch2_pij(4,1,898)=1 exch2_oi(1,898)=0 exch2_oj(1,898)=510 exch2_neighbourId(2,898)=883 exch2_iLo(2,898)=0 exch2_iHi(2,898)=35 exch2_jLo(2,898)=0 exch2_jHi(2,898)=0 exch2_opposingSend(2,898)=1 exch2_pij(1,2,898)=1 exch2_pij(2,2,898)=0 exch2_pij(3,2,898)=0 exch2_pij(4,2,898)=1 exch2_oi(2,898)=0 exch2_oj(2,898)=0 exch2_neighbourId(3,898)=899 exch2_iLo(3,898)=35 exch2_iHi(3,898)=35 exch2_jLo(3,898)=0 exch2_jHi(3,898)=52 exch2_opposingSend(3,898)=4 exch2_pij(1,3,898)=1 exch2_pij(2,3,898)=0 exch2_pij(3,3,898)=0 exch2_pij(4,3,898)=1 exch2_oi(3,898)=0 exch2_oj(3,898)=0 exch2_neighbourId(4,898)=897 exch2_iLo(4,898)=0 exch2_iHi(4,898)=0 exch2_jLo(4,898)=0 exch2_jHi(4,898)=52 exch2_opposingSend(4,898)=3 exch2_pij(1,4,898)=1 exch2_pij(2,4,898)=0 exch2_pij(3,4,898)=0 exch2_pij(4,4,898)=1 exch2_oi(4,898)=0 exch2_oj(4,898)=0 RETURN END SUBROUTINE W2_E2SETUP_899 C Topology for tile 899 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(899)=34 exch2_tNy(899)=51 exch2_tBasex(899)=442 exch2_tBasey(899)=459 exch2_txGlobalo(899)=2993 exch2_tyGlobalo(899)=460 exch2_isWedge(899)=0 exch2_isNedge(899)=1 exch2_isEedge(899)=0 exch2_isSedge(899)=0 exch2_myFace(899)=6 exch2_mydNx(899)=510 exch2_mydNy(899)=510 exch2_nNeighbours(899)=4 exch2_neighbourId(1,899)=14 exch2_iLo(1,899)=0 exch2_iHi(1,899)=35 exch2_jLo(1,899)=52 exch2_jHi(1,899)=52 exch2_opposingSend(1,899)=2 exch2_pij(1,1,899)=1 exch2_pij(2,1,899)=0 exch2_pij(3,1,899)=0 exch2_pij(4,1,899)=1 exch2_oi(1,899)=0 exch2_oj(1,899)=510 exch2_neighbourId(2,899)=884 exch2_iLo(2,899)=0 exch2_iHi(2,899)=35 exch2_jLo(2,899)=0 exch2_jHi(2,899)=0 exch2_opposingSend(2,899)=1 exch2_pij(1,2,899)=1 exch2_pij(2,2,899)=0 exch2_pij(3,2,899)=0 exch2_pij(4,2,899)=1 exch2_oi(2,899)=0 exch2_oj(2,899)=0 exch2_neighbourId(3,899)=900 exch2_iLo(3,899)=35 exch2_iHi(3,899)=35 exch2_jLo(3,899)=0 exch2_jHi(3,899)=52 exch2_opposingSend(3,899)=5 exch2_pij(1,3,899)=1 exch2_pij(2,3,899)=0 exch2_pij(3,3,899)=0 exch2_pij(4,3,899)=1 exch2_oi(3,899)=0 exch2_oj(3,899)=0 exch2_neighbourId(4,899)=898 exch2_iLo(4,899)=0 exch2_iHi(4,899)=0 exch2_jLo(4,899)=0 exch2_jHi(4,899)=52 exch2_opposingSend(4,899)=3 exch2_pij(1,4,899)=1 exch2_pij(2,4,899)=0 exch2_pij(3,4,899)=0 exch2_pij(4,4,899)=1 exch2_oi(4,899)=0 exch2_oj(4,899)=0 RETURN END SUBROUTINE W2_E2SETUP_900 C Topology for tile 900 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(900)=34 exch2_tNy(900)=51 exch2_tBasex(900)=476 exch2_tBasey(900)=459 exch2_txGlobalo(900)=3027 exch2_tyGlobalo(900)=460 exch2_isWedge(900)=0 exch2_isNedge(900)=1 exch2_isEedge(900)=1 exch2_isSedge(900)=0 exch2_myFace(900)=6 exch2_mydNx(900)=510 exch2_mydNy(900)=510 exch2_nNeighbours(900)=5 exch2_neighbourId(1,900)=15 exch2_iLo(1,900)=0 exch2_iHi(1,900)=35 exch2_jLo(1,900)=52 exch2_jHi(1,900)=52 exch2_opposingSend(1,900)=2 exch2_pij(1,1,900)=1 exch2_pij(2,1,900)=0 exch2_pij(3,1,900)=0 exch2_pij(4,1,900)=1 exch2_oi(1,900)=0 exch2_oj(1,900)=510 exch2_neighbourId(2,900)=885 exch2_iLo(2,900)=0 exch2_iHi(2,900)=35 exch2_jLo(2,900)=0 exch2_jHi(2,900)=0 exch2_opposingSend(2,900)=1 exch2_pij(1,2,900)=1 exch2_pij(2,2,900)=0 exch2_pij(3,2,900)=0 exch2_pij(4,2,900)=1 exch2_oi(2,900)=0 exch2_oj(2,900)=0 exch2_neighbourId(3,900)=151 exch2_iLo(3,900)=35 exch2_iHi(3,900)=35 exch2_jLo(3,900)=17 exch2_jHi(3,900)=52 exch2_opposingSend(3,900)=2 exch2_pij(1,3,900)=0 exch2_pij(2,3,900)=1 exch2_pij(3,3,900)=-1 exch2_pij(4,3,900)=0 exch2_oi(3,900)=510 exch2_oj(3,900)=511 exch2_neighbourId(4,900)=152 exch2_iLo(4,900)=35 exch2_iHi(4,900)=35 exch2_jLo(4,900)=0 exch2_jHi(4,900)=18 exch2_opposingSend(4,900)=3 exch2_pij(1,4,900)=0 exch2_pij(2,4,900)=1 exch2_pij(3,4,900)=-1 exch2_pij(4,4,900)=0 exch2_oi(4,900)=510 exch2_oj(4,900)=511 exch2_neighbourId(5,900)=899 exch2_iLo(5,900)=0 exch2_iHi(5,900)=0 exch2_jLo(5,900)=0 exch2_jHi(5,900)=52 exch2_opposingSend(5,900)=3 exch2_pij(1,5,900)=1 exch2_pij(2,5,900)=0 exch2_pij(3,5,900)=0 exch2_pij(4,5,900)=1 exch2_oi(5,900)=0 exch2_oj(5,900)=0 RETURN END