TALK=T;RUN(1,1) ************************************************************ Group 1. Run Title and Number ************************************************************ ************************************************************ TEXT(VOF Cartes slug Water-kero XY CA 1 ) ************************************************************ ************************************************************ IRUNN = 1 ;LIBREF = 0 ************************************************************ Group 2. Time dependence STEADY = F * Set overall time and no. of steps TFIRST =0. ;TLAST =1.2 FSTEP = 1 ;LSTEP = 8000 TFRAC(1)=1.25E-04 ;TFRAC(2)=2.5E-04 TFRAC(3)=3.75E-04 ;TFRAC(4)=5.0E-04 TFRAC(5)=6.25E-04 ;TFRAC(6)=7.5E-04 TFRAC(7)=8.75E-04 ;TFRAC(8)=1.0E-03 TFRAC(9)=1.125E-03 ;TFRAC(10)=1.25E-03 TFRAC(11)=1.375E-03 ;TFRAC(12)=1.5E-03 TFRAC(13)=1.625E-03 ;TFRAC(14)=1.75E-03 TFRAC(15)=1.875E-03 ;TFRAC(16)=2.0E-03 TFRAC(17)=2.125E-03 ;TFRAC(18)=2.25E-03 TFRAC(19)=2.375E-03 ;TFRAC(20)=2.5E-03 TFRAC(21)=2.625E-03 ;TFRAC(22)=2.75E-03 TFRAC(23)=2.875E-03 ;TFRAC(24)=3.0E-03 TFRAC(25)=3.125E-03 ;TFRAC(26)=3.25E-03 TFRAC(27)=3.375E-03 ;TFRAC(28)=3.5E-03 TFRAC(29)=3.625E-03 ;TFRAC(30)=3.75E-03 TFRAC(31)=3.875E-03 ;TFRAC(32)=4.0E-03 TFRAC(33)=4.125E-03 ;TFRAC(34)=4.25E-03 TFRAC(35)=4.375E-03 ;TFRAC(36)=4.5E-03 TFRAC(37)=4.625E-03 ;TFRAC(38)=4.75E-03 TFRAC(39)=4.875E-03 ;TFRAC(40)=5.0E-03 TFRAC(41)=5.125E-03 ;TFRAC(42)=5.25E-03 TFRAC(43)=5.375001E-03 ;TFRAC(44)=5.5E-03 TFRAC(45)=5.625E-03 ;TFRAC(46)=5.75E-03 TFRAC(47)=5.875E-03 ;TFRAC(48)=6.0E-03 TFRAC(49)=6.125E-03 ;TFRAC(50)=6.25E-03 TFRAC(51)=6.375E-03 ;TFRAC(52)=6.5E-03 TFRAC(53)=6.625E-03 ;TFRAC(54)=6.75E-03 TFRAC(55)=6.875E-03 ;TFRAC(56)=7.0E-03 TFRAC(57)=7.125E-03 ;TFRAC(58)=7.25E-03 TFRAC(59)=7.375001E-03 ;TFRAC(60)=7.5E-03 TFRAC(61)=7.625E-03 ;TFRAC(62)=7.75E-03 TFRAC(63)=7.875E-03 ;TFRAC(64)=8.0E-03 TFRAC(65)=8.125E-03 ;TFRAC(66)=8.25E-03 TFRAC(67)=8.375E-03 ;TFRAC(68)=8.5E-03 TFRAC(69)=8.625E-03 ;TFRAC(70)=8.75E-03 TFRAC(71)=8.875E-03 ;TFRAC(72)=9.0E-03 TFRAC(73)=9.125E-03 ;TFRAC(74)=9.25E-03 TFRAC(75)=9.375E-03 ;TFRAC(76)=9.5E-03 TFRAC(77)=9.625E-03 ;TFRAC(78)=9.75E-03 TFRAC(79)=9.875E-03 ;TFRAC(80)=1.0E-02 TFRAC(81)=0.010125 ;TFRAC(82)=0.01025 TFRAC(83)=0.010375 ;TFRAC(84)=0.0105 TFRAC(85)=0.010625 ;TFRAC(86)=0.01075 TFRAC(87)=0.010875 ;TFRAC(88)=0.011 TFRAC(89)=0.011125 ;TFRAC(90)=0.01125 TFRAC(91)=0.011375 ;TFRAC(92)=0.0115 TFRAC(93)=0.011625 ;TFRAC(94)=0.01175 TFRAC(95)=0.011875 ;TFRAC(96)=0.012 TFRAC(97)=0.012125 ;TFRAC(98)=0.01225 TFRAC(99)=0.012375 ;TFRAC(100)=0.0125 TFRAC(101)=0.012625 ;TFRAC(102)=0.01275 TFRAC(103)=0.012875 ;TFRAC(104)=0.013 TFRAC(105)=0.013125 ;TFRAC(106)=0.01325 TFRAC(107)=0.013375 ;TFRAC(108)=0.0135 TFRAC(109)=0.013625 ;TFRAC(110)=0.01375 TFRAC(111)=0.013875 ;TFRAC(112)=0.014 TFRAC(113)=0.014125 ;TFRAC(114)=0.01425 TFRAC(115)=0.014375 ;TFRAC(116)=0.0145 TFRAC(117)=0.014625 ;TFRAC(118)=0.01475 TFRAC(119)=0.014875 ;TFRAC(120)=0.015 TFRAC(121)=0.015125 ;TFRAC(122)=0.01525 TFRAC(123)=0.015375 ;TFRAC(124)=0.0155 TFRAC(125)=0.015625 ;TFRAC(126)=0.01575 TFRAC(127)=0.015875 ;TFRAC(128)=0.016 TFRAC(129)=0.016125 ;TFRAC(130)=0.01625 TFRAC(131)=0.016375 ;TFRAC(132)=0.0165 TFRAC(133)=0.016625 ;TFRAC(134)=0.01675 TFRAC(135)=0.016875 ;TFRAC(136)=0.017 TFRAC(137)=0.017125 ;TFRAC(138)=0.01725 TFRAC(139)=0.017375 ;TFRAC(140)=0.0175 TFRAC(141)=0.017625 ;TFRAC(142)=0.01775 TFRAC(143)=0.017875 ;TFRAC(144)=0.018 TFRAC(145)=0.018125 ;TFRAC(146)=0.01825 TFRAC(147)=0.018375 ;TFRAC(148)=0.0185 TFRAC(149)=0.018625 ;TFRAC(150)=0.01875 TFRAC(151)=0.018875 ;TFRAC(152)=0.019 TFRAC(153)=0.019125 ;TFRAC(154)=0.01925 TFRAC(155)=0.019375 ;TFRAC(156)=0.0195 TFRAC(157)=0.019625 ;TFRAC(158)=0.01975 TFRAC(159)=0.019875 ;TFRAC(160)=0.02 TFRAC(161)=0.020125 ;TFRAC(162)=0.02025 TFRAC(163)=0.020375 ;TFRAC(164)=0.0205 TFRAC(165)=0.020625 ;TFRAC(166)=0.02075 TFRAC(167)=0.020875 ;TFRAC(168)=0.021 TFRAC(169)=0.021125 ;TFRAC(170)=0.02125 TFRAC(171)=0.021375 ;TFRAC(172)=0.0215 TFRAC(173)=0.021625 ;TFRAC(174)=0.02175 TFRAC(175)=0.021875 ;TFRAC(176)=0.022 TFRAC(177)=0.022125 ;TFRAC(178)=0.02225 TFRAC(179)=0.022375 ;TFRAC(180)=0.0225 TFRAC(181)=0.022625 ;TFRAC(182)=0.02275 TFRAC(183)=0.022875 ;TFRAC(184)=0.023 TFRAC(185)=0.023125 ;TFRAC(186)=0.02325 TFRAC(187)=0.023375 ;TFRAC(188)=0.0235 TFRAC(189)=0.023625 ;TFRAC(190)=0.02375 TFRAC(191)=0.023875 ;TFRAC(192)=0.024 TFRAC(193)=0.024125 ;TFRAC(194)=0.02425 TFRAC(195)=0.024375 ;TFRAC(196)=0.0245 TFRAC(197)=0.024625 ;TFRAC(198)=0.02475 TFRAC(199)=0.024875 ;TFRAC(200)=0.025 TFRAC(201)=0.025125 ;TFRAC(202)=0.02525 TFRAC(203)=0.025375 ;TFRAC(204)=0.0255 TFRAC(205)=0.025625 ;TFRAC(206)=0.02575 TFRAC(207)=0.025875 ;TFRAC(208)=0.026 TFRAC(209)=0.026125 ;TFRAC(210)=0.02625 TFRAC(211)=0.026375 ;TFRAC(212)=0.0265 TFRAC(213)=0.026625 ;TFRAC(214)=0.02675 TFRAC(215)=0.026875 ;TFRAC(216)=0.027 TFRAC(217)=0.027125 ;TFRAC(218)=0.02725 TFRAC(219)=0.027375 ;TFRAC(220)=0.0275 TFRAC(221)=0.027625 ;TFRAC(222)=0.02775 TFRAC(223)=0.027875 ;TFRAC(224)=0.028 TFRAC(225)=0.028125 ;TFRAC(226)=0.02825 TFRAC(227)=0.028375 ;TFRAC(228)=0.0285 TFRAC(229)=0.028625 ;TFRAC(230)=0.02875 TFRAC(231)=0.028875 ;TFRAC(232)=0.029 TFRAC(233)=0.029125 ;TFRAC(234)=0.02925 TFRAC(235)=0.029375 ;TFRAC(236)=0.0295 TFRAC(237)=0.029625 ;TFRAC(238)=0.02975 TFRAC(239)=0.029875 ;TFRAC(240)=0.03 TFRAC(241)=0.030125 ;TFRAC(242)=0.03025 TFRAC(243)=0.030375 ;TFRAC(244)=0.0305 TFRAC(245)=0.030625 ;TFRAC(246)=0.03075 TFRAC(247)=0.030875 ;TFRAC(248)=0.031 TFRAC(249)=0.031125 ;TFRAC(250)=0.03125 TFRAC(251)=0.031375 ;TFRAC(252)=0.0315 TFRAC(253)=0.031625 ;TFRAC(254)=0.03175 TFRAC(255)=0.031875 ;TFRAC(256)=0.032 TFRAC(257)=0.032125 ;TFRAC(258)=0.03225 TFRAC(259)=0.032375 ;TFRAC(260)=0.0325 TFRAC(261)=0.032625 ;TFRAC(262)=0.03275 TFRAC(263)=0.032875 ;TFRAC(264)=0.033 TFRAC(265)=0.033125 ;TFRAC(266)=0.03325 TFRAC(267)=0.033375 ;TFRAC(268)=0.0335 TFRAC(269)=0.033625 ;TFRAC(270)=0.03375 TFRAC(271)=0.033875 ;TFRAC(272)=0.034 TFRAC(273)=0.034125 ;TFRAC(274)=0.03425 TFRAC(275)=0.034375 ;TFRAC(276)=0.0345 TFRAC(277)=0.034625 ;TFRAC(278)=0.03475 TFRAC(279)=0.034875 ;TFRAC(280)=0.035 TFRAC(281)=0.035125 ;TFRAC(282)=0.03525 TFRAC(283)=0.035375 ;TFRAC(284)=0.0355 TFRAC(285)=0.035625 ;TFRAC(286)=0.03575 TFRAC(287)=0.035875 ;TFRAC(288)=0.036 TFRAC(289)=0.036125 ;TFRAC(290)=0.03625 TFRAC(291)=0.036375 ;TFRAC(292)=0.0365 TFRAC(293)=0.036625 ;TFRAC(294)=0.03675 TFRAC(295)=0.036875 ;TFRAC(296)=0.037 TFRAC(297)=0.037125 ;TFRAC(298)=0.03725 TFRAC(299)=0.037375 ;TFRAC(300)=0.0375 TFRAC(301)=0.037625 ;TFRAC(302)=0.03775 TFRAC(303)=0.037875 ;TFRAC(304)=0.038 TFRAC(305)=0.038125 ;TFRAC(306)=0.03825 TFRAC(307)=0.038375 ;TFRAC(308)=0.0385 TFRAC(309)=0.038625 ;TFRAC(310)=0.03875 TFRAC(311)=0.038875 ;TFRAC(312)=0.039 TFRAC(313)=0.039125 ;TFRAC(314)=0.03925 TFRAC(315)=0.039375 ;TFRAC(316)=0.0395 TFRAC(317)=0.039625 ;TFRAC(318)=0.03975 TFRAC(319)=0.039875 ;TFRAC(320)=0.04 TFRAC(321)=0.040125 ;TFRAC(322)=0.04025 TFRAC(323)=0.040375 ;TFRAC(324)=0.0405 TFRAC(325)=0.040625 ;TFRAC(326)=0.04075 TFRAC(327)=0.040875 ;TFRAC(328)=0.041 TFRAC(329)=0.041125 ;TFRAC(330)=0.04125 TFRAC(331)=0.041375 ;TFRAC(332)=0.0415 TFRAC(333)=0.041625 ;TFRAC(334)=0.04175 TFRAC(335)=0.041875 ;TFRAC(336)=0.042 TFRAC(337)=0.042125 ;TFRAC(338)=0.04225 TFRAC(339)=0.042375 ;TFRAC(340)=0.0425 TFRAC(341)=0.042625 ;TFRAC(342)=0.04275 TFRAC(343)=0.042875 ;TFRAC(344)=0.043 TFRAC(345)=0.043125 ;TFRAC(346)=0.04325 TFRAC(347)=0.043375 ;TFRAC(348)=0.0435 TFRAC(349)=0.043625 ;TFRAC(350)=0.04375 TFRAC(351)=0.043875 ;TFRAC(352)=0.044 TFRAC(353)=0.044125 ;TFRAC(354)=0.04425 TFRAC(355)=0.044375 ;TFRAC(356)=0.0445 TFRAC(357)=0.044625 ;TFRAC(358)=0.04475 TFRAC(359)=0.044875 ;TFRAC(360)=0.045 TFRAC(361)=0.045125 ;TFRAC(362)=0.04525 TFRAC(363)=0.045375 ;TFRAC(364)=0.0455 TFRAC(365)=0.045625 ;TFRAC(366)=0.04575 TFRAC(367)=0.045875 ;TFRAC(368)=0.046 TFRAC(369)=0.046125 ;TFRAC(370)=0.04625 TFRAC(371)=0.046375 ;TFRAC(372)=0.0465 TFRAC(373)=0.046625 ;TFRAC(374)=0.04675 TFRAC(375)=0.046875 ;TFRAC(376)=0.047 TFRAC(377)=0.047125 ;TFRAC(378)=0.04725 TFRAC(379)=0.047375 ;TFRAC(380)=0.0475 TFRAC(381)=0.047625 ;TFRAC(382)=0.04775 TFRAC(383)=0.047875 ;TFRAC(384)=0.048 TFRAC(385)=0.048125 ;TFRAC(386)=0.04825 TFRAC(387)=0.048375 ;TFRAC(388)=0.0485 TFRAC(389)=0.048625 ;TFRAC(390)=0.04875 TFRAC(391)=0.048875 ;TFRAC(392)=0.049 TFRAC(393)=0.049125 ;TFRAC(394)=0.04925 TFRAC(395)=0.049375 ;TFRAC(396)=0.0495 TFRAC(397)=0.049625 ;TFRAC(398)=0.04975 TFRAC(399)=0.049875 ;TFRAC(400)=0.05 TFRAC(401)=0.050125 ;TFRAC(402)=0.05025 TFRAC(403)=0.050375 ;TFRAC(404)=0.0505 TFRAC(405)=0.050625 ;TFRAC(406)=0.05075 TFRAC(407)=0.050875 ;TFRAC(408)=0.051 TFRAC(409)=0.051125 ;TFRAC(410)=0.05125 TFRAC(411)=0.051375 ;TFRAC(412)=0.0515 TFRAC(413)=0.051625 ;TFRAC(414)=0.05175 TFRAC(415)=0.051875 ;TFRAC(416)=0.052 TFRAC(417)=0.052125 ;TFRAC(418)=0.05225 TFRAC(419)=0.052375 ;TFRAC(420)=0.0525 TFRAC(421)=0.052625 ;TFRAC(422)=0.05275 TFRAC(423)=0.052875 ;TFRAC(424)=0.053 TFRAC(425)=0.053125 ;TFRAC(426)=0.05325 TFRAC(427)=0.053375 ;TFRAC(428)=0.0535 TFRAC(429)=0.053625 ;TFRAC(430)=0.05375 TFRAC(431)=0.053875 ;TFRAC(432)=0.054 TFRAC(433)=0.054125 ;TFRAC(434)=0.05425 TFRAC(435)=0.054375 ;TFRAC(436)=0.0545 TFRAC(437)=0.054625 ;TFRAC(438)=0.05475 TFRAC(439)=0.054875 ;TFRAC(440)=0.055 TFRAC(441)=0.055125 ;TFRAC(442)=0.05525 TFRAC(443)=0.055375 ;TFRAC(444)=0.0555 TFRAC(445)=0.055625 ;TFRAC(446)=0.05575 TFRAC(447)=0.055875 ;TFRAC(448)=0.056 TFRAC(449)=0.056125 ;TFRAC(450)=0.05625 TFRAC(451)=0.056375 ;TFRAC(452)=0.0565 TFRAC(453)=0.056625 ;TFRAC(454)=0.05675 TFRAC(455)=0.056875 ;TFRAC(456)=0.057 TFRAC(457)=0.057125 ;TFRAC(458)=0.05725 TFRAC(459)=0.057375 ;TFRAC(460)=0.0575 TFRAC(461)=0.057625 ;TFRAC(462)=0.05775 TFRAC(463)=0.057875 ;TFRAC(464)=0.058 TFRAC(465)=0.058125 ;TFRAC(466)=0.05825 TFRAC(467)=0.058375 ;TFRAC(468)=0.0585 TFRAC(469)=0.058625 ;TFRAC(470)=0.05875 TFRAC(471)=0.058875 ;TFRAC(472)=0.059 TFRAC(473)=0.059125 ;TFRAC(474)=0.05925 TFRAC(475)=0.059375 ;TFRAC(476)=0.0595 TFRAC(477)=0.059625 ;TFRAC(478)=0.05975 TFRAC(479)=0.059875 ;TFRAC(480)=0.06 TFRAC(481)=0.060125 ;TFRAC(482)=0.06025 TFRAC(483)=0.060375 ;TFRAC(484)=0.0605 TFRAC(485)=0.060625 ;TFRAC(486)=0.06075 TFRAC(487)=0.060875 ;TFRAC(488)=0.061 TFRAC(489)=0.061125 ;TFRAC(490)=0.06125 TFRAC(491)=0.061375 ;TFRAC(492)=0.0615 TFRAC(493)=0.061625 ;TFRAC(494)=0.06175 TFRAC(495)=0.061875 ;TFRAC(496)=0.062 TFRAC(497)=0.062125 ;TFRAC(498)=0.06225 TFRAC(499)=0.062375 ;TFRAC(500)=0.0625 TFRAC(501)=0.062625 ;TFRAC(502)=0.06275 TFRAC(503)=0.062875 ;TFRAC(504)=0.063 TFRAC(505)=0.063125 ;TFRAC(506)=0.06325 TFRAC(507)=0.063375 ;TFRAC(508)=0.0635 TFRAC(509)=0.063625 ;TFRAC(510)=0.06375 TFRAC(511)=0.063875 ;TFRAC(512)=0.064 TFRAC(513)=0.064125 ;TFRAC(514)=0.06425 TFRAC(515)=0.064375 ;TFRAC(516)=0.0645 TFRAC(517)=0.064625 ;TFRAC(518)=0.06475 TFRAC(519)=0.064875 ;TFRAC(520)=0.065 TFRAC(521)=0.065125 ;TFRAC(522)=0.06525 TFRAC(523)=0.065375 ;TFRAC(524)=0.0655 TFRAC(525)=0.065625 ;TFRAC(526)=0.06575 TFRAC(527)=0.065875 ;TFRAC(528)=0.066 TFRAC(529)=0.066125 ;TFRAC(530)=0.06625 TFRAC(531)=0.066375 ;TFRAC(532)=0.0665 TFRAC(533)=0.066625 ;TFRAC(534)=0.06675 TFRAC(535)=0.066875 ;TFRAC(536)=0.067 TFRAC(537)=0.067125 ;TFRAC(538)=0.06725 TFRAC(539)=0.067375 ;TFRAC(540)=0.0675 TFRAC(541)=0.067625 ;TFRAC(542)=0.06775 TFRAC(543)=0.067875 ;TFRAC(544)=0.068 TFRAC(545)=0.068125 ;TFRAC(546)=0.06825 TFRAC(547)=0.068375 ;TFRAC(548)=0.0685 TFRAC(549)=0.068625 ;TFRAC(550)=0.06875 TFRAC(551)=0.068875 ;TFRAC(552)=0.069 TFRAC(553)=0.069125 ;TFRAC(554)=0.06925 TFRAC(555)=0.069375 ;TFRAC(556)=0.0695 TFRAC(557)=0.069625 ;TFRAC(558)=0.06975 TFRAC(559)=0.069875 ;TFRAC(560)=0.07 TFRAC(561)=0.070125 ;TFRAC(562)=0.07025 TFRAC(563)=0.070375 ;TFRAC(564)=0.0705 TFRAC(565)=0.070625 ;TFRAC(566)=0.07075 TFRAC(567)=0.070875 ;TFRAC(568)=0.071 TFRAC(569)=0.071125 ;TFRAC(570)=0.07125 TFRAC(571)=0.071375 ;TFRAC(572)=0.0715 TFRAC(573)=0.071625 ;TFRAC(574)=0.07175 TFRAC(575)=0.071875 ;TFRAC(576)=0.072 TFRAC(577)=0.072125 ;TFRAC(578)=0.07225 TFRAC(579)=0.072375 ;TFRAC(580)=0.0725 TFRAC(581)=0.072625 ;TFRAC(582)=0.07275 TFRAC(583)=0.072875 ;TFRAC(584)=0.073 TFRAC(585)=0.073125 ;TFRAC(586)=0.07325 TFRAC(587)=0.073375 ;TFRAC(588)=0.0735 TFRAC(589)=0.073625 ;TFRAC(590)=0.07375 TFRAC(591)=0.073875 ;TFRAC(592)=0.074 TFRAC(593)=0.074125 ;TFRAC(594)=0.07425 TFRAC(595)=0.074375 ;TFRAC(596)=0.0745 TFRAC(597)=0.074625 ;TFRAC(598)=0.07475 TFRAC(599)=0.074875 ;TFRAC(600)=0.075 TFRAC(601)=0.075125 ;TFRAC(602)=0.07525 TFRAC(603)=0.075375 ;TFRAC(604)=0.0755 TFRAC(605)=0.075625 ;TFRAC(606)=0.07575 TFRAC(607)=0.075875 ;TFRAC(608)=0.076 TFRAC(609)=0.076125 ;TFRAC(610)=0.07625 TFRAC(611)=0.076375 ;TFRAC(612)=0.0765 TFRAC(613)=0.076625 ;TFRAC(614)=0.07675 TFRAC(615)=0.076875 ;TFRAC(616)=0.077 TFRAC(617)=0.077125 ;TFRAC(618)=0.07725 TFRAC(619)=0.077375 ;TFRAC(620)=0.0775 TFRAC(621)=0.077625 ;TFRAC(622)=0.07775 TFRAC(623)=0.077875 ;TFRAC(624)=0.078 TFRAC(625)=0.078125 ;TFRAC(626)=0.07825 TFRAC(627)=0.078375 ;TFRAC(628)=0.0785 TFRAC(629)=0.078625 ;TFRAC(630)=0.07875 TFRAC(631)=0.078875 ;TFRAC(632)=0.079 TFRAC(633)=0.079125 ;TFRAC(634)=0.07925 TFRAC(635)=0.079375 ;TFRAC(636)=0.0795 TFRAC(637)=0.079625 ;TFRAC(638)=0.07975 TFRAC(639)=0.079875 ;TFRAC(640)=0.08 TFRAC(641)=0.080125 ;TFRAC(642)=0.08025 TFRAC(643)=0.080375 ;TFRAC(644)=0.0805 TFRAC(645)=0.080625 ;TFRAC(646)=0.08075 TFRAC(647)=0.080875 ;TFRAC(648)=0.081 TFRAC(649)=0.081125 ;TFRAC(650)=0.08125 TFRAC(651)=0.081375 ;TFRAC(652)=0.0815 TFRAC(653)=0.081625 ;TFRAC(654)=0.08175 TFRAC(655)=0.081875 ;TFRAC(656)=0.082 TFRAC(657)=0.082125 ;TFRAC(658)=0.08225 TFRAC(659)=0.082375 ;TFRAC(660)=0.0825 TFRAC(661)=0.082625 ;TFRAC(662)=0.08275 TFRAC(663)=0.082875 ;TFRAC(664)=0.083 TFRAC(665)=0.083125 ;TFRAC(666)=0.08325 TFRAC(667)=0.083375 ;TFRAC(668)=0.0835 TFRAC(669)=0.083625 ;TFRAC(670)=0.08375 TFRAC(671)=0.083875 ;TFRAC(672)=0.084 TFRAC(673)=0.084125 ;TFRAC(674)=0.08425 TFRAC(675)=0.084375 ;TFRAC(676)=0.0845 TFRAC(677)=0.084625 ;TFRAC(678)=0.08475 TFRAC(679)=0.084875 ;TFRAC(680)=0.085 TFRAC(681)=0.085125 ;TFRAC(682)=0.08525 TFRAC(683)=0.085375 ;TFRAC(684)=0.0855 TFRAC(685)=0.085625 ;TFRAC(686)=0.08575 TFRAC(687)=0.085875 ;TFRAC(688)=0.086 TFRAC(689)=0.086125 ;TFRAC(690)=0.08625 TFRAC(691)=0.086375 ;TFRAC(692)=0.0865 TFRAC(693)=0.086625 ;TFRAC(694)=0.08675 TFRAC(695)=0.086875 ;TFRAC(696)=0.087 TFRAC(697)=0.087125 ;TFRAC(698)=0.08725 TFRAC(699)=0.087375 ;TFRAC(700)=0.0875 TFRAC(701)=0.087625 ;TFRAC(702)=0.08775 TFRAC(703)=0.087875 ;TFRAC(704)=0.088 TFRAC(705)=0.088125 ;TFRAC(706)=0.08825 TFRAC(707)=0.088375 ;TFRAC(708)=0.0885 TFRAC(709)=0.088625 ;TFRAC(710)=0.08875 TFRAC(711)=0.088875 ;TFRAC(712)=0.089 TFRAC(713)=0.089125 ;TFRAC(714)=0.08925 TFRAC(715)=0.089375 ;TFRAC(716)=0.0895 TFRAC(717)=0.089625 ;TFRAC(718)=0.08975 TFRAC(719)=0.089875 ;TFRAC(720)=0.09 TFRAC(721)=0.090125 ;TFRAC(722)=0.09025 TFRAC(723)=0.090375 ;TFRAC(724)=0.0905 TFRAC(725)=0.090625 ;TFRAC(726)=0.09075 TFRAC(727)=0.090875 ;TFRAC(728)=0.091 TFRAC(729)=0.091125 ;TFRAC(730)=0.09125 TFRAC(731)=0.091375 ;TFRAC(732)=0.0915 TFRAC(733)=0.091625 ;TFRAC(734)=0.09175 TFRAC(735)=0.091875 ;TFRAC(736)=0.092 TFRAC(737)=0.092125 ;TFRAC(738)=0.09225 TFRAC(739)=0.092375 ;TFRAC(740)=0.0925 TFRAC(741)=0.092625 ;TFRAC(742)=0.09275 TFRAC(743)=0.092875 ;TFRAC(744)=0.093 TFRAC(745)=0.093125 ;TFRAC(746)=0.09325 TFRAC(747)=0.093375 ;TFRAC(748)=0.0935 TFRAC(749)=0.093625 ;TFRAC(750)=0.09375 TFRAC(751)=0.093875 ;TFRAC(752)=0.094 TFRAC(753)=0.094125 ;TFRAC(754)=0.09425 TFRAC(755)=0.094375 ;TFRAC(756)=0.0945 TFRAC(757)=0.094625 ;TFRAC(758)=0.09475 TFRAC(759)=0.094875 ;TFRAC(760)=0.095 TFRAC(761)=0.095125 ;TFRAC(762)=0.09525 TFRAC(763)=0.095375 ;TFRAC(764)=0.0955 TFRAC(765)=0.095625 ;TFRAC(766)=0.09575 TFRAC(767)=0.095875 ;TFRAC(768)=0.096 TFRAC(769)=0.096125 ;TFRAC(770)=0.09625 TFRAC(771)=0.096375 ;TFRAC(772)=0.0965 TFRAC(773)=0.096625 ;TFRAC(774)=0.09675 TFRAC(775)=0.096875 ;TFRAC(776)=0.097 TFRAC(777)=0.097125 ;TFRAC(778)=0.09725 TFRAC(779)=0.097375 ;TFRAC(780)=0.0975 TFRAC(781)=0.097625 ;TFRAC(782)=0.09775 TFRAC(783)=0.097875 ;TFRAC(784)=0.098 TFRAC(785)=0.098125 ;TFRAC(786)=0.09825 TFRAC(787)=0.098375 ;TFRAC(788)=0.0985 TFRAC(789)=0.098625 ;TFRAC(790)=0.09875 TFRAC(791)=0.098875 ;TFRAC(792)=0.099 TFRAC(793)=0.099125 ;TFRAC(794)=0.09925 TFRAC(795)=0.099375 ;TFRAC(796)=0.0995 TFRAC(797)=0.099625 ;TFRAC(798)=0.09975 TFRAC(799)=0.099875 ;TFRAC(800)=0.1 TFRAC(801)=0.100125 ;TFRAC(802)=0.10025 TFRAC(803)=0.100375 ;TFRAC(804)=0.1005 TFRAC(805)=0.100625 ;TFRAC(806)=0.10075 TFRAC(807)=0.100875 ;TFRAC(808)=0.101 TFRAC(809)=0.101125 ;TFRAC(810)=0.10125 TFRAC(811)=0.101375 ;TFRAC(812)=0.1015 TFRAC(813)=0.101625 ;TFRAC(814)=0.10175 TFRAC(815)=0.101875 ;TFRAC(816)=0.102 TFRAC(817)=0.102125 ;TFRAC(818)=0.10225 TFRAC(819)=0.102375 ;TFRAC(820)=0.1025 TFRAC(821)=0.102625 ;TFRAC(822)=0.10275 TFRAC(823)=0.102875 ;TFRAC(824)=0.103 TFRAC(825)=0.103125 ;TFRAC(826)=0.10325 TFRAC(827)=0.103375 ;TFRAC(828)=0.1035 TFRAC(829)=0.103625 ;TFRAC(830)=0.10375 TFRAC(831)=0.103875 ;TFRAC(832)=0.104 TFRAC(833)=0.104125 ;TFRAC(834)=0.10425 TFRAC(835)=0.104375 ;TFRAC(836)=0.1045 TFRAC(837)=0.104625 ;TFRAC(838)=0.10475 TFRAC(839)=0.104875 ;TFRAC(840)=0.105 TFRAC(841)=0.105125 ;TFRAC(842)=0.10525 TFRAC(843)=0.105375 ;TFRAC(844)=0.1055 TFRAC(845)=0.105625 ;TFRAC(846)=0.10575 TFRAC(847)=0.105875 ;TFRAC(848)=0.106 TFRAC(849)=0.106125 ;TFRAC(850)=0.10625 TFRAC(851)=0.106375 ;TFRAC(852)=0.1065 TFRAC(853)=0.106625 ;TFRAC(854)=0.10675 TFRAC(855)=0.106875 ;TFRAC(856)=0.107 TFRAC(857)=0.107125 ;TFRAC(858)=0.10725 TFRAC(859)=0.107375 ;TFRAC(860)=0.1075 TFRAC(861)=0.107625 ;TFRAC(862)=0.10775 TFRAC(863)=0.107875 ;TFRAC(864)=0.108 TFRAC(865)=0.108125 ;TFRAC(866)=0.10825 TFRAC(867)=0.108375 ;TFRAC(868)=0.1085 TFRAC(869)=0.108625 ;TFRAC(870)=0.10875 TFRAC(871)=0.108875 ;TFRAC(872)=0.109 TFRAC(873)=0.109125 ;TFRAC(874)=0.10925 TFRAC(875)=0.109375 ;TFRAC(876)=0.1095 TFRAC(877)=0.109625 ;TFRAC(878)=0.10975 TFRAC(879)=0.109875 ;TFRAC(880)=0.11 TFRAC(881)=0.110125 ;TFRAC(882)=0.11025 TFRAC(883)=0.110375 ;TFRAC(884)=0.1105 TFRAC(885)=0.110625 ;TFRAC(886)=0.11075 TFRAC(887)=0.110875 ;TFRAC(888)=0.111 TFRAC(889)=0.111125 ;TFRAC(890)=0.11125 TFRAC(891)=0.111375 ;TFRAC(892)=0.1115 TFRAC(893)=0.111625 ;TFRAC(894)=0.11175 TFRAC(895)=0.111875 ;TFRAC(896)=0.112 TFRAC(897)=0.112125 ;TFRAC(898)=0.11225 TFRAC(899)=0.112375 ;TFRAC(900)=0.1125 TFRAC(901)=0.112625 ;TFRAC(902)=0.11275 TFRAC(903)=0.112875 ;TFRAC(904)=0.113 TFRAC(905)=0.113125 ;TFRAC(906)=0.11325 TFRAC(907)=0.113375 ;TFRAC(908)=0.1135 TFRAC(909)=0.113625 ;TFRAC(910)=0.11375 TFRAC(911)=0.113875 ;TFRAC(912)=0.114 TFRAC(913)=0.114125 ;TFRAC(914)=0.11425 TFRAC(915)=0.114375 ;TFRAC(916)=0.1145 TFRAC(917)=0.114625 ;TFRAC(918)=0.11475 TFRAC(919)=0.114875 ;TFRAC(920)=0.115 TFRAC(921)=0.115125 ;TFRAC(922)=0.11525 TFRAC(923)=0.115375 ;TFRAC(924)=0.1155 TFRAC(925)=0.115625 ;TFRAC(926)=0.11575 TFRAC(927)=0.115875 ;TFRAC(928)=0.116 TFRAC(929)=0.116125 ;TFRAC(930)=0.11625 TFRAC(931)=0.116375 ;TFRAC(932)=0.1165 TFRAC(933)=0.116625 ;TFRAC(934)=0.11675 TFRAC(935)=0.116875 ;TFRAC(936)=0.117 TFRAC(937)=0.117125 ;TFRAC(938)=0.11725 TFRAC(939)=0.117375 ;TFRAC(940)=0.1175 TFRAC(941)=0.117625 ;TFRAC(942)=0.11775 TFRAC(943)=0.117875 ;TFRAC(944)=0.118 TFRAC(945)=0.118125 ;TFRAC(946)=0.11825 TFRAC(947)=0.118375 ;TFRAC(948)=0.1185 TFRAC(949)=0.118625 ;TFRAC(950)=0.11875 TFRAC(951)=0.118875 ;TFRAC(952)=0.119 TFRAC(953)=0.119125 ;TFRAC(954)=0.11925 TFRAC(955)=0.119375 ;TFRAC(956)=0.1195 TFRAC(957)=0.119625 ;TFRAC(958)=0.11975 TFRAC(959)=0.119875 ;TFRAC(960)=0.12 TFRAC(961)=0.120125 ;TFRAC(962)=0.12025 TFRAC(963)=0.120375 ;TFRAC(964)=0.1205 TFRAC(965)=0.120625 ;TFRAC(966)=0.12075 TFRAC(967)=0.120875 ;TFRAC(968)=0.121 TFRAC(969)=0.121125 ;TFRAC(970)=0.12125 TFRAC(971)=0.121375 ;TFRAC(972)=0.1215 TFRAC(973)=0.121625 ;TFRAC(974)=0.12175 TFRAC(975)=0.121875 ;TFRAC(976)=0.122 TFRAC(977)=0.122125 ;TFRAC(978)=0.12225 TFRAC(979)=0.122375 ;TFRAC(980)=0.1225 TFRAC(981)=0.122625 ;TFRAC(982)=0.12275 TFRAC(983)=0.122875 ;TFRAC(984)=0.123 TFRAC(985)=0.123125 ;TFRAC(986)=0.12325 TFRAC(987)=0.123375 ;TFRAC(988)=0.1235 TFRAC(989)=0.123625 ;TFRAC(990)=0.12375 TFRAC(991)=0.123875 ;TFRAC(992)=0.124 TFRAC(993)=0.124125 ;TFRAC(994)=0.12425 TFRAC(995)=0.124375 ;TFRAC(996)=0.1245 TFRAC(997)=0.124625 ;TFRAC(998)=0.12475 TFRAC(999)=0.124875 ;TFRAC(1000)=0.125 TFRAC(1001)=0.125125 ;TFRAC(1002)=0.12525 TFRAC(1003)=0.125375 ;TFRAC(1004)=0.1255 TFRAC(1005)=0.125625 ;TFRAC(1006)=0.12575 TFRAC(1007)=0.125875 ;TFRAC(1008)=0.126 TFRAC(1009)=0.126125 ;TFRAC(1010)=0.12625 TFRAC(1011)=0.126375 ;TFRAC(1012)=0.1265 TFRAC(1013)=0.126625 ;TFRAC(1014)=0.12675 TFRAC(1015)=0.126875 ;TFRAC(1016)=0.127 TFRAC(1017)=0.127125 ;TFRAC(1018)=0.12725 TFRAC(1019)=0.127375 ;TFRAC(1020)=0.1275 TFRAC(1021)=0.127625 ;TFRAC(1022)=0.12775 TFRAC(1023)=0.127875 ;TFRAC(1024)=0.128 TFRAC(1025)=0.128125 ;TFRAC(1026)=0.12825 TFRAC(1027)=0.128375 ;TFRAC(1028)=0.1285 TFRAC(1029)=0.128625 ;TFRAC(1030)=0.12875 TFRAC(1031)=0.128875 ;TFRAC(1032)=0.129 TFRAC(1033)=0.129125 ;TFRAC(1034)=0.12925 TFRAC(1035)=0.129375 ;TFRAC(1036)=0.1295 TFRAC(1037)=0.129625 ;TFRAC(1038)=0.12975 TFRAC(1039)=0.129875 ;TFRAC(1040)=0.13 TFRAC(1041)=0.130125 ;TFRAC(1042)=0.13025 TFRAC(1043)=0.130375 ;TFRAC(1044)=0.1305 TFRAC(1045)=0.130625 ;TFRAC(1046)=0.13075 TFRAC(1047)=0.130875 ;TFRAC(1048)=0.131 TFRAC(1049)=0.131125 ;TFRAC(1050)=0.13125 TFRAC(1051)=0.131375 ;TFRAC(1052)=0.1315 TFRAC(1053)=0.131625 ;TFRAC(1054)=0.13175 TFRAC(1055)=0.131875 ;TFRAC(1056)=0.132 TFRAC(1057)=0.132125 ;TFRAC(1058)=0.13225 TFRAC(1059)=0.132375 ;TFRAC(1060)=0.1325 TFRAC(1061)=0.132625 ;TFRAC(1062)=0.13275 TFRAC(1063)=0.132875 ;TFRAC(1064)=0.133 TFRAC(1065)=0.133125 ;TFRAC(1066)=0.13325 TFRAC(1067)=0.133375 ;TFRAC(1068)=0.1335 TFRAC(1069)=0.133625 ;TFRAC(1070)=0.13375 TFRAC(1071)=0.133875 ;TFRAC(1072)=0.134 TFRAC(1073)=0.134125 ;TFRAC(1074)=0.13425 TFRAC(1075)=0.134375 ;TFRAC(1076)=0.1345 TFRAC(1077)=0.134625 ;TFRAC(1078)=0.13475 TFRAC(1079)=0.134875 ;TFRAC(1080)=0.135 TFRAC(1081)=0.135125 ;TFRAC(1082)=0.13525 TFRAC(1083)=0.135375 ;TFRAC(1084)=0.1355 TFRAC(1085)=0.135625 ;TFRAC(1086)=0.13575 TFRAC(1087)=0.135875 ;TFRAC(1088)=0.136 TFRAC(1089)=0.136125 ;TFRAC(1090)=0.13625 TFRAC(1091)=0.136375 ;TFRAC(1092)=0.1365 TFRAC(1093)=0.136625 ;TFRAC(1094)=0.13675 TFRAC(1095)=0.136875 ;TFRAC(1096)=0.137 TFRAC(1097)=0.137125 ;TFRAC(1098)=0.13725 TFRAC(1099)=0.137375 ;TFRAC(1100)=0.1375 TFRAC(1101)=0.137625 ;TFRAC(1102)=0.13775 TFRAC(1103)=0.137875 ;TFRAC(1104)=0.138 TFRAC(1105)=0.138125 ;TFRAC(1106)=0.13825 TFRAC(1107)=0.138375 ;TFRAC(1108)=0.1385 TFRAC(1109)=0.138625 ;TFRAC(1110)=0.13875 TFRAC(1111)=0.138875 ;TFRAC(1112)=0.139 TFRAC(1113)=0.139125 ;TFRAC(1114)=0.13925 TFRAC(1115)=0.139375 ;TFRAC(1116)=0.1395 TFRAC(1117)=0.139625 ;TFRAC(1118)=0.13975 TFRAC(1119)=0.139875 ;TFRAC(1120)=0.14 TFRAC(1121)=0.140125 ;TFRAC(1122)=0.14025 TFRAC(1123)=0.140375 ;TFRAC(1124)=0.1405 TFRAC(1125)=0.140625 ;TFRAC(1126)=0.14075 TFRAC(1127)=0.140875 ;TFRAC(1128)=0.141 TFRAC(1129)=0.141125 ;TFRAC(1130)=0.14125 TFRAC(1131)=0.141375 ;TFRAC(1132)=0.1415 TFRAC(1133)=0.141625 ;TFRAC(1134)=0.14175 TFRAC(1135)=0.141875 ;TFRAC(1136)=0.142 TFRAC(1137)=0.142125 ;TFRAC(1138)=0.14225 TFRAC(1139)=0.142375 ;TFRAC(1140)=0.1425 TFRAC(1141)=0.142625 ;TFRAC(1142)=0.14275 TFRAC(1143)=0.142875 ;TFRAC(1144)=0.143 TFRAC(1145)=0.143125 ;TFRAC(1146)=0.14325 TFRAC(1147)=0.143375 ;TFRAC(1148)=0.1435 TFRAC(1149)=0.143625 ;TFRAC(1150)=0.14375 TFRAC(1151)=0.143875 ;TFRAC(1152)=0.144 TFRAC(1153)=0.144125 ;TFRAC(1154)=0.14425 TFRAC(1155)=0.144375 ;TFRAC(1156)=0.1445 TFRAC(1157)=0.144625 ;TFRAC(1158)=0.14475 TFRAC(1159)=0.144875 ;TFRAC(1160)=0.145 TFRAC(1161)=0.145125 ;TFRAC(1162)=0.14525 TFRAC(1163)=0.145375 ;TFRAC(1164)=0.1455 TFRAC(1165)=0.145625 ;TFRAC(1166)=0.14575 TFRAC(1167)=0.145875 ;TFRAC(1168)=0.146 TFRAC(1169)=0.146125 ;TFRAC(1170)=0.14625 TFRAC(1171)=0.146375 ;TFRAC(1172)=0.1465 TFRAC(1173)=0.146625 ;TFRAC(1174)=0.14675 TFRAC(1175)=0.146875 ;TFRAC(1176)=0.147 TFRAC(1177)=0.147125 ;TFRAC(1178)=0.14725 TFRAC(1179)=0.147375 ;TFRAC(1180)=0.1475 TFRAC(1181)=0.147625 ;TFRAC(1182)=0.14775 TFRAC(1183)=0.147875 ;TFRAC(1184)=0.148 TFRAC(1185)=0.148125 ;TFRAC(1186)=0.14825 TFRAC(1187)=0.148375 ;TFRAC(1188)=0.1485 TFRAC(1189)=0.148625 ;TFRAC(1190)=0.14875 TFRAC(1191)=0.148875 ;TFRAC(1192)=0.149 TFRAC(1193)=0.149125 ;TFRAC(1194)=0.14925 TFRAC(1195)=0.149375 ;TFRAC(1196)=0.1495 TFRAC(1197)=0.149625 ;TFRAC(1198)=0.14975 TFRAC(1199)=0.149875 ;TFRAC(1200)=0.15 TFRAC(1201)=0.150125 ;TFRAC(1202)=0.15025 TFRAC(1203)=0.150375 ;TFRAC(1204)=0.1505 TFRAC(1205)=0.150625 ;TFRAC(1206)=0.15075 TFRAC(1207)=0.150875 ;TFRAC(1208)=0.151 TFRAC(1209)=0.151125 ;TFRAC(1210)=0.15125 TFRAC(1211)=0.151375 ;TFRAC(1212)=0.1515 TFRAC(1213)=0.151625 ;TFRAC(1214)=0.15175 TFRAC(1215)=0.151875 ;TFRAC(1216)=0.152 TFRAC(1217)=0.152125 ;TFRAC(1218)=0.15225 TFRAC(1219)=0.152375 ;TFRAC(1220)=0.1525 TFRAC(1221)=0.152625 ;TFRAC(1222)=0.15275 TFRAC(1223)=0.152875 ;TFRAC(1224)=0.153 TFRAC(1225)=0.153125 ;TFRAC(1226)=0.15325 TFRAC(1227)=0.153375 ;TFRAC(1228)=0.1535 TFRAC(1229)=0.153625 ;TFRAC(1230)=0.15375 TFRAC(1231)=0.153875 ;TFRAC(1232)=0.154 TFRAC(1233)=0.154125 ;TFRAC(1234)=0.15425 TFRAC(1235)=0.154375 ;TFRAC(1236)=0.1545 TFRAC(1237)=0.154625 ;TFRAC(1238)=0.15475 TFRAC(1239)=0.154875 ;TFRAC(1240)=0.155 TFRAC(1241)=0.155125 ;TFRAC(1242)=0.15525 TFRAC(1243)=0.155375 ;TFRAC(1244)=0.1555 TFRAC(1245)=0.155625 ;TFRAC(1246)=0.15575 TFRAC(1247)=0.155875 ;TFRAC(1248)=0.156 TFRAC(1249)=0.156125 ;TFRAC(1250)=0.15625 TFRAC(1251)=0.156375 ;TFRAC(1252)=0.1565 TFRAC(1253)=0.156625 ;TFRAC(1254)=0.15675 TFRAC(1255)=0.156875 ;TFRAC(1256)=0.157 TFRAC(1257)=0.157125 ;TFRAC(1258)=0.15725 TFRAC(1259)=0.157375 ;TFRAC(1260)=0.1575 TFRAC(1261)=0.157625 ;TFRAC(1262)=0.15775 TFRAC(1263)=0.157875 ;TFRAC(1264)=0.158 TFRAC(1265)=0.158125 ;TFRAC(1266)=0.15825 TFRAC(1267)=0.158375 ;TFRAC(1268)=0.1585 TFRAC(1269)=0.158625 ;TFRAC(1270)=0.15875 TFRAC(1271)=0.158875 ;TFRAC(1272)=0.159 TFRAC(1273)=0.159125 ;TFRAC(1274)=0.15925 TFRAC(1275)=0.159375 ;TFRAC(1276)=0.1595 TFRAC(1277)=0.159625 ;TFRAC(1278)=0.15975 TFRAC(1279)=0.159875 ;TFRAC(1280)=0.16 TFRAC(1281)=0.160125 ;TFRAC(1282)=0.16025 TFRAC(1283)=0.160375 ;TFRAC(1284)=0.1605 TFRAC(1285)=0.160625 ;TFRAC(1286)=0.16075 TFRAC(1287)=0.160875 ;TFRAC(1288)=0.161 TFRAC(1289)=0.161125 ;TFRAC(1290)=0.16125 TFRAC(1291)=0.161375 ;TFRAC(1292)=0.1615 TFRAC(1293)=0.161625 ;TFRAC(1294)=0.16175 TFRAC(1295)=0.161875 ;TFRAC(1296)=0.162 TFRAC(1297)=0.162125 ;TFRAC(1298)=0.16225 TFRAC(1299)=0.162375 ;TFRAC(1300)=0.1625 TFRAC(1301)=0.162625 ;TFRAC(1302)=0.16275 TFRAC(1303)=0.162875 ;TFRAC(1304)=0.163 TFRAC(1305)=0.163125 ;TFRAC(1306)=0.16325 TFRAC(1307)=0.163375 ;TFRAC(1308)=0.1635 TFRAC(1309)=0.163625 ;TFRAC(1310)=0.16375 TFRAC(1311)=0.163875 ;TFRAC(1312)=0.164 TFRAC(1313)=0.164125 ;TFRAC(1314)=0.16425 TFRAC(1315)=0.164375 ;TFRAC(1316)=0.1645 TFRAC(1317)=0.164625 ;TFRAC(1318)=0.16475 TFRAC(1319)=0.164875 ;TFRAC(1320)=0.165 TFRAC(1321)=0.165125 ;TFRAC(1322)=0.16525 TFRAC(1323)=0.165375 ;TFRAC(1324)=0.1655 TFRAC(1325)=0.165625 ;TFRAC(1326)=0.16575 TFRAC(1327)=0.165875 ;TFRAC(1328)=0.166 TFRAC(1329)=0.166125 ;TFRAC(1330)=0.16625 TFRAC(1331)=0.166375 ;TFRAC(1332)=0.1665 TFRAC(1333)=0.166625 ;TFRAC(1334)=0.16675 TFRAC(1335)=0.166875 ;TFRAC(1336)=0.167 TFRAC(1337)=0.167125 ;TFRAC(1338)=0.16725 TFRAC(1339)=0.167375 ;TFRAC(1340)=0.1675 TFRAC(1341)=0.167625 ;TFRAC(1342)=0.16775 TFRAC(1343)=0.167875 ;TFRAC(1344)=0.168 TFRAC(1345)=0.168125 ;TFRAC(1346)=0.16825 TFRAC(1347)=0.168375 ;TFRAC(1348)=0.1685 TFRAC(1349)=0.168625 ;TFRAC(1350)=0.16875 TFRAC(1351)=0.168875 ;TFRAC(1352)=0.169 TFRAC(1353)=0.169125 ;TFRAC(1354)=0.16925 TFRAC(1355)=0.169375 ;TFRAC(1356)=0.1695 TFRAC(1357)=0.169625 ;TFRAC(1358)=0.16975 TFRAC(1359)=0.169875 ;TFRAC(1360)=0.17 TFRAC(1361)=0.170125 ;TFRAC(1362)=0.17025 TFRAC(1363)=0.170375 ;TFRAC(1364)=0.1705 TFRAC(1365)=0.170625 ;TFRAC(1366)=0.17075 TFRAC(1367)=0.170875 ;TFRAC(1368)=0.171 TFRAC(1369)=0.171125 ;TFRAC(1370)=0.17125 TFRAC(1371)=0.171375 ;TFRAC(1372)=0.1715 TFRAC(1373)=0.171625 ;TFRAC(1374)=0.17175 TFRAC(1375)=0.171875 ;TFRAC(1376)=0.172 TFRAC(1377)=0.172125 ;TFRAC(1378)=0.17225 TFRAC(1379)=0.172375 ;TFRAC(1380)=0.1725 TFRAC(1381)=0.172625 ;TFRAC(1382)=0.17275 TFRAC(1383)=0.172875 ;TFRAC(1384)=0.173 TFRAC(1385)=0.173125 ;TFRAC(1386)=0.17325 TFRAC(1387)=0.173375 ;TFRAC(1388)=0.1735 TFRAC(1389)=0.173625 ;TFRAC(1390)=0.17375 TFRAC(1391)=0.173875 ;TFRAC(1392)=0.174 TFRAC(1393)=0.174125 ;TFRAC(1394)=0.17425 TFRAC(1395)=0.174375 ;TFRAC(1396)=0.1745 TFRAC(1397)=0.174625 ;TFRAC(1398)=0.17475 TFRAC(1399)=0.174875 ;TFRAC(1400)=0.175 TFRAC(1401)=0.175125 ;TFRAC(1402)=0.17525 TFRAC(1403)=0.175375 ;TFRAC(1404)=0.1755 TFRAC(1405)=0.175625 ;TFRAC(1406)=0.17575 TFRAC(1407)=0.175875 ;TFRAC(1408)=0.176 TFRAC(1409)=0.176125 ;TFRAC(1410)=0.17625 TFRAC(1411)=0.176375 ;TFRAC(1412)=0.1765 TFRAC(1413)=0.176625 ;TFRAC(1414)=0.17675 TFRAC(1415)=0.176875 ;TFRAC(1416)=0.177 TFRAC(1417)=0.177125 ;TFRAC(1418)=0.17725 TFRAC(1419)=0.177375 ;TFRAC(1420)=0.1775 TFRAC(1421)=0.177625 ;TFRAC(1422)=0.17775 TFRAC(1423)=0.177875 ;TFRAC(1424)=0.178 TFRAC(1425)=0.178125 ;TFRAC(1426)=0.17825 TFRAC(1427)=0.178375 ;TFRAC(1428)=0.1785 TFRAC(1429)=0.178625 ;TFRAC(1430)=0.17875 TFRAC(1431)=0.178875 ;TFRAC(1432)=0.179 TFRAC(1433)=0.179125 ;TFRAC(1434)=0.17925 TFRAC(1435)=0.179375 ;TFRAC(1436)=0.1795 TFRAC(1437)=0.179625 ;TFRAC(1438)=0.17975 TFRAC(1439)=0.179875 ;TFRAC(1440)=0.18 TFRAC(1441)=0.180125 ;TFRAC(1442)=0.18025 TFRAC(1443)=0.180375 ;TFRAC(1444)=0.1805 TFRAC(1445)=0.180625 ;TFRAC(1446)=0.18075 TFRAC(1447)=0.180875 ;TFRAC(1448)=0.181 TFRAC(1449)=0.181125 ;TFRAC(1450)=0.18125 TFRAC(1451)=0.181375 ;TFRAC(1452)=0.1815 TFRAC(1453)=0.181625 ;TFRAC(1454)=0.18175 TFRAC(1455)=0.181875 ;TFRAC(1456)=0.182 TFRAC(1457)=0.182125 ;TFRAC(1458)=0.18225 TFRAC(1459)=0.182375 ;TFRAC(1460)=0.1825 TFRAC(1461)=0.182625 ;TFRAC(1462)=0.18275 TFRAC(1463)=0.182875 ;TFRAC(1464)=0.183 TFRAC(1465)=0.183125 ;TFRAC(1466)=0.18325 TFRAC(1467)=0.183375 ;TFRAC(1468)=0.1835 TFRAC(1469)=0.183625 ;TFRAC(1470)=0.18375 TFRAC(1471)=0.183875 ;TFRAC(1472)=0.184 TFRAC(1473)=0.184125 ;TFRAC(1474)=0.18425 TFRAC(1475)=0.184375 ;TFRAC(1476)=0.1845 TFRAC(1477)=0.184625 ;TFRAC(1478)=0.18475 TFRAC(1479)=0.184875 ;TFRAC(1480)=0.185 TFRAC(1481)=0.185125 ;TFRAC(1482)=0.18525 TFRAC(1483)=0.185375 ;TFRAC(1484)=0.1855 TFRAC(1485)=0.185625 ;TFRAC(1486)=0.18575 TFRAC(1487)=0.185875 ;TFRAC(1488)=0.186 TFRAC(1489)=0.186125 ;TFRAC(1490)=0.18625 TFRAC(1491)=0.186375 ;TFRAC(1492)=0.1865 TFRAC(1493)=0.186625 ;TFRAC(1494)=0.18675 TFRAC(1495)=0.186875 ;TFRAC(1496)=0.187 TFRAC(1497)=0.187125 ;TFRAC(1498)=0.18725 TFRAC(1499)=0.187375 ;TFRAC(1500)=0.1875 TFRAC(1501)=0.187625 ;TFRAC(1502)=0.18775 TFRAC(1503)=0.187875 ;TFRAC(1504)=0.188 TFRAC(1505)=0.188125 ;TFRAC(1506)=0.18825 TFRAC(1507)=0.188375 ;TFRAC(1508)=0.1885 TFRAC(1509)=0.188625 ;TFRAC(1510)=0.18875 TFRAC(1511)=0.188875 ;TFRAC(1512)=0.189 TFRAC(1513)=0.189125 ;TFRAC(1514)=0.18925 TFRAC(1515)=0.189375 ;TFRAC(1516)=0.1895 TFRAC(1517)=0.189625 ;TFRAC(1518)=0.18975 TFRAC(1519)=0.189875 ;TFRAC(1520)=0.19 TFRAC(1521)=0.190125 ;TFRAC(1522)=0.19025 TFRAC(1523)=0.190375 ;TFRAC(1524)=0.1905 TFRAC(1525)=0.190625 ;TFRAC(1526)=0.19075 TFRAC(1527)=0.190875 ;TFRAC(1528)=0.191 TFRAC(1529)=0.191125 ;TFRAC(1530)=0.19125 TFRAC(1531)=0.191375 ;TFRAC(1532)=0.1915 TFRAC(1533)=0.191625 ;TFRAC(1534)=0.19175 TFRAC(1535)=0.191875 ;TFRAC(1536)=0.192 TFRAC(1537)=0.192125 ;TFRAC(1538)=0.19225 TFRAC(1539)=0.192375 ;TFRAC(1540)=0.1925 TFRAC(1541)=0.192625 ;TFRAC(1542)=0.19275 TFRAC(1543)=0.192875 ;TFRAC(1544)=0.193 TFRAC(1545)=0.193125 ;TFRAC(1546)=0.19325 TFRAC(1547)=0.193375 ;TFRAC(1548)=0.1935 TFRAC(1549)=0.193625 ;TFRAC(1550)=0.19375 TFRAC(1551)=0.193875 ;TFRAC(1552)=0.194 TFRAC(1553)=0.194125 ;TFRAC(1554)=0.19425 TFRAC(1555)=0.194375 ;TFRAC(1556)=0.1945 TFRAC(1557)=0.194625 ;TFRAC(1558)=0.19475 TFRAC(1559)=0.194875 ;TFRAC(1560)=0.195 TFRAC(1561)=0.195125 ;TFRAC(1562)=0.19525 TFRAC(1563)=0.195375 ;TFRAC(1564)=0.1955 TFRAC(1565)=0.195625 ;TFRAC(1566)=0.19575 TFRAC(1567)=0.195875 ;TFRAC(1568)=0.196 TFRAC(1569)=0.196125 ;TFRAC(1570)=0.19625 TFRAC(1571)=0.196375 ;TFRAC(1572)=0.1965 TFRAC(1573)=0.196625 ;TFRAC(1574)=0.19675 TFRAC(1575)=0.196875 ;TFRAC(1576)=0.197 TFRAC(1577)=0.197125 ;TFRAC(1578)=0.19725 TFRAC(1579)=0.197375 ;TFRAC(1580)=0.1975 TFRAC(1581)=0.197625 ;TFRAC(1582)=0.19775 TFRAC(1583)=0.197875 ;TFRAC(1584)=0.198 TFRAC(1585)=0.198125 ;TFRAC(1586)=0.19825 TFRAC(1587)=0.198375 ;TFRAC(1588)=0.1985 TFRAC(1589)=0.198625 ;TFRAC(1590)=0.19875 TFRAC(1591)=0.198875 ;TFRAC(1592)=0.199 TFRAC(1593)=0.199125 ;TFRAC(1594)=0.19925 TFRAC(1595)=0.199375 ;TFRAC(1596)=0.1995 TFRAC(1597)=0.199625 ;TFRAC(1598)=0.19975 TFRAC(1599)=0.199875 ;TFRAC(1600)=0.2 TFRAC(1601)=0.200125 ;TFRAC(1602)=0.20025 TFRAC(1603)=0.200375 ;TFRAC(1604)=0.2005 TFRAC(1605)=0.200625 ;TFRAC(1606)=0.20075 TFRAC(1607)=0.200875 ;TFRAC(1608)=0.201 TFRAC(1609)=0.201125 ;TFRAC(1610)=0.20125 TFRAC(1611)=0.201375 ;TFRAC(1612)=0.2015 TFRAC(1613)=0.201625 ;TFRAC(1614)=0.20175 TFRAC(1615)=0.201875 ;TFRAC(1616)=0.202 TFRAC(1617)=0.202125 ;TFRAC(1618)=0.20225 TFRAC(1619)=0.202375 ;TFRAC(1620)=0.2025 TFRAC(1621)=0.202625 ;TFRAC(1622)=0.20275 TFRAC(1623)=0.202875 ;TFRAC(1624)=0.203 TFRAC(1625)=0.203125 ;TFRAC(1626)=0.20325 TFRAC(1627)=0.203375 ;TFRAC(1628)=0.2035 TFRAC(1629)=0.203625 ;TFRAC(1630)=0.20375 TFRAC(1631)=0.203875 ;TFRAC(1632)=0.204 TFRAC(1633)=0.204125 ;TFRAC(1634)=0.20425 TFRAC(1635)=0.204375 ;TFRAC(1636)=0.2045 TFRAC(1637)=0.204625 ;TFRAC(1638)=0.20475 TFRAC(1639)=0.204875 ;TFRAC(1640)=0.205 TFRAC(1641)=0.205125 ;TFRAC(1642)=0.20525 TFRAC(1643)=0.205375 ;TFRAC(1644)=0.2055 TFRAC(1645)=0.205625 ;TFRAC(1646)=0.20575 TFRAC(1647)=0.205875 ;TFRAC(1648)=0.206 TFRAC(1649)=0.206125 ;TFRAC(1650)=0.20625 TFRAC(1651)=0.206375 ;TFRAC(1652)=0.2065 TFRAC(1653)=0.206625 ;TFRAC(1654)=0.20675 TFRAC(1655)=0.206875 ;TFRAC(1656)=0.207 TFRAC(1657)=0.207125 ;TFRAC(1658)=0.20725 TFRAC(1659)=0.207375 ;TFRAC(1660)=0.2075 TFRAC(1661)=0.207625 ;TFRAC(1662)=0.20775 TFRAC(1663)=0.207875 ;TFRAC(1664)=0.208 TFRAC(1665)=0.208125 ;TFRAC(1666)=0.20825 TFRAC(1667)=0.208375 ;TFRAC(1668)=0.2085 TFRAC(1669)=0.208625 ;TFRAC(1670)=0.20875 TFRAC(1671)=0.208875 ;TFRAC(1672)=0.209 TFRAC(1673)=0.209125 ;TFRAC(1674)=0.20925 TFRAC(1675)=0.209375 ;TFRAC(1676)=0.2095 TFRAC(1677)=0.209625 ;TFRAC(1678)=0.20975 TFRAC(1679)=0.209875 ;TFRAC(1680)=0.21 TFRAC(1681)=0.210125 ;TFRAC(1682)=0.21025 TFRAC(1683)=0.210375 ;TFRAC(1684)=0.2105 TFRAC(1685)=0.210625 ;TFRAC(1686)=0.21075 TFRAC(1687)=0.210875 ;TFRAC(1688)=0.211 TFRAC(1689)=0.211125 ;TFRAC(1690)=0.21125 TFRAC(1691)=0.211375 ;TFRAC(1692)=0.2115 TFRAC(1693)=0.211625 ;TFRAC(1694)=0.21175 TFRAC(1695)=0.211875 ;TFRAC(1696)=0.212 TFRAC(1697)=0.212125 ;TFRAC(1698)=0.21225 TFRAC(1699)=0.212375 ;TFRAC(1700)=0.2125 TFRAC(1701)=0.212625 ;TFRAC(1702)=0.21275 TFRAC(1703)=0.212875 ;TFRAC(1704)=0.213 TFRAC(1705)=0.213125 ;TFRAC(1706)=0.21325 TFRAC(1707)=0.213375 ;TFRAC(1708)=0.2135 TFRAC(1709)=0.213625 ;TFRAC(1710)=0.21375 TFRAC(1711)=0.213875 ;TFRAC(1712)=0.214 TFRAC(1713)=0.214125 ;TFRAC(1714)=0.21425 TFRAC(1715)=0.214375 ;TFRAC(1716)=0.2145 TFRAC(1717)=0.214625 ;TFRAC(1718)=0.21475 TFRAC(1719)=0.214875 ;TFRAC(1720)=0.215 TFRAC(1721)=0.215125 ;TFRAC(1722)=0.21525 TFRAC(1723)=0.215375 ;TFRAC(1724)=0.2155 TFRAC(1725)=0.215625 ;TFRAC(1726)=0.21575 TFRAC(1727)=0.215875 ;TFRAC(1728)=0.216 TFRAC(1729)=0.216125 ;TFRAC(1730)=0.21625 TFRAC(1731)=0.216375 ;TFRAC(1732)=0.2165 TFRAC(1733)=0.216625 ;TFRAC(1734)=0.21675 TFRAC(1735)=0.216875 ;TFRAC(1736)=0.217 TFRAC(1737)=0.217125 ;TFRAC(1738)=0.21725 TFRAC(1739)=0.217375 ;TFRAC(1740)=0.2175 TFRAC(1741)=0.217625 ;TFRAC(1742)=0.21775 TFRAC(1743)=0.217875 ;TFRAC(1744)=0.218 TFRAC(1745)=0.218125 ;TFRAC(1746)=0.21825 TFRAC(1747)=0.218375 ;TFRAC(1748)=0.2185 TFRAC(1749)=0.218625 ;TFRAC(1750)=0.21875 TFRAC(1751)=0.218875 ;TFRAC(1752)=0.219 TFRAC(1753)=0.219125 ;TFRAC(1754)=0.21925 TFRAC(1755)=0.219375 ;TFRAC(1756)=0.2195 TFRAC(1757)=0.219625 ;TFRAC(1758)=0.21975 TFRAC(1759)=0.219875 ;TFRAC(1760)=0.22 TFRAC(1761)=0.220125 ;TFRAC(1762)=0.22025 TFRAC(1763)=0.220375 ;TFRAC(1764)=0.2205 TFRAC(1765)=0.220625 ;TFRAC(1766)=0.22075 TFRAC(1767)=0.220875 ;TFRAC(1768)=0.221 TFRAC(1769)=0.221125 ;TFRAC(1770)=0.22125 TFRAC(1771)=0.221375 ;TFRAC(1772)=0.2215 TFRAC(1773)=0.221625 ;TFRAC(1774)=0.22175 TFRAC(1775)=0.221875 ;TFRAC(1776)=0.222 TFRAC(1777)=0.222125 ;TFRAC(1778)=0.22225 TFRAC(1779)=0.222375 ;TFRAC(1780)=0.2225 TFRAC(1781)=0.222625 ;TFRAC(1782)=0.22275 TFRAC(1783)=0.222875 ;TFRAC(1784)=0.223 TFRAC(1785)=0.223125 ;TFRAC(1786)=0.22325 TFRAC(1787)=0.223375 ;TFRAC(1788)=0.2235 TFRAC(1789)=0.223625 ;TFRAC(1790)=0.22375 TFRAC(1791)=0.223875 ;TFRAC(1792)=0.224 TFRAC(1793)=0.224125 ;TFRAC(1794)=0.22425 TFRAC(1795)=0.224375 ;TFRAC(1796)=0.2245 TFRAC(1797)=0.224625 ;TFRAC(1798)=0.22475 TFRAC(1799)=0.224875 ;TFRAC(1800)=0.225 TFRAC(1801)=0.225125 ;TFRAC(1802)=0.22525 TFRAC(1803)=0.225375 ;TFRAC(1804)=0.2255 TFRAC(1805)=0.225625 ;TFRAC(1806)=0.22575 TFRAC(1807)=0.225875 ;TFRAC(1808)=0.226 TFRAC(1809)=0.226125 ;TFRAC(1810)=0.22625 TFRAC(1811)=0.226375 ;TFRAC(1812)=0.2265 TFRAC(1813)=0.226625 ;TFRAC(1814)=0.22675 TFRAC(1815)=0.226875 ;TFRAC(1816)=0.227 TFRAC(1817)=0.227125 ;TFRAC(1818)=0.22725 TFRAC(1819)=0.227375 ;TFRAC(1820)=0.2275 TFRAC(1821)=0.227625 ;TFRAC(1822)=0.22775 TFRAC(1823)=0.227875 ;TFRAC(1824)=0.228 TFRAC(1825)=0.228125 ;TFRAC(1826)=0.22825 TFRAC(1827)=0.228375 ;TFRAC(1828)=0.2285 TFRAC(1829)=0.228625 ;TFRAC(1830)=0.22875 TFRAC(1831)=0.228875 ;TFRAC(1832)=0.229 TFRAC(1833)=0.229125 ;TFRAC(1834)=0.22925 TFRAC(1835)=0.229375 ;TFRAC(1836)=0.2295 TFRAC(1837)=0.229625 ;TFRAC(1838)=0.22975 TFRAC(1839)=0.229875 ;TFRAC(1840)=0.23 TFRAC(1841)=0.230125 ;TFRAC(1842)=0.23025 TFRAC(1843)=0.230375 ;TFRAC(1844)=0.2305 TFRAC(1845)=0.230625 ;TFRAC(1846)=0.23075 TFRAC(1847)=0.230875 ;TFRAC(1848)=0.231 TFRAC(1849)=0.231125 ;TFRAC(1850)=0.23125 TFRAC(1851)=0.231375 ;TFRAC(1852)=0.2315 TFRAC(1853)=0.231625 ;TFRAC(1854)=0.23175 TFRAC(1855)=0.231875 ;TFRAC(1856)=0.232 TFRAC(1857)=0.232125 ;TFRAC(1858)=0.23225 TFRAC(1859)=0.232375 ;TFRAC(1860)=0.2325 TFRAC(1861)=0.232625 ;TFRAC(1862)=0.23275 TFRAC(1863)=0.232875 ;TFRAC(1864)=0.233 TFRAC(1865)=0.233125 ;TFRAC(1866)=0.23325 TFRAC(1867)=0.233375 ;TFRAC(1868)=0.2335 TFRAC(1869)=0.233625 ;TFRAC(1870)=0.23375 TFRAC(1871)=0.233875 ;TFRAC(1872)=0.234 TFRAC(1873)=0.234125 ;TFRAC(1874)=0.23425 TFRAC(1875)=0.234375 ;TFRAC(1876)=0.2345 TFRAC(1877)=0.234625 ;TFRAC(1878)=0.23475 TFRAC(1879)=0.234875 ;TFRAC(1880)=0.235 TFRAC(1881)=0.235125 ;TFRAC(1882)=0.23525 TFRAC(1883)=0.235375 ;TFRAC(1884)=0.2355 TFRAC(1885)=0.235625 ;TFRAC(1886)=0.23575 TFRAC(1887)=0.235875 ;TFRAC(1888)=0.236 TFRAC(1889)=0.236125 ;TFRAC(1890)=0.23625 TFRAC(1891)=0.236375 ;TFRAC(1892)=0.2365 TFRAC(1893)=0.236625 ;TFRAC(1894)=0.23675 TFRAC(1895)=0.236875 ;TFRAC(1896)=0.237 TFRAC(1897)=0.237125 ;TFRAC(1898)=0.23725 TFRAC(1899)=0.237375 ;TFRAC(1900)=0.2375 TFRAC(1901)=0.237625 ;TFRAC(1902)=0.23775 TFRAC(1903)=0.237875 ;TFRAC(1904)=0.238 TFRAC(1905)=0.238125 ;TFRAC(1906)=0.23825 TFRAC(1907)=0.238375 ;TFRAC(1908)=0.2385 TFRAC(1909)=0.238625 ;TFRAC(1910)=0.23875 TFRAC(1911)=0.238875 ;TFRAC(1912)=0.239 TFRAC(1913)=0.239125 ;TFRAC(1914)=0.23925 TFRAC(1915)=0.239375 ;TFRAC(1916)=0.2395 TFRAC(1917)=0.239625 ;TFRAC(1918)=0.23975 TFRAC(1919)=0.239875 ;TFRAC(1920)=0.24 TFRAC(1921)=0.240125 ;TFRAC(1922)=0.24025 TFRAC(1923)=0.240375 ;TFRAC(1924)=0.2405 TFRAC(1925)=0.240625 ;TFRAC(1926)=0.24075 TFRAC(1927)=0.240875 ;TFRAC(1928)=0.241 TFRAC(1929)=0.241125 ;TFRAC(1930)=0.24125 TFRAC(1931)=0.241375 ;TFRAC(1932)=0.2415 TFRAC(1933)=0.241625 ;TFRAC(1934)=0.24175 TFRAC(1935)=0.241875 ;TFRAC(1936)=0.242 TFRAC(1937)=0.242125 ;TFRAC(1938)=0.24225 TFRAC(1939)=0.242375 ;TFRAC(1940)=0.2425 TFRAC(1941)=0.242625 ;TFRAC(1942)=0.24275 TFRAC(1943)=0.242875 ;TFRAC(1944)=0.243 TFRAC(1945)=0.243125 ;TFRAC(1946)=0.24325 TFRAC(1947)=0.243375 ;TFRAC(1948)=0.2435 TFRAC(1949)=0.243625 ;TFRAC(1950)=0.24375 TFRAC(1951)=0.243875 ;TFRAC(1952)=0.244 TFRAC(1953)=0.244125 ;TFRAC(1954)=0.24425 TFRAC(1955)=0.244375 ;TFRAC(1956)=0.2445 TFRAC(1957)=0.244625 ;TFRAC(1958)=0.24475 TFRAC(1959)=0.244875 ;TFRAC(1960)=0.245 TFRAC(1961)=0.245125 ;TFRAC(1962)=0.24525 TFRAC(1963)=0.245375 ;TFRAC(1964)=0.2455 TFRAC(1965)=0.245625 ;TFRAC(1966)=0.24575 TFRAC(1967)=0.245875 ;TFRAC(1968)=0.246 TFRAC(1969)=0.246125 ;TFRAC(1970)=0.24625 TFRAC(1971)=0.246375 ;TFRAC(1972)=0.2465 TFRAC(1973)=0.246625 ;TFRAC(1974)=0.24675 TFRAC(1975)=0.246875 ;TFRAC(1976)=0.247 TFRAC(1977)=0.247125 ;TFRAC(1978)=0.24725 TFRAC(1979)=0.247375 ;TFRAC(1980)=0.2475 TFRAC(1981)=0.247625 ;TFRAC(1982)=0.24775 TFRAC(1983)=0.247875 ;TFRAC(1984)=0.248 TFRAC(1985)=0.248125 ;TFRAC(1986)=0.24825 TFRAC(1987)=0.248375 ;TFRAC(1988)=0.2485 TFRAC(1989)=0.248625 ;TFRAC(1990)=0.24875 TFRAC(1991)=0.248875 ;TFRAC(1992)=0.249 TFRAC(1993)=0.249125 ;TFRAC(1994)=0.24925 TFRAC(1995)=0.249375 ;TFRAC(1996)=0.2495 TFRAC(1997)=0.249625 ;TFRAC(1998)=0.24975 TFRAC(1999)=0.249875 ;TFRAC(2000)=0.25 TFRAC(2001)=0.250125 ;TFRAC(2002)=0.25025 TFRAC(2003)=0.250375 ;TFRAC(2004)=0.2505 TFRAC(2005)=0.250625 ;TFRAC(2006)=0.25075 TFRAC(2007)=0.250875 ;TFRAC(2008)=0.251 TFRAC(2009)=0.251125 ;TFRAC(2010)=0.25125 TFRAC(2011)=0.251375 ;TFRAC(2012)=0.2515 TFRAC(2013)=0.251625 ;TFRAC(2014)=0.25175 TFRAC(2015)=0.251875 ;TFRAC(2016)=0.252 TFRAC(2017)=0.252125 ;TFRAC(2018)=0.25225 TFRAC(2019)=0.252375 ;TFRAC(2020)=0.2525 TFRAC(2021)=0.252625 ;TFRAC(2022)=0.25275 TFRAC(2023)=0.252875 ;TFRAC(2024)=0.253 TFRAC(2025)=0.253125 ;TFRAC(2026)=0.25325 TFRAC(2027)=0.253375 ;TFRAC(2028)=0.2535 TFRAC(2029)=0.253625 ;TFRAC(2030)=0.25375 TFRAC(2031)=0.253875 ;TFRAC(2032)=0.254 TFRAC(2033)=0.254125 ;TFRAC(2034)=0.25425 TFRAC(2035)=0.254375 ;TFRAC(2036)=0.2545 TFRAC(2037)=0.254625 ;TFRAC(2038)=0.25475 TFRAC(2039)=0.254875 ;TFRAC(2040)=0.255 TFRAC(2041)=0.255125 ;TFRAC(2042)=0.25525 TFRAC(2043)=0.255375 ;TFRAC(2044)=0.2555 TFRAC(2045)=0.255625 ;TFRAC(2046)=0.25575 TFRAC(2047)=0.255875 ;TFRAC(2048)=0.256 TFRAC(2049)=0.256125 ;TFRAC(2050)=0.25625 TFRAC(2051)=0.256375 ;TFRAC(2052)=0.2565 TFRAC(2053)=0.256625 ;TFRAC(2054)=0.25675 TFRAC(2055)=0.256875 ;TFRAC(2056)=0.257 TFRAC(2057)=0.257125 ;TFRAC(2058)=0.25725 TFRAC(2059)=0.257375 ;TFRAC(2060)=0.2575 TFRAC(2061)=0.257625 ;TFRAC(2062)=0.25775 TFRAC(2063)=0.257875 ;TFRAC(2064)=0.258 TFRAC(2065)=0.258125 ;TFRAC(2066)=0.25825 TFRAC(2067)=0.258375 ;TFRAC(2068)=0.2585 TFRAC(2069)=0.258625 ;TFRAC(2070)=0.25875 TFRAC(2071)=0.258875 ;TFRAC(2072)=0.259 TFRAC(2073)=0.259125 ;TFRAC(2074)=0.25925 TFRAC(2075)=0.259375 ;TFRAC(2076)=0.2595 TFRAC(2077)=0.259625 ;TFRAC(2078)=0.25975 TFRAC(2079)=0.259875 ;TFRAC(2080)=0.26 TFRAC(2081)=0.260125 ;TFRAC(2082)=0.26025 TFRAC(2083)=0.260375 ;TFRAC(2084)=0.2605 TFRAC(2085)=0.260625 ;TFRAC(2086)=0.26075 TFRAC(2087)=0.260875 ;TFRAC(2088)=0.261 TFRAC(2089)=0.261125 ;TFRAC(2090)=0.26125 TFRAC(2091)=0.261375 ;TFRAC(2092)=0.2615 TFRAC(2093)=0.261625 ;TFRAC(2094)=0.26175 TFRAC(2095)=0.261875 ;TFRAC(2096)=0.262 TFRAC(2097)=0.262125 ;TFRAC(2098)=0.26225 TFRAC(2099)=0.262375 ;TFRAC(2100)=0.2625 TFRAC(2101)=0.262625 ;TFRAC(2102)=0.26275 TFRAC(2103)=0.262875 ;TFRAC(2104)=0.263 TFRAC(2105)=0.263125 ;TFRAC(2106)=0.26325 TFRAC(2107)=0.263375 ;TFRAC(2108)=0.2635 TFRAC(2109)=0.263625 ;TFRAC(2110)=0.26375 TFRAC(2111)=0.263875 ;TFRAC(2112)=0.264 TFRAC(2113)=0.264125 ;TFRAC(2114)=0.26425 TFRAC(2115)=0.264375 ;TFRAC(2116)=0.2645 TFRAC(2117)=0.264625 ;TFRAC(2118)=0.26475 TFRAC(2119)=0.264875 ;TFRAC(2120)=0.265 TFRAC(2121)=0.265125 ;TFRAC(2122)=0.26525 TFRAC(2123)=0.265375 ;TFRAC(2124)=0.2655 TFRAC(2125)=0.265625 ;TFRAC(2126)=0.26575 TFRAC(2127)=0.265875 ;TFRAC(2128)=0.266 TFRAC(2129)=0.266125 ;TFRAC(2130)=0.26625 TFRAC(2131)=0.266375 ;TFRAC(2132)=0.2665 TFRAC(2133)=0.266625 ;TFRAC(2134)=0.26675 TFRAC(2135)=0.266875 ;TFRAC(2136)=0.267 TFRAC(2137)=0.267125 ;TFRAC(2138)=0.26725 TFRAC(2139)=0.267375 ;TFRAC(2140)=0.2675 TFRAC(2141)=0.267625 ;TFRAC(2142)=0.26775 TFRAC(2143)=0.267875 ;TFRAC(2144)=0.268 TFRAC(2145)=0.268125 ;TFRAC(2146)=0.26825 TFRAC(2147)=0.268375 ;TFRAC(2148)=0.2685 TFRAC(2149)=0.268625 ;TFRAC(2150)=0.26875 TFRAC(2151)=0.268875 ;TFRAC(2152)=0.269 TFRAC(2153)=0.269125 ;TFRAC(2154)=0.26925 TFRAC(2155)=0.269375 ;TFRAC(2156)=0.2695 TFRAC(2157)=0.269625 ;TFRAC(2158)=0.26975 TFRAC(2159)=0.269875 ;TFRAC(2160)=0.27 TFRAC(2161)=0.270125 ;TFRAC(2162)=0.27025 TFRAC(2163)=0.270375 ;TFRAC(2164)=0.2705 TFRAC(2165)=0.270625 ;TFRAC(2166)=0.27075 TFRAC(2167)=0.270875 ;TFRAC(2168)=0.271 TFRAC(2169)=0.271125 ;TFRAC(2170)=0.27125 TFRAC(2171)=0.271375 ;TFRAC(2172)=0.2715 TFRAC(2173)=0.271625 ;TFRAC(2174)=0.27175 TFRAC(2175)=0.271875 ;TFRAC(2176)=0.272 TFRAC(2177)=0.272125 ;TFRAC(2178)=0.27225 TFRAC(2179)=0.272375 ;TFRAC(2180)=0.2725 TFRAC(2181)=0.272625 ;TFRAC(2182)=0.27275 TFRAC(2183)=0.272875 ;TFRAC(2184)=0.273 TFRAC(2185)=0.273125 ;TFRAC(2186)=0.27325 TFRAC(2187)=0.273375 ;TFRAC(2188)=0.2735 TFRAC(2189)=0.273625 ;TFRAC(2190)=0.27375 TFRAC(2191)=0.273875 ;TFRAC(2192)=0.274 TFRAC(2193)=0.274125 ;TFRAC(2194)=0.27425 TFRAC(2195)=0.274375 ;TFRAC(2196)=0.2745 TFRAC(2197)=0.274625 ;TFRAC(2198)=0.27475 TFRAC(2199)=0.274875 ;TFRAC(2200)=0.275 TFRAC(2201)=0.275125 ;TFRAC(2202)=0.27525 TFRAC(2203)=0.275375 ;TFRAC(2204)=0.2755 TFRAC(2205)=0.275625 ;TFRAC(2206)=0.27575 TFRAC(2207)=0.275875 ;TFRAC(2208)=0.276 TFRAC(2209)=0.276125 ;TFRAC(2210)=0.27625 TFRAC(2211)=0.276375 ;TFRAC(2212)=0.2765 TFRAC(2213)=0.276625 ;TFRAC(2214)=0.27675 TFRAC(2215)=0.276875 ;TFRAC(2216)=0.277 TFRAC(2217)=0.277125 ;TFRAC(2218)=0.27725 TFRAC(2219)=0.277375 ;TFRAC(2220)=0.2775 TFRAC(2221)=0.277625 ;TFRAC(2222)=0.27775 TFRAC(2223)=0.277875 ;TFRAC(2224)=0.278 TFRAC(2225)=0.278125 ;TFRAC(2226)=0.27825 TFRAC(2227)=0.278375 ;TFRAC(2228)=0.2785 TFRAC(2229)=0.278625 ;TFRAC(2230)=0.27875 TFRAC(2231)=0.278875 ;TFRAC(2232)=0.279 TFRAC(2233)=0.279125 ;TFRAC(2234)=0.27925 TFRAC(2235)=0.279375 ;TFRAC(2236)=0.2795 TFRAC(2237)=0.279625 ;TFRAC(2238)=0.27975 TFRAC(2239)=0.279875 ;TFRAC(2240)=0.28 TFRAC(2241)=0.280125 ;TFRAC(2242)=0.28025 TFRAC(2243)=0.280375 ;TFRAC(2244)=0.2805 TFRAC(2245)=0.280625 ;TFRAC(2246)=0.28075 TFRAC(2247)=0.280875 ;TFRAC(2248)=0.281 TFRAC(2249)=0.281125 ;TFRAC(2250)=0.28125 TFRAC(2251)=0.281375 ;TFRAC(2252)=0.2815 TFRAC(2253)=0.281625 ;TFRAC(2254)=0.28175 TFRAC(2255)=0.281875 ;TFRAC(2256)=0.282 TFRAC(2257)=0.282125 ;TFRAC(2258)=0.28225 TFRAC(2259)=0.282375 ;TFRAC(2260)=0.2825 TFRAC(2261)=0.282625 ;TFRAC(2262)=0.28275 TFRAC(2263)=0.282875 ;TFRAC(2264)=0.283 TFRAC(2265)=0.283125 ;TFRAC(2266)=0.28325 TFRAC(2267)=0.283375 ;TFRAC(2268)=0.2835 TFRAC(2269)=0.283625 ;TFRAC(2270)=0.28375 TFRAC(2271)=0.283875 ;TFRAC(2272)=0.284 TFRAC(2273)=0.284125 ;TFRAC(2274)=0.28425 TFRAC(2275)=0.284375 ;TFRAC(2276)=0.2845 TFRAC(2277)=0.284625 ;TFRAC(2278)=0.28475 TFRAC(2279)=0.284875 ;TFRAC(2280)=0.285 TFRAC(2281)=0.285125 ;TFRAC(2282)=0.28525 TFRAC(2283)=0.285375 ;TFRAC(2284)=0.2855 TFRAC(2285)=0.285625 ;TFRAC(2286)=0.28575 TFRAC(2287)=0.285875 ;TFRAC(2288)=0.286 TFRAC(2289)=0.286125 ;TFRAC(2290)=0.28625 TFRAC(2291)=0.286375 ;TFRAC(2292)=0.2865 TFRAC(2293)=0.286625 ;TFRAC(2294)=0.28675 TFRAC(2295)=0.286875 ;TFRAC(2296)=0.287 TFRAC(2297)=0.287125 ;TFRAC(2298)=0.28725 TFRAC(2299)=0.287375 ;TFRAC(2300)=0.2875 TFRAC(2301)=0.287625 ;TFRAC(2302)=0.28775 TFRAC(2303)=0.287875 ;TFRAC(2304)=0.288 TFRAC(2305)=0.288125 ;TFRAC(2306)=0.28825 TFRAC(2307)=0.288375 ;TFRAC(2308)=0.2885 TFRAC(2309)=0.288625 ;TFRAC(2310)=0.28875 TFRAC(2311)=0.288875 ;TFRAC(2312)=0.289 TFRAC(2313)=0.289125 ;TFRAC(2314)=0.28925 TFRAC(2315)=0.289375 ;TFRAC(2316)=0.2895 TFRAC(2317)=0.289625 ;TFRAC(2318)=0.28975 TFRAC(2319)=0.289875 ;TFRAC(2320)=0.29 TFRAC(2321)=0.290125 ;TFRAC(2322)=0.29025 TFRAC(2323)=0.290375 ;TFRAC(2324)=0.2905 TFRAC(2325)=0.290625 ;TFRAC(2326)=0.29075 TFRAC(2327)=0.290875 ;TFRAC(2328)=0.291 TFRAC(2329)=0.291125 ;TFRAC(2330)=0.29125 TFRAC(2331)=0.291375 ;TFRAC(2332)=0.2915 TFRAC(2333)=0.291625 ;TFRAC(2334)=0.29175 TFRAC(2335)=0.291875 ;TFRAC(2336)=0.292 TFRAC(2337)=0.292125 ;TFRAC(2338)=0.29225 TFRAC(2339)=0.292375 ;TFRAC(2340)=0.2925 TFRAC(2341)=0.292625 ;TFRAC(2342)=0.29275 TFRAC(2343)=0.292875 ;TFRAC(2344)=0.293 TFRAC(2345)=0.293125 ;TFRAC(2346)=0.29325 TFRAC(2347)=0.293375 ;TFRAC(2348)=0.2935 TFRAC(2349)=0.293625 ;TFRAC(2350)=0.29375 TFRAC(2351)=0.293875 ;TFRAC(2352)=0.294 TFRAC(2353)=0.294125 ;TFRAC(2354)=0.29425 TFRAC(2355)=0.294375 ;TFRAC(2356)=0.2945 TFRAC(2357)=0.294625 ;TFRAC(2358)=0.29475 TFRAC(2359)=0.294875 ;TFRAC(2360)=0.295 TFRAC(2361)=0.295125 ;TFRAC(2362)=0.29525 TFRAC(2363)=0.295375 ;TFRAC(2364)=0.2955 TFRAC(2365)=0.295625 ;TFRAC(2366)=0.29575 TFRAC(2367)=0.295875 ;TFRAC(2368)=0.296 TFRAC(2369)=0.296125 ;TFRAC(2370)=0.29625 TFRAC(2371)=0.296375 ;TFRAC(2372)=0.2965 TFRAC(2373)=0.296625 ;TFRAC(2374)=0.29675 TFRAC(2375)=0.296875 ;TFRAC(2376)=0.297 TFRAC(2377)=0.297125 ;TFRAC(2378)=0.29725 TFRAC(2379)=0.297375 ;TFRAC(2380)=0.2975 TFRAC(2381)=0.297625 ;TFRAC(2382)=0.29775 TFRAC(2383)=0.297875 ;TFRAC(2384)=0.298 TFRAC(2385)=0.298125 ;TFRAC(2386)=0.29825 TFRAC(2387)=0.298375 ;TFRAC(2388)=0.2985 TFRAC(2389)=0.298625 ;TFRAC(2390)=0.29875 TFRAC(2391)=0.298875 ;TFRAC(2392)=0.299 TFRAC(2393)=0.299125 ;TFRAC(2394)=0.29925 TFRAC(2395)=0.299375 ;TFRAC(2396)=0.2995 TFRAC(2397)=0.299625 ;TFRAC(2398)=0.29975 TFRAC(2399)=0.299875 ;TFRAC(2400)=0.3 TFRAC(2401)=0.300125 ;TFRAC(2402)=0.30025 TFRAC(2403)=0.300375 ;TFRAC(2404)=0.3005 TFRAC(2405)=0.300625 ;TFRAC(2406)=0.30075 TFRAC(2407)=0.300875 ;TFRAC(2408)=0.301 TFRAC(2409)=0.301125 ;TFRAC(2410)=0.30125 TFRAC(2411)=0.301375 ;TFRAC(2412)=0.3015 TFRAC(2413)=0.301625 ;TFRAC(2414)=0.30175 TFRAC(2415)=0.301875 ;TFRAC(2416)=0.302 TFRAC(2417)=0.302125 ;TFRAC(2418)=0.30225 TFRAC(2419)=0.302375 ;TFRAC(2420)=0.3025 TFRAC(2421)=0.302625 ;TFRAC(2422)=0.30275 TFRAC(2423)=0.302875 ;TFRAC(2424)=0.303 TFRAC(2425)=0.303125 ;TFRAC(2426)=0.30325 TFRAC(2427)=0.303375 ;TFRAC(2428)=0.3035 TFRAC(2429)=0.303625 ;TFRAC(2430)=0.30375 TFRAC(2431)=0.303875 ;TFRAC(2432)=0.304 TFRAC(2433)=0.304125 ;TFRAC(2434)=0.30425 TFRAC(2435)=0.304375 ;TFRAC(2436)=0.3045 TFRAC(2437)=0.304625 ;TFRAC(2438)=0.30475 TFRAC(2439)=0.304875 ;TFRAC(2440)=0.305 TFRAC(2441)=0.305125 ;TFRAC(2442)=0.30525 TFRAC(2443)=0.305375 ;TFRAC(2444)=0.3055 TFRAC(2445)=0.305625 ;TFRAC(2446)=0.30575 TFRAC(2447)=0.305875 ;TFRAC(2448)=0.306 TFRAC(2449)=0.306125 ;TFRAC(2450)=0.30625 TFRAC(2451)=0.306375 ;TFRAC(2452)=0.3065 TFRAC(2453)=0.306625 ;TFRAC(2454)=0.30675 TFRAC(2455)=0.306875 ;TFRAC(2456)=0.307 TFRAC(2457)=0.307125 ;TFRAC(2458)=0.30725 TFRAC(2459)=0.307375 ;TFRAC(2460)=0.3075 TFRAC(2461)=0.307625 ;TFRAC(2462)=0.30775 TFRAC(2463)=0.307875 ;TFRAC(2464)=0.308 TFRAC(2465)=0.308125 ;TFRAC(2466)=0.30825 TFRAC(2467)=0.308375 ;TFRAC(2468)=0.3085 TFRAC(2469)=0.308625 ;TFRAC(2470)=0.30875 TFRAC(2471)=0.308875 ;TFRAC(2472)=0.309 TFRAC(2473)=0.309125 ;TFRAC(2474)=0.30925 TFRAC(2475)=0.309375 ;TFRAC(2476)=0.3095 TFRAC(2477)=0.309625 ;TFRAC(2478)=0.30975 TFRAC(2479)=0.309875 ;TFRAC(2480)=0.31 TFRAC(2481)=0.310125 ;TFRAC(2482)=0.31025 TFRAC(2483)=0.310375 ;TFRAC(2484)=0.3105 TFRAC(2485)=0.310625 ;TFRAC(2486)=0.31075 TFRAC(2487)=0.310875 ;TFRAC(2488)=0.311 TFRAC(2489)=0.311125 ;TFRAC(2490)=0.31125 TFRAC(2491)=0.311375 ;TFRAC(2492)=0.3115 TFRAC(2493)=0.311625 ;TFRAC(2494)=0.31175 TFRAC(2495)=0.311875 ;TFRAC(2496)=0.312 TFRAC(2497)=0.312125 ;TFRAC(2498)=0.31225 TFRAC(2499)=0.312375 ;TFRAC(2500)=0.3125 TFRAC(2501)=0.312625 ;TFRAC(2502)=0.31275 TFRAC(2503)=0.312875 ;TFRAC(2504)=0.313 TFRAC(2505)=0.313125 ;TFRAC(2506)=0.31325 TFRAC(2507)=0.313375 ;TFRAC(2508)=0.3135 TFRAC(2509)=0.313625 ;TFRAC(2510)=0.31375 TFRAC(2511)=0.313875 ;TFRAC(2512)=0.314 TFRAC(2513)=0.314125 ;TFRAC(2514)=0.31425 TFRAC(2515)=0.314375 ;TFRAC(2516)=0.3145 TFRAC(2517)=0.314625 ;TFRAC(2518)=0.31475 TFRAC(2519)=0.314875 ;TFRAC(2520)=0.315 TFRAC(2521)=0.315125 ;TFRAC(2522)=0.31525 TFRAC(2523)=0.315375 ;TFRAC(2524)=0.3155 TFRAC(2525)=0.315625 ;TFRAC(2526)=0.31575 TFRAC(2527)=0.315875 ;TFRAC(2528)=0.316 TFRAC(2529)=0.316125 ;TFRAC(2530)=0.31625 TFRAC(2531)=0.316375 ;TFRAC(2532)=0.3165 TFRAC(2533)=0.316625 ;TFRAC(2534)=0.31675 TFRAC(2535)=0.316875 ;TFRAC(2536)=0.317 TFRAC(2537)=0.317125 ;TFRAC(2538)=0.31725 TFRAC(2539)=0.317375 ;TFRAC(2540)=0.3175 TFRAC(2541)=0.317625 ;TFRAC(2542)=0.31775 TFRAC(2543)=0.317875 ;TFRAC(2544)=0.318 TFRAC(2545)=0.318125 ;TFRAC(2546)=0.31825 TFRAC(2547)=0.318375 ;TFRAC(2548)=0.3185 TFRAC(2549)=0.318625 ;TFRAC(2550)=0.31875 TFRAC(2551)=0.318875 ;TFRAC(2552)=0.319 TFRAC(2553)=0.319125 ;TFRAC(2554)=0.31925 TFRAC(2555)=0.319375 ;TFRAC(2556)=0.3195 TFRAC(2557)=0.319625 ;TFRAC(2558)=0.31975 TFRAC(2559)=0.319875 ;TFRAC(2560)=0.32 TFRAC(2561)=0.320125 ;TFRAC(2562)=0.32025 TFRAC(2563)=0.320375 ;TFRAC(2564)=0.3205 TFRAC(2565)=0.320625 ;TFRAC(2566)=0.32075 TFRAC(2567)=0.320875 ;TFRAC(2568)=0.321 TFRAC(2569)=0.321125 ;TFRAC(2570)=0.32125 TFRAC(2571)=0.321375 ;TFRAC(2572)=0.3215 TFRAC(2573)=0.321625 ;TFRAC(2574)=0.32175 TFRAC(2575)=0.321875 ;TFRAC(2576)=0.322 TFRAC(2577)=0.322125 ;TFRAC(2578)=0.32225 TFRAC(2579)=0.322375 ;TFRAC(2580)=0.3225 TFRAC(2581)=0.322625 ;TFRAC(2582)=0.32275 TFRAC(2583)=0.322875 ;TFRAC(2584)=0.323 TFRAC(2585)=0.323125 ;TFRAC(2586)=0.32325 TFRAC(2587)=0.323375 ;TFRAC(2588)=0.3235 TFRAC(2589)=0.323625 ;TFRAC(2590)=0.32375 TFRAC(2591)=0.323875 ;TFRAC(2592)=0.324 TFRAC(2593)=0.324125 ;TFRAC(2594)=0.32425 TFRAC(2595)=0.324375 ;TFRAC(2596)=0.3245 TFRAC(2597)=0.324625 ;TFRAC(2598)=0.32475 TFRAC(2599)=0.324875 ;TFRAC(2600)=0.325 TFRAC(2601)=0.325125 ;TFRAC(2602)=0.32525 TFRAC(2603)=0.325375 ;TFRAC(2604)=0.3255 TFRAC(2605)=0.325625 ;TFRAC(2606)=0.32575 TFRAC(2607)=0.325875 ;TFRAC(2608)=0.326 TFRAC(2609)=0.326125 ;TFRAC(2610)=0.32625 TFRAC(2611)=0.326375 ;TFRAC(2612)=0.3265 TFRAC(2613)=0.326625 ;TFRAC(2614)=0.32675 TFRAC(2615)=0.326875 ;TFRAC(2616)=0.327 TFRAC(2617)=0.327125 ;TFRAC(2618)=0.32725 TFRAC(2619)=0.327375 ;TFRAC(2620)=0.3275 TFRAC(2621)=0.327625 ;TFRAC(2622)=0.32775 TFRAC(2623)=0.327875 ;TFRAC(2624)=0.328 TFRAC(2625)=0.328125 ;TFRAC(2626)=0.32825 TFRAC(2627)=0.328375 ;TFRAC(2628)=0.3285 TFRAC(2629)=0.328625 ;TFRAC(2630)=0.32875 TFRAC(2631)=0.328875 ;TFRAC(2632)=0.329 TFRAC(2633)=0.329125 ;TFRAC(2634)=0.32925 TFRAC(2635)=0.329375 ;TFRAC(2636)=0.3295 TFRAC(2637)=0.329625 ;TFRAC(2638)=0.32975 TFRAC(2639)=0.329875 ;TFRAC(2640)=0.33 TFRAC(2641)=0.330125 ;TFRAC(2642)=0.33025 TFRAC(2643)=0.330375 ;TFRAC(2644)=0.3305 TFRAC(2645)=0.330625 ;TFRAC(2646)=0.33075 TFRAC(2647)=0.330875 ;TFRAC(2648)=0.331 TFRAC(2649)=0.331125 ;TFRAC(2650)=0.33125 TFRAC(2651)=0.331375 ;TFRAC(2652)=0.3315 TFRAC(2653)=0.331625 ;TFRAC(2654)=0.33175 TFRAC(2655)=0.331875 ;TFRAC(2656)=0.332 TFRAC(2657)=0.332125 ;TFRAC(2658)=0.33225 TFRAC(2659)=0.332375 ;TFRAC(2660)=0.3325 TFRAC(2661)=0.332625 ;TFRAC(2662)=0.33275 TFRAC(2663)=0.332875 ;TFRAC(2664)=0.333 TFRAC(2665)=0.333125 ;TFRAC(2666)=0.33325 TFRAC(2667)=0.333375 ;TFRAC(2668)=0.3335 TFRAC(2669)=0.333625 ;TFRAC(2670)=0.33375 TFRAC(2671)=0.333875 ;TFRAC(2672)=0.334 TFRAC(2673)=0.334125 ;TFRAC(2674)=0.33425 TFRAC(2675)=0.334375 ;TFRAC(2676)=0.3345 TFRAC(2677)=0.334625 ;TFRAC(2678)=0.33475 TFRAC(2679)=0.334875 ;TFRAC(2680)=0.335 TFRAC(2681)=0.335125 ;TFRAC(2682)=0.33525 TFRAC(2683)=0.335375 ;TFRAC(2684)=0.3355 TFRAC(2685)=0.335625 ;TFRAC(2686)=0.33575 TFRAC(2687)=0.335875 ;TFRAC(2688)=0.336 TFRAC(2689)=0.336125 ;TFRAC(2690)=0.33625 TFRAC(2691)=0.336375 ;TFRAC(2692)=0.3365 TFRAC(2693)=0.336625 ;TFRAC(2694)=0.33675 TFRAC(2695)=0.336875 ;TFRAC(2696)=0.337 TFRAC(2697)=0.337125 ;TFRAC(2698)=0.33725 TFRAC(2699)=0.337375 ;TFRAC(2700)=0.3375 TFRAC(2701)=0.337625 ;TFRAC(2702)=0.33775 TFRAC(2703)=0.337875 ;TFRAC(2704)=0.338 TFRAC(2705)=0.338125 ;TFRAC(2706)=0.33825 TFRAC(2707)=0.338375 ;TFRAC(2708)=0.3385 TFRAC(2709)=0.338625 ;TFRAC(2710)=0.33875 TFRAC(2711)=0.338875 ;TFRAC(2712)=0.339 TFRAC(2713)=0.339125 ;TFRAC(2714)=0.33925 TFRAC(2715)=0.339375 ;TFRAC(2716)=0.3395 TFRAC(2717)=0.339625 ;TFRAC(2718)=0.33975 TFRAC(2719)=0.339875 ;TFRAC(2720)=0.34 TFRAC(2721)=0.340125 ;TFRAC(2722)=0.34025 TFRAC(2723)=0.340375 ;TFRAC(2724)=0.3405 TFRAC(2725)=0.340625 ;TFRAC(2726)=0.34075 TFRAC(2727)=0.340875 ;TFRAC(2728)=0.341 TFRAC(2729)=0.341125 ;TFRAC(2730)=0.34125 TFRAC(2731)=0.341375 ;TFRAC(2732)=0.3415 TFRAC(2733)=0.341625 ;TFRAC(2734)=0.34175 TFRAC(2735)=0.341875 ;TFRAC(2736)=0.342 TFRAC(2737)=0.342125 ;TFRAC(2738)=0.34225 TFRAC(2739)=0.342375 ;TFRAC(2740)=0.3425 TFRAC(2741)=0.342625 ;TFRAC(2742)=0.34275 TFRAC(2743)=0.342875 ;TFRAC(2744)=0.343 TFRAC(2745)=0.343125 ;TFRAC(2746)=0.34325 TFRAC(2747)=0.343375 ;TFRAC(2748)=0.3435 TFRAC(2749)=0.343625 ;TFRAC(2750)=0.34375 TFRAC(2751)=0.343875 ;TFRAC(2752)=0.344 TFRAC(2753)=0.344125 ;TFRAC(2754)=0.34425 TFRAC(2755)=0.344375 ;TFRAC(2756)=0.3445 TFRAC(2757)=0.344625 ;TFRAC(2758)=0.34475 TFRAC(2759)=0.344875 ;TFRAC(2760)=0.345 TFRAC(2761)=0.345125 ;TFRAC(2762)=0.34525 TFRAC(2763)=0.345375 ;TFRAC(2764)=0.3455 TFRAC(2765)=0.345625 ;TFRAC(2766)=0.34575 TFRAC(2767)=0.345875 ;TFRAC(2768)=0.346 TFRAC(2769)=0.346125 ;TFRAC(2770)=0.34625 TFRAC(2771)=0.346375 ;TFRAC(2772)=0.3465 TFRAC(2773)=0.346625 ;TFRAC(2774)=0.34675 TFRAC(2775)=0.346875 ;TFRAC(2776)=0.347 TFRAC(2777)=0.347125 ;TFRAC(2778)=0.34725 TFRAC(2779)=0.347375 ;TFRAC(2780)=0.3475 TFRAC(2781)=0.347625 ;TFRAC(2782)=0.34775 TFRAC(2783)=0.347875 ;TFRAC(2784)=0.348 TFRAC(2785)=0.348125 ;TFRAC(2786)=0.34825 TFRAC(2787)=0.348375 ;TFRAC(2788)=0.3485 TFRAC(2789)=0.348625 ;TFRAC(2790)=0.34875 TFRAC(2791)=0.348875 ;TFRAC(2792)=0.349 TFRAC(2793)=0.349125 ;TFRAC(2794)=0.34925 TFRAC(2795)=0.349375 ;TFRAC(2796)=0.3495 TFRAC(2797)=0.349625 ;TFRAC(2798)=0.34975 TFRAC(2799)=0.349875 ;TFRAC(2800)=0.35 TFRAC(2801)=0.350125 ;TFRAC(2802)=0.35025 TFRAC(2803)=0.350375 ;TFRAC(2804)=0.3505 TFRAC(2805)=0.350625 ;TFRAC(2806)=0.35075 TFRAC(2807)=0.350875 ;TFRAC(2808)=0.351 TFRAC(2809)=0.351125 ;TFRAC(2810)=0.35125 TFRAC(2811)=0.351375 ;TFRAC(2812)=0.3515 TFRAC(2813)=0.351625 ;TFRAC(2814)=0.35175 TFRAC(2815)=0.351875 ;TFRAC(2816)=0.352 TFRAC(2817)=0.352125 ;TFRAC(2818)=0.35225 TFRAC(2819)=0.352375 ;TFRAC(2820)=0.3525 TFRAC(2821)=0.352625 ;TFRAC(2822)=0.35275 TFRAC(2823)=0.352875 ;TFRAC(2824)=0.353 TFRAC(2825)=0.353125 ;TFRAC(2826)=0.35325 TFRAC(2827)=0.353375 ;TFRAC(2828)=0.3535 TFRAC(2829)=0.353625 ;TFRAC(2830)=0.35375 TFRAC(2831)=0.353875 ;TFRAC(2832)=0.354 TFRAC(2833)=0.354125 ;TFRAC(2834)=0.35425 TFRAC(2835)=0.354375 ;TFRAC(2836)=0.3545 TFRAC(2837)=0.354625 ;TFRAC(2838)=0.35475 TFRAC(2839)=0.354875 ;TFRAC(2840)=0.355 TFRAC(2841)=0.355125 ;TFRAC(2842)=0.35525 TFRAC(2843)=0.355375 ;TFRAC(2844)=0.3555 TFRAC(2845)=0.355625 ;TFRAC(2846)=0.35575 TFRAC(2847)=0.355875 ;TFRAC(2848)=0.356 TFRAC(2849)=0.356125 ;TFRAC(2850)=0.35625 TFRAC(2851)=0.356375 ;TFRAC(2852)=0.3565 TFRAC(2853)=0.356625 ;TFRAC(2854)=0.35675 TFRAC(2855)=0.356875 ;TFRAC(2856)=0.357 TFRAC(2857)=0.357125 ;TFRAC(2858)=0.35725 TFRAC(2859)=0.357375 ;TFRAC(2860)=0.3575 TFRAC(2861)=0.357625 ;TFRAC(2862)=0.35775 TFRAC(2863)=0.357875 ;TFRAC(2864)=0.358 TFRAC(2865)=0.358125 ;TFRAC(2866)=0.35825 TFRAC(2867)=0.358375 ;TFRAC(2868)=0.3585 TFRAC(2869)=0.358625 ;TFRAC(2870)=0.35875 TFRAC(2871)=0.358875 ;TFRAC(2872)=0.359 TFRAC(2873)=0.359125 ;TFRAC(2874)=0.35925 TFRAC(2875)=0.359375 ;TFRAC(2876)=0.3595 TFRAC(2877)=0.359625 ;TFRAC(2878)=0.35975 TFRAC(2879)=0.359875 ;TFRAC(2880)=0.36 TFRAC(2881)=0.360125 ;TFRAC(2882)=0.36025 TFRAC(2883)=0.360375 ;TFRAC(2884)=0.3605 TFRAC(2885)=0.360625 ;TFRAC(2886)=0.36075 TFRAC(2887)=0.360875 ;TFRAC(2888)=0.361 TFRAC(2889)=0.361125 ;TFRAC(2890)=0.36125 TFRAC(2891)=0.361375 ;TFRAC(2892)=0.3615 TFRAC(2893)=0.361625 ;TFRAC(2894)=0.36175 TFRAC(2895)=0.361875 ;TFRAC(2896)=0.362 TFRAC(2897)=0.362125 ;TFRAC(2898)=0.36225 TFRAC(2899)=0.362375 ;TFRAC(2900)=0.3625 TFRAC(2901)=0.362625 ;TFRAC(2902)=0.36275 TFRAC(2903)=0.362875 ;TFRAC(2904)=0.363 TFRAC(2905)=0.363125 ;TFRAC(2906)=0.36325 TFRAC(2907)=0.363375 ;TFRAC(2908)=0.3635 TFRAC(2909)=0.363625 ;TFRAC(2910)=0.36375 TFRAC(2911)=0.363875 ;TFRAC(2912)=0.364 TFRAC(2913)=0.364125 ;TFRAC(2914)=0.36425 TFRAC(2915)=0.364375 ;TFRAC(2916)=0.3645 TFRAC(2917)=0.364625 ;TFRAC(2918)=0.36475 TFRAC(2919)=0.364875 ;TFRAC(2920)=0.365 TFRAC(2921)=0.365125 ;TFRAC(2922)=0.36525 TFRAC(2923)=0.365375 ;TFRAC(2924)=0.3655 TFRAC(2925)=0.365625 ;TFRAC(2926)=0.36575 TFRAC(2927)=0.365875 ;TFRAC(2928)=0.366 TFRAC(2929)=0.366125 ;TFRAC(2930)=0.36625 TFRAC(2931)=0.366375 ;TFRAC(2932)=0.3665 TFRAC(2933)=0.366625 ;TFRAC(2934)=0.36675 TFRAC(2935)=0.366875 ;TFRAC(2936)=0.367 TFRAC(2937)=0.367125 ;TFRAC(2938)=0.36725 TFRAC(2939)=0.367375 ;TFRAC(2940)=0.3675 TFRAC(2941)=0.367625 ;TFRAC(2942)=0.36775 TFRAC(2943)=0.367875 ;TFRAC(2944)=0.368 TFRAC(2945)=0.368125 ;TFRAC(2946)=0.36825 TFRAC(2947)=0.368375 ;TFRAC(2948)=0.3685 TFRAC(2949)=0.368625 ;TFRAC(2950)=0.36875 TFRAC(2951)=0.368875 ;TFRAC(2952)=0.369 TFRAC(2953)=0.369125 ;TFRAC(2954)=0.36925 TFRAC(2955)=0.369375 ;TFRAC(2956)=0.3695 TFRAC(2957)=0.369625 ;TFRAC(2958)=0.36975 TFRAC(2959)=0.369875 ;TFRAC(2960)=0.37 TFRAC(2961)=0.370125 ;TFRAC(2962)=0.37025 TFRAC(2963)=0.370375 ;TFRAC(2964)=0.3705 TFRAC(2965)=0.370625 ;TFRAC(2966)=0.37075 TFRAC(2967)=0.370875 ;TFRAC(2968)=0.371 TFRAC(2969)=0.371125 ;TFRAC(2970)=0.37125 TFRAC(2971)=0.371375 ;TFRAC(2972)=0.3715 TFRAC(2973)=0.371625 ;TFRAC(2974)=0.37175 TFRAC(2975)=0.371875 ;TFRAC(2976)=0.372 TFRAC(2977)=0.372125 ;TFRAC(2978)=0.37225 TFRAC(2979)=0.372375 ;TFRAC(2980)=0.3725 TFRAC(2981)=0.372625 ;TFRAC(2982)=0.37275 TFRAC(2983)=0.372875 ;TFRAC(2984)=0.373 TFRAC(2985)=0.373125 ;TFRAC(2986)=0.37325 TFRAC(2987)=0.373375 ;TFRAC(2988)=0.3735 TFRAC(2989)=0.373625 ;TFRAC(2990)=0.37375 TFRAC(2991)=0.373875 ;TFRAC(2992)=0.374 TFRAC(2993)=0.374125 ;TFRAC(2994)=0.37425 TFRAC(2995)=0.374375 ;TFRAC(2996)=0.3745 TFRAC(2997)=0.374625 ;TFRAC(2998)=0.37475 TFRAC(2999)=0.374875 ;TFRAC(3000)=0.375 TFRAC(3001)=0.375125 ;TFRAC(3002)=0.37525 TFRAC(3003)=0.375375 ;TFRAC(3004)=0.3755 TFRAC(3005)=0.375625 ;TFRAC(3006)=0.37575 TFRAC(3007)=0.375875 ;TFRAC(3008)=0.376 TFRAC(3009)=0.376125 ;TFRAC(3010)=0.37625 TFRAC(3011)=0.376375 ;TFRAC(3012)=0.3765 TFRAC(3013)=0.376625 ;TFRAC(3014)=0.37675 TFRAC(3015)=0.376875 ;TFRAC(3016)=0.377 TFRAC(3017)=0.377125 ;TFRAC(3018)=0.37725 TFRAC(3019)=0.377375 ;TFRAC(3020)=0.3775 TFRAC(3021)=0.377625 ;TFRAC(3022)=0.37775 TFRAC(3023)=0.377875 ;TFRAC(3024)=0.378 TFRAC(3025)=0.378125 ;TFRAC(3026)=0.37825 TFRAC(3027)=0.378375 ;TFRAC(3028)=0.3785 TFRAC(3029)=0.378625 ;TFRAC(3030)=0.37875 TFRAC(3031)=0.378875 ;TFRAC(3032)=0.379 TFRAC(3033)=0.379125 ;TFRAC(3034)=0.37925 TFRAC(3035)=0.379375 ;TFRAC(3036)=0.3795 TFRAC(3037)=0.379625 ;TFRAC(3038)=0.37975 TFRAC(3039)=0.379875 ;TFRAC(3040)=0.38 TFRAC(3041)=0.380125 ;TFRAC(3042)=0.38025 TFRAC(3043)=0.380375 ;TFRAC(3044)=0.3805 TFRAC(3045)=0.380625 ;TFRAC(3046)=0.38075 TFRAC(3047)=0.380875 ;TFRAC(3048)=0.381 TFRAC(3049)=0.381125 ;TFRAC(3050)=0.38125 TFRAC(3051)=0.381375 ;TFRAC(3052)=0.3815 TFRAC(3053)=0.381625 ;TFRAC(3054)=0.38175 TFRAC(3055)=0.381875 ;TFRAC(3056)=0.382 TFRAC(3057)=0.382125 ;TFRAC(3058)=0.38225 TFRAC(3059)=0.382375 ;TFRAC(3060)=0.3825 TFRAC(3061)=0.382625 ;TFRAC(3062)=0.38275 TFRAC(3063)=0.382875 ;TFRAC(3064)=0.383 TFRAC(3065)=0.383125 ;TFRAC(3066)=0.38325 TFRAC(3067)=0.383375 ;TFRAC(3068)=0.3835 TFRAC(3069)=0.383625 ;TFRAC(3070)=0.38375 TFRAC(3071)=0.383875 ;TFRAC(3072)=0.384 TFRAC(3073)=0.384125 ;TFRAC(3074)=0.38425 TFRAC(3075)=0.384375 ;TFRAC(3076)=0.3845 TFRAC(3077)=0.384625 ;TFRAC(3078)=0.38475 TFRAC(3079)=0.384875 ;TFRAC(3080)=0.385 TFRAC(3081)=0.385125 ;TFRAC(3082)=0.38525 TFRAC(3083)=0.385375 ;TFRAC(3084)=0.3855 TFRAC(3085)=0.385625 ;TFRAC(3086)=0.38575 TFRAC(3087)=0.385875 ;TFRAC(3088)=0.386 TFRAC(3089)=0.386125 ;TFRAC(3090)=0.38625 TFRAC(3091)=0.386375 ;TFRAC(3092)=0.3865 TFRAC(3093)=0.386625 ;TFRAC(3094)=0.38675 TFRAC(3095)=0.386875 ;TFRAC(3096)=0.387 TFRAC(3097)=0.387125 ;TFRAC(3098)=0.38725 TFRAC(3099)=0.387375 ;TFRAC(3100)=0.3875 TFRAC(3101)=0.387625 ;TFRAC(3102)=0.38775 TFRAC(3103)=0.387875 ;TFRAC(3104)=0.388 TFRAC(3105)=0.388125 ;TFRAC(3106)=0.38825 TFRAC(3107)=0.388375 ;TFRAC(3108)=0.3885 TFRAC(3109)=0.388625 ;TFRAC(3110)=0.38875 TFRAC(3111)=0.388875 ;TFRAC(3112)=0.389 TFRAC(3113)=0.389125 ;TFRAC(3114)=0.38925 TFRAC(3115)=0.389375 ;TFRAC(3116)=0.3895 TFRAC(3117)=0.389625 ;TFRAC(3118)=0.38975 TFRAC(3119)=0.389875 ;TFRAC(3120)=0.39 TFRAC(3121)=0.390125 ;TFRAC(3122)=0.39025 TFRAC(3123)=0.390375 ;TFRAC(3124)=0.3905 TFRAC(3125)=0.390625 ;TFRAC(3126)=0.39075 TFRAC(3127)=0.390875 ;TFRAC(3128)=0.391 TFRAC(3129)=0.391125 ;TFRAC(3130)=0.39125 TFRAC(3131)=0.391375 ;TFRAC(3132)=0.3915 TFRAC(3133)=0.391625 ;TFRAC(3134)=0.39175 TFRAC(3135)=0.391875 ;TFRAC(3136)=0.392 TFRAC(3137)=0.392125 ;TFRAC(3138)=0.39225 TFRAC(3139)=0.392375 ;TFRAC(3140)=0.3925 TFRAC(3141)=0.392625 ;TFRAC(3142)=0.39275 TFRAC(3143)=0.392875 ;TFRAC(3144)=0.393 TFRAC(3145)=0.393125 ;TFRAC(3146)=0.39325 TFRAC(3147)=0.393375 ;TFRAC(3148)=0.3935 TFRAC(3149)=0.393625 ;TFRAC(3150)=0.39375 TFRAC(3151)=0.393875 ;TFRAC(3152)=0.394 TFRAC(3153)=0.394125 ;TFRAC(3154)=0.39425 TFRAC(3155)=0.394375 ;TFRAC(3156)=0.3945 TFRAC(3157)=0.394625 ;TFRAC(3158)=0.39475 TFRAC(3159)=0.394875 ;TFRAC(3160)=0.395 TFRAC(3161)=0.395125 ;TFRAC(3162)=0.39525 TFRAC(3163)=0.395375 ;TFRAC(3164)=0.3955 TFRAC(3165)=0.395625 ;TFRAC(3166)=0.39575 TFRAC(3167)=0.395875 ;TFRAC(3168)=0.396 TFRAC(3169)=0.396125 ;TFRAC(3170)=0.39625 TFRAC(3171)=0.396375 ;TFRAC(3172)=0.3965 TFRAC(3173)=0.396625 ;TFRAC(3174)=0.39675 TFRAC(3175)=0.396875 ;TFRAC(3176)=0.397 TFRAC(3177)=0.397125 ;TFRAC(3178)=0.39725 TFRAC(3179)=0.397375 ;TFRAC(3180)=0.3975 TFRAC(3181)=0.397625 ;TFRAC(3182)=0.39775 TFRAC(3183)=0.397875 ;TFRAC(3184)=0.398 TFRAC(3185)=0.398125 ;TFRAC(3186)=0.39825 TFRAC(3187)=0.398375 ;TFRAC(3188)=0.3985 TFRAC(3189)=0.398625 ;TFRAC(3190)=0.39875 TFRAC(3191)=0.398875 ;TFRAC(3192)=0.399 TFRAC(3193)=0.399125 ;TFRAC(3194)=0.39925 TFRAC(3195)=0.399375 ;TFRAC(3196)=0.3995 TFRAC(3197)=0.399625 ;TFRAC(3198)=0.39975 TFRAC(3199)=0.399875 ;TFRAC(3200)=0.4 TFRAC(3201)=0.400125 ;TFRAC(3202)=0.40025 TFRAC(3203)=0.400375 ;TFRAC(3204)=0.4005 TFRAC(3205)=0.400625 ;TFRAC(3206)=0.40075 TFRAC(3207)=0.400875 ;TFRAC(3208)=0.401 TFRAC(3209)=0.401125 ;TFRAC(3210)=0.40125 TFRAC(3211)=0.401375 ;TFRAC(3212)=0.4015 TFRAC(3213)=0.401625 ;TFRAC(3214)=0.40175 TFRAC(3215)=0.401875 ;TFRAC(3216)=0.402 TFRAC(3217)=0.402125 ;TFRAC(3218)=0.40225 TFRAC(3219)=0.402375 ;TFRAC(3220)=0.4025 TFRAC(3221)=0.402625 ;TFRAC(3222)=0.40275 TFRAC(3223)=0.402875 ;TFRAC(3224)=0.403 TFRAC(3225)=0.403125 ;TFRAC(3226)=0.40325 TFRAC(3227)=0.403375 ;TFRAC(3228)=0.4035 TFRAC(3229)=0.403625 ;TFRAC(3230)=0.40375 TFRAC(3231)=0.403875 ;TFRAC(3232)=0.404 TFRAC(3233)=0.404125 ;TFRAC(3234)=0.40425 TFRAC(3235)=0.404375 ;TFRAC(3236)=0.4045 TFRAC(3237)=0.404625 ;TFRAC(3238)=0.40475 TFRAC(3239)=0.404875 ;TFRAC(3240)=0.405 TFRAC(3241)=0.405125 ;TFRAC(3242)=0.40525 TFRAC(3243)=0.405375 ;TFRAC(3244)=0.4055 TFRAC(3245)=0.405625 ;TFRAC(3246)=0.40575 TFRAC(3247)=0.405875 ;TFRAC(3248)=0.406 TFRAC(3249)=0.406125 ;TFRAC(3250)=0.40625 TFRAC(3251)=0.406375 ;TFRAC(3252)=0.4065 TFRAC(3253)=0.406625 ;TFRAC(3254)=0.40675 TFRAC(3255)=0.406875 ;TFRAC(3256)=0.407 TFRAC(3257)=0.407125 ;TFRAC(3258)=0.40725 TFRAC(3259)=0.407375 ;TFRAC(3260)=0.4075 TFRAC(3261)=0.407625 ;TFRAC(3262)=0.40775 TFRAC(3263)=0.407875 ;TFRAC(3264)=0.408 TFRAC(3265)=0.408125 ;TFRAC(3266)=0.40825 TFRAC(3267)=0.408375 ;TFRAC(3268)=0.4085 TFRAC(3269)=0.408625 ;TFRAC(3270)=0.40875 TFRAC(3271)=0.408875 ;TFRAC(3272)=0.409 TFRAC(3273)=0.409125 ;TFRAC(3274)=0.40925 TFRAC(3275)=0.409375 ;TFRAC(3276)=0.4095 TFRAC(3277)=0.409625 ;TFRAC(3278)=0.40975 TFRAC(3279)=0.409875 ;TFRAC(3280)=0.41 TFRAC(3281)=0.410125 ;TFRAC(3282)=0.41025 TFRAC(3283)=0.410375 ;TFRAC(3284)=0.4105 TFRAC(3285)=0.410625 ;TFRAC(3286)=0.41075 TFRAC(3287)=0.410875 ;TFRAC(3288)=0.411 TFRAC(3289)=0.411125 ;TFRAC(3290)=0.41125 TFRAC(3291)=0.411375 ;TFRAC(3292)=0.4115 TFRAC(3293)=0.411625 ;TFRAC(3294)=0.41175 TFRAC(3295)=0.411875 ;TFRAC(3296)=0.412 TFRAC(3297)=0.412125 ;TFRAC(3298)=0.41225 TFRAC(3299)=0.412375 ;TFRAC(3300)=0.4125 TFRAC(3301)=0.412625 ;TFRAC(3302)=0.41275 TFRAC(3303)=0.412875 ;TFRAC(3304)=0.413 TFRAC(3305)=0.413125 ;TFRAC(3306)=0.41325 TFRAC(3307)=0.413375 ;TFRAC(3308)=0.4135 TFRAC(3309)=0.413625 ;TFRAC(3310)=0.41375 TFRAC(3311)=0.413875 ;TFRAC(3312)=0.414 TFRAC(3313)=0.414125 ;TFRAC(3314)=0.41425 TFRAC(3315)=0.414375 ;TFRAC(3316)=0.4145 TFRAC(3317)=0.414625 ;TFRAC(3318)=0.41475 TFRAC(3319)=0.414875 ;TFRAC(3320)=0.415 TFRAC(3321)=0.415125 ;TFRAC(3322)=0.41525 TFRAC(3323)=0.415375 ;TFRAC(3324)=0.4155 TFRAC(3325)=0.415625 ;TFRAC(3326)=0.41575 TFRAC(3327)=0.415875 ;TFRAC(3328)=0.416 TFRAC(3329)=0.416125 ;TFRAC(3330)=0.41625 TFRAC(3331)=0.416375 ;TFRAC(3332)=0.4165 TFRAC(3333)=0.416625 ;TFRAC(3334)=0.41675 TFRAC(3335)=0.416875 ;TFRAC(3336)=0.417 TFRAC(3337)=0.417125 ;TFRAC(3338)=0.41725 TFRAC(3339)=0.417375 ;TFRAC(3340)=0.4175 TFRAC(3341)=0.417625 ;TFRAC(3342)=0.41775 TFRAC(3343)=0.417875 ;TFRAC(3344)=0.418 TFRAC(3345)=0.418125 ;TFRAC(3346)=0.41825 TFRAC(3347)=0.418375 ;TFRAC(3348)=0.4185 TFRAC(3349)=0.418625 ;TFRAC(3350)=0.41875 TFRAC(3351)=0.418875 ;TFRAC(3352)=0.419 TFRAC(3353)=0.419125 ;TFRAC(3354)=0.41925 TFRAC(3355)=0.419375 ;TFRAC(3356)=0.4195 TFRAC(3357)=0.419625 ;TFRAC(3358)=0.41975 TFRAC(3359)=0.419875 ;TFRAC(3360)=0.42 TFRAC(3361)=0.420125 ;TFRAC(3362)=0.42025 TFRAC(3363)=0.420375 ;TFRAC(3364)=0.4205 TFRAC(3365)=0.420625 ;TFRAC(3366)=0.42075 TFRAC(3367)=0.420875 ;TFRAC(3368)=0.421 TFRAC(3369)=0.421125 ;TFRAC(3370)=0.42125 TFRAC(3371)=0.421375 ;TFRAC(3372)=0.4215 TFRAC(3373)=0.421625 ;TFRAC(3374)=0.42175 TFRAC(3375)=0.421875 ;TFRAC(3376)=0.422 TFRAC(3377)=0.422125 ;TFRAC(3378)=0.42225 TFRAC(3379)=0.422375 ;TFRAC(3380)=0.4225 TFRAC(3381)=0.422625 ;TFRAC(3382)=0.42275 TFRAC(3383)=0.422875 ;TFRAC(3384)=0.423 TFRAC(3385)=0.423125 ;TFRAC(3386)=0.42325 TFRAC(3387)=0.423375 ;TFRAC(3388)=0.4235 TFRAC(3389)=0.423625 ;TFRAC(3390)=0.42375 TFRAC(3391)=0.423875 ;TFRAC(3392)=0.424 TFRAC(3393)=0.424125 ;TFRAC(3394)=0.42425 TFRAC(3395)=0.424375 ;TFRAC(3396)=0.4245 TFRAC(3397)=0.424625 ;TFRAC(3398)=0.42475 TFRAC(3399)=0.424875 ;TFRAC(3400)=0.425 TFRAC(3401)=0.425125 ;TFRAC(3402)=0.42525 TFRAC(3403)=0.425375 ;TFRAC(3404)=0.4255 TFRAC(3405)=0.425625 ;TFRAC(3406)=0.42575 TFRAC(3407)=0.425875 ;TFRAC(3408)=0.426 TFRAC(3409)=0.426125 ;TFRAC(3410)=0.42625 TFRAC(3411)=0.426375 ;TFRAC(3412)=0.4265 TFRAC(3413)=0.426625 ;TFRAC(3414)=0.42675 TFRAC(3415)=0.426875 ;TFRAC(3416)=0.427 TFRAC(3417)=0.427125 ;TFRAC(3418)=0.42725 TFRAC(3419)=0.427375 ;TFRAC(3420)=0.4275 TFRAC(3421)=0.427625 ;TFRAC(3422)=0.42775 TFRAC(3423)=0.427875 ;TFRAC(3424)=0.428 TFRAC(3425)=0.428125 ;TFRAC(3426)=0.42825 TFRAC(3427)=0.428375 ;TFRAC(3428)=0.4285 TFRAC(3429)=0.428625 ;TFRAC(3430)=0.42875 TFRAC(3431)=0.428875 ;TFRAC(3432)=0.429 TFRAC(3433)=0.429125 ;TFRAC(3434)=0.42925 TFRAC(3435)=0.429375 ;TFRAC(3436)=0.4295 TFRAC(3437)=0.429625 ;TFRAC(3438)=0.42975 TFRAC(3439)=0.429875 ;TFRAC(3440)=0.43 TFRAC(3441)=0.430125 ;TFRAC(3442)=0.43025 TFRAC(3443)=0.430375 ;TFRAC(3444)=0.4305 TFRAC(3445)=0.430625 ;TFRAC(3446)=0.43075 TFRAC(3447)=0.430875 ;TFRAC(3448)=0.431 TFRAC(3449)=0.431125 ;TFRAC(3450)=0.43125 TFRAC(3451)=0.431375 ;TFRAC(3452)=0.4315 TFRAC(3453)=0.431625 ;TFRAC(3454)=0.43175 TFRAC(3455)=0.431875 ;TFRAC(3456)=0.432 TFRAC(3457)=0.432125 ;TFRAC(3458)=0.43225 TFRAC(3459)=0.432375 ;TFRAC(3460)=0.4325 TFRAC(3461)=0.432625 ;TFRAC(3462)=0.43275 TFRAC(3463)=0.432875 ;TFRAC(3464)=0.433 TFRAC(3465)=0.433125 ;TFRAC(3466)=0.43325 TFRAC(3467)=0.433375 ;TFRAC(3468)=0.4335 TFRAC(3469)=0.433625 ;TFRAC(3470)=0.43375 TFRAC(3471)=0.433875 ;TFRAC(3472)=0.434 TFRAC(3473)=0.434125 ;TFRAC(3474)=0.43425 TFRAC(3475)=0.434375 ;TFRAC(3476)=0.4345 TFRAC(3477)=0.434625 ;TFRAC(3478)=0.43475 TFRAC(3479)=0.434875 ;TFRAC(3480)=0.435 TFRAC(3481)=0.435125 ;TFRAC(3482)=0.43525 TFRAC(3483)=0.435375 ;TFRAC(3484)=0.4355 TFRAC(3485)=0.435625 ;TFRAC(3486)=0.43575 TFRAC(3487)=0.435875 ;TFRAC(3488)=0.436 TFRAC(3489)=0.436125 ;TFRAC(3490)=0.43625 TFRAC(3491)=0.436375 ;TFRAC(3492)=0.4365 TFRAC(3493)=0.436625 ;TFRAC(3494)=0.43675 TFRAC(3495)=0.436875 ;TFRAC(3496)=0.437 TFRAC(3497)=0.437125 ;TFRAC(3498)=0.43725 TFRAC(3499)=0.437375 ;TFRAC(3500)=0.4375 TFRAC(3501)=0.437625 ;TFRAC(3502)=0.43775 TFRAC(3503)=0.437875 ;TFRAC(3504)=0.438 TFRAC(3505)=0.438125 ;TFRAC(3506)=0.43825 TFRAC(3507)=0.438375 ;TFRAC(3508)=0.4385 TFRAC(3509)=0.438625 ;TFRAC(3510)=0.43875 TFRAC(3511)=0.438875 ;TFRAC(3512)=0.439 TFRAC(3513)=0.439125 ;TFRAC(3514)=0.43925 TFRAC(3515)=0.439375 ;TFRAC(3516)=0.4395 TFRAC(3517)=0.439625 ;TFRAC(3518)=0.43975 TFRAC(3519)=0.439875 ;TFRAC(3520)=0.44 TFRAC(3521)=0.440125 ;TFRAC(3522)=0.44025 TFRAC(3523)=0.440375 ;TFRAC(3524)=0.4405 TFRAC(3525)=0.440625 ;TFRAC(3526)=0.44075 TFRAC(3527)=0.440875 ;TFRAC(3528)=0.441 TFRAC(3529)=0.441125 ;TFRAC(3530)=0.44125 TFRAC(3531)=0.441375 ;TFRAC(3532)=0.4415 TFRAC(3533)=0.441625 ;TFRAC(3534)=0.44175 TFRAC(3535)=0.441875 ;TFRAC(3536)=0.442 TFRAC(3537)=0.442125 ;TFRAC(3538)=0.44225 TFRAC(3539)=0.442375 ;TFRAC(3540)=0.4425 TFRAC(3541)=0.442625 ;TFRAC(3542)=0.44275 TFRAC(3543)=0.442875 ;TFRAC(3544)=0.443 TFRAC(3545)=0.443125 ;TFRAC(3546)=0.44325 TFRAC(3547)=0.443375 ;TFRAC(3548)=0.4435 TFRAC(3549)=0.443625 ;TFRAC(3550)=0.44375 TFRAC(3551)=0.443875 ;TFRAC(3552)=0.444 TFRAC(3553)=0.444125 ;TFRAC(3554)=0.44425 TFRAC(3555)=0.444375 ;TFRAC(3556)=0.4445 TFRAC(3557)=0.444625 ;TFRAC(3558)=0.44475 TFRAC(3559)=0.444875 ;TFRAC(3560)=0.445 TFRAC(3561)=0.445125 ;TFRAC(3562)=0.44525 TFRAC(3563)=0.445375 ;TFRAC(3564)=0.4455 TFRAC(3565)=0.445625 ;TFRAC(3566)=0.44575 TFRAC(3567)=0.445875 ;TFRAC(3568)=0.446 TFRAC(3569)=0.446125 ;TFRAC(3570)=0.44625 TFRAC(3571)=0.446375 ;TFRAC(3572)=0.4465 TFRAC(3573)=0.446625 ;TFRAC(3574)=0.44675 TFRAC(3575)=0.446875 ;TFRAC(3576)=0.447 TFRAC(3577)=0.447125 ;TFRAC(3578)=0.44725 TFRAC(3579)=0.447375 ;TFRAC(3580)=0.4475 TFRAC(3581)=0.447625 ;TFRAC(3582)=0.44775 TFRAC(3583)=0.447875 ;TFRAC(3584)=0.448 TFRAC(3585)=0.448125 ;TFRAC(3586)=0.44825 TFRAC(3587)=0.448375 ;TFRAC(3588)=0.4485 TFRAC(3589)=0.448625 ;TFRAC(3590)=0.44875 TFRAC(3591)=0.448875 ;TFRAC(3592)=0.449 TFRAC(3593)=0.449125 ;TFRAC(3594)=0.44925 TFRAC(3595)=0.449375 ;TFRAC(3596)=0.4495 TFRAC(3597)=0.449625 ;TFRAC(3598)=0.44975 TFRAC(3599)=0.449875 ;TFRAC(3600)=0.45 TFRAC(3601)=0.450125 ;TFRAC(3602)=0.45025 TFRAC(3603)=0.450375 ;TFRAC(3604)=0.4505 TFRAC(3605)=0.450625 ;TFRAC(3606)=0.45075 TFRAC(3607)=0.450875 ;TFRAC(3608)=0.451 TFRAC(3609)=0.451125 ;TFRAC(3610)=0.45125 TFRAC(3611)=0.451375 ;TFRAC(3612)=0.4515 TFRAC(3613)=0.451625 ;TFRAC(3614)=0.45175 TFRAC(3615)=0.451875 ;TFRAC(3616)=0.452 TFRAC(3617)=0.452125 ;TFRAC(3618)=0.45225 TFRAC(3619)=0.452375 ;TFRAC(3620)=0.4525 TFRAC(3621)=0.452625 ;TFRAC(3622)=0.45275 TFRAC(3623)=0.452875 ;TFRAC(3624)=0.453 TFRAC(3625)=0.453125 ;TFRAC(3626)=0.45325 TFRAC(3627)=0.453375 ;TFRAC(3628)=0.4535 TFRAC(3629)=0.453625 ;TFRAC(3630)=0.45375 TFRAC(3631)=0.453875 ;TFRAC(3632)=0.454 TFRAC(3633)=0.454125 ;TFRAC(3634)=0.45425 TFRAC(3635)=0.454375 ;TFRAC(3636)=0.4545 TFRAC(3637)=0.454625 ;TFRAC(3638)=0.45475 TFRAC(3639)=0.454875 ;TFRAC(3640)=0.455 TFRAC(3641)=0.455125 ;TFRAC(3642)=0.45525 TFRAC(3643)=0.455375 ;TFRAC(3644)=0.4555 TFRAC(3645)=0.455625 ;TFRAC(3646)=0.45575 TFRAC(3647)=0.455875 ;TFRAC(3648)=0.456 TFRAC(3649)=0.456125 ;TFRAC(3650)=0.45625 TFRAC(3651)=0.456375 ;TFRAC(3652)=0.4565 TFRAC(3653)=0.456625 ;TFRAC(3654)=0.45675 TFRAC(3655)=0.456875 ;TFRAC(3656)=0.457 TFRAC(3657)=0.457125 ;TFRAC(3658)=0.45725 TFRAC(3659)=0.457375 ;TFRAC(3660)=0.4575 TFRAC(3661)=0.457625 ;TFRAC(3662)=0.45775 TFRAC(3663)=0.457875 ;TFRAC(3664)=0.458 TFRAC(3665)=0.458125 ;TFRAC(3666)=0.45825 TFRAC(3667)=0.458375 ;TFRAC(3668)=0.4585 TFRAC(3669)=0.458625 ;TFRAC(3670)=0.45875 TFRAC(3671)=0.458875 ;TFRAC(3672)=0.459 TFRAC(3673)=0.459125 ;TFRAC(3674)=0.45925 TFRAC(3675)=0.459375 ;TFRAC(3676)=0.4595 TFRAC(3677)=0.459625 ;TFRAC(3678)=0.45975 TFRAC(3679)=0.459875 ;TFRAC(3680)=0.46 TFRAC(3681)=0.460125 ;TFRAC(3682)=0.46025 TFRAC(3683)=0.460375 ;TFRAC(3684)=0.4605 TFRAC(3685)=0.460625 ;TFRAC(3686)=0.46075 TFRAC(3687)=0.460875 ;TFRAC(3688)=0.461 TFRAC(3689)=0.461125 ;TFRAC(3690)=0.46125 TFRAC(3691)=0.461375 ;TFRAC(3692)=0.4615 TFRAC(3693)=0.461625 ;TFRAC(3694)=0.46175 TFRAC(3695)=0.461875 ;TFRAC(3696)=0.462 TFRAC(3697)=0.462125 ;TFRAC(3698)=0.46225 TFRAC(3699)=0.462375 ;TFRAC(3700)=0.4625 TFRAC(3701)=0.462625 ;TFRAC(3702)=0.46275 TFRAC(3703)=0.462875 ;TFRAC(3704)=0.463 TFRAC(3705)=0.463125 ;TFRAC(3706)=0.46325 TFRAC(3707)=0.463375 ;TFRAC(3708)=0.4635 TFRAC(3709)=0.463625 ;TFRAC(3710)=0.46375 TFRAC(3711)=0.463875 ;TFRAC(3712)=0.464 TFRAC(3713)=0.464125 ;TFRAC(3714)=0.46425 TFRAC(3715)=0.464375 ;TFRAC(3716)=0.4645 TFRAC(3717)=0.464625 ;TFRAC(3718)=0.46475 TFRAC(3719)=0.464875 ;TFRAC(3720)=0.465 TFRAC(3721)=0.465125 ;TFRAC(3722)=0.46525 TFRAC(3723)=0.465375 ;TFRAC(3724)=0.4655 TFRAC(3725)=0.465625 ;TFRAC(3726)=0.46575 TFRAC(3727)=0.465875 ;TFRAC(3728)=0.466 TFRAC(3729)=0.466125 ;TFRAC(3730)=0.46625 TFRAC(3731)=0.466375 ;TFRAC(3732)=0.4665 TFRAC(3733)=0.466625 ;TFRAC(3734)=0.46675 TFRAC(3735)=0.466875 ;TFRAC(3736)=0.467 TFRAC(3737)=0.467125 ;TFRAC(3738)=0.46725 TFRAC(3739)=0.467375 ;TFRAC(3740)=0.4675 TFRAC(3741)=0.467625 ;TFRAC(3742)=0.46775 TFRAC(3743)=0.467875 ;TFRAC(3744)=0.468 TFRAC(3745)=0.468125 ;TFRAC(3746)=0.46825 TFRAC(3747)=0.468375 ;TFRAC(3748)=0.4685 TFRAC(3749)=0.468625 ;TFRAC(3750)=0.46875 TFRAC(3751)=0.468875 ;TFRAC(3752)=0.469 TFRAC(3753)=0.469125 ;TFRAC(3754)=0.46925 TFRAC(3755)=0.469375 ;TFRAC(3756)=0.4695 TFRAC(3757)=0.469625 ;TFRAC(3758)=0.46975 TFRAC(3759)=0.469875 ;TFRAC(3760)=0.47 TFRAC(3761)=0.470125 ;TFRAC(3762)=0.47025 TFRAC(3763)=0.470375 ;TFRAC(3764)=0.4705 TFRAC(3765)=0.470625 ;TFRAC(3766)=0.47075 TFRAC(3767)=0.470875 ;TFRAC(3768)=0.471 TFRAC(3769)=0.471125 ;TFRAC(3770)=0.47125 TFRAC(3771)=0.471375 ;TFRAC(3772)=0.4715 TFRAC(3773)=0.471625 ;TFRAC(3774)=0.47175 TFRAC(3775)=0.471875 ;TFRAC(3776)=0.472 TFRAC(3777)=0.472125 ;TFRAC(3778)=0.47225 TFRAC(3779)=0.472375 ;TFRAC(3780)=0.4725 TFRAC(3781)=0.472625 ;TFRAC(3782)=0.47275 TFRAC(3783)=0.472875 ;TFRAC(3784)=0.473 TFRAC(3785)=0.473125 ;TFRAC(3786)=0.47325 TFRAC(3787)=0.473375 ;TFRAC(3788)=0.4735 TFRAC(3789)=0.473625 ;TFRAC(3790)=0.47375 TFRAC(3791)=0.473875 ;TFRAC(3792)=0.474 TFRAC(3793)=0.474125 ;TFRAC(3794)=0.47425 TFRAC(3795)=0.474375 ;TFRAC(3796)=0.4745 TFRAC(3797)=0.474625 ;TFRAC(3798)=0.47475 TFRAC(3799)=0.474875 ;TFRAC(3800)=0.475 TFRAC(3801)=0.475125 ;TFRAC(3802)=0.47525 TFRAC(3803)=0.475375 ;TFRAC(3804)=0.4755 TFRAC(3805)=0.475625 ;TFRAC(3806)=0.47575 TFRAC(3807)=0.475875 ;TFRAC(3808)=0.476 TFRAC(3809)=0.476125 ;TFRAC(3810)=0.47625 TFRAC(3811)=0.476375 ;TFRAC(3812)=0.4765 TFRAC(3813)=0.476625 ;TFRAC(3814)=0.47675 TFRAC(3815)=0.476875 ;TFRAC(3816)=0.477 TFRAC(3817)=0.477125 ;TFRAC(3818)=0.47725 TFRAC(3819)=0.477375 ;TFRAC(3820)=0.4775 TFRAC(3821)=0.477625 ;TFRAC(3822)=0.47775 TFRAC(3823)=0.477875 ;TFRAC(3824)=0.478 TFRAC(3825)=0.478125 ;TFRAC(3826)=0.47825 TFRAC(3827)=0.478375 ;TFRAC(3828)=0.4785 TFRAC(3829)=0.478625 ;TFRAC(3830)=0.47875 TFRAC(3831)=0.478875 ;TFRAC(3832)=0.479 TFRAC(3833)=0.479125 ;TFRAC(3834)=0.47925 TFRAC(3835)=0.479375 ;TFRAC(3836)=0.4795 TFRAC(3837)=0.479625 ;TFRAC(3838)=0.47975 TFRAC(3839)=0.479875 ;TFRAC(3840)=0.48 TFRAC(3841)=0.480125 ;TFRAC(3842)=0.48025 TFRAC(3843)=0.480375 ;TFRAC(3844)=0.4805 TFRAC(3845)=0.480625 ;TFRAC(3846)=0.48075 TFRAC(3847)=0.480875 ;TFRAC(3848)=0.481 TFRAC(3849)=0.481125 ;TFRAC(3850)=0.48125 TFRAC(3851)=0.481375 ;TFRAC(3852)=0.4815 TFRAC(3853)=0.481625 ;TFRAC(3854)=0.48175 TFRAC(3855)=0.481875 ;TFRAC(3856)=0.482 TFRAC(3857)=0.482125 ;TFRAC(3858)=0.48225 TFRAC(3859)=0.482375 ;TFRAC(3860)=0.4825 TFRAC(3861)=0.482625 ;TFRAC(3862)=0.48275 TFRAC(3863)=0.482875 ;TFRAC(3864)=0.483 TFRAC(3865)=0.483125 ;TFRAC(3866)=0.48325 TFRAC(3867)=0.483375 ;TFRAC(3868)=0.4835 TFRAC(3869)=0.483625 ;TFRAC(3870)=0.48375 TFRAC(3871)=0.483875 ;TFRAC(3872)=0.484 TFRAC(3873)=0.484125 ;TFRAC(3874)=0.48425 TFRAC(3875)=0.484375 ;TFRAC(3876)=0.4845 TFRAC(3877)=0.484625 ;TFRAC(3878)=0.48475 TFRAC(3879)=0.484875 ;TFRAC(3880)=0.485 TFRAC(3881)=0.485125 ;TFRAC(3882)=0.48525 TFRAC(3883)=0.485375 ;TFRAC(3884)=0.4855 TFRAC(3885)=0.485625 ;TFRAC(3886)=0.48575 TFRAC(3887)=0.485875 ;TFRAC(3888)=0.486 TFRAC(3889)=0.486125 ;TFRAC(3890)=0.48625 TFRAC(3891)=0.486375 ;TFRAC(3892)=0.4865 TFRAC(3893)=0.486625 ;TFRAC(3894)=0.48675 TFRAC(3895)=0.486875 ;TFRAC(3896)=0.487 TFRAC(3897)=0.487125 ;TFRAC(3898)=0.48725 TFRAC(3899)=0.487375 ;TFRAC(3900)=0.4875 TFRAC(3901)=0.487625 ;TFRAC(3902)=0.48775 TFRAC(3903)=0.487875 ;TFRAC(3904)=0.488 TFRAC(3905)=0.488125 ;TFRAC(3906)=0.48825 TFRAC(3907)=0.488375 ;TFRAC(3908)=0.4885 TFRAC(3909)=0.488625 ;TFRAC(3910)=0.48875 TFRAC(3911)=0.488875 ;TFRAC(3912)=0.489 TFRAC(3913)=0.489125 ;TFRAC(3914)=0.48925 TFRAC(3915)=0.489375 ;TFRAC(3916)=0.4895 TFRAC(3917)=0.489625 ;TFRAC(3918)=0.48975 TFRAC(3919)=0.489875 ;TFRAC(3920)=0.49 TFRAC(3921)=0.490125 ;TFRAC(3922)=0.49025 TFRAC(3923)=0.490375 ;TFRAC(3924)=0.4905 TFRAC(3925)=0.490625 ;TFRAC(3926)=0.49075 TFRAC(3927)=0.490875 ;TFRAC(3928)=0.491 TFRAC(3929)=0.491125 ;TFRAC(3930)=0.49125 TFRAC(3931)=0.491375 ;TFRAC(3932)=0.4915 TFRAC(3933)=0.491625 ;TFRAC(3934)=0.49175 TFRAC(3935)=0.491875 ;TFRAC(3936)=0.492 TFRAC(3937)=0.492125 ;TFRAC(3938)=0.49225 TFRAC(3939)=0.492375 ;TFRAC(3940)=0.4925 TFRAC(3941)=0.492625 ;TFRAC(3942)=0.49275 TFRAC(3943)=0.492875 ;TFRAC(3944)=0.493 TFRAC(3945)=0.493125 ;TFRAC(3946)=0.49325 TFRAC(3947)=0.493375 ;TFRAC(3948)=0.4935 TFRAC(3949)=0.493625 ;TFRAC(3950)=0.49375 TFRAC(3951)=0.493875 ;TFRAC(3952)=0.494 TFRAC(3953)=0.494125 ;TFRAC(3954)=0.49425 TFRAC(3955)=0.494375 ;TFRAC(3956)=0.4945 TFRAC(3957)=0.494625 ;TFRAC(3958)=0.49475 TFRAC(3959)=0.494875 ;TFRAC(3960)=0.495 TFRAC(3961)=0.495125 ;TFRAC(3962)=0.49525 TFRAC(3963)=0.495375 ;TFRAC(3964)=0.4955 TFRAC(3965)=0.495625 ;TFRAC(3966)=0.49575 TFRAC(3967)=0.495875 ;TFRAC(3968)=0.496 TFRAC(3969)=0.496125 ;TFRAC(3970)=0.49625 TFRAC(3971)=0.496375 ;TFRAC(3972)=0.4965 TFRAC(3973)=0.496625 ;TFRAC(3974)=0.49675 TFRAC(3975)=0.496875 ;TFRAC(3976)=0.497 TFRAC(3977)=0.497125 ;TFRAC(3978)=0.49725 TFRAC(3979)=0.497375 ;TFRAC(3980)=0.4975 TFRAC(3981)=0.497625 ;TFRAC(3982)=0.49775 TFRAC(3983)=0.497875 ;TFRAC(3984)=0.498 TFRAC(3985)=0.498125 ;TFRAC(3986)=0.49825 TFRAC(3987)=0.498375 ;TFRAC(3988)=0.4985 TFRAC(3989)=0.498625 ;TFRAC(3990)=0.49875 TFRAC(3991)=0.498875 ;TFRAC(3992)=0.499 TFRAC(3993)=0.499125 ;TFRAC(3994)=0.49925 TFRAC(3995)=0.499375 ;TFRAC(3996)=0.4995 TFRAC(3997)=0.499625 ;TFRAC(3998)=0.49975 TFRAC(3999)=0.499875 ;TFRAC(4000)=0.5 TFRAC(4001)=0.500125 ;TFRAC(4002)=0.50025 TFRAC(4003)=0.500375 ;TFRAC(4004)=0.5005 TFRAC(4005)=0.500625 ;TFRAC(4006)=0.50075 TFRAC(4007)=0.500875 ;TFRAC(4008)=0.501 TFRAC(4009)=0.501125 ;TFRAC(4010)=0.50125 TFRAC(4011)=0.501375 ;TFRAC(4012)=0.5015 TFRAC(4013)=0.501625 ;TFRAC(4014)=0.50175 TFRAC(4015)=0.501875 ;TFRAC(4016)=0.502 TFRAC(4017)=0.502125 ;TFRAC(4018)=0.50225 TFRAC(4019)=0.502375 ;TFRAC(4020)=0.5025 TFRAC(4021)=0.502625 ;TFRAC(4022)=0.50275 TFRAC(4023)=0.502875 ;TFRAC(4024)=0.503 TFRAC(4025)=0.503125 ;TFRAC(4026)=0.50325 TFRAC(4027)=0.503375 ;TFRAC(4028)=0.5035 TFRAC(4029)=0.503625 ;TFRAC(4030)=0.50375 TFRAC(4031)=0.503875 ;TFRAC(4032)=0.504 TFRAC(4033)=0.504125 ;TFRAC(4034)=0.50425 TFRAC(4035)=0.504375 ;TFRAC(4036)=0.5045 TFRAC(4037)=0.504625 ;TFRAC(4038)=0.50475 TFRAC(4039)=0.504875 ;TFRAC(4040)=0.505 TFRAC(4041)=0.505125 ;TFRAC(4042)=0.50525 TFRAC(4043)=0.505375 ;TFRAC(4044)=0.5055 TFRAC(4045)=0.505625 ;TFRAC(4046)=0.50575 TFRAC(4047)=0.505875 ;TFRAC(4048)=0.506 TFRAC(4049)=0.506125 ;TFRAC(4050)=0.50625 TFRAC(4051)=0.506375 ;TFRAC(4052)=0.5065 TFRAC(4053)=0.506625 ;TFRAC(4054)=0.50675 TFRAC(4055)=0.506875 ;TFRAC(4056)=0.507 TFRAC(4057)=0.507125 ;TFRAC(4058)=0.50725 TFRAC(4059)=0.507375 ;TFRAC(4060)=0.5075 TFRAC(4061)=0.507625 ;TFRAC(4062)=0.50775 TFRAC(4063)=0.507875 ;TFRAC(4064)=0.508 TFRAC(4065)=0.508125 ;TFRAC(4066)=0.50825 TFRAC(4067)=0.508375 ;TFRAC(4068)=0.5085 TFRAC(4069)=0.508625 ;TFRAC(4070)=0.50875 TFRAC(4071)=0.508875 ;TFRAC(4072)=0.509 TFRAC(4073)=0.509125 ;TFRAC(4074)=0.50925 TFRAC(4075)=0.509375 ;TFRAC(4076)=0.5095 TFRAC(4077)=0.509625 ;TFRAC(4078)=0.50975 TFRAC(4079)=0.509875 ;TFRAC(4080)=0.51 TFRAC(4081)=0.510125 ;TFRAC(4082)=0.51025 TFRAC(4083)=0.510375 ;TFRAC(4084)=0.5105 TFRAC(4085)=0.510625 ;TFRAC(4086)=0.51075 TFRAC(4087)=0.510875 ;TFRAC(4088)=0.511 TFRAC(4089)=0.511125 ;TFRAC(4090)=0.51125 TFRAC(4091)=0.511375 ;TFRAC(4092)=0.5115 TFRAC(4093)=0.511625 ;TFRAC(4094)=0.51175 TFRAC(4095)=0.511875 ;TFRAC(4096)=0.512 TFRAC(4097)=0.512125 ;TFRAC(4098)=0.51225 TFRAC(4099)=0.512375 ;TFRAC(4100)=0.5125 TFRAC(4101)=0.512625 ;TFRAC(4102)=0.51275 TFRAC(4103)=0.512875 ;TFRAC(4104)=0.513 TFRAC(4105)=0.513125 ;TFRAC(4106)=0.51325 TFRAC(4107)=0.513375 ;TFRAC(4108)=0.5135 TFRAC(4109)=0.513625 ;TFRAC(4110)=0.51375 TFRAC(4111)=0.513875 ;TFRAC(4112)=0.514 TFRAC(4113)=0.514125 ;TFRAC(4114)=0.51425 TFRAC(4115)=0.514375 ;TFRAC(4116)=0.5145 TFRAC(4117)=0.514625 ;TFRAC(4118)=0.51475 TFRAC(4119)=0.514875 ;TFRAC(4120)=0.515 TFRAC(4121)=0.515125 ;TFRAC(4122)=0.51525 TFRAC(4123)=0.515375 ;TFRAC(4124)=0.5155 TFRAC(4125)=0.515625 ;TFRAC(4126)=0.51575 TFRAC(4127)=0.515875 ;TFRAC(4128)=0.516 TFRAC(4129)=0.516125 ;TFRAC(4130)=0.51625 TFRAC(4131)=0.516375 ;TFRAC(4132)=0.5165 TFRAC(4133)=0.516625 ;TFRAC(4134)=0.51675 TFRAC(4135)=0.516875 ;TFRAC(4136)=0.517 TFRAC(4137)=0.517125 ;TFRAC(4138)=0.51725 TFRAC(4139)=0.517375 ;TFRAC(4140)=0.5175 TFRAC(4141)=0.517625 ;TFRAC(4142)=0.51775 TFRAC(4143)=0.517875 ;TFRAC(4144)=0.518 TFRAC(4145)=0.518125 ;TFRAC(4146)=0.51825 TFRAC(4147)=0.518375 ;TFRAC(4148)=0.5185 TFRAC(4149)=0.518625 ;TFRAC(4150)=0.51875 TFRAC(4151)=0.518875 ;TFRAC(4152)=0.519 TFRAC(4153)=0.519125 ;TFRAC(4154)=0.51925 TFRAC(4155)=0.519375 ;TFRAC(4156)=0.5195 TFRAC(4157)=0.519625 ;TFRAC(4158)=0.51975 TFRAC(4159)=0.519875 ;TFRAC(4160)=0.52 TFRAC(4161)=0.520125 ;TFRAC(4162)=0.52025 TFRAC(4163)=0.520375 ;TFRAC(4164)=0.5205 TFRAC(4165)=0.520625 ;TFRAC(4166)=0.52075 TFRAC(4167)=0.520875 ;TFRAC(4168)=0.521 TFRAC(4169)=0.521125 ;TFRAC(4170)=0.52125 TFRAC(4171)=0.521375 ;TFRAC(4172)=0.5215 TFRAC(4173)=0.521625 ;TFRAC(4174)=0.52175 TFRAC(4175)=0.521875 ;TFRAC(4176)=0.522 TFRAC(4177)=0.522125 ;TFRAC(4178)=0.52225 TFRAC(4179)=0.522375 ;TFRAC(4180)=0.5225 TFRAC(4181)=0.522625 ;TFRAC(4182)=0.52275 TFRAC(4183)=0.522875 ;TFRAC(4184)=0.523 TFRAC(4185)=0.523125 ;TFRAC(4186)=0.52325 TFRAC(4187)=0.523375 ;TFRAC(4188)=0.5235 TFRAC(4189)=0.523625 ;TFRAC(4190)=0.52375 TFRAC(4191)=0.523875 ;TFRAC(4192)=0.524 TFRAC(4193)=0.524125 ;TFRAC(4194)=0.52425 TFRAC(4195)=0.524375 ;TFRAC(4196)=0.5245 TFRAC(4197)=0.524625 ;TFRAC(4198)=0.52475 TFRAC(4199)=0.524875 ;TFRAC(4200)=0.525 TFRAC(4201)=0.525125 ;TFRAC(4202)=0.52525 TFRAC(4203)=0.525375 ;TFRAC(4204)=0.5255 TFRAC(4205)=0.525625 ;TFRAC(4206)=0.52575 TFRAC(4207)=0.525875 ;TFRAC(4208)=0.526 TFRAC(4209)=0.526125 ;TFRAC(4210)=0.52625 TFRAC(4211)=0.526375 ;TFRAC(4212)=0.5265 TFRAC(4213)=0.526625 ;TFRAC(4214)=0.52675 TFRAC(4215)=0.526875 ;TFRAC(4216)=0.527 TFRAC(4217)=0.527125 ;TFRAC(4218)=0.52725 TFRAC(4219)=0.527375 ;TFRAC(4220)=0.5275 TFRAC(4221)=0.527625 ;TFRAC(4222)=0.52775 TFRAC(4223)=0.527875 ;TFRAC(4224)=0.528 TFRAC(4225)=0.528125 ;TFRAC(4226)=0.52825 TFRAC(4227)=0.528375 ;TFRAC(4228)=0.5285 TFRAC(4229)=0.528625 ;TFRAC(4230)=0.52875 TFRAC(4231)=0.528875 ;TFRAC(4232)=0.529 TFRAC(4233)=0.529125 ;TFRAC(4234)=0.52925 TFRAC(4235)=0.529375 ;TFRAC(4236)=0.5295 TFRAC(4237)=0.529625 ;TFRAC(4238)=0.52975 TFRAC(4239)=0.529875 ;TFRAC(4240)=0.53 TFRAC(4241)=0.530125 ;TFRAC(4242)=0.53025 TFRAC(4243)=0.530375 ;TFRAC(4244)=0.5305 TFRAC(4245)=0.530625 ;TFRAC(4246)=0.53075 TFRAC(4247)=0.530875 ;TFRAC(4248)=0.531 TFRAC(4249)=0.531125 ;TFRAC(4250)=0.53125 TFRAC(4251)=0.531375 ;TFRAC(4252)=0.5315 TFRAC(4253)=0.531625 ;TFRAC(4254)=0.53175 TFRAC(4255)=0.531875 ;TFRAC(4256)=0.532 TFRAC(4257)=0.532125 ;TFRAC(4258)=0.53225 TFRAC(4259)=0.532375 ;TFRAC(4260)=0.5325 TFRAC(4261)=0.532625 ;TFRAC(4262)=0.53275 TFRAC(4263)=0.532875 ;TFRAC(4264)=0.533 TFRAC(4265)=0.533125 ;TFRAC(4266)=0.53325 TFRAC(4267)=0.533375 ;TFRAC(4268)=0.5335 TFRAC(4269)=0.533625 ;TFRAC(4270)=0.53375 TFRAC(4271)=0.533875 ;TFRAC(4272)=0.534 TFRAC(4273)=0.534125 ;TFRAC(4274)=0.53425 TFRAC(4275)=0.534375 ;TFRAC(4276)=0.5345 TFRAC(4277)=0.534625 ;TFRAC(4278)=0.53475 TFRAC(4279)=0.534875 ;TFRAC(4280)=0.535 TFRAC(4281)=0.535125 ;TFRAC(4282)=0.53525 TFRAC(4283)=0.535375 ;TFRAC(4284)=0.5355 TFRAC(4285)=0.535625 ;TFRAC(4286)=0.53575 TFRAC(4287)=0.535875 ;TFRAC(4288)=0.536 TFRAC(4289)=0.536125 ;TFRAC(4290)=0.53625 TFRAC(4291)=0.536375 ;TFRAC(4292)=0.5365 TFRAC(4293)=0.536625 ;TFRAC(4294)=0.53675 TFRAC(4295)=0.536875 ;TFRAC(4296)=0.537 TFRAC(4297)=0.537125 ;TFRAC(4298)=0.53725 TFRAC(4299)=0.537375 ;TFRAC(4300)=0.5375 TFRAC(4301)=0.537625 ;TFRAC(4302)=0.53775 TFRAC(4303)=0.537875 ;TFRAC(4304)=0.538 TFRAC(4305)=0.538125 ;TFRAC(4306)=0.53825 TFRAC(4307)=0.538375 ;TFRAC(4308)=0.5385 TFRAC(4309)=0.538625 ;TFRAC(4310)=0.53875 TFRAC(4311)=0.538875 ;TFRAC(4312)=0.539 TFRAC(4313)=0.539125 ;TFRAC(4314)=0.53925 TFRAC(4315)=0.539375 ;TFRAC(4316)=0.5395 TFRAC(4317)=0.539625 ;TFRAC(4318)=0.53975 TFRAC(4319)=0.539875 ;TFRAC(4320)=0.54 TFRAC(4321)=0.540125 ;TFRAC(4322)=0.54025 TFRAC(4323)=0.540375 ;TFRAC(4324)=0.5405 TFRAC(4325)=0.540625 ;TFRAC(4326)=0.54075 TFRAC(4327)=0.540875 ;TFRAC(4328)=0.541 TFRAC(4329)=0.541125 ;TFRAC(4330)=0.54125 TFRAC(4331)=0.541375 ;TFRAC(4332)=0.5415 TFRAC(4333)=0.541625 ;TFRAC(4334)=0.54175 TFRAC(4335)=0.541875 ;TFRAC(4336)=0.542 TFRAC(4337)=0.542125 ;TFRAC(4338)=0.54225 TFRAC(4339)=0.542375 ;TFRAC(4340)=0.5425 TFRAC(4341)=0.542625 ;TFRAC(4342)=0.54275 TFRAC(4343)=0.542875 ;TFRAC(4344)=0.543 TFRAC(4345)=0.543125 ;TFRAC(4346)=0.54325 TFRAC(4347)=0.543375 ;TFRAC(4348)=0.5435 TFRAC(4349)=0.543625 ;TFRAC(4350)=0.54375 TFRAC(4351)=0.543875 ;TFRAC(4352)=0.544 TFRAC(4353)=0.544125 ;TFRAC(4354)=0.54425 TFRAC(4355)=0.544375 ;TFRAC(4356)=0.5445 TFRAC(4357)=0.544625 ;TFRAC(4358)=0.54475 TFRAC(4359)=0.544875 ;TFRAC(4360)=0.545 TFRAC(4361)=0.545125 ;TFRAC(4362)=0.54525 TFRAC(4363)=0.545375 ;TFRAC(4364)=0.5455 TFRAC(4365)=0.545625 ;TFRAC(4366)=0.54575 TFRAC(4367)=0.545875 ;TFRAC(4368)=0.546 TFRAC(4369)=0.546125 ;TFRAC(4370)=0.54625 TFRAC(4371)=0.546375 ;TFRAC(4372)=0.5465 TFRAC(4373)=0.546625 ;TFRAC(4374)=0.54675 TFRAC(4375)=0.546875 ;TFRAC(4376)=0.547 TFRAC(4377)=0.547125 ;TFRAC(4378)=0.54725 TFRAC(4379)=0.547375 ;TFRAC(4380)=0.5475 TFRAC(4381)=0.547625 ;TFRAC(4382)=0.54775 TFRAC(4383)=0.547875 ;TFRAC(4384)=0.548 TFRAC(4385)=0.548125 ;TFRAC(4386)=0.54825 TFRAC(4387)=0.548375 ;TFRAC(4388)=0.5485 TFRAC(4389)=0.548625 ;TFRAC(4390)=0.54875 TFRAC(4391)=0.548875 ;TFRAC(4392)=0.549 TFRAC(4393)=0.549125 ;TFRAC(4394)=0.54925 TFRAC(4395)=0.549375 ;TFRAC(4396)=0.5495 TFRAC(4397)=0.549625 ;TFRAC(4398)=0.54975 TFRAC(4399)=0.549875 ;TFRAC(4400)=0.55 TFRAC(4401)=0.550125 ;TFRAC(4402)=0.55025 TFRAC(4403)=0.550375 ;TFRAC(4404)=0.5505 TFRAC(4405)=0.550625 ;TFRAC(4406)=0.55075 TFRAC(4407)=0.550875 ;TFRAC(4408)=0.551 TFRAC(4409)=0.551125 ;TFRAC(4410)=0.55125 TFRAC(4411)=0.551375 ;TFRAC(4412)=0.5515 TFRAC(4413)=0.551625 ;TFRAC(4414)=0.55175 TFRAC(4415)=0.551875 ;TFRAC(4416)=0.552 TFRAC(4417)=0.552125 ;TFRAC(4418)=0.55225 TFRAC(4419)=0.552375 ;TFRAC(4420)=0.5525 TFRAC(4421)=0.552625 ;TFRAC(4422)=0.55275 TFRAC(4423)=0.552875 ;TFRAC(4424)=0.553 TFRAC(4425)=0.553125 ;TFRAC(4426)=0.55325 TFRAC(4427)=0.553375 ;TFRAC(4428)=0.5535 TFRAC(4429)=0.553625 ;TFRAC(4430)=0.55375 TFRAC(4431)=0.553875 ;TFRAC(4432)=0.554 TFRAC(4433)=0.554125 ;TFRAC(4434)=0.55425 TFRAC(4435)=0.554375 ;TFRAC(4436)=0.5545 TFRAC(4437)=0.554625 ;TFRAC(4438)=0.55475 TFRAC(4439)=0.554875 ;TFRAC(4440)=0.555 TFRAC(4441)=0.555125 ;TFRAC(4442)=0.55525 TFRAC(4443)=0.555375 ;TFRAC(4444)=0.5555 TFRAC(4445)=0.555625 ;TFRAC(4446)=0.55575 TFRAC(4447)=0.555875 ;TFRAC(4448)=0.556 TFRAC(4449)=0.556125 ;TFRAC(4450)=0.55625 TFRAC(4451)=0.556375 ;TFRAC(4452)=0.5565 TFRAC(4453)=0.556625 ;TFRAC(4454)=0.55675 TFRAC(4455)=0.556875 ;TFRAC(4456)=0.557 TFRAC(4457)=0.557125 ;TFRAC(4458)=0.55725 TFRAC(4459)=0.557375 ;TFRAC(4460)=0.5575 TFRAC(4461)=0.557625 ;TFRAC(4462)=0.55775 TFRAC(4463)=0.557875 ;TFRAC(4464)=0.558 TFRAC(4465)=0.558125 ;TFRAC(4466)=0.55825 TFRAC(4467)=0.558375 ;TFRAC(4468)=0.5585 TFRAC(4469)=0.558625 ;TFRAC(4470)=0.55875 TFRAC(4471)=0.558875 ;TFRAC(4472)=0.559 TFRAC(4473)=0.559125 ;TFRAC(4474)=0.55925 TFRAC(4475)=0.559375 ;TFRAC(4476)=0.5595 TFRAC(4477)=0.559625 ;TFRAC(4478)=0.55975 TFRAC(4479)=0.559875 ;TFRAC(4480)=0.56 TFRAC(4481)=0.560125 ;TFRAC(4482)=0.56025 TFRAC(4483)=0.560375 ;TFRAC(4484)=0.5605 TFRAC(4485)=0.560625 ;TFRAC(4486)=0.56075 TFRAC(4487)=0.560875 ;TFRAC(4488)=0.561 TFRAC(4489)=0.561125 ;TFRAC(4490)=0.56125 TFRAC(4491)=0.561375 ;TFRAC(4492)=0.5615 TFRAC(4493)=0.561625 ;TFRAC(4494)=0.56175 TFRAC(4495)=0.561875 ;TFRAC(4496)=0.562 TFRAC(4497)=0.562125 ;TFRAC(4498)=0.56225 TFRAC(4499)=0.562375 ;TFRAC(4500)=0.5625 TFRAC(4501)=0.562625 ;TFRAC(4502)=0.56275 TFRAC(4503)=0.562875 ;TFRAC(4504)=0.563 TFRAC(4505)=0.563125 ;TFRAC(4506)=0.56325 TFRAC(4507)=0.563375 ;TFRAC(4508)=0.5635 TFRAC(4509)=0.563625 ;TFRAC(4510)=0.56375 TFRAC(4511)=0.563875 ;TFRAC(4512)=0.564 TFRAC(4513)=0.564125 ;TFRAC(4514)=0.56425 TFRAC(4515)=0.564375 ;TFRAC(4516)=0.5645 TFRAC(4517)=0.564625 ;TFRAC(4518)=0.56475 TFRAC(4519)=0.564875 ;TFRAC(4520)=0.565 TFRAC(4521)=0.565125 ;TFRAC(4522)=0.56525 TFRAC(4523)=0.565375 ;TFRAC(4524)=0.5655 TFRAC(4525)=0.565625 ;TFRAC(4526)=0.56575 TFRAC(4527)=0.565875 ;TFRAC(4528)=0.566 TFRAC(4529)=0.566125 ;TFRAC(4530)=0.56625 TFRAC(4531)=0.566375 ;TFRAC(4532)=0.5665 TFRAC(4533)=0.566625 ;TFRAC(4534)=0.56675 TFRAC(4535)=0.566875 ;TFRAC(4536)=0.567 TFRAC(4537)=0.567125 ;TFRAC(4538)=0.56725 TFRAC(4539)=0.567375 ;TFRAC(4540)=0.5675 TFRAC(4541)=0.567625 ;TFRAC(4542)=0.56775 TFRAC(4543)=0.567875 ;TFRAC(4544)=0.568 TFRAC(4545)=0.568125 ;TFRAC(4546)=0.56825 TFRAC(4547)=0.568375 ;TFRAC(4548)=0.5685 TFRAC(4549)=0.568625 ;TFRAC(4550)=0.56875 TFRAC(4551)=0.568875 ;TFRAC(4552)=0.569 TFRAC(4553)=0.569125 ;TFRAC(4554)=0.56925 TFRAC(4555)=0.569375 ;TFRAC(4556)=0.5695 TFRAC(4557)=0.569625 ;TFRAC(4558)=0.56975 TFRAC(4559)=0.569875 ;TFRAC(4560)=0.57 TFRAC(4561)=0.570125 ;TFRAC(4562)=0.57025 TFRAC(4563)=0.570375 ;TFRAC(4564)=0.5705 TFRAC(4565)=0.570625 ;TFRAC(4566)=0.57075 TFRAC(4567)=0.570875 ;TFRAC(4568)=0.571 TFRAC(4569)=0.571125 ;TFRAC(4570)=0.57125 TFRAC(4571)=0.571375 ;TFRAC(4572)=0.5715 TFRAC(4573)=0.571625 ;TFRAC(4574)=0.57175 TFRAC(4575)=0.571875 ;TFRAC(4576)=0.572 TFRAC(4577)=0.572125 ;TFRAC(4578)=0.57225 TFRAC(4579)=0.572375 ;TFRAC(4580)=0.5725 TFRAC(4581)=0.572625 ;TFRAC(4582)=0.57275 TFRAC(4583)=0.572875 ;TFRAC(4584)=0.573 TFRAC(4585)=0.573125 ;TFRAC(4586)=0.57325 TFRAC(4587)=0.573375 ;TFRAC(4588)=0.5735 TFRAC(4589)=0.573625 ;TFRAC(4590)=0.57375 TFRAC(4591)=0.573875 ;TFRAC(4592)=0.574 TFRAC(4593)=0.574125 ;TFRAC(4594)=0.57425 TFRAC(4595)=0.574375 ;TFRAC(4596)=0.5745 TFRAC(4597)=0.574625 ;TFRAC(4598)=0.57475 TFRAC(4599)=0.574875 ;TFRAC(4600)=0.575 TFRAC(4601)=0.575125 ;TFRAC(4602)=0.57525 TFRAC(4603)=0.575375 ;TFRAC(4604)=0.5755 TFRAC(4605)=0.575625 ;TFRAC(4606)=0.57575 TFRAC(4607)=0.575875 ;TFRAC(4608)=0.576 TFRAC(4609)=0.576125 ;TFRAC(4610)=0.57625 TFRAC(4611)=0.576375 ;TFRAC(4612)=0.5765 TFRAC(4613)=0.576625 ;TFRAC(4614)=0.57675 TFRAC(4615)=0.576875 ;TFRAC(4616)=0.577 TFRAC(4617)=0.577125 ;TFRAC(4618)=0.57725 TFRAC(4619)=0.577375 ;TFRAC(4620)=0.5775 TFRAC(4621)=0.577625 ;TFRAC(4622)=0.57775 TFRAC(4623)=0.577875 ;TFRAC(4624)=0.578 TFRAC(4625)=0.578125 ;TFRAC(4626)=0.57825 TFRAC(4627)=0.578375 ;TFRAC(4628)=0.5785 TFRAC(4629)=0.578625 ;TFRAC(4630)=0.57875 TFRAC(4631)=0.578875 ;TFRAC(4632)=0.579 TFRAC(4633)=0.579125 ;TFRAC(4634)=0.57925 TFRAC(4635)=0.579375 ;TFRAC(4636)=0.5795 TFRAC(4637)=0.579625 ;TFRAC(4638)=0.57975 TFRAC(4639)=0.579875 ;TFRAC(4640)=0.58 TFRAC(4641)=0.580125 ;TFRAC(4642)=0.58025 TFRAC(4643)=0.580375 ;TFRAC(4644)=0.5805 TFRAC(4645)=0.580625 ;TFRAC(4646)=0.58075 TFRAC(4647)=0.580875 ;TFRAC(4648)=0.581 TFRAC(4649)=0.581125 ;TFRAC(4650)=0.58125 TFRAC(4651)=0.581375 ;TFRAC(4652)=0.5815 TFRAC(4653)=0.581625 ;TFRAC(4654)=0.58175 TFRAC(4655)=0.581875 ;TFRAC(4656)=0.582 TFRAC(4657)=0.582125 ;TFRAC(4658)=0.58225 TFRAC(4659)=0.582375 ;TFRAC(4660)=0.5825 TFRAC(4661)=0.582625 ;TFRAC(4662)=0.58275 TFRAC(4663)=0.582875 ;TFRAC(4664)=0.583 TFRAC(4665)=0.583125 ;TFRAC(4666)=0.58325 TFRAC(4667)=0.583375 ;TFRAC(4668)=0.5835 TFRAC(4669)=0.583625 ;TFRAC(4670)=0.58375 TFRAC(4671)=0.583875 ;TFRAC(4672)=0.584 TFRAC(4673)=0.584125 ;TFRAC(4674)=0.58425 TFRAC(4675)=0.584375 ;TFRAC(4676)=0.5845 TFRAC(4677)=0.584625 ;TFRAC(4678)=0.58475 TFRAC(4679)=0.584875 ;TFRAC(4680)=0.585 TFRAC(4681)=0.585125 ;TFRAC(4682)=0.58525 TFRAC(4683)=0.585375 ;TFRAC(4684)=0.5855 TFRAC(4685)=0.585625 ;TFRAC(4686)=0.58575 TFRAC(4687)=0.585875 ;TFRAC(4688)=0.586 TFRAC(4689)=0.586125 ;TFRAC(4690)=0.58625 TFRAC(4691)=0.586375 ;TFRAC(4692)=0.5865 TFRAC(4693)=0.586625 ;TFRAC(4694)=0.58675 TFRAC(4695)=0.586875 ;TFRAC(4696)=0.587 TFRAC(4697)=0.587125 ;TFRAC(4698)=0.58725 TFRAC(4699)=0.587375 ;TFRAC(4700)=0.5875 TFRAC(4701)=0.587625 ;TFRAC(4702)=0.58775 TFRAC(4703)=0.587875 ;TFRAC(4704)=0.588 TFRAC(4705)=0.588125 ;TFRAC(4706)=0.58825 TFRAC(4707)=0.588375 ;TFRAC(4708)=0.5885 TFRAC(4709)=0.588625 ;TFRAC(4710)=0.58875 TFRAC(4711)=0.588875 ;TFRAC(4712)=0.589 TFRAC(4713)=0.589125 ;TFRAC(4714)=0.58925 TFRAC(4715)=0.589375 ;TFRAC(4716)=0.5895 TFRAC(4717)=0.589625 ;TFRAC(4718)=0.58975 TFRAC(4719)=0.589875 ;TFRAC(4720)=0.59 TFRAC(4721)=0.590125 ;TFRAC(4722)=0.59025 TFRAC(4723)=0.590375 ;TFRAC(4724)=0.5905 TFRAC(4725)=0.590625 ;TFRAC(4726)=0.59075 TFRAC(4727)=0.590875 ;TFRAC(4728)=0.591 TFRAC(4729)=0.591125 ;TFRAC(4730)=0.59125 TFRAC(4731)=0.591375 ;TFRAC(4732)=0.5915 TFRAC(4733)=0.591625 ;TFRAC(4734)=0.59175 TFRAC(4735)=0.591875 ;TFRAC(4736)=0.592 TFRAC(4737)=0.592125 ;TFRAC(4738)=0.59225 TFRAC(4739)=0.592375 ;TFRAC(4740)=0.5925 TFRAC(4741)=0.592625 ;TFRAC(4742)=0.59275 TFRAC(4743)=0.592875 ;TFRAC(4744)=0.593 TFRAC(4745)=0.593125 ;TFRAC(4746)=0.59325 TFRAC(4747)=0.593375 ;TFRAC(4748)=0.5935 TFRAC(4749)=0.593625 ;TFRAC(4750)=0.59375 TFRAC(4751)=0.593875 ;TFRAC(4752)=0.594 TFRAC(4753)=0.594125 ;TFRAC(4754)=0.59425 TFRAC(4755)=0.594375 ;TFRAC(4756)=0.5945 TFRAC(4757)=0.594625 ;TFRAC(4758)=0.59475 TFRAC(4759)=0.594875 ;TFRAC(4760)=0.595 TFRAC(4761)=0.595125 ;TFRAC(4762)=0.59525 TFRAC(4763)=0.595375 ;TFRAC(4764)=0.5955 TFRAC(4765)=0.595625 ;TFRAC(4766)=0.59575 TFRAC(4767)=0.595875 ;TFRAC(4768)=0.596 TFRAC(4769)=0.596125 ;TFRAC(4770)=0.59625 TFRAC(4771)=0.596375 ;TFRAC(4772)=0.5965 TFRAC(4773)=0.596625 ;TFRAC(4774)=0.59675 TFRAC(4775)=0.596875 ;TFRAC(4776)=0.597 TFRAC(4777)=0.597125 ;TFRAC(4778)=0.59725 TFRAC(4779)=0.597375 ;TFRAC(4780)=0.5975 TFRAC(4781)=0.597625 ;TFRAC(4782)=0.59775 TFRAC(4783)=0.597875 ;TFRAC(4784)=0.598 TFRAC(4785)=0.598125 ;TFRAC(4786)=0.59825 TFRAC(4787)=0.598375 ;TFRAC(4788)=0.5985 TFRAC(4789)=0.598625 ;TFRAC(4790)=0.59875 TFRAC(4791)=0.598875 ;TFRAC(4792)=0.599 TFRAC(4793)=0.599125 ;TFRAC(4794)=0.59925 TFRAC(4795)=0.599375 ;TFRAC(4796)=0.5995 TFRAC(4797)=0.599625 ;TFRAC(4798)=0.59975 TFRAC(4799)=0.599875 ;TFRAC(4800)=0.6 TFRAC(4801)=0.600125 ;TFRAC(4802)=0.60025 TFRAC(4803)=0.600375 ;TFRAC(4804)=0.6005 TFRAC(4805)=0.600625 ;TFRAC(4806)=0.60075 TFRAC(4807)=0.600875 ;TFRAC(4808)=0.601 TFRAC(4809)=0.601125 ;TFRAC(4810)=0.60125 TFRAC(4811)=0.601375 ;TFRAC(4812)=0.6015 TFRAC(4813)=0.601625 ;TFRAC(4814)=0.60175 TFRAC(4815)=0.601875 ;TFRAC(4816)=0.602 TFRAC(4817)=0.602125 ;TFRAC(4818)=0.60225 TFRAC(4819)=0.602375 ;TFRAC(4820)=0.6025 TFRAC(4821)=0.602625 ;TFRAC(4822)=0.60275 TFRAC(4823)=0.602875 ;TFRAC(4824)=0.603 TFRAC(4825)=0.603125 ;TFRAC(4826)=0.60325 TFRAC(4827)=0.603375 ;TFRAC(4828)=0.6035 TFRAC(4829)=0.603625 ;TFRAC(4830)=0.60375 TFRAC(4831)=0.603875 ;TFRAC(4832)=0.604 TFRAC(4833)=0.604125 ;TFRAC(4834)=0.60425 TFRAC(4835)=0.604375 ;TFRAC(4836)=0.6045 TFRAC(4837)=0.604625 ;TFRAC(4838)=0.60475 TFRAC(4839)=0.604875 ;TFRAC(4840)=0.605 TFRAC(4841)=0.605125 ;TFRAC(4842)=0.60525 TFRAC(4843)=0.605375 ;TFRAC(4844)=0.6055 TFRAC(4845)=0.605625 ;TFRAC(4846)=0.60575 TFRAC(4847)=0.605875 ;TFRAC(4848)=0.606 TFRAC(4849)=0.606125 ;TFRAC(4850)=0.60625 TFRAC(4851)=0.606375 ;TFRAC(4852)=0.6065 TFRAC(4853)=0.606625 ;TFRAC(4854)=0.60675 TFRAC(4855)=0.606875 ;TFRAC(4856)=0.607 TFRAC(4857)=0.607125 ;TFRAC(4858)=0.60725 TFRAC(4859)=0.607375 ;TFRAC(4860)=0.6075 TFRAC(4861)=0.607625 ;TFRAC(4862)=0.60775 TFRAC(4863)=0.607875 ;TFRAC(4864)=0.608 TFRAC(4865)=0.608125 ;TFRAC(4866)=0.60825 TFRAC(4867)=0.608375 ;TFRAC(4868)=0.6085 TFRAC(4869)=0.608625 ;TFRAC(4870)=0.60875 TFRAC(4871)=0.608875 ;TFRAC(4872)=0.609 TFRAC(4873)=0.609125 ;TFRAC(4874)=0.60925 TFRAC(4875)=0.609375 ;TFRAC(4876)=0.6095 TFRAC(4877)=0.609625 ;TFRAC(4878)=0.60975 TFRAC(4879)=0.609875 ;TFRAC(4880)=0.61 TFRAC(4881)=0.610125 ;TFRAC(4882)=0.61025 TFRAC(4883)=0.610375 ;TFRAC(4884)=0.6105 TFRAC(4885)=0.610625 ;TFRAC(4886)=0.61075 TFRAC(4887)=0.610875 ;TFRAC(4888)=0.611 TFRAC(4889)=0.611125 ;TFRAC(4890)=0.61125 TFRAC(4891)=0.611375 ;TFRAC(4892)=0.6115 TFRAC(4893)=0.611625 ;TFRAC(4894)=0.61175 TFRAC(4895)=0.611875 ;TFRAC(4896)=0.612 TFRAC(4897)=0.612125 ;TFRAC(4898)=0.61225 TFRAC(4899)=0.612375 ;TFRAC(4900)=0.6125 TFRAC(4901)=0.612625 ;TFRAC(4902)=0.61275 TFRAC(4903)=0.612875 ;TFRAC(4904)=0.613 TFRAC(4905)=0.613125 ;TFRAC(4906)=0.61325 TFRAC(4907)=0.613375 ;TFRAC(4908)=0.6135 TFRAC(4909)=0.613625 ;TFRAC(4910)=0.61375 TFRAC(4911)=0.613875 ;TFRAC(4912)=0.614 TFRAC(4913)=0.614125 ;TFRAC(4914)=0.61425 TFRAC(4915)=0.614375 ;TFRAC(4916)=0.6145 TFRAC(4917)=0.614625 ;TFRAC(4918)=0.61475 TFRAC(4919)=0.614875 ;TFRAC(4920)=0.615 TFRAC(4921)=0.615125 ;TFRAC(4922)=0.61525 TFRAC(4923)=0.615375 ;TFRAC(4924)=0.6155 TFRAC(4925)=0.615625 ;TFRAC(4926)=0.61575 TFRAC(4927)=0.615875 ;TFRAC(4928)=0.616 TFRAC(4929)=0.616125 ;TFRAC(4930)=0.61625 TFRAC(4931)=0.616375 ;TFRAC(4932)=0.6165 TFRAC(4933)=0.616625 ;TFRAC(4934)=0.61675 TFRAC(4935)=0.616875 ;TFRAC(4936)=0.617 TFRAC(4937)=0.617125 ;TFRAC(4938)=0.61725 TFRAC(4939)=0.617375 ;TFRAC(4940)=0.6175 TFRAC(4941)=0.617625 ;TFRAC(4942)=0.61775 TFRAC(4943)=0.617875 ;TFRAC(4944)=0.618 TFRAC(4945)=0.618125 ;TFRAC(4946)=0.61825 TFRAC(4947)=0.618375 ;TFRAC(4948)=0.6185 TFRAC(4949)=0.618625 ;TFRAC(4950)=0.61875 TFRAC(4951)=0.618875 ;TFRAC(4952)=0.619 TFRAC(4953)=0.619125 ;TFRAC(4954)=0.61925 TFRAC(4955)=0.619375 ;TFRAC(4956)=0.6195 TFRAC(4957)=0.619625 ;TFRAC(4958)=0.61975 TFRAC(4959)=0.619875 ;TFRAC(4960)=0.62 TFRAC(4961)=0.620125 ;TFRAC(4962)=0.62025 TFRAC(4963)=0.620375 ;TFRAC(4964)=0.6205 TFRAC(4965)=0.620625 ;TFRAC(4966)=0.62075 TFRAC(4967)=0.620875 ;TFRAC(4968)=0.621 TFRAC(4969)=0.621125 ;TFRAC(4970)=0.62125 TFRAC(4971)=0.621375 ;TFRAC(4972)=0.6215 TFRAC(4973)=0.621625 ;TFRAC(4974)=0.62175 TFRAC(4975)=0.621875 ;TFRAC(4976)=0.622 TFRAC(4977)=0.622125 ;TFRAC(4978)=0.62225 TFRAC(4979)=0.622375 ;TFRAC(4980)=0.6225 TFRAC(4981)=0.622625 ;TFRAC(4982)=0.62275 TFRAC(4983)=0.622875 ;TFRAC(4984)=0.623 TFRAC(4985)=0.623125 ;TFRAC(4986)=0.62325 TFRAC(4987)=0.623375 ;TFRAC(4988)=0.6235 TFRAC(4989)=0.623625 ;TFRAC(4990)=0.62375 TFRAC(4991)=0.623875 ;TFRAC(4992)=0.624 TFRAC(4993)=0.624125 ;TFRAC(4994)=0.62425 TFRAC(4995)=0.624375 ;TFRAC(4996)=0.6245 TFRAC(4997)=0.624625 ;TFRAC(4998)=0.62475 TFRAC(4999)=0.624875 ;TFRAC(5000)=0.625 TFRAC(5001)=0.625125 ;TFRAC(5002)=0.62525 TFRAC(5003)=0.625375 ;TFRAC(5004)=0.6255 TFRAC(5005)=0.625625 ;TFRAC(5006)=0.62575 TFRAC(5007)=0.625875 ;TFRAC(5008)=0.626 TFRAC(5009)=0.626125 ;TFRAC(5010)=0.62625 TFRAC(5011)=0.626375 ;TFRAC(5012)=0.6265 TFRAC(5013)=0.626625 ;TFRAC(5014)=0.62675 TFRAC(5015)=0.626875 ;TFRAC(5016)=0.627 TFRAC(5017)=0.627125 ;TFRAC(5018)=0.62725 TFRAC(5019)=0.627375 ;TFRAC(5020)=0.6275 TFRAC(5021)=0.627625 ;TFRAC(5022)=0.62775 TFRAC(5023)=0.627875 ;TFRAC(5024)=0.628 TFRAC(5025)=0.628125 ;TFRAC(5026)=0.62825 TFRAC(5027)=0.628375 ;TFRAC(5028)=0.6285 TFRAC(5029)=0.628625 ;TFRAC(5030)=0.62875 TFRAC(5031)=0.628875 ;TFRAC(5032)=0.629 TFRAC(5033)=0.629125 ;TFRAC(5034)=0.62925 TFRAC(5035)=0.629375 ;TFRAC(5036)=0.6295 TFRAC(5037)=0.629625 ;TFRAC(5038)=0.62975 TFRAC(5039)=0.629875 ;TFRAC(5040)=0.63 TFRAC(5041)=0.630125 ;TFRAC(5042)=0.63025 TFRAC(5043)=0.630375 ;TFRAC(5044)=0.6305 TFRAC(5045)=0.630625 ;TFRAC(5046)=0.63075 TFRAC(5047)=0.630875 ;TFRAC(5048)=0.631 TFRAC(5049)=0.631125 ;TFRAC(5050)=0.63125 TFRAC(5051)=0.631375 ;TFRAC(5052)=0.6315 TFRAC(5053)=0.631625 ;TFRAC(5054)=0.63175 TFRAC(5055)=0.631875 ;TFRAC(5056)=0.632 TFRAC(5057)=0.632125 ;TFRAC(5058)=0.63225 TFRAC(5059)=0.632375 ;TFRAC(5060)=0.6325 TFRAC(5061)=0.632625 ;TFRAC(5062)=0.63275 TFRAC(5063)=0.632875 ;TFRAC(5064)=0.633 TFRAC(5065)=0.633125 ;TFRAC(5066)=0.63325 TFRAC(5067)=0.633375 ;TFRAC(5068)=0.6335 TFRAC(5069)=0.633625 ;TFRAC(5070)=0.63375 TFRAC(5071)=0.633875 ;TFRAC(5072)=0.634 TFRAC(5073)=0.634125 ;TFRAC(5074)=0.63425 TFRAC(5075)=0.634375 ;TFRAC(5076)=0.6345 TFRAC(5077)=0.634625 ;TFRAC(5078)=0.63475 TFRAC(5079)=0.634875 ;TFRAC(5080)=0.635 TFRAC(5081)=0.635125 ;TFRAC(5082)=0.63525 TFRAC(5083)=0.635375 ;TFRAC(5084)=0.6355 TFRAC(5085)=0.635625 ;TFRAC(5086)=0.63575 TFRAC(5087)=0.635875 ;TFRAC(5088)=0.636 TFRAC(5089)=0.636125 ;TFRAC(5090)=0.63625 TFRAC(5091)=0.636375 ;TFRAC(5092)=0.6365 TFRAC(5093)=0.636625 ;TFRAC(5094)=0.63675 TFRAC(5095)=0.636875 ;TFRAC(5096)=0.637 TFRAC(5097)=0.637125 ;TFRAC(5098)=0.63725 TFRAC(5099)=0.637375 ;TFRAC(5100)=0.6375 TFRAC(5101)=0.637625 ;TFRAC(5102)=0.63775 TFRAC(5103)=0.637875 ;TFRAC(5104)=0.638 TFRAC(5105)=0.638125 ;TFRAC(5106)=0.63825 TFRAC(5107)=0.638375 ;TFRAC(5108)=0.6385 TFRAC(5109)=0.638625 ;TFRAC(5110)=0.63875 TFRAC(5111)=0.638875 ;TFRAC(5112)=0.639 TFRAC(5113)=0.639125 ;TFRAC(5114)=0.63925 TFRAC(5115)=0.639375 ;TFRAC(5116)=0.6395 TFRAC(5117)=0.639625 ;TFRAC(5118)=0.63975 TFRAC(5119)=0.639875 ;TFRAC(5120)=0.64 TFRAC(5121)=0.640125 ;TFRAC(5122)=0.64025 TFRAC(5123)=0.640375 ;TFRAC(5124)=0.6405 TFRAC(5125)=0.640625 ;TFRAC(5126)=0.64075 TFRAC(5127)=0.640875 ;TFRAC(5128)=0.641 TFRAC(5129)=0.641125 ;TFRAC(5130)=0.64125 TFRAC(5131)=0.641375 ;TFRAC(5132)=0.6415 TFRAC(5133)=0.641625 ;TFRAC(5134)=0.64175 TFRAC(5135)=0.641875 ;TFRAC(5136)=0.642 TFRAC(5137)=0.642125 ;TFRAC(5138)=0.64225 TFRAC(5139)=0.642375 ;TFRAC(5140)=0.6425 TFRAC(5141)=0.642625 ;TFRAC(5142)=0.64275 TFRAC(5143)=0.642875 ;TFRAC(5144)=0.643 TFRAC(5145)=0.643125 ;TFRAC(5146)=0.64325 TFRAC(5147)=0.643375 ;TFRAC(5148)=0.6435 TFRAC(5149)=0.643625 ;TFRAC(5150)=0.64375 TFRAC(5151)=0.643875 ;TFRAC(5152)=0.644 TFRAC(5153)=0.644125 ;TFRAC(5154)=0.64425 TFRAC(5155)=0.644375 ;TFRAC(5156)=0.6445 TFRAC(5157)=0.644625 ;TFRAC(5158)=0.64475 TFRAC(5159)=0.644875 ;TFRAC(5160)=0.645 TFRAC(5161)=0.645125 ;TFRAC(5162)=0.64525 TFRAC(5163)=0.645375 ;TFRAC(5164)=0.6455 TFRAC(5165)=0.645625 ;TFRAC(5166)=0.64575 TFRAC(5167)=0.645875 ;TFRAC(5168)=0.646 TFRAC(5169)=0.646125 ;TFRAC(5170)=0.64625 TFRAC(5171)=0.646375 ;TFRAC(5172)=0.6465 TFRAC(5173)=0.646625 ;TFRAC(5174)=0.64675 TFRAC(5175)=0.646875 ;TFRAC(5176)=0.647 TFRAC(5177)=0.647125 ;TFRAC(5178)=0.64725 TFRAC(5179)=0.647375 ;TFRAC(5180)=0.6475 TFRAC(5181)=0.647625 ;TFRAC(5182)=0.64775 TFRAC(5183)=0.647875 ;TFRAC(5184)=0.648 TFRAC(5185)=0.648125 ;TFRAC(5186)=0.64825 TFRAC(5187)=0.648375 ;TFRAC(5188)=0.6485 TFRAC(5189)=0.648625 ;TFRAC(5190)=0.64875 TFRAC(5191)=0.648875 ;TFRAC(5192)=0.649 TFRAC(5193)=0.649125 ;TFRAC(5194)=0.64925 TFRAC(5195)=0.649375 ;TFRAC(5196)=0.6495 TFRAC(5197)=0.649625 ;TFRAC(5198)=0.64975 TFRAC(5199)=0.649875 ;TFRAC(5200)=0.65 TFRAC(5201)=0.650125 ;TFRAC(5202)=0.65025 TFRAC(5203)=0.650375 ;TFRAC(5204)=0.6505 TFRAC(5205)=0.650625 ;TFRAC(5206)=0.65075 TFRAC(5207)=0.650875 ;TFRAC(5208)=0.651 TFRAC(5209)=0.651125 ;TFRAC(5210)=0.65125 TFRAC(5211)=0.651375 ;TFRAC(5212)=0.6515 TFRAC(5213)=0.651625 ;TFRAC(5214)=0.65175 TFRAC(5215)=0.651875 ;TFRAC(5216)=0.652 TFRAC(5217)=0.652125 ;TFRAC(5218)=0.65225 TFRAC(5219)=0.652375 ;TFRAC(5220)=0.6525 TFRAC(5221)=0.652625 ;TFRAC(5222)=0.65275 TFRAC(5223)=0.652875 ;TFRAC(5224)=0.653 TFRAC(5225)=0.653125 ;TFRAC(5226)=0.65325 TFRAC(5227)=0.653375 ;TFRAC(5228)=0.6535 TFRAC(5229)=0.653625 ;TFRAC(5230)=0.65375 TFRAC(5231)=0.653875 ;TFRAC(5232)=0.654 TFRAC(5233)=0.654125 ;TFRAC(5234)=0.65425 TFRAC(5235)=0.654375 ;TFRAC(5236)=0.6545 TFRAC(5237)=0.654625 ;TFRAC(5238)=0.65475 TFRAC(5239)=0.654875 ;TFRAC(5240)=0.655 TFRAC(5241)=0.655125 ;TFRAC(5242)=0.65525 TFRAC(5243)=0.655375 ;TFRAC(5244)=0.6555 TFRAC(5245)=0.655625 ;TFRAC(5246)=0.65575 TFRAC(5247)=0.655875 ;TFRAC(5248)=0.656 TFRAC(5249)=0.656125 ;TFRAC(5250)=0.65625 TFRAC(5251)=0.656375 ;TFRAC(5252)=0.6565 TFRAC(5253)=0.656625 ;TFRAC(5254)=0.65675 TFRAC(5255)=0.656875 ;TFRAC(5256)=0.657 TFRAC(5257)=0.657125 ;TFRAC(5258)=0.65725 TFRAC(5259)=0.657375 ;TFRAC(5260)=0.6575 TFRAC(5261)=0.657625 ;TFRAC(5262)=0.65775 TFRAC(5263)=0.657875 ;TFRAC(5264)=0.658 TFRAC(5265)=0.658125 ;TFRAC(5266)=0.65825 TFRAC(5267)=0.658375 ;TFRAC(5268)=0.6585 TFRAC(5269)=0.658625 ;TFRAC(5270)=0.65875 TFRAC(5271)=0.658875 ;TFRAC(5272)=0.659 TFRAC(5273)=0.659125 ;TFRAC(5274)=0.65925 TFRAC(5275)=0.659375 ;TFRAC(5276)=0.6595 TFRAC(5277)=0.659625 ;TFRAC(5278)=0.65975 TFRAC(5279)=0.659875 ;TFRAC(5280)=0.66 TFRAC(5281)=0.660125 ;TFRAC(5282)=0.66025 TFRAC(5283)=0.660375 ;TFRAC(5284)=0.6605 TFRAC(5285)=0.660625 ;TFRAC(5286)=0.66075 TFRAC(5287)=0.660875 ;TFRAC(5288)=0.661 TFRAC(5289)=0.661125 ;TFRAC(5290)=0.66125 TFRAC(5291)=0.661375 ;TFRAC(5292)=0.6615 TFRAC(5293)=0.661625 ;TFRAC(5294)=0.66175 TFRAC(5295)=0.661875 ;TFRAC(5296)=0.662 TFRAC(5297)=0.662125 ;TFRAC(5298)=0.66225 TFRAC(5299)=0.662375 ;TFRAC(5300)=0.6625 TFRAC(5301)=0.662625 ;TFRAC(5302)=0.66275 TFRAC(5303)=0.662875 ;TFRAC(5304)=0.663 TFRAC(5305)=0.663125 ;TFRAC(5306)=0.66325 TFRAC(5307)=0.663375 ;TFRAC(5308)=0.6635 TFRAC(5309)=0.663625 ;TFRAC(5310)=0.66375 TFRAC(5311)=0.663875 ;TFRAC(5312)=0.664 TFRAC(5313)=0.664125 ;TFRAC(5314)=0.66425 TFRAC(5315)=0.664375 ;TFRAC(5316)=0.6645 TFRAC(5317)=0.664625 ;TFRAC(5318)=0.66475 TFRAC(5319)=0.664875 ;TFRAC(5320)=0.665 TFRAC(5321)=0.665125 ;TFRAC(5322)=0.66525 TFRAC(5323)=0.665375 ;TFRAC(5324)=0.6655 TFRAC(5325)=0.665625 ;TFRAC(5326)=0.66575 TFRAC(5327)=0.665875 ;TFRAC(5328)=0.666 TFRAC(5329)=0.666125 ;TFRAC(5330)=0.66625 TFRAC(5331)=0.666375 ;TFRAC(5332)=0.6665 TFRAC(5333)=0.666625 ;TFRAC(5334)=0.66675 TFRAC(5335)=0.666875 ;TFRAC(5336)=0.667 TFRAC(5337)=0.667125 ;TFRAC(5338)=0.66725 TFRAC(5339)=0.667375 ;TFRAC(5340)=0.6675 TFRAC(5341)=0.667625 ;TFRAC(5342)=0.66775 TFRAC(5343)=0.667875 ;TFRAC(5344)=0.668 TFRAC(5345)=0.668125 ;TFRAC(5346)=0.66825 TFRAC(5347)=0.668375 ;TFRAC(5348)=0.6685 TFRAC(5349)=0.668625 ;TFRAC(5350)=0.66875 TFRAC(5351)=0.668875 ;TFRAC(5352)=0.669 TFRAC(5353)=0.669125 ;TFRAC(5354)=0.66925 TFRAC(5355)=0.669375 ;TFRAC(5356)=0.6695 TFRAC(5357)=0.669625 ;TFRAC(5358)=0.66975 TFRAC(5359)=0.669875 ;TFRAC(5360)=0.67 TFRAC(5361)=0.670125 ;TFRAC(5362)=0.67025 TFRAC(5363)=0.670375 ;TFRAC(5364)=0.6705 TFRAC(5365)=0.670625 ;TFRAC(5366)=0.67075 TFRAC(5367)=0.670875 ;TFRAC(5368)=0.671 TFRAC(5369)=0.671125 ;TFRAC(5370)=0.67125 TFRAC(5371)=0.671375 ;TFRAC(5372)=0.6715 TFRAC(5373)=0.671625 ;TFRAC(5374)=0.67175 TFRAC(5375)=0.671875 ;TFRAC(5376)=0.672 TFRAC(5377)=0.672125 ;TFRAC(5378)=0.67225 TFRAC(5379)=0.672375 ;TFRAC(5380)=0.6725 TFRAC(5381)=0.672625 ;TFRAC(5382)=0.67275 TFRAC(5383)=0.672875 ;TFRAC(5384)=0.673 TFRAC(5385)=0.673125 ;TFRAC(5386)=0.67325 TFRAC(5387)=0.673375 ;TFRAC(5388)=0.6735 TFRAC(5389)=0.673625 ;TFRAC(5390)=0.67375 TFRAC(5391)=0.673875 ;TFRAC(5392)=0.674 TFRAC(5393)=0.674125 ;TFRAC(5394)=0.67425 TFRAC(5395)=0.674375 ;TFRAC(5396)=0.6745 TFRAC(5397)=0.674625 ;TFRAC(5398)=0.67475 TFRAC(5399)=0.674875 ;TFRAC(5400)=0.675 TFRAC(5401)=0.675125 ;TFRAC(5402)=0.67525 TFRAC(5403)=0.675375 ;TFRAC(5404)=0.6755 TFRAC(5405)=0.675625 ;TFRAC(5406)=0.67575 TFRAC(5407)=0.675875 ;TFRAC(5408)=0.676 TFRAC(5409)=0.676125 ;TFRAC(5410)=0.67625 TFRAC(5411)=0.676375 ;TFRAC(5412)=0.6765 TFRAC(5413)=0.676625 ;TFRAC(5414)=0.67675 TFRAC(5415)=0.676875 ;TFRAC(5416)=0.677 TFRAC(5417)=0.677125 ;TFRAC(5418)=0.67725 TFRAC(5419)=0.677375 ;TFRAC(5420)=0.6775 TFRAC(5421)=0.677625 ;TFRAC(5422)=0.67775 TFRAC(5423)=0.677875 ;TFRAC(5424)=0.678 TFRAC(5425)=0.678125 ;TFRAC(5426)=0.67825 TFRAC(5427)=0.678375 ;TFRAC(5428)=0.6785 TFRAC(5429)=0.678625 ;TFRAC(5430)=0.67875 TFRAC(5431)=0.678875 ;TFRAC(5432)=0.679 TFRAC(5433)=0.679125 ;TFRAC(5434)=0.67925 TFRAC(5435)=0.679375 ;TFRAC(5436)=0.6795 TFRAC(5437)=0.679625 ;TFRAC(5438)=0.67975 TFRAC(5439)=0.679875 ;TFRAC(5440)=0.68 TFRAC(5441)=0.680125 ;TFRAC(5442)=0.68025 TFRAC(5443)=0.680375 ;TFRAC(5444)=0.6805 TFRAC(5445)=0.680625 ;TFRAC(5446)=0.68075 TFRAC(5447)=0.680875 ;TFRAC(5448)=0.681 TFRAC(5449)=0.681125 ;TFRAC(5450)=0.68125 TFRAC(5451)=0.681375 ;TFRAC(5452)=0.6815 TFRAC(5453)=0.681625 ;TFRAC(5454)=0.68175 TFRAC(5455)=0.681875 ;TFRAC(5456)=0.682 TFRAC(5457)=0.682125 ;TFRAC(5458)=0.68225 TFRAC(5459)=0.682375 ;TFRAC(5460)=0.6825 TFRAC(5461)=0.682625 ;TFRAC(5462)=0.68275 TFRAC(5463)=0.682875 ;TFRAC(5464)=0.683 TFRAC(5465)=0.683125 ;TFRAC(5466)=0.68325 TFRAC(5467)=0.683375 ;TFRAC(5468)=0.6835 TFRAC(5469)=0.683625 ;TFRAC(5470)=0.68375 TFRAC(5471)=0.683875 ;TFRAC(5472)=0.684 TFRAC(5473)=0.684125 ;TFRAC(5474)=0.68425 TFRAC(5475)=0.684375 ;TFRAC(5476)=0.6845 TFRAC(5477)=0.684625 ;TFRAC(5478)=0.68475 TFRAC(5479)=0.684875 ;TFRAC(5480)=0.685 TFRAC(5481)=0.685125 ;TFRAC(5482)=0.68525 TFRAC(5483)=0.685375 ;TFRAC(5484)=0.6855 TFRAC(5485)=0.685625 ;TFRAC(5486)=0.68575 TFRAC(5487)=0.685875 ;TFRAC(5488)=0.686 TFRAC(5489)=0.686125 ;TFRAC(5490)=0.68625 TFRAC(5491)=0.686375 ;TFRAC(5492)=0.6865 TFRAC(5493)=0.686625 ;TFRAC(5494)=0.68675 TFRAC(5495)=0.686875 ;TFRAC(5496)=0.687 TFRAC(5497)=0.687125 ;TFRAC(5498)=0.68725 TFRAC(5499)=0.687375 ;TFRAC(5500)=0.6875 TFRAC(5501)=0.687625 ;TFRAC(5502)=0.68775 TFRAC(5503)=0.687875 ;TFRAC(5504)=0.688 TFRAC(5505)=0.688125 ;TFRAC(5506)=0.68825 TFRAC(5507)=0.688375 ;TFRAC(5508)=0.6885 TFRAC(5509)=0.688625 ;TFRAC(5510)=0.68875 TFRAC(5511)=0.688875 ;TFRAC(5512)=0.689 TFRAC(5513)=0.689125 ;TFRAC(5514)=0.68925 TFRAC(5515)=0.689375 ;TFRAC(5516)=0.6895 TFRAC(5517)=0.689625 ;TFRAC(5518)=0.68975 TFRAC(5519)=0.689875 ;TFRAC(5520)=0.69 TFRAC(5521)=0.690125 ;TFRAC(5522)=0.69025 TFRAC(5523)=0.690375 ;TFRAC(5524)=0.6905 TFRAC(5525)=0.690625 ;TFRAC(5526)=0.69075 TFRAC(5527)=0.690875 ;TFRAC(5528)=0.691 TFRAC(5529)=0.691125 ;TFRAC(5530)=0.69125 TFRAC(5531)=0.691375 ;TFRAC(5532)=0.6915 TFRAC(5533)=0.691625 ;TFRAC(5534)=0.69175 TFRAC(5535)=0.691875 ;TFRAC(5536)=0.692 TFRAC(5537)=0.692125 ;TFRAC(5538)=0.69225 TFRAC(5539)=0.692375 ;TFRAC(5540)=0.6925 TFRAC(5541)=0.692625 ;TFRAC(5542)=0.69275 TFRAC(5543)=0.692875 ;TFRAC(5544)=0.693 TFRAC(5545)=0.693125 ;TFRAC(5546)=0.69325 TFRAC(5547)=0.693375 ;TFRAC(5548)=0.6935 TFRAC(5549)=0.693625 ;TFRAC(5550)=0.69375 TFRAC(5551)=0.693875 ;TFRAC(5552)=0.694 TFRAC(5553)=0.694125 ;TFRAC(5554)=0.69425 TFRAC(5555)=0.694375 ;TFRAC(5556)=0.6945 TFRAC(5557)=0.694625 ;TFRAC(5558)=0.69475 TFRAC(5559)=0.694875 ;TFRAC(5560)=0.695 TFRAC(5561)=0.695125 ;TFRAC(5562)=0.69525 TFRAC(5563)=0.695375 ;TFRAC(5564)=0.6955 TFRAC(5565)=0.695625 ;TFRAC(5566)=0.69575 TFRAC(5567)=0.695875 ;TFRAC(5568)=0.696 TFRAC(5569)=0.696125 ;TFRAC(5570)=0.69625 TFRAC(5571)=0.696375 ;TFRAC(5572)=0.6965 TFRAC(5573)=0.696625 ;TFRAC(5574)=0.69675 TFRAC(5575)=0.696875 ;TFRAC(5576)=0.697 TFRAC(5577)=0.697125 ;TFRAC(5578)=0.69725 TFRAC(5579)=0.697375 ;TFRAC(5580)=0.6975 TFRAC(5581)=0.697625 ;TFRAC(5582)=0.69775 TFRAC(5583)=0.697875 ;TFRAC(5584)=0.698 TFRAC(5585)=0.698125 ;TFRAC(5586)=0.69825 TFRAC(5587)=0.698375 ;TFRAC(5588)=0.6985 TFRAC(5589)=0.698625 ;TFRAC(5590)=0.69875 TFRAC(5591)=0.698875 ;TFRAC(5592)=0.699 TFRAC(5593)=0.699125 ;TFRAC(5594)=0.69925 TFRAC(5595)=0.699375 ;TFRAC(5596)=0.6995 TFRAC(5597)=0.699625 ;TFRAC(5598)=0.69975 TFRAC(5599)=0.699875 ;TFRAC(5600)=0.7 TFRAC(5601)=0.700125 ;TFRAC(5602)=0.70025 TFRAC(5603)=0.700375 ;TFRAC(5604)=0.7005 TFRAC(5605)=0.700625 ;TFRAC(5606)=0.70075 TFRAC(5607)=0.700875 ;TFRAC(5608)=0.701 TFRAC(5609)=0.701125 ;TFRAC(5610)=0.70125 TFRAC(5611)=0.701375 ;TFRAC(5612)=0.7015 TFRAC(5613)=0.701625 ;TFRAC(5614)=0.70175 TFRAC(5615)=0.701875 ;TFRAC(5616)=0.702 TFRAC(5617)=0.702125 ;TFRAC(5618)=0.70225 TFRAC(5619)=0.702375 ;TFRAC(5620)=0.7025 TFRAC(5621)=0.702625 ;TFRAC(5622)=0.70275 TFRAC(5623)=0.702875 ;TFRAC(5624)=0.703 TFRAC(5625)=0.703125 ;TFRAC(5626)=0.70325 TFRAC(5627)=0.703375 ;TFRAC(5628)=0.7035 TFRAC(5629)=0.703625 ;TFRAC(5630)=0.70375 TFRAC(5631)=0.703875 ;TFRAC(5632)=0.704 TFRAC(5633)=0.704125 ;TFRAC(5634)=0.70425 TFRAC(5635)=0.704375 ;TFRAC(5636)=0.7045 TFRAC(5637)=0.704625 ;TFRAC(5638)=0.70475 TFRAC(5639)=0.704875 ;TFRAC(5640)=0.705 TFRAC(5641)=0.705125 ;TFRAC(5642)=0.70525 TFRAC(5643)=0.705375 ;TFRAC(5644)=0.7055 TFRAC(5645)=0.705625 ;TFRAC(5646)=0.70575 TFRAC(5647)=0.705875 ;TFRAC(5648)=0.706 TFRAC(5649)=0.706125 ;TFRAC(5650)=0.70625 TFRAC(5651)=0.706375 ;TFRAC(5652)=0.7065 TFRAC(5653)=0.706625 ;TFRAC(5654)=0.70675 TFRAC(5655)=0.706875 ;TFRAC(5656)=0.707 TFRAC(5657)=0.707125 ;TFRAC(5658)=0.70725 TFRAC(5659)=0.707375 ;TFRAC(5660)=0.7075 TFRAC(5661)=0.707625 ;TFRAC(5662)=0.70775 TFRAC(5663)=0.707875 ;TFRAC(5664)=0.708 TFRAC(5665)=0.708125 ;TFRAC(5666)=0.70825 TFRAC(5667)=0.708375 ;TFRAC(5668)=0.7085 TFRAC(5669)=0.708625 ;TFRAC(5670)=0.70875 TFRAC(5671)=0.708875 ;TFRAC(5672)=0.709 TFRAC(5673)=0.709125 ;TFRAC(5674)=0.70925 TFRAC(5675)=0.709375 ;TFRAC(5676)=0.7095 TFRAC(5677)=0.709625 ;TFRAC(5678)=0.70975 TFRAC(5679)=0.709875 ;TFRAC(5680)=0.71 TFRAC(5681)=0.710125 ;TFRAC(5682)=0.71025 TFRAC(5683)=0.710375 ;TFRAC(5684)=0.7105 TFRAC(5685)=0.710625 ;TFRAC(5686)=0.71075 TFRAC(5687)=0.710875 ;TFRAC(5688)=0.711 TFRAC(5689)=0.711125 ;TFRAC(5690)=0.71125 TFRAC(5691)=0.711375 ;TFRAC(5692)=0.7115 TFRAC(5693)=0.711625 ;TFRAC(5694)=0.71175 TFRAC(5695)=0.711875 ;TFRAC(5696)=0.712 TFRAC(5697)=0.712125 ;TFRAC(5698)=0.71225 TFRAC(5699)=0.712375 ;TFRAC(5700)=0.7125 TFRAC(5701)=0.712625 ;TFRAC(5702)=0.71275 TFRAC(5703)=0.712875 ;TFRAC(5704)=0.713 TFRAC(5705)=0.713125 ;TFRAC(5706)=0.71325 TFRAC(5707)=0.713375 ;TFRAC(5708)=0.7135 TFRAC(5709)=0.713625 ;TFRAC(5710)=0.71375 TFRAC(5711)=0.713875 ;TFRAC(5712)=0.714 TFRAC(5713)=0.714125 ;TFRAC(5714)=0.71425 TFRAC(5715)=0.714375 ;TFRAC(5716)=0.7145 TFRAC(5717)=0.714625 ;TFRAC(5718)=0.71475 TFRAC(5719)=0.714875 ;TFRAC(5720)=0.715 TFRAC(5721)=0.715125 ;TFRAC(5722)=0.71525 TFRAC(5723)=0.715375 ;TFRAC(5724)=0.7155 TFRAC(5725)=0.715625 ;TFRAC(5726)=0.71575 TFRAC(5727)=0.715875 ;TFRAC(5728)=0.716 TFRAC(5729)=0.716125 ;TFRAC(5730)=0.71625 TFRAC(5731)=0.716375 ;TFRAC(5732)=0.7165 TFRAC(5733)=0.716625 ;TFRAC(5734)=0.71675 TFRAC(5735)=0.716875 ;TFRAC(5736)=0.717 TFRAC(5737)=0.717125 ;TFRAC(5738)=0.71725 TFRAC(5739)=0.717375 ;TFRAC(5740)=0.7175 TFRAC(5741)=0.717625 ;TFRAC(5742)=0.71775 TFRAC(5743)=0.717875 ;TFRAC(5744)=0.718 TFRAC(5745)=0.718125 ;TFRAC(5746)=0.71825 TFRAC(5747)=0.718375 ;TFRAC(5748)=0.7185 TFRAC(5749)=0.718625 ;TFRAC(5750)=0.71875 TFRAC(5751)=0.718875 ;TFRAC(5752)=0.719 TFRAC(5753)=0.719125 ;TFRAC(5754)=0.71925 TFRAC(5755)=0.719375 ;TFRAC(5756)=0.7195 TFRAC(5757)=0.719625 ;TFRAC(5758)=0.71975 TFRAC(5759)=0.719875 ;TFRAC(5760)=0.72 TFRAC(5761)=0.720125 ;TFRAC(5762)=0.72025 TFRAC(5763)=0.720375 ;TFRAC(5764)=0.7205 TFRAC(5765)=0.720625 ;TFRAC(5766)=0.72075 TFRAC(5767)=0.720875 ;TFRAC(5768)=0.721 TFRAC(5769)=0.721125 ;TFRAC(5770)=0.72125 TFRAC(5771)=0.721375 ;TFRAC(5772)=0.7215 TFRAC(5773)=0.721625 ;TFRAC(5774)=0.72175 TFRAC(5775)=0.721875 ;TFRAC(5776)=0.722 TFRAC(5777)=0.722125 ;TFRAC(5778)=0.72225 TFRAC(5779)=0.722375 ;TFRAC(5780)=0.7225 TFRAC(5781)=0.722625 ;TFRAC(5782)=0.72275 TFRAC(5783)=0.722875 ;TFRAC(5784)=0.723 TFRAC(5785)=0.723125 ;TFRAC(5786)=0.72325 TFRAC(5787)=0.723375 ;TFRAC(5788)=0.7235 TFRAC(5789)=0.723625 ;TFRAC(5790)=0.72375 TFRAC(5791)=0.723875 ;TFRAC(5792)=0.724 TFRAC(5793)=0.724125 ;TFRAC(5794)=0.72425 TFRAC(5795)=0.724375 ;TFRAC(5796)=0.7245 TFRAC(5797)=0.724625 ;TFRAC(5798)=0.72475 TFRAC(5799)=0.724875 ;TFRAC(5800)=0.725 TFRAC(5801)=0.725125 ;TFRAC(5802)=0.72525 TFRAC(5803)=0.725375 ;TFRAC(5804)=0.7255 TFRAC(5805)=0.725625 ;TFRAC(5806)=0.72575 TFRAC(5807)=0.725875 ;TFRAC(5808)=0.726 TFRAC(5809)=0.726125 ;TFRAC(5810)=0.72625 TFRAC(5811)=0.726375 ;TFRAC(5812)=0.7265 TFRAC(5813)=0.726625 ;TFRAC(5814)=0.72675 TFRAC(5815)=0.726875 ;TFRAC(5816)=0.727 TFRAC(5817)=0.727125 ;TFRAC(5818)=0.72725 TFRAC(5819)=0.727375 ;TFRAC(5820)=0.7275 TFRAC(5821)=0.727625 ;TFRAC(5822)=0.72775 TFRAC(5823)=0.727875 ;TFRAC(5824)=0.728 TFRAC(5825)=0.728125 ;TFRAC(5826)=0.72825 TFRAC(5827)=0.728375 ;TFRAC(5828)=0.7285 TFRAC(5829)=0.728625 ;TFRAC(5830)=0.72875 TFRAC(5831)=0.728875 ;TFRAC(5832)=0.729 TFRAC(5833)=0.729125 ;TFRAC(5834)=0.72925 TFRAC(5835)=0.729375 ;TFRAC(5836)=0.7295 TFRAC(5837)=0.729625 ;TFRAC(5838)=0.72975 TFRAC(5839)=0.729875 ;TFRAC(5840)=0.73 TFRAC(5841)=0.730125 ;TFRAC(5842)=0.73025 TFRAC(5843)=0.730375 ;TFRAC(5844)=0.7305 TFRAC(5845)=0.730625 ;TFRAC(5846)=0.73075 TFRAC(5847)=0.730875 ;TFRAC(5848)=0.731 TFRAC(5849)=0.731125 ;TFRAC(5850)=0.73125 TFRAC(5851)=0.731375 ;TFRAC(5852)=0.7315 TFRAC(5853)=0.731625 ;TFRAC(5854)=0.73175 TFRAC(5855)=0.731875 ;TFRAC(5856)=0.732 TFRAC(5857)=0.732125 ;TFRAC(5858)=0.73225 TFRAC(5859)=0.732375 ;TFRAC(5860)=0.7325 TFRAC(5861)=0.732625 ;TFRAC(5862)=0.73275 TFRAC(5863)=0.732875 ;TFRAC(5864)=0.733 TFRAC(5865)=0.733125 ;TFRAC(5866)=0.73325 TFRAC(5867)=0.733375 ;TFRAC(5868)=0.7335 TFRAC(5869)=0.733625 ;TFRAC(5870)=0.73375 TFRAC(5871)=0.733875 ;TFRAC(5872)=0.734 TFRAC(5873)=0.734125 ;TFRAC(5874)=0.73425 TFRAC(5875)=0.734375 ;TFRAC(5876)=0.7345 TFRAC(5877)=0.734625 ;TFRAC(5878)=0.73475 TFRAC(5879)=0.734875 ;TFRAC(5880)=0.735 TFRAC(5881)=0.735125 ;TFRAC(5882)=0.73525 TFRAC(5883)=0.735375 ;TFRAC(5884)=0.7355 TFRAC(5885)=0.735625 ;TFRAC(5886)=0.73575 TFRAC(5887)=0.735875 ;TFRAC(5888)=0.736 TFRAC(5889)=0.736125 ;TFRAC(5890)=0.73625 TFRAC(5891)=0.736375 ;TFRAC(5892)=0.7365 TFRAC(5893)=0.736625 ;TFRAC(5894)=0.73675 TFRAC(5895)=0.736875 ;TFRAC(5896)=0.737 TFRAC(5897)=0.737125 ;TFRAC(5898)=0.73725 TFRAC(5899)=0.737375 ;TFRAC(5900)=0.7375 TFRAC(5901)=0.737625 ;TFRAC(5902)=0.73775 TFRAC(5903)=0.737875 ;TFRAC(5904)=0.738 TFRAC(5905)=0.738125 ;TFRAC(5906)=0.73825 TFRAC(5907)=0.738375 ;TFRAC(5908)=0.7385 TFRAC(5909)=0.738625 ;TFRAC(5910)=0.73875 TFRAC(5911)=0.738875 ;TFRAC(5912)=0.739 TFRAC(5913)=0.739125 ;TFRAC(5914)=0.73925 TFRAC(5915)=0.739375 ;TFRAC(5916)=0.7395 TFRAC(5917)=0.739625 ;TFRAC(5918)=0.73975 TFRAC(5919)=0.739875 ;TFRAC(5920)=0.74 TFRAC(5921)=0.740125 ;TFRAC(5922)=0.74025 TFRAC(5923)=0.740375 ;TFRAC(5924)=0.7405 TFRAC(5925)=0.740625 ;TFRAC(5926)=0.74075 TFRAC(5927)=0.740875 ;TFRAC(5928)=0.741 TFRAC(5929)=0.741125 ;TFRAC(5930)=0.74125 TFRAC(5931)=0.741375 ;TFRAC(5932)=0.7415 TFRAC(5933)=0.741625 ;TFRAC(5934)=0.74175 TFRAC(5935)=0.741875 ;TFRAC(5936)=0.742 TFRAC(5937)=0.742125 ;TFRAC(5938)=0.74225 TFRAC(5939)=0.742375 ;TFRAC(5940)=0.7425 TFRAC(5941)=0.742625 ;TFRAC(5942)=0.74275 TFRAC(5943)=0.742875 ;TFRAC(5944)=0.743 TFRAC(5945)=0.743125 ;TFRAC(5946)=0.74325 TFRAC(5947)=0.743375 ;TFRAC(5948)=0.7435 TFRAC(5949)=0.743625 ;TFRAC(5950)=0.74375 TFRAC(5951)=0.743875 ;TFRAC(5952)=0.744 TFRAC(5953)=0.744125 ;TFRAC(5954)=0.74425 TFRAC(5955)=0.744375 ;TFRAC(5956)=0.7445 TFRAC(5957)=0.744625 ;TFRAC(5958)=0.74475 TFRAC(5959)=0.744875 ;TFRAC(5960)=0.745 TFRAC(5961)=0.745125 ;TFRAC(5962)=0.74525 TFRAC(5963)=0.745375 ;TFRAC(5964)=0.7455 TFRAC(5965)=0.745625 ;TFRAC(5966)=0.74575 TFRAC(5967)=0.745875 ;TFRAC(5968)=0.746 TFRAC(5969)=0.746125 ;TFRAC(5970)=0.74625 TFRAC(5971)=0.746375 ;TFRAC(5972)=0.7465 TFRAC(5973)=0.746625 ;TFRAC(5974)=0.74675 TFRAC(5975)=0.746875 ;TFRAC(5976)=0.747 TFRAC(5977)=0.747125 ;TFRAC(5978)=0.74725 TFRAC(5979)=0.747375 ;TFRAC(5980)=0.7475 TFRAC(5981)=0.747625 ;TFRAC(5982)=0.74775 TFRAC(5983)=0.747875 ;TFRAC(5984)=0.748 TFRAC(5985)=0.748125 ;TFRAC(5986)=0.74825 TFRAC(5987)=0.748375 ;TFRAC(5988)=0.7485 TFRAC(5989)=0.748625 ;TFRAC(5990)=0.74875 TFRAC(5991)=0.748875 ;TFRAC(5992)=0.749 TFRAC(5993)=0.749125 ;TFRAC(5994)=0.74925 TFRAC(5995)=0.749375 ;TFRAC(5996)=0.7495 TFRAC(5997)=0.749625 ;TFRAC(5998)=0.74975 TFRAC(5999)=0.749875 ;TFRAC(6000)=0.75 TFRAC(6001)=0.750125 ;TFRAC(6002)=0.75025 TFRAC(6003)=0.750375 ;TFRAC(6004)=0.7505 TFRAC(6005)=0.750625 ;TFRAC(6006)=0.75075 TFRAC(6007)=0.750875 ;TFRAC(6008)=0.751 TFRAC(6009)=0.751125 ;TFRAC(6010)=0.75125 TFRAC(6011)=0.751375 ;TFRAC(6012)=0.7515 TFRAC(6013)=0.751625 ;TFRAC(6014)=0.75175 TFRAC(6015)=0.751875 ;TFRAC(6016)=0.752 TFRAC(6017)=0.752125 ;TFRAC(6018)=0.75225 TFRAC(6019)=0.752375 ;TFRAC(6020)=0.7525 TFRAC(6021)=0.752625 ;TFRAC(6022)=0.75275 TFRAC(6023)=0.752875 ;TFRAC(6024)=0.753 TFRAC(6025)=0.753125 ;TFRAC(6026)=0.75325 TFRAC(6027)=0.753375 ;TFRAC(6028)=0.7535 TFRAC(6029)=0.753625 ;TFRAC(6030)=0.75375 TFRAC(6031)=0.753875 ;TFRAC(6032)=0.754 TFRAC(6033)=0.754125 ;TFRAC(6034)=0.75425 TFRAC(6035)=0.754375 ;TFRAC(6036)=0.7545 TFRAC(6037)=0.754625 ;TFRAC(6038)=0.75475 TFRAC(6039)=0.754875 ;TFRAC(6040)=0.755 TFRAC(6041)=0.755125 ;TFRAC(6042)=0.75525 TFRAC(6043)=0.755375 ;TFRAC(6044)=0.7555 TFRAC(6045)=0.755625 ;TFRAC(6046)=0.75575 TFRAC(6047)=0.755875 ;TFRAC(6048)=0.756 TFRAC(6049)=0.756125 ;TFRAC(6050)=0.75625 TFRAC(6051)=0.756375 ;TFRAC(6052)=0.7565 TFRAC(6053)=0.756625 ;TFRAC(6054)=0.75675 TFRAC(6055)=0.756875 ;TFRAC(6056)=0.757 TFRAC(6057)=0.757125 ;TFRAC(6058)=0.75725 TFRAC(6059)=0.757375 ;TFRAC(6060)=0.7575 TFRAC(6061)=0.757625 ;TFRAC(6062)=0.75775 TFRAC(6063)=0.757875 ;TFRAC(6064)=0.758 TFRAC(6065)=0.758125 ;TFRAC(6066)=0.75825 TFRAC(6067)=0.758375 ;TFRAC(6068)=0.7585 TFRAC(6069)=0.758625 ;TFRAC(6070)=0.75875 TFRAC(6071)=0.758875 ;TFRAC(6072)=0.759 TFRAC(6073)=0.759125 ;TFRAC(6074)=0.75925 TFRAC(6075)=0.759375 ;TFRAC(6076)=0.7595 TFRAC(6077)=0.759625 ;TFRAC(6078)=0.75975 TFRAC(6079)=0.759875 ;TFRAC(6080)=0.76 TFRAC(6081)=0.760125 ;TFRAC(6082)=0.76025 TFRAC(6083)=0.760375 ;TFRAC(6084)=0.7605 TFRAC(6085)=0.760625 ;TFRAC(6086)=0.76075 TFRAC(6087)=0.760875 ;TFRAC(6088)=0.761 TFRAC(6089)=0.761125 ;TFRAC(6090)=0.76125 TFRAC(6091)=0.761375 ;TFRAC(6092)=0.7615 TFRAC(6093)=0.761625 ;TFRAC(6094)=0.76175 TFRAC(6095)=0.761875 ;TFRAC(6096)=0.762 TFRAC(6097)=0.762125 ;TFRAC(6098)=0.76225 TFRAC(6099)=0.762375 ;TFRAC(6100)=0.7625 TFRAC(6101)=0.762625 ;TFRAC(6102)=0.76275 TFRAC(6103)=0.762875 ;TFRAC(6104)=0.763 TFRAC(6105)=0.763125 ;TFRAC(6106)=0.76325 TFRAC(6107)=0.763375 ;TFRAC(6108)=0.7635 TFRAC(6109)=0.763625 ;TFRAC(6110)=0.76375 TFRAC(6111)=0.763875 ;TFRAC(6112)=0.764 TFRAC(6113)=0.764125 ;TFRAC(6114)=0.76425 TFRAC(6115)=0.764375 ;TFRAC(6116)=0.7645 TFRAC(6117)=0.764625 ;TFRAC(6118)=0.76475 TFRAC(6119)=0.764875 ;TFRAC(6120)=0.765 TFRAC(6121)=0.765125 ;TFRAC(6122)=0.76525 TFRAC(6123)=0.765375 ;TFRAC(6124)=0.7655 TFRAC(6125)=0.765625 ;TFRAC(6126)=0.76575 TFRAC(6127)=0.765875 ;TFRAC(6128)=0.766 TFRAC(6129)=0.766125 ;TFRAC(6130)=0.76625 TFRAC(6131)=0.766375 ;TFRAC(6132)=0.7665 TFRAC(6133)=0.766625 ;TFRAC(6134)=0.76675 TFRAC(6135)=0.766875 ;TFRAC(6136)=0.767 TFRAC(6137)=0.767125 ;TFRAC(6138)=0.76725 TFRAC(6139)=0.767375 ;TFRAC(6140)=0.7675 TFRAC(6141)=0.767625 ;TFRAC(6142)=0.76775 TFRAC(6143)=0.767875 ;TFRAC(6144)=0.768 TFRAC(6145)=0.768125 ;TFRAC(6146)=0.76825 TFRAC(6147)=0.768375 ;TFRAC(6148)=0.7685 TFRAC(6149)=0.768625 ;TFRAC(6150)=0.76875 TFRAC(6151)=0.768875 ;TFRAC(6152)=0.769 TFRAC(6153)=0.769125 ;TFRAC(6154)=0.76925 TFRAC(6155)=0.769375 ;TFRAC(6156)=0.7695 TFRAC(6157)=0.769625 ;TFRAC(6158)=0.76975 TFRAC(6159)=0.769875 ;TFRAC(6160)=0.77 TFRAC(6161)=0.770125 ;TFRAC(6162)=0.77025 TFRAC(6163)=0.770375 ;TFRAC(6164)=0.7705 TFRAC(6165)=0.770625 ;TFRAC(6166)=0.77075 TFRAC(6167)=0.770875 ;TFRAC(6168)=0.771 TFRAC(6169)=0.771125 ;TFRAC(6170)=0.77125 TFRAC(6171)=0.771375 ;TFRAC(6172)=0.7715 TFRAC(6173)=0.771625 ;TFRAC(6174)=0.77175 TFRAC(6175)=0.771875 ;TFRAC(6176)=0.772 TFRAC(6177)=0.772125 ;TFRAC(6178)=0.77225 TFRAC(6179)=0.772375 ;TFRAC(6180)=0.7725 TFRAC(6181)=0.772625 ;TFRAC(6182)=0.77275 TFRAC(6183)=0.772875 ;TFRAC(6184)=0.773 TFRAC(6185)=0.773125 ;TFRAC(6186)=0.77325 TFRAC(6187)=0.773375 ;TFRAC(6188)=0.7735 TFRAC(6189)=0.773625 ;TFRAC(6190)=0.77375 TFRAC(6191)=0.773875 ;TFRAC(6192)=0.774 TFRAC(6193)=0.774125 ;TFRAC(6194)=0.77425 TFRAC(6195)=0.774375 ;TFRAC(6196)=0.7745 TFRAC(6197)=0.774625 ;TFRAC(6198)=0.77475 TFRAC(6199)=0.774875 ;TFRAC(6200)=0.775 TFRAC(6201)=0.775125 ;TFRAC(6202)=0.77525 TFRAC(6203)=0.775375 ;TFRAC(6204)=0.7755 TFRAC(6205)=0.775625 ;TFRAC(6206)=0.77575 TFRAC(6207)=0.775875 ;TFRAC(6208)=0.776 TFRAC(6209)=0.776125 ;TFRAC(6210)=0.77625 TFRAC(6211)=0.776375 ;TFRAC(6212)=0.7765 TFRAC(6213)=0.776625 ;TFRAC(6214)=0.77675 TFRAC(6215)=0.776875 ;TFRAC(6216)=0.777 TFRAC(6217)=0.777125 ;TFRAC(6218)=0.77725 TFRAC(6219)=0.777375 ;TFRAC(6220)=0.7775 TFRAC(6221)=0.777625 ;TFRAC(6222)=0.77775 TFRAC(6223)=0.777875 ;TFRAC(6224)=0.778 TFRAC(6225)=0.778125 ;TFRAC(6226)=0.77825 TFRAC(6227)=0.778375 ;TFRAC(6228)=0.7785 TFRAC(6229)=0.778625 ;TFRAC(6230)=0.77875 TFRAC(6231)=0.778875 ;TFRAC(6232)=0.779 TFRAC(6233)=0.779125 ;TFRAC(6234)=0.77925 TFRAC(6235)=0.779375 ;TFRAC(6236)=0.7795 TFRAC(6237)=0.779625 ;TFRAC(6238)=0.77975 TFRAC(6239)=0.779875 ;TFRAC(6240)=0.78 TFRAC(6241)=0.780125 ;TFRAC(6242)=0.78025 TFRAC(6243)=0.780375 ;TFRAC(6244)=0.7805 TFRAC(6245)=0.780625 ;TFRAC(6246)=0.78075 TFRAC(6247)=0.780875 ;TFRAC(6248)=0.781 TFRAC(6249)=0.781125 ;TFRAC(6250)=0.78125 TFRAC(6251)=0.781375 ;TFRAC(6252)=0.7815 TFRAC(6253)=0.781625 ;TFRAC(6254)=0.78175 TFRAC(6255)=0.781875 ;TFRAC(6256)=0.782 TFRAC(6257)=0.782125 ;TFRAC(6258)=0.78225 TFRAC(6259)=0.782375 ;TFRAC(6260)=0.7825 TFRAC(6261)=0.782625 ;TFRAC(6262)=0.78275 TFRAC(6263)=0.782875 ;TFRAC(6264)=0.783 TFRAC(6265)=0.783125 ;TFRAC(6266)=0.78325 TFRAC(6267)=0.783375 ;TFRAC(6268)=0.7835 TFRAC(6269)=0.783625 ;TFRAC(6270)=0.78375 TFRAC(6271)=0.783875 ;TFRAC(6272)=0.784 TFRAC(6273)=0.784125 ;TFRAC(6274)=0.78425 TFRAC(6275)=0.784375 ;TFRAC(6276)=0.7845 TFRAC(6277)=0.784625 ;TFRAC(6278)=0.78475 TFRAC(6279)=0.784875 ;TFRAC(6280)=0.785 TFRAC(6281)=0.785125 ;TFRAC(6282)=0.78525 TFRAC(6283)=0.785375 ;TFRAC(6284)=0.7855 TFRAC(6285)=0.785625 ;TFRAC(6286)=0.78575 TFRAC(6287)=0.785875 ;TFRAC(6288)=0.786 TFRAC(6289)=0.786125 ;TFRAC(6290)=0.78625 TFRAC(6291)=0.786375 ;TFRAC(6292)=0.7865 TFRAC(6293)=0.786625 ;TFRAC(6294)=0.78675 TFRAC(6295)=0.786875 ;TFRAC(6296)=0.787 TFRAC(6297)=0.787125 ;TFRAC(6298)=0.78725 TFRAC(6299)=0.787375 ;TFRAC(6300)=0.7875 TFRAC(6301)=0.787625 ;TFRAC(6302)=0.78775 TFRAC(6303)=0.787875 ;TFRAC(6304)=0.788 TFRAC(6305)=0.788125 ;TFRAC(6306)=0.78825 TFRAC(6307)=0.788375 ;TFRAC(6308)=0.7885 TFRAC(6309)=0.788625 ;TFRAC(6310)=0.78875 TFRAC(6311)=0.788875 ;TFRAC(6312)=0.789 TFRAC(6313)=0.789125 ;TFRAC(6314)=0.78925 TFRAC(6315)=0.789375 ;TFRAC(6316)=0.7895 TFRAC(6317)=0.789625 ;TFRAC(6318)=0.78975 TFRAC(6319)=0.789875 ;TFRAC(6320)=0.79 TFRAC(6321)=0.790125 ;TFRAC(6322)=0.79025 TFRAC(6323)=0.790375 ;TFRAC(6324)=0.7905 TFRAC(6325)=0.790625 ;TFRAC(6326)=0.79075 TFRAC(6327)=0.790875 ;TFRAC(6328)=0.791 TFRAC(6329)=0.791125 ;TFRAC(6330)=0.79125 TFRAC(6331)=0.791375 ;TFRAC(6332)=0.7915 TFRAC(6333)=0.791625 ;TFRAC(6334)=0.79175 TFRAC(6335)=0.791875 ;TFRAC(6336)=0.792 TFRAC(6337)=0.792125 ;TFRAC(6338)=0.79225 TFRAC(6339)=0.792375 ;TFRAC(6340)=0.7925 TFRAC(6341)=0.792625 ;TFRAC(6342)=0.79275 TFRAC(6343)=0.792875 ;TFRAC(6344)=0.793 TFRAC(6345)=0.793125 ;TFRAC(6346)=0.79325 TFRAC(6347)=0.793375 ;TFRAC(6348)=0.7935 TFRAC(6349)=0.793625 ;TFRAC(6350)=0.79375 TFRAC(6351)=0.793875 ;TFRAC(6352)=0.794 TFRAC(6353)=0.794125 ;TFRAC(6354)=0.79425 TFRAC(6355)=0.794375 ;TFRAC(6356)=0.7945 TFRAC(6357)=0.794625 ;TFRAC(6358)=0.79475 TFRAC(6359)=0.794875 ;TFRAC(6360)=0.795 TFRAC(6361)=0.795125 ;TFRAC(6362)=0.79525 TFRAC(6363)=0.795375 ;TFRAC(6364)=0.7955 TFRAC(6365)=0.795625 ;TFRAC(6366)=0.79575 TFRAC(6367)=0.795875 ;TFRAC(6368)=0.796 TFRAC(6369)=0.796125 ;TFRAC(6370)=0.79625 TFRAC(6371)=0.796375 ;TFRAC(6372)=0.7965 TFRAC(6373)=0.796625 ;TFRAC(6374)=0.79675 TFRAC(6375)=0.796875 ;TFRAC(6376)=0.797 TFRAC(6377)=0.797125 ;TFRAC(6378)=0.79725 TFRAC(6379)=0.797375 ;TFRAC(6380)=0.7975 TFRAC(6381)=0.797625 ;TFRAC(6382)=0.79775 TFRAC(6383)=0.797875 ;TFRAC(6384)=0.798 TFRAC(6385)=0.798125 ;TFRAC(6386)=0.79825 TFRAC(6387)=0.798375 ;TFRAC(6388)=0.7985 TFRAC(6389)=0.798625 ;TFRAC(6390)=0.79875 TFRAC(6391)=0.798875 ;TFRAC(6392)=0.799 TFRAC(6393)=0.799125 ;TFRAC(6394)=0.79925 TFRAC(6395)=0.799375 ;TFRAC(6396)=0.7995 TFRAC(6397)=0.799625 ;TFRAC(6398)=0.79975 TFRAC(6399)=0.799875 ;TFRAC(6400)=0.8 TFRAC(6401)=0.800125 ;TFRAC(6402)=0.80025 TFRAC(6403)=0.800375 ;TFRAC(6404)=0.8005 TFRAC(6405)=0.800625 ;TFRAC(6406)=0.80075 TFRAC(6407)=0.800875 ;TFRAC(6408)=0.801 TFRAC(6409)=0.801125 ;TFRAC(6410)=0.80125 TFRAC(6411)=0.801375 ;TFRAC(6412)=0.8015 TFRAC(6413)=0.801625 ;TFRAC(6414)=0.80175 TFRAC(6415)=0.801875 ;TFRAC(6416)=0.802 TFRAC(6417)=0.802125 ;TFRAC(6418)=0.80225 TFRAC(6419)=0.802375 ;TFRAC(6420)=0.8025 TFRAC(6421)=0.802625 ;TFRAC(6422)=0.80275 TFRAC(6423)=0.802875 ;TFRAC(6424)=0.803 TFRAC(6425)=0.803125 ;TFRAC(6426)=0.80325 TFRAC(6427)=0.803375 ;TFRAC(6428)=0.8035 TFRAC(6429)=0.803625 ;TFRAC(6430)=0.80375 TFRAC(6431)=0.803875 ;TFRAC(6432)=0.804 TFRAC(6433)=0.804125 ;TFRAC(6434)=0.80425 TFRAC(6435)=0.804375 ;TFRAC(6436)=0.8045 TFRAC(6437)=0.804625 ;TFRAC(6438)=0.80475 TFRAC(6439)=0.804875 ;TFRAC(6440)=0.805 TFRAC(6441)=0.805125 ;TFRAC(6442)=0.80525 TFRAC(6443)=0.805375 ;TFRAC(6444)=0.8055 TFRAC(6445)=0.805625 ;TFRAC(6446)=0.80575 TFRAC(6447)=0.805875 ;TFRAC(6448)=0.806 TFRAC(6449)=0.806125 ;TFRAC(6450)=0.80625 TFRAC(6451)=0.806375 ;TFRAC(6452)=0.8065 TFRAC(6453)=0.806625 ;TFRAC(6454)=0.80675 TFRAC(6455)=0.806875 ;TFRAC(6456)=0.807 TFRAC(6457)=0.807125 ;TFRAC(6458)=0.80725 TFRAC(6459)=0.807375 ;TFRAC(6460)=0.8075 TFRAC(6461)=0.807625 ;TFRAC(6462)=0.80775 TFRAC(6463)=0.807875 ;TFRAC(6464)=0.808 TFRAC(6465)=0.808125 ;TFRAC(6466)=0.80825 TFRAC(6467)=0.808375 ;TFRAC(6468)=0.8085 TFRAC(6469)=0.808625 ;TFRAC(6470)=0.80875 TFRAC(6471)=0.808875 ;TFRAC(6472)=0.809 TFRAC(6473)=0.809125 ;TFRAC(6474)=0.80925 TFRAC(6475)=0.809375 ;TFRAC(6476)=0.8095 TFRAC(6477)=0.809625 ;TFRAC(6478)=0.80975 TFRAC(6479)=0.809875 ;TFRAC(6480)=0.81 TFRAC(6481)=0.810125 ;TFRAC(6482)=0.81025 TFRAC(6483)=0.810375 ;TFRAC(6484)=0.8105 TFRAC(6485)=0.810625 ;TFRAC(6486)=0.81075 TFRAC(6487)=0.810875 ;TFRAC(6488)=0.811 TFRAC(6489)=0.811125 ;TFRAC(6490)=0.81125 TFRAC(6491)=0.811375 ;TFRAC(6492)=0.8115 TFRAC(6493)=0.811625 ;TFRAC(6494)=0.81175 TFRAC(6495)=0.811875 ;TFRAC(6496)=0.812 TFRAC(6497)=0.812125 ;TFRAC(6498)=0.81225 TFRAC(6499)=0.812375 ;TFRAC(6500)=0.8125 TFRAC(6501)=0.812625 ;TFRAC(6502)=0.81275 TFRAC(6503)=0.812875 ;TFRAC(6504)=0.813 TFRAC(6505)=0.813125 ;TFRAC(6506)=0.81325 TFRAC(6507)=0.813375 ;TFRAC(6508)=0.8135 TFRAC(6509)=0.813625 ;TFRAC(6510)=0.81375 TFRAC(6511)=0.813875 ;TFRAC(6512)=0.814 TFRAC(6513)=0.814125 ;TFRAC(6514)=0.81425 TFRAC(6515)=0.814375 ;TFRAC(6516)=0.8145 TFRAC(6517)=0.814625 ;TFRAC(6518)=0.81475 TFRAC(6519)=0.814875 ;TFRAC(6520)=0.815 TFRAC(6521)=0.815125 ;TFRAC(6522)=0.81525 TFRAC(6523)=0.815375 ;TFRAC(6524)=0.8155 TFRAC(6525)=0.815625 ;TFRAC(6526)=0.81575 TFRAC(6527)=0.815875 ;TFRAC(6528)=0.816 TFRAC(6529)=0.816125 ;TFRAC(6530)=0.81625 TFRAC(6531)=0.816375 ;TFRAC(6532)=0.8165 TFRAC(6533)=0.816625 ;TFRAC(6534)=0.81675 TFRAC(6535)=0.816875 ;TFRAC(6536)=0.817 TFRAC(6537)=0.817125 ;TFRAC(6538)=0.81725 TFRAC(6539)=0.817375 ;TFRAC(6540)=0.8175 TFRAC(6541)=0.817625 ;TFRAC(6542)=0.81775 TFRAC(6543)=0.817875 ;TFRAC(6544)=0.818 TFRAC(6545)=0.818125 ;TFRAC(6546)=0.81825 TFRAC(6547)=0.818375 ;TFRAC(6548)=0.8185 TFRAC(6549)=0.818625 ;TFRAC(6550)=0.81875 TFRAC(6551)=0.818875 ;TFRAC(6552)=0.819 TFRAC(6553)=0.819125 ;TFRAC(6554)=0.81925 TFRAC(6555)=0.819375 ;TFRAC(6556)=0.8195 TFRAC(6557)=0.819625 ;TFRAC(6558)=0.81975 TFRAC(6559)=0.819875 ;TFRAC(6560)=0.82 TFRAC(6561)=0.820125 ;TFRAC(6562)=0.82025 TFRAC(6563)=0.820375 ;TFRAC(6564)=0.8205 TFRAC(6565)=0.820625 ;TFRAC(6566)=0.82075 TFRAC(6567)=0.820875 ;TFRAC(6568)=0.821 TFRAC(6569)=0.821125 ;TFRAC(6570)=0.82125 TFRAC(6571)=0.821375 ;TFRAC(6572)=0.8215 TFRAC(6573)=0.821625 ;TFRAC(6574)=0.82175 TFRAC(6575)=0.821875 ;TFRAC(6576)=0.822 TFRAC(6577)=0.822125 ;TFRAC(6578)=0.82225 TFRAC(6579)=0.822375 ;TFRAC(6580)=0.8225 TFRAC(6581)=0.822625 ;TFRAC(6582)=0.82275 TFRAC(6583)=0.822875 ;TFRAC(6584)=0.823 TFRAC(6585)=0.823125 ;TFRAC(6586)=0.82325 TFRAC(6587)=0.823375 ;TFRAC(6588)=0.8235 TFRAC(6589)=0.823625 ;TFRAC(6590)=0.82375 TFRAC(6591)=0.823875 ;TFRAC(6592)=0.824 TFRAC(6593)=0.824125 ;TFRAC(6594)=0.82425 TFRAC(6595)=0.824375 ;TFRAC(6596)=0.8245 TFRAC(6597)=0.824625 ;TFRAC(6598)=0.82475 TFRAC(6599)=0.824875 ;TFRAC(6600)=0.825 TFRAC(6601)=0.825125 ;TFRAC(6602)=0.82525 TFRAC(6603)=0.825375 ;TFRAC(6604)=0.8255 TFRAC(6605)=0.825625 ;TFRAC(6606)=0.82575 TFRAC(6607)=0.825875 ;TFRAC(6608)=0.826 TFRAC(6609)=0.826125 ;TFRAC(6610)=0.82625 TFRAC(6611)=0.826375 ;TFRAC(6612)=0.8265 TFRAC(6613)=0.826625 ;TFRAC(6614)=0.82675 TFRAC(6615)=0.826875 ;TFRAC(6616)=0.827 TFRAC(6617)=0.827125 ;TFRAC(6618)=0.82725 TFRAC(6619)=0.827375 ;TFRAC(6620)=0.8275 TFRAC(6621)=0.827625 ;TFRAC(6622)=0.82775 TFRAC(6623)=0.827875 ;TFRAC(6624)=0.828 TFRAC(6625)=0.828125 ;TFRAC(6626)=0.82825 TFRAC(6627)=0.828375 ;TFRAC(6628)=0.8285 TFRAC(6629)=0.828625 ;TFRAC(6630)=0.82875 TFRAC(6631)=0.828875 ;TFRAC(6632)=0.829 TFRAC(6633)=0.829125 ;TFRAC(6634)=0.82925 TFRAC(6635)=0.829375 ;TFRAC(6636)=0.8295 TFRAC(6637)=0.829625 ;TFRAC(6638)=0.82975 TFRAC(6639)=0.829875 ;TFRAC(6640)=0.83 TFRAC(6641)=0.830125 ;TFRAC(6642)=0.83025 TFRAC(6643)=0.830375 ;TFRAC(6644)=0.8305 TFRAC(6645)=0.830625 ;TFRAC(6646)=0.83075 TFRAC(6647)=0.830875 ;TFRAC(6648)=0.831 TFRAC(6649)=0.831125 ;TFRAC(6650)=0.83125 TFRAC(6651)=0.831375 ;TFRAC(6652)=0.8315 TFRAC(6653)=0.831625 ;TFRAC(6654)=0.83175 TFRAC(6655)=0.831875 ;TFRAC(6656)=0.832 TFRAC(6657)=0.832125 ;TFRAC(6658)=0.83225 TFRAC(6659)=0.832375 ;TFRAC(6660)=0.8325 TFRAC(6661)=0.832625 ;TFRAC(6662)=0.83275 TFRAC(6663)=0.832875 ;TFRAC(6664)=0.833 TFRAC(6665)=0.833125 ;TFRAC(6666)=0.83325 TFRAC(6667)=0.833375 ;TFRAC(6668)=0.8335 TFRAC(6669)=0.833625 ;TFRAC(6670)=0.83375 TFRAC(6671)=0.833875 ;TFRAC(6672)=0.834 TFRAC(6673)=0.834125 ;TFRAC(6674)=0.83425 TFRAC(6675)=0.834375 ;TFRAC(6676)=0.8345 TFRAC(6677)=0.834625 ;TFRAC(6678)=0.83475 TFRAC(6679)=0.834875 ;TFRAC(6680)=0.835 TFRAC(6681)=0.835125 ;TFRAC(6682)=0.83525 TFRAC(6683)=0.835375 ;TFRAC(6684)=0.8355 TFRAC(6685)=0.835625 ;TFRAC(6686)=0.83575 TFRAC(6687)=0.835875 ;TFRAC(6688)=0.836 TFRAC(6689)=0.836125 ;TFRAC(6690)=0.83625 TFRAC(6691)=0.836375 ;TFRAC(6692)=0.8365 TFRAC(6693)=0.836625 ;TFRAC(6694)=0.83675 TFRAC(6695)=0.836875 ;TFRAC(6696)=0.837 TFRAC(6697)=0.837125 ;TFRAC(6698)=0.83725 TFRAC(6699)=0.837375 ;TFRAC(6700)=0.8375 TFRAC(6701)=0.837625 ;TFRAC(6702)=0.83775 TFRAC(6703)=0.837875 ;TFRAC(6704)=0.838 TFRAC(6705)=0.838125 ;TFRAC(6706)=0.83825 TFRAC(6707)=0.838375 ;TFRAC(6708)=0.8385 TFRAC(6709)=0.838625 ;TFRAC(6710)=0.83875 TFRAC(6711)=0.838875 ;TFRAC(6712)=0.839 TFRAC(6713)=0.839125 ;TFRAC(6714)=0.83925 TFRAC(6715)=0.839375 ;TFRAC(6716)=0.8395 TFRAC(6717)=0.839625 ;TFRAC(6718)=0.83975 TFRAC(6719)=0.839875 ;TFRAC(6720)=0.84 TFRAC(6721)=0.840125 ;TFRAC(6722)=0.84025 TFRAC(6723)=0.840375 ;TFRAC(6724)=0.8405 TFRAC(6725)=0.840625 ;TFRAC(6726)=0.84075 TFRAC(6727)=0.840875 ;TFRAC(6728)=0.841 TFRAC(6729)=0.841125 ;TFRAC(6730)=0.84125 TFRAC(6731)=0.841375 ;TFRAC(6732)=0.8415 TFRAC(6733)=0.841625 ;TFRAC(6734)=0.84175 TFRAC(6735)=0.841875 ;TFRAC(6736)=0.842 TFRAC(6737)=0.842125 ;TFRAC(6738)=0.84225 TFRAC(6739)=0.842375 ;TFRAC(6740)=0.8425 TFRAC(6741)=0.842625 ;TFRAC(6742)=0.84275 TFRAC(6743)=0.842875 ;TFRAC(6744)=0.843 TFRAC(6745)=0.843125 ;TFRAC(6746)=0.84325 TFRAC(6747)=0.843375 ;TFRAC(6748)=0.8435 TFRAC(6749)=0.843625 ;TFRAC(6750)=0.84375 TFRAC(6751)=0.843875 ;TFRAC(6752)=0.844 TFRAC(6753)=0.844125 ;TFRAC(6754)=0.84425 TFRAC(6755)=0.844375 ;TFRAC(6756)=0.8445 TFRAC(6757)=0.844625 ;TFRAC(6758)=0.84475 TFRAC(6759)=0.844875 ;TFRAC(6760)=0.845 TFRAC(6761)=0.845125 ;TFRAC(6762)=0.84525 TFRAC(6763)=0.845375 ;TFRAC(6764)=0.8455 TFRAC(6765)=0.845625 ;TFRAC(6766)=0.84575 TFRAC(6767)=0.845875 ;TFRAC(6768)=0.846 TFRAC(6769)=0.846125 ;TFRAC(6770)=0.84625 TFRAC(6771)=0.846375 ;TFRAC(6772)=0.8465 TFRAC(6773)=0.846625 ;TFRAC(6774)=0.84675 TFRAC(6775)=0.846875 ;TFRAC(6776)=0.847 TFRAC(6777)=0.847125 ;TFRAC(6778)=0.84725 TFRAC(6779)=0.847375 ;TFRAC(6780)=0.8475 TFRAC(6781)=0.847625 ;TFRAC(6782)=0.84775 TFRAC(6783)=0.847875 ;TFRAC(6784)=0.848 TFRAC(6785)=0.848125 ;TFRAC(6786)=0.84825 TFRAC(6787)=0.848375 ;TFRAC(6788)=0.8485 TFRAC(6789)=0.848625 ;TFRAC(6790)=0.84875 TFRAC(6791)=0.848875 ;TFRAC(6792)=0.849 TFRAC(6793)=0.849125 ;TFRAC(6794)=0.84925 TFRAC(6795)=0.849375 ;TFRAC(6796)=0.8495 TFRAC(6797)=0.849625 ;TFRAC(6798)=0.84975 TFRAC(6799)=0.849875 ;TFRAC(6800)=0.85 TFRAC(6801)=0.850125 ;TFRAC(6802)=0.85025 TFRAC(6803)=0.850375 ;TFRAC(6804)=0.8505 TFRAC(6805)=0.850625 ;TFRAC(6806)=0.85075 TFRAC(6807)=0.850875 ;TFRAC(6808)=0.851 TFRAC(6809)=0.851125 ;TFRAC(6810)=0.85125 TFRAC(6811)=0.851375 ;TFRAC(6812)=0.8515 TFRAC(6813)=0.851625 ;TFRAC(6814)=0.85175 TFRAC(6815)=0.851875 ;TFRAC(6816)=0.852 TFRAC(6817)=0.852125 ;TFRAC(6818)=0.85225 TFRAC(6819)=0.852375 ;TFRAC(6820)=0.8525 TFRAC(6821)=0.852625 ;TFRAC(6822)=0.85275 TFRAC(6823)=0.852875 ;TFRAC(6824)=0.853 TFRAC(6825)=0.853125 ;TFRAC(6826)=0.85325 TFRAC(6827)=0.853375 ;TFRAC(6828)=0.8535 TFRAC(6829)=0.853625 ;TFRAC(6830)=0.85375 TFRAC(6831)=0.853875 ;TFRAC(6832)=0.854 TFRAC(6833)=0.854125 ;TFRAC(6834)=0.85425 TFRAC(6835)=0.854375 ;TFRAC(6836)=0.8545 TFRAC(6837)=0.854625 ;TFRAC(6838)=0.85475 TFRAC(6839)=0.854875 ;TFRAC(6840)=0.855 TFRAC(6841)=0.855125 ;TFRAC(6842)=0.85525 TFRAC(6843)=0.855375 ;TFRAC(6844)=0.8555 TFRAC(6845)=0.855625 ;TFRAC(6846)=0.85575 TFRAC(6847)=0.855875 ;TFRAC(6848)=0.856 TFRAC(6849)=0.856125 ;TFRAC(6850)=0.85625 TFRAC(6851)=0.856375 ;TFRAC(6852)=0.8565 TFRAC(6853)=0.856625 ;TFRAC(6854)=0.85675 TFRAC(6855)=0.856875 ;TFRAC(6856)=0.857 TFRAC(6857)=0.857125 ;TFRAC(6858)=0.85725 TFRAC(6859)=0.857375 ;TFRAC(6860)=0.8575 TFRAC(6861)=0.857625 ;TFRAC(6862)=0.85775 TFRAC(6863)=0.857875 ;TFRAC(6864)=0.858 TFRAC(6865)=0.858125 ;TFRAC(6866)=0.85825 TFRAC(6867)=0.858375 ;TFRAC(6868)=0.8585 TFRAC(6869)=0.858625 ;TFRAC(6870)=0.85875 TFRAC(6871)=0.858875 ;TFRAC(6872)=0.859 TFRAC(6873)=0.859125 ;TFRAC(6874)=0.85925 TFRAC(6875)=0.859375 ;TFRAC(6876)=0.8595 TFRAC(6877)=0.859625 ;TFRAC(6878)=0.85975 TFRAC(6879)=0.859875 ;TFRAC(6880)=0.86 TFRAC(6881)=0.860125 ;TFRAC(6882)=0.86025 TFRAC(6883)=0.860375 ;TFRAC(6884)=0.8605 TFRAC(6885)=0.860625 ;TFRAC(6886)=0.86075 TFRAC(6887)=0.860875 ;TFRAC(6888)=0.861 TFRAC(6889)=0.861125 ;TFRAC(6890)=0.86125 TFRAC(6891)=0.861375 ;TFRAC(6892)=0.8615 TFRAC(6893)=0.861625 ;TFRAC(6894)=0.86175 TFRAC(6895)=0.861875 ;TFRAC(6896)=0.862 TFRAC(6897)=0.862125 ;TFRAC(6898)=0.86225 TFRAC(6899)=0.862375 ;TFRAC(6900)=0.8625 TFRAC(6901)=0.862625 ;TFRAC(6902)=0.86275 TFRAC(6903)=0.862875 ;TFRAC(6904)=0.863 TFRAC(6905)=0.863125 ;TFRAC(6906)=0.86325 TFRAC(6907)=0.863375 ;TFRAC(6908)=0.8635 TFRAC(6909)=0.863625 ;TFRAC(6910)=0.86375 TFRAC(6911)=0.863875 ;TFRAC(6912)=0.864 TFRAC(6913)=0.864125 ;TFRAC(6914)=0.86425 TFRAC(6915)=0.864375 ;TFRAC(6916)=0.8645 TFRAC(6917)=0.864625 ;TFRAC(6918)=0.86475 TFRAC(6919)=0.864875 ;TFRAC(6920)=0.865 TFRAC(6921)=0.865125 ;TFRAC(6922)=0.86525 TFRAC(6923)=0.865375 ;TFRAC(6924)=0.8655 TFRAC(6925)=0.865625 ;TFRAC(6926)=0.86575 TFRAC(6927)=0.865875 ;TFRAC(6928)=0.866 TFRAC(6929)=0.866125 ;TFRAC(6930)=0.86625 TFRAC(6931)=0.866375 ;TFRAC(6932)=0.8665 TFRAC(6933)=0.866625 ;TFRAC(6934)=0.86675 TFRAC(6935)=0.866875 ;TFRAC(6936)=0.867 TFRAC(6937)=0.867125 ;TFRAC(6938)=0.86725 TFRAC(6939)=0.867375 ;TFRAC(6940)=0.8675 TFRAC(6941)=0.867625 ;TFRAC(6942)=0.86775 TFRAC(6943)=0.867875 ;TFRAC(6944)=0.868 TFRAC(6945)=0.868125 ;TFRAC(6946)=0.86825 TFRAC(6947)=0.868375 ;TFRAC(6948)=0.8685 TFRAC(6949)=0.868625 ;TFRAC(6950)=0.86875 TFRAC(6951)=0.868875 ;TFRAC(6952)=0.869 TFRAC(6953)=0.869125 ;TFRAC(6954)=0.86925 TFRAC(6955)=0.869375 ;TFRAC(6956)=0.8695 TFRAC(6957)=0.869625 ;TFRAC(6958)=0.86975 TFRAC(6959)=0.869875 ;TFRAC(6960)=0.87 TFRAC(6961)=0.870125 ;TFRAC(6962)=0.87025 TFRAC(6963)=0.870375 ;TFRAC(6964)=0.8705 TFRAC(6965)=0.870625 ;TFRAC(6966)=0.87075 TFRAC(6967)=0.870875 ;TFRAC(6968)=0.871 TFRAC(6969)=0.871125 ;TFRAC(6970)=0.87125 TFRAC(6971)=0.871375 ;TFRAC(6972)=0.8715 TFRAC(6973)=0.871625 ;TFRAC(6974)=0.87175 TFRAC(6975)=0.871875 ;TFRAC(6976)=0.872 TFRAC(6977)=0.872125 ;TFRAC(6978)=0.87225 TFRAC(6979)=0.872375 ;TFRAC(6980)=0.8725 TFRAC(6981)=0.872625 ;TFRAC(6982)=0.87275 TFRAC(6983)=0.872875 ;TFRAC(6984)=0.873 TFRAC(6985)=0.873125 ;TFRAC(6986)=0.87325 TFRAC(6987)=0.873375 ;TFRAC(6988)=0.8735 TFRAC(6989)=0.873625 ;TFRAC(6990)=0.87375 TFRAC(6991)=0.873875 ;TFRAC(6992)=0.874 TFRAC(6993)=0.874125 ;TFRAC(6994)=0.87425 TFRAC(6995)=0.874375 ;TFRAC(6996)=0.8745 TFRAC(6997)=0.874625 ;TFRAC(6998)=0.87475 TFRAC(6999)=0.874875 ;TFRAC(7000)=0.875 TFRAC(7001)=0.875125 ;TFRAC(7002)=0.87525 TFRAC(7003)=0.875375 ;TFRAC(7004)=0.8755 TFRAC(7005)=0.875625 ;TFRAC(7006)=0.87575 TFRAC(7007)=0.875875 ;TFRAC(7008)=0.876 TFRAC(7009)=0.876125 ;TFRAC(7010)=0.87625 TFRAC(7011)=0.876375 ;TFRAC(7012)=0.8765 TFRAC(7013)=0.876625 ;TFRAC(7014)=0.87675 TFRAC(7015)=0.876875 ;TFRAC(7016)=0.877 TFRAC(7017)=0.877125 ;TFRAC(7018)=0.87725 TFRAC(7019)=0.877375 ;TFRAC(7020)=0.8775 TFRAC(7021)=0.877625 ;TFRAC(7022)=0.87775 TFRAC(7023)=0.877875 ;TFRAC(7024)=0.878 TFRAC(7025)=0.878125 ;TFRAC(7026)=0.87825 TFRAC(7027)=0.878375 ;TFRAC(7028)=0.8785 TFRAC(7029)=0.878625 ;TFRAC(7030)=0.87875 TFRAC(7031)=0.878875 ;TFRAC(7032)=0.879 TFRAC(7033)=0.879125 ;TFRAC(7034)=0.87925 TFRAC(7035)=0.879375 ;TFRAC(7036)=0.8795 TFRAC(7037)=0.879625 ;TFRAC(7038)=0.87975 TFRAC(7039)=0.879875 ;TFRAC(7040)=0.88 TFRAC(7041)=0.880125 ;TFRAC(7042)=0.88025 TFRAC(7043)=0.880375 ;TFRAC(7044)=0.8805 TFRAC(7045)=0.880625 ;TFRAC(7046)=0.88075 TFRAC(7047)=0.880875 ;TFRAC(7048)=0.881 TFRAC(7049)=0.881125 ;TFRAC(7050)=0.88125 TFRAC(7051)=0.881375 ;TFRAC(7052)=0.8815 TFRAC(7053)=0.881625 ;TFRAC(7054)=0.88175 TFRAC(7055)=0.881875 ;TFRAC(7056)=0.882 TFRAC(7057)=0.882125 ;TFRAC(7058)=0.88225 TFRAC(7059)=0.882375 ;TFRAC(7060)=0.8825 TFRAC(7061)=0.882625 ;TFRAC(7062)=0.88275 TFRAC(7063)=0.882875 ;TFRAC(7064)=0.883 TFRAC(7065)=0.883125 ;TFRAC(7066)=0.88325 TFRAC(7067)=0.883375 ;TFRAC(7068)=0.8835 TFRAC(7069)=0.883625 ;TFRAC(7070)=0.88375 TFRAC(7071)=0.883875 ;TFRAC(7072)=0.884 TFRAC(7073)=0.884125 ;TFRAC(7074)=0.88425 TFRAC(7075)=0.884375 ;TFRAC(7076)=0.8845 TFRAC(7077)=0.884625 ;TFRAC(7078)=0.88475 TFRAC(7079)=0.884875 ;TFRAC(7080)=0.885 TFRAC(7081)=0.885125 ;TFRAC(7082)=0.88525 TFRAC(7083)=0.885375 ;TFRAC(7084)=0.8855 TFRAC(7085)=0.885625 ;TFRAC(7086)=0.88575 TFRAC(7087)=0.885875 ;TFRAC(7088)=0.886 TFRAC(7089)=0.886125 ;TFRAC(7090)=0.88625 TFRAC(7091)=0.886375 ;TFRAC(7092)=0.8865 TFRAC(7093)=0.886625 ;TFRAC(7094)=0.88675 TFRAC(7095)=0.886875 ;TFRAC(7096)=0.887 TFRAC(7097)=0.887125 ;TFRAC(7098)=0.88725 TFRAC(7099)=0.887375 ;TFRAC(7100)=0.8875 TFRAC(7101)=0.887625 ;TFRAC(7102)=0.88775 TFRAC(7103)=0.887875 ;TFRAC(7104)=0.888 TFRAC(7105)=0.888125 ;TFRAC(7106)=0.88825 TFRAC(7107)=0.888375 ;TFRAC(7108)=0.8885 TFRAC(7109)=0.888625 ;TFRAC(7110)=0.88875 TFRAC(7111)=0.888875 ;TFRAC(7112)=0.889 TFRAC(7113)=0.889125 ;TFRAC(7114)=0.88925 TFRAC(7115)=0.889375 ;TFRAC(7116)=0.8895 TFRAC(7117)=0.889625 ;TFRAC(7118)=0.88975 TFRAC(7119)=0.889875 ;TFRAC(7120)=0.89 TFRAC(7121)=0.890125 ;TFRAC(7122)=0.89025 TFRAC(7123)=0.890375 ;TFRAC(7124)=0.8905 TFRAC(7125)=0.890625 ;TFRAC(7126)=0.89075 TFRAC(7127)=0.890875 ;TFRAC(7128)=0.891 TFRAC(7129)=0.891125 ;TFRAC(7130)=0.89125 TFRAC(7131)=0.891375 ;TFRAC(7132)=0.8915 TFRAC(7133)=0.891625 ;TFRAC(7134)=0.89175 TFRAC(7135)=0.891875 ;TFRAC(7136)=0.892 TFRAC(7137)=0.892125 ;TFRAC(7138)=0.89225 TFRAC(7139)=0.892375 ;TFRAC(7140)=0.8925 TFRAC(7141)=0.892625 ;TFRAC(7142)=0.89275 TFRAC(7143)=0.892875 ;TFRAC(7144)=0.893 TFRAC(7145)=0.893125 ;TFRAC(7146)=0.89325 TFRAC(7147)=0.893375 ;TFRAC(7148)=0.8935 TFRAC(7149)=0.893625 ;TFRAC(7150)=0.89375 TFRAC(7151)=0.893875 ;TFRAC(7152)=0.894 TFRAC(7153)=0.894125 ;TFRAC(7154)=0.89425 TFRAC(7155)=0.894375 ;TFRAC(7156)=0.8945 TFRAC(7157)=0.894625 ;TFRAC(7158)=0.89475 TFRAC(7159)=0.894875 ;TFRAC(7160)=0.895 TFRAC(7161)=0.895125 ;TFRAC(7162)=0.89525 TFRAC(7163)=0.895375 ;TFRAC(7164)=0.8955 TFRAC(7165)=0.895625 ;TFRAC(7166)=0.89575 TFRAC(7167)=0.895875 ;TFRAC(7168)=0.896 TFRAC(7169)=0.896125 ;TFRAC(7170)=0.89625 TFRAC(7171)=0.896375 ;TFRAC(7172)=0.8965 TFRAC(7173)=0.896625 ;TFRAC(7174)=0.89675 TFRAC(7175)=0.896875 ;TFRAC(7176)=0.897 TFRAC(7177)=0.897125 ;TFRAC(7178)=0.89725 TFRAC(7179)=0.897375 ;TFRAC(7180)=0.8975 TFRAC(7181)=0.897625 ;TFRAC(7182)=0.89775 TFRAC(7183)=0.897875 ;TFRAC(7184)=0.898 TFRAC(7185)=0.898125 ;TFRAC(7186)=0.89825 TFRAC(7187)=0.898375 ;TFRAC(7188)=0.8985 TFRAC(7189)=0.898625 ;TFRAC(7190)=0.89875 TFRAC(7191)=0.898875 ;TFRAC(7192)=0.899 TFRAC(7193)=0.899125 ;TFRAC(7194)=0.89925 TFRAC(7195)=0.899375 ;TFRAC(7196)=0.8995 TFRAC(7197)=0.899625 ;TFRAC(7198)=0.89975 TFRAC(7199)=0.899875 ;TFRAC(7200)=0.9 TFRAC(7201)=0.900125 ;TFRAC(7202)=0.90025 TFRAC(7203)=0.900375 ;TFRAC(7204)=0.9005 TFRAC(7205)=0.900625 ;TFRAC(7206)=0.90075 TFRAC(7207)=0.900875 ;TFRAC(7208)=0.901 TFRAC(7209)=0.901125 ;TFRAC(7210)=0.90125 TFRAC(7211)=0.901375 ;TFRAC(7212)=0.9015 TFRAC(7213)=0.901625 ;TFRAC(7214)=0.90175 TFRAC(7215)=0.901875 ;TFRAC(7216)=0.902 TFRAC(7217)=0.902125 ;TFRAC(7218)=0.90225 TFRAC(7219)=0.902375 ;TFRAC(7220)=0.9025 TFRAC(7221)=0.902625 ;TFRAC(7222)=0.90275 TFRAC(7223)=0.902875 ;TFRAC(7224)=0.903 TFRAC(7225)=0.903125 ;TFRAC(7226)=0.90325 TFRAC(7227)=0.903375 ;TFRAC(7228)=0.9035 TFRAC(7229)=0.903625 ;TFRAC(7230)=0.90375 TFRAC(7231)=0.903875 ;TFRAC(7232)=0.904 TFRAC(7233)=0.904125 ;TFRAC(7234)=0.90425 TFRAC(7235)=0.904375 ;TFRAC(7236)=0.9045 TFRAC(7237)=0.904625 ;TFRAC(7238)=0.90475 TFRAC(7239)=0.904875 ;TFRAC(7240)=0.905 TFRAC(7241)=0.905125 ;TFRAC(7242)=0.90525 TFRAC(7243)=0.905375 ;TFRAC(7244)=0.9055 TFRAC(7245)=0.905625 ;TFRAC(7246)=0.90575 TFRAC(7247)=0.905875 ;TFRAC(7248)=0.906 TFRAC(7249)=0.906125 ;TFRAC(7250)=0.90625 TFRAC(7251)=0.906375 ;TFRAC(7252)=0.9065 TFRAC(7253)=0.906625 ;TFRAC(7254)=0.90675 TFRAC(7255)=0.906875 ;TFRAC(7256)=0.907 TFRAC(7257)=0.907125 ;TFRAC(7258)=0.90725 TFRAC(7259)=0.907375 ;TFRAC(7260)=0.9075 TFRAC(7261)=0.907625 ;TFRAC(7262)=0.90775 TFRAC(7263)=0.907875 ;TFRAC(7264)=0.908 TFRAC(7265)=0.908125 ;TFRAC(7266)=0.90825 TFRAC(7267)=0.908375 ;TFRAC(7268)=0.9085 TFRAC(7269)=0.908625 ;TFRAC(7270)=0.90875 TFRAC(7271)=0.908875 ;TFRAC(7272)=0.909 TFRAC(7273)=0.909125 ;TFRAC(7274)=0.90925 TFRAC(7275)=0.909375 ;TFRAC(7276)=0.9095 TFRAC(7277)=0.909625 ;TFRAC(7278)=0.90975 TFRAC(7279)=0.909875 ;TFRAC(7280)=0.91 TFRAC(7281)=0.910125 ;TFRAC(7282)=0.91025 TFRAC(7283)=0.910375 ;TFRAC(7284)=0.9105 TFRAC(7285)=0.910625 ;TFRAC(7286)=0.91075 TFRAC(7287)=0.910875 ;TFRAC(7288)=0.911 TFRAC(7289)=0.911125 ;TFRAC(7290)=0.91125 TFRAC(7291)=0.911375 ;TFRAC(7292)=0.9115 TFRAC(7293)=0.911625 ;TFRAC(7294)=0.91175 TFRAC(7295)=0.911875 ;TFRAC(7296)=0.912 TFRAC(7297)=0.912125 ;TFRAC(7298)=0.91225 TFRAC(7299)=0.912375 ;TFRAC(7300)=0.9125 TFRAC(7301)=0.912625 ;TFRAC(7302)=0.91275 TFRAC(7303)=0.912875 ;TFRAC(7304)=0.913 TFRAC(7305)=0.913125 ;TFRAC(7306)=0.91325 TFRAC(7307)=0.913375 ;TFRAC(7308)=0.9135 TFRAC(7309)=0.913625 ;TFRAC(7310)=0.91375 TFRAC(7311)=0.913875 ;TFRAC(7312)=0.914 TFRAC(7313)=0.914125 ;TFRAC(7314)=0.91425 TFRAC(7315)=0.914375 ;TFRAC(7316)=0.9145 TFRAC(7317)=0.914625 ;TFRAC(7318)=0.91475 TFRAC(7319)=0.914875 ;TFRAC(7320)=0.915 TFRAC(7321)=0.915125 ;TFRAC(7322)=0.91525 TFRAC(7323)=0.915375 ;TFRAC(7324)=0.9155 TFRAC(7325)=0.915625 ;TFRAC(7326)=0.91575 TFRAC(7327)=0.915875 ;TFRAC(7328)=0.916 TFRAC(7329)=0.916125 ;TFRAC(7330)=0.91625 TFRAC(7331)=0.916375 ;TFRAC(7332)=0.9165 TFRAC(7333)=0.916625 ;TFRAC(7334)=0.91675 TFRAC(7335)=0.916875 ;TFRAC(7336)=0.917 TFRAC(7337)=0.917125 ;TFRAC(7338)=0.91725 TFRAC(7339)=0.917375 ;TFRAC(7340)=0.9175 TFRAC(7341)=0.917625 ;TFRAC(7342)=0.91775 TFRAC(7343)=0.917875 ;TFRAC(7344)=0.918 TFRAC(7345)=0.918125 ;TFRAC(7346)=0.91825 TFRAC(7347)=0.918375 ;TFRAC(7348)=0.9185 TFRAC(7349)=0.918625 ;TFRAC(7350)=0.91875 TFRAC(7351)=0.918875 ;TFRAC(7352)=0.919 TFRAC(7353)=0.919125 ;TFRAC(7354)=0.91925 TFRAC(7355)=0.919375 ;TFRAC(7356)=0.9195 TFRAC(7357)=0.919625 ;TFRAC(7358)=0.91975 TFRAC(7359)=0.919875 ;TFRAC(7360)=0.92 TFRAC(7361)=0.920125 ;TFRAC(7362)=0.92025 TFRAC(7363)=0.920375 ;TFRAC(7364)=0.9205 TFRAC(7365)=0.920625 ;TFRAC(7366)=0.92075 TFRAC(7367)=0.920875 ;TFRAC(7368)=0.921 TFRAC(7369)=0.921125 ;TFRAC(7370)=0.92125 TFRAC(7371)=0.921375 ;TFRAC(7372)=0.9215 TFRAC(7373)=0.921625 ;TFRAC(7374)=0.92175 TFRAC(7375)=0.921875 ;TFRAC(7376)=0.922 TFRAC(7377)=0.922125 ;TFRAC(7378)=0.92225 TFRAC(7379)=0.922375 ;TFRAC(7380)=0.9225 TFRAC(7381)=0.922625 ;TFRAC(7382)=0.92275 TFRAC(7383)=0.922875 ;TFRAC(7384)=0.923 TFRAC(7385)=0.923125 ;TFRAC(7386)=0.92325 TFRAC(7387)=0.923375 ;TFRAC(7388)=0.9235 TFRAC(7389)=0.923625 ;TFRAC(7390)=0.92375 TFRAC(7391)=0.923875 ;TFRAC(7392)=0.924 TFRAC(7393)=0.924125 ;TFRAC(7394)=0.92425 TFRAC(7395)=0.924375 ;TFRAC(7396)=0.9245 TFRAC(7397)=0.924625 ;TFRAC(7398)=0.92475 TFRAC(7399)=0.924875 ;TFRAC(7400)=0.925 TFRAC(7401)=0.925125 ;TFRAC(7402)=0.92525 TFRAC(7403)=0.925375 ;TFRAC(7404)=0.9255 TFRAC(7405)=0.925625 ;TFRAC(7406)=0.92575 TFRAC(7407)=0.925875 ;TFRAC(7408)=0.926 TFRAC(7409)=0.926125 ;TFRAC(7410)=0.92625 TFRAC(7411)=0.926375 ;TFRAC(7412)=0.9265 TFRAC(7413)=0.926625 ;TFRAC(7414)=0.92675 TFRAC(7415)=0.926875 ;TFRAC(7416)=0.927 TFRAC(7417)=0.927125 ;TFRAC(7418)=0.92725 TFRAC(7419)=0.927375 ;TFRAC(7420)=0.9275 TFRAC(7421)=0.927625 ;TFRAC(7422)=0.92775 TFRAC(7423)=0.927875 ;TFRAC(7424)=0.928 TFRAC(7425)=0.928125 ;TFRAC(7426)=0.92825 TFRAC(7427)=0.928375 ;TFRAC(7428)=0.9285 TFRAC(7429)=0.928625 ;TFRAC(7430)=0.92875 TFRAC(7431)=0.928875 ;TFRAC(7432)=0.929 TFRAC(7433)=0.929125 ;TFRAC(7434)=0.92925 TFRAC(7435)=0.929375 ;TFRAC(7436)=0.9295 TFRAC(7437)=0.929625 ;TFRAC(7438)=0.92975 TFRAC(7439)=0.929875 ;TFRAC(7440)=0.93 TFRAC(7441)=0.930125 ;TFRAC(7442)=0.93025 TFRAC(7443)=0.930375 ;TFRAC(7444)=0.9305 TFRAC(7445)=0.930625 ;TFRAC(7446)=0.93075 TFRAC(7447)=0.930875 ;TFRAC(7448)=0.931 TFRAC(7449)=0.931125 ;TFRAC(7450)=0.93125 TFRAC(7451)=0.931375 ;TFRAC(7452)=0.9315 TFRAC(7453)=0.931625 ;TFRAC(7454)=0.93175 TFRAC(7455)=0.931875 ;TFRAC(7456)=0.932 TFRAC(7457)=0.932125 ;TFRAC(7458)=0.93225 TFRAC(7459)=0.932375 ;TFRAC(7460)=0.9325 TFRAC(7461)=0.932625 ;TFRAC(7462)=0.93275 TFRAC(7463)=0.932875 ;TFRAC(7464)=0.933 TFRAC(7465)=0.933125 ;TFRAC(7466)=0.93325 TFRAC(7467)=0.933375 ;TFRAC(7468)=0.9335 TFRAC(7469)=0.933625 ;TFRAC(7470)=0.93375 TFRAC(7471)=0.933875 ;TFRAC(7472)=0.934 TFRAC(7473)=0.934125 ;TFRAC(7474)=0.93425 TFRAC(7475)=0.934375 ;TFRAC(7476)=0.9345 TFRAC(7477)=0.934625 ;TFRAC(7478)=0.93475 TFRAC(7479)=0.934875 ;TFRAC(7480)=0.935 TFRAC(7481)=0.935125 ;TFRAC(7482)=0.93525 TFRAC(7483)=0.935375 ;TFRAC(7484)=0.9355 TFRAC(7485)=0.935625 ;TFRAC(7486)=0.93575 TFRAC(7487)=0.935875 ;TFRAC(7488)=0.936 TFRAC(7489)=0.936125 ;TFRAC(7490)=0.93625 TFRAC(7491)=0.936375 ;TFRAC(7492)=0.9365 TFRAC(7493)=0.936625 ;TFRAC(7494)=0.93675 TFRAC(7495)=0.936875 ;TFRAC(7496)=0.937 TFRAC(7497)=0.937125 ;TFRAC(7498)=0.93725 TFRAC(7499)=0.937375 ;TFRAC(7500)=0.9375 TFRAC(7501)=0.937625 ;TFRAC(7502)=0.93775 TFRAC(7503)=0.937875 ;TFRAC(7504)=0.938 TFRAC(7505)=0.938125 ;TFRAC(7506)=0.93825 TFRAC(7507)=0.938375 ;TFRAC(7508)=0.9385 TFRAC(7509)=0.938625 ;TFRAC(7510)=0.93875 TFRAC(7511)=0.938875 ;TFRAC(7512)=0.939 TFRAC(7513)=0.939125 ;TFRAC(7514)=0.93925 TFRAC(7515)=0.939375 ;TFRAC(7516)=0.9395 TFRAC(7517)=0.939625 ;TFRAC(7518)=0.93975 TFRAC(7519)=0.939875 ;TFRAC(7520)=0.94 TFRAC(7521)=0.940125 ;TFRAC(7522)=0.94025 TFRAC(7523)=0.940375 ;TFRAC(7524)=0.9405 TFRAC(7525)=0.940625 ;TFRAC(7526)=0.94075 TFRAC(7527)=0.940875 ;TFRAC(7528)=0.941 TFRAC(7529)=0.941125 ;TFRAC(7530)=0.94125 TFRAC(7531)=0.941375 ;TFRAC(7532)=0.9415 TFRAC(7533)=0.941625 ;TFRAC(7534)=0.94175 TFRAC(7535)=0.941875 ;TFRAC(7536)=0.942 TFRAC(7537)=0.942125 ;TFRAC(7538)=0.94225 TFRAC(7539)=0.942375 ;TFRAC(7540)=0.9425 TFRAC(7541)=0.942625 ;TFRAC(7542)=0.94275 TFRAC(7543)=0.942875 ;TFRAC(7544)=0.943 TFRAC(7545)=0.943125 ;TFRAC(7546)=0.94325 TFRAC(7547)=0.943375 ;TFRAC(7548)=0.9435 TFRAC(7549)=0.943625 ;TFRAC(7550)=0.94375 TFRAC(7551)=0.943875 ;TFRAC(7552)=0.944 TFRAC(7553)=0.944125 ;TFRAC(7554)=0.94425 TFRAC(7555)=0.944375 ;TFRAC(7556)=0.9445 TFRAC(7557)=0.944625 ;TFRAC(7558)=0.94475 TFRAC(7559)=0.944875 ;TFRAC(7560)=0.945 TFRAC(7561)=0.945125 ;TFRAC(7562)=0.94525 TFRAC(7563)=0.945375 ;TFRAC(7564)=0.9455 TFRAC(7565)=0.945625 ;TFRAC(7566)=0.94575 TFRAC(7567)=0.945875 ;TFRAC(7568)=0.946 TFRAC(7569)=0.946125 ;TFRAC(7570)=0.94625 TFRAC(7571)=0.946375 ;TFRAC(7572)=0.9465 TFRAC(7573)=0.946625 ;TFRAC(7574)=0.94675 TFRAC(7575)=0.946875 ;TFRAC(7576)=0.947 TFRAC(7577)=0.947125 ;TFRAC(7578)=0.94725 TFRAC(7579)=0.947375 ;TFRAC(7580)=0.9475 TFRAC(7581)=0.947625 ;TFRAC(7582)=0.94775 TFRAC(7583)=0.947875 ;TFRAC(7584)=0.948 TFRAC(7585)=0.948125 ;TFRAC(7586)=0.94825 TFRAC(7587)=0.948375 ;TFRAC(7588)=0.9485 TFRAC(7589)=0.948625 ;TFRAC(7590)=0.94875 TFRAC(7591)=0.948875 ;TFRAC(7592)=0.949 TFRAC(7593)=0.949125 ;TFRAC(7594)=0.94925 TFRAC(7595)=0.949375 ;TFRAC(7596)=0.9495 TFRAC(7597)=0.949625 ;TFRAC(7598)=0.94975 TFRAC(7599)=0.949875 ;TFRAC(7600)=0.95 TFRAC(7601)=0.950125 ;TFRAC(7602)=0.95025 TFRAC(7603)=0.950375 ;TFRAC(7604)=0.9505 TFRAC(7605)=0.950625 ;TFRAC(7606)=0.95075 TFRAC(7607)=0.950875 ;TFRAC(7608)=0.951 TFRAC(7609)=0.951125 ;TFRAC(7610)=0.95125 TFRAC(7611)=0.951375 ;TFRAC(7612)=0.9515 TFRAC(7613)=0.951625 ;TFRAC(7614)=0.95175 TFRAC(7615)=0.951875 ;TFRAC(7616)=0.952 TFRAC(7617)=0.952125 ;TFRAC(7618)=0.95225 TFRAC(7619)=0.952375 ;TFRAC(7620)=0.9525 TFRAC(7621)=0.952625 ;TFRAC(7622)=0.95275 TFRAC(7623)=0.952875 ;TFRAC(7624)=0.953 TFRAC(7625)=0.953125 ;TFRAC(7626)=0.95325 TFRAC(7627)=0.953375 ;TFRAC(7628)=0.9535 TFRAC(7629)=0.953625 ;TFRAC(7630)=0.95375 TFRAC(7631)=0.953875 ;TFRAC(7632)=0.954 TFRAC(7633)=0.954125 ;TFRAC(7634)=0.95425 TFRAC(7635)=0.954375 ;TFRAC(7636)=0.9545 TFRAC(7637)=0.954625 ;TFRAC(7638)=0.95475 TFRAC(7639)=0.954875 ;TFRAC(7640)=0.955 TFRAC(7641)=0.955125 ;TFRAC(7642)=0.95525 TFRAC(7643)=0.955375 ;TFRAC(7644)=0.9555 TFRAC(7645)=0.955625 ;TFRAC(7646)=0.95575 TFRAC(7647)=0.955875 ;TFRAC(7648)=0.956 TFRAC(7649)=0.956125 ;TFRAC(7650)=0.95625 TFRAC(7651)=0.956375 ;TFRAC(7652)=0.9565 TFRAC(7653)=0.956625 ;TFRAC(7654)=0.95675 TFRAC(7655)=0.956875 ;TFRAC(7656)=0.957 TFRAC(7657)=0.957125 ;TFRAC(7658)=0.95725 TFRAC(7659)=0.957375 ;TFRAC(7660)=0.9575 TFRAC(7661)=0.957625 ;TFRAC(7662)=0.95775 TFRAC(7663)=0.957875 ;TFRAC(7664)=0.958 TFRAC(7665)=0.958125 ;TFRAC(7666)=0.95825 TFRAC(7667)=0.958375 ;TFRAC(7668)=0.9585 TFRAC(7669)=0.958625 ;TFRAC(7670)=0.95875 TFRAC(7671)=0.958875 ;TFRAC(7672)=0.959 TFRAC(7673)=0.959125 ;TFRAC(7674)=0.95925 TFRAC(7675)=0.959375 ;TFRAC(7676)=0.9595 TFRAC(7677)=0.959625 ;TFRAC(7678)=0.95975 TFRAC(7679)=0.959875 ;TFRAC(7680)=0.96 TFRAC(7681)=0.960125 ;TFRAC(7682)=0.96025 TFRAC(7683)=0.960375 ;TFRAC(7684)=0.9605 TFRAC(7685)=0.960625 ;TFRAC(7686)=0.96075 TFRAC(7687)=0.960875 ;TFRAC(7688)=0.961 TFRAC(7689)=0.961125 ;TFRAC(7690)=0.96125 TFRAC(7691)=0.961375 ;TFRAC(7692)=0.9615 TFRAC(7693)=0.961625 ;TFRAC(7694)=0.96175 TFRAC(7695)=0.961875 ;TFRAC(7696)=0.962 TFRAC(7697)=0.962125 ;TFRAC(7698)=0.96225 TFRAC(7699)=0.962375 ;TFRAC(7700)=0.9625 TFRAC(7701)=0.962625 ;TFRAC(7702)=0.96275 TFRAC(7703)=0.962875 ;TFRAC(7704)=0.963 TFRAC(7705)=0.963125 ;TFRAC(7706)=0.96325 TFRAC(7707)=0.963375 ;TFRAC(7708)=0.9635 TFRAC(7709)=0.963625 ;TFRAC(7710)=0.96375 TFRAC(7711)=0.963875 ;TFRAC(7712)=0.964 TFRAC(7713)=0.964125 ;TFRAC(7714)=0.96425 TFRAC(7715)=0.964375 ;TFRAC(7716)=0.9645 TFRAC(7717)=0.964625 ;TFRAC(7718)=0.96475 TFRAC(7719)=0.964875 ;TFRAC(7720)=0.965 TFRAC(7721)=0.965125 ;TFRAC(7722)=0.96525 TFRAC(7723)=0.965375 ;TFRAC(7724)=0.9655 TFRAC(7725)=0.965625 ;TFRAC(7726)=0.96575 TFRAC(7727)=0.965875 ;TFRAC(7728)=0.966 TFRAC(7729)=0.966125 ;TFRAC(7730)=0.96625 TFRAC(7731)=0.966375 ;TFRAC(7732)=0.9665 TFRAC(7733)=0.966625 ;TFRAC(7734)=0.96675 TFRAC(7735)=0.966875 ;TFRAC(7736)=0.967 TFRAC(7737)=0.967125 ;TFRAC(7738)=0.96725 TFRAC(7739)=0.967375 ;TFRAC(7740)=0.9675 TFRAC(7741)=0.967625 ;TFRAC(7742)=0.96775 TFRAC(7743)=0.967875 ;TFRAC(7744)=0.968 TFRAC(7745)=0.968125 ;TFRAC(7746)=0.96825 TFRAC(7747)=0.968375 ;TFRAC(7748)=0.9685 TFRAC(7749)=0.968625 ;TFRAC(7750)=0.96875 TFRAC(7751)=0.968875 ;TFRAC(7752)=0.969 TFRAC(7753)=0.969125 ;TFRAC(7754)=0.96925 TFRAC(7755)=0.969375 ;TFRAC(7756)=0.9695 TFRAC(7757)=0.969625 ;TFRAC(7758)=0.96975 TFRAC(7759)=0.969875 ;TFRAC(7760)=0.97 TFRAC(7761)=0.970125 ;TFRAC(7762)=0.97025 TFRAC(7763)=0.970375 ;TFRAC(7764)=0.9705 TFRAC(7765)=0.970625 ;TFRAC(7766)=0.97075 TFRAC(7767)=0.970875 ;TFRAC(7768)=0.971 TFRAC(7769)=0.971125 ;TFRAC(7770)=0.97125 TFRAC(7771)=0.971375 ;TFRAC(7772)=0.9715 TFRAC(7773)=0.971625 ;TFRAC(7774)=0.97175 TFRAC(7775)=0.971875 ;TFRAC(7776)=0.972 TFRAC(7777)=0.972125 ;TFRAC(7778)=0.97225 TFRAC(7779)=0.972375 ;TFRAC(7780)=0.9725 TFRAC(7781)=0.972625 ;TFRAC(7782)=0.97275 TFRAC(7783)=0.972875 ;TFRAC(7784)=0.973 TFRAC(7785)=0.973125 ;TFRAC(7786)=0.97325 TFRAC(7787)=0.973375 ;TFRAC(7788)=0.9735 TFRAC(7789)=0.973625 ;TFRAC(7790)=0.97375 TFRAC(7791)=0.973875 ;TFRAC(7792)=0.974 TFRAC(7793)=0.974125 ;TFRAC(7794)=0.97425 TFRAC(7795)=0.974375 ;TFRAC(7796)=0.9745 TFRAC(7797)=0.974625 ;TFRAC(7798)=0.97475 TFRAC(7799)=0.974875 ;TFRAC(7800)=0.975 TFRAC(7801)=0.975125 ;TFRAC(7802)=0.97525 TFRAC(7803)=0.975375 ;TFRAC(7804)=0.9755 TFRAC(7805)=0.975625 ;TFRAC(7806)=0.97575 TFRAC(7807)=0.975875 ;TFRAC(7808)=0.976 TFRAC(7809)=0.976125 ;TFRAC(7810)=0.97625 TFRAC(7811)=0.976375 ;TFRAC(7812)=0.9765 TFRAC(7813)=0.976625 ;TFRAC(7814)=0.97675 TFRAC(7815)=0.976875 ;TFRAC(7816)=0.977 TFRAC(7817)=0.977125 ;TFRAC(7818)=0.97725 TFRAC(7819)=0.977375 ;TFRAC(7820)=0.9775 TFRAC(7821)=0.977625 ;TFRAC(7822)=0.97775 TFRAC(7823)=0.977875 ;TFRAC(7824)=0.978 TFRAC(7825)=0.978125 ;TFRAC(7826)=0.97825 TFRAC(7827)=0.978375 ;TFRAC(7828)=0.9785 TFRAC(7829)=0.978625 ;TFRAC(7830)=0.97875 TFRAC(7831)=0.978875 ;TFRAC(7832)=0.979 TFRAC(7833)=0.979125 ;TFRAC(7834)=0.97925 TFRAC(7835)=0.979375 ;TFRAC(7836)=0.9795 TFRAC(7837)=0.979625 ;TFRAC(7838)=0.97975 TFRAC(7839)=0.979875 ;TFRAC(7840)=0.98 TFRAC(7841)=0.980125 ;TFRAC(7842)=0.98025 TFRAC(7843)=0.980375 ;TFRAC(7844)=0.9805 TFRAC(7845)=0.980625 ;TFRAC(7846)=0.98075 TFRAC(7847)=0.980875 ;TFRAC(7848)=0.981 TFRAC(7849)=0.981125 ;TFRAC(7850)=0.98125 TFRAC(7851)=0.981375 ;TFRAC(7852)=0.9815 TFRAC(7853)=0.981625 ;TFRAC(7854)=0.98175 TFRAC(7855)=0.981875 ;TFRAC(7856)=0.982 TFRAC(7857)=0.982125 ;TFRAC(7858)=0.98225 TFRAC(7859)=0.982375 ;TFRAC(7860)=0.9825 TFRAC(7861)=0.982625 ;TFRAC(7862)=0.98275 TFRAC(7863)=0.982875 ;TFRAC(7864)=0.983 TFRAC(7865)=0.983125 ;TFRAC(7866)=0.98325 TFRAC(7867)=0.983375 ;TFRAC(7868)=0.9835 TFRAC(7869)=0.983625 ;TFRAC(7870)=0.98375 TFRAC(7871)=0.983875 ;TFRAC(7872)=0.984 TFRAC(7873)=0.984125 ;TFRAC(7874)=0.98425 TFRAC(7875)=0.984375 ;TFRAC(7876)=0.9845 TFRAC(7877)=0.984625 ;TFRAC(7878)=0.98475 TFRAC(7879)=0.984875 ;TFRAC(7880)=0.985 TFRAC(7881)=0.985125 ;TFRAC(7882)=0.98525 TFRAC(7883)=0.985375 ;TFRAC(7884)=0.9855 TFRAC(7885)=0.985625 ;TFRAC(7886)=0.98575 TFRAC(7887)=0.985875 ;TFRAC(7888)=0.986 TFRAC(7889)=0.986125 ;TFRAC(7890)=0.98625 TFRAC(7891)=0.986375 ;TFRAC(7892)=0.9865 TFRAC(7893)=0.986625 ;TFRAC(7894)=0.98675 TFRAC(7895)=0.986875 ;TFRAC(7896)=0.987 TFRAC(7897)=0.987125 ;TFRAC(7898)=0.98725 TFRAC(7899)=0.987375 ;TFRAC(7900)=0.9875 TFRAC(7901)=0.987625 ;TFRAC(7902)=0.98775 TFRAC(7903)=0.987875 ;TFRAC(7904)=0.988 TFRAC(7905)=0.988125 ;TFRAC(7906)=0.98825 TFRAC(7907)=0.988375 ;TFRAC(7908)=0.9885 TFRAC(7909)=0.988625 ;TFRAC(7910)=0.98875 TFRAC(7911)=0.988875 ;TFRAC(7912)=0.989 TFRAC(7913)=0.989125 ;TFRAC(7914)=0.98925 TFRAC(7915)=0.989375 ;TFRAC(7916)=0.9895 TFRAC(7917)=0.989625 ;TFRAC(7918)=0.98975 TFRAC(7919)=0.989875 ;TFRAC(7920)=0.99 TFRAC(7921)=0.990125 ;TFRAC(7922)=0.99025 TFRAC(7923)=0.990375 ;TFRAC(7924)=0.9905 TFRAC(7925)=0.990625 ;TFRAC(7926)=0.99075 TFRAC(7927)=0.990875 ;TFRAC(7928)=0.991 TFRAC(7929)=0.991125 ;TFRAC(7930)=0.99125 TFRAC(7931)=0.991375 ;TFRAC(7932)=0.9915 TFRAC(7933)=0.991625 ;TFRAC(7934)=0.99175 TFRAC(7935)=0.991875 ;TFRAC(7936)=0.992 TFRAC(7937)=0.992125 ;TFRAC(7938)=0.99225 TFRAC(7939)=0.992375 ;TFRAC(7940)=0.9925 TFRAC(7941)=0.992625 ;TFRAC(7942)=0.99275 TFRAC(7943)=0.992875 ;TFRAC(7944)=0.993 TFRAC(7945)=0.993125 ;TFRAC(7946)=0.99325 TFRAC(7947)=0.993375 ;TFRAC(7948)=0.9935 TFRAC(7949)=0.993625 ;TFRAC(7950)=0.99375 TFRAC(7951)=0.993875 ;TFRAC(7952)=0.994 TFRAC(7953)=0.994125 ;TFRAC(7954)=0.99425 TFRAC(7955)=0.994375 ;TFRAC(7956)=0.9945 TFRAC(7957)=0.994625 ;TFRAC(7958)=0.99475 TFRAC(7959)=0.994875 ;TFRAC(7960)=0.995 TFRAC(7961)=0.995125 ;TFRAC(7962)=0.99525 TFRAC(7963)=0.995375 ;TFRAC(7964)=0.9955 TFRAC(7965)=0.995625 ;TFRAC(7966)=0.99575 TFRAC(7967)=0.995875 ;TFRAC(7968)=0.996 TFRAC(7969)=0.996125 ;TFRAC(7970)=0.99625 TFRAC(7971)=0.996375 ;TFRAC(7972)=0.9965 TFRAC(7973)=0.996625 ;TFRAC(7974)=0.99675 TFRAC(7975)=0.996875 ;TFRAC(7976)=0.997 TFRAC(7977)=0.997125 ;TFRAC(7978)=0.99725 TFRAC(7979)=0.997375 ;TFRAC(7980)=0.9975 TFRAC(7981)=0.997625 ;TFRAC(7982)=0.99775 TFRAC(7983)=0.997875 ;TFRAC(7984)=0.998 TFRAC(7985)=0.998125 ;TFRAC(7986)=0.99825 TFRAC(7987)=0.998375 ;TFRAC(7988)=0.9985 TFRAC(7989)=0.998625 ;TFRAC(7990)=0.99875 TFRAC(7991)=0.998875 ;TFRAC(7992)=0.999 TFRAC(7993)=0.999125 ;TFRAC(7994)=0.99925 TFRAC(7995)=0.999375 ;TFRAC(7996)=0.9995 TFRAC(7997)=0.999625 ;TFRAC(7998)=0.99975 TFRAC(7999)=0.999875 ;TFRAC(8000)=1. ************************************************************ Group 3. X-Direction Grid Spacing CARTES = T NX = 200 XULAST =0.01062 XFRAC(1)=2.777779E-03 ;XFRAC(2)=5.555558E-03 XFRAC(3)=8.333337E-03 ;XFRAC(4)=0.011111 XFRAC(5)=0.013889 ;XFRAC(6)=0.016667 XFRAC(7)=0.019444 ;XFRAC(8)=0.022222 XFRAC(9)=0.025 ;XFRAC(10)=0.027778 XFRAC(11)=0.030556 ;XFRAC(12)=0.033333 XFRAC(13)=0.036111 ;XFRAC(14)=0.038889 XFRAC(15)=0.041667 ;XFRAC(16)=0.044444 XFRAC(17)=0.047222 ;XFRAC(18)=0.05 XFRAC(19)=0.052778 ;XFRAC(20)=0.055556 XFRAC(21)=0.058333 ;XFRAC(22)=0.061111 XFRAC(23)=0.063889 ;XFRAC(24)=0.066667 XFRAC(25)=0.069444 ;XFRAC(26)=0.072222 XFRAC(27)=0.075 ;XFRAC(28)=0.077778 XFRAC(29)=0.080556 ;XFRAC(30)=0.083333 XFRAC(31)=0.086111 ;XFRAC(32)=0.088889 XFRAC(33)=0.091667 ;XFRAC(34)=0.094444 XFRAC(35)=0.097222 ;XFRAC(36)=0.1 XFRAC(37)=0.102778 ;XFRAC(38)=0.105556 XFRAC(39)=0.108333 ;XFRAC(40)=0.111111 XFRAC(41)=0.116667 ;XFRAC(42)=0.122222 XFRAC(43)=0.127778 ;XFRAC(44)=0.133333 XFRAC(45)=0.138889 ;XFRAC(46)=0.144444 XFRAC(47)=0.15 ;XFRAC(48)=0.155556 XFRAC(49)=0.161111 ;XFRAC(50)=0.166667 XFRAC(51)=0.172222 ;XFRAC(52)=0.177778 XFRAC(53)=0.183333 ;XFRAC(54)=0.188889 XFRAC(55)=0.194444 ;XFRAC(56)=0.2 XFRAC(57)=0.205556 ;XFRAC(58)=0.211111 XFRAC(59)=0.216667 ;XFRAC(60)=0.222222 XFRAC(61)=0.227778 ;XFRAC(62)=0.233333 XFRAC(63)=0.238889 ;XFRAC(64)=0.244444 XFRAC(65)=0.25 ;XFRAC(66)=0.255556 XFRAC(67)=0.261111 ;XFRAC(68)=0.266667 XFRAC(69)=0.272222 ;XFRAC(70)=0.277778 XFRAC(71)=0.283333 ;XFRAC(72)=0.288889 XFRAC(73)=0.294444 ;XFRAC(74)=0.3 XFRAC(75)=0.305556 ;XFRAC(76)=0.311111 XFRAC(77)=0.316667 ;XFRAC(78)=0.322222 XFRAC(79)=0.327778 ;XFRAC(80)=0.333333 XFRAC(81)=0.338889 ;XFRAC(82)=0.344444 XFRAC(83)=0.35 ;XFRAC(84)=0.355556 XFRAC(85)=0.361111 ;XFRAC(86)=0.366667 XFRAC(87)=0.372222 ;XFRAC(88)=0.377778 XFRAC(89)=0.383333 ;XFRAC(90)=0.388889 XFRAC(91)=0.394444 ;XFRAC(92)=0.4 XFRAC(93)=0.405556 ;XFRAC(94)=0.411111 XFRAC(95)=0.416667 ;XFRAC(96)=0.422222 XFRAC(97)=0.427778 ;XFRAC(98)=0.433333 XFRAC(99)=0.438889 ;XFRAC(100)=0.444444 XFRAC(101)=0.45 ;XFRAC(102)=0.455555 XFRAC(103)=0.461111 ;XFRAC(104)=0.466667 XFRAC(105)=0.472222 ;XFRAC(106)=0.477778 XFRAC(107)=0.483333 ;XFRAC(108)=0.488889 XFRAC(109)=0.494444 ;XFRAC(110)=0.5 XFRAC(111)=0.505556 ;XFRAC(112)=0.511111 XFRAC(113)=0.516667 ;XFRAC(114)=0.522222 XFRAC(115)=0.527778 ;XFRAC(116)=0.533333 XFRAC(117)=0.538889 ;XFRAC(118)=0.544444 XFRAC(119)=0.55 ;XFRAC(120)=0.555556 XFRAC(121)=0.561111 ;XFRAC(122)=0.566667 XFRAC(123)=0.572222 ;XFRAC(124)=0.577778 XFRAC(125)=0.583333 ;XFRAC(126)=0.588889 XFRAC(127)=0.594444 ;XFRAC(128)=0.6 XFRAC(129)=0.605555 ;XFRAC(130)=0.611111 XFRAC(131)=0.616667 ;XFRAC(132)=0.622222 XFRAC(133)=0.627778 ;XFRAC(134)=0.633333 XFRAC(135)=0.638889 ;XFRAC(136)=0.644444 XFRAC(137)=0.65 ;XFRAC(138)=0.655556 XFRAC(139)=0.661111 ;XFRAC(140)=0.666667 XFRAC(141)=0.672222 ;XFRAC(142)=0.677778 XFRAC(143)=0.683333 ;XFRAC(144)=0.688889 XFRAC(145)=0.694444 ;XFRAC(146)=0.7 XFRAC(147)=0.705555 ;XFRAC(148)=0.711111 XFRAC(149)=0.716667 ;XFRAC(150)=0.722222 XFRAC(151)=0.727778 ;XFRAC(152)=0.733333 XFRAC(153)=0.738889 ;XFRAC(154)=0.744444 XFRAC(155)=0.75 ;XFRAC(156)=0.755556 XFRAC(157)=0.761111 ;XFRAC(158)=0.766667 XFRAC(159)=0.772222 ;XFRAC(160)=0.777778 XFRAC(161)=0.783333 ;XFRAC(162)=0.788889 XFRAC(163)=0.794444 ;XFRAC(164)=0.8 XFRAC(165)=0.805556 ;XFRAC(166)=0.811111 XFRAC(167)=0.816667 ;XFRAC(168)=0.822222 XFRAC(169)=0.827778 ;XFRAC(170)=0.833333 XFRAC(171)=0.838889 ;XFRAC(172)=0.844444 XFRAC(173)=0.85 ;XFRAC(174)=0.855556 XFRAC(175)=0.861111 ;XFRAC(176)=0.866667 XFRAC(177)=0.872222 ;XFRAC(178)=0.877778 XFRAC(179)=0.883333 ;XFRAC(180)=0.888889 XFRAC(181)=0.894444 ;XFRAC(182)=0.9 XFRAC(183)=0.905556 ;XFRAC(184)=0.911111 XFRAC(185)=0.916667 ;XFRAC(186)=0.922222 XFRAC(187)=0.927778 ;XFRAC(188)=0.933333 XFRAC(189)=0.938889 ;XFRAC(190)=0.944444 XFRAC(191)=0.95 ;XFRAC(192)=0.955556 XFRAC(193)=0.961111 ;XFRAC(194)=0.966667 XFRAC(195)=0.972222 ;XFRAC(196)=0.977778 XFRAC(197)=0.983333 ;XFRAC(198)=0.988889 XFRAC(199)=0.994444 ;XFRAC(200)=1. ************************************************************ Group 4. Y-Direction Grid Spacing NY = 120 YVLAST =4.13E-03 YFRAC(1)=8.333335E-03 ;YFRAC(2)=0.016667 YFRAC(3)=0.025 ;YFRAC(4)=0.033333 YFRAC(5)=0.041667 ;YFRAC(6)=0.05 YFRAC(7)=0.058333 ;YFRAC(8)=0.066667 YFRAC(9)=0.075 ;YFRAC(10)=0.083333 YFRAC(11)=0.091667 ;YFRAC(12)=0.1 YFRAC(13)=0.108425 ;YFRAC(14)=0.11685 YFRAC(15)=0.125275 ;YFRAC(16)=0.1337 YFRAC(17)=0.142125 ;YFRAC(18)=0.150549 YFRAC(19)=0.158974 ;YFRAC(20)=0.167399 YFRAC(21)=0.175824 ;YFRAC(22)=0.184249 YFRAC(23)=0.192674 ;YFRAC(24)=0.201099 YFRAC(25)=0.209524 ;YFRAC(26)=0.217949 YFRAC(27)=0.226374 ;YFRAC(28)=0.234799 YFRAC(29)=0.243223 ;YFRAC(30)=0.251648 YFRAC(31)=0.260073 ;YFRAC(32)=0.268498 YFRAC(33)=0.276923 ;YFRAC(34)=0.285348 YFRAC(35)=0.293773 ;YFRAC(36)=0.302198 YFRAC(37)=0.310623 ;YFRAC(38)=0.319048 YFRAC(39)=0.327473 ;YFRAC(40)=0.335897 YFRAC(41)=0.344322 ;YFRAC(42)=0.352747 YFRAC(43)=0.361172 ;YFRAC(44)=0.369597 YFRAC(45)=0.378022 ;YFRAC(46)=0.386447 YFRAC(47)=0.394872 ;YFRAC(48)=0.403297 YFRAC(49)=0.411722 ;YFRAC(50)=0.420147 YFRAC(51)=0.428571 ;YFRAC(52)=0.436975 YFRAC(53)=0.445378 ;YFRAC(54)=0.453782 YFRAC(55)=0.462185 ;YFRAC(56)=0.470588 YFRAC(57)=0.478992 ;YFRAC(58)=0.487395 YFRAC(59)=0.495798 ;YFRAC(60)=0.504202 YFRAC(61)=0.512605 ;YFRAC(62)=0.521008 YFRAC(63)=0.529412 ;YFRAC(64)=0.537815 YFRAC(65)=0.546218 ;YFRAC(66)=0.554622 YFRAC(67)=0.563025 ;YFRAC(68)=0.571429 YFRAC(69)=0.57973 ;YFRAC(70)=0.588032 YFRAC(71)=0.596333 ;YFRAC(72)=0.604635 YFRAC(73)=0.612937 ;YFRAC(74)=0.621238 YFRAC(75)=0.62954 ;YFRAC(76)=0.637842 YFRAC(77)=0.646143 ;YFRAC(78)=0.654445 YFRAC(79)=0.662746 ;YFRAC(80)=0.671048 YFRAC(81)=0.67935 ;YFRAC(82)=0.687651 YFRAC(83)=0.695953 ;YFRAC(84)=0.704255 YFRAC(85)=0.712556 ;YFRAC(86)=0.720858 YFRAC(87)=0.729159 ;YFRAC(88)=0.737461 YFRAC(89)=0.745763 ;YFRAC(90)=0.754064 YFRAC(91)=0.762366 ;YFRAC(92)=0.770668 YFRAC(93)=0.778969 ;YFRAC(94)=0.787271 YFRAC(95)=0.795573 ;YFRAC(96)=0.803874 YFRAC(97)=0.812176 ;YFRAC(98)=0.820477 YFRAC(99)=0.828779 ;YFRAC(100)=0.837081 YFRAC(101)=0.845382 ;YFRAC(102)=0.853684 YFRAC(103)=0.861986 ;YFRAC(104)=0.870287 YFRAC(105)=0.878589 ;YFRAC(106)=0.88689 YFRAC(107)=0.895192 ;YFRAC(108)=0.903494 YFRAC(109)=0.911795 ;YFRAC(110)=0.920097 YFRAC(111)=0.928087 ;YFRAC(112)=0.936078 YFRAC(113)=0.944068 ;YFRAC(114)=0.952058 YFRAC(115)=0.960048 ;YFRAC(116)=0.968039 YFRAC(117)=0.976029 ;YFRAC(118)=0.984019 YFRAC(119)=0.99201 ;YFRAC(120)=1. ************************************************************ Group 5. Z-Direction Grid Spacing PARAB = F NZ = 1 ZWLAST =5.0E-04 ************************************************************ Group 6. Body-Fitted Coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T NAME(1)=P1 ;NAME(3)=U1 NAME(5)=V1 ;NAME(141)=SURT NAME(146)=ENUL ;NAME(147)=PRPS NAME(148)=VFOL ;NAME(149)=DEN1 NAME(150)=SURN * 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(SURT,Y,N,N,N,N,Y) SOLUTN(ENUL,Y,N,N,N,N,Y) SOLUTN(PRPS,Y,N,N,N,N,Y) SOLUTN(VFOL,Y,Y,N,Y,N,Y) SOLUTN(DEN1,Y,N,N,N,N,Y) SOLUTN(SURN,Y,Y,N,Y,N,Y) DEN1 = 149 VISL = 146 PRPS = 147 ************************************************************ 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(VFOL,N,N,N,N,Y,N) TERMS(SURN,N,N,N,N,Y,N) DIFCUT =0.5 ;ZDIFAC =1. GALA = T ;ADDDIF = F RUPLIM =0.999 ;RLOLIM =1.0E-03 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. PRT(U1)=1. ;PRT(V1)=1. CP1 =4181.799805 ;CP2 =1. ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initial field variables (PHIs) FIINIT(P1)=1.0E-10 ;FIINIT(U1)=1.0E-10 FIINIT(V1)=1.0E-10 ;FIINIT(SURT)=1.0E-10 FIINIT(ENUL)=1.0E-10 ;FIINIT(PRPS)=-1. FIINIT(VFOL)=0. ;FIINIT(DEN1)=780. FIINIT(SURN)=0. PATCH(^WATER ,INIVAL, 1, 0, 0, 0, 0, 0, 1, 1) INIT(^WATER ,SURT,0. ,1. ) INIT(^WATER ,VFOL,0. ,1. ) INIT(^WATER ,SURN,0. ,1. ) PATCH(^OB2 ,INIVAL, 2, 0, 0, 0, 0, 0, 1, 1) INIT(^OB2 ,PRPS,0. ,198. ) INIT(^OB2 ,VFOL,0. ,0. ) INIT(^OB2 ,SURN,0. ,0. ) PATCH(^OB3 ,INIVAL, 3, 0, 0, 0, 0, 0, 1, 1) INIT(^OB3 ,PRPS,0. ,198. ) INIT(^OB3 ,VFOL,0. ,0. ) INIT(^OB3 ,SURN,0. ,0. ) 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(STENS ,PHASEM, 1, 200, 1, 120, 1, 1, 1, 8000) COVAL(STENS ,U1 , FIXFLU , GRND3 ) COVAL(STENS ,V1 , FIXFLU , GRND3 ) PATCH(TCON ,CELL , 1, 200, 1, 120, 1, 1, 1, 8000) COVAL(TCON ,SURN, GRND , GRND ) PATCH(^OB4 ,NORTH , 4, 0, 0, 0, 0, 0, 1, 8000) COVAL(^OB4 ,P1 , FIXFLU ,9.396937 ) COVAL(^OB4 ,U1 ,0. ,0. ) COVAL(^OB4 ,V1 ,0. ,-9.4136E-03 ) COVAL(^OB4 ,VFOL,0. ,1.001773E-03 ) COVAL(^OB4 ,SURN, FIXFLU , GRND1 ) PATCH(^OB5 ,SOUTH , 5, 0, 0, 0, 0, 0, 1, 8000) COVAL(^OB5 ,P1 , FIXFLU ,7.53088 ) COVAL(^OB5 ,U1 ,0. ,0. ) COVAL(^OB5 ,V1 ,0. ,9.4136E-03 ) COVAL(^OB5 ,VFOL,0. ,1.25E-03 ) COVAL(^OB5 ,SURN, FIXFLU , GRND1 ) PATCH(^OB6 ,EAST , 6, 0, 0, 0, 0, 0, 1, 8000) COVAL(^OB6 ,P1 , GRND1 ,0. ) COVAL(^OB6 ,U1 ,0. ,0. ) COVAL(^OB6 ,V1 ,0. ,0. ) COVAL(^OB6 ,VFOL,0. ,1.001773E-03 ) COVAL(^OB6 ,SURN, FIXFLU , GRND1 ) PATCH(^OB7 ,CELL , 7, 6, 0, 0, 0, 0, 1, 8000) COVAL(^OB7 ,V1 ,1. ,0. ) XCYCLE = F EGWF = T WALLCO = GRND2 ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 40 ;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(VFOL)=1 LITER(SURN)=1 ENDIT(P1)=1.0E-05 ;ENDIT(U1)=1.0E-03 ENDIT(V1)=1.0E-03 ;ENDIT(VFOL)=1.0E-03 ENDIT(SURN)=1.0E-03 ************************************************************ Group 17. Relaxation RELAX(P1,LINRLX,1.) RELAX(U1,FALSDT,0.5) RELAX(V1,FALSDT,0.5) RELAX(SURT,LINRLX,1.) RELAX(ENUL,LINRLX,1.) RELAX(PRPS,LINRLX,1.) RELAX(VFOL,LINRLX,1.) RELAX(DEN1,LINRLX,1.) RELAX(SURN,LINRLX,1.) 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(SURT)=1.0E+10 ;VARMIN(SURT)=-1.0E+10 VARMAX(ENUL)=1.0E+10 ;VARMIN(ENUL)=-1.0E+10 VARMAX(PRPS)=1.0E+10 ;VARMIN(PRPS)=-1.0E+10 VARMAX(VFOL)=1.0E+10 ;VARMIN(VFOL)=-1.0E+10 VARMAX(DEN1)=1.0E+10 ;VARMIN(DEN1)=-1.0E+10 VARMAX(SURN)=1. ;VARMIN(SURN)=0. ************************************************************ Group 19. Data transmitted to GROUND SURF = T PARSOL = F IPRPSA = 67 ;IPRPSB = 58 ISG21 = 5 ISG62 = 1 ISURFA = 5 BTATHC =3.5 ISRFTA = 1 SURFTA =0.045 ;SURFTB=0. ;SURFTC=0. VOFCNT = T CNTANG =1. SPEDAT(SET,RESTRT,PBCL,C,PBCL.DAT) SPEDAT(SET,VOF,LTSS,L,F) SPEDAT(SET,SOLPHI,P1,I,24) SPEDAT(SET,SOLPHI,U1,I,0) SPEDAT(SET,PREPHI,U1,I,0) SPEDAT(SET,SOLPHI,V1,I,0) SPEDAT(SET,PREPHI,V1,I,0) SPEDAT(SET,SOLPHI,VFOL,I,0) SPEDAT(SET,PREPHI,VFOL,I,0) SPEDAT(SET,SOLPHI,SURN,I,0) SPEDAT(SET,PREPHI,SURN,I,0) SPEDAT(SET,MAXINC,VFOL,R,1.) SPEDAT(SET,MAXINC,SURN,R,1.) SPEDAT(SET,GXMONI,PLOTALL,L,T) SPEDAT(SET,GXMONI,CLASSIC,L,T) SPEDAT(SET,OBJNAM,^WATER,C,WATLEV) SPEDAT(SET,OBJTYP,^WATER,C,USER_DEFINED) SPEDAT(SET,OBJNAM,^OB2,C,BLK1) SPEDAT(SET,OBJTYP,^OB2,C,BLOCKAGE) SPEDAT(SET,BLK1,MATERIAL,R,198.) SPEDAT(SET,OBJNAM,^OB3,C,BLK2) SPEDAT(SET,OBJTYP,^OB3,C,BLOCKAGE) SPEDAT(SET,BLK2,MATERIAL,R,198.) SPEDAT(SET,OBJNAM,^OB4,C,INW) SPEDAT(SET,OBJTYP,^OB4,C,INLET) SPEDAT(SET,OBJNAM,^OB5,C,INK) SPEDAT(SET,OBJTYP,^OB5,C,INLET) SPEDAT(SET,OBJNAM,^OB6,C,OUT) SPEDAT(SET,OBJTYP,^OB6,C,OUTLET) SPEDAT(SET,ARATIO,^OB6,R,1.) SPEDAT(SET,OBJNAM,^OB7,C,PLAT7) SPEDAT(SET,OBJTYP,^OB7,C,PLATE) SPEDAT(SET,OBJNAM,!OB8,C,NULL8) SPEDAT(SET,OBJTYP,!OB8,C,NULL) SPEDAT(SET,FACETDAT,NUMOBJ,I,8) SPEDAT(SET,MATERIAL,198,L,T) SPEDAT(SET,MATERIAL,67,L,T) SPEDAT(SET,MATERIAL,58,L,T) ************************************************************ Group 20. Preliminary Printout DISTIL = T ;NULLPR = F NDST = 0 DSTTOL =1.0E-02 EX(P1)=16.049999 ;EX(U1)=2.757E-03 EX(V1)=1.602E-03 ;EX(SURT)=0.1124 EX(ENUL)=3.431E-07 ;EX(PRPS)=194.600006 EX(VFOL)=0.1121 ;EX(DEN1)=202.800003 EX(SURN)=0.1121 ************************************************************ 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(SURT,N,N,Y,N,N,N) OUTPUT(ENUL,N,N,Y,N,N,N) OUTPUT(PRPS,N,N,Y,N,N,N) OUTPUT(VFOL,N,Y,Y,N,Y,Y) OUTPUT(DEN1,N,N,Y,N,N,N) OUTPUT(SURN,N,Y,Y,Y,Y,Y) ************************************************************ Group 22. Monitor Print-Out IXMON = 9 ;IYMON = 62 ;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 = 100 ;IDISPB = 0 ;IDISPC = 0 CSG1 ='A' STOP