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 CALL W2_E2SETUP_901 CALL W2_E2SETUP_902 CALL W2_E2SETUP_903 CALL W2_E2SETUP_904 CALL W2_E2SETUP_905 CALL W2_E2SETUP_906 CALL W2_E2SETUP_907 CALL W2_E2SETUP_908 CALL W2_E2SETUP_909 CALL W2_E2SETUP_910 CALL W2_E2SETUP_911 CALL W2_E2SETUP_912 CALL W2_E2SETUP_913 CALL W2_E2SETUP_914 CALL W2_E2SETUP_915 CALL W2_E2SETUP_916 CALL W2_E2SETUP_917 CALL W2_E2SETUP_918 CALL W2_E2SETUP_919 CALL W2_E2SETUP_920 CALL W2_E2SETUP_921 CALL W2_E2SETUP_922 CALL W2_E2SETUP_923 CALL W2_E2SETUP_924 CALL W2_E2SETUP_925 CALL W2_E2SETUP_926 CALL W2_E2SETUP_927 CALL W2_E2SETUP_928 CALL W2_E2SETUP_929 CALL W2_E2SETUP_930 CALL W2_E2SETUP_931 CALL W2_E2SETUP_932 CALL W2_E2SETUP_933 CALL W2_E2SETUP_934 CALL W2_E2SETUP_935 CALL W2_E2SETUP_936 CALL W2_E2SETUP_937 CALL W2_E2SETUP_938 CALL W2_E2SETUP_939 CALL W2_E2SETUP_940 CALL W2_E2SETUP_941 CALL W2_E2SETUP_942 CALL W2_E2SETUP_943 CALL W2_E2SETUP_944 CALL W2_E2SETUP_945 CALL W2_E2SETUP_946 CALL W2_E2SETUP_947 CALL W2_E2SETUP_948 CALL W2_E2SETUP_949 CALL W2_E2SETUP_950 CALL W2_E2SETUP_951 CALL W2_E2SETUP_952 CALL W2_E2SETUP_953 CALL W2_E2SETUP_954 CALL W2_E2SETUP_955 CALL W2_E2SETUP_956 CALL W2_E2SETUP_957 CALL W2_E2SETUP_958 CALL W2_E2SETUP_959 CALL W2_E2SETUP_960 CALL W2_E2SETUP_961 CALL W2_E2SETUP_962 CALL W2_E2SETUP_963 CALL W2_E2SETUP_964 CALL W2_E2SETUP_965 CALL W2_E2SETUP_966 CALL W2_E2SETUP_967 CALL W2_E2SETUP_968 CALL W2_E2SETUP_969 CALL W2_E2SETUP_970 CALL W2_E2SETUP_971 CALL W2_E2SETUP_972 CALL W2_E2SETUP_973 CALL W2_E2SETUP_974 CALL W2_E2SETUP_975 CALL W2_E2SETUP_976 CALL W2_E2SETUP_977 CALL W2_E2SETUP_978 CALL W2_E2SETUP_979 CALL W2_E2SETUP_980 CALL W2_E2SETUP_981 CALL W2_E2SETUP_982 CALL W2_E2SETUP_983 CALL W2_E2SETUP_984 CALL W2_E2SETUP_985 CALL W2_E2SETUP_986 CALL W2_E2SETUP_987 CALL W2_E2SETUP_988 CALL W2_E2SETUP_989 CALL W2_E2SETUP_990 CALL W2_E2SETUP_991 CALL W2_E2SETUP_992 CALL W2_E2SETUP_993 CALL W2_E2SETUP_994 CALL W2_E2SETUP_995 CALL W2_E2SETUP_996 CALL W2_E2SETUP_997 CALL W2_E2SETUP_998 CALL W2_E2SETUP_999 CALL W2_E2SETUP_1000 CALL W2_E2SETUP_1001 CALL W2_E2SETUP_1002 CALL W2_E2SETUP_1003 CALL W2_E2SETUP_1004 CALL W2_E2SETUP_1005 CALL W2_E2SETUP_1006 CALL W2_E2SETUP_1007 CALL W2_E2SETUP_1008 CALL W2_E2SETUP_1009 CALL W2_E2SETUP_1010 CALL W2_E2SETUP_1011 CALL W2_E2SETUP_1012 CALL W2_E2SETUP_1013 CALL W2_E2SETUP_1014 CALL W2_E2SETUP_1015 CALL W2_E2SETUP_1016 CALL W2_E2SETUP_1017 CALL W2_E2SETUP_1018 CALL W2_E2SETUP_1019 CALL W2_E2SETUP_1020 CALL W2_E2SETUP_1021 CALL W2_E2SETUP_1022 CALL W2_E2SETUP_1023 CALL W2_E2SETUP_1024 CALL W2_E2SETUP_1025 CALL W2_E2SETUP_1026 CALL W2_E2SETUP_1027 CALL W2_E2SETUP_1028 CALL W2_E2SETUP_1029 CALL W2_E2SETUP_1030 CALL W2_E2SETUP_1031 CALL W2_E2SETUP_1032 CALL W2_E2SETUP_1033 CALL W2_E2SETUP_1034 CALL W2_E2SETUP_1035 CALL W2_E2SETUP_1036 CALL W2_E2SETUP_1037 CALL W2_E2SETUP_1038 CALL W2_E2SETUP_1039 CALL W2_E2SETUP_1040 CALL W2_E2SETUP_1041 CALL W2_E2SETUP_1042 CALL W2_E2SETUP_1043 CALL W2_E2SETUP_1044 CALL W2_E2SETUP_1045 CALL W2_E2SETUP_1046 CALL W2_E2SETUP_1047 CALL W2_E2SETUP_1048 CALL W2_E2SETUP_1049 CALL W2_E2SETUP_1050 CALL W2_E2SETUP_1051 CALL W2_E2SETUP_1052 CALL W2_E2SETUP_1053 CALL W2_E2SETUP_1054 CALL W2_E2SETUP_1055 CALL W2_E2SETUP_1056 CALL W2_E2SETUP_1057 CALL W2_E2SETUP_1058 CALL W2_E2SETUP_1059 CALL W2_E2SETUP_1060 CALL W2_E2SETUP_1061 CALL W2_E2SETUP_1062 CALL W2_E2SETUP_1063 CALL W2_E2SETUP_1064 CALL W2_E2SETUP_1065 CALL W2_E2SETUP_1066 CALL W2_E2SETUP_1067 CALL W2_E2SETUP_1068 CALL W2_E2SETUP_1069 CALL W2_E2SETUP_1070 CALL W2_E2SETUP_1071 CALL W2_E2SETUP_1072 CALL W2_E2SETUP_1073 CALL W2_E2SETUP_1074 CALL W2_E2SETUP_1075 CALL W2_E2SETUP_1076 CALL W2_E2SETUP_1077 CALL W2_E2SETUP_1078 CALL W2_E2SETUP_1079 CALL W2_E2SETUP_1080 CALL W2_E2SETUP_1081 CALL W2_E2SETUP_1082 CALL W2_E2SETUP_1083 CALL W2_E2SETUP_1084 CALL W2_E2SETUP_1085 CALL W2_E2SETUP_1086 CALL W2_E2SETUP_1087 CALL W2_E2SETUP_1088 CALL W2_E2SETUP_1089 CALL W2_E2SETUP_1090 CALL W2_E2SETUP_1091 CALL W2_E2SETUP_1092 CALL W2_E2SETUP_1093 CALL W2_E2SETUP_1094 CALL W2_E2SETUP_1095 CALL W2_E2SETUP_1096 CALL W2_E2SETUP_1097 CALL W2_E2SETUP_1098 CALL W2_E2SETUP_1099 CALL W2_E2SETUP_1100 CALL W2_E2SETUP_1101 CALL W2_E2SETUP_1102 CALL W2_E2SETUP_1103 CALL W2_E2SETUP_1104 CALL W2_E2SETUP_1105 CALL W2_E2SETUP_1106 CALL W2_E2SETUP_1107 CALL W2_E2SETUP_1108 CALL W2_E2SETUP_1109 CALL W2_E2SETUP_1110 CALL W2_E2SETUP_1111 CALL W2_E2SETUP_1112 CALL W2_E2SETUP_1113 CALL W2_E2SETUP_1114 CALL W2_E2SETUP_1115 CALL W2_E2SETUP_1116 CALL W2_E2SETUP_1117 CALL W2_E2SETUP_1118 CALL W2_E2SETUP_1119 CALL W2_E2SETUP_1120 CALL W2_E2SETUP_1121 CALL W2_E2SETUP_1122 CALL W2_E2SETUP_1123 CALL W2_E2SETUP_1124 CALL W2_E2SETUP_1125 CALL W2_E2SETUP_1126 CALL W2_E2SETUP_1127 CALL W2_E2SETUP_1128 CALL W2_E2SETUP_1129 CALL W2_E2SETUP_1130 CALL W2_E2SETUP_1131 CALL W2_E2SETUP_1132 CALL W2_E2SETUP_1133 CALL W2_E2SETUP_1134 CALL W2_E2SETUP_1135 CALL W2_E2SETUP_1136 CALL W2_E2SETUP_1137 CALL W2_E2SETUP_1138 CALL W2_E2SETUP_1139 CALL W2_E2SETUP_1140 CALL W2_E2SETUP_1141 CALL W2_E2SETUP_1142 CALL W2_E2SETUP_1143 CALL W2_E2SETUP_1144 CALL W2_E2SETUP_1145 CALL W2_E2SETUP_1146 CALL W2_E2SETUP_1147 CALL W2_E2SETUP_1148 CALL W2_E2SETUP_1149 CALL W2_E2SETUP_1150 CALL W2_E2SETUP_1151 CALL W2_E2SETUP_1152 CALL W2_E2SETUP_1153 CALL W2_E2SETUP_1154 CALL W2_E2SETUP_1155 CALL W2_E2SETUP_1156 CALL W2_E2SETUP_1157 CALL W2_E2SETUP_1158 CALL W2_E2SETUP_1159 CALL W2_E2SETUP_1160 CALL W2_E2SETUP_1161 CALL W2_E2SETUP_1162 CALL W2_E2SETUP_1163 CALL W2_E2SETUP_1164 CALL W2_E2SETUP_1165 CALL W2_E2SETUP_1166 CALL W2_E2SETUP_1167 CALL W2_E2SETUP_1168 CALL W2_E2SETUP_1169 CALL W2_E2SETUP_1170 CALL W2_E2SETUP_1171 CALL W2_E2SETUP_1172 CALL W2_E2SETUP_1173 CALL W2_E2SETUP_1174 CALL W2_E2SETUP_1175 CALL W2_E2SETUP_1176 CALL W2_E2SETUP_1177 CALL W2_E2SETUP_1178 CALL W2_E2SETUP_1179 CALL W2_E2SETUP_1180 CALL W2_E2SETUP_1181 CALL W2_E2SETUP_1182 CALL W2_E2SETUP_1183 CALL W2_E2SETUP_1184 CALL W2_E2SETUP_1185 CALL W2_E2SETUP_1186 CALL W2_E2SETUP_1187 CALL W2_E2SETUP_1188 CALL W2_E2SETUP_1189 CALL W2_E2SETUP_1190 CALL W2_E2SETUP_1191 CALL W2_E2SETUP_1192 CALL W2_E2SETUP_1193 CALL W2_E2SETUP_1194 CALL W2_E2SETUP_1195 CALL W2_E2SETUP_1196 CALL W2_E2SETUP_1197 CALL W2_E2SETUP_1198 CALL W2_E2SETUP_1199 CALL W2_E2SETUP_1200 CALL W2_E2SETUP_1201 CALL W2_E2SETUP_1202 CALL W2_E2SETUP_1203 CALL W2_E2SETUP_1204 CALL W2_E2SETUP_1205 CALL W2_E2SETUP_1206 CALL W2_E2SETUP_1207 CALL W2_E2SETUP_1208 CALL W2_E2SETUP_1209 CALL W2_E2SETUP_1210 CALL W2_E2SETUP_1211 CALL W2_E2SETUP_1212 CALL W2_E2SETUP_1213 CALL W2_E2SETUP_1214 CALL W2_E2SETUP_1215 CALL W2_E2SETUP_1216 CALL W2_E2SETUP_1217 CALL W2_E2SETUP_1218 CALL W2_E2SETUP_1219 CALL W2_E2SETUP_1220 CALL W2_E2SETUP_1221 CALL W2_E2SETUP_1222 CALL W2_E2SETUP_1223 CALL W2_E2SETUP_1224 CALL W2_E2SETUP_1225 CALL W2_E2SETUP_1226 CALL W2_E2SETUP_1227 CALL W2_E2SETUP_1228 CALL W2_E2SETUP_1229 CALL W2_E2SETUP_1230 CALL W2_E2SETUP_1231 CALL W2_E2SETUP_1232 CALL W2_E2SETUP_1233 CALL W2_E2SETUP_1234 CALL W2_E2SETUP_1235 CALL W2_E2SETUP_1236 CALL W2_E2SETUP_1237 CALL W2_E2SETUP_1238 CALL W2_E2SETUP_1239 CALL W2_E2SETUP_1240 CALL W2_E2SETUP_1241 CALL W2_E2SETUP_1242 CALL W2_E2SETUP_1243 CALL W2_E2SETUP_1244 CALL W2_E2SETUP_1245 CALL W2_E2SETUP_1246 CALL W2_E2SETUP_1247 CALL W2_E2SETUP_1248 CALL W2_E2SETUP_1249 CALL W2_E2SETUP_1250 CALL W2_E2SETUP_1251 CALL W2_E2SETUP_1252 CALL W2_E2SETUP_1253 CALL W2_E2SETUP_1254 CALL W2_E2SETUP_1255 CALL W2_E2SETUP_1256 CALL W2_E2SETUP_1257 CALL W2_E2SETUP_1258 CALL W2_E2SETUP_1259 CALL W2_E2SETUP_1260 CALL W2_E2SETUP_1261 CALL W2_E2SETUP_1262 CALL W2_E2SETUP_1263 CALL W2_E2SETUP_1264 CALL W2_E2SETUP_1265 CALL W2_E2SETUP_1266 CALL W2_E2SETUP_1267 CALL W2_E2SETUP_1268 CALL W2_E2SETUP_1269 CALL W2_E2SETUP_1270 CALL W2_E2SETUP_1271 CALL W2_E2SETUP_1272 CALL W2_E2SETUP_1273 CALL W2_E2SETUP_1274 CALL W2_E2SETUP_1275 CALL W2_E2SETUP_1276 CALL W2_E2SETUP_1277 CALL W2_E2SETUP_1278 CALL W2_E2SETUP_1279 CALL W2_E2SETUP_1280 CALL W2_E2SETUP_1281 CALL W2_E2SETUP_1282 CALL W2_E2SETUP_1283 CALL W2_E2SETUP_1284 CALL W2_E2SETUP_1285 CALL W2_E2SETUP_1286 CALL W2_E2SETUP_1287 CALL W2_E2SETUP_1288 CALL W2_E2SETUP_1289 CALL W2_E2SETUP_1290 CALL W2_E2SETUP_1291 CALL W2_E2SETUP_1292 CALL W2_E2SETUP_1293 CALL W2_E2SETUP_1294 CALL W2_E2SETUP_1295 CALL W2_E2SETUP_1296 CALL W2_E2SETUP_1297 CALL W2_E2SETUP_1298 CALL W2_E2SETUP_1299 CALL W2_E2SETUP_1300 CALL W2_E2SETUP_1301 CALL W2_E2SETUP_1302 CALL W2_E2SETUP_1303 CALL W2_E2SETUP_1304 CALL W2_E2SETUP_1305 CALL W2_E2SETUP_1306 CALL W2_E2SETUP_1307 CALL W2_E2SETUP_1308 CALL W2_E2SETUP_1309 CALL W2_E2SETUP_1310 CALL W2_E2SETUP_1311 CALL W2_E2SETUP_1312 CALL W2_E2SETUP_1313 CALL W2_E2SETUP_1314 CALL W2_E2SETUP_1315 CALL W2_E2SETUP_1316 CALL W2_E2SETUP_1317 CALL W2_E2SETUP_1318 CALL W2_E2SETUP_1319 CALL W2_E2SETUP_1320 CALL W2_E2SETUP_1321 CALL W2_E2SETUP_1322 CALL W2_E2SETUP_1323 CALL W2_E2SETUP_1324 CALL W2_E2SETUP_1325 CALL W2_E2SETUP_1326 CALL W2_E2SETUP_1327 CALL W2_E2SETUP_1328 CALL W2_E2SETUP_1329 CALL W2_E2SETUP_1330 CALL W2_E2SETUP_1331 CALL W2_E2SETUP_1332 CALL W2_E2SETUP_1333 CALL W2_E2SETUP_1334 CALL W2_E2SETUP_1335 CALL W2_E2SETUP_1336 CALL W2_E2SETUP_1337 CALL W2_E2SETUP_1338 CALL W2_E2SETUP_1339 CALL W2_E2SETUP_1340 CALL W2_E2SETUP_1341 CALL W2_E2SETUP_1342 CALL W2_E2SETUP_1343 CALL W2_E2SETUP_1344 CALL W2_E2SETUP_1345 CALL W2_E2SETUP_1346 CALL W2_E2SETUP_1347 CALL W2_E2SETUP_1348 CALL W2_E2SETUP_1349 CALL W2_E2SETUP_1350 RETURN END SUBROUTINE W2_E2SETUP_1 C Topology for tile 1 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1)=34 exch2_tNy(1)=34 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)=4 exch2_neighbourId(1,1)=16 exch2_iLo(1,1)=0 exch2_iHi(1,1)=35 exch2_jLo(1,1)=35 exch2_jHi(1,1)=35 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)=1336 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)=35 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)=1125 exch2_iLo(4,1)=0 exch2_iHi(4,1)=0 exch2_jLo(4,1)=0 exch2_jHi(4,1)=35 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 RETURN END SUBROUTINE W2_E2SETUP_2 C Topology for tile 2 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(2)=34 exch2_tNy(2)=34 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)=35 exch2_jHi(1,2)=35 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)=1337 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,3)=35 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)=1338 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,4)=35 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)=1339 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,5)=35 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)=1340 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,6)=35 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)=1341 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,7)=35 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)=1342 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,8)=35 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)=1343 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,9)=35 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)=1344 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,10)=35 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)=1345 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,11)=35 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)=1346 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,12)=35 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)=1347 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,13)=35 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)=1348 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,14)=35 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)=1349 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)=35 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)=35 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)=34 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)=35 exch2_jHi(1,15)=35 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)=1350 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)=226 exch2_iLo(3,15)=35 exch2_iHi(3,15)=35 exch2_jLo(3,15)=0 exch2_jHi(3,15)=35 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)=35 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)=34 exch2_tBasex(16)=0 exch2_tBasey(16)=34 exch2_txGlobalo(16)=1 exch2_tyGlobalo(16)=35 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)=4 exch2_neighbourId(1,16)=31 exch2_iLo(1,16)=0 exch2_iHi(1,16)=35 exch2_jLo(1,16)=35 exch2_jHi(1,16)=35 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)=35 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)=1124 exch2_iLo(4,16)=0 exch2_iHi(4,16)=0 exch2_jLo(4,16)=0 exch2_jHi(4,16)=35 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 RETURN END SUBROUTINE W2_E2SETUP_17 C Topology for tile 17 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(17)=34 exch2_tNy(17)=34 exch2_tBasex(17)=34 exch2_tBasey(17)=34 exch2_txGlobalo(17)=35 exch2_tyGlobalo(17)=35 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)=35 exch2_jHi(1,17)=35 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)=35 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)=35 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)=34 exch2_tBasex(18)=68 exch2_tBasey(18)=34 exch2_txGlobalo(18)=69 exch2_tyGlobalo(18)=35 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)=35 exch2_jHi(1,18)=35 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)=35 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)=35 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)=34 exch2_tBasex(19)=102 exch2_tBasey(19)=34 exch2_txGlobalo(19)=103 exch2_tyGlobalo(19)=35 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)=35 exch2_jHi(1,19)=35 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)=35 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)=35 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)=34 exch2_tBasex(20)=136 exch2_tBasey(20)=34 exch2_txGlobalo(20)=137 exch2_tyGlobalo(20)=35 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)=35 exch2_jHi(1,20)=35 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)=35 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)=35 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)=34 exch2_tBasex(21)=170 exch2_tBasey(21)=34 exch2_txGlobalo(21)=171 exch2_tyGlobalo(21)=35 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)=35 exch2_jHi(1,21)=35 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)=35 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)=35 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)=34 exch2_tBasex(22)=204 exch2_tBasey(22)=34 exch2_txGlobalo(22)=205 exch2_tyGlobalo(22)=35 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)=35 exch2_jHi(1,22)=35 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)=35 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)=35 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)=34 exch2_tBasex(23)=238 exch2_tBasey(23)=34 exch2_txGlobalo(23)=239 exch2_tyGlobalo(23)=35 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)=35 exch2_jHi(1,23)=35 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)=35 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)=35 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)=34 exch2_tBasex(24)=272 exch2_tBasey(24)=34 exch2_txGlobalo(24)=273 exch2_tyGlobalo(24)=35 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)=35 exch2_jHi(1,24)=35 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)=35 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)=35 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)=34 exch2_tBasex(25)=306 exch2_tBasey(25)=34 exch2_txGlobalo(25)=307 exch2_tyGlobalo(25)=35 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)=35 exch2_jHi(1,25)=35 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)=35 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)=35 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)=34 exch2_tBasex(26)=340 exch2_tBasey(26)=34 exch2_txGlobalo(26)=341 exch2_tyGlobalo(26)=35 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)=35 exch2_jHi(1,26)=35 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)=35 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)=35 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)=34 exch2_tBasex(27)=374 exch2_tBasey(27)=34 exch2_txGlobalo(27)=375 exch2_tyGlobalo(27)=35 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)=35 exch2_jHi(1,27)=35 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)=35 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)=35 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)=34 exch2_tBasex(28)=408 exch2_tBasey(28)=34 exch2_txGlobalo(28)=409 exch2_tyGlobalo(28)=35 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)=35 exch2_jHi(1,28)=35 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)=35 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)=35 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)=34 exch2_tBasex(29)=442 exch2_tBasey(29)=34 exch2_txGlobalo(29)=443 exch2_tyGlobalo(29)=35 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)=35 exch2_jHi(1,29)=35 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)=35 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)=35 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)=34 exch2_tBasex(30)=476 exch2_tBasey(30)=34 exch2_txGlobalo(30)=477 exch2_tyGlobalo(30)=35 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)=35 exch2_jHi(1,30)=35 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)=241 exch2_iLo(3,30)=35 exch2_iHi(3,30)=35 exch2_jLo(3,30)=0 exch2_jHi(3,30)=35 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)=35 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)=34 exch2_tBasex(31)=0 exch2_tBasey(31)=68 exch2_txGlobalo(31)=1 exch2_tyGlobalo(31)=69 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)=4 exch2_neighbourId(1,31)=46 exch2_iLo(1,31)=0 exch2_iHi(1,31)=35 exch2_jLo(1,31)=35 exch2_jHi(1,31)=35 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)=35 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)=1123 exch2_iLo(4,31)=0 exch2_iHi(4,31)=0 exch2_jLo(4,31)=0 exch2_jHi(4,31)=35 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 RETURN END SUBROUTINE W2_E2SETUP_32 C Topology for tile 32 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(32)=34 exch2_tNy(32)=34 exch2_tBasex(32)=34 exch2_tBasey(32)=68 exch2_txGlobalo(32)=35 exch2_tyGlobalo(32)=69 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)=35 exch2_jHi(1,32)=35 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)=35 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)=35 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)=34 exch2_tBasex(33)=68 exch2_tBasey(33)=68 exch2_txGlobalo(33)=69 exch2_tyGlobalo(33)=69 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)=35 exch2_jHi(1,33)=35 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)=35 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)=35 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)=34 exch2_tBasex(34)=102 exch2_tBasey(34)=68 exch2_txGlobalo(34)=103 exch2_tyGlobalo(34)=69 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)=35 exch2_jHi(1,34)=35 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)=35 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)=35 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)=34 exch2_tBasex(35)=136 exch2_tBasey(35)=68 exch2_txGlobalo(35)=137 exch2_tyGlobalo(35)=69 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)=35 exch2_jHi(1,35)=35 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)=35 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)=35 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)=34 exch2_tBasex(36)=170 exch2_tBasey(36)=68 exch2_txGlobalo(36)=171 exch2_tyGlobalo(36)=69 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)=35 exch2_jHi(1,36)=35 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)=35 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)=35 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)=34 exch2_tBasex(37)=204 exch2_tBasey(37)=68 exch2_txGlobalo(37)=205 exch2_tyGlobalo(37)=69 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)=35 exch2_jHi(1,37)=35 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)=35 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)=35 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)=34 exch2_tBasex(38)=238 exch2_tBasey(38)=68 exch2_txGlobalo(38)=239 exch2_tyGlobalo(38)=69 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)=35 exch2_jHi(1,38)=35 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)=35 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)=35 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)=34 exch2_tBasex(39)=272 exch2_tBasey(39)=68 exch2_txGlobalo(39)=273 exch2_tyGlobalo(39)=69 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)=35 exch2_jHi(1,39)=35 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)=35 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)=35 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)=34 exch2_tBasex(40)=306 exch2_tBasey(40)=68 exch2_txGlobalo(40)=307 exch2_tyGlobalo(40)=69 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)=35 exch2_jHi(1,40)=35 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)=35 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)=35 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)=34 exch2_tBasex(41)=340 exch2_tBasey(41)=68 exch2_txGlobalo(41)=341 exch2_tyGlobalo(41)=69 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)=35 exch2_jHi(1,41)=35 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)=35 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)=35 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)=34 exch2_tBasex(42)=374 exch2_tBasey(42)=68 exch2_txGlobalo(42)=375 exch2_tyGlobalo(42)=69 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)=35 exch2_jHi(1,42)=35 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)=35 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)=35 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)=34 exch2_tBasex(43)=408 exch2_tBasey(43)=68 exch2_txGlobalo(43)=409 exch2_tyGlobalo(43)=69 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)=35 exch2_jHi(1,43)=35 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)=35 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)=35 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)=34 exch2_tBasex(44)=442 exch2_tBasey(44)=68 exch2_txGlobalo(44)=443 exch2_tyGlobalo(44)=69 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)=35 exch2_jHi(1,44)=35 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)=35 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)=35 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)=34 exch2_tBasex(45)=476 exch2_tBasey(45)=68 exch2_txGlobalo(45)=477 exch2_tyGlobalo(45)=69 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)=35 exch2_jHi(1,45)=35 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)=256 exch2_iLo(3,45)=35 exch2_iHi(3,45)=35 exch2_jLo(3,45)=0 exch2_jHi(3,45)=35 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)=35 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)=34 exch2_tBasex(46)=0 exch2_tBasey(46)=102 exch2_txGlobalo(46)=1 exch2_tyGlobalo(46)=103 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)=4 exch2_neighbourId(1,46)=61 exch2_iLo(1,46)=0 exch2_iHi(1,46)=35 exch2_jLo(1,46)=35 exch2_jHi(1,46)=35 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)=35 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)=1122 exch2_iLo(4,46)=0 exch2_iHi(4,46)=0 exch2_jLo(4,46)=0 exch2_jHi(4,46)=35 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 RETURN END SUBROUTINE W2_E2SETUP_47 C Topology for tile 47 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(47)=34 exch2_tNy(47)=34 exch2_tBasex(47)=34 exch2_tBasey(47)=102 exch2_txGlobalo(47)=35 exch2_tyGlobalo(47)=103 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)=35 exch2_jHi(1,47)=35 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)=35 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)=35 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)=34 exch2_tBasex(48)=68 exch2_tBasey(48)=102 exch2_txGlobalo(48)=69 exch2_tyGlobalo(48)=103 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)=35 exch2_jHi(1,48)=35 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)=35 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)=35 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)=34 exch2_tBasex(49)=102 exch2_tBasey(49)=102 exch2_txGlobalo(49)=103 exch2_tyGlobalo(49)=103 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)=35 exch2_jHi(1,49)=35 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)=35 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)=35 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)=34 exch2_tBasex(50)=136 exch2_tBasey(50)=102 exch2_txGlobalo(50)=137 exch2_tyGlobalo(50)=103 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)=35 exch2_jHi(1,50)=35 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)=35 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)=35 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)=34 exch2_tBasex(51)=170 exch2_tBasey(51)=102 exch2_txGlobalo(51)=171 exch2_tyGlobalo(51)=103 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)=35 exch2_jHi(1,51)=35 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)=35 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)=35 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)=34 exch2_tBasex(52)=204 exch2_tBasey(52)=102 exch2_txGlobalo(52)=205 exch2_tyGlobalo(52)=103 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)=35 exch2_jHi(1,52)=35 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)=35 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)=35 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)=34 exch2_tBasex(53)=238 exch2_tBasey(53)=102 exch2_txGlobalo(53)=239 exch2_tyGlobalo(53)=103 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)=35 exch2_jHi(1,53)=35 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)=35 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)=35 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)=34 exch2_tBasex(54)=272 exch2_tBasey(54)=102 exch2_txGlobalo(54)=273 exch2_tyGlobalo(54)=103 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)=35 exch2_jHi(1,54)=35 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)=35 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)=35 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)=34 exch2_tBasex(55)=306 exch2_tBasey(55)=102 exch2_txGlobalo(55)=307 exch2_tyGlobalo(55)=103 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)=35 exch2_jHi(1,55)=35 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)=35 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)=35 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)=34 exch2_tBasex(56)=340 exch2_tBasey(56)=102 exch2_txGlobalo(56)=341 exch2_tyGlobalo(56)=103 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)=35 exch2_jHi(1,56)=35 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)=35 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)=35 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)=34 exch2_tBasex(57)=374 exch2_tBasey(57)=102 exch2_txGlobalo(57)=375 exch2_tyGlobalo(57)=103 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)=35 exch2_jHi(1,57)=35 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)=35 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)=35 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)=34 exch2_tBasex(58)=408 exch2_tBasey(58)=102 exch2_txGlobalo(58)=409 exch2_tyGlobalo(58)=103 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)=35 exch2_jHi(1,58)=35 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)=35 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)=35 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)=34 exch2_tBasex(59)=442 exch2_tBasey(59)=102 exch2_txGlobalo(59)=443 exch2_tyGlobalo(59)=103 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)=35 exch2_jHi(1,59)=35 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)=35 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)=35 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)=34 exch2_tBasex(60)=476 exch2_tBasey(60)=102 exch2_txGlobalo(60)=477 exch2_tyGlobalo(60)=103 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)=35 exch2_jHi(1,60)=35 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)=271 exch2_iLo(3,60)=35 exch2_iHi(3,60)=35 exch2_jLo(3,60)=0 exch2_jHi(3,60)=35 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)=35 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)=34 exch2_tBasex(61)=0 exch2_tBasey(61)=136 exch2_txGlobalo(61)=1 exch2_tyGlobalo(61)=137 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)=4 exch2_neighbourId(1,61)=76 exch2_iLo(1,61)=0 exch2_iHi(1,61)=35 exch2_jLo(1,61)=35 exch2_jHi(1,61)=35 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)=35 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)=1121 exch2_iLo(4,61)=0 exch2_iHi(4,61)=0 exch2_jLo(4,61)=0 exch2_jHi(4,61)=35 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 RETURN END SUBROUTINE W2_E2SETUP_62 C Topology for tile 62 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(62)=34 exch2_tNy(62)=34 exch2_tBasex(62)=34 exch2_tBasey(62)=136 exch2_txGlobalo(62)=35 exch2_tyGlobalo(62)=137 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)=35 exch2_jHi(1,62)=35 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)=35 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)=35 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)=34 exch2_tBasex(63)=68 exch2_tBasey(63)=136 exch2_txGlobalo(63)=69 exch2_tyGlobalo(63)=137 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)=35 exch2_jHi(1,63)=35 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)=35 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)=35 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)=34 exch2_tBasex(64)=102 exch2_tBasey(64)=136 exch2_txGlobalo(64)=103 exch2_tyGlobalo(64)=137 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)=35 exch2_jHi(1,64)=35 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)=35 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)=35 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)=34 exch2_tBasex(65)=136 exch2_tBasey(65)=136 exch2_txGlobalo(65)=137 exch2_tyGlobalo(65)=137 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)=35 exch2_jHi(1,65)=35 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)=35 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)=35 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)=34 exch2_tBasex(66)=170 exch2_tBasey(66)=136 exch2_txGlobalo(66)=171 exch2_tyGlobalo(66)=137 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)=35 exch2_jHi(1,66)=35 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)=35 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)=35 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)=34 exch2_tBasex(67)=204 exch2_tBasey(67)=136 exch2_txGlobalo(67)=205 exch2_tyGlobalo(67)=137 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)=35 exch2_jHi(1,67)=35 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)=35 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)=35 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)=34 exch2_tBasex(68)=238 exch2_tBasey(68)=136 exch2_txGlobalo(68)=239 exch2_tyGlobalo(68)=137 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)=35 exch2_jHi(1,68)=35 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)=35 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)=35 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)=34 exch2_tBasex(69)=272 exch2_tBasey(69)=136 exch2_txGlobalo(69)=273 exch2_tyGlobalo(69)=137 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)=35 exch2_jHi(1,69)=35 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)=35 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)=35 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)=34 exch2_tBasex(70)=306 exch2_tBasey(70)=136 exch2_txGlobalo(70)=307 exch2_tyGlobalo(70)=137 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)=35 exch2_jHi(1,70)=35 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)=35 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)=35 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)=34 exch2_tBasex(71)=340 exch2_tBasey(71)=136 exch2_txGlobalo(71)=341 exch2_tyGlobalo(71)=137 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)=35 exch2_jHi(1,71)=35 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)=35 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)=35 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)=34 exch2_tBasex(72)=374 exch2_tBasey(72)=136 exch2_txGlobalo(72)=375 exch2_tyGlobalo(72)=137 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)=35 exch2_jHi(1,72)=35 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)=35 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)=35 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)=34 exch2_tBasex(73)=408 exch2_tBasey(73)=136 exch2_txGlobalo(73)=409 exch2_tyGlobalo(73)=137 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)=35 exch2_jHi(1,73)=35 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)=35 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)=35 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)=34 exch2_tBasex(74)=442 exch2_tBasey(74)=136 exch2_txGlobalo(74)=443 exch2_tyGlobalo(74)=137 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)=35 exch2_jHi(1,74)=35 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)=35 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)=35 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)=34 exch2_tBasex(75)=476 exch2_tBasey(75)=136 exch2_txGlobalo(75)=477 exch2_tyGlobalo(75)=137 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)=35 exch2_jHi(1,75)=35 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)=286 exch2_iLo(3,75)=35 exch2_iHi(3,75)=35 exch2_jLo(3,75)=0 exch2_jHi(3,75)=35 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)=35 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)=34 exch2_tBasex(76)=0 exch2_tBasey(76)=170 exch2_txGlobalo(76)=1 exch2_tyGlobalo(76)=171 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)=4 exch2_neighbourId(1,76)=91 exch2_iLo(1,76)=0 exch2_iHi(1,76)=35 exch2_jLo(1,76)=35 exch2_jHi(1,76)=35 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)=35 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)=1120 exch2_iLo(4,76)=0 exch2_iHi(4,76)=0 exch2_jLo(4,76)=0 exch2_jHi(4,76)=35 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 RETURN END SUBROUTINE W2_E2SETUP_77 C Topology for tile 77 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(77)=34 exch2_tNy(77)=34 exch2_tBasex(77)=34 exch2_tBasey(77)=170 exch2_txGlobalo(77)=35 exch2_tyGlobalo(77)=171 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)=35 exch2_jHi(1,77)=35 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)=35 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)=35 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)=34 exch2_tBasex(78)=68 exch2_tBasey(78)=170 exch2_txGlobalo(78)=69 exch2_tyGlobalo(78)=171 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)=35 exch2_jHi(1,78)=35 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)=35 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)=35 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)=34 exch2_tBasex(79)=102 exch2_tBasey(79)=170 exch2_txGlobalo(79)=103 exch2_tyGlobalo(79)=171 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)=35 exch2_jHi(1,79)=35 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)=35 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)=35 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)=34 exch2_tBasex(80)=136 exch2_tBasey(80)=170 exch2_txGlobalo(80)=137 exch2_tyGlobalo(80)=171 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)=35 exch2_jHi(1,80)=35 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)=35 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)=35 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)=34 exch2_tBasex(81)=170 exch2_tBasey(81)=170 exch2_txGlobalo(81)=171 exch2_tyGlobalo(81)=171 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)=35 exch2_jHi(1,81)=35 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)=35 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)=35 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)=34 exch2_tBasex(82)=204 exch2_tBasey(82)=170 exch2_txGlobalo(82)=205 exch2_tyGlobalo(82)=171 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)=35 exch2_jHi(1,82)=35 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)=35 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)=35 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)=34 exch2_tBasex(83)=238 exch2_tBasey(83)=170 exch2_txGlobalo(83)=239 exch2_tyGlobalo(83)=171 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)=35 exch2_jHi(1,83)=35 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)=35 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)=35 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)=34 exch2_tBasex(84)=272 exch2_tBasey(84)=170 exch2_txGlobalo(84)=273 exch2_tyGlobalo(84)=171 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)=35 exch2_jHi(1,84)=35 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)=35 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)=35 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)=34 exch2_tBasex(85)=306 exch2_tBasey(85)=170 exch2_txGlobalo(85)=307 exch2_tyGlobalo(85)=171 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)=35 exch2_jHi(1,85)=35 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)=35 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)=35 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)=34 exch2_tBasex(86)=340 exch2_tBasey(86)=170 exch2_txGlobalo(86)=341 exch2_tyGlobalo(86)=171 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)=35 exch2_jHi(1,86)=35 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)=35 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)=35 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)=34 exch2_tBasex(87)=374 exch2_tBasey(87)=170 exch2_txGlobalo(87)=375 exch2_tyGlobalo(87)=171 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)=35 exch2_jHi(1,87)=35 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)=35 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)=35 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)=34 exch2_tBasex(88)=408 exch2_tBasey(88)=170 exch2_txGlobalo(88)=409 exch2_tyGlobalo(88)=171 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)=35 exch2_jHi(1,88)=35 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)=35 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)=35 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)=34 exch2_tBasex(89)=442 exch2_tBasey(89)=170 exch2_txGlobalo(89)=443 exch2_tyGlobalo(89)=171 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)=35 exch2_jHi(1,89)=35 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)=35 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)=35 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)=34 exch2_tBasex(90)=476 exch2_tBasey(90)=170 exch2_txGlobalo(90)=477 exch2_tyGlobalo(90)=171 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)=35 exch2_jHi(1,90)=35 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)=301 exch2_iLo(3,90)=35 exch2_iHi(3,90)=35 exch2_jLo(3,90)=0 exch2_jHi(3,90)=35 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)=35 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)=34 exch2_tBasex(91)=0 exch2_tBasey(91)=204 exch2_txGlobalo(91)=1 exch2_tyGlobalo(91)=205 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)=4 exch2_neighbourId(1,91)=106 exch2_iLo(1,91)=0 exch2_iHi(1,91)=35 exch2_jLo(1,91)=35 exch2_jHi(1,91)=35 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)=35 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)=1119 exch2_iLo(4,91)=0 exch2_iHi(4,91)=0 exch2_jLo(4,91)=0 exch2_jHi(4,91)=35 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 RETURN END SUBROUTINE W2_E2SETUP_92 C Topology for tile 92 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(92)=34 exch2_tNy(92)=34 exch2_tBasex(92)=34 exch2_tBasey(92)=204 exch2_txGlobalo(92)=35 exch2_tyGlobalo(92)=205 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)=35 exch2_jHi(1,92)=35 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)=35 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)=35 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)=34 exch2_tBasex(93)=68 exch2_tBasey(93)=204 exch2_txGlobalo(93)=69 exch2_tyGlobalo(93)=205 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)=35 exch2_jHi(1,93)=35 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)=35 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)=35 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)=34 exch2_tBasex(94)=102 exch2_tBasey(94)=204 exch2_txGlobalo(94)=103 exch2_tyGlobalo(94)=205 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)=35 exch2_jHi(1,94)=35 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)=35 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)=35 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)=34 exch2_tBasex(95)=136 exch2_tBasey(95)=204 exch2_txGlobalo(95)=137 exch2_tyGlobalo(95)=205 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)=35 exch2_jHi(1,95)=35 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)=35 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)=35 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)=34 exch2_tBasex(96)=170 exch2_tBasey(96)=204 exch2_txGlobalo(96)=171 exch2_tyGlobalo(96)=205 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)=35 exch2_jHi(1,96)=35 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)=35 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)=35 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)=34 exch2_tBasex(97)=204 exch2_tBasey(97)=204 exch2_txGlobalo(97)=205 exch2_tyGlobalo(97)=205 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)=35 exch2_jHi(1,97)=35 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)=35 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)=35 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)=34 exch2_tBasex(98)=238 exch2_tBasey(98)=204 exch2_txGlobalo(98)=239 exch2_tyGlobalo(98)=205 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)=35 exch2_jHi(1,98)=35 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)=35 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)=35 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)=34 exch2_tBasex(99)=272 exch2_tBasey(99)=204 exch2_txGlobalo(99)=273 exch2_tyGlobalo(99)=205 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)=35 exch2_jHi(1,99)=35 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)=35 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)=35 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)=34 exch2_tBasex(100)=306 exch2_tBasey(100)=204 exch2_txGlobalo(100)=307 exch2_tyGlobalo(100)=205 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)=35 exch2_jHi(1,100)=35 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)=35 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)=35 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)=34 exch2_tBasex(101)=340 exch2_tBasey(101)=204 exch2_txGlobalo(101)=341 exch2_tyGlobalo(101)=205 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)=35 exch2_jHi(1,101)=35 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)=35 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)=35 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)=34 exch2_tBasex(102)=374 exch2_tBasey(102)=204 exch2_txGlobalo(102)=375 exch2_tyGlobalo(102)=205 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)=35 exch2_jHi(1,102)=35 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)=35 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)=35 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)=34 exch2_tBasex(103)=408 exch2_tBasey(103)=204 exch2_txGlobalo(103)=409 exch2_tyGlobalo(103)=205 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)=35 exch2_jHi(1,103)=35 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)=35 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)=35 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)=34 exch2_tBasex(104)=442 exch2_tBasey(104)=204 exch2_txGlobalo(104)=443 exch2_tyGlobalo(104)=205 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)=35 exch2_jHi(1,104)=35 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)=35 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)=35 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)=34 exch2_tBasex(105)=476 exch2_tBasey(105)=204 exch2_txGlobalo(105)=477 exch2_tyGlobalo(105)=205 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)=35 exch2_jHi(1,105)=35 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)=316 exch2_iLo(3,105)=35 exch2_iHi(3,105)=35 exch2_jLo(3,105)=0 exch2_jHi(3,105)=35 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)=35 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)=34 exch2_tBasex(106)=0 exch2_tBasey(106)=238 exch2_txGlobalo(106)=1 exch2_tyGlobalo(106)=239 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)=4 exch2_neighbourId(1,106)=121 exch2_iLo(1,106)=0 exch2_iHi(1,106)=35 exch2_jLo(1,106)=35 exch2_jHi(1,106)=35 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)=35 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)=1118 exch2_iLo(4,106)=0 exch2_iHi(4,106)=0 exch2_jLo(4,106)=0 exch2_jHi(4,106)=35 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 RETURN END SUBROUTINE W2_E2SETUP_107 C Topology for tile 107 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(107)=34 exch2_tNy(107)=34 exch2_tBasex(107)=34 exch2_tBasey(107)=238 exch2_txGlobalo(107)=35 exch2_tyGlobalo(107)=239 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)=35 exch2_jHi(1,107)=35 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)=35 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)=35 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)=34 exch2_tBasex(108)=68 exch2_tBasey(108)=238 exch2_txGlobalo(108)=69 exch2_tyGlobalo(108)=239 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)=35 exch2_jHi(1,108)=35 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)=35 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)=35 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)=34 exch2_tBasex(109)=102 exch2_tBasey(109)=238 exch2_txGlobalo(109)=103 exch2_tyGlobalo(109)=239 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)=35 exch2_jHi(1,109)=35 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)=35 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)=35 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)=34 exch2_tBasex(110)=136 exch2_tBasey(110)=238 exch2_txGlobalo(110)=137 exch2_tyGlobalo(110)=239 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)=35 exch2_jHi(1,110)=35 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)=35 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)=35 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)=34 exch2_tBasex(111)=170 exch2_tBasey(111)=238 exch2_txGlobalo(111)=171 exch2_tyGlobalo(111)=239 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)=35 exch2_jHi(1,111)=35 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)=35 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)=35 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)=34 exch2_tBasex(112)=204 exch2_tBasey(112)=238 exch2_txGlobalo(112)=205 exch2_tyGlobalo(112)=239 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)=35 exch2_jHi(1,112)=35 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)=35 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)=35 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)=34 exch2_tBasex(113)=238 exch2_tBasey(113)=238 exch2_txGlobalo(113)=239 exch2_tyGlobalo(113)=239 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)=35 exch2_jHi(1,113)=35 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)=35 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)=35 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)=34 exch2_tBasex(114)=272 exch2_tBasey(114)=238 exch2_txGlobalo(114)=273 exch2_tyGlobalo(114)=239 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)=35 exch2_jHi(1,114)=35 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)=35 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)=35 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)=34 exch2_tBasex(115)=306 exch2_tBasey(115)=238 exch2_txGlobalo(115)=307 exch2_tyGlobalo(115)=239 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)=35 exch2_jHi(1,115)=35 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)=35 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)=35 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)=34 exch2_tBasex(116)=340 exch2_tBasey(116)=238 exch2_txGlobalo(116)=341 exch2_tyGlobalo(116)=239 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)=35 exch2_jHi(1,116)=35 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)=35 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)=35 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)=34 exch2_tBasex(117)=374 exch2_tBasey(117)=238 exch2_txGlobalo(117)=375 exch2_tyGlobalo(117)=239 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)=35 exch2_jHi(1,117)=35 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)=35 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)=35 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)=34 exch2_tBasex(118)=408 exch2_tBasey(118)=238 exch2_txGlobalo(118)=409 exch2_tyGlobalo(118)=239 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)=35 exch2_jHi(1,118)=35 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)=35 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)=35 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)=34 exch2_tBasex(119)=442 exch2_tBasey(119)=238 exch2_txGlobalo(119)=443 exch2_tyGlobalo(119)=239 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)=35 exch2_jHi(1,119)=35 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)=35 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)=35 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)=34 exch2_tBasex(120)=476 exch2_tBasey(120)=238 exch2_txGlobalo(120)=477 exch2_tyGlobalo(120)=239 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)=35 exch2_jHi(1,120)=35 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)=331 exch2_iLo(3,120)=35 exch2_iHi(3,120)=35 exch2_jLo(3,120)=0 exch2_jHi(3,120)=35 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)=35 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)=34 exch2_tBasex(121)=0 exch2_tBasey(121)=272 exch2_txGlobalo(121)=1 exch2_tyGlobalo(121)=273 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)=4 exch2_neighbourId(1,121)=136 exch2_iLo(1,121)=0 exch2_iHi(1,121)=35 exch2_jLo(1,121)=35 exch2_jHi(1,121)=35 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)=35 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)=1117 exch2_iLo(4,121)=0 exch2_iHi(4,121)=0 exch2_jLo(4,121)=0 exch2_jHi(4,121)=35 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 RETURN END SUBROUTINE W2_E2SETUP_122 C Topology for tile 122 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(122)=34 exch2_tNy(122)=34 exch2_tBasex(122)=34 exch2_tBasey(122)=272 exch2_txGlobalo(122)=35 exch2_tyGlobalo(122)=273 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)=35 exch2_jHi(1,122)=35 exch2_opposingSend(1,122)=2 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)=35 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)=35 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)=34 exch2_tBasex(123)=68 exch2_tBasey(123)=272 exch2_txGlobalo(123)=69 exch2_tyGlobalo(123)=273 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)=35 exch2_jHi(1,123)=35 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)=35 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)=35 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)=34 exch2_tBasex(124)=102 exch2_tBasey(124)=272 exch2_txGlobalo(124)=103 exch2_tyGlobalo(124)=273 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)=35 exch2_jHi(1,124)=35 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)=35 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)=35 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)=34 exch2_tBasex(125)=136 exch2_tBasey(125)=272 exch2_txGlobalo(125)=137 exch2_tyGlobalo(125)=273 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)=35 exch2_jHi(1,125)=35 exch2_opposingSend(1,125)=2 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)=35 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)=35 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)=34 exch2_tBasex(126)=170 exch2_tBasey(126)=272 exch2_txGlobalo(126)=171 exch2_tyGlobalo(126)=273 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)=35 exch2_jHi(1,126)=35 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)=35 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)=35 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)=34 exch2_tBasex(127)=204 exch2_tBasey(127)=272 exch2_txGlobalo(127)=205 exch2_tyGlobalo(127)=273 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)=35 exch2_jHi(1,127)=35 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)=35 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)=35 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)=34 exch2_tBasex(128)=238 exch2_tBasey(128)=272 exch2_txGlobalo(128)=239 exch2_tyGlobalo(128)=273 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)=35 exch2_jHi(1,128)=35 exch2_opposingSend(1,128)=2 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)=35 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)=35 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)=34 exch2_tBasex(129)=272 exch2_tBasey(129)=272 exch2_txGlobalo(129)=273 exch2_tyGlobalo(129)=273 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)=35 exch2_jHi(1,129)=35 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)=35 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)=35 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)=34 exch2_tBasex(130)=306 exch2_tBasey(130)=272 exch2_txGlobalo(130)=307 exch2_tyGlobalo(130)=273 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)=35 exch2_jHi(1,130)=35 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)=35 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)=35 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)=34 exch2_tBasex(131)=340 exch2_tBasey(131)=272 exch2_txGlobalo(131)=341 exch2_tyGlobalo(131)=273 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)=35 exch2_jHi(1,131)=35 exch2_opposingSend(1,131)=2 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)=35 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)=35 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)=34 exch2_tBasex(132)=374 exch2_tBasey(132)=272 exch2_txGlobalo(132)=375 exch2_tyGlobalo(132)=273 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)=35 exch2_jHi(1,132)=35 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)=35 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)=35 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)=34 exch2_tBasex(133)=408 exch2_tBasey(133)=272 exch2_txGlobalo(133)=409 exch2_tyGlobalo(133)=273 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)=35 exch2_jHi(1,133)=35 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)=35 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)=35 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)=34 exch2_tBasex(134)=442 exch2_tBasey(134)=272 exch2_txGlobalo(134)=443 exch2_tyGlobalo(134)=273 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)=35 exch2_jHi(1,134)=35 exch2_opposingSend(1,134)=2 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)=35 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)=35 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)=34 exch2_tBasex(135)=476 exch2_tBasey(135)=272 exch2_txGlobalo(135)=477 exch2_tyGlobalo(135)=273 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)=35 exch2_jHi(1,135)=35 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)=346 exch2_iLo(3,135)=35 exch2_iHi(3,135)=35 exch2_jLo(3,135)=0 exch2_jHi(3,135)=35 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)=35 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)=34 exch2_tBasex(136)=0 exch2_tBasey(136)=306 exch2_txGlobalo(136)=1 exch2_tyGlobalo(136)=307 exch2_isWedge(136)=1 exch2_isNedge(136)=0 exch2_isEedge(136)=0 exch2_isSedge(136)=0 exch2_myFace(136)=1 exch2_mydNx(136)=510 exch2_mydNy(136)=510 exch2_nNeighbours(136)=4 exch2_neighbourId(1,136)=151 exch2_iLo(1,136)=0 exch2_iHi(1,136)=35 exch2_jLo(1,136)=35 exch2_jHi(1,136)=35 exch2_opposingSend(1,136)=2 exch2_pij(1,1,136)=1 exch2_pij(2,1,136)=0 exch2_pij(3,1,136)=0 exch2_pij(4,1,136)=1 exch2_oi(1,136)=0 exch2_oj(1,136)=0 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)=35 exch2_opposingSend(3,136)=4 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)=1116 exch2_iLo(4,136)=0 exch2_iHi(4,136)=0 exch2_jLo(4,136)=0 exch2_jHi(4,136)=35 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 RETURN END SUBROUTINE W2_E2SETUP_137 C Topology for tile 137 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(137)=34 exch2_tNy(137)=34 exch2_tBasex(137)=34 exch2_tBasey(137)=306 exch2_txGlobalo(137)=35 exch2_tyGlobalo(137)=307 exch2_isWedge(137)=0 exch2_isNedge(137)=0 exch2_isEedge(137)=0 exch2_isSedge(137)=0 exch2_myFace(137)=1 exch2_mydNx(137)=510 exch2_mydNy(137)=510 exch2_nNeighbours(137)=4 exch2_neighbourId(1,137)=152 exch2_iLo(1,137)=0 exch2_iHi(1,137)=35 exch2_jLo(1,137)=35 exch2_jHi(1,137)=35 exch2_opposingSend(1,137)=2 exch2_pij(1,1,137)=1 exch2_pij(2,1,137)=0 exch2_pij(3,1,137)=0 exch2_pij(4,1,137)=1 exch2_oi(1,137)=0 exch2_oj(1,137)=0 exch2_neighbourId(2,137)=122 exch2_iLo(2,137)=0 exch2_iHi(2,137)=35 exch2_jLo(2,137)=0 exch2_jHi(2,137)=0 exch2_opposingSend(2,137)=1 exch2_pij(1,2,137)=1 exch2_pij(2,2,137)=0 exch2_pij(3,2,137)=0 exch2_pij(4,2,137)=1 exch2_oi(2,137)=0 exch2_oj(2,137)=0 exch2_neighbourId(3,137)=138 exch2_iLo(3,137)=35 exch2_iHi(3,137)=35 exch2_jLo(3,137)=0 exch2_jHi(3,137)=35 exch2_opposingSend(3,137)=4 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)=136 exch2_iLo(4,137)=0 exch2_iHi(4,137)=0 exch2_jLo(4,137)=0 exch2_jHi(4,137)=35 exch2_opposingSend(4,137)=3 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 RETURN END SUBROUTINE W2_E2SETUP_138 C Topology for tile 138 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(138)=34 exch2_tNy(138)=34 exch2_tBasex(138)=68 exch2_tBasey(138)=306 exch2_txGlobalo(138)=69 exch2_tyGlobalo(138)=307 exch2_isWedge(138)=0 exch2_isNedge(138)=0 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)=153 exch2_iLo(1,138)=0 exch2_iHi(1,138)=35 exch2_jLo(1,138)=35 exch2_jHi(1,138)=35 exch2_opposingSend(1,138)=2 exch2_pij(1,1,138)=1 exch2_pij(2,1,138)=0 exch2_pij(3,1,138)=0 exch2_pij(4,1,138)=1 exch2_oi(1,138)=0 exch2_oj(1,138)=0 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)=35 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)=35 exch2_opposingSend(4,138)=3 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)=34 exch2_tBasex(139)=102 exch2_tBasey(139)=306 exch2_txGlobalo(139)=103 exch2_tyGlobalo(139)=307 exch2_isWedge(139)=0 exch2_isNedge(139)=0 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)=154 exch2_iLo(1,139)=0 exch2_iHi(1,139)=35 exch2_jLo(1,139)=35 exch2_jHi(1,139)=35 exch2_opposingSend(1,139)=2 exch2_pij(1,1,139)=1 exch2_pij(2,1,139)=0 exch2_pij(3,1,139)=0 exch2_pij(4,1,139)=1 exch2_oi(1,139)=0 exch2_oj(1,139)=0 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)=35 exch2_opposingSend(3,139)=4 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)=35 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)=34 exch2_tBasex(140)=136 exch2_tBasey(140)=306 exch2_txGlobalo(140)=137 exch2_tyGlobalo(140)=307 exch2_isWedge(140)=0 exch2_isNedge(140)=0 exch2_isEedge(140)=0 exch2_isSedge(140)=0 exch2_myFace(140)=1 exch2_mydNx(140)=510 exch2_mydNy(140)=510 exch2_nNeighbours(140)=4 exch2_neighbourId(1,140)=155 exch2_iLo(1,140)=0 exch2_iHi(1,140)=35 exch2_jLo(1,140)=35 exch2_jHi(1,140)=35 exch2_opposingSend(1,140)=2 exch2_pij(1,1,140)=1 exch2_pij(2,1,140)=0 exch2_pij(3,1,140)=0 exch2_pij(4,1,140)=1 exch2_oi(1,140)=0 exch2_oj(1,140)=0 exch2_neighbourId(2,140)=125 exch2_iLo(2,140)=0 exch2_iHi(2,140)=35 exch2_jLo(2,140)=0 exch2_jHi(2,140)=0 exch2_opposingSend(2,140)=1 exch2_pij(1,2,140)=1 exch2_pij(2,2,140)=0 exch2_pij(3,2,140)=0 exch2_pij(4,2,140)=1 exch2_oi(2,140)=0 exch2_oj(2,140)=0 exch2_neighbourId(3,140)=141 exch2_iLo(3,140)=35 exch2_iHi(3,140)=35 exch2_jLo(3,140)=0 exch2_jHi(3,140)=35 exch2_opposingSend(3,140)=4 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)=139 exch2_iLo(4,140)=0 exch2_iHi(4,140)=0 exch2_jLo(4,140)=0 exch2_jHi(4,140)=35 exch2_opposingSend(4,140)=3 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 RETURN END SUBROUTINE W2_E2SETUP_141 C Topology for tile 141 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(141)=34 exch2_tNy(141)=34 exch2_tBasex(141)=170 exch2_tBasey(141)=306 exch2_txGlobalo(141)=171 exch2_tyGlobalo(141)=307 exch2_isWedge(141)=0 exch2_isNedge(141)=0 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)=156 exch2_iLo(1,141)=0 exch2_iHi(1,141)=35 exch2_jLo(1,141)=35 exch2_jHi(1,141)=35 exch2_opposingSend(1,141)=2 exch2_pij(1,1,141)=1 exch2_pij(2,1,141)=0 exch2_pij(3,1,141)=0 exch2_pij(4,1,141)=1 exch2_oi(1,141)=0 exch2_oj(1,141)=0 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)=35 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)=35 exch2_opposingSend(4,141)=3 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)=34 exch2_tBasex(142)=204 exch2_tBasey(142)=306 exch2_txGlobalo(142)=205 exch2_tyGlobalo(142)=307 exch2_isWedge(142)=0 exch2_isNedge(142)=0 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)=157 exch2_iLo(1,142)=0 exch2_iHi(1,142)=35 exch2_jLo(1,142)=35 exch2_jHi(1,142)=35 exch2_opposingSend(1,142)=2 exch2_pij(1,1,142)=1 exch2_pij(2,1,142)=0 exch2_pij(3,1,142)=0 exch2_pij(4,1,142)=1 exch2_oi(1,142)=0 exch2_oj(1,142)=0 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)=35 exch2_opposingSend(3,142)=4 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)=35 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)=34 exch2_tBasex(143)=238 exch2_tBasey(143)=306 exch2_txGlobalo(143)=239 exch2_tyGlobalo(143)=307 exch2_isWedge(143)=0 exch2_isNedge(143)=0 exch2_isEedge(143)=0 exch2_isSedge(143)=0 exch2_myFace(143)=1 exch2_mydNx(143)=510 exch2_mydNy(143)=510 exch2_nNeighbours(143)=4 exch2_neighbourId(1,143)=158 exch2_iLo(1,143)=0 exch2_iHi(1,143)=35 exch2_jLo(1,143)=35 exch2_jHi(1,143)=35 exch2_opposingSend(1,143)=2 exch2_pij(1,1,143)=1 exch2_pij(2,1,143)=0 exch2_pij(3,1,143)=0 exch2_pij(4,1,143)=1 exch2_oi(1,143)=0 exch2_oj(1,143)=0 exch2_neighbourId(2,143)=128 exch2_iLo(2,143)=0 exch2_iHi(2,143)=35 exch2_jLo(2,143)=0 exch2_jHi(2,143)=0 exch2_opposingSend(2,143)=1 exch2_pij(1,2,143)=1 exch2_pij(2,2,143)=0 exch2_pij(3,2,143)=0 exch2_pij(4,2,143)=1 exch2_oi(2,143)=0 exch2_oj(2,143)=0 exch2_neighbourId(3,143)=144 exch2_iLo(3,143)=35 exch2_iHi(3,143)=35 exch2_jLo(3,143)=0 exch2_jHi(3,143)=35 exch2_opposingSend(3,143)=4 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)=142 exch2_iLo(4,143)=0 exch2_iHi(4,143)=0 exch2_jLo(4,143)=0 exch2_jHi(4,143)=35 exch2_opposingSend(4,143)=3 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 RETURN END SUBROUTINE W2_E2SETUP_144 C Topology for tile 144 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(144)=34 exch2_tNy(144)=34 exch2_tBasex(144)=272 exch2_tBasey(144)=306 exch2_txGlobalo(144)=273 exch2_tyGlobalo(144)=307 exch2_isWedge(144)=0 exch2_isNedge(144)=0 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)=159 exch2_iLo(1,144)=0 exch2_iHi(1,144)=35 exch2_jLo(1,144)=35 exch2_jHi(1,144)=35 exch2_opposingSend(1,144)=2 exch2_pij(1,1,144)=1 exch2_pij(2,1,144)=0 exch2_pij(3,1,144)=0 exch2_pij(4,1,144)=1 exch2_oi(1,144)=0 exch2_oj(1,144)=0 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)=35 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)=35 exch2_opposingSend(4,144)=3 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)=34 exch2_tBasex(145)=306 exch2_tBasey(145)=306 exch2_txGlobalo(145)=307 exch2_tyGlobalo(145)=307 exch2_isWedge(145)=0 exch2_isNedge(145)=0 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)=160 exch2_iLo(1,145)=0 exch2_iHi(1,145)=35 exch2_jLo(1,145)=35 exch2_jHi(1,145)=35 exch2_opposingSend(1,145)=2 exch2_pij(1,1,145)=1 exch2_pij(2,1,145)=0 exch2_pij(3,1,145)=0 exch2_pij(4,1,145)=1 exch2_oi(1,145)=0 exch2_oj(1,145)=0 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)=35 exch2_opposingSend(3,145)=4 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)=35 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)=34 exch2_tBasex(146)=340 exch2_tBasey(146)=306 exch2_txGlobalo(146)=341 exch2_tyGlobalo(146)=307 exch2_isWedge(146)=0 exch2_isNedge(146)=0 exch2_isEedge(146)=0 exch2_isSedge(146)=0 exch2_myFace(146)=1 exch2_mydNx(146)=510 exch2_mydNy(146)=510 exch2_nNeighbours(146)=4 exch2_neighbourId(1,146)=161 exch2_iLo(1,146)=0 exch2_iHi(1,146)=35 exch2_jLo(1,146)=35 exch2_jHi(1,146)=35 exch2_opposingSend(1,146)=2 exch2_pij(1,1,146)=1 exch2_pij(2,1,146)=0 exch2_pij(3,1,146)=0 exch2_pij(4,1,146)=1 exch2_oi(1,146)=0 exch2_oj(1,146)=0 exch2_neighbourId(2,146)=131 exch2_iLo(2,146)=0 exch2_iHi(2,146)=35 exch2_jLo(2,146)=0 exch2_jHi(2,146)=0 exch2_opposingSend(2,146)=1 exch2_pij(1,2,146)=1 exch2_pij(2,2,146)=0 exch2_pij(3,2,146)=0 exch2_pij(4,2,146)=1 exch2_oi(2,146)=0 exch2_oj(2,146)=0 exch2_neighbourId(3,146)=147 exch2_iLo(3,146)=35 exch2_iHi(3,146)=35 exch2_jLo(3,146)=0 exch2_jHi(3,146)=35 exch2_opposingSend(3,146)=4 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)=145 exch2_iLo(4,146)=0 exch2_iHi(4,146)=0 exch2_jLo(4,146)=0 exch2_jHi(4,146)=35 exch2_opposingSend(4,146)=3 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 RETURN END SUBROUTINE W2_E2SETUP_147 C Topology for tile 147 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(147)=34 exch2_tNy(147)=34 exch2_tBasex(147)=374 exch2_tBasey(147)=306 exch2_txGlobalo(147)=375 exch2_tyGlobalo(147)=307 exch2_isWedge(147)=0 exch2_isNedge(147)=0 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)=162 exch2_iLo(1,147)=0 exch2_iHi(1,147)=35 exch2_jLo(1,147)=35 exch2_jHi(1,147)=35 exch2_opposingSend(1,147)=2 exch2_pij(1,1,147)=1 exch2_pij(2,1,147)=0 exch2_pij(3,1,147)=0 exch2_pij(4,1,147)=1 exch2_oi(1,147)=0 exch2_oj(1,147)=0 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)=35 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)=35 exch2_opposingSend(4,147)=3 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)=34 exch2_tBasex(148)=408 exch2_tBasey(148)=306 exch2_txGlobalo(148)=409 exch2_tyGlobalo(148)=307 exch2_isWedge(148)=0 exch2_isNedge(148)=0 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)=163 exch2_iLo(1,148)=0 exch2_iHi(1,148)=35 exch2_jLo(1,148)=35 exch2_jHi(1,148)=35 exch2_opposingSend(1,148)=2 exch2_pij(1,1,148)=1 exch2_pij(2,1,148)=0 exch2_pij(3,1,148)=0 exch2_pij(4,1,148)=1 exch2_oi(1,148)=0 exch2_oj(1,148)=0 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)=35 exch2_opposingSend(3,148)=4 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)=35 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)=34 exch2_tBasex(149)=442 exch2_tBasey(149)=306 exch2_txGlobalo(149)=443 exch2_tyGlobalo(149)=307 exch2_isWedge(149)=0 exch2_isNedge(149)=0 exch2_isEedge(149)=0 exch2_isSedge(149)=0 exch2_myFace(149)=1 exch2_mydNx(149)=510 exch2_mydNy(149)=510 exch2_nNeighbours(149)=4 exch2_neighbourId(1,149)=164 exch2_iLo(1,149)=0 exch2_iHi(1,149)=35 exch2_jLo(1,149)=35 exch2_jHi(1,149)=35 exch2_opposingSend(1,149)=2 exch2_pij(1,1,149)=1 exch2_pij(2,1,149)=0 exch2_pij(3,1,149)=0 exch2_pij(4,1,149)=1 exch2_oi(1,149)=0 exch2_oj(1,149)=0 exch2_neighbourId(2,149)=134 exch2_iLo(2,149)=0 exch2_iHi(2,149)=35 exch2_jLo(2,149)=0 exch2_jHi(2,149)=0 exch2_opposingSend(2,149)=1 exch2_pij(1,2,149)=1 exch2_pij(2,2,149)=0 exch2_pij(3,2,149)=0 exch2_pij(4,2,149)=1 exch2_oi(2,149)=0 exch2_oj(2,149)=0 exch2_neighbourId(3,149)=150 exch2_iLo(3,149)=35 exch2_iHi(3,149)=35 exch2_jLo(3,149)=0 exch2_jHi(3,149)=35 exch2_opposingSend(3,149)=4 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)=148 exch2_iLo(4,149)=0 exch2_iHi(4,149)=0 exch2_jLo(4,149)=0 exch2_jHi(4,149)=35 exch2_opposingSend(4,149)=3 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 RETURN END SUBROUTINE W2_E2SETUP_150 C Topology for tile 150 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(150)=34 exch2_tNy(150)=34 exch2_tBasex(150)=476 exch2_tBasey(150)=306 exch2_txGlobalo(150)=477 exch2_tyGlobalo(150)=307 exch2_isWedge(150)=0 exch2_isNedge(150)=0 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)=165 exch2_iLo(1,150)=0 exch2_iHi(1,150)=35 exch2_jLo(1,150)=35 exch2_jHi(1,150)=35 exch2_opposingSend(1,150)=2 exch2_pij(1,1,150)=1 exch2_pij(2,1,150)=0 exch2_pij(3,1,150)=0 exch2_pij(4,1,150)=1 exch2_oi(1,150)=0 exch2_oj(1,150)=0 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)=361 exch2_iLo(3,150)=35 exch2_iHi(3,150)=35 exch2_jLo(3,150)=0 exch2_jHi(3,150)=35 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)=35 exch2_opposingSend(4,150)=3 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)=34 exch2_tBasex(151)=0 exch2_tBasey(151)=340 exch2_txGlobalo(151)=1 exch2_tyGlobalo(151)=341 exch2_isWedge(151)=1 exch2_isNedge(151)=0 exch2_isEedge(151)=0 exch2_isSedge(151)=0 exch2_myFace(151)=1 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)=35 exch2_jHi(1,151)=35 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)=136 exch2_iLo(2,151)=0 exch2_iHi(2,151)=35 exch2_jLo(2,151)=0 exch2_jHi(2,151)=0 exch2_opposingSend(2,151)=1 exch2_pij(1,2,151)=1 exch2_pij(2,2,151)=0 exch2_pij(3,2,151)=0 exch2_pij(4,2,151)=1 exch2_oi(2,151)=0 exch2_oj(2,151)=0 exch2_neighbourId(3,151)=152 exch2_iLo(3,151)=35 exch2_iHi(3,151)=35 exch2_jLo(3,151)=0 exch2_jHi(3,151)=35 exch2_opposingSend(3,151)=4 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)=1115 exch2_iLo(4,151)=0 exch2_iHi(4,151)=0 exch2_jLo(4,151)=0 exch2_jHi(4,151)=35 exch2_opposingSend(4,151)=1 exch2_pij(1,4,151)=0 exch2_pij(2,4,151)=1 exch2_pij(3,4,151)=-1 exch2_pij(4,4,151)=0 exch2_oi(4,151)=-510 exch2_oj(4,151)=511 RETURN END SUBROUTINE W2_E2SETUP_152 C Topology for tile 152 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(152)=34 exch2_tNy(152)=34 exch2_tBasex(152)=34 exch2_tBasey(152)=340 exch2_txGlobalo(152)=35 exch2_tyGlobalo(152)=341 exch2_isWedge(152)=0 exch2_isNedge(152)=0 exch2_isEedge(152)=0 exch2_isSedge(152)=0 exch2_myFace(152)=1 exch2_mydNx(152)=510 exch2_mydNy(152)=510 exch2_nNeighbours(152)=4 exch2_neighbourId(1,152)=167 exch2_iLo(1,152)=0 exch2_iHi(1,152)=35 exch2_jLo(1,152)=35 exch2_jHi(1,152)=35 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)=137 exch2_iLo(2,152)=0 exch2_iHi(2,152)=35 exch2_jLo(2,152)=0 exch2_jHi(2,152)=0 exch2_opposingSend(2,152)=1 exch2_pij(1,2,152)=1 exch2_pij(2,2,152)=0 exch2_pij(3,2,152)=0 exch2_pij(4,2,152)=1 exch2_oi(2,152)=0 exch2_oj(2,152)=0 exch2_neighbourId(3,152)=153 exch2_iLo(3,152)=35 exch2_iHi(3,152)=35 exch2_jLo(3,152)=0 exch2_jHi(3,152)=35 exch2_opposingSend(3,152)=4 exch2_pij(1,3,152)=1 exch2_pij(2,3,152)=0 exch2_pij(3,3,152)=0 exch2_pij(4,3,152)=1 exch2_oi(3,152)=0 exch2_oj(3,152)=0 exch2_neighbourId(4,152)=151 exch2_iLo(4,152)=0 exch2_iHi(4,152)=0 exch2_jLo(4,152)=0 exch2_jHi(4,152)=35 exch2_opposingSend(4,152)=3 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 RETURN END SUBROUTINE W2_E2SETUP_153 C Topology for tile 153 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(153)=34 exch2_tNy(153)=34 exch2_tBasex(153)=68 exch2_tBasey(153)=340 exch2_txGlobalo(153)=69 exch2_tyGlobalo(153)=341 exch2_isWedge(153)=0 exch2_isNedge(153)=0 exch2_isEedge(153)=0 exch2_isSedge(153)=0 exch2_myFace(153)=1 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)=35 exch2_jHi(1,153)=35 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)=138 exch2_iLo(2,153)=0 exch2_iHi(2,153)=35 exch2_jLo(2,153)=0 exch2_jHi(2,153)=0 exch2_opposingSend(2,153)=1 exch2_pij(1,2,153)=1 exch2_pij(2,2,153)=0 exch2_pij(3,2,153)=0 exch2_pij(4,2,153)=1 exch2_oi(2,153)=0 exch2_oj(2,153)=0 exch2_neighbourId(3,153)=154 exch2_iLo(3,153)=35 exch2_iHi(3,153)=35 exch2_jLo(3,153)=0 exch2_jHi(3,153)=35 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)=35 exch2_opposingSend(4,153)=3 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)=34 exch2_tBasex(154)=102 exch2_tBasey(154)=340 exch2_txGlobalo(154)=103 exch2_tyGlobalo(154)=341 exch2_isWedge(154)=0 exch2_isNedge(154)=0 exch2_isEedge(154)=0 exch2_isSedge(154)=0 exch2_myFace(154)=1 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)=35 exch2_jHi(1,154)=35 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)=139 exch2_iLo(2,154)=0 exch2_iHi(2,154)=35 exch2_jLo(2,154)=0 exch2_jHi(2,154)=0 exch2_opposingSend(2,154)=1 exch2_pij(1,2,154)=1 exch2_pij(2,2,154)=0 exch2_pij(3,2,154)=0 exch2_pij(4,2,154)=1 exch2_oi(2,154)=0 exch2_oj(2,154)=0 exch2_neighbourId(3,154)=155 exch2_iLo(3,154)=35 exch2_iHi(3,154)=35 exch2_jLo(3,154)=0 exch2_jHi(3,154)=35 exch2_opposingSend(3,154)=4 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)=35 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)=34 exch2_tBasex(155)=136 exch2_tBasey(155)=340 exch2_txGlobalo(155)=137 exch2_tyGlobalo(155)=341 exch2_isWedge(155)=0 exch2_isNedge(155)=0 exch2_isEedge(155)=0 exch2_isSedge(155)=0 exch2_myFace(155)=1 exch2_mydNx(155)=510 exch2_mydNy(155)=510 exch2_nNeighbours(155)=4 exch2_neighbourId(1,155)=170 exch2_iLo(1,155)=0 exch2_iHi(1,155)=35 exch2_jLo(1,155)=35 exch2_jHi(1,155)=35 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)=140 exch2_iLo(2,155)=0 exch2_iHi(2,155)=35 exch2_jLo(2,155)=0 exch2_jHi(2,155)=0 exch2_opposingSend(2,155)=1 exch2_pij(1,2,155)=1 exch2_pij(2,2,155)=0 exch2_pij(3,2,155)=0 exch2_pij(4,2,155)=1 exch2_oi(2,155)=0 exch2_oj(2,155)=0 exch2_neighbourId(3,155)=156 exch2_iLo(3,155)=35 exch2_iHi(3,155)=35 exch2_jLo(3,155)=0 exch2_jHi(3,155)=35 exch2_opposingSend(3,155)=4 exch2_pij(1,3,155)=1 exch2_pij(2,3,155)=0 exch2_pij(3,3,155)=0 exch2_pij(4,3,155)=1 exch2_oi(3,155)=0 exch2_oj(3,155)=0 exch2_neighbourId(4,155)=154 exch2_iLo(4,155)=0 exch2_iHi(4,155)=0 exch2_jLo(4,155)=0 exch2_jHi(4,155)=35 exch2_opposingSend(4,155)=3 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 RETURN END SUBROUTINE W2_E2SETUP_156 C Topology for tile 156 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(156)=34 exch2_tNy(156)=34 exch2_tBasex(156)=170 exch2_tBasey(156)=340 exch2_txGlobalo(156)=171 exch2_tyGlobalo(156)=341 exch2_isWedge(156)=0 exch2_isNedge(156)=0 exch2_isEedge(156)=0 exch2_isSedge(156)=0 exch2_myFace(156)=1 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)=35 exch2_jHi(1,156)=35 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)=141 exch2_iLo(2,156)=0 exch2_iHi(2,156)=35 exch2_jLo(2,156)=0 exch2_jHi(2,156)=0 exch2_opposingSend(2,156)=1 exch2_pij(1,2,156)=1 exch2_pij(2,2,156)=0 exch2_pij(3,2,156)=0 exch2_pij(4,2,156)=1 exch2_oi(2,156)=0 exch2_oj(2,156)=0 exch2_neighbourId(3,156)=157 exch2_iLo(3,156)=35 exch2_iHi(3,156)=35 exch2_jLo(3,156)=0 exch2_jHi(3,156)=35 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)=35 exch2_opposingSend(4,156)=3 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)=34 exch2_tBasex(157)=204 exch2_tBasey(157)=340 exch2_txGlobalo(157)=205 exch2_tyGlobalo(157)=341 exch2_isWedge(157)=0 exch2_isNedge(157)=0 exch2_isEedge(157)=0 exch2_isSedge(157)=0 exch2_myFace(157)=1 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)=35 exch2_jHi(1,157)=35 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)=142 exch2_iLo(2,157)=0 exch2_iHi(2,157)=35 exch2_jLo(2,157)=0 exch2_jHi(2,157)=0 exch2_opposingSend(2,157)=1 exch2_pij(1,2,157)=1 exch2_pij(2,2,157)=0 exch2_pij(3,2,157)=0 exch2_pij(4,2,157)=1 exch2_oi(2,157)=0 exch2_oj(2,157)=0 exch2_neighbourId(3,157)=158 exch2_iLo(3,157)=35 exch2_iHi(3,157)=35 exch2_jLo(3,157)=0 exch2_jHi(3,157)=35 exch2_opposingSend(3,157)=4 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)=35 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)=34 exch2_tBasex(158)=238 exch2_tBasey(158)=340 exch2_txGlobalo(158)=239 exch2_tyGlobalo(158)=341 exch2_isWedge(158)=0 exch2_isNedge(158)=0 exch2_isEedge(158)=0 exch2_isSedge(158)=0 exch2_myFace(158)=1 exch2_mydNx(158)=510 exch2_mydNy(158)=510 exch2_nNeighbours(158)=4 exch2_neighbourId(1,158)=173 exch2_iLo(1,158)=0 exch2_iHi(1,158)=35 exch2_jLo(1,158)=35 exch2_jHi(1,158)=35 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)=143 exch2_iLo(2,158)=0 exch2_iHi(2,158)=35 exch2_jLo(2,158)=0 exch2_jHi(2,158)=0 exch2_opposingSend(2,158)=1 exch2_pij(1,2,158)=1 exch2_pij(2,2,158)=0 exch2_pij(3,2,158)=0 exch2_pij(4,2,158)=1 exch2_oi(2,158)=0 exch2_oj(2,158)=0 exch2_neighbourId(3,158)=159 exch2_iLo(3,158)=35 exch2_iHi(3,158)=35 exch2_jLo(3,158)=0 exch2_jHi(3,158)=35 exch2_opposingSend(3,158)=4 exch2_pij(1,3,158)=1 exch2_pij(2,3,158)=0 exch2_pij(3,3,158)=0 exch2_pij(4,3,158)=1 exch2_oi(3,158)=0 exch2_oj(3,158)=0 exch2_neighbourId(4,158)=157 exch2_iLo(4,158)=0 exch2_iHi(4,158)=0 exch2_jLo(4,158)=0 exch2_jHi(4,158)=35 exch2_opposingSend(4,158)=3 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 RETURN END SUBROUTINE W2_E2SETUP_159 C Topology for tile 159 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(159)=34 exch2_tNy(159)=34 exch2_tBasex(159)=272 exch2_tBasey(159)=340 exch2_txGlobalo(159)=273 exch2_tyGlobalo(159)=341 exch2_isWedge(159)=0 exch2_isNedge(159)=0 exch2_isEedge(159)=0 exch2_isSedge(159)=0 exch2_myFace(159)=1 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)=35 exch2_jHi(1,159)=35 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)=144 exch2_iLo(2,159)=0 exch2_iHi(2,159)=35 exch2_jLo(2,159)=0 exch2_jHi(2,159)=0 exch2_opposingSend(2,159)=1 exch2_pij(1,2,159)=1 exch2_pij(2,2,159)=0 exch2_pij(3,2,159)=0 exch2_pij(4,2,159)=1 exch2_oi(2,159)=0 exch2_oj(2,159)=0 exch2_neighbourId(3,159)=160 exch2_iLo(3,159)=35 exch2_iHi(3,159)=35 exch2_jLo(3,159)=0 exch2_jHi(3,159)=35 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)=35 exch2_opposingSend(4,159)=3 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)=34 exch2_tBasex(160)=306 exch2_tBasey(160)=340 exch2_txGlobalo(160)=307 exch2_tyGlobalo(160)=341 exch2_isWedge(160)=0 exch2_isNedge(160)=0 exch2_isEedge(160)=0 exch2_isSedge(160)=0 exch2_myFace(160)=1 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)=35 exch2_jHi(1,160)=35 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)=145 exch2_iLo(2,160)=0 exch2_iHi(2,160)=35 exch2_jLo(2,160)=0 exch2_jHi(2,160)=0 exch2_opposingSend(2,160)=1 exch2_pij(1,2,160)=1 exch2_pij(2,2,160)=0 exch2_pij(3,2,160)=0 exch2_pij(4,2,160)=1 exch2_oi(2,160)=0 exch2_oj(2,160)=0 exch2_neighbourId(3,160)=161 exch2_iLo(3,160)=35 exch2_iHi(3,160)=35 exch2_jLo(3,160)=0 exch2_jHi(3,160)=35 exch2_opposingSend(3,160)=4 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)=35 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)=34 exch2_tBasex(161)=340 exch2_tBasey(161)=340 exch2_txGlobalo(161)=341 exch2_tyGlobalo(161)=341 exch2_isWedge(161)=0 exch2_isNedge(161)=0 exch2_isEedge(161)=0 exch2_isSedge(161)=0 exch2_myFace(161)=1 exch2_mydNx(161)=510 exch2_mydNy(161)=510 exch2_nNeighbours(161)=4 exch2_neighbourId(1,161)=176 exch2_iLo(1,161)=0 exch2_iHi(1,161)=35 exch2_jLo(1,161)=35 exch2_jHi(1,161)=35 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)=146 exch2_iLo(2,161)=0 exch2_iHi(2,161)=35 exch2_jLo(2,161)=0 exch2_jHi(2,161)=0 exch2_opposingSend(2,161)=1 exch2_pij(1,2,161)=1 exch2_pij(2,2,161)=0 exch2_pij(3,2,161)=0 exch2_pij(4,2,161)=1 exch2_oi(2,161)=0 exch2_oj(2,161)=0 exch2_neighbourId(3,161)=162 exch2_iLo(3,161)=35 exch2_iHi(3,161)=35 exch2_jLo(3,161)=0 exch2_jHi(3,161)=35 exch2_opposingSend(3,161)=4 exch2_pij(1,3,161)=1 exch2_pij(2,3,161)=0 exch2_pij(3,3,161)=0 exch2_pij(4,3,161)=1 exch2_oi(3,161)=0 exch2_oj(3,161)=0 exch2_neighbourId(4,161)=160 exch2_iLo(4,161)=0 exch2_iHi(4,161)=0 exch2_jLo(4,161)=0 exch2_jHi(4,161)=35 exch2_opposingSend(4,161)=3 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 RETURN END SUBROUTINE W2_E2SETUP_162 C Topology for tile 162 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(162)=34 exch2_tNy(162)=34 exch2_tBasex(162)=374 exch2_tBasey(162)=340 exch2_txGlobalo(162)=375 exch2_tyGlobalo(162)=341 exch2_isWedge(162)=0 exch2_isNedge(162)=0 exch2_isEedge(162)=0 exch2_isSedge(162)=0 exch2_myFace(162)=1 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)=35 exch2_jHi(1,162)=35 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)=147 exch2_iLo(2,162)=0 exch2_iHi(2,162)=35 exch2_jLo(2,162)=0 exch2_jHi(2,162)=0 exch2_opposingSend(2,162)=1 exch2_pij(1,2,162)=1 exch2_pij(2,2,162)=0 exch2_pij(3,2,162)=0 exch2_pij(4,2,162)=1 exch2_oi(2,162)=0 exch2_oj(2,162)=0 exch2_neighbourId(3,162)=163 exch2_iLo(3,162)=35 exch2_iHi(3,162)=35 exch2_jLo(3,162)=0 exch2_jHi(3,162)=35 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)=35 exch2_opposingSend(4,162)=3 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)=34 exch2_tBasex(163)=408 exch2_tBasey(163)=340 exch2_txGlobalo(163)=409 exch2_tyGlobalo(163)=341 exch2_isWedge(163)=0 exch2_isNedge(163)=0 exch2_isEedge(163)=0 exch2_isSedge(163)=0 exch2_myFace(163)=1 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)=35 exch2_jHi(1,163)=35 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)=148 exch2_iLo(2,163)=0 exch2_iHi(2,163)=35 exch2_jLo(2,163)=0 exch2_jHi(2,163)=0 exch2_opposingSend(2,163)=1 exch2_pij(1,2,163)=1 exch2_pij(2,2,163)=0 exch2_pij(3,2,163)=0 exch2_pij(4,2,163)=1 exch2_oi(2,163)=0 exch2_oj(2,163)=0 exch2_neighbourId(3,163)=164 exch2_iLo(3,163)=35 exch2_iHi(3,163)=35 exch2_jLo(3,163)=0 exch2_jHi(3,163)=35 exch2_opposingSend(3,163)=4 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)=35 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)=34 exch2_tBasex(164)=442 exch2_tBasey(164)=340 exch2_txGlobalo(164)=443 exch2_tyGlobalo(164)=341 exch2_isWedge(164)=0 exch2_isNedge(164)=0 exch2_isEedge(164)=0 exch2_isSedge(164)=0 exch2_myFace(164)=1 exch2_mydNx(164)=510 exch2_mydNy(164)=510 exch2_nNeighbours(164)=4 exch2_neighbourId(1,164)=179 exch2_iLo(1,164)=0 exch2_iHi(1,164)=35 exch2_jLo(1,164)=35 exch2_jHi(1,164)=35 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)=149 exch2_iLo(2,164)=0 exch2_iHi(2,164)=35 exch2_jLo(2,164)=0 exch2_jHi(2,164)=0 exch2_opposingSend(2,164)=1 exch2_pij(1,2,164)=1 exch2_pij(2,2,164)=0 exch2_pij(3,2,164)=0 exch2_pij(4,2,164)=1 exch2_oi(2,164)=0 exch2_oj(2,164)=0 exch2_neighbourId(3,164)=165 exch2_iLo(3,164)=35 exch2_iHi(3,164)=35 exch2_jLo(3,164)=0 exch2_jHi(3,164)=35 exch2_opposingSend(3,164)=4 exch2_pij(1,3,164)=1 exch2_pij(2,3,164)=0 exch2_pij(3,3,164)=0 exch2_pij(4,3,164)=1 exch2_oi(3,164)=0 exch2_oj(3,164)=0 exch2_neighbourId(4,164)=163 exch2_iLo(4,164)=0 exch2_iHi(4,164)=0 exch2_jLo(4,164)=0 exch2_jHi(4,164)=35 exch2_opposingSend(4,164)=3 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 RETURN END SUBROUTINE W2_E2SETUP_165 C Topology for tile 165 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(165)=34 exch2_tNy(165)=34 exch2_tBasex(165)=476 exch2_tBasey(165)=340 exch2_txGlobalo(165)=477 exch2_tyGlobalo(165)=341 exch2_isWedge(165)=0 exch2_isNedge(165)=0 exch2_isEedge(165)=1 exch2_isSedge(165)=0 exch2_myFace(165)=1 exch2_mydNx(165)=510 exch2_mydNy(165)=510 exch2_nNeighbours(165)=4 exch2_neighbourId(1,165)=180 exch2_iLo(1,165)=0 exch2_iHi(1,165)=35 exch2_jLo(1,165)=35 exch2_jHi(1,165)=35 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)=150 exch2_iLo(2,165)=0 exch2_iHi(2,165)=35 exch2_jLo(2,165)=0 exch2_jHi(2,165)=0 exch2_opposingSend(2,165)=1 exch2_pij(1,2,165)=1 exch2_pij(2,2,165)=0 exch2_pij(3,2,165)=0 exch2_pij(4,2,165)=1 exch2_oi(2,165)=0 exch2_oj(2,165)=0 exch2_neighbourId(3,165)=376 exch2_iLo(3,165)=35 exch2_iHi(3,165)=35 exch2_jLo(3,165)=0 exch2_jHi(3,165)=35 exch2_opposingSend(3,165)=4 exch2_pij(1,3,165)=1 exch2_pij(2,3,165)=0 exch2_pij(3,3,165)=0 exch2_pij(4,3,165)=1 exch2_oi(3,165)=510 exch2_oj(3,165)=0 exch2_neighbourId(4,165)=164 exch2_iLo(4,165)=0 exch2_iHi(4,165)=0 exch2_jLo(4,165)=0 exch2_jHi(4,165)=35 exch2_opposingSend(4,165)=3 exch2_pij(1,4,165)=1 exch2_pij(2,4,165)=0 exch2_pij(3,4,165)=0 exch2_pij(4,4,165)=1 exch2_oi(4,165)=0 exch2_oj(4,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)=34 exch2_tBasex(166)=0 exch2_tBasey(166)=374 exch2_txGlobalo(166)=1 exch2_tyGlobalo(166)=375 exch2_isWedge(166)=1 exch2_isNedge(166)=0 exch2_isEedge(166)=0 exch2_isSedge(166)=0 exch2_myFace(166)=1 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)=35 exch2_jHi(1,166)=35 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)=35 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)=1114 exch2_iLo(4,166)=0 exch2_iHi(4,166)=0 exch2_jLo(4,166)=0 exch2_jHi(4,166)=35 exch2_opposingSend(4,166)=1 exch2_pij(1,4,166)=0 exch2_pij(2,4,166)=1 exch2_pij(3,4,166)=-1 exch2_pij(4,4,166)=0 exch2_oi(4,166)=-510 exch2_oj(4,166)=511 RETURN END SUBROUTINE W2_E2SETUP_167 C Topology for tile 167 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(167)=34 exch2_tNy(167)=34 exch2_tBasex(167)=34 exch2_tBasey(167)=374 exch2_txGlobalo(167)=35 exch2_tyGlobalo(167)=375 exch2_isWedge(167)=0 exch2_isNedge(167)=0 exch2_isEedge(167)=0 exch2_isSedge(167)=0 exch2_myFace(167)=1 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)=35 exch2_jHi(1,167)=35 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)=35 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)=35 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)=34 exch2_tBasex(168)=68 exch2_tBasey(168)=374 exch2_txGlobalo(168)=69 exch2_tyGlobalo(168)=375 exch2_isWedge(168)=0 exch2_isNedge(168)=0 exch2_isEedge(168)=0 exch2_isSedge(168)=0 exch2_myFace(168)=1 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)=35 exch2_jHi(1,168)=35 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)=35 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)=35 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)=34 exch2_tBasex(169)=102 exch2_tBasey(169)=374 exch2_txGlobalo(169)=103 exch2_tyGlobalo(169)=375 exch2_isWedge(169)=0 exch2_isNedge(169)=0 exch2_isEedge(169)=0 exch2_isSedge(169)=0 exch2_myFace(169)=1 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)=35 exch2_jHi(1,169)=35 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)=35 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)=35 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)=34 exch2_tBasex(170)=136 exch2_tBasey(170)=374 exch2_txGlobalo(170)=137 exch2_tyGlobalo(170)=375 exch2_isWedge(170)=0 exch2_isNedge(170)=0 exch2_isEedge(170)=0 exch2_isSedge(170)=0 exch2_myFace(170)=1 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)=35 exch2_jHi(1,170)=35 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)=35 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)=35 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)=34 exch2_tBasex(171)=170 exch2_tBasey(171)=374 exch2_txGlobalo(171)=171 exch2_tyGlobalo(171)=375 exch2_isWedge(171)=0 exch2_isNedge(171)=0 exch2_isEedge(171)=0 exch2_isSedge(171)=0 exch2_myFace(171)=1 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)=35 exch2_jHi(1,171)=35 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)=35 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)=35 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)=34 exch2_tBasex(172)=204 exch2_tBasey(172)=374 exch2_txGlobalo(172)=205 exch2_tyGlobalo(172)=375 exch2_isWedge(172)=0 exch2_isNedge(172)=0 exch2_isEedge(172)=0 exch2_isSedge(172)=0 exch2_myFace(172)=1 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)=35 exch2_jHi(1,172)=35 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)=35 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)=35 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)=34 exch2_tBasex(173)=238 exch2_tBasey(173)=374 exch2_txGlobalo(173)=239 exch2_tyGlobalo(173)=375 exch2_isWedge(173)=0 exch2_isNedge(173)=0 exch2_isEedge(173)=0 exch2_isSedge(173)=0 exch2_myFace(173)=1 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)=35 exch2_jHi(1,173)=35 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)=35 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)=35 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)=34 exch2_tBasex(174)=272 exch2_tBasey(174)=374 exch2_txGlobalo(174)=273 exch2_tyGlobalo(174)=375 exch2_isWedge(174)=0 exch2_isNedge(174)=0 exch2_isEedge(174)=0 exch2_isSedge(174)=0 exch2_myFace(174)=1 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)=35 exch2_jHi(1,174)=35 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)=35 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)=35 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)=34 exch2_tBasex(175)=306 exch2_tBasey(175)=374 exch2_txGlobalo(175)=307 exch2_tyGlobalo(175)=375 exch2_isWedge(175)=0 exch2_isNedge(175)=0 exch2_isEedge(175)=0 exch2_isSedge(175)=0 exch2_myFace(175)=1 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)=35 exch2_jHi(1,175)=35 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)=35 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)=35 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)=34 exch2_tBasex(176)=340 exch2_tBasey(176)=374 exch2_txGlobalo(176)=341 exch2_tyGlobalo(176)=375 exch2_isWedge(176)=0 exch2_isNedge(176)=0 exch2_isEedge(176)=0 exch2_isSedge(176)=0 exch2_myFace(176)=1 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)=35 exch2_jHi(1,176)=35 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)=35 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)=35 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)=34 exch2_tBasex(177)=374 exch2_tBasey(177)=374 exch2_txGlobalo(177)=375 exch2_tyGlobalo(177)=375 exch2_isWedge(177)=0 exch2_isNedge(177)=0 exch2_isEedge(177)=0 exch2_isSedge(177)=0 exch2_myFace(177)=1 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)=35 exch2_jHi(1,177)=35 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)=35 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)=35 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)=34 exch2_tBasex(178)=408 exch2_tBasey(178)=374 exch2_txGlobalo(178)=409 exch2_tyGlobalo(178)=375 exch2_isWedge(178)=0 exch2_isNedge(178)=0 exch2_isEedge(178)=0 exch2_isSedge(178)=0 exch2_myFace(178)=1 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)=35 exch2_jHi(1,178)=35 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)=35 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)=35 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)=34 exch2_tBasex(179)=442 exch2_tBasey(179)=374 exch2_txGlobalo(179)=443 exch2_tyGlobalo(179)=375 exch2_isWedge(179)=0 exch2_isNedge(179)=0 exch2_isEedge(179)=0 exch2_isSedge(179)=0 exch2_myFace(179)=1 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)=35 exch2_jHi(1,179)=35 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)=35 exch2_opposingSend(3,179)=4 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)=35 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)=34 exch2_tBasex(180)=476 exch2_tBasey(180)=374 exch2_txGlobalo(180)=477 exch2_tyGlobalo(180)=375 exch2_isWedge(180)=0 exch2_isNedge(180)=0 exch2_isEedge(180)=1 exch2_isSedge(180)=0 exch2_myFace(180)=1 exch2_mydNx(180)=510 exch2_mydNy(180)=510 exch2_nNeighbours(180)=4 exch2_neighbourId(1,180)=195 exch2_iLo(1,180)=0 exch2_iHi(1,180)=35 exch2_jLo(1,180)=35 exch2_jHi(1,180)=35 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)=391 exch2_iLo(3,180)=35 exch2_iHi(3,180)=35 exch2_jLo(3,180)=0 exch2_jHi(3,180)=35 exch2_opposingSend(3,180)=4 exch2_pij(1,3,180)=1 exch2_pij(2,3,180)=0 exch2_pij(3,3,180)=0 exch2_pij(4,3,180)=1 exch2_oi(3,180)=510 exch2_oj(3,180)=0 exch2_neighbourId(4,180)=179 exch2_iLo(4,180)=0 exch2_iHi(4,180)=0 exch2_jLo(4,180)=0 exch2_jHi(4,180)=35 exch2_opposingSend(4,180)=3 exch2_pij(1,4,180)=1 exch2_pij(2,4,180)=0 exch2_pij(3,4,180)=0 exch2_pij(4,4,180)=1 exch2_oi(4,180)=0 exch2_oj(4,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)=34 exch2_tBasex(181)=0 exch2_tBasey(181)=408 exch2_txGlobalo(181)=1 exch2_tyGlobalo(181)=409 exch2_isWedge(181)=1 exch2_isNedge(181)=0 exch2_isEedge(181)=0 exch2_isSedge(181)=0 exch2_myFace(181)=1 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)=35 exch2_jHi(1,181)=35 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)=35 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)=1113 exch2_iLo(4,181)=0 exch2_iHi(4,181)=0 exch2_jLo(4,181)=0 exch2_jHi(4,181)=35 exch2_opposingSend(4,181)=1 exch2_pij(1,4,181)=0 exch2_pij(2,4,181)=1 exch2_pij(3,4,181)=-1 exch2_pij(4,4,181)=0 exch2_oi(4,181)=-510 exch2_oj(4,181)=511 RETURN END SUBROUTINE W2_E2SETUP_182 C Topology for tile 182 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(182)=34 exch2_tNy(182)=34 exch2_tBasex(182)=34 exch2_tBasey(182)=408 exch2_txGlobalo(182)=35 exch2_tyGlobalo(182)=409 exch2_isWedge(182)=0 exch2_isNedge(182)=0 exch2_isEedge(182)=0 exch2_isSedge(182)=0 exch2_myFace(182)=1 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)=35 exch2_jHi(1,182)=35 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)=35 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)=35 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)=34 exch2_tBasex(183)=68 exch2_tBasey(183)=408 exch2_txGlobalo(183)=69 exch2_tyGlobalo(183)=409 exch2_isWedge(183)=0 exch2_isNedge(183)=0 exch2_isEedge(183)=0 exch2_isSedge(183)=0 exch2_myFace(183)=1 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)=35 exch2_jHi(1,183)=35 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)=35 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)=35 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)=34 exch2_tBasex(184)=102 exch2_tBasey(184)=408 exch2_txGlobalo(184)=103 exch2_tyGlobalo(184)=409 exch2_isWedge(184)=0 exch2_isNedge(184)=0 exch2_isEedge(184)=0 exch2_isSedge(184)=0 exch2_myFace(184)=1 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)=35 exch2_jHi(1,184)=35 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)=35 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)=35 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)=34 exch2_tBasex(185)=136 exch2_tBasey(185)=408 exch2_txGlobalo(185)=137 exch2_tyGlobalo(185)=409 exch2_isWedge(185)=0 exch2_isNedge(185)=0 exch2_isEedge(185)=0 exch2_isSedge(185)=0 exch2_myFace(185)=1 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)=35 exch2_jHi(1,185)=35 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)=35 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)=35 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)=34 exch2_tBasex(186)=170 exch2_tBasey(186)=408 exch2_txGlobalo(186)=171 exch2_tyGlobalo(186)=409 exch2_isWedge(186)=0 exch2_isNedge(186)=0 exch2_isEedge(186)=0 exch2_isSedge(186)=0 exch2_myFace(186)=1 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)=35 exch2_jHi(1,186)=35 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)=35 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)=35 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)=34 exch2_tBasex(187)=204 exch2_tBasey(187)=408 exch2_txGlobalo(187)=205 exch2_tyGlobalo(187)=409 exch2_isWedge(187)=0 exch2_isNedge(187)=0 exch2_isEedge(187)=0 exch2_isSedge(187)=0 exch2_myFace(187)=1 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)=35 exch2_jHi(1,187)=35 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)=35 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)=35 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)=34 exch2_tBasex(188)=238 exch2_tBasey(188)=408 exch2_txGlobalo(188)=239 exch2_tyGlobalo(188)=409 exch2_isWedge(188)=0 exch2_isNedge(188)=0 exch2_isEedge(188)=0 exch2_isSedge(188)=0 exch2_myFace(188)=1 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)=35 exch2_jHi(1,188)=35 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)=35 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)=35 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)=34 exch2_tBasex(189)=272 exch2_tBasey(189)=408 exch2_txGlobalo(189)=273 exch2_tyGlobalo(189)=409 exch2_isWedge(189)=0 exch2_isNedge(189)=0 exch2_isEedge(189)=0 exch2_isSedge(189)=0 exch2_myFace(189)=1 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)=35 exch2_jHi(1,189)=35 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)=35 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)=35 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)=34 exch2_tBasex(190)=306 exch2_tBasey(190)=408 exch2_txGlobalo(190)=307 exch2_tyGlobalo(190)=409 exch2_isWedge(190)=0 exch2_isNedge(190)=0 exch2_isEedge(190)=0 exch2_isSedge(190)=0 exch2_myFace(190)=1 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)=35 exch2_jHi(1,190)=35 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)=35 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)=35 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)=34 exch2_tBasex(191)=340 exch2_tBasey(191)=408 exch2_txGlobalo(191)=341 exch2_tyGlobalo(191)=409 exch2_isWedge(191)=0 exch2_isNedge(191)=0 exch2_isEedge(191)=0 exch2_isSedge(191)=0 exch2_myFace(191)=1 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)=35 exch2_jHi(1,191)=35 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)=35 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)=35 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)=34 exch2_tBasex(192)=374 exch2_tBasey(192)=408 exch2_txGlobalo(192)=375 exch2_tyGlobalo(192)=409 exch2_isWedge(192)=0 exch2_isNedge(192)=0 exch2_isEedge(192)=0 exch2_isSedge(192)=0 exch2_myFace(192)=1 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)=35 exch2_jHi(1,192)=35 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)=35 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)=35 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)=34 exch2_tBasex(193)=408 exch2_tBasey(193)=408 exch2_txGlobalo(193)=409 exch2_tyGlobalo(193)=409 exch2_isWedge(193)=0 exch2_isNedge(193)=0 exch2_isEedge(193)=0 exch2_isSedge(193)=0 exch2_myFace(193)=1 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)=35 exch2_jHi(1,193)=35 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)=35 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)=35 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)=34 exch2_tBasex(194)=442 exch2_tBasey(194)=408 exch2_txGlobalo(194)=443 exch2_tyGlobalo(194)=409 exch2_isWedge(194)=0 exch2_isNedge(194)=0 exch2_isEedge(194)=0 exch2_isSedge(194)=0 exch2_myFace(194)=1 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)=35 exch2_jHi(1,194)=35 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)=35 exch2_opposingSend(3,194)=4 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)=35 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)=34 exch2_tBasex(195)=476 exch2_tBasey(195)=408 exch2_txGlobalo(195)=477 exch2_tyGlobalo(195)=409 exch2_isWedge(195)=0 exch2_isNedge(195)=0 exch2_isEedge(195)=1 exch2_isSedge(195)=0 exch2_myFace(195)=1 exch2_mydNx(195)=510 exch2_mydNy(195)=510 exch2_nNeighbours(195)=4 exch2_neighbourId(1,195)=210 exch2_iLo(1,195)=0 exch2_iHi(1,195)=35 exch2_jLo(1,195)=35 exch2_jHi(1,195)=35 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)=406 exch2_iLo(3,195)=35 exch2_iHi(3,195)=35 exch2_jLo(3,195)=0 exch2_jHi(3,195)=35 exch2_opposingSend(3,195)=4 exch2_pij(1,3,195)=1 exch2_pij(2,3,195)=0 exch2_pij(3,3,195)=0 exch2_pij(4,3,195)=1 exch2_oi(3,195)=510 exch2_oj(3,195)=0 exch2_neighbourId(4,195)=194 exch2_iLo(4,195)=0 exch2_iHi(4,195)=0 exch2_jLo(4,195)=0 exch2_jHi(4,195)=35 exch2_opposingSend(4,195)=3 exch2_pij(1,4,195)=1 exch2_pij(2,4,195)=0 exch2_pij(3,4,195)=0 exch2_pij(4,4,195)=1 exch2_oi(4,195)=0 exch2_oj(4,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)=34 exch2_tBasex(196)=0 exch2_tBasey(196)=442 exch2_txGlobalo(196)=1 exch2_tyGlobalo(196)=443 exch2_isWedge(196)=1 exch2_isNedge(196)=0 exch2_isEedge(196)=0 exch2_isSedge(196)=0 exch2_myFace(196)=1 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)=35 exch2_jHi(1,196)=35 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)=35 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)=1112 exch2_iLo(4,196)=0 exch2_iHi(4,196)=0 exch2_jLo(4,196)=0 exch2_jHi(4,196)=35 exch2_opposingSend(4,196)=1 exch2_pij(1,4,196)=0 exch2_pij(2,4,196)=1 exch2_pij(3,4,196)=-1 exch2_pij(4,4,196)=0 exch2_oi(4,196)=-510 exch2_oj(4,196)=511 RETURN END SUBROUTINE W2_E2SETUP_197 C Topology for tile 197 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(197)=34 exch2_tNy(197)=34 exch2_tBasex(197)=34 exch2_tBasey(197)=442 exch2_txGlobalo(197)=35 exch2_tyGlobalo(197)=443 exch2_isWedge(197)=0 exch2_isNedge(197)=0 exch2_isEedge(197)=0 exch2_isSedge(197)=0 exch2_myFace(197)=1 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)=35 exch2_jHi(1,197)=35 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)=35 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)=35 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)=34 exch2_tBasex(198)=68 exch2_tBasey(198)=442 exch2_txGlobalo(198)=69 exch2_tyGlobalo(198)=443 exch2_isWedge(198)=0 exch2_isNedge(198)=0 exch2_isEedge(198)=0 exch2_isSedge(198)=0 exch2_myFace(198)=1 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)=35 exch2_jHi(1,198)=35 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)=35 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)=35 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)=34 exch2_tBasex(199)=102 exch2_tBasey(199)=442 exch2_txGlobalo(199)=103 exch2_tyGlobalo(199)=443 exch2_isWedge(199)=0 exch2_isNedge(199)=0 exch2_isEedge(199)=0 exch2_isSedge(199)=0 exch2_myFace(199)=1 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)=35 exch2_jHi(1,199)=35 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)=35 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)=35 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)=34 exch2_tBasex(200)=136 exch2_tBasey(200)=442 exch2_txGlobalo(200)=137 exch2_tyGlobalo(200)=443 exch2_isWedge(200)=0 exch2_isNedge(200)=0 exch2_isEedge(200)=0 exch2_isSedge(200)=0 exch2_myFace(200)=1 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)=35 exch2_jHi(1,200)=35 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)=35 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)=35 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)=34 exch2_tBasex(201)=170 exch2_tBasey(201)=442 exch2_txGlobalo(201)=171 exch2_tyGlobalo(201)=443 exch2_isWedge(201)=0 exch2_isNedge(201)=0 exch2_isEedge(201)=0 exch2_isSedge(201)=0 exch2_myFace(201)=1 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)=35 exch2_jHi(1,201)=35 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)=35 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)=35 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)=34 exch2_tBasex(202)=204 exch2_tBasey(202)=442 exch2_txGlobalo(202)=205 exch2_tyGlobalo(202)=443 exch2_isWedge(202)=0 exch2_isNedge(202)=0 exch2_isEedge(202)=0 exch2_isSedge(202)=0 exch2_myFace(202)=1 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)=35 exch2_jHi(1,202)=35 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)=35 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)=35 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)=34 exch2_tBasex(203)=238 exch2_tBasey(203)=442 exch2_txGlobalo(203)=239 exch2_tyGlobalo(203)=443 exch2_isWedge(203)=0 exch2_isNedge(203)=0 exch2_isEedge(203)=0 exch2_isSedge(203)=0 exch2_myFace(203)=1 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)=35 exch2_jHi(1,203)=35 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)=35 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)=35 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)=34 exch2_tBasex(204)=272 exch2_tBasey(204)=442 exch2_txGlobalo(204)=273 exch2_tyGlobalo(204)=443 exch2_isWedge(204)=0 exch2_isNedge(204)=0 exch2_isEedge(204)=0 exch2_isSedge(204)=0 exch2_myFace(204)=1 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)=35 exch2_jHi(1,204)=35 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)=35 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)=35 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)=34 exch2_tBasex(205)=306 exch2_tBasey(205)=442 exch2_txGlobalo(205)=307 exch2_tyGlobalo(205)=443 exch2_isWedge(205)=0 exch2_isNedge(205)=0 exch2_isEedge(205)=0 exch2_isSedge(205)=0 exch2_myFace(205)=1 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)=35 exch2_jHi(1,205)=35 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)=35 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)=35 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)=34 exch2_tBasex(206)=340 exch2_tBasey(206)=442 exch2_txGlobalo(206)=341 exch2_tyGlobalo(206)=443 exch2_isWedge(206)=0 exch2_isNedge(206)=0 exch2_isEedge(206)=0 exch2_isSedge(206)=0 exch2_myFace(206)=1 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)=35 exch2_jHi(1,206)=35 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)=35 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)=35 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)=34 exch2_tBasex(207)=374 exch2_tBasey(207)=442 exch2_txGlobalo(207)=375 exch2_tyGlobalo(207)=443 exch2_isWedge(207)=0 exch2_isNedge(207)=0 exch2_isEedge(207)=0 exch2_isSedge(207)=0 exch2_myFace(207)=1 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)=35 exch2_jHi(1,207)=35 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)=35 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)=35 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)=34 exch2_tBasex(208)=408 exch2_tBasey(208)=442 exch2_txGlobalo(208)=409 exch2_tyGlobalo(208)=443 exch2_isWedge(208)=0 exch2_isNedge(208)=0 exch2_isEedge(208)=0 exch2_isSedge(208)=0 exch2_myFace(208)=1 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)=35 exch2_jHi(1,208)=35 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)=35 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)=35 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)=34 exch2_tBasex(209)=442 exch2_tBasey(209)=442 exch2_txGlobalo(209)=443 exch2_tyGlobalo(209)=443 exch2_isWedge(209)=0 exch2_isNedge(209)=0 exch2_isEedge(209)=0 exch2_isSedge(209)=0 exch2_myFace(209)=1 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)=35 exch2_jHi(1,209)=35 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)=35 exch2_opposingSend(3,209)=4 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)=35 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)=34 exch2_tBasex(210)=476 exch2_tBasey(210)=442 exch2_txGlobalo(210)=477 exch2_tyGlobalo(210)=443 exch2_isWedge(210)=0 exch2_isNedge(210)=0 exch2_isEedge(210)=1 exch2_isSedge(210)=0 exch2_myFace(210)=1 exch2_mydNx(210)=510 exch2_mydNy(210)=510 exch2_nNeighbours(210)=4 exch2_neighbourId(1,210)=225 exch2_iLo(1,210)=0 exch2_iHi(1,210)=35 exch2_jLo(1,210)=35 exch2_jHi(1,210)=35 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)=421 exch2_iLo(3,210)=35 exch2_iHi(3,210)=35 exch2_jLo(3,210)=0 exch2_jHi(3,210)=35 exch2_opposingSend(3,210)=4 exch2_pij(1,3,210)=1 exch2_pij(2,3,210)=0 exch2_pij(3,3,210)=0 exch2_pij(4,3,210)=1 exch2_oi(3,210)=510 exch2_oj(3,210)=0 exch2_neighbourId(4,210)=209 exch2_iLo(4,210)=0 exch2_iHi(4,210)=0 exch2_jLo(4,210)=0 exch2_jHi(4,210)=35 exch2_opposingSend(4,210)=3 exch2_pij(1,4,210)=1 exch2_pij(2,4,210)=0 exch2_pij(3,4,210)=0 exch2_pij(4,4,210)=1 exch2_oi(4,210)=0 exch2_oj(4,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)=34 exch2_tBasex(211)=0 exch2_tBasey(211)=476 exch2_txGlobalo(211)=1 exch2_tyGlobalo(211)=477 exch2_isWedge(211)=1 exch2_isNedge(211)=1 exch2_isEedge(211)=0 exch2_isSedge(211)=0 exch2_myFace(211)=1 exch2_mydNx(211)=510 exch2_mydNy(211)=510 exch2_nNeighbours(211)=4 exch2_neighbourId(1,211)=661 exch2_iLo(1,211)=0 exch2_iHi(1,211)=35 exch2_jLo(1,211)=35 exch2_jHi(1,211)=35 exch2_opposingSend(1,211)=4 exch2_pij(1,1,211)=0 exch2_pij(2,1,211)=-1 exch2_pij(3,1,211)=1 exch2_pij(4,1,211)=0 exch2_oi(1,211)=511 exch2_oj(1,211)=510 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)=35 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)=1111 exch2_iLo(4,211)=0 exch2_iHi(4,211)=0 exch2_jLo(4,211)=0 exch2_jHi(4,211)=35 exch2_opposingSend(4,211)=1 exch2_pij(1,4,211)=0 exch2_pij(2,4,211)=1 exch2_pij(3,4,211)=-1 exch2_pij(4,4,211)=0 exch2_oi(4,211)=-510 exch2_oj(4,211)=511 RETURN END SUBROUTINE W2_E2SETUP_212 C Topology for tile 212 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(212)=34 exch2_tNy(212)=34 exch2_tBasex(212)=34 exch2_tBasey(212)=476 exch2_txGlobalo(212)=35 exch2_tyGlobalo(212)=477 exch2_isWedge(212)=0 exch2_isNedge(212)=1 exch2_isEedge(212)=0 exch2_isSedge(212)=0 exch2_myFace(212)=1 exch2_mydNx(212)=510 exch2_mydNy(212)=510 exch2_nNeighbours(212)=4 exch2_neighbourId(1,212)=646 exch2_iLo(1,212)=0 exch2_iHi(1,212)=35 exch2_jLo(1,212)=35 exch2_jHi(1,212)=35 exch2_opposingSend(1,212)=4 exch2_pij(1,1,212)=0 exch2_pij(2,1,212)=-1 exch2_pij(3,1,212)=1 exch2_pij(4,1,212)=0 exch2_oi(1,212)=511 exch2_oj(1,212)=510 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)=35 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)=35 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)=34 exch2_tBasex(213)=68 exch2_tBasey(213)=476 exch2_txGlobalo(213)=69 exch2_tyGlobalo(213)=477 exch2_isWedge(213)=0 exch2_isNedge(213)=1 exch2_isEedge(213)=0 exch2_isSedge(213)=0 exch2_myFace(213)=1 exch2_mydNx(213)=510 exch2_mydNy(213)=510 exch2_nNeighbours(213)=4 exch2_neighbourId(1,213)=631 exch2_iLo(1,213)=0 exch2_iHi(1,213)=35 exch2_jLo(1,213)=35 exch2_jHi(1,213)=35 exch2_opposingSend(1,213)=4 exch2_pij(1,1,213)=0 exch2_pij(2,1,213)=-1 exch2_pij(3,1,213)=1 exch2_pij(4,1,213)=0 exch2_oi(1,213)=511 exch2_oj(1,213)=510 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)=35 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)=35 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)=34 exch2_tBasex(214)=102 exch2_tBasey(214)=476 exch2_txGlobalo(214)=103 exch2_tyGlobalo(214)=477 exch2_isWedge(214)=0 exch2_isNedge(214)=1 exch2_isEedge(214)=0 exch2_isSedge(214)=0 exch2_myFace(214)=1 exch2_mydNx(214)=510 exch2_mydNy(214)=510 exch2_nNeighbours(214)=4 exch2_neighbourId(1,214)=616 exch2_iLo(1,214)=0 exch2_iHi(1,214)=35 exch2_jLo(1,214)=35 exch2_jHi(1,214)=35 exch2_opposingSend(1,214)=4 exch2_pij(1,1,214)=0 exch2_pij(2,1,214)=-1 exch2_pij(3,1,214)=1 exch2_pij(4,1,214)=0 exch2_oi(1,214)=511 exch2_oj(1,214)=510 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)=35 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)=35 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)=34 exch2_tBasex(215)=136 exch2_tBasey(215)=476 exch2_txGlobalo(215)=137 exch2_tyGlobalo(215)=477 exch2_isWedge(215)=0 exch2_isNedge(215)=1 exch2_isEedge(215)=0 exch2_isSedge(215)=0 exch2_myFace(215)=1 exch2_mydNx(215)=510 exch2_mydNy(215)=510 exch2_nNeighbours(215)=4 exch2_neighbourId(1,215)=601 exch2_iLo(1,215)=0 exch2_iHi(1,215)=35 exch2_jLo(1,215)=35 exch2_jHi(1,215)=35 exch2_opposingSend(1,215)=4 exch2_pij(1,1,215)=0 exch2_pij(2,1,215)=-1 exch2_pij(3,1,215)=1 exch2_pij(4,1,215)=0 exch2_oi(1,215)=511 exch2_oj(1,215)=510 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)=35 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)=35 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)=34 exch2_tBasex(216)=170 exch2_tBasey(216)=476 exch2_txGlobalo(216)=171 exch2_tyGlobalo(216)=477 exch2_isWedge(216)=0 exch2_isNedge(216)=1 exch2_isEedge(216)=0 exch2_isSedge(216)=0 exch2_myFace(216)=1 exch2_mydNx(216)=510 exch2_mydNy(216)=510 exch2_nNeighbours(216)=4 exch2_neighbourId(1,216)=586 exch2_iLo(1,216)=0 exch2_iHi(1,216)=35 exch2_jLo(1,216)=35 exch2_jHi(1,216)=35 exch2_opposingSend(1,216)=4 exch2_pij(1,1,216)=0 exch2_pij(2,1,216)=-1 exch2_pij(3,1,216)=1 exch2_pij(4,1,216)=0 exch2_oi(1,216)=511 exch2_oj(1,216)=510 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)=35 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)=35 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)=34 exch2_tBasex(217)=204 exch2_tBasey(217)=476 exch2_txGlobalo(217)=205 exch2_tyGlobalo(217)=477 exch2_isWedge(217)=0 exch2_isNedge(217)=1 exch2_isEedge(217)=0 exch2_isSedge(217)=0 exch2_myFace(217)=1 exch2_mydNx(217)=510 exch2_mydNy(217)=510 exch2_nNeighbours(217)=4 exch2_neighbourId(1,217)=571 exch2_iLo(1,217)=0 exch2_iHi(1,217)=35 exch2_jLo(1,217)=35 exch2_jHi(1,217)=35 exch2_opposingSend(1,217)=4 exch2_pij(1,1,217)=0 exch2_pij(2,1,217)=-1 exch2_pij(3,1,217)=1 exch2_pij(4,1,217)=0 exch2_oi(1,217)=511 exch2_oj(1,217)=510 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)=35 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)=35 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)=34 exch2_tBasex(218)=238 exch2_tBasey(218)=476 exch2_txGlobalo(218)=239 exch2_tyGlobalo(218)=477 exch2_isWedge(218)=0 exch2_isNedge(218)=1 exch2_isEedge(218)=0 exch2_isSedge(218)=0 exch2_myFace(218)=1 exch2_mydNx(218)=510 exch2_mydNy(218)=510 exch2_nNeighbours(218)=4 exch2_neighbourId(1,218)=556 exch2_iLo(1,218)=0 exch2_iHi(1,218)=35 exch2_jLo(1,218)=35 exch2_jHi(1,218)=35 exch2_opposingSend(1,218)=4 exch2_pij(1,1,218)=0 exch2_pij(2,1,218)=-1 exch2_pij(3,1,218)=1 exch2_pij(4,1,218)=0 exch2_oi(1,218)=511 exch2_oj(1,218)=510 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)=35 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)=35 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)=34 exch2_tBasex(219)=272 exch2_tBasey(219)=476 exch2_txGlobalo(219)=273 exch2_tyGlobalo(219)=477 exch2_isWedge(219)=0 exch2_isNedge(219)=1 exch2_isEedge(219)=0 exch2_isSedge(219)=0 exch2_myFace(219)=1 exch2_mydNx(219)=510 exch2_mydNy(219)=510 exch2_nNeighbours(219)=4 exch2_neighbourId(1,219)=541 exch2_iLo(1,219)=0 exch2_iHi(1,219)=35 exch2_jLo(1,219)=35 exch2_jHi(1,219)=35 exch2_opposingSend(1,219)=4 exch2_pij(1,1,219)=0 exch2_pij(2,1,219)=-1 exch2_pij(3,1,219)=1 exch2_pij(4,1,219)=0 exch2_oi(1,219)=511 exch2_oj(1,219)=510 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)=35 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)=35 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)=34 exch2_tBasex(220)=306 exch2_tBasey(220)=476 exch2_txGlobalo(220)=307 exch2_tyGlobalo(220)=477 exch2_isWedge(220)=0 exch2_isNedge(220)=1 exch2_isEedge(220)=0 exch2_isSedge(220)=0 exch2_myFace(220)=1 exch2_mydNx(220)=510 exch2_mydNy(220)=510 exch2_nNeighbours(220)=4 exch2_neighbourId(1,220)=526 exch2_iLo(1,220)=0 exch2_iHi(1,220)=35 exch2_jLo(1,220)=35 exch2_jHi(1,220)=35 exch2_opposingSend(1,220)=4 exch2_pij(1,1,220)=0 exch2_pij(2,1,220)=-1 exch2_pij(3,1,220)=1 exch2_pij(4,1,220)=0 exch2_oi(1,220)=511 exch2_oj(1,220)=510 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)=35 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)=35 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)=34 exch2_tBasex(221)=340 exch2_tBasey(221)=476 exch2_txGlobalo(221)=341 exch2_tyGlobalo(221)=477 exch2_isWedge(221)=0 exch2_isNedge(221)=1 exch2_isEedge(221)=0 exch2_isSedge(221)=0 exch2_myFace(221)=1 exch2_mydNx(221)=510 exch2_mydNy(221)=510 exch2_nNeighbours(221)=4 exch2_neighbourId(1,221)=511 exch2_iLo(1,221)=0 exch2_iHi(1,221)=35 exch2_jLo(1,221)=35 exch2_jHi(1,221)=35 exch2_opposingSend(1,221)=4 exch2_pij(1,1,221)=0 exch2_pij(2,1,221)=-1 exch2_pij(3,1,221)=1 exch2_pij(4,1,221)=0 exch2_oi(1,221)=511 exch2_oj(1,221)=510 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)=35 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)=35 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)=34 exch2_tBasex(222)=374 exch2_tBasey(222)=476 exch2_txGlobalo(222)=375 exch2_tyGlobalo(222)=477 exch2_isWedge(222)=0 exch2_isNedge(222)=1 exch2_isEedge(222)=0 exch2_isSedge(222)=0 exch2_myFace(222)=1 exch2_mydNx(222)=510 exch2_mydNy(222)=510 exch2_nNeighbours(222)=4 exch2_neighbourId(1,222)=496 exch2_iLo(1,222)=0 exch2_iHi(1,222)=35 exch2_jLo(1,222)=35 exch2_jHi(1,222)=35 exch2_opposingSend(1,222)=4 exch2_pij(1,1,222)=0 exch2_pij(2,1,222)=-1 exch2_pij(3,1,222)=1 exch2_pij(4,1,222)=0 exch2_oi(1,222)=511 exch2_oj(1,222)=510 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)=35 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)=35 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)=34 exch2_tBasex(223)=408 exch2_tBasey(223)=476 exch2_txGlobalo(223)=409 exch2_tyGlobalo(223)=477 exch2_isWedge(223)=0 exch2_isNedge(223)=1 exch2_isEedge(223)=0 exch2_isSedge(223)=0 exch2_myFace(223)=1 exch2_mydNx(223)=510 exch2_mydNy(223)=510 exch2_nNeighbours(223)=4 exch2_neighbourId(1,223)=481 exch2_iLo(1,223)=0 exch2_iHi(1,223)=35 exch2_jLo(1,223)=35 exch2_jHi(1,223)=35 exch2_opposingSend(1,223)=4 exch2_pij(1,1,223)=0 exch2_pij(2,1,223)=-1 exch2_pij(3,1,223)=1 exch2_pij(4,1,223)=0 exch2_oi(1,223)=511 exch2_oj(1,223)=510 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)=35 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)=35 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)=34 exch2_tBasex(224)=442 exch2_tBasey(224)=476 exch2_txGlobalo(224)=443 exch2_tyGlobalo(224)=477 exch2_isWedge(224)=0 exch2_isNedge(224)=1 exch2_isEedge(224)=0 exch2_isSedge(224)=0 exch2_myFace(224)=1 exch2_mydNx(224)=510 exch2_mydNy(224)=510 exch2_nNeighbours(224)=4 exch2_neighbourId(1,224)=466 exch2_iLo(1,224)=0 exch2_iHi(1,224)=35 exch2_jLo(1,224)=35 exch2_jHi(1,224)=35 exch2_opposingSend(1,224)=4 exch2_pij(1,1,224)=0 exch2_pij(2,1,224)=-1 exch2_pij(3,1,224)=1 exch2_pij(4,1,224)=0 exch2_oi(1,224)=511 exch2_oj(1,224)=510 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)=35 exch2_opposingSend(3,224)=4 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)=35 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)=34 exch2_tBasex(225)=476 exch2_tBasey(225)=476 exch2_txGlobalo(225)=477 exch2_tyGlobalo(225)=477 exch2_isWedge(225)=0 exch2_isNedge(225)=1 exch2_isEedge(225)=1 exch2_isSedge(225)=0 exch2_myFace(225)=1 exch2_mydNx(225)=510 exch2_mydNy(225)=510 exch2_nNeighbours(225)=4 exch2_neighbourId(1,225)=451 exch2_iLo(1,225)=0 exch2_iHi(1,225)=35 exch2_jLo(1,225)=35 exch2_jHi(1,225)=35 exch2_opposingSend(1,225)=4 exch2_pij(1,1,225)=0 exch2_pij(2,1,225)=-1 exch2_pij(3,1,225)=1 exch2_pij(4,1,225)=0 exch2_oi(1,225)=511 exch2_oj(1,225)=510 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)=436 exch2_iLo(3,225)=35 exch2_iHi(3,225)=35 exch2_jLo(3,225)=0 exch2_jHi(3,225)=35 exch2_opposingSend(3,225)=4 exch2_pij(1,3,225)=1 exch2_pij(2,3,225)=0 exch2_pij(3,3,225)=0 exch2_pij(4,3,225)=1 exch2_oi(3,225)=510 exch2_oj(3,225)=0 exch2_neighbourId(4,225)=224 exch2_iLo(4,225)=0 exch2_iHi(4,225)=0 exch2_jLo(4,225)=0 exch2_jHi(4,225)=35 exch2_opposingSend(4,225)=3 exch2_pij(1,4,225)=1 exch2_pij(2,4,225)=0 exch2_pij(3,4,225)=0 exch2_pij(4,4,225)=1 exch2_oi(4,225)=0 exch2_oj(4,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)=34 exch2_tBasex(226)=0 exch2_tBasey(226)=0 exch2_txGlobalo(226)=511 exch2_tyGlobalo(226)=1 exch2_isWedge(226)=1 exch2_isNedge(226)=0 exch2_isEedge(226)=0 exch2_isSedge(226)=1 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)=35 exch2_jHi(1,226)=35 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)=1350 exch2_iLo(2,226)=0 exch2_iHi(2,226)=35 exch2_jLo(2,226)=0 exch2_jHi(2,226)=0 exch2_opposingSend(2,226)=3 exch2_pij(1,2,226)=0 exch2_pij(2,2,226)=-1 exch2_pij(3,2,226)=1 exch2_pij(4,2,226)=0 exch2_oi(2,226)=511 exch2_oj(2,226)=-510 exch2_neighbourId(3,226)=227 exch2_iLo(3,226)=35 exch2_iHi(3,226)=35 exch2_jLo(3,226)=0 exch2_jHi(3,226)=35 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)=15 exch2_iLo(4,226)=0 exch2_iHi(4,226)=0 exch2_jLo(4,226)=0 exch2_jHi(4,226)=35 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)=34 exch2_tBasex(227)=34 exch2_tBasey(227)=0 exch2_txGlobalo(227)=545 exch2_tyGlobalo(227)=1 exch2_isWedge(227)=0 exch2_isNedge(227)=0 exch2_isEedge(227)=0 exch2_isSedge(227)=1 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)=35 exch2_jHi(1,227)=35 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)=1335 exch2_iLo(2,227)=0 exch2_iHi(2,227)=35 exch2_jLo(2,227)=0 exch2_jHi(2,227)=0 exch2_opposingSend(2,227)=3 exch2_pij(1,2,227)=0 exch2_pij(2,2,227)=-1 exch2_pij(3,2,227)=1 exch2_pij(4,2,227)=0 exch2_oi(2,227)=511 exch2_oj(2,227)=-510 exch2_neighbourId(3,227)=228 exch2_iLo(3,227)=35 exch2_iHi(3,227)=35 exch2_jLo(3,227)=0 exch2_jHi(3,227)=35 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)=35 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)=34 exch2_tBasex(228)=68 exch2_tBasey(228)=0 exch2_txGlobalo(228)=579 exch2_tyGlobalo(228)=1 exch2_isWedge(228)=0 exch2_isNedge(228)=0 exch2_isEedge(228)=0 exch2_isSedge(228)=1 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)=35 exch2_jHi(1,228)=35 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)=1320 exch2_iLo(2,228)=0 exch2_iHi(2,228)=35 exch2_jLo(2,228)=0 exch2_jHi(2,228)=0 exch2_opposingSend(2,228)=3 exch2_pij(1,2,228)=0 exch2_pij(2,2,228)=-1 exch2_pij(3,2,228)=1 exch2_pij(4,2,228)=0 exch2_oi(2,228)=511 exch2_oj(2,228)=-510 exch2_neighbourId(3,228)=229 exch2_iLo(3,228)=35 exch2_iHi(3,228)=35 exch2_jLo(3,228)=0 exch2_jHi(3,228)=35 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)=35 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)=34 exch2_tBasex(229)=102 exch2_tBasey(229)=0 exch2_txGlobalo(229)=613 exch2_tyGlobalo(229)=1 exch2_isWedge(229)=0 exch2_isNedge(229)=0 exch2_isEedge(229)=0 exch2_isSedge(229)=1 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)=35 exch2_jHi(1,229)=35 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)=1305 exch2_iLo(2,229)=0 exch2_iHi(2,229)=35 exch2_jLo(2,229)=0 exch2_jHi(2,229)=0 exch2_opposingSend(2,229)=3 exch2_pij(1,2,229)=0 exch2_pij(2,2,229)=-1 exch2_pij(3,2,229)=1 exch2_pij(4,2,229)=0 exch2_oi(2,229)=511 exch2_oj(2,229)=-510 exch2_neighbourId(3,229)=230 exch2_iLo(3,229)=35 exch2_iHi(3,229)=35 exch2_jLo(3,229)=0 exch2_jHi(3,229)=35 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)=35 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)=34 exch2_tBasex(230)=136 exch2_tBasey(230)=0 exch2_txGlobalo(230)=647 exch2_tyGlobalo(230)=1 exch2_isWedge(230)=0 exch2_isNedge(230)=0 exch2_isEedge(230)=0 exch2_isSedge(230)=1 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)=35 exch2_jHi(1,230)=35 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)=1290 exch2_iLo(2,230)=0 exch2_iHi(2,230)=35 exch2_jLo(2,230)=0 exch2_jHi(2,230)=0 exch2_opposingSend(2,230)=3 exch2_pij(1,2,230)=0 exch2_pij(2,2,230)=-1 exch2_pij(3,2,230)=1 exch2_pij(4,2,230)=0 exch2_oi(2,230)=511 exch2_oj(2,230)=-510 exch2_neighbourId(3,230)=231 exch2_iLo(3,230)=35 exch2_iHi(3,230)=35 exch2_jLo(3,230)=0 exch2_jHi(3,230)=35 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)=35 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)=34 exch2_tBasex(231)=170 exch2_tBasey(231)=0 exch2_txGlobalo(231)=681 exch2_tyGlobalo(231)=1 exch2_isWedge(231)=0 exch2_isNedge(231)=0 exch2_isEedge(231)=0 exch2_isSedge(231)=1 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)=35 exch2_jHi(1,231)=35 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)=1275 exch2_iLo(2,231)=0 exch2_iHi(2,231)=35 exch2_jLo(2,231)=0 exch2_jHi(2,231)=0 exch2_opposingSend(2,231)=3 exch2_pij(1,2,231)=0 exch2_pij(2,2,231)=-1 exch2_pij(3,2,231)=1 exch2_pij(4,2,231)=0 exch2_oi(2,231)=511 exch2_oj(2,231)=-510 exch2_neighbourId(3,231)=232 exch2_iLo(3,231)=35 exch2_iHi(3,231)=35 exch2_jLo(3,231)=0 exch2_jHi(3,231)=35 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)=35 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)=34 exch2_tBasex(232)=204 exch2_tBasey(232)=0 exch2_txGlobalo(232)=715 exch2_tyGlobalo(232)=1 exch2_isWedge(232)=0 exch2_isNedge(232)=0 exch2_isEedge(232)=0 exch2_isSedge(232)=1 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)=35 exch2_jHi(1,232)=35 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)=1260 exch2_iLo(2,232)=0 exch2_iHi(2,232)=35 exch2_jLo(2,232)=0 exch2_jHi(2,232)=0 exch2_opposingSend(2,232)=3 exch2_pij(1,2,232)=0 exch2_pij(2,2,232)=-1 exch2_pij(3,2,232)=1 exch2_pij(4,2,232)=0 exch2_oi(2,232)=511 exch2_oj(2,232)=-510 exch2_neighbourId(3,232)=233 exch2_iLo(3,232)=35 exch2_iHi(3,232)=35 exch2_jLo(3,232)=0 exch2_jHi(3,232)=35 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)=35 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)=34 exch2_tBasex(233)=238 exch2_tBasey(233)=0 exch2_txGlobalo(233)=749 exch2_tyGlobalo(233)=1 exch2_isWedge(233)=0 exch2_isNedge(233)=0 exch2_isEedge(233)=0 exch2_isSedge(233)=1 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)=35 exch2_jHi(1,233)=35 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)=1245 exch2_iLo(2,233)=0 exch2_iHi(2,233)=35 exch2_jLo(2,233)=0 exch2_jHi(2,233)=0 exch2_opposingSend(2,233)=3 exch2_pij(1,2,233)=0 exch2_pij(2,2,233)=-1 exch2_pij(3,2,233)=1 exch2_pij(4,2,233)=0 exch2_oi(2,233)=511 exch2_oj(2,233)=-510 exch2_neighbourId(3,233)=234 exch2_iLo(3,233)=35 exch2_iHi(3,233)=35 exch2_jLo(3,233)=0 exch2_jHi(3,233)=35 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)=35 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)=34 exch2_tBasex(234)=272 exch2_tBasey(234)=0 exch2_txGlobalo(234)=783 exch2_tyGlobalo(234)=1 exch2_isWedge(234)=0 exch2_isNedge(234)=0 exch2_isEedge(234)=0 exch2_isSedge(234)=1 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)=35 exch2_jHi(1,234)=35 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)=1230 exch2_iLo(2,234)=0 exch2_iHi(2,234)=35 exch2_jLo(2,234)=0 exch2_jHi(2,234)=0 exch2_opposingSend(2,234)=3 exch2_pij(1,2,234)=0 exch2_pij(2,2,234)=-1 exch2_pij(3,2,234)=1 exch2_pij(4,2,234)=0 exch2_oi(2,234)=511 exch2_oj(2,234)=-510 exch2_neighbourId(3,234)=235 exch2_iLo(3,234)=35 exch2_iHi(3,234)=35 exch2_jLo(3,234)=0 exch2_jHi(3,234)=35 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)=35 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)=34 exch2_tBasex(235)=306 exch2_tBasey(235)=0 exch2_txGlobalo(235)=817 exch2_tyGlobalo(235)=1 exch2_isWedge(235)=0 exch2_isNedge(235)=0 exch2_isEedge(235)=0 exch2_isSedge(235)=1 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)=35 exch2_jHi(1,235)=35 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)=1215 exch2_iLo(2,235)=0 exch2_iHi(2,235)=35 exch2_jLo(2,235)=0 exch2_jHi(2,235)=0 exch2_opposingSend(2,235)=3 exch2_pij(1,2,235)=0 exch2_pij(2,2,235)=-1 exch2_pij(3,2,235)=1 exch2_pij(4,2,235)=0 exch2_oi(2,235)=511 exch2_oj(2,235)=-510 exch2_neighbourId(3,235)=236 exch2_iLo(3,235)=35 exch2_iHi(3,235)=35 exch2_jLo(3,235)=0 exch2_jHi(3,235)=35 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)=35 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)=34 exch2_tBasex(236)=340 exch2_tBasey(236)=0 exch2_txGlobalo(236)=851 exch2_tyGlobalo(236)=1 exch2_isWedge(236)=0 exch2_isNedge(236)=0 exch2_isEedge(236)=0 exch2_isSedge(236)=1 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)=35 exch2_jHi(1,236)=35 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)=1200 exch2_iLo(2,236)=0 exch2_iHi(2,236)=35 exch2_jLo(2,236)=0 exch2_jHi(2,236)=0 exch2_opposingSend(2,236)=3 exch2_pij(1,2,236)=0 exch2_pij(2,2,236)=-1 exch2_pij(3,2,236)=1 exch2_pij(4,2,236)=0 exch2_oi(2,236)=511 exch2_oj(2,236)=-510 exch2_neighbourId(3,236)=237 exch2_iLo(3,236)=35 exch2_iHi(3,236)=35 exch2_jLo(3,236)=0 exch2_jHi(3,236)=35 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)=35 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)=34 exch2_tBasex(237)=374 exch2_tBasey(237)=0 exch2_txGlobalo(237)=885 exch2_tyGlobalo(237)=1 exch2_isWedge(237)=0 exch2_isNedge(237)=0 exch2_isEedge(237)=0 exch2_isSedge(237)=1 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)=35 exch2_jHi(1,237)=35 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)=1185 exch2_iLo(2,237)=0 exch2_iHi(2,237)=35 exch2_jLo(2,237)=0 exch2_jHi(2,237)=0 exch2_opposingSend(2,237)=3 exch2_pij(1,2,237)=0 exch2_pij(2,2,237)=-1 exch2_pij(3,2,237)=1 exch2_pij(4,2,237)=0 exch2_oi(2,237)=511 exch2_oj(2,237)=-510 exch2_neighbourId(3,237)=238 exch2_iLo(3,237)=35 exch2_iHi(3,237)=35 exch2_jLo(3,237)=0 exch2_jHi(3,237)=35 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)=35 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)=34 exch2_tBasex(238)=408 exch2_tBasey(238)=0 exch2_txGlobalo(238)=919 exch2_tyGlobalo(238)=1 exch2_isWedge(238)=0 exch2_isNedge(238)=0 exch2_isEedge(238)=0 exch2_isSedge(238)=1 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)=35 exch2_jHi(1,238)=35 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)=1170 exch2_iLo(2,238)=0 exch2_iHi(2,238)=35 exch2_jLo(2,238)=0 exch2_jHi(2,238)=0 exch2_opposingSend(2,238)=3 exch2_pij(1,2,238)=0 exch2_pij(2,2,238)=-1 exch2_pij(3,2,238)=1 exch2_pij(4,2,238)=0 exch2_oi(2,238)=511 exch2_oj(2,238)=-510 exch2_neighbourId(3,238)=239 exch2_iLo(3,238)=35 exch2_iHi(3,238)=35 exch2_jLo(3,238)=0 exch2_jHi(3,238)=35 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)=35 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)=34 exch2_tBasex(239)=442 exch2_tBasey(239)=0 exch2_txGlobalo(239)=953 exch2_tyGlobalo(239)=1 exch2_isWedge(239)=0 exch2_isNedge(239)=0 exch2_isEedge(239)=0 exch2_isSedge(239)=1 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)=35 exch2_jHi(1,239)=35 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)=1155 exch2_iLo(2,239)=0 exch2_iHi(2,239)=35 exch2_jLo(2,239)=0 exch2_jHi(2,239)=0 exch2_opposingSend(2,239)=3 exch2_pij(1,2,239)=0 exch2_pij(2,2,239)=-1 exch2_pij(3,2,239)=1 exch2_pij(4,2,239)=0 exch2_oi(2,239)=511 exch2_oj(2,239)=-510 exch2_neighbourId(3,239)=240 exch2_iLo(3,239)=35 exch2_iHi(3,239)=35 exch2_jLo(3,239)=0 exch2_jHi(3,239)=35 exch2_opposingSend(3,239)=4 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)=35 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)=34 exch2_tBasex(240)=476 exch2_tBasey(240)=0 exch2_txGlobalo(240)=987 exch2_tyGlobalo(240)=1 exch2_isWedge(240)=0 exch2_isNedge(240)=0 exch2_isEedge(240)=1 exch2_isSedge(240)=1 exch2_myFace(240)=2 exch2_mydNx(240)=510 exch2_mydNy(240)=510 exch2_nNeighbours(240)=4 exch2_neighbourId(1,240)=255 exch2_iLo(1,240)=0 exch2_iHi(1,240)=35 exch2_jLo(1,240)=35 exch2_jHi(1,240)=35 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)=1140 exch2_iLo(2,240)=0 exch2_iHi(2,240)=35 exch2_jLo(2,240)=0 exch2_jHi(2,240)=0 exch2_opposingSend(2,240)=3 exch2_pij(1,2,240)=0 exch2_pij(2,2,240)=-1 exch2_pij(3,2,240)=1 exch2_pij(4,2,240)=0 exch2_oi(2,240)=511 exch2_oj(2,240)=-510 exch2_neighbourId(3,240)=690 exch2_iLo(3,240)=35 exch2_iHi(3,240)=35 exch2_jLo(3,240)=0 exch2_jHi(3,240)=35 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)=239 exch2_iLo(4,240)=0 exch2_iHi(4,240)=0 exch2_jLo(4,240)=0 exch2_jHi(4,240)=35 exch2_opposingSend(4,240)=3 exch2_pij(1,4,240)=1 exch2_pij(2,4,240)=0 exch2_pij(3,4,240)=0 exch2_pij(4,4,240)=1 exch2_oi(4,240)=0 exch2_oj(4,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)=34 exch2_tBasex(241)=0 exch2_tBasey(241)=34 exch2_txGlobalo(241)=511 exch2_tyGlobalo(241)=35 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)=35 exch2_jHi(1,241)=35 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)=35 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)=30 exch2_iLo(4,241)=0 exch2_iHi(4,241)=0 exch2_jLo(4,241)=0 exch2_jHi(4,241)=35 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)=34 exch2_tBasex(242)=34 exch2_tBasey(242)=34 exch2_txGlobalo(242)=545 exch2_tyGlobalo(242)=35 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)=35 exch2_jHi(1,242)=35 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)=35 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)=35 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)=34 exch2_tBasex(243)=68 exch2_tBasey(243)=34 exch2_txGlobalo(243)=579 exch2_tyGlobalo(243)=35 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)=35 exch2_jHi(1,243)=35 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)=35 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)=35 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)=34 exch2_tBasex(244)=102 exch2_tBasey(244)=34 exch2_txGlobalo(244)=613 exch2_tyGlobalo(244)=35 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)=35 exch2_jHi(1,244)=35 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)=35 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)=35 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)=34 exch2_tBasex(245)=136 exch2_tBasey(245)=34 exch2_txGlobalo(245)=647 exch2_tyGlobalo(245)=35 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)=35 exch2_jHi(1,245)=35 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)=35 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)=35 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)=34 exch2_tBasex(246)=170 exch2_tBasey(246)=34 exch2_txGlobalo(246)=681 exch2_tyGlobalo(246)=35 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)=35 exch2_jHi(1,246)=35 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)=35 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)=35 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)=34 exch2_tBasex(247)=204 exch2_tBasey(247)=34 exch2_txGlobalo(247)=715 exch2_tyGlobalo(247)=35 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)=35 exch2_jHi(1,247)=35 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)=35 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)=35 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)=34 exch2_tBasex(248)=238 exch2_tBasey(248)=34 exch2_txGlobalo(248)=749 exch2_tyGlobalo(248)=35 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)=35 exch2_jHi(1,248)=35 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)=35 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)=35 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)=34 exch2_tBasex(249)=272 exch2_tBasey(249)=34 exch2_txGlobalo(249)=783 exch2_tyGlobalo(249)=35 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)=35 exch2_jHi(1,249)=35 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)=35 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)=35 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)=34 exch2_tBasex(250)=306 exch2_tBasey(250)=34 exch2_txGlobalo(250)=817 exch2_tyGlobalo(250)=35 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)=35 exch2_jHi(1,250)=35 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)=35 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)=35 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)=34 exch2_tBasex(251)=340 exch2_tBasey(251)=34 exch2_txGlobalo(251)=851 exch2_tyGlobalo(251)=35 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)=35 exch2_jHi(1,251)=35 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)=35 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)=35 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)=34 exch2_tBasex(252)=374 exch2_tBasey(252)=34 exch2_txGlobalo(252)=885 exch2_tyGlobalo(252)=35 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)=35 exch2_jHi(1,252)=35 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)=35 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)=35 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)=34 exch2_tBasex(253)=408 exch2_tBasey(253)=34 exch2_txGlobalo(253)=919 exch2_tyGlobalo(253)=35 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)=35 exch2_jHi(1,253)=35 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)=35 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)=35 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)=34 exch2_tBasex(254)=442 exch2_tBasey(254)=34 exch2_txGlobalo(254)=953 exch2_tyGlobalo(254)=35 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)=35 exch2_jHi(1,254)=35 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)=35 exch2_opposingSend(3,254)=4 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)=35 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)=34 exch2_tBasex(255)=476 exch2_tBasey(255)=34 exch2_txGlobalo(255)=987 exch2_tyGlobalo(255)=35 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)=4 exch2_neighbourId(1,255)=270 exch2_iLo(1,255)=0 exch2_iHi(1,255)=35 exch2_jLo(1,255)=35 exch2_jHi(1,255)=35 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)=689 exch2_iLo(3,255)=35 exch2_iHi(3,255)=35 exch2_jLo(3,255)=0 exch2_jHi(3,255)=35 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)=254 exch2_iLo(4,255)=0 exch2_iHi(4,255)=0 exch2_jLo(4,255)=0 exch2_jHi(4,255)=35 exch2_opposingSend(4,255)=3 exch2_pij(1,4,255)=1 exch2_pij(2,4,255)=0 exch2_pij(3,4,255)=0 exch2_pij(4,4,255)=1 exch2_oi(4,255)=0 exch2_oj(4,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)=34 exch2_tBasex(256)=0 exch2_tBasey(256)=68 exch2_txGlobalo(256)=511 exch2_tyGlobalo(256)=69 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)=35 exch2_jHi(1,256)=35 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)=35 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)=45 exch2_iLo(4,256)=0 exch2_iHi(4,256)=0 exch2_jLo(4,256)=0 exch2_jHi(4,256)=35 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)=34 exch2_tBasex(257)=34 exch2_tBasey(257)=68 exch2_txGlobalo(257)=545 exch2_tyGlobalo(257)=69 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)=35 exch2_jHi(1,257)=35 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)=35 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)=35 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)=34 exch2_tBasex(258)=68 exch2_tBasey(258)=68 exch2_txGlobalo(258)=579 exch2_tyGlobalo(258)=69 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)=35 exch2_jHi(1,258)=35 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)=35 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)=35 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)=34 exch2_tBasex(259)=102 exch2_tBasey(259)=68 exch2_txGlobalo(259)=613 exch2_tyGlobalo(259)=69 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)=35 exch2_jHi(1,259)=35 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)=35 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)=35 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)=34 exch2_tBasex(260)=136 exch2_tBasey(260)=68 exch2_txGlobalo(260)=647 exch2_tyGlobalo(260)=69 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)=35 exch2_jHi(1,260)=35 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)=35 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)=35 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)=34 exch2_tBasex(261)=170 exch2_tBasey(261)=68 exch2_txGlobalo(261)=681 exch2_tyGlobalo(261)=69 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)=35 exch2_jHi(1,261)=35 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)=35 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)=35 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)=34 exch2_tBasex(262)=204 exch2_tBasey(262)=68 exch2_txGlobalo(262)=715 exch2_tyGlobalo(262)=69 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)=35 exch2_jHi(1,262)=35 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)=35 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)=35 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)=34 exch2_tBasex(263)=238 exch2_tBasey(263)=68 exch2_txGlobalo(263)=749 exch2_tyGlobalo(263)=69 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)=35 exch2_jHi(1,263)=35 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)=35 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)=35 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)=34 exch2_tBasex(264)=272 exch2_tBasey(264)=68 exch2_txGlobalo(264)=783 exch2_tyGlobalo(264)=69 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)=35 exch2_jHi(1,264)=35 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)=35 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)=35 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)=34 exch2_tBasex(265)=306 exch2_tBasey(265)=68 exch2_txGlobalo(265)=817 exch2_tyGlobalo(265)=69 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)=35 exch2_jHi(1,265)=35 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)=35 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)=35 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)=34 exch2_tBasex(266)=340 exch2_tBasey(266)=68 exch2_txGlobalo(266)=851 exch2_tyGlobalo(266)=69 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)=35 exch2_jHi(1,266)=35 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)=35 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)=35 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)=34 exch2_tBasex(267)=374 exch2_tBasey(267)=68 exch2_txGlobalo(267)=885 exch2_tyGlobalo(267)=69 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)=35 exch2_jHi(1,267)=35 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)=35 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)=35 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)=34 exch2_tBasex(268)=408 exch2_tBasey(268)=68 exch2_txGlobalo(268)=919 exch2_tyGlobalo(268)=69 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)=35 exch2_jHi(1,268)=35 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)=35 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)=35 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)=34 exch2_tBasex(269)=442 exch2_tBasey(269)=68 exch2_txGlobalo(269)=953 exch2_tyGlobalo(269)=69 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)=35 exch2_jHi(1,269)=35 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)=35 exch2_opposingSend(3,269)=4 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)=35 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)=34 exch2_tBasex(270)=476 exch2_tBasey(270)=68 exch2_txGlobalo(270)=987 exch2_tyGlobalo(270)=69 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)=4 exch2_neighbourId(1,270)=285 exch2_iLo(1,270)=0 exch2_iHi(1,270)=35 exch2_jLo(1,270)=35 exch2_jHi(1,270)=35 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)=688 exch2_iLo(3,270)=35 exch2_iHi(3,270)=35 exch2_jLo(3,270)=0 exch2_jHi(3,270)=35 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)=269 exch2_iLo(4,270)=0 exch2_iHi(4,270)=0 exch2_jLo(4,270)=0 exch2_jHi(4,270)=35 exch2_opposingSend(4,270)=3 exch2_pij(1,4,270)=1 exch2_pij(2,4,270)=0 exch2_pij(3,4,270)=0 exch2_pij(4,4,270)=1 exch2_oi(4,270)=0 exch2_oj(4,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)=34 exch2_tBasex(271)=0 exch2_tBasey(271)=102 exch2_txGlobalo(271)=511 exch2_tyGlobalo(271)=103 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)=35 exch2_jHi(1,271)=35 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)=35 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)=60 exch2_iLo(4,271)=0 exch2_iHi(4,271)=0 exch2_jLo(4,271)=0 exch2_jHi(4,271)=35 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)=34 exch2_tBasex(272)=34 exch2_tBasey(272)=102 exch2_txGlobalo(272)=545 exch2_tyGlobalo(272)=103 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)=35 exch2_jHi(1,272)=35 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)=35 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)=35 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)=34 exch2_tBasex(273)=68 exch2_tBasey(273)=102 exch2_txGlobalo(273)=579 exch2_tyGlobalo(273)=103 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)=35 exch2_jHi(1,273)=35 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)=35 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)=35 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)=34 exch2_tBasex(274)=102 exch2_tBasey(274)=102 exch2_txGlobalo(274)=613 exch2_tyGlobalo(274)=103 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)=35 exch2_jHi(1,274)=35 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)=35 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)=35 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)=34 exch2_tBasex(275)=136 exch2_tBasey(275)=102 exch2_txGlobalo(275)=647 exch2_tyGlobalo(275)=103 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)=35 exch2_jHi(1,275)=35 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)=35 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)=35 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)=34 exch2_tBasex(276)=170 exch2_tBasey(276)=102 exch2_txGlobalo(276)=681 exch2_tyGlobalo(276)=103 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)=35 exch2_jHi(1,276)=35 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)=35 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)=35 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)=34 exch2_tBasex(277)=204 exch2_tBasey(277)=102 exch2_txGlobalo(277)=715 exch2_tyGlobalo(277)=103 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)=35 exch2_jHi(1,277)=35 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)=35 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)=35 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)=34 exch2_tBasex(278)=238 exch2_tBasey(278)=102 exch2_txGlobalo(278)=749 exch2_tyGlobalo(278)=103 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)=35 exch2_jHi(1,278)=35 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)=35 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)=35 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)=34 exch2_tBasex(279)=272 exch2_tBasey(279)=102 exch2_txGlobalo(279)=783 exch2_tyGlobalo(279)=103 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)=35 exch2_jHi(1,279)=35 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)=35 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)=35 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)=34 exch2_tBasex(280)=306 exch2_tBasey(280)=102 exch2_txGlobalo(280)=817 exch2_tyGlobalo(280)=103 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)=35 exch2_jHi(1,280)=35 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)=35 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)=35 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)=34 exch2_tBasex(281)=340 exch2_tBasey(281)=102 exch2_txGlobalo(281)=851 exch2_tyGlobalo(281)=103 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)=35 exch2_jHi(1,281)=35 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)=35 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)=35 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)=34 exch2_tBasex(282)=374 exch2_tBasey(282)=102 exch2_txGlobalo(282)=885 exch2_tyGlobalo(282)=103 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)=35 exch2_jHi(1,282)=35 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)=35 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)=35 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)=34 exch2_tBasex(283)=408 exch2_tBasey(283)=102 exch2_txGlobalo(283)=919 exch2_tyGlobalo(283)=103 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)=35 exch2_jHi(1,283)=35 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)=35 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)=35 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)=34 exch2_tBasex(284)=442 exch2_tBasey(284)=102 exch2_txGlobalo(284)=953 exch2_tyGlobalo(284)=103 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)=35 exch2_jHi(1,284)=35 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)=35 exch2_opposingSend(3,284)=4 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)=35 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)=34 exch2_tBasex(285)=476 exch2_tBasey(285)=102 exch2_txGlobalo(285)=987 exch2_tyGlobalo(285)=103 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)=4 exch2_neighbourId(1,285)=300 exch2_iLo(1,285)=0 exch2_iHi(1,285)=35 exch2_jLo(1,285)=35 exch2_jHi(1,285)=35 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)=687 exch2_iLo(3,285)=35 exch2_iHi(3,285)=35 exch2_jLo(3,285)=0 exch2_jHi(3,285)=35 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)=284 exch2_iLo(4,285)=0 exch2_iHi(4,285)=0 exch2_jLo(4,285)=0 exch2_jHi(4,285)=35 exch2_opposingSend(4,285)=3 exch2_pij(1,4,285)=1 exch2_pij(2,4,285)=0 exch2_pij(3,4,285)=0 exch2_pij(4,4,285)=1 exch2_oi(4,285)=0 exch2_oj(4,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)=34 exch2_tBasex(286)=0 exch2_tBasey(286)=136 exch2_txGlobalo(286)=511 exch2_tyGlobalo(286)=137 exch2_isWedge(286)=1 exch2_isNedge(286)=0 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)=35 exch2_jHi(1,286)=35 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)=0 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)=35 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)=75 exch2_iLo(4,286)=0 exch2_iHi(4,286)=0 exch2_jLo(4,286)=0 exch2_jHi(4,286)=35 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)=34 exch2_tBasex(287)=34 exch2_tBasey(287)=136 exch2_txGlobalo(287)=545 exch2_tyGlobalo(287)=137 exch2_isWedge(287)=0 exch2_isNedge(287)=0 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)=35 exch2_jHi(1,287)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(288)=68 exch2_tBasey(288)=136 exch2_txGlobalo(288)=579 exch2_tyGlobalo(288)=137 exch2_isWedge(288)=0 exch2_isNedge(288)=0 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)=35 exch2_jHi(1,288)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(289)=102 exch2_tBasey(289)=136 exch2_txGlobalo(289)=613 exch2_tyGlobalo(289)=137 exch2_isWedge(289)=0 exch2_isNedge(289)=0 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)=35 exch2_jHi(1,289)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(290)=136 exch2_tBasey(290)=136 exch2_txGlobalo(290)=647 exch2_tyGlobalo(290)=137 exch2_isWedge(290)=0 exch2_isNedge(290)=0 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)=35 exch2_jHi(1,290)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(291)=170 exch2_tBasey(291)=136 exch2_txGlobalo(291)=681 exch2_tyGlobalo(291)=137 exch2_isWedge(291)=0 exch2_isNedge(291)=0 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)=35 exch2_jHi(1,291)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(292)=204 exch2_tBasey(292)=136 exch2_txGlobalo(292)=715 exch2_tyGlobalo(292)=137 exch2_isWedge(292)=0 exch2_isNedge(292)=0 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)=35 exch2_jHi(1,292)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(293)=238 exch2_tBasey(293)=136 exch2_txGlobalo(293)=749 exch2_tyGlobalo(293)=137 exch2_isWedge(293)=0 exch2_isNedge(293)=0 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)=35 exch2_jHi(1,293)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(294)=272 exch2_tBasey(294)=136 exch2_txGlobalo(294)=783 exch2_tyGlobalo(294)=137 exch2_isWedge(294)=0 exch2_isNedge(294)=0 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)=35 exch2_jHi(1,294)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(295)=306 exch2_tBasey(295)=136 exch2_txGlobalo(295)=817 exch2_tyGlobalo(295)=137 exch2_isWedge(295)=0 exch2_isNedge(295)=0 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)=35 exch2_jHi(1,295)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(296)=340 exch2_tBasey(296)=136 exch2_txGlobalo(296)=851 exch2_tyGlobalo(296)=137 exch2_isWedge(296)=0 exch2_isNedge(296)=0 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)=35 exch2_jHi(1,296)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(297)=374 exch2_tBasey(297)=136 exch2_txGlobalo(297)=885 exch2_tyGlobalo(297)=137 exch2_isWedge(297)=0 exch2_isNedge(297)=0 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)=35 exch2_jHi(1,297)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(298)=408 exch2_tBasey(298)=136 exch2_txGlobalo(298)=919 exch2_tyGlobalo(298)=137 exch2_isWedge(298)=0 exch2_isNedge(298)=0 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)=35 exch2_jHi(1,298)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(299)=442 exch2_tBasey(299)=136 exch2_txGlobalo(299)=953 exch2_tyGlobalo(299)=137 exch2_isWedge(299)=0 exch2_isNedge(299)=0 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)=35 exch2_jHi(1,299)=35 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)=0 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)=35 exch2_opposingSend(3,299)=4 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)=35 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)=34 exch2_tBasex(300)=476 exch2_tBasey(300)=136 exch2_txGlobalo(300)=987 exch2_tyGlobalo(300)=137 exch2_isWedge(300)=0 exch2_isNedge(300)=0 exch2_isEedge(300)=1 exch2_isSedge(300)=0 exch2_myFace(300)=2 exch2_mydNx(300)=510 exch2_mydNy(300)=510 exch2_nNeighbours(300)=4 exch2_neighbourId(1,300)=315 exch2_iLo(1,300)=0 exch2_iHi(1,300)=35 exch2_jLo(1,300)=35 exch2_jHi(1,300)=35 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)=0 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)=686 exch2_iLo(3,300)=35 exch2_iHi(3,300)=35 exch2_jLo(3,300)=0 exch2_jHi(3,300)=35 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)=299 exch2_iLo(4,300)=0 exch2_iHi(4,300)=0 exch2_jLo(4,300)=0 exch2_jHi(4,300)=35 exch2_opposingSend(4,300)=3 exch2_pij(1,4,300)=1 exch2_pij(2,4,300)=0 exch2_pij(3,4,300)=0 exch2_pij(4,4,300)=1 exch2_oi(4,300)=0 exch2_oj(4,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)=34 exch2_tBasex(301)=0 exch2_tBasey(301)=170 exch2_txGlobalo(301)=511 exch2_tyGlobalo(301)=171 exch2_isWedge(301)=1 exch2_isNedge(301)=0 exch2_isEedge(301)=0 exch2_isSedge(301)=0 exch2_myFace(301)=2 exch2_mydNx(301)=510 exch2_mydNy(301)=510 exch2_nNeighbours(301)=4 exch2_neighbourId(1,301)=316 exch2_iLo(1,301)=0 exch2_iHi(1,301)=35 exch2_jLo(1,301)=35 exch2_jHi(1,301)=35 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)=0 exch2_neighbourId(3,301)=302 exch2_iLo(3,301)=35 exch2_iHi(3,301)=35 exch2_jLo(3,301)=0 exch2_jHi(3,301)=35 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)=90 exch2_iLo(4,301)=0 exch2_iHi(4,301)=0 exch2_jLo(4,301)=0 exch2_jHi(4,301)=35 exch2_opposingSend(4,301)=3 exch2_pij(1,4,301)=1 exch2_pij(2,4,301)=0 exch2_pij(3,4,301)=0 exch2_pij(4,4,301)=1 exch2_oi(4,301)=-510 exch2_oj(4,301)=0 RETURN END SUBROUTINE W2_E2SETUP_302 C Topology for tile 302 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(302)=34 exch2_tNy(302)=34 exch2_tBasex(302)=34 exch2_tBasey(302)=170 exch2_txGlobalo(302)=545 exch2_tyGlobalo(302)=171 exch2_isWedge(302)=0 exch2_isNedge(302)=0 exch2_isEedge(302)=0 exch2_isSedge(302)=0 exch2_myFace(302)=2 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)=35 exch2_jHi(1,302)=35 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)=0 exch2_neighbourId(3,302)=303 exch2_iLo(3,302)=35 exch2_iHi(3,302)=35 exch2_jLo(3,302)=0 exch2_jHi(3,302)=35 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)=35 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)=34 exch2_tBasex(303)=68 exch2_tBasey(303)=170 exch2_txGlobalo(303)=579 exch2_tyGlobalo(303)=171 exch2_isWedge(303)=0 exch2_isNedge(303)=0 exch2_isEedge(303)=0 exch2_isSedge(303)=0 exch2_myFace(303)=2 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)=35 exch2_jHi(1,303)=35 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)=0 exch2_neighbourId(3,303)=304 exch2_iLo(3,303)=35 exch2_iHi(3,303)=35 exch2_jLo(3,303)=0 exch2_jHi(3,303)=35 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)=35 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)=34 exch2_tBasex(304)=102 exch2_tBasey(304)=170 exch2_txGlobalo(304)=613 exch2_tyGlobalo(304)=171 exch2_isWedge(304)=0 exch2_isNedge(304)=0 exch2_isEedge(304)=0 exch2_isSedge(304)=0 exch2_myFace(304)=2 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)=35 exch2_jHi(1,304)=35 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)=0 exch2_neighbourId(3,304)=305 exch2_iLo(3,304)=35 exch2_iHi(3,304)=35 exch2_jLo(3,304)=0 exch2_jHi(3,304)=35 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)=35 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)=34 exch2_tBasex(305)=136 exch2_tBasey(305)=170 exch2_txGlobalo(305)=647 exch2_tyGlobalo(305)=171 exch2_isWedge(305)=0 exch2_isNedge(305)=0 exch2_isEedge(305)=0 exch2_isSedge(305)=0 exch2_myFace(305)=2 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)=35 exch2_jHi(1,305)=35 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)=0 exch2_neighbourId(3,305)=306 exch2_iLo(3,305)=35 exch2_iHi(3,305)=35 exch2_jLo(3,305)=0 exch2_jHi(3,305)=35 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)=35 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)=34 exch2_tBasex(306)=170 exch2_tBasey(306)=170 exch2_txGlobalo(306)=681 exch2_tyGlobalo(306)=171 exch2_isWedge(306)=0 exch2_isNedge(306)=0 exch2_isEedge(306)=0 exch2_isSedge(306)=0 exch2_myFace(306)=2 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)=35 exch2_jHi(1,306)=35 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)=0 exch2_neighbourId(3,306)=307 exch2_iLo(3,306)=35 exch2_iHi(3,306)=35 exch2_jLo(3,306)=0 exch2_jHi(3,306)=35 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)=35 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)=34 exch2_tBasex(307)=204 exch2_tBasey(307)=170 exch2_txGlobalo(307)=715 exch2_tyGlobalo(307)=171 exch2_isWedge(307)=0 exch2_isNedge(307)=0 exch2_isEedge(307)=0 exch2_isSedge(307)=0 exch2_myFace(307)=2 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)=35 exch2_jHi(1,307)=35 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)=0 exch2_neighbourId(3,307)=308 exch2_iLo(3,307)=35 exch2_iHi(3,307)=35 exch2_jLo(3,307)=0 exch2_jHi(3,307)=35 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)=35 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)=34 exch2_tBasex(308)=238 exch2_tBasey(308)=170 exch2_txGlobalo(308)=749 exch2_tyGlobalo(308)=171 exch2_isWedge(308)=0 exch2_isNedge(308)=0 exch2_isEedge(308)=0 exch2_isSedge(308)=0 exch2_myFace(308)=2 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)=35 exch2_jHi(1,308)=35 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)=0 exch2_neighbourId(3,308)=309 exch2_iLo(3,308)=35 exch2_iHi(3,308)=35 exch2_jLo(3,308)=0 exch2_jHi(3,308)=35 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)=35 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)=34 exch2_tBasex(309)=272 exch2_tBasey(309)=170 exch2_txGlobalo(309)=783 exch2_tyGlobalo(309)=171 exch2_isWedge(309)=0 exch2_isNedge(309)=0 exch2_isEedge(309)=0 exch2_isSedge(309)=0 exch2_myFace(309)=2 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)=35 exch2_jHi(1,309)=35 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)=0 exch2_neighbourId(3,309)=310 exch2_iLo(3,309)=35 exch2_iHi(3,309)=35 exch2_jLo(3,309)=0 exch2_jHi(3,309)=35 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)=35 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)=34 exch2_tBasex(310)=306 exch2_tBasey(310)=170 exch2_txGlobalo(310)=817 exch2_tyGlobalo(310)=171 exch2_isWedge(310)=0 exch2_isNedge(310)=0 exch2_isEedge(310)=0 exch2_isSedge(310)=0 exch2_myFace(310)=2 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)=35 exch2_jHi(1,310)=35 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)=0 exch2_neighbourId(3,310)=311 exch2_iLo(3,310)=35 exch2_iHi(3,310)=35 exch2_jLo(3,310)=0 exch2_jHi(3,310)=35 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)=35 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)=34 exch2_tBasex(311)=340 exch2_tBasey(311)=170 exch2_txGlobalo(311)=851 exch2_tyGlobalo(311)=171 exch2_isWedge(311)=0 exch2_isNedge(311)=0 exch2_isEedge(311)=0 exch2_isSedge(311)=0 exch2_myFace(311)=2 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)=35 exch2_jHi(1,311)=35 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)=0 exch2_neighbourId(3,311)=312 exch2_iLo(3,311)=35 exch2_iHi(3,311)=35 exch2_jLo(3,311)=0 exch2_jHi(3,311)=35 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)=35 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)=34 exch2_tBasex(312)=374 exch2_tBasey(312)=170 exch2_txGlobalo(312)=885 exch2_tyGlobalo(312)=171 exch2_isWedge(312)=0 exch2_isNedge(312)=0 exch2_isEedge(312)=0 exch2_isSedge(312)=0 exch2_myFace(312)=2 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)=35 exch2_jHi(1,312)=35 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)=0 exch2_neighbourId(3,312)=313 exch2_iLo(3,312)=35 exch2_iHi(3,312)=35 exch2_jLo(3,312)=0 exch2_jHi(3,312)=35 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)=35 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)=34 exch2_tBasex(313)=408 exch2_tBasey(313)=170 exch2_txGlobalo(313)=919 exch2_tyGlobalo(313)=171 exch2_isWedge(313)=0 exch2_isNedge(313)=0 exch2_isEedge(313)=0 exch2_isSedge(313)=0 exch2_myFace(313)=2 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)=35 exch2_jHi(1,313)=35 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)=0 exch2_neighbourId(3,313)=314 exch2_iLo(3,313)=35 exch2_iHi(3,313)=35 exch2_jLo(3,313)=0 exch2_jHi(3,313)=35 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)=35 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)=34 exch2_tBasex(314)=442 exch2_tBasey(314)=170 exch2_txGlobalo(314)=953 exch2_tyGlobalo(314)=171 exch2_isWedge(314)=0 exch2_isNedge(314)=0 exch2_isEedge(314)=0 exch2_isSedge(314)=0 exch2_myFace(314)=2 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)=35 exch2_jHi(1,314)=35 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)=0 exch2_neighbourId(3,314)=315 exch2_iLo(3,314)=35 exch2_iHi(3,314)=35 exch2_jLo(3,314)=0 exch2_jHi(3,314)=35 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)=35 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)=34 exch2_tBasex(315)=476 exch2_tBasey(315)=170 exch2_txGlobalo(315)=987 exch2_tyGlobalo(315)=171 exch2_isWedge(315)=0 exch2_isNedge(315)=0 exch2_isEedge(315)=1 exch2_isSedge(315)=0 exch2_myFace(315)=2 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)=35 exch2_jHi(1,315)=35 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)=0 exch2_neighbourId(3,315)=685 exch2_iLo(3,315)=35 exch2_iHi(3,315)=35 exch2_jLo(3,315)=0 exch2_jHi(3,315)=35 exch2_opposingSend(3,315)=2 exch2_pij(1,3,315)=0 exch2_pij(2,3,315)=1 exch2_pij(3,3,315)=-1 exch2_pij(4,3,315)=0 exch2_oi(3,315)=510 exch2_oj(3,315)=511 exch2_neighbourId(4,315)=314 exch2_iLo(4,315)=0 exch2_iHi(4,315)=0 exch2_jLo(4,315)=0 exch2_jHi(4,315)=35 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)=34 exch2_tBasex(316)=0 exch2_tBasey(316)=204 exch2_txGlobalo(316)=511 exch2_tyGlobalo(316)=205 exch2_isWedge(316)=1 exch2_isNedge(316)=0 exch2_isEedge(316)=0 exch2_isSedge(316)=0 exch2_myFace(316)=2 exch2_mydNx(316)=510 exch2_mydNy(316)=510 exch2_nNeighbours(316)=4 exch2_neighbourId(1,316)=331 exch2_iLo(1,316)=0 exch2_iHi(1,316)=35 exch2_jLo(1,316)=35 exch2_jHi(1,316)=35 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)=35 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)=105 exch2_iLo(4,316)=0 exch2_iHi(4,316)=0 exch2_jLo(4,316)=0 exch2_jHi(4,316)=35 exch2_opposingSend(4,316)=3 exch2_pij(1,4,316)=1 exch2_pij(2,4,316)=0 exch2_pij(3,4,316)=0 exch2_pij(4,4,316)=1 exch2_oi(4,316)=-510 exch2_oj(4,316)=0 RETURN END SUBROUTINE W2_E2SETUP_317 C Topology for tile 317 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(317)=34 exch2_tNy(317)=34 exch2_tBasex(317)=34 exch2_tBasey(317)=204 exch2_txGlobalo(317)=545 exch2_tyGlobalo(317)=205 exch2_isWedge(317)=0 exch2_isNedge(317)=0 exch2_isEedge(317)=0 exch2_isSedge(317)=0 exch2_myFace(317)=2 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)=35 exch2_jHi(1,317)=35 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)=35 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)=35 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)=34 exch2_tBasex(318)=68 exch2_tBasey(318)=204 exch2_txGlobalo(318)=579 exch2_tyGlobalo(318)=205 exch2_isWedge(318)=0 exch2_isNedge(318)=0 exch2_isEedge(318)=0 exch2_isSedge(318)=0 exch2_myFace(318)=2 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)=35 exch2_jHi(1,318)=35 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)=35 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)=35 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)=34 exch2_tBasex(319)=102 exch2_tBasey(319)=204 exch2_txGlobalo(319)=613 exch2_tyGlobalo(319)=205 exch2_isWedge(319)=0 exch2_isNedge(319)=0 exch2_isEedge(319)=0 exch2_isSedge(319)=0 exch2_myFace(319)=2 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)=35 exch2_jHi(1,319)=35 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)=35 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)=35 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)=34 exch2_tBasex(320)=136 exch2_tBasey(320)=204 exch2_txGlobalo(320)=647 exch2_tyGlobalo(320)=205 exch2_isWedge(320)=0 exch2_isNedge(320)=0 exch2_isEedge(320)=0 exch2_isSedge(320)=0 exch2_myFace(320)=2 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)=35 exch2_jHi(1,320)=35 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)=35 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)=35 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)=34 exch2_tBasex(321)=170 exch2_tBasey(321)=204 exch2_txGlobalo(321)=681 exch2_tyGlobalo(321)=205 exch2_isWedge(321)=0 exch2_isNedge(321)=0 exch2_isEedge(321)=0 exch2_isSedge(321)=0 exch2_myFace(321)=2 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)=35 exch2_jHi(1,321)=35 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)=35 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)=35 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)=34 exch2_tBasex(322)=204 exch2_tBasey(322)=204 exch2_txGlobalo(322)=715 exch2_tyGlobalo(322)=205 exch2_isWedge(322)=0 exch2_isNedge(322)=0 exch2_isEedge(322)=0 exch2_isSedge(322)=0 exch2_myFace(322)=2 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)=35 exch2_jHi(1,322)=35 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)=35 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)=35 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)=34 exch2_tBasex(323)=238 exch2_tBasey(323)=204 exch2_txGlobalo(323)=749 exch2_tyGlobalo(323)=205 exch2_isWedge(323)=0 exch2_isNedge(323)=0 exch2_isEedge(323)=0 exch2_isSedge(323)=0 exch2_myFace(323)=2 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)=35 exch2_jHi(1,323)=35 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)=35 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)=35 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)=34 exch2_tBasex(324)=272 exch2_tBasey(324)=204 exch2_txGlobalo(324)=783 exch2_tyGlobalo(324)=205 exch2_isWedge(324)=0 exch2_isNedge(324)=0 exch2_isEedge(324)=0 exch2_isSedge(324)=0 exch2_myFace(324)=2 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)=35 exch2_jHi(1,324)=35 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)=35 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)=35 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)=34 exch2_tBasex(325)=306 exch2_tBasey(325)=204 exch2_txGlobalo(325)=817 exch2_tyGlobalo(325)=205 exch2_isWedge(325)=0 exch2_isNedge(325)=0 exch2_isEedge(325)=0 exch2_isSedge(325)=0 exch2_myFace(325)=2 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)=35 exch2_jHi(1,325)=35 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)=35 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)=35 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)=34 exch2_tBasex(326)=340 exch2_tBasey(326)=204 exch2_txGlobalo(326)=851 exch2_tyGlobalo(326)=205 exch2_isWedge(326)=0 exch2_isNedge(326)=0 exch2_isEedge(326)=0 exch2_isSedge(326)=0 exch2_myFace(326)=2 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)=35 exch2_jHi(1,326)=35 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)=35 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)=35 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)=34 exch2_tBasex(327)=374 exch2_tBasey(327)=204 exch2_txGlobalo(327)=885 exch2_tyGlobalo(327)=205 exch2_isWedge(327)=0 exch2_isNedge(327)=0 exch2_isEedge(327)=0 exch2_isSedge(327)=0 exch2_myFace(327)=2 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)=35 exch2_jHi(1,327)=35 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)=35 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)=35 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)=34 exch2_tBasex(328)=408 exch2_tBasey(328)=204 exch2_txGlobalo(328)=919 exch2_tyGlobalo(328)=205 exch2_isWedge(328)=0 exch2_isNedge(328)=0 exch2_isEedge(328)=0 exch2_isSedge(328)=0 exch2_myFace(328)=2 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)=35 exch2_jHi(1,328)=35 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)=35 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)=35 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)=34 exch2_tBasex(329)=442 exch2_tBasey(329)=204 exch2_txGlobalo(329)=953 exch2_tyGlobalo(329)=205 exch2_isWedge(329)=0 exch2_isNedge(329)=0 exch2_isEedge(329)=0 exch2_isSedge(329)=0 exch2_myFace(329)=2 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)=35 exch2_jHi(1,329)=35 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)=35 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)=35 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)=34 exch2_tBasex(330)=476 exch2_tBasey(330)=204 exch2_txGlobalo(330)=987 exch2_tyGlobalo(330)=205 exch2_isWedge(330)=0 exch2_isNedge(330)=0 exch2_isEedge(330)=1 exch2_isSedge(330)=0 exch2_myFace(330)=2 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)=35 exch2_jHi(1,330)=35 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)=684 exch2_iLo(3,330)=35 exch2_iHi(3,330)=35 exch2_jLo(3,330)=0 exch2_jHi(3,330)=35 exch2_opposingSend(3,330)=2 exch2_pij(1,3,330)=0 exch2_pij(2,3,330)=1 exch2_pij(3,3,330)=-1 exch2_pij(4,3,330)=0 exch2_oi(3,330)=510 exch2_oj(3,330)=511 exch2_neighbourId(4,330)=329 exch2_iLo(4,330)=0 exch2_iHi(4,330)=0 exch2_jLo(4,330)=0 exch2_jHi(4,330)=35 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)=34 exch2_tBasex(331)=0 exch2_tBasey(331)=238 exch2_txGlobalo(331)=511 exch2_tyGlobalo(331)=239 exch2_isWedge(331)=1 exch2_isNedge(331)=0 exch2_isEedge(331)=0 exch2_isSedge(331)=0 exch2_myFace(331)=2 exch2_mydNx(331)=510 exch2_mydNy(331)=510 exch2_nNeighbours(331)=4 exch2_neighbourId(1,331)=346 exch2_iLo(1,331)=0 exch2_iHi(1,331)=35 exch2_jLo(1,331)=35 exch2_jHi(1,331)=35 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)=35 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)=120 exch2_iLo(4,331)=0 exch2_iHi(4,331)=0 exch2_jLo(4,331)=0 exch2_jHi(4,331)=35 exch2_opposingSend(4,331)=3 exch2_pij(1,4,331)=1 exch2_pij(2,4,331)=0 exch2_pij(3,4,331)=0 exch2_pij(4,4,331)=1 exch2_oi(4,331)=-510 exch2_oj(4,331)=0 RETURN END SUBROUTINE W2_E2SETUP_332 C Topology for tile 332 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(332)=34 exch2_tNy(332)=34 exch2_tBasex(332)=34 exch2_tBasey(332)=238 exch2_txGlobalo(332)=545 exch2_tyGlobalo(332)=239 exch2_isWedge(332)=0 exch2_isNedge(332)=0 exch2_isEedge(332)=0 exch2_isSedge(332)=0 exch2_myFace(332)=2 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)=35 exch2_jHi(1,332)=35 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)=35 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)=35 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)=34 exch2_tBasex(333)=68 exch2_tBasey(333)=238 exch2_txGlobalo(333)=579 exch2_tyGlobalo(333)=239 exch2_isWedge(333)=0 exch2_isNedge(333)=0 exch2_isEedge(333)=0 exch2_isSedge(333)=0 exch2_myFace(333)=2 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)=35 exch2_jHi(1,333)=35 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)=35 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)=35 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)=34 exch2_tBasex(334)=102 exch2_tBasey(334)=238 exch2_txGlobalo(334)=613 exch2_tyGlobalo(334)=239 exch2_isWedge(334)=0 exch2_isNedge(334)=0 exch2_isEedge(334)=0 exch2_isSedge(334)=0 exch2_myFace(334)=2 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)=35 exch2_jHi(1,334)=35 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)=35 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)=35 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)=34 exch2_tBasex(335)=136 exch2_tBasey(335)=238 exch2_txGlobalo(335)=647 exch2_tyGlobalo(335)=239 exch2_isWedge(335)=0 exch2_isNedge(335)=0 exch2_isEedge(335)=0 exch2_isSedge(335)=0 exch2_myFace(335)=2 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)=35 exch2_jHi(1,335)=35 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)=35 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)=35 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)=34 exch2_tBasex(336)=170 exch2_tBasey(336)=238 exch2_txGlobalo(336)=681 exch2_tyGlobalo(336)=239 exch2_isWedge(336)=0 exch2_isNedge(336)=0 exch2_isEedge(336)=0 exch2_isSedge(336)=0 exch2_myFace(336)=2 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)=35 exch2_jHi(1,336)=35 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)=35 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)=35 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)=34 exch2_tBasex(337)=204 exch2_tBasey(337)=238 exch2_txGlobalo(337)=715 exch2_tyGlobalo(337)=239 exch2_isWedge(337)=0 exch2_isNedge(337)=0 exch2_isEedge(337)=0 exch2_isSedge(337)=0 exch2_myFace(337)=2 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)=35 exch2_jHi(1,337)=35 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)=35 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)=35 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)=34 exch2_tBasex(338)=238 exch2_tBasey(338)=238 exch2_txGlobalo(338)=749 exch2_tyGlobalo(338)=239 exch2_isWedge(338)=0 exch2_isNedge(338)=0 exch2_isEedge(338)=0 exch2_isSedge(338)=0 exch2_myFace(338)=2 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)=35 exch2_jHi(1,338)=35 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)=35 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)=35 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)=34 exch2_tBasex(339)=272 exch2_tBasey(339)=238 exch2_txGlobalo(339)=783 exch2_tyGlobalo(339)=239 exch2_isWedge(339)=0 exch2_isNedge(339)=0 exch2_isEedge(339)=0 exch2_isSedge(339)=0 exch2_myFace(339)=2 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)=35 exch2_jHi(1,339)=35 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)=35 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)=35 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)=34 exch2_tBasex(340)=306 exch2_tBasey(340)=238 exch2_txGlobalo(340)=817 exch2_tyGlobalo(340)=239 exch2_isWedge(340)=0 exch2_isNedge(340)=0 exch2_isEedge(340)=0 exch2_isSedge(340)=0 exch2_myFace(340)=2 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)=35 exch2_jHi(1,340)=35 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)=35 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)=35 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)=34 exch2_tBasex(341)=340 exch2_tBasey(341)=238 exch2_txGlobalo(341)=851 exch2_tyGlobalo(341)=239 exch2_isWedge(341)=0 exch2_isNedge(341)=0 exch2_isEedge(341)=0 exch2_isSedge(341)=0 exch2_myFace(341)=2 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)=35 exch2_jHi(1,341)=35 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)=35 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)=35 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)=34 exch2_tBasex(342)=374 exch2_tBasey(342)=238 exch2_txGlobalo(342)=885 exch2_tyGlobalo(342)=239 exch2_isWedge(342)=0 exch2_isNedge(342)=0 exch2_isEedge(342)=0 exch2_isSedge(342)=0 exch2_myFace(342)=2 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)=35 exch2_jHi(1,342)=35 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)=35 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)=35 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)=34 exch2_tBasex(343)=408 exch2_tBasey(343)=238 exch2_txGlobalo(343)=919 exch2_tyGlobalo(343)=239 exch2_isWedge(343)=0 exch2_isNedge(343)=0 exch2_isEedge(343)=0 exch2_isSedge(343)=0 exch2_myFace(343)=2 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)=35 exch2_jHi(1,343)=35 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)=35 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)=35 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)=34 exch2_tBasex(344)=442 exch2_tBasey(344)=238 exch2_txGlobalo(344)=953 exch2_tyGlobalo(344)=239 exch2_isWedge(344)=0 exch2_isNedge(344)=0 exch2_isEedge(344)=0 exch2_isSedge(344)=0 exch2_myFace(344)=2 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)=35 exch2_jHi(1,344)=35 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)=35 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)=35 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)=34 exch2_tBasex(345)=476 exch2_tBasey(345)=238 exch2_txGlobalo(345)=987 exch2_tyGlobalo(345)=239 exch2_isWedge(345)=0 exch2_isNedge(345)=0 exch2_isEedge(345)=1 exch2_isSedge(345)=0 exch2_myFace(345)=2 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)=35 exch2_jHi(1,345)=35 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)=683 exch2_iLo(3,345)=35 exch2_iHi(3,345)=35 exch2_jLo(3,345)=0 exch2_jHi(3,345)=35 exch2_opposingSend(3,345)=2 exch2_pij(1,3,345)=0 exch2_pij(2,3,345)=1 exch2_pij(3,3,345)=-1 exch2_pij(4,3,345)=0 exch2_oi(3,345)=510 exch2_oj(3,345)=511 exch2_neighbourId(4,345)=344 exch2_iLo(4,345)=0 exch2_iHi(4,345)=0 exch2_jLo(4,345)=0 exch2_jHi(4,345)=35 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)=34 exch2_tBasex(346)=0 exch2_tBasey(346)=272 exch2_txGlobalo(346)=511 exch2_tyGlobalo(346)=273 exch2_isWedge(346)=1 exch2_isNedge(346)=0 exch2_isEedge(346)=0 exch2_isSedge(346)=0 exch2_myFace(346)=2 exch2_mydNx(346)=510 exch2_mydNy(346)=510 exch2_nNeighbours(346)=4 exch2_neighbourId(1,346)=361 exch2_iLo(1,346)=0 exch2_iHi(1,346)=35 exch2_jLo(1,346)=35 exch2_jHi(1,346)=35 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)=35 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)=135 exch2_iLo(4,346)=0 exch2_iHi(4,346)=0 exch2_jLo(4,346)=0 exch2_jHi(4,346)=35 exch2_opposingSend(4,346)=3 exch2_pij(1,4,346)=1 exch2_pij(2,4,346)=0 exch2_pij(3,4,346)=0 exch2_pij(4,4,346)=1 exch2_oi(4,346)=-510 exch2_oj(4,346)=0 RETURN END SUBROUTINE W2_E2SETUP_347 C Topology for tile 347 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(347)=34 exch2_tNy(347)=34 exch2_tBasex(347)=34 exch2_tBasey(347)=272 exch2_txGlobalo(347)=545 exch2_tyGlobalo(347)=273 exch2_isWedge(347)=0 exch2_isNedge(347)=0 exch2_isEedge(347)=0 exch2_isSedge(347)=0 exch2_myFace(347)=2 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)=35 exch2_jHi(1,347)=35 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)=35 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)=35 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)=34 exch2_tBasex(348)=68 exch2_tBasey(348)=272 exch2_txGlobalo(348)=579 exch2_tyGlobalo(348)=273 exch2_isWedge(348)=0 exch2_isNedge(348)=0 exch2_isEedge(348)=0 exch2_isSedge(348)=0 exch2_myFace(348)=2 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)=35 exch2_jHi(1,348)=35 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)=35 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)=35 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)=34 exch2_tBasex(349)=102 exch2_tBasey(349)=272 exch2_txGlobalo(349)=613 exch2_tyGlobalo(349)=273 exch2_isWedge(349)=0 exch2_isNedge(349)=0 exch2_isEedge(349)=0 exch2_isSedge(349)=0 exch2_myFace(349)=2 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)=35 exch2_jHi(1,349)=35 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)=35 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)=35 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)=34 exch2_tBasex(350)=136 exch2_tBasey(350)=272 exch2_txGlobalo(350)=647 exch2_tyGlobalo(350)=273 exch2_isWedge(350)=0 exch2_isNedge(350)=0 exch2_isEedge(350)=0 exch2_isSedge(350)=0 exch2_myFace(350)=2 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)=35 exch2_jHi(1,350)=35 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)=35 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)=35 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)=34 exch2_tBasex(351)=170 exch2_tBasey(351)=272 exch2_txGlobalo(351)=681 exch2_tyGlobalo(351)=273 exch2_isWedge(351)=0 exch2_isNedge(351)=0 exch2_isEedge(351)=0 exch2_isSedge(351)=0 exch2_myFace(351)=2 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)=35 exch2_jHi(1,351)=35 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)=35 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)=35 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)=34 exch2_tBasex(352)=204 exch2_tBasey(352)=272 exch2_txGlobalo(352)=715 exch2_tyGlobalo(352)=273 exch2_isWedge(352)=0 exch2_isNedge(352)=0 exch2_isEedge(352)=0 exch2_isSedge(352)=0 exch2_myFace(352)=2 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)=35 exch2_jHi(1,352)=35 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)=35 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)=35 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)=34 exch2_tBasex(353)=238 exch2_tBasey(353)=272 exch2_txGlobalo(353)=749 exch2_tyGlobalo(353)=273 exch2_isWedge(353)=0 exch2_isNedge(353)=0 exch2_isEedge(353)=0 exch2_isSedge(353)=0 exch2_myFace(353)=2 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)=35 exch2_jHi(1,353)=35 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)=35 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)=35 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)=34 exch2_tBasex(354)=272 exch2_tBasey(354)=272 exch2_txGlobalo(354)=783 exch2_tyGlobalo(354)=273 exch2_isWedge(354)=0 exch2_isNedge(354)=0 exch2_isEedge(354)=0 exch2_isSedge(354)=0 exch2_myFace(354)=2 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)=35 exch2_jHi(1,354)=35 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)=35 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)=35 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)=34 exch2_tBasex(355)=306 exch2_tBasey(355)=272 exch2_txGlobalo(355)=817 exch2_tyGlobalo(355)=273 exch2_isWedge(355)=0 exch2_isNedge(355)=0 exch2_isEedge(355)=0 exch2_isSedge(355)=0 exch2_myFace(355)=2 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)=35 exch2_jHi(1,355)=35 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)=35 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)=35 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)=34 exch2_tBasex(356)=340 exch2_tBasey(356)=272 exch2_txGlobalo(356)=851 exch2_tyGlobalo(356)=273 exch2_isWedge(356)=0 exch2_isNedge(356)=0 exch2_isEedge(356)=0 exch2_isSedge(356)=0 exch2_myFace(356)=2 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)=35 exch2_jHi(1,356)=35 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)=35 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)=35 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)=34 exch2_tBasex(357)=374 exch2_tBasey(357)=272 exch2_txGlobalo(357)=885 exch2_tyGlobalo(357)=273 exch2_isWedge(357)=0 exch2_isNedge(357)=0 exch2_isEedge(357)=0 exch2_isSedge(357)=0 exch2_myFace(357)=2 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)=35 exch2_jHi(1,357)=35 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)=35 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)=35 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)=34 exch2_tBasex(358)=408 exch2_tBasey(358)=272 exch2_txGlobalo(358)=919 exch2_tyGlobalo(358)=273 exch2_isWedge(358)=0 exch2_isNedge(358)=0 exch2_isEedge(358)=0 exch2_isSedge(358)=0 exch2_myFace(358)=2 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)=35 exch2_jHi(1,358)=35 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)=35 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)=35 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)=34 exch2_tBasex(359)=442 exch2_tBasey(359)=272 exch2_txGlobalo(359)=953 exch2_tyGlobalo(359)=273 exch2_isWedge(359)=0 exch2_isNedge(359)=0 exch2_isEedge(359)=0 exch2_isSedge(359)=0 exch2_myFace(359)=2 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)=35 exch2_jHi(1,359)=35 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)=35 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)=35 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)=34 exch2_tBasex(360)=476 exch2_tBasey(360)=272 exch2_txGlobalo(360)=987 exch2_tyGlobalo(360)=273 exch2_isWedge(360)=0 exch2_isNedge(360)=0 exch2_isEedge(360)=1 exch2_isSedge(360)=0 exch2_myFace(360)=2 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)=35 exch2_jHi(1,360)=35 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)=682 exch2_iLo(3,360)=35 exch2_iHi(3,360)=35 exch2_jLo(3,360)=0 exch2_jHi(3,360)=35 exch2_opposingSend(3,360)=2 exch2_pij(1,3,360)=0 exch2_pij(2,3,360)=1 exch2_pij(3,3,360)=-1 exch2_pij(4,3,360)=0 exch2_oi(3,360)=510 exch2_oj(3,360)=511 exch2_neighbourId(4,360)=359 exch2_iLo(4,360)=0 exch2_iHi(4,360)=0 exch2_jLo(4,360)=0 exch2_jHi(4,360)=35 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)=34 exch2_tBasex(361)=0 exch2_tBasey(361)=306 exch2_txGlobalo(361)=511 exch2_tyGlobalo(361)=307 exch2_isWedge(361)=1 exch2_isNedge(361)=0 exch2_isEedge(361)=0 exch2_isSedge(361)=0 exch2_myFace(361)=2 exch2_mydNx(361)=510 exch2_mydNy(361)=510 exch2_nNeighbours(361)=4 exch2_neighbourId(1,361)=376 exch2_iLo(1,361)=0 exch2_iHi(1,361)=35 exch2_jLo(1,361)=35 exch2_jHi(1,361)=35 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)=35 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)=150 exch2_iLo(4,361)=0 exch2_iHi(4,361)=0 exch2_jLo(4,361)=0 exch2_jHi(4,361)=35 exch2_opposingSend(4,361)=3 exch2_pij(1,4,361)=1 exch2_pij(2,4,361)=0 exch2_pij(3,4,361)=0 exch2_pij(4,4,361)=1 exch2_oi(4,361)=-510 exch2_oj(4,361)=0 RETURN END SUBROUTINE W2_E2SETUP_362 C Topology for tile 362 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(362)=34 exch2_tNy(362)=34 exch2_tBasex(362)=34 exch2_tBasey(362)=306 exch2_txGlobalo(362)=545 exch2_tyGlobalo(362)=307 exch2_isWedge(362)=0 exch2_isNedge(362)=0 exch2_isEedge(362)=0 exch2_isSedge(362)=0 exch2_myFace(362)=2 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)=35 exch2_jHi(1,362)=35 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)=35 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)=35 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)=34 exch2_tBasex(363)=68 exch2_tBasey(363)=306 exch2_txGlobalo(363)=579 exch2_tyGlobalo(363)=307 exch2_isWedge(363)=0 exch2_isNedge(363)=0 exch2_isEedge(363)=0 exch2_isSedge(363)=0 exch2_myFace(363)=2 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)=35 exch2_jHi(1,363)=35 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)=35 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)=35 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)=34 exch2_tBasex(364)=102 exch2_tBasey(364)=306 exch2_txGlobalo(364)=613 exch2_tyGlobalo(364)=307 exch2_isWedge(364)=0 exch2_isNedge(364)=0 exch2_isEedge(364)=0 exch2_isSedge(364)=0 exch2_myFace(364)=2 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)=35 exch2_jHi(1,364)=35 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)=35 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)=35 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)=34 exch2_tBasex(365)=136 exch2_tBasey(365)=306 exch2_txGlobalo(365)=647 exch2_tyGlobalo(365)=307 exch2_isWedge(365)=0 exch2_isNedge(365)=0 exch2_isEedge(365)=0 exch2_isSedge(365)=0 exch2_myFace(365)=2 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)=35 exch2_jHi(1,365)=35 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)=35 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)=35 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)=34 exch2_tBasex(366)=170 exch2_tBasey(366)=306 exch2_txGlobalo(366)=681 exch2_tyGlobalo(366)=307 exch2_isWedge(366)=0 exch2_isNedge(366)=0 exch2_isEedge(366)=0 exch2_isSedge(366)=0 exch2_myFace(366)=2 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)=35 exch2_jHi(1,366)=35 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)=35 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)=35 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)=34 exch2_tBasex(367)=204 exch2_tBasey(367)=306 exch2_txGlobalo(367)=715 exch2_tyGlobalo(367)=307 exch2_isWedge(367)=0 exch2_isNedge(367)=0 exch2_isEedge(367)=0 exch2_isSedge(367)=0 exch2_myFace(367)=2 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)=35 exch2_jHi(1,367)=35 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)=35 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)=35 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)=34 exch2_tBasex(368)=238 exch2_tBasey(368)=306 exch2_txGlobalo(368)=749 exch2_tyGlobalo(368)=307 exch2_isWedge(368)=0 exch2_isNedge(368)=0 exch2_isEedge(368)=0 exch2_isSedge(368)=0 exch2_myFace(368)=2 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)=35 exch2_jHi(1,368)=35 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)=35 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)=35 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)=34 exch2_tBasex(369)=272 exch2_tBasey(369)=306 exch2_txGlobalo(369)=783 exch2_tyGlobalo(369)=307 exch2_isWedge(369)=0 exch2_isNedge(369)=0 exch2_isEedge(369)=0 exch2_isSedge(369)=0 exch2_myFace(369)=2 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)=35 exch2_jHi(1,369)=35 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)=35 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)=35 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)=34 exch2_tBasex(370)=306 exch2_tBasey(370)=306 exch2_txGlobalo(370)=817 exch2_tyGlobalo(370)=307 exch2_isWedge(370)=0 exch2_isNedge(370)=0 exch2_isEedge(370)=0 exch2_isSedge(370)=0 exch2_myFace(370)=2 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)=35 exch2_jHi(1,370)=35 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)=35 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)=35 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)=34 exch2_tBasex(371)=340 exch2_tBasey(371)=306 exch2_txGlobalo(371)=851 exch2_tyGlobalo(371)=307 exch2_isWedge(371)=0 exch2_isNedge(371)=0 exch2_isEedge(371)=0 exch2_isSedge(371)=0 exch2_myFace(371)=2 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)=35 exch2_jHi(1,371)=35 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)=35 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)=35 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)=34 exch2_tBasex(372)=374 exch2_tBasey(372)=306 exch2_txGlobalo(372)=885 exch2_tyGlobalo(372)=307 exch2_isWedge(372)=0 exch2_isNedge(372)=0 exch2_isEedge(372)=0 exch2_isSedge(372)=0 exch2_myFace(372)=2 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)=35 exch2_jHi(1,372)=35 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)=35 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)=35 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)=34 exch2_tBasex(373)=408 exch2_tBasey(373)=306 exch2_txGlobalo(373)=919 exch2_tyGlobalo(373)=307 exch2_isWedge(373)=0 exch2_isNedge(373)=0 exch2_isEedge(373)=0 exch2_isSedge(373)=0 exch2_myFace(373)=2 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)=35 exch2_jHi(1,373)=35 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)=35 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)=35 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)=34 exch2_tBasex(374)=442 exch2_tBasey(374)=306 exch2_txGlobalo(374)=953 exch2_tyGlobalo(374)=307 exch2_isWedge(374)=0 exch2_isNedge(374)=0 exch2_isEedge(374)=0 exch2_isSedge(374)=0 exch2_myFace(374)=2 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)=35 exch2_jHi(1,374)=35 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)=35 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)=35 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)=34 exch2_tBasex(375)=476 exch2_tBasey(375)=306 exch2_txGlobalo(375)=987 exch2_tyGlobalo(375)=307 exch2_isWedge(375)=0 exch2_isNedge(375)=0 exch2_isEedge(375)=1 exch2_isSedge(375)=0 exch2_myFace(375)=2 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)=35 exch2_jHi(1,375)=35 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)=681 exch2_iLo(3,375)=35 exch2_iHi(3,375)=35 exch2_jLo(3,375)=0 exch2_jHi(3,375)=35 exch2_opposingSend(3,375)=2 exch2_pij(1,3,375)=0 exch2_pij(2,3,375)=1 exch2_pij(3,3,375)=-1 exch2_pij(4,3,375)=0 exch2_oi(3,375)=510 exch2_oj(3,375)=511 exch2_neighbourId(4,375)=374 exch2_iLo(4,375)=0 exch2_iHi(4,375)=0 exch2_jLo(4,375)=0 exch2_jHi(4,375)=35 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)=34 exch2_tBasex(376)=0 exch2_tBasey(376)=340 exch2_txGlobalo(376)=511 exch2_tyGlobalo(376)=341 exch2_isWedge(376)=1 exch2_isNedge(376)=0 exch2_isEedge(376)=0 exch2_isSedge(376)=0 exch2_myFace(376)=2 exch2_mydNx(376)=510 exch2_mydNy(376)=510 exch2_nNeighbours(376)=4 exch2_neighbourId(1,376)=391 exch2_iLo(1,376)=0 exch2_iHi(1,376)=35 exch2_jLo(1,376)=35 exch2_jHi(1,376)=35 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)=35 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)=165 exch2_iLo(4,376)=0 exch2_iHi(4,376)=0 exch2_jLo(4,376)=0 exch2_jHi(4,376)=35 exch2_opposingSend(4,376)=3 exch2_pij(1,4,376)=1 exch2_pij(2,4,376)=0 exch2_pij(3,4,376)=0 exch2_pij(4,4,376)=1 exch2_oi(4,376)=-510 exch2_oj(4,376)=0 RETURN END SUBROUTINE W2_E2SETUP_377 C Topology for tile 377 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(377)=34 exch2_tNy(377)=34 exch2_tBasex(377)=34 exch2_tBasey(377)=340 exch2_txGlobalo(377)=545 exch2_tyGlobalo(377)=341 exch2_isWedge(377)=0 exch2_isNedge(377)=0 exch2_isEedge(377)=0 exch2_isSedge(377)=0 exch2_myFace(377)=2 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)=35 exch2_jHi(1,377)=35 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)=35 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)=35 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)=34 exch2_tBasex(378)=68 exch2_tBasey(378)=340 exch2_txGlobalo(378)=579 exch2_tyGlobalo(378)=341 exch2_isWedge(378)=0 exch2_isNedge(378)=0 exch2_isEedge(378)=0 exch2_isSedge(378)=0 exch2_myFace(378)=2 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)=35 exch2_jHi(1,378)=35 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)=35 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)=35 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)=34 exch2_tBasex(379)=102 exch2_tBasey(379)=340 exch2_txGlobalo(379)=613 exch2_tyGlobalo(379)=341 exch2_isWedge(379)=0 exch2_isNedge(379)=0 exch2_isEedge(379)=0 exch2_isSedge(379)=0 exch2_myFace(379)=2 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)=35 exch2_jHi(1,379)=35 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)=35 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)=35 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)=34 exch2_tBasex(380)=136 exch2_tBasey(380)=340 exch2_txGlobalo(380)=647 exch2_tyGlobalo(380)=341 exch2_isWedge(380)=0 exch2_isNedge(380)=0 exch2_isEedge(380)=0 exch2_isSedge(380)=0 exch2_myFace(380)=2 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)=35 exch2_jHi(1,380)=35 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)=35 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)=35 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)=34 exch2_tBasex(381)=170 exch2_tBasey(381)=340 exch2_txGlobalo(381)=681 exch2_tyGlobalo(381)=341 exch2_isWedge(381)=0 exch2_isNedge(381)=0 exch2_isEedge(381)=0 exch2_isSedge(381)=0 exch2_myFace(381)=2 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)=35 exch2_jHi(1,381)=35 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)=35 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)=35 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)=34 exch2_tBasex(382)=204 exch2_tBasey(382)=340 exch2_txGlobalo(382)=715 exch2_tyGlobalo(382)=341 exch2_isWedge(382)=0 exch2_isNedge(382)=0 exch2_isEedge(382)=0 exch2_isSedge(382)=0 exch2_myFace(382)=2 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)=35 exch2_jHi(1,382)=35 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)=35 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)=35 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)=34 exch2_tBasex(383)=238 exch2_tBasey(383)=340 exch2_txGlobalo(383)=749 exch2_tyGlobalo(383)=341 exch2_isWedge(383)=0 exch2_isNedge(383)=0 exch2_isEedge(383)=0 exch2_isSedge(383)=0 exch2_myFace(383)=2 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)=35 exch2_jHi(1,383)=35 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)=35 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)=35 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)=34 exch2_tBasex(384)=272 exch2_tBasey(384)=340 exch2_txGlobalo(384)=783 exch2_tyGlobalo(384)=341 exch2_isWedge(384)=0 exch2_isNedge(384)=0 exch2_isEedge(384)=0 exch2_isSedge(384)=0 exch2_myFace(384)=2 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)=35 exch2_jHi(1,384)=35 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)=35 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)=35 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)=34 exch2_tBasex(385)=306 exch2_tBasey(385)=340 exch2_txGlobalo(385)=817 exch2_tyGlobalo(385)=341 exch2_isWedge(385)=0 exch2_isNedge(385)=0 exch2_isEedge(385)=0 exch2_isSedge(385)=0 exch2_myFace(385)=2 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)=35 exch2_jHi(1,385)=35 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)=35 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)=35 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)=34 exch2_tBasex(386)=340 exch2_tBasey(386)=340 exch2_txGlobalo(386)=851 exch2_tyGlobalo(386)=341 exch2_isWedge(386)=0 exch2_isNedge(386)=0 exch2_isEedge(386)=0 exch2_isSedge(386)=0 exch2_myFace(386)=2 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)=35 exch2_jHi(1,386)=35 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)=35 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)=35 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)=34 exch2_tBasex(387)=374 exch2_tBasey(387)=340 exch2_txGlobalo(387)=885 exch2_tyGlobalo(387)=341 exch2_isWedge(387)=0 exch2_isNedge(387)=0 exch2_isEedge(387)=0 exch2_isSedge(387)=0 exch2_myFace(387)=2 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)=35 exch2_jHi(1,387)=35 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)=35 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)=35 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)=34 exch2_tBasex(388)=408 exch2_tBasey(388)=340 exch2_txGlobalo(388)=919 exch2_tyGlobalo(388)=341 exch2_isWedge(388)=0 exch2_isNedge(388)=0 exch2_isEedge(388)=0 exch2_isSedge(388)=0 exch2_myFace(388)=2 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)=35 exch2_jHi(1,388)=35 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)=35 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)=35 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)=34 exch2_tBasex(389)=442 exch2_tBasey(389)=340 exch2_txGlobalo(389)=953 exch2_tyGlobalo(389)=341 exch2_isWedge(389)=0 exch2_isNedge(389)=0 exch2_isEedge(389)=0 exch2_isSedge(389)=0 exch2_myFace(389)=2 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)=35 exch2_jHi(1,389)=35 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)=35 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)=35 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)=34 exch2_tBasex(390)=476 exch2_tBasey(390)=340 exch2_txGlobalo(390)=987 exch2_tyGlobalo(390)=341 exch2_isWedge(390)=0 exch2_isNedge(390)=0 exch2_isEedge(390)=1 exch2_isSedge(390)=0 exch2_myFace(390)=2 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)=35 exch2_jHi(1,390)=35 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)=680 exch2_iLo(3,390)=35 exch2_iHi(3,390)=35 exch2_jLo(3,390)=0 exch2_jHi(3,390)=35 exch2_opposingSend(3,390)=2 exch2_pij(1,3,390)=0 exch2_pij(2,3,390)=1 exch2_pij(3,3,390)=-1 exch2_pij(4,3,390)=0 exch2_oi(3,390)=510 exch2_oj(3,390)=511 exch2_neighbourId(4,390)=389 exch2_iLo(4,390)=0 exch2_iHi(4,390)=0 exch2_jLo(4,390)=0 exch2_jHi(4,390)=35 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)=34 exch2_tBasex(391)=0 exch2_tBasey(391)=374 exch2_txGlobalo(391)=511 exch2_tyGlobalo(391)=375 exch2_isWedge(391)=1 exch2_isNedge(391)=0 exch2_isEedge(391)=0 exch2_isSedge(391)=0 exch2_myFace(391)=2 exch2_mydNx(391)=510 exch2_mydNy(391)=510 exch2_nNeighbours(391)=4 exch2_neighbourId(1,391)=406 exch2_iLo(1,391)=0 exch2_iHi(1,391)=35 exch2_jLo(1,391)=35 exch2_jHi(1,391)=35 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)=35 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)=180 exch2_iLo(4,391)=0 exch2_iHi(4,391)=0 exch2_jLo(4,391)=0 exch2_jHi(4,391)=35 exch2_opposingSend(4,391)=3 exch2_pij(1,4,391)=1 exch2_pij(2,4,391)=0 exch2_pij(3,4,391)=0 exch2_pij(4,4,391)=1 exch2_oi(4,391)=-510 exch2_oj(4,391)=0 RETURN END SUBROUTINE W2_E2SETUP_392 C Topology for tile 392 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(392)=34 exch2_tNy(392)=34 exch2_tBasex(392)=34 exch2_tBasey(392)=374 exch2_txGlobalo(392)=545 exch2_tyGlobalo(392)=375 exch2_isWedge(392)=0 exch2_isNedge(392)=0 exch2_isEedge(392)=0 exch2_isSedge(392)=0 exch2_myFace(392)=2 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)=35 exch2_jHi(1,392)=35 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)=35 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)=35 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)=34 exch2_tBasex(393)=68 exch2_tBasey(393)=374 exch2_txGlobalo(393)=579 exch2_tyGlobalo(393)=375 exch2_isWedge(393)=0 exch2_isNedge(393)=0 exch2_isEedge(393)=0 exch2_isSedge(393)=0 exch2_myFace(393)=2 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)=35 exch2_jHi(1,393)=35 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)=35 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)=35 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)=34 exch2_tBasex(394)=102 exch2_tBasey(394)=374 exch2_txGlobalo(394)=613 exch2_tyGlobalo(394)=375 exch2_isWedge(394)=0 exch2_isNedge(394)=0 exch2_isEedge(394)=0 exch2_isSedge(394)=0 exch2_myFace(394)=2 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)=35 exch2_jHi(1,394)=35 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)=35 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)=35 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)=34 exch2_tBasex(395)=136 exch2_tBasey(395)=374 exch2_txGlobalo(395)=647 exch2_tyGlobalo(395)=375 exch2_isWedge(395)=0 exch2_isNedge(395)=0 exch2_isEedge(395)=0 exch2_isSedge(395)=0 exch2_myFace(395)=2 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)=35 exch2_jHi(1,395)=35 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)=35 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)=35 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)=34 exch2_tBasex(396)=170 exch2_tBasey(396)=374 exch2_txGlobalo(396)=681 exch2_tyGlobalo(396)=375 exch2_isWedge(396)=0 exch2_isNedge(396)=0 exch2_isEedge(396)=0 exch2_isSedge(396)=0 exch2_myFace(396)=2 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)=35 exch2_jHi(1,396)=35 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)=35 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)=35 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)=34 exch2_tBasex(397)=204 exch2_tBasey(397)=374 exch2_txGlobalo(397)=715 exch2_tyGlobalo(397)=375 exch2_isWedge(397)=0 exch2_isNedge(397)=0 exch2_isEedge(397)=0 exch2_isSedge(397)=0 exch2_myFace(397)=2 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)=35 exch2_jHi(1,397)=35 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)=35 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)=35 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)=34 exch2_tBasex(398)=238 exch2_tBasey(398)=374 exch2_txGlobalo(398)=749 exch2_tyGlobalo(398)=375 exch2_isWedge(398)=0 exch2_isNedge(398)=0 exch2_isEedge(398)=0 exch2_isSedge(398)=0 exch2_myFace(398)=2 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)=35 exch2_jHi(1,398)=35 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)=35 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)=35 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)=34 exch2_tBasex(399)=272 exch2_tBasey(399)=374 exch2_txGlobalo(399)=783 exch2_tyGlobalo(399)=375 exch2_isWedge(399)=0 exch2_isNedge(399)=0 exch2_isEedge(399)=0 exch2_isSedge(399)=0 exch2_myFace(399)=2 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)=35 exch2_jHi(1,399)=35 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)=35 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)=35 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)=34 exch2_tBasex(400)=306 exch2_tBasey(400)=374 exch2_txGlobalo(400)=817 exch2_tyGlobalo(400)=375 exch2_isWedge(400)=0 exch2_isNedge(400)=0 exch2_isEedge(400)=0 exch2_isSedge(400)=0 exch2_myFace(400)=2 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)=35 exch2_jHi(1,400)=35 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)=35 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)=35 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)=34 exch2_tBasex(401)=340 exch2_tBasey(401)=374 exch2_txGlobalo(401)=851 exch2_tyGlobalo(401)=375 exch2_isWedge(401)=0 exch2_isNedge(401)=0 exch2_isEedge(401)=0 exch2_isSedge(401)=0 exch2_myFace(401)=2 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)=35 exch2_jHi(1,401)=35 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)=35 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)=35 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)=34 exch2_tBasex(402)=374 exch2_tBasey(402)=374 exch2_txGlobalo(402)=885 exch2_tyGlobalo(402)=375 exch2_isWedge(402)=0 exch2_isNedge(402)=0 exch2_isEedge(402)=0 exch2_isSedge(402)=0 exch2_myFace(402)=2 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)=35 exch2_jHi(1,402)=35 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)=35 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)=35 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)=34 exch2_tBasex(403)=408 exch2_tBasey(403)=374 exch2_txGlobalo(403)=919 exch2_tyGlobalo(403)=375 exch2_isWedge(403)=0 exch2_isNedge(403)=0 exch2_isEedge(403)=0 exch2_isSedge(403)=0 exch2_myFace(403)=2 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)=35 exch2_jHi(1,403)=35 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)=35 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)=35 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)=34 exch2_tBasex(404)=442 exch2_tBasey(404)=374 exch2_txGlobalo(404)=953 exch2_tyGlobalo(404)=375 exch2_isWedge(404)=0 exch2_isNedge(404)=0 exch2_isEedge(404)=0 exch2_isSedge(404)=0 exch2_myFace(404)=2 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)=35 exch2_jHi(1,404)=35 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)=35 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)=35 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)=34 exch2_tBasex(405)=476 exch2_tBasey(405)=374 exch2_txGlobalo(405)=987 exch2_tyGlobalo(405)=375 exch2_isWedge(405)=0 exch2_isNedge(405)=0 exch2_isEedge(405)=1 exch2_isSedge(405)=0 exch2_myFace(405)=2 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)=35 exch2_jHi(1,405)=35 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)=679 exch2_iLo(3,405)=35 exch2_iHi(3,405)=35 exch2_jLo(3,405)=0 exch2_jHi(3,405)=35 exch2_opposingSend(3,405)=2 exch2_pij(1,3,405)=0 exch2_pij(2,3,405)=1 exch2_pij(3,3,405)=-1 exch2_pij(4,3,405)=0 exch2_oi(3,405)=510 exch2_oj(3,405)=511 exch2_neighbourId(4,405)=404 exch2_iLo(4,405)=0 exch2_iHi(4,405)=0 exch2_jLo(4,405)=0 exch2_jHi(4,405)=35 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)=34 exch2_tBasex(406)=0 exch2_tBasey(406)=408 exch2_txGlobalo(406)=511 exch2_tyGlobalo(406)=409 exch2_isWedge(406)=1 exch2_isNedge(406)=0 exch2_isEedge(406)=0 exch2_isSedge(406)=0 exch2_myFace(406)=2 exch2_mydNx(406)=510 exch2_mydNy(406)=510 exch2_nNeighbours(406)=4 exch2_neighbourId(1,406)=421 exch2_iLo(1,406)=0 exch2_iHi(1,406)=35 exch2_jLo(1,406)=35 exch2_jHi(1,406)=35 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)=35 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)=195 exch2_iLo(4,406)=0 exch2_iHi(4,406)=0 exch2_jLo(4,406)=0 exch2_jHi(4,406)=35 exch2_opposingSend(4,406)=3 exch2_pij(1,4,406)=1 exch2_pij(2,4,406)=0 exch2_pij(3,4,406)=0 exch2_pij(4,4,406)=1 exch2_oi(4,406)=-510 exch2_oj(4,406)=0 RETURN END SUBROUTINE W2_E2SETUP_407 C Topology for tile 407 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(407)=34 exch2_tNy(407)=34 exch2_tBasex(407)=34 exch2_tBasey(407)=408 exch2_txGlobalo(407)=545 exch2_tyGlobalo(407)=409 exch2_isWedge(407)=0 exch2_isNedge(407)=0 exch2_isEedge(407)=0 exch2_isSedge(407)=0 exch2_myFace(407)=2 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)=35 exch2_jHi(1,407)=35 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)=35 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)=35 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)=34 exch2_tBasex(408)=68 exch2_tBasey(408)=408 exch2_txGlobalo(408)=579 exch2_tyGlobalo(408)=409 exch2_isWedge(408)=0 exch2_isNedge(408)=0 exch2_isEedge(408)=0 exch2_isSedge(408)=0 exch2_myFace(408)=2 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)=35 exch2_jHi(1,408)=35 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)=35 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)=35 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)=34 exch2_tBasex(409)=102 exch2_tBasey(409)=408 exch2_txGlobalo(409)=613 exch2_tyGlobalo(409)=409 exch2_isWedge(409)=0 exch2_isNedge(409)=0 exch2_isEedge(409)=0 exch2_isSedge(409)=0 exch2_myFace(409)=2 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)=35 exch2_jHi(1,409)=35 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)=35 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)=35 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)=34 exch2_tBasex(410)=136 exch2_tBasey(410)=408 exch2_txGlobalo(410)=647 exch2_tyGlobalo(410)=409 exch2_isWedge(410)=0 exch2_isNedge(410)=0 exch2_isEedge(410)=0 exch2_isSedge(410)=0 exch2_myFace(410)=2 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)=35 exch2_jHi(1,410)=35 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)=35 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)=35 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)=34 exch2_tBasex(411)=170 exch2_tBasey(411)=408 exch2_txGlobalo(411)=681 exch2_tyGlobalo(411)=409 exch2_isWedge(411)=0 exch2_isNedge(411)=0 exch2_isEedge(411)=0 exch2_isSedge(411)=0 exch2_myFace(411)=2 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)=35 exch2_jHi(1,411)=35 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)=35 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)=35 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)=34 exch2_tBasex(412)=204 exch2_tBasey(412)=408 exch2_txGlobalo(412)=715 exch2_tyGlobalo(412)=409 exch2_isWedge(412)=0 exch2_isNedge(412)=0 exch2_isEedge(412)=0 exch2_isSedge(412)=0 exch2_myFace(412)=2 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)=35 exch2_jHi(1,412)=35 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)=35 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)=35 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)=34 exch2_tBasex(413)=238 exch2_tBasey(413)=408 exch2_txGlobalo(413)=749 exch2_tyGlobalo(413)=409 exch2_isWedge(413)=0 exch2_isNedge(413)=0 exch2_isEedge(413)=0 exch2_isSedge(413)=0 exch2_myFace(413)=2 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)=35 exch2_jHi(1,413)=35 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)=35 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)=35 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)=34 exch2_tBasex(414)=272 exch2_tBasey(414)=408 exch2_txGlobalo(414)=783 exch2_tyGlobalo(414)=409 exch2_isWedge(414)=0 exch2_isNedge(414)=0 exch2_isEedge(414)=0 exch2_isSedge(414)=0 exch2_myFace(414)=2 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)=35 exch2_jHi(1,414)=35 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)=35 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)=35 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)=34 exch2_tBasex(415)=306 exch2_tBasey(415)=408 exch2_txGlobalo(415)=817 exch2_tyGlobalo(415)=409 exch2_isWedge(415)=0 exch2_isNedge(415)=0 exch2_isEedge(415)=0 exch2_isSedge(415)=0 exch2_myFace(415)=2 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)=35 exch2_jHi(1,415)=35 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)=35 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)=35 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)=34 exch2_tBasex(416)=340 exch2_tBasey(416)=408 exch2_txGlobalo(416)=851 exch2_tyGlobalo(416)=409 exch2_isWedge(416)=0 exch2_isNedge(416)=0 exch2_isEedge(416)=0 exch2_isSedge(416)=0 exch2_myFace(416)=2 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)=35 exch2_jHi(1,416)=35 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)=35 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)=35 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)=34 exch2_tBasex(417)=374 exch2_tBasey(417)=408 exch2_txGlobalo(417)=885 exch2_tyGlobalo(417)=409 exch2_isWedge(417)=0 exch2_isNedge(417)=0 exch2_isEedge(417)=0 exch2_isSedge(417)=0 exch2_myFace(417)=2 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)=35 exch2_jHi(1,417)=35 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)=35 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)=35 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)=34 exch2_tBasex(418)=408 exch2_tBasey(418)=408 exch2_txGlobalo(418)=919 exch2_tyGlobalo(418)=409 exch2_isWedge(418)=0 exch2_isNedge(418)=0 exch2_isEedge(418)=0 exch2_isSedge(418)=0 exch2_myFace(418)=2 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)=35 exch2_jHi(1,418)=35 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)=35 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)=35 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)=34 exch2_tBasex(419)=442 exch2_tBasey(419)=408 exch2_txGlobalo(419)=953 exch2_tyGlobalo(419)=409 exch2_isWedge(419)=0 exch2_isNedge(419)=0 exch2_isEedge(419)=0 exch2_isSedge(419)=0 exch2_myFace(419)=2 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)=35 exch2_jHi(1,419)=35 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)=35 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)=35 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)=34 exch2_tBasex(420)=476 exch2_tBasey(420)=408 exch2_txGlobalo(420)=987 exch2_tyGlobalo(420)=409 exch2_isWedge(420)=0 exch2_isNedge(420)=0 exch2_isEedge(420)=1 exch2_isSedge(420)=0 exch2_myFace(420)=2 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)=35 exch2_jHi(1,420)=35 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)=678 exch2_iLo(3,420)=35 exch2_iHi(3,420)=35 exch2_jLo(3,420)=0 exch2_jHi(3,420)=35 exch2_opposingSend(3,420)=2 exch2_pij(1,3,420)=0 exch2_pij(2,3,420)=1 exch2_pij(3,3,420)=-1 exch2_pij(4,3,420)=0 exch2_oi(3,420)=510 exch2_oj(3,420)=511 exch2_neighbourId(4,420)=419 exch2_iLo(4,420)=0 exch2_iHi(4,420)=0 exch2_jLo(4,420)=0 exch2_jHi(4,420)=35 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)=34 exch2_tBasex(421)=0 exch2_tBasey(421)=442 exch2_txGlobalo(421)=511 exch2_tyGlobalo(421)=443 exch2_isWedge(421)=1 exch2_isNedge(421)=0 exch2_isEedge(421)=0 exch2_isSedge(421)=0 exch2_myFace(421)=2 exch2_mydNx(421)=510 exch2_mydNy(421)=510 exch2_nNeighbours(421)=4 exch2_neighbourId(1,421)=436 exch2_iLo(1,421)=0 exch2_iHi(1,421)=35 exch2_jLo(1,421)=35 exch2_jHi(1,421)=35 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)=35 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)=210 exch2_iLo(4,421)=0 exch2_iHi(4,421)=0 exch2_jLo(4,421)=0 exch2_jHi(4,421)=35 exch2_opposingSend(4,421)=3 exch2_pij(1,4,421)=1 exch2_pij(2,4,421)=0 exch2_pij(3,4,421)=0 exch2_pij(4,4,421)=1 exch2_oi(4,421)=-510 exch2_oj(4,421)=0 RETURN END SUBROUTINE W2_E2SETUP_422 C Topology for tile 422 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(422)=34 exch2_tNy(422)=34 exch2_tBasex(422)=34 exch2_tBasey(422)=442 exch2_txGlobalo(422)=545 exch2_tyGlobalo(422)=443 exch2_isWedge(422)=0 exch2_isNedge(422)=0 exch2_isEedge(422)=0 exch2_isSedge(422)=0 exch2_myFace(422)=2 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)=35 exch2_jHi(1,422)=35 exch2_opposingSend(1,422)=2 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)=35 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)=35 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)=34 exch2_tBasex(423)=68 exch2_tBasey(423)=442 exch2_txGlobalo(423)=579 exch2_tyGlobalo(423)=443 exch2_isWedge(423)=0 exch2_isNedge(423)=0 exch2_isEedge(423)=0 exch2_isSedge(423)=0 exch2_myFace(423)=2 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)=35 exch2_jHi(1,423)=35 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)=35 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)=35 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)=34 exch2_tBasex(424)=102 exch2_tBasey(424)=442 exch2_txGlobalo(424)=613 exch2_tyGlobalo(424)=443 exch2_isWedge(424)=0 exch2_isNedge(424)=0 exch2_isEedge(424)=0 exch2_isSedge(424)=0 exch2_myFace(424)=2 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)=35 exch2_jHi(1,424)=35 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)=35 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)=35 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)=34 exch2_tBasex(425)=136 exch2_tBasey(425)=442 exch2_txGlobalo(425)=647 exch2_tyGlobalo(425)=443 exch2_isWedge(425)=0 exch2_isNedge(425)=0 exch2_isEedge(425)=0 exch2_isSedge(425)=0 exch2_myFace(425)=2 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)=35 exch2_jHi(1,425)=35 exch2_opposingSend(1,425)=2 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)=35 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)=35 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)=34 exch2_tBasex(426)=170 exch2_tBasey(426)=442 exch2_txGlobalo(426)=681 exch2_tyGlobalo(426)=443 exch2_isWedge(426)=0 exch2_isNedge(426)=0 exch2_isEedge(426)=0 exch2_isSedge(426)=0 exch2_myFace(426)=2 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)=35 exch2_jHi(1,426)=35 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)=35 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)=35 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)=34 exch2_tBasex(427)=204 exch2_tBasey(427)=442 exch2_txGlobalo(427)=715 exch2_tyGlobalo(427)=443 exch2_isWedge(427)=0 exch2_isNedge(427)=0 exch2_isEedge(427)=0 exch2_isSedge(427)=0 exch2_myFace(427)=2 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)=35 exch2_jHi(1,427)=35 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)=35 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)=35 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)=34 exch2_tBasex(428)=238 exch2_tBasey(428)=442 exch2_txGlobalo(428)=749 exch2_tyGlobalo(428)=443 exch2_isWedge(428)=0 exch2_isNedge(428)=0 exch2_isEedge(428)=0 exch2_isSedge(428)=0 exch2_myFace(428)=2 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)=35 exch2_jHi(1,428)=35 exch2_opposingSend(1,428)=2 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)=35 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)=35 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)=34 exch2_tBasex(429)=272 exch2_tBasey(429)=442 exch2_txGlobalo(429)=783 exch2_tyGlobalo(429)=443 exch2_isWedge(429)=0 exch2_isNedge(429)=0 exch2_isEedge(429)=0 exch2_isSedge(429)=0 exch2_myFace(429)=2 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)=35 exch2_jHi(1,429)=35 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)=35 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)=35 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)=34 exch2_tBasex(430)=306 exch2_tBasey(430)=442 exch2_txGlobalo(430)=817 exch2_tyGlobalo(430)=443 exch2_isWedge(430)=0 exch2_isNedge(430)=0 exch2_isEedge(430)=0 exch2_isSedge(430)=0 exch2_myFace(430)=2 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)=35 exch2_jHi(1,430)=35 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)=35 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)=35 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)=34 exch2_tBasex(431)=340 exch2_tBasey(431)=442 exch2_txGlobalo(431)=851 exch2_tyGlobalo(431)=443 exch2_isWedge(431)=0 exch2_isNedge(431)=0 exch2_isEedge(431)=0 exch2_isSedge(431)=0 exch2_myFace(431)=2 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)=35 exch2_jHi(1,431)=35 exch2_opposingSend(1,431)=2 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)=35 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)=35 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)=34 exch2_tBasex(432)=374 exch2_tBasey(432)=442 exch2_txGlobalo(432)=885 exch2_tyGlobalo(432)=443 exch2_isWedge(432)=0 exch2_isNedge(432)=0 exch2_isEedge(432)=0 exch2_isSedge(432)=0 exch2_myFace(432)=2 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)=35 exch2_jHi(1,432)=35 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)=35 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)=35 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)=34 exch2_tBasex(433)=408 exch2_tBasey(433)=442 exch2_txGlobalo(433)=919 exch2_tyGlobalo(433)=443 exch2_isWedge(433)=0 exch2_isNedge(433)=0 exch2_isEedge(433)=0 exch2_isSedge(433)=0 exch2_myFace(433)=2 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)=35 exch2_jHi(1,433)=35 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)=35 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)=35 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)=34 exch2_tBasex(434)=442 exch2_tBasey(434)=442 exch2_txGlobalo(434)=953 exch2_tyGlobalo(434)=443 exch2_isWedge(434)=0 exch2_isNedge(434)=0 exch2_isEedge(434)=0 exch2_isSedge(434)=0 exch2_myFace(434)=2 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)=35 exch2_jHi(1,434)=35 exch2_opposingSend(1,434)=2 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)=35 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)=35 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)=34 exch2_tBasex(435)=476 exch2_tBasey(435)=442 exch2_txGlobalo(435)=987 exch2_tyGlobalo(435)=443 exch2_isWedge(435)=0 exch2_isNedge(435)=0 exch2_isEedge(435)=1 exch2_isSedge(435)=0 exch2_myFace(435)=2 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)=35 exch2_jHi(1,435)=35 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)=677 exch2_iLo(3,435)=35 exch2_iHi(3,435)=35 exch2_jLo(3,435)=0 exch2_jHi(3,435)=35 exch2_opposingSend(3,435)=2 exch2_pij(1,3,435)=0 exch2_pij(2,3,435)=1 exch2_pij(3,3,435)=-1 exch2_pij(4,3,435)=0 exch2_oi(3,435)=510 exch2_oj(3,435)=511 exch2_neighbourId(4,435)=434 exch2_iLo(4,435)=0 exch2_iHi(4,435)=0 exch2_jLo(4,435)=0 exch2_jHi(4,435)=35 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)=34 exch2_tBasex(436)=0 exch2_tBasey(436)=476 exch2_txGlobalo(436)=511 exch2_tyGlobalo(436)=477 exch2_isWedge(436)=1 exch2_isNedge(436)=1 exch2_isEedge(436)=0 exch2_isSedge(436)=0 exch2_myFace(436)=2 exch2_mydNx(436)=510 exch2_mydNy(436)=510 exch2_nNeighbours(436)=4 exch2_neighbourId(1,436)=451 exch2_iLo(1,436)=0 exch2_iHi(1,436)=35 exch2_jLo(1,436)=35 exch2_jHi(1,436)=35 exch2_opposingSend(1,436)=2 exch2_pij(1,1,436)=1 exch2_pij(2,1,436)=0 exch2_pij(3,1,436)=0 exch2_pij(4,1,436)=1 exch2_oi(1,436)=0 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)=35 exch2_opposingSend(3,436)=4 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)=225 exch2_iLo(4,436)=0 exch2_iHi(4,436)=0 exch2_jLo(4,436)=0 exch2_jHi(4,436)=35 exch2_opposingSend(4,436)=3 exch2_pij(1,4,436)=1 exch2_pij(2,4,436)=0 exch2_pij(3,4,436)=0 exch2_pij(4,4,436)=1 exch2_oi(4,436)=-510 exch2_oj(4,436)=0 RETURN END SUBROUTINE W2_E2SETUP_437 C Topology for tile 437 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(437)=34 exch2_tNy(437)=34 exch2_tBasex(437)=34 exch2_tBasey(437)=476 exch2_txGlobalo(437)=545 exch2_tyGlobalo(437)=477 exch2_isWedge(437)=0 exch2_isNedge(437)=1 exch2_isEedge(437)=0 exch2_isSedge(437)=0 exch2_myFace(437)=2 exch2_mydNx(437)=510 exch2_mydNy(437)=510 exch2_nNeighbours(437)=4 exch2_neighbourId(1,437)=452 exch2_iLo(1,437)=0 exch2_iHi(1,437)=35 exch2_jLo(1,437)=35 exch2_jHi(1,437)=35 exch2_opposingSend(1,437)=2 exch2_pij(1,1,437)=1 exch2_pij(2,1,437)=0 exch2_pij(3,1,437)=0 exch2_pij(4,1,437)=1 exch2_oi(1,437)=0 exch2_oj(1,437)=510 exch2_neighbourId(2,437)=422 exch2_iLo(2,437)=0 exch2_iHi(2,437)=35 exch2_jLo(2,437)=0 exch2_jHi(2,437)=0 exch2_opposingSend(2,437)=1 exch2_pij(1,2,437)=1 exch2_pij(2,2,437)=0 exch2_pij(3,2,437)=0 exch2_pij(4,2,437)=1 exch2_oi(2,437)=0 exch2_oj(2,437)=0 exch2_neighbourId(3,437)=438 exch2_iLo(3,437)=35 exch2_iHi(3,437)=35 exch2_jLo(3,437)=0 exch2_jHi(3,437)=35 exch2_opposingSend(3,437)=4 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)=436 exch2_iLo(4,437)=0 exch2_iHi(4,437)=0 exch2_jLo(4,437)=0 exch2_jHi(4,437)=35 exch2_opposingSend(4,437)=3 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 RETURN END SUBROUTINE W2_E2SETUP_438 C Topology for tile 438 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(438)=34 exch2_tNy(438)=34 exch2_tBasex(438)=68 exch2_tBasey(438)=476 exch2_txGlobalo(438)=579 exch2_tyGlobalo(438)=477 exch2_isWedge(438)=0 exch2_isNedge(438)=1 exch2_isEedge(438)=0 exch2_isSedge(438)=0 exch2_myFace(438)=2 exch2_mydNx(438)=510 exch2_mydNy(438)=510 exch2_nNeighbours(438)=4 exch2_neighbourId(1,438)=453 exch2_iLo(1,438)=0 exch2_iHi(1,438)=35 exch2_jLo(1,438)=35 exch2_jHi(1,438)=35 exch2_opposingSend(1,438)=2 exch2_pij(1,1,438)=1 exch2_pij(2,1,438)=0 exch2_pij(3,1,438)=0 exch2_pij(4,1,438)=1 exch2_oi(1,438)=0 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)=35 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)=35 exch2_opposingSend(4,438)=3 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)=34 exch2_tBasex(439)=102 exch2_tBasey(439)=476 exch2_txGlobalo(439)=613 exch2_tyGlobalo(439)=477 exch2_isWedge(439)=0 exch2_isNedge(439)=1 exch2_isEedge(439)=0 exch2_isSedge(439)=0 exch2_myFace(439)=2 exch2_mydNx(439)=510 exch2_mydNy(439)=510 exch2_nNeighbours(439)=4 exch2_neighbourId(1,439)=454 exch2_iLo(1,439)=0 exch2_iHi(1,439)=35 exch2_jLo(1,439)=35 exch2_jHi(1,439)=35 exch2_opposingSend(1,439)=2 exch2_pij(1,1,439)=1 exch2_pij(2,1,439)=0 exch2_pij(3,1,439)=0 exch2_pij(4,1,439)=1 exch2_oi(1,439)=0 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)=35 exch2_opposingSend(3,439)=4 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)=35 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)=34 exch2_tBasex(440)=136 exch2_tBasey(440)=476 exch2_txGlobalo(440)=647 exch2_tyGlobalo(440)=477 exch2_isWedge(440)=0 exch2_isNedge(440)=1 exch2_isEedge(440)=0 exch2_isSedge(440)=0 exch2_myFace(440)=2 exch2_mydNx(440)=510 exch2_mydNy(440)=510 exch2_nNeighbours(440)=4 exch2_neighbourId(1,440)=455 exch2_iLo(1,440)=0 exch2_iHi(1,440)=35 exch2_jLo(1,440)=35 exch2_jHi(1,440)=35 exch2_opposingSend(1,440)=2 exch2_pij(1,1,440)=1 exch2_pij(2,1,440)=0 exch2_pij(3,1,440)=0 exch2_pij(4,1,440)=1 exch2_oi(1,440)=0 exch2_oj(1,440)=510 exch2_neighbourId(2,440)=425 exch2_iLo(2,440)=0 exch2_iHi(2,440)=35 exch2_jLo(2,440)=0 exch2_jHi(2,440)=0 exch2_opposingSend(2,440)=1 exch2_pij(1,2,440)=1 exch2_pij(2,2,440)=0 exch2_pij(3,2,440)=0 exch2_pij(4,2,440)=1 exch2_oi(2,440)=0 exch2_oj(2,440)=0 exch2_neighbourId(3,440)=441 exch2_iLo(3,440)=35 exch2_iHi(3,440)=35 exch2_jLo(3,440)=0 exch2_jHi(3,440)=35 exch2_opposingSend(3,440)=4 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)=439 exch2_iLo(4,440)=0 exch2_iHi(4,440)=0 exch2_jLo(4,440)=0 exch2_jHi(4,440)=35 exch2_opposingSend(4,440)=3 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 RETURN END SUBROUTINE W2_E2SETUP_441 C Topology for tile 441 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(441)=34 exch2_tNy(441)=34 exch2_tBasex(441)=170 exch2_tBasey(441)=476 exch2_txGlobalo(441)=681 exch2_tyGlobalo(441)=477 exch2_isWedge(441)=0 exch2_isNedge(441)=1 exch2_isEedge(441)=0 exch2_isSedge(441)=0 exch2_myFace(441)=2 exch2_mydNx(441)=510 exch2_mydNy(441)=510 exch2_nNeighbours(441)=4 exch2_neighbourId(1,441)=456 exch2_iLo(1,441)=0 exch2_iHi(1,441)=35 exch2_jLo(1,441)=35 exch2_jHi(1,441)=35 exch2_opposingSend(1,441)=2 exch2_pij(1,1,441)=1 exch2_pij(2,1,441)=0 exch2_pij(3,1,441)=0 exch2_pij(4,1,441)=1 exch2_oi(1,441)=0 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)=35 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)=35 exch2_opposingSend(4,441)=3 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)=34 exch2_tBasex(442)=204 exch2_tBasey(442)=476 exch2_txGlobalo(442)=715 exch2_tyGlobalo(442)=477 exch2_isWedge(442)=0 exch2_isNedge(442)=1 exch2_isEedge(442)=0 exch2_isSedge(442)=0 exch2_myFace(442)=2 exch2_mydNx(442)=510 exch2_mydNy(442)=510 exch2_nNeighbours(442)=4 exch2_neighbourId(1,442)=457 exch2_iLo(1,442)=0 exch2_iHi(1,442)=35 exch2_jLo(1,442)=35 exch2_jHi(1,442)=35 exch2_opposingSend(1,442)=2 exch2_pij(1,1,442)=1 exch2_pij(2,1,442)=0 exch2_pij(3,1,442)=0 exch2_pij(4,1,442)=1 exch2_oi(1,442)=0 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)=35 exch2_opposingSend(3,442)=4 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)=35 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)=34 exch2_tBasex(443)=238 exch2_tBasey(443)=476 exch2_txGlobalo(443)=749 exch2_tyGlobalo(443)=477 exch2_isWedge(443)=0 exch2_isNedge(443)=1 exch2_isEedge(443)=0 exch2_isSedge(443)=0 exch2_myFace(443)=2 exch2_mydNx(443)=510 exch2_mydNy(443)=510 exch2_nNeighbours(443)=4 exch2_neighbourId(1,443)=458 exch2_iLo(1,443)=0 exch2_iHi(1,443)=35 exch2_jLo(1,443)=35 exch2_jHi(1,443)=35 exch2_opposingSend(1,443)=2 exch2_pij(1,1,443)=1 exch2_pij(2,1,443)=0 exch2_pij(3,1,443)=0 exch2_pij(4,1,443)=1 exch2_oi(1,443)=0 exch2_oj(1,443)=510 exch2_neighbourId(2,443)=428 exch2_iLo(2,443)=0 exch2_iHi(2,443)=35 exch2_jLo(2,443)=0 exch2_jHi(2,443)=0 exch2_opposingSend(2,443)=1 exch2_pij(1,2,443)=1 exch2_pij(2,2,443)=0 exch2_pij(3,2,443)=0 exch2_pij(4,2,443)=1 exch2_oi(2,443)=0 exch2_oj(2,443)=0 exch2_neighbourId(3,443)=444 exch2_iLo(3,443)=35 exch2_iHi(3,443)=35 exch2_jLo(3,443)=0 exch2_jHi(3,443)=35 exch2_opposingSend(3,443)=4 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)=442 exch2_iLo(4,443)=0 exch2_iHi(4,443)=0 exch2_jLo(4,443)=0 exch2_jHi(4,443)=35 exch2_opposingSend(4,443)=3 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 RETURN END SUBROUTINE W2_E2SETUP_444 C Topology for tile 444 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(444)=34 exch2_tNy(444)=34 exch2_tBasex(444)=272 exch2_tBasey(444)=476 exch2_txGlobalo(444)=783 exch2_tyGlobalo(444)=477 exch2_isWedge(444)=0 exch2_isNedge(444)=1 exch2_isEedge(444)=0 exch2_isSedge(444)=0 exch2_myFace(444)=2 exch2_mydNx(444)=510 exch2_mydNy(444)=510 exch2_nNeighbours(444)=4 exch2_neighbourId(1,444)=459 exch2_iLo(1,444)=0 exch2_iHi(1,444)=35 exch2_jLo(1,444)=35 exch2_jHi(1,444)=35 exch2_opposingSend(1,444)=2 exch2_pij(1,1,444)=1 exch2_pij(2,1,444)=0 exch2_pij(3,1,444)=0 exch2_pij(4,1,444)=1 exch2_oi(1,444)=0 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)=35 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)=35 exch2_opposingSend(4,444)=3 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)=34 exch2_tBasex(445)=306 exch2_tBasey(445)=476 exch2_txGlobalo(445)=817 exch2_tyGlobalo(445)=477 exch2_isWedge(445)=0 exch2_isNedge(445)=1 exch2_isEedge(445)=0 exch2_isSedge(445)=0 exch2_myFace(445)=2 exch2_mydNx(445)=510 exch2_mydNy(445)=510 exch2_nNeighbours(445)=4 exch2_neighbourId(1,445)=460 exch2_iLo(1,445)=0 exch2_iHi(1,445)=35 exch2_jLo(1,445)=35 exch2_jHi(1,445)=35 exch2_opposingSend(1,445)=2 exch2_pij(1,1,445)=1 exch2_pij(2,1,445)=0 exch2_pij(3,1,445)=0 exch2_pij(4,1,445)=1 exch2_oi(1,445)=0 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)=35 exch2_opposingSend(3,445)=4 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)=35 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)=34 exch2_tBasex(446)=340 exch2_tBasey(446)=476 exch2_txGlobalo(446)=851 exch2_tyGlobalo(446)=477 exch2_isWedge(446)=0 exch2_isNedge(446)=1 exch2_isEedge(446)=0 exch2_isSedge(446)=0 exch2_myFace(446)=2 exch2_mydNx(446)=510 exch2_mydNy(446)=510 exch2_nNeighbours(446)=4 exch2_neighbourId(1,446)=461 exch2_iLo(1,446)=0 exch2_iHi(1,446)=35 exch2_jLo(1,446)=35 exch2_jHi(1,446)=35 exch2_opposingSend(1,446)=2 exch2_pij(1,1,446)=1 exch2_pij(2,1,446)=0 exch2_pij(3,1,446)=0 exch2_pij(4,1,446)=1 exch2_oi(1,446)=0 exch2_oj(1,446)=510 exch2_neighbourId(2,446)=431 exch2_iLo(2,446)=0 exch2_iHi(2,446)=35 exch2_jLo(2,446)=0 exch2_jHi(2,446)=0 exch2_opposingSend(2,446)=1 exch2_pij(1,2,446)=1 exch2_pij(2,2,446)=0 exch2_pij(3,2,446)=0 exch2_pij(4,2,446)=1 exch2_oi(2,446)=0 exch2_oj(2,446)=0 exch2_neighbourId(3,446)=447 exch2_iLo(3,446)=35 exch2_iHi(3,446)=35 exch2_jLo(3,446)=0 exch2_jHi(3,446)=35 exch2_opposingSend(3,446)=4 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)=445 exch2_iLo(4,446)=0 exch2_iHi(4,446)=0 exch2_jLo(4,446)=0 exch2_jHi(4,446)=35 exch2_opposingSend(4,446)=3 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 RETURN END SUBROUTINE W2_E2SETUP_447 C Topology for tile 447 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(447)=34 exch2_tNy(447)=34 exch2_tBasex(447)=374 exch2_tBasey(447)=476 exch2_txGlobalo(447)=885 exch2_tyGlobalo(447)=477 exch2_isWedge(447)=0 exch2_isNedge(447)=1 exch2_isEedge(447)=0 exch2_isSedge(447)=0 exch2_myFace(447)=2 exch2_mydNx(447)=510 exch2_mydNy(447)=510 exch2_nNeighbours(447)=4 exch2_neighbourId(1,447)=462 exch2_iLo(1,447)=0 exch2_iHi(1,447)=35 exch2_jLo(1,447)=35 exch2_jHi(1,447)=35 exch2_opposingSend(1,447)=2 exch2_pij(1,1,447)=1 exch2_pij(2,1,447)=0 exch2_pij(3,1,447)=0 exch2_pij(4,1,447)=1 exch2_oi(1,447)=0 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)=35 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)=35 exch2_opposingSend(4,447)=3 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)=34 exch2_tBasex(448)=408 exch2_tBasey(448)=476 exch2_txGlobalo(448)=919 exch2_tyGlobalo(448)=477 exch2_isWedge(448)=0 exch2_isNedge(448)=1 exch2_isEedge(448)=0 exch2_isSedge(448)=0 exch2_myFace(448)=2 exch2_mydNx(448)=510 exch2_mydNy(448)=510 exch2_nNeighbours(448)=4 exch2_neighbourId(1,448)=463 exch2_iLo(1,448)=0 exch2_iHi(1,448)=35 exch2_jLo(1,448)=35 exch2_jHi(1,448)=35 exch2_opposingSend(1,448)=2 exch2_pij(1,1,448)=1 exch2_pij(2,1,448)=0 exch2_pij(3,1,448)=0 exch2_pij(4,1,448)=1 exch2_oi(1,448)=0 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)=35 exch2_opposingSend(3,448)=4 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)=35 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)=34 exch2_tBasex(449)=442 exch2_tBasey(449)=476 exch2_txGlobalo(449)=953 exch2_tyGlobalo(449)=477 exch2_isWedge(449)=0 exch2_isNedge(449)=1 exch2_isEedge(449)=0 exch2_isSedge(449)=0 exch2_myFace(449)=2 exch2_mydNx(449)=510 exch2_mydNy(449)=510 exch2_nNeighbours(449)=4 exch2_neighbourId(1,449)=464 exch2_iLo(1,449)=0 exch2_iHi(1,449)=35 exch2_jLo(1,449)=35 exch2_jHi(1,449)=35 exch2_opposingSend(1,449)=2 exch2_pij(1,1,449)=1 exch2_pij(2,1,449)=0 exch2_pij(3,1,449)=0 exch2_pij(4,1,449)=1 exch2_oi(1,449)=0 exch2_oj(1,449)=510 exch2_neighbourId(2,449)=434 exch2_iLo(2,449)=0 exch2_iHi(2,449)=35 exch2_jLo(2,449)=0 exch2_jHi(2,449)=0 exch2_opposingSend(2,449)=1 exch2_pij(1,2,449)=1 exch2_pij(2,2,449)=0 exch2_pij(3,2,449)=0 exch2_pij(4,2,449)=1 exch2_oi(2,449)=0 exch2_oj(2,449)=0 exch2_neighbourId(3,449)=450 exch2_iLo(3,449)=35 exch2_iHi(3,449)=35 exch2_jLo(3,449)=0 exch2_jHi(3,449)=35 exch2_opposingSend(3,449)=4 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)=448 exch2_iLo(4,449)=0 exch2_iHi(4,449)=0 exch2_jLo(4,449)=0 exch2_jHi(4,449)=35 exch2_opposingSend(4,449)=3 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 RETURN END SUBROUTINE W2_E2SETUP_450 C Topology for tile 450 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(450)=34 exch2_tNy(450)=34 exch2_tBasex(450)=476 exch2_tBasey(450)=476 exch2_txGlobalo(450)=987 exch2_tyGlobalo(450)=477 exch2_isWedge(450)=0 exch2_isNedge(450)=1 exch2_isEedge(450)=1 exch2_isSedge(450)=0 exch2_myFace(450)=2 exch2_mydNx(450)=510 exch2_mydNy(450)=510 exch2_nNeighbours(450)=4 exch2_neighbourId(1,450)=465 exch2_iLo(1,450)=0 exch2_iHi(1,450)=35 exch2_jLo(1,450)=35 exch2_jHi(1,450)=35 exch2_opposingSend(1,450)=2 exch2_pij(1,1,450)=1 exch2_pij(2,1,450)=0 exch2_pij(3,1,450)=0 exch2_pij(4,1,450)=1 exch2_oi(1,450)=0 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)=676 exch2_iLo(3,450)=35 exch2_iHi(3,450)=35 exch2_jLo(3,450)=0 exch2_jHi(3,450)=35 exch2_opposingSend(3,450)=2 exch2_pij(1,3,450)=0 exch2_pij(2,3,450)=1 exch2_pij(3,3,450)=-1 exch2_pij(4,3,450)=0 exch2_oi(3,450)=510 exch2_oj(3,450)=511 exch2_neighbourId(4,450)=449 exch2_iLo(4,450)=0 exch2_iHi(4,450)=0 exch2_jLo(4,450)=0 exch2_jHi(4,450)=35 exch2_opposingSend(4,450)=3 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)=34 exch2_tBasex(451)=0 exch2_tBasey(451)=0 exch2_txGlobalo(451)=1021 exch2_tyGlobalo(451)=1 exch2_isWedge(451)=1 exch2_isNedge(451)=0 exch2_isEedge(451)=0 exch2_isSedge(451)=1 exch2_myFace(451)=3 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)=35 exch2_jHi(1,451)=35 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)=436 exch2_iLo(2,451)=0 exch2_iHi(2,451)=35 exch2_jLo(2,451)=0 exch2_jHi(2,451)=0 exch2_opposingSend(2,451)=1 exch2_pij(1,2,451)=1 exch2_pij(2,2,451)=0 exch2_pij(3,2,451)=0 exch2_pij(4,2,451)=1 exch2_oi(2,451)=0 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)=35 exch2_opposingSend(3,451)=4 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)=225 exch2_iLo(4,451)=0 exch2_iHi(4,451)=0 exch2_jLo(4,451)=0 exch2_jHi(4,451)=35 exch2_opposingSend(4,451)=1 exch2_pij(1,4,451)=0 exch2_pij(2,4,451)=1 exch2_pij(3,4,451)=-1 exch2_pij(4,4,451)=0 exch2_oi(4,451)=-510 exch2_oj(4,451)=511 RETURN END SUBROUTINE W2_E2SETUP_452 C Topology for tile 452 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(452)=34 exch2_tNy(452)=34 exch2_tBasex(452)=34 exch2_tBasey(452)=0 exch2_txGlobalo(452)=1055 exch2_tyGlobalo(452)=1 exch2_isWedge(452)=0 exch2_isNedge(452)=0 exch2_isEedge(452)=0 exch2_isSedge(452)=1 exch2_myFace(452)=3 exch2_mydNx(452)=510 exch2_mydNy(452)=510 exch2_nNeighbours(452)=4 exch2_neighbourId(1,452)=467 exch2_iLo(1,452)=0 exch2_iHi(1,452)=35 exch2_jLo(1,452)=35 exch2_jHi(1,452)=35 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)=437 exch2_iLo(2,452)=0 exch2_iHi(2,452)=35 exch2_jLo(2,452)=0 exch2_jHi(2,452)=0 exch2_opposingSend(2,452)=1 exch2_pij(1,2,452)=1 exch2_pij(2,2,452)=0 exch2_pij(3,2,452)=0 exch2_pij(4,2,452)=1 exch2_oi(2,452)=0 exch2_oj(2,452)=-510 exch2_neighbourId(3,452)=453 exch2_iLo(3,452)=35 exch2_iHi(3,452)=35 exch2_jLo(3,452)=0 exch2_jHi(3,452)=35 exch2_opposingSend(3,452)=4 exch2_pij(1,3,452)=1 exch2_pij(2,3,452)=0 exch2_pij(3,3,452)=0 exch2_pij(4,3,452)=1 exch2_oi(3,452)=0 exch2_oj(3,452)=0 exch2_neighbourId(4,452)=451 exch2_iLo(4,452)=0 exch2_iHi(4,452)=0 exch2_jLo(4,452)=0 exch2_jHi(4,452)=35 exch2_opposingSend(4,452)=3 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 RETURN END SUBROUTINE W2_E2SETUP_453 C Topology for tile 453 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(453)=34 exch2_tNy(453)=34 exch2_tBasex(453)=68 exch2_tBasey(453)=0 exch2_txGlobalo(453)=1089 exch2_tyGlobalo(453)=1 exch2_isWedge(453)=0 exch2_isNedge(453)=0 exch2_isEedge(453)=0 exch2_isSedge(453)=1 exch2_myFace(453)=3 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)=35 exch2_jHi(1,453)=35 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)=438 exch2_iLo(2,453)=0 exch2_iHi(2,453)=35 exch2_jLo(2,453)=0 exch2_jHi(2,453)=0 exch2_opposingSend(2,453)=1 exch2_pij(1,2,453)=1 exch2_pij(2,2,453)=0 exch2_pij(3,2,453)=0 exch2_pij(4,2,453)=1 exch2_oi(2,453)=0 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)=35 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)=35 exch2_opposingSend(4,453)=3 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)=34 exch2_tBasex(454)=102 exch2_tBasey(454)=0 exch2_txGlobalo(454)=1123 exch2_tyGlobalo(454)=1 exch2_isWedge(454)=0 exch2_isNedge(454)=0 exch2_isEedge(454)=0 exch2_isSedge(454)=1 exch2_myFace(454)=3 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)=35 exch2_jHi(1,454)=35 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)=439 exch2_iLo(2,454)=0 exch2_iHi(2,454)=35 exch2_jLo(2,454)=0 exch2_jHi(2,454)=0 exch2_opposingSend(2,454)=1 exch2_pij(1,2,454)=1 exch2_pij(2,2,454)=0 exch2_pij(3,2,454)=0 exch2_pij(4,2,454)=1 exch2_oi(2,454)=0 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)=35 exch2_opposingSend(3,454)=4 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)=35 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)=34 exch2_tBasex(455)=136 exch2_tBasey(455)=0 exch2_txGlobalo(455)=1157 exch2_tyGlobalo(455)=1 exch2_isWedge(455)=0 exch2_isNedge(455)=0 exch2_isEedge(455)=0 exch2_isSedge(455)=1 exch2_myFace(455)=3 exch2_mydNx(455)=510 exch2_mydNy(455)=510 exch2_nNeighbours(455)=4 exch2_neighbourId(1,455)=470 exch2_iLo(1,455)=0 exch2_iHi(1,455)=35 exch2_jLo(1,455)=35 exch2_jHi(1,455)=35 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)=440 exch2_iLo(2,455)=0 exch2_iHi(2,455)=35 exch2_jLo(2,455)=0 exch2_jHi(2,455)=0 exch2_opposingSend(2,455)=1 exch2_pij(1,2,455)=1 exch2_pij(2,2,455)=0 exch2_pij(3,2,455)=0 exch2_pij(4,2,455)=1 exch2_oi(2,455)=0 exch2_oj(2,455)=-510 exch2_neighbourId(3,455)=456 exch2_iLo(3,455)=35 exch2_iHi(3,455)=35 exch2_jLo(3,455)=0 exch2_jHi(3,455)=35 exch2_opposingSend(3,455)=4 exch2_pij(1,3,455)=1 exch2_pij(2,3,455)=0 exch2_pij(3,3,455)=0 exch2_pij(4,3,455)=1 exch2_oi(3,455)=0 exch2_oj(3,455)=0 exch2_neighbourId(4,455)=454 exch2_iLo(4,455)=0 exch2_iHi(4,455)=0 exch2_jLo(4,455)=0 exch2_jHi(4,455)=35 exch2_opposingSend(4,455)=3 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 RETURN END SUBROUTINE W2_E2SETUP_456 C Topology for tile 456 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(456)=34 exch2_tNy(456)=34 exch2_tBasex(456)=170 exch2_tBasey(456)=0 exch2_txGlobalo(456)=1191 exch2_tyGlobalo(456)=1 exch2_isWedge(456)=0 exch2_isNedge(456)=0 exch2_isEedge(456)=0 exch2_isSedge(456)=1 exch2_myFace(456)=3 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)=35 exch2_jHi(1,456)=35 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)=441 exch2_iLo(2,456)=0 exch2_iHi(2,456)=35 exch2_jLo(2,456)=0 exch2_jHi(2,456)=0 exch2_opposingSend(2,456)=1 exch2_pij(1,2,456)=1 exch2_pij(2,2,456)=0 exch2_pij(3,2,456)=0 exch2_pij(4,2,456)=1 exch2_oi(2,456)=0 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)=35 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)=35 exch2_opposingSend(4,456)=3 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)=34 exch2_tBasex(457)=204 exch2_tBasey(457)=0 exch2_txGlobalo(457)=1225 exch2_tyGlobalo(457)=1 exch2_isWedge(457)=0 exch2_isNedge(457)=0 exch2_isEedge(457)=0 exch2_isSedge(457)=1 exch2_myFace(457)=3 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)=35 exch2_jHi(1,457)=35 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)=442 exch2_iLo(2,457)=0 exch2_iHi(2,457)=35 exch2_jLo(2,457)=0 exch2_jHi(2,457)=0 exch2_opposingSend(2,457)=1 exch2_pij(1,2,457)=1 exch2_pij(2,2,457)=0 exch2_pij(3,2,457)=0 exch2_pij(4,2,457)=1 exch2_oi(2,457)=0 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)=35 exch2_opposingSend(3,457)=4 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)=35 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)=34 exch2_tBasex(458)=238 exch2_tBasey(458)=0 exch2_txGlobalo(458)=1259 exch2_tyGlobalo(458)=1 exch2_isWedge(458)=0 exch2_isNedge(458)=0 exch2_isEedge(458)=0 exch2_isSedge(458)=1 exch2_myFace(458)=3 exch2_mydNx(458)=510 exch2_mydNy(458)=510 exch2_nNeighbours(458)=4 exch2_neighbourId(1,458)=473 exch2_iLo(1,458)=0 exch2_iHi(1,458)=35 exch2_jLo(1,458)=35 exch2_jHi(1,458)=35 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)=443 exch2_iLo(2,458)=0 exch2_iHi(2,458)=35 exch2_jLo(2,458)=0 exch2_jHi(2,458)=0 exch2_opposingSend(2,458)=1 exch2_pij(1,2,458)=1 exch2_pij(2,2,458)=0 exch2_pij(3,2,458)=0 exch2_pij(4,2,458)=1 exch2_oi(2,458)=0 exch2_oj(2,458)=-510 exch2_neighbourId(3,458)=459 exch2_iLo(3,458)=35 exch2_iHi(3,458)=35 exch2_jLo(3,458)=0 exch2_jHi(3,458)=35 exch2_opposingSend(3,458)=4 exch2_pij(1,3,458)=1 exch2_pij(2,3,458)=0 exch2_pij(3,3,458)=0 exch2_pij(4,3,458)=1 exch2_oi(3,458)=0 exch2_oj(3,458)=0 exch2_neighbourId(4,458)=457 exch2_iLo(4,458)=0 exch2_iHi(4,458)=0 exch2_jLo(4,458)=0 exch2_jHi(4,458)=35 exch2_opposingSend(4,458)=3 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 RETURN END SUBROUTINE W2_E2SETUP_459 C Topology for tile 459 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(459)=34 exch2_tNy(459)=34 exch2_tBasex(459)=272 exch2_tBasey(459)=0 exch2_txGlobalo(459)=1293 exch2_tyGlobalo(459)=1 exch2_isWedge(459)=0 exch2_isNedge(459)=0 exch2_isEedge(459)=0 exch2_isSedge(459)=1 exch2_myFace(459)=3 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)=35 exch2_jHi(1,459)=35 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)=444 exch2_iLo(2,459)=0 exch2_iHi(2,459)=35 exch2_jLo(2,459)=0 exch2_jHi(2,459)=0 exch2_opposingSend(2,459)=1 exch2_pij(1,2,459)=1 exch2_pij(2,2,459)=0 exch2_pij(3,2,459)=0 exch2_pij(4,2,459)=1 exch2_oi(2,459)=0 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)=35 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)=35 exch2_opposingSend(4,459)=3 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)=34 exch2_tBasex(460)=306 exch2_tBasey(460)=0 exch2_txGlobalo(460)=1327 exch2_tyGlobalo(460)=1 exch2_isWedge(460)=0 exch2_isNedge(460)=0 exch2_isEedge(460)=0 exch2_isSedge(460)=1 exch2_myFace(460)=3 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)=35 exch2_jHi(1,460)=35 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)=445 exch2_iLo(2,460)=0 exch2_iHi(2,460)=35 exch2_jLo(2,460)=0 exch2_jHi(2,460)=0 exch2_opposingSend(2,460)=1 exch2_pij(1,2,460)=1 exch2_pij(2,2,460)=0 exch2_pij(3,2,460)=0 exch2_pij(4,2,460)=1 exch2_oi(2,460)=0 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)=35 exch2_opposingSend(3,460)=4 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)=35 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)=34 exch2_tBasex(461)=340 exch2_tBasey(461)=0 exch2_txGlobalo(461)=1361 exch2_tyGlobalo(461)=1 exch2_isWedge(461)=0 exch2_isNedge(461)=0 exch2_isEedge(461)=0 exch2_isSedge(461)=1 exch2_myFace(461)=3 exch2_mydNx(461)=510 exch2_mydNy(461)=510 exch2_nNeighbours(461)=4 exch2_neighbourId(1,461)=476 exch2_iLo(1,461)=0 exch2_iHi(1,461)=35 exch2_jLo(1,461)=35 exch2_jHi(1,461)=35 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)=446 exch2_iLo(2,461)=0 exch2_iHi(2,461)=35 exch2_jLo(2,461)=0 exch2_jHi(2,461)=0 exch2_opposingSend(2,461)=1 exch2_pij(1,2,461)=1 exch2_pij(2,2,461)=0 exch2_pij(3,2,461)=0 exch2_pij(4,2,461)=1 exch2_oi(2,461)=0 exch2_oj(2,461)=-510 exch2_neighbourId(3,461)=462 exch2_iLo(3,461)=35 exch2_iHi(3,461)=35 exch2_jLo(3,461)=0 exch2_jHi(3,461)=35 exch2_opposingSend(3,461)=4 exch2_pij(1,3,461)=1 exch2_pij(2,3,461)=0 exch2_pij(3,3,461)=0 exch2_pij(4,3,461)=1 exch2_oi(3,461)=0 exch2_oj(3,461)=0 exch2_neighbourId(4,461)=460 exch2_iLo(4,461)=0 exch2_iHi(4,461)=0 exch2_jLo(4,461)=0 exch2_jHi(4,461)=35 exch2_opposingSend(4,461)=3 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 RETURN END SUBROUTINE W2_E2SETUP_462 C Topology for tile 462 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(462)=34 exch2_tNy(462)=34 exch2_tBasex(462)=374 exch2_tBasey(462)=0 exch2_txGlobalo(462)=1395 exch2_tyGlobalo(462)=1 exch2_isWedge(462)=0 exch2_isNedge(462)=0 exch2_isEedge(462)=0 exch2_isSedge(462)=1 exch2_myFace(462)=3 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)=35 exch2_jHi(1,462)=35 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)=447 exch2_iLo(2,462)=0 exch2_iHi(2,462)=35 exch2_jLo(2,462)=0 exch2_jHi(2,462)=0 exch2_opposingSend(2,462)=1 exch2_pij(1,2,462)=1 exch2_pij(2,2,462)=0 exch2_pij(3,2,462)=0 exch2_pij(4,2,462)=1 exch2_oi(2,462)=0 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)=35 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)=35 exch2_opposingSend(4,462)=3 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)=34 exch2_tBasex(463)=408 exch2_tBasey(463)=0 exch2_txGlobalo(463)=1429 exch2_tyGlobalo(463)=1 exch2_isWedge(463)=0 exch2_isNedge(463)=0 exch2_isEedge(463)=0 exch2_isSedge(463)=1 exch2_myFace(463)=3 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)=35 exch2_jHi(1,463)=35 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)=448 exch2_iLo(2,463)=0 exch2_iHi(2,463)=35 exch2_jLo(2,463)=0 exch2_jHi(2,463)=0 exch2_opposingSend(2,463)=1 exch2_pij(1,2,463)=1 exch2_pij(2,2,463)=0 exch2_pij(3,2,463)=0 exch2_pij(4,2,463)=1 exch2_oi(2,463)=0 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)=35 exch2_opposingSend(3,463)=4 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)=35 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)=34 exch2_tBasex(464)=442 exch2_tBasey(464)=0 exch2_txGlobalo(464)=1463 exch2_tyGlobalo(464)=1 exch2_isWedge(464)=0 exch2_isNedge(464)=0 exch2_isEedge(464)=0 exch2_isSedge(464)=1 exch2_myFace(464)=3 exch2_mydNx(464)=510 exch2_mydNy(464)=510 exch2_nNeighbours(464)=4 exch2_neighbourId(1,464)=479 exch2_iLo(1,464)=0 exch2_iHi(1,464)=35 exch2_jLo(1,464)=35 exch2_jHi(1,464)=35 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)=449 exch2_iLo(2,464)=0 exch2_iHi(2,464)=35 exch2_jLo(2,464)=0 exch2_jHi(2,464)=0 exch2_opposingSend(2,464)=1 exch2_pij(1,2,464)=1 exch2_pij(2,2,464)=0 exch2_pij(3,2,464)=0 exch2_pij(4,2,464)=1 exch2_oi(2,464)=0 exch2_oj(2,464)=-510 exch2_neighbourId(3,464)=465 exch2_iLo(3,464)=35 exch2_iHi(3,464)=35 exch2_jLo(3,464)=0 exch2_jHi(3,464)=35 exch2_opposingSend(3,464)=4 exch2_pij(1,3,464)=1 exch2_pij(2,3,464)=0 exch2_pij(3,3,464)=0 exch2_pij(4,3,464)=1 exch2_oi(3,464)=0 exch2_oj(3,464)=0 exch2_neighbourId(4,464)=463 exch2_iLo(4,464)=0 exch2_iHi(4,464)=0 exch2_jLo(4,464)=0 exch2_jHi(4,464)=35 exch2_opposingSend(4,464)=3 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 RETURN END SUBROUTINE W2_E2SETUP_465 C Topology for tile 465 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(465)=34 exch2_tNy(465)=34 exch2_tBasex(465)=476 exch2_tBasey(465)=0 exch2_txGlobalo(465)=1497 exch2_tyGlobalo(465)=1 exch2_isWedge(465)=0 exch2_isNedge(465)=0 exch2_isEedge(465)=1 exch2_isSedge(465)=1 exch2_myFace(465)=3 exch2_mydNx(465)=510 exch2_mydNy(465)=510 exch2_nNeighbours(465)=4 exch2_neighbourId(1,465)=480 exch2_iLo(1,465)=0 exch2_iHi(1,465)=35 exch2_jLo(1,465)=35 exch2_jHi(1,465)=35 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)=450 exch2_iLo(2,465)=0 exch2_iHi(2,465)=35 exch2_jLo(2,465)=0 exch2_jHi(2,465)=0 exch2_opposingSend(2,465)=1 exch2_pij(1,2,465)=1 exch2_pij(2,2,465)=0 exch2_pij(3,2,465)=0 exch2_pij(4,2,465)=1 exch2_oi(2,465)=0 exch2_oj(2,465)=-510 exch2_neighbourId(3,465)=676 exch2_iLo(3,465)=35 exch2_iHi(3,465)=35 exch2_jLo(3,465)=0 exch2_jHi(3,465)=35 exch2_opposingSend(3,465)=4 exch2_pij(1,3,465)=1 exch2_pij(2,3,465)=0 exch2_pij(3,3,465)=0 exch2_pij(4,3,465)=1 exch2_oi(3,465)=510 exch2_oj(3,465)=0 exch2_neighbourId(4,465)=464 exch2_iLo(4,465)=0 exch2_iHi(4,465)=0 exch2_jLo(4,465)=0 exch2_jHi(4,465)=35 exch2_opposingSend(4,465)=3 exch2_pij(1,4,465)=1 exch2_pij(2,4,465)=0 exch2_pij(3,4,465)=0 exch2_pij(4,4,465)=1 exch2_oi(4,465)=0 exch2_oj(4,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)=34 exch2_tBasex(466)=0 exch2_tBasey(466)=34 exch2_txGlobalo(466)=1021 exch2_tyGlobalo(466)=35 exch2_isWedge(466)=1 exch2_isNedge(466)=0 exch2_isEedge(466)=0 exch2_isSedge(466)=0 exch2_myFace(466)=3 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)=35 exch2_jHi(1,466)=35 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)=35 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)=224 exch2_iLo(4,466)=0 exch2_iHi(4,466)=0 exch2_jLo(4,466)=0 exch2_jHi(4,466)=35 exch2_opposingSend(4,466)=1 exch2_pij(1,4,466)=0 exch2_pij(2,4,466)=1 exch2_pij(3,4,466)=-1 exch2_pij(4,4,466)=0 exch2_oi(4,466)=-510 exch2_oj(4,466)=511 RETURN END SUBROUTINE W2_E2SETUP_467 C Topology for tile 467 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(467)=34 exch2_tNy(467)=34 exch2_tBasex(467)=34 exch2_tBasey(467)=34 exch2_txGlobalo(467)=1055 exch2_tyGlobalo(467)=35 exch2_isWedge(467)=0 exch2_isNedge(467)=0 exch2_isEedge(467)=0 exch2_isSedge(467)=0 exch2_myFace(467)=3 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)=35 exch2_jHi(1,467)=35 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)=35 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)=35 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)=34 exch2_tBasex(468)=68 exch2_tBasey(468)=34 exch2_txGlobalo(468)=1089 exch2_tyGlobalo(468)=35 exch2_isWedge(468)=0 exch2_isNedge(468)=0 exch2_isEedge(468)=0 exch2_isSedge(468)=0 exch2_myFace(468)=3 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)=35 exch2_jHi(1,468)=35 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)=35 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)=35 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)=34 exch2_tBasex(469)=102 exch2_tBasey(469)=34 exch2_txGlobalo(469)=1123 exch2_tyGlobalo(469)=35 exch2_isWedge(469)=0 exch2_isNedge(469)=0 exch2_isEedge(469)=0 exch2_isSedge(469)=0 exch2_myFace(469)=3 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)=35 exch2_jHi(1,469)=35 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)=35 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)=35 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)=34 exch2_tBasex(470)=136 exch2_tBasey(470)=34 exch2_txGlobalo(470)=1157 exch2_tyGlobalo(470)=35 exch2_isWedge(470)=0 exch2_isNedge(470)=0 exch2_isEedge(470)=0 exch2_isSedge(470)=0 exch2_myFace(470)=3 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)=35 exch2_jHi(1,470)=35 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)=35 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)=35 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)=34 exch2_tBasex(471)=170 exch2_tBasey(471)=34 exch2_txGlobalo(471)=1191 exch2_tyGlobalo(471)=35 exch2_isWedge(471)=0 exch2_isNedge(471)=0 exch2_isEedge(471)=0 exch2_isSedge(471)=0 exch2_myFace(471)=3 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)=35 exch2_jHi(1,471)=35 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)=35 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)=35 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)=34 exch2_tBasex(472)=204 exch2_tBasey(472)=34 exch2_txGlobalo(472)=1225 exch2_tyGlobalo(472)=35 exch2_isWedge(472)=0 exch2_isNedge(472)=0 exch2_isEedge(472)=0 exch2_isSedge(472)=0 exch2_myFace(472)=3 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)=35 exch2_jHi(1,472)=35 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)=35 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)=35 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)=34 exch2_tBasex(473)=238 exch2_tBasey(473)=34 exch2_txGlobalo(473)=1259 exch2_tyGlobalo(473)=35 exch2_isWedge(473)=0 exch2_isNedge(473)=0 exch2_isEedge(473)=0 exch2_isSedge(473)=0 exch2_myFace(473)=3 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)=35 exch2_jHi(1,473)=35 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)=35 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)=35 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)=34 exch2_tBasex(474)=272 exch2_tBasey(474)=34 exch2_txGlobalo(474)=1293 exch2_tyGlobalo(474)=35 exch2_isWedge(474)=0 exch2_isNedge(474)=0 exch2_isEedge(474)=0 exch2_isSedge(474)=0 exch2_myFace(474)=3 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)=35 exch2_jHi(1,474)=35 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)=35 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)=35 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)=34 exch2_tBasex(475)=306 exch2_tBasey(475)=34 exch2_txGlobalo(475)=1327 exch2_tyGlobalo(475)=35 exch2_isWedge(475)=0 exch2_isNedge(475)=0 exch2_isEedge(475)=0 exch2_isSedge(475)=0 exch2_myFace(475)=3 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)=35 exch2_jHi(1,475)=35 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)=35 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)=35 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)=34 exch2_tBasex(476)=340 exch2_tBasey(476)=34 exch2_txGlobalo(476)=1361 exch2_tyGlobalo(476)=35 exch2_isWedge(476)=0 exch2_isNedge(476)=0 exch2_isEedge(476)=0 exch2_isSedge(476)=0 exch2_myFace(476)=3 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)=35 exch2_jHi(1,476)=35 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)=35 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)=35 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)=34 exch2_tBasex(477)=374 exch2_tBasey(477)=34 exch2_txGlobalo(477)=1395 exch2_tyGlobalo(477)=35 exch2_isWedge(477)=0 exch2_isNedge(477)=0 exch2_isEedge(477)=0 exch2_isSedge(477)=0 exch2_myFace(477)=3 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)=35 exch2_jHi(1,477)=35 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)=35 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)=35 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)=34 exch2_tBasex(478)=408 exch2_tBasey(478)=34 exch2_txGlobalo(478)=1429 exch2_tyGlobalo(478)=35 exch2_isWedge(478)=0 exch2_isNedge(478)=0 exch2_isEedge(478)=0 exch2_isSedge(478)=0 exch2_myFace(478)=3 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)=35 exch2_jHi(1,478)=35 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)=35 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)=35 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)=34 exch2_tBasex(479)=442 exch2_tBasey(479)=34 exch2_txGlobalo(479)=1463 exch2_tyGlobalo(479)=35 exch2_isWedge(479)=0 exch2_isNedge(479)=0 exch2_isEedge(479)=0 exch2_isSedge(479)=0 exch2_myFace(479)=3 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)=35 exch2_jHi(1,479)=35 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)=35 exch2_opposingSend(3,479)=4 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)=35 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)=34 exch2_tBasex(480)=476 exch2_tBasey(480)=34 exch2_txGlobalo(480)=1497 exch2_tyGlobalo(480)=35 exch2_isWedge(480)=0 exch2_isNedge(480)=0 exch2_isEedge(480)=1 exch2_isSedge(480)=0 exch2_myFace(480)=3 exch2_mydNx(480)=510 exch2_mydNy(480)=510 exch2_nNeighbours(480)=4 exch2_neighbourId(1,480)=495 exch2_iLo(1,480)=0 exch2_iHi(1,480)=35 exch2_jLo(1,480)=35 exch2_jHi(1,480)=35 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)=691 exch2_iLo(3,480)=35 exch2_iHi(3,480)=35 exch2_jLo(3,480)=0 exch2_jHi(3,480)=35 exch2_opposingSend(3,480)=4 exch2_pij(1,3,480)=1 exch2_pij(2,3,480)=0 exch2_pij(3,3,480)=0 exch2_pij(4,3,480)=1 exch2_oi(3,480)=510 exch2_oj(3,480)=0 exch2_neighbourId(4,480)=479 exch2_iLo(4,480)=0 exch2_iHi(4,480)=0 exch2_jLo(4,480)=0 exch2_jHi(4,480)=35 exch2_opposingSend(4,480)=3 exch2_pij(1,4,480)=1 exch2_pij(2,4,480)=0 exch2_pij(3,4,480)=0 exch2_pij(4,4,480)=1 exch2_oi(4,480)=0 exch2_oj(4,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)=34 exch2_tBasex(481)=0 exch2_tBasey(481)=68 exch2_txGlobalo(481)=1021 exch2_tyGlobalo(481)=69 exch2_isWedge(481)=1 exch2_isNedge(481)=0 exch2_isEedge(481)=0 exch2_isSedge(481)=0 exch2_myFace(481)=3 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)=35 exch2_jHi(1,481)=35 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)=35 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)=223 exch2_iLo(4,481)=0 exch2_iHi(4,481)=0 exch2_jLo(4,481)=0 exch2_jHi(4,481)=35 exch2_opposingSend(4,481)=1 exch2_pij(1,4,481)=0 exch2_pij(2,4,481)=1 exch2_pij(3,4,481)=-1 exch2_pij(4,4,481)=0 exch2_oi(4,481)=-510 exch2_oj(4,481)=511 RETURN END SUBROUTINE W2_E2SETUP_482 C Topology for tile 482 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(482)=34 exch2_tNy(482)=34 exch2_tBasex(482)=34 exch2_tBasey(482)=68 exch2_txGlobalo(482)=1055 exch2_tyGlobalo(482)=69 exch2_isWedge(482)=0 exch2_isNedge(482)=0 exch2_isEedge(482)=0 exch2_isSedge(482)=0 exch2_myFace(482)=3 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)=35 exch2_jHi(1,482)=35 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)=35 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)=35 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)=34 exch2_tBasex(483)=68 exch2_tBasey(483)=68 exch2_txGlobalo(483)=1089 exch2_tyGlobalo(483)=69 exch2_isWedge(483)=0 exch2_isNedge(483)=0 exch2_isEedge(483)=0 exch2_isSedge(483)=0 exch2_myFace(483)=3 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)=35 exch2_jHi(1,483)=35 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)=35 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)=35 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)=34 exch2_tBasex(484)=102 exch2_tBasey(484)=68 exch2_txGlobalo(484)=1123 exch2_tyGlobalo(484)=69 exch2_isWedge(484)=0 exch2_isNedge(484)=0 exch2_isEedge(484)=0 exch2_isSedge(484)=0 exch2_myFace(484)=3 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)=35 exch2_jHi(1,484)=35 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)=35 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)=35 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)=34 exch2_tBasex(485)=136 exch2_tBasey(485)=68 exch2_txGlobalo(485)=1157 exch2_tyGlobalo(485)=69 exch2_isWedge(485)=0 exch2_isNedge(485)=0 exch2_isEedge(485)=0 exch2_isSedge(485)=0 exch2_myFace(485)=3 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)=35 exch2_jHi(1,485)=35 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)=35 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)=35 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)=34 exch2_tBasex(486)=170 exch2_tBasey(486)=68 exch2_txGlobalo(486)=1191 exch2_tyGlobalo(486)=69 exch2_isWedge(486)=0 exch2_isNedge(486)=0 exch2_isEedge(486)=0 exch2_isSedge(486)=0 exch2_myFace(486)=3 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)=35 exch2_jHi(1,486)=35 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)=35 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)=35 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)=34 exch2_tBasex(487)=204 exch2_tBasey(487)=68 exch2_txGlobalo(487)=1225 exch2_tyGlobalo(487)=69 exch2_isWedge(487)=0 exch2_isNedge(487)=0 exch2_isEedge(487)=0 exch2_isSedge(487)=0 exch2_myFace(487)=3 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)=35 exch2_jHi(1,487)=35 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)=35 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)=35 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)=34 exch2_tBasex(488)=238 exch2_tBasey(488)=68 exch2_txGlobalo(488)=1259 exch2_tyGlobalo(488)=69 exch2_isWedge(488)=0 exch2_isNedge(488)=0 exch2_isEedge(488)=0 exch2_isSedge(488)=0 exch2_myFace(488)=3 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)=35 exch2_jHi(1,488)=35 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)=35 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)=35 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)=34 exch2_tBasex(489)=272 exch2_tBasey(489)=68 exch2_txGlobalo(489)=1293 exch2_tyGlobalo(489)=69 exch2_isWedge(489)=0 exch2_isNedge(489)=0 exch2_isEedge(489)=0 exch2_isSedge(489)=0 exch2_myFace(489)=3 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)=35 exch2_jHi(1,489)=35 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)=35 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)=35 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)=34 exch2_tBasex(490)=306 exch2_tBasey(490)=68 exch2_txGlobalo(490)=1327 exch2_tyGlobalo(490)=69 exch2_isWedge(490)=0 exch2_isNedge(490)=0 exch2_isEedge(490)=0 exch2_isSedge(490)=0 exch2_myFace(490)=3 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)=35 exch2_jHi(1,490)=35 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)=35 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)=35 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)=34 exch2_tBasex(491)=340 exch2_tBasey(491)=68 exch2_txGlobalo(491)=1361 exch2_tyGlobalo(491)=69 exch2_isWedge(491)=0 exch2_isNedge(491)=0 exch2_isEedge(491)=0 exch2_isSedge(491)=0 exch2_myFace(491)=3 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)=35 exch2_jHi(1,491)=35 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)=35 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)=35 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)=34 exch2_tBasex(492)=374 exch2_tBasey(492)=68 exch2_txGlobalo(492)=1395 exch2_tyGlobalo(492)=69 exch2_isWedge(492)=0 exch2_isNedge(492)=0 exch2_isEedge(492)=0 exch2_isSedge(492)=0 exch2_myFace(492)=3 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)=35 exch2_jHi(1,492)=35 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)=35 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)=35 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)=34 exch2_tBasex(493)=408 exch2_tBasey(493)=68 exch2_txGlobalo(493)=1429 exch2_tyGlobalo(493)=69 exch2_isWedge(493)=0 exch2_isNedge(493)=0 exch2_isEedge(493)=0 exch2_isSedge(493)=0 exch2_myFace(493)=3 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)=35 exch2_jHi(1,493)=35 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)=35 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)=35 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)=34 exch2_tBasex(494)=442 exch2_tBasey(494)=68 exch2_txGlobalo(494)=1463 exch2_tyGlobalo(494)=69 exch2_isWedge(494)=0 exch2_isNedge(494)=0 exch2_isEedge(494)=0 exch2_isSedge(494)=0 exch2_myFace(494)=3 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)=35 exch2_jHi(1,494)=35 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)=35 exch2_opposingSend(3,494)=4 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)=35 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)=34 exch2_tBasex(495)=476 exch2_tBasey(495)=68 exch2_txGlobalo(495)=1497 exch2_tyGlobalo(495)=69 exch2_isWedge(495)=0 exch2_isNedge(495)=0 exch2_isEedge(495)=1 exch2_isSedge(495)=0 exch2_myFace(495)=3 exch2_mydNx(495)=510 exch2_mydNy(495)=510 exch2_nNeighbours(495)=4 exch2_neighbourId(1,495)=510 exch2_iLo(1,495)=0 exch2_iHi(1,495)=35 exch2_jLo(1,495)=35 exch2_jHi(1,495)=35 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)=706 exch2_iLo(3,495)=35 exch2_iHi(3,495)=35 exch2_jLo(3,495)=0 exch2_jHi(3,495)=35 exch2_opposingSend(3,495)=4 exch2_pij(1,3,495)=1 exch2_pij(2,3,495)=0 exch2_pij(3,3,495)=0 exch2_pij(4,3,495)=1 exch2_oi(3,495)=510 exch2_oj(3,495)=0 exch2_neighbourId(4,495)=494 exch2_iLo(4,495)=0 exch2_iHi(4,495)=0 exch2_jLo(4,495)=0 exch2_jHi(4,495)=35 exch2_opposingSend(4,495)=3 exch2_pij(1,4,495)=1 exch2_pij(2,4,495)=0 exch2_pij(3,4,495)=0 exch2_pij(4,4,495)=1 exch2_oi(4,495)=0 exch2_oj(4,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)=34 exch2_tBasex(496)=0 exch2_tBasey(496)=102 exch2_txGlobalo(496)=1021 exch2_tyGlobalo(496)=103 exch2_isWedge(496)=1 exch2_isNedge(496)=0 exch2_isEedge(496)=0 exch2_isSedge(496)=0 exch2_myFace(496)=3 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)=35 exch2_jHi(1,496)=35 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)=35 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)=222 exch2_iLo(4,496)=0 exch2_iHi(4,496)=0 exch2_jLo(4,496)=0 exch2_jHi(4,496)=35 exch2_opposingSend(4,496)=1 exch2_pij(1,4,496)=0 exch2_pij(2,4,496)=1 exch2_pij(3,4,496)=-1 exch2_pij(4,4,496)=0 exch2_oi(4,496)=-510 exch2_oj(4,496)=511 RETURN END SUBROUTINE W2_E2SETUP_497 C Topology for tile 497 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(497)=34 exch2_tNy(497)=34 exch2_tBasex(497)=34 exch2_tBasey(497)=102 exch2_txGlobalo(497)=1055 exch2_tyGlobalo(497)=103 exch2_isWedge(497)=0 exch2_isNedge(497)=0 exch2_isEedge(497)=0 exch2_isSedge(497)=0 exch2_myFace(497)=3 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)=35 exch2_jHi(1,497)=35 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)=35 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)=35 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)=34 exch2_tBasex(498)=68 exch2_tBasey(498)=102 exch2_txGlobalo(498)=1089 exch2_tyGlobalo(498)=103 exch2_isWedge(498)=0 exch2_isNedge(498)=0 exch2_isEedge(498)=0 exch2_isSedge(498)=0 exch2_myFace(498)=3 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)=35 exch2_jHi(1,498)=35 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)=35 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)=35 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)=34 exch2_tBasex(499)=102 exch2_tBasey(499)=102 exch2_txGlobalo(499)=1123 exch2_tyGlobalo(499)=103 exch2_isWedge(499)=0 exch2_isNedge(499)=0 exch2_isEedge(499)=0 exch2_isSedge(499)=0 exch2_myFace(499)=3 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)=35 exch2_jHi(1,499)=35 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)=35 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)=35 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)=34 exch2_tBasex(500)=136 exch2_tBasey(500)=102 exch2_txGlobalo(500)=1157 exch2_tyGlobalo(500)=103 exch2_isWedge(500)=0 exch2_isNedge(500)=0 exch2_isEedge(500)=0 exch2_isSedge(500)=0 exch2_myFace(500)=3 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)=35 exch2_jHi(1,500)=35 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)=35 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)=35 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)=34 exch2_tBasex(501)=170 exch2_tBasey(501)=102 exch2_txGlobalo(501)=1191 exch2_tyGlobalo(501)=103 exch2_isWedge(501)=0 exch2_isNedge(501)=0 exch2_isEedge(501)=0 exch2_isSedge(501)=0 exch2_myFace(501)=3 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)=35 exch2_jHi(1,501)=35 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)=35 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)=35 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)=34 exch2_tBasex(502)=204 exch2_tBasey(502)=102 exch2_txGlobalo(502)=1225 exch2_tyGlobalo(502)=103 exch2_isWedge(502)=0 exch2_isNedge(502)=0 exch2_isEedge(502)=0 exch2_isSedge(502)=0 exch2_myFace(502)=3 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)=35 exch2_jHi(1,502)=35 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)=35 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)=35 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)=34 exch2_tBasex(503)=238 exch2_tBasey(503)=102 exch2_txGlobalo(503)=1259 exch2_tyGlobalo(503)=103 exch2_isWedge(503)=0 exch2_isNedge(503)=0 exch2_isEedge(503)=0 exch2_isSedge(503)=0 exch2_myFace(503)=3 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)=35 exch2_jHi(1,503)=35 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)=35 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)=35 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)=34 exch2_tBasex(504)=272 exch2_tBasey(504)=102 exch2_txGlobalo(504)=1293 exch2_tyGlobalo(504)=103 exch2_isWedge(504)=0 exch2_isNedge(504)=0 exch2_isEedge(504)=0 exch2_isSedge(504)=0 exch2_myFace(504)=3 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)=35 exch2_jHi(1,504)=35 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)=35 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)=35 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)=34 exch2_tBasex(505)=306 exch2_tBasey(505)=102 exch2_txGlobalo(505)=1327 exch2_tyGlobalo(505)=103 exch2_isWedge(505)=0 exch2_isNedge(505)=0 exch2_isEedge(505)=0 exch2_isSedge(505)=0 exch2_myFace(505)=3 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)=35 exch2_jHi(1,505)=35 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)=35 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)=35 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)=34 exch2_tBasex(506)=340 exch2_tBasey(506)=102 exch2_txGlobalo(506)=1361 exch2_tyGlobalo(506)=103 exch2_isWedge(506)=0 exch2_isNedge(506)=0 exch2_isEedge(506)=0 exch2_isSedge(506)=0 exch2_myFace(506)=3 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)=35 exch2_jHi(1,506)=35 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)=35 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)=35 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)=34 exch2_tBasex(507)=374 exch2_tBasey(507)=102 exch2_txGlobalo(507)=1395 exch2_tyGlobalo(507)=103 exch2_isWedge(507)=0 exch2_isNedge(507)=0 exch2_isEedge(507)=0 exch2_isSedge(507)=0 exch2_myFace(507)=3 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)=35 exch2_jHi(1,507)=35 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)=35 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)=35 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)=34 exch2_tBasex(508)=408 exch2_tBasey(508)=102 exch2_txGlobalo(508)=1429 exch2_tyGlobalo(508)=103 exch2_isWedge(508)=0 exch2_isNedge(508)=0 exch2_isEedge(508)=0 exch2_isSedge(508)=0 exch2_myFace(508)=3 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)=35 exch2_jHi(1,508)=35 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)=35 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)=35 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)=34 exch2_tBasex(509)=442 exch2_tBasey(509)=102 exch2_txGlobalo(509)=1463 exch2_tyGlobalo(509)=103 exch2_isWedge(509)=0 exch2_isNedge(509)=0 exch2_isEedge(509)=0 exch2_isSedge(509)=0 exch2_myFace(509)=3 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)=35 exch2_jHi(1,509)=35 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)=35 exch2_opposingSend(3,509)=4 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)=35 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)=34 exch2_tBasex(510)=476 exch2_tBasey(510)=102 exch2_txGlobalo(510)=1497 exch2_tyGlobalo(510)=103 exch2_isWedge(510)=0 exch2_isNedge(510)=0 exch2_isEedge(510)=1 exch2_isSedge(510)=0 exch2_myFace(510)=3 exch2_mydNx(510)=510 exch2_mydNy(510)=510 exch2_nNeighbours(510)=4 exch2_neighbourId(1,510)=525 exch2_iLo(1,510)=0 exch2_iHi(1,510)=35 exch2_jLo(1,510)=35 exch2_jHi(1,510)=35 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)=721 exch2_iLo(3,510)=35 exch2_iHi(3,510)=35 exch2_jLo(3,510)=0 exch2_jHi(3,510)=35 exch2_opposingSend(3,510)=4 exch2_pij(1,3,510)=1 exch2_pij(2,3,510)=0 exch2_pij(3,3,510)=0 exch2_pij(4,3,510)=1 exch2_oi(3,510)=510 exch2_oj(3,510)=0 exch2_neighbourId(4,510)=509 exch2_iLo(4,510)=0 exch2_iHi(4,510)=0 exch2_jLo(4,510)=0 exch2_jHi(4,510)=35 exch2_opposingSend(4,510)=3 exch2_pij(1,4,510)=1 exch2_pij(2,4,510)=0 exch2_pij(3,4,510)=0 exch2_pij(4,4,510)=1 exch2_oi(4,510)=0 exch2_oj(4,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)=34 exch2_tBasex(511)=0 exch2_tBasey(511)=136 exch2_txGlobalo(511)=1021 exch2_tyGlobalo(511)=137 exch2_isWedge(511)=1 exch2_isNedge(511)=0 exch2_isEedge(511)=0 exch2_isSedge(511)=0 exch2_myFace(511)=3 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)=35 exch2_jHi(1,511)=35 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)=35 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)=221 exch2_iLo(4,511)=0 exch2_iHi(4,511)=0 exch2_jLo(4,511)=0 exch2_jHi(4,511)=35 exch2_opposingSend(4,511)=1 exch2_pij(1,4,511)=0 exch2_pij(2,4,511)=1 exch2_pij(3,4,511)=-1 exch2_pij(4,4,511)=0 exch2_oi(4,511)=-510 exch2_oj(4,511)=511 RETURN END SUBROUTINE W2_E2SETUP_512 C Topology for tile 512 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(512)=34 exch2_tNy(512)=34 exch2_tBasex(512)=34 exch2_tBasey(512)=136 exch2_txGlobalo(512)=1055 exch2_tyGlobalo(512)=137 exch2_isWedge(512)=0 exch2_isNedge(512)=0 exch2_isEedge(512)=0 exch2_isSedge(512)=0 exch2_myFace(512)=3 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)=35 exch2_jHi(1,512)=35 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)=35 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)=35 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)=34 exch2_tBasex(513)=68 exch2_tBasey(513)=136 exch2_txGlobalo(513)=1089 exch2_tyGlobalo(513)=137 exch2_isWedge(513)=0 exch2_isNedge(513)=0 exch2_isEedge(513)=0 exch2_isSedge(513)=0 exch2_myFace(513)=3 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)=35 exch2_jHi(1,513)=35 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)=35 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)=35 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)=34 exch2_tBasex(514)=102 exch2_tBasey(514)=136 exch2_txGlobalo(514)=1123 exch2_tyGlobalo(514)=137 exch2_isWedge(514)=0 exch2_isNedge(514)=0 exch2_isEedge(514)=0 exch2_isSedge(514)=0 exch2_myFace(514)=3 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)=35 exch2_jHi(1,514)=35 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)=35 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)=35 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)=34 exch2_tBasex(515)=136 exch2_tBasey(515)=136 exch2_txGlobalo(515)=1157 exch2_tyGlobalo(515)=137 exch2_isWedge(515)=0 exch2_isNedge(515)=0 exch2_isEedge(515)=0 exch2_isSedge(515)=0 exch2_myFace(515)=3 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)=35 exch2_jHi(1,515)=35 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)=35 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)=35 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)=34 exch2_tBasex(516)=170 exch2_tBasey(516)=136 exch2_txGlobalo(516)=1191 exch2_tyGlobalo(516)=137 exch2_isWedge(516)=0 exch2_isNedge(516)=0 exch2_isEedge(516)=0 exch2_isSedge(516)=0 exch2_myFace(516)=3 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)=35 exch2_jHi(1,516)=35 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)=35 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)=35 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)=34 exch2_tBasex(517)=204 exch2_tBasey(517)=136 exch2_txGlobalo(517)=1225 exch2_tyGlobalo(517)=137 exch2_isWedge(517)=0 exch2_isNedge(517)=0 exch2_isEedge(517)=0 exch2_isSedge(517)=0 exch2_myFace(517)=3 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)=35 exch2_jHi(1,517)=35 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)=35 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)=35 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)=34 exch2_tBasex(518)=238 exch2_tBasey(518)=136 exch2_txGlobalo(518)=1259 exch2_tyGlobalo(518)=137 exch2_isWedge(518)=0 exch2_isNedge(518)=0 exch2_isEedge(518)=0 exch2_isSedge(518)=0 exch2_myFace(518)=3 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)=35 exch2_jHi(1,518)=35 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)=35 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)=35 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)=34 exch2_tBasex(519)=272 exch2_tBasey(519)=136 exch2_txGlobalo(519)=1293 exch2_tyGlobalo(519)=137 exch2_isWedge(519)=0 exch2_isNedge(519)=0 exch2_isEedge(519)=0 exch2_isSedge(519)=0 exch2_myFace(519)=3 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)=35 exch2_jHi(1,519)=35 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)=35 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)=35 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)=34 exch2_tBasex(520)=306 exch2_tBasey(520)=136 exch2_txGlobalo(520)=1327 exch2_tyGlobalo(520)=137 exch2_isWedge(520)=0 exch2_isNedge(520)=0 exch2_isEedge(520)=0 exch2_isSedge(520)=0 exch2_myFace(520)=3 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)=35 exch2_jHi(1,520)=35 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)=35 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)=35 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)=34 exch2_tBasex(521)=340 exch2_tBasey(521)=136 exch2_txGlobalo(521)=1361 exch2_tyGlobalo(521)=137 exch2_isWedge(521)=0 exch2_isNedge(521)=0 exch2_isEedge(521)=0 exch2_isSedge(521)=0 exch2_myFace(521)=3 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)=35 exch2_jHi(1,521)=35 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)=35 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)=35 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)=34 exch2_tBasex(522)=374 exch2_tBasey(522)=136 exch2_txGlobalo(522)=1395 exch2_tyGlobalo(522)=137 exch2_isWedge(522)=0 exch2_isNedge(522)=0 exch2_isEedge(522)=0 exch2_isSedge(522)=0 exch2_myFace(522)=3 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)=35 exch2_jHi(1,522)=35 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)=35 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)=35 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)=34 exch2_tBasex(523)=408 exch2_tBasey(523)=136 exch2_txGlobalo(523)=1429 exch2_tyGlobalo(523)=137 exch2_isWedge(523)=0 exch2_isNedge(523)=0 exch2_isEedge(523)=0 exch2_isSedge(523)=0 exch2_myFace(523)=3 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)=35 exch2_jHi(1,523)=35 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)=35 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)=35 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)=34 exch2_tBasex(524)=442 exch2_tBasey(524)=136 exch2_txGlobalo(524)=1463 exch2_tyGlobalo(524)=137 exch2_isWedge(524)=0 exch2_isNedge(524)=0 exch2_isEedge(524)=0 exch2_isSedge(524)=0 exch2_myFace(524)=3 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)=35 exch2_jHi(1,524)=35 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)=35 exch2_opposingSend(3,524)=4 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)=35 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)=34 exch2_tBasex(525)=476 exch2_tBasey(525)=136 exch2_txGlobalo(525)=1497 exch2_tyGlobalo(525)=137 exch2_isWedge(525)=0 exch2_isNedge(525)=0 exch2_isEedge(525)=1 exch2_isSedge(525)=0 exch2_myFace(525)=3 exch2_mydNx(525)=510 exch2_mydNy(525)=510 exch2_nNeighbours(525)=4 exch2_neighbourId(1,525)=540 exch2_iLo(1,525)=0 exch2_iHi(1,525)=35 exch2_jLo(1,525)=35 exch2_jHi(1,525)=35 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)=736 exch2_iLo(3,525)=35 exch2_iHi(3,525)=35 exch2_jLo(3,525)=0 exch2_jHi(3,525)=35 exch2_opposingSend(3,525)=4 exch2_pij(1,3,525)=1 exch2_pij(2,3,525)=0 exch2_pij(3,3,525)=0 exch2_pij(4,3,525)=1 exch2_oi(3,525)=510 exch2_oj(3,525)=0 exch2_neighbourId(4,525)=524 exch2_iLo(4,525)=0 exch2_iHi(4,525)=0 exch2_jLo(4,525)=0 exch2_jHi(4,525)=35 exch2_opposingSend(4,525)=3 exch2_pij(1,4,525)=1 exch2_pij(2,4,525)=0 exch2_pij(3,4,525)=0 exch2_pij(4,4,525)=1 exch2_oi(4,525)=0 exch2_oj(4,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)=34 exch2_tBasex(526)=0 exch2_tBasey(526)=170 exch2_txGlobalo(526)=1021 exch2_tyGlobalo(526)=171 exch2_isWedge(526)=1 exch2_isNedge(526)=0 exch2_isEedge(526)=0 exch2_isSedge(526)=0 exch2_myFace(526)=3 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)=35 exch2_jHi(1,526)=35 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)=35 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)=220 exch2_iLo(4,526)=0 exch2_iHi(4,526)=0 exch2_jLo(4,526)=0 exch2_jHi(4,526)=35 exch2_opposingSend(4,526)=1 exch2_pij(1,4,526)=0 exch2_pij(2,4,526)=1 exch2_pij(3,4,526)=-1 exch2_pij(4,4,526)=0 exch2_oi(4,526)=-510 exch2_oj(4,526)=511 RETURN END SUBROUTINE W2_E2SETUP_527 C Topology for tile 527 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(527)=34 exch2_tNy(527)=34 exch2_tBasex(527)=34 exch2_tBasey(527)=170 exch2_txGlobalo(527)=1055 exch2_tyGlobalo(527)=171 exch2_isWedge(527)=0 exch2_isNedge(527)=0 exch2_isEedge(527)=0 exch2_isSedge(527)=0 exch2_myFace(527)=3 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)=35 exch2_jHi(1,527)=35 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)=35 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)=35 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)=34 exch2_tBasex(528)=68 exch2_tBasey(528)=170 exch2_txGlobalo(528)=1089 exch2_tyGlobalo(528)=171 exch2_isWedge(528)=0 exch2_isNedge(528)=0 exch2_isEedge(528)=0 exch2_isSedge(528)=0 exch2_myFace(528)=3 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)=35 exch2_jHi(1,528)=35 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)=35 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)=35 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)=34 exch2_tBasex(529)=102 exch2_tBasey(529)=170 exch2_txGlobalo(529)=1123 exch2_tyGlobalo(529)=171 exch2_isWedge(529)=0 exch2_isNedge(529)=0 exch2_isEedge(529)=0 exch2_isSedge(529)=0 exch2_myFace(529)=3 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)=35 exch2_jHi(1,529)=35 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)=35 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)=35 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)=34 exch2_tBasex(530)=136 exch2_tBasey(530)=170 exch2_txGlobalo(530)=1157 exch2_tyGlobalo(530)=171 exch2_isWedge(530)=0 exch2_isNedge(530)=0 exch2_isEedge(530)=0 exch2_isSedge(530)=0 exch2_myFace(530)=3 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)=35 exch2_jHi(1,530)=35 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)=35 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)=35 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)=34 exch2_tBasex(531)=170 exch2_tBasey(531)=170 exch2_txGlobalo(531)=1191 exch2_tyGlobalo(531)=171 exch2_isWedge(531)=0 exch2_isNedge(531)=0 exch2_isEedge(531)=0 exch2_isSedge(531)=0 exch2_myFace(531)=3 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)=35 exch2_jHi(1,531)=35 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)=35 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)=35 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)=34 exch2_tBasex(532)=204 exch2_tBasey(532)=170 exch2_txGlobalo(532)=1225 exch2_tyGlobalo(532)=171 exch2_isWedge(532)=0 exch2_isNedge(532)=0 exch2_isEedge(532)=0 exch2_isSedge(532)=0 exch2_myFace(532)=3 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)=35 exch2_jHi(1,532)=35 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)=35 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)=35 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)=34 exch2_tBasex(533)=238 exch2_tBasey(533)=170 exch2_txGlobalo(533)=1259 exch2_tyGlobalo(533)=171 exch2_isWedge(533)=0 exch2_isNedge(533)=0 exch2_isEedge(533)=0 exch2_isSedge(533)=0 exch2_myFace(533)=3 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)=35 exch2_jHi(1,533)=35 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)=35 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)=35 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)=34 exch2_tBasex(534)=272 exch2_tBasey(534)=170 exch2_txGlobalo(534)=1293 exch2_tyGlobalo(534)=171 exch2_isWedge(534)=0 exch2_isNedge(534)=0 exch2_isEedge(534)=0 exch2_isSedge(534)=0 exch2_myFace(534)=3 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)=35 exch2_jHi(1,534)=35 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)=35 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)=35 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)=34 exch2_tBasex(535)=306 exch2_tBasey(535)=170 exch2_txGlobalo(535)=1327 exch2_tyGlobalo(535)=171 exch2_isWedge(535)=0 exch2_isNedge(535)=0 exch2_isEedge(535)=0 exch2_isSedge(535)=0 exch2_myFace(535)=3 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)=35 exch2_jHi(1,535)=35 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)=35 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)=35 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)=34 exch2_tBasex(536)=340 exch2_tBasey(536)=170 exch2_txGlobalo(536)=1361 exch2_tyGlobalo(536)=171 exch2_isWedge(536)=0 exch2_isNedge(536)=0 exch2_isEedge(536)=0 exch2_isSedge(536)=0 exch2_myFace(536)=3 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)=35 exch2_jHi(1,536)=35 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)=35 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)=35 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)=34 exch2_tBasex(537)=374 exch2_tBasey(537)=170 exch2_txGlobalo(537)=1395 exch2_tyGlobalo(537)=171 exch2_isWedge(537)=0 exch2_isNedge(537)=0 exch2_isEedge(537)=0 exch2_isSedge(537)=0 exch2_myFace(537)=3 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)=35 exch2_jHi(1,537)=35 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)=35 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)=35 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)=34 exch2_tBasex(538)=408 exch2_tBasey(538)=170 exch2_txGlobalo(538)=1429 exch2_tyGlobalo(538)=171 exch2_isWedge(538)=0 exch2_isNedge(538)=0 exch2_isEedge(538)=0 exch2_isSedge(538)=0 exch2_myFace(538)=3 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)=35 exch2_jHi(1,538)=35 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)=35 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)=35 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)=34 exch2_tBasex(539)=442 exch2_tBasey(539)=170 exch2_txGlobalo(539)=1463 exch2_tyGlobalo(539)=171 exch2_isWedge(539)=0 exch2_isNedge(539)=0 exch2_isEedge(539)=0 exch2_isSedge(539)=0 exch2_myFace(539)=3 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)=35 exch2_jHi(1,539)=35 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)=35 exch2_opposingSend(3,539)=4 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)=35 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)=34 exch2_tBasex(540)=476 exch2_tBasey(540)=170 exch2_txGlobalo(540)=1497 exch2_tyGlobalo(540)=171 exch2_isWedge(540)=0 exch2_isNedge(540)=0 exch2_isEedge(540)=1 exch2_isSedge(540)=0 exch2_myFace(540)=3 exch2_mydNx(540)=510 exch2_mydNy(540)=510 exch2_nNeighbours(540)=4 exch2_neighbourId(1,540)=555 exch2_iLo(1,540)=0 exch2_iHi(1,540)=35 exch2_jLo(1,540)=35 exch2_jHi(1,540)=35 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)=751 exch2_iLo(3,540)=35 exch2_iHi(3,540)=35 exch2_jLo(3,540)=0 exch2_jHi(3,540)=35 exch2_opposingSend(3,540)=4 exch2_pij(1,3,540)=1 exch2_pij(2,3,540)=0 exch2_pij(3,3,540)=0 exch2_pij(4,3,540)=1 exch2_oi(3,540)=510 exch2_oj(3,540)=0 exch2_neighbourId(4,540)=539 exch2_iLo(4,540)=0 exch2_iHi(4,540)=0 exch2_jLo(4,540)=0 exch2_jHi(4,540)=35 exch2_opposingSend(4,540)=3 exch2_pij(1,4,540)=1 exch2_pij(2,4,540)=0 exch2_pij(3,4,540)=0 exch2_pij(4,4,540)=1 exch2_oi(4,540)=0 exch2_oj(4,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)=34 exch2_tBasex(541)=0 exch2_tBasey(541)=204 exch2_txGlobalo(541)=1021 exch2_tyGlobalo(541)=205 exch2_isWedge(541)=1 exch2_isNedge(541)=0 exch2_isEedge(541)=0 exch2_isSedge(541)=0 exch2_myFace(541)=3 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)=35 exch2_jHi(1,541)=35 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)=35 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)=219 exch2_iLo(4,541)=0 exch2_iHi(4,541)=0 exch2_jLo(4,541)=0 exch2_jHi(4,541)=35 exch2_opposingSend(4,541)=1 exch2_pij(1,4,541)=0 exch2_pij(2,4,541)=1 exch2_pij(3,4,541)=-1 exch2_pij(4,4,541)=0 exch2_oi(4,541)=-510 exch2_oj(4,541)=511 RETURN END SUBROUTINE W2_E2SETUP_542 C Topology for tile 542 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(542)=34 exch2_tNy(542)=34 exch2_tBasex(542)=34 exch2_tBasey(542)=204 exch2_txGlobalo(542)=1055 exch2_tyGlobalo(542)=205 exch2_isWedge(542)=0 exch2_isNedge(542)=0 exch2_isEedge(542)=0 exch2_isSedge(542)=0 exch2_myFace(542)=3 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)=35 exch2_jHi(1,542)=35 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)=35 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)=35 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)=34 exch2_tBasex(543)=68 exch2_tBasey(543)=204 exch2_txGlobalo(543)=1089 exch2_tyGlobalo(543)=205 exch2_isWedge(543)=0 exch2_isNedge(543)=0 exch2_isEedge(543)=0 exch2_isSedge(543)=0 exch2_myFace(543)=3 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)=35 exch2_jHi(1,543)=35 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)=35 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)=35 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)=34 exch2_tBasex(544)=102 exch2_tBasey(544)=204 exch2_txGlobalo(544)=1123 exch2_tyGlobalo(544)=205 exch2_isWedge(544)=0 exch2_isNedge(544)=0 exch2_isEedge(544)=0 exch2_isSedge(544)=0 exch2_myFace(544)=3 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)=35 exch2_jHi(1,544)=35 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)=35 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)=35 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)=34 exch2_tBasex(545)=136 exch2_tBasey(545)=204 exch2_txGlobalo(545)=1157 exch2_tyGlobalo(545)=205 exch2_isWedge(545)=0 exch2_isNedge(545)=0 exch2_isEedge(545)=0 exch2_isSedge(545)=0 exch2_myFace(545)=3 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)=35 exch2_jHi(1,545)=35 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)=35 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)=35 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)=34 exch2_tBasex(546)=170 exch2_tBasey(546)=204 exch2_txGlobalo(546)=1191 exch2_tyGlobalo(546)=205 exch2_isWedge(546)=0 exch2_isNedge(546)=0 exch2_isEedge(546)=0 exch2_isSedge(546)=0 exch2_myFace(546)=3 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)=35 exch2_jHi(1,546)=35 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)=35 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)=35 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)=34 exch2_tBasex(547)=204 exch2_tBasey(547)=204 exch2_txGlobalo(547)=1225 exch2_tyGlobalo(547)=205 exch2_isWedge(547)=0 exch2_isNedge(547)=0 exch2_isEedge(547)=0 exch2_isSedge(547)=0 exch2_myFace(547)=3 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)=35 exch2_jHi(1,547)=35 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)=35 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)=35 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)=34 exch2_tBasex(548)=238 exch2_tBasey(548)=204 exch2_txGlobalo(548)=1259 exch2_tyGlobalo(548)=205 exch2_isWedge(548)=0 exch2_isNedge(548)=0 exch2_isEedge(548)=0 exch2_isSedge(548)=0 exch2_myFace(548)=3 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)=35 exch2_jHi(1,548)=35 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)=35 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)=35 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)=34 exch2_tBasex(549)=272 exch2_tBasey(549)=204 exch2_txGlobalo(549)=1293 exch2_tyGlobalo(549)=205 exch2_isWedge(549)=0 exch2_isNedge(549)=0 exch2_isEedge(549)=0 exch2_isSedge(549)=0 exch2_myFace(549)=3 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)=35 exch2_jHi(1,549)=35 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)=35 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)=35 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)=34 exch2_tBasex(550)=306 exch2_tBasey(550)=204 exch2_txGlobalo(550)=1327 exch2_tyGlobalo(550)=205 exch2_isWedge(550)=0 exch2_isNedge(550)=0 exch2_isEedge(550)=0 exch2_isSedge(550)=0 exch2_myFace(550)=3 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)=35 exch2_jHi(1,550)=35 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)=35 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)=35 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)=34 exch2_tBasex(551)=340 exch2_tBasey(551)=204 exch2_txGlobalo(551)=1361 exch2_tyGlobalo(551)=205 exch2_isWedge(551)=0 exch2_isNedge(551)=0 exch2_isEedge(551)=0 exch2_isSedge(551)=0 exch2_myFace(551)=3 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)=35 exch2_jHi(1,551)=35 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)=35 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)=35 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)=34 exch2_tBasex(552)=374 exch2_tBasey(552)=204 exch2_txGlobalo(552)=1395 exch2_tyGlobalo(552)=205 exch2_isWedge(552)=0 exch2_isNedge(552)=0 exch2_isEedge(552)=0 exch2_isSedge(552)=0 exch2_myFace(552)=3 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)=35 exch2_jHi(1,552)=35 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)=35 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)=35 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)=34 exch2_tBasex(553)=408 exch2_tBasey(553)=204 exch2_txGlobalo(553)=1429 exch2_tyGlobalo(553)=205 exch2_isWedge(553)=0 exch2_isNedge(553)=0 exch2_isEedge(553)=0 exch2_isSedge(553)=0 exch2_myFace(553)=3 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)=35 exch2_jHi(1,553)=35 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)=35 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)=35 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)=34 exch2_tBasex(554)=442 exch2_tBasey(554)=204 exch2_txGlobalo(554)=1463 exch2_tyGlobalo(554)=205 exch2_isWedge(554)=0 exch2_isNedge(554)=0 exch2_isEedge(554)=0 exch2_isSedge(554)=0 exch2_myFace(554)=3 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)=35 exch2_jHi(1,554)=35 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)=35 exch2_opposingSend(3,554)=4 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)=35 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)=34 exch2_tBasex(555)=476 exch2_tBasey(555)=204 exch2_txGlobalo(555)=1497 exch2_tyGlobalo(555)=205 exch2_isWedge(555)=0 exch2_isNedge(555)=0 exch2_isEedge(555)=1 exch2_isSedge(555)=0 exch2_myFace(555)=3 exch2_mydNx(555)=510 exch2_mydNy(555)=510 exch2_nNeighbours(555)=4 exch2_neighbourId(1,555)=570 exch2_iLo(1,555)=0 exch2_iHi(1,555)=35 exch2_jLo(1,555)=35 exch2_jHi(1,555)=35 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)=766 exch2_iLo(3,555)=35 exch2_iHi(3,555)=35 exch2_jLo(3,555)=0 exch2_jHi(3,555)=35 exch2_opposingSend(3,555)=4 exch2_pij(1,3,555)=1 exch2_pij(2,3,555)=0 exch2_pij(3,3,555)=0 exch2_pij(4,3,555)=1 exch2_oi(3,555)=510 exch2_oj(3,555)=0 exch2_neighbourId(4,555)=554 exch2_iLo(4,555)=0 exch2_iHi(4,555)=0 exch2_jLo(4,555)=0 exch2_jHi(4,555)=35 exch2_opposingSend(4,555)=3 exch2_pij(1,4,555)=1 exch2_pij(2,4,555)=0 exch2_pij(3,4,555)=0 exch2_pij(4,4,555)=1 exch2_oi(4,555)=0 exch2_oj(4,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)=34 exch2_tBasex(556)=0 exch2_tBasey(556)=238 exch2_txGlobalo(556)=1021 exch2_tyGlobalo(556)=239 exch2_isWedge(556)=1 exch2_isNedge(556)=0 exch2_isEedge(556)=0 exch2_isSedge(556)=0 exch2_myFace(556)=3 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)=35 exch2_jHi(1,556)=35 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)=35 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)=218 exch2_iLo(4,556)=0 exch2_iHi(4,556)=0 exch2_jLo(4,556)=0 exch2_jHi(4,556)=35 exch2_opposingSend(4,556)=1 exch2_pij(1,4,556)=0 exch2_pij(2,4,556)=1 exch2_pij(3,4,556)=-1 exch2_pij(4,4,556)=0 exch2_oi(4,556)=-510 exch2_oj(4,556)=511 RETURN END SUBROUTINE W2_E2SETUP_557 C Topology for tile 557 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(557)=34 exch2_tNy(557)=34 exch2_tBasex(557)=34 exch2_tBasey(557)=238 exch2_txGlobalo(557)=1055 exch2_tyGlobalo(557)=239 exch2_isWedge(557)=0 exch2_isNedge(557)=0 exch2_isEedge(557)=0 exch2_isSedge(557)=0 exch2_myFace(557)=3 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)=35 exch2_jHi(1,557)=35 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)=35 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)=35 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)=34 exch2_tBasex(558)=68 exch2_tBasey(558)=238 exch2_txGlobalo(558)=1089 exch2_tyGlobalo(558)=239 exch2_isWedge(558)=0 exch2_isNedge(558)=0 exch2_isEedge(558)=0 exch2_isSedge(558)=0 exch2_myFace(558)=3 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)=35 exch2_jHi(1,558)=35 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)=35 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)=35 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)=34 exch2_tBasex(559)=102 exch2_tBasey(559)=238 exch2_txGlobalo(559)=1123 exch2_tyGlobalo(559)=239 exch2_isWedge(559)=0 exch2_isNedge(559)=0 exch2_isEedge(559)=0 exch2_isSedge(559)=0 exch2_myFace(559)=3 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)=35 exch2_jHi(1,559)=35 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)=35 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)=35 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)=34 exch2_tBasex(560)=136 exch2_tBasey(560)=238 exch2_txGlobalo(560)=1157 exch2_tyGlobalo(560)=239 exch2_isWedge(560)=0 exch2_isNedge(560)=0 exch2_isEedge(560)=0 exch2_isSedge(560)=0 exch2_myFace(560)=3 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)=35 exch2_jHi(1,560)=35 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)=35 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)=35 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)=34 exch2_tBasex(561)=170 exch2_tBasey(561)=238 exch2_txGlobalo(561)=1191 exch2_tyGlobalo(561)=239 exch2_isWedge(561)=0 exch2_isNedge(561)=0 exch2_isEedge(561)=0 exch2_isSedge(561)=0 exch2_myFace(561)=3 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)=35 exch2_jHi(1,561)=35 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)=35 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)=35 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)=34 exch2_tBasex(562)=204 exch2_tBasey(562)=238 exch2_txGlobalo(562)=1225 exch2_tyGlobalo(562)=239 exch2_isWedge(562)=0 exch2_isNedge(562)=0 exch2_isEedge(562)=0 exch2_isSedge(562)=0 exch2_myFace(562)=3 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)=35 exch2_jHi(1,562)=35 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)=35 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)=35 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)=34 exch2_tBasex(563)=238 exch2_tBasey(563)=238 exch2_txGlobalo(563)=1259 exch2_tyGlobalo(563)=239 exch2_isWedge(563)=0 exch2_isNedge(563)=0 exch2_isEedge(563)=0 exch2_isSedge(563)=0 exch2_myFace(563)=3 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)=35 exch2_jHi(1,563)=35 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)=35 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)=35 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)=34 exch2_tBasex(564)=272 exch2_tBasey(564)=238 exch2_txGlobalo(564)=1293 exch2_tyGlobalo(564)=239 exch2_isWedge(564)=0 exch2_isNedge(564)=0 exch2_isEedge(564)=0 exch2_isSedge(564)=0 exch2_myFace(564)=3 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)=35 exch2_jHi(1,564)=35 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)=35 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)=35 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)=34 exch2_tBasex(565)=306 exch2_tBasey(565)=238 exch2_txGlobalo(565)=1327 exch2_tyGlobalo(565)=239 exch2_isWedge(565)=0 exch2_isNedge(565)=0 exch2_isEedge(565)=0 exch2_isSedge(565)=0 exch2_myFace(565)=3 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)=35 exch2_jHi(1,565)=35 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)=35 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)=35 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)=34 exch2_tBasex(566)=340 exch2_tBasey(566)=238 exch2_txGlobalo(566)=1361 exch2_tyGlobalo(566)=239 exch2_isWedge(566)=0 exch2_isNedge(566)=0 exch2_isEedge(566)=0 exch2_isSedge(566)=0 exch2_myFace(566)=3 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)=35 exch2_jHi(1,566)=35 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)=35 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)=35 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)=34 exch2_tBasex(567)=374 exch2_tBasey(567)=238 exch2_txGlobalo(567)=1395 exch2_tyGlobalo(567)=239 exch2_isWedge(567)=0 exch2_isNedge(567)=0 exch2_isEedge(567)=0 exch2_isSedge(567)=0 exch2_myFace(567)=3 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)=35 exch2_jHi(1,567)=35 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)=35 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)=35 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)=34 exch2_tBasex(568)=408 exch2_tBasey(568)=238 exch2_txGlobalo(568)=1429 exch2_tyGlobalo(568)=239 exch2_isWedge(568)=0 exch2_isNedge(568)=0 exch2_isEedge(568)=0 exch2_isSedge(568)=0 exch2_myFace(568)=3 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)=35 exch2_jHi(1,568)=35 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)=35 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)=35 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)=34 exch2_tBasex(569)=442 exch2_tBasey(569)=238 exch2_txGlobalo(569)=1463 exch2_tyGlobalo(569)=239 exch2_isWedge(569)=0 exch2_isNedge(569)=0 exch2_isEedge(569)=0 exch2_isSedge(569)=0 exch2_myFace(569)=3 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)=35 exch2_jHi(1,569)=35 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)=35 exch2_opposingSend(3,569)=4 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)=35 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)=34 exch2_tBasex(570)=476 exch2_tBasey(570)=238 exch2_txGlobalo(570)=1497 exch2_tyGlobalo(570)=239 exch2_isWedge(570)=0 exch2_isNedge(570)=0 exch2_isEedge(570)=1 exch2_isSedge(570)=0 exch2_myFace(570)=3 exch2_mydNx(570)=510 exch2_mydNy(570)=510 exch2_nNeighbours(570)=4 exch2_neighbourId(1,570)=585 exch2_iLo(1,570)=0 exch2_iHi(1,570)=35 exch2_jLo(1,570)=35 exch2_jHi(1,570)=35 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)=781 exch2_iLo(3,570)=35 exch2_iHi(3,570)=35 exch2_jLo(3,570)=0 exch2_jHi(3,570)=35 exch2_opposingSend(3,570)=4 exch2_pij(1,3,570)=1 exch2_pij(2,3,570)=0 exch2_pij(3,3,570)=0 exch2_pij(4,3,570)=1 exch2_oi(3,570)=510 exch2_oj(3,570)=0 exch2_neighbourId(4,570)=569 exch2_iLo(4,570)=0 exch2_iHi(4,570)=0 exch2_jLo(4,570)=0 exch2_jHi(4,570)=35 exch2_opposingSend(4,570)=3 exch2_pij(1,4,570)=1 exch2_pij(2,4,570)=0 exch2_pij(3,4,570)=0 exch2_pij(4,4,570)=1 exch2_oi(4,570)=0 exch2_oj(4,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)=34 exch2_tBasex(571)=0 exch2_tBasey(571)=272 exch2_txGlobalo(571)=1021 exch2_tyGlobalo(571)=273 exch2_isWedge(571)=1 exch2_isNedge(571)=0 exch2_isEedge(571)=0 exch2_isSedge(571)=0 exch2_myFace(571)=3 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)=35 exch2_jHi(1,571)=35 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)=35 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)=217 exch2_iLo(4,571)=0 exch2_iHi(4,571)=0 exch2_jLo(4,571)=0 exch2_jHi(4,571)=35 exch2_opposingSend(4,571)=1 exch2_pij(1,4,571)=0 exch2_pij(2,4,571)=1 exch2_pij(3,4,571)=-1 exch2_pij(4,4,571)=0 exch2_oi(4,571)=-510 exch2_oj(4,571)=511 RETURN END SUBROUTINE W2_E2SETUP_572 C Topology for tile 572 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(572)=34 exch2_tNy(572)=34 exch2_tBasex(572)=34 exch2_tBasey(572)=272 exch2_txGlobalo(572)=1055 exch2_tyGlobalo(572)=273 exch2_isWedge(572)=0 exch2_isNedge(572)=0 exch2_isEedge(572)=0 exch2_isSedge(572)=0 exch2_myFace(572)=3 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)=35 exch2_jHi(1,572)=35 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)=35 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)=35 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)=34 exch2_tBasex(573)=68 exch2_tBasey(573)=272 exch2_txGlobalo(573)=1089 exch2_tyGlobalo(573)=273 exch2_isWedge(573)=0 exch2_isNedge(573)=0 exch2_isEedge(573)=0 exch2_isSedge(573)=0 exch2_myFace(573)=3 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)=35 exch2_jHi(1,573)=35 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)=35 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)=35 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)=34 exch2_tBasex(574)=102 exch2_tBasey(574)=272 exch2_txGlobalo(574)=1123 exch2_tyGlobalo(574)=273 exch2_isWedge(574)=0 exch2_isNedge(574)=0 exch2_isEedge(574)=0 exch2_isSedge(574)=0 exch2_myFace(574)=3 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)=35 exch2_jHi(1,574)=35 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)=35 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)=35 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)=34 exch2_tBasex(575)=136 exch2_tBasey(575)=272 exch2_txGlobalo(575)=1157 exch2_tyGlobalo(575)=273 exch2_isWedge(575)=0 exch2_isNedge(575)=0 exch2_isEedge(575)=0 exch2_isSedge(575)=0 exch2_myFace(575)=3 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)=35 exch2_jHi(1,575)=35 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)=35 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)=35 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)=34 exch2_tBasex(576)=170 exch2_tBasey(576)=272 exch2_txGlobalo(576)=1191 exch2_tyGlobalo(576)=273 exch2_isWedge(576)=0 exch2_isNedge(576)=0 exch2_isEedge(576)=0 exch2_isSedge(576)=0 exch2_myFace(576)=3 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)=35 exch2_jHi(1,576)=35 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)=35 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)=35 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)=34 exch2_tBasex(577)=204 exch2_tBasey(577)=272 exch2_txGlobalo(577)=1225 exch2_tyGlobalo(577)=273 exch2_isWedge(577)=0 exch2_isNedge(577)=0 exch2_isEedge(577)=0 exch2_isSedge(577)=0 exch2_myFace(577)=3 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)=35 exch2_jHi(1,577)=35 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)=35 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)=35 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)=34 exch2_tBasex(578)=238 exch2_tBasey(578)=272 exch2_txGlobalo(578)=1259 exch2_tyGlobalo(578)=273 exch2_isWedge(578)=0 exch2_isNedge(578)=0 exch2_isEedge(578)=0 exch2_isSedge(578)=0 exch2_myFace(578)=3 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)=35 exch2_jHi(1,578)=35 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)=35 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)=35 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)=34 exch2_tBasex(579)=272 exch2_tBasey(579)=272 exch2_txGlobalo(579)=1293 exch2_tyGlobalo(579)=273 exch2_isWedge(579)=0 exch2_isNedge(579)=0 exch2_isEedge(579)=0 exch2_isSedge(579)=0 exch2_myFace(579)=3 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)=35 exch2_jHi(1,579)=35 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)=35 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)=35 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)=34 exch2_tBasex(580)=306 exch2_tBasey(580)=272 exch2_txGlobalo(580)=1327 exch2_tyGlobalo(580)=273 exch2_isWedge(580)=0 exch2_isNedge(580)=0 exch2_isEedge(580)=0 exch2_isSedge(580)=0 exch2_myFace(580)=3 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)=35 exch2_jHi(1,580)=35 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)=35 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)=35 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)=34 exch2_tBasex(581)=340 exch2_tBasey(581)=272 exch2_txGlobalo(581)=1361 exch2_tyGlobalo(581)=273 exch2_isWedge(581)=0 exch2_isNedge(581)=0 exch2_isEedge(581)=0 exch2_isSedge(581)=0 exch2_myFace(581)=3 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)=35 exch2_jHi(1,581)=35 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)=35 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)=35 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)=34 exch2_tBasex(582)=374 exch2_tBasey(582)=272 exch2_txGlobalo(582)=1395 exch2_tyGlobalo(582)=273 exch2_isWedge(582)=0 exch2_isNedge(582)=0 exch2_isEedge(582)=0 exch2_isSedge(582)=0 exch2_myFace(582)=3 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)=35 exch2_jHi(1,582)=35 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)=35 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)=35 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)=34 exch2_tBasex(583)=408 exch2_tBasey(583)=272 exch2_txGlobalo(583)=1429 exch2_tyGlobalo(583)=273 exch2_isWedge(583)=0 exch2_isNedge(583)=0 exch2_isEedge(583)=0 exch2_isSedge(583)=0 exch2_myFace(583)=3 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)=35 exch2_jHi(1,583)=35 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)=35 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)=35 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)=34 exch2_tBasex(584)=442 exch2_tBasey(584)=272 exch2_txGlobalo(584)=1463 exch2_tyGlobalo(584)=273 exch2_isWedge(584)=0 exch2_isNedge(584)=0 exch2_isEedge(584)=0 exch2_isSedge(584)=0 exch2_myFace(584)=3 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)=35 exch2_jHi(1,584)=35 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)=35 exch2_opposingSend(3,584)=4 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)=35 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)=34 exch2_tBasex(585)=476 exch2_tBasey(585)=272 exch2_txGlobalo(585)=1497 exch2_tyGlobalo(585)=273 exch2_isWedge(585)=0 exch2_isNedge(585)=0 exch2_isEedge(585)=1 exch2_isSedge(585)=0 exch2_myFace(585)=3 exch2_mydNx(585)=510 exch2_mydNy(585)=510 exch2_nNeighbours(585)=4 exch2_neighbourId(1,585)=600 exch2_iLo(1,585)=0 exch2_iHi(1,585)=35 exch2_jLo(1,585)=35 exch2_jHi(1,585)=35 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)=796 exch2_iLo(3,585)=35 exch2_iHi(3,585)=35 exch2_jLo(3,585)=0 exch2_jHi(3,585)=35 exch2_opposingSend(3,585)=4 exch2_pij(1,3,585)=1 exch2_pij(2,3,585)=0 exch2_pij(3,3,585)=0 exch2_pij(4,3,585)=1 exch2_oi(3,585)=510 exch2_oj(3,585)=0 exch2_neighbourId(4,585)=584 exch2_iLo(4,585)=0 exch2_iHi(4,585)=0 exch2_jLo(4,585)=0 exch2_jHi(4,585)=35 exch2_opposingSend(4,585)=3 exch2_pij(1,4,585)=1 exch2_pij(2,4,585)=0 exch2_pij(3,4,585)=0 exch2_pij(4,4,585)=1 exch2_oi(4,585)=0 exch2_oj(4,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)=34 exch2_tBasex(586)=0 exch2_tBasey(586)=306 exch2_txGlobalo(586)=1021 exch2_tyGlobalo(586)=307 exch2_isWedge(586)=1 exch2_isNedge(586)=0 exch2_isEedge(586)=0 exch2_isSedge(586)=0 exch2_myFace(586)=3 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)=35 exch2_jHi(1,586)=35 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)=0 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)=35 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)=216 exch2_iLo(4,586)=0 exch2_iHi(4,586)=0 exch2_jLo(4,586)=0 exch2_jHi(4,586)=35 exch2_opposingSend(4,586)=1 exch2_pij(1,4,586)=0 exch2_pij(2,4,586)=1 exch2_pij(3,4,586)=-1 exch2_pij(4,4,586)=0 exch2_oi(4,586)=-510 exch2_oj(4,586)=511 RETURN END SUBROUTINE W2_E2SETUP_587 C Topology for tile 587 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(587)=34 exch2_tNy(587)=34 exch2_tBasex(587)=34 exch2_tBasey(587)=306 exch2_txGlobalo(587)=1055 exch2_tyGlobalo(587)=307 exch2_isWedge(587)=0 exch2_isNedge(587)=0 exch2_isEedge(587)=0 exch2_isSedge(587)=0 exch2_myFace(587)=3 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)=35 exch2_jHi(1,587)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(588)=68 exch2_tBasey(588)=306 exch2_txGlobalo(588)=1089 exch2_tyGlobalo(588)=307 exch2_isWedge(588)=0 exch2_isNedge(588)=0 exch2_isEedge(588)=0 exch2_isSedge(588)=0 exch2_myFace(588)=3 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)=35 exch2_jHi(1,588)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(589)=102 exch2_tBasey(589)=306 exch2_txGlobalo(589)=1123 exch2_tyGlobalo(589)=307 exch2_isWedge(589)=0 exch2_isNedge(589)=0 exch2_isEedge(589)=0 exch2_isSedge(589)=0 exch2_myFace(589)=3 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)=35 exch2_jHi(1,589)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(590)=136 exch2_tBasey(590)=306 exch2_txGlobalo(590)=1157 exch2_tyGlobalo(590)=307 exch2_isWedge(590)=0 exch2_isNedge(590)=0 exch2_isEedge(590)=0 exch2_isSedge(590)=0 exch2_myFace(590)=3 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)=35 exch2_jHi(1,590)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(591)=170 exch2_tBasey(591)=306 exch2_txGlobalo(591)=1191 exch2_tyGlobalo(591)=307 exch2_isWedge(591)=0 exch2_isNedge(591)=0 exch2_isEedge(591)=0 exch2_isSedge(591)=0 exch2_myFace(591)=3 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)=35 exch2_jHi(1,591)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(592)=204 exch2_tBasey(592)=306 exch2_txGlobalo(592)=1225 exch2_tyGlobalo(592)=307 exch2_isWedge(592)=0 exch2_isNedge(592)=0 exch2_isEedge(592)=0 exch2_isSedge(592)=0 exch2_myFace(592)=3 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)=35 exch2_jHi(1,592)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(593)=238 exch2_tBasey(593)=306 exch2_txGlobalo(593)=1259 exch2_tyGlobalo(593)=307 exch2_isWedge(593)=0 exch2_isNedge(593)=0 exch2_isEedge(593)=0 exch2_isSedge(593)=0 exch2_myFace(593)=3 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)=35 exch2_jHi(1,593)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(594)=272 exch2_tBasey(594)=306 exch2_txGlobalo(594)=1293 exch2_tyGlobalo(594)=307 exch2_isWedge(594)=0 exch2_isNedge(594)=0 exch2_isEedge(594)=0 exch2_isSedge(594)=0 exch2_myFace(594)=3 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)=35 exch2_jHi(1,594)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(595)=306 exch2_tBasey(595)=306 exch2_txGlobalo(595)=1327 exch2_tyGlobalo(595)=307 exch2_isWedge(595)=0 exch2_isNedge(595)=0 exch2_isEedge(595)=0 exch2_isSedge(595)=0 exch2_myFace(595)=3 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)=35 exch2_jHi(1,595)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(596)=340 exch2_tBasey(596)=306 exch2_txGlobalo(596)=1361 exch2_tyGlobalo(596)=307 exch2_isWedge(596)=0 exch2_isNedge(596)=0 exch2_isEedge(596)=0 exch2_isSedge(596)=0 exch2_myFace(596)=3 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)=35 exch2_jHi(1,596)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(597)=374 exch2_tBasey(597)=306 exch2_txGlobalo(597)=1395 exch2_tyGlobalo(597)=307 exch2_isWedge(597)=0 exch2_isNedge(597)=0 exch2_isEedge(597)=0 exch2_isSedge(597)=0 exch2_myFace(597)=3 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)=35 exch2_jHi(1,597)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(598)=408 exch2_tBasey(598)=306 exch2_txGlobalo(598)=1429 exch2_tyGlobalo(598)=307 exch2_isWedge(598)=0 exch2_isNedge(598)=0 exch2_isEedge(598)=0 exch2_isSedge(598)=0 exch2_myFace(598)=3 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)=35 exch2_jHi(1,598)=35 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)=0 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)=35 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)=35 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)=34 exch2_tBasex(599)=442 exch2_tBasey(599)=306 exch2_txGlobalo(599)=1463 exch2_tyGlobalo(599)=307 exch2_isWedge(599)=0 exch2_isNedge(599)=0 exch2_isEedge(599)=0 exch2_isSedge(599)=0 exch2_myFace(599)=3 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)=35 exch2_jHi(1,599)=35 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)=0 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)=35 exch2_opposingSend(3,599)=4 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)=35 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)=34 exch2_tBasex(600)=476 exch2_tBasey(600)=306 exch2_txGlobalo(600)=1497 exch2_tyGlobalo(600)=307 exch2_isWedge(600)=0 exch2_isNedge(600)=0 exch2_isEedge(600)=1 exch2_isSedge(600)=0 exch2_myFace(600)=3 exch2_mydNx(600)=510 exch2_mydNy(600)=510 exch2_nNeighbours(600)=4 exch2_neighbourId(1,600)=615 exch2_iLo(1,600)=0 exch2_iHi(1,600)=35 exch2_jLo(1,600)=35 exch2_jHi(1,600)=35 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)=0 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)=811 exch2_iLo(3,600)=35 exch2_iHi(3,600)=35 exch2_jLo(3,600)=0 exch2_jHi(3,600)=35 exch2_opposingSend(3,600)=4 exch2_pij(1,3,600)=1 exch2_pij(2,3,600)=0 exch2_pij(3,3,600)=0 exch2_pij(4,3,600)=1 exch2_oi(3,600)=510 exch2_oj(3,600)=0 exch2_neighbourId(4,600)=599 exch2_iLo(4,600)=0 exch2_iHi(4,600)=0 exch2_jLo(4,600)=0 exch2_jHi(4,600)=35 exch2_opposingSend(4,600)=3 exch2_pij(1,4,600)=1 exch2_pij(2,4,600)=0 exch2_pij(3,4,600)=0 exch2_pij(4,4,600)=1 exch2_oi(4,600)=0 exch2_oj(4,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)=34 exch2_tBasex(601)=0 exch2_tBasey(601)=340 exch2_txGlobalo(601)=1021 exch2_tyGlobalo(601)=341 exch2_isWedge(601)=1 exch2_isNedge(601)=0 exch2_isEedge(601)=0 exch2_isSedge(601)=0 exch2_myFace(601)=3 exch2_mydNx(601)=510 exch2_mydNy(601)=510 exch2_nNeighbours(601)=4 exch2_neighbourId(1,601)=616 exch2_iLo(1,601)=0 exch2_iHi(1,601)=35 exch2_jLo(1,601)=35 exch2_jHi(1,601)=35 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)=0 exch2_neighbourId(3,601)=602 exch2_iLo(3,601)=35 exch2_iHi(3,601)=35 exch2_jLo(3,601)=0 exch2_jHi(3,601)=35 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)=215 exch2_iLo(4,601)=0 exch2_iHi(4,601)=0 exch2_jLo(4,601)=0 exch2_jHi(4,601)=35 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 RETURN END SUBROUTINE W2_E2SETUP_602 C Topology for tile 602 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(602)=34 exch2_tNy(602)=34 exch2_tBasex(602)=34 exch2_tBasey(602)=340 exch2_txGlobalo(602)=1055 exch2_tyGlobalo(602)=341 exch2_isWedge(602)=0 exch2_isNedge(602)=0 exch2_isEedge(602)=0 exch2_isSedge(602)=0 exch2_myFace(602)=3 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)=35 exch2_jHi(1,602)=35 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)=0 exch2_neighbourId(3,602)=603 exch2_iLo(3,602)=35 exch2_iHi(3,602)=35 exch2_jLo(3,602)=0 exch2_jHi(3,602)=35 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)=35 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)=34 exch2_tBasex(603)=68 exch2_tBasey(603)=340 exch2_txGlobalo(603)=1089 exch2_tyGlobalo(603)=341 exch2_isWedge(603)=0 exch2_isNedge(603)=0 exch2_isEedge(603)=0 exch2_isSedge(603)=0 exch2_myFace(603)=3 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)=35 exch2_jHi(1,603)=35 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)=0 exch2_neighbourId(3,603)=604 exch2_iLo(3,603)=35 exch2_iHi(3,603)=35 exch2_jLo(3,603)=0 exch2_jHi(3,603)=35 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)=35 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)=34 exch2_tBasex(604)=102 exch2_tBasey(604)=340 exch2_txGlobalo(604)=1123 exch2_tyGlobalo(604)=341 exch2_isWedge(604)=0 exch2_isNedge(604)=0 exch2_isEedge(604)=0 exch2_isSedge(604)=0 exch2_myFace(604)=3 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)=35 exch2_jHi(1,604)=35 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)=0 exch2_neighbourId(3,604)=605 exch2_iLo(3,604)=35 exch2_iHi(3,604)=35 exch2_jLo(3,604)=0 exch2_jHi(3,604)=35 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)=35 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)=34 exch2_tBasex(605)=136 exch2_tBasey(605)=340 exch2_txGlobalo(605)=1157 exch2_tyGlobalo(605)=341 exch2_isWedge(605)=0 exch2_isNedge(605)=0 exch2_isEedge(605)=0 exch2_isSedge(605)=0 exch2_myFace(605)=3 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)=35 exch2_jHi(1,605)=35 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)=0 exch2_neighbourId(3,605)=606 exch2_iLo(3,605)=35 exch2_iHi(3,605)=35 exch2_jLo(3,605)=0 exch2_jHi(3,605)=35 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)=35 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)=34 exch2_tBasex(606)=170 exch2_tBasey(606)=340 exch2_txGlobalo(606)=1191 exch2_tyGlobalo(606)=341 exch2_isWedge(606)=0 exch2_isNedge(606)=0 exch2_isEedge(606)=0 exch2_isSedge(606)=0 exch2_myFace(606)=3 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)=35 exch2_jHi(1,606)=35 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)=0 exch2_neighbourId(3,606)=607 exch2_iLo(3,606)=35 exch2_iHi(3,606)=35 exch2_jLo(3,606)=0 exch2_jHi(3,606)=35 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)=35 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)=34 exch2_tBasex(607)=204 exch2_tBasey(607)=340 exch2_txGlobalo(607)=1225 exch2_tyGlobalo(607)=341 exch2_isWedge(607)=0 exch2_isNedge(607)=0 exch2_isEedge(607)=0 exch2_isSedge(607)=0 exch2_myFace(607)=3 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)=35 exch2_jHi(1,607)=35 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)=0 exch2_neighbourId(3,607)=608 exch2_iLo(3,607)=35 exch2_iHi(3,607)=35 exch2_jLo(3,607)=0 exch2_jHi(3,607)=35 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)=35 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)=34 exch2_tBasex(608)=238 exch2_tBasey(608)=340 exch2_txGlobalo(608)=1259 exch2_tyGlobalo(608)=341 exch2_isWedge(608)=0 exch2_isNedge(608)=0 exch2_isEedge(608)=0 exch2_isSedge(608)=0 exch2_myFace(608)=3 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)=35 exch2_jHi(1,608)=35 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)=0 exch2_neighbourId(3,608)=609 exch2_iLo(3,608)=35 exch2_iHi(3,608)=35 exch2_jLo(3,608)=0 exch2_jHi(3,608)=35 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)=35 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)=34 exch2_tBasex(609)=272 exch2_tBasey(609)=340 exch2_txGlobalo(609)=1293 exch2_tyGlobalo(609)=341 exch2_isWedge(609)=0 exch2_isNedge(609)=0 exch2_isEedge(609)=0 exch2_isSedge(609)=0 exch2_myFace(609)=3 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)=35 exch2_jHi(1,609)=35 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)=0 exch2_neighbourId(3,609)=610 exch2_iLo(3,609)=35 exch2_iHi(3,609)=35 exch2_jLo(3,609)=0 exch2_jHi(3,609)=35 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)=35 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)=34 exch2_tBasex(610)=306 exch2_tBasey(610)=340 exch2_txGlobalo(610)=1327 exch2_tyGlobalo(610)=341 exch2_isWedge(610)=0 exch2_isNedge(610)=0 exch2_isEedge(610)=0 exch2_isSedge(610)=0 exch2_myFace(610)=3 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)=35 exch2_jHi(1,610)=35 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)=0 exch2_neighbourId(3,610)=611 exch2_iLo(3,610)=35 exch2_iHi(3,610)=35 exch2_jLo(3,610)=0 exch2_jHi(3,610)=35 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)=35 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)=34 exch2_tBasex(611)=340 exch2_tBasey(611)=340 exch2_txGlobalo(611)=1361 exch2_tyGlobalo(611)=341 exch2_isWedge(611)=0 exch2_isNedge(611)=0 exch2_isEedge(611)=0 exch2_isSedge(611)=0 exch2_myFace(611)=3 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)=35 exch2_jHi(1,611)=35 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)=0 exch2_neighbourId(3,611)=612 exch2_iLo(3,611)=35 exch2_iHi(3,611)=35 exch2_jLo(3,611)=0 exch2_jHi(3,611)=35 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)=35 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)=34 exch2_tBasex(612)=374 exch2_tBasey(612)=340 exch2_txGlobalo(612)=1395 exch2_tyGlobalo(612)=341 exch2_isWedge(612)=0 exch2_isNedge(612)=0 exch2_isEedge(612)=0 exch2_isSedge(612)=0 exch2_myFace(612)=3 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)=35 exch2_jHi(1,612)=35 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)=0 exch2_neighbourId(3,612)=613 exch2_iLo(3,612)=35 exch2_iHi(3,612)=35 exch2_jLo(3,612)=0 exch2_jHi(3,612)=35 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)=35 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)=34 exch2_tBasex(613)=408 exch2_tBasey(613)=340 exch2_txGlobalo(613)=1429 exch2_tyGlobalo(613)=341 exch2_isWedge(613)=0 exch2_isNedge(613)=0 exch2_isEedge(613)=0 exch2_isSedge(613)=0 exch2_myFace(613)=3 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)=35 exch2_jHi(1,613)=35 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)=0 exch2_neighbourId(3,613)=614 exch2_iLo(3,613)=35 exch2_iHi(3,613)=35 exch2_jLo(3,613)=0 exch2_jHi(3,613)=35 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)=35 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)=34 exch2_tBasex(614)=442 exch2_tBasey(614)=340 exch2_txGlobalo(614)=1463 exch2_tyGlobalo(614)=341 exch2_isWedge(614)=0 exch2_isNedge(614)=0 exch2_isEedge(614)=0 exch2_isSedge(614)=0 exch2_myFace(614)=3 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)=35 exch2_jHi(1,614)=35 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)=0 exch2_neighbourId(3,614)=615 exch2_iLo(3,614)=35 exch2_iHi(3,614)=35 exch2_jLo(3,614)=0 exch2_jHi(3,614)=35 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)=35 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)=34 exch2_tBasex(615)=476 exch2_tBasey(615)=340 exch2_txGlobalo(615)=1497 exch2_tyGlobalo(615)=341 exch2_isWedge(615)=0 exch2_isNedge(615)=0 exch2_isEedge(615)=1 exch2_isSedge(615)=0 exch2_myFace(615)=3 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)=35 exch2_jHi(1,615)=35 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)=0 exch2_neighbourId(3,615)=826 exch2_iLo(3,615)=35 exch2_iHi(3,615)=35 exch2_jLo(3,615)=0 exch2_jHi(3,615)=35 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)=35 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)=34 exch2_tBasex(616)=0 exch2_tBasey(616)=374 exch2_txGlobalo(616)=1021 exch2_tyGlobalo(616)=375 exch2_isWedge(616)=1 exch2_isNedge(616)=0 exch2_isEedge(616)=0 exch2_isSedge(616)=0 exch2_myFace(616)=3 exch2_mydNx(616)=510 exch2_mydNy(616)=510 exch2_nNeighbours(616)=4 exch2_neighbourId(1,616)=631 exch2_iLo(1,616)=0 exch2_iHi(1,616)=35 exch2_jLo(1,616)=35 exch2_jHi(1,616)=35 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)=35 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)=214 exch2_iLo(4,616)=0 exch2_iHi(4,616)=0 exch2_jLo(4,616)=0 exch2_jHi(4,616)=35 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 RETURN END SUBROUTINE W2_E2SETUP_617 C Topology for tile 617 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(617)=34 exch2_tNy(617)=34 exch2_tBasex(617)=34 exch2_tBasey(617)=374 exch2_txGlobalo(617)=1055 exch2_tyGlobalo(617)=375 exch2_isWedge(617)=0 exch2_isNedge(617)=0 exch2_isEedge(617)=0 exch2_isSedge(617)=0 exch2_myFace(617)=3 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)=35 exch2_jHi(1,617)=35 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)=35 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)=35 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)=34 exch2_tBasex(618)=68 exch2_tBasey(618)=374 exch2_txGlobalo(618)=1089 exch2_tyGlobalo(618)=375 exch2_isWedge(618)=0 exch2_isNedge(618)=0 exch2_isEedge(618)=0 exch2_isSedge(618)=0 exch2_myFace(618)=3 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)=35 exch2_jHi(1,618)=35 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)=35 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)=35 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)=34 exch2_tBasex(619)=102 exch2_tBasey(619)=374 exch2_txGlobalo(619)=1123 exch2_tyGlobalo(619)=375 exch2_isWedge(619)=0 exch2_isNedge(619)=0 exch2_isEedge(619)=0 exch2_isSedge(619)=0 exch2_myFace(619)=3 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)=35 exch2_jHi(1,619)=35 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)=35 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)=35 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)=34 exch2_tBasex(620)=136 exch2_tBasey(620)=374 exch2_txGlobalo(620)=1157 exch2_tyGlobalo(620)=375 exch2_isWedge(620)=0 exch2_isNedge(620)=0 exch2_isEedge(620)=0 exch2_isSedge(620)=0 exch2_myFace(620)=3 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)=35 exch2_jHi(1,620)=35 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)=35 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)=35 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)=34 exch2_tBasex(621)=170 exch2_tBasey(621)=374 exch2_txGlobalo(621)=1191 exch2_tyGlobalo(621)=375 exch2_isWedge(621)=0 exch2_isNedge(621)=0 exch2_isEedge(621)=0 exch2_isSedge(621)=0 exch2_myFace(621)=3 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)=35 exch2_jHi(1,621)=35 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)=35 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)=35 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)=34 exch2_tBasex(622)=204 exch2_tBasey(622)=374 exch2_txGlobalo(622)=1225 exch2_tyGlobalo(622)=375 exch2_isWedge(622)=0 exch2_isNedge(622)=0 exch2_isEedge(622)=0 exch2_isSedge(622)=0 exch2_myFace(622)=3 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)=35 exch2_jHi(1,622)=35 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)=35 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)=35 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)=34 exch2_tBasex(623)=238 exch2_tBasey(623)=374 exch2_txGlobalo(623)=1259 exch2_tyGlobalo(623)=375 exch2_isWedge(623)=0 exch2_isNedge(623)=0 exch2_isEedge(623)=0 exch2_isSedge(623)=0 exch2_myFace(623)=3 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)=35 exch2_jHi(1,623)=35 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)=35 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)=35 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)=34 exch2_tBasex(624)=272 exch2_tBasey(624)=374 exch2_txGlobalo(624)=1293 exch2_tyGlobalo(624)=375 exch2_isWedge(624)=0 exch2_isNedge(624)=0 exch2_isEedge(624)=0 exch2_isSedge(624)=0 exch2_myFace(624)=3 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)=35 exch2_jHi(1,624)=35 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)=35 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)=35 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)=34 exch2_tBasex(625)=306 exch2_tBasey(625)=374 exch2_txGlobalo(625)=1327 exch2_tyGlobalo(625)=375 exch2_isWedge(625)=0 exch2_isNedge(625)=0 exch2_isEedge(625)=0 exch2_isSedge(625)=0 exch2_myFace(625)=3 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)=35 exch2_jHi(1,625)=35 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)=35 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)=35 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)=34 exch2_tBasex(626)=340 exch2_tBasey(626)=374 exch2_txGlobalo(626)=1361 exch2_tyGlobalo(626)=375 exch2_isWedge(626)=0 exch2_isNedge(626)=0 exch2_isEedge(626)=0 exch2_isSedge(626)=0 exch2_myFace(626)=3 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)=35 exch2_jHi(1,626)=35 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)=35 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)=35 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)=34 exch2_tBasex(627)=374 exch2_tBasey(627)=374 exch2_txGlobalo(627)=1395 exch2_tyGlobalo(627)=375 exch2_isWedge(627)=0 exch2_isNedge(627)=0 exch2_isEedge(627)=0 exch2_isSedge(627)=0 exch2_myFace(627)=3 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)=35 exch2_jHi(1,627)=35 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)=35 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)=35 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)=34 exch2_tBasex(628)=408 exch2_tBasey(628)=374 exch2_txGlobalo(628)=1429 exch2_tyGlobalo(628)=375 exch2_isWedge(628)=0 exch2_isNedge(628)=0 exch2_isEedge(628)=0 exch2_isSedge(628)=0 exch2_myFace(628)=3 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)=35 exch2_jHi(1,628)=35 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)=35 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)=35 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)=34 exch2_tBasex(629)=442 exch2_tBasey(629)=374 exch2_txGlobalo(629)=1463 exch2_tyGlobalo(629)=375 exch2_isWedge(629)=0 exch2_isNedge(629)=0 exch2_isEedge(629)=0 exch2_isSedge(629)=0 exch2_myFace(629)=3 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)=35 exch2_jHi(1,629)=35 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)=35 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)=35 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)=34 exch2_tBasex(630)=476 exch2_tBasey(630)=374 exch2_txGlobalo(630)=1497 exch2_tyGlobalo(630)=375 exch2_isWedge(630)=0 exch2_isNedge(630)=0 exch2_isEedge(630)=1 exch2_isSedge(630)=0 exch2_myFace(630)=3 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)=35 exch2_jHi(1,630)=35 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)=841 exch2_iLo(3,630)=35 exch2_iHi(3,630)=35 exch2_jLo(3,630)=0 exch2_jHi(3,630)=35 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)=35 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)=34 exch2_tBasex(631)=0 exch2_tBasey(631)=408 exch2_txGlobalo(631)=1021 exch2_tyGlobalo(631)=409 exch2_isWedge(631)=1 exch2_isNedge(631)=0 exch2_isEedge(631)=0 exch2_isSedge(631)=0 exch2_myFace(631)=3 exch2_mydNx(631)=510 exch2_mydNy(631)=510 exch2_nNeighbours(631)=4 exch2_neighbourId(1,631)=646 exch2_iLo(1,631)=0 exch2_iHi(1,631)=35 exch2_jLo(1,631)=35 exch2_jHi(1,631)=35 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)=35 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)=213 exch2_iLo(4,631)=0 exch2_iHi(4,631)=0 exch2_jLo(4,631)=0 exch2_jHi(4,631)=35 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 RETURN END SUBROUTINE W2_E2SETUP_632 C Topology for tile 632 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(632)=34 exch2_tNy(632)=34 exch2_tBasex(632)=34 exch2_tBasey(632)=408 exch2_txGlobalo(632)=1055 exch2_tyGlobalo(632)=409 exch2_isWedge(632)=0 exch2_isNedge(632)=0 exch2_isEedge(632)=0 exch2_isSedge(632)=0 exch2_myFace(632)=3 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)=35 exch2_jHi(1,632)=35 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)=35 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)=35 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)=34 exch2_tBasex(633)=68 exch2_tBasey(633)=408 exch2_txGlobalo(633)=1089 exch2_tyGlobalo(633)=409 exch2_isWedge(633)=0 exch2_isNedge(633)=0 exch2_isEedge(633)=0 exch2_isSedge(633)=0 exch2_myFace(633)=3 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)=35 exch2_jHi(1,633)=35 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)=35 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)=35 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)=34 exch2_tBasex(634)=102 exch2_tBasey(634)=408 exch2_txGlobalo(634)=1123 exch2_tyGlobalo(634)=409 exch2_isWedge(634)=0 exch2_isNedge(634)=0 exch2_isEedge(634)=0 exch2_isSedge(634)=0 exch2_myFace(634)=3 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)=35 exch2_jHi(1,634)=35 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)=35 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)=35 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)=34 exch2_tBasex(635)=136 exch2_tBasey(635)=408 exch2_txGlobalo(635)=1157 exch2_tyGlobalo(635)=409 exch2_isWedge(635)=0 exch2_isNedge(635)=0 exch2_isEedge(635)=0 exch2_isSedge(635)=0 exch2_myFace(635)=3 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)=35 exch2_jHi(1,635)=35 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)=35 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)=35 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)=34 exch2_tBasex(636)=170 exch2_tBasey(636)=408 exch2_txGlobalo(636)=1191 exch2_tyGlobalo(636)=409 exch2_isWedge(636)=0 exch2_isNedge(636)=0 exch2_isEedge(636)=0 exch2_isSedge(636)=0 exch2_myFace(636)=3 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)=35 exch2_jHi(1,636)=35 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)=35 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)=35 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)=34 exch2_tBasex(637)=204 exch2_tBasey(637)=408 exch2_txGlobalo(637)=1225 exch2_tyGlobalo(637)=409 exch2_isWedge(637)=0 exch2_isNedge(637)=0 exch2_isEedge(637)=0 exch2_isSedge(637)=0 exch2_myFace(637)=3 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)=35 exch2_jHi(1,637)=35 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)=35 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)=35 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)=34 exch2_tBasex(638)=238 exch2_tBasey(638)=408 exch2_txGlobalo(638)=1259 exch2_tyGlobalo(638)=409 exch2_isWedge(638)=0 exch2_isNedge(638)=0 exch2_isEedge(638)=0 exch2_isSedge(638)=0 exch2_myFace(638)=3 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)=35 exch2_jHi(1,638)=35 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)=35 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)=35 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)=34 exch2_tBasex(639)=272 exch2_tBasey(639)=408 exch2_txGlobalo(639)=1293 exch2_tyGlobalo(639)=409 exch2_isWedge(639)=0 exch2_isNedge(639)=0 exch2_isEedge(639)=0 exch2_isSedge(639)=0 exch2_myFace(639)=3 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)=35 exch2_jHi(1,639)=35 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)=35 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)=35 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)=34 exch2_tBasex(640)=306 exch2_tBasey(640)=408 exch2_txGlobalo(640)=1327 exch2_tyGlobalo(640)=409 exch2_isWedge(640)=0 exch2_isNedge(640)=0 exch2_isEedge(640)=0 exch2_isSedge(640)=0 exch2_myFace(640)=3 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)=35 exch2_jHi(1,640)=35 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)=35 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)=35 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)=34 exch2_tBasex(641)=340 exch2_tBasey(641)=408 exch2_txGlobalo(641)=1361 exch2_tyGlobalo(641)=409 exch2_isWedge(641)=0 exch2_isNedge(641)=0 exch2_isEedge(641)=0 exch2_isSedge(641)=0 exch2_myFace(641)=3 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)=35 exch2_jHi(1,641)=35 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)=35 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)=35 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)=34 exch2_tBasex(642)=374 exch2_tBasey(642)=408 exch2_txGlobalo(642)=1395 exch2_tyGlobalo(642)=409 exch2_isWedge(642)=0 exch2_isNedge(642)=0 exch2_isEedge(642)=0 exch2_isSedge(642)=0 exch2_myFace(642)=3 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)=35 exch2_jHi(1,642)=35 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)=35 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)=35 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)=34 exch2_tBasex(643)=408 exch2_tBasey(643)=408 exch2_txGlobalo(643)=1429 exch2_tyGlobalo(643)=409 exch2_isWedge(643)=0 exch2_isNedge(643)=0 exch2_isEedge(643)=0 exch2_isSedge(643)=0 exch2_myFace(643)=3 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)=35 exch2_jHi(1,643)=35 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)=35 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)=35 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)=34 exch2_tBasex(644)=442 exch2_tBasey(644)=408 exch2_txGlobalo(644)=1463 exch2_tyGlobalo(644)=409 exch2_isWedge(644)=0 exch2_isNedge(644)=0 exch2_isEedge(644)=0 exch2_isSedge(644)=0 exch2_myFace(644)=3 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)=35 exch2_jHi(1,644)=35 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)=35 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)=35 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)=34 exch2_tBasex(645)=476 exch2_tBasey(645)=408 exch2_txGlobalo(645)=1497 exch2_tyGlobalo(645)=409 exch2_isWedge(645)=0 exch2_isNedge(645)=0 exch2_isEedge(645)=1 exch2_isSedge(645)=0 exch2_myFace(645)=3 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)=35 exch2_jHi(1,645)=35 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)=856 exch2_iLo(3,645)=35 exch2_iHi(3,645)=35 exch2_jLo(3,645)=0 exch2_jHi(3,645)=35 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)=35 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)=34 exch2_tBasex(646)=0 exch2_tBasey(646)=442 exch2_txGlobalo(646)=1021 exch2_tyGlobalo(646)=443 exch2_isWedge(646)=1 exch2_isNedge(646)=0 exch2_isEedge(646)=0 exch2_isSedge(646)=0 exch2_myFace(646)=3 exch2_mydNx(646)=510 exch2_mydNy(646)=510 exch2_nNeighbours(646)=4 exch2_neighbourId(1,646)=661 exch2_iLo(1,646)=0 exch2_iHi(1,646)=35 exch2_jLo(1,646)=35 exch2_jHi(1,646)=35 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)=35 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)=212 exch2_iLo(4,646)=0 exch2_iHi(4,646)=0 exch2_jLo(4,646)=0 exch2_jHi(4,646)=35 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 RETURN END SUBROUTINE W2_E2SETUP_647 C Topology for tile 647 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(647)=34 exch2_tNy(647)=34 exch2_tBasex(647)=34 exch2_tBasey(647)=442 exch2_txGlobalo(647)=1055 exch2_tyGlobalo(647)=443 exch2_isWedge(647)=0 exch2_isNedge(647)=0 exch2_isEedge(647)=0 exch2_isSedge(647)=0 exch2_myFace(647)=3 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)=35 exch2_jHi(1,647)=35 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)=35 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)=35 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)=34 exch2_tBasex(648)=68 exch2_tBasey(648)=442 exch2_txGlobalo(648)=1089 exch2_tyGlobalo(648)=443 exch2_isWedge(648)=0 exch2_isNedge(648)=0 exch2_isEedge(648)=0 exch2_isSedge(648)=0 exch2_myFace(648)=3 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)=35 exch2_jHi(1,648)=35 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)=35 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)=35 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)=34 exch2_tBasex(649)=102 exch2_tBasey(649)=442 exch2_txGlobalo(649)=1123 exch2_tyGlobalo(649)=443 exch2_isWedge(649)=0 exch2_isNedge(649)=0 exch2_isEedge(649)=0 exch2_isSedge(649)=0 exch2_myFace(649)=3 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)=35 exch2_jHi(1,649)=35 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)=35 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)=35 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)=34 exch2_tBasex(650)=136 exch2_tBasey(650)=442 exch2_txGlobalo(650)=1157 exch2_tyGlobalo(650)=443 exch2_isWedge(650)=0 exch2_isNedge(650)=0 exch2_isEedge(650)=0 exch2_isSedge(650)=0 exch2_myFace(650)=3 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)=35 exch2_jHi(1,650)=35 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)=35 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)=35 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)=34 exch2_tBasex(651)=170 exch2_tBasey(651)=442 exch2_txGlobalo(651)=1191 exch2_tyGlobalo(651)=443 exch2_isWedge(651)=0 exch2_isNedge(651)=0 exch2_isEedge(651)=0 exch2_isSedge(651)=0 exch2_myFace(651)=3 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)=35 exch2_jHi(1,651)=35 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)=35 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)=35 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)=34 exch2_tBasex(652)=204 exch2_tBasey(652)=442 exch2_txGlobalo(652)=1225 exch2_tyGlobalo(652)=443 exch2_isWedge(652)=0 exch2_isNedge(652)=0 exch2_isEedge(652)=0 exch2_isSedge(652)=0 exch2_myFace(652)=3 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)=35 exch2_jHi(1,652)=35 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)=35 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)=35 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)=34 exch2_tBasex(653)=238 exch2_tBasey(653)=442 exch2_txGlobalo(653)=1259 exch2_tyGlobalo(653)=443 exch2_isWedge(653)=0 exch2_isNedge(653)=0 exch2_isEedge(653)=0 exch2_isSedge(653)=0 exch2_myFace(653)=3 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)=35 exch2_jHi(1,653)=35 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)=35 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)=35 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)=34 exch2_tBasex(654)=272 exch2_tBasey(654)=442 exch2_txGlobalo(654)=1293 exch2_tyGlobalo(654)=443 exch2_isWedge(654)=0 exch2_isNedge(654)=0 exch2_isEedge(654)=0 exch2_isSedge(654)=0 exch2_myFace(654)=3 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)=35 exch2_jHi(1,654)=35 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)=35 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)=35 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)=34 exch2_tBasex(655)=306 exch2_tBasey(655)=442 exch2_txGlobalo(655)=1327 exch2_tyGlobalo(655)=443 exch2_isWedge(655)=0 exch2_isNedge(655)=0 exch2_isEedge(655)=0 exch2_isSedge(655)=0 exch2_myFace(655)=3 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)=35 exch2_jHi(1,655)=35 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)=35 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)=35 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)=34 exch2_tBasex(656)=340 exch2_tBasey(656)=442 exch2_txGlobalo(656)=1361 exch2_tyGlobalo(656)=443 exch2_isWedge(656)=0 exch2_isNedge(656)=0 exch2_isEedge(656)=0 exch2_isSedge(656)=0 exch2_myFace(656)=3 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)=35 exch2_jHi(1,656)=35 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)=35 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)=35 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)=34 exch2_tBasex(657)=374 exch2_tBasey(657)=442 exch2_txGlobalo(657)=1395 exch2_tyGlobalo(657)=443 exch2_isWedge(657)=0 exch2_isNedge(657)=0 exch2_isEedge(657)=0 exch2_isSedge(657)=0 exch2_myFace(657)=3 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)=35 exch2_jHi(1,657)=35 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)=35 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)=35 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)=34 exch2_tBasex(658)=408 exch2_tBasey(658)=442 exch2_txGlobalo(658)=1429 exch2_tyGlobalo(658)=443 exch2_isWedge(658)=0 exch2_isNedge(658)=0 exch2_isEedge(658)=0 exch2_isSedge(658)=0 exch2_myFace(658)=3 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)=35 exch2_jHi(1,658)=35 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)=35 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)=35 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)=34 exch2_tBasex(659)=442 exch2_tBasey(659)=442 exch2_txGlobalo(659)=1463 exch2_tyGlobalo(659)=443 exch2_isWedge(659)=0 exch2_isNedge(659)=0 exch2_isEedge(659)=0 exch2_isSedge(659)=0 exch2_myFace(659)=3 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)=35 exch2_jHi(1,659)=35 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)=35 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)=35 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)=34 exch2_tBasex(660)=476 exch2_tBasey(660)=442 exch2_txGlobalo(660)=1497 exch2_tyGlobalo(660)=443 exch2_isWedge(660)=0 exch2_isNedge(660)=0 exch2_isEedge(660)=1 exch2_isSedge(660)=0 exch2_myFace(660)=3 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)=35 exch2_jHi(1,660)=35 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)=871 exch2_iLo(3,660)=35 exch2_iHi(3,660)=35 exch2_jLo(3,660)=0 exch2_jHi(3,660)=35 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)=35 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)=34 exch2_tBasex(661)=0 exch2_tBasey(661)=476 exch2_txGlobalo(661)=1021 exch2_tyGlobalo(661)=477 exch2_isWedge(661)=1 exch2_isNedge(661)=1 exch2_isEedge(661)=0 exch2_isSedge(661)=0 exch2_myFace(661)=3 exch2_mydNx(661)=510 exch2_mydNy(661)=510 exch2_nNeighbours(661)=4 exch2_neighbourId(1,661)=1111 exch2_iLo(1,661)=0 exch2_iHi(1,661)=35 exch2_jLo(1,661)=35 exch2_jHi(1,661)=35 exch2_opposingSend(1,661)=4 exch2_pij(1,1,661)=0 exch2_pij(2,1,661)=-1 exch2_pij(3,1,661)=1 exch2_pij(4,1,661)=0 exch2_oi(1,661)=511 exch2_oj(1,661)=510 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)=35 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)=211 exch2_iLo(4,661)=0 exch2_iHi(4,661)=0 exch2_jLo(4,661)=0 exch2_jHi(4,661)=35 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 RETURN END SUBROUTINE W2_E2SETUP_662 C Topology for tile 662 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(662)=34 exch2_tNy(662)=34 exch2_tBasex(662)=34 exch2_tBasey(662)=476 exch2_txGlobalo(662)=1055 exch2_tyGlobalo(662)=477 exch2_isWedge(662)=0 exch2_isNedge(662)=1 exch2_isEedge(662)=0 exch2_isSedge(662)=0 exch2_myFace(662)=3 exch2_mydNx(662)=510 exch2_mydNy(662)=510 exch2_nNeighbours(662)=4 exch2_neighbourId(1,662)=1096 exch2_iLo(1,662)=0 exch2_iHi(1,662)=35 exch2_jLo(1,662)=35 exch2_jHi(1,662)=35 exch2_opposingSend(1,662)=4 exch2_pij(1,1,662)=0 exch2_pij(2,1,662)=-1 exch2_pij(3,1,662)=1 exch2_pij(4,1,662)=0 exch2_oi(1,662)=511 exch2_oj(1,662)=510 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)=35 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)=35 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)=34 exch2_tBasex(663)=68 exch2_tBasey(663)=476 exch2_txGlobalo(663)=1089 exch2_tyGlobalo(663)=477 exch2_isWedge(663)=0 exch2_isNedge(663)=1 exch2_isEedge(663)=0 exch2_isSedge(663)=0 exch2_myFace(663)=3 exch2_mydNx(663)=510 exch2_mydNy(663)=510 exch2_nNeighbours(663)=4 exch2_neighbourId(1,663)=1081 exch2_iLo(1,663)=0 exch2_iHi(1,663)=35 exch2_jLo(1,663)=35 exch2_jHi(1,663)=35 exch2_opposingSend(1,663)=4 exch2_pij(1,1,663)=0 exch2_pij(2,1,663)=-1 exch2_pij(3,1,663)=1 exch2_pij(4,1,663)=0 exch2_oi(1,663)=511 exch2_oj(1,663)=510 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)=35 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)=35 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)=34 exch2_tBasex(664)=102 exch2_tBasey(664)=476 exch2_txGlobalo(664)=1123 exch2_tyGlobalo(664)=477 exch2_isWedge(664)=0 exch2_isNedge(664)=1 exch2_isEedge(664)=0 exch2_isSedge(664)=0 exch2_myFace(664)=3 exch2_mydNx(664)=510 exch2_mydNy(664)=510 exch2_nNeighbours(664)=4 exch2_neighbourId(1,664)=1066 exch2_iLo(1,664)=0 exch2_iHi(1,664)=35 exch2_jLo(1,664)=35 exch2_jHi(1,664)=35 exch2_opposingSend(1,664)=4 exch2_pij(1,1,664)=0 exch2_pij(2,1,664)=-1 exch2_pij(3,1,664)=1 exch2_pij(4,1,664)=0 exch2_oi(1,664)=511 exch2_oj(1,664)=510 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)=35 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)=35 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)=34 exch2_tBasex(665)=136 exch2_tBasey(665)=476 exch2_txGlobalo(665)=1157 exch2_tyGlobalo(665)=477 exch2_isWedge(665)=0 exch2_isNedge(665)=1 exch2_isEedge(665)=0 exch2_isSedge(665)=0 exch2_myFace(665)=3 exch2_mydNx(665)=510 exch2_mydNy(665)=510 exch2_nNeighbours(665)=4 exch2_neighbourId(1,665)=1051 exch2_iLo(1,665)=0 exch2_iHi(1,665)=35 exch2_jLo(1,665)=35 exch2_jHi(1,665)=35 exch2_opposingSend(1,665)=4 exch2_pij(1,1,665)=0 exch2_pij(2,1,665)=-1 exch2_pij(3,1,665)=1 exch2_pij(4,1,665)=0 exch2_oi(1,665)=511 exch2_oj(1,665)=510 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)=35 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)=35 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)=34 exch2_tBasex(666)=170 exch2_tBasey(666)=476 exch2_txGlobalo(666)=1191 exch2_tyGlobalo(666)=477 exch2_isWedge(666)=0 exch2_isNedge(666)=1 exch2_isEedge(666)=0 exch2_isSedge(666)=0 exch2_myFace(666)=3 exch2_mydNx(666)=510 exch2_mydNy(666)=510 exch2_nNeighbours(666)=4 exch2_neighbourId(1,666)=1036 exch2_iLo(1,666)=0 exch2_iHi(1,666)=35 exch2_jLo(1,666)=35 exch2_jHi(1,666)=35 exch2_opposingSend(1,666)=4 exch2_pij(1,1,666)=0 exch2_pij(2,1,666)=-1 exch2_pij(3,1,666)=1 exch2_pij(4,1,666)=0 exch2_oi(1,666)=511 exch2_oj(1,666)=510 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)=35 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)=35 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)=34 exch2_tBasex(667)=204 exch2_tBasey(667)=476 exch2_txGlobalo(667)=1225 exch2_tyGlobalo(667)=477 exch2_isWedge(667)=0 exch2_isNedge(667)=1 exch2_isEedge(667)=0 exch2_isSedge(667)=0 exch2_myFace(667)=3 exch2_mydNx(667)=510 exch2_mydNy(667)=510 exch2_nNeighbours(667)=4 exch2_neighbourId(1,667)=1021 exch2_iLo(1,667)=0 exch2_iHi(1,667)=35 exch2_jLo(1,667)=35 exch2_jHi(1,667)=35 exch2_opposingSend(1,667)=4 exch2_pij(1,1,667)=0 exch2_pij(2,1,667)=-1 exch2_pij(3,1,667)=1 exch2_pij(4,1,667)=0 exch2_oi(1,667)=511 exch2_oj(1,667)=510 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)=35 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)=35 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)=34 exch2_tBasex(668)=238 exch2_tBasey(668)=476 exch2_txGlobalo(668)=1259 exch2_tyGlobalo(668)=477 exch2_isWedge(668)=0 exch2_isNedge(668)=1 exch2_isEedge(668)=0 exch2_isSedge(668)=0 exch2_myFace(668)=3 exch2_mydNx(668)=510 exch2_mydNy(668)=510 exch2_nNeighbours(668)=4 exch2_neighbourId(1,668)=1006 exch2_iLo(1,668)=0 exch2_iHi(1,668)=35 exch2_jLo(1,668)=35 exch2_jHi(1,668)=35 exch2_opposingSend(1,668)=4 exch2_pij(1,1,668)=0 exch2_pij(2,1,668)=-1 exch2_pij(3,1,668)=1 exch2_pij(4,1,668)=0 exch2_oi(1,668)=511 exch2_oj(1,668)=510 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)=35 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)=35 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)=34 exch2_tBasex(669)=272 exch2_tBasey(669)=476 exch2_txGlobalo(669)=1293 exch2_tyGlobalo(669)=477 exch2_isWedge(669)=0 exch2_isNedge(669)=1 exch2_isEedge(669)=0 exch2_isSedge(669)=0 exch2_myFace(669)=3 exch2_mydNx(669)=510 exch2_mydNy(669)=510 exch2_nNeighbours(669)=4 exch2_neighbourId(1,669)=991 exch2_iLo(1,669)=0 exch2_iHi(1,669)=35 exch2_jLo(1,669)=35 exch2_jHi(1,669)=35 exch2_opposingSend(1,669)=4 exch2_pij(1,1,669)=0 exch2_pij(2,1,669)=-1 exch2_pij(3,1,669)=1 exch2_pij(4,1,669)=0 exch2_oi(1,669)=511 exch2_oj(1,669)=510 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)=35 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)=35 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)=34 exch2_tBasex(670)=306 exch2_tBasey(670)=476 exch2_txGlobalo(670)=1327 exch2_tyGlobalo(670)=477 exch2_isWedge(670)=0 exch2_isNedge(670)=1 exch2_isEedge(670)=0 exch2_isSedge(670)=0 exch2_myFace(670)=3 exch2_mydNx(670)=510 exch2_mydNy(670)=510 exch2_nNeighbours(670)=4 exch2_neighbourId(1,670)=976 exch2_iLo(1,670)=0 exch2_iHi(1,670)=35 exch2_jLo(1,670)=35 exch2_jHi(1,670)=35 exch2_opposingSend(1,670)=4 exch2_pij(1,1,670)=0 exch2_pij(2,1,670)=-1 exch2_pij(3,1,670)=1 exch2_pij(4,1,670)=0 exch2_oi(1,670)=511 exch2_oj(1,670)=510 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)=35 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)=35 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)=34 exch2_tBasex(671)=340 exch2_tBasey(671)=476 exch2_txGlobalo(671)=1361 exch2_tyGlobalo(671)=477 exch2_isWedge(671)=0 exch2_isNedge(671)=1 exch2_isEedge(671)=0 exch2_isSedge(671)=0 exch2_myFace(671)=3 exch2_mydNx(671)=510 exch2_mydNy(671)=510 exch2_nNeighbours(671)=4 exch2_neighbourId(1,671)=961 exch2_iLo(1,671)=0 exch2_iHi(1,671)=35 exch2_jLo(1,671)=35 exch2_jHi(1,671)=35 exch2_opposingSend(1,671)=4 exch2_pij(1,1,671)=0 exch2_pij(2,1,671)=-1 exch2_pij(3,1,671)=1 exch2_pij(4,1,671)=0 exch2_oi(1,671)=511 exch2_oj(1,671)=510 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)=35 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)=35 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)=34 exch2_tBasex(672)=374 exch2_tBasey(672)=476 exch2_txGlobalo(672)=1395 exch2_tyGlobalo(672)=477 exch2_isWedge(672)=0 exch2_isNedge(672)=1 exch2_isEedge(672)=0 exch2_isSedge(672)=0 exch2_myFace(672)=3 exch2_mydNx(672)=510 exch2_mydNy(672)=510 exch2_nNeighbours(672)=4 exch2_neighbourId(1,672)=946 exch2_iLo(1,672)=0 exch2_iHi(1,672)=35 exch2_jLo(1,672)=35 exch2_jHi(1,672)=35 exch2_opposingSend(1,672)=4 exch2_pij(1,1,672)=0 exch2_pij(2,1,672)=-1 exch2_pij(3,1,672)=1 exch2_pij(4,1,672)=0 exch2_oi(1,672)=511 exch2_oj(1,672)=510 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)=35 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)=35 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)=34 exch2_tBasex(673)=408 exch2_tBasey(673)=476 exch2_txGlobalo(673)=1429 exch2_tyGlobalo(673)=477 exch2_isWedge(673)=0 exch2_isNedge(673)=1 exch2_isEedge(673)=0 exch2_isSedge(673)=0 exch2_myFace(673)=3 exch2_mydNx(673)=510 exch2_mydNy(673)=510 exch2_nNeighbours(673)=4 exch2_neighbourId(1,673)=931 exch2_iLo(1,673)=0 exch2_iHi(1,673)=35 exch2_jLo(1,673)=35 exch2_jHi(1,673)=35 exch2_opposingSend(1,673)=4 exch2_pij(1,1,673)=0 exch2_pij(2,1,673)=-1 exch2_pij(3,1,673)=1 exch2_pij(4,1,673)=0 exch2_oi(1,673)=511 exch2_oj(1,673)=510 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)=35 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)=35 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)=34 exch2_tBasex(674)=442 exch2_tBasey(674)=476 exch2_txGlobalo(674)=1463 exch2_tyGlobalo(674)=477 exch2_isWedge(674)=0 exch2_isNedge(674)=1 exch2_isEedge(674)=0 exch2_isSedge(674)=0 exch2_myFace(674)=3 exch2_mydNx(674)=510 exch2_mydNy(674)=510 exch2_nNeighbours(674)=4 exch2_neighbourId(1,674)=916 exch2_iLo(1,674)=0 exch2_iHi(1,674)=35 exch2_jLo(1,674)=35 exch2_jHi(1,674)=35 exch2_opposingSend(1,674)=4 exch2_pij(1,1,674)=0 exch2_pij(2,1,674)=-1 exch2_pij(3,1,674)=1 exch2_pij(4,1,674)=0 exch2_oi(1,674)=511 exch2_oj(1,674)=510 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)=35 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)=35 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)=34 exch2_tBasex(675)=476 exch2_tBasey(675)=476 exch2_txGlobalo(675)=1497 exch2_tyGlobalo(675)=477 exch2_isWedge(675)=0 exch2_isNedge(675)=1 exch2_isEedge(675)=1 exch2_isSedge(675)=0 exch2_myFace(675)=3 exch2_mydNx(675)=510 exch2_mydNy(675)=510 exch2_nNeighbours(675)=4 exch2_neighbourId(1,675)=901 exch2_iLo(1,675)=0 exch2_iHi(1,675)=35 exch2_jLo(1,675)=35 exch2_jHi(1,675)=35 exch2_opposingSend(1,675)=4 exch2_pij(1,1,675)=0 exch2_pij(2,1,675)=-1 exch2_pij(3,1,675)=1 exch2_pij(4,1,675)=0 exch2_oi(1,675)=511 exch2_oj(1,675)=510 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)=886 exch2_iLo(3,675)=35 exch2_iHi(3,675)=35 exch2_jLo(3,675)=0 exch2_jHi(3,675)=35 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)=35 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)=34 exch2_tBasex(676)=0 exch2_tBasey(676)=0 exch2_txGlobalo(676)=1531 exch2_tyGlobalo(676)=1 exch2_isWedge(676)=1 exch2_isNedge(676)=0 exch2_isEedge(676)=0 exch2_isSedge(676)=1 exch2_myFace(676)=4 exch2_mydNx(676)=510 exch2_mydNy(676)=510 exch2_nNeighbours(676)=4 exch2_neighbourId(1,676)=691 exch2_iLo(1,676)=0 exch2_iHi(1,676)=35 exch2_jLo(1,676)=35 exch2_jHi(1,676)=35 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)=450 exch2_iLo(2,676)=0 exch2_iHi(2,676)=35 exch2_jLo(2,676)=0 exch2_jHi(2,676)=0 exch2_opposingSend(2,676)=3 exch2_pij(1,2,676)=0 exch2_pij(2,2,676)=-1 exch2_pij(3,2,676)=1 exch2_pij(4,2,676)=0 exch2_oi(2,676)=511 exch2_oj(2,676)=-510 exch2_neighbourId(3,676)=677 exch2_iLo(3,676)=35 exch2_iHi(3,676)=35 exch2_jLo(3,676)=0 exch2_jHi(3,676)=35 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)=465 exch2_iLo(4,676)=0 exch2_iHi(4,676)=0 exch2_jLo(4,676)=0 exch2_jHi(4,676)=35 exch2_opposingSend(4,676)=3 exch2_pij(1,4,676)=1 exch2_pij(2,4,676)=0 exch2_pij(3,4,676)=0 exch2_pij(4,4,676)=1 exch2_oi(4,676)=-510 exch2_oj(4,676)=0 RETURN END SUBROUTINE W2_E2SETUP_677 C Topology for tile 677 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(677)=34 exch2_tNy(677)=34 exch2_tBasex(677)=34 exch2_tBasey(677)=0 exch2_txGlobalo(677)=1565 exch2_tyGlobalo(677)=1 exch2_isWedge(677)=0 exch2_isNedge(677)=0 exch2_isEedge(677)=0 exch2_isSedge(677)=1 exch2_myFace(677)=4 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)=35 exch2_jHi(1,677)=35 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)=435 exch2_iLo(2,677)=0 exch2_iHi(2,677)=35 exch2_jLo(2,677)=0 exch2_jHi(2,677)=0 exch2_opposingSend(2,677)=3 exch2_pij(1,2,677)=0 exch2_pij(2,2,677)=-1 exch2_pij(3,2,677)=1 exch2_pij(4,2,677)=0 exch2_oi(2,677)=511 exch2_oj(2,677)=-510 exch2_neighbourId(3,677)=678 exch2_iLo(3,677)=35 exch2_iHi(3,677)=35 exch2_jLo(3,677)=0 exch2_jHi(3,677)=35 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)=35 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)=34 exch2_tBasex(678)=68 exch2_tBasey(678)=0 exch2_txGlobalo(678)=1599 exch2_tyGlobalo(678)=1 exch2_isWedge(678)=0 exch2_isNedge(678)=0 exch2_isEedge(678)=0 exch2_isSedge(678)=1 exch2_myFace(678)=4 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)=35 exch2_jHi(1,678)=35 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)=420 exch2_iLo(2,678)=0 exch2_iHi(2,678)=35 exch2_jLo(2,678)=0 exch2_jHi(2,678)=0 exch2_opposingSend(2,678)=3 exch2_pij(1,2,678)=0 exch2_pij(2,2,678)=-1 exch2_pij(3,2,678)=1 exch2_pij(4,2,678)=0 exch2_oi(2,678)=511 exch2_oj(2,678)=-510 exch2_neighbourId(3,678)=679 exch2_iLo(3,678)=35 exch2_iHi(3,678)=35 exch2_jLo(3,678)=0 exch2_jHi(3,678)=35 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)=35 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)=34 exch2_tBasex(679)=102 exch2_tBasey(679)=0 exch2_txGlobalo(679)=1633 exch2_tyGlobalo(679)=1 exch2_isWedge(679)=0 exch2_isNedge(679)=0 exch2_isEedge(679)=0 exch2_isSedge(679)=1 exch2_myFace(679)=4 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)=35 exch2_jHi(1,679)=35 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)=405 exch2_iLo(2,679)=0 exch2_iHi(2,679)=35 exch2_jLo(2,679)=0 exch2_jHi(2,679)=0 exch2_opposingSend(2,679)=3 exch2_pij(1,2,679)=0 exch2_pij(2,2,679)=-1 exch2_pij(3,2,679)=1 exch2_pij(4,2,679)=0 exch2_oi(2,679)=511 exch2_oj(2,679)=-510 exch2_neighbourId(3,679)=680 exch2_iLo(3,679)=35 exch2_iHi(3,679)=35 exch2_jLo(3,679)=0 exch2_jHi(3,679)=35 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)=35 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)=34 exch2_tBasex(680)=136 exch2_tBasey(680)=0 exch2_txGlobalo(680)=1667 exch2_tyGlobalo(680)=1 exch2_isWedge(680)=0 exch2_isNedge(680)=0 exch2_isEedge(680)=0 exch2_isSedge(680)=1 exch2_myFace(680)=4 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)=35 exch2_jHi(1,680)=35 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)=390 exch2_iLo(2,680)=0 exch2_iHi(2,680)=35 exch2_jLo(2,680)=0 exch2_jHi(2,680)=0 exch2_opposingSend(2,680)=3 exch2_pij(1,2,680)=0 exch2_pij(2,2,680)=-1 exch2_pij(3,2,680)=1 exch2_pij(4,2,680)=0 exch2_oi(2,680)=511 exch2_oj(2,680)=-510 exch2_neighbourId(3,680)=681 exch2_iLo(3,680)=35 exch2_iHi(3,680)=35 exch2_jLo(3,680)=0 exch2_jHi(3,680)=35 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)=35 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)=34 exch2_tBasex(681)=170 exch2_tBasey(681)=0 exch2_txGlobalo(681)=1701 exch2_tyGlobalo(681)=1 exch2_isWedge(681)=0 exch2_isNedge(681)=0 exch2_isEedge(681)=0 exch2_isSedge(681)=1 exch2_myFace(681)=4 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)=35 exch2_jHi(1,681)=35 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)=375 exch2_iLo(2,681)=0 exch2_iHi(2,681)=35 exch2_jLo(2,681)=0 exch2_jHi(2,681)=0 exch2_opposingSend(2,681)=3 exch2_pij(1,2,681)=0 exch2_pij(2,2,681)=-1 exch2_pij(3,2,681)=1 exch2_pij(4,2,681)=0 exch2_oi(2,681)=511 exch2_oj(2,681)=-510 exch2_neighbourId(3,681)=682 exch2_iLo(3,681)=35 exch2_iHi(3,681)=35 exch2_jLo(3,681)=0 exch2_jHi(3,681)=35 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)=35 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)=34 exch2_tBasex(682)=204 exch2_tBasey(682)=0 exch2_txGlobalo(682)=1735 exch2_tyGlobalo(682)=1 exch2_isWedge(682)=0 exch2_isNedge(682)=0 exch2_isEedge(682)=0 exch2_isSedge(682)=1 exch2_myFace(682)=4 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)=35 exch2_jHi(1,682)=35 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)=360 exch2_iLo(2,682)=0 exch2_iHi(2,682)=35 exch2_jLo(2,682)=0 exch2_jHi(2,682)=0 exch2_opposingSend(2,682)=3 exch2_pij(1,2,682)=0 exch2_pij(2,2,682)=-1 exch2_pij(3,2,682)=1 exch2_pij(4,2,682)=0 exch2_oi(2,682)=511 exch2_oj(2,682)=-510 exch2_neighbourId(3,682)=683 exch2_iLo(3,682)=35 exch2_iHi(3,682)=35 exch2_jLo(3,682)=0 exch2_jHi(3,682)=35 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)=35 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)=34 exch2_tBasex(683)=238 exch2_tBasey(683)=0 exch2_txGlobalo(683)=1769 exch2_tyGlobalo(683)=1 exch2_isWedge(683)=0 exch2_isNedge(683)=0 exch2_isEedge(683)=0 exch2_isSedge(683)=1 exch2_myFace(683)=4 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)=35 exch2_jHi(1,683)=35 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)=345 exch2_iLo(2,683)=0 exch2_iHi(2,683)=35 exch2_jLo(2,683)=0 exch2_jHi(2,683)=0 exch2_opposingSend(2,683)=3 exch2_pij(1,2,683)=0 exch2_pij(2,2,683)=-1 exch2_pij(3,2,683)=1 exch2_pij(4,2,683)=0 exch2_oi(2,683)=511 exch2_oj(2,683)=-510 exch2_neighbourId(3,683)=684 exch2_iLo(3,683)=35 exch2_iHi(3,683)=35 exch2_jLo(3,683)=0 exch2_jHi(3,683)=35 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)=35 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)=34 exch2_tBasex(684)=272 exch2_tBasey(684)=0 exch2_txGlobalo(684)=1803 exch2_tyGlobalo(684)=1 exch2_isWedge(684)=0 exch2_isNedge(684)=0 exch2_isEedge(684)=0 exch2_isSedge(684)=1 exch2_myFace(684)=4 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)=35 exch2_jHi(1,684)=35 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)=330 exch2_iLo(2,684)=0 exch2_iHi(2,684)=35 exch2_jLo(2,684)=0 exch2_jHi(2,684)=0 exch2_opposingSend(2,684)=3 exch2_pij(1,2,684)=0 exch2_pij(2,2,684)=-1 exch2_pij(3,2,684)=1 exch2_pij(4,2,684)=0 exch2_oi(2,684)=511 exch2_oj(2,684)=-510 exch2_neighbourId(3,684)=685 exch2_iLo(3,684)=35 exch2_iHi(3,684)=35 exch2_jLo(3,684)=0 exch2_jHi(3,684)=35 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)=35 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)=34 exch2_tBasex(685)=306 exch2_tBasey(685)=0 exch2_txGlobalo(685)=1837 exch2_tyGlobalo(685)=1 exch2_isWedge(685)=0 exch2_isNedge(685)=0 exch2_isEedge(685)=0 exch2_isSedge(685)=1 exch2_myFace(685)=4 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)=35 exch2_jHi(1,685)=35 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)=315 exch2_iLo(2,685)=0 exch2_iHi(2,685)=35 exch2_jLo(2,685)=0 exch2_jHi(2,685)=0 exch2_opposingSend(2,685)=3 exch2_pij(1,2,685)=0 exch2_pij(2,2,685)=-1 exch2_pij(3,2,685)=1 exch2_pij(4,2,685)=0 exch2_oi(2,685)=511 exch2_oj(2,685)=-510 exch2_neighbourId(3,685)=686 exch2_iLo(3,685)=35 exch2_iHi(3,685)=35 exch2_jLo(3,685)=0 exch2_jHi(3,685)=35 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)=35 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)=34 exch2_tBasex(686)=340 exch2_tBasey(686)=0 exch2_txGlobalo(686)=1871 exch2_tyGlobalo(686)=1 exch2_isWedge(686)=0 exch2_isNedge(686)=0 exch2_isEedge(686)=0 exch2_isSedge(686)=1 exch2_myFace(686)=4 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)=35 exch2_jHi(1,686)=35 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)=300 exch2_iLo(2,686)=0 exch2_iHi(2,686)=35 exch2_jLo(2,686)=0 exch2_jHi(2,686)=0 exch2_opposingSend(2,686)=3 exch2_pij(1,2,686)=0 exch2_pij(2,2,686)=-1 exch2_pij(3,2,686)=1 exch2_pij(4,2,686)=0 exch2_oi(2,686)=511 exch2_oj(2,686)=-510 exch2_neighbourId(3,686)=687 exch2_iLo(3,686)=35 exch2_iHi(3,686)=35 exch2_jLo(3,686)=0 exch2_jHi(3,686)=35 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)=35 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)=34 exch2_tBasex(687)=374 exch2_tBasey(687)=0 exch2_txGlobalo(687)=1905 exch2_tyGlobalo(687)=1 exch2_isWedge(687)=0 exch2_isNedge(687)=0 exch2_isEedge(687)=0 exch2_isSedge(687)=1 exch2_myFace(687)=4 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)=35 exch2_jHi(1,687)=35 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)=285 exch2_iLo(2,687)=0 exch2_iHi(2,687)=35 exch2_jLo(2,687)=0 exch2_jHi(2,687)=0 exch2_opposingSend(2,687)=3 exch2_pij(1,2,687)=0 exch2_pij(2,2,687)=-1 exch2_pij(3,2,687)=1 exch2_pij(4,2,687)=0 exch2_oi(2,687)=511 exch2_oj(2,687)=-510 exch2_neighbourId(3,687)=688 exch2_iLo(3,687)=35 exch2_iHi(3,687)=35 exch2_jLo(3,687)=0 exch2_jHi(3,687)=35 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)=35 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)=34 exch2_tBasex(688)=408 exch2_tBasey(688)=0 exch2_txGlobalo(688)=1939 exch2_tyGlobalo(688)=1 exch2_isWedge(688)=0 exch2_isNedge(688)=0 exch2_isEedge(688)=0 exch2_isSedge(688)=1 exch2_myFace(688)=4 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)=35 exch2_jHi(1,688)=35 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)=270 exch2_iLo(2,688)=0 exch2_iHi(2,688)=35 exch2_jLo(2,688)=0 exch2_jHi(2,688)=0 exch2_opposingSend(2,688)=3 exch2_pij(1,2,688)=0 exch2_pij(2,2,688)=-1 exch2_pij(3,2,688)=1 exch2_pij(4,2,688)=0 exch2_oi(2,688)=511 exch2_oj(2,688)=-510 exch2_neighbourId(3,688)=689 exch2_iLo(3,688)=35 exch2_iHi(3,688)=35 exch2_jLo(3,688)=0 exch2_jHi(3,688)=35 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)=35 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)=34 exch2_tBasex(689)=442 exch2_tBasey(689)=0 exch2_txGlobalo(689)=1973 exch2_tyGlobalo(689)=1 exch2_isWedge(689)=0 exch2_isNedge(689)=0 exch2_isEedge(689)=0 exch2_isSedge(689)=1 exch2_myFace(689)=4 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)=35 exch2_jHi(1,689)=35 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)=255 exch2_iLo(2,689)=0 exch2_iHi(2,689)=35 exch2_jLo(2,689)=0 exch2_jHi(2,689)=0 exch2_opposingSend(2,689)=3 exch2_pij(1,2,689)=0 exch2_pij(2,2,689)=-1 exch2_pij(3,2,689)=1 exch2_pij(4,2,689)=0 exch2_oi(2,689)=511 exch2_oj(2,689)=-510 exch2_neighbourId(3,689)=690 exch2_iLo(3,689)=35 exch2_iHi(3,689)=35 exch2_jLo(3,689)=0 exch2_jHi(3,689)=35 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)=35 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)=34 exch2_tBasex(690)=476 exch2_tBasey(690)=0 exch2_txGlobalo(690)=2007 exch2_tyGlobalo(690)=1 exch2_isWedge(690)=0 exch2_isNedge(690)=0 exch2_isEedge(690)=1 exch2_isSedge(690)=1 exch2_myFace(690)=4 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)=35 exch2_jHi(1,690)=35 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)=240 exch2_iLo(2,690)=0 exch2_iHi(2,690)=35 exch2_jLo(2,690)=0 exch2_jHi(2,690)=0 exch2_opposingSend(2,690)=3 exch2_pij(1,2,690)=0 exch2_pij(2,2,690)=-1 exch2_pij(3,2,690)=1 exch2_pij(4,2,690)=0 exch2_oi(2,690)=511 exch2_oj(2,690)=-510 exch2_neighbourId(3,690)=1140 exch2_iLo(3,690)=35 exch2_iHi(3,690)=35 exch2_jLo(3,690)=0 exch2_jHi(3,690)=35 exch2_opposingSend(3,690)=2 exch2_pij(1,3,690)=0 exch2_pij(2,3,690)=1 exch2_pij(3,3,690)=-1 exch2_pij(4,3,690)=0 exch2_oi(3,690)=510 exch2_oj(3,690)=511 exch2_neighbourId(4,690)=689 exch2_iLo(4,690)=0 exch2_iHi(4,690)=0 exch2_jLo(4,690)=0 exch2_jHi(4,690)=35 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)=34 exch2_tBasex(691)=0 exch2_tBasey(691)=34 exch2_txGlobalo(691)=1531 exch2_tyGlobalo(691)=35 exch2_isWedge(691)=1 exch2_isNedge(691)=0 exch2_isEedge(691)=0 exch2_isSedge(691)=0 exch2_myFace(691)=4 exch2_mydNx(691)=510 exch2_mydNy(691)=510 exch2_nNeighbours(691)=4 exch2_neighbourId(1,691)=706 exch2_iLo(1,691)=0 exch2_iHi(1,691)=35 exch2_jLo(1,691)=35 exch2_jHi(1,691)=35 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)=35 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)=480 exch2_iLo(4,691)=0 exch2_iHi(4,691)=0 exch2_jLo(4,691)=0 exch2_jHi(4,691)=35 exch2_opposingSend(4,691)=3 exch2_pij(1,4,691)=1 exch2_pij(2,4,691)=0 exch2_pij(3,4,691)=0 exch2_pij(4,4,691)=1 exch2_oi(4,691)=-510 exch2_oj(4,691)=0 RETURN END SUBROUTINE W2_E2SETUP_692 C Topology for tile 692 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(692)=34 exch2_tNy(692)=34 exch2_tBasex(692)=34 exch2_tBasey(692)=34 exch2_txGlobalo(692)=1565 exch2_tyGlobalo(692)=35 exch2_isWedge(692)=0 exch2_isNedge(692)=0 exch2_isEedge(692)=0 exch2_isSedge(692)=0 exch2_myFace(692)=4 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)=35 exch2_jHi(1,692)=35 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)=35 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)=35 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)=34 exch2_tBasex(693)=68 exch2_tBasey(693)=34 exch2_txGlobalo(693)=1599 exch2_tyGlobalo(693)=35 exch2_isWedge(693)=0 exch2_isNedge(693)=0 exch2_isEedge(693)=0 exch2_isSedge(693)=0 exch2_myFace(693)=4 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)=35 exch2_jHi(1,693)=35 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)=35 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)=35 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)=34 exch2_tBasex(694)=102 exch2_tBasey(694)=34 exch2_txGlobalo(694)=1633 exch2_tyGlobalo(694)=35 exch2_isWedge(694)=0 exch2_isNedge(694)=0 exch2_isEedge(694)=0 exch2_isSedge(694)=0 exch2_myFace(694)=4 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)=35 exch2_jHi(1,694)=35 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)=35 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)=35 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)=34 exch2_tBasex(695)=136 exch2_tBasey(695)=34 exch2_txGlobalo(695)=1667 exch2_tyGlobalo(695)=35 exch2_isWedge(695)=0 exch2_isNedge(695)=0 exch2_isEedge(695)=0 exch2_isSedge(695)=0 exch2_myFace(695)=4 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)=35 exch2_jHi(1,695)=35 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)=35 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)=35 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)=34 exch2_tBasex(696)=170 exch2_tBasey(696)=34 exch2_txGlobalo(696)=1701 exch2_tyGlobalo(696)=35 exch2_isWedge(696)=0 exch2_isNedge(696)=0 exch2_isEedge(696)=0 exch2_isSedge(696)=0 exch2_myFace(696)=4 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)=35 exch2_jHi(1,696)=35 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)=35 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)=35 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)=34 exch2_tBasex(697)=204 exch2_tBasey(697)=34 exch2_txGlobalo(697)=1735 exch2_tyGlobalo(697)=35 exch2_isWedge(697)=0 exch2_isNedge(697)=0 exch2_isEedge(697)=0 exch2_isSedge(697)=0 exch2_myFace(697)=4 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)=35 exch2_jHi(1,697)=35 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)=35 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)=35 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)=34 exch2_tBasex(698)=238 exch2_tBasey(698)=34 exch2_txGlobalo(698)=1769 exch2_tyGlobalo(698)=35 exch2_isWedge(698)=0 exch2_isNedge(698)=0 exch2_isEedge(698)=0 exch2_isSedge(698)=0 exch2_myFace(698)=4 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)=35 exch2_jHi(1,698)=35 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)=35 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)=35 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)=34 exch2_tBasex(699)=272 exch2_tBasey(699)=34 exch2_txGlobalo(699)=1803 exch2_tyGlobalo(699)=35 exch2_isWedge(699)=0 exch2_isNedge(699)=0 exch2_isEedge(699)=0 exch2_isSedge(699)=0 exch2_myFace(699)=4 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)=35 exch2_jHi(1,699)=35 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)=35 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)=35 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)=34 exch2_tBasex(700)=306 exch2_tBasey(700)=34 exch2_txGlobalo(700)=1837 exch2_tyGlobalo(700)=35 exch2_isWedge(700)=0 exch2_isNedge(700)=0 exch2_isEedge(700)=0 exch2_isSedge(700)=0 exch2_myFace(700)=4 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)=35 exch2_jHi(1,700)=35 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)=35 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)=35 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)=34 exch2_tBasex(701)=340 exch2_tBasey(701)=34 exch2_txGlobalo(701)=1871 exch2_tyGlobalo(701)=35 exch2_isWedge(701)=0 exch2_isNedge(701)=0 exch2_isEedge(701)=0 exch2_isSedge(701)=0 exch2_myFace(701)=4 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)=35 exch2_jHi(1,701)=35 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)=35 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)=35 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)=34 exch2_tBasex(702)=374 exch2_tBasey(702)=34 exch2_txGlobalo(702)=1905 exch2_tyGlobalo(702)=35 exch2_isWedge(702)=0 exch2_isNedge(702)=0 exch2_isEedge(702)=0 exch2_isSedge(702)=0 exch2_myFace(702)=4 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)=35 exch2_jHi(1,702)=35 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)=35 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)=35 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)=34 exch2_tBasex(703)=408 exch2_tBasey(703)=34 exch2_txGlobalo(703)=1939 exch2_tyGlobalo(703)=35 exch2_isWedge(703)=0 exch2_isNedge(703)=0 exch2_isEedge(703)=0 exch2_isSedge(703)=0 exch2_myFace(703)=4 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)=35 exch2_jHi(1,703)=35 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)=35 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)=35 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)=34 exch2_tBasex(704)=442 exch2_tBasey(704)=34 exch2_txGlobalo(704)=1973 exch2_tyGlobalo(704)=35 exch2_isWedge(704)=0 exch2_isNedge(704)=0 exch2_isEedge(704)=0 exch2_isSedge(704)=0 exch2_myFace(704)=4 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)=35 exch2_jHi(1,704)=35 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)=35 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)=35 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)=34 exch2_tBasex(705)=476 exch2_tBasey(705)=34 exch2_txGlobalo(705)=2007 exch2_tyGlobalo(705)=35 exch2_isWedge(705)=0 exch2_isNedge(705)=0 exch2_isEedge(705)=1 exch2_isSedge(705)=0 exch2_myFace(705)=4 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)=35 exch2_jHi(1,705)=35 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)=1139 exch2_iLo(3,705)=35 exch2_iHi(3,705)=35 exch2_jLo(3,705)=0 exch2_jHi(3,705)=35 exch2_opposingSend(3,705)=2 exch2_pij(1,3,705)=0 exch2_pij(2,3,705)=1 exch2_pij(3,3,705)=-1 exch2_pij(4,3,705)=0 exch2_oi(3,705)=510 exch2_oj(3,705)=511 exch2_neighbourId(4,705)=704 exch2_iLo(4,705)=0 exch2_iHi(4,705)=0 exch2_jLo(4,705)=0 exch2_jHi(4,705)=35 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)=34 exch2_tBasex(706)=0 exch2_tBasey(706)=68 exch2_txGlobalo(706)=1531 exch2_tyGlobalo(706)=69 exch2_isWedge(706)=1 exch2_isNedge(706)=0 exch2_isEedge(706)=0 exch2_isSedge(706)=0 exch2_myFace(706)=4 exch2_mydNx(706)=510 exch2_mydNy(706)=510 exch2_nNeighbours(706)=4 exch2_neighbourId(1,706)=721 exch2_iLo(1,706)=0 exch2_iHi(1,706)=35 exch2_jLo(1,706)=35 exch2_jHi(1,706)=35 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)=35 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)=495 exch2_iLo(4,706)=0 exch2_iHi(4,706)=0 exch2_jLo(4,706)=0 exch2_jHi(4,706)=35 exch2_opposingSend(4,706)=3 exch2_pij(1,4,706)=1 exch2_pij(2,4,706)=0 exch2_pij(3,4,706)=0 exch2_pij(4,4,706)=1 exch2_oi(4,706)=-510 exch2_oj(4,706)=0 RETURN END SUBROUTINE W2_E2SETUP_707 C Topology for tile 707 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(707)=34 exch2_tNy(707)=34 exch2_tBasex(707)=34 exch2_tBasey(707)=68 exch2_txGlobalo(707)=1565 exch2_tyGlobalo(707)=69 exch2_isWedge(707)=0 exch2_isNedge(707)=0 exch2_isEedge(707)=0 exch2_isSedge(707)=0 exch2_myFace(707)=4 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)=35 exch2_jHi(1,707)=35 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)=35 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)=35 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)=34 exch2_tBasex(708)=68 exch2_tBasey(708)=68 exch2_txGlobalo(708)=1599 exch2_tyGlobalo(708)=69 exch2_isWedge(708)=0 exch2_isNedge(708)=0 exch2_isEedge(708)=0 exch2_isSedge(708)=0 exch2_myFace(708)=4 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)=35 exch2_jHi(1,708)=35 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)=35 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)=35 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)=34 exch2_tBasex(709)=102 exch2_tBasey(709)=68 exch2_txGlobalo(709)=1633 exch2_tyGlobalo(709)=69 exch2_isWedge(709)=0 exch2_isNedge(709)=0 exch2_isEedge(709)=0 exch2_isSedge(709)=0 exch2_myFace(709)=4 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)=35 exch2_jHi(1,709)=35 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)=35 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)=35 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)=34 exch2_tBasex(710)=136 exch2_tBasey(710)=68 exch2_txGlobalo(710)=1667 exch2_tyGlobalo(710)=69 exch2_isWedge(710)=0 exch2_isNedge(710)=0 exch2_isEedge(710)=0 exch2_isSedge(710)=0 exch2_myFace(710)=4 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)=35 exch2_jHi(1,710)=35 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)=35 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)=35 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)=34 exch2_tBasex(711)=170 exch2_tBasey(711)=68 exch2_txGlobalo(711)=1701 exch2_tyGlobalo(711)=69 exch2_isWedge(711)=0 exch2_isNedge(711)=0 exch2_isEedge(711)=0 exch2_isSedge(711)=0 exch2_myFace(711)=4 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)=35 exch2_jHi(1,711)=35 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)=35 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)=35 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)=34 exch2_tBasex(712)=204 exch2_tBasey(712)=68 exch2_txGlobalo(712)=1735 exch2_tyGlobalo(712)=69 exch2_isWedge(712)=0 exch2_isNedge(712)=0 exch2_isEedge(712)=0 exch2_isSedge(712)=0 exch2_myFace(712)=4 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)=35 exch2_jHi(1,712)=35 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)=35 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)=35 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)=34 exch2_tBasex(713)=238 exch2_tBasey(713)=68 exch2_txGlobalo(713)=1769 exch2_tyGlobalo(713)=69 exch2_isWedge(713)=0 exch2_isNedge(713)=0 exch2_isEedge(713)=0 exch2_isSedge(713)=0 exch2_myFace(713)=4 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)=35 exch2_jHi(1,713)=35 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)=35 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)=35 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)=34 exch2_tBasex(714)=272 exch2_tBasey(714)=68 exch2_txGlobalo(714)=1803 exch2_tyGlobalo(714)=69 exch2_isWedge(714)=0 exch2_isNedge(714)=0 exch2_isEedge(714)=0 exch2_isSedge(714)=0 exch2_myFace(714)=4 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)=35 exch2_jHi(1,714)=35 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)=35 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)=35 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)=34 exch2_tBasex(715)=306 exch2_tBasey(715)=68 exch2_txGlobalo(715)=1837 exch2_tyGlobalo(715)=69 exch2_isWedge(715)=0 exch2_isNedge(715)=0 exch2_isEedge(715)=0 exch2_isSedge(715)=0 exch2_myFace(715)=4 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)=35 exch2_jHi(1,715)=35 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)=35 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)=35 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)=34 exch2_tBasex(716)=340 exch2_tBasey(716)=68 exch2_txGlobalo(716)=1871 exch2_tyGlobalo(716)=69 exch2_isWedge(716)=0 exch2_isNedge(716)=0 exch2_isEedge(716)=0 exch2_isSedge(716)=0 exch2_myFace(716)=4 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)=35 exch2_jHi(1,716)=35 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)=35 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)=35 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)=34 exch2_tBasex(717)=374 exch2_tBasey(717)=68 exch2_txGlobalo(717)=1905 exch2_tyGlobalo(717)=69 exch2_isWedge(717)=0 exch2_isNedge(717)=0 exch2_isEedge(717)=0 exch2_isSedge(717)=0 exch2_myFace(717)=4 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)=35 exch2_jHi(1,717)=35 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)=35 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)=35 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)=34 exch2_tBasex(718)=408 exch2_tBasey(718)=68 exch2_txGlobalo(718)=1939 exch2_tyGlobalo(718)=69 exch2_isWedge(718)=0 exch2_isNedge(718)=0 exch2_isEedge(718)=0 exch2_isSedge(718)=0 exch2_myFace(718)=4 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)=35 exch2_jHi(1,718)=35 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)=35 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)=35 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)=34 exch2_tBasex(719)=442 exch2_tBasey(719)=68 exch2_txGlobalo(719)=1973 exch2_tyGlobalo(719)=69 exch2_isWedge(719)=0 exch2_isNedge(719)=0 exch2_isEedge(719)=0 exch2_isSedge(719)=0 exch2_myFace(719)=4 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)=35 exch2_jHi(1,719)=35 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)=35 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)=35 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)=34 exch2_tBasex(720)=476 exch2_tBasey(720)=68 exch2_txGlobalo(720)=2007 exch2_tyGlobalo(720)=69 exch2_isWedge(720)=0 exch2_isNedge(720)=0 exch2_isEedge(720)=1 exch2_isSedge(720)=0 exch2_myFace(720)=4 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)=35 exch2_jHi(1,720)=35 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)=1138 exch2_iLo(3,720)=35 exch2_iHi(3,720)=35 exch2_jLo(3,720)=0 exch2_jHi(3,720)=35 exch2_opposingSend(3,720)=2 exch2_pij(1,3,720)=0 exch2_pij(2,3,720)=1 exch2_pij(3,3,720)=-1 exch2_pij(4,3,720)=0 exch2_oi(3,720)=510 exch2_oj(3,720)=511 exch2_neighbourId(4,720)=719 exch2_iLo(4,720)=0 exch2_iHi(4,720)=0 exch2_jLo(4,720)=0 exch2_jHi(4,720)=35 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)=34 exch2_tBasex(721)=0 exch2_tBasey(721)=102 exch2_txGlobalo(721)=1531 exch2_tyGlobalo(721)=103 exch2_isWedge(721)=1 exch2_isNedge(721)=0 exch2_isEedge(721)=0 exch2_isSedge(721)=0 exch2_myFace(721)=4 exch2_mydNx(721)=510 exch2_mydNy(721)=510 exch2_nNeighbours(721)=4 exch2_neighbourId(1,721)=736 exch2_iLo(1,721)=0 exch2_iHi(1,721)=35 exch2_jLo(1,721)=35 exch2_jHi(1,721)=35 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)=35 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)=510 exch2_iLo(4,721)=0 exch2_iHi(4,721)=0 exch2_jLo(4,721)=0 exch2_jHi(4,721)=35 exch2_opposingSend(4,721)=3 exch2_pij(1,4,721)=1 exch2_pij(2,4,721)=0 exch2_pij(3,4,721)=0 exch2_pij(4,4,721)=1 exch2_oi(4,721)=-510 exch2_oj(4,721)=0 RETURN END SUBROUTINE W2_E2SETUP_722 C Topology for tile 722 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(722)=34 exch2_tNy(722)=34 exch2_tBasex(722)=34 exch2_tBasey(722)=102 exch2_txGlobalo(722)=1565 exch2_tyGlobalo(722)=103 exch2_isWedge(722)=0 exch2_isNedge(722)=0 exch2_isEedge(722)=0 exch2_isSedge(722)=0 exch2_myFace(722)=4 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)=35 exch2_jHi(1,722)=35 exch2_opposingSend(1,722)=2 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)=35 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)=35 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)=34 exch2_tBasex(723)=68 exch2_tBasey(723)=102 exch2_txGlobalo(723)=1599 exch2_tyGlobalo(723)=103 exch2_isWedge(723)=0 exch2_isNedge(723)=0 exch2_isEedge(723)=0 exch2_isSedge(723)=0 exch2_myFace(723)=4 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)=35 exch2_jHi(1,723)=35 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)=35 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)=35 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)=34 exch2_tBasex(724)=102 exch2_tBasey(724)=102 exch2_txGlobalo(724)=1633 exch2_tyGlobalo(724)=103 exch2_isWedge(724)=0 exch2_isNedge(724)=0 exch2_isEedge(724)=0 exch2_isSedge(724)=0 exch2_myFace(724)=4 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)=35 exch2_jHi(1,724)=35 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)=35 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)=35 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)=34 exch2_tBasex(725)=136 exch2_tBasey(725)=102 exch2_txGlobalo(725)=1667 exch2_tyGlobalo(725)=103 exch2_isWedge(725)=0 exch2_isNedge(725)=0 exch2_isEedge(725)=0 exch2_isSedge(725)=0 exch2_myFace(725)=4 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)=35 exch2_jHi(1,725)=35 exch2_opposingSend(1,725)=2 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)=35 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)=35 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)=34 exch2_tBasex(726)=170 exch2_tBasey(726)=102 exch2_txGlobalo(726)=1701 exch2_tyGlobalo(726)=103 exch2_isWedge(726)=0 exch2_isNedge(726)=0 exch2_isEedge(726)=0 exch2_isSedge(726)=0 exch2_myFace(726)=4 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)=35 exch2_jHi(1,726)=35 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)=35 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)=35 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)=34 exch2_tBasex(727)=204 exch2_tBasey(727)=102 exch2_txGlobalo(727)=1735 exch2_tyGlobalo(727)=103 exch2_isWedge(727)=0 exch2_isNedge(727)=0 exch2_isEedge(727)=0 exch2_isSedge(727)=0 exch2_myFace(727)=4 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)=35 exch2_jHi(1,727)=35 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)=35 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)=35 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)=34 exch2_tBasex(728)=238 exch2_tBasey(728)=102 exch2_txGlobalo(728)=1769 exch2_tyGlobalo(728)=103 exch2_isWedge(728)=0 exch2_isNedge(728)=0 exch2_isEedge(728)=0 exch2_isSedge(728)=0 exch2_myFace(728)=4 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)=35 exch2_jHi(1,728)=35 exch2_opposingSend(1,728)=2 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)=35 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)=35 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)=34 exch2_tBasex(729)=272 exch2_tBasey(729)=102 exch2_txGlobalo(729)=1803 exch2_tyGlobalo(729)=103 exch2_isWedge(729)=0 exch2_isNedge(729)=0 exch2_isEedge(729)=0 exch2_isSedge(729)=0 exch2_myFace(729)=4 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)=35 exch2_jHi(1,729)=35 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)=35 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)=35 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)=34 exch2_tBasex(730)=306 exch2_tBasey(730)=102 exch2_txGlobalo(730)=1837 exch2_tyGlobalo(730)=103 exch2_isWedge(730)=0 exch2_isNedge(730)=0 exch2_isEedge(730)=0 exch2_isSedge(730)=0 exch2_myFace(730)=4 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)=35 exch2_jHi(1,730)=35 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)=35 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)=35 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)=34 exch2_tBasex(731)=340 exch2_tBasey(731)=102 exch2_txGlobalo(731)=1871 exch2_tyGlobalo(731)=103 exch2_isWedge(731)=0 exch2_isNedge(731)=0 exch2_isEedge(731)=0 exch2_isSedge(731)=0 exch2_myFace(731)=4 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)=35 exch2_jHi(1,731)=35 exch2_opposingSend(1,731)=2 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)=35 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)=35 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)=34 exch2_tBasex(732)=374 exch2_tBasey(732)=102 exch2_txGlobalo(732)=1905 exch2_tyGlobalo(732)=103 exch2_isWedge(732)=0 exch2_isNedge(732)=0 exch2_isEedge(732)=0 exch2_isSedge(732)=0 exch2_myFace(732)=4 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)=35 exch2_jHi(1,732)=35 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)=35 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)=35 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)=34 exch2_tBasex(733)=408 exch2_tBasey(733)=102 exch2_txGlobalo(733)=1939 exch2_tyGlobalo(733)=103 exch2_isWedge(733)=0 exch2_isNedge(733)=0 exch2_isEedge(733)=0 exch2_isSedge(733)=0 exch2_myFace(733)=4 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)=35 exch2_jHi(1,733)=35 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)=35 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)=35 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)=34 exch2_tBasex(734)=442 exch2_tBasey(734)=102 exch2_txGlobalo(734)=1973 exch2_tyGlobalo(734)=103 exch2_isWedge(734)=0 exch2_isNedge(734)=0 exch2_isEedge(734)=0 exch2_isSedge(734)=0 exch2_myFace(734)=4 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)=35 exch2_jHi(1,734)=35 exch2_opposingSend(1,734)=2 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)=35 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)=35 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)=34 exch2_tBasex(735)=476 exch2_tBasey(735)=102 exch2_txGlobalo(735)=2007 exch2_tyGlobalo(735)=103 exch2_isWedge(735)=0 exch2_isNedge(735)=0 exch2_isEedge(735)=1 exch2_isSedge(735)=0 exch2_myFace(735)=4 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)=35 exch2_jHi(1,735)=35 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)=1137 exch2_iLo(3,735)=35 exch2_iHi(3,735)=35 exch2_jLo(3,735)=0 exch2_jHi(3,735)=35 exch2_opposingSend(3,735)=2 exch2_pij(1,3,735)=0 exch2_pij(2,3,735)=1 exch2_pij(3,3,735)=-1 exch2_pij(4,3,735)=0 exch2_oi(3,735)=510 exch2_oj(3,735)=511 exch2_neighbourId(4,735)=734 exch2_iLo(4,735)=0 exch2_iHi(4,735)=0 exch2_jLo(4,735)=0 exch2_jHi(4,735)=35 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)=34 exch2_tBasex(736)=0 exch2_tBasey(736)=136 exch2_txGlobalo(736)=1531 exch2_tyGlobalo(736)=137 exch2_isWedge(736)=1 exch2_isNedge(736)=0 exch2_isEedge(736)=0 exch2_isSedge(736)=0 exch2_myFace(736)=4 exch2_mydNx(736)=510 exch2_mydNy(736)=510 exch2_nNeighbours(736)=4 exch2_neighbourId(1,736)=751 exch2_iLo(1,736)=0 exch2_iHi(1,736)=35 exch2_jLo(1,736)=35 exch2_jHi(1,736)=35 exch2_opposingSend(1,736)=2 exch2_pij(1,1,736)=1 exch2_pij(2,1,736)=0 exch2_pij(3,1,736)=0 exch2_pij(4,1,736)=1 exch2_oi(1,736)=0 exch2_oj(1,736)=0 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)=35 exch2_opposingSend(3,736)=4 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)=525 exch2_iLo(4,736)=0 exch2_iHi(4,736)=0 exch2_jLo(4,736)=0 exch2_jHi(4,736)=35 exch2_opposingSend(4,736)=3 exch2_pij(1,4,736)=1 exch2_pij(2,4,736)=0 exch2_pij(3,4,736)=0 exch2_pij(4,4,736)=1 exch2_oi(4,736)=-510 exch2_oj(4,736)=0 RETURN END SUBROUTINE W2_E2SETUP_737 C Topology for tile 737 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(737)=34 exch2_tNy(737)=34 exch2_tBasex(737)=34 exch2_tBasey(737)=136 exch2_txGlobalo(737)=1565 exch2_tyGlobalo(737)=137 exch2_isWedge(737)=0 exch2_isNedge(737)=0 exch2_isEedge(737)=0 exch2_isSedge(737)=0 exch2_myFace(737)=4 exch2_mydNx(737)=510 exch2_mydNy(737)=510 exch2_nNeighbours(737)=4 exch2_neighbourId(1,737)=752 exch2_iLo(1,737)=0 exch2_iHi(1,737)=35 exch2_jLo(1,737)=35 exch2_jHi(1,737)=35 exch2_opposingSend(1,737)=2 exch2_pij(1,1,737)=1 exch2_pij(2,1,737)=0 exch2_pij(3,1,737)=0 exch2_pij(4,1,737)=1 exch2_oi(1,737)=0 exch2_oj(1,737)=0 exch2_neighbourId(2,737)=722 exch2_iLo(2,737)=0 exch2_iHi(2,737)=35 exch2_jLo(2,737)=0 exch2_jHi(2,737)=0 exch2_opposingSend(2,737)=1 exch2_pij(1,2,737)=1 exch2_pij(2,2,737)=0 exch2_pij(3,2,737)=0 exch2_pij(4,2,737)=1 exch2_oi(2,737)=0 exch2_oj(2,737)=0 exch2_neighbourId(3,737)=738 exch2_iLo(3,737)=35 exch2_iHi(3,737)=35 exch2_jLo(3,737)=0 exch2_jHi(3,737)=35 exch2_opposingSend(3,737)=4 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)=736 exch2_iLo(4,737)=0 exch2_iHi(4,737)=0 exch2_jLo(4,737)=0 exch2_jHi(4,737)=35 exch2_opposingSend(4,737)=3 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 RETURN END SUBROUTINE W2_E2SETUP_738 C Topology for tile 738 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(738)=34 exch2_tNy(738)=34 exch2_tBasex(738)=68 exch2_tBasey(738)=136 exch2_txGlobalo(738)=1599 exch2_tyGlobalo(738)=137 exch2_isWedge(738)=0 exch2_isNedge(738)=0 exch2_isEedge(738)=0 exch2_isSedge(738)=0 exch2_myFace(738)=4 exch2_mydNx(738)=510 exch2_mydNy(738)=510 exch2_nNeighbours(738)=4 exch2_neighbourId(1,738)=753 exch2_iLo(1,738)=0 exch2_iHi(1,738)=35 exch2_jLo(1,738)=35 exch2_jHi(1,738)=35 exch2_opposingSend(1,738)=2 exch2_pij(1,1,738)=1 exch2_pij(2,1,738)=0 exch2_pij(3,1,738)=0 exch2_pij(4,1,738)=1 exch2_oi(1,738)=0 exch2_oj(1,738)=0 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)=35 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)=35 exch2_opposingSend(4,738)=3 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)=34 exch2_tBasex(739)=102 exch2_tBasey(739)=136 exch2_txGlobalo(739)=1633 exch2_tyGlobalo(739)=137 exch2_isWedge(739)=0 exch2_isNedge(739)=0 exch2_isEedge(739)=0 exch2_isSedge(739)=0 exch2_myFace(739)=4 exch2_mydNx(739)=510 exch2_mydNy(739)=510 exch2_nNeighbours(739)=4 exch2_neighbourId(1,739)=754 exch2_iLo(1,739)=0 exch2_iHi(1,739)=35 exch2_jLo(1,739)=35 exch2_jHi(1,739)=35 exch2_opposingSend(1,739)=2 exch2_pij(1,1,739)=1 exch2_pij(2,1,739)=0 exch2_pij(3,1,739)=0 exch2_pij(4,1,739)=1 exch2_oi(1,739)=0 exch2_oj(1,739)=0 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)=35 exch2_opposingSend(3,739)=4 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)=35 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)=34 exch2_tBasex(740)=136 exch2_tBasey(740)=136 exch2_txGlobalo(740)=1667 exch2_tyGlobalo(740)=137 exch2_isWedge(740)=0 exch2_isNedge(740)=0 exch2_isEedge(740)=0 exch2_isSedge(740)=0 exch2_myFace(740)=4 exch2_mydNx(740)=510 exch2_mydNy(740)=510 exch2_nNeighbours(740)=4 exch2_neighbourId(1,740)=755 exch2_iLo(1,740)=0 exch2_iHi(1,740)=35 exch2_jLo(1,740)=35 exch2_jHi(1,740)=35 exch2_opposingSend(1,740)=2 exch2_pij(1,1,740)=1 exch2_pij(2,1,740)=0 exch2_pij(3,1,740)=0 exch2_pij(4,1,740)=1 exch2_oi(1,740)=0 exch2_oj(1,740)=0 exch2_neighbourId(2,740)=725 exch2_iLo(2,740)=0 exch2_iHi(2,740)=35 exch2_jLo(2,740)=0 exch2_jHi(2,740)=0 exch2_opposingSend(2,740)=1 exch2_pij(1,2,740)=1 exch2_pij(2,2,740)=0 exch2_pij(3,2,740)=0 exch2_pij(4,2,740)=1 exch2_oi(2,740)=0 exch2_oj(2,740)=0 exch2_neighbourId(3,740)=741 exch2_iLo(3,740)=35 exch2_iHi(3,740)=35 exch2_jLo(3,740)=0 exch2_jHi(3,740)=35 exch2_opposingSend(3,740)=4 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)=739 exch2_iLo(4,740)=0 exch2_iHi(4,740)=0 exch2_jLo(4,740)=0 exch2_jHi(4,740)=35 exch2_opposingSend(4,740)=3 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 RETURN END SUBROUTINE W2_E2SETUP_741 C Topology for tile 741 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(741)=34 exch2_tNy(741)=34 exch2_tBasex(741)=170 exch2_tBasey(741)=136 exch2_txGlobalo(741)=1701 exch2_tyGlobalo(741)=137 exch2_isWedge(741)=0 exch2_isNedge(741)=0 exch2_isEedge(741)=0 exch2_isSedge(741)=0 exch2_myFace(741)=4 exch2_mydNx(741)=510 exch2_mydNy(741)=510 exch2_nNeighbours(741)=4 exch2_neighbourId(1,741)=756 exch2_iLo(1,741)=0 exch2_iHi(1,741)=35 exch2_jLo(1,741)=35 exch2_jHi(1,741)=35 exch2_opposingSend(1,741)=2 exch2_pij(1,1,741)=1 exch2_pij(2,1,741)=0 exch2_pij(3,1,741)=0 exch2_pij(4,1,741)=1 exch2_oi(1,741)=0 exch2_oj(1,741)=0 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)=35 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)=35 exch2_opposingSend(4,741)=3 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)=34 exch2_tBasex(742)=204 exch2_tBasey(742)=136 exch2_txGlobalo(742)=1735 exch2_tyGlobalo(742)=137 exch2_isWedge(742)=0 exch2_isNedge(742)=0 exch2_isEedge(742)=0 exch2_isSedge(742)=0 exch2_myFace(742)=4 exch2_mydNx(742)=510 exch2_mydNy(742)=510 exch2_nNeighbours(742)=4 exch2_neighbourId(1,742)=757 exch2_iLo(1,742)=0 exch2_iHi(1,742)=35 exch2_jLo(1,742)=35 exch2_jHi(1,742)=35 exch2_opposingSend(1,742)=2 exch2_pij(1,1,742)=1 exch2_pij(2,1,742)=0 exch2_pij(3,1,742)=0 exch2_pij(4,1,742)=1 exch2_oi(1,742)=0 exch2_oj(1,742)=0 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)=35 exch2_opposingSend(3,742)=4 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)=35 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)=34 exch2_tBasex(743)=238 exch2_tBasey(743)=136 exch2_txGlobalo(743)=1769 exch2_tyGlobalo(743)=137 exch2_isWedge(743)=0 exch2_isNedge(743)=0 exch2_isEedge(743)=0 exch2_isSedge(743)=0 exch2_myFace(743)=4 exch2_mydNx(743)=510 exch2_mydNy(743)=510 exch2_nNeighbours(743)=4 exch2_neighbourId(1,743)=758 exch2_iLo(1,743)=0 exch2_iHi(1,743)=35 exch2_jLo(1,743)=35 exch2_jHi(1,743)=35 exch2_opposingSend(1,743)=2 exch2_pij(1,1,743)=1 exch2_pij(2,1,743)=0 exch2_pij(3,1,743)=0 exch2_pij(4,1,743)=1 exch2_oi(1,743)=0 exch2_oj(1,743)=0 exch2_neighbourId(2,743)=728 exch2_iLo(2,743)=0 exch2_iHi(2,743)=35 exch2_jLo(2,743)=0 exch2_jHi(2,743)=0 exch2_opposingSend(2,743)=1 exch2_pij(1,2,743)=1 exch2_pij(2,2,743)=0 exch2_pij(3,2,743)=0 exch2_pij(4,2,743)=1 exch2_oi(2,743)=0 exch2_oj(2,743)=0 exch2_neighbourId(3,743)=744 exch2_iLo(3,743)=35 exch2_iHi(3,743)=35 exch2_jLo(3,743)=0 exch2_jHi(3,743)=35 exch2_opposingSend(3,743)=4 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)=742 exch2_iLo(4,743)=0 exch2_iHi(4,743)=0 exch2_jLo(4,743)=0 exch2_jHi(4,743)=35 exch2_opposingSend(4,743)=3 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 RETURN END SUBROUTINE W2_E2SETUP_744 C Topology for tile 744 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(744)=34 exch2_tNy(744)=34 exch2_tBasex(744)=272 exch2_tBasey(744)=136 exch2_txGlobalo(744)=1803 exch2_tyGlobalo(744)=137 exch2_isWedge(744)=0 exch2_isNedge(744)=0 exch2_isEedge(744)=0 exch2_isSedge(744)=0 exch2_myFace(744)=4 exch2_mydNx(744)=510 exch2_mydNy(744)=510 exch2_nNeighbours(744)=4 exch2_neighbourId(1,744)=759 exch2_iLo(1,744)=0 exch2_iHi(1,744)=35 exch2_jLo(1,744)=35 exch2_jHi(1,744)=35 exch2_opposingSend(1,744)=2 exch2_pij(1,1,744)=1 exch2_pij(2,1,744)=0 exch2_pij(3,1,744)=0 exch2_pij(4,1,744)=1 exch2_oi(1,744)=0 exch2_oj(1,744)=0 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)=35 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)=35 exch2_opposingSend(4,744)=3 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)=34 exch2_tBasex(745)=306 exch2_tBasey(745)=136 exch2_txGlobalo(745)=1837 exch2_tyGlobalo(745)=137 exch2_isWedge(745)=0 exch2_isNedge(745)=0 exch2_isEedge(745)=0 exch2_isSedge(745)=0 exch2_myFace(745)=4 exch2_mydNx(745)=510 exch2_mydNy(745)=510 exch2_nNeighbours(745)=4 exch2_neighbourId(1,745)=760 exch2_iLo(1,745)=0 exch2_iHi(1,745)=35 exch2_jLo(1,745)=35 exch2_jHi(1,745)=35 exch2_opposingSend(1,745)=2 exch2_pij(1,1,745)=1 exch2_pij(2,1,745)=0 exch2_pij(3,1,745)=0 exch2_pij(4,1,745)=1 exch2_oi(1,745)=0 exch2_oj(1,745)=0 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)=35 exch2_opposingSend(3,745)=4 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)=35 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)=34 exch2_tBasex(746)=340 exch2_tBasey(746)=136 exch2_txGlobalo(746)=1871 exch2_tyGlobalo(746)=137 exch2_isWedge(746)=0 exch2_isNedge(746)=0 exch2_isEedge(746)=0 exch2_isSedge(746)=0 exch2_myFace(746)=4 exch2_mydNx(746)=510 exch2_mydNy(746)=510 exch2_nNeighbours(746)=4 exch2_neighbourId(1,746)=761 exch2_iLo(1,746)=0 exch2_iHi(1,746)=35 exch2_jLo(1,746)=35 exch2_jHi(1,746)=35 exch2_opposingSend(1,746)=2 exch2_pij(1,1,746)=1 exch2_pij(2,1,746)=0 exch2_pij(3,1,746)=0 exch2_pij(4,1,746)=1 exch2_oi(1,746)=0 exch2_oj(1,746)=0 exch2_neighbourId(2,746)=731 exch2_iLo(2,746)=0 exch2_iHi(2,746)=35 exch2_jLo(2,746)=0 exch2_jHi(2,746)=0 exch2_opposingSend(2,746)=1 exch2_pij(1,2,746)=1 exch2_pij(2,2,746)=0 exch2_pij(3,2,746)=0 exch2_pij(4,2,746)=1 exch2_oi(2,746)=0 exch2_oj(2,746)=0 exch2_neighbourId(3,746)=747 exch2_iLo(3,746)=35 exch2_iHi(3,746)=35 exch2_jLo(3,746)=0 exch2_jHi(3,746)=35 exch2_opposingSend(3,746)=4 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)=745 exch2_iLo(4,746)=0 exch2_iHi(4,746)=0 exch2_jLo(4,746)=0 exch2_jHi(4,746)=35 exch2_opposingSend(4,746)=3 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 RETURN END SUBROUTINE W2_E2SETUP_747 C Topology for tile 747 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(747)=34 exch2_tNy(747)=34 exch2_tBasex(747)=374 exch2_tBasey(747)=136 exch2_txGlobalo(747)=1905 exch2_tyGlobalo(747)=137 exch2_isWedge(747)=0 exch2_isNedge(747)=0 exch2_isEedge(747)=0 exch2_isSedge(747)=0 exch2_myFace(747)=4 exch2_mydNx(747)=510 exch2_mydNy(747)=510 exch2_nNeighbours(747)=4 exch2_neighbourId(1,747)=762 exch2_iLo(1,747)=0 exch2_iHi(1,747)=35 exch2_jLo(1,747)=35 exch2_jHi(1,747)=35 exch2_opposingSend(1,747)=2 exch2_pij(1,1,747)=1 exch2_pij(2,1,747)=0 exch2_pij(3,1,747)=0 exch2_pij(4,1,747)=1 exch2_oi(1,747)=0 exch2_oj(1,747)=0 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)=35 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)=35 exch2_opposingSend(4,747)=3 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)=34 exch2_tBasex(748)=408 exch2_tBasey(748)=136 exch2_txGlobalo(748)=1939 exch2_tyGlobalo(748)=137 exch2_isWedge(748)=0 exch2_isNedge(748)=0 exch2_isEedge(748)=0 exch2_isSedge(748)=0 exch2_myFace(748)=4 exch2_mydNx(748)=510 exch2_mydNy(748)=510 exch2_nNeighbours(748)=4 exch2_neighbourId(1,748)=763 exch2_iLo(1,748)=0 exch2_iHi(1,748)=35 exch2_jLo(1,748)=35 exch2_jHi(1,748)=35 exch2_opposingSend(1,748)=2 exch2_pij(1,1,748)=1 exch2_pij(2,1,748)=0 exch2_pij(3,1,748)=0 exch2_pij(4,1,748)=1 exch2_oi(1,748)=0 exch2_oj(1,748)=0 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)=35 exch2_opposingSend(3,748)=4 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)=35 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)=34 exch2_tBasex(749)=442 exch2_tBasey(749)=136 exch2_txGlobalo(749)=1973 exch2_tyGlobalo(749)=137 exch2_isWedge(749)=0 exch2_isNedge(749)=0 exch2_isEedge(749)=0 exch2_isSedge(749)=0 exch2_myFace(749)=4 exch2_mydNx(749)=510 exch2_mydNy(749)=510 exch2_nNeighbours(749)=4 exch2_neighbourId(1,749)=764 exch2_iLo(1,749)=0 exch2_iHi(1,749)=35 exch2_jLo(1,749)=35 exch2_jHi(1,749)=35 exch2_opposingSend(1,749)=2 exch2_pij(1,1,749)=1 exch2_pij(2,1,749)=0 exch2_pij(3,1,749)=0 exch2_pij(4,1,749)=1 exch2_oi(1,749)=0 exch2_oj(1,749)=0 exch2_neighbourId(2,749)=734 exch2_iLo(2,749)=0 exch2_iHi(2,749)=35 exch2_jLo(2,749)=0 exch2_jHi(2,749)=0 exch2_opposingSend(2,749)=1 exch2_pij(1,2,749)=1 exch2_pij(2,2,749)=0 exch2_pij(3,2,749)=0 exch2_pij(4,2,749)=1 exch2_oi(2,749)=0 exch2_oj(2,749)=0 exch2_neighbourId(3,749)=750 exch2_iLo(3,749)=35 exch2_iHi(3,749)=35 exch2_jLo(3,749)=0 exch2_jHi(3,749)=35 exch2_opposingSend(3,749)=4 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)=748 exch2_iLo(4,749)=0 exch2_iHi(4,749)=0 exch2_jLo(4,749)=0 exch2_jHi(4,749)=35 exch2_opposingSend(4,749)=3 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 RETURN END SUBROUTINE W2_E2SETUP_750 C Topology for tile 750 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(750)=34 exch2_tNy(750)=34 exch2_tBasex(750)=476 exch2_tBasey(750)=136 exch2_txGlobalo(750)=2007 exch2_tyGlobalo(750)=137 exch2_isWedge(750)=0 exch2_isNedge(750)=0 exch2_isEedge(750)=1 exch2_isSedge(750)=0 exch2_myFace(750)=4 exch2_mydNx(750)=510 exch2_mydNy(750)=510 exch2_nNeighbours(750)=4 exch2_neighbourId(1,750)=765 exch2_iLo(1,750)=0 exch2_iHi(1,750)=35 exch2_jLo(1,750)=35 exch2_jHi(1,750)=35 exch2_opposingSend(1,750)=2 exch2_pij(1,1,750)=1 exch2_pij(2,1,750)=0 exch2_pij(3,1,750)=0 exch2_pij(4,1,750)=1 exch2_oi(1,750)=0 exch2_oj(1,750)=0 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)=1136 exch2_iLo(3,750)=35 exch2_iHi(3,750)=35 exch2_jLo(3,750)=0 exch2_jHi(3,750)=35 exch2_opposingSend(3,750)=2 exch2_pij(1,3,750)=0 exch2_pij(2,3,750)=1 exch2_pij(3,3,750)=-1 exch2_pij(4,3,750)=0 exch2_oi(3,750)=510 exch2_oj(3,750)=511 exch2_neighbourId(4,750)=749 exch2_iLo(4,750)=0 exch2_iHi(4,750)=0 exch2_jLo(4,750)=0 exch2_jHi(4,750)=35 exch2_opposingSend(4,750)=3 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)=34 exch2_tBasex(751)=0 exch2_tBasey(751)=170 exch2_txGlobalo(751)=1531 exch2_tyGlobalo(751)=171 exch2_isWedge(751)=1 exch2_isNedge(751)=0 exch2_isEedge(751)=0 exch2_isSedge(751)=0 exch2_myFace(751)=4 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)=35 exch2_jHi(1,751)=35 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)=736 exch2_iLo(2,751)=0 exch2_iHi(2,751)=35 exch2_jLo(2,751)=0 exch2_jHi(2,751)=0 exch2_opposingSend(2,751)=1 exch2_pij(1,2,751)=1 exch2_pij(2,2,751)=0 exch2_pij(3,2,751)=0 exch2_pij(4,2,751)=1 exch2_oi(2,751)=0 exch2_oj(2,751)=0 exch2_neighbourId(3,751)=752 exch2_iLo(3,751)=35 exch2_iHi(3,751)=35 exch2_jLo(3,751)=0 exch2_jHi(3,751)=35 exch2_opposingSend(3,751)=4 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)=540 exch2_iLo(4,751)=0 exch2_iHi(4,751)=0 exch2_jLo(4,751)=0 exch2_jHi(4,751)=35 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)=34 exch2_tBasex(752)=34 exch2_tBasey(752)=170 exch2_txGlobalo(752)=1565 exch2_tyGlobalo(752)=171 exch2_isWedge(752)=0 exch2_isNedge(752)=0 exch2_isEedge(752)=0 exch2_isSedge(752)=0 exch2_myFace(752)=4 exch2_mydNx(752)=510 exch2_mydNy(752)=510 exch2_nNeighbours(752)=4 exch2_neighbourId(1,752)=767 exch2_iLo(1,752)=0 exch2_iHi(1,752)=35 exch2_jLo(1,752)=35 exch2_jHi(1,752)=35 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)=737 exch2_iLo(2,752)=0 exch2_iHi(2,752)=35 exch2_jLo(2,752)=0 exch2_jHi(2,752)=0 exch2_opposingSend(2,752)=1 exch2_pij(1,2,752)=1 exch2_pij(2,2,752)=0 exch2_pij(3,2,752)=0 exch2_pij(4,2,752)=1 exch2_oi(2,752)=0 exch2_oj(2,752)=0 exch2_neighbourId(3,752)=753 exch2_iLo(3,752)=35 exch2_iHi(3,752)=35 exch2_jLo(3,752)=0 exch2_jHi(3,752)=35 exch2_opposingSend(3,752)=4 exch2_pij(1,3,752)=1 exch2_pij(2,3,752)=0 exch2_pij(3,3,752)=0 exch2_pij(4,3,752)=1 exch2_oi(3,752)=0 exch2_oj(3,752)=0 exch2_neighbourId(4,752)=751 exch2_iLo(4,752)=0 exch2_iHi(4,752)=0 exch2_jLo(4,752)=0 exch2_jHi(4,752)=35 exch2_opposingSend(4,752)=3 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 RETURN END SUBROUTINE W2_E2SETUP_753 C Topology for tile 753 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(753)=34 exch2_tNy(753)=34 exch2_tBasex(753)=68 exch2_tBasey(753)=170 exch2_txGlobalo(753)=1599 exch2_tyGlobalo(753)=171 exch2_isWedge(753)=0 exch2_isNedge(753)=0 exch2_isEedge(753)=0 exch2_isSedge(753)=0 exch2_myFace(753)=4 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)=35 exch2_jHi(1,753)=35 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)=738 exch2_iLo(2,753)=0 exch2_iHi(2,753)=35 exch2_jLo(2,753)=0 exch2_jHi(2,753)=0 exch2_opposingSend(2,753)=1 exch2_pij(1,2,753)=1 exch2_pij(2,2,753)=0 exch2_pij(3,2,753)=0 exch2_pij(4,2,753)=1 exch2_oi(2,753)=0 exch2_oj(2,753)=0 exch2_neighbourId(3,753)=754 exch2_iLo(3,753)=35 exch2_iHi(3,753)=35 exch2_jLo(3,753)=0 exch2_jHi(3,753)=35 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)=35 exch2_opposingSend(4,753)=3 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)=34 exch2_tBasex(754)=102 exch2_tBasey(754)=170 exch2_txGlobalo(754)=1633 exch2_tyGlobalo(754)=171 exch2_isWedge(754)=0 exch2_isNedge(754)=0 exch2_isEedge(754)=0 exch2_isSedge(754)=0 exch2_myFace(754)=4 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)=35 exch2_jHi(1,754)=35 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)=739 exch2_iLo(2,754)=0 exch2_iHi(2,754)=35 exch2_jLo(2,754)=0 exch2_jHi(2,754)=0 exch2_opposingSend(2,754)=1 exch2_pij(1,2,754)=1 exch2_pij(2,2,754)=0 exch2_pij(3,2,754)=0 exch2_pij(4,2,754)=1 exch2_oi(2,754)=0 exch2_oj(2,754)=0 exch2_neighbourId(3,754)=755 exch2_iLo(3,754)=35 exch2_iHi(3,754)=35 exch2_jLo(3,754)=0 exch2_jHi(3,754)=35 exch2_opposingSend(3,754)=4 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)=35 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)=34 exch2_tBasex(755)=136 exch2_tBasey(755)=170 exch2_txGlobalo(755)=1667 exch2_tyGlobalo(755)=171 exch2_isWedge(755)=0 exch2_isNedge(755)=0 exch2_isEedge(755)=0 exch2_isSedge(755)=0 exch2_myFace(755)=4 exch2_mydNx(755)=510 exch2_mydNy(755)=510 exch2_nNeighbours(755)=4 exch2_neighbourId(1,755)=770 exch2_iLo(1,755)=0 exch2_iHi(1,755)=35 exch2_jLo(1,755)=35 exch2_jHi(1,755)=35 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)=740 exch2_iLo(2,755)=0 exch2_iHi(2,755)=35 exch2_jLo(2,755)=0 exch2_jHi(2,755)=0 exch2_opposingSend(2,755)=1 exch2_pij(1,2,755)=1 exch2_pij(2,2,755)=0 exch2_pij(3,2,755)=0 exch2_pij(4,2,755)=1 exch2_oi(2,755)=0 exch2_oj(2,755)=0 exch2_neighbourId(3,755)=756 exch2_iLo(3,755)=35 exch2_iHi(3,755)=35 exch2_jLo(3,755)=0 exch2_jHi(3,755)=35 exch2_opposingSend(3,755)=4 exch2_pij(1,3,755)=1 exch2_pij(2,3,755)=0 exch2_pij(3,3,755)=0 exch2_pij(4,3,755)=1 exch2_oi(3,755)=0 exch2_oj(3,755)=0 exch2_neighbourId(4,755)=754 exch2_iLo(4,755)=0 exch2_iHi(4,755)=0 exch2_jLo(4,755)=0 exch2_jHi(4,755)=35 exch2_opposingSend(4,755)=3 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 RETURN END SUBROUTINE W2_E2SETUP_756 C Topology for tile 756 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(756)=34 exch2_tNy(756)=34 exch2_tBasex(756)=170 exch2_tBasey(756)=170 exch2_txGlobalo(756)=1701 exch2_tyGlobalo(756)=171 exch2_isWedge(756)=0 exch2_isNedge(756)=0 exch2_isEedge(756)=0 exch2_isSedge(756)=0 exch2_myFace(756)=4 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)=35 exch2_jHi(1,756)=35 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)=741 exch2_iLo(2,756)=0 exch2_iHi(2,756)=35 exch2_jLo(2,756)=0 exch2_jHi(2,756)=0 exch2_opposingSend(2,756)=1 exch2_pij(1,2,756)=1 exch2_pij(2,2,756)=0 exch2_pij(3,2,756)=0 exch2_pij(4,2,756)=1 exch2_oi(2,756)=0 exch2_oj(2,756)=0 exch2_neighbourId(3,756)=757 exch2_iLo(3,756)=35 exch2_iHi(3,756)=35 exch2_jLo(3,756)=0 exch2_jHi(3,756)=35 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)=35 exch2_opposingSend(4,756)=3 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)=34 exch2_tBasex(757)=204 exch2_tBasey(757)=170 exch2_txGlobalo(757)=1735 exch2_tyGlobalo(757)=171 exch2_isWedge(757)=0 exch2_isNedge(757)=0 exch2_isEedge(757)=0 exch2_isSedge(757)=0 exch2_myFace(757)=4 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)=35 exch2_jHi(1,757)=35 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)=742 exch2_iLo(2,757)=0 exch2_iHi(2,757)=35 exch2_jLo(2,757)=0 exch2_jHi(2,757)=0 exch2_opposingSend(2,757)=1 exch2_pij(1,2,757)=1 exch2_pij(2,2,757)=0 exch2_pij(3,2,757)=0 exch2_pij(4,2,757)=1 exch2_oi(2,757)=0 exch2_oj(2,757)=0 exch2_neighbourId(3,757)=758 exch2_iLo(3,757)=35 exch2_iHi(3,757)=35 exch2_jLo(3,757)=0 exch2_jHi(3,757)=35 exch2_opposingSend(3,757)=4 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)=35 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)=34 exch2_tBasex(758)=238 exch2_tBasey(758)=170 exch2_txGlobalo(758)=1769 exch2_tyGlobalo(758)=171 exch2_isWedge(758)=0 exch2_isNedge(758)=0 exch2_isEedge(758)=0 exch2_isSedge(758)=0 exch2_myFace(758)=4 exch2_mydNx(758)=510 exch2_mydNy(758)=510 exch2_nNeighbours(758)=4 exch2_neighbourId(1,758)=773 exch2_iLo(1,758)=0 exch2_iHi(1,758)=35 exch2_jLo(1,758)=35 exch2_jHi(1,758)=35 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)=743 exch2_iLo(2,758)=0 exch2_iHi(2,758)=35 exch2_jLo(2,758)=0 exch2_jHi(2,758)=0 exch2_opposingSend(2,758)=1 exch2_pij(1,2,758)=1 exch2_pij(2,2,758)=0 exch2_pij(3,2,758)=0 exch2_pij(4,2,758)=1 exch2_oi(2,758)=0 exch2_oj(2,758)=0 exch2_neighbourId(3,758)=759 exch2_iLo(3,758)=35 exch2_iHi(3,758)=35 exch2_jLo(3,758)=0 exch2_jHi(3,758)=35 exch2_opposingSend(3,758)=4 exch2_pij(1,3,758)=1 exch2_pij(2,3,758)=0 exch2_pij(3,3,758)=0 exch2_pij(4,3,758)=1 exch2_oi(3,758)=0 exch2_oj(3,758)=0 exch2_neighbourId(4,758)=757 exch2_iLo(4,758)=0 exch2_iHi(4,758)=0 exch2_jLo(4,758)=0 exch2_jHi(4,758)=35 exch2_opposingSend(4,758)=3 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 RETURN END SUBROUTINE W2_E2SETUP_759 C Topology for tile 759 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(759)=34 exch2_tNy(759)=34 exch2_tBasex(759)=272 exch2_tBasey(759)=170 exch2_txGlobalo(759)=1803 exch2_tyGlobalo(759)=171 exch2_isWedge(759)=0 exch2_isNedge(759)=0 exch2_isEedge(759)=0 exch2_isSedge(759)=0 exch2_myFace(759)=4 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)=35 exch2_jHi(1,759)=35 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)=744 exch2_iLo(2,759)=0 exch2_iHi(2,759)=35 exch2_jLo(2,759)=0 exch2_jHi(2,759)=0 exch2_opposingSend(2,759)=1 exch2_pij(1,2,759)=1 exch2_pij(2,2,759)=0 exch2_pij(3,2,759)=0 exch2_pij(4,2,759)=1 exch2_oi(2,759)=0 exch2_oj(2,759)=0 exch2_neighbourId(3,759)=760 exch2_iLo(3,759)=35 exch2_iHi(3,759)=35 exch2_jLo(3,759)=0 exch2_jHi(3,759)=35 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)=35 exch2_opposingSend(4,759)=3 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)=34 exch2_tBasex(760)=306 exch2_tBasey(760)=170 exch2_txGlobalo(760)=1837 exch2_tyGlobalo(760)=171 exch2_isWedge(760)=0 exch2_isNedge(760)=0 exch2_isEedge(760)=0 exch2_isSedge(760)=0 exch2_myFace(760)=4 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)=35 exch2_jHi(1,760)=35 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)=745 exch2_iLo(2,760)=0 exch2_iHi(2,760)=35 exch2_jLo(2,760)=0 exch2_jHi(2,760)=0 exch2_opposingSend(2,760)=1 exch2_pij(1,2,760)=1 exch2_pij(2,2,760)=0 exch2_pij(3,2,760)=0 exch2_pij(4,2,760)=1 exch2_oi(2,760)=0 exch2_oj(2,760)=0 exch2_neighbourId(3,760)=761 exch2_iLo(3,760)=35 exch2_iHi(3,760)=35 exch2_jLo(3,760)=0 exch2_jHi(3,760)=35 exch2_opposingSend(3,760)=4 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)=35 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)=34 exch2_tBasex(761)=340 exch2_tBasey(761)=170 exch2_txGlobalo(761)=1871 exch2_tyGlobalo(761)=171 exch2_isWedge(761)=0 exch2_isNedge(761)=0 exch2_isEedge(761)=0 exch2_isSedge(761)=0 exch2_myFace(761)=4 exch2_mydNx(761)=510 exch2_mydNy(761)=510 exch2_nNeighbours(761)=4 exch2_neighbourId(1,761)=776 exch2_iLo(1,761)=0 exch2_iHi(1,761)=35 exch2_jLo(1,761)=35 exch2_jHi(1,761)=35 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)=746 exch2_iLo(2,761)=0 exch2_iHi(2,761)=35 exch2_jLo(2,761)=0 exch2_jHi(2,761)=0 exch2_opposingSend(2,761)=1 exch2_pij(1,2,761)=1 exch2_pij(2,2,761)=0 exch2_pij(3,2,761)=0 exch2_pij(4,2,761)=1 exch2_oi(2,761)=0 exch2_oj(2,761)=0 exch2_neighbourId(3,761)=762 exch2_iLo(3,761)=35 exch2_iHi(3,761)=35 exch2_jLo(3,761)=0 exch2_jHi(3,761)=35 exch2_opposingSend(3,761)=4 exch2_pij(1,3,761)=1 exch2_pij(2,3,761)=0 exch2_pij(3,3,761)=0 exch2_pij(4,3,761)=1 exch2_oi(3,761)=0 exch2_oj(3,761)=0 exch2_neighbourId(4,761)=760 exch2_iLo(4,761)=0 exch2_iHi(4,761)=0 exch2_jLo(4,761)=0 exch2_jHi(4,761)=35 exch2_opposingSend(4,761)=3 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 RETURN END SUBROUTINE W2_E2SETUP_762 C Topology for tile 762 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(762)=34 exch2_tNy(762)=34 exch2_tBasex(762)=374 exch2_tBasey(762)=170 exch2_txGlobalo(762)=1905 exch2_tyGlobalo(762)=171 exch2_isWedge(762)=0 exch2_isNedge(762)=0 exch2_isEedge(762)=0 exch2_isSedge(762)=0 exch2_myFace(762)=4 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)=35 exch2_jHi(1,762)=35 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)=747 exch2_iLo(2,762)=0 exch2_iHi(2,762)=35 exch2_jLo(2,762)=0 exch2_jHi(2,762)=0 exch2_opposingSend(2,762)=1 exch2_pij(1,2,762)=1 exch2_pij(2,2,762)=0 exch2_pij(3,2,762)=0 exch2_pij(4,2,762)=1 exch2_oi(2,762)=0 exch2_oj(2,762)=0 exch2_neighbourId(3,762)=763 exch2_iLo(3,762)=35 exch2_iHi(3,762)=35 exch2_jLo(3,762)=0 exch2_jHi(3,762)=35 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)=35 exch2_opposingSend(4,762)=3 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)=34 exch2_tBasex(763)=408 exch2_tBasey(763)=170 exch2_txGlobalo(763)=1939 exch2_tyGlobalo(763)=171 exch2_isWedge(763)=0 exch2_isNedge(763)=0 exch2_isEedge(763)=0 exch2_isSedge(763)=0 exch2_myFace(763)=4 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)=35 exch2_jHi(1,763)=35 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)=748 exch2_iLo(2,763)=0 exch2_iHi(2,763)=35 exch2_jLo(2,763)=0 exch2_jHi(2,763)=0 exch2_opposingSend(2,763)=1 exch2_pij(1,2,763)=1 exch2_pij(2,2,763)=0 exch2_pij(3,2,763)=0 exch2_pij(4,2,763)=1 exch2_oi(2,763)=0 exch2_oj(2,763)=0 exch2_neighbourId(3,763)=764 exch2_iLo(3,763)=35 exch2_iHi(3,763)=35 exch2_jLo(3,763)=0 exch2_jHi(3,763)=35 exch2_opposingSend(3,763)=4 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)=35 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)=34 exch2_tBasex(764)=442 exch2_tBasey(764)=170 exch2_txGlobalo(764)=1973 exch2_tyGlobalo(764)=171 exch2_isWedge(764)=0 exch2_isNedge(764)=0 exch2_isEedge(764)=0 exch2_isSedge(764)=0 exch2_myFace(764)=4 exch2_mydNx(764)=510 exch2_mydNy(764)=510 exch2_nNeighbours(764)=4 exch2_neighbourId(1,764)=779 exch2_iLo(1,764)=0 exch2_iHi(1,764)=35 exch2_jLo(1,764)=35 exch2_jHi(1,764)=35 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)=749 exch2_iLo(2,764)=0 exch2_iHi(2,764)=35 exch2_jLo(2,764)=0 exch2_jHi(2,764)=0 exch2_opposingSend(2,764)=1 exch2_pij(1,2,764)=1 exch2_pij(2,2,764)=0 exch2_pij(3,2,764)=0 exch2_pij(4,2,764)=1 exch2_oi(2,764)=0 exch2_oj(2,764)=0 exch2_neighbourId(3,764)=765 exch2_iLo(3,764)=35 exch2_iHi(3,764)=35 exch2_jLo(3,764)=0 exch2_jHi(3,764)=35 exch2_opposingSend(3,764)=4 exch2_pij(1,3,764)=1 exch2_pij(2,3,764)=0 exch2_pij(3,3,764)=0 exch2_pij(4,3,764)=1 exch2_oi(3,764)=0 exch2_oj(3,764)=0 exch2_neighbourId(4,764)=763 exch2_iLo(4,764)=0 exch2_iHi(4,764)=0 exch2_jLo(4,764)=0 exch2_jHi(4,764)=35 exch2_opposingSend(4,764)=3 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 RETURN END SUBROUTINE W2_E2SETUP_765 C Topology for tile 765 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(765)=34 exch2_tNy(765)=34 exch2_tBasex(765)=476 exch2_tBasey(765)=170 exch2_txGlobalo(765)=2007 exch2_tyGlobalo(765)=171 exch2_isWedge(765)=0 exch2_isNedge(765)=0 exch2_isEedge(765)=1 exch2_isSedge(765)=0 exch2_myFace(765)=4 exch2_mydNx(765)=510 exch2_mydNy(765)=510 exch2_nNeighbours(765)=4 exch2_neighbourId(1,765)=780 exch2_iLo(1,765)=0 exch2_iHi(1,765)=35 exch2_jLo(1,765)=35 exch2_jHi(1,765)=35 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)=750 exch2_iLo(2,765)=0 exch2_iHi(2,765)=35 exch2_jLo(2,765)=0 exch2_jHi(2,765)=0 exch2_opposingSend(2,765)=1 exch2_pij(1,2,765)=1 exch2_pij(2,2,765)=0 exch2_pij(3,2,765)=0 exch2_pij(4,2,765)=1 exch2_oi(2,765)=0 exch2_oj(2,765)=0 exch2_neighbourId(3,765)=1135 exch2_iLo(3,765)=35 exch2_iHi(3,765)=35 exch2_jLo(3,765)=0 exch2_jHi(3,765)=35 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)=764 exch2_iLo(4,765)=0 exch2_iHi(4,765)=0 exch2_jLo(4,765)=0 exch2_jHi(4,765)=35 exch2_opposingSend(4,765)=3 exch2_pij(1,4,765)=1 exch2_pij(2,4,765)=0 exch2_pij(3,4,765)=0 exch2_pij(4,4,765)=1 exch2_oi(4,765)=0 exch2_oj(4,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)=34 exch2_tBasex(766)=0 exch2_tBasey(766)=204 exch2_txGlobalo(766)=1531 exch2_tyGlobalo(766)=205 exch2_isWedge(766)=1 exch2_isNedge(766)=0 exch2_isEedge(766)=0 exch2_isSedge(766)=0 exch2_myFace(766)=4 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)=35 exch2_jHi(1,766)=35 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)=35 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)=555 exch2_iLo(4,766)=0 exch2_iHi(4,766)=0 exch2_jLo(4,766)=0 exch2_jHi(4,766)=35 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)=34 exch2_tBasex(767)=34 exch2_tBasey(767)=204 exch2_txGlobalo(767)=1565 exch2_tyGlobalo(767)=205 exch2_isWedge(767)=0 exch2_isNedge(767)=0 exch2_isEedge(767)=0 exch2_isSedge(767)=0 exch2_myFace(767)=4 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)=35 exch2_jHi(1,767)=35 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)=35 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)=35 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)=34 exch2_tBasex(768)=68 exch2_tBasey(768)=204 exch2_txGlobalo(768)=1599 exch2_tyGlobalo(768)=205 exch2_isWedge(768)=0 exch2_isNedge(768)=0 exch2_isEedge(768)=0 exch2_isSedge(768)=0 exch2_myFace(768)=4 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)=35 exch2_jHi(1,768)=35 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)=35 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)=35 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)=34 exch2_tBasex(769)=102 exch2_tBasey(769)=204 exch2_txGlobalo(769)=1633 exch2_tyGlobalo(769)=205 exch2_isWedge(769)=0 exch2_isNedge(769)=0 exch2_isEedge(769)=0 exch2_isSedge(769)=0 exch2_myFace(769)=4 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)=35 exch2_jHi(1,769)=35 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)=35 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)=35 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)=34 exch2_tBasex(770)=136 exch2_tBasey(770)=204 exch2_txGlobalo(770)=1667 exch2_tyGlobalo(770)=205 exch2_isWedge(770)=0 exch2_isNedge(770)=0 exch2_isEedge(770)=0 exch2_isSedge(770)=0 exch2_myFace(770)=4 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)=35 exch2_jHi(1,770)=35 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)=35 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)=35 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)=34 exch2_tBasex(771)=170 exch2_tBasey(771)=204 exch2_txGlobalo(771)=1701 exch2_tyGlobalo(771)=205 exch2_isWedge(771)=0 exch2_isNedge(771)=0 exch2_isEedge(771)=0 exch2_isSedge(771)=0 exch2_myFace(771)=4 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)=35 exch2_jHi(1,771)=35 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)=35 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)=35 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)=34 exch2_tBasex(772)=204 exch2_tBasey(772)=204 exch2_txGlobalo(772)=1735 exch2_tyGlobalo(772)=205 exch2_isWedge(772)=0 exch2_isNedge(772)=0 exch2_isEedge(772)=0 exch2_isSedge(772)=0 exch2_myFace(772)=4 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)=35 exch2_jHi(1,772)=35 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)=35 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)=35 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)=34 exch2_tBasex(773)=238 exch2_tBasey(773)=204 exch2_txGlobalo(773)=1769 exch2_tyGlobalo(773)=205 exch2_isWedge(773)=0 exch2_isNedge(773)=0 exch2_isEedge(773)=0 exch2_isSedge(773)=0 exch2_myFace(773)=4 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)=35 exch2_jHi(1,773)=35 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)=35 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)=35 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)=34 exch2_tBasex(774)=272 exch2_tBasey(774)=204 exch2_txGlobalo(774)=1803 exch2_tyGlobalo(774)=205 exch2_isWedge(774)=0 exch2_isNedge(774)=0 exch2_isEedge(774)=0 exch2_isSedge(774)=0 exch2_myFace(774)=4 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)=35 exch2_jHi(1,774)=35 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)=35 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)=35 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)=34 exch2_tBasex(775)=306 exch2_tBasey(775)=204 exch2_txGlobalo(775)=1837 exch2_tyGlobalo(775)=205 exch2_isWedge(775)=0 exch2_isNedge(775)=0 exch2_isEedge(775)=0 exch2_isSedge(775)=0 exch2_myFace(775)=4 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)=35 exch2_jHi(1,775)=35 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)=35 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)=35 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)=34 exch2_tBasex(776)=340 exch2_tBasey(776)=204 exch2_txGlobalo(776)=1871 exch2_tyGlobalo(776)=205 exch2_isWedge(776)=0 exch2_isNedge(776)=0 exch2_isEedge(776)=0 exch2_isSedge(776)=0 exch2_myFace(776)=4 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)=35 exch2_jHi(1,776)=35 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)=35 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)=35 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)=34 exch2_tBasex(777)=374 exch2_tBasey(777)=204 exch2_txGlobalo(777)=1905 exch2_tyGlobalo(777)=205 exch2_isWedge(777)=0 exch2_isNedge(777)=0 exch2_isEedge(777)=0 exch2_isSedge(777)=0 exch2_myFace(777)=4 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)=35 exch2_jHi(1,777)=35 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)=35 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)=35 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)=34 exch2_tBasex(778)=408 exch2_tBasey(778)=204 exch2_txGlobalo(778)=1939 exch2_tyGlobalo(778)=205 exch2_isWedge(778)=0 exch2_isNedge(778)=0 exch2_isEedge(778)=0 exch2_isSedge(778)=0 exch2_myFace(778)=4 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)=35 exch2_jHi(1,778)=35 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)=35 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)=35 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)=34 exch2_tBasex(779)=442 exch2_tBasey(779)=204 exch2_txGlobalo(779)=1973 exch2_tyGlobalo(779)=205 exch2_isWedge(779)=0 exch2_isNedge(779)=0 exch2_isEedge(779)=0 exch2_isSedge(779)=0 exch2_myFace(779)=4 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)=35 exch2_jHi(1,779)=35 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)=35 exch2_opposingSend(3,779)=4 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)=35 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)=34 exch2_tBasex(780)=476 exch2_tBasey(780)=204 exch2_txGlobalo(780)=2007 exch2_tyGlobalo(780)=205 exch2_isWedge(780)=0 exch2_isNedge(780)=0 exch2_isEedge(780)=1 exch2_isSedge(780)=0 exch2_myFace(780)=4 exch2_mydNx(780)=510 exch2_mydNy(780)=510 exch2_nNeighbours(780)=4 exch2_neighbourId(1,780)=795 exch2_iLo(1,780)=0 exch2_iHi(1,780)=35 exch2_jLo(1,780)=35 exch2_jHi(1,780)=35 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)=1134 exch2_iLo(3,780)=35 exch2_iHi(3,780)=35 exch2_jLo(3,780)=0 exch2_jHi(3,780)=35 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)=779 exch2_iLo(4,780)=0 exch2_iHi(4,780)=0 exch2_jLo(4,780)=0 exch2_jHi(4,780)=35 exch2_opposingSend(4,780)=3 exch2_pij(1,4,780)=1 exch2_pij(2,4,780)=0 exch2_pij(3,4,780)=0 exch2_pij(4,4,780)=1 exch2_oi(4,780)=0 exch2_oj(4,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)=34 exch2_tBasex(781)=0 exch2_tBasey(781)=238 exch2_txGlobalo(781)=1531 exch2_tyGlobalo(781)=239 exch2_isWedge(781)=1 exch2_isNedge(781)=0 exch2_isEedge(781)=0 exch2_isSedge(781)=0 exch2_myFace(781)=4 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)=35 exch2_jHi(1,781)=35 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)=35 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)=570 exch2_iLo(4,781)=0 exch2_iHi(4,781)=0 exch2_jLo(4,781)=0 exch2_jHi(4,781)=35 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)=34 exch2_tBasex(782)=34 exch2_tBasey(782)=238 exch2_txGlobalo(782)=1565 exch2_tyGlobalo(782)=239 exch2_isWedge(782)=0 exch2_isNedge(782)=0 exch2_isEedge(782)=0 exch2_isSedge(782)=0 exch2_myFace(782)=4 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)=35 exch2_jHi(1,782)=35 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)=35 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)=35 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)=34 exch2_tBasex(783)=68 exch2_tBasey(783)=238 exch2_txGlobalo(783)=1599 exch2_tyGlobalo(783)=239 exch2_isWedge(783)=0 exch2_isNedge(783)=0 exch2_isEedge(783)=0 exch2_isSedge(783)=0 exch2_myFace(783)=4 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)=35 exch2_jHi(1,783)=35 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)=35 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)=35 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)=34 exch2_tBasex(784)=102 exch2_tBasey(784)=238 exch2_txGlobalo(784)=1633 exch2_tyGlobalo(784)=239 exch2_isWedge(784)=0 exch2_isNedge(784)=0 exch2_isEedge(784)=0 exch2_isSedge(784)=0 exch2_myFace(784)=4 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)=35 exch2_jHi(1,784)=35 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)=35 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)=35 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)=34 exch2_tBasex(785)=136 exch2_tBasey(785)=238 exch2_txGlobalo(785)=1667 exch2_tyGlobalo(785)=239 exch2_isWedge(785)=0 exch2_isNedge(785)=0 exch2_isEedge(785)=0 exch2_isSedge(785)=0 exch2_myFace(785)=4 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)=35 exch2_jHi(1,785)=35 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)=35 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)=35 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)=34 exch2_tBasex(786)=170 exch2_tBasey(786)=238 exch2_txGlobalo(786)=1701 exch2_tyGlobalo(786)=239 exch2_isWedge(786)=0 exch2_isNedge(786)=0 exch2_isEedge(786)=0 exch2_isSedge(786)=0 exch2_myFace(786)=4 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)=35 exch2_jHi(1,786)=35 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)=35 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)=35 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)=34 exch2_tBasex(787)=204 exch2_tBasey(787)=238 exch2_txGlobalo(787)=1735 exch2_tyGlobalo(787)=239 exch2_isWedge(787)=0 exch2_isNedge(787)=0 exch2_isEedge(787)=0 exch2_isSedge(787)=0 exch2_myFace(787)=4 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)=35 exch2_jHi(1,787)=35 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)=35 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)=35 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)=34 exch2_tBasex(788)=238 exch2_tBasey(788)=238 exch2_txGlobalo(788)=1769 exch2_tyGlobalo(788)=239 exch2_isWedge(788)=0 exch2_isNedge(788)=0 exch2_isEedge(788)=0 exch2_isSedge(788)=0 exch2_myFace(788)=4 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)=35 exch2_jHi(1,788)=35 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)=35 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)=35 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)=34 exch2_tBasex(789)=272 exch2_tBasey(789)=238 exch2_txGlobalo(789)=1803 exch2_tyGlobalo(789)=239 exch2_isWedge(789)=0 exch2_isNedge(789)=0 exch2_isEedge(789)=0 exch2_isSedge(789)=0 exch2_myFace(789)=4 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)=35 exch2_jHi(1,789)=35 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)=35 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)=35 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)=34 exch2_tBasex(790)=306 exch2_tBasey(790)=238 exch2_txGlobalo(790)=1837 exch2_tyGlobalo(790)=239 exch2_isWedge(790)=0 exch2_isNedge(790)=0 exch2_isEedge(790)=0 exch2_isSedge(790)=0 exch2_myFace(790)=4 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)=35 exch2_jHi(1,790)=35 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)=35 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)=35 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)=34 exch2_tBasex(791)=340 exch2_tBasey(791)=238 exch2_txGlobalo(791)=1871 exch2_tyGlobalo(791)=239 exch2_isWedge(791)=0 exch2_isNedge(791)=0 exch2_isEedge(791)=0 exch2_isSedge(791)=0 exch2_myFace(791)=4 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)=35 exch2_jHi(1,791)=35 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)=35 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)=35 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)=34 exch2_tBasex(792)=374 exch2_tBasey(792)=238 exch2_txGlobalo(792)=1905 exch2_tyGlobalo(792)=239 exch2_isWedge(792)=0 exch2_isNedge(792)=0 exch2_isEedge(792)=0 exch2_isSedge(792)=0 exch2_myFace(792)=4 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)=35 exch2_jHi(1,792)=35 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)=35 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)=35 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)=34 exch2_tBasex(793)=408 exch2_tBasey(793)=238 exch2_txGlobalo(793)=1939 exch2_tyGlobalo(793)=239 exch2_isWedge(793)=0 exch2_isNedge(793)=0 exch2_isEedge(793)=0 exch2_isSedge(793)=0 exch2_myFace(793)=4 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)=35 exch2_jHi(1,793)=35 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)=35 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)=35 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)=34 exch2_tBasex(794)=442 exch2_tBasey(794)=238 exch2_txGlobalo(794)=1973 exch2_tyGlobalo(794)=239 exch2_isWedge(794)=0 exch2_isNedge(794)=0 exch2_isEedge(794)=0 exch2_isSedge(794)=0 exch2_myFace(794)=4 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)=35 exch2_jHi(1,794)=35 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)=35 exch2_opposingSend(3,794)=4 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)=35 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)=34 exch2_tBasex(795)=476 exch2_tBasey(795)=238 exch2_txGlobalo(795)=2007 exch2_tyGlobalo(795)=239 exch2_isWedge(795)=0 exch2_isNedge(795)=0 exch2_isEedge(795)=1 exch2_isSedge(795)=0 exch2_myFace(795)=4 exch2_mydNx(795)=510 exch2_mydNy(795)=510 exch2_nNeighbours(795)=4 exch2_neighbourId(1,795)=810 exch2_iLo(1,795)=0 exch2_iHi(1,795)=35 exch2_jLo(1,795)=35 exch2_jHi(1,795)=35 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)=1133 exch2_iLo(3,795)=35 exch2_iHi(3,795)=35 exch2_jLo(3,795)=0 exch2_jHi(3,795)=35 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)=794 exch2_iLo(4,795)=0 exch2_iHi(4,795)=0 exch2_jLo(4,795)=0 exch2_jHi(4,795)=35 exch2_opposingSend(4,795)=3 exch2_pij(1,4,795)=1 exch2_pij(2,4,795)=0 exch2_pij(3,4,795)=0 exch2_pij(4,4,795)=1 exch2_oi(4,795)=0 exch2_oj(4,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)=34 exch2_tBasex(796)=0 exch2_tBasey(796)=272 exch2_txGlobalo(796)=1531 exch2_tyGlobalo(796)=273 exch2_isWedge(796)=1 exch2_isNedge(796)=0 exch2_isEedge(796)=0 exch2_isSedge(796)=0 exch2_myFace(796)=4 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)=35 exch2_jHi(1,796)=35 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)=35 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)=585 exch2_iLo(4,796)=0 exch2_iHi(4,796)=0 exch2_jLo(4,796)=0 exch2_jHi(4,796)=35 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)=34 exch2_tBasex(797)=34 exch2_tBasey(797)=272 exch2_txGlobalo(797)=1565 exch2_tyGlobalo(797)=273 exch2_isWedge(797)=0 exch2_isNedge(797)=0 exch2_isEedge(797)=0 exch2_isSedge(797)=0 exch2_myFace(797)=4 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)=35 exch2_jHi(1,797)=35 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)=35 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)=35 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)=34 exch2_tBasex(798)=68 exch2_tBasey(798)=272 exch2_txGlobalo(798)=1599 exch2_tyGlobalo(798)=273 exch2_isWedge(798)=0 exch2_isNedge(798)=0 exch2_isEedge(798)=0 exch2_isSedge(798)=0 exch2_myFace(798)=4 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)=35 exch2_jHi(1,798)=35 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)=35 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)=35 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)=34 exch2_tBasex(799)=102 exch2_tBasey(799)=272 exch2_txGlobalo(799)=1633 exch2_tyGlobalo(799)=273 exch2_isWedge(799)=0 exch2_isNedge(799)=0 exch2_isEedge(799)=0 exch2_isSedge(799)=0 exch2_myFace(799)=4 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)=35 exch2_jHi(1,799)=35 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)=35 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)=35 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)=34 exch2_tBasex(800)=136 exch2_tBasey(800)=272 exch2_txGlobalo(800)=1667 exch2_tyGlobalo(800)=273 exch2_isWedge(800)=0 exch2_isNedge(800)=0 exch2_isEedge(800)=0 exch2_isSedge(800)=0 exch2_myFace(800)=4 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)=35 exch2_jHi(1,800)=35 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)=35 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)=35 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)=34 exch2_tBasex(801)=170 exch2_tBasey(801)=272 exch2_txGlobalo(801)=1701 exch2_tyGlobalo(801)=273 exch2_isWedge(801)=0 exch2_isNedge(801)=0 exch2_isEedge(801)=0 exch2_isSedge(801)=0 exch2_myFace(801)=4 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)=35 exch2_jHi(1,801)=35 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)=35 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)=35 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)=34 exch2_tBasex(802)=204 exch2_tBasey(802)=272 exch2_txGlobalo(802)=1735 exch2_tyGlobalo(802)=273 exch2_isWedge(802)=0 exch2_isNedge(802)=0 exch2_isEedge(802)=0 exch2_isSedge(802)=0 exch2_myFace(802)=4 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)=35 exch2_jHi(1,802)=35 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)=35 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)=35 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)=34 exch2_tBasex(803)=238 exch2_tBasey(803)=272 exch2_txGlobalo(803)=1769 exch2_tyGlobalo(803)=273 exch2_isWedge(803)=0 exch2_isNedge(803)=0 exch2_isEedge(803)=0 exch2_isSedge(803)=0 exch2_myFace(803)=4 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)=35 exch2_jHi(1,803)=35 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)=35 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)=35 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)=34 exch2_tBasex(804)=272 exch2_tBasey(804)=272 exch2_txGlobalo(804)=1803 exch2_tyGlobalo(804)=273 exch2_isWedge(804)=0 exch2_isNedge(804)=0 exch2_isEedge(804)=0 exch2_isSedge(804)=0 exch2_myFace(804)=4 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)=35 exch2_jHi(1,804)=35 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)=35 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)=35 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)=34 exch2_tBasex(805)=306 exch2_tBasey(805)=272 exch2_txGlobalo(805)=1837 exch2_tyGlobalo(805)=273 exch2_isWedge(805)=0 exch2_isNedge(805)=0 exch2_isEedge(805)=0 exch2_isSedge(805)=0 exch2_myFace(805)=4 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)=35 exch2_jHi(1,805)=35 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)=35 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)=35 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)=34 exch2_tBasex(806)=340 exch2_tBasey(806)=272 exch2_txGlobalo(806)=1871 exch2_tyGlobalo(806)=273 exch2_isWedge(806)=0 exch2_isNedge(806)=0 exch2_isEedge(806)=0 exch2_isSedge(806)=0 exch2_myFace(806)=4 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)=35 exch2_jHi(1,806)=35 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)=35 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)=35 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)=34 exch2_tBasex(807)=374 exch2_tBasey(807)=272 exch2_txGlobalo(807)=1905 exch2_tyGlobalo(807)=273 exch2_isWedge(807)=0 exch2_isNedge(807)=0 exch2_isEedge(807)=0 exch2_isSedge(807)=0 exch2_myFace(807)=4 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)=35 exch2_jHi(1,807)=35 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)=35 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)=35 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)=34 exch2_tBasex(808)=408 exch2_tBasey(808)=272 exch2_txGlobalo(808)=1939 exch2_tyGlobalo(808)=273 exch2_isWedge(808)=0 exch2_isNedge(808)=0 exch2_isEedge(808)=0 exch2_isSedge(808)=0 exch2_myFace(808)=4 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)=35 exch2_jHi(1,808)=35 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)=35 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)=35 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)=34 exch2_tBasex(809)=442 exch2_tBasey(809)=272 exch2_txGlobalo(809)=1973 exch2_tyGlobalo(809)=273 exch2_isWedge(809)=0 exch2_isNedge(809)=0 exch2_isEedge(809)=0 exch2_isSedge(809)=0 exch2_myFace(809)=4 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)=35 exch2_jHi(1,809)=35 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)=35 exch2_opposingSend(3,809)=4 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)=35 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)=34 exch2_tBasex(810)=476 exch2_tBasey(810)=272 exch2_txGlobalo(810)=2007 exch2_tyGlobalo(810)=273 exch2_isWedge(810)=0 exch2_isNedge(810)=0 exch2_isEedge(810)=1 exch2_isSedge(810)=0 exch2_myFace(810)=4 exch2_mydNx(810)=510 exch2_mydNy(810)=510 exch2_nNeighbours(810)=4 exch2_neighbourId(1,810)=825 exch2_iLo(1,810)=0 exch2_iHi(1,810)=35 exch2_jLo(1,810)=35 exch2_jHi(1,810)=35 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)=1132 exch2_iLo(3,810)=35 exch2_iHi(3,810)=35 exch2_jLo(3,810)=0 exch2_jHi(3,810)=35 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)=809 exch2_iLo(4,810)=0 exch2_iHi(4,810)=0 exch2_jLo(4,810)=0 exch2_jHi(4,810)=35 exch2_opposingSend(4,810)=3 exch2_pij(1,4,810)=1 exch2_pij(2,4,810)=0 exch2_pij(3,4,810)=0 exch2_pij(4,4,810)=1 exch2_oi(4,810)=0 exch2_oj(4,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)=34 exch2_tBasex(811)=0 exch2_tBasey(811)=306 exch2_txGlobalo(811)=1531 exch2_tyGlobalo(811)=307 exch2_isWedge(811)=1 exch2_isNedge(811)=0 exch2_isEedge(811)=0 exch2_isSedge(811)=0 exch2_myFace(811)=4 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)=35 exch2_jHi(1,811)=35 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)=35 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)=600 exch2_iLo(4,811)=0 exch2_iHi(4,811)=0 exch2_jLo(4,811)=0 exch2_jHi(4,811)=35 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)=34 exch2_tBasex(812)=34 exch2_tBasey(812)=306 exch2_txGlobalo(812)=1565 exch2_tyGlobalo(812)=307 exch2_isWedge(812)=0 exch2_isNedge(812)=0 exch2_isEedge(812)=0 exch2_isSedge(812)=0 exch2_myFace(812)=4 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)=35 exch2_jHi(1,812)=35 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)=35 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)=35 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)=34 exch2_tBasex(813)=68 exch2_tBasey(813)=306 exch2_txGlobalo(813)=1599 exch2_tyGlobalo(813)=307 exch2_isWedge(813)=0 exch2_isNedge(813)=0 exch2_isEedge(813)=0 exch2_isSedge(813)=0 exch2_myFace(813)=4 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)=35 exch2_jHi(1,813)=35 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)=35 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)=35 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)=34 exch2_tBasex(814)=102 exch2_tBasey(814)=306 exch2_txGlobalo(814)=1633 exch2_tyGlobalo(814)=307 exch2_isWedge(814)=0 exch2_isNedge(814)=0 exch2_isEedge(814)=0 exch2_isSedge(814)=0 exch2_myFace(814)=4 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)=35 exch2_jHi(1,814)=35 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)=35 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)=35 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)=34 exch2_tBasex(815)=136 exch2_tBasey(815)=306 exch2_txGlobalo(815)=1667 exch2_tyGlobalo(815)=307 exch2_isWedge(815)=0 exch2_isNedge(815)=0 exch2_isEedge(815)=0 exch2_isSedge(815)=0 exch2_myFace(815)=4 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)=35 exch2_jHi(1,815)=35 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)=35 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)=35 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)=34 exch2_tBasex(816)=170 exch2_tBasey(816)=306 exch2_txGlobalo(816)=1701 exch2_tyGlobalo(816)=307 exch2_isWedge(816)=0 exch2_isNedge(816)=0 exch2_isEedge(816)=0 exch2_isSedge(816)=0 exch2_myFace(816)=4 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)=35 exch2_jHi(1,816)=35 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)=35 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)=35 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)=34 exch2_tBasex(817)=204 exch2_tBasey(817)=306 exch2_txGlobalo(817)=1735 exch2_tyGlobalo(817)=307 exch2_isWedge(817)=0 exch2_isNedge(817)=0 exch2_isEedge(817)=0 exch2_isSedge(817)=0 exch2_myFace(817)=4 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)=35 exch2_jHi(1,817)=35 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)=35 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)=35 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)=34 exch2_tBasex(818)=238 exch2_tBasey(818)=306 exch2_txGlobalo(818)=1769 exch2_tyGlobalo(818)=307 exch2_isWedge(818)=0 exch2_isNedge(818)=0 exch2_isEedge(818)=0 exch2_isSedge(818)=0 exch2_myFace(818)=4 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)=35 exch2_jHi(1,818)=35 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)=35 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)=35 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)=34 exch2_tBasex(819)=272 exch2_tBasey(819)=306 exch2_txGlobalo(819)=1803 exch2_tyGlobalo(819)=307 exch2_isWedge(819)=0 exch2_isNedge(819)=0 exch2_isEedge(819)=0 exch2_isSedge(819)=0 exch2_myFace(819)=4 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)=35 exch2_jHi(1,819)=35 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)=35 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)=35 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)=34 exch2_tBasex(820)=306 exch2_tBasey(820)=306 exch2_txGlobalo(820)=1837 exch2_tyGlobalo(820)=307 exch2_isWedge(820)=0 exch2_isNedge(820)=0 exch2_isEedge(820)=0 exch2_isSedge(820)=0 exch2_myFace(820)=4 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)=35 exch2_jHi(1,820)=35 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)=35 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)=35 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)=34 exch2_tBasex(821)=340 exch2_tBasey(821)=306 exch2_txGlobalo(821)=1871 exch2_tyGlobalo(821)=307 exch2_isWedge(821)=0 exch2_isNedge(821)=0 exch2_isEedge(821)=0 exch2_isSedge(821)=0 exch2_myFace(821)=4 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)=35 exch2_jHi(1,821)=35 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)=35 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)=35 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)=34 exch2_tBasex(822)=374 exch2_tBasey(822)=306 exch2_txGlobalo(822)=1905 exch2_tyGlobalo(822)=307 exch2_isWedge(822)=0 exch2_isNedge(822)=0 exch2_isEedge(822)=0 exch2_isSedge(822)=0 exch2_myFace(822)=4 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)=35 exch2_jHi(1,822)=35 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)=35 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)=35 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)=34 exch2_tBasex(823)=408 exch2_tBasey(823)=306 exch2_txGlobalo(823)=1939 exch2_tyGlobalo(823)=307 exch2_isWedge(823)=0 exch2_isNedge(823)=0 exch2_isEedge(823)=0 exch2_isSedge(823)=0 exch2_myFace(823)=4 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)=35 exch2_jHi(1,823)=35 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)=35 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)=35 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)=34 exch2_tBasex(824)=442 exch2_tBasey(824)=306 exch2_txGlobalo(824)=1973 exch2_tyGlobalo(824)=307 exch2_isWedge(824)=0 exch2_isNedge(824)=0 exch2_isEedge(824)=0 exch2_isSedge(824)=0 exch2_myFace(824)=4 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)=35 exch2_jHi(1,824)=35 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)=35 exch2_opposingSend(3,824)=4 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)=35 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)=34 exch2_tBasex(825)=476 exch2_tBasey(825)=306 exch2_txGlobalo(825)=2007 exch2_tyGlobalo(825)=307 exch2_isWedge(825)=0 exch2_isNedge(825)=0 exch2_isEedge(825)=1 exch2_isSedge(825)=0 exch2_myFace(825)=4 exch2_mydNx(825)=510 exch2_mydNy(825)=510 exch2_nNeighbours(825)=4 exch2_neighbourId(1,825)=840 exch2_iLo(1,825)=0 exch2_iHi(1,825)=35 exch2_jLo(1,825)=35 exch2_jHi(1,825)=35 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)=1131 exch2_iLo(3,825)=35 exch2_iHi(3,825)=35 exch2_jLo(3,825)=0 exch2_jHi(3,825)=35 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)=824 exch2_iLo(4,825)=0 exch2_iHi(4,825)=0 exch2_jLo(4,825)=0 exch2_jHi(4,825)=35 exch2_opposingSend(4,825)=3 exch2_pij(1,4,825)=1 exch2_pij(2,4,825)=0 exch2_pij(3,4,825)=0 exch2_pij(4,4,825)=1 exch2_oi(4,825)=0 exch2_oj(4,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)=34 exch2_tBasex(826)=0 exch2_tBasey(826)=340 exch2_txGlobalo(826)=1531 exch2_tyGlobalo(826)=341 exch2_isWedge(826)=1 exch2_isNedge(826)=0 exch2_isEedge(826)=0 exch2_isSedge(826)=0 exch2_myFace(826)=4 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)=35 exch2_jHi(1,826)=35 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)=35 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)=615 exch2_iLo(4,826)=0 exch2_iHi(4,826)=0 exch2_jLo(4,826)=0 exch2_jHi(4,826)=35 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)=34 exch2_tBasex(827)=34 exch2_tBasey(827)=340 exch2_txGlobalo(827)=1565 exch2_tyGlobalo(827)=341 exch2_isWedge(827)=0 exch2_isNedge(827)=0 exch2_isEedge(827)=0 exch2_isSedge(827)=0 exch2_myFace(827)=4 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)=35 exch2_jHi(1,827)=35 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)=35 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)=35 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)=34 exch2_tBasex(828)=68 exch2_tBasey(828)=340 exch2_txGlobalo(828)=1599 exch2_tyGlobalo(828)=341 exch2_isWedge(828)=0 exch2_isNedge(828)=0 exch2_isEedge(828)=0 exch2_isSedge(828)=0 exch2_myFace(828)=4 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)=35 exch2_jHi(1,828)=35 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)=35 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)=35 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)=34 exch2_tBasex(829)=102 exch2_tBasey(829)=340 exch2_txGlobalo(829)=1633 exch2_tyGlobalo(829)=341 exch2_isWedge(829)=0 exch2_isNedge(829)=0 exch2_isEedge(829)=0 exch2_isSedge(829)=0 exch2_myFace(829)=4 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)=35 exch2_jHi(1,829)=35 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)=35 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)=35 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)=34 exch2_tBasex(830)=136 exch2_tBasey(830)=340 exch2_txGlobalo(830)=1667 exch2_tyGlobalo(830)=341 exch2_isWedge(830)=0 exch2_isNedge(830)=0 exch2_isEedge(830)=0 exch2_isSedge(830)=0 exch2_myFace(830)=4 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)=35 exch2_jHi(1,830)=35 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)=35 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)=35 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)=34 exch2_tBasex(831)=170 exch2_tBasey(831)=340 exch2_txGlobalo(831)=1701 exch2_tyGlobalo(831)=341 exch2_isWedge(831)=0 exch2_isNedge(831)=0 exch2_isEedge(831)=0 exch2_isSedge(831)=0 exch2_myFace(831)=4 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)=35 exch2_jHi(1,831)=35 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)=35 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)=35 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)=34 exch2_tBasex(832)=204 exch2_tBasey(832)=340 exch2_txGlobalo(832)=1735 exch2_tyGlobalo(832)=341 exch2_isWedge(832)=0 exch2_isNedge(832)=0 exch2_isEedge(832)=0 exch2_isSedge(832)=0 exch2_myFace(832)=4 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)=35 exch2_jHi(1,832)=35 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)=35 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)=35 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)=34 exch2_tBasex(833)=238 exch2_tBasey(833)=340 exch2_txGlobalo(833)=1769 exch2_tyGlobalo(833)=341 exch2_isWedge(833)=0 exch2_isNedge(833)=0 exch2_isEedge(833)=0 exch2_isSedge(833)=0 exch2_myFace(833)=4 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)=35 exch2_jHi(1,833)=35 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)=35 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)=35 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)=34 exch2_tBasex(834)=272 exch2_tBasey(834)=340 exch2_txGlobalo(834)=1803 exch2_tyGlobalo(834)=341 exch2_isWedge(834)=0 exch2_isNedge(834)=0 exch2_isEedge(834)=0 exch2_isSedge(834)=0 exch2_myFace(834)=4 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)=35 exch2_jHi(1,834)=35 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)=35 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)=35 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)=34 exch2_tBasex(835)=306 exch2_tBasey(835)=340 exch2_txGlobalo(835)=1837 exch2_tyGlobalo(835)=341 exch2_isWedge(835)=0 exch2_isNedge(835)=0 exch2_isEedge(835)=0 exch2_isSedge(835)=0 exch2_myFace(835)=4 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)=35 exch2_jHi(1,835)=35 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)=35 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)=35 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)=34 exch2_tBasex(836)=340 exch2_tBasey(836)=340 exch2_txGlobalo(836)=1871 exch2_tyGlobalo(836)=341 exch2_isWedge(836)=0 exch2_isNedge(836)=0 exch2_isEedge(836)=0 exch2_isSedge(836)=0 exch2_myFace(836)=4 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)=35 exch2_jHi(1,836)=35 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)=35 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)=35 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)=34 exch2_tBasex(837)=374 exch2_tBasey(837)=340 exch2_txGlobalo(837)=1905 exch2_tyGlobalo(837)=341 exch2_isWedge(837)=0 exch2_isNedge(837)=0 exch2_isEedge(837)=0 exch2_isSedge(837)=0 exch2_myFace(837)=4 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)=35 exch2_jHi(1,837)=35 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)=35 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)=35 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)=34 exch2_tBasex(838)=408 exch2_tBasey(838)=340 exch2_txGlobalo(838)=1939 exch2_tyGlobalo(838)=341 exch2_isWedge(838)=0 exch2_isNedge(838)=0 exch2_isEedge(838)=0 exch2_isSedge(838)=0 exch2_myFace(838)=4 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)=35 exch2_jHi(1,838)=35 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)=35 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)=35 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)=34 exch2_tBasex(839)=442 exch2_tBasey(839)=340 exch2_txGlobalo(839)=1973 exch2_tyGlobalo(839)=341 exch2_isWedge(839)=0 exch2_isNedge(839)=0 exch2_isEedge(839)=0 exch2_isSedge(839)=0 exch2_myFace(839)=4 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)=35 exch2_jHi(1,839)=35 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)=35 exch2_opposingSend(3,839)=4 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)=35 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)=34 exch2_tBasex(840)=476 exch2_tBasey(840)=340 exch2_txGlobalo(840)=2007 exch2_tyGlobalo(840)=341 exch2_isWedge(840)=0 exch2_isNedge(840)=0 exch2_isEedge(840)=1 exch2_isSedge(840)=0 exch2_myFace(840)=4 exch2_mydNx(840)=510 exch2_mydNy(840)=510 exch2_nNeighbours(840)=4 exch2_neighbourId(1,840)=855 exch2_iLo(1,840)=0 exch2_iHi(1,840)=35 exch2_jLo(1,840)=35 exch2_jHi(1,840)=35 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)=1130 exch2_iLo(3,840)=35 exch2_iHi(3,840)=35 exch2_jLo(3,840)=0 exch2_jHi(3,840)=35 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)=839 exch2_iLo(4,840)=0 exch2_iHi(4,840)=0 exch2_jLo(4,840)=0 exch2_jHi(4,840)=35 exch2_opposingSend(4,840)=3 exch2_pij(1,4,840)=1 exch2_pij(2,4,840)=0 exch2_pij(3,4,840)=0 exch2_pij(4,4,840)=1 exch2_oi(4,840)=0 exch2_oj(4,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)=34 exch2_tBasex(841)=0 exch2_tBasey(841)=374 exch2_txGlobalo(841)=1531 exch2_tyGlobalo(841)=375 exch2_isWedge(841)=1 exch2_isNedge(841)=0 exch2_isEedge(841)=0 exch2_isSedge(841)=0 exch2_myFace(841)=4 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)=35 exch2_jHi(1,841)=35 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)=35 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)=630 exch2_iLo(4,841)=0 exch2_iHi(4,841)=0 exch2_jLo(4,841)=0 exch2_jHi(4,841)=35 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)=34 exch2_tBasex(842)=34 exch2_tBasey(842)=374 exch2_txGlobalo(842)=1565 exch2_tyGlobalo(842)=375 exch2_isWedge(842)=0 exch2_isNedge(842)=0 exch2_isEedge(842)=0 exch2_isSedge(842)=0 exch2_myFace(842)=4 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)=35 exch2_jHi(1,842)=35 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)=35 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)=35 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)=34 exch2_tBasex(843)=68 exch2_tBasey(843)=374 exch2_txGlobalo(843)=1599 exch2_tyGlobalo(843)=375 exch2_isWedge(843)=0 exch2_isNedge(843)=0 exch2_isEedge(843)=0 exch2_isSedge(843)=0 exch2_myFace(843)=4 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)=35 exch2_jHi(1,843)=35 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)=35 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)=35 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)=34 exch2_tBasex(844)=102 exch2_tBasey(844)=374 exch2_txGlobalo(844)=1633 exch2_tyGlobalo(844)=375 exch2_isWedge(844)=0 exch2_isNedge(844)=0 exch2_isEedge(844)=0 exch2_isSedge(844)=0 exch2_myFace(844)=4 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)=35 exch2_jHi(1,844)=35 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)=35 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)=35 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)=34 exch2_tBasex(845)=136 exch2_tBasey(845)=374 exch2_txGlobalo(845)=1667 exch2_tyGlobalo(845)=375 exch2_isWedge(845)=0 exch2_isNedge(845)=0 exch2_isEedge(845)=0 exch2_isSedge(845)=0 exch2_myFace(845)=4 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)=35 exch2_jHi(1,845)=35 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)=35 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)=35 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)=34 exch2_tBasex(846)=170 exch2_tBasey(846)=374 exch2_txGlobalo(846)=1701 exch2_tyGlobalo(846)=375 exch2_isWedge(846)=0 exch2_isNedge(846)=0 exch2_isEedge(846)=0 exch2_isSedge(846)=0 exch2_myFace(846)=4 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)=35 exch2_jHi(1,846)=35 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)=35 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)=35 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)=34 exch2_tBasex(847)=204 exch2_tBasey(847)=374 exch2_txGlobalo(847)=1735 exch2_tyGlobalo(847)=375 exch2_isWedge(847)=0 exch2_isNedge(847)=0 exch2_isEedge(847)=0 exch2_isSedge(847)=0 exch2_myFace(847)=4 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)=35 exch2_jHi(1,847)=35 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)=35 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)=35 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)=34 exch2_tBasex(848)=238 exch2_tBasey(848)=374 exch2_txGlobalo(848)=1769 exch2_tyGlobalo(848)=375 exch2_isWedge(848)=0 exch2_isNedge(848)=0 exch2_isEedge(848)=0 exch2_isSedge(848)=0 exch2_myFace(848)=4 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)=35 exch2_jHi(1,848)=35 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)=35 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)=35 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)=34 exch2_tBasex(849)=272 exch2_tBasey(849)=374 exch2_txGlobalo(849)=1803 exch2_tyGlobalo(849)=375 exch2_isWedge(849)=0 exch2_isNedge(849)=0 exch2_isEedge(849)=0 exch2_isSedge(849)=0 exch2_myFace(849)=4 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)=35 exch2_jHi(1,849)=35 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)=35 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)=35 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)=34 exch2_tBasex(850)=306 exch2_tBasey(850)=374 exch2_txGlobalo(850)=1837 exch2_tyGlobalo(850)=375 exch2_isWedge(850)=0 exch2_isNedge(850)=0 exch2_isEedge(850)=0 exch2_isSedge(850)=0 exch2_myFace(850)=4 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)=35 exch2_jHi(1,850)=35 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)=35 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)=35 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)=34 exch2_tBasex(851)=340 exch2_tBasey(851)=374 exch2_txGlobalo(851)=1871 exch2_tyGlobalo(851)=375 exch2_isWedge(851)=0 exch2_isNedge(851)=0 exch2_isEedge(851)=0 exch2_isSedge(851)=0 exch2_myFace(851)=4 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)=35 exch2_jHi(1,851)=35 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)=35 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)=35 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)=34 exch2_tBasex(852)=374 exch2_tBasey(852)=374 exch2_txGlobalo(852)=1905 exch2_tyGlobalo(852)=375 exch2_isWedge(852)=0 exch2_isNedge(852)=0 exch2_isEedge(852)=0 exch2_isSedge(852)=0 exch2_myFace(852)=4 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)=35 exch2_jHi(1,852)=35 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)=35 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)=35 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)=34 exch2_tBasex(853)=408 exch2_tBasey(853)=374 exch2_txGlobalo(853)=1939 exch2_tyGlobalo(853)=375 exch2_isWedge(853)=0 exch2_isNedge(853)=0 exch2_isEedge(853)=0 exch2_isSedge(853)=0 exch2_myFace(853)=4 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)=35 exch2_jHi(1,853)=35 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)=35 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)=35 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)=34 exch2_tBasex(854)=442 exch2_tBasey(854)=374 exch2_txGlobalo(854)=1973 exch2_tyGlobalo(854)=375 exch2_isWedge(854)=0 exch2_isNedge(854)=0 exch2_isEedge(854)=0 exch2_isSedge(854)=0 exch2_myFace(854)=4 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)=35 exch2_jHi(1,854)=35 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)=35 exch2_opposingSend(3,854)=4 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)=35 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)=34 exch2_tBasex(855)=476 exch2_tBasey(855)=374 exch2_txGlobalo(855)=2007 exch2_tyGlobalo(855)=375 exch2_isWedge(855)=0 exch2_isNedge(855)=0 exch2_isEedge(855)=1 exch2_isSedge(855)=0 exch2_myFace(855)=4 exch2_mydNx(855)=510 exch2_mydNy(855)=510 exch2_nNeighbours(855)=4 exch2_neighbourId(1,855)=870 exch2_iLo(1,855)=0 exch2_iHi(1,855)=35 exch2_jLo(1,855)=35 exch2_jHi(1,855)=35 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)=1129 exch2_iLo(3,855)=35 exch2_iHi(3,855)=35 exch2_jLo(3,855)=0 exch2_jHi(3,855)=35 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)=854 exch2_iLo(4,855)=0 exch2_iHi(4,855)=0 exch2_jLo(4,855)=0 exch2_jHi(4,855)=35 exch2_opposingSend(4,855)=3 exch2_pij(1,4,855)=1 exch2_pij(2,4,855)=0 exch2_pij(3,4,855)=0 exch2_pij(4,4,855)=1 exch2_oi(4,855)=0 exch2_oj(4,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)=34 exch2_tBasex(856)=0 exch2_tBasey(856)=408 exch2_txGlobalo(856)=1531 exch2_tyGlobalo(856)=409 exch2_isWedge(856)=1 exch2_isNedge(856)=0 exch2_isEedge(856)=0 exch2_isSedge(856)=0 exch2_myFace(856)=4 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)=35 exch2_jHi(1,856)=35 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)=35 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)=645 exch2_iLo(4,856)=0 exch2_iHi(4,856)=0 exch2_jLo(4,856)=0 exch2_jHi(4,856)=35 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)=34 exch2_tBasex(857)=34 exch2_tBasey(857)=408 exch2_txGlobalo(857)=1565 exch2_tyGlobalo(857)=409 exch2_isWedge(857)=0 exch2_isNedge(857)=0 exch2_isEedge(857)=0 exch2_isSedge(857)=0 exch2_myFace(857)=4 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)=35 exch2_jHi(1,857)=35 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)=35 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)=35 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)=34 exch2_tBasex(858)=68 exch2_tBasey(858)=408 exch2_txGlobalo(858)=1599 exch2_tyGlobalo(858)=409 exch2_isWedge(858)=0 exch2_isNedge(858)=0 exch2_isEedge(858)=0 exch2_isSedge(858)=0 exch2_myFace(858)=4 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)=35 exch2_jHi(1,858)=35 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)=35 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)=35 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)=34 exch2_tBasex(859)=102 exch2_tBasey(859)=408 exch2_txGlobalo(859)=1633 exch2_tyGlobalo(859)=409 exch2_isWedge(859)=0 exch2_isNedge(859)=0 exch2_isEedge(859)=0 exch2_isSedge(859)=0 exch2_myFace(859)=4 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)=35 exch2_jHi(1,859)=35 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)=35 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)=35 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)=34 exch2_tBasex(860)=136 exch2_tBasey(860)=408 exch2_txGlobalo(860)=1667 exch2_tyGlobalo(860)=409 exch2_isWedge(860)=0 exch2_isNedge(860)=0 exch2_isEedge(860)=0 exch2_isSedge(860)=0 exch2_myFace(860)=4 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)=35 exch2_jHi(1,860)=35 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)=35 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)=35 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)=34 exch2_tBasex(861)=170 exch2_tBasey(861)=408 exch2_txGlobalo(861)=1701 exch2_tyGlobalo(861)=409 exch2_isWedge(861)=0 exch2_isNedge(861)=0 exch2_isEedge(861)=0 exch2_isSedge(861)=0 exch2_myFace(861)=4 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)=35 exch2_jHi(1,861)=35 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)=35 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)=35 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)=34 exch2_tBasex(862)=204 exch2_tBasey(862)=408 exch2_txGlobalo(862)=1735 exch2_tyGlobalo(862)=409 exch2_isWedge(862)=0 exch2_isNedge(862)=0 exch2_isEedge(862)=0 exch2_isSedge(862)=0 exch2_myFace(862)=4 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)=35 exch2_jHi(1,862)=35 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)=35 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)=35 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)=34 exch2_tBasex(863)=238 exch2_tBasey(863)=408 exch2_txGlobalo(863)=1769 exch2_tyGlobalo(863)=409 exch2_isWedge(863)=0 exch2_isNedge(863)=0 exch2_isEedge(863)=0 exch2_isSedge(863)=0 exch2_myFace(863)=4 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)=35 exch2_jHi(1,863)=35 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)=35 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)=35 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)=34 exch2_tBasex(864)=272 exch2_tBasey(864)=408 exch2_txGlobalo(864)=1803 exch2_tyGlobalo(864)=409 exch2_isWedge(864)=0 exch2_isNedge(864)=0 exch2_isEedge(864)=0 exch2_isSedge(864)=0 exch2_myFace(864)=4 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)=35 exch2_jHi(1,864)=35 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)=35 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)=35 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)=34 exch2_tBasex(865)=306 exch2_tBasey(865)=408 exch2_txGlobalo(865)=1837 exch2_tyGlobalo(865)=409 exch2_isWedge(865)=0 exch2_isNedge(865)=0 exch2_isEedge(865)=0 exch2_isSedge(865)=0 exch2_myFace(865)=4 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)=35 exch2_jHi(1,865)=35 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)=35 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)=35 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)=34 exch2_tBasex(866)=340 exch2_tBasey(866)=408 exch2_txGlobalo(866)=1871 exch2_tyGlobalo(866)=409 exch2_isWedge(866)=0 exch2_isNedge(866)=0 exch2_isEedge(866)=0 exch2_isSedge(866)=0 exch2_myFace(866)=4 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)=35 exch2_jHi(1,866)=35 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)=35 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)=35 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)=34 exch2_tBasex(867)=374 exch2_tBasey(867)=408 exch2_txGlobalo(867)=1905 exch2_tyGlobalo(867)=409 exch2_isWedge(867)=0 exch2_isNedge(867)=0 exch2_isEedge(867)=0 exch2_isSedge(867)=0 exch2_myFace(867)=4 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)=35 exch2_jHi(1,867)=35 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)=35 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)=35 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)=34 exch2_tBasex(868)=408 exch2_tBasey(868)=408 exch2_txGlobalo(868)=1939 exch2_tyGlobalo(868)=409 exch2_isWedge(868)=0 exch2_isNedge(868)=0 exch2_isEedge(868)=0 exch2_isSedge(868)=0 exch2_myFace(868)=4 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)=35 exch2_jHi(1,868)=35 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)=35 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)=35 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)=34 exch2_tBasex(869)=442 exch2_tBasey(869)=408 exch2_txGlobalo(869)=1973 exch2_tyGlobalo(869)=409 exch2_isWedge(869)=0 exch2_isNedge(869)=0 exch2_isEedge(869)=0 exch2_isSedge(869)=0 exch2_myFace(869)=4 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)=35 exch2_jHi(1,869)=35 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)=35 exch2_opposingSend(3,869)=4 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)=35 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)=34 exch2_tBasex(870)=476 exch2_tBasey(870)=408 exch2_txGlobalo(870)=2007 exch2_tyGlobalo(870)=409 exch2_isWedge(870)=0 exch2_isNedge(870)=0 exch2_isEedge(870)=1 exch2_isSedge(870)=0 exch2_myFace(870)=4 exch2_mydNx(870)=510 exch2_mydNy(870)=510 exch2_nNeighbours(870)=4 exch2_neighbourId(1,870)=885 exch2_iLo(1,870)=0 exch2_iHi(1,870)=35 exch2_jLo(1,870)=35 exch2_jHi(1,870)=35 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)=1128 exch2_iLo(3,870)=35 exch2_iHi(3,870)=35 exch2_jLo(3,870)=0 exch2_jHi(3,870)=35 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)=869 exch2_iLo(4,870)=0 exch2_iHi(4,870)=0 exch2_jLo(4,870)=0 exch2_jHi(4,870)=35 exch2_opposingSend(4,870)=3 exch2_pij(1,4,870)=1 exch2_pij(2,4,870)=0 exch2_pij(3,4,870)=0 exch2_pij(4,4,870)=1 exch2_oi(4,870)=0 exch2_oj(4,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)=34 exch2_tBasex(871)=0 exch2_tBasey(871)=442 exch2_txGlobalo(871)=1531 exch2_tyGlobalo(871)=443 exch2_isWedge(871)=1 exch2_isNedge(871)=0 exch2_isEedge(871)=0 exch2_isSedge(871)=0 exch2_myFace(871)=4 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)=35 exch2_jHi(1,871)=35 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)=35 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)=660 exch2_iLo(4,871)=0 exch2_iHi(4,871)=0 exch2_jLo(4,871)=0 exch2_jHi(4,871)=35 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)=34 exch2_tBasex(872)=34 exch2_tBasey(872)=442 exch2_txGlobalo(872)=1565 exch2_tyGlobalo(872)=443 exch2_isWedge(872)=0 exch2_isNedge(872)=0 exch2_isEedge(872)=0 exch2_isSedge(872)=0 exch2_myFace(872)=4 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)=35 exch2_jHi(1,872)=35 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)=35 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)=35 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)=34 exch2_tBasex(873)=68 exch2_tBasey(873)=442 exch2_txGlobalo(873)=1599 exch2_tyGlobalo(873)=443 exch2_isWedge(873)=0 exch2_isNedge(873)=0 exch2_isEedge(873)=0 exch2_isSedge(873)=0 exch2_myFace(873)=4 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)=35 exch2_jHi(1,873)=35 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)=35 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)=35 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)=34 exch2_tBasex(874)=102 exch2_tBasey(874)=442 exch2_txGlobalo(874)=1633 exch2_tyGlobalo(874)=443 exch2_isWedge(874)=0 exch2_isNedge(874)=0 exch2_isEedge(874)=0 exch2_isSedge(874)=0 exch2_myFace(874)=4 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)=35 exch2_jHi(1,874)=35 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)=35 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)=35 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)=34 exch2_tBasex(875)=136 exch2_tBasey(875)=442 exch2_txGlobalo(875)=1667 exch2_tyGlobalo(875)=443 exch2_isWedge(875)=0 exch2_isNedge(875)=0 exch2_isEedge(875)=0 exch2_isSedge(875)=0 exch2_myFace(875)=4 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)=35 exch2_jHi(1,875)=35 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)=35 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)=35 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)=34 exch2_tBasex(876)=170 exch2_tBasey(876)=442 exch2_txGlobalo(876)=1701 exch2_tyGlobalo(876)=443 exch2_isWedge(876)=0 exch2_isNedge(876)=0 exch2_isEedge(876)=0 exch2_isSedge(876)=0 exch2_myFace(876)=4 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)=35 exch2_jHi(1,876)=35 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)=35 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)=35 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)=34 exch2_tBasex(877)=204 exch2_tBasey(877)=442 exch2_txGlobalo(877)=1735 exch2_tyGlobalo(877)=443 exch2_isWedge(877)=0 exch2_isNedge(877)=0 exch2_isEedge(877)=0 exch2_isSedge(877)=0 exch2_myFace(877)=4 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)=35 exch2_jHi(1,877)=35 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)=35 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)=35 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)=34 exch2_tBasex(878)=238 exch2_tBasey(878)=442 exch2_txGlobalo(878)=1769 exch2_tyGlobalo(878)=443 exch2_isWedge(878)=0 exch2_isNedge(878)=0 exch2_isEedge(878)=0 exch2_isSedge(878)=0 exch2_myFace(878)=4 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)=35 exch2_jHi(1,878)=35 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)=35 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)=35 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)=34 exch2_tBasex(879)=272 exch2_tBasey(879)=442 exch2_txGlobalo(879)=1803 exch2_tyGlobalo(879)=443 exch2_isWedge(879)=0 exch2_isNedge(879)=0 exch2_isEedge(879)=0 exch2_isSedge(879)=0 exch2_myFace(879)=4 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)=35 exch2_jHi(1,879)=35 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)=35 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)=35 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)=34 exch2_tBasex(880)=306 exch2_tBasey(880)=442 exch2_txGlobalo(880)=1837 exch2_tyGlobalo(880)=443 exch2_isWedge(880)=0 exch2_isNedge(880)=0 exch2_isEedge(880)=0 exch2_isSedge(880)=0 exch2_myFace(880)=4 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)=35 exch2_jHi(1,880)=35 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)=35 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)=35 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)=34 exch2_tBasex(881)=340 exch2_tBasey(881)=442 exch2_txGlobalo(881)=1871 exch2_tyGlobalo(881)=443 exch2_isWedge(881)=0 exch2_isNedge(881)=0 exch2_isEedge(881)=0 exch2_isSedge(881)=0 exch2_myFace(881)=4 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)=35 exch2_jHi(1,881)=35 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)=35 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)=35 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)=34 exch2_tBasex(882)=374 exch2_tBasey(882)=442 exch2_txGlobalo(882)=1905 exch2_tyGlobalo(882)=443 exch2_isWedge(882)=0 exch2_isNedge(882)=0 exch2_isEedge(882)=0 exch2_isSedge(882)=0 exch2_myFace(882)=4 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)=35 exch2_jHi(1,882)=35 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)=35 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)=35 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)=34 exch2_tBasex(883)=408 exch2_tBasey(883)=442 exch2_txGlobalo(883)=1939 exch2_tyGlobalo(883)=443 exch2_isWedge(883)=0 exch2_isNedge(883)=0 exch2_isEedge(883)=0 exch2_isSedge(883)=0 exch2_myFace(883)=4 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)=35 exch2_jHi(1,883)=35 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)=35 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)=35 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)=34 exch2_tBasex(884)=442 exch2_tBasey(884)=442 exch2_txGlobalo(884)=1973 exch2_tyGlobalo(884)=443 exch2_isWedge(884)=0 exch2_isNedge(884)=0 exch2_isEedge(884)=0 exch2_isSedge(884)=0 exch2_myFace(884)=4 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)=35 exch2_jHi(1,884)=35 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)=35 exch2_opposingSend(3,884)=4 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)=35 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)=34 exch2_tBasex(885)=476 exch2_tBasey(885)=442 exch2_txGlobalo(885)=2007 exch2_tyGlobalo(885)=443 exch2_isWedge(885)=0 exch2_isNedge(885)=0 exch2_isEedge(885)=1 exch2_isSedge(885)=0 exch2_myFace(885)=4 exch2_mydNx(885)=510 exch2_mydNy(885)=510 exch2_nNeighbours(885)=4 exch2_neighbourId(1,885)=900 exch2_iLo(1,885)=0 exch2_iHi(1,885)=35 exch2_jLo(1,885)=35 exch2_jHi(1,885)=35 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)=1127 exch2_iLo(3,885)=35 exch2_iHi(3,885)=35 exch2_jLo(3,885)=0 exch2_jHi(3,885)=35 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)=884 exch2_iLo(4,885)=0 exch2_iHi(4,885)=0 exch2_jLo(4,885)=0 exch2_jHi(4,885)=35 exch2_opposingSend(4,885)=3 exch2_pij(1,4,885)=1 exch2_pij(2,4,885)=0 exch2_pij(3,4,885)=0 exch2_pij(4,4,885)=1 exch2_oi(4,885)=0 exch2_oj(4,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)=34 exch2_tBasex(886)=0 exch2_tBasey(886)=476 exch2_txGlobalo(886)=1531 exch2_tyGlobalo(886)=477 exch2_isWedge(886)=1 exch2_isNedge(886)=1 exch2_isEedge(886)=0 exch2_isSedge(886)=0 exch2_myFace(886)=4 exch2_mydNx(886)=510 exch2_mydNy(886)=510 exch2_nNeighbours(886)=4 exch2_neighbourId(1,886)=901 exch2_iLo(1,886)=0 exch2_iHi(1,886)=35 exch2_jLo(1,886)=35 exch2_jHi(1,886)=35 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)=35 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)=675 exch2_iLo(4,886)=0 exch2_iHi(4,886)=0 exch2_jLo(4,886)=0 exch2_jHi(4,886)=35 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)=34 exch2_tBasex(887)=34 exch2_tBasey(887)=476 exch2_txGlobalo(887)=1565 exch2_tyGlobalo(887)=477 exch2_isWedge(887)=0 exch2_isNedge(887)=1 exch2_isEedge(887)=0 exch2_isSedge(887)=0 exch2_myFace(887)=4 exch2_mydNx(887)=510 exch2_mydNy(887)=510 exch2_nNeighbours(887)=4 exch2_neighbourId(1,887)=902 exch2_iLo(1,887)=0 exch2_iHi(1,887)=35 exch2_jLo(1,887)=35 exch2_jHi(1,887)=35 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)=35 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)=35 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)=34 exch2_tBasex(888)=68 exch2_tBasey(888)=476 exch2_txGlobalo(888)=1599 exch2_tyGlobalo(888)=477 exch2_isWedge(888)=0 exch2_isNedge(888)=1 exch2_isEedge(888)=0 exch2_isSedge(888)=0 exch2_myFace(888)=4 exch2_mydNx(888)=510 exch2_mydNy(888)=510 exch2_nNeighbours(888)=4 exch2_neighbourId(1,888)=903 exch2_iLo(1,888)=0 exch2_iHi(1,888)=35 exch2_jLo(1,888)=35 exch2_jHi(1,888)=35 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)=35 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)=35 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)=34 exch2_tBasex(889)=102 exch2_tBasey(889)=476 exch2_txGlobalo(889)=1633 exch2_tyGlobalo(889)=477 exch2_isWedge(889)=0 exch2_isNedge(889)=1 exch2_isEedge(889)=0 exch2_isSedge(889)=0 exch2_myFace(889)=4 exch2_mydNx(889)=510 exch2_mydNy(889)=510 exch2_nNeighbours(889)=4 exch2_neighbourId(1,889)=904 exch2_iLo(1,889)=0 exch2_iHi(1,889)=35 exch2_jLo(1,889)=35 exch2_jHi(1,889)=35 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)=35 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)=35 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)=34 exch2_tBasex(890)=136 exch2_tBasey(890)=476 exch2_txGlobalo(890)=1667 exch2_tyGlobalo(890)=477 exch2_isWedge(890)=0 exch2_isNedge(890)=1 exch2_isEedge(890)=0 exch2_isSedge(890)=0 exch2_myFace(890)=4 exch2_mydNx(890)=510 exch2_mydNy(890)=510 exch2_nNeighbours(890)=4 exch2_neighbourId(1,890)=905 exch2_iLo(1,890)=0 exch2_iHi(1,890)=35 exch2_jLo(1,890)=35 exch2_jHi(1,890)=35 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)=35 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)=35 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)=34 exch2_tBasex(891)=170 exch2_tBasey(891)=476 exch2_txGlobalo(891)=1701 exch2_tyGlobalo(891)=477 exch2_isWedge(891)=0 exch2_isNedge(891)=1 exch2_isEedge(891)=0 exch2_isSedge(891)=0 exch2_myFace(891)=4 exch2_mydNx(891)=510 exch2_mydNy(891)=510 exch2_nNeighbours(891)=4 exch2_neighbourId(1,891)=906 exch2_iLo(1,891)=0 exch2_iHi(1,891)=35 exch2_jLo(1,891)=35 exch2_jHi(1,891)=35 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)=35 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)=35 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)=34 exch2_tBasex(892)=204 exch2_tBasey(892)=476 exch2_txGlobalo(892)=1735 exch2_tyGlobalo(892)=477 exch2_isWedge(892)=0 exch2_isNedge(892)=1 exch2_isEedge(892)=0 exch2_isSedge(892)=0 exch2_myFace(892)=4 exch2_mydNx(892)=510 exch2_mydNy(892)=510 exch2_nNeighbours(892)=4 exch2_neighbourId(1,892)=907 exch2_iLo(1,892)=0 exch2_iHi(1,892)=35 exch2_jLo(1,892)=35 exch2_jHi(1,892)=35 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)=35 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)=35 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)=34 exch2_tBasex(893)=238 exch2_tBasey(893)=476 exch2_txGlobalo(893)=1769 exch2_tyGlobalo(893)=477 exch2_isWedge(893)=0 exch2_isNedge(893)=1 exch2_isEedge(893)=0 exch2_isSedge(893)=0 exch2_myFace(893)=4 exch2_mydNx(893)=510 exch2_mydNy(893)=510 exch2_nNeighbours(893)=4 exch2_neighbourId(1,893)=908 exch2_iLo(1,893)=0 exch2_iHi(1,893)=35 exch2_jLo(1,893)=35 exch2_jHi(1,893)=35 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)=35 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)=35 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)=34 exch2_tBasex(894)=272 exch2_tBasey(894)=476 exch2_txGlobalo(894)=1803 exch2_tyGlobalo(894)=477 exch2_isWedge(894)=0 exch2_isNedge(894)=1 exch2_isEedge(894)=0 exch2_isSedge(894)=0 exch2_myFace(894)=4 exch2_mydNx(894)=510 exch2_mydNy(894)=510 exch2_nNeighbours(894)=4 exch2_neighbourId(1,894)=909 exch2_iLo(1,894)=0 exch2_iHi(1,894)=35 exch2_jLo(1,894)=35 exch2_jHi(1,894)=35 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)=35 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)=35 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)=34 exch2_tBasex(895)=306 exch2_tBasey(895)=476 exch2_txGlobalo(895)=1837 exch2_tyGlobalo(895)=477 exch2_isWedge(895)=0 exch2_isNedge(895)=1 exch2_isEedge(895)=0 exch2_isSedge(895)=0 exch2_myFace(895)=4 exch2_mydNx(895)=510 exch2_mydNy(895)=510 exch2_nNeighbours(895)=4 exch2_neighbourId(1,895)=910 exch2_iLo(1,895)=0 exch2_iHi(1,895)=35 exch2_jLo(1,895)=35 exch2_jHi(1,895)=35 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)=35 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)=35 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)=34 exch2_tBasex(896)=340 exch2_tBasey(896)=476 exch2_txGlobalo(896)=1871 exch2_tyGlobalo(896)=477 exch2_isWedge(896)=0 exch2_isNedge(896)=1 exch2_isEedge(896)=0 exch2_isSedge(896)=0 exch2_myFace(896)=4 exch2_mydNx(896)=510 exch2_mydNy(896)=510 exch2_nNeighbours(896)=4 exch2_neighbourId(1,896)=911 exch2_iLo(1,896)=0 exch2_iHi(1,896)=35 exch2_jLo(1,896)=35 exch2_jHi(1,896)=35 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)=35 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)=35 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)=34 exch2_tBasex(897)=374 exch2_tBasey(897)=476 exch2_txGlobalo(897)=1905 exch2_tyGlobalo(897)=477 exch2_isWedge(897)=0 exch2_isNedge(897)=1 exch2_isEedge(897)=0 exch2_isSedge(897)=0 exch2_myFace(897)=4 exch2_mydNx(897)=510 exch2_mydNy(897)=510 exch2_nNeighbours(897)=4 exch2_neighbourId(1,897)=912 exch2_iLo(1,897)=0 exch2_iHi(1,897)=35 exch2_jLo(1,897)=35 exch2_jHi(1,897)=35 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)=35 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)=35 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)=34 exch2_tBasex(898)=408 exch2_tBasey(898)=476 exch2_txGlobalo(898)=1939 exch2_tyGlobalo(898)=477 exch2_isWedge(898)=0 exch2_isNedge(898)=1 exch2_isEedge(898)=0 exch2_isSedge(898)=0 exch2_myFace(898)=4 exch2_mydNx(898)=510 exch2_mydNy(898)=510 exch2_nNeighbours(898)=4 exch2_neighbourId(1,898)=913 exch2_iLo(1,898)=0 exch2_iHi(1,898)=35 exch2_jLo(1,898)=35 exch2_jHi(1,898)=35 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)=35 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)=35 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)=34 exch2_tBasex(899)=442 exch2_tBasey(899)=476 exch2_txGlobalo(899)=1973 exch2_tyGlobalo(899)=477 exch2_isWedge(899)=0 exch2_isNedge(899)=1 exch2_isEedge(899)=0 exch2_isSedge(899)=0 exch2_myFace(899)=4 exch2_mydNx(899)=510 exch2_mydNy(899)=510 exch2_nNeighbours(899)=4 exch2_neighbourId(1,899)=914 exch2_iLo(1,899)=0 exch2_iHi(1,899)=35 exch2_jLo(1,899)=35 exch2_jHi(1,899)=35 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)=35 exch2_opposingSend(3,899)=4 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)=35 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)=34 exch2_tBasex(900)=476 exch2_tBasey(900)=476 exch2_txGlobalo(900)=2007 exch2_tyGlobalo(900)=477 exch2_isWedge(900)=0 exch2_isNedge(900)=1 exch2_isEedge(900)=1 exch2_isSedge(900)=0 exch2_myFace(900)=4 exch2_mydNx(900)=510 exch2_mydNy(900)=510 exch2_nNeighbours(900)=4 exch2_neighbourId(1,900)=915 exch2_iLo(1,900)=0 exch2_iHi(1,900)=35 exch2_jLo(1,900)=35 exch2_jHi(1,900)=35 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)=1126 exch2_iLo(3,900)=35 exch2_iHi(3,900)=35 exch2_jLo(3,900)=0 exch2_jHi(3,900)=35 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)=899 exch2_iLo(4,900)=0 exch2_iHi(4,900)=0 exch2_jLo(4,900)=0 exch2_jHi(4,900)=35 exch2_opposingSend(4,900)=3 exch2_pij(1,4,900)=1 exch2_pij(2,4,900)=0 exch2_pij(3,4,900)=0 exch2_pij(4,4,900)=1 exch2_oi(4,900)=0 exch2_oj(4,900)=0 RETURN END SUBROUTINE W2_E2SETUP_901 C Topology for tile 901 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(901)=34 exch2_tNy(901)=34 exch2_tBasex(901)=0 exch2_tBasey(901)=0 exch2_txGlobalo(901)=2041 exch2_tyGlobalo(901)=1 exch2_isWedge(901)=1 exch2_isNedge(901)=0 exch2_isEedge(901)=0 exch2_isSedge(901)=1 exch2_myFace(901)=5 exch2_mydNx(901)=510 exch2_mydNy(901)=510 exch2_nNeighbours(901)=4 exch2_neighbourId(1,901)=916 exch2_iLo(1,901)=0 exch2_iHi(1,901)=35 exch2_jLo(1,901)=35 exch2_jHi(1,901)=35 exch2_opposingSend(1,901)=2 exch2_pij(1,1,901)=1 exch2_pij(2,1,901)=0 exch2_pij(3,1,901)=0 exch2_pij(4,1,901)=1 exch2_oi(1,901)=0 exch2_oj(1,901)=0 exch2_neighbourId(2,901)=886 exch2_iLo(2,901)=0 exch2_iHi(2,901)=35 exch2_jLo(2,901)=0 exch2_jHi(2,901)=0 exch2_opposingSend(2,901)=1 exch2_pij(1,2,901)=1 exch2_pij(2,2,901)=0 exch2_pij(3,2,901)=0 exch2_pij(4,2,901)=1 exch2_oi(2,901)=0 exch2_oj(2,901)=-510 exch2_neighbourId(3,901)=902 exch2_iLo(3,901)=35 exch2_iHi(3,901)=35 exch2_jLo(3,901)=0 exch2_jHi(3,901)=35 exch2_opposingSend(3,901)=4 exch2_pij(1,3,901)=1 exch2_pij(2,3,901)=0 exch2_pij(3,3,901)=0 exch2_pij(4,3,901)=1 exch2_oi(3,901)=0 exch2_oj(3,901)=0 exch2_neighbourId(4,901)=675 exch2_iLo(4,901)=0 exch2_iHi(4,901)=0 exch2_jLo(4,901)=0 exch2_jHi(4,901)=35 exch2_opposingSend(4,901)=1 exch2_pij(1,4,901)=0 exch2_pij(2,4,901)=1 exch2_pij(3,4,901)=-1 exch2_pij(4,4,901)=0 exch2_oi(4,901)=-510 exch2_oj(4,901)=511 RETURN END SUBROUTINE W2_E2SETUP_902 C Topology for tile 902 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(902)=34 exch2_tNy(902)=34 exch2_tBasex(902)=34 exch2_tBasey(902)=0 exch2_txGlobalo(902)=2075 exch2_tyGlobalo(902)=1 exch2_isWedge(902)=0 exch2_isNedge(902)=0 exch2_isEedge(902)=0 exch2_isSedge(902)=1 exch2_myFace(902)=5 exch2_mydNx(902)=510 exch2_mydNy(902)=510 exch2_nNeighbours(902)=4 exch2_neighbourId(1,902)=917 exch2_iLo(1,902)=0 exch2_iHi(1,902)=35 exch2_jLo(1,902)=35 exch2_jHi(1,902)=35 exch2_opposingSend(1,902)=2 exch2_pij(1,1,902)=1 exch2_pij(2,1,902)=0 exch2_pij(3,1,902)=0 exch2_pij(4,1,902)=1 exch2_oi(1,902)=0 exch2_oj(1,902)=0 exch2_neighbourId(2,902)=887 exch2_iLo(2,902)=0 exch2_iHi(2,902)=35 exch2_jLo(2,902)=0 exch2_jHi(2,902)=0 exch2_opposingSend(2,902)=1 exch2_pij(1,2,902)=1 exch2_pij(2,2,902)=0 exch2_pij(3,2,902)=0 exch2_pij(4,2,902)=1 exch2_oi(2,902)=0 exch2_oj(2,902)=-510 exch2_neighbourId(3,902)=903 exch2_iLo(3,902)=35 exch2_iHi(3,902)=35 exch2_jLo(3,902)=0 exch2_jHi(3,902)=35 exch2_opposingSend(3,902)=4 exch2_pij(1,3,902)=1 exch2_pij(2,3,902)=0 exch2_pij(3,3,902)=0 exch2_pij(4,3,902)=1 exch2_oi(3,902)=0 exch2_oj(3,902)=0 exch2_neighbourId(4,902)=901 exch2_iLo(4,902)=0 exch2_iHi(4,902)=0 exch2_jLo(4,902)=0 exch2_jHi(4,902)=35 exch2_opposingSend(4,902)=3 exch2_pij(1,4,902)=1 exch2_pij(2,4,902)=0 exch2_pij(3,4,902)=0 exch2_pij(4,4,902)=1 exch2_oi(4,902)=0 exch2_oj(4,902)=0 RETURN END SUBROUTINE W2_E2SETUP_903 C Topology for tile 903 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(903)=34 exch2_tNy(903)=34 exch2_tBasex(903)=68 exch2_tBasey(903)=0 exch2_txGlobalo(903)=2109 exch2_tyGlobalo(903)=1 exch2_isWedge(903)=0 exch2_isNedge(903)=0 exch2_isEedge(903)=0 exch2_isSedge(903)=1 exch2_myFace(903)=5 exch2_mydNx(903)=510 exch2_mydNy(903)=510 exch2_nNeighbours(903)=4 exch2_neighbourId(1,903)=918 exch2_iLo(1,903)=0 exch2_iHi(1,903)=35 exch2_jLo(1,903)=35 exch2_jHi(1,903)=35 exch2_opposingSend(1,903)=2 exch2_pij(1,1,903)=1 exch2_pij(2,1,903)=0 exch2_pij(3,1,903)=0 exch2_pij(4,1,903)=1 exch2_oi(1,903)=0 exch2_oj(1,903)=0 exch2_neighbourId(2,903)=888 exch2_iLo(2,903)=0 exch2_iHi(2,903)=35 exch2_jLo(2,903)=0 exch2_jHi(2,903)=0 exch2_opposingSend(2,903)=1 exch2_pij(1,2,903)=1 exch2_pij(2,2,903)=0 exch2_pij(3,2,903)=0 exch2_pij(4,2,903)=1 exch2_oi(2,903)=0 exch2_oj(2,903)=-510 exch2_neighbourId(3,903)=904 exch2_iLo(3,903)=35 exch2_iHi(3,903)=35 exch2_jLo(3,903)=0 exch2_jHi(3,903)=35 exch2_opposingSend(3,903)=4 exch2_pij(1,3,903)=1 exch2_pij(2,3,903)=0 exch2_pij(3,3,903)=0 exch2_pij(4,3,903)=1 exch2_oi(3,903)=0 exch2_oj(3,903)=0 exch2_neighbourId(4,903)=902 exch2_iLo(4,903)=0 exch2_iHi(4,903)=0 exch2_jLo(4,903)=0 exch2_jHi(4,903)=35 exch2_opposingSend(4,903)=3 exch2_pij(1,4,903)=1 exch2_pij(2,4,903)=0 exch2_pij(3,4,903)=0 exch2_pij(4,4,903)=1 exch2_oi(4,903)=0 exch2_oj(4,903)=0 RETURN END SUBROUTINE W2_E2SETUP_904 C Topology for tile 904 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(904)=34 exch2_tNy(904)=34 exch2_tBasex(904)=102 exch2_tBasey(904)=0 exch2_txGlobalo(904)=2143 exch2_tyGlobalo(904)=1 exch2_isWedge(904)=0 exch2_isNedge(904)=0 exch2_isEedge(904)=0 exch2_isSedge(904)=1 exch2_myFace(904)=5 exch2_mydNx(904)=510 exch2_mydNy(904)=510 exch2_nNeighbours(904)=4 exch2_neighbourId(1,904)=919 exch2_iLo(1,904)=0 exch2_iHi(1,904)=35 exch2_jLo(1,904)=35 exch2_jHi(1,904)=35 exch2_opposingSend(1,904)=2 exch2_pij(1,1,904)=1 exch2_pij(2,1,904)=0 exch2_pij(3,1,904)=0 exch2_pij(4,1,904)=1 exch2_oi(1,904)=0 exch2_oj(1,904)=0 exch2_neighbourId(2,904)=889 exch2_iLo(2,904)=0 exch2_iHi(2,904)=35 exch2_jLo(2,904)=0 exch2_jHi(2,904)=0 exch2_opposingSend(2,904)=1 exch2_pij(1,2,904)=1 exch2_pij(2,2,904)=0 exch2_pij(3,2,904)=0 exch2_pij(4,2,904)=1 exch2_oi(2,904)=0 exch2_oj(2,904)=-510 exch2_neighbourId(3,904)=905 exch2_iLo(3,904)=35 exch2_iHi(3,904)=35 exch2_jLo(3,904)=0 exch2_jHi(3,904)=35 exch2_opposingSend(3,904)=4 exch2_pij(1,3,904)=1 exch2_pij(2,3,904)=0 exch2_pij(3,3,904)=0 exch2_pij(4,3,904)=1 exch2_oi(3,904)=0 exch2_oj(3,904)=0 exch2_neighbourId(4,904)=903 exch2_iLo(4,904)=0 exch2_iHi(4,904)=0 exch2_jLo(4,904)=0 exch2_jHi(4,904)=35 exch2_opposingSend(4,904)=3 exch2_pij(1,4,904)=1 exch2_pij(2,4,904)=0 exch2_pij(3,4,904)=0 exch2_pij(4,4,904)=1 exch2_oi(4,904)=0 exch2_oj(4,904)=0 RETURN END SUBROUTINE W2_E2SETUP_905 C Topology for tile 905 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(905)=34 exch2_tNy(905)=34 exch2_tBasex(905)=136 exch2_tBasey(905)=0 exch2_txGlobalo(905)=2177 exch2_tyGlobalo(905)=1 exch2_isWedge(905)=0 exch2_isNedge(905)=0 exch2_isEedge(905)=0 exch2_isSedge(905)=1 exch2_myFace(905)=5 exch2_mydNx(905)=510 exch2_mydNy(905)=510 exch2_nNeighbours(905)=4 exch2_neighbourId(1,905)=920 exch2_iLo(1,905)=0 exch2_iHi(1,905)=35 exch2_jLo(1,905)=35 exch2_jHi(1,905)=35 exch2_opposingSend(1,905)=2 exch2_pij(1,1,905)=1 exch2_pij(2,1,905)=0 exch2_pij(3,1,905)=0 exch2_pij(4,1,905)=1 exch2_oi(1,905)=0 exch2_oj(1,905)=0 exch2_neighbourId(2,905)=890 exch2_iLo(2,905)=0 exch2_iHi(2,905)=35 exch2_jLo(2,905)=0 exch2_jHi(2,905)=0 exch2_opposingSend(2,905)=1 exch2_pij(1,2,905)=1 exch2_pij(2,2,905)=0 exch2_pij(3,2,905)=0 exch2_pij(4,2,905)=1 exch2_oi(2,905)=0 exch2_oj(2,905)=-510 exch2_neighbourId(3,905)=906 exch2_iLo(3,905)=35 exch2_iHi(3,905)=35 exch2_jLo(3,905)=0 exch2_jHi(3,905)=35 exch2_opposingSend(3,905)=4 exch2_pij(1,3,905)=1 exch2_pij(2,3,905)=0 exch2_pij(3,3,905)=0 exch2_pij(4,3,905)=1 exch2_oi(3,905)=0 exch2_oj(3,905)=0 exch2_neighbourId(4,905)=904 exch2_iLo(4,905)=0 exch2_iHi(4,905)=0 exch2_jLo(4,905)=0 exch2_jHi(4,905)=35 exch2_opposingSend(4,905)=3 exch2_pij(1,4,905)=1 exch2_pij(2,4,905)=0 exch2_pij(3,4,905)=0 exch2_pij(4,4,905)=1 exch2_oi(4,905)=0 exch2_oj(4,905)=0 RETURN END SUBROUTINE W2_E2SETUP_906 C Topology for tile 906 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(906)=34 exch2_tNy(906)=34 exch2_tBasex(906)=170 exch2_tBasey(906)=0 exch2_txGlobalo(906)=2211 exch2_tyGlobalo(906)=1 exch2_isWedge(906)=0 exch2_isNedge(906)=0 exch2_isEedge(906)=0 exch2_isSedge(906)=1 exch2_myFace(906)=5 exch2_mydNx(906)=510 exch2_mydNy(906)=510 exch2_nNeighbours(906)=4 exch2_neighbourId(1,906)=921 exch2_iLo(1,906)=0 exch2_iHi(1,906)=35 exch2_jLo(1,906)=35 exch2_jHi(1,906)=35 exch2_opposingSend(1,906)=2 exch2_pij(1,1,906)=1 exch2_pij(2,1,906)=0 exch2_pij(3,1,906)=0 exch2_pij(4,1,906)=1 exch2_oi(1,906)=0 exch2_oj(1,906)=0 exch2_neighbourId(2,906)=891 exch2_iLo(2,906)=0 exch2_iHi(2,906)=35 exch2_jLo(2,906)=0 exch2_jHi(2,906)=0 exch2_opposingSend(2,906)=1 exch2_pij(1,2,906)=1 exch2_pij(2,2,906)=0 exch2_pij(3,2,906)=0 exch2_pij(4,2,906)=1 exch2_oi(2,906)=0 exch2_oj(2,906)=-510 exch2_neighbourId(3,906)=907 exch2_iLo(3,906)=35 exch2_iHi(3,906)=35 exch2_jLo(3,906)=0 exch2_jHi(3,906)=35 exch2_opposingSend(3,906)=4 exch2_pij(1,3,906)=1 exch2_pij(2,3,906)=0 exch2_pij(3,3,906)=0 exch2_pij(4,3,906)=1 exch2_oi(3,906)=0 exch2_oj(3,906)=0 exch2_neighbourId(4,906)=905 exch2_iLo(4,906)=0 exch2_iHi(4,906)=0 exch2_jLo(4,906)=0 exch2_jHi(4,906)=35 exch2_opposingSend(4,906)=3 exch2_pij(1,4,906)=1 exch2_pij(2,4,906)=0 exch2_pij(3,4,906)=0 exch2_pij(4,4,906)=1 exch2_oi(4,906)=0 exch2_oj(4,906)=0 RETURN END SUBROUTINE W2_E2SETUP_907 C Topology for tile 907 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(907)=34 exch2_tNy(907)=34 exch2_tBasex(907)=204 exch2_tBasey(907)=0 exch2_txGlobalo(907)=2245 exch2_tyGlobalo(907)=1 exch2_isWedge(907)=0 exch2_isNedge(907)=0 exch2_isEedge(907)=0 exch2_isSedge(907)=1 exch2_myFace(907)=5 exch2_mydNx(907)=510 exch2_mydNy(907)=510 exch2_nNeighbours(907)=4 exch2_neighbourId(1,907)=922 exch2_iLo(1,907)=0 exch2_iHi(1,907)=35 exch2_jLo(1,907)=35 exch2_jHi(1,907)=35 exch2_opposingSend(1,907)=2 exch2_pij(1,1,907)=1 exch2_pij(2,1,907)=0 exch2_pij(3,1,907)=0 exch2_pij(4,1,907)=1 exch2_oi(1,907)=0 exch2_oj(1,907)=0 exch2_neighbourId(2,907)=892 exch2_iLo(2,907)=0 exch2_iHi(2,907)=35 exch2_jLo(2,907)=0 exch2_jHi(2,907)=0 exch2_opposingSend(2,907)=1 exch2_pij(1,2,907)=1 exch2_pij(2,2,907)=0 exch2_pij(3,2,907)=0 exch2_pij(4,2,907)=1 exch2_oi(2,907)=0 exch2_oj(2,907)=-510 exch2_neighbourId(3,907)=908 exch2_iLo(3,907)=35 exch2_iHi(3,907)=35 exch2_jLo(3,907)=0 exch2_jHi(3,907)=35 exch2_opposingSend(3,907)=4 exch2_pij(1,3,907)=1 exch2_pij(2,3,907)=0 exch2_pij(3,3,907)=0 exch2_pij(4,3,907)=1 exch2_oi(3,907)=0 exch2_oj(3,907)=0 exch2_neighbourId(4,907)=906 exch2_iLo(4,907)=0 exch2_iHi(4,907)=0 exch2_jLo(4,907)=0 exch2_jHi(4,907)=35 exch2_opposingSend(4,907)=3 exch2_pij(1,4,907)=1 exch2_pij(2,4,907)=0 exch2_pij(3,4,907)=0 exch2_pij(4,4,907)=1 exch2_oi(4,907)=0 exch2_oj(4,907)=0 RETURN END SUBROUTINE W2_E2SETUP_908 C Topology for tile 908 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(908)=34 exch2_tNy(908)=34 exch2_tBasex(908)=238 exch2_tBasey(908)=0 exch2_txGlobalo(908)=2279 exch2_tyGlobalo(908)=1 exch2_isWedge(908)=0 exch2_isNedge(908)=0 exch2_isEedge(908)=0 exch2_isSedge(908)=1 exch2_myFace(908)=5 exch2_mydNx(908)=510 exch2_mydNy(908)=510 exch2_nNeighbours(908)=4 exch2_neighbourId(1,908)=923 exch2_iLo(1,908)=0 exch2_iHi(1,908)=35 exch2_jLo(1,908)=35 exch2_jHi(1,908)=35 exch2_opposingSend(1,908)=2 exch2_pij(1,1,908)=1 exch2_pij(2,1,908)=0 exch2_pij(3,1,908)=0 exch2_pij(4,1,908)=1 exch2_oi(1,908)=0 exch2_oj(1,908)=0 exch2_neighbourId(2,908)=893 exch2_iLo(2,908)=0 exch2_iHi(2,908)=35 exch2_jLo(2,908)=0 exch2_jHi(2,908)=0 exch2_opposingSend(2,908)=1 exch2_pij(1,2,908)=1 exch2_pij(2,2,908)=0 exch2_pij(3,2,908)=0 exch2_pij(4,2,908)=1 exch2_oi(2,908)=0 exch2_oj(2,908)=-510 exch2_neighbourId(3,908)=909 exch2_iLo(3,908)=35 exch2_iHi(3,908)=35 exch2_jLo(3,908)=0 exch2_jHi(3,908)=35 exch2_opposingSend(3,908)=4 exch2_pij(1,3,908)=1 exch2_pij(2,3,908)=0 exch2_pij(3,3,908)=0 exch2_pij(4,3,908)=1 exch2_oi(3,908)=0 exch2_oj(3,908)=0 exch2_neighbourId(4,908)=907 exch2_iLo(4,908)=0 exch2_iHi(4,908)=0 exch2_jLo(4,908)=0 exch2_jHi(4,908)=35 exch2_opposingSend(4,908)=3 exch2_pij(1,4,908)=1 exch2_pij(2,4,908)=0 exch2_pij(3,4,908)=0 exch2_pij(4,4,908)=1 exch2_oi(4,908)=0 exch2_oj(4,908)=0 RETURN END SUBROUTINE W2_E2SETUP_909 C Topology for tile 909 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(909)=34 exch2_tNy(909)=34 exch2_tBasex(909)=272 exch2_tBasey(909)=0 exch2_txGlobalo(909)=2313 exch2_tyGlobalo(909)=1 exch2_isWedge(909)=0 exch2_isNedge(909)=0 exch2_isEedge(909)=0 exch2_isSedge(909)=1 exch2_myFace(909)=5 exch2_mydNx(909)=510 exch2_mydNy(909)=510 exch2_nNeighbours(909)=4 exch2_neighbourId(1,909)=924 exch2_iLo(1,909)=0 exch2_iHi(1,909)=35 exch2_jLo(1,909)=35 exch2_jHi(1,909)=35 exch2_opposingSend(1,909)=2 exch2_pij(1,1,909)=1 exch2_pij(2,1,909)=0 exch2_pij(3,1,909)=0 exch2_pij(4,1,909)=1 exch2_oi(1,909)=0 exch2_oj(1,909)=0 exch2_neighbourId(2,909)=894 exch2_iLo(2,909)=0 exch2_iHi(2,909)=35 exch2_jLo(2,909)=0 exch2_jHi(2,909)=0 exch2_opposingSend(2,909)=1 exch2_pij(1,2,909)=1 exch2_pij(2,2,909)=0 exch2_pij(3,2,909)=0 exch2_pij(4,2,909)=1 exch2_oi(2,909)=0 exch2_oj(2,909)=-510 exch2_neighbourId(3,909)=910 exch2_iLo(3,909)=35 exch2_iHi(3,909)=35 exch2_jLo(3,909)=0 exch2_jHi(3,909)=35 exch2_opposingSend(3,909)=4 exch2_pij(1,3,909)=1 exch2_pij(2,3,909)=0 exch2_pij(3,3,909)=0 exch2_pij(4,3,909)=1 exch2_oi(3,909)=0 exch2_oj(3,909)=0 exch2_neighbourId(4,909)=908 exch2_iLo(4,909)=0 exch2_iHi(4,909)=0 exch2_jLo(4,909)=0 exch2_jHi(4,909)=35 exch2_opposingSend(4,909)=3 exch2_pij(1,4,909)=1 exch2_pij(2,4,909)=0 exch2_pij(3,4,909)=0 exch2_pij(4,4,909)=1 exch2_oi(4,909)=0 exch2_oj(4,909)=0 RETURN END SUBROUTINE W2_E2SETUP_910 C Topology for tile 910 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(910)=34 exch2_tNy(910)=34 exch2_tBasex(910)=306 exch2_tBasey(910)=0 exch2_txGlobalo(910)=2347 exch2_tyGlobalo(910)=1 exch2_isWedge(910)=0 exch2_isNedge(910)=0 exch2_isEedge(910)=0 exch2_isSedge(910)=1 exch2_myFace(910)=5 exch2_mydNx(910)=510 exch2_mydNy(910)=510 exch2_nNeighbours(910)=4 exch2_neighbourId(1,910)=925 exch2_iLo(1,910)=0 exch2_iHi(1,910)=35 exch2_jLo(1,910)=35 exch2_jHi(1,910)=35 exch2_opposingSend(1,910)=2 exch2_pij(1,1,910)=1 exch2_pij(2,1,910)=0 exch2_pij(3,1,910)=0 exch2_pij(4,1,910)=1 exch2_oi(1,910)=0 exch2_oj(1,910)=0 exch2_neighbourId(2,910)=895 exch2_iLo(2,910)=0 exch2_iHi(2,910)=35 exch2_jLo(2,910)=0 exch2_jHi(2,910)=0 exch2_opposingSend(2,910)=1 exch2_pij(1,2,910)=1 exch2_pij(2,2,910)=0 exch2_pij(3,2,910)=0 exch2_pij(4,2,910)=1 exch2_oi(2,910)=0 exch2_oj(2,910)=-510 exch2_neighbourId(3,910)=911 exch2_iLo(3,910)=35 exch2_iHi(3,910)=35 exch2_jLo(3,910)=0 exch2_jHi(3,910)=35 exch2_opposingSend(3,910)=4 exch2_pij(1,3,910)=1 exch2_pij(2,3,910)=0 exch2_pij(3,3,910)=0 exch2_pij(4,3,910)=1 exch2_oi(3,910)=0 exch2_oj(3,910)=0 exch2_neighbourId(4,910)=909 exch2_iLo(4,910)=0 exch2_iHi(4,910)=0 exch2_jLo(4,910)=0 exch2_jHi(4,910)=35 exch2_opposingSend(4,910)=3 exch2_pij(1,4,910)=1 exch2_pij(2,4,910)=0 exch2_pij(3,4,910)=0 exch2_pij(4,4,910)=1 exch2_oi(4,910)=0 exch2_oj(4,910)=0 RETURN END SUBROUTINE W2_E2SETUP_911 C Topology for tile 911 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(911)=34 exch2_tNy(911)=34 exch2_tBasex(911)=340 exch2_tBasey(911)=0 exch2_txGlobalo(911)=2381 exch2_tyGlobalo(911)=1 exch2_isWedge(911)=0 exch2_isNedge(911)=0 exch2_isEedge(911)=0 exch2_isSedge(911)=1 exch2_myFace(911)=5 exch2_mydNx(911)=510 exch2_mydNy(911)=510 exch2_nNeighbours(911)=4 exch2_neighbourId(1,911)=926 exch2_iLo(1,911)=0 exch2_iHi(1,911)=35 exch2_jLo(1,911)=35 exch2_jHi(1,911)=35 exch2_opposingSend(1,911)=2 exch2_pij(1,1,911)=1 exch2_pij(2,1,911)=0 exch2_pij(3,1,911)=0 exch2_pij(4,1,911)=1 exch2_oi(1,911)=0 exch2_oj(1,911)=0 exch2_neighbourId(2,911)=896 exch2_iLo(2,911)=0 exch2_iHi(2,911)=35 exch2_jLo(2,911)=0 exch2_jHi(2,911)=0 exch2_opposingSend(2,911)=1 exch2_pij(1,2,911)=1 exch2_pij(2,2,911)=0 exch2_pij(3,2,911)=0 exch2_pij(4,2,911)=1 exch2_oi(2,911)=0 exch2_oj(2,911)=-510 exch2_neighbourId(3,911)=912 exch2_iLo(3,911)=35 exch2_iHi(3,911)=35 exch2_jLo(3,911)=0 exch2_jHi(3,911)=35 exch2_opposingSend(3,911)=4 exch2_pij(1,3,911)=1 exch2_pij(2,3,911)=0 exch2_pij(3,3,911)=0 exch2_pij(4,3,911)=1 exch2_oi(3,911)=0 exch2_oj(3,911)=0 exch2_neighbourId(4,911)=910 exch2_iLo(4,911)=0 exch2_iHi(4,911)=0 exch2_jLo(4,911)=0 exch2_jHi(4,911)=35 exch2_opposingSend(4,911)=3 exch2_pij(1,4,911)=1 exch2_pij(2,4,911)=0 exch2_pij(3,4,911)=0 exch2_pij(4,4,911)=1 exch2_oi(4,911)=0 exch2_oj(4,911)=0 RETURN END SUBROUTINE W2_E2SETUP_912 C Topology for tile 912 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(912)=34 exch2_tNy(912)=34 exch2_tBasex(912)=374 exch2_tBasey(912)=0 exch2_txGlobalo(912)=2415 exch2_tyGlobalo(912)=1 exch2_isWedge(912)=0 exch2_isNedge(912)=0 exch2_isEedge(912)=0 exch2_isSedge(912)=1 exch2_myFace(912)=5 exch2_mydNx(912)=510 exch2_mydNy(912)=510 exch2_nNeighbours(912)=4 exch2_neighbourId(1,912)=927 exch2_iLo(1,912)=0 exch2_iHi(1,912)=35 exch2_jLo(1,912)=35 exch2_jHi(1,912)=35 exch2_opposingSend(1,912)=2 exch2_pij(1,1,912)=1 exch2_pij(2,1,912)=0 exch2_pij(3,1,912)=0 exch2_pij(4,1,912)=1 exch2_oi(1,912)=0 exch2_oj(1,912)=0 exch2_neighbourId(2,912)=897 exch2_iLo(2,912)=0 exch2_iHi(2,912)=35 exch2_jLo(2,912)=0 exch2_jHi(2,912)=0 exch2_opposingSend(2,912)=1 exch2_pij(1,2,912)=1 exch2_pij(2,2,912)=0 exch2_pij(3,2,912)=0 exch2_pij(4,2,912)=1 exch2_oi(2,912)=0 exch2_oj(2,912)=-510 exch2_neighbourId(3,912)=913 exch2_iLo(3,912)=35 exch2_iHi(3,912)=35 exch2_jLo(3,912)=0 exch2_jHi(3,912)=35 exch2_opposingSend(3,912)=4 exch2_pij(1,3,912)=1 exch2_pij(2,3,912)=0 exch2_pij(3,3,912)=0 exch2_pij(4,3,912)=1 exch2_oi(3,912)=0 exch2_oj(3,912)=0 exch2_neighbourId(4,912)=911 exch2_iLo(4,912)=0 exch2_iHi(4,912)=0 exch2_jLo(4,912)=0 exch2_jHi(4,912)=35 exch2_opposingSend(4,912)=3 exch2_pij(1,4,912)=1 exch2_pij(2,4,912)=0 exch2_pij(3,4,912)=0 exch2_pij(4,4,912)=1 exch2_oi(4,912)=0 exch2_oj(4,912)=0 RETURN END SUBROUTINE W2_E2SETUP_913 C Topology for tile 913 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(913)=34 exch2_tNy(913)=34 exch2_tBasex(913)=408 exch2_tBasey(913)=0 exch2_txGlobalo(913)=2449 exch2_tyGlobalo(913)=1 exch2_isWedge(913)=0 exch2_isNedge(913)=0 exch2_isEedge(913)=0 exch2_isSedge(913)=1 exch2_myFace(913)=5 exch2_mydNx(913)=510 exch2_mydNy(913)=510 exch2_nNeighbours(913)=4 exch2_neighbourId(1,913)=928 exch2_iLo(1,913)=0 exch2_iHi(1,913)=35 exch2_jLo(1,913)=35 exch2_jHi(1,913)=35 exch2_opposingSend(1,913)=2 exch2_pij(1,1,913)=1 exch2_pij(2,1,913)=0 exch2_pij(3,1,913)=0 exch2_pij(4,1,913)=1 exch2_oi(1,913)=0 exch2_oj(1,913)=0 exch2_neighbourId(2,913)=898 exch2_iLo(2,913)=0 exch2_iHi(2,913)=35 exch2_jLo(2,913)=0 exch2_jHi(2,913)=0 exch2_opposingSend(2,913)=1 exch2_pij(1,2,913)=1 exch2_pij(2,2,913)=0 exch2_pij(3,2,913)=0 exch2_pij(4,2,913)=1 exch2_oi(2,913)=0 exch2_oj(2,913)=-510 exch2_neighbourId(3,913)=914 exch2_iLo(3,913)=35 exch2_iHi(3,913)=35 exch2_jLo(3,913)=0 exch2_jHi(3,913)=35 exch2_opposingSend(3,913)=4 exch2_pij(1,3,913)=1 exch2_pij(2,3,913)=0 exch2_pij(3,3,913)=0 exch2_pij(4,3,913)=1 exch2_oi(3,913)=0 exch2_oj(3,913)=0 exch2_neighbourId(4,913)=912 exch2_iLo(4,913)=0 exch2_iHi(4,913)=0 exch2_jLo(4,913)=0 exch2_jHi(4,913)=35 exch2_opposingSend(4,913)=3 exch2_pij(1,4,913)=1 exch2_pij(2,4,913)=0 exch2_pij(3,4,913)=0 exch2_pij(4,4,913)=1 exch2_oi(4,913)=0 exch2_oj(4,913)=0 RETURN END SUBROUTINE W2_E2SETUP_914 C Topology for tile 914 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(914)=34 exch2_tNy(914)=34 exch2_tBasex(914)=442 exch2_tBasey(914)=0 exch2_txGlobalo(914)=2483 exch2_tyGlobalo(914)=1 exch2_isWedge(914)=0 exch2_isNedge(914)=0 exch2_isEedge(914)=0 exch2_isSedge(914)=1 exch2_myFace(914)=5 exch2_mydNx(914)=510 exch2_mydNy(914)=510 exch2_nNeighbours(914)=4 exch2_neighbourId(1,914)=929 exch2_iLo(1,914)=0 exch2_iHi(1,914)=35 exch2_jLo(1,914)=35 exch2_jHi(1,914)=35 exch2_opposingSend(1,914)=2 exch2_pij(1,1,914)=1 exch2_pij(2,1,914)=0 exch2_pij(3,1,914)=0 exch2_pij(4,1,914)=1 exch2_oi(1,914)=0 exch2_oj(1,914)=0 exch2_neighbourId(2,914)=899 exch2_iLo(2,914)=0 exch2_iHi(2,914)=35 exch2_jLo(2,914)=0 exch2_jHi(2,914)=0 exch2_opposingSend(2,914)=1 exch2_pij(1,2,914)=1 exch2_pij(2,2,914)=0 exch2_pij(3,2,914)=0 exch2_pij(4,2,914)=1 exch2_oi(2,914)=0 exch2_oj(2,914)=-510 exch2_neighbourId(3,914)=915 exch2_iLo(3,914)=35 exch2_iHi(3,914)=35 exch2_jLo(3,914)=0 exch2_jHi(3,914)=35 exch2_opposingSend(3,914)=4 exch2_pij(1,3,914)=1 exch2_pij(2,3,914)=0 exch2_pij(3,3,914)=0 exch2_pij(4,3,914)=1 exch2_oi(3,914)=0 exch2_oj(3,914)=0 exch2_neighbourId(4,914)=913 exch2_iLo(4,914)=0 exch2_iHi(4,914)=0 exch2_jLo(4,914)=0 exch2_jHi(4,914)=35 exch2_opposingSend(4,914)=3 exch2_pij(1,4,914)=1 exch2_pij(2,4,914)=0 exch2_pij(3,4,914)=0 exch2_pij(4,4,914)=1 exch2_oi(4,914)=0 exch2_oj(4,914)=0 RETURN END SUBROUTINE W2_E2SETUP_915 C Topology for tile 915 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(915)=34 exch2_tNy(915)=34 exch2_tBasex(915)=476 exch2_tBasey(915)=0 exch2_txGlobalo(915)=2517 exch2_tyGlobalo(915)=1 exch2_isWedge(915)=0 exch2_isNedge(915)=0 exch2_isEedge(915)=1 exch2_isSedge(915)=1 exch2_myFace(915)=5 exch2_mydNx(915)=510 exch2_mydNy(915)=510 exch2_nNeighbours(915)=4 exch2_neighbourId(1,915)=930 exch2_iLo(1,915)=0 exch2_iHi(1,915)=35 exch2_jLo(1,915)=35 exch2_jHi(1,915)=35 exch2_opposingSend(1,915)=2 exch2_pij(1,1,915)=1 exch2_pij(2,1,915)=0 exch2_pij(3,1,915)=0 exch2_pij(4,1,915)=1 exch2_oi(1,915)=0 exch2_oj(1,915)=0 exch2_neighbourId(2,915)=900 exch2_iLo(2,915)=0 exch2_iHi(2,915)=35 exch2_jLo(2,915)=0 exch2_jHi(2,915)=0 exch2_opposingSend(2,915)=1 exch2_pij(1,2,915)=1 exch2_pij(2,2,915)=0 exch2_pij(3,2,915)=0 exch2_pij(4,2,915)=1 exch2_oi(2,915)=0 exch2_oj(2,915)=-510 exch2_neighbourId(3,915)=1126 exch2_iLo(3,915)=35 exch2_iHi(3,915)=35 exch2_jLo(3,915)=0 exch2_jHi(3,915)=35 exch2_opposingSend(3,915)=4 exch2_pij(1,3,915)=1 exch2_pij(2,3,915)=0 exch2_pij(3,3,915)=0 exch2_pij(4,3,915)=1 exch2_oi(3,915)=510 exch2_oj(3,915)=0 exch2_neighbourId(4,915)=914 exch2_iLo(4,915)=0 exch2_iHi(4,915)=0 exch2_jLo(4,915)=0 exch2_jHi(4,915)=35 exch2_opposingSend(4,915)=3 exch2_pij(1,4,915)=1 exch2_pij(2,4,915)=0 exch2_pij(3,4,915)=0 exch2_pij(4,4,915)=1 exch2_oi(4,915)=0 exch2_oj(4,915)=0 RETURN END SUBROUTINE W2_E2SETUP_916 C Topology for tile 916 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(916)=34 exch2_tNy(916)=34 exch2_tBasex(916)=0 exch2_tBasey(916)=34 exch2_txGlobalo(916)=2041 exch2_tyGlobalo(916)=35 exch2_isWedge(916)=1 exch2_isNedge(916)=0 exch2_isEedge(916)=0 exch2_isSedge(916)=0 exch2_myFace(916)=5 exch2_mydNx(916)=510 exch2_mydNy(916)=510 exch2_nNeighbours(916)=4 exch2_neighbourId(1,916)=931 exch2_iLo(1,916)=0 exch2_iHi(1,916)=35 exch2_jLo(1,916)=35 exch2_jHi(1,916)=35 exch2_opposingSend(1,916)=2 exch2_pij(1,1,916)=1 exch2_pij(2,1,916)=0 exch2_pij(3,1,916)=0 exch2_pij(4,1,916)=1 exch2_oi(1,916)=0 exch2_oj(1,916)=0 exch2_neighbourId(2,916)=901 exch2_iLo(2,916)=0 exch2_iHi(2,916)=35 exch2_jLo(2,916)=0 exch2_jHi(2,916)=0 exch2_opposingSend(2,916)=1 exch2_pij(1,2,916)=1 exch2_pij(2,2,916)=0 exch2_pij(3,2,916)=0 exch2_pij(4,2,916)=1 exch2_oi(2,916)=0 exch2_oj(2,916)=0 exch2_neighbourId(3,916)=917 exch2_iLo(3,916)=35 exch2_iHi(3,916)=35 exch2_jLo(3,916)=0 exch2_jHi(3,916)=35 exch2_opposingSend(3,916)=4 exch2_pij(1,3,916)=1 exch2_pij(2,3,916)=0 exch2_pij(3,3,916)=0 exch2_pij(4,3,916)=1 exch2_oi(3,916)=0 exch2_oj(3,916)=0 exch2_neighbourId(4,916)=674 exch2_iLo(4,916)=0 exch2_iHi(4,916)=0 exch2_jLo(4,916)=0 exch2_jHi(4,916)=35 exch2_opposingSend(4,916)=1 exch2_pij(1,4,916)=0 exch2_pij(2,4,916)=1 exch2_pij(3,4,916)=-1 exch2_pij(4,4,916)=0 exch2_oi(4,916)=-510 exch2_oj(4,916)=511 RETURN END SUBROUTINE W2_E2SETUP_917 C Topology for tile 917 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(917)=34 exch2_tNy(917)=34 exch2_tBasex(917)=34 exch2_tBasey(917)=34 exch2_txGlobalo(917)=2075 exch2_tyGlobalo(917)=35 exch2_isWedge(917)=0 exch2_isNedge(917)=0 exch2_isEedge(917)=0 exch2_isSedge(917)=0 exch2_myFace(917)=5 exch2_mydNx(917)=510 exch2_mydNy(917)=510 exch2_nNeighbours(917)=4 exch2_neighbourId(1,917)=932 exch2_iLo(1,917)=0 exch2_iHi(1,917)=35 exch2_jLo(1,917)=35 exch2_jHi(1,917)=35 exch2_opposingSend(1,917)=2 exch2_pij(1,1,917)=1 exch2_pij(2,1,917)=0 exch2_pij(3,1,917)=0 exch2_pij(4,1,917)=1 exch2_oi(1,917)=0 exch2_oj(1,917)=0 exch2_neighbourId(2,917)=902 exch2_iLo(2,917)=0 exch2_iHi(2,917)=35 exch2_jLo(2,917)=0 exch2_jHi(2,917)=0 exch2_opposingSend(2,917)=1 exch2_pij(1,2,917)=1 exch2_pij(2,2,917)=0 exch2_pij(3,2,917)=0 exch2_pij(4,2,917)=1 exch2_oi(2,917)=0 exch2_oj(2,917)=0 exch2_neighbourId(3,917)=918 exch2_iLo(3,917)=35 exch2_iHi(3,917)=35 exch2_jLo(3,917)=0 exch2_jHi(3,917)=35 exch2_opposingSend(3,917)=4 exch2_pij(1,3,917)=1 exch2_pij(2,3,917)=0 exch2_pij(3,3,917)=0 exch2_pij(4,3,917)=1 exch2_oi(3,917)=0 exch2_oj(3,917)=0 exch2_neighbourId(4,917)=916 exch2_iLo(4,917)=0 exch2_iHi(4,917)=0 exch2_jLo(4,917)=0 exch2_jHi(4,917)=35 exch2_opposingSend(4,917)=3 exch2_pij(1,4,917)=1 exch2_pij(2,4,917)=0 exch2_pij(3,4,917)=0 exch2_pij(4,4,917)=1 exch2_oi(4,917)=0 exch2_oj(4,917)=0 RETURN END SUBROUTINE W2_E2SETUP_918 C Topology for tile 918 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(918)=34 exch2_tNy(918)=34 exch2_tBasex(918)=68 exch2_tBasey(918)=34 exch2_txGlobalo(918)=2109 exch2_tyGlobalo(918)=35 exch2_isWedge(918)=0 exch2_isNedge(918)=0 exch2_isEedge(918)=0 exch2_isSedge(918)=0 exch2_myFace(918)=5 exch2_mydNx(918)=510 exch2_mydNy(918)=510 exch2_nNeighbours(918)=4 exch2_neighbourId(1,918)=933 exch2_iLo(1,918)=0 exch2_iHi(1,918)=35 exch2_jLo(1,918)=35 exch2_jHi(1,918)=35 exch2_opposingSend(1,918)=2 exch2_pij(1,1,918)=1 exch2_pij(2,1,918)=0 exch2_pij(3,1,918)=0 exch2_pij(4,1,918)=1 exch2_oi(1,918)=0 exch2_oj(1,918)=0 exch2_neighbourId(2,918)=903 exch2_iLo(2,918)=0 exch2_iHi(2,918)=35 exch2_jLo(2,918)=0 exch2_jHi(2,918)=0 exch2_opposingSend(2,918)=1 exch2_pij(1,2,918)=1 exch2_pij(2,2,918)=0 exch2_pij(3,2,918)=0 exch2_pij(4,2,918)=1 exch2_oi(2,918)=0 exch2_oj(2,918)=0 exch2_neighbourId(3,918)=919 exch2_iLo(3,918)=35 exch2_iHi(3,918)=35 exch2_jLo(3,918)=0 exch2_jHi(3,918)=35 exch2_opposingSend(3,918)=4 exch2_pij(1,3,918)=1 exch2_pij(2,3,918)=0 exch2_pij(3,3,918)=0 exch2_pij(4,3,918)=1 exch2_oi(3,918)=0 exch2_oj(3,918)=0 exch2_neighbourId(4,918)=917 exch2_iLo(4,918)=0 exch2_iHi(4,918)=0 exch2_jLo(4,918)=0 exch2_jHi(4,918)=35 exch2_opposingSend(4,918)=3 exch2_pij(1,4,918)=1 exch2_pij(2,4,918)=0 exch2_pij(3,4,918)=0 exch2_pij(4,4,918)=1 exch2_oi(4,918)=0 exch2_oj(4,918)=0 RETURN END SUBROUTINE W2_E2SETUP_919 C Topology for tile 919 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(919)=34 exch2_tNy(919)=34 exch2_tBasex(919)=102 exch2_tBasey(919)=34 exch2_txGlobalo(919)=2143 exch2_tyGlobalo(919)=35 exch2_isWedge(919)=0 exch2_isNedge(919)=0 exch2_isEedge(919)=0 exch2_isSedge(919)=0 exch2_myFace(919)=5 exch2_mydNx(919)=510 exch2_mydNy(919)=510 exch2_nNeighbours(919)=4 exch2_neighbourId(1,919)=934 exch2_iLo(1,919)=0 exch2_iHi(1,919)=35 exch2_jLo(1,919)=35 exch2_jHi(1,919)=35 exch2_opposingSend(1,919)=2 exch2_pij(1,1,919)=1 exch2_pij(2,1,919)=0 exch2_pij(3,1,919)=0 exch2_pij(4,1,919)=1 exch2_oi(1,919)=0 exch2_oj(1,919)=0 exch2_neighbourId(2,919)=904 exch2_iLo(2,919)=0 exch2_iHi(2,919)=35 exch2_jLo(2,919)=0 exch2_jHi(2,919)=0 exch2_opposingSend(2,919)=1 exch2_pij(1,2,919)=1 exch2_pij(2,2,919)=0 exch2_pij(3,2,919)=0 exch2_pij(4,2,919)=1 exch2_oi(2,919)=0 exch2_oj(2,919)=0 exch2_neighbourId(3,919)=920 exch2_iLo(3,919)=35 exch2_iHi(3,919)=35 exch2_jLo(3,919)=0 exch2_jHi(3,919)=35 exch2_opposingSend(3,919)=4 exch2_pij(1,3,919)=1 exch2_pij(2,3,919)=0 exch2_pij(3,3,919)=0 exch2_pij(4,3,919)=1 exch2_oi(3,919)=0 exch2_oj(3,919)=0 exch2_neighbourId(4,919)=918 exch2_iLo(4,919)=0 exch2_iHi(4,919)=0 exch2_jLo(4,919)=0 exch2_jHi(4,919)=35 exch2_opposingSend(4,919)=3 exch2_pij(1,4,919)=1 exch2_pij(2,4,919)=0 exch2_pij(3,4,919)=0 exch2_pij(4,4,919)=1 exch2_oi(4,919)=0 exch2_oj(4,919)=0 RETURN END SUBROUTINE W2_E2SETUP_920 C Topology for tile 920 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(920)=34 exch2_tNy(920)=34 exch2_tBasex(920)=136 exch2_tBasey(920)=34 exch2_txGlobalo(920)=2177 exch2_tyGlobalo(920)=35 exch2_isWedge(920)=0 exch2_isNedge(920)=0 exch2_isEedge(920)=0 exch2_isSedge(920)=0 exch2_myFace(920)=5 exch2_mydNx(920)=510 exch2_mydNy(920)=510 exch2_nNeighbours(920)=4 exch2_neighbourId(1,920)=935 exch2_iLo(1,920)=0 exch2_iHi(1,920)=35 exch2_jLo(1,920)=35 exch2_jHi(1,920)=35 exch2_opposingSend(1,920)=2 exch2_pij(1,1,920)=1 exch2_pij(2,1,920)=0 exch2_pij(3,1,920)=0 exch2_pij(4,1,920)=1 exch2_oi(1,920)=0 exch2_oj(1,920)=0 exch2_neighbourId(2,920)=905 exch2_iLo(2,920)=0 exch2_iHi(2,920)=35 exch2_jLo(2,920)=0 exch2_jHi(2,920)=0 exch2_opposingSend(2,920)=1 exch2_pij(1,2,920)=1 exch2_pij(2,2,920)=0 exch2_pij(3,2,920)=0 exch2_pij(4,2,920)=1 exch2_oi(2,920)=0 exch2_oj(2,920)=0 exch2_neighbourId(3,920)=921 exch2_iLo(3,920)=35 exch2_iHi(3,920)=35 exch2_jLo(3,920)=0 exch2_jHi(3,920)=35 exch2_opposingSend(3,920)=4 exch2_pij(1,3,920)=1 exch2_pij(2,3,920)=0 exch2_pij(3,3,920)=0 exch2_pij(4,3,920)=1 exch2_oi(3,920)=0 exch2_oj(3,920)=0 exch2_neighbourId(4,920)=919 exch2_iLo(4,920)=0 exch2_iHi(4,920)=0 exch2_jLo(4,920)=0 exch2_jHi(4,920)=35 exch2_opposingSend(4,920)=3 exch2_pij(1,4,920)=1 exch2_pij(2,4,920)=0 exch2_pij(3,4,920)=0 exch2_pij(4,4,920)=1 exch2_oi(4,920)=0 exch2_oj(4,920)=0 RETURN END SUBROUTINE W2_E2SETUP_921 C Topology for tile 921 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(921)=34 exch2_tNy(921)=34 exch2_tBasex(921)=170 exch2_tBasey(921)=34 exch2_txGlobalo(921)=2211 exch2_tyGlobalo(921)=35 exch2_isWedge(921)=0 exch2_isNedge(921)=0 exch2_isEedge(921)=0 exch2_isSedge(921)=0 exch2_myFace(921)=5 exch2_mydNx(921)=510 exch2_mydNy(921)=510 exch2_nNeighbours(921)=4 exch2_neighbourId(1,921)=936 exch2_iLo(1,921)=0 exch2_iHi(1,921)=35 exch2_jLo(1,921)=35 exch2_jHi(1,921)=35 exch2_opposingSend(1,921)=2 exch2_pij(1,1,921)=1 exch2_pij(2,1,921)=0 exch2_pij(3,1,921)=0 exch2_pij(4,1,921)=1 exch2_oi(1,921)=0 exch2_oj(1,921)=0 exch2_neighbourId(2,921)=906 exch2_iLo(2,921)=0 exch2_iHi(2,921)=35 exch2_jLo(2,921)=0 exch2_jHi(2,921)=0 exch2_opposingSend(2,921)=1 exch2_pij(1,2,921)=1 exch2_pij(2,2,921)=0 exch2_pij(3,2,921)=0 exch2_pij(4,2,921)=1 exch2_oi(2,921)=0 exch2_oj(2,921)=0 exch2_neighbourId(3,921)=922 exch2_iLo(3,921)=35 exch2_iHi(3,921)=35 exch2_jLo(3,921)=0 exch2_jHi(3,921)=35 exch2_opposingSend(3,921)=4 exch2_pij(1,3,921)=1 exch2_pij(2,3,921)=0 exch2_pij(3,3,921)=0 exch2_pij(4,3,921)=1 exch2_oi(3,921)=0 exch2_oj(3,921)=0 exch2_neighbourId(4,921)=920 exch2_iLo(4,921)=0 exch2_iHi(4,921)=0 exch2_jLo(4,921)=0 exch2_jHi(4,921)=35 exch2_opposingSend(4,921)=3 exch2_pij(1,4,921)=1 exch2_pij(2,4,921)=0 exch2_pij(3,4,921)=0 exch2_pij(4,4,921)=1 exch2_oi(4,921)=0 exch2_oj(4,921)=0 RETURN END SUBROUTINE W2_E2SETUP_922 C Topology for tile 922 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(922)=34 exch2_tNy(922)=34 exch2_tBasex(922)=204 exch2_tBasey(922)=34 exch2_txGlobalo(922)=2245 exch2_tyGlobalo(922)=35 exch2_isWedge(922)=0 exch2_isNedge(922)=0 exch2_isEedge(922)=0 exch2_isSedge(922)=0 exch2_myFace(922)=5 exch2_mydNx(922)=510 exch2_mydNy(922)=510 exch2_nNeighbours(922)=4 exch2_neighbourId(1,922)=937 exch2_iLo(1,922)=0 exch2_iHi(1,922)=35 exch2_jLo(1,922)=35 exch2_jHi(1,922)=35 exch2_opposingSend(1,922)=2 exch2_pij(1,1,922)=1 exch2_pij(2,1,922)=0 exch2_pij(3,1,922)=0 exch2_pij(4,1,922)=1 exch2_oi(1,922)=0 exch2_oj(1,922)=0 exch2_neighbourId(2,922)=907 exch2_iLo(2,922)=0 exch2_iHi(2,922)=35 exch2_jLo(2,922)=0 exch2_jHi(2,922)=0 exch2_opposingSend(2,922)=1 exch2_pij(1,2,922)=1 exch2_pij(2,2,922)=0 exch2_pij(3,2,922)=0 exch2_pij(4,2,922)=1 exch2_oi(2,922)=0 exch2_oj(2,922)=0 exch2_neighbourId(3,922)=923 exch2_iLo(3,922)=35 exch2_iHi(3,922)=35 exch2_jLo(3,922)=0 exch2_jHi(3,922)=35 exch2_opposingSend(3,922)=4 exch2_pij(1,3,922)=1 exch2_pij(2,3,922)=0 exch2_pij(3,3,922)=0 exch2_pij(4,3,922)=1 exch2_oi(3,922)=0 exch2_oj(3,922)=0 exch2_neighbourId(4,922)=921 exch2_iLo(4,922)=0 exch2_iHi(4,922)=0 exch2_jLo(4,922)=0 exch2_jHi(4,922)=35 exch2_opposingSend(4,922)=3 exch2_pij(1,4,922)=1 exch2_pij(2,4,922)=0 exch2_pij(3,4,922)=0 exch2_pij(4,4,922)=1 exch2_oi(4,922)=0 exch2_oj(4,922)=0 RETURN END SUBROUTINE W2_E2SETUP_923 C Topology for tile 923 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(923)=34 exch2_tNy(923)=34 exch2_tBasex(923)=238 exch2_tBasey(923)=34 exch2_txGlobalo(923)=2279 exch2_tyGlobalo(923)=35 exch2_isWedge(923)=0 exch2_isNedge(923)=0 exch2_isEedge(923)=0 exch2_isSedge(923)=0 exch2_myFace(923)=5 exch2_mydNx(923)=510 exch2_mydNy(923)=510 exch2_nNeighbours(923)=4 exch2_neighbourId(1,923)=938 exch2_iLo(1,923)=0 exch2_iHi(1,923)=35 exch2_jLo(1,923)=35 exch2_jHi(1,923)=35 exch2_opposingSend(1,923)=2 exch2_pij(1,1,923)=1 exch2_pij(2,1,923)=0 exch2_pij(3,1,923)=0 exch2_pij(4,1,923)=1 exch2_oi(1,923)=0 exch2_oj(1,923)=0 exch2_neighbourId(2,923)=908 exch2_iLo(2,923)=0 exch2_iHi(2,923)=35 exch2_jLo(2,923)=0 exch2_jHi(2,923)=0 exch2_opposingSend(2,923)=1 exch2_pij(1,2,923)=1 exch2_pij(2,2,923)=0 exch2_pij(3,2,923)=0 exch2_pij(4,2,923)=1 exch2_oi(2,923)=0 exch2_oj(2,923)=0 exch2_neighbourId(3,923)=924 exch2_iLo(3,923)=35 exch2_iHi(3,923)=35 exch2_jLo(3,923)=0 exch2_jHi(3,923)=35 exch2_opposingSend(3,923)=4 exch2_pij(1,3,923)=1 exch2_pij(2,3,923)=0 exch2_pij(3,3,923)=0 exch2_pij(4,3,923)=1 exch2_oi(3,923)=0 exch2_oj(3,923)=0 exch2_neighbourId(4,923)=922 exch2_iLo(4,923)=0 exch2_iHi(4,923)=0 exch2_jLo(4,923)=0 exch2_jHi(4,923)=35 exch2_opposingSend(4,923)=3 exch2_pij(1,4,923)=1 exch2_pij(2,4,923)=0 exch2_pij(3,4,923)=0 exch2_pij(4,4,923)=1 exch2_oi(4,923)=0 exch2_oj(4,923)=0 RETURN END SUBROUTINE W2_E2SETUP_924 C Topology for tile 924 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(924)=34 exch2_tNy(924)=34 exch2_tBasex(924)=272 exch2_tBasey(924)=34 exch2_txGlobalo(924)=2313 exch2_tyGlobalo(924)=35 exch2_isWedge(924)=0 exch2_isNedge(924)=0 exch2_isEedge(924)=0 exch2_isSedge(924)=0 exch2_myFace(924)=5 exch2_mydNx(924)=510 exch2_mydNy(924)=510 exch2_nNeighbours(924)=4 exch2_neighbourId(1,924)=939 exch2_iLo(1,924)=0 exch2_iHi(1,924)=35 exch2_jLo(1,924)=35 exch2_jHi(1,924)=35 exch2_opposingSend(1,924)=2 exch2_pij(1,1,924)=1 exch2_pij(2,1,924)=0 exch2_pij(3,1,924)=0 exch2_pij(4,1,924)=1 exch2_oi(1,924)=0 exch2_oj(1,924)=0 exch2_neighbourId(2,924)=909 exch2_iLo(2,924)=0 exch2_iHi(2,924)=35 exch2_jLo(2,924)=0 exch2_jHi(2,924)=0 exch2_opposingSend(2,924)=1 exch2_pij(1,2,924)=1 exch2_pij(2,2,924)=0 exch2_pij(3,2,924)=0 exch2_pij(4,2,924)=1 exch2_oi(2,924)=0 exch2_oj(2,924)=0 exch2_neighbourId(3,924)=925 exch2_iLo(3,924)=35 exch2_iHi(3,924)=35 exch2_jLo(3,924)=0 exch2_jHi(3,924)=35 exch2_opposingSend(3,924)=4 exch2_pij(1,3,924)=1 exch2_pij(2,3,924)=0 exch2_pij(3,3,924)=0 exch2_pij(4,3,924)=1 exch2_oi(3,924)=0 exch2_oj(3,924)=0 exch2_neighbourId(4,924)=923 exch2_iLo(4,924)=0 exch2_iHi(4,924)=0 exch2_jLo(4,924)=0 exch2_jHi(4,924)=35 exch2_opposingSend(4,924)=3 exch2_pij(1,4,924)=1 exch2_pij(2,4,924)=0 exch2_pij(3,4,924)=0 exch2_pij(4,4,924)=1 exch2_oi(4,924)=0 exch2_oj(4,924)=0 RETURN END SUBROUTINE W2_E2SETUP_925 C Topology for tile 925 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(925)=34 exch2_tNy(925)=34 exch2_tBasex(925)=306 exch2_tBasey(925)=34 exch2_txGlobalo(925)=2347 exch2_tyGlobalo(925)=35 exch2_isWedge(925)=0 exch2_isNedge(925)=0 exch2_isEedge(925)=0 exch2_isSedge(925)=0 exch2_myFace(925)=5 exch2_mydNx(925)=510 exch2_mydNy(925)=510 exch2_nNeighbours(925)=4 exch2_neighbourId(1,925)=940 exch2_iLo(1,925)=0 exch2_iHi(1,925)=35 exch2_jLo(1,925)=35 exch2_jHi(1,925)=35 exch2_opposingSend(1,925)=2 exch2_pij(1,1,925)=1 exch2_pij(2,1,925)=0 exch2_pij(3,1,925)=0 exch2_pij(4,1,925)=1 exch2_oi(1,925)=0 exch2_oj(1,925)=0 exch2_neighbourId(2,925)=910 exch2_iLo(2,925)=0 exch2_iHi(2,925)=35 exch2_jLo(2,925)=0 exch2_jHi(2,925)=0 exch2_opposingSend(2,925)=1 exch2_pij(1,2,925)=1 exch2_pij(2,2,925)=0 exch2_pij(3,2,925)=0 exch2_pij(4,2,925)=1 exch2_oi(2,925)=0 exch2_oj(2,925)=0 exch2_neighbourId(3,925)=926 exch2_iLo(3,925)=35 exch2_iHi(3,925)=35 exch2_jLo(3,925)=0 exch2_jHi(3,925)=35 exch2_opposingSend(3,925)=4 exch2_pij(1,3,925)=1 exch2_pij(2,3,925)=0 exch2_pij(3,3,925)=0 exch2_pij(4,3,925)=1 exch2_oi(3,925)=0 exch2_oj(3,925)=0 exch2_neighbourId(4,925)=924 exch2_iLo(4,925)=0 exch2_iHi(4,925)=0 exch2_jLo(4,925)=0 exch2_jHi(4,925)=35 exch2_opposingSend(4,925)=3 exch2_pij(1,4,925)=1 exch2_pij(2,4,925)=0 exch2_pij(3,4,925)=0 exch2_pij(4,4,925)=1 exch2_oi(4,925)=0 exch2_oj(4,925)=0 RETURN END SUBROUTINE W2_E2SETUP_926 C Topology for tile 926 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(926)=34 exch2_tNy(926)=34 exch2_tBasex(926)=340 exch2_tBasey(926)=34 exch2_txGlobalo(926)=2381 exch2_tyGlobalo(926)=35 exch2_isWedge(926)=0 exch2_isNedge(926)=0 exch2_isEedge(926)=0 exch2_isSedge(926)=0 exch2_myFace(926)=5 exch2_mydNx(926)=510 exch2_mydNy(926)=510 exch2_nNeighbours(926)=4 exch2_neighbourId(1,926)=941 exch2_iLo(1,926)=0 exch2_iHi(1,926)=35 exch2_jLo(1,926)=35 exch2_jHi(1,926)=35 exch2_opposingSend(1,926)=2 exch2_pij(1,1,926)=1 exch2_pij(2,1,926)=0 exch2_pij(3,1,926)=0 exch2_pij(4,1,926)=1 exch2_oi(1,926)=0 exch2_oj(1,926)=0 exch2_neighbourId(2,926)=911 exch2_iLo(2,926)=0 exch2_iHi(2,926)=35 exch2_jLo(2,926)=0 exch2_jHi(2,926)=0 exch2_opposingSend(2,926)=1 exch2_pij(1,2,926)=1 exch2_pij(2,2,926)=0 exch2_pij(3,2,926)=0 exch2_pij(4,2,926)=1 exch2_oi(2,926)=0 exch2_oj(2,926)=0 exch2_neighbourId(3,926)=927 exch2_iLo(3,926)=35 exch2_iHi(3,926)=35 exch2_jLo(3,926)=0 exch2_jHi(3,926)=35 exch2_opposingSend(3,926)=4 exch2_pij(1,3,926)=1 exch2_pij(2,3,926)=0 exch2_pij(3,3,926)=0 exch2_pij(4,3,926)=1 exch2_oi(3,926)=0 exch2_oj(3,926)=0 exch2_neighbourId(4,926)=925 exch2_iLo(4,926)=0 exch2_iHi(4,926)=0 exch2_jLo(4,926)=0 exch2_jHi(4,926)=35 exch2_opposingSend(4,926)=3 exch2_pij(1,4,926)=1 exch2_pij(2,4,926)=0 exch2_pij(3,4,926)=0 exch2_pij(4,4,926)=1 exch2_oi(4,926)=0 exch2_oj(4,926)=0 RETURN END SUBROUTINE W2_E2SETUP_927 C Topology for tile 927 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(927)=34 exch2_tNy(927)=34 exch2_tBasex(927)=374 exch2_tBasey(927)=34 exch2_txGlobalo(927)=2415 exch2_tyGlobalo(927)=35 exch2_isWedge(927)=0 exch2_isNedge(927)=0 exch2_isEedge(927)=0 exch2_isSedge(927)=0 exch2_myFace(927)=5 exch2_mydNx(927)=510 exch2_mydNy(927)=510 exch2_nNeighbours(927)=4 exch2_neighbourId(1,927)=942 exch2_iLo(1,927)=0 exch2_iHi(1,927)=35 exch2_jLo(1,927)=35 exch2_jHi(1,927)=35 exch2_opposingSend(1,927)=2 exch2_pij(1,1,927)=1 exch2_pij(2,1,927)=0 exch2_pij(3,1,927)=0 exch2_pij(4,1,927)=1 exch2_oi(1,927)=0 exch2_oj(1,927)=0 exch2_neighbourId(2,927)=912 exch2_iLo(2,927)=0 exch2_iHi(2,927)=35 exch2_jLo(2,927)=0 exch2_jHi(2,927)=0 exch2_opposingSend(2,927)=1 exch2_pij(1,2,927)=1 exch2_pij(2,2,927)=0 exch2_pij(3,2,927)=0 exch2_pij(4,2,927)=1 exch2_oi(2,927)=0 exch2_oj(2,927)=0 exch2_neighbourId(3,927)=928 exch2_iLo(3,927)=35 exch2_iHi(3,927)=35 exch2_jLo(3,927)=0 exch2_jHi(3,927)=35 exch2_opposingSend(3,927)=4 exch2_pij(1,3,927)=1 exch2_pij(2,3,927)=0 exch2_pij(3,3,927)=0 exch2_pij(4,3,927)=1 exch2_oi(3,927)=0 exch2_oj(3,927)=0 exch2_neighbourId(4,927)=926 exch2_iLo(4,927)=0 exch2_iHi(4,927)=0 exch2_jLo(4,927)=0 exch2_jHi(4,927)=35 exch2_opposingSend(4,927)=3 exch2_pij(1,4,927)=1 exch2_pij(2,4,927)=0 exch2_pij(3,4,927)=0 exch2_pij(4,4,927)=1 exch2_oi(4,927)=0 exch2_oj(4,927)=0 RETURN END SUBROUTINE W2_E2SETUP_928 C Topology for tile 928 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(928)=34 exch2_tNy(928)=34 exch2_tBasex(928)=408 exch2_tBasey(928)=34 exch2_txGlobalo(928)=2449 exch2_tyGlobalo(928)=35 exch2_isWedge(928)=0 exch2_isNedge(928)=0 exch2_isEedge(928)=0 exch2_isSedge(928)=0 exch2_myFace(928)=5 exch2_mydNx(928)=510 exch2_mydNy(928)=510 exch2_nNeighbours(928)=4 exch2_neighbourId(1,928)=943 exch2_iLo(1,928)=0 exch2_iHi(1,928)=35 exch2_jLo(1,928)=35 exch2_jHi(1,928)=35 exch2_opposingSend(1,928)=2 exch2_pij(1,1,928)=1 exch2_pij(2,1,928)=0 exch2_pij(3,1,928)=0 exch2_pij(4,1,928)=1 exch2_oi(1,928)=0 exch2_oj(1,928)=0 exch2_neighbourId(2,928)=913 exch2_iLo(2,928)=0 exch2_iHi(2,928)=35 exch2_jLo(2,928)=0 exch2_jHi(2,928)=0 exch2_opposingSend(2,928)=1 exch2_pij(1,2,928)=1 exch2_pij(2,2,928)=0 exch2_pij(3,2,928)=0 exch2_pij(4,2,928)=1 exch2_oi(2,928)=0 exch2_oj(2,928)=0 exch2_neighbourId(3,928)=929 exch2_iLo(3,928)=35 exch2_iHi(3,928)=35 exch2_jLo(3,928)=0 exch2_jHi(3,928)=35 exch2_opposingSend(3,928)=4 exch2_pij(1,3,928)=1 exch2_pij(2,3,928)=0 exch2_pij(3,3,928)=0 exch2_pij(4,3,928)=1 exch2_oi(3,928)=0 exch2_oj(3,928)=0 exch2_neighbourId(4,928)=927 exch2_iLo(4,928)=0 exch2_iHi(4,928)=0 exch2_jLo(4,928)=0 exch2_jHi(4,928)=35 exch2_opposingSend(4,928)=3 exch2_pij(1,4,928)=1 exch2_pij(2,4,928)=0 exch2_pij(3,4,928)=0 exch2_pij(4,4,928)=1 exch2_oi(4,928)=0 exch2_oj(4,928)=0 RETURN END SUBROUTINE W2_E2SETUP_929 C Topology for tile 929 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(929)=34 exch2_tNy(929)=34 exch2_tBasex(929)=442 exch2_tBasey(929)=34 exch2_txGlobalo(929)=2483 exch2_tyGlobalo(929)=35 exch2_isWedge(929)=0 exch2_isNedge(929)=0 exch2_isEedge(929)=0 exch2_isSedge(929)=0 exch2_myFace(929)=5 exch2_mydNx(929)=510 exch2_mydNy(929)=510 exch2_nNeighbours(929)=4 exch2_neighbourId(1,929)=944 exch2_iLo(1,929)=0 exch2_iHi(1,929)=35 exch2_jLo(1,929)=35 exch2_jHi(1,929)=35 exch2_opposingSend(1,929)=2 exch2_pij(1,1,929)=1 exch2_pij(2,1,929)=0 exch2_pij(3,1,929)=0 exch2_pij(4,1,929)=1 exch2_oi(1,929)=0 exch2_oj(1,929)=0 exch2_neighbourId(2,929)=914 exch2_iLo(2,929)=0 exch2_iHi(2,929)=35 exch2_jLo(2,929)=0 exch2_jHi(2,929)=0 exch2_opposingSend(2,929)=1 exch2_pij(1,2,929)=1 exch2_pij(2,2,929)=0 exch2_pij(3,2,929)=0 exch2_pij(4,2,929)=1 exch2_oi(2,929)=0 exch2_oj(2,929)=0 exch2_neighbourId(3,929)=930 exch2_iLo(3,929)=35 exch2_iHi(3,929)=35 exch2_jLo(3,929)=0 exch2_jHi(3,929)=35 exch2_opposingSend(3,929)=4 exch2_pij(1,3,929)=1 exch2_pij(2,3,929)=0 exch2_pij(3,3,929)=0 exch2_pij(4,3,929)=1 exch2_oi(3,929)=0 exch2_oj(3,929)=0 exch2_neighbourId(4,929)=928 exch2_iLo(4,929)=0 exch2_iHi(4,929)=0 exch2_jLo(4,929)=0 exch2_jHi(4,929)=35 exch2_opposingSend(4,929)=3 exch2_pij(1,4,929)=1 exch2_pij(2,4,929)=0 exch2_pij(3,4,929)=0 exch2_pij(4,4,929)=1 exch2_oi(4,929)=0 exch2_oj(4,929)=0 RETURN END SUBROUTINE W2_E2SETUP_930 C Topology for tile 930 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(930)=34 exch2_tNy(930)=34 exch2_tBasex(930)=476 exch2_tBasey(930)=34 exch2_txGlobalo(930)=2517 exch2_tyGlobalo(930)=35 exch2_isWedge(930)=0 exch2_isNedge(930)=0 exch2_isEedge(930)=1 exch2_isSedge(930)=0 exch2_myFace(930)=5 exch2_mydNx(930)=510 exch2_mydNy(930)=510 exch2_nNeighbours(930)=4 exch2_neighbourId(1,930)=945 exch2_iLo(1,930)=0 exch2_iHi(1,930)=35 exch2_jLo(1,930)=35 exch2_jHi(1,930)=35 exch2_opposingSend(1,930)=2 exch2_pij(1,1,930)=1 exch2_pij(2,1,930)=0 exch2_pij(3,1,930)=0 exch2_pij(4,1,930)=1 exch2_oi(1,930)=0 exch2_oj(1,930)=0 exch2_neighbourId(2,930)=915 exch2_iLo(2,930)=0 exch2_iHi(2,930)=35 exch2_jLo(2,930)=0 exch2_jHi(2,930)=0 exch2_opposingSend(2,930)=1 exch2_pij(1,2,930)=1 exch2_pij(2,2,930)=0 exch2_pij(3,2,930)=0 exch2_pij(4,2,930)=1 exch2_oi(2,930)=0 exch2_oj(2,930)=0 exch2_neighbourId(3,930)=1141 exch2_iLo(3,930)=35 exch2_iHi(3,930)=35 exch2_jLo(3,930)=0 exch2_jHi(3,930)=35 exch2_opposingSend(3,930)=4 exch2_pij(1,3,930)=1 exch2_pij(2,3,930)=0 exch2_pij(3,3,930)=0 exch2_pij(4,3,930)=1 exch2_oi(3,930)=510 exch2_oj(3,930)=0 exch2_neighbourId(4,930)=929 exch2_iLo(4,930)=0 exch2_iHi(4,930)=0 exch2_jLo(4,930)=0 exch2_jHi(4,930)=35 exch2_opposingSend(4,930)=3 exch2_pij(1,4,930)=1 exch2_pij(2,4,930)=0 exch2_pij(3,4,930)=0 exch2_pij(4,4,930)=1 exch2_oi(4,930)=0 exch2_oj(4,930)=0 RETURN END SUBROUTINE W2_E2SETUP_931 C Topology for tile 931 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(931)=34 exch2_tNy(931)=34 exch2_tBasex(931)=0 exch2_tBasey(931)=68 exch2_txGlobalo(931)=2041 exch2_tyGlobalo(931)=69 exch2_isWedge(931)=1 exch2_isNedge(931)=0 exch2_isEedge(931)=0 exch2_isSedge(931)=0 exch2_myFace(931)=5 exch2_mydNx(931)=510 exch2_mydNy(931)=510 exch2_nNeighbours(931)=4 exch2_neighbourId(1,931)=946 exch2_iLo(1,931)=0 exch2_iHi(1,931)=35 exch2_jLo(1,931)=35 exch2_jHi(1,931)=35 exch2_opposingSend(1,931)=2 exch2_pij(1,1,931)=1 exch2_pij(2,1,931)=0 exch2_pij(3,1,931)=0 exch2_pij(4,1,931)=1 exch2_oi(1,931)=0 exch2_oj(1,931)=0 exch2_neighbourId(2,931)=916 exch2_iLo(2,931)=0 exch2_iHi(2,931)=35 exch2_jLo(2,931)=0 exch2_jHi(2,931)=0 exch2_opposingSend(2,931)=1 exch2_pij(1,2,931)=1 exch2_pij(2,2,931)=0 exch2_pij(3,2,931)=0 exch2_pij(4,2,931)=1 exch2_oi(2,931)=0 exch2_oj(2,931)=0 exch2_neighbourId(3,931)=932 exch2_iLo(3,931)=35 exch2_iHi(3,931)=35 exch2_jLo(3,931)=0 exch2_jHi(3,931)=35 exch2_opposingSend(3,931)=4 exch2_pij(1,3,931)=1 exch2_pij(2,3,931)=0 exch2_pij(3,3,931)=0 exch2_pij(4,3,931)=1 exch2_oi(3,931)=0 exch2_oj(3,931)=0 exch2_neighbourId(4,931)=673 exch2_iLo(4,931)=0 exch2_iHi(4,931)=0 exch2_jLo(4,931)=0 exch2_jHi(4,931)=35 exch2_opposingSend(4,931)=1 exch2_pij(1,4,931)=0 exch2_pij(2,4,931)=1 exch2_pij(3,4,931)=-1 exch2_pij(4,4,931)=0 exch2_oi(4,931)=-510 exch2_oj(4,931)=511 RETURN END SUBROUTINE W2_E2SETUP_932 C Topology for tile 932 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(932)=34 exch2_tNy(932)=34 exch2_tBasex(932)=34 exch2_tBasey(932)=68 exch2_txGlobalo(932)=2075 exch2_tyGlobalo(932)=69 exch2_isWedge(932)=0 exch2_isNedge(932)=0 exch2_isEedge(932)=0 exch2_isSedge(932)=0 exch2_myFace(932)=5 exch2_mydNx(932)=510 exch2_mydNy(932)=510 exch2_nNeighbours(932)=4 exch2_neighbourId(1,932)=947 exch2_iLo(1,932)=0 exch2_iHi(1,932)=35 exch2_jLo(1,932)=35 exch2_jHi(1,932)=35 exch2_opposingSend(1,932)=2 exch2_pij(1,1,932)=1 exch2_pij(2,1,932)=0 exch2_pij(3,1,932)=0 exch2_pij(4,1,932)=1 exch2_oi(1,932)=0 exch2_oj(1,932)=0 exch2_neighbourId(2,932)=917 exch2_iLo(2,932)=0 exch2_iHi(2,932)=35 exch2_jLo(2,932)=0 exch2_jHi(2,932)=0 exch2_opposingSend(2,932)=1 exch2_pij(1,2,932)=1 exch2_pij(2,2,932)=0 exch2_pij(3,2,932)=0 exch2_pij(4,2,932)=1 exch2_oi(2,932)=0 exch2_oj(2,932)=0 exch2_neighbourId(3,932)=933 exch2_iLo(3,932)=35 exch2_iHi(3,932)=35 exch2_jLo(3,932)=0 exch2_jHi(3,932)=35 exch2_opposingSend(3,932)=4 exch2_pij(1,3,932)=1 exch2_pij(2,3,932)=0 exch2_pij(3,3,932)=0 exch2_pij(4,3,932)=1 exch2_oi(3,932)=0 exch2_oj(3,932)=0 exch2_neighbourId(4,932)=931 exch2_iLo(4,932)=0 exch2_iHi(4,932)=0 exch2_jLo(4,932)=0 exch2_jHi(4,932)=35 exch2_opposingSend(4,932)=3 exch2_pij(1,4,932)=1 exch2_pij(2,4,932)=0 exch2_pij(3,4,932)=0 exch2_pij(4,4,932)=1 exch2_oi(4,932)=0 exch2_oj(4,932)=0 RETURN END SUBROUTINE W2_E2SETUP_933 C Topology for tile 933 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(933)=34 exch2_tNy(933)=34 exch2_tBasex(933)=68 exch2_tBasey(933)=68 exch2_txGlobalo(933)=2109 exch2_tyGlobalo(933)=69 exch2_isWedge(933)=0 exch2_isNedge(933)=0 exch2_isEedge(933)=0 exch2_isSedge(933)=0 exch2_myFace(933)=5 exch2_mydNx(933)=510 exch2_mydNy(933)=510 exch2_nNeighbours(933)=4 exch2_neighbourId(1,933)=948 exch2_iLo(1,933)=0 exch2_iHi(1,933)=35 exch2_jLo(1,933)=35 exch2_jHi(1,933)=35 exch2_opposingSend(1,933)=2 exch2_pij(1,1,933)=1 exch2_pij(2,1,933)=0 exch2_pij(3,1,933)=0 exch2_pij(4,1,933)=1 exch2_oi(1,933)=0 exch2_oj(1,933)=0 exch2_neighbourId(2,933)=918 exch2_iLo(2,933)=0 exch2_iHi(2,933)=35 exch2_jLo(2,933)=0 exch2_jHi(2,933)=0 exch2_opposingSend(2,933)=1 exch2_pij(1,2,933)=1 exch2_pij(2,2,933)=0 exch2_pij(3,2,933)=0 exch2_pij(4,2,933)=1 exch2_oi(2,933)=0 exch2_oj(2,933)=0 exch2_neighbourId(3,933)=934 exch2_iLo(3,933)=35 exch2_iHi(3,933)=35 exch2_jLo(3,933)=0 exch2_jHi(3,933)=35 exch2_opposingSend(3,933)=4 exch2_pij(1,3,933)=1 exch2_pij(2,3,933)=0 exch2_pij(3,3,933)=0 exch2_pij(4,3,933)=1 exch2_oi(3,933)=0 exch2_oj(3,933)=0 exch2_neighbourId(4,933)=932 exch2_iLo(4,933)=0 exch2_iHi(4,933)=0 exch2_jLo(4,933)=0 exch2_jHi(4,933)=35 exch2_opposingSend(4,933)=3 exch2_pij(1,4,933)=1 exch2_pij(2,4,933)=0 exch2_pij(3,4,933)=0 exch2_pij(4,4,933)=1 exch2_oi(4,933)=0 exch2_oj(4,933)=0 RETURN END SUBROUTINE W2_E2SETUP_934 C Topology for tile 934 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(934)=34 exch2_tNy(934)=34 exch2_tBasex(934)=102 exch2_tBasey(934)=68 exch2_txGlobalo(934)=2143 exch2_tyGlobalo(934)=69 exch2_isWedge(934)=0 exch2_isNedge(934)=0 exch2_isEedge(934)=0 exch2_isSedge(934)=0 exch2_myFace(934)=5 exch2_mydNx(934)=510 exch2_mydNy(934)=510 exch2_nNeighbours(934)=4 exch2_neighbourId(1,934)=949 exch2_iLo(1,934)=0 exch2_iHi(1,934)=35 exch2_jLo(1,934)=35 exch2_jHi(1,934)=35 exch2_opposingSend(1,934)=2 exch2_pij(1,1,934)=1 exch2_pij(2,1,934)=0 exch2_pij(3,1,934)=0 exch2_pij(4,1,934)=1 exch2_oi(1,934)=0 exch2_oj(1,934)=0 exch2_neighbourId(2,934)=919 exch2_iLo(2,934)=0 exch2_iHi(2,934)=35 exch2_jLo(2,934)=0 exch2_jHi(2,934)=0 exch2_opposingSend(2,934)=1 exch2_pij(1,2,934)=1 exch2_pij(2,2,934)=0 exch2_pij(3,2,934)=0 exch2_pij(4,2,934)=1 exch2_oi(2,934)=0 exch2_oj(2,934)=0 exch2_neighbourId(3,934)=935 exch2_iLo(3,934)=35 exch2_iHi(3,934)=35 exch2_jLo(3,934)=0 exch2_jHi(3,934)=35 exch2_opposingSend(3,934)=4 exch2_pij(1,3,934)=1 exch2_pij(2,3,934)=0 exch2_pij(3,3,934)=0 exch2_pij(4,3,934)=1 exch2_oi(3,934)=0 exch2_oj(3,934)=0 exch2_neighbourId(4,934)=933 exch2_iLo(4,934)=0 exch2_iHi(4,934)=0 exch2_jLo(4,934)=0 exch2_jHi(4,934)=35 exch2_opposingSend(4,934)=3 exch2_pij(1,4,934)=1 exch2_pij(2,4,934)=0 exch2_pij(3,4,934)=0 exch2_pij(4,4,934)=1 exch2_oi(4,934)=0 exch2_oj(4,934)=0 RETURN END SUBROUTINE W2_E2SETUP_935 C Topology for tile 935 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(935)=34 exch2_tNy(935)=34 exch2_tBasex(935)=136 exch2_tBasey(935)=68 exch2_txGlobalo(935)=2177 exch2_tyGlobalo(935)=69 exch2_isWedge(935)=0 exch2_isNedge(935)=0 exch2_isEedge(935)=0 exch2_isSedge(935)=0 exch2_myFace(935)=5 exch2_mydNx(935)=510 exch2_mydNy(935)=510 exch2_nNeighbours(935)=4 exch2_neighbourId(1,935)=950 exch2_iLo(1,935)=0 exch2_iHi(1,935)=35 exch2_jLo(1,935)=35 exch2_jHi(1,935)=35 exch2_opposingSend(1,935)=2 exch2_pij(1,1,935)=1 exch2_pij(2,1,935)=0 exch2_pij(3,1,935)=0 exch2_pij(4,1,935)=1 exch2_oi(1,935)=0 exch2_oj(1,935)=0 exch2_neighbourId(2,935)=920 exch2_iLo(2,935)=0 exch2_iHi(2,935)=35 exch2_jLo(2,935)=0 exch2_jHi(2,935)=0 exch2_opposingSend(2,935)=1 exch2_pij(1,2,935)=1 exch2_pij(2,2,935)=0 exch2_pij(3,2,935)=0 exch2_pij(4,2,935)=1 exch2_oi(2,935)=0 exch2_oj(2,935)=0 exch2_neighbourId(3,935)=936 exch2_iLo(3,935)=35 exch2_iHi(3,935)=35 exch2_jLo(3,935)=0 exch2_jHi(3,935)=35 exch2_opposingSend(3,935)=4 exch2_pij(1,3,935)=1 exch2_pij(2,3,935)=0 exch2_pij(3,3,935)=0 exch2_pij(4,3,935)=1 exch2_oi(3,935)=0 exch2_oj(3,935)=0 exch2_neighbourId(4,935)=934 exch2_iLo(4,935)=0 exch2_iHi(4,935)=0 exch2_jLo(4,935)=0 exch2_jHi(4,935)=35 exch2_opposingSend(4,935)=3 exch2_pij(1,4,935)=1 exch2_pij(2,4,935)=0 exch2_pij(3,4,935)=0 exch2_pij(4,4,935)=1 exch2_oi(4,935)=0 exch2_oj(4,935)=0 RETURN END SUBROUTINE W2_E2SETUP_936 C Topology for tile 936 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(936)=34 exch2_tNy(936)=34 exch2_tBasex(936)=170 exch2_tBasey(936)=68 exch2_txGlobalo(936)=2211 exch2_tyGlobalo(936)=69 exch2_isWedge(936)=0 exch2_isNedge(936)=0 exch2_isEedge(936)=0 exch2_isSedge(936)=0 exch2_myFace(936)=5 exch2_mydNx(936)=510 exch2_mydNy(936)=510 exch2_nNeighbours(936)=4 exch2_neighbourId(1,936)=951 exch2_iLo(1,936)=0 exch2_iHi(1,936)=35 exch2_jLo(1,936)=35 exch2_jHi(1,936)=35 exch2_opposingSend(1,936)=2 exch2_pij(1,1,936)=1 exch2_pij(2,1,936)=0 exch2_pij(3,1,936)=0 exch2_pij(4,1,936)=1 exch2_oi(1,936)=0 exch2_oj(1,936)=0 exch2_neighbourId(2,936)=921 exch2_iLo(2,936)=0 exch2_iHi(2,936)=35 exch2_jLo(2,936)=0 exch2_jHi(2,936)=0 exch2_opposingSend(2,936)=1 exch2_pij(1,2,936)=1 exch2_pij(2,2,936)=0 exch2_pij(3,2,936)=0 exch2_pij(4,2,936)=1 exch2_oi(2,936)=0 exch2_oj(2,936)=0 exch2_neighbourId(3,936)=937 exch2_iLo(3,936)=35 exch2_iHi(3,936)=35 exch2_jLo(3,936)=0 exch2_jHi(3,936)=35 exch2_opposingSend(3,936)=4 exch2_pij(1,3,936)=1 exch2_pij(2,3,936)=0 exch2_pij(3,3,936)=0 exch2_pij(4,3,936)=1 exch2_oi(3,936)=0 exch2_oj(3,936)=0 exch2_neighbourId(4,936)=935 exch2_iLo(4,936)=0 exch2_iHi(4,936)=0 exch2_jLo(4,936)=0 exch2_jHi(4,936)=35 exch2_opposingSend(4,936)=3 exch2_pij(1,4,936)=1 exch2_pij(2,4,936)=0 exch2_pij(3,4,936)=0 exch2_pij(4,4,936)=1 exch2_oi(4,936)=0 exch2_oj(4,936)=0 RETURN END SUBROUTINE W2_E2SETUP_937 C Topology for tile 937 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(937)=34 exch2_tNy(937)=34 exch2_tBasex(937)=204 exch2_tBasey(937)=68 exch2_txGlobalo(937)=2245 exch2_tyGlobalo(937)=69 exch2_isWedge(937)=0 exch2_isNedge(937)=0 exch2_isEedge(937)=0 exch2_isSedge(937)=0 exch2_myFace(937)=5 exch2_mydNx(937)=510 exch2_mydNy(937)=510 exch2_nNeighbours(937)=4 exch2_neighbourId(1,937)=952 exch2_iLo(1,937)=0 exch2_iHi(1,937)=35 exch2_jLo(1,937)=35 exch2_jHi(1,937)=35 exch2_opposingSend(1,937)=2 exch2_pij(1,1,937)=1 exch2_pij(2,1,937)=0 exch2_pij(3,1,937)=0 exch2_pij(4,1,937)=1 exch2_oi(1,937)=0 exch2_oj(1,937)=0 exch2_neighbourId(2,937)=922 exch2_iLo(2,937)=0 exch2_iHi(2,937)=35 exch2_jLo(2,937)=0 exch2_jHi(2,937)=0 exch2_opposingSend(2,937)=1 exch2_pij(1,2,937)=1 exch2_pij(2,2,937)=0 exch2_pij(3,2,937)=0 exch2_pij(4,2,937)=1 exch2_oi(2,937)=0 exch2_oj(2,937)=0 exch2_neighbourId(3,937)=938 exch2_iLo(3,937)=35 exch2_iHi(3,937)=35 exch2_jLo(3,937)=0 exch2_jHi(3,937)=35 exch2_opposingSend(3,937)=4 exch2_pij(1,3,937)=1 exch2_pij(2,3,937)=0 exch2_pij(3,3,937)=0 exch2_pij(4,3,937)=1 exch2_oi(3,937)=0 exch2_oj(3,937)=0 exch2_neighbourId(4,937)=936 exch2_iLo(4,937)=0 exch2_iHi(4,937)=0 exch2_jLo(4,937)=0 exch2_jHi(4,937)=35 exch2_opposingSend(4,937)=3 exch2_pij(1,4,937)=1 exch2_pij(2,4,937)=0 exch2_pij(3,4,937)=0 exch2_pij(4,4,937)=1 exch2_oi(4,937)=0 exch2_oj(4,937)=0 RETURN END SUBROUTINE W2_E2SETUP_938 C Topology for tile 938 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(938)=34 exch2_tNy(938)=34 exch2_tBasex(938)=238 exch2_tBasey(938)=68 exch2_txGlobalo(938)=2279 exch2_tyGlobalo(938)=69 exch2_isWedge(938)=0 exch2_isNedge(938)=0 exch2_isEedge(938)=0 exch2_isSedge(938)=0 exch2_myFace(938)=5 exch2_mydNx(938)=510 exch2_mydNy(938)=510 exch2_nNeighbours(938)=4 exch2_neighbourId(1,938)=953 exch2_iLo(1,938)=0 exch2_iHi(1,938)=35 exch2_jLo(1,938)=35 exch2_jHi(1,938)=35 exch2_opposingSend(1,938)=2 exch2_pij(1,1,938)=1 exch2_pij(2,1,938)=0 exch2_pij(3,1,938)=0 exch2_pij(4,1,938)=1 exch2_oi(1,938)=0 exch2_oj(1,938)=0 exch2_neighbourId(2,938)=923 exch2_iLo(2,938)=0 exch2_iHi(2,938)=35 exch2_jLo(2,938)=0 exch2_jHi(2,938)=0 exch2_opposingSend(2,938)=1 exch2_pij(1,2,938)=1 exch2_pij(2,2,938)=0 exch2_pij(3,2,938)=0 exch2_pij(4,2,938)=1 exch2_oi(2,938)=0 exch2_oj(2,938)=0 exch2_neighbourId(3,938)=939 exch2_iLo(3,938)=35 exch2_iHi(3,938)=35 exch2_jLo(3,938)=0 exch2_jHi(3,938)=35 exch2_opposingSend(3,938)=4 exch2_pij(1,3,938)=1 exch2_pij(2,3,938)=0 exch2_pij(3,3,938)=0 exch2_pij(4,3,938)=1 exch2_oi(3,938)=0 exch2_oj(3,938)=0 exch2_neighbourId(4,938)=937 exch2_iLo(4,938)=0 exch2_iHi(4,938)=0 exch2_jLo(4,938)=0 exch2_jHi(4,938)=35 exch2_opposingSend(4,938)=3 exch2_pij(1,4,938)=1 exch2_pij(2,4,938)=0 exch2_pij(3,4,938)=0 exch2_pij(4,4,938)=1 exch2_oi(4,938)=0 exch2_oj(4,938)=0 RETURN END SUBROUTINE W2_E2SETUP_939 C Topology for tile 939 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(939)=34 exch2_tNy(939)=34 exch2_tBasex(939)=272 exch2_tBasey(939)=68 exch2_txGlobalo(939)=2313 exch2_tyGlobalo(939)=69 exch2_isWedge(939)=0 exch2_isNedge(939)=0 exch2_isEedge(939)=0 exch2_isSedge(939)=0 exch2_myFace(939)=5 exch2_mydNx(939)=510 exch2_mydNy(939)=510 exch2_nNeighbours(939)=4 exch2_neighbourId(1,939)=954 exch2_iLo(1,939)=0 exch2_iHi(1,939)=35 exch2_jLo(1,939)=35 exch2_jHi(1,939)=35 exch2_opposingSend(1,939)=2 exch2_pij(1,1,939)=1 exch2_pij(2,1,939)=0 exch2_pij(3,1,939)=0 exch2_pij(4,1,939)=1 exch2_oi(1,939)=0 exch2_oj(1,939)=0 exch2_neighbourId(2,939)=924 exch2_iLo(2,939)=0 exch2_iHi(2,939)=35 exch2_jLo(2,939)=0 exch2_jHi(2,939)=0 exch2_opposingSend(2,939)=1 exch2_pij(1,2,939)=1 exch2_pij(2,2,939)=0 exch2_pij(3,2,939)=0 exch2_pij(4,2,939)=1 exch2_oi(2,939)=0 exch2_oj(2,939)=0 exch2_neighbourId(3,939)=940 exch2_iLo(3,939)=35 exch2_iHi(3,939)=35 exch2_jLo(3,939)=0 exch2_jHi(3,939)=35 exch2_opposingSend(3,939)=4 exch2_pij(1,3,939)=1 exch2_pij(2,3,939)=0 exch2_pij(3,3,939)=0 exch2_pij(4,3,939)=1 exch2_oi(3,939)=0 exch2_oj(3,939)=0 exch2_neighbourId(4,939)=938 exch2_iLo(4,939)=0 exch2_iHi(4,939)=0 exch2_jLo(4,939)=0 exch2_jHi(4,939)=35 exch2_opposingSend(4,939)=3 exch2_pij(1,4,939)=1 exch2_pij(2,4,939)=0 exch2_pij(3,4,939)=0 exch2_pij(4,4,939)=1 exch2_oi(4,939)=0 exch2_oj(4,939)=0 RETURN END SUBROUTINE W2_E2SETUP_940 C Topology for tile 940 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(940)=34 exch2_tNy(940)=34 exch2_tBasex(940)=306 exch2_tBasey(940)=68 exch2_txGlobalo(940)=2347 exch2_tyGlobalo(940)=69 exch2_isWedge(940)=0 exch2_isNedge(940)=0 exch2_isEedge(940)=0 exch2_isSedge(940)=0 exch2_myFace(940)=5 exch2_mydNx(940)=510 exch2_mydNy(940)=510 exch2_nNeighbours(940)=4 exch2_neighbourId(1,940)=955 exch2_iLo(1,940)=0 exch2_iHi(1,940)=35 exch2_jLo(1,940)=35 exch2_jHi(1,940)=35 exch2_opposingSend(1,940)=2 exch2_pij(1,1,940)=1 exch2_pij(2,1,940)=0 exch2_pij(3,1,940)=0 exch2_pij(4,1,940)=1 exch2_oi(1,940)=0 exch2_oj(1,940)=0 exch2_neighbourId(2,940)=925 exch2_iLo(2,940)=0 exch2_iHi(2,940)=35 exch2_jLo(2,940)=0 exch2_jHi(2,940)=0 exch2_opposingSend(2,940)=1 exch2_pij(1,2,940)=1 exch2_pij(2,2,940)=0 exch2_pij(3,2,940)=0 exch2_pij(4,2,940)=1 exch2_oi(2,940)=0 exch2_oj(2,940)=0 exch2_neighbourId(3,940)=941 exch2_iLo(3,940)=35 exch2_iHi(3,940)=35 exch2_jLo(3,940)=0 exch2_jHi(3,940)=35 exch2_opposingSend(3,940)=4 exch2_pij(1,3,940)=1 exch2_pij(2,3,940)=0 exch2_pij(3,3,940)=0 exch2_pij(4,3,940)=1 exch2_oi(3,940)=0 exch2_oj(3,940)=0 exch2_neighbourId(4,940)=939 exch2_iLo(4,940)=0 exch2_iHi(4,940)=0 exch2_jLo(4,940)=0 exch2_jHi(4,940)=35 exch2_opposingSend(4,940)=3 exch2_pij(1,4,940)=1 exch2_pij(2,4,940)=0 exch2_pij(3,4,940)=0 exch2_pij(4,4,940)=1 exch2_oi(4,940)=0 exch2_oj(4,940)=0 RETURN END SUBROUTINE W2_E2SETUP_941 C Topology for tile 941 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(941)=34 exch2_tNy(941)=34 exch2_tBasex(941)=340 exch2_tBasey(941)=68 exch2_txGlobalo(941)=2381 exch2_tyGlobalo(941)=69 exch2_isWedge(941)=0 exch2_isNedge(941)=0 exch2_isEedge(941)=0 exch2_isSedge(941)=0 exch2_myFace(941)=5 exch2_mydNx(941)=510 exch2_mydNy(941)=510 exch2_nNeighbours(941)=4 exch2_neighbourId(1,941)=956 exch2_iLo(1,941)=0 exch2_iHi(1,941)=35 exch2_jLo(1,941)=35 exch2_jHi(1,941)=35 exch2_opposingSend(1,941)=2 exch2_pij(1,1,941)=1 exch2_pij(2,1,941)=0 exch2_pij(3,1,941)=0 exch2_pij(4,1,941)=1 exch2_oi(1,941)=0 exch2_oj(1,941)=0 exch2_neighbourId(2,941)=926 exch2_iLo(2,941)=0 exch2_iHi(2,941)=35 exch2_jLo(2,941)=0 exch2_jHi(2,941)=0 exch2_opposingSend(2,941)=1 exch2_pij(1,2,941)=1 exch2_pij(2,2,941)=0 exch2_pij(3,2,941)=0 exch2_pij(4,2,941)=1 exch2_oi(2,941)=0 exch2_oj(2,941)=0 exch2_neighbourId(3,941)=942 exch2_iLo(3,941)=35 exch2_iHi(3,941)=35 exch2_jLo(3,941)=0 exch2_jHi(3,941)=35 exch2_opposingSend(3,941)=4 exch2_pij(1,3,941)=1 exch2_pij(2,3,941)=0 exch2_pij(3,3,941)=0 exch2_pij(4,3,941)=1 exch2_oi(3,941)=0 exch2_oj(3,941)=0 exch2_neighbourId(4,941)=940 exch2_iLo(4,941)=0 exch2_iHi(4,941)=0 exch2_jLo(4,941)=0 exch2_jHi(4,941)=35 exch2_opposingSend(4,941)=3 exch2_pij(1,4,941)=1 exch2_pij(2,4,941)=0 exch2_pij(3,4,941)=0 exch2_pij(4,4,941)=1 exch2_oi(4,941)=0 exch2_oj(4,941)=0 RETURN END SUBROUTINE W2_E2SETUP_942 C Topology for tile 942 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(942)=34 exch2_tNy(942)=34 exch2_tBasex(942)=374 exch2_tBasey(942)=68 exch2_txGlobalo(942)=2415 exch2_tyGlobalo(942)=69 exch2_isWedge(942)=0 exch2_isNedge(942)=0 exch2_isEedge(942)=0 exch2_isSedge(942)=0 exch2_myFace(942)=5 exch2_mydNx(942)=510 exch2_mydNy(942)=510 exch2_nNeighbours(942)=4 exch2_neighbourId(1,942)=957 exch2_iLo(1,942)=0 exch2_iHi(1,942)=35 exch2_jLo(1,942)=35 exch2_jHi(1,942)=35 exch2_opposingSend(1,942)=2 exch2_pij(1,1,942)=1 exch2_pij(2,1,942)=0 exch2_pij(3,1,942)=0 exch2_pij(4,1,942)=1 exch2_oi(1,942)=0 exch2_oj(1,942)=0 exch2_neighbourId(2,942)=927 exch2_iLo(2,942)=0 exch2_iHi(2,942)=35 exch2_jLo(2,942)=0 exch2_jHi(2,942)=0 exch2_opposingSend(2,942)=1 exch2_pij(1,2,942)=1 exch2_pij(2,2,942)=0 exch2_pij(3,2,942)=0 exch2_pij(4,2,942)=1 exch2_oi(2,942)=0 exch2_oj(2,942)=0 exch2_neighbourId(3,942)=943 exch2_iLo(3,942)=35 exch2_iHi(3,942)=35 exch2_jLo(3,942)=0 exch2_jHi(3,942)=35 exch2_opposingSend(3,942)=4 exch2_pij(1,3,942)=1 exch2_pij(2,3,942)=0 exch2_pij(3,3,942)=0 exch2_pij(4,3,942)=1 exch2_oi(3,942)=0 exch2_oj(3,942)=0 exch2_neighbourId(4,942)=941 exch2_iLo(4,942)=0 exch2_iHi(4,942)=0 exch2_jLo(4,942)=0 exch2_jHi(4,942)=35 exch2_opposingSend(4,942)=3 exch2_pij(1,4,942)=1 exch2_pij(2,4,942)=0 exch2_pij(3,4,942)=0 exch2_pij(4,4,942)=1 exch2_oi(4,942)=0 exch2_oj(4,942)=0 RETURN END SUBROUTINE W2_E2SETUP_943 C Topology for tile 943 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(943)=34 exch2_tNy(943)=34 exch2_tBasex(943)=408 exch2_tBasey(943)=68 exch2_txGlobalo(943)=2449 exch2_tyGlobalo(943)=69 exch2_isWedge(943)=0 exch2_isNedge(943)=0 exch2_isEedge(943)=0 exch2_isSedge(943)=0 exch2_myFace(943)=5 exch2_mydNx(943)=510 exch2_mydNy(943)=510 exch2_nNeighbours(943)=4 exch2_neighbourId(1,943)=958 exch2_iLo(1,943)=0 exch2_iHi(1,943)=35 exch2_jLo(1,943)=35 exch2_jHi(1,943)=35 exch2_opposingSend(1,943)=2 exch2_pij(1,1,943)=1 exch2_pij(2,1,943)=0 exch2_pij(3,1,943)=0 exch2_pij(4,1,943)=1 exch2_oi(1,943)=0 exch2_oj(1,943)=0 exch2_neighbourId(2,943)=928 exch2_iLo(2,943)=0 exch2_iHi(2,943)=35 exch2_jLo(2,943)=0 exch2_jHi(2,943)=0 exch2_opposingSend(2,943)=1 exch2_pij(1,2,943)=1 exch2_pij(2,2,943)=0 exch2_pij(3,2,943)=0 exch2_pij(4,2,943)=1 exch2_oi(2,943)=0 exch2_oj(2,943)=0 exch2_neighbourId(3,943)=944 exch2_iLo(3,943)=35 exch2_iHi(3,943)=35 exch2_jLo(3,943)=0 exch2_jHi(3,943)=35 exch2_opposingSend(3,943)=4 exch2_pij(1,3,943)=1 exch2_pij(2,3,943)=0 exch2_pij(3,3,943)=0 exch2_pij(4,3,943)=1 exch2_oi(3,943)=0 exch2_oj(3,943)=0 exch2_neighbourId(4,943)=942 exch2_iLo(4,943)=0 exch2_iHi(4,943)=0 exch2_jLo(4,943)=0 exch2_jHi(4,943)=35 exch2_opposingSend(4,943)=3 exch2_pij(1,4,943)=1 exch2_pij(2,4,943)=0 exch2_pij(3,4,943)=0 exch2_pij(4,4,943)=1 exch2_oi(4,943)=0 exch2_oj(4,943)=0 RETURN END SUBROUTINE W2_E2SETUP_944 C Topology for tile 944 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(944)=34 exch2_tNy(944)=34 exch2_tBasex(944)=442 exch2_tBasey(944)=68 exch2_txGlobalo(944)=2483 exch2_tyGlobalo(944)=69 exch2_isWedge(944)=0 exch2_isNedge(944)=0 exch2_isEedge(944)=0 exch2_isSedge(944)=0 exch2_myFace(944)=5 exch2_mydNx(944)=510 exch2_mydNy(944)=510 exch2_nNeighbours(944)=4 exch2_neighbourId(1,944)=959 exch2_iLo(1,944)=0 exch2_iHi(1,944)=35 exch2_jLo(1,944)=35 exch2_jHi(1,944)=35 exch2_opposingSend(1,944)=2 exch2_pij(1,1,944)=1 exch2_pij(2,1,944)=0 exch2_pij(3,1,944)=0 exch2_pij(4,1,944)=1 exch2_oi(1,944)=0 exch2_oj(1,944)=0 exch2_neighbourId(2,944)=929 exch2_iLo(2,944)=0 exch2_iHi(2,944)=35 exch2_jLo(2,944)=0 exch2_jHi(2,944)=0 exch2_opposingSend(2,944)=1 exch2_pij(1,2,944)=1 exch2_pij(2,2,944)=0 exch2_pij(3,2,944)=0 exch2_pij(4,2,944)=1 exch2_oi(2,944)=0 exch2_oj(2,944)=0 exch2_neighbourId(3,944)=945 exch2_iLo(3,944)=35 exch2_iHi(3,944)=35 exch2_jLo(3,944)=0 exch2_jHi(3,944)=35 exch2_opposingSend(3,944)=4 exch2_pij(1,3,944)=1 exch2_pij(2,3,944)=0 exch2_pij(3,3,944)=0 exch2_pij(4,3,944)=1 exch2_oi(3,944)=0 exch2_oj(3,944)=0 exch2_neighbourId(4,944)=943 exch2_iLo(4,944)=0 exch2_iHi(4,944)=0 exch2_jLo(4,944)=0 exch2_jHi(4,944)=35 exch2_opposingSend(4,944)=3 exch2_pij(1,4,944)=1 exch2_pij(2,4,944)=0 exch2_pij(3,4,944)=0 exch2_pij(4,4,944)=1 exch2_oi(4,944)=0 exch2_oj(4,944)=0 RETURN END SUBROUTINE W2_E2SETUP_945 C Topology for tile 945 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(945)=34 exch2_tNy(945)=34 exch2_tBasex(945)=476 exch2_tBasey(945)=68 exch2_txGlobalo(945)=2517 exch2_tyGlobalo(945)=69 exch2_isWedge(945)=0 exch2_isNedge(945)=0 exch2_isEedge(945)=1 exch2_isSedge(945)=0 exch2_myFace(945)=5 exch2_mydNx(945)=510 exch2_mydNy(945)=510 exch2_nNeighbours(945)=4 exch2_neighbourId(1,945)=960 exch2_iLo(1,945)=0 exch2_iHi(1,945)=35 exch2_jLo(1,945)=35 exch2_jHi(1,945)=35 exch2_opposingSend(1,945)=2 exch2_pij(1,1,945)=1 exch2_pij(2,1,945)=0 exch2_pij(3,1,945)=0 exch2_pij(4,1,945)=1 exch2_oi(1,945)=0 exch2_oj(1,945)=0 exch2_neighbourId(2,945)=930 exch2_iLo(2,945)=0 exch2_iHi(2,945)=35 exch2_jLo(2,945)=0 exch2_jHi(2,945)=0 exch2_opposingSend(2,945)=1 exch2_pij(1,2,945)=1 exch2_pij(2,2,945)=0 exch2_pij(3,2,945)=0 exch2_pij(4,2,945)=1 exch2_oi(2,945)=0 exch2_oj(2,945)=0 exch2_neighbourId(3,945)=1156 exch2_iLo(3,945)=35 exch2_iHi(3,945)=35 exch2_jLo(3,945)=0 exch2_jHi(3,945)=35 exch2_opposingSend(3,945)=4 exch2_pij(1,3,945)=1 exch2_pij(2,3,945)=0 exch2_pij(3,3,945)=0 exch2_pij(4,3,945)=1 exch2_oi(3,945)=510 exch2_oj(3,945)=0 exch2_neighbourId(4,945)=944 exch2_iLo(4,945)=0 exch2_iHi(4,945)=0 exch2_jLo(4,945)=0 exch2_jHi(4,945)=35 exch2_opposingSend(4,945)=3 exch2_pij(1,4,945)=1 exch2_pij(2,4,945)=0 exch2_pij(3,4,945)=0 exch2_pij(4,4,945)=1 exch2_oi(4,945)=0 exch2_oj(4,945)=0 RETURN END SUBROUTINE W2_E2SETUP_946 C Topology for tile 946 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(946)=34 exch2_tNy(946)=34 exch2_tBasex(946)=0 exch2_tBasey(946)=102 exch2_txGlobalo(946)=2041 exch2_tyGlobalo(946)=103 exch2_isWedge(946)=1 exch2_isNedge(946)=0 exch2_isEedge(946)=0 exch2_isSedge(946)=0 exch2_myFace(946)=5 exch2_mydNx(946)=510 exch2_mydNy(946)=510 exch2_nNeighbours(946)=4 exch2_neighbourId(1,946)=961 exch2_iLo(1,946)=0 exch2_iHi(1,946)=35 exch2_jLo(1,946)=35 exch2_jHi(1,946)=35 exch2_opposingSend(1,946)=2 exch2_pij(1,1,946)=1 exch2_pij(2,1,946)=0 exch2_pij(3,1,946)=0 exch2_pij(4,1,946)=1 exch2_oi(1,946)=0 exch2_oj(1,946)=0 exch2_neighbourId(2,946)=931 exch2_iLo(2,946)=0 exch2_iHi(2,946)=35 exch2_jLo(2,946)=0 exch2_jHi(2,946)=0 exch2_opposingSend(2,946)=1 exch2_pij(1,2,946)=1 exch2_pij(2,2,946)=0 exch2_pij(3,2,946)=0 exch2_pij(4,2,946)=1 exch2_oi(2,946)=0 exch2_oj(2,946)=0 exch2_neighbourId(3,946)=947 exch2_iLo(3,946)=35 exch2_iHi(3,946)=35 exch2_jLo(3,946)=0 exch2_jHi(3,946)=35 exch2_opposingSend(3,946)=4 exch2_pij(1,3,946)=1 exch2_pij(2,3,946)=0 exch2_pij(3,3,946)=0 exch2_pij(4,3,946)=1 exch2_oi(3,946)=0 exch2_oj(3,946)=0 exch2_neighbourId(4,946)=672 exch2_iLo(4,946)=0 exch2_iHi(4,946)=0 exch2_jLo(4,946)=0 exch2_jHi(4,946)=35 exch2_opposingSend(4,946)=1 exch2_pij(1,4,946)=0 exch2_pij(2,4,946)=1 exch2_pij(3,4,946)=-1 exch2_pij(4,4,946)=0 exch2_oi(4,946)=-510 exch2_oj(4,946)=511 RETURN END SUBROUTINE W2_E2SETUP_947 C Topology for tile 947 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(947)=34 exch2_tNy(947)=34 exch2_tBasex(947)=34 exch2_tBasey(947)=102 exch2_txGlobalo(947)=2075 exch2_tyGlobalo(947)=103 exch2_isWedge(947)=0 exch2_isNedge(947)=0 exch2_isEedge(947)=0 exch2_isSedge(947)=0 exch2_myFace(947)=5 exch2_mydNx(947)=510 exch2_mydNy(947)=510 exch2_nNeighbours(947)=4 exch2_neighbourId(1,947)=962 exch2_iLo(1,947)=0 exch2_iHi(1,947)=35 exch2_jLo(1,947)=35 exch2_jHi(1,947)=35 exch2_opposingSend(1,947)=2 exch2_pij(1,1,947)=1 exch2_pij(2,1,947)=0 exch2_pij(3,1,947)=0 exch2_pij(4,1,947)=1 exch2_oi(1,947)=0 exch2_oj(1,947)=0 exch2_neighbourId(2,947)=932 exch2_iLo(2,947)=0 exch2_iHi(2,947)=35 exch2_jLo(2,947)=0 exch2_jHi(2,947)=0 exch2_opposingSend(2,947)=1 exch2_pij(1,2,947)=1 exch2_pij(2,2,947)=0 exch2_pij(3,2,947)=0 exch2_pij(4,2,947)=1 exch2_oi(2,947)=0 exch2_oj(2,947)=0 exch2_neighbourId(3,947)=948 exch2_iLo(3,947)=35 exch2_iHi(3,947)=35 exch2_jLo(3,947)=0 exch2_jHi(3,947)=35 exch2_opposingSend(3,947)=4 exch2_pij(1,3,947)=1 exch2_pij(2,3,947)=0 exch2_pij(3,3,947)=0 exch2_pij(4,3,947)=1 exch2_oi(3,947)=0 exch2_oj(3,947)=0 exch2_neighbourId(4,947)=946 exch2_iLo(4,947)=0 exch2_iHi(4,947)=0 exch2_jLo(4,947)=0 exch2_jHi(4,947)=35 exch2_opposingSend(4,947)=3 exch2_pij(1,4,947)=1 exch2_pij(2,4,947)=0 exch2_pij(3,4,947)=0 exch2_pij(4,4,947)=1 exch2_oi(4,947)=0 exch2_oj(4,947)=0 RETURN END SUBROUTINE W2_E2SETUP_948 C Topology for tile 948 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(948)=34 exch2_tNy(948)=34 exch2_tBasex(948)=68 exch2_tBasey(948)=102 exch2_txGlobalo(948)=2109 exch2_tyGlobalo(948)=103 exch2_isWedge(948)=0 exch2_isNedge(948)=0 exch2_isEedge(948)=0 exch2_isSedge(948)=0 exch2_myFace(948)=5 exch2_mydNx(948)=510 exch2_mydNy(948)=510 exch2_nNeighbours(948)=4 exch2_neighbourId(1,948)=963 exch2_iLo(1,948)=0 exch2_iHi(1,948)=35 exch2_jLo(1,948)=35 exch2_jHi(1,948)=35 exch2_opposingSend(1,948)=2 exch2_pij(1,1,948)=1 exch2_pij(2,1,948)=0 exch2_pij(3,1,948)=0 exch2_pij(4,1,948)=1 exch2_oi(1,948)=0 exch2_oj(1,948)=0 exch2_neighbourId(2,948)=933 exch2_iLo(2,948)=0 exch2_iHi(2,948)=35 exch2_jLo(2,948)=0 exch2_jHi(2,948)=0 exch2_opposingSend(2,948)=1 exch2_pij(1,2,948)=1 exch2_pij(2,2,948)=0 exch2_pij(3,2,948)=0 exch2_pij(4,2,948)=1 exch2_oi(2,948)=0 exch2_oj(2,948)=0 exch2_neighbourId(3,948)=949 exch2_iLo(3,948)=35 exch2_iHi(3,948)=35 exch2_jLo(3,948)=0 exch2_jHi(3,948)=35 exch2_opposingSend(3,948)=4 exch2_pij(1,3,948)=1 exch2_pij(2,3,948)=0 exch2_pij(3,3,948)=0 exch2_pij(4,3,948)=1 exch2_oi(3,948)=0 exch2_oj(3,948)=0 exch2_neighbourId(4,948)=947 exch2_iLo(4,948)=0 exch2_iHi(4,948)=0 exch2_jLo(4,948)=0 exch2_jHi(4,948)=35 exch2_opposingSend(4,948)=3 exch2_pij(1,4,948)=1 exch2_pij(2,4,948)=0 exch2_pij(3,4,948)=0 exch2_pij(4,4,948)=1 exch2_oi(4,948)=0 exch2_oj(4,948)=0 RETURN END SUBROUTINE W2_E2SETUP_949 C Topology for tile 949 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(949)=34 exch2_tNy(949)=34 exch2_tBasex(949)=102 exch2_tBasey(949)=102 exch2_txGlobalo(949)=2143 exch2_tyGlobalo(949)=103 exch2_isWedge(949)=0 exch2_isNedge(949)=0 exch2_isEedge(949)=0 exch2_isSedge(949)=0 exch2_myFace(949)=5 exch2_mydNx(949)=510 exch2_mydNy(949)=510 exch2_nNeighbours(949)=4 exch2_neighbourId(1,949)=964 exch2_iLo(1,949)=0 exch2_iHi(1,949)=35 exch2_jLo(1,949)=35 exch2_jHi(1,949)=35 exch2_opposingSend(1,949)=2 exch2_pij(1,1,949)=1 exch2_pij(2,1,949)=0 exch2_pij(3,1,949)=0 exch2_pij(4,1,949)=1 exch2_oi(1,949)=0 exch2_oj(1,949)=0 exch2_neighbourId(2,949)=934 exch2_iLo(2,949)=0 exch2_iHi(2,949)=35 exch2_jLo(2,949)=0 exch2_jHi(2,949)=0 exch2_opposingSend(2,949)=1 exch2_pij(1,2,949)=1 exch2_pij(2,2,949)=0 exch2_pij(3,2,949)=0 exch2_pij(4,2,949)=1 exch2_oi(2,949)=0 exch2_oj(2,949)=0 exch2_neighbourId(3,949)=950 exch2_iLo(3,949)=35 exch2_iHi(3,949)=35 exch2_jLo(3,949)=0 exch2_jHi(3,949)=35 exch2_opposingSend(3,949)=4 exch2_pij(1,3,949)=1 exch2_pij(2,3,949)=0 exch2_pij(3,3,949)=0 exch2_pij(4,3,949)=1 exch2_oi(3,949)=0 exch2_oj(3,949)=0 exch2_neighbourId(4,949)=948 exch2_iLo(4,949)=0 exch2_iHi(4,949)=0 exch2_jLo(4,949)=0 exch2_jHi(4,949)=35 exch2_opposingSend(4,949)=3 exch2_pij(1,4,949)=1 exch2_pij(2,4,949)=0 exch2_pij(3,4,949)=0 exch2_pij(4,4,949)=1 exch2_oi(4,949)=0 exch2_oj(4,949)=0 RETURN END SUBROUTINE W2_E2SETUP_950 C Topology for tile 950 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(950)=34 exch2_tNy(950)=34 exch2_tBasex(950)=136 exch2_tBasey(950)=102 exch2_txGlobalo(950)=2177 exch2_tyGlobalo(950)=103 exch2_isWedge(950)=0 exch2_isNedge(950)=0 exch2_isEedge(950)=0 exch2_isSedge(950)=0 exch2_myFace(950)=5 exch2_mydNx(950)=510 exch2_mydNy(950)=510 exch2_nNeighbours(950)=4 exch2_neighbourId(1,950)=965 exch2_iLo(1,950)=0 exch2_iHi(1,950)=35 exch2_jLo(1,950)=35 exch2_jHi(1,950)=35 exch2_opposingSend(1,950)=2 exch2_pij(1,1,950)=1 exch2_pij(2,1,950)=0 exch2_pij(3,1,950)=0 exch2_pij(4,1,950)=1 exch2_oi(1,950)=0 exch2_oj(1,950)=0 exch2_neighbourId(2,950)=935 exch2_iLo(2,950)=0 exch2_iHi(2,950)=35 exch2_jLo(2,950)=0 exch2_jHi(2,950)=0 exch2_opposingSend(2,950)=1 exch2_pij(1,2,950)=1 exch2_pij(2,2,950)=0 exch2_pij(3,2,950)=0 exch2_pij(4,2,950)=1 exch2_oi(2,950)=0 exch2_oj(2,950)=0 exch2_neighbourId(3,950)=951 exch2_iLo(3,950)=35 exch2_iHi(3,950)=35 exch2_jLo(3,950)=0 exch2_jHi(3,950)=35 exch2_opposingSend(3,950)=4 exch2_pij(1,3,950)=1 exch2_pij(2,3,950)=0 exch2_pij(3,3,950)=0 exch2_pij(4,3,950)=1 exch2_oi(3,950)=0 exch2_oj(3,950)=0 exch2_neighbourId(4,950)=949 exch2_iLo(4,950)=0 exch2_iHi(4,950)=0 exch2_jLo(4,950)=0 exch2_jHi(4,950)=35 exch2_opposingSend(4,950)=3 exch2_pij(1,4,950)=1 exch2_pij(2,4,950)=0 exch2_pij(3,4,950)=0 exch2_pij(4,4,950)=1 exch2_oi(4,950)=0 exch2_oj(4,950)=0 RETURN END SUBROUTINE W2_E2SETUP_951 C Topology for tile 951 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(951)=34 exch2_tNy(951)=34 exch2_tBasex(951)=170 exch2_tBasey(951)=102 exch2_txGlobalo(951)=2211 exch2_tyGlobalo(951)=103 exch2_isWedge(951)=0 exch2_isNedge(951)=0 exch2_isEedge(951)=0 exch2_isSedge(951)=0 exch2_myFace(951)=5 exch2_mydNx(951)=510 exch2_mydNy(951)=510 exch2_nNeighbours(951)=4 exch2_neighbourId(1,951)=966 exch2_iLo(1,951)=0 exch2_iHi(1,951)=35 exch2_jLo(1,951)=35 exch2_jHi(1,951)=35 exch2_opposingSend(1,951)=2 exch2_pij(1,1,951)=1 exch2_pij(2,1,951)=0 exch2_pij(3,1,951)=0 exch2_pij(4,1,951)=1 exch2_oi(1,951)=0 exch2_oj(1,951)=0 exch2_neighbourId(2,951)=936 exch2_iLo(2,951)=0 exch2_iHi(2,951)=35 exch2_jLo(2,951)=0 exch2_jHi(2,951)=0 exch2_opposingSend(2,951)=1 exch2_pij(1,2,951)=1 exch2_pij(2,2,951)=0 exch2_pij(3,2,951)=0 exch2_pij(4,2,951)=1 exch2_oi(2,951)=0 exch2_oj(2,951)=0 exch2_neighbourId(3,951)=952 exch2_iLo(3,951)=35 exch2_iHi(3,951)=35 exch2_jLo(3,951)=0 exch2_jHi(3,951)=35 exch2_opposingSend(3,951)=4 exch2_pij(1,3,951)=1 exch2_pij(2,3,951)=0 exch2_pij(3,3,951)=0 exch2_pij(4,3,951)=1 exch2_oi(3,951)=0 exch2_oj(3,951)=0 exch2_neighbourId(4,951)=950 exch2_iLo(4,951)=0 exch2_iHi(4,951)=0 exch2_jLo(4,951)=0 exch2_jHi(4,951)=35 exch2_opposingSend(4,951)=3 exch2_pij(1,4,951)=1 exch2_pij(2,4,951)=0 exch2_pij(3,4,951)=0 exch2_pij(4,4,951)=1 exch2_oi(4,951)=0 exch2_oj(4,951)=0 RETURN END SUBROUTINE W2_E2SETUP_952 C Topology for tile 952 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(952)=34 exch2_tNy(952)=34 exch2_tBasex(952)=204 exch2_tBasey(952)=102 exch2_txGlobalo(952)=2245 exch2_tyGlobalo(952)=103 exch2_isWedge(952)=0 exch2_isNedge(952)=0 exch2_isEedge(952)=0 exch2_isSedge(952)=0 exch2_myFace(952)=5 exch2_mydNx(952)=510 exch2_mydNy(952)=510 exch2_nNeighbours(952)=4 exch2_neighbourId(1,952)=967 exch2_iLo(1,952)=0 exch2_iHi(1,952)=35 exch2_jLo(1,952)=35 exch2_jHi(1,952)=35 exch2_opposingSend(1,952)=2 exch2_pij(1,1,952)=1 exch2_pij(2,1,952)=0 exch2_pij(3,1,952)=0 exch2_pij(4,1,952)=1 exch2_oi(1,952)=0 exch2_oj(1,952)=0 exch2_neighbourId(2,952)=937 exch2_iLo(2,952)=0 exch2_iHi(2,952)=35 exch2_jLo(2,952)=0 exch2_jHi(2,952)=0 exch2_opposingSend(2,952)=1 exch2_pij(1,2,952)=1 exch2_pij(2,2,952)=0 exch2_pij(3,2,952)=0 exch2_pij(4,2,952)=1 exch2_oi(2,952)=0 exch2_oj(2,952)=0 exch2_neighbourId(3,952)=953 exch2_iLo(3,952)=35 exch2_iHi(3,952)=35 exch2_jLo(3,952)=0 exch2_jHi(3,952)=35 exch2_opposingSend(3,952)=4 exch2_pij(1,3,952)=1 exch2_pij(2,3,952)=0 exch2_pij(3,3,952)=0 exch2_pij(4,3,952)=1 exch2_oi(3,952)=0 exch2_oj(3,952)=0 exch2_neighbourId(4,952)=951 exch2_iLo(4,952)=0 exch2_iHi(4,952)=0 exch2_jLo(4,952)=0 exch2_jHi(4,952)=35 exch2_opposingSend(4,952)=3 exch2_pij(1,4,952)=1 exch2_pij(2,4,952)=0 exch2_pij(3,4,952)=0 exch2_pij(4,4,952)=1 exch2_oi(4,952)=0 exch2_oj(4,952)=0 RETURN END SUBROUTINE W2_E2SETUP_953 C Topology for tile 953 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(953)=34 exch2_tNy(953)=34 exch2_tBasex(953)=238 exch2_tBasey(953)=102 exch2_txGlobalo(953)=2279 exch2_tyGlobalo(953)=103 exch2_isWedge(953)=0 exch2_isNedge(953)=0 exch2_isEedge(953)=0 exch2_isSedge(953)=0 exch2_myFace(953)=5 exch2_mydNx(953)=510 exch2_mydNy(953)=510 exch2_nNeighbours(953)=4 exch2_neighbourId(1,953)=968 exch2_iLo(1,953)=0 exch2_iHi(1,953)=35 exch2_jLo(1,953)=35 exch2_jHi(1,953)=35 exch2_opposingSend(1,953)=2 exch2_pij(1,1,953)=1 exch2_pij(2,1,953)=0 exch2_pij(3,1,953)=0 exch2_pij(4,1,953)=1 exch2_oi(1,953)=0 exch2_oj(1,953)=0 exch2_neighbourId(2,953)=938 exch2_iLo(2,953)=0 exch2_iHi(2,953)=35 exch2_jLo(2,953)=0 exch2_jHi(2,953)=0 exch2_opposingSend(2,953)=1 exch2_pij(1,2,953)=1 exch2_pij(2,2,953)=0 exch2_pij(3,2,953)=0 exch2_pij(4,2,953)=1 exch2_oi(2,953)=0 exch2_oj(2,953)=0 exch2_neighbourId(3,953)=954 exch2_iLo(3,953)=35 exch2_iHi(3,953)=35 exch2_jLo(3,953)=0 exch2_jHi(3,953)=35 exch2_opposingSend(3,953)=4 exch2_pij(1,3,953)=1 exch2_pij(2,3,953)=0 exch2_pij(3,3,953)=0 exch2_pij(4,3,953)=1 exch2_oi(3,953)=0 exch2_oj(3,953)=0 exch2_neighbourId(4,953)=952 exch2_iLo(4,953)=0 exch2_iHi(4,953)=0 exch2_jLo(4,953)=0 exch2_jHi(4,953)=35 exch2_opposingSend(4,953)=3 exch2_pij(1,4,953)=1 exch2_pij(2,4,953)=0 exch2_pij(3,4,953)=0 exch2_pij(4,4,953)=1 exch2_oi(4,953)=0 exch2_oj(4,953)=0 RETURN END SUBROUTINE W2_E2SETUP_954 C Topology for tile 954 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(954)=34 exch2_tNy(954)=34 exch2_tBasex(954)=272 exch2_tBasey(954)=102 exch2_txGlobalo(954)=2313 exch2_tyGlobalo(954)=103 exch2_isWedge(954)=0 exch2_isNedge(954)=0 exch2_isEedge(954)=0 exch2_isSedge(954)=0 exch2_myFace(954)=5 exch2_mydNx(954)=510 exch2_mydNy(954)=510 exch2_nNeighbours(954)=4 exch2_neighbourId(1,954)=969 exch2_iLo(1,954)=0 exch2_iHi(1,954)=35 exch2_jLo(1,954)=35 exch2_jHi(1,954)=35 exch2_opposingSend(1,954)=2 exch2_pij(1,1,954)=1 exch2_pij(2,1,954)=0 exch2_pij(3,1,954)=0 exch2_pij(4,1,954)=1 exch2_oi(1,954)=0 exch2_oj(1,954)=0 exch2_neighbourId(2,954)=939 exch2_iLo(2,954)=0 exch2_iHi(2,954)=35 exch2_jLo(2,954)=0 exch2_jHi(2,954)=0 exch2_opposingSend(2,954)=1 exch2_pij(1,2,954)=1 exch2_pij(2,2,954)=0 exch2_pij(3,2,954)=0 exch2_pij(4,2,954)=1 exch2_oi(2,954)=0 exch2_oj(2,954)=0 exch2_neighbourId(3,954)=955 exch2_iLo(3,954)=35 exch2_iHi(3,954)=35 exch2_jLo(3,954)=0 exch2_jHi(3,954)=35 exch2_opposingSend(3,954)=4 exch2_pij(1,3,954)=1 exch2_pij(2,3,954)=0 exch2_pij(3,3,954)=0 exch2_pij(4,3,954)=1 exch2_oi(3,954)=0 exch2_oj(3,954)=0 exch2_neighbourId(4,954)=953 exch2_iLo(4,954)=0 exch2_iHi(4,954)=0 exch2_jLo(4,954)=0 exch2_jHi(4,954)=35 exch2_opposingSend(4,954)=3 exch2_pij(1,4,954)=1 exch2_pij(2,4,954)=0 exch2_pij(3,4,954)=0 exch2_pij(4,4,954)=1 exch2_oi(4,954)=0 exch2_oj(4,954)=0 RETURN END SUBROUTINE W2_E2SETUP_955 C Topology for tile 955 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(955)=34 exch2_tNy(955)=34 exch2_tBasex(955)=306 exch2_tBasey(955)=102 exch2_txGlobalo(955)=2347 exch2_tyGlobalo(955)=103 exch2_isWedge(955)=0 exch2_isNedge(955)=0 exch2_isEedge(955)=0 exch2_isSedge(955)=0 exch2_myFace(955)=5 exch2_mydNx(955)=510 exch2_mydNy(955)=510 exch2_nNeighbours(955)=4 exch2_neighbourId(1,955)=970 exch2_iLo(1,955)=0 exch2_iHi(1,955)=35 exch2_jLo(1,955)=35 exch2_jHi(1,955)=35 exch2_opposingSend(1,955)=2 exch2_pij(1,1,955)=1 exch2_pij(2,1,955)=0 exch2_pij(3,1,955)=0 exch2_pij(4,1,955)=1 exch2_oi(1,955)=0 exch2_oj(1,955)=0 exch2_neighbourId(2,955)=940 exch2_iLo(2,955)=0 exch2_iHi(2,955)=35 exch2_jLo(2,955)=0 exch2_jHi(2,955)=0 exch2_opposingSend(2,955)=1 exch2_pij(1,2,955)=1 exch2_pij(2,2,955)=0 exch2_pij(3,2,955)=0 exch2_pij(4,2,955)=1 exch2_oi(2,955)=0 exch2_oj(2,955)=0 exch2_neighbourId(3,955)=956 exch2_iLo(3,955)=35 exch2_iHi(3,955)=35 exch2_jLo(3,955)=0 exch2_jHi(3,955)=35 exch2_opposingSend(3,955)=4 exch2_pij(1,3,955)=1 exch2_pij(2,3,955)=0 exch2_pij(3,3,955)=0 exch2_pij(4,3,955)=1 exch2_oi(3,955)=0 exch2_oj(3,955)=0 exch2_neighbourId(4,955)=954 exch2_iLo(4,955)=0 exch2_iHi(4,955)=0 exch2_jLo(4,955)=0 exch2_jHi(4,955)=35 exch2_opposingSend(4,955)=3 exch2_pij(1,4,955)=1 exch2_pij(2,4,955)=0 exch2_pij(3,4,955)=0 exch2_pij(4,4,955)=1 exch2_oi(4,955)=0 exch2_oj(4,955)=0 RETURN END SUBROUTINE W2_E2SETUP_956 C Topology for tile 956 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(956)=34 exch2_tNy(956)=34 exch2_tBasex(956)=340 exch2_tBasey(956)=102 exch2_txGlobalo(956)=2381 exch2_tyGlobalo(956)=103 exch2_isWedge(956)=0 exch2_isNedge(956)=0 exch2_isEedge(956)=0 exch2_isSedge(956)=0 exch2_myFace(956)=5 exch2_mydNx(956)=510 exch2_mydNy(956)=510 exch2_nNeighbours(956)=4 exch2_neighbourId(1,956)=971 exch2_iLo(1,956)=0 exch2_iHi(1,956)=35 exch2_jLo(1,956)=35 exch2_jHi(1,956)=35 exch2_opposingSend(1,956)=2 exch2_pij(1,1,956)=1 exch2_pij(2,1,956)=0 exch2_pij(3,1,956)=0 exch2_pij(4,1,956)=1 exch2_oi(1,956)=0 exch2_oj(1,956)=0 exch2_neighbourId(2,956)=941 exch2_iLo(2,956)=0 exch2_iHi(2,956)=35 exch2_jLo(2,956)=0 exch2_jHi(2,956)=0 exch2_opposingSend(2,956)=1 exch2_pij(1,2,956)=1 exch2_pij(2,2,956)=0 exch2_pij(3,2,956)=0 exch2_pij(4,2,956)=1 exch2_oi(2,956)=0 exch2_oj(2,956)=0 exch2_neighbourId(3,956)=957 exch2_iLo(3,956)=35 exch2_iHi(3,956)=35 exch2_jLo(3,956)=0 exch2_jHi(3,956)=35 exch2_opposingSend(3,956)=4 exch2_pij(1,3,956)=1 exch2_pij(2,3,956)=0 exch2_pij(3,3,956)=0 exch2_pij(4,3,956)=1 exch2_oi(3,956)=0 exch2_oj(3,956)=0 exch2_neighbourId(4,956)=955 exch2_iLo(4,956)=0 exch2_iHi(4,956)=0 exch2_jLo(4,956)=0 exch2_jHi(4,956)=35 exch2_opposingSend(4,956)=3 exch2_pij(1,4,956)=1 exch2_pij(2,4,956)=0 exch2_pij(3,4,956)=0 exch2_pij(4,4,956)=1 exch2_oi(4,956)=0 exch2_oj(4,956)=0 RETURN END SUBROUTINE W2_E2SETUP_957 C Topology for tile 957 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(957)=34 exch2_tNy(957)=34 exch2_tBasex(957)=374 exch2_tBasey(957)=102 exch2_txGlobalo(957)=2415 exch2_tyGlobalo(957)=103 exch2_isWedge(957)=0 exch2_isNedge(957)=0 exch2_isEedge(957)=0 exch2_isSedge(957)=0 exch2_myFace(957)=5 exch2_mydNx(957)=510 exch2_mydNy(957)=510 exch2_nNeighbours(957)=4 exch2_neighbourId(1,957)=972 exch2_iLo(1,957)=0 exch2_iHi(1,957)=35 exch2_jLo(1,957)=35 exch2_jHi(1,957)=35 exch2_opposingSend(1,957)=2 exch2_pij(1,1,957)=1 exch2_pij(2,1,957)=0 exch2_pij(3,1,957)=0 exch2_pij(4,1,957)=1 exch2_oi(1,957)=0 exch2_oj(1,957)=0 exch2_neighbourId(2,957)=942 exch2_iLo(2,957)=0 exch2_iHi(2,957)=35 exch2_jLo(2,957)=0 exch2_jHi(2,957)=0 exch2_opposingSend(2,957)=1 exch2_pij(1,2,957)=1 exch2_pij(2,2,957)=0 exch2_pij(3,2,957)=0 exch2_pij(4,2,957)=1 exch2_oi(2,957)=0 exch2_oj(2,957)=0 exch2_neighbourId(3,957)=958 exch2_iLo(3,957)=35 exch2_iHi(3,957)=35 exch2_jLo(3,957)=0 exch2_jHi(3,957)=35 exch2_opposingSend(3,957)=4 exch2_pij(1,3,957)=1 exch2_pij(2,3,957)=0 exch2_pij(3,3,957)=0 exch2_pij(4,3,957)=1 exch2_oi(3,957)=0 exch2_oj(3,957)=0 exch2_neighbourId(4,957)=956 exch2_iLo(4,957)=0 exch2_iHi(4,957)=0 exch2_jLo(4,957)=0 exch2_jHi(4,957)=35 exch2_opposingSend(4,957)=3 exch2_pij(1,4,957)=1 exch2_pij(2,4,957)=0 exch2_pij(3,4,957)=0 exch2_pij(4,4,957)=1 exch2_oi(4,957)=0 exch2_oj(4,957)=0 RETURN END SUBROUTINE W2_E2SETUP_958 C Topology for tile 958 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(958)=34 exch2_tNy(958)=34 exch2_tBasex(958)=408 exch2_tBasey(958)=102 exch2_txGlobalo(958)=2449 exch2_tyGlobalo(958)=103 exch2_isWedge(958)=0 exch2_isNedge(958)=0 exch2_isEedge(958)=0 exch2_isSedge(958)=0 exch2_myFace(958)=5 exch2_mydNx(958)=510 exch2_mydNy(958)=510 exch2_nNeighbours(958)=4 exch2_neighbourId(1,958)=973 exch2_iLo(1,958)=0 exch2_iHi(1,958)=35 exch2_jLo(1,958)=35 exch2_jHi(1,958)=35 exch2_opposingSend(1,958)=2 exch2_pij(1,1,958)=1 exch2_pij(2,1,958)=0 exch2_pij(3,1,958)=0 exch2_pij(4,1,958)=1 exch2_oi(1,958)=0 exch2_oj(1,958)=0 exch2_neighbourId(2,958)=943 exch2_iLo(2,958)=0 exch2_iHi(2,958)=35 exch2_jLo(2,958)=0 exch2_jHi(2,958)=0 exch2_opposingSend(2,958)=1 exch2_pij(1,2,958)=1 exch2_pij(2,2,958)=0 exch2_pij(3,2,958)=0 exch2_pij(4,2,958)=1 exch2_oi(2,958)=0 exch2_oj(2,958)=0 exch2_neighbourId(3,958)=959 exch2_iLo(3,958)=35 exch2_iHi(3,958)=35 exch2_jLo(3,958)=0 exch2_jHi(3,958)=35 exch2_opposingSend(3,958)=4 exch2_pij(1,3,958)=1 exch2_pij(2,3,958)=0 exch2_pij(3,3,958)=0 exch2_pij(4,3,958)=1 exch2_oi(3,958)=0 exch2_oj(3,958)=0 exch2_neighbourId(4,958)=957 exch2_iLo(4,958)=0 exch2_iHi(4,958)=0 exch2_jLo(4,958)=0 exch2_jHi(4,958)=35 exch2_opposingSend(4,958)=3 exch2_pij(1,4,958)=1 exch2_pij(2,4,958)=0 exch2_pij(3,4,958)=0 exch2_pij(4,4,958)=1 exch2_oi(4,958)=0 exch2_oj(4,958)=0 RETURN END SUBROUTINE W2_E2SETUP_959 C Topology for tile 959 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(959)=34 exch2_tNy(959)=34 exch2_tBasex(959)=442 exch2_tBasey(959)=102 exch2_txGlobalo(959)=2483 exch2_tyGlobalo(959)=103 exch2_isWedge(959)=0 exch2_isNedge(959)=0 exch2_isEedge(959)=0 exch2_isSedge(959)=0 exch2_myFace(959)=5 exch2_mydNx(959)=510 exch2_mydNy(959)=510 exch2_nNeighbours(959)=4 exch2_neighbourId(1,959)=974 exch2_iLo(1,959)=0 exch2_iHi(1,959)=35 exch2_jLo(1,959)=35 exch2_jHi(1,959)=35 exch2_opposingSend(1,959)=2 exch2_pij(1,1,959)=1 exch2_pij(2,1,959)=0 exch2_pij(3,1,959)=0 exch2_pij(4,1,959)=1 exch2_oi(1,959)=0 exch2_oj(1,959)=0 exch2_neighbourId(2,959)=944 exch2_iLo(2,959)=0 exch2_iHi(2,959)=35 exch2_jLo(2,959)=0 exch2_jHi(2,959)=0 exch2_opposingSend(2,959)=1 exch2_pij(1,2,959)=1 exch2_pij(2,2,959)=0 exch2_pij(3,2,959)=0 exch2_pij(4,2,959)=1 exch2_oi(2,959)=0 exch2_oj(2,959)=0 exch2_neighbourId(3,959)=960 exch2_iLo(3,959)=35 exch2_iHi(3,959)=35 exch2_jLo(3,959)=0 exch2_jHi(3,959)=35 exch2_opposingSend(3,959)=4 exch2_pij(1,3,959)=1 exch2_pij(2,3,959)=0 exch2_pij(3,3,959)=0 exch2_pij(4,3,959)=1 exch2_oi(3,959)=0 exch2_oj(3,959)=0 exch2_neighbourId(4,959)=958 exch2_iLo(4,959)=0 exch2_iHi(4,959)=0 exch2_jLo(4,959)=0 exch2_jHi(4,959)=35 exch2_opposingSend(4,959)=3 exch2_pij(1,4,959)=1 exch2_pij(2,4,959)=0 exch2_pij(3,4,959)=0 exch2_pij(4,4,959)=1 exch2_oi(4,959)=0 exch2_oj(4,959)=0 RETURN END SUBROUTINE W2_E2SETUP_960 C Topology for tile 960 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(960)=34 exch2_tNy(960)=34 exch2_tBasex(960)=476 exch2_tBasey(960)=102 exch2_txGlobalo(960)=2517 exch2_tyGlobalo(960)=103 exch2_isWedge(960)=0 exch2_isNedge(960)=0 exch2_isEedge(960)=1 exch2_isSedge(960)=0 exch2_myFace(960)=5 exch2_mydNx(960)=510 exch2_mydNy(960)=510 exch2_nNeighbours(960)=4 exch2_neighbourId(1,960)=975 exch2_iLo(1,960)=0 exch2_iHi(1,960)=35 exch2_jLo(1,960)=35 exch2_jHi(1,960)=35 exch2_opposingSend(1,960)=2 exch2_pij(1,1,960)=1 exch2_pij(2,1,960)=0 exch2_pij(3,1,960)=0 exch2_pij(4,1,960)=1 exch2_oi(1,960)=0 exch2_oj(1,960)=0 exch2_neighbourId(2,960)=945 exch2_iLo(2,960)=0 exch2_iHi(2,960)=35 exch2_jLo(2,960)=0 exch2_jHi(2,960)=0 exch2_opposingSend(2,960)=1 exch2_pij(1,2,960)=1 exch2_pij(2,2,960)=0 exch2_pij(3,2,960)=0 exch2_pij(4,2,960)=1 exch2_oi(2,960)=0 exch2_oj(2,960)=0 exch2_neighbourId(3,960)=1171 exch2_iLo(3,960)=35 exch2_iHi(3,960)=35 exch2_jLo(3,960)=0 exch2_jHi(3,960)=35 exch2_opposingSend(3,960)=4 exch2_pij(1,3,960)=1 exch2_pij(2,3,960)=0 exch2_pij(3,3,960)=0 exch2_pij(4,3,960)=1 exch2_oi(3,960)=510 exch2_oj(3,960)=0 exch2_neighbourId(4,960)=959 exch2_iLo(4,960)=0 exch2_iHi(4,960)=0 exch2_jLo(4,960)=0 exch2_jHi(4,960)=35 exch2_opposingSend(4,960)=3 exch2_pij(1,4,960)=1 exch2_pij(2,4,960)=0 exch2_pij(3,4,960)=0 exch2_pij(4,4,960)=1 exch2_oi(4,960)=0 exch2_oj(4,960)=0 RETURN END SUBROUTINE W2_E2SETUP_961 C Topology for tile 961 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(961)=34 exch2_tNy(961)=34 exch2_tBasex(961)=0 exch2_tBasey(961)=136 exch2_txGlobalo(961)=2041 exch2_tyGlobalo(961)=137 exch2_isWedge(961)=1 exch2_isNedge(961)=0 exch2_isEedge(961)=0 exch2_isSedge(961)=0 exch2_myFace(961)=5 exch2_mydNx(961)=510 exch2_mydNy(961)=510 exch2_nNeighbours(961)=4 exch2_neighbourId(1,961)=976 exch2_iLo(1,961)=0 exch2_iHi(1,961)=35 exch2_jLo(1,961)=35 exch2_jHi(1,961)=35 exch2_opposingSend(1,961)=2 exch2_pij(1,1,961)=1 exch2_pij(2,1,961)=0 exch2_pij(3,1,961)=0 exch2_pij(4,1,961)=1 exch2_oi(1,961)=0 exch2_oj(1,961)=0 exch2_neighbourId(2,961)=946 exch2_iLo(2,961)=0 exch2_iHi(2,961)=35 exch2_jLo(2,961)=0 exch2_jHi(2,961)=0 exch2_opposingSend(2,961)=1 exch2_pij(1,2,961)=1 exch2_pij(2,2,961)=0 exch2_pij(3,2,961)=0 exch2_pij(4,2,961)=1 exch2_oi(2,961)=0 exch2_oj(2,961)=0 exch2_neighbourId(3,961)=962 exch2_iLo(3,961)=35 exch2_iHi(3,961)=35 exch2_jLo(3,961)=0 exch2_jHi(3,961)=35 exch2_opposingSend(3,961)=4 exch2_pij(1,3,961)=1 exch2_pij(2,3,961)=0 exch2_pij(3,3,961)=0 exch2_pij(4,3,961)=1 exch2_oi(3,961)=0 exch2_oj(3,961)=0 exch2_neighbourId(4,961)=671 exch2_iLo(4,961)=0 exch2_iHi(4,961)=0 exch2_jLo(4,961)=0 exch2_jHi(4,961)=35 exch2_opposingSend(4,961)=1 exch2_pij(1,4,961)=0 exch2_pij(2,4,961)=1 exch2_pij(3,4,961)=-1 exch2_pij(4,4,961)=0 exch2_oi(4,961)=-510 exch2_oj(4,961)=511 RETURN END SUBROUTINE W2_E2SETUP_962 C Topology for tile 962 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(962)=34 exch2_tNy(962)=34 exch2_tBasex(962)=34 exch2_tBasey(962)=136 exch2_txGlobalo(962)=2075 exch2_tyGlobalo(962)=137 exch2_isWedge(962)=0 exch2_isNedge(962)=0 exch2_isEedge(962)=0 exch2_isSedge(962)=0 exch2_myFace(962)=5 exch2_mydNx(962)=510 exch2_mydNy(962)=510 exch2_nNeighbours(962)=4 exch2_neighbourId(1,962)=977 exch2_iLo(1,962)=0 exch2_iHi(1,962)=35 exch2_jLo(1,962)=35 exch2_jHi(1,962)=35 exch2_opposingSend(1,962)=2 exch2_pij(1,1,962)=1 exch2_pij(2,1,962)=0 exch2_pij(3,1,962)=0 exch2_pij(4,1,962)=1 exch2_oi(1,962)=0 exch2_oj(1,962)=0 exch2_neighbourId(2,962)=947 exch2_iLo(2,962)=0 exch2_iHi(2,962)=35 exch2_jLo(2,962)=0 exch2_jHi(2,962)=0 exch2_opposingSend(2,962)=1 exch2_pij(1,2,962)=1 exch2_pij(2,2,962)=0 exch2_pij(3,2,962)=0 exch2_pij(4,2,962)=1 exch2_oi(2,962)=0 exch2_oj(2,962)=0 exch2_neighbourId(3,962)=963 exch2_iLo(3,962)=35 exch2_iHi(3,962)=35 exch2_jLo(3,962)=0 exch2_jHi(3,962)=35 exch2_opposingSend(3,962)=4 exch2_pij(1,3,962)=1 exch2_pij(2,3,962)=0 exch2_pij(3,3,962)=0 exch2_pij(4,3,962)=1 exch2_oi(3,962)=0 exch2_oj(3,962)=0 exch2_neighbourId(4,962)=961 exch2_iLo(4,962)=0 exch2_iHi(4,962)=0 exch2_jLo(4,962)=0 exch2_jHi(4,962)=35 exch2_opposingSend(4,962)=3 exch2_pij(1,4,962)=1 exch2_pij(2,4,962)=0 exch2_pij(3,4,962)=0 exch2_pij(4,4,962)=1 exch2_oi(4,962)=0 exch2_oj(4,962)=0 RETURN END SUBROUTINE W2_E2SETUP_963 C Topology for tile 963 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(963)=34 exch2_tNy(963)=34 exch2_tBasex(963)=68 exch2_tBasey(963)=136 exch2_txGlobalo(963)=2109 exch2_tyGlobalo(963)=137 exch2_isWedge(963)=0 exch2_isNedge(963)=0 exch2_isEedge(963)=0 exch2_isSedge(963)=0 exch2_myFace(963)=5 exch2_mydNx(963)=510 exch2_mydNy(963)=510 exch2_nNeighbours(963)=4 exch2_neighbourId(1,963)=978 exch2_iLo(1,963)=0 exch2_iHi(1,963)=35 exch2_jLo(1,963)=35 exch2_jHi(1,963)=35 exch2_opposingSend(1,963)=2 exch2_pij(1,1,963)=1 exch2_pij(2,1,963)=0 exch2_pij(3,1,963)=0 exch2_pij(4,1,963)=1 exch2_oi(1,963)=0 exch2_oj(1,963)=0 exch2_neighbourId(2,963)=948 exch2_iLo(2,963)=0 exch2_iHi(2,963)=35 exch2_jLo(2,963)=0 exch2_jHi(2,963)=0 exch2_opposingSend(2,963)=1 exch2_pij(1,2,963)=1 exch2_pij(2,2,963)=0 exch2_pij(3,2,963)=0 exch2_pij(4,2,963)=1 exch2_oi(2,963)=0 exch2_oj(2,963)=0 exch2_neighbourId(3,963)=964 exch2_iLo(3,963)=35 exch2_iHi(3,963)=35 exch2_jLo(3,963)=0 exch2_jHi(3,963)=35 exch2_opposingSend(3,963)=4 exch2_pij(1,3,963)=1 exch2_pij(2,3,963)=0 exch2_pij(3,3,963)=0 exch2_pij(4,3,963)=1 exch2_oi(3,963)=0 exch2_oj(3,963)=0 exch2_neighbourId(4,963)=962 exch2_iLo(4,963)=0 exch2_iHi(4,963)=0 exch2_jLo(4,963)=0 exch2_jHi(4,963)=35 exch2_opposingSend(4,963)=3 exch2_pij(1,4,963)=1 exch2_pij(2,4,963)=0 exch2_pij(3,4,963)=0 exch2_pij(4,4,963)=1 exch2_oi(4,963)=0 exch2_oj(4,963)=0 RETURN END SUBROUTINE W2_E2SETUP_964 C Topology for tile 964 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(964)=34 exch2_tNy(964)=34 exch2_tBasex(964)=102 exch2_tBasey(964)=136 exch2_txGlobalo(964)=2143 exch2_tyGlobalo(964)=137 exch2_isWedge(964)=0 exch2_isNedge(964)=0 exch2_isEedge(964)=0 exch2_isSedge(964)=0 exch2_myFace(964)=5 exch2_mydNx(964)=510 exch2_mydNy(964)=510 exch2_nNeighbours(964)=4 exch2_neighbourId(1,964)=979 exch2_iLo(1,964)=0 exch2_iHi(1,964)=35 exch2_jLo(1,964)=35 exch2_jHi(1,964)=35 exch2_opposingSend(1,964)=2 exch2_pij(1,1,964)=1 exch2_pij(2,1,964)=0 exch2_pij(3,1,964)=0 exch2_pij(4,1,964)=1 exch2_oi(1,964)=0 exch2_oj(1,964)=0 exch2_neighbourId(2,964)=949 exch2_iLo(2,964)=0 exch2_iHi(2,964)=35 exch2_jLo(2,964)=0 exch2_jHi(2,964)=0 exch2_opposingSend(2,964)=1 exch2_pij(1,2,964)=1 exch2_pij(2,2,964)=0 exch2_pij(3,2,964)=0 exch2_pij(4,2,964)=1 exch2_oi(2,964)=0 exch2_oj(2,964)=0 exch2_neighbourId(3,964)=965 exch2_iLo(3,964)=35 exch2_iHi(3,964)=35 exch2_jLo(3,964)=0 exch2_jHi(3,964)=35 exch2_opposingSend(3,964)=4 exch2_pij(1,3,964)=1 exch2_pij(2,3,964)=0 exch2_pij(3,3,964)=0 exch2_pij(4,3,964)=1 exch2_oi(3,964)=0 exch2_oj(3,964)=0 exch2_neighbourId(4,964)=963 exch2_iLo(4,964)=0 exch2_iHi(4,964)=0 exch2_jLo(4,964)=0 exch2_jHi(4,964)=35 exch2_opposingSend(4,964)=3 exch2_pij(1,4,964)=1 exch2_pij(2,4,964)=0 exch2_pij(3,4,964)=0 exch2_pij(4,4,964)=1 exch2_oi(4,964)=0 exch2_oj(4,964)=0 RETURN END SUBROUTINE W2_E2SETUP_965 C Topology for tile 965 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(965)=34 exch2_tNy(965)=34 exch2_tBasex(965)=136 exch2_tBasey(965)=136 exch2_txGlobalo(965)=2177 exch2_tyGlobalo(965)=137 exch2_isWedge(965)=0 exch2_isNedge(965)=0 exch2_isEedge(965)=0 exch2_isSedge(965)=0 exch2_myFace(965)=5 exch2_mydNx(965)=510 exch2_mydNy(965)=510 exch2_nNeighbours(965)=4 exch2_neighbourId(1,965)=980 exch2_iLo(1,965)=0 exch2_iHi(1,965)=35 exch2_jLo(1,965)=35 exch2_jHi(1,965)=35 exch2_opposingSend(1,965)=2 exch2_pij(1,1,965)=1 exch2_pij(2,1,965)=0 exch2_pij(3,1,965)=0 exch2_pij(4,1,965)=1 exch2_oi(1,965)=0 exch2_oj(1,965)=0 exch2_neighbourId(2,965)=950 exch2_iLo(2,965)=0 exch2_iHi(2,965)=35 exch2_jLo(2,965)=0 exch2_jHi(2,965)=0 exch2_opposingSend(2,965)=1 exch2_pij(1,2,965)=1 exch2_pij(2,2,965)=0 exch2_pij(3,2,965)=0 exch2_pij(4,2,965)=1 exch2_oi(2,965)=0 exch2_oj(2,965)=0 exch2_neighbourId(3,965)=966 exch2_iLo(3,965)=35 exch2_iHi(3,965)=35 exch2_jLo(3,965)=0 exch2_jHi(3,965)=35 exch2_opposingSend(3,965)=4 exch2_pij(1,3,965)=1 exch2_pij(2,3,965)=0 exch2_pij(3,3,965)=0 exch2_pij(4,3,965)=1 exch2_oi(3,965)=0 exch2_oj(3,965)=0 exch2_neighbourId(4,965)=964 exch2_iLo(4,965)=0 exch2_iHi(4,965)=0 exch2_jLo(4,965)=0 exch2_jHi(4,965)=35 exch2_opposingSend(4,965)=3 exch2_pij(1,4,965)=1 exch2_pij(2,4,965)=0 exch2_pij(3,4,965)=0 exch2_pij(4,4,965)=1 exch2_oi(4,965)=0 exch2_oj(4,965)=0 RETURN END SUBROUTINE W2_E2SETUP_966 C Topology for tile 966 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(966)=34 exch2_tNy(966)=34 exch2_tBasex(966)=170 exch2_tBasey(966)=136 exch2_txGlobalo(966)=2211 exch2_tyGlobalo(966)=137 exch2_isWedge(966)=0 exch2_isNedge(966)=0 exch2_isEedge(966)=0 exch2_isSedge(966)=0 exch2_myFace(966)=5 exch2_mydNx(966)=510 exch2_mydNy(966)=510 exch2_nNeighbours(966)=4 exch2_neighbourId(1,966)=981 exch2_iLo(1,966)=0 exch2_iHi(1,966)=35 exch2_jLo(1,966)=35 exch2_jHi(1,966)=35 exch2_opposingSend(1,966)=2 exch2_pij(1,1,966)=1 exch2_pij(2,1,966)=0 exch2_pij(3,1,966)=0 exch2_pij(4,1,966)=1 exch2_oi(1,966)=0 exch2_oj(1,966)=0 exch2_neighbourId(2,966)=951 exch2_iLo(2,966)=0 exch2_iHi(2,966)=35 exch2_jLo(2,966)=0 exch2_jHi(2,966)=0 exch2_opposingSend(2,966)=1 exch2_pij(1,2,966)=1 exch2_pij(2,2,966)=0 exch2_pij(3,2,966)=0 exch2_pij(4,2,966)=1 exch2_oi(2,966)=0 exch2_oj(2,966)=0 exch2_neighbourId(3,966)=967 exch2_iLo(3,966)=35 exch2_iHi(3,966)=35 exch2_jLo(3,966)=0 exch2_jHi(3,966)=35 exch2_opposingSend(3,966)=4 exch2_pij(1,3,966)=1 exch2_pij(2,3,966)=0 exch2_pij(3,3,966)=0 exch2_pij(4,3,966)=1 exch2_oi(3,966)=0 exch2_oj(3,966)=0 exch2_neighbourId(4,966)=965 exch2_iLo(4,966)=0 exch2_iHi(4,966)=0 exch2_jLo(4,966)=0 exch2_jHi(4,966)=35 exch2_opposingSend(4,966)=3 exch2_pij(1,4,966)=1 exch2_pij(2,4,966)=0 exch2_pij(3,4,966)=0 exch2_pij(4,4,966)=1 exch2_oi(4,966)=0 exch2_oj(4,966)=0 RETURN END SUBROUTINE W2_E2SETUP_967 C Topology for tile 967 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(967)=34 exch2_tNy(967)=34 exch2_tBasex(967)=204 exch2_tBasey(967)=136 exch2_txGlobalo(967)=2245 exch2_tyGlobalo(967)=137 exch2_isWedge(967)=0 exch2_isNedge(967)=0 exch2_isEedge(967)=0 exch2_isSedge(967)=0 exch2_myFace(967)=5 exch2_mydNx(967)=510 exch2_mydNy(967)=510 exch2_nNeighbours(967)=4 exch2_neighbourId(1,967)=982 exch2_iLo(1,967)=0 exch2_iHi(1,967)=35 exch2_jLo(1,967)=35 exch2_jHi(1,967)=35 exch2_opposingSend(1,967)=2 exch2_pij(1,1,967)=1 exch2_pij(2,1,967)=0 exch2_pij(3,1,967)=0 exch2_pij(4,1,967)=1 exch2_oi(1,967)=0 exch2_oj(1,967)=0 exch2_neighbourId(2,967)=952 exch2_iLo(2,967)=0 exch2_iHi(2,967)=35 exch2_jLo(2,967)=0 exch2_jHi(2,967)=0 exch2_opposingSend(2,967)=1 exch2_pij(1,2,967)=1 exch2_pij(2,2,967)=0 exch2_pij(3,2,967)=0 exch2_pij(4,2,967)=1 exch2_oi(2,967)=0 exch2_oj(2,967)=0 exch2_neighbourId(3,967)=968 exch2_iLo(3,967)=35 exch2_iHi(3,967)=35 exch2_jLo(3,967)=0 exch2_jHi(3,967)=35 exch2_opposingSend(3,967)=4 exch2_pij(1,3,967)=1 exch2_pij(2,3,967)=0 exch2_pij(3,3,967)=0 exch2_pij(4,3,967)=1 exch2_oi(3,967)=0 exch2_oj(3,967)=0 exch2_neighbourId(4,967)=966 exch2_iLo(4,967)=0 exch2_iHi(4,967)=0 exch2_jLo(4,967)=0 exch2_jHi(4,967)=35 exch2_opposingSend(4,967)=3 exch2_pij(1,4,967)=1 exch2_pij(2,4,967)=0 exch2_pij(3,4,967)=0 exch2_pij(4,4,967)=1 exch2_oi(4,967)=0 exch2_oj(4,967)=0 RETURN END SUBROUTINE W2_E2SETUP_968 C Topology for tile 968 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(968)=34 exch2_tNy(968)=34 exch2_tBasex(968)=238 exch2_tBasey(968)=136 exch2_txGlobalo(968)=2279 exch2_tyGlobalo(968)=137 exch2_isWedge(968)=0 exch2_isNedge(968)=0 exch2_isEedge(968)=0 exch2_isSedge(968)=0 exch2_myFace(968)=5 exch2_mydNx(968)=510 exch2_mydNy(968)=510 exch2_nNeighbours(968)=4 exch2_neighbourId(1,968)=983 exch2_iLo(1,968)=0 exch2_iHi(1,968)=35 exch2_jLo(1,968)=35 exch2_jHi(1,968)=35 exch2_opposingSend(1,968)=2 exch2_pij(1,1,968)=1 exch2_pij(2,1,968)=0 exch2_pij(3,1,968)=0 exch2_pij(4,1,968)=1 exch2_oi(1,968)=0 exch2_oj(1,968)=0 exch2_neighbourId(2,968)=953 exch2_iLo(2,968)=0 exch2_iHi(2,968)=35 exch2_jLo(2,968)=0 exch2_jHi(2,968)=0 exch2_opposingSend(2,968)=1 exch2_pij(1,2,968)=1 exch2_pij(2,2,968)=0 exch2_pij(3,2,968)=0 exch2_pij(4,2,968)=1 exch2_oi(2,968)=0 exch2_oj(2,968)=0 exch2_neighbourId(3,968)=969 exch2_iLo(3,968)=35 exch2_iHi(3,968)=35 exch2_jLo(3,968)=0 exch2_jHi(3,968)=35 exch2_opposingSend(3,968)=4 exch2_pij(1,3,968)=1 exch2_pij(2,3,968)=0 exch2_pij(3,3,968)=0 exch2_pij(4,3,968)=1 exch2_oi(3,968)=0 exch2_oj(3,968)=0 exch2_neighbourId(4,968)=967 exch2_iLo(4,968)=0 exch2_iHi(4,968)=0 exch2_jLo(4,968)=0 exch2_jHi(4,968)=35 exch2_opposingSend(4,968)=3 exch2_pij(1,4,968)=1 exch2_pij(2,4,968)=0 exch2_pij(3,4,968)=0 exch2_pij(4,4,968)=1 exch2_oi(4,968)=0 exch2_oj(4,968)=0 RETURN END SUBROUTINE W2_E2SETUP_969 C Topology for tile 969 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(969)=34 exch2_tNy(969)=34 exch2_tBasex(969)=272 exch2_tBasey(969)=136 exch2_txGlobalo(969)=2313 exch2_tyGlobalo(969)=137 exch2_isWedge(969)=0 exch2_isNedge(969)=0 exch2_isEedge(969)=0 exch2_isSedge(969)=0 exch2_myFace(969)=5 exch2_mydNx(969)=510 exch2_mydNy(969)=510 exch2_nNeighbours(969)=4 exch2_neighbourId(1,969)=984 exch2_iLo(1,969)=0 exch2_iHi(1,969)=35 exch2_jLo(1,969)=35 exch2_jHi(1,969)=35 exch2_opposingSend(1,969)=2 exch2_pij(1,1,969)=1 exch2_pij(2,1,969)=0 exch2_pij(3,1,969)=0 exch2_pij(4,1,969)=1 exch2_oi(1,969)=0 exch2_oj(1,969)=0 exch2_neighbourId(2,969)=954 exch2_iLo(2,969)=0 exch2_iHi(2,969)=35 exch2_jLo(2,969)=0 exch2_jHi(2,969)=0 exch2_opposingSend(2,969)=1 exch2_pij(1,2,969)=1 exch2_pij(2,2,969)=0 exch2_pij(3,2,969)=0 exch2_pij(4,2,969)=1 exch2_oi(2,969)=0 exch2_oj(2,969)=0 exch2_neighbourId(3,969)=970 exch2_iLo(3,969)=35 exch2_iHi(3,969)=35 exch2_jLo(3,969)=0 exch2_jHi(3,969)=35 exch2_opposingSend(3,969)=4 exch2_pij(1,3,969)=1 exch2_pij(2,3,969)=0 exch2_pij(3,3,969)=0 exch2_pij(4,3,969)=1 exch2_oi(3,969)=0 exch2_oj(3,969)=0 exch2_neighbourId(4,969)=968 exch2_iLo(4,969)=0 exch2_iHi(4,969)=0 exch2_jLo(4,969)=0 exch2_jHi(4,969)=35 exch2_opposingSend(4,969)=3 exch2_pij(1,4,969)=1 exch2_pij(2,4,969)=0 exch2_pij(3,4,969)=0 exch2_pij(4,4,969)=1 exch2_oi(4,969)=0 exch2_oj(4,969)=0 RETURN END SUBROUTINE W2_E2SETUP_970 C Topology for tile 970 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(970)=34 exch2_tNy(970)=34 exch2_tBasex(970)=306 exch2_tBasey(970)=136 exch2_txGlobalo(970)=2347 exch2_tyGlobalo(970)=137 exch2_isWedge(970)=0 exch2_isNedge(970)=0 exch2_isEedge(970)=0 exch2_isSedge(970)=0 exch2_myFace(970)=5 exch2_mydNx(970)=510 exch2_mydNy(970)=510 exch2_nNeighbours(970)=4 exch2_neighbourId(1,970)=985 exch2_iLo(1,970)=0 exch2_iHi(1,970)=35 exch2_jLo(1,970)=35 exch2_jHi(1,970)=35 exch2_opposingSend(1,970)=2 exch2_pij(1,1,970)=1 exch2_pij(2,1,970)=0 exch2_pij(3,1,970)=0 exch2_pij(4,1,970)=1 exch2_oi(1,970)=0 exch2_oj(1,970)=0 exch2_neighbourId(2,970)=955 exch2_iLo(2,970)=0 exch2_iHi(2,970)=35 exch2_jLo(2,970)=0 exch2_jHi(2,970)=0 exch2_opposingSend(2,970)=1 exch2_pij(1,2,970)=1 exch2_pij(2,2,970)=0 exch2_pij(3,2,970)=0 exch2_pij(4,2,970)=1 exch2_oi(2,970)=0 exch2_oj(2,970)=0 exch2_neighbourId(3,970)=971 exch2_iLo(3,970)=35 exch2_iHi(3,970)=35 exch2_jLo(3,970)=0 exch2_jHi(3,970)=35 exch2_opposingSend(3,970)=4 exch2_pij(1,3,970)=1 exch2_pij(2,3,970)=0 exch2_pij(3,3,970)=0 exch2_pij(4,3,970)=1 exch2_oi(3,970)=0 exch2_oj(3,970)=0 exch2_neighbourId(4,970)=969 exch2_iLo(4,970)=0 exch2_iHi(4,970)=0 exch2_jLo(4,970)=0 exch2_jHi(4,970)=35 exch2_opposingSend(4,970)=3 exch2_pij(1,4,970)=1 exch2_pij(2,4,970)=0 exch2_pij(3,4,970)=0 exch2_pij(4,4,970)=1 exch2_oi(4,970)=0 exch2_oj(4,970)=0 RETURN END SUBROUTINE W2_E2SETUP_971 C Topology for tile 971 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(971)=34 exch2_tNy(971)=34 exch2_tBasex(971)=340 exch2_tBasey(971)=136 exch2_txGlobalo(971)=2381 exch2_tyGlobalo(971)=137 exch2_isWedge(971)=0 exch2_isNedge(971)=0 exch2_isEedge(971)=0 exch2_isSedge(971)=0 exch2_myFace(971)=5 exch2_mydNx(971)=510 exch2_mydNy(971)=510 exch2_nNeighbours(971)=4 exch2_neighbourId(1,971)=986 exch2_iLo(1,971)=0 exch2_iHi(1,971)=35 exch2_jLo(1,971)=35 exch2_jHi(1,971)=35 exch2_opposingSend(1,971)=2 exch2_pij(1,1,971)=1 exch2_pij(2,1,971)=0 exch2_pij(3,1,971)=0 exch2_pij(4,1,971)=1 exch2_oi(1,971)=0 exch2_oj(1,971)=0 exch2_neighbourId(2,971)=956 exch2_iLo(2,971)=0 exch2_iHi(2,971)=35 exch2_jLo(2,971)=0 exch2_jHi(2,971)=0 exch2_opposingSend(2,971)=1 exch2_pij(1,2,971)=1 exch2_pij(2,2,971)=0 exch2_pij(3,2,971)=0 exch2_pij(4,2,971)=1 exch2_oi(2,971)=0 exch2_oj(2,971)=0 exch2_neighbourId(3,971)=972 exch2_iLo(3,971)=35 exch2_iHi(3,971)=35 exch2_jLo(3,971)=0 exch2_jHi(3,971)=35 exch2_opposingSend(3,971)=4 exch2_pij(1,3,971)=1 exch2_pij(2,3,971)=0 exch2_pij(3,3,971)=0 exch2_pij(4,3,971)=1 exch2_oi(3,971)=0 exch2_oj(3,971)=0 exch2_neighbourId(4,971)=970 exch2_iLo(4,971)=0 exch2_iHi(4,971)=0 exch2_jLo(4,971)=0 exch2_jHi(4,971)=35 exch2_opposingSend(4,971)=3 exch2_pij(1,4,971)=1 exch2_pij(2,4,971)=0 exch2_pij(3,4,971)=0 exch2_pij(4,4,971)=1 exch2_oi(4,971)=0 exch2_oj(4,971)=0 RETURN END SUBROUTINE W2_E2SETUP_972 C Topology for tile 972 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(972)=34 exch2_tNy(972)=34 exch2_tBasex(972)=374 exch2_tBasey(972)=136 exch2_txGlobalo(972)=2415 exch2_tyGlobalo(972)=137 exch2_isWedge(972)=0 exch2_isNedge(972)=0 exch2_isEedge(972)=0 exch2_isSedge(972)=0 exch2_myFace(972)=5 exch2_mydNx(972)=510 exch2_mydNy(972)=510 exch2_nNeighbours(972)=4 exch2_neighbourId(1,972)=987 exch2_iLo(1,972)=0 exch2_iHi(1,972)=35 exch2_jLo(1,972)=35 exch2_jHi(1,972)=35 exch2_opposingSend(1,972)=2 exch2_pij(1,1,972)=1 exch2_pij(2,1,972)=0 exch2_pij(3,1,972)=0 exch2_pij(4,1,972)=1 exch2_oi(1,972)=0 exch2_oj(1,972)=0 exch2_neighbourId(2,972)=957 exch2_iLo(2,972)=0 exch2_iHi(2,972)=35 exch2_jLo(2,972)=0 exch2_jHi(2,972)=0 exch2_opposingSend(2,972)=1 exch2_pij(1,2,972)=1 exch2_pij(2,2,972)=0 exch2_pij(3,2,972)=0 exch2_pij(4,2,972)=1 exch2_oi(2,972)=0 exch2_oj(2,972)=0 exch2_neighbourId(3,972)=973 exch2_iLo(3,972)=35 exch2_iHi(3,972)=35 exch2_jLo(3,972)=0 exch2_jHi(3,972)=35 exch2_opposingSend(3,972)=4 exch2_pij(1,3,972)=1 exch2_pij(2,3,972)=0 exch2_pij(3,3,972)=0 exch2_pij(4,3,972)=1 exch2_oi(3,972)=0 exch2_oj(3,972)=0 exch2_neighbourId(4,972)=971 exch2_iLo(4,972)=0 exch2_iHi(4,972)=0 exch2_jLo(4,972)=0 exch2_jHi(4,972)=35 exch2_opposingSend(4,972)=3 exch2_pij(1,4,972)=1 exch2_pij(2,4,972)=0 exch2_pij(3,4,972)=0 exch2_pij(4,4,972)=1 exch2_oi(4,972)=0 exch2_oj(4,972)=0 RETURN END SUBROUTINE W2_E2SETUP_973 C Topology for tile 973 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(973)=34 exch2_tNy(973)=34 exch2_tBasex(973)=408 exch2_tBasey(973)=136 exch2_txGlobalo(973)=2449 exch2_tyGlobalo(973)=137 exch2_isWedge(973)=0 exch2_isNedge(973)=0 exch2_isEedge(973)=0 exch2_isSedge(973)=0 exch2_myFace(973)=5 exch2_mydNx(973)=510 exch2_mydNy(973)=510 exch2_nNeighbours(973)=4 exch2_neighbourId(1,973)=988 exch2_iLo(1,973)=0 exch2_iHi(1,973)=35 exch2_jLo(1,973)=35 exch2_jHi(1,973)=35 exch2_opposingSend(1,973)=2 exch2_pij(1,1,973)=1 exch2_pij(2,1,973)=0 exch2_pij(3,1,973)=0 exch2_pij(4,1,973)=1 exch2_oi(1,973)=0 exch2_oj(1,973)=0 exch2_neighbourId(2,973)=958 exch2_iLo(2,973)=0 exch2_iHi(2,973)=35 exch2_jLo(2,973)=0 exch2_jHi(2,973)=0 exch2_opposingSend(2,973)=1 exch2_pij(1,2,973)=1 exch2_pij(2,2,973)=0 exch2_pij(3,2,973)=0 exch2_pij(4,2,973)=1 exch2_oi(2,973)=0 exch2_oj(2,973)=0 exch2_neighbourId(3,973)=974 exch2_iLo(3,973)=35 exch2_iHi(3,973)=35 exch2_jLo(3,973)=0 exch2_jHi(3,973)=35 exch2_opposingSend(3,973)=4 exch2_pij(1,3,973)=1 exch2_pij(2,3,973)=0 exch2_pij(3,3,973)=0 exch2_pij(4,3,973)=1 exch2_oi(3,973)=0 exch2_oj(3,973)=0 exch2_neighbourId(4,973)=972 exch2_iLo(4,973)=0 exch2_iHi(4,973)=0 exch2_jLo(4,973)=0 exch2_jHi(4,973)=35 exch2_opposingSend(4,973)=3 exch2_pij(1,4,973)=1 exch2_pij(2,4,973)=0 exch2_pij(3,4,973)=0 exch2_pij(4,4,973)=1 exch2_oi(4,973)=0 exch2_oj(4,973)=0 RETURN END SUBROUTINE W2_E2SETUP_974 C Topology for tile 974 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(974)=34 exch2_tNy(974)=34 exch2_tBasex(974)=442 exch2_tBasey(974)=136 exch2_txGlobalo(974)=2483 exch2_tyGlobalo(974)=137 exch2_isWedge(974)=0 exch2_isNedge(974)=0 exch2_isEedge(974)=0 exch2_isSedge(974)=0 exch2_myFace(974)=5 exch2_mydNx(974)=510 exch2_mydNy(974)=510 exch2_nNeighbours(974)=4 exch2_neighbourId(1,974)=989 exch2_iLo(1,974)=0 exch2_iHi(1,974)=35 exch2_jLo(1,974)=35 exch2_jHi(1,974)=35 exch2_opposingSend(1,974)=2 exch2_pij(1,1,974)=1 exch2_pij(2,1,974)=0 exch2_pij(3,1,974)=0 exch2_pij(4,1,974)=1 exch2_oi(1,974)=0 exch2_oj(1,974)=0 exch2_neighbourId(2,974)=959 exch2_iLo(2,974)=0 exch2_iHi(2,974)=35 exch2_jLo(2,974)=0 exch2_jHi(2,974)=0 exch2_opposingSend(2,974)=1 exch2_pij(1,2,974)=1 exch2_pij(2,2,974)=0 exch2_pij(3,2,974)=0 exch2_pij(4,2,974)=1 exch2_oi(2,974)=0 exch2_oj(2,974)=0 exch2_neighbourId(3,974)=975 exch2_iLo(3,974)=35 exch2_iHi(3,974)=35 exch2_jLo(3,974)=0 exch2_jHi(3,974)=35 exch2_opposingSend(3,974)=4 exch2_pij(1,3,974)=1 exch2_pij(2,3,974)=0 exch2_pij(3,3,974)=0 exch2_pij(4,3,974)=1 exch2_oi(3,974)=0 exch2_oj(3,974)=0 exch2_neighbourId(4,974)=973 exch2_iLo(4,974)=0 exch2_iHi(4,974)=0 exch2_jLo(4,974)=0 exch2_jHi(4,974)=35 exch2_opposingSend(4,974)=3 exch2_pij(1,4,974)=1 exch2_pij(2,4,974)=0 exch2_pij(3,4,974)=0 exch2_pij(4,4,974)=1 exch2_oi(4,974)=0 exch2_oj(4,974)=0 RETURN END SUBROUTINE W2_E2SETUP_975 C Topology for tile 975 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(975)=34 exch2_tNy(975)=34 exch2_tBasex(975)=476 exch2_tBasey(975)=136 exch2_txGlobalo(975)=2517 exch2_tyGlobalo(975)=137 exch2_isWedge(975)=0 exch2_isNedge(975)=0 exch2_isEedge(975)=1 exch2_isSedge(975)=0 exch2_myFace(975)=5 exch2_mydNx(975)=510 exch2_mydNy(975)=510 exch2_nNeighbours(975)=4 exch2_neighbourId(1,975)=990 exch2_iLo(1,975)=0 exch2_iHi(1,975)=35 exch2_jLo(1,975)=35 exch2_jHi(1,975)=35 exch2_opposingSend(1,975)=2 exch2_pij(1,1,975)=1 exch2_pij(2,1,975)=0 exch2_pij(3,1,975)=0 exch2_pij(4,1,975)=1 exch2_oi(1,975)=0 exch2_oj(1,975)=0 exch2_neighbourId(2,975)=960 exch2_iLo(2,975)=0 exch2_iHi(2,975)=35 exch2_jLo(2,975)=0 exch2_jHi(2,975)=0 exch2_opposingSend(2,975)=1 exch2_pij(1,2,975)=1 exch2_pij(2,2,975)=0 exch2_pij(3,2,975)=0 exch2_pij(4,2,975)=1 exch2_oi(2,975)=0 exch2_oj(2,975)=0 exch2_neighbourId(3,975)=1186 exch2_iLo(3,975)=35 exch2_iHi(3,975)=35 exch2_jLo(3,975)=0 exch2_jHi(3,975)=35 exch2_opposingSend(3,975)=4 exch2_pij(1,3,975)=1 exch2_pij(2,3,975)=0 exch2_pij(3,3,975)=0 exch2_pij(4,3,975)=1 exch2_oi(3,975)=510 exch2_oj(3,975)=0 exch2_neighbourId(4,975)=974 exch2_iLo(4,975)=0 exch2_iHi(4,975)=0 exch2_jLo(4,975)=0 exch2_jHi(4,975)=35 exch2_opposingSend(4,975)=3 exch2_pij(1,4,975)=1 exch2_pij(2,4,975)=0 exch2_pij(3,4,975)=0 exch2_pij(4,4,975)=1 exch2_oi(4,975)=0 exch2_oj(4,975)=0 RETURN END SUBROUTINE W2_E2SETUP_976 C Topology for tile 976 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(976)=34 exch2_tNy(976)=34 exch2_tBasex(976)=0 exch2_tBasey(976)=170 exch2_txGlobalo(976)=2041 exch2_tyGlobalo(976)=171 exch2_isWedge(976)=1 exch2_isNedge(976)=0 exch2_isEedge(976)=0 exch2_isSedge(976)=0 exch2_myFace(976)=5 exch2_mydNx(976)=510 exch2_mydNy(976)=510 exch2_nNeighbours(976)=4 exch2_neighbourId(1,976)=991 exch2_iLo(1,976)=0 exch2_iHi(1,976)=35 exch2_jLo(1,976)=35 exch2_jHi(1,976)=35 exch2_opposingSend(1,976)=2 exch2_pij(1,1,976)=1 exch2_pij(2,1,976)=0 exch2_pij(3,1,976)=0 exch2_pij(4,1,976)=1 exch2_oi(1,976)=0 exch2_oj(1,976)=0 exch2_neighbourId(2,976)=961 exch2_iLo(2,976)=0 exch2_iHi(2,976)=35 exch2_jLo(2,976)=0 exch2_jHi(2,976)=0 exch2_opposingSend(2,976)=1 exch2_pij(1,2,976)=1 exch2_pij(2,2,976)=0 exch2_pij(3,2,976)=0 exch2_pij(4,2,976)=1 exch2_oi(2,976)=0 exch2_oj(2,976)=0 exch2_neighbourId(3,976)=977 exch2_iLo(3,976)=35 exch2_iHi(3,976)=35 exch2_jLo(3,976)=0 exch2_jHi(3,976)=35 exch2_opposingSend(3,976)=4 exch2_pij(1,3,976)=1 exch2_pij(2,3,976)=0 exch2_pij(3,3,976)=0 exch2_pij(4,3,976)=1 exch2_oi(3,976)=0 exch2_oj(3,976)=0 exch2_neighbourId(4,976)=670 exch2_iLo(4,976)=0 exch2_iHi(4,976)=0 exch2_jLo(4,976)=0 exch2_jHi(4,976)=35 exch2_opposingSend(4,976)=1 exch2_pij(1,4,976)=0 exch2_pij(2,4,976)=1 exch2_pij(3,4,976)=-1 exch2_pij(4,4,976)=0 exch2_oi(4,976)=-510 exch2_oj(4,976)=511 RETURN END SUBROUTINE W2_E2SETUP_977 C Topology for tile 977 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(977)=34 exch2_tNy(977)=34 exch2_tBasex(977)=34 exch2_tBasey(977)=170 exch2_txGlobalo(977)=2075 exch2_tyGlobalo(977)=171 exch2_isWedge(977)=0 exch2_isNedge(977)=0 exch2_isEedge(977)=0 exch2_isSedge(977)=0 exch2_myFace(977)=5 exch2_mydNx(977)=510 exch2_mydNy(977)=510 exch2_nNeighbours(977)=4 exch2_neighbourId(1,977)=992 exch2_iLo(1,977)=0 exch2_iHi(1,977)=35 exch2_jLo(1,977)=35 exch2_jHi(1,977)=35 exch2_opposingSend(1,977)=2 exch2_pij(1,1,977)=1 exch2_pij(2,1,977)=0 exch2_pij(3,1,977)=0 exch2_pij(4,1,977)=1 exch2_oi(1,977)=0 exch2_oj(1,977)=0 exch2_neighbourId(2,977)=962 exch2_iLo(2,977)=0 exch2_iHi(2,977)=35 exch2_jLo(2,977)=0 exch2_jHi(2,977)=0 exch2_opposingSend(2,977)=1 exch2_pij(1,2,977)=1 exch2_pij(2,2,977)=0 exch2_pij(3,2,977)=0 exch2_pij(4,2,977)=1 exch2_oi(2,977)=0 exch2_oj(2,977)=0 exch2_neighbourId(3,977)=978 exch2_iLo(3,977)=35 exch2_iHi(3,977)=35 exch2_jLo(3,977)=0 exch2_jHi(3,977)=35 exch2_opposingSend(3,977)=4 exch2_pij(1,3,977)=1 exch2_pij(2,3,977)=0 exch2_pij(3,3,977)=0 exch2_pij(4,3,977)=1 exch2_oi(3,977)=0 exch2_oj(3,977)=0 exch2_neighbourId(4,977)=976 exch2_iLo(4,977)=0 exch2_iHi(4,977)=0 exch2_jLo(4,977)=0 exch2_jHi(4,977)=35 exch2_opposingSend(4,977)=3 exch2_pij(1,4,977)=1 exch2_pij(2,4,977)=0 exch2_pij(3,4,977)=0 exch2_pij(4,4,977)=1 exch2_oi(4,977)=0 exch2_oj(4,977)=0 RETURN END SUBROUTINE W2_E2SETUP_978 C Topology for tile 978 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(978)=34 exch2_tNy(978)=34 exch2_tBasex(978)=68 exch2_tBasey(978)=170 exch2_txGlobalo(978)=2109 exch2_tyGlobalo(978)=171 exch2_isWedge(978)=0 exch2_isNedge(978)=0 exch2_isEedge(978)=0 exch2_isSedge(978)=0 exch2_myFace(978)=5 exch2_mydNx(978)=510 exch2_mydNy(978)=510 exch2_nNeighbours(978)=4 exch2_neighbourId(1,978)=993 exch2_iLo(1,978)=0 exch2_iHi(1,978)=35 exch2_jLo(1,978)=35 exch2_jHi(1,978)=35 exch2_opposingSend(1,978)=2 exch2_pij(1,1,978)=1 exch2_pij(2,1,978)=0 exch2_pij(3,1,978)=0 exch2_pij(4,1,978)=1 exch2_oi(1,978)=0 exch2_oj(1,978)=0 exch2_neighbourId(2,978)=963 exch2_iLo(2,978)=0 exch2_iHi(2,978)=35 exch2_jLo(2,978)=0 exch2_jHi(2,978)=0 exch2_opposingSend(2,978)=1 exch2_pij(1,2,978)=1 exch2_pij(2,2,978)=0 exch2_pij(3,2,978)=0 exch2_pij(4,2,978)=1 exch2_oi(2,978)=0 exch2_oj(2,978)=0 exch2_neighbourId(3,978)=979 exch2_iLo(3,978)=35 exch2_iHi(3,978)=35 exch2_jLo(3,978)=0 exch2_jHi(3,978)=35 exch2_opposingSend(3,978)=4 exch2_pij(1,3,978)=1 exch2_pij(2,3,978)=0 exch2_pij(3,3,978)=0 exch2_pij(4,3,978)=1 exch2_oi(3,978)=0 exch2_oj(3,978)=0 exch2_neighbourId(4,978)=977 exch2_iLo(4,978)=0 exch2_iHi(4,978)=0 exch2_jLo(4,978)=0 exch2_jHi(4,978)=35 exch2_opposingSend(4,978)=3 exch2_pij(1,4,978)=1 exch2_pij(2,4,978)=0 exch2_pij(3,4,978)=0 exch2_pij(4,4,978)=1 exch2_oi(4,978)=0 exch2_oj(4,978)=0 RETURN END SUBROUTINE W2_E2SETUP_979 C Topology for tile 979 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(979)=34 exch2_tNy(979)=34 exch2_tBasex(979)=102 exch2_tBasey(979)=170 exch2_txGlobalo(979)=2143 exch2_tyGlobalo(979)=171 exch2_isWedge(979)=0 exch2_isNedge(979)=0 exch2_isEedge(979)=0 exch2_isSedge(979)=0 exch2_myFace(979)=5 exch2_mydNx(979)=510 exch2_mydNy(979)=510 exch2_nNeighbours(979)=4 exch2_neighbourId(1,979)=994 exch2_iLo(1,979)=0 exch2_iHi(1,979)=35 exch2_jLo(1,979)=35 exch2_jHi(1,979)=35 exch2_opposingSend(1,979)=2 exch2_pij(1,1,979)=1 exch2_pij(2,1,979)=0 exch2_pij(3,1,979)=0 exch2_pij(4,1,979)=1 exch2_oi(1,979)=0 exch2_oj(1,979)=0 exch2_neighbourId(2,979)=964 exch2_iLo(2,979)=0 exch2_iHi(2,979)=35 exch2_jLo(2,979)=0 exch2_jHi(2,979)=0 exch2_opposingSend(2,979)=1 exch2_pij(1,2,979)=1 exch2_pij(2,2,979)=0 exch2_pij(3,2,979)=0 exch2_pij(4,2,979)=1 exch2_oi(2,979)=0 exch2_oj(2,979)=0 exch2_neighbourId(3,979)=980 exch2_iLo(3,979)=35 exch2_iHi(3,979)=35 exch2_jLo(3,979)=0 exch2_jHi(3,979)=35 exch2_opposingSend(3,979)=4 exch2_pij(1,3,979)=1 exch2_pij(2,3,979)=0 exch2_pij(3,3,979)=0 exch2_pij(4,3,979)=1 exch2_oi(3,979)=0 exch2_oj(3,979)=0 exch2_neighbourId(4,979)=978 exch2_iLo(4,979)=0 exch2_iHi(4,979)=0 exch2_jLo(4,979)=0 exch2_jHi(4,979)=35 exch2_opposingSend(4,979)=3 exch2_pij(1,4,979)=1 exch2_pij(2,4,979)=0 exch2_pij(3,4,979)=0 exch2_pij(4,4,979)=1 exch2_oi(4,979)=0 exch2_oj(4,979)=0 RETURN END SUBROUTINE W2_E2SETUP_980 C Topology for tile 980 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(980)=34 exch2_tNy(980)=34 exch2_tBasex(980)=136 exch2_tBasey(980)=170 exch2_txGlobalo(980)=2177 exch2_tyGlobalo(980)=171 exch2_isWedge(980)=0 exch2_isNedge(980)=0 exch2_isEedge(980)=0 exch2_isSedge(980)=0 exch2_myFace(980)=5 exch2_mydNx(980)=510 exch2_mydNy(980)=510 exch2_nNeighbours(980)=4 exch2_neighbourId(1,980)=995 exch2_iLo(1,980)=0 exch2_iHi(1,980)=35 exch2_jLo(1,980)=35 exch2_jHi(1,980)=35 exch2_opposingSend(1,980)=2 exch2_pij(1,1,980)=1 exch2_pij(2,1,980)=0 exch2_pij(3,1,980)=0 exch2_pij(4,1,980)=1 exch2_oi(1,980)=0 exch2_oj(1,980)=0 exch2_neighbourId(2,980)=965 exch2_iLo(2,980)=0 exch2_iHi(2,980)=35 exch2_jLo(2,980)=0 exch2_jHi(2,980)=0 exch2_opposingSend(2,980)=1 exch2_pij(1,2,980)=1 exch2_pij(2,2,980)=0 exch2_pij(3,2,980)=0 exch2_pij(4,2,980)=1 exch2_oi(2,980)=0 exch2_oj(2,980)=0 exch2_neighbourId(3,980)=981 exch2_iLo(3,980)=35 exch2_iHi(3,980)=35 exch2_jLo(3,980)=0 exch2_jHi(3,980)=35 exch2_opposingSend(3,980)=4 exch2_pij(1,3,980)=1 exch2_pij(2,3,980)=0 exch2_pij(3,3,980)=0 exch2_pij(4,3,980)=1 exch2_oi(3,980)=0 exch2_oj(3,980)=0 exch2_neighbourId(4,980)=979 exch2_iLo(4,980)=0 exch2_iHi(4,980)=0 exch2_jLo(4,980)=0 exch2_jHi(4,980)=35 exch2_opposingSend(4,980)=3 exch2_pij(1,4,980)=1 exch2_pij(2,4,980)=0 exch2_pij(3,4,980)=0 exch2_pij(4,4,980)=1 exch2_oi(4,980)=0 exch2_oj(4,980)=0 RETURN END SUBROUTINE W2_E2SETUP_981 C Topology for tile 981 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(981)=34 exch2_tNy(981)=34 exch2_tBasex(981)=170 exch2_tBasey(981)=170 exch2_txGlobalo(981)=2211 exch2_tyGlobalo(981)=171 exch2_isWedge(981)=0 exch2_isNedge(981)=0 exch2_isEedge(981)=0 exch2_isSedge(981)=0 exch2_myFace(981)=5 exch2_mydNx(981)=510 exch2_mydNy(981)=510 exch2_nNeighbours(981)=4 exch2_neighbourId(1,981)=996 exch2_iLo(1,981)=0 exch2_iHi(1,981)=35 exch2_jLo(1,981)=35 exch2_jHi(1,981)=35 exch2_opposingSend(1,981)=2 exch2_pij(1,1,981)=1 exch2_pij(2,1,981)=0 exch2_pij(3,1,981)=0 exch2_pij(4,1,981)=1 exch2_oi(1,981)=0 exch2_oj(1,981)=0 exch2_neighbourId(2,981)=966 exch2_iLo(2,981)=0 exch2_iHi(2,981)=35 exch2_jLo(2,981)=0 exch2_jHi(2,981)=0 exch2_opposingSend(2,981)=1 exch2_pij(1,2,981)=1 exch2_pij(2,2,981)=0 exch2_pij(3,2,981)=0 exch2_pij(4,2,981)=1 exch2_oi(2,981)=0 exch2_oj(2,981)=0 exch2_neighbourId(3,981)=982 exch2_iLo(3,981)=35 exch2_iHi(3,981)=35 exch2_jLo(3,981)=0 exch2_jHi(3,981)=35 exch2_opposingSend(3,981)=4 exch2_pij(1,3,981)=1 exch2_pij(2,3,981)=0 exch2_pij(3,3,981)=0 exch2_pij(4,3,981)=1 exch2_oi(3,981)=0 exch2_oj(3,981)=0 exch2_neighbourId(4,981)=980 exch2_iLo(4,981)=0 exch2_iHi(4,981)=0 exch2_jLo(4,981)=0 exch2_jHi(4,981)=35 exch2_opposingSend(4,981)=3 exch2_pij(1,4,981)=1 exch2_pij(2,4,981)=0 exch2_pij(3,4,981)=0 exch2_pij(4,4,981)=1 exch2_oi(4,981)=0 exch2_oj(4,981)=0 RETURN END SUBROUTINE W2_E2SETUP_982 C Topology for tile 982 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(982)=34 exch2_tNy(982)=34 exch2_tBasex(982)=204 exch2_tBasey(982)=170 exch2_txGlobalo(982)=2245 exch2_tyGlobalo(982)=171 exch2_isWedge(982)=0 exch2_isNedge(982)=0 exch2_isEedge(982)=0 exch2_isSedge(982)=0 exch2_myFace(982)=5 exch2_mydNx(982)=510 exch2_mydNy(982)=510 exch2_nNeighbours(982)=4 exch2_neighbourId(1,982)=997 exch2_iLo(1,982)=0 exch2_iHi(1,982)=35 exch2_jLo(1,982)=35 exch2_jHi(1,982)=35 exch2_opposingSend(1,982)=2 exch2_pij(1,1,982)=1 exch2_pij(2,1,982)=0 exch2_pij(3,1,982)=0 exch2_pij(4,1,982)=1 exch2_oi(1,982)=0 exch2_oj(1,982)=0 exch2_neighbourId(2,982)=967 exch2_iLo(2,982)=0 exch2_iHi(2,982)=35 exch2_jLo(2,982)=0 exch2_jHi(2,982)=0 exch2_opposingSend(2,982)=1 exch2_pij(1,2,982)=1 exch2_pij(2,2,982)=0 exch2_pij(3,2,982)=0 exch2_pij(4,2,982)=1 exch2_oi(2,982)=0 exch2_oj(2,982)=0 exch2_neighbourId(3,982)=983 exch2_iLo(3,982)=35 exch2_iHi(3,982)=35 exch2_jLo(3,982)=0 exch2_jHi(3,982)=35 exch2_opposingSend(3,982)=4 exch2_pij(1,3,982)=1 exch2_pij(2,3,982)=0 exch2_pij(3,3,982)=0 exch2_pij(4,3,982)=1 exch2_oi(3,982)=0 exch2_oj(3,982)=0 exch2_neighbourId(4,982)=981 exch2_iLo(4,982)=0 exch2_iHi(4,982)=0 exch2_jLo(4,982)=0 exch2_jHi(4,982)=35 exch2_opposingSend(4,982)=3 exch2_pij(1,4,982)=1 exch2_pij(2,4,982)=0 exch2_pij(3,4,982)=0 exch2_pij(4,4,982)=1 exch2_oi(4,982)=0 exch2_oj(4,982)=0 RETURN END SUBROUTINE W2_E2SETUP_983 C Topology for tile 983 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(983)=34 exch2_tNy(983)=34 exch2_tBasex(983)=238 exch2_tBasey(983)=170 exch2_txGlobalo(983)=2279 exch2_tyGlobalo(983)=171 exch2_isWedge(983)=0 exch2_isNedge(983)=0 exch2_isEedge(983)=0 exch2_isSedge(983)=0 exch2_myFace(983)=5 exch2_mydNx(983)=510 exch2_mydNy(983)=510 exch2_nNeighbours(983)=4 exch2_neighbourId(1,983)=998 exch2_iLo(1,983)=0 exch2_iHi(1,983)=35 exch2_jLo(1,983)=35 exch2_jHi(1,983)=35 exch2_opposingSend(1,983)=2 exch2_pij(1,1,983)=1 exch2_pij(2,1,983)=0 exch2_pij(3,1,983)=0 exch2_pij(4,1,983)=1 exch2_oi(1,983)=0 exch2_oj(1,983)=0 exch2_neighbourId(2,983)=968 exch2_iLo(2,983)=0 exch2_iHi(2,983)=35 exch2_jLo(2,983)=0 exch2_jHi(2,983)=0 exch2_opposingSend(2,983)=1 exch2_pij(1,2,983)=1 exch2_pij(2,2,983)=0 exch2_pij(3,2,983)=0 exch2_pij(4,2,983)=1 exch2_oi(2,983)=0 exch2_oj(2,983)=0 exch2_neighbourId(3,983)=984 exch2_iLo(3,983)=35 exch2_iHi(3,983)=35 exch2_jLo(3,983)=0 exch2_jHi(3,983)=35 exch2_opposingSend(3,983)=4 exch2_pij(1,3,983)=1 exch2_pij(2,3,983)=0 exch2_pij(3,3,983)=0 exch2_pij(4,3,983)=1 exch2_oi(3,983)=0 exch2_oj(3,983)=0 exch2_neighbourId(4,983)=982 exch2_iLo(4,983)=0 exch2_iHi(4,983)=0 exch2_jLo(4,983)=0 exch2_jHi(4,983)=35 exch2_opposingSend(4,983)=3 exch2_pij(1,4,983)=1 exch2_pij(2,4,983)=0 exch2_pij(3,4,983)=0 exch2_pij(4,4,983)=1 exch2_oi(4,983)=0 exch2_oj(4,983)=0 RETURN END SUBROUTINE W2_E2SETUP_984 C Topology for tile 984 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(984)=34 exch2_tNy(984)=34 exch2_tBasex(984)=272 exch2_tBasey(984)=170 exch2_txGlobalo(984)=2313 exch2_tyGlobalo(984)=171 exch2_isWedge(984)=0 exch2_isNedge(984)=0 exch2_isEedge(984)=0 exch2_isSedge(984)=0 exch2_myFace(984)=5 exch2_mydNx(984)=510 exch2_mydNy(984)=510 exch2_nNeighbours(984)=4 exch2_neighbourId(1,984)=999 exch2_iLo(1,984)=0 exch2_iHi(1,984)=35 exch2_jLo(1,984)=35 exch2_jHi(1,984)=35 exch2_opposingSend(1,984)=2 exch2_pij(1,1,984)=1 exch2_pij(2,1,984)=0 exch2_pij(3,1,984)=0 exch2_pij(4,1,984)=1 exch2_oi(1,984)=0 exch2_oj(1,984)=0 exch2_neighbourId(2,984)=969 exch2_iLo(2,984)=0 exch2_iHi(2,984)=35 exch2_jLo(2,984)=0 exch2_jHi(2,984)=0 exch2_opposingSend(2,984)=1 exch2_pij(1,2,984)=1 exch2_pij(2,2,984)=0 exch2_pij(3,2,984)=0 exch2_pij(4,2,984)=1 exch2_oi(2,984)=0 exch2_oj(2,984)=0 exch2_neighbourId(3,984)=985 exch2_iLo(3,984)=35 exch2_iHi(3,984)=35 exch2_jLo(3,984)=0 exch2_jHi(3,984)=35 exch2_opposingSend(3,984)=4 exch2_pij(1,3,984)=1 exch2_pij(2,3,984)=0 exch2_pij(3,3,984)=0 exch2_pij(4,3,984)=1 exch2_oi(3,984)=0 exch2_oj(3,984)=0 exch2_neighbourId(4,984)=983 exch2_iLo(4,984)=0 exch2_iHi(4,984)=0 exch2_jLo(4,984)=0 exch2_jHi(4,984)=35 exch2_opposingSend(4,984)=3 exch2_pij(1,4,984)=1 exch2_pij(2,4,984)=0 exch2_pij(3,4,984)=0 exch2_pij(4,4,984)=1 exch2_oi(4,984)=0 exch2_oj(4,984)=0 RETURN END SUBROUTINE W2_E2SETUP_985 C Topology for tile 985 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(985)=34 exch2_tNy(985)=34 exch2_tBasex(985)=306 exch2_tBasey(985)=170 exch2_txGlobalo(985)=2347 exch2_tyGlobalo(985)=171 exch2_isWedge(985)=0 exch2_isNedge(985)=0 exch2_isEedge(985)=0 exch2_isSedge(985)=0 exch2_myFace(985)=5 exch2_mydNx(985)=510 exch2_mydNy(985)=510 exch2_nNeighbours(985)=4 exch2_neighbourId(1,985)=1000 exch2_iLo(1,985)=0 exch2_iHi(1,985)=35 exch2_jLo(1,985)=35 exch2_jHi(1,985)=35 exch2_opposingSend(1,985)=2 exch2_pij(1,1,985)=1 exch2_pij(2,1,985)=0 exch2_pij(3,1,985)=0 exch2_pij(4,1,985)=1 exch2_oi(1,985)=0 exch2_oj(1,985)=0 exch2_neighbourId(2,985)=970 exch2_iLo(2,985)=0 exch2_iHi(2,985)=35 exch2_jLo(2,985)=0 exch2_jHi(2,985)=0 exch2_opposingSend(2,985)=1 exch2_pij(1,2,985)=1 exch2_pij(2,2,985)=0 exch2_pij(3,2,985)=0 exch2_pij(4,2,985)=1 exch2_oi(2,985)=0 exch2_oj(2,985)=0 exch2_neighbourId(3,985)=986 exch2_iLo(3,985)=35 exch2_iHi(3,985)=35 exch2_jLo(3,985)=0 exch2_jHi(3,985)=35 exch2_opposingSend(3,985)=4 exch2_pij(1,3,985)=1 exch2_pij(2,3,985)=0 exch2_pij(3,3,985)=0 exch2_pij(4,3,985)=1 exch2_oi(3,985)=0 exch2_oj(3,985)=0 exch2_neighbourId(4,985)=984 exch2_iLo(4,985)=0 exch2_iHi(4,985)=0 exch2_jLo(4,985)=0 exch2_jHi(4,985)=35 exch2_opposingSend(4,985)=3 exch2_pij(1,4,985)=1 exch2_pij(2,4,985)=0 exch2_pij(3,4,985)=0 exch2_pij(4,4,985)=1 exch2_oi(4,985)=0 exch2_oj(4,985)=0 RETURN END SUBROUTINE W2_E2SETUP_986 C Topology for tile 986 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(986)=34 exch2_tNy(986)=34 exch2_tBasex(986)=340 exch2_tBasey(986)=170 exch2_txGlobalo(986)=2381 exch2_tyGlobalo(986)=171 exch2_isWedge(986)=0 exch2_isNedge(986)=0 exch2_isEedge(986)=0 exch2_isSedge(986)=0 exch2_myFace(986)=5 exch2_mydNx(986)=510 exch2_mydNy(986)=510 exch2_nNeighbours(986)=4 exch2_neighbourId(1,986)=1001 exch2_iLo(1,986)=0 exch2_iHi(1,986)=35 exch2_jLo(1,986)=35 exch2_jHi(1,986)=35 exch2_opposingSend(1,986)=2 exch2_pij(1,1,986)=1 exch2_pij(2,1,986)=0 exch2_pij(3,1,986)=0 exch2_pij(4,1,986)=1 exch2_oi(1,986)=0 exch2_oj(1,986)=0 exch2_neighbourId(2,986)=971 exch2_iLo(2,986)=0 exch2_iHi(2,986)=35 exch2_jLo(2,986)=0 exch2_jHi(2,986)=0 exch2_opposingSend(2,986)=1 exch2_pij(1,2,986)=1 exch2_pij(2,2,986)=0 exch2_pij(3,2,986)=0 exch2_pij(4,2,986)=1 exch2_oi(2,986)=0 exch2_oj(2,986)=0 exch2_neighbourId(3,986)=987 exch2_iLo(3,986)=35 exch2_iHi(3,986)=35 exch2_jLo(3,986)=0 exch2_jHi(3,986)=35 exch2_opposingSend(3,986)=4 exch2_pij(1,3,986)=1 exch2_pij(2,3,986)=0 exch2_pij(3,3,986)=0 exch2_pij(4,3,986)=1 exch2_oi(3,986)=0 exch2_oj(3,986)=0 exch2_neighbourId(4,986)=985 exch2_iLo(4,986)=0 exch2_iHi(4,986)=0 exch2_jLo(4,986)=0 exch2_jHi(4,986)=35 exch2_opposingSend(4,986)=3 exch2_pij(1,4,986)=1 exch2_pij(2,4,986)=0 exch2_pij(3,4,986)=0 exch2_pij(4,4,986)=1 exch2_oi(4,986)=0 exch2_oj(4,986)=0 RETURN END SUBROUTINE W2_E2SETUP_987 C Topology for tile 987 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(987)=34 exch2_tNy(987)=34 exch2_tBasex(987)=374 exch2_tBasey(987)=170 exch2_txGlobalo(987)=2415 exch2_tyGlobalo(987)=171 exch2_isWedge(987)=0 exch2_isNedge(987)=0 exch2_isEedge(987)=0 exch2_isSedge(987)=0 exch2_myFace(987)=5 exch2_mydNx(987)=510 exch2_mydNy(987)=510 exch2_nNeighbours(987)=4 exch2_neighbourId(1,987)=1002 exch2_iLo(1,987)=0 exch2_iHi(1,987)=35 exch2_jLo(1,987)=35 exch2_jHi(1,987)=35 exch2_opposingSend(1,987)=2 exch2_pij(1,1,987)=1 exch2_pij(2,1,987)=0 exch2_pij(3,1,987)=0 exch2_pij(4,1,987)=1 exch2_oi(1,987)=0 exch2_oj(1,987)=0 exch2_neighbourId(2,987)=972 exch2_iLo(2,987)=0 exch2_iHi(2,987)=35 exch2_jLo(2,987)=0 exch2_jHi(2,987)=0 exch2_opposingSend(2,987)=1 exch2_pij(1,2,987)=1 exch2_pij(2,2,987)=0 exch2_pij(3,2,987)=0 exch2_pij(4,2,987)=1 exch2_oi(2,987)=0 exch2_oj(2,987)=0 exch2_neighbourId(3,987)=988 exch2_iLo(3,987)=35 exch2_iHi(3,987)=35 exch2_jLo(3,987)=0 exch2_jHi(3,987)=35 exch2_opposingSend(3,987)=4 exch2_pij(1,3,987)=1 exch2_pij(2,3,987)=0 exch2_pij(3,3,987)=0 exch2_pij(4,3,987)=1 exch2_oi(3,987)=0 exch2_oj(3,987)=0 exch2_neighbourId(4,987)=986 exch2_iLo(4,987)=0 exch2_iHi(4,987)=0 exch2_jLo(4,987)=0 exch2_jHi(4,987)=35 exch2_opposingSend(4,987)=3 exch2_pij(1,4,987)=1 exch2_pij(2,4,987)=0 exch2_pij(3,4,987)=0 exch2_pij(4,4,987)=1 exch2_oi(4,987)=0 exch2_oj(4,987)=0 RETURN END SUBROUTINE W2_E2SETUP_988 C Topology for tile 988 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(988)=34 exch2_tNy(988)=34 exch2_tBasex(988)=408 exch2_tBasey(988)=170 exch2_txGlobalo(988)=2449 exch2_tyGlobalo(988)=171 exch2_isWedge(988)=0 exch2_isNedge(988)=0 exch2_isEedge(988)=0 exch2_isSedge(988)=0 exch2_myFace(988)=5 exch2_mydNx(988)=510 exch2_mydNy(988)=510 exch2_nNeighbours(988)=4 exch2_neighbourId(1,988)=1003 exch2_iLo(1,988)=0 exch2_iHi(1,988)=35 exch2_jLo(1,988)=35 exch2_jHi(1,988)=35 exch2_opposingSend(1,988)=2 exch2_pij(1,1,988)=1 exch2_pij(2,1,988)=0 exch2_pij(3,1,988)=0 exch2_pij(4,1,988)=1 exch2_oi(1,988)=0 exch2_oj(1,988)=0 exch2_neighbourId(2,988)=973 exch2_iLo(2,988)=0 exch2_iHi(2,988)=35 exch2_jLo(2,988)=0 exch2_jHi(2,988)=0 exch2_opposingSend(2,988)=1 exch2_pij(1,2,988)=1 exch2_pij(2,2,988)=0 exch2_pij(3,2,988)=0 exch2_pij(4,2,988)=1 exch2_oi(2,988)=0 exch2_oj(2,988)=0 exch2_neighbourId(3,988)=989 exch2_iLo(3,988)=35 exch2_iHi(3,988)=35 exch2_jLo(3,988)=0 exch2_jHi(3,988)=35 exch2_opposingSend(3,988)=4 exch2_pij(1,3,988)=1 exch2_pij(2,3,988)=0 exch2_pij(3,3,988)=0 exch2_pij(4,3,988)=1 exch2_oi(3,988)=0 exch2_oj(3,988)=0 exch2_neighbourId(4,988)=987 exch2_iLo(4,988)=0 exch2_iHi(4,988)=0 exch2_jLo(4,988)=0 exch2_jHi(4,988)=35 exch2_opposingSend(4,988)=3 exch2_pij(1,4,988)=1 exch2_pij(2,4,988)=0 exch2_pij(3,4,988)=0 exch2_pij(4,4,988)=1 exch2_oi(4,988)=0 exch2_oj(4,988)=0 RETURN END SUBROUTINE W2_E2SETUP_989 C Topology for tile 989 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(989)=34 exch2_tNy(989)=34 exch2_tBasex(989)=442 exch2_tBasey(989)=170 exch2_txGlobalo(989)=2483 exch2_tyGlobalo(989)=171 exch2_isWedge(989)=0 exch2_isNedge(989)=0 exch2_isEedge(989)=0 exch2_isSedge(989)=0 exch2_myFace(989)=5 exch2_mydNx(989)=510 exch2_mydNy(989)=510 exch2_nNeighbours(989)=4 exch2_neighbourId(1,989)=1004 exch2_iLo(1,989)=0 exch2_iHi(1,989)=35 exch2_jLo(1,989)=35 exch2_jHi(1,989)=35 exch2_opposingSend(1,989)=2 exch2_pij(1,1,989)=1 exch2_pij(2,1,989)=0 exch2_pij(3,1,989)=0 exch2_pij(4,1,989)=1 exch2_oi(1,989)=0 exch2_oj(1,989)=0 exch2_neighbourId(2,989)=974 exch2_iLo(2,989)=0 exch2_iHi(2,989)=35 exch2_jLo(2,989)=0 exch2_jHi(2,989)=0 exch2_opposingSend(2,989)=1 exch2_pij(1,2,989)=1 exch2_pij(2,2,989)=0 exch2_pij(3,2,989)=0 exch2_pij(4,2,989)=1 exch2_oi(2,989)=0 exch2_oj(2,989)=0 exch2_neighbourId(3,989)=990 exch2_iLo(3,989)=35 exch2_iHi(3,989)=35 exch2_jLo(3,989)=0 exch2_jHi(3,989)=35 exch2_opposingSend(3,989)=4 exch2_pij(1,3,989)=1 exch2_pij(2,3,989)=0 exch2_pij(3,3,989)=0 exch2_pij(4,3,989)=1 exch2_oi(3,989)=0 exch2_oj(3,989)=0 exch2_neighbourId(4,989)=988 exch2_iLo(4,989)=0 exch2_iHi(4,989)=0 exch2_jLo(4,989)=0 exch2_jHi(4,989)=35 exch2_opposingSend(4,989)=3 exch2_pij(1,4,989)=1 exch2_pij(2,4,989)=0 exch2_pij(3,4,989)=0 exch2_pij(4,4,989)=1 exch2_oi(4,989)=0 exch2_oj(4,989)=0 RETURN END SUBROUTINE W2_E2SETUP_990 C Topology for tile 990 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(990)=34 exch2_tNy(990)=34 exch2_tBasex(990)=476 exch2_tBasey(990)=170 exch2_txGlobalo(990)=2517 exch2_tyGlobalo(990)=171 exch2_isWedge(990)=0 exch2_isNedge(990)=0 exch2_isEedge(990)=1 exch2_isSedge(990)=0 exch2_myFace(990)=5 exch2_mydNx(990)=510 exch2_mydNy(990)=510 exch2_nNeighbours(990)=4 exch2_neighbourId(1,990)=1005 exch2_iLo(1,990)=0 exch2_iHi(1,990)=35 exch2_jLo(1,990)=35 exch2_jHi(1,990)=35 exch2_opposingSend(1,990)=2 exch2_pij(1,1,990)=1 exch2_pij(2,1,990)=0 exch2_pij(3,1,990)=0 exch2_pij(4,1,990)=1 exch2_oi(1,990)=0 exch2_oj(1,990)=0 exch2_neighbourId(2,990)=975 exch2_iLo(2,990)=0 exch2_iHi(2,990)=35 exch2_jLo(2,990)=0 exch2_jHi(2,990)=0 exch2_opposingSend(2,990)=1 exch2_pij(1,2,990)=1 exch2_pij(2,2,990)=0 exch2_pij(3,2,990)=0 exch2_pij(4,2,990)=1 exch2_oi(2,990)=0 exch2_oj(2,990)=0 exch2_neighbourId(3,990)=1201 exch2_iLo(3,990)=35 exch2_iHi(3,990)=35 exch2_jLo(3,990)=0 exch2_jHi(3,990)=35 exch2_opposingSend(3,990)=4 exch2_pij(1,3,990)=1 exch2_pij(2,3,990)=0 exch2_pij(3,3,990)=0 exch2_pij(4,3,990)=1 exch2_oi(3,990)=510 exch2_oj(3,990)=0 exch2_neighbourId(4,990)=989 exch2_iLo(4,990)=0 exch2_iHi(4,990)=0 exch2_jLo(4,990)=0 exch2_jHi(4,990)=35 exch2_opposingSend(4,990)=3 exch2_pij(1,4,990)=1 exch2_pij(2,4,990)=0 exch2_pij(3,4,990)=0 exch2_pij(4,4,990)=1 exch2_oi(4,990)=0 exch2_oj(4,990)=0 RETURN END SUBROUTINE W2_E2SETUP_991 C Topology for tile 991 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(991)=34 exch2_tNy(991)=34 exch2_tBasex(991)=0 exch2_tBasey(991)=204 exch2_txGlobalo(991)=2041 exch2_tyGlobalo(991)=205 exch2_isWedge(991)=1 exch2_isNedge(991)=0 exch2_isEedge(991)=0 exch2_isSedge(991)=0 exch2_myFace(991)=5 exch2_mydNx(991)=510 exch2_mydNy(991)=510 exch2_nNeighbours(991)=4 exch2_neighbourId(1,991)=1006 exch2_iLo(1,991)=0 exch2_iHi(1,991)=35 exch2_jLo(1,991)=35 exch2_jHi(1,991)=35 exch2_opposingSend(1,991)=2 exch2_pij(1,1,991)=1 exch2_pij(2,1,991)=0 exch2_pij(3,1,991)=0 exch2_pij(4,1,991)=1 exch2_oi(1,991)=0 exch2_oj(1,991)=0 exch2_neighbourId(2,991)=976 exch2_iLo(2,991)=0 exch2_iHi(2,991)=35 exch2_jLo(2,991)=0 exch2_jHi(2,991)=0 exch2_opposingSend(2,991)=1 exch2_pij(1,2,991)=1 exch2_pij(2,2,991)=0 exch2_pij(3,2,991)=0 exch2_pij(4,2,991)=1 exch2_oi(2,991)=0 exch2_oj(2,991)=0 exch2_neighbourId(3,991)=992 exch2_iLo(3,991)=35 exch2_iHi(3,991)=35 exch2_jLo(3,991)=0 exch2_jHi(3,991)=35 exch2_opposingSend(3,991)=4 exch2_pij(1,3,991)=1 exch2_pij(2,3,991)=0 exch2_pij(3,3,991)=0 exch2_pij(4,3,991)=1 exch2_oi(3,991)=0 exch2_oj(3,991)=0 exch2_neighbourId(4,991)=669 exch2_iLo(4,991)=0 exch2_iHi(4,991)=0 exch2_jLo(4,991)=0 exch2_jHi(4,991)=35 exch2_opposingSend(4,991)=1 exch2_pij(1,4,991)=0 exch2_pij(2,4,991)=1 exch2_pij(3,4,991)=-1 exch2_pij(4,4,991)=0 exch2_oi(4,991)=-510 exch2_oj(4,991)=511 RETURN END SUBROUTINE W2_E2SETUP_992 C Topology for tile 992 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(992)=34 exch2_tNy(992)=34 exch2_tBasex(992)=34 exch2_tBasey(992)=204 exch2_txGlobalo(992)=2075 exch2_tyGlobalo(992)=205 exch2_isWedge(992)=0 exch2_isNedge(992)=0 exch2_isEedge(992)=0 exch2_isSedge(992)=0 exch2_myFace(992)=5 exch2_mydNx(992)=510 exch2_mydNy(992)=510 exch2_nNeighbours(992)=4 exch2_neighbourId(1,992)=1007 exch2_iLo(1,992)=0 exch2_iHi(1,992)=35 exch2_jLo(1,992)=35 exch2_jHi(1,992)=35 exch2_opposingSend(1,992)=2 exch2_pij(1,1,992)=1 exch2_pij(2,1,992)=0 exch2_pij(3,1,992)=0 exch2_pij(4,1,992)=1 exch2_oi(1,992)=0 exch2_oj(1,992)=0 exch2_neighbourId(2,992)=977 exch2_iLo(2,992)=0 exch2_iHi(2,992)=35 exch2_jLo(2,992)=0 exch2_jHi(2,992)=0 exch2_opposingSend(2,992)=1 exch2_pij(1,2,992)=1 exch2_pij(2,2,992)=0 exch2_pij(3,2,992)=0 exch2_pij(4,2,992)=1 exch2_oi(2,992)=0 exch2_oj(2,992)=0 exch2_neighbourId(3,992)=993 exch2_iLo(3,992)=35 exch2_iHi(3,992)=35 exch2_jLo(3,992)=0 exch2_jHi(3,992)=35 exch2_opposingSend(3,992)=4 exch2_pij(1,3,992)=1 exch2_pij(2,3,992)=0 exch2_pij(3,3,992)=0 exch2_pij(4,3,992)=1 exch2_oi(3,992)=0 exch2_oj(3,992)=0 exch2_neighbourId(4,992)=991 exch2_iLo(4,992)=0 exch2_iHi(4,992)=0 exch2_jLo(4,992)=0 exch2_jHi(4,992)=35 exch2_opposingSend(4,992)=3 exch2_pij(1,4,992)=1 exch2_pij(2,4,992)=0 exch2_pij(3,4,992)=0 exch2_pij(4,4,992)=1 exch2_oi(4,992)=0 exch2_oj(4,992)=0 RETURN END SUBROUTINE W2_E2SETUP_993 C Topology for tile 993 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(993)=34 exch2_tNy(993)=34 exch2_tBasex(993)=68 exch2_tBasey(993)=204 exch2_txGlobalo(993)=2109 exch2_tyGlobalo(993)=205 exch2_isWedge(993)=0 exch2_isNedge(993)=0 exch2_isEedge(993)=0 exch2_isSedge(993)=0 exch2_myFace(993)=5 exch2_mydNx(993)=510 exch2_mydNy(993)=510 exch2_nNeighbours(993)=4 exch2_neighbourId(1,993)=1008 exch2_iLo(1,993)=0 exch2_iHi(1,993)=35 exch2_jLo(1,993)=35 exch2_jHi(1,993)=35 exch2_opposingSend(1,993)=2 exch2_pij(1,1,993)=1 exch2_pij(2,1,993)=0 exch2_pij(3,1,993)=0 exch2_pij(4,1,993)=1 exch2_oi(1,993)=0 exch2_oj(1,993)=0 exch2_neighbourId(2,993)=978 exch2_iLo(2,993)=0 exch2_iHi(2,993)=35 exch2_jLo(2,993)=0 exch2_jHi(2,993)=0 exch2_opposingSend(2,993)=1 exch2_pij(1,2,993)=1 exch2_pij(2,2,993)=0 exch2_pij(3,2,993)=0 exch2_pij(4,2,993)=1 exch2_oi(2,993)=0 exch2_oj(2,993)=0 exch2_neighbourId(3,993)=994 exch2_iLo(3,993)=35 exch2_iHi(3,993)=35 exch2_jLo(3,993)=0 exch2_jHi(3,993)=35 exch2_opposingSend(3,993)=4 exch2_pij(1,3,993)=1 exch2_pij(2,3,993)=0 exch2_pij(3,3,993)=0 exch2_pij(4,3,993)=1 exch2_oi(3,993)=0 exch2_oj(3,993)=0 exch2_neighbourId(4,993)=992 exch2_iLo(4,993)=0 exch2_iHi(4,993)=0 exch2_jLo(4,993)=0 exch2_jHi(4,993)=35 exch2_opposingSend(4,993)=3 exch2_pij(1,4,993)=1 exch2_pij(2,4,993)=0 exch2_pij(3,4,993)=0 exch2_pij(4,4,993)=1 exch2_oi(4,993)=0 exch2_oj(4,993)=0 RETURN END SUBROUTINE W2_E2SETUP_994 C Topology for tile 994 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(994)=34 exch2_tNy(994)=34 exch2_tBasex(994)=102 exch2_tBasey(994)=204 exch2_txGlobalo(994)=2143 exch2_tyGlobalo(994)=205 exch2_isWedge(994)=0 exch2_isNedge(994)=0 exch2_isEedge(994)=0 exch2_isSedge(994)=0 exch2_myFace(994)=5 exch2_mydNx(994)=510 exch2_mydNy(994)=510 exch2_nNeighbours(994)=4 exch2_neighbourId(1,994)=1009 exch2_iLo(1,994)=0 exch2_iHi(1,994)=35 exch2_jLo(1,994)=35 exch2_jHi(1,994)=35 exch2_opposingSend(1,994)=2 exch2_pij(1,1,994)=1 exch2_pij(2,1,994)=0 exch2_pij(3,1,994)=0 exch2_pij(4,1,994)=1 exch2_oi(1,994)=0 exch2_oj(1,994)=0 exch2_neighbourId(2,994)=979 exch2_iLo(2,994)=0 exch2_iHi(2,994)=35 exch2_jLo(2,994)=0 exch2_jHi(2,994)=0 exch2_opposingSend(2,994)=1 exch2_pij(1,2,994)=1 exch2_pij(2,2,994)=0 exch2_pij(3,2,994)=0 exch2_pij(4,2,994)=1 exch2_oi(2,994)=0 exch2_oj(2,994)=0 exch2_neighbourId(3,994)=995 exch2_iLo(3,994)=35 exch2_iHi(3,994)=35 exch2_jLo(3,994)=0 exch2_jHi(3,994)=35 exch2_opposingSend(3,994)=4 exch2_pij(1,3,994)=1 exch2_pij(2,3,994)=0 exch2_pij(3,3,994)=0 exch2_pij(4,3,994)=1 exch2_oi(3,994)=0 exch2_oj(3,994)=0 exch2_neighbourId(4,994)=993 exch2_iLo(4,994)=0 exch2_iHi(4,994)=0 exch2_jLo(4,994)=0 exch2_jHi(4,994)=35 exch2_opposingSend(4,994)=3 exch2_pij(1,4,994)=1 exch2_pij(2,4,994)=0 exch2_pij(3,4,994)=0 exch2_pij(4,4,994)=1 exch2_oi(4,994)=0 exch2_oj(4,994)=0 RETURN END SUBROUTINE W2_E2SETUP_995 C Topology for tile 995 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(995)=34 exch2_tNy(995)=34 exch2_tBasex(995)=136 exch2_tBasey(995)=204 exch2_txGlobalo(995)=2177 exch2_tyGlobalo(995)=205 exch2_isWedge(995)=0 exch2_isNedge(995)=0 exch2_isEedge(995)=0 exch2_isSedge(995)=0 exch2_myFace(995)=5 exch2_mydNx(995)=510 exch2_mydNy(995)=510 exch2_nNeighbours(995)=4 exch2_neighbourId(1,995)=1010 exch2_iLo(1,995)=0 exch2_iHi(1,995)=35 exch2_jLo(1,995)=35 exch2_jHi(1,995)=35 exch2_opposingSend(1,995)=2 exch2_pij(1,1,995)=1 exch2_pij(2,1,995)=0 exch2_pij(3,1,995)=0 exch2_pij(4,1,995)=1 exch2_oi(1,995)=0 exch2_oj(1,995)=0 exch2_neighbourId(2,995)=980 exch2_iLo(2,995)=0 exch2_iHi(2,995)=35 exch2_jLo(2,995)=0 exch2_jHi(2,995)=0 exch2_opposingSend(2,995)=1 exch2_pij(1,2,995)=1 exch2_pij(2,2,995)=0 exch2_pij(3,2,995)=0 exch2_pij(4,2,995)=1 exch2_oi(2,995)=0 exch2_oj(2,995)=0 exch2_neighbourId(3,995)=996 exch2_iLo(3,995)=35 exch2_iHi(3,995)=35 exch2_jLo(3,995)=0 exch2_jHi(3,995)=35 exch2_opposingSend(3,995)=4 exch2_pij(1,3,995)=1 exch2_pij(2,3,995)=0 exch2_pij(3,3,995)=0 exch2_pij(4,3,995)=1 exch2_oi(3,995)=0 exch2_oj(3,995)=0 exch2_neighbourId(4,995)=994 exch2_iLo(4,995)=0 exch2_iHi(4,995)=0 exch2_jLo(4,995)=0 exch2_jHi(4,995)=35 exch2_opposingSend(4,995)=3 exch2_pij(1,4,995)=1 exch2_pij(2,4,995)=0 exch2_pij(3,4,995)=0 exch2_pij(4,4,995)=1 exch2_oi(4,995)=0 exch2_oj(4,995)=0 RETURN END SUBROUTINE W2_E2SETUP_996 C Topology for tile 996 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(996)=34 exch2_tNy(996)=34 exch2_tBasex(996)=170 exch2_tBasey(996)=204 exch2_txGlobalo(996)=2211 exch2_tyGlobalo(996)=205 exch2_isWedge(996)=0 exch2_isNedge(996)=0 exch2_isEedge(996)=0 exch2_isSedge(996)=0 exch2_myFace(996)=5 exch2_mydNx(996)=510 exch2_mydNy(996)=510 exch2_nNeighbours(996)=4 exch2_neighbourId(1,996)=1011 exch2_iLo(1,996)=0 exch2_iHi(1,996)=35 exch2_jLo(1,996)=35 exch2_jHi(1,996)=35 exch2_opposingSend(1,996)=2 exch2_pij(1,1,996)=1 exch2_pij(2,1,996)=0 exch2_pij(3,1,996)=0 exch2_pij(4,1,996)=1 exch2_oi(1,996)=0 exch2_oj(1,996)=0 exch2_neighbourId(2,996)=981 exch2_iLo(2,996)=0 exch2_iHi(2,996)=35 exch2_jLo(2,996)=0 exch2_jHi(2,996)=0 exch2_opposingSend(2,996)=1 exch2_pij(1,2,996)=1 exch2_pij(2,2,996)=0 exch2_pij(3,2,996)=0 exch2_pij(4,2,996)=1 exch2_oi(2,996)=0 exch2_oj(2,996)=0 exch2_neighbourId(3,996)=997 exch2_iLo(3,996)=35 exch2_iHi(3,996)=35 exch2_jLo(3,996)=0 exch2_jHi(3,996)=35 exch2_opposingSend(3,996)=4 exch2_pij(1,3,996)=1 exch2_pij(2,3,996)=0 exch2_pij(3,3,996)=0 exch2_pij(4,3,996)=1 exch2_oi(3,996)=0 exch2_oj(3,996)=0 exch2_neighbourId(4,996)=995 exch2_iLo(4,996)=0 exch2_iHi(4,996)=0 exch2_jLo(4,996)=0 exch2_jHi(4,996)=35 exch2_opposingSend(4,996)=3 exch2_pij(1,4,996)=1 exch2_pij(2,4,996)=0 exch2_pij(3,4,996)=0 exch2_pij(4,4,996)=1 exch2_oi(4,996)=0 exch2_oj(4,996)=0 RETURN END SUBROUTINE W2_E2SETUP_997 C Topology for tile 997 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(997)=34 exch2_tNy(997)=34 exch2_tBasex(997)=204 exch2_tBasey(997)=204 exch2_txGlobalo(997)=2245 exch2_tyGlobalo(997)=205 exch2_isWedge(997)=0 exch2_isNedge(997)=0 exch2_isEedge(997)=0 exch2_isSedge(997)=0 exch2_myFace(997)=5 exch2_mydNx(997)=510 exch2_mydNy(997)=510 exch2_nNeighbours(997)=4 exch2_neighbourId(1,997)=1012 exch2_iLo(1,997)=0 exch2_iHi(1,997)=35 exch2_jLo(1,997)=35 exch2_jHi(1,997)=35 exch2_opposingSend(1,997)=2 exch2_pij(1,1,997)=1 exch2_pij(2,1,997)=0 exch2_pij(3,1,997)=0 exch2_pij(4,1,997)=1 exch2_oi(1,997)=0 exch2_oj(1,997)=0 exch2_neighbourId(2,997)=982 exch2_iLo(2,997)=0 exch2_iHi(2,997)=35 exch2_jLo(2,997)=0 exch2_jHi(2,997)=0 exch2_opposingSend(2,997)=1 exch2_pij(1,2,997)=1 exch2_pij(2,2,997)=0 exch2_pij(3,2,997)=0 exch2_pij(4,2,997)=1 exch2_oi(2,997)=0 exch2_oj(2,997)=0 exch2_neighbourId(3,997)=998 exch2_iLo(3,997)=35 exch2_iHi(3,997)=35 exch2_jLo(3,997)=0 exch2_jHi(3,997)=35 exch2_opposingSend(3,997)=4 exch2_pij(1,3,997)=1 exch2_pij(2,3,997)=0 exch2_pij(3,3,997)=0 exch2_pij(4,3,997)=1 exch2_oi(3,997)=0 exch2_oj(3,997)=0 exch2_neighbourId(4,997)=996 exch2_iLo(4,997)=0 exch2_iHi(4,997)=0 exch2_jLo(4,997)=0 exch2_jHi(4,997)=35 exch2_opposingSend(4,997)=3 exch2_pij(1,4,997)=1 exch2_pij(2,4,997)=0 exch2_pij(3,4,997)=0 exch2_pij(4,4,997)=1 exch2_oi(4,997)=0 exch2_oj(4,997)=0 RETURN END SUBROUTINE W2_E2SETUP_998 C Topology for tile 998 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(998)=34 exch2_tNy(998)=34 exch2_tBasex(998)=238 exch2_tBasey(998)=204 exch2_txGlobalo(998)=2279 exch2_tyGlobalo(998)=205 exch2_isWedge(998)=0 exch2_isNedge(998)=0 exch2_isEedge(998)=0 exch2_isSedge(998)=0 exch2_myFace(998)=5 exch2_mydNx(998)=510 exch2_mydNy(998)=510 exch2_nNeighbours(998)=4 exch2_neighbourId(1,998)=1013 exch2_iLo(1,998)=0 exch2_iHi(1,998)=35 exch2_jLo(1,998)=35 exch2_jHi(1,998)=35 exch2_opposingSend(1,998)=2 exch2_pij(1,1,998)=1 exch2_pij(2,1,998)=0 exch2_pij(3,1,998)=0 exch2_pij(4,1,998)=1 exch2_oi(1,998)=0 exch2_oj(1,998)=0 exch2_neighbourId(2,998)=983 exch2_iLo(2,998)=0 exch2_iHi(2,998)=35 exch2_jLo(2,998)=0 exch2_jHi(2,998)=0 exch2_opposingSend(2,998)=1 exch2_pij(1,2,998)=1 exch2_pij(2,2,998)=0 exch2_pij(3,2,998)=0 exch2_pij(4,2,998)=1 exch2_oi(2,998)=0 exch2_oj(2,998)=0 exch2_neighbourId(3,998)=999 exch2_iLo(3,998)=35 exch2_iHi(3,998)=35 exch2_jLo(3,998)=0 exch2_jHi(3,998)=35 exch2_opposingSend(3,998)=4 exch2_pij(1,3,998)=1 exch2_pij(2,3,998)=0 exch2_pij(3,3,998)=0 exch2_pij(4,3,998)=1 exch2_oi(3,998)=0 exch2_oj(3,998)=0 exch2_neighbourId(4,998)=997 exch2_iLo(4,998)=0 exch2_iHi(4,998)=0 exch2_jLo(4,998)=0 exch2_jHi(4,998)=35 exch2_opposingSend(4,998)=3 exch2_pij(1,4,998)=1 exch2_pij(2,4,998)=0 exch2_pij(3,4,998)=0 exch2_pij(4,4,998)=1 exch2_oi(4,998)=0 exch2_oj(4,998)=0 RETURN END SUBROUTINE W2_E2SETUP_999 C Topology for tile 999 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(999)=34 exch2_tNy(999)=34 exch2_tBasex(999)=272 exch2_tBasey(999)=204 exch2_txGlobalo(999)=2313 exch2_tyGlobalo(999)=205 exch2_isWedge(999)=0 exch2_isNedge(999)=0 exch2_isEedge(999)=0 exch2_isSedge(999)=0 exch2_myFace(999)=5 exch2_mydNx(999)=510 exch2_mydNy(999)=510 exch2_nNeighbours(999)=4 exch2_neighbourId(1,999)=1014 exch2_iLo(1,999)=0 exch2_iHi(1,999)=35 exch2_jLo(1,999)=35 exch2_jHi(1,999)=35 exch2_opposingSend(1,999)=2 exch2_pij(1,1,999)=1 exch2_pij(2,1,999)=0 exch2_pij(3,1,999)=0 exch2_pij(4,1,999)=1 exch2_oi(1,999)=0 exch2_oj(1,999)=0 exch2_neighbourId(2,999)=984 exch2_iLo(2,999)=0 exch2_iHi(2,999)=35 exch2_jLo(2,999)=0 exch2_jHi(2,999)=0 exch2_opposingSend(2,999)=1 exch2_pij(1,2,999)=1 exch2_pij(2,2,999)=0 exch2_pij(3,2,999)=0 exch2_pij(4,2,999)=1 exch2_oi(2,999)=0 exch2_oj(2,999)=0 exch2_neighbourId(3,999)=1000 exch2_iLo(3,999)=35 exch2_iHi(3,999)=35 exch2_jLo(3,999)=0 exch2_jHi(3,999)=35 exch2_opposingSend(3,999)=4 exch2_pij(1,3,999)=1 exch2_pij(2,3,999)=0 exch2_pij(3,3,999)=0 exch2_pij(4,3,999)=1 exch2_oi(3,999)=0 exch2_oj(3,999)=0 exch2_neighbourId(4,999)=998 exch2_iLo(4,999)=0 exch2_iHi(4,999)=0 exch2_jLo(4,999)=0 exch2_jHi(4,999)=35 exch2_opposingSend(4,999)=3 exch2_pij(1,4,999)=1 exch2_pij(2,4,999)=0 exch2_pij(3,4,999)=0 exch2_pij(4,4,999)=1 exch2_oi(4,999)=0 exch2_oj(4,999)=0 RETURN END SUBROUTINE W2_E2SETUP_1000 C Topology for tile 1000 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1000)=34 exch2_tNy(1000)=34 exch2_tBasex(1000)=306 exch2_tBasey(1000)=204 exch2_txGlobalo(1000)=2347 exch2_tyGlobalo(1000)=205 exch2_isWedge(1000)=0 exch2_isNedge(1000)=0 exch2_isEedge(1000)=0 exch2_isSedge(1000)=0 exch2_myFace(1000)=5 exch2_mydNx(1000)=510 exch2_mydNy(1000)=510 exch2_nNeighbours(1000)=4 exch2_neighbourId(1,1000)=1015 exch2_iLo(1,1000)=0 exch2_iHi(1,1000)=35 exch2_jLo(1,1000)=35 exch2_jHi(1,1000)=35 exch2_opposingSend(1,1000)=2 exch2_pij(1,1,1000)=1 exch2_pij(2,1,1000)=0 exch2_pij(3,1,1000)=0 exch2_pij(4,1,1000)=1 exch2_oi(1,1000)=0 exch2_oj(1,1000)=0 exch2_neighbourId(2,1000)=985 exch2_iLo(2,1000)=0 exch2_iHi(2,1000)=35 exch2_jLo(2,1000)=0 exch2_jHi(2,1000)=0 exch2_opposingSend(2,1000)=1 exch2_pij(1,2,1000)=1 exch2_pij(2,2,1000)=0 exch2_pij(3,2,1000)=0 exch2_pij(4,2,1000)=1 exch2_oi(2,1000)=0 exch2_oj(2,1000)=0 exch2_neighbourId(3,1000)=1001 exch2_iLo(3,1000)=35 exch2_iHi(3,1000)=35 exch2_jLo(3,1000)=0 exch2_jHi(3,1000)=35 exch2_opposingSend(3,1000)=4 exch2_pij(1,3,1000)=1 exch2_pij(2,3,1000)=0 exch2_pij(3,3,1000)=0 exch2_pij(4,3,1000)=1 exch2_oi(3,1000)=0 exch2_oj(3,1000)=0 exch2_neighbourId(4,1000)=999 exch2_iLo(4,1000)=0 exch2_iHi(4,1000)=0 exch2_jLo(4,1000)=0 exch2_jHi(4,1000)=35 exch2_opposingSend(4,1000)=3 exch2_pij(1,4,1000)=1 exch2_pij(2,4,1000)=0 exch2_pij(3,4,1000)=0 exch2_pij(4,4,1000)=1 exch2_oi(4,1000)=0 exch2_oj(4,1000)=0 RETURN END SUBROUTINE W2_E2SETUP_1001 C Topology for tile 1001 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1001)=34 exch2_tNy(1001)=34 exch2_tBasex(1001)=340 exch2_tBasey(1001)=204 exch2_txGlobalo(1001)=2381 exch2_tyGlobalo(1001)=205 exch2_isWedge(1001)=0 exch2_isNedge(1001)=0 exch2_isEedge(1001)=0 exch2_isSedge(1001)=0 exch2_myFace(1001)=5 exch2_mydNx(1001)=510 exch2_mydNy(1001)=510 exch2_nNeighbours(1001)=4 exch2_neighbourId(1,1001)=1016 exch2_iLo(1,1001)=0 exch2_iHi(1,1001)=35 exch2_jLo(1,1001)=35 exch2_jHi(1,1001)=35 exch2_opposingSend(1,1001)=2 exch2_pij(1,1,1001)=1 exch2_pij(2,1,1001)=0 exch2_pij(3,1,1001)=0 exch2_pij(4,1,1001)=1 exch2_oi(1,1001)=0 exch2_oj(1,1001)=0 exch2_neighbourId(2,1001)=986 exch2_iLo(2,1001)=0 exch2_iHi(2,1001)=35 exch2_jLo(2,1001)=0 exch2_jHi(2,1001)=0 exch2_opposingSend(2,1001)=1 exch2_pij(1,2,1001)=1 exch2_pij(2,2,1001)=0 exch2_pij(3,2,1001)=0 exch2_pij(4,2,1001)=1 exch2_oi(2,1001)=0 exch2_oj(2,1001)=0 exch2_neighbourId(3,1001)=1002 exch2_iLo(3,1001)=35 exch2_iHi(3,1001)=35 exch2_jLo(3,1001)=0 exch2_jHi(3,1001)=35 exch2_opposingSend(3,1001)=4 exch2_pij(1,3,1001)=1 exch2_pij(2,3,1001)=0 exch2_pij(3,3,1001)=0 exch2_pij(4,3,1001)=1 exch2_oi(3,1001)=0 exch2_oj(3,1001)=0 exch2_neighbourId(4,1001)=1000 exch2_iLo(4,1001)=0 exch2_iHi(4,1001)=0 exch2_jLo(4,1001)=0 exch2_jHi(4,1001)=35 exch2_opposingSend(4,1001)=3 exch2_pij(1,4,1001)=1 exch2_pij(2,4,1001)=0 exch2_pij(3,4,1001)=0 exch2_pij(4,4,1001)=1 exch2_oi(4,1001)=0 exch2_oj(4,1001)=0 RETURN END SUBROUTINE W2_E2SETUP_1002 C Topology for tile 1002 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1002)=34 exch2_tNy(1002)=34 exch2_tBasex(1002)=374 exch2_tBasey(1002)=204 exch2_txGlobalo(1002)=2415 exch2_tyGlobalo(1002)=205 exch2_isWedge(1002)=0 exch2_isNedge(1002)=0 exch2_isEedge(1002)=0 exch2_isSedge(1002)=0 exch2_myFace(1002)=5 exch2_mydNx(1002)=510 exch2_mydNy(1002)=510 exch2_nNeighbours(1002)=4 exch2_neighbourId(1,1002)=1017 exch2_iLo(1,1002)=0 exch2_iHi(1,1002)=35 exch2_jLo(1,1002)=35 exch2_jHi(1,1002)=35 exch2_opposingSend(1,1002)=2 exch2_pij(1,1,1002)=1 exch2_pij(2,1,1002)=0 exch2_pij(3,1,1002)=0 exch2_pij(4,1,1002)=1 exch2_oi(1,1002)=0 exch2_oj(1,1002)=0 exch2_neighbourId(2,1002)=987 exch2_iLo(2,1002)=0 exch2_iHi(2,1002)=35 exch2_jLo(2,1002)=0 exch2_jHi(2,1002)=0 exch2_opposingSend(2,1002)=1 exch2_pij(1,2,1002)=1 exch2_pij(2,2,1002)=0 exch2_pij(3,2,1002)=0 exch2_pij(4,2,1002)=1 exch2_oi(2,1002)=0 exch2_oj(2,1002)=0 exch2_neighbourId(3,1002)=1003 exch2_iLo(3,1002)=35 exch2_iHi(3,1002)=35 exch2_jLo(3,1002)=0 exch2_jHi(3,1002)=35 exch2_opposingSend(3,1002)=4 exch2_pij(1,3,1002)=1 exch2_pij(2,3,1002)=0 exch2_pij(3,3,1002)=0 exch2_pij(4,3,1002)=1 exch2_oi(3,1002)=0 exch2_oj(3,1002)=0 exch2_neighbourId(4,1002)=1001 exch2_iLo(4,1002)=0 exch2_iHi(4,1002)=0 exch2_jLo(4,1002)=0 exch2_jHi(4,1002)=35 exch2_opposingSend(4,1002)=3 exch2_pij(1,4,1002)=1 exch2_pij(2,4,1002)=0 exch2_pij(3,4,1002)=0 exch2_pij(4,4,1002)=1 exch2_oi(4,1002)=0 exch2_oj(4,1002)=0 RETURN END SUBROUTINE W2_E2SETUP_1003 C Topology for tile 1003 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1003)=34 exch2_tNy(1003)=34 exch2_tBasex(1003)=408 exch2_tBasey(1003)=204 exch2_txGlobalo(1003)=2449 exch2_tyGlobalo(1003)=205 exch2_isWedge(1003)=0 exch2_isNedge(1003)=0 exch2_isEedge(1003)=0 exch2_isSedge(1003)=0 exch2_myFace(1003)=5 exch2_mydNx(1003)=510 exch2_mydNy(1003)=510 exch2_nNeighbours(1003)=4 exch2_neighbourId(1,1003)=1018 exch2_iLo(1,1003)=0 exch2_iHi(1,1003)=35 exch2_jLo(1,1003)=35 exch2_jHi(1,1003)=35 exch2_opposingSend(1,1003)=2 exch2_pij(1,1,1003)=1 exch2_pij(2,1,1003)=0 exch2_pij(3,1,1003)=0 exch2_pij(4,1,1003)=1 exch2_oi(1,1003)=0 exch2_oj(1,1003)=0 exch2_neighbourId(2,1003)=988 exch2_iLo(2,1003)=0 exch2_iHi(2,1003)=35 exch2_jLo(2,1003)=0 exch2_jHi(2,1003)=0 exch2_opposingSend(2,1003)=1 exch2_pij(1,2,1003)=1 exch2_pij(2,2,1003)=0 exch2_pij(3,2,1003)=0 exch2_pij(4,2,1003)=1 exch2_oi(2,1003)=0 exch2_oj(2,1003)=0 exch2_neighbourId(3,1003)=1004 exch2_iLo(3,1003)=35 exch2_iHi(3,1003)=35 exch2_jLo(3,1003)=0 exch2_jHi(3,1003)=35 exch2_opposingSend(3,1003)=4 exch2_pij(1,3,1003)=1 exch2_pij(2,3,1003)=0 exch2_pij(3,3,1003)=0 exch2_pij(4,3,1003)=1 exch2_oi(3,1003)=0 exch2_oj(3,1003)=0 exch2_neighbourId(4,1003)=1002 exch2_iLo(4,1003)=0 exch2_iHi(4,1003)=0 exch2_jLo(4,1003)=0 exch2_jHi(4,1003)=35 exch2_opposingSend(4,1003)=3 exch2_pij(1,4,1003)=1 exch2_pij(2,4,1003)=0 exch2_pij(3,4,1003)=0 exch2_pij(4,4,1003)=1 exch2_oi(4,1003)=0 exch2_oj(4,1003)=0 RETURN END SUBROUTINE W2_E2SETUP_1004 C Topology for tile 1004 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1004)=34 exch2_tNy(1004)=34 exch2_tBasex(1004)=442 exch2_tBasey(1004)=204 exch2_txGlobalo(1004)=2483 exch2_tyGlobalo(1004)=205 exch2_isWedge(1004)=0 exch2_isNedge(1004)=0 exch2_isEedge(1004)=0 exch2_isSedge(1004)=0 exch2_myFace(1004)=5 exch2_mydNx(1004)=510 exch2_mydNy(1004)=510 exch2_nNeighbours(1004)=4 exch2_neighbourId(1,1004)=1019 exch2_iLo(1,1004)=0 exch2_iHi(1,1004)=35 exch2_jLo(1,1004)=35 exch2_jHi(1,1004)=35 exch2_opposingSend(1,1004)=2 exch2_pij(1,1,1004)=1 exch2_pij(2,1,1004)=0 exch2_pij(3,1,1004)=0 exch2_pij(4,1,1004)=1 exch2_oi(1,1004)=0 exch2_oj(1,1004)=0 exch2_neighbourId(2,1004)=989 exch2_iLo(2,1004)=0 exch2_iHi(2,1004)=35 exch2_jLo(2,1004)=0 exch2_jHi(2,1004)=0 exch2_opposingSend(2,1004)=1 exch2_pij(1,2,1004)=1 exch2_pij(2,2,1004)=0 exch2_pij(3,2,1004)=0 exch2_pij(4,2,1004)=1 exch2_oi(2,1004)=0 exch2_oj(2,1004)=0 exch2_neighbourId(3,1004)=1005 exch2_iLo(3,1004)=35 exch2_iHi(3,1004)=35 exch2_jLo(3,1004)=0 exch2_jHi(3,1004)=35 exch2_opposingSend(3,1004)=4 exch2_pij(1,3,1004)=1 exch2_pij(2,3,1004)=0 exch2_pij(3,3,1004)=0 exch2_pij(4,3,1004)=1 exch2_oi(3,1004)=0 exch2_oj(3,1004)=0 exch2_neighbourId(4,1004)=1003 exch2_iLo(4,1004)=0 exch2_iHi(4,1004)=0 exch2_jLo(4,1004)=0 exch2_jHi(4,1004)=35 exch2_opposingSend(4,1004)=3 exch2_pij(1,4,1004)=1 exch2_pij(2,4,1004)=0 exch2_pij(3,4,1004)=0 exch2_pij(4,4,1004)=1 exch2_oi(4,1004)=0 exch2_oj(4,1004)=0 RETURN END SUBROUTINE W2_E2SETUP_1005 C Topology for tile 1005 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1005)=34 exch2_tNy(1005)=34 exch2_tBasex(1005)=476 exch2_tBasey(1005)=204 exch2_txGlobalo(1005)=2517 exch2_tyGlobalo(1005)=205 exch2_isWedge(1005)=0 exch2_isNedge(1005)=0 exch2_isEedge(1005)=1 exch2_isSedge(1005)=0 exch2_myFace(1005)=5 exch2_mydNx(1005)=510 exch2_mydNy(1005)=510 exch2_nNeighbours(1005)=4 exch2_neighbourId(1,1005)=1020 exch2_iLo(1,1005)=0 exch2_iHi(1,1005)=35 exch2_jLo(1,1005)=35 exch2_jHi(1,1005)=35 exch2_opposingSend(1,1005)=2 exch2_pij(1,1,1005)=1 exch2_pij(2,1,1005)=0 exch2_pij(3,1,1005)=0 exch2_pij(4,1,1005)=1 exch2_oi(1,1005)=0 exch2_oj(1,1005)=0 exch2_neighbourId(2,1005)=990 exch2_iLo(2,1005)=0 exch2_iHi(2,1005)=35 exch2_jLo(2,1005)=0 exch2_jHi(2,1005)=0 exch2_opposingSend(2,1005)=1 exch2_pij(1,2,1005)=1 exch2_pij(2,2,1005)=0 exch2_pij(3,2,1005)=0 exch2_pij(4,2,1005)=1 exch2_oi(2,1005)=0 exch2_oj(2,1005)=0 exch2_neighbourId(3,1005)=1216 exch2_iLo(3,1005)=35 exch2_iHi(3,1005)=35 exch2_jLo(3,1005)=0 exch2_jHi(3,1005)=35 exch2_opposingSend(3,1005)=4 exch2_pij(1,3,1005)=1 exch2_pij(2,3,1005)=0 exch2_pij(3,3,1005)=0 exch2_pij(4,3,1005)=1 exch2_oi(3,1005)=510 exch2_oj(3,1005)=0 exch2_neighbourId(4,1005)=1004 exch2_iLo(4,1005)=0 exch2_iHi(4,1005)=0 exch2_jLo(4,1005)=0 exch2_jHi(4,1005)=35 exch2_opposingSend(4,1005)=3 exch2_pij(1,4,1005)=1 exch2_pij(2,4,1005)=0 exch2_pij(3,4,1005)=0 exch2_pij(4,4,1005)=1 exch2_oi(4,1005)=0 exch2_oj(4,1005)=0 RETURN END SUBROUTINE W2_E2SETUP_1006 C Topology for tile 1006 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1006)=34 exch2_tNy(1006)=34 exch2_tBasex(1006)=0 exch2_tBasey(1006)=238 exch2_txGlobalo(1006)=2041 exch2_tyGlobalo(1006)=239 exch2_isWedge(1006)=1 exch2_isNedge(1006)=0 exch2_isEedge(1006)=0 exch2_isSedge(1006)=0 exch2_myFace(1006)=5 exch2_mydNx(1006)=510 exch2_mydNy(1006)=510 exch2_nNeighbours(1006)=4 exch2_neighbourId(1,1006)=1021 exch2_iLo(1,1006)=0 exch2_iHi(1,1006)=35 exch2_jLo(1,1006)=35 exch2_jHi(1,1006)=35 exch2_opposingSend(1,1006)=2 exch2_pij(1,1,1006)=1 exch2_pij(2,1,1006)=0 exch2_pij(3,1,1006)=0 exch2_pij(4,1,1006)=1 exch2_oi(1,1006)=0 exch2_oj(1,1006)=0 exch2_neighbourId(2,1006)=991 exch2_iLo(2,1006)=0 exch2_iHi(2,1006)=35 exch2_jLo(2,1006)=0 exch2_jHi(2,1006)=0 exch2_opposingSend(2,1006)=1 exch2_pij(1,2,1006)=1 exch2_pij(2,2,1006)=0 exch2_pij(3,2,1006)=0 exch2_pij(4,2,1006)=1 exch2_oi(2,1006)=0 exch2_oj(2,1006)=0 exch2_neighbourId(3,1006)=1007 exch2_iLo(3,1006)=35 exch2_iHi(3,1006)=35 exch2_jLo(3,1006)=0 exch2_jHi(3,1006)=35 exch2_opposingSend(3,1006)=4 exch2_pij(1,3,1006)=1 exch2_pij(2,3,1006)=0 exch2_pij(3,3,1006)=0 exch2_pij(4,3,1006)=1 exch2_oi(3,1006)=0 exch2_oj(3,1006)=0 exch2_neighbourId(4,1006)=668 exch2_iLo(4,1006)=0 exch2_iHi(4,1006)=0 exch2_jLo(4,1006)=0 exch2_jHi(4,1006)=35 exch2_opposingSend(4,1006)=1 exch2_pij(1,4,1006)=0 exch2_pij(2,4,1006)=1 exch2_pij(3,4,1006)=-1 exch2_pij(4,4,1006)=0 exch2_oi(4,1006)=-510 exch2_oj(4,1006)=511 RETURN END SUBROUTINE W2_E2SETUP_1007 C Topology for tile 1007 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1007)=34 exch2_tNy(1007)=34 exch2_tBasex(1007)=34 exch2_tBasey(1007)=238 exch2_txGlobalo(1007)=2075 exch2_tyGlobalo(1007)=239 exch2_isWedge(1007)=0 exch2_isNedge(1007)=0 exch2_isEedge(1007)=0 exch2_isSedge(1007)=0 exch2_myFace(1007)=5 exch2_mydNx(1007)=510 exch2_mydNy(1007)=510 exch2_nNeighbours(1007)=4 exch2_neighbourId(1,1007)=1022 exch2_iLo(1,1007)=0 exch2_iHi(1,1007)=35 exch2_jLo(1,1007)=35 exch2_jHi(1,1007)=35 exch2_opposingSend(1,1007)=2 exch2_pij(1,1,1007)=1 exch2_pij(2,1,1007)=0 exch2_pij(3,1,1007)=0 exch2_pij(4,1,1007)=1 exch2_oi(1,1007)=0 exch2_oj(1,1007)=0 exch2_neighbourId(2,1007)=992 exch2_iLo(2,1007)=0 exch2_iHi(2,1007)=35 exch2_jLo(2,1007)=0 exch2_jHi(2,1007)=0 exch2_opposingSend(2,1007)=1 exch2_pij(1,2,1007)=1 exch2_pij(2,2,1007)=0 exch2_pij(3,2,1007)=0 exch2_pij(4,2,1007)=1 exch2_oi(2,1007)=0 exch2_oj(2,1007)=0 exch2_neighbourId(3,1007)=1008 exch2_iLo(3,1007)=35 exch2_iHi(3,1007)=35 exch2_jLo(3,1007)=0 exch2_jHi(3,1007)=35 exch2_opposingSend(3,1007)=4 exch2_pij(1,3,1007)=1 exch2_pij(2,3,1007)=0 exch2_pij(3,3,1007)=0 exch2_pij(4,3,1007)=1 exch2_oi(3,1007)=0 exch2_oj(3,1007)=0 exch2_neighbourId(4,1007)=1006 exch2_iLo(4,1007)=0 exch2_iHi(4,1007)=0 exch2_jLo(4,1007)=0 exch2_jHi(4,1007)=35 exch2_opposingSend(4,1007)=3 exch2_pij(1,4,1007)=1 exch2_pij(2,4,1007)=0 exch2_pij(3,4,1007)=0 exch2_pij(4,4,1007)=1 exch2_oi(4,1007)=0 exch2_oj(4,1007)=0 RETURN END SUBROUTINE W2_E2SETUP_1008 C Topology for tile 1008 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1008)=34 exch2_tNy(1008)=34 exch2_tBasex(1008)=68 exch2_tBasey(1008)=238 exch2_txGlobalo(1008)=2109 exch2_tyGlobalo(1008)=239 exch2_isWedge(1008)=0 exch2_isNedge(1008)=0 exch2_isEedge(1008)=0 exch2_isSedge(1008)=0 exch2_myFace(1008)=5 exch2_mydNx(1008)=510 exch2_mydNy(1008)=510 exch2_nNeighbours(1008)=4 exch2_neighbourId(1,1008)=1023 exch2_iLo(1,1008)=0 exch2_iHi(1,1008)=35 exch2_jLo(1,1008)=35 exch2_jHi(1,1008)=35 exch2_opposingSend(1,1008)=2 exch2_pij(1,1,1008)=1 exch2_pij(2,1,1008)=0 exch2_pij(3,1,1008)=0 exch2_pij(4,1,1008)=1 exch2_oi(1,1008)=0 exch2_oj(1,1008)=0 exch2_neighbourId(2,1008)=993 exch2_iLo(2,1008)=0 exch2_iHi(2,1008)=35 exch2_jLo(2,1008)=0 exch2_jHi(2,1008)=0 exch2_opposingSend(2,1008)=1 exch2_pij(1,2,1008)=1 exch2_pij(2,2,1008)=0 exch2_pij(3,2,1008)=0 exch2_pij(4,2,1008)=1 exch2_oi(2,1008)=0 exch2_oj(2,1008)=0 exch2_neighbourId(3,1008)=1009 exch2_iLo(3,1008)=35 exch2_iHi(3,1008)=35 exch2_jLo(3,1008)=0 exch2_jHi(3,1008)=35 exch2_opposingSend(3,1008)=4 exch2_pij(1,3,1008)=1 exch2_pij(2,3,1008)=0 exch2_pij(3,3,1008)=0 exch2_pij(4,3,1008)=1 exch2_oi(3,1008)=0 exch2_oj(3,1008)=0 exch2_neighbourId(4,1008)=1007 exch2_iLo(4,1008)=0 exch2_iHi(4,1008)=0 exch2_jLo(4,1008)=0 exch2_jHi(4,1008)=35 exch2_opposingSend(4,1008)=3 exch2_pij(1,4,1008)=1 exch2_pij(2,4,1008)=0 exch2_pij(3,4,1008)=0 exch2_pij(4,4,1008)=1 exch2_oi(4,1008)=0 exch2_oj(4,1008)=0 RETURN END SUBROUTINE W2_E2SETUP_1009 C Topology for tile 1009 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1009)=34 exch2_tNy(1009)=34 exch2_tBasex(1009)=102 exch2_tBasey(1009)=238 exch2_txGlobalo(1009)=2143 exch2_tyGlobalo(1009)=239 exch2_isWedge(1009)=0 exch2_isNedge(1009)=0 exch2_isEedge(1009)=0 exch2_isSedge(1009)=0 exch2_myFace(1009)=5 exch2_mydNx(1009)=510 exch2_mydNy(1009)=510 exch2_nNeighbours(1009)=4 exch2_neighbourId(1,1009)=1024 exch2_iLo(1,1009)=0 exch2_iHi(1,1009)=35 exch2_jLo(1,1009)=35 exch2_jHi(1,1009)=35 exch2_opposingSend(1,1009)=2 exch2_pij(1,1,1009)=1 exch2_pij(2,1,1009)=0 exch2_pij(3,1,1009)=0 exch2_pij(4,1,1009)=1 exch2_oi(1,1009)=0 exch2_oj(1,1009)=0 exch2_neighbourId(2,1009)=994 exch2_iLo(2,1009)=0 exch2_iHi(2,1009)=35 exch2_jLo(2,1009)=0 exch2_jHi(2,1009)=0 exch2_opposingSend(2,1009)=1 exch2_pij(1,2,1009)=1 exch2_pij(2,2,1009)=0 exch2_pij(3,2,1009)=0 exch2_pij(4,2,1009)=1 exch2_oi(2,1009)=0 exch2_oj(2,1009)=0 exch2_neighbourId(3,1009)=1010 exch2_iLo(3,1009)=35 exch2_iHi(3,1009)=35 exch2_jLo(3,1009)=0 exch2_jHi(3,1009)=35 exch2_opposingSend(3,1009)=4 exch2_pij(1,3,1009)=1 exch2_pij(2,3,1009)=0 exch2_pij(3,3,1009)=0 exch2_pij(4,3,1009)=1 exch2_oi(3,1009)=0 exch2_oj(3,1009)=0 exch2_neighbourId(4,1009)=1008 exch2_iLo(4,1009)=0 exch2_iHi(4,1009)=0 exch2_jLo(4,1009)=0 exch2_jHi(4,1009)=35 exch2_opposingSend(4,1009)=3 exch2_pij(1,4,1009)=1 exch2_pij(2,4,1009)=0 exch2_pij(3,4,1009)=0 exch2_pij(4,4,1009)=1 exch2_oi(4,1009)=0 exch2_oj(4,1009)=0 RETURN END SUBROUTINE W2_E2SETUP_1010 C Topology for tile 1010 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1010)=34 exch2_tNy(1010)=34 exch2_tBasex(1010)=136 exch2_tBasey(1010)=238 exch2_txGlobalo(1010)=2177 exch2_tyGlobalo(1010)=239 exch2_isWedge(1010)=0 exch2_isNedge(1010)=0 exch2_isEedge(1010)=0 exch2_isSedge(1010)=0 exch2_myFace(1010)=5 exch2_mydNx(1010)=510 exch2_mydNy(1010)=510 exch2_nNeighbours(1010)=4 exch2_neighbourId(1,1010)=1025 exch2_iLo(1,1010)=0 exch2_iHi(1,1010)=35 exch2_jLo(1,1010)=35 exch2_jHi(1,1010)=35 exch2_opposingSend(1,1010)=2 exch2_pij(1,1,1010)=1 exch2_pij(2,1,1010)=0 exch2_pij(3,1,1010)=0 exch2_pij(4,1,1010)=1 exch2_oi(1,1010)=0 exch2_oj(1,1010)=0 exch2_neighbourId(2,1010)=995 exch2_iLo(2,1010)=0 exch2_iHi(2,1010)=35 exch2_jLo(2,1010)=0 exch2_jHi(2,1010)=0 exch2_opposingSend(2,1010)=1 exch2_pij(1,2,1010)=1 exch2_pij(2,2,1010)=0 exch2_pij(3,2,1010)=0 exch2_pij(4,2,1010)=1 exch2_oi(2,1010)=0 exch2_oj(2,1010)=0 exch2_neighbourId(3,1010)=1011 exch2_iLo(3,1010)=35 exch2_iHi(3,1010)=35 exch2_jLo(3,1010)=0 exch2_jHi(3,1010)=35 exch2_opposingSend(3,1010)=4 exch2_pij(1,3,1010)=1 exch2_pij(2,3,1010)=0 exch2_pij(3,3,1010)=0 exch2_pij(4,3,1010)=1 exch2_oi(3,1010)=0 exch2_oj(3,1010)=0 exch2_neighbourId(4,1010)=1009 exch2_iLo(4,1010)=0 exch2_iHi(4,1010)=0 exch2_jLo(4,1010)=0 exch2_jHi(4,1010)=35 exch2_opposingSend(4,1010)=3 exch2_pij(1,4,1010)=1 exch2_pij(2,4,1010)=0 exch2_pij(3,4,1010)=0 exch2_pij(4,4,1010)=1 exch2_oi(4,1010)=0 exch2_oj(4,1010)=0 RETURN END SUBROUTINE W2_E2SETUP_1011 C Topology for tile 1011 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1011)=34 exch2_tNy(1011)=34 exch2_tBasex(1011)=170 exch2_tBasey(1011)=238 exch2_txGlobalo(1011)=2211 exch2_tyGlobalo(1011)=239 exch2_isWedge(1011)=0 exch2_isNedge(1011)=0 exch2_isEedge(1011)=0 exch2_isSedge(1011)=0 exch2_myFace(1011)=5 exch2_mydNx(1011)=510 exch2_mydNy(1011)=510 exch2_nNeighbours(1011)=4 exch2_neighbourId(1,1011)=1026 exch2_iLo(1,1011)=0 exch2_iHi(1,1011)=35 exch2_jLo(1,1011)=35 exch2_jHi(1,1011)=35 exch2_opposingSend(1,1011)=2 exch2_pij(1,1,1011)=1 exch2_pij(2,1,1011)=0 exch2_pij(3,1,1011)=0 exch2_pij(4,1,1011)=1 exch2_oi(1,1011)=0 exch2_oj(1,1011)=0 exch2_neighbourId(2,1011)=996 exch2_iLo(2,1011)=0 exch2_iHi(2,1011)=35 exch2_jLo(2,1011)=0 exch2_jHi(2,1011)=0 exch2_opposingSend(2,1011)=1 exch2_pij(1,2,1011)=1 exch2_pij(2,2,1011)=0 exch2_pij(3,2,1011)=0 exch2_pij(4,2,1011)=1 exch2_oi(2,1011)=0 exch2_oj(2,1011)=0 exch2_neighbourId(3,1011)=1012 exch2_iLo(3,1011)=35 exch2_iHi(3,1011)=35 exch2_jLo(3,1011)=0 exch2_jHi(3,1011)=35 exch2_opposingSend(3,1011)=4 exch2_pij(1,3,1011)=1 exch2_pij(2,3,1011)=0 exch2_pij(3,3,1011)=0 exch2_pij(4,3,1011)=1 exch2_oi(3,1011)=0 exch2_oj(3,1011)=0 exch2_neighbourId(4,1011)=1010 exch2_iLo(4,1011)=0 exch2_iHi(4,1011)=0 exch2_jLo(4,1011)=0 exch2_jHi(4,1011)=35 exch2_opposingSend(4,1011)=3 exch2_pij(1,4,1011)=1 exch2_pij(2,4,1011)=0 exch2_pij(3,4,1011)=0 exch2_pij(4,4,1011)=1 exch2_oi(4,1011)=0 exch2_oj(4,1011)=0 RETURN END SUBROUTINE W2_E2SETUP_1012 C Topology for tile 1012 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1012)=34 exch2_tNy(1012)=34 exch2_tBasex(1012)=204 exch2_tBasey(1012)=238 exch2_txGlobalo(1012)=2245 exch2_tyGlobalo(1012)=239 exch2_isWedge(1012)=0 exch2_isNedge(1012)=0 exch2_isEedge(1012)=0 exch2_isSedge(1012)=0 exch2_myFace(1012)=5 exch2_mydNx(1012)=510 exch2_mydNy(1012)=510 exch2_nNeighbours(1012)=4 exch2_neighbourId(1,1012)=1027 exch2_iLo(1,1012)=0 exch2_iHi(1,1012)=35 exch2_jLo(1,1012)=35 exch2_jHi(1,1012)=35 exch2_opposingSend(1,1012)=2 exch2_pij(1,1,1012)=1 exch2_pij(2,1,1012)=0 exch2_pij(3,1,1012)=0 exch2_pij(4,1,1012)=1 exch2_oi(1,1012)=0 exch2_oj(1,1012)=0 exch2_neighbourId(2,1012)=997 exch2_iLo(2,1012)=0 exch2_iHi(2,1012)=35 exch2_jLo(2,1012)=0 exch2_jHi(2,1012)=0 exch2_opposingSend(2,1012)=1 exch2_pij(1,2,1012)=1 exch2_pij(2,2,1012)=0 exch2_pij(3,2,1012)=0 exch2_pij(4,2,1012)=1 exch2_oi(2,1012)=0 exch2_oj(2,1012)=0 exch2_neighbourId(3,1012)=1013 exch2_iLo(3,1012)=35 exch2_iHi(3,1012)=35 exch2_jLo(3,1012)=0 exch2_jHi(3,1012)=35 exch2_opposingSend(3,1012)=4 exch2_pij(1,3,1012)=1 exch2_pij(2,3,1012)=0 exch2_pij(3,3,1012)=0 exch2_pij(4,3,1012)=1 exch2_oi(3,1012)=0 exch2_oj(3,1012)=0 exch2_neighbourId(4,1012)=1011 exch2_iLo(4,1012)=0 exch2_iHi(4,1012)=0 exch2_jLo(4,1012)=0 exch2_jHi(4,1012)=35 exch2_opposingSend(4,1012)=3 exch2_pij(1,4,1012)=1 exch2_pij(2,4,1012)=0 exch2_pij(3,4,1012)=0 exch2_pij(4,4,1012)=1 exch2_oi(4,1012)=0 exch2_oj(4,1012)=0 RETURN END SUBROUTINE W2_E2SETUP_1013 C Topology for tile 1013 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1013)=34 exch2_tNy(1013)=34 exch2_tBasex(1013)=238 exch2_tBasey(1013)=238 exch2_txGlobalo(1013)=2279 exch2_tyGlobalo(1013)=239 exch2_isWedge(1013)=0 exch2_isNedge(1013)=0 exch2_isEedge(1013)=0 exch2_isSedge(1013)=0 exch2_myFace(1013)=5 exch2_mydNx(1013)=510 exch2_mydNy(1013)=510 exch2_nNeighbours(1013)=4 exch2_neighbourId(1,1013)=1028 exch2_iLo(1,1013)=0 exch2_iHi(1,1013)=35 exch2_jLo(1,1013)=35 exch2_jHi(1,1013)=35 exch2_opposingSend(1,1013)=2 exch2_pij(1,1,1013)=1 exch2_pij(2,1,1013)=0 exch2_pij(3,1,1013)=0 exch2_pij(4,1,1013)=1 exch2_oi(1,1013)=0 exch2_oj(1,1013)=0 exch2_neighbourId(2,1013)=998 exch2_iLo(2,1013)=0 exch2_iHi(2,1013)=35 exch2_jLo(2,1013)=0 exch2_jHi(2,1013)=0 exch2_opposingSend(2,1013)=1 exch2_pij(1,2,1013)=1 exch2_pij(2,2,1013)=0 exch2_pij(3,2,1013)=0 exch2_pij(4,2,1013)=1 exch2_oi(2,1013)=0 exch2_oj(2,1013)=0 exch2_neighbourId(3,1013)=1014 exch2_iLo(3,1013)=35 exch2_iHi(3,1013)=35 exch2_jLo(3,1013)=0 exch2_jHi(3,1013)=35 exch2_opposingSend(3,1013)=4 exch2_pij(1,3,1013)=1 exch2_pij(2,3,1013)=0 exch2_pij(3,3,1013)=0 exch2_pij(4,3,1013)=1 exch2_oi(3,1013)=0 exch2_oj(3,1013)=0 exch2_neighbourId(4,1013)=1012 exch2_iLo(4,1013)=0 exch2_iHi(4,1013)=0 exch2_jLo(4,1013)=0 exch2_jHi(4,1013)=35 exch2_opposingSend(4,1013)=3 exch2_pij(1,4,1013)=1 exch2_pij(2,4,1013)=0 exch2_pij(3,4,1013)=0 exch2_pij(4,4,1013)=1 exch2_oi(4,1013)=0 exch2_oj(4,1013)=0 RETURN END SUBROUTINE W2_E2SETUP_1014 C Topology for tile 1014 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1014)=34 exch2_tNy(1014)=34 exch2_tBasex(1014)=272 exch2_tBasey(1014)=238 exch2_txGlobalo(1014)=2313 exch2_tyGlobalo(1014)=239 exch2_isWedge(1014)=0 exch2_isNedge(1014)=0 exch2_isEedge(1014)=0 exch2_isSedge(1014)=0 exch2_myFace(1014)=5 exch2_mydNx(1014)=510 exch2_mydNy(1014)=510 exch2_nNeighbours(1014)=4 exch2_neighbourId(1,1014)=1029 exch2_iLo(1,1014)=0 exch2_iHi(1,1014)=35 exch2_jLo(1,1014)=35 exch2_jHi(1,1014)=35 exch2_opposingSend(1,1014)=2 exch2_pij(1,1,1014)=1 exch2_pij(2,1,1014)=0 exch2_pij(3,1,1014)=0 exch2_pij(4,1,1014)=1 exch2_oi(1,1014)=0 exch2_oj(1,1014)=0 exch2_neighbourId(2,1014)=999 exch2_iLo(2,1014)=0 exch2_iHi(2,1014)=35 exch2_jLo(2,1014)=0 exch2_jHi(2,1014)=0 exch2_opposingSend(2,1014)=1 exch2_pij(1,2,1014)=1 exch2_pij(2,2,1014)=0 exch2_pij(3,2,1014)=0 exch2_pij(4,2,1014)=1 exch2_oi(2,1014)=0 exch2_oj(2,1014)=0 exch2_neighbourId(3,1014)=1015 exch2_iLo(3,1014)=35 exch2_iHi(3,1014)=35 exch2_jLo(3,1014)=0 exch2_jHi(3,1014)=35 exch2_opposingSend(3,1014)=4 exch2_pij(1,3,1014)=1 exch2_pij(2,3,1014)=0 exch2_pij(3,3,1014)=0 exch2_pij(4,3,1014)=1 exch2_oi(3,1014)=0 exch2_oj(3,1014)=0 exch2_neighbourId(4,1014)=1013 exch2_iLo(4,1014)=0 exch2_iHi(4,1014)=0 exch2_jLo(4,1014)=0 exch2_jHi(4,1014)=35 exch2_opposingSend(4,1014)=3 exch2_pij(1,4,1014)=1 exch2_pij(2,4,1014)=0 exch2_pij(3,4,1014)=0 exch2_pij(4,4,1014)=1 exch2_oi(4,1014)=0 exch2_oj(4,1014)=0 RETURN END SUBROUTINE W2_E2SETUP_1015 C Topology for tile 1015 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1015)=34 exch2_tNy(1015)=34 exch2_tBasex(1015)=306 exch2_tBasey(1015)=238 exch2_txGlobalo(1015)=2347 exch2_tyGlobalo(1015)=239 exch2_isWedge(1015)=0 exch2_isNedge(1015)=0 exch2_isEedge(1015)=0 exch2_isSedge(1015)=0 exch2_myFace(1015)=5 exch2_mydNx(1015)=510 exch2_mydNy(1015)=510 exch2_nNeighbours(1015)=4 exch2_neighbourId(1,1015)=1030 exch2_iLo(1,1015)=0 exch2_iHi(1,1015)=35 exch2_jLo(1,1015)=35 exch2_jHi(1,1015)=35 exch2_opposingSend(1,1015)=2 exch2_pij(1,1,1015)=1 exch2_pij(2,1,1015)=0 exch2_pij(3,1,1015)=0 exch2_pij(4,1,1015)=1 exch2_oi(1,1015)=0 exch2_oj(1,1015)=0 exch2_neighbourId(2,1015)=1000 exch2_iLo(2,1015)=0 exch2_iHi(2,1015)=35 exch2_jLo(2,1015)=0 exch2_jHi(2,1015)=0 exch2_opposingSend(2,1015)=1 exch2_pij(1,2,1015)=1 exch2_pij(2,2,1015)=0 exch2_pij(3,2,1015)=0 exch2_pij(4,2,1015)=1 exch2_oi(2,1015)=0 exch2_oj(2,1015)=0 exch2_neighbourId(3,1015)=1016 exch2_iLo(3,1015)=35 exch2_iHi(3,1015)=35 exch2_jLo(3,1015)=0 exch2_jHi(3,1015)=35 exch2_opposingSend(3,1015)=4 exch2_pij(1,3,1015)=1 exch2_pij(2,3,1015)=0 exch2_pij(3,3,1015)=0 exch2_pij(4,3,1015)=1 exch2_oi(3,1015)=0 exch2_oj(3,1015)=0 exch2_neighbourId(4,1015)=1014 exch2_iLo(4,1015)=0 exch2_iHi(4,1015)=0 exch2_jLo(4,1015)=0 exch2_jHi(4,1015)=35 exch2_opposingSend(4,1015)=3 exch2_pij(1,4,1015)=1 exch2_pij(2,4,1015)=0 exch2_pij(3,4,1015)=0 exch2_pij(4,4,1015)=1 exch2_oi(4,1015)=0 exch2_oj(4,1015)=0 RETURN END SUBROUTINE W2_E2SETUP_1016 C Topology for tile 1016 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1016)=34 exch2_tNy(1016)=34 exch2_tBasex(1016)=340 exch2_tBasey(1016)=238 exch2_txGlobalo(1016)=2381 exch2_tyGlobalo(1016)=239 exch2_isWedge(1016)=0 exch2_isNedge(1016)=0 exch2_isEedge(1016)=0 exch2_isSedge(1016)=0 exch2_myFace(1016)=5 exch2_mydNx(1016)=510 exch2_mydNy(1016)=510 exch2_nNeighbours(1016)=4 exch2_neighbourId(1,1016)=1031 exch2_iLo(1,1016)=0 exch2_iHi(1,1016)=35 exch2_jLo(1,1016)=35 exch2_jHi(1,1016)=35 exch2_opposingSend(1,1016)=2 exch2_pij(1,1,1016)=1 exch2_pij(2,1,1016)=0 exch2_pij(3,1,1016)=0 exch2_pij(4,1,1016)=1 exch2_oi(1,1016)=0 exch2_oj(1,1016)=0 exch2_neighbourId(2,1016)=1001 exch2_iLo(2,1016)=0 exch2_iHi(2,1016)=35 exch2_jLo(2,1016)=0 exch2_jHi(2,1016)=0 exch2_opposingSend(2,1016)=1 exch2_pij(1,2,1016)=1 exch2_pij(2,2,1016)=0 exch2_pij(3,2,1016)=0 exch2_pij(4,2,1016)=1 exch2_oi(2,1016)=0 exch2_oj(2,1016)=0 exch2_neighbourId(3,1016)=1017 exch2_iLo(3,1016)=35 exch2_iHi(3,1016)=35 exch2_jLo(3,1016)=0 exch2_jHi(3,1016)=35 exch2_opposingSend(3,1016)=4 exch2_pij(1,3,1016)=1 exch2_pij(2,3,1016)=0 exch2_pij(3,3,1016)=0 exch2_pij(4,3,1016)=1 exch2_oi(3,1016)=0 exch2_oj(3,1016)=0 exch2_neighbourId(4,1016)=1015 exch2_iLo(4,1016)=0 exch2_iHi(4,1016)=0 exch2_jLo(4,1016)=0 exch2_jHi(4,1016)=35 exch2_opposingSend(4,1016)=3 exch2_pij(1,4,1016)=1 exch2_pij(2,4,1016)=0 exch2_pij(3,4,1016)=0 exch2_pij(4,4,1016)=1 exch2_oi(4,1016)=0 exch2_oj(4,1016)=0 RETURN END SUBROUTINE W2_E2SETUP_1017 C Topology for tile 1017 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1017)=34 exch2_tNy(1017)=34 exch2_tBasex(1017)=374 exch2_tBasey(1017)=238 exch2_txGlobalo(1017)=2415 exch2_tyGlobalo(1017)=239 exch2_isWedge(1017)=0 exch2_isNedge(1017)=0 exch2_isEedge(1017)=0 exch2_isSedge(1017)=0 exch2_myFace(1017)=5 exch2_mydNx(1017)=510 exch2_mydNy(1017)=510 exch2_nNeighbours(1017)=4 exch2_neighbourId(1,1017)=1032 exch2_iLo(1,1017)=0 exch2_iHi(1,1017)=35 exch2_jLo(1,1017)=35 exch2_jHi(1,1017)=35 exch2_opposingSend(1,1017)=2 exch2_pij(1,1,1017)=1 exch2_pij(2,1,1017)=0 exch2_pij(3,1,1017)=0 exch2_pij(4,1,1017)=1 exch2_oi(1,1017)=0 exch2_oj(1,1017)=0 exch2_neighbourId(2,1017)=1002 exch2_iLo(2,1017)=0 exch2_iHi(2,1017)=35 exch2_jLo(2,1017)=0 exch2_jHi(2,1017)=0 exch2_opposingSend(2,1017)=1 exch2_pij(1,2,1017)=1 exch2_pij(2,2,1017)=0 exch2_pij(3,2,1017)=0 exch2_pij(4,2,1017)=1 exch2_oi(2,1017)=0 exch2_oj(2,1017)=0 exch2_neighbourId(3,1017)=1018 exch2_iLo(3,1017)=35 exch2_iHi(3,1017)=35 exch2_jLo(3,1017)=0 exch2_jHi(3,1017)=35 exch2_opposingSend(3,1017)=4 exch2_pij(1,3,1017)=1 exch2_pij(2,3,1017)=0 exch2_pij(3,3,1017)=0 exch2_pij(4,3,1017)=1 exch2_oi(3,1017)=0 exch2_oj(3,1017)=0 exch2_neighbourId(4,1017)=1016 exch2_iLo(4,1017)=0 exch2_iHi(4,1017)=0 exch2_jLo(4,1017)=0 exch2_jHi(4,1017)=35 exch2_opposingSend(4,1017)=3 exch2_pij(1,4,1017)=1 exch2_pij(2,4,1017)=0 exch2_pij(3,4,1017)=0 exch2_pij(4,4,1017)=1 exch2_oi(4,1017)=0 exch2_oj(4,1017)=0 RETURN END SUBROUTINE W2_E2SETUP_1018 C Topology for tile 1018 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1018)=34 exch2_tNy(1018)=34 exch2_tBasex(1018)=408 exch2_tBasey(1018)=238 exch2_txGlobalo(1018)=2449 exch2_tyGlobalo(1018)=239 exch2_isWedge(1018)=0 exch2_isNedge(1018)=0 exch2_isEedge(1018)=0 exch2_isSedge(1018)=0 exch2_myFace(1018)=5 exch2_mydNx(1018)=510 exch2_mydNy(1018)=510 exch2_nNeighbours(1018)=4 exch2_neighbourId(1,1018)=1033 exch2_iLo(1,1018)=0 exch2_iHi(1,1018)=35 exch2_jLo(1,1018)=35 exch2_jHi(1,1018)=35 exch2_opposingSend(1,1018)=2 exch2_pij(1,1,1018)=1 exch2_pij(2,1,1018)=0 exch2_pij(3,1,1018)=0 exch2_pij(4,1,1018)=1 exch2_oi(1,1018)=0 exch2_oj(1,1018)=0 exch2_neighbourId(2,1018)=1003 exch2_iLo(2,1018)=0 exch2_iHi(2,1018)=35 exch2_jLo(2,1018)=0 exch2_jHi(2,1018)=0 exch2_opposingSend(2,1018)=1 exch2_pij(1,2,1018)=1 exch2_pij(2,2,1018)=0 exch2_pij(3,2,1018)=0 exch2_pij(4,2,1018)=1 exch2_oi(2,1018)=0 exch2_oj(2,1018)=0 exch2_neighbourId(3,1018)=1019 exch2_iLo(3,1018)=35 exch2_iHi(3,1018)=35 exch2_jLo(3,1018)=0 exch2_jHi(3,1018)=35 exch2_opposingSend(3,1018)=4 exch2_pij(1,3,1018)=1 exch2_pij(2,3,1018)=0 exch2_pij(3,3,1018)=0 exch2_pij(4,3,1018)=1 exch2_oi(3,1018)=0 exch2_oj(3,1018)=0 exch2_neighbourId(4,1018)=1017 exch2_iLo(4,1018)=0 exch2_iHi(4,1018)=0 exch2_jLo(4,1018)=0 exch2_jHi(4,1018)=35 exch2_opposingSend(4,1018)=3 exch2_pij(1,4,1018)=1 exch2_pij(2,4,1018)=0 exch2_pij(3,4,1018)=0 exch2_pij(4,4,1018)=1 exch2_oi(4,1018)=0 exch2_oj(4,1018)=0 RETURN END SUBROUTINE W2_E2SETUP_1019 C Topology for tile 1019 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1019)=34 exch2_tNy(1019)=34 exch2_tBasex(1019)=442 exch2_tBasey(1019)=238 exch2_txGlobalo(1019)=2483 exch2_tyGlobalo(1019)=239 exch2_isWedge(1019)=0 exch2_isNedge(1019)=0 exch2_isEedge(1019)=0 exch2_isSedge(1019)=0 exch2_myFace(1019)=5 exch2_mydNx(1019)=510 exch2_mydNy(1019)=510 exch2_nNeighbours(1019)=4 exch2_neighbourId(1,1019)=1034 exch2_iLo(1,1019)=0 exch2_iHi(1,1019)=35 exch2_jLo(1,1019)=35 exch2_jHi(1,1019)=35 exch2_opposingSend(1,1019)=2 exch2_pij(1,1,1019)=1 exch2_pij(2,1,1019)=0 exch2_pij(3,1,1019)=0 exch2_pij(4,1,1019)=1 exch2_oi(1,1019)=0 exch2_oj(1,1019)=0 exch2_neighbourId(2,1019)=1004 exch2_iLo(2,1019)=0 exch2_iHi(2,1019)=35 exch2_jLo(2,1019)=0 exch2_jHi(2,1019)=0 exch2_opposingSend(2,1019)=1 exch2_pij(1,2,1019)=1 exch2_pij(2,2,1019)=0 exch2_pij(3,2,1019)=0 exch2_pij(4,2,1019)=1 exch2_oi(2,1019)=0 exch2_oj(2,1019)=0 exch2_neighbourId(3,1019)=1020 exch2_iLo(3,1019)=35 exch2_iHi(3,1019)=35 exch2_jLo(3,1019)=0 exch2_jHi(3,1019)=35 exch2_opposingSend(3,1019)=4 exch2_pij(1,3,1019)=1 exch2_pij(2,3,1019)=0 exch2_pij(3,3,1019)=0 exch2_pij(4,3,1019)=1 exch2_oi(3,1019)=0 exch2_oj(3,1019)=0 exch2_neighbourId(4,1019)=1018 exch2_iLo(4,1019)=0 exch2_iHi(4,1019)=0 exch2_jLo(4,1019)=0 exch2_jHi(4,1019)=35 exch2_opposingSend(4,1019)=3 exch2_pij(1,4,1019)=1 exch2_pij(2,4,1019)=0 exch2_pij(3,4,1019)=0 exch2_pij(4,4,1019)=1 exch2_oi(4,1019)=0 exch2_oj(4,1019)=0 RETURN END SUBROUTINE W2_E2SETUP_1020 C Topology for tile 1020 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1020)=34 exch2_tNy(1020)=34 exch2_tBasex(1020)=476 exch2_tBasey(1020)=238 exch2_txGlobalo(1020)=2517 exch2_tyGlobalo(1020)=239 exch2_isWedge(1020)=0 exch2_isNedge(1020)=0 exch2_isEedge(1020)=1 exch2_isSedge(1020)=0 exch2_myFace(1020)=5 exch2_mydNx(1020)=510 exch2_mydNy(1020)=510 exch2_nNeighbours(1020)=4 exch2_neighbourId(1,1020)=1035 exch2_iLo(1,1020)=0 exch2_iHi(1,1020)=35 exch2_jLo(1,1020)=35 exch2_jHi(1,1020)=35 exch2_opposingSend(1,1020)=2 exch2_pij(1,1,1020)=1 exch2_pij(2,1,1020)=0 exch2_pij(3,1,1020)=0 exch2_pij(4,1,1020)=1 exch2_oi(1,1020)=0 exch2_oj(1,1020)=0 exch2_neighbourId(2,1020)=1005 exch2_iLo(2,1020)=0 exch2_iHi(2,1020)=35 exch2_jLo(2,1020)=0 exch2_jHi(2,1020)=0 exch2_opposingSend(2,1020)=1 exch2_pij(1,2,1020)=1 exch2_pij(2,2,1020)=0 exch2_pij(3,2,1020)=0 exch2_pij(4,2,1020)=1 exch2_oi(2,1020)=0 exch2_oj(2,1020)=0 exch2_neighbourId(3,1020)=1231 exch2_iLo(3,1020)=35 exch2_iHi(3,1020)=35 exch2_jLo(3,1020)=0 exch2_jHi(3,1020)=35 exch2_opposingSend(3,1020)=4 exch2_pij(1,3,1020)=1 exch2_pij(2,3,1020)=0 exch2_pij(3,3,1020)=0 exch2_pij(4,3,1020)=1 exch2_oi(3,1020)=510 exch2_oj(3,1020)=0 exch2_neighbourId(4,1020)=1019 exch2_iLo(4,1020)=0 exch2_iHi(4,1020)=0 exch2_jLo(4,1020)=0 exch2_jHi(4,1020)=35 exch2_opposingSend(4,1020)=3 exch2_pij(1,4,1020)=1 exch2_pij(2,4,1020)=0 exch2_pij(3,4,1020)=0 exch2_pij(4,4,1020)=1 exch2_oi(4,1020)=0 exch2_oj(4,1020)=0 RETURN END SUBROUTINE W2_E2SETUP_1021 C Topology for tile 1021 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1021)=34 exch2_tNy(1021)=34 exch2_tBasex(1021)=0 exch2_tBasey(1021)=272 exch2_txGlobalo(1021)=2041 exch2_tyGlobalo(1021)=273 exch2_isWedge(1021)=1 exch2_isNedge(1021)=0 exch2_isEedge(1021)=0 exch2_isSedge(1021)=0 exch2_myFace(1021)=5 exch2_mydNx(1021)=510 exch2_mydNy(1021)=510 exch2_nNeighbours(1021)=4 exch2_neighbourId(1,1021)=1036 exch2_iLo(1,1021)=0 exch2_iHi(1,1021)=35 exch2_jLo(1,1021)=35 exch2_jHi(1,1021)=35 exch2_opposingSend(1,1021)=2 exch2_pij(1,1,1021)=1 exch2_pij(2,1,1021)=0 exch2_pij(3,1,1021)=0 exch2_pij(4,1,1021)=1 exch2_oi(1,1021)=0 exch2_oj(1,1021)=0 exch2_neighbourId(2,1021)=1006 exch2_iLo(2,1021)=0 exch2_iHi(2,1021)=35 exch2_jLo(2,1021)=0 exch2_jHi(2,1021)=0 exch2_opposingSend(2,1021)=1 exch2_pij(1,2,1021)=1 exch2_pij(2,2,1021)=0 exch2_pij(3,2,1021)=0 exch2_pij(4,2,1021)=1 exch2_oi(2,1021)=0 exch2_oj(2,1021)=0 exch2_neighbourId(3,1021)=1022 exch2_iLo(3,1021)=35 exch2_iHi(3,1021)=35 exch2_jLo(3,1021)=0 exch2_jHi(3,1021)=35 exch2_opposingSend(3,1021)=4 exch2_pij(1,3,1021)=1 exch2_pij(2,3,1021)=0 exch2_pij(3,3,1021)=0 exch2_pij(4,3,1021)=1 exch2_oi(3,1021)=0 exch2_oj(3,1021)=0 exch2_neighbourId(4,1021)=667 exch2_iLo(4,1021)=0 exch2_iHi(4,1021)=0 exch2_jLo(4,1021)=0 exch2_jHi(4,1021)=35 exch2_opposingSend(4,1021)=1 exch2_pij(1,4,1021)=0 exch2_pij(2,4,1021)=1 exch2_pij(3,4,1021)=-1 exch2_pij(4,4,1021)=0 exch2_oi(4,1021)=-510 exch2_oj(4,1021)=511 RETURN END SUBROUTINE W2_E2SETUP_1022 C Topology for tile 1022 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1022)=34 exch2_tNy(1022)=34 exch2_tBasex(1022)=34 exch2_tBasey(1022)=272 exch2_txGlobalo(1022)=2075 exch2_tyGlobalo(1022)=273 exch2_isWedge(1022)=0 exch2_isNedge(1022)=0 exch2_isEedge(1022)=0 exch2_isSedge(1022)=0 exch2_myFace(1022)=5 exch2_mydNx(1022)=510 exch2_mydNy(1022)=510 exch2_nNeighbours(1022)=4 exch2_neighbourId(1,1022)=1037 exch2_iLo(1,1022)=0 exch2_iHi(1,1022)=35 exch2_jLo(1,1022)=35 exch2_jHi(1,1022)=35 exch2_opposingSend(1,1022)=2 exch2_pij(1,1,1022)=1 exch2_pij(2,1,1022)=0 exch2_pij(3,1,1022)=0 exch2_pij(4,1,1022)=1 exch2_oi(1,1022)=0 exch2_oj(1,1022)=0 exch2_neighbourId(2,1022)=1007 exch2_iLo(2,1022)=0 exch2_iHi(2,1022)=35 exch2_jLo(2,1022)=0 exch2_jHi(2,1022)=0 exch2_opposingSend(2,1022)=1 exch2_pij(1,2,1022)=1 exch2_pij(2,2,1022)=0 exch2_pij(3,2,1022)=0 exch2_pij(4,2,1022)=1 exch2_oi(2,1022)=0 exch2_oj(2,1022)=0 exch2_neighbourId(3,1022)=1023 exch2_iLo(3,1022)=35 exch2_iHi(3,1022)=35 exch2_jLo(3,1022)=0 exch2_jHi(3,1022)=35 exch2_opposingSend(3,1022)=4 exch2_pij(1,3,1022)=1 exch2_pij(2,3,1022)=0 exch2_pij(3,3,1022)=0 exch2_pij(4,3,1022)=1 exch2_oi(3,1022)=0 exch2_oj(3,1022)=0 exch2_neighbourId(4,1022)=1021 exch2_iLo(4,1022)=0 exch2_iHi(4,1022)=0 exch2_jLo(4,1022)=0 exch2_jHi(4,1022)=35 exch2_opposingSend(4,1022)=3 exch2_pij(1,4,1022)=1 exch2_pij(2,4,1022)=0 exch2_pij(3,4,1022)=0 exch2_pij(4,4,1022)=1 exch2_oi(4,1022)=0 exch2_oj(4,1022)=0 RETURN END SUBROUTINE W2_E2SETUP_1023 C Topology for tile 1023 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1023)=34 exch2_tNy(1023)=34 exch2_tBasex(1023)=68 exch2_tBasey(1023)=272 exch2_txGlobalo(1023)=2109 exch2_tyGlobalo(1023)=273 exch2_isWedge(1023)=0 exch2_isNedge(1023)=0 exch2_isEedge(1023)=0 exch2_isSedge(1023)=0 exch2_myFace(1023)=5 exch2_mydNx(1023)=510 exch2_mydNy(1023)=510 exch2_nNeighbours(1023)=4 exch2_neighbourId(1,1023)=1038 exch2_iLo(1,1023)=0 exch2_iHi(1,1023)=35 exch2_jLo(1,1023)=35 exch2_jHi(1,1023)=35 exch2_opposingSend(1,1023)=2 exch2_pij(1,1,1023)=1 exch2_pij(2,1,1023)=0 exch2_pij(3,1,1023)=0 exch2_pij(4,1,1023)=1 exch2_oi(1,1023)=0 exch2_oj(1,1023)=0 exch2_neighbourId(2,1023)=1008 exch2_iLo(2,1023)=0 exch2_iHi(2,1023)=35 exch2_jLo(2,1023)=0 exch2_jHi(2,1023)=0 exch2_opposingSend(2,1023)=1 exch2_pij(1,2,1023)=1 exch2_pij(2,2,1023)=0 exch2_pij(3,2,1023)=0 exch2_pij(4,2,1023)=1 exch2_oi(2,1023)=0 exch2_oj(2,1023)=0 exch2_neighbourId(3,1023)=1024 exch2_iLo(3,1023)=35 exch2_iHi(3,1023)=35 exch2_jLo(3,1023)=0 exch2_jHi(3,1023)=35 exch2_opposingSend(3,1023)=4 exch2_pij(1,3,1023)=1 exch2_pij(2,3,1023)=0 exch2_pij(3,3,1023)=0 exch2_pij(4,3,1023)=1 exch2_oi(3,1023)=0 exch2_oj(3,1023)=0 exch2_neighbourId(4,1023)=1022 exch2_iLo(4,1023)=0 exch2_iHi(4,1023)=0 exch2_jLo(4,1023)=0 exch2_jHi(4,1023)=35 exch2_opposingSend(4,1023)=3 exch2_pij(1,4,1023)=1 exch2_pij(2,4,1023)=0 exch2_pij(3,4,1023)=0 exch2_pij(4,4,1023)=1 exch2_oi(4,1023)=0 exch2_oj(4,1023)=0 RETURN END SUBROUTINE W2_E2SETUP_1024 C Topology for tile 1024 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1024)=34 exch2_tNy(1024)=34 exch2_tBasex(1024)=102 exch2_tBasey(1024)=272 exch2_txGlobalo(1024)=2143 exch2_tyGlobalo(1024)=273 exch2_isWedge(1024)=0 exch2_isNedge(1024)=0 exch2_isEedge(1024)=0 exch2_isSedge(1024)=0 exch2_myFace(1024)=5 exch2_mydNx(1024)=510 exch2_mydNy(1024)=510 exch2_nNeighbours(1024)=4 exch2_neighbourId(1,1024)=1039 exch2_iLo(1,1024)=0 exch2_iHi(1,1024)=35 exch2_jLo(1,1024)=35 exch2_jHi(1,1024)=35 exch2_opposingSend(1,1024)=2 exch2_pij(1,1,1024)=1 exch2_pij(2,1,1024)=0 exch2_pij(3,1,1024)=0 exch2_pij(4,1,1024)=1 exch2_oi(1,1024)=0 exch2_oj(1,1024)=0 exch2_neighbourId(2,1024)=1009 exch2_iLo(2,1024)=0 exch2_iHi(2,1024)=35 exch2_jLo(2,1024)=0 exch2_jHi(2,1024)=0 exch2_opposingSend(2,1024)=1 exch2_pij(1,2,1024)=1 exch2_pij(2,2,1024)=0 exch2_pij(3,2,1024)=0 exch2_pij(4,2,1024)=1 exch2_oi(2,1024)=0 exch2_oj(2,1024)=0 exch2_neighbourId(3,1024)=1025 exch2_iLo(3,1024)=35 exch2_iHi(3,1024)=35 exch2_jLo(3,1024)=0 exch2_jHi(3,1024)=35 exch2_opposingSend(3,1024)=4 exch2_pij(1,3,1024)=1 exch2_pij(2,3,1024)=0 exch2_pij(3,3,1024)=0 exch2_pij(4,3,1024)=1 exch2_oi(3,1024)=0 exch2_oj(3,1024)=0 exch2_neighbourId(4,1024)=1023 exch2_iLo(4,1024)=0 exch2_iHi(4,1024)=0 exch2_jLo(4,1024)=0 exch2_jHi(4,1024)=35 exch2_opposingSend(4,1024)=3 exch2_pij(1,4,1024)=1 exch2_pij(2,4,1024)=0 exch2_pij(3,4,1024)=0 exch2_pij(4,4,1024)=1 exch2_oi(4,1024)=0 exch2_oj(4,1024)=0 RETURN END SUBROUTINE W2_E2SETUP_1025 C Topology for tile 1025 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1025)=34 exch2_tNy(1025)=34 exch2_tBasex(1025)=136 exch2_tBasey(1025)=272 exch2_txGlobalo(1025)=2177 exch2_tyGlobalo(1025)=273 exch2_isWedge(1025)=0 exch2_isNedge(1025)=0 exch2_isEedge(1025)=0 exch2_isSedge(1025)=0 exch2_myFace(1025)=5 exch2_mydNx(1025)=510 exch2_mydNy(1025)=510 exch2_nNeighbours(1025)=4 exch2_neighbourId(1,1025)=1040 exch2_iLo(1,1025)=0 exch2_iHi(1,1025)=35 exch2_jLo(1,1025)=35 exch2_jHi(1,1025)=35 exch2_opposingSend(1,1025)=2 exch2_pij(1,1,1025)=1 exch2_pij(2,1,1025)=0 exch2_pij(3,1,1025)=0 exch2_pij(4,1,1025)=1 exch2_oi(1,1025)=0 exch2_oj(1,1025)=0 exch2_neighbourId(2,1025)=1010 exch2_iLo(2,1025)=0 exch2_iHi(2,1025)=35 exch2_jLo(2,1025)=0 exch2_jHi(2,1025)=0 exch2_opposingSend(2,1025)=1 exch2_pij(1,2,1025)=1 exch2_pij(2,2,1025)=0 exch2_pij(3,2,1025)=0 exch2_pij(4,2,1025)=1 exch2_oi(2,1025)=0 exch2_oj(2,1025)=0 exch2_neighbourId(3,1025)=1026 exch2_iLo(3,1025)=35 exch2_iHi(3,1025)=35 exch2_jLo(3,1025)=0 exch2_jHi(3,1025)=35 exch2_opposingSend(3,1025)=4 exch2_pij(1,3,1025)=1 exch2_pij(2,3,1025)=0 exch2_pij(3,3,1025)=0 exch2_pij(4,3,1025)=1 exch2_oi(3,1025)=0 exch2_oj(3,1025)=0 exch2_neighbourId(4,1025)=1024 exch2_iLo(4,1025)=0 exch2_iHi(4,1025)=0 exch2_jLo(4,1025)=0 exch2_jHi(4,1025)=35 exch2_opposingSend(4,1025)=3 exch2_pij(1,4,1025)=1 exch2_pij(2,4,1025)=0 exch2_pij(3,4,1025)=0 exch2_pij(4,4,1025)=1 exch2_oi(4,1025)=0 exch2_oj(4,1025)=0 RETURN END SUBROUTINE W2_E2SETUP_1026 C Topology for tile 1026 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1026)=34 exch2_tNy(1026)=34 exch2_tBasex(1026)=170 exch2_tBasey(1026)=272 exch2_txGlobalo(1026)=2211 exch2_tyGlobalo(1026)=273 exch2_isWedge(1026)=0 exch2_isNedge(1026)=0 exch2_isEedge(1026)=0 exch2_isSedge(1026)=0 exch2_myFace(1026)=5 exch2_mydNx(1026)=510 exch2_mydNy(1026)=510 exch2_nNeighbours(1026)=4 exch2_neighbourId(1,1026)=1041 exch2_iLo(1,1026)=0 exch2_iHi(1,1026)=35 exch2_jLo(1,1026)=35 exch2_jHi(1,1026)=35 exch2_opposingSend(1,1026)=2 exch2_pij(1,1,1026)=1 exch2_pij(2,1,1026)=0 exch2_pij(3,1,1026)=0 exch2_pij(4,1,1026)=1 exch2_oi(1,1026)=0 exch2_oj(1,1026)=0 exch2_neighbourId(2,1026)=1011 exch2_iLo(2,1026)=0 exch2_iHi(2,1026)=35 exch2_jLo(2,1026)=0 exch2_jHi(2,1026)=0 exch2_opposingSend(2,1026)=1 exch2_pij(1,2,1026)=1 exch2_pij(2,2,1026)=0 exch2_pij(3,2,1026)=0 exch2_pij(4,2,1026)=1 exch2_oi(2,1026)=0 exch2_oj(2,1026)=0 exch2_neighbourId(3,1026)=1027 exch2_iLo(3,1026)=35 exch2_iHi(3,1026)=35 exch2_jLo(3,1026)=0 exch2_jHi(3,1026)=35 exch2_opposingSend(3,1026)=4 exch2_pij(1,3,1026)=1 exch2_pij(2,3,1026)=0 exch2_pij(3,3,1026)=0 exch2_pij(4,3,1026)=1 exch2_oi(3,1026)=0 exch2_oj(3,1026)=0 exch2_neighbourId(4,1026)=1025 exch2_iLo(4,1026)=0 exch2_iHi(4,1026)=0 exch2_jLo(4,1026)=0 exch2_jHi(4,1026)=35 exch2_opposingSend(4,1026)=3 exch2_pij(1,4,1026)=1 exch2_pij(2,4,1026)=0 exch2_pij(3,4,1026)=0 exch2_pij(4,4,1026)=1 exch2_oi(4,1026)=0 exch2_oj(4,1026)=0 RETURN END SUBROUTINE W2_E2SETUP_1027 C Topology for tile 1027 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1027)=34 exch2_tNy(1027)=34 exch2_tBasex(1027)=204 exch2_tBasey(1027)=272 exch2_txGlobalo(1027)=2245 exch2_tyGlobalo(1027)=273 exch2_isWedge(1027)=0 exch2_isNedge(1027)=0 exch2_isEedge(1027)=0 exch2_isSedge(1027)=0 exch2_myFace(1027)=5 exch2_mydNx(1027)=510 exch2_mydNy(1027)=510 exch2_nNeighbours(1027)=4 exch2_neighbourId(1,1027)=1042 exch2_iLo(1,1027)=0 exch2_iHi(1,1027)=35 exch2_jLo(1,1027)=35 exch2_jHi(1,1027)=35 exch2_opposingSend(1,1027)=2 exch2_pij(1,1,1027)=1 exch2_pij(2,1,1027)=0 exch2_pij(3,1,1027)=0 exch2_pij(4,1,1027)=1 exch2_oi(1,1027)=0 exch2_oj(1,1027)=0 exch2_neighbourId(2,1027)=1012 exch2_iLo(2,1027)=0 exch2_iHi(2,1027)=35 exch2_jLo(2,1027)=0 exch2_jHi(2,1027)=0 exch2_opposingSend(2,1027)=1 exch2_pij(1,2,1027)=1 exch2_pij(2,2,1027)=0 exch2_pij(3,2,1027)=0 exch2_pij(4,2,1027)=1 exch2_oi(2,1027)=0 exch2_oj(2,1027)=0 exch2_neighbourId(3,1027)=1028 exch2_iLo(3,1027)=35 exch2_iHi(3,1027)=35 exch2_jLo(3,1027)=0 exch2_jHi(3,1027)=35 exch2_opposingSend(3,1027)=4 exch2_pij(1,3,1027)=1 exch2_pij(2,3,1027)=0 exch2_pij(3,3,1027)=0 exch2_pij(4,3,1027)=1 exch2_oi(3,1027)=0 exch2_oj(3,1027)=0 exch2_neighbourId(4,1027)=1026 exch2_iLo(4,1027)=0 exch2_iHi(4,1027)=0 exch2_jLo(4,1027)=0 exch2_jHi(4,1027)=35 exch2_opposingSend(4,1027)=3 exch2_pij(1,4,1027)=1 exch2_pij(2,4,1027)=0 exch2_pij(3,4,1027)=0 exch2_pij(4,4,1027)=1 exch2_oi(4,1027)=0 exch2_oj(4,1027)=0 RETURN END SUBROUTINE W2_E2SETUP_1028 C Topology for tile 1028 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1028)=34 exch2_tNy(1028)=34 exch2_tBasex(1028)=238 exch2_tBasey(1028)=272 exch2_txGlobalo(1028)=2279 exch2_tyGlobalo(1028)=273 exch2_isWedge(1028)=0 exch2_isNedge(1028)=0 exch2_isEedge(1028)=0 exch2_isSedge(1028)=0 exch2_myFace(1028)=5 exch2_mydNx(1028)=510 exch2_mydNy(1028)=510 exch2_nNeighbours(1028)=4 exch2_neighbourId(1,1028)=1043 exch2_iLo(1,1028)=0 exch2_iHi(1,1028)=35 exch2_jLo(1,1028)=35 exch2_jHi(1,1028)=35 exch2_opposingSend(1,1028)=2 exch2_pij(1,1,1028)=1 exch2_pij(2,1,1028)=0 exch2_pij(3,1,1028)=0 exch2_pij(4,1,1028)=1 exch2_oi(1,1028)=0 exch2_oj(1,1028)=0 exch2_neighbourId(2,1028)=1013 exch2_iLo(2,1028)=0 exch2_iHi(2,1028)=35 exch2_jLo(2,1028)=0 exch2_jHi(2,1028)=0 exch2_opposingSend(2,1028)=1 exch2_pij(1,2,1028)=1 exch2_pij(2,2,1028)=0 exch2_pij(3,2,1028)=0 exch2_pij(4,2,1028)=1 exch2_oi(2,1028)=0 exch2_oj(2,1028)=0 exch2_neighbourId(3,1028)=1029 exch2_iLo(3,1028)=35 exch2_iHi(3,1028)=35 exch2_jLo(3,1028)=0 exch2_jHi(3,1028)=35 exch2_opposingSend(3,1028)=4 exch2_pij(1,3,1028)=1 exch2_pij(2,3,1028)=0 exch2_pij(3,3,1028)=0 exch2_pij(4,3,1028)=1 exch2_oi(3,1028)=0 exch2_oj(3,1028)=0 exch2_neighbourId(4,1028)=1027 exch2_iLo(4,1028)=0 exch2_iHi(4,1028)=0 exch2_jLo(4,1028)=0 exch2_jHi(4,1028)=35 exch2_opposingSend(4,1028)=3 exch2_pij(1,4,1028)=1 exch2_pij(2,4,1028)=0 exch2_pij(3,4,1028)=0 exch2_pij(4,4,1028)=1 exch2_oi(4,1028)=0 exch2_oj(4,1028)=0 RETURN END SUBROUTINE W2_E2SETUP_1029 C Topology for tile 1029 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1029)=34 exch2_tNy(1029)=34 exch2_tBasex(1029)=272 exch2_tBasey(1029)=272 exch2_txGlobalo(1029)=2313 exch2_tyGlobalo(1029)=273 exch2_isWedge(1029)=0 exch2_isNedge(1029)=0 exch2_isEedge(1029)=0 exch2_isSedge(1029)=0 exch2_myFace(1029)=5 exch2_mydNx(1029)=510 exch2_mydNy(1029)=510 exch2_nNeighbours(1029)=4 exch2_neighbourId(1,1029)=1044 exch2_iLo(1,1029)=0 exch2_iHi(1,1029)=35 exch2_jLo(1,1029)=35 exch2_jHi(1,1029)=35 exch2_opposingSend(1,1029)=2 exch2_pij(1,1,1029)=1 exch2_pij(2,1,1029)=0 exch2_pij(3,1,1029)=0 exch2_pij(4,1,1029)=1 exch2_oi(1,1029)=0 exch2_oj(1,1029)=0 exch2_neighbourId(2,1029)=1014 exch2_iLo(2,1029)=0 exch2_iHi(2,1029)=35 exch2_jLo(2,1029)=0 exch2_jHi(2,1029)=0 exch2_opposingSend(2,1029)=1 exch2_pij(1,2,1029)=1 exch2_pij(2,2,1029)=0 exch2_pij(3,2,1029)=0 exch2_pij(4,2,1029)=1 exch2_oi(2,1029)=0 exch2_oj(2,1029)=0 exch2_neighbourId(3,1029)=1030 exch2_iLo(3,1029)=35 exch2_iHi(3,1029)=35 exch2_jLo(3,1029)=0 exch2_jHi(3,1029)=35 exch2_opposingSend(3,1029)=4 exch2_pij(1,3,1029)=1 exch2_pij(2,3,1029)=0 exch2_pij(3,3,1029)=0 exch2_pij(4,3,1029)=1 exch2_oi(3,1029)=0 exch2_oj(3,1029)=0 exch2_neighbourId(4,1029)=1028 exch2_iLo(4,1029)=0 exch2_iHi(4,1029)=0 exch2_jLo(4,1029)=0 exch2_jHi(4,1029)=35 exch2_opposingSend(4,1029)=3 exch2_pij(1,4,1029)=1 exch2_pij(2,4,1029)=0 exch2_pij(3,4,1029)=0 exch2_pij(4,4,1029)=1 exch2_oi(4,1029)=0 exch2_oj(4,1029)=0 RETURN END SUBROUTINE W2_E2SETUP_1030 C Topology for tile 1030 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1030)=34 exch2_tNy(1030)=34 exch2_tBasex(1030)=306 exch2_tBasey(1030)=272 exch2_txGlobalo(1030)=2347 exch2_tyGlobalo(1030)=273 exch2_isWedge(1030)=0 exch2_isNedge(1030)=0 exch2_isEedge(1030)=0 exch2_isSedge(1030)=0 exch2_myFace(1030)=5 exch2_mydNx(1030)=510 exch2_mydNy(1030)=510 exch2_nNeighbours(1030)=4 exch2_neighbourId(1,1030)=1045 exch2_iLo(1,1030)=0 exch2_iHi(1,1030)=35 exch2_jLo(1,1030)=35 exch2_jHi(1,1030)=35 exch2_opposingSend(1,1030)=2 exch2_pij(1,1,1030)=1 exch2_pij(2,1,1030)=0 exch2_pij(3,1,1030)=0 exch2_pij(4,1,1030)=1 exch2_oi(1,1030)=0 exch2_oj(1,1030)=0 exch2_neighbourId(2,1030)=1015 exch2_iLo(2,1030)=0 exch2_iHi(2,1030)=35 exch2_jLo(2,1030)=0 exch2_jHi(2,1030)=0 exch2_opposingSend(2,1030)=1 exch2_pij(1,2,1030)=1 exch2_pij(2,2,1030)=0 exch2_pij(3,2,1030)=0 exch2_pij(4,2,1030)=1 exch2_oi(2,1030)=0 exch2_oj(2,1030)=0 exch2_neighbourId(3,1030)=1031 exch2_iLo(3,1030)=35 exch2_iHi(3,1030)=35 exch2_jLo(3,1030)=0 exch2_jHi(3,1030)=35 exch2_opposingSend(3,1030)=4 exch2_pij(1,3,1030)=1 exch2_pij(2,3,1030)=0 exch2_pij(3,3,1030)=0 exch2_pij(4,3,1030)=1 exch2_oi(3,1030)=0 exch2_oj(3,1030)=0 exch2_neighbourId(4,1030)=1029 exch2_iLo(4,1030)=0 exch2_iHi(4,1030)=0 exch2_jLo(4,1030)=0 exch2_jHi(4,1030)=35 exch2_opposingSend(4,1030)=3 exch2_pij(1,4,1030)=1 exch2_pij(2,4,1030)=0 exch2_pij(3,4,1030)=0 exch2_pij(4,4,1030)=1 exch2_oi(4,1030)=0 exch2_oj(4,1030)=0 RETURN END SUBROUTINE W2_E2SETUP_1031 C Topology for tile 1031 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1031)=34 exch2_tNy(1031)=34 exch2_tBasex(1031)=340 exch2_tBasey(1031)=272 exch2_txGlobalo(1031)=2381 exch2_tyGlobalo(1031)=273 exch2_isWedge(1031)=0 exch2_isNedge(1031)=0 exch2_isEedge(1031)=0 exch2_isSedge(1031)=0 exch2_myFace(1031)=5 exch2_mydNx(1031)=510 exch2_mydNy(1031)=510 exch2_nNeighbours(1031)=4 exch2_neighbourId(1,1031)=1046 exch2_iLo(1,1031)=0 exch2_iHi(1,1031)=35 exch2_jLo(1,1031)=35 exch2_jHi(1,1031)=35 exch2_opposingSend(1,1031)=2 exch2_pij(1,1,1031)=1 exch2_pij(2,1,1031)=0 exch2_pij(3,1,1031)=0 exch2_pij(4,1,1031)=1 exch2_oi(1,1031)=0 exch2_oj(1,1031)=0 exch2_neighbourId(2,1031)=1016 exch2_iLo(2,1031)=0 exch2_iHi(2,1031)=35 exch2_jLo(2,1031)=0 exch2_jHi(2,1031)=0 exch2_opposingSend(2,1031)=1 exch2_pij(1,2,1031)=1 exch2_pij(2,2,1031)=0 exch2_pij(3,2,1031)=0 exch2_pij(4,2,1031)=1 exch2_oi(2,1031)=0 exch2_oj(2,1031)=0 exch2_neighbourId(3,1031)=1032 exch2_iLo(3,1031)=35 exch2_iHi(3,1031)=35 exch2_jLo(3,1031)=0 exch2_jHi(3,1031)=35 exch2_opposingSend(3,1031)=4 exch2_pij(1,3,1031)=1 exch2_pij(2,3,1031)=0 exch2_pij(3,3,1031)=0 exch2_pij(4,3,1031)=1 exch2_oi(3,1031)=0 exch2_oj(3,1031)=0 exch2_neighbourId(4,1031)=1030 exch2_iLo(4,1031)=0 exch2_iHi(4,1031)=0 exch2_jLo(4,1031)=0 exch2_jHi(4,1031)=35 exch2_opposingSend(4,1031)=3 exch2_pij(1,4,1031)=1 exch2_pij(2,4,1031)=0 exch2_pij(3,4,1031)=0 exch2_pij(4,4,1031)=1 exch2_oi(4,1031)=0 exch2_oj(4,1031)=0 RETURN END SUBROUTINE W2_E2SETUP_1032 C Topology for tile 1032 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1032)=34 exch2_tNy(1032)=34 exch2_tBasex(1032)=374 exch2_tBasey(1032)=272 exch2_txGlobalo(1032)=2415 exch2_tyGlobalo(1032)=273 exch2_isWedge(1032)=0 exch2_isNedge(1032)=0 exch2_isEedge(1032)=0 exch2_isSedge(1032)=0 exch2_myFace(1032)=5 exch2_mydNx(1032)=510 exch2_mydNy(1032)=510 exch2_nNeighbours(1032)=4 exch2_neighbourId(1,1032)=1047 exch2_iLo(1,1032)=0 exch2_iHi(1,1032)=35 exch2_jLo(1,1032)=35 exch2_jHi(1,1032)=35 exch2_opposingSend(1,1032)=2 exch2_pij(1,1,1032)=1 exch2_pij(2,1,1032)=0 exch2_pij(3,1,1032)=0 exch2_pij(4,1,1032)=1 exch2_oi(1,1032)=0 exch2_oj(1,1032)=0 exch2_neighbourId(2,1032)=1017 exch2_iLo(2,1032)=0 exch2_iHi(2,1032)=35 exch2_jLo(2,1032)=0 exch2_jHi(2,1032)=0 exch2_opposingSend(2,1032)=1 exch2_pij(1,2,1032)=1 exch2_pij(2,2,1032)=0 exch2_pij(3,2,1032)=0 exch2_pij(4,2,1032)=1 exch2_oi(2,1032)=0 exch2_oj(2,1032)=0 exch2_neighbourId(3,1032)=1033 exch2_iLo(3,1032)=35 exch2_iHi(3,1032)=35 exch2_jLo(3,1032)=0 exch2_jHi(3,1032)=35 exch2_opposingSend(3,1032)=4 exch2_pij(1,3,1032)=1 exch2_pij(2,3,1032)=0 exch2_pij(3,3,1032)=0 exch2_pij(4,3,1032)=1 exch2_oi(3,1032)=0 exch2_oj(3,1032)=0 exch2_neighbourId(4,1032)=1031 exch2_iLo(4,1032)=0 exch2_iHi(4,1032)=0 exch2_jLo(4,1032)=0 exch2_jHi(4,1032)=35 exch2_opposingSend(4,1032)=3 exch2_pij(1,4,1032)=1 exch2_pij(2,4,1032)=0 exch2_pij(3,4,1032)=0 exch2_pij(4,4,1032)=1 exch2_oi(4,1032)=0 exch2_oj(4,1032)=0 RETURN END SUBROUTINE W2_E2SETUP_1033 C Topology for tile 1033 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1033)=34 exch2_tNy(1033)=34 exch2_tBasex(1033)=408 exch2_tBasey(1033)=272 exch2_txGlobalo(1033)=2449 exch2_tyGlobalo(1033)=273 exch2_isWedge(1033)=0 exch2_isNedge(1033)=0 exch2_isEedge(1033)=0 exch2_isSedge(1033)=0 exch2_myFace(1033)=5 exch2_mydNx(1033)=510 exch2_mydNy(1033)=510 exch2_nNeighbours(1033)=4 exch2_neighbourId(1,1033)=1048 exch2_iLo(1,1033)=0 exch2_iHi(1,1033)=35 exch2_jLo(1,1033)=35 exch2_jHi(1,1033)=35 exch2_opposingSend(1,1033)=2 exch2_pij(1,1,1033)=1 exch2_pij(2,1,1033)=0 exch2_pij(3,1,1033)=0 exch2_pij(4,1,1033)=1 exch2_oi(1,1033)=0 exch2_oj(1,1033)=0 exch2_neighbourId(2,1033)=1018 exch2_iLo(2,1033)=0 exch2_iHi(2,1033)=35 exch2_jLo(2,1033)=0 exch2_jHi(2,1033)=0 exch2_opposingSend(2,1033)=1 exch2_pij(1,2,1033)=1 exch2_pij(2,2,1033)=0 exch2_pij(3,2,1033)=0 exch2_pij(4,2,1033)=1 exch2_oi(2,1033)=0 exch2_oj(2,1033)=0 exch2_neighbourId(3,1033)=1034 exch2_iLo(3,1033)=35 exch2_iHi(3,1033)=35 exch2_jLo(3,1033)=0 exch2_jHi(3,1033)=35 exch2_opposingSend(3,1033)=4 exch2_pij(1,3,1033)=1 exch2_pij(2,3,1033)=0 exch2_pij(3,3,1033)=0 exch2_pij(4,3,1033)=1 exch2_oi(3,1033)=0 exch2_oj(3,1033)=0 exch2_neighbourId(4,1033)=1032 exch2_iLo(4,1033)=0 exch2_iHi(4,1033)=0 exch2_jLo(4,1033)=0 exch2_jHi(4,1033)=35 exch2_opposingSend(4,1033)=3 exch2_pij(1,4,1033)=1 exch2_pij(2,4,1033)=0 exch2_pij(3,4,1033)=0 exch2_pij(4,4,1033)=1 exch2_oi(4,1033)=0 exch2_oj(4,1033)=0 RETURN END SUBROUTINE W2_E2SETUP_1034 C Topology for tile 1034 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1034)=34 exch2_tNy(1034)=34 exch2_tBasex(1034)=442 exch2_tBasey(1034)=272 exch2_txGlobalo(1034)=2483 exch2_tyGlobalo(1034)=273 exch2_isWedge(1034)=0 exch2_isNedge(1034)=0 exch2_isEedge(1034)=0 exch2_isSedge(1034)=0 exch2_myFace(1034)=5 exch2_mydNx(1034)=510 exch2_mydNy(1034)=510 exch2_nNeighbours(1034)=4 exch2_neighbourId(1,1034)=1049 exch2_iLo(1,1034)=0 exch2_iHi(1,1034)=35 exch2_jLo(1,1034)=35 exch2_jHi(1,1034)=35 exch2_opposingSend(1,1034)=2 exch2_pij(1,1,1034)=1 exch2_pij(2,1,1034)=0 exch2_pij(3,1,1034)=0 exch2_pij(4,1,1034)=1 exch2_oi(1,1034)=0 exch2_oj(1,1034)=0 exch2_neighbourId(2,1034)=1019 exch2_iLo(2,1034)=0 exch2_iHi(2,1034)=35 exch2_jLo(2,1034)=0 exch2_jHi(2,1034)=0 exch2_opposingSend(2,1034)=1 exch2_pij(1,2,1034)=1 exch2_pij(2,2,1034)=0 exch2_pij(3,2,1034)=0 exch2_pij(4,2,1034)=1 exch2_oi(2,1034)=0 exch2_oj(2,1034)=0 exch2_neighbourId(3,1034)=1035 exch2_iLo(3,1034)=35 exch2_iHi(3,1034)=35 exch2_jLo(3,1034)=0 exch2_jHi(3,1034)=35 exch2_opposingSend(3,1034)=4 exch2_pij(1,3,1034)=1 exch2_pij(2,3,1034)=0 exch2_pij(3,3,1034)=0 exch2_pij(4,3,1034)=1 exch2_oi(3,1034)=0 exch2_oj(3,1034)=0 exch2_neighbourId(4,1034)=1033 exch2_iLo(4,1034)=0 exch2_iHi(4,1034)=0 exch2_jLo(4,1034)=0 exch2_jHi(4,1034)=35 exch2_opposingSend(4,1034)=3 exch2_pij(1,4,1034)=1 exch2_pij(2,4,1034)=0 exch2_pij(3,4,1034)=0 exch2_pij(4,4,1034)=1 exch2_oi(4,1034)=0 exch2_oj(4,1034)=0 RETURN END SUBROUTINE W2_E2SETUP_1035 C Topology for tile 1035 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1035)=34 exch2_tNy(1035)=34 exch2_tBasex(1035)=476 exch2_tBasey(1035)=272 exch2_txGlobalo(1035)=2517 exch2_tyGlobalo(1035)=273 exch2_isWedge(1035)=0 exch2_isNedge(1035)=0 exch2_isEedge(1035)=1 exch2_isSedge(1035)=0 exch2_myFace(1035)=5 exch2_mydNx(1035)=510 exch2_mydNy(1035)=510 exch2_nNeighbours(1035)=4 exch2_neighbourId(1,1035)=1050 exch2_iLo(1,1035)=0 exch2_iHi(1,1035)=35 exch2_jLo(1,1035)=35 exch2_jHi(1,1035)=35 exch2_opposingSend(1,1035)=2 exch2_pij(1,1,1035)=1 exch2_pij(2,1,1035)=0 exch2_pij(3,1,1035)=0 exch2_pij(4,1,1035)=1 exch2_oi(1,1035)=0 exch2_oj(1,1035)=0 exch2_neighbourId(2,1035)=1020 exch2_iLo(2,1035)=0 exch2_iHi(2,1035)=35 exch2_jLo(2,1035)=0 exch2_jHi(2,1035)=0 exch2_opposingSend(2,1035)=1 exch2_pij(1,2,1035)=1 exch2_pij(2,2,1035)=0 exch2_pij(3,2,1035)=0 exch2_pij(4,2,1035)=1 exch2_oi(2,1035)=0 exch2_oj(2,1035)=0 exch2_neighbourId(3,1035)=1246 exch2_iLo(3,1035)=35 exch2_iHi(3,1035)=35 exch2_jLo(3,1035)=0 exch2_jHi(3,1035)=35 exch2_opposingSend(3,1035)=4 exch2_pij(1,3,1035)=1 exch2_pij(2,3,1035)=0 exch2_pij(3,3,1035)=0 exch2_pij(4,3,1035)=1 exch2_oi(3,1035)=510 exch2_oj(3,1035)=0 exch2_neighbourId(4,1035)=1034 exch2_iLo(4,1035)=0 exch2_iHi(4,1035)=0 exch2_jLo(4,1035)=0 exch2_jHi(4,1035)=35 exch2_opposingSend(4,1035)=3 exch2_pij(1,4,1035)=1 exch2_pij(2,4,1035)=0 exch2_pij(3,4,1035)=0 exch2_pij(4,4,1035)=1 exch2_oi(4,1035)=0 exch2_oj(4,1035)=0 RETURN END SUBROUTINE W2_E2SETUP_1036 C Topology for tile 1036 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1036)=34 exch2_tNy(1036)=34 exch2_tBasex(1036)=0 exch2_tBasey(1036)=306 exch2_txGlobalo(1036)=2041 exch2_tyGlobalo(1036)=307 exch2_isWedge(1036)=1 exch2_isNedge(1036)=0 exch2_isEedge(1036)=0 exch2_isSedge(1036)=0 exch2_myFace(1036)=5 exch2_mydNx(1036)=510 exch2_mydNy(1036)=510 exch2_nNeighbours(1036)=4 exch2_neighbourId(1,1036)=1051 exch2_iLo(1,1036)=0 exch2_iHi(1,1036)=35 exch2_jLo(1,1036)=35 exch2_jHi(1,1036)=35 exch2_opposingSend(1,1036)=2 exch2_pij(1,1,1036)=1 exch2_pij(2,1,1036)=0 exch2_pij(3,1,1036)=0 exch2_pij(4,1,1036)=1 exch2_oi(1,1036)=0 exch2_oj(1,1036)=0 exch2_neighbourId(2,1036)=1021 exch2_iLo(2,1036)=0 exch2_iHi(2,1036)=35 exch2_jLo(2,1036)=0 exch2_jHi(2,1036)=0 exch2_opposingSend(2,1036)=1 exch2_pij(1,2,1036)=1 exch2_pij(2,2,1036)=0 exch2_pij(3,2,1036)=0 exch2_pij(4,2,1036)=1 exch2_oi(2,1036)=0 exch2_oj(2,1036)=0 exch2_neighbourId(3,1036)=1037 exch2_iLo(3,1036)=35 exch2_iHi(3,1036)=35 exch2_jLo(3,1036)=0 exch2_jHi(3,1036)=35 exch2_opposingSend(3,1036)=4 exch2_pij(1,3,1036)=1 exch2_pij(2,3,1036)=0 exch2_pij(3,3,1036)=0 exch2_pij(4,3,1036)=1 exch2_oi(3,1036)=0 exch2_oj(3,1036)=0 exch2_neighbourId(4,1036)=666 exch2_iLo(4,1036)=0 exch2_iHi(4,1036)=0 exch2_jLo(4,1036)=0 exch2_jHi(4,1036)=35 exch2_opposingSend(4,1036)=1 exch2_pij(1,4,1036)=0 exch2_pij(2,4,1036)=1 exch2_pij(3,4,1036)=-1 exch2_pij(4,4,1036)=0 exch2_oi(4,1036)=-510 exch2_oj(4,1036)=511 RETURN END SUBROUTINE W2_E2SETUP_1037 C Topology for tile 1037 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1037)=34 exch2_tNy(1037)=34 exch2_tBasex(1037)=34 exch2_tBasey(1037)=306 exch2_txGlobalo(1037)=2075 exch2_tyGlobalo(1037)=307 exch2_isWedge(1037)=0 exch2_isNedge(1037)=0 exch2_isEedge(1037)=0 exch2_isSedge(1037)=0 exch2_myFace(1037)=5 exch2_mydNx(1037)=510 exch2_mydNy(1037)=510 exch2_nNeighbours(1037)=4 exch2_neighbourId(1,1037)=1052 exch2_iLo(1,1037)=0 exch2_iHi(1,1037)=35 exch2_jLo(1,1037)=35 exch2_jHi(1,1037)=35 exch2_opposingSend(1,1037)=2 exch2_pij(1,1,1037)=1 exch2_pij(2,1,1037)=0 exch2_pij(3,1,1037)=0 exch2_pij(4,1,1037)=1 exch2_oi(1,1037)=0 exch2_oj(1,1037)=0 exch2_neighbourId(2,1037)=1022 exch2_iLo(2,1037)=0 exch2_iHi(2,1037)=35 exch2_jLo(2,1037)=0 exch2_jHi(2,1037)=0 exch2_opposingSend(2,1037)=1 exch2_pij(1,2,1037)=1 exch2_pij(2,2,1037)=0 exch2_pij(3,2,1037)=0 exch2_pij(4,2,1037)=1 exch2_oi(2,1037)=0 exch2_oj(2,1037)=0 exch2_neighbourId(3,1037)=1038 exch2_iLo(3,1037)=35 exch2_iHi(3,1037)=35 exch2_jLo(3,1037)=0 exch2_jHi(3,1037)=35 exch2_opposingSend(3,1037)=4 exch2_pij(1,3,1037)=1 exch2_pij(2,3,1037)=0 exch2_pij(3,3,1037)=0 exch2_pij(4,3,1037)=1 exch2_oi(3,1037)=0 exch2_oj(3,1037)=0 exch2_neighbourId(4,1037)=1036 exch2_iLo(4,1037)=0 exch2_iHi(4,1037)=0 exch2_jLo(4,1037)=0 exch2_jHi(4,1037)=35 exch2_opposingSend(4,1037)=3 exch2_pij(1,4,1037)=1 exch2_pij(2,4,1037)=0 exch2_pij(3,4,1037)=0 exch2_pij(4,4,1037)=1 exch2_oi(4,1037)=0 exch2_oj(4,1037)=0 RETURN END SUBROUTINE W2_E2SETUP_1038 C Topology for tile 1038 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1038)=34 exch2_tNy(1038)=34 exch2_tBasex(1038)=68 exch2_tBasey(1038)=306 exch2_txGlobalo(1038)=2109 exch2_tyGlobalo(1038)=307 exch2_isWedge(1038)=0 exch2_isNedge(1038)=0 exch2_isEedge(1038)=0 exch2_isSedge(1038)=0 exch2_myFace(1038)=5 exch2_mydNx(1038)=510 exch2_mydNy(1038)=510 exch2_nNeighbours(1038)=4 exch2_neighbourId(1,1038)=1053 exch2_iLo(1,1038)=0 exch2_iHi(1,1038)=35 exch2_jLo(1,1038)=35 exch2_jHi(1,1038)=35 exch2_opposingSend(1,1038)=2 exch2_pij(1,1,1038)=1 exch2_pij(2,1,1038)=0 exch2_pij(3,1,1038)=0 exch2_pij(4,1,1038)=1 exch2_oi(1,1038)=0 exch2_oj(1,1038)=0 exch2_neighbourId(2,1038)=1023 exch2_iLo(2,1038)=0 exch2_iHi(2,1038)=35 exch2_jLo(2,1038)=0 exch2_jHi(2,1038)=0 exch2_opposingSend(2,1038)=1 exch2_pij(1,2,1038)=1 exch2_pij(2,2,1038)=0 exch2_pij(3,2,1038)=0 exch2_pij(4,2,1038)=1 exch2_oi(2,1038)=0 exch2_oj(2,1038)=0 exch2_neighbourId(3,1038)=1039 exch2_iLo(3,1038)=35 exch2_iHi(3,1038)=35 exch2_jLo(3,1038)=0 exch2_jHi(3,1038)=35 exch2_opposingSend(3,1038)=4 exch2_pij(1,3,1038)=1 exch2_pij(2,3,1038)=0 exch2_pij(3,3,1038)=0 exch2_pij(4,3,1038)=1 exch2_oi(3,1038)=0 exch2_oj(3,1038)=0 exch2_neighbourId(4,1038)=1037 exch2_iLo(4,1038)=0 exch2_iHi(4,1038)=0 exch2_jLo(4,1038)=0 exch2_jHi(4,1038)=35 exch2_opposingSend(4,1038)=3 exch2_pij(1,4,1038)=1 exch2_pij(2,4,1038)=0 exch2_pij(3,4,1038)=0 exch2_pij(4,4,1038)=1 exch2_oi(4,1038)=0 exch2_oj(4,1038)=0 RETURN END SUBROUTINE W2_E2SETUP_1039 C Topology for tile 1039 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1039)=34 exch2_tNy(1039)=34 exch2_tBasex(1039)=102 exch2_tBasey(1039)=306 exch2_txGlobalo(1039)=2143 exch2_tyGlobalo(1039)=307 exch2_isWedge(1039)=0 exch2_isNedge(1039)=0 exch2_isEedge(1039)=0 exch2_isSedge(1039)=0 exch2_myFace(1039)=5 exch2_mydNx(1039)=510 exch2_mydNy(1039)=510 exch2_nNeighbours(1039)=4 exch2_neighbourId(1,1039)=1054 exch2_iLo(1,1039)=0 exch2_iHi(1,1039)=35 exch2_jLo(1,1039)=35 exch2_jHi(1,1039)=35 exch2_opposingSend(1,1039)=2 exch2_pij(1,1,1039)=1 exch2_pij(2,1,1039)=0 exch2_pij(3,1,1039)=0 exch2_pij(4,1,1039)=1 exch2_oi(1,1039)=0 exch2_oj(1,1039)=0 exch2_neighbourId(2,1039)=1024 exch2_iLo(2,1039)=0 exch2_iHi(2,1039)=35 exch2_jLo(2,1039)=0 exch2_jHi(2,1039)=0 exch2_opposingSend(2,1039)=1 exch2_pij(1,2,1039)=1 exch2_pij(2,2,1039)=0 exch2_pij(3,2,1039)=0 exch2_pij(4,2,1039)=1 exch2_oi(2,1039)=0 exch2_oj(2,1039)=0 exch2_neighbourId(3,1039)=1040 exch2_iLo(3,1039)=35 exch2_iHi(3,1039)=35 exch2_jLo(3,1039)=0 exch2_jHi(3,1039)=35 exch2_opposingSend(3,1039)=4 exch2_pij(1,3,1039)=1 exch2_pij(2,3,1039)=0 exch2_pij(3,3,1039)=0 exch2_pij(4,3,1039)=1 exch2_oi(3,1039)=0 exch2_oj(3,1039)=0 exch2_neighbourId(4,1039)=1038 exch2_iLo(4,1039)=0 exch2_iHi(4,1039)=0 exch2_jLo(4,1039)=0 exch2_jHi(4,1039)=35 exch2_opposingSend(4,1039)=3 exch2_pij(1,4,1039)=1 exch2_pij(2,4,1039)=0 exch2_pij(3,4,1039)=0 exch2_pij(4,4,1039)=1 exch2_oi(4,1039)=0 exch2_oj(4,1039)=0 RETURN END SUBROUTINE W2_E2SETUP_1040 C Topology for tile 1040 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1040)=34 exch2_tNy(1040)=34 exch2_tBasex(1040)=136 exch2_tBasey(1040)=306 exch2_txGlobalo(1040)=2177 exch2_tyGlobalo(1040)=307 exch2_isWedge(1040)=0 exch2_isNedge(1040)=0 exch2_isEedge(1040)=0 exch2_isSedge(1040)=0 exch2_myFace(1040)=5 exch2_mydNx(1040)=510 exch2_mydNy(1040)=510 exch2_nNeighbours(1040)=4 exch2_neighbourId(1,1040)=1055 exch2_iLo(1,1040)=0 exch2_iHi(1,1040)=35 exch2_jLo(1,1040)=35 exch2_jHi(1,1040)=35 exch2_opposingSend(1,1040)=2 exch2_pij(1,1,1040)=1 exch2_pij(2,1,1040)=0 exch2_pij(3,1,1040)=0 exch2_pij(4,1,1040)=1 exch2_oi(1,1040)=0 exch2_oj(1,1040)=0 exch2_neighbourId(2,1040)=1025 exch2_iLo(2,1040)=0 exch2_iHi(2,1040)=35 exch2_jLo(2,1040)=0 exch2_jHi(2,1040)=0 exch2_opposingSend(2,1040)=1 exch2_pij(1,2,1040)=1 exch2_pij(2,2,1040)=0 exch2_pij(3,2,1040)=0 exch2_pij(4,2,1040)=1 exch2_oi(2,1040)=0 exch2_oj(2,1040)=0 exch2_neighbourId(3,1040)=1041 exch2_iLo(3,1040)=35 exch2_iHi(3,1040)=35 exch2_jLo(3,1040)=0 exch2_jHi(3,1040)=35 exch2_opposingSend(3,1040)=4 exch2_pij(1,3,1040)=1 exch2_pij(2,3,1040)=0 exch2_pij(3,3,1040)=0 exch2_pij(4,3,1040)=1 exch2_oi(3,1040)=0 exch2_oj(3,1040)=0 exch2_neighbourId(4,1040)=1039 exch2_iLo(4,1040)=0 exch2_iHi(4,1040)=0 exch2_jLo(4,1040)=0 exch2_jHi(4,1040)=35 exch2_opposingSend(4,1040)=3 exch2_pij(1,4,1040)=1 exch2_pij(2,4,1040)=0 exch2_pij(3,4,1040)=0 exch2_pij(4,4,1040)=1 exch2_oi(4,1040)=0 exch2_oj(4,1040)=0 RETURN END SUBROUTINE W2_E2SETUP_1041 C Topology for tile 1041 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1041)=34 exch2_tNy(1041)=34 exch2_tBasex(1041)=170 exch2_tBasey(1041)=306 exch2_txGlobalo(1041)=2211 exch2_tyGlobalo(1041)=307 exch2_isWedge(1041)=0 exch2_isNedge(1041)=0 exch2_isEedge(1041)=0 exch2_isSedge(1041)=0 exch2_myFace(1041)=5 exch2_mydNx(1041)=510 exch2_mydNy(1041)=510 exch2_nNeighbours(1041)=4 exch2_neighbourId(1,1041)=1056 exch2_iLo(1,1041)=0 exch2_iHi(1,1041)=35 exch2_jLo(1,1041)=35 exch2_jHi(1,1041)=35 exch2_opposingSend(1,1041)=2 exch2_pij(1,1,1041)=1 exch2_pij(2,1,1041)=0 exch2_pij(3,1,1041)=0 exch2_pij(4,1,1041)=1 exch2_oi(1,1041)=0 exch2_oj(1,1041)=0 exch2_neighbourId(2,1041)=1026 exch2_iLo(2,1041)=0 exch2_iHi(2,1041)=35 exch2_jLo(2,1041)=0 exch2_jHi(2,1041)=0 exch2_opposingSend(2,1041)=1 exch2_pij(1,2,1041)=1 exch2_pij(2,2,1041)=0 exch2_pij(3,2,1041)=0 exch2_pij(4,2,1041)=1 exch2_oi(2,1041)=0 exch2_oj(2,1041)=0 exch2_neighbourId(3,1041)=1042 exch2_iLo(3,1041)=35 exch2_iHi(3,1041)=35 exch2_jLo(3,1041)=0 exch2_jHi(3,1041)=35 exch2_opposingSend(3,1041)=4 exch2_pij(1,3,1041)=1 exch2_pij(2,3,1041)=0 exch2_pij(3,3,1041)=0 exch2_pij(4,3,1041)=1 exch2_oi(3,1041)=0 exch2_oj(3,1041)=0 exch2_neighbourId(4,1041)=1040 exch2_iLo(4,1041)=0 exch2_iHi(4,1041)=0 exch2_jLo(4,1041)=0 exch2_jHi(4,1041)=35 exch2_opposingSend(4,1041)=3 exch2_pij(1,4,1041)=1 exch2_pij(2,4,1041)=0 exch2_pij(3,4,1041)=0 exch2_pij(4,4,1041)=1 exch2_oi(4,1041)=0 exch2_oj(4,1041)=0 RETURN END SUBROUTINE W2_E2SETUP_1042 C Topology for tile 1042 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1042)=34 exch2_tNy(1042)=34 exch2_tBasex(1042)=204 exch2_tBasey(1042)=306 exch2_txGlobalo(1042)=2245 exch2_tyGlobalo(1042)=307 exch2_isWedge(1042)=0 exch2_isNedge(1042)=0 exch2_isEedge(1042)=0 exch2_isSedge(1042)=0 exch2_myFace(1042)=5 exch2_mydNx(1042)=510 exch2_mydNy(1042)=510 exch2_nNeighbours(1042)=4 exch2_neighbourId(1,1042)=1057 exch2_iLo(1,1042)=0 exch2_iHi(1,1042)=35 exch2_jLo(1,1042)=35 exch2_jHi(1,1042)=35 exch2_opposingSend(1,1042)=2 exch2_pij(1,1,1042)=1 exch2_pij(2,1,1042)=0 exch2_pij(3,1,1042)=0 exch2_pij(4,1,1042)=1 exch2_oi(1,1042)=0 exch2_oj(1,1042)=0 exch2_neighbourId(2,1042)=1027 exch2_iLo(2,1042)=0 exch2_iHi(2,1042)=35 exch2_jLo(2,1042)=0 exch2_jHi(2,1042)=0 exch2_opposingSend(2,1042)=1 exch2_pij(1,2,1042)=1 exch2_pij(2,2,1042)=0 exch2_pij(3,2,1042)=0 exch2_pij(4,2,1042)=1 exch2_oi(2,1042)=0 exch2_oj(2,1042)=0 exch2_neighbourId(3,1042)=1043 exch2_iLo(3,1042)=35 exch2_iHi(3,1042)=35 exch2_jLo(3,1042)=0 exch2_jHi(3,1042)=35 exch2_opposingSend(3,1042)=4 exch2_pij(1,3,1042)=1 exch2_pij(2,3,1042)=0 exch2_pij(3,3,1042)=0 exch2_pij(4,3,1042)=1 exch2_oi(3,1042)=0 exch2_oj(3,1042)=0 exch2_neighbourId(4,1042)=1041 exch2_iLo(4,1042)=0 exch2_iHi(4,1042)=0 exch2_jLo(4,1042)=0 exch2_jHi(4,1042)=35 exch2_opposingSend(4,1042)=3 exch2_pij(1,4,1042)=1 exch2_pij(2,4,1042)=0 exch2_pij(3,4,1042)=0 exch2_pij(4,4,1042)=1 exch2_oi(4,1042)=0 exch2_oj(4,1042)=0 RETURN END SUBROUTINE W2_E2SETUP_1043 C Topology for tile 1043 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1043)=34 exch2_tNy(1043)=34 exch2_tBasex(1043)=238 exch2_tBasey(1043)=306 exch2_txGlobalo(1043)=2279 exch2_tyGlobalo(1043)=307 exch2_isWedge(1043)=0 exch2_isNedge(1043)=0 exch2_isEedge(1043)=0 exch2_isSedge(1043)=0 exch2_myFace(1043)=5 exch2_mydNx(1043)=510 exch2_mydNy(1043)=510 exch2_nNeighbours(1043)=4 exch2_neighbourId(1,1043)=1058 exch2_iLo(1,1043)=0 exch2_iHi(1,1043)=35 exch2_jLo(1,1043)=35 exch2_jHi(1,1043)=35 exch2_opposingSend(1,1043)=2 exch2_pij(1,1,1043)=1 exch2_pij(2,1,1043)=0 exch2_pij(3,1,1043)=0 exch2_pij(4,1,1043)=1 exch2_oi(1,1043)=0 exch2_oj(1,1043)=0 exch2_neighbourId(2,1043)=1028 exch2_iLo(2,1043)=0 exch2_iHi(2,1043)=35 exch2_jLo(2,1043)=0 exch2_jHi(2,1043)=0 exch2_opposingSend(2,1043)=1 exch2_pij(1,2,1043)=1 exch2_pij(2,2,1043)=0 exch2_pij(3,2,1043)=0 exch2_pij(4,2,1043)=1 exch2_oi(2,1043)=0 exch2_oj(2,1043)=0 exch2_neighbourId(3,1043)=1044 exch2_iLo(3,1043)=35 exch2_iHi(3,1043)=35 exch2_jLo(3,1043)=0 exch2_jHi(3,1043)=35 exch2_opposingSend(3,1043)=4 exch2_pij(1,3,1043)=1 exch2_pij(2,3,1043)=0 exch2_pij(3,3,1043)=0 exch2_pij(4,3,1043)=1 exch2_oi(3,1043)=0 exch2_oj(3,1043)=0 exch2_neighbourId(4,1043)=1042 exch2_iLo(4,1043)=0 exch2_iHi(4,1043)=0 exch2_jLo(4,1043)=0 exch2_jHi(4,1043)=35 exch2_opposingSend(4,1043)=3 exch2_pij(1,4,1043)=1 exch2_pij(2,4,1043)=0 exch2_pij(3,4,1043)=0 exch2_pij(4,4,1043)=1 exch2_oi(4,1043)=0 exch2_oj(4,1043)=0 RETURN END SUBROUTINE W2_E2SETUP_1044 C Topology for tile 1044 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1044)=34 exch2_tNy(1044)=34 exch2_tBasex(1044)=272 exch2_tBasey(1044)=306 exch2_txGlobalo(1044)=2313 exch2_tyGlobalo(1044)=307 exch2_isWedge(1044)=0 exch2_isNedge(1044)=0 exch2_isEedge(1044)=0 exch2_isSedge(1044)=0 exch2_myFace(1044)=5 exch2_mydNx(1044)=510 exch2_mydNy(1044)=510 exch2_nNeighbours(1044)=4 exch2_neighbourId(1,1044)=1059 exch2_iLo(1,1044)=0 exch2_iHi(1,1044)=35 exch2_jLo(1,1044)=35 exch2_jHi(1,1044)=35 exch2_opposingSend(1,1044)=2 exch2_pij(1,1,1044)=1 exch2_pij(2,1,1044)=0 exch2_pij(3,1,1044)=0 exch2_pij(4,1,1044)=1 exch2_oi(1,1044)=0 exch2_oj(1,1044)=0 exch2_neighbourId(2,1044)=1029 exch2_iLo(2,1044)=0 exch2_iHi(2,1044)=35 exch2_jLo(2,1044)=0 exch2_jHi(2,1044)=0 exch2_opposingSend(2,1044)=1 exch2_pij(1,2,1044)=1 exch2_pij(2,2,1044)=0 exch2_pij(3,2,1044)=0 exch2_pij(4,2,1044)=1 exch2_oi(2,1044)=0 exch2_oj(2,1044)=0 exch2_neighbourId(3,1044)=1045 exch2_iLo(3,1044)=35 exch2_iHi(3,1044)=35 exch2_jLo(3,1044)=0 exch2_jHi(3,1044)=35 exch2_opposingSend(3,1044)=4 exch2_pij(1,3,1044)=1 exch2_pij(2,3,1044)=0 exch2_pij(3,3,1044)=0 exch2_pij(4,3,1044)=1 exch2_oi(3,1044)=0 exch2_oj(3,1044)=0 exch2_neighbourId(4,1044)=1043 exch2_iLo(4,1044)=0 exch2_iHi(4,1044)=0 exch2_jLo(4,1044)=0 exch2_jHi(4,1044)=35 exch2_opposingSend(4,1044)=3 exch2_pij(1,4,1044)=1 exch2_pij(2,4,1044)=0 exch2_pij(3,4,1044)=0 exch2_pij(4,4,1044)=1 exch2_oi(4,1044)=0 exch2_oj(4,1044)=0 RETURN END SUBROUTINE W2_E2SETUP_1045 C Topology for tile 1045 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1045)=34 exch2_tNy(1045)=34 exch2_tBasex(1045)=306 exch2_tBasey(1045)=306 exch2_txGlobalo(1045)=2347 exch2_tyGlobalo(1045)=307 exch2_isWedge(1045)=0 exch2_isNedge(1045)=0 exch2_isEedge(1045)=0 exch2_isSedge(1045)=0 exch2_myFace(1045)=5 exch2_mydNx(1045)=510 exch2_mydNy(1045)=510 exch2_nNeighbours(1045)=4 exch2_neighbourId(1,1045)=1060 exch2_iLo(1,1045)=0 exch2_iHi(1,1045)=35 exch2_jLo(1,1045)=35 exch2_jHi(1,1045)=35 exch2_opposingSend(1,1045)=2 exch2_pij(1,1,1045)=1 exch2_pij(2,1,1045)=0 exch2_pij(3,1,1045)=0 exch2_pij(4,1,1045)=1 exch2_oi(1,1045)=0 exch2_oj(1,1045)=0 exch2_neighbourId(2,1045)=1030 exch2_iLo(2,1045)=0 exch2_iHi(2,1045)=35 exch2_jLo(2,1045)=0 exch2_jHi(2,1045)=0 exch2_opposingSend(2,1045)=1 exch2_pij(1,2,1045)=1 exch2_pij(2,2,1045)=0 exch2_pij(3,2,1045)=0 exch2_pij(4,2,1045)=1 exch2_oi(2,1045)=0 exch2_oj(2,1045)=0 exch2_neighbourId(3,1045)=1046 exch2_iLo(3,1045)=35 exch2_iHi(3,1045)=35 exch2_jLo(3,1045)=0 exch2_jHi(3,1045)=35 exch2_opposingSend(3,1045)=4 exch2_pij(1,3,1045)=1 exch2_pij(2,3,1045)=0 exch2_pij(3,3,1045)=0 exch2_pij(4,3,1045)=1 exch2_oi(3,1045)=0 exch2_oj(3,1045)=0 exch2_neighbourId(4,1045)=1044 exch2_iLo(4,1045)=0 exch2_iHi(4,1045)=0 exch2_jLo(4,1045)=0 exch2_jHi(4,1045)=35 exch2_opposingSend(4,1045)=3 exch2_pij(1,4,1045)=1 exch2_pij(2,4,1045)=0 exch2_pij(3,4,1045)=0 exch2_pij(4,4,1045)=1 exch2_oi(4,1045)=0 exch2_oj(4,1045)=0 RETURN END SUBROUTINE W2_E2SETUP_1046 C Topology for tile 1046 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1046)=34 exch2_tNy(1046)=34 exch2_tBasex(1046)=340 exch2_tBasey(1046)=306 exch2_txGlobalo(1046)=2381 exch2_tyGlobalo(1046)=307 exch2_isWedge(1046)=0 exch2_isNedge(1046)=0 exch2_isEedge(1046)=0 exch2_isSedge(1046)=0 exch2_myFace(1046)=5 exch2_mydNx(1046)=510 exch2_mydNy(1046)=510 exch2_nNeighbours(1046)=4 exch2_neighbourId(1,1046)=1061 exch2_iLo(1,1046)=0 exch2_iHi(1,1046)=35 exch2_jLo(1,1046)=35 exch2_jHi(1,1046)=35 exch2_opposingSend(1,1046)=2 exch2_pij(1,1,1046)=1 exch2_pij(2,1,1046)=0 exch2_pij(3,1,1046)=0 exch2_pij(4,1,1046)=1 exch2_oi(1,1046)=0 exch2_oj(1,1046)=0 exch2_neighbourId(2,1046)=1031 exch2_iLo(2,1046)=0 exch2_iHi(2,1046)=35 exch2_jLo(2,1046)=0 exch2_jHi(2,1046)=0 exch2_opposingSend(2,1046)=1 exch2_pij(1,2,1046)=1 exch2_pij(2,2,1046)=0 exch2_pij(3,2,1046)=0 exch2_pij(4,2,1046)=1 exch2_oi(2,1046)=0 exch2_oj(2,1046)=0 exch2_neighbourId(3,1046)=1047 exch2_iLo(3,1046)=35 exch2_iHi(3,1046)=35 exch2_jLo(3,1046)=0 exch2_jHi(3,1046)=35 exch2_opposingSend(3,1046)=4 exch2_pij(1,3,1046)=1 exch2_pij(2,3,1046)=0 exch2_pij(3,3,1046)=0 exch2_pij(4,3,1046)=1 exch2_oi(3,1046)=0 exch2_oj(3,1046)=0 exch2_neighbourId(4,1046)=1045 exch2_iLo(4,1046)=0 exch2_iHi(4,1046)=0 exch2_jLo(4,1046)=0 exch2_jHi(4,1046)=35 exch2_opposingSend(4,1046)=3 exch2_pij(1,4,1046)=1 exch2_pij(2,4,1046)=0 exch2_pij(3,4,1046)=0 exch2_pij(4,4,1046)=1 exch2_oi(4,1046)=0 exch2_oj(4,1046)=0 RETURN END SUBROUTINE W2_E2SETUP_1047 C Topology for tile 1047 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1047)=34 exch2_tNy(1047)=34 exch2_tBasex(1047)=374 exch2_tBasey(1047)=306 exch2_txGlobalo(1047)=2415 exch2_tyGlobalo(1047)=307 exch2_isWedge(1047)=0 exch2_isNedge(1047)=0 exch2_isEedge(1047)=0 exch2_isSedge(1047)=0 exch2_myFace(1047)=5 exch2_mydNx(1047)=510 exch2_mydNy(1047)=510 exch2_nNeighbours(1047)=4 exch2_neighbourId(1,1047)=1062 exch2_iLo(1,1047)=0 exch2_iHi(1,1047)=35 exch2_jLo(1,1047)=35 exch2_jHi(1,1047)=35 exch2_opposingSend(1,1047)=2 exch2_pij(1,1,1047)=1 exch2_pij(2,1,1047)=0 exch2_pij(3,1,1047)=0 exch2_pij(4,1,1047)=1 exch2_oi(1,1047)=0 exch2_oj(1,1047)=0 exch2_neighbourId(2,1047)=1032 exch2_iLo(2,1047)=0 exch2_iHi(2,1047)=35 exch2_jLo(2,1047)=0 exch2_jHi(2,1047)=0 exch2_opposingSend(2,1047)=1 exch2_pij(1,2,1047)=1 exch2_pij(2,2,1047)=0 exch2_pij(3,2,1047)=0 exch2_pij(4,2,1047)=1 exch2_oi(2,1047)=0 exch2_oj(2,1047)=0 exch2_neighbourId(3,1047)=1048 exch2_iLo(3,1047)=35 exch2_iHi(3,1047)=35 exch2_jLo(3,1047)=0 exch2_jHi(3,1047)=35 exch2_opposingSend(3,1047)=4 exch2_pij(1,3,1047)=1 exch2_pij(2,3,1047)=0 exch2_pij(3,3,1047)=0 exch2_pij(4,3,1047)=1 exch2_oi(3,1047)=0 exch2_oj(3,1047)=0 exch2_neighbourId(4,1047)=1046 exch2_iLo(4,1047)=0 exch2_iHi(4,1047)=0 exch2_jLo(4,1047)=0 exch2_jHi(4,1047)=35 exch2_opposingSend(4,1047)=3 exch2_pij(1,4,1047)=1 exch2_pij(2,4,1047)=0 exch2_pij(3,4,1047)=0 exch2_pij(4,4,1047)=1 exch2_oi(4,1047)=0 exch2_oj(4,1047)=0 RETURN END SUBROUTINE W2_E2SETUP_1048 C Topology for tile 1048 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1048)=34 exch2_tNy(1048)=34 exch2_tBasex(1048)=408 exch2_tBasey(1048)=306 exch2_txGlobalo(1048)=2449 exch2_tyGlobalo(1048)=307 exch2_isWedge(1048)=0 exch2_isNedge(1048)=0 exch2_isEedge(1048)=0 exch2_isSedge(1048)=0 exch2_myFace(1048)=5 exch2_mydNx(1048)=510 exch2_mydNy(1048)=510 exch2_nNeighbours(1048)=4 exch2_neighbourId(1,1048)=1063 exch2_iLo(1,1048)=0 exch2_iHi(1,1048)=35 exch2_jLo(1,1048)=35 exch2_jHi(1,1048)=35 exch2_opposingSend(1,1048)=2 exch2_pij(1,1,1048)=1 exch2_pij(2,1,1048)=0 exch2_pij(3,1,1048)=0 exch2_pij(4,1,1048)=1 exch2_oi(1,1048)=0 exch2_oj(1,1048)=0 exch2_neighbourId(2,1048)=1033 exch2_iLo(2,1048)=0 exch2_iHi(2,1048)=35 exch2_jLo(2,1048)=0 exch2_jHi(2,1048)=0 exch2_opposingSend(2,1048)=1 exch2_pij(1,2,1048)=1 exch2_pij(2,2,1048)=0 exch2_pij(3,2,1048)=0 exch2_pij(4,2,1048)=1 exch2_oi(2,1048)=0 exch2_oj(2,1048)=0 exch2_neighbourId(3,1048)=1049 exch2_iLo(3,1048)=35 exch2_iHi(3,1048)=35 exch2_jLo(3,1048)=0 exch2_jHi(3,1048)=35 exch2_opposingSend(3,1048)=4 exch2_pij(1,3,1048)=1 exch2_pij(2,3,1048)=0 exch2_pij(3,3,1048)=0 exch2_pij(4,3,1048)=1 exch2_oi(3,1048)=0 exch2_oj(3,1048)=0 exch2_neighbourId(4,1048)=1047 exch2_iLo(4,1048)=0 exch2_iHi(4,1048)=0 exch2_jLo(4,1048)=0 exch2_jHi(4,1048)=35 exch2_opposingSend(4,1048)=3 exch2_pij(1,4,1048)=1 exch2_pij(2,4,1048)=0 exch2_pij(3,4,1048)=0 exch2_pij(4,4,1048)=1 exch2_oi(4,1048)=0 exch2_oj(4,1048)=0 RETURN END SUBROUTINE W2_E2SETUP_1049 C Topology for tile 1049 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1049)=34 exch2_tNy(1049)=34 exch2_tBasex(1049)=442 exch2_tBasey(1049)=306 exch2_txGlobalo(1049)=2483 exch2_tyGlobalo(1049)=307 exch2_isWedge(1049)=0 exch2_isNedge(1049)=0 exch2_isEedge(1049)=0 exch2_isSedge(1049)=0 exch2_myFace(1049)=5 exch2_mydNx(1049)=510 exch2_mydNy(1049)=510 exch2_nNeighbours(1049)=4 exch2_neighbourId(1,1049)=1064 exch2_iLo(1,1049)=0 exch2_iHi(1,1049)=35 exch2_jLo(1,1049)=35 exch2_jHi(1,1049)=35 exch2_opposingSend(1,1049)=2 exch2_pij(1,1,1049)=1 exch2_pij(2,1,1049)=0 exch2_pij(3,1,1049)=0 exch2_pij(4,1,1049)=1 exch2_oi(1,1049)=0 exch2_oj(1,1049)=0 exch2_neighbourId(2,1049)=1034 exch2_iLo(2,1049)=0 exch2_iHi(2,1049)=35 exch2_jLo(2,1049)=0 exch2_jHi(2,1049)=0 exch2_opposingSend(2,1049)=1 exch2_pij(1,2,1049)=1 exch2_pij(2,2,1049)=0 exch2_pij(3,2,1049)=0 exch2_pij(4,2,1049)=1 exch2_oi(2,1049)=0 exch2_oj(2,1049)=0 exch2_neighbourId(3,1049)=1050 exch2_iLo(3,1049)=35 exch2_iHi(3,1049)=35 exch2_jLo(3,1049)=0 exch2_jHi(3,1049)=35 exch2_opposingSend(3,1049)=4 exch2_pij(1,3,1049)=1 exch2_pij(2,3,1049)=0 exch2_pij(3,3,1049)=0 exch2_pij(4,3,1049)=1 exch2_oi(3,1049)=0 exch2_oj(3,1049)=0 exch2_neighbourId(4,1049)=1048 exch2_iLo(4,1049)=0 exch2_iHi(4,1049)=0 exch2_jLo(4,1049)=0 exch2_jHi(4,1049)=35 exch2_opposingSend(4,1049)=3 exch2_pij(1,4,1049)=1 exch2_pij(2,4,1049)=0 exch2_pij(3,4,1049)=0 exch2_pij(4,4,1049)=1 exch2_oi(4,1049)=0 exch2_oj(4,1049)=0 RETURN END SUBROUTINE W2_E2SETUP_1050 C Topology for tile 1050 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1050)=34 exch2_tNy(1050)=34 exch2_tBasex(1050)=476 exch2_tBasey(1050)=306 exch2_txGlobalo(1050)=2517 exch2_tyGlobalo(1050)=307 exch2_isWedge(1050)=0 exch2_isNedge(1050)=0 exch2_isEedge(1050)=1 exch2_isSedge(1050)=0 exch2_myFace(1050)=5 exch2_mydNx(1050)=510 exch2_mydNy(1050)=510 exch2_nNeighbours(1050)=4 exch2_neighbourId(1,1050)=1065 exch2_iLo(1,1050)=0 exch2_iHi(1,1050)=35 exch2_jLo(1,1050)=35 exch2_jHi(1,1050)=35 exch2_opposingSend(1,1050)=2 exch2_pij(1,1,1050)=1 exch2_pij(2,1,1050)=0 exch2_pij(3,1,1050)=0 exch2_pij(4,1,1050)=1 exch2_oi(1,1050)=0 exch2_oj(1,1050)=0 exch2_neighbourId(2,1050)=1035 exch2_iLo(2,1050)=0 exch2_iHi(2,1050)=35 exch2_jLo(2,1050)=0 exch2_jHi(2,1050)=0 exch2_opposingSend(2,1050)=1 exch2_pij(1,2,1050)=1 exch2_pij(2,2,1050)=0 exch2_pij(3,2,1050)=0 exch2_pij(4,2,1050)=1 exch2_oi(2,1050)=0 exch2_oj(2,1050)=0 exch2_neighbourId(3,1050)=1261 exch2_iLo(3,1050)=35 exch2_iHi(3,1050)=35 exch2_jLo(3,1050)=0 exch2_jHi(3,1050)=35 exch2_opposingSend(3,1050)=4 exch2_pij(1,3,1050)=1 exch2_pij(2,3,1050)=0 exch2_pij(3,3,1050)=0 exch2_pij(4,3,1050)=1 exch2_oi(3,1050)=510 exch2_oj(3,1050)=0 exch2_neighbourId(4,1050)=1049 exch2_iLo(4,1050)=0 exch2_iHi(4,1050)=0 exch2_jLo(4,1050)=0 exch2_jHi(4,1050)=35 exch2_opposingSend(4,1050)=3 exch2_pij(1,4,1050)=1 exch2_pij(2,4,1050)=0 exch2_pij(3,4,1050)=0 exch2_pij(4,4,1050)=1 exch2_oi(4,1050)=0 exch2_oj(4,1050)=0 RETURN END SUBROUTINE W2_E2SETUP_1051 C Topology for tile 1051 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1051)=34 exch2_tNy(1051)=34 exch2_tBasex(1051)=0 exch2_tBasey(1051)=340 exch2_txGlobalo(1051)=2041 exch2_tyGlobalo(1051)=341 exch2_isWedge(1051)=1 exch2_isNedge(1051)=0 exch2_isEedge(1051)=0 exch2_isSedge(1051)=0 exch2_myFace(1051)=5 exch2_mydNx(1051)=510 exch2_mydNy(1051)=510 exch2_nNeighbours(1051)=4 exch2_neighbourId(1,1051)=1066 exch2_iLo(1,1051)=0 exch2_iHi(1,1051)=35 exch2_jLo(1,1051)=35 exch2_jHi(1,1051)=35 exch2_opposingSend(1,1051)=2 exch2_pij(1,1,1051)=1 exch2_pij(2,1,1051)=0 exch2_pij(3,1,1051)=0 exch2_pij(4,1,1051)=1 exch2_oi(1,1051)=0 exch2_oj(1,1051)=0 exch2_neighbourId(2,1051)=1036 exch2_iLo(2,1051)=0 exch2_iHi(2,1051)=35 exch2_jLo(2,1051)=0 exch2_jHi(2,1051)=0 exch2_opposingSend(2,1051)=1 exch2_pij(1,2,1051)=1 exch2_pij(2,2,1051)=0 exch2_pij(3,2,1051)=0 exch2_pij(4,2,1051)=1 exch2_oi(2,1051)=0 exch2_oj(2,1051)=0 exch2_neighbourId(3,1051)=1052 exch2_iLo(3,1051)=35 exch2_iHi(3,1051)=35 exch2_jLo(3,1051)=0 exch2_jHi(3,1051)=35 exch2_opposingSend(3,1051)=4 exch2_pij(1,3,1051)=1 exch2_pij(2,3,1051)=0 exch2_pij(3,3,1051)=0 exch2_pij(4,3,1051)=1 exch2_oi(3,1051)=0 exch2_oj(3,1051)=0 exch2_neighbourId(4,1051)=665 exch2_iLo(4,1051)=0 exch2_iHi(4,1051)=0 exch2_jLo(4,1051)=0 exch2_jHi(4,1051)=35 exch2_opposingSend(4,1051)=1 exch2_pij(1,4,1051)=0 exch2_pij(2,4,1051)=1 exch2_pij(3,4,1051)=-1 exch2_pij(4,4,1051)=0 exch2_oi(4,1051)=-510 exch2_oj(4,1051)=511 RETURN END SUBROUTINE W2_E2SETUP_1052 C Topology for tile 1052 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1052)=34 exch2_tNy(1052)=34 exch2_tBasex(1052)=34 exch2_tBasey(1052)=340 exch2_txGlobalo(1052)=2075 exch2_tyGlobalo(1052)=341 exch2_isWedge(1052)=0 exch2_isNedge(1052)=0 exch2_isEedge(1052)=0 exch2_isSedge(1052)=0 exch2_myFace(1052)=5 exch2_mydNx(1052)=510 exch2_mydNy(1052)=510 exch2_nNeighbours(1052)=4 exch2_neighbourId(1,1052)=1067 exch2_iLo(1,1052)=0 exch2_iHi(1,1052)=35 exch2_jLo(1,1052)=35 exch2_jHi(1,1052)=35 exch2_opposingSend(1,1052)=2 exch2_pij(1,1,1052)=1 exch2_pij(2,1,1052)=0 exch2_pij(3,1,1052)=0 exch2_pij(4,1,1052)=1 exch2_oi(1,1052)=0 exch2_oj(1,1052)=0 exch2_neighbourId(2,1052)=1037 exch2_iLo(2,1052)=0 exch2_iHi(2,1052)=35 exch2_jLo(2,1052)=0 exch2_jHi(2,1052)=0 exch2_opposingSend(2,1052)=1 exch2_pij(1,2,1052)=1 exch2_pij(2,2,1052)=0 exch2_pij(3,2,1052)=0 exch2_pij(4,2,1052)=1 exch2_oi(2,1052)=0 exch2_oj(2,1052)=0 exch2_neighbourId(3,1052)=1053 exch2_iLo(3,1052)=35 exch2_iHi(3,1052)=35 exch2_jLo(3,1052)=0 exch2_jHi(3,1052)=35 exch2_opposingSend(3,1052)=4 exch2_pij(1,3,1052)=1 exch2_pij(2,3,1052)=0 exch2_pij(3,3,1052)=0 exch2_pij(4,3,1052)=1 exch2_oi(3,1052)=0 exch2_oj(3,1052)=0 exch2_neighbourId(4,1052)=1051 exch2_iLo(4,1052)=0 exch2_iHi(4,1052)=0 exch2_jLo(4,1052)=0 exch2_jHi(4,1052)=35 exch2_opposingSend(4,1052)=3 exch2_pij(1,4,1052)=1 exch2_pij(2,4,1052)=0 exch2_pij(3,4,1052)=0 exch2_pij(4,4,1052)=1 exch2_oi(4,1052)=0 exch2_oj(4,1052)=0 RETURN END SUBROUTINE W2_E2SETUP_1053 C Topology for tile 1053 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1053)=34 exch2_tNy(1053)=34 exch2_tBasex(1053)=68 exch2_tBasey(1053)=340 exch2_txGlobalo(1053)=2109 exch2_tyGlobalo(1053)=341 exch2_isWedge(1053)=0 exch2_isNedge(1053)=0 exch2_isEedge(1053)=0 exch2_isSedge(1053)=0 exch2_myFace(1053)=5 exch2_mydNx(1053)=510 exch2_mydNy(1053)=510 exch2_nNeighbours(1053)=4 exch2_neighbourId(1,1053)=1068 exch2_iLo(1,1053)=0 exch2_iHi(1,1053)=35 exch2_jLo(1,1053)=35 exch2_jHi(1,1053)=35 exch2_opposingSend(1,1053)=2 exch2_pij(1,1,1053)=1 exch2_pij(2,1,1053)=0 exch2_pij(3,1,1053)=0 exch2_pij(4,1,1053)=1 exch2_oi(1,1053)=0 exch2_oj(1,1053)=0 exch2_neighbourId(2,1053)=1038 exch2_iLo(2,1053)=0 exch2_iHi(2,1053)=35 exch2_jLo(2,1053)=0 exch2_jHi(2,1053)=0 exch2_opposingSend(2,1053)=1 exch2_pij(1,2,1053)=1 exch2_pij(2,2,1053)=0 exch2_pij(3,2,1053)=0 exch2_pij(4,2,1053)=1 exch2_oi(2,1053)=0 exch2_oj(2,1053)=0 exch2_neighbourId(3,1053)=1054 exch2_iLo(3,1053)=35 exch2_iHi(3,1053)=35 exch2_jLo(3,1053)=0 exch2_jHi(3,1053)=35 exch2_opposingSend(3,1053)=4 exch2_pij(1,3,1053)=1 exch2_pij(2,3,1053)=0 exch2_pij(3,3,1053)=0 exch2_pij(4,3,1053)=1 exch2_oi(3,1053)=0 exch2_oj(3,1053)=0 exch2_neighbourId(4,1053)=1052 exch2_iLo(4,1053)=0 exch2_iHi(4,1053)=0 exch2_jLo(4,1053)=0 exch2_jHi(4,1053)=35 exch2_opposingSend(4,1053)=3 exch2_pij(1,4,1053)=1 exch2_pij(2,4,1053)=0 exch2_pij(3,4,1053)=0 exch2_pij(4,4,1053)=1 exch2_oi(4,1053)=0 exch2_oj(4,1053)=0 RETURN END SUBROUTINE W2_E2SETUP_1054 C Topology for tile 1054 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1054)=34 exch2_tNy(1054)=34 exch2_tBasex(1054)=102 exch2_tBasey(1054)=340 exch2_txGlobalo(1054)=2143 exch2_tyGlobalo(1054)=341 exch2_isWedge(1054)=0 exch2_isNedge(1054)=0 exch2_isEedge(1054)=0 exch2_isSedge(1054)=0 exch2_myFace(1054)=5 exch2_mydNx(1054)=510 exch2_mydNy(1054)=510 exch2_nNeighbours(1054)=4 exch2_neighbourId(1,1054)=1069 exch2_iLo(1,1054)=0 exch2_iHi(1,1054)=35 exch2_jLo(1,1054)=35 exch2_jHi(1,1054)=35 exch2_opposingSend(1,1054)=2 exch2_pij(1,1,1054)=1 exch2_pij(2,1,1054)=0 exch2_pij(3,1,1054)=0 exch2_pij(4,1,1054)=1 exch2_oi(1,1054)=0 exch2_oj(1,1054)=0 exch2_neighbourId(2,1054)=1039 exch2_iLo(2,1054)=0 exch2_iHi(2,1054)=35 exch2_jLo(2,1054)=0 exch2_jHi(2,1054)=0 exch2_opposingSend(2,1054)=1 exch2_pij(1,2,1054)=1 exch2_pij(2,2,1054)=0 exch2_pij(3,2,1054)=0 exch2_pij(4,2,1054)=1 exch2_oi(2,1054)=0 exch2_oj(2,1054)=0 exch2_neighbourId(3,1054)=1055 exch2_iLo(3,1054)=35 exch2_iHi(3,1054)=35 exch2_jLo(3,1054)=0 exch2_jHi(3,1054)=35 exch2_opposingSend(3,1054)=4 exch2_pij(1,3,1054)=1 exch2_pij(2,3,1054)=0 exch2_pij(3,3,1054)=0 exch2_pij(4,3,1054)=1 exch2_oi(3,1054)=0 exch2_oj(3,1054)=0 exch2_neighbourId(4,1054)=1053 exch2_iLo(4,1054)=0 exch2_iHi(4,1054)=0 exch2_jLo(4,1054)=0 exch2_jHi(4,1054)=35 exch2_opposingSend(4,1054)=3 exch2_pij(1,4,1054)=1 exch2_pij(2,4,1054)=0 exch2_pij(3,4,1054)=0 exch2_pij(4,4,1054)=1 exch2_oi(4,1054)=0 exch2_oj(4,1054)=0 RETURN END SUBROUTINE W2_E2SETUP_1055 C Topology for tile 1055 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1055)=34 exch2_tNy(1055)=34 exch2_tBasex(1055)=136 exch2_tBasey(1055)=340 exch2_txGlobalo(1055)=2177 exch2_tyGlobalo(1055)=341 exch2_isWedge(1055)=0 exch2_isNedge(1055)=0 exch2_isEedge(1055)=0 exch2_isSedge(1055)=0 exch2_myFace(1055)=5 exch2_mydNx(1055)=510 exch2_mydNy(1055)=510 exch2_nNeighbours(1055)=4 exch2_neighbourId(1,1055)=1070 exch2_iLo(1,1055)=0 exch2_iHi(1,1055)=35 exch2_jLo(1,1055)=35 exch2_jHi(1,1055)=35 exch2_opposingSend(1,1055)=2 exch2_pij(1,1,1055)=1 exch2_pij(2,1,1055)=0 exch2_pij(3,1,1055)=0 exch2_pij(4,1,1055)=1 exch2_oi(1,1055)=0 exch2_oj(1,1055)=0 exch2_neighbourId(2,1055)=1040 exch2_iLo(2,1055)=0 exch2_iHi(2,1055)=35 exch2_jLo(2,1055)=0 exch2_jHi(2,1055)=0 exch2_opposingSend(2,1055)=1 exch2_pij(1,2,1055)=1 exch2_pij(2,2,1055)=0 exch2_pij(3,2,1055)=0 exch2_pij(4,2,1055)=1 exch2_oi(2,1055)=0 exch2_oj(2,1055)=0 exch2_neighbourId(3,1055)=1056 exch2_iLo(3,1055)=35 exch2_iHi(3,1055)=35 exch2_jLo(3,1055)=0 exch2_jHi(3,1055)=35 exch2_opposingSend(3,1055)=4 exch2_pij(1,3,1055)=1 exch2_pij(2,3,1055)=0 exch2_pij(3,3,1055)=0 exch2_pij(4,3,1055)=1 exch2_oi(3,1055)=0 exch2_oj(3,1055)=0 exch2_neighbourId(4,1055)=1054 exch2_iLo(4,1055)=0 exch2_iHi(4,1055)=0 exch2_jLo(4,1055)=0 exch2_jHi(4,1055)=35 exch2_opposingSend(4,1055)=3 exch2_pij(1,4,1055)=1 exch2_pij(2,4,1055)=0 exch2_pij(3,4,1055)=0 exch2_pij(4,4,1055)=1 exch2_oi(4,1055)=0 exch2_oj(4,1055)=0 RETURN END SUBROUTINE W2_E2SETUP_1056 C Topology for tile 1056 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1056)=34 exch2_tNy(1056)=34 exch2_tBasex(1056)=170 exch2_tBasey(1056)=340 exch2_txGlobalo(1056)=2211 exch2_tyGlobalo(1056)=341 exch2_isWedge(1056)=0 exch2_isNedge(1056)=0 exch2_isEedge(1056)=0 exch2_isSedge(1056)=0 exch2_myFace(1056)=5 exch2_mydNx(1056)=510 exch2_mydNy(1056)=510 exch2_nNeighbours(1056)=4 exch2_neighbourId(1,1056)=1071 exch2_iLo(1,1056)=0 exch2_iHi(1,1056)=35 exch2_jLo(1,1056)=35 exch2_jHi(1,1056)=35 exch2_opposingSend(1,1056)=2 exch2_pij(1,1,1056)=1 exch2_pij(2,1,1056)=0 exch2_pij(3,1,1056)=0 exch2_pij(4,1,1056)=1 exch2_oi(1,1056)=0 exch2_oj(1,1056)=0 exch2_neighbourId(2,1056)=1041 exch2_iLo(2,1056)=0 exch2_iHi(2,1056)=35 exch2_jLo(2,1056)=0 exch2_jHi(2,1056)=0 exch2_opposingSend(2,1056)=1 exch2_pij(1,2,1056)=1 exch2_pij(2,2,1056)=0 exch2_pij(3,2,1056)=0 exch2_pij(4,2,1056)=1 exch2_oi(2,1056)=0 exch2_oj(2,1056)=0 exch2_neighbourId(3,1056)=1057 exch2_iLo(3,1056)=35 exch2_iHi(3,1056)=35 exch2_jLo(3,1056)=0 exch2_jHi(3,1056)=35 exch2_opposingSend(3,1056)=4 exch2_pij(1,3,1056)=1 exch2_pij(2,3,1056)=0 exch2_pij(3,3,1056)=0 exch2_pij(4,3,1056)=1 exch2_oi(3,1056)=0 exch2_oj(3,1056)=0 exch2_neighbourId(4,1056)=1055 exch2_iLo(4,1056)=0 exch2_iHi(4,1056)=0 exch2_jLo(4,1056)=0 exch2_jHi(4,1056)=35 exch2_opposingSend(4,1056)=3 exch2_pij(1,4,1056)=1 exch2_pij(2,4,1056)=0 exch2_pij(3,4,1056)=0 exch2_pij(4,4,1056)=1 exch2_oi(4,1056)=0 exch2_oj(4,1056)=0 RETURN END SUBROUTINE W2_E2SETUP_1057 C Topology for tile 1057 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1057)=34 exch2_tNy(1057)=34 exch2_tBasex(1057)=204 exch2_tBasey(1057)=340 exch2_txGlobalo(1057)=2245 exch2_tyGlobalo(1057)=341 exch2_isWedge(1057)=0 exch2_isNedge(1057)=0 exch2_isEedge(1057)=0 exch2_isSedge(1057)=0 exch2_myFace(1057)=5 exch2_mydNx(1057)=510 exch2_mydNy(1057)=510 exch2_nNeighbours(1057)=4 exch2_neighbourId(1,1057)=1072 exch2_iLo(1,1057)=0 exch2_iHi(1,1057)=35 exch2_jLo(1,1057)=35 exch2_jHi(1,1057)=35 exch2_opposingSend(1,1057)=2 exch2_pij(1,1,1057)=1 exch2_pij(2,1,1057)=0 exch2_pij(3,1,1057)=0 exch2_pij(4,1,1057)=1 exch2_oi(1,1057)=0 exch2_oj(1,1057)=0 exch2_neighbourId(2,1057)=1042 exch2_iLo(2,1057)=0 exch2_iHi(2,1057)=35 exch2_jLo(2,1057)=0 exch2_jHi(2,1057)=0 exch2_opposingSend(2,1057)=1 exch2_pij(1,2,1057)=1 exch2_pij(2,2,1057)=0 exch2_pij(3,2,1057)=0 exch2_pij(4,2,1057)=1 exch2_oi(2,1057)=0 exch2_oj(2,1057)=0 exch2_neighbourId(3,1057)=1058 exch2_iLo(3,1057)=35 exch2_iHi(3,1057)=35 exch2_jLo(3,1057)=0 exch2_jHi(3,1057)=35 exch2_opposingSend(3,1057)=4 exch2_pij(1,3,1057)=1 exch2_pij(2,3,1057)=0 exch2_pij(3,3,1057)=0 exch2_pij(4,3,1057)=1 exch2_oi(3,1057)=0 exch2_oj(3,1057)=0 exch2_neighbourId(4,1057)=1056 exch2_iLo(4,1057)=0 exch2_iHi(4,1057)=0 exch2_jLo(4,1057)=0 exch2_jHi(4,1057)=35 exch2_opposingSend(4,1057)=3 exch2_pij(1,4,1057)=1 exch2_pij(2,4,1057)=0 exch2_pij(3,4,1057)=0 exch2_pij(4,4,1057)=1 exch2_oi(4,1057)=0 exch2_oj(4,1057)=0 RETURN END SUBROUTINE W2_E2SETUP_1058 C Topology for tile 1058 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1058)=34 exch2_tNy(1058)=34 exch2_tBasex(1058)=238 exch2_tBasey(1058)=340 exch2_txGlobalo(1058)=2279 exch2_tyGlobalo(1058)=341 exch2_isWedge(1058)=0 exch2_isNedge(1058)=0 exch2_isEedge(1058)=0 exch2_isSedge(1058)=0 exch2_myFace(1058)=5 exch2_mydNx(1058)=510 exch2_mydNy(1058)=510 exch2_nNeighbours(1058)=4 exch2_neighbourId(1,1058)=1073 exch2_iLo(1,1058)=0 exch2_iHi(1,1058)=35 exch2_jLo(1,1058)=35 exch2_jHi(1,1058)=35 exch2_opposingSend(1,1058)=2 exch2_pij(1,1,1058)=1 exch2_pij(2,1,1058)=0 exch2_pij(3,1,1058)=0 exch2_pij(4,1,1058)=1 exch2_oi(1,1058)=0 exch2_oj(1,1058)=0 exch2_neighbourId(2,1058)=1043 exch2_iLo(2,1058)=0 exch2_iHi(2,1058)=35 exch2_jLo(2,1058)=0 exch2_jHi(2,1058)=0 exch2_opposingSend(2,1058)=1 exch2_pij(1,2,1058)=1 exch2_pij(2,2,1058)=0 exch2_pij(3,2,1058)=0 exch2_pij(4,2,1058)=1 exch2_oi(2,1058)=0 exch2_oj(2,1058)=0 exch2_neighbourId(3,1058)=1059 exch2_iLo(3,1058)=35 exch2_iHi(3,1058)=35 exch2_jLo(3,1058)=0 exch2_jHi(3,1058)=35 exch2_opposingSend(3,1058)=4 exch2_pij(1,3,1058)=1 exch2_pij(2,3,1058)=0 exch2_pij(3,3,1058)=0 exch2_pij(4,3,1058)=1 exch2_oi(3,1058)=0 exch2_oj(3,1058)=0 exch2_neighbourId(4,1058)=1057 exch2_iLo(4,1058)=0 exch2_iHi(4,1058)=0 exch2_jLo(4,1058)=0 exch2_jHi(4,1058)=35 exch2_opposingSend(4,1058)=3 exch2_pij(1,4,1058)=1 exch2_pij(2,4,1058)=0 exch2_pij(3,4,1058)=0 exch2_pij(4,4,1058)=1 exch2_oi(4,1058)=0 exch2_oj(4,1058)=0 RETURN END SUBROUTINE W2_E2SETUP_1059 C Topology for tile 1059 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1059)=34 exch2_tNy(1059)=34 exch2_tBasex(1059)=272 exch2_tBasey(1059)=340 exch2_txGlobalo(1059)=2313 exch2_tyGlobalo(1059)=341 exch2_isWedge(1059)=0 exch2_isNedge(1059)=0 exch2_isEedge(1059)=0 exch2_isSedge(1059)=0 exch2_myFace(1059)=5 exch2_mydNx(1059)=510 exch2_mydNy(1059)=510 exch2_nNeighbours(1059)=4 exch2_neighbourId(1,1059)=1074 exch2_iLo(1,1059)=0 exch2_iHi(1,1059)=35 exch2_jLo(1,1059)=35 exch2_jHi(1,1059)=35 exch2_opposingSend(1,1059)=2 exch2_pij(1,1,1059)=1 exch2_pij(2,1,1059)=0 exch2_pij(3,1,1059)=0 exch2_pij(4,1,1059)=1 exch2_oi(1,1059)=0 exch2_oj(1,1059)=0 exch2_neighbourId(2,1059)=1044 exch2_iLo(2,1059)=0 exch2_iHi(2,1059)=35 exch2_jLo(2,1059)=0 exch2_jHi(2,1059)=0 exch2_opposingSend(2,1059)=1 exch2_pij(1,2,1059)=1 exch2_pij(2,2,1059)=0 exch2_pij(3,2,1059)=0 exch2_pij(4,2,1059)=1 exch2_oi(2,1059)=0 exch2_oj(2,1059)=0 exch2_neighbourId(3,1059)=1060 exch2_iLo(3,1059)=35 exch2_iHi(3,1059)=35 exch2_jLo(3,1059)=0 exch2_jHi(3,1059)=35 exch2_opposingSend(3,1059)=4 exch2_pij(1,3,1059)=1 exch2_pij(2,3,1059)=0 exch2_pij(3,3,1059)=0 exch2_pij(4,3,1059)=1 exch2_oi(3,1059)=0 exch2_oj(3,1059)=0 exch2_neighbourId(4,1059)=1058 exch2_iLo(4,1059)=0 exch2_iHi(4,1059)=0 exch2_jLo(4,1059)=0 exch2_jHi(4,1059)=35 exch2_opposingSend(4,1059)=3 exch2_pij(1,4,1059)=1 exch2_pij(2,4,1059)=0 exch2_pij(3,4,1059)=0 exch2_pij(4,4,1059)=1 exch2_oi(4,1059)=0 exch2_oj(4,1059)=0 RETURN END SUBROUTINE W2_E2SETUP_1060 C Topology for tile 1060 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1060)=34 exch2_tNy(1060)=34 exch2_tBasex(1060)=306 exch2_tBasey(1060)=340 exch2_txGlobalo(1060)=2347 exch2_tyGlobalo(1060)=341 exch2_isWedge(1060)=0 exch2_isNedge(1060)=0 exch2_isEedge(1060)=0 exch2_isSedge(1060)=0 exch2_myFace(1060)=5 exch2_mydNx(1060)=510 exch2_mydNy(1060)=510 exch2_nNeighbours(1060)=4 exch2_neighbourId(1,1060)=1075 exch2_iLo(1,1060)=0 exch2_iHi(1,1060)=35 exch2_jLo(1,1060)=35 exch2_jHi(1,1060)=35 exch2_opposingSend(1,1060)=2 exch2_pij(1,1,1060)=1 exch2_pij(2,1,1060)=0 exch2_pij(3,1,1060)=0 exch2_pij(4,1,1060)=1 exch2_oi(1,1060)=0 exch2_oj(1,1060)=0 exch2_neighbourId(2,1060)=1045 exch2_iLo(2,1060)=0 exch2_iHi(2,1060)=35 exch2_jLo(2,1060)=0 exch2_jHi(2,1060)=0 exch2_opposingSend(2,1060)=1 exch2_pij(1,2,1060)=1 exch2_pij(2,2,1060)=0 exch2_pij(3,2,1060)=0 exch2_pij(4,2,1060)=1 exch2_oi(2,1060)=0 exch2_oj(2,1060)=0 exch2_neighbourId(3,1060)=1061 exch2_iLo(3,1060)=35 exch2_iHi(3,1060)=35 exch2_jLo(3,1060)=0 exch2_jHi(3,1060)=35 exch2_opposingSend(3,1060)=4 exch2_pij(1,3,1060)=1 exch2_pij(2,3,1060)=0 exch2_pij(3,3,1060)=0 exch2_pij(4,3,1060)=1 exch2_oi(3,1060)=0 exch2_oj(3,1060)=0 exch2_neighbourId(4,1060)=1059 exch2_iLo(4,1060)=0 exch2_iHi(4,1060)=0 exch2_jLo(4,1060)=0 exch2_jHi(4,1060)=35 exch2_opposingSend(4,1060)=3 exch2_pij(1,4,1060)=1 exch2_pij(2,4,1060)=0 exch2_pij(3,4,1060)=0 exch2_pij(4,4,1060)=1 exch2_oi(4,1060)=0 exch2_oj(4,1060)=0 RETURN END SUBROUTINE W2_E2SETUP_1061 C Topology for tile 1061 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1061)=34 exch2_tNy(1061)=34 exch2_tBasex(1061)=340 exch2_tBasey(1061)=340 exch2_txGlobalo(1061)=2381 exch2_tyGlobalo(1061)=341 exch2_isWedge(1061)=0 exch2_isNedge(1061)=0 exch2_isEedge(1061)=0 exch2_isSedge(1061)=0 exch2_myFace(1061)=5 exch2_mydNx(1061)=510 exch2_mydNy(1061)=510 exch2_nNeighbours(1061)=4 exch2_neighbourId(1,1061)=1076 exch2_iLo(1,1061)=0 exch2_iHi(1,1061)=35 exch2_jLo(1,1061)=35 exch2_jHi(1,1061)=35 exch2_opposingSend(1,1061)=2 exch2_pij(1,1,1061)=1 exch2_pij(2,1,1061)=0 exch2_pij(3,1,1061)=0 exch2_pij(4,1,1061)=1 exch2_oi(1,1061)=0 exch2_oj(1,1061)=0 exch2_neighbourId(2,1061)=1046 exch2_iLo(2,1061)=0 exch2_iHi(2,1061)=35 exch2_jLo(2,1061)=0 exch2_jHi(2,1061)=0 exch2_opposingSend(2,1061)=1 exch2_pij(1,2,1061)=1 exch2_pij(2,2,1061)=0 exch2_pij(3,2,1061)=0 exch2_pij(4,2,1061)=1 exch2_oi(2,1061)=0 exch2_oj(2,1061)=0 exch2_neighbourId(3,1061)=1062 exch2_iLo(3,1061)=35 exch2_iHi(3,1061)=35 exch2_jLo(3,1061)=0 exch2_jHi(3,1061)=35 exch2_opposingSend(3,1061)=4 exch2_pij(1,3,1061)=1 exch2_pij(2,3,1061)=0 exch2_pij(3,3,1061)=0 exch2_pij(4,3,1061)=1 exch2_oi(3,1061)=0 exch2_oj(3,1061)=0 exch2_neighbourId(4,1061)=1060 exch2_iLo(4,1061)=0 exch2_iHi(4,1061)=0 exch2_jLo(4,1061)=0 exch2_jHi(4,1061)=35 exch2_opposingSend(4,1061)=3 exch2_pij(1,4,1061)=1 exch2_pij(2,4,1061)=0 exch2_pij(3,4,1061)=0 exch2_pij(4,4,1061)=1 exch2_oi(4,1061)=0 exch2_oj(4,1061)=0 RETURN END SUBROUTINE W2_E2SETUP_1062 C Topology for tile 1062 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1062)=34 exch2_tNy(1062)=34 exch2_tBasex(1062)=374 exch2_tBasey(1062)=340 exch2_txGlobalo(1062)=2415 exch2_tyGlobalo(1062)=341 exch2_isWedge(1062)=0 exch2_isNedge(1062)=0 exch2_isEedge(1062)=0 exch2_isSedge(1062)=0 exch2_myFace(1062)=5 exch2_mydNx(1062)=510 exch2_mydNy(1062)=510 exch2_nNeighbours(1062)=4 exch2_neighbourId(1,1062)=1077 exch2_iLo(1,1062)=0 exch2_iHi(1,1062)=35 exch2_jLo(1,1062)=35 exch2_jHi(1,1062)=35 exch2_opposingSend(1,1062)=2 exch2_pij(1,1,1062)=1 exch2_pij(2,1,1062)=0 exch2_pij(3,1,1062)=0 exch2_pij(4,1,1062)=1 exch2_oi(1,1062)=0 exch2_oj(1,1062)=0 exch2_neighbourId(2,1062)=1047 exch2_iLo(2,1062)=0 exch2_iHi(2,1062)=35 exch2_jLo(2,1062)=0 exch2_jHi(2,1062)=0 exch2_opposingSend(2,1062)=1 exch2_pij(1,2,1062)=1 exch2_pij(2,2,1062)=0 exch2_pij(3,2,1062)=0 exch2_pij(4,2,1062)=1 exch2_oi(2,1062)=0 exch2_oj(2,1062)=0 exch2_neighbourId(3,1062)=1063 exch2_iLo(3,1062)=35 exch2_iHi(3,1062)=35 exch2_jLo(3,1062)=0 exch2_jHi(3,1062)=35 exch2_opposingSend(3,1062)=4 exch2_pij(1,3,1062)=1 exch2_pij(2,3,1062)=0 exch2_pij(3,3,1062)=0 exch2_pij(4,3,1062)=1 exch2_oi(3,1062)=0 exch2_oj(3,1062)=0 exch2_neighbourId(4,1062)=1061 exch2_iLo(4,1062)=0 exch2_iHi(4,1062)=0 exch2_jLo(4,1062)=0 exch2_jHi(4,1062)=35 exch2_opposingSend(4,1062)=3 exch2_pij(1,4,1062)=1 exch2_pij(2,4,1062)=0 exch2_pij(3,4,1062)=0 exch2_pij(4,4,1062)=1 exch2_oi(4,1062)=0 exch2_oj(4,1062)=0 RETURN END SUBROUTINE W2_E2SETUP_1063 C Topology for tile 1063 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1063)=34 exch2_tNy(1063)=34 exch2_tBasex(1063)=408 exch2_tBasey(1063)=340 exch2_txGlobalo(1063)=2449 exch2_tyGlobalo(1063)=341 exch2_isWedge(1063)=0 exch2_isNedge(1063)=0 exch2_isEedge(1063)=0 exch2_isSedge(1063)=0 exch2_myFace(1063)=5 exch2_mydNx(1063)=510 exch2_mydNy(1063)=510 exch2_nNeighbours(1063)=4 exch2_neighbourId(1,1063)=1078 exch2_iLo(1,1063)=0 exch2_iHi(1,1063)=35 exch2_jLo(1,1063)=35 exch2_jHi(1,1063)=35 exch2_opposingSend(1,1063)=2 exch2_pij(1,1,1063)=1 exch2_pij(2,1,1063)=0 exch2_pij(3,1,1063)=0 exch2_pij(4,1,1063)=1 exch2_oi(1,1063)=0 exch2_oj(1,1063)=0 exch2_neighbourId(2,1063)=1048 exch2_iLo(2,1063)=0 exch2_iHi(2,1063)=35 exch2_jLo(2,1063)=0 exch2_jHi(2,1063)=0 exch2_opposingSend(2,1063)=1 exch2_pij(1,2,1063)=1 exch2_pij(2,2,1063)=0 exch2_pij(3,2,1063)=0 exch2_pij(4,2,1063)=1 exch2_oi(2,1063)=0 exch2_oj(2,1063)=0 exch2_neighbourId(3,1063)=1064 exch2_iLo(3,1063)=35 exch2_iHi(3,1063)=35 exch2_jLo(3,1063)=0 exch2_jHi(3,1063)=35 exch2_opposingSend(3,1063)=4 exch2_pij(1,3,1063)=1 exch2_pij(2,3,1063)=0 exch2_pij(3,3,1063)=0 exch2_pij(4,3,1063)=1 exch2_oi(3,1063)=0 exch2_oj(3,1063)=0 exch2_neighbourId(4,1063)=1062 exch2_iLo(4,1063)=0 exch2_iHi(4,1063)=0 exch2_jLo(4,1063)=0 exch2_jHi(4,1063)=35 exch2_opposingSend(4,1063)=3 exch2_pij(1,4,1063)=1 exch2_pij(2,4,1063)=0 exch2_pij(3,4,1063)=0 exch2_pij(4,4,1063)=1 exch2_oi(4,1063)=0 exch2_oj(4,1063)=0 RETURN END SUBROUTINE W2_E2SETUP_1064 C Topology for tile 1064 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1064)=34 exch2_tNy(1064)=34 exch2_tBasex(1064)=442 exch2_tBasey(1064)=340 exch2_txGlobalo(1064)=2483 exch2_tyGlobalo(1064)=341 exch2_isWedge(1064)=0 exch2_isNedge(1064)=0 exch2_isEedge(1064)=0 exch2_isSedge(1064)=0 exch2_myFace(1064)=5 exch2_mydNx(1064)=510 exch2_mydNy(1064)=510 exch2_nNeighbours(1064)=4 exch2_neighbourId(1,1064)=1079 exch2_iLo(1,1064)=0 exch2_iHi(1,1064)=35 exch2_jLo(1,1064)=35 exch2_jHi(1,1064)=35 exch2_opposingSend(1,1064)=2 exch2_pij(1,1,1064)=1 exch2_pij(2,1,1064)=0 exch2_pij(3,1,1064)=0 exch2_pij(4,1,1064)=1 exch2_oi(1,1064)=0 exch2_oj(1,1064)=0 exch2_neighbourId(2,1064)=1049 exch2_iLo(2,1064)=0 exch2_iHi(2,1064)=35 exch2_jLo(2,1064)=0 exch2_jHi(2,1064)=0 exch2_opposingSend(2,1064)=1 exch2_pij(1,2,1064)=1 exch2_pij(2,2,1064)=0 exch2_pij(3,2,1064)=0 exch2_pij(4,2,1064)=1 exch2_oi(2,1064)=0 exch2_oj(2,1064)=0 exch2_neighbourId(3,1064)=1065 exch2_iLo(3,1064)=35 exch2_iHi(3,1064)=35 exch2_jLo(3,1064)=0 exch2_jHi(3,1064)=35 exch2_opposingSend(3,1064)=4 exch2_pij(1,3,1064)=1 exch2_pij(2,3,1064)=0 exch2_pij(3,3,1064)=0 exch2_pij(4,3,1064)=1 exch2_oi(3,1064)=0 exch2_oj(3,1064)=0 exch2_neighbourId(4,1064)=1063 exch2_iLo(4,1064)=0 exch2_iHi(4,1064)=0 exch2_jLo(4,1064)=0 exch2_jHi(4,1064)=35 exch2_opposingSend(4,1064)=3 exch2_pij(1,4,1064)=1 exch2_pij(2,4,1064)=0 exch2_pij(3,4,1064)=0 exch2_pij(4,4,1064)=1 exch2_oi(4,1064)=0 exch2_oj(4,1064)=0 RETURN END SUBROUTINE W2_E2SETUP_1065 C Topology for tile 1065 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1065)=34 exch2_tNy(1065)=34 exch2_tBasex(1065)=476 exch2_tBasey(1065)=340 exch2_txGlobalo(1065)=2517 exch2_tyGlobalo(1065)=341 exch2_isWedge(1065)=0 exch2_isNedge(1065)=0 exch2_isEedge(1065)=1 exch2_isSedge(1065)=0 exch2_myFace(1065)=5 exch2_mydNx(1065)=510 exch2_mydNy(1065)=510 exch2_nNeighbours(1065)=4 exch2_neighbourId(1,1065)=1080 exch2_iLo(1,1065)=0 exch2_iHi(1,1065)=35 exch2_jLo(1,1065)=35 exch2_jHi(1,1065)=35 exch2_opposingSend(1,1065)=2 exch2_pij(1,1,1065)=1 exch2_pij(2,1,1065)=0 exch2_pij(3,1,1065)=0 exch2_pij(4,1,1065)=1 exch2_oi(1,1065)=0 exch2_oj(1,1065)=0 exch2_neighbourId(2,1065)=1050 exch2_iLo(2,1065)=0 exch2_iHi(2,1065)=35 exch2_jLo(2,1065)=0 exch2_jHi(2,1065)=0 exch2_opposingSend(2,1065)=1 exch2_pij(1,2,1065)=1 exch2_pij(2,2,1065)=0 exch2_pij(3,2,1065)=0 exch2_pij(4,2,1065)=1 exch2_oi(2,1065)=0 exch2_oj(2,1065)=0 exch2_neighbourId(3,1065)=1276 exch2_iLo(3,1065)=35 exch2_iHi(3,1065)=35 exch2_jLo(3,1065)=0 exch2_jHi(3,1065)=35 exch2_opposingSend(3,1065)=4 exch2_pij(1,3,1065)=1 exch2_pij(2,3,1065)=0 exch2_pij(3,3,1065)=0 exch2_pij(4,3,1065)=1 exch2_oi(3,1065)=510 exch2_oj(3,1065)=0 exch2_neighbourId(4,1065)=1064 exch2_iLo(4,1065)=0 exch2_iHi(4,1065)=0 exch2_jLo(4,1065)=0 exch2_jHi(4,1065)=35 exch2_opposingSend(4,1065)=3 exch2_pij(1,4,1065)=1 exch2_pij(2,4,1065)=0 exch2_pij(3,4,1065)=0 exch2_pij(4,4,1065)=1 exch2_oi(4,1065)=0 exch2_oj(4,1065)=0 RETURN END SUBROUTINE W2_E2SETUP_1066 C Topology for tile 1066 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1066)=34 exch2_tNy(1066)=34 exch2_tBasex(1066)=0 exch2_tBasey(1066)=374 exch2_txGlobalo(1066)=2041 exch2_tyGlobalo(1066)=375 exch2_isWedge(1066)=1 exch2_isNedge(1066)=0 exch2_isEedge(1066)=0 exch2_isSedge(1066)=0 exch2_myFace(1066)=5 exch2_mydNx(1066)=510 exch2_mydNy(1066)=510 exch2_nNeighbours(1066)=4 exch2_neighbourId(1,1066)=1081 exch2_iLo(1,1066)=0 exch2_iHi(1,1066)=35 exch2_jLo(1,1066)=35 exch2_jHi(1,1066)=35 exch2_opposingSend(1,1066)=2 exch2_pij(1,1,1066)=1 exch2_pij(2,1,1066)=0 exch2_pij(3,1,1066)=0 exch2_pij(4,1,1066)=1 exch2_oi(1,1066)=0 exch2_oj(1,1066)=0 exch2_neighbourId(2,1066)=1051 exch2_iLo(2,1066)=0 exch2_iHi(2,1066)=35 exch2_jLo(2,1066)=0 exch2_jHi(2,1066)=0 exch2_opposingSend(2,1066)=1 exch2_pij(1,2,1066)=1 exch2_pij(2,2,1066)=0 exch2_pij(3,2,1066)=0 exch2_pij(4,2,1066)=1 exch2_oi(2,1066)=0 exch2_oj(2,1066)=0 exch2_neighbourId(3,1066)=1067 exch2_iLo(3,1066)=35 exch2_iHi(3,1066)=35 exch2_jLo(3,1066)=0 exch2_jHi(3,1066)=35 exch2_opposingSend(3,1066)=4 exch2_pij(1,3,1066)=1 exch2_pij(2,3,1066)=0 exch2_pij(3,3,1066)=0 exch2_pij(4,3,1066)=1 exch2_oi(3,1066)=0 exch2_oj(3,1066)=0 exch2_neighbourId(4,1066)=664 exch2_iLo(4,1066)=0 exch2_iHi(4,1066)=0 exch2_jLo(4,1066)=0 exch2_jHi(4,1066)=35 exch2_opposingSend(4,1066)=1 exch2_pij(1,4,1066)=0 exch2_pij(2,4,1066)=1 exch2_pij(3,4,1066)=-1 exch2_pij(4,4,1066)=0 exch2_oi(4,1066)=-510 exch2_oj(4,1066)=511 RETURN END SUBROUTINE W2_E2SETUP_1067 C Topology for tile 1067 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1067)=34 exch2_tNy(1067)=34 exch2_tBasex(1067)=34 exch2_tBasey(1067)=374 exch2_txGlobalo(1067)=2075 exch2_tyGlobalo(1067)=375 exch2_isWedge(1067)=0 exch2_isNedge(1067)=0 exch2_isEedge(1067)=0 exch2_isSedge(1067)=0 exch2_myFace(1067)=5 exch2_mydNx(1067)=510 exch2_mydNy(1067)=510 exch2_nNeighbours(1067)=4 exch2_neighbourId(1,1067)=1082 exch2_iLo(1,1067)=0 exch2_iHi(1,1067)=35 exch2_jLo(1,1067)=35 exch2_jHi(1,1067)=35 exch2_opposingSend(1,1067)=2 exch2_pij(1,1,1067)=1 exch2_pij(2,1,1067)=0 exch2_pij(3,1,1067)=0 exch2_pij(4,1,1067)=1 exch2_oi(1,1067)=0 exch2_oj(1,1067)=0 exch2_neighbourId(2,1067)=1052 exch2_iLo(2,1067)=0 exch2_iHi(2,1067)=35 exch2_jLo(2,1067)=0 exch2_jHi(2,1067)=0 exch2_opposingSend(2,1067)=1 exch2_pij(1,2,1067)=1 exch2_pij(2,2,1067)=0 exch2_pij(3,2,1067)=0 exch2_pij(4,2,1067)=1 exch2_oi(2,1067)=0 exch2_oj(2,1067)=0 exch2_neighbourId(3,1067)=1068 exch2_iLo(3,1067)=35 exch2_iHi(3,1067)=35 exch2_jLo(3,1067)=0 exch2_jHi(3,1067)=35 exch2_opposingSend(3,1067)=4 exch2_pij(1,3,1067)=1 exch2_pij(2,3,1067)=0 exch2_pij(3,3,1067)=0 exch2_pij(4,3,1067)=1 exch2_oi(3,1067)=0 exch2_oj(3,1067)=0 exch2_neighbourId(4,1067)=1066 exch2_iLo(4,1067)=0 exch2_iHi(4,1067)=0 exch2_jLo(4,1067)=0 exch2_jHi(4,1067)=35 exch2_opposingSend(4,1067)=3 exch2_pij(1,4,1067)=1 exch2_pij(2,4,1067)=0 exch2_pij(3,4,1067)=0 exch2_pij(4,4,1067)=1 exch2_oi(4,1067)=0 exch2_oj(4,1067)=0 RETURN END SUBROUTINE W2_E2SETUP_1068 C Topology for tile 1068 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1068)=34 exch2_tNy(1068)=34 exch2_tBasex(1068)=68 exch2_tBasey(1068)=374 exch2_txGlobalo(1068)=2109 exch2_tyGlobalo(1068)=375 exch2_isWedge(1068)=0 exch2_isNedge(1068)=0 exch2_isEedge(1068)=0 exch2_isSedge(1068)=0 exch2_myFace(1068)=5 exch2_mydNx(1068)=510 exch2_mydNy(1068)=510 exch2_nNeighbours(1068)=4 exch2_neighbourId(1,1068)=1083 exch2_iLo(1,1068)=0 exch2_iHi(1,1068)=35 exch2_jLo(1,1068)=35 exch2_jHi(1,1068)=35 exch2_opposingSend(1,1068)=2 exch2_pij(1,1,1068)=1 exch2_pij(2,1,1068)=0 exch2_pij(3,1,1068)=0 exch2_pij(4,1,1068)=1 exch2_oi(1,1068)=0 exch2_oj(1,1068)=0 exch2_neighbourId(2,1068)=1053 exch2_iLo(2,1068)=0 exch2_iHi(2,1068)=35 exch2_jLo(2,1068)=0 exch2_jHi(2,1068)=0 exch2_opposingSend(2,1068)=1 exch2_pij(1,2,1068)=1 exch2_pij(2,2,1068)=0 exch2_pij(3,2,1068)=0 exch2_pij(4,2,1068)=1 exch2_oi(2,1068)=0 exch2_oj(2,1068)=0 exch2_neighbourId(3,1068)=1069 exch2_iLo(3,1068)=35 exch2_iHi(3,1068)=35 exch2_jLo(3,1068)=0 exch2_jHi(3,1068)=35 exch2_opposingSend(3,1068)=4 exch2_pij(1,3,1068)=1 exch2_pij(2,3,1068)=0 exch2_pij(3,3,1068)=0 exch2_pij(4,3,1068)=1 exch2_oi(3,1068)=0 exch2_oj(3,1068)=0 exch2_neighbourId(4,1068)=1067 exch2_iLo(4,1068)=0 exch2_iHi(4,1068)=0 exch2_jLo(4,1068)=0 exch2_jHi(4,1068)=35 exch2_opposingSend(4,1068)=3 exch2_pij(1,4,1068)=1 exch2_pij(2,4,1068)=0 exch2_pij(3,4,1068)=0 exch2_pij(4,4,1068)=1 exch2_oi(4,1068)=0 exch2_oj(4,1068)=0 RETURN END SUBROUTINE W2_E2SETUP_1069 C Topology for tile 1069 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1069)=34 exch2_tNy(1069)=34 exch2_tBasex(1069)=102 exch2_tBasey(1069)=374 exch2_txGlobalo(1069)=2143 exch2_tyGlobalo(1069)=375 exch2_isWedge(1069)=0 exch2_isNedge(1069)=0 exch2_isEedge(1069)=0 exch2_isSedge(1069)=0 exch2_myFace(1069)=5 exch2_mydNx(1069)=510 exch2_mydNy(1069)=510 exch2_nNeighbours(1069)=4 exch2_neighbourId(1,1069)=1084 exch2_iLo(1,1069)=0 exch2_iHi(1,1069)=35 exch2_jLo(1,1069)=35 exch2_jHi(1,1069)=35 exch2_opposingSend(1,1069)=2 exch2_pij(1,1,1069)=1 exch2_pij(2,1,1069)=0 exch2_pij(3,1,1069)=0 exch2_pij(4,1,1069)=1 exch2_oi(1,1069)=0 exch2_oj(1,1069)=0 exch2_neighbourId(2,1069)=1054 exch2_iLo(2,1069)=0 exch2_iHi(2,1069)=35 exch2_jLo(2,1069)=0 exch2_jHi(2,1069)=0 exch2_opposingSend(2,1069)=1 exch2_pij(1,2,1069)=1 exch2_pij(2,2,1069)=0 exch2_pij(3,2,1069)=0 exch2_pij(4,2,1069)=1 exch2_oi(2,1069)=0 exch2_oj(2,1069)=0 exch2_neighbourId(3,1069)=1070 exch2_iLo(3,1069)=35 exch2_iHi(3,1069)=35 exch2_jLo(3,1069)=0 exch2_jHi(3,1069)=35 exch2_opposingSend(3,1069)=4 exch2_pij(1,3,1069)=1 exch2_pij(2,3,1069)=0 exch2_pij(3,3,1069)=0 exch2_pij(4,3,1069)=1 exch2_oi(3,1069)=0 exch2_oj(3,1069)=0 exch2_neighbourId(4,1069)=1068 exch2_iLo(4,1069)=0 exch2_iHi(4,1069)=0 exch2_jLo(4,1069)=0 exch2_jHi(4,1069)=35 exch2_opposingSend(4,1069)=3 exch2_pij(1,4,1069)=1 exch2_pij(2,4,1069)=0 exch2_pij(3,4,1069)=0 exch2_pij(4,4,1069)=1 exch2_oi(4,1069)=0 exch2_oj(4,1069)=0 RETURN END SUBROUTINE W2_E2SETUP_1070 C Topology for tile 1070 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1070)=34 exch2_tNy(1070)=34 exch2_tBasex(1070)=136 exch2_tBasey(1070)=374 exch2_txGlobalo(1070)=2177 exch2_tyGlobalo(1070)=375 exch2_isWedge(1070)=0 exch2_isNedge(1070)=0 exch2_isEedge(1070)=0 exch2_isSedge(1070)=0 exch2_myFace(1070)=5 exch2_mydNx(1070)=510 exch2_mydNy(1070)=510 exch2_nNeighbours(1070)=4 exch2_neighbourId(1,1070)=1085 exch2_iLo(1,1070)=0 exch2_iHi(1,1070)=35 exch2_jLo(1,1070)=35 exch2_jHi(1,1070)=35 exch2_opposingSend(1,1070)=2 exch2_pij(1,1,1070)=1 exch2_pij(2,1,1070)=0 exch2_pij(3,1,1070)=0 exch2_pij(4,1,1070)=1 exch2_oi(1,1070)=0 exch2_oj(1,1070)=0 exch2_neighbourId(2,1070)=1055 exch2_iLo(2,1070)=0 exch2_iHi(2,1070)=35 exch2_jLo(2,1070)=0 exch2_jHi(2,1070)=0 exch2_opposingSend(2,1070)=1 exch2_pij(1,2,1070)=1 exch2_pij(2,2,1070)=0 exch2_pij(3,2,1070)=0 exch2_pij(4,2,1070)=1 exch2_oi(2,1070)=0 exch2_oj(2,1070)=0 exch2_neighbourId(3,1070)=1071 exch2_iLo(3,1070)=35 exch2_iHi(3,1070)=35 exch2_jLo(3,1070)=0 exch2_jHi(3,1070)=35 exch2_opposingSend(3,1070)=4 exch2_pij(1,3,1070)=1 exch2_pij(2,3,1070)=0 exch2_pij(3,3,1070)=0 exch2_pij(4,3,1070)=1 exch2_oi(3,1070)=0 exch2_oj(3,1070)=0 exch2_neighbourId(4,1070)=1069 exch2_iLo(4,1070)=0 exch2_iHi(4,1070)=0 exch2_jLo(4,1070)=0 exch2_jHi(4,1070)=35 exch2_opposingSend(4,1070)=3 exch2_pij(1,4,1070)=1 exch2_pij(2,4,1070)=0 exch2_pij(3,4,1070)=0 exch2_pij(4,4,1070)=1 exch2_oi(4,1070)=0 exch2_oj(4,1070)=0 RETURN END SUBROUTINE W2_E2SETUP_1071 C Topology for tile 1071 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1071)=34 exch2_tNy(1071)=34 exch2_tBasex(1071)=170 exch2_tBasey(1071)=374 exch2_txGlobalo(1071)=2211 exch2_tyGlobalo(1071)=375 exch2_isWedge(1071)=0 exch2_isNedge(1071)=0 exch2_isEedge(1071)=0 exch2_isSedge(1071)=0 exch2_myFace(1071)=5 exch2_mydNx(1071)=510 exch2_mydNy(1071)=510 exch2_nNeighbours(1071)=4 exch2_neighbourId(1,1071)=1086 exch2_iLo(1,1071)=0 exch2_iHi(1,1071)=35 exch2_jLo(1,1071)=35 exch2_jHi(1,1071)=35 exch2_opposingSend(1,1071)=2 exch2_pij(1,1,1071)=1 exch2_pij(2,1,1071)=0 exch2_pij(3,1,1071)=0 exch2_pij(4,1,1071)=1 exch2_oi(1,1071)=0 exch2_oj(1,1071)=0 exch2_neighbourId(2,1071)=1056 exch2_iLo(2,1071)=0 exch2_iHi(2,1071)=35 exch2_jLo(2,1071)=0 exch2_jHi(2,1071)=0 exch2_opposingSend(2,1071)=1 exch2_pij(1,2,1071)=1 exch2_pij(2,2,1071)=0 exch2_pij(3,2,1071)=0 exch2_pij(4,2,1071)=1 exch2_oi(2,1071)=0 exch2_oj(2,1071)=0 exch2_neighbourId(3,1071)=1072 exch2_iLo(3,1071)=35 exch2_iHi(3,1071)=35 exch2_jLo(3,1071)=0 exch2_jHi(3,1071)=35 exch2_opposingSend(3,1071)=4 exch2_pij(1,3,1071)=1 exch2_pij(2,3,1071)=0 exch2_pij(3,3,1071)=0 exch2_pij(4,3,1071)=1 exch2_oi(3,1071)=0 exch2_oj(3,1071)=0 exch2_neighbourId(4,1071)=1070 exch2_iLo(4,1071)=0 exch2_iHi(4,1071)=0 exch2_jLo(4,1071)=0 exch2_jHi(4,1071)=35 exch2_opposingSend(4,1071)=3 exch2_pij(1,4,1071)=1 exch2_pij(2,4,1071)=0 exch2_pij(3,4,1071)=0 exch2_pij(4,4,1071)=1 exch2_oi(4,1071)=0 exch2_oj(4,1071)=0 RETURN END SUBROUTINE W2_E2SETUP_1072 C Topology for tile 1072 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1072)=34 exch2_tNy(1072)=34 exch2_tBasex(1072)=204 exch2_tBasey(1072)=374 exch2_txGlobalo(1072)=2245 exch2_tyGlobalo(1072)=375 exch2_isWedge(1072)=0 exch2_isNedge(1072)=0 exch2_isEedge(1072)=0 exch2_isSedge(1072)=0 exch2_myFace(1072)=5 exch2_mydNx(1072)=510 exch2_mydNy(1072)=510 exch2_nNeighbours(1072)=4 exch2_neighbourId(1,1072)=1087 exch2_iLo(1,1072)=0 exch2_iHi(1,1072)=35 exch2_jLo(1,1072)=35 exch2_jHi(1,1072)=35 exch2_opposingSend(1,1072)=2 exch2_pij(1,1,1072)=1 exch2_pij(2,1,1072)=0 exch2_pij(3,1,1072)=0 exch2_pij(4,1,1072)=1 exch2_oi(1,1072)=0 exch2_oj(1,1072)=0 exch2_neighbourId(2,1072)=1057 exch2_iLo(2,1072)=0 exch2_iHi(2,1072)=35 exch2_jLo(2,1072)=0 exch2_jHi(2,1072)=0 exch2_opposingSend(2,1072)=1 exch2_pij(1,2,1072)=1 exch2_pij(2,2,1072)=0 exch2_pij(3,2,1072)=0 exch2_pij(4,2,1072)=1 exch2_oi(2,1072)=0 exch2_oj(2,1072)=0 exch2_neighbourId(3,1072)=1073 exch2_iLo(3,1072)=35 exch2_iHi(3,1072)=35 exch2_jLo(3,1072)=0 exch2_jHi(3,1072)=35 exch2_opposingSend(3,1072)=4 exch2_pij(1,3,1072)=1 exch2_pij(2,3,1072)=0 exch2_pij(3,3,1072)=0 exch2_pij(4,3,1072)=1 exch2_oi(3,1072)=0 exch2_oj(3,1072)=0 exch2_neighbourId(4,1072)=1071 exch2_iLo(4,1072)=0 exch2_iHi(4,1072)=0 exch2_jLo(4,1072)=0 exch2_jHi(4,1072)=35 exch2_opposingSend(4,1072)=3 exch2_pij(1,4,1072)=1 exch2_pij(2,4,1072)=0 exch2_pij(3,4,1072)=0 exch2_pij(4,4,1072)=1 exch2_oi(4,1072)=0 exch2_oj(4,1072)=0 RETURN END SUBROUTINE W2_E2SETUP_1073 C Topology for tile 1073 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1073)=34 exch2_tNy(1073)=34 exch2_tBasex(1073)=238 exch2_tBasey(1073)=374 exch2_txGlobalo(1073)=2279 exch2_tyGlobalo(1073)=375 exch2_isWedge(1073)=0 exch2_isNedge(1073)=0 exch2_isEedge(1073)=0 exch2_isSedge(1073)=0 exch2_myFace(1073)=5 exch2_mydNx(1073)=510 exch2_mydNy(1073)=510 exch2_nNeighbours(1073)=4 exch2_neighbourId(1,1073)=1088 exch2_iLo(1,1073)=0 exch2_iHi(1,1073)=35 exch2_jLo(1,1073)=35 exch2_jHi(1,1073)=35 exch2_opposingSend(1,1073)=2 exch2_pij(1,1,1073)=1 exch2_pij(2,1,1073)=0 exch2_pij(3,1,1073)=0 exch2_pij(4,1,1073)=1 exch2_oi(1,1073)=0 exch2_oj(1,1073)=0 exch2_neighbourId(2,1073)=1058 exch2_iLo(2,1073)=0 exch2_iHi(2,1073)=35 exch2_jLo(2,1073)=0 exch2_jHi(2,1073)=0 exch2_opposingSend(2,1073)=1 exch2_pij(1,2,1073)=1 exch2_pij(2,2,1073)=0 exch2_pij(3,2,1073)=0 exch2_pij(4,2,1073)=1 exch2_oi(2,1073)=0 exch2_oj(2,1073)=0 exch2_neighbourId(3,1073)=1074 exch2_iLo(3,1073)=35 exch2_iHi(3,1073)=35 exch2_jLo(3,1073)=0 exch2_jHi(3,1073)=35 exch2_opposingSend(3,1073)=4 exch2_pij(1,3,1073)=1 exch2_pij(2,3,1073)=0 exch2_pij(3,3,1073)=0 exch2_pij(4,3,1073)=1 exch2_oi(3,1073)=0 exch2_oj(3,1073)=0 exch2_neighbourId(4,1073)=1072 exch2_iLo(4,1073)=0 exch2_iHi(4,1073)=0 exch2_jLo(4,1073)=0 exch2_jHi(4,1073)=35 exch2_opposingSend(4,1073)=3 exch2_pij(1,4,1073)=1 exch2_pij(2,4,1073)=0 exch2_pij(3,4,1073)=0 exch2_pij(4,4,1073)=1 exch2_oi(4,1073)=0 exch2_oj(4,1073)=0 RETURN END SUBROUTINE W2_E2SETUP_1074 C Topology for tile 1074 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1074)=34 exch2_tNy(1074)=34 exch2_tBasex(1074)=272 exch2_tBasey(1074)=374 exch2_txGlobalo(1074)=2313 exch2_tyGlobalo(1074)=375 exch2_isWedge(1074)=0 exch2_isNedge(1074)=0 exch2_isEedge(1074)=0 exch2_isSedge(1074)=0 exch2_myFace(1074)=5 exch2_mydNx(1074)=510 exch2_mydNy(1074)=510 exch2_nNeighbours(1074)=4 exch2_neighbourId(1,1074)=1089 exch2_iLo(1,1074)=0 exch2_iHi(1,1074)=35 exch2_jLo(1,1074)=35 exch2_jHi(1,1074)=35 exch2_opposingSend(1,1074)=2 exch2_pij(1,1,1074)=1 exch2_pij(2,1,1074)=0 exch2_pij(3,1,1074)=0 exch2_pij(4,1,1074)=1 exch2_oi(1,1074)=0 exch2_oj(1,1074)=0 exch2_neighbourId(2,1074)=1059 exch2_iLo(2,1074)=0 exch2_iHi(2,1074)=35 exch2_jLo(2,1074)=0 exch2_jHi(2,1074)=0 exch2_opposingSend(2,1074)=1 exch2_pij(1,2,1074)=1 exch2_pij(2,2,1074)=0 exch2_pij(3,2,1074)=0 exch2_pij(4,2,1074)=1 exch2_oi(2,1074)=0 exch2_oj(2,1074)=0 exch2_neighbourId(3,1074)=1075 exch2_iLo(3,1074)=35 exch2_iHi(3,1074)=35 exch2_jLo(3,1074)=0 exch2_jHi(3,1074)=35 exch2_opposingSend(3,1074)=4 exch2_pij(1,3,1074)=1 exch2_pij(2,3,1074)=0 exch2_pij(3,3,1074)=0 exch2_pij(4,3,1074)=1 exch2_oi(3,1074)=0 exch2_oj(3,1074)=0 exch2_neighbourId(4,1074)=1073 exch2_iLo(4,1074)=0 exch2_iHi(4,1074)=0 exch2_jLo(4,1074)=0 exch2_jHi(4,1074)=35 exch2_opposingSend(4,1074)=3 exch2_pij(1,4,1074)=1 exch2_pij(2,4,1074)=0 exch2_pij(3,4,1074)=0 exch2_pij(4,4,1074)=1 exch2_oi(4,1074)=0 exch2_oj(4,1074)=0 RETURN END SUBROUTINE W2_E2SETUP_1075 C Topology for tile 1075 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1075)=34 exch2_tNy(1075)=34 exch2_tBasex(1075)=306 exch2_tBasey(1075)=374 exch2_txGlobalo(1075)=2347 exch2_tyGlobalo(1075)=375 exch2_isWedge(1075)=0 exch2_isNedge(1075)=0 exch2_isEedge(1075)=0 exch2_isSedge(1075)=0 exch2_myFace(1075)=5 exch2_mydNx(1075)=510 exch2_mydNy(1075)=510 exch2_nNeighbours(1075)=4 exch2_neighbourId(1,1075)=1090 exch2_iLo(1,1075)=0 exch2_iHi(1,1075)=35 exch2_jLo(1,1075)=35 exch2_jHi(1,1075)=35 exch2_opposingSend(1,1075)=2 exch2_pij(1,1,1075)=1 exch2_pij(2,1,1075)=0 exch2_pij(3,1,1075)=0 exch2_pij(4,1,1075)=1 exch2_oi(1,1075)=0 exch2_oj(1,1075)=0 exch2_neighbourId(2,1075)=1060 exch2_iLo(2,1075)=0 exch2_iHi(2,1075)=35 exch2_jLo(2,1075)=0 exch2_jHi(2,1075)=0 exch2_opposingSend(2,1075)=1 exch2_pij(1,2,1075)=1 exch2_pij(2,2,1075)=0 exch2_pij(3,2,1075)=0 exch2_pij(4,2,1075)=1 exch2_oi(2,1075)=0 exch2_oj(2,1075)=0 exch2_neighbourId(3,1075)=1076 exch2_iLo(3,1075)=35 exch2_iHi(3,1075)=35 exch2_jLo(3,1075)=0 exch2_jHi(3,1075)=35 exch2_opposingSend(3,1075)=4 exch2_pij(1,3,1075)=1 exch2_pij(2,3,1075)=0 exch2_pij(3,3,1075)=0 exch2_pij(4,3,1075)=1 exch2_oi(3,1075)=0 exch2_oj(3,1075)=0 exch2_neighbourId(4,1075)=1074 exch2_iLo(4,1075)=0 exch2_iHi(4,1075)=0 exch2_jLo(4,1075)=0 exch2_jHi(4,1075)=35 exch2_opposingSend(4,1075)=3 exch2_pij(1,4,1075)=1 exch2_pij(2,4,1075)=0 exch2_pij(3,4,1075)=0 exch2_pij(4,4,1075)=1 exch2_oi(4,1075)=0 exch2_oj(4,1075)=0 RETURN END SUBROUTINE W2_E2SETUP_1076 C Topology for tile 1076 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1076)=34 exch2_tNy(1076)=34 exch2_tBasex(1076)=340 exch2_tBasey(1076)=374 exch2_txGlobalo(1076)=2381 exch2_tyGlobalo(1076)=375 exch2_isWedge(1076)=0 exch2_isNedge(1076)=0 exch2_isEedge(1076)=0 exch2_isSedge(1076)=0 exch2_myFace(1076)=5 exch2_mydNx(1076)=510 exch2_mydNy(1076)=510 exch2_nNeighbours(1076)=4 exch2_neighbourId(1,1076)=1091 exch2_iLo(1,1076)=0 exch2_iHi(1,1076)=35 exch2_jLo(1,1076)=35 exch2_jHi(1,1076)=35 exch2_opposingSend(1,1076)=2 exch2_pij(1,1,1076)=1 exch2_pij(2,1,1076)=0 exch2_pij(3,1,1076)=0 exch2_pij(4,1,1076)=1 exch2_oi(1,1076)=0 exch2_oj(1,1076)=0 exch2_neighbourId(2,1076)=1061 exch2_iLo(2,1076)=0 exch2_iHi(2,1076)=35 exch2_jLo(2,1076)=0 exch2_jHi(2,1076)=0 exch2_opposingSend(2,1076)=1 exch2_pij(1,2,1076)=1 exch2_pij(2,2,1076)=0 exch2_pij(3,2,1076)=0 exch2_pij(4,2,1076)=1 exch2_oi(2,1076)=0 exch2_oj(2,1076)=0 exch2_neighbourId(3,1076)=1077 exch2_iLo(3,1076)=35 exch2_iHi(3,1076)=35 exch2_jLo(3,1076)=0 exch2_jHi(3,1076)=35 exch2_opposingSend(3,1076)=4 exch2_pij(1,3,1076)=1 exch2_pij(2,3,1076)=0 exch2_pij(3,3,1076)=0 exch2_pij(4,3,1076)=1 exch2_oi(3,1076)=0 exch2_oj(3,1076)=0 exch2_neighbourId(4,1076)=1075 exch2_iLo(4,1076)=0 exch2_iHi(4,1076)=0 exch2_jLo(4,1076)=0 exch2_jHi(4,1076)=35 exch2_opposingSend(4,1076)=3 exch2_pij(1,4,1076)=1 exch2_pij(2,4,1076)=0 exch2_pij(3,4,1076)=0 exch2_pij(4,4,1076)=1 exch2_oi(4,1076)=0 exch2_oj(4,1076)=0 RETURN END SUBROUTINE W2_E2SETUP_1077 C Topology for tile 1077 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1077)=34 exch2_tNy(1077)=34 exch2_tBasex(1077)=374 exch2_tBasey(1077)=374 exch2_txGlobalo(1077)=2415 exch2_tyGlobalo(1077)=375 exch2_isWedge(1077)=0 exch2_isNedge(1077)=0 exch2_isEedge(1077)=0 exch2_isSedge(1077)=0 exch2_myFace(1077)=5 exch2_mydNx(1077)=510 exch2_mydNy(1077)=510 exch2_nNeighbours(1077)=4 exch2_neighbourId(1,1077)=1092 exch2_iLo(1,1077)=0 exch2_iHi(1,1077)=35 exch2_jLo(1,1077)=35 exch2_jHi(1,1077)=35 exch2_opposingSend(1,1077)=2 exch2_pij(1,1,1077)=1 exch2_pij(2,1,1077)=0 exch2_pij(3,1,1077)=0 exch2_pij(4,1,1077)=1 exch2_oi(1,1077)=0 exch2_oj(1,1077)=0 exch2_neighbourId(2,1077)=1062 exch2_iLo(2,1077)=0 exch2_iHi(2,1077)=35 exch2_jLo(2,1077)=0 exch2_jHi(2,1077)=0 exch2_opposingSend(2,1077)=1 exch2_pij(1,2,1077)=1 exch2_pij(2,2,1077)=0 exch2_pij(3,2,1077)=0 exch2_pij(4,2,1077)=1 exch2_oi(2,1077)=0 exch2_oj(2,1077)=0 exch2_neighbourId(3,1077)=1078 exch2_iLo(3,1077)=35 exch2_iHi(3,1077)=35 exch2_jLo(3,1077)=0 exch2_jHi(3,1077)=35 exch2_opposingSend(3,1077)=4 exch2_pij(1,3,1077)=1 exch2_pij(2,3,1077)=0 exch2_pij(3,3,1077)=0 exch2_pij(4,3,1077)=1 exch2_oi(3,1077)=0 exch2_oj(3,1077)=0 exch2_neighbourId(4,1077)=1076 exch2_iLo(4,1077)=0 exch2_iHi(4,1077)=0 exch2_jLo(4,1077)=0 exch2_jHi(4,1077)=35 exch2_opposingSend(4,1077)=3 exch2_pij(1,4,1077)=1 exch2_pij(2,4,1077)=0 exch2_pij(3,4,1077)=0 exch2_pij(4,4,1077)=1 exch2_oi(4,1077)=0 exch2_oj(4,1077)=0 RETURN END SUBROUTINE W2_E2SETUP_1078 C Topology for tile 1078 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1078)=34 exch2_tNy(1078)=34 exch2_tBasex(1078)=408 exch2_tBasey(1078)=374 exch2_txGlobalo(1078)=2449 exch2_tyGlobalo(1078)=375 exch2_isWedge(1078)=0 exch2_isNedge(1078)=0 exch2_isEedge(1078)=0 exch2_isSedge(1078)=0 exch2_myFace(1078)=5 exch2_mydNx(1078)=510 exch2_mydNy(1078)=510 exch2_nNeighbours(1078)=4 exch2_neighbourId(1,1078)=1093 exch2_iLo(1,1078)=0 exch2_iHi(1,1078)=35 exch2_jLo(1,1078)=35 exch2_jHi(1,1078)=35 exch2_opposingSend(1,1078)=2 exch2_pij(1,1,1078)=1 exch2_pij(2,1,1078)=0 exch2_pij(3,1,1078)=0 exch2_pij(4,1,1078)=1 exch2_oi(1,1078)=0 exch2_oj(1,1078)=0 exch2_neighbourId(2,1078)=1063 exch2_iLo(2,1078)=0 exch2_iHi(2,1078)=35 exch2_jLo(2,1078)=0 exch2_jHi(2,1078)=0 exch2_opposingSend(2,1078)=1 exch2_pij(1,2,1078)=1 exch2_pij(2,2,1078)=0 exch2_pij(3,2,1078)=0 exch2_pij(4,2,1078)=1 exch2_oi(2,1078)=0 exch2_oj(2,1078)=0 exch2_neighbourId(3,1078)=1079 exch2_iLo(3,1078)=35 exch2_iHi(3,1078)=35 exch2_jLo(3,1078)=0 exch2_jHi(3,1078)=35 exch2_opposingSend(3,1078)=4 exch2_pij(1,3,1078)=1 exch2_pij(2,3,1078)=0 exch2_pij(3,3,1078)=0 exch2_pij(4,3,1078)=1 exch2_oi(3,1078)=0 exch2_oj(3,1078)=0 exch2_neighbourId(4,1078)=1077 exch2_iLo(4,1078)=0 exch2_iHi(4,1078)=0 exch2_jLo(4,1078)=0 exch2_jHi(4,1078)=35 exch2_opposingSend(4,1078)=3 exch2_pij(1,4,1078)=1 exch2_pij(2,4,1078)=0 exch2_pij(3,4,1078)=0 exch2_pij(4,4,1078)=1 exch2_oi(4,1078)=0 exch2_oj(4,1078)=0 RETURN END SUBROUTINE W2_E2SETUP_1079 C Topology for tile 1079 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1079)=34 exch2_tNy(1079)=34 exch2_tBasex(1079)=442 exch2_tBasey(1079)=374 exch2_txGlobalo(1079)=2483 exch2_tyGlobalo(1079)=375 exch2_isWedge(1079)=0 exch2_isNedge(1079)=0 exch2_isEedge(1079)=0 exch2_isSedge(1079)=0 exch2_myFace(1079)=5 exch2_mydNx(1079)=510 exch2_mydNy(1079)=510 exch2_nNeighbours(1079)=4 exch2_neighbourId(1,1079)=1094 exch2_iLo(1,1079)=0 exch2_iHi(1,1079)=35 exch2_jLo(1,1079)=35 exch2_jHi(1,1079)=35 exch2_opposingSend(1,1079)=2 exch2_pij(1,1,1079)=1 exch2_pij(2,1,1079)=0 exch2_pij(3,1,1079)=0 exch2_pij(4,1,1079)=1 exch2_oi(1,1079)=0 exch2_oj(1,1079)=0 exch2_neighbourId(2,1079)=1064 exch2_iLo(2,1079)=0 exch2_iHi(2,1079)=35 exch2_jLo(2,1079)=0 exch2_jHi(2,1079)=0 exch2_opposingSend(2,1079)=1 exch2_pij(1,2,1079)=1 exch2_pij(2,2,1079)=0 exch2_pij(3,2,1079)=0 exch2_pij(4,2,1079)=1 exch2_oi(2,1079)=0 exch2_oj(2,1079)=0 exch2_neighbourId(3,1079)=1080 exch2_iLo(3,1079)=35 exch2_iHi(3,1079)=35 exch2_jLo(3,1079)=0 exch2_jHi(3,1079)=35 exch2_opposingSend(3,1079)=4 exch2_pij(1,3,1079)=1 exch2_pij(2,3,1079)=0 exch2_pij(3,3,1079)=0 exch2_pij(4,3,1079)=1 exch2_oi(3,1079)=0 exch2_oj(3,1079)=0 exch2_neighbourId(4,1079)=1078 exch2_iLo(4,1079)=0 exch2_iHi(4,1079)=0 exch2_jLo(4,1079)=0 exch2_jHi(4,1079)=35 exch2_opposingSend(4,1079)=3 exch2_pij(1,4,1079)=1 exch2_pij(2,4,1079)=0 exch2_pij(3,4,1079)=0 exch2_pij(4,4,1079)=1 exch2_oi(4,1079)=0 exch2_oj(4,1079)=0 RETURN END SUBROUTINE W2_E2SETUP_1080 C Topology for tile 1080 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1080)=34 exch2_tNy(1080)=34 exch2_tBasex(1080)=476 exch2_tBasey(1080)=374 exch2_txGlobalo(1080)=2517 exch2_tyGlobalo(1080)=375 exch2_isWedge(1080)=0 exch2_isNedge(1080)=0 exch2_isEedge(1080)=1 exch2_isSedge(1080)=0 exch2_myFace(1080)=5 exch2_mydNx(1080)=510 exch2_mydNy(1080)=510 exch2_nNeighbours(1080)=4 exch2_neighbourId(1,1080)=1095 exch2_iLo(1,1080)=0 exch2_iHi(1,1080)=35 exch2_jLo(1,1080)=35 exch2_jHi(1,1080)=35 exch2_opposingSend(1,1080)=2 exch2_pij(1,1,1080)=1 exch2_pij(2,1,1080)=0 exch2_pij(3,1,1080)=0 exch2_pij(4,1,1080)=1 exch2_oi(1,1080)=0 exch2_oj(1,1080)=0 exch2_neighbourId(2,1080)=1065 exch2_iLo(2,1080)=0 exch2_iHi(2,1080)=35 exch2_jLo(2,1080)=0 exch2_jHi(2,1080)=0 exch2_opposingSend(2,1080)=1 exch2_pij(1,2,1080)=1 exch2_pij(2,2,1080)=0 exch2_pij(3,2,1080)=0 exch2_pij(4,2,1080)=1 exch2_oi(2,1080)=0 exch2_oj(2,1080)=0 exch2_neighbourId(3,1080)=1291 exch2_iLo(3,1080)=35 exch2_iHi(3,1080)=35 exch2_jLo(3,1080)=0 exch2_jHi(3,1080)=35 exch2_opposingSend(3,1080)=4 exch2_pij(1,3,1080)=1 exch2_pij(2,3,1080)=0 exch2_pij(3,3,1080)=0 exch2_pij(4,3,1080)=1 exch2_oi(3,1080)=510 exch2_oj(3,1080)=0 exch2_neighbourId(4,1080)=1079 exch2_iLo(4,1080)=0 exch2_iHi(4,1080)=0 exch2_jLo(4,1080)=0 exch2_jHi(4,1080)=35 exch2_opposingSend(4,1080)=3 exch2_pij(1,4,1080)=1 exch2_pij(2,4,1080)=0 exch2_pij(3,4,1080)=0 exch2_pij(4,4,1080)=1 exch2_oi(4,1080)=0 exch2_oj(4,1080)=0 RETURN END SUBROUTINE W2_E2SETUP_1081 C Topology for tile 1081 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1081)=34 exch2_tNy(1081)=34 exch2_tBasex(1081)=0 exch2_tBasey(1081)=408 exch2_txGlobalo(1081)=2041 exch2_tyGlobalo(1081)=409 exch2_isWedge(1081)=1 exch2_isNedge(1081)=0 exch2_isEedge(1081)=0 exch2_isSedge(1081)=0 exch2_myFace(1081)=5 exch2_mydNx(1081)=510 exch2_mydNy(1081)=510 exch2_nNeighbours(1081)=4 exch2_neighbourId(1,1081)=1096 exch2_iLo(1,1081)=0 exch2_iHi(1,1081)=35 exch2_jLo(1,1081)=35 exch2_jHi(1,1081)=35 exch2_opposingSend(1,1081)=2 exch2_pij(1,1,1081)=1 exch2_pij(2,1,1081)=0 exch2_pij(3,1,1081)=0 exch2_pij(4,1,1081)=1 exch2_oi(1,1081)=0 exch2_oj(1,1081)=0 exch2_neighbourId(2,1081)=1066 exch2_iLo(2,1081)=0 exch2_iHi(2,1081)=35 exch2_jLo(2,1081)=0 exch2_jHi(2,1081)=0 exch2_opposingSend(2,1081)=1 exch2_pij(1,2,1081)=1 exch2_pij(2,2,1081)=0 exch2_pij(3,2,1081)=0 exch2_pij(4,2,1081)=1 exch2_oi(2,1081)=0 exch2_oj(2,1081)=0 exch2_neighbourId(3,1081)=1082 exch2_iLo(3,1081)=35 exch2_iHi(3,1081)=35 exch2_jLo(3,1081)=0 exch2_jHi(3,1081)=35 exch2_opposingSend(3,1081)=4 exch2_pij(1,3,1081)=1 exch2_pij(2,3,1081)=0 exch2_pij(3,3,1081)=0 exch2_pij(4,3,1081)=1 exch2_oi(3,1081)=0 exch2_oj(3,1081)=0 exch2_neighbourId(4,1081)=663 exch2_iLo(4,1081)=0 exch2_iHi(4,1081)=0 exch2_jLo(4,1081)=0 exch2_jHi(4,1081)=35 exch2_opposingSend(4,1081)=1 exch2_pij(1,4,1081)=0 exch2_pij(2,4,1081)=1 exch2_pij(3,4,1081)=-1 exch2_pij(4,4,1081)=0 exch2_oi(4,1081)=-510 exch2_oj(4,1081)=511 RETURN END SUBROUTINE W2_E2SETUP_1082 C Topology for tile 1082 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1082)=34 exch2_tNy(1082)=34 exch2_tBasex(1082)=34 exch2_tBasey(1082)=408 exch2_txGlobalo(1082)=2075 exch2_tyGlobalo(1082)=409 exch2_isWedge(1082)=0 exch2_isNedge(1082)=0 exch2_isEedge(1082)=0 exch2_isSedge(1082)=0 exch2_myFace(1082)=5 exch2_mydNx(1082)=510 exch2_mydNy(1082)=510 exch2_nNeighbours(1082)=4 exch2_neighbourId(1,1082)=1097 exch2_iLo(1,1082)=0 exch2_iHi(1,1082)=35 exch2_jLo(1,1082)=35 exch2_jHi(1,1082)=35 exch2_opposingSend(1,1082)=2 exch2_pij(1,1,1082)=1 exch2_pij(2,1,1082)=0 exch2_pij(3,1,1082)=0 exch2_pij(4,1,1082)=1 exch2_oi(1,1082)=0 exch2_oj(1,1082)=0 exch2_neighbourId(2,1082)=1067 exch2_iLo(2,1082)=0 exch2_iHi(2,1082)=35 exch2_jLo(2,1082)=0 exch2_jHi(2,1082)=0 exch2_opposingSend(2,1082)=1 exch2_pij(1,2,1082)=1 exch2_pij(2,2,1082)=0 exch2_pij(3,2,1082)=0 exch2_pij(4,2,1082)=1 exch2_oi(2,1082)=0 exch2_oj(2,1082)=0 exch2_neighbourId(3,1082)=1083 exch2_iLo(3,1082)=35 exch2_iHi(3,1082)=35 exch2_jLo(3,1082)=0 exch2_jHi(3,1082)=35 exch2_opposingSend(3,1082)=4 exch2_pij(1,3,1082)=1 exch2_pij(2,3,1082)=0 exch2_pij(3,3,1082)=0 exch2_pij(4,3,1082)=1 exch2_oi(3,1082)=0 exch2_oj(3,1082)=0 exch2_neighbourId(4,1082)=1081 exch2_iLo(4,1082)=0 exch2_iHi(4,1082)=0 exch2_jLo(4,1082)=0 exch2_jHi(4,1082)=35 exch2_opposingSend(4,1082)=3 exch2_pij(1,4,1082)=1 exch2_pij(2,4,1082)=0 exch2_pij(3,4,1082)=0 exch2_pij(4,4,1082)=1 exch2_oi(4,1082)=0 exch2_oj(4,1082)=0 RETURN END SUBROUTINE W2_E2SETUP_1083 C Topology for tile 1083 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1083)=34 exch2_tNy(1083)=34 exch2_tBasex(1083)=68 exch2_tBasey(1083)=408 exch2_txGlobalo(1083)=2109 exch2_tyGlobalo(1083)=409 exch2_isWedge(1083)=0 exch2_isNedge(1083)=0 exch2_isEedge(1083)=0 exch2_isSedge(1083)=0 exch2_myFace(1083)=5 exch2_mydNx(1083)=510 exch2_mydNy(1083)=510 exch2_nNeighbours(1083)=4 exch2_neighbourId(1,1083)=1098 exch2_iLo(1,1083)=0 exch2_iHi(1,1083)=35 exch2_jLo(1,1083)=35 exch2_jHi(1,1083)=35 exch2_opposingSend(1,1083)=2 exch2_pij(1,1,1083)=1 exch2_pij(2,1,1083)=0 exch2_pij(3,1,1083)=0 exch2_pij(4,1,1083)=1 exch2_oi(1,1083)=0 exch2_oj(1,1083)=0 exch2_neighbourId(2,1083)=1068 exch2_iLo(2,1083)=0 exch2_iHi(2,1083)=35 exch2_jLo(2,1083)=0 exch2_jHi(2,1083)=0 exch2_opposingSend(2,1083)=1 exch2_pij(1,2,1083)=1 exch2_pij(2,2,1083)=0 exch2_pij(3,2,1083)=0 exch2_pij(4,2,1083)=1 exch2_oi(2,1083)=0 exch2_oj(2,1083)=0 exch2_neighbourId(3,1083)=1084 exch2_iLo(3,1083)=35 exch2_iHi(3,1083)=35 exch2_jLo(3,1083)=0 exch2_jHi(3,1083)=35 exch2_opposingSend(3,1083)=4 exch2_pij(1,3,1083)=1 exch2_pij(2,3,1083)=0 exch2_pij(3,3,1083)=0 exch2_pij(4,3,1083)=1 exch2_oi(3,1083)=0 exch2_oj(3,1083)=0 exch2_neighbourId(4,1083)=1082 exch2_iLo(4,1083)=0 exch2_iHi(4,1083)=0 exch2_jLo(4,1083)=0 exch2_jHi(4,1083)=35 exch2_opposingSend(4,1083)=3 exch2_pij(1,4,1083)=1 exch2_pij(2,4,1083)=0 exch2_pij(3,4,1083)=0 exch2_pij(4,4,1083)=1 exch2_oi(4,1083)=0 exch2_oj(4,1083)=0 RETURN END SUBROUTINE W2_E2SETUP_1084 C Topology for tile 1084 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1084)=34 exch2_tNy(1084)=34 exch2_tBasex(1084)=102 exch2_tBasey(1084)=408 exch2_txGlobalo(1084)=2143 exch2_tyGlobalo(1084)=409 exch2_isWedge(1084)=0 exch2_isNedge(1084)=0 exch2_isEedge(1084)=0 exch2_isSedge(1084)=0 exch2_myFace(1084)=5 exch2_mydNx(1084)=510 exch2_mydNy(1084)=510 exch2_nNeighbours(1084)=4 exch2_neighbourId(1,1084)=1099 exch2_iLo(1,1084)=0 exch2_iHi(1,1084)=35 exch2_jLo(1,1084)=35 exch2_jHi(1,1084)=35 exch2_opposingSend(1,1084)=2 exch2_pij(1,1,1084)=1 exch2_pij(2,1,1084)=0 exch2_pij(3,1,1084)=0 exch2_pij(4,1,1084)=1 exch2_oi(1,1084)=0 exch2_oj(1,1084)=0 exch2_neighbourId(2,1084)=1069 exch2_iLo(2,1084)=0 exch2_iHi(2,1084)=35 exch2_jLo(2,1084)=0 exch2_jHi(2,1084)=0 exch2_opposingSend(2,1084)=1 exch2_pij(1,2,1084)=1 exch2_pij(2,2,1084)=0 exch2_pij(3,2,1084)=0 exch2_pij(4,2,1084)=1 exch2_oi(2,1084)=0 exch2_oj(2,1084)=0 exch2_neighbourId(3,1084)=1085 exch2_iLo(3,1084)=35 exch2_iHi(3,1084)=35 exch2_jLo(3,1084)=0 exch2_jHi(3,1084)=35 exch2_opposingSend(3,1084)=4 exch2_pij(1,3,1084)=1 exch2_pij(2,3,1084)=0 exch2_pij(3,3,1084)=0 exch2_pij(4,3,1084)=1 exch2_oi(3,1084)=0 exch2_oj(3,1084)=0 exch2_neighbourId(4,1084)=1083 exch2_iLo(4,1084)=0 exch2_iHi(4,1084)=0 exch2_jLo(4,1084)=0 exch2_jHi(4,1084)=35 exch2_opposingSend(4,1084)=3 exch2_pij(1,4,1084)=1 exch2_pij(2,4,1084)=0 exch2_pij(3,4,1084)=0 exch2_pij(4,4,1084)=1 exch2_oi(4,1084)=0 exch2_oj(4,1084)=0 RETURN END SUBROUTINE W2_E2SETUP_1085 C Topology for tile 1085 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1085)=34 exch2_tNy(1085)=34 exch2_tBasex(1085)=136 exch2_tBasey(1085)=408 exch2_txGlobalo(1085)=2177 exch2_tyGlobalo(1085)=409 exch2_isWedge(1085)=0 exch2_isNedge(1085)=0 exch2_isEedge(1085)=0 exch2_isSedge(1085)=0 exch2_myFace(1085)=5 exch2_mydNx(1085)=510 exch2_mydNy(1085)=510 exch2_nNeighbours(1085)=4 exch2_neighbourId(1,1085)=1100 exch2_iLo(1,1085)=0 exch2_iHi(1,1085)=35 exch2_jLo(1,1085)=35 exch2_jHi(1,1085)=35 exch2_opposingSend(1,1085)=2 exch2_pij(1,1,1085)=1 exch2_pij(2,1,1085)=0 exch2_pij(3,1,1085)=0 exch2_pij(4,1,1085)=1 exch2_oi(1,1085)=0 exch2_oj(1,1085)=0 exch2_neighbourId(2,1085)=1070 exch2_iLo(2,1085)=0 exch2_iHi(2,1085)=35 exch2_jLo(2,1085)=0 exch2_jHi(2,1085)=0 exch2_opposingSend(2,1085)=1 exch2_pij(1,2,1085)=1 exch2_pij(2,2,1085)=0 exch2_pij(3,2,1085)=0 exch2_pij(4,2,1085)=1 exch2_oi(2,1085)=0 exch2_oj(2,1085)=0 exch2_neighbourId(3,1085)=1086 exch2_iLo(3,1085)=35 exch2_iHi(3,1085)=35 exch2_jLo(3,1085)=0 exch2_jHi(3,1085)=35 exch2_opposingSend(3,1085)=4 exch2_pij(1,3,1085)=1 exch2_pij(2,3,1085)=0 exch2_pij(3,3,1085)=0 exch2_pij(4,3,1085)=1 exch2_oi(3,1085)=0 exch2_oj(3,1085)=0 exch2_neighbourId(4,1085)=1084 exch2_iLo(4,1085)=0 exch2_iHi(4,1085)=0 exch2_jLo(4,1085)=0 exch2_jHi(4,1085)=35 exch2_opposingSend(4,1085)=3 exch2_pij(1,4,1085)=1 exch2_pij(2,4,1085)=0 exch2_pij(3,4,1085)=0 exch2_pij(4,4,1085)=1 exch2_oi(4,1085)=0 exch2_oj(4,1085)=0 RETURN END SUBROUTINE W2_E2SETUP_1086 C Topology for tile 1086 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1086)=34 exch2_tNy(1086)=34 exch2_tBasex(1086)=170 exch2_tBasey(1086)=408 exch2_txGlobalo(1086)=2211 exch2_tyGlobalo(1086)=409 exch2_isWedge(1086)=0 exch2_isNedge(1086)=0 exch2_isEedge(1086)=0 exch2_isSedge(1086)=0 exch2_myFace(1086)=5 exch2_mydNx(1086)=510 exch2_mydNy(1086)=510 exch2_nNeighbours(1086)=4 exch2_neighbourId(1,1086)=1101 exch2_iLo(1,1086)=0 exch2_iHi(1,1086)=35 exch2_jLo(1,1086)=35 exch2_jHi(1,1086)=35 exch2_opposingSend(1,1086)=2 exch2_pij(1,1,1086)=1 exch2_pij(2,1,1086)=0 exch2_pij(3,1,1086)=0 exch2_pij(4,1,1086)=1 exch2_oi(1,1086)=0 exch2_oj(1,1086)=0 exch2_neighbourId(2,1086)=1071 exch2_iLo(2,1086)=0 exch2_iHi(2,1086)=35 exch2_jLo(2,1086)=0 exch2_jHi(2,1086)=0 exch2_opposingSend(2,1086)=1 exch2_pij(1,2,1086)=1 exch2_pij(2,2,1086)=0 exch2_pij(3,2,1086)=0 exch2_pij(4,2,1086)=1 exch2_oi(2,1086)=0 exch2_oj(2,1086)=0 exch2_neighbourId(3,1086)=1087 exch2_iLo(3,1086)=35 exch2_iHi(3,1086)=35 exch2_jLo(3,1086)=0 exch2_jHi(3,1086)=35 exch2_opposingSend(3,1086)=4 exch2_pij(1,3,1086)=1 exch2_pij(2,3,1086)=0 exch2_pij(3,3,1086)=0 exch2_pij(4,3,1086)=1 exch2_oi(3,1086)=0 exch2_oj(3,1086)=0 exch2_neighbourId(4,1086)=1085 exch2_iLo(4,1086)=0 exch2_iHi(4,1086)=0 exch2_jLo(4,1086)=0 exch2_jHi(4,1086)=35 exch2_opposingSend(4,1086)=3 exch2_pij(1,4,1086)=1 exch2_pij(2,4,1086)=0 exch2_pij(3,4,1086)=0 exch2_pij(4,4,1086)=1 exch2_oi(4,1086)=0 exch2_oj(4,1086)=0 RETURN END SUBROUTINE W2_E2SETUP_1087 C Topology for tile 1087 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1087)=34 exch2_tNy(1087)=34 exch2_tBasex(1087)=204 exch2_tBasey(1087)=408 exch2_txGlobalo(1087)=2245 exch2_tyGlobalo(1087)=409 exch2_isWedge(1087)=0 exch2_isNedge(1087)=0 exch2_isEedge(1087)=0 exch2_isSedge(1087)=0 exch2_myFace(1087)=5 exch2_mydNx(1087)=510 exch2_mydNy(1087)=510 exch2_nNeighbours(1087)=4 exch2_neighbourId(1,1087)=1102 exch2_iLo(1,1087)=0 exch2_iHi(1,1087)=35 exch2_jLo(1,1087)=35 exch2_jHi(1,1087)=35 exch2_opposingSend(1,1087)=2 exch2_pij(1,1,1087)=1 exch2_pij(2,1,1087)=0 exch2_pij(3,1,1087)=0 exch2_pij(4,1,1087)=1 exch2_oi(1,1087)=0 exch2_oj(1,1087)=0 exch2_neighbourId(2,1087)=1072 exch2_iLo(2,1087)=0 exch2_iHi(2,1087)=35 exch2_jLo(2,1087)=0 exch2_jHi(2,1087)=0 exch2_opposingSend(2,1087)=1 exch2_pij(1,2,1087)=1 exch2_pij(2,2,1087)=0 exch2_pij(3,2,1087)=0 exch2_pij(4,2,1087)=1 exch2_oi(2,1087)=0 exch2_oj(2,1087)=0 exch2_neighbourId(3,1087)=1088 exch2_iLo(3,1087)=35 exch2_iHi(3,1087)=35 exch2_jLo(3,1087)=0 exch2_jHi(3,1087)=35 exch2_opposingSend(3,1087)=4 exch2_pij(1,3,1087)=1 exch2_pij(2,3,1087)=0 exch2_pij(3,3,1087)=0 exch2_pij(4,3,1087)=1 exch2_oi(3,1087)=0 exch2_oj(3,1087)=0 exch2_neighbourId(4,1087)=1086 exch2_iLo(4,1087)=0 exch2_iHi(4,1087)=0 exch2_jLo(4,1087)=0 exch2_jHi(4,1087)=35 exch2_opposingSend(4,1087)=3 exch2_pij(1,4,1087)=1 exch2_pij(2,4,1087)=0 exch2_pij(3,4,1087)=0 exch2_pij(4,4,1087)=1 exch2_oi(4,1087)=0 exch2_oj(4,1087)=0 RETURN END SUBROUTINE W2_E2SETUP_1088 C Topology for tile 1088 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1088)=34 exch2_tNy(1088)=34 exch2_tBasex(1088)=238 exch2_tBasey(1088)=408 exch2_txGlobalo(1088)=2279 exch2_tyGlobalo(1088)=409 exch2_isWedge(1088)=0 exch2_isNedge(1088)=0 exch2_isEedge(1088)=0 exch2_isSedge(1088)=0 exch2_myFace(1088)=5 exch2_mydNx(1088)=510 exch2_mydNy(1088)=510 exch2_nNeighbours(1088)=4 exch2_neighbourId(1,1088)=1103 exch2_iLo(1,1088)=0 exch2_iHi(1,1088)=35 exch2_jLo(1,1088)=35 exch2_jHi(1,1088)=35 exch2_opposingSend(1,1088)=2 exch2_pij(1,1,1088)=1 exch2_pij(2,1,1088)=0 exch2_pij(3,1,1088)=0 exch2_pij(4,1,1088)=1 exch2_oi(1,1088)=0 exch2_oj(1,1088)=0 exch2_neighbourId(2,1088)=1073 exch2_iLo(2,1088)=0 exch2_iHi(2,1088)=35 exch2_jLo(2,1088)=0 exch2_jHi(2,1088)=0 exch2_opposingSend(2,1088)=1 exch2_pij(1,2,1088)=1 exch2_pij(2,2,1088)=0 exch2_pij(3,2,1088)=0 exch2_pij(4,2,1088)=1 exch2_oi(2,1088)=0 exch2_oj(2,1088)=0 exch2_neighbourId(3,1088)=1089 exch2_iLo(3,1088)=35 exch2_iHi(3,1088)=35 exch2_jLo(3,1088)=0 exch2_jHi(3,1088)=35 exch2_opposingSend(3,1088)=4 exch2_pij(1,3,1088)=1 exch2_pij(2,3,1088)=0 exch2_pij(3,3,1088)=0 exch2_pij(4,3,1088)=1 exch2_oi(3,1088)=0 exch2_oj(3,1088)=0 exch2_neighbourId(4,1088)=1087 exch2_iLo(4,1088)=0 exch2_iHi(4,1088)=0 exch2_jLo(4,1088)=0 exch2_jHi(4,1088)=35 exch2_opposingSend(4,1088)=3 exch2_pij(1,4,1088)=1 exch2_pij(2,4,1088)=0 exch2_pij(3,4,1088)=0 exch2_pij(4,4,1088)=1 exch2_oi(4,1088)=0 exch2_oj(4,1088)=0 RETURN END SUBROUTINE W2_E2SETUP_1089 C Topology for tile 1089 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1089)=34 exch2_tNy(1089)=34 exch2_tBasex(1089)=272 exch2_tBasey(1089)=408 exch2_txGlobalo(1089)=2313 exch2_tyGlobalo(1089)=409 exch2_isWedge(1089)=0 exch2_isNedge(1089)=0 exch2_isEedge(1089)=0 exch2_isSedge(1089)=0 exch2_myFace(1089)=5 exch2_mydNx(1089)=510 exch2_mydNy(1089)=510 exch2_nNeighbours(1089)=4 exch2_neighbourId(1,1089)=1104 exch2_iLo(1,1089)=0 exch2_iHi(1,1089)=35 exch2_jLo(1,1089)=35 exch2_jHi(1,1089)=35 exch2_opposingSend(1,1089)=2 exch2_pij(1,1,1089)=1 exch2_pij(2,1,1089)=0 exch2_pij(3,1,1089)=0 exch2_pij(4,1,1089)=1 exch2_oi(1,1089)=0 exch2_oj(1,1089)=0 exch2_neighbourId(2,1089)=1074 exch2_iLo(2,1089)=0 exch2_iHi(2,1089)=35 exch2_jLo(2,1089)=0 exch2_jHi(2,1089)=0 exch2_opposingSend(2,1089)=1 exch2_pij(1,2,1089)=1 exch2_pij(2,2,1089)=0 exch2_pij(3,2,1089)=0 exch2_pij(4,2,1089)=1 exch2_oi(2,1089)=0 exch2_oj(2,1089)=0 exch2_neighbourId(3,1089)=1090 exch2_iLo(3,1089)=35 exch2_iHi(3,1089)=35 exch2_jLo(3,1089)=0 exch2_jHi(3,1089)=35 exch2_opposingSend(3,1089)=4 exch2_pij(1,3,1089)=1 exch2_pij(2,3,1089)=0 exch2_pij(3,3,1089)=0 exch2_pij(4,3,1089)=1 exch2_oi(3,1089)=0 exch2_oj(3,1089)=0 exch2_neighbourId(4,1089)=1088 exch2_iLo(4,1089)=0 exch2_iHi(4,1089)=0 exch2_jLo(4,1089)=0 exch2_jHi(4,1089)=35 exch2_opposingSend(4,1089)=3 exch2_pij(1,4,1089)=1 exch2_pij(2,4,1089)=0 exch2_pij(3,4,1089)=0 exch2_pij(4,4,1089)=1 exch2_oi(4,1089)=0 exch2_oj(4,1089)=0 RETURN END SUBROUTINE W2_E2SETUP_1090 C Topology for tile 1090 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1090)=34 exch2_tNy(1090)=34 exch2_tBasex(1090)=306 exch2_tBasey(1090)=408 exch2_txGlobalo(1090)=2347 exch2_tyGlobalo(1090)=409 exch2_isWedge(1090)=0 exch2_isNedge(1090)=0 exch2_isEedge(1090)=0 exch2_isSedge(1090)=0 exch2_myFace(1090)=5 exch2_mydNx(1090)=510 exch2_mydNy(1090)=510 exch2_nNeighbours(1090)=4 exch2_neighbourId(1,1090)=1105 exch2_iLo(1,1090)=0 exch2_iHi(1,1090)=35 exch2_jLo(1,1090)=35 exch2_jHi(1,1090)=35 exch2_opposingSend(1,1090)=2 exch2_pij(1,1,1090)=1 exch2_pij(2,1,1090)=0 exch2_pij(3,1,1090)=0 exch2_pij(4,1,1090)=1 exch2_oi(1,1090)=0 exch2_oj(1,1090)=0 exch2_neighbourId(2,1090)=1075 exch2_iLo(2,1090)=0 exch2_iHi(2,1090)=35 exch2_jLo(2,1090)=0 exch2_jHi(2,1090)=0 exch2_opposingSend(2,1090)=1 exch2_pij(1,2,1090)=1 exch2_pij(2,2,1090)=0 exch2_pij(3,2,1090)=0 exch2_pij(4,2,1090)=1 exch2_oi(2,1090)=0 exch2_oj(2,1090)=0 exch2_neighbourId(3,1090)=1091 exch2_iLo(3,1090)=35 exch2_iHi(3,1090)=35 exch2_jLo(3,1090)=0 exch2_jHi(3,1090)=35 exch2_opposingSend(3,1090)=4 exch2_pij(1,3,1090)=1 exch2_pij(2,3,1090)=0 exch2_pij(3,3,1090)=0 exch2_pij(4,3,1090)=1 exch2_oi(3,1090)=0 exch2_oj(3,1090)=0 exch2_neighbourId(4,1090)=1089 exch2_iLo(4,1090)=0 exch2_iHi(4,1090)=0 exch2_jLo(4,1090)=0 exch2_jHi(4,1090)=35 exch2_opposingSend(4,1090)=3 exch2_pij(1,4,1090)=1 exch2_pij(2,4,1090)=0 exch2_pij(3,4,1090)=0 exch2_pij(4,4,1090)=1 exch2_oi(4,1090)=0 exch2_oj(4,1090)=0 RETURN END SUBROUTINE W2_E2SETUP_1091 C Topology for tile 1091 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1091)=34 exch2_tNy(1091)=34 exch2_tBasex(1091)=340 exch2_tBasey(1091)=408 exch2_txGlobalo(1091)=2381 exch2_tyGlobalo(1091)=409 exch2_isWedge(1091)=0 exch2_isNedge(1091)=0 exch2_isEedge(1091)=0 exch2_isSedge(1091)=0 exch2_myFace(1091)=5 exch2_mydNx(1091)=510 exch2_mydNy(1091)=510 exch2_nNeighbours(1091)=4 exch2_neighbourId(1,1091)=1106 exch2_iLo(1,1091)=0 exch2_iHi(1,1091)=35 exch2_jLo(1,1091)=35 exch2_jHi(1,1091)=35 exch2_opposingSend(1,1091)=2 exch2_pij(1,1,1091)=1 exch2_pij(2,1,1091)=0 exch2_pij(3,1,1091)=0 exch2_pij(4,1,1091)=1 exch2_oi(1,1091)=0 exch2_oj(1,1091)=0 exch2_neighbourId(2,1091)=1076 exch2_iLo(2,1091)=0 exch2_iHi(2,1091)=35 exch2_jLo(2,1091)=0 exch2_jHi(2,1091)=0 exch2_opposingSend(2,1091)=1 exch2_pij(1,2,1091)=1 exch2_pij(2,2,1091)=0 exch2_pij(3,2,1091)=0 exch2_pij(4,2,1091)=1 exch2_oi(2,1091)=0 exch2_oj(2,1091)=0 exch2_neighbourId(3,1091)=1092 exch2_iLo(3,1091)=35 exch2_iHi(3,1091)=35 exch2_jLo(3,1091)=0 exch2_jHi(3,1091)=35 exch2_opposingSend(3,1091)=4 exch2_pij(1,3,1091)=1 exch2_pij(2,3,1091)=0 exch2_pij(3,3,1091)=0 exch2_pij(4,3,1091)=1 exch2_oi(3,1091)=0 exch2_oj(3,1091)=0 exch2_neighbourId(4,1091)=1090 exch2_iLo(4,1091)=0 exch2_iHi(4,1091)=0 exch2_jLo(4,1091)=0 exch2_jHi(4,1091)=35 exch2_opposingSend(4,1091)=3 exch2_pij(1,4,1091)=1 exch2_pij(2,4,1091)=0 exch2_pij(3,4,1091)=0 exch2_pij(4,4,1091)=1 exch2_oi(4,1091)=0 exch2_oj(4,1091)=0 RETURN END SUBROUTINE W2_E2SETUP_1092 C Topology for tile 1092 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1092)=34 exch2_tNy(1092)=34 exch2_tBasex(1092)=374 exch2_tBasey(1092)=408 exch2_txGlobalo(1092)=2415 exch2_tyGlobalo(1092)=409 exch2_isWedge(1092)=0 exch2_isNedge(1092)=0 exch2_isEedge(1092)=0 exch2_isSedge(1092)=0 exch2_myFace(1092)=5 exch2_mydNx(1092)=510 exch2_mydNy(1092)=510 exch2_nNeighbours(1092)=4 exch2_neighbourId(1,1092)=1107 exch2_iLo(1,1092)=0 exch2_iHi(1,1092)=35 exch2_jLo(1,1092)=35 exch2_jHi(1,1092)=35 exch2_opposingSend(1,1092)=2 exch2_pij(1,1,1092)=1 exch2_pij(2,1,1092)=0 exch2_pij(3,1,1092)=0 exch2_pij(4,1,1092)=1 exch2_oi(1,1092)=0 exch2_oj(1,1092)=0 exch2_neighbourId(2,1092)=1077 exch2_iLo(2,1092)=0 exch2_iHi(2,1092)=35 exch2_jLo(2,1092)=0 exch2_jHi(2,1092)=0 exch2_opposingSend(2,1092)=1 exch2_pij(1,2,1092)=1 exch2_pij(2,2,1092)=0 exch2_pij(3,2,1092)=0 exch2_pij(4,2,1092)=1 exch2_oi(2,1092)=0 exch2_oj(2,1092)=0 exch2_neighbourId(3,1092)=1093 exch2_iLo(3,1092)=35 exch2_iHi(3,1092)=35 exch2_jLo(3,1092)=0 exch2_jHi(3,1092)=35 exch2_opposingSend(3,1092)=4 exch2_pij(1,3,1092)=1 exch2_pij(2,3,1092)=0 exch2_pij(3,3,1092)=0 exch2_pij(4,3,1092)=1 exch2_oi(3,1092)=0 exch2_oj(3,1092)=0 exch2_neighbourId(4,1092)=1091 exch2_iLo(4,1092)=0 exch2_iHi(4,1092)=0 exch2_jLo(4,1092)=0 exch2_jHi(4,1092)=35 exch2_opposingSend(4,1092)=3 exch2_pij(1,4,1092)=1 exch2_pij(2,4,1092)=0 exch2_pij(3,4,1092)=0 exch2_pij(4,4,1092)=1 exch2_oi(4,1092)=0 exch2_oj(4,1092)=0 RETURN END SUBROUTINE W2_E2SETUP_1093 C Topology for tile 1093 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1093)=34 exch2_tNy(1093)=34 exch2_tBasex(1093)=408 exch2_tBasey(1093)=408 exch2_txGlobalo(1093)=2449 exch2_tyGlobalo(1093)=409 exch2_isWedge(1093)=0 exch2_isNedge(1093)=0 exch2_isEedge(1093)=0 exch2_isSedge(1093)=0 exch2_myFace(1093)=5 exch2_mydNx(1093)=510 exch2_mydNy(1093)=510 exch2_nNeighbours(1093)=4 exch2_neighbourId(1,1093)=1108 exch2_iLo(1,1093)=0 exch2_iHi(1,1093)=35 exch2_jLo(1,1093)=35 exch2_jHi(1,1093)=35 exch2_opposingSend(1,1093)=2 exch2_pij(1,1,1093)=1 exch2_pij(2,1,1093)=0 exch2_pij(3,1,1093)=0 exch2_pij(4,1,1093)=1 exch2_oi(1,1093)=0 exch2_oj(1,1093)=0 exch2_neighbourId(2,1093)=1078 exch2_iLo(2,1093)=0 exch2_iHi(2,1093)=35 exch2_jLo(2,1093)=0 exch2_jHi(2,1093)=0 exch2_opposingSend(2,1093)=1 exch2_pij(1,2,1093)=1 exch2_pij(2,2,1093)=0 exch2_pij(3,2,1093)=0 exch2_pij(4,2,1093)=1 exch2_oi(2,1093)=0 exch2_oj(2,1093)=0 exch2_neighbourId(3,1093)=1094 exch2_iLo(3,1093)=35 exch2_iHi(3,1093)=35 exch2_jLo(3,1093)=0 exch2_jHi(3,1093)=35 exch2_opposingSend(3,1093)=4 exch2_pij(1,3,1093)=1 exch2_pij(2,3,1093)=0 exch2_pij(3,3,1093)=0 exch2_pij(4,3,1093)=1 exch2_oi(3,1093)=0 exch2_oj(3,1093)=0 exch2_neighbourId(4,1093)=1092 exch2_iLo(4,1093)=0 exch2_iHi(4,1093)=0 exch2_jLo(4,1093)=0 exch2_jHi(4,1093)=35 exch2_opposingSend(4,1093)=3 exch2_pij(1,4,1093)=1 exch2_pij(2,4,1093)=0 exch2_pij(3,4,1093)=0 exch2_pij(4,4,1093)=1 exch2_oi(4,1093)=0 exch2_oj(4,1093)=0 RETURN END SUBROUTINE W2_E2SETUP_1094 C Topology for tile 1094 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1094)=34 exch2_tNy(1094)=34 exch2_tBasex(1094)=442 exch2_tBasey(1094)=408 exch2_txGlobalo(1094)=2483 exch2_tyGlobalo(1094)=409 exch2_isWedge(1094)=0 exch2_isNedge(1094)=0 exch2_isEedge(1094)=0 exch2_isSedge(1094)=0 exch2_myFace(1094)=5 exch2_mydNx(1094)=510 exch2_mydNy(1094)=510 exch2_nNeighbours(1094)=4 exch2_neighbourId(1,1094)=1109 exch2_iLo(1,1094)=0 exch2_iHi(1,1094)=35 exch2_jLo(1,1094)=35 exch2_jHi(1,1094)=35 exch2_opposingSend(1,1094)=2 exch2_pij(1,1,1094)=1 exch2_pij(2,1,1094)=0 exch2_pij(3,1,1094)=0 exch2_pij(4,1,1094)=1 exch2_oi(1,1094)=0 exch2_oj(1,1094)=0 exch2_neighbourId(2,1094)=1079 exch2_iLo(2,1094)=0 exch2_iHi(2,1094)=35 exch2_jLo(2,1094)=0 exch2_jHi(2,1094)=0 exch2_opposingSend(2,1094)=1 exch2_pij(1,2,1094)=1 exch2_pij(2,2,1094)=0 exch2_pij(3,2,1094)=0 exch2_pij(4,2,1094)=1 exch2_oi(2,1094)=0 exch2_oj(2,1094)=0 exch2_neighbourId(3,1094)=1095 exch2_iLo(3,1094)=35 exch2_iHi(3,1094)=35 exch2_jLo(3,1094)=0 exch2_jHi(3,1094)=35 exch2_opposingSend(3,1094)=4 exch2_pij(1,3,1094)=1 exch2_pij(2,3,1094)=0 exch2_pij(3,3,1094)=0 exch2_pij(4,3,1094)=1 exch2_oi(3,1094)=0 exch2_oj(3,1094)=0 exch2_neighbourId(4,1094)=1093 exch2_iLo(4,1094)=0 exch2_iHi(4,1094)=0 exch2_jLo(4,1094)=0 exch2_jHi(4,1094)=35 exch2_opposingSend(4,1094)=3 exch2_pij(1,4,1094)=1 exch2_pij(2,4,1094)=0 exch2_pij(3,4,1094)=0 exch2_pij(4,4,1094)=1 exch2_oi(4,1094)=0 exch2_oj(4,1094)=0 RETURN END SUBROUTINE W2_E2SETUP_1095 C Topology for tile 1095 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1095)=34 exch2_tNy(1095)=34 exch2_tBasex(1095)=476 exch2_tBasey(1095)=408 exch2_txGlobalo(1095)=2517 exch2_tyGlobalo(1095)=409 exch2_isWedge(1095)=0 exch2_isNedge(1095)=0 exch2_isEedge(1095)=1 exch2_isSedge(1095)=0 exch2_myFace(1095)=5 exch2_mydNx(1095)=510 exch2_mydNy(1095)=510 exch2_nNeighbours(1095)=4 exch2_neighbourId(1,1095)=1110 exch2_iLo(1,1095)=0 exch2_iHi(1,1095)=35 exch2_jLo(1,1095)=35 exch2_jHi(1,1095)=35 exch2_opposingSend(1,1095)=2 exch2_pij(1,1,1095)=1 exch2_pij(2,1,1095)=0 exch2_pij(3,1,1095)=0 exch2_pij(4,1,1095)=1 exch2_oi(1,1095)=0 exch2_oj(1,1095)=0 exch2_neighbourId(2,1095)=1080 exch2_iLo(2,1095)=0 exch2_iHi(2,1095)=35 exch2_jLo(2,1095)=0 exch2_jHi(2,1095)=0 exch2_opposingSend(2,1095)=1 exch2_pij(1,2,1095)=1 exch2_pij(2,2,1095)=0 exch2_pij(3,2,1095)=0 exch2_pij(4,2,1095)=1 exch2_oi(2,1095)=0 exch2_oj(2,1095)=0 exch2_neighbourId(3,1095)=1306 exch2_iLo(3,1095)=35 exch2_iHi(3,1095)=35 exch2_jLo(3,1095)=0 exch2_jHi(3,1095)=35 exch2_opposingSend(3,1095)=4 exch2_pij(1,3,1095)=1 exch2_pij(2,3,1095)=0 exch2_pij(3,3,1095)=0 exch2_pij(4,3,1095)=1 exch2_oi(3,1095)=510 exch2_oj(3,1095)=0 exch2_neighbourId(4,1095)=1094 exch2_iLo(4,1095)=0 exch2_iHi(4,1095)=0 exch2_jLo(4,1095)=0 exch2_jHi(4,1095)=35 exch2_opposingSend(4,1095)=3 exch2_pij(1,4,1095)=1 exch2_pij(2,4,1095)=0 exch2_pij(3,4,1095)=0 exch2_pij(4,4,1095)=1 exch2_oi(4,1095)=0 exch2_oj(4,1095)=0 RETURN END SUBROUTINE W2_E2SETUP_1096 C Topology for tile 1096 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1096)=34 exch2_tNy(1096)=34 exch2_tBasex(1096)=0 exch2_tBasey(1096)=442 exch2_txGlobalo(1096)=2041 exch2_tyGlobalo(1096)=443 exch2_isWedge(1096)=1 exch2_isNedge(1096)=0 exch2_isEedge(1096)=0 exch2_isSedge(1096)=0 exch2_myFace(1096)=5 exch2_mydNx(1096)=510 exch2_mydNy(1096)=510 exch2_nNeighbours(1096)=4 exch2_neighbourId(1,1096)=1111 exch2_iLo(1,1096)=0 exch2_iHi(1,1096)=35 exch2_jLo(1,1096)=35 exch2_jHi(1,1096)=35 exch2_opposingSend(1,1096)=2 exch2_pij(1,1,1096)=1 exch2_pij(2,1,1096)=0 exch2_pij(3,1,1096)=0 exch2_pij(4,1,1096)=1 exch2_oi(1,1096)=0 exch2_oj(1,1096)=0 exch2_neighbourId(2,1096)=1081 exch2_iLo(2,1096)=0 exch2_iHi(2,1096)=35 exch2_jLo(2,1096)=0 exch2_jHi(2,1096)=0 exch2_opposingSend(2,1096)=1 exch2_pij(1,2,1096)=1 exch2_pij(2,2,1096)=0 exch2_pij(3,2,1096)=0 exch2_pij(4,2,1096)=1 exch2_oi(2,1096)=0 exch2_oj(2,1096)=0 exch2_neighbourId(3,1096)=1097 exch2_iLo(3,1096)=35 exch2_iHi(3,1096)=35 exch2_jLo(3,1096)=0 exch2_jHi(3,1096)=35 exch2_opposingSend(3,1096)=4 exch2_pij(1,3,1096)=1 exch2_pij(2,3,1096)=0 exch2_pij(3,3,1096)=0 exch2_pij(4,3,1096)=1 exch2_oi(3,1096)=0 exch2_oj(3,1096)=0 exch2_neighbourId(4,1096)=662 exch2_iLo(4,1096)=0 exch2_iHi(4,1096)=0 exch2_jLo(4,1096)=0 exch2_jHi(4,1096)=35 exch2_opposingSend(4,1096)=1 exch2_pij(1,4,1096)=0 exch2_pij(2,4,1096)=1 exch2_pij(3,4,1096)=-1 exch2_pij(4,4,1096)=0 exch2_oi(4,1096)=-510 exch2_oj(4,1096)=511 RETURN END SUBROUTINE W2_E2SETUP_1097 C Topology for tile 1097 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1097)=34 exch2_tNy(1097)=34 exch2_tBasex(1097)=34 exch2_tBasey(1097)=442 exch2_txGlobalo(1097)=2075 exch2_tyGlobalo(1097)=443 exch2_isWedge(1097)=0 exch2_isNedge(1097)=0 exch2_isEedge(1097)=0 exch2_isSedge(1097)=0 exch2_myFace(1097)=5 exch2_mydNx(1097)=510 exch2_mydNy(1097)=510 exch2_nNeighbours(1097)=4 exch2_neighbourId(1,1097)=1112 exch2_iLo(1,1097)=0 exch2_iHi(1,1097)=35 exch2_jLo(1,1097)=35 exch2_jHi(1,1097)=35 exch2_opposingSend(1,1097)=2 exch2_pij(1,1,1097)=1 exch2_pij(2,1,1097)=0 exch2_pij(3,1,1097)=0 exch2_pij(4,1,1097)=1 exch2_oi(1,1097)=0 exch2_oj(1,1097)=0 exch2_neighbourId(2,1097)=1082 exch2_iLo(2,1097)=0 exch2_iHi(2,1097)=35 exch2_jLo(2,1097)=0 exch2_jHi(2,1097)=0 exch2_opposingSend(2,1097)=1 exch2_pij(1,2,1097)=1 exch2_pij(2,2,1097)=0 exch2_pij(3,2,1097)=0 exch2_pij(4,2,1097)=1 exch2_oi(2,1097)=0 exch2_oj(2,1097)=0 exch2_neighbourId(3,1097)=1098 exch2_iLo(3,1097)=35 exch2_iHi(3,1097)=35 exch2_jLo(3,1097)=0 exch2_jHi(3,1097)=35 exch2_opposingSend(3,1097)=4 exch2_pij(1,3,1097)=1 exch2_pij(2,3,1097)=0 exch2_pij(3,3,1097)=0 exch2_pij(4,3,1097)=1 exch2_oi(3,1097)=0 exch2_oj(3,1097)=0 exch2_neighbourId(4,1097)=1096 exch2_iLo(4,1097)=0 exch2_iHi(4,1097)=0 exch2_jLo(4,1097)=0 exch2_jHi(4,1097)=35 exch2_opposingSend(4,1097)=3 exch2_pij(1,4,1097)=1 exch2_pij(2,4,1097)=0 exch2_pij(3,4,1097)=0 exch2_pij(4,4,1097)=1 exch2_oi(4,1097)=0 exch2_oj(4,1097)=0 RETURN END SUBROUTINE W2_E2SETUP_1098 C Topology for tile 1098 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1098)=34 exch2_tNy(1098)=34 exch2_tBasex(1098)=68 exch2_tBasey(1098)=442 exch2_txGlobalo(1098)=2109 exch2_tyGlobalo(1098)=443 exch2_isWedge(1098)=0 exch2_isNedge(1098)=0 exch2_isEedge(1098)=0 exch2_isSedge(1098)=0 exch2_myFace(1098)=5 exch2_mydNx(1098)=510 exch2_mydNy(1098)=510 exch2_nNeighbours(1098)=4 exch2_neighbourId(1,1098)=1113 exch2_iLo(1,1098)=0 exch2_iHi(1,1098)=35 exch2_jLo(1,1098)=35 exch2_jHi(1,1098)=35 exch2_opposingSend(1,1098)=2 exch2_pij(1,1,1098)=1 exch2_pij(2,1,1098)=0 exch2_pij(3,1,1098)=0 exch2_pij(4,1,1098)=1 exch2_oi(1,1098)=0 exch2_oj(1,1098)=0 exch2_neighbourId(2,1098)=1083 exch2_iLo(2,1098)=0 exch2_iHi(2,1098)=35 exch2_jLo(2,1098)=0 exch2_jHi(2,1098)=0 exch2_opposingSend(2,1098)=1 exch2_pij(1,2,1098)=1 exch2_pij(2,2,1098)=0 exch2_pij(3,2,1098)=0 exch2_pij(4,2,1098)=1 exch2_oi(2,1098)=0 exch2_oj(2,1098)=0 exch2_neighbourId(3,1098)=1099 exch2_iLo(3,1098)=35 exch2_iHi(3,1098)=35 exch2_jLo(3,1098)=0 exch2_jHi(3,1098)=35 exch2_opposingSend(3,1098)=4 exch2_pij(1,3,1098)=1 exch2_pij(2,3,1098)=0 exch2_pij(3,3,1098)=0 exch2_pij(4,3,1098)=1 exch2_oi(3,1098)=0 exch2_oj(3,1098)=0 exch2_neighbourId(4,1098)=1097 exch2_iLo(4,1098)=0 exch2_iHi(4,1098)=0 exch2_jLo(4,1098)=0 exch2_jHi(4,1098)=35 exch2_opposingSend(4,1098)=3 exch2_pij(1,4,1098)=1 exch2_pij(2,4,1098)=0 exch2_pij(3,4,1098)=0 exch2_pij(4,4,1098)=1 exch2_oi(4,1098)=0 exch2_oj(4,1098)=0 RETURN END SUBROUTINE W2_E2SETUP_1099 C Topology for tile 1099 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1099)=34 exch2_tNy(1099)=34 exch2_tBasex(1099)=102 exch2_tBasey(1099)=442 exch2_txGlobalo(1099)=2143 exch2_tyGlobalo(1099)=443 exch2_isWedge(1099)=0 exch2_isNedge(1099)=0 exch2_isEedge(1099)=0 exch2_isSedge(1099)=0 exch2_myFace(1099)=5 exch2_mydNx(1099)=510 exch2_mydNy(1099)=510 exch2_nNeighbours(1099)=4 exch2_neighbourId(1,1099)=1114 exch2_iLo(1,1099)=0 exch2_iHi(1,1099)=35 exch2_jLo(1,1099)=35 exch2_jHi(1,1099)=35 exch2_opposingSend(1,1099)=2 exch2_pij(1,1,1099)=1 exch2_pij(2,1,1099)=0 exch2_pij(3,1,1099)=0 exch2_pij(4,1,1099)=1 exch2_oi(1,1099)=0 exch2_oj(1,1099)=0 exch2_neighbourId(2,1099)=1084 exch2_iLo(2,1099)=0 exch2_iHi(2,1099)=35 exch2_jLo(2,1099)=0 exch2_jHi(2,1099)=0 exch2_opposingSend(2,1099)=1 exch2_pij(1,2,1099)=1 exch2_pij(2,2,1099)=0 exch2_pij(3,2,1099)=0 exch2_pij(4,2,1099)=1 exch2_oi(2,1099)=0 exch2_oj(2,1099)=0 exch2_neighbourId(3,1099)=1100 exch2_iLo(3,1099)=35 exch2_iHi(3,1099)=35 exch2_jLo(3,1099)=0 exch2_jHi(3,1099)=35 exch2_opposingSend(3,1099)=4 exch2_pij(1,3,1099)=1 exch2_pij(2,3,1099)=0 exch2_pij(3,3,1099)=0 exch2_pij(4,3,1099)=1 exch2_oi(3,1099)=0 exch2_oj(3,1099)=0 exch2_neighbourId(4,1099)=1098 exch2_iLo(4,1099)=0 exch2_iHi(4,1099)=0 exch2_jLo(4,1099)=0 exch2_jHi(4,1099)=35 exch2_opposingSend(4,1099)=3 exch2_pij(1,4,1099)=1 exch2_pij(2,4,1099)=0 exch2_pij(3,4,1099)=0 exch2_pij(4,4,1099)=1 exch2_oi(4,1099)=0 exch2_oj(4,1099)=0 RETURN END SUBROUTINE W2_E2SETUP_1100 C Topology for tile 1100 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1100)=34 exch2_tNy(1100)=34 exch2_tBasex(1100)=136 exch2_tBasey(1100)=442 exch2_txGlobalo(1100)=2177 exch2_tyGlobalo(1100)=443 exch2_isWedge(1100)=0 exch2_isNedge(1100)=0 exch2_isEedge(1100)=0 exch2_isSedge(1100)=0 exch2_myFace(1100)=5 exch2_mydNx(1100)=510 exch2_mydNy(1100)=510 exch2_nNeighbours(1100)=4 exch2_neighbourId(1,1100)=1115 exch2_iLo(1,1100)=0 exch2_iHi(1,1100)=35 exch2_jLo(1,1100)=35 exch2_jHi(1,1100)=35 exch2_opposingSend(1,1100)=2 exch2_pij(1,1,1100)=1 exch2_pij(2,1,1100)=0 exch2_pij(3,1,1100)=0 exch2_pij(4,1,1100)=1 exch2_oi(1,1100)=0 exch2_oj(1,1100)=0 exch2_neighbourId(2,1100)=1085 exch2_iLo(2,1100)=0 exch2_iHi(2,1100)=35 exch2_jLo(2,1100)=0 exch2_jHi(2,1100)=0 exch2_opposingSend(2,1100)=1 exch2_pij(1,2,1100)=1 exch2_pij(2,2,1100)=0 exch2_pij(3,2,1100)=0 exch2_pij(4,2,1100)=1 exch2_oi(2,1100)=0 exch2_oj(2,1100)=0 exch2_neighbourId(3,1100)=1101 exch2_iLo(3,1100)=35 exch2_iHi(3,1100)=35 exch2_jLo(3,1100)=0 exch2_jHi(3,1100)=35 exch2_opposingSend(3,1100)=4 exch2_pij(1,3,1100)=1 exch2_pij(2,3,1100)=0 exch2_pij(3,3,1100)=0 exch2_pij(4,3,1100)=1 exch2_oi(3,1100)=0 exch2_oj(3,1100)=0 exch2_neighbourId(4,1100)=1099 exch2_iLo(4,1100)=0 exch2_iHi(4,1100)=0 exch2_jLo(4,1100)=0 exch2_jHi(4,1100)=35 exch2_opposingSend(4,1100)=3 exch2_pij(1,4,1100)=1 exch2_pij(2,4,1100)=0 exch2_pij(3,4,1100)=0 exch2_pij(4,4,1100)=1 exch2_oi(4,1100)=0 exch2_oj(4,1100)=0 RETURN END SUBROUTINE W2_E2SETUP_1101 C Topology for tile 1101 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1101)=34 exch2_tNy(1101)=34 exch2_tBasex(1101)=170 exch2_tBasey(1101)=442 exch2_txGlobalo(1101)=2211 exch2_tyGlobalo(1101)=443 exch2_isWedge(1101)=0 exch2_isNedge(1101)=0 exch2_isEedge(1101)=0 exch2_isSedge(1101)=0 exch2_myFace(1101)=5 exch2_mydNx(1101)=510 exch2_mydNy(1101)=510 exch2_nNeighbours(1101)=4 exch2_neighbourId(1,1101)=1116 exch2_iLo(1,1101)=0 exch2_iHi(1,1101)=35 exch2_jLo(1,1101)=35 exch2_jHi(1,1101)=35 exch2_opposingSend(1,1101)=2 exch2_pij(1,1,1101)=1 exch2_pij(2,1,1101)=0 exch2_pij(3,1,1101)=0 exch2_pij(4,1,1101)=1 exch2_oi(1,1101)=0 exch2_oj(1,1101)=0 exch2_neighbourId(2,1101)=1086 exch2_iLo(2,1101)=0 exch2_iHi(2,1101)=35 exch2_jLo(2,1101)=0 exch2_jHi(2,1101)=0 exch2_opposingSend(2,1101)=1 exch2_pij(1,2,1101)=1 exch2_pij(2,2,1101)=0 exch2_pij(3,2,1101)=0 exch2_pij(4,2,1101)=1 exch2_oi(2,1101)=0 exch2_oj(2,1101)=0 exch2_neighbourId(3,1101)=1102 exch2_iLo(3,1101)=35 exch2_iHi(3,1101)=35 exch2_jLo(3,1101)=0 exch2_jHi(3,1101)=35 exch2_opposingSend(3,1101)=4 exch2_pij(1,3,1101)=1 exch2_pij(2,3,1101)=0 exch2_pij(3,3,1101)=0 exch2_pij(4,3,1101)=1 exch2_oi(3,1101)=0 exch2_oj(3,1101)=0 exch2_neighbourId(4,1101)=1100 exch2_iLo(4,1101)=0 exch2_iHi(4,1101)=0 exch2_jLo(4,1101)=0 exch2_jHi(4,1101)=35 exch2_opposingSend(4,1101)=3 exch2_pij(1,4,1101)=1 exch2_pij(2,4,1101)=0 exch2_pij(3,4,1101)=0 exch2_pij(4,4,1101)=1 exch2_oi(4,1101)=0 exch2_oj(4,1101)=0 RETURN END SUBROUTINE W2_E2SETUP_1102 C Topology for tile 1102 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1102)=34 exch2_tNy(1102)=34 exch2_tBasex(1102)=204 exch2_tBasey(1102)=442 exch2_txGlobalo(1102)=2245 exch2_tyGlobalo(1102)=443 exch2_isWedge(1102)=0 exch2_isNedge(1102)=0 exch2_isEedge(1102)=0 exch2_isSedge(1102)=0 exch2_myFace(1102)=5 exch2_mydNx(1102)=510 exch2_mydNy(1102)=510 exch2_nNeighbours(1102)=4 exch2_neighbourId(1,1102)=1117 exch2_iLo(1,1102)=0 exch2_iHi(1,1102)=35 exch2_jLo(1,1102)=35 exch2_jHi(1,1102)=35 exch2_opposingSend(1,1102)=2 exch2_pij(1,1,1102)=1 exch2_pij(2,1,1102)=0 exch2_pij(3,1,1102)=0 exch2_pij(4,1,1102)=1 exch2_oi(1,1102)=0 exch2_oj(1,1102)=0 exch2_neighbourId(2,1102)=1087 exch2_iLo(2,1102)=0 exch2_iHi(2,1102)=35 exch2_jLo(2,1102)=0 exch2_jHi(2,1102)=0 exch2_opposingSend(2,1102)=1 exch2_pij(1,2,1102)=1 exch2_pij(2,2,1102)=0 exch2_pij(3,2,1102)=0 exch2_pij(4,2,1102)=1 exch2_oi(2,1102)=0 exch2_oj(2,1102)=0 exch2_neighbourId(3,1102)=1103 exch2_iLo(3,1102)=35 exch2_iHi(3,1102)=35 exch2_jLo(3,1102)=0 exch2_jHi(3,1102)=35 exch2_opposingSend(3,1102)=4 exch2_pij(1,3,1102)=1 exch2_pij(2,3,1102)=0 exch2_pij(3,3,1102)=0 exch2_pij(4,3,1102)=1 exch2_oi(3,1102)=0 exch2_oj(3,1102)=0 exch2_neighbourId(4,1102)=1101 exch2_iLo(4,1102)=0 exch2_iHi(4,1102)=0 exch2_jLo(4,1102)=0 exch2_jHi(4,1102)=35 exch2_opposingSend(4,1102)=3 exch2_pij(1,4,1102)=1 exch2_pij(2,4,1102)=0 exch2_pij(3,4,1102)=0 exch2_pij(4,4,1102)=1 exch2_oi(4,1102)=0 exch2_oj(4,1102)=0 RETURN END SUBROUTINE W2_E2SETUP_1103 C Topology for tile 1103 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1103)=34 exch2_tNy(1103)=34 exch2_tBasex(1103)=238 exch2_tBasey(1103)=442 exch2_txGlobalo(1103)=2279 exch2_tyGlobalo(1103)=443 exch2_isWedge(1103)=0 exch2_isNedge(1103)=0 exch2_isEedge(1103)=0 exch2_isSedge(1103)=0 exch2_myFace(1103)=5 exch2_mydNx(1103)=510 exch2_mydNy(1103)=510 exch2_nNeighbours(1103)=4 exch2_neighbourId(1,1103)=1118 exch2_iLo(1,1103)=0 exch2_iHi(1,1103)=35 exch2_jLo(1,1103)=35 exch2_jHi(1,1103)=35 exch2_opposingSend(1,1103)=2 exch2_pij(1,1,1103)=1 exch2_pij(2,1,1103)=0 exch2_pij(3,1,1103)=0 exch2_pij(4,1,1103)=1 exch2_oi(1,1103)=0 exch2_oj(1,1103)=0 exch2_neighbourId(2,1103)=1088 exch2_iLo(2,1103)=0 exch2_iHi(2,1103)=35 exch2_jLo(2,1103)=0 exch2_jHi(2,1103)=0 exch2_opposingSend(2,1103)=1 exch2_pij(1,2,1103)=1 exch2_pij(2,2,1103)=0 exch2_pij(3,2,1103)=0 exch2_pij(4,2,1103)=1 exch2_oi(2,1103)=0 exch2_oj(2,1103)=0 exch2_neighbourId(3,1103)=1104 exch2_iLo(3,1103)=35 exch2_iHi(3,1103)=35 exch2_jLo(3,1103)=0 exch2_jHi(3,1103)=35 exch2_opposingSend(3,1103)=4 exch2_pij(1,3,1103)=1 exch2_pij(2,3,1103)=0 exch2_pij(3,3,1103)=0 exch2_pij(4,3,1103)=1 exch2_oi(3,1103)=0 exch2_oj(3,1103)=0 exch2_neighbourId(4,1103)=1102 exch2_iLo(4,1103)=0 exch2_iHi(4,1103)=0 exch2_jLo(4,1103)=0 exch2_jHi(4,1103)=35 exch2_opposingSend(4,1103)=3 exch2_pij(1,4,1103)=1 exch2_pij(2,4,1103)=0 exch2_pij(3,4,1103)=0 exch2_pij(4,4,1103)=1 exch2_oi(4,1103)=0 exch2_oj(4,1103)=0 RETURN END SUBROUTINE W2_E2SETUP_1104 C Topology for tile 1104 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1104)=34 exch2_tNy(1104)=34 exch2_tBasex(1104)=272 exch2_tBasey(1104)=442 exch2_txGlobalo(1104)=2313 exch2_tyGlobalo(1104)=443 exch2_isWedge(1104)=0 exch2_isNedge(1104)=0 exch2_isEedge(1104)=0 exch2_isSedge(1104)=0 exch2_myFace(1104)=5 exch2_mydNx(1104)=510 exch2_mydNy(1104)=510 exch2_nNeighbours(1104)=4 exch2_neighbourId(1,1104)=1119 exch2_iLo(1,1104)=0 exch2_iHi(1,1104)=35 exch2_jLo(1,1104)=35 exch2_jHi(1,1104)=35 exch2_opposingSend(1,1104)=2 exch2_pij(1,1,1104)=1 exch2_pij(2,1,1104)=0 exch2_pij(3,1,1104)=0 exch2_pij(4,1,1104)=1 exch2_oi(1,1104)=0 exch2_oj(1,1104)=0 exch2_neighbourId(2,1104)=1089 exch2_iLo(2,1104)=0 exch2_iHi(2,1104)=35 exch2_jLo(2,1104)=0 exch2_jHi(2,1104)=0 exch2_opposingSend(2,1104)=1 exch2_pij(1,2,1104)=1 exch2_pij(2,2,1104)=0 exch2_pij(3,2,1104)=0 exch2_pij(4,2,1104)=1 exch2_oi(2,1104)=0 exch2_oj(2,1104)=0 exch2_neighbourId(3,1104)=1105 exch2_iLo(3,1104)=35 exch2_iHi(3,1104)=35 exch2_jLo(3,1104)=0 exch2_jHi(3,1104)=35 exch2_opposingSend(3,1104)=4 exch2_pij(1,3,1104)=1 exch2_pij(2,3,1104)=0 exch2_pij(3,3,1104)=0 exch2_pij(4,3,1104)=1 exch2_oi(3,1104)=0 exch2_oj(3,1104)=0 exch2_neighbourId(4,1104)=1103 exch2_iLo(4,1104)=0 exch2_iHi(4,1104)=0 exch2_jLo(4,1104)=0 exch2_jHi(4,1104)=35 exch2_opposingSend(4,1104)=3 exch2_pij(1,4,1104)=1 exch2_pij(2,4,1104)=0 exch2_pij(3,4,1104)=0 exch2_pij(4,4,1104)=1 exch2_oi(4,1104)=0 exch2_oj(4,1104)=0 RETURN END SUBROUTINE W2_E2SETUP_1105 C Topology for tile 1105 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1105)=34 exch2_tNy(1105)=34 exch2_tBasex(1105)=306 exch2_tBasey(1105)=442 exch2_txGlobalo(1105)=2347 exch2_tyGlobalo(1105)=443 exch2_isWedge(1105)=0 exch2_isNedge(1105)=0 exch2_isEedge(1105)=0 exch2_isSedge(1105)=0 exch2_myFace(1105)=5 exch2_mydNx(1105)=510 exch2_mydNy(1105)=510 exch2_nNeighbours(1105)=4 exch2_neighbourId(1,1105)=1120 exch2_iLo(1,1105)=0 exch2_iHi(1,1105)=35 exch2_jLo(1,1105)=35 exch2_jHi(1,1105)=35 exch2_opposingSend(1,1105)=2 exch2_pij(1,1,1105)=1 exch2_pij(2,1,1105)=0 exch2_pij(3,1,1105)=0 exch2_pij(4,1,1105)=1 exch2_oi(1,1105)=0 exch2_oj(1,1105)=0 exch2_neighbourId(2,1105)=1090 exch2_iLo(2,1105)=0 exch2_iHi(2,1105)=35 exch2_jLo(2,1105)=0 exch2_jHi(2,1105)=0 exch2_opposingSend(2,1105)=1 exch2_pij(1,2,1105)=1 exch2_pij(2,2,1105)=0 exch2_pij(3,2,1105)=0 exch2_pij(4,2,1105)=1 exch2_oi(2,1105)=0 exch2_oj(2,1105)=0 exch2_neighbourId(3,1105)=1106 exch2_iLo(3,1105)=35 exch2_iHi(3,1105)=35 exch2_jLo(3,1105)=0 exch2_jHi(3,1105)=35 exch2_opposingSend(3,1105)=4 exch2_pij(1,3,1105)=1 exch2_pij(2,3,1105)=0 exch2_pij(3,3,1105)=0 exch2_pij(4,3,1105)=1 exch2_oi(3,1105)=0 exch2_oj(3,1105)=0 exch2_neighbourId(4,1105)=1104 exch2_iLo(4,1105)=0 exch2_iHi(4,1105)=0 exch2_jLo(4,1105)=0 exch2_jHi(4,1105)=35 exch2_opposingSend(4,1105)=3 exch2_pij(1,4,1105)=1 exch2_pij(2,4,1105)=0 exch2_pij(3,4,1105)=0 exch2_pij(4,4,1105)=1 exch2_oi(4,1105)=0 exch2_oj(4,1105)=0 RETURN END SUBROUTINE W2_E2SETUP_1106 C Topology for tile 1106 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1106)=34 exch2_tNy(1106)=34 exch2_tBasex(1106)=340 exch2_tBasey(1106)=442 exch2_txGlobalo(1106)=2381 exch2_tyGlobalo(1106)=443 exch2_isWedge(1106)=0 exch2_isNedge(1106)=0 exch2_isEedge(1106)=0 exch2_isSedge(1106)=0 exch2_myFace(1106)=5 exch2_mydNx(1106)=510 exch2_mydNy(1106)=510 exch2_nNeighbours(1106)=4 exch2_neighbourId(1,1106)=1121 exch2_iLo(1,1106)=0 exch2_iHi(1,1106)=35 exch2_jLo(1,1106)=35 exch2_jHi(1,1106)=35 exch2_opposingSend(1,1106)=2 exch2_pij(1,1,1106)=1 exch2_pij(2,1,1106)=0 exch2_pij(3,1,1106)=0 exch2_pij(4,1,1106)=1 exch2_oi(1,1106)=0 exch2_oj(1,1106)=0 exch2_neighbourId(2,1106)=1091 exch2_iLo(2,1106)=0 exch2_iHi(2,1106)=35 exch2_jLo(2,1106)=0 exch2_jHi(2,1106)=0 exch2_opposingSend(2,1106)=1 exch2_pij(1,2,1106)=1 exch2_pij(2,2,1106)=0 exch2_pij(3,2,1106)=0 exch2_pij(4,2,1106)=1 exch2_oi(2,1106)=0 exch2_oj(2,1106)=0 exch2_neighbourId(3,1106)=1107 exch2_iLo(3,1106)=35 exch2_iHi(3,1106)=35 exch2_jLo(3,1106)=0 exch2_jHi(3,1106)=35 exch2_opposingSend(3,1106)=4 exch2_pij(1,3,1106)=1 exch2_pij(2,3,1106)=0 exch2_pij(3,3,1106)=0 exch2_pij(4,3,1106)=1 exch2_oi(3,1106)=0 exch2_oj(3,1106)=0 exch2_neighbourId(4,1106)=1105 exch2_iLo(4,1106)=0 exch2_iHi(4,1106)=0 exch2_jLo(4,1106)=0 exch2_jHi(4,1106)=35 exch2_opposingSend(4,1106)=3 exch2_pij(1,4,1106)=1 exch2_pij(2,4,1106)=0 exch2_pij(3,4,1106)=0 exch2_pij(4,4,1106)=1 exch2_oi(4,1106)=0 exch2_oj(4,1106)=0 RETURN END SUBROUTINE W2_E2SETUP_1107 C Topology for tile 1107 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1107)=34 exch2_tNy(1107)=34 exch2_tBasex(1107)=374 exch2_tBasey(1107)=442 exch2_txGlobalo(1107)=2415 exch2_tyGlobalo(1107)=443 exch2_isWedge(1107)=0 exch2_isNedge(1107)=0 exch2_isEedge(1107)=0 exch2_isSedge(1107)=0 exch2_myFace(1107)=5 exch2_mydNx(1107)=510 exch2_mydNy(1107)=510 exch2_nNeighbours(1107)=4 exch2_neighbourId(1,1107)=1122 exch2_iLo(1,1107)=0 exch2_iHi(1,1107)=35 exch2_jLo(1,1107)=35 exch2_jHi(1,1107)=35 exch2_opposingSend(1,1107)=2 exch2_pij(1,1,1107)=1 exch2_pij(2,1,1107)=0 exch2_pij(3,1,1107)=0 exch2_pij(4,1,1107)=1 exch2_oi(1,1107)=0 exch2_oj(1,1107)=0 exch2_neighbourId(2,1107)=1092 exch2_iLo(2,1107)=0 exch2_iHi(2,1107)=35 exch2_jLo(2,1107)=0 exch2_jHi(2,1107)=0 exch2_opposingSend(2,1107)=1 exch2_pij(1,2,1107)=1 exch2_pij(2,2,1107)=0 exch2_pij(3,2,1107)=0 exch2_pij(4,2,1107)=1 exch2_oi(2,1107)=0 exch2_oj(2,1107)=0 exch2_neighbourId(3,1107)=1108 exch2_iLo(3,1107)=35 exch2_iHi(3,1107)=35 exch2_jLo(3,1107)=0 exch2_jHi(3,1107)=35 exch2_opposingSend(3,1107)=4 exch2_pij(1,3,1107)=1 exch2_pij(2,3,1107)=0 exch2_pij(3,3,1107)=0 exch2_pij(4,3,1107)=1 exch2_oi(3,1107)=0 exch2_oj(3,1107)=0 exch2_neighbourId(4,1107)=1106 exch2_iLo(4,1107)=0 exch2_iHi(4,1107)=0 exch2_jLo(4,1107)=0 exch2_jHi(4,1107)=35 exch2_opposingSend(4,1107)=3 exch2_pij(1,4,1107)=1 exch2_pij(2,4,1107)=0 exch2_pij(3,4,1107)=0 exch2_pij(4,4,1107)=1 exch2_oi(4,1107)=0 exch2_oj(4,1107)=0 RETURN END SUBROUTINE W2_E2SETUP_1108 C Topology for tile 1108 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1108)=34 exch2_tNy(1108)=34 exch2_tBasex(1108)=408 exch2_tBasey(1108)=442 exch2_txGlobalo(1108)=2449 exch2_tyGlobalo(1108)=443 exch2_isWedge(1108)=0 exch2_isNedge(1108)=0 exch2_isEedge(1108)=0 exch2_isSedge(1108)=0 exch2_myFace(1108)=5 exch2_mydNx(1108)=510 exch2_mydNy(1108)=510 exch2_nNeighbours(1108)=4 exch2_neighbourId(1,1108)=1123 exch2_iLo(1,1108)=0 exch2_iHi(1,1108)=35 exch2_jLo(1,1108)=35 exch2_jHi(1,1108)=35 exch2_opposingSend(1,1108)=2 exch2_pij(1,1,1108)=1 exch2_pij(2,1,1108)=0 exch2_pij(3,1,1108)=0 exch2_pij(4,1,1108)=1 exch2_oi(1,1108)=0 exch2_oj(1,1108)=0 exch2_neighbourId(2,1108)=1093 exch2_iLo(2,1108)=0 exch2_iHi(2,1108)=35 exch2_jLo(2,1108)=0 exch2_jHi(2,1108)=0 exch2_opposingSend(2,1108)=1 exch2_pij(1,2,1108)=1 exch2_pij(2,2,1108)=0 exch2_pij(3,2,1108)=0 exch2_pij(4,2,1108)=1 exch2_oi(2,1108)=0 exch2_oj(2,1108)=0 exch2_neighbourId(3,1108)=1109 exch2_iLo(3,1108)=35 exch2_iHi(3,1108)=35 exch2_jLo(3,1108)=0 exch2_jHi(3,1108)=35 exch2_opposingSend(3,1108)=4 exch2_pij(1,3,1108)=1 exch2_pij(2,3,1108)=0 exch2_pij(3,3,1108)=0 exch2_pij(4,3,1108)=1 exch2_oi(3,1108)=0 exch2_oj(3,1108)=0 exch2_neighbourId(4,1108)=1107 exch2_iLo(4,1108)=0 exch2_iHi(4,1108)=0 exch2_jLo(4,1108)=0 exch2_jHi(4,1108)=35 exch2_opposingSend(4,1108)=3 exch2_pij(1,4,1108)=1 exch2_pij(2,4,1108)=0 exch2_pij(3,4,1108)=0 exch2_pij(4,4,1108)=1 exch2_oi(4,1108)=0 exch2_oj(4,1108)=0 RETURN END SUBROUTINE W2_E2SETUP_1109 C Topology for tile 1109 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1109)=34 exch2_tNy(1109)=34 exch2_tBasex(1109)=442 exch2_tBasey(1109)=442 exch2_txGlobalo(1109)=2483 exch2_tyGlobalo(1109)=443 exch2_isWedge(1109)=0 exch2_isNedge(1109)=0 exch2_isEedge(1109)=0 exch2_isSedge(1109)=0 exch2_myFace(1109)=5 exch2_mydNx(1109)=510 exch2_mydNy(1109)=510 exch2_nNeighbours(1109)=4 exch2_neighbourId(1,1109)=1124 exch2_iLo(1,1109)=0 exch2_iHi(1,1109)=35 exch2_jLo(1,1109)=35 exch2_jHi(1,1109)=35 exch2_opposingSend(1,1109)=2 exch2_pij(1,1,1109)=1 exch2_pij(2,1,1109)=0 exch2_pij(3,1,1109)=0 exch2_pij(4,1,1109)=1 exch2_oi(1,1109)=0 exch2_oj(1,1109)=0 exch2_neighbourId(2,1109)=1094 exch2_iLo(2,1109)=0 exch2_iHi(2,1109)=35 exch2_jLo(2,1109)=0 exch2_jHi(2,1109)=0 exch2_opposingSend(2,1109)=1 exch2_pij(1,2,1109)=1 exch2_pij(2,2,1109)=0 exch2_pij(3,2,1109)=0 exch2_pij(4,2,1109)=1 exch2_oi(2,1109)=0 exch2_oj(2,1109)=0 exch2_neighbourId(3,1109)=1110 exch2_iLo(3,1109)=35 exch2_iHi(3,1109)=35 exch2_jLo(3,1109)=0 exch2_jHi(3,1109)=35 exch2_opposingSend(3,1109)=4 exch2_pij(1,3,1109)=1 exch2_pij(2,3,1109)=0 exch2_pij(3,3,1109)=0 exch2_pij(4,3,1109)=1 exch2_oi(3,1109)=0 exch2_oj(3,1109)=0 exch2_neighbourId(4,1109)=1108 exch2_iLo(4,1109)=0 exch2_iHi(4,1109)=0 exch2_jLo(4,1109)=0 exch2_jHi(4,1109)=35 exch2_opposingSend(4,1109)=3 exch2_pij(1,4,1109)=1 exch2_pij(2,4,1109)=0 exch2_pij(3,4,1109)=0 exch2_pij(4,4,1109)=1 exch2_oi(4,1109)=0 exch2_oj(4,1109)=0 RETURN END SUBROUTINE W2_E2SETUP_1110 C Topology for tile 1110 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1110)=34 exch2_tNy(1110)=34 exch2_tBasex(1110)=476 exch2_tBasey(1110)=442 exch2_txGlobalo(1110)=2517 exch2_tyGlobalo(1110)=443 exch2_isWedge(1110)=0 exch2_isNedge(1110)=0 exch2_isEedge(1110)=1 exch2_isSedge(1110)=0 exch2_myFace(1110)=5 exch2_mydNx(1110)=510 exch2_mydNy(1110)=510 exch2_nNeighbours(1110)=4 exch2_neighbourId(1,1110)=1125 exch2_iLo(1,1110)=0 exch2_iHi(1,1110)=35 exch2_jLo(1,1110)=35 exch2_jHi(1,1110)=35 exch2_opposingSend(1,1110)=2 exch2_pij(1,1,1110)=1 exch2_pij(2,1,1110)=0 exch2_pij(3,1,1110)=0 exch2_pij(4,1,1110)=1 exch2_oi(1,1110)=0 exch2_oj(1,1110)=0 exch2_neighbourId(2,1110)=1095 exch2_iLo(2,1110)=0 exch2_iHi(2,1110)=35 exch2_jLo(2,1110)=0 exch2_jHi(2,1110)=0 exch2_opposingSend(2,1110)=1 exch2_pij(1,2,1110)=1 exch2_pij(2,2,1110)=0 exch2_pij(3,2,1110)=0 exch2_pij(4,2,1110)=1 exch2_oi(2,1110)=0 exch2_oj(2,1110)=0 exch2_neighbourId(3,1110)=1321 exch2_iLo(3,1110)=35 exch2_iHi(3,1110)=35 exch2_jLo(3,1110)=0 exch2_jHi(3,1110)=35 exch2_opposingSend(3,1110)=4 exch2_pij(1,3,1110)=1 exch2_pij(2,3,1110)=0 exch2_pij(3,3,1110)=0 exch2_pij(4,3,1110)=1 exch2_oi(3,1110)=510 exch2_oj(3,1110)=0 exch2_neighbourId(4,1110)=1109 exch2_iLo(4,1110)=0 exch2_iHi(4,1110)=0 exch2_jLo(4,1110)=0 exch2_jHi(4,1110)=35 exch2_opposingSend(4,1110)=3 exch2_pij(1,4,1110)=1 exch2_pij(2,4,1110)=0 exch2_pij(3,4,1110)=0 exch2_pij(4,4,1110)=1 exch2_oi(4,1110)=0 exch2_oj(4,1110)=0 RETURN END SUBROUTINE W2_E2SETUP_1111 C Topology for tile 1111 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1111)=34 exch2_tNy(1111)=34 exch2_tBasex(1111)=0 exch2_tBasey(1111)=476 exch2_txGlobalo(1111)=2041 exch2_tyGlobalo(1111)=477 exch2_isWedge(1111)=1 exch2_isNedge(1111)=1 exch2_isEedge(1111)=0 exch2_isSedge(1111)=0 exch2_myFace(1111)=5 exch2_mydNx(1111)=510 exch2_mydNy(1111)=510 exch2_nNeighbours(1111)=4 exch2_neighbourId(1,1111)=211 exch2_iLo(1,1111)=0 exch2_iHi(1,1111)=35 exch2_jLo(1,1111)=35 exch2_jHi(1,1111)=35 exch2_opposingSend(1,1111)=4 exch2_pij(1,1,1111)=0 exch2_pij(2,1,1111)=-1 exch2_pij(3,1,1111)=1 exch2_pij(4,1,1111)=0 exch2_oi(1,1111)=511 exch2_oj(1,1111)=510 exch2_neighbourId(2,1111)=1096 exch2_iLo(2,1111)=0 exch2_iHi(2,1111)=35 exch2_jLo(2,1111)=0 exch2_jHi(2,1111)=0 exch2_opposingSend(2,1111)=1 exch2_pij(1,2,1111)=1 exch2_pij(2,2,1111)=0 exch2_pij(3,2,1111)=0 exch2_pij(4,2,1111)=1 exch2_oi(2,1111)=0 exch2_oj(2,1111)=0 exch2_neighbourId(3,1111)=1112 exch2_iLo(3,1111)=35 exch2_iHi(3,1111)=35 exch2_jLo(3,1111)=0 exch2_jHi(3,1111)=35 exch2_opposingSend(3,1111)=4 exch2_pij(1,3,1111)=1 exch2_pij(2,3,1111)=0 exch2_pij(3,3,1111)=0 exch2_pij(4,3,1111)=1 exch2_oi(3,1111)=0 exch2_oj(3,1111)=0 exch2_neighbourId(4,1111)=661 exch2_iLo(4,1111)=0 exch2_iHi(4,1111)=0 exch2_jLo(4,1111)=0 exch2_jHi(4,1111)=35 exch2_opposingSend(4,1111)=1 exch2_pij(1,4,1111)=0 exch2_pij(2,4,1111)=1 exch2_pij(3,4,1111)=-1 exch2_pij(4,4,1111)=0 exch2_oi(4,1111)=-510 exch2_oj(4,1111)=511 RETURN END SUBROUTINE W2_E2SETUP_1112 C Topology for tile 1112 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1112)=34 exch2_tNy(1112)=34 exch2_tBasex(1112)=34 exch2_tBasey(1112)=476 exch2_txGlobalo(1112)=2075 exch2_tyGlobalo(1112)=477 exch2_isWedge(1112)=0 exch2_isNedge(1112)=1 exch2_isEedge(1112)=0 exch2_isSedge(1112)=0 exch2_myFace(1112)=5 exch2_mydNx(1112)=510 exch2_mydNy(1112)=510 exch2_nNeighbours(1112)=4 exch2_neighbourId(1,1112)=196 exch2_iLo(1,1112)=0 exch2_iHi(1,1112)=35 exch2_jLo(1,1112)=35 exch2_jHi(1,1112)=35 exch2_opposingSend(1,1112)=4 exch2_pij(1,1,1112)=0 exch2_pij(2,1,1112)=-1 exch2_pij(3,1,1112)=1 exch2_pij(4,1,1112)=0 exch2_oi(1,1112)=511 exch2_oj(1,1112)=510 exch2_neighbourId(2,1112)=1097 exch2_iLo(2,1112)=0 exch2_iHi(2,1112)=35 exch2_jLo(2,1112)=0 exch2_jHi(2,1112)=0 exch2_opposingSend(2,1112)=1 exch2_pij(1,2,1112)=1 exch2_pij(2,2,1112)=0 exch2_pij(3,2,1112)=0 exch2_pij(4,2,1112)=1 exch2_oi(2,1112)=0 exch2_oj(2,1112)=0 exch2_neighbourId(3,1112)=1113 exch2_iLo(3,1112)=35 exch2_iHi(3,1112)=35 exch2_jLo(3,1112)=0 exch2_jHi(3,1112)=35 exch2_opposingSend(3,1112)=4 exch2_pij(1,3,1112)=1 exch2_pij(2,3,1112)=0 exch2_pij(3,3,1112)=0 exch2_pij(4,3,1112)=1 exch2_oi(3,1112)=0 exch2_oj(3,1112)=0 exch2_neighbourId(4,1112)=1111 exch2_iLo(4,1112)=0 exch2_iHi(4,1112)=0 exch2_jLo(4,1112)=0 exch2_jHi(4,1112)=35 exch2_opposingSend(4,1112)=3 exch2_pij(1,4,1112)=1 exch2_pij(2,4,1112)=0 exch2_pij(3,4,1112)=0 exch2_pij(4,4,1112)=1 exch2_oi(4,1112)=0 exch2_oj(4,1112)=0 RETURN END SUBROUTINE W2_E2SETUP_1113 C Topology for tile 1113 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1113)=34 exch2_tNy(1113)=34 exch2_tBasex(1113)=68 exch2_tBasey(1113)=476 exch2_txGlobalo(1113)=2109 exch2_tyGlobalo(1113)=477 exch2_isWedge(1113)=0 exch2_isNedge(1113)=1 exch2_isEedge(1113)=0 exch2_isSedge(1113)=0 exch2_myFace(1113)=5 exch2_mydNx(1113)=510 exch2_mydNy(1113)=510 exch2_nNeighbours(1113)=4 exch2_neighbourId(1,1113)=181 exch2_iLo(1,1113)=0 exch2_iHi(1,1113)=35 exch2_jLo(1,1113)=35 exch2_jHi(1,1113)=35 exch2_opposingSend(1,1113)=4 exch2_pij(1,1,1113)=0 exch2_pij(2,1,1113)=-1 exch2_pij(3,1,1113)=1 exch2_pij(4,1,1113)=0 exch2_oi(1,1113)=511 exch2_oj(1,1113)=510 exch2_neighbourId(2,1113)=1098 exch2_iLo(2,1113)=0 exch2_iHi(2,1113)=35 exch2_jLo(2,1113)=0 exch2_jHi(2,1113)=0 exch2_opposingSend(2,1113)=1 exch2_pij(1,2,1113)=1 exch2_pij(2,2,1113)=0 exch2_pij(3,2,1113)=0 exch2_pij(4,2,1113)=1 exch2_oi(2,1113)=0 exch2_oj(2,1113)=0 exch2_neighbourId(3,1113)=1114 exch2_iLo(3,1113)=35 exch2_iHi(3,1113)=35 exch2_jLo(3,1113)=0 exch2_jHi(3,1113)=35 exch2_opposingSend(3,1113)=4 exch2_pij(1,3,1113)=1 exch2_pij(2,3,1113)=0 exch2_pij(3,3,1113)=0 exch2_pij(4,3,1113)=1 exch2_oi(3,1113)=0 exch2_oj(3,1113)=0 exch2_neighbourId(4,1113)=1112 exch2_iLo(4,1113)=0 exch2_iHi(4,1113)=0 exch2_jLo(4,1113)=0 exch2_jHi(4,1113)=35 exch2_opposingSend(4,1113)=3 exch2_pij(1,4,1113)=1 exch2_pij(2,4,1113)=0 exch2_pij(3,4,1113)=0 exch2_pij(4,4,1113)=1 exch2_oi(4,1113)=0 exch2_oj(4,1113)=0 RETURN END SUBROUTINE W2_E2SETUP_1114 C Topology for tile 1114 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1114)=34 exch2_tNy(1114)=34 exch2_tBasex(1114)=102 exch2_tBasey(1114)=476 exch2_txGlobalo(1114)=2143 exch2_tyGlobalo(1114)=477 exch2_isWedge(1114)=0 exch2_isNedge(1114)=1 exch2_isEedge(1114)=0 exch2_isSedge(1114)=0 exch2_myFace(1114)=5 exch2_mydNx(1114)=510 exch2_mydNy(1114)=510 exch2_nNeighbours(1114)=4 exch2_neighbourId(1,1114)=166 exch2_iLo(1,1114)=0 exch2_iHi(1,1114)=35 exch2_jLo(1,1114)=35 exch2_jHi(1,1114)=35 exch2_opposingSend(1,1114)=4 exch2_pij(1,1,1114)=0 exch2_pij(2,1,1114)=-1 exch2_pij(3,1,1114)=1 exch2_pij(4,1,1114)=0 exch2_oi(1,1114)=511 exch2_oj(1,1114)=510 exch2_neighbourId(2,1114)=1099 exch2_iLo(2,1114)=0 exch2_iHi(2,1114)=35 exch2_jLo(2,1114)=0 exch2_jHi(2,1114)=0 exch2_opposingSend(2,1114)=1 exch2_pij(1,2,1114)=1 exch2_pij(2,2,1114)=0 exch2_pij(3,2,1114)=0 exch2_pij(4,2,1114)=1 exch2_oi(2,1114)=0 exch2_oj(2,1114)=0 exch2_neighbourId(3,1114)=1115 exch2_iLo(3,1114)=35 exch2_iHi(3,1114)=35 exch2_jLo(3,1114)=0 exch2_jHi(3,1114)=35 exch2_opposingSend(3,1114)=4 exch2_pij(1,3,1114)=1 exch2_pij(2,3,1114)=0 exch2_pij(3,3,1114)=0 exch2_pij(4,3,1114)=1 exch2_oi(3,1114)=0 exch2_oj(3,1114)=0 exch2_neighbourId(4,1114)=1113 exch2_iLo(4,1114)=0 exch2_iHi(4,1114)=0 exch2_jLo(4,1114)=0 exch2_jHi(4,1114)=35 exch2_opposingSend(4,1114)=3 exch2_pij(1,4,1114)=1 exch2_pij(2,4,1114)=0 exch2_pij(3,4,1114)=0 exch2_pij(4,4,1114)=1 exch2_oi(4,1114)=0 exch2_oj(4,1114)=0 RETURN END SUBROUTINE W2_E2SETUP_1115 C Topology for tile 1115 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1115)=34 exch2_tNy(1115)=34 exch2_tBasex(1115)=136 exch2_tBasey(1115)=476 exch2_txGlobalo(1115)=2177 exch2_tyGlobalo(1115)=477 exch2_isWedge(1115)=0 exch2_isNedge(1115)=1 exch2_isEedge(1115)=0 exch2_isSedge(1115)=0 exch2_myFace(1115)=5 exch2_mydNx(1115)=510 exch2_mydNy(1115)=510 exch2_nNeighbours(1115)=4 exch2_neighbourId(1,1115)=151 exch2_iLo(1,1115)=0 exch2_iHi(1,1115)=35 exch2_jLo(1,1115)=35 exch2_jHi(1,1115)=35 exch2_opposingSend(1,1115)=4 exch2_pij(1,1,1115)=0 exch2_pij(2,1,1115)=-1 exch2_pij(3,1,1115)=1 exch2_pij(4,1,1115)=0 exch2_oi(1,1115)=511 exch2_oj(1,1115)=510 exch2_neighbourId(2,1115)=1100 exch2_iLo(2,1115)=0 exch2_iHi(2,1115)=35 exch2_jLo(2,1115)=0 exch2_jHi(2,1115)=0 exch2_opposingSend(2,1115)=1 exch2_pij(1,2,1115)=1 exch2_pij(2,2,1115)=0 exch2_pij(3,2,1115)=0 exch2_pij(4,2,1115)=1 exch2_oi(2,1115)=0 exch2_oj(2,1115)=0 exch2_neighbourId(3,1115)=1116 exch2_iLo(3,1115)=35 exch2_iHi(3,1115)=35 exch2_jLo(3,1115)=0 exch2_jHi(3,1115)=35 exch2_opposingSend(3,1115)=4 exch2_pij(1,3,1115)=1 exch2_pij(2,3,1115)=0 exch2_pij(3,3,1115)=0 exch2_pij(4,3,1115)=1 exch2_oi(3,1115)=0 exch2_oj(3,1115)=0 exch2_neighbourId(4,1115)=1114 exch2_iLo(4,1115)=0 exch2_iHi(4,1115)=0 exch2_jLo(4,1115)=0 exch2_jHi(4,1115)=35 exch2_opposingSend(4,1115)=3 exch2_pij(1,4,1115)=1 exch2_pij(2,4,1115)=0 exch2_pij(3,4,1115)=0 exch2_pij(4,4,1115)=1 exch2_oi(4,1115)=0 exch2_oj(4,1115)=0 RETURN END SUBROUTINE W2_E2SETUP_1116 C Topology for tile 1116 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1116)=34 exch2_tNy(1116)=34 exch2_tBasex(1116)=170 exch2_tBasey(1116)=476 exch2_txGlobalo(1116)=2211 exch2_tyGlobalo(1116)=477 exch2_isWedge(1116)=0 exch2_isNedge(1116)=1 exch2_isEedge(1116)=0 exch2_isSedge(1116)=0 exch2_myFace(1116)=5 exch2_mydNx(1116)=510 exch2_mydNy(1116)=510 exch2_nNeighbours(1116)=4 exch2_neighbourId(1,1116)=136 exch2_iLo(1,1116)=0 exch2_iHi(1,1116)=35 exch2_jLo(1,1116)=35 exch2_jHi(1,1116)=35 exch2_opposingSend(1,1116)=4 exch2_pij(1,1,1116)=0 exch2_pij(2,1,1116)=-1 exch2_pij(3,1,1116)=1 exch2_pij(4,1,1116)=0 exch2_oi(1,1116)=511 exch2_oj(1,1116)=510 exch2_neighbourId(2,1116)=1101 exch2_iLo(2,1116)=0 exch2_iHi(2,1116)=35 exch2_jLo(2,1116)=0 exch2_jHi(2,1116)=0 exch2_opposingSend(2,1116)=1 exch2_pij(1,2,1116)=1 exch2_pij(2,2,1116)=0 exch2_pij(3,2,1116)=0 exch2_pij(4,2,1116)=1 exch2_oi(2,1116)=0 exch2_oj(2,1116)=0 exch2_neighbourId(3,1116)=1117 exch2_iLo(3,1116)=35 exch2_iHi(3,1116)=35 exch2_jLo(3,1116)=0 exch2_jHi(3,1116)=35 exch2_opposingSend(3,1116)=4 exch2_pij(1,3,1116)=1 exch2_pij(2,3,1116)=0 exch2_pij(3,3,1116)=0 exch2_pij(4,3,1116)=1 exch2_oi(3,1116)=0 exch2_oj(3,1116)=0 exch2_neighbourId(4,1116)=1115 exch2_iLo(4,1116)=0 exch2_iHi(4,1116)=0 exch2_jLo(4,1116)=0 exch2_jHi(4,1116)=35 exch2_opposingSend(4,1116)=3 exch2_pij(1,4,1116)=1 exch2_pij(2,4,1116)=0 exch2_pij(3,4,1116)=0 exch2_pij(4,4,1116)=1 exch2_oi(4,1116)=0 exch2_oj(4,1116)=0 RETURN END SUBROUTINE W2_E2SETUP_1117 C Topology for tile 1117 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1117)=34 exch2_tNy(1117)=34 exch2_tBasex(1117)=204 exch2_tBasey(1117)=476 exch2_txGlobalo(1117)=2245 exch2_tyGlobalo(1117)=477 exch2_isWedge(1117)=0 exch2_isNedge(1117)=1 exch2_isEedge(1117)=0 exch2_isSedge(1117)=0 exch2_myFace(1117)=5 exch2_mydNx(1117)=510 exch2_mydNy(1117)=510 exch2_nNeighbours(1117)=4 exch2_neighbourId(1,1117)=121 exch2_iLo(1,1117)=0 exch2_iHi(1,1117)=35 exch2_jLo(1,1117)=35 exch2_jHi(1,1117)=35 exch2_opposingSend(1,1117)=4 exch2_pij(1,1,1117)=0 exch2_pij(2,1,1117)=-1 exch2_pij(3,1,1117)=1 exch2_pij(4,1,1117)=0 exch2_oi(1,1117)=511 exch2_oj(1,1117)=510 exch2_neighbourId(2,1117)=1102 exch2_iLo(2,1117)=0 exch2_iHi(2,1117)=35 exch2_jLo(2,1117)=0 exch2_jHi(2,1117)=0 exch2_opposingSend(2,1117)=1 exch2_pij(1,2,1117)=1 exch2_pij(2,2,1117)=0 exch2_pij(3,2,1117)=0 exch2_pij(4,2,1117)=1 exch2_oi(2,1117)=0 exch2_oj(2,1117)=0 exch2_neighbourId(3,1117)=1118 exch2_iLo(3,1117)=35 exch2_iHi(3,1117)=35 exch2_jLo(3,1117)=0 exch2_jHi(3,1117)=35 exch2_opposingSend(3,1117)=4 exch2_pij(1,3,1117)=1 exch2_pij(2,3,1117)=0 exch2_pij(3,3,1117)=0 exch2_pij(4,3,1117)=1 exch2_oi(3,1117)=0 exch2_oj(3,1117)=0 exch2_neighbourId(4,1117)=1116 exch2_iLo(4,1117)=0 exch2_iHi(4,1117)=0 exch2_jLo(4,1117)=0 exch2_jHi(4,1117)=35 exch2_opposingSend(4,1117)=3 exch2_pij(1,4,1117)=1 exch2_pij(2,4,1117)=0 exch2_pij(3,4,1117)=0 exch2_pij(4,4,1117)=1 exch2_oi(4,1117)=0 exch2_oj(4,1117)=0 RETURN END SUBROUTINE W2_E2SETUP_1118 C Topology for tile 1118 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1118)=34 exch2_tNy(1118)=34 exch2_tBasex(1118)=238 exch2_tBasey(1118)=476 exch2_txGlobalo(1118)=2279 exch2_tyGlobalo(1118)=477 exch2_isWedge(1118)=0 exch2_isNedge(1118)=1 exch2_isEedge(1118)=0 exch2_isSedge(1118)=0 exch2_myFace(1118)=5 exch2_mydNx(1118)=510 exch2_mydNy(1118)=510 exch2_nNeighbours(1118)=4 exch2_neighbourId(1,1118)=106 exch2_iLo(1,1118)=0 exch2_iHi(1,1118)=35 exch2_jLo(1,1118)=35 exch2_jHi(1,1118)=35 exch2_opposingSend(1,1118)=4 exch2_pij(1,1,1118)=0 exch2_pij(2,1,1118)=-1 exch2_pij(3,1,1118)=1 exch2_pij(4,1,1118)=0 exch2_oi(1,1118)=511 exch2_oj(1,1118)=510 exch2_neighbourId(2,1118)=1103 exch2_iLo(2,1118)=0 exch2_iHi(2,1118)=35 exch2_jLo(2,1118)=0 exch2_jHi(2,1118)=0 exch2_opposingSend(2,1118)=1 exch2_pij(1,2,1118)=1 exch2_pij(2,2,1118)=0 exch2_pij(3,2,1118)=0 exch2_pij(4,2,1118)=1 exch2_oi(2,1118)=0 exch2_oj(2,1118)=0 exch2_neighbourId(3,1118)=1119 exch2_iLo(3,1118)=35 exch2_iHi(3,1118)=35 exch2_jLo(3,1118)=0 exch2_jHi(3,1118)=35 exch2_opposingSend(3,1118)=4 exch2_pij(1,3,1118)=1 exch2_pij(2,3,1118)=0 exch2_pij(3,3,1118)=0 exch2_pij(4,3,1118)=1 exch2_oi(3,1118)=0 exch2_oj(3,1118)=0 exch2_neighbourId(4,1118)=1117 exch2_iLo(4,1118)=0 exch2_iHi(4,1118)=0 exch2_jLo(4,1118)=0 exch2_jHi(4,1118)=35 exch2_opposingSend(4,1118)=3 exch2_pij(1,4,1118)=1 exch2_pij(2,4,1118)=0 exch2_pij(3,4,1118)=0 exch2_pij(4,4,1118)=1 exch2_oi(4,1118)=0 exch2_oj(4,1118)=0 RETURN END SUBROUTINE W2_E2SETUP_1119 C Topology for tile 1119 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1119)=34 exch2_tNy(1119)=34 exch2_tBasex(1119)=272 exch2_tBasey(1119)=476 exch2_txGlobalo(1119)=2313 exch2_tyGlobalo(1119)=477 exch2_isWedge(1119)=0 exch2_isNedge(1119)=1 exch2_isEedge(1119)=0 exch2_isSedge(1119)=0 exch2_myFace(1119)=5 exch2_mydNx(1119)=510 exch2_mydNy(1119)=510 exch2_nNeighbours(1119)=4 exch2_neighbourId(1,1119)=91 exch2_iLo(1,1119)=0 exch2_iHi(1,1119)=35 exch2_jLo(1,1119)=35 exch2_jHi(1,1119)=35 exch2_opposingSend(1,1119)=4 exch2_pij(1,1,1119)=0 exch2_pij(2,1,1119)=-1 exch2_pij(3,1,1119)=1 exch2_pij(4,1,1119)=0 exch2_oi(1,1119)=511 exch2_oj(1,1119)=510 exch2_neighbourId(2,1119)=1104 exch2_iLo(2,1119)=0 exch2_iHi(2,1119)=35 exch2_jLo(2,1119)=0 exch2_jHi(2,1119)=0 exch2_opposingSend(2,1119)=1 exch2_pij(1,2,1119)=1 exch2_pij(2,2,1119)=0 exch2_pij(3,2,1119)=0 exch2_pij(4,2,1119)=1 exch2_oi(2,1119)=0 exch2_oj(2,1119)=0 exch2_neighbourId(3,1119)=1120 exch2_iLo(3,1119)=35 exch2_iHi(3,1119)=35 exch2_jLo(3,1119)=0 exch2_jHi(3,1119)=35 exch2_opposingSend(3,1119)=4 exch2_pij(1,3,1119)=1 exch2_pij(2,3,1119)=0 exch2_pij(3,3,1119)=0 exch2_pij(4,3,1119)=1 exch2_oi(3,1119)=0 exch2_oj(3,1119)=0 exch2_neighbourId(4,1119)=1118 exch2_iLo(4,1119)=0 exch2_iHi(4,1119)=0 exch2_jLo(4,1119)=0 exch2_jHi(4,1119)=35 exch2_opposingSend(4,1119)=3 exch2_pij(1,4,1119)=1 exch2_pij(2,4,1119)=0 exch2_pij(3,4,1119)=0 exch2_pij(4,4,1119)=1 exch2_oi(4,1119)=0 exch2_oj(4,1119)=0 RETURN END SUBROUTINE W2_E2SETUP_1120 C Topology for tile 1120 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1120)=34 exch2_tNy(1120)=34 exch2_tBasex(1120)=306 exch2_tBasey(1120)=476 exch2_txGlobalo(1120)=2347 exch2_tyGlobalo(1120)=477 exch2_isWedge(1120)=0 exch2_isNedge(1120)=1 exch2_isEedge(1120)=0 exch2_isSedge(1120)=0 exch2_myFace(1120)=5 exch2_mydNx(1120)=510 exch2_mydNy(1120)=510 exch2_nNeighbours(1120)=4 exch2_neighbourId(1,1120)=76 exch2_iLo(1,1120)=0 exch2_iHi(1,1120)=35 exch2_jLo(1,1120)=35 exch2_jHi(1,1120)=35 exch2_opposingSend(1,1120)=4 exch2_pij(1,1,1120)=0 exch2_pij(2,1,1120)=-1 exch2_pij(3,1,1120)=1 exch2_pij(4,1,1120)=0 exch2_oi(1,1120)=511 exch2_oj(1,1120)=510 exch2_neighbourId(2,1120)=1105 exch2_iLo(2,1120)=0 exch2_iHi(2,1120)=35 exch2_jLo(2,1120)=0 exch2_jHi(2,1120)=0 exch2_opposingSend(2,1120)=1 exch2_pij(1,2,1120)=1 exch2_pij(2,2,1120)=0 exch2_pij(3,2,1120)=0 exch2_pij(4,2,1120)=1 exch2_oi(2,1120)=0 exch2_oj(2,1120)=0 exch2_neighbourId(3,1120)=1121 exch2_iLo(3,1120)=35 exch2_iHi(3,1120)=35 exch2_jLo(3,1120)=0 exch2_jHi(3,1120)=35 exch2_opposingSend(3,1120)=4 exch2_pij(1,3,1120)=1 exch2_pij(2,3,1120)=0 exch2_pij(3,3,1120)=0 exch2_pij(4,3,1120)=1 exch2_oi(3,1120)=0 exch2_oj(3,1120)=0 exch2_neighbourId(4,1120)=1119 exch2_iLo(4,1120)=0 exch2_iHi(4,1120)=0 exch2_jLo(4,1120)=0 exch2_jHi(4,1120)=35 exch2_opposingSend(4,1120)=3 exch2_pij(1,4,1120)=1 exch2_pij(2,4,1120)=0 exch2_pij(3,4,1120)=0 exch2_pij(4,4,1120)=1 exch2_oi(4,1120)=0 exch2_oj(4,1120)=0 RETURN END SUBROUTINE W2_E2SETUP_1121 C Topology for tile 1121 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1121)=34 exch2_tNy(1121)=34 exch2_tBasex(1121)=340 exch2_tBasey(1121)=476 exch2_txGlobalo(1121)=2381 exch2_tyGlobalo(1121)=477 exch2_isWedge(1121)=0 exch2_isNedge(1121)=1 exch2_isEedge(1121)=0 exch2_isSedge(1121)=0 exch2_myFace(1121)=5 exch2_mydNx(1121)=510 exch2_mydNy(1121)=510 exch2_nNeighbours(1121)=4 exch2_neighbourId(1,1121)=61 exch2_iLo(1,1121)=0 exch2_iHi(1,1121)=35 exch2_jLo(1,1121)=35 exch2_jHi(1,1121)=35 exch2_opposingSend(1,1121)=4 exch2_pij(1,1,1121)=0 exch2_pij(2,1,1121)=-1 exch2_pij(3,1,1121)=1 exch2_pij(4,1,1121)=0 exch2_oi(1,1121)=511 exch2_oj(1,1121)=510 exch2_neighbourId(2,1121)=1106 exch2_iLo(2,1121)=0 exch2_iHi(2,1121)=35 exch2_jLo(2,1121)=0 exch2_jHi(2,1121)=0 exch2_opposingSend(2,1121)=1 exch2_pij(1,2,1121)=1 exch2_pij(2,2,1121)=0 exch2_pij(3,2,1121)=0 exch2_pij(4,2,1121)=1 exch2_oi(2,1121)=0 exch2_oj(2,1121)=0 exch2_neighbourId(3,1121)=1122 exch2_iLo(3,1121)=35 exch2_iHi(3,1121)=35 exch2_jLo(3,1121)=0 exch2_jHi(3,1121)=35 exch2_opposingSend(3,1121)=4 exch2_pij(1,3,1121)=1 exch2_pij(2,3,1121)=0 exch2_pij(3,3,1121)=0 exch2_pij(4,3,1121)=1 exch2_oi(3,1121)=0 exch2_oj(3,1121)=0 exch2_neighbourId(4,1121)=1120 exch2_iLo(4,1121)=0 exch2_iHi(4,1121)=0 exch2_jLo(4,1121)=0 exch2_jHi(4,1121)=35 exch2_opposingSend(4,1121)=3 exch2_pij(1,4,1121)=1 exch2_pij(2,4,1121)=0 exch2_pij(3,4,1121)=0 exch2_pij(4,4,1121)=1 exch2_oi(4,1121)=0 exch2_oj(4,1121)=0 RETURN END SUBROUTINE W2_E2SETUP_1122 C Topology for tile 1122 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1122)=34 exch2_tNy(1122)=34 exch2_tBasex(1122)=374 exch2_tBasey(1122)=476 exch2_txGlobalo(1122)=2415 exch2_tyGlobalo(1122)=477 exch2_isWedge(1122)=0 exch2_isNedge(1122)=1 exch2_isEedge(1122)=0 exch2_isSedge(1122)=0 exch2_myFace(1122)=5 exch2_mydNx(1122)=510 exch2_mydNy(1122)=510 exch2_nNeighbours(1122)=4 exch2_neighbourId(1,1122)=46 exch2_iLo(1,1122)=0 exch2_iHi(1,1122)=35 exch2_jLo(1,1122)=35 exch2_jHi(1,1122)=35 exch2_opposingSend(1,1122)=4 exch2_pij(1,1,1122)=0 exch2_pij(2,1,1122)=-1 exch2_pij(3,1,1122)=1 exch2_pij(4,1,1122)=0 exch2_oi(1,1122)=511 exch2_oj(1,1122)=510 exch2_neighbourId(2,1122)=1107 exch2_iLo(2,1122)=0 exch2_iHi(2,1122)=35 exch2_jLo(2,1122)=0 exch2_jHi(2,1122)=0 exch2_opposingSend(2,1122)=1 exch2_pij(1,2,1122)=1 exch2_pij(2,2,1122)=0 exch2_pij(3,2,1122)=0 exch2_pij(4,2,1122)=1 exch2_oi(2,1122)=0 exch2_oj(2,1122)=0 exch2_neighbourId(3,1122)=1123 exch2_iLo(3,1122)=35 exch2_iHi(3,1122)=35 exch2_jLo(3,1122)=0 exch2_jHi(3,1122)=35 exch2_opposingSend(3,1122)=4 exch2_pij(1,3,1122)=1 exch2_pij(2,3,1122)=0 exch2_pij(3,3,1122)=0 exch2_pij(4,3,1122)=1 exch2_oi(3,1122)=0 exch2_oj(3,1122)=0 exch2_neighbourId(4,1122)=1121 exch2_iLo(4,1122)=0 exch2_iHi(4,1122)=0 exch2_jLo(4,1122)=0 exch2_jHi(4,1122)=35 exch2_opposingSend(4,1122)=3 exch2_pij(1,4,1122)=1 exch2_pij(2,4,1122)=0 exch2_pij(3,4,1122)=0 exch2_pij(4,4,1122)=1 exch2_oi(4,1122)=0 exch2_oj(4,1122)=0 RETURN END SUBROUTINE W2_E2SETUP_1123 C Topology for tile 1123 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1123)=34 exch2_tNy(1123)=34 exch2_tBasex(1123)=408 exch2_tBasey(1123)=476 exch2_txGlobalo(1123)=2449 exch2_tyGlobalo(1123)=477 exch2_isWedge(1123)=0 exch2_isNedge(1123)=1 exch2_isEedge(1123)=0 exch2_isSedge(1123)=0 exch2_myFace(1123)=5 exch2_mydNx(1123)=510 exch2_mydNy(1123)=510 exch2_nNeighbours(1123)=4 exch2_neighbourId(1,1123)=31 exch2_iLo(1,1123)=0 exch2_iHi(1,1123)=35 exch2_jLo(1,1123)=35 exch2_jHi(1,1123)=35 exch2_opposingSend(1,1123)=4 exch2_pij(1,1,1123)=0 exch2_pij(2,1,1123)=-1 exch2_pij(3,1,1123)=1 exch2_pij(4,1,1123)=0 exch2_oi(1,1123)=511 exch2_oj(1,1123)=510 exch2_neighbourId(2,1123)=1108 exch2_iLo(2,1123)=0 exch2_iHi(2,1123)=35 exch2_jLo(2,1123)=0 exch2_jHi(2,1123)=0 exch2_opposingSend(2,1123)=1 exch2_pij(1,2,1123)=1 exch2_pij(2,2,1123)=0 exch2_pij(3,2,1123)=0 exch2_pij(4,2,1123)=1 exch2_oi(2,1123)=0 exch2_oj(2,1123)=0 exch2_neighbourId(3,1123)=1124 exch2_iLo(3,1123)=35 exch2_iHi(3,1123)=35 exch2_jLo(3,1123)=0 exch2_jHi(3,1123)=35 exch2_opposingSend(3,1123)=4 exch2_pij(1,3,1123)=1 exch2_pij(2,3,1123)=0 exch2_pij(3,3,1123)=0 exch2_pij(4,3,1123)=1 exch2_oi(3,1123)=0 exch2_oj(3,1123)=0 exch2_neighbourId(4,1123)=1122 exch2_iLo(4,1123)=0 exch2_iHi(4,1123)=0 exch2_jLo(4,1123)=0 exch2_jHi(4,1123)=35 exch2_opposingSend(4,1123)=3 exch2_pij(1,4,1123)=1 exch2_pij(2,4,1123)=0 exch2_pij(3,4,1123)=0 exch2_pij(4,4,1123)=1 exch2_oi(4,1123)=0 exch2_oj(4,1123)=0 RETURN END SUBROUTINE W2_E2SETUP_1124 C Topology for tile 1124 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1124)=34 exch2_tNy(1124)=34 exch2_tBasex(1124)=442 exch2_tBasey(1124)=476 exch2_txGlobalo(1124)=2483 exch2_tyGlobalo(1124)=477 exch2_isWedge(1124)=0 exch2_isNedge(1124)=1 exch2_isEedge(1124)=0 exch2_isSedge(1124)=0 exch2_myFace(1124)=5 exch2_mydNx(1124)=510 exch2_mydNy(1124)=510 exch2_nNeighbours(1124)=4 exch2_neighbourId(1,1124)=16 exch2_iLo(1,1124)=0 exch2_iHi(1,1124)=35 exch2_jLo(1,1124)=35 exch2_jHi(1,1124)=35 exch2_opposingSend(1,1124)=4 exch2_pij(1,1,1124)=0 exch2_pij(2,1,1124)=-1 exch2_pij(3,1,1124)=1 exch2_pij(4,1,1124)=0 exch2_oi(1,1124)=511 exch2_oj(1,1124)=510 exch2_neighbourId(2,1124)=1109 exch2_iLo(2,1124)=0 exch2_iHi(2,1124)=35 exch2_jLo(2,1124)=0 exch2_jHi(2,1124)=0 exch2_opposingSend(2,1124)=1 exch2_pij(1,2,1124)=1 exch2_pij(2,2,1124)=0 exch2_pij(3,2,1124)=0 exch2_pij(4,2,1124)=1 exch2_oi(2,1124)=0 exch2_oj(2,1124)=0 exch2_neighbourId(3,1124)=1125 exch2_iLo(3,1124)=35 exch2_iHi(3,1124)=35 exch2_jLo(3,1124)=0 exch2_jHi(3,1124)=35 exch2_opposingSend(3,1124)=4 exch2_pij(1,3,1124)=1 exch2_pij(2,3,1124)=0 exch2_pij(3,3,1124)=0 exch2_pij(4,3,1124)=1 exch2_oi(3,1124)=0 exch2_oj(3,1124)=0 exch2_neighbourId(4,1124)=1123 exch2_iLo(4,1124)=0 exch2_iHi(4,1124)=0 exch2_jLo(4,1124)=0 exch2_jHi(4,1124)=35 exch2_opposingSend(4,1124)=3 exch2_pij(1,4,1124)=1 exch2_pij(2,4,1124)=0 exch2_pij(3,4,1124)=0 exch2_pij(4,4,1124)=1 exch2_oi(4,1124)=0 exch2_oj(4,1124)=0 RETURN END SUBROUTINE W2_E2SETUP_1125 C Topology for tile 1125 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1125)=34 exch2_tNy(1125)=34 exch2_tBasex(1125)=476 exch2_tBasey(1125)=476 exch2_txGlobalo(1125)=2517 exch2_tyGlobalo(1125)=477 exch2_isWedge(1125)=0 exch2_isNedge(1125)=1 exch2_isEedge(1125)=1 exch2_isSedge(1125)=0 exch2_myFace(1125)=5 exch2_mydNx(1125)=510 exch2_mydNy(1125)=510 exch2_nNeighbours(1125)=4 exch2_neighbourId(1,1125)=1 exch2_iLo(1,1125)=0 exch2_iHi(1,1125)=35 exch2_jLo(1,1125)=35 exch2_jHi(1,1125)=35 exch2_opposingSend(1,1125)=4 exch2_pij(1,1,1125)=0 exch2_pij(2,1,1125)=-1 exch2_pij(3,1,1125)=1 exch2_pij(4,1,1125)=0 exch2_oi(1,1125)=511 exch2_oj(1,1125)=510 exch2_neighbourId(2,1125)=1110 exch2_iLo(2,1125)=0 exch2_iHi(2,1125)=35 exch2_jLo(2,1125)=0 exch2_jHi(2,1125)=0 exch2_opposingSend(2,1125)=1 exch2_pij(1,2,1125)=1 exch2_pij(2,2,1125)=0 exch2_pij(3,2,1125)=0 exch2_pij(4,2,1125)=1 exch2_oi(2,1125)=0 exch2_oj(2,1125)=0 exch2_neighbourId(3,1125)=1336 exch2_iLo(3,1125)=35 exch2_iHi(3,1125)=35 exch2_jLo(3,1125)=0 exch2_jHi(3,1125)=35 exch2_opposingSend(3,1125)=4 exch2_pij(1,3,1125)=1 exch2_pij(2,3,1125)=0 exch2_pij(3,3,1125)=0 exch2_pij(4,3,1125)=1 exch2_oi(3,1125)=510 exch2_oj(3,1125)=0 exch2_neighbourId(4,1125)=1124 exch2_iLo(4,1125)=0 exch2_iHi(4,1125)=0 exch2_jLo(4,1125)=0 exch2_jHi(4,1125)=35 exch2_opposingSend(4,1125)=3 exch2_pij(1,4,1125)=1 exch2_pij(2,4,1125)=0 exch2_pij(3,4,1125)=0 exch2_pij(4,4,1125)=1 exch2_oi(4,1125)=0 exch2_oj(4,1125)=0 RETURN END SUBROUTINE W2_E2SETUP_1126 C Topology for tile 1126 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1126)=34 exch2_tNy(1126)=34 exch2_tBasex(1126)=0 exch2_tBasey(1126)=0 exch2_txGlobalo(1126)=2551 exch2_tyGlobalo(1126)=1 exch2_isWedge(1126)=1 exch2_isNedge(1126)=0 exch2_isEedge(1126)=0 exch2_isSedge(1126)=1 exch2_myFace(1126)=6 exch2_mydNx(1126)=510 exch2_mydNy(1126)=510 exch2_nNeighbours(1126)=4 exch2_neighbourId(1,1126)=1141 exch2_iLo(1,1126)=0 exch2_iHi(1,1126)=35 exch2_jLo(1,1126)=35 exch2_jHi(1,1126)=35 exch2_opposingSend(1,1126)=2 exch2_pij(1,1,1126)=1 exch2_pij(2,1,1126)=0 exch2_pij(3,1,1126)=0 exch2_pij(4,1,1126)=1 exch2_oi(1,1126)=0 exch2_oj(1,1126)=0 exch2_neighbourId(2,1126)=900 exch2_iLo(2,1126)=0 exch2_iHi(2,1126)=35 exch2_jLo(2,1126)=0 exch2_jHi(2,1126)=0 exch2_opposingSend(2,1126)=3 exch2_pij(1,2,1126)=0 exch2_pij(2,2,1126)=-1 exch2_pij(3,2,1126)=1 exch2_pij(4,2,1126)=0 exch2_oi(2,1126)=511 exch2_oj(2,1126)=-510 exch2_neighbourId(3,1126)=1127 exch2_iLo(3,1126)=35 exch2_iHi(3,1126)=35 exch2_jLo(3,1126)=0 exch2_jHi(3,1126)=35 exch2_opposingSend(3,1126)=4 exch2_pij(1,3,1126)=1 exch2_pij(2,3,1126)=0 exch2_pij(3,3,1126)=0 exch2_pij(4,3,1126)=1 exch2_oi(3,1126)=0 exch2_oj(3,1126)=0 exch2_neighbourId(4,1126)=915 exch2_iLo(4,1126)=0 exch2_iHi(4,1126)=0 exch2_jLo(4,1126)=0 exch2_jHi(4,1126)=35 exch2_opposingSend(4,1126)=3 exch2_pij(1,4,1126)=1 exch2_pij(2,4,1126)=0 exch2_pij(3,4,1126)=0 exch2_pij(4,4,1126)=1 exch2_oi(4,1126)=-510 exch2_oj(4,1126)=0 RETURN END SUBROUTINE W2_E2SETUP_1127 C Topology for tile 1127 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1127)=34 exch2_tNy(1127)=34 exch2_tBasex(1127)=34 exch2_tBasey(1127)=0 exch2_txGlobalo(1127)=2585 exch2_tyGlobalo(1127)=1 exch2_isWedge(1127)=0 exch2_isNedge(1127)=0 exch2_isEedge(1127)=0 exch2_isSedge(1127)=1 exch2_myFace(1127)=6 exch2_mydNx(1127)=510 exch2_mydNy(1127)=510 exch2_nNeighbours(1127)=4 exch2_neighbourId(1,1127)=1142 exch2_iLo(1,1127)=0 exch2_iHi(1,1127)=35 exch2_jLo(1,1127)=35 exch2_jHi(1,1127)=35 exch2_opposingSend(1,1127)=2 exch2_pij(1,1,1127)=1 exch2_pij(2,1,1127)=0 exch2_pij(3,1,1127)=0 exch2_pij(4,1,1127)=1 exch2_oi(1,1127)=0 exch2_oj(1,1127)=0 exch2_neighbourId(2,1127)=885 exch2_iLo(2,1127)=0 exch2_iHi(2,1127)=35 exch2_jLo(2,1127)=0 exch2_jHi(2,1127)=0 exch2_opposingSend(2,1127)=3 exch2_pij(1,2,1127)=0 exch2_pij(2,2,1127)=-1 exch2_pij(3,2,1127)=1 exch2_pij(4,2,1127)=0 exch2_oi(2,1127)=511 exch2_oj(2,1127)=-510 exch2_neighbourId(3,1127)=1128 exch2_iLo(3,1127)=35 exch2_iHi(3,1127)=35 exch2_jLo(3,1127)=0 exch2_jHi(3,1127)=35 exch2_opposingSend(3,1127)=4 exch2_pij(1,3,1127)=1 exch2_pij(2,3,1127)=0 exch2_pij(3,3,1127)=0 exch2_pij(4,3,1127)=1 exch2_oi(3,1127)=0 exch2_oj(3,1127)=0 exch2_neighbourId(4,1127)=1126 exch2_iLo(4,1127)=0 exch2_iHi(4,1127)=0 exch2_jLo(4,1127)=0 exch2_jHi(4,1127)=35 exch2_opposingSend(4,1127)=3 exch2_pij(1,4,1127)=1 exch2_pij(2,4,1127)=0 exch2_pij(3,4,1127)=0 exch2_pij(4,4,1127)=1 exch2_oi(4,1127)=0 exch2_oj(4,1127)=0 RETURN END SUBROUTINE W2_E2SETUP_1128 C Topology for tile 1128 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1128)=34 exch2_tNy(1128)=34 exch2_tBasex(1128)=68 exch2_tBasey(1128)=0 exch2_txGlobalo(1128)=2619 exch2_tyGlobalo(1128)=1 exch2_isWedge(1128)=0 exch2_isNedge(1128)=0 exch2_isEedge(1128)=0 exch2_isSedge(1128)=1 exch2_myFace(1128)=6 exch2_mydNx(1128)=510 exch2_mydNy(1128)=510 exch2_nNeighbours(1128)=4 exch2_neighbourId(1,1128)=1143 exch2_iLo(1,1128)=0 exch2_iHi(1,1128)=35 exch2_jLo(1,1128)=35 exch2_jHi(1,1128)=35 exch2_opposingSend(1,1128)=2 exch2_pij(1,1,1128)=1 exch2_pij(2,1,1128)=0 exch2_pij(3,1,1128)=0 exch2_pij(4,1,1128)=1 exch2_oi(1,1128)=0 exch2_oj(1,1128)=0 exch2_neighbourId(2,1128)=870 exch2_iLo(2,1128)=0 exch2_iHi(2,1128)=35 exch2_jLo(2,1128)=0 exch2_jHi(2,1128)=0 exch2_opposingSend(2,1128)=3 exch2_pij(1,2,1128)=0 exch2_pij(2,2,1128)=-1 exch2_pij(3,2,1128)=1 exch2_pij(4,2,1128)=0 exch2_oi(2,1128)=511 exch2_oj(2,1128)=-510 exch2_neighbourId(3,1128)=1129 exch2_iLo(3,1128)=35 exch2_iHi(3,1128)=35 exch2_jLo(3,1128)=0 exch2_jHi(3,1128)=35 exch2_opposingSend(3,1128)=4 exch2_pij(1,3,1128)=1 exch2_pij(2,3,1128)=0 exch2_pij(3,3,1128)=0 exch2_pij(4,3,1128)=1 exch2_oi(3,1128)=0 exch2_oj(3,1128)=0 exch2_neighbourId(4,1128)=1127 exch2_iLo(4,1128)=0 exch2_iHi(4,1128)=0 exch2_jLo(4,1128)=0 exch2_jHi(4,1128)=35 exch2_opposingSend(4,1128)=3 exch2_pij(1,4,1128)=1 exch2_pij(2,4,1128)=0 exch2_pij(3,4,1128)=0 exch2_pij(4,4,1128)=1 exch2_oi(4,1128)=0 exch2_oj(4,1128)=0 RETURN END SUBROUTINE W2_E2SETUP_1129 C Topology for tile 1129 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1129)=34 exch2_tNy(1129)=34 exch2_tBasex(1129)=102 exch2_tBasey(1129)=0 exch2_txGlobalo(1129)=2653 exch2_tyGlobalo(1129)=1 exch2_isWedge(1129)=0 exch2_isNedge(1129)=0 exch2_isEedge(1129)=0 exch2_isSedge(1129)=1 exch2_myFace(1129)=6 exch2_mydNx(1129)=510 exch2_mydNy(1129)=510 exch2_nNeighbours(1129)=4 exch2_neighbourId(1,1129)=1144 exch2_iLo(1,1129)=0 exch2_iHi(1,1129)=35 exch2_jLo(1,1129)=35 exch2_jHi(1,1129)=35 exch2_opposingSend(1,1129)=2 exch2_pij(1,1,1129)=1 exch2_pij(2,1,1129)=0 exch2_pij(3,1,1129)=0 exch2_pij(4,1,1129)=1 exch2_oi(1,1129)=0 exch2_oj(1,1129)=0 exch2_neighbourId(2,1129)=855 exch2_iLo(2,1129)=0 exch2_iHi(2,1129)=35 exch2_jLo(2,1129)=0 exch2_jHi(2,1129)=0 exch2_opposingSend(2,1129)=3 exch2_pij(1,2,1129)=0 exch2_pij(2,2,1129)=-1 exch2_pij(3,2,1129)=1 exch2_pij(4,2,1129)=0 exch2_oi(2,1129)=511 exch2_oj(2,1129)=-510 exch2_neighbourId(3,1129)=1130 exch2_iLo(3,1129)=35 exch2_iHi(3,1129)=35 exch2_jLo(3,1129)=0 exch2_jHi(3,1129)=35 exch2_opposingSend(3,1129)=4 exch2_pij(1,3,1129)=1 exch2_pij(2,3,1129)=0 exch2_pij(3,3,1129)=0 exch2_pij(4,3,1129)=1 exch2_oi(3,1129)=0 exch2_oj(3,1129)=0 exch2_neighbourId(4,1129)=1128 exch2_iLo(4,1129)=0 exch2_iHi(4,1129)=0 exch2_jLo(4,1129)=0 exch2_jHi(4,1129)=35 exch2_opposingSend(4,1129)=3 exch2_pij(1,4,1129)=1 exch2_pij(2,4,1129)=0 exch2_pij(3,4,1129)=0 exch2_pij(4,4,1129)=1 exch2_oi(4,1129)=0 exch2_oj(4,1129)=0 RETURN END SUBROUTINE W2_E2SETUP_1130 C Topology for tile 1130 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1130)=34 exch2_tNy(1130)=34 exch2_tBasex(1130)=136 exch2_tBasey(1130)=0 exch2_txGlobalo(1130)=2687 exch2_tyGlobalo(1130)=1 exch2_isWedge(1130)=0 exch2_isNedge(1130)=0 exch2_isEedge(1130)=0 exch2_isSedge(1130)=1 exch2_myFace(1130)=6 exch2_mydNx(1130)=510 exch2_mydNy(1130)=510 exch2_nNeighbours(1130)=4 exch2_neighbourId(1,1130)=1145 exch2_iLo(1,1130)=0 exch2_iHi(1,1130)=35 exch2_jLo(1,1130)=35 exch2_jHi(1,1130)=35 exch2_opposingSend(1,1130)=2 exch2_pij(1,1,1130)=1 exch2_pij(2,1,1130)=0 exch2_pij(3,1,1130)=0 exch2_pij(4,1,1130)=1 exch2_oi(1,1130)=0 exch2_oj(1,1130)=0 exch2_neighbourId(2,1130)=840 exch2_iLo(2,1130)=0 exch2_iHi(2,1130)=35 exch2_jLo(2,1130)=0 exch2_jHi(2,1130)=0 exch2_opposingSend(2,1130)=3 exch2_pij(1,2,1130)=0 exch2_pij(2,2,1130)=-1 exch2_pij(3,2,1130)=1 exch2_pij(4,2,1130)=0 exch2_oi(2,1130)=511 exch2_oj(2,1130)=-510 exch2_neighbourId(3,1130)=1131 exch2_iLo(3,1130)=35 exch2_iHi(3,1130)=35 exch2_jLo(3,1130)=0 exch2_jHi(3,1130)=35 exch2_opposingSend(3,1130)=4 exch2_pij(1,3,1130)=1 exch2_pij(2,3,1130)=0 exch2_pij(3,3,1130)=0 exch2_pij(4,3,1130)=1 exch2_oi(3,1130)=0 exch2_oj(3,1130)=0 exch2_neighbourId(4,1130)=1129 exch2_iLo(4,1130)=0 exch2_iHi(4,1130)=0 exch2_jLo(4,1130)=0 exch2_jHi(4,1130)=35 exch2_opposingSend(4,1130)=3 exch2_pij(1,4,1130)=1 exch2_pij(2,4,1130)=0 exch2_pij(3,4,1130)=0 exch2_pij(4,4,1130)=1 exch2_oi(4,1130)=0 exch2_oj(4,1130)=0 RETURN END SUBROUTINE W2_E2SETUP_1131 C Topology for tile 1131 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1131)=34 exch2_tNy(1131)=34 exch2_tBasex(1131)=170 exch2_tBasey(1131)=0 exch2_txGlobalo(1131)=2721 exch2_tyGlobalo(1131)=1 exch2_isWedge(1131)=0 exch2_isNedge(1131)=0 exch2_isEedge(1131)=0 exch2_isSedge(1131)=1 exch2_myFace(1131)=6 exch2_mydNx(1131)=510 exch2_mydNy(1131)=510 exch2_nNeighbours(1131)=4 exch2_neighbourId(1,1131)=1146 exch2_iLo(1,1131)=0 exch2_iHi(1,1131)=35 exch2_jLo(1,1131)=35 exch2_jHi(1,1131)=35 exch2_opposingSend(1,1131)=2 exch2_pij(1,1,1131)=1 exch2_pij(2,1,1131)=0 exch2_pij(3,1,1131)=0 exch2_pij(4,1,1131)=1 exch2_oi(1,1131)=0 exch2_oj(1,1131)=0 exch2_neighbourId(2,1131)=825 exch2_iLo(2,1131)=0 exch2_iHi(2,1131)=35 exch2_jLo(2,1131)=0 exch2_jHi(2,1131)=0 exch2_opposingSend(2,1131)=3 exch2_pij(1,2,1131)=0 exch2_pij(2,2,1131)=-1 exch2_pij(3,2,1131)=1 exch2_pij(4,2,1131)=0 exch2_oi(2,1131)=511 exch2_oj(2,1131)=-510 exch2_neighbourId(3,1131)=1132 exch2_iLo(3,1131)=35 exch2_iHi(3,1131)=35 exch2_jLo(3,1131)=0 exch2_jHi(3,1131)=35 exch2_opposingSend(3,1131)=4 exch2_pij(1,3,1131)=1 exch2_pij(2,3,1131)=0 exch2_pij(3,3,1131)=0 exch2_pij(4,3,1131)=1 exch2_oi(3,1131)=0 exch2_oj(3,1131)=0 exch2_neighbourId(4,1131)=1130 exch2_iLo(4,1131)=0 exch2_iHi(4,1131)=0 exch2_jLo(4,1131)=0 exch2_jHi(4,1131)=35 exch2_opposingSend(4,1131)=3 exch2_pij(1,4,1131)=1 exch2_pij(2,4,1131)=0 exch2_pij(3,4,1131)=0 exch2_pij(4,4,1131)=1 exch2_oi(4,1131)=0 exch2_oj(4,1131)=0 RETURN END SUBROUTINE W2_E2SETUP_1132 C Topology for tile 1132 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1132)=34 exch2_tNy(1132)=34 exch2_tBasex(1132)=204 exch2_tBasey(1132)=0 exch2_txGlobalo(1132)=2755 exch2_tyGlobalo(1132)=1 exch2_isWedge(1132)=0 exch2_isNedge(1132)=0 exch2_isEedge(1132)=0 exch2_isSedge(1132)=1 exch2_myFace(1132)=6 exch2_mydNx(1132)=510 exch2_mydNy(1132)=510 exch2_nNeighbours(1132)=4 exch2_neighbourId(1,1132)=1147 exch2_iLo(1,1132)=0 exch2_iHi(1,1132)=35 exch2_jLo(1,1132)=35 exch2_jHi(1,1132)=35 exch2_opposingSend(1,1132)=2 exch2_pij(1,1,1132)=1 exch2_pij(2,1,1132)=0 exch2_pij(3,1,1132)=0 exch2_pij(4,1,1132)=1 exch2_oi(1,1132)=0 exch2_oj(1,1132)=0 exch2_neighbourId(2,1132)=810 exch2_iLo(2,1132)=0 exch2_iHi(2,1132)=35 exch2_jLo(2,1132)=0 exch2_jHi(2,1132)=0 exch2_opposingSend(2,1132)=3 exch2_pij(1,2,1132)=0 exch2_pij(2,2,1132)=-1 exch2_pij(3,2,1132)=1 exch2_pij(4,2,1132)=0 exch2_oi(2,1132)=511 exch2_oj(2,1132)=-510 exch2_neighbourId(3,1132)=1133 exch2_iLo(3,1132)=35 exch2_iHi(3,1132)=35 exch2_jLo(3,1132)=0 exch2_jHi(3,1132)=35 exch2_opposingSend(3,1132)=4 exch2_pij(1,3,1132)=1 exch2_pij(2,3,1132)=0 exch2_pij(3,3,1132)=0 exch2_pij(4,3,1132)=1 exch2_oi(3,1132)=0 exch2_oj(3,1132)=0 exch2_neighbourId(4,1132)=1131 exch2_iLo(4,1132)=0 exch2_iHi(4,1132)=0 exch2_jLo(4,1132)=0 exch2_jHi(4,1132)=35 exch2_opposingSend(4,1132)=3 exch2_pij(1,4,1132)=1 exch2_pij(2,4,1132)=0 exch2_pij(3,4,1132)=0 exch2_pij(4,4,1132)=1 exch2_oi(4,1132)=0 exch2_oj(4,1132)=0 RETURN END SUBROUTINE W2_E2SETUP_1133 C Topology for tile 1133 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1133)=34 exch2_tNy(1133)=34 exch2_tBasex(1133)=238 exch2_tBasey(1133)=0 exch2_txGlobalo(1133)=2789 exch2_tyGlobalo(1133)=1 exch2_isWedge(1133)=0 exch2_isNedge(1133)=0 exch2_isEedge(1133)=0 exch2_isSedge(1133)=1 exch2_myFace(1133)=6 exch2_mydNx(1133)=510 exch2_mydNy(1133)=510 exch2_nNeighbours(1133)=4 exch2_neighbourId(1,1133)=1148 exch2_iLo(1,1133)=0 exch2_iHi(1,1133)=35 exch2_jLo(1,1133)=35 exch2_jHi(1,1133)=35 exch2_opposingSend(1,1133)=2 exch2_pij(1,1,1133)=1 exch2_pij(2,1,1133)=0 exch2_pij(3,1,1133)=0 exch2_pij(4,1,1133)=1 exch2_oi(1,1133)=0 exch2_oj(1,1133)=0 exch2_neighbourId(2,1133)=795 exch2_iLo(2,1133)=0 exch2_iHi(2,1133)=35 exch2_jLo(2,1133)=0 exch2_jHi(2,1133)=0 exch2_opposingSend(2,1133)=3 exch2_pij(1,2,1133)=0 exch2_pij(2,2,1133)=-1 exch2_pij(3,2,1133)=1 exch2_pij(4,2,1133)=0 exch2_oi(2,1133)=511 exch2_oj(2,1133)=-510 exch2_neighbourId(3,1133)=1134 exch2_iLo(3,1133)=35 exch2_iHi(3,1133)=35 exch2_jLo(3,1133)=0 exch2_jHi(3,1133)=35 exch2_opposingSend(3,1133)=4 exch2_pij(1,3,1133)=1 exch2_pij(2,3,1133)=0 exch2_pij(3,3,1133)=0 exch2_pij(4,3,1133)=1 exch2_oi(3,1133)=0 exch2_oj(3,1133)=0 exch2_neighbourId(4,1133)=1132 exch2_iLo(4,1133)=0 exch2_iHi(4,1133)=0 exch2_jLo(4,1133)=0 exch2_jHi(4,1133)=35 exch2_opposingSend(4,1133)=3 exch2_pij(1,4,1133)=1 exch2_pij(2,4,1133)=0 exch2_pij(3,4,1133)=0 exch2_pij(4,4,1133)=1 exch2_oi(4,1133)=0 exch2_oj(4,1133)=0 RETURN END SUBROUTINE W2_E2SETUP_1134 C Topology for tile 1134 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1134)=34 exch2_tNy(1134)=34 exch2_tBasex(1134)=272 exch2_tBasey(1134)=0 exch2_txGlobalo(1134)=2823 exch2_tyGlobalo(1134)=1 exch2_isWedge(1134)=0 exch2_isNedge(1134)=0 exch2_isEedge(1134)=0 exch2_isSedge(1134)=1 exch2_myFace(1134)=6 exch2_mydNx(1134)=510 exch2_mydNy(1134)=510 exch2_nNeighbours(1134)=4 exch2_neighbourId(1,1134)=1149 exch2_iLo(1,1134)=0 exch2_iHi(1,1134)=35 exch2_jLo(1,1134)=35 exch2_jHi(1,1134)=35 exch2_opposingSend(1,1134)=2 exch2_pij(1,1,1134)=1 exch2_pij(2,1,1134)=0 exch2_pij(3,1,1134)=0 exch2_pij(4,1,1134)=1 exch2_oi(1,1134)=0 exch2_oj(1,1134)=0 exch2_neighbourId(2,1134)=780 exch2_iLo(2,1134)=0 exch2_iHi(2,1134)=35 exch2_jLo(2,1134)=0 exch2_jHi(2,1134)=0 exch2_opposingSend(2,1134)=3 exch2_pij(1,2,1134)=0 exch2_pij(2,2,1134)=-1 exch2_pij(3,2,1134)=1 exch2_pij(4,2,1134)=0 exch2_oi(2,1134)=511 exch2_oj(2,1134)=-510 exch2_neighbourId(3,1134)=1135 exch2_iLo(3,1134)=35 exch2_iHi(3,1134)=35 exch2_jLo(3,1134)=0 exch2_jHi(3,1134)=35 exch2_opposingSend(3,1134)=4 exch2_pij(1,3,1134)=1 exch2_pij(2,3,1134)=0 exch2_pij(3,3,1134)=0 exch2_pij(4,3,1134)=1 exch2_oi(3,1134)=0 exch2_oj(3,1134)=0 exch2_neighbourId(4,1134)=1133 exch2_iLo(4,1134)=0 exch2_iHi(4,1134)=0 exch2_jLo(4,1134)=0 exch2_jHi(4,1134)=35 exch2_opposingSend(4,1134)=3 exch2_pij(1,4,1134)=1 exch2_pij(2,4,1134)=0 exch2_pij(3,4,1134)=0 exch2_pij(4,4,1134)=1 exch2_oi(4,1134)=0 exch2_oj(4,1134)=0 RETURN END SUBROUTINE W2_E2SETUP_1135 C Topology for tile 1135 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1135)=34 exch2_tNy(1135)=34 exch2_tBasex(1135)=306 exch2_tBasey(1135)=0 exch2_txGlobalo(1135)=2857 exch2_tyGlobalo(1135)=1 exch2_isWedge(1135)=0 exch2_isNedge(1135)=0 exch2_isEedge(1135)=0 exch2_isSedge(1135)=1 exch2_myFace(1135)=6 exch2_mydNx(1135)=510 exch2_mydNy(1135)=510 exch2_nNeighbours(1135)=4 exch2_neighbourId(1,1135)=1150 exch2_iLo(1,1135)=0 exch2_iHi(1,1135)=35 exch2_jLo(1,1135)=35 exch2_jHi(1,1135)=35 exch2_opposingSend(1,1135)=2 exch2_pij(1,1,1135)=1 exch2_pij(2,1,1135)=0 exch2_pij(3,1,1135)=0 exch2_pij(4,1,1135)=1 exch2_oi(1,1135)=0 exch2_oj(1,1135)=0 exch2_neighbourId(2,1135)=765 exch2_iLo(2,1135)=0 exch2_iHi(2,1135)=35 exch2_jLo(2,1135)=0 exch2_jHi(2,1135)=0 exch2_opposingSend(2,1135)=3 exch2_pij(1,2,1135)=0 exch2_pij(2,2,1135)=-1 exch2_pij(3,2,1135)=1 exch2_pij(4,2,1135)=0 exch2_oi(2,1135)=511 exch2_oj(2,1135)=-510 exch2_neighbourId(3,1135)=1136 exch2_iLo(3,1135)=35 exch2_iHi(3,1135)=35 exch2_jLo(3,1135)=0 exch2_jHi(3,1135)=35 exch2_opposingSend(3,1135)=4 exch2_pij(1,3,1135)=1 exch2_pij(2,3,1135)=0 exch2_pij(3,3,1135)=0 exch2_pij(4,3,1135)=1 exch2_oi(3,1135)=0 exch2_oj(3,1135)=0 exch2_neighbourId(4,1135)=1134 exch2_iLo(4,1135)=0 exch2_iHi(4,1135)=0 exch2_jLo(4,1135)=0 exch2_jHi(4,1135)=35 exch2_opposingSend(4,1135)=3 exch2_pij(1,4,1135)=1 exch2_pij(2,4,1135)=0 exch2_pij(3,4,1135)=0 exch2_pij(4,4,1135)=1 exch2_oi(4,1135)=0 exch2_oj(4,1135)=0 RETURN END SUBROUTINE W2_E2SETUP_1136 C Topology for tile 1136 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1136)=34 exch2_tNy(1136)=34 exch2_tBasex(1136)=340 exch2_tBasey(1136)=0 exch2_txGlobalo(1136)=2891 exch2_tyGlobalo(1136)=1 exch2_isWedge(1136)=0 exch2_isNedge(1136)=0 exch2_isEedge(1136)=0 exch2_isSedge(1136)=1 exch2_myFace(1136)=6 exch2_mydNx(1136)=510 exch2_mydNy(1136)=510 exch2_nNeighbours(1136)=4 exch2_neighbourId(1,1136)=1151 exch2_iLo(1,1136)=0 exch2_iHi(1,1136)=35 exch2_jLo(1,1136)=35 exch2_jHi(1,1136)=35 exch2_opposingSend(1,1136)=2 exch2_pij(1,1,1136)=1 exch2_pij(2,1,1136)=0 exch2_pij(3,1,1136)=0 exch2_pij(4,1,1136)=1 exch2_oi(1,1136)=0 exch2_oj(1,1136)=0 exch2_neighbourId(2,1136)=750 exch2_iLo(2,1136)=0 exch2_iHi(2,1136)=35 exch2_jLo(2,1136)=0 exch2_jHi(2,1136)=0 exch2_opposingSend(2,1136)=3 exch2_pij(1,2,1136)=0 exch2_pij(2,2,1136)=-1 exch2_pij(3,2,1136)=1 exch2_pij(4,2,1136)=0 exch2_oi(2,1136)=511 exch2_oj(2,1136)=-510 exch2_neighbourId(3,1136)=1137 exch2_iLo(3,1136)=35 exch2_iHi(3,1136)=35 exch2_jLo(3,1136)=0 exch2_jHi(3,1136)=35 exch2_opposingSend(3,1136)=4 exch2_pij(1,3,1136)=1 exch2_pij(2,3,1136)=0 exch2_pij(3,3,1136)=0 exch2_pij(4,3,1136)=1 exch2_oi(3,1136)=0 exch2_oj(3,1136)=0 exch2_neighbourId(4,1136)=1135 exch2_iLo(4,1136)=0 exch2_iHi(4,1136)=0 exch2_jLo(4,1136)=0 exch2_jHi(4,1136)=35 exch2_opposingSend(4,1136)=3 exch2_pij(1,4,1136)=1 exch2_pij(2,4,1136)=0 exch2_pij(3,4,1136)=0 exch2_pij(4,4,1136)=1 exch2_oi(4,1136)=0 exch2_oj(4,1136)=0 RETURN END SUBROUTINE W2_E2SETUP_1137 C Topology for tile 1137 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1137)=34 exch2_tNy(1137)=34 exch2_tBasex(1137)=374 exch2_tBasey(1137)=0 exch2_txGlobalo(1137)=2925 exch2_tyGlobalo(1137)=1 exch2_isWedge(1137)=0 exch2_isNedge(1137)=0 exch2_isEedge(1137)=0 exch2_isSedge(1137)=1 exch2_myFace(1137)=6 exch2_mydNx(1137)=510 exch2_mydNy(1137)=510 exch2_nNeighbours(1137)=4 exch2_neighbourId(1,1137)=1152 exch2_iLo(1,1137)=0 exch2_iHi(1,1137)=35 exch2_jLo(1,1137)=35 exch2_jHi(1,1137)=35 exch2_opposingSend(1,1137)=2 exch2_pij(1,1,1137)=1 exch2_pij(2,1,1137)=0 exch2_pij(3,1,1137)=0 exch2_pij(4,1,1137)=1 exch2_oi(1,1137)=0 exch2_oj(1,1137)=0 exch2_neighbourId(2,1137)=735 exch2_iLo(2,1137)=0 exch2_iHi(2,1137)=35 exch2_jLo(2,1137)=0 exch2_jHi(2,1137)=0 exch2_opposingSend(2,1137)=3 exch2_pij(1,2,1137)=0 exch2_pij(2,2,1137)=-1 exch2_pij(3,2,1137)=1 exch2_pij(4,2,1137)=0 exch2_oi(2,1137)=511 exch2_oj(2,1137)=-510 exch2_neighbourId(3,1137)=1138 exch2_iLo(3,1137)=35 exch2_iHi(3,1137)=35 exch2_jLo(3,1137)=0 exch2_jHi(3,1137)=35 exch2_opposingSend(3,1137)=4 exch2_pij(1,3,1137)=1 exch2_pij(2,3,1137)=0 exch2_pij(3,3,1137)=0 exch2_pij(4,3,1137)=1 exch2_oi(3,1137)=0 exch2_oj(3,1137)=0 exch2_neighbourId(4,1137)=1136 exch2_iLo(4,1137)=0 exch2_iHi(4,1137)=0 exch2_jLo(4,1137)=0 exch2_jHi(4,1137)=35 exch2_opposingSend(4,1137)=3 exch2_pij(1,4,1137)=1 exch2_pij(2,4,1137)=0 exch2_pij(3,4,1137)=0 exch2_pij(4,4,1137)=1 exch2_oi(4,1137)=0 exch2_oj(4,1137)=0 RETURN END SUBROUTINE W2_E2SETUP_1138 C Topology for tile 1138 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1138)=34 exch2_tNy(1138)=34 exch2_tBasex(1138)=408 exch2_tBasey(1138)=0 exch2_txGlobalo(1138)=2959 exch2_tyGlobalo(1138)=1 exch2_isWedge(1138)=0 exch2_isNedge(1138)=0 exch2_isEedge(1138)=0 exch2_isSedge(1138)=1 exch2_myFace(1138)=6 exch2_mydNx(1138)=510 exch2_mydNy(1138)=510 exch2_nNeighbours(1138)=4 exch2_neighbourId(1,1138)=1153 exch2_iLo(1,1138)=0 exch2_iHi(1,1138)=35 exch2_jLo(1,1138)=35 exch2_jHi(1,1138)=35 exch2_opposingSend(1,1138)=2 exch2_pij(1,1,1138)=1 exch2_pij(2,1,1138)=0 exch2_pij(3,1,1138)=0 exch2_pij(4,1,1138)=1 exch2_oi(1,1138)=0 exch2_oj(1,1138)=0 exch2_neighbourId(2,1138)=720 exch2_iLo(2,1138)=0 exch2_iHi(2,1138)=35 exch2_jLo(2,1138)=0 exch2_jHi(2,1138)=0 exch2_opposingSend(2,1138)=3 exch2_pij(1,2,1138)=0 exch2_pij(2,2,1138)=-1 exch2_pij(3,2,1138)=1 exch2_pij(4,2,1138)=0 exch2_oi(2,1138)=511 exch2_oj(2,1138)=-510 exch2_neighbourId(3,1138)=1139 exch2_iLo(3,1138)=35 exch2_iHi(3,1138)=35 exch2_jLo(3,1138)=0 exch2_jHi(3,1138)=35 exch2_opposingSend(3,1138)=4 exch2_pij(1,3,1138)=1 exch2_pij(2,3,1138)=0 exch2_pij(3,3,1138)=0 exch2_pij(4,3,1138)=1 exch2_oi(3,1138)=0 exch2_oj(3,1138)=0 exch2_neighbourId(4,1138)=1137 exch2_iLo(4,1138)=0 exch2_iHi(4,1138)=0 exch2_jLo(4,1138)=0 exch2_jHi(4,1138)=35 exch2_opposingSend(4,1138)=3 exch2_pij(1,4,1138)=1 exch2_pij(2,4,1138)=0 exch2_pij(3,4,1138)=0 exch2_pij(4,4,1138)=1 exch2_oi(4,1138)=0 exch2_oj(4,1138)=0 RETURN END SUBROUTINE W2_E2SETUP_1139 C Topology for tile 1139 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1139)=34 exch2_tNy(1139)=34 exch2_tBasex(1139)=442 exch2_tBasey(1139)=0 exch2_txGlobalo(1139)=2993 exch2_tyGlobalo(1139)=1 exch2_isWedge(1139)=0 exch2_isNedge(1139)=0 exch2_isEedge(1139)=0 exch2_isSedge(1139)=1 exch2_myFace(1139)=6 exch2_mydNx(1139)=510 exch2_mydNy(1139)=510 exch2_nNeighbours(1139)=4 exch2_neighbourId(1,1139)=1154 exch2_iLo(1,1139)=0 exch2_iHi(1,1139)=35 exch2_jLo(1,1139)=35 exch2_jHi(1,1139)=35 exch2_opposingSend(1,1139)=2 exch2_pij(1,1,1139)=1 exch2_pij(2,1,1139)=0 exch2_pij(3,1,1139)=0 exch2_pij(4,1,1139)=1 exch2_oi(1,1139)=0 exch2_oj(1,1139)=0 exch2_neighbourId(2,1139)=705 exch2_iLo(2,1139)=0 exch2_iHi(2,1139)=35 exch2_jLo(2,1139)=0 exch2_jHi(2,1139)=0 exch2_opposingSend(2,1139)=3 exch2_pij(1,2,1139)=0 exch2_pij(2,2,1139)=-1 exch2_pij(3,2,1139)=1 exch2_pij(4,2,1139)=0 exch2_oi(2,1139)=511 exch2_oj(2,1139)=-510 exch2_neighbourId(3,1139)=1140 exch2_iLo(3,1139)=35 exch2_iHi(3,1139)=35 exch2_jLo(3,1139)=0 exch2_jHi(3,1139)=35 exch2_opposingSend(3,1139)=4 exch2_pij(1,3,1139)=1 exch2_pij(2,3,1139)=0 exch2_pij(3,3,1139)=0 exch2_pij(4,3,1139)=1 exch2_oi(3,1139)=0 exch2_oj(3,1139)=0 exch2_neighbourId(4,1139)=1138 exch2_iLo(4,1139)=0 exch2_iHi(4,1139)=0 exch2_jLo(4,1139)=0 exch2_jHi(4,1139)=35 exch2_opposingSend(4,1139)=3 exch2_pij(1,4,1139)=1 exch2_pij(2,4,1139)=0 exch2_pij(3,4,1139)=0 exch2_pij(4,4,1139)=1 exch2_oi(4,1139)=0 exch2_oj(4,1139)=0 RETURN END SUBROUTINE W2_E2SETUP_1140 C Topology for tile 1140 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1140)=34 exch2_tNy(1140)=34 exch2_tBasex(1140)=476 exch2_tBasey(1140)=0 exch2_txGlobalo(1140)=3027 exch2_tyGlobalo(1140)=1 exch2_isWedge(1140)=0 exch2_isNedge(1140)=0 exch2_isEedge(1140)=1 exch2_isSedge(1140)=1 exch2_myFace(1140)=6 exch2_mydNx(1140)=510 exch2_mydNy(1140)=510 exch2_nNeighbours(1140)=4 exch2_neighbourId(1,1140)=1155 exch2_iLo(1,1140)=0 exch2_iHi(1,1140)=35 exch2_jLo(1,1140)=35 exch2_jHi(1,1140)=35 exch2_opposingSend(1,1140)=2 exch2_pij(1,1,1140)=1 exch2_pij(2,1,1140)=0 exch2_pij(3,1,1140)=0 exch2_pij(4,1,1140)=1 exch2_oi(1,1140)=0 exch2_oj(1,1140)=0 exch2_neighbourId(2,1140)=690 exch2_iLo(2,1140)=0 exch2_iHi(2,1140)=35 exch2_jLo(2,1140)=0 exch2_jHi(2,1140)=0 exch2_opposingSend(2,1140)=3 exch2_pij(1,2,1140)=0 exch2_pij(2,2,1140)=-1 exch2_pij(3,2,1140)=1 exch2_pij(4,2,1140)=0 exch2_oi(2,1140)=511 exch2_oj(2,1140)=-510 exch2_neighbourId(3,1140)=240 exch2_iLo(3,1140)=35 exch2_iHi(3,1140)=35 exch2_jLo(3,1140)=0 exch2_jHi(3,1140)=35 exch2_opposingSend(3,1140)=2 exch2_pij(1,3,1140)=0 exch2_pij(2,3,1140)=1 exch2_pij(3,3,1140)=-1 exch2_pij(4,3,1140)=0 exch2_oi(3,1140)=510 exch2_oj(3,1140)=511 exch2_neighbourId(4,1140)=1139 exch2_iLo(4,1140)=0 exch2_iHi(4,1140)=0 exch2_jLo(4,1140)=0 exch2_jHi(4,1140)=35 exch2_opposingSend(4,1140)=3 exch2_pij(1,4,1140)=1 exch2_pij(2,4,1140)=0 exch2_pij(3,4,1140)=0 exch2_pij(4,4,1140)=1 exch2_oi(4,1140)=0 exch2_oj(4,1140)=0 RETURN END SUBROUTINE W2_E2SETUP_1141 C Topology for tile 1141 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1141)=34 exch2_tNy(1141)=34 exch2_tBasex(1141)=0 exch2_tBasey(1141)=34 exch2_txGlobalo(1141)=2551 exch2_tyGlobalo(1141)=35 exch2_isWedge(1141)=1 exch2_isNedge(1141)=0 exch2_isEedge(1141)=0 exch2_isSedge(1141)=0 exch2_myFace(1141)=6 exch2_mydNx(1141)=510 exch2_mydNy(1141)=510 exch2_nNeighbours(1141)=4 exch2_neighbourId(1,1141)=1156 exch2_iLo(1,1141)=0 exch2_iHi(1,1141)=35 exch2_jLo(1,1141)=35 exch2_jHi(1,1141)=35 exch2_opposingSend(1,1141)=2 exch2_pij(1,1,1141)=1 exch2_pij(2,1,1141)=0 exch2_pij(3,1,1141)=0 exch2_pij(4,1,1141)=1 exch2_oi(1,1141)=0 exch2_oj(1,1141)=0 exch2_neighbourId(2,1141)=1126 exch2_iLo(2,1141)=0 exch2_iHi(2,1141)=35 exch2_jLo(2,1141)=0 exch2_jHi(2,1141)=0 exch2_opposingSend(2,1141)=1 exch2_pij(1,2,1141)=1 exch2_pij(2,2,1141)=0 exch2_pij(3,2,1141)=0 exch2_pij(4,2,1141)=1 exch2_oi(2,1141)=0 exch2_oj(2,1141)=0 exch2_neighbourId(3,1141)=1142 exch2_iLo(3,1141)=35 exch2_iHi(3,1141)=35 exch2_jLo(3,1141)=0 exch2_jHi(3,1141)=35 exch2_opposingSend(3,1141)=4 exch2_pij(1,3,1141)=1 exch2_pij(2,3,1141)=0 exch2_pij(3,3,1141)=0 exch2_pij(4,3,1141)=1 exch2_oi(3,1141)=0 exch2_oj(3,1141)=0 exch2_neighbourId(4,1141)=930 exch2_iLo(4,1141)=0 exch2_iHi(4,1141)=0 exch2_jLo(4,1141)=0 exch2_jHi(4,1141)=35 exch2_opposingSend(4,1141)=3 exch2_pij(1,4,1141)=1 exch2_pij(2,4,1141)=0 exch2_pij(3,4,1141)=0 exch2_pij(4,4,1141)=1 exch2_oi(4,1141)=-510 exch2_oj(4,1141)=0 RETURN END SUBROUTINE W2_E2SETUP_1142 C Topology for tile 1142 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1142)=34 exch2_tNy(1142)=34 exch2_tBasex(1142)=34 exch2_tBasey(1142)=34 exch2_txGlobalo(1142)=2585 exch2_tyGlobalo(1142)=35 exch2_isWedge(1142)=0 exch2_isNedge(1142)=0 exch2_isEedge(1142)=0 exch2_isSedge(1142)=0 exch2_myFace(1142)=6 exch2_mydNx(1142)=510 exch2_mydNy(1142)=510 exch2_nNeighbours(1142)=4 exch2_neighbourId(1,1142)=1157 exch2_iLo(1,1142)=0 exch2_iHi(1,1142)=35 exch2_jLo(1,1142)=35 exch2_jHi(1,1142)=35 exch2_opposingSend(1,1142)=2 exch2_pij(1,1,1142)=1 exch2_pij(2,1,1142)=0 exch2_pij(3,1,1142)=0 exch2_pij(4,1,1142)=1 exch2_oi(1,1142)=0 exch2_oj(1,1142)=0 exch2_neighbourId(2,1142)=1127 exch2_iLo(2,1142)=0 exch2_iHi(2,1142)=35 exch2_jLo(2,1142)=0 exch2_jHi(2,1142)=0 exch2_opposingSend(2,1142)=1 exch2_pij(1,2,1142)=1 exch2_pij(2,2,1142)=0 exch2_pij(3,2,1142)=0 exch2_pij(4,2,1142)=1 exch2_oi(2,1142)=0 exch2_oj(2,1142)=0 exch2_neighbourId(3,1142)=1143 exch2_iLo(3,1142)=35 exch2_iHi(3,1142)=35 exch2_jLo(3,1142)=0 exch2_jHi(3,1142)=35 exch2_opposingSend(3,1142)=4 exch2_pij(1,3,1142)=1 exch2_pij(2,3,1142)=0 exch2_pij(3,3,1142)=0 exch2_pij(4,3,1142)=1 exch2_oi(3,1142)=0 exch2_oj(3,1142)=0 exch2_neighbourId(4,1142)=1141 exch2_iLo(4,1142)=0 exch2_iHi(4,1142)=0 exch2_jLo(4,1142)=0 exch2_jHi(4,1142)=35 exch2_opposingSend(4,1142)=3 exch2_pij(1,4,1142)=1 exch2_pij(2,4,1142)=0 exch2_pij(3,4,1142)=0 exch2_pij(4,4,1142)=1 exch2_oi(4,1142)=0 exch2_oj(4,1142)=0 RETURN END SUBROUTINE W2_E2SETUP_1143 C Topology for tile 1143 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1143)=34 exch2_tNy(1143)=34 exch2_tBasex(1143)=68 exch2_tBasey(1143)=34 exch2_txGlobalo(1143)=2619 exch2_tyGlobalo(1143)=35 exch2_isWedge(1143)=0 exch2_isNedge(1143)=0 exch2_isEedge(1143)=0 exch2_isSedge(1143)=0 exch2_myFace(1143)=6 exch2_mydNx(1143)=510 exch2_mydNy(1143)=510 exch2_nNeighbours(1143)=4 exch2_neighbourId(1,1143)=1158 exch2_iLo(1,1143)=0 exch2_iHi(1,1143)=35 exch2_jLo(1,1143)=35 exch2_jHi(1,1143)=35 exch2_opposingSend(1,1143)=2 exch2_pij(1,1,1143)=1 exch2_pij(2,1,1143)=0 exch2_pij(3,1,1143)=0 exch2_pij(4,1,1143)=1 exch2_oi(1,1143)=0 exch2_oj(1,1143)=0 exch2_neighbourId(2,1143)=1128 exch2_iLo(2,1143)=0 exch2_iHi(2,1143)=35 exch2_jLo(2,1143)=0 exch2_jHi(2,1143)=0 exch2_opposingSend(2,1143)=1 exch2_pij(1,2,1143)=1 exch2_pij(2,2,1143)=0 exch2_pij(3,2,1143)=0 exch2_pij(4,2,1143)=1 exch2_oi(2,1143)=0 exch2_oj(2,1143)=0 exch2_neighbourId(3,1143)=1144 exch2_iLo(3,1143)=35 exch2_iHi(3,1143)=35 exch2_jLo(3,1143)=0 exch2_jHi(3,1143)=35 exch2_opposingSend(3,1143)=4 exch2_pij(1,3,1143)=1 exch2_pij(2,3,1143)=0 exch2_pij(3,3,1143)=0 exch2_pij(4,3,1143)=1 exch2_oi(3,1143)=0 exch2_oj(3,1143)=0 exch2_neighbourId(4,1143)=1142 exch2_iLo(4,1143)=0 exch2_iHi(4,1143)=0 exch2_jLo(4,1143)=0 exch2_jHi(4,1143)=35 exch2_opposingSend(4,1143)=3 exch2_pij(1,4,1143)=1 exch2_pij(2,4,1143)=0 exch2_pij(3,4,1143)=0 exch2_pij(4,4,1143)=1 exch2_oi(4,1143)=0 exch2_oj(4,1143)=0 RETURN END SUBROUTINE W2_E2SETUP_1144 C Topology for tile 1144 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1144)=34 exch2_tNy(1144)=34 exch2_tBasex(1144)=102 exch2_tBasey(1144)=34 exch2_txGlobalo(1144)=2653 exch2_tyGlobalo(1144)=35 exch2_isWedge(1144)=0 exch2_isNedge(1144)=0 exch2_isEedge(1144)=0 exch2_isSedge(1144)=0 exch2_myFace(1144)=6 exch2_mydNx(1144)=510 exch2_mydNy(1144)=510 exch2_nNeighbours(1144)=4 exch2_neighbourId(1,1144)=1159 exch2_iLo(1,1144)=0 exch2_iHi(1,1144)=35 exch2_jLo(1,1144)=35 exch2_jHi(1,1144)=35 exch2_opposingSend(1,1144)=2 exch2_pij(1,1,1144)=1 exch2_pij(2,1,1144)=0 exch2_pij(3,1,1144)=0 exch2_pij(4,1,1144)=1 exch2_oi(1,1144)=0 exch2_oj(1,1144)=0 exch2_neighbourId(2,1144)=1129 exch2_iLo(2,1144)=0 exch2_iHi(2,1144)=35 exch2_jLo(2,1144)=0 exch2_jHi(2,1144)=0 exch2_opposingSend(2,1144)=1 exch2_pij(1,2,1144)=1 exch2_pij(2,2,1144)=0 exch2_pij(3,2,1144)=0 exch2_pij(4,2,1144)=1 exch2_oi(2,1144)=0 exch2_oj(2,1144)=0 exch2_neighbourId(3,1144)=1145 exch2_iLo(3,1144)=35 exch2_iHi(3,1144)=35 exch2_jLo(3,1144)=0 exch2_jHi(3,1144)=35 exch2_opposingSend(3,1144)=4 exch2_pij(1,3,1144)=1 exch2_pij(2,3,1144)=0 exch2_pij(3,3,1144)=0 exch2_pij(4,3,1144)=1 exch2_oi(3,1144)=0 exch2_oj(3,1144)=0 exch2_neighbourId(4,1144)=1143 exch2_iLo(4,1144)=0 exch2_iHi(4,1144)=0 exch2_jLo(4,1144)=0 exch2_jHi(4,1144)=35 exch2_opposingSend(4,1144)=3 exch2_pij(1,4,1144)=1 exch2_pij(2,4,1144)=0 exch2_pij(3,4,1144)=0 exch2_pij(4,4,1144)=1 exch2_oi(4,1144)=0 exch2_oj(4,1144)=0 RETURN END SUBROUTINE W2_E2SETUP_1145 C Topology for tile 1145 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1145)=34 exch2_tNy(1145)=34 exch2_tBasex(1145)=136 exch2_tBasey(1145)=34 exch2_txGlobalo(1145)=2687 exch2_tyGlobalo(1145)=35 exch2_isWedge(1145)=0 exch2_isNedge(1145)=0 exch2_isEedge(1145)=0 exch2_isSedge(1145)=0 exch2_myFace(1145)=6 exch2_mydNx(1145)=510 exch2_mydNy(1145)=510 exch2_nNeighbours(1145)=4 exch2_neighbourId(1,1145)=1160 exch2_iLo(1,1145)=0 exch2_iHi(1,1145)=35 exch2_jLo(1,1145)=35 exch2_jHi(1,1145)=35 exch2_opposingSend(1,1145)=2 exch2_pij(1,1,1145)=1 exch2_pij(2,1,1145)=0 exch2_pij(3,1,1145)=0 exch2_pij(4,1,1145)=1 exch2_oi(1,1145)=0 exch2_oj(1,1145)=0 exch2_neighbourId(2,1145)=1130 exch2_iLo(2,1145)=0 exch2_iHi(2,1145)=35 exch2_jLo(2,1145)=0 exch2_jHi(2,1145)=0 exch2_opposingSend(2,1145)=1 exch2_pij(1,2,1145)=1 exch2_pij(2,2,1145)=0 exch2_pij(3,2,1145)=0 exch2_pij(4,2,1145)=1 exch2_oi(2,1145)=0 exch2_oj(2,1145)=0 exch2_neighbourId(3,1145)=1146 exch2_iLo(3,1145)=35 exch2_iHi(3,1145)=35 exch2_jLo(3,1145)=0 exch2_jHi(3,1145)=35 exch2_opposingSend(3,1145)=4 exch2_pij(1,3,1145)=1 exch2_pij(2,3,1145)=0 exch2_pij(3,3,1145)=0 exch2_pij(4,3,1145)=1 exch2_oi(3,1145)=0 exch2_oj(3,1145)=0 exch2_neighbourId(4,1145)=1144 exch2_iLo(4,1145)=0 exch2_iHi(4,1145)=0 exch2_jLo(4,1145)=0 exch2_jHi(4,1145)=35 exch2_opposingSend(4,1145)=3 exch2_pij(1,4,1145)=1 exch2_pij(2,4,1145)=0 exch2_pij(3,4,1145)=0 exch2_pij(4,4,1145)=1 exch2_oi(4,1145)=0 exch2_oj(4,1145)=0 RETURN END SUBROUTINE W2_E2SETUP_1146 C Topology for tile 1146 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1146)=34 exch2_tNy(1146)=34 exch2_tBasex(1146)=170 exch2_tBasey(1146)=34 exch2_txGlobalo(1146)=2721 exch2_tyGlobalo(1146)=35 exch2_isWedge(1146)=0 exch2_isNedge(1146)=0 exch2_isEedge(1146)=0 exch2_isSedge(1146)=0 exch2_myFace(1146)=6 exch2_mydNx(1146)=510 exch2_mydNy(1146)=510 exch2_nNeighbours(1146)=4 exch2_neighbourId(1,1146)=1161 exch2_iLo(1,1146)=0 exch2_iHi(1,1146)=35 exch2_jLo(1,1146)=35 exch2_jHi(1,1146)=35 exch2_opposingSend(1,1146)=2 exch2_pij(1,1,1146)=1 exch2_pij(2,1,1146)=0 exch2_pij(3,1,1146)=0 exch2_pij(4,1,1146)=1 exch2_oi(1,1146)=0 exch2_oj(1,1146)=0 exch2_neighbourId(2,1146)=1131 exch2_iLo(2,1146)=0 exch2_iHi(2,1146)=35 exch2_jLo(2,1146)=0 exch2_jHi(2,1146)=0 exch2_opposingSend(2,1146)=1 exch2_pij(1,2,1146)=1 exch2_pij(2,2,1146)=0 exch2_pij(3,2,1146)=0 exch2_pij(4,2,1146)=1 exch2_oi(2,1146)=0 exch2_oj(2,1146)=0 exch2_neighbourId(3,1146)=1147 exch2_iLo(3,1146)=35 exch2_iHi(3,1146)=35 exch2_jLo(3,1146)=0 exch2_jHi(3,1146)=35 exch2_opposingSend(3,1146)=4 exch2_pij(1,3,1146)=1 exch2_pij(2,3,1146)=0 exch2_pij(3,3,1146)=0 exch2_pij(4,3,1146)=1 exch2_oi(3,1146)=0 exch2_oj(3,1146)=0 exch2_neighbourId(4,1146)=1145 exch2_iLo(4,1146)=0 exch2_iHi(4,1146)=0 exch2_jLo(4,1146)=0 exch2_jHi(4,1146)=35 exch2_opposingSend(4,1146)=3 exch2_pij(1,4,1146)=1 exch2_pij(2,4,1146)=0 exch2_pij(3,4,1146)=0 exch2_pij(4,4,1146)=1 exch2_oi(4,1146)=0 exch2_oj(4,1146)=0 RETURN END SUBROUTINE W2_E2SETUP_1147 C Topology for tile 1147 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1147)=34 exch2_tNy(1147)=34 exch2_tBasex(1147)=204 exch2_tBasey(1147)=34 exch2_txGlobalo(1147)=2755 exch2_tyGlobalo(1147)=35 exch2_isWedge(1147)=0 exch2_isNedge(1147)=0 exch2_isEedge(1147)=0 exch2_isSedge(1147)=0 exch2_myFace(1147)=6 exch2_mydNx(1147)=510 exch2_mydNy(1147)=510 exch2_nNeighbours(1147)=4 exch2_neighbourId(1,1147)=1162 exch2_iLo(1,1147)=0 exch2_iHi(1,1147)=35 exch2_jLo(1,1147)=35 exch2_jHi(1,1147)=35 exch2_opposingSend(1,1147)=2 exch2_pij(1,1,1147)=1 exch2_pij(2,1,1147)=0 exch2_pij(3,1,1147)=0 exch2_pij(4,1,1147)=1 exch2_oi(1,1147)=0 exch2_oj(1,1147)=0 exch2_neighbourId(2,1147)=1132 exch2_iLo(2,1147)=0 exch2_iHi(2,1147)=35 exch2_jLo(2,1147)=0 exch2_jHi(2,1147)=0 exch2_opposingSend(2,1147)=1 exch2_pij(1,2,1147)=1 exch2_pij(2,2,1147)=0 exch2_pij(3,2,1147)=0 exch2_pij(4,2,1147)=1 exch2_oi(2,1147)=0 exch2_oj(2,1147)=0 exch2_neighbourId(3,1147)=1148 exch2_iLo(3,1147)=35 exch2_iHi(3,1147)=35 exch2_jLo(3,1147)=0 exch2_jHi(3,1147)=35 exch2_opposingSend(3,1147)=4 exch2_pij(1,3,1147)=1 exch2_pij(2,3,1147)=0 exch2_pij(3,3,1147)=0 exch2_pij(4,3,1147)=1 exch2_oi(3,1147)=0 exch2_oj(3,1147)=0 exch2_neighbourId(4,1147)=1146 exch2_iLo(4,1147)=0 exch2_iHi(4,1147)=0 exch2_jLo(4,1147)=0 exch2_jHi(4,1147)=35 exch2_opposingSend(4,1147)=3 exch2_pij(1,4,1147)=1 exch2_pij(2,4,1147)=0 exch2_pij(3,4,1147)=0 exch2_pij(4,4,1147)=1 exch2_oi(4,1147)=0 exch2_oj(4,1147)=0 RETURN END SUBROUTINE W2_E2SETUP_1148 C Topology for tile 1148 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1148)=34 exch2_tNy(1148)=34 exch2_tBasex(1148)=238 exch2_tBasey(1148)=34 exch2_txGlobalo(1148)=2789 exch2_tyGlobalo(1148)=35 exch2_isWedge(1148)=0 exch2_isNedge(1148)=0 exch2_isEedge(1148)=0 exch2_isSedge(1148)=0 exch2_myFace(1148)=6 exch2_mydNx(1148)=510 exch2_mydNy(1148)=510 exch2_nNeighbours(1148)=4 exch2_neighbourId(1,1148)=1163 exch2_iLo(1,1148)=0 exch2_iHi(1,1148)=35 exch2_jLo(1,1148)=35 exch2_jHi(1,1148)=35 exch2_opposingSend(1,1148)=2 exch2_pij(1,1,1148)=1 exch2_pij(2,1,1148)=0 exch2_pij(3,1,1148)=0 exch2_pij(4,1,1148)=1 exch2_oi(1,1148)=0 exch2_oj(1,1148)=0 exch2_neighbourId(2,1148)=1133 exch2_iLo(2,1148)=0 exch2_iHi(2,1148)=35 exch2_jLo(2,1148)=0 exch2_jHi(2,1148)=0 exch2_opposingSend(2,1148)=1 exch2_pij(1,2,1148)=1 exch2_pij(2,2,1148)=0 exch2_pij(3,2,1148)=0 exch2_pij(4,2,1148)=1 exch2_oi(2,1148)=0 exch2_oj(2,1148)=0 exch2_neighbourId(3,1148)=1149 exch2_iLo(3,1148)=35 exch2_iHi(3,1148)=35 exch2_jLo(3,1148)=0 exch2_jHi(3,1148)=35 exch2_opposingSend(3,1148)=4 exch2_pij(1,3,1148)=1 exch2_pij(2,3,1148)=0 exch2_pij(3,3,1148)=0 exch2_pij(4,3,1148)=1 exch2_oi(3,1148)=0 exch2_oj(3,1148)=0 exch2_neighbourId(4,1148)=1147 exch2_iLo(4,1148)=0 exch2_iHi(4,1148)=0 exch2_jLo(4,1148)=0 exch2_jHi(4,1148)=35 exch2_opposingSend(4,1148)=3 exch2_pij(1,4,1148)=1 exch2_pij(2,4,1148)=0 exch2_pij(3,4,1148)=0 exch2_pij(4,4,1148)=1 exch2_oi(4,1148)=0 exch2_oj(4,1148)=0 RETURN END SUBROUTINE W2_E2SETUP_1149 C Topology for tile 1149 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1149)=34 exch2_tNy(1149)=34 exch2_tBasex(1149)=272 exch2_tBasey(1149)=34 exch2_txGlobalo(1149)=2823 exch2_tyGlobalo(1149)=35 exch2_isWedge(1149)=0 exch2_isNedge(1149)=0 exch2_isEedge(1149)=0 exch2_isSedge(1149)=0 exch2_myFace(1149)=6 exch2_mydNx(1149)=510 exch2_mydNy(1149)=510 exch2_nNeighbours(1149)=4 exch2_neighbourId(1,1149)=1164 exch2_iLo(1,1149)=0 exch2_iHi(1,1149)=35 exch2_jLo(1,1149)=35 exch2_jHi(1,1149)=35 exch2_opposingSend(1,1149)=2 exch2_pij(1,1,1149)=1 exch2_pij(2,1,1149)=0 exch2_pij(3,1,1149)=0 exch2_pij(4,1,1149)=1 exch2_oi(1,1149)=0 exch2_oj(1,1149)=0 exch2_neighbourId(2,1149)=1134 exch2_iLo(2,1149)=0 exch2_iHi(2,1149)=35 exch2_jLo(2,1149)=0 exch2_jHi(2,1149)=0 exch2_opposingSend(2,1149)=1 exch2_pij(1,2,1149)=1 exch2_pij(2,2,1149)=0 exch2_pij(3,2,1149)=0 exch2_pij(4,2,1149)=1 exch2_oi(2,1149)=0 exch2_oj(2,1149)=0 exch2_neighbourId(3,1149)=1150 exch2_iLo(3,1149)=35 exch2_iHi(3,1149)=35 exch2_jLo(3,1149)=0 exch2_jHi(3,1149)=35 exch2_opposingSend(3,1149)=4 exch2_pij(1,3,1149)=1 exch2_pij(2,3,1149)=0 exch2_pij(3,3,1149)=0 exch2_pij(4,3,1149)=1 exch2_oi(3,1149)=0 exch2_oj(3,1149)=0 exch2_neighbourId(4,1149)=1148 exch2_iLo(4,1149)=0 exch2_iHi(4,1149)=0 exch2_jLo(4,1149)=0 exch2_jHi(4,1149)=35 exch2_opposingSend(4,1149)=3 exch2_pij(1,4,1149)=1 exch2_pij(2,4,1149)=0 exch2_pij(3,4,1149)=0 exch2_pij(4,4,1149)=1 exch2_oi(4,1149)=0 exch2_oj(4,1149)=0 RETURN END SUBROUTINE W2_E2SETUP_1150 C Topology for tile 1150 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1150)=34 exch2_tNy(1150)=34 exch2_tBasex(1150)=306 exch2_tBasey(1150)=34 exch2_txGlobalo(1150)=2857 exch2_tyGlobalo(1150)=35 exch2_isWedge(1150)=0 exch2_isNedge(1150)=0 exch2_isEedge(1150)=0 exch2_isSedge(1150)=0 exch2_myFace(1150)=6 exch2_mydNx(1150)=510 exch2_mydNy(1150)=510 exch2_nNeighbours(1150)=4 exch2_neighbourId(1,1150)=1165 exch2_iLo(1,1150)=0 exch2_iHi(1,1150)=35 exch2_jLo(1,1150)=35 exch2_jHi(1,1150)=35 exch2_opposingSend(1,1150)=2 exch2_pij(1,1,1150)=1 exch2_pij(2,1,1150)=0 exch2_pij(3,1,1150)=0 exch2_pij(4,1,1150)=1 exch2_oi(1,1150)=0 exch2_oj(1,1150)=0 exch2_neighbourId(2,1150)=1135 exch2_iLo(2,1150)=0 exch2_iHi(2,1150)=35 exch2_jLo(2,1150)=0 exch2_jHi(2,1150)=0 exch2_opposingSend(2,1150)=1 exch2_pij(1,2,1150)=1 exch2_pij(2,2,1150)=0 exch2_pij(3,2,1150)=0 exch2_pij(4,2,1150)=1 exch2_oi(2,1150)=0 exch2_oj(2,1150)=0 exch2_neighbourId(3,1150)=1151 exch2_iLo(3,1150)=35 exch2_iHi(3,1150)=35 exch2_jLo(3,1150)=0 exch2_jHi(3,1150)=35 exch2_opposingSend(3,1150)=4 exch2_pij(1,3,1150)=1 exch2_pij(2,3,1150)=0 exch2_pij(3,3,1150)=0 exch2_pij(4,3,1150)=1 exch2_oi(3,1150)=0 exch2_oj(3,1150)=0 exch2_neighbourId(4,1150)=1149 exch2_iLo(4,1150)=0 exch2_iHi(4,1150)=0 exch2_jLo(4,1150)=0 exch2_jHi(4,1150)=35 exch2_opposingSend(4,1150)=3 exch2_pij(1,4,1150)=1 exch2_pij(2,4,1150)=0 exch2_pij(3,4,1150)=0 exch2_pij(4,4,1150)=1 exch2_oi(4,1150)=0 exch2_oj(4,1150)=0 RETURN END SUBROUTINE W2_E2SETUP_1151 C Topology for tile 1151 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1151)=34 exch2_tNy(1151)=34 exch2_tBasex(1151)=340 exch2_tBasey(1151)=34 exch2_txGlobalo(1151)=2891 exch2_tyGlobalo(1151)=35 exch2_isWedge(1151)=0 exch2_isNedge(1151)=0 exch2_isEedge(1151)=0 exch2_isSedge(1151)=0 exch2_myFace(1151)=6 exch2_mydNx(1151)=510 exch2_mydNy(1151)=510 exch2_nNeighbours(1151)=4 exch2_neighbourId(1,1151)=1166 exch2_iLo(1,1151)=0 exch2_iHi(1,1151)=35 exch2_jLo(1,1151)=35 exch2_jHi(1,1151)=35 exch2_opposingSend(1,1151)=2 exch2_pij(1,1,1151)=1 exch2_pij(2,1,1151)=0 exch2_pij(3,1,1151)=0 exch2_pij(4,1,1151)=1 exch2_oi(1,1151)=0 exch2_oj(1,1151)=0 exch2_neighbourId(2,1151)=1136 exch2_iLo(2,1151)=0 exch2_iHi(2,1151)=35 exch2_jLo(2,1151)=0 exch2_jHi(2,1151)=0 exch2_opposingSend(2,1151)=1 exch2_pij(1,2,1151)=1 exch2_pij(2,2,1151)=0 exch2_pij(3,2,1151)=0 exch2_pij(4,2,1151)=1 exch2_oi(2,1151)=0 exch2_oj(2,1151)=0 exch2_neighbourId(3,1151)=1152 exch2_iLo(3,1151)=35 exch2_iHi(3,1151)=35 exch2_jLo(3,1151)=0 exch2_jHi(3,1151)=35 exch2_opposingSend(3,1151)=4 exch2_pij(1,3,1151)=1 exch2_pij(2,3,1151)=0 exch2_pij(3,3,1151)=0 exch2_pij(4,3,1151)=1 exch2_oi(3,1151)=0 exch2_oj(3,1151)=0 exch2_neighbourId(4,1151)=1150 exch2_iLo(4,1151)=0 exch2_iHi(4,1151)=0 exch2_jLo(4,1151)=0 exch2_jHi(4,1151)=35 exch2_opposingSend(4,1151)=3 exch2_pij(1,4,1151)=1 exch2_pij(2,4,1151)=0 exch2_pij(3,4,1151)=0 exch2_pij(4,4,1151)=1 exch2_oi(4,1151)=0 exch2_oj(4,1151)=0 RETURN END SUBROUTINE W2_E2SETUP_1152 C Topology for tile 1152 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1152)=34 exch2_tNy(1152)=34 exch2_tBasex(1152)=374 exch2_tBasey(1152)=34 exch2_txGlobalo(1152)=2925 exch2_tyGlobalo(1152)=35 exch2_isWedge(1152)=0 exch2_isNedge(1152)=0 exch2_isEedge(1152)=0 exch2_isSedge(1152)=0 exch2_myFace(1152)=6 exch2_mydNx(1152)=510 exch2_mydNy(1152)=510 exch2_nNeighbours(1152)=4 exch2_neighbourId(1,1152)=1167 exch2_iLo(1,1152)=0 exch2_iHi(1,1152)=35 exch2_jLo(1,1152)=35 exch2_jHi(1,1152)=35 exch2_opposingSend(1,1152)=2 exch2_pij(1,1,1152)=1 exch2_pij(2,1,1152)=0 exch2_pij(3,1,1152)=0 exch2_pij(4,1,1152)=1 exch2_oi(1,1152)=0 exch2_oj(1,1152)=0 exch2_neighbourId(2,1152)=1137 exch2_iLo(2,1152)=0 exch2_iHi(2,1152)=35 exch2_jLo(2,1152)=0 exch2_jHi(2,1152)=0 exch2_opposingSend(2,1152)=1 exch2_pij(1,2,1152)=1 exch2_pij(2,2,1152)=0 exch2_pij(3,2,1152)=0 exch2_pij(4,2,1152)=1 exch2_oi(2,1152)=0 exch2_oj(2,1152)=0 exch2_neighbourId(3,1152)=1153 exch2_iLo(3,1152)=35 exch2_iHi(3,1152)=35 exch2_jLo(3,1152)=0 exch2_jHi(3,1152)=35 exch2_opposingSend(3,1152)=4 exch2_pij(1,3,1152)=1 exch2_pij(2,3,1152)=0 exch2_pij(3,3,1152)=0 exch2_pij(4,3,1152)=1 exch2_oi(3,1152)=0 exch2_oj(3,1152)=0 exch2_neighbourId(4,1152)=1151 exch2_iLo(4,1152)=0 exch2_iHi(4,1152)=0 exch2_jLo(4,1152)=0 exch2_jHi(4,1152)=35 exch2_opposingSend(4,1152)=3 exch2_pij(1,4,1152)=1 exch2_pij(2,4,1152)=0 exch2_pij(3,4,1152)=0 exch2_pij(4,4,1152)=1 exch2_oi(4,1152)=0 exch2_oj(4,1152)=0 RETURN END SUBROUTINE W2_E2SETUP_1153 C Topology for tile 1153 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1153)=34 exch2_tNy(1153)=34 exch2_tBasex(1153)=408 exch2_tBasey(1153)=34 exch2_txGlobalo(1153)=2959 exch2_tyGlobalo(1153)=35 exch2_isWedge(1153)=0 exch2_isNedge(1153)=0 exch2_isEedge(1153)=0 exch2_isSedge(1153)=0 exch2_myFace(1153)=6 exch2_mydNx(1153)=510 exch2_mydNy(1153)=510 exch2_nNeighbours(1153)=4 exch2_neighbourId(1,1153)=1168 exch2_iLo(1,1153)=0 exch2_iHi(1,1153)=35 exch2_jLo(1,1153)=35 exch2_jHi(1,1153)=35 exch2_opposingSend(1,1153)=2 exch2_pij(1,1,1153)=1 exch2_pij(2,1,1153)=0 exch2_pij(3,1,1153)=0 exch2_pij(4,1,1153)=1 exch2_oi(1,1153)=0 exch2_oj(1,1153)=0 exch2_neighbourId(2,1153)=1138 exch2_iLo(2,1153)=0 exch2_iHi(2,1153)=35 exch2_jLo(2,1153)=0 exch2_jHi(2,1153)=0 exch2_opposingSend(2,1153)=1 exch2_pij(1,2,1153)=1 exch2_pij(2,2,1153)=0 exch2_pij(3,2,1153)=0 exch2_pij(4,2,1153)=1 exch2_oi(2,1153)=0 exch2_oj(2,1153)=0 exch2_neighbourId(3,1153)=1154 exch2_iLo(3,1153)=35 exch2_iHi(3,1153)=35 exch2_jLo(3,1153)=0 exch2_jHi(3,1153)=35 exch2_opposingSend(3,1153)=4 exch2_pij(1,3,1153)=1 exch2_pij(2,3,1153)=0 exch2_pij(3,3,1153)=0 exch2_pij(4,3,1153)=1 exch2_oi(3,1153)=0 exch2_oj(3,1153)=0 exch2_neighbourId(4,1153)=1152 exch2_iLo(4,1153)=0 exch2_iHi(4,1153)=0 exch2_jLo(4,1153)=0 exch2_jHi(4,1153)=35 exch2_opposingSend(4,1153)=3 exch2_pij(1,4,1153)=1 exch2_pij(2,4,1153)=0 exch2_pij(3,4,1153)=0 exch2_pij(4,4,1153)=1 exch2_oi(4,1153)=0 exch2_oj(4,1153)=0 RETURN END SUBROUTINE W2_E2SETUP_1154 C Topology for tile 1154 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1154)=34 exch2_tNy(1154)=34 exch2_tBasex(1154)=442 exch2_tBasey(1154)=34 exch2_txGlobalo(1154)=2993 exch2_tyGlobalo(1154)=35 exch2_isWedge(1154)=0 exch2_isNedge(1154)=0 exch2_isEedge(1154)=0 exch2_isSedge(1154)=0 exch2_myFace(1154)=6 exch2_mydNx(1154)=510 exch2_mydNy(1154)=510 exch2_nNeighbours(1154)=4 exch2_neighbourId(1,1154)=1169 exch2_iLo(1,1154)=0 exch2_iHi(1,1154)=35 exch2_jLo(1,1154)=35 exch2_jHi(1,1154)=35 exch2_opposingSend(1,1154)=2 exch2_pij(1,1,1154)=1 exch2_pij(2,1,1154)=0 exch2_pij(3,1,1154)=0 exch2_pij(4,1,1154)=1 exch2_oi(1,1154)=0 exch2_oj(1,1154)=0 exch2_neighbourId(2,1154)=1139 exch2_iLo(2,1154)=0 exch2_iHi(2,1154)=35 exch2_jLo(2,1154)=0 exch2_jHi(2,1154)=0 exch2_opposingSend(2,1154)=1 exch2_pij(1,2,1154)=1 exch2_pij(2,2,1154)=0 exch2_pij(3,2,1154)=0 exch2_pij(4,2,1154)=1 exch2_oi(2,1154)=0 exch2_oj(2,1154)=0 exch2_neighbourId(3,1154)=1155 exch2_iLo(3,1154)=35 exch2_iHi(3,1154)=35 exch2_jLo(3,1154)=0 exch2_jHi(3,1154)=35 exch2_opposingSend(3,1154)=4 exch2_pij(1,3,1154)=1 exch2_pij(2,3,1154)=0 exch2_pij(3,3,1154)=0 exch2_pij(4,3,1154)=1 exch2_oi(3,1154)=0 exch2_oj(3,1154)=0 exch2_neighbourId(4,1154)=1153 exch2_iLo(4,1154)=0 exch2_iHi(4,1154)=0 exch2_jLo(4,1154)=0 exch2_jHi(4,1154)=35 exch2_opposingSend(4,1154)=3 exch2_pij(1,4,1154)=1 exch2_pij(2,4,1154)=0 exch2_pij(3,4,1154)=0 exch2_pij(4,4,1154)=1 exch2_oi(4,1154)=0 exch2_oj(4,1154)=0 RETURN END SUBROUTINE W2_E2SETUP_1155 C Topology for tile 1155 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1155)=34 exch2_tNy(1155)=34 exch2_tBasex(1155)=476 exch2_tBasey(1155)=34 exch2_txGlobalo(1155)=3027 exch2_tyGlobalo(1155)=35 exch2_isWedge(1155)=0 exch2_isNedge(1155)=0 exch2_isEedge(1155)=1 exch2_isSedge(1155)=0 exch2_myFace(1155)=6 exch2_mydNx(1155)=510 exch2_mydNy(1155)=510 exch2_nNeighbours(1155)=4 exch2_neighbourId(1,1155)=1170 exch2_iLo(1,1155)=0 exch2_iHi(1,1155)=35 exch2_jLo(1,1155)=35 exch2_jHi(1,1155)=35 exch2_opposingSend(1,1155)=2 exch2_pij(1,1,1155)=1 exch2_pij(2,1,1155)=0 exch2_pij(3,1,1155)=0 exch2_pij(4,1,1155)=1 exch2_oi(1,1155)=0 exch2_oj(1,1155)=0 exch2_neighbourId(2,1155)=1140 exch2_iLo(2,1155)=0 exch2_iHi(2,1155)=35 exch2_jLo(2,1155)=0 exch2_jHi(2,1155)=0 exch2_opposingSend(2,1155)=1 exch2_pij(1,2,1155)=1 exch2_pij(2,2,1155)=0 exch2_pij(3,2,1155)=0 exch2_pij(4,2,1155)=1 exch2_oi(2,1155)=0 exch2_oj(2,1155)=0 exch2_neighbourId(3,1155)=239 exch2_iLo(3,1155)=35 exch2_iHi(3,1155)=35 exch2_jLo(3,1155)=0 exch2_jHi(3,1155)=35 exch2_opposingSend(3,1155)=2 exch2_pij(1,3,1155)=0 exch2_pij(2,3,1155)=1 exch2_pij(3,3,1155)=-1 exch2_pij(4,3,1155)=0 exch2_oi(3,1155)=510 exch2_oj(3,1155)=511 exch2_neighbourId(4,1155)=1154 exch2_iLo(4,1155)=0 exch2_iHi(4,1155)=0 exch2_jLo(4,1155)=0 exch2_jHi(4,1155)=35 exch2_opposingSend(4,1155)=3 exch2_pij(1,4,1155)=1 exch2_pij(2,4,1155)=0 exch2_pij(3,4,1155)=0 exch2_pij(4,4,1155)=1 exch2_oi(4,1155)=0 exch2_oj(4,1155)=0 RETURN END SUBROUTINE W2_E2SETUP_1156 C Topology for tile 1156 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1156)=34 exch2_tNy(1156)=34 exch2_tBasex(1156)=0 exch2_tBasey(1156)=68 exch2_txGlobalo(1156)=2551 exch2_tyGlobalo(1156)=69 exch2_isWedge(1156)=1 exch2_isNedge(1156)=0 exch2_isEedge(1156)=0 exch2_isSedge(1156)=0 exch2_myFace(1156)=6 exch2_mydNx(1156)=510 exch2_mydNy(1156)=510 exch2_nNeighbours(1156)=4 exch2_neighbourId(1,1156)=1171 exch2_iLo(1,1156)=0 exch2_iHi(1,1156)=35 exch2_jLo(1,1156)=35 exch2_jHi(1,1156)=35 exch2_opposingSend(1,1156)=2 exch2_pij(1,1,1156)=1 exch2_pij(2,1,1156)=0 exch2_pij(3,1,1156)=0 exch2_pij(4,1,1156)=1 exch2_oi(1,1156)=0 exch2_oj(1,1156)=0 exch2_neighbourId(2,1156)=1141 exch2_iLo(2,1156)=0 exch2_iHi(2,1156)=35 exch2_jLo(2,1156)=0 exch2_jHi(2,1156)=0 exch2_opposingSend(2,1156)=1 exch2_pij(1,2,1156)=1 exch2_pij(2,2,1156)=0 exch2_pij(3,2,1156)=0 exch2_pij(4,2,1156)=1 exch2_oi(2,1156)=0 exch2_oj(2,1156)=0 exch2_neighbourId(3,1156)=1157 exch2_iLo(3,1156)=35 exch2_iHi(3,1156)=35 exch2_jLo(3,1156)=0 exch2_jHi(3,1156)=35 exch2_opposingSend(3,1156)=4 exch2_pij(1,3,1156)=1 exch2_pij(2,3,1156)=0 exch2_pij(3,3,1156)=0 exch2_pij(4,3,1156)=1 exch2_oi(3,1156)=0 exch2_oj(3,1156)=0 exch2_neighbourId(4,1156)=945 exch2_iLo(4,1156)=0 exch2_iHi(4,1156)=0 exch2_jLo(4,1156)=0 exch2_jHi(4,1156)=35 exch2_opposingSend(4,1156)=3 exch2_pij(1,4,1156)=1 exch2_pij(2,4,1156)=0 exch2_pij(3,4,1156)=0 exch2_pij(4,4,1156)=1 exch2_oi(4,1156)=-510 exch2_oj(4,1156)=0 RETURN END SUBROUTINE W2_E2SETUP_1157 C Topology for tile 1157 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1157)=34 exch2_tNy(1157)=34 exch2_tBasex(1157)=34 exch2_tBasey(1157)=68 exch2_txGlobalo(1157)=2585 exch2_tyGlobalo(1157)=69 exch2_isWedge(1157)=0 exch2_isNedge(1157)=0 exch2_isEedge(1157)=0 exch2_isSedge(1157)=0 exch2_myFace(1157)=6 exch2_mydNx(1157)=510 exch2_mydNy(1157)=510 exch2_nNeighbours(1157)=4 exch2_neighbourId(1,1157)=1172 exch2_iLo(1,1157)=0 exch2_iHi(1,1157)=35 exch2_jLo(1,1157)=35 exch2_jHi(1,1157)=35 exch2_opposingSend(1,1157)=2 exch2_pij(1,1,1157)=1 exch2_pij(2,1,1157)=0 exch2_pij(3,1,1157)=0 exch2_pij(4,1,1157)=1 exch2_oi(1,1157)=0 exch2_oj(1,1157)=0 exch2_neighbourId(2,1157)=1142 exch2_iLo(2,1157)=0 exch2_iHi(2,1157)=35 exch2_jLo(2,1157)=0 exch2_jHi(2,1157)=0 exch2_opposingSend(2,1157)=1 exch2_pij(1,2,1157)=1 exch2_pij(2,2,1157)=0 exch2_pij(3,2,1157)=0 exch2_pij(4,2,1157)=1 exch2_oi(2,1157)=0 exch2_oj(2,1157)=0 exch2_neighbourId(3,1157)=1158 exch2_iLo(3,1157)=35 exch2_iHi(3,1157)=35 exch2_jLo(3,1157)=0 exch2_jHi(3,1157)=35 exch2_opposingSend(3,1157)=4 exch2_pij(1,3,1157)=1 exch2_pij(2,3,1157)=0 exch2_pij(3,3,1157)=0 exch2_pij(4,3,1157)=1 exch2_oi(3,1157)=0 exch2_oj(3,1157)=0 exch2_neighbourId(4,1157)=1156 exch2_iLo(4,1157)=0 exch2_iHi(4,1157)=0 exch2_jLo(4,1157)=0 exch2_jHi(4,1157)=35 exch2_opposingSend(4,1157)=3 exch2_pij(1,4,1157)=1 exch2_pij(2,4,1157)=0 exch2_pij(3,4,1157)=0 exch2_pij(4,4,1157)=1 exch2_oi(4,1157)=0 exch2_oj(4,1157)=0 RETURN END SUBROUTINE W2_E2SETUP_1158 C Topology for tile 1158 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1158)=34 exch2_tNy(1158)=34 exch2_tBasex(1158)=68 exch2_tBasey(1158)=68 exch2_txGlobalo(1158)=2619 exch2_tyGlobalo(1158)=69 exch2_isWedge(1158)=0 exch2_isNedge(1158)=0 exch2_isEedge(1158)=0 exch2_isSedge(1158)=0 exch2_myFace(1158)=6 exch2_mydNx(1158)=510 exch2_mydNy(1158)=510 exch2_nNeighbours(1158)=4 exch2_neighbourId(1,1158)=1173 exch2_iLo(1,1158)=0 exch2_iHi(1,1158)=35 exch2_jLo(1,1158)=35 exch2_jHi(1,1158)=35 exch2_opposingSend(1,1158)=2 exch2_pij(1,1,1158)=1 exch2_pij(2,1,1158)=0 exch2_pij(3,1,1158)=0 exch2_pij(4,1,1158)=1 exch2_oi(1,1158)=0 exch2_oj(1,1158)=0 exch2_neighbourId(2,1158)=1143 exch2_iLo(2,1158)=0 exch2_iHi(2,1158)=35 exch2_jLo(2,1158)=0 exch2_jHi(2,1158)=0 exch2_opposingSend(2,1158)=1 exch2_pij(1,2,1158)=1 exch2_pij(2,2,1158)=0 exch2_pij(3,2,1158)=0 exch2_pij(4,2,1158)=1 exch2_oi(2,1158)=0 exch2_oj(2,1158)=0 exch2_neighbourId(3,1158)=1159 exch2_iLo(3,1158)=35 exch2_iHi(3,1158)=35 exch2_jLo(3,1158)=0 exch2_jHi(3,1158)=35 exch2_opposingSend(3,1158)=4 exch2_pij(1,3,1158)=1 exch2_pij(2,3,1158)=0 exch2_pij(3,3,1158)=0 exch2_pij(4,3,1158)=1 exch2_oi(3,1158)=0 exch2_oj(3,1158)=0 exch2_neighbourId(4,1158)=1157 exch2_iLo(4,1158)=0 exch2_iHi(4,1158)=0 exch2_jLo(4,1158)=0 exch2_jHi(4,1158)=35 exch2_opposingSend(4,1158)=3 exch2_pij(1,4,1158)=1 exch2_pij(2,4,1158)=0 exch2_pij(3,4,1158)=0 exch2_pij(4,4,1158)=1 exch2_oi(4,1158)=0 exch2_oj(4,1158)=0 RETURN END SUBROUTINE W2_E2SETUP_1159 C Topology for tile 1159 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1159)=34 exch2_tNy(1159)=34 exch2_tBasex(1159)=102 exch2_tBasey(1159)=68 exch2_txGlobalo(1159)=2653 exch2_tyGlobalo(1159)=69 exch2_isWedge(1159)=0 exch2_isNedge(1159)=0 exch2_isEedge(1159)=0 exch2_isSedge(1159)=0 exch2_myFace(1159)=6 exch2_mydNx(1159)=510 exch2_mydNy(1159)=510 exch2_nNeighbours(1159)=4 exch2_neighbourId(1,1159)=1174 exch2_iLo(1,1159)=0 exch2_iHi(1,1159)=35 exch2_jLo(1,1159)=35 exch2_jHi(1,1159)=35 exch2_opposingSend(1,1159)=2 exch2_pij(1,1,1159)=1 exch2_pij(2,1,1159)=0 exch2_pij(3,1,1159)=0 exch2_pij(4,1,1159)=1 exch2_oi(1,1159)=0 exch2_oj(1,1159)=0 exch2_neighbourId(2,1159)=1144 exch2_iLo(2,1159)=0 exch2_iHi(2,1159)=35 exch2_jLo(2,1159)=0 exch2_jHi(2,1159)=0 exch2_opposingSend(2,1159)=1 exch2_pij(1,2,1159)=1 exch2_pij(2,2,1159)=0 exch2_pij(3,2,1159)=0 exch2_pij(4,2,1159)=1 exch2_oi(2,1159)=0 exch2_oj(2,1159)=0 exch2_neighbourId(3,1159)=1160 exch2_iLo(3,1159)=35 exch2_iHi(3,1159)=35 exch2_jLo(3,1159)=0 exch2_jHi(3,1159)=35 exch2_opposingSend(3,1159)=4 exch2_pij(1,3,1159)=1 exch2_pij(2,3,1159)=0 exch2_pij(3,3,1159)=0 exch2_pij(4,3,1159)=1 exch2_oi(3,1159)=0 exch2_oj(3,1159)=0 exch2_neighbourId(4,1159)=1158 exch2_iLo(4,1159)=0 exch2_iHi(4,1159)=0 exch2_jLo(4,1159)=0 exch2_jHi(4,1159)=35 exch2_opposingSend(4,1159)=3 exch2_pij(1,4,1159)=1 exch2_pij(2,4,1159)=0 exch2_pij(3,4,1159)=0 exch2_pij(4,4,1159)=1 exch2_oi(4,1159)=0 exch2_oj(4,1159)=0 RETURN END SUBROUTINE W2_E2SETUP_1160 C Topology for tile 1160 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1160)=34 exch2_tNy(1160)=34 exch2_tBasex(1160)=136 exch2_tBasey(1160)=68 exch2_txGlobalo(1160)=2687 exch2_tyGlobalo(1160)=69 exch2_isWedge(1160)=0 exch2_isNedge(1160)=0 exch2_isEedge(1160)=0 exch2_isSedge(1160)=0 exch2_myFace(1160)=6 exch2_mydNx(1160)=510 exch2_mydNy(1160)=510 exch2_nNeighbours(1160)=4 exch2_neighbourId(1,1160)=1175 exch2_iLo(1,1160)=0 exch2_iHi(1,1160)=35 exch2_jLo(1,1160)=35 exch2_jHi(1,1160)=35 exch2_opposingSend(1,1160)=2 exch2_pij(1,1,1160)=1 exch2_pij(2,1,1160)=0 exch2_pij(3,1,1160)=0 exch2_pij(4,1,1160)=1 exch2_oi(1,1160)=0 exch2_oj(1,1160)=0 exch2_neighbourId(2,1160)=1145 exch2_iLo(2,1160)=0 exch2_iHi(2,1160)=35 exch2_jLo(2,1160)=0 exch2_jHi(2,1160)=0 exch2_opposingSend(2,1160)=1 exch2_pij(1,2,1160)=1 exch2_pij(2,2,1160)=0 exch2_pij(3,2,1160)=0 exch2_pij(4,2,1160)=1 exch2_oi(2,1160)=0 exch2_oj(2,1160)=0 exch2_neighbourId(3,1160)=1161 exch2_iLo(3,1160)=35 exch2_iHi(3,1160)=35 exch2_jLo(3,1160)=0 exch2_jHi(3,1160)=35 exch2_opposingSend(3,1160)=4 exch2_pij(1,3,1160)=1 exch2_pij(2,3,1160)=0 exch2_pij(3,3,1160)=0 exch2_pij(4,3,1160)=1 exch2_oi(3,1160)=0 exch2_oj(3,1160)=0 exch2_neighbourId(4,1160)=1159 exch2_iLo(4,1160)=0 exch2_iHi(4,1160)=0 exch2_jLo(4,1160)=0 exch2_jHi(4,1160)=35 exch2_opposingSend(4,1160)=3 exch2_pij(1,4,1160)=1 exch2_pij(2,4,1160)=0 exch2_pij(3,4,1160)=0 exch2_pij(4,4,1160)=1 exch2_oi(4,1160)=0 exch2_oj(4,1160)=0 RETURN END SUBROUTINE W2_E2SETUP_1161 C Topology for tile 1161 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1161)=34 exch2_tNy(1161)=34 exch2_tBasex(1161)=170 exch2_tBasey(1161)=68 exch2_txGlobalo(1161)=2721 exch2_tyGlobalo(1161)=69 exch2_isWedge(1161)=0 exch2_isNedge(1161)=0 exch2_isEedge(1161)=0 exch2_isSedge(1161)=0 exch2_myFace(1161)=6 exch2_mydNx(1161)=510 exch2_mydNy(1161)=510 exch2_nNeighbours(1161)=4 exch2_neighbourId(1,1161)=1176 exch2_iLo(1,1161)=0 exch2_iHi(1,1161)=35 exch2_jLo(1,1161)=35 exch2_jHi(1,1161)=35 exch2_opposingSend(1,1161)=2 exch2_pij(1,1,1161)=1 exch2_pij(2,1,1161)=0 exch2_pij(3,1,1161)=0 exch2_pij(4,1,1161)=1 exch2_oi(1,1161)=0 exch2_oj(1,1161)=0 exch2_neighbourId(2,1161)=1146 exch2_iLo(2,1161)=0 exch2_iHi(2,1161)=35 exch2_jLo(2,1161)=0 exch2_jHi(2,1161)=0 exch2_opposingSend(2,1161)=1 exch2_pij(1,2,1161)=1 exch2_pij(2,2,1161)=0 exch2_pij(3,2,1161)=0 exch2_pij(4,2,1161)=1 exch2_oi(2,1161)=0 exch2_oj(2,1161)=0 exch2_neighbourId(3,1161)=1162 exch2_iLo(3,1161)=35 exch2_iHi(3,1161)=35 exch2_jLo(3,1161)=0 exch2_jHi(3,1161)=35 exch2_opposingSend(3,1161)=4 exch2_pij(1,3,1161)=1 exch2_pij(2,3,1161)=0 exch2_pij(3,3,1161)=0 exch2_pij(4,3,1161)=1 exch2_oi(3,1161)=0 exch2_oj(3,1161)=0 exch2_neighbourId(4,1161)=1160 exch2_iLo(4,1161)=0 exch2_iHi(4,1161)=0 exch2_jLo(4,1161)=0 exch2_jHi(4,1161)=35 exch2_opposingSend(4,1161)=3 exch2_pij(1,4,1161)=1 exch2_pij(2,4,1161)=0 exch2_pij(3,4,1161)=0 exch2_pij(4,4,1161)=1 exch2_oi(4,1161)=0 exch2_oj(4,1161)=0 RETURN END SUBROUTINE W2_E2SETUP_1162 C Topology for tile 1162 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1162)=34 exch2_tNy(1162)=34 exch2_tBasex(1162)=204 exch2_tBasey(1162)=68 exch2_txGlobalo(1162)=2755 exch2_tyGlobalo(1162)=69 exch2_isWedge(1162)=0 exch2_isNedge(1162)=0 exch2_isEedge(1162)=0 exch2_isSedge(1162)=0 exch2_myFace(1162)=6 exch2_mydNx(1162)=510 exch2_mydNy(1162)=510 exch2_nNeighbours(1162)=4 exch2_neighbourId(1,1162)=1177 exch2_iLo(1,1162)=0 exch2_iHi(1,1162)=35 exch2_jLo(1,1162)=35 exch2_jHi(1,1162)=35 exch2_opposingSend(1,1162)=2 exch2_pij(1,1,1162)=1 exch2_pij(2,1,1162)=0 exch2_pij(3,1,1162)=0 exch2_pij(4,1,1162)=1 exch2_oi(1,1162)=0 exch2_oj(1,1162)=0 exch2_neighbourId(2,1162)=1147 exch2_iLo(2,1162)=0 exch2_iHi(2,1162)=35 exch2_jLo(2,1162)=0 exch2_jHi(2,1162)=0 exch2_opposingSend(2,1162)=1 exch2_pij(1,2,1162)=1 exch2_pij(2,2,1162)=0 exch2_pij(3,2,1162)=0 exch2_pij(4,2,1162)=1 exch2_oi(2,1162)=0 exch2_oj(2,1162)=0 exch2_neighbourId(3,1162)=1163 exch2_iLo(3,1162)=35 exch2_iHi(3,1162)=35 exch2_jLo(3,1162)=0 exch2_jHi(3,1162)=35 exch2_opposingSend(3,1162)=4 exch2_pij(1,3,1162)=1 exch2_pij(2,3,1162)=0 exch2_pij(3,3,1162)=0 exch2_pij(4,3,1162)=1 exch2_oi(3,1162)=0 exch2_oj(3,1162)=0 exch2_neighbourId(4,1162)=1161 exch2_iLo(4,1162)=0 exch2_iHi(4,1162)=0 exch2_jLo(4,1162)=0 exch2_jHi(4,1162)=35 exch2_opposingSend(4,1162)=3 exch2_pij(1,4,1162)=1 exch2_pij(2,4,1162)=0 exch2_pij(3,4,1162)=0 exch2_pij(4,4,1162)=1 exch2_oi(4,1162)=0 exch2_oj(4,1162)=0 RETURN END SUBROUTINE W2_E2SETUP_1163 C Topology for tile 1163 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1163)=34 exch2_tNy(1163)=34 exch2_tBasex(1163)=238 exch2_tBasey(1163)=68 exch2_txGlobalo(1163)=2789 exch2_tyGlobalo(1163)=69 exch2_isWedge(1163)=0 exch2_isNedge(1163)=0 exch2_isEedge(1163)=0 exch2_isSedge(1163)=0 exch2_myFace(1163)=6 exch2_mydNx(1163)=510 exch2_mydNy(1163)=510 exch2_nNeighbours(1163)=4 exch2_neighbourId(1,1163)=1178 exch2_iLo(1,1163)=0 exch2_iHi(1,1163)=35 exch2_jLo(1,1163)=35 exch2_jHi(1,1163)=35 exch2_opposingSend(1,1163)=2 exch2_pij(1,1,1163)=1 exch2_pij(2,1,1163)=0 exch2_pij(3,1,1163)=0 exch2_pij(4,1,1163)=1 exch2_oi(1,1163)=0 exch2_oj(1,1163)=0 exch2_neighbourId(2,1163)=1148 exch2_iLo(2,1163)=0 exch2_iHi(2,1163)=35 exch2_jLo(2,1163)=0 exch2_jHi(2,1163)=0 exch2_opposingSend(2,1163)=1 exch2_pij(1,2,1163)=1 exch2_pij(2,2,1163)=0 exch2_pij(3,2,1163)=0 exch2_pij(4,2,1163)=1 exch2_oi(2,1163)=0 exch2_oj(2,1163)=0 exch2_neighbourId(3,1163)=1164 exch2_iLo(3,1163)=35 exch2_iHi(3,1163)=35 exch2_jLo(3,1163)=0 exch2_jHi(3,1163)=35 exch2_opposingSend(3,1163)=4 exch2_pij(1,3,1163)=1 exch2_pij(2,3,1163)=0 exch2_pij(3,3,1163)=0 exch2_pij(4,3,1163)=1 exch2_oi(3,1163)=0 exch2_oj(3,1163)=0 exch2_neighbourId(4,1163)=1162 exch2_iLo(4,1163)=0 exch2_iHi(4,1163)=0 exch2_jLo(4,1163)=0 exch2_jHi(4,1163)=35 exch2_opposingSend(4,1163)=3 exch2_pij(1,4,1163)=1 exch2_pij(2,4,1163)=0 exch2_pij(3,4,1163)=0 exch2_pij(4,4,1163)=1 exch2_oi(4,1163)=0 exch2_oj(4,1163)=0 RETURN END SUBROUTINE W2_E2SETUP_1164 C Topology for tile 1164 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1164)=34 exch2_tNy(1164)=34 exch2_tBasex(1164)=272 exch2_tBasey(1164)=68 exch2_txGlobalo(1164)=2823 exch2_tyGlobalo(1164)=69 exch2_isWedge(1164)=0 exch2_isNedge(1164)=0 exch2_isEedge(1164)=0 exch2_isSedge(1164)=0 exch2_myFace(1164)=6 exch2_mydNx(1164)=510 exch2_mydNy(1164)=510 exch2_nNeighbours(1164)=4 exch2_neighbourId(1,1164)=1179 exch2_iLo(1,1164)=0 exch2_iHi(1,1164)=35 exch2_jLo(1,1164)=35 exch2_jHi(1,1164)=35 exch2_opposingSend(1,1164)=2 exch2_pij(1,1,1164)=1 exch2_pij(2,1,1164)=0 exch2_pij(3,1,1164)=0 exch2_pij(4,1,1164)=1 exch2_oi(1,1164)=0 exch2_oj(1,1164)=0 exch2_neighbourId(2,1164)=1149 exch2_iLo(2,1164)=0 exch2_iHi(2,1164)=35 exch2_jLo(2,1164)=0 exch2_jHi(2,1164)=0 exch2_opposingSend(2,1164)=1 exch2_pij(1,2,1164)=1 exch2_pij(2,2,1164)=0 exch2_pij(3,2,1164)=0 exch2_pij(4,2,1164)=1 exch2_oi(2,1164)=0 exch2_oj(2,1164)=0 exch2_neighbourId(3,1164)=1165 exch2_iLo(3,1164)=35 exch2_iHi(3,1164)=35 exch2_jLo(3,1164)=0 exch2_jHi(3,1164)=35 exch2_opposingSend(3,1164)=4 exch2_pij(1,3,1164)=1 exch2_pij(2,3,1164)=0 exch2_pij(3,3,1164)=0 exch2_pij(4,3,1164)=1 exch2_oi(3,1164)=0 exch2_oj(3,1164)=0 exch2_neighbourId(4,1164)=1163 exch2_iLo(4,1164)=0 exch2_iHi(4,1164)=0 exch2_jLo(4,1164)=0 exch2_jHi(4,1164)=35 exch2_opposingSend(4,1164)=3 exch2_pij(1,4,1164)=1 exch2_pij(2,4,1164)=0 exch2_pij(3,4,1164)=0 exch2_pij(4,4,1164)=1 exch2_oi(4,1164)=0 exch2_oj(4,1164)=0 RETURN END SUBROUTINE W2_E2SETUP_1165 C Topology for tile 1165 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1165)=34 exch2_tNy(1165)=34 exch2_tBasex(1165)=306 exch2_tBasey(1165)=68 exch2_txGlobalo(1165)=2857 exch2_tyGlobalo(1165)=69 exch2_isWedge(1165)=0 exch2_isNedge(1165)=0 exch2_isEedge(1165)=0 exch2_isSedge(1165)=0 exch2_myFace(1165)=6 exch2_mydNx(1165)=510 exch2_mydNy(1165)=510 exch2_nNeighbours(1165)=4 exch2_neighbourId(1,1165)=1180 exch2_iLo(1,1165)=0 exch2_iHi(1,1165)=35 exch2_jLo(1,1165)=35 exch2_jHi(1,1165)=35 exch2_opposingSend(1,1165)=2 exch2_pij(1,1,1165)=1 exch2_pij(2,1,1165)=0 exch2_pij(3,1,1165)=0 exch2_pij(4,1,1165)=1 exch2_oi(1,1165)=0 exch2_oj(1,1165)=0 exch2_neighbourId(2,1165)=1150 exch2_iLo(2,1165)=0 exch2_iHi(2,1165)=35 exch2_jLo(2,1165)=0 exch2_jHi(2,1165)=0 exch2_opposingSend(2,1165)=1 exch2_pij(1,2,1165)=1 exch2_pij(2,2,1165)=0 exch2_pij(3,2,1165)=0 exch2_pij(4,2,1165)=1 exch2_oi(2,1165)=0 exch2_oj(2,1165)=0 exch2_neighbourId(3,1165)=1166 exch2_iLo(3,1165)=35 exch2_iHi(3,1165)=35 exch2_jLo(3,1165)=0 exch2_jHi(3,1165)=35 exch2_opposingSend(3,1165)=4 exch2_pij(1,3,1165)=1 exch2_pij(2,3,1165)=0 exch2_pij(3,3,1165)=0 exch2_pij(4,3,1165)=1 exch2_oi(3,1165)=0 exch2_oj(3,1165)=0 exch2_neighbourId(4,1165)=1164 exch2_iLo(4,1165)=0 exch2_iHi(4,1165)=0 exch2_jLo(4,1165)=0 exch2_jHi(4,1165)=35 exch2_opposingSend(4,1165)=3 exch2_pij(1,4,1165)=1 exch2_pij(2,4,1165)=0 exch2_pij(3,4,1165)=0 exch2_pij(4,4,1165)=1 exch2_oi(4,1165)=0 exch2_oj(4,1165)=0 RETURN END SUBROUTINE W2_E2SETUP_1166 C Topology for tile 1166 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1166)=34 exch2_tNy(1166)=34 exch2_tBasex(1166)=340 exch2_tBasey(1166)=68 exch2_txGlobalo(1166)=2891 exch2_tyGlobalo(1166)=69 exch2_isWedge(1166)=0 exch2_isNedge(1166)=0 exch2_isEedge(1166)=0 exch2_isSedge(1166)=0 exch2_myFace(1166)=6 exch2_mydNx(1166)=510 exch2_mydNy(1166)=510 exch2_nNeighbours(1166)=4 exch2_neighbourId(1,1166)=1181 exch2_iLo(1,1166)=0 exch2_iHi(1,1166)=35 exch2_jLo(1,1166)=35 exch2_jHi(1,1166)=35 exch2_opposingSend(1,1166)=2 exch2_pij(1,1,1166)=1 exch2_pij(2,1,1166)=0 exch2_pij(3,1,1166)=0 exch2_pij(4,1,1166)=1 exch2_oi(1,1166)=0 exch2_oj(1,1166)=0 exch2_neighbourId(2,1166)=1151 exch2_iLo(2,1166)=0 exch2_iHi(2,1166)=35 exch2_jLo(2,1166)=0 exch2_jHi(2,1166)=0 exch2_opposingSend(2,1166)=1 exch2_pij(1,2,1166)=1 exch2_pij(2,2,1166)=0 exch2_pij(3,2,1166)=0 exch2_pij(4,2,1166)=1 exch2_oi(2,1166)=0 exch2_oj(2,1166)=0 exch2_neighbourId(3,1166)=1167 exch2_iLo(3,1166)=35 exch2_iHi(3,1166)=35 exch2_jLo(3,1166)=0 exch2_jHi(3,1166)=35 exch2_opposingSend(3,1166)=4 exch2_pij(1,3,1166)=1 exch2_pij(2,3,1166)=0 exch2_pij(3,3,1166)=0 exch2_pij(4,3,1166)=1 exch2_oi(3,1166)=0 exch2_oj(3,1166)=0 exch2_neighbourId(4,1166)=1165 exch2_iLo(4,1166)=0 exch2_iHi(4,1166)=0 exch2_jLo(4,1166)=0 exch2_jHi(4,1166)=35 exch2_opposingSend(4,1166)=3 exch2_pij(1,4,1166)=1 exch2_pij(2,4,1166)=0 exch2_pij(3,4,1166)=0 exch2_pij(4,4,1166)=1 exch2_oi(4,1166)=0 exch2_oj(4,1166)=0 RETURN END SUBROUTINE W2_E2SETUP_1167 C Topology for tile 1167 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1167)=34 exch2_tNy(1167)=34 exch2_tBasex(1167)=374 exch2_tBasey(1167)=68 exch2_txGlobalo(1167)=2925 exch2_tyGlobalo(1167)=69 exch2_isWedge(1167)=0 exch2_isNedge(1167)=0 exch2_isEedge(1167)=0 exch2_isSedge(1167)=0 exch2_myFace(1167)=6 exch2_mydNx(1167)=510 exch2_mydNy(1167)=510 exch2_nNeighbours(1167)=4 exch2_neighbourId(1,1167)=1182 exch2_iLo(1,1167)=0 exch2_iHi(1,1167)=35 exch2_jLo(1,1167)=35 exch2_jHi(1,1167)=35 exch2_opposingSend(1,1167)=2 exch2_pij(1,1,1167)=1 exch2_pij(2,1,1167)=0 exch2_pij(3,1,1167)=0 exch2_pij(4,1,1167)=1 exch2_oi(1,1167)=0 exch2_oj(1,1167)=0 exch2_neighbourId(2,1167)=1152 exch2_iLo(2,1167)=0 exch2_iHi(2,1167)=35 exch2_jLo(2,1167)=0 exch2_jHi(2,1167)=0 exch2_opposingSend(2,1167)=1 exch2_pij(1,2,1167)=1 exch2_pij(2,2,1167)=0 exch2_pij(3,2,1167)=0 exch2_pij(4,2,1167)=1 exch2_oi(2,1167)=0 exch2_oj(2,1167)=0 exch2_neighbourId(3,1167)=1168 exch2_iLo(3,1167)=35 exch2_iHi(3,1167)=35 exch2_jLo(3,1167)=0 exch2_jHi(3,1167)=35 exch2_opposingSend(3,1167)=4 exch2_pij(1,3,1167)=1 exch2_pij(2,3,1167)=0 exch2_pij(3,3,1167)=0 exch2_pij(4,3,1167)=1 exch2_oi(3,1167)=0 exch2_oj(3,1167)=0 exch2_neighbourId(4,1167)=1166 exch2_iLo(4,1167)=0 exch2_iHi(4,1167)=0 exch2_jLo(4,1167)=0 exch2_jHi(4,1167)=35 exch2_opposingSend(4,1167)=3 exch2_pij(1,4,1167)=1 exch2_pij(2,4,1167)=0 exch2_pij(3,4,1167)=0 exch2_pij(4,4,1167)=1 exch2_oi(4,1167)=0 exch2_oj(4,1167)=0 RETURN END SUBROUTINE W2_E2SETUP_1168 C Topology for tile 1168 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1168)=34 exch2_tNy(1168)=34 exch2_tBasex(1168)=408 exch2_tBasey(1168)=68 exch2_txGlobalo(1168)=2959 exch2_tyGlobalo(1168)=69 exch2_isWedge(1168)=0 exch2_isNedge(1168)=0 exch2_isEedge(1168)=0 exch2_isSedge(1168)=0 exch2_myFace(1168)=6 exch2_mydNx(1168)=510 exch2_mydNy(1168)=510 exch2_nNeighbours(1168)=4 exch2_neighbourId(1,1168)=1183 exch2_iLo(1,1168)=0 exch2_iHi(1,1168)=35 exch2_jLo(1,1168)=35 exch2_jHi(1,1168)=35 exch2_opposingSend(1,1168)=2 exch2_pij(1,1,1168)=1 exch2_pij(2,1,1168)=0 exch2_pij(3,1,1168)=0 exch2_pij(4,1,1168)=1 exch2_oi(1,1168)=0 exch2_oj(1,1168)=0 exch2_neighbourId(2,1168)=1153 exch2_iLo(2,1168)=0 exch2_iHi(2,1168)=35 exch2_jLo(2,1168)=0 exch2_jHi(2,1168)=0 exch2_opposingSend(2,1168)=1 exch2_pij(1,2,1168)=1 exch2_pij(2,2,1168)=0 exch2_pij(3,2,1168)=0 exch2_pij(4,2,1168)=1 exch2_oi(2,1168)=0 exch2_oj(2,1168)=0 exch2_neighbourId(3,1168)=1169 exch2_iLo(3,1168)=35 exch2_iHi(3,1168)=35 exch2_jLo(3,1168)=0 exch2_jHi(3,1168)=35 exch2_opposingSend(3,1168)=4 exch2_pij(1,3,1168)=1 exch2_pij(2,3,1168)=0 exch2_pij(3,3,1168)=0 exch2_pij(4,3,1168)=1 exch2_oi(3,1168)=0 exch2_oj(3,1168)=0 exch2_neighbourId(4,1168)=1167 exch2_iLo(4,1168)=0 exch2_iHi(4,1168)=0 exch2_jLo(4,1168)=0 exch2_jHi(4,1168)=35 exch2_opposingSend(4,1168)=3 exch2_pij(1,4,1168)=1 exch2_pij(2,4,1168)=0 exch2_pij(3,4,1168)=0 exch2_pij(4,4,1168)=1 exch2_oi(4,1168)=0 exch2_oj(4,1168)=0 RETURN END SUBROUTINE W2_E2SETUP_1169 C Topology for tile 1169 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1169)=34 exch2_tNy(1169)=34 exch2_tBasex(1169)=442 exch2_tBasey(1169)=68 exch2_txGlobalo(1169)=2993 exch2_tyGlobalo(1169)=69 exch2_isWedge(1169)=0 exch2_isNedge(1169)=0 exch2_isEedge(1169)=0 exch2_isSedge(1169)=0 exch2_myFace(1169)=6 exch2_mydNx(1169)=510 exch2_mydNy(1169)=510 exch2_nNeighbours(1169)=4 exch2_neighbourId(1,1169)=1184 exch2_iLo(1,1169)=0 exch2_iHi(1,1169)=35 exch2_jLo(1,1169)=35 exch2_jHi(1,1169)=35 exch2_opposingSend(1,1169)=2 exch2_pij(1,1,1169)=1 exch2_pij(2,1,1169)=0 exch2_pij(3,1,1169)=0 exch2_pij(4,1,1169)=1 exch2_oi(1,1169)=0 exch2_oj(1,1169)=0 exch2_neighbourId(2,1169)=1154 exch2_iLo(2,1169)=0 exch2_iHi(2,1169)=35 exch2_jLo(2,1169)=0 exch2_jHi(2,1169)=0 exch2_opposingSend(2,1169)=1 exch2_pij(1,2,1169)=1 exch2_pij(2,2,1169)=0 exch2_pij(3,2,1169)=0 exch2_pij(4,2,1169)=1 exch2_oi(2,1169)=0 exch2_oj(2,1169)=0 exch2_neighbourId(3,1169)=1170 exch2_iLo(3,1169)=35 exch2_iHi(3,1169)=35 exch2_jLo(3,1169)=0 exch2_jHi(3,1169)=35 exch2_opposingSend(3,1169)=4 exch2_pij(1,3,1169)=1 exch2_pij(2,3,1169)=0 exch2_pij(3,3,1169)=0 exch2_pij(4,3,1169)=1 exch2_oi(3,1169)=0 exch2_oj(3,1169)=0 exch2_neighbourId(4,1169)=1168 exch2_iLo(4,1169)=0 exch2_iHi(4,1169)=0 exch2_jLo(4,1169)=0 exch2_jHi(4,1169)=35 exch2_opposingSend(4,1169)=3 exch2_pij(1,4,1169)=1 exch2_pij(2,4,1169)=0 exch2_pij(3,4,1169)=0 exch2_pij(4,4,1169)=1 exch2_oi(4,1169)=0 exch2_oj(4,1169)=0 RETURN END SUBROUTINE W2_E2SETUP_1170 C Topology for tile 1170 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1170)=34 exch2_tNy(1170)=34 exch2_tBasex(1170)=476 exch2_tBasey(1170)=68 exch2_txGlobalo(1170)=3027 exch2_tyGlobalo(1170)=69 exch2_isWedge(1170)=0 exch2_isNedge(1170)=0 exch2_isEedge(1170)=1 exch2_isSedge(1170)=0 exch2_myFace(1170)=6 exch2_mydNx(1170)=510 exch2_mydNy(1170)=510 exch2_nNeighbours(1170)=4 exch2_neighbourId(1,1170)=1185 exch2_iLo(1,1170)=0 exch2_iHi(1,1170)=35 exch2_jLo(1,1170)=35 exch2_jHi(1,1170)=35 exch2_opposingSend(1,1170)=2 exch2_pij(1,1,1170)=1 exch2_pij(2,1,1170)=0 exch2_pij(3,1,1170)=0 exch2_pij(4,1,1170)=1 exch2_oi(1,1170)=0 exch2_oj(1,1170)=0 exch2_neighbourId(2,1170)=1155 exch2_iLo(2,1170)=0 exch2_iHi(2,1170)=35 exch2_jLo(2,1170)=0 exch2_jHi(2,1170)=0 exch2_opposingSend(2,1170)=1 exch2_pij(1,2,1170)=1 exch2_pij(2,2,1170)=0 exch2_pij(3,2,1170)=0 exch2_pij(4,2,1170)=1 exch2_oi(2,1170)=0 exch2_oj(2,1170)=0 exch2_neighbourId(3,1170)=238 exch2_iLo(3,1170)=35 exch2_iHi(3,1170)=35 exch2_jLo(3,1170)=0 exch2_jHi(3,1170)=35 exch2_opposingSend(3,1170)=2 exch2_pij(1,3,1170)=0 exch2_pij(2,3,1170)=1 exch2_pij(3,3,1170)=-1 exch2_pij(4,3,1170)=0 exch2_oi(3,1170)=510 exch2_oj(3,1170)=511 exch2_neighbourId(4,1170)=1169 exch2_iLo(4,1170)=0 exch2_iHi(4,1170)=0 exch2_jLo(4,1170)=0 exch2_jHi(4,1170)=35 exch2_opposingSend(4,1170)=3 exch2_pij(1,4,1170)=1 exch2_pij(2,4,1170)=0 exch2_pij(3,4,1170)=0 exch2_pij(4,4,1170)=1 exch2_oi(4,1170)=0 exch2_oj(4,1170)=0 RETURN END SUBROUTINE W2_E2SETUP_1171 C Topology for tile 1171 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1171)=34 exch2_tNy(1171)=34 exch2_tBasex(1171)=0 exch2_tBasey(1171)=102 exch2_txGlobalo(1171)=2551 exch2_tyGlobalo(1171)=103 exch2_isWedge(1171)=1 exch2_isNedge(1171)=0 exch2_isEedge(1171)=0 exch2_isSedge(1171)=0 exch2_myFace(1171)=6 exch2_mydNx(1171)=510 exch2_mydNy(1171)=510 exch2_nNeighbours(1171)=4 exch2_neighbourId(1,1171)=1186 exch2_iLo(1,1171)=0 exch2_iHi(1,1171)=35 exch2_jLo(1,1171)=35 exch2_jHi(1,1171)=35 exch2_opposingSend(1,1171)=2 exch2_pij(1,1,1171)=1 exch2_pij(2,1,1171)=0 exch2_pij(3,1,1171)=0 exch2_pij(4,1,1171)=1 exch2_oi(1,1171)=0 exch2_oj(1,1171)=0 exch2_neighbourId(2,1171)=1156 exch2_iLo(2,1171)=0 exch2_iHi(2,1171)=35 exch2_jLo(2,1171)=0 exch2_jHi(2,1171)=0 exch2_opposingSend(2,1171)=1 exch2_pij(1,2,1171)=1 exch2_pij(2,2,1171)=0 exch2_pij(3,2,1171)=0 exch2_pij(4,2,1171)=1 exch2_oi(2,1171)=0 exch2_oj(2,1171)=0 exch2_neighbourId(3,1171)=1172 exch2_iLo(3,1171)=35 exch2_iHi(3,1171)=35 exch2_jLo(3,1171)=0 exch2_jHi(3,1171)=35 exch2_opposingSend(3,1171)=4 exch2_pij(1,3,1171)=1 exch2_pij(2,3,1171)=0 exch2_pij(3,3,1171)=0 exch2_pij(4,3,1171)=1 exch2_oi(3,1171)=0 exch2_oj(3,1171)=0 exch2_neighbourId(4,1171)=960 exch2_iLo(4,1171)=0 exch2_iHi(4,1171)=0 exch2_jLo(4,1171)=0 exch2_jHi(4,1171)=35 exch2_opposingSend(4,1171)=3 exch2_pij(1,4,1171)=1 exch2_pij(2,4,1171)=0 exch2_pij(3,4,1171)=0 exch2_pij(4,4,1171)=1 exch2_oi(4,1171)=-510 exch2_oj(4,1171)=0 RETURN END SUBROUTINE W2_E2SETUP_1172 C Topology for tile 1172 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1172)=34 exch2_tNy(1172)=34 exch2_tBasex(1172)=34 exch2_tBasey(1172)=102 exch2_txGlobalo(1172)=2585 exch2_tyGlobalo(1172)=103 exch2_isWedge(1172)=0 exch2_isNedge(1172)=0 exch2_isEedge(1172)=0 exch2_isSedge(1172)=0 exch2_myFace(1172)=6 exch2_mydNx(1172)=510 exch2_mydNy(1172)=510 exch2_nNeighbours(1172)=4 exch2_neighbourId(1,1172)=1187 exch2_iLo(1,1172)=0 exch2_iHi(1,1172)=35 exch2_jLo(1,1172)=35 exch2_jHi(1,1172)=35 exch2_opposingSend(1,1172)=2 exch2_pij(1,1,1172)=1 exch2_pij(2,1,1172)=0 exch2_pij(3,1,1172)=0 exch2_pij(4,1,1172)=1 exch2_oi(1,1172)=0 exch2_oj(1,1172)=0 exch2_neighbourId(2,1172)=1157 exch2_iLo(2,1172)=0 exch2_iHi(2,1172)=35 exch2_jLo(2,1172)=0 exch2_jHi(2,1172)=0 exch2_opposingSend(2,1172)=1 exch2_pij(1,2,1172)=1 exch2_pij(2,2,1172)=0 exch2_pij(3,2,1172)=0 exch2_pij(4,2,1172)=1 exch2_oi(2,1172)=0 exch2_oj(2,1172)=0 exch2_neighbourId(3,1172)=1173 exch2_iLo(3,1172)=35 exch2_iHi(3,1172)=35 exch2_jLo(3,1172)=0 exch2_jHi(3,1172)=35 exch2_opposingSend(3,1172)=4 exch2_pij(1,3,1172)=1 exch2_pij(2,3,1172)=0 exch2_pij(3,3,1172)=0 exch2_pij(4,3,1172)=1 exch2_oi(3,1172)=0 exch2_oj(3,1172)=0 exch2_neighbourId(4,1172)=1171 exch2_iLo(4,1172)=0 exch2_iHi(4,1172)=0 exch2_jLo(4,1172)=0 exch2_jHi(4,1172)=35 exch2_opposingSend(4,1172)=3 exch2_pij(1,4,1172)=1 exch2_pij(2,4,1172)=0 exch2_pij(3,4,1172)=0 exch2_pij(4,4,1172)=1 exch2_oi(4,1172)=0 exch2_oj(4,1172)=0 RETURN END SUBROUTINE W2_E2SETUP_1173 C Topology for tile 1173 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1173)=34 exch2_tNy(1173)=34 exch2_tBasex(1173)=68 exch2_tBasey(1173)=102 exch2_txGlobalo(1173)=2619 exch2_tyGlobalo(1173)=103 exch2_isWedge(1173)=0 exch2_isNedge(1173)=0 exch2_isEedge(1173)=0 exch2_isSedge(1173)=0 exch2_myFace(1173)=6 exch2_mydNx(1173)=510 exch2_mydNy(1173)=510 exch2_nNeighbours(1173)=4 exch2_neighbourId(1,1173)=1188 exch2_iLo(1,1173)=0 exch2_iHi(1,1173)=35 exch2_jLo(1,1173)=35 exch2_jHi(1,1173)=35 exch2_opposingSend(1,1173)=2 exch2_pij(1,1,1173)=1 exch2_pij(2,1,1173)=0 exch2_pij(3,1,1173)=0 exch2_pij(4,1,1173)=1 exch2_oi(1,1173)=0 exch2_oj(1,1173)=0 exch2_neighbourId(2,1173)=1158 exch2_iLo(2,1173)=0 exch2_iHi(2,1173)=35 exch2_jLo(2,1173)=0 exch2_jHi(2,1173)=0 exch2_opposingSend(2,1173)=1 exch2_pij(1,2,1173)=1 exch2_pij(2,2,1173)=0 exch2_pij(3,2,1173)=0 exch2_pij(4,2,1173)=1 exch2_oi(2,1173)=0 exch2_oj(2,1173)=0 exch2_neighbourId(3,1173)=1174 exch2_iLo(3,1173)=35 exch2_iHi(3,1173)=35 exch2_jLo(3,1173)=0 exch2_jHi(3,1173)=35 exch2_opposingSend(3,1173)=4 exch2_pij(1,3,1173)=1 exch2_pij(2,3,1173)=0 exch2_pij(3,3,1173)=0 exch2_pij(4,3,1173)=1 exch2_oi(3,1173)=0 exch2_oj(3,1173)=0 exch2_neighbourId(4,1173)=1172 exch2_iLo(4,1173)=0 exch2_iHi(4,1173)=0 exch2_jLo(4,1173)=0 exch2_jHi(4,1173)=35 exch2_opposingSend(4,1173)=3 exch2_pij(1,4,1173)=1 exch2_pij(2,4,1173)=0 exch2_pij(3,4,1173)=0 exch2_pij(4,4,1173)=1 exch2_oi(4,1173)=0 exch2_oj(4,1173)=0 RETURN END SUBROUTINE W2_E2SETUP_1174 C Topology for tile 1174 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1174)=34 exch2_tNy(1174)=34 exch2_tBasex(1174)=102 exch2_tBasey(1174)=102 exch2_txGlobalo(1174)=2653 exch2_tyGlobalo(1174)=103 exch2_isWedge(1174)=0 exch2_isNedge(1174)=0 exch2_isEedge(1174)=0 exch2_isSedge(1174)=0 exch2_myFace(1174)=6 exch2_mydNx(1174)=510 exch2_mydNy(1174)=510 exch2_nNeighbours(1174)=4 exch2_neighbourId(1,1174)=1189 exch2_iLo(1,1174)=0 exch2_iHi(1,1174)=35 exch2_jLo(1,1174)=35 exch2_jHi(1,1174)=35 exch2_opposingSend(1,1174)=2 exch2_pij(1,1,1174)=1 exch2_pij(2,1,1174)=0 exch2_pij(3,1,1174)=0 exch2_pij(4,1,1174)=1 exch2_oi(1,1174)=0 exch2_oj(1,1174)=0 exch2_neighbourId(2,1174)=1159 exch2_iLo(2,1174)=0 exch2_iHi(2,1174)=35 exch2_jLo(2,1174)=0 exch2_jHi(2,1174)=0 exch2_opposingSend(2,1174)=1 exch2_pij(1,2,1174)=1 exch2_pij(2,2,1174)=0 exch2_pij(3,2,1174)=0 exch2_pij(4,2,1174)=1 exch2_oi(2,1174)=0 exch2_oj(2,1174)=0 exch2_neighbourId(3,1174)=1175 exch2_iLo(3,1174)=35 exch2_iHi(3,1174)=35 exch2_jLo(3,1174)=0 exch2_jHi(3,1174)=35 exch2_opposingSend(3,1174)=4 exch2_pij(1,3,1174)=1 exch2_pij(2,3,1174)=0 exch2_pij(3,3,1174)=0 exch2_pij(4,3,1174)=1 exch2_oi(3,1174)=0 exch2_oj(3,1174)=0 exch2_neighbourId(4,1174)=1173 exch2_iLo(4,1174)=0 exch2_iHi(4,1174)=0 exch2_jLo(4,1174)=0 exch2_jHi(4,1174)=35 exch2_opposingSend(4,1174)=3 exch2_pij(1,4,1174)=1 exch2_pij(2,4,1174)=0 exch2_pij(3,4,1174)=0 exch2_pij(4,4,1174)=1 exch2_oi(4,1174)=0 exch2_oj(4,1174)=0 RETURN END SUBROUTINE W2_E2SETUP_1175 C Topology for tile 1175 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1175)=34 exch2_tNy(1175)=34 exch2_tBasex(1175)=136 exch2_tBasey(1175)=102 exch2_txGlobalo(1175)=2687 exch2_tyGlobalo(1175)=103 exch2_isWedge(1175)=0 exch2_isNedge(1175)=0 exch2_isEedge(1175)=0 exch2_isSedge(1175)=0 exch2_myFace(1175)=6 exch2_mydNx(1175)=510 exch2_mydNy(1175)=510 exch2_nNeighbours(1175)=4 exch2_neighbourId(1,1175)=1190 exch2_iLo(1,1175)=0 exch2_iHi(1,1175)=35 exch2_jLo(1,1175)=35 exch2_jHi(1,1175)=35 exch2_opposingSend(1,1175)=2 exch2_pij(1,1,1175)=1 exch2_pij(2,1,1175)=0 exch2_pij(3,1,1175)=0 exch2_pij(4,1,1175)=1 exch2_oi(1,1175)=0 exch2_oj(1,1175)=0 exch2_neighbourId(2,1175)=1160 exch2_iLo(2,1175)=0 exch2_iHi(2,1175)=35 exch2_jLo(2,1175)=0 exch2_jHi(2,1175)=0 exch2_opposingSend(2,1175)=1 exch2_pij(1,2,1175)=1 exch2_pij(2,2,1175)=0 exch2_pij(3,2,1175)=0 exch2_pij(4,2,1175)=1 exch2_oi(2,1175)=0 exch2_oj(2,1175)=0 exch2_neighbourId(3,1175)=1176 exch2_iLo(3,1175)=35 exch2_iHi(3,1175)=35 exch2_jLo(3,1175)=0 exch2_jHi(3,1175)=35 exch2_opposingSend(3,1175)=4 exch2_pij(1,3,1175)=1 exch2_pij(2,3,1175)=0 exch2_pij(3,3,1175)=0 exch2_pij(4,3,1175)=1 exch2_oi(3,1175)=0 exch2_oj(3,1175)=0 exch2_neighbourId(4,1175)=1174 exch2_iLo(4,1175)=0 exch2_iHi(4,1175)=0 exch2_jLo(4,1175)=0 exch2_jHi(4,1175)=35 exch2_opposingSend(4,1175)=3 exch2_pij(1,4,1175)=1 exch2_pij(2,4,1175)=0 exch2_pij(3,4,1175)=0 exch2_pij(4,4,1175)=1 exch2_oi(4,1175)=0 exch2_oj(4,1175)=0 RETURN END SUBROUTINE W2_E2SETUP_1176 C Topology for tile 1176 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1176)=34 exch2_tNy(1176)=34 exch2_tBasex(1176)=170 exch2_tBasey(1176)=102 exch2_txGlobalo(1176)=2721 exch2_tyGlobalo(1176)=103 exch2_isWedge(1176)=0 exch2_isNedge(1176)=0 exch2_isEedge(1176)=0 exch2_isSedge(1176)=0 exch2_myFace(1176)=6 exch2_mydNx(1176)=510 exch2_mydNy(1176)=510 exch2_nNeighbours(1176)=4 exch2_neighbourId(1,1176)=1191 exch2_iLo(1,1176)=0 exch2_iHi(1,1176)=35 exch2_jLo(1,1176)=35 exch2_jHi(1,1176)=35 exch2_opposingSend(1,1176)=2 exch2_pij(1,1,1176)=1 exch2_pij(2,1,1176)=0 exch2_pij(3,1,1176)=0 exch2_pij(4,1,1176)=1 exch2_oi(1,1176)=0 exch2_oj(1,1176)=0 exch2_neighbourId(2,1176)=1161 exch2_iLo(2,1176)=0 exch2_iHi(2,1176)=35 exch2_jLo(2,1176)=0 exch2_jHi(2,1176)=0 exch2_opposingSend(2,1176)=1 exch2_pij(1,2,1176)=1 exch2_pij(2,2,1176)=0 exch2_pij(3,2,1176)=0 exch2_pij(4,2,1176)=1 exch2_oi(2,1176)=0 exch2_oj(2,1176)=0 exch2_neighbourId(3,1176)=1177 exch2_iLo(3,1176)=35 exch2_iHi(3,1176)=35 exch2_jLo(3,1176)=0 exch2_jHi(3,1176)=35 exch2_opposingSend(3,1176)=4 exch2_pij(1,3,1176)=1 exch2_pij(2,3,1176)=0 exch2_pij(3,3,1176)=0 exch2_pij(4,3,1176)=1 exch2_oi(3,1176)=0 exch2_oj(3,1176)=0 exch2_neighbourId(4,1176)=1175 exch2_iLo(4,1176)=0 exch2_iHi(4,1176)=0 exch2_jLo(4,1176)=0 exch2_jHi(4,1176)=35 exch2_opposingSend(4,1176)=3 exch2_pij(1,4,1176)=1 exch2_pij(2,4,1176)=0 exch2_pij(3,4,1176)=0 exch2_pij(4,4,1176)=1 exch2_oi(4,1176)=0 exch2_oj(4,1176)=0 RETURN END SUBROUTINE W2_E2SETUP_1177 C Topology for tile 1177 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1177)=34 exch2_tNy(1177)=34 exch2_tBasex(1177)=204 exch2_tBasey(1177)=102 exch2_txGlobalo(1177)=2755 exch2_tyGlobalo(1177)=103 exch2_isWedge(1177)=0 exch2_isNedge(1177)=0 exch2_isEedge(1177)=0 exch2_isSedge(1177)=0 exch2_myFace(1177)=6 exch2_mydNx(1177)=510 exch2_mydNy(1177)=510 exch2_nNeighbours(1177)=4 exch2_neighbourId(1,1177)=1192 exch2_iLo(1,1177)=0 exch2_iHi(1,1177)=35 exch2_jLo(1,1177)=35 exch2_jHi(1,1177)=35 exch2_opposingSend(1,1177)=2 exch2_pij(1,1,1177)=1 exch2_pij(2,1,1177)=0 exch2_pij(3,1,1177)=0 exch2_pij(4,1,1177)=1 exch2_oi(1,1177)=0 exch2_oj(1,1177)=0 exch2_neighbourId(2,1177)=1162 exch2_iLo(2,1177)=0 exch2_iHi(2,1177)=35 exch2_jLo(2,1177)=0 exch2_jHi(2,1177)=0 exch2_opposingSend(2,1177)=1 exch2_pij(1,2,1177)=1 exch2_pij(2,2,1177)=0 exch2_pij(3,2,1177)=0 exch2_pij(4,2,1177)=1 exch2_oi(2,1177)=0 exch2_oj(2,1177)=0 exch2_neighbourId(3,1177)=1178 exch2_iLo(3,1177)=35 exch2_iHi(3,1177)=35 exch2_jLo(3,1177)=0 exch2_jHi(3,1177)=35 exch2_opposingSend(3,1177)=4 exch2_pij(1,3,1177)=1 exch2_pij(2,3,1177)=0 exch2_pij(3,3,1177)=0 exch2_pij(4,3,1177)=1 exch2_oi(3,1177)=0 exch2_oj(3,1177)=0 exch2_neighbourId(4,1177)=1176 exch2_iLo(4,1177)=0 exch2_iHi(4,1177)=0 exch2_jLo(4,1177)=0 exch2_jHi(4,1177)=35 exch2_opposingSend(4,1177)=3 exch2_pij(1,4,1177)=1 exch2_pij(2,4,1177)=0 exch2_pij(3,4,1177)=0 exch2_pij(4,4,1177)=1 exch2_oi(4,1177)=0 exch2_oj(4,1177)=0 RETURN END SUBROUTINE W2_E2SETUP_1178 C Topology for tile 1178 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1178)=34 exch2_tNy(1178)=34 exch2_tBasex(1178)=238 exch2_tBasey(1178)=102 exch2_txGlobalo(1178)=2789 exch2_tyGlobalo(1178)=103 exch2_isWedge(1178)=0 exch2_isNedge(1178)=0 exch2_isEedge(1178)=0 exch2_isSedge(1178)=0 exch2_myFace(1178)=6 exch2_mydNx(1178)=510 exch2_mydNy(1178)=510 exch2_nNeighbours(1178)=4 exch2_neighbourId(1,1178)=1193 exch2_iLo(1,1178)=0 exch2_iHi(1,1178)=35 exch2_jLo(1,1178)=35 exch2_jHi(1,1178)=35 exch2_opposingSend(1,1178)=2 exch2_pij(1,1,1178)=1 exch2_pij(2,1,1178)=0 exch2_pij(3,1,1178)=0 exch2_pij(4,1,1178)=1 exch2_oi(1,1178)=0 exch2_oj(1,1178)=0 exch2_neighbourId(2,1178)=1163 exch2_iLo(2,1178)=0 exch2_iHi(2,1178)=35 exch2_jLo(2,1178)=0 exch2_jHi(2,1178)=0 exch2_opposingSend(2,1178)=1 exch2_pij(1,2,1178)=1 exch2_pij(2,2,1178)=0 exch2_pij(3,2,1178)=0 exch2_pij(4,2,1178)=1 exch2_oi(2,1178)=0 exch2_oj(2,1178)=0 exch2_neighbourId(3,1178)=1179 exch2_iLo(3,1178)=35 exch2_iHi(3,1178)=35 exch2_jLo(3,1178)=0 exch2_jHi(3,1178)=35 exch2_opposingSend(3,1178)=4 exch2_pij(1,3,1178)=1 exch2_pij(2,3,1178)=0 exch2_pij(3,3,1178)=0 exch2_pij(4,3,1178)=1 exch2_oi(3,1178)=0 exch2_oj(3,1178)=0 exch2_neighbourId(4,1178)=1177 exch2_iLo(4,1178)=0 exch2_iHi(4,1178)=0 exch2_jLo(4,1178)=0 exch2_jHi(4,1178)=35 exch2_opposingSend(4,1178)=3 exch2_pij(1,4,1178)=1 exch2_pij(2,4,1178)=0 exch2_pij(3,4,1178)=0 exch2_pij(4,4,1178)=1 exch2_oi(4,1178)=0 exch2_oj(4,1178)=0 RETURN END SUBROUTINE W2_E2SETUP_1179 C Topology for tile 1179 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1179)=34 exch2_tNy(1179)=34 exch2_tBasex(1179)=272 exch2_tBasey(1179)=102 exch2_txGlobalo(1179)=2823 exch2_tyGlobalo(1179)=103 exch2_isWedge(1179)=0 exch2_isNedge(1179)=0 exch2_isEedge(1179)=0 exch2_isSedge(1179)=0 exch2_myFace(1179)=6 exch2_mydNx(1179)=510 exch2_mydNy(1179)=510 exch2_nNeighbours(1179)=4 exch2_neighbourId(1,1179)=1194 exch2_iLo(1,1179)=0 exch2_iHi(1,1179)=35 exch2_jLo(1,1179)=35 exch2_jHi(1,1179)=35 exch2_opposingSend(1,1179)=2 exch2_pij(1,1,1179)=1 exch2_pij(2,1,1179)=0 exch2_pij(3,1,1179)=0 exch2_pij(4,1,1179)=1 exch2_oi(1,1179)=0 exch2_oj(1,1179)=0 exch2_neighbourId(2,1179)=1164 exch2_iLo(2,1179)=0 exch2_iHi(2,1179)=35 exch2_jLo(2,1179)=0 exch2_jHi(2,1179)=0 exch2_opposingSend(2,1179)=1 exch2_pij(1,2,1179)=1 exch2_pij(2,2,1179)=0 exch2_pij(3,2,1179)=0 exch2_pij(4,2,1179)=1 exch2_oi(2,1179)=0 exch2_oj(2,1179)=0 exch2_neighbourId(3,1179)=1180 exch2_iLo(3,1179)=35 exch2_iHi(3,1179)=35 exch2_jLo(3,1179)=0 exch2_jHi(3,1179)=35 exch2_opposingSend(3,1179)=4 exch2_pij(1,3,1179)=1 exch2_pij(2,3,1179)=0 exch2_pij(3,3,1179)=0 exch2_pij(4,3,1179)=1 exch2_oi(3,1179)=0 exch2_oj(3,1179)=0 exch2_neighbourId(4,1179)=1178 exch2_iLo(4,1179)=0 exch2_iHi(4,1179)=0 exch2_jLo(4,1179)=0 exch2_jHi(4,1179)=35 exch2_opposingSend(4,1179)=3 exch2_pij(1,4,1179)=1 exch2_pij(2,4,1179)=0 exch2_pij(3,4,1179)=0 exch2_pij(4,4,1179)=1 exch2_oi(4,1179)=0 exch2_oj(4,1179)=0 RETURN END SUBROUTINE W2_E2SETUP_1180 C Topology for tile 1180 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1180)=34 exch2_tNy(1180)=34 exch2_tBasex(1180)=306 exch2_tBasey(1180)=102 exch2_txGlobalo(1180)=2857 exch2_tyGlobalo(1180)=103 exch2_isWedge(1180)=0 exch2_isNedge(1180)=0 exch2_isEedge(1180)=0 exch2_isSedge(1180)=0 exch2_myFace(1180)=6 exch2_mydNx(1180)=510 exch2_mydNy(1180)=510 exch2_nNeighbours(1180)=4 exch2_neighbourId(1,1180)=1195 exch2_iLo(1,1180)=0 exch2_iHi(1,1180)=35 exch2_jLo(1,1180)=35 exch2_jHi(1,1180)=35 exch2_opposingSend(1,1180)=2 exch2_pij(1,1,1180)=1 exch2_pij(2,1,1180)=0 exch2_pij(3,1,1180)=0 exch2_pij(4,1,1180)=1 exch2_oi(1,1180)=0 exch2_oj(1,1180)=0 exch2_neighbourId(2,1180)=1165 exch2_iLo(2,1180)=0 exch2_iHi(2,1180)=35 exch2_jLo(2,1180)=0 exch2_jHi(2,1180)=0 exch2_opposingSend(2,1180)=1 exch2_pij(1,2,1180)=1 exch2_pij(2,2,1180)=0 exch2_pij(3,2,1180)=0 exch2_pij(4,2,1180)=1 exch2_oi(2,1180)=0 exch2_oj(2,1180)=0 exch2_neighbourId(3,1180)=1181 exch2_iLo(3,1180)=35 exch2_iHi(3,1180)=35 exch2_jLo(3,1180)=0 exch2_jHi(3,1180)=35 exch2_opposingSend(3,1180)=4 exch2_pij(1,3,1180)=1 exch2_pij(2,3,1180)=0 exch2_pij(3,3,1180)=0 exch2_pij(4,3,1180)=1 exch2_oi(3,1180)=0 exch2_oj(3,1180)=0 exch2_neighbourId(4,1180)=1179 exch2_iLo(4,1180)=0 exch2_iHi(4,1180)=0 exch2_jLo(4,1180)=0 exch2_jHi(4,1180)=35 exch2_opposingSend(4,1180)=3 exch2_pij(1,4,1180)=1 exch2_pij(2,4,1180)=0 exch2_pij(3,4,1180)=0 exch2_pij(4,4,1180)=1 exch2_oi(4,1180)=0 exch2_oj(4,1180)=0 RETURN END SUBROUTINE W2_E2SETUP_1181 C Topology for tile 1181 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1181)=34 exch2_tNy(1181)=34 exch2_tBasex(1181)=340 exch2_tBasey(1181)=102 exch2_txGlobalo(1181)=2891 exch2_tyGlobalo(1181)=103 exch2_isWedge(1181)=0 exch2_isNedge(1181)=0 exch2_isEedge(1181)=0 exch2_isSedge(1181)=0 exch2_myFace(1181)=6 exch2_mydNx(1181)=510 exch2_mydNy(1181)=510 exch2_nNeighbours(1181)=4 exch2_neighbourId(1,1181)=1196 exch2_iLo(1,1181)=0 exch2_iHi(1,1181)=35 exch2_jLo(1,1181)=35 exch2_jHi(1,1181)=35 exch2_opposingSend(1,1181)=2 exch2_pij(1,1,1181)=1 exch2_pij(2,1,1181)=0 exch2_pij(3,1,1181)=0 exch2_pij(4,1,1181)=1 exch2_oi(1,1181)=0 exch2_oj(1,1181)=0 exch2_neighbourId(2,1181)=1166 exch2_iLo(2,1181)=0 exch2_iHi(2,1181)=35 exch2_jLo(2,1181)=0 exch2_jHi(2,1181)=0 exch2_opposingSend(2,1181)=1 exch2_pij(1,2,1181)=1 exch2_pij(2,2,1181)=0 exch2_pij(3,2,1181)=0 exch2_pij(4,2,1181)=1 exch2_oi(2,1181)=0 exch2_oj(2,1181)=0 exch2_neighbourId(3,1181)=1182 exch2_iLo(3,1181)=35 exch2_iHi(3,1181)=35 exch2_jLo(3,1181)=0 exch2_jHi(3,1181)=35 exch2_opposingSend(3,1181)=4 exch2_pij(1,3,1181)=1 exch2_pij(2,3,1181)=0 exch2_pij(3,3,1181)=0 exch2_pij(4,3,1181)=1 exch2_oi(3,1181)=0 exch2_oj(3,1181)=0 exch2_neighbourId(4,1181)=1180 exch2_iLo(4,1181)=0 exch2_iHi(4,1181)=0 exch2_jLo(4,1181)=0 exch2_jHi(4,1181)=35 exch2_opposingSend(4,1181)=3 exch2_pij(1,4,1181)=1 exch2_pij(2,4,1181)=0 exch2_pij(3,4,1181)=0 exch2_pij(4,4,1181)=1 exch2_oi(4,1181)=0 exch2_oj(4,1181)=0 RETURN END SUBROUTINE W2_E2SETUP_1182 C Topology for tile 1182 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1182)=34 exch2_tNy(1182)=34 exch2_tBasex(1182)=374 exch2_tBasey(1182)=102 exch2_txGlobalo(1182)=2925 exch2_tyGlobalo(1182)=103 exch2_isWedge(1182)=0 exch2_isNedge(1182)=0 exch2_isEedge(1182)=0 exch2_isSedge(1182)=0 exch2_myFace(1182)=6 exch2_mydNx(1182)=510 exch2_mydNy(1182)=510 exch2_nNeighbours(1182)=4 exch2_neighbourId(1,1182)=1197 exch2_iLo(1,1182)=0 exch2_iHi(1,1182)=35 exch2_jLo(1,1182)=35 exch2_jHi(1,1182)=35 exch2_opposingSend(1,1182)=2 exch2_pij(1,1,1182)=1 exch2_pij(2,1,1182)=0 exch2_pij(3,1,1182)=0 exch2_pij(4,1,1182)=1 exch2_oi(1,1182)=0 exch2_oj(1,1182)=0 exch2_neighbourId(2,1182)=1167 exch2_iLo(2,1182)=0 exch2_iHi(2,1182)=35 exch2_jLo(2,1182)=0 exch2_jHi(2,1182)=0 exch2_opposingSend(2,1182)=1 exch2_pij(1,2,1182)=1 exch2_pij(2,2,1182)=0 exch2_pij(3,2,1182)=0 exch2_pij(4,2,1182)=1 exch2_oi(2,1182)=0 exch2_oj(2,1182)=0 exch2_neighbourId(3,1182)=1183 exch2_iLo(3,1182)=35 exch2_iHi(3,1182)=35 exch2_jLo(3,1182)=0 exch2_jHi(3,1182)=35 exch2_opposingSend(3,1182)=4 exch2_pij(1,3,1182)=1 exch2_pij(2,3,1182)=0 exch2_pij(3,3,1182)=0 exch2_pij(4,3,1182)=1 exch2_oi(3,1182)=0 exch2_oj(3,1182)=0 exch2_neighbourId(4,1182)=1181 exch2_iLo(4,1182)=0 exch2_iHi(4,1182)=0 exch2_jLo(4,1182)=0 exch2_jHi(4,1182)=35 exch2_opposingSend(4,1182)=3 exch2_pij(1,4,1182)=1 exch2_pij(2,4,1182)=0 exch2_pij(3,4,1182)=0 exch2_pij(4,4,1182)=1 exch2_oi(4,1182)=0 exch2_oj(4,1182)=0 RETURN END SUBROUTINE W2_E2SETUP_1183 C Topology for tile 1183 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1183)=34 exch2_tNy(1183)=34 exch2_tBasex(1183)=408 exch2_tBasey(1183)=102 exch2_txGlobalo(1183)=2959 exch2_tyGlobalo(1183)=103 exch2_isWedge(1183)=0 exch2_isNedge(1183)=0 exch2_isEedge(1183)=0 exch2_isSedge(1183)=0 exch2_myFace(1183)=6 exch2_mydNx(1183)=510 exch2_mydNy(1183)=510 exch2_nNeighbours(1183)=4 exch2_neighbourId(1,1183)=1198 exch2_iLo(1,1183)=0 exch2_iHi(1,1183)=35 exch2_jLo(1,1183)=35 exch2_jHi(1,1183)=35 exch2_opposingSend(1,1183)=2 exch2_pij(1,1,1183)=1 exch2_pij(2,1,1183)=0 exch2_pij(3,1,1183)=0 exch2_pij(4,1,1183)=1 exch2_oi(1,1183)=0 exch2_oj(1,1183)=0 exch2_neighbourId(2,1183)=1168 exch2_iLo(2,1183)=0 exch2_iHi(2,1183)=35 exch2_jLo(2,1183)=0 exch2_jHi(2,1183)=0 exch2_opposingSend(2,1183)=1 exch2_pij(1,2,1183)=1 exch2_pij(2,2,1183)=0 exch2_pij(3,2,1183)=0 exch2_pij(4,2,1183)=1 exch2_oi(2,1183)=0 exch2_oj(2,1183)=0 exch2_neighbourId(3,1183)=1184 exch2_iLo(3,1183)=35 exch2_iHi(3,1183)=35 exch2_jLo(3,1183)=0 exch2_jHi(3,1183)=35 exch2_opposingSend(3,1183)=4 exch2_pij(1,3,1183)=1 exch2_pij(2,3,1183)=0 exch2_pij(3,3,1183)=0 exch2_pij(4,3,1183)=1 exch2_oi(3,1183)=0 exch2_oj(3,1183)=0 exch2_neighbourId(4,1183)=1182 exch2_iLo(4,1183)=0 exch2_iHi(4,1183)=0 exch2_jLo(4,1183)=0 exch2_jHi(4,1183)=35 exch2_opposingSend(4,1183)=3 exch2_pij(1,4,1183)=1 exch2_pij(2,4,1183)=0 exch2_pij(3,4,1183)=0 exch2_pij(4,4,1183)=1 exch2_oi(4,1183)=0 exch2_oj(4,1183)=0 RETURN END SUBROUTINE W2_E2SETUP_1184 C Topology for tile 1184 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1184)=34 exch2_tNy(1184)=34 exch2_tBasex(1184)=442 exch2_tBasey(1184)=102 exch2_txGlobalo(1184)=2993 exch2_tyGlobalo(1184)=103 exch2_isWedge(1184)=0 exch2_isNedge(1184)=0 exch2_isEedge(1184)=0 exch2_isSedge(1184)=0 exch2_myFace(1184)=6 exch2_mydNx(1184)=510 exch2_mydNy(1184)=510 exch2_nNeighbours(1184)=4 exch2_neighbourId(1,1184)=1199 exch2_iLo(1,1184)=0 exch2_iHi(1,1184)=35 exch2_jLo(1,1184)=35 exch2_jHi(1,1184)=35 exch2_opposingSend(1,1184)=2 exch2_pij(1,1,1184)=1 exch2_pij(2,1,1184)=0 exch2_pij(3,1,1184)=0 exch2_pij(4,1,1184)=1 exch2_oi(1,1184)=0 exch2_oj(1,1184)=0 exch2_neighbourId(2,1184)=1169 exch2_iLo(2,1184)=0 exch2_iHi(2,1184)=35 exch2_jLo(2,1184)=0 exch2_jHi(2,1184)=0 exch2_opposingSend(2,1184)=1 exch2_pij(1,2,1184)=1 exch2_pij(2,2,1184)=0 exch2_pij(3,2,1184)=0 exch2_pij(4,2,1184)=1 exch2_oi(2,1184)=0 exch2_oj(2,1184)=0 exch2_neighbourId(3,1184)=1185 exch2_iLo(3,1184)=35 exch2_iHi(3,1184)=35 exch2_jLo(3,1184)=0 exch2_jHi(3,1184)=35 exch2_opposingSend(3,1184)=4 exch2_pij(1,3,1184)=1 exch2_pij(2,3,1184)=0 exch2_pij(3,3,1184)=0 exch2_pij(4,3,1184)=1 exch2_oi(3,1184)=0 exch2_oj(3,1184)=0 exch2_neighbourId(4,1184)=1183 exch2_iLo(4,1184)=0 exch2_iHi(4,1184)=0 exch2_jLo(4,1184)=0 exch2_jHi(4,1184)=35 exch2_opposingSend(4,1184)=3 exch2_pij(1,4,1184)=1 exch2_pij(2,4,1184)=0 exch2_pij(3,4,1184)=0 exch2_pij(4,4,1184)=1 exch2_oi(4,1184)=0 exch2_oj(4,1184)=0 RETURN END SUBROUTINE W2_E2SETUP_1185 C Topology for tile 1185 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1185)=34 exch2_tNy(1185)=34 exch2_tBasex(1185)=476 exch2_tBasey(1185)=102 exch2_txGlobalo(1185)=3027 exch2_tyGlobalo(1185)=103 exch2_isWedge(1185)=0 exch2_isNedge(1185)=0 exch2_isEedge(1185)=1 exch2_isSedge(1185)=0 exch2_myFace(1185)=6 exch2_mydNx(1185)=510 exch2_mydNy(1185)=510 exch2_nNeighbours(1185)=4 exch2_neighbourId(1,1185)=1200 exch2_iLo(1,1185)=0 exch2_iHi(1,1185)=35 exch2_jLo(1,1185)=35 exch2_jHi(1,1185)=35 exch2_opposingSend(1,1185)=2 exch2_pij(1,1,1185)=1 exch2_pij(2,1,1185)=0 exch2_pij(3,1,1185)=0 exch2_pij(4,1,1185)=1 exch2_oi(1,1185)=0 exch2_oj(1,1185)=0 exch2_neighbourId(2,1185)=1170 exch2_iLo(2,1185)=0 exch2_iHi(2,1185)=35 exch2_jLo(2,1185)=0 exch2_jHi(2,1185)=0 exch2_opposingSend(2,1185)=1 exch2_pij(1,2,1185)=1 exch2_pij(2,2,1185)=0 exch2_pij(3,2,1185)=0 exch2_pij(4,2,1185)=1 exch2_oi(2,1185)=0 exch2_oj(2,1185)=0 exch2_neighbourId(3,1185)=237 exch2_iLo(3,1185)=35 exch2_iHi(3,1185)=35 exch2_jLo(3,1185)=0 exch2_jHi(3,1185)=35 exch2_opposingSend(3,1185)=2 exch2_pij(1,3,1185)=0 exch2_pij(2,3,1185)=1 exch2_pij(3,3,1185)=-1 exch2_pij(4,3,1185)=0 exch2_oi(3,1185)=510 exch2_oj(3,1185)=511 exch2_neighbourId(4,1185)=1184 exch2_iLo(4,1185)=0 exch2_iHi(4,1185)=0 exch2_jLo(4,1185)=0 exch2_jHi(4,1185)=35 exch2_opposingSend(4,1185)=3 exch2_pij(1,4,1185)=1 exch2_pij(2,4,1185)=0 exch2_pij(3,4,1185)=0 exch2_pij(4,4,1185)=1 exch2_oi(4,1185)=0 exch2_oj(4,1185)=0 RETURN END SUBROUTINE W2_E2SETUP_1186 C Topology for tile 1186 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1186)=34 exch2_tNy(1186)=34 exch2_tBasex(1186)=0 exch2_tBasey(1186)=136 exch2_txGlobalo(1186)=2551 exch2_tyGlobalo(1186)=137 exch2_isWedge(1186)=1 exch2_isNedge(1186)=0 exch2_isEedge(1186)=0 exch2_isSedge(1186)=0 exch2_myFace(1186)=6 exch2_mydNx(1186)=510 exch2_mydNy(1186)=510 exch2_nNeighbours(1186)=4 exch2_neighbourId(1,1186)=1201 exch2_iLo(1,1186)=0 exch2_iHi(1,1186)=35 exch2_jLo(1,1186)=35 exch2_jHi(1,1186)=35 exch2_opposingSend(1,1186)=2 exch2_pij(1,1,1186)=1 exch2_pij(2,1,1186)=0 exch2_pij(3,1,1186)=0 exch2_pij(4,1,1186)=1 exch2_oi(1,1186)=0 exch2_oj(1,1186)=0 exch2_neighbourId(2,1186)=1171 exch2_iLo(2,1186)=0 exch2_iHi(2,1186)=35 exch2_jLo(2,1186)=0 exch2_jHi(2,1186)=0 exch2_opposingSend(2,1186)=1 exch2_pij(1,2,1186)=1 exch2_pij(2,2,1186)=0 exch2_pij(3,2,1186)=0 exch2_pij(4,2,1186)=1 exch2_oi(2,1186)=0 exch2_oj(2,1186)=0 exch2_neighbourId(3,1186)=1187 exch2_iLo(3,1186)=35 exch2_iHi(3,1186)=35 exch2_jLo(3,1186)=0 exch2_jHi(3,1186)=35 exch2_opposingSend(3,1186)=4 exch2_pij(1,3,1186)=1 exch2_pij(2,3,1186)=0 exch2_pij(3,3,1186)=0 exch2_pij(4,3,1186)=1 exch2_oi(3,1186)=0 exch2_oj(3,1186)=0 exch2_neighbourId(4,1186)=975 exch2_iLo(4,1186)=0 exch2_iHi(4,1186)=0 exch2_jLo(4,1186)=0 exch2_jHi(4,1186)=35 exch2_opposingSend(4,1186)=3 exch2_pij(1,4,1186)=1 exch2_pij(2,4,1186)=0 exch2_pij(3,4,1186)=0 exch2_pij(4,4,1186)=1 exch2_oi(4,1186)=-510 exch2_oj(4,1186)=0 RETURN END SUBROUTINE W2_E2SETUP_1187 C Topology for tile 1187 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1187)=34 exch2_tNy(1187)=34 exch2_tBasex(1187)=34 exch2_tBasey(1187)=136 exch2_txGlobalo(1187)=2585 exch2_tyGlobalo(1187)=137 exch2_isWedge(1187)=0 exch2_isNedge(1187)=0 exch2_isEedge(1187)=0 exch2_isSedge(1187)=0 exch2_myFace(1187)=6 exch2_mydNx(1187)=510 exch2_mydNy(1187)=510 exch2_nNeighbours(1187)=4 exch2_neighbourId(1,1187)=1202 exch2_iLo(1,1187)=0 exch2_iHi(1,1187)=35 exch2_jLo(1,1187)=35 exch2_jHi(1,1187)=35 exch2_opposingSend(1,1187)=2 exch2_pij(1,1,1187)=1 exch2_pij(2,1,1187)=0 exch2_pij(3,1,1187)=0 exch2_pij(4,1,1187)=1 exch2_oi(1,1187)=0 exch2_oj(1,1187)=0 exch2_neighbourId(2,1187)=1172 exch2_iLo(2,1187)=0 exch2_iHi(2,1187)=35 exch2_jLo(2,1187)=0 exch2_jHi(2,1187)=0 exch2_opposingSend(2,1187)=1 exch2_pij(1,2,1187)=1 exch2_pij(2,2,1187)=0 exch2_pij(3,2,1187)=0 exch2_pij(4,2,1187)=1 exch2_oi(2,1187)=0 exch2_oj(2,1187)=0 exch2_neighbourId(3,1187)=1188 exch2_iLo(3,1187)=35 exch2_iHi(3,1187)=35 exch2_jLo(3,1187)=0 exch2_jHi(3,1187)=35 exch2_opposingSend(3,1187)=4 exch2_pij(1,3,1187)=1 exch2_pij(2,3,1187)=0 exch2_pij(3,3,1187)=0 exch2_pij(4,3,1187)=1 exch2_oi(3,1187)=0 exch2_oj(3,1187)=0 exch2_neighbourId(4,1187)=1186 exch2_iLo(4,1187)=0 exch2_iHi(4,1187)=0 exch2_jLo(4,1187)=0 exch2_jHi(4,1187)=35 exch2_opposingSend(4,1187)=3 exch2_pij(1,4,1187)=1 exch2_pij(2,4,1187)=0 exch2_pij(3,4,1187)=0 exch2_pij(4,4,1187)=1 exch2_oi(4,1187)=0 exch2_oj(4,1187)=0 RETURN END SUBROUTINE W2_E2SETUP_1188 C Topology for tile 1188 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1188)=34 exch2_tNy(1188)=34 exch2_tBasex(1188)=68 exch2_tBasey(1188)=136 exch2_txGlobalo(1188)=2619 exch2_tyGlobalo(1188)=137 exch2_isWedge(1188)=0 exch2_isNedge(1188)=0 exch2_isEedge(1188)=0 exch2_isSedge(1188)=0 exch2_myFace(1188)=6 exch2_mydNx(1188)=510 exch2_mydNy(1188)=510 exch2_nNeighbours(1188)=4 exch2_neighbourId(1,1188)=1203 exch2_iLo(1,1188)=0 exch2_iHi(1,1188)=35 exch2_jLo(1,1188)=35 exch2_jHi(1,1188)=35 exch2_opposingSend(1,1188)=2 exch2_pij(1,1,1188)=1 exch2_pij(2,1,1188)=0 exch2_pij(3,1,1188)=0 exch2_pij(4,1,1188)=1 exch2_oi(1,1188)=0 exch2_oj(1,1188)=0 exch2_neighbourId(2,1188)=1173 exch2_iLo(2,1188)=0 exch2_iHi(2,1188)=35 exch2_jLo(2,1188)=0 exch2_jHi(2,1188)=0 exch2_opposingSend(2,1188)=1 exch2_pij(1,2,1188)=1 exch2_pij(2,2,1188)=0 exch2_pij(3,2,1188)=0 exch2_pij(4,2,1188)=1 exch2_oi(2,1188)=0 exch2_oj(2,1188)=0 exch2_neighbourId(3,1188)=1189 exch2_iLo(3,1188)=35 exch2_iHi(3,1188)=35 exch2_jLo(3,1188)=0 exch2_jHi(3,1188)=35 exch2_opposingSend(3,1188)=4 exch2_pij(1,3,1188)=1 exch2_pij(2,3,1188)=0 exch2_pij(3,3,1188)=0 exch2_pij(4,3,1188)=1 exch2_oi(3,1188)=0 exch2_oj(3,1188)=0 exch2_neighbourId(4,1188)=1187 exch2_iLo(4,1188)=0 exch2_iHi(4,1188)=0 exch2_jLo(4,1188)=0 exch2_jHi(4,1188)=35 exch2_opposingSend(4,1188)=3 exch2_pij(1,4,1188)=1 exch2_pij(2,4,1188)=0 exch2_pij(3,4,1188)=0 exch2_pij(4,4,1188)=1 exch2_oi(4,1188)=0 exch2_oj(4,1188)=0 RETURN END SUBROUTINE W2_E2SETUP_1189 C Topology for tile 1189 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1189)=34 exch2_tNy(1189)=34 exch2_tBasex(1189)=102 exch2_tBasey(1189)=136 exch2_txGlobalo(1189)=2653 exch2_tyGlobalo(1189)=137 exch2_isWedge(1189)=0 exch2_isNedge(1189)=0 exch2_isEedge(1189)=0 exch2_isSedge(1189)=0 exch2_myFace(1189)=6 exch2_mydNx(1189)=510 exch2_mydNy(1189)=510 exch2_nNeighbours(1189)=4 exch2_neighbourId(1,1189)=1204 exch2_iLo(1,1189)=0 exch2_iHi(1,1189)=35 exch2_jLo(1,1189)=35 exch2_jHi(1,1189)=35 exch2_opposingSend(1,1189)=2 exch2_pij(1,1,1189)=1 exch2_pij(2,1,1189)=0 exch2_pij(3,1,1189)=0 exch2_pij(4,1,1189)=1 exch2_oi(1,1189)=0 exch2_oj(1,1189)=0 exch2_neighbourId(2,1189)=1174 exch2_iLo(2,1189)=0 exch2_iHi(2,1189)=35 exch2_jLo(2,1189)=0 exch2_jHi(2,1189)=0 exch2_opposingSend(2,1189)=1 exch2_pij(1,2,1189)=1 exch2_pij(2,2,1189)=0 exch2_pij(3,2,1189)=0 exch2_pij(4,2,1189)=1 exch2_oi(2,1189)=0 exch2_oj(2,1189)=0 exch2_neighbourId(3,1189)=1190 exch2_iLo(3,1189)=35 exch2_iHi(3,1189)=35 exch2_jLo(3,1189)=0 exch2_jHi(3,1189)=35 exch2_opposingSend(3,1189)=4 exch2_pij(1,3,1189)=1 exch2_pij(2,3,1189)=0 exch2_pij(3,3,1189)=0 exch2_pij(4,3,1189)=1 exch2_oi(3,1189)=0 exch2_oj(3,1189)=0 exch2_neighbourId(4,1189)=1188 exch2_iLo(4,1189)=0 exch2_iHi(4,1189)=0 exch2_jLo(4,1189)=0 exch2_jHi(4,1189)=35 exch2_opposingSend(4,1189)=3 exch2_pij(1,4,1189)=1 exch2_pij(2,4,1189)=0 exch2_pij(3,4,1189)=0 exch2_pij(4,4,1189)=1 exch2_oi(4,1189)=0 exch2_oj(4,1189)=0 RETURN END SUBROUTINE W2_E2SETUP_1190 C Topology for tile 1190 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1190)=34 exch2_tNy(1190)=34 exch2_tBasex(1190)=136 exch2_tBasey(1190)=136 exch2_txGlobalo(1190)=2687 exch2_tyGlobalo(1190)=137 exch2_isWedge(1190)=0 exch2_isNedge(1190)=0 exch2_isEedge(1190)=0 exch2_isSedge(1190)=0 exch2_myFace(1190)=6 exch2_mydNx(1190)=510 exch2_mydNy(1190)=510 exch2_nNeighbours(1190)=4 exch2_neighbourId(1,1190)=1205 exch2_iLo(1,1190)=0 exch2_iHi(1,1190)=35 exch2_jLo(1,1190)=35 exch2_jHi(1,1190)=35 exch2_opposingSend(1,1190)=2 exch2_pij(1,1,1190)=1 exch2_pij(2,1,1190)=0 exch2_pij(3,1,1190)=0 exch2_pij(4,1,1190)=1 exch2_oi(1,1190)=0 exch2_oj(1,1190)=0 exch2_neighbourId(2,1190)=1175 exch2_iLo(2,1190)=0 exch2_iHi(2,1190)=35 exch2_jLo(2,1190)=0 exch2_jHi(2,1190)=0 exch2_opposingSend(2,1190)=1 exch2_pij(1,2,1190)=1 exch2_pij(2,2,1190)=0 exch2_pij(3,2,1190)=0 exch2_pij(4,2,1190)=1 exch2_oi(2,1190)=0 exch2_oj(2,1190)=0 exch2_neighbourId(3,1190)=1191 exch2_iLo(3,1190)=35 exch2_iHi(3,1190)=35 exch2_jLo(3,1190)=0 exch2_jHi(3,1190)=35 exch2_opposingSend(3,1190)=4 exch2_pij(1,3,1190)=1 exch2_pij(2,3,1190)=0 exch2_pij(3,3,1190)=0 exch2_pij(4,3,1190)=1 exch2_oi(3,1190)=0 exch2_oj(3,1190)=0 exch2_neighbourId(4,1190)=1189 exch2_iLo(4,1190)=0 exch2_iHi(4,1190)=0 exch2_jLo(4,1190)=0 exch2_jHi(4,1190)=35 exch2_opposingSend(4,1190)=3 exch2_pij(1,4,1190)=1 exch2_pij(2,4,1190)=0 exch2_pij(3,4,1190)=0 exch2_pij(4,4,1190)=1 exch2_oi(4,1190)=0 exch2_oj(4,1190)=0 RETURN END SUBROUTINE W2_E2SETUP_1191 C Topology for tile 1191 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1191)=34 exch2_tNy(1191)=34 exch2_tBasex(1191)=170 exch2_tBasey(1191)=136 exch2_txGlobalo(1191)=2721 exch2_tyGlobalo(1191)=137 exch2_isWedge(1191)=0 exch2_isNedge(1191)=0 exch2_isEedge(1191)=0 exch2_isSedge(1191)=0 exch2_myFace(1191)=6 exch2_mydNx(1191)=510 exch2_mydNy(1191)=510 exch2_nNeighbours(1191)=4 exch2_neighbourId(1,1191)=1206 exch2_iLo(1,1191)=0 exch2_iHi(1,1191)=35 exch2_jLo(1,1191)=35 exch2_jHi(1,1191)=35 exch2_opposingSend(1,1191)=2 exch2_pij(1,1,1191)=1 exch2_pij(2,1,1191)=0 exch2_pij(3,1,1191)=0 exch2_pij(4,1,1191)=1 exch2_oi(1,1191)=0 exch2_oj(1,1191)=0 exch2_neighbourId(2,1191)=1176 exch2_iLo(2,1191)=0 exch2_iHi(2,1191)=35 exch2_jLo(2,1191)=0 exch2_jHi(2,1191)=0 exch2_opposingSend(2,1191)=1 exch2_pij(1,2,1191)=1 exch2_pij(2,2,1191)=0 exch2_pij(3,2,1191)=0 exch2_pij(4,2,1191)=1 exch2_oi(2,1191)=0 exch2_oj(2,1191)=0 exch2_neighbourId(3,1191)=1192 exch2_iLo(3,1191)=35 exch2_iHi(3,1191)=35 exch2_jLo(3,1191)=0 exch2_jHi(3,1191)=35 exch2_opposingSend(3,1191)=4 exch2_pij(1,3,1191)=1 exch2_pij(2,3,1191)=0 exch2_pij(3,3,1191)=0 exch2_pij(4,3,1191)=1 exch2_oi(3,1191)=0 exch2_oj(3,1191)=0 exch2_neighbourId(4,1191)=1190 exch2_iLo(4,1191)=0 exch2_iHi(4,1191)=0 exch2_jLo(4,1191)=0 exch2_jHi(4,1191)=35 exch2_opposingSend(4,1191)=3 exch2_pij(1,4,1191)=1 exch2_pij(2,4,1191)=0 exch2_pij(3,4,1191)=0 exch2_pij(4,4,1191)=1 exch2_oi(4,1191)=0 exch2_oj(4,1191)=0 RETURN END SUBROUTINE W2_E2SETUP_1192 C Topology for tile 1192 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1192)=34 exch2_tNy(1192)=34 exch2_tBasex(1192)=204 exch2_tBasey(1192)=136 exch2_txGlobalo(1192)=2755 exch2_tyGlobalo(1192)=137 exch2_isWedge(1192)=0 exch2_isNedge(1192)=0 exch2_isEedge(1192)=0 exch2_isSedge(1192)=0 exch2_myFace(1192)=6 exch2_mydNx(1192)=510 exch2_mydNy(1192)=510 exch2_nNeighbours(1192)=4 exch2_neighbourId(1,1192)=1207 exch2_iLo(1,1192)=0 exch2_iHi(1,1192)=35 exch2_jLo(1,1192)=35 exch2_jHi(1,1192)=35 exch2_opposingSend(1,1192)=2 exch2_pij(1,1,1192)=1 exch2_pij(2,1,1192)=0 exch2_pij(3,1,1192)=0 exch2_pij(4,1,1192)=1 exch2_oi(1,1192)=0 exch2_oj(1,1192)=0 exch2_neighbourId(2,1192)=1177 exch2_iLo(2,1192)=0 exch2_iHi(2,1192)=35 exch2_jLo(2,1192)=0 exch2_jHi(2,1192)=0 exch2_opposingSend(2,1192)=1 exch2_pij(1,2,1192)=1 exch2_pij(2,2,1192)=0 exch2_pij(3,2,1192)=0 exch2_pij(4,2,1192)=1 exch2_oi(2,1192)=0 exch2_oj(2,1192)=0 exch2_neighbourId(3,1192)=1193 exch2_iLo(3,1192)=35 exch2_iHi(3,1192)=35 exch2_jLo(3,1192)=0 exch2_jHi(3,1192)=35 exch2_opposingSend(3,1192)=4 exch2_pij(1,3,1192)=1 exch2_pij(2,3,1192)=0 exch2_pij(3,3,1192)=0 exch2_pij(4,3,1192)=1 exch2_oi(3,1192)=0 exch2_oj(3,1192)=0 exch2_neighbourId(4,1192)=1191 exch2_iLo(4,1192)=0 exch2_iHi(4,1192)=0 exch2_jLo(4,1192)=0 exch2_jHi(4,1192)=35 exch2_opposingSend(4,1192)=3 exch2_pij(1,4,1192)=1 exch2_pij(2,4,1192)=0 exch2_pij(3,4,1192)=0 exch2_pij(4,4,1192)=1 exch2_oi(4,1192)=0 exch2_oj(4,1192)=0 RETURN END SUBROUTINE W2_E2SETUP_1193 C Topology for tile 1193 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1193)=34 exch2_tNy(1193)=34 exch2_tBasex(1193)=238 exch2_tBasey(1193)=136 exch2_txGlobalo(1193)=2789 exch2_tyGlobalo(1193)=137 exch2_isWedge(1193)=0 exch2_isNedge(1193)=0 exch2_isEedge(1193)=0 exch2_isSedge(1193)=0 exch2_myFace(1193)=6 exch2_mydNx(1193)=510 exch2_mydNy(1193)=510 exch2_nNeighbours(1193)=4 exch2_neighbourId(1,1193)=1208 exch2_iLo(1,1193)=0 exch2_iHi(1,1193)=35 exch2_jLo(1,1193)=35 exch2_jHi(1,1193)=35 exch2_opposingSend(1,1193)=2 exch2_pij(1,1,1193)=1 exch2_pij(2,1,1193)=0 exch2_pij(3,1,1193)=0 exch2_pij(4,1,1193)=1 exch2_oi(1,1193)=0 exch2_oj(1,1193)=0 exch2_neighbourId(2,1193)=1178 exch2_iLo(2,1193)=0 exch2_iHi(2,1193)=35 exch2_jLo(2,1193)=0 exch2_jHi(2,1193)=0 exch2_opposingSend(2,1193)=1 exch2_pij(1,2,1193)=1 exch2_pij(2,2,1193)=0 exch2_pij(3,2,1193)=0 exch2_pij(4,2,1193)=1 exch2_oi(2,1193)=0 exch2_oj(2,1193)=0 exch2_neighbourId(3,1193)=1194 exch2_iLo(3,1193)=35 exch2_iHi(3,1193)=35 exch2_jLo(3,1193)=0 exch2_jHi(3,1193)=35 exch2_opposingSend(3,1193)=4 exch2_pij(1,3,1193)=1 exch2_pij(2,3,1193)=0 exch2_pij(3,3,1193)=0 exch2_pij(4,3,1193)=1 exch2_oi(3,1193)=0 exch2_oj(3,1193)=0 exch2_neighbourId(4,1193)=1192 exch2_iLo(4,1193)=0 exch2_iHi(4,1193)=0 exch2_jLo(4,1193)=0 exch2_jHi(4,1193)=35 exch2_opposingSend(4,1193)=3 exch2_pij(1,4,1193)=1 exch2_pij(2,4,1193)=0 exch2_pij(3,4,1193)=0 exch2_pij(4,4,1193)=1 exch2_oi(4,1193)=0 exch2_oj(4,1193)=0 RETURN END SUBROUTINE W2_E2SETUP_1194 C Topology for tile 1194 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1194)=34 exch2_tNy(1194)=34 exch2_tBasex(1194)=272 exch2_tBasey(1194)=136 exch2_txGlobalo(1194)=2823 exch2_tyGlobalo(1194)=137 exch2_isWedge(1194)=0 exch2_isNedge(1194)=0 exch2_isEedge(1194)=0 exch2_isSedge(1194)=0 exch2_myFace(1194)=6 exch2_mydNx(1194)=510 exch2_mydNy(1194)=510 exch2_nNeighbours(1194)=4 exch2_neighbourId(1,1194)=1209 exch2_iLo(1,1194)=0 exch2_iHi(1,1194)=35 exch2_jLo(1,1194)=35 exch2_jHi(1,1194)=35 exch2_opposingSend(1,1194)=2 exch2_pij(1,1,1194)=1 exch2_pij(2,1,1194)=0 exch2_pij(3,1,1194)=0 exch2_pij(4,1,1194)=1 exch2_oi(1,1194)=0 exch2_oj(1,1194)=0 exch2_neighbourId(2,1194)=1179 exch2_iLo(2,1194)=0 exch2_iHi(2,1194)=35 exch2_jLo(2,1194)=0 exch2_jHi(2,1194)=0 exch2_opposingSend(2,1194)=1 exch2_pij(1,2,1194)=1 exch2_pij(2,2,1194)=0 exch2_pij(3,2,1194)=0 exch2_pij(4,2,1194)=1 exch2_oi(2,1194)=0 exch2_oj(2,1194)=0 exch2_neighbourId(3,1194)=1195 exch2_iLo(3,1194)=35 exch2_iHi(3,1194)=35 exch2_jLo(3,1194)=0 exch2_jHi(3,1194)=35 exch2_opposingSend(3,1194)=4 exch2_pij(1,3,1194)=1 exch2_pij(2,3,1194)=0 exch2_pij(3,3,1194)=0 exch2_pij(4,3,1194)=1 exch2_oi(3,1194)=0 exch2_oj(3,1194)=0 exch2_neighbourId(4,1194)=1193 exch2_iLo(4,1194)=0 exch2_iHi(4,1194)=0 exch2_jLo(4,1194)=0 exch2_jHi(4,1194)=35 exch2_opposingSend(4,1194)=3 exch2_pij(1,4,1194)=1 exch2_pij(2,4,1194)=0 exch2_pij(3,4,1194)=0 exch2_pij(4,4,1194)=1 exch2_oi(4,1194)=0 exch2_oj(4,1194)=0 RETURN END SUBROUTINE W2_E2SETUP_1195 C Topology for tile 1195 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1195)=34 exch2_tNy(1195)=34 exch2_tBasex(1195)=306 exch2_tBasey(1195)=136 exch2_txGlobalo(1195)=2857 exch2_tyGlobalo(1195)=137 exch2_isWedge(1195)=0 exch2_isNedge(1195)=0 exch2_isEedge(1195)=0 exch2_isSedge(1195)=0 exch2_myFace(1195)=6 exch2_mydNx(1195)=510 exch2_mydNy(1195)=510 exch2_nNeighbours(1195)=4 exch2_neighbourId(1,1195)=1210 exch2_iLo(1,1195)=0 exch2_iHi(1,1195)=35 exch2_jLo(1,1195)=35 exch2_jHi(1,1195)=35 exch2_opposingSend(1,1195)=2 exch2_pij(1,1,1195)=1 exch2_pij(2,1,1195)=0 exch2_pij(3,1,1195)=0 exch2_pij(4,1,1195)=1 exch2_oi(1,1195)=0 exch2_oj(1,1195)=0 exch2_neighbourId(2,1195)=1180 exch2_iLo(2,1195)=0 exch2_iHi(2,1195)=35 exch2_jLo(2,1195)=0 exch2_jHi(2,1195)=0 exch2_opposingSend(2,1195)=1 exch2_pij(1,2,1195)=1 exch2_pij(2,2,1195)=0 exch2_pij(3,2,1195)=0 exch2_pij(4,2,1195)=1 exch2_oi(2,1195)=0 exch2_oj(2,1195)=0 exch2_neighbourId(3,1195)=1196 exch2_iLo(3,1195)=35 exch2_iHi(3,1195)=35 exch2_jLo(3,1195)=0 exch2_jHi(3,1195)=35 exch2_opposingSend(3,1195)=4 exch2_pij(1,3,1195)=1 exch2_pij(2,3,1195)=0 exch2_pij(3,3,1195)=0 exch2_pij(4,3,1195)=1 exch2_oi(3,1195)=0 exch2_oj(3,1195)=0 exch2_neighbourId(4,1195)=1194 exch2_iLo(4,1195)=0 exch2_iHi(4,1195)=0 exch2_jLo(4,1195)=0 exch2_jHi(4,1195)=35 exch2_opposingSend(4,1195)=3 exch2_pij(1,4,1195)=1 exch2_pij(2,4,1195)=0 exch2_pij(3,4,1195)=0 exch2_pij(4,4,1195)=1 exch2_oi(4,1195)=0 exch2_oj(4,1195)=0 RETURN END SUBROUTINE W2_E2SETUP_1196 C Topology for tile 1196 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1196)=34 exch2_tNy(1196)=34 exch2_tBasex(1196)=340 exch2_tBasey(1196)=136 exch2_txGlobalo(1196)=2891 exch2_tyGlobalo(1196)=137 exch2_isWedge(1196)=0 exch2_isNedge(1196)=0 exch2_isEedge(1196)=0 exch2_isSedge(1196)=0 exch2_myFace(1196)=6 exch2_mydNx(1196)=510 exch2_mydNy(1196)=510 exch2_nNeighbours(1196)=4 exch2_neighbourId(1,1196)=1211 exch2_iLo(1,1196)=0 exch2_iHi(1,1196)=35 exch2_jLo(1,1196)=35 exch2_jHi(1,1196)=35 exch2_opposingSend(1,1196)=2 exch2_pij(1,1,1196)=1 exch2_pij(2,1,1196)=0 exch2_pij(3,1,1196)=0 exch2_pij(4,1,1196)=1 exch2_oi(1,1196)=0 exch2_oj(1,1196)=0 exch2_neighbourId(2,1196)=1181 exch2_iLo(2,1196)=0 exch2_iHi(2,1196)=35 exch2_jLo(2,1196)=0 exch2_jHi(2,1196)=0 exch2_opposingSend(2,1196)=1 exch2_pij(1,2,1196)=1 exch2_pij(2,2,1196)=0 exch2_pij(3,2,1196)=0 exch2_pij(4,2,1196)=1 exch2_oi(2,1196)=0 exch2_oj(2,1196)=0 exch2_neighbourId(3,1196)=1197 exch2_iLo(3,1196)=35 exch2_iHi(3,1196)=35 exch2_jLo(3,1196)=0 exch2_jHi(3,1196)=35 exch2_opposingSend(3,1196)=4 exch2_pij(1,3,1196)=1 exch2_pij(2,3,1196)=0 exch2_pij(3,3,1196)=0 exch2_pij(4,3,1196)=1 exch2_oi(3,1196)=0 exch2_oj(3,1196)=0 exch2_neighbourId(4,1196)=1195 exch2_iLo(4,1196)=0 exch2_iHi(4,1196)=0 exch2_jLo(4,1196)=0 exch2_jHi(4,1196)=35 exch2_opposingSend(4,1196)=3 exch2_pij(1,4,1196)=1 exch2_pij(2,4,1196)=0 exch2_pij(3,4,1196)=0 exch2_pij(4,4,1196)=1 exch2_oi(4,1196)=0 exch2_oj(4,1196)=0 RETURN END SUBROUTINE W2_E2SETUP_1197 C Topology for tile 1197 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1197)=34 exch2_tNy(1197)=34 exch2_tBasex(1197)=374 exch2_tBasey(1197)=136 exch2_txGlobalo(1197)=2925 exch2_tyGlobalo(1197)=137 exch2_isWedge(1197)=0 exch2_isNedge(1197)=0 exch2_isEedge(1197)=0 exch2_isSedge(1197)=0 exch2_myFace(1197)=6 exch2_mydNx(1197)=510 exch2_mydNy(1197)=510 exch2_nNeighbours(1197)=4 exch2_neighbourId(1,1197)=1212 exch2_iLo(1,1197)=0 exch2_iHi(1,1197)=35 exch2_jLo(1,1197)=35 exch2_jHi(1,1197)=35 exch2_opposingSend(1,1197)=2 exch2_pij(1,1,1197)=1 exch2_pij(2,1,1197)=0 exch2_pij(3,1,1197)=0 exch2_pij(4,1,1197)=1 exch2_oi(1,1197)=0 exch2_oj(1,1197)=0 exch2_neighbourId(2,1197)=1182 exch2_iLo(2,1197)=0 exch2_iHi(2,1197)=35 exch2_jLo(2,1197)=0 exch2_jHi(2,1197)=0 exch2_opposingSend(2,1197)=1 exch2_pij(1,2,1197)=1 exch2_pij(2,2,1197)=0 exch2_pij(3,2,1197)=0 exch2_pij(4,2,1197)=1 exch2_oi(2,1197)=0 exch2_oj(2,1197)=0 exch2_neighbourId(3,1197)=1198 exch2_iLo(3,1197)=35 exch2_iHi(3,1197)=35 exch2_jLo(3,1197)=0 exch2_jHi(3,1197)=35 exch2_opposingSend(3,1197)=4 exch2_pij(1,3,1197)=1 exch2_pij(2,3,1197)=0 exch2_pij(3,3,1197)=0 exch2_pij(4,3,1197)=1 exch2_oi(3,1197)=0 exch2_oj(3,1197)=0 exch2_neighbourId(4,1197)=1196 exch2_iLo(4,1197)=0 exch2_iHi(4,1197)=0 exch2_jLo(4,1197)=0 exch2_jHi(4,1197)=35 exch2_opposingSend(4,1197)=3 exch2_pij(1,4,1197)=1 exch2_pij(2,4,1197)=0 exch2_pij(3,4,1197)=0 exch2_pij(4,4,1197)=1 exch2_oi(4,1197)=0 exch2_oj(4,1197)=0 RETURN END SUBROUTINE W2_E2SETUP_1198 C Topology for tile 1198 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1198)=34 exch2_tNy(1198)=34 exch2_tBasex(1198)=408 exch2_tBasey(1198)=136 exch2_txGlobalo(1198)=2959 exch2_tyGlobalo(1198)=137 exch2_isWedge(1198)=0 exch2_isNedge(1198)=0 exch2_isEedge(1198)=0 exch2_isSedge(1198)=0 exch2_myFace(1198)=6 exch2_mydNx(1198)=510 exch2_mydNy(1198)=510 exch2_nNeighbours(1198)=4 exch2_neighbourId(1,1198)=1213 exch2_iLo(1,1198)=0 exch2_iHi(1,1198)=35 exch2_jLo(1,1198)=35 exch2_jHi(1,1198)=35 exch2_opposingSend(1,1198)=2 exch2_pij(1,1,1198)=1 exch2_pij(2,1,1198)=0 exch2_pij(3,1,1198)=0 exch2_pij(4,1,1198)=1 exch2_oi(1,1198)=0 exch2_oj(1,1198)=0 exch2_neighbourId(2,1198)=1183 exch2_iLo(2,1198)=0 exch2_iHi(2,1198)=35 exch2_jLo(2,1198)=0 exch2_jHi(2,1198)=0 exch2_opposingSend(2,1198)=1 exch2_pij(1,2,1198)=1 exch2_pij(2,2,1198)=0 exch2_pij(3,2,1198)=0 exch2_pij(4,2,1198)=1 exch2_oi(2,1198)=0 exch2_oj(2,1198)=0 exch2_neighbourId(3,1198)=1199 exch2_iLo(3,1198)=35 exch2_iHi(3,1198)=35 exch2_jLo(3,1198)=0 exch2_jHi(3,1198)=35 exch2_opposingSend(3,1198)=4 exch2_pij(1,3,1198)=1 exch2_pij(2,3,1198)=0 exch2_pij(3,3,1198)=0 exch2_pij(4,3,1198)=1 exch2_oi(3,1198)=0 exch2_oj(3,1198)=0 exch2_neighbourId(4,1198)=1197 exch2_iLo(4,1198)=0 exch2_iHi(4,1198)=0 exch2_jLo(4,1198)=0 exch2_jHi(4,1198)=35 exch2_opposingSend(4,1198)=3 exch2_pij(1,4,1198)=1 exch2_pij(2,4,1198)=0 exch2_pij(3,4,1198)=0 exch2_pij(4,4,1198)=1 exch2_oi(4,1198)=0 exch2_oj(4,1198)=0 RETURN END SUBROUTINE W2_E2SETUP_1199 C Topology for tile 1199 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1199)=34 exch2_tNy(1199)=34 exch2_tBasex(1199)=442 exch2_tBasey(1199)=136 exch2_txGlobalo(1199)=2993 exch2_tyGlobalo(1199)=137 exch2_isWedge(1199)=0 exch2_isNedge(1199)=0 exch2_isEedge(1199)=0 exch2_isSedge(1199)=0 exch2_myFace(1199)=6 exch2_mydNx(1199)=510 exch2_mydNy(1199)=510 exch2_nNeighbours(1199)=4 exch2_neighbourId(1,1199)=1214 exch2_iLo(1,1199)=0 exch2_iHi(1,1199)=35 exch2_jLo(1,1199)=35 exch2_jHi(1,1199)=35 exch2_opposingSend(1,1199)=2 exch2_pij(1,1,1199)=1 exch2_pij(2,1,1199)=0 exch2_pij(3,1,1199)=0 exch2_pij(4,1,1199)=1 exch2_oi(1,1199)=0 exch2_oj(1,1199)=0 exch2_neighbourId(2,1199)=1184 exch2_iLo(2,1199)=0 exch2_iHi(2,1199)=35 exch2_jLo(2,1199)=0 exch2_jHi(2,1199)=0 exch2_opposingSend(2,1199)=1 exch2_pij(1,2,1199)=1 exch2_pij(2,2,1199)=0 exch2_pij(3,2,1199)=0 exch2_pij(4,2,1199)=1 exch2_oi(2,1199)=0 exch2_oj(2,1199)=0 exch2_neighbourId(3,1199)=1200 exch2_iLo(3,1199)=35 exch2_iHi(3,1199)=35 exch2_jLo(3,1199)=0 exch2_jHi(3,1199)=35 exch2_opposingSend(3,1199)=4 exch2_pij(1,3,1199)=1 exch2_pij(2,3,1199)=0 exch2_pij(3,3,1199)=0 exch2_pij(4,3,1199)=1 exch2_oi(3,1199)=0 exch2_oj(3,1199)=0 exch2_neighbourId(4,1199)=1198 exch2_iLo(4,1199)=0 exch2_iHi(4,1199)=0 exch2_jLo(4,1199)=0 exch2_jHi(4,1199)=35 exch2_opposingSend(4,1199)=3 exch2_pij(1,4,1199)=1 exch2_pij(2,4,1199)=0 exch2_pij(3,4,1199)=0 exch2_pij(4,4,1199)=1 exch2_oi(4,1199)=0 exch2_oj(4,1199)=0 RETURN END SUBROUTINE W2_E2SETUP_1200 C Topology for tile 1200 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1200)=34 exch2_tNy(1200)=34 exch2_tBasex(1200)=476 exch2_tBasey(1200)=136 exch2_txGlobalo(1200)=3027 exch2_tyGlobalo(1200)=137 exch2_isWedge(1200)=0 exch2_isNedge(1200)=0 exch2_isEedge(1200)=1 exch2_isSedge(1200)=0 exch2_myFace(1200)=6 exch2_mydNx(1200)=510 exch2_mydNy(1200)=510 exch2_nNeighbours(1200)=4 exch2_neighbourId(1,1200)=1215 exch2_iLo(1,1200)=0 exch2_iHi(1,1200)=35 exch2_jLo(1,1200)=35 exch2_jHi(1,1200)=35 exch2_opposingSend(1,1200)=2 exch2_pij(1,1,1200)=1 exch2_pij(2,1,1200)=0 exch2_pij(3,1,1200)=0 exch2_pij(4,1,1200)=1 exch2_oi(1,1200)=0 exch2_oj(1,1200)=0 exch2_neighbourId(2,1200)=1185 exch2_iLo(2,1200)=0 exch2_iHi(2,1200)=35 exch2_jLo(2,1200)=0 exch2_jHi(2,1200)=0 exch2_opposingSend(2,1200)=1 exch2_pij(1,2,1200)=1 exch2_pij(2,2,1200)=0 exch2_pij(3,2,1200)=0 exch2_pij(4,2,1200)=1 exch2_oi(2,1200)=0 exch2_oj(2,1200)=0 exch2_neighbourId(3,1200)=236 exch2_iLo(3,1200)=35 exch2_iHi(3,1200)=35 exch2_jLo(3,1200)=0 exch2_jHi(3,1200)=35 exch2_opposingSend(3,1200)=2 exch2_pij(1,3,1200)=0 exch2_pij(2,3,1200)=1 exch2_pij(3,3,1200)=-1 exch2_pij(4,3,1200)=0 exch2_oi(3,1200)=510 exch2_oj(3,1200)=511 exch2_neighbourId(4,1200)=1199 exch2_iLo(4,1200)=0 exch2_iHi(4,1200)=0 exch2_jLo(4,1200)=0 exch2_jHi(4,1200)=35 exch2_opposingSend(4,1200)=3 exch2_pij(1,4,1200)=1 exch2_pij(2,4,1200)=0 exch2_pij(3,4,1200)=0 exch2_pij(4,4,1200)=1 exch2_oi(4,1200)=0 exch2_oj(4,1200)=0 RETURN END SUBROUTINE W2_E2SETUP_1201 C Topology for tile 1201 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1201)=34 exch2_tNy(1201)=34 exch2_tBasex(1201)=0 exch2_tBasey(1201)=170 exch2_txGlobalo(1201)=2551 exch2_tyGlobalo(1201)=171 exch2_isWedge(1201)=1 exch2_isNedge(1201)=0 exch2_isEedge(1201)=0 exch2_isSedge(1201)=0 exch2_myFace(1201)=6 exch2_mydNx(1201)=510 exch2_mydNy(1201)=510 exch2_nNeighbours(1201)=4 exch2_neighbourId(1,1201)=1216 exch2_iLo(1,1201)=0 exch2_iHi(1,1201)=35 exch2_jLo(1,1201)=35 exch2_jHi(1,1201)=35 exch2_opposingSend(1,1201)=2 exch2_pij(1,1,1201)=1 exch2_pij(2,1,1201)=0 exch2_pij(3,1,1201)=0 exch2_pij(4,1,1201)=1 exch2_oi(1,1201)=0 exch2_oj(1,1201)=0 exch2_neighbourId(2,1201)=1186 exch2_iLo(2,1201)=0 exch2_iHi(2,1201)=35 exch2_jLo(2,1201)=0 exch2_jHi(2,1201)=0 exch2_opposingSend(2,1201)=1 exch2_pij(1,2,1201)=1 exch2_pij(2,2,1201)=0 exch2_pij(3,2,1201)=0 exch2_pij(4,2,1201)=1 exch2_oi(2,1201)=0 exch2_oj(2,1201)=0 exch2_neighbourId(3,1201)=1202 exch2_iLo(3,1201)=35 exch2_iHi(3,1201)=35 exch2_jLo(3,1201)=0 exch2_jHi(3,1201)=35 exch2_opposingSend(3,1201)=4 exch2_pij(1,3,1201)=1 exch2_pij(2,3,1201)=0 exch2_pij(3,3,1201)=0 exch2_pij(4,3,1201)=1 exch2_oi(3,1201)=0 exch2_oj(3,1201)=0 exch2_neighbourId(4,1201)=990 exch2_iLo(4,1201)=0 exch2_iHi(4,1201)=0 exch2_jLo(4,1201)=0 exch2_jHi(4,1201)=35 exch2_opposingSend(4,1201)=3 exch2_pij(1,4,1201)=1 exch2_pij(2,4,1201)=0 exch2_pij(3,4,1201)=0 exch2_pij(4,4,1201)=1 exch2_oi(4,1201)=-510 exch2_oj(4,1201)=0 RETURN END SUBROUTINE W2_E2SETUP_1202 C Topology for tile 1202 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1202)=34 exch2_tNy(1202)=34 exch2_tBasex(1202)=34 exch2_tBasey(1202)=170 exch2_txGlobalo(1202)=2585 exch2_tyGlobalo(1202)=171 exch2_isWedge(1202)=0 exch2_isNedge(1202)=0 exch2_isEedge(1202)=0 exch2_isSedge(1202)=0 exch2_myFace(1202)=6 exch2_mydNx(1202)=510 exch2_mydNy(1202)=510 exch2_nNeighbours(1202)=4 exch2_neighbourId(1,1202)=1217 exch2_iLo(1,1202)=0 exch2_iHi(1,1202)=35 exch2_jLo(1,1202)=35 exch2_jHi(1,1202)=35 exch2_opposingSend(1,1202)=2 exch2_pij(1,1,1202)=1 exch2_pij(2,1,1202)=0 exch2_pij(3,1,1202)=0 exch2_pij(4,1,1202)=1 exch2_oi(1,1202)=0 exch2_oj(1,1202)=0 exch2_neighbourId(2,1202)=1187 exch2_iLo(2,1202)=0 exch2_iHi(2,1202)=35 exch2_jLo(2,1202)=0 exch2_jHi(2,1202)=0 exch2_opposingSend(2,1202)=1 exch2_pij(1,2,1202)=1 exch2_pij(2,2,1202)=0 exch2_pij(3,2,1202)=0 exch2_pij(4,2,1202)=1 exch2_oi(2,1202)=0 exch2_oj(2,1202)=0 exch2_neighbourId(3,1202)=1203 exch2_iLo(3,1202)=35 exch2_iHi(3,1202)=35 exch2_jLo(3,1202)=0 exch2_jHi(3,1202)=35 exch2_opposingSend(3,1202)=4 exch2_pij(1,3,1202)=1 exch2_pij(2,3,1202)=0 exch2_pij(3,3,1202)=0 exch2_pij(4,3,1202)=1 exch2_oi(3,1202)=0 exch2_oj(3,1202)=0 exch2_neighbourId(4,1202)=1201 exch2_iLo(4,1202)=0 exch2_iHi(4,1202)=0 exch2_jLo(4,1202)=0 exch2_jHi(4,1202)=35 exch2_opposingSend(4,1202)=3 exch2_pij(1,4,1202)=1 exch2_pij(2,4,1202)=0 exch2_pij(3,4,1202)=0 exch2_pij(4,4,1202)=1 exch2_oi(4,1202)=0 exch2_oj(4,1202)=0 RETURN END SUBROUTINE W2_E2SETUP_1203 C Topology for tile 1203 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1203)=34 exch2_tNy(1203)=34 exch2_tBasex(1203)=68 exch2_tBasey(1203)=170 exch2_txGlobalo(1203)=2619 exch2_tyGlobalo(1203)=171 exch2_isWedge(1203)=0 exch2_isNedge(1203)=0 exch2_isEedge(1203)=0 exch2_isSedge(1203)=0 exch2_myFace(1203)=6 exch2_mydNx(1203)=510 exch2_mydNy(1203)=510 exch2_nNeighbours(1203)=4 exch2_neighbourId(1,1203)=1218 exch2_iLo(1,1203)=0 exch2_iHi(1,1203)=35 exch2_jLo(1,1203)=35 exch2_jHi(1,1203)=35 exch2_opposingSend(1,1203)=2 exch2_pij(1,1,1203)=1 exch2_pij(2,1,1203)=0 exch2_pij(3,1,1203)=0 exch2_pij(4,1,1203)=1 exch2_oi(1,1203)=0 exch2_oj(1,1203)=0 exch2_neighbourId(2,1203)=1188 exch2_iLo(2,1203)=0 exch2_iHi(2,1203)=35 exch2_jLo(2,1203)=0 exch2_jHi(2,1203)=0 exch2_opposingSend(2,1203)=1 exch2_pij(1,2,1203)=1 exch2_pij(2,2,1203)=0 exch2_pij(3,2,1203)=0 exch2_pij(4,2,1203)=1 exch2_oi(2,1203)=0 exch2_oj(2,1203)=0 exch2_neighbourId(3,1203)=1204 exch2_iLo(3,1203)=35 exch2_iHi(3,1203)=35 exch2_jLo(3,1203)=0 exch2_jHi(3,1203)=35 exch2_opposingSend(3,1203)=4 exch2_pij(1,3,1203)=1 exch2_pij(2,3,1203)=0 exch2_pij(3,3,1203)=0 exch2_pij(4,3,1203)=1 exch2_oi(3,1203)=0 exch2_oj(3,1203)=0 exch2_neighbourId(4,1203)=1202 exch2_iLo(4,1203)=0 exch2_iHi(4,1203)=0 exch2_jLo(4,1203)=0 exch2_jHi(4,1203)=35 exch2_opposingSend(4,1203)=3 exch2_pij(1,4,1203)=1 exch2_pij(2,4,1203)=0 exch2_pij(3,4,1203)=0 exch2_pij(4,4,1203)=1 exch2_oi(4,1203)=0 exch2_oj(4,1203)=0 RETURN END SUBROUTINE W2_E2SETUP_1204 C Topology for tile 1204 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1204)=34 exch2_tNy(1204)=34 exch2_tBasex(1204)=102 exch2_tBasey(1204)=170 exch2_txGlobalo(1204)=2653 exch2_tyGlobalo(1204)=171 exch2_isWedge(1204)=0 exch2_isNedge(1204)=0 exch2_isEedge(1204)=0 exch2_isSedge(1204)=0 exch2_myFace(1204)=6 exch2_mydNx(1204)=510 exch2_mydNy(1204)=510 exch2_nNeighbours(1204)=4 exch2_neighbourId(1,1204)=1219 exch2_iLo(1,1204)=0 exch2_iHi(1,1204)=35 exch2_jLo(1,1204)=35 exch2_jHi(1,1204)=35 exch2_opposingSend(1,1204)=2 exch2_pij(1,1,1204)=1 exch2_pij(2,1,1204)=0 exch2_pij(3,1,1204)=0 exch2_pij(4,1,1204)=1 exch2_oi(1,1204)=0 exch2_oj(1,1204)=0 exch2_neighbourId(2,1204)=1189 exch2_iLo(2,1204)=0 exch2_iHi(2,1204)=35 exch2_jLo(2,1204)=0 exch2_jHi(2,1204)=0 exch2_opposingSend(2,1204)=1 exch2_pij(1,2,1204)=1 exch2_pij(2,2,1204)=0 exch2_pij(3,2,1204)=0 exch2_pij(4,2,1204)=1 exch2_oi(2,1204)=0 exch2_oj(2,1204)=0 exch2_neighbourId(3,1204)=1205 exch2_iLo(3,1204)=35 exch2_iHi(3,1204)=35 exch2_jLo(3,1204)=0 exch2_jHi(3,1204)=35 exch2_opposingSend(3,1204)=4 exch2_pij(1,3,1204)=1 exch2_pij(2,3,1204)=0 exch2_pij(3,3,1204)=0 exch2_pij(4,3,1204)=1 exch2_oi(3,1204)=0 exch2_oj(3,1204)=0 exch2_neighbourId(4,1204)=1203 exch2_iLo(4,1204)=0 exch2_iHi(4,1204)=0 exch2_jLo(4,1204)=0 exch2_jHi(4,1204)=35 exch2_opposingSend(4,1204)=3 exch2_pij(1,4,1204)=1 exch2_pij(2,4,1204)=0 exch2_pij(3,4,1204)=0 exch2_pij(4,4,1204)=1 exch2_oi(4,1204)=0 exch2_oj(4,1204)=0 RETURN END SUBROUTINE W2_E2SETUP_1205 C Topology for tile 1205 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1205)=34 exch2_tNy(1205)=34 exch2_tBasex(1205)=136 exch2_tBasey(1205)=170 exch2_txGlobalo(1205)=2687 exch2_tyGlobalo(1205)=171 exch2_isWedge(1205)=0 exch2_isNedge(1205)=0 exch2_isEedge(1205)=0 exch2_isSedge(1205)=0 exch2_myFace(1205)=6 exch2_mydNx(1205)=510 exch2_mydNy(1205)=510 exch2_nNeighbours(1205)=4 exch2_neighbourId(1,1205)=1220 exch2_iLo(1,1205)=0 exch2_iHi(1,1205)=35 exch2_jLo(1,1205)=35 exch2_jHi(1,1205)=35 exch2_opposingSend(1,1205)=2 exch2_pij(1,1,1205)=1 exch2_pij(2,1,1205)=0 exch2_pij(3,1,1205)=0 exch2_pij(4,1,1205)=1 exch2_oi(1,1205)=0 exch2_oj(1,1205)=0 exch2_neighbourId(2,1205)=1190 exch2_iLo(2,1205)=0 exch2_iHi(2,1205)=35 exch2_jLo(2,1205)=0 exch2_jHi(2,1205)=0 exch2_opposingSend(2,1205)=1 exch2_pij(1,2,1205)=1 exch2_pij(2,2,1205)=0 exch2_pij(3,2,1205)=0 exch2_pij(4,2,1205)=1 exch2_oi(2,1205)=0 exch2_oj(2,1205)=0 exch2_neighbourId(3,1205)=1206 exch2_iLo(3,1205)=35 exch2_iHi(3,1205)=35 exch2_jLo(3,1205)=0 exch2_jHi(3,1205)=35 exch2_opposingSend(3,1205)=4 exch2_pij(1,3,1205)=1 exch2_pij(2,3,1205)=0 exch2_pij(3,3,1205)=0 exch2_pij(4,3,1205)=1 exch2_oi(3,1205)=0 exch2_oj(3,1205)=0 exch2_neighbourId(4,1205)=1204 exch2_iLo(4,1205)=0 exch2_iHi(4,1205)=0 exch2_jLo(4,1205)=0 exch2_jHi(4,1205)=35 exch2_opposingSend(4,1205)=3 exch2_pij(1,4,1205)=1 exch2_pij(2,4,1205)=0 exch2_pij(3,4,1205)=0 exch2_pij(4,4,1205)=1 exch2_oi(4,1205)=0 exch2_oj(4,1205)=0 RETURN END SUBROUTINE W2_E2SETUP_1206 C Topology for tile 1206 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1206)=34 exch2_tNy(1206)=34 exch2_tBasex(1206)=170 exch2_tBasey(1206)=170 exch2_txGlobalo(1206)=2721 exch2_tyGlobalo(1206)=171 exch2_isWedge(1206)=0 exch2_isNedge(1206)=0 exch2_isEedge(1206)=0 exch2_isSedge(1206)=0 exch2_myFace(1206)=6 exch2_mydNx(1206)=510 exch2_mydNy(1206)=510 exch2_nNeighbours(1206)=4 exch2_neighbourId(1,1206)=1221 exch2_iLo(1,1206)=0 exch2_iHi(1,1206)=35 exch2_jLo(1,1206)=35 exch2_jHi(1,1206)=35 exch2_opposingSend(1,1206)=2 exch2_pij(1,1,1206)=1 exch2_pij(2,1,1206)=0 exch2_pij(3,1,1206)=0 exch2_pij(4,1,1206)=1 exch2_oi(1,1206)=0 exch2_oj(1,1206)=0 exch2_neighbourId(2,1206)=1191 exch2_iLo(2,1206)=0 exch2_iHi(2,1206)=35 exch2_jLo(2,1206)=0 exch2_jHi(2,1206)=0 exch2_opposingSend(2,1206)=1 exch2_pij(1,2,1206)=1 exch2_pij(2,2,1206)=0 exch2_pij(3,2,1206)=0 exch2_pij(4,2,1206)=1 exch2_oi(2,1206)=0 exch2_oj(2,1206)=0 exch2_neighbourId(3,1206)=1207 exch2_iLo(3,1206)=35 exch2_iHi(3,1206)=35 exch2_jLo(3,1206)=0 exch2_jHi(3,1206)=35 exch2_opposingSend(3,1206)=4 exch2_pij(1,3,1206)=1 exch2_pij(2,3,1206)=0 exch2_pij(3,3,1206)=0 exch2_pij(4,3,1206)=1 exch2_oi(3,1206)=0 exch2_oj(3,1206)=0 exch2_neighbourId(4,1206)=1205 exch2_iLo(4,1206)=0 exch2_iHi(4,1206)=0 exch2_jLo(4,1206)=0 exch2_jHi(4,1206)=35 exch2_opposingSend(4,1206)=3 exch2_pij(1,4,1206)=1 exch2_pij(2,4,1206)=0 exch2_pij(3,4,1206)=0 exch2_pij(4,4,1206)=1 exch2_oi(4,1206)=0 exch2_oj(4,1206)=0 RETURN END SUBROUTINE W2_E2SETUP_1207 C Topology for tile 1207 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1207)=34 exch2_tNy(1207)=34 exch2_tBasex(1207)=204 exch2_tBasey(1207)=170 exch2_txGlobalo(1207)=2755 exch2_tyGlobalo(1207)=171 exch2_isWedge(1207)=0 exch2_isNedge(1207)=0 exch2_isEedge(1207)=0 exch2_isSedge(1207)=0 exch2_myFace(1207)=6 exch2_mydNx(1207)=510 exch2_mydNy(1207)=510 exch2_nNeighbours(1207)=4 exch2_neighbourId(1,1207)=1222 exch2_iLo(1,1207)=0 exch2_iHi(1,1207)=35 exch2_jLo(1,1207)=35 exch2_jHi(1,1207)=35 exch2_opposingSend(1,1207)=2 exch2_pij(1,1,1207)=1 exch2_pij(2,1,1207)=0 exch2_pij(3,1,1207)=0 exch2_pij(4,1,1207)=1 exch2_oi(1,1207)=0 exch2_oj(1,1207)=0 exch2_neighbourId(2,1207)=1192 exch2_iLo(2,1207)=0 exch2_iHi(2,1207)=35 exch2_jLo(2,1207)=0 exch2_jHi(2,1207)=0 exch2_opposingSend(2,1207)=1 exch2_pij(1,2,1207)=1 exch2_pij(2,2,1207)=0 exch2_pij(3,2,1207)=0 exch2_pij(4,2,1207)=1 exch2_oi(2,1207)=0 exch2_oj(2,1207)=0 exch2_neighbourId(3,1207)=1208 exch2_iLo(3,1207)=35 exch2_iHi(3,1207)=35 exch2_jLo(3,1207)=0 exch2_jHi(3,1207)=35 exch2_opposingSend(3,1207)=4 exch2_pij(1,3,1207)=1 exch2_pij(2,3,1207)=0 exch2_pij(3,3,1207)=0 exch2_pij(4,3,1207)=1 exch2_oi(3,1207)=0 exch2_oj(3,1207)=0 exch2_neighbourId(4,1207)=1206 exch2_iLo(4,1207)=0 exch2_iHi(4,1207)=0 exch2_jLo(4,1207)=0 exch2_jHi(4,1207)=35 exch2_opposingSend(4,1207)=3 exch2_pij(1,4,1207)=1 exch2_pij(2,4,1207)=0 exch2_pij(3,4,1207)=0 exch2_pij(4,4,1207)=1 exch2_oi(4,1207)=0 exch2_oj(4,1207)=0 RETURN END SUBROUTINE W2_E2SETUP_1208 C Topology for tile 1208 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1208)=34 exch2_tNy(1208)=34 exch2_tBasex(1208)=238 exch2_tBasey(1208)=170 exch2_txGlobalo(1208)=2789 exch2_tyGlobalo(1208)=171 exch2_isWedge(1208)=0 exch2_isNedge(1208)=0 exch2_isEedge(1208)=0 exch2_isSedge(1208)=0 exch2_myFace(1208)=6 exch2_mydNx(1208)=510 exch2_mydNy(1208)=510 exch2_nNeighbours(1208)=4 exch2_neighbourId(1,1208)=1223 exch2_iLo(1,1208)=0 exch2_iHi(1,1208)=35 exch2_jLo(1,1208)=35 exch2_jHi(1,1208)=35 exch2_opposingSend(1,1208)=2 exch2_pij(1,1,1208)=1 exch2_pij(2,1,1208)=0 exch2_pij(3,1,1208)=0 exch2_pij(4,1,1208)=1 exch2_oi(1,1208)=0 exch2_oj(1,1208)=0 exch2_neighbourId(2,1208)=1193 exch2_iLo(2,1208)=0 exch2_iHi(2,1208)=35 exch2_jLo(2,1208)=0 exch2_jHi(2,1208)=0 exch2_opposingSend(2,1208)=1 exch2_pij(1,2,1208)=1 exch2_pij(2,2,1208)=0 exch2_pij(3,2,1208)=0 exch2_pij(4,2,1208)=1 exch2_oi(2,1208)=0 exch2_oj(2,1208)=0 exch2_neighbourId(3,1208)=1209 exch2_iLo(3,1208)=35 exch2_iHi(3,1208)=35 exch2_jLo(3,1208)=0 exch2_jHi(3,1208)=35 exch2_opposingSend(3,1208)=4 exch2_pij(1,3,1208)=1 exch2_pij(2,3,1208)=0 exch2_pij(3,3,1208)=0 exch2_pij(4,3,1208)=1 exch2_oi(3,1208)=0 exch2_oj(3,1208)=0 exch2_neighbourId(4,1208)=1207 exch2_iLo(4,1208)=0 exch2_iHi(4,1208)=0 exch2_jLo(4,1208)=0 exch2_jHi(4,1208)=35 exch2_opposingSend(4,1208)=3 exch2_pij(1,4,1208)=1 exch2_pij(2,4,1208)=0 exch2_pij(3,4,1208)=0 exch2_pij(4,4,1208)=1 exch2_oi(4,1208)=0 exch2_oj(4,1208)=0 RETURN END SUBROUTINE W2_E2SETUP_1209 C Topology for tile 1209 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1209)=34 exch2_tNy(1209)=34 exch2_tBasex(1209)=272 exch2_tBasey(1209)=170 exch2_txGlobalo(1209)=2823 exch2_tyGlobalo(1209)=171 exch2_isWedge(1209)=0 exch2_isNedge(1209)=0 exch2_isEedge(1209)=0 exch2_isSedge(1209)=0 exch2_myFace(1209)=6 exch2_mydNx(1209)=510 exch2_mydNy(1209)=510 exch2_nNeighbours(1209)=4 exch2_neighbourId(1,1209)=1224 exch2_iLo(1,1209)=0 exch2_iHi(1,1209)=35 exch2_jLo(1,1209)=35 exch2_jHi(1,1209)=35 exch2_opposingSend(1,1209)=2 exch2_pij(1,1,1209)=1 exch2_pij(2,1,1209)=0 exch2_pij(3,1,1209)=0 exch2_pij(4,1,1209)=1 exch2_oi(1,1209)=0 exch2_oj(1,1209)=0 exch2_neighbourId(2,1209)=1194 exch2_iLo(2,1209)=0 exch2_iHi(2,1209)=35 exch2_jLo(2,1209)=0 exch2_jHi(2,1209)=0 exch2_opposingSend(2,1209)=1 exch2_pij(1,2,1209)=1 exch2_pij(2,2,1209)=0 exch2_pij(3,2,1209)=0 exch2_pij(4,2,1209)=1 exch2_oi(2,1209)=0 exch2_oj(2,1209)=0 exch2_neighbourId(3,1209)=1210 exch2_iLo(3,1209)=35 exch2_iHi(3,1209)=35 exch2_jLo(3,1209)=0 exch2_jHi(3,1209)=35 exch2_opposingSend(3,1209)=4 exch2_pij(1,3,1209)=1 exch2_pij(2,3,1209)=0 exch2_pij(3,3,1209)=0 exch2_pij(4,3,1209)=1 exch2_oi(3,1209)=0 exch2_oj(3,1209)=0 exch2_neighbourId(4,1209)=1208 exch2_iLo(4,1209)=0 exch2_iHi(4,1209)=0 exch2_jLo(4,1209)=0 exch2_jHi(4,1209)=35 exch2_opposingSend(4,1209)=3 exch2_pij(1,4,1209)=1 exch2_pij(2,4,1209)=0 exch2_pij(3,4,1209)=0 exch2_pij(4,4,1209)=1 exch2_oi(4,1209)=0 exch2_oj(4,1209)=0 RETURN END SUBROUTINE W2_E2SETUP_1210 C Topology for tile 1210 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1210)=34 exch2_tNy(1210)=34 exch2_tBasex(1210)=306 exch2_tBasey(1210)=170 exch2_txGlobalo(1210)=2857 exch2_tyGlobalo(1210)=171 exch2_isWedge(1210)=0 exch2_isNedge(1210)=0 exch2_isEedge(1210)=0 exch2_isSedge(1210)=0 exch2_myFace(1210)=6 exch2_mydNx(1210)=510 exch2_mydNy(1210)=510 exch2_nNeighbours(1210)=4 exch2_neighbourId(1,1210)=1225 exch2_iLo(1,1210)=0 exch2_iHi(1,1210)=35 exch2_jLo(1,1210)=35 exch2_jHi(1,1210)=35 exch2_opposingSend(1,1210)=2 exch2_pij(1,1,1210)=1 exch2_pij(2,1,1210)=0 exch2_pij(3,1,1210)=0 exch2_pij(4,1,1210)=1 exch2_oi(1,1210)=0 exch2_oj(1,1210)=0 exch2_neighbourId(2,1210)=1195 exch2_iLo(2,1210)=0 exch2_iHi(2,1210)=35 exch2_jLo(2,1210)=0 exch2_jHi(2,1210)=0 exch2_opposingSend(2,1210)=1 exch2_pij(1,2,1210)=1 exch2_pij(2,2,1210)=0 exch2_pij(3,2,1210)=0 exch2_pij(4,2,1210)=1 exch2_oi(2,1210)=0 exch2_oj(2,1210)=0 exch2_neighbourId(3,1210)=1211 exch2_iLo(3,1210)=35 exch2_iHi(3,1210)=35 exch2_jLo(3,1210)=0 exch2_jHi(3,1210)=35 exch2_opposingSend(3,1210)=4 exch2_pij(1,3,1210)=1 exch2_pij(2,3,1210)=0 exch2_pij(3,3,1210)=0 exch2_pij(4,3,1210)=1 exch2_oi(3,1210)=0 exch2_oj(3,1210)=0 exch2_neighbourId(4,1210)=1209 exch2_iLo(4,1210)=0 exch2_iHi(4,1210)=0 exch2_jLo(4,1210)=0 exch2_jHi(4,1210)=35 exch2_opposingSend(4,1210)=3 exch2_pij(1,4,1210)=1 exch2_pij(2,4,1210)=0 exch2_pij(3,4,1210)=0 exch2_pij(4,4,1210)=1 exch2_oi(4,1210)=0 exch2_oj(4,1210)=0 RETURN END SUBROUTINE W2_E2SETUP_1211 C Topology for tile 1211 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1211)=34 exch2_tNy(1211)=34 exch2_tBasex(1211)=340 exch2_tBasey(1211)=170 exch2_txGlobalo(1211)=2891 exch2_tyGlobalo(1211)=171 exch2_isWedge(1211)=0 exch2_isNedge(1211)=0 exch2_isEedge(1211)=0 exch2_isSedge(1211)=0 exch2_myFace(1211)=6 exch2_mydNx(1211)=510 exch2_mydNy(1211)=510 exch2_nNeighbours(1211)=4 exch2_neighbourId(1,1211)=1226 exch2_iLo(1,1211)=0 exch2_iHi(1,1211)=35 exch2_jLo(1,1211)=35 exch2_jHi(1,1211)=35 exch2_opposingSend(1,1211)=2 exch2_pij(1,1,1211)=1 exch2_pij(2,1,1211)=0 exch2_pij(3,1,1211)=0 exch2_pij(4,1,1211)=1 exch2_oi(1,1211)=0 exch2_oj(1,1211)=0 exch2_neighbourId(2,1211)=1196 exch2_iLo(2,1211)=0 exch2_iHi(2,1211)=35 exch2_jLo(2,1211)=0 exch2_jHi(2,1211)=0 exch2_opposingSend(2,1211)=1 exch2_pij(1,2,1211)=1 exch2_pij(2,2,1211)=0 exch2_pij(3,2,1211)=0 exch2_pij(4,2,1211)=1 exch2_oi(2,1211)=0 exch2_oj(2,1211)=0 exch2_neighbourId(3,1211)=1212 exch2_iLo(3,1211)=35 exch2_iHi(3,1211)=35 exch2_jLo(3,1211)=0 exch2_jHi(3,1211)=35 exch2_opposingSend(3,1211)=4 exch2_pij(1,3,1211)=1 exch2_pij(2,3,1211)=0 exch2_pij(3,3,1211)=0 exch2_pij(4,3,1211)=1 exch2_oi(3,1211)=0 exch2_oj(3,1211)=0 exch2_neighbourId(4,1211)=1210 exch2_iLo(4,1211)=0 exch2_iHi(4,1211)=0 exch2_jLo(4,1211)=0 exch2_jHi(4,1211)=35 exch2_opposingSend(4,1211)=3 exch2_pij(1,4,1211)=1 exch2_pij(2,4,1211)=0 exch2_pij(3,4,1211)=0 exch2_pij(4,4,1211)=1 exch2_oi(4,1211)=0 exch2_oj(4,1211)=0 RETURN END SUBROUTINE W2_E2SETUP_1212 C Topology for tile 1212 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1212)=34 exch2_tNy(1212)=34 exch2_tBasex(1212)=374 exch2_tBasey(1212)=170 exch2_txGlobalo(1212)=2925 exch2_tyGlobalo(1212)=171 exch2_isWedge(1212)=0 exch2_isNedge(1212)=0 exch2_isEedge(1212)=0 exch2_isSedge(1212)=0 exch2_myFace(1212)=6 exch2_mydNx(1212)=510 exch2_mydNy(1212)=510 exch2_nNeighbours(1212)=4 exch2_neighbourId(1,1212)=1227 exch2_iLo(1,1212)=0 exch2_iHi(1,1212)=35 exch2_jLo(1,1212)=35 exch2_jHi(1,1212)=35 exch2_opposingSend(1,1212)=2 exch2_pij(1,1,1212)=1 exch2_pij(2,1,1212)=0 exch2_pij(3,1,1212)=0 exch2_pij(4,1,1212)=1 exch2_oi(1,1212)=0 exch2_oj(1,1212)=0 exch2_neighbourId(2,1212)=1197 exch2_iLo(2,1212)=0 exch2_iHi(2,1212)=35 exch2_jLo(2,1212)=0 exch2_jHi(2,1212)=0 exch2_opposingSend(2,1212)=1 exch2_pij(1,2,1212)=1 exch2_pij(2,2,1212)=0 exch2_pij(3,2,1212)=0 exch2_pij(4,2,1212)=1 exch2_oi(2,1212)=0 exch2_oj(2,1212)=0 exch2_neighbourId(3,1212)=1213 exch2_iLo(3,1212)=35 exch2_iHi(3,1212)=35 exch2_jLo(3,1212)=0 exch2_jHi(3,1212)=35 exch2_opposingSend(3,1212)=4 exch2_pij(1,3,1212)=1 exch2_pij(2,3,1212)=0 exch2_pij(3,3,1212)=0 exch2_pij(4,3,1212)=1 exch2_oi(3,1212)=0 exch2_oj(3,1212)=0 exch2_neighbourId(4,1212)=1211 exch2_iLo(4,1212)=0 exch2_iHi(4,1212)=0 exch2_jLo(4,1212)=0 exch2_jHi(4,1212)=35 exch2_opposingSend(4,1212)=3 exch2_pij(1,4,1212)=1 exch2_pij(2,4,1212)=0 exch2_pij(3,4,1212)=0 exch2_pij(4,4,1212)=1 exch2_oi(4,1212)=0 exch2_oj(4,1212)=0 RETURN END SUBROUTINE W2_E2SETUP_1213 C Topology for tile 1213 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1213)=34 exch2_tNy(1213)=34 exch2_tBasex(1213)=408 exch2_tBasey(1213)=170 exch2_txGlobalo(1213)=2959 exch2_tyGlobalo(1213)=171 exch2_isWedge(1213)=0 exch2_isNedge(1213)=0 exch2_isEedge(1213)=0 exch2_isSedge(1213)=0 exch2_myFace(1213)=6 exch2_mydNx(1213)=510 exch2_mydNy(1213)=510 exch2_nNeighbours(1213)=4 exch2_neighbourId(1,1213)=1228 exch2_iLo(1,1213)=0 exch2_iHi(1,1213)=35 exch2_jLo(1,1213)=35 exch2_jHi(1,1213)=35 exch2_opposingSend(1,1213)=2 exch2_pij(1,1,1213)=1 exch2_pij(2,1,1213)=0 exch2_pij(3,1,1213)=0 exch2_pij(4,1,1213)=1 exch2_oi(1,1213)=0 exch2_oj(1,1213)=0 exch2_neighbourId(2,1213)=1198 exch2_iLo(2,1213)=0 exch2_iHi(2,1213)=35 exch2_jLo(2,1213)=0 exch2_jHi(2,1213)=0 exch2_opposingSend(2,1213)=1 exch2_pij(1,2,1213)=1 exch2_pij(2,2,1213)=0 exch2_pij(3,2,1213)=0 exch2_pij(4,2,1213)=1 exch2_oi(2,1213)=0 exch2_oj(2,1213)=0 exch2_neighbourId(3,1213)=1214 exch2_iLo(3,1213)=35 exch2_iHi(3,1213)=35 exch2_jLo(3,1213)=0 exch2_jHi(3,1213)=35 exch2_opposingSend(3,1213)=4 exch2_pij(1,3,1213)=1 exch2_pij(2,3,1213)=0 exch2_pij(3,3,1213)=0 exch2_pij(4,3,1213)=1 exch2_oi(3,1213)=0 exch2_oj(3,1213)=0 exch2_neighbourId(4,1213)=1212 exch2_iLo(4,1213)=0 exch2_iHi(4,1213)=0 exch2_jLo(4,1213)=0 exch2_jHi(4,1213)=35 exch2_opposingSend(4,1213)=3 exch2_pij(1,4,1213)=1 exch2_pij(2,4,1213)=0 exch2_pij(3,4,1213)=0 exch2_pij(4,4,1213)=1 exch2_oi(4,1213)=0 exch2_oj(4,1213)=0 RETURN END SUBROUTINE W2_E2SETUP_1214 C Topology for tile 1214 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1214)=34 exch2_tNy(1214)=34 exch2_tBasex(1214)=442 exch2_tBasey(1214)=170 exch2_txGlobalo(1214)=2993 exch2_tyGlobalo(1214)=171 exch2_isWedge(1214)=0 exch2_isNedge(1214)=0 exch2_isEedge(1214)=0 exch2_isSedge(1214)=0 exch2_myFace(1214)=6 exch2_mydNx(1214)=510 exch2_mydNy(1214)=510 exch2_nNeighbours(1214)=4 exch2_neighbourId(1,1214)=1229 exch2_iLo(1,1214)=0 exch2_iHi(1,1214)=35 exch2_jLo(1,1214)=35 exch2_jHi(1,1214)=35 exch2_opposingSend(1,1214)=2 exch2_pij(1,1,1214)=1 exch2_pij(2,1,1214)=0 exch2_pij(3,1,1214)=0 exch2_pij(4,1,1214)=1 exch2_oi(1,1214)=0 exch2_oj(1,1214)=0 exch2_neighbourId(2,1214)=1199 exch2_iLo(2,1214)=0 exch2_iHi(2,1214)=35 exch2_jLo(2,1214)=0 exch2_jHi(2,1214)=0 exch2_opposingSend(2,1214)=1 exch2_pij(1,2,1214)=1 exch2_pij(2,2,1214)=0 exch2_pij(3,2,1214)=0 exch2_pij(4,2,1214)=1 exch2_oi(2,1214)=0 exch2_oj(2,1214)=0 exch2_neighbourId(3,1214)=1215 exch2_iLo(3,1214)=35 exch2_iHi(3,1214)=35 exch2_jLo(3,1214)=0 exch2_jHi(3,1214)=35 exch2_opposingSend(3,1214)=4 exch2_pij(1,3,1214)=1 exch2_pij(2,3,1214)=0 exch2_pij(3,3,1214)=0 exch2_pij(4,3,1214)=1 exch2_oi(3,1214)=0 exch2_oj(3,1214)=0 exch2_neighbourId(4,1214)=1213 exch2_iLo(4,1214)=0 exch2_iHi(4,1214)=0 exch2_jLo(4,1214)=0 exch2_jHi(4,1214)=35 exch2_opposingSend(4,1214)=3 exch2_pij(1,4,1214)=1 exch2_pij(2,4,1214)=0 exch2_pij(3,4,1214)=0 exch2_pij(4,4,1214)=1 exch2_oi(4,1214)=0 exch2_oj(4,1214)=0 RETURN END SUBROUTINE W2_E2SETUP_1215 C Topology for tile 1215 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1215)=34 exch2_tNy(1215)=34 exch2_tBasex(1215)=476 exch2_tBasey(1215)=170 exch2_txGlobalo(1215)=3027 exch2_tyGlobalo(1215)=171 exch2_isWedge(1215)=0 exch2_isNedge(1215)=0 exch2_isEedge(1215)=1 exch2_isSedge(1215)=0 exch2_myFace(1215)=6 exch2_mydNx(1215)=510 exch2_mydNy(1215)=510 exch2_nNeighbours(1215)=4 exch2_neighbourId(1,1215)=1230 exch2_iLo(1,1215)=0 exch2_iHi(1,1215)=35 exch2_jLo(1,1215)=35 exch2_jHi(1,1215)=35 exch2_opposingSend(1,1215)=2 exch2_pij(1,1,1215)=1 exch2_pij(2,1,1215)=0 exch2_pij(3,1,1215)=0 exch2_pij(4,1,1215)=1 exch2_oi(1,1215)=0 exch2_oj(1,1215)=0 exch2_neighbourId(2,1215)=1200 exch2_iLo(2,1215)=0 exch2_iHi(2,1215)=35 exch2_jLo(2,1215)=0 exch2_jHi(2,1215)=0 exch2_opposingSend(2,1215)=1 exch2_pij(1,2,1215)=1 exch2_pij(2,2,1215)=0 exch2_pij(3,2,1215)=0 exch2_pij(4,2,1215)=1 exch2_oi(2,1215)=0 exch2_oj(2,1215)=0 exch2_neighbourId(3,1215)=235 exch2_iLo(3,1215)=35 exch2_iHi(3,1215)=35 exch2_jLo(3,1215)=0 exch2_jHi(3,1215)=35 exch2_opposingSend(3,1215)=2 exch2_pij(1,3,1215)=0 exch2_pij(2,3,1215)=1 exch2_pij(3,3,1215)=-1 exch2_pij(4,3,1215)=0 exch2_oi(3,1215)=510 exch2_oj(3,1215)=511 exch2_neighbourId(4,1215)=1214 exch2_iLo(4,1215)=0 exch2_iHi(4,1215)=0 exch2_jLo(4,1215)=0 exch2_jHi(4,1215)=35 exch2_opposingSend(4,1215)=3 exch2_pij(1,4,1215)=1 exch2_pij(2,4,1215)=0 exch2_pij(3,4,1215)=0 exch2_pij(4,4,1215)=1 exch2_oi(4,1215)=0 exch2_oj(4,1215)=0 RETURN END SUBROUTINE W2_E2SETUP_1216 C Topology for tile 1216 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1216)=34 exch2_tNy(1216)=34 exch2_tBasex(1216)=0 exch2_tBasey(1216)=204 exch2_txGlobalo(1216)=2551 exch2_tyGlobalo(1216)=205 exch2_isWedge(1216)=1 exch2_isNedge(1216)=0 exch2_isEedge(1216)=0 exch2_isSedge(1216)=0 exch2_myFace(1216)=6 exch2_mydNx(1216)=510 exch2_mydNy(1216)=510 exch2_nNeighbours(1216)=4 exch2_neighbourId(1,1216)=1231 exch2_iLo(1,1216)=0 exch2_iHi(1,1216)=35 exch2_jLo(1,1216)=35 exch2_jHi(1,1216)=35 exch2_opposingSend(1,1216)=2 exch2_pij(1,1,1216)=1 exch2_pij(2,1,1216)=0 exch2_pij(3,1,1216)=0 exch2_pij(4,1,1216)=1 exch2_oi(1,1216)=0 exch2_oj(1,1216)=0 exch2_neighbourId(2,1216)=1201 exch2_iLo(2,1216)=0 exch2_iHi(2,1216)=35 exch2_jLo(2,1216)=0 exch2_jHi(2,1216)=0 exch2_opposingSend(2,1216)=1 exch2_pij(1,2,1216)=1 exch2_pij(2,2,1216)=0 exch2_pij(3,2,1216)=0 exch2_pij(4,2,1216)=1 exch2_oi(2,1216)=0 exch2_oj(2,1216)=0 exch2_neighbourId(3,1216)=1217 exch2_iLo(3,1216)=35 exch2_iHi(3,1216)=35 exch2_jLo(3,1216)=0 exch2_jHi(3,1216)=35 exch2_opposingSend(3,1216)=4 exch2_pij(1,3,1216)=1 exch2_pij(2,3,1216)=0 exch2_pij(3,3,1216)=0 exch2_pij(4,3,1216)=1 exch2_oi(3,1216)=0 exch2_oj(3,1216)=0 exch2_neighbourId(4,1216)=1005 exch2_iLo(4,1216)=0 exch2_iHi(4,1216)=0 exch2_jLo(4,1216)=0 exch2_jHi(4,1216)=35 exch2_opposingSend(4,1216)=3 exch2_pij(1,4,1216)=1 exch2_pij(2,4,1216)=0 exch2_pij(3,4,1216)=0 exch2_pij(4,4,1216)=1 exch2_oi(4,1216)=-510 exch2_oj(4,1216)=0 RETURN END SUBROUTINE W2_E2SETUP_1217 C Topology for tile 1217 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1217)=34 exch2_tNy(1217)=34 exch2_tBasex(1217)=34 exch2_tBasey(1217)=204 exch2_txGlobalo(1217)=2585 exch2_tyGlobalo(1217)=205 exch2_isWedge(1217)=0 exch2_isNedge(1217)=0 exch2_isEedge(1217)=0 exch2_isSedge(1217)=0 exch2_myFace(1217)=6 exch2_mydNx(1217)=510 exch2_mydNy(1217)=510 exch2_nNeighbours(1217)=4 exch2_neighbourId(1,1217)=1232 exch2_iLo(1,1217)=0 exch2_iHi(1,1217)=35 exch2_jLo(1,1217)=35 exch2_jHi(1,1217)=35 exch2_opposingSend(1,1217)=2 exch2_pij(1,1,1217)=1 exch2_pij(2,1,1217)=0 exch2_pij(3,1,1217)=0 exch2_pij(4,1,1217)=1 exch2_oi(1,1217)=0 exch2_oj(1,1217)=0 exch2_neighbourId(2,1217)=1202 exch2_iLo(2,1217)=0 exch2_iHi(2,1217)=35 exch2_jLo(2,1217)=0 exch2_jHi(2,1217)=0 exch2_opposingSend(2,1217)=1 exch2_pij(1,2,1217)=1 exch2_pij(2,2,1217)=0 exch2_pij(3,2,1217)=0 exch2_pij(4,2,1217)=1 exch2_oi(2,1217)=0 exch2_oj(2,1217)=0 exch2_neighbourId(3,1217)=1218 exch2_iLo(3,1217)=35 exch2_iHi(3,1217)=35 exch2_jLo(3,1217)=0 exch2_jHi(3,1217)=35 exch2_opposingSend(3,1217)=4 exch2_pij(1,3,1217)=1 exch2_pij(2,3,1217)=0 exch2_pij(3,3,1217)=0 exch2_pij(4,3,1217)=1 exch2_oi(3,1217)=0 exch2_oj(3,1217)=0 exch2_neighbourId(4,1217)=1216 exch2_iLo(4,1217)=0 exch2_iHi(4,1217)=0 exch2_jLo(4,1217)=0 exch2_jHi(4,1217)=35 exch2_opposingSend(4,1217)=3 exch2_pij(1,4,1217)=1 exch2_pij(2,4,1217)=0 exch2_pij(3,4,1217)=0 exch2_pij(4,4,1217)=1 exch2_oi(4,1217)=0 exch2_oj(4,1217)=0 RETURN END SUBROUTINE W2_E2SETUP_1218 C Topology for tile 1218 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1218)=34 exch2_tNy(1218)=34 exch2_tBasex(1218)=68 exch2_tBasey(1218)=204 exch2_txGlobalo(1218)=2619 exch2_tyGlobalo(1218)=205 exch2_isWedge(1218)=0 exch2_isNedge(1218)=0 exch2_isEedge(1218)=0 exch2_isSedge(1218)=0 exch2_myFace(1218)=6 exch2_mydNx(1218)=510 exch2_mydNy(1218)=510 exch2_nNeighbours(1218)=4 exch2_neighbourId(1,1218)=1233 exch2_iLo(1,1218)=0 exch2_iHi(1,1218)=35 exch2_jLo(1,1218)=35 exch2_jHi(1,1218)=35 exch2_opposingSend(1,1218)=2 exch2_pij(1,1,1218)=1 exch2_pij(2,1,1218)=0 exch2_pij(3,1,1218)=0 exch2_pij(4,1,1218)=1 exch2_oi(1,1218)=0 exch2_oj(1,1218)=0 exch2_neighbourId(2,1218)=1203 exch2_iLo(2,1218)=0 exch2_iHi(2,1218)=35 exch2_jLo(2,1218)=0 exch2_jHi(2,1218)=0 exch2_opposingSend(2,1218)=1 exch2_pij(1,2,1218)=1 exch2_pij(2,2,1218)=0 exch2_pij(3,2,1218)=0 exch2_pij(4,2,1218)=1 exch2_oi(2,1218)=0 exch2_oj(2,1218)=0 exch2_neighbourId(3,1218)=1219 exch2_iLo(3,1218)=35 exch2_iHi(3,1218)=35 exch2_jLo(3,1218)=0 exch2_jHi(3,1218)=35 exch2_opposingSend(3,1218)=4 exch2_pij(1,3,1218)=1 exch2_pij(2,3,1218)=0 exch2_pij(3,3,1218)=0 exch2_pij(4,3,1218)=1 exch2_oi(3,1218)=0 exch2_oj(3,1218)=0 exch2_neighbourId(4,1218)=1217 exch2_iLo(4,1218)=0 exch2_iHi(4,1218)=0 exch2_jLo(4,1218)=0 exch2_jHi(4,1218)=35 exch2_opposingSend(4,1218)=3 exch2_pij(1,4,1218)=1 exch2_pij(2,4,1218)=0 exch2_pij(3,4,1218)=0 exch2_pij(4,4,1218)=1 exch2_oi(4,1218)=0 exch2_oj(4,1218)=0 RETURN END SUBROUTINE W2_E2SETUP_1219 C Topology for tile 1219 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1219)=34 exch2_tNy(1219)=34 exch2_tBasex(1219)=102 exch2_tBasey(1219)=204 exch2_txGlobalo(1219)=2653 exch2_tyGlobalo(1219)=205 exch2_isWedge(1219)=0 exch2_isNedge(1219)=0 exch2_isEedge(1219)=0 exch2_isSedge(1219)=0 exch2_myFace(1219)=6 exch2_mydNx(1219)=510 exch2_mydNy(1219)=510 exch2_nNeighbours(1219)=4 exch2_neighbourId(1,1219)=1234 exch2_iLo(1,1219)=0 exch2_iHi(1,1219)=35 exch2_jLo(1,1219)=35 exch2_jHi(1,1219)=35 exch2_opposingSend(1,1219)=2 exch2_pij(1,1,1219)=1 exch2_pij(2,1,1219)=0 exch2_pij(3,1,1219)=0 exch2_pij(4,1,1219)=1 exch2_oi(1,1219)=0 exch2_oj(1,1219)=0 exch2_neighbourId(2,1219)=1204 exch2_iLo(2,1219)=0 exch2_iHi(2,1219)=35 exch2_jLo(2,1219)=0 exch2_jHi(2,1219)=0 exch2_opposingSend(2,1219)=1 exch2_pij(1,2,1219)=1 exch2_pij(2,2,1219)=0 exch2_pij(3,2,1219)=0 exch2_pij(4,2,1219)=1 exch2_oi(2,1219)=0 exch2_oj(2,1219)=0 exch2_neighbourId(3,1219)=1220 exch2_iLo(3,1219)=35 exch2_iHi(3,1219)=35 exch2_jLo(3,1219)=0 exch2_jHi(3,1219)=35 exch2_opposingSend(3,1219)=4 exch2_pij(1,3,1219)=1 exch2_pij(2,3,1219)=0 exch2_pij(3,3,1219)=0 exch2_pij(4,3,1219)=1 exch2_oi(3,1219)=0 exch2_oj(3,1219)=0 exch2_neighbourId(4,1219)=1218 exch2_iLo(4,1219)=0 exch2_iHi(4,1219)=0 exch2_jLo(4,1219)=0 exch2_jHi(4,1219)=35 exch2_opposingSend(4,1219)=3 exch2_pij(1,4,1219)=1 exch2_pij(2,4,1219)=0 exch2_pij(3,4,1219)=0 exch2_pij(4,4,1219)=1 exch2_oi(4,1219)=0 exch2_oj(4,1219)=0 RETURN END SUBROUTINE W2_E2SETUP_1220 C Topology for tile 1220 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1220)=34 exch2_tNy(1220)=34 exch2_tBasex(1220)=136 exch2_tBasey(1220)=204 exch2_txGlobalo(1220)=2687 exch2_tyGlobalo(1220)=205 exch2_isWedge(1220)=0 exch2_isNedge(1220)=0 exch2_isEedge(1220)=0 exch2_isSedge(1220)=0 exch2_myFace(1220)=6 exch2_mydNx(1220)=510 exch2_mydNy(1220)=510 exch2_nNeighbours(1220)=4 exch2_neighbourId(1,1220)=1235 exch2_iLo(1,1220)=0 exch2_iHi(1,1220)=35 exch2_jLo(1,1220)=35 exch2_jHi(1,1220)=35 exch2_opposingSend(1,1220)=2 exch2_pij(1,1,1220)=1 exch2_pij(2,1,1220)=0 exch2_pij(3,1,1220)=0 exch2_pij(4,1,1220)=1 exch2_oi(1,1220)=0 exch2_oj(1,1220)=0 exch2_neighbourId(2,1220)=1205 exch2_iLo(2,1220)=0 exch2_iHi(2,1220)=35 exch2_jLo(2,1220)=0 exch2_jHi(2,1220)=0 exch2_opposingSend(2,1220)=1 exch2_pij(1,2,1220)=1 exch2_pij(2,2,1220)=0 exch2_pij(3,2,1220)=0 exch2_pij(4,2,1220)=1 exch2_oi(2,1220)=0 exch2_oj(2,1220)=0 exch2_neighbourId(3,1220)=1221 exch2_iLo(3,1220)=35 exch2_iHi(3,1220)=35 exch2_jLo(3,1220)=0 exch2_jHi(3,1220)=35 exch2_opposingSend(3,1220)=4 exch2_pij(1,3,1220)=1 exch2_pij(2,3,1220)=0 exch2_pij(3,3,1220)=0 exch2_pij(4,3,1220)=1 exch2_oi(3,1220)=0 exch2_oj(3,1220)=0 exch2_neighbourId(4,1220)=1219 exch2_iLo(4,1220)=0 exch2_iHi(4,1220)=0 exch2_jLo(4,1220)=0 exch2_jHi(4,1220)=35 exch2_opposingSend(4,1220)=3 exch2_pij(1,4,1220)=1 exch2_pij(2,4,1220)=0 exch2_pij(3,4,1220)=0 exch2_pij(4,4,1220)=1 exch2_oi(4,1220)=0 exch2_oj(4,1220)=0 RETURN END SUBROUTINE W2_E2SETUP_1221 C Topology for tile 1221 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1221)=34 exch2_tNy(1221)=34 exch2_tBasex(1221)=170 exch2_tBasey(1221)=204 exch2_txGlobalo(1221)=2721 exch2_tyGlobalo(1221)=205 exch2_isWedge(1221)=0 exch2_isNedge(1221)=0 exch2_isEedge(1221)=0 exch2_isSedge(1221)=0 exch2_myFace(1221)=6 exch2_mydNx(1221)=510 exch2_mydNy(1221)=510 exch2_nNeighbours(1221)=4 exch2_neighbourId(1,1221)=1236 exch2_iLo(1,1221)=0 exch2_iHi(1,1221)=35 exch2_jLo(1,1221)=35 exch2_jHi(1,1221)=35 exch2_opposingSend(1,1221)=2 exch2_pij(1,1,1221)=1 exch2_pij(2,1,1221)=0 exch2_pij(3,1,1221)=0 exch2_pij(4,1,1221)=1 exch2_oi(1,1221)=0 exch2_oj(1,1221)=0 exch2_neighbourId(2,1221)=1206 exch2_iLo(2,1221)=0 exch2_iHi(2,1221)=35 exch2_jLo(2,1221)=0 exch2_jHi(2,1221)=0 exch2_opposingSend(2,1221)=1 exch2_pij(1,2,1221)=1 exch2_pij(2,2,1221)=0 exch2_pij(3,2,1221)=0 exch2_pij(4,2,1221)=1 exch2_oi(2,1221)=0 exch2_oj(2,1221)=0 exch2_neighbourId(3,1221)=1222 exch2_iLo(3,1221)=35 exch2_iHi(3,1221)=35 exch2_jLo(3,1221)=0 exch2_jHi(3,1221)=35 exch2_opposingSend(3,1221)=4 exch2_pij(1,3,1221)=1 exch2_pij(2,3,1221)=0 exch2_pij(3,3,1221)=0 exch2_pij(4,3,1221)=1 exch2_oi(3,1221)=0 exch2_oj(3,1221)=0 exch2_neighbourId(4,1221)=1220 exch2_iLo(4,1221)=0 exch2_iHi(4,1221)=0 exch2_jLo(4,1221)=0 exch2_jHi(4,1221)=35 exch2_opposingSend(4,1221)=3 exch2_pij(1,4,1221)=1 exch2_pij(2,4,1221)=0 exch2_pij(3,4,1221)=0 exch2_pij(4,4,1221)=1 exch2_oi(4,1221)=0 exch2_oj(4,1221)=0 RETURN END SUBROUTINE W2_E2SETUP_1222 C Topology for tile 1222 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1222)=34 exch2_tNy(1222)=34 exch2_tBasex(1222)=204 exch2_tBasey(1222)=204 exch2_txGlobalo(1222)=2755 exch2_tyGlobalo(1222)=205 exch2_isWedge(1222)=0 exch2_isNedge(1222)=0 exch2_isEedge(1222)=0 exch2_isSedge(1222)=0 exch2_myFace(1222)=6 exch2_mydNx(1222)=510 exch2_mydNy(1222)=510 exch2_nNeighbours(1222)=4 exch2_neighbourId(1,1222)=1237 exch2_iLo(1,1222)=0 exch2_iHi(1,1222)=35 exch2_jLo(1,1222)=35 exch2_jHi(1,1222)=35 exch2_opposingSend(1,1222)=2 exch2_pij(1,1,1222)=1 exch2_pij(2,1,1222)=0 exch2_pij(3,1,1222)=0 exch2_pij(4,1,1222)=1 exch2_oi(1,1222)=0 exch2_oj(1,1222)=0 exch2_neighbourId(2,1222)=1207 exch2_iLo(2,1222)=0 exch2_iHi(2,1222)=35 exch2_jLo(2,1222)=0 exch2_jHi(2,1222)=0 exch2_opposingSend(2,1222)=1 exch2_pij(1,2,1222)=1 exch2_pij(2,2,1222)=0 exch2_pij(3,2,1222)=0 exch2_pij(4,2,1222)=1 exch2_oi(2,1222)=0 exch2_oj(2,1222)=0 exch2_neighbourId(3,1222)=1223 exch2_iLo(3,1222)=35 exch2_iHi(3,1222)=35 exch2_jLo(3,1222)=0 exch2_jHi(3,1222)=35 exch2_opposingSend(3,1222)=4 exch2_pij(1,3,1222)=1 exch2_pij(2,3,1222)=0 exch2_pij(3,3,1222)=0 exch2_pij(4,3,1222)=1 exch2_oi(3,1222)=0 exch2_oj(3,1222)=0 exch2_neighbourId(4,1222)=1221 exch2_iLo(4,1222)=0 exch2_iHi(4,1222)=0 exch2_jLo(4,1222)=0 exch2_jHi(4,1222)=35 exch2_opposingSend(4,1222)=3 exch2_pij(1,4,1222)=1 exch2_pij(2,4,1222)=0 exch2_pij(3,4,1222)=0 exch2_pij(4,4,1222)=1 exch2_oi(4,1222)=0 exch2_oj(4,1222)=0 RETURN END SUBROUTINE W2_E2SETUP_1223 C Topology for tile 1223 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1223)=34 exch2_tNy(1223)=34 exch2_tBasex(1223)=238 exch2_tBasey(1223)=204 exch2_txGlobalo(1223)=2789 exch2_tyGlobalo(1223)=205 exch2_isWedge(1223)=0 exch2_isNedge(1223)=0 exch2_isEedge(1223)=0 exch2_isSedge(1223)=0 exch2_myFace(1223)=6 exch2_mydNx(1223)=510 exch2_mydNy(1223)=510 exch2_nNeighbours(1223)=4 exch2_neighbourId(1,1223)=1238 exch2_iLo(1,1223)=0 exch2_iHi(1,1223)=35 exch2_jLo(1,1223)=35 exch2_jHi(1,1223)=35 exch2_opposingSend(1,1223)=2 exch2_pij(1,1,1223)=1 exch2_pij(2,1,1223)=0 exch2_pij(3,1,1223)=0 exch2_pij(4,1,1223)=1 exch2_oi(1,1223)=0 exch2_oj(1,1223)=0 exch2_neighbourId(2,1223)=1208 exch2_iLo(2,1223)=0 exch2_iHi(2,1223)=35 exch2_jLo(2,1223)=0 exch2_jHi(2,1223)=0 exch2_opposingSend(2,1223)=1 exch2_pij(1,2,1223)=1 exch2_pij(2,2,1223)=0 exch2_pij(3,2,1223)=0 exch2_pij(4,2,1223)=1 exch2_oi(2,1223)=0 exch2_oj(2,1223)=0 exch2_neighbourId(3,1223)=1224 exch2_iLo(3,1223)=35 exch2_iHi(3,1223)=35 exch2_jLo(3,1223)=0 exch2_jHi(3,1223)=35 exch2_opposingSend(3,1223)=4 exch2_pij(1,3,1223)=1 exch2_pij(2,3,1223)=0 exch2_pij(3,3,1223)=0 exch2_pij(4,3,1223)=1 exch2_oi(3,1223)=0 exch2_oj(3,1223)=0 exch2_neighbourId(4,1223)=1222 exch2_iLo(4,1223)=0 exch2_iHi(4,1223)=0 exch2_jLo(4,1223)=0 exch2_jHi(4,1223)=35 exch2_opposingSend(4,1223)=3 exch2_pij(1,4,1223)=1 exch2_pij(2,4,1223)=0 exch2_pij(3,4,1223)=0 exch2_pij(4,4,1223)=1 exch2_oi(4,1223)=0 exch2_oj(4,1223)=0 RETURN END SUBROUTINE W2_E2SETUP_1224 C Topology for tile 1224 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1224)=34 exch2_tNy(1224)=34 exch2_tBasex(1224)=272 exch2_tBasey(1224)=204 exch2_txGlobalo(1224)=2823 exch2_tyGlobalo(1224)=205 exch2_isWedge(1224)=0 exch2_isNedge(1224)=0 exch2_isEedge(1224)=0 exch2_isSedge(1224)=0 exch2_myFace(1224)=6 exch2_mydNx(1224)=510 exch2_mydNy(1224)=510 exch2_nNeighbours(1224)=4 exch2_neighbourId(1,1224)=1239 exch2_iLo(1,1224)=0 exch2_iHi(1,1224)=35 exch2_jLo(1,1224)=35 exch2_jHi(1,1224)=35 exch2_opposingSend(1,1224)=2 exch2_pij(1,1,1224)=1 exch2_pij(2,1,1224)=0 exch2_pij(3,1,1224)=0 exch2_pij(4,1,1224)=1 exch2_oi(1,1224)=0 exch2_oj(1,1224)=0 exch2_neighbourId(2,1224)=1209 exch2_iLo(2,1224)=0 exch2_iHi(2,1224)=35 exch2_jLo(2,1224)=0 exch2_jHi(2,1224)=0 exch2_opposingSend(2,1224)=1 exch2_pij(1,2,1224)=1 exch2_pij(2,2,1224)=0 exch2_pij(3,2,1224)=0 exch2_pij(4,2,1224)=1 exch2_oi(2,1224)=0 exch2_oj(2,1224)=0 exch2_neighbourId(3,1224)=1225 exch2_iLo(3,1224)=35 exch2_iHi(3,1224)=35 exch2_jLo(3,1224)=0 exch2_jHi(3,1224)=35 exch2_opposingSend(3,1224)=4 exch2_pij(1,3,1224)=1 exch2_pij(2,3,1224)=0 exch2_pij(3,3,1224)=0 exch2_pij(4,3,1224)=1 exch2_oi(3,1224)=0 exch2_oj(3,1224)=0 exch2_neighbourId(4,1224)=1223 exch2_iLo(4,1224)=0 exch2_iHi(4,1224)=0 exch2_jLo(4,1224)=0 exch2_jHi(4,1224)=35 exch2_opposingSend(4,1224)=3 exch2_pij(1,4,1224)=1 exch2_pij(2,4,1224)=0 exch2_pij(3,4,1224)=0 exch2_pij(4,4,1224)=1 exch2_oi(4,1224)=0 exch2_oj(4,1224)=0 RETURN END SUBROUTINE W2_E2SETUP_1225 C Topology for tile 1225 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1225)=34 exch2_tNy(1225)=34 exch2_tBasex(1225)=306 exch2_tBasey(1225)=204 exch2_txGlobalo(1225)=2857 exch2_tyGlobalo(1225)=205 exch2_isWedge(1225)=0 exch2_isNedge(1225)=0 exch2_isEedge(1225)=0 exch2_isSedge(1225)=0 exch2_myFace(1225)=6 exch2_mydNx(1225)=510 exch2_mydNy(1225)=510 exch2_nNeighbours(1225)=4 exch2_neighbourId(1,1225)=1240 exch2_iLo(1,1225)=0 exch2_iHi(1,1225)=35 exch2_jLo(1,1225)=35 exch2_jHi(1,1225)=35 exch2_opposingSend(1,1225)=2 exch2_pij(1,1,1225)=1 exch2_pij(2,1,1225)=0 exch2_pij(3,1,1225)=0 exch2_pij(4,1,1225)=1 exch2_oi(1,1225)=0 exch2_oj(1,1225)=0 exch2_neighbourId(2,1225)=1210 exch2_iLo(2,1225)=0 exch2_iHi(2,1225)=35 exch2_jLo(2,1225)=0 exch2_jHi(2,1225)=0 exch2_opposingSend(2,1225)=1 exch2_pij(1,2,1225)=1 exch2_pij(2,2,1225)=0 exch2_pij(3,2,1225)=0 exch2_pij(4,2,1225)=1 exch2_oi(2,1225)=0 exch2_oj(2,1225)=0 exch2_neighbourId(3,1225)=1226 exch2_iLo(3,1225)=35 exch2_iHi(3,1225)=35 exch2_jLo(3,1225)=0 exch2_jHi(3,1225)=35 exch2_opposingSend(3,1225)=4 exch2_pij(1,3,1225)=1 exch2_pij(2,3,1225)=0 exch2_pij(3,3,1225)=0 exch2_pij(4,3,1225)=1 exch2_oi(3,1225)=0 exch2_oj(3,1225)=0 exch2_neighbourId(4,1225)=1224 exch2_iLo(4,1225)=0 exch2_iHi(4,1225)=0 exch2_jLo(4,1225)=0 exch2_jHi(4,1225)=35 exch2_opposingSend(4,1225)=3 exch2_pij(1,4,1225)=1 exch2_pij(2,4,1225)=0 exch2_pij(3,4,1225)=0 exch2_pij(4,4,1225)=1 exch2_oi(4,1225)=0 exch2_oj(4,1225)=0 RETURN END SUBROUTINE W2_E2SETUP_1226 C Topology for tile 1226 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1226)=34 exch2_tNy(1226)=34 exch2_tBasex(1226)=340 exch2_tBasey(1226)=204 exch2_txGlobalo(1226)=2891 exch2_tyGlobalo(1226)=205 exch2_isWedge(1226)=0 exch2_isNedge(1226)=0 exch2_isEedge(1226)=0 exch2_isSedge(1226)=0 exch2_myFace(1226)=6 exch2_mydNx(1226)=510 exch2_mydNy(1226)=510 exch2_nNeighbours(1226)=4 exch2_neighbourId(1,1226)=1241 exch2_iLo(1,1226)=0 exch2_iHi(1,1226)=35 exch2_jLo(1,1226)=35 exch2_jHi(1,1226)=35 exch2_opposingSend(1,1226)=2 exch2_pij(1,1,1226)=1 exch2_pij(2,1,1226)=0 exch2_pij(3,1,1226)=0 exch2_pij(4,1,1226)=1 exch2_oi(1,1226)=0 exch2_oj(1,1226)=0 exch2_neighbourId(2,1226)=1211 exch2_iLo(2,1226)=0 exch2_iHi(2,1226)=35 exch2_jLo(2,1226)=0 exch2_jHi(2,1226)=0 exch2_opposingSend(2,1226)=1 exch2_pij(1,2,1226)=1 exch2_pij(2,2,1226)=0 exch2_pij(3,2,1226)=0 exch2_pij(4,2,1226)=1 exch2_oi(2,1226)=0 exch2_oj(2,1226)=0 exch2_neighbourId(3,1226)=1227 exch2_iLo(3,1226)=35 exch2_iHi(3,1226)=35 exch2_jLo(3,1226)=0 exch2_jHi(3,1226)=35 exch2_opposingSend(3,1226)=4 exch2_pij(1,3,1226)=1 exch2_pij(2,3,1226)=0 exch2_pij(3,3,1226)=0 exch2_pij(4,3,1226)=1 exch2_oi(3,1226)=0 exch2_oj(3,1226)=0 exch2_neighbourId(4,1226)=1225 exch2_iLo(4,1226)=0 exch2_iHi(4,1226)=0 exch2_jLo(4,1226)=0 exch2_jHi(4,1226)=35 exch2_opposingSend(4,1226)=3 exch2_pij(1,4,1226)=1 exch2_pij(2,4,1226)=0 exch2_pij(3,4,1226)=0 exch2_pij(4,4,1226)=1 exch2_oi(4,1226)=0 exch2_oj(4,1226)=0 RETURN END SUBROUTINE W2_E2SETUP_1227 C Topology for tile 1227 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1227)=34 exch2_tNy(1227)=34 exch2_tBasex(1227)=374 exch2_tBasey(1227)=204 exch2_txGlobalo(1227)=2925 exch2_tyGlobalo(1227)=205 exch2_isWedge(1227)=0 exch2_isNedge(1227)=0 exch2_isEedge(1227)=0 exch2_isSedge(1227)=0 exch2_myFace(1227)=6 exch2_mydNx(1227)=510 exch2_mydNy(1227)=510 exch2_nNeighbours(1227)=4 exch2_neighbourId(1,1227)=1242 exch2_iLo(1,1227)=0 exch2_iHi(1,1227)=35 exch2_jLo(1,1227)=35 exch2_jHi(1,1227)=35 exch2_opposingSend(1,1227)=2 exch2_pij(1,1,1227)=1 exch2_pij(2,1,1227)=0 exch2_pij(3,1,1227)=0 exch2_pij(4,1,1227)=1 exch2_oi(1,1227)=0 exch2_oj(1,1227)=0 exch2_neighbourId(2,1227)=1212 exch2_iLo(2,1227)=0 exch2_iHi(2,1227)=35 exch2_jLo(2,1227)=0 exch2_jHi(2,1227)=0 exch2_opposingSend(2,1227)=1 exch2_pij(1,2,1227)=1 exch2_pij(2,2,1227)=0 exch2_pij(3,2,1227)=0 exch2_pij(4,2,1227)=1 exch2_oi(2,1227)=0 exch2_oj(2,1227)=0 exch2_neighbourId(3,1227)=1228 exch2_iLo(3,1227)=35 exch2_iHi(3,1227)=35 exch2_jLo(3,1227)=0 exch2_jHi(3,1227)=35 exch2_opposingSend(3,1227)=4 exch2_pij(1,3,1227)=1 exch2_pij(2,3,1227)=0 exch2_pij(3,3,1227)=0 exch2_pij(4,3,1227)=1 exch2_oi(3,1227)=0 exch2_oj(3,1227)=0 exch2_neighbourId(4,1227)=1226 exch2_iLo(4,1227)=0 exch2_iHi(4,1227)=0 exch2_jLo(4,1227)=0 exch2_jHi(4,1227)=35 exch2_opposingSend(4,1227)=3 exch2_pij(1,4,1227)=1 exch2_pij(2,4,1227)=0 exch2_pij(3,4,1227)=0 exch2_pij(4,4,1227)=1 exch2_oi(4,1227)=0 exch2_oj(4,1227)=0 RETURN END SUBROUTINE W2_E2SETUP_1228 C Topology for tile 1228 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1228)=34 exch2_tNy(1228)=34 exch2_tBasex(1228)=408 exch2_tBasey(1228)=204 exch2_txGlobalo(1228)=2959 exch2_tyGlobalo(1228)=205 exch2_isWedge(1228)=0 exch2_isNedge(1228)=0 exch2_isEedge(1228)=0 exch2_isSedge(1228)=0 exch2_myFace(1228)=6 exch2_mydNx(1228)=510 exch2_mydNy(1228)=510 exch2_nNeighbours(1228)=4 exch2_neighbourId(1,1228)=1243 exch2_iLo(1,1228)=0 exch2_iHi(1,1228)=35 exch2_jLo(1,1228)=35 exch2_jHi(1,1228)=35 exch2_opposingSend(1,1228)=2 exch2_pij(1,1,1228)=1 exch2_pij(2,1,1228)=0 exch2_pij(3,1,1228)=0 exch2_pij(4,1,1228)=1 exch2_oi(1,1228)=0 exch2_oj(1,1228)=0 exch2_neighbourId(2,1228)=1213 exch2_iLo(2,1228)=0 exch2_iHi(2,1228)=35 exch2_jLo(2,1228)=0 exch2_jHi(2,1228)=0 exch2_opposingSend(2,1228)=1 exch2_pij(1,2,1228)=1 exch2_pij(2,2,1228)=0 exch2_pij(3,2,1228)=0 exch2_pij(4,2,1228)=1 exch2_oi(2,1228)=0 exch2_oj(2,1228)=0 exch2_neighbourId(3,1228)=1229 exch2_iLo(3,1228)=35 exch2_iHi(3,1228)=35 exch2_jLo(3,1228)=0 exch2_jHi(3,1228)=35 exch2_opposingSend(3,1228)=4 exch2_pij(1,3,1228)=1 exch2_pij(2,3,1228)=0 exch2_pij(3,3,1228)=0 exch2_pij(4,3,1228)=1 exch2_oi(3,1228)=0 exch2_oj(3,1228)=0 exch2_neighbourId(4,1228)=1227 exch2_iLo(4,1228)=0 exch2_iHi(4,1228)=0 exch2_jLo(4,1228)=0 exch2_jHi(4,1228)=35 exch2_opposingSend(4,1228)=3 exch2_pij(1,4,1228)=1 exch2_pij(2,4,1228)=0 exch2_pij(3,4,1228)=0 exch2_pij(4,4,1228)=1 exch2_oi(4,1228)=0 exch2_oj(4,1228)=0 RETURN END SUBROUTINE W2_E2SETUP_1229 C Topology for tile 1229 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1229)=34 exch2_tNy(1229)=34 exch2_tBasex(1229)=442 exch2_tBasey(1229)=204 exch2_txGlobalo(1229)=2993 exch2_tyGlobalo(1229)=205 exch2_isWedge(1229)=0 exch2_isNedge(1229)=0 exch2_isEedge(1229)=0 exch2_isSedge(1229)=0 exch2_myFace(1229)=6 exch2_mydNx(1229)=510 exch2_mydNy(1229)=510 exch2_nNeighbours(1229)=4 exch2_neighbourId(1,1229)=1244 exch2_iLo(1,1229)=0 exch2_iHi(1,1229)=35 exch2_jLo(1,1229)=35 exch2_jHi(1,1229)=35 exch2_opposingSend(1,1229)=2 exch2_pij(1,1,1229)=1 exch2_pij(2,1,1229)=0 exch2_pij(3,1,1229)=0 exch2_pij(4,1,1229)=1 exch2_oi(1,1229)=0 exch2_oj(1,1229)=0 exch2_neighbourId(2,1229)=1214 exch2_iLo(2,1229)=0 exch2_iHi(2,1229)=35 exch2_jLo(2,1229)=0 exch2_jHi(2,1229)=0 exch2_opposingSend(2,1229)=1 exch2_pij(1,2,1229)=1 exch2_pij(2,2,1229)=0 exch2_pij(3,2,1229)=0 exch2_pij(4,2,1229)=1 exch2_oi(2,1229)=0 exch2_oj(2,1229)=0 exch2_neighbourId(3,1229)=1230 exch2_iLo(3,1229)=35 exch2_iHi(3,1229)=35 exch2_jLo(3,1229)=0 exch2_jHi(3,1229)=35 exch2_opposingSend(3,1229)=4 exch2_pij(1,3,1229)=1 exch2_pij(2,3,1229)=0 exch2_pij(3,3,1229)=0 exch2_pij(4,3,1229)=1 exch2_oi(3,1229)=0 exch2_oj(3,1229)=0 exch2_neighbourId(4,1229)=1228 exch2_iLo(4,1229)=0 exch2_iHi(4,1229)=0 exch2_jLo(4,1229)=0 exch2_jHi(4,1229)=35 exch2_opposingSend(4,1229)=3 exch2_pij(1,4,1229)=1 exch2_pij(2,4,1229)=0 exch2_pij(3,4,1229)=0 exch2_pij(4,4,1229)=1 exch2_oi(4,1229)=0 exch2_oj(4,1229)=0 RETURN END SUBROUTINE W2_E2SETUP_1230 C Topology for tile 1230 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1230)=34 exch2_tNy(1230)=34 exch2_tBasex(1230)=476 exch2_tBasey(1230)=204 exch2_txGlobalo(1230)=3027 exch2_tyGlobalo(1230)=205 exch2_isWedge(1230)=0 exch2_isNedge(1230)=0 exch2_isEedge(1230)=1 exch2_isSedge(1230)=0 exch2_myFace(1230)=6 exch2_mydNx(1230)=510 exch2_mydNy(1230)=510 exch2_nNeighbours(1230)=4 exch2_neighbourId(1,1230)=1245 exch2_iLo(1,1230)=0 exch2_iHi(1,1230)=35 exch2_jLo(1,1230)=35 exch2_jHi(1,1230)=35 exch2_opposingSend(1,1230)=2 exch2_pij(1,1,1230)=1 exch2_pij(2,1,1230)=0 exch2_pij(3,1,1230)=0 exch2_pij(4,1,1230)=1 exch2_oi(1,1230)=0 exch2_oj(1,1230)=0 exch2_neighbourId(2,1230)=1215 exch2_iLo(2,1230)=0 exch2_iHi(2,1230)=35 exch2_jLo(2,1230)=0 exch2_jHi(2,1230)=0 exch2_opposingSend(2,1230)=1 exch2_pij(1,2,1230)=1 exch2_pij(2,2,1230)=0 exch2_pij(3,2,1230)=0 exch2_pij(4,2,1230)=1 exch2_oi(2,1230)=0 exch2_oj(2,1230)=0 exch2_neighbourId(3,1230)=234 exch2_iLo(3,1230)=35 exch2_iHi(3,1230)=35 exch2_jLo(3,1230)=0 exch2_jHi(3,1230)=35 exch2_opposingSend(3,1230)=2 exch2_pij(1,3,1230)=0 exch2_pij(2,3,1230)=1 exch2_pij(3,3,1230)=-1 exch2_pij(4,3,1230)=0 exch2_oi(3,1230)=510 exch2_oj(3,1230)=511 exch2_neighbourId(4,1230)=1229 exch2_iLo(4,1230)=0 exch2_iHi(4,1230)=0 exch2_jLo(4,1230)=0 exch2_jHi(4,1230)=35 exch2_opposingSend(4,1230)=3 exch2_pij(1,4,1230)=1 exch2_pij(2,4,1230)=0 exch2_pij(3,4,1230)=0 exch2_pij(4,4,1230)=1 exch2_oi(4,1230)=0 exch2_oj(4,1230)=0 RETURN END SUBROUTINE W2_E2SETUP_1231 C Topology for tile 1231 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1231)=34 exch2_tNy(1231)=34 exch2_tBasex(1231)=0 exch2_tBasey(1231)=238 exch2_txGlobalo(1231)=2551 exch2_tyGlobalo(1231)=239 exch2_isWedge(1231)=1 exch2_isNedge(1231)=0 exch2_isEedge(1231)=0 exch2_isSedge(1231)=0 exch2_myFace(1231)=6 exch2_mydNx(1231)=510 exch2_mydNy(1231)=510 exch2_nNeighbours(1231)=4 exch2_neighbourId(1,1231)=1246 exch2_iLo(1,1231)=0 exch2_iHi(1,1231)=35 exch2_jLo(1,1231)=35 exch2_jHi(1,1231)=35 exch2_opposingSend(1,1231)=2 exch2_pij(1,1,1231)=1 exch2_pij(2,1,1231)=0 exch2_pij(3,1,1231)=0 exch2_pij(4,1,1231)=1 exch2_oi(1,1231)=0 exch2_oj(1,1231)=0 exch2_neighbourId(2,1231)=1216 exch2_iLo(2,1231)=0 exch2_iHi(2,1231)=35 exch2_jLo(2,1231)=0 exch2_jHi(2,1231)=0 exch2_opposingSend(2,1231)=1 exch2_pij(1,2,1231)=1 exch2_pij(2,2,1231)=0 exch2_pij(3,2,1231)=0 exch2_pij(4,2,1231)=1 exch2_oi(2,1231)=0 exch2_oj(2,1231)=0 exch2_neighbourId(3,1231)=1232 exch2_iLo(3,1231)=35 exch2_iHi(3,1231)=35 exch2_jLo(3,1231)=0 exch2_jHi(3,1231)=35 exch2_opposingSend(3,1231)=4 exch2_pij(1,3,1231)=1 exch2_pij(2,3,1231)=0 exch2_pij(3,3,1231)=0 exch2_pij(4,3,1231)=1 exch2_oi(3,1231)=0 exch2_oj(3,1231)=0 exch2_neighbourId(4,1231)=1020 exch2_iLo(4,1231)=0 exch2_iHi(4,1231)=0 exch2_jLo(4,1231)=0 exch2_jHi(4,1231)=35 exch2_opposingSend(4,1231)=3 exch2_pij(1,4,1231)=1 exch2_pij(2,4,1231)=0 exch2_pij(3,4,1231)=0 exch2_pij(4,4,1231)=1 exch2_oi(4,1231)=-510 exch2_oj(4,1231)=0 RETURN END SUBROUTINE W2_E2SETUP_1232 C Topology for tile 1232 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1232)=34 exch2_tNy(1232)=34 exch2_tBasex(1232)=34 exch2_tBasey(1232)=238 exch2_txGlobalo(1232)=2585 exch2_tyGlobalo(1232)=239 exch2_isWedge(1232)=0 exch2_isNedge(1232)=0 exch2_isEedge(1232)=0 exch2_isSedge(1232)=0 exch2_myFace(1232)=6 exch2_mydNx(1232)=510 exch2_mydNy(1232)=510 exch2_nNeighbours(1232)=4 exch2_neighbourId(1,1232)=1247 exch2_iLo(1,1232)=0 exch2_iHi(1,1232)=35 exch2_jLo(1,1232)=35 exch2_jHi(1,1232)=35 exch2_opposingSend(1,1232)=2 exch2_pij(1,1,1232)=1 exch2_pij(2,1,1232)=0 exch2_pij(3,1,1232)=0 exch2_pij(4,1,1232)=1 exch2_oi(1,1232)=0 exch2_oj(1,1232)=0 exch2_neighbourId(2,1232)=1217 exch2_iLo(2,1232)=0 exch2_iHi(2,1232)=35 exch2_jLo(2,1232)=0 exch2_jHi(2,1232)=0 exch2_opposingSend(2,1232)=1 exch2_pij(1,2,1232)=1 exch2_pij(2,2,1232)=0 exch2_pij(3,2,1232)=0 exch2_pij(4,2,1232)=1 exch2_oi(2,1232)=0 exch2_oj(2,1232)=0 exch2_neighbourId(3,1232)=1233 exch2_iLo(3,1232)=35 exch2_iHi(3,1232)=35 exch2_jLo(3,1232)=0 exch2_jHi(3,1232)=35 exch2_opposingSend(3,1232)=4 exch2_pij(1,3,1232)=1 exch2_pij(2,3,1232)=0 exch2_pij(3,3,1232)=0 exch2_pij(4,3,1232)=1 exch2_oi(3,1232)=0 exch2_oj(3,1232)=0 exch2_neighbourId(4,1232)=1231 exch2_iLo(4,1232)=0 exch2_iHi(4,1232)=0 exch2_jLo(4,1232)=0 exch2_jHi(4,1232)=35 exch2_opposingSend(4,1232)=3 exch2_pij(1,4,1232)=1 exch2_pij(2,4,1232)=0 exch2_pij(3,4,1232)=0 exch2_pij(4,4,1232)=1 exch2_oi(4,1232)=0 exch2_oj(4,1232)=0 RETURN END SUBROUTINE W2_E2SETUP_1233 C Topology for tile 1233 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1233)=34 exch2_tNy(1233)=34 exch2_tBasex(1233)=68 exch2_tBasey(1233)=238 exch2_txGlobalo(1233)=2619 exch2_tyGlobalo(1233)=239 exch2_isWedge(1233)=0 exch2_isNedge(1233)=0 exch2_isEedge(1233)=0 exch2_isSedge(1233)=0 exch2_myFace(1233)=6 exch2_mydNx(1233)=510 exch2_mydNy(1233)=510 exch2_nNeighbours(1233)=4 exch2_neighbourId(1,1233)=1248 exch2_iLo(1,1233)=0 exch2_iHi(1,1233)=35 exch2_jLo(1,1233)=35 exch2_jHi(1,1233)=35 exch2_opposingSend(1,1233)=2 exch2_pij(1,1,1233)=1 exch2_pij(2,1,1233)=0 exch2_pij(3,1,1233)=0 exch2_pij(4,1,1233)=1 exch2_oi(1,1233)=0 exch2_oj(1,1233)=0 exch2_neighbourId(2,1233)=1218 exch2_iLo(2,1233)=0 exch2_iHi(2,1233)=35 exch2_jLo(2,1233)=0 exch2_jHi(2,1233)=0 exch2_opposingSend(2,1233)=1 exch2_pij(1,2,1233)=1 exch2_pij(2,2,1233)=0 exch2_pij(3,2,1233)=0 exch2_pij(4,2,1233)=1 exch2_oi(2,1233)=0 exch2_oj(2,1233)=0 exch2_neighbourId(3,1233)=1234 exch2_iLo(3,1233)=35 exch2_iHi(3,1233)=35 exch2_jLo(3,1233)=0 exch2_jHi(3,1233)=35 exch2_opposingSend(3,1233)=4 exch2_pij(1,3,1233)=1 exch2_pij(2,3,1233)=0 exch2_pij(3,3,1233)=0 exch2_pij(4,3,1233)=1 exch2_oi(3,1233)=0 exch2_oj(3,1233)=0 exch2_neighbourId(4,1233)=1232 exch2_iLo(4,1233)=0 exch2_iHi(4,1233)=0 exch2_jLo(4,1233)=0 exch2_jHi(4,1233)=35 exch2_opposingSend(4,1233)=3 exch2_pij(1,4,1233)=1 exch2_pij(2,4,1233)=0 exch2_pij(3,4,1233)=0 exch2_pij(4,4,1233)=1 exch2_oi(4,1233)=0 exch2_oj(4,1233)=0 RETURN END SUBROUTINE W2_E2SETUP_1234 C Topology for tile 1234 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1234)=34 exch2_tNy(1234)=34 exch2_tBasex(1234)=102 exch2_tBasey(1234)=238 exch2_txGlobalo(1234)=2653 exch2_tyGlobalo(1234)=239 exch2_isWedge(1234)=0 exch2_isNedge(1234)=0 exch2_isEedge(1234)=0 exch2_isSedge(1234)=0 exch2_myFace(1234)=6 exch2_mydNx(1234)=510 exch2_mydNy(1234)=510 exch2_nNeighbours(1234)=4 exch2_neighbourId(1,1234)=1249 exch2_iLo(1,1234)=0 exch2_iHi(1,1234)=35 exch2_jLo(1,1234)=35 exch2_jHi(1,1234)=35 exch2_opposingSend(1,1234)=2 exch2_pij(1,1,1234)=1 exch2_pij(2,1,1234)=0 exch2_pij(3,1,1234)=0 exch2_pij(4,1,1234)=1 exch2_oi(1,1234)=0 exch2_oj(1,1234)=0 exch2_neighbourId(2,1234)=1219 exch2_iLo(2,1234)=0 exch2_iHi(2,1234)=35 exch2_jLo(2,1234)=0 exch2_jHi(2,1234)=0 exch2_opposingSend(2,1234)=1 exch2_pij(1,2,1234)=1 exch2_pij(2,2,1234)=0 exch2_pij(3,2,1234)=0 exch2_pij(4,2,1234)=1 exch2_oi(2,1234)=0 exch2_oj(2,1234)=0 exch2_neighbourId(3,1234)=1235 exch2_iLo(3,1234)=35 exch2_iHi(3,1234)=35 exch2_jLo(3,1234)=0 exch2_jHi(3,1234)=35 exch2_opposingSend(3,1234)=4 exch2_pij(1,3,1234)=1 exch2_pij(2,3,1234)=0 exch2_pij(3,3,1234)=0 exch2_pij(4,3,1234)=1 exch2_oi(3,1234)=0 exch2_oj(3,1234)=0 exch2_neighbourId(4,1234)=1233 exch2_iLo(4,1234)=0 exch2_iHi(4,1234)=0 exch2_jLo(4,1234)=0 exch2_jHi(4,1234)=35 exch2_opposingSend(4,1234)=3 exch2_pij(1,4,1234)=1 exch2_pij(2,4,1234)=0 exch2_pij(3,4,1234)=0 exch2_pij(4,4,1234)=1 exch2_oi(4,1234)=0 exch2_oj(4,1234)=0 RETURN END SUBROUTINE W2_E2SETUP_1235 C Topology for tile 1235 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1235)=34 exch2_tNy(1235)=34 exch2_tBasex(1235)=136 exch2_tBasey(1235)=238 exch2_txGlobalo(1235)=2687 exch2_tyGlobalo(1235)=239 exch2_isWedge(1235)=0 exch2_isNedge(1235)=0 exch2_isEedge(1235)=0 exch2_isSedge(1235)=0 exch2_myFace(1235)=6 exch2_mydNx(1235)=510 exch2_mydNy(1235)=510 exch2_nNeighbours(1235)=4 exch2_neighbourId(1,1235)=1250 exch2_iLo(1,1235)=0 exch2_iHi(1,1235)=35 exch2_jLo(1,1235)=35 exch2_jHi(1,1235)=35 exch2_opposingSend(1,1235)=2 exch2_pij(1,1,1235)=1 exch2_pij(2,1,1235)=0 exch2_pij(3,1,1235)=0 exch2_pij(4,1,1235)=1 exch2_oi(1,1235)=0 exch2_oj(1,1235)=0 exch2_neighbourId(2,1235)=1220 exch2_iLo(2,1235)=0 exch2_iHi(2,1235)=35 exch2_jLo(2,1235)=0 exch2_jHi(2,1235)=0 exch2_opposingSend(2,1235)=1 exch2_pij(1,2,1235)=1 exch2_pij(2,2,1235)=0 exch2_pij(3,2,1235)=0 exch2_pij(4,2,1235)=1 exch2_oi(2,1235)=0 exch2_oj(2,1235)=0 exch2_neighbourId(3,1235)=1236 exch2_iLo(3,1235)=35 exch2_iHi(3,1235)=35 exch2_jLo(3,1235)=0 exch2_jHi(3,1235)=35 exch2_opposingSend(3,1235)=4 exch2_pij(1,3,1235)=1 exch2_pij(2,3,1235)=0 exch2_pij(3,3,1235)=0 exch2_pij(4,3,1235)=1 exch2_oi(3,1235)=0 exch2_oj(3,1235)=0 exch2_neighbourId(4,1235)=1234 exch2_iLo(4,1235)=0 exch2_iHi(4,1235)=0 exch2_jLo(4,1235)=0 exch2_jHi(4,1235)=35 exch2_opposingSend(4,1235)=3 exch2_pij(1,4,1235)=1 exch2_pij(2,4,1235)=0 exch2_pij(3,4,1235)=0 exch2_pij(4,4,1235)=1 exch2_oi(4,1235)=0 exch2_oj(4,1235)=0 RETURN END SUBROUTINE W2_E2SETUP_1236 C Topology for tile 1236 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1236)=34 exch2_tNy(1236)=34 exch2_tBasex(1236)=170 exch2_tBasey(1236)=238 exch2_txGlobalo(1236)=2721 exch2_tyGlobalo(1236)=239 exch2_isWedge(1236)=0 exch2_isNedge(1236)=0 exch2_isEedge(1236)=0 exch2_isSedge(1236)=0 exch2_myFace(1236)=6 exch2_mydNx(1236)=510 exch2_mydNy(1236)=510 exch2_nNeighbours(1236)=4 exch2_neighbourId(1,1236)=1251 exch2_iLo(1,1236)=0 exch2_iHi(1,1236)=35 exch2_jLo(1,1236)=35 exch2_jHi(1,1236)=35 exch2_opposingSend(1,1236)=2 exch2_pij(1,1,1236)=1 exch2_pij(2,1,1236)=0 exch2_pij(3,1,1236)=0 exch2_pij(4,1,1236)=1 exch2_oi(1,1236)=0 exch2_oj(1,1236)=0 exch2_neighbourId(2,1236)=1221 exch2_iLo(2,1236)=0 exch2_iHi(2,1236)=35 exch2_jLo(2,1236)=0 exch2_jHi(2,1236)=0 exch2_opposingSend(2,1236)=1 exch2_pij(1,2,1236)=1 exch2_pij(2,2,1236)=0 exch2_pij(3,2,1236)=0 exch2_pij(4,2,1236)=1 exch2_oi(2,1236)=0 exch2_oj(2,1236)=0 exch2_neighbourId(3,1236)=1237 exch2_iLo(3,1236)=35 exch2_iHi(3,1236)=35 exch2_jLo(3,1236)=0 exch2_jHi(3,1236)=35 exch2_opposingSend(3,1236)=4 exch2_pij(1,3,1236)=1 exch2_pij(2,3,1236)=0 exch2_pij(3,3,1236)=0 exch2_pij(4,3,1236)=1 exch2_oi(3,1236)=0 exch2_oj(3,1236)=0 exch2_neighbourId(4,1236)=1235 exch2_iLo(4,1236)=0 exch2_iHi(4,1236)=0 exch2_jLo(4,1236)=0 exch2_jHi(4,1236)=35 exch2_opposingSend(4,1236)=3 exch2_pij(1,4,1236)=1 exch2_pij(2,4,1236)=0 exch2_pij(3,4,1236)=0 exch2_pij(4,4,1236)=1 exch2_oi(4,1236)=0 exch2_oj(4,1236)=0 RETURN END SUBROUTINE W2_E2SETUP_1237 C Topology for tile 1237 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1237)=34 exch2_tNy(1237)=34 exch2_tBasex(1237)=204 exch2_tBasey(1237)=238 exch2_txGlobalo(1237)=2755 exch2_tyGlobalo(1237)=239 exch2_isWedge(1237)=0 exch2_isNedge(1237)=0 exch2_isEedge(1237)=0 exch2_isSedge(1237)=0 exch2_myFace(1237)=6 exch2_mydNx(1237)=510 exch2_mydNy(1237)=510 exch2_nNeighbours(1237)=4 exch2_neighbourId(1,1237)=1252 exch2_iLo(1,1237)=0 exch2_iHi(1,1237)=35 exch2_jLo(1,1237)=35 exch2_jHi(1,1237)=35 exch2_opposingSend(1,1237)=2 exch2_pij(1,1,1237)=1 exch2_pij(2,1,1237)=0 exch2_pij(3,1,1237)=0 exch2_pij(4,1,1237)=1 exch2_oi(1,1237)=0 exch2_oj(1,1237)=0 exch2_neighbourId(2,1237)=1222 exch2_iLo(2,1237)=0 exch2_iHi(2,1237)=35 exch2_jLo(2,1237)=0 exch2_jHi(2,1237)=0 exch2_opposingSend(2,1237)=1 exch2_pij(1,2,1237)=1 exch2_pij(2,2,1237)=0 exch2_pij(3,2,1237)=0 exch2_pij(4,2,1237)=1 exch2_oi(2,1237)=0 exch2_oj(2,1237)=0 exch2_neighbourId(3,1237)=1238 exch2_iLo(3,1237)=35 exch2_iHi(3,1237)=35 exch2_jLo(3,1237)=0 exch2_jHi(3,1237)=35 exch2_opposingSend(3,1237)=4 exch2_pij(1,3,1237)=1 exch2_pij(2,3,1237)=0 exch2_pij(3,3,1237)=0 exch2_pij(4,3,1237)=1 exch2_oi(3,1237)=0 exch2_oj(3,1237)=0 exch2_neighbourId(4,1237)=1236 exch2_iLo(4,1237)=0 exch2_iHi(4,1237)=0 exch2_jLo(4,1237)=0 exch2_jHi(4,1237)=35 exch2_opposingSend(4,1237)=3 exch2_pij(1,4,1237)=1 exch2_pij(2,4,1237)=0 exch2_pij(3,4,1237)=0 exch2_pij(4,4,1237)=1 exch2_oi(4,1237)=0 exch2_oj(4,1237)=0 RETURN END SUBROUTINE W2_E2SETUP_1238 C Topology for tile 1238 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1238)=34 exch2_tNy(1238)=34 exch2_tBasex(1238)=238 exch2_tBasey(1238)=238 exch2_txGlobalo(1238)=2789 exch2_tyGlobalo(1238)=239 exch2_isWedge(1238)=0 exch2_isNedge(1238)=0 exch2_isEedge(1238)=0 exch2_isSedge(1238)=0 exch2_myFace(1238)=6 exch2_mydNx(1238)=510 exch2_mydNy(1238)=510 exch2_nNeighbours(1238)=4 exch2_neighbourId(1,1238)=1253 exch2_iLo(1,1238)=0 exch2_iHi(1,1238)=35 exch2_jLo(1,1238)=35 exch2_jHi(1,1238)=35 exch2_opposingSend(1,1238)=2 exch2_pij(1,1,1238)=1 exch2_pij(2,1,1238)=0 exch2_pij(3,1,1238)=0 exch2_pij(4,1,1238)=1 exch2_oi(1,1238)=0 exch2_oj(1,1238)=0 exch2_neighbourId(2,1238)=1223 exch2_iLo(2,1238)=0 exch2_iHi(2,1238)=35 exch2_jLo(2,1238)=0 exch2_jHi(2,1238)=0 exch2_opposingSend(2,1238)=1 exch2_pij(1,2,1238)=1 exch2_pij(2,2,1238)=0 exch2_pij(3,2,1238)=0 exch2_pij(4,2,1238)=1 exch2_oi(2,1238)=0 exch2_oj(2,1238)=0 exch2_neighbourId(3,1238)=1239 exch2_iLo(3,1238)=35 exch2_iHi(3,1238)=35 exch2_jLo(3,1238)=0 exch2_jHi(3,1238)=35 exch2_opposingSend(3,1238)=4 exch2_pij(1,3,1238)=1 exch2_pij(2,3,1238)=0 exch2_pij(3,3,1238)=0 exch2_pij(4,3,1238)=1 exch2_oi(3,1238)=0 exch2_oj(3,1238)=0 exch2_neighbourId(4,1238)=1237 exch2_iLo(4,1238)=0 exch2_iHi(4,1238)=0 exch2_jLo(4,1238)=0 exch2_jHi(4,1238)=35 exch2_opposingSend(4,1238)=3 exch2_pij(1,4,1238)=1 exch2_pij(2,4,1238)=0 exch2_pij(3,4,1238)=0 exch2_pij(4,4,1238)=1 exch2_oi(4,1238)=0 exch2_oj(4,1238)=0 RETURN END SUBROUTINE W2_E2SETUP_1239 C Topology for tile 1239 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1239)=34 exch2_tNy(1239)=34 exch2_tBasex(1239)=272 exch2_tBasey(1239)=238 exch2_txGlobalo(1239)=2823 exch2_tyGlobalo(1239)=239 exch2_isWedge(1239)=0 exch2_isNedge(1239)=0 exch2_isEedge(1239)=0 exch2_isSedge(1239)=0 exch2_myFace(1239)=6 exch2_mydNx(1239)=510 exch2_mydNy(1239)=510 exch2_nNeighbours(1239)=4 exch2_neighbourId(1,1239)=1254 exch2_iLo(1,1239)=0 exch2_iHi(1,1239)=35 exch2_jLo(1,1239)=35 exch2_jHi(1,1239)=35 exch2_opposingSend(1,1239)=2 exch2_pij(1,1,1239)=1 exch2_pij(2,1,1239)=0 exch2_pij(3,1,1239)=0 exch2_pij(4,1,1239)=1 exch2_oi(1,1239)=0 exch2_oj(1,1239)=0 exch2_neighbourId(2,1239)=1224 exch2_iLo(2,1239)=0 exch2_iHi(2,1239)=35 exch2_jLo(2,1239)=0 exch2_jHi(2,1239)=0 exch2_opposingSend(2,1239)=1 exch2_pij(1,2,1239)=1 exch2_pij(2,2,1239)=0 exch2_pij(3,2,1239)=0 exch2_pij(4,2,1239)=1 exch2_oi(2,1239)=0 exch2_oj(2,1239)=0 exch2_neighbourId(3,1239)=1240 exch2_iLo(3,1239)=35 exch2_iHi(3,1239)=35 exch2_jLo(3,1239)=0 exch2_jHi(3,1239)=35 exch2_opposingSend(3,1239)=4 exch2_pij(1,3,1239)=1 exch2_pij(2,3,1239)=0 exch2_pij(3,3,1239)=0 exch2_pij(4,3,1239)=1 exch2_oi(3,1239)=0 exch2_oj(3,1239)=0 exch2_neighbourId(4,1239)=1238 exch2_iLo(4,1239)=0 exch2_iHi(4,1239)=0 exch2_jLo(4,1239)=0 exch2_jHi(4,1239)=35 exch2_opposingSend(4,1239)=3 exch2_pij(1,4,1239)=1 exch2_pij(2,4,1239)=0 exch2_pij(3,4,1239)=0 exch2_pij(4,4,1239)=1 exch2_oi(4,1239)=0 exch2_oj(4,1239)=0 RETURN END SUBROUTINE W2_E2SETUP_1240 C Topology for tile 1240 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1240)=34 exch2_tNy(1240)=34 exch2_tBasex(1240)=306 exch2_tBasey(1240)=238 exch2_txGlobalo(1240)=2857 exch2_tyGlobalo(1240)=239 exch2_isWedge(1240)=0 exch2_isNedge(1240)=0 exch2_isEedge(1240)=0 exch2_isSedge(1240)=0 exch2_myFace(1240)=6 exch2_mydNx(1240)=510 exch2_mydNy(1240)=510 exch2_nNeighbours(1240)=4 exch2_neighbourId(1,1240)=1255 exch2_iLo(1,1240)=0 exch2_iHi(1,1240)=35 exch2_jLo(1,1240)=35 exch2_jHi(1,1240)=35 exch2_opposingSend(1,1240)=2 exch2_pij(1,1,1240)=1 exch2_pij(2,1,1240)=0 exch2_pij(3,1,1240)=0 exch2_pij(4,1,1240)=1 exch2_oi(1,1240)=0 exch2_oj(1,1240)=0 exch2_neighbourId(2,1240)=1225 exch2_iLo(2,1240)=0 exch2_iHi(2,1240)=35 exch2_jLo(2,1240)=0 exch2_jHi(2,1240)=0 exch2_opposingSend(2,1240)=1 exch2_pij(1,2,1240)=1 exch2_pij(2,2,1240)=0 exch2_pij(3,2,1240)=0 exch2_pij(4,2,1240)=1 exch2_oi(2,1240)=0 exch2_oj(2,1240)=0 exch2_neighbourId(3,1240)=1241 exch2_iLo(3,1240)=35 exch2_iHi(3,1240)=35 exch2_jLo(3,1240)=0 exch2_jHi(3,1240)=35 exch2_opposingSend(3,1240)=4 exch2_pij(1,3,1240)=1 exch2_pij(2,3,1240)=0 exch2_pij(3,3,1240)=0 exch2_pij(4,3,1240)=1 exch2_oi(3,1240)=0 exch2_oj(3,1240)=0 exch2_neighbourId(4,1240)=1239 exch2_iLo(4,1240)=0 exch2_iHi(4,1240)=0 exch2_jLo(4,1240)=0 exch2_jHi(4,1240)=35 exch2_opposingSend(4,1240)=3 exch2_pij(1,4,1240)=1 exch2_pij(2,4,1240)=0 exch2_pij(3,4,1240)=0 exch2_pij(4,4,1240)=1 exch2_oi(4,1240)=0 exch2_oj(4,1240)=0 RETURN END SUBROUTINE W2_E2SETUP_1241 C Topology for tile 1241 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1241)=34 exch2_tNy(1241)=34 exch2_tBasex(1241)=340 exch2_tBasey(1241)=238 exch2_txGlobalo(1241)=2891 exch2_tyGlobalo(1241)=239 exch2_isWedge(1241)=0 exch2_isNedge(1241)=0 exch2_isEedge(1241)=0 exch2_isSedge(1241)=0 exch2_myFace(1241)=6 exch2_mydNx(1241)=510 exch2_mydNy(1241)=510 exch2_nNeighbours(1241)=4 exch2_neighbourId(1,1241)=1256 exch2_iLo(1,1241)=0 exch2_iHi(1,1241)=35 exch2_jLo(1,1241)=35 exch2_jHi(1,1241)=35 exch2_opposingSend(1,1241)=2 exch2_pij(1,1,1241)=1 exch2_pij(2,1,1241)=0 exch2_pij(3,1,1241)=0 exch2_pij(4,1,1241)=1 exch2_oi(1,1241)=0 exch2_oj(1,1241)=0 exch2_neighbourId(2,1241)=1226 exch2_iLo(2,1241)=0 exch2_iHi(2,1241)=35 exch2_jLo(2,1241)=0 exch2_jHi(2,1241)=0 exch2_opposingSend(2,1241)=1 exch2_pij(1,2,1241)=1 exch2_pij(2,2,1241)=0 exch2_pij(3,2,1241)=0 exch2_pij(4,2,1241)=1 exch2_oi(2,1241)=0 exch2_oj(2,1241)=0 exch2_neighbourId(3,1241)=1242 exch2_iLo(3,1241)=35 exch2_iHi(3,1241)=35 exch2_jLo(3,1241)=0 exch2_jHi(3,1241)=35 exch2_opposingSend(3,1241)=4 exch2_pij(1,3,1241)=1 exch2_pij(2,3,1241)=0 exch2_pij(3,3,1241)=0 exch2_pij(4,3,1241)=1 exch2_oi(3,1241)=0 exch2_oj(3,1241)=0 exch2_neighbourId(4,1241)=1240 exch2_iLo(4,1241)=0 exch2_iHi(4,1241)=0 exch2_jLo(4,1241)=0 exch2_jHi(4,1241)=35 exch2_opposingSend(4,1241)=3 exch2_pij(1,4,1241)=1 exch2_pij(2,4,1241)=0 exch2_pij(3,4,1241)=0 exch2_pij(4,4,1241)=1 exch2_oi(4,1241)=0 exch2_oj(4,1241)=0 RETURN END SUBROUTINE W2_E2SETUP_1242 C Topology for tile 1242 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1242)=34 exch2_tNy(1242)=34 exch2_tBasex(1242)=374 exch2_tBasey(1242)=238 exch2_txGlobalo(1242)=2925 exch2_tyGlobalo(1242)=239 exch2_isWedge(1242)=0 exch2_isNedge(1242)=0 exch2_isEedge(1242)=0 exch2_isSedge(1242)=0 exch2_myFace(1242)=6 exch2_mydNx(1242)=510 exch2_mydNy(1242)=510 exch2_nNeighbours(1242)=4 exch2_neighbourId(1,1242)=1257 exch2_iLo(1,1242)=0 exch2_iHi(1,1242)=35 exch2_jLo(1,1242)=35 exch2_jHi(1,1242)=35 exch2_opposingSend(1,1242)=2 exch2_pij(1,1,1242)=1 exch2_pij(2,1,1242)=0 exch2_pij(3,1,1242)=0 exch2_pij(4,1,1242)=1 exch2_oi(1,1242)=0 exch2_oj(1,1242)=0 exch2_neighbourId(2,1242)=1227 exch2_iLo(2,1242)=0 exch2_iHi(2,1242)=35 exch2_jLo(2,1242)=0 exch2_jHi(2,1242)=0 exch2_opposingSend(2,1242)=1 exch2_pij(1,2,1242)=1 exch2_pij(2,2,1242)=0 exch2_pij(3,2,1242)=0 exch2_pij(4,2,1242)=1 exch2_oi(2,1242)=0 exch2_oj(2,1242)=0 exch2_neighbourId(3,1242)=1243 exch2_iLo(3,1242)=35 exch2_iHi(3,1242)=35 exch2_jLo(3,1242)=0 exch2_jHi(3,1242)=35 exch2_opposingSend(3,1242)=4 exch2_pij(1,3,1242)=1 exch2_pij(2,3,1242)=0 exch2_pij(3,3,1242)=0 exch2_pij(4,3,1242)=1 exch2_oi(3,1242)=0 exch2_oj(3,1242)=0 exch2_neighbourId(4,1242)=1241 exch2_iLo(4,1242)=0 exch2_iHi(4,1242)=0 exch2_jLo(4,1242)=0 exch2_jHi(4,1242)=35 exch2_opposingSend(4,1242)=3 exch2_pij(1,4,1242)=1 exch2_pij(2,4,1242)=0 exch2_pij(3,4,1242)=0 exch2_pij(4,4,1242)=1 exch2_oi(4,1242)=0 exch2_oj(4,1242)=0 RETURN END SUBROUTINE W2_E2SETUP_1243 C Topology for tile 1243 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1243)=34 exch2_tNy(1243)=34 exch2_tBasex(1243)=408 exch2_tBasey(1243)=238 exch2_txGlobalo(1243)=2959 exch2_tyGlobalo(1243)=239 exch2_isWedge(1243)=0 exch2_isNedge(1243)=0 exch2_isEedge(1243)=0 exch2_isSedge(1243)=0 exch2_myFace(1243)=6 exch2_mydNx(1243)=510 exch2_mydNy(1243)=510 exch2_nNeighbours(1243)=4 exch2_neighbourId(1,1243)=1258 exch2_iLo(1,1243)=0 exch2_iHi(1,1243)=35 exch2_jLo(1,1243)=35 exch2_jHi(1,1243)=35 exch2_opposingSend(1,1243)=2 exch2_pij(1,1,1243)=1 exch2_pij(2,1,1243)=0 exch2_pij(3,1,1243)=0 exch2_pij(4,1,1243)=1 exch2_oi(1,1243)=0 exch2_oj(1,1243)=0 exch2_neighbourId(2,1243)=1228 exch2_iLo(2,1243)=0 exch2_iHi(2,1243)=35 exch2_jLo(2,1243)=0 exch2_jHi(2,1243)=0 exch2_opposingSend(2,1243)=1 exch2_pij(1,2,1243)=1 exch2_pij(2,2,1243)=0 exch2_pij(3,2,1243)=0 exch2_pij(4,2,1243)=1 exch2_oi(2,1243)=0 exch2_oj(2,1243)=0 exch2_neighbourId(3,1243)=1244 exch2_iLo(3,1243)=35 exch2_iHi(3,1243)=35 exch2_jLo(3,1243)=0 exch2_jHi(3,1243)=35 exch2_opposingSend(3,1243)=4 exch2_pij(1,3,1243)=1 exch2_pij(2,3,1243)=0 exch2_pij(3,3,1243)=0 exch2_pij(4,3,1243)=1 exch2_oi(3,1243)=0 exch2_oj(3,1243)=0 exch2_neighbourId(4,1243)=1242 exch2_iLo(4,1243)=0 exch2_iHi(4,1243)=0 exch2_jLo(4,1243)=0 exch2_jHi(4,1243)=35 exch2_opposingSend(4,1243)=3 exch2_pij(1,4,1243)=1 exch2_pij(2,4,1243)=0 exch2_pij(3,4,1243)=0 exch2_pij(4,4,1243)=1 exch2_oi(4,1243)=0 exch2_oj(4,1243)=0 RETURN END SUBROUTINE W2_E2SETUP_1244 C Topology for tile 1244 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1244)=34 exch2_tNy(1244)=34 exch2_tBasex(1244)=442 exch2_tBasey(1244)=238 exch2_txGlobalo(1244)=2993 exch2_tyGlobalo(1244)=239 exch2_isWedge(1244)=0 exch2_isNedge(1244)=0 exch2_isEedge(1244)=0 exch2_isSedge(1244)=0 exch2_myFace(1244)=6 exch2_mydNx(1244)=510 exch2_mydNy(1244)=510 exch2_nNeighbours(1244)=4 exch2_neighbourId(1,1244)=1259 exch2_iLo(1,1244)=0 exch2_iHi(1,1244)=35 exch2_jLo(1,1244)=35 exch2_jHi(1,1244)=35 exch2_opposingSend(1,1244)=2 exch2_pij(1,1,1244)=1 exch2_pij(2,1,1244)=0 exch2_pij(3,1,1244)=0 exch2_pij(4,1,1244)=1 exch2_oi(1,1244)=0 exch2_oj(1,1244)=0 exch2_neighbourId(2,1244)=1229 exch2_iLo(2,1244)=0 exch2_iHi(2,1244)=35 exch2_jLo(2,1244)=0 exch2_jHi(2,1244)=0 exch2_opposingSend(2,1244)=1 exch2_pij(1,2,1244)=1 exch2_pij(2,2,1244)=0 exch2_pij(3,2,1244)=0 exch2_pij(4,2,1244)=1 exch2_oi(2,1244)=0 exch2_oj(2,1244)=0 exch2_neighbourId(3,1244)=1245 exch2_iLo(3,1244)=35 exch2_iHi(3,1244)=35 exch2_jLo(3,1244)=0 exch2_jHi(3,1244)=35 exch2_opposingSend(3,1244)=4 exch2_pij(1,3,1244)=1 exch2_pij(2,3,1244)=0 exch2_pij(3,3,1244)=0 exch2_pij(4,3,1244)=1 exch2_oi(3,1244)=0 exch2_oj(3,1244)=0 exch2_neighbourId(4,1244)=1243 exch2_iLo(4,1244)=0 exch2_iHi(4,1244)=0 exch2_jLo(4,1244)=0 exch2_jHi(4,1244)=35 exch2_opposingSend(4,1244)=3 exch2_pij(1,4,1244)=1 exch2_pij(2,4,1244)=0 exch2_pij(3,4,1244)=0 exch2_pij(4,4,1244)=1 exch2_oi(4,1244)=0 exch2_oj(4,1244)=0 RETURN END SUBROUTINE W2_E2SETUP_1245 C Topology for tile 1245 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1245)=34 exch2_tNy(1245)=34 exch2_tBasex(1245)=476 exch2_tBasey(1245)=238 exch2_txGlobalo(1245)=3027 exch2_tyGlobalo(1245)=239 exch2_isWedge(1245)=0 exch2_isNedge(1245)=0 exch2_isEedge(1245)=1 exch2_isSedge(1245)=0 exch2_myFace(1245)=6 exch2_mydNx(1245)=510 exch2_mydNy(1245)=510 exch2_nNeighbours(1245)=4 exch2_neighbourId(1,1245)=1260 exch2_iLo(1,1245)=0 exch2_iHi(1,1245)=35 exch2_jLo(1,1245)=35 exch2_jHi(1,1245)=35 exch2_opposingSend(1,1245)=2 exch2_pij(1,1,1245)=1 exch2_pij(2,1,1245)=0 exch2_pij(3,1,1245)=0 exch2_pij(4,1,1245)=1 exch2_oi(1,1245)=0 exch2_oj(1,1245)=0 exch2_neighbourId(2,1245)=1230 exch2_iLo(2,1245)=0 exch2_iHi(2,1245)=35 exch2_jLo(2,1245)=0 exch2_jHi(2,1245)=0 exch2_opposingSend(2,1245)=1 exch2_pij(1,2,1245)=1 exch2_pij(2,2,1245)=0 exch2_pij(3,2,1245)=0 exch2_pij(4,2,1245)=1 exch2_oi(2,1245)=0 exch2_oj(2,1245)=0 exch2_neighbourId(3,1245)=233 exch2_iLo(3,1245)=35 exch2_iHi(3,1245)=35 exch2_jLo(3,1245)=0 exch2_jHi(3,1245)=35 exch2_opposingSend(3,1245)=2 exch2_pij(1,3,1245)=0 exch2_pij(2,3,1245)=1 exch2_pij(3,3,1245)=-1 exch2_pij(4,3,1245)=0 exch2_oi(3,1245)=510 exch2_oj(3,1245)=511 exch2_neighbourId(4,1245)=1244 exch2_iLo(4,1245)=0 exch2_iHi(4,1245)=0 exch2_jLo(4,1245)=0 exch2_jHi(4,1245)=35 exch2_opposingSend(4,1245)=3 exch2_pij(1,4,1245)=1 exch2_pij(2,4,1245)=0 exch2_pij(3,4,1245)=0 exch2_pij(4,4,1245)=1 exch2_oi(4,1245)=0 exch2_oj(4,1245)=0 RETURN END SUBROUTINE W2_E2SETUP_1246 C Topology for tile 1246 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1246)=34 exch2_tNy(1246)=34 exch2_tBasex(1246)=0 exch2_tBasey(1246)=272 exch2_txGlobalo(1246)=2551 exch2_tyGlobalo(1246)=273 exch2_isWedge(1246)=1 exch2_isNedge(1246)=0 exch2_isEedge(1246)=0 exch2_isSedge(1246)=0 exch2_myFace(1246)=6 exch2_mydNx(1246)=510 exch2_mydNy(1246)=510 exch2_nNeighbours(1246)=4 exch2_neighbourId(1,1246)=1261 exch2_iLo(1,1246)=0 exch2_iHi(1,1246)=35 exch2_jLo(1,1246)=35 exch2_jHi(1,1246)=35 exch2_opposingSend(1,1246)=2 exch2_pij(1,1,1246)=1 exch2_pij(2,1,1246)=0 exch2_pij(3,1,1246)=0 exch2_pij(4,1,1246)=1 exch2_oi(1,1246)=0 exch2_oj(1,1246)=0 exch2_neighbourId(2,1246)=1231 exch2_iLo(2,1246)=0 exch2_iHi(2,1246)=35 exch2_jLo(2,1246)=0 exch2_jHi(2,1246)=0 exch2_opposingSend(2,1246)=1 exch2_pij(1,2,1246)=1 exch2_pij(2,2,1246)=0 exch2_pij(3,2,1246)=0 exch2_pij(4,2,1246)=1 exch2_oi(2,1246)=0 exch2_oj(2,1246)=0 exch2_neighbourId(3,1246)=1247 exch2_iLo(3,1246)=35 exch2_iHi(3,1246)=35 exch2_jLo(3,1246)=0 exch2_jHi(3,1246)=35 exch2_opposingSend(3,1246)=4 exch2_pij(1,3,1246)=1 exch2_pij(2,3,1246)=0 exch2_pij(3,3,1246)=0 exch2_pij(4,3,1246)=1 exch2_oi(3,1246)=0 exch2_oj(3,1246)=0 exch2_neighbourId(4,1246)=1035 exch2_iLo(4,1246)=0 exch2_iHi(4,1246)=0 exch2_jLo(4,1246)=0 exch2_jHi(4,1246)=35 exch2_opposingSend(4,1246)=3 exch2_pij(1,4,1246)=1 exch2_pij(2,4,1246)=0 exch2_pij(3,4,1246)=0 exch2_pij(4,4,1246)=1 exch2_oi(4,1246)=-510 exch2_oj(4,1246)=0 RETURN END SUBROUTINE W2_E2SETUP_1247 C Topology for tile 1247 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1247)=34 exch2_tNy(1247)=34 exch2_tBasex(1247)=34 exch2_tBasey(1247)=272 exch2_txGlobalo(1247)=2585 exch2_tyGlobalo(1247)=273 exch2_isWedge(1247)=0 exch2_isNedge(1247)=0 exch2_isEedge(1247)=0 exch2_isSedge(1247)=0 exch2_myFace(1247)=6 exch2_mydNx(1247)=510 exch2_mydNy(1247)=510 exch2_nNeighbours(1247)=4 exch2_neighbourId(1,1247)=1262 exch2_iLo(1,1247)=0 exch2_iHi(1,1247)=35 exch2_jLo(1,1247)=35 exch2_jHi(1,1247)=35 exch2_opposingSend(1,1247)=2 exch2_pij(1,1,1247)=1 exch2_pij(2,1,1247)=0 exch2_pij(3,1,1247)=0 exch2_pij(4,1,1247)=1 exch2_oi(1,1247)=0 exch2_oj(1,1247)=0 exch2_neighbourId(2,1247)=1232 exch2_iLo(2,1247)=0 exch2_iHi(2,1247)=35 exch2_jLo(2,1247)=0 exch2_jHi(2,1247)=0 exch2_opposingSend(2,1247)=1 exch2_pij(1,2,1247)=1 exch2_pij(2,2,1247)=0 exch2_pij(3,2,1247)=0 exch2_pij(4,2,1247)=1 exch2_oi(2,1247)=0 exch2_oj(2,1247)=0 exch2_neighbourId(3,1247)=1248 exch2_iLo(3,1247)=35 exch2_iHi(3,1247)=35 exch2_jLo(3,1247)=0 exch2_jHi(3,1247)=35 exch2_opposingSend(3,1247)=4 exch2_pij(1,3,1247)=1 exch2_pij(2,3,1247)=0 exch2_pij(3,3,1247)=0 exch2_pij(4,3,1247)=1 exch2_oi(3,1247)=0 exch2_oj(3,1247)=0 exch2_neighbourId(4,1247)=1246 exch2_iLo(4,1247)=0 exch2_iHi(4,1247)=0 exch2_jLo(4,1247)=0 exch2_jHi(4,1247)=35 exch2_opposingSend(4,1247)=3 exch2_pij(1,4,1247)=1 exch2_pij(2,4,1247)=0 exch2_pij(3,4,1247)=0 exch2_pij(4,4,1247)=1 exch2_oi(4,1247)=0 exch2_oj(4,1247)=0 RETURN END SUBROUTINE W2_E2SETUP_1248 C Topology for tile 1248 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1248)=34 exch2_tNy(1248)=34 exch2_tBasex(1248)=68 exch2_tBasey(1248)=272 exch2_txGlobalo(1248)=2619 exch2_tyGlobalo(1248)=273 exch2_isWedge(1248)=0 exch2_isNedge(1248)=0 exch2_isEedge(1248)=0 exch2_isSedge(1248)=0 exch2_myFace(1248)=6 exch2_mydNx(1248)=510 exch2_mydNy(1248)=510 exch2_nNeighbours(1248)=4 exch2_neighbourId(1,1248)=1263 exch2_iLo(1,1248)=0 exch2_iHi(1,1248)=35 exch2_jLo(1,1248)=35 exch2_jHi(1,1248)=35 exch2_opposingSend(1,1248)=2 exch2_pij(1,1,1248)=1 exch2_pij(2,1,1248)=0 exch2_pij(3,1,1248)=0 exch2_pij(4,1,1248)=1 exch2_oi(1,1248)=0 exch2_oj(1,1248)=0 exch2_neighbourId(2,1248)=1233 exch2_iLo(2,1248)=0 exch2_iHi(2,1248)=35 exch2_jLo(2,1248)=0 exch2_jHi(2,1248)=0 exch2_opposingSend(2,1248)=1 exch2_pij(1,2,1248)=1 exch2_pij(2,2,1248)=0 exch2_pij(3,2,1248)=0 exch2_pij(4,2,1248)=1 exch2_oi(2,1248)=0 exch2_oj(2,1248)=0 exch2_neighbourId(3,1248)=1249 exch2_iLo(3,1248)=35 exch2_iHi(3,1248)=35 exch2_jLo(3,1248)=0 exch2_jHi(3,1248)=35 exch2_opposingSend(3,1248)=4 exch2_pij(1,3,1248)=1 exch2_pij(2,3,1248)=0 exch2_pij(3,3,1248)=0 exch2_pij(4,3,1248)=1 exch2_oi(3,1248)=0 exch2_oj(3,1248)=0 exch2_neighbourId(4,1248)=1247 exch2_iLo(4,1248)=0 exch2_iHi(4,1248)=0 exch2_jLo(4,1248)=0 exch2_jHi(4,1248)=35 exch2_opposingSend(4,1248)=3 exch2_pij(1,4,1248)=1 exch2_pij(2,4,1248)=0 exch2_pij(3,4,1248)=0 exch2_pij(4,4,1248)=1 exch2_oi(4,1248)=0 exch2_oj(4,1248)=0 RETURN END SUBROUTINE W2_E2SETUP_1249 C Topology for tile 1249 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1249)=34 exch2_tNy(1249)=34 exch2_tBasex(1249)=102 exch2_tBasey(1249)=272 exch2_txGlobalo(1249)=2653 exch2_tyGlobalo(1249)=273 exch2_isWedge(1249)=0 exch2_isNedge(1249)=0 exch2_isEedge(1249)=0 exch2_isSedge(1249)=0 exch2_myFace(1249)=6 exch2_mydNx(1249)=510 exch2_mydNy(1249)=510 exch2_nNeighbours(1249)=4 exch2_neighbourId(1,1249)=1264 exch2_iLo(1,1249)=0 exch2_iHi(1,1249)=35 exch2_jLo(1,1249)=35 exch2_jHi(1,1249)=35 exch2_opposingSend(1,1249)=2 exch2_pij(1,1,1249)=1 exch2_pij(2,1,1249)=0 exch2_pij(3,1,1249)=0 exch2_pij(4,1,1249)=1 exch2_oi(1,1249)=0 exch2_oj(1,1249)=0 exch2_neighbourId(2,1249)=1234 exch2_iLo(2,1249)=0 exch2_iHi(2,1249)=35 exch2_jLo(2,1249)=0 exch2_jHi(2,1249)=0 exch2_opposingSend(2,1249)=1 exch2_pij(1,2,1249)=1 exch2_pij(2,2,1249)=0 exch2_pij(3,2,1249)=0 exch2_pij(4,2,1249)=1 exch2_oi(2,1249)=0 exch2_oj(2,1249)=0 exch2_neighbourId(3,1249)=1250 exch2_iLo(3,1249)=35 exch2_iHi(3,1249)=35 exch2_jLo(3,1249)=0 exch2_jHi(3,1249)=35 exch2_opposingSend(3,1249)=4 exch2_pij(1,3,1249)=1 exch2_pij(2,3,1249)=0 exch2_pij(3,3,1249)=0 exch2_pij(4,3,1249)=1 exch2_oi(3,1249)=0 exch2_oj(3,1249)=0 exch2_neighbourId(4,1249)=1248 exch2_iLo(4,1249)=0 exch2_iHi(4,1249)=0 exch2_jLo(4,1249)=0 exch2_jHi(4,1249)=35 exch2_opposingSend(4,1249)=3 exch2_pij(1,4,1249)=1 exch2_pij(2,4,1249)=0 exch2_pij(3,4,1249)=0 exch2_pij(4,4,1249)=1 exch2_oi(4,1249)=0 exch2_oj(4,1249)=0 RETURN END SUBROUTINE W2_E2SETUP_1250 C Topology for tile 1250 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1250)=34 exch2_tNy(1250)=34 exch2_tBasex(1250)=136 exch2_tBasey(1250)=272 exch2_txGlobalo(1250)=2687 exch2_tyGlobalo(1250)=273 exch2_isWedge(1250)=0 exch2_isNedge(1250)=0 exch2_isEedge(1250)=0 exch2_isSedge(1250)=0 exch2_myFace(1250)=6 exch2_mydNx(1250)=510 exch2_mydNy(1250)=510 exch2_nNeighbours(1250)=4 exch2_neighbourId(1,1250)=1265 exch2_iLo(1,1250)=0 exch2_iHi(1,1250)=35 exch2_jLo(1,1250)=35 exch2_jHi(1,1250)=35 exch2_opposingSend(1,1250)=2 exch2_pij(1,1,1250)=1 exch2_pij(2,1,1250)=0 exch2_pij(3,1,1250)=0 exch2_pij(4,1,1250)=1 exch2_oi(1,1250)=0 exch2_oj(1,1250)=0 exch2_neighbourId(2,1250)=1235 exch2_iLo(2,1250)=0 exch2_iHi(2,1250)=35 exch2_jLo(2,1250)=0 exch2_jHi(2,1250)=0 exch2_opposingSend(2,1250)=1 exch2_pij(1,2,1250)=1 exch2_pij(2,2,1250)=0 exch2_pij(3,2,1250)=0 exch2_pij(4,2,1250)=1 exch2_oi(2,1250)=0 exch2_oj(2,1250)=0 exch2_neighbourId(3,1250)=1251 exch2_iLo(3,1250)=35 exch2_iHi(3,1250)=35 exch2_jLo(3,1250)=0 exch2_jHi(3,1250)=35 exch2_opposingSend(3,1250)=4 exch2_pij(1,3,1250)=1 exch2_pij(2,3,1250)=0 exch2_pij(3,3,1250)=0 exch2_pij(4,3,1250)=1 exch2_oi(3,1250)=0 exch2_oj(3,1250)=0 exch2_neighbourId(4,1250)=1249 exch2_iLo(4,1250)=0 exch2_iHi(4,1250)=0 exch2_jLo(4,1250)=0 exch2_jHi(4,1250)=35 exch2_opposingSend(4,1250)=3 exch2_pij(1,4,1250)=1 exch2_pij(2,4,1250)=0 exch2_pij(3,4,1250)=0 exch2_pij(4,4,1250)=1 exch2_oi(4,1250)=0 exch2_oj(4,1250)=0 RETURN END SUBROUTINE W2_E2SETUP_1251 C Topology for tile 1251 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1251)=34 exch2_tNy(1251)=34 exch2_tBasex(1251)=170 exch2_tBasey(1251)=272 exch2_txGlobalo(1251)=2721 exch2_tyGlobalo(1251)=273 exch2_isWedge(1251)=0 exch2_isNedge(1251)=0 exch2_isEedge(1251)=0 exch2_isSedge(1251)=0 exch2_myFace(1251)=6 exch2_mydNx(1251)=510 exch2_mydNy(1251)=510 exch2_nNeighbours(1251)=4 exch2_neighbourId(1,1251)=1266 exch2_iLo(1,1251)=0 exch2_iHi(1,1251)=35 exch2_jLo(1,1251)=35 exch2_jHi(1,1251)=35 exch2_opposingSend(1,1251)=2 exch2_pij(1,1,1251)=1 exch2_pij(2,1,1251)=0 exch2_pij(3,1,1251)=0 exch2_pij(4,1,1251)=1 exch2_oi(1,1251)=0 exch2_oj(1,1251)=0 exch2_neighbourId(2,1251)=1236 exch2_iLo(2,1251)=0 exch2_iHi(2,1251)=35 exch2_jLo(2,1251)=0 exch2_jHi(2,1251)=0 exch2_opposingSend(2,1251)=1 exch2_pij(1,2,1251)=1 exch2_pij(2,2,1251)=0 exch2_pij(3,2,1251)=0 exch2_pij(4,2,1251)=1 exch2_oi(2,1251)=0 exch2_oj(2,1251)=0 exch2_neighbourId(3,1251)=1252 exch2_iLo(3,1251)=35 exch2_iHi(3,1251)=35 exch2_jLo(3,1251)=0 exch2_jHi(3,1251)=35 exch2_opposingSend(3,1251)=4 exch2_pij(1,3,1251)=1 exch2_pij(2,3,1251)=0 exch2_pij(3,3,1251)=0 exch2_pij(4,3,1251)=1 exch2_oi(3,1251)=0 exch2_oj(3,1251)=0 exch2_neighbourId(4,1251)=1250 exch2_iLo(4,1251)=0 exch2_iHi(4,1251)=0 exch2_jLo(4,1251)=0 exch2_jHi(4,1251)=35 exch2_opposingSend(4,1251)=3 exch2_pij(1,4,1251)=1 exch2_pij(2,4,1251)=0 exch2_pij(3,4,1251)=0 exch2_pij(4,4,1251)=1 exch2_oi(4,1251)=0 exch2_oj(4,1251)=0 RETURN END SUBROUTINE W2_E2SETUP_1252 C Topology for tile 1252 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1252)=34 exch2_tNy(1252)=34 exch2_tBasex(1252)=204 exch2_tBasey(1252)=272 exch2_txGlobalo(1252)=2755 exch2_tyGlobalo(1252)=273 exch2_isWedge(1252)=0 exch2_isNedge(1252)=0 exch2_isEedge(1252)=0 exch2_isSedge(1252)=0 exch2_myFace(1252)=6 exch2_mydNx(1252)=510 exch2_mydNy(1252)=510 exch2_nNeighbours(1252)=4 exch2_neighbourId(1,1252)=1267 exch2_iLo(1,1252)=0 exch2_iHi(1,1252)=35 exch2_jLo(1,1252)=35 exch2_jHi(1,1252)=35 exch2_opposingSend(1,1252)=2 exch2_pij(1,1,1252)=1 exch2_pij(2,1,1252)=0 exch2_pij(3,1,1252)=0 exch2_pij(4,1,1252)=1 exch2_oi(1,1252)=0 exch2_oj(1,1252)=0 exch2_neighbourId(2,1252)=1237 exch2_iLo(2,1252)=0 exch2_iHi(2,1252)=35 exch2_jLo(2,1252)=0 exch2_jHi(2,1252)=0 exch2_opposingSend(2,1252)=1 exch2_pij(1,2,1252)=1 exch2_pij(2,2,1252)=0 exch2_pij(3,2,1252)=0 exch2_pij(4,2,1252)=1 exch2_oi(2,1252)=0 exch2_oj(2,1252)=0 exch2_neighbourId(3,1252)=1253 exch2_iLo(3,1252)=35 exch2_iHi(3,1252)=35 exch2_jLo(3,1252)=0 exch2_jHi(3,1252)=35 exch2_opposingSend(3,1252)=4 exch2_pij(1,3,1252)=1 exch2_pij(2,3,1252)=0 exch2_pij(3,3,1252)=0 exch2_pij(4,3,1252)=1 exch2_oi(3,1252)=0 exch2_oj(3,1252)=0 exch2_neighbourId(4,1252)=1251 exch2_iLo(4,1252)=0 exch2_iHi(4,1252)=0 exch2_jLo(4,1252)=0 exch2_jHi(4,1252)=35 exch2_opposingSend(4,1252)=3 exch2_pij(1,4,1252)=1 exch2_pij(2,4,1252)=0 exch2_pij(3,4,1252)=0 exch2_pij(4,4,1252)=1 exch2_oi(4,1252)=0 exch2_oj(4,1252)=0 RETURN END SUBROUTINE W2_E2SETUP_1253 C Topology for tile 1253 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1253)=34 exch2_tNy(1253)=34 exch2_tBasex(1253)=238 exch2_tBasey(1253)=272 exch2_txGlobalo(1253)=2789 exch2_tyGlobalo(1253)=273 exch2_isWedge(1253)=0 exch2_isNedge(1253)=0 exch2_isEedge(1253)=0 exch2_isSedge(1253)=0 exch2_myFace(1253)=6 exch2_mydNx(1253)=510 exch2_mydNy(1253)=510 exch2_nNeighbours(1253)=4 exch2_neighbourId(1,1253)=1268 exch2_iLo(1,1253)=0 exch2_iHi(1,1253)=35 exch2_jLo(1,1253)=35 exch2_jHi(1,1253)=35 exch2_opposingSend(1,1253)=2 exch2_pij(1,1,1253)=1 exch2_pij(2,1,1253)=0 exch2_pij(3,1,1253)=0 exch2_pij(4,1,1253)=1 exch2_oi(1,1253)=0 exch2_oj(1,1253)=0 exch2_neighbourId(2,1253)=1238 exch2_iLo(2,1253)=0 exch2_iHi(2,1253)=35 exch2_jLo(2,1253)=0 exch2_jHi(2,1253)=0 exch2_opposingSend(2,1253)=1 exch2_pij(1,2,1253)=1 exch2_pij(2,2,1253)=0 exch2_pij(3,2,1253)=0 exch2_pij(4,2,1253)=1 exch2_oi(2,1253)=0 exch2_oj(2,1253)=0 exch2_neighbourId(3,1253)=1254 exch2_iLo(3,1253)=35 exch2_iHi(3,1253)=35 exch2_jLo(3,1253)=0 exch2_jHi(3,1253)=35 exch2_opposingSend(3,1253)=4 exch2_pij(1,3,1253)=1 exch2_pij(2,3,1253)=0 exch2_pij(3,3,1253)=0 exch2_pij(4,3,1253)=1 exch2_oi(3,1253)=0 exch2_oj(3,1253)=0 exch2_neighbourId(4,1253)=1252 exch2_iLo(4,1253)=0 exch2_iHi(4,1253)=0 exch2_jLo(4,1253)=0 exch2_jHi(4,1253)=35 exch2_opposingSend(4,1253)=3 exch2_pij(1,4,1253)=1 exch2_pij(2,4,1253)=0 exch2_pij(3,4,1253)=0 exch2_pij(4,4,1253)=1 exch2_oi(4,1253)=0 exch2_oj(4,1253)=0 RETURN END SUBROUTINE W2_E2SETUP_1254 C Topology for tile 1254 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1254)=34 exch2_tNy(1254)=34 exch2_tBasex(1254)=272 exch2_tBasey(1254)=272 exch2_txGlobalo(1254)=2823 exch2_tyGlobalo(1254)=273 exch2_isWedge(1254)=0 exch2_isNedge(1254)=0 exch2_isEedge(1254)=0 exch2_isSedge(1254)=0 exch2_myFace(1254)=6 exch2_mydNx(1254)=510 exch2_mydNy(1254)=510 exch2_nNeighbours(1254)=4 exch2_neighbourId(1,1254)=1269 exch2_iLo(1,1254)=0 exch2_iHi(1,1254)=35 exch2_jLo(1,1254)=35 exch2_jHi(1,1254)=35 exch2_opposingSend(1,1254)=2 exch2_pij(1,1,1254)=1 exch2_pij(2,1,1254)=0 exch2_pij(3,1,1254)=0 exch2_pij(4,1,1254)=1 exch2_oi(1,1254)=0 exch2_oj(1,1254)=0 exch2_neighbourId(2,1254)=1239 exch2_iLo(2,1254)=0 exch2_iHi(2,1254)=35 exch2_jLo(2,1254)=0 exch2_jHi(2,1254)=0 exch2_opposingSend(2,1254)=1 exch2_pij(1,2,1254)=1 exch2_pij(2,2,1254)=0 exch2_pij(3,2,1254)=0 exch2_pij(4,2,1254)=1 exch2_oi(2,1254)=0 exch2_oj(2,1254)=0 exch2_neighbourId(3,1254)=1255 exch2_iLo(3,1254)=35 exch2_iHi(3,1254)=35 exch2_jLo(3,1254)=0 exch2_jHi(3,1254)=35 exch2_opposingSend(3,1254)=4 exch2_pij(1,3,1254)=1 exch2_pij(2,3,1254)=0 exch2_pij(3,3,1254)=0 exch2_pij(4,3,1254)=1 exch2_oi(3,1254)=0 exch2_oj(3,1254)=0 exch2_neighbourId(4,1254)=1253 exch2_iLo(4,1254)=0 exch2_iHi(4,1254)=0 exch2_jLo(4,1254)=0 exch2_jHi(4,1254)=35 exch2_opposingSend(4,1254)=3 exch2_pij(1,4,1254)=1 exch2_pij(2,4,1254)=0 exch2_pij(3,4,1254)=0 exch2_pij(4,4,1254)=1 exch2_oi(4,1254)=0 exch2_oj(4,1254)=0 RETURN END SUBROUTINE W2_E2SETUP_1255 C Topology for tile 1255 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1255)=34 exch2_tNy(1255)=34 exch2_tBasex(1255)=306 exch2_tBasey(1255)=272 exch2_txGlobalo(1255)=2857 exch2_tyGlobalo(1255)=273 exch2_isWedge(1255)=0 exch2_isNedge(1255)=0 exch2_isEedge(1255)=0 exch2_isSedge(1255)=0 exch2_myFace(1255)=6 exch2_mydNx(1255)=510 exch2_mydNy(1255)=510 exch2_nNeighbours(1255)=4 exch2_neighbourId(1,1255)=1270 exch2_iLo(1,1255)=0 exch2_iHi(1,1255)=35 exch2_jLo(1,1255)=35 exch2_jHi(1,1255)=35 exch2_opposingSend(1,1255)=2 exch2_pij(1,1,1255)=1 exch2_pij(2,1,1255)=0 exch2_pij(3,1,1255)=0 exch2_pij(4,1,1255)=1 exch2_oi(1,1255)=0 exch2_oj(1,1255)=0 exch2_neighbourId(2,1255)=1240 exch2_iLo(2,1255)=0 exch2_iHi(2,1255)=35 exch2_jLo(2,1255)=0 exch2_jHi(2,1255)=0 exch2_opposingSend(2,1255)=1 exch2_pij(1,2,1255)=1 exch2_pij(2,2,1255)=0 exch2_pij(3,2,1255)=0 exch2_pij(4,2,1255)=1 exch2_oi(2,1255)=0 exch2_oj(2,1255)=0 exch2_neighbourId(3,1255)=1256 exch2_iLo(3,1255)=35 exch2_iHi(3,1255)=35 exch2_jLo(3,1255)=0 exch2_jHi(3,1255)=35 exch2_opposingSend(3,1255)=4 exch2_pij(1,3,1255)=1 exch2_pij(2,3,1255)=0 exch2_pij(3,3,1255)=0 exch2_pij(4,3,1255)=1 exch2_oi(3,1255)=0 exch2_oj(3,1255)=0 exch2_neighbourId(4,1255)=1254 exch2_iLo(4,1255)=0 exch2_iHi(4,1255)=0 exch2_jLo(4,1255)=0 exch2_jHi(4,1255)=35 exch2_opposingSend(4,1255)=3 exch2_pij(1,4,1255)=1 exch2_pij(2,4,1255)=0 exch2_pij(3,4,1255)=0 exch2_pij(4,4,1255)=1 exch2_oi(4,1255)=0 exch2_oj(4,1255)=0 RETURN END SUBROUTINE W2_E2SETUP_1256 C Topology for tile 1256 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1256)=34 exch2_tNy(1256)=34 exch2_tBasex(1256)=340 exch2_tBasey(1256)=272 exch2_txGlobalo(1256)=2891 exch2_tyGlobalo(1256)=273 exch2_isWedge(1256)=0 exch2_isNedge(1256)=0 exch2_isEedge(1256)=0 exch2_isSedge(1256)=0 exch2_myFace(1256)=6 exch2_mydNx(1256)=510 exch2_mydNy(1256)=510 exch2_nNeighbours(1256)=4 exch2_neighbourId(1,1256)=1271 exch2_iLo(1,1256)=0 exch2_iHi(1,1256)=35 exch2_jLo(1,1256)=35 exch2_jHi(1,1256)=35 exch2_opposingSend(1,1256)=2 exch2_pij(1,1,1256)=1 exch2_pij(2,1,1256)=0 exch2_pij(3,1,1256)=0 exch2_pij(4,1,1256)=1 exch2_oi(1,1256)=0 exch2_oj(1,1256)=0 exch2_neighbourId(2,1256)=1241 exch2_iLo(2,1256)=0 exch2_iHi(2,1256)=35 exch2_jLo(2,1256)=0 exch2_jHi(2,1256)=0 exch2_opposingSend(2,1256)=1 exch2_pij(1,2,1256)=1 exch2_pij(2,2,1256)=0 exch2_pij(3,2,1256)=0 exch2_pij(4,2,1256)=1 exch2_oi(2,1256)=0 exch2_oj(2,1256)=0 exch2_neighbourId(3,1256)=1257 exch2_iLo(3,1256)=35 exch2_iHi(3,1256)=35 exch2_jLo(3,1256)=0 exch2_jHi(3,1256)=35 exch2_opposingSend(3,1256)=4 exch2_pij(1,3,1256)=1 exch2_pij(2,3,1256)=0 exch2_pij(3,3,1256)=0 exch2_pij(4,3,1256)=1 exch2_oi(3,1256)=0 exch2_oj(3,1256)=0 exch2_neighbourId(4,1256)=1255 exch2_iLo(4,1256)=0 exch2_iHi(4,1256)=0 exch2_jLo(4,1256)=0 exch2_jHi(4,1256)=35 exch2_opposingSend(4,1256)=3 exch2_pij(1,4,1256)=1 exch2_pij(2,4,1256)=0 exch2_pij(3,4,1256)=0 exch2_pij(4,4,1256)=1 exch2_oi(4,1256)=0 exch2_oj(4,1256)=0 RETURN END SUBROUTINE W2_E2SETUP_1257 C Topology for tile 1257 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1257)=34 exch2_tNy(1257)=34 exch2_tBasex(1257)=374 exch2_tBasey(1257)=272 exch2_txGlobalo(1257)=2925 exch2_tyGlobalo(1257)=273 exch2_isWedge(1257)=0 exch2_isNedge(1257)=0 exch2_isEedge(1257)=0 exch2_isSedge(1257)=0 exch2_myFace(1257)=6 exch2_mydNx(1257)=510 exch2_mydNy(1257)=510 exch2_nNeighbours(1257)=4 exch2_neighbourId(1,1257)=1272 exch2_iLo(1,1257)=0 exch2_iHi(1,1257)=35 exch2_jLo(1,1257)=35 exch2_jHi(1,1257)=35 exch2_opposingSend(1,1257)=2 exch2_pij(1,1,1257)=1 exch2_pij(2,1,1257)=0 exch2_pij(3,1,1257)=0 exch2_pij(4,1,1257)=1 exch2_oi(1,1257)=0 exch2_oj(1,1257)=0 exch2_neighbourId(2,1257)=1242 exch2_iLo(2,1257)=0 exch2_iHi(2,1257)=35 exch2_jLo(2,1257)=0 exch2_jHi(2,1257)=0 exch2_opposingSend(2,1257)=1 exch2_pij(1,2,1257)=1 exch2_pij(2,2,1257)=0 exch2_pij(3,2,1257)=0 exch2_pij(4,2,1257)=1 exch2_oi(2,1257)=0 exch2_oj(2,1257)=0 exch2_neighbourId(3,1257)=1258 exch2_iLo(3,1257)=35 exch2_iHi(3,1257)=35 exch2_jLo(3,1257)=0 exch2_jHi(3,1257)=35 exch2_opposingSend(3,1257)=4 exch2_pij(1,3,1257)=1 exch2_pij(2,3,1257)=0 exch2_pij(3,3,1257)=0 exch2_pij(4,3,1257)=1 exch2_oi(3,1257)=0 exch2_oj(3,1257)=0 exch2_neighbourId(4,1257)=1256 exch2_iLo(4,1257)=0 exch2_iHi(4,1257)=0 exch2_jLo(4,1257)=0 exch2_jHi(4,1257)=35 exch2_opposingSend(4,1257)=3 exch2_pij(1,4,1257)=1 exch2_pij(2,4,1257)=0 exch2_pij(3,4,1257)=0 exch2_pij(4,4,1257)=1 exch2_oi(4,1257)=0 exch2_oj(4,1257)=0 RETURN END SUBROUTINE W2_E2SETUP_1258 C Topology for tile 1258 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1258)=34 exch2_tNy(1258)=34 exch2_tBasex(1258)=408 exch2_tBasey(1258)=272 exch2_txGlobalo(1258)=2959 exch2_tyGlobalo(1258)=273 exch2_isWedge(1258)=0 exch2_isNedge(1258)=0 exch2_isEedge(1258)=0 exch2_isSedge(1258)=0 exch2_myFace(1258)=6 exch2_mydNx(1258)=510 exch2_mydNy(1258)=510 exch2_nNeighbours(1258)=4 exch2_neighbourId(1,1258)=1273 exch2_iLo(1,1258)=0 exch2_iHi(1,1258)=35 exch2_jLo(1,1258)=35 exch2_jHi(1,1258)=35 exch2_opposingSend(1,1258)=2 exch2_pij(1,1,1258)=1 exch2_pij(2,1,1258)=0 exch2_pij(3,1,1258)=0 exch2_pij(4,1,1258)=1 exch2_oi(1,1258)=0 exch2_oj(1,1258)=0 exch2_neighbourId(2,1258)=1243 exch2_iLo(2,1258)=0 exch2_iHi(2,1258)=35 exch2_jLo(2,1258)=0 exch2_jHi(2,1258)=0 exch2_opposingSend(2,1258)=1 exch2_pij(1,2,1258)=1 exch2_pij(2,2,1258)=0 exch2_pij(3,2,1258)=0 exch2_pij(4,2,1258)=1 exch2_oi(2,1258)=0 exch2_oj(2,1258)=0 exch2_neighbourId(3,1258)=1259 exch2_iLo(3,1258)=35 exch2_iHi(3,1258)=35 exch2_jLo(3,1258)=0 exch2_jHi(3,1258)=35 exch2_opposingSend(3,1258)=4 exch2_pij(1,3,1258)=1 exch2_pij(2,3,1258)=0 exch2_pij(3,3,1258)=0 exch2_pij(4,3,1258)=1 exch2_oi(3,1258)=0 exch2_oj(3,1258)=0 exch2_neighbourId(4,1258)=1257 exch2_iLo(4,1258)=0 exch2_iHi(4,1258)=0 exch2_jLo(4,1258)=0 exch2_jHi(4,1258)=35 exch2_opposingSend(4,1258)=3 exch2_pij(1,4,1258)=1 exch2_pij(2,4,1258)=0 exch2_pij(3,4,1258)=0 exch2_pij(4,4,1258)=1 exch2_oi(4,1258)=0 exch2_oj(4,1258)=0 RETURN END SUBROUTINE W2_E2SETUP_1259 C Topology for tile 1259 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1259)=34 exch2_tNy(1259)=34 exch2_tBasex(1259)=442 exch2_tBasey(1259)=272 exch2_txGlobalo(1259)=2993 exch2_tyGlobalo(1259)=273 exch2_isWedge(1259)=0 exch2_isNedge(1259)=0 exch2_isEedge(1259)=0 exch2_isSedge(1259)=0 exch2_myFace(1259)=6 exch2_mydNx(1259)=510 exch2_mydNy(1259)=510 exch2_nNeighbours(1259)=4 exch2_neighbourId(1,1259)=1274 exch2_iLo(1,1259)=0 exch2_iHi(1,1259)=35 exch2_jLo(1,1259)=35 exch2_jHi(1,1259)=35 exch2_opposingSend(1,1259)=2 exch2_pij(1,1,1259)=1 exch2_pij(2,1,1259)=0 exch2_pij(3,1,1259)=0 exch2_pij(4,1,1259)=1 exch2_oi(1,1259)=0 exch2_oj(1,1259)=0 exch2_neighbourId(2,1259)=1244 exch2_iLo(2,1259)=0 exch2_iHi(2,1259)=35 exch2_jLo(2,1259)=0 exch2_jHi(2,1259)=0 exch2_opposingSend(2,1259)=1 exch2_pij(1,2,1259)=1 exch2_pij(2,2,1259)=0 exch2_pij(3,2,1259)=0 exch2_pij(4,2,1259)=1 exch2_oi(2,1259)=0 exch2_oj(2,1259)=0 exch2_neighbourId(3,1259)=1260 exch2_iLo(3,1259)=35 exch2_iHi(3,1259)=35 exch2_jLo(3,1259)=0 exch2_jHi(3,1259)=35 exch2_opposingSend(3,1259)=4 exch2_pij(1,3,1259)=1 exch2_pij(2,3,1259)=0 exch2_pij(3,3,1259)=0 exch2_pij(4,3,1259)=1 exch2_oi(3,1259)=0 exch2_oj(3,1259)=0 exch2_neighbourId(4,1259)=1258 exch2_iLo(4,1259)=0 exch2_iHi(4,1259)=0 exch2_jLo(4,1259)=0 exch2_jHi(4,1259)=35 exch2_opposingSend(4,1259)=3 exch2_pij(1,4,1259)=1 exch2_pij(2,4,1259)=0 exch2_pij(3,4,1259)=0 exch2_pij(4,4,1259)=1 exch2_oi(4,1259)=0 exch2_oj(4,1259)=0 RETURN END SUBROUTINE W2_E2SETUP_1260 C Topology for tile 1260 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1260)=34 exch2_tNy(1260)=34 exch2_tBasex(1260)=476 exch2_tBasey(1260)=272 exch2_txGlobalo(1260)=3027 exch2_tyGlobalo(1260)=273 exch2_isWedge(1260)=0 exch2_isNedge(1260)=0 exch2_isEedge(1260)=1 exch2_isSedge(1260)=0 exch2_myFace(1260)=6 exch2_mydNx(1260)=510 exch2_mydNy(1260)=510 exch2_nNeighbours(1260)=4 exch2_neighbourId(1,1260)=1275 exch2_iLo(1,1260)=0 exch2_iHi(1,1260)=35 exch2_jLo(1,1260)=35 exch2_jHi(1,1260)=35 exch2_opposingSend(1,1260)=2 exch2_pij(1,1,1260)=1 exch2_pij(2,1,1260)=0 exch2_pij(3,1,1260)=0 exch2_pij(4,1,1260)=1 exch2_oi(1,1260)=0 exch2_oj(1,1260)=0 exch2_neighbourId(2,1260)=1245 exch2_iLo(2,1260)=0 exch2_iHi(2,1260)=35 exch2_jLo(2,1260)=0 exch2_jHi(2,1260)=0 exch2_opposingSend(2,1260)=1 exch2_pij(1,2,1260)=1 exch2_pij(2,2,1260)=0 exch2_pij(3,2,1260)=0 exch2_pij(4,2,1260)=1 exch2_oi(2,1260)=0 exch2_oj(2,1260)=0 exch2_neighbourId(3,1260)=232 exch2_iLo(3,1260)=35 exch2_iHi(3,1260)=35 exch2_jLo(3,1260)=0 exch2_jHi(3,1260)=35 exch2_opposingSend(3,1260)=2 exch2_pij(1,3,1260)=0 exch2_pij(2,3,1260)=1 exch2_pij(3,3,1260)=-1 exch2_pij(4,3,1260)=0 exch2_oi(3,1260)=510 exch2_oj(3,1260)=511 exch2_neighbourId(4,1260)=1259 exch2_iLo(4,1260)=0 exch2_iHi(4,1260)=0 exch2_jLo(4,1260)=0 exch2_jHi(4,1260)=35 exch2_opposingSend(4,1260)=3 exch2_pij(1,4,1260)=1 exch2_pij(2,4,1260)=0 exch2_pij(3,4,1260)=0 exch2_pij(4,4,1260)=1 exch2_oi(4,1260)=0 exch2_oj(4,1260)=0 RETURN END SUBROUTINE W2_E2SETUP_1261 C Topology for tile 1261 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1261)=34 exch2_tNy(1261)=34 exch2_tBasex(1261)=0 exch2_tBasey(1261)=306 exch2_txGlobalo(1261)=2551 exch2_tyGlobalo(1261)=307 exch2_isWedge(1261)=1 exch2_isNedge(1261)=0 exch2_isEedge(1261)=0 exch2_isSedge(1261)=0 exch2_myFace(1261)=6 exch2_mydNx(1261)=510 exch2_mydNy(1261)=510 exch2_nNeighbours(1261)=4 exch2_neighbourId(1,1261)=1276 exch2_iLo(1,1261)=0 exch2_iHi(1,1261)=35 exch2_jLo(1,1261)=35 exch2_jHi(1,1261)=35 exch2_opposingSend(1,1261)=2 exch2_pij(1,1,1261)=1 exch2_pij(2,1,1261)=0 exch2_pij(3,1,1261)=0 exch2_pij(4,1,1261)=1 exch2_oi(1,1261)=0 exch2_oj(1,1261)=0 exch2_neighbourId(2,1261)=1246 exch2_iLo(2,1261)=0 exch2_iHi(2,1261)=35 exch2_jLo(2,1261)=0 exch2_jHi(2,1261)=0 exch2_opposingSend(2,1261)=1 exch2_pij(1,2,1261)=1 exch2_pij(2,2,1261)=0 exch2_pij(3,2,1261)=0 exch2_pij(4,2,1261)=1 exch2_oi(2,1261)=0 exch2_oj(2,1261)=0 exch2_neighbourId(3,1261)=1262 exch2_iLo(3,1261)=35 exch2_iHi(3,1261)=35 exch2_jLo(3,1261)=0 exch2_jHi(3,1261)=35 exch2_opposingSend(3,1261)=4 exch2_pij(1,3,1261)=1 exch2_pij(2,3,1261)=0 exch2_pij(3,3,1261)=0 exch2_pij(4,3,1261)=1 exch2_oi(3,1261)=0 exch2_oj(3,1261)=0 exch2_neighbourId(4,1261)=1050 exch2_iLo(4,1261)=0 exch2_iHi(4,1261)=0 exch2_jLo(4,1261)=0 exch2_jHi(4,1261)=35 exch2_opposingSend(4,1261)=3 exch2_pij(1,4,1261)=1 exch2_pij(2,4,1261)=0 exch2_pij(3,4,1261)=0 exch2_pij(4,4,1261)=1 exch2_oi(4,1261)=-510 exch2_oj(4,1261)=0 RETURN END SUBROUTINE W2_E2SETUP_1262 C Topology for tile 1262 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1262)=34 exch2_tNy(1262)=34 exch2_tBasex(1262)=34 exch2_tBasey(1262)=306 exch2_txGlobalo(1262)=2585 exch2_tyGlobalo(1262)=307 exch2_isWedge(1262)=0 exch2_isNedge(1262)=0 exch2_isEedge(1262)=0 exch2_isSedge(1262)=0 exch2_myFace(1262)=6 exch2_mydNx(1262)=510 exch2_mydNy(1262)=510 exch2_nNeighbours(1262)=4 exch2_neighbourId(1,1262)=1277 exch2_iLo(1,1262)=0 exch2_iHi(1,1262)=35 exch2_jLo(1,1262)=35 exch2_jHi(1,1262)=35 exch2_opposingSend(1,1262)=2 exch2_pij(1,1,1262)=1 exch2_pij(2,1,1262)=0 exch2_pij(3,1,1262)=0 exch2_pij(4,1,1262)=1 exch2_oi(1,1262)=0 exch2_oj(1,1262)=0 exch2_neighbourId(2,1262)=1247 exch2_iLo(2,1262)=0 exch2_iHi(2,1262)=35 exch2_jLo(2,1262)=0 exch2_jHi(2,1262)=0 exch2_opposingSend(2,1262)=1 exch2_pij(1,2,1262)=1 exch2_pij(2,2,1262)=0 exch2_pij(3,2,1262)=0 exch2_pij(4,2,1262)=1 exch2_oi(2,1262)=0 exch2_oj(2,1262)=0 exch2_neighbourId(3,1262)=1263 exch2_iLo(3,1262)=35 exch2_iHi(3,1262)=35 exch2_jLo(3,1262)=0 exch2_jHi(3,1262)=35 exch2_opposingSend(3,1262)=4 exch2_pij(1,3,1262)=1 exch2_pij(2,3,1262)=0 exch2_pij(3,3,1262)=0 exch2_pij(4,3,1262)=1 exch2_oi(3,1262)=0 exch2_oj(3,1262)=0 exch2_neighbourId(4,1262)=1261 exch2_iLo(4,1262)=0 exch2_iHi(4,1262)=0 exch2_jLo(4,1262)=0 exch2_jHi(4,1262)=35 exch2_opposingSend(4,1262)=3 exch2_pij(1,4,1262)=1 exch2_pij(2,4,1262)=0 exch2_pij(3,4,1262)=0 exch2_pij(4,4,1262)=1 exch2_oi(4,1262)=0 exch2_oj(4,1262)=0 RETURN END SUBROUTINE W2_E2SETUP_1263 C Topology for tile 1263 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1263)=34 exch2_tNy(1263)=34 exch2_tBasex(1263)=68 exch2_tBasey(1263)=306 exch2_txGlobalo(1263)=2619 exch2_tyGlobalo(1263)=307 exch2_isWedge(1263)=0 exch2_isNedge(1263)=0 exch2_isEedge(1263)=0 exch2_isSedge(1263)=0 exch2_myFace(1263)=6 exch2_mydNx(1263)=510 exch2_mydNy(1263)=510 exch2_nNeighbours(1263)=4 exch2_neighbourId(1,1263)=1278 exch2_iLo(1,1263)=0 exch2_iHi(1,1263)=35 exch2_jLo(1,1263)=35 exch2_jHi(1,1263)=35 exch2_opposingSend(1,1263)=2 exch2_pij(1,1,1263)=1 exch2_pij(2,1,1263)=0 exch2_pij(3,1,1263)=0 exch2_pij(4,1,1263)=1 exch2_oi(1,1263)=0 exch2_oj(1,1263)=0 exch2_neighbourId(2,1263)=1248 exch2_iLo(2,1263)=0 exch2_iHi(2,1263)=35 exch2_jLo(2,1263)=0 exch2_jHi(2,1263)=0 exch2_opposingSend(2,1263)=1 exch2_pij(1,2,1263)=1 exch2_pij(2,2,1263)=0 exch2_pij(3,2,1263)=0 exch2_pij(4,2,1263)=1 exch2_oi(2,1263)=0 exch2_oj(2,1263)=0 exch2_neighbourId(3,1263)=1264 exch2_iLo(3,1263)=35 exch2_iHi(3,1263)=35 exch2_jLo(3,1263)=0 exch2_jHi(3,1263)=35 exch2_opposingSend(3,1263)=4 exch2_pij(1,3,1263)=1 exch2_pij(2,3,1263)=0 exch2_pij(3,3,1263)=0 exch2_pij(4,3,1263)=1 exch2_oi(3,1263)=0 exch2_oj(3,1263)=0 exch2_neighbourId(4,1263)=1262 exch2_iLo(4,1263)=0 exch2_iHi(4,1263)=0 exch2_jLo(4,1263)=0 exch2_jHi(4,1263)=35 exch2_opposingSend(4,1263)=3 exch2_pij(1,4,1263)=1 exch2_pij(2,4,1263)=0 exch2_pij(3,4,1263)=0 exch2_pij(4,4,1263)=1 exch2_oi(4,1263)=0 exch2_oj(4,1263)=0 RETURN END SUBROUTINE W2_E2SETUP_1264 C Topology for tile 1264 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1264)=34 exch2_tNy(1264)=34 exch2_tBasex(1264)=102 exch2_tBasey(1264)=306 exch2_txGlobalo(1264)=2653 exch2_tyGlobalo(1264)=307 exch2_isWedge(1264)=0 exch2_isNedge(1264)=0 exch2_isEedge(1264)=0 exch2_isSedge(1264)=0 exch2_myFace(1264)=6 exch2_mydNx(1264)=510 exch2_mydNy(1264)=510 exch2_nNeighbours(1264)=4 exch2_neighbourId(1,1264)=1279 exch2_iLo(1,1264)=0 exch2_iHi(1,1264)=35 exch2_jLo(1,1264)=35 exch2_jHi(1,1264)=35 exch2_opposingSend(1,1264)=2 exch2_pij(1,1,1264)=1 exch2_pij(2,1,1264)=0 exch2_pij(3,1,1264)=0 exch2_pij(4,1,1264)=1 exch2_oi(1,1264)=0 exch2_oj(1,1264)=0 exch2_neighbourId(2,1264)=1249 exch2_iLo(2,1264)=0 exch2_iHi(2,1264)=35 exch2_jLo(2,1264)=0 exch2_jHi(2,1264)=0 exch2_opposingSend(2,1264)=1 exch2_pij(1,2,1264)=1 exch2_pij(2,2,1264)=0 exch2_pij(3,2,1264)=0 exch2_pij(4,2,1264)=1 exch2_oi(2,1264)=0 exch2_oj(2,1264)=0 exch2_neighbourId(3,1264)=1265 exch2_iLo(3,1264)=35 exch2_iHi(3,1264)=35 exch2_jLo(3,1264)=0 exch2_jHi(3,1264)=35 exch2_opposingSend(3,1264)=4 exch2_pij(1,3,1264)=1 exch2_pij(2,3,1264)=0 exch2_pij(3,3,1264)=0 exch2_pij(4,3,1264)=1 exch2_oi(3,1264)=0 exch2_oj(3,1264)=0 exch2_neighbourId(4,1264)=1263 exch2_iLo(4,1264)=0 exch2_iHi(4,1264)=0 exch2_jLo(4,1264)=0 exch2_jHi(4,1264)=35 exch2_opposingSend(4,1264)=3 exch2_pij(1,4,1264)=1 exch2_pij(2,4,1264)=0 exch2_pij(3,4,1264)=0 exch2_pij(4,4,1264)=1 exch2_oi(4,1264)=0 exch2_oj(4,1264)=0 RETURN END SUBROUTINE W2_E2SETUP_1265 C Topology for tile 1265 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1265)=34 exch2_tNy(1265)=34 exch2_tBasex(1265)=136 exch2_tBasey(1265)=306 exch2_txGlobalo(1265)=2687 exch2_tyGlobalo(1265)=307 exch2_isWedge(1265)=0 exch2_isNedge(1265)=0 exch2_isEedge(1265)=0 exch2_isSedge(1265)=0 exch2_myFace(1265)=6 exch2_mydNx(1265)=510 exch2_mydNy(1265)=510 exch2_nNeighbours(1265)=4 exch2_neighbourId(1,1265)=1280 exch2_iLo(1,1265)=0 exch2_iHi(1,1265)=35 exch2_jLo(1,1265)=35 exch2_jHi(1,1265)=35 exch2_opposingSend(1,1265)=2 exch2_pij(1,1,1265)=1 exch2_pij(2,1,1265)=0 exch2_pij(3,1,1265)=0 exch2_pij(4,1,1265)=1 exch2_oi(1,1265)=0 exch2_oj(1,1265)=0 exch2_neighbourId(2,1265)=1250 exch2_iLo(2,1265)=0 exch2_iHi(2,1265)=35 exch2_jLo(2,1265)=0 exch2_jHi(2,1265)=0 exch2_opposingSend(2,1265)=1 exch2_pij(1,2,1265)=1 exch2_pij(2,2,1265)=0 exch2_pij(3,2,1265)=0 exch2_pij(4,2,1265)=1 exch2_oi(2,1265)=0 exch2_oj(2,1265)=0 exch2_neighbourId(3,1265)=1266 exch2_iLo(3,1265)=35 exch2_iHi(3,1265)=35 exch2_jLo(3,1265)=0 exch2_jHi(3,1265)=35 exch2_opposingSend(3,1265)=4 exch2_pij(1,3,1265)=1 exch2_pij(2,3,1265)=0 exch2_pij(3,3,1265)=0 exch2_pij(4,3,1265)=1 exch2_oi(3,1265)=0 exch2_oj(3,1265)=0 exch2_neighbourId(4,1265)=1264 exch2_iLo(4,1265)=0 exch2_iHi(4,1265)=0 exch2_jLo(4,1265)=0 exch2_jHi(4,1265)=35 exch2_opposingSend(4,1265)=3 exch2_pij(1,4,1265)=1 exch2_pij(2,4,1265)=0 exch2_pij(3,4,1265)=0 exch2_pij(4,4,1265)=1 exch2_oi(4,1265)=0 exch2_oj(4,1265)=0 RETURN END SUBROUTINE W2_E2SETUP_1266 C Topology for tile 1266 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1266)=34 exch2_tNy(1266)=34 exch2_tBasex(1266)=170 exch2_tBasey(1266)=306 exch2_txGlobalo(1266)=2721 exch2_tyGlobalo(1266)=307 exch2_isWedge(1266)=0 exch2_isNedge(1266)=0 exch2_isEedge(1266)=0 exch2_isSedge(1266)=0 exch2_myFace(1266)=6 exch2_mydNx(1266)=510 exch2_mydNy(1266)=510 exch2_nNeighbours(1266)=4 exch2_neighbourId(1,1266)=1281 exch2_iLo(1,1266)=0 exch2_iHi(1,1266)=35 exch2_jLo(1,1266)=35 exch2_jHi(1,1266)=35 exch2_opposingSend(1,1266)=2 exch2_pij(1,1,1266)=1 exch2_pij(2,1,1266)=0 exch2_pij(3,1,1266)=0 exch2_pij(4,1,1266)=1 exch2_oi(1,1266)=0 exch2_oj(1,1266)=0 exch2_neighbourId(2,1266)=1251 exch2_iLo(2,1266)=0 exch2_iHi(2,1266)=35 exch2_jLo(2,1266)=0 exch2_jHi(2,1266)=0 exch2_opposingSend(2,1266)=1 exch2_pij(1,2,1266)=1 exch2_pij(2,2,1266)=0 exch2_pij(3,2,1266)=0 exch2_pij(4,2,1266)=1 exch2_oi(2,1266)=0 exch2_oj(2,1266)=0 exch2_neighbourId(3,1266)=1267 exch2_iLo(3,1266)=35 exch2_iHi(3,1266)=35 exch2_jLo(3,1266)=0 exch2_jHi(3,1266)=35 exch2_opposingSend(3,1266)=4 exch2_pij(1,3,1266)=1 exch2_pij(2,3,1266)=0 exch2_pij(3,3,1266)=0 exch2_pij(4,3,1266)=1 exch2_oi(3,1266)=0 exch2_oj(3,1266)=0 exch2_neighbourId(4,1266)=1265 exch2_iLo(4,1266)=0 exch2_iHi(4,1266)=0 exch2_jLo(4,1266)=0 exch2_jHi(4,1266)=35 exch2_opposingSend(4,1266)=3 exch2_pij(1,4,1266)=1 exch2_pij(2,4,1266)=0 exch2_pij(3,4,1266)=0 exch2_pij(4,4,1266)=1 exch2_oi(4,1266)=0 exch2_oj(4,1266)=0 RETURN END SUBROUTINE W2_E2SETUP_1267 C Topology for tile 1267 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1267)=34 exch2_tNy(1267)=34 exch2_tBasex(1267)=204 exch2_tBasey(1267)=306 exch2_txGlobalo(1267)=2755 exch2_tyGlobalo(1267)=307 exch2_isWedge(1267)=0 exch2_isNedge(1267)=0 exch2_isEedge(1267)=0 exch2_isSedge(1267)=0 exch2_myFace(1267)=6 exch2_mydNx(1267)=510 exch2_mydNy(1267)=510 exch2_nNeighbours(1267)=4 exch2_neighbourId(1,1267)=1282 exch2_iLo(1,1267)=0 exch2_iHi(1,1267)=35 exch2_jLo(1,1267)=35 exch2_jHi(1,1267)=35 exch2_opposingSend(1,1267)=2 exch2_pij(1,1,1267)=1 exch2_pij(2,1,1267)=0 exch2_pij(3,1,1267)=0 exch2_pij(4,1,1267)=1 exch2_oi(1,1267)=0 exch2_oj(1,1267)=0 exch2_neighbourId(2,1267)=1252 exch2_iLo(2,1267)=0 exch2_iHi(2,1267)=35 exch2_jLo(2,1267)=0 exch2_jHi(2,1267)=0 exch2_opposingSend(2,1267)=1 exch2_pij(1,2,1267)=1 exch2_pij(2,2,1267)=0 exch2_pij(3,2,1267)=0 exch2_pij(4,2,1267)=1 exch2_oi(2,1267)=0 exch2_oj(2,1267)=0 exch2_neighbourId(3,1267)=1268 exch2_iLo(3,1267)=35 exch2_iHi(3,1267)=35 exch2_jLo(3,1267)=0 exch2_jHi(3,1267)=35 exch2_opposingSend(3,1267)=4 exch2_pij(1,3,1267)=1 exch2_pij(2,3,1267)=0 exch2_pij(3,3,1267)=0 exch2_pij(4,3,1267)=1 exch2_oi(3,1267)=0 exch2_oj(3,1267)=0 exch2_neighbourId(4,1267)=1266 exch2_iLo(4,1267)=0 exch2_iHi(4,1267)=0 exch2_jLo(4,1267)=0 exch2_jHi(4,1267)=35 exch2_opposingSend(4,1267)=3 exch2_pij(1,4,1267)=1 exch2_pij(2,4,1267)=0 exch2_pij(3,4,1267)=0 exch2_pij(4,4,1267)=1 exch2_oi(4,1267)=0 exch2_oj(4,1267)=0 RETURN END SUBROUTINE W2_E2SETUP_1268 C Topology for tile 1268 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1268)=34 exch2_tNy(1268)=34 exch2_tBasex(1268)=238 exch2_tBasey(1268)=306 exch2_txGlobalo(1268)=2789 exch2_tyGlobalo(1268)=307 exch2_isWedge(1268)=0 exch2_isNedge(1268)=0 exch2_isEedge(1268)=0 exch2_isSedge(1268)=0 exch2_myFace(1268)=6 exch2_mydNx(1268)=510 exch2_mydNy(1268)=510 exch2_nNeighbours(1268)=4 exch2_neighbourId(1,1268)=1283 exch2_iLo(1,1268)=0 exch2_iHi(1,1268)=35 exch2_jLo(1,1268)=35 exch2_jHi(1,1268)=35 exch2_opposingSend(1,1268)=2 exch2_pij(1,1,1268)=1 exch2_pij(2,1,1268)=0 exch2_pij(3,1,1268)=0 exch2_pij(4,1,1268)=1 exch2_oi(1,1268)=0 exch2_oj(1,1268)=0 exch2_neighbourId(2,1268)=1253 exch2_iLo(2,1268)=0 exch2_iHi(2,1268)=35 exch2_jLo(2,1268)=0 exch2_jHi(2,1268)=0 exch2_opposingSend(2,1268)=1 exch2_pij(1,2,1268)=1 exch2_pij(2,2,1268)=0 exch2_pij(3,2,1268)=0 exch2_pij(4,2,1268)=1 exch2_oi(2,1268)=0 exch2_oj(2,1268)=0 exch2_neighbourId(3,1268)=1269 exch2_iLo(3,1268)=35 exch2_iHi(3,1268)=35 exch2_jLo(3,1268)=0 exch2_jHi(3,1268)=35 exch2_opposingSend(3,1268)=4 exch2_pij(1,3,1268)=1 exch2_pij(2,3,1268)=0 exch2_pij(3,3,1268)=0 exch2_pij(4,3,1268)=1 exch2_oi(3,1268)=0 exch2_oj(3,1268)=0 exch2_neighbourId(4,1268)=1267 exch2_iLo(4,1268)=0 exch2_iHi(4,1268)=0 exch2_jLo(4,1268)=0 exch2_jHi(4,1268)=35 exch2_opposingSend(4,1268)=3 exch2_pij(1,4,1268)=1 exch2_pij(2,4,1268)=0 exch2_pij(3,4,1268)=0 exch2_pij(4,4,1268)=1 exch2_oi(4,1268)=0 exch2_oj(4,1268)=0 RETURN END SUBROUTINE W2_E2SETUP_1269 C Topology for tile 1269 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1269)=34 exch2_tNy(1269)=34 exch2_tBasex(1269)=272 exch2_tBasey(1269)=306 exch2_txGlobalo(1269)=2823 exch2_tyGlobalo(1269)=307 exch2_isWedge(1269)=0 exch2_isNedge(1269)=0 exch2_isEedge(1269)=0 exch2_isSedge(1269)=0 exch2_myFace(1269)=6 exch2_mydNx(1269)=510 exch2_mydNy(1269)=510 exch2_nNeighbours(1269)=4 exch2_neighbourId(1,1269)=1284 exch2_iLo(1,1269)=0 exch2_iHi(1,1269)=35 exch2_jLo(1,1269)=35 exch2_jHi(1,1269)=35 exch2_opposingSend(1,1269)=2 exch2_pij(1,1,1269)=1 exch2_pij(2,1,1269)=0 exch2_pij(3,1,1269)=0 exch2_pij(4,1,1269)=1 exch2_oi(1,1269)=0 exch2_oj(1,1269)=0 exch2_neighbourId(2,1269)=1254 exch2_iLo(2,1269)=0 exch2_iHi(2,1269)=35 exch2_jLo(2,1269)=0 exch2_jHi(2,1269)=0 exch2_opposingSend(2,1269)=1 exch2_pij(1,2,1269)=1 exch2_pij(2,2,1269)=0 exch2_pij(3,2,1269)=0 exch2_pij(4,2,1269)=1 exch2_oi(2,1269)=0 exch2_oj(2,1269)=0 exch2_neighbourId(3,1269)=1270 exch2_iLo(3,1269)=35 exch2_iHi(3,1269)=35 exch2_jLo(3,1269)=0 exch2_jHi(3,1269)=35 exch2_opposingSend(3,1269)=4 exch2_pij(1,3,1269)=1 exch2_pij(2,3,1269)=0 exch2_pij(3,3,1269)=0 exch2_pij(4,3,1269)=1 exch2_oi(3,1269)=0 exch2_oj(3,1269)=0 exch2_neighbourId(4,1269)=1268 exch2_iLo(4,1269)=0 exch2_iHi(4,1269)=0 exch2_jLo(4,1269)=0 exch2_jHi(4,1269)=35 exch2_opposingSend(4,1269)=3 exch2_pij(1,4,1269)=1 exch2_pij(2,4,1269)=0 exch2_pij(3,4,1269)=0 exch2_pij(4,4,1269)=1 exch2_oi(4,1269)=0 exch2_oj(4,1269)=0 RETURN END SUBROUTINE W2_E2SETUP_1270 C Topology for tile 1270 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1270)=34 exch2_tNy(1270)=34 exch2_tBasex(1270)=306 exch2_tBasey(1270)=306 exch2_txGlobalo(1270)=2857 exch2_tyGlobalo(1270)=307 exch2_isWedge(1270)=0 exch2_isNedge(1270)=0 exch2_isEedge(1270)=0 exch2_isSedge(1270)=0 exch2_myFace(1270)=6 exch2_mydNx(1270)=510 exch2_mydNy(1270)=510 exch2_nNeighbours(1270)=4 exch2_neighbourId(1,1270)=1285 exch2_iLo(1,1270)=0 exch2_iHi(1,1270)=35 exch2_jLo(1,1270)=35 exch2_jHi(1,1270)=35 exch2_opposingSend(1,1270)=2 exch2_pij(1,1,1270)=1 exch2_pij(2,1,1270)=0 exch2_pij(3,1,1270)=0 exch2_pij(4,1,1270)=1 exch2_oi(1,1270)=0 exch2_oj(1,1270)=0 exch2_neighbourId(2,1270)=1255 exch2_iLo(2,1270)=0 exch2_iHi(2,1270)=35 exch2_jLo(2,1270)=0 exch2_jHi(2,1270)=0 exch2_opposingSend(2,1270)=1 exch2_pij(1,2,1270)=1 exch2_pij(2,2,1270)=0 exch2_pij(3,2,1270)=0 exch2_pij(4,2,1270)=1 exch2_oi(2,1270)=0 exch2_oj(2,1270)=0 exch2_neighbourId(3,1270)=1271 exch2_iLo(3,1270)=35 exch2_iHi(3,1270)=35 exch2_jLo(3,1270)=0 exch2_jHi(3,1270)=35 exch2_opposingSend(3,1270)=4 exch2_pij(1,3,1270)=1 exch2_pij(2,3,1270)=0 exch2_pij(3,3,1270)=0 exch2_pij(4,3,1270)=1 exch2_oi(3,1270)=0 exch2_oj(3,1270)=0 exch2_neighbourId(4,1270)=1269 exch2_iLo(4,1270)=0 exch2_iHi(4,1270)=0 exch2_jLo(4,1270)=0 exch2_jHi(4,1270)=35 exch2_opposingSend(4,1270)=3 exch2_pij(1,4,1270)=1 exch2_pij(2,4,1270)=0 exch2_pij(3,4,1270)=0 exch2_pij(4,4,1270)=1 exch2_oi(4,1270)=0 exch2_oj(4,1270)=0 RETURN END SUBROUTINE W2_E2SETUP_1271 C Topology for tile 1271 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1271)=34 exch2_tNy(1271)=34 exch2_tBasex(1271)=340 exch2_tBasey(1271)=306 exch2_txGlobalo(1271)=2891 exch2_tyGlobalo(1271)=307 exch2_isWedge(1271)=0 exch2_isNedge(1271)=0 exch2_isEedge(1271)=0 exch2_isSedge(1271)=0 exch2_myFace(1271)=6 exch2_mydNx(1271)=510 exch2_mydNy(1271)=510 exch2_nNeighbours(1271)=4 exch2_neighbourId(1,1271)=1286 exch2_iLo(1,1271)=0 exch2_iHi(1,1271)=35 exch2_jLo(1,1271)=35 exch2_jHi(1,1271)=35 exch2_opposingSend(1,1271)=2 exch2_pij(1,1,1271)=1 exch2_pij(2,1,1271)=0 exch2_pij(3,1,1271)=0 exch2_pij(4,1,1271)=1 exch2_oi(1,1271)=0 exch2_oj(1,1271)=0 exch2_neighbourId(2,1271)=1256 exch2_iLo(2,1271)=0 exch2_iHi(2,1271)=35 exch2_jLo(2,1271)=0 exch2_jHi(2,1271)=0 exch2_opposingSend(2,1271)=1 exch2_pij(1,2,1271)=1 exch2_pij(2,2,1271)=0 exch2_pij(3,2,1271)=0 exch2_pij(4,2,1271)=1 exch2_oi(2,1271)=0 exch2_oj(2,1271)=0 exch2_neighbourId(3,1271)=1272 exch2_iLo(3,1271)=35 exch2_iHi(3,1271)=35 exch2_jLo(3,1271)=0 exch2_jHi(3,1271)=35 exch2_opposingSend(3,1271)=4 exch2_pij(1,3,1271)=1 exch2_pij(2,3,1271)=0 exch2_pij(3,3,1271)=0 exch2_pij(4,3,1271)=1 exch2_oi(3,1271)=0 exch2_oj(3,1271)=0 exch2_neighbourId(4,1271)=1270 exch2_iLo(4,1271)=0 exch2_iHi(4,1271)=0 exch2_jLo(4,1271)=0 exch2_jHi(4,1271)=35 exch2_opposingSend(4,1271)=3 exch2_pij(1,4,1271)=1 exch2_pij(2,4,1271)=0 exch2_pij(3,4,1271)=0 exch2_pij(4,4,1271)=1 exch2_oi(4,1271)=0 exch2_oj(4,1271)=0 RETURN END SUBROUTINE W2_E2SETUP_1272 C Topology for tile 1272 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1272)=34 exch2_tNy(1272)=34 exch2_tBasex(1272)=374 exch2_tBasey(1272)=306 exch2_txGlobalo(1272)=2925 exch2_tyGlobalo(1272)=307 exch2_isWedge(1272)=0 exch2_isNedge(1272)=0 exch2_isEedge(1272)=0 exch2_isSedge(1272)=0 exch2_myFace(1272)=6 exch2_mydNx(1272)=510 exch2_mydNy(1272)=510 exch2_nNeighbours(1272)=4 exch2_neighbourId(1,1272)=1287 exch2_iLo(1,1272)=0 exch2_iHi(1,1272)=35 exch2_jLo(1,1272)=35 exch2_jHi(1,1272)=35 exch2_opposingSend(1,1272)=2 exch2_pij(1,1,1272)=1 exch2_pij(2,1,1272)=0 exch2_pij(3,1,1272)=0 exch2_pij(4,1,1272)=1 exch2_oi(1,1272)=0 exch2_oj(1,1272)=0 exch2_neighbourId(2,1272)=1257 exch2_iLo(2,1272)=0 exch2_iHi(2,1272)=35 exch2_jLo(2,1272)=0 exch2_jHi(2,1272)=0 exch2_opposingSend(2,1272)=1 exch2_pij(1,2,1272)=1 exch2_pij(2,2,1272)=0 exch2_pij(3,2,1272)=0 exch2_pij(4,2,1272)=1 exch2_oi(2,1272)=0 exch2_oj(2,1272)=0 exch2_neighbourId(3,1272)=1273 exch2_iLo(3,1272)=35 exch2_iHi(3,1272)=35 exch2_jLo(3,1272)=0 exch2_jHi(3,1272)=35 exch2_opposingSend(3,1272)=4 exch2_pij(1,3,1272)=1 exch2_pij(2,3,1272)=0 exch2_pij(3,3,1272)=0 exch2_pij(4,3,1272)=1 exch2_oi(3,1272)=0 exch2_oj(3,1272)=0 exch2_neighbourId(4,1272)=1271 exch2_iLo(4,1272)=0 exch2_iHi(4,1272)=0 exch2_jLo(4,1272)=0 exch2_jHi(4,1272)=35 exch2_opposingSend(4,1272)=3 exch2_pij(1,4,1272)=1 exch2_pij(2,4,1272)=0 exch2_pij(3,4,1272)=0 exch2_pij(4,4,1272)=1 exch2_oi(4,1272)=0 exch2_oj(4,1272)=0 RETURN END SUBROUTINE W2_E2SETUP_1273 C Topology for tile 1273 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1273)=34 exch2_tNy(1273)=34 exch2_tBasex(1273)=408 exch2_tBasey(1273)=306 exch2_txGlobalo(1273)=2959 exch2_tyGlobalo(1273)=307 exch2_isWedge(1273)=0 exch2_isNedge(1273)=0 exch2_isEedge(1273)=0 exch2_isSedge(1273)=0 exch2_myFace(1273)=6 exch2_mydNx(1273)=510 exch2_mydNy(1273)=510 exch2_nNeighbours(1273)=4 exch2_neighbourId(1,1273)=1288 exch2_iLo(1,1273)=0 exch2_iHi(1,1273)=35 exch2_jLo(1,1273)=35 exch2_jHi(1,1273)=35 exch2_opposingSend(1,1273)=2 exch2_pij(1,1,1273)=1 exch2_pij(2,1,1273)=0 exch2_pij(3,1,1273)=0 exch2_pij(4,1,1273)=1 exch2_oi(1,1273)=0 exch2_oj(1,1273)=0 exch2_neighbourId(2,1273)=1258 exch2_iLo(2,1273)=0 exch2_iHi(2,1273)=35 exch2_jLo(2,1273)=0 exch2_jHi(2,1273)=0 exch2_opposingSend(2,1273)=1 exch2_pij(1,2,1273)=1 exch2_pij(2,2,1273)=0 exch2_pij(3,2,1273)=0 exch2_pij(4,2,1273)=1 exch2_oi(2,1273)=0 exch2_oj(2,1273)=0 exch2_neighbourId(3,1273)=1274 exch2_iLo(3,1273)=35 exch2_iHi(3,1273)=35 exch2_jLo(3,1273)=0 exch2_jHi(3,1273)=35 exch2_opposingSend(3,1273)=4 exch2_pij(1,3,1273)=1 exch2_pij(2,3,1273)=0 exch2_pij(3,3,1273)=0 exch2_pij(4,3,1273)=1 exch2_oi(3,1273)=0 exch2_oj(3,1273)=0 exch2_neighbourId(4,1273)=1272 exch2_iLo(4,1273)=0 exch2_iHi(4,1273)=0 exch2_jLo(4,1273)=0 exch2_jHi(4,1273)=35 exch2_opposingSend(4,1273)=3 exch2_pij(1,4,1273)=1 exch2_pij(2,4,1273)=0 exch2_pij(3,4,1273)=0 exch2_pij(4,4,1273)=1 exch2_oi(4,1273)=0 exch2_oj(4,1273)=0 RETURN END SUBROUTINE W2_E2SETUP_1274 C Topology for tile 1274 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1274)=34 exch2_tNy(1274)=34 exch2_tBasex(1274)=442 exch2_tBasey(1274)=306 exch2_txGlobalo(1274)=2993 exch2_tyGlobalo(1274)=307 exch2_isWedge(1274)=0 exch2_isNedge(1274)=0 exch2_isEedge(1274)=0 exch2_isSedge(1274)=0 exch2_myFace(1274)=6 exch2_mydNx(1274)=510 exch2_mydNy(1274)=510 exch2_nNeighbours(1274)=4 exch2_neighbourId(1,1274)=1289 exch2_iLo(1,1274)=0 exch2_iHi(1,1274)=35 exch2_jLo(1,1274)=35 exch2_jHi(1,1274)=35 exch2_opposingSend(1,1274)=2 exch2_pij(1,1,1274)=1 exch2_pij(2,1,1274)=0 exch2_pij(3,1,1274)=0 exch2_pij(4,1,1274)=1 exch2_oi(1,1274)=0 exch2_oj(1,1274)=0 exch2_neighbourId(2,1274)=1259 exch2_iLo(2,1274)=0 exch2_iHi(2,1274)=35 exch2_jLo(2,1274)=0 exch2_jHi(2,1274)=0 exch2_opposingSend(2,1274)=1 exch2_pij(1,2,1274)=1 exch2_pij(2,2,1274)=0 exch2_pij(3,2,1274)=0 exch2_pij(4,2,1274)=1 exch2_oi(2,1274)=0 exch2_oj(2,1274)=0 exch2_neighbourId(3,1274)=1275 exch2_iLo(3,1274)=35 exch2_iHi(3,1274)=35 exch2_jLo(3,1274)=0 exch2_jHi(3,1274)=35 exch2_opposingSend(3,1274)=4 exch2_pij(1,3,1274)=1 exch2_pij(2,3,1274)=0 exch2_pij(3,3,1274)=0 exch2_pij(4,3,1274)=1 exch2_oi(3,1274)=0 exch2_oj(3,1274)=0 exch2_neighbourId(4,1274)=1273 exch2_iLo(4,1274)=0 exch2_iHi(4,1274)=0 exch2_jLo(4,1274)=0 exch2_jHi(4,1274)=35 exch2_opposingSend(4,1274)=3 exch2_pij(1,4,1274)=1 exch2_pij(2,4,1274)=0 exch2_pij(3,4,1274)=0 exch2_pij(4,4,1274)=1 exch2_oi(4,1274)=0 exch2_oj(4,1274)=0 RETURN END SUBROUTINE W2_E2SETUP_1275 C Topology for tile 1275 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1275)=34 exch2_tNy(1275)=34 exch2_tBasex(1275)=476 exch2_tBasey(1275)=306 exch2_txGlobalo(1275)=3027 exch2_tyGlobalo(1275)=307 exch2_isWedge(1275)=0 exch2_isNedge(1275)=0 exch2_isEedge(1275)=1 exch2_isSedge(1275)=0 exch2_myFace(1275)=6 exch2_mydNx(1275)=510 exch2_mydNy(1275)=510 exch2_nNeighbours(1275)=4 exch2_neighbourId(1,1275)=1290 exch2_iLo(1,1275)=0 exch2_iHi(1,1275)=35 exch2_jLo(1,1275)=35 exch2_jHi(1,1275)=35 exch2_opposingSend(1,1275)=2 exch2_pij(1,1,1275)=1 exch2_pij(2,1,1275)=0 exch2_pij(3,1,1275)=0 exch2_pij(4,1,1275)=1 exch2_oi(1,1275)=0 exch2_oj(1,1275)=0 exch2_neighbourId(2,1275)=1260 exch2_iLo(2,1275)=0 exch2_iHi(2,1275)=35 exch2_jLo(2,1275)=0 exch2_jHi(2,1275)=0 exch2_opposingSend(2,1275)=1 exch2_pij(1,2,1275)=1 exch2_pij(2,2,1275)=0 exch2_pij(3,2,1275)=0 exch2_pij(4,2,1275)=1 exch2_oi(2,1275)=0 exch2_oj(2,1275)=0 exch2_neighbourId(3,1275)=231 exch2_iLo(3,1275)=35 exch2_iHi(3,1275)=35 exch2_jLo(3,1275)=0 exch2_jHi(3,1275)=35 exch2_opposingSend(3,1275)=2 exch2_pij(1,3,1275)=0 exch2_pij(2,3,1275)=1 exch2_pij(3,3,1275)=-1 exch2_pij(4,3,1275)=0 exch2_oi(3,1275)=510 exch2_oj(3,1275)=511 exch2_neighbourId(4,1275)=1274 exch2_iLo(4,1275)=0 exch2_iHi(4,1275)=0 exch2_jLo(4,1275)=0 exch2_jHi(4,1275)=35 exch2_opposingSend(4,1275)=3 exch2_pij(1,4,1275)=1 exch2_pij(2,4,1275)=0 exch2_pij(3,4,1275)=0 exch2_pij(4,4,1275)=1 exch2_oi(4,1275)=0 exch2_oj(4,1275)=0 RETURN END SUBROUTINE W2_E2SETUP_1276 C Topology for tile 1276 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1276)=34 exch2_tNy(1276)=34 exch2_tBasex(1276)=0 exch2_tBasey(1276)=340 exch2_txGlobalo(1276)=2551 exch2_tyGlobalo(1276)=341 exch2_isWedge(1276)=1 exch2_isNedge(1276)=0 exch2_isEedge(1276)=0 exch2_isSedge(1276)=0 exch2_myFace(1276)=6 exch2_mydNx(1276)=510 exch2_mydNy(1276)=510 exch2_nNeighbours(1276)=4 exch2_neighbourId(1,1276)=1291 exch2_iLo(1,1276)=0 exch2_iHi(1,1276)=35 exch2_jLo(1,1276)=35 exch2_jHi(1,1276)=35 exch2_opposingSend(1,1276)=2 exch2_pij(1,1,1276)=1 exch2_pij(2,1,1276)=0 exch2_pij(3,1,1276)=0 exch2_pij(4,1,1276)=1 exch2_oi(1,1276)=0 exch2_oj(1,1276)=0 exch2_neighbourId(2,1276)=1261 exch2_iLo(2,1276)=0 exch2_iHi(2,1276)=35 exch2_jLo(2,1276)=0 exch2_jHi(2,1276)=0 exch2_opposingSend(2,1276)=1 exch2_pij(1,2,1276)=1 exch2_pij(2,2,1276)=0 exch2_pij(3,2,1276)=0 exch2_pij(4,2,1276)=1 exch2_oi(2,1276)=0 exch2_oj(2,1276)=0 exch2_neighbourId(3,1276)=1277 exch2_iLo(3,1276)=35 exch2_iHi(3,1276)=35 exch2_jLo(3,1276)=0 exch2_jHi(3,1276)=35 exch2_opposingSend(3,1276)=4 exch2_pij(1,3,1276)=1 exch2_pij(2,3,1276)=0 exch2_pij(3,3,1276)=0 exch2_pij(4,3,1276)=1 exch2_oi(3,1276)=0 exch2_oj(3,1276)=0 exch2_neighbourId(4,1276)=1065 exch2_iLo(4,1276)=0 exch2_iHi(4,1276)=0 exch2_jLo(4,1276)=0 exch2_jHi(4,1276)=35 exch2_opposingSend(4,1276)=3 exch2_pij(1,4,1276)=1 exch2_pij(2,4,1276)=0 exch2_pij(3,4,1276)=0 exch2_pij(4,4,1276)=1 exch2_oi(4,1276)=-510 exch2_oj(4,1276)=0 RETURN END SUBROUTINE W2_E2SETUP_1277 C Topology for tile 1277 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1277)=34 exch2_tNy(1277)=34 exch2_tBasex(1277)=34 exch2_tBasey(1277)=340 exch2_txGlobalo(1277)=2585 exch2_tyGlobalo(1277)=341 exch2_isWedge(1277)=0 exch2_isNedge(1277)=0 exch2_isEedge(1277)=0 exch2_isSedge(1277)=0 exch2_myFace(1277)=6 exch2_mydNx(1277)=510 exch2_mydNy(1277)=510 exch2_nNeighbours(1277)=4 exch2_neighbourId(1,1277)=1292 exch2_iLo(1,1277)=0 exch2_iHi(1,1277)=35 exch2_jLo(1,1277)=35 exch2_jHi(1,1277)=35 exch2_opposingSend(1,1277)=2 exch2_pij(1,1,1277)=1 exch2_pij(2,1,1277)=0 exch2_pij(3,1,1277)=0 exch2_pij(4,1,1277)=1 exch2_oi(1,1277)=0 exch2_oj(1,1277)=0 exch2_neighbourId(2,1277)=1262 exch2_iLo(2,1277)=0 exch2_iHi(2,1277)=35 exch2_jLo(2,1277)=0 exch2_jHi(2,1277)=0 exch2_opposingSend(2,1277)=1 exch2_pij(1,2,1277)=1 exch2_pij(2,2,1277)=0 exch2_pij(3,2,1277)=0 exch2_pij(4,2,1277)=1 exch2_oi(2,1277)=0 exch2_oj(2,1277)=0 exch2_neighbourId(3,1277)=1278 exch2_iLo(3,1277)=35 exch2_iHi(3,1277)=35 exch2_jLo(3,1277)=0 exch2_jHi(3,1277)=35 exch2_opposingSend(3,1277)=4 exch2_pij(1,3,1277)=1 exch2_pij(2,3,1277)=0 exch2_pij(3,3,1277)=0 exch2_pij(4,3,1277)=1 exch2_oi(3,1277)=0 exch2_oj(3,1277)=0 exch2_neighbourId(4,1277)=1276 exch2_iLo(4,1277)=0 exch2_iHi(4,1277)=0 exch2_jLo(4,1277)=0 exch2_jHi(4,1277)=35 exch2_opposingSend(4,1277)=3 exch2_pij(1,4,1277)=1 exch2_pij(2,4,1277)=0 exch2_pij(3,4,1277)=0 exch2_pij(4,4,1277)=1 exch2_oi(4,1277)=0 exch2_oj(4,1277)=0 RETURN END SUBROUTINE W2_E2SETUP_1278 C Topology for tile 1278 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1278)=34 exch2_tNy(1278)=34 exch2_tBasex(1278)=68 exch2_tBasey(1278)=340 exch2_txGlobalo(1278)=2619 exch2_tyGlobalo(1278)=341 exch2_isWedge(1278)=0 exch2_isNedge(1278)=0 exch2_isEedge(1278)=0 exch2_isSedge(1278)=0 exch2_myFace(1278)=6 exch2_mydNx(1278)=510 exch2_mydNy(1278)=510 exch2_nNeighbours(1278)=4 exch2_neighbourId(1,1278)=1293 exch2_iLo(1,1278)=0 exch2_iHi(1,1278)=35 exch2_jLo(1,1278)=35 exch2_jHi(1,1278)=35 exch2_opposingSend(1,1278)=2 exch2_pij(1,1,1278)=1 exch2_pij(2,1,1278)=0 exch2_pij(3,1,1278)=0 exch2_pij(4,1,1278)=1 exch2_oi(1,1278)=0 exch2_oj(1,1278)=0 exch2_neighbourId(2,1278)=1263 exch2_iLo(2,1278)=0 exch2_iHi(2,1278)=35 exch2_jLo(2,1278)=0 exch2_jHi(2,1278)=0 exch2_opposingSend(2,1278)=1 exch2_pij(1,2,1278)=1 exch2_pij(2,2,1278)=0 exch2_pij(3,2,1278)=0 exch2_pij(4,2,1278)=1 exch2_oi(2,1278)=0 exch2_oj(2,1278)=0 exch2_neighbourId(3,1278)=1279 exch2_iLo(3,1278)=35 exch2_iHi(3,1278)=35 exch2_jLo(3,1278)=0 exch2_jHi(3,1278)=35 exch2_opposingSend(3,1278)=4 exch2_pij(1,3,1278)=1 exch2_pij(2,3,1278)=0 exch2_pij(3,3,1278)=0 exch2_pij(4,3,1278)=1 exch2_oi(3,1278)=0 exch2_oj(3,1278)=0 exch2_neighbourId(4,1278)=1277 exch2_iLo(4,1278)=0 exch2_iHi(4,1278)=0 exch2_jLo(4,1278)=0 exch2_jHi(4,1278)=35 exch2_opposingSend(4,1278)=3 exch2_pij(1,4,1278)=1 exch2_pij(2,4,1278)=0 exch2_pij(3,4,1278)=0 exch2_pij(4,4,1278)=1 exch2_oi(4,1278)=0 exch2_oj(4,1278)=0 RETURN END SUBROUTINE W2_E2SETUP_1279 C Topology for tile 1279 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1279)=34 exch2_tNy(1279)=34 exch2_tBasex(1279)=102 exch2_tBasey(1279)=340 exch2_txGlobalo(1279)=2653 exch2_tyGlobalo(1279)=341 exch2_isWedge(1279)=0 exch2_isNedge(1279)=0 exch2_isEedge(1279)=0 exch2_isSedge(1279)=0 exch2_myFace(1279)=6 exch2_mydNx(1279)=510 exch2_mydNy(1279)=510 exch2_nNeighbours(1279)=4 exch2_neighbourId(1,1279)=1294 exch2_iLo(1,1279)=0 exch2_iHi(1,1279)=35 exch2_jLo(1,1279)=35 exch2_jHi(1,1279)=35 exch2_opposingSend(1,1279)=2 exch2_pij(1,1,1279)=1 exch2_pij(2,1,1279)=0 exch2_pij(3,1,1279)=0 exch2_pij(4,1,1279)=1 exch2_oi(1,1279)=0 exch2_oj(1,1279)=0 exch2_neighbourId(2,1279)=1264 exch2_iLo(2,1279)=0 exch2_iHi(2,1279)=35 exch2_jLo(2,1279)=0 exch2_jHi(2,1279)=0 exch2_opposingSend(2,1279)=1 exch2_pij(1,2,1279)=1 exch2_pij(2,2,1279)=0 exch2_pij(3,2,1279)=0 exch2_pij(4,2,1279)=1 exch2_oi(2,1279)=0 exch2_oj(2,1279)=0 exch2_neighbourId(3,1279)=1280 exch2_iLo(3,1279)=35 exch2_iHi(3,1279)=35 exch2_jLo(3,1279)=0 exch2_jHi(3,1279)=35 exch2_opposingSend(3,1279)=4 exch2_pij(1,3,1279)=1 exch2_pij(2,3,1279)=0 exch2_pij(3,3,1279)=0 exch2_pij(4,3,1279)=1 exch2_oi(3,1279)=0 exch2_oj(3,1279)=0 exch2_neighbourId(4,1279)=1278 exch2_iLo(4,1279)=0 exch2_iHi(4,1279)=0 exch2_jLo(4,1279)=0 exch2_jHi(4,1279)=35 exch2_opposingSend(4,1279)=3 exch2_pij(1,4,1279)=1 exch2_pij(2,4,1279)=0 exch2_pij(3,4,1279)=0 exch2_pij(4,4,1279)=1 exch2_oi(4,1279)=0 exch2_oj(4,1279)=0 RETURN END SUBROUTINE W2_E2SETUP_1280 C Topology for tile 1280 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1280)=34 exch2_tNy(1280)=34 exch2_tBasex(1280)=136 exch2_tBasey(1280)=340 exch2_txGlobalo(1280)=2687 exch2_tyGlobalo(1280)=341 exch2_isWedge(1280)=0 exch2_isNedge(1280)=0 exch2_isEedge(1280)=0 exch2_isSedge(1280)=0 exch2_myFace(1280)=6 exch2_mydNx(1280)=510 exch2_mydNy(1280)=510 exch2_nNeighbours(1280)=4 exch2_neighbourId(1,1280)=1295 exch2_iLo(1,1280)=0 exch2_iHi(1,1280)=35 exch2_jLo(1,1280)=35 exch2_jHi(1,1280)=35 exch2_opposingSend(1,1280)=2 exch2_pij(1,1,1280)=1 exch2_pij(2,1,1280)=0 exch2_pij(3,1,1280)=0 exch2_pij(4,1,1280)=1 exch2_oi(1,1280)=0 exch2_oj(1,1280)=0 exch2_neighbourId(2,1280)=1265 exch2_iLo(2,1280)=0 exch2_iHi(2,1280)=35 exch2_jLo(2,1280)=0 exch2_jHi(2,1280)=0 exch2_opposingSend(2,1280)=1 exch2_pij(1,2,1280)=1 exch2_pij(2,2,1280)=0 exch2_pij(3,2,1280)=0 exch2_pij(4,2,1280)=1 exch2_oi(2,1280)=0 exch2_oj(2,1280)=0 exch2_neighbourId(3,1280)=1281 exch2_iLo(3,1280)=35 exch2_iHi(3,1280)=35 exch2_jLo(3,1280)=0 exch2_jHi(3,1280)=35 exch2_opposingSend(3,1280)=4 exch2_pij(1,3,1280)=1 exch2_pij(2,3,1280)=0 exch2_pij(3,3,1280)=0 exch2_pij(4,3,1280)=1 exch2_oi(3,1280)=0 exch2_oj(3,1280)=0 exch2_neighbourId(4,1280)=1279 exch2_iLo(4,1280)=0 exch2_iHi(4,1280)=0 exch2_jLo(4,1280)=0 exch2_jHi(4,1280)=35 exch2_opposingSend(4,1280)=3 exch2_pij(1,4,1280)=1 exch2_pij(2,4,1280)=0 exch2_pij(3,4,1280)=0 exch2_pij(4,4,1280)=1 exch2_oi(4,1280)=0 exch2_oj(4,1280)=0 RETURN END SUBROUTINE W2_E2SETUP_1281 C Topology for tile 1281 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1281)=34 exch2_tNy(1281)=34 exch2_tBasex(1281)=170 exch2_tBasey(1281)=340 exch2_txGlobalo(1281)=2721 exch2_tyGlobalo(1281)=341 exch2_isWedge(1281)=0 exch2_isNedge(1281)=0 exch2_isEedge(1281)=0 exch2_isSedge(1281)=0 exch2_myFace(1281)=6 exch2_mydNx(1281)=510 exch2_mydNy(1281)=510 exch2_nNeighbours(1281)=4 exch2_neighbourId(1,1281)=1296 exch2_iLo(1,1281)=0 exch2_iHi(1,1281)=35 exch2_jLo(1,1281)=35 exch2_jHi(1,1281)=35 exch2_opposingSend(1,1281)=2 exch2_pij(1,1,1281)=1 exch2_pij(2,1,1281)=0 exch2_pij(3,1,1281)=0 exch2_pij(4,1,1281)=1 exch2_oi(1,1281)=0 exch2_oj(1,1281)=0 exch2_neighbourId(2,1281)=1266 exch2_iLo(2,1281)=0 exch2_iHi(2,1281)=35 exch2_jLo(2,1281)=0 exch2_jHi(2,1281)=0 exch2_opposingSend(2,1281)=1 exch2_pij(1,2,1281)=1 exch2_pij(2,2,1281)=0 exch2_pij(3,2,1281)=0 exch2_pij(4,2,1281)=1 exch2_oi(2,1281)=0 exch2_oj(2,1281)=0 exch2_neighbourId(3,1281)=1282 exch2_iLo(3,1281)=35 exch2_iHi(3,1281)=35 exch2_jLo(3,1281)=0 exch2_jHi(3,1281)=35 exch2_opposingSend(3,1281)=4 exch2_pij(1,3,1281)=1 exch2_pij(2,3,1281)=0 exch2_pij(3,3,1281)=0 exch2_pij(4,3,1281)=1 exch2_oi(3,1281)=0 exch2_oj(3,1281)=0 exch2_neighbourId(4,1281)=1280 exch2_iLo(4,1281)=0 exch2_iHi(4,1281)=0 exch2_jLo(4,1281)=0 exch2_jHi(4,1281)=35 exch2_opposingSend(4,1281)=3 exch2_pij(1,4,1281)=1 exch2_pij(2,4,1281)=0 exch2_pij(3,4,1281)=0 exch2_pij(4,4,1281)=1 exch2_oi(4,1281)=0 exch2_oj(4,1281)=0 RETURN END SUBROUTINE W2_E2SETUP_1282 C Topology for tile 1282 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1282)=34 exch2_tNy(1282)=34 exch2_tBasex(1282)=204 exch2_tBasey(1282)=340 exch2_txGlobalo(1282)=2755 exch2_tyGlobalo(1282)=341 exch2_isWedge(1282)=0 exch2_isNedge(1282)=0 exch2_isEedge(1282)=0 exch2_isSedge(1282)=0 exch2_myFace(1282)=6 exch2_mydNx(1282)=510 exch2_mydNy(1282)=510 exch2_nNeighbours(1282)=4 exch2_neighbourId(1,1282)=1297 exch2_iLo(1,1282)=0 exch2_iHi(1,1282)=35 exch2_jLo(1,1282)=35 exch2_jHi(1,1282)=35 exch2_opposingSend(1,1282)=2 exch2_pij(1,1,1282)=1 exch2_pij(2,1,1282)=0 exch2_pij(3,1,1282)=0 exch2_pij(4,1,1282)=1 exch2_oi(1,1282)=0 exch2_oj(1,1282)=0 exch2_neighbourId(2,1282)=1267 exch2_iLo(2,1282)=0 exch2_iHi(2,1282)=35 exch2_jLo(2,1282)=0 exch2_jHi(2,1282)=0 exch2_opposingSend(2,1282)=1 exch2_pij(1,2,1282)=1 exch2_pij(2,2,1282)=0 exch2_pij(3,2,1282)=0 exch2_pij(4,2,1282)=1 exch2_oi(2,1282)=0 exch2_oj(2,1282)=0 exch2_neighbourId(3,1282)=1283 exch2_iLo(3,1282)=35 exch2_iHi(3,1282)=35 exch2_jLo(3,1282)=0 exch2_jHi(3,1282)=35 exch2_opposingSend(3,1282)=4 exch2_pij(1,3,1282)=1 exch2_pij(2,3,1282)=0 exch2_pij(3,3,1282)=0 exch2_pij(4,3,1282)=1 exch2_oi(3,1282)=0 exch2_oj(3,1282)=0 exch2_neighbourId(4,1282)=1281 exch2_iLo(4,1282)=0 exch2_iHi(4,1282)=0 exch2_jLo(4,1282)=0 exch2_jHi(4,1282)=35 exch2_opposingSend(4,1282)=3 exch2_pij(1,4,1282)=1 exch2_pij(2,4,1282)=0 exch2_pij(3,4,1282)=0 exch2_pij(4,4,1282)=1 exch2_oi(4,1282)=0 exch2_oj(4,1282)=0 RETURN END SUBROUTINE W2_E2SETUP_1283 C Topology for tile 1283 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1283)=34 exch2_tNy(1283)=34 exch2_tBasex(1283)=238 exch2_tBasey(1283)=340 exch2_txGlobalo(1283)=2789 exch2_tyGlobalo(1283)=341 exch2_isWedge(1283)=0 exch2_isNedge(1283)=0 exch2_isEedge(1283)=0 exch2_isSedge(1283)=0 exch2_myFace(1283)=6 exch2_mydNx(1283)=510 exch2_mydNy(1283)=510 exch2_nNeighbours(1283)=4 exch2_neighbourId(1,1283)=1298 exch2_iLo(1,1283)=0 exch2_iHi(1,1283)=35 exch2_jLo(1,1283)=35 exch2_jHi(1,1283)=35 exch2_opposingSend(1,1283)=2 exch2_pij(1,1,1283)=1 exch2_pij(2,1,1283)=0 exch2_pij(3,1,1283)=0 exch2_pij(4,1,1283)=1 exch2_oi(1,1283)=0 exch2_oj(1,1283)=0 exch2_neighbourId(2,1283)=1268 exch2_iLo(2,1283)=0 exch2_iHi(2,1283)=35 exch2_jLo(2,1283)=0 exch2_jHi(2,1283)=0 exch2_opposingSend(2,1283)=1 exch2_pij(1,2,1283)=1 exch2_pij(2,2,1283)=0 exch2_pij(3,2,1283)=0 exch2_pij(4,2,1283)=1 exch2_oi(2,1283)=0 exch2_oj(2,1283)=0 exch2_neighbourId(3,1283)=1284 exch2_iLo(3,1283)=35 exch2_iHi(3,1283)=35 exch2_jLo(3,1283)=0 exch2_jHi(3,1283)=35 exch2_opposingSend(3,1283)=4 exch2_pij(1,3,1283)=1 exch2_pij(2,3,1283)=0 exch2_pij(3,3,1283)=0 exch2_pij(4,3,1283)=1 exch2_oi(3,1283)=0 exch2_oj(3,1283)=0 exch2_neighbourId(4,1283)=1282 exch2_iLo(4,1283)=0 exch2_iHi(4,1283)=0 exch2_jLo(4,1283)=0 exch2_jHi(4,1283)=35 exch2_opposingSend(4,1283)=3 exch2_pij(1,4,1283)=1 exch2_pij(2,4,1283)=0 exch2_pij(3,4,1283)=0 exch2_pij(4,4,1283)=1 exch2_oi(4,1283)=0 exch2_oj(4,1283)=0 RETURN END SUBROUTINE W2_E2SETUP_1284 C Topology for tile 1284 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1284)=34 exch2_tNy(1284)=34 exch2_tBasex(1284)=272 exch2_tBasey(1284)=340 exch2_txGlobalo(1284)=2823 exch2_tyGlobalo(1284)=341 exch2_isWedge(1284)=0 exch2_isNedge(1284)=0 exch2_isEedge(1284)=0 exch2_isSedge(1284)=0 exch2_myFace(1284)=6 exch2_mydNx(1284)=510 exch2_mydNy(1284)=510 exch2_nNeighbours(1284)=4 exch2_neighbourId(1,1284)=1299 exch2_iLo(1,1284)=0 exch2_iHi(1,1284)=35 exch2_jLo(1,1284)=35 exch2_jHi(1,1284)=35 exch2_opposingSend(1,1284)=2 exch2_pij(1,1,1284)=1 exch2_pij(2,1,1284)=0 exch2_pij(3,1,1284)=0 exch2_pij(4,1,1284)=1 exch2_oi(1,1284)=0 exch2_oj(1,1284)=0 exch2_neighbourId(2,1284)=1269 exch2_iLo(2,1284)=0 exch2_iHi(2,1284)=35 exch2_jLo(2,1284)=0 exch2_jHi(2,1284)=0 exch2_opposingSend(2,1284)=1 exch2_pij(1,2,1284)=1 exch2_pij(2,2,1284)=0 exch2_pij(3,2,1284)=0 exch2_pij(4,2,1284)=1 exch2_oi(2,1284)=0 exch2_oj(2,1284)=0 exch2_neighbourId(3,1284)=1285 exch2_iLo(3,1284)=35 exch2_iHi(3,1284)=35 exch2_jLo(3,1284)=0 exch2_jHi(3,1284)=35 exch2_opposingSend(3,1284)=4 exch2_pij(1,3,1284)=1 exch2_pij(2,3,1284)=0 exch2_pij(3,3,1284)=0 exch2_pij(4,3,1284)=1 exch2_oi(3,1284)=0 exch2_oj(3,1284)=0 exch2_neighbourId(4,1284)=1283 exch2_iLo(4,1284)=0 exch2_iHi(4,1284)=0 exch2_jLo(4,1284)=0 exch2_jHi(4,1284)=35 exch2_opposingSend(4,1284)=3 exch2_pij(1,4,1284)=1 exch2_pij(2,4,1284)=0 exch2_pij(3,4,1284)=0 exch2_pij(4,4,1284)=1 exch2_oi(4,1284)=0 exch2_oj(4,1284)=0 RETURN END SUBROUTINE W2_E2SETUP_1285 C Topology for tile 1285 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1285)=34 exch2_tNy(1285)=34 exch2_tBasex(1285)=306 exch2_tBasey(1285)=340 exch2_txGlobalo(1285)=2857 exch2_tyGlobalo(1285)=341 exch2_isWedge(1285)=0 exch2_isNedge(1285)=0 exch2_isEedge(1285)=0 exch2_isSedge(1285)=0 exch2_myFace(1285)=6 exch2_mydNx(1285)=510 exch2_mydNy(1285)=510 exch2_nNeighbours(1285)=4 exch2_neighbourId(1,1285)=1300 exch2_iLo(1,1285)=0 exch2_iHi(1,1285)=35 exch2_jLo(1,1285)=35 exch2_jHi(1,1285)=35 exch2_opposingSend(1,1285)=2 exch2_pij(1,1,1285)=1 exch2_pij(2,1,1285)=0 exch2_pij(3,1,1285)=0 exch2_pij(4,1,1285)=1 exch2_oi(1,1285)=0 exch2_oj(1,1285)=0 exch2_neighbourId(2,1285)=1270 exch2_iLo(2,1285)=0 exch2_iHi(2,1285)=35 exch2_jLo(2,1285)=0 exch2_jHi(2,1285)=0 exch2_opposingSend(2,1285)=1 exch2_pij(1,2,1285)=1 exch2_pij(2,2,1285)=0 exch2_pij(3,2,1285)=0 exch2_pij(4,2,1285)=1 exch2_oi(2,1285)=0 exch2_oj(2,1285)=0 exch2_neighbourId(3,1285)=1286 exch2_iLo(3,1285)=35 exch2_iHi(3,1285)=35 exch2_jLo(3,1285)=0 exch2_jHi(3,1285)=35 exch2_opposingSend(3,1285)=4 exch2_pij(1,3,1285)=1 exch2_pij(2,3,1285)=0 exch2_pij(3,3,1285)=0 exch2_pij(4,3,1285)=1 exch2_oi(3,1285)=0 exch2_oj(3,1285)=0 exch2_neighbourId(4,1285)=1284 exch2_iLo(4,1285)=0 exch2_iHi(4,1285)=0 exch2_jLo(4,1285)=0 exch2_jHi(4,1285)=35 exch2_opposingSend(4,1285)=3 exch2_pij(1,4,1285)=1 exch2_pij(2,4,1285)=0 exch2_pij(3,4,1285)=0 exch2_pij(4,4,1285)=1 exch2_oi(4,1285)=0 exch2_oj(4,1285)=0 RETURN END SUBROUTINE W2_E2SETUP_1286 C Topology for tile 1286 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1286)=34 exch2_tNy(1286)=34 exch2_tBasex(1286)=340 exch2_tBasey(1286)=340 exch2_txGlobalo(1286)=2891 exch2_tyGlobalo(1286)=341 exch2_isWedge(1286)=0 exch2_isNedge(1286)=0 exch2_isEedge(1286)=0 exch2_isSedge(1286)=0 exch2_myFace(1286)=6 exch2_mydNx(1286)=510 exch2_mydNy(1286)=510 exch2_nNeighbours(1286)=4 exch2_neighbourId(1,1286)=1301 exch2_iLo(1,1286)=0 exch2_iHi(1,1286)=35 exch2_jLo(1,1286)=35 exch2_jHi(1,1286)=35 exch2_opposingSend(1,1286)=2 exch2_pij(1,1,1286)=1 exch2_pij(2,1,1286)=0 exch2_pij(3,1,1286)=0 exch2_pij(4,1,1286)=1 exch2_oi(1,1286)=0 exch2_oj(1,1286)=0 exch2_neighbourId(2,1286)=1271 exch2_iLo(2,1286)=0 exch2_iHi(2,1286)=35 exch2_jLo(2,1286)=0 exch2_jHi(2,1286)=0 exch2_opposingSend(2,1286)=1 exch2_pij(1,2,1286)=1 exch2_pij(2,2,1286)=0 exch2_pij(3,2,1286)=0 exch2_pij(4,2,1286)=1 exch2_oi(2,1286)=0 exch2_oj(2,1286)=0 exch2_neighbourId(3,1286)=1287 exch2_iLo(3,1286)=35 exch2_iHi(3,1286)=35 exch2_jLo(3,1286)=0 exch2_jHi(3,1286)=35 exch2_opposingSend(3,1286)=4 exch2_pij(1,3,1286)=1 exch2_pij(2,3,1286)=0 exch2_pij(3,3,1286)=0 exch2_pij(4,3,1286)=1 exch2_oi(3,1286)=0 exch2_oj(3,1286)=0 exch2_neighbourId(4,1286)=1285 exch2_iLo(4,1286)=0 exch2_iHi(4,1286)=0 exch2_jLo(4,1286)=0 exch2_jHi(4,1286)=35 exch2_opposingSend(4,1286)=3 exch2_pij(1,4,1286)=1 exch2_pij(2,4,1286)=0 exch2_pij(3,4,1286)=0 exch2_pij(4,4,1286)=1 exch2_oi(4,1286)=0 exch2_oj(4,1286)=0 RETURN END SUBROUTINE W2_E2SETUP_1287 C Topology for tile 1287 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1287)=34 exch2_tNy(1287)=34 exch2_tBasex(1287)=374 exch2_tBasey(1287)=340 exch2_txGlobalo(1287)=2925 exch2_tyGlobalo(1287)=341 exch2_isWedge(1287)=0 exch2_isNedge(1287)=0 exch2_isEedge(1287)=0 exch2_isSedge(1287)=0 exch2_myFace(1287)=6 exch2_mydNx(1287)=510 exch2_mydNy(1287)=510 exch2_nNeighbours(1287)=4 exch2_neighbourId(1,1287)=1302 exch2_iLo(1,1287)=0 exch2_iHi(1,1287)=35 exch2_jLo(1,1287)=35 exch2_jHi(1,1287)=35 exch2_opposingSend(1,1287)=2 exch2_pij(1,1,1287)=1 exch2_pij(2,1,1287)=0 exch2_pij(3,1,1287)=0 exch2_pij(4,1,1287)=1 exch2_oi(1,1287)=0 exch2_oj(1,1287)=0 exch2_neighbourId(2,1287)=1272 exch2_iLo(2,1287)=0 exch2_iHi(2,1287)=35 exch2_jLo(2,1287)=0 exch2_jHi(2,1287)=0 exch2_opposingSend(2,1287)=1 exch2_pij(1,2,1287)=1 exch2_pij(2,2,1287)=0 exch2_pij(3,2,1287)=0 exch2_pij(4,2,1287)=1 exch2_oi(2,1287)=0 exch2_oj(2,1287)=0 exch2_neighbourId(3,1287)=1288 exch2_iLo(3,1287)=35 exch2_iHi(3,1287)=35 exch2_jLo(3,1287)=0 exch2_jHi(3,1287)=35 exch2_opposingSend(3,1287)=4 exch2_pij(1,3,1287)=1 exch2_pij(2,3,1287)=0 exch2_pij(3,3,1287)=0 exch2_pij(4,3,1287)=1 exch2_oi(3,1287)=0 exch2_oj(3,1287)=0 exch2_neighbourId(4,1287)=1286 exch2_iLo(4,1287)=0 exch2_iHi(4,1287)=0 exch2_jLo(4,1287)=0 exch2_jHi(4,1287)=35 exch2_opposingSend(4,1287)=3 exch2_pij(1,4,1287)=1 exch2_pij(2,4,1287)=0 exch2_pij(3,4,1287)=0 exch2_pij(4,4,1287)=1 exch2_oi(4,1287)=0 exch2_oj(4,1287)=0 RETURN END SUBROUTINE W2_E2SETUP_1288 C Topology for tile 1288 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1288)=34 exch2_tNy(1288)=34 exch2_tBasex(1288)=408 exch2_tBasey(1288)=340 exch2_txGlobalo(1288)=2959 exch2_tyGlobalo(1288)=341 exch2_isWedge(1288)=0 exch2_isNedge(1288)=0 exch2_isEedge(1288)=0 exch2_isSedge(1288)=0 exch2_myFace(1288)=6 exch2_mydNx(1288)=510 exch2_mydNy(1288)=510 exch2_nNeighbours(1288)=4 exch2_neighbourId(1,1288)=1303 exch2_iLo(1,1288)=0 exch2_iHi(1,1288)=35 exch2_jLo(1,1288)=35 exch2_jHi(1,1288)=35 exch2_opposingSend(1,1288)=2 exch2_pij(1,1,1288)=1 exch2_pij(2,1,1288)=0 exch2_pij(3,1,1288)=0 exch2_pij(4,1,1288)=1 exch2_oi(1,1288)=0 exch2_oj(1,1288)=0 exch2_neighbourId(2,1288)=1273 exch2_iLo(2,1288)=0 exch2_iHi(2,1288)=35 exch2_jLo(2,1288)=0 exch2_jHi(2,1288)=0 exch2_opposingSend(2,1288)=1 exch2_pij(1,2,1288)=1 exch2_pij(2,2,1288)=0 exch2_pij(3,2,1288)=0 exch2_pij(4,2,1288)=1 exch2_oi(2,1288)=0 exch2_oj(2,1288)=0 exch2_neighbourId(3,1288)=1289 exch2_iLo(3,1288)=35 exch2_iHi(3,1288)=35 exch2_jLo(3,1288)=0 exch2_jHi(3,1288)=35 exch2_opposingSend(3,1288)=4 exch2_pij(1,3,1288)=1 exch2_pij(2,3,1288)=0 exch2_pij(3,3,1288)=0 exch2_pij(4,3,1288)=1 exch2_oi(3,1288)=0 exch2_oj(3,1288)=0 exch2_neighbourId(4,1288)=1287 exch2_iLo(4,1288)=0 exch2_iHi(4,1288)=0 exch2_jLo(4,1288)=0 exch2_jHi(4,1288)=35 exch2_opposingSend(4,1288)=3 exch2_pij(1,4,1288)=1 exch2_pij(2,4,1288)=0 exch2_pij(3,4,1288)=0 exch2_pij(4,4,1288)=1 exch2_oi(4,1288)=0 exch2_oj(4,1288)=0 RETURN END SUBROUTINE W2_E2SETUP_1289 C Topology for tile 1289 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1289)=34 exch2_tNy(1289)=34 exch2_tBasex(1289)=442 exch2_tBasey(1289)=340 exch2_txGlobalo(1289)=2993 exch2_tyGlobalo(1289)=341 exch2_isWedge(1289)=0 exch2_isNedge(1289)=0 exch2_isEedge(1289)=0 exch2_isSedge(1289)=0 exch2_myFace(1289)=6 exch2_mydNx(1289)=510 exch2_mydNy(1289)=510 exch2_nNeighbours(1289)=4 exch2_neighbourId(1,1289)=1304 exch2_iLo(1,1289)=0 exch2_iHi(1,1289)=35 exch2_jLo(1,1289)=35 exch2_jHi(1,1289)=35 exch2_opposingSend(1,1289)=2 exch2_pij(1,1,1289)=1 exch2_pij(2,1,1289)=0 exch2_pij(3,1,1289)=0 exch2_pij(4,1,1289)=1 exch2_oi(1,1289)=0 exch2_oj(1,1289)=0 exch2_neighbourId(2,1289)=1274 exch2_iLo(2,1289)=0 exch2_iHi(2,1289)=35 exch2_jLo(2,1289)=0 exch2_jHi(2,1289)=0 exch2_opposingSend(2,1289)=1 exch2_pij(1,2,1289)=1 exch2_pij(2,2,1289)=0 exch2_pij(3,2,1289)=0 exch2_pij(4,2,1289)=1 exch2_oi(2,1289)=0 exch2_oj(2,1289)=0 exch2_neighbourId(3,1289)=1290 exch2_iLo(3,1289)=35 exch2_iHi(3,1289)=35 exch2_jLo(3,1289)=0 exch2_jHi(3,1289)=35 exch2_opposingSend(3,1289)=4 exch2_pij(1,3,1289)=1 exch2_pij(2,3,1289)=0 exch2_pij(3,3,1289)=0 exch2_pij(4,3,1289)=1 exch2_oi(3,1289)=0 exch2_oj(3,1289)=0 exch2_neighbourId(4,1289)=1288 exch2_iLo(4,1289)=0 exch2_iHi(4,1289)=0 exch2_jLo(4,1289)=0 exch2_jHi(4,1289)=35 exch2_opposingSend(4,1289)=3 exch2_pij(1,4,1289)=1 exch2_pij(2,4,1289)=0 exch2_pij(3,4,1289)=0 exch2_pij(4,4,1289)=1 exch2_oi(4,1289)=0 exch2_oj(4,1289)=0 RETURN END SUBROUTINE W2_E2SETUP_1290 C Topology for tile 1290 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1290)=34 exch2_tNy(1290)=34 exch2_tBasex(1290)=476 exch2_tBasey(1290)=340 exch2_txGlobalo(1290)=3027 exch2_tyGlobalo(1290)=341 exch2_isWedge(1290)=0 exch2_isNedge(1290)=0 exch2_isEedge(1290)=1 exch2_isSedge(1290)=0 exch2_myFace(1290)=6 exch2_mydNx(1290)=510 exch2_mydNy(1290)=510 exch2_nNeighbours(1290)=4 exch2_neighbourId(1,1290)=1305 exch2_iLo(1,1290)=0 exch2_iHi(1,1290)=35 exch2_jLo(1,1290)=35 exch2_jHi(1,1290)=35 exch2_opposingSend(1,1290)=2 exch2_pij(1,1,1290)=1 exch2_pij(2,1,1290)=0 exch2_pij(3,1,1290)=0 exch2_pij(4,1,1290)=1 exch2_oi(1,1290)=0 exch2_oj(1,1290)=0 exch2_neighbourId(2,1290)=1275 exch2_iLo(2,1290)=0 exch2_iHi(2,1290)=35 exch2_jLo(2,1290)=0 exch2_jHi(2,1290)=0 exch2_opposingSend(2,1290)=1 exch2_pij(1,2,1290)=1 exch2_pij(2,2,1290)=0 exch2_pij(3,2,1290)=0 exch2_pij(4,2,1290)=1 exch2_oi(2,1290)=0 exch2_oj(2,1290)=0 exch2_neighbourId(3,1290)=230 exch2_iLo(3,1290)=35 exch2_iHi(3,1290)=35 exch2_jLo(3,1290)=0 exch2_jHi(3,1290)=35 exch2_opposingSend(3,1290)=2 exch2_pij(1,3,1290)=0 exch2_pij(2,3,1290)=1 exch2_pij(3,3,1290)=-1 exch2_pij(4,3,1290)=0 exch2_oi(3,1290)=510 exch2_oj(3,1290)=511 exch2_neighbourId(4,1290)=1289 exch2_iLo(4,1290)=0 exch2_iHi(4,1290)=0 exch2_jLo(4,1290)=0 exch2_jHi(4,1290)=35 exch2_opposingSend(4,1290)=3 exch2_pij(1,4,1290)=1 exch2_pij(2,4,1290)=0 exch2_pij(3,4,1290)=0 exch2_pij(4,4,1290)=1 exch2_oi(4,1290)=0 exch2_oj(4,1290)=0 RETURN END SUBROUTINE W2_E2SETUP_1291 C Topology for tile 1291 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1291)=34 exch2_tNy(1291)=34 exch2_tBasex(1291)=0 exch2_tBasey(1291)=374 exch2_txGlobalo(1291)=2551 exch2_tyGlobalo(1291)=375 exch2_isWedge(1291)=1 exch2_isNedge(1291)=0 exch2_isEedge(1291)=0 exch2_isSedge(1291)=0 exch2_myFace(1291)=6 exch2_mydNx(1291)=510 exch2_mydNy(1291)=510 exch2_nNeighbours(1291)=4 exch2_neighbourId(1,1291)=1306 exch2_iLo(1,1291)=0 exch2_iHi(1,1291)=35 exch2_jLo(1,1291)=35 exch2_jHi(1,1291)=35 exch2_opposingSend(1,1291)=2 exch2_pij(1,1,1291)=1 exch2_pij(2,1,1291)=0 exch2_pij(3,1,1291)=0 exch2_pij(4,1,1291)=1 exch2_oi(1,1291)=0 exch2_oj(1,1291)=0 exch2_neighbourId(2,1291)=1276 exch2_iLo(2,1291)=0 exch2_iHi(2,1291)=35 exch2_jLo(2,1291)=0 exch2_jHi(2,1291)=0 exch2_opposingSend(2,1291)=1 exch2_pij(1,2,1291)=1 exch2_pij(2,2,1291)=0 exch2_pij(3,2,1291)=0 exch2_pij(4,2,1291)=1 exch2_oi(2,1291)=0 exch2_oj(2,1291)=0 exch2_neighbourId(3,1291)=1292 exch2_iLo(3,1291)=35 exch2_iHi(3,1291)=35 exch2_jLo(3,1291)=0 exch2_jHi(3,1291)=35 exch2_opposingSend(3,1291)=4 exch2_pij(1,3,1291)=1 exch2_pij(2,3,1291)=0 exch2_pij(3,3,1291)=0 exch2_pij(4,3,1291)=1 exch2_oi(3,1291)=0 exch2_oj(3,1291)=0 exch2_neighbourId(4,1291)=1080 exch2_iLo(4,1291)=0 exch2_iHi(4,1291)=0 exch2_jLo(4,1291)=0 exch2_jHi(4,1291)=35 exch2_opposingSend(4,1291)=3 exch2_pij(1,4,1291)=1 exch2_pij(2,4,1291)=0 exch2_pij(3,4,1291)=0 exch2_pij(4,4,1291)=1 exch2_oi(4,1291)=-510 exch2_oj(4,1291)=0 RETURN END SUBROUTINE W2_E2SETUP_1292 C Topology for tile 1292 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1292)=34 exch2_tNy(1292)=34 exch2_tBasex(1292)=34 exch2_tBasey(1292)=374 exch2_txGlobalo(1292)=2585 exch2_tyGlobalo(1292)=375 exch2_isWedge(1292)=0 exch2_isNedge(1292)=0 exch2_isEedge(1292)=0 exch2_isSedge(1292)=0 exch2_myFace(1292)=6 exch2_mydNx(1292)=510 exch2_mydNy(1292)=510 exch2_nNeighbours(1292)=4 exch2_neighbourId(1,1292)=1307 exch2_iLo(1,1292)=0 exch2_iHi(1,1292)=35 exch2_jLo(1,1292)=35 exch2_jHi(1,1292)=35 exch2_opposingSend(1,1292)=2 exch2_pij(1,1,1292)=1 exch2_pij(2,1,1292)=0 exch2_pij(3,1,1292)=0 exch2_pij(4,1,1292)=1 exch2_oi(1,1292)=0 exch2_oj(1,1292)=0 exch2_neighbourId(2,1292)=1277 exch2_iLo(2,1292)=0 exch2_iHi(2,1292)=35 exch2_jLo(2,1292)=0 exch2_jHi(2,1292)=0 exch2_opposingSend(2,1292)=1 exch2_pij(1,2,1292)=1 exch2_pij(2,2,1292)=0 exch2_pij(3,2,1292)=0 exch2_pij(4,2,1292)=1 exch2_oi(2,1292)=0 exch2_oj(2,1292)=0 exch2_neighbourId(3,1292)=1293 exch2_iLo(3,1292)=35 exch2_iHi(3,1292)=35 exch2_jLo(3,1292)=0 exch2_jHi(3,1292)=35 exch2_opposingSend(3,1292)=4 exch2_pij(1,3,1292)=1 exch2_pij(2,3,1292)=0 exch2_pij(3,3,1292)=0 exch2_pij(4,3,1292)=1 exch2_oi(3,1292)=0 exch2_oj(3,1292)=0 exch2_neighbourId(4,1292)=1291 exch2_iLo(4,1292)=0 exch2_iHi(4,1292)=0 exch2_jLo(4,1292)=0 exch2_jHi(4,1292)=35 exch2_opposingSend(4,1292)=3 exch2_pij(1,4,1292)=1 exch2_pij(2,4,1292)=0 exch2_pij(3,4,1292)=0 exch2_pij(4,4,1292)=1 exch2_oi(4,1292)=0 exch2_oj(4,1292)=0 RETURN END SUBROUTINE W2_E2SETUP_1293 C Topology for tile 1293 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1293)=34 exch2_tNy(1293)=34 exch2_tBasex(1293)=68 exch2_tBasey(1293)=374 exch2_txGlobalo(1293)=2619 exch2_tyGlobalo(1293)=375 exch2_isWedge(1293)=0 exch2_isNedge(1293)=0 exch2_isEedge(1293)=0 exch2_isSedge(1293)=0 exch2_myFace(1293)=6 exch2_mydNx(1293)=510 exch2_mydNy(1293)=510 exch2_nNeighbours(1293)=4 exch2_neighbourId(1,1293)=1308 exch2_iLo(1,1293)=0 exch2_iHi(1,1293)=35 exch2_jLo(1,1293)=35 exch2_jHi(1,1293)=35 exch2_opposingSend(1,1293)=2 exch2_pij(1,1,1293)=1 exch2_pij(2,1,1293)=0 exch2_pij(3,1,1293)=0 exch2_pij(4,1,1293)=1 exch2_oi(1,1293)=0 exch2_oj(1,1293)=0 exch2_neighbourId(2,1293)=1278 exch2_iLo(2,1293)=0 exch2_iHi(2,1293)=35 exch2_jLo(2,1293)=0 exch2_jHi(2,1293)=0 exch2_opposingSend(2,1293)=1 exch2_pij(1,2,1293)=1 exch2_pij(2,2,1293)=0 exch2_pij(3,2,1293)=0 exch2_pij(4,2,1293)=1 exch2_oi(2,1293)=0 exch2_oj(2,1293)=0 exch2_neighbourId(3,1293)=1294 exch2_iLo(3,1293)=35 exch2_iHi(3,1293)=35 exch2_jLo(3,1293)=0 exch2_jHi(3,1293)=35 exch2_opposingSend(3,1293)=4 exch2_pij(1,3,1293)=1 exch2_pij(2,3,1293)=0 exch2_pij(3,3,1293)=0 exch2_pij(4,3,1293)=1 exch2_oi(3,1293)=0 exch2_oj(3,1293)=0 exch2_neighbourId(4,1293)=1292 exch2_iLo(4,1293)=0 exch2_iHi(4,1293)=0 exch2_jLo(4,1293)=0 exch2_jHi(4,1293)=35 exch2_opposingSend(4,1293)=3 exch2_pij(1,4,1293)=1 exch2_pij(2,4,1293)=0 exch2_pij(3,4,1293)=0 exch2_pij(4,4,1293)=1 exch2_oi(4,1293)=0 exch2_oj(4,1293)=0 RETURN END SUBROUTINE W2_E2SETUP_1294 C Topology for tile 1294 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1294)=34 exch2_tNy(1294)=34 exch2_tBasex(1294)=102 exch2_tBasey(1294)=374 exch2_txGlobalo(1294)=2653 exch2_tyGlobalo(1294)=375 exch2_isWedge(1294)=0 exch2_isNedge(1294)=0 exch2_isEedge(1294)=0 exch2_isSedge(1294)=0 exch2_myFace(1294)=6 exch2_mydNx(1294)=510 exch2_mydNy(1294)=510 exch2_nNeighbours(1294)=4 exch2_neighbourId(1,1294)=1309 exch2_iLo(1,1294)=0 exch2_iHi(1,1294)=35 exch2_jLo(1,1294)=35 exch2_jHi(1,1294)=35 exch2_opposingSend(1,1294)=2 exch2_pij(1,1,1294)=1 exch2_pij(2,1,1294)=0 exch2_pij(3,1,1294)=0 exch2_pij(4,1,1294)=1 exch2_oi(1,1294)=0 exch2_oj(1,1294)=0 exch2_neighbourId(2,1294)=1279 exch2_iLo(2,1294)=0 exch2_iHi(2,1294)=35 exch2_jLo(2,1294)=0 exch2_jHi(2,1294)=0 exch2_opposingSend(2,1294)=1 exch2_pij(1,2,1294)=1 exch2_pij(2,2,1294)=0 exch2_pij(3,2,1294)=0 exch2_pij(4,2,1294)=1 exch2_oi(2,1294)=0 exch2_oj(2,1294)=0 exch2_neighbourId(3,1294)=1295 exch2_iLo(3,1294)=35 exch2_iHi(3,1294)=35 exch2_jLo(3,1294)=0 exch2_jHi(3,1294)=35 exch2_opposingSend(3,1294)=4 exch2_pij(1,3,1294)=1 exch2_pij(2,3,1294)=0 exch2_pij(3,3,1294)=0 exch2_pij(4,3,1294)=1 exch2_oi(3,1294)=0 exch2_oj(3,1294)=0 exch2_neighbourId(4,1294)=1293 exch2_iLo(4,1294)=0 exch2_iHi(4,1294)=0 exch2_jLo(4,1294)=0 exch2_jHi(4,1294)=35 exch2_opposingSend(4,1294)=3 exch2_pij(1,4,1294)=1 exch2_pij(2,4,1294)=0 exch2_pij(3,4,1294)=0 exch2_pij(4,4,1294)=1 exch2_oi(4,1294)=0 exch2_oj(4,1294)=0 RETURN END SUBROUTINE W2_E2SETUP_1295 C Topology for tile 1295 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1295)=34 exch2_tNy(1295)=34 exch2_tBasex(1295)=136 exch2_tBasey(1295)=374 exch2_txGlobalo(1295)=2687 exch2_tyGlobalo(1295)=375 exch2_isWedge(1295)=0 exch2_isNedge(1295)=0 exch2_isEedge(1295)=0 exch2_isSedge(1295)=0 exch2_myFace(1295)=6 exch2_mydNx(1295)=510 exch2_mydNy(1295)=510 exch2_nNeighbours(1295)=4 exch2_neighbourId(1,1295)=1310 exch2_iLo(1,1295)=0 exch2_iHi(1,1295)=35 exch2_jLo(1,1295)=35 exch2_jHi(1,1295)=35 exch2_opposingSend(1,1295)=2 exch2_pij(1,1,1295)=1 exch2_pij(2,1,1295)=0 exch2_pij(3,1,1295)=0 exch2_pij(4,1,1295)=1 exch2_oi(1,1295)=0 exch2_oj(1,1295)=0 exch2_neighbourId(2,1295)=1280 exch2_iLo(2,1295)=0 exch2_iHi(2,1295)=35 exch2_jLo(2,1295)=0 exch2_jHi(2,1295)=0 exch2_opposingSend(2,1295)=1 exch2_pij(1,2,1295)=1 exch2_pij(2,2,1295)=0 exch2_pij(3,2,1295)=0 exch2_pij(4,2,1295)=1 exch2_oi(2,1295)=0 exch2_oj(2,1295)=0 exch2_neighbourId(3,1295)=1296 exch2_iLo(3,1295)=35 exch2_iHi(3,1295)=35 exch2_jLo(3,1295)=0 exch2_jHi(3,1295)=35 exch2_opposingSend(3,1295)=4 exch2_pij(1,3,1295)=1 exch2_pij(2,3,1295)=0 exch2_pij(3,3,1295)=0 exch2_pij(4,3,1295)=1 exch2_oi(3,1295)=0 exch2_oj(3,1295)=0 exch2_neighbourId(4,1295)=1294 exch2_iLo(4,1295)=0 exch2_iHi(4,1295)=0 exch2_jLo(4,1295)=0 exch2_jHi(4,1295)=35 exch2_opposingSend(4,1295)=3 exch2_pij(1,4,1295)=1 exch2_pij(2,4,1295)=0 exch2_pij(3,4,1295)=0 exch2_pij(4,4,1295)=1 exch2_oi(4,1295)=0 exch2_oj(4,1295)=0 RETURN END SUBROUTINE W2_E2SETUP_1296 C Topology for tile 1296 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1296)=34 exch2_tNy(1296)=34 exch2_tBasex(1296)=170 exch2_tBasey(1296)=374 exch2_txGlobalo(1296)=2721 exch2_tyGlobalo(1296)=375 exch2_isWedge(1296)=0 exch2_isNedge(1296)=0 exch2_isEedge(1296)=0 exch2_isSedge(1296)=0 exch2_myFace(1296)=6 exch2_mydNx(1296)=510 exch2_mydNy(1296)=510 exch2_nNeighbours(1296)=4 exch2_neighbourId(1,1296)=1311 exch2_iLo(1,1296)=0 exch2_iHi(1,1296)=35 exch2_jLo(1,1296)=35 exch2_jHi(1,1296)=35 exch2_opposingSend(1,1296)=2 exch2_pij(1,1,1296)=1 exch2_pij(2,1,1296)=0 exch2_pij(3,1,1296)=0 exch2_pij(4,1,1296)=1 exch2_oi(1,1296)=0 exch2_oj(1,1296)=0 exch2_neighbourId(2,1296)=1281 exch2_iLo(2,1296)=0 exch2_iHi(2,1296)=35 exch2_jLo(2,1296)=0 exch2_jHi(2,1296)=0 exch2_opposingSend(2,1296)=1 exch2_pij(1,2,1296)=1 exch2_pij(2,2,1296)=0 exch2_pij(3,2,1296)=0 exch2_pij(4,2,1296)=1 exch2_oi(2,1296)=0 exch2_oj(2,1296)=0 exch2_neighbourId(3,1296)=1297 exch2_iLo(3,1296)=35 exch2_iHi(3,1296)=35 exch2_jLo(3,1296)=0 exch2_jHi(3,1296)=35 exch2_opposingSend(3,1296)=4 exch2_pij(1,3,1296)=1 exch2_pij(2,3,1296)=0 exch2_pij(3,3,1296)=0 exch2_pij(4,3,1296)=1 exch2_oi(3,1296)=0 exch2_oj(3,1296)=0 exch2_neighbourId(4,1296)=1295 exch2_iLo(4,1296)=0 exch2_iHi(4,1296)=0 exch2_jLo(4,1296)=0 exch2_jHi(4,1296)=35 exch2_opposingSend(4,1296)=3 exch2_pij(1,4,1296)=1 exch2_pij(2,4,1296)=0 exch2_pij(3,4,1296)=0 exch2_pij(4,4,1296)=1 exch2_oi(4,1296)=0 exch2_oj(4,1296)=0 RETURN END SUBROUTINE W2_E2SETUP_1297 C Topology for tile 1297 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1297)=34 exch2_tNy(1297)=34 exch2_tBasex(1297)=204 exch2_tBasey(1297)=374 exch2_txGlobalo(1297)=2755 exch2_tyGlobalo(1297)=375 exch2_isWedge(1297)=0 exch2_isNedge(1297)=0 exch2_isEedge(1297)=0 exch2_isSedge(1297)=0 exch2_myFace(1297)=6 exch2_mydNx(1297)=510 exch2_mydNy(1297)=510 exch2_nNeighbours(1297)=4 exch2_neighbourId(1,1297)=1312 exch2_iLo(1,1297)=0 exch2_iHi(1,1297)=35 exch2_jLo(1,1297)=35 exch2_jHi(1,1297)=35 exch2_opposingSend(1,1297)=2 exch2_pij(1,1,1297)=1 exch2_pij(2,1,1297)=0 exch2_pij(3,1,1297)=0 exch2_pij(4,1,1297)=1 exch2_oi(1,1297)=0 exch2_oj(1,1297)=0 exch2_neighbourId(2,1297)=1282 exch2_iLo(2,1297)=0 exch2_iHi(2,1297)=35 exch2_jLo(2,1297)=0 exch2_jHi(2,1297)=0 exch2_opposingSend(2,1297)=1 exch2_pij(1,2,1297)=1 exch2_pij(2,2,1297)=0 exch2_pij(3,2,1297)=0 exch2_pij(4,2,1297)=1 exch2_oi(2,1297)=0 exch2_oj(2,1297)=0 exch2_neighbourId(3,1297)=1298 exch2_iLo(3,1297)=35 exch2_iHi(3,1297)=35 exch2_jLo(3,1297)=0 exch2_jHi(3,1297)=35 exch2_opposingSend(3,1297)=4 exch2_pij(1,3,1297)=1 exch2_pij(2,3,1297)=0 exch2_pij(3,3,1297)=0 exch2_pij(4,3,1297)=1 exch2_oi(3,1297)=0 exch2_oj(3,1297)=0 exch2_neighbourId(4,1297)=1296 exch2_iLo(4,1297)=0 exch2_iHi(4,1297)=0 exch2_jLo(4,1297)=0 exch2_jHi(4,1297)=35 exch2_opposingSend(4,1297)=3 exch2_pij(1,4,1297)=1 exch2_pij(2,4,1297)=0 exch2_pij(3,4,1297)=0 exch2_pij(4,4,1297)=1 exch2_oi(4,1297)=0 exch2_oj(4,1297)=0 RETURN END SUBROUTINE W2_E2SETUP_1298 C Topology for tile 1298 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1298)=34 exch2_tNy(1298)=34 exch2_tBasex(1298)=238 exch2_tBasey(1298)=374 exch2_txGlobalo(1298)=2789 exch2_tyGlobalo(1298)=375 exch2_isWedge(1298)=0 exch2_isNedge(1298)=0 exch2_isEedge(1298)=0 exch2_isSedge(1298)=0 exch2_myFace(1298)=6 exch2_mydNx(1298)=510 exch2_mydNy(1298)=510 exch2_nNeighbours(1298)=4 exch2_neighbourId(1,1298)=1313 exch2_iLo(1,1298)=0 exch2_iHi(1,1298)=35 exch2_jLo(1,1298)=35 exch2_jHi(1,1298)=35 exch2_opposingSend(1,1298)=2 exch2_pij(1,1,1298)=1 exch2_pij(2,1,1298)=0 exch2_pij(3,1,1298)=0 exch2_pij(4,1,1298)=1 exch2_oi(1,1298)=0 exch2_oj(1,1298)=0 exch2_neighbourId(2,1298)=1283 exch2_iLo(2,1298)=0 exch2_iHi(2,1298)=35 exch2_jLo(2,1298)=0 exch2_jHi(2,1298)=0 exch2_opposingSend(2,1298)=1 exch2_pij(1,2,1298)=1 exch2_pij(2,2,1298)=0 exch2_pij(3,2,1298)=0 exch2_pij(4,2,1298)=1 exch2_oi(2,1298)=0 exch2_oj(2,1298)=0 exch2_neighbourId(3,1298)=1299 exch2_iLo(3,1298)=35 exch2_iHi(3,1298)=35 exch2_jLo(3,1298)=0 exch2_jHi(3,1298)=35 exch2_opposingSend(3,1298)=4 exch2_pij(1,3,1298)=1 exch2_pij(2,3,1298)=0 exch2_pij(3,3,1298)=0 exch2_pij(4,3,1298)=1 exch2_oi(3,1298)=0 exch2_oj(3,1298)=0 exch2_neighbourId(4,1298)=1297 exch2_iLo(4,1298)=0 exch2_iHi(4,1298)=0 exch2_jLo(4,1298)=0 exch2_jHi(4,1298)=35 exch2_opposingSend(4,1298)=3 exch2_pij(1,4,1298)=1 exch2_pij(2,4,1298)=0 exch2_pij(3,4,1298)=0 exch2_pij(4,4,1298)=1 exch2_oi(4,1298)=0 exch2_oj(4,1298)=0 RETURN END SUBROUTINE W2_E2SETUP_1299 C Topology for tile 1299 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1299)=34 exch2_tNy(1299)=34 exch2_tBasex(1299)=272 exch2_tBasey(1299)=374 exch2_txGlobalo(1299)=2823 exch2_tyGlobalo(1299)=375 exch2_isWedge(1299)=0 exch2_isNedge(1299)=0 exch2_isEedge(1299)=0 exch2_isSedge(1299)=0 exch2_myFace(1299)=6 exch2_mydNx(1299)=510 exch2_mydNy(1299)=510 exch2_nNeighbours(1299)=4 exch2_neighbourId(1,1299)=1314 exch2_iLo(1,1299)=0 exch2_iHi(1,1299)=35 exch2_jLo(1,1299)=35 exch2_jHi(1,1299)=35 exch2_opposingSend(1,1299)=2 exch2_pij(1,1,1299)=1 exch2_pij(2,1,1299)=0 exch2_pij(3,1,1299)=0 exch2_pij(4,1,1299)=1 exch2_oi(1,1299)=0 exch2_oj(1,1299)=0 exch2_neighbourId(2,1299)=1284 exch2_iLo(2,1299)=0 exch2_iHi(2,1299)=35 exch2_jLo(2,1299)=0 exch2_jHi(2,1299)=0 exch2_opposingSend(2,1299)=1 exch2_pij(1,2,1299)=1 exch2_pij(2,2,1299)=0 exch2_pij(3,2,1299)=0 exch2_pij(4,2,1299)=1 exch2_oi(2,1299)=0 exch2_oj(2,1299)=0 exch2_neighbourId(3,1299)=1300 exch2_iLo(3,1299)=35 exch2_iHi(3,1299)=35 exch2_jLo(3,1299)=0 exch2_jHi(3,1299)=35 exch2_opposingSend(3,1299)=4 exch2_pij(1,3,1299)=1 exch2_pij(2,3,1299)=0 exch2_pij(3,3,1299)=0 exch2_pij(4,3,1299)=1 exch2_oi(3,1299)=0 exch2_oj(3,1299)=0 exch2_neighbourId(4,1299)=1298 exch2_iLo(4,1299)=0 exch2_iHi(4,1299)=0 exch2_jLo(4,1299)=0 exch2_jHi(4,1299)=35 exch2_opposingSend(4,1299)=3 exch2_pij(1,4,1299)=1 exch2_pij(2,4,1299)=0 exch2_pij(3,4,1299)=0 exch2_pij(4,4,1299)=1 exch2_oi(4,1299)=0 exch2_oj(4,1299)=0 RETURN END SUBROUTINE W2_E2SETUP_1300 C Topology for tile 1300 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1300)=34 exch2_tNy(1300)=34 exch2_tBasex(1300)=306 exch2_tBasey(1300)=374 exch2_txGlobalo(1300)=2857 exch2_tyGlobalo(1300)=375 exch2_isWedge(1300)=0 exch2_isNedge(1300)=0 exch2_isEedge(1300)=0 exch2_isSedge(1300)=0 exch2_myFace(1300)=6 exch2_mydNx(1300)=510 exch2_mydNy(1300)=510 exch2_nNeighbours(1300)=4 exch2_neighbourId(1,1300)=1315 exch2_iLo(1,1300)=0 exch2_iHi(1,1300)=35 exch2_jLo(1,1300)=35 exch2_jHi(1,1300)=35 exch2_opposingSend(1,1300)=2 exch2_pij(1,1,1300)=1 exch2_pij(2,1,1300)=0 exch2_pij(3,1,1300)=0 exch2_pij(4,1,1300)=1 exch2_oi(1,1300)=0 exch2_oj(1,1300)=0 exch2_neighbourId(2,1300)=1285 exch2_iLo(2,1300)=0 exch2_iHi(2,1300)=35 exch2_jLo(2,1300)=0 exch2_jHi(2,1300)=0 exch2_opposingSend(2,1300)=1 exch2_pij(1,2,1300)=1 exch2_pij(2,2,1300)=0 exch2_pij(3,2,1300)=0 exch2_pij(4,2,1300)=1 exch2_oi(2,1300)=0 exch2_oj(2,1300)=0 exch2_neighbourId(3,1300)=1301 exch2_iLo(3,1300)=35 exch2_iHi(3,1300)=35 exch2_jLo(3,1300)=0 exch2_jHi(3,1300)=35 exch2_opposingSend(3,1300)=4 exch2_pij(1,3,1300)=1 exch2_pij(2,3,1300)=0 exch2_pij(3,3,1300)=0 exch2_pij(4,3,1300)=1 exch2_oi(3,1300)=0 exch2_oj(3,1300)=0 exch2_neighbourId(4,1300)=1299 exch2_iLo(4,1300)=0 exch2_iHi(4,1300)=0 exch2_jLo(4,1300)=0 exch2_jHi(4,1300)=35 exch2_opposingSend(4,1300)=3 exch2_pij(1,4,1300)=1 exch2_pij(2,4,1300)=0 exch2_pij(3,4,1300)=0 exch2_pij(4,4,1300)=1 exch2_oi(4,1300)=0 exch2_oj(4,1300)=0 RETURN END SUBROUTINE W2_E2SETUP_1301 C Topology for tile 1301 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1301)=34 exch2_tNy(1301)=34 exch2_tBasex(1301)=340 exch2_tBasey(1301)=374 exch2_txGlobalo(1301)=2891 exch2_tyGlobalo(1301)=375 exch2_isWedge(1301)=0 exch2_isNedge(1301)=0 exch2_isEedge(1301)=0 exch2_isSedge(1301)=0 exch2_myFace(1301)=6 exch2_mydNx(1301)=510 exch2_mydNy(1301)=510 exch2_nNeighbours(1301)=4 exch2_neighbourId(1,1301)=1316 exch2_iLo(1,1301)=0 exch2_iHi(1,1301)=35 exch2_jLo(1,1301)=35 exch2_jHi(1,1301)=35 exch2_opposingSend(1,1301)=2 exch2_pij(1,1,1301)=1 exch2_pij(2,1,1301)=0 exch2_pij(3,1,1301)=0 exch2_pij(4,1,1301)=1 exch2_oi(1,1301)=0 exch2_oj(1,1301)=0 exch2_neighbourId(2,1301)=1286 exch2_iLo(2,1301)=0 exch2_iHi(2,1301)=35 exch2_jLo(2,1301)=0 exch2_jHi(2,1301)=0 exch2_opposingSend(2,1301)=1 exch2_pij(1,2,1301)=1 exch2_pij(2,2,1301)=0 exch2_pij(3,2,1301)=0 exch2_pij(4,2,1301)=1 exch2_oi(2,1301)=0 exch2_oj(2,1301)=0 exch2_neighbourId(3,1301)=1302 exch2_iLo(3,1301)=35 exch2_iHi(3,1301)=35 exch2_jLo(3,1301)=0 exch2_jHi(3,1301)=35 exch2_opposingSend(3,1301)=4 exch2_pij(1,3,1301)=1 exch2_pij(2,3,1301)=0 exch2_pij(3,3,1301)=0 exch2_pij(4,3,1301)=1 exch2_oi(3,1301)=0 exch2_oj(3,1301)=0 exch2_neighbourId(4,1301)=1300 exch2_iLo(4,1301)=0 exch2_iHi(4,1301)=0 exch2_jLo(4,1301)=0 exch2_jHi(4,1301)=35 exch2_opposingSend(4,1301)=3 exch2_pij(1,4,1301)=1 exch2_pij(2,4,1301)=0 exch2_pij(3,4,1301)=0 exch2_pij(4,4,1301)=1 exch2_oi(4,1301)=0 exch2_oj(4,1301)=0 RETURN END SUBROUTINE W2_E2SETUP_1302 C Topology for tile 1302 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1302)=34 exch2_tNy(1302)=34 exch2_tBasex(1302)=374 exch2_tBasey(1302)=374 exch2_txGlobalo(1302)=2925 exch2_tyGlobalo(1302)=375 exch2_isWedge(1302)=0 exch2_isNedge(1302)=0 exch2_isEedge(1302)=0 exch2_isSedge(1302)=0 exch2_myFace(1302)=6 exch2_mydNx(1302)=510 exch2_mydNy(1302)=510 exch2_nNeighbours(1302)=4 exch2_neighbourId(1,1302)=1317 exch2_iLo(1,1302)=0 exch2_iHi(1,1302)=35 exch2_jLo(1,1302)=35 exch2_jHi(1,1302)=35 exch2_opposingSend(1,1302)=2 exch2_pij(1,1,1302)=1 exch2_pij(2,1,1302)=0 exch2_pij(3,1,1302)=0 exch2_pij(4,1,1302)=1 exch2_oi(1,1302)=0 exch2_oj(1,1302)=0 exch2_neighbourId(2,1302)=1287 exch2_iLo(2,1302)=0 exch2_iHi(2,1302)=35 exch2_jLo(2,1302)=0 exch2_jHi(2,1302)=0 exch2_opposingSend(2,1302)=1 exch2_pij(1,2,1302)=1 exch2_pij(2,2,1302)=0 exch2_pij(3,2,1302)=0 exch2_pij(4,2,1302)=1 exch2_oi(2,1302)=0 exch2_oj(2,1302)=0 exch2_neighbourId(3,1302)=1303 exch2_iLo(3,1302)=35 exch2_iHi(3,1302)=35 exch2_jLo(3,1302)=0 exch2_jHi(3,1302)=35 exch2_opposingSend(3,1302)=4 exch2_pij(1,3,1302)=1 exch2_pij(2,3,1302)=0 exch2_pij(3,3,1302)=0 exch2_pij(4,3,1302)=1 exch2_oi(3,1302)=0 exch2_oj(3,1302)=0 exch2_neighbourId(4,1302)=1301 exch2_iLo(4,1302)=0 exch2_iHi(4,1302)=0 exch2_jLo(4,1302)=0 exch2_jHi(4,1302)=35 exch2_opposingSend(4,1302)=3 exch2_pij(1,4,1302)=1 exch2_pij(2,4,1302)=0 exch2_pij(3,4,1302)=0 exch2_pij(4,4,1302)=1 exch2_oi(4,1302)=0 exch2_oj(4,1302)=0 RETURN END SUBROUTINE W2_E2SETUP_1303 C Topology for tile 1303 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1303)=34 exch2_tNy(1303)=34 exch2_tBasex(1303)=408 exch2_tBasey(1303)=374 exch2_txGlobalo(1303)=2959 exch2_tyGlobalo(1303)=375 exch2_isWedge(1303)=0 exch2_isNedge(1303)=0 exch2_isEedge(1303)=0 exch2_isSedge(1303)=0 exch2_myFace(1303)=6 exch2_mydNx(1303)=510 exch2_mydNy(1303)=510 exch2_nNeighbours(1303)=4 exch2_neighbourId(1,1303)=1318 exch2_iLo(1,1303)=0 exch2_iHi(1,1303)=35 exch2_jLo(1,1303)=35 exch2_jHi(1,1303)=35 exch2_opposingSend(1,1303)=2 exch2_pij(1,1,1303)=1 exch2_pij(2,1,1303)=0 exch2_pij(3,1,1303)=0 exch2_pij(4,1,1303)=1 exch2_oi(1,1303)=0 exch2_oj(1,1303)=0 exch2_neighbourId(2,1303)=1288 exch2_iLo(2,1303)=0 exch2_iHi(2,1303)=35 exch2_jLo(2,1303)=0 exch2_jHi(2,1303)=0 exch2_opposingSend(2,1303)=1 exch2_pij(1,2,1303)=1 exch2_pij(2,2,1303)=0 exch2_pij(3,2,1303)=0 exch2_pij(4,2,1303)=1 exch2_oi(2,1303)=0 exch2_oj(2,1303)=0 exch2_neighbourId(3,1303)=1304 exch2_iLo(3,1303)=35 exch2_iHi(3,1303)=35 exch2_jLo(3,1303)=0 exch2_jHi(3,1303)=35 exch2_opposingSend(3,1303)=4 exch2_pij(1,3,1303)=1 exch2_pij(2,3,1303)=0 exch2_pij(3,3,1303)=0 exch2_pij(4,3,1303)=1 exch2_oi(3,1303)=0 exch2_oj(3,1303)=0 exch2_neighbourId(4,1303)=1302 exch2_iLo(4,1303)=0 exch2_iHi(4,1303)=0 exch2_jLo(4,1303)=0 exch2_jHi(4,1303)=35 exch2_opposingSend(4,1303)=3 exch2_pij(1,4,1303)=1 exch2_pij(2,4,1303)=0 exch2_pij(3,4,1303)=0 exch2_pij(4,4,1303)=1 exch2_oi(4,1303)=0 exch2_oj(4,1303)=0 RETURN END SUBROUTINE W2_E2SETUP_1304 C Topology for tile 1304 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1304)=34 exch2_tNy(1304)=34 exch2_tBasex(1304)=442 exch2_tBasey(1304)=374 exch2_txGlobalo(1304)=2993 exch2_tyGlobalo(1304)=375 exch2_isWedge(1304)=0 exch2_isNedge(1304)=0 exch2_isEedge(1304)=0 exch2_isSedge(1304)=0 exch2_myFace(1304)=6 exch2_mydNx(1304)=510 exch2_mydNy(1304)=510 exch2_nNeighbours(1304)=4 exch2_neighbourId(1,1304)=1319 exch2_iLo(1,1304)=0 exch2_iHi(1,1304)=35 exch2_jLo(1,1304)=35 exch2_jHi(1,1304)=35 exch2_opposingSend(1,1304)=2 exch2_pij(1,1,1304)=1 exch2_pij(2,1,1304)=0 exch2_pij(3,1,1304)=0 exch2_pij(4,1,1304)=1 exch2_oi(1,1304)=0 exch2_oj(1,1304)=0 exch2_neighbourId(2,1304)=1289 exch2_iLo(2,1304)=0 exch2_iHi(2,1304)=35 exch2_jLo(2,1304)=0 exch2_jHi(2,1304)=0 exch2_opposingSend(2,1304)=1 exch2_pij(1,2,1304)=1 exch2_pij(2,2,1304)=0 exch2_pij(3,2,1304)=0 exch2_pij(4,2,1304)=1 exch2_oi(2,1304)=0 exch2_oj(2,1304)=0 exch2_neighbourId(3,1304)=1305 exch2_iLo(3,1304)=35 exch2_iHi(3,1304)=35 exch2_jLo(3,1304)=0 exch2_jHi(3,1304)=35 exch2_opposingSend(3,1304)=4 exch2_pij(1,3,1304)=1 exch2_pij(2,3,1304)=0 exch2_pij(3,3,1304)=0 exch2_pij(4,3,1304)=1 exch2_oi(3,1304)=0 exch2_oj(3,1304)=0 exch2_neighbourId(4,1304)=1303 exch2_iLo(4,1304)=0 exch2_iHi(4,1304)=0 exch2_jLo(4,1304)=0 exch2_jHi(4,1304)=35 exch2_opposingSend(4,1304)=3 exch2_pij(1,4,1304)=1 exch2_pij(2,4,1304)=0 exch2_pij(3,4,1304)=0 exch2_pij(4,4,1304)=1 exch2_oi(4,1304)=0 exch2_oj(4,1304)=0 RETURN END SUBROUTINE W2_E2SETUP_1305 C Topology for tile 1305 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1305)=34 exch2_tNy(1305)=34 exch2_tBasex(1305)=476 exch2_tBasey(1305)=374 exch2_txGlobalo(1305)=3027 exch2_tyGlobalo(1305)=375 exch2_isWedge(1305)=0 exch2_isNedge(1305)=0 exch2_isEedge(1305)=1 exch2_isSedge(1305)=0 exch2_myFace(1305)=6 exch2_mydNx(1305)=510 exch2_mydNy(1305)=510 exch2_nNeighbours(1305)=4 exch2_neighbourId(1,1305)=1320 exch2_iLo(1,1305)=0 exch2_iHi(1,1305)=35 exch2_jLo(1,1305)=35 exch2_jHi(1,1305)=35 exch2_opposingSend(1,1305)=2 exch2_pij(1,1,1305)=1 exch2_pij(2,1,1305)=0 exch2_pij(3,1,1305)=0 exch2_pij(4,1,1305)=1 exch2_oi(1,1305)=0 exch2_oj(1,1305)=0 exch2_neighbourId(2,1305)=1290 exch2_iLo(2,1305)=0 exch2_iHi(2,1305)=35 exch2_jLo(2,1305)=0 exch2_jHi(2,1305)=0 exch2_opposingSend(2,1305)=1 exch2_pij(1,2,1305)=1 exch2_pij(2,2,1305)=0 exch2_pij(3,2,1305)=0 exch2_pij(4,2,1305)=1 exch2_oi(2,1305)=0 exch2_oj(2,1305)=0 exch2_neighbourId(3,1305)=229 exch2_iLo(3,1305)=35 exch2_iHi(3,1305)=35 exch2_jLo(3,1305)=0 exch2_jHi(3,1305)=35 exch2_opposingSend(3,1305)=2 exch2_pij(1,3,1305)=0 exch2_pij(2,3,1305)=1 exch2_pij(3,3,1305)=-1 exch2_pij(4,3,1305)=0 exch2_oi(3,1305)=510 exch2_oj(3,1305)=511 exch2_neighbourId(4,1305)=1304 exch2_iLo(4,1305)=0 exch2_iHi(4,1305)=0 exch2_jLo(4,1305)=0 exch2_jHi(4,1305)=35 exch2_opposingSend(4,1305)=3 exch2_pij(1,4,1305)=1 exch2_pij(2,4,1305)=0 exch2_pij(3,4,1305)=0 exch2_pij(4,4,1305)=1 exch2_oi(4,1305)=0 exch2_oj(4,1305)=0 RETURN END SUBROUTINE W2_E2SETUP_1306 C Topology for tile 1306 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1306)=34 exch2_tNy(1306)=34 exch2_tBasex(1306)=0 exch2_tBasey(1306)=408 exch2_txGlobalo(1306)=2551 exch2_tyGlobalo(1306)=409 exch2_isWedge(1306)=1 exch2_isNedge(1306)=0 exch2_isEedge(1306)=0 exch2_isSedge(1306)=0 exch2_myFace(1306)=6 exch2_mydNx(1306)=510 exch2_mydNy(1306)=510 exch2_nNeighbours(1306)=4 exch2_neighbourId(1,1306)=1321 exch2_iLo(1,1306)=0 exch2_iHi(1,1306)=35 exch2_jLo(1,1306)=35 exch2_jHi(1,1306)=35 exch2_opposingSend(1,1306)=2 exch2_pij(1,1,1306)=1 exch2_pij(2,1,1306)=0 exch2_pij(3,1,1306)=0 exch2_pij(4,1,1306)=1 exch2_oi(1,1306)=0 exch2_oj(1,1306)=0 exch2_neighbourId(2,1306)=1291 exch2_iLo(2,1306)=0 exch2_iHi(2,1306)=35 exch2_jLo(2,1306)=0 exch2_jHi(2,1306)=0 exch2_opposingSend(2,1306)=1 exch2_pij(1,2,1306)=1 exch2_pij(2,2,1306)=0 exch2_pij(3,2,1306)=0 exch2_pij(4,2,1306)=1 exch2_oi(2,1306)=0 exch2_oj(2,1306)=0 exch2_neighbourId(3,1306)=1307 exch2_iLo(3,1306)=35 exch2_iHi(3,1306)=35 exch2_jLo(3,1306)=0 exch2_jHi(3,1306)=35 exch2_opposingSend(3,1306)=4 exch2_pij(1,3,1306)=1 exch2_pij(2,3,1306)=0 exch2_pij(3,3,1306)=0 exch2_pij(4,3,1306)=1 exch2_oi(3,1306)=0 exch2_oj(3,1306)=0 exch2_neighbourId(4,1306)=1095 exch2_iLo(4,1306)=0 exch2_iHi(4,1306)=0 exch2_jLo(4,1306)=0 exch2_jHi(4,1306)=35 exch2_opposingSend(4,1306)=3 exch2_pij(1,4,1306)=1 exch2_pij(2,4,1306)=0 exch2_pij(3,4,1306)=0 exch2_pij(4,4,1306)=1 exch2_oi(4,1306)=-510 exch2_oj(4,1306)=0 RETURN END SUBROUTINE W2_E2SETUP_1307 C Topology for tile 1307 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1307)=34 exch2_tNy(1307)=34 exch2_tBasex(1307)=34 exch2_tBasey(1307)=408 exch2_txGlobalo(1307)=2585 exch2_tyGlobalo(1307)=409 exch2_isWedge(1307)=0 exch2_isNedge(1307)=0 exch2_isEedge(1307)=0 exch2_isSedge(1307)=0 exch2_myFace(1307)=6 exch2_mydNx(1307)=510 exch2_mydNy(1307)=510 exch2_nNeighbours(1307)=4 exch2_neighbourId(1,1307)=1322 exch2_iLo(1,1307)=0 exch2_iHi(1,1307)=35 exch2_jLo(1,1307)=35 exch2_jHi(1,1307)=35 exch2_opposingSend(1,1307)=2 exch2_pij(1,1,1307)=1 exch2_pij(2,1,1307)=0 exch2_pij(3,1,1307)=0 exch2_pij(4,1,1307)=1 exch2_oi(1,1307)=0 exch2_oj(1,1307)=0 exch2_neighbourId(2,1307)=1292 exch2_iLo(2,1307)=0 exch2_iHi(2,1307)=35 exch2_jLo(2,1307)=0 exch2_jHi(2,1307)=0 exch2_opposingSend(2,1307)=1 exch2_pij(1,2,1307)=1 exch2_pij(2,2,1307)=0 exch2_pij(3,2,1307)=0 exch2_pij(4,2,1307)=1 exch2_oi(2,1307)=0 exch2_oj(2,1307)=0 exch2_neighbourId(3,1307)=1308 exch2_iLo(3,1307)=35 exch2_iHi(3,1307)=35 exch2_jLo(3,1307)=0 exch2_jHi(3,1307)=35 exch2_opposingSend(3,1307)=4 exch2_pij(1,3,1307)=1 exch2_pij(2,3,1307)=0 exch2_pij(3,3,1307)=0 exch2_pij(4,3,1307)=1 exch2_oi(3,1307)=0 exch2_oj(3,1307)=0 exch2_neighbourId(4,1307)=1306 exch2_iLo(4,1307)=0 exch2_iHi(4,1307)=0 exch2_jLo(4,1307)=0 exch2_jHi(4,1307)=35 exch2_opposingSend(4,1307)=3 exch2_pij(1,4,1307)=1 exch2_pij(2,4,1307)=0 exch2_pij(3,4,1307)=0 exch2_pij(4,4,1307)=1 exch2_oi(4,1307)=0 exch2_oj(4,1307)=0 RETURN END SUBROUTINE W2_E2SETUP_1308 C Topology for tile 1308 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1308)=34 exch2_tNy(1308)=34 exch2_tBasex(1308)=68 exch2_tBasey(1308)=408 exch2_txGlobalo(1308)=2619 exch2_tyGlobalo(1308)=409 exch2_isWedge(1308)=0 exch2_isNedge(1308)=0 exch2_isEedge(1308)=0 exch2_isSedge(1308)=0 exch2_myFace(1308)=6 exch2_mydNx(1308)=510 exch2_mydNy(1308)=510 exch2_nNeighbours(1308)=4 exch2_neighbourId(1,1308)=1323 exch2_iLo(1,1308)=0 exch2_iHi(1,1308)=35 exch2_jLo(1,1308)=35 exch2_jHi(1,1308)=35 exch2_opposingSend(1,1308)=2 exch2_pij(1,1,1308)=1 exch2_pij(2,1,1308)=0 exch2_pij(3,1,1308)=0 exch2_pij(4,1,1308)=1 exch2_oi(1,1308)=0 exch2_oj(1,1308)=0 exch2_neighbourId(2,1308)=1293 exch2_iLo(2,1308)=0 exch2_iHi(2,1308)=35 exch2_jLo(2,1308)=0 exch2_jHi(2,1308)=0 exch2_opposingSend(2,1308)=1 exch2_pij(1,2,1308)=1 exch2_pij(2,2,1308)=0 exch2_pij(3,2,1308)=0 exch2_pij(4,2,1308)=1 exch2_oi(2,1308)=0 exch2_oj(2,1308)=0 exch2_neighbourId(3,1308)=1309 exch2_iLo(3,1308)=35 exch2_iHi(3,1308)=35 exch2_jLo(3,1308)=0 exch2_jHi(3,1308)=35 exch2_opposingSend(3,1308)=4 exch2_pij(1,3,1308)=1 exch2_pij(2,3,1308)=0 exch2_pij(3,3,1308)=0 exch2_pij(4,3,1308)=1 exch2_oi(3,1308)=0 exch2_oj(3,1308)=0 exch2_neighbourId(4,1308)=1307 exch2_iLo(4,1308)=0 exch2_iHi(4,1308)=0 exch2_jLo(4,1308)=0 exch2_jHi(4,1308)=35 exch2_opposingSend(4,1308)=3 exch2_pij(1,4,1308)=1 exch2_pij(2,4,1308)=0 exch2_pij(3,4,1308)=0 exch2_pij(4,4,1308)=1 exch2_oi(4,1308)=0 exch2_oj(4,1308)=0 RETURN END SUBROUTINE W2_E2SETUP_1309 C Topology for tile 1309 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1309)=34 exch2_tNy(1309)=34 exch2_tBasex(1309)=102 exch2_tBasey(1309)=408 exch2_txGlobalo(1309)=2653 exch2_tyGlobalo(1309)=409 exch2_isWedge(1309)=0 exch2_isNedge(1309)=0 exch2_isEedge(1309)=0 exch2_isSedge(1309)=0 exch2_myFace(1309)=6 exch2_mydNx(1309)=510 exch2_mydNy(1309)=510 exch2_nNeighbours(1309)=4 exch2_neighbourId(1,1309)=1324 exch2_iLo(1,1309)=0 exch2_iHi(1,1309)=35 exch2_jLo(1,1309)=35 exch2_jHi(1,1309)=35 exch2_opposingSend(1,1309)=2 exch2_pij(1,1,1309)=1 exch2_pij(2,1,1309)=0 exch2_pij(3,1,1309)=0 exch2_pij(4,1,1309)=1 exch2_oi(1,1309)=0 exch2_oj(1,1309)=0 exch2_neighbourId(2,1309)=1294 exch2_iLo(2,1309)=0 exch2_iHi(2,1309)=35 exch2_jLo(2,1309)=0 exch2_jHi(2,1309)=0 exch2_opposingSend(2,1309)=1 exch2_pij(1,2,1309)=1 exch2_pij(2,2,1309)=0 exch2_pij(3,2,1309)=0 exch2_pij(4,2,1309)=1 exch2_oi(2,1309)=0 exch2_oj(2,1309)=0 exch2_neighbourId(3,1309)=1310 exch2_iLo(3,1309)=35 exch2_iHi(3,1309)=35 exch2_jLo(3,1309)=0 exch2_jHi(3,1309)=35 exch2_opposingSend(3,1309)=4 exch2_pij(1,3,1309)=1 exch2_pij(2,3,1309)=0 exch2_pij(3,3,1309)=0 exch2_pij(4,3,1309)=1 exch2_oi(3,1309)=0 exch2_oj(3,1309)=0 exch2_neighbourId(4,1309)=1308 exch2_iLo(4,1309)=0 exch2_iHi(4,1309)=0 exch2_jLo(4,1309)=0 exch2_jHi(4,1309)=35 exch2_opposingSend(4,1309)=3 exch2_pij(1,4,1309)=1 exch2_pij(2,4,1309)=0 exch2_pij(3,4,1309)=0 exch2_pij(4,4,1309)=1 exch2_oi(4,1309)=0 exch2_oj(4,1309)=0 RETURN END SUBROUTINE W2_E2SETUP_1310 C Topology for tile 1310 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1310)=34 exch2_tNy(1310)=34 exch2_tBasex(1310)=136 exch2_tBasey(1310)=408 exch2_txGlobalo(1310)=2687 exch2_tyGlobalo(1310)=409 exch2_isWedge(1310)=0 exch2_isNedge(1310)=0 exch2_isEedge(1310)=0 exch2_isSedge(1310)=0 exch2_myFace(1310)=6 exch2_mydNx(1310)=510 exch2_mydNy(1310)=510 exch2_nNeighbours(1310)=4 exch2_neighbourId(1,1310)=1325 exch2_iLo(1,1310)=0 exch2_iHi(1,1310)=35 exch2_jLo(1,1310)=35 exch2_jHi(1,1310)=35 exch2_opposingSend(1,1310)=2 exch2_pij(1,1,1310)=1 exch2_pij(2,1,1310)=0 exch2_pij(3,1,1310)=0 exch2_pij(4,1,1310)=1 exch2_oi(1,1310)=0 exch2_oj(1,1310)=0 exch2_neighbourId(2,1310)=1295 exch2_iLo(2,1310)=0 exch2_iHi(2,1310)=35 exch2_jLo(2,1310)=0 exch2_jHi(2,1310)=0 exch2_opposingSend(2,1310)=1 exch2_pij(1,2,1310)=1 exch2_pij(2,2,1310)=0 exch2_pij(3,2,1310)=0 exch2_pij(4,2,1310)=1 exch2_oi(2,1310)=0 exch2_oj(2,1310)=0 exch2_neighbourId(3,1310)=1311 exch2_iLo(3,1310)=35 exch2_iHi(3,1310)=35 exch2_jLo(3,1310)=0 exch2_jHi(3,1310)=35 exch2_opposingSend(3,1310)=4 exch2_pij(1,3,1310)=1 exch2_pij(2,3,1310)=0 exch2_pij(3,3,1310)=0 exch2_pij(4,3,1310)=1 exch2_oi(3,1310)=0 exch2_oj(3,1310)=0 exch2_neighbourId(4,1310)=1309 exch2_iLo(4,1310)=0 exch2_iHi(4,1310)=0 exch2_jLo(4,1310)=0 exch2_jHi(4,1310)=35 exch2_opposingSend(4,1310)=3 exch2_pij(1,4,1310)=1 exch2_pij(2,4,1310)=0 exch2_pij(3,4,1310)=0 exch2_pij(4,4,1310)=1 exch2_oi(4,1310)=0 exch2_oj(4,1310)=0 RETURN END SUBROUTINE W2_E2SETUP_1311 C Topology for tile 1311 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1311)=34 exch2_tNy(1311)=34 exch2_tBasex(1311)=170 exch2_tBasey(1311)=408 exch2_txGlobalo(1311)=2721 exch2_tyGlobalo(1311)=409 exch2_isWedge(1311)=0 exch2_isNedge(1311)=0 exch2_isEedge(1311)=0 exch2_isSedge(1311)=0 exch2_myFace(1311)=6 exch2_mydNx(1311)=510 exch2_mydNy(1311)=510 exch2_nNeighbours(1311)=4 exch2_neighbourId(1,1311)=1326 exch2_iLo(1,1311)=0 exch2_iHi(1,1311)=35 exch2_jLo(1,1311)=35 exch2_jHi(1,1311)=35 exch2_opposingSend(1,1311)=2 exch2_pij(1,1,1311)=1 exch2_pij(2,1,1311)=0 exch2_pij(3,1,1311)=0 exch2_pij(4,1,1311)=1 exch2_oi(1,1311)=0 exch2_oj(1,1311)=0 exch2_neighbourId(2,1311)=1296 exch2_iLo(2,1311)=0 exch2_iHi(2,1311)=35 exch2_jLo(2,1311)=0 exch2_jHi(2,1311)=0 exch2_opposingSend(2,1311)=1 exch2_pij(1,2,1311)=1 exch2_pij(2,2,1311)=0 exch2_pij(3,2,1311)=0 exch2_pij(4,2,1311)=1 exch2_oi(2,1311)=0 exch2_oj(2,1311)=0 exch2_neighbourId(3,1311)=1312 exch2_iLo(3,1311)=35 exch2_iHi(3,1311)=35 exch2_jLo(3,1311)=0 exch2_jHi(3,1311)=35 exch2_opposingSend(3,1311)=4 exch2_pij(1,3,1311)=1 exch2_pij(2,3,1311)=0 exch2_pij(3,3,1311)=0 exch2_pij(4,3,1311)=1 exch2_oi(3,1311)=0 exch2_oj(3,1311)=0 exch2_neighbourId(4,1311)=1310 exch2_iLo(4,1311)=0 exch2_iHi(4,1311)=0 exch2_jLo(4,1311)=0 exch2_jHi(4,1311)=35 exch2_opposingSend(4,1311)=3 exch2_pij(1,4,1311)=1 exch2_pij(2,4,1311)=0 exch2_pij(3,4,1311)=0 exch2_pij(4,4,1311)=1 exch2_oi(4,1311)=0 exch2_oj(4,1311)=0 RETURN END SUBROUTINE W2_E2SETUP_1312 C Topology for tile 1312 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1312)=34 exch2_tNy(1312)=34 exch2_tBasex(1312)=204 exch2_tBasey(1312)=408 exch2_txGlobalo(1312)=2755 exch2_tyGlobalo(1312)=409 exch2_isWedge(1312)=0 exch2_isNedge(1312)=0 exch2_isEedge(1312)=0 exch2_isSedge(1312)=0 exch2_myFace(1312)=6 exch2_mydNx(1312)=510 exch2_mydNy(1312)=510 exch2_nNeighbours(1312)=4 exch2_neighbourId(1,1312)=1327 exch2_iLo(1,1312)=0 exch2_iHi(1,1312)=35 exch2_jLo(1,1312)=35 exch2_jHi(1,1312)=35 exch2_opposingSend(1,1312)=2 exch2_pij(1,1,1312)=1 exch2_pij(2,1,1312)=0 exch2_pij(3,1,1312)=0 exch2_pij(4,1,1312)=1 exch2_oi(1,1312)=0 exch2_oj(1,1312)=0 exch2_neighbourId(2,1312)=1297 exch2_iLo(2,1312)=0 exch2_iHi(2,1312)=35 exch2_jLo(2,1312)=0 exch2_jHi(2,1312)=0 exch2_opposingSend(2,1312)=1 exch2_pij(1,2,1312)=1 exch2_pij(2,2,1312)=0 exch2_pij(3,2,1312)=0 exch2_pij(4,2,1312)=1 exch2_oi(2,1312)=0 exch2_oj(2,1312)=0 exch2_neighbourId(3,1312)=1313 exch2_iLo(3,1312)=35 exch2_iHi(3,1312)=35 exch2_jLo(3,1312)=0 exch2_jHi(3,1312)=35 exch2_opposingSend(3,1312)=4 exch2_pij(1,3,1312)=1 exch2_pij(2,3,1312)=0 exch2_pij(3,3,1312)=0 exch2_pij(4,3,1312)=1 exch2_oi(3,1312)=0 exch2_oj(3,1312)=0 exch2_neighbourId(4,1312)=1311 exch2_iLo(4,1312)=0 exch2_iHi(4,1312)=0 exch2_jLo(4,1312)=0 exch2_jHi(4,1312)=35 exch2_opposingSend(4,1312)=3 exch2_pij(1,4,1312)=1 exch2_pij(2,4,1312)=0 exch2_pij(3,4,1312)=0 exch2_pij(4,4,1312)=1 exch2_oi(4,1312)=0 exch2_oj(4,1312)=0 RETURN END SUBROUTINE W2_E2SETUP_1313 C Topology for tile 1313 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1313)=34 exch2_tNy(1313)=34 exch2_tBasex(1313)=238 exch2_tBasey(1313)=408 exch2_txGlobalo(1313)=2789 exch2_tyGlobalo(1313)=409 exch2_isWedge(1313)=0 exch2_isNedge(1313)=0 exch2_isEedge(1313)=0 exch2_isSedge(1313)=0 exch2_myFace(1313)=6 exch2_mydNx(1313)=510 exch2_mydNy(1313)=510 exch2_nNeighbours(1313)=4 exch2_neighbourId(1,1313)=1328 exch2_iLo(1,1313)=0 exch2_iHi(1,1313)=35 exch2_jLo(1,1313)=35 exch2_jHi(1,1313)=35 exch2_opposingSend(1,1313)=2 exch2_pij(1,1,1313)=1 exch2_pij(2,1,1313)=0 exch2_pij(3,1,1313)=0 exch2_pij(4,1,1313)=1 exch2_oi(1,1313)=0 exch2_oj(1,1313)=0 exch2_neighbourId(2,1313)=1298 exch2_iLo(2,1313)=0 exch2_iHi(2,1313)=35 exch2_jLo(2,1313)=0 exch2_jHi(2,1313)=0 exch2_opposingSend(2,1313)=1 exch2_pij(1,2,1313)=1 exch2_pij(2,2,1313)=0 exch2_pij(3,2,1313)=0 exch2_pij(4,2,1313)=1 exch2_oi(2,1313)=0 exch2_oj(2,1313)=0 exch2_neighbourId(3,1313)=1314 exch2_iLo(3,1313)=35 exch2_iHi(3,1313)=35 exch2_jLo(3,1313)=0 exch2_jHi(3,1313)=35 exch2_opposingSend(3,1313)=4 exch2_pij(1,3,1313)=1 exch2_pij(2,3,1313)=0 exch2_pij(3,3,1313)=0 exch2_pij(4,3,1313)=1 exch2_oi(3,1313)=0 exch2_oj(3,1313)=0 exch2_neighbourId(4,1313)=1312 exch2_iLo(4,1313)=0 exch2_iHi(4,1313)=0 exch2_jLo(4,1313)=0 exch2_jHi(4,1313)=35 exch2_opposingSend(4,1313)=3 exch2_pij(1,4,1313)=1 exch2_pij(2,4,1313)=0 exch2_pij(3,4,1313)=0 exch2_pij(4,4,1313)=1 exch2_oi(4,1313)=0 exch2_oj(4,1313)=0 RETURN END SUBROUTINE W2_E2SETUP_1314 C Topology for tile 1314 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1314)=34 exch2_tNy(1314)=34 exch2_tBasex(1314)=272 exch2_tBasey(1314)=408 exch2_txGlobalo(1314)=2823 exch2_tyGlobalo(1314)=409 exch2_isWedge(1314)=0 exch2_isNedge(1314)=0 exch2_isEedge(1314)=0 exch2_isSedge(1314)=0 exch2_myFace(1314)=6 exch2_mydNx(1314)=510 exch2_mydNy(1314)=510 exch2_nNeighbours(1314)=4 exch2_neighbourId(1,1314)=1329 exch2_iLo(1,1314)=0 exch2_iHi(1,1314)=35 exch2_jLo(1,1314)=35 exch2_jHi(1,1314)=35 exch2_opposingSend(1,1314)=2 exch2_pij(1,1,1314)=1 exch2_pij(2,1,1314)=0 exch2_pij(3,1,1314)=0 exch2_pij(4,1,1314)=1 exch2_oi(1,1314)=0 exch2_oj(1,1314)=0 exch2_neighbourId(2,1314)=1299 exch2_iLo(2,1314)=0 exch2_iHi(2,1314)=35 exch2_jLo(2,1314)=0 exch2_jHi(2,1314)=0 exch2_opposingSend(2,1314)=1 exch2_pij(1,2,1314)=1 exch2_pij(2,2,1314)=0 exch2_pij(3,2,1314)=0 exch2_pij(4,2,1314)=1 exch2_oi(2,1314)=0 exch2_oj(2,1314)=0 exch2_neighbourId(3,1314)=1315 exch2_iLo(3,1314)=35 exch2_iHi(3,1314)=35 exch2_jLo(3,1314)=0 exch2_jHi(3,1314)=35 exch2_opposingSend(3,1314)=4 exch2_pij(1,3,1314)=1 exch2_pij(2,3,1314)=0 exch2_pij(3,3,1314)=0 exch2_pij(4,3,1314)=1 exch2_oi(3,1314)=0 exch2_oj(3,1314)=0 exch2_neighbourId(4,1314)=1313 exch2_iLo(4,1314)=0 exch2_iHi(4,1314)=0 exch2_jLo(4,1314)=0 exch2_jHi(4,1314)=35 exch2_opposingSend(4,1314)=3 exch2_pij(1,4,1314)=1 exch2_pij(2,4,1314)=0 exch2_pij(3,4,1314)=0 exch2_pij(4,4,1314)=1 exch2_oi(4,1314)=0 exch2_oj(4,1314)=0 RETURN END SUBROUTINE W2_E2SETUP_1315 C Topology for tile 1315 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1315)=34 exch2_tNy(1315)=34 exch2_tBasex(1315)=306 exch2_tBasey(1315)=408 exch2_txGlobalo(1315)=2857 exch2_tyGlobalo(1315)=409 exch2_isWedge(1315)=0 exch2_isNedge(1315)=0 exch2_isEedge(1315)=0 exch2_isSedge(1315)=0 exch2_myFace(1315)=6 exch2_mydNx(1315)=510 exch2_mydNy(1315)=510 exch2_nNeighbours(1315)=4 exch2_neighbourId(1,1315)=1330 exch2_iLo(1,1315)=0 exch2_iHi(1,1315)=35 exch2_jLo(1,1315)=35 exch2_jHi(1,1315)=35 exch2_opposingSend(1,1315)=2 exch2_pij(1,1,1315)=1 exch2_pij(2,1,1315)=0 exch2_pij(3,1,1315)=0 exch2_pij(4,1,1315)=1 exch2_oi(1,1315)=0 exch2_oj(1,1315)=0 exch2_neighbourId(2,1315)=1300 exch2_iLo(2,1315)=0 exch2_iHi(2,1315)=35 exch2_jLo(2,1315)=0 exch2_jHi(2,1315)=0 exch2_opposingSend(2,1315)=1 exch2_pij(1,2,1315)=1 exch2_pij(2,2,1315)=0 exch2_pij(3,2,1315)=0 exch2_pij(4,2,1315)=1 exch2_oi(2,1315)=0 exch2_oj(2,1315)=0 exch2_neighbourId(3,1315)=1316 exch2_iLo(3,1315)=35 exch2_iHi(3,1315)=35 exch2_jLo(3,1315)=0 exch2_jHi(3,1315)=35 exch2_opposingSend(3,1315)=4 exch2_pij(1,3,1315)=1 exch2_pij(2,3,1315)=0 exch2_pij(3,3,1315)=0 exch2_pij(4,3,1315)=1 exch2_oi(3,1315)=0 exch2_oj(3,1315)=0 exch2_neighbourId(4,1315)=1314 exch2_iLo(4,1315)=0 exch2_iHi(4,1315)=0 exch2_jLo(4,1315)=0 exch2_jHi(4,1315)=35 exch2_opposingSend(4,1315)=3 exch2_pij(1,4,1315)=1 exch2_pij(2,4,1315)=0 exch2_pij(3,4,1315)=0 exch2_pij(4,4,1315)=1 exch2_oi(4,1315)=0 exch2_oj(4,1315)=0 RETURN END SUBROUTINE W2_E2SETUP_1316 C Topology for tile 1316 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1316)=34 exch2_tNy(1316)=34 exch2_tBasex(1316)=340 exch2_tBasey(1316)=408 exch2_txGlobalo(1316)=2891 exch2_tyGlobalo(1316)=409 exch2_isWedge(1316)=0 exch2_isNedge(1316)=0 exch2_isEedge(1316)=0 exch2_isSedge(1316)=0 exch2_myFace(1316)=6 exch2_mydNx(1316)=510 exch2_mydNy(1316)=510 exch2_nNeighbours(1316)=4 exch2_neighbourId(1,1316)=1331 exch2_iLo(1,1316)=0 exch2_iHi(1,1316)=35 exch2_jLo(1,1316)=35 exch2_jHi(1,1316)=35 exch2_opposingSend(1,1316)=2 exch2_pij(1,1,1316)=1 exch2_pij(2,1,1316)=0 exch2_pij(3,1,1316)=0 exch2_pij(4,1,1316)=1 exch2_oi(1,1316)=0 exch2_oj(1,1316)=0 exch2_neighbourId(2,1316)=1301 exch2_iLo(2,1316)=0 exch2_iHi(2,1316)=35 exch2_jLo(2,1316)=0 exch2_jHi(2,1316)=0 exch2_opposingSend(2,1316)=1 exch2_pij(1,2,1316)=1 exch2_pij(2,2,1316)=0 exch2_pij(3,2,1316)=0 exch2_pij(4,2,1316)=1 exch2_oi(2,1316)=0 exch2_oj(2,1316)=0 exch2_neighbourId(3,1316)=1317 exch2_iLo(3,1316)=35 exch2_iHi(3,1316)=35 exch2_jLo(3,1316)=0 exch2_jHi(3,1316)=35 exch2_opposingSend(3,1316)=4 exch2_pij(1,3,1316)=1 exch2_pij(2,3,1316)=0 exch2_pij(3,3,1316)=0 exch2_pij(4,3,1316)=1 exch2_oi(3,1316)=0 exch2_oj(3,1316)=0 exch2_neighbourId(4,1316)=1315 exch2_iLo(4,1316)=0 exch2_iHi(4,1316)=0 exch2_jLo(4,1316)=0 exch2_jHi(4,1316)=35 exch2_opposingSend(4,1316)=3 exch2_pij(1,4,1316)=1 exch2_pij(2,4,1316)=0 exch2_pij(3,4,1316)=0 exch2_pij(4,4,1316)=1 exch2_oi(4,1316)=0 exch2_oj(4,1316)=0 RETURN END SUBROUTINE W2_E2SETUP_1317 C Topology for tile 1317 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1317)=34 exch2_tNy(1317)=34 exch2_tBasex(1317)=374 exch2_tBasey(1317)=408 exch2_txGlobalo(1317)=2925 exch2_tyGlobalo(1317)=409 exch2_isWedge(1317)=0 exch2_isNedge(1317)=0 exch2_isEedge(1317)=0 exch2_isSedge(1317)=0 exch2_myFace(1317)=6 exch2_mydNx(1317)=510 exch2_mydNy(1317)=510 exch2_nNeighbours(1317)=4 exch2_neighbourId(1,1317)=1332 exch2_iLo(1,1317)=0 exch2_iHi(1,1317)=35 exch2_jLo(1,1317)=35 exch2_jHi(1,1317)=35 exch2_opposingSend(1,1317)=2 exch2_pij(1,1,1317)=1 exch2_pij(2,1,1317)=0 exch2_pij(3,1,1317)=0 exch2_pij(4,1,1317)=1 exch2_oi(1,1317)=0 exch2_oj(1,1317)=0 exch2_neighbourId(2,1317)=1302 exch2_iLo(2,1317)=0 exch2_iHi(2,1317)=35 exch2_jLo(2,1317)=0 exch2_jHi(2,1317)=0 exch2_opposingSend(2,1317)=1 exch2_pij(1,2,1317)=1 exch2_pij(2,2,1317)=0 exch2_pij(3,2,1317)=0 exch2_pij(4,2,1317)=1 exch2_oi(2,1317)=0 exch2_oj(2,1317)=0 exch2_neighbourId(3,1317)=1318 exch2_iLo(3,1317)=35 exch2_iHi(3,1317)=35 exch2_jLo(3,1317)=0 exch2_jHi(3,1317)=35 exch2_opposingSend(3,1317)=4 exch2_pij(1,3,1317)=1 exch2_pij(2,3,1317)=0 exch2_pij(3,3,1317)=0 exch2_pij(4,3,1317)=1 exch2_oi(3,1317)=0 exch2_oj(3,1317)=0 exch2_neighbourId(4,1317)=1316 exch2_iLo(4,1317)=0 exch2_iHi(4,1317)=0 exch2_jLo(4,1317)=0 exch2_jHi(4,1317)=35 exch2_opposingSend(4,1317)=3 exch2_pij(1,4,1317)=1 exch2_pij(2,4,1317)=0 exch2_pij(3,4,1317)=0 exch2_pij(4,4,1317)=1 exch2_oi(4,1317)=0 exch2_oj(4,1317)=0 RETURN END SUBROUTINE W2_E2SETUP_1318 C Topology for tile 1318 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1318)=34 exch2_tNy(1318)=34 exch2_tBasex(1318)=408 exch2_tBasey(1318)=408 exch2_txGlobalo(1318)=2959 exch2_tyGlobalo(1318)=409 exch2_isWedge(1318)=0 exch2_isNedge(1318)=0 exch2_isEedge(1318)=0 exch2_isSedge(1318)=0 exch2_myFace(1318)=6 exch2_mydNx(1318)=510 exch2_mydNy(1318)=510 exch2_nNeighbours(1318)=4 exch2_neighbourId(1,1318)=1333 exch2_iLo(1,1318)=0 exch2_iHi(1,1318)=35 exch2_jLo(1,1318)=35 exch2_jHi(1,1318)=35 exch2_opposingSend(1,1318)=2 exch2_pij(1,1,1318)=1 exch2_pij(2,1,1318)=0 exch2_pij(3,1,1318)=0 exch2_pij(4,1,1318)=1 exch2_oi(1,1318)=0 exch2_oj(1,1318)=0 exch2_neighbourId(2,1318)=1303 exch2_iLo(2,1318)=0 exch2_iHi(2,1318)=35 exch2_jLo(2,1318)=0 exch2_jHi(2,1318)=0 exch2_opposingSend(2,1318)=1 exch2_pij(1,2,1318)=1 exch2_pij(2,2,1318)=0 exch2_pij(3,2,1318)=0 exch2_pij(4,2,1318)=1 exch2_oi(2,1318)=0 exch2_oj(2,1318)=0 exch2_neighbourId(3,1318)=1319 exch2_iLo(3,1318)=35 exch2_iHi(3,1318)=35 exch2_jLo(3,1318)=0 exch2_jHi(3,1318)=35 exch2_opposingSend(3,1318)=4 exch2_pij(1,3,1318)=1 exch2_pij(2,3,1318)=0 exch2_pij(3,3,1318)=0 exch2_pij(4,3,1318)=1 exch2_oi(3,1318)=0 exch2_oj(3,1318)=0 exch2_neighbourId(4,1318)=1317 exch2_iLo(4,1318)=0 exch2_iHi(4,1318)=0 exch2_jLo(4,1318)=0 exch2_jHi(4,1318)=35 exch2_opposingSend(4,1318)=3 exch2_pij(1,4,1318)=1 exch2_pij(2,4,1318)=0 exch2_pij(3,4,1318)=0 exch2_pij(4,4,1318)=1 exch2_oi(4,1318)=0 exch2_oj(4,1318)=0 RETURN END SUBROUTINE W2_E2SETUP_1319 C Topology for tile 1319 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1319)=34 exch2_tNy(1319)=34 exch2_tBasex(1319)=442 exch2_tBasey(1319)=408 exch2_txGlobalo(1319)=2993 exch2_tyGlobalo(1319)=409 exch2_isWedge(1319)=0 exch2_isNedge(1319)=0 exch2_isEedge(1319)=0 exch2_isSedge(1319)=0 exch2_myFace(1319)=6 exch2_mydNx(1319)=510 exch2_mydNy(1319)=510 exch2_nNeighbours(1319)=4 exch2_neighbourId(1,1319)=1334 exch2_iLo(1,1319)=0 exch2_iHi(1,1319)=35 exch2_jLo(1,1319)=35 exch2_jHi(1,1319)=35 exch2_opposingSend(1,1319)=2 exch2_pij(1,1,1319)=1 exch2_pij(2,1,1319)=0 exch2_pij(3,1,1319)=0 exch2_pij(4,1,1319)=1 exch2_oi(1,1319)=0 exch2_oj(1,1319)=0 exch2_neighbourId(2,1319)=1304 exch2_iLo(2,1319)=0 exch2_iHi(2,1319)=35 exch2_jLo(2,1319)=0 exch2_jHi(2,1319)=0 exch2_opposingSend(2,1319)=1 exch2_pij(1,2,1319)=1 exch2_pij(2,2,1319)=0 exch2_pij(3,2,1319)=0 exch2_pij(4,2,1319)=1 exch2_oi(2,1319)=0 exch2_oj(2,1319)=0 exch2_neighbourId(3,1319)=1320 exch2_iLo(3,1319)=35 exch2_iHi(3,1319)=35 exch2_jLo(3,1319)=0 exch2_jHi(3,1319)=35 exch2_opposingSend(3,1319)=4 exch2_pij(1,3,1319)=1 exch2_pij(2,3,1319)=0 exch2_pij(3,3,1319)=0 exch2_pij(4,3,1319)=1 exch2_oi(3,1319)=0 exch2_oj(3,1319)=0 exch2_neighbourId(4,1319)=1318 exch2_iLo(4,1319)=0 exch2_iHi(4,1319)=0 exch2_jLo(4,1319)=0 exch2_jHi(4,1319)=35 exch2_opposingSend(4,1319)=3 exch2_pij(1,4,1319)=1 exch2_pij(2,4,1319)=0 exch2_pij(3,4,1319)=0 exch2_pij(4,4,1319)=1 exch2_oi(4,1319)=0 exch2_oj(4,1319)=0 RETURN END SUBROUTINE W2_E2SETUP_1320 C Topology for tile 1320 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1320)=34 exch2_tNy(1320)=34 exch2_tBasex(1320)=476 exch2_tBasey(1320)=408 exch2_txGlobalo(1320)=3027 exch2_tyGlobalo(1320)=409 exch2_isWedge(1320)=0 exch2_isNedge(1320)=0 exch2_isEedge(1320)=1 exch2_isSedge(1320)=0 exch2_myFace(1320)=6 exch2_mydNx(1320)=510 exch2_mydNy(1320)=510 exch2_nNeighbours(1320)=4 exch2_neighbourId(1,1320)=1335 exch2_iLo(1,1320)=0 exch2_iHi(1,1320)=35 exch2_jLo(1,1320)=35 exch2_jHi(1,1320)=35 exch2_opposingSend(1,1320)=2 exch2_pij(1,1,1320)=1 exch2_pij(2,1,1320)=0 exch2_pij(3,1,1320)=0 exch2_pij(4,1,1320)=1 exch2_oi(1,1320)=0 exch2_oj(1,1320)=0 exch2_neighbourId(2,1320)=1305 exch2_iLo(2,1320)=0 exch2_iHi(2,1320)=35 exch2_jLo(2,1320)=0 exch2_jHi(2,1320)=0 exch2_opposingSend(2,1320)=1 exch2_pij(1,2,1320)=1 exch2_pij(2,2,1320)=0 exch2_pij(3,2,1320)=0 exch2_pij(4,2,1320)=1 exch2_oi(2,1320)=0 exch2_oj(2,1320)=0 exch2_neighbourId(3,1320)=228 exch2_iLo(3,1320)=35 exch2_iHi(3,1320)=35 exch2_jLo(3,1320)=0 exch2_jHi(3,1320)=35 exch2_opposingSend(3,1320)=2 exch2_pij(1,3,1320)=0 exch2_pij(2,3,1320)=1 exch2_pij(3,3,1320)=-1 exch2_pij(4,3,1320)=0 exch2_oi(3,1320)=510 exch2_oj(3,1320)=511 exch2_neighbourId(4,1320)=1319 exch2_iLo(4,1320)=0 exch2_iHi(4,1320)=0 exch2_jLo(4,1320)=0 exch2_jHi(4,1320)=35 exch2_opposingSend(4,1320)=3 exch2_pij(1,4,1320)=1 exch2_pij(2,4,1320)=0 exch2_pij(3,4,1320)=0 exch2_pij(4,4,1320)=1 exch2_oi(4,1320)=0 exch2_oj(4,1320)=0 RETURN END SUBROUTINE W2_E2SETUP_1321 C Topology for tile 1321 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1321)=34 exch2_tNy(1321)=34 exch2_tBasex(1321)=0 exch2_tBasey(1321)=442 exch2_txGlobalo(1321)=2551 exch2_tyGlobalo(1321)=443 exch2_isWedge(1321)=1 exch2_isNedge(1321)=0 exch2_isEedge(1321)=0 exch2_isSedge(1321)=0 exch2_myFace(1321)=6 exch2_mydNx(1321)=510 exch2_mydNy(1321)=510 exch2_nNeighbours(1321)=4 exch2_neighbourId(1,1321)=1336 exch2_iLo(1,1321)=0 exch2_iHi(1,1321)=35 exch2_jLo(1,1321)=35 exch2_jHi(1,1321)=35 exch2_opposingSend(1,1321)=2 exch2_pij(1,1,1321)=1 exch2_pij(2,1,1321)=0 exch2_pij(3,1,1321)=0 exch2_pij(4,1,1321)=1 exch2_oi(1,1321)=0 exch2_oj(1,1321)=0 exch2_neighbourId(2,1321)=1306 exch2_iLo(2,1321)=0 exch2_iHi(2,1321)=35 exch2_jLo(2,1321)=0 exch2_jHi(2,1321)=0 exch2_opposingSend(2,1321)=1 exch2_pij(1,2,1321)=1 exch2_pij(2,2,1321)=0 exch2_pij(3,2,1321)=0 exch2_pij(4,2,1321)=1 exch2_oi(2,1321)=0 exch2_oj(2,1321)=0 exch2_neighbourId(3,1321)=1322 exch2_iLo(3,1321)=35 exch2_iHi(3,1321)=35 exch2_jLo(3,1321)=0 exch2_jHi(3,1321)=35 exch2_opposingSend(3,1321)=4 exch2_pij(1,3,1321)=1 exch2_pij(2,3,1321)=0 exch2_pij(3,3,1321)=0 exch2_pij(4,3,1321)=1 exch2_oi(3,1321)=0 exch2_oj(3,1321)=0 exch2_neighbourId(4,1321)=1110 exch2_iLo(4,1321)=0 exch2_iHi(4,1321)=0 exch2_jLo(4,1321)=0 exch2_jHi(4,1321)=35 exch2_opposingSend(4,1321)=3 exch2_pij(1,4,1321)=1 exch2_pij(2,4,1321)=0 exch2_pij(3,4,1321)=0 exch2_pij(4,4,1321)=1 exch2_oi(4,1321)=-510 exch2_oj(4,1321)=0 RETURN END SUBROUTINE W2_E2SETUP_1322 C Topology for tile 1322 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1322)=34 exch2_tNy(1322)=34 exch2_tBasex(1322)=34 exch2_tBasey(1322)=442 exch2_txGlobalo(1322)=2585 exch2_tyGlobalo(1322)=443 exch2_isWedge(1322)=0 exch2_isNedge(1322)=0 exch2_isEedge(1322)=0 exch2_isSedge(1322)=0 exch2_myFace(1322)=6 exch2_mydNx(1322)=510 exch2_mydNy(1322)=510 exch2_nNeighbours(1322)=4 exch2_neighbourId(1,1322)=1337 exch2_iLo(1,1322)=0 exch2_iHi(1,1322)=35 exch2_jLo(1,1322)=35 exch2_jHi(1,1322)=35 exch2_opposingSend(1,1322)=2 exch2_pij(1,1,1322)=1 exch2_pij(2,1,1322)=0 exch2_pij(3,1,1322)=0 exch2_pij(4,1,1322)=1 exch2_oi(1,1322)=0 exch2_oj(1,1322)=0 exch2_neighbourId(2,1322)=1307 exch2_iLo(2,1322)=0 exch2_iHi(2,1322)=35 exch2_jLo(2,1322)=0 exch2_jHi(2,1322)=0 exch2_opposingSend(2,1322)=1 exch2_pij(1,2,1322)=1 exch2_pij(2,2,1322)=0 exch2_pij(3,2,1322)=0 exch2_pij(4,2,1322)=1 exch2_oi(2,1322)=0 exch2_oj(2,1322)=0 exch2_neighbourId(3,1322)=1323 exch2_iLo(3,1322)=35 exch2_iHi(3,1322)=35 exch2_jLo(3,1322)=0 exch2_jHi(3,1322)=35 exch2_opposingSend(3,1322)=4 exch2_pij(1,3,1322)=1 exch2_pij(2,3,1322)=0 exch2_pij(3,3,1322)=0 exch2_pij(4,3,1322)=1 exch2_oi(3,1322)=0 exch2_oj(3,1322)=0 exch2_neighbourId(4,1322)=1321 exch2_iLo(4,1322)=0 exch2_iHi(4,1322)=0 exch2_jLo(4,1322)=0 exch2_jHi(4,1322)=35 exch2_opposingSend(4,1322)=3 exch2_pij(1,4,1322)=1 exch2_pij(2,4,1322)=0 exch2_pij(3,4,1322)=0 exch2_pij(4,4,1322)=1 exch2_oi(4,1322)=0 exch2_oj(4,1322)=0 RETURN END SUBROUTINE W2_E2SETUP_1323 C Topology for tile 1323 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1323)=34 exch2_tNy(1323)=34 exch2_tBasex(1323)=68 exch2_tBasey(1323)=442 exch2_txGlobalo(1323)=2619 exch2_tyGlobalo(1323)=443 exch2_isWedge(1323)=0 exch2_isNedge(1323)=0 exch2_isEedge(1323)=0 exch2_isSedge(1323)=0 exch2_myFace(1323)=6 exch2_mydNx(1323)=510 exch2_mydNy(1323)=510 exch2_nNeighbours(1323)=4 exch2_neighbourId(1,1323)=1338 exch2_iLo(1,1323)=0 exch2_iHi(1,1323)=35 exch2_jLo(1,1323)=35 exch2_jHi(1,1323)=35 exch2_opposingSend(1,1323)=2 exch2_pij(1,1,1323)=1 exch2_pij(2,1,1323)=0 exch2_pij(3,1,1323)=0 exch2_pij(4,1,1323)=1 exch2_oi(1,1323)=0 exch2_oj(1,1323)=0 exch2_neighbourId(2,1323)=1308 exch2_iLo(2,1323)=0 exch2_iHi(2,1323)=35 exch2_jLo(2,1323)=0 exch2_jHi(2,1323)=0 exch2_opposingSend(2,1323)=1 exch2_pij(1,2,1323)=1 exch2_pij(2,2,1323)=0 exch2_pij(3,2,1323)=0 exch2_pij(4,2,1323)=1 exch2_oi(2,1323)=0 exch2_oj(2,1323)=0 exch2_neighbourId(3,1323)=1324 exch2_iLo(3,1323)=35 exch2_iHi(3,1323)=35 exch2_jLo(3,1323)=0 exch2_jHi(3,1323)=35 exch2_opposingSend(3,1323)=4 exch2_pij(1,3,1323)=1 exch2_pij(2,3,1323)=0 exch2_pij(3,3,1323)=0 exch2_pij(4,3,1323)=1 exch2_oi(3,1323)=0 exch2_oj(3,1323)=0 exch2_neighbourId(4,1323)=1322 exch2_iLo(4,1323)=0 exch2_iHi(4,1323)=0 exch2_jLo(4,1323)=0 exch2_jHi(4,1323)=35 exch2_opposingSend(4,1323)=3 exch2_pij(1,4,1323)=1 exch2_pij(2,4,1323)=0 exch2_pij(3,4,1323)=0 exch2_pij(4,4,1323)=1 exch2_oi(4,1323)=0 exch2_oj(4,1323)=0 RETURN END SUBROUTINE W2_E2SETUP_1324 C Topology for tile 1324 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1324)=34 exch2_tNy(1324)=34 exch2_tBasex(1324)=102 exch2_tBasey(1324)=442 exch2_txGlobalo(1324)=2653 exch2_tyGlobalo(1324)=443 exch2_isWedge(1324)=0 exch2_isNedge(1324)=0 exch2_isEedge(1324)=0 exch2_isSedge(1324)=0 exch2_myFace(1324)=6 exch2_mydNx(1324)=510 exch2_mydNy(1324)=510 exch2_nNeighbours(1324)=4 exch2_neighbourId(1,1324)=1339 exch2_iLo(1,1324)=0 exch2_iHi(1,1324)=35 exch2_jLo(1,1324)=35 exch2_jHi(1,1324)=35 exch2_opposingSend(1,1324)=2 exch2_pij(1,1,1324)=1 exch2_pij(2,1,1324)=0 exch2_pij(3,1,1324)=0 exch2_pij(4,1,1324)=1 exch2_oi(1,1324)=0 exch2_oj(1,1324)=0 exch2_neighbourId(2,1324)=1309 exch2_iLo(2,1324)=0 exch2_iHi(2,1324)=35 exch2_jLo(2,1324)=0 exch2_jHi(2,1324)=0 exch2_opposingSend(2,1324)=1 exch2_pij(1,2,1324)=1 exch2_pij(2,2,1324)=0 exch2_pij(3,2,1324)=0 exch2_pij(4,2,1324)=1 exch2_oi(2,1324)=0 exch2_oj(2,1324)=0 exch2_neighbourId(3,1324)=1325 exch2_iLo(3,1324)=35 exch2_iHi(3,1324)=35 exch2_jLo(3,1324)=0 exch2_jHi(3,1324)=35 exch2_opposingSend(3,1324)=4 exch2_pij(1,3,1324)=1 exch2_pij(2,3,1324)=0 exch2_pij(3,3,1324)=0 exch2_pij(4,3,1324)=1 exch2_oi(3,1324)=0 exch2_oj(3,1324)=0 exch2_neighbourId(4,1324)=1323 exch2_iLo(4,1324)=0 exch2_iHi(4,1324)=0 exch2_jLo(4,1324)=0 exch2_jHi(4,1324)=35 exch2_opposingSend(4,1324)=3 exch2_pij(1,4,1324)=1 exch2_pij(2,4,1324)=0 exch2_pij(3,4,1324)=0 exch2_pij(4,4,1324)=1 exch2_oi(4,1324)=0 exch2_oj(4,1324)=0 RETURN END SUBROUTINE W2_E2SETUP_1325 C Topology for tile 1325 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1325)=34 exch2_tNy(1325)=34 exch2_tBasex(1325)=136 exch2_tBasey(1325)=442 exch2_txGlobalo(1325)=2687 exch2_tyGlobalo(1325)=443 exch2_isWedge(1325)=0 exch2_isNedge(1325)=0 exch2_isEedge(1325)=0 exch2_isSedge(1325)=0 exch2_myFace(1325)=6 exch2_mydNx(1325)=510 exch2_mydNy(1325)=510 exch2_nNeighbours(1325)=4 exch2_neighbourId(1,1325)=1340 exch2_iLo(1,1325)=0 exch2_iHi(1,1325)=35 exch2_jLo(1,1325)=35 exch2_jHi(1,1325)=35 exch2_opposingSend(1,1325)=2 exch2_pij(1,1,1325)=1 exch2_pij(2,1,1325)=0 exch2_pij(3,1,1325)=0 exch2_pij(4,1,1325)=1 exch2_oi(1,1325)=0 exch2_oj(1,1325)=0 exch2_neighbourId(2,1325)=1310 exch2_iLo(2,1325)=0 exch2_iHi(2,1325)=35 exch2_jLo(2,1325)=0 exch2_jHi(2,1325)=0 exch2_opposingSend(2,1325)=1 exch2_pij(1,2,1325)=1 exch2_pij(2,2,1325)=0 exch2_pij(3,2,1325)=0 exch2_pij(4,2,1325)=1 exch2_oi(2,1325)=0 exch2_oj(2,1325)=0 exch2_neighbourId(3,1325)=1326 exch2_iLo(3,1325)=35 exch2_iHi(3,1325)=35 exch2_jLo(3,1325)=0 exch2_jHi(3,1325)=35 exch2_opposingSend(3,1325)=4 exch2_pij(1,3,1325)=1 exch2_pij(2,3,1325)=0 exch2_pij(3,3,1325)=0 exch2_pij(4,3,1325)=1 exch2_oi(3,1325)=0 exch2_oj(3,1325)=0 exch2_neighbourId(4,1325)=1324 exch2_iLo(4,1325)=0 exch2_iHi(4,1325)=0 exch2_jLo(4,1325)=0 exch2_jHi(4,1325)=35 exch2_opposingSend(4,1325)=3 exch2_pij(1,4,1325)=1 exch2_pij(2,4,1325)=0 exch2_pij(3,4,1325)=0 exch2_pij(4,4,1325)=1 exch2_oi(4,1325)=0 exch2_oj(4,1325)=0 RETURN END SUBROUTINE W2_E2SETUP_1326 C Topology for tile 1326 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1326)=34 exch2_tNy(1326)=34 exch2_tBasex(1326)=170 exch2_tBasey(1326)=442 exch2_txGlobalo(1326)=2721 exch2_tyGlobalo(1326)=443 exch2_isWedge(1326)=0 exch2_isNedge(1326)=0 exch2_isEedge(1326)=0 exch2_isSedge(1326)=0 exch2_myFace(1326)=6 exch2_mydNx(1326)=510 exch2_mydNy(1326)=510 exch2_nNeighbours(1326)=4 exch2_neighbourId(1,1326)=1341 exch2_iLo(1,1326)=0 exch2_iHi(1,1326)=35 exch2_jLo(1,1326)=35 exch2_jHi(1,1326)=35 exch2_opposingSend(1,1326)=2 exch2_pij(1,1,1326)=1 exch2_pij(2,1,1326)=0 exch2_pij(3,1,1326)=0 exch2_pij(4,1,1326)=1 exch2_oi(1,1326)=0 exch2_oj(1,1326)=0 exch2_neighbourId(2,1326)=1311 exch2_iLo(2,1326)=0 exch2_iHi(2,1326)=35 exch2_jLo(2,1326)=0 exch2_jHi(2,1326)=0 exch2_opposingSend(2,1326)=1 exch2_pij(1,2,1326)=1 exch2_pij(2,2,1326)=0 exch2_pij(3,2,1326)=0 exch2_pij(4,2,1326)=1 exch2_oi(2,1326)=0 exch2_oj(2,1326)=0 exch2_neighbourId(3,1326)=1327 exch2_iLo(3,1326)=35 exch2_iHi(3,1326)=35 exch2_jLo(3,1326)=0 exch2_jHi(3,1326)=35 exch2_opposingSend(3,1326)=4 exch2_pij(1,3,1326)=1 exch2_pij(2,3,1326)=0 exch2_pij(3,3,1326)=0 exch2_pij(4,3,1326)=1 exch2_oi(3,1326)=0 exch2_oj(3,1326)=0 exch2_neighbourId(4,1326)=1325 exch2_iLo(4,1326)=0 exch2_iHi(4,1326)=0 exch2_jLo(4,1326)=0 exch2_jHi(4,1326)=35 exch2_opposingSend(4,1326)=3 exch2_pij(1,4,1326)=1 exch2_pij(2,4,1326)=0 exch2_pij(3,4,1326)=0 exch2_pij(4,4,1326)=1 exch2_oi(4,1326)=0 exch2_oj(4,1326)=0 RETURN END SUBROUTINE W2_E2SETUP_1327 C Topology for tile 1327 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1327)=34 exch2_tNy(1327)=34 exch2_tBasex(1327)=204 exch2_tBasey(1327)=442 exch2_txGlobalo(1327)=2755 exch2_tyGlobalo(1327)=443 exch2_isWedge(1327)=0 exch2_isNedge(1327)=0 exch2_isEedge(1327)=0 exch2_isSedge(1327)=0 exch2_myFace(1327)=6 exch2_mydNx(1327)=510 exch2_mydNy(1327)=510 exch2_nNeighbours(1327)=4 exch2_neighbourId(1,1327)=1342 exch2_iLo(1,1327)=0 exch2_iHi(1,1327)=35 exch2_jLo(1,1327)=35 exch2_jHi(1,1327)=35 exch2_opposingSend(1,1327)=2 exch2_pij(1,1,1327)=1 exch2_pij(2,1,1327)=0 exch2_pij(3,1,1327)=0 exch2_pij(4,1,1327)=1 exch2_oi(1,1327)=0 exch2_oj(1,1327)=0 exch2_neighbourId(2,1327)=1312 exch2_iLo(2,1327)=0 exch2_iHi(2,1327)=35 exch2_jLo(2,1327)=0 exch2_jHi(2,1327)=0 exch2_opposingSend(2,1327)=1 exch2_pij(1,2,1327)=1 exch2_pij(2,2,1327)=0 exch2_pij(3,2,1327)=0 exch2_pij(4,2,1327)=1 exch2_oi(2,1327)=0 exch2_oj(2,1327)=0 exch2_neighbourId(3,1327)=1328 exch2_iLo(3,1327)=35 exch2_iHi(3,1327)=35 exch2_jLo(3,1327)=0 exch2_jHi(3,1327)=35 exch2_opposingSend(3,1327)=4 exch2_pij(1,3,1327)=1 exch2_pij(2,3,1327)=0 exch2_pij(3,3,1327)=0 exch2_pij(4,3,1327)=1 exch2_oi(3,1327)=0 exch2_oj(3,1327)=0 exch2_neighbourId(4,1327)=1326 exch2_iLo(4,1327)=0 exch2_iHi(4,1327)=0 exch2_jLo(4,1327)=0 exch2_jHi(4,1327)=35 exch2_opposingSend(4,1327)=3 exch2_pij(1,4,1327)=1 exch2_pij(2,4,1327)=0 exch2_pij(3,4,1327)=0 exch2_pij(4,4,1327)=1 exch2_oi(4,1327)=0 exch2_oj(4,1327)=0 RETURN END SUBROUTINE W2_E2SETUP_1328 C Topology for tile 1328 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1328)=34 exch2_tNy(1328)=34 exch2_tBasex(1328)=238 exch2_tBasey(1328)=442 exch2_txGlobalo(1328)=2789 exch2_tyGlobalo(1328)=443 exch2_isWedge(1328)=0 exch2_isNedge(1328)=0 exch2_isEedge(1328)=0 exch2_isSedge(1328)=0 exch2_myFace(1328)=6 exch2_mydNx(1328)=510 exch2_mydNy(1328)=510 exch2_nNeighbours(1328)=4 exch2_neighbourId(1,1328)=1343 exch2_iLo(1,1328)=0 exch2_iHi(1,1328)=35 exch2_jLo(1,1328)=35 exch2_jHi(1,1328)=35 exch2_opposingSend(1,1328)=2 exch2_pij(1,1,1328)=1 exch2_pij(2,1,1328)=0 exch2_pij(3,1,1328)=0 exch2_pij(4,1,1328)=1 exch2_oi(1,1328)=0 exch2_oj(1,1328)=0 exch2_neighbourId(2,1328)=1313 exch2_iLo(2,1328)=0 exch2_iHi(2,1328)=35 exch2_jLo(2,1328)=0 exch2_jHi(2,1328)=0 exch2_opposingSend(2,1328)=1 exch2_pij(1,2,1328)=1 exch2_pij(2,2,1328)=0 exch2_pij(3,2,1328)=0 exch2_pij(4,2,1328)=1 exch2_oi(2,1328)=0 exch2_oj(2,1328)=0 exch2_neighbourId(3,1328)=1329 exch2_iLo(3,1328)=35 exch2_iHi(3,1328)=35 exch2_jLo(3,1328)=0 exch2_jHi(3,1328)=35 exch2_opposingSend(3,1328)=4 exch2_pij(1,3,1328)=1 exch2_pij(2,3,1328)=0 exch2_pij(3,3,1328)=0 exch2_pij(4,3,1328)=1 exch2_oi(3,1328)=0 exch2_oj(3,1328)=0 exch2_neighbourId(4,1328)=1327 exch2_iLo(4,1328)=0 exch2_iHi(4,1328)=0 exch2_jLo(4,1328)=0 exch2_jHi(4,1328)=35 exch2_opposingSend(4,1328)=3 exch2_pij(1,4,1328)=1 exch2_pij(2,4,1328)=0 exch2_pij(3,4,1328)=0 exch2_pij(4,4,1328)=1 exch2_oi(4,1328)=0 exch2_oj(4,1328)=0 RETURN END SUBROUTINE W2_E2SETUP_1329 C Topology for tile 1329 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1329)=34 exch2_tNy(1329)=34 exch2_tBasex(1329)=272 exch2_tBasey(1329)=442 exch2_txGlobalo(1329)=2823 exch2_tyGlobalo(1329)=443 exch2_isWedge(1329)=0 exch2_isNedge(1329)=0 exch2_isEedge(1329)=0 exch2_isSedge(1329)=0 exch2_myFace(1329)=6 exch2_mydNx(1329)=510 exch2_mydNy(1329)=510 exch2_nNeighbours(1329)=4 exch2_neighbourId(1,1329)=1344 exch2_iLo(1,1329)=0 exch2_iHi(1,1329)=35 exch2_jLo(1,1329)=35 exch2_jHi(1,1329)=35 exch2_opposingSend(1,1329)=2 exch2_pij(1,1,1329)=1 exch2_pij(2,1,1329)=0 exch2_pij(3,1,1329)=0 exch2_pij(4,1,1329)=1 exch2_oi(1,1329)=0 exch2_oj(1,1329)=0 exch2_neighbourId(2,1329)=1314 exch2_iLo(2,1329)=0 exch2_iHi(2,1329)=35 exch2_jLo(2,1329)=0 exch2_jHi(2,1329)=0 exch2_opposingSend(2,1329)=1 exch2_pij(1,2,1329)=1 exch2_pij(2,2,1329)=0 exch2_pij(3,2,1329)=0 exch2_pij(4,2,1329)=1 exch2_oi(2,1329)=0 exch2_oj(2,1329)=0 exch2_neighbourId(3,1329)=1330 exch2_iLo(3,1329)=35 exch2_iHi(3,1329)=35 exch2_jLo(3,1329)=0 exch2_jHi(3,1329)=35 exch2_opposingSend(3,1329)=4 exch2_pij(1,3,1329)=1 exch2_pij(2,3,1329)=0 exch2_pij(3,3,1329)=0 exch2_pij(4,3,1329)=1 exch2_oi(3,1329)=0 exch2_oj(3,1329)=0 exch2_neighbourId(4,1329)=1328 exch2_iLo(4,1329)=0 exch2_iHi(4,1329)=0 exch2_jLo(4,1329)=0 exch2_jHi(4,1329)=35 exch2_opposingSend(4,1329)=3 exch2_pij(1,4,1329)=1 exch2_pij(2,4,1329)=0 exch2_pij(3,4,1329)=0 exch2_pij(4,4,1329)=1 exch2_oi(4,1329)=0 exch2_oj(4,1329)=0 RETURN END SUBROUTINE W2_E2SETUP_1330 C Topology for tile 1330 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1330)=34 exch2_tNy(1330)=34 exch2_tBasex(1330)=306 exch2_tBasey(1330)=442 exch2_txGlobalo(1330)=2857 exch2_tyGlobalo(1330)=443 exch2_isWedge(1330)=0 exch2_isNedge(1330)=0 exch2_isEedge(1330)=0 exch2_isSedge(1330)=0 exch2_myFace(1330)=6 exch2_mydNx(1330)=510 exch2_mydNy(1330)=510 exch2_nNeighbours(1330)=4 exch2_neighbourId(1,1330)=1345 exch2_iLo(1,1330)=0 exch2_iHi(1,1330)=35 exch2_jLo(1,1330)=35 exch2_jHi(1,1330)=35 exch2_opposingSend(1,1330)=2 exch2_pij(1,1,1330)=1 exch2_pij(2,1,1330)=0 exch2_pij(3,1,1330)=0 exch2_pij(4,1,1330)=1 exch2_oi(1,1330)=0 exch2_oj(1,1330)=0 exch2_neighbourId(2,1330)=1315 exch2_iLo(2,1330)=0 exch2_iHi(2,1330)=35 exch2_jLo(2,1330)=0 exch2_jHi(2,1330)=0 exch2_opposingSend(2,1330)=1 exch2_pij(1,2,1330)=1 exch2_pij(2,2,1330)=0 exch2_pij(3,2,1330)=0 exch2_pij(4,2,1330)=1 exch2_oi(2,1330)=0 exch2_oj(2,1330)=0 exch2_neighbourId(3,1330)=1331 exch2_iLo(3,1330)=35 exch2_iHi(3,1330)=35 exch2_jLo(3,1330)=0 exch2_jHi(3,1330)=35 exch2_opposingSend(3,1330)=4 exch2_pij(1,3,1330)=1 exch2_pij(2,3,1330)=0 exch2_pij(3,3,1330)=0 exch2_pij(4,3,1330)=1 exch2_oi(3,1330)=0 exch2_oj(3,1330)=0 exch2_neighbourId(4,1330)=1329 exch2_iLo(4,1330)=0 exch2_iHi(4,1330)=0 exch2_jLo(4,1330)=0 exch2_jHi(4,1330)=35 exch2_opposingSend(4,1330)=3 exch2_pij(1,4,1330)=1 exch2_pij(2,4,1330)=0 exch2_pij(3,4,1330)=0 exch2_pij(4,4,1330)=1 exch2_oi(4,1330)=0 exch2_oj(4,1330)=0 RETURN END SUBROUTINE W2_E2SETUP_1331 C Topology for tile 1331 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1331)=34 exch2_tNy(1331)=34 exch2_tBasex(1331)=340 exch2_tBasey(1331)=442 exch2_txGlobalo(1331)=2891 exch2_tyGlobalo(1331)=443 exch2_isWedge(1331)=0 exch2_isNedge(1331)=0 exch2_isEedge(1331)=0 exch2_isSedge(1331)=0 exch2_myFace(1331)=6 exch2_mydNx(1331)=510 exch2_mydNy(1331)=510 exch2_nNeighbours(1331)=4 exch2_neighbourId(1,1331)=1346 exch2_iLo(1,1331)=0 exch2_iHi(1,1331)=35 exch2_jLo(1,1331)=35 exch2_jHi(1,1331)=35 exch2_opposingSend(1,1331)=2 exch2_pij(1,1,1331)=1 exch2_pij(2,1,1331)=0 exch2_pij(3,1,1331)=0 exch2_pij(4,1,1331)=1 exch2_oi(1,1331)=0 exch2_oj(1,1331)=0 exch2_neighbourId(2,1331)=1316 exch2_iLo(2,1331)=0 exch2_iHi(2,1331)=35 exch2_jLo(2,1331)=0 exch2_jHi(2,1331)=0 exch2_opposingSend(2,1331)=1 exch2_pij(1,2,1331)=1 exch2_pij(2,2,1331)=0 exch2_pij(3,2,1331)=0 exch2_pij(4,2,1331)=1 exch2_oi(2,1331)=0 exch2_oj(2,1331)=0 exch2_neighbourId(3,1331)=1332 exch2_iLo(3,1331)=35 exch2_iHi(3,1331)=35 exch2_jLo(3,1331)=0 exch2_jHi(3,1331)=35 exch2_opposingSend(3,1331)=4 exch2_pij(1,3,1331)=1 exch2_pij(2,3,1331)=0 exch2_pij(3,3,1331)=0 exch2_pij(4,3,1331)=1 exch2_oi(3,1331)=0 exch2_oj(3,1331)=0 exch2_neighbourId(4,1331)=1330 exch2_iLo(4,1331)=0 exch2_iHi(4,1331)=0 exch2_jLo(4,1331)=0 exch2_jHi(4,1331)=35 exch2_opposingSend(4,1331)=3 exch2_pij(1,4,1331)=1 exch2_pij(2,4,1331)=0 exch2_pij(3,4,1331)=0 exch2_pij(4,4,1331)=1 exch2_oi(4,1331)=0 exch2_oj(4,1331)=0 RETURN END SUBROUTINE W2_E2SETUP_1332 C Topology for tile 1332 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1332)=34 exch2_tNy(1332)=34 exch2_tBasex(1332)=374 exch2_tBasey(1332)=442 exch2_txGlobalo(1332)=2925 exch2_tyGlobalo(1332)=443 exch2_isWedge(1332)=0 exch2_isNedge(1332)=0 exch2_isEedge(1332)=0 exch2_isSedge(1332)=0 exch2_myFace(1332)=6 exch2_mydNx(1332)=510 exch2_mydNy(1332)=510 exch2_nNeighbours(1332)=4 exch2_neighbourId(1,1332)=1347 exch2_iLo(1,1332)=0 exch2_iHi(1,1332)=35 exch2_jLo(1,1332)=35 exch2_jHi(1,1332)=35 exch2_opposingSend(1,1332)=2 exch2_pij(1,1,1332)=1 exch2_pij(2,1,1332)=0 exch2_pij(3,1,1332)=0 exch2_pij(4,1,1332)=1 exch2_oi(1,1332)=0 exch2_oj(1,1332)=0 exch2_neighbourId(2,1332)=1317 exch2_iLo(2,1332)=0 exch2_iHi(2,1332)=35 exch2_jLo(2,1332)=0 exch2_jHi(2,1332)=0 exch2_opposingSend(2,1332)=1 exch2_pij(1,2,1332)=1 exch2_pij(2,2,1332)=0 exch2_pij(3,2,1332)=0 exch2_pij(4,2,1332)=1 exch2_oi(2,1332)=0 exch2_oj(2,1332)=0 exch2_neighbourId(3,1332)=1333 exch2_iLo(3,1332)=35 exch2_iHi(3,1332)=35 exch2_jLo(3,1332)=0 exch2_jHi(3,1332)=35 exch2_opposingSend(3,1332)=4 exch2_pij(1,3,1332)=1 exch2_pij(2,3,1332)=0 exch2_pij(3,3,1332)=0 exch2_pij(4,3,1332)=1 exch2_oi(3,1332)=0 exch2_oj(3,1332)=0 exch2_neighbourId(4,1332)=1331 exch2_iLo(4,1332)=0 exch2_iHi(4,1332)=0 exch2_jLo(4,1332)=0 exch2_jHi(4,1332)=35 exch2_opposingSend(4,1332)=3 exch2_pij(1,4,1332)=1 exch2_pij(2,4,1332)=0 exch2_pij(3,4,1332)=0 exch2_pij(4,4,1332)=1 exch2_oi(4,1332)=0 exch2_oj(4,1332)=0 RETURN END SUBROUTINE W2_E2SETUP_1333 C Topology for tile 1333 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1333)=34 exch2_tNy(1333)=34 exch2_tBasex(1333)=408 exch2_tBasey(1333)=442 exch2_txGlobalo(1333)=2959 exch2_tyGlobalo(1333)=443 exch2_isWedge(1333)=0 exch2_isNedge(1333)=0 exch2_isEedge(1333)=0 exch2_isSedge(1333)=0 exch2_myFace(1333)=6 exch2_mydNx(1333)=510 exch2_mydNy(1333)=510 exch2_nNeighbours(1333)=4 exch2_neighbourId(1,1333)=1348 exch2_iLo(1,1333)=0 exch2_iHi(1,1333)=35 exch2_jLo(1,1333)=35 exch2_jHi(1,1333)=35 exch2_opposingSend(1,1333)=2 exch2_pij(1,1,1333)=1 exch2_pij(2,1,1333)=0 exch2_pij(3,1,1333)=0 exch2_pij(4,1,1333)=1 exch2_oi(1,1333)=0 exch2_oj(1,1333)=0 exch2_neighbourId(2,1333)=1318 exch2_iLo(2,1333)=0 exch2_iHi(2,1333)=35 exch2_jLo(2,1333)=0 exch2_jHi(2,1333)=0 exch2_opposingSend(2,1333)=1 exch2_pij(1,2,1333)=1 exch2_pij(2,2,1333)=0 exch2_pij(3,2,1333)=0 exch2_pij(4,2,1333)=1 exch2_oi(2,1333)=0 exch2_oj(2,1333)=0 exch2_neighbourId(3,1333)=1334 exch2_iLo(3,1333)=35 exch2_iHi(3,1333)=35 exch2_jLo(3,1333)=0 exch2_jHi(3,1333)=35 exch2_opposingSend(3,1333)=4 exch2_pij(1,3,1333)=1 exch2_pij(2,3,1333)=0 exch2_pij(3,3,1333)=0 exch2_pij(4,3,1333)=1 exch2_oi(3,1333)=0 exch2_oj(3,1333)=0 exch2_neighbourId(4,1333)=1332 exch2_iLo(4,1333)=0 exch2_iHi(4,1333)=0 exch2_jLo(4,1333)=0 exch2_jHi(4,1333)=35 exch2_opposingSend(4,1333)=3 exch2_pij(1,4,1333)=1 exch2_pij(2,4,1333)=0 exch2_pij(3,4,1333)=0 exch2_pij(4,4,1333)=1 exch2_oi(4,1333)=0 exch2_oj(4,1333)=0 RETURN END SUBROUTINE W2_E2SETUP_1334 C Topology for tile 1334 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1334)=34 exch2_tNy(1334)=34 exch2_tBasex(1334)=442 exch2_tBasey(1334)=442 exch2_txGlobalo(1334)=2993 exch2_tyGlobalo(1334)=443 exch2_isWedge(1334)=0 exch2_isNedge(1334)=0 exch2_isEedge(1334)=0 exch2_isSedge(1334)=0 exch2_myFace(1334)=6 exch2_mydNx(1334)=510 exch2_mydNy(1334)=510 exch2_nNeighbours(1334)=4 exch2_neighbourId(1,1334)=1349 exch2_iLo(1,1334)=0 exch2_iHi(1,1334)=35 exch2_jLo(1,1334)=35 exch2_jHi(1,1334)=35 exch2_opposingSend(1,1334)=2 exch2_pij(1,1,1334)=1 exch2_pij(2,1,1334)=0 exch2_pij(3,1,1334)=0 exch2_pij(4,1,1334)=1 exch2_oi(1,1334)=0 exch2_oj(1,1334)=0 exch2_neighbourId(2,1334)=1319 exch2_iLo(2,1334)=0 exch2_iHi(2,1334)=35 exch2_jLo(2,1334)=0 exch2_jHi(2,1334)=0 exch2_opposingSend(2,1334)=1 exch2_pij(1,2,1334)=1 exch2_pij(2,2,1334)=0 exch2_pij(3,2,1334)=0 exch2_pij(4,2,1334)=1 exch2_oi(2,1334)=0 exch2_oj(2,1334)=0 exch2_neighbourId(3,1334)=1335 exch2_iLo(3,1334)=35 exch2_iHi(3,1334)=35 exch2_jLo(3,1334)=0 exch2_jHi(3,1334)=35 exch2_opposingSend(3,1334)=4 exch2_pij(1,3,1334)=1 exch2_pij(2,3,1334)=0 exch2_pij(3,3,1334)=0 exch2_pij(4,3,1334)=1 exch2_oi(3,1334)=0 exch2_oj(3,1334)=0 exch2_neighbourId(4,1334)=1333 exch2_iLo(4,1334)=0 exch2_iHi(4,1334)=0 exch2_jLo(4,1334)=0 exch2_jHi(4,1334)=35 exch2_opposingSend(4,1334)=3 exch2_pij(1,4,1334)=1 exch2_pij(2,4,1334)=0 exch2_pij(3,4,1334)=0 exch2_pij(4,4,1334)=1 exch2_oi(4,1334)=0 exch2_oj(4,1334)=0 RETURN END SUBROUTINE W2_E2SETUP_1335 C Topology for tile 1335 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1335)=34 exch2_tNy(1335)=34 exch2_tBasex(1335)=476 exch2_tBasey(1335)=442 exch2_txGlobalo(1335)=3027 exch2_tyGlobalo(1335)=443 exch2_isWedge(1335)=0 exch2_isNedge(1335)=0 exch2_isEedge(1335)=1 exch2_isSedge(1335)=0 exch2_myFace(1335)=6 exch2_mydNx(1335)=510 exch2_mydNy(1335)=510 exch2_nNeighbours(1335)=4 exch2_neighbourId(1,1335)=1350 exch2_iLo(1,1335)=0 exch2_iHi(1,1335)=35 exch2_jLo(1,1335)=35 exch2_jHi(1,1335)=35 exch2_opposingSend(1,1335)=2 exch2_pij(1,1,1335)=1 exch2_pij(2,1,1335)=0 exch2_pij(3,1,1335)=0 exch2_pij(4,1,1335)=1 exch2_oi(1,1335)=0 exch2_oj(1,1335)=0 exch2_neighbourId(2,1335)=1320 exch2_iLo(2,1335)=0 exch2_iHi(2,1335)=35 exch2_jLo(2,1335)=0 exch2_jHi(2,1335)=0 exch2_opposingSend(2,1335)=1 exch2_pij(1,2,1335)=1 exch2_pij(2,2,1335)=0 exch2_pij(3,2,1335)=0 exch2_pij(4,2,1335)=1 exch2_oi(2,1335)=0 exch2_oj(2,1335)=0 exch2_neighbourId(3,1335)=227 exch2_iLo(3,1335)=35 exch2_iHi(3,1335)=35 exch2_jLo(3,1335)=0 exch2_jHi(3,1335)=35 exch2_opposingSend(3,1335)=2 exch2_pij(1,3,1335)=0 exch2_pij(2,3,1335)=1 exch2_pij(3,3,1335)=-1 exch2_pij(4,3,1335)=0 exch2_oi(3,1335)=510 exch2_oj(3,1335)=511 exch2_neighbourId(4,1335)=1334 exch2_iLo(4,1335)=0 exch2_iHi(4,1335)=0 exch2_jLo(4,1335)=0 exch2_jHi(4,1335)=35 exch2_opposingSend(4,1335)=3 exch2_pij(1,4,1335)=1 exch2_pij(2,4,1335)=0 exch2_pij(3,4,1335)=0 exch2_pij(4,4,1335)=1 exch2_oi(4,1335)=0 exch2_oj(4,1335)=0 RETURN END SUBROUTINE W2_E2SETUP_1336 C Topology for tile 1336 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1336)=34 exch2_tNy(1336)=34 exch2_tBasex(1336)=0 exch2_tBasey(1336)=476 exch2_txGlobalo(1336)=2551 exch2_tyGlobalo(1336)=477 exch2_isWedge(1336)=1 exch2_isNedge(1336)=1 exch2_isEedge(1336)=0 exch2_isSedge(1336)=0 exch2_myFace(1336)=6 exch2_mydNx(1336)=510 exch2_mydNy(1336)=510 exch2_nNeighbours(1336)=4 exch2_neighbourId(1,1336)=1 exch2_iLo(1,1336)=0 exch2_iHi(1,1336)=35 exch2_jLo(1,1336)=35 exch2_jHi(1,1336)=35 exch2_opposingSend(1,1336)=2 exch2_pij(1,1,1336)=1 exch2_pij(2,1,1336)=0 exch2_pij(3,1,1336)=0 exch2_pij(4,1,1336)=1 exch2_oi(1,1336)=0 exch2_oj(1,1336)=510 exch2_neighbourId(2,1336)=1321 exch2_iLo(2,1336)=0 exch2_iHi(2,1336)=35 exch2_jLo(2,1336)=0 exch2_jHi(2,1336)=0 exch2_opposingSend(2,1336)=1 exch2_pij(1,2,1336)=1 exch2_pij(2,2,1336)=0 exch2_pij(3,2,1336)=0 exch2_pij(4,2,1336)=1 exch2_oi(2,1336)=0 exch2_oj(2,1336)=0 exch2_neighbourId(3,1336)=1337 exch2_iLo(3,1336)=35 exch2_iHi(3,1336)=35 exch2_jLo(3,1336)=0 exch2_jHi(3,1336)=35 exch2_opposingSend(3,1336)=4 exch2_pij(1,3,1336)=1 exch2_pij(2,3,1336)=0 exch2_pij(3,3,1336)=0 exch2_pij(4,3,1336)=1 exch2_oi(3,1336)=0 exch2_oj(3,1336)=0 exch2_neighbourId(4,1336)=1125 exch2_iLo(4,1336)=0 exch2_iHi(4,1336)=0 exch2_jLo(4,1336)=0 exch2_jHi(4,1336)=35 exch2_opposingSend(4,1336)=3 exch2_pij(1,4,1336)=1 exch2_pij(2,4,1336)=0 exch2_pij(3,4,1336)=0 exch2_pij(4,4,1336)=1 exch2_oi(4,1336)=-510 exch2_oj(4,1336)=0 RETURN END SUBROUTINE W2_E2SETUP_1337 C Topology for tile 1337 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1337)=34 exch2_tNy(1337)=34 exch2_tBasex(1337)=34 exch2_tBasey(1337)=476 exch2_txGlobalo(1337)=2585 exch2_tyGlobalo(1337)=477 exch2_isWedge(1337)=0 exch2_isNedge(1337)=1 exch2_isEedge(1337)=0 exch2_isSedge(1337)=0 exch2_myFace(1337)=6 exch2_mydNx(1337)=510 exch2_mydNy(1337)=510 exch2_nNeighbours(1337)=4 exch2_neighbourId(1,1337)=2 exch2_iLo(1,1337)=0 exch2_iHi(1,1337)=35 exch2_jLo(1,1337)=35 exch2_jHi(1,1337)=35 exch2_opposingSend(1,1337)=2 exch2_pij(1,1,1337)=1 exch2_pij(2,1,1337)=0 exch2_pij(3,1,1337)=0 exch2_pij(4,1,1337)=1 exch2_oi(1,1337)=0 exch2_oj(1,1337)=510 exch2_neighbourId(2,1337)=1322 exch2_iLo(2,1337)=0 exch2_iHi(2,1337)=35 exch2_jLo(2,1337)=0 exch2_jHi(2,1337)=0 exch2_opposingSend(2,1337)=1 exch2_pij(1,2,1337)=1 exch2_pij(2,2,1337)=0 exch2_pij(3,2,1337)=0 exch2_pij(4,2,1337)=1 exch2_oi(2,1337)=0 exch2_oj(2,1337)=0 exch2_neighbourId(3,1337)=1338 exch2_iLo(3,1337)=35 exch2_iHi(3,1337)=35 exch2_jLo(3,1337)=0 exch2_jHi(3,1337)=35 exch2_opposingSend(3,1337)=4 exch2_pij(1,3,1337)=1 exch2_pij(2,3,1337)=0 exch2_pij(3,3,1337)=0 exch2_pij(4,3,1337)=1 exch2_oi(3,1337)=0 exch2_oj(3,1337)=0 exch2_neighbourId(4,1337)=1336 exch2_iLo(4,1337)=0 exch2_iHi(4,1337)=0 exch2_jLo(4,1337)=0 exch2_jHi(4,1337)=35 exch2_opposingSend(4,1337)=3 exch2_pij(1,4,1337)=1 exch2_pij(2,4,1337)=0 exch2_pij(3,4,1337)=0 exch2_pij(4,4,1337)=1 exch2_oi(4,1337)=0 exch2_oj(4,1337)=0 RETURN END SUBROUTINE W2_E2SETUP_1338 C Topology for tile 1338 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1338)=34 exch2_tNy(1338)=34 exch2_tBasex(1338)=68 exch2_tBasey(1338)=476 exch2_txGlobalo(1338)=2619 exch2_tyGlobalo(1338)=477 exch2_isWedge(1338)=0 exch2_isNedge(1338)=1 exch2_isEedge(1338)=0 exch2_isSedge(1338)=0 exch2_myFace(1338)=6 exch2_mydNx(1338)=510 exch2_mydNy(1338)=510 exch2_nNeighbours(1338)=4 exch2_neighbourId(1,1338)=3 exch2_iLo(1,1338)=0 exch2_iHi(1,1338)=35 exch2_jLo(1,1338)=35 exch2_jHi(1,1338)=35 exch2_opposingSend(1,1338)=2 exch2_pij(1,1,1338)=1 exch2_pij(2,1,1338)=0 exch2_pij(3,1,1338)=0 exch2_pij(4,1,1338)=1 exch2_oi(1,1338)=0 exch2_oj(1,1338)=510 exch2_neighbourId(2,1338)=1323 exch2_iLo(2,1338)=0 exch2_iHi(2,1338)=35 exch2_jLo(2,1338)=0 exch2_jHi(2,1338)=0 exch2_opposingSend(2,1338)=1 exch2_pij(1,2,1338)=1 exch2_pij(2,2,1338)=0 exch2_pij(3,2,1338)=0 exch2_pij(4,2,1338)=1 exch2_oi(2,1338)=0 exch2_oj(2,1338)=0 exch2_neighbourId(3,1338)=1339 exch2_iLo(3,1338)=35 exch2_iHi(3,1338)=35 exch2_jLo(3,1338)=0 exch2_jHi(3,1338)=35 exch2_opposingSend(3,1338)=4 exch2_pij(1,3,1338)=1 exch2_pij(2,3,1338)=0 exch2_pij(3,3,1338)=0 exch2_pij(4,3,1338)=1 exch2_oi(3,1338)=0 exch2_oj(3,1338)=0 exch2_neighbourId(4,1338)=1337 exch2_iLo(4,1338)=0 exch2_iHi(4,1338)=0 exch2_jLo(4,1338)=0 exch2_jHi(4,1338)=35 exch2_opposingSend(4,1338)=3 exch2_pij(1,4,1338)=1 exch2_pij(2,4,1338)=0 exch2_pij(3,4,1338)=0 exch2_pij(4,4,1338)=1 exch2_oi(4,1338)=0 exch2_oj(4,1338)=0 RETURN END SUBROUTINE W2_E2SETUP_1339 C Topology for tile 1339 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1339)=34 exch2_tNy(1339)=34 exch2_tBasex(1339)=102 exch2_tBasey(1339)=476 exch2_txGlobalo(1339)=2653 exch2_tyGlobalo(1339)=477 exch2_isWedge(1339)=0 exch2_isNedge(1339)=1 exch2_isEedge(1339)=0 exch2_isSedge(1339)=0 exch2_myFace(1339)=6 exch2_mydNx(1339)=510 exch2_mydNy(1339)=510 exch2_nNeighbours(1339)=4 exch2_neighbourId(1,1339)=4 exch2_iLo(1,1339)=0 exch2_iHi(1,1339)=35 exch2_jLo(1,1339)=35 exch2_jHi(1,1339)=35 exch2_opposingSend(1,1339)=2 exch2_pij(1,1,1339)=1 exch2_pij(2,1,1339)=0 exch2_pij(3,1,1339)=0 exch2_pij(4,1,1339)=1 exch2_oi(1,1339)=0 exch2_oj(1,1339)=510 exch2_neighbourId(2,1339)=1324 exch2_iLo(2,1339)=0 exch2_iHi(2,1339)=35 exch2_jLo(2,1339)=0 exch2_jHi(2,1339)=0 exch2_opposingSend(2,1339)=1 exch2_pij(1,2,1339)=1 exch2_pij(2,2,1339)=0 exch2_pij(3,2,1339)=0 exch2_pij(4,2,1339)=1 exch2_oi(2,1339)=0 exch2_oj(2,1339)=0 exch2_neighbourId(3,1339)=1340 exch2_iLo(3,1339)=35 exch2_iHi(3,1339)=35 exch2_jLo(3,1339)=0 exch2_jHi(3,1339)=35 exch2_opposingSend(3,1339)=4 exch2_pij(1,3,1339)=1 exch2_pij(2,3,1339)=0 exch2_pij(3,3,1339)=0 exch2_pij(4,3,1339)=1 exch2_oi(3,1339)=0 exch2_oj(3,1339)=0 exch2_neighbourId(4,1339)=1338 exch2_iLo(4,1339)=0 exch2_iHi(4,1339)=0 exch2_jLo(4,1339)=0 exch2_jHi(4,1339)=35 exch2_opposingSend(4,1339)=3 exch2_pij(1,4,1339)=1 exch2_pij(2,4,1339)=0 exch2_pij(3,4,1339)=0 exch2_pij(4,4,1339)=1 exch2_oi(4,1339)=0 exch2_oj(4,1339)=0 RETURN END SUBROUTINE W2_E2SETUP_1340 C Topology for tile 1340 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1340)=34 exch2_tNy(1340)=34 exch2_tBasex(1340)=136 exch2_tBasey(1340)=476 exch2_txGlobalo(1340)=2687 exch2_tyGlobalo(1340)=477 exch2_isWedge(1340)=0 exch2_isNedge(1340)=1 exch2_isEedge(1340)=0 exch2_isSedge(1340)=0 exch2_myFace(1340)=6 exch2_mydNx(1340)=510 exch2_mydNy(1340)=510 exch2_nNeighbours(1340)=4 exch2_neighbourId(1,1340)=5 exch2_iLo(1,1340)=0 exch2_iHi(1,1340)=35 exch2_jLo(1,1340)=35 exch2_jHi(1,1340)=35 exch2_opposingSend(1,1340)=2 exch2_pij(1,1,1340)=1 exch2_pij(2,1,1340)=0 exch2_pij(3,1,1340)=0 exch2_pij(4,1,1340)=1 exch2_oi(1,1340)=0 exch2_oj(1,1340)=510 exch2_neighbourId(2,1340)=1325 exch2_iLo(2,1340)=0 exch2_iHi(2,1340)=35 exch2_jLo(2,1340)=0 exch2_jHi(2,1340)=0 exch2_opposingSend(2,1340)=1 exch2_pij(1,2,1340)=1 exch2_pij(2,2,1340)=0 exch2_pij(3,2,1340)=0 exch2_pij(4,2,1340)=1 exch2_oi(2,1340)=0 exch2_oj(2,1340)=0 exch2_neighbourId(3,1340)=1341 exch2_iLo(3,1340)=35 exch2_iHi(3,1340)=35 exch2_jLo(3,1340)=0 exch2_jHi(3,1340)=35 exch2_opposingSend(3,1340)=4 exch2_pij(1,3,1340)=1 exch2_pij(2,3,1340)=0 exch2_pij(3,3,1340)=0 exch2_pij(4,3,1340)=1 exch2_oi(3,1340)=0 exch2_oj(3,1340)=0 exch2_neighbourId(4,1340)=1339 exch2_iLo(4,1340)=0 exch2_iHi(4,1340)=0 exch2_jLo(4,1340)=0 exch2_jHi(4,1340)=35 exch2_opposingSend(4,1340)=3 exch2_pij(1,4,1340)=1 exch2_pij(2,4,1340)=0 exch2_pij(3,4,1340)=0 exch2_pij(4,4,1340)=1 exch2_oi(4,1340)=0 exch2_oj(4,1340)=0 RETURN END SUBROUTINE W2_E2SETUP_1341 C Topology for tile 1341 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1341)=34 exch2_tNy(1341)=34 exch2_tBasex(1341)=170 exch2_tBasey(1341)=476 exch2_txGlobalo(1341)=2721 exch2_tyGlobalo(1341)=477 exch2_isWedge(1341)=0 exch2_isNedge(1341)=1 exch2_isEedge(1341)=0 exch2_isSedge(1341)=0 exch2_myFace(1341)=6 exch2_mydNx(1341)=510 exch2_mydNy(1341)=510 exch2_nNeighbours(1341)=4 exch2_neighbourId(1,1341)=6 exch2_iLo(1,1341)=0 exch2_iHi(1,1341)=35 exch2_jLo(1,1341)=35 exch2_jHi(1,1341)=35 exch2_opposingSend(1,1341)=2 exch2_pij(1,1,1341)=1 exch2_pij(2,1,1341)=0 exch2_pij(3,1,1341)=0 exch2_pij(4,1,1341)=1 exch2_oi(1,1341)=0 exch2_oj(1,1341)=510 exch2_neighbourId(2,1341)=1326 exch2_iLo(2,1341)=0 exch2_iHi(2,1341)=35 exch2_jLo(2,1341)=0 exch2_jHi(2,1341)=0 exch2_opposingSend(2,1341)=1 exch2_pij(1,2,1341)=1 exch2_pij(2,2,1341)=0 exch2_pij(3,2,1341)=0 exch2_pij(4,2,1341)=1 exch2_oi(2,1341)=0 exch2_oj(2,1341)=0 exch2_neighbourId(3,1341)=1342 exch2_iLo(3,1341)=35 exch2_iHi(3,1341)=35 exch2_jLo(3,1341)=0 exch2_jHi(3,1341)=35 exch2_opposingSend(3,1341)=4 exch2_pij(1,3,1341)=1 exch2_pij(2,3,1341)=0 exch2_pij(3,3,1341)=0 exch2_pij(4,3,1341)=1 exch2_oi(3,1341)=0 exch2_oj(3,1341)=0 exch2_neighbourId(4,1341)=1340 exch2_iLo(4,1341)=0 exch2_iHi(4,1341)=0 exch2_jLo(4,1341)=0 exch2_jHi(4,1341)=35 exch2_opposingSend(4,1341)=3 exch2_pij(1,4,1341)=1 exch2_pij(2,4,1341)=0 exch2_pij(3,4,1341)=0 exch2_pij(4,4,1341)=1 exch2_oi(4,1341)=0 exch2_oj(4,1341)=0 RETURN END SUBROUTINE W2_E2SETUP_1342 C Topology for tile 1342 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1342)=34 exch2_tNy(1342)=34 exch2_tBasex(1342)=204 exch2_tBasey(1342)=476 exch2_txGlobalo(1342)=2755 exch2_tyGlobalo(1342)=477 exch2_isWedge(1342)=0 exch2_isNedge(1342)=1 exch2_isEedge(1342)=0 exch2_isSedge(1342)=0 exch2_myFace(1342)=6 exch2_mydNx(1342)=510 exch2_mydNy(1342)=510 exch2_nNeighbours(1342)=4 exch2_neighbourId(1,1342)=7 exch2_iLo(1,1342)=0 exch2_iHi(1,1342)=35 exch2_jLo(1,1342)=35 exch2_jHi(1,1342)=35 exch2_opposingSend(1,1342)=2 exch2_pij(1,1,1342)=1 exch2_pij(2,1,1342)=0 exch2_pij(3,1,1342)=0 exch2_pij(4,1,1342)=1 exch2_oi(1,1342)=0 exch2_oj(1,1342)=510 exch2_neighbourId(2,1342)=1327 exch2_iLo(2,1342)=0 exch2_iHi(2,1342)=35 exch2_jLo(2,1342)=0 exch2_jHi(2,1342)=0 exch2_opposingSend(2,1342)=1 exch2_pij(1,2,1342)=1 exch2_pij(2,2,1342)=0 exch2_pij(3,2,1342)=0 exch2_pij(4,2,1342)=1 exch2_oi(2,1342)=0 exch2_oj(2,1342)=0 exch2_neighbourId(3,1342)=1343 exch2_iLo(3,1342)=35 exch2_iHi(3,1342)=35 exch2_jLo(3,1342)=0 exch2_jHi(3,1342)=35 exch2_opposingSend(3,1342)=4 exch2_pij(1,3,1342)=1 exch2_pij(2,3,1342)=0 exch2_pij(3,3,1342)=0 exch2_pij(4,3,1342)=1 exch2_oi(3,1342)=0 exch2_oj(3,1342)=0 exch2_neighbourId(4,1342)=1341 exch2_iLo(4,1342)=0 exch2_iHi(4,1342)=0 exch2_jLo(4,1342)=0 exch2_jHi(4,1342)=35 exch2_opposingSend(4,1342)=3 exch2_pij(1,4,1342)=1 exch2_pij(2,4,1342)=0 exch2_pij(3,4,1342)=0 exch2_pij(4,4,1342)=1 exch2_oi(4,1342)=0 exch2_oj(4,1342)=0 RETURN END SUBROUTINE W2_E2SETUP_1343 C Topology for tile 1343 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1343)=34 exch2_tNy(1343)=34 exch2_tBasex(1343)=238 exch2_tBasey(1343)=476 exch2_txGlobalo(1343)=2789 exch2_tyGlobalo(1343)=477 exch2_isWedge(1343)=0 exch2_isNedge(1343)=1 exch2_isEedge(1343)=0 exch2_isSedge(1343)=0 exch2_myFace(1343)=6 exch2_mydNx(1343)=510 exch2_mydNy(1343)=510 exch2_nNeighbours(1343)=4 exch2_neighbourId(1,1343)=8 exch2_iLo(1,1343)=0 exch2_iHi(1,1343)=35 exch2_jLo(1,1343)=35 exch2_jHi(1,1343)=35 exch2_opposingSend(1,1343)=2 exch2_pij(1,1,1343)=1 exch2_pij(2,1,1343)=0 exch2_pij(3,1,1343)=0 exch2_pij(4,1,1343)=1 exch2_oi(1,1343)=0 exch2_oj(1,1343)=510 exch2_neighbourId(2,1343)=1328 exch2_iLo(2,1343)=0 exch2_iHi(2,1343)=35 exch2_jLo(2,1343)=0 exch2_jHi(2,1343)=0 exch2_opposingSend(2,1343)=1 exch2_pij(1,2,1343)=1 exch2_pij(2,2,1343)=0 exch2_pij(3,2,1343)=0 exch2_pij(4,2,1343)=1 exch2_oi(2,1343)=0 exch2_oj(2,1343)=0 exch2_neighbourId(3,1343)=1344 exch2_iLo(3,1343)=35 exch2_iHi(3,1343)=35 exch2_jLo(3,1343)=0 exch2_jHi(3,1343)=35 exch2_opposingSend(3,1343)=4 exch2_pij(1,3,1343)=1 exch2_pij(2,3,1343)=0 exch2_pij(3,3,1343)=0 exch2_pij(4,3,1343)=1 exch2_oi(3,1343)=0 exch2_oj(3,1343)=0 exch2_neighbourId(4,1343)=1342 exch2_iLo(4,1343)=0 exch2_iHi(4,1343)=0 exch2_jLo(4,1343)=0 exch2_jHi(4,1343)=35 exch2_opposingSend(4,1343)=3 exch2_pij(1,4,1343)=1 exch2_pij(2,4,1343)=0 exch2_pij(3,4,1343)=0 exch2_pij(4,4,1343)=1 exch2_oi(4,1343)=0 exch2_oj(4,1343)=0 RETURN END SUBROUTINE W2_E2SETUP_1344 C Topology for tile 1344 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1344)=34 exch2_tNy(1344)=34 exch2_tBasex(1344)=272 exch2_tBasey(1344)=476 exch2_txGlobalo(1344)=2823 exch2_tyGlobalo(1344)=477 exch2_isWedge(1344)=0 exch2_isNedge(1344)=1 exch2_isEedge(1344)=0 exch2_isSedge(1344)=0 exch2_myFace(1344)=6 exch2_mydNx(1344)=510 exch2_mydNy(1344)=510 exch2_nNeighbours(1344)=4 exch2_neighbourId(1,1344)=9 exch2_iLo(1,1344)=0 exch2_iHi(1,1344)=35 exch2_jLo(1,1344)=35 exch2_jHi(1,1344)=35 exch2_opposingSend(1,1344)=2 exch2_pij(1,1,1344)=1 exch2_pij(2,1,1344)=0 exch2_pij(3,1,1344)=0 exch2_pij(4,1,1344)=1 exch2_oi(1,1344)=0 exch2_oj(1,1344)=510 exch2_neighbourId(2,1344)=1329 exch2_iLo(2,1344)=0 exch2_iHi(2,1344)=35 exch2_jLo(2,1344)=0 exch2_jHi(2,1344)=0 exch2_opposingSend(2,1344)=1 exch2_pij(1,2,1344)=1 exch2_pij(2,2,1344)=0 exch2_pij(3,2,1344)=0 exch2_pij(4,2,1344)=1 exch2_oi(2,1344)=0 exch2_oj(2,1344)=0 exch2_neighbourId(3,1344)=1345 exch2_iLo(3,1344)=35 exch2_iHi(3,1344)=35 exch2_jLo(3,1344)=0 exch2_jHi(3,1344)=35 exch2_opposingSend(3,1344)=4 exch2_pij(1,3,1344)=1 exch2_pij(2,3,1344)=0 exch2_pij(3,3,1344)=0 exch2_pij(4,3,1344)=1 exch2_oi(3,1344)=0 exch2_oj(3,1344)=0 exch2_neighbourId(4,1344)=1343 exch2_iLo(4,1344)=0 exch2_iHi(4,1344)=0 exch2_jLo(4,1344)=0 exch2_jHi(4,1344)=35 exch2_opposingSend(4,1344)=3 exch2_pij(1,4,1344)=1 exch2_pij(2,4,1344)=0 exch2_pij(3,4,1344)=0 exch2_pij(4,4,1344)=1 exch2_oi(4,1344)=0 exch2_oj(4,1344)=0 RETURN END SUBROUTINE W2_E2SETUP_1345 C Topology for tile 1345 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1345)=34 exch2_tNy(1345)=34 exch2_tBasex(1345)=306 exch2_tBasey(1345)=476 exch2_txGlobalo(1345)=2857 exch2_tyGlobalo(1345)=477 exch2_isWedge(1345)=0 exch2_isNedge(1345)=1 exch2_isEedge(1345)=0 exch2_isSedge(1345)=0 exch2_myFace(1345)=6 exch2_mydNx(1345)=510 exch2_mydNy(1345)=510 exch2_nNeighbours(1345)=4 exch2_neighbourId(1,1345)=10 exch2_iLo(1,1345)=0 exch2_iHi(1,1345)=35 exch2_jLo(1,1345)=35 exch2_jHi(1,1345)=35 exch2_opposingSend(1,1345)=2 exch2_pij(1,1,1345)=1 exch2_pij(2,1,1345)=0 exch2_pij(3,1,1345)=0 exch2_pij(4,1,1345)=1 exch2_oi(1,1345)=0 exch2_oj(1,1345)=510 exch2_neighbourId(2,1345)=1330 exch2_iLo(2,1345)=0 exch2_iHi(2,1345)=35 exch2_jLo(2,1345)=0 exch2_jHi(2,1345)=0 exch2_opposingSend(2,1345)=1 exch2_pij(1,2,1345)=1 exch2_pij(2,2,1345)=0 exch2_pij(3,2,1345)=0 exch2_pij(4,2,1345)=1 exch2_oi(2,1345)=0 exch2_oj(2,1345)=0 exch2_neighbourId(3,1345)=1346 exch2_iLo(3,1345)=35 exch2_iHi(3,1345)=35 exch2_jLo(3,1345)=0 exch2_jHi(3,1345)=35 exch2_opposingSend(3,1345)=4 exch2_pij(1,3,1345)=1 exch2_pij(2,3,1345)=0 exch2_pij(3,3,1345)=0 exch2_pij(4,3,1345)=1 exch2_oi(3,1345)=0 exch2_oj(3,1345)=0 exch2_neighbourId(4,1345)=1344 exch2_iLo(4,1345)=0 exch2_iHi(4,1345)=0 exch2_jLo(4,1345)=0 exch2_jHi(4,1345)=35 exch2_opposingSend(4,1345)=3 exch2_pij(1,4,1345)=1 exch2_pij(2,4,1345)=0 exch2_pij(3,4,1345)=0 exch2_pij(4,4,1345)=1 exch2_oi(4,1345)=0 exch2_oj(4,1345)=0 RETURN END SUBROUTINE W2_E2SETUP_1346 C Topology for tile 1346 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1346)=34 exch2_tNy(1346)=34 exch2_tBasex(1346)=340 exch2_tBasey(1346)=476 exch2_txGlobalo(1346)=2891 exch2_tyGlobalo(1346)=477 exch2_isWedge(1346)=0 exch2_isNedge(1346)=1 exch2_isEedge(1346)=0 exch2_isSedge(1346)=0 exch2_myFace(1346)=6 exch2_mydNx(1346)=510 exch2_mydNy(1346)=510 exch2_nNeighbours(1346)=4 exch2_neighbourId(1,1346)=11 exch2_iLo(1,1346)=0 exch2_iHi(1,1346)=35 exch2_jLo(1,1346)=35 exch2_jHi(1,1346)=35 exch2_opposingSend(1,1346)=2 exch2_pij(1,1,1346)=1 exch2_pij(2,1,1346)=0 exch2_pij(3,1,1346)=0 exch2_pij(4,1,1346)=1 exch2_oi(1,1346)=0 exch2_oj(1,1346)=510 exch2_neighbourId(2,1346)=1331 exch2_iLo(2,1346)=0 exch2_iHi(2,1346)=35 exch2_jLo(2,1346)=0 exch2_jHi(2,1346)=0 exch2_opposingSend(2,1346)=1 exch2_pij(1,2,1346)=1 exch2_pij(2,2,1346)=0 exch2_pij(3,2,1346)=0 exch2_pij(4,2,1346)=1 exch2_oi(2,1346)=0 exch2_oj(2,1346)=0 exch2_neighbourId(3,1346)=1347 exch2_iLo(3,1346)=35 exch2_iHi(3,1346)=35 exch2_jLo(3,1346)=0 exch2_jHi(3,1346)=35 exch2_opposingSend(3,1346)=4 exch2_pij(1,3,1346)=1 exch2_pij(2,3,1346)=0 exch2_pij(3,3,1346)=0 exch2_pij(4,3,1346)=1 exch2_oi(3,1346)=0 exch2_oj(3,1346)=0 exch2_neighbourId(4,1346)=1345 exch2_iLo(4,1346)=0 exch2_iHi(4,1346)=0 exch2_jLo(4,1346)=0 exch2_jHi(4,1346)=35 exch2_opposingSend(4,1346)=3 exch2_pij(1,4,1346)=1 exch2_pij(2,4,1346)=0 exch2_pij(3,4,1346)=0 exch2_pij(4,4,1346)=1 exch2_oi(4,1346)=0 exch2_oj(4,1346)=0 RETURN END SUBROUTINE W2_E2SETUP_1347 C Topology for tile 1347 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1347)=34 exch2_tNy(1347)=34 exch2_tBasex(1347)=374 exch2_tBasey(1347)=476 exch2_txGlobalo(1347)=2925 exch2_tyGlobalo(1347)=477 exch2_isWedge(1347)=0 exch2_isNedge(1347)=1 exch2_isEedge(1347)=0 exch2_isSedge(1347)=0 exch2_myFace(1347)=6 exch2_mydNx(1347)=510 exch2_mydNy(1347)=510 exch2_nNeighbours(1347)=4 exch2_neighbourId(1,1347)=12 exch2_iLo(1,1347)=0 exch2_iHi(1,1347)=35 exch2_jLo(1,1347)=35 exch2_jHi(1,1347)=35 exch2_opposingSend(1,1347)=2 exch2_pij(1,1,1347)=1 exch2_pij(2,1,1347)=0 exch2_pij(3,1,1347)=0 exch2_pij(4,1,1347)=1 exch2_oi(1,1347)=0 exch2_oj(1,1347)=510 exch2_neighbourId(2,1347)=1332 exch2_iLo(2,1347)=0 exch2_iHi(2,1347)=35 exch2_jLo(2,1347)=0 exch2_jHi(2,1347)=0 exch2_opposingSend(2,1347)=1 exch2_pij(1,2,1347)=1 exch2_pij(2,2,1347)=0 exch2_pij(3,2,1347)=0 exch2_pij(4,2,1347)=1 exch2_oi(2,1347)=0 exch2_oj(2,1347)=0 exch2_neighbourId(3,1347)=1348 exch2_iLo(3,1347)=35 exch2_iHi(3,1347)=35 exch2_jLo(3,1347)=0 exch2_jHi(3,1347)=35 exch2_opposingSend(3,1347)=4 exch2_pij(1,3,1347)=1 exch2_pij(2,3,1347)=0 exch2_pij(3,3,1347)=0 exch2_pij(4,3,1347)=1 exch2_oi(3,1347)=0 exch2_oj(3,1347)=0 exch2_neighbourId(4,1347)=1346 exch2_iLo(4,1347)=0 exch2_iHi(4,1347)=0 exch2_jLo(4,1347)=0 exch2_jHi(4,1347)=35 exch2_opposingSend(4,1347)=3 exch2_pij(1,4,1347)=1 exch2_pij(2,4,1347)=0 exch2_pij(3,4,1347)=0 exch2_pij(4,4,1347)=1 exch2_oi(4,1347)=0 exch2_oj(4,1347)=0 RETURN END SUBROUTINE W2_E2SETUP_1348 C Topology for tile 1348 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1348)=34 exch2_tNy(1348)=34 exch2_tBasex(1348)=408 exch2_tBasey(1348)=476 exch2_txGlobalo(1348)=2959 exch2_tyGlobalo(1348)=477 exch2_isWedge(1348)=0 exch2_isNedge(1348)=1 exch2_isEedge(1348)=0 exch2_isSedge(1348)=0 exch2_myFace(1348)=6 exch2_mydNx(1348)=510 exch2_mydNy(1348)=510 exch2_nNeighbours(1348)=4 exch2_neighbourId(1,1348)=13 exch2_iLo(1,1348)=0 exch2_iHi(1,1348)=35 exch2_jLo(1,1348)=35 exch2_jHi(1,1348)=35 exch2_opposingSend(1,1348)=2 exch2_pij(1,1,1348)=1 exch2_pij(2,1,1348)=0 exch2_pij(3,1,1348)=0 exch2_pij(4,1,1348)=1 exch2_oi(1,1348)=0 exch2_oj(1,1348)=510 exch2_neighbourId(2,1348)=1333 exch2_iLo(2,1348)=0 exch2_iHi(2,1348)=35 exch2_jLo(2,1348)=0 exch2_jHi(2,1348)=0 exch2_opposingSend(2,1348)=1 exch2_pij(1,2,1348)=1 exch2_pij(2,2,1348)=0 exch2_pij(3,2,1348)=0 exch2_pij(4,2,1348)=1 exch2_oi(2,1348)=0 exch2_oj(2,1348)=0 exch2_neighbourId(3,1348)=1349 exch2_iLo(3,1348)=35 exch2_iHi(3,1348)=35 exch2_jLo(3,1348)=0 exch2_jHi(3,1348)=35 exch2_opposingSend(3,1348)=4 exch2_pij(1,3,1348)=1 exch2_pij(2,3,1348)=0 exch2_pij(3,3,1348)=0 exch2_pij(4,3,1348)=1 exch2_oi(3,1348)=0 exch2_oj(3,1348)=0 exch2_neighbourId(4,1348)=1347 exch2_iLo(4,1348)=0 exch2_iHi(4,1348)=0 exch2_jLo(4,1348)=0 exch2_jHi(4,1348)=35 exch2_opposingSend(4,1348)=3 exch2_pij(1,4,1348)=1 exch2_pij(2,4,1348)=0 exch2_pij(3,4,1348)=0 exch2_pij(4,4,1348)=1 exch2_oi(4,1348)=0 exch2_oj(4,1348)=0 RETURN END SUBROUTINE W2_E2SETUP_1349 C Topology for tile 1349 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1349)=34 exch2_tNy(1349)=34 exch2_tBasex(1349)=442 exch2_tBasey(1349)=476 exch2_txGlobalo(1349)=2993 exch2_tyGlobalo(1349)=477 exch2_isWedge(1349)=0 exch2_isNedge(1349)=1 exch2_isEedge(1349)=0 exch2_isSedge(1349)=0 exch2_myFace(1349)=6 exch2_mydNx(1349)=510 exch2_mydNy(1349)=510 exch2_nNeighbours(1349)=4 exch2_neighbourId(1,1349)=14 exch2_iLo(1,1349)=0 exch2_iHi(1,1349)=35 exch2_jLo(1,1349)=35 exch2_jHi(1,1349)=35 exch2_opposingSend(1,1349)=2 exch2_pij(1,1,1349)=1 exch2_pij(2,1,1349)=0 exch2_pij(3,1,1349)=0 exch2_pij(4,1,1349)=1 exch2_oi(1,1349)=0 exch2_oj(1,1349)=510 exch2_neighbourId(2,1349)=1334 exch2_iLo(2,1349)=0 exch2_iHi(2,1349)=35 exch2_jLo(2,1349)=0 exch2_jHi(2,1349)=0 exch2_opposingSend(2,1349)=1 exch2_pij(1,2,1349)=1 exch2_pij(2,2,1349)=0 exch2_pij(3,2,1349)=0 exch2_pij(4,2,1349)=1 exch2_oi(2,1349)=0 exch2_oj(2,1349)=0 exch2_neighbourId(3,1349)=1350 exch2_iLo(3,1349)=35 exch2_iHi(3,1349)=35 exch2_jLo(3,1349)=0 exch2_jHi(3,1349)=35 exch2_opposingSend(3,1349)=4 exch2_pij(1,3,1349)=1 exch2_pij(2,3,1349)=0 exch2_pij(3,3,1349)=0 exch2_pij(4,3,1349)=1 exch2_oi(3,1349)=0 exch2_oj(3,1349)=0 exch2_neighbourId(4,1349)=1348 exch2_iLo(4,1349)=0 exch2_iHi(4,1349)=0 exch2_jLo(4,1349)=0 exch2_jHi(4,1349)=35 exch2_opposingSend(4,1349)=3 exch2_pij(1,4,1349)=1 exch2_pij(2,4,1349)=0 exch2_pij(3,4,1349)=0 exch2_pij(4,4,1349)=1 exch2_oi(4,1349)=0 exch2_oj(4,1349)=0 RETURN END SUBROUTINE W2_E2SETUP_1350 C Topology for tile 1350 #include "W2_EXCH2_TOPOLOGY.h" exch2_tNx(1350)=34 exch2_tNy(1350)=34 exch2_tBasex(1350)=476 exch2_tBasey(1350)=476 exch2_txGlobalo(1350)=3027 exch2_tyGlobalo(1350)=477 exch2_isWedge(1350)=0 exch2_isNedge(1350)=1 exch2_isEedge(1350)=1 exch2_isSedge(1350)=0 exch2_myFace(1350)=6 exch2_mydNx(1350)=510 exch2_mydNy(1350)=510 exch2_nNeighbours(1350)=4 exch2_neighbourId(1,1350)=15 exch2_iLo(1,1350)=0 exch2_iHi(1,1350)=35 exch2_jLo(1,1350)=35 exch2_jHi(1,1350)=35 exch2_opposingSend(1,1350)=2 exch2_pij(1,1,1350)=1 exch2_pij(2,1,1350)=0 exch2_pij(3,1,1350)=0 exch2_pij(4,1,1350)=1 exch2_oi(1,1350)=0 exch2_oj(1,1350)=510 exch2_neighbourId(2,1350)=1335 exch2_iLo(2,1350)=0 exch2_iHi(2,1350)=35 exch2_jLo(2,1350)=0 exch2_jHi(2,1350)=0 exch2_opposingSend(2,1350)=1 exch2_pij(1,2,1350)=1 exch2_pij(2,2,1350)=0 exch2_pij(3,2,1350)=0 exch2_pij(4,2,1350)=1 exch2_oi(2,1350)=0 exch2_oj(2,1350)=0 exch2_neighbourId(3,1350)=226 exch2_iLo(3,1350)=35 exch2_iHi(3,1350)=35 exch2_jLo(3,1350)=0 exch2_jHi(3,1350)=35 exch2_opposingSend(3,1350)=2 exch2_pij(1,3,1350)=0 exch2_pij(2,3,1350)=1 exch2_pij(3,3,1350)=-1 exch2_pij(4,3,1350)=0 exch2_oi(3,1350)=510 exch2_oj(3,1350)=511 exch2_neighbourId(4,1350)=1349 exch2_iLo(4,1350)=0 exch2_iHi(4,1350)=0 exch2_jLo(4,1350)=0 exch2_jHi(4,1350)=35 exch2_opposingSend(4,1350)=3 exch2_pij(1,4,1350)=1 exch2_pij(2,4,1350)=0 exch2_pij(3,4,1350)=0 exch2_pij(4,4,1350)=1 exch2_oi(4,1350)=0 exch2_oj(4,1350)=0 RETURN END