IF ( exch2_isWedge(myTile) .EQ. 1 .AND.
exch2_isWedge(12)=1
exch2_isWedge(2)=1
exch2_isWedge(3)=1
exch2_isWedge(4)=1
exch2_isWedge(1)=1
exch2_isWedge(5)=1
exch2_isWedge(6)=1
exch2_isWedge(7)=1
exch2_isWedge(8)=1
exch2_isWedge(9)=1
exch2_isWedge(10)=1
exch2_isWedge(11)=1
INTEGER exch2_isWedge(NTILES)
& exch2_isWedge, exch2_isNedge,
exch2_isWedge(128)=0
exch2_isWedge(129)=0
exch2_isWedge(130)=0
exch2_isWedge(131)=1
exch2_isWedge(132)=0
exch2_isWedge(133)=0
exch2_isWedge(134)=0
exch2_isWedge(12)=0
exch2_isWedge(135)=1
exch2_isWedge(136)=0
exch2_isWedge(137)=0
exch2_isWedge(138)=0
exch2_isWedge(139)=1
exch2_isWedge(140)=0
exch2_isWedge(141)=0
exch2_isWedge(142)=1
exch2_isWedge(143)=0
exch2_isWedge(144)=0
exch2_isWedge(145)=1
exch2_isWedge(13)=1
exch2_isWedge(146)=0
exch2_isWedge(147)=0
exch2_isWedge(148)=0
exch2_isWedge(149)=1
exch2_isWedge(150)=0
exch2_isWedge(151)=0
exch2_isWedge(152)=0
exch2_isWedge(14)=0
exch2_isWedge(153)=1
exch2_isWedge(154)=0
exch2_isWedge(155)=0
exch2_isWedge(156)=0
exch2_isWedge(157)=1
exch2_isWedge(158)=0
exch2_isWedge(159)=0
exch2_isWedge(160)=0
exch2_isWedge(161)=1
exch2_isWedge(162)=0
exch2_isWedge(15)=0
exch2_isWedge(163)=0
exch2_isWedge(164)=0
exch2_isWedge(165)=1
exch2_isWedge(166)=0
exch2_isWedge(167)=0
exch2_isWedge(168)=0
exch2_isWedge(169)=1
exch2_isWedge(170)=0
exch2_isWedge(171)=0
exch2_isWedge(172)=0
exch2_isWedge(16)=0
exch2_isWedge(173)=1
exch2_isWedge(174)=0
exch2_isWedge(175)=0
exch2_isWedge(176)=0
exch2_isWedge(17)=1
exch2_isWedge(18)=0
exch2_isWedge(19)=0
exch2_isWedge(20)=1
exch2_isWedge(21)=0
exch2_isWedge(22)=0
exch2_isWedge(23)=1
exch2_isWedge(24)=0
exch2_isWedge(25)=0
exch2_isWedge(26)=0
exch2_isWedge(27)=1
exch2_isWedge(28)=0
exch2_isWedge(29)=0
exch2_isWedge(30)=0
exch2_isWedge(31)=1
exch2_isWedge(32)=0
exch2_isWedge(33)=0
exch2_isWedge(2)=0
exch2_isWedge(34)=0
exch2_isWedge(35)=1
exch2_isWedge(36)=0
exch2_isWedge(37)=0
exch2_isWedge(38)=1
exch2_isWedge(39)=0
exch2_isWedge(40)=0
exch2_isWedge(41)=0
exch2_isWedge(42)=1
exch2_isWedge(43)=0
exch2_isWedge(44)=0
exch2_isWedge(3)=0
exch2_isWedge(45)=0
exch2_isWedge(46)=1
exch2_isWedge(47)=0
exch2_isWedge(48)=0
exch2_isWedge(49)=0
exch2_isWedge(50)=1
exch2_isWedge(51)=0
exch2_isWedge(52)=0
exch2_isWedge(53)=0
exch2_isWedge(54)=1
exch2_isWedge(4)=0
exch2_isWedge(55)=0
exch2_isWedge(56)=0
exch2_isWedge(57)=0
exch2_isWedge(58)=0
exch2_isWedge(59)=1
exch2_isWedge(60)=0
exch2_isWedge(61)=1
exch2_isWedge(62)=0
exch2_isWedge(63)=0
exch2_isWedge(64)=0
exch2_isWedge(65)=1
exch2_isWedge(66)=0
exch2_isWedge(67)=0
exch2_isWedge(68)=0
exch2_isWedge(69)=1
exch2_isWedge(70)=0
exch2_isWedge(71)=0
exch2_isWedge(72)=0
exch2_isWedge(73)=1
exch2_isWedge(74)=0
exch2_isWedge(75)=0
exch2_isWedge(76)=0
exch2_isWedge(6)=0
exch2_isWedge(77)=1
exch2_isWedge(78)=0
exch2_isWedge(79)=0
exch2_isWedge(80)=1
exch2_isWedge(81)=0
exch2_isWedge(82)=0
exch2_isWedge(83)=1
exch2_isWedge(84)=0
exch2_isWedge(85)=0
exch2_isWedge(86)=0
exch2_isWedge(7)=0
exch2_isWedge(87)=1
exch2_isWedge(88)=0
exch2_isWedge(89)=0
exch2_isWedge(90)=0
exch2_isWedge(91)=1
exch2_isWedge(92)=0
exch2_isWedge(93)=0
exch2_isWedge(94)=0
exch2_isWedge(95)=1
exch2_isWedge(96)=0
exch2_isWedge(8)=0
exch2_isWedge(97)=0
exch2_isWedge(98)=0
exch2_isWedge(99)=1
exch2_isWedge(100)=0
exch2_isWedge(101)=0
exch2_isWedge(102)=0
exch2_isWedge(103)=1
exch2_isWedge(104)=0
exch2_isWedge(105)=0
exch2_isWedge(106)=0
exch2_isWedge(107)=1
exch2_isWedge(108)=0
exch2_isWedge(109)=0
exch2_isWedge(110)=0
exch2_isWedge(111)=1
exch2_isWedge(112)=0
exch2_isWedge(113)=0
exch2_isWedge(114)=0
exch2_isWedge(10)=0
exch2_isWedge(115)=1
exch2_isWedge(116)=0
exch2_isWedge(117)=0
exch2_isWedge(118)=0
exch2_isWedge(119)=1
exch2_isWedge(120)=0
exch2_isWedge(121)=0
exch2_isWedge(122)=0
exch2_isWedge(123)=1
exch2_isWedge(124)=0
exch2_isWedge(11)=0
exch2_isWedge(125)=0
exch2_isWedge(126)=0
exch2_isWedge(127)=1
exch2_isWedge(121)=1
exch2_isWedge(123)=0
exch2_isWedge(125)=1
exch2_isWedge(127)=0
exch2_isWedge(129)=1
exch2_isWedge(131)=0
exch2_isWedge(133)=1
exch2_isWedge(135)=0
exch2_isWedge(137)=1
exch2_isWedge(139)=0
exch2_isWedge(141)=1
exch2_isWedge(142)=0
exch2_isWedge(177)=1
exch2_isWedge(178)=0
exch2_isWedge(179)=0
exch2_isWedge(180)=0
exch2_isWedge(181)=1
exch2_isWedge(182)=0
exch2_isWedge(183)=0
exch2_isWedge(184)=0
exch2_isWedge(185)=1
exch2_isWedge(186)=0
exch2_isWedge(187)=0
exch2_isWedge(188)=0
exch2_isWedge(189)=1
exch2_isWedge(190)=0
exch2_isWedge(191)=0
exch2_isWedge(192)=0
exch2_isWedge(20)=0
exch2_isWedge(21)=1
exch2_isWedge(23)=0
exch2_isWedge(25)=1
exch2_isWedge(27)=0
exch2_isWedge(29)=1
exch2_isWedge(31)=0
exch2_isWedge(33)=1
exch2_isWedge(35)=0
exch2_isWedge(37)=1
exch2_isWedge(38)=0
exch2_isWedge(41)=1
exch2_isWedge(42)=0
exch2_isWedge(45)=1
exch2_isWedge(46)=0
exch2_isWedge(49)=1
exch2_isWedge(50)=0
exch2_isWedge(53)=1
exch2_isWedge(54)=0
exch2_isWedge(57)=1
exch2_isWedge(59)=0