TALK=T;RUN(1,1)
 ************************************************************
  Group 1. Run Title and Number
 ************************************************************
 ************************************************************
 
 TEXT(FADHL experiments in 2D non conservative)
 
 ************************************************************
 ************************************************************
 
 IRUNN = 1 ;LIBREF = 0
 ************************************************************
  Group 2. Time dependence
 STEADY = F
    * Set overall time and no. of steps
 TFIRST =0. ;TLAST =1.
 FSTEP = 1 ;LSTEP = 6000
 TFRAC(1)=1.666667E-04 ;TFRAC(2)=3.333333E-04
 TFRAC(3)=5.0E-04 ;TFRAC(4)=6.666667E-04
 TFRAC(5)=8.333334E-04 ;TFRAC(6)=1.0E-03
 TFRAC(7)=1.166667E-03 ;TFRAC(8)=1.333333E-03
 TFRAC(9)=1.5E-03 ;TFRAC(10)=1.666667E-03
 TFRAC(11)=1.833333E-03 ;TFRAC(12)=2.0E-03
 TFRAC(13)=2.166667E-03 ;TFRAC(14)=2.333333E-03
 TFRAC(15)=2.5E-03 ;TFRAC(16)=2.666667E-03
 TFRAC(17)=2.833333E-03 ;TFRAC(18)=3.0E-03
 TFRAC(19)=3.166667E-03 ;TFRAC(20)=3.333333E-03
 TFRAC(21)=3.5E-03 ;TFRAC(22)=3.666667E-03
 TFRAC(23)=3.833333E-03 ;TFRAC(24)=4.0E-03
 TFRAC(25)=4.166667E-03 ;TFRAC(26)=4.333333E-03
 TFRAC(27)=4.5E-03 ;TFRAC(28)=4.666667E-03
 TFRAC(29)=4.833333E-03 ;TFRAC(30)=5.0E-03
 TFRAC(31)=5.166667E-03 ;TFRAC(32)=5.333333E-03
 TFRAC(33)=5.5E-03 ;TFRAC(34)=5.666667E-03
 TFRAC(35)=5.833333E-03 ;TFRAC(36)=6.0E-03
 TFRAC(37)=6.166667E-03 ;TFRAC(38)=6.333333E-03
 TFRAC(39)=6.5E-03 ;TFRAC(40)=6.666667E-03
 TFRAC(41)=6.833334E-03 ;TFRAC(42)=7.0E-03
 TFRAC(43)=7.166666E-03 ;TFRAC(44)=7.333333E-03
 TFRAC(45)=7.5E-03 ;TFRAC(46)=7.666667E-03
 TFRAC(47)=7.833334E-03 ;TFRAC(48)=8.0E-03
 TFRAC(49)=8.166667E-03 ;TFRAC(50)=8.333334E-03
 TFRAC(51)=8.5E-03 ;TFRAC(52)=8.666666E-03
 TFRAC(53)=8.833333E-03 ;TFRAC(54)=9.0E-03
 TFRAC(55)=9.166666E-03 ;TFRAC(56)=9.333333E-03
 TFRAC(57)=9.5E-03 ;TFRAC(58)=9.666666E-03
 TFRAC(59)=9.833333E-03 ;TFRAC(60)=1.0E-02
 TFRAC(61)=0.010167 ;TFRAC(62)=0.010333
 TFRAC(63)=0.0105 ;TFRAC(64)=0.010667
 TFRAC(65)=0.010833 ;TFRAC(66)=0.011
 TFRAC(67)=0.011167 ;TFRAC(68)=0.011333
 TFRAC(69)=0.0115 ;TFRAC(70)=0.011667
 TFRAC(71)=0.011833 ;TFRAC(72)=0.012
 TFRAC(73)=0.012167 ;TFRAC(74)=0.012333
 TFRAC(75)=0.0125 ;TFRAC(76)=0.012667
 TFRAC(77)=0.012833 ;TFRAC(78)=0.013
 TFRAC(79)=0.013167 ;TFRAC(80)=0.013333
 TFRAC(81)=0.0135 ;TFRAC(82)=0.013667
 TFRAC(83)=0.013833 ;TFRAC(84)=0.014
 TFRAC(85)=0.014167 ;TFRAC(86)=0.014333
 TFRAC(87)=0.0145 ;TFRAC(88)=0.014667
 TFRAC(89)=0.014833 ;TFRAC(90)=0.015
 TFRAC(91)=0.015167 ;TFRAC(92)=0.015333
 TFRAC(93)=0.0155 ;TFRAC(94)=0.015667
 TFRAC(95)=0.015833 ;TFRAC(96)=0.016
 TFRAC(97)=0.016167 ;TFRAC(98)=0.016333
 TFRAC(99)=0.0165 ;TFRAC(100)=0.016667
 TFRAC(101)=0.016833 ;TFRAC(102)=0.017
 TFRAC(103)=0.017167 ;TFRAC(104)=0.017333
 TFRAC(105)=0.0175 ;TFRAC(106)=0.017667
 TFRAC(107)=0.017833 ;TFRAC(108)=0.018
 TFRAC(109)=0.018167 ;TFRAC(110)=0.018333
 TFRAC(111)=0.0185 ;TFRAC(112)=0.018667
 TFRAC(113)=0.018833 ;TFRAC(114)=0.019
 TFRAC(115)=0.019167 ;TFRAC(116)=0.019333
 TFRAC(117)=0.0195 ;TFRAC(118)=0.019667
 TFRAC(119)=0.019833 ;TFRAC(120)=0.02
 TFRAC(121)=0.020167 ;TFRAC(122)=0.020333
 TFRAC(123)=0.0205 ;TFRAC(124)=0.020667
 TFRAC(125)=0.020833 ;TFRAC(126)=0.021
 TFRAC(127)=0.021167 ;TFRAC(128)=0.021333
 TFRAC(129)=0.0215 ;TFRAC(130)=0.021667
 TFRAC(131)=0.021833 ;TFRAC(132)=0.022
 TFRAC(133)=0.022167 ;TFRAC(134)=0.022333
 TFRAC(135)=0.0225 ;TFRAC(136)=0.022667
 TFRAC(137)=0.022833 ;TFRAC(138)=0.023
 TFRAC(139)=0.023167 ;TFRAC(140)=0.023333
 TFRAC(141)=0.0235 ;TFRAC(142)=0.023667
 TFRAC(143)=0.023833 ;TFRAC(144)=0.024
 TFRAC(145)=0.024167 ;TFRAC(146)=0.024333
 TFRAC(147)=0.0245 ;TFRAC(148)=0.024667
 TFRAC(149)=0.024833 ;TFRAC(150)=0.025
 TFRAC(151)=0.025167 ;TFRAC(152)=0.025333
 TFRAC(153)=0.0255 ;TFRAC(154)=0.025667
 TFRAC(155)=0.025833 ;TFRAC(156)=0.026
 TFRAC(157)=0.026167 ;TFRAC(158)=0.026333
 TFRAC(159)=0.0265 ;TFRAC(160)=0.026667
 TFRAC(161)=0.026833 ;TFRAC(162)=0.027
 TFRAC(163)=0.027167 ;TFRAC(164)=0.027333
 TFRAC(165)=0.0275 ;TFRAC(166)=0.027667
 TFRAC(167)=0.027833 ;TFRAC(168)=0.028
 TFRAC(169)=0.028167 ;TFRAC(170)=0.028333
 TFRAC(171)=0.0285 ;TFRAC(172)=0.028667
 TFRAC(173)=0.028833 ;TFRAC(174)=0.029
 TFRAC(175)=0.029167 ;TFRAC(176)=0.029333
 TFRAC(177)=0.0295 ;TFRAC(178)=0.029667
 TFRAC(179)=0.029833 ;TFRAC(180)=0.03
 TFRAC(181)=0.030167 ;TFRAC(182)=0.030333
 TFRAC(183)=0.0305 ;TFRAC(184)=0.030667
 TFRAC(185)=0.030833 ;TFRAC(186)=0.031
 TFRAC(187)=0.031167 ;TFRAC(188)=0.031333
 TFRAC(189)=0.0315 ;TFRAC(190)=0.031667
 TFRAC(191)=0.031833 ;TFRAC(192)=0.032
 TFRAC(193)=0.032167 ;TFRAC(194)=0.032333
 TFRAC(195)=0.0325 ;TFRAC(196)=0.032667
 TFRAC(197)=0.032833 ;TFRAC(198)=0.033
 TFRAC(199)=0.033167 ;TFRAC(200)=0.033333
 TFRAC(201)=0.0335 ;TFRAC(202)=0.033667
 TFRAC(203)=0.033833 ;TFRAC(204)=0.034
 TFRAC(205)=0.034167 ;TFRAC(206)=0.034333
 TFRAC(207)=0.0345 ;TFRAC(208)=0.034667
 TFRAC(209)=0.034833 ;TFRAC(210)=0.035
 TFRAC(211)=0.035167 ;TFRAC(212)=0.035333
 TFRAC(213)=0.0355 ;TFRAC(214)=0.035667
 TFRAC(215)=0.035833 ;TFRAC(216)=0.036
 TFRAC(217)=0.036167 ;TFRAC(218)=0.036333
 TFRAC(219)=0.0365 ;TFRAC(220)=0.036667
 TFRAC(221)=0.036833 ;TFRAC(222)=0.037
 TFRAC(223)=0.037167 ;TFRAC(224)=0.037333
 TFRAC(225)=0.0375 ;TFRAC(226)=0.037667
 TFRAC(227)=0.037833 ;TFRAC(228)=0.038
 TFRAC(229)=0.038167 ;TFRAC(230)=0.038333
 TFRAC(231)=0.0385 ;TFRAC(232)=0.038667
 TFRAC(233)=0.038833 ;TFRAC(234)=0.039
 TFRAC(235)=0.039167 ;TFRAC(236)=0.039333
 TFRAC(237)=0.0395 ;TFRAC(238)=0.039667
 TFRAC(239)=0.039833 ;TFRAC(240)=0.04
 TFRAC(241)=0.040167 ;TFRAC(242)=0.040333
 TFRAC(243)=0.0405 ;TFRAC(244)=0.040667
 TFRAC(245)=0.040833 ;TFRAC(246)=0.041
 TFRAC(247)=0.041167 ;TFRAC(248)=0.041333
 TFRAC(249)=0.0415 ;TFRAC(250)=0.041667
 TFRAC(251)=0.041833 ;TFRAC(252)=0.042
 TFRAC(253)=0.042167 ;TFRAC(254)=0.042333
 TFRAC(255)=0.0425 ;TFRAC(256)=0.042667
 TFRAC(257)=0.042833 ;TFRAC(258)=0.043
 TFRAC(259)=0.043167 ;TFRAC(260)=0.043333
 TFRAC(261)=0.0435 ;TFRAC(262)=0.043667
 TFRAC(263)=0.043833 ;TFRAC(264)=0.044
 TFRAC(265)=0.044167 ;TFRAC(266)=0.044333
 TFRAC(267)=0.0445 ;TFRAC(268)=0.044667
 TFRAC(269)=0.044833 ;TFRAC(270)=0.045
 TFRAC(271)=0.045167 ;TFRAC(272)=0.045333
 TFRAC(273)=0.0455 ;TFRAC(274)=0.045667
 TFRAC(275)=0.045833 ;TFRAC(276)=0.046
 TFRAC(277)=0.046167 ;TFRAC(278)=0.046333
 TFRAC(279)=0.0465 ;TFRAC(280)=0.046667
 TFRAC(281)=0.046833 ;TFRAC(282)=0.047
 TFRAC(283)=0.047167 ;TFRAC(284)=0.047333
 TFRAC(285)=0.0475 ;TFRAC(286)=0.047667
 TFRAC(287)=0.047833 ;TFRAC(288)=0.048
 TFRAC(289)=0.048167 ;TFRAC(290)=0.048333
 TFRAC(291)=0.0485 ;TFRAC(292)=0.048667
 TFRAC(293)=0.048833 ;TFRAC(294)=0.049
 TFRAC(295)=0.049167 ;TFRAC(296)=0.049333
 TFRAC(297)=0.0495 ;TFRAC(298)=0.049667
 TFRAC(299)=0.049833 ;TFRAC(300)=0.05
 TFRAC(301)=0.050167 ;TFRAC(302)=0.050333
 TFRAC(303)=0.0505 ;TFRAC(304)=0.050667
 TFRAC(305)=0.050833 ;TFRAC(306)=0.051
 TFRAC(307)=0.051167 ;TFRAC(308)=0.051333
 TFRAC(309)=0.0515 ;TFRAC(310)=0.051667
 TFRAC(311)=0.051833 ;TFRAC(312)=0.052
 TFRAC(313)=0.052167 ;TFRAC(314)=0.052333
 TFRAC(315)=0.0525 ;TFRAC(316)=0.052667
 TFRAC(317)=0.052833 ;TFRAC(318)=0.053
 TFRAC(319)=0.053167 ;TFRAC(320)=0.053333
 TFRAC(321)=0.0535 ;TFRAC(322)=0.053667
 TFRAC(323)=0.053833 ;TFRAC(324)=0.054
 TFRAC(325)=0.054167 ;TFRAC(326)=0.054333
 TFRAC(327)=0.0545 ;TFRAC(328)=0.054667
 TFRAC(329)=0.054833 ;TFRAC(330)=0.055
 TFRAC(331)=0.055167 ;TFRAC(332)=0.055333
 TFRAC(333)=0.0555 ;TFRAC(334)=0.055667
 TFRAC(335)=0.055833 ;TFRAC(336)=0.056
 TFRAC(337)=0.056167 ;TFRAC(338)=0.056333
 TFRAC(339)=0.0565 ;TFRAC(340)=0.056667
 TFRAC(341)=0.056833 ;TFRAC(342)=0.057
 TFRAC(343)=0.057167 ;TFRAC(344)=0.057333
 TFRAC(345)=0.0575 ;TFRAC(346)=0.057667
 TFRAC(347)=0.057833 ;TFRAC(348)=0.058
 TFRAC(349)=0.058167 ;TFRAC(350)=0.058333
 TFRAC(351)=0.0585 ;TFRAC(352)=0.058667
 TFRAC(353)=0.058833 ;TFRAC(354)=0.059
 TFRAC(355)=0.059167 ;TFRAC(356)=0.059333
 TFRAC(357)=0.0595 ;TFRAC(358)=0.059667
 TFRAC(359)=0.059833 ;TFRAC(360)=0.06
 TFRAC(361)=0.060167 ;TFRAC(362)=0.060333
 TFRAC(363)=0.0605 ;TFRAC(364)=0.060667
 TFRAC(365)=0.060833 ;TFRAC(366)=0.061
 TFRAC(367)=0.061167 ;TFRAC(368)=0.061333
 TFRAC(369)=0.0615 ;TFRAC(370)=0.061667
 TFRAC(371)=0.061833 ;TFRAC(372)=0.062
 TFRAC(373)=0.062167 ;TFRAC(374)=0.062333
 TFRAC(375)=0.0625 ;TFRAC(376)=0.062667
 TFRAC(377)=0.062833 ;TFRAC(378)=0.063
 TFRAC(379)=0.063167 ;TFRAC(380)=0.063333
 TFRAC(381)=0.0635 ;TFRAC(382)=0.063667
 TFRAC(383)=0.063833 ;TFRAC(384)=0.064
 TFRAC(385)=0.064167 ;TFRAC(386)=0.064333
 TFRAC(387)=0.0645 ;TFRAC(388)=0.064667
 TFRAC(389)=0.064833 ;TFRAC(390)=0.065
 TFRAC(391)=0.065167 ;TFRAC(392)=0.065333
 TFRAC(393)=0.0655 ;TFRAC(394)=0.065667
 TFRAC(395)=0.065833 ;TFRAC(396)=0.066
 TFRAC(397)=0.066167 ;TFRAC(398)=0.066333
 TFRAC(399)=0.0665 ;TFRAC(400)=0.066667
 TFRAC(401)=0.066833 ;TFRAC(402)=0.067
 TFRAC(403)=0.067167 ;TFRAC(404)=0.067333
 TFRAC(405)=0.0675 ;TFRAC(406)=0.067667
 TFRAC(407)=0.067833 ;TFRAC(408)=0.068
 TFRAC(409)=0.068167 ;TFRAC(410)=0.068333
 TFRAC(411)=0.0685 ;TFRAC(412)=0.068667
 TFRAC(413)=0.068833 ;TFRAC(414)=0.069
 TFRAC(415)=0.069167 ;TFRAC(416)=0.069333
 TFRAC(417)=0.0695 ;TFRAC(418)=0.069667
 TFRAC(419)=0.069833 ;TFRAC(420)=0.07
 TFRAC(421)=0.070167 ;TFRAC(422)=0.070333
 TFRAC(423)=0.0705 ;TFRAC(424)=0.070667
 TFRAC(425)=0.070833 ;TFRAC(426)=0.071
 TFRAC(427)=0.071167 ;TFRAC(428)=0.071333
 TFRAC(429)=0.0715 ;TFRAC(430)=0.071667
 TFRAC(431)=0.071833 ;TFRAC(432)=0.072
 TFRAC(433)=0.072167 ;TFRAC(434)=0.072333
 TFRAC(435)=0.0725 ;TFRAC(436)=0.072667
 TFRAC(437)=0.072833 ;TFRAC(438)=0.073
 TFRAC(439)=0.073167 ;TFRAC(440)=0.073333
 TFRAC(441)=0.0735 ;TFRAC(442)=0.073667
 TFRAC(443)=0.073833 ;TFRAC(444)=0.074
 TFRAC(445)=0.074167 ;TFRAC(446)=0.074333
 TFRAC(447)=0.0745 ;TFRAC(448)=0.074667
 TFRAC(449)=0.074833 ;TFRAC(450)=0.075
 TFRAC(451)=0.075167 ;TFRAC(452)=0.075333
 TFRAC(453)=0.0755 ;TFRAC(454)=0.075667
 TFRAC(455)=0.075833 ;TFRAC(456)=0.076
 TFRAC(457)=0.076167 ;TFRAC(458)=0.076333
 TFRAC(459)=0.0765 ;TFRAC(460)=0.076667
 TFRAC(461)=0.076833 ;TFRAC(462)=0.077
 TFRAC(463)=0.077167 ;TFRAC(464)=0.077333
 TFRAC(465)=0.0775 ;TFRAC(466)=0.077667
 TFRAC(467)=0.077833 ;TFRAC(468)=0.078
 TFRAC(469)=0.078167 ;TFRAC(470)=0.078333
 TFRAC(471)=0.0785 ;TFRAC(472)=0.078667
 TFRAC(473)=0.078833 ;TFRAC(474)=0.079
 TFRAC(475)=0.079167 ;TFRAC(476)=0.079333
 TFRAC(477)=0.0795 ;TFRAC(478)=0.079667
 TFRAC(479)=0.079833 ;TFRAC(480)=0.08
 TFRAC(481)=0.080167 ;TFRAC(482)=0.080333
 TFRAC(483)=0.0805 ;TFRAC(484)=0.080667
 TFRAC(485)=0.080833 ;TFRAC(486)=0.081
 TFRAC(487)=0.081167 ;TFRAC(488)=0.081333
 TFRAC(489)=0.0815 ;TFRAC(490)=0.081667
 TFRAC(491)=0.081833 ;TFRAC(492)=0.082
 TFRAC(493)=0.082167 ;TFRAC(494)=0.082333
 TFRAC(495)=0.0825 ;TFRAC(496)=0.082667
 TFRAC(497)=0.082833 ;TFRAC(498)=0.083
 TFRAC(499)=0.083167 ;TFRAC(500)=0.083333
 TFRAC(501)=0.0835 ;TFRAC(502)=0.083667
 TFRAC(503)=0.083833 ;TFRAC(504)=0.084
 TFRAC(505)=0.084167 ;TFRAC(506)=0.084333
 TFRAC(507)=0.0845 ;TFRAC(508)=0.084667
 TFRAC(509)=0.084833 ;TFRAC(510)=0.085
 TFRAC(511)=0.085167 ;TFRAC(512)=0.085333
 TFRAC(513)=0.0855 ;TFRAC(514)=0.085667
 TFRAC(515)=0.085833 ;TFRAC(516)=0.086
 TFRAC(517)=0.086167 ;TFRAC(518)=0.086333
 TFRAC(519)=0.0865 ;TFRAC(520)=0.086667
 TFRAC(521)=0.086833 ;TFRAC(522)=0.087
 TFRAC(523)=0.087167 ;TFRAC(524)=0.087333
 TFRAC(525)=0.0875 ;TFRAC(526)=0.087667
 TFRAC(527)=0.087833 ;TFRAC(528)=0.088
 TFRAC(529)=0.088167 ;TFRAC(530)=0.088333
 TFRAC(531)=0.0885 ;TFRAC(532)=0.088667
 TFRAC(533)=0.088833 ;TFRAC(534)=0.089
 TFRAC(535)=0.089167 ;TFRAC(536)=0.089333
 TFRAC(537)=0.0895 ;TFRAC(538)=0.089667
 TFRAC(539)=0.089833 ;TFRAC(540)=0.09
 TFRAC(541)=0.090167 ;TFRAC(542)=0.090333
 TFRAC(543)=0.0905 ;TFRAC(544)=0.090667
 TFRAC(545)=0.090833 ;TFRAC(546)=0.091
 TFRAC(547)=0.091167 ;TFRAC(548)=0.091333
 TFRAC(549)=0.0915 ;TFRAC(550)=0.091667
 TFRAC(551)=0.091833 ;TFRAC(552)=0.092
 TFRAC(553)=0.092167 ;TFRAC(554)=0.092333
 TFRAC(555)=0.0925 ;TFRAC(556)=0.092667
 TFRAC(557)=0.092833 ;TFRAC(558)=0.093
 TFRAC(559)=0.093167 ;TFRAC(560)=0.093333
 TFRAC(561)=0.0935 ;TFRAC(562)=0.093667
 TFRAC(563)=0.093833 ;TFRAC(564)=0.094
 TFRAC(565)=0.094167 ;TFRAC(566)=0.094333
 TFRAC(567)=0.0945 ;TFRAC(568)=0.094667
 TFRAC(569)=0.094833 ;TFRAC(570)=0.095
 TFRAC(571)=0.095167 ;TFRAC(572)=0.095333
 TFRAC(573)=0.0955 ;TFRAC(574)=0.095667
 TFRAC(575)=0.095833 ;TFRAC(576)=0.096
 TFRAC(577)=0.096167 ;TFRAC(578)=0.096333
 TFRAC(579)=0.0965 ;TFRAC(580)=0.096667
 TFRAC(581)=0.096833 ;TFRAC(582)=0.097
 TFRAC(583)=0.097167 ;TFRAC(584)=0.097333
 TFRAC(585)=0.0975 ;TFRAC(586)=0.097667
 TFRAC(587)=0.097833 ;TFRAC(588)=0.098
 TFRAC(589)=0.098167 ;TFRAC(590)=0.098333
 TFRAC(591)=0.0985 ;TFRAC(592)=0.098667
 TFRAC(593)=0.098833 ;TFRAC(594)=0.099
 TFRAC(595)=0.099167 ;TFRAC(596)=0.099333
 TFRAC(597)=0.0995 ;TFRAC(598)=0.099667
 TFRAC(599)=0.099833 ;TFRAC(600)=0.1
 TFRAC(601)=0.100167 ;TFRAC(602)=0.100333
 TFRAC(603)=0.1005 ;TFRAC(604)=0.100667
 TFRAC(605)=0.100833 ;TFRAC(606)=0.101
 TFRAC(607)=0.101167 ;TFRAC(608)=0.101333
 TFRAC(609)=0.1015 ;TFRAC(610)=0.101667
 TFRAC(611)=0.101833 ;TFRAC(612)=0.102
 TFRAC(613)=0.102167 ;TFRAC(614)=0.102333
 TFRAC(615)=0.1025 ;TFRAC(616)=0.102667
 TFRAC(617)=0.102833 ;TFRAC(618)=0.103
 TFRAC(619)=0.103167 ;TFRAC(620)=0.103333
 TFRAC(621)=0.1035 ;TFRAC(622)=0.103667
 TFRAC(623)=0.103833 ;TFRAC(624)=0.104
 TFRAC(625)=0.104167 ;TFRAC(626)=0.104333
 TFRAC(627)=0.1045 ;TFRAC(628)=0.104667
 TFRAC(629)=0.104833 ;TFRAC(630)=0.105
 TFRAC(631)=0.105167 ;TFRAC(632)=0.105333
 TFRAC(633)=0.1055 ;TFRAC(634)=0.105667
 TFRAC(635)=0.105833 ;TFRAC(636)=0.106
 TFRAC(637)=0.106167 ;TFRAC(638)=0.106333
 TFRAC(639)=0.1065 ;TFRAC(640)=0.106667
 TFRAC(641)=0.106833 ;TFRAC(642)=0.107
 TFRAC(643)=0.107167 ;TFRAC(644)=0.107333
 TFRAC(645)=0.1075 ;TFRAC(646)=0.107667
 TFRAC(647)=0.107833 ;TFRAC(648)=0.108
 TFRAC(649)=0.108167 ;TFRAC(650)=0.108333
 TFRAC(651)=0.1085 ;TFRAC(652)=0.108667
 TFRAC(653)=0.108833 ;TFRAC(654)=0.109
 TFRAC(655)=0.109167 ;TFRAC(656)=0.109333
 TFRAC(657)=0.1095 ;TFRAC(658)=0.109667
 TFRAC(659)=0.109833 ;TFRAC(660)=0.11
 TFRAC(661)=0.110167 ;TFRAC(662)=0.110333
 TFRAC(663)=0.1105 ;TFRAC(664)=0.110667
 TFRAC(665)=0.110833 ;TFRAC(666)=0.111
 TFRAC(667)=0.111167 ;TFRAC(668)=0.111333
 TFRAC(669)=0.1115 ;TFRAC(670)=0.111667
 TFRAC(671)=0.111833 ;TFRAC(672)=0.112
 TFRAC(673)=0.112167 ;TFRAC(674)=0.112333
 TFRAC(675)=0.1125 ;TFRAC(676)=0.112667
 TFRAC(677)=0.112833 ;TFRAC(678)=0.113
 TFRAC(679)=0.113167 ;TFRAC(680)=0.113333
 TFRAC(681)=0.1135 ;TFRAC(682)=0.113667
 TFRAC(683)=0.113833 ;TFRAC(684)=0.114
 TFRAC(685)=0.114167 ;TFRAC(686)=0.114333
 TFRAC(687)=0.1145 ;TFRAC(688)=0.114667
 TFRAC(689)=0.114833 ;TFRAC(690)=0.115
 TFRAC(691)=0.115167 ;TFRAC(692)=0.115333
 TFRAC(693)=0.1155 ;TFRAC(694)=0.115667
 TFRAC(695)=0.115833 ;TFRAC(696)=0.116
 TFRAC(697)=0.116167 ;TFRAC(698)=0.116333
 TFRAC(699)=0.1165 ;TFRAC(700)=0.116667
 TFRAC(701)=0.116833 ;TFRAC(702)=0.117
 TFRAC(703)=0.117167 ;TFRAC(704)=0.117333
 TFRAC(705)=0.1175 ;TFRAC(706)=0.117667
 TFRAC(707)=0.117833 ;TFRAC(708)=0.118
 TFRAC(709)=0.118167 ;TFRAC(710)=0.118333
 TFRAC(711)=0.1185 ;TFRAC(712)=0.118667
 TFRAC(713)=0.118833 ;TFRAC(714)=0.119
 TFRAC(715)=0.119167 ;TFRAC(716)=0.119333
 TFRAC(717)=0.1195 ;TFRAC(718)=0.119667
 TFRAC(719)=0.119833 ;TFRAC(720)=0.12
 TFRAC(721)=0.120167 ;TFRAC(722)=0.120333
 TFRAC(723)=0.1205 ;TFRAC(724)=0.120667
 TFRAC(725)=0.120833 ;TFRAC(726)=0.121
 TFRAC(727)=0.121167 ;TFRAC(728)=0.121333
 TFRAC(729)=0.1215 ;TFRAC(730)=0.121667
 TFRAC(731)=0.121833 ;TFRAC(732)=0.122
 TFRAC(733)=0.122167 ;TFRAC(734)=0.122333
 TFRAC(735)=0.1225 ;TFRAC(736)=0.122667
 TFRAC(737)=0.122833 ;TFRAC(738)=0.123
 TFRAC(739)=0.123167 ;TFRAC(740)=0.123333
 TFRAC(741)=0.1235 ;TFRAC(742)=0.123667
 TFRAC(743)=0.123833 ;TFRAC(744)=0.124
 TFRAC(745)=0.124167 ;TFRAC(746)=0.124333
 TFRAC(747)=0.1245 ;TFRAC(748)=0.124667
 TFRAC(749)=0.124833 ;TFRAC(750)=0.125
 TFRAC(751)=0.125167 ;TFRAC(752)=0.125333
 TFRAC(753)=0.1255 ;TFRAC(754)=0.125667
 TFRAC(755)=0.125833 ;TFRAC(756)=0.126
 TFRAC(757)=0.126167 ;TFRAC(758)=0.126333
 TFRAC(759)=0.1265 ;TFRAC(760)=0.126667
 TFRAC(761)=0.126833 ;TFRAC(762)=0.127
 TFRAC(763)=0.127167 ;TFRAC(764)=0.127333
 TFRAC(765)=0.1275 ;TFRAC(766)=0.127667
 TFRAC(767)=0.127833 ;TFRAC(768)=0.128
 TFRAC(769)=0.128167 ;TFRAC(770)=0.128333
 TFRAC(771)=0.1285 ;TFRAC(772)=0.128667
 TFRAC(773)=0.128833 ;TFRAC(774)=0.129
 TFRAC(775)=0.129167 ;TFRAC(776)=0.129333
 TFRAC(777)=0.1295 ;TFRAC(778)=0.129667
 TFRAC(779)=0.129833 ;TFRAC(780)=0.13
 TFRAC(781)=0.130167 ;TFRAC(782)=0.130333
 TFRAC(783)=0.1305 ;TFRAC(784)=0.130667
 TFRAC(785)=0.130833 ;TFRAC(786)=0.131
 TFRAC(787)=0.131167 ;TFRAC(788)=0.131333
 TFRAC(789)=0.1315 ;TFRAC(790)=0.131667
 TFRAC(791)=0.131833 ;TFRAC(792)=0.132
 TFRAC(793)=0.132167 ;TFRAC(794)=0.132333
 TFRAC(795)=0.1325 ;TFRAC(796)=0.132667
 TFRAC(797)=0.132833 ;TFRAC(798)=0.133
 TFRAC(799)=0.133167 ;TFRAC(800)=0.133333
 TFRAC(801)=0.1335 ;TFRAC(802)=0.133667
 TFRAC(803)=0.133833 ;TFRAC(804)=0.134
 TFRAC(805)=0.134167 ;TFRAC(806)=0.134333
 TFRAC(807)=0.1345 ;TFRAC(808)=0.134667
 TFRAC(809)=0.134833 ;TFRAC(810)=0.135
 TFRAC(811)=0.135167 ;TFRAC(812)=0.135333
 TFRAC(813)=0.1355 ;TFRAC(814)=0.135667
 TFRAC(815)=0.135833 ;TFRAC(816)=0.136
 TFRAC(817)=0.136167 ;TFRAC(818)=0.136333
 TFRAC(819)=0.1365 ;TFRAC(820)=0.136667
 TFRAC(821)=0.136833 ;TFRAC(822)=0.137
 TFRAC(823)=0.137167 ;TFRAC(824)=0.137333
 TFRAC(825)=0.1375 ;TFRAC(826)=0.137667
 TFRAC(827)=0.137833 ;TFRAC(828)=0.138
 TFRAC(829)=0.138167 ;TFRAC(830)=0.138333
 TFRAC(831)=0.1385 ;TFRAC(832)=0.138667
 TFRAC(833)=0.138833 ;TFRAC(834)=0.139
 TFRAC(835)=0.139167 ;TFRAC(836)=0.139333
 TFRAC(837)=0.1395 ;TFRAC(838)=0.139667
 TFRAC(839)=0.139833 ;TFRAC(840)=0.14
 TFRAC(841)=0.140167 ;TFRAC(842)=0.140333
 TFRAC(843)=0.1405 ;TFRAC(844)=0.140667
 TFRAC(845)=0.140833 ;TFRAC(846)=0.141
 TFRAC(847)=0.141167 ;TFRAC(848)=0.141333
 TFRAC(849)=0.1415 ;TFRAC(850)=0.141667
 TFRAC(851)=0.141833 ;TFRAC(852)=0.142
 TFRAC(853)=0.142167 ;TFRAC(854)=0.142333
 TFRAC(855)=0.1425 ;TFRAC(856)=0.142667
 TFRAC(857)=0.142833 ;TFRAC(858)=0.143
 TFRAC(859)=0.143167 ;TFRAC(860)=0.143333
 TFRAC(861)=0.1435 ;TFRAC(862)=0.143667
 TFRAC(863)=0.143833 ;TFRAC(864)=0.144
 TFRAC(865)=0.144167 ;TFRAC(866)=0.144333
 TFRAC(867)=0.1445 ;TFRAC(868)=0.144667
 TFRAC(869)=0.144833 ;TFRAC(870)=0.145
 TFRAC(871)=0.145167 ;TFRAC(872)=0.145333
 TFRAC(873)=0.1455 ;TFRAC(874)=0.145667
 TFRAC(875)=0.145833 ;TFRAC(876)=0.146
 TFRAC(877)=0.146167 ;TFRAC(878)=0.146333
 TFRAC(879)=0.1465 ;TFRAC(880)=0.146667
 TFRAC(881)=0.146833 ;TFRAC(882)=0.147
 TFRAC(883)=0.147167 ;TFRAC(884)=0.147333
 TFRAC(885)=0.1475 ;TFRAC(886)=0.147667
 TFRAC(887)=0.147833 ;TFRAC(888)=0.148
 TFRAC(889)=0.148167 ;TFRAC(890)=0.148333
 TFRAC(891)=0.1485 ;TFRAC(892)=0.148667
 TFRAC(893)=0.148833 ;TFRAC(894)=0.149
 TFRAC(895)=0.149167 ;TFRAC(896)=0.149333
 TFRAC(897)=0.1495 ;TFRAC(898)=0.149667
 TFRAC(899)=0.149833 ;TFRAC(900)=0.15
 TFRAC(901)=0.150167 ;TFRAC(902)=0.150333
 TFRAC(903)=0.1505 ;TFRAC(904)=0.150667
 TFRAC(905)=0.150833 ;TFRAC(906)=0.151
 TFRAC(907)=0.151167 ;TFRAC(908)=0.151333
 TFRAC(909)=0.1515 ;TFRAC(910)=0.151667
 TFRAC(911)=0.151833 ;TFRAC(912)=0.152
 TFRAC(913)=0.152167 ;TFRAC(914)=0.152333
 TFRAC(915)=0.1525 ;TFRAC(916)=0.152667
 TFRAC(917)=0.152833 ;TFRAC(918)=0.153
 TFRAC(919)=0.153167 ;TFRAC(920)=0.153333
 TFRAC(921)=0.1535 ;TFRAC(922)=0.153667
 TFRAC(923)=0.153833 ;TFRAC(924)=0.154
 TFRAC(925)=0.154167 ;TFRAC(926)=0.154333
 TFRAC(927)=0.1545 ;TFRAC(928)=0.154667
 TFRAC(929)=0.154833 ;TFRAC(930)=0.155
 TFRAC(931)=0.155167 ;TFRAC(932)=0.155333
 TFRAC(933)=0.1555 ;TFRAC(934)=0.155667
 TFRAC(935)=0.155833 ;TFRAC(936)=0.156
 TFRAC(937)=0.156167 ;TFRAC(938)=0.156333
 TFRAC(939)=0.1565 ;TFRAC(940)=0.156667
 TFRAC(941)=0.156833 ;TFRAC(942)=0.157
 TFRAC(943)=0.157167 ;TFRAC(944)=0.157333
 TFRAC(945)=0.1575 ;TFRAC(946)=0.157667
 TFRAC(947)=0.157833 ;TFRAC(948)=0.158
 TFRAC(949)=0.158167 ;TFRAC(950)=0.158333
 TFRAC(951)=0.1585 ;TFRAC(952)=0.158667
 TFRAC(953)=0.158833 ;TFRAC(954)=0.159
 TFRAC(955)=0.159167 ;TFRAC(956)=0.159333
 TFRAC(957)=0.1595 ;TFRAC(958)=0.159667
 TFRAC(959)=0.159833 ;TFRAC(960)=0.16
 TFRAC(961)=0.160167 ;TFRAC(962)=0.160333
 TFRAC(963)=0.1605 ;TFRAC(964)=0.160667
 TFRAC(965)=0.160833 ;TFRAC(966)=0.161
 TFRAC(967)=0.161167 ;TFRAC(968)=0.161333
 TFRAC(969)=0.1615 ;TFRAC(970)=0.161667
 TFRAC(971)=0.161833 ;TFRAC(972)=0.162
 TFRAC(973)=0.162167 ;TFRAC(974)=0.162333
 TFRAC(975)=0.1625 ;TFRAC(976)=0.162667
 TFRAC(977)=0.162833 ;TFRAC(978)=0.163
 TFRAC(979)=0.163167 ;TFRAC(980)=0.163333
 TFRAC(981)=0.1635 ;TFRAC(982)=0.163667
 TFRAC(983)=0.163833 ;TFRAC(984)=0.164
 TFRAC(985)=0.164167 ;TFRAC(986)=0.164333
 TFRAC(987)=0.1645 ;TFRAC(988)=0.164667
 TFRAC(989)=0.164833 ;TFRAC(990)=0.165
 TFRAC(991)=0.165167 ;TFRAC(992)=0.165333
 TFRAC(993)=0.1655 ;TFRAC(994)=0.165667
 TFRAC(995)=0.165833 ;TFRAC(996)=0.166
 TFRAC(997)=0.166167 ;TFRAC(998)=0.166333
 TFRAC(999)=0.1665 ;TFRAC(1000)=0.166667
 TFRAC(1001)=0.166833 ;TFRAC(1002)=0.167
 TFRAC(1003)=0.167167 ;TFRAC(1004)=0.167333
 TFRAC(1005)=0.1675 ;TFRAC(1006)=0.167667
 TFRAC(1007)=0.167833 ;TFRAC(1008)=0.168
 TFRAC(1009)=0.168167 ;TFRAC(1010)=0.168333
 TFRAC(1011)=0.1685 ;TFRAC(1012)=0.168667
 TFRAC(1013)=0.168833 ;TFRAC(1014)=0.169
 TFRAC(1015)=0.169167 ;TFRAC(1016)=0.169333
 TFRAC(1017)=0.1695 ;TFRAC(1018)=0.169667
 TFRAC(1019)=0.169833 ;TFRAC(1020)=0.17
 TFRAC(1021)=0.170167 ;TFRAC(1022)=0.170333
 TFRAC(1023)=0.1705 ;TFRAC(1024)=0.170667
 TFRAC(1025)=0.170833 ;TFRAC(1026)=0.171
 TFRAC(1027)=0.171167 ;TFRAC(1028)=0.171333
 TFRAC(1029)=0.1715 ;TFRAC(1030)=0.171667
 TFRAC(1031)=0.171833 ;TFRAC(1032)=0.172
 TFRAC(1033)=0.172167 ;TFRAC(1034)=0.172333
 TFRAC(1035)=0.1725 ;TFRAC(1036)=0.172667
 TFRAC(1037)=0.172833 ;TFRAC(1038)=0.173
 TFRAC(1039)=0.173167 ;TFRAC(1040)=0.173333
 TFRAC(1041)=0.1735 ;TFRAC(1042)=0.173667
 TFRAC(1043)=0.173833 ;TFRAC(1044)=0.174
 TFRAC(1045)=0.174167 ;TFRAC(1046)=0.174333
 TFRAC(1047)=0.1745 ;TFRAC(1048)=0.174667
 TFRAC(1049)=0.174833 ;TFRAC(1050)=0.175
 TFRAC(1051)=0.175167 ;TFRAC(1052)=0.175333
 TFRAC(1053)=0.1755 ;TFRAC(1054)=0.175667
 TFRAC(1055)=0.175833 ;TFRAC(1056)=0.176
 TFRAC(1057)=0.176167 ;TFRAC(1058)=0.176333
 TFRAC(1059)=0.1765 ;TFRAC(1060)=0.176667
 TFRAC(1061)=0.176833 ;TFRAC(1062)=0.177
 TFRAC(1063)=0.177167 ;TFRAC(1064)=0.177333
 TFRAC(1065)=0.1775 ;TFRAC(1066)=0.177667
 TFRAC(1067)=0.177833 ;TFRAC(1068)=0.178
 TFRAC(1069)=0.178167 ;TFRAC(1070)=0.178333
 TFRAC(1071)=0.1785 ;TFRAC(1072)=0.178667
 TFRAC(1073)=0.178833 ;TFRAC(1074)=0.179
 TFRAC(1075)=0.179167 ;TFRAC(1076)=0.179333
 TFRAC(1077)=0.1795 ;TFRAC(1078)=0.179667
 TFRAC(1079)=0.179833 ;TFRAC(1080)=0.18
 TFRAC(1081)=0.180167 ;TFRAC(1082)=0.180333
 TFRAC(1083)=0.1805 ;TFRAC(1084)=0.180667
 TFRAC(1085)=0.180833 ;TFRAC(1086)=0.181
 TFRAC(1087)=0.181167 ;TFRAC(1088)=0.181333
 TFRAC(1089)=0.1815 ;TFRAC(1090)=0.181667
 TFRAC(1091)=0.181833 ;TFRAC(1092)=0.182
 TFRAC(1093)=0.182167 ;TFRAC(1094)=0.182333
 TFRAC(1095)=0.1825 ;TFRAC(1096)=0.182667
 TFRAC(1097)=0.182833 ;TFRAC(1098)=0.183
 TFRAC(1099)=0.183167 ;TFRAC(1100)=0.183333
 TFRAC(1101)=0.1835 ;TFRAC(1102)=0.183667
 TFRAC(1103)=0.183833 ;TFRAC(1104)=0.184
 TFRAC(1105)=0.184167 ;TFRAC(1106)=0.184333
 TFRAC(1107)=0.1845 ;TFRAC(1108)=0.184667
 TFRAC(1109)=0.184833 ;TFRAC(1110)=0.185
 TFRAC(1111)=0.185167 ;TFRAC(1112)=0.185333
 TFRAC(1113)=0.1855 ;TFRAC(1114)=0.185667
 TFRAC(1115)=0.185833 ;TFRAC(1116)=0.186
 TFRAC(1117)=0.186167 ;TFRAC(1118)=0.186333
 TFRAC(1119)=0.1865 ;TFRAC(1120)=0.186667
 TFRAC(1121)=0.186833 ;TFRAC(1122)=0.187
 TFRAC(1123)=0.187167 ;TFRAC(1124)=0.187333
 TFRAC(1125)=0.1875 ;TFRAC(1126)=0.187667
 TFRAC(1127)=0.187833 ;TFRAC(1128)=0.188
 TFRAC(1129)=0.188167 ;TFRAC(1130)=0.188333
 TFRAC(1131)=0.1885 ;TFRAC(1132)=0.188667
 TFRAC(1133)=0.188833 ;TFRAC(1134)=0.189
 TFRAC(1135)=0.189167 ;TFRAC(1136)=0.189333
 TFRAC(1137)=0.1895 ;TFRAC(1138)=0.189667
 TFRAC(1139)=0.189833 ;TFRAC(1140)=0.19
 TFRAC(1141)=0.190167 ;TFRAC(1142)=0.190333
 TFRAC(1143)=0.1905 ;TFRAC(1144)=0.190667
 TFRAC(1145)=0.190833 ;TFRAC(1146)=0.191
 TFRAC(1147)=0.191167 ;TFRAC(1148)=0.191333
 TFRAC(1149)=0.1915 ;TFRAC(1150)=0.191667
 TFRAC(1151)=0.191833 ;TFRAC(1152)=0.192
 TFRAC(1153)=0.192167 ;TFRAC(1154)=0.192333
 TFRAC(1155)=0.1925 ;TFRAC(1156)=0.192667
 TFRAC(1157)=0.192833 ;TFRAC(1158)=0.193
 TFRAC(1159)=0.193167 ;TFRAC(1160)=0.193333
 TFRAC(1161)=0.1935 ;TFRAC(1162)=0.193667
 TFRAC(1163)=0.193833 ;TFRAC(1164)=0.194
 TFRAC(1165)=0.194167 ;TFRAC(1166)=0.194333
 TFRAC(1167)=0.1945 ;TFRAC(1168)=0.194667
 TFRAC(1169)=0.194833 ;TFRAC(1170)=0.195
 TFRAC(1171)=0.195167 ;TFRAC(1172)=0.195333
 TFRAC(1173)=0.1955 ;TFRAC(1174)=0.195667
 TFRAC(1175)=0.195833 ;TFRAC(1176)=0.196
 TFRAC(1177)=0.196167 ;TFRAC(1178)=0.196333
 TFRAC(1179)=0.1965 ;TFRAC(1180)=0.196667
 TFRAC(1181)=0.196833 ;TFRAC(1182)=0.197
 TFRAC(1183)=0.197167 ;TFRAC(1184)=0.197333
 TFRAC(1185)=0.1975 ;TFRAC(1186)=0.197667
 TFRAC(1187)=0.197833 ;TFRAC(1188)=0.198
 TFRAC(1189)=0.198167 ;TFRAC(1190)=0.198333
 TFRAC(1191)=0.1985 ;TFRAC(1192)=0.198667
 TFRAC(1193)=0.198833 ;TFRAC(1194)=0.199
 TFRAC(1195)=0.199167 ;TFRAC(1196)=0.199333
 TFRAC(1197)=0.1995 ;TFRAC(1198)=0.199667
 TFRAC(1199)=0.199833 ;TFRAC(1200)=0.2
 TFRAC(1201)=0.200167 ;TFRAC(1202)=0.200333
 TFRAC(1203)=0.2005 ;TFRAC(1204)=0.200667
 TFRAC(1205)=0.200833 ;TFRAC(1206)=0.201
 TFRAC(1207)=0.201167 ;TFRAC(1208)=0.201333
 TFRAC(1209)=0.2015 ;TFRAC(1210)=0.201667
 TFRAC(1211)=0.201833 ;TFRAC(1212)=0.202
 TFRAC(1213)=0.202167 ;TFRAC(1214)=0.202333
 TFRAC(1215)=0.2025 ;TFRAC(1216)=0.202667
 TFRAC(1217)=0.202833 ;TFRAC(1218)=0.203
 TFRAC(1219)=0.203167 ;TFRAC(1220)=0.203333
 TFRAC(1221)=0.2035 ;TFRAC(1222)=0.203667
 TFRAC(1223)=0.203833 ;TFRAC(1224)=0.204
 TFRAC(1225)=0.204167 ;TFRAC(1226)=0.204333
 TFRAC(1227)=0.2045 ;TFRAC(1228)=0.204667
 TFRAC(1229)=0.204833 ;TFRAC(1230)=0.205
 TFRAC(1231)=0.205167 ;TFRAC(1232)=0.205333
 TFRAC(1233)=0.2055 ;TFRAC(1234)=0.205667
 TFRAC(1235)=0.205833 ;TFRAC(1236)=0.206
 TFRAC(1237)=0.206167 ;TFRAC(1238)=0.206333
 TFRAC(1239)=0.2065 ;TFRAC(1240)=0.206667
 TFRAC(1241)=0.206833 ;TFRAC(1242)=0.207
 TFRAC(1243)=0.207167 ;TFRAC(1244)=0.207333
 TFRAC(1245)=0.2075 ;TFRAC(1246)=0.207667
 TFRAC(1247)=0.207833 ;TFRAC(1248)=0.208
 TFRAC(1249)=0.208167 ;TFRAC(1250)=0.208333
 TFRAC(1251)=0.2085 ;TFRAC(1252)=0.208667
 TFRAC(1253)=0.208833 ;TFRAC(1254)=0.209
 TFRAC(1255)=0.209167 ;TFRAC(1256)=0.209333
 TFRAC(1257)=0.2095 ;TFRAC(1258)=0.209667
 TFRAC(1259)=0.209833 ;TFRAC(1260)=0.21
 TFRAC(1261)=0.210167 ;TFRAC(1262)=0.210333
 TFRAC(1263)=0.2105 ;TFRAC(1264)=0.210667
 TFRAC(1265)=0.210833 ;TFRAC(1266)=0.211
 TFRAC(1267)=0.211167 ;TFRAC(1268)=0.211333
 TFRAC(1269)=0.2115 ;TFRAC(1270)=0.211667
 TFRAC(1271)=0.211833 ;TFRAC(1272)=0.212
 TFRAC(1273)=0.212167 ;TFRAC(1274)=0.212333
 TFRAC(1275)=0.2125 ;TFRAC(1276)=0.212667
 TFRAC(1277)=0.212833 ;TFRAC(1278)=0.213
 TFRAC(1279)=0.213167 ;TFRAC(1280)=0.213333
 TFRAC(1281)=0.2135 ;TFRAC(1282)=0.213667
 TFRAC(1283)=0.213833 ;TFRAC(1284)=0.214
 TFRAC(1285)=0.214167 ;TFRAC(1286)=0.214333
 TFRAC(1287)=0.2145 ;TFRAC(1288)=0.214667
 TFRAC(1289)=0.214833 ;TFRAC(1290)=0.215
 TFRAC(1291)=0.215167 ;TFRAC(1292)=0.215333
 TFRAC(1293)=0.2155 ;TFRAC(1294)=0.215667
 TFRAC(1295)=0.215833 ;TFRAC(1296)=0.216
 TFRAC(1297)=0.216167 ;TFRAC(1298)=0.216333
 TFRAC(1299)=0.2165 ;TFRAC(1300)=0.216667
 TFRAC(1301)=0.216833 ;TFRAC(1302)=0.217
 TFRAC(1303)=0.217167 ;TFRAC(1304)=0.217333
 TFRAC(1305)=0.2175 ;TFRAC(1306)=0.217667
 TFRAC(1307)=0.217833 ;TFRAC(1308)=0.218
 TFRAC(1309)=0.218167 ;TFRAC(1310)=0.218333
 TFRAC(1311)=0.2185 ;TFRAC(1312)=0.218667
 TFRAC(1313)=0.218833 ;TFRAC(1314)=0.219
 TFRAC(1315)=0.219167 ;TFRAC(1316)=0.219333
 TFRAC(1317)=0.2195 ;TFRAC(1318)=0.219667
 TFRAC(1319)=0.219833 ;TFRAC(1320)=0.22
 TFRAC(1321)=0.220167 ;TFRAC(1322)=0.220333
 TFRAC(1323)=0.2205 ;TFRAC(1324)=0.220667
 TFRAC(1325)=0.220833 ;TFRAC(1326)=0.221
 TFRAC(1327)=0.221167 ;TFRAC(1328)=0.221333
 TFRAC(1329)=0.2215 ;TFRAC(1330)=0.221667
 TFRAC(1331)=0.221833 ;TFRAC(1332)=0.222
 TFRAC(1333)=0.222167 ;TFRAC(1334)=0.222333
 TFRAC(1335)=0.2225 ;TFRAC(1336)=0.222667
 TFRAC(1337)=0.222833 ;TFRAC(1338)=0.223
 TFRAC(1339)=0.223167 ;TFRAC(1340)=0.223333
 TFRAC(1341)=0.2235 ;TFRAC(1342)=0.223667
 TFRAC(1343)=0.223833 ;TFRAC(1344)=0.224
 TFRAC(1345)=0.224167 ;TFRAC(1346)=0.224333
 TFRAC(1347)=0.2245 ;TFRAC(1348)=0.224667
 TFRAC(1349)=0.224833 ;TFRAC(1350)=0.225
 TFRAC(1351)=0.225167 ;TFRAC(1352)=0.225333
 TFRAC(1353)=0.2255 ;TFRAC(1354)=0.225667
 TFRAC(1355)=0.225833 ;TFRAC(1356)=0.226
 TFRAC(1357)=0.226167 ;TFRAC(1358)=0.226333
 TFRAC(1359)=0.2265 ;TFRAC(1360)=0.226667
 TFRAC(1361)=0.226833 ;TFRAC(1362)=0.227
 TFRAC(1363)=0.227167 ;TFRAC(1364)=0.227333
 TFRAC(1365)=0.2275 ;TFRAC(1366)=0.227667
 TFRAC(1367)=0.227833 ;TFRAC(1368)=0.228
 TFRAC(1369)=0.228167 ;TFRAC(1370)=0.228333
 TFRAC(1371)=0.2285 ;TFRAC(1372)=0.228667
 TFRAC(1373)=0.228833 ;TFRAC(1374)=0.229
 TFRAC(1375)=0.229167 ;TFRAC(1376)=0.229333
 TFRAC(1377)=0.2295 ;TFRAC(1378)=0.229667
 TFRAC(1379)=0.229833 ;TFRAC(1380)=0.23
 TFRAC(1381)=0.230167 ;TFRAC(1382)=0.230333
 TFRAC(1383)=0.2305 ;TFRAC(1384)=0.230667
 TFRAC(1385)=0.230833 ;TFRAC(1386)=0.231
 TFRAC(1387)=0.231167 ;TFRAC(1388)=0.231333
 TFRAC(1389)=0.2315 ;TFRAC(1390)=0.231667
 TFRAC(1391)=0.231833 ;TFRAC(1392)=0.232
 TFRAC(1393)=0.232167 ;TFRAC(1394)=0.232333
 TFRAC(1395)=0.2325 ;TFRAC(1396)=0.232667
 TFRAC(1397)=0.232833 ;TFRAC(1398)=0.233
 TFRAC(1399)=0.233167 ;TFRAC(1400)=0.233333
 TFRAC(1401)=0.2335 ;TFRAC(1402)=0.233667
 TFRAC(1403)=0.233833 ;TFRAC(1404)=0.234
 TFRAC(1405)=0.234167 ;TFRAC(1406)=0.234333
 TFRAC(1407)=0.2345 ;TFRAC(1408)=0.234667
 TFRAC(1409)=0.234833 ;TFRAC(1410)=0.235
 TFRAC(1411)=0.235167 ;TFRAC(1412)=0.235333
 TFRAC(1413)=0.2355 ;TFRAC(1414)=0.235667
 TFRAC(1415)=0.235833 ;TFRAC(1416)=0.236
 TFRAC(1417)=0.236167 ;TFRAC(1418)=0.236333
 TFRAC(1419)=0.2365 ;TFRAC(1420)=0.236667
 TFRAC(1421)=0.236833 ;TFRAC(1422)=0.237
 TFRAC(1423)=0.237167 ;TFRAC(1424)=0.237333
 TFRAC(1425)=0.2375 ;TFRAC(1426)=0.237667
 TFRAC(1427)=0.237833 ;TFRAC(1428)=0.238
 TFRAC(1429)=0.238167 ;TFRAC(1430)=0.238333
 TFRAC(1431)=0.2385 ;TFRAC(1432)=0.238667
 TFRAC(1433)=0.238833 ;TFRAC(1434)=0.239
 TFRAC(1435)=0.239167 ;TFRAC(1436)=0.239333
 TFRAC(1437)=0.2395 ;TFRAC(1438)=0.239667
 TFRAC(1439)=0.239833 ;TFRAC(1440)=0.24
 TFRAC(1441)=0.240167 ;TFRAC(1442)=0.240333
 TFRAC(1443)=0.2405 ;TFRAC(1444)=0.240667
 TFRAC(1445)=0.240833 ;TFRAC(1446)=0.241
 TFRAC(1447)=0.241167 ;TFRAC(1448)=0.241333
 TFRAC(1449)=0.2415 ;TFRAC(1450)=0.241667
 TFRAC(1451)=0.241833 ;TFRAC(1452)=0.242
 TFRAC(1453)=0.242167 ;TFRAC(1454)=0.242333
 TFRAC(1455)=0.2425 ;TFRAC(1456)=0.242667
 TFRAC(1457)=0.242833 ;TFRAC(1458)=0.243
 TFRAC(1459)=0.243167 ;TFRAC(1460)=0.243333
 TFRAC(1461)=0.2435 ;TFRAC(1462)=0.243667
 TFRAC(1463)=0.243833 ;TFRAC(1464)=0.244
 TFRAC(1465)=0.244167 ;TFRAC(1466)=0.244333
 TFRAC(1467)=0.2445 ;TFRAC(1468)=0.244667
 TFRAC(1469)=0.244833 ;TFRAC(1470)=0.245
 TFRAC(1471)=0.245167 ;TFRAC(1472)=0.245333
 TFRAC(1473)=0.2455 ;TFRAC(1474)=0.245667
 TFRAC(1475)=0.245833 ;TFRAC(1476)=0.246
 TFRAC(1477)=0.246167 ;TFRAC(1478)=0.246333
 TFRAC(1479)=0.2465 ;TFRAC(1480)=0.246667
 TFRAC(1481)=0.246833 ;TFRAC(1482)=0.247
 TFRAC(1483)=0.247167 ;TFRAC(1484)=0.247333
 TFRAC(1485)=0.2475 ;TFRAC(1486)=0.247667
 TFRAC(1487)=0.247833 ;TFRAC(1488)=0.248
 TFRAC(1489)=0.248167 ;TFRAC(1490)=0.248333
 TFRAC(1491)=0.2485 ;TFRAC(1492)=0.248667
 TFRAC(1493)=0.248833 ;TFRAC(1494)=0.249
 TFRAC(1495)=0.249167 ;TFRAC(1496)=0.249333
 TFRAC(1497)=0.2495 ;TFRAC(1498)=0.249667
 TFRAC(1499)=0.249833 ;TFRAC(1500)=0.25
 TFRAC(1501)=0.250167 ;TFRAC(1502)=0.250333
 TFRAC(1503)=0.2505 ;TFRAC(1504)=0.250667
 TFRAC(1505)=0.250833 ;TFRAC(1506)=0.251
 TFRAC(1507)=0.251167 ;TFRAC(1508)=0.251333
 TFRAC(1509)=0.2515 ;TFRAC(1510)=0.251667
 TFRAC(1511)=0.251833 ;TFRAC(1512)=0.252
 TFRAC(1513)=0.252167 ;TFRAC(1514)=0.252333
 TFRAC(1515)=0.2525 ;TFRAC(1516)=0.252667
 TFRAC(1517)=0.252833 ;TFRAC(1518)=0.253
 TFRAC(1519)=0.253167 ;TFRAC(1520)=0.253333
 TFRAC(1521)=0.2535 ;TFRAC(1522)=0.253667
 TFRAC(1523)=0.253833 ;TFRAC(1524)=0.254
 TFRAC(1525)=0.254167 ;TFRAC(1526)=0.254333
 TFRAC(1527)=0.2545 ;TFRAC(1528)=0.254667
 TFRAC(1529)=0.254833 ;TFRAC(1530)=0.255
 TFRAC(1531)=0.255167 ;TFRAC(1532)=0.255333
 TFRAC(1533)=0.2555 ;TFRAC(1534)=0.255667
 TFRAC(1535)=0.255833 ;TFRAC(1536)=0.256
 TFRAC(1537)=0.256167 ;TFRAC(1538)=0.256333
 TFRAC(1539)=0.2565 ;TFRAC(1540)=0.256667
 TFRAC(1541)=0.256833 ;TFRAC(1542)=0.257
 TFRAC(1543)=0.257167 ;TFRAC(1544)=0.257333
 TFRAC(1545)=0.2575 ;TFRAC(1546)=0.257667
 TFRAC(1547)=0.257833 ;TFRAC(1548)=0.258
 TFRAC(1549)=0.258167 ;TFRAC(1550)=0.258333
 TFRAC(1551)=0.2585 ;TFRAC(1552)=0.258667
 TFRAC(1553)=0.258833 ;TFRAC(1554)=0.259
 TFRAC(1555)=0.259167 ;TFRAC(1556)=0.259333
 TFRAC(1557)=0.2595 ;TFRAC(1558)=0.259667
 TFRAC(1559)=0.259833 ;TFRAC(1560)=0.26
 TFRAC(1561)=0.260167 ;TFRAC(1562)=0.260333
 TFRAC(1563)=0.2605 ;TFRAC(1564)=0.260667
 TFRAC(1565)=0.260833 ;TFRAC(1566)=0.261
 TFRAC(1567)=0.261167 ;TFRAC(1568)=0.261333
 TFRAC(1569)=0.2615 ;TFRAC(1570)=0.261667
 TFRAC(1571)=0.261833 ;TFRAC(1572)=0.262
 TFRAC(1573)=0.262167 ;TFRAC(1574)=0.262333
 TFRAC(1575)=0.2625 ;TFRAC(1576)=0.262667
 TFRAC(1577)=0.262833 ;TFRAC(1578)=0.263
 TFRAC(1579)=0.263167 ;TFRAC(1580)=0.263333
 TFRAC(1581)=0.2635 ;TFRAC(1582)=0.263667
 TFRAC(1583)=0.263833 ;TFRAC(1584)=0.264
 TFRAC(1585)=0.264167 ;TFRAC(1586)=0.264333
 TFRAC(1587)=0.2645 ;TFRAC(1588)=0.264667
 TFRAC(1589)=0.264833 ;TFRAC(1590)=0.265
 TFRAC(1591)=0.265167 ;TFRAC(1592)=0.265333
 TFRAC(1593)=0.2655 ;TFRAC(1594)=0.265667
 TFRAC(1595)=0.265833 ;TFRAC(1596)=0.266
 TFRAC(1597)=0.266167 ;TFRAC(1598)=0.266333
 TFRAC(1599)=0.2665 ;TFRAC(1600)=0.266667
 TFRAC(1601)=0.266833 ;TFRAC(1602)=0.267
 TFRAC(1603)=0.267167 ;TFRAC(1604)=0.267333
 TFRAC(1605)=0.2675 ;TFRAC(1606)=0.267667
 TFRAC(1607)=0.267833 ;TFRAC(1608)=0.268
 TFRAC(1609)=0.268167 ;TFRAC(1610)=0.268333
 TFRAC(1611)=0.2685 ;TFRAC(1612)=0.268667
 TFRAC(1613)=0.268833 ;TFRAC(1614)=0.269
 TFRAC(1615)=0.269167 ;TFRAC(1616)=0.269333
 TFRAC(1617)=0.2695 ;TFRAC(1618)=0.269667
 TFRAC(1619)=0.269833 ;TFRAC(1620)=0.27
 TFRAC(1621)=0.270167 ;TFRAC(1622)=0.270333
 TFRAC(1623)=0.2705 ;TFRAC(1624)=0.270667
 TFRAC(1625)=0.270833 ;TFRAC(1626)=0.271
 TFRAC(1627)=0.271167 ;TFRAC(1628)=0.271333
 TFRAC(1629)=0.2715 ;TFRAC(1630)=0.271667
 TFRAC(1631)=0.271833 ;TFRAC(1632)=0.272
 TFRAC(1633)=0.272167 ;TFRAC(1634)=0.272333
 TFRAC(1635)=0.2725 ;TFRAC(1636)=0.272667
 TFRAC(1637)=0.272833 ;TFRAC(1638)=0.273
 TFRAC(1639)=0.273167 ;TFRAC(1640)=0.273333
 TFRAC(1641)=0.2735 ;TFRAC(1642)=0.273667
 TFRAC(1643)=0.273833 ;TFRAC(1644)=0.274
 TFRAC(1645)=0.274167 ;TFRAC(1646)=0.274333
 TFRAC(1647)=0.2745 ;TFRAC(1648)=0.274667
 TFRAC(1649)=0.274833 ;TFRAC(1650)=0.275
 TFRAC(1651)=0.275167 ;TFRAC(1652)=0.275333
 TFRAC(1653)=0.2755 ;TFRAC(1654)=0.275667
 TFRAC(1655)=0.275833 ;TFRAC(1656)=0.276
 TFRAC(1657)=0.276167 ;TFRAC(1658)=0.276333
 TFRAC(1659)=0.2765 ;TFRAC(1660)=0.276667
 TFRAC(1661)=0.276833 ;TFRAC(1662)=0.277
 TFRAC(1663)=0.277167 ;TFRAC(1664)=0.277333
 TFRAC(1665)=0.2775 ;TFRAC(1666)=0.277667
 TFRAC(1667)=0.277833 ;TFRAC(1668)=0.278
 TFRAC(1669)=0.278167 ;TFRAC(1670)=0.278333
 TFRAC(1671)=0.2785 ;TFRAC(1672)=0.278667
 TFRAC(1673)=0.278833 ;TFRAC(1674)=0.279
 TFRAC(1675)=0.279167 ;TFRAC(1676)=0.279333
 TFRAC(1677)=0.2795 ;TFRAC(1678)=0.279667
 TFRAC(1679)=0.279833 ;TFRAC(1680)=0.28
 TFRAC(1681)=0.280167 ;TFRAC(1682)=0.280333
 TFRAC(1683)=0.2805 ;TFRAC(1684)=0.280667
 TFRAC(1685)=0.280833 ;TFRAC(1686)=0.281
 TFRAC(1687)=0.281167 ;TFRAC(1688)=0.281333
 TFRAC(1689)=0.2815 ;TFRAC(1690)=0.281667
 TFRAC(1691)=0.281833 ;TFRAC(1692)=0.282
 TFRAC(1693)=0.282167 ;TFRAC(1694)=0.282333
 TFRAC(1695)=0.2825 ;TFRAC(1696)=0.282667
 TFRAC(1697)=0.282833 ;TFRAC(1698)=0.283
 TFRAC(1699)=0.283167 ;TFRAC(1700)=0.283333
 TFRAC(1701)=0.2835 ;TFRAC(1702)=0.283667
 TFRAC(1703)=0.283833 ;TFRAC(1704)=0.284
 TFRAC(1705)=0.284167 ;TFRAC(1706)=0.284333
 TFRAC(1707)=0.2845 ;TFRAC(1708)=0.284667
 TFRAC(1709)=0.284833 ;TFRAC(1710)=0.285
 TFRAC(1711)=0.285167 ;TFRAC(1712)=0.285333
 TFRAC(1713)=0.2855 ;TFRAC(1714)=0.285667
 TFRAC(1715)=0.285833 ;TFRAC(1716)=0.286
 TFRAC(1717)=0.286167 ;TFRAC(1718)=0.286333
 TFRAC(1719)=0.2865 ;TFRAC(1720)=0.286667
 TFRAC(1721)=0.286833 ;TFRAC(1722)=0.287
 TFRAC(1723)=0.287167 ;TFRAC(1724)=0.287333
 TFRAC(1725)=0.2875 ;TFRAC(1726)=0.287667
 TFRAC(1727)=0.287833 ;TFRAC(1728)=0.288
 TFRAC(1729)=0.288167 ;TFRAC(1730)=0.288333
 TFRAC(1731)=0.2885 ;TFRAC(1732)=0.288667
 TFRAC(1733)=0.288833 ;TFRAC(1734)=0.289
 TFRAC(1735)=0.289167 ;TFRAC(1736)=0.289333
 TFRAC(1737)=0.2895 ;TFRAC(1738)=0.289667
 TFRAC(1739)=0.289833 ;TFRAC(1740)=0.29
 TFRAC(1741)=0.290167 ;TFRAC(1742)=0.290333
 TFRAC(1743)=0.2905 ;TFRAC(1744)=0.290667
 TFRAC(1745)=0.290833 ;TFRAC(1746)=0.291
 TFRAC(1747)=0.291167 ;TFRAC(1748)=0.291333
 TFRAC(1749)=0.2915 ;TFRAC(1750)=0.291667
 TFRAC(1751)=0.291833 ;TFRAC(1752)=0.292
 TFRAC(1753)=0.292167 ;TFRAC(1754)=0.292333
 TFRAC(1755)=0.2925 ;TFRAC(1756)=0.292667
 TFRAC(1757)=0.292833 ;TFRAC(1758)=0.293
 TFRAC(1759)=0.293167 ;TFRAC(1760)=0.293333
 TFRAC(1761)=0.2935 ;TFRAC(1762)=0.293667
 TFRAC(1763)=0.293833 ;TFRAC(1764)=0.294
 TFRAC(1765)=0.294167 ;TFRAC(1766)=0.294333
 TFRAC(1767)=0.2945 ;TFRAC(1768)=0.294667
 TFRAC(1769)=0.294833 ;TFRAC(1770)=0.295
 TFRAC(1771)=0.295167 ;TFRAC(1772)=0.295333
 TFRAC(1773)=0.2955 ;TFRAC(1774)=0.295667
 TFRAC(1775)=0.295833 ;TFRAC(1776)=0.296
 TFRAC(1777)=0.296167 ;TFRAC(1778)=0.296333
 TFRAC(1779)=0.2965 ;TFRAC(1780)=0.296667
 TFRAC(1781)=0.296833 ;TFRAC(1782)=0.297
 TFRAC(1783)=0.297167 ;TFRAC(1784)=0.297333
 TFRAC(1785)=0.2975 ;TFRAC(1786)=0.297667
 TFRAC(1787)=0.297833 ;TFRAC(1788)=0.298
 TFRAC(1789)=0.298167 ;TFRAC(1790)=0.298333
 TFRAC(1791)=0.2985 ;TFRAC(1792)=0.298667
 TFRAC(1793)=0.298833 ;TFRAC(1794)=0.299
 TFRAC(1795)=0.299167 ;TFRAC(1796)=0.299333
 TFRAC(1797)=0.2995 ;TFRAC(1798)=0.299667
 TFRAC(1799)=0.299833 ;TFRAC(1800)=0.3
 TFRAC(1801)=0.300167 ;TFRAC(1802)=0.300333
 TFRAC(1803)=0.3005 ;TFRAC(1804)=0.300667
 TFRAC(1805)=0.300833 ;TFRAC(1806)=0.301
 TFRAC(1807)=0.301167 ;TFRAC(1808)=0.301333
 TFRAC(1809)=0.3015 ;TFRAC(1810)=0.301667
 TFRAC(1811)=0.301833 ;TFRAC(1812)=0.302
 TFRAC(1813)=0.302167 ;TFRAC(1814)=0.302333
 TFRAC(1815)=0.3025 ;TFRAC(1816)=0.302667
 TFRAC(1817)=0.302833 ;TFRAC(1818)=0.303
 TFRAC(1819)=0.303167 ;TFRAC(1820)=0.303333
 TFRAC(1821)=0.3035 ;TFRAC(1822)=0.303667
 TFRAC(1823)=0.303833 ;TFRAC(1824)=0.304
 TFRAC(1825)=0.304167 ;TFRAC(1826)=0.304333
 TFRAC(1827)=0.3045 ;TFRAC(1828)=0.304667
 TFRAC(1829)=0.304833 ;TFRAC(1830)=0.305
 TFRAC(1831)=0.305167 ;TFRAC(1832)=0.305333
 TFRAC(1833)=0.3055 ;TFRAC(1834)=0.305667
 TFRAC(1835)=0.305833 ;TFRAC(1836)=0.306
 TFRAC(1837)=0.306167 ;TFRAC(1838)=0.306333
 TFRAC(1839)=0.3065 ;TFRAC(1840)=0.306667
 TFRAC(1841)=0.306833 ;TFRAC(1842)=0.307
 TFRAC(1843)=0.307167 ;TFRAC(1844)=0.307333
 TFRAC(1845)=0.3075 ;TFRAC(1846)=0.307667
 TFRAC(1847)=0.307833 ;TFRAC(1848)=0.308
 TFRAC(1849)=0.308167 ;TFRAC(1850)=0.308333
 TFRAC(1851)=0.3085 ;TFRAC(1852)=0.308667
 TFRAC(1853)=0.308833 ;TFRAC(1854)=0.309
 TFRAC(1855)=0.309167 ;TFRAC(1856)=0.309333
 TFRAC(1857)=0.3095 ;TFRAC(1858)=0.309667
 TFRAC(1859)=0.309833 ;TFRAC(1860)=0.31
 TFRAC(1861)=0.310167 ;TFRAC(1862)=0.310333
 TFRAC(1863)=0.3105 ;TFRAC(1864)=0.310667
 TFRAC(1865)=0.310833 ;TFRAC(1866)=0.311
 TFRAC(1867)=0.311167 ;TFRAC(1868)=0.311333
 TFRAC(1869)=0.3115 ;TFRAC(1870)=0.311667
 TFRAC(1871)=0.311833 ;TFRAC(1872)=0.312
 TFRAC(1873)=0.312167 ;TFRAC(1874)=0.312333
 TFRAC(1875)=0.3125 ;TFRAC(1876)=0.312667
 TFRAC(1877)=0.312833 ;TFRAC(1878)=0.313
 TFRAC(1879)=0.313167 ;TFRAC(1880)=0.313333
 TFRAC(1881)=0.3135 ;TFRAC(1882)=0.313667
 TFRAC(1883)=0.313833 ;TFRAC(1884)=0.314
 TFRAC(1885)=0.314167 ;TFRAC(1886)=0.314333
 TFRAC(1887)=0.3145 ;TFRAC(1888)=0.314667
 TFRAC(1889)=0.314833 ;TFRAC(1890)=0.315
 TFRAC(1891)=0.315167 ;TFRAC(1892)=0.315333
 TFRAC(1893)=0.3155 ;TFRAC(1894)=0.315667
 TFRAC(1895)=0.315833 ;TFRAC(1896)=0.316
 TFRAC(1897)=0.316167 ;TFRAC(1898)=0.316333
 TFRAC(1899)=0.3165 ;TFRAC(1900)=0.316667
 TFRAC(1901)=0.316833 ;TFRAC(1902)=0.317
 TFRAC(1903)=0.317167 ;TFRAC(1904)=0.317333
 TFRAC(1905)=0.3175 ;TFRAC(1906)=0.317667
 TFRAC(1907)=0.317833 ;TFRAC(1908)=0.318
 TFRAC(1909)=0.318167 ;TFRAC(1910)=0.318333
 TFRAC(1911)=0.3185 ;TFRAC(1912)=0.318667
 TFRAC(1913)=0.318833 ;TFRAC(1914)=0.319
 TFRAC(1915)=0.319167 ;TFRAC(1916)=0.319333
 TFRAC(1917)=0.3195 ;TFRAC(1918)=0.319667
 TFRAC(1919)=0.319833 ;TFRAC(1920)=0.32
 TFRAC(1921)=0.320167 ;TFRAC(1922)=0.320333
 TFRAC(1923)=0.3205 ;TFRAC(1924)=0.320667
 TFRAC(1925)=0.320833 ;TFRAC(1926)=0.321
 TFRAC(1927)=0.321167 ;TFRAC(1928)=0.321333
 TFRAC(1929)=0.3215 ;TFRAC(1930)=0.321667
 TFRAC(1931)=0.321833 ;TFRAC(1932)=0.322
 TFRAC(1933)=0.322167 ;TFRAC(1934)=0.322333
 TFRAC(1935)=0.3225 ;TFRAC(1936)=0.322667
 TFRAC(1937)=0.322833 ;TFRAC(1938)=0.323
 TFRAC(1939)=0.323167 ;TFRAC(1940)=0.323333
 TFRAC(1941)=0.3235 ;TFRAC(1942)=0.323667
 TFRAC(1943)=0.323833 ;TFRAC(1944)=0.324
 TFRAC(1945)=0.324167 ;TFRAC(1946)=0.324333
 TFRAC(1947)=0.3245 ;TFRAC(1948)=0.324667
 TFRAC(1949)=0.324833 ;TFRAC(1950)=0.325
 TFRAC(1951)=0.325167 ;TFRAC(1952)=0.325333
 TFRAC(1953)=0.3255 ;TFRAC(1954)=0.325667
 TFRAC(1955)=0.325833 ;TFRAC(1956)=0.326
 TFRAC(1957)=0.326167 ;TFRAC(1958)=0.326333
 TFRAC(1959)=0.3265 ;TFRAC(1960)=0.326667
 TFRAC(1961)=0.326833 ;TFRAC(1962)=0.327
 TFRAC(1963)=0.327167 ;TFRAC(1964)=0.327333
 TFRAC(1965)=0.3275 ;TFRAC(1966)=0.327667
 TFRAC(1967)=0.327833 ;TFRAC(1968)=0.328
 TFRAC(1969)=0.328167 ;TFRAC(1970)=0.328333
 TFRAC(1971)=0.3285 ;TFRAC(1972)=0.328667
 TFRAC(1973)=0.328833 ;TFRAC(1974)=0.329
 TFRAC(1975)=0.329167 ;TFRAC(1976)=0.329333
 TFRAC(1977)=0.3295 ;TFRAC(1978)=0.329667
 TFRAC(1979)=0.329833 ;TFRAC(1980)=0.33
 TFRAC(1981)=0.330167 ;TFRAC(1982)=0.330333
 TFRAC(1983)=0.3305 ;TFRAC(1984)=0.330667
 TFRAC(1985)=0.330833 ;TFRAC(1986)=0.331
 TFRAC(1987)=0.331167 ;TFRAC(1988)=0.331333
 TFRAC(1989)=0.3315 ;TFRAC(1990)=0.331667
 TFRAC(1991)=0.331833 ;TFRAC(1992)=0.332
 TFRAC(1993)=0.332167 ;TFRAC(1994)=0.332333
 TFRAC(1995)=0.3325 ;TFRAC(1996)=0.332667
 TFRAC(1997)=0.332833 ;TFRAC(1998)=0.333
 TFRAC(1999)=0.333167 ;TFRAC(2000)=0.333333
 TFRAC(2001)=0.3335 ;TFRAC(2002)=0.333667
 TFRAC(2003)=0.333833 ;TFRAC(2004)=0.334
 TFRAC(2005)=0.334167 ;TFRAC(2006)=0.334333
 TFRAC(2007)=0.3345 ;TFRAC(2008)=0.334667
 TFRAC(2009)=0.334833 ;TFRAC(2010)=0.335
 TFRAC(2011)=0.335167 ;TFRAC(2012)=0.335333
 TFRAC(2013)=0.3355 ;TFRAC(2014)=0.335667
 TFRAC(2015)=0.335833 ;TFRAC(2016)=0.336
 TFRAC(2017)=0.336167 ;TFRAC(2018)=0.336333
 TFRAC(2019)=0.3365 ;TFRAC(2020)=0.336667
 TFRAC(2021)=0.336833 ;TFRAC(2022)=0.337
 TFRAC(2023)=0.337167 ;TFRAC(2024)=0.337333
 TFRAC(2025)=0.3375 ;TFRAC(2026)=0.337667
 TFRAC(2027)=0.337833 ;TFRAC(2028)=0.338
 TFRAC(2029)=0.338167 ;TFRAC(2030)=0.338333
 TFRAC(2031)=0.3385 ;TFRAC(2032)=0.338667
 TFRAC(2033)=0.338833 ;TFRAC(2034)=0.339
 TFRAC(2035)=0.339167 ;TFRAC(2036)=0.339333
 TFRAC(2037)=0.3395 ;TFRAC(2038)=0.339667
 TFRAC(2039)=0.339833 ;TFRAC(2040)=0.34
 TFRAC(2041)=0.340167 ;TFRAC(2042)=0.340333
 TFRAC(2043)=0.3405 ;TFRAC(2044)=0.340667
 TFRAC(2045)=0.340833 ;TFRAC(2046)=0.341
 TFRAC(2047)=0.341167 ;TFRAC(2048)=0.341333
 TFRAC(2049)=0.3415 ;TFRAC(2050)=0.341667
 TFRAC(2051)=0.341833 ;TFRAC(2052)=0.342
 TFRAC(2053)=0.342167 ;TFRAC(2054)=0.342333
 TFRAC(2055)=0.3425 ;TFRAC(2056)=0.342667
 TFRAC(2057)=0.342833 ;TFRAC(2058)=0.343
 TFRAC(2059)=0.343167 ;TFRAC(2060)=0.343333
 TFRAC(2061)=0.3435 ;TFRAC(2062)=0.343667
 TFRAC(2063)=0.343833 ;TFRAC(2064)=0.344
 TFRAC(2065)=0.344167 ;TFRAC(2066)=0.344333
 TFRAC(2067)=0.3445 ;TFRAC(2068)=0.344667
 TFRAC(2069)=0.344833 ;TFRAC(2070)=0.345
 TFRAC(2071)=0.345167 ;TFRAC(2072)=0.345333
 TFRAC(2073)=0.3455 ;TFRAC(2074)=0.345667
 TFRAC(2075)=0.345833 ;TFRAC(2076)=0.346
 TFRAC(2077)=0.346167 ;TFRAC(2078)=0.346333
 TFRAC(2079)=0.3465 ;TFRAC(2080)=0.346667
 TFRAC(2081)=0.346833 ;TFRAC(2082)=0.347
 TFRAC(2083)=0.347167 ;TFRAC(2084)=0.347333
 TFRAC(2085)=0.3475 ;TFRAC(2086)=0.347667
 TFRAC(2087)=0.347833 ;TFRAC(2088)=0.348
 TFRAC(2089)=0.348167 ;TFRAC(2090)=0.348333
 TFRAC(2091)=0.3485 ;TFRAC(2092)=0.348667
 TFRAC(2093)=0.348833 ;TFRAC(2094)=0.349
 TFRAC(2095)=0.349167 ;TFRAC(2096)=0.349333
 TFRAC(2097)=0.3495 ;TFRAC(2098)=0.349667
 TFRAC(2099)=0.349833 ;TFRAC(2100)=0.35
 TFRAC(2101)=0.350167 ;TFRAC(2102)=0.350333
 TFRAC(2103)=0.3505 ;TFRAC(2104)=0.350667
 TFRAC(2105)=0.350833 ;TFRAC(2106)=0.351
 TFRAC(2107)=0.351167 ;TFRAC(2108)=0.351333
 TFRAC(2109)=0.3515 ;TFRAC(2110)=0.351667
 TFRAC(2111)=0.351833 ;TFRAC(2112)=0.352
 TFRAC(2113)=0.352167 ;TFRAC(2114)=0.352333
 TFRAC(2115)=0.3525 ;TFRAC(2116)=0.352667
 TFRAC(2117)=0.352833 ;TFRAC(2118)=0.353
 TFRAC(2119)=0.353167 ;TFRAC(2120)=0.353333
 TFRAC(2121)=0.3535 ;TFRAC(2122)=0.353667
 TFRAC(2123)=0.353833 ;TFRAC(2124)=0.354
 TFRAC(2125)=0.354167 ;TFRAC(2126)=0.354333
 TFRAC(2127)=0.3545 ;TFRAC(2128)=0.354667
 TFRAC(2129)=0.354833 ;TFRAC(2130)=0.355
 TFRAC(2131)=0.355167 ;TFRAC(2132)=0.355333
 TFRAC(2133)=0.3555 ;TFRAC(2134)=0.355667
 TFRAC(2135)=0.355833 ;TFRAC(2136)=0.356
 TFRAC(2137)=0.356167 ;TFRAC(2138)=0.356333
 TFRAC(2139)=0.3565 ;TFRAC(2140)=0.356667
 TFRAC(2141)=0.356833 ;TFRAC(2142)=0.357
 TFRAC(2143)=0.357167 ;TFRAC(2144)=0.357333
 TFRAC(2145)=0.3575 ;TFRAC(2146)=0.357667
 TFRAC(2147)=0.357833 ;TFRAC(2148)=0.358
 TFRAC(2149)=0.358167 ;TFRAC(2150)=0.358333
 TFRAC(2151)=0.3585 ;TFRAC(2152)=0.358667
 TFRAC(2153)=0.358833 ;TFRAC(2154)=0.359
 TFRAC(2155)=0.359167 ;TFRAC(2156)=0.359333
 TFRAC(2157)=0.3595 ;TFRAC(2158)=0.359667
 TFRAC(2159)=0.359833 ;TFRAC(2160)=0.36
 TFRAC(2161)=0.360167 ;TFRAC(2162)=0.360333
 TFRAC(2163)=0.3605 ;TFRAC(2164)=0.360667
 TFRAC(2165)=0.360833 ;TFRAC(2166)=0.361
 TFRAC(2167)=0.361167 ;TFRAC(2168)=0.361333
 TFRAC(2169)=0.3615 ;TFRAC(2170)=0.361667
 TFRAC(2171)=0.361833 ;TFRAC(2172)=0.362
 TFRAC(2173)=0.362167 ;TFRAC(2174)=0.362333
 TFRAC(2175)=0.3625 ;TFRAC(2176)=0.362667
 TFRAC(2177)=0.362833 ;TFRAC(2178)=0.363
 TFRAC(2179)=0.363167 ;TFRAC(2180)=0.363333
 TFRAC(2181)=0.3635 ;TFRAC(2182)=0.363667
 TFRAC(2183)=0.363833 ;TFRAC(2184)=0.364
 TFRAC(2185)=0.364167 ;TFRAC(2186)=0.364333
 TFRAC(2187)=0.3645 ;TFRAC(2188)=0.364667
 TFRAC(2189)=0.364833 ;TFRAC(2190)=0.365
 TFRAC(2191)=0.365167 ;TFRAC(2192)=0.365333
 TFRAC(2193)=0.3655 ;TFRAC(2194)=0.365667
 TFRAC(2195)=0.365833 ;TFRAC(2196)=0.366
 TFRAC(2197)=0.366167 ;TFRAC(2198)=0.366333
 TFRAC(2199)=0.3665 ;TFRAC(2200)=0.366667
 TFRAC(2201)=0.366833 ;TFRAC(2202)=0.367
 TFRAC(2203)=0.367167 ;TFRAC(2204)=0.367333
 TFRAC(2205)=0.3675 ;TFRAC(2206)=0.367667
 TFRAC(2207)=0.367833 ;TFRAC(2208)=0.368
 TFRAC(2209)=0.368167 ;TFRAC(2210)=0.368333
 TFRAC(2211)=0.3685 ;TFRAC(2212)=0.368667
 TFRAC(2213)=0.368833 ;TFRAC(2214)=0.369
 TFRAC(2215)=0.369167 ;TFRAC(2216)=0.369333
 TFRAC(2217)=0.3695 ;TFRAC(2218)=0.369667
 TFRAC(2219)=0.369833 ;TFRAC(2220)=0.37
 TFRAC(2221)=0.370167 ;TFRAC(2222)=0.370333
 TFRAC(2223)=0.3705 ;TFRAC(2224)=0.370667
 TFRAC(2225)=0.370833 ;TFRAC(2226)=0.371
 TFRAC(2227)=0.371167 ;TFRAC(2228)=0.371333
 TFRAC(2229)=0.3715 ;TFRAC(2230)=0.371667
 TFRAC(2231)=0.371833 ;TFRAC(2232)=0.372
 TFRAC(2233)=0.372167 ;TFRAC(2234)=0.372333
 TFRAC(2235)=0.3725 ;TFRAC(2236)=0.372667
 TFRAC(2237)=0.372833 ;TFRAC(2238)=0.373
 TFRAC(2239)=0.373167 ;TFRAC(2240)=0.373333
 TFRAC(2241)=0.3735 ;TFRAC(2242)=0.373667
 TFRAC(2243)=0.373833 ;TFRAC(2244)=0.374
 TFRAC(2245)=0.374167 ;TFRAC(2246)=0.374333
 TFRAC(2247)=0.3745 ;TFRAC(2248)=0.374667
 TFRAC(2249)=0.374833 ;TFRAC(2250)=0.375
 TFRAC(2251)=0.375167 ;TFRAC(2252)=0.375333
 TFRAC(2253)=0.3755 ;TFRAC(2254)=0.375667
 TFRAC(2255)=0.375833 ;TFRAC(2256)=0.376
 TFRAC(2257)=0.376167 ;TFRAC(2258)=0.376333
 TFRAC(2259)=0.3765 ;TFRAC(2260)=0.376667
 TFRAC(2261)=0.376833 ;TFRAC(2262)=0.377
 TFRAC(2263)=0.377167 ;TFRAC(2264)=0.377333
 TFRAC(2265)=0.3775 ;TFRAC(2266)=0.377667
 TFRAC(2267)=0.377833 ;TFRAC(2268)=0.378
 TFRAC(2269)=0.378167 ;TFRAC(2270)=0.378333
 TFRAC(2271)=0.3785 ;TFRAC(2272)=0.378667
 TFRAC(2273)=0.378833 ;TFRAC(2274)=0.379
 TFRAC(2275)=0.379167 ;TFRAC(2276)=0.379333
 TFRAC(2277)=0.3795 ;TFRAC(2278)=0.379667
 TFRAC(2279)=0.379833 ;TFRAC(2280)=0.38
 TFRAC(2281)=0.380167 ;TFRAC(2282)=0.380333
 TFRAC(2283)=0.3805 ;TFRAC(2284)=0.380667
 TFRAC(2285)=0.380833 ;TFRAC(2286)=0.381
 TFRAC(2287)=0.381167 ;TFRAC(2288)=0.381333
 TFRAC(2289)=0.3815 ;TFRAC(2290)=0.381667
 TFRAC(2291)=0.381833 ;TFRAC(2292)=0.382
 TFRAC(2293)=0.382167 ;TFRAC(2294)=0.382333
 TFRAC(2295)=0.3825 ;TFRAC(2296)=0.382667
 TFRAC(2297)=0.382833 ;TFRAC(2298)=0.383
 TFRAC(2299)=0.383167 ;TFRAC(2300)=0.383333
 TFRAC(2301)=0.3835 ;TFRAC(2302)=0.383667
 TFRAC(2303)=0.383833 ;TFRAC(2304)=0.384
 TFRAC(2305)=0.384167 ;TFRAC(2306)=0.384333
 TFRAC(2307)=0.3845 ;TFRAC(2308)=0.384667
 TFRAC(2309)=0.384833 ;TFRAC(2310)=0.385
 TFRAC(2311)=0.385167 ;TFRAC(2312)=0.385333
 TFRAC(2313)=0.3855 ;TFRAC(2314)=0.385667
 TFRAC(2315)=0.385833 ;TFRAC(2316)=0.386
 TFRAC(2317)=0.386167 ;TFRAC(2318)=0.386333
 TFRAC(2319)=0.3865 ;TFRAC(2320)=0.386667
 TFRAC(2321)=0.386833 ;TFRAC(2322)=0.387
 TFRAC(2323)=0.387167 ;TFRAC(2324)=0.387333
 TFRAC(2325)=0.3875 ;TFRAC(2326)=0.387667
 TFRAC(2327)=0.387833 ;TFRAC(2328)=0.388
 TFRAC(2329)=0.388167 ;TFRAC(2330)=0.388333
 TFRAC(2331)=0.3885 ;TFRAC(2332)=0.388667
 TFRAC(2333)=0.388833 ;TFRAC(2334)=0.389
 TFRAC(2335)=0.389167 ;TFRAC(2336)=0.389333
 TFRAC(2337)=0.3895 ;TFRAC(2338)=0.389667
 TFRAC(2339)=0.389833 ;TFRAC(2340)=0.39
 TFRAC(2341)=0.390167 ;TFRAC(2342)=0.390333
 TFRAC(2343)=0.3905 ;TFRAC(2344)=0.390667
 TFRAC(2345)=0.390833 ;TFRAC(2346)=0.391
 TFRAC(2347)=0.391167 ;TFRAC(2348)=0.391333
 TFRAC(2349)=0.3915 ;TFRAC(2350)=0.391667
 TFRAC(2351)=0.391833 ;TFRAC(2352)=0.392
 TFRAC(2353)=0.392167 ;TFRAC(2354)=0.392333
 TFRAC(2355)=0.3925 ;TFRAC(2356)=0.392667
 TFRAC(2357)=0.392833 ;TFRAC(2358)=0.393
 TFRAC(2359)=0.393167 ;TFRAC(2360)=0.393333
 TFRAC(2361)=0.3935 ;TFRAC(2362)=0.393667
 TFRAC(2363)=0.393833 ;TFRAC(2364)=0.394
 TFRAC(2365)=0.394167 ;TFRAC(2366)=0.394333
 TFRAC(2367)=0.3945 ;TFRAC(2368)=0.394667
 TFRAC(2369)=0.394833 ;TFRAC(2370)=0.395
 TFRAC(2371)=0.395167 ;TFRAC(2372)=0.395333
 TFRAC(2373)=0.3955 ;TFRAC(2374)=0.395667
 TFRAC(2375)=0.395833 ;TFRAC(2376)=0.396
 TFRAC(2377)=0.396167 ;TFRAC(2378)=0.396333
 TFRAC(2379)=0.3965 ;TFRAC(2380)=0.396667
 TFRAC(2381)=0.396833 ;TFRAC(2382)=0.397
 TFRAC(2383)=0.397167 ;TFRAC(2384)=0.397333
 TFRAC(2385)=0.3975 ;TFRAC(2386)=0.397667
 TFRAC(2387)=0.397833 ;TFRAC(2388)=0.398
 TFRAC(2389)=0.398167 ;TFRAC(2390)=0.398333
 TFRAC(2391)=0.3985 ;TFRAC(2392)=0.398667
 TFRAC(2393)=0.398833 ;TFRAC(2394)=0.399
 TFRAC(2395)=0.399167 ;TFRAC(2396)=0.399333
 TFRAC(2397)=0.3995 ;TFRAC(2398)=0.399667
 TFRAC(2399)=0.399833 ;TFRAC(2400)=0.4
 TFRAC(2401)=0.400167 ;TFRAC(2402)=0.400333
 TFRAC(2403)=0.4005 ;TFRAC(2404)=0.400667
 TFRAC(2405)=0.400833 ;TFRAC(2406)=0.401
 TFRAC(2407)=0.401167 ;TFRAC(2408)=0.401333
 TFRAC(2409)=0.4015 ;TFRAC(2410)=0.401667
 TFRAC(2411)=0.401833 ;TFRAC(2412)=0.402
 TFRAC(2413)=0.402167 ;TFRAC(2414)=0.402333
 TFRAC(2415)=0.4025 ;TFRAC(2416)=0.402667
 TFRAC(2417)=0.402833 ;TFRAC(2418)=0.403
 TFRAC(2419)=0.403167 ;TFRAC(2420)=0.403333
 TFRAC(2421)=0.4035 ;TFRAC(2422)=0.403667
 TFRAC(2423)=0.403833 ;TFRAC(2424)=0.404
 TFRAC(2425)=0.404167 ;TFRAC(2426)=0.404333
 TFRAC(2427)=0.4045 ;TFRAC(2428)=0.404667
 TFRAC(2429)=0.404833 ;TFRAC(2430)=0.405
 TFRAC(2431)=0.405167 ;TFRAC(2432)=0.405333
 TFRAC(2433)=0.4055 ;TFRAC(2434)=0.405667
 TFRAC(2435)=0.405833 ;TFRAC(2436)=0.406
 TFRAC(2437)=0.406167 ;TFRAC(2438)=0.406333
 TFRAC(2439)=0.4065 ;TFRAC(2440)=0.406667
 TFRAC(2441)=0.406833 ;TFRAC(2442)=0.407
 TFRAC(2443)=0.407167 ;TFRAC(2444)=0.407333
 TFRAC(2445)=0.4075 ;TFRAC(2446)=0.407667
 TFRAC(2447)=0.407833 ;TFRAC(2448)=0.408
 TFRAC(2449)=0.408167 ;TFRAC(2450)=0.408333
 TFRAC(2451)=0.4085 ;TFRAC(2452)=0.408667
 TFRAC(2453)=0.408833 ;TFRAC(2454)=0.409
 TFRAC(2455)=0.409167 ;TFRAC(2456)=0.409333
 TFRAC(2457)=0.4095 ;TFRAC(2458)=0.409667
 TFRAC(2459)=0.409833 ;TFRAC(2460)=0.41
 TFRAC(2461)=0.410167 ;TFRAC(2462)=0.410333
 TFRAC(2463)=0.4105 ;TFRAC(2464)=0.410667
 TFRAC(2465)=0.410833 ;TFRAC(2466)=0.411
 TFRAC(2467)=0.411167 ;TFRAC(2468)=0.411333
 TFRAC(2469)=0.4115 ;TFRAC(2470)=0.411667
 TFRAC(2471)=0.411833 ;TFRAC(2472)=0.412
 TFRAC(2473)=0.412167 ;TFRAC(2474)=0.412333
 TFRAC(2475)=0.4125 ;TFRAC(2476)=0.412667
 TFRAC(2477)=0.412833 ;TFRAC(2478)=0.413
 TFRAC(2479)=0.413167 ;TFRAC(2480)=0.413333
 TFRAC(2481)=0.4135 ;TFRAC(2482)=0.413667
 TFRAC(2483)=0.413833 ;TFRAC(2484)=0.414
 TFRAC(2485)=0.414167 ;TFRAC(2486)=0.414333
 TFRAC(2487)=0.4145 ;TFRAC(2488)=0.414667
 TFRAC(2489)=0.414833 ;TFRAC(2490)=0.415
 TFRAC(2491)=0.415167 ;TFRAC(2492)=0.415333
 TFRAC(2493)=0.4155 ;TFRAC(2494)=0.415667
 TFRAC(2495)=0.415833 ;TFRAC(2496)=0.416
 TFRAC(2497)=0.416167 ;TFRAC(2498)=0.416333
 TFRAC(2499)=0.4165 ;TFRAC(2500)=0.416667
 TFRAC(2501)=0.416833 ;TFRAC(2502)=0.417
 TFRAC(2503)=0.417167 ;TFRAC(2504)=0.417333
 TFRAC(2505)=0.4175 ;TFRAC(2506)=0.417667
 TFRAC(2507)=0.417833 ;TFRAC(2508)=0.418
 TFRAC(2509)=0.418167 ;TFRAC(2510)=0.418333
 TFRAC(2511)=0.4185 ;TFRAC(2512)=0.418667
 TFRAC(2513)=0.418833 ;TFRAC(2514)=0.419
 TFRAC(2515)=0.419167 ;TFRAC(2516)=0.419333
 TFRAC(2517)=0.4195 ;TFRAC(2518)=0.419667
 TFRAC(2519)=0.419833 ;TFRAC(2520)=0.42
 TFRAC(2521)=0.420167 ;TFRAC(2522)=0.420333
 TFRAC(2523)=0.4205 ;TFRAC(2524)=0.420667
 TFRAC(2525)=0.420833 ;TFRAC(2526)=0.421
 TFRAC(2527)=0.421167 ;TFRAC(2528)=0.421333
 TFRAC(2529)=0.4215 ;TFRAC(2530)=0.421667
 TFRAC(2531)=0.421833 ;TFRAC(2532)=0.422
 TFRAC(2533)=0.422167 ;TFRAC(2534)=0.422333
 TFRAC(2535)=0.4225 ;TFRAC(2536)=0.422667
 TFRAC(2537)=0.422833 ;TFRAC(2538)=0.423
 TFRAC(2539)=0.423167 ;TFRAC(2540)=0.423333
 TFRAC(2541)=0.4235 ;TFRAC(2542)=0.423667
 TFRAC(2543)=0.423833 ;TFRAC(2544)=0.424
 TFRAC(2545)=0.424167 ;TFRAC(2546)=0.424333
 TFRAC(2547)=0.4245 ;TFRAC(2548)=0.424667
 TFRAC(2549)=0.424833 ;TFRAC(2550)=0.425
 TFRAC(2551)=0.425167 ;TFRAC(2552)=0.425333
 TFRAC(2553)=0.4255 ;TFRAC(2554)=0.425667
 TFRAC(2555)=0.425833 ;TFRAC(2556)=0.426
 TFRAC(2557)=0.426167 ;TFRAC(2558)=0.426333
 TFRAC(2559)=0.4265 ;TFRAC(2560)=0.426667
 TFRAC(2561)=0.426833 ;TFRAC(2562)=0.427
 TFRAC(2563)=0.427167 ;TFRAC(2564)=0.427333
 TFRAC(2565)=0.4275 ;TFRAC(2566)=0.427667
 TFRAC(2567)=0.427833 ;TFRAC(2568)=0.428
 TFRAC(2569)=0.428167 ;TFRAC(2570)=0.428333
 TFRAC(2571)=0.4285 ;TFRAC(2572)=0.428667
 TFRAC(2573)=0.428833 ;TFRAC(2574)=0.429
 TFRAC(2575)=0.429167 ;TFRAC(2576)=0.429333
 TFRAC(2577)=0.4295 ;TFRAC(2578)=0.429667
 TFRAC(2579)=0.429833 ;TFRAC(2580)=0.43
 TFRAC(2581)=0.430167 ;TFRAC(2582)=0.430333
 TFRAC(2583)=0.4305 ;TFRAC(2584)=0.430667
 TFRAC(2585)=0.430833 ;TFRAC(2586)=0.431
 TFRAC(2587)=0.431167 ;TFRAC(2588)=0.431333
 TFRAC(2589)=0.4315 ;TFRAC(2590)=0.431667
 TFRAC(2591)=0.431833 ;TFRAC(2592)=0.432
 TFRAC(2593)=0.432167 ;TFRAC(2594)=0.432333
 TFRAC(2595)=0.4325 ;TFRAC(2596)=0.432667
 TFRAC(2597)=0.432833 ;TFRAC(2598)=0.433
 TFRAC(2599)=0.433167 ;TFRAC(2600)=0.433333
 TFRAC(2601)=0.4335 ;TFRAC(2602)=0.433667
 TFRAC(2603)=0.433833 ;TFRAC(2604)=0.434
 TFRAC(2605)=0.434167 ;TFRAC(2606)=0.434333
 TFRAC(2607)=0.4345 ;TFRAC(2608)=0.434667
 TFRAC(2609)=0.434833 ;TFRAC(2610)=0.435
 TFRAC(2611)=0.435167 ;TFRAC(2612)=0.435333
 TFRAC(2613)=0.4355 ;TFRAC(2614)=0.435667
 TFRAC(2615)=0.435833 ;TFRAC(2616)=0.436
 TFRAC(2617)=0.436167 ;TFRAC(2618)=0.436333
 TFRAC(2619)=0.4365 ;TFRAC(2620)=0.436667
 TFRAC(2621)=0.436833 ;TFRAC(2622)=0.437
 TFRAC(2623)=0.437167 ;TFRAC(2624)=0.437333
 TFRAC(2625)=0.4375 ;TFRAC(2626)=0.437667
 TFRAC(2627)=0.437833 ;TFRAC(2628)=0.438
 TFRAC(2629)=0.438167 ;TFRAC(2630)=0.438333
 TFRAC(2631)=0.4385 ;TFRAC(2632)=0.438667
 TFRAC(2633)=0.438833 ;TFRAC(2634)=0.439
 TFRAC(2635)=0.439167 ;TFRAC(2636)=0.439333
 TFRAC(2637)=0.4395 ;TFRAC(2638)=0.439667
 TFRAC(2639)=0.439833 ;TFRAC(2640)=0.44
 TFRAC(2641)=0.440167 ;TFRAC(2642)=0.440333
 TFRAC(2643)=0.4405 ;TFRAC(2644)=0.440667
 TFRAC(2645)=0.440833 ;TFRAC(2646)=0.441
 TFRAC(2647)=0.441167 ;TFRAC(2648)=0.441333
 TFRAC(2649)=0.4415 ;TFRAC(2650)=0.441667
 TFRAC(2651)=0.441833 ;TFRAC(2652)=0.442
 TFRAC(2653)=0.442167 ;TFRAC(2654)=0.442333
 TFRAC(2655)=0.4425 ;TFRAC(2656)=0.442667
 TFRAC(2657)=0.442833 ;TFRAC(2658)=0.443
 TFRAC(2659)=0.443167 ;TFRAC(2660)=0.443333
 TFRAC(2661)=0.4435 ;TFRAC(2662)=0.443667
 TFRAC(2663)=0.443833 ;TFRAC(2664)=0.444
 TFRAC(2665)=0.444167 ;TFRAC(2666)=0.444333
 TFRAC(2667)=0.4445 ;TFRAC(2668)=0.444667
 TFRAC(2669)=0.444833 ;TFRAC(2670)=0.445
 TFRAC(2671)=0.445167 ;TFRAC(2672)=0.445333
 TFRAC(2673)=0.4455 ;TFRAC(2674)=0.445667
 TFRAC(2675)=0.445833 ;TFRAC(2676)=0.446
 TFRAC(2677)=0.446167 ;TFRAC(2678)=0.446333
 TFRAC(2679)=0.4465 ;TFRAC(2680)=0.446667
 TFRAC(2681)=0.446833 ;TFRAC(2682)=0.447
 TFRAC(2683)=0.447167 ;TFRAC(2684)=0.447333
 TFRAC(2685)=0.4475 ;TFRAC(2686)=0.447667
 TFRAC(2687)=0.447833 ;TFRAC(2688)=0.448
 TFRAC(2689)=0.448167 ;TFRAC(2690)=0.448333
 TFRAC(2691)=0.4485 ;TFRAC(2692)=0.448667
 TFRAC(2693)=0.448833 ;TFRAC(2694)=0.449
 TFRAC(2695)=0.449167 ;TFRAC(2696)=0.449333
 TFRAC(2697)=0.4495 ;TFRAC(2698)=0.449667
 TFRAC(2699)=0.449833 ;TFRAC(2700)=0.45
 TFRAC(2701)=0.450167 ;TFRAC(2702)=0.450333
 TFRAC(2703)=0.4505 ;TFRAC(2704)=0.450667
 TFRAC(2705)=0.450833 ;TFRAC(2706)=0.451
 TFRAC(2707)=0.451167 ;TFRAC(2708)=0.451333
 TFRAC(2709)=0.4515 ;TFRAC(2710)=0.451667
 TFRAC(2711)=0.451833 ;TFRAC(2712)=0.452
 TFRAC(2713)=0.452167 ;TFRAC(2714)=0.452333
 TFRAC(2715)=0.4525 ;TFRAC(2716)=0.452667
 TFRAC(2717)=0.452833 ;TFRAC(2718)=0.453
 TFRAC(2719)=0.453167 ;TFRAC(2720)=0.453333
 TFRAC(2721)=0.4535 ;TFRAC(2722)=0.453667
 TFRAC(2723)=0.453833 ;TFRAC(2724)=0.454
 TFRAC(2725)=0.454167 ;TFRAC(2726)=0.454333
 TFRAC(2727)=0.4545 ;TFRAC(2728)=0.454667
 TFRAC(2729)=0.454833 ;TFRAC(2730)=0.455
 TFRAC(2731)=0.455167 ;TFRAC(2732)=0.455333
 TFRAC(2733)=0.4555 ;TFRAC(2734)=0.455667
 TFRAC(2735)=0.455833 ;TFRAC(2736)=0.456
 TFRAC(2737)=0.456167 ;TFRAC(2738)=0.456333
 TFRAC(2739)=0.4565 ;TFRAC(2740)=0.456667
 TFRAC(2741)=0.456833 ;TFRAC(2742)=0.457
 TFRAC(2743)=0.457167 ;TFRAC(2744)=0.457333
 TFRAC(2745)=0.4575 ;TFRAC(2746)=0.457667
 TFRAC(2747)=0.457833 ;TFRAC(2748)=0.458
 TFRAC(2749)=0.458167 ;TFRAC(2750)=0.458333
 TFRAC(2751)=0.4585 ;TFRAC(2752)=0.458667
 TFRAC(2753)=0.458833 ;TFRAC(2754)=0.459
 TFRAC(2755)=0.459167 ;TFRAC(2756)=0.459333
 TFRAC(2757)=0.4595 ;TFRAC(2758)=0.459667
 TFRAC(2759)=0.459833 ;TFRAC(2760)=0.46
 TFRAC(2761)=0.460167 ;TFRAC(2762)=0.460333
 TFRAC(2763)=0.4605 ;TFRAC(2764)=0.460667
 TFRAC(2765)=0.460833 ;TFRAC(2766)=0.461
 TFRAC(2767)=0.461167 ;TFRAC(2768)=0.461333
 TFRAC(2769)=0.4615 ;TFRAC(2770)=0.461667
 TFRAC(2771)=0.461833 ;TFRAC(2772)=0.462
 TFRAC(2773)=0.462167 ;TFRAC(2774)=0.462333
 TFRAC(2775)=0.4625 ;TFRAC(2776)=0.462667
 TFRAC(2777)=0.462833 ;TFRAC(2778)=0.463
 TFRAC(2779)=0.463167 ;TFRAC(2780)=0.463333
 TFRAC(2781)=0.4635 ;TFRAC(2782)=0.463667
 TFRAC(2783)=0.463833 ;TFRAC(2784)=0.464
 TFRAC(2785)=0.464167 ;TFRAC(2786)=0.464333
 TFRAC(2787)=0.4645 ;TFRAC(2788)=0.464667
 TFRAC(2789)=0.464833 ;TFRAC(2790)=0.465
 TFRAC(2791)=0.465167 ;TFRAC(2792)=0.465333
 TFRAC(2793)=0.4655 ;TFRAC(2794)=0.465667
 TFRAC(2795)=0.465833 ;TFRAC(2796)=0.466
 TFRAC(2797)=0.466167 ;TFRAC(2798)=0.466333
 TFRAC(2799)=0.4665 ;TFRAC(2800)=0.466667
 TFRAC(2801)=0.466833 ;TFRAC(2802)=0.467
 TFRAC(2803)=0.467167 ;TFRAC(2804)=0.467333
 TFRAC(2805)=0.4675 ;TFRAC(2806)=0.467667
 TFRAC(2807)=0.467833 ;TFRAC(2808)=0.468
 TFRAC(2809)=0.468167 ;TFRAC(2810)=0.468333
 TFRAC(2811)=0.4685 ;TFRAC(2812)=0.468667
 TFRAC(2813)=0.468833 ;TFRAC(2814)=0.469
 TFRAC(2815)=0.469167 ;TFRAC(2816)=0.469333
 TFRAC(2817)=0.4695 ;TFRAC(2818)=0.469667
 TFRAC(2819)=0.469833 ;TFRAC(2820)=0.47
 TFRAC(2821)=0.470167 ;TFRAC(2822)=0.470333
 TFRAC(2823)=0.4705 ;TFRAC(2824)=0.470667
 TFRAC(2825)=0.470833 ;TFRAC(2826)=0.471
 TFRAC(2827)=0.471167 ;TFRAC(2828)=0.471333
 TFRAC(2829)=0.4715 ;TFRAC(2830)=0.471667
 TFRAC(2831)=0.471833 ;TFRAC(2832)=0.472
 TFRAC(2833)=0.472167 ;TFRAC(2834)=0.472333
 TFRAC(2835)=0.4725 ;TFRAC(2836)=0.472667
 TFRAC(2837)=0.472833 ;TFRAC(2838)=0.473
 TFRAC(2839)=0.473167 ;TFRAC(2840)=0.473333
 TFRAC(2841)=0.4735 ;TFRAC(2842)=0.473667
 TFRAC(2843)=0.473833 ;TFRAC(2844)=0.474
 TFRAC(2845)=0.474167 ;TFRAC(2846)=0.474333
 TFRAC(2847)=0.4745 ;TFRAC(2848)=0.474667
 TFRAC(2849)=0.474833 ;TFRAC(2850)=0.475
 TFRAC(2851)=0.475167 ;TFRAC(2852)=0.475333
 TFRAC(2853)=0.4755 ;TFRAC(2854)=0.475667
 TFRAC(2855)=0.475833 ;TFRAC(2856)=0.476
 TFRAC(2857)=0.476167 ;TFRAC(2858)=0.476333
 TFRAC(2859)=0.4765 ;TFRAC(2860)=0.476667
 TFRAC(2861)=0.476833 ;TFRAC(2862)=0.477
 TFRAC(2863)=0.477167 ;TFRAC(2864)=0.477333
 TFRAC(2865)=0.4775 ;TFRAC(2866)=0.477667
 TFRAC(2867)=0.477833 ;TFRAC(2868)=0.478
 TFRAC(2869)=0.478167 ;TFRAC(2870)=0.478333
 TFRAC(2871)=0.4785 ;TFRAC(2872)=0.478667
 TFRAC(2873)=0.478833 ;TFRAC(2874)=0.479
 TFRAC(2875)=0.479167 ;TFRAC(2876)=0.479333
 TFRAC(2877)=0.4795 ;TFRAC(2878)=0.479667
 TFRAC(2879)=0.479833 ;TFRAC(2880)=0.48
 TFRAC(2881)=0.480167 ;TFRAC(2882)=0.480333
 TFRAC(2883)=0.4805 ;TFRAC(2884)=0.480667
 TFRAC(2885)=0.480833 ;TFRAC(2886)=0.481
 TFRAC(2887)=0.481167 ;TFRAC(2888)=0.481333
 TFRAC(2889)=0.4815 ;TFRAC(2890)=0.481667
 TFRAC(2891)=0.481833 ;TFRAC(2892)=0.482
 TFRAC(2893)=0.482167 ;TFRAC(2894)=0.482333
 TFRAC(2895)=0.4825 ;TFRAC(2896)=0.482667
 TFRAC(2897)=0.482833 ;TFRAC(2898)=0.483
 TFRAC(2899)=0.483167 ;TFRAC(2900)=0.483333
 TFRAC(2901)=0.4835 ;TFRAC(2902)=0.483667
 TFRAC(2903)=0.483833 ;TFRAC(2904)=0.484
 TFRAC(2905)=0.484167 ;TFRAC(2906)=0.484333
 TFRAC(2907)=0.4845 ;TFRAC(2908)=0.484667
 TFRAC(2909)=0.484833 ;TFRAC(2910)=0.485
 TFRAC(2911)=0.485167 ;TFRAC(2912)=0.485333
 TFRAC(2913)=0.4855 ;TFRAC(2914)=0.485667
 TFRAC(2915)=0.485833 ;TFRAC(2916)=0.486
 TFRAC(2917)=0.486167 ;TFRAC(2918)=0.486333
 TFRAC(2919)=0.4865 ;TFRAC(2920)=0.486667
 TFRAC(2921)=0.486833 ;TFRAC(2922)=0.487
 TFRAC(2923)=0.487167 ;TFRAC(2924)=0.487333
 TFRAC(2925)=0.4875 ;TFRAC(2926)=0.487667
 TFRAC(2927)=0.487833 ;TFRAC(2928)=0.488
 TFRAC(2929)=0.488167 ;TFRAC(2930)=0.488333
 TFRAC(2931)=0.4885 ;TFRAC(2932)=0.488667
 TFRAC(2933)=0.488833 ;TFRAC(2934)=0.489
 TFRAC(2935)=0.489167 ;TFRAC(2936)=0.489333
 TFRAC(2937)=0.4895 ;TFRAC(2938)=0.489667
 TFRAC(2939)=0.489833 ;TFRAC(2940)=0.49
 TFRAC(2941)=0.490167 ;TFRAC(2942)=0.490333
 TFRAC(2943)=0.4905 ;TFRAC(2944)=0.490667
 TFRAC(2945)=0.490833 ;TFRAC(2946)=0.491
 TFRAC(2947)=0.491167 ;TFRAC(2948)=0.491333
 TFRAC(2949)=0.4915 ;TFRAC(2950)=0.491667
 TFRAC(2951)=0.491833 ;TFRAC(2952)=0.492
 TFRAC(2953)=0.492167 ;TFRAC(2954)=0.492333
 TFRAC(2955)=0.4925 ;TFRAC(2956)=0.492667
 TFRAC(2957)=0.492833 ;TFRAC(2958)=0.493
 TFRAC(2959)=0.493167 ;TFRAC(2960)=0.493333
 TFRAC(2961)=0.4935 ;TFRAC(2962)=0.493667
 TFRAC(2963)=0.493833 ;TFRAC(2964)=0.494
 TFRAC(2965)=0.494167 ;TFRAC(2966)=0.494333
 TFRAC(2967)=0.4945 ;TFRAC(2968)=0.494667
 TFRAC(2969)=0.494833 ;TFRAC(2970)=0.495
 TFRAC(2971)=0.495167 ;TFRAC(2972)=0.495333
 TFRAC(2973)=0.4955 ;TFRAC(2974)=0.495667
 TFRAC(2975)=0.495833 ;TFRAC(2976)=0.496
 TFRAC(2977)=0.496167 ;TFRAC(2978)=0.496333
 TFRAC(2979)=0.4965 ;TFRAC(2980)=0.496667
 TFRAC(2981)=0.496833 ;TFRAC(2982)=0.497
 TFRAC(2983)=0.497167 ;TFRAC(2984)=0.497333
 TFRAC(2985)=0.4975 ;TFRAC(2986)=0.497667
 TFRAC(2987)=0.497833 ;TFRAC(2988)=0.498
 TFRAC(2989)=0.498167 ;TFRAC(2990)=0.498333
 TFRAC(2991)=0.4985 ;TFRAC(2992)=0.498667
 TFRAC(2993)=0.498833 ;TFRAC(2994)=0.499
 TFRAC(2995)=0.499167 ;TFRAC(2996)=0.499333
 TFRAC(2997)=0.4995 ;TFRAC(2998)=0.499667
 TFRAC(2999)=0.499833 ;TFRAC(3000)=0.5
 TFRAC(3001)=0.500167 ;TFRAC(3002)=0.500333
 TFRAC(3003)=0.5005 ;TFRAC(3004)=0.500667
 TFRAC(3005)=0.500833 ;TFRAC(3006)=0.501
 TFRAC(3007)=0.501167 ;TFRAC(3008)=0.501333
 TFRAC(3009)=0.5015 ;TFRAC(3010)=0.501667
 TFRAC(3011)=0.501833 ;TFRAC(3012)=0.502
 TFRAC(3013)=0.502167 ;TFRAC(3014)=0.502333
 TFRAC(3015)=0.5025 ;TFRAC(3016)=0.502667
 TFRAC(3017)=0.502833 ;TFRAC(3018)=0.503
 TFRAC(3019)=0.503167 ;TFRAC(3020)=0.503333
 TFRAC(3021)=0.5035 ;TFRAC(3022)=0.503667
 TFRAC(3023)=0.503833 ;TFRAC(3024)=0.504
 TFRAC(3025)=0.504167 ;TFRAC(3026)=0.504333
 TFRAC(3027)=0.5045 ;TFRAC(3028)=0.504667
 TFRAC(3029)=0.504833 ;TFRAC(3030)=0.505
 TFRAC(3031)=0.505167 ;TFRAC(3032)=0.505333
 TFRAC(3033)=0.5055 ;TFRAC(3034)=0.505667
 TFRAC(3035)=0.505833 ;TFRAC(3036)=0.506
 TFRAC(3037)=0.506167 ;TFRAC(3038)=0.506333
 TFRAC(3039)=0.5065 ;TFRAC(3040)=0.506667
 TFRAC(3041)=0.506833 ;TFRAC(3042)=0.507
 TFRAC(3043)=0.507167 ;TFRAC(3044)=0.507333
 TFRAC(3045)=0.5075 ;TFRAC(3046)=0.507667
 TFRAC(3047)=0.507833 ;TFRAC(3048)=0.508
 TFRAC(3049)=0.508167 ;TFRAC(3050)=0.508333
 TFRAC(3051)=0.5085 ;TFRAC(3052)=0.508667
 TFRAC(3053)=0.508833 ;TFRAC(3054)=0.509
 TFRAC(3055)=0.509167 ;TFRAC(3056)=0.509333
 TFRAC(3057)=0.5095 ;TFRAC(3058)=0.509667
 TFRAC(3059)=0.509833 ;TFRAC(3060)=0.51
 TFRAC(3061)=0.510167 ;TFRAC(3062)=0.510333
 TFRAC(3063)=0.5105 ;TFRAC(3064)=0.510667
 TFRAC(3065)=0.510833 ;TFRAC(3066)=0.511
 TFRAC(3067)=0.511167 ;TFRAC(3068)=0.511333
 TFRAC(3069)=0.5115 ;TFRAC(3070)=0.511667
 TFRAC(3071)=0.511833 ;TFRAC(3072)=0.512
 TFRAC(3073)=0.512167 ;TFRAC(3074)=0.512333
 TFRAC(3075)=0.5125 ;TFRAC(3076)=0.512667
 TFRAC(3077)=0.512833 ;TFRAC(3078)=0.513
 TFRAC(3079)=0.513167 ;TFRAC(3080)=0.513333
 TFRAC(3081)=0.5135 ;TFRAC(3082)=0.513667
 TFRAC(3083)=0.513833 ;TFRAC(3084)=0.514
 TFRAC(3085)=0.514167 ;TFRAC(3086)=0.514333
 TFRAC(3087)=0.5145 ;TFRAC(3088)=0.514667
 TFRAC(3089)=0.514833 ;TFRAC(3090)=0.515
 TFRAC(3091)=0.515167 ;TFRAC(3092)=0.515333
 TFRAC(3093)=0.5155 ;TFRAC(3094)=0.515667
 TFRAC(3095)=0.515833 ;TFRAC(3096)=0.516
 TFRAC(3097)=0.516167 ;TFRAC(3098)=0.516333
 TFRAC(3099)=0.5165 ;TFRAC(3100)=0.516667
 TFRAC(3101)=0.516833 ;TFRAC(3102)=0.517
 TFRAC(3103)=0.517167 ;TFRAC(3104)=0.517333
 TFRAC(3105)=0.5175 ;TFRAC(3106)=0.517667
 TFRAC(3107)=0.517833 ;TFRAC(3108)=0.518
 TFRAC(3109)=0.518167 ;TFRAC(3110)=0.518333
 TFRAC(3111)=0.5185 ;TFRAC(3112)=0.518667
 TFRAC(3113)=0.518833 ;TFRAC(3114)=0.519
 TFRAC(3115)=0.519167 ;TFRAC(3116)=0.519333
 TFRAC(3117)=0.5195 ;TFRAC(3118)=0.519667
 TFRAC(3119)=0.519833 ;TFRAC(3120)=0.52
 TFRAC(3121)=0.520167 ;TFRAC(3122)=0.520333
 TFRAC(3123)=0.5205 ;TFRAC(3124)=0.520667
 TFRAC(3125)=0.520833 ;TFRAC(3126)=0.521
 TFRAC(3127)=0.521167 ;TFRAC(3128)=0.521333
 TFRAC(3129)=0.5215 ;TFRAC(3130)=0.521667
 TFRAC(3131)=0.521833 ;TFRAC(3132)=0.522
 TFRAC(3133)=0.522167 ;TFRAC(3134)=0.522333
 TFRAC(3135)=0.5225 ;TFRAC(3136)=0.522667
 TFRAC(3137)=0.522833 ;TFRAC(3138)=0.523
 TFRAC(3139)=0.523167 ;TFRAC(3140)=0.523333
 TFRAC(3141)=0.5235 ;TFRAC(3142)=0.523667
 TFRAC(3143)=0.523833 ;TFRAC(3144)=0.524
 TFRAC(3145)=0.524167 ;TFRAC(3146)=0.524333
 TFRAC(3147)=0.5245 ;TFRAC(3148)=0.524667
 TFRAC(3149)=0.524833 ;TFRAC(3150)=0.525
 TFRAC(3151)=0.525167 ;TFRAC(3152)=0.525333
 TFRAC(3153)=0.5255 ;TFRAC(3154)=0.525667
 TFRAC(3155)=0.525833 ;TFRAC(3156)=0.526
 TFRAC(3157)=0.526167 ;TFRAC(3158)=0.526333
 TFRAC(3159)=0.5265 ;TFRAC(3160)=0.526667
 TFRAC(3161)=0.526833 ;TFRAC(3162)=0.527
 TFRAC(3163)=0.527167 ;TFRAC(3164)=0.527333
 TFRAC(3165)=0.5275 ;TFRAC(3166)=0.527667
 TFRAC(3167)=0.527833 ;TFRAC(3168)=0.528
 TFRAC(3169)=0.528167 ;TFRAC(3170)=0.528333
 TFRAC(3171)=0.5285 ;TFRAC(3172)=0.528667
 TFRAC(3173)=0.528833 ;TFRAC(3174)=0.529
 TFRAC(3175)=0.529167 ;TFRAC(3176)=0.529333
 TFRAC(3177)=0.5295 ;TFRAC(3178)=0.529667
 TFRAC(3179)=0.529833 ;TFRAC(3180)=0.53
 TFRAC(3181)=0.530167 ;TFRAC(3182)=0.530333
 TFRAC(3183)=0.5305 ;TFRAC(3184)=0.530667
 TFRAC(3185)=0.530833 ;TFRAC(3186)=0.531
 TFRAC(3187)=0.531167 ;TFRAC(3188)=0.531333
 TFRAC(3189)=0.5315 ;TFRAC(3190)=0.531667
 TFRAC(3191)=0.531833 ;TFRAC(3192)=0.532
 TFRAC(3193)=0.532167 ;TFRAC(3194)=0.532333
 TFRAC(3195)=0.5325 ;TFRAC(3196)=0.532667
 TFRAC(3197)=0.532833 ;TFRAC(3198)=0.533
 TFRAC(3199)=0.533167 ;TFRAC(3200)=0.533333
 TFRAC(3201)=0.5335 ;TFRAC(3202)=0.533667
 TFRAC(3203)=0.533833 ;TFRAC(3204)=0.534
 TFRAC(3205)=0.534167 ;TFRAC(3206)=0.534333
 TFRAC(3207)=0.5345 ;TFRAC(3208)=0.534667
 TFRAC(3209)=0.534833 ;TFRAC(3210)=0.535
 TFRAC(3211)=0.535167 ;TFRAC(3212)=0.535333
 TFRAC(3213)=0.5355 ;TFRAC(3214)=0.535667
 TFRAC(3215)=0.535833 ;TFRAC(3216)=0.536
 TFRAC(3217)=0.536167 ;TFRAC(3218)=0.536333
 TFRAC(3219)=0.5365 ;TFRAC(3220)=0.536667
 TFRAC(3221)=0.536833 ;TFRAC(3222)=0.537
 TFRAC(3223)=0.537167 ;TFRAC(3224)=0.537333
 TFRAC(3225)=0.5375 ;TFRAC(3226)=0.537667
 TFRAC(3227)=0.537833 ;TFRAC(3228)=0.538
 TFRAC(3229)=0.538167 ;TFRAC(3230)=0.538333
 TFRAC(3231)=0.5385 ;TFRAC(3232)=0.538667
 TFRAC(3233)=0.538833 ;TFRAC(3234)=0.539
 TFRAC(3235)=0.539167 ;TFRAC(3236)=0.539333
 TFRAC(3237)=0.5395 ;TFRAC(3238)=0.539667
 TFRAC(3239)=0.539833 ;TFRAC(3240)=0.54
 TFRAC(3241)=0.540167 ;TFRAC(3242)=0.540333
 TFRAC(3243)=0.5405 ;TFRAC(3244)=0.540667
 TFRAC(3245)=0.540833 ;TFRAC(3246)=0.541
 TFRAC(3247)=0.541167 ;TFRAC(3248)=0.541333
 TFRAC(3249)=0.5415 ;TFRAC(3250)=0.541667
 TFRAC(3251)=0.541833 ;TFRAC(3252)=0.542
 TFRAC(3253)=0.542167 ;TFRAC(3254)=0.542333
 TFRAC(3255)=0.5425 ;TFRAC(3256)=0.542667
 TFRAC(3257)=0.542833 ;TFRAC(3258)=0.543
 TFRAC(3259)=0.543167 ;TFRAC(3260)=0.543333
 TFRAC(3261)=0.5435 ;TFRAC(3262)=0.543667
 TFRAC(3263)=0.543833 ;TFRAC(3264)=0.544
 TFRAC(3265)=0.544167 ;TFRAC(3266)=0.544333
 TFRAC(3267)=0.5445 ;TFRAC(3268)=0.544667
 TFRAC(3269)=0.544833 ;TFRAC(3270)=0.545
 TFRAC(3271)=0.545167 ;TFRAC(3272)=0.545333
 TFRAC(3273)=0.5455 ;TFRAC(3274)=0.545667
 TFRAC(3275)=0.545833 ;TFRAC(3276)=0.546
 TFRAC(3277)=0.546167 ;TFRAC(3278)=0.546333
 TFRAC(3279)=0.5465 ;TFRAC(3280)=0.546667
 TFRAC(3281)=0.546833 ;TFRAC(3282)=0.547
 TFRAC(3283)=0.547167 ;TFRAC(3284)=0.547333
 TFRAC(3285)=0.5475 ;TFRAC(3286)=0.547667
 TFRAC(3287)=0.547833 ;TFRAC(3288)=0.548
 TFRAC(3289)=0.548167 ;TFRAC(3290)=0.548333
 TFRAC(3291)=0.5485 ;TFRAC(3292)=0.548667
 TFRAC(3293)=0.548833 ;TFRAC(3294)=0.549
 TFRAC(3295)=0.549167 ;TFRAC(3296)=0.549333
 TFRAC(3297)=0.5495 ;TFRAC(3298)=0.549667
 TFRAC(3299)=0.549833 ;TFRAC(3300)=0.55
 TFRAC(3301)=0.550167 ;TFRAC(3302)=0.550333
 TFRAC(3303)=0.5505 ;TFRAC(3304)=0.550667
 TFRAC(3305)=0.550833 ;TFRAC(3306)=0.551
 TFRAC(3307)=0.551167 ;TFRAC(3308)=0.551333
 TFRAC(3309)=0.5515 ;TFRAC(3310)=0.551667
 TFRAC(3311)=0.551833 ;TFRAC(3312)=0.552
 TFRAC(3313)=0.552167 ;TFRAC(3314)=0.552333
 TFRAC(3315)=0.5525 ;TFRAC(3316)=0.552667
 TFRAC(3317)=0.552833 ;TFRAC(3318)=0.553
 TFRAC(3319)=0.553167 ;TFRAC(3320)=0.553333
 TFRAC(3321)=0.5535 ;TFRAC(3322)=0.553667
 TFRAC(3323)=0.553833 ;TFRAC(3324)=0.554
 TFRAC(3325)=0.554167 ;TFRAC(3326)=0.554333
 TFRAC(3327)=0.5545 ;TFRAC(3328)=0.554667
 TFRAC(3329)=0.554833 ;TFRAC(3330)=0.555
 TFRAC(3331)=0.555167 ;TFRAC(3332)=0.555333
 TFRAC(3333)=0.5555 ;TFRAC(3334)=0.555667
 TFRAC(3335)=0.555833 ;TFRAC(3336)=0.556
 TFRAC(3337)=0.556167 ;TFRAC(3338)=0.556333
 TFRAC(3339)=0.5565 ;TFRAC(3340)=0.556667
 TFRAC(3341)=0.556833 ;TFRAC(3342)=0.557
 TFRAC(3343)=0.557167 ;TFRAC(3344)=0.557333
 TFRAC(3345)=0.5575 ;TFRAC(3346)=0.557667
 TFRAC(3347)=0.557833 ;TFRAC(3348)=0.558
 TFRAC(3349)=0.558167 ;TFRAC(3350)=0.558333
 TFRAC(3351)=0.5585 ;TFRAC(3352)=0.558667
 TFRAC(3353)=0.558833 ;TFRAC(3354)=0.559
 TFRAC(3355)=0.559167 ;TFRAC(3356)=0.559333
 TFRAC(3357)=0.5595 ;TFRAC(3358)=0.559667
 TFRAC(3359)=0.559833 ;TFRAC(3360)=0.56
 TFRAC(3361)=0.560167 ;TFRAC(3362)=0.560333
 TFRAC(3363)=0.5605 ;TFRAC(3364)=0.560667
 TFRAC(3365)=0.560833 ;TFRAC(3366)=0.561
 TFRAC(3367)=0.561167 ;TFRAC(3368)=0.561333
 TFRAC(3369)=0.5615 ;TFRAC(3370)=0.561667
 TFRAC(3371)=0.561833 ;TFRAC(3372)=0.562
 TFRAC(3373)=0.562167 ;TFRAC(3374)=0.562333
 TFRAC(3375)=0.5625 ;TFRAC(3376)=0.562667
 TFRAC(3377)=0.562833 ;TFRAC(3378)=0.563
 TFRAC(3379)=0.563167 ;TFRAC(3380)=0.563333
 TFRAC(3381)=0.5635 ;TFRAC(3382)=0.563667
 TFRAC(3383)=0.563833 ;TFRAC(3384)=0.564
 TFRAC(3385)=0.564167 ;TFRAC(3386)=0.564333
 TFRAC(3387)=0.5645 ;TFRAC(3388)=0.564667
 TFRAC(3389)=0.564833 ;TFRAC(3390)=0.565
 TFRAC(3391)=0.565167 ;TFRAC(3392)=0.565333
 TFRAC(3393)=0.5655 ;TFRAC(3394)=0.565667
 TFRAC(3395)=0.565833 ;TFRAC(3396)=0.566
 TFRAC(3397)=0.566167 ;TFRAC(3398)=0.566333
 TFRAC(3399)=0.5665 ;TFRAC(3400)=0.566667
 TFRAC(3401)=0.566833 ;TFRAC(3402)=0.567
 TFRAC(3403)=0.567167 ;TFRAC(3404)=0.567333
 TFRAC(3405)=0.5675 ;TFRAC(3406)=0.567667
 TFRAC(3407)=0.567833 ;TFRAC(3408)=0.568
 TFRAC(3409)=0.568167 ;TFRAC(3410)=0.568333
 TFRAC(3411)=0.5685 ;TFRAC(3412)=0.568667
 TFRAC(3413)=0.568833 ;TFRAC(3414)=0.569
 TFRAC(3415)=0.569167 ;TFRAC(3416)=0.569333
 TFRAC(3417)=0.5695 ;TFRAC(3418)=0.569667
 TFRAC(3419)=0.569833 ;TFRAC(3420)=0.57
 TFRAC(3421)=0.570167 ;TFRAC(3422)=0.570333
 TFRAC(3423)=0.5705 ;TFRAC(3424)=0.570667
 TFRAC(3425)=0.570833 ;TFRAC(3426)=0.571
 TFRAC(3427)=0.571167 ;TFRAC(3428)=0.571333
 TFRAC(3429)=0.5715 ;TFRAC(3430)=0.571667
 TFRAC(3431)=0.571833 ;TFRAC(3432)=0.572
 TFRAC(3433)=0.572167 ;TFRAC(3434)=0.572333
 TFRAC(3435)=0.5725 ;TFRAC(3436)=0.572667
 TFRAC(3437)=0.572833 ;TFRAC(3438)=0.573
 TFRAC(3439)=0.573167 ;TFRAC(3440)=0.573333
 TFRAC(3441)=0.5735 ;TFRAC(3442)=0.573667
 TFRAC(3443)=0.573833 ;TFRAC(3444)=0.574
 TFRAC(3445)=0.574167 ;TFRAC(3446)=0.574333
 TFRAC(3447)=0.5745 ;TFRAC(3448)=0.574667
 TFRAC(3449)=0.574833 ;TFRAC(3450)=0.575
 TFRAC(3451)=0.575167 ;TFRAC(3452)=0.575333
 TFRAC(3453)=0.5755 ;TFRAC(3454)=0.575667
 TFRAC(3455)=0.575833 ;TFRAC(3456)=0.576
 TFRAC(3457)=0.576167 ;TFRAC(3458)=0.576333
 TFRAC(3459)=0.5765 ;TFRAC(3460)=0.576667
 TFRAC(3461)=0.576833 ;TFRAC(3462)=0.577
 TFRAC(3463)=0.577167 ;TFRAC(3464)=0.577333
 TFRAC(3465)=0.5775 ;TFRAC(3466)=0.577667
 TFRAC(3467)=0.577833 ;TFRAC(3468)=0.578
 TFRAC(3469)=0.578167 ;TFRAC(3470)=0.578333
 TFRAC(3471)=0.5785 ;TFRAC(3472)=0.578667
 TFRAC(3473)=0.578833 ;TFRAC(3474)=0.579
 TFRAC(3475)=0.579167 ;TFRAC(3476)=0.579333
 TFRAC(3477)=0.5795 ;TFRAC(3478)=0.579667
 TFRAC(3479)=0.579833 ;TFRAC(3480)=0.58
 TFRAC(3481)=0.580167 ;TFRAC(3482)=0.580333
 TFRAC(3483)=0.5805 ;TFRAC(3484)=0.580667
 TFRAC(3485)=0.580833 ;TFRAC(3486)=0.581
 TFRAC(3487)=0.581167 ;TFRAC(3488)=0.581333
 TFRAC(3489)=0.5815 ;TFRAC(3490)=0.581667
 TFRAC(3491)=0.581833 ;TFRAC(3492)=0.582
 TFRAC(3493)=0.582167 ;TFRAC(3494)=0.582333
 TFRAC(3495)=0.5825 ;TFRAC(3496)=0.582667
 TFRAC(3497)=0.582833 ;TFRAC(3498)=0.583
 TFRAC(3499)=0.583167 ;TFRAC(3500)=0.583333
 TFRAC(3501)=0.5835 ;TFRAC(3502)=0.583667
 TFRAC(3503)=0.583833 ;TFRAC(3504)=0.584
 TFRAC(3505)=0.584167 ;TFRAC(3506)=0.584333
 TFRAC(3507)=0.5845 ;TFRAC(3508)=0.584667
 TFRAC(3509)=0.584833 ;TFRAC(3510)=0.585
 TFRAC(3511)=0.585167 ;TFRAC(3512)=0.585333
 TFRAC(3513)=0.5855 ;TFRAC(3514)=0.585667
 TFRAC(3515)=0.585833 ;TFRAC(3516)=0.586
 TFRAC(3517)=0.586167 ;TFRAC(3518)=0.586333
 TFRAC(3519)=0.5865 ;TFRAC(3520)=0.586667
 TFRAC(3521)=0.586833 ;TFRAC(3522)=0.587
 TFRAC(3523)=0.587167 ;TFRAC(3524)=0.587333
 TFRAC(3525)=0.5875 ;TFRAC(3526)=0.587667
 TFRAC(3527)=0.587833 ;TFRAC(3528)=0.588
 TFRAC(3529)=0.588167 ;TFRAC(3530)=0.588333
 TFRAC(3531)=0.5885 ;TFRAC(3532)=0.588667
 TFRAC(3533)=0.588833 ;TFRAC(3534)=0.589
 TFRAC(3535)=0.589167 ;TFRAC(3536)=0.589333
 TFRAC(3537)=0.5895 ;TFRAC(3538)=0.589667
 TFRAC(3539)=0.589833 ;TFRAC(3540)=0.59
 TFRAC(3541)=0.590167 ;TFRAC(3542)=0.590333
 TFRAC(3543)=0.5905 ;TFRAC(3544)=0.590667
 TFRAC(3545)=0.590833 ;TFRAC(3546)=0.591
 TFRAC(3547)=0.591167 ;TFRAC(3548)=0.591333
 TFRAC(3549)=0.5915 ;TFRAC(3550)=0.591667
 TFRAC(3551)=0.591833 ;TFRAC(3552)=0.592
 TFRAC(3553)=0.592167 ;TFRAC(3554)=0.592333
 TFRAC(3555)=0.5925 ;TFRAC(3556)=0.592667
 TFRAC(3557)=0.592833 ;TFRAC(3558)=0.593
 TFRAC(3559)=0.593167 ;TFRAC(3560)=0.593333
 TFRAC(3561)=0.5935 ;TFRAC(3562)=0.593667
 TFRAC(3563)=0.593833 ;TFRAC(3564)=0.594
 TFRAC(3565)=0.594167 ;TFRAC(3566)=0.594333
 TFRAC(3567)=0.5945 ;TFRAC(3568)=0.594667
 TFRAC(3569)=0.594833 ;TFRAC(3570)=0.595
 TFRAC(3571)=0.595167 ;TFRAC(3572)=0.595333
 TFRAC(3573)=0.5955 ;TFRAC(3574)=0.595667
 TFRAC(3575)=0.595833 ;TFRAC(3576)=0.596
 TFRAC(3577)=0.596167 ;TFRAC(3578)=0.596333
 TFRAC(3579)=0.5965 ;TFRAC(3580)=0.596667
 TFRAC(3581)=0.596833 ;TFRAC(3582)=0.597
 TFRAC(3583)=0.597167 ;TFRAC(3584)=0.597333
 TFRAC(3585)=0.5975 ;TFRAC(3586)=0.597667
 TFRAC(3587)=0.597833 ;TFRAC(3588)=0.598
 TFRAC(3589)=0.598167 ;TFRAC(3590)=0.598333
 TFRAC(3591)=0.5985 ;TFRAC(3592)=0.598667
 TFRAC(3593)=0.598833 ;TFRAC(3594)=0.599
 TFRAC(3595)=0.599167 ;TFRAC(3596)=0.599333
 TFRAC(3597)=0.5995 ;TFRAC(3598)=0.599667
 TFRAC(3599)=0.599833 ;TFRAC(3600)=0.6
 TFRAC(3601)=0.600167 ;TFRAC(3602)=0.600333
 TFRAC(3603)=0.6005 ;TFRAC(3604)=0.600667
 TFRAC(3605)=0.600833 ;TFRAC(3606)=0.601
 TFRAC(3607)=0.601167 ;TFRAC(3608)=0.601333
 TFRAC(3609)=0.6015 ;TFRAC(3610)=0.601667
 TFRAC(3611)=0.601833 ;TFRAC(3612)=0.602
 TFRAC(3613)=0.602167 ;TFRAC(3614)=0.602333
 TFRAC(3615)=0.6025 ;TFRAC(3616)=0.602667
 TFRAC(3617)=0.602833 ;TFRAC(3618)=0.603
 TFRAC(3619)=0.603167 ;TFRAC(3620)=0.603333
 TFRAC(3621)=0.6035 ;TFRAC(3622)=0.603667
 TFRAC(3623)=0.603833 ;TFRAC(3624)=0.604
 TFRAC(3625)=0.604167 ;TFRAC(3626)=0.604333
 TFRAC(3627)=0.6045 ;TFRAC(3628)=0.604667
 TFRAC(3629)=0.604833 ;TFRAC(3630)=0.605
 TFRAC(3631)=0.605167 ;TFRAC(3632)=0.605333
 TFRAC(3633)=0.6055 ;TFRAC(3634)=0.605667
 TFRAC(3635)=0.605833 ;TFRAC(3636)=0.606
 TFRAC(3637)=0.606167 ;TFRAC(3638)=0.606333
 TFRAC(3639)=0.6065 ;TFRAC(3640)=0.606667
 TFRAC(3641)=0.606833 ;TFRAC(3642)=0.607
 TFRAC(3643)=0.607167 ;TFRAC(3644)=0.607333
 TFRAC(3645)=0.6075 ;TFRAC(3646)=0.607667
 TFRAC(3647)=0.607833 ;TFRAC(3648)=0.608
 TFRAC(3649)=0.608167 ;TFRAC(3650)=0.608333
 TFRAC(3651)=0.6085 ;TFRAC(3652)=0.608667
 TFRAC(3653)=0.608833 ;TFRAC(3654)=0.609
 TFRAC(3655)=0.609167 ;TFRAC(3656)=0.609333
 TFRAC(3657)=0.6095 ;TFRAC(3658)=0.609667
 TFRAC(3659)=0.609833 ;TFRAC(3660)=0.61
 TFRAC(3661)=0.610167 ;TFRAC(3662)=0.610333
 TFRAC(3663)=0.6105 ;TFRAC(3664)=0.610667
 TFRAC(3665)=0.610833 ;TFRAC(3666)=0.611
 TFRAC(3667)=0.611167 ;TFRAC(3668)=0.611333
 TFRAC(3669)=0.6115 ;TFRAC(3670)=0.611667
 TFRAC(3671)=0.611833 ;TFRAC(3672)=0.612
 TFRAC(3673)=0.612167 ;TFRAC(3674)=0.612333
 TFRAC(3675)=0.6125 ;TFRAC(3676)=0.612667
 TFRAC(3677)=0.612833 ;TFRAC(3678)=0.613
 TFRAC(3679)=0.613167 ;TFRAC(3680)=0.613333
 TFRAC(3681)=0.6135 ;TFRAC(3682)=0.613667
 TFRAC(3683)=0.613833 ;TFRAC(3684)=0.614
 TFRAC(3685)=0.614167 ;TFRAC(3686)=0.614333
 TFRAC(3687)=0.6145 ;TFRAC(3688)=0.614667
 TFRAC(3689)=0.614833 ;TFRAC(3690)=0.615
 TFRAC(3691)=0.615167 ;TFRAC(3692)=0.615333
 TFRAC(3693)=0.6155 ;TFRAC(3694)=0.615667
 TFRAC(3695)=0.615833 ;TFRAC(3696)=0.616
 TFRAC(3697)=0.616167 ;TFRAC(3698)=0.616333
 TFRAC(3699)=0.6165 ;TFRAC(3700)=0.616667
 TFRAC(3701)=0.616833 ;TFRAC(3702)=0.617
 TFRAC(3703)=0.617167 ;TFRAC(3704)=0.617333
 TFRAC(3705)=0.6175 ;TFRAC(3706)=0.617667
 TFRAC(3707)=0.617833 ;TFRAC(3708)=0.618
 TFRAC(3709)=0.618167 ;TFRAC(3710)=0.618333
 TFRAC(3711)=0.6185 ;TFRAC(3712)=0.618667
 TFRAC(3713)=0.618833 ;TFRAC(3714)=0.619
 TFRAC(3715)=0.619167 ;TFRAC(3716)=0.619333
 TFRAC(3717)=0.6195 ;TFRAC(3718)=0.619667
 TFRAC(3719)=0.619833 ;TFRAC(3720)=0.62
 TFRAC(3721)=0.620167 ;TFRAC(3722)=0.620333
 TFRAC(3723)=0.6205 ;TFRAC(3724)=0.620667
 TFRAC(3725)=0.620833 ;TFRAC(3726)=0.621
 TFRAC(3727)=0.621167 ;TFRAC(3728)=0.621333
 TFRAC(3729)=0.6215 ;TFRAC(3730)=0.621667
 TFRAC(3731)=0.621833 ;TFRAC(3732)=0.622
 TFRAC(3733)=0.622167 ;TFRAC(3734)=0.622333
 TFRAC(3735)=0.6225 ;TFRAC(3736)=0.622667
 TFRAC(3737)=0.622833 ;TFRAC(3738)=0.623
 TFRAC(3739)=0.623167 ;TFRAC(3740)=0.623333
 TFRAC(3741)=0.6235 ;TFRAC(3742)=0.623667
 TFRAC(3743)=0.623833 ;TFRAC(3744)=0.624
 TFRAC(3745)=0.624167 ;TFRAC(3746)=0.624333
 TFRAC(3747)=0.6245 ;TFRAC(3748)=0.624667
 TFRAC(3749)=0.624833 ;TFRAC(3750)=0.625
 TFRAC(3751)=0.625167 ;TFRAC(3752)=0.625333
 TFRAC(3753)=0.6255 ;TFRAC(3754)=0.625667
 TFRAC(3755)=0.625833 ;TFRAC(3756)=0.626
 TFRAC(3757)=0.626167 ;TFRAC(3758)=0.626333
 TFRAC(3759)=0.6265 ;TFRAC(3760)=0.626667
 TFRAC(3761)=0.626833 ;TFRAC(3762)=0.627
 TFRAC(3763)=0.627167 ;TFRAC(3764)=0.627333
 TFRAC(3765)=0.6275 ;TFRAC(3766)=0.627667
 TFRAC(3767)=0.627833 ;TFRAC(3768)=0.628
 TFRAC(3769)=0.628167 ;TFRAC(3770)=0.628333
 TFRAC(3771)=0.6285 ;TFRAC(3772)=0.628667
 TFRAC(3773)=0.628833 ;TFRAC(3774)=0.629
 TFRAC(3775)=0.629167 ;TFRAC(3776)=0.629333
 TFRAC(3777)=0.6295 ;TFRAC(3778)=0.629667
 TFRAC(3779)=0.629833 ;TFRAC(3780)=0.63
 TFRAC(3781)=0.630167 ;TFRAC(3782)=0.630333
 TFRAC(3783)=0.6305 ;TFRAC(3784)=0.630667
 TFRAC(3785)=0.630833 ;TFRAC(3786)=0.631
 TFRAC(3787)=0.631167 ;TFRAC(3788)=0.631333
 TFRAC(3789)=0.6315 ;TFRAC(3790)=0.631667
 TFRAC(3791)=0.631833 ;TFRAC(3792)=0.632
 TFRAC(3793)=0.632167 ;TFRAC(3794)=0.632333
 TFRAC(3795)=0.6325 ;TFRAC(3796)=0.632667
 TFRAC(3797)=0.632833 ;TFRAC(3798)=0.633
 TFRAC(3799)=0.633167 ;TFRAC(3800)=0.633333
 TFRAC(3801)=0.6335 ;TFRAC(3802)=0.633667
 TFRAC(3803)=0.633833 ;TFRAC(3804)=0.634
 TFRAC(3805)=0.634167 ;TFRAC(3806)=0.634333
 TFRAC(3807)=0.6345 ;TFRAC(3808)=0.634667
 TFRAC(3809)=0.634833 ;TFRAC(3810)=0.635
 TFRAC(3811)=0.635167 ;TFRAC(3812)=0.635333
 TFRAC(3813)=0.6355 ;TFRAC(3814)=0.635667
 TFRAC(3815)=0.635833 ;TFRAC(3816)=0.636
 TFRAC(3817)=0.636167 ;TFRAC(3818)=0.636333
 TFRAC(3819)=0.6365 ;TFRAC(3820)=0.636667
 TFRAC(3821)=0.636833 ;TFRAC(3822)=0.637
 TFRAC(3823)=0.637167 ;TFRAC(3824)=0.637333
 TFRAC(3825)=0.6375 ;TFRAC(3826)=0.637667
 TFRAC(3827)=0.637833 ;TFRAC(3828)=0.638
 TFRAC(3829)=0.638167 ;TFRAC(3830)=0.638333
 TFRAC(3831)=0.6385 ;TFRAC(3832)=0.638667
 TFRAC(3833)=0.638833 ;TFRAC(3834)=0.639
 TFRAC(3835)=0.639167 ;TFRAC(3836)=0.639333
 TFRAC(3837)=0.6395 ;TFRAC(3838)=0.639667
 TFRAC(3839)=0.639833 ;TFRAC(3840)=0.64
 TFRAC(3841)=0.640167 ;TFRAC(3842)=0.640333
 TFRAC(3843)=0.6405 ;TFRAC(3844)=0.640667
 TFRAC(3845)=0.640833 ;TFRAC(3846)=0.641
 TFRAC(3847)=0.641167 ;TFRAC(3848)=0.641333
 TFRAC(3849)=0.6415 ;TFRAC(3850)=0.641667
 TFRAC(3851)=0.641833 ;TFRAC(3852)=0.642
 TFRAC(3853)=0.642167 ;TFRAC(3854)=0.642333
 TFRAC(3855)=0.6425 ;TFRAC(3856)=0.642667
 TFRAC(3857)=0.642833 ;TFRAC(3858)=0.643
 TFRAC(3859)=0.643167 ;TFRAC(3860)=0.643333
 TFRAC(3861)=0.6435 ;TFRAC(3862)=0.643667
 TFRAC(3863)=0.643833 ;TFRAC(3864)=0.644
 TFRAC(3865)=0.644167 ;TFRAC(3866)=0.644333
 TFRAC(3867)=0.6445 ;TFRAC(3868)=0.644667
 TFRAC(3869)=0.644833 ;TFRAC(3870)=0.645
 TFRAC(3871)=0.645167 ;TFRAC(3872)=0.645333
 TFRAC(3873)=0.6455 ;TFRAC(3874)=0.645667
 TFRAC(3875)=0.645833 ;TFRAC(3876)=0.646
 TFRAC(3877)=0.646167 ;TFRAC(3878)=0.646333
 TFRAC(3879)=0.6465 ;TFRAC(3880)=0.646667
 TFRAC(3881)=0.646833 ;TFRAC(3882)=0.647
 TFRAC(3883)=0.647167 ;TFRAC(3884)=0.647333
 TFRAC(3885)=0.6475 ;TFRAC(3886)=0.647667
 TFRAC(3887)=0.647833 ;TFRAC(3888)=0.648
 TFRAC(3889)=0.648167 ;TFRAC(3890)=0.648333
 TFRAC(3891)=0.6485 ;TFRAC(3892)=0.648667
 TFRAC(3893)=0.648833 ;TFRAC(3894)=0.649
 TFRAC(3895)=0.649167 ;TFRAC(3896)=0.649333
 TFRAC(3897)=0.6495 ;TFRAC(3898)=0.649667
 TFRAC(3899)=0.649833 ;TFRAC(3900)=0.65
 TFRAC(3901)=0.650167 ;TFRAC(3902)=0.650333
 TFRAC(3903)=0.6505 ;TFRAC(3904)=0.650667
 TFRAC(3905)=0.650833 ;TFRAC(3906)=0.651
 TFRAC(3907)=0.651167 ;TFRAC(3908)=0.651333
 TFRAC(3909)=0.6515 ;TFRAC(3910)=0.651667
 TFRAC(3911)=0.651833 ;TFRAC(3912)=0.652
 TFRAC(3913)=0.652167 ;TFRAC(3914)=0.652333
 TFRAC(3915)=0.6525 ;TFRAC(3916)=0.652667
 TFRAC(3917)=0.652833 ;TFRAC(3918)=0.653
 TFRAC(3919)=0.653167 ;TFRAC(3920)=0.653333
 TFRAC(3921)=0.6535 ;TFRAC(3922)=0.653667
 TFRAC(3923)=0.653833 ;TFRAC(3924)=0.654
 TFRAC(3925)=0.654167 ;TFRAC(3926)=0.654333
 TFRAC(3927)=0.6545 ;TFRAC(3928)=0.654667
 TFRAC(3929)=0.654833 ;TFRAC(3930)=0.655
 TFRAC(3931)=0.655167 ;TFRAC(3932)=0.655333
 TFRAC(3933)=0.6555 ;TFRAC(3934)=0.655667
 TFRAC(3935)=0.655833 ;TFRAC(3936)=0.656
 TFRAC(3937)=0.656167 ;TFRAC(3938)=0.656333
 TFRAC(3939)=0.6565 ;TFRAC(3940)=0.656667
 TFRAC(3941)=0.656833 ;TFRAC(3942)=0.657
 TFRAC(3943)=0.657167 ;TFRAC(3944)=0.657333
 TFRAC(3945)=0.6575 ;TFRAC(3946)=0.657667
 TFRAC(3947)=0.657833 ;TFRAC(3948)=0.658
 TFRAC(3949)=0.658167 ;TFRAC(3950)=0.658333
 TFRAC(3951)=0.6585 ;TFRAC(3952)=0.658667
 TFRAC(3953)=0.658833 ;TFRAC(3954)=0.659
 TFRAC(3955)=0.659167 ;TFRAC(3956)=0.659333
 TFRAC(3957)=0.6595 ;TFRAC(3958)=0.659667
 TFRAC(3959)=0.659833 ;TFRAC(3960)=0.66
 TFRAC(3961)=0.660167 ;TFRAC(3962)=0.660333
 TFRAC(3963)=0.6605 ;TFRAC(3964)=0.660667
 TFRAC(3965)=0.660833 ;TFRAC(3966)=0.661
 TFRAC(3967)=0.661167 ;TFRAC(3968)=0.661333
 TFRAC(3969)=0.6615 ;TFRAC(3970)=0.661667
 TFRAC(3971)=0.661833 ;TFRAC(3972)=0.662
 TFRAC(3973)=0.662167 ;TFRAC(3974)=0.662333
 TFRAC(3975)=0.6625 ;TFRAC(3976)=0.662667
 TFRAC(3977)=0.662833 ;TFRAC(3978)=0.663
 TFRAC(3979)=0.663167 ;TFRAC(3980)=0.663333
 TFRAC(3981)=0.6635 ;TFRAC(3982)=0.663667
 TFRAC(3983)=0.663833 ;TFRAC(3984)=0.664
 TFRAC(3985)=0.664167 ;TFRAC(3986)=0.664333
 TFRAC(3987)=0.6645 ;TFRAC(3988)=0.664667
 TFRAC(3989)=0.664833 ;TFRAC(3990)=0.665
 TFRAC(3991)=0.665167 ;TFRAC(3992)=0.665333
 TFRAC(3993)=0.6655 ;TFRAC(3994)=0.665667
 TFRAC(3995)=0.665833 ;TFRAC(3996)=0.666
 TFRAC(3997)=0.666167 ;TFRAC(3998)=0.666333
 TFRAC(3999)=0.6665 ;TFRAC(4000)=0.666667
 TFRAC(4001)=0.666833 ;TFRAC(4002)=0.667
 TFRAC(4003)=0.667167 ;TFRAC(4004)=0.667333
 TFRAC(4005)=0.6675 ;TFRAC(4006)=0.667667
 TFRAC(4007)=0.667833 ;TFRAC(4008)=0.668
 TFRAC(4009)=0.668167 ;TFRAC(4010)=0.668333
 TFRAC(4011)=0.6685 ;TFRAC(4012)=0.668667
 TFRAC(4013)=0.668833 ;TFRAC(4014)=0.669
 TFRAC(4015)=0.669167 ;TFRAC(4016)=0.669333
 TFRAC(4017)=0.6695 ;TFRAC(4018)=0.669667
 TFRAC(4019)=0.669833 ;TFRAC(4020)=0.67
 TFRAC(4021)=0.670167 ;TFRAC(4022)=0.670333
 TFRAC(4023)=0.6705 ;TFRAC(4024)=0.670667
 TFRAC(4025)=0.670833 ;TFRAC(4026)=0.671
 TFRAC(4027)=0.671167 ;TFRAC(4028)=0.671333
 TFRAC(4029)=0.6715 ;TFRAC(4030)=0.671667
 TFRAC(4031)=0.671833 ;TFRAC(4032)=0.672
 TFRAC(4033)=0.672167 ;TFRAC(4034)=0.672333
 TFRAC(4035)=0.6725 ;TFRAC(4036)=0.672667
 TFRAC(4037)=0.672833 ;TFRAC(4038)=0.673
 TFRAC(4039)=0.673167 ;TFRAC(4040)=0.673333
 TFRAC(4041)=0.6735 ;TFRAC(4042)=0.673667
 TFRAC(4043)=0.673833 ;TFRAC(4044)=0.674
 TFRAC(4045)=0.674167 ;TFRAC(4046)=0.674333
 TFRAC(4047)=0.6745 ;TFRAC(4048)=0.674667
 TFRAC(4049)=0.674833 ;TFRAC(4050)=0.675
 TFRAC(4051)=0.675167 ;TFRAC(4052)=0.675333
 TFRAC(4053)=0.6755 ;TFRAC(4054)=0.675667
 TFRAC(4055)=0.675833 ;TFRAC(4056)=0.676
 TFRAC(4057)=0.676167 ;TFRAC(4058)=0.676333
 TFRAC(4059)=0.6765 ;TFRAC(4060)=0.676667
 TFRAC(4061)=0.676833 ;TFRAC(4062)=0.677
 TFRAC(4063)=0.677167 ;TFRAC(4064)=0.677333
 TFRAC(4065)=0.6775 ;TFRAC(4066)=0.677667
 TFRAC(4067)=0.677833 ;TFRAC(4068)=0.678
 TFRAC(4069)=0.678167 ;TFRAC(4070)=0.678333
 TFRAC(4071)=0.6785 ;TFRAC(4072)=0.678667
 TFRAC(4073)=0.678833 ;TFRAC(4074)=0.679
 TFRAC(4075)=0.679167 ;TFRAC(4076)=0.679333
 TFRAC(4077)=0.6795 ;TFRAC(4078)=0.679667
 TFRAC(4079)=0.679833 ;TFRAC(4080)=0.68
 TFRAC(4081)=0.680167 ;TFRAC(4082)=0.680333
 TFRAC(4083)=0.6805 ;TFRAC(4084)=0.680667
 TFRAC(4085)=0.680833 ;TFRAC(4086)=0.681
 TFRAC(4087)=0.681167 ;TFRAC(4088)=0.681333
 TFRAC(4089)=0.6815 ;TFRAC(4090)=0.681667
 TFRAC(4091)=0.681833 ;TFRAC(4092)=0.682
 TFRAC(4093)=0.682167 ;TFRAC(4094)=0.682333
 TFRAC(4095)=0.6825 ;TFRAC(4096)=0.682667
 TFRAC(4097)=0.682833 ;TFRAC(4098)=0.683
 TFRAC(4099)=0.683167 ;TFRAC(4100)=0.683333
 TFRAC(4101)=0.6835 ;TFRAC(4102)=0.683667
 TFRAC(4103)=0.683833 ;TFRAC(4104)=0.684
 TFRAC(4105)=0.684167 ;TFRAC(4106)=0.684333
 TFRAC(4107)=0.6845 ;TFRAC(4108)=0.684667
 TFRAC(4109)=0.684833 ;TFRAC(4110)=0.685
 TFRAC(4111)=0.685167 ;TFRAC(4112)=0.685333
 TFRAC(4113)=0.6855 ;TFRAC(4114)=0.685667
 TFRAC(4115)=0.685833 ;TFRAC(4116)=0.686
 TFRAC(4117)=0.686167 ;TFRAC(4118)=0.686333
 TFRAC(4119)=0.6865 ;TFRAC(4120)=0.686667
 TFRAC(4121)=0.686833 ;TFRAC(4122)=0.687
 TFRAC(4123)=0.687167 ;TFRAC(4124)=0.687333
 TFRAC(4125)=0.6875 ;TFRAC(4126)=0.687667
 TFRAC(4127)=0.687833 ;TFRAC(4128)=0.688
 TFRAC(4129)=0.688167 ;TFRAC(4130)=0.688333
 TFRAC(4131)=0.6885 ;TFRAC(4132)=0.688667
 TFRAC(4133)=0.688833 ;TFRAC(4134)=0.689
 TFRAC(4135)=0.689167 ;TFRAC(4136)=0.689333
 TFRAC(4137)=0.6895 ;TFRAC(4138)=0.689667
 TFRAC(4139)=0.689833 ;TFRAC(4140)=0.69
 TFRAC(4141)=0.690167 ;TFRAC(4142)=0.690333
 TFRAC(4143)=0.6905 ;TFRAC(4144)=0.690667
 TFRAC(4145)=0.690833 ;TFRAC(4146)=0.691
 TFRAC(4147)=0.691167 ;TFRAC(4148)=0.691333
 TFRAC(4149)=0.6915 ;TFRAC(4150)=0.691667
 TFRAC(4151)=0.691833 ;TFRAC(4152)=0.692
 TFRAC(4153)=0.692167 ;TFRAC(4154)=0.692333
 TFRAC(4155)=0.6925 ;TFRAC(4156)=0.692667
 TFRAC(4157)=0.692833 ;TFRAC(4158)=0.693
 TFRAC(4159)=0.693167 ;TFRAC(4160)=0.693333
 TFRAC(4161)=0.6935 ;TFRAC(4162)=0.693667
 TFRAC(4163)=0.693833 ;TFRAC(4164)=0.694
 TFRAC(4165)=0.694167 ;TFRAC(4166)=0.694333
 TFRAC(4167)=0.6945 ;TFRAC(4168)=0.694667
 TFRAC(4169)=0.694833 ;TFRAC(4170)=0.695
 TFRAC(4171)=0.695167 ;TFRAC(4172)=0.695333
 TFRAC(4173)=0.6955 ;TFRAC(4174)=0.695667
 TFRAC(4175)=0.695833 ;TFRAC(4176)=0.696
 TFRAC(4177)=0.696167 ;TFRAC(4178)=0.696333
 TFRAC(4179)=0.6965 ;TFRAC(4180)=0.696667
 TFRAC(4181)=0.696833 ;TFRAC(4182)=0.697
 TFRAC(4183)=0.697167 ;TFRAC(4184)=0.697333
 TFRAC(4185)=0.6975 ;TFRAC(4186)=0.697667
 TFRAC(4187)=0.697833 ;TFRAC(4188)=0.698
 TFRAC(4189)=0.698167 ;TFRAC(4190)=0.698333
 TFRAC(4191)=0.6985 ;TFRAC(4192)=0.698667
 TFRAC(4193)=0.698833 ;TFRAC(4194)=0.699
 TFRAC(4195)=0.699167 ;TFRAC(4196)=0.699333
 TFRAC(4197)=0.6995 ;TFRAC(4198)=0.699667
 TFRAC(4199)=0.699833 ;TFRAC(4200)=0.7
 TFRAC(4201)=0.700167 ;TFRAC(4202)=0.700333
 TFRAC(4203)=0.7005 ;TFRAC(4204)=0.700667
 TFRAC(4205)=0.700833 ;TFRAC(4206)=0.701
 TFRAC(4207)=0.701167 ;TFRAC(4208)=0.701333
 TFRAC(4209)=0.7015 ;TFRAC(4210)=0.701667
 TFRAC(4211)=0.701833 ;TFRAC(4212)=0.702
 TFRAC(4213)=0.702167 ;TFRAC(4214)=0.702333
 TFRAC(4215)=0.7025 ;TFRAC(4216)=0.702667
 TFRAC(4217)=0.702833 ;TFRAC(4218)=0.703
 TFRAC(4219)=0.703167 ;TFRAC(4220)=0.703333
 TFRAC(4221)=0.7035 ;TFRAC(4222)=0.703667
 TFRAC(4223)=0.703833 ;TFRAC(4224)=0.704
 TFRAC(4225)=0.704167 ;TFRAC(4226)=0.704333
 TFRAC(4227)=0.7045 ;TFRAC(4228)=0.704667
 TFRAC(4229)=0.704833 ;TFRAC(4230)=0.705
 TFRAC(4231)=0.705167 ;TFRAC(4232)=0.705333
 TFRAC(4233)=0.7055 ;TFRAC(4234)=0.705667
 TFRAC(4235)=0.705833 ;TFRAC(4236)=0.706
 TFRAC(4237)=0.706167 ;TFRAC(4238)=0.706333
 TFRAC(4239)=0.7065 ;TFRAC(4240)=0.706667
 TFRAC(4241)=0.706833 ;TFRAC(4242)=0.707
 TFRAC(4243)=0.707167 ;TFRAC(4244)=0.707333
 TFRAC(4245)=0.7075 ;TFRAC(4246)=0.707667
 TFRAC(4247)=0.707833 ;TFRAC(4248)=0.708
 TFRAC(4249)=0.708167 ;TFRAC(4250)=0.708333
 TFRAC(4251)=0.7085 ;TFRAC(4252)=0.708667
 TFRAC(4253)=0.708833 ;TFRAC(4254)=0.709
 TFRAC(4255)=0.709167 ;TFRAC(4256)=0.709333
 TFRAC(4257)=0.7095 ;TFRAC(4258)=0.709667
 TFRAC(4259)=0.709833 ;TFRAC(4260)=0.71
 TFRAC(4261)=0.710167 ;TFRAC(4262)=0.710333
 TFRAC(4263)=0.7105 ;TFRAC(4264)=0.710667
 TFRAC(4265)=0.710833 ;TFRAC(4266)=0.711
 TFRAC(4267)=0.711167 ;TFRAC(4268)=0.711333
 TFRAC(4269)=0.7115 ;TFRAC(4270)=0.711667
 TFRAC(4271)=0.711833 ;TFRAC(4272)=0.712
 TFRAC(4273)=0.712167 ;TFRAC(4274)=0.712333
 TFRAC(4275)=0.7125 ;TFRAC(4276)=0.712667
 TFRAC(4277)=0.712833 ;TFRAC(4278)=0.713
 TFRAC(4279)=0.713167 ;TFRAC(4280)=0.713333
 TFRAC(4281)=0.7135 ;TFRAC(4282)=0.713667
 TFRAC(4283)=0.713833 ;TFRAC(4284)=0.714
 TFRAC(4285)=0.714167 ;TFRAC(4286)=0.714333
 TFRAC(4287)=0.7145 ;TFRAC(4288)=0.714667
 TFRAC(4289)=0.714833 ;TFRAC(4290)=0.715
 TFRAC(4291)=0.715167 ;TFRAC(4292)=0.715333
 TFRAC(4293)=0.7155 ;TFRAC(4294)=0.715667
 TFRAC(4295)=0.715833 ;TFRAC(4296)=0.716
 TFRAC(4297)=0.716167 ;TFRAC(4298)=0.716333
 TFRAC(4299)=0.7165 ;TFRAC(4300)=0.716667
 TFRAC(4301)=0.716833 ;TFRAC(4302)=0.717
 TFRAC(4303)=0.717167 ;TFRAC(4304)=0.717333
 TFRAC(4305)=0.7175 ;TFRAC(4306)=0.717667
 TFRAC(4307)=0.717833 ;TFRAC(4308)=0.718
 TFRAC(4309)=0.718167 ;TFRAC(4310)=0.718333
 TFRAC(4311)=0.7185 ;TFRAC(4312)=0.718667
 TFRAC(4313)=0.718833 ;TFRAC(4314)=0.719
 TFRAC(4315)=0.719167 ;TFRAC(4316)=0.719333
 TFRAC(4317)=0.7195 ;TFRAC(4318)=0.719667
 TFRAC(4319)=0.719833 ;TFRAC(4320)=0.72
 TFRAC(4321)=0.720167 ;TFRAC(4322)=0.720333
 TFRAC(4323)=0.7205 ;TFRAC(4324)=0.720667
 TFRAC(4325)=0.720833 ;TFRAC(4326)=0.721
 TFRAC(4327)=0.721167 ;TFRAC(4328)=0.721333
 TFRAC(4329)=0.7215 ;TFRAC(4330)=0.721667
 TFRAC(4331)=0.721833 ;TFRAC(4332)=0.722
 TFRAC(4333)=0.722167 ;TFRAC(4334)=0.722333
 TFRAC(4335)=0.7225 ;TFRAC(4336)=0.722667
 TFRAC(4337)=0.722833 ;TFRAC(4338)=0.723
 TFRAC(4339)=0.723167 ;TFRAC(4340)=0.723333
 TFRAC(4341)=0.7235 ;TFRAC(4342)=0.723667
 TFRAC(4343)=0.723833 ;TFRAC(4344)=0.724
 TFRAC(4345)=0.724167 ;TFRAC(4346)=0.724333
 TFRAC(4347)=0.7245 ;TFRAC(4348)=0.724667
 TFRAC(4349)=0.724833 ;TFRAC(4350)=0.725
 TFRAC(4351)=0.725167 ;TFRAC(4352)=0.725333
 TFRAC(4353)=0.7255 ;TFRAC(4354)=0.725667
 TFRAC(4355)=0.725833 ;TFRAC(4356)=0.726
 TFRAC(4357)=0.726167 ;TFRAC(4358)=0.726333
 TFRAC(4359)=0.7265 ;TFRAC(4360)=0.726667
 TFRAC(4361)=0.726833 ;TFRAC(4362)=0.727
 TFRAC(4363)=0.727167 ;TFRAC(4364)=0.727333
 TFRAC(4365)=0.7275 ;TFRAC(4366)=0.727667
 TFRAC(4367)=0.727833 ;TFRAC(4368)=0.728
 TFRAC(4369)=0.728167 ;TFRAC(4370)=0.728333
 TFRAC(4371)=0.7285 ;TFRAC(4372)=0.728667
 TFRAC(4373)=0.728833 ;TFRAC(4374)=0.729
 TFRAC(4375)=0.729167 ;TFRAC(4376)=0.729333
 TFRAC(4377)=0.7295 ;TFRAC(4378)=0.729667
 TFRAC(4379)=0.729833 ;TFRAC(4380)=0.73
 TFRAC(4381)=0.730167 ;TFRAC(4382)=0.730333
 TFRAC(4383)=0.7305 ;TFRAC(4384)=0.730667
 TFRAC(4385)=0.730833 ;TFRAC(4386)=0.731
 TFRAC(4387)=0.731167 ;TFRAC(4388)=0.731333
 TFRAC(4389)=0.7315 ;TFRAC(4390)=0.731667
 TFRAC(4391)=0.731833 ;TFRAC(4392)=0.732
 TFRAC(4393)=0.732167 ;TFRAC(4394)=0.732333
 TFRAC(4395)=0.7325 ;TFRAC(4396)=0.732667
 TFRAC(4397)=0.732833 ;TFRAC(4398)=0.733
 TFRAC(4399)=0.733167 ;TFRAC(4400)=0.733333
 TFRAC(4401)=0.7335 ;TFRAC(4402)=0.733667
 TFRAC(4403)=0.733833 ;TFRAC(4404)=0.734
 TFRAC(4405)=0.734167 ;TFRAC(4406)=0.734333
 TFRAC(4407)=0.7345 ;TFRAC(4408)=0.734667
 TFRAC(4409)=0.734833 ;TFRAC(4410)=0.735
 TFRAC(4411)=0.735167 ;TFRAC(4412)=0.735333
 TFRAC(4413)=0.7355 ;TFRAC(4414)=0.735667
 TFRAC(4415)=0.735833 ;TFRAC(4416)=0.736
 TFRAC(4417)=0.736167 ;TFRAC(4418)=0.736333
 TFRAC(4419)=0.7365 ;TFRAC(4420)=0.736667
 TFRAC(4421)=0.736833 ;TFRAC(4422)=0.737
 TFRAC(4423)=0.737167 ;TFRAC(4424)=0.737333
 TFRAC(4425)=0.7375 ;TFRAC(4426)=0.737667
 TFRAC(4427)=0.737833 ;TFRAC(4428)=0.738
 TFRAC(4429)=0.738167 ;TFRAC(4430)=0.738333
 TFRAC(4431)=0.7385 ;TFRAC(4432)=0.738667
 TFRAC(4433)=0.738833 ;TFRAC(4434)=0.739
 TFRAC(4435)=0.739167 ;TFRAC(4436)=0.739333
 TFRAC(4437)=0.7395 ;TFRAC(4438)=0.739667
 TFRAC(4439)=0.739833 ;TFRAC(4440)=0.74
 TFRAC(4441)=0.740167 ;TFRAC(4442)=0.740333
 TFRAC(4443)=0.7405 ;TFRAC(4444)=0.740667
 TFRAC(4445)=0.740833 ;TFRAC(4446)=0.741
 TFRAC(4447)=0.741167 ;TFRAC(4448)=0.741333
 TFRAC(4449)=0.7415 ;TFRAC(4450)=0.741667
 TFRAC(4451)=0.741833 ;TFRAC(4452)=0.742
 TFRAC(4453)=0.742167 ;TFRAC(4454)=0.742333
 TFRAC(4455)=0.7425 ;TFRAC(4456)=0.742667
 TFRAC(4457)=0.742833 ;TFRAC(4458)=0.743
 TFRAC(4459)=0.743167 ;TFRAC(4460)=0.743333
 TFRAC(4461)=0.7435 ;TFRAC(4462)=0.743667
 TFRAC(4463)=0.743833 ;TFRAC(4464)=0.744
 TFRAC(4465)=0.744167 ;TFRAC(4466)=0.744333
 TFRAC(4467)=0.7445 ;TFRAC(4468)=0.744667
 TFRAC(4469)=0.744833 ;TFRAC(4470)=0.745
 TFRAC(4471)=0.745167 ;TFRAC(4472)=0.745333
 TFRAC(4473)=0.7455 ;TFRAC(4474)=0.745667
 TFRAC(4475)=0.745833 ;TFRAC(4476)=0.746
 TFRAC(4477)=0.746167 ;TFRAC(4478)=0.746333
 TFRAC(4479)=0.7465 ;TFRAC(4480)=0.746667
 TFRAC(4481)=0.746833 ;TFRAC(4482)=0.747
 TFRAC(4483)=0.747167 ;TFRAC(4484)=0.747333
 TFRAC(4485)=0.7475 ;TFRAC(4486)=0.747667
 TFRAC(4487)=0.747833 ;TFRAC(4488)=0.748
 TFRAC(4489)=0.748167 ;TFRAC(4490)=0.748333
 TFRAC(4491)=0.7485 ;TFRAC(4492)=0.748667
 TFRAC(4493)=0.748833 ;TFRAC(4494)=0.749
 TFRAC(4495)=0.749167 ;TFRAC(4496)=0.749333
 TFRAC(4497)=0.7495 ;TFRAC(4498)=0.749667
 TFRAC(4499)=0.749833 ;TFRAC(4500)=0.75
 TFRAC(4501)=0.750167 ;TFRAC(4502)=0.750333
 TFRAC(4503)=0.7505 ;TFRAC(4504)=0.750667
 TFRAC(4505)=0.750833 ;TFRAC(4506)=0.751
 TFRAC(4507)=0.751167 ;TFRAC(4508)=0.751333
 TFRAC(4509)=0.7515 ;TFRAC(4510)=0.751667
 TFRAC(4511)=0.751833 ;TFRAC(4512)=0.752
 TFRAC(4513)=0.752167 ;TFRAC(4514)=0.752333
 TFRAC(4515)=0.7525 ;TFRAC(4516)=0.752667
 TFRAC(4517)=0.752833 ;TFRAC(4518)=0.753
 TFRAC(4519)=0.753167 ;TFRAC(4520)=0.753333
 TFRAC(4521)=0.7535 ;TFRAC(4522)=0.753667
 TFRAC(4523)=0.753833 ;TFRAC(4524)=0.754
 TFRAC(4525)=0.754167 ;TFRAC(4526)=0.754333
 TFRAC(4527)=0.7545 ;TFRAC(4528)=0.754667
 TFRAC(4529)=0.754833 ;TFRAC(4530)=0.755
 TFRAC(4531)=0.755167 ;TFRAC(4532)=0.755333
 TFRAC(4533)=0.7555 ;TFRAC(4534)=0.755667
 TFRAC(4535)=0.755833 ;TFRAC(4536)=0.756
 TFRAC(4537)=0.756167 ;TFRAC(4538)=0.756333
 TFRAC(4539)=0.7565 ;TFRAC(4540)=0.756667
 TFRAC(4541)=0.756833 ;TFRAC(4542)=0.757
 TFRAC(4543)=0.757167 ;TFRAC(4544)=0.757333
 TFRAC(4545)=0.7575 ;TFRAC(4546)=0.757667
 TFRAC(4547)=0.757833 ;TFRAC(4548)=0.758
 TFRAC(4549)=0.758167 ;TFRAC(4550)=0.758333
 TFRAC(4551)=0.7585 ;TFRAC(4552)=0.758667
 TFRAC(4553)=0.758833 ;TFRAC(4554)=0.759
 TFRAC(4555)=0.759167 ;TFRAC(4556)=0.759333
 TFRAC(4557)=0.7595 ;TFRAC(4558)=0.759667
 TFRAC(4559)=0.759833 ;TFRAC(4560)=0.76
 TFRAC(4561)=0.760167 ;TFRAC(4562)=0.760333
 TFRAC(4563)=0.7605 ;TFRAC(4564)=0.760667
 TFRAC(4565)=0.760833 ;TFRAC(4566)=0.761
 TFRAC(4567)=0.761167 ;TFRAC(4568)=0.761333
 TFRAC(4569)=0.7615 ;TFRAC(4570)=0.761667
 TFRAC(4571)=0.761833 ;TFRAC(4572)=0.762
 TFRAC(4573)=0.762167 ;TFRAC(4574)=0.762333
 TFRAC(4575)=0.7625 ;TFRAC(4576)=0.762667
 TFRAC(4577)=0.762833 ;TFRAC(4578)=0.763
 TFRAC(4579)=0.763167 ;TFRAC(4580)=0.763333
 TFRAC(4581)=0.7635 ;TFRAC(4582)=0.763667
 TFRAC(4583)=0.763833 ;TFRAC(4584)=0.764
 TFRAC(4585)=0.764167 ;TFRAC(4586)=0.764333
 TFRAC(4587)=0.7645 ;TFRAC(4588)=0.764667
 TFRAC(4589)=0.764833 ;TFRAC(4590)=0.765
 TFRAC(4591)=0.765167 ;TFRAC(4592)=0.765333
 TFRAC(4593)=0.7655 ;TFRAC(4594)=0.765667
 TFRAC(4595)=0.765833 ;TFRAC(4596)=0.766
 TFRAC(4597)=0.766167 ;TFRAC(4598)=0.766333
 TFRAC(4599)=0.7665 ;TFRAC(4600)=0.766667
 TFRAC(4601)=0.766833 ;TFRAC(4602)=0.767
 TFRAC(4603)=0.767167 ;TFRAC(4604)=0.767333
 TFRAC(4605)=0.7675 ;TFRAC(4606)=0.767667
 TFRAC(4607)=0.767833 ;TFRAC(4608)=0.768
 TFRAC(4609)=0.768167 ;TFRAC(4610)=0.768333
 TFRAC(4611)=0.7685 ;TFRAC(4612)=0.768667
 TFRAC(4613)=0.768833 ;TFRAC(4614)=0.769
 TFRAC(4615)=0.769167 ;TFRAC(4616)=0.769333
 TFRAC(4617)=0.7695 ;TFRAC(4618)=0.769667
 TFRAC(4619)=0.769833 ;TFRAC(4620)=0.77
 TFRAC(4621)=0.770167 ;TFRAC(4622)=0.770333
 TFRAC(4623)=0.7705 ;TFRAC(4624)=0.770667
 TFRAC(4625)=0.770833 ;TFRAC(4626)=0.771
 TFRAC(4627)=0.771167 ;TFRAC(4628)=0.771333
 TFRAC(4629)=0.7715 ;TFRAC(4630)=0.771667
 TFRAC(4631)=0.771833 ;TFRAC(4632)=0.772
 TFRAC(4633)=0.772167 ;TFRAC(4634)=0.772333
 TFRAC(4635)=0.7725 ;TFRAC(4636)=0.772667
 TFRAC(4637)=0.772833 ;TFRAC(4638)=0.773
 TFRAC(4639)=0.773167 ;TFRAC(4640)=0.773333
 TFRAC(4641)=0.7735 ;TFRAC(4642)=0.773667
 TFRAC(4643)=0.773833 ;TFRAC(4644)=0.774
 TFRAC(4645)=0.774167 ;TFRAC(4646)=0.774333
 TFRAC(4647)=0.7745 ;TFRAC(4648)=0.774667
 TFRAC(4649)=0.774833 ;TFRAC(4650)=0.775
 TFRAC(4651)=0.775167 ;TFRAC(4652)=0.775333
 TFRAC(4653)=0.7755 ;TFRAC(4654)=0.775667
 TFRAC(4655)=0.775833 ;TFRAC(4656)=0.776
 TFRAC(4657)=0.776167 ;TFRAC(4658)=0.776333
 TFRAC(4659)=0.7765 ;TFRAC(4660)=0.776667
 TFRAC(4661)=0.776833 ;TFRAC(4662)=0.777
 TFRAC(4663)=0.777167 ;TFRAC(4664)=0.777333
 TFRAC(4665)=0.7775 ;TFRAC(4666)=0.777667
 TFRAC(4667)=0.777833 ;TFRAC(4668)=0.778
 TFRAC(4669)=0.778167 ;TFRAC(4670)=0.778333
 TFRAC(4671)=0.7785 ;TFRAC(4672)=0.778667
 TFRAC(4673)=0.778833 ;TFRAC(4674)=0.779
 TFRAC(4675)=0.779167 ;TFRAC(4676)=0.779333
 TFRAC(4677)=0.7795 ;TFRAC(4678)=0.779667
 TFRAC(4679)=0.779833 ;TFRAC(4680)=0.78
 TFRAC(4681)=0.780167 ;TFRAC(4682)=0.780333
 TFRAC(4683)=0.7805 ;TFRAC(4684)=0.780667
 TFRAC(4685)=0.780833 ;TFRAC(4686)=0.781
 TFRAC(4687)=0.781167 ;TFRAC(4688)=0.781333
 TFRAC(4689)=0.7815 ;TFRAC(4690)=0.781667
 TFRAC(4691)=0.781833 ;TFRAC(4692)=0.782
 TFRAC(4693)=0.782167 ;TFRAC(4694)=0.782333
 TFRAC(4695)=0.7825 ;TFRAC(4696)=0.782667
 TFRAC(4697)=0.782833 ;TFRAC(4698)=0.783
 TFRAC(4699)=0.783167 ;TFRAC(4700)=0.783333
 TFRAC(4701)=0.7835 ;TFRAC(4702)=0.783667
 TFRAC(4703)=0.783833 ;TFRAC(4704)=0.784
 TFRAC(4705)=0.784167 ;TFRAC(4706)=0.784333
 TFRAC(4707)=0.7845 ;TFRAC(4708)=0.784667
 TFRAC(4709)=0.784833 ;TFRAC(4710)=0.785
 TFRAC(4711)=0.785167 ;TFRAC(4712)=0.785333
 TFRAC(4713)=0.7855 ;TFRAC(4714)=0.785667
 TFRAC(4715)=0.785833 ;TFRAC(4716)=0.786
 TFRAC(4717)=0.786167 ;TFRAC(4718)=0.786333
 TFRAC(4719)=0.7865 ;TFRAC(4720)=0.786667
 TFRAC(4721)=0.786833 ;TFRAC(4722)=0.787
 TFRAC(4723)=0.787167 ;TFRAC(4724)=0.787333
 TFRAC(4725)=0.7875 ;TFRAC(4726)=0.787667
 TFRAC(4727)=0.787833 ;TFRAC(4728)=0.788
 TFRAC(4729)=0.788167 ;TFRAC(4730)=0.788333
 TFRAC(4731)=0.7885 ;TFRAC(4732)=0.788667
 TFRAC(4733)=0.788833 ;TFRAC(4734)=0.789
 TFRAC(4735)=0.789167 ;TFRAC(4736)=0.789333
 TFRAC(4737)=0.7895 ;TFRAC(4738)=0.789667
 TFRAC(4739)=0.789833 ;TFRAC(4740)=0.79
 TFRAC(4741)=0.790167 ;TFRAC(4742)=0.790333
 TFRAC(4743)=0.7905 ;TFRAC(4744)=0.790667
 TFRAC(4745)=0.790833 ;TFRAC(4746)=0.791
 TFRAC(4747)=0.791167 ;TFRAC(4748)=0.791333
 TFRAC(4749)=0.7915 ;TFRAC(4750)=0.791667
 TFRAC(4751)=0.791833 ;TFRAC(4752)=0.792
 TFRAC(4753)=0.792167 ;TFRAC(4754)=0.792333
 TFRAC(4755)=0.7925 ;TFRAC(4756)=0.792667
 TFRAC(4757)=0.792833 ;TFRAC(4758)=0.793
 TFRAC(4759)=0.793167 ;TFRAC(4760)=0.793333
 TFRAC(4761)=0.7935 ;TFRAC(4762)=0.793667
 TFRAC(4763)=0.793833 ;TFRAC(4764)=0.794
 TFRAC(4765)=0.794167 ;TFRAC(4766)=0.794333
 TFRAC(4767)=0.7945 ;TFRAC(4768)=0.794667
 TFRAC(4769)=0.794833 ;TFRAC(4770)=0.795
 TFRAC(4771)=0.795167 ;TFRAC(4772)=0.795333
 TFRAC(4773)=0.7955 ;TFRAC(4774)=0.795667
 TFRAC(4775)=0.795833 ;TFRAC(4776)=0.796
 TFRAC(4777)=0.796167 ;TFRAC(4778)=0.796333
 TFRAC(4779)=0.7965 ;TFRAC(4780)=0.796667
 TFRAC(4781)=0.796833 ;TFRAC(4782)=0.797
 TFRAC(4783)=0.797167 ;TFRAC(4784)=0.797333
 TFRAC(4785)=0.7975 ;TFRAC(4786)=0.797667
 TFRAC(4787)=0.797833 ;TFRAC(4788)=0.798
 TFRAC(4789)=0.798167 ;TFRAC(4790)=0.798333
 TFRAC(4791)=0.7985 ;TFRAC(4792)=0.798667
 TFRAC(4793)=0.798833 ;TFRAC(4794)=0.799
 TFRAC(4795)=0.799167 ;TFRAC(4796)=0.799333
 TFRAC(4797)=0.7995 ;TFRAC(4798)=0.799667
 TFRAC(4799)=0.799833 ;TFRAC(4800)=0.8
 TFRAC(4801)=0.800167 ;TFRAC(4802)=0.800333
 TFRAC(4803)=0.8005 ;TFRAC(4804)=0.800667
 TFRAC(4805)=0.800833 ;TFRAC(4806)=0.801
 TFRAC(4807)=0.801167 ;TFRAC(4808)=0.801333
 TFRAC(4809)=0.8015 ;TFRAC(4810)=0.801667
 TFRAC(4811)=0.801833 ;TFRAC(4812)=0.802
 TFRAC(4813)=0.802167 ;TFRAC(4814)=0.802333
 TFRAC(4815)=0.8025 ;TFRAC(4816)=0.802667
 TFRAC(4817)=0.802833 ;TFRAC(4818)=0.803
 TFRAC(4819)=0.803167 ;TFRAC(4820)=0.803333
 TFRAC(4821)=0.8035 ;TFRAC(4822)=0.803667
 TFRAC(4823)=0.803833 ;TFRAC(4824)=0.804
 TFRAC(4825)=0.804167 ;TFRAC(4826)=0.804333
 TFRAC(4827)=0.8045 ;TFRAC(4828)=0.804667
 TFRAC(4829)=0.804833 ;TFRAC(4830)=0.805
 TFRAC(4831)=0.805167 ;TFRAC(4832)=0.805333
 TFRAC(4833)=0.8055 ;TFRAC(4834)=0.805667
 TFRAC(4835)=0.805833 ;TFRAC(4836)=0.806
 TFRAC(4837)=0.806167 ;TFRAC(4838)=0.806333
 TFRAC(4839)=0.8065 ;TFRAC(4840)=0.806667
 TFRAC(4841)=0.806833 ;TFRAC(4842)=0.807
 TFRAC(4843)=0.807167 ;TFRAC(4844)=0.807333
 TFRAC(4845)=0.8075 ;TFRAC(4846)=0.807667
 TFRAC(4847)=0.807833 ;TFRAC(4848)=0.808
 TFRAC(4849)=0.808167 ;TFRAC(4850)=0.808333
 TFRAC(4851)=0.8085 ;TFRAC(4852)=0.808667
 TFRAC(4853)=0.808833 ;TFRAC(4854)=0.809
 TFRAC(4855)=0.809167 ;TFRAC(4856)=0.809333
 TFRAC(4857)=0.8095 ;TFRAC(4858)=0.809667
 TFRAC(4859)=0.809833 ;TFRAC(4860)=0.81
 TFRAC(4861)=0.810167 ;TFRAC(4862)=0.810333
 TFRAC(4863)=0.8105 ;TFRAC(4864)=0.810667
 TFRAC(4865)=0.810833 ;TFRAC(4866)=0.811
 TFRAC(4867)=0.811167 ;TFRAC(4868)=0.811333
 TFRAC(4869)=0.8115 ;TFRAC(4870)=0.811667
 TFRAC(4871)=0.811833 ;TFRAC(4872)=0.812
 TFRAC(4873)=0.812167 ;TFRAC(4874)=0.812333
 TFRAC(4875)=0.8125 ;TFRAC(4876)=0.812667
 TFRAC(4877)=0.812833 ;TFRAC(4878)=0.813
 TFRAC(4879)=0.813167 ;TFRAC(4880)=0.813333
 TFRAC(4881)=0.8135 ;TFRAC(4882)=0.813667
 TFRAC(4883)=0.813833 ;TFRAC(4884)=0.814
 TFRAC(4885)=0.814167 ;TFRAC(4886)=0.814333
 TFRAC(4887)=0.8145 ;TFRAC(4888)=0.814667
 TFRAC(4889)=0.814833 ;TFRAC(4890)=0.815
 TFRAC(4891)=0.815167 ;TFRAC(4892)=0.815333
 TFRAC(4893)=0.8155 ;TFRAC(4894)=0.815667
 TFRAC(4895)=0.815833 ;TFRAC(4896)=0.816
 TFRAC(4897)=0.816167 ;TFRAC(4898)=0.816333
 TFRAC(4899)=0.8165 ;TFRAC(4900)=0.816667
 TFRAC(4901)=0.816833 ;TFRAC(4902)=0.817
 TFRAC(4903)=0.817167 ;TFRAC(4904)=0.817333
 TFRAC(4905)=0.8175 ;TFRAC(4906)=0.817667
 TFRAC(4907)=0.817833 ;TFRAC(4908)=0.818
 TFRAC(4909)=0.818167 ;TFRAC(4910)=0.818333
 TFRAC(4911)=0.8185 ;TFRAC(4912)=0.818667
 TFRAC(4913)=0.818833 ;TFRAC(4914)=0.819
 TFRAC(4915)=0.819167 ;TFRAC(4916)=0.819333
 TFRAC(4917)=0.8195 ;TFRAC(4918)=0.819667
 TFRAC(4919)=0.819833 ;TFRAC(4920)=0.82
 TFRAC(4921)=0.820167 ;TFRAC(4922)=0.820333
 TFRAC(4923)=0.8205 ;TFRAC(4924)=0.820667
 TFRAC(4925)=0.820833 ;TFRAC(4926)=0.821
 TFRAC(4927)=0.821167 ;TFRAC(4928)=0.821333
 TFRAC(4929)=0.8215 ;TFRAC(4930)=0.821667
 TFRAC(4931)=0.821833 ;TFRAC(4932)=0.822
 TFRAC(4933)=0.822167 ;TFRAC(4934)=0.822333
 TFRAC(4935)=0.8225 ;TFRAC(4936)=0.822667
 TFRAC(4937)=0.822833 ;TFRAC(4938)=0.823
 TFRAC(4939)=0.823167 ;TFRAC(4940)=0.823333
 TFRAC(4941)=0.8235 ;TFRAC(4942)=0.823667
 TFRAC(4943)=0.823833 ;TFRAC(4944)=0.824
 TFRAC(4945)=0.824167 ;TFRAC(4946)=0.824333
 TFRAC(4947)=0.8245 ;TFRAC(4948)=0.824667
 TFRAC(4949)=0.824833 ;TFRAC(4950)=0.825
 TFRAC(4951)=0.825167 ;TFRAC(4952)=0.825333
 TFRAC(4953)=0.8255 ;TFRAC(4954)=0.825667
 TFRAC(4955)=0.825833 ;TFRAC(4956)=0.826
 TFRAC(4957)=0.826167 ;TFRAC(4958)=0.826333
 TFRAC(4959)=0.8265 ;TFRAC(4960)=0.826667
 TFRAC(4961)=0.826833 ;TFRAC(4962)=0.827
 TFRAC(4963)=0.827167 ;TFRAC(4964)=0.827333
 TFRAC(4965)=0.8275 ;TFRAC(4966)=0.827667
 TFRAC(4967)=0.827833 ;TFRAC(4968)=0.828
 TFRAC(4969)=0.828167 ;TFRAC(4970)=0.828333
 TFRAC(4971)=0.8285 ;TFRAC(4972)=0.828667
 TFRAC(4973)=0.828833 ;TFRAC(4974)=0.829
 TFRAC(4975)=0.829167 ;TFRAC(4976)=0.829333
 TFRAC(4977)=0.8295 ;TFRAC(4978)=0.829667
 TFRAC(4979)=0.829833 ;TFRAC(4980)=0.83
 TFRAC(4981)=0.830167 ;TFRAC(4982)=0.830333
 TFRAC(4983)=0.8305 ;TFRAC(4984)=0.830667
 TFRAC(4985)=0.830833 ;TFRAC(4986)=0.831
 TFRAC(4987)=0.831167 ;TFRAC(4988)=0.831333
 TFRAC(4989)=0.8315 ;TFRAC(4990)=0.831667
 TFRAC(4991)=0.831833 ;TFRAC(4992)=0.832
 TFRAC(4993)=0.832167 ;TFRAC(4994)=0.832333
 TFRAC(4995)=0.8325 ;TFRAC(4996)=0.832667
 TFRAC(4997)=0.832833 ;TFRAC(4998)=0.833
 TFRAC(4999)=0.833167 ;TFRAC(5000)=0.833333
 TFRAC(5001)=0.8335 ;TFRAC(5002)=0.833667
 TFRAC(5003)=0.833833 ;TFRAC(5004)=0.834
 TFRAC(5005)=0.834167 ;TFRAC(5006)=0.834333
 TFRAC(5007)=0.8345 ;TFRAC(5008)=0.834667
 TFRAC(5009)=0.834833 ;TFRAC(5010)=0.835
 TFRAC(5011)=0.835167 ;TFRAC(5012)=0.835333
 TFRAC(5013)=0.8355 ;TFRAC(5014)=0.835667
 TFRAC(5015)=0.835833 ;TFRAC(5016)=0.836
 TFRAC(5017)=0.836167 ;TFRAC(5018)=0.836333
 TFRAC(5019)=0.8365 ;TFRAC(5020)=0.836667
 TFRAC(5021)=0.836833 ;TFRAC(5022)=0.837
 TFRAC(5023)=0.837167 ;TFRAC(5024)=0.837333
 TFRAC(5025)=0.8375 ;TFRAC(5026)=0.837667
 TFRAC(5027)=0.837833 ;TFRAC(5028)=0.838
 TFRAC(5029)=0.838167 ;TFRAC(5030)=0.838333
 TFRAC(5031)=0.8385 ;TFRAC(5032)=0.838667
 TFRAC(5033)=0.838833 ;TFRAC(5034)=0.839
 TFRAC(5035)=0.839167 ;TFRAC(5036)=0.839333
 TFRAC(5037)=0.8395 ;TFRAC(5038)=0.839667
 TFRAC(5039)=0.839833 ;TFRAC(5040)=0.84
 TFRAC(5041)=0.840167 ;TFRAC(5042)=0.840333
 TFRAC(5043)=0.8405 ;TFRAC(5044)=0.840667
 TFRAC(5045)=0.840833 ;TFRAC(5046)=0.841
 TFRAC(5047)=0.841167 ;TFRAC(5048)=0.841333
 TFRAC(5049)=0.8415 ;TFRAC(5050)=0.841667
 TFRAC(5051)=0.841833 ;TFRAC(5052)=0.842
 TFRAC(5053)=0.842167 ;TFRAC(5054)=0.842333
 TFRAC(5055)=0.8425 ;TFRAC(5056)=0.842667
 TFRAC(5057)=0.842833 ;TFRAC(5058)=0.843
 TFRAC(5059)=0.843167 ;TFRAC(5060)=0.843333
 TFRAC(5061)=0.8435 ;TFRAC(5062)=0.843667
 TFRAC(5063)=0.843833 ;TFRAC(5064)=0.844
 TFRAC(5065)=0.844167 ;TFRAC(5066)=0.844333
 TFRAC(5067)=0.8445 ;TFRAC(5068)=0.844667
 TFRAC(5069)=0.844833 ;TFRAC(5070)=0.845
 TFRAC(5071)=0.845167 ;TFRAC(5072)=0.845333
 TFRAC(5073)=0.8455 ;TFRAC(5074)=0.845667
 TFRAC(5075)=0.845833 ;TFRAC(5076)=0.846
 TFRAC(5077)=0.846167 ;TFRAC(5078)=0.846333
 TFRAC(5079)=0.8465 ;TFRAC(5080)=0.846667
 TFRAC(5081)=0.846833 ;TFRAC(5082)=0.847
 TFRAC(5083)=0.847167 ;TFRAC(5084)=0.847333
 TFRAC(5085)=0.8475 ;TFRAC(5086)=0.847667
 TFRAC(5087)=0.847833 ;TFRAC(5088)=0.848
 TFRAC(5089)=0.848167 ;TFRAC(5090)=0.848333
 TFRAC(5091)=0.8485 ;TFRAC(5092)=0.848667
 TFRAC(5093)=0.848833 ;TFRAC(5094)=0.849
 TFRAC(5095)=0.849167 ;TFRAC(5096)=0.849333
 TFRAC(5097)=0.8495 ;TFRAC(5098)=0.849667
 TFRAC(5099)=0.849833 ;TFRAC(5100)=0.85
 TFRAC(5101)=0.850167 ;TFRAC(5102)=0.850333
 TFRAC(5103)=0.8505 ;TFRAC(5104)=0.850667
 TFRAC(5105)=0.850833 ;TFRAC(5106)=0.851
 TFRAC(5107)=0.851167 ;TFRAC(5108)=0.851333
 TFRAC(5109)=0.8515 ;TFRAC(5110)=0.851667
 TFRAC(5111)=0.851833 ;TFRAC(5112)=0.852
 TFRAC(5113)=0.852167 ;TFRAC(5114)=0.852333
 TFRAC(5115)=0.8525 ;TFRAC(5116)=0.852667
 TFRAC(5117)=0.852833 ;TFRAC(5118)=0.853
 TFRAC(5119)=0.853167 ;TFRAC(5120)=0.853333
 TFRAC(5121)=0.8535 ;TFRAC(5122)=0.853667
 TFRAC(5123)=0.853833 ;TFRAC(5124)=0.854
 TFRAC(5125)=0.854167 ;TFRAC(5126)=0.854333
 TFRAC(5127)=0.8545 ;TFRAC(5128)=0.854667
 TFRAC(5129)=0.854833 ;TFRAC(5130)=0.855
 TFRAC(5131)=0.855167 ;TFRAC(5132)=0.855333
 TFRAC(5133)=0.8555 ;TFRAC(5134)=0.855667
 TFRAC(5135)=0.855833 ;TFRAC(5136)=0.856
 TFRAC(5137)=0.856167 ;TFRAC(5138)=0.856333
 TFRAC(5139)=0.8565 ;TFRAC(5140)=0.856667
 TFRAC(5141)=0.856833 ;TFRAC(5142)=0.857
 TFRAC(5143)=0.857167 ;TFRAC(5144)=0.857333
 TFRAC(5145)=0.8575 ;TFRAC(5146)=0.857667
 TFRAC(5147)=0.857833 ;TFRAC(5148)=0.858
 TFRAC(5149)=0.858167 ;TFRAC(5150)=0.858333
 TFRAC(5151)=0.8585 ;TFRAC(5152)=0.858667
 TFRAC(5153)=0.858833 ;TFRAC(5154)=0.859
 TFRAC(5155)=0.859167 ;TFRAC(5156)=0.859333
 TFRAC(5157)=0.8595 ;TFRAC(5158)=0.859667
 TFRAC(5159)=0.859833 ;TFRAC(5160)=0.86
 TFRAC(5161)=0.860167 ;TFRAC(5162)=0.860333
 TFRAC(5163)=0.8605 ;TFRAC(5164)=0.860667
 TFRAC(5165)=0.860833 ;TFRAC(5166)=0.861
 TFRAC(5167)=0.861167 ;TFRAC(5168)=0.861333
 TFRAC(5169)=0.8615 ;TFRAC(5170)=0.861667
 TFRAC(5171)=0.861833 ;TFRAC(5172)=0.862
 TFRAC(5173)=0.862167 ;TFRAC(5174)=0.862333
 TFRAC(5175)=0.8625 ;TFRAC(5176)=0.862667
 TFRAC(5177)=0.862833 ;TFRAC(5178)=0.863
 TFRAC(5179)=0.863167 ;TFRAC(5180)=0.863333
 TFRAC(5181)=0.8635 ;TFRAC(5182)=0.863667
 TFRAC(5183)=0.863833 ;TFRAC(5184)=0.864
 TFRAC(5185)=0.864167 ;TFRAC(5186)=0.864333
 TFRAC(5187)=0.8645 ;TFRAC(5188)=0.864667
 TFRAC(5189)=0.864833 ;TFRAC(5190)=0.865
 TFRAC(5191)=0.865167 ;TFRAC(5192)=0.865333
 TFRAC(5193)=0.8655 ;TFRAC(5194)=0.865667
 TFRAC(5195)=0.865833 ;TFRAC(5196)=0.866
 TFRAC(5197)=0.866167 ;TFRAC(5198)=0.866333
 TFRAC(5199)=0.8665 ;TFRAC(5200)=0.866667
 TFRAC(5201)=0.866833 ;TFRAC(5202)=0.867
 TFRAC(5203)=0.867167 ;TFRAC(5204)=0.867333
 TFRAC(5205)=0.8675 ;TFRAC(5206)=0.867667
 TFRAC(5207)=0.867833 ;TFRAC(5208)=0.868
 TFRAC(5209)=0.868167 ;TFRAC(5210)=0.868333
 TFRAC(5211)=0.8685 ;TFRAC(5212)=0.868667
 TFRAC(5213)=0.868833 ;TFRAC(5214)=0.869
 TFRAC(5215)=0.869167 ;TFRAC(5216)=0.869333
 TFRAC(5217)=0.8695 ;TFRAC(5218)=0.869667
 TFRAC(5219)=0.869833 ;TFRAC(5220)=0.87
 TFRAC(5221)=0.870167 ;TFRAC(5222)=0.870333
 TFRAC(5223)=0.8705 ;TFRAC(5224)=0.870667
 TFRAC(5225)=0.870833 ;TFRAC(5226)=0.871
 TFRAC(5227)=0.871167 ;TFRAC(5228)=0.871333
 TFRAC(5229)=0.8715 ;TFRAC(5230)=0.871667
 TFRAC(5231)=0.871833 ;TFRAC(5232)=0.872
 TFRAC(5233)=0.872167 ;TFRAC(5234)=0.872333
 TFRAC(5235)=0.8725 ;TFRAC(5236)=0.872667
 TFRAC(5237)=0.872833 ;TFRAC(5238)=0.873
 TFRAC(5239)=0.873167 ;TFRAC(5240)=0.873333
 TFRAC(5241)=0.8735 ;TFRAC(5242)=0.873667
 TFRAC(5243)=0.873833 ;TFRAC(5244)=0.874
 TFRAC(5245)=0.874167 ;TFRAC(5246)=0.874333
 TFRAC(5247)=0.8745 ;TFRAC(5248)=0.874667
 TFRAC(5249)=0.874833 ;TFRAC(5250)=0.875
 TFRAC(5251)=0.875167 ;TFRAC(5252)=0.875333
 TFRAC(5253)=0.8755 ;TFRAC(5254)=0.875667
 TFRAC(5255)=0.875833 ;TFRAC(5256)=0.876
 TFRAC(5257)=0.876167 ;TFRAC(5258)=0.876333
 TFRAC(5259)=0.8765 ;TFRAC(5260)=0.876667
 TFRAC(5261)=0.876833 ;TFRAC(5262)=0.877
 TFRAC(5263)=0.877167 ;TFRAC(5264)=0.877333
 TFRAC(5265)=0.8775 ;TFRAC(5266)=0.877667
 TFRAC(5267)=0.877833 ;TFRAC(5268)=0.878
 TFRAC(5269)=0.878167 ;TFRAC(5270)=0.878333
 TFRAC(5271)=0.8785 ;TFRAC(5272)=0.878667
 TFRAC(5273)=0.878833 ;TFRAC(5274)=0.879
 TFRAC(5275)=0.879167 ;TFRAC(5276)=0.879333
 TFRAC(5277)=0.8795 ;TFRAC(5278)=0.879667
 TFRAC(5279)=0.879833 ;TFRAC(5280)=0.88
 TFRAC(5281)=0.880167 ;TFRAC(5282)=0.880333
 TFRAC(5283)=0.8805 ;TFRAC(5284)=0.880667
 TFRAC(5285)=0.880833 ;TFRAC(5286)=0.881
 TFRAC(5287)=0.881167 ;TFRAC(5288)=0.881333
 TFRAC(5289)=0.8815 ;TFRAC(5290)=0.881667
 TFRAC(5291)=0.881833 ;TFRAC(5292)=0.882
 TFRAC(5293)=0.882167 ;TFRAC(5294)=0.882333
 TFRAC(5295)=0.8825 ;TFRAC(5296)=0.882667
 TFRAC(5297)=0.882833 ;TFRAC(5298)=0.883
 TFRAC(5299)=0.883167 ;TFRAC(5300)=0.883333
 TFRAC(5301)=0.8835 ;TFRAC(5302)=0.883667
 TFRAC(5303)=0.883833 ;TFRAC(5304)=0.884
 TFRAC(5305)=0.884167 ;TFRAC(5306)=0.884333
 TFRAC(5307)=0.8845 ;TFRAC(5308)=0.884667
 TFRAC(5309)=0.884833 ;TFRAC(5310)=0.885
 TFRAC(5311)=0.885167 ;TFRAC(5312)=0.885333
 TFRAC(5313)=0.8855 ;TFRAC(5314)=0.885667
 TFRAC(5315)=0.885833 ;TFRAC(5316)=0.886
 TFRAC(5317)=0.886167 ;TFRAC(5318)=0.886333
 TFRAC(5319)=0.8865 ;TFRAC(5320)=0.886667
 TFRAC(5321)=0.886833 ;TFRAC(5322)=0.887
 TFRAC(5323)=0.887167 ;TFRAC(5324)=0.887333
 TFRAC(5325)=0.8875 ;TFRAC(5326)=0.887667
 TFRAC(5327)=0.887833 ;TFRAC(5328)=0.888
 TFRAC(5329)=0.888167 ;TFRAC(5330)=0.888333
 TFRAC(5331)=0.8885 ;TFRAC(5332)=0.888667
 TFRAC(5333)=0.888833 ;TFRAC(5334)=0.889
 TFRAC(5335)=0.889167 ;TFRAC(5336)=0.889333
 TFRAC(5337)=0.8895 ;TFRAC(5338)=0.889667
 TFRAC(5339)=0.889833 ;TFRAC(5340)=0.89
 TFRAC(5341)=0.890167 ;TFRAC(5342)=0.890333
 TFRAC(5343)=0.8905 ;TFRAC(5344)=0.890667
 TFRAC(5345)=0.890833 ;TFRAC(5346)=0.891
 TFRAC(5347)=0.891167 ;TFRAC(5348)=0.891333
 TFRAC(5349)=0.8915 ;TFRAC(5350)=0.891667
 TFRAC(5351)=0.891833 ;TFRAC(5352)=0.892
 TFRAC(5353)=0.892167 ;TFRAC(5354)=0.892333
 TFRAC(5355)=0.8925 ;TFRAC(5356)=0.892667
 TFRAC(5357)=0.892833 ;TFRAC(5358)=0.893
 TFRAC(5359)=0.893167 ;TFRAC(5360)=0.893333
 TFRAC(5361)=0.8935 ;TFRAC(5362)=0.893667
 TFRAC(5363)=0.893833 ;TFRAC(5364)=0.894
 TFRAC(5365)=0.894167 ;TFRAC(5366)=0.894333
 TFRAC(5367)=0.8945 ;TFRAC(5368)=0.894667
 TFRAC(5369)=0.894833 ;TFRAC(5370)=0.895
 TFRAC(5371)=0.895167 ;TFRAC(5372)=0.895333
 TFRAC(5373)=0.8955 ;TFRAC(5374)=0.895667
 TFRAC(5375)=0.895833 ;TFRAC(5376)=0.896
 TFRAC(5377)=0.896167 ;TFRAC(5378)=0.896333
 TFRAC(5379)=0.8965 ;TFRAC(5380)=0.896667
 TFRAC(5381)=0.896833 ;TFRAC(5382)=0.897
 TFRAC(5383)=0.897167 ;TFRAC(5384)=0.897333
 TFRAC(5385)=0.8975 ;TFRAC(5386)=0.897667
 TFRAC(5387)=0.897833 ;TFRAC(5388)=0.898
 TFRAC(5389)=0.898167 ;TFRAC(5390)=0.898333
 TFRAC(5391)=0.8985 ;TFRAC(5392)=0.898667
 TFRAC(5393)=0.898833 ;TFRAC(5394)=0.899
 TFRAC(5395)=0.899167 ;TFRAC(5396)=0.899333
 TFRAC(5397)=0.8995 ;TFRAC(5398)=0.899667
 TFRAC(5399)=0.899833 ;TFRAC(5400)=0.9
 TFRAC(5401)=0.900167 ;TFRAC(5402)=0.900333
 TFRAC(5403)=0.9005 ;TFRAC(5404)=0.900667
 TFRAC(5405)=0.900833 ;TFRAC(5406)=0.901
 TFRAC(5407)=0.901167 ;TFRAC(5408)=0.901333
 TFRAC(5409)=0.9015 ;TFRAC(5410)=0.901667
 TFRAC(5411)=0.901833 ;TFRAC(5412)=0.902
 TFRAC(5413)=0.902167 ;TFRAC(5414)=0.902333
 TFRAC(5415)=0.9025 ;TFRAC(5416)=0.902667
 TFRAC(5417)=0.902833 ;TFRAC(5418)=0.903
 TFRAC(5419)=0.903167 ;TFRAC(5420)=0.903333
 TFRAC(5421)=0.9035 ;TFRAC(5422)=0.903667
 TFRAC(5423)=0.903833 ;TFRAC(5424)=0.904
 TFRAC(5425)=0.904167 ;TFRAC(5426)=0.904333
 TFRAC(5427)=0.9045 ;TFRAC(5428)=0.904667
 TFRAC(5429)=0.904833 ;TFRAC(5430)=0.905
 TFRAC(5431)=0.905167 ;TFRAC(5432)=0.905333
 TFRAC(5433)=0.9055 ;TFRAC(5434)=0.905667
 TFRAC(5435)=0.905833 ;TFRAC(5436)=0.906
 TFRAC(5437)=0.906167 ;TFRAC(5438)=0.906333
 TFRAC(5439)=0.9065 ;TFRAC(5440)=0.906667
 TFRAC(5441)=0.906833 ;TFRAC(5442)=0.907
 TFRAC(5443)=0.907167 ;TFRAC(5444)=0.907333
 TFRAC(5445)=0.9075 ;TFRAC(5446)=0.907667
 TFRAC(5447)=0.907833 ;TFRAC(5448)=0.908
 TFRAC(5449)=0.908167 ;TFRAC(5450)=0.908333
 TFRAC(5451)=0.9085 ;TFRAC(5452)=0.908667
 TFRAC(5453)=0.908833 ;TFRAC(5454)=0.909
 TFRAC(5455)=0.909167 ;TFRAC(5456)=0.909333
 TFRAC(5457)=0.9095 ;TFRAC(5458)=0.909667
 TFRAC(5459)=0.909833 ;TFRAC(5460)=0.91
 TFRAC(5461)=0.910167 ;TFRAC(5462)=0.910333
 TFRAC(5463)=0.9105 ;TFRAC(5464)=0.910667
 TFRAC(5465)=0.910833 ;TFRAC(5466)=0.911
 TFRAC(5467)=0.911167 ;TFRAC(5468)=0.911333
 TFRAC(5469)=0.9115 ;TFRAC(5470)=0.911667
 TFRAC(5471)=0.911833 ;TFRAC(5472)=0.912
 TFRAC(5473)=0.912167 ;TFRAC(5474)=0.912333
 TFRAC(5475)=0.9125 ;TFRAC(5476)=0.912667
 TFRAC(5477)=0.912833 ;TFRAC(5478)=0.913
 TFRAC(5479)=0.913167 ;TFRAC(5480)=0.913333
 TFRAC(5481)=0.9135 ;TFRAC(5482)=0.913667
 TFRAC(5483)=0.913833 ;TFRAC(5484)=0.914
 TFRAC(5485)=0.914167 ;TFRAC(5486)=0.914333
 TFRAC(5487)=0.9145 ;TFRAC(5488)=0.914667
 TFRAC(5489)=0.914833 ;TFRAC(5490)=0.915
 TFRAC(5491)=0.915167 ;TFRAC(5492)=0.915333
 TFRAC(5493)=0.9155 ;TFRAC(5494)=0.915667
 TFRAC(5495)=0.915833 ;TFRAC(5496)=0.916
 TFRAC(5497)=0.916167 ;TFRAC(5498)=0.916333
 TFRAC(5499)=0.9165 ;TFRAC(5500)=0.916667
 TFRAC(5501)=0.916833 ;TFRAC(5502)=0.917
 TFRAC(5503)=0.917167 ;TFRAC(5504)=0.917333
 TFRAC(5505)=0.9175 ;TFRAC(5506)=0.917667
 TFRAC(5507)=0.917833 ;TFRAC(5508)=0.918
 TFRAC(5509)=0.918167 ;TFRAC(5510)=0.918333
 TFRAC(5511)=0.9185 ;TFRAC(5512)=0.918667
 TFRAC(5513)=0.918833 ;TFRAC(5514)=0.919
 TFRAC(5515)=0.919167 ;TFRAC(5516)=0.919333
 TFRAC(5517)=0.9195 ;TFRAC(5518)=0.919667
 TFRAC(5519)=0.919833 ;TFRAC(5520)=0.92
 TFRAC(5521)=0.920167 ;TFRAC(5522)=0.920333
 TFRAC(5523)=0.9205 ;TFRAC(5524)=0.920667
 TFRAC(5525)=0.920833 ;TFRAC(5526)=0.921
 TFRAC(5527)=0.921167 ;TFRAC(5528)=0.921333
 TFRAC(5529)=0.9215 ;TFRAC(5530)=0.921667
 TFRAC(5531)=0.921833 ;TFRAC(5532)=0.922
 TFRAC(5533)=0.922167 ;TFRAC(5534)=0.922333
 TFRAC(5535)=0.9225 ;TFRAC(5536)=0.922667
 TFRAC(5537)=0.922833 ;TFRAC(5538)=0.923
 TFRAC(5539)=0.923167 ;TFRAC(5540)=0.923333
 TFRAC(5541)=0.9235 ;TFRAC(5542)=0.923667
 TFRAC(5543)=0.923833 ;TFRAC(5544)=0.924
 TFRAC(5545)=0.924167 ;TFRAC(5546)=0.924333
 TFRAC(5547)=0.9245 ;TFRAC(5548)=0.924667
 TFRAC(5549)=0.924833 ;TFRAC(5550)=0.925
 TFRAC(5551)=0.925167 ;TFRAC(5552)=0.925333
 TFRAC(5553)=0.9255 ;TFRAC(5554)=0.925667
 TFRAC(5555)=0.925833 ;TFRAC(5556)=0.926
 TFRAC(5557)=0.926167 ;TFRAC(5558)=0.926333
 TFRAC(5559)=0.9265 ;TFRAC(5560)=0.926667
 TFRAC(5561)=0.926833 ;TFRAC(5562)=0.927
 TFRAC(5563)=0.927167 ;TFRAC(5564)=0.927333
 TFRAC(5565)=0.9275 ;TFRAC(5566)=0.927667
 TFRAC(5567)=0.927833 ;TFRAC(5568)=0.928
 TFRAC(5569)=0.928167 ;TFRAC(5570)=0.928333
 TFRAC(5571)=0.9285 ;TFRAC(5572)=0.928667
 TFRAC(5573)=0.928833 ;TFRAC(5574)=0.929
 TFRAC(5575)=0.929167 ;TFRAC(5576)=0.929333
 TFRAC(5577)=0.9295 ;TFRAC(5578)=0.929667
 TFRAC(5579)=0.929833 ;TFRAC(5580)=0.93
 TFRAC(5581)=0.930167 ;TFRAC(5582)=0.930333
 TFRAC(5583)=0.9305 ;TFRAC(5584)=0.930667
 TFRAC(5585)=0.930833 ;TFRAC(5586)=0.931
 TFRAC(5587)=0.931167 ;TFRAC(5588)=0.931333
 TFRAC(5589)=0.9315 ;TFRAC(5590)=0.931667
 TFRAC(5591)=0.931833 ;TFRAC(5592)=0.932
 TFRAC(5593)=0.932167 ;TFRAC(5594)=0.932333
 TFRAC(5595)=0.9325 ;TFRAC(5596)=0.932667
 TFRAC(5597)=0.932833 ;TFRAC(5598)=0.933
 TFRAC(5599)=0.933167 ;TFRAC(5600)=0.933333
 TFRAC(5601)=0.9335 ;TFRAC(5602)=0.933667
 TFRAC(5603)=0.933833 ;TFRAC(5604)=0.934
 TFRAC(5605)=0.934167 ;TFRAC(5606)=0.934333
 TFRAC(5607)=0.9345 ;TFRAC(5608)=0.934667
 TFRAC(5609)=0.934833 ;TFRAC(5610)=0.935
 TFRAC(5611)=0.935167 ;TFRAC(5612)=0.935333
 TFRAC(5613)=0.9355 ;TFRAC(5614)=0.935667
 TFRAC(5615)=0.935833 ;TFRAC(5616)=0.936
 TFRAC(5617)=0.936167 ;TFRAC(5618)=0.936333
 TFRAC(5619)=0.9365 ;TFRAC(5620)=0.936667
 TFRAC(5621)=0.936833 ;TFRAC(5622)=0.937
 TFRAC(5623)=0.937167 ;TFRAC(5624)=0.937333
 TFRAC(5625)=0.9375 ;TFRAC(5626)=0.937667
 TFRAC(5627)=0.937833 ;TFRAC(5628)=0.938
 TFRAC(5629)=0.938167 ;TFRAC(5630)=0.938333
 TFRAC(5631)=0.9385 ;TFRAC(5632)=0.938667
 TFRAC(5633)=0.938833 ;TFRAC(5634)=0.939
 TFRAC(5635)=0.939167 ;TFRAC(5636)=0.939333
 TFRAC(5637)=0.9395 ;TFRAC(5638)=0.939667
 TFRAC(5639)=0.939833 ;TFRAC(5640)=0.94
 TFRAC(5641)=0.940167 ;TFRAC(5642)=0.940333
 TFRAC(5643)=0.9405 ;TFRAC(5644)=0.940667
 TFRAC(5645)=0.940833 ;TFRAC(5646)=0.941
 TFRAC(5647)=0.941167 ;TFRAC(5648)=0.941333
 TFRAC(5649)=0.9415 ;TFRAC(5650)=0.941667
 TFRAC(5651)=0.941833 ;TFRAC(5652)=0.942
 TFRAC(5653)=0.942167 ;TFRAC(5654)=0.942333
 TFRAC(5655)=0.9425 ;TFRAC(5656)=0.942667
 TFRAC(5657)=0.942833 ;TFRAC(5658)=0.943
 TFRAC(5659)=0.943167 ;TFRAC(5660)=0.943333
 TFRAC(5661)=0.9435 ;TFRAC(5662)=0.943667
 TFRAC(5663)=0.943833 ;TFRAC(5664)=0.944
 TFRAC(5665)=0.944167 ;TFRAC(5666)=0.944333
 TFRAC(5667)=0.9445 ;TFRAC(5668)=0.944667
 TFRAC(5669)=0.944833 ;TFRAC(5670)=0.945
 TFRAC(5671)=0.945167 ;TFRAC(5672)=0.945333
 TFRAC(5673)=0.9455 ;TFRAC(5674)=0.945667
 TFRAC(5675)=0.945833 ;TFRAC(5676)=0.946
 TFRAC(5677)=0.946167 ;TFRAC(5678)=0.946333
 TFRAC(5679)=0.9465 ;TFRAC(5680)=0.946667
 TFRAC(5681)=0.946833 ;TFRAC(5682)=0.947
 TFRAC(5683)=0.947167 ;TFRAC(5684)=0.947333
 TFRAC(5685)=0.9475 ;TFRAC(5686)=0.947667
 TFRAC(5687)=0.947833 ;TFRAC(5688)=0.948
 TFRAC(5689)=0.948167 ;TFRAC(5690)=0.948333
 TFRAC(5691)=0.9485 ;TFRAC(5692)=0.948667
 TFRAC(5693)=0.948833 ;TFRAC(5694)=0.949
 TFRAC(5695)=0.949167 ;TFRAC(5696)=0.949333
 TFRAC(5697)=0.9495 ;TFRAC(5698)=0.949667
 TFRAC(5699)=0.949833 ;TFRAC(5700)=0.95
 TFRAC(5701)=0.950167 ;TFRAC(5702)=0.950333
 TFRAC(5703)=0.9505 ;TFRAC(5704)=0.950667
 TFRAC(5705)=0.950833 ;TFRAC(5706)=0.951
 TFRAC(5707)=0.951167 ;TFRAC(5708)=0.951333
 TFRAC(5709)=0.9515 ;TFRAC(5710)=0.951667
 TFRAC(5711)=0.951833 ;TFRAC(5712)=0.952
 TFRAC(5713)=0.952167 ;TFRAC(5714)=0.952333
 TFRAC(5715)=0.9525 ;TFRAC(5716)=0.952667
 TFRAC(5717)=0.952833 ;TFRAC(5718)=0.953
 TFRAC(5719)=0.953167 ;TFRAC(5720)=0.953333
 TFRAC(5721)=0.9535 ;TFRAC(5722)=0.953667
 TFRAC(5723)=0.953833 ;TFRAC(5724)=0.954
 TFRAC(5725)=0.954167 ;TFRAC(5726)=0.954333
 TFRAC(5727)=0.9545 ;TFRAC(5728)=0.954667
 TFRAC(5729)=0.954833 ;TFRAC(5730)=0.955
 TFRAC(5731)=0.955167 ;TFRAC(5732)=0.955333
 TFRAC(5733)=0.9555 ;TFRAC(5734)=0.955667
 TFRAC(5735)=0.955833 ;TFRAC(5736)=0.956
 TFRAC(5737)=0.956167 ;TFRAC(5738)=0.956333
 TFRAC(5739)=0.9565 ;TFRAC(5740)=0.956667
 TFRAC(5741)=0.956833 ;TFRAC(5742)=0.957
 TFRAC(5743)=0.957167 ;TFRAC(5744)=0.957333
 TFRAC(5745)=0.9575 ;TFRAC(5746)=0.957667
 TFRAC(5747)=0.957833 ;TFRAC(5748)=0.958
 TFRAC(5749)=0.958167 ;TFRAC(5750)=0.958333
 TFRAC(5751)=0.9585 ;TFRAC(5752)=0.958667
 TFRAC(5753)=0.958833 ;TFRAC(5754)=0.959
 TFRAC(5755)=0.959167 ;TFRAC(5756)=0.959333
 TFRAC(5757)=0.9595 ;TFRAC(5758)=0.959667
 TFRAC(5759)=0.959833 ;TFRAC(5760)=0.96
 TFRAC(5761)=0.960167 ;TFRAC(5762)=0.960333
 TFRAC(5763)=0.9605 ;TFRAC(5764)=0.960667
 TFRAC(5765)=0.960833 ;TFRAC(5766)=0.961
 TFRAC(5767)=0.961167 ;TFRAC(5768)=0.961333
 TFRAC(5769)=0.9615 ;TFRAC(5770)=0.961667
 TFRAC(5771)=0.961833 ;TFRAC(5772)=0.962
 TFRAC(5773)=0.962167 ;TFRAC(5774)=0.962333
 TFRAC(5775)=0.9625 ;TFRAC(5776)=0.962667
 TFRAC(5777)=0.962833 ;TFRAC(5778)=0.963
 TFRAC(5779)=0.963167 ;TFRAC(5780)=0.963333
 TFRAC(5781)=0.9635 ;TFRAC(5782)=0.963667
 TFRAC(5783)=0.963833 ;TFRAC(5784)=0.964
 TFRAC(5785)=0.964167 ;TFRAC(5786)=0.964333
 TFRAC(5787)=0.9645 ;TFRAC(5788)=0.964667
 TFRAC(5789)=0.964833 ;TFRAC(5790)=0.965
 TFRAC(5791)=0.965167 ;TFRAC(5792)=0.965333
 TFRAC(5793)=0.9655 ;TFRAC(5794)=0.965667
 TFRAC(5795)=0.965833 ;TFRAC(5796)=0.966
 TFRAC(5797)=0.966167 ;TFRAC(5798)=0.966333
 TFRAC(5799)=0.9665 ;TFRAC(5800)=0.966667
 TFRAC(5801)=0.966833 ;TFRAC(5802)=0.967
 TFRAC(5803)=0.967167 ;TFRAC(5804)=0.967333
 TFRAC(5805)=0.9675 ;TFRAC(5806)=0.967667
 TFRAC(5807)=0.967833 ;TFRAC(5808)=0.968
 TFRAC(5809)=0.968167 ;TFRAC(5810)=0.968333
 TFRAC(5811)=0.9685 ;TFRAC(5812)=0.968667
 TFRAC(5813)=0.968833 ;TFRAC(5814)=0.969
 TFRAC(5815)=0.969167 ;TFRAC(5816)=0.969333
 TFRAC(5817)=0.9695 ;TFRAC(5818)=0.969667
 TFRAC(5819)=0.969833 ;TFRAC(5820)=0.97
 TFRAC(5821)=0.970167 ;TFRAC(5822)=0.970333
 TFRAC(5823)=0.9705 ;TFRAC(5824)=0.970667
 TFRAC(5825)=0.970833 ;TFRAC(5826)=0.971
 TFRAC(5827)=0.971167 ;TFRAC(5828)=0.971333
 TFRAC(5829)=0.9715 ;TFRAC(5830)=0.971667
 TFRAC(5831)=0.971833 ;TFRAC(5832)=0.972
 TFRAC(5833)=0.972167 ;TFRAC(5834)=0.972333
 TFRAC(5835)=0.9725 ;TFRAC(5836)=0.972667
 TFRAC(5837)=0.972833 ;TFRAC(5838)=0.973
 TFRAC(5839)=0.973167 ;TFRAC(5840)=0.973333
 TFRAC(5841)=0.9735 ;TFRAC(5842)=0.973667
 TFRAC(5843)=0.973833 ;TFRAC(5844)=0.974
 TFRAC(5845)=0.974167 ;TFRAC(5846)=0.974333
 TFRAC(5847)=0.9745 ;TFRAC(5848)=0.974667
 TFRAC(5849)=0.974833 ;TFRAC(5850)=0.975
 TFRAC(5851)=0.975167 ;TFRAC(5852)=0.975333
 TFRAC(5853)=0.9755 ;TFRAC(5854)=0.975667
 TFRAC(5855)=0.975833 ;TFRAC(5856)=0.976
 TFRAC(5857)=0.976167 ;TFRAC(5858)=0.976333
 TFRAC(5859)=0.9765 ;TFRAC(5860)=0.976667
 TFRAC(5861)=0.976833 ;TFRAC(5862)=0.977
 TFRAC(5863)=0.977167 ;TFRAC(5864)=0.977333
 TFRAC(5865)=0.9775 ;TFRAC(5866)=0.977667
 TFRAC(5867)=0.977833 ;TFRAC(5868)=0.978
 TFRAC(5869)=0.978167 ;TFRAC(5870)=0.978333
 TFRAC(5871)=0.9785 ;TFRAC(5872)=0.978667
 TFRAC(5873)=0.978833 ;TFRAC(5874)=0.979
 TFRAC(5875)=0.979167 ;TFRAC(5876)=0.979333
 TFRAC(5877)=0.9795 ;TFRAC(5878)=0.979667
 TFRAC(5879)=0.979833 ;TFRAC(5880)=0.98
 TFRAC(5881)=0.980167 ;TFRAC(5882)=0.980333
 TFRAC(5883)=0.9805 ;TFRAC(5884)=0.980667
 TFRAC(5885)=0.980833 ;TFRAC(5886)=0.981
 TFRAC(5887)=0.981167 ;TFRAC(5888)=0.981333
 TFRAC(5889)=0.9815 ;TFRAC(5890)=0.981667
 TFRAC(5891)=0.981833 ;TFRAC(5892)=0.982
 TFRAC(5893)=0.982167 ;TFRAC(5894)=0.982333
 TFRAC(5895)=0.9825 ;TFRAC(5896)=0.982667
 TFRAC(5897)=0.982833 ;TFRAC(5898)=0.983
 TFRAC(5899)=0.983167 ;TFRAC(5900)=0.983333
 TFRAC(5901)=0.9835 ;TFRAC(5902)=0.983667
 TFRAC(5903)=0.983833 ;TFRAC(5904)=0.984
 TFRAC(5905)=0.984167 ;TFRAC(5906)=0.984333
 TFRAC(5907)=0.9845 ;TFRAC(5908)=0.984667
 TFRAC(5909)=0.984833 ;TFRAC(5910)=0.985
 TFRAC(5911)=0.985167 ;TFRAC(5912)=0.985333
 TFRAC(5913)=0.9855 ;TFRAC(5914)=0.985667
 TFRAC(5915)=0.985833 ;TFRAC(5916)=0.986
 TFRAC(5917)=0.986167 ;TFRAC(5918)=0.986333
 TFRAC(5919)=0.9865 ;TFRAC(5920)=0.986667
 TFRAC(5921)=0.986833 ;TFRAC(5922)=0.987
 TFRAC(5923)=0.987167 ;TFRAC(5924)=0.987333
 TFRAC(5925)=0.9875 ;TFRAC(5926)=0.987667
 TFRAC(5927)=0.987833 ;TFRAC(5928)=0.988
 TFRAC(5929)=0.988167 ;TFRAC(5930)=0.988333
 TFRAC(5931)=0.9885 ;TFRAC(5932)=0.988667
 TFRAC(5933)=0.988833 ;TFRAC(5934)=0.989
 TFRAC(5935)=0.989167 ;TFRAC(5936)=0.989333
 TFRAC(5937)=0.9895 ;TFRAC(5938)=0.989667
 TFRAC(5939)=0.989833 ;TFRAC(5940)=0.99
 TFRAC(5941)=0.990167 ;TFRAC(5942)=0.990333
 TFRAC(5943)=0.9905 ;TFRAC(5944)=0.990667
 TFRAC(5945)=0.990833 ;TFRAC(5946)=0.991
 TFRAC(5947)=0.991167 ;TFRAC(5948)=0.991333
 TFRAC(5949)=0.9915 ;TFRAC(5950)=0.991667
 TFRAC(5951)=0.991833 ;TFRAC(5952)=0.992
 TFRAC(5953)=0.992167 ;TFRAC(5954)=0.992333
 TFRAC(5955)=0.9925 ;TFRAC(5956)=0.992667
 TFRAC(5957)=0.992833 ;TFRAC(5958)=0.993
 TFRAC(5959)=0.993167 ;TFRAC(5960)=0.993333
 TFRAC(5961)=0.9935 ;TFRAC(5962)=0.993667
 TFRAC(5963)=0.993833 ;TFRAC(5964)=0.994
 TFRAC(5965)=0.994167 ;TFRAC(5966)=0.994333
 TFRAC(5967)=0.9945 ;TFRAC(5968)=0.994667
 TFRAC(5969)=0.994833 ;TFRAC(5970)=0.995
 TFRAC(5971)=0.995167 ;TFRAC(5972)=0.995333
 TFRAC(5973)=0.9955 ;TFRAC(5974)=0.995667
 TFRAC(5975)=0.995833 ;TFRAC(5976)=0.996
 TFRAC(5977)=0.996167 ;TFRAC(5978)=0.996333
 TFRAC(5979)=0.9965 ;TFRAC(5980)=0.996667
 TFRAC(5981)=0.996833 ;TFRAC(5982)=0.997
 TFRAC(5983)=0.997167 ;TFRAC(5984)=0.997333
 TFRAC(5985)=0.9975 ;TFRAC(5986)=0.997667
 TFRAC(5987)=0.997833 ;TFRAC(5988)=0.998
 TFRAC(5989)=0.998167 ;TFRAC(5990)=0.998333
 TFRAC(5991)=0.9985 ;TFRAC(5992)=0.998667
 TFRAC(5993)=0.998833 ;TFRAC(5994)=0.999
 TFRAC(5995)=0.999167 ;TFRAC(5996)=0.999333
 TFRAC(5997)=0.9995 ;TFRAC(5998)=0.999667
 TFRAC(5999)=0.999833 ;TFRAC(6000)=1.
 ************************************************************
  Group 3. X-Direction Grid Spacing
 CARTES = T
 NX = 36
 XULAST =0.0202
 XFRAC(1)=7.62377E-03 ;XFRAC(2)=0.015248
 XFRAC(3)=0.022871 ;XFRAC(4)=0.030495
 XFRAC(5)=0.038119 ;XFRAC(6)=0.073648
 XFRAC(7)=0.109177 ;XFRAC(8)=0.144707
 XFRAC(9)=0.180236 ;XFRAC(10)=0.215765
 XFRAC(11)=0.251295 ;XFRAC(12)=0.286824
 XFRAC(13)=0.322353 ;XFRAC(14)=0.357883
 XFRAC(15)=0.393412 ;XFRAC(16)=0.428941
 XFRAC(17)=0.464471 ;XFRAC(18)=0.5
 XFRAC(19)=0.535529 ;XFRAC(20)=0.571059
 XFRAC(21)=0.606588 ;XFRAC(22)=0.642117
 XFRAC(23)=0.677647 ;XFRAC(24)=0.713176
 XFRAC(25)=0.748705 ;XFRAC(26)=0.784235
 XFRAC(27)=0.819764 ;XFRAC(28)=0.855293
 XFRAC(29)=0.890823 ;XFRAC(30)=0.926352
 XFRAC(31)=0.961881 ;XFRAC(32)=0.969505
 XFRAC(33)=0.977129 ;XFRAC(34)=0.984752
 XFRAC(35)=0.992376 ;XFRAC(36)=1.
 ************************************************************
  Group 4. Y-Direction Grid Spacing
 NY = 900
 YVLAST =0.5
 YFRAC(1)=1.111111E-03 ;YFRAC(2)=2.222222E-03
 YFRAC(3)=3.333333E-03 ;YFRAC(4)=4.444444E-03
 YFRAC(5)=5.555555E-03 ;YFRAC(6)=6.666667E-03
 YFRAC(7)=7.777778E-03 ;YFRAC(8)=8.888888E-03
 YFRAC(9)=1.0E-02 ;YFRAC(10)=0.011111
 YFRAC(11)=0.012222 ;YFRAC(12)=0.013333
 YFRAC(13)=0.014444 ;YFRAC(14)=0.015556
 YFRAC(15)=0.016667 ;YFRAC(16)=0.017778
 YFRAC(17)=0.018889 ;YFRAC(18)=0.02
 YFRAC(19)=0.021111 ;YFRAC(20)=0.022222
 YFRAC(21)=0.023333 ;YFRAC(22)=0.024444
 YFRAC(23)=0.025556 ;YFRAC(24)=0.026667
 YFRAC(25)=0.027778 ;YFRAC(26)=0.028889
 YFRAC(27)=0.03 ;YFRAC(28)=0.031111
 YFRAC(29)=0.032222 ;YFRAC(30)=0.033333
 YFRAC(31)=0.034444 ;YFRAC(32)=0.035556
 YFRAC(33)=0.036667 ;YFRAC(34)=0.037778
 YFRAC(35)=0.038889 ;YFRAC(36)=0.04
 YFRAC(37)=0.041111 ;YFRAC(38)=0.042222
 YFRAC(39)=0.043333 ;YFRAC(40)=0.044444
 YFRAC(41)=0.045556 ;YFRAC(42)=0.046667
 YFRAC(43)=0.047778 ;YFRAC(44)=0.048889
 YFRAC(45)=0.05 ;YFRAC(46)=0.051111
 YFRAC(47)=0.052222 ;YFRAC(48)=0.053333
 YFRAC(49)=0.054444 ;YFRAC(50)=0.055556
 YFRAC(51)=0.056667 ;YFRAC(52)=0.057778
 YFRAC(53)=0.058889 ;YFRAC(54)=0.06
 YFRAC(55)=0.061111 ;YFRAC(56)=0.062222
 YFRAC(57)=0.063333 ;YFRAC(58)=0.064444
 YFRAC(59)=0.065556 ;YFRAC(60)=0.066667
 YFRAC(61)=0.067778 ;YFRAC(62)=0.068889
 YFRAC(63)=0.07 ;YFRAC(64)=0.071111
 YFRAC(65)=0.072222 ;YFRAC(66)=0.073333
 YFRAC(67)=0.074444 ;YFRAC(68)=0.075556
 YFRAC(69)=0.076667 ;YFRAC(70)=0.077778
 YFRAC(71)=0.078889 ;YFRAC(72)=0.08
 YFRAC(73)=0.081111 ;YFRAC(74)=0.082222
 YFRAC(75)=0.083333 ;YFRAC(76)=0.084444
 YFRAC(77)=0.085556 ;YFRAC(78)=0.086667
 YFRAC(79)=0.087778 ;YFRAC(80)=0.088889
 YFRAC(81)=0.09 ;YFRAC(82)=0.091111
 YFRAC(83)=0.092222 ;YFRAC(84)=0.093333
 YFRAC(85)=0.094444 ;YFRAC(86)=0.095556
 YFRAC(87)=0.096667 ;YFRAC(88)=0.097778
 YFRAC(89)=0.098889 ;YFRAC(90)=0.1
 YFRAC(91)=0.101111 ;YFRAC(92)=0.102222
 YFRAC(93)=0.103333 ;YFRAC(94)=0.104444
 YFRAC(95)=0.105556 ;YFRAC(96)=0.106667
 YFRAC(97)=0.107778 ;YFRAC(98)=0.108889
 YFRAC(99)=0.11 ;YFRAC(100)=0.111111
 YFRAC(101)=0.112222 ;YFRAC(102)=0.113333
 YFRAC(103)=0.114444 ;YFRAC(104)=0.115556
 YFRAC(105)=0.116667 ;YFRAC(106)=0.117778
 YFRAC(107)=0.118889 ;YFRAC(108)=0.12
 YFRAC(109)=0.121111 ;YFRAC(110)=0.122222
 YFRAC(111)=0.123333 ;YFRAC(112)=0.124444
 YFRAC(113)=0.125556 ;YFRAC(114)=0.126667
 YFRAC(115)=0.127778 ;YFRAC(116)=0.128889
 YFRAC(117)=0.13 ;YFRAC(118)=0.131111
 YFRAC(119)=0.132222 ;YFRAC(120)=0.133333
 YFRAC(121)=0.134444 ;YFRAC(122)=0.135556
 YFRAC(123)=0.136667 ;YFRAC(124)=0.137778
 YFRAC(125)=0.138889 ;YFRAC(126)=0.14
 YFRAC(127)=0.141111 ;YFRAC(128)=0.142222
 YFRAC(129)=0.143333 ;YFRAC(130)=0.144444
 YFRAC(131)=0.145556 ;YFRAC(132)=0.146667
 YFRAC(133)=0.147778 ;YFRAC(134)=0.148889
 YFRAC(135)=0.15 ;YFRAC(136)=0.151111
 YFRAC(137)=0.152222 ;YFRAC(138)=0.153333
 YFRAC(139)=0.154444 ;YFRAC(140)=0.155556
 YFRAC(141)=0.156667 ;YFRAC(142)=0.157778
 YFRAC(143)=0.158889 ;YFRAC(144)=0.16
 YFRAC(145)=0.161111 ;YFRAC(146)=0.162222
 YFRAC(147)=0.163333 ;YFRAC(148)=0.164444
 YFRAC(149)=0.165556 ;YFRAC(150)=0.166667
 YFRAC(151)=0.167778 ;YFRAC(152)=0.168889
 YFRAC(153)=0.17 ;YFRAC(154)=0.171111
 YFRAC(155)=0.172222 ;YFRAC(156)=0.173333
 YFRAC(157)=0.174444 ;YFRAC(158)=0.175556
 YFRAC(159)=0.176667 ;YFRAC(160)=0.177778
 YFRAC(161)=0.178889 ;YFRAC(162)=0.18
 YFRAC(163)=0.181111 ;YFRAC(164)=0.182222
 YFRAC(165)=0.183333 ;YFRAC(166)=0.184444
 YFRAC(167)=0.185556 ;YFRAC(168)=0.186667
 YFRAC(169)=0.187778 ;YFRAC(170)=0.188889
 YFRAC(171)=0.19 ;YFRAC(172)=0.191111
 YFRAC(173)=0.192222 ;YFRAC(174)=0.193333
 YFRAC(175)=0.194444 ;YFRAC(176)=0.195556
 YFRAC(177)=0.196667 ;YFRAC(178)=0.197778
 YFRAC(179)=0.198889 ;YFRAC(180)=0.2
 YFRAC(181)=0.201111 ;YFRAC(182)=0.202222
 YFRAC(183)=0.203333 ;YFRAC(184)=0.204444
 YFRAC(185)=0.205556 ;YFRAC(186)=0.206667
 YFRAC(187)=0.207778 ;YFRAC(188)=0.208889
 YFRAC(189)=0.21 ;YFRAC(190)=0.211111
 YFRAC(191)=0.212222 ;YFRAC(192)=0.213333
 YFRAC(193)=0.214444 ;YFRAC(194)=0.215556
 YFRAC(195)=0.216667 ;YFRAC(196)=0.217778
 YFRAC(197)=0.218889 ;YFRAC(198)=0.22
 YFRAC(199)=0.221111 ;YFRAC(200)=0.222222
 YFRAC(201)=0.223333 ;YFRAC(202)=0.224444
 YFRAC(203)=0.225556 ;YFRAC(204)=0.226667
 YFRAC(205)=0.227778 ;YFRAC(206)=0.228889
 YFRAC(207)=0.23 ;YFRAC(208)=0.231111
 YFRAC(209)=0.232222 ;YFRAC(210)=0.233333
 YFRAC(211)=0.234444 ;YFRAC(212)=0.235556
 YFRAC(213)=0.236667 ;YFRAC(214)=0.237778
 YFRAC(215)=0.238889 ;YFRAC(216)=0.24
 YFRAC(217)=0.241111 ;YFRAC(218)=0.242222
 YFRAC(219)=0.243333 ;YFRAC(220)=0.244444
 YFRAC(221)=0.245556 ;YFRAC(222)=0.246667
 YFRAC(223)=0.247778 ;YFRAC(224)=0.248889
 YFRAC(225)=0.25 ;YFRAC(226)=0.251111
 YFRAC(227)=0.252222 ;YFRAC(228)=0.253333
 YFRAC(229)=0.254444 ;YFRAC(230)=0.255556
 YFRAC(231)=0.256667 ;YFRAC(232)=0.257778
 YFRAC(233)=0.258889 ;YFRAC(234)=0.26
 YFRAC(235)=0.261111 ;YFRAC(236)=0.262222
 YFRAC(237)=0.263333 ;YFRAC(238)=0.264444
 YFRAC(239)=0.265556 ;YFRAC(240)=0.266667
 YFRAC(241)=0.267778 ;YFRAC(242)=0.268889
 YFRAC(243)=0.27 ;YFRAC(244)=0.271111
 YFRAC(245)=0.272222 ;YFRAC(246)=0.273333
 YFRAC(247)=0.274444 ;YFRAC(248)=0.275556
 YFRAC(249)=0.276667 ;YFRAC(250)=0.277778
 YFRAC(251)=0.278889 ;YFRAC(252)=0.28
 YFRAC(253)=0.281111 ;YFRAC(254)=0.282222
 YFRAC(255)=0.283333 ;YFRAC(256)=0.284444
 YFRAC(257)=0.285556 ;YFRAC(258)=0.286667
 YFRAC(259)=0.287778 ;YFRAC(260)=0.288889
 YFRAC(261)=0.29 ;YFRAC(262)=0.291111
 YFRAC(263)=0.292222 ;YFRAC(264)=0.293333
 YFRAC(265)=0.294444 ;YFRAC(266)=0.295556
 YFRAC(267)=0.296667 ;YFRAC(268)=0.297778
 YFRAC(269)=0.298889 ;YFRAC(270)=0.3
 YFRAC(271)=0.301111 ;YFRAC(272)=0.302222
 YFRAC(273)=0.303333 ;YFRAC(274)=0.304444
 YFRAC(275)=0.305556 ;YFRAC(276)=0.306667
 YFRAC(277)=0.307778 ;YFRAC(278)=0.308889
 YFRAC(279)=0.31 ;YFRAC(280)=0.311111
 YFRAC(281)=0.312222 ;YFRAC(282)=0.313333
 YFRAC(283)=0.314444 ;YFRAC(284)=0.315556
 YFRAC(285)=0.316667 ;YFRAC(286)=0.317778
 YFRAC(287)=0.318889 ;YFRAC(288)=0.32
 YFRAC(289)=0.321111 ;YFRAC(290)=0.322222
 YFRAC(291)=0.323333 ;YFRAC(292)=0.324444
 YFRAC(293)=0.325556 ;YFRAC(294)=0.326667
 YFRAC(295)=0.327778 ;YFRAC(296)=0.328889
 YFRAC(297)=0.33 ;YFRAC(298)=0.331111
 YFRAC(299)=0.332222 ;YFRAC(300)=0.333333
 YFRAC(301)=0.334444 ;YFRAC(302)=0.335556
 YFRAC(303)=0.336667 ;YFRAC(304)=0.337778
 YFRAC(305)=0.338889 ;YFRAC(306)=0.34
 YFRAC(307)=0.341111 ;YFRAC(308)=0.342222
 YFRAC(309)=0.343333 ;YFRAC(310)=0.344444
 YFRAC(311)=0.345556 ;YFRAC(312)=0.346667
 YFRAC(313)=0.347778 ;YFRAC(314)=0.348889
 YFRAC(315)=0.35 ;YFRAC(316)=0.351111
 YFRAC(317)=0.352222 ;YFRAC(318)=0.353333
 YFRAC(319)=0.354444 ;YFRAC(320)=0.355556
 YFRAC(321)=0.356667 ;YFRAC(322)=0.357778
 YFRAC(323)=0.358889 ;YFRAC(324)=0.36
 YFRAC(325)=0.361111 ;YFRAC(326)=0.362222
 YFRAC(327)=0.363333 ;YFRAC(328)=0.364444
 YFRAC(329)=0.365556 ;YFRAC(330)=0.366667
 YFRAC(331)=0.367778 ;YFRAC(332)=0.368889
 YFRAC(333)=0.37 ;YFRAC(334)=0.371111
 YFRAC(335)=0.372222 ;YFRAC(336)=0.373333
 YFRAC(337)=0.374444 ;YFRAC(338)=0.375556
 YFRAC(339)=0.376667 ;YFRAC(340)=0.377778
 YFRAC(341)=0.378889 ;YFRAC(342)=0.38
 YFRAC(343)=0.381111 ;YFRAC(344)=0.382222
 YFRAC(345)=0.383333 ;YFRAC(346)=0.384444
 YFRAC(347)=0.385556 ;YFRAC(348)=0.386667
 YFRAC(349)=0.387778 ;YFRAC(350)=0.388889
 YFRAC(351)=0.39 ;YFRAC(352)=0.391111
 YFRAC(353)=0.392222 ;YFRAC(354)=0.393333
 YFRAC(355)=0.394444 ;YFRAC(356)=0.395556
 YFRAC(357)=0.396667 ;YFRAC(358)=0.397778
 YFRAC(359)=0.398889 ;YFRAC(360)=0.4
 YFRAC(361)=0.401111 ;YFRAC(362)=0.402222
 YFRAC(363)=0.403333 ;YFRAC(364)=0.404444
 YFRAC(365)=0.405556 ;YFRAC(366)=0.406667
 YFRAC(367)=0.407778 ;YFRAC(368)=0.408889
 YFRAC(369)=0.41 ;YFRAC(370)=0.411111
 YFRAC(371)=0.412222 ;YFRAC(372)=0.413333
 YFRAC(373)=0.414444 ;YFRAC(374)=0.415556
 YFRAC(375)=0.416667 ;YFRAC(376)=0.417778
 YFRAC(377)=0.418889 ;YFRAC(378)=0.42
 YFRAC(379)=0.421111 ;YFRAC(380)=0.422222
 YFRAC(381)=0.423333 ;YFRAC(382)=0.424444
 YFRAC(383)=0.425556 ;YFRAC(384)=0.426667
 YFRAC(385)=0.427778 ;YFRAC(386)=0.428889
 YFRAC(387)=0.43 ;YFRAC(388)=0.431111
 YFRAC(389)=0.432222 ;YFRAC(390)=0.433333
 YFRAC(391)=0.434444 ;YFRAC(392)=0.435556
 YFRAC(393)=0.436667 ;YFRAC(394)=0.437778
 YFRAC(395)=0.438889 ;YFRAC(396)=0.44
 YFRAC(397)=0.441111 ;YFRAC(398)=0.442222
 YFRAC(399)=0.443333 ;YFRAC(400)=0.444444
 YFRAC(401)=0.445556 ;YFRAC(402)=0.446667
 YFRAC(403)=0.447778 ;YFRAC(404)=0.448889
 YFRAC(405)=0.45 ;YFRAC(406)=0.451111
 YFRAC(407)=0.452222 ;YFRAC(408)=0.453333
 YFRAC(409)=0.454444 ;YFRAC(410)=0.455556
 YFRAC(411)=0.456667 ;YFRAC(412)=0.457778
 YFRAC(413)=0.458889 ;YFRAC(414)=0.46
 YFRAC(415)=0.461111 ;YFRAC(416)=0.462222
 YFRAC(417)=0.463333 ;YFRAC(418)=0.464444
 YFRAC(419)=0.465556 ;YFRAC(420)=0.466667
 YFRAC(421)=0.467778 ;YFRAC(422)=0.468889
 YFRAC(423)=0.47 ;YFRAC(424)=0.471111
 YFRAC(425)=0.472222 ;YFRAC(426)=0.473333
 YFRAC(427)=0.474444 ;YFRAC(428)=0.475556
 YFRAC(429)=0.476667 ;YFRAC(430)=0.477778
 YFRAC(431)=0.478889 ;YFRAC(432)=0.48
 YFRAC(433)=0.481111 ;YFRAC(434)=0.482222
 YFRAC(435)=0.483333 ;YFRAC(436)=0.484444
 YFRAC(437)=0.485556 ;YFRAC(438)=0.486667
 YFRAC(439)=0.487778 ;YFRAC(440)=0.488889
 YFRAC(441)=0.49 ;YFRAC(442)=0.491111
 YFRAC(443)=0.492222 ;YFRAC(444)=0.493333
 YFRAC(445)=0.494444 ;YFRAC(446)=0.495556
 YFRAC(447)=0.496667 ;YFRAC(448)=0.497778
 YFRAC(449)=0.498889 ;YFRAC(450)=0.5
 YFRAC(451)=0.501111 ;YFRAC(452)=0.502222
 YFRAC(453)=0.503333 ;YFRAC(454)=0.504444
 YFRAC(455)=0.505556 ;YFRAC(456)=0.506667
 YFRAC(457)=0.507778 ;YFRAC(458)=0.508889
 YFRAC(459)=0.51 ;YFRAC(460)=0.511111
 YFRAC(461)=0.512222 ;YFRAC(462)=0.513333
 YFRAC(463)=0.514444 ;YFRAC(464)=0.515556
 YFRAC(465)=0.516667 ;YFRAC(466)=0.517778
 YFRAC(467)=0.518889 ;YFRAC(468)=0.52
 YFRAC(469)=0.521111 ;YFRAC(470)=0.522222
 YFRAC(471)=0.523333 ;YFRAC(472)=0.524444
 YFRAC(473)=0.525556 ;YFRAC(474)=0.526667
 YFRAC(475)=0.527778 ;YFRAC(476)=0.528889
 YFRAC(477)=0.53 ;YFRAC(478)=0.531111
 YFRAC(479)=0.532222 ;YFRAC(480)=0.533333
 YFRAC(481)=0.534444 ;YFRAC(482)=0.535556
 YFRAC(483)=0.536667 ;YFRAC(484)=0.537778
 YFRAC(485)=0.538889 ;YFRAC(486)=0.54
 YFRAC(487)=0.541111 ;YFRAC(488)=0.542222
 YFRAC(489)=0.543333 ;YFRAC(490)=0.544444
 YFRAC(491)=0.545556 ;YFRAC(492)=0.546667
 YFRAC(493)=0.547778 ;YFRAC(494)=0.548889
 YFRAC(495)=0.55 ;YFRAC(496)=0.551111
 YFRAC(497)=0.552222 ;YFRAC(498)=0.553333
 YFRAC(499)=0.554444 ;YFRAC(500)=0.555556
 YFRAC(501)=0.556667 ;YFRAC(502)=0.557778
 YFRAC(503)=0.558889 ;YFRAC(504)=0.56
 YFRAC(505)=0.561111 ;YFRAC(506)=0.562222
 YFRAC(507)=0.563333 ;YFRAC(508)=0.564444
 YFRAC(509)=0.565556 ;YFRAC(510)=0.566667
 YFRAC(511)=0.567778 ;YFRAC(512)=0.568889
 YFRAC(513)=0.57 ;YFRAC(514)=0.571111
 YFRAC(515)=0.572222 ;YFRAC(516)=0.573333
 YFRAC(517)=0.574444 ;YFRAC(518)=0.575556
 YFRAC(519)=0.576667 ;YFRAC(520)=0.577778
 YFRAC(521)=0.578889 ;YFRAC(522)=0.58
 YFRAC(523)=0.581111 ;YFRAC(524)=0.582222
 YFRAC(525)=0.583333 ;YFRAC(526)=0.584444
 YFRAC(527)=0.585556 ;YFRAC(528)=0.586667
 YFRAC(529)=0.587778 ;YFRAC(530)=0.588889
 YFRAC(531)=0.59 ;YFRAC(532)=0.591111
 YFRAC(533)=0.592222 ;YFRAC(534)=0.593333
 YFRAC(535)=0.594444 ;YFRAC(536)=0.595556
 YFRAC(537)=0.596667 ;YFRAC(538)=0.597778
 YFRAC(539)=0.598889 ;YFRAC(540)=0.6
 YFRAC(541)=0.601111 ;YFRAC(542)=0.602222
 YFRAC(543)=0.603333 ;YFRAC(544)=0.604444
 YFRAC(545)=0.605556 ;YFRAC(546)=0.606667
 YFRAC(547)=0.607778 ;YFRAC(548)=0.608889
 YFRAC(549)=0.61 ;YFRAC(550)=0.611111
 YFRAC(551)=0.612222 ;YFRAC(552)=0.613333
 YFRAC(553)=0.614444 ;YFRAC(554)=0.615556
 YFRAC(555)=0.616667 ;YFRAC(556)=0.617778
 YFRAC(557)=0.618889 ;YFRAC(558)=0.62
 YFRAC(559)=0.621111 ;YFRAC(560)=0.622222
 YFRAC(561)=0.623333 ;YFRAC(562)=0.624444
 YFRAC(563)=0.625556 ;YFRAC(564)=0.626667
 YFRAC(565)=0.627778 ;YFRAC(566)=0.628889
 YFRAC(567)=0.63 ;YFRAC(568)=0.631111
 YFRAC(569)=0.632222 ;YFRAC(570)=0.633333
 YFRAC(571)=0.634444 ;YFRAC(572)=0.635556
 YFRAC(573)=0.636667 ;YFRAC(574)=0.637778
 YFRAC(575)=0.638889 ;YFRAC(576)=0.64
 YFRAC(577)=0.641111 ;YFRAC(578)=0.642222
 YFRAC(579)=0.643333 ;YFRAC(580)=0.644444
 YFRAC(581)=0.645556 ;YFRAC(582)=0.646667
 YFRAC(583)=0.647778 ;YFRAC(584)=0.648889
 YFRAC(585)=0.65 ;YFRAC(586)=0.651111
 YFRAC(587)=0.652222 ;YFRAC(588)=0.653333
 YFRAC(589)=0.654444 ;YFRAC(590)=0.655556
 YFRAC(591)=0.656667 ;YFRAC(592)=0.657778
 YFRAC(593)=0.658889 ;YFRAC(594)=0.66
 YFRAC(595)=0.661111 ;YFRAC(596)=0.662222
 YFRAC(597)=0.663333 ;YFRAC(598)=0.664444
 YFRAC(599)=0.665556 ;YFRAC(600)=0.666667
 YFRAC(601)=0.667778 ;YFRAC(602)=0.668889
 YFRAC(603)=0.67 ;YFRAC(604)=0.671111
 YFRAC(605)=0.672222 ;YFRAC(606)=0.673333
 YFRAC(607)=0.674444 ;YFRAC(608)=0.675556
 YFRAC(609)=0.676667 ;YFRAC(610)=0.677778
 YFRAC(611)=0.678889 ;YFRAC(612)=0.68
 YFRAC(613)=0.681111 ;YFRAC(614)=0.682222
 YFRAC(615)=0.683333 ;YFRAC(616)=0.684444
 YFRAC(617)=0.685556 ;YFRAC(618)=0.686667
 YFRAC(619)=0.687778 ;YFRAC(620)=0.688889
 YFRAC(621)=0.69 ;YFRAC(622)=0.691111
 YFRAC(623)=0.692222 ;YFRAC(624)=0.693333
 YFRAC(625)=0.694444 ;YFRAC(626)=0.695556
 YFRAC(627)=0.696667 ;YFRAC(628)=0.697778
 YFRAC(629)=0.698889 ;YFRAC(630)=0.7
 YFRAC(631)=0.701111 ;YFRAC(632)=0.702222
 YFRAC(633)=0.703333 ;YFRAC(634)=0.704444
 YFRAC(635)=0.705556 ;YFRAC(636)=0.706667
 YFRAC(637)=0.707778 ;YFRAC(638)=0.708889
 YFRAC(639)=0.71 ;YFRAC(640)=0.711111
 YFRAC(641)=0.712222 ;YFRAC(642)=0.713333
 YFRAC(643)=0.714444 ;YFRAC(644)=0.715556
 YFRAC(645)=0.716667 ;YFRAC(646)=0.717778
 YFRAC(647)=0.718889 ;YFRAC(648)=0.72
 YFRAC(649)=0.721111 ;YFRAC(650)=0.722222
 YFRAC(651)=0.723333 ;YFRAC(652)=0.724444
 YFRAC(653)=0.725556 ;YFRAC(654)=0.726667
 YFRAC(655)=0.727778 ;YFRAC(656)=0.728889
 YFRAC(657)=0.73 ;YFRAC(658)=0.731111
 YFRAC(659)=0.732222 ;YFRAC(660)=0.733333
 YFRAC(661)=0.734444 ;YFRAC(662)=0.735556
 YFRAC(663)=0.736667 ;YFRAC(664)=0.737778
 YFRAC(665)=0.738889 ;YFRAC(666)=0.74
 YFRAC(667)=0.741111 ;YFRAC(668)=0.742222
 YFRAC(669)=0.743333 ;YFRAC(670)=0.744444
 YFRAC(671)=0.745556 ;YFRAC(672)=0.746667
 YFRAC(673)=0.747778 ;YFRAC(674)=0.748889
 YFRAC(675)=0.75 ;YFRAC(676)=0.751111
 YFRAC(677)=0.752222 ;YFRAC(678)=0.753333
 YFRAC(679)=0.754444 ;YFRAC(680)=0.755556
 YFRAC(681)=0.756667 ;YFRAC(682)=0.757778
 YFRAC(683)=0.758889 ;YFRAC(684)=0.76
 YFRAC(685)=0.761111 ;YFRAC(686)=0.762222
 YFRAC(687)=0.763333 ;YFRAC(688)=0.764444
 YFRAC(689)=0.765556 ;YFRAC(690)=0.766667
 YFRAC(691)=0.767778 ;YFRAC(692)=0.768889
 YFRAC(693)=0.77 ;YFRAC(694)=0.771111
 YFRAC(695)=0.772222 ;YFRAC(696)=0.773333
 YFRAC(697)=0.774444 ;YFRAC(698)=0.775556
 YFRAC(699)=0.776667 ;YFRAC(700)=0.777778
 YFRAC(701)=0.778889 ;YFRAC(702)=0.78
 YFRAC(703)=0.781111 ;YFRAC(704)=0.782222
 YFRAC(705)=0.783333 ;YFRAC(706)=0.784444
 YFRAC(707)=0.785556 ;YFRAC(708)=0.786667
 YFRAC(709)=0.787778 ;YFRAC(710)=0.788889
 YFRAC(711)=0.79 ;YFRAC(712)=0.791111
 YFRAC(713)=0.792222 ;YFRAC(714)=0.793333
 YFRAC(715)=0.794444 ;YFRAC(716)=0.795556
 YFRAC(717)=0.796667 ;YFRAC(718)=0.797778
 YFRAC(719)=0.798889 ;YFRAC(720)=0.8
 YFRAC(721)=0.801111 ;YFRAC(722)=0.802222
 YFRAC(723)=0.803333 ;YFRAC(724)=0.804444
 YFRAC(725)=0.805556 ;YFRAC(726)=0.806667
 YFRAC(727)=0.807778 ;YFRAC(728)=0.808889
 YFRAC(729)=0.81 ;YFRAC(730)=0.811111
 YFRAC(731)=0.812222 ;YFRAC(732)=0.813333
 YFRAC(733)=0.814444 ;YFRAC(734)=0.815556
 YFRAC(735)=0.816667 ;YFRAC(736)=0.817778
 YFRAC(737)=0.818889 ;YFRAC(738)=0.82
 YFRAC(739)=0.821111 ;YFRAC(740)=0.822222
 YFRAC(741)=0.823333 ;YFRAC(742)=0.824444
 YFRAC(743)=0.825556 ;YFRAC(744)=0.826667
 YFRAC(745)=0.827778 ;YFRAC(746)=0.828889
 YFRAC(747)=0.83 ;YFRAC(748)=0.831111
 YFRAC(749)=0.832222 ;YFRAC(750)=0.833333
 YFRAC(751)=0.834444 ;YFRAC(752)=0.835556
 YFRAC(753)=0.836667 ;YFRAC(754)=0.837778
 YFRAC(755)=0.838889 ;YFRAC(756)=0.84
 YFRAC(757)=0.841111 ;YFRAC(758)=0.842222
 YFRAC(759)=0.843333 ;YFRAC(760)=0.844444
 YFRAC(761)=0.845556 ;YFRAC(762)=0.846667
 YFRAC(763)=0.847778 ;YFRAC(764)=0.848889
 YFRAC(765)=0.85 ;YFRAC(766)=0.851111
 YFRAC(767)=0.852222 ;YFRAC(768)=0.853333
 YFRAC(769)=0.854445 ;YFRAC(770)=0.855556
 YFRAC(771)=0.856667 ;YFRAC(772)=0.857778
 YFRAC(773)=0.858889 ;YFRAC(774)=0.86
 YFRAC(775)=0.861111 ;YFRAC(776)=0.862222
 YFRAC(777)=0.863333 ;YFRAC(778)=0.864444
 YFRAC(779)=0.865556 ;YFRAC(780)=0.866667
 YFRAC(781)=0.867778 ;YFRAC(782)=0.868889
 YFRAC(783)=0.87 ;YFRAC(784)=0.871111
 YFRAC(785)=0.872222 ;YFRAC(786)=0.873333
 YFRAC(787)=0.874444 ;YFRAC(788)=0.875556
 YFRAC(789)=0.876667 ;YFRAC(790)=0.877778
 YFRAC(791)=0.878889 ;YFRAC(792)=0.88
 YFRAC(793)=0.881111 ;YFRAC(794)=0.882222
 YFRAC(795)=0.883333 ;YFRAC(796)=0.884444
 YFRAC(797)=0.885556 ;YFRAC(798)=0.886667
 YFRAC(799)=0.887778 ;YFRAC(800)=0.888889
 YFRAC(801)=0.89 ;YFRAC(802)=0.891111
 YFRAC(803)=0.892222 ;YFRAC(804)=0.893333
 YFRAC(805)=0.894444 ;YFRAC(806)=0.895556
 YFRAC(807)=0.896667 ;YFRAC(808)=0.897778
 YFRAC(809)=0.898889 ;YFRAC(810)=0.9
 YFRAC(811)=0.901111 ;YFRAC(812)=0.902222
 YFRAC(813)=0.903333 ;YFRAC(814)=0.904444
 YFRAC(815)=0.905556 ;YFRAC(816)=0.906667
 YFRAC(817)=0.907778 ;YFRAC(818)=0.908889
 YFRAC(819)=0.91 ;YFRAC(820)=0.911111
 YFRAC(821)=0.912222 ;YFRAC(822)=0.913333
 YFRAC(823)=0.914444 ;YFRAC(824)=0.915556
 YFRAC(825)=0.916667 ;YFRAC(826)=0.917778
 YFRAC(827)=0.918889 ;YFRAC(828)=0.92
 YFRAC(829)=0.921111 ;YFRAC(830)=0.922222
 YFRAC(831)=0.923333 ;YFRAC(832)=0.924444
 YFRAC(833)=0.925556 ;YFRAC(834)=0.926667
 YFRAC(835)=0.927778 ;YFRAC(836)=0.928889
 YFRAC(837)=0.93 ;YFRAC(838)=0.931111
 YFRAC(839)=0.932222 ;YFRAC(840)=0.933333
 YFRAC(841)=0.934444 ;YFRAC(842)=0.935556
 YFRAC(843)=0.936667 ;YFRAC(844)=0.937778
 YFRAC(845)=0.938889 ;YFRAC(846)=0.94
 YFRAC(847)=0.941111 ;YFRAC(848)=0.942222
 YFRAC(849)=0.943333 ;YFRAC(850)=0.944444
 YFRAC(851)=0.945556 ;YFRAC(852)=0.946667
 YFRAC(853)=0.947778 ;YFRAC(854)=0.948889
 YFRAC(855)=0.95 ;YFRAC(856)=0.951111
 YFRAC(857)=0.952222 ;YFRAC(858)=0.953333
 YFRAC(859)=0.954444 ;YFRAC(860)=0.955556
 YFRAC(861)=0.956667 ;YFRAC(862)=0.957778
 YFRAC(863)=0.958889 ;YFRAC(864)=0.96
 YFRAC(865)=0.961111 ;YFRAC(866)=0.962222
 YFRAC(867)=0.963333 ;YFRAC(868)=0.964444
 YFRAC(869)=0.965556 ;YFRAC(870)=0.966667
 YFRAC(871)=0.967778 ;YFRAC(872)=0.968889
 YFRAC(873)=0.97 ;YFRAC(874)=0.971111
 YFRAC(875)=0.972222 ;YFRAC(876)=0.973333
 YFRAC(877)=0.974444 ;YFRAC(878)=0.975556
 YFRAC(879)=0.976667 ;YFRAC(880)=0.977778
 YFRAC(881)=0.978889 ;YFRAC(882)=0.98
 YFRAC(883)=0.981111 ;YFRAC(884)=0.982222
 YFRAC(885)=0.983333 ;YFRAC(886)=0.984444
 YFRAC(887)=0.985556 ;YFRAC(888)=0.986667
 YFRAC(889)=0.987778 ;YFRAC(890)=0.988889
 YFRAC(891)=0.99 ;YFRAC(892)=0.991111
 YFRAC(893)=0.992222 ;YFRAC(894)=0.993333
 YFRAC(895)=0.994444 ;YFRAC(896)=0.995556
 YFRAC(897)=0.996667 ;YFRAC(898)=0.997778
 YFRAC(899)=0.998889 ;YFRAC(900)=1.
 ************************************************************
  Group 5. Z-Direction Grid Spacing
 PARAB = F
 NZ = 1
 ZWLAST =1.0E-02
 ************************************************************
  Group 6. Body-Fitted Coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
 ONEPHS = T
 NAME(1)=P1 ;NAME(3)=U1
 NAME(5)=V1 ;NAME(141)=SIGM
 NAME(142)=MEVP ;NAME(143)=KAPA
 NAME(144)=MEVA ;NAME(145)=PRPS
 NAME(146)=DEN1 ;NAME(147)=SURN
 NAME(148)=VFOL ;NAME(149)=SPH1
 NAME(150)=TEM1
    * Y in SOLUTN argument list denotes:
    * 1-stored 2-solved 3-whole-field
    * 4-point-by-point 5-explicit 6-harmonic averaging 
 SOLUTN(P1,Y,Y,Y,N,N,Y)
 SOLUTN(U1,Y,Y,N,N,N,Y)
 SOLUTN(V1,Y,Y,N,N,N,Y)
 SOLUTN(SIGM,Y,N,N,N,N,Y)
 SOLUTN(MEVP,Y,N,N,N,N,Y)
 SOLUTN(KAPA,Y,N,N,N,N,Y)
 SOLUTN(MEVA,Y,N,N,N,N,Y)
 SOLUTN(PRPS,Y,N,N,N,N,Y)
 SOLUTN(DEN1,Y,N,N,N,N,Y)
 SOLUTN(SURN,Y,Y,N,N,N,Y)
 SOLUTN(VFOL,Y,Y,N,N,N,Y)
 SOLUTN(SPH1,Y,N,N,N,N,N)
 SOLUTN(TEM1,Y,Y,Y,N,N,Y)
 DEN1 = 146
 PRPS = 145
 ************************************************************
  Group 8. Terms & Devices
    * Y in TERMS argument list denotes:
    * 1-built-in source 2-convection 3-diffusion 4-transient
    * 5-first phase variable 6-interphase transport         
 TERMS(P1,Y,Y,Y,N,Y,Y)
 TERMS(U1,Y,Y,Y,Y,Y,Y)
 TERMS(V1,Y,Y,Y,Y,Y,Y)
 TERMS(SURN,N,N,N,N,Y,N)
 TERMS(VFOL,N,N,N,N,Y,N)
 TERMS(TEM1,N,Y,Y,Y,Y,Y)
 DIFCUT =0.5 ;ZDIFAC =1.
 GALA = T ;ADDDIF = F
 RUPLIM =0.999999 ;RLOLIM =1.0E-06
 ISOLX = -1 ;ISOLY = -1 ;ISOLZ = -1
 ************************************************************
  Group 9. Properties used if PRPS is not
  stored, and where PRPS = -1.0 if it is!
 RHO1 =998.22998 ;TMP1 =0. ;EL1 =0.
 TSURR =0. ;TEMP0 =273.149994 ;PRESS0 =1.01325E+05
 DVO1DT =1.18E-04 ;DRH1DP =0.
 EMISS =0. ;SCATT =0.
 RADIA =0. ;RADIB =0.
 ENUL =1.006E-06 ;ENUT =0.
 PRNDTL(U1)=1. ;PRNDTL(V1)=1.
 PRNDTL(TEM1)=-0.597
 PRT(U1)=1. ;PRT(V1)=1.
 PRT(TEM1)=1.
 CP1 =4181.799805 ;CP2 =1.
 ************************************************************
  Group 10.Inter-Phase Transfer Processes
 ************************************************************
  Group 11.Initial field variables (PHIs)
 FIINIT(P1)=0. ;FIINIT(U1)=1.0E-10
 FIINIT(V1)=1.0E-10 ;FIINIT(SIGM)=1.0E-10
 FIINIT(MEVP)=1.0E-10 ;FIINIT(KAPA)=1.0E-10
 FIINIT(MEVA)=1.0E-10 ;FIINIT(PRPS)=-1.
 FIINIT(DEN1)=1.0E-10 ;FIINIT(SURN)=0.
 FIINIT(VFOL)=0. ;FIINIT(SPH1)=1.0E-10
 FIINIT(TEM1)=53.849998
 
 PATCH(^OB1 ,INIVAL, 1, 0, 0, 0, 0, 0, 1, 1)
 INIT(^OB1 ,PRPS,0. ,67. )
 INIT(^OB1 ,SURN,0. ,1. )
 INIT(^OB1 ,VFOL,0. ,1. )
 INIT(^OB1 ,TEM1,0. ,99.849998 )
 
 PATCH(^OB2 ,INIVAL, 2, 0, 0, 0, 0, 0, 1, 1)
 INIT(^OB2 ,PRPS,0. ,23. )
 INIT(^OB2 ,SURN,0. ,0. )
 INIT(^OB2 ,VFOL,0. ,0. )
 INIT(^OB2 ,TEM1,0. ,99.849998 )
 
 PATCH(^OBD ,INIVAL, 13, 0, 0, 0, 0, 0, 1, 1)
 INIT(^OBD ,PRPS,0. ,67. )
 INIT(^OBD ,SURN,0. ,1. )
 INIT(^OBD ,VFOL,0. ,1. )
 INIT(^OBD ,TEM1,0. ,105.220001 )
 
 PATCH(^OBE ,INIVAL, 14, 0, 0, 0, 0, 0, 1, 1)
 INIT(^OBE ,PRPS,0. ,67. )
 INIT(^OBE ,SURN,0. ,1. )
 INIT(^OBE ,VFOL,0. ,1. )
 INIT(^OBE ,TEM1,0. ,105.220001 )
 INIADD = F
 FSWEEP = 1
 NAMFI =phida
 ************************************************************
  Group 12. Patchwise adjustment of terms
  Patches for this group are printed with those
  for Group 13.
  Their names begin either with GP12 or &
 ************************************************************
  Group 13. Boundary & Special Sources
 
 PATCH(BUOYANCY,PHASEM, 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(BUOYANCY,U1 , FIXFLU , GRND2 )
 COVAL(BUOYANCY,V1 , FIXFLU , GRND2 )
 
 PATCH(STENS ,PHASEM, 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(STENS ,U1 , FIXFLU , GRND3 )
 COVAL(STENS ,V1 , FIXFLU , GRND3 )
 
 PATCH(BUOYVOF ,PHASEM, 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(BUOYVOF ,U1 , FIXFLU , GRND3 )
 COVAL(BUOYVOF ,V1 , FIXFLU , GRND3 )
 
 PATCH(TCON ,CELL , 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(TCON ,SURN, GRND , GRND )
 
 PATCH(TCONC ,CELL , 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(TCONC ,TEM1,0. ,0. )
 
 PATCH(TCONT ,VOLUME, 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(TCONT ,TEM1, GRND , GRND )
 
 PATCH(EVAPO ,VOLUME, 1, 36, 1, 900, 1, 1, 1, 6000)
 COVAL(EVAPO ,SURN, FIXFLU , GRND4 )
 COVAL(EVAPO ,TEM1, FIXFLU , GRND4 )
 
 PATCH(OC3 ,WEST , 1, 1, 1, 180, 1, 1, 1, 6000)
 COVAL(OC3 ,TEM1, FIXFLU ,1.728702E+05 )
 
 PATCH(OB3 ,WWALL , 1, 1, 1, 180, 1, 1, 1, 6000)
 COVAL(OB3 ,V1 ,1. ,0. )
 
 PATCH(^OC4 ,CELL , 4, 20, 0, 0, 0, 0, 1, 6000)
 COVAL(^OC4 ,TEM1, FIXFLU ,172.869995 )
 
 PATCH(^OB4 ,CELL , 4, 5, 0, 0, 0, 0, 1, 6000)
 COVAL(^OB4 ,V1 ,1. ,0. )
 
 PATCH(^OC5 ,CELL , 5, 21, 0, 0, 0, 0, 1, 6000)
 COVAL(^OC5 ,TEM1, FIXFLU ,0.172 )
 
 PATCH(^OB5 ,CELL , 5, 6, 0, 0, 0, 0, 1, 6000)
 COVAL(^OB5 ,V1 ,1. ,0. )
 
 PATCH(^OC6 ,CELL , 6, 20, 0, 0, 0, 0, 1, 6000)
 COVAL(^OC6 ,TEM1, FIXFLU ,0.172 )
 
 PATCH(^OB6 ,CELL , 6, 5, 0, 0, 0, 0, 1, 6000)
 COVAL(^OB6 ,V1 ,1. ,0. )
 
 PATCH(^OB7 ,CELL , 7, 6, 0, 0, 0, 0, 1, 6000)
 COVAL(^OB7 ,V1 ,1. ,0. )
 
 PATCH(^OB8 ,CELL , 8, 5, 0, 0, 0, 0, 1, 6000)
 COVAL(^OB8 ,V1 ,1. ,0. )
 
 PATCH(^OB9 ,CELL , 9, 6, 0, 0, 0, 0, 1, 6000)
 COVAL(^OB9 ,V1 ,1. ,0. )
 
 PATCH(^OC9 ,WEST , 9, 0, 0, 0, 0, 0, 1, 6000)
 COVAL(^OC9 ,TEM1,707.599976 ,28.299999 )
 
 PATCH(^OBA ,CELL , 10, 5, 0, 0, 0, 0, 1, 6000)
 COVAL(^OBA ,V1 ,1. ,0. )
 
 PATCH(^OCA ,EAST , 10, 0, 0, 0, 0, 0, 1, 6000)
 COVAL(^OCA ,TEM1,707.599976 ,28.299999 )
 
 PATCH(^OBB ,CELL , 11, 8, 0, 0, 0, 0, 1, 6000)
 COVAL(^OBB ,U1 ,1. ,0. )
 
 PATCH(^OBC ,CELL , 12, 7, 0, 0, 0, 0, 1, 6000)
 COVAL(^OBC ,U1 ,1. ,0. )
 
 PATCH(^P-REL1 ,CELL , 15, 1, 0, 0, 0, 0, 1, 6000)
 COVAL(^P-REL1 ,P1 ,1. ,0. )
 COVAL(^P-REL1 ,TEM1,0. , SAME )
 XCYCLE = F
 EGWF = T
 WALLCO = GRND2
 BUOYA =0. ; BUOYB =-9.81 ; BUOYC =0.
 BUOYD =0.5863
 BUOYE =53.849998
 ************************************************************
  Group 14. Downstream Pressure For PARAB
 ************************************************************
  Group 15. Terminate Sweeps
 LSWEEP = 50 ;ISWC1 = 1
 LITHYD = 1 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1
 SELREF = T
 RESFAC =1.0E-05
 ************************************************************
  Group 16. Terminate Iterations
 LITER(P1)=200 ;LITER(U1)=10
 LITER(V1)=10 ;LITER(SURN)=1
 LITER(VFOL)=1 ;LITER(TEM1)=200
 ENDIT(P1)=1.0E-03 ;ENDIT(U1)=1.0E-03
 ENDIT(V1)=1.0E-03 ;ENDIT(SURN)=1.0E-03
 ENDIT(VFOL)=1.0E-03 ;ENDIT(TEM1)=1.0E-04
 ************************************************************
  Group 17. Relaxation
 RELAX(P1,LINRLX,1.)
 RELAX(U1,FALSDT,0.05)
 RELAX(V1,FALSDT,0.05)
 RELAX(SIGM,LINRLX,1.)
 RELAX(MEVP,LINRLX,1.)
 RELAX(KAPA,LINRLX,1.)
 RELAX(MEVA,LINRLX,1.)
 RELAX(PRPS,LINRLX,1.)
 RELAX(DEN1,LINRLX,1.)
 RELAX(SURN,LINRLX,1.)
 RELAX(VFOL,LINRLX,1.)
 RELAX(SPH1,LINRLX,1.)
 RELAX(TEM1,LINRLX,0.5)
 OVRRLX =0.
 EXPERT = F ;NNORSL = F
 ************************************************************
  Group 18. Limits
 VARMAX(P1)=1.0E+10 ;VARMIN(P1)=-1.0E+10
 VARMAX(U1)=1.0E+06 ;VARMIN(U1)=-1.0E+06
 VARMAX(V1)=1.0E+06 ;VARMIN(V1)=-1.0E+06
 VARMAX(SIGM)=1.0E+10 ;VARMIN(SIGM)=-1.0E+10
 VARMAX(MEVP)=1.0E+10 ;VARMIN(MEVP)=-1.0E+10
 VARMAX(KAPA)=1.0E+10 ;VARMIN(KAPA)=-1.0E+10
 VARMAX(MEVA)=1.0E+10 ;VARMIN(MEVA)=-1.0E+10
 VARMAX(PRPS)=1.0E+10 ;VARMIN(PRPS)=-1.0E+10
 VARMAX(DEN1)=1.0E+10 ;VARMIN(DEN1)=-1.0E+10
 VARMAX(SURN)=1. ;VARMIN(SURN)=0.
 VARMAX(VFOL)=1.0E+10 ;VARMIN(VFOL)=-1.0E+10
 VARMAX(SPH1)=1.0E+10 ;VARMIN(SPH1)=-1.0E+10
 VARMAX(TEM1)=200. ;VARMIN(TEM1)=20.
 ************************************************************
  Group 19. Data transmitted to GROUND
 SURF = T
 PARSOL = F
 IPRPSA = 67 ;IPRPSB = 23
 ISG21 = 5
 ISG62 = 1
 ISURFA = 5
 BTATHC =3.5
 ISRFTA = 4
 SURFTA =0.098058 ;SURFTB=-1.845E-05 ;SURFTC =99.849998 ;SURFTD=-2.3E-07
 MARANG = T
 IEVAP = 1
 LATH =2.455E+06 ;TSAT=373. ;EVAPCO=0.1
 NONCON = T
 SPEDAT(SET,GXMONI,TRANSIENT,L,F)
 SPEDAT(SET,RESTRT,PBCL,C,PBCL.DAT)
 SPEDAT(SET,VOF,LTSS,L,F)
 SPEDAT(SET,MAXINC,SURN,R,1.)
 SPEDAT(SET,MAXINC,VFOL,R,1.)
 SPEDAT(SET,GXMONI,PLOTALL,L,T)
 SPEDAT(SET,OBJNAM,^OB1,C,WATER)
 SPEDAT(SET,OBJTYP,^OB1,C,BLOCKAGE)
 SPEDAT(SET,WATER,MATERIAL,R,67.)
 SPEDAT(SET,OBJNAM,^OB2,C,AIR)
 SPEDAT(SET,OBJTYP,^OB2,C,BLOCKAGE)
 SPEDAT(SET,AIR,MATERIAL,R,23.)
 SPEDAT(SET,OBJNAM,!OB3,C,WALL-EV-W-L)
 SPEDAT(SET,OBJTYP,!OB3,C,PLATE)
 SPEDAT(SET,OBJNAM,!OC3,C,WALL-EV-W-L)
 SPEDAT(SET,OBJTYP,!OC3,C,USER_DEFINED)
 SPEDAT(SET,OBJNAM,^OB4,C,WALL-EV-E-L)
 SPEDAT(SET,OBJTYP,^OB4,C,PLATE)
 SPEDAT(SET,OBJNAM,^OC4,C,WALL-EV-E-L)
 SPEDAT(SET,OBJTYP,^OC4,C,USER_DEFINED)
 SPEDAT(SET,OBJNAM,^OB5,C,WALL-EV-W)
 SPEDAT(SET,OBJTYP,^OB5,C,PLATE)
 SPEDAT(SET,OBJNAM,^OC5,C,WALL-EV-W)
 SPEDAT(SET,OBJTYP,^OC5,C,USER_DEFINED)
 SPEDAT(SET,OBJNAM,^OB6,C,WALL-EV-E)
 SPEDAT(SET,OBJTYP,^OB6,C,PLATE)
 SPEDAT(SET,OBJNAM,^OC6,C,WALL-EV-E)
 SPEDAT(SET,OBJTYP,^OC6,C,USER_DEFINED)
 SPEDAT(SET,OBJNAM,^OB7,C,WALL-AD-W)
 SPEDAT(SET,OBJTYP,^OB7,C,PLATE)
 SPEDAT(SET,OBJNAM,^OB8,C,WALL-AD-E)
 SPEDAT(SET,OBJTYP,^OB8,C,PLATE)
 SPEDAT(SET,OBJNAM,^OB9,C,WALL-CO-W)
 SPEDAT(SET,OBJTYP,^OB9,C,PLATE)
 SPEDAT(SET,OBJNAM,^OC9,C,WALL-CO-W)
 SPEDAT(SET,OBJTYP,^OC9,C,PLATE)
 SPEDAT(SET,OBJNAM,^OBA,C,WALL-CO-E)
 SPEDAT(SET,OBJTYP,^OBA,C,PLATE)
 SPEDAT(SET,OBJNAM,^OCA,C,WALL-CO-E)
 SPEDAT(SET,OBJTYP,^OCA,C,PLATE)
 SPEDAT(SET,OBJNAM,^OBB,C,S-WALL)
 SPEDAT(SET,OBJTYP,^OBB,C,PLATE)
 SPEDAT(SET,OBJNAM,^OBC,C,N-WALL)
 SPEDAT(SET,OBJTYP,^OBC,C,PLATE)
 SPEDAT(SET,OBJNAM,^OBD,C,HOT-1)
 SPEDAT(SET,OBJTYP,^OBD,C,BLOCKAGE)
 SPEDAT(SET,HOT-1,MATERIAL,R,67.)
 SPEDAT(SET,OBJNAM,^OBE,C,HOT-2)
 SPEDAT(SET,OBJTYP,^OBE,C,BLOCKAGE)
 SPEDAT(SET,HOT-2,MATERIAL,R,67.)
 SPEDAT(SET,OBJNAM,^OBF,C,PREL)
 SPEDAT(SET,OBJTYP,^OBF,C,PRESSURE_RELIEF)
 SPEDAT(SET,OBJNAM,^P-REL1,C,PREL)
 SPEDAT(SET,OBJTYP,^P-REL1,C,USER_DEFINED)
 SPEDAT(SET,FACETDAT,NUMOBJ,I,15)
 SPEDAT(SET,MATERIAL,67,L,T)
 SPEDAT(SET,MATERIAL,23,L,T)
 ************************************************************
  Group 20. Preliminary Printout
 ************************************************************
  Group 21. Print-out of Variables
 INIFLD = F ;SUBWGR = F
    * Y in OUTPUT argument list denotes:
    * 1-field 2-correction-eq. monitor 3-selective dumping      
    * 4-whole-field residual 5-spot-value table 6-residual table
 OUTPUT(P1,N,N,Y,Y,Y,Y)
 OUTPUT(U1,N,N,Y,Y,Y,Y)
 OUTPUT(V1,N,N,Y,Y,Y,Y)
 OUTPUT(SIGM,N,N,Y,N,N,N)
 OUTPUT(MEVP,N,N,Y,N,N,N)
 OUTPUT(KAPA,N,N,Y,N,N,N)
 OUTPUT(MEVA,N,N,Y,N,N,N)
 OUTPUT(PRPS,N,N,Y,N,N,N)
 OUTPUT(DEN1,N,N,Y,N,N,N)
 OUTPUT(SURN,N,Y,Y,Y,Y,Y)
 OUTPUT(VFOL,N,Y,Y,N,Y,Y)
 OUTPUT(SPH1,N,N,Y,N,N,N)
 OUTPUT(TEM1,N,N,Y,Y,Y,Y)
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON = 18 ;IYMON = 23 ;IZMON = 1
 NPRMON = 100000 ;NPRMNT = 1 ;TSTSWP = -1
 UWATCH = T ;USTEER = T
 HIGHLO = F
 ************************************************************
  Group 23.Field Print-Out & Plot Control
 NPRINT = 100000 ;NUMCLS = 5
 NTPRIN = 100000 ;ISTPRF = 1 ;ISTPRL = 100000
 NXPRIN = -1 ;IXPRF = 1 ;IXPRL = 10000
 NYPRIN = -1 ;IYPRF = 1 ;IYPRL = 10000
 IPLTF = 1 ;IPLTL = -1 ;NPLT = -1
 ISWPRF = 1 ;ISWPRL = 100000
 ITABL = 3 ;IPROF = 1
 ABSIZ =0.5 ;ORSIZ =0.4
 NTZPRF = 1 ;NCOLPF = 50
 ICHR = 2 ;NCOLCO = 45 ;NROWCO = 20
   No PATCHes yet used for this Group
 ************************************************************
  Group 24. Dumps For Restarts
 SAVE = T ;NOWIPE = F
 NSAVE =CHAM
 IDISPA = 25 ;IDISPB = 0 ;IDISPC = 0
 CSG1    ='A'
STOP