TALK=T;RUN(1,1)
 ************************************************************
  Group 1. Run Title and Number
 ************************************************************
 ************************************************************
 
 TEXT(Film Boiling in 2D THINC                )
 
 ************************************************************
 ************************************************************
 
 IRUNN = 1 ;LIBREF = 0
 ************************************************************
  Group 2. Time dependence
 STEADY = F
    * Set overall time and no. of steps
 TFIRST =0. ;TLAST =2.
 FSTEP = 1 ;LSTEP = 4000
 TFRAC(1)=2.5E-04 ;TFRAC(2)=5.0E-04
 TFRAC(3)=7.5E-04 ;TFRAC(4)=1.0E-03
 TFRAC(5)=1.25E-03 ;TFRAC(6)=1.5E-03
 TFRAC(7)=1.75E-03 ;TFRAC(8)=2.0E-03
 TFRAC(9)=2.25E-03 ;TFRAC(10)=2.5E-03
 TFRAC(11)=2.75E-03 ;TFRAC(12)=3.0E-03
 TFRAC(13)=3.25E-03 ;TFRAC(14)=3.5E-03
 TFRAC(15)=3.75E-03 ;TFRAC(16)=4.0E-03
 TFRAC(17)=4.25E-03 ;TFRAC(18)=4.5E-03
 TFRAC(19)=4.75E-03 ;TFRAC(20)=5.0E-03
 TFRAC(21)=5.25E-03 ;TFRAC(22)=5.5E-03
 TFRAC(23)=5.75E-03 ;TFRAC(24)=6.0E-03
 TFRAC(25)=6.25E-03 ;TFRAC(26)=6.5E-03
 TFRAC(27)=6.75E-03 ;TFRAC(28)=7.0E-03
 TFRAC(29)=7.25E-03 ;TFRAC(30)=7.5E-03
 TFRAC(31)=7.75E-03 ;TFRAC(32)=8.0E-03
 TFRAC(33)=8.25E-03 ;TFRAC(34)=8.5E-03
 TFRAC(35)=8.75E-03 ;TFRAC(36)=9.0E-03
 TFRAC(37)=9.25E-03 ;TFRAC(38)=9.5E-03
 TFRAC(39)=9.75E-03 ;TFRAC(40)=1.0E-02
 TFRAC(41)=0.01025 ;TFRAC(42)=0.0105
 TFRAC(43)=0.01075 ;TFRAC(44)=0.011
 TFRAC(45)=0.01125 ;TFRAC(46)=0.0115
 TFRAC(47)=0.01175 ;TFRAC(48)=0.012
 TFRAC(49)=0.01225 ;TFRAC(50)=0.0125
 TFRAC(51)=0.01275 ;TFRAC(52)=0.013
 TFRAC(53)=0.01325 ;TFRAC(54)=0.0135
 TFRAC(55)=0.01375 ;TFRAC(56)=0.014
 TFRAC(57)=0.01425 ;TFRAC(58)=0.0145
 TFRAC(59)=0.01475 ;TFRAC(60)=0.015
 TFRAC(61)=0.01525 ;TFRAC(62)=0.0155
 TFRAC(63)=0.01575 ;TFRAC(64)=0.016
 TFRAC(65)=0.01625 ;TFRAC(66)=0.0165
 TFRAC(67)=0.01675 ;TFRAC(68)=0.017
 TFRAC(69)=0.01725 ;TFRAC(70)=0.0175
 TFRAC(71)=0.01775 ;TFRAC(72)=0.018
 TFRAC(73)=0.01825 ;TFRAC(74)=0.0185
 TFRAC(75)=0.01875 ;TFRAC(76)=0.019
 TFRAC(77)=0.01925 ;TFRAC(78)=0.0195
 TFRAC(79)=0.01975 ;TFRAC(80)=0.02
 TFRAC(81)=0.02025 ;TFRAC(82)=0.0205
 TFRAC(83)=0.02075 ;TFRAC(84)=0.021
 TFRAC(85)=0.02125 ;TFRAC(86)=0.0215
 TFRAC(87)=0.02175 ;TFRAC(88)=0.022
 TFRAC(89)=0.02225 ;TFRAC(90)=0.0225
 TFRAC(91)=0.02275 ;TFRAC(92)=0.023
 TFRAC(93)=0.02325 ;TFRAC(94)=0.0235
 TFRAC(95)=0.02375 ;TFRAC(96)=0.024
 TFRAC(97)=0.02425 ;TFRAC(98)=0.0245
 TFRAC(99)=0.02475 ;TFRAC(100)=0.025
 TFRAC(101)=0.02525 ;TFRAC(102)=0.0255
 TFRAC(103)=0.02575 ;TFRAC(104)=0.026
 TFRAC(105)=0.02625 ;TFRAC(106)=0.0265
 TFRAC(107)=0.02675 ;TFRAC(108)=0.027
 TFRAC(109)=0.02725 ;TFRAC(110)=0.0275
 TFRAC(111)=0.02775 ;TFRAC(112)=0.028
 TFRAC(113)=0.02825 ;TFRAC(114)=0.0285
 TFRAC(115)=0.02875 ;TFRAC(116)=0.029
 TFRAC(117)=0.02925 ;TFRAC(118)=0.0295
 TFRAC(119)=0.02975 ;TFRAC(120)=0.03
 TFRAC(121)=0.03025 ;TFRAC(122)=0.0305
 TFRAC(123)=0.03075 ;TFRAC(124)=0.031
 TFRAC(125)=0.03125 ;TFRAC(126)=0.0315
 TFRAC(127)=0.03175 ;TFRAC(128)=0.032
 TFRAC(129)=0.03225 ;TFRAC(130)=0.0325
 TFRAC(131)=0.03275 ;TFRAC(132)=0.033
 TFRAC(133)=0.03325 ;TFRAC(134)=0.0335
 TFRAC(135)=0.03375 ;TFRAC(136)=0.034
 TFRAC(137)=0.03425 ;TFRAC(138)=0.0345
 TFRAC(139)=0.03475 ;TFRAC(140)=0.035
 TFRAC(141)=0.03525 ;TFRAC(142)=0.0355
 TFRAC(143)=0.03575 ;TFRAC(144)=0.036
 TFRAC(145)=0.03625 ;TFRAC(146)=0.0365
 TFRAC(147)=0.03675 ;TFRAC(148)=0.037
 TFRAC(149)=0.03725 ;TFRAC(150)=0.0375
 TFRAC(151)=0.03775 ;TFRAC(152)=0.038
 TFRAC(153)=0.03825 ;TFRAC(154)=0.0385
 TFRAC(155)=0.03875 ;TFRAC(156)=0.039
 TFRAC(157)=0.03925 ;TFRAC(158)=0.0395
 TFRAC(159)=0.03975 ;TFRAC(160)=0.04
 TFRAC(161)=0.04025 ;TFRAC(162)=0.0405
 TFRAC(163)=0.04075 ;TFRAC(164)=0.041
 TFRAC(165)=0.04125 ;TFRAC(166)=0.0415
 TFRAC(167)=0.04175 ;TFRAC(168)=0.042
 TFRAC(169)=0.04225 ;TFRAC(170)=0.0425
 TFRAC(171)=0.04275 ;TFRAC(172)=0.043
 TFRAC(173)=0.04325 ;TFRAC(174)=0.0435
 TFRAC(175)=0.04375 ;TFRAC(176)=0.044
 TFRAC(177)=0.04425 ;TFRAC(178)=0.0445
 TFRAC(179)=0.04475 ;TFRAC(180)=0.045
 TFRAC(181)=0.04525 ;TFRAC(182)=0.0455
 TFRAC(183)=0.04575 ;TFRAC(184)=0.046
 TFRAC(185)=0.04625 ;TFRAC(186)=0.0465
 TFRAC(187)=0.04675 ;TFRAC(188)=0.047
 TFRAC(189)=0.04725 ;TFRAC(190)=0.0475
 TFRAC(191)=0.04775 ;TFRAC(192)=0.048
 TFRAC(193)=0.04825 ;TFRAC(194)=0.0485
 TFRAC(195)=0.04875 ;TFRAC(196)=0.049
 TFRAC(197)=0.04925 ;TFRAC(198)=0.0495
 TFRAC(199)=0.04975 ;TFRAC(200)=0.05
 TFRAC(201)=0.05025 ;TFRAC(202)=0.0505
 TFRAC(203)=0.05075 ;TFRAC(204)=0.051
 TFRAC(205)=0.05125 ;TFRAC(206)=0.0515
 TFRAC(207)=0.05175 ;TFRAC(208)=0.052
 TFRAC(209)=0.05225 ;TFRAC(210)=0.0525
 TFRAC(211)=0.05275 ;TFRAC(212)=0.053
 TFRAC(213)=0.05325 ;TFRAC(214)=0.0535
 TFRAC(215)=0.05375 ;TFRAC(216)=0.054
 TFRAC(217)=0.05425 ;TFRAC(218)=0.0545
 TFRAC(219)=0.05475 ;TFRAC(220)=0.055
 TFRAC(221)=0.05525 ;TFRAC(222)=0.0555
 TFRAC(223)=0.05575 ;TFRAC(224)=0.056
 TFRAC(225)=0.05625 ;TFRAC(226)=0.0565
 TFRAC(227)=0.05675 ;TFRAC(228)=0.057
 TFRAC(229)=0.05725 ;TFRAC(230)=0.0575
 TFRAC(231)=0.05775 ;TFRAC(232)=0.058
 TFRAC(233)=0.05825 ;TFRAC(234)=0.0585
 TFRAC(235)=0.05875 ;TFRAC(236)=0.059
 TFRAC(237)=0.05925 ;TFRAC(238)=0.0595
 TFRAC(239)=0.05975 ;TFRAC(240)=0.06
 TFRAC(241)=0.06025 ;TFRAC(242)=0.0605
 TFRAC(243)=0.06075 ;TFRAC(244)=0.061
 TFRAC(245)=0.06125 ;TFRAC(246)=0.0615
 TFRAC(247)=0.06175 ;TFRAC(248)=0.062
 TFRAC(249)=0.06225 ;TFRAC(250)=0.0625
 TFRAC(251)=0.06275 ;TFRAC(252)=0.063
 TFRAC(253)=0.06325 ;TFRAC(254)=0.0635
 TFRAC(255)=0.06375 ;TFRAC(256)=0.064
 TFRAC(257)=0.06425 ;TFRAC(258)=0.0645
 TFRAC(259)=0.06475 ;TFRAC(260)=0.065
 TFRAC(261)=0.06525 ;TFRAC(262)=0.0655
 TFRAC(263)=0.06575 ;TFRAC(264)=0.066
 TFRAC(265)=0.06625 ;TFRAC(266)=0.0665
 TFRAC(267)=0.06675 ;TFRAC(268)=0.067
 TFRAC(269)=0.06725 ;TFRAC(270)=0.0675
 TFRAC(271)=0.06775 ;TFRAC(272)=0.068
 TFRAC(273)=0.06825 ;TFRAC(274)=0.0685
 TFRAC(275)=0.06875 ;TFRAC(276)=0.069
 TFRAC(277)=0.06925 ;TFRAC(278)=0.0695
 TFRAC(279)=0.06975 ;TFRAC(280)=0.07
 TFRAC(281)=0.07025 ;TFRAC(282)=0.0705
 TFRAC(283)=0.07075 ;TFRAC(284)=0.071
 TFRAC(285)=0.07125 ;TFRAC(286)=0.0715
 TFRAC(287)=0.07175 ;TFRAC(288)=0.072
 TFRAC(289)=0.07225 ;TFRAC(290)=0.0725
 TFRAC(291)=0.07275 ;TFRAC(292)=0.073
 TFRAC(293)=0.07325 ;TFRAC(294)=0.0735
 TFRAC(295)=0.07375 ;TFRAC(296)=0.074
 TFRAC(297)=0.07425 ;TFRAC(298)=0.0745
 TFRAC(299)=0.07475 ;TFRAC(300)=0.075
 TFRAC(301)=0.07525 ;TFRAC(302)=0.0755
 TFRAC(303)=0.07575 ;TFRAC(304)=0.076
 TFRAC(305)=0.07625 ;TFRAC(306)=0.0765
 TFRAC(307)=0.07675 ;TFRAC(308)=0.077
 TFRAC(309)=0.07725 ;TFRAC(310)=0.0775
 TFRAC(311)=0.07775 ;TFRAC(312)=0.078
 TFRAC(313)=0.07825 ;TFRAC(314)=0.0785
 TFRAC(315)=0.07875 ;TFRAC(316)=0.079
 TFRAC(317)=0.07925 ;TFRAC(318)=0.0795
 TFRAC(319)=0.07975 ;TFRAC(320)=0.08
 TFRAC(321)=0.08025 ;TFRAC(322)=0.0805
 TFRAC(323)=0.08075 ;TFRAC(324)=0.081
 TFRAC(325)=0.08125 ;TFRAC(326)=0.0815
 TFRAC(327)=0.08175 ;TFRAC(328)=0.082
 TFRAC(329)=0.08225 ;TFRAC(330)=0.0825
 TFRAC(331)=0.08275 ;TFRAC(332)=0.083
 TFRAC(333)=0.08325 ;TFRAC(334)=0.0835
 TFRAC(335)=0.08375 ;TFRAC(336)=0.084
 TFRAC(337)=0.08425 ;TFRAC(338)=0.0845
 TFRAC(339)=0.08475 ;TFRAC(340)=0.085
 TFRAC(341)=0.08525 ;TFRAC(342)=0.0855
 TFRAC(343)=0.08575 ;TFRAC(344)=0.086
 TFRAC(345)=0.08625 ;TFRAC(346)=0.0865
 TFRAC(347)=0.08675 ;TFRAC(348)=0.087
 TFRAC(349)=0.08725 ;TFRAC(350)=0.0875
 TFRAC(351)=0.08775 ;TFRAC(352)=0.088
 TFRAC(353)=0.08825 ;TFRAC(354)=0.0885
 TFRAC(355)=0.08875 ;TFRAC(356)=0.089
 TFRAC(357)=0.08925 ;TFRAC(358)=0.0895
 TFRAC(359)=0.08975 ;TFRAC(360)=0.09
 TFRAC(361)=0.09025 ;TFRAC(362)=0.0905
 TFRAC(363)=0.09075 ;TFRAC(364)=0.091
 TFRAC(365)=0.09125 ;TFRAC(366)=0.0915
 TFRAC(367)=0.09175 ;TFRAC(368)=0.092
 TFRAC(369)=0.09225 ;TFRAC(370)=0.0925
 TFRAC(371)=0.09275 ;TFRAC(372)=0.093
 TFRAC(373)=0.09325 ;TFRAC(374)=0.0935
 TFRAC(375)=0.09375 ;TFRAC(376)=0.094
 TFRAC(377)=0.09425 ;TFRAC(378)=0.0945
 TFRAC(379)=0.09475 ;TFRAC(380)=0.095
 TFRAC(381)=0.09525 ;TFRAC(382)=0.0955
 TFRAC(383)=0.09575 ;TFRAC(384)=0.096
 TFRAC(385)=0.09625 ;TFRAC(386)=0.0965
 TFRAC(387)=0.09675 ;TFRAC(388)=0.097
 TFRAC(389)=0.09725 ;TFRAC(390)=0.0975
 TFRAC(391)=0.09775 ;TFRAC(392)=0.098
 TFRAC(393)=0.09825 ;TFRAC(394)=0.0985
 TFRAC(395)=0.09875 ;TFRAC(396)=0.099
 TFRAC(397)=0.09925 ;TFRAC(398)=0.0995
 TFRAC(399)=0.09975 ;TFRAC(400)=0.1
 TFRAC(401)=0.10025 ;TFRAC(402)=0.1005
 TFRAC(403)=0.10075 ;TFRAC(404)=0.101
 TFRAC(405)=0.10125 ;TFRAC(406)=0.1015
 TFRAC(407)=0.10175 ;TFRAC(408)=0.102
 TFRAC(409)=0.10225 ;TFRAC(410)=0.1025
 TFRAC(411)=0.10275 ;TFRAC(412)=0.103
 TFRAC(413)=0.10325 ;TFRAC(414)=0.1035
 TFRAC(415)=0.10375 ;TFRAC(416)=0.104
 TFRAC(417)=0.10425 ;TFRAC(418)=0.1045
 TFRAC(419)=0.10475 ;TFRAC(420)=0.105
 TFRAC(421)=0.10525 ;TFRAC(422)=0.1055
 TFRAC(423)=0.10575 ;TFRAC(424)=0.106
 TFRAC(425)=0.10625 ;TFRAC(426)=0.1065
 TFRAC(427)=0.10675 ;TFRAC(428)=0.107
 TFRAC(429)=0.10725 ;TFRAC(430)=0.1075
 TFRAC(431)=0.10775 ;TFRAC(432)=0.108
 TFRAC(433)=0.10825 ;TFRAC(434)=0.1085
 TFRAC(435)=0.10875 ;TFRAC(436)=0.109
 TFRAC(437)=0.10925 ;TFRAC(438)=0.1095
 TFRAC(439)=0.10975 ;TFRAC(440)=0.11
 TFRAC(441)=0.11025 ;TFRAC(442)=0.1105
 TFRAC(443)=0.11075 ;TFRAC(444)=0.111
 TFRAC(445)=0.11125 ;TFRAC(446)=0.1115
 TFRAC(447)=0.11175 ;TFRAC(448)=0.112
 TFRAC(449)=0.11225 ;TFRAC(450)=0.1125
 TFRAC(451)=0.11275 ;TFRAC(452)=0.113
 TFRAC(453)=0.11325 ;TFRAC(454)=0.1135
 TFRAC(455)=0.11375 ;TFRAC(456)=0.114
 TFRAC(457)=0.11425 ;TFRAC(458)=0.1145
 TFRAC(459)=0.11475 ;TFRAC(460)=0.115
 TFRAC(461)=0.11525 ;TFRAC(462)=0.1155
 TFRAC(463)=0.11575 ;TFRAC(464)=0.116
 TFRAC(465)=0.11625 ;TFRAC(466)=0.1165
 TFRAC(467)=0.11675 ;TFRAC(468)=0.117
 TFRAC(469)=0.11725 ;TFRAC(470)=0.1175
 TFRAC(471)=0.11775 ;TFRAC(472)=0.118
 TFRAC(473)=0.11825 ;TFRAC(474)=0.1185
 TFRAC(475)=0.11875 ;TFRAC(476)=0.119
 TFRAC(477)=0.11925 ;TFRAC(478)=0.1195
 TFRAC(479)=0.11975 ;TFRAC(480)=0.12
 TFRAC(481)=0.12025 ;TFRAC(482)=0.1205
 TFRAC(483)=0.12075 ;TFRAC(484)=0.121
 TFRAC(485)=0.12125 ;TFRAC(486)=0.1215
 TFRAC(487)=0.12175 ;TFRAC(488)=0.122
 TFRAC(489)=0.12225 ;TFRAC(490)=0.1225
 TFRAC(491)=0.12275 ;TFRAC(492)=0.123
 TFRAC(493)=0.12325 ;TFRAC(494)=0.1235
 TFRAC(495)=0.12375 ;TFRAC(496)=0.124
 TFRAC(497)=0.12425 ;TFRAC(498)=0.1245
 TFRAC(499)=0.12475 ;TFRAC(500)=0.125
 TFRAC(501)=0.12525 ;TFRAC(502)=0.1255
 TFRAC(503)=0.12575 ;TFRAC(504)=0.126
 TFRAC(505)=0.12625 ;TFRAC(506)=0.1265
 TFRAC(507)=0.12675 ;TFRAC(508)=0.127
 TFRAC(509)=0.12725 ;TFRAC(510)=0.1275
 TFRAC(511)=0.12775 ;TFRAC(512)=0.128
 TFRAC(513)=0.12825 ;TFRAC(514)=0.1285
 TFRAC(515)=0.12875 ;TFRAC(516)=0.129
 TFRAC(517)=0.12925 ;TFRAC(518)=0.1295
 TFRAC(519)=0.12975 ;TFRAC(520)=0.13
 TFRAC(521)=0.13025 ;TFRAC(522)=0.1305
 TFRAC(523)=0.13075 ;TFRAC(524)=0.131
 TFRAC(525)=0.13125 ;TFRAC(526)=0.1315
 TFRAC(527)=0.13175 ;TFRAC(528)=0.132
 TFRAC(529)=0.13225 ;TFRAC(530)=0.1325
 TFRAC(531)=0.13275 ;TFRAC(532)=0.133
 TFRAC(533)=0.13325 ;TFRAC(534)=0.1335
 TFRAC(535)=0.13375 ;TFRAC(536)=0.134
 TFRAC(537)=0.13425 ;TFRAC(538)=0.1345
 TFRAC(539)=0.13475 ;TFRAC(540)=0.135
 TFRAC(541)=0.13525 ;TFRAC(542)=0.1355
 TFRAC(543)=0.13575 ;TFRAC(544)=0.136
 TFRAC(545)=0.13625 ;TFRAC(546)=0.1365
 TFRAC(547)=0.13675 ;TFRAC(548)=0.137
 TFRAC(549)=0.13725 ;TFRAC(550)=0.1375
 TFRAC(551)=0.13775 ;TFRAC(552)=0.138
 TFRAC(553)=0.13825 ;TFRAC(554)=0.1385
 TFRAC(555)=0.13875 ;TFRAC(556)=0.139
 TFRAC(557)=0.13925 ;TFRAC(558)=0.1395
 TFRAC(559)=0.13975 ;TFRAC(560)=0.14
 TFRAC(561)=0.14025 ;TFRAC(562)=0.1405
 TFRAC(563)=0.14075 ;TFRAC(564)=0.141
 TFRAC(565)=0.14125 ;TFRAC(566)=0.1415
 TFRAC(567)=0.14175 ;TFRAC(568)=0.142
 TFRAC(569)=0.14225 ;TFRAC(570)=0.1425
 TFRAC(571)=0.14275 ;TFRAC(572)=0.143
 TFRAC(573)=0.14325 ;TFRAC(574)=0.1435
 TFRAC(575)=0.14375 ;TFRAC(576)=0.144
 TFRAC(577)=0.14425 ;TFRAC(578)=0.1445
 TFRAC(579)=0.14475 ;TFRAC(580)=0.145
 TFRAC(581)=0.14525 ;TFRAC(582)=0.1455
 TFRAC(583)=0.14575 ;TFRAC(584)=0.146
 TFRAC(585)=0.14625 ;TFRAC(586)=0.1465
 TFRAC(587)=0.14675 ;TFRAC(588)=0.147
 TFRAC(589)=0.14725 ;TFRAC(590)=0.1475
 TFRAC(591)=0.14775 ;TFRAC(592)=0.148
 TFRAC(593)=0.14825 ;TFRAC(594)=0.1485
 TFRAC(595)=0.14875 ;TFRAC(596)=0.149
 TFRAC(597)=0.14925 ;TFRAC(598)=0.1495
 TFRAC(599)=0.14975 ;TFRAC(600)=0.15
 TFRAC(601)=0.15025 ;TFRAC(602)=0.1505
 TFRAC(603)=0.15075 ;TFRAC(604)=0.151
 TFRAC(605)=0.15125 ;TFRAC(606)=0.1515
 TFRAC(607)=0.15175 ;TFRAC(608)=0.152
 TFRAC(609)=0.15225 ;TFRAC(610)=0.1525
 TFRAC(611)=0.15275 ;TFRAC(612)=0.153
 TFRAC(613)=0.15325 ;TFRAC(614)=0.1535
 TFRAC(615)=0.15375 ;TFRAC(616)=0.154
 TFRAC(617)=0.15425 ;TFRAC(618)=0.1545
 TFRAC(619)=0.15475 ;TFRAC(620)=0.155
 TFRAC(621)=0.15525 ;TFRAC(622)=0.1555
 TFRAC(623)=0.15575 ;TFRAC(624)=0.156
 TFRAC(625)=0.15625 ;TFRAC(626)=0.1565
 TFRAC(627)=0.15675 ;TFRAC(628)=0.157
 TFRAC(629)=0.15725 ;TFRAC(630)=0.1575
 TFRAC(631)=0.15775 ;TFRAC(632)=0.158
 TFRAC(633)=0.15825 ;TFRAC(634)=0.1585
 TFRAC(635)=0.15875 ;TFRAC(636)=0.159
 TFRAC(637)=0.15925 ;TFRAC(638)=0.1595
 TFRAC(639)=0.15975 ;TFRAC(640)=0.16
 TFRAC(641)=0.16025 ;TFRAC(642)=0.1605
 TFRAC(643)=0.16075 ;TFRAC(644)=0.161
 TFRAC(645)=0.16125 ;TFRAC(646)=0.1615
 TFRAC(647)=0.16175 ;TFRAC(648)=0.162
 TFRAC(649)=0.16225 ;TFRAC(650)=0.1625
 TFRAC(651)=0.16275 ;TFRAC(652)=0.163
 TFRAC(653)=0.16325 ;TFRAC(654)=0.1635
 TFRAC(655)=0.16375 ;TFRAC(656)=0.164
 TFRAC(657)=0.16425 ;TFRAC(658)=0.1645
 TFRAC(659)=0.16475 ;TFRAC(660)=0.165
 TFRAC(661)=0.16525 ;TFRAC(662)=0.1655
 TFRAC(663)=0.16575 ;TFRAC(664)=0.166
 TFRAC(665)=0.16625 ;TFRAC(666)=0.1665
 TFRAC(667)=0.16675 ;TFRAC(668)=0.167
 TFRAC(669)=0.16725 ;TFRAC(670)=0.1675
 TFRAC(671)=0.16775 ;TFRAC(672)=0.168
 TFRAC(673)=0.16825 ;TFRAC(674)=0.1685
 TFRAC(675)=0.16875 ;TFRAC(676)=0.169
 TFRAC(677)=0.16925 ;TFRAC(678)=0.1695
 TFRAC(679)=0.16975 ;TFRAC(680)=0.17
 TFRAC(681)=0.17025 ;TFRAC(682)=0.1705
 TFRAC(683)=0.17075 ;TFRAC(684)=0.171
 TFRAC(685)=0.17125 ;TFRAC(686)=0.1715
 TFRAC(687)=0.17175 ;TFRAC(688)=0.172
 TFRAC(689)=0.17225 ;TFRAC(690)=0.1725
 TFRAC(691)=0.17275 ;TFRAC(692)=0.173
 TFRAC(693)=0.17325 ;TFRAC(694)=0.1735
 TFRAC(695)=0.17375 ;TFRAC(696)=0.174
 TFRAC(697)=0.17425 ;TFRAC(698)=0.1745
 TFRAC(699)=0.17475 ;TFRAC(700)=0.175
 TFRAC(701)=0.17525 ;TFRAC(702)=0.1755
 TFRAC(703)=0.17575 ;TFRAC(704)=0.176
 TFRAC(705)=0.17625 ;TFRAC(706)=0.1765
 TFRAC(707)=0.17675 ;TFRAC(708)=0.177
 TFRAC(709)=0.17725 ;TFRAC(710)=0.1775
 TFRAC(711)=0.17775 ;TFRAC(712)=0.178
 TFRAC(713)=0.17825 ;TFRAC(714)=0.1785
 TFRAC(715)=0.17875 ;TFRAC(716)=0.179
 TFRAC(717)=0.17925 ;TFRAC(718)=0.1795
 TFRAC(719)=0.17975 ;TFRAC(720)=0.18
 TFRAC(721)=0.18025 ;TFRAC(722)=0.1805
 TFRAC(723)=0.18075 ;TFRAC(724)=0.181
 TFRAC(725)=0.18125 ;TFRAC(726)=0.1815
 TFRAC(727)=0.18175 ;TFRAC(728)=0.182
 TFRAC(729)=0.18225 ;TFRAC(730)=0.1825
 TFRAC(731)=0.18275 ;TFRAC(732)=0.183
 TFRAC(733)=0.18325 ;TFRAC(734)=0.1835
 TFRAC(735)=0.18375 ;TFRAC(736)=0.184
 TFRAC(737)=0.18425 ;TFRAC(738)=0.1845
 TFRAC(739)=0.18475 ;TFRAC(740)=0.185
 TFRAC(741)=0.18525 ;TFRAC(742)=0.1855
 TFRAC(743)=0.18575 ;TFRAC(744)=0.186
 TFRAC(745)=0.18625 ;TFRAC(746)=0.1865
 TFRAC(747)=0.18675 ;TFRAC(748)=0.187
 TFRAC(749)=0.18725 ;TFRAC(750)=0.1875
 TFRAC(751)=0.18775 ;TFRAC(752)=0.188
 TFRAC(753)=0.18825 ;TFRAC(754)=0.1885
 TFRAC(755)=0.18875 ;TFRAC(756)=0.189
 TFRAC(757)=0.18925 ;TFRAC(758)=0.1895
 TFRAC(759)=0.18975 ;TFRAC(760)=0.19
 TFRAC(761)=0.19025 ;TFRAC(762)=0.1905
 TFRAC(763)=0.19075 ;TFRAC(764)=0.191
 TFRAC(765)=0.19125 ;TFRAC(766)=0.1915
 TFRAC(767)=0.19175 ;TFRAC(768)=0.192
 TFRAC(769)=0.19225 ;TFRAC(770)=0.1925
 TFRAC(771)=0.19275 ;TFRAC(772)=0.193
 TFRAC(773)=0.19325 ;TFRAC(774)=0.1935
 TFRAC(775)=0.19375 ;TFRAC(776)=0.194
 TFRAC(777)=0.19425 ;TFRAC(778)=0.1945
 TFRAC(779)=0.19475 ;TFRAC(780)=0.195
 TFRAC(781)=0.19525 ;TFRAC(782)=0.1955
 TFRAC(783)=0.19575 ;TFRAC(784)=0.196
 TFRAC(785)=0.19625 ;TFRAC(786)=0.1965
 TFRAC(787)=0.19675 ;TFRAC(788)=0.197
 TFRAC(789)=0.19725 ;TFRAC(790)=0.1975
 TFRAC(791)=0.19775 ;TFRAC(792)=0.198
 TFRAC(793)=0.19825 ;TFRAC(794)=0.1985
 TFRAC(795)=0.19875 ;TFRAC(796)=0.199
 TFRAC(797)=0.19925 ;TFRAC(798)=0.1995
 TFRAC(799)=0.19975 ;TFRAC(800)=0.2
 TFRAC(801)=0.20025 ;TFRAC(802)=0.2005
 TFRAC(803)=0.20075 ;TFRAC(804)=0.201
 TFRAC(805)=0.20125 ;TFRAC(806)=0.2015
 TFRAC(807)=0.20175 ;TFRAC(808)=0.202
 TFRAC(809)=0.20225 ;TFRAC(810)=0.2025
 TFRAC(811)=0.20275 ;TFRAC(812)=0.203
 TFRAC(813)=0.20325 ;TFRAC(814)=0.2035
 TFRAC(815)=0.20375 ;TFRAC(816)=0.204
 TFRAC(817)=0.20425 ;TFRAC(818)=0.2045
 TFRAC(819)=0.20475 ;TFRAC(820)=0.205
 TFRAC(821)=0.20525 ;TFRAC(822)=0.2055
 TFRAC(823)=0.20575 ;TFRAC(824)=0.206
 TFRAC(825)=0.20625 ;TFRAC(826)=0.2065
 TFRAC(827)=0.20675 ;TFRAC(828)=0.207
 TFRAC(829)=0.20725 ;TFRAC(830)=0.2075
 TFRAC(831)=0.20775 ;TFRAC(832)=0.208
 TFRAC(833)=0.20825 ;TFRAC(834)=0.2085
 TFRAC(835)=0.20875 ;TFRAC(836)=0.209
 TFRAC(837)=0.20925 ;TFRAC(838)=0.2095
 TFRAC(839)=0.20975 ;TFRAC(840)=0.21
 TFRAC(841)=0.21025 ;TFRAC(842)=0.2105
 TFRAC(843)=0.21075 ;TFRAC(844)=0.211
 TFRAC(845)=0.21125 ;TFRAC(846)=0.2115
 TFRAC(847)=0.21175 ;TFRAC(848)=0.212
 TFRAC(849)=0.21225 ;TFRAC(850)=0.2125
 TFRAC(851)=0.21275 ;TFRAC(852)=0.213
 TFRAC(853)=0.21325 ;TFRAC(854)=0.2135
 TFRAC(855)=0.21375 ;TFRAC(856)=0.214
 TFRAC(857)=0.21425 ;TFRAC(858)=0.2145
 TFRAC(859)=0.21475 ;TFRAC(860)=0.215
 TFRAC(861)=0.21525 ;TFRAC(862)=0.2155
 TFRAC(863)=0.21575 ;TFRAC(864)=0.216
 TFRAC(865)=0.21625 ;TFRAC(866)=0.2165
 TFRAC(867)=0.21675 ;TFRAC(868)=0.217
 TFRAC(869)=0.21725 ;TFRAC(870)=0.2175
 TFRAC(871)=0.21775 ;TFRAC(872)=0.218
 TFRAC(873)=0.21825 ;TFRAC(874)=0.2185
 TFRAC(875)=0.21875 ;TFRAC(876)=0.219
 TFRAC(877)=0.21925 ;TFRAC(878)=0.2195
 TFRAC(879)=0.21975 ;TFRAC(880)=0.22
 TFRAC(881)=0.22025 ;TFRAC(882)=0.2205
 TFRAC(883)=0.22075 ;TFRAC(884)=0.221
 TFRAC(885)=0.22125 ;TFRAC(886)=0.2215
 TFRAC(887)=0.22175 ;TFRAC(888)=0.222
 TFRAC(889)=0.22225 ;TFRAC(890)=0.2225
 TFRAC(891)=0.22275 ;TFRAC(892)=0.223
 TFRAC(893)=0.22325 ;TFRAC(894)=0.2235
 TFRAC(895)=0.22375 ;TFRAC(896)=0.224
 TFRAC(897)=0.22425 ;TFRAC(898)=0.2245
 TFRAC(899)=0.22475 ;TFRAC(900)=0.225
 TFRAC(901)=0.22525 ;TFRAC(902)=0.2255
 TFRAC(903)=0.22575 ;TFRAC(904)=0.226
 TFRAC(905)=0.22625 ;TFRAC(906)=0.2265
 TFRAC(907)=0.22675 ;TFRAC(908)=0.227
 TFRAC(909)=0.22725 ;TFRAC(910)=0.2275
 TFRAC(911)=0.22775 ;TFRAC(912)=0.228
 TFRAC(913)=0.22825 ;TFRAC(914)=0.2285
 TFRAC(915)=0.22875 ;TFRAC(916)=0.229
 TFRAC(917)=0.22925 ;TFRAC(918)=0.2295
 TFRAC(919)=0.22975 ;TFRAC(920)=0.23
 TFRAC(921)=0.23025 ;TFRAC(922)=0.2305
 TFRAC(923)=0.23075 ;TFRAC(924)=0.231
 TFRAC(925)=0.23125 ;TFRAC(926)=0.2315
 TFRAC(927)=0.23175 ;TFRAC(928)=0.232
 TFRAC(929)=0.23225 ;TFRAC(930)=0.2325
 TFRAC(931)=0.23275 ;TFRAC(932)=0.233
 TFRAC(933)=0.23325 ;TFRAC(934)=0.2335
 TFRAC(935)=0.23375 ;TFRAC(936)=0.234
 TFRAC(937)=0.23425 ;TFRAC(938)=0.2345
 TFRAC(939)=0.23475 ;TFRAC(940)=0.235
 TFRAC(941)=0.23525 ;TFRAC(942)=0.2355
 TFRAC(943)=0.23575 ;TFRAC(944)=0.236
 TFRAC(945)=0.23625 ;TFRAC(946)=0.2365
 TFRAC(947)=0.23675 ;TFRAC(948)=0.237
 TFRAC(949)=0.23725 ;TFRAC(950)=0.2375
 TFRAC(951)=0.23775 ;TFRAC(952)=0.238
 TFRAC(953)=0.23825 ;TFRAC(954)=0.2385
 TFRAC(955)=0.23875 ;TFRAC(956)=0.239
 TFRAC(957)=0.23925 ;TFRAC(958)=0.2395
 TFRAC(959)=0.23975 ;TFRAC(960)=0.24
 TFRAC(961)=0.24025 ;TFRAC(962)=0.2405
 TFRAC(963)=0.24075 ;TFRAC(964)=0.241
 TFRAC(965)=0.24125 ;TFRAC(966)=0.2415
 TFRAC(967)=0.24175 ;TFRAC(968)=0.242
 TFRAC(969)=0.24225 ;TFRAC(970)=0.2425
 TFRAC(971)=0.24275 ;TFRAC(972)=0.243
 TFRAC(973)=0.24325 ;TFRAC(974)=0.2435
 TFRAC(975)=0.24375 ;TFRAC(976)=0.244
 TFRAC(977)=0.24425 ;TFRAC(978)=0.2445
 TFRAC(979)=0.24475 ;TFRAC(980)=0.245
 TFRAC(981)=0.24525 ;TFRAC(982)=0.2455
 TFRAC(983)=0.24575 ;TFRAC(984)=0.246
 TFRAC(985)=0.24625 ;TFRAC(986)=0.2465
 TFRAC(987)=0.24675 ;TFRAC(988)=0.247
 TFRAC(989)=0.24725 ;TFRAC(990)=0.2475
 TFRAC(991)=0.24775 ;TFRAC(992)=0.248
 TFRAC(993)=0.24825 ;TFRAC(994)=0.2485
 TFRAC(995)=0.24875 ;TFRAC(996)=0.249
 TFRAC(997)=0.24925 ;TFRAC(998)=0.2495
 TFRAC(999)=0.24975 ;TFRAC(1000)=0.25
 TFRAC(1001)=0.25025 ;TFRAC(1002)=0.2505
 TFRAC(1003)=0.25075 ;TFRAC(1004)=0.251
 TFRAC(1005)=0.25125 ;TFRAC(1006)=0.2515
 TFRAC(1007)=0.25175 ;TFRAC(1008)=0.252
 TFRAC(1009)=0.25225 ;TFRAC(1010)=0.2525
 TFRAC(1011)=0.25275 ;TFRAC(1012)=0.253
 TFRAC(1013)=0.25325 ;TFRAC(1014)=0.2535
 TFRAC(1015)=0.25375 ;TFRAC(1016)=0.254
 TFRAC(1017)=0.25425 ;TFRAC(1018)=0.2545
 TFRAC(1019)=0.25475 ;TFRAC(1020)=0.255
 TFRAC(1021)=0.25525 ;TFRAC(1022)=0.2555
 TFRAC(1023)=0.25575 ;TFRAC(1024)=0.256
 TFRAC(1025)=0.25625 ;TFRAC(1026)=0.2565
 TFRAC(1027)=0.25675 ;TFRAC(1028)=0.257
 TFRAC(1029)=0.25725 ;TFRAC(1030)=0.2575
 TFRAC(1031)=0.25775 ;TFRAC(1032)=0.258
 TFRAC(1033)=0.25825 ;TFRAC(1034)=0.2585
 TFRAC(1035)=0.25875 ;TFRAC(1036)=0.259
 TFRAC(1037)=0.25925 ;TFRAC(1038)=0.2595
 TFRAC(1039)=0.25975 ;TFRAC(1040)=0.26
 TFRAC(1041)=0.26025 ;TFRAC(1042)=0.2605
 TFRAC(1043)=0.26075 ;TFRAC(1044)=0.261
 TFRAC(1045)=0.26125 ;TFRAC(1046)=0.2615
 TFRAC(1047)=0.26175 ;TFRAC(1048)=0.262
 TFRAC(1049)=0.26225 ;TFRAC(1050)=0.2625
 TFRAC(1051)=0.26275 ;TFRAC(1052)=0.263
 TFRAC(1053)=0.26325 ;TFRAC(1054)=0.2635
 TFRAC(1055)=0.26375 ;TFRAC(1056)=0.264
 TFRAC(1057)=0.26425 ;TFRAC(1058)=0.2645
 TFRAC(1059)=0.26475 ;TFRAC(1060)=0.265
 TFRAC(1061)=0.26525 ;TFRAC(1062)=0.2655
 TFRAC(1063)=0.26575 ;TFRAC(1064)=0.266
 TFRAC(1065)=0.26625 ;TFRAC(1066)=0.2665
 TFRAC(1067)=0.26675 ;TFRAC(1068)=0.267
 TFRAC(1069)=0.26725 ;TFRAC(1070)=0.2675
 TFRAC(1071)=0.26775 ;TFRAC(1072)=0.268
 TFRAC(1073)=0.26825 ;TFRAC(1074)=0.2685
 TFRAC(1075)=0.26875 ;TFRAC(1076)=0.269
 TFRAC(1077)=0.26925 ;TFRAC(1078)=0.2695
 TFRAC(1079)=0.26975 ;TFRAC(1080)=0.27
 TFRAC(1081)=0.27025 ;TFRAC(1082)=0.2705
 TFRAC(1083)=0.27075 ;TFRAC(1084)=0.271
 TFRAC(1085)=0.27125 ;TFRAC(1086)=0.2715
 TFRAC(1087)=0.27175 ;TFRAC(1088)=0.272
 TFRAC(1089)=0.27225 ;TFRAC(1090)=0.2725
 TFRAC(1091)=0.27275 ;TFRAC(1092)=0.273
 TFRAC(1093)=0.27325 ;TFRAC(1094)=0.2735
 TFRAC(1095)=0.27375 ;TFRAC(1096)=0.274
 TFRAC(1097)=0.27425 ;TFRAC(1098)=0.2745
 TFRAC(1099)=0.27475 ;TFRAC(1100)=0.275
 TFRAC(1101)=0.27525 ;TFRAC(1102)=0.2755
 TFRAC(1103)=0.27575 ;TFRAC(1104)=0.276
 TFRAC(1105)=0.27625 ;TFRAC(1106)=0.2765
 TFRAC(1107)=0.27675 ;TFRAC(1108)=0.277
 TFRAC(1109)=0.27725 ;TFRAC(1110)=0.2775
 TFRAC(1111)=0.27775 ;TFRAC(1112)=0.278
 TFRAC(1113)=0.27825 ;TFRAC(1114)=0.2785
 TFRAC(1115)=0.27875 ;TFRAC(1116)=0.279
 TFRAC(1117)=0.27925 ;TFRAC(1118)=0.2795
 TFRAC(1119)=0.27975 ;TFRAC(1120)=0.28
 TFRAC(1121)=0.28025 ;TFRAC(1122)=0.2805
 TFRAC(1123)=0.28075 ;TFRAC(1124)=0.281
 TFRAC(1125)=0.28125 ;TFRAC(1126)=0.2815
 TFRAC(1127)=0.28175 ;TFRAC(1128)=0.282
 TFRAC(1129)=0.28225 ;TFRAC(1130)=0.2825
 TFRAC(1131)=0.28275 ;TFRAC(1132)=0.283
 TFRAC(1133)=0.28325 ;TFRAC(1134)=0.2835
 TFRAC(1135)=0.28375 ;TFRAC(1136)=0.284
 TFRAC(1137)=0.28425 ;TFRAC(1138)=0.2845
 TFRAC(1139)=0.28475 ;TFRAC(1140)=0.285
 TFRAC(1141)=0.28525 ;TFRAC(1142)=0.2855
 TFRAC(1143)=0.28575 ;TFRAC(1144)=0.286
 TFRAC(1145)=0.28625 ;TFRAC(1146)=0.2865
 TFRAC(1147)=0.28675 ;TFRAC(1148)=0.287
 TFRAC(1149)=0.28725 ;TFRAC(1150)=0.2875
 TFRAC(1151)=0.28775 ;TFRAC(1152)=0.288
 TFRAC(1153)=0.28825 ;TFRAC(1154)=0.2885
 TFRAC(1155)=0.28875 ;TFRAC(1156)=0.289
 TFRAC(1157)=0.28925 ;TFRAC(1158)=0.2895
 TFRAC(1159)=0.28975 ;TFRAC(1160)=0.29
 TFRAC(1161)=0.29025 ;TFRAC(1162)=0.2905
 TFRAC(1163)=0.29075 ;TFRAC(1164)=0.291
 TFRAC(1165)=0.29125 ;TFRAC(1166)=0.2915
 TFRAC(1167)=0.29175 ;TFRAC(1168)=0.292
 TFRAC(1169)=0.29225 ;TFRAC(1170)=0.2925
 TFRAC(1171)=0.29275 ;TFRAC(1172)=0.293
 TFRAC(1173)=0.29325 ;TFRAC(1174)=0.2935
 TFRAC(1175)=0.29375 ;TFRAC(1176)=0.294
 TFRAC(1177)=0.29425 ;TFRAC(1178)=0.2945
 TFRAC(1179)=0.29475 ;TFRAC(1180)=0.295
 TFRAC(1181)=0.29525 ;TFRAC(1182)=0.2955
 TFRAC(1183)=0.29575 ;TFRAC(1184)=0.296
 TFRAC(1185)=0.29625 ;TFRAC(1186)=0.2965
 TFRAC(1187)=0.29675 ;TFRAC(1188)=0.297
 TFRAC(1189)=0.29725 ;TFRAC(1190)=0.2975
 TFRAC(1191)=0.29775 ;TFRAC(1192)=0.298
 TFRAC(1193)=0.29825 ;TFRAC(1194)=0.2985
 TFRAC(1195)=0.29875 ;TFRAC(1196)=0.299
 TFRAC(1197)=0.29925 ;TFRAC(1198)=0.2995
 TFRAC(1199)=0.29975 ;TFRAC(1200)=0.3
 TFRAC(1201)=0.30025 ;TFRAC(1202)=0.3005
 TFRAC(1203)=0.30075 ;TFRAC(1204)=0.301
 TFRAC(1205)=0.30125 ;TFRAC(1206)=0.3015
 TFRAC(1207)=0.30175 ;TFRAC(1208)=0.302
 TFRAC(1209)=0.30225 ;TFRAC(1210)=0.3025
 TFRAC(1211)=0.30275 ;TFRAC(1212)=0.303
 TFRAC(1213)=0.30325 ;TFRAC(1214)=0.3035
 TFRAC(1215)=0.30375 ;TFRAC(1216)=0.304
 TFRAC(1217)=0.30425 ;TFRAC(1218)=0.3045
 TFRAC(1219)=0.30475 ;TFRAC(1220)=0.305
 TFRAC(1221)=0.30525 ;TFRAC(1222)=0.3055
 TFRAC(1223)=0.30575 ;TFRAC(1224)=0.306
 TFRAC(1225)=0.30625 ;TFRAC(1226)=0.3065
 TFRAC(1227)=0.30675 ;TFRAC(1228)=0.307
 TFRAC(1229)=0.30725 ;TFRAC(1230)=0.3075
 TFRAC(1231)=0.30775 ;TFRAC(1232)=0.308
 TFRAC(1233)=0.30825 ;TFRAC(1234)=0.3085
 TFRAC(1235)=0.30875 ;TFRAC(1236)=0.309
 TFRAC(1237)=0.30925 ;TFRAC(1238)=0.3095
 TFRAC(1239)=0.30975 ;TFRAC(1240)=0.31
 TFRAC(1241)=0.31025 ;TFRAC(1242)=0.3105
 TFRAC(1243)=0.31075 ;TFRAC(1244)=0.311
 TFRAC(1245)=0.31125 ;TFRAC(1246)=0.3115
 TFRAC(1247)=0.31175 ;TFRAC(1248)=0.312
 TFRAC(1249)=0.31225 ;TFRAC(1250)=0.3125
 TFRAC(1251)=0.31275 ;TFRAC(1252)=0.313
 TFRAC(1253)=0.31325 ;TFRAC(1254)=0.3135
 TFRAC(1255)=0.31375 ;TFRAC(1256)=0.314
 TFRAC(1257)=0.31425 ;TFRAC(1258)=0.3145
 TFRAC(1259)=0.31475 ;TFRAC(1260)=0.315
 TFRAC(1261)=0.31525 ;TFRAC(1262)=0.3155
 TFRAC(1263)=0.31575 ;TFRAC(1264)=0.316
 TFRAC(1265)=0.31625 ;TFRAC(1266)=0.3165
 TFRAC(1267)=0.31675 ;TFRAC(1268)=0.317
 TFRAC(1269)=0.31725 ;TFRAC(1270)=0.3175
 TFRAC(1271)=0.31775 ;TFRAC(1272)=0.318
 TFRAC(1273)=0.31825 ;TFRAC(1274)=0.3185
 TFRAC(1275)=0.31875 ;TFRAC(1276)=0.319
 TFRAC(1277)=0.31925 ;TFRAC(1278)=0.3195
 TFRAC(1279)=0.31975 ;TFRAC(1280)=0.32
 TFRAC(1281)=0.32025 ;TFRAC(1282)=0.3205
 TFRAC(1283)=0.32075 ;TFRAC(1284)=0.321
 TFRAC(1285)=0.32125 ;TFRAC(1286)=0.3215
 TFRAC(1287)=0.32175 ;TFRAC(1288)=0.322
 TFRAC(1289)=0.32225 ;TFRAC(1290)=0.3225
 TFRAC(1291)=0.32275 ;TFRAC(1292)=0.323
 TFRAC(1293)=0.32325 ;TFRAC(1294)=0.3235
 TFRAC(1295)=0.32375 ;TFRAC(1296)=0.324
 TFRAC(1297)=0.32425 ;TFRAC(1298)=0.3245
 TFRAC(1299)=0.32475 ;TFRAC(1300)=0.325
 TFRAC(1301)=0.32525 ;TFRAC(1302)=0.3255
 TFRAC(1303)=0.32575 ;TFRAC(1304)=0.326
 TFRAC(1305)=0.32625 ;TFRAC(1306)=0.3265
 TFRAC(1307)=0.32675 ;TFRAC(1308)=0.327
 TFRAC(1309)=0.32725 ;TFRAC(1310)=0.3275
 TFRAC(1311)=0.32775 ;TFRAC(1312)=0.328
 TFRAC(1313)=0.32825 ;TFRAC(1314)=0.3285
 TFRAC(1315)=0.32875 ;TFRAC(1316)=0.329
 TFRAC(1317)=0.32925 ;TFRAC(1318)=0.3295
 TFRAC(1319)=0.32975 ;TFRAC(1320)=0.33
 TFRAC(1321)=0.33025 ;TFRAC(1322)=0.3305
 TFRAC(1323)=0.33075 ;TFRAC(1324)=0.331
 TFRAC(1325)=0.33125 ;TFRAC(1326)=0.3315
 TFRAC(1327)=0.33175 ;TFRAC(1328)=0.332
 TFRAC(1329)=0.33225 ;TFRAC(1330)=0.3325
 TFRAC(1331)=0.33275 ;TFRAC(1332)=0.333
 TFRAC(1333)=0.33325 ;TFRAC(1334)=0.3335
 TFRAC(1335)=0.33375 ;TFRAC(1336)=0.334
 TFRAC(1337)=0.33425 ;TFRAC(1338)=0.3345
 TFRAC(1339)=0.33475 ;TFRAC(1340)=0.335
 TFRAC(1341)=0.33525 ;TFRAC(1342)=0.3355
 TFRAC(1343)=0.33575 ;TFRAC(1344)=0.336
 TFRAC(1345)=0.33625 ;TFRAC(1346)=0.3365
 TFRAC(1347)=0.33675 ;TFRAC(1348)=0.337
 TFRAC(1349)=0.33725 ;TFRAC(1350)=0.3375
 TFRAC(1351)=0.33775 ;TFRAC(1352)=0.338
 TFRAC(1353)=0.33825 ;TFRAC(1354)=0.3385
 TFRAC(1355)=0.33875 ;TFRAC(1356)=0.339
 TFRAC(1357)=0.33925 ;TFRAC(1358)=0.3395
 TFRAC(1359)=0.33975 ;TFRAC(1360)=0.34
 TFRAC(1361)=0.34025 ;TFRAC(1362)=0.3405
 TFRAC(1363)=0.34075 ;TFRAC(1364)=0.341
 TFRAC(1365)=0.34125 ;TFRAC(1366)=0.3415
 TFRAC(1367)=0.34175 ;TFRAC(1368)=0.342
 TFRAC(1369)=0.34225 ;TFRAC(1370)=0.3425
 TFRAC(1371)=0.34275 ;TFRAC(1372)=0.343
 TFRAC(1373)=0.34325 ;TFRAC(1374)=0.3435
 TFRAC(1375)=0.34375 ;TFRAC(1376)=0.344
 TFRAC(1377)=0.34425 ;TFRAC(1378)=0.3445
 TFRAC(1379)=0.34475 ;TFRAC(1380)=0.345
 TFRAC(1381)=0.34525 ;TFRAC(1382)=0.3455
 TFRAC(1383)=0.34575 ;TFRAC(1384)=0.346
 TFRAC(1385)=0.34625 ;TFRAC(1386)=0.3465
 TFRAC(1387)=0.34675 ;TFRAC(1388)=0.347
 TFRAC(1389)=0.34725 ;TFRAC(1390)=0.3475
 TFRAC(1391)=0.34775 ;TFRAC(1392)=0.348
 TFRAC(1393)=0.34825 ;TFRAC(1394)=0.3485
 TFRAC(1395)=0.34875 ;TFRAC(1396)=0.349
 TFRAC(1397)=0.34925 ;TFRAC(1398)=0.3495
 TFRAC(1399)=0.34975 ;TFRAC(1400)=0.35
 TFRAC(1401)=0.35025 ;TFRAC(1402)=0.3505
 TFRAC(1403)=0.35075 ;TFRAC(1404)=0.351
 TFRAC(1405)=0.35125 ;TFRAC(1406)=0.3515
 TFRAC(1407)=0.35175 ;TFRAC(1408)=0.352
 TFRAC(1409)=0.35225 ;TFRAC(1410)=0.3525
 TFRAC(1411)=0.35275 ;TFRAC(1412)=0.353
 TFRAC(1413)=0.35325 ;TFRAC(1414)=0.3535
 TFRAC(1415)=0.35375 ;TFRAC(1416)=0.354
 TFRAC(1417)=0.35425 ;TFRAC(1418)=0.3545
 TFRAC(1419)=0.35475 ;TFRAC(1420)=0.355
 TFRAC(1421)=0.35525 ;TFRAC(1422)=0.3555
 TFRAC(1423)=0.35575 ;TFRAC(1424)=0.356
 TFRAC(1425)=0.35625 ;TFRAC(1426)=0.3565
 TFRAC(1427)=0.35675 ;TFRAC(1428)=0.357
 TFRAC(1429)=0.35725 ;TFRAC(1430)=0.3575
 TFRAC(1431)=0.35775 ;TFRAC(1432)=0.358
 TFRAC(1433)=0.35825 ;TFRAC(1434)=0.3585
 TFRAC(1435)=0.35875 ;TFRAC(1436)=0.359
 TFRAC(1437)=0.35925 ;TFRAC(1438)=0.3595
 TFRAC(1439)=0.35975 ;TFRAC(1440)=0.36
 TFRAC(1441)=0.36025 ;TFRAC(1442)=0.3605
 TFRAC(1443)=0.36075 ;TFRAC(1444)=0.361
 TFRAC(1445)=0.36125 ;TFRAC(1446)=0.3615
 TFRAC(1447)=0.36175 ;TFRAC(1448)=0.362
 TFRAC(1449)=0.36225 ;TFRAC(1450)=0.3625
 TFRAC(1451)=0.36275 ;TFRAC(1452)=0.363
 TFRAC(1453)=0.36325 ;TFRAC(1454)=0.3635
 TFRAC(1455)=0.36375 ;TFRAC(1456)=0.364
 TFRAC(1457)=0.36425 ;TFRAC(1458)=0.3645
 TFRAC(1459)=0.36475 ;TFRAC(1460)=0.365
 TFRAC(1461)=0.36525 ;TFRAC(1462)=0.3655
 TFRAC(1463)=0.36575 ;TFRAC(1464)=0.366
 TFRAC(1465)=0.36625 ;TFRAC(1466)=0.3665
 TFRAC(1467)=0.36675 ;TFRAC(1468)=0.367
 TFRAC(1469)=0.36725 ;TFRAC(1470)=0.3675
 TFRAC(1471)=0.36775 ;TFRAC(1472)=0.368
 TFRAC(1473)=0.36825 ;TFRAC(1474)=0.3685
 TFRAC(1475)=0.36875 ;TFRAC(1476)=0.369
 TFRAC(1477)=0.36925 ;TFRAC(1478)=0.3695
 TFRAC(1479)=0.36975 ;TFRAC(1480)=0.37
 TFRAC(1481)=0.37025 ;TFRAC(1482)=0.3705
 TFRAC(1483)=0.37075 ;TFRAC(1484)=0.371
 TFRAC(1485)=0.37125 ;TFRAC(1486)=0.3715
 TFRAC(1487)=0.37175 ;TFRAC(1488)=0.372
 TFRAC(1489)=0.37225 ;TFRAC(1490)=0.3725
 TFRAC(1491)=0.37275 ;TFRAC(1492)=0.373
 TFRAC(1493)=0.37325 ;TFRAC(1494)=0.3735
 TFRAC(1495)=0.37375 ;TFRAC(1496)=0.374
 TFRAC(1497)=0.37425 ;TFRAC(1498)=0.3745
 TFRAC(1499)=0.37475 ;TFRAC(1500)=0.375
 TFRAC(1501)=0.37525 ;TFRAC(1502)=0.3755
 TFRAC(1503)=0.37575 ;TFRAC(1504)=0.376
 TFRAC(1505)=0.37625 ;TFRAC(1506)=0.3765
 TFRAC(1507)=0.37675 ;TFRAC(1508)=0.377
 TFRAC(1509)=0.37725 ;TFRAC(1510)=0.3775
 TFRAC(1511)=0.37775 ;TFRAC(1512)=0.378
 TFRAC(1513)=0.37825 ;TFRAC(1514)=0.3785
 TFRAC(1515)=0.37875 ;TFRAC(1516)=0.379
 TFRAC(1517)=0.37925 ;TFRAC(1518)=0.3795
 TFRAC(1519)=0.37975 ;TFRAC(1520)=0.38
 TFRAC(1521)=0.38025 ;TFRAC(1522)=0.3805
 TFRAC(1523)=0.38075 ;TFRAC(1524)=0.381
 TFRAC(1525)=0.38125 ;TFRAC(1526)=0.3815
 TFRAC(1527)=0.38175 ;TFRAC(1528)=0.382
 TFRAC(1529)=0.38225 ;TFRAC(1530)=0.3825
 TFRAC(1531)=0.38275 ;TFRAC(1532)=0.383
 TFRAC(1533)=0.38325 ;TFRAC(1534)=0.3835
 TFRAC(1535)=0.38375 ;TFRAC(1536)=0.384
 TFRAC(1537)=0.38425 ;TFRAC(1538)=0.3845
 TFRAC(1539)=0.38475 ;TFRAC(1540)=0.385
 TFRAC(1541)=0.38525 ;TFRAC(1542)=0.3855
 TFRAC(1543)=0.38575 ;TFRAC(1544)=0.386
 TFRAC(1545)=0.38625 ;TFRAC(1546)=0.3865
 TFRAC(1547)=0.38675 ;TFRAC(1548)=0.387
 TFRAC(1549)=0.38725 ;TFRAC(1550)=0.3875
 TFRAC(1551)=0.38775 ;TFRAC(1552)=0.388
 TFRAC(1553)=0.38825 ;TFRAC(1554)=0.3885
 TFRAC(1555)=0.38875 ;TFRAC(1556)=0.389
 TFRAC(1557)=0.38925 ;TFRAC(1558)=0.3895
 TFRAC(1559)=0.38975 ;TFRAC(1560)=0.39
 TFRAC(1561)=0.39025 ;TFRAC(1562)=0.3905
 TFRAC(1563)=0.39075 ;TFRAC(1564)=0.391
 TFRAC(1565)=0.39125 ;TFRAC(1566)=0.3915
 TFRAC(1567)=0.39175 ;TFRAC(1568)=0.392
 TFRAC(1569)=0.39225 ;TFRAC(1570)=0.3925
 TFRAC(1571)=0.39275 ;TFRAC(1572)=0.393
 TFRAC(1573)=0.39325 ;TFRAC(1574)=0.3935
 TFRAC(1575)=0.39375 ;TFRAC(1576)=0.394
 TFRAC(1577)=0.39425 ;TFRAC(1578)=0.3945
 TFRAC(1579)=0.39475 ;TFRAC(1580)=0.395
 TFRAC(1581)=0.39525 ;TFRAC(1582)=0.3955
 TFRAC(1583)=0.39575 ;TFRAC(1584)=0.396
 TFRAC(1585)=0.39625 ;TFRAC(1586)=0.3965
 TFRAC(1587)=0.39675 ;TFRAC(1588)=0.397
 TFRAC(1589)=0.39725 ;TFRAC(1590)=0.3975
 TFRAC(1591)=0.39775 ;TFRAC(1592)=0.398
 TFRAC(1593)=0.39825 ;TFRAC(1594)=0.3985
 TFRAC(1595)=0.39875 ;TFRAC(1596)=0.399
 TFRAC(1597)=0.39925 ;TFRAC(1598)=0.3995
 TFRAC(1599)=0.39975 ;TFRAC(1600)=0.4
 TFRAC(1601)=0.40025 ;TFRAC(1602)=0.4005
 TFRAC(1603)=0.40075 ;TFRAC(1604)=0.401
 TFRAC(1605)=0.40125 ;TFRAC(1606)=0.4015
 TFRAC(1607)=0.40175 ;TFRAC(1608)=0.402
 TFRAC(1609)=0.40225 ;TFRAC(1610)=0.4025
 TFRAC(1611)=0.40275 ;TFRAC(1612)=0.403
 TFRAC(1613)=0.40325 ;TFRAC(1614)=0.4035
 TFRAC(1615)=0.40375 ;TFRAC(1616)=0.404
 TFRAC(1617)=0.40425 ;TFRAC(1618)=0.4045
 TFRAC(1619)=0.40475 ;TFRAC(1620)=0.405
 TFRAC(1621)=0.40525 ;TFRAC(1622)=0.4055
 TFRAC(1623)=0.40575 ;TFRAC(1624)=0.406
 TFRAC(1625)=0.40625 ;TFRAC(1626)=0.4065
 TFRAC(1627)=0.40675 ;TFRAC(1628)=0.407
 TFRAC(1629)=0.40725 ;TFRAC(1630)=0.4075
 TFRAC(1631)=0.40775 ;TFRAC(1632)=0.408
 TFRAC(1633)=0.40825 ;TFRAC(1634)=0.4085
 TFRAC(1635)=0.40875 ;TFRAC(1636)=0.409
 TFRAC(1637)=0.40925 ;TFRAC(1638)=0.4095
 TFRAC(1639)=0.40975 ;TFRAC(1640)=0.41
 TFRAC(1641)=0.41025 ;TFRAC(1642)=0.4105
 TFRAC(1643)=0.41075 ;TFRAC(1644)=0.411
 TFRAC(1645)=0.41125 ;TFRAC(1646)=0.4115
 TFRAC(1647)=0.41175 ;TFRAC(1648)=0.412
 TFRAC(1649)=0.41225 ;TFRAC(1650)=0.4125
 TFRAC(1651)=0.41275 ;TFRAC(1652)=0.413
 TFRAC(1653)=0.41325 ;TFRAC(1654)=0.4135
 TFRAC(1655)=0.41375 ;TFRAC(1656)=0.414
 TFRAC(1657)=0.41425 ;TFRAC(1658)=0.4145
 TFRAC(1659)=0.41475 ;TFRAC(1660)=0.415
 TFRAC(1661)=0.41525 ;TFRAC(1662)=0.4155
 TFRAC(1663)=0.41575 ;TFRAC(1664)=0.416
 TFRAC(1665)=0.41625 ;TFRAC(1666)=0.4165
 TFRAC(1667)=0.41675 ;TFRAC(1668)=0.417
 TFRAC(1669)=0.41725 ;TFRAC(1670)=0.4175
 TFRAC(1671)=0.41775 ;TFRAC(1672)=0.418
 TFRAC(1673)=0.41825 ;TFRAC(1674)=0.4185
 TFRAC(1675)=0.41875 ;TFRAC(1676)=0.419
 TFRAC(1677)=0.41925 ;TFRAC(1678)=0.4195
 TFRAC(1679)=0.41975 ;TFRAC(1680)=0.42
 TFRAC(1681)=0.42025 ;TFRAC(1682)=0.4205
 TFRAC(1683)=0.42075 ;TFRAC(1684)=0.421
 TFRAC(1685)=0.42125 ;TFRAC(1686)=0.4215
 TFRAC(1687)=0.42175 ;TFRAC(1688)=0.422
 TFRAC(1689)=0.42225 ;TFRAC(1690)=0.4225
 TFRAC(1691)=0.42275 ;TFRAC(1692)=0.423
 TFRAC(1693)=0.42325 ;TFRAC(1694)=0.4235
 TFRAC(1695)=0.42375 ;TFRAC(1696)=0.424
 TFRAC(1697)=0.42425 ;TFRAC(1698)=0.4245
 TFRAC(1699)=0.42475 ;TFRAC(1700)=0.425
 TFRAC(1701)=0.42525 ;TFRAC(1702)=0.4255
 TFRAC(1703)=0.42575 ;TFRAC(1704)=0.426
 TFRAC(1705)=0.42625 ;TFRAC(1706)=0.4265
 TFRAC(1707)=0.42675 ;TFRAC(1708)=0.427
 TFRAC(1709)=0.42725 ;TFRAC(1710)=0.4275
 TFRAC(1711)=0.42775 ;TFRAC(1712)=0.428
 TFRAC(1713)=0.42825 ;TFRAC(1714)=0.4285
 TFRAC(1715)=0.42875 ;TFRAC(1716)=0.429
 TFRAC(1717)=0.42925 ;TFRAC(1718)=0.4295
 TFRAC(1719)=0.42975 ;TFRAC(1720)=0.43
 TFRAC(1721)=0.43025 ;TFRAC(1722)=0.4305
 TFRAC(1723)=0.43075 ;TFRAC(1724)=0.431
 TFRAC(1725)=0.43125 ;TFRAC(1726)=0.4315
 TFRAC(1727)=0.43175 ;TFRAC(1728)=0.432
 TFRAC(1729)=0.43225 ;TFRAC(1730)=0.4325
 TFRAC(1731)=0.43275 ;TFRAC(1732)=0.433
 TFRAC(1733)=0.43325 ;TFRAC(1734)=0.4335
 TFRAC(1735)=0.43375 ;TFRAC(1736)=0.434
 TFRAC(1737)=0.43425 ;TFRAC(1738)=0.4345
 TFRAC(1739)=0.43475 ;TFRAC(1740)=0.435
 TFRAC(1741)=0.43525 ;TFRAC(1742)=0.4355
 TFRAC(1743)=0.43575 ;TFRAC(1744)=0.436
 TFRAC(1745)=0.43625 ;TFRAC(1746)=0.4365
 TFRAC(1747)=0.43675 ;TFRAC(1748)=0.437
 TFRAC(1749)=0.43725 ;TFRAC(1750)=0.4375
 TFRAC(1751)=0.43775 ;TFRAC(1752)=0.438
 TFRAC(1753)=0.43825 ;TFRAC(1754)=0.4385
 TFRAC(1755)=0.43875 ;TFRAC(1756)=0.439
 TFRAC(1757)=0.43925 ;TFRAC(1758)=0.4395
 TFRAC(1759)=0.43975 ;TFRAC(1760)=0.44
 TFRAC(1761)=0.44025 ;TFRAC(1762)=0.4405
 TFRAC(1763)=0.44075 ;TFRAC(1764)=0.441
 TFRAC(1765)=0.44125 ;TFRAC(1766)=0.4415
 TFRAC(1767)=0.44175 ;TFRAC(1768)=0.442
 TFRAC(1769)=0.44225 ;TFRAC(1770)=0.4425
 TFRAC(1771)=0.44275 ;TFRAC(1772)=0.443
 TFRAC(1773)=0.44325 ;TFRAC(1774)=0.4435
 TFRAC(1775)=0.44375 ;TFRAC(1776)=0.444
 TFRAC(1777)=0.44425 ;TFRAC(1778)=0.4445
 TFRAC(1779)=0.44475 ;TFRAC(1780)=0.445
 TFRAC(1781)=0.44525 ;TFRAC(1782)=0.4455
 TFRAC(1783)=0.44575 ;TFRAC(1784)=0.446
 TFRAC(1785)=0.44625 ;TFRAC(1786)=0.4465
 TFRAC(1787)=0.44675 ;TFRAC(1788)=0.447
 TFRAC(1789)=0.44725 ;TFRAC(1790)=0.4475
 TFRAC(1791)=0.44775 ;TFRAC(1792)=0.448
 TFRAC(1793)=0.44825 ;TFRAC(1794)=0.4485
 TFRAC(1795)=0.44875 ;TFRAC(1796)=0.449
 TFRAC(1797)=0.44925 ;TFRAC(1798)=0.4495
 TFRAC(1799)=0.44975 ;TFRAC(1800)=0.45
 TFRAC(1801)=0.45025 ;TFRAC(1802)=0.4505
 TFRAC(1803)=0.45075 ;TFRAC(1804)=0.451
 TFRAC(1805)=0.45125 ;TFRAC(1806)=0.4515
 TFRAC(1807)=0.45175 ;TFRAC(1808)=0.452
 TFRAC(1809)=0.45225 ;TFRAC(1810)=0.4525
 TFRAC(1811)=0.45275 ;TFRAC(1812)=0.453
 TFRAC(1813)=0.45325 ;TFRAC(1814)=0.4535
 TFRAC(1815)=0.45375 ;TFRAC(1816)=0.454
 TFRAC(1817)=0.45425 ;TFRAC(1818)=0.4545
 TFRAC(1819)=0.45475 ;TFRAC(1820)=0.455
 TFRAC(1821)=0.45525 ;TFRAC(1822)=0.4555
 TFRAC(1823)=0.45575 ;TFRAC(1824)=0.456
 TFRAC(1825)=0.45625 ;TFRAC(1826)=0.4565
 TFRAC(1827)=0.45675 ;TFRAC(1828)=0.457
 TFRAC(1829)=0.45725 ;TFRAC(1830)=0.4575
 TFRAC(1831)=0.45775 ;TFRAC(1832)=0.458
 TFRAC(1833)=0.45825 ;TFRAC(1834)=0.4585
 TFRAC(1835)=0.45875 ;TFRAC(1836)=0.459
 TFRAC(1837)=0.45925 ;TFRAC(1838)=0.4595
 TFRAC(1839)=0.45975 ;TFRAC(1840)=0.46
 TFRAC(1841)=0.46025 ;TFRAC(1842)=0.4605
 TFRAC(1843)=0.46075 ;TFRAC(1844)=0.461
 TFRAC(1845)=0.46125 ;TFRAC(1846)=0.4615
 TFRAC(1847)=0.46175 ;TFRAC(1848)=0.462
 TFRAC(1849)=0.46225 ;TFRAC(1850)=0.4625
 TFRAC(1851)=0.46275 ;TFRAC(1852)=0.463
 TFRAC(1853)=0.46325 ;TFRAC(1854)=0.4635
 TFRAC(1855)=0.46375 ;TFRAC(1856)=0.464
 TFRAC(1857)=0.46425 ;TFRAC(1858)=0.4645
 TFRAC(1859)=0.46475 ;TFRAC(1860)=0.465
 TFRAC(1861)=0.46525 ;TFRAC(1862)=0.4655
 TFRAC(1863)=0.46575 ;TFRAC(1864)=0.466
 TFRAC(1865)=0.46625 ;TFRAC(1866)=0.4665
 TFRAC(1867)=0.46675 ;TFRAC(1868)=0.467
 TFRAC(1869)=0.46725 ;TFRAC(1870)=0.4675
 TFRAC(1871)=0.46775 ;TFRAC(1872)=0.468
 TFRAC(1873)=0.46825 ;TFRAC(1874)=0.4685
 TFRAC(1875)=0.46875 ;TFRAC(1876)=0.469
 TFRAC(1877)=0.46925 ;TFRAC(1878)=0.4695
 TFRAC(1879)=0.46975 ;TFRAC(1880)=0.47
 TFRAC(1881)=0.47025 ;TFRAC(1882)=0.4705
 TFRAC(1883)=0.47075 ;TFRAC(1884)=0.471
 TFRAC(1885)=0.47125 ;TFRAC(1886)=0.4715
 TFRAC(1887)=0.47175 ;TFRAC(1888)=0.472
 TFRAC(1889)=0.47225 ;TFRAC(1890)=0.4725
 TFRAC(1891)=0.47275 ;TFRAC(1892)=0.473
 TFRAC(1893)=0.47325 ;TFRAC(1894)=0.4735
 TFRAC(1895)=0.47375 ;TFRAC(1896)=0.474
 TFRAC(1897)=0.47425 ;TFRAC(1898)=0.4745
 TFRAC(1899)=0.47475 ;TFRAC(1900)=0.475
 TFRAC(1901)=0.47525 ;TFRAC(1902)=0.4755
 TFRAC(1903)=0.47575 ;TFRAC(1904)=0.476
 TFRAC(1905)=0.47625 ;TFRAC(1906)=0.4765
 TFRAC(1907)=0.47675 ;TFRAC(1908)=0.477
 TFRAC(1909)=0.47725 ;TFRAC(1910)=0.4775
 TFRAC(1911)=0.47775 ;TFRAC(1912)=0.478
 TFRAC(1913)=0.47825 ;TFRAC(1914)=0.4785
 TFRAC(1915)=0.47875 ;TFRAC(1916)=0.479
 TFRAC(1917)=0.47925 ;TFRAC(1918)=0.4795
 TFRAC(1919)=0.47975 ;TFRAC(1920)=0.48
 TFRAC(1921)=0.48025 ;TFRAC(1922)=0.4805
 TFRAC(1923)=0.48075 ;TFRAC(1924)=0.481
 TFRAC(1925)=0.48125 ;TFRAC(1926)=0.4815
 TFRAC(1927)=0.48175 ;TFRAC(1928)=0.482
 TFRAC(1929)=0.48225 ;TFRAC(1930)=0.4825
 TFRAC(1931)=0.48275 ;TFRAC(1932)=0.483
 TFRAC(1933)=0.48325 ;TFRAC(1934)=0.4835
 TFRAC(1935)=0.48375 ;TFRAC(1936)=0.484
 TFRAC(1937)=0.48425 ;TFRAC(1938)=0.4845
 TFRAC(1939)=0.48475 ;TFRAC(1940)=0.485
 TFRAC(1941)=0.48525 ;TFRAC(1942)=0.4855
 TFRAC(1943)=0.48575 ;TFRAC(1944)=0.486
 TFRAC(1945)=0.48625 ;TFRAC(1946)=0.4865
 TFRAC(1947)=0.48675 ;TFRAC(1948)=0.487
 TFRAC(1949)=0.48725 ;TFRAC(1950)=0.4875
 TFRAC(1951)=0.48775 ;TFRAC(1952)=0.488
 TFRAC(1953)=0.48825 ;TFRAC(1954)=0.4885
 TFRAC(1955)=0.48875 ;TFRAC(1956)=0.489
 TFRAC(1957)=0.48925 ;TFRAC(1958)=0.4895
 TFRAC(1959)=0.48975 ;TFRAC(1960)=0.49
 TFRAC(1961)=0.49025 ;TFRAC(1962)=0.4905
 TFRAC(1963)=0.49075 ;TFRAC(1964)=0.491
 TFRAC(1965)=0.49125 ;TFRAC(1966)=0.4915
 TFRAC(1967)=0.49175 ;TFRAC(1968)=0.492
 TFRAC(1969)=0.49225 ;TFRAC(1970)=0.4925
 TFRAC(1971)=0.49275 ;TFRAC(1972)=0.493
 TFRAC(1973)=0.49325 ;TFRAC(1974)=0.4935
 TFRAC(1975)=0.49375 ;TFRAC(1976)=0.494
 TFRAC(1977)=0.49425 ;TFRAC(1978)=0.4945
 TFRAC(1979)=0.49475 ;TFRAC(1980)=0.495
 TFRAC(1981)=0.49525 ;TFRAC(1982)=0.4955
 TFRAC(1983)=0.49575 ;TFRAC(1984)=0.496
 TFRAC(1985)=0.49625 ;TFRAC(1986)=0.4965
 TFRAC(1987)=0.49675 ;TFRAC(1988)=0.497
 TFRAC(1989)=0.49725 ;TFRAC(1990)=0.4975
 TFRAC(1991)=0.49775 ;TFRAC(1992)=0.498
 TFRAC(1993)=0.49825 ;TFRAC(1994)=0.4985
 TFRAC(1995)=0.49875 ;TFRAC(1996)=0.499
 TFRAC(1997)=0.49925 ;TFRAC(1998)=0.4995
 TFRAC(1999)=0.49975 ;TFRAC(2000)=0.5
 TFRAC(2001)=0.50025 ;TFRAC(2002)=0.5005
 TFRAC(2003)=0.50075 ;TFRAC(2004)=0.501
 TFRAC(2005)=0.50125 ;TFRAC(2006)=0.5015
 TFRAC(2007)=0.50175 ;TFRAC(2008)=0.502
 TFRAC(2009)=0.50225 ;TFRAC(2010)=0.5025
 TFRAC(2011)=0.50275 ;TFRAC(2012)=0.503
 TFRAC(2013)=0.50325 ;TFRAC(2014)=0.5035
 TFRAC(2015)=0.50375 ;TFRAC(2016)=0.504
 TFRAC(2017)=0.50425 ;TFRAC(2018)=0.5045
 TFRAC(2019)=0.50475 ;TFRAC(2020)=0.505
 TFRAC(2021)=0.50525 ;TFRAC(2022)=0.5055
 TFRAC(2023)=0.50575 ;TFRAC(2024)=0.506
 TFRAC(2025)=0.50625 ;TFRAC(2026)=0.5065
 TFRAC(2027)=0.50675 ;TFRAC(2028)=0.507
 TFRAC(2029)=0.50725 ;TFRAC(2030)=0.5075
 TFRAC(2031)=0.50775 ;TFRAC(2032)=0.508
 TFRAC(2033)=0.50825 ;TFRAC(2034)=0.5085
 TFRAC(2035)=0.50875 ;TFRAC(2036)=0.509
 TFRAC(2037)=0.50925 ;TFRAC(2038)=0.5095
 TFRAC(2039)=0.50975 ;TFRAC(2040)=0.51
 TFRAC(2041)=0.51025 ;TFRAC(2042)=0.5105
 TFRAC(2043)=0.51075 ;TFRAC(2044)=0.511
 TFRAC(2045)=0.51125 ;TFRAC(2046)=0.5115
 TFRAC(2047)=0.51175 ;TFRAC(2048)=0.512
 TFRAC(2049)=0.51225 ;TFRAC(2050)=0.5125
 TFRAC(2051)=0.51275 ;TFRAC(2052)=0.513
 TFRAC(2053)=0.51325 ;TFRAC(2054)=0.5135
 TFRAC(2055)=0.51375 ;TFRAC(2056)=0.514
 TFRAC(2057)=0.51425 ;TFRAC(2058)=0.5145
 TFRAC(2059)=0.51475 ;TFRAC(2060)=0.515
 TFRAC(2061)=0.51525 ;TFRAC(2062)=0.5155
 TFRAC(2063)=0.51575 ;TFRAC(2064)=0.516
 TFRAC(2065)=0.51625 ;TFRAC(2066)=0.5165
 TFRAC(2067)=0.51675 ;TFRAC(2068)=0.517
 TFRAC(2069)=0.51725 ;TFRAC(2070)=0.5175
 TFRAC(2071)=0.51775 ;TFRAC(2072)=0.518
 TFRAC(2073)=0.51825 ;TFRAC(2074)=0.5185
 TFRAC(2075)=0.51875 ;TFRAC(2076)=0.519
 TFRAC(2077)=0.51925 ;TFRAC(2078)=0.5195
 TFRAC(2079)=0.51975 ;TFRAC(2080)=0.52
 TFRAC(2081)=0.52025 ;TFRAC(2082)=0.5205
 TFRAC(2083)=0.52075 ;TFRAC(2084)=0.521
 TFRAC(2085)=0.52125 ;TFRAC(2086)=0.5215
 TFRAC(2087)=0.52175 ;TFRAC(2088)=0.522
 TFRAC(2089)=0.52225 ;TFRAC(2090)=0.5225
 TFRAC(2091)=0.52275 ;TFRAC(2092)=0.523
 TFRAC(2093)=0.52325 ;TFRAC(2094)=0.5235
 TFRAC(2095)=0.52375 ;TFRAC(2096)=0.524
 TFRAC(2097)=0.52425 ;TFRAC(2098)=0.5245
 TFRAC(2099)=0.52475 ;TFRAC(2100)=0.525
 TFRAC(2101)=0.52525 ;TFRAC(2102)=0.5255
 TFRAC(2103)=0.52575 ;TFRAC(2104)=0.526
 TFRAC(2105)=0.52625 ;TFRAC(2106)=0.5265
 TFRAC(2107)=0.52675 ;TFRAC(2108)=0.527
 TFRAC(2109)=0.52725 ;TFRAC(2110)=0.5275
 TFRAC(2111)=0.52775 ;TFRAC(2112)=0.528
 TFRAC(2113)=0.52825 ;TFRAC(2114)=0.5285
 TFRAC(2115)=0.52875 ;TFRAC(2116)=0.529
 TFRAC(2117)=0.52925 ;TFRAC(2118)=0.5295
 TFRAC(2119)=0.52975 ;TFRAC(2120)=0.53
 TFRAC(2121)=0.53025 ;TFRAC(2122)=0.5305
 TFRAC(2123)=0.53075 ;TFRAC(2124)=0.531
 TFRAC(2125)=0.53125 ;TFRAC(2126)=0.5315
 TFRAC(2127)=0.53175 ;TFRAC(2128)=0.532
 TFRAC(2129)=0.53225 ;TFRAC(2130)=0.5325
 TFRAC(2131)=0.53275 ;TFRAC(2132)=0.533
 TFRAC(2133)=0.53325 ;TFRAC(2134)=0.5335
 TFRAC(2135)=0.53375 ;TFRAC(2136)=0.534
 TFRAC(2137)=0.53425 ;TFRAC(2138)=0.5345
 TFRAC(2139)=0.53475 ;TFRAC(2140)=0.535
 TFRAC(2141)=0.53525 ;TFRAC(2142)=0.5355
 TFRAC(2143)=0.53575 ;TFRAC(2144)=0.536
 TFRAC(2145)=0.53625 ;TFRAC(2146)=0.5365
 TFRAC(2147)=0.53675 ;TFRAC(2148)=0.537
 TFRAC(2149)=0.53725 ;TFRAC(2150)=0.5375
 TFRAC(2151)=0.53775 ;TFRAC(2152)=0.538
 TFRAC(2153)=0.53825 ;TFRAC(2154)=0.5385
 TFRAC(2155)=0.53875 ;TFRAC(2156)=0.539
 TFRAC(2157)=0.53925 ;TFRAC(2158)=0.5395
 TFRAC(2159)=0.53975 ;TFRAC(2160)=0.54
 TFRAC(2161)=0.54025 ;TFRAC(2162)=0.5405
 TFRAC(2163)=0.54075 ;TFRAC(2164)=0.541
 TFRAC(2165)=0.54125 ;TFRAC(2166)=0.5415
 TFRAC(2167)=0.54175 ;TFRAC(2168)=0.542
 TFRAC(2169)=0.54225 ;TFRAC(2170)=0.5425
 TFRAC(2171)=0.54275 ;TFRAC(2172)=0.543
 TFRAC(2173)=0.54325 ;TFRAC(2174)=0.5435
 TFRAC(2175)=0.54375 ;TFRAC(2176)=0.544
 TFRAC(2177)=0.54425 ;TFRAC(2178)=0.5445
 TFRAC(2179)=0.54475 ;TFRAC(2180)=0.545
 TFRAC(2181)=0.54525 ;TFRAC(2182)=0.5455
 TFRAC(2183)=0.54575 ;TFRAC(2184)=0.546
 TFRAC(2185)=0.54625 ;TFRAC(2186)=0.5465
 TFRAC(2187)=0.54675 ;TFRAC(2188)=0.547
 TFRAC(2189)=0.54725 ;TFRAC(2190)=0.5475
 TFRAC(2191)=0.54775 ;TFRAC(2192)=0.548
 TFRAC(2193)=0.54825 ;TFRAC(2194)=0.5485
 TFRAC(2195)=0.54875 ;TFRAC(2196)=0.549
 TFRAC(2197)=0.54925 ;TFRAC(2198)=0.5495
 TFRAC(2199)=0.54975 ;TFRAC(2200)=0.55
 TFRAC(2201)=0.55025 ;TFRAC(2202)=0.5505
 TFRAC(2203)=0.55075 ;TFRAC(2204)=0.551
 TFRAC(2205)=0.55125 ;TFRAC(2206)=0.5515
 TFRAC(2207)=0.55175 ;TFRAC(2208)=0.552
 TFRAC(2209)=0.55225 ;TFRAC(2210)=0.5525
 TFRAC(2211)=0.55275 ;TFRAC(2212)=0.553
 TFRAC(2213)=0.55325 ;TFRAC(2214)=0.5535
 TFRAC(2215)=0.55375 ;TFRAC(2216)=0.554
 TFRAC(2217)=0.55425 ;TFRAC(2218)=0.5545
 TFRAC(2219)=0.55475 ;TFRAC(2220)=0.555
 TFRAC(2221)=0.55525 ;TFRAC(2222)=0.5555
 TFRAC(2223)=0.55575 ;TFRAC(2224)=0.556
 TFRAC(2225)=0.55625 ;TFRAC(2226)=0.5565
 TFRAC(2227)=0.55675 ;TFRAC(2228)=0.557
 TFRAC(2229)=0.55725 ;TFRAC(2230)=0.5575
 TFRAC(2231)=0.55775 ;TFRAC(2232)=0.558
 TFRAC(2233)=0.55825 ;TFRAC(2234)=0.5585
 TFRAC(2235)=0.55875 ;TFRAC(2236)=0.559
 TFRAC(2237)=0.55925 ;TFRAC(2238)=0.5595
 TFRAC(2239)=0.55975 ;TFRAC(2240)=0.56
 TFRAC(2241)=0.56025 ;TFRAC(2242)=0.5605
 TFRAC(2243)=0.56075 ;TFRAC(2244)=0.561
 TFRAC(2245)=0.56125 ;TFRAC(2246)=0.5615
 TFRAC(2247)=0.56175 ;TFRAC(2248)=0.562
 TFRAC(2249)=0.56225 ;TFRAC(2250)=0.5625
 TFRAC(2251)=0.56275 ;TFRAC(2252)=0.563
 TFRAC(2253)=0.56325 ;TFRAC(2254)=0.5635
 TFRAC(2255)=0.56375 ;TFRAC(2256)=0.564
 TFRAC(2257)=0.56425 ;TFRAC(2258)=0.5645
 TFRAC(2259)=0.56475 ;TFRAC(2260)=0.565
 TFRAC(2261)=0.56525 ;TFRAC(2262)=0.5655
 TFRAC(2263)=0.56575 ;TFRAC(2264)=0.566
 TFRAC(2265)=0.56625 ;TFRAC(2266)=0.5665
 TFRAC(2267)=0.56675 ;TFRAC(2268)=0.567
 TFRAC(2269)=0.56725 ;TFRAC(2270)=0.5675
 TFRAC(2271)=0.56775 ;TFRAC(2272)=0.568
 TFRAC(2273)=0.56825 ;TFRAC(2274)=0.5685
 TFRAC(2275)=0.56875 ;TFRAC(2276)=0.569
 TFRAC(2277)=0.56925 ;TFRAC(2278)=0.5695
 TFRAC(2279)=0.56975 ;TFRAC(2280)=0.57
 TFRAC(2281)=0.57025 ;TFRAC(2282)=0.5705
 TFRAC(2283)=0.57075 ;TFRAC(2284)=0.571
 TFRAC(2285)=0.57125 ;TFRAC(2286)=0.5715
 TFRAC(2287)=0.57175 ;TFRAC(2288)=0.572
 TFRAC(2289)=0.57225 ;TFRAC(2290)=0.5725
 TFRAC(2291)=0.57275 ;TFRAC(2292)=0.573
 TFRAC(2293)=0.57325 ;TFRAC(2294)=0.5735
 TFRAC(2295)=0.57375 ;TFRAC(2296)=0.574
 TFRAC(2297)=0.57425 ;TFRAC(2298)=0.5745
 TFRAC(2299)=0.57475 ;TFRAC(2300)=0.575
 TFRAC(2301)=0.57525 ;TFRAC(2302)=0.5755
 TFRAC(2303)=0.57575 ;TFRAC(2304)=0.576
 TFRAC(2305)=0.57625 ;TFRAC(2306)=0.5765
 TFRAC(2307)=0.57675 ;TFRAC(2308)=0.577
 TFRAC(2309)=0.57725 ;TFRAC(2310)=0.5775
 TFRAC(2311)=0.57775 ;TFRAC(2312)=0.578
 TFRAC(2313)=0.57825 ;TFRAC(2314)=0.5785
 TFRAC(2315)=0.57875 ;TFRAC(2316)=0.579
 TFRAC(2317)=0.57925 ;TFRAC(2318)=0.5795
 TFRAC(2319)=0.57975 ;TFRAC(2320)=0.58
 TFRAC(2321)=0.58025 ;TFRAC(2322)=0.5805
 TFRAC(2323)=0.58075 ;TFRAC(2324)=0.581
 TFRAC(2325)=0.58125 ;TFRAC(2326)=0.5815
 TFRAC(2327)=0.58175 ;TFRAC(2328)=0.582
 TFRAC(2329)=0.58225 ;TFRAC(2330)=0.5825
 TFRAC(2331)=0.58275 ;TFRAC(2332)=0.583
 TFRAC(2333)=0.58325 ;TFRAC(2334)=0.5835
 TFRAC(2335)=0.58375 ;TFRAC(2336)=0.584
 TFRAC(2337)=0.58425 ;TFRAC(2338)=0.5845
 TFRAC(2339)=0.58475 ;TFRAC(2340)=0.585
 TFRAC(2341)=0.58525 ;TFRAC(2342)=0.5855
 TFRAC(2343)=0.58575 ;TFRAC(2344)=0.586
 TFRAC(2345)=0.58625 ;TFRAC(2346)=0.5865
 TFRAC(2347)=0.58675 ;TFRAC(2348)=0.587
 TFRAC(2349)=0.58725 ;TFRAC(2350)=0.5875
 TFRAC(2351)=0.58775 ;TFRAC(2352)=0.588
 TFRAC(2353)=0.58825 ;TFRAC(2354)=0.5885
 TFRAC(2355)=0.58875 ;TFRAC(2356)=0.589
 TFRAC(2357)=0.58925 ;TFRAC(2358)=0.5895
 TFRAC(2359)=0.58975 ;TFRAC(2360)=0.59
 TFRAC(2361)=0.59025 ;TFRAC(2362)=0.5905
 TFRAC(2363)=0.59075 ;TFRAC(2364)=0.591
 TFRAC(2365)=0.59125 ;TFRAC(2366)=0.5915
 TFRAC(2367)=0.59175 ;TFRAC(2368)=0.592
 TFRAC(2369)=0.59225 ;TFRAC(2370)=0.5925
 TFRAC(2371)=0.59275 ;TFRAC(2372)=0.593
 TFRAC(2373)=0.59325 ;TFRAC(2374)=0.5935
 TFRAC(2375)=0.59375 ;TFRAC(2376)=0.594
 TFRAC(2377)=0.59425 ;TFRAC(2378)=0.5945
 TFRAC(2379)=0.59475 ;TFRAC(2380)=0.595
 TFRAC(2381)=0.59525 ;TFRAC(2382)=0.5955
 TFRAC(2383)=0.59575 ;TFRAC(2384)=0.596
 TFRAC(2385)=0.59625 ;TFRAC(2386)=0.5965
 TFRAC(2387)=0.59675 ;TFRAC(2388)=0.597
 TFRAC(2389)=0.59725 ;TFRAC(2390)=0.5975
 TFRAC(2391)=0.59775 ;TFRAC(2392)=0.598
 TFRAC(2393)=0.59825 ;TFRAC(2394)=0.5985
 TFRAC(2395)=0.59875 ;TFRAC(2396)=0.599
 TFRAC(2397)=0.59925 ;TFRAC(2398)=0.5995
 TFRAC(2399)=0.59975 ;TFRAC(2400)=0.6
 TFRAC(2401)=0.60025 ;TFRAC(2402)=0.6005
 TFRAC(2403)=0.60075 ;TFRAC(2404)=0.601
 TFRAC(2405)=0.60125 ;TFRAC(2406)=0.6015
 TFRAC(2407)=0.60175 ;TFRAC(2408)=0.602
 TFRAC(2409)=0.60225 ;TFRAC(2410)=0.6025
 TFRAC(2411)=0.60275 ;TFRAC(2412)=0.603
 TFRAC(2413)=0.60325 ;TFRAC(2414)=0.6035
 TFRAC(2415)=0.60375 ;TFRAC(2416)=0.604
 TFRAC(2417)=0.60425 ;TFRAC(2418)=0.6045
 TFRAC(2419)=0.60475 ;TFRAC(2420)=0.605
 TFRAC(2421)=0.60525 ;TFRAC(2422)=0.6055
 TFRAC(2423)=0.60575 ;TFRAC(2424)=0.606
 TFRAC(2425)=0.60625 ;TFRAC(2426)=0.6065
 TFRAC(2427)=0.60675 ;TFRAC(2428)=0.607
 TFRAC(2429)=0.60725 ;TFRAC(2430)=0.6075
 TFRAC(2431)=0.60775 ;TFRAC(2432)=0.608
 TFRAC(2433)=0.60825 ;TFRAC(2434)=0.6085
 TFRAC(2435)=0.60875 ;TFRAC(2436)=0.609
 TFRAC(2437)=0.60925 ;TFRAC(2438)=0.6095
 TFRAC(2439)=0.60975 ;TFRAC(2440)=0.61
 TFRAC(2441)=0.61025 ;TFRAC(2442)=0.6105
 TFRAC(2443)=0.61075 ;TFRAC(2444)=0.611
 TFRAC(2445)=0.61125 ;TFRAC(2446)=0.6115
 TFRAC(2447)=0.61175 ;TFRAC(2448)=0.612
 TFRAC(2449)=0.61225 ;TFRAC(2450)=0.6125
 TFRAC(2451)=0.61275 ;TFRAC(2452)=0.613
 TFRAC(2453)=0.61325 ;TFRAC(2454)=0.6135
 TFRAC(2455)=0.61375 ;TFRAC(2456)=0.614
 TFRAC(2457)=0.61425 ;TFRAC(2458)=0.6145
 TFRAC(2459)=0.61475 ;TFRAC(2460)=0.615
 TFRAC(2461)=0.61525 ;TFRAC(2462)=0.6155
 TFRAC(2463)=0.61575 ;TFRAC(2464)=0.616
 TFRAC(2465)=0.61625 ;TFRAC(2466)=0.6165
 TFRAC(2467)=0.61675 ;TFRAC(2468)=0.617
 TFRAC(2469)=0.61725 ;TFRAC(2470)=0.6175
 TFRAC(2471)=0.61775 ;TFRAC(2472)=0.618
 TFRAC(2473)=0.61825 ;TFRAC(2474)=0.6185
 TFRAC(2475)=0.61875 ;TFRAC(2476)=0.619
 TFRAC(2477)=0.61925 ;TFRAC(2478)=0.6195
 TFRAC(2479)=0.61975 ;TFRAC(2480)=0.62
 TFRAC(2481)=0.62025 ;TFRAC(2482)=0.6205
 TFRAC(2483)=0.62075 ;TFRAC(2484)=0.621
 TFRAC(2485)=0.62125 ;TFRAC(2486)=0.6215
 TFRAC(2487)=0.62175 ;TFRAC(2488)=0.622
 TFRAC(2489)=0.62225 ;TFRAC(2490)=0.6225
 TFRAC(2491)=0.62275 ;TFRAC(2492)=0.623
 TFRAC(2493)=0.62325 ;TFRAC(2494)=0.6235
 TFRAC(2495)=0.62375 ;TFRAC(2496)=0.624
 TFRAC(2497)=0.62425 ;TFRAC(2498)=0.6245
 TFRAC(2499)=0.62475 ;TFRAC(2500)=0.625
 TFRAC(2501)=0.62525 ;TFRAC(2502)=0.6255
 TFRAC(2503)=0.62575 ;TFRAC(2504)=0.626
 TFRAC(2505)=0.62625 ;TFRAC(2506)=0.6265
 TFRAC(2507)=0.62675 ;TFRAC(2508)=0.627
 TFRAC(2509)=0.62725 ;TFRAC(2510)=0.6275
 TFRAC(2511)=0.62775 ;TFRAC(2512)=0.628
 TFRAC(2513)=0.62825 ;TFRAC(2514)=0.6285
 TFRAC(2515)=0.62875 ;TFRAC(2516)=0.629
 TFRAC(2517)=0.62925 ;TFRAC(2518)=0.6295
 TFRAC(2519)=0.62975 ;TFRAC(2520)=0.63
 TFRAC(2521)=0.63025 ;TFRAC(2522)=0.6305
 TFRAC(2523)=0.63075 ;TFRAC(2524)=0.631
 TFRAC(2525)=0.63125 ;TFRAC(2526)=0.6315
 TFRAC(2527)=0.63175 ;TFRAC(2528)=0.632
 TFRAC(2529)=0.63225 ;TFRAC(2530)=0.6325
 TFRAC(2531)=0.63275 ;TFRAC(2532)=0.633
 TFRAC(2533)=0.63325 ;TFRAC(2534)=0.6335
 TFRAC(2535)=0.63375 ;TFRAC(2536)=0.634
 TFRAC(2537)=0.63425 ;TFRAC(2538)=0.6345
 TFRAC(2539)=0.63475 ;TFRAC(2540)=0.635
 TFRAC(2541)=0.63525 ;TFRAC(2542)=0.6355
 TFRAC(2543)=0.63575 ;TFRAC(2544)=0.636
 TFRAC(2545)=0.63625 ;TFRAC(2546)=0.6365
 TFRAC(2547)=0.63675 ;TFRAC(2548)=0.637
 TFRAC(2549)=0.63725 ;TFRAC(2550)=0.6375
 TFRAC(2551)=0.63775 ;TFRAC(2552)=0.638
 TFRAC(2553)=0.63825 ;TFRAC(2554)=0.6385
 TFRAC(2555)=0.63875 ;TFRAC(2556)=0.639
 TFRAC(2557)=0.63925 ;TFRAC(2558)=0.6395
 TFRAC(2559)=0.63975 ;TFRAC(2560)=0.64
 TFRAC(2561)=0.64025 ;TFRAC(2562)=0.6405
 TFRAC(2563)=0.64075 ;TFRAC(2564)=0.641
 TFRAC(2565)=0.64125 ;TFRAC(2566)=0.6415
 TFRAC(2567)=0.64175 ;TFRAC(2568)=0.642
 TFRAC(2569)=0.64225 ;TFRAC(2570)=0.6425
 TFRAC(2571)=0.64275 ;TFRAC(2572)=0.643
 TFRAC(2573)=0.64325 ;TFRAC(2574)=0.6435
 TFRAC(2575)=0.64375 ;TFRAC(2576)=0.644
 TFRAC(2577)=0.64425 ;TFRAC(2578)=0.6445
 TFRAC(2579)=0.64475 ;TFRAC(2580)=0.645
 TFRAC(2581)=0.64525 ;TFRAC(2582)=0.6455
 TFRAC(2583)=0.64575 ;TFRAC(2584)=0.646
 TFRAC(2585)=0.64625 ;TFRAC(2586)=0.6465
 TFRAC(2587)=0.64675 ;TFRAC(2588)=0.647
 TFRAC(2589)=0.64725 ;TFRAC(2590)=0.6475
 TFRAC(2591)=0.64775 ;TFRAC(2592)=0.648
 TFRAC(2593)=0.64825 ;TFRAC(2594)=0.6485
 TFRAC(2595)=0.64875 ;TFRAC(2596)=0.649
 TFRAC(2597)=0.64925 ;TFRAC(2598)=0.6495
 TFRAC(2599)=0.64975 ;TFRAC(2600)=0.65
 TFRAC(2601)=0.65025 ;TFRAC(2602)=0.6505
 TFRAC(2603)=0.65075 ;TFRAC(2604)=0.651
 TFRAC(2605)=0.65125 ;TFRAC(2606)=0.6515
 TFRAC(2607)=0.65175 ;TFRAC(2608)=0.652
 TFRAC(2609)=0.65225 ;TFRAC(2610)=0.6525
 TFRAC(2611)=0.65275 ;TFRAC(2612)=0.653
 TFRAC(2613)=0.65325 ;TFRAC(2614)=0.6535
 TFRAC(2615)=0.65375 ;TFRAC(2616)=0.654
 TFRAC(2617)=0.65425 ;TFRAC(2618)=0.6545
 TFRAC(2619)=0.65475 ;TFRAC(2620)=0.655
 TFRAC(2621)=0.65525 ;TFRAC(2622)=0.6555
 TFRAC(2623)=0.65575 ;TFRAC(2624)=0.656
 TFRAC(2625)=0.65625 ;TFRAC(2626)=0.6565
 TFRAC(2627)=0.65675 ;TFRAC(2628)=0.657
 TFRAC(2629)=0.65725 ;TFRAC(2630)=0.6575
 TFRAC(2631)=0.65775 ;TFRAC(2632)=0.658
 TFRAC(2633)=0.65825 ;TFRAC(2634)=0.6585
 TFRAC(2635)=0.65875 ;TFRAC(2636)=0.659
 TFRAC(2637)=0.65925 ;TFRAC(2638)=0.6595
 TFRAC(2639)=0.65975 ;TFRAC(2640)=0.66
 TFRAC(2641)=0.66025 ;TFRAC(2642)=0.6605
 TFRAC(2643)=0.66075 ;TFRAC(2644)=0.661
 TFRAC(2645)=0.66125 ;TFRAC(2646)=0.6615
 TFRAC(2647)=0.66175 ;TFRAC(2648)=0.662
 TFRAC(2649)=0.66225 ;TFRAC(2650)=0.6625
 TFRAC(2651)=0.66275 ;TFRAC(2652)=0.663
 TFRAC(2653)=0.66325 ;TFRAC(2654)=0.6635
 TFRAC(2655)=0.66375 ;TFRAC(2656)=0.664
 TFRAC(2657)=0.66425 ;TFRAC(2658)=0.6645
 TFRAC(2659)=0.66475 ;TFRAC(2660)=0.665
 TFRAC(2661)=0.66525 ;TFRAC(2662)=0.6655
 TFRAC(2663)=0.66575 ;TFRAC(2664)=0.666
 TFRAC(2665)=0.66625 ;TFRAC(2666)=0.6665
 TFRAC(2667)=0.66675 ;TFRAC(2668)=0.667
 TFRAC(2669)=0.66725 ;TFRAC(2670)=0.6675
 TFRAC(2671)=0.66775 ;TFRAC(2672)=0.668
 TFRAC(2673)=0.66825 ;TFRAC(2674)=0.6685
 TFRAC(2675)=0.66875 ;TFRAC(2676)=0.669
 TFRAC(2677)=0.66925 ;TFRAC(2678)=0.6695
 TFRAC(2679)=0.66975 ;TFRAC(2680)=0.67
 TFRAC(2681)=0.67025 ;TFRAC(2682)=0.6705
 TFRAC(2683)=0.67075 ;TFRAC(2684)=0.671
 TFRAC(2685)=0.67125 ;TFRAC(2686)=0.6715
 TFRAC(2687)=0.67175 ;TFRAC(2688)=0.672
 TFRAC(2689)=0.67225 ;TFRAC(2690)=0.6725
 TFRAC(2691)=0.67275 ;TFRAC(2692)=0.673
 TFRAC(2693)=0.67325 ;TFRAC(2694)=0.6735
 TFRAC(2695)=0.67375 ;TFRAC(2696)=0.674
 TFRAC(2697)=0.67425 ;TFRAC(2698)=0.6745
 TFRAC(2699)=0.67475 ;TFRAC(2700)=0.675
 TFRAC(2701)=0.67525 ;TFRAC(2702)=0.6755
 TFRAC(2703)=0.67575 ;TFRAC(2704)=0.676
 TFRAC(2705)=0.67625 ;TFRAC(2706)=0.6765
 TFRAC(2707)=0.67675 ;TFRAC(2708)=0.677
 TFRAC(2709)=0.67725 ;TFRAC(2710)=0.6775
 TFRAC(2711)=0.67775 ;TFRAC(2712)=0.678
 TFRAC(2713)=0.67825 ;TFRAC(2714)=0.6785
 TFRAC(2715)=0.67875 ;TFRAC(2716)=0.679
 TFRAC(2717)=0.67925 ;TFRAC(2718)=0.6795
 TFRAC(2719)=0.67975 ;TFRAC(2720)=0.68
 TFRAC(2721)=0.68025 ;TFRAC(2722)=0.6805
 TFRAC(2723)=0.68075 ;TFRAC(2724)=0.681
 TFRAC(2725)=0.68125 ;TFRAC(2726)=0.6815
 TFRAC(2727)=0.68175 ;TFRAC(2728)=0.682
 TFRAC(2729)=0.68225 ;TFRAC(2730)=0.6825
 TFRAC(2731)=0.68275 ;TFRAC(2732)=0.683
 TFRAC(2733)=0.68325 ;TFRAC(2734)=0.6835
 TFRAC(2735)=0.68375 ;TFRAC(2736)=0.684
 TFRAC(2737)=0.68425 ;TFRAC(2738)=0.6845
 TFRAC(2739)=0.68475 ;TFRAC(2740)=0.685
 TFRAC(2741)=0.68525 ;TFRAC(2742)=0.6855
 TFRAC(2743)=0.68575 ;TFRAC(2744)=0.686
 TFRAC(2745)=0.68625 ;TFRAC(2746)=0.6865
 TFRAC(2747)=0.68675 ;TFRAC(2748)=0.687
 TFRAC(2749)=0.68725 ;TFRAC(2750)=0.6875
 TFRAC(2751)=0.68775 ;TFRAC(2752)=0.688
 TFRAC(2753)=0.68825 ;TFRAC(2754)=0.6885
 TFRAC(2755)=0.68875 ;TFRAC(2756)=0.689
 TFRAC(2757)=0.68925 ;TFRAC(2758)=0.6895
 TFRAC(2759)=0.68975 ;TFRAC(2760)=0.69
 TFRAC(2761)=0.69025 ;TFRAC(2762)=0.6905
 TFRAC(2763)=0.69075 ;TFRAC(2764)=0.691
 TFRAC(2765)=0.69125 ;TFRAC(2766)=0.6915
 TFRAC(2767)=0.69175 ;TFRAC(2768)=0.692
 TFRAC(2769)=0.69225 ;TFRAC(2770)=0.6925
 TFRAC(2771)=0.69275 ;TFRAC(2772)=0.693
 TFRAC(2773)=0.69325 ;TFRAC(2774)=0.6935
 TFRAC(2775)=0.69375 ;TFRAC(2776)=0.694
 TFRAC(2777)=0.69425 ;TFRAC(2778)=0.6945
 TFRAC(2779)=0.69475 ;TFRAC(2780)=0.695
 TFRAC(2781)=0.69525 ;TFRAC(2782)=0.6955
 TFRAC(2783)=0.69575 ;TFRAC(2784)=0.696
 TFRAC(2785)=0.69625 ;TFRAC(2786)=0.6965
 TFRAC(2787)=0.69675 ;TFRAC(2788)=0.697
 TFRAC(2789)=0.69725 ;TFRAC(2790)=0.6975
 TFRAC(2791)=0.69775 ;TFRAC(2792)=0.698
 TFRAC(2793)=0.69825 ;TFRAC(2794)=0.6985
 TFRAC(2795)=0.69875 ;TFRAC(2796)=0.699
 TFRAC(2797)=0.69925 ;TFRAC(2798)=0.6995
 TFRAC(2799)=0.69975 ;TFRAC(2800)=0.7
 TFRAC(2801)=0.70025 ;TFRAC(2802)=0.7005
 TFRAC(2803)=0.70075 ;TFRAC(2804)=0.701
 TFRAC(2805)=0.70125 ;TFRAC(2806)=0.7015
 TFRAC(2807)=0.70175 ;TFRAC(2808)=0.702
 TFRAC(2809)=0.70225 ;TFRAC(2810)=0.7025
 TFRAC(2811)=0.70275 ;TFRAC(2812)=0.703
 TFRAC(2813)=0.70325 ;TFRAC(2814)=0.7035
 TFRAC(2815)=0.70375 ;TFRAC(2816)=0.704
 TFRAC(2817)=0.70425 ;TFRAC(2818)=0.7045
 TFRAC(2819)=0.70475 ;TFRAC(2820)=0.705
 TFRAC(2821)=0.70525 ;TFRAC(2822)=0.7055
 TFRAC(2823)=0.70575 ;TFRAC(2824)=0.706
 TFRAC(2825)=0.70625 ;TFRAC(2826)=0.7065
 TFRAC(2827)=0.70675 ;TFRAC(2828)=0.707
 TFRAC(2829)=0.70725 ;TFRAC(2830)=0.7075
 TFRAC(2831)=0.70775 ;TFRAC(2832)=0.708
 TFRAC(2833)=0.70825 ;TFRAC(2834)=0.7085
 TFRAC(2835)=0.70875 ;TFRAC(2836)=0.709
 TFRAC(2837)=0.70925 ;TFRAC(2838)=0.7095
 TFRAC(2839)=0.70975 ;TFRAC(2840)=0.71
 TFRAC(2841)=0.71025 ;TFRAC(2842)=0.7105
 TFRAC(2843)=0.71075 ;TFRAC(2844)=0.711
 TFRAC(2845)=0.71125 ;TFRAC(2846)=0.7115
 TFRAC(2847)=0.71175 ;TFRAC(2848)=0.712
 TFRAC(2849)=0.71225 ;TFRAC(2850)=0.7125
 TFRAC(2851)=0.71275 ;TFRAC(2852)=0.713
 TFRAC(2853)=0.71325 ;TFRAC(2854)=0.7135
 TFRAC(2855)=0.71375 ;TFRAC(2856)=0.714
 TFRAC(2857)=0.71425 ;TFRAC(2858)=0.7145
 TFRAC(2859)=0.71475 ;TFRAC(2860)=0.715
 TFRAC(2861)=0.71525 ;TFRAC(2862)=0.7155
 TFRAC(2863)=0.71575 ;TFRAC(2864)=0.716
 TFRAC(2865)=0.71625 ;TFRAC(2866)=0.7165
 TFRAC(2867)=0.71675 ;TFRAC(2868)=0.717
 TFRAC(2869)=0.71725 ;TFRAC(2870)=0.7175
 TFRAC(2871)=0.71775 ;TFRAC(2872)=0.718
 TFRAC(2873)=0.71825 ;TFRAC(2874)=0.7185
 TFRAC(2875)=0.71875 ;TFRAC(2876)=0.719
 TFRAC(2877)=0.71925 ;TFRAC(2878)=0.7195
 TFRAC(2879)=0.71975 ;TFRAC(2880)=0.72
 TFRAC(2881)=0.72025 ;TFRAC(2882)=0.7205
 TFRAC(2883)=0.72075 ;TFRAC(2884)=0.721
 TFRAC(2885)=0.72125 ;TFRAC(2886)=0.7215
 TFRAC(2887)=0.72175 ;TFRAC(2888)=0.722
 TFRAC(2889)=0.72225 ;TFRAC(2890)=0.7225
 TFRAC(2891)=0.72275 ;TFRAC(2892)=0.723
 TFRAC(2893)=0.72325 ;TFRAC(2894)=0.7235
 TFRAC(2895)=0.72375 ;TFRAC(2896)=0.724
 TFRAC(2897)=0.72425 ;TFRAC(2898)=0.7245
 TFRAC(2899)=0.72475 ;TFRAC(2900)=0.725
 TFRAC(2901)=0.72525 ;TFRAC(2902)=0.7255
 TFRAC(2903)=0.72575 ;TFRAC(2904)=0.726
 TFRAC(2905)=0.72625 ;TFRAC(2906)=0.7265
 TFRAC(2907)=0.72675 ;TFRAC(2908)=0.727
 TFRAC(2909)=0.72725 ;TFRAC(2910)=0.7275
 TFRAC(2911)=0.72775 ;TFRAC(2912)=0.728
 TFRAC(2913)=0.72825 ;TFRAC(2914)=0.7285
 TFRAC(2915)=0.72875 ;TFRAC(2916)=0.729
 TFRAC(2917)=0.72925 ;TFRAC(2918)=0.7295
 TFRAC(2919)=0.72975 ;TFRAC(2920)=0.73
 TFRAC(2921)=0.73025 ;TFRAC(2922)=0.7305
 TFRAC(2923)=0.73075 ;TFRAC(2924)=0.731
 TFRAC(2925)=0.73125 ;TFRAC(2926)=0.7315
 TFRAC(2927)=0.73175 ;TFRAC(2928)=0.732
 TFRAC(2929)=0.73225 ;TFRAC(2930)=0.7325
 TFRAC(2931)=0.73275 ;TFRAC(2932)=0.733
 TFRAC(2933)=0.73325 ;TFRAC(2934)=0.7335
 TFRAC(2935)=0.73375 ;TFRAC(2936)=0.734
 TFRAC(2937)=0.73425 ;TFRAC(2938)=0.7345
 TFRAC(2939)=0.73475 ;TFRAC(2940)=0.735
 TFRAC(2941)=0.73525 ;TFRAC(2942)=0.7355
 TFRAC(2943)=0.73575 ;TFRAC(2944)=0.736
 TFRAC(2945)=0.73625 ;TFRAC(2946)=0.7365
 TFRAC(2947)=0.73675 ;TFRAC(2948)=0.737
 TFRAC(2949)=0.73725 ;TFRAC(2950)=0.7375
 TFRAC(2951)=0.73775 ;TFRAC(2952)=0.738
 TFRAC(2953)=0.73825 ;TFRAC(2954)=0.7385
 TFRAC(2955)=0.73875 ;TFRAC(2956)=0.739
 TFRAC(2957)=0.73925 ;TFRAC(2958)=0.7395
 TFRAC(2959)=0.73975 ;TFRAC(2960)=0.74
 TFRAC(2961)=0.74025 ;TFRAC(2962)=0.7405
 TFRAC(2963)=0.74075 ;TFRAC(2964)=0.741
 TFRAC(2965)=0.74125 ;TFRAC(2966)=0.7415
 TFRAC(2967)=0.74175 ;TFRAC(2968)=0.742
 TFRAC(2969)=0.74225 ;TFRAC(2970)=0.7425
 TFRAC(2971)=0.74275 ;TFRAC(2972)=0.743
 TFRAC(2973)=0.74325 ;TFRAC(2974)=0.7435
 TFRAC(2975)=0.74375 ;TFRAC(2976)=0.744
 TFRAC(2977)=0.74425 ;TFRAC(2978)=0.7445
 TFRAC(2979)=0.74475 ;TFRAC(2980)=0.745
 TFRAC(2981)=0.74525 ;TFRAC(2982)=0.7455
 TFRAC(2983)=0.74575 ;TFRAC(2984)=0.746
 TFRAC(2985)=0.74625 ;TFRAC(2986)=0.7465
 TFRAC(2987)=0.74675 ;TFRAC(2988)=0.747
 TFRAC(2989)=0.74725 ;TFRAC(2990)=0.7475
 TFRAC(2991)=0.74775 ;TFRAC(2992)=0.748
 TFRAC(2993)=0.74825 ;TFRAC(2994)=0.7485
 TFRAC(2995)=0.74875 ;TFRAC(2996)=0.749
 TFRAC(2997)=0.74925 ;TFRAC(2998)=0.7495
 TFRAC(2999)=0.74975 ;TFRAC(3000)=0.75
 TFRAC(3001)=0.75025 ;TFRAC(3002)=0.7505
 TFRAC(3003)=0.75075 ;TFRAC(3004)=0.751
 TFRAC(3005)=0.75125 ;TFRAC(3006)=0.7515
 TFRAC(3007)=0.75175 ;TFRAC(3008)=0.752
 TFRAC(3009)=0.75225 ;TFRAC(3010)=0.7525
 TFRAC(3011)=0.75275 ;TFRAC(3012)=0.753
 TFRAC(3013)=0.75325 ;TFRAC(3014)=0.7535
 TFRAC(3015)=0.75375 ;TFRAC(3016)=0.754
 TFRAC(3017)=0.75425 ;TFRAC(3018)=0.7545
 TFRAC(3019)=0.75475 ;TFRAC(3020)=0.755
 TFRAC(3021)=0.75525 ;TFRAC(3022)=0.7555
 TFRAC(3023)=0.75575 ;TFRAC(3024)=0.756
 TFRAC(3025)=0.75625 ;TFRAC(3026)=0.7565
 TFRAC(3027)=0.75675 ;TFRAC(3028)=0.757
 TFRAC(3029)=0.75725 ;TFRAC(3030)=0.7575
 TFRAC(3031)=0.75775 ;TFRAC(3032)=0.758
 TFRAC(3033)=0.75825 ;TFRAC(3034)=0.7585
 TFRAC(3035)=0.75875 ;TFRAC(3036)=0.759
 TFRAC(3037)=0.75925 ;TFRAC(3038)=0.7595
 TFRAC(3039)=0.75975 ;TFRAC(3040)=0.76
 TFRAC(3041)=0.76025 ;TFRAC(3042)=0.7605
 TFRAC(3043)=0.76075 ;TFRAC(3044)=0.761
 TFRAC(3045)=0.76125 ;TFRAC(3046)=0.7615
 TFRAC(3047)=0.76175 ;TFRAC(3048)=0.762
 TFRAC(3049)=0.76225 ;TFRAC(3050)=0.7625
 TFRAC(3051)=0.76275 ;TFRAC(3052)=0.763
 TFRAC(3053)=0.76325 ;TFRAC(3054)=0.7635
 TFRAC(3055)=0.76375 ;TFRAC(3056)=0.764
 TFRAC(3057)=0.76425 ;TFRAC(3058)=0.7645
 TFRAC(3059)=0.76475 ;TFRAC(3060)=0.765
 TFRAC(3061)=0.76525 ;TFRAC(3062)=0.7655
 TFRAC(3063)=0.76575 ;TFRAC(3064)=0.766
 TFRAC(3065)=0.76625 ;TFRAC(3066)=0.7665
 TFRAC(3067)=0.76675 ;TFRAC(3068)=0.767
 TFRAC(3069)=0.76725 ;TFRAC(3070)=0.7675
 TFRAC(3071)=0.76775 ;TFRAC(3072)=0.768
 TFRAC(3073)=0.76825 ;TFRAC(3074)=0.7685
 TFRAC(3075)=0.76875 ;TFRAC(3076)=0.769
 TFRAC(3077)=0.76925 ;TFRAC(3078)=0.7695
 TFRAC(3079)=0.76975 ;TFRAC(3080)=0.77
 TFRAC(3081)=0.77025 ;TFRAC(3082)=0.7705
 TFRAC(3083)=0.77075 ;TFRAC(3084)=0.771
 TFRAC(3085)=0.77125 ;TFRAC(3086)=0.7715
 TFRAC(3087)=0.77175 ;TFRAC(3088)=0.772
 TFRAC(3089)=0.77225 ;TFRAC(3090)=0.7725
 TFRAC(3091)=0.77275 ;TFRAC(3092)=0.773
 TFRAC(3093)=0.77325 ;TFRAC(3094)=0.7735
 TFRAC(3095)=0.77375 ;TFRAC(3096)=0.774
 TFRAC(3097)=0.77425 ;TFRAC(3098)=0.7745
 TFRAC(3099)=0.77475 ;TFRAC(3100)=0.775
 TFRAC(3101)=0.77525 ;TFRAC(3102)=0.7755
 TFRAC(3103)=0.77575 ;TFRAC(3104)=0.776
 TFRAC(3105)=0.77625 ;TFRAC(3106)=0.7765
 TFRAC(3107)=0.77675 ;TFRAC(3108)=0.777
 TFRAC(3109)=0.77725 ;TFRAC(3110)=0.7775
 TFRAC(3111)=0.77775 ;TFRAC(3112)=0.778
 TFRAC(3113)=0.77825 ;TFRAC(3114)=0.7785
 TFRAC(3115)=0.77875 ;TFRAC(3116)=0.779
 TFRAC(3117)=0.77925 ;TFRAC(3118)=0.7795
 TFRAC(3119)=0.77975 ;TFRAC(3120)=0.78
 TFRAC(3121)=0.78025 ;TFRAC(3122)=0.7805
 TFRAC(3123)=0.78075 ;TFRAC(3124)=0.781
 TFRAC(3125)=0.78125 ;TFRAC(3126)=0.7815
 TFRAC(3127)=0.78175 ;TFRAC(3128)=0.782
 TFRAC(3129)=0.78225 ;TFRAC(3130)=0.7825
 TFRAC(3131)=0.78275 ;TFRAC(3132)=0.783
 TFRAC(3133)=0.78325 ;TFRAC(3134)=0.7835
 TFRAC(3135)=0.78375 ;TFRAC(3136)=0.784
 TFRAC(3137)=0.78425 ;TFRAC(3138)=0.7845
 TFRAC(3139)=0.78475 ;TFRAC(3140)=0.785
 TFRAC(3141)=0.78525 ;TFRAC(3142)=0.7855
 TFRAC(3143)=0.78575 ;TFRAC(3144)=0.786
 TFRAC(3145)=0.78625 ;TFRAC(3146)=0.7865
 TFRAC(3147)=0.78675 ;TFRAC(3148)=0.787
 TFRAC(3149)=0.78725 ;TFRAC(3150)=0.7875
 TFRAC(3151)=0.78775 ;TFRAC(3152)=0.788
 TFRAC(3153)=0.78825 ;TFRAC(3154)=0.7885
 TFRAC(3155)=0.78875 ;TFRAC(3156)=0.789
 TFRAC(3157)=0.78925 ;TFRAC(3158)=0.7895
 TFRAC(3159)=0.78975 ;TFRAC(3160)=0.79
 TFRAC(3161)=0.79025 ;TFRAC(3162)=0.7905
 TFRAC(3163)=0.79075 ;TFRAC(3164)=0.791
 TFRAC(3165)=0.79125 ;TFRAC(3166)=0.7915
 TFRAC(3167)=0.79175 ;TFRAC(3168)=0.792
 TFRAC(3169)=0.79225 ;TFRAC(3170)=0.7925
 TFRAC(3171)=0.79275 ;TFRAC(3172)=0.793
 TFRAC(3173)=0.79325 ;TFRAC(3174)=0.7935
 TFRAC(3175)=0.79375 ;TFRAC(3176)=0.794
 TFRAC(3177)=0.79425 ;TFRAC(3178)=0.7945
 TFRAC(3179)=0.79475 ;TFRAC(3180)=0.795
 TFRAC(3181)=0.79525 ;TFRAC(3182)=0.7955
 TFRAC(3183)=0.79575 ;TFRAC(3184)=0.796
 TFRAC(3185)=0.79625 ;TFRAC(3186)=0.7965
 TFRAC(3187)=0.79675 ;TFRAC(3188)=0.797
 TFRAC(3189)=0.79725 ;TFRAC(3190)=0.7975
 TFRAC(3191)=0.79775 ;TFRAC(3192)=0.798
 TFRAC(3193)=0.79825 ;TFRAC(3194)=0.7985
 TFRAC(3195)=0.79875 ;TFRAC(3196)=0.799
 TFRAC(3197)=0.79925 ;TFRAC(3198)=0.7995
 TFRAC(3199)=0.79975 ;TFRAC(3200)=0.8
 TFRAC(3201)=0.80025 ;TFRAC(3202)=0.8005
 TFRAC(3203)=0.80075 ;TFRAC(3204)=0.801
 TFRAC(3205)=0.80125 ;TFRAC(3206)=0.8015
 TFRAC(3207)=0.80175 ;TFRAC(3208)=0.802
 TFRAC(3209)=0.80225 ;TFRAC(3210)=0.8025
 TFRAC(3211)=0.80275 ;TFRAC(3212)=0.803
 TFRAC(3213)=0.80325 ;TFRAC(3214)=0.8035
 TFRAC(3215)=0.80375 ;TFRAC(3216)=0.804
 TFRAC(3217)=0.80425 ;TFRAC(3218)=0.8045
 TFRAC(3219)=0.80475 ;TFRAC(3220)=0.805
 TFRAC(3221)=0.80525 ;TFRAC(3222)=0.8055
 TFRAC(3223)=0.80575 ;TFRAC(3224)=0.806
 TFRAC(3225)=0.80625 ;TFRAC(3226)=0.8065
 TFRAC(3227)=0.80675 ;TFRAC(3228)=0.807
 TFRAC(3229)=0.80725 ;TFRAC(3230)=0.8075
 TFRAC(3231)=0.80775 ;TFRAC(3232)=0.808
 TFRAC(3233)=0.80825 ;TFRAC(3234)=0.8085
 TFRAC(3235)=0.80875 ;TFRAC(3236)=0.809
 TFRAC(3237)=0.80925 ;TFRAC(3238)=0.8095
 TFRAC(3239)=0.80975 ;TFRAC(3240)=0.81
 TFRAC(3241)=0.81025 ;TFRAC(3242)=0.8105
 TFRAC(3243)=0.81075 ;TFRAC(3244)=0.811
 TFRAC(3245)=0.81125 ;TFRAC(3246)=0.8115
 TFRAC(3247)=0.81175 ;TFRAC(3248)=0.812
 TFRAC(3249)=0.81225 ;TFRAC(3250)=0.8125
 TFRAC(3251)=0.81275 ;TFRAC(3252)=0.813
 TFRAC(3253)=0.81325 ;TFRAC(3254)=0.8135
 TFRAC(3255)=0.81375 ;TFRAC(3256)=0.814
 TFRAC(3257)=0.81425 ;TFRAC(3258)=0.8145
 TFRAC(3259)=0.81475 ;TFRAC(3260)=0.815
 TFRAC(3261)=0.81525 ;TFRAC(3262)=0.8155
 TFRAC(3263)=0.81575 ;TFRAC(3264)=0.816
 TFRAC(3265)=0.81625 ;TFRAC(3266)=0.8165
 TFRAC(3267)=0.81675 ;TFRAC(3268)=0.817
 TFRAC(3269)=0.81725 ;TFRAC(3270)=0.8175
 TFRAC(3271)=0.81775 ;TFRAC(3272)=0.818
 TFRAC(3273)=0.81825 ;TFRAC(3274)=0.8185
 TFRAC(3275)=0.81875 ;TFRAC(3276)=0.819
 TFRAC(3277)=0.81925 ;TFRAC(3278)=0.8195
 TFRAC(3279)=0.81975 ;TFRAC(3280)=0.82
 TFRAC(3281)=0.82025 ;TFRAC(3282)=0.8205
 TFRAC(3283)=0.82075 ;TFRAC(3284)=0.821
 TFRAC(3285)=0.82125 ;TFRAC(3286)=0.8215
 TFRAC(3287)=0.82175 ;TFRAC(3288)=0.822
 TFRAC(3289)=0.82225 ;TFRAC(3290)=0.8225
 TFRAC(3291)=0.82275 ;TFRAC(3292)=0.823
 TFRAC(3293)=0.82325 ;TFRAC(3294)=0.8235
 TFRAC(3295)=0.82375 ;TFRAC(3296)=0.824
 TFRAC(3297)=0.82425 ;TFRAC(3298)=0.8245
 TFRAC(3299)=0.82475 ;TFRAC(3300)=0.825
 TFRAC(3301)=0.82525 ;TFRAC(3302)=0.8255
 TFRAC(3303)=0.82575 ;TFRAC(3304)=0.826
 TFRAC(3305)=0.82625 ;TFRAC(3306)=0.8265
 TFRAC(3307)=0.82675 ;TFRAC(3308)=0.827
 TFRAC(3309)=0.82725 ;TFRAC(3310)=0.8275
 TFRAC(3311)=0.82775 ;TFRAC(3312)=0.828
 TFRAC(3313)=0.82825 ;TFRAC(3314)=0.8285
 TFRAC(3315)=0.82875 ;TFRAC(3316)=0.829
 TFRAC(3317)=0.82925 ;TFRAC(3318)=0.8295
 TFRAC(3319)=0.82975 ;TFRAC(3320)=0.83
 TFRAC(3321)=0.83025 ;TFRAC(3322)=0.8305
 TFRAC(3323)=0.83075 ;TFRAC(3324)=0.831
 TFRAC(3325)=0.83125 ;TFRAC(3326)=0.8315
 TFRAC(3327)=0.83175 ;TFRAC(3328)=0.832
 TFRAC(3329)=0.83225 ;TFRAC(3330)=0.8325
 TFRAC(3331)=0.83275 ;TFRAC(3332)=0.833
 TFRAC(3333)=0.83325 ;TFRAC(3334)=0.8335
 TFRAC(3335)=0.83375 ;TFRAC(3336)=0.834
 TFRAC(3337)=0.83425 ;TFRAC(3338)=0.8345
 TFRAC(3339)=0.83475 ;TFRAC(3340)=0.835
 TFRAC(3341)=0.83525 ;TFRAC(3342)=0.8355
 TFRAC(3343)=0.83575 ;TFRAC(3344)=0.836
 TFRAC(3345)=0.83625 ;TFRAC(3346)=0.8365
 TFRAC(3347)=0.83675 ;TFRAC(3348)=0.837
 TFRAC(3349)=0.83725 ;TFRAC(3350)=0.8375
 TFRAC(3351)=0.83775 ;TFRAC(3352)=0.838
 TFRAC(3353)=0.83825 ;TFRAC(3354)=0.8385
 TFRAC(3355)=0.83875 ;TFRAC(3356)=0.839
 TFRAC(3357)=0.83925 ;TFRAC(3358)=0.8395
 TFRAC(3359)=0.83975 ;TFRAC(3360)=0.84
 TFRAC(3361)=0.84025 ;TFRAC(3362)=0.8405
 TFRAC(3363)=0.84075 ;TFRAC(3364)=0.841
 TFRAC(3365)=0.84125 ;TFRAC(3366)=0.8415
 TFRAC(3367)=0.84175 ;TFRAC(3368)=0.842
 TFRAC(3369)=0.84225 ;TFRAC(3370)=0.8425
 TFRAC(3371)=0.84275 ;TFRAC(3372)=0.843
 TFRAC(3373)=0.84325 ;TFRAC(3374)=0.8435
 TFRAC(3375)=0.84375 ;TFRAC(3376)=0.844
 TFRAC(3377)=0.84425 ;TFRAC(3378)=0.8445
 TFRAC(3379)=0.84475 ;TFRAC(3380)=0.845
 TFRAC(3381)=0.84525 ;TFRAC(3382)=0.8455
 TFRAC(3383)=0.84575 ;TFRAC(3384)=0.846
 TFRAC(3385)=0.84625 ;TFRAC(3386)=0.8465
 TFRAC(3387)=0.84675 ;TFRAC(3388)=0.847
 TFRAC(3389)=0.84725 ;TFRAC(3390)=0.8475
 TFRAC(3391)=0.84775 ;TFRAC(3392)=0.848
 TFRAC(3393)=0.84825 ;TFRAC(3394)=0.8485
 TFRAC(3395)=0.84875 ;TFRAC(3396)=0.849
 TFRAC(3397)=0.84925 ;TFRAC(3398)=0.8495
 TFRAC(3399)=0.84975 ;TFRAC(3400)=0.85
 TFRAC(3401)=0.85025 ;TFRAC(3402)=0.8505
 TFRAC(3403)=0.85075 ;TFRAC(3404)=0.851
 TFRAC(3405)=0.85125 ;TFRAC(3406)=0.8515
 TFRAC(3407)=0.85175 ;TFRAC(3408)=0.852
 TFRAC(3409)=0.85225 ;TFRAC(3410)=0.8525
 TFRAC(3411)=0.85275 ;TFRAC(3412)=0.853
 TFRAC(3413)=0.85325 ;TFRAC(3414)=0.8535
 TFRAC(3415)=0.85375 ;TFRAC(3416)=0.854
 TFRAC(3417)=0.85425 ;TFRAC(3418)=0.8545
 TFRAC(3419)=0.85475 ;TFRAC(3420)=0.855
 TFRAC(3421)=0.85525 ;TFRAC(3422)=0.8555
 TFRAC(3423)=0.85575 ;TFRAC(3424)=0.856
 TFRAC(3425)=0.85625 ;TFRAC(3426)=0.8565
 TFRAC(3427)=0.85675 ;TFRAC(3428)=0.857
 TFRAC(3429)=0.85725 ;TFRAC(3430)=0.8575
 TFRAC(3431)=0.85775 ;TFRAC(3432)=0.858
 TFRAC(3433)=0.85825 ;TFRAC(3434)=0.8585
 TFRAC(3435)=0.85875 ;TFRAC(3436)=0.859
 TFRAC(3437)=0.85925 ;TFRAC(3438)=0.8595
 TFRAC(3439)=0.85975 ;TFRAC(3440)=0.86
 TFRAC(3441)=0.86025 ;TFRAC(3442)=0.8605
 TFRAC(3443)=0.86075 ;TFRAC(3444)=0.861
 TFRAC(3445)=0.86125 ;TFRAC(3446)=0.8615
 TFRAC(3447)=0.86175 ;TFRAC(3448)=0.862
 TFRAC(3449)=0.86225 ;TFRAC(3450)=0.8625
 TFRAC(3451)=0.86275 ;TFRAC(3452)=0.863
 TFRAC(3453)=0.86325 ;TFRAC(3454)=0.8635
 TFRAC(3455)=0.86375 ;TFRAC(3456)=0.864
 TFRAC(3457)=0.86425 ;TFRAC(3458)=0.8645
 TFRAC(3459)=0.86475 ;TFRAC(3460)=0.865
 TFRAC(3461)=0.86525 ;TFRAC(3462)=0.8655
 TFRAC(3463)=0.86575 ;TFRAC(3464)=0.866
 TFRAC(3465)=0.86625 ;TFRAC(3466)=0.8665
 TFRAC(3467)=0.86675 ;TFRAC(3468)=0.867
 TFRAC(3469)=0.86725 ;TFRAC(3470)=0.8675
 TFRAC(3471)=0.86775 ;TFRAC(3472)=0.868
 TFRAC(3473)=0.86825 ;TFRAC(3474)=0.8685
 TFRAC(3475)=0.86875 ;TFRAC(3476)=0.869
 TFRAC(3477)=0.86925 ;TFRAC(3478)=0.8695
 TFRAC(3479)=0.86975 ;TFRAC(3480)=0.87
 TFRAC(3481)=0.87025 ;TFRAC(3482)=0.8705
 TFRAC(3483)=0.87075 ;TFRAC(3484)=0.871
 TFRAC(3485)=0.87125 ;TFRAC(3486)=0.8715
 TFRAC(3487)=0.87175 ;TFRAC(3488)=0.872
 TFRAC(3489)=0.87225 ;TFRAC(3490)=0.8725
 TFRAC(3491)=0.87275 ;TFRAC(3492)=0.873
 TFRAC(3493)=0.87325 ;TFRAC(3494)=0.8735
 TFRAC(3495)=0.87375 ;TFRAC(3496)=0.874
 TFRAC(3497)=0.87425 ;TFRAC(3498)=0.8745
 TFRAC(3499)=0.87475 ;TFRAC(3500)=0.875
 TFRAC(3501)=0.87525 ;TFRAC(3502)=0.8755
 TFRAC(3503)=0.87575 ;TFRAC(3504)=0.876
 TFRAC(3505)=0.87625 ;TFRAC(3506)=0.8765
 TFRAC(3507)=0.87675 ;TFRAC(3508)=0.877
 TFRAC(3509)=0.87725 ;TFRAC(3510)=0.8775
 TFRAC(3511)=0.87775 ;TFRAC(3512)=0.878
 TFRAC(3513)=0.87825 ;TFRAC(3514)=0.8785
 TFRAC(3515)=0.87875 ;TFRAC(3516)=0.879
 TFRAC(3517)=0.87925 ;TFRAC(3518)=0.8795
 TFRAC(3519)=0.87975 ;TFRAC(3520)=0.88
 TFRAC(3521)=0.88025 ;TFRAC(3522)=0.8805
 TFRAC(3523)=0.88075 ;TFRAC(3524)=0.881
 TFRAC(3525)=0.88125 ;TFRAC(3526)=0.8815
 TFRAC(3527)=0.88175 ;TFRAC(3528)=0.882
 TFRAC(3529)=0.88225 ;TFRAC(3530)=0.8825
 TFRAC(3531)=0.88275 ;TFRAC(3532)=0.883
 TFRAC(3533)=0.88325 ;TFRAC(3534)=0.8835
 TFRAC(3535)=0.88375 ;TFRAC(3536)=0.884
 TFRAC(3537)=0.88425 ;TFRAC(3538)=0.8845
 TFRAC(3539)=0.88475 ;TFRAC(3540)=0.885
 TFRAC(3541)=0.88525 ;TFRAC(3542)=0.8855
 TFRAC(3543)=0.88575 ;TFRAC(3544)=0.886
 TFRAC(3545)=0.88625 ;TFRAC(3546)=0.8865
 TFRAC(3547)=0.88675 ;TFRAC(3548)=0.887
 TFRAC(3549)=0.88725 ;TFRAC(3550)=0.8875
 TFRAC(3551)=0.88775 ;TFRAC(3552)=0.888
 TFRAC(3553)=0.88825 ;TFRAC(3554)=0.8885
 TFRAC(3555)=0.88875 ;TFRAC(3556)=0.889
 TFRAC(3557)=0.88925 ;TFRAC(3558)=0.8895
 TFRAC(3559)=0.88975 ;TFRAC(3560)=0.89
 TFRAC(3561)=0.89025 ;TFRAC(3562)=0.8905
 TFRAC(3563)=0.89075 ;TFRAC(3564)=0.891
 TFRAC(3565)=0.89125 ;TFRAC(3566)=0.8915
 TFRAC(3567)=0.89175 ;TFRAC(3568)=0.892
 TFRAC(3569)=0.89225 ;TFRAC(3570)=0.8925
 TFRAC(3571)=0.89275 ;TFRAC(3572)=0.893
 TFRAC(3573)=0.89325 ;TFRAC(3574)=0.8935
 TFRAC(3575)=0.89375 ;TFRAC(3576)=0.894
 TFRAC(3577)=0.89425 ;TFRAC(3578)=0.8945
 TFRAC(3579)=0.89475 ;TFRAC(3580)=0.895
 TFRAC(3581)=0.89525 ;TFRAC(3582)=0.8955
 TFRAC(3583)=0.89575 ;TFRAC(3584)=0.896
 TFRAC(3585)=0.89625 ;TFRAC(3586)=0.8965
 TFRAC(3587)=0.89675 ;TFRAC(3588)=0.897
 TFRAC(3589)=0.89725 ;TFRAC(3590)=0.8975
 TFRAC(3591)=0.89775 ;TFRAC(3592)=0.898
 TFRAC(3593)=0.89825 ;TFRAC(3594)=0.8985
 TFRAC(3595)=0.89875 ;TFRAC(3596)=0.899
 TFRAC(3597)=0.89925 ;TFRAC(3598)=0.8995
 TFRAC(3599)=0.89975 ;TFRAC(3600)=0.9
 TFRAC(3601)=0.90025 ;TFRAC(3602)=0.9005
 TFRAC(3603)=0.90075 ;TFRAC(3604)=0.901
 TFRAC(3605)=0.90125 ;TFRAC(3606)=0.9015
 TFRAC(3607)=0.90175 ;TFRAC(3608)=0.902
 TFRAC(3609)=0.90225 ;TFRAC(3610)=0.9025
 TFRAC(3611)=0.90275 ;TFRAC(3612)=0.903
 TFRAC(3613)=0.90325 ;TFRAC(3614)=0.9035
 TFRAC(3615)=0.90375 ;TFRAC(3616)=0.904
 TFRAC(3617)=0.90425 ;TFRAC(3618)=0.9045
 TFRAC(3619)=0.90475 ;TFRAC(3620)=0.905
 TFRAC(3621)=0.90525 ;TFRAC(3622)=0.9055
 TFRAC(3623)=0.90575 ;TFRAC(3624)=0.906
 TFRAC(3625)=0.90625 ;TFRAC(3626)=0.9065
 TFRAC(3627)=0.90675 ;TFRAC(3628)=0.907
 TFRAC(3629)=0.90725 ;TFRAC(3630)=0.9075
 TFRAC(3631)=0.90775 ;TFRAC(3632)=0.908
 TFRAC(3633)=0.90825 ;TFRAC(3634)=0.9085
 TFRAC(3635)=0.90875 ;TFRAC(3636)=0.909
 TFRAC(3637)=0.90925 ;TFRAC(3638)=0.9095
 TFRAC(3639)=0.90975 ;TFRAC(3640)=0.91
 TFRAC(3641)=0.91025 ;TFRAC(3642)=0.9105
 TFRAC(3643)=0.91075 ;TFRAC(3644)=0.911
 TFRAC(3645)=0.91125 ;TFRAC(3646)=0.9115
 TFRAC(3647)=0.91175 ;TFRAC(3648)=0.912
 TFRAC(3649)=0.91225 ;TFRAC(3650)=0.9125
 TFRAC(3651)=0.91275 ;TFRAC(3652)=0.913
 TFRAC(3653)=0.91325 ;TFRAC(3654)=0.9135
 TFRAC(3655)=0.91375 ;TFRAC(3656)=0.914
 TFRAC(3657)=0.91425 ;TFRAC(3658)=0.9145
 TFRAC(3659)=0.91475 ;TFRAC(3660)=0.915
 TFRAC(3661)=0.91525 ;TFRAC(3662)=0.9155
 TFRAC(3663)=0.91575 ;TFRAC(3664)=0.916
 TFRAC(3665)=0.91625 ;TFRAC(3666)=0.9165
 TFRAC(3667)=0.91675 ;TFRAC(3668)=0.917
 TFRAC(3669)=0.91725 ;TFRAC(3670)=0.9175
 TFRAC(3671)=0.91775 ;TFRAC(3672)=0.918
 TFRAC(3673)=0.91825 ;TFRAC(3674)=0.9185
 TFRAC(3675)=0.91875 ;TFRAC(3676)=0.919
 TFRAC(3677)=0.91925 ;TFRAC(3678)=0.9195
 TFRAC(3679)=0.91975 ;TFRAC(3680)=0.92
 TFRAC(3681)=0.92025 ;TFRAC(3682)=0.9205
 TFRAC(3683)=0.92075 ;TFRAC(3684)=0.921
 TFRAC(3685)=0.92125 ;TFRAC(3686)=0.9215
 TFRAC(3687)=0.92175 ;TFRAC(3688)=0.922
 TFRAC(3689)=0.92225 ;TFRAC(3690)=0.9225
 TFRAC(3691)=0.92275 ;TFRAC(3692)=0.923
 TFRAC(3693)=0.92325 ;TFRAC(3694)=0.9235
 TFRAC(3695)=0.92375 ;TFRAC(3696)=0.924
 TFRAC(3697)=0.92425 ;TFRAC(3698)=0.9245
 TFRAC(3699)=0.92475 ;TFRAC(3700)=0.925
 TFRAC(3701)=0.92525 ;TFRAC(3702)=0.9255
 TFRAC(3703)=0.92575 ;TFRAC(3704)=0.926
 TFRAC(3705)=0.92625 ;TFRAC(3706)=0.9265
 TFRAC(3707)=0.92675 ;TFRAC(3708)=0.927
 TFRAC(3709)=0.92725 ;TFRAC(3710)=0.9275
 TFRAC(3711)=0.92775 ;TFRAC(3712)=0.928
 TFRAC(3713)=0.92825 ;TFRAC(3714)=0.9285
 TFRAC(3715)=0.92875 ;TFRAC(3716)=0.929
 TFRAC(3717)=0.92925 ;TFRAC(3718)=0.9295
 TFRAC(3719)=0.92975 ;TFRAC(3720)=0.93
 TFRAC(3721)=0.93025 ;TFRAC(3722)=0.9305
 TFRAC(3723)=0.93075 ;TFRAC(3724)=0.931
 TFRAC(3725)=0.93125 ;TFRAC(3726)=0.9315
 TFRAC(3727)=0.93175 ;TFRAC(3728)=0.932
 TFRAC(3729)=0.93225 ;TFRAC(3730)=0.9325
 TFRAC(3731)=0.93275 ;TFRAC(3732)=0.933
 TFRAC(3733)=0.93325 ;TFRAC(3734)=0.9335
 TFRAC(3735)=0.93375 ;TFRAC(3736)=0.934
 TFRAC(3737)=0.93425 ;TFRAC(3738)=0.9345
 TFRAC(3739)=0.93475 ;TFRAC(3740)=0.935
 TFRAC(3741)=0.93525 ;TFRAC(3742)=0.9355
 TFRAC(3743)=0.93575 ;TFRAC(3744)=0.936
 TFRAC(3745)=0.93625 ;TFRAC(3746)=0.9365
 TFRAC(3747)=0.93675 ;TFRAC(3748)=0.937
 TFRAC(3749)=0.93725 ;TFRAC(3750)=0.9375
 TFRAC(3751)=0.93775 ;TFRAC(3752)=0.938
 TFRAC(3753)=0.93825 ;TFRAC(3754)=0.9385
 TFRAC(3755)=0.93875 ;TFRAC(3756)=0.939
 TFRAC(3757)=0.93925 ;TFRAC(3758)=0.9395
 TFRAC(3759)=0.93975 ;TFRAC(3760)=0.94
 TFRAC(3761)=0.94025 ;TFRAC(3762)=0.9405
 TFRAC(3763)=0.94075 ;TFRAC(3764)=0.941
 TFRAC(3765)=0.94125 ;TFRAC(3766)=0.9415
 TFRAC(3767)=0.94175 ;TFRAC(3768)=0.942
 TFRAC(3769)=0.94225 ;TFRAC(3770)=0.9425
 TFRAC(3771)=0.94275 ;TFRAC(3772)=0.943
 TFRAC(3773)=0.94325 ;TFRAC(3774)=0.9435
 TFRAC(3775)=0.94375 ;TFRAC(3776)=0.944
 TFRAC(3777)=0.94425 ;TFRAC(3778)=0.9445
 TFRAC(3779)=0.94475 ;TFRAC(3780)=0.945
 TFRAC(3781)=0.94525 ;TFRAC(3782)=0.9455
 TFRAC(3783)=0.94575 ;TFRAC(3784)=0.946
 TFRAC(3785)=0.94625 ;TFRAC(3786)=0.9465
 TFRAC(3787)=0.94675 ;TFRAC(3788)=0.947
 TFRAC(3789)=0.94725 ;TFRAC(3790)=0.9475
 TFRAC(3791)=0.94775 ;TFRAC(3792)=0.948
 TFRAC(3793)=0.94825 ;TFRAC(3794)=0.9485
 TFRAC(3795)=0.94875 ;TFRAC(3796)=0.949
 TFRAC(3797)=0.94925 ;TFRAC(3798)=0.9495
 TFRAC(3799)=0.94975 ;TFRAC(3800)=0.95
 TFRAC(3801)=0.95025 ;TFRAC(3802)=0.9505
 TFRAC(3803)=0.95075 ;TFRAC(3804)=0.951
 TFRAC(3805)=0.95125 ;TFRAC(3806)=0.9515
 TFRAC(3807)=0.95175 ;TFRAC(3808)=0.952
 TFRAC(3809)=0.95225 ;TFRAC(3810)=0.9525
 TFRAC(3811)=0.95275 ;TFRAC(3812)=0.953
 TFRAC(3813)=0.95325 ;TFRAC(3814)=0.9535
 TFRAC(3815)=0.95375 ;TFRAC(3816)=0.954
 TFRAC(3817)=0.95425 ;TFRAC(3818)=0.9545
 TFRAC(3819)=0.95475 ;TFRAC(3820)=0.955
 TFRAC(3821)=0.95525 ;TFRAC(3822)=0.9555
 TFRAC(3823)=0.95575 ;TFRAC(3824)=0.956
 TFRAC(3825)=0.95625 ;TFRAC(3826)=0.9565
 TFRAC(3827)=0.95675 ;TFRAC(3828)=0.957
 TFRAC(3829)=0.95725 ;TFRAC(3830)=0.9575
 TFRAC(3831)=0.95775 ;TFRAC(3832)=0.958
 TFRAC(3833)=0.95825 ;TFRAC(3834)=0.9585
 TFRAC(3835)=0.95875 ;TFRAC(3836)=0.959
 TFRAC(3837)=0.95925 ;TFRAC(3838)=0.9595
 TFRAC(3839)=0.95975 ;TFRAC(3840)=0.96
 TFRAC(3841)=0.96025 ;TFRAC(3842)=0.9605
 TFRAC(3843)=0.96075 ;TFRAC(3844)=0.961
 TFRAC(3845)=0.96125 ;TFRAC(3846)=0.9615
 TFRAC(3847)=0.96175 ;TFRAC(3848)=0.962
 TFRAC(3849)=0.96225 ;TFRAC(3850)=0.9625
 TFRAC(3851)=0.96275 ;TFRAC(3852)=0.963
 TFRAC(3853)=0.96325 ;TFRAC(3854)=0.9635
 TFRAC(3855)=0.96375 ;TFRAC(3856)=0.964
 TFRAC(3857)=0.96425 ;TFRAC(3858)=0.9645
 TFRAC(3859)=0.96475 ;TFRAC(3860)=0.965
 TFRAC(3861)=0.96525 ;TFRAC(3862)=0.9655
 TFRAC(3863)=0.96575 ;TFRAC(3864)=0.966
 TFRAC(3865)=0.96625 ;TFRAC(3866)=0.9665
 TFRAC(3867)=0.96675 ;TFRAC(3868)=0.967
 TFRAC(3869)=0.96725 ;TFRAC(3870)=0.9675
 TFRAC(3871)=0.96775 ;TFRAC(3872)=0.968
 TFRAC(3873)=0.96825 ;TFRAC(3874)=0.9685
 TFRAC(3875)=0.96875 ;TFRAC(3876)=0.969
 TFRAC(3877)=0.96925 ;TFRAC(3878)=0.9695
 TFRAC(3879)=0.96975 ;TFRAC(3880)=0.97
 TFRAC(3881)=0.97025 ;TFRAC(3882)=0.9705
 TFRAC(3883)=0.97075 ;TFRAC(3884)=0.971
 TFRAC(3885)=0.97125 ;TFRAC(3886)=0.9715
 TFRAC(3887)=0.97175 ;TFRAC(3888)=0.972
 TFRAC(3889)=0.97225 ;TFRAC(3890)=0.9725
 TFRAC(3891)=0.97275 ;TFRAC(3892)=0.973
 TFRAC(3893)=0.97325 ;TFRAC(3894)=0.9735
 TFRAC(3895)=0.97375 ;TFRAC(3896)=0.974
 TFRAC(3897)=0.97425 ;TFRAC(3898)=0.9745
 TFRAC(3899)=0.97475 ;TFRAC(3900)=0.975
 TFRAC(3901)=0.97525 ;TFRAC(3902)=0.9755
 TFRAC(3903)=0.97575 ;TFRAC(3904)=0.976
 TFRAC(3905)=0.97625 ;TFRAC(3906)=0.9765
 TFRAC(3907)=0.97675 ;TFRAC(3908)=0.977
 TFRAC(3909)=0.97725 ;TFRAC(3910)=0.9775
 TFRAC(3911)=0.97775 ;TFRAC(3912)=0.978
 TFRAC(3913)=0.97825 ;TFRAC(3914)=0.9785
 TFRAC(3915)=0.97875 ;TFRAC(3916)=0.979
 TFRAC(3917)=0.97925 ;TFRAC(3918)=0.9795
 TFRAC(3919)=0.97975 ;TFRAC(3920)=0.98
 TFRAC(3921)=0.98025 ;TFRAC(3922)=0.9805
 TFRAC(3923)=0.98075 ;TFRAC(3924)=0.981
 TFRAC(3925)=0.98125 ;TFRAC(3926)=0.9815
 TFRAC(3927)=0.98175 ;TFRAC(3928)=0.982
 TFRAC(3929)=0.98225 ;TFRAC(3930)=0.9825
 TFRAC(3931)=0.98275 ;TFRAC(3932)=0.983
 TFRAC(3933)=0.98325 ;TFRAC(3934)=0.9835
 TFRAC(3935)=0.98375 ;TFRAC(3936)=0.984
 TFRAC(3937)=0.98425 ;TFRAC(3938)=0.9845
 TFRAC(3939)=0.98475 ;TFRAC(3940)=0.985
 TFRAC(3941)=0.98525 ;TFRAC(3942)=0.9855
 TFRAC(3943)=0.98575 ;TFRAC(3944)=0.986
 TFRAC(3945)=0.98625 ;TFRAC(3946)=0.9865
 TFRAC(3947)=0.98675 ;TFRAC(3948)=0.987
 TFRAC(3949)=0.98725 ;TFRAC(3950)=0.9875
 TFRAC(3951)=0.98775 ;TFRAC(3952)=0.988
 TFRAC(3953)=0.98825 ;TFRAC(3954)=0.9885
 TFRAC(3955)=0.98875 ;TFRAC(3956)=0.989
 TFRAC(3957)=0.98925 ;TFRAC(3958)=0.9895
 TFRAC(3959)=0.98975 ;TFRAC(3960)=0.99
 TFRAC(3961)=0.99025 ;TFRAC(3962)=0.9905
 TFRAC(3963)=0.99075 ;TFRAC(3964)=0.991
 TFRAC(3965)=0.99125 ;TFRAC(3966)=0.9915
 TFRAC(3967)=0.99175 ;TFRAC(3968)=0.992
 TFRAC(3969)=0.99225 ;TFRAC(3970)=0.9925
 TFRAC(3971)=0.99275 ;TFRAC(3972)=0.993
 TFRAC(3973)=0.99325 ;TFRAC(3974)=0.9935
 TFRAC(3975)=0.99375 ;TFRAC(3976)=0.994
 TFRAC(3977)=0.99425 ;TFRAC(3978)=0.9945
 TFRAC(3979)=0.99475 ;TFRAC(3980)=0.995
 TFRAC(3981)=0.99525 ;TFRAC(3982)=0.9955
 TFRAC(3983)=0.99575 ;TFRAC(3984)=0.996
 TFRAC(3985)=0.99625 ;TFRAC(3986)=0.9965
 TFRAC(3987)=0.99675 ;TFRAC(3988)=0.997
 TFRAC(3989)=0.99725 ;TFRAC(3990)=0.9975
 TFRAC(3991)=0.99775 ;TFRAC(3992)=0.998
 TFRAC(3993)=0.99825 ;TFRAC(3994)=0.9985
 TFRAC(3995)=0.99875 ;TFRAC(3996)=0.999
 TFRAC(3997)=0.99925 ;TFRAC(3998)=0.9995
 TFRAC(3999)=0.99975 ;TFRAC(4000)=1.
 ************************************************************
  Group 3. X-Direction Grid Spacing
 CARTES = T
 NX = 64
 XULAST =0.039342
 XFRAC(1)=0.015625 ;XFRAC(2)=0.03125
 XFRAC(3)=0.046875 ;XFRAC(4)=0.0625
 XFRAC(5)=0.078125 ;XFRAC(6)=0.09375
 XFRAC(7)=0.109375 ;XFRAC(8)=0.125
 XFRAC(9)=0.140625 ;XFRAC(10)=0.15625
 XFRAC(11)=0.171875 ;XFRAC(12)=0.1875
 XFRAC(13)=0.203125 ;XFRAC(14)=0.21875
 XFRAC(15)=0.234375 ;XFRAC(16)=0.25
 XFRAC(17)=0.265625 ;XFRAC(18)=0.28125
 XFRAC(19)=0.296875 ;XFRAC(20)=0.3125
 XFRAC(21)=0.328125 ;XFRAC(22)=0.34375
 XFRAC(23)=0.359375 ;XFRAC(24)=0.375
 XFRAC(25)=0.390625 ;XFRAC(26)=0.40625
 XFRAC(27)=0.421875 ;XFRAC(28)=0.4375
 XFRAC(29)=0.453125 ;XFRAC(30)=0.46875
 XFRAC(31)=0.484375 ;XFRAC(32)=0.5
 XFRAC(33)=0.515625 ;XFRAC(34)=0.53125
 XFRAC(35)=0.546875 ;XFRAC(36)=0.5625
 XFRAC(37)=0.578125 ;XFRAC(38)=0.59375
 XFRAC(39)=0.609375 ;XFRAC(40)=0.625
 XFRAC(41)=0.640625 ;XFRAC(42)=0.65625
 XFRAC(43)=0.671875 ;XFRAC(44)=0.6875
 XFRAC(45)=0.703125 ;XFRAC(46)=0.71875
 XFRAC(47)=0.734375 ;XFRAC(48)=0.75
 XFRAC(49)=0.765625 ;XFRAC(50)=0.78125
 XFRAC(51)=0.796875 ;XFRAC(52)=0.8125
 XFRAC(53)=0.828125 ;XFRAC(54)=0.84375
 XFRAC(55)=0.859375 ;XFRAC(56)=0.875
 XFRAC(57)=0.890625 ;XFRAC(58)=0.90625
 XFRAC(59)=0.921875 ;XFRAC(60)=0.9375
 XFRAC(61)=0.953125 ;XFRAC(62)=0.96875
 XFRAC(63)=0.984375 ;XFRAC(64)=1.
 ************************************************************
  Group 4. Y-Direction Grid Spacing
 NY = 289
 YVLAST =0.177039
 YFRAC(1)=1.016019E-03 ;YFRAC(2)=2.032039E-03
 YFRAC(3)=3.048057E-03 ;YFRAC(4)=4.064077E-03
 YFRAC(5)=5.080095E-03 ;YFRAC(6)=6.096115E-03
 YFRAC(7)=7.112134E-03 ;YFRAC(8)=8.128154E-03
 YFRAC(9)=9.144172E-03 ;YFRAC(10)=0.01016
 YFRAC(11)=0.011176 ;YFRAC(12)=0.012192
 YFRAC(13)=0.013208 ;YFRAC(14)=0.014224
 YFRAC(15)=0.01524 ;YFRAC(16)=0.016256
 YFRAC(17)=0.017272 ;YFRAC(18)=0.018288
 YFRAC(19)=0.019304 ;YFRAC(20)=0.02032
 YFRAC(21)=0.021336 ;YFRAC(22)=0.022352
 YFRAC(23)=0.023368 ;YFRAC(24)=0.024384
 YFRAC(25)=0.028066 ;YFRAC(26)=0.031748
 YFRAC(27)=0.035429 ;YFRAC(28)=0.039111
 YFRAC(29)=0.042792 ;YFRAC(30)=0.046474
 YFRAC(31)=0.050155 ;YFRAC(32)=0.053837
 YFRAC(33)=0.057519 ;YFRAC(34)=0.0612
 YFRAC(35)=0.064882 ;YFRAC(36)=0.068563
 YFRAC(37)=0.072245 ;YFRAC(38)=0.075926
 YFRAC(39)=0.079608 ;YFRAC(40)=0.08329
 YFRAC(41)=0.086971 ;YFRAC(42)=0.090653
 YFRAC(43)=0.094334 ;YFRAC(44)=0.098016
 YFRAC(45)=0.101697 ;YFRAC(46)=0.105379
 YFRAC(47)=0.109061 ;YFRAC(48)=0.112742
 YFRAC(49)=0.116424 ;YFRAC(50)=0.120105
 YFRAC(51)=0.123787 ;YFRAC(52)=0.127468
 YFRAC(53)=0.13115 ;YFRAC(54)=0.134832
 YFRAC(55)=0.138513 ;YFRAC(56)=0.142195
 YFRAC(57)=0.145876 ;YFRAC(58)=0.149558
 YFRAC(59)=0.153239 ;YFRAC(60)=0.156921
 YFRAC(61)=0.160602 ;YFRAC(62)=0.164284
 YFRAC(63)=0.167966 ;YFRAC(64)=0.171647
 YFRAC(65)=0.175329 ;YFRAC(66)=0.17901
 YFRAC(67)=0.182692 ;YFRAC(68)=0.186373
 YFRAC(69)=0.190055 ;YFRAC(70)=0.193737
 YFRAC(71)=0.197418 ;YFRAC(72)=0.2011
 YFRAC(73)=0.204781 ;YFRAC(74)=0.208463
 YFRAC(75)=0.212144 ;YFRAC(76)=0.215826
 YFRAC(77)=0.219508 ;YFRAC(78)=0.223189
 YFRAC(79)=0.226871 ;YFRAC(80)=0.230552
 YFRAC(81)=0.234234 ;YFRAC(82)=0.237915
 YFRAC(83)=0.241597 ;YFRAC(84)=0.245279
 YFRAC(85)=0.24896 ;YFRAC(86)=0.252642
 YFRAC(87)=0.256323 ;YFRAC(88)=0.260005
 YFRAC(89)=0.263686 ;YFRAC(90)=0.267368
 YFRAC(91)=0.271049 ;YFRAC(92)=0.274731
 YFRAC(93)=0.278413 ;YFRAC(94)=0.282094
 YFRAC(95)=0.285776 ;YFRAC(96)=0.289457
 YFRAC(97)=0.293139 ;YFRAC(98)=0.29682
 YFRAC(99)=0.300502 ;YFRAC(100)=0.304184
 YFRAC(101)=0.307865 ;YFRAC(102)=0.311547
 YFRAC(103)=0.315228 ;YFRAC(104)=0.31891
 YFRAC(105)=0.322591 ;YFRAC(106)=0.326273
 YFRAC(107)=0.329955 ;YFRAC(108)=0.333636
 YFRAC(109)=0.337318 ;YFRAC(110)=0.340999
 YFRAC(111)=0.344681 ;YFRAC(112)=0.348362
 YFRAC(113)=0.352044 ;YFRAC(114)=0.355726
 YFRAC(115)=0.359407 ;YFRAC(116)=0.363089
 YFRAC(117)=0.36677 ;YFRAC(118)=0.370452
 YFRAC(119)=0.374133 ;YFRAC(120)=0.377815
 YFRAC(121)=0.381497 ;YFRAC(122)=0.385178
 YFRAC(123)=0.38886 ;YFRAC(124)=0.392541
 YFRAC(125)=0.396223 ;YFRAC(126)=0.399904
 YFRAC(127)=0.403586 ;YFRAC(128)=0.407268
 YFRAC(129)=0.410949 ;YFRAC(130)=0.414631
 YFRAC(131)=0.418312 ;YFRAC(132)=0.421994
 YFRAC(133)=0.425675 ;YFRAC(134)=0.429357
 YFRAC(135)=0.433038 ;YFRAC(136)=0.43672
 YFRAC(137)=0.440402 ;YFRAC(138)=0.444083
 YFRAC(139)=0.447765 ;YFRAC(140)=0.451446
 YFRAC(141)=0.455128 ;YFRAC(142)=0.458809
 YFRAC(143)=0.462491 ;YFRAC(144)=0.466173
 YFRAC(145)=0.469854 ;YFRAC(146)=0.473536
 YFRAC(147)=0.477217 ;YFRAC(148)=0.480899
 YFRAC(149)=0.48458 ;YFRAC(150)=0.488262
 YFRAC(151)=0.491944 ;YFRAC(152)=0.495625
 YFRAC(153)=0.499307 ;YFRAC(154)=0.502988
 YFRAC(155)=0.50667 ;YFRAC(156)=0.510351
 YFRAC(157)=0.514033 ;YFRAC(158)=0.517715
 YFRAC(159)=0.521396 ;YFRAC(160)=0.525078
 YFRAC(161)=0.528759 ;YFRAC(162)=0.532441
 YFRAC(163)=0.536122 ;YFRAC(164)=0.539804
 YFRAC(165)=0.543486 ;YFRAC(166)=0.547167
 YFRAC(167)=0.550849 ;YFRAC(168)=0.55453
 YFRAC(169)=0.558212 ;YFRAC(170)=0.561893
 YFRAC(171)=0.565575 ;YFRAC(172)=0.569256
 YFRAC(173)=0.572938 ;YFRAC(174)=0.57662
 YFRAC(175)=0.580301 ;YFRAC(176)=0.583983
 YFRAC(177)=0.587664 ;YFRAC(178)=0.591346
 YFRAC(179)=0.595028 ;YFRAC(180)=0.598709
 YFRAC(181)=0.602391 ;YFRAC(182)=0.606072
 YFRAC(183)=0.609754 ;YFRAC(184)=0.613435
 YFRAC(185)=0.617117 ;YFRAC(186)=0.620798
 YFRAC(187)=0.62448 ;YFRAC(188)=0.628162
 YFRAC(189)=0.631843 ;YFRAC(190)=0.635525
 YFRAC(191)=0.639206 ;YFRAC(192)=0.642888
 YFRAC(193)=0.646569 ;YFRAC(194)=0.650251
 YFRAC(195)=0.653933 ;YFRAC(196)=0.657614
 YFRAC(197)=0.661296 ;YFRAC(198)=0.664977
 YFRAC(199)=0.668659 ;YFRAC(200)=0.67234
 YFRAC(201)=0.676022 ;YFRAC(202)=0.679704
 YFRAC(203)=0.683385 ;YFRAC(204)=0.687067
 YFRAC(205)=0.690748 ;YFRAC(206)=0.69443
 YFRAC(207)=0.698111 ;YFRAC(208)=0.701793
 YFRAC(209)=0.705474 ;YFRAC(210)=0.709156
 YFRAC(211)=0.712838 ;YFRAC(212)=0.716519
 YFRAC(213)=0.720201 ;YFRAC(214)=0.723882
 YFRAC(215)=0.727564 ;YFRAC(216)=0.731246
 YFRAC(217)=0.734927 ;YFRAC(218)=0.738609
 YFRAC(219)=0.74229 ;YFRAC(220)=0.745972
 YFRAC(221)=0.749653 ;YFRAC(222)=0.753335
 YFRAC(223)=0.757016 ;YFRAC(224)=0.760698
 YFRAC(225)=0.76438 ;YFRAC(226)=0.768061
 YFRAC(227)=0.771743 ;YFRAC(228)=0.775424
 YFRAC(229)=0.779106 ;YFRAC(230)=0.782787
 YFRAC(231)=0.786469 ;YFRAC(232)=0.790151
 YFRAC(233)=0.793832 ;YFRAC(234)=0.797514
 YFRAC(235)=0.801195 ;YFRAC(236)=0.804877
 YFRAC(237)=0.808558 ;YFRAC(238)=0.81224
 YFRAC(239)=0.815922 ;YFRAC(240)=0.819603
 YFRAC(241)=0.823285 ;YFRAC(242)=0.826966
 YFRAC(243)=0.830648 ;YFRAC(244)=0.834329
 YFRAC(245)=0.838011 ;YFRAC(246)=0.841693
 YFRAC(247)=0.845374 ;YFRAC(248)=0.849056
 YFRAC(249)=0.852737 ;YFRAC(250)=0.856419
 YFRAC(251)=0.8601 ;YFRAC(252)=0.863782
 YFRAC(253)=0.867464 ;YFRAC(254)=0.871145
 YFRAC(255)=0.874827 ;YFRAC(256)=0.878508
 YFRAC(257)=0.88219 ;YFRAC(258)=0.885871
 YFRAC(259)=0.889553 ;YFRAC(260)=0.893235
 YFRAC(261)=0.896916 ;YFRAC(262)=0.900598
 YFRAC(263)=0.904279 ;YFRAC(264)=0.907961
 YFRAC(265)=0.911642 ;YFRAC(266)=0.915324
 YFRAC(267)=0.919006 ;YFRAC(268)=0.922687
 YFRAC(269)=0.926369 ;YFRAC(270)=0.93005
 YFRAC(271)=0.933732 ;YFRAC(272)=0.937413
 YFRAC(273)=0.941095 ;YFRAC(274)=0.944776
 YFRAC(275)=0.948458 ;YFRAC(276)=0.95214
 YFRAC(277)=0.955821 ;YFRAC(278)=0.959503
 YFRAC(279)=0.963184 ;YFRAC(280)=0.966866
 YFRAC(281)=0.970547 ;YFRAC(282)=0.974229
 YFRAC(283)=0.977911 ;YFRAC(284)=0.981592
 YFRAC(285)=0.985274 ;YFRAC(286)=0.988955
 YFRAC(287)=0.992637 ;YFRAC(288)=0.996318
 YFRAC(289)=1.
 ************************************************************
  Group 5. Z-Direction Grid Spacing
 PARAB = F
 NZ = 1
 ZWLAST =1.0E-02
 ZFRAC(1)=1.
 ************************************************************
  Group 6. Body-Fitted Coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
 ONEPHS = T
 NAME(1)=P1 ;NAME(3)=U1
 NAME(5)=V1 ;NAME(141)=SIGM
 NAME(142)=MEVP ;NAME(143)=KAPA
 NAME(144)=MEVA ;NAME(145)=PRPS
 NAME(146)=DEN1 ;NAME(147)=SPH1
 NAME(148)=TEM1 ;NAME(149)=VFOL
 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(SIGM,Y,N,N,N,N,Y)
 SOLUTN(MEVP,Y,N,N,N,N,Y)
 SOLUTN(KAPA,Y,N,N,N,N,Y)
 SOLUTN(MEVA,Y,N,N,N,N,Y)
 SOLUTN(PRPS,Y,N,N,N,N,Y)
 SOLUTN(DEN1,Y,N,N,N,N,Y)
 SOLUTN(SPH1,Y,N,N,N,N,N)
 SOLUTN(TEM1,Y,Y,Y,N,N,Y)
 SOLUTN(VFOL,Y,Y,N,N,N,Y)
 SOLUTN(SURN,Y,Y,N,N,N,Y)
 DEN1 = 146
 PRPS = 145
 ************************************************************
  Group 8. Terms & Devices
    * Y in TERMS argument list denotes:
    * 1-built-in source 2-convection 3-diffusion 4-transient
    * 5-first phase variable 6-interphase transport         
 TERMS(P1,Y,Y,Y,N,Y,Y)
 TERMS(U1,Y,Y,Y,Y,Y,Y)
 TERMS(V1,Y,Y,Y,Y,Y,Y)
 TERMS(TEM1,N,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 =200. ;TMP1 =0. ;EL1 =0.
 TSURR =0. ;TEMP0 =0. ;PRESS0 =1.01325E+05
 DVO1DT =1.18E-04 ;DRH1DP =0.
 EMISS =0. ;SCATT =0.
 RADIA =0. ;RADIB =0.
 ENUL =5.0E-04 ;ENUT =0.
 PRNDTL(U1)=1. ;PRNDTL(V1)=1.
 PRNDTL(TEM1)=-40.
 PRT(U1)=1. ;PRT(V1)=1.
 PRT(TEM1)=1.
 CP1 =400. ;CP2 =1.
   *  List of user-defined materials to be read by EARTH
    MATFLG=T;IMAT=2   
   *  Name
   *Ind. Dens.  Viscos.  Spec.heat  Conduct.  Expans.  Compr.
   *  
    34 5.0 1.0E-3 200.0 1.0 3.33E-3
   *  
    78 200.0 5.0E-4 400.0 40.0 1.18E-4
 ************************************************************
  Group 10.Inter-Phase Transfer Processes
 ************************************************************
  Group 11.Initial field variables (PHIs)
 FIINIT(P1)=0. ;FIINIT(U1)=1.0E-10
 FIINIT(V1)=1.0E-10 ;FIINIT(SIGM)=0.1
 FIINIT(MEVP)=1.0E-10 ;FIINIT(KAPA)=1.0E-10
 FIINIT(MEVA)=1.0E-10 ;FIINIT(PRPS)=-1.
 FIINIT(DEN1)=1.0E-10 ;FIINIT(SPH1)=1.0E-10
 FIINIT(TEM1)=0. ;FIINIT(VFOL)=1.
 FIINIT(SURN)=1.
   No PATCHes yet used for this Group
 INIADD = F
 FSWEEP = 1
 NAMFI =phida
 ************************************************************
  Group 12. Patchwise adjustment of terms
  Patches for this group are printed with those
  for Group 13.
  Their names begin either with GP12 or &
 ************************************************************
  Group 13. Boundary & Special Sources
 
 PATCH(BUOYANCY,PHASEM, 1, 64, 1, 289, 1, 1, 1, 4000)
 COVAL(BUOYANCY,U1 , FIXFLU , GRND2 )
 COVAL(BUOYANCY,V1 , FIXFLU , GRND2 )
 
 PATCH(STENS ,PHASEM, 1, 64, 1, 289, 1, 1, 1, 4000)
 COVAL(STENS ,U1 , FIXFLU , GRND3 )
 COVAL(STENS ,V1 , FIXFLU , GRND3 )
 
 PATCH(TCON ,CELL , 1, 64, 1, 289, 1, 1, 1, 4000)
 COVAL(TCON ,SURN, GRND , GRND )
 
 PATCH(TCONC ,CELL , 1, 64, 1, 289, 1, 1, 1, 4000)
 COVAL(TCONC ,TEM1,0. ,0. )
 
 PATCH(TCONT ,VOLUME, 1, 64, 1, 289, 1, 1, 1, 4000)
 COVAL(TCONT ,TEM1, GRND , GRND )
 
 PATCH(EVAPO ,VOLUME, 1, 64, 1, 289, 1, 1, 1, 4000)
 COVAL(EVAPO ,TEM1, FIXFLU , GRND4 )
 COVAL(EVAPO ,SURN, FIXFLU , GRND4 )
 
 PATCH(^OB1 ,CELL , 1, 8, 0, 0, 0, 0, 1, 4000)
 COVAL(^OB1 ,U1 ,1. ,0. )
 COVAL(^OB1 ,TEM1,1. ,5. )
 
 PATCH(^OB2 ,NORTH , 2, 0, 0, 0, 0, 0, 1, 4000)
 COVAL(^OB2 ,P1 , GRND1 ,0. )
 COVAL(^OB2 ,U1 ,0. ,0. )
 COVAL(^OB2 ,V1 ,0. ,0. )
 COVAL(^OB2 ,TEM1, GRND1 , GRND1 )
 COVAL(^OB2 ,VFOL,0. ,5.0E-03 )
 COVAL(^OB2 ,SURN, FIXFLU , GRND1 )
 XCYCLE = F
 EGWF = T
 WALLCO = GRND2
 BUOYA =0. ; BUOYB =-9.81 ; BUOYC =0.
 BUOYD =5.
 ************************************************************
  Group 14. Downstream Pressure For PARAB
 ************************************************************
  Group 15. Terminate Sweeps
 LSWEEP = 50 ;ISWC1 = 1
 LITHYD = 1 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1
 SELREF = T
 RESFAC =1.0E-05
 ************************************************************
  Group 16. Terminate Iterations
 LITER(P1)=200 ;LITER(U1)=10
 LITER(V1)=10 ;LITER(TEM1)=200
 LITER(VFOL)=1 ;LITER(SURN)=1
 ENDIT(P1)=1.0E-06 ;ENDIT(U1)=1.0E-03
 ENDIT(V1)=1.0E-03 ;ENDIT(TEM1)=1.0E-06
 ENDIT(VFOL)=1.0E-03 ;ENDIT(SURN)=1.0E-03
 ************************************************************
  Group 17. Relaxation
 RELAX(P1,LINRLX,0.5)
 RELAX(U1,FALSDT,0.05)
 RELAX(V1,FALSDT,0.05)
 RELAX(SIGM,LINRLX,1.)
 RELAX(MEVP,LINRLX,1.)
 RELAX(KAPA,LINRLX,1.)
 RELAX(MEVA,LINRLX,1.)
 RELAX(PRPS,LINRLX,1.)
 RELAX(DEN1,LINRLX,1.)
 RELAX(SPH1,LINRLX,1.)
 RELAX(TEM1,LINRLX,0.1)
 RELAX(VFOL,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(SIGM)=1.0E+10 ;VARMIN(SIGM)=-1.0E+10
 VARMAX(MEVP)=1.0E+10 ;VARMIN(MEVP)=-1.0E+10
 VARMAX(KAPA)=1.0E+10 ;VARMIN(KAPA)=-1.0E+10
 VARMAX(MEVA)=1.0E+10 ;VARMIN(MEVA)=-1.0E+10
 VARMAX(PRPS)=1.0E+10 ;VARMIN(PRPS)=-1.0E+10
 VARMAX(DEN1)=1.0E+10 ;VARMIN(DEN1)=-1.0E+10
 VARMAX(SPH1)=1.0E+10 ;VARMIN(SPH1)=-1.0E+10
 VARMAX(TEM1)=5. ;VARMIN(TEM1)=0.
 VARMAX(VFOL)=1.0E+10 ;VARMIN(VFOL)=-1.0E+10
 VARMAX(SURN)=1. ;VARMIN(SURN)=0.
 ************************************************************
  Group 19. Data transmitted to GROUND
 SURF = T
 PARSOL = F
 IPRPSA = 78 ;IPRPSB = 34
 ISG21 = 5
 ISG62 = 1
 ISURFA = 5
 BTATHC =3.5
 ISRFTA = 1
 SURFTA =0.1 ;SURFTB=0. ;SURFTC =0. ;SURFTD=0.
 IEVAP = 2
 LATH =1.0E+04 ;TSAT=0. ;EVAPCO=0.1
 NONCON = T
 RSG163 =1.0E-02
 CSG10   ='q1'
 SPEDAT(SET,DOMAIN,PROPS_FILE_1,C,Q1)
 SPEDAT(SET,SURFTENS,NSMOOTH,I,3)
 SPEDAT(SET,VOF,LTSS,L,F)
 SPEDAT(SET,MAXINC,VFOL,R,1.)
 SPEDAT(SET,MAXINC,SURN,R,1.)
 SPEDAT(SET,INITIAL,SURN,C,=0.0!IF(YG.LE.(2.919191E-03+5.980015E-0$)
 SPEDAT(SET,INITIAL,SURN,C,4*COS(79.85299*XG))))
 SPEDAT(SET,INITIAL,VFOL,C,=0.0!IF(YG.LE.(2.919191E-03+5.980015E-0$)
 SPEDAT(SET,INITIAL,VFOL,C,4*COS(79.85299*XG))))
 SPEDAT(SET,INITIAL,TEM1,C,=5.0-5.0*YG/2.919191E-03+5.980015E-04*C$)
 SPEDAT(SET,INITIAL,TEM1,C,OS(79.85299*XG)!IF(YG.LE.(2.919191E-03+$)
 SPEDAT(SET,INITIAL,TEM1,C,5.980015E-04*COS(79.85299*XG))))
 SPEDAT(SET,GXMONI,PLOTALL,L,T)
 SPEDAT(SET,OBJNAM,^OB1,C,S-WALL)
 SPEDAT(SET,OBJTYP,^OB1,C,PLATE)
 SPEDAT(SET,OBJNAM,^OB2,C,N-OUT)
 SPEDAT(SET,OBJTYP,^OB2,C,OUTLET)
 SPEDAT(SET,N-OUT,TEMEXT,R,0.)
 SPEDAT(SET,ARATIO,^OB2,R,1.)
 SPEDAT(SET,OBJNAM,!OB3,C,B5)
 SPEDAT(SET,OBJTYP,!OB3,C,NULL)
 SPEDAT(SET,FACETDAT,NUMOBJ,I,3)
 SPEDAT(SET,MATERIAL,78,L,T)
 SPEDAT(SET,MATERIAL,34,L,T)
 ************************************************************
  Group 20. Preliminary Printout
 ************************************************************
  Group 21. Print-out of Variables
 INIFLD = F ;SUBWGR = F
    * Y in OUTPUT argument list denotes:
    * 1-field 2-correction-eq. monitor 3-selective dumping      
    * 4-whole-field residual 5-spot-value table 6-residual table
 OUTPUT(P1,N,N,Y,Y,Y,Y)
 OUTPUT(U1,N,N,Y,Y,Y,Y)
 OUTPUT(V1,N,N,Y,Y,Y,Y)
 OUTPUT(SIGM,N,N,Y,N,N,N)
 OUTPUT(MEVP,N,N,Y,N,N,N)
 OUTPUT(KAPA,N,N,Y,N,N,N)
 OUTPUT(MEVA,N,N,Y,N,N,N)
 OUTPUT(PRPS,N,N,Y,N,N,N)
 OUTPUT(DEN1,N,N,Y,N,N,N)
 OUTPUT(SPH1,N,N,Y,N,N,N)
 OUTPUT(TEM1,N,N,Y,Y,Y,Y)
 OUTPUT(VFOL,N,Y,Y,N,Y,Y)
 OUTPUT(SURN,N,Y,Y,Y,Y,Y)
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON = 1 ;IYMON = 38 ;IZMON = 1
 NPRMON = 100000 ;NPRMNT = 1 ;TSTSWP = -1
 UWATCH = T ;USTEER = T
 HIGHLO = F
 ************************************************************
  Group 23.Field Print-Out & Plot Control
 NPRINT = 100000 ;NUMCLS = 5
 NTPRIN = 100000 ;ISTPRF = 1 ;ISTPRL = 100000
 NXPRIN = -1 ;IXPRF = 1 ;IXPRL = 10000
 NYPRIN = -1 ;IYPRF = 1 ;IYPRL = 10000
 IPLTF = 1 ;IPLTL = -1 ;NPLT = -1
 ISWPRF = 1 ;ISWPRL = 100000
 ITABL = 3 ;IPROF = 1
 ABSIZ =0.5 ;ORSIZ =0.4
 NTZPRF = 1 ;NCOLPF = 50
 ICHR = 2 ;NCOLCO = 45 ;NROWCO = 20
   No PATCHes yet used for this Group
 ************************************************************
  Group 24. Dumps For Restarts
 SAVE = T ;NOWIPE = F
 NSAVE =CHAM
 IDISPA = 25 ;IDISPB = 0 ;IDISPC = 0
 CSG1    ='A'
STOP