      SUBROUTINE GTXGF2
      COMMON /TXT/ TXPTR,TXCPX,TXCPY,TXCPZ,TXCTM,TXSIZX,TXSIZY,
     1     TXFONT,TXFTAB,TXFDT,TXFRAS,TXFRMX,TXWID,TXHGHT,
     2     TXCBXO,TXCBYO,TXFTXO,TXFTYO,TXCBMW,TXCBMH,
     3     TXSPRW,TXSPRH,TXRATH,TXRATW,TXSPVH,TXSPVW,TXCSET
      INTEGER TXPTR,TXFONT,TXFTAB(2200),TXFDT(3,128),TXFRAS(128),
     1     TXFRMX,TXWID,TXHGHT,
     2     TXCBXO,TXCBYO,TXFTXO,TXFTYO,TXCBMW,TXCBMH,
     3     TXSPRW,TXSPRH,TXRATH,TXRATW,TXSPVH,TXSPVW,TXCSET
      REAL TXCPX,TXCPY,TXCPZ,TXCTM(4,4),TXSIZX,TXSIZY
      INTEGER I,FTMAX,FT(2018),FDT(3,88),FDTMAX
      DATA FTMAX,FDTMAX/2018,88/
      DATA FDT(1,  1),FDT(2,  1),FDT(3,  1)/ 33,10,   1/
      DATA FT(   1),FT(   2),FT(   3),FT(   4)/13280, 9118, 9170, 9246/
      DATA FT(   5),FT(   6),FT(   7),FT(   8)/ 9184,13278, 9176,13261/
      DATA FT(   9),FT(  10),FT(  11),FT(  12)/ 9100, 9163, 9228, 9165/
      DATA FT(  13)/0/
      DATA FDT(1,  2),FDT(2,  2),FDT(3,  2)/ 35,21,  14/
      DATA FT(  14),FT(  15),FT(  16),FT(  17)/13664, 9092,14048, 9476/
      DATA FT(  18),FT(  19),FT(  20),FT(  21)/13205,10005,13135, 9935/
      DATA FT(  22)/0/
      DATA FDT(1,  3),FDT(2,  3),FDT(3,  3)/ 36,20,  23/
      DATA FT(  23),FT(  24),FT(  25),FT(  26)/13476, 9351,13732, 9607/
      DATA FT(  27),FT(  28),FT(  29),FT(  30)/13981, 9820, 9883, 9948/
      DATA FT(  31),FT(  32),FT(  33),FT(  34)/ 9949, 9823, 9632, 9376/
      DATA FT(  35),FT(  36),FT(  37),FT(  38)/ 9183, 9053, 9051, 9113/
      DATA FT(  39),FT(  40),FT(  41),FT(  42)/ 9176, 9303, 9685, 9812/
      DATA FT(  43),FT(  44),FT(  45),FT(  46)/ 9938,13147, 9177, 9304/
      DATA FT(  47),FT(  48),FT(  49),FT(  50)/ 9686, 9813, 9876, 9938/
      DATA FT(  51),FT(  52),FT(  53),FT(  54)/ 9934, 9804, 9611, 9355/
      DATA FT(  55),FT(  56),FT(  57),FT(  58)/ 9164, 9038, 9039, 9104/
      DATA FT(  59),FT(  60),FT(  61)/ 9167, 9102,0/
      DATA FDT(1,4),FDT(2,4),FDT(3,4)/37,24,62/
      DATA FT(  62),FT(  63),FT(  64),FT(  65)/14304, 9035,13472, 9502/
      DATA FT(  66),FT(  67),FT(  68),FT(  69)/ 9500, 9434, 9305, 9177/
      DATA FT(  70),FT(  71),FT(  72),FT(  73)/ 9051, 9053, 9119, 9248/
      DATA FT(  74),FT(  75),FT(  76),FT(  77)/ 9376, 9503, 9694, 9886/
      DATA FT(  78),FT(  79),FT(  80),FT(  81)/10079,10208,14034, 9809/
      DATA FT(  82),FT(  83),FT(  84),FT(  85)/ 9743, 9741, 9867, 9995/
      DATA FT(  86),FT(  87),FT(  88),FT(  89)/10124,10190,10192,10066/
      DATA FT(  90),FT(  91)/ 9938,0/
      DATA FDT(1,  5),FDT(2,  5),FDT(3,  5)/ 38,25,  92/
      DATA FT(  92),FT(  93),FT(  94),FT(  95)/14296,10135,10198,10263/
      DATA FT(  96),FT(  97),FT(  98),FT(  99)/10264,10201,10137,10072/
      DATA FT( 100),FT( 101),FT( 102),FT( 103)/10006, 9873, 9742, 9612/
      DATA FT( 104),FT( 105),FT( 106),FT( 107)/ 9483, 9291, 9100, 9038/
      DATA FT( 108),FT( 109),FT( 110),FT( 111)/ 9041, 9107, 9495, 9625/
      DATA FT( 112),FT( 113),FT( 114),FT( 115)/ 9691, 9693, 9631, 9504/
      DATA FT( 116),FT( 117),FT( 118),FT( 119)/ 9375, 9309, 9307, 9368/
      DATA FT( 120),FT( 121),FT( 122),FT( 123)/ 9493, 9806, 9932,10123/
      DATA FT( 124),FT( 125),FT( 126),FT( 127)/10187,10252,10253,13387/
      DATA FT( 128),FT( 129),FT( 130),FT( 131)/ 9164, 9102, 9105, 9171/
      DATA FT( 132),FT( 133),FT( 134),FT( 135)/ 9301,13403, 9369, 9870/
      DATA FT( 136),FT( 137),FT( 138)/ 9996,10123,0/
      DATA FDT(1,  6),FDT(2,  6),FDT(3,  6)/ 40,14, 139/
      DATA FT( 139),FT( 140),FT( 141),FT( 142)/13668, 9442, 9311, 9179/
      DATA FT( 143),FT( 144),FT( 145),FT( 146)/ 9110, 9106, 9165, 9289/
      DATA FT( 147),FT( 148),FT( 149),FT( 150)/ 9414, 9540,13538, 9310/
      DATA FT( 151),FT( 152),FT( 153),FT( 154)/ 9243, 9174, 9170, 9229/
      DATA FT( 155),FT( 156),FT( 157)/ 9290, 9414,0/
      DATA FDT(1,  7),FDT(2,  7),FDT(3,  7)/ 41,14, 158/
      DATA FT( 158),FT( 159),FT( 160),FT( 161)/13156, 9186, 9311, 9435/
      DATA FT( 162),FT( 163),FT( 164),FT( 165)/ 9494, 9490, 9421, 9289/
      DATA FT( 166),FT( 167),FT( 168),FT( 169)/ 9158, 9028,13282, 9310/
      DATA FT( 170),FT( 171),FT( 172),FT( 173)/ 9371, 9430, 9426, 9357/
      DATA FT( 174),FT( 175),FT( 176)/ 9290, 9158,0/
      DATA FDT(1,  8),FDT(2,  8),FDT(3,  8)/ 42,16, 177/
      DATA FT( 177),FT( 178),FT( 179),FT( 180)/13472, 9364,13149, 9687/
      DATA FT( 181),FT( 182),FT( 183)/13789, 9047,0/
      DATA FDT(1,9),FDT(2,9),FDT(3,9)/43,26,184/
      DATA FT( 184),FT( 185),FT( 186),FT( 187)/13789, 9675,13204,10260/
      DATA FT( 188)/0/
      DATA FDT(1, 10),FDT(2, 10),FDT(3, 10)/ 44,10, 189/
      DATA FT( 189),FT( 190),FT( 191),FT( 192)/13259, 9100, 9165, 9228/
      DATA FT( 193),FT( 194),FT( 195),FT( 196)/ 9226, 9160, 9095,0/
      DATA FDT(1, 11),FDT(2, 11),FDT(3, 11)/ 45,26, 197/
      DATA FT( 197),FT( 198),FT( 199)/13204,10260,0/
      DATA FDT(1, 12),FDT(2, 12),FDT(3, 12)/ 46,10, 200/
      DATA FT( 200),FT( 201),FT( 202),FT( 203)/13261, 9100, 9163, 9228/
      DATA FT( 204),FT( 205)/ 9165,0/
      DATA FDT(1, 13),FDT(2, 13),FDT(3, 13)/ 47,22, 206/
      DATA FT( 206),FT( 207),FT( 208)/14244, 8964,0/
      DATA FDT(1, 14),FDT(2, 14),FDT(3, 14)/ 48,20, 209/
      DATA FT( 209),FT( 210),FT( 211),FT( 212)/13536, 9247, 9116, 9047/
      DATA FT( 213),FT( 214),FT( 215),FT( 216)/ 9044, 9103, 9228, 9419/
      DATA FT( 217),FT( 218),FT( 219),FT( 220)/ 9547, 9740, 9871, 9940/
      DATA FT( 221),FT( 222),FT( 223),FT( 224)/ 9943, 9884, 9759, 9568/
      DATA FT( 225),FT( 226),FT( 227),FT( 228)/ 9440,13536, 9311, 9246/
      DATA FT( 229),FT( 230),FT( 231),FT( 232)/ 9180, 9111, 9108, 9167/
      DATA FT( 233),FT( 234),FT( 235),FT( 236)/ 9229, 9292, 9419,13643/
      DATA FT( 237),FT( 238),FT( 239),FT( 240)/ 9676, 9741, 9807, 9876/
      DATA FT( 241),FT( 242),FT( 243),FT( 244)/ 9879, 9820, 9758, 9695/
      DATA FT( 245),FT( 246)/ 9568,0/
      DATA FDT(1, 15),FDT(2, 15),FDT(3, 15)/ 49,20, 247/
      DATA FT( 247),FT( 248),FT( 249),FT( 250)/13340, 9373, 9568, 9547/
      DATA FT( 251),FT( 252),FT( 253),FT( 254)/13599, 9483,13323, 9803/
      DATA FT( 255)/0/
      DATA FDT(1, 16),FDT(2, 16),FDT(3, 16)/ 50,20, 256/
      DATA FT( 256),FT( 257),FT( 258),FT( 259)/13212, 9179, 9114, 9051/
      DATA FT( 260),FT( 261),FT( 262),FT( 263)/ 9052, 9118, 9183, 9376/
      DATA FT( 264),FT( 265),FT( 266),FT( 267)/ 9632, 9823, 9886, 9948/
      DATA FT( 268),FT( 269),FT( 270),FT( 271)/ 9946, 9880, 9686, 9364/
      DATA FT( 272),FT( 273),FT( 274),FT( 275)/ 9235, 9105, 9038, 9035/
      DATA FT( 276),FT( 277),FT( 278),FT( 279)/13728, 9759, 9822, 9884/
      DATA FT( 280),FT( 281),FT( 282),FT( 283)/ 9882, 9816, 9622, 9364/
      DATA FT( 284),FT( 285),FT( 286),FT( 287)/13133, 9102, 9230, 9548/
      DATA FT( 288),FT( 289),FT( 290),FT( 291)/ 9740, 9869, 9934,13326/
      DATA FT( 292),FT( 293),FT( 294),FT( 295)/ 9547, 9803, 9868, 9934/
      DATA FT( 296),FT( 297)/ 9936,0/
      DATA FDT(1, 17),FDT(2, 17),FDT(3, 17)/ 51,20, 298/
      DATA FT( 298),FT( 299),FT( 300),FT( 301)/13212, 9179, 9114, 9051/
      DATA FT( 302),FT( 303),FT( 304),FT( 305)/ 9052, 9118, 9183, 9376/
      DATA FT( 306),FT( 307),FT( 308),FT( 309)/ 9632, 9823, 9885, 9882/
      DATA FT( 310),FT( 311),FT( 312),FT( 313)/ 9816, 9623, 9431,13728/
      DATA FT( 314),FT( 315),FT( 316),FT( 317)/ 9759, 9821, 9818, 9752/
      DATA FT( 318),FT( 319),FT( 320),FT( 321)/ 9623,13719, 9750, 9876/
      DATA FT( 322),FT( 323),FT( 324),FT( 325)/ 9938, 9935, 9869, 9804/
      DATA FT( 326),FT( 327),FT( 328),FT( 329)/ 9611, 9355, 9164, 9101/
      DATA FT( 330),FT( 331),FT( 332),FT( 333)/ 9039, 9040, 9105, 9168/
      DATA FT( 334),FT( 335),FT( 336),FT( 337)/ 9103,13909, 9874, 9871/
      DATA FT( 338),FT( 339),FT( 340),FT( 341)/ 9805, 9740, 9611,0/
      DATA FDT(1, 18),FDT(2, 18),FDT(3, 18)/ 52,20, 342/
      DATA FT( 342),FT( 343),FT( 344),FT( 345)/13726, 9611,13792, 9675/
      DATA FT( 346),FT( 347),FT( 348),FT( 349)/13792, 8977,10001,13515/
      DATA FT( 350),FT( 351)/ 9867,0/
      DATA FDT(1, 19),FDT(2, 19),FDT(3, 19)/ 53,20, 352/
      DATA FT( 352),FT( 353),FT( 354),FT( 355)/13280, 9046,13142, 9176/
      DATA FT( 356),FT( 357),FT( 358),FT( 359)/ 9369, 9561, 9752, 9878/
      DATA FT( 360),FT( 361),FT( 362),FT( 363)/ 9939, 9937, 9870, 9740/
      DATA FT( 364),FT( 365),FT( 366),FT( 367)/ 9547, 9355, 9164, 9101/
      DATA FT( 368),FT( 369),FT( 370),FT( 371)/ 9039, 9040, 9105, 9168/
      DATA FT( 372),FT( 373),FT( 374),FT( 375)/ 9103,13657, 9688, 9814/
      DATA FT( 376),FT( 377),FT( 378),FT( 379)/ 9875, 9873, 9806, 9676/
      DATA FT( 380),FT( 381),FT( 382),FT( 383)/ 9547,13280, 9824,13279/
      DATA FT( 384),FT( 385),FT( 386)/ 9503, 9824,0/
      DATA FDT(1, 20),FDT(2, 20),FDT(3, 20)/ 54,20, 387/
      DATA FT( 387),FT( 388),FT( 389),FT( 390)/13917, 9756, 9819, 9884/
      DATA FT( 391),FT( 392),FT( 393),FT( 394)/ 9885, 9823, 9696, 9504/
      DATA FT( 395),FT( 396),FT( 397),FT( 398)/ 9311, 9181, 9115, 9047/
      DATA FT( 399),FT( 400),FT( 401),FT( 402)/ 9041, 9102, 9228, 9419/
      DATA FT( 403),FT( 404),FT( 405),FT( 406)/ 9547, 9740, 9870, 9937/
      DATA FT( 407),FT( 408),FT( 409),FT( 410)/ 9938, 9877, 9751, 9560/
      DATA FT( 411),FT( 412),FT( 413),FT( 414)/ 9496, 9303, 9173, 9106/
      DATA FT( 415),FT( 416),FT( 417),FT( 418)/13600, 9375, 9245, 9179/
      DATA FT( 419),FT( 420),FT( 421),FT( 422)/ 9111, 9105, 9166, 9292/
      DATA FT( 423),FT( 424),FT( 425),FT( 426)/ 9419,13643, 9676, 9806/
      DATA FT( 427),FT( 428),FT( 429),FT( 430)/ 9873, 9874, 9813, 9687/
      DATA FT( 431),FT( 432)/ 9560,0/
      DATA FDT(1, 21),FDT(2, 21),FDT(3, 21)/ 55,20, 433/
      DATA FT( 433),FT( 434),FT( 435),FT( 436)/13152, 9050,13148, 9118/
      DATA FT( 437),FT( 438),FT( 439),FT( 440)/ 9248, 9376, 9693, 9821/
      DATA FT( 441),FT( 442),FT( 443),FT( 444)/ 9886, 9952,13214, 9247/
      DATA FT( 445),FT( 446),FT( 447),FT( 448)/ 9375, 9693,14048, 9949/
      DATA FT( 449),FT( 450),FT( 451),FT( 452)/ 9882, 9621, 9555, 9488/
      DATA FT( 453),FT( 454),FT( 455),FT( 456)/ 9483,13978, 9557, 9491/
      DATA FT( 457),FT( 458),FT( 459)/ 9424, 9419,0/
      DATA FDT(1,22),FDT(2,22),FDT(3,22)/56,20,460/
      DATA FT( 460),FT( 461),FT( 462),FT( 463)/13472, 9183, 9117, 9114/
      DATA FT( 464),FT( 465),FT( 466),FT( 467)/ 9176, 9367, 9623, 9816/
      DATA FT( 468),FT( 469),FT( 470),FT( 471)/ 9882, 9885, 9823, 9632/
      DATA FT( 472),FT( 473),FT( 474),FT( 475)/ 9376,13472, 9247, 9181/
      DATA FT( 476),FT( 477),FT( 478),FT( 479)/ 9178, 9240, 9367,13719/
      DATA FT( 480),FT( 481),FT( 482),FT( 483)/ 9752, 9818, 9821, 9759/
      DATA FT( 484),FT( 485),FT( 486),FT( 487)/ 9632,13463, 9174, 9109/
      DATA FT( 488),FT( 489),FT( 490),FT( 491)/ 9043, 9039, 9101, 9164/
      DATA FT( 492),FT( 493),FT( 494),FT( 495)/ 9355, 9611, 9804, 9869/
      DATA FT( 496),FT( 497),FT( 498),FT( 499)/ 9935, 9939, 9877, 9814/
      DATA FT( 500),FT( 501),FT( 502),FT( 503)/ 9623,13463, 9238, 9173/
      DATA FT( 504),FT( 505),FT( 506),FT( 507)/ 9107, 9103, 9165, 9228/
      DATA FT( 508),FT( 509),FT( 510),FT( 511)/ 9355,13707, 9740, 9805/
      DATA FT( 512),FT( 513),FT( 514),FT( 515)/ 9871, 9875, 9813, 9750/
      DATA FT( 516),FT( 517)/ 9623,0/
      DATA FDT(1, 23),FDT(2, 23),FDT(3, 23)/ 57,20, 518/
      DATA FT( 518),FT( 519),FT( 520),FT( 521)/13977, 9814, 9684, 9491/
      DATA FT( 522),FT( 523),FT( 524),FT( 525)/ 9427, 9236, 9110, 9049/
      DATA FT( 526),FT( 527),FT( 528),FT( 529)/ 9050, 9117, 9247, 9440/
      DATA FT( 530),FT( 531),FT( 532),FT( 533)/ 9568, 9759, 9885, 9946/
      DATA FT( 534),FT( 535),FT( 536),FT( 537)/ 9940, 9872, 9806, 9676/
      DATA FT( 538),FT( 539),FT( 540),FT( 541)/ 9483, 9291, 9164, 9102/
      DATA FT( 542),FT( 543),FT( 544),FT( 545)/ 9103, 9168, 9231, 9166/
      DATA FT( 546),FT( 547),FT( 548),FT( 549)/13523, 9300, 9174, 9113/
      DATA FT( 550),FT( 551),FT( 552),FT( 553)/ 9114, 9181, 9311, 9440/
      DATA FT( 554),FT( 555),FT( 556),FT( 557)/13664, 9695, 9821, 9882/
      DATA FT( 558),FT( 559),FT( 560),FT( 561)/ 9876, 9808, 9742, 9612/
      DATA FT( 562),FT( 563)/ 9483,0/
      DATA FDT(1, 24),FDT(2, 24),FDT(3, 24)/ 58,10, 564/
      DATA FT( 564),FT( 565),FT( 566),FT( 567)/13273, 9112, 9175, 9240/
      DATA FT( 568),FT( 569),FT( 570),FT( 571)/ 9177,13261, 9100, 9163/
      DATA FT( 572),FT( 573),FT( 574)/ 9228, 9165,0/
      DATA FDT(1, 25),FDT(2, 25),FDT(3, 25)/ 59,10, 575/
      DATA FT( 575),FT( 576),FT( 577),FT( 578)/13273, 9112, 9175, 9240/
      DATA FT( 579),FT( 580),FT( 581),FT( 582)/ 9177,13259, 9100, 9165/
      DATA FT( 583),FT( 584),FT( 585),FT( 586)/ 9228, 9226, 9160, 9095/
      DATA FT( 587)/0/
      DATA FDT(1, 26),FDT(2, 26),FDT(3, 26)/ 60,24, 588/
      DATA FT( 588),FT( 589),FT( 590),FT( 591)/14237, 9108,10123,0/
      DATA FDT(1, 27),FDT(2, 27),FDT(3, 27)/ 61,26, 592/
      DATA FT( 592),FT( 593),FT( 594),FT( 595)/13207,10263,13201,10257/
      DATA FT( 596)/0/
      DATA FDT(1, 28),FDT(2, 28),FDT(3, 28)/ 62,24, 597/
      DATA FT( 597),FT( 598),FT( 599),FT( 600)/13213,10132, 9099,0/
      DATA FDT(1, 29),FDT(2, 29),FDT(3, 29)/ 63,18, 601/
      DATA FT( 601),FT( 602),FT( 603),FT( 604)/13212, 9179, 9114, 9051/
      DATA FT( 605),FT( 606),FT( 607),FT( 608)/ 9052, 9118, 9183, 9312/
      DATA FT( 609),FT( 610),FT( 611),FT( 612)/ 9504, 9695, 9758, 9820/
      DATA FT( 613),FT( 614),FT( 615),FT( 616)/ 9818, 9752, 9687, 9429/
      DATA FT( 617),FT( 618),FT( 619),FT( 620)/ 9426,13600, 9631, 9694/
      DATA FT( 621),FT( 622),FT( 623),FT( 624)/ 9756, 9754, 9688, 9558/
      DATA FT( 625),FT( 626),FT( 627),FT( 628)/13517, 9356, 9419, 9484/
      DATA FT( 629),FT( 630)/ 9421,0/
      DATA FDT(1, 30),FDT(2, 30),FDT(3, 30)/ 64,27, 631/
      DATA FT( 631),FT( 632),FT( 633),FT( 634)/14104, 9946, 9819, 9627/
      DATA FT( 635),FT( 636),FT( 637),FT( 638)/ 9498, 9433, 9366, 9363/
      DATA FT( 639),FT( 640),FT( 641),FT( 642)/ 9425, 9552, 9744, 9873/
      DATA FT( 643),FT( 644),FT( 645),FT( 646)/ 9939,13723, 9497, 9430/
      DATA FT( 647),FT( 648),FT( 649),FT( 650)/ 9427, 9489, 9552,14107/
      DATA FT( 651),FT( 652),FT( 653),FT( 654)/ 9939, 9937,10064,10192/
      DATA FT( 655),FT( 656),FT( 657),FT( 658)/10322,10389,10391,10330/
      DATA FT( 659),FT( 660),FT( 661),FT( 662)/10268,10142,10015, 9824/
      DATA FT( 663),FT( 664),FT( 665),FT( 666)/ 9632, 9439, 9310, 9180/
      DATA FT( 667),FT( 668),FT( 669),FT( 670)/ 9114, 9047, 9044, 9105/
      DATA FT( 671),FT( 672),FT( 673),FT( 674)/ 9167, 9293, 9420, 9611/
      DATA FT( 675),FT( 676),FT( 677),FT( 678)/ 9803, 9996,10125,10190/
      DATA FT( 679),FT( 680),FT( 681),FT( 682)/14171,10003,10001,10064/
      DATA FT( 683)/0/
      DATA FDT(1, 31),FDT(2, 31),FDT(3, 31)/ 65,20, 684/
      DATA FT( 684),FT( 685),FT( 686),FT( 687)/13600, 9035,13600, 9931/
      DATA FT( 688),FT( 689),FT( 690),FT( 691)/13597, 9867,13265, 9745/
      DATA FT( 692),FT( 693),FT( 694),FT( 695)/13003, 9291,13771,10059/
      DATA FT( 696)/0/
      DATA FDT(1, 32),FDT(2, 32),FDT(3, 32)/ 66,22, 697/
      DATA FT( 697),FT( 698),FT( 699),FT( 700)/13280, 9163,13344, 9227/
      DATA FT( 701),FT( 702),FT( 703),FT( 704)/13088, 9760, 9951,10014/
      DATA FT( 705),FT( 706),FT( 707),FT( 708)/10076,10074,10008, 9943/
      DATA FT( 709),FT( 710),FT( 711),FT( 712)/ 9750,13856, 9887, 9950/
      DATA FT( 713),FT( 714),FT( 715),FT( 716)/10012,10010, 9944, 9879/
      DATA FT( 717),FT( 718),FT( 719),FT( 720)/ 9750,13334, 9750, 9941/
      DATA FT( 721),FT( 722),FT( 723),FT( 724)/10004,10066,10063, 9997/
      DATA FT( 725),FT( 726),FT( 727),FT( 728)/ 9932, 9739, 8971,13846/
      DATA FT( 729),FT( 730),FT( 731),FT( 732)/ 9877, 9940,10002, 9999/
      DATA FT( 733),FT( 734),FT( 735),FT( 736)/ 9933, 9868, 9739,0/
      DATA FDT(1, 33),FDT(2, 33),FDT(3, 33)/ 67,21, 737/
      DATA FT( 737),FT( 738),FT( 739),FT( 740)/14045,10010,10016, 9949/
      DATA FT( 741),FT( 742),FT( 743),FT( 744)/ 9823, 9632, 9504, 9311/
      DATA FT( 745),FT( 746),FT( 747),FT( 748)/ 9181, 9115, 9048, 9043/
      DATA FT(749),FT(750),FT(751),FT(752)/9104,9166,9292,9483/
      DATA FT( 753),FT( 754),FT( 755),FT( 756)/ 9611, 9804, 9934,10000/
      DATA FT( 757),FT( 758),FT( 759),FT( 760)/13600, 9375, 9245, 9179/
      DATA FT( 761),FT( 762),FT( 763),FT( 764)/ 9112, 9107, 9168, 9230/
      DATA FT( 765),FT( 766),FT( 767)/ 9356, 9483,0/
      DATA FDT(1, 34),FDT(2, 34),FDT(3, 34)/ 68,22, 768/
      DATA FT( 768),FT( 769),FT( 770),FT( 771)/13280, 9163,13344, 9227/
      DATA FT( 772),FT( 773),FT( 774),FT( 775)/13088, 9632, 9823, 9949/
      DATA FT( 776),FT( 777),FT( 778),FT( 779)/10011,10072,10067,10000/
      DATA FT( 780),FT( 781),FT( 782),FT( 783)/ 9934, 9804, 9611, 8971/
      DATA FT( 784),FT( 785),FT( 786),FT( 787)/13728, 9759, 9885, 9947/
      DATA FT( 788),FT( 789),FT( 790),FT( 791)/10008,10003, 9936, 9870/
      DATA FT( 792),FT( 793),FT( 794)/ 9740, 9611,0/
      DATA FDT(1, 35),FDT(2, 35),FDT(3, 35)/ 69,21, 795/
      DATA FT( 795),FT( 796),FT( 797),FT( 798)/13280, 9163,13344, 9227/
      DATA FT( 799),FT( 800),FT( 801),FT( 802)/13722, 9618,13088,10016/
      DATA FT( 803),FT( 804),FT( 805),FT( 806)/10010, 9952,13334, 9622/
      DATA FT( 807),FT( 808),FT( 809),FT( 810)/13067, 9995,10001, 9931/
      DATA FT( 811)/0/
      DATA FDT(1, 36),FDT(2, 36),FDT(3, 36)/ 70,20, 812/
      DATA FT( 812),FT( 813),FT( 814),FT( 815)/13280, 9163,13344, 9227/
      DATA FT( 816),FT( 817),FT( 818),FT( 819)/13722, 9618,13088,10016/
      DATA FT( 820),FT( 821),FT( 822),FT( 823)/10010, 9952,13334, 9622/
      DATA FT( 824),FT( 825),FT( 826)/13067, 9419,0/
      DATA FDT(1, 37),FDT(2, 37),FDT(3, 37)/ 71,23, 827/
      DATA FT( 827),FT( 828),FT( 829),FT( 830)/14045,10010,10016, 9949/
      DATA FT( 831),FT( 832),FT( 833),FT( 834)/ 9823, 9632, 9504, 9311/
      DATA FT( 835),FT( 836),FT( 837),FT( 838)/ 9181, 9115, 9048, 9043/
      DATA FT( 839),FT( 840),FT( 841),FT( 842)/ 9104, 9166, 9292, 9483/
      DATA FT( 843),FT( 844),FT( 845),FT( 846)/ 9611, 9804, 9934,13600/
      DATA FT( 847),FT( 848),FT( 849),FT( 850)/ 9375, 9245, 9179, 9112/
      DATA FT( 851),FT( 852),FT( 853),FT( 854)/ 9107, 9168, 9230, 9356/
      DATA FT( 855),FT( 856),FT( 857),FT( 858)/ 9483,14035, 9931,14099/
      DATA FT( 859),FT( 860),FT( 861),FT( 862)/ 9995,13843,10195,0/
      DATA FDT(1, 38),FDT(2, 38),FDT(3, 38)/ 72,24, 863/
      DATA FT( 863),FT( 864),FT( 865),FT( 866)/13280, 9163,13344, 9227/
      DATA FT( 867),FT( 868),FT( 869),FT( 870)/14112, 9995,14176,10059/
      DATA FT( 871),FT( 872),FT( 873),FT( 874)/13088, 9440,13920,10272/
      DATA FT( 875),FT( 876),FT( 877),FT( 878)/13334,10006,13067, 9419/
      DATA FT( 879),FT( 880),FT( 881)/13899,10251,0/
      DATA FDT(1, 39),FDT(2, 39),FDT(3, 39)/ 73,11, 882/
      DATA FT( 882),FT( 883),FT( 884),FT( 885)/13280, 9163,13344, 9227/
      DATA FT( 886),FT( 887),FT( 888),FT( 889)/13088, 9440,13067, 9419/
      DATA FT( 890)/0/
      DATA FDT(1, 40),FDT(2, 40),FDT(3, 40)/ 74,15, 891/
      DATA FT( 891),FT( 892),FT( 893),FT( 894)/13600, 9487, 9420, 9291/
      DATA FT( 895),FT( 896),FT( 897),FT( 898)/ 9163, 9036, 8974, 8976/
      DATA FT( 899),FT( 900),FT( 901),FT( 902)/ 9041, 9104, 9039,13536/
      DATA FT( 903),FT( 904),FT( 905),FT( 906)/ 9423, 9356, 9291,13344/
      DATA FT( 907),FT( 908)/ 9696,0/
      DATA FDT(1, 41),FDT(2, 41),FDT(3, 41)/ 75,22, 909/
      DATA FT( 909),FT( 910),FT( 911),FT( 912)/13280, 9163,13344, 9227/
      DATA FT( 913),FT( 914),FT( 915),FT( 916)/14176, 9235,13655,10059/
      DATA FT( 917),FT( 918),FT( 919),FT( 920)/13591, 9995,13088, 9440/
      DATA FT( 921),FT( 922),FT( 923),FT( 924)/13920,10208,13067, 9419/
      DATA FT( 925),FT( 926),FT( 927)/13899,10187,0/
      DATA FDT(1, 42),FDT(2, 42),FDT(3, 42)/ 76,18, 928/
      DATA FT( 928),FT( 929),FT( 930),FT( 931)/13280, 9163,13344, 9227/
      DATA FT( 932),FT( 933),FT( 934),FT( 935)/13088, 9440,13067, 9931/
      DATA FT( 936),FT( 937),FT( 938)/ 9937, 9867,0/
      DATA FDT(1, 43),FDT(2, 43),FDT(3, 43)/ 77,25, 939/
      DATA FT( 939),FT( 940),FT( 941),FT( 942)/13280, 9163,13344, 9614/
      DATA FT( 943),FT( 944),FT( 945),FT( 946)/13280, 9611,14176, 9611/
      DATA FT( 947),FT( 948),FT( 949),FT( 950)/14176,10059,14240,10123/
      DATA FT( 951),FT( 952),FT( 953),FT( 954)/13088, 9248,14176,10336/
      DATA FT( 955),FT( 956),FT( 957),FT( 958)/13067, 9355,13963,10315/
      DATA FT( 959)/0/
      DATA FDT(1, 44),FDT(2, 44),FDT(3, 44)/ 78,23, 960/
      DATA FT( 960),FT( 961),FT( 962),FT( 963)/13280, 9163,13344, 9997/
      DATA FT( 964),FT( 965),FT( 966),FT( 967)/13342, 9995,14112, 9995/
      DATA FT( 968),FT( 969),FT( 970),FT( 971)/13088, 9248,13920,10208/
      DATA FT( 972),FT( 973),FT( 974)/13067, 9355,0/
      DATA FDT(1, 45),FDT(2, 45),FDT(3, 45)/ 79,22, 975/
      DATA FT( 975),FT( 976),FT( 977),FT( 978)/13600, 9311, 9181, 9115/
      DATA FT( 979),FT( 980),FT( 981),FT( 982)/ 9047, 9044, 9104, 9166/
      DATA FT( 983),FT( 984),FT( 985),FT( 986)/ 9292, 9483, 9611, 9804/
      DATA FT( 987),FT( 988),FT( 989),FT( 990)/ 9934,10000,10068,10071/
      DATA FT( 991),FT( 992),FT( 993),FT( 994)/10011, 9949, 9823, 9632/
      DATA FT( 995),FT( 996),FT( 997),FT( 998)/ 9504,13600, 9375, 9245/
      DATA FT( 999),FT(1000),FT(1001),FT(1002)/ 9179, 9111, 9108, 9168/
      DATA FT(1003),FT(1004),FT(1005),FT(1006)/ 9230, 9356, 9483,13707/
      DATA FT(1007),FT(1008),FT(1009),FT(1010)/ 9740, 9870, 9936,10004/
      DATA FT(1011),FT(1012),FT(1013),FT(1014)/10007, 9947, 9885, 9759/
      DATA FT(1015),FT(1016)/ 9632,0/
      DATA FDT(1, 46),FDT(2, 46),FDT(3, 46)/ 80,22,1017/
      DATA FT(1017),FT(1018),FT(1019),FT(1020)/13280, 9163,13344, 9227/
      DATA FT(1021),FT(1022),FT(1023),FT(1024)/13088, 9760, 9951,10014/
      DATA FT(1025),FT(1026),FT(1027),FT(1028)/10076,10073,10007,9942/
      DATA FT(1029),FT(1030),FT(1031),FT(1032)/ 9749, 9237,13856, 9887/
      DATA FT(1033),FT(1034),FT(1035),FT(1036)/ 9950,10012,10009, 9943/
      DATA FT(1037),FT(1038),FT(1039),FT(1040)/ 9878, 9749,13067, 9419/
      DATA FT(1041)/0/
      DATA FDT(1, 47),FDT(2, 47),FDT(3, 47)/ 81,22,1042/
      DATA FT(1042),FT(1043),FT(1044),FT(1045)/13600, 9311, 9181, 9115/
      DATA FT(1046),FT(1047),FT(1048),FT(1049)/ 9047, 9044, 9104, 9166/
      DATA FT(1050),FT(1051),FT(1052),FT(1053)/ 9292, 9483, 9611, 9804/
      DATA FT(1054),FT(1055),FT(1056),FT(1057)/ 9934,10000,10068,10071/
      DATA FT(1058),FT(1059),FT(1060),FT(1061)/10011, 9949, 9823, 9632/
      DATA FT(1062),FT(1063),FT(1064),FT(1065)/ 9504,13600, 9375, 9245/
      DATA FT(1066),FT(1067),FT(1068),FT(1069)/ 9179, 9111, 9108, 9168/
      DATA FT(1070),FT(1071),FT(1072),FT(1073)/ 9230, 9356, 9483,13707/
      DATA FT(1074),FT(1075),FT(1076),FT(1077)/ 9740, 9870, 9936,10004/
      DATA FT(1078),FT(1079),FT(1080),FT(1081)/10007, 9947, 9885, 9759/
      DATA FT(1082),FT(1083),FT(1084),FT(1085)/ 9632,13389, 9294, 9360/
      DATA FT(1086),FT(1087),FT(1088),FT(1089)/ 9489, 9553, 9680, 9742/
      DATA FT(1090),FT(1091),FT(1092),FT(1093)/ 9799, 9862, 9990,10056/
      DATA FT(1094),FT(1095),FT(1096),FT(1097)/10057,13838, 9802, 9864/
      DATA FT(1098),FT(1099),FT(1100),FT(1101)/ 9927, 9991,10056,0/
      DATA FDT(1, 48),FDT(2, 48),FDT(3, 48)/ 82,22,1102/
      DATA FT(1102),FT(1103),FT(1104),FT(1105)/13280, 9163,13344, 9227/
      DATA FT(1106),FT(1107),FT(1108),FT(1109)/13088, 9760, 9951,10014/
      DATA FT(1110),FT(1111),FT(1112),FT(1113)/10076,10074,10008, 9943/
      DATA FT(1114),FT(1115),FT(1116),FT(1117)/ 9750, 9238,13856, 9887/
      DATA FT(1118),FT(1119),FT(1120),FT(1121)/ 9950,10012,10010, 9944/
      DATA FT(1122),FT(1123),FT(1124),FT(1125)/ 9879, 9750,13067, 9419/
      DATA FT(1126),FT(1127),FT(1128),FT(1129)/13654, 9685, 9748, 9933/
      DATA FT(1130),FT(1131),FT(1132),FT(1133)/ 9996,10060,10125,13781/
      DATA FT(1134),FT(1135),FT(1136),FT(1137)/ 9747, 9868, 9931,10059/
      DATA FT(1138),FT(1139),FT(1140)/10125,10126,0/
      DATA FDT(1, 49),FDT(2, 49),FDT(3, 49)/ 83,20,1141/
      DATA FT(1141),FT(1142),FT(1143),FT(1144)/13981, 9952, 9946, 9885/
      DATA FT(1145),FT(1146),FT(1147),FT(1148)/ 9759, 9568, 9376, 9183/
      DATA FT(1149),FT(1150),FT(1151),FT(1152)/ 9053, 9051, 9113, 9176/
      DATA FT(1153),FT(1154),FT(1155),FT(1156)/ 9303, 9685, 9812, 9938/
      DATA FT(1157),FT(1158),FT(1159),FT(1160)/13147, 9177, 9304, 9686/
      DATA FT(1161),FT(1162),FT(1163),FT(1164)/ 9813, 9876, 9938, 9934/
      DATA FT(1165),FT(1166),FT(1167),FT(1168)/ 9804, 9611, 9419, 9228/
      DATA FT(1169),FT(1170),FT(1171),FT(1172)/ 9102, 9041, 9035, 9102/
      DATA FT(1173)/0/
      DATA FDT(1, 50),FDT(2, 50),FDT(3, 50)/ 84,19,1174/
      DATA FT(1174),FT(1175),FT(1176),FT(1177)/13536, 9419,13600, 9483/
      DATA FT(1178),FT(1179),FT(1180),FT(1181)/13152, 8986, 8992, 9952/
      DATA FT(1182),FT(1183),FT(1184),FT(1185)/ 9946, 9888,13323, 9675/
      DATA FT(1186)/0/
      DATA FDT(1, 51),FDT(2, 51),FDT(3, 51)/ 85,24,1187/
      DATA FT(1187),FT(1188),FT(1189),FT(1190)/13280, 9169, 9230, 9356/
      DATA FT(1191),FT(1192),FT(1193),FT(1194)/ 9547, 9675, 9868, 9998/
      DATA FT(1195),FT(1196),FT(1197),FT(1198)/10065,10080,13344, 9233/
      DATA FT(1199),FT(1200),FT(1201),FT(1202)/ 9294, 9420, 9547,13088/
      DATA FT(1203),FT(1204),FT(1205),FT(1206)/ 9440,13984,10272,0/
      DATA FDT(1, 52),FDT(2, 52),FDT(3, 52)/ 86,20,1207/
      DATA FT(1207),FT(1208),FT(1209),FT(1210)/13152, 9483,13216, 9486/
      DATA FT(1211),FT(1212),FT(1213),FT(1214)/14048, 9483,13024, 9312/
      DATA FT(1215),FT(1216),FT(1217)/13792,10080,0/
      DATA FDT(1, 53),FDT(2, 53),FDT(3, 53)/ 87,24,1218/
      DATA FT(1218),FT(1219),FT(1220),FT(1221)/13216, 9355,13280, 9360/
      DATA FT(1222),FT(1223),FT(1224),FT(1225)/13728, 9355,13728, 9867/
      DATA FT(1226),FT(1227),FT(1228),FT(1229)/13792, 9872,14240, 9867/
      DATA FT(1230),FT(1231),FT(1232),FT(1233)/13024, 9376,14048,10336/
      DATA FT(1234)/0/
      DATA FDT(1, 54),FDT(2, 54),FDT(3, 54)/ 88,20,1235/
      DATA FT(1235),FT(1236),FT(1237),FT(1238)/13152, 9867,13216, 9931/
      DATA FT(1239),FT(1240),FT(1241),FT(1242)/14048, 9035,13024, 9312/
      DATA FT(1243),FT(1244),FT(1245),FT(1246)/13792,10080,13003, 9291/
      DATA FT(1247),FT(1248),FT(1249)/13771,10059,0/
      DATA FDT(1, 55),FDT(2, 55),FDT(3, 55)/ 89,21,1250/
      DATA FT(1250),FT(1251),FT(1252),FT(1253)/13152, 9493, 9483,13216/
      DATA FT(1254),FT(1255),FT(1256),FT(1257)/ 9557, 9547,14112, 9557/
      DATA FT(1258),FT(1259),FT(1260),FT(1261)/13024, 9312,13856,10144/
      DATA FT(1262),FT(1263),FT(1264)/13387, 9739,0/
      DATA FDT(1, 56),FDT(2, 56),FDT(3, 56)/ 90,20,1265/
      DATA FT(1265),FT(1266),FT(1267),FT(1268)/13984, 9035,14048, 9099/
      DATA FT(1269),FT(1270),FT(1271),FT(1272)/13216, 9050, 9056, 9952/
      DATA FT(1273),FT(1274),FT(1275),FT(1276)/13131, 9931, 9937, 9867/
      DATA FT(1277)/0/
      DATA FDT(1, 57),FDT(2, 57),FDT(3, 57)/ 91,14,1278/
      DATA FT(1278),FT(1279),FT(1280),FT(1281)/13220, 9092,13284, 9156/
      DATA FT(1282),FT(1283),FT(1284),FT(1285)/13220, 9572,13188, 9540/
      DATA FT(1286)/0/
      DATA FDT(1, 58),FDT(2, 58),FDT(3, 58)/ 93,14,1287/
      DATA FT(1287),FT(1288),FT(1289),FT(1290)/13540, 9412,13604, 9476/
      DATA FT(1291),FT(1292),FT(1293),FT(1294)/13156, 9508,13124, 9476/
      DATA FT(1295)/0/
      DATA FDT(1, 59),FDT(2, 59),FDT(3, 59)/ 97,20,1296/
      DATA FT(1296),FT(1297),FT(1298),FT(1299)/13271,9174,9110,9111/
      DATA FT(1300),FT(1301),FT(1302),FT(1303)/ 9176, 9305, 9561, 9688/
      DATA FT(1304),FT(1305),FT(1306),FT(1307)/ 9751, 9813, 9806, 9868/
      DATA FT(1308),FT(1309),FT(1310),FT(1311)/ 9931,13847, 9742, 9804/
      DATA FT(1312),FT(1313),FT(1314),FT(1315)/ 9931, 9995,13845, 9684/
      DATA FT(1316),FT(1317),FT(1318),FT(1319)/ 9299, 9106, 9040, 9038/
      DATA FT(1320),FT(1321),FT(1322),FT(1323)/ 9100, 9291, 9483, 9612/
      DATA FT(1324),FT(1325),FT(1326),FT(1327)/ 9742,13395, 9170, 9104/
      DATA FT(1328),FT(1329),FT(1330),FT(1331)/ 9102, 9164, 9291,0/
      DATA FDT(1, 60),FDT(2, 60),FDT(3, 60)/ 98,21,1332/
      DATA FT(1332),FT(1333),FT(1334),FT(1335)/13280, 9163,13344, 9227/
      DATA FT(1336),FT(1337),FT(1338),FT(1339)/13334, 9368, 9497, 9625/
      DATA FT(1340),FT(1341),FT(1342),FT(1343)/ 9816, 9942,10003,10001/
      DATA FT(1344),FT(1345),FT(1346),FT(1347)/ 9934, 9804, 9611, 9483/
      DATA FT(1348),FT(1349),FT(1350),FT(1351)/ 9356, 9230,13721, 9752/
      DATA FT(1352),FT(1353),FT(1354),FT(1355)/ 9878, 9939, 9937, 9870/
      DATA FT(1356),FT(1357),FT(1358),FT(1359)/ 9740, 9611,13088, 9248/
      DATA FT(1360)/0/
      DATA FDT(1, 61),FDT(2, 61),FDT(3, 61)/ 99,19,1361/
      DATA FT(1361),FT(1362),FT(1363),FT(1364)/13910, 9749, 9812, 9877/
      DATA FT(1365),FT(1366),FT(1367),FT(1368)/ 9878, 9752, 9625, 9433/
      DATA FT(1369),FT(1370),FT(1371),FT(1372)/ 9240, 9110, 9043, 9041/
      DATA FT(1373),FT(1374),FT(1375),FT(1376)/ 9102, 9228, 9419, 9547/
      DATA FT(1377),FT(1378),FT(1379),FT(1380)/ 9740, 9870,13529, 9304/
      DATA FT(1381),FT(1382),FT(1383),FT(1384)/ 9174, 9107, 9105, 9166/
      DATA FT(1385),FT(1386),FT(1387)/ 9292, 9419,0/
      DATA FDT(1, 62),FDT(2, 62),FDT(3, 62)/100,21,1388/
      DATA FT(1388),FT(1389),FT(1390),FT(1391)/13920, 9803,13984, 9867/
      DATA FT(1392),FT(1393),FT(1394),FT(1395)/13910, 9688, 9561, 9433/
      DATA FT(1396),FT(1397),FT(1398),FT(1399)/ 9240, 9110, 9043, 9041/
      DATA FT(1400),FT(1401),FT(1402),FT(1403)/ 9102, 9228, 9419, 9547/
      DATA FT(1404),FT(1405),FT(1406),FT(1407)/ 9676, 9806,13529, 9304/
      DATA FT(1408),FT(1409),FT(1410),FT(1411)/ 9174, 9107, 9105, 9166/
      DATA FT(1412),FT(1413),FT(1414),FT(1415)/ 9292, 9419,13728, 9888/
      DATA FT(1416),FT(1417),FT(1418)/13899,10059,0/
      DATA FDT(1, 63),FDT(2, 63),FDT(3, 63)/101,19,1419/
      DATA FT(1419),FT(1420),FT(1421),FT(1422)/13203, 9875, 9877, 9815/
      DATA FT(1423),FT(1424),FT(1425),FT(1426)/ 9752, 9625, 9433, 9240/
      DATA FT(1427),FT(1428),FT(1429),FT(1430)/ 9110, 9043, 9041, 9102/
      DATA FT(1431),FT(1432),FT(1433),FT(1434)/ 9228, 9419, 9547, 9740/
      DATA FT(1435),FT(1436),FT(1437),FT(1438)/ 9870,13907, 9814, 9752/
      DATA FT(1439),FT(1440),FT(1441),FT(1442)/13529, 9304, 9174, 9107/
      DATA FT(1443),FT(1444),FT(1445),FT(1446)/ 9105, 9166, 9292, 9419/
      DATA FT(1447)/0/
      DATA FDT(1, 64),FDT(2, 64),FDT(3, 64)/102,13,1448/
      DATA FT(1448),FT(1449),FT(1450),FT(1451)/13599, 9438, 9501, 9566/
      DATA FT(1452),FT(1453),FT(1454),FT(1455)/ 9567, 9504, 9376, 9247/
      DATA FT(1456),FT(1457),FT(1458),FT(1459)/ 9181, 9163,13472, 9311/
      DATA FT(1460),FT(1461),FT(1462),FT(1463)/ 9245, 9227,13081, 9497/
      DATA FT(1464),FT(1465),FT(1466)/13067, 9419,0/
      DATA FDT(1, 65),FDT(2, 65),FDT(3, 65)/103,19,1467/
      DATA FT(1467),FT(1468),FT(1469),FT(1470)/13465, 9240, 9175, 9109/
      DATA FT(1471),FT(1472),FT(1473),FT(1474)/ 9107, 9169, 9232, 9359/
      DATA FT(1475),FT(1476),FT(1477),FT(1478)/ 9487, 9616, 9681, 9747/
      DATA FT(1479),FT(1480),FT(1481),FT(1482)/ 9749, 9687, 9624, 9497/
      DATA FT(1483),FT(1484),FT(1485),FT(1486)/ 9369,13336, 9174, 9170/
      DATA FT(1487),FT(1488),FT(1489),FT(1490)/ 9232,13712, 9682, 9686/
      DATA FT(1491),FT(1492),FT(1493),FT(1494)/ 9624,13783, 9752, 9881/
      DATA FT(1495),FT(1496),FT(1497),FT(1498)/ 9880, 9752,13265, 9104/
      DATA FT(1499),FT(1500),FT(1501),FT(1502)/ 9038, 9037, 9099, 9290/
      DATA FT(1503),FT(1504),FT(1505),FT(1506)/ 9610, 9801, 9864,13133/
      DATA FT(1507),FT(1508),FT(1509),FT(1510)/ 9100, 9291, 9611, 9802/
      DATA FT(1511),FT(1512),FT(1513),FT(1514)/ 9864, 9863, 9797, 9604/
      DATA FT(1515),FT(1516),FT(1517),FT(1518)/ 9220, 9029, 8967, 8968/
      DATA FT(1519),FT(1520),FT(1521)/ 9034, 9227,0/
      DATA FDT(1, 66),FDT(2, 66),FDT(3, 66)/104,22,1522/
      DATA FT(1522),FT(1523),FT(1524),FT(1525)/13280, 9163,13344, 9227/
      DATA FT(1526),FT(1527),FT(1528),FT(1529)/13334, 9368, 9561, 9689/
      DATA FT(1530),FT(1531),FT(1532),FT(1533)/ 9880, 9942, 9931,13785/
      DATA FT(1534),FT(1535),FT(1536),FT(1537)/ 9816, 9878, 9867,13088/
      DATA FT(1538),FT(1539),FT(1540),FT(1541)/ 9248,13067, 9419,13771/
      DATA FT(1542),FT(1543)/10123,0/
      DATA FDT(1, 67),FDT(2, 67),FDT(3, 67)/105,11,1544/
      DATA FT(1544),FT(1545),FT(1546),FT(1547)/13280, 9119, 9182, 9247/
      DATA FT(1548),FT(1549),FT(1550),FT(1551)/ 9184,13273, 9163,13337/
      DATA FT(1552),FT(1553),FT(1554),FT(1555)/ 9227,13081, 9241,13067/
      DATA FT(1556),FT(1557)/ 9419,0/
      DATA FDT(1, 68),FDT(2, 68),FDT(3, 68)/106,11,1558/
      DATA FT(1558),FT(1559),FT(1560),FT(1561)/13344, 9183, 9246, 9311/
      DATA FT(1562),FT(1563),FT(1564),FT(1565)/ 9248,13401, 9287, 9221/
      DATA FT(1566),FT(1567),FT(1568),FT(1569)/ 9092, 8964, 8901, 8902/
      DATA FT(1570),FT(1571),FT(1572),FT(1573)/ 8967, 9030, 8965,13337/
      DATA FT(1574),FT(1575),FT(1576),FT(1577)/ 9223, 9157, 9092,13145/
      DATA FT(1578),FT(1579)/ 9305,0/
      DATA FDT(1, 69),FDT(2, 69),FDT(3, 69)/107,21,1580/
      DATA FT(1580),FT(1581),FT(1582),FT(1583)/13280, 9163,13344, 9227/
      DATA FT(1584),FT(1585),FT(1586),FT(1587)/13977, 9231,13651, 9931/
      DATA FT(1588),FT(1589),FT(1590),FT(1591)/13587, 9867,13088, 9248/
      DATA FT(1592),FT(1593),FT(1594),FT(1595)/13785,10073,13067, 9419/
      DATA FT(1596),FT(1597),FT(1598)/13771,10059,0/
C    ASCII INPUT
      DATA FDT(1, 70),FDT(2, 70),FDT(3, 70)/108,11,1599/
      DATA FT(1599),FT(1600),FT(1601),FT(1602)/13280, 9163,13344, 9227/
      DATA FT(1603),FT(1604),FT(1605),FT(1606)/13088, 9248,13067, 9419/
      DATA FT(1607)/0/
      DATA FDT(1, 71),FDT(2, 71),FDT(3, 71)/109,33,1608/
      DATA FT(1608),FT(1609),FT(1610),FT(1611)/13273, 9163,13337, 9227/
      DATA FT(1612),FT(1613),FT(1614),FT(1615)/13334, 9368, 9561, 9689/
      DATA FT(1616),FT(1617),FT(1618),FT(1619)/ 9880, 9942, 9931,13785/
      DATA FT(1620),FT(1621),FT(1622),FT(1623)/ 9816, 9878, 9867,14038/
      DATA FT(1624),FT(1625),FT(1626),FT(1627)/10072,10265,10393,10584/
      DATA FT(1628),FT(1629),FT(1630),FT(1631)/10646,10635,14489,10520/
      DATA FT(1632),FT(1633),FT(1634),FT(1635)/10582,10571,13081, 9241/
      DATA FT(1636),FT(1637),FT(1638),FT(1639)/13067, 9419,13771,10123/
      DATA FT(1640),FT(1641),FT(1642)/14475,10827,0/
      DATA FDT(1, 72),FDT(2, 72),FDT(3, 72)/110,22,1643/
      DATA FT(1643),FT(1644),FT(1645),FT(1646)/13273, 9163,13337, 9227/
      DATA FT(1647),FT(1648),FT(1649),FT(1650)/13334, 9368, 9561, 9689/
      DATA FT(1651),FT(1652),FT(1653),FT(1654)/ 9880, 9942, 9931,13785/
      DATA FT(1655),FT(1656),FT(1657),FT(1658)/ 9816, 9878, 9867,13081/
      DATA FT(1659),FT(1660),FT(1661),FT(1662)/ 9241,13067, 9419,13771/
      DATA FT(1663),FT(1664)/10123,0/
      DATA FDT(1, 73),FDT(2, 73),FDT(3, 73)/111,20,1665/
      DATA FT(1665),FT(1666),FT(1667),FT(1668)/13529, 9240, 9110, 9043/
      DATA FT(1669),FT(1670),FT(1671),FT(1672)/ 9041, 9102, 9228, 9419/
      DATA FT(1673),FT(1674),FT(1675),FT(1676)/ 9547, 9740, 9870, 9937/
      DATA FT(1677),FT(1678),FT(1679),FT(1680)/ 9939, 9878, 9752, 9561/
      DATA FT(1681),FT(1682),FT(1683),FT(1684)/ 9433,13529, 9304, 9174/
      DATA FT(1685),FT(1686),FT(1687),FT(1688)/ 9107, 9105, 9166, 9292/
      DATA FT(1689),FT(1690),FT(1691),FT(1692)/ 9419,13643, 9676, 9806/
      DATA FT(1693),FT(1694),FT(1695),FT(1696)/ 9873, 9875, 9814, 9688/
      DATA FT(1697),FT(1698)/ 9561,0/
      DATA FDT(1, 74),FDT(2, 74),FDT(3, 74)/112,21,1699/
      DATA FT(1699),FT(1700),FT(1701),FT(1702)/13273, 9156,13337, 9220/
      DATA FT(1703),FT(1704),FT(1705),FT(1706)/13334, 9368, 9497, 9625/
      DATA FT(1707),FT(1708),FT(1709),FT(1710)/ 9816, 9942,10003,10001/
      DATA FT(1711),FT(1712),FT(1713),FT(1714)/ 9934, 9804, 9611, 9483/
      DATA FT(1715),FT(1716),FT(1717),FT(1718)/ 9356, 9230,13721, 9752/
      DATA FT(1719),FT(1720),FT(1721),FT(1722)/ 9878, 9939, 9937, 9870/
      DATA FT(1723),FT(1724),FT(1725),FT(1726)/ 9740, 9611,13081, 9241/
      DATA FT(1727),FT(1728),FT(1729)/13060, 9412,0/
      DATA FDT(1, 75),FDT(2, 75),FDT(3, 75)/113,20,1730/
      DATA FT(1730),FT(1731),FT(1732),FT(1733)/13913, 9796,13977, 9860/
      DATA FT(1734),FT(1735),FT(1736),FT(1737)/13910, 9688, 9561, 9433/
      DATA FT(1738),FT(1739),FT(1740),FT(1741)/ 9240, 9110, 9043, 9041/
      DATA FT(1742),FT(1743),FT(1744),FT(1745)/ 9102, 9228, 9419, 9547/
      DATA FT(1746),FT(1747),FT(1748),FT(1749)/ 9676, 9806,13529, 9304/
      DATA FT(1750),FT(1751),FT(1752),FT(1753)/ 9174, 9107, 9105, 9166/
      DATA FT(1754),FT(1755),FT(1756),FT(1757)/ 9292, 9419,13700,10052/
      DATA FT(1758)/0/
      DATA FDT(1, 76),FDT(2, 76),FDT(3, 76)/114,17,1759/
      DATA FT(1759),FT(1760),FT(1761),FT(1762)/13273, 9163,13337, 9227/
      DATA FT(1763),FT(1764),FT(1765),FT(1766)/13331, 9302, 9432, 9561/
      DATA FT(1767),FT(1768),FT(1769),FT(1770)/ 9753, 9816, 9815, 9750/
      DATA FT(1771),FT(1772),FT(1773),FT(1774)/ 9687, 9752,13081, 9241/
      DATA FT(1775),FT(1776),FT(1777)/13067, 9419,0/
      DATA FDT(1, 77),FDT(2, 77),FDT(3, 77)/115,17,1778/
      DATA FT(1778),FT(1779),FT(1780),FT(1781)/13783, 9753, 9749, 9687/
      DATA FT(1782),FT(1783),FT(1784),FT(1785)/ 9624, 9497, 9241, 9112/
      DATA FT(1786),FT(1787),FT(1788),FT(1789)/ 9047, 9045, 9108, 9235/
      DATA FT(1790),FT(1791),FT(1792),FT(1793)/ 9553, 9680, 9743,13142/
      DATA FT(1794),FT(1795),FT(1796),FT(1797)/ 9109, 9236, 9554, 9681/
      DATA FT(1798),FT(1799),FT(1800),FT(1801)/ 9744, 9741, 9676, 9547/
      DATA FT(1802),FT(1803),FT(1804),FT(1805)/ 9291, 9164, 9101, 9039/
      DATA FT(1806),FT(1807),FT(1808)/ 9035, 9101,0/
      DATA FDT(1, 78),FDT(2, 78),FDT(3, 78)/116,15,1809/
      DATA FT(1809),FT(1810),FT(1811),FT(1812)/13280, 9167, 9228, 9355/
      DATA FT(1813),FT(1814),FT(1815),FT(1816)/ 9483, 9612, 9678,13344/
      DATA FT(1817),FT(1818),FT(1819),FT(1820)/ 9231, 9292, 9355,13081/
      DATA FT(1821),FT(1822)/ 9497,0/
      DATA FDT(1, 79),FDT(2, 79),FDT(3, 79)/117,22,1823/
      DATA FT(1823),FT(1824),FT(1825),FT(1826)/13273, 9166, 9228, 9419/
      DATA FT(1827),FT(1828),FT(1829),FT(1830)/ 9547, 9740, 9870,13337/
      DATA FT(1831),FT(1832),FT(1833),FT(1834)/ 9230, 9292, 9419,13977/
      DATA FT(1835),FT(1836),FT(1837),FT(1838)/ 9867,14041, 9931,13081/
      DATA FT(1839),FT(1840),FT(1841),FT(1842)/ 9241,13785, 9945,13963/
      DATA FT(1843),FT(1844)/10123,0/
      DATA FDT(1, 80),FDT(2, 80),FDT(3, 80)/118,18,1845/
      DATA FT(1845),FT(1846),FT(1847),FT(1848)/13145, 9419,13209, 9421/
      DATA FT(1849),FT(1850),FT(1851),FT(1852)/13913, 9419,13017, 9305/
      DATA FT(1853),FT(1854),FT(1855)/13657, 9945,0/
      DATA FDT(1, 81),FDT(2, 81),FDT(3, 81)/119,24,1856/
      DATA FT(1856),FT(1857),FT(1858),FT(1859)/13209, 9355,13273, 9358/
      DATA FT(1860),FT(1861),FT(1862),FT(1863)/13721, 9355,13721, 9867/
      DATA FT(1864),FT(1865),FT(1866),FT(1867)/13785, 9870,14233, 9867/
      DATA FT(1868),FT(1869),FT(1870),FT(1871)/13017, 9369,14041,10329/
      DATA FT(1872)/0/
      DATA FDT(1, 82),FDT(2, 82),FDT(3, 82)/120,20,1873/
      DATA FT(1873),FT(1874),FT(1875),FT(1876)/13209,9803,13273,9867/
      DATA FT(1877),FT(1878),FT(1879),FT(1880)/13977, 9099,13081, 9369/
      DATA FT(1881),FT(1882),FT(1883),FT(1884)/13721,10009,13067, 9355/
      DATA FT(1885),FT(1886),FT(1887)/13707, 9995,0/
      DATA FDT(1, 83),FDT(2, 83),FDT(3, 83)/121,19,1888/
      DATA FT(1888),FT(1889),FT(1890),FT(1891)/13209, 9483,13273, 9485/
      DATA FT(1892),FT(1893),FT(1894),FT(1895)/13977, 9483, 9351, 9221/
      DATA FT(1896),FT(1897),FT(1898),FT(1899)/ 9092, 9028, 8965, 9030/
      DATA FT(1900),FT(1901),FT(1902),FT(1903)/ 9093,13081, 9369,13721/
      DATA FT(1904),FT(1905)/10009,0/
      DATA FDT(1, 84),FDT(2, 84),FDT(3, 84)/122,18,1906/
      DATA FT(1906),FT(1907),FT(1908),FT(1909)/13849, 9035,13913, 9099/
      DATA FT(1910),FT(1911),FT(1912),FT(1913)/13209, 9045, 9049, 9817/
      DATA FT(1914),FT(1915),FT(1916),FT(1917)/13131, 9803, 9807, 9739/
      DATA FT(1918)/0/
      DATA FDT(1, 85),FDT(2, 85),FDT(3, 85)/123,14,1919/
      DATA FT(1919),FT(1920),FT(1921),FT(1922)/13540, 9315, 9250, 9184/
      DATA FT(1923),FT(1924),FT(1925),FT(1926)/ 9182, 9244, 9307, 9369/
      DATA FT(1927),FT(1928),FT(1929),FT(1930)/ 9367, 9237,13411, 9249/
      DATA FT(1931),FT(1932),FT(1933),FT(1934)/ 9247, 9309, 9372, 9434/
      DATA FT(1935),FT(1936),FT(1937),FT(1938)/ 9432, 9366, 9108, 9362/
      DATA FT(1939),FT(1940),FT(1941),FT(1942)/ 9424, 9422, 9356, 9291/
      DATA FT(1943),FT(1944),FT(1945),FT(1946)/ 9225, 9223, 9285,13331/
      DATA FT(1947),FT(1948),FT(1949),FT(1950)/ 9361, 9359, 9293, 9228/
      DATA FT(1951),FT(1952),FT(1953),FT(1954)/ 9162, 9160, 9222, 9285/
      DATA FT(1955),FT(1956)/ 9412,0/
      DATA FDT(1, 86),FDT(2, 86),FDT(3, 86)/125,14,1957/
      DATA FT(1957),FT(1958),FT(1959),FT(1960)/13284, 9315, 9378, 9440/
      DATA FT(1961),FT(1962),FT(1963),FT(1964)/ 9438, 9372, 9307, 9241/
      DATA FT(1965),FT(1966),FT(1967),FT(1968)/ 9239, 9365,13411, 9377/
      DATA FT(1969),FT(1970),FT(1971),FT(1972)/ 9375, 9309, 9244, 9178/
      DATA FT(1973),FT(1974),FT(1975),FT(1976)/ 9176, 9238, 9492, 9234/
      DATA FT(1977),FT(1978),FT(1979),FT(1980)/ 9168, 9166, 9228, 9291/
      DATA FT(1981),FT(1982),FT(1983),FT(1984)/ 9353, 9351, 9285,13459/
      DATA FT(1985),FT(1986),FT(1987),FT(1988)/ 9233, 9231, 9293, 9356/
      DATA FT(1989),FT(1990),FT(1991),FT(1992)/ 9418, 9416, 9350, 9285/
      DATA FT(1993),FT(1994)/ 9156,0/
      DATA FDT(1, 87),FDT(2, 87),FDT(3, 87)/126,24,1995/
      DATA FT(1995),FT(1996),FT(1997),FT(1998)/13137, 9043, 9110, 9239/
      DATA FT(1999),FT(2000),FT(2001),FT(2002)/ 9367, 9494, 9747, 9874/
      DATA FT(2003),FT(2004),FT(2005),FT(2006)/10002,10131,10197,13139/
      DATA FT(2007),FT(2008),FT(2009),FT(2010)/ 9109, 9238, 9366, 9493/
      DATA FT(2011),FT(2012),FT(2013),FT(2014)/ 9746, 9873,10001,10130/
      DATA FT(2015),FT(2016),FT(2017)/10197,10199,0/
      DATA FDT(1,88),FDT(2,88),FDT(3,88)/32,26,2018/
      DATA FT(2018)/0/
      DO 50 I=1,128
      TXFDT(1,I)=0
      TXFDT(2,I)=0
      TXFDT(3,I)=0
50    CONTINUE
      DO 100 I=1,FDTMAX
      J=FDT(1,I)
      TXFDT(1,J)=FDT(2,I)
      TXFDT(2,J)=FDT(3,I)
      TXFDT(3,J)=32
100   CONTINUE
      DO 200 I=1,FTMAX
      TXFTAB(I)=FT(I)
200   CONTINUE
      RETURN
      END
      SUBROUTINE GTXGF3
      COMMON /TXT/ TXPTR,TXCPX,TXCPY,TXCPZ,TXCTM,TXSIZX,TXSIZY,
     1     TXFONT,TXFTAB,TXFDT,TXFRAS,TXFRMX,TXWID,TXHGHT,
     2     TXCBXO,TXCBYO,TXFTXO,TXFTYO,TXCBMW,TXCBMH,
     3     TXSPRW,TXSPRH,TXRATH,TXRATW,TXSPVH,TXSPVW,TXCSET
      INTEGER TXPTR,TXFONT,TXFTAB(2200),TXFDT(3,128),TXFRAS(128),
     1     TXFRMX,TXWID,TXHGHT,
     2     TXCBXO,TXCBYO,TXFTXO,TXFTYO,TXCBMW,TXCBMH,
     3     TXSPRW,TXSPRH,TXRATH,TXRATW,TXSPVH,TXSPVW,TXCSET
      REAL TXCPX,TXCPY,TXCPZ,TXCTM(4,4),TXSIZX,TXSIZY
C     FT - LOCAL FONT TABLE
      INTEGER I,FTMAX,FT(2189),FDT(3,88),FDTMAX
      DATA FTMAX,FDTMAX/2189,88/
      DATA FDT(1,  1),FDT(2,  1),FDT(3,  1)/ 33,11,   1/
      DATA FT(   1),FT(   2),FT(   3),FT(   4)/13472, 9311, 9171,13471/
      DATA FT(   5),FT(   6),FT(   7),FT(   8)/ 9171,13472, 9439, 9171/
      DATA FT(   9),FT(  10),FT(  11),FT(  12)/13133, 8972, 9035, 9100/
      DATA FT(  13),FT(  14)/ 9037,0/
      DATA FDT(1,  2),FDT(2,  2),FDT(3,  2)/ 35,21,  15/
      DATA FT(  15),FT(  16),FT(  17),FT(  18)/13664, 9092,14048, 9476/
      DATA FT(  19),FT(  20),FT(  21),FT(  22)/13205,10005,13135, 9935/
      DATA FT(  23)/0/
      DATA FDT(1,  3),FDT(2,  3),FDT(3,  3)/ 36,21,  24/
      DATA FT(  24),FT(  25),FT(  26),FT(  27)/13732, 9095,14052, 9415/
      DATA FT(  28),FT(  29),FT(  30),FT(  31)/14108, 9947,10010,10075/
      DATA FT(  32),FT(  33),FT(  34),FT(  35)/10076,10014, 9951, 9760/
      DATA FT(  36),FT(  37),FT(  38),FT(  39)/ 9504, 9311, 9181, 9179/
      DATA FT(  40),FT(  41),FT(  42),FT(  43)/ 9241, 9304, 9748, 9874/
      DATA FT(  44),FT(  45),FT(  46),FT(  47)/13275, 9305, 9749, 9812/
      DATA FT(  48),FT(  49),FT(  50),FT(  51)/ 9874, 9871, 9805, 9740/
      DATA FT(  52),FT(  53),FT(  54),FT(  55)/ 9547, 9291, 9100, 9037/
      DATA FT(  56),FT(  57),FT(  58),FT(  59)/ 8975, 8976, 9041, 9104/
      DATA FT(  60),FT(  61)/ 9039,0/
      DATA FDT(1,4),FDT(2,4),FDT(3,4)/37,24,62/
      DATA FT(  62),FT(  63),FT(  64),FT(  65)/14304, 9035,13472, 9502/
      DATA FT(  66),FT(  67),FT(  68),FT(  69)/ 9500, 9434, 9305, 9177/
      DATA FT(  70),FT(  71),FT(  72),FT(  73)/ 9051, 9053, 9119, 9248/
      DATA FT(  74),FT(  75),FT(  76),FT(  77)/ 9376, 9503, 9694, 9886/
      DATA FT(  78),FT(  79),FT(  80),FT(  81)/10079,10208,14034, 9809/
      DATA FT(  82),FT(  83),FT(  84),FT(  85)/ 9743, 9741, 9867, 9995/
      DATA FT(  86),FT(  87),FT(  88),FT(  89)/10124,10190,10192,10066/
      DATA FT(  90),FT(  91)/ 9938,0/
      DATA FDT(1,  5),FDT(2,  5),FDT(3,  5)/ 38,25,  92/
      DATA FT(  92),FT(  93),FT(  94),FT(  95)/14296,10135,10198,10263/
      DATA FT(  96),FT(  97),FT(  98),FT(  99)/10264,10201,10137,10072/
      DATA FT( 100),FT( 101),FT( 102),FT( 103)/10006, 9873, 9742, 9612/
      DATA FT( 104),FT( 105),FT( 106),FT( 107)/ 9483, 9291, 9100, 9038/
      DATA FT( 108),FT( 109),FT( 110),FT( 111)/ 9041, 9107, 9495, 9625/
      DATA FT( 112),FT( 113),FT( 114),FT( 115)/ 9691, 9693, 9631, 9504/
      DATA FT( 116),FT( 117),FT( 118),FT( 119)/ 9375, 9309, 9307, 9368/
      DATA FT( 120),FT( 121),FT( 122),FT( 123)/ 9493, 9806, 9932,10123/
      DATA FT( 124),FT( 125),FT( 126),FT( 127)/10187,10252,10253,13387/
      DATA FT( 128),FT( 129),FT( 130),FT( 131)/ 9164, 9102, 9105, 9171/
      DATA FT( 132),FT( 133),FT( 134),FT( 135)/ 9301,13403, 9369, 9870/
      DATA FT( 136),FT( 137),FT( 138)/ 9996,10123,0/
      DATA FDT(1,  6),FDT(2,  6),FDT(3,  6)/ 40,15, 139/
      DATA FT( 139),FT( 140),FT( 141),FT( 142)/13924, 9569, 9374, 9243/
      DATA FT( 143),FT( 144),FT( 145),FT( 146)/ 9111, 9042, 9038, 9097/
      DATA FT( 147),FT( 148),FT( 149),FT( 150)/ 9158, 9220,13665, 9373/
      DATA FT( 151),FT( 152),FT( 153),FT( 154)/ 9241, 9174, 9105, 9100/
      DATA FT( 155),FT( 156),FT( 157)/ 9159, 9220,0/
      DATA FDT(1,  7),FDT(2,  7),FDT(3,  7)/ 41,15, 158/
      DATA FT( 158),FT( 159),FT( 160),FT( 161)/13540, 9506, 9567, 9626/
      DATA FT( 162),FT( 163),FT( 164),FT( 165)/ 9622, 9553, 9421, 9290/
      DATA FT( 166),FT( 167),FT( 168),FT( 169)/ 9095, 8836,13540, 9505/
      DATA FT( 170),FT( 171),FT( 172),FT( 173)/ 9564, 9559, 9490, 9423/
      DATA FT( 174),FT( 175),FT( 176)/ 9291, 9095,0/
      DATA FDT(1,  8),FDT(2,  8),FDT(3,  8)/ 42,17, 177/
      DATA FT( 177),FT( 178),FT( 179),FT( 180)/13600, 9492,13277, 9815/
      DATA FT( 181),FT( 182),FT( 183)/13917, 9175,0/
      DATA FDT(1,  9),FDT(2,  9),FDT(3,  9)/ 43,26, 184/
      DATA FT( 184),FT( 185),FT( 186),FT( 187)/13789, 9675,13204,10260/
      DATA FT( 188)/0/
      DATA FDT(1, 10),FDT(2, 10),FDT(3, 10)/ 44,11, 189/
      DATA FT( 189),FT( 190),FT( 191),FT( 192)/13131, 8972, 9037, 9100/
      DATA FT( 193),FT( 194),FT( 195),FT( 196)/ 9099, 9033, 8903,0/
      DATA FDT(1, 11),FDT(2, 11),FDT(3, 11)/ 45,26, 197/
      DATA FT( 197),FT( 198),FT( 199)/13204,10260,0/
      DATA FDT(1, 12),FDT(2, 12),FDT(3, 12)/ 46,11, 200/
      DATA FT( 200),FT( 201),FT( 202),FT( 203)/13133, 8972, 9035, 9100/
      DATA FT( 204),FT( 205)/ 9037,0/
      DATA FDT(1, 13),FDT(2, 13),FDT(3, 13)/ 47,22, 206/
      DATA FT( 206),FT( 207),FT( 208)/14500, 8708,0/
      DATA FDT(1, 14),FDT(2, 14),FDT(3, 14)/ 48,21, 209/
      DATA FT( 209),FT( 210),FT( 211),FT( 212)/13728, 9439, 9309, 9178/
      DATA FT( 213),FT( 214),FT( 215),FT( 216)/ 9111, 9043, 9040, 9101/
      DATA FT( 217),FT( 218),FT( 219),FT( 220)/ 9164, 9291, 9419, 9612/
      DATA FT( 221),FT( 222),FT( 223),FT( 224)/ 9742, 9873, 9940,10008/
      DATA FT(225),FT(226),FT(227),FT(228)/10011,9950,9887,9760/
      DATA FT( 229),FT( 230),FT( 231),FT( 232)/ 9632,13728, 9503, 9373/
      DATA FT( 233),FT( 234),FT( 235),FT( 236)/ 9242, 9175, 9107, 9104/
      DATA FT( 237),FT( 238),FT( 239),FT( 240)/ 9165, 9291,13515, 9548/
      DATA FT( 241),FT( 242),FT( 243),FT( 244)/ 9678, 9809, 9876, 9944/
      DATA FT( 245),FT( 246),FT( 247),FT( 248)/ 9947, 9886, 9760,0/
      DATA FDT(1, 15),FDT(2, 15),FDT(3, 15)/ 49,21, 249/
      DATA FT( 249),FT( 250),FT( 251),FT( 252)/13724, 9291,13856, 9355/
      DATA FT( 253),FT( 254),FT( 255),FT( 256)/13856, 9565, 9371, 9242/
      DATA FT( 257),FT( 258),FT( 259),FT( 260)/13789, 9435, 9242,0/
      DATA FDT(1, 16),FDT(2, 16),FDT(3, 16)/ 50,21, 261/
      DATA FT( 261),FT( 262),FT( 263),FT( 264)/13404, 9371, 9306, 9243/
      DATA FT( 265),FT( 266),FT( 267),FT( 268)/ 9244, 9310, 9375, 9568/
      DATA FT( 269),FT( 270),FT( 271),FT( 272)/ 9760, 9951,10013,10011/
      DATA FT( 273),FT( 274),FT( 275),FT( 276)/ 9945, 9815, 9621, 9363/
      DATA FT( 277),FT( 278),FT( 279),FT( 280)/ 9169, 9039, 8907,13856/
      DATA FT( 281),FT( 282),FT( 283),FT( 284)/ 9887, 9949, 9947, 9881/
      DATA FT( 285),FT( 286),FT( 287),FT( 288)/ 9751, 9363,13069, 9038/
      DATA FT( 289),FT( 290),FT( 291),FT( 292)/ 9166, 9484, 9676, 9805/
      DATA FT( 293),FT( 294),FT( 295),FT( 296)/ 9871,13262, 9483, 9675/
      DATA FT( 297),FT( 298),FT( 299)/ 9804, 9871,0/
      DATA FDT(1, 17),FDT(2, 17),FDT(3, 17)/ 51,21, 300/
      DATA FT( 300),FT( 301),FT( 302),FT( 303)/13404, 9371, 9306, 9243/
      DATA FT( 304),FT( 305),FT( 306),FT( 307)/ 9244, 9310, 9375, 9568/
      DATA FT( 308),FT( 309),FT( 310),FT( 311)/ 9760, 9951,10013,10011/
      DATA FT( 312),FT( 313),FT( 314),FT( 315)/ 9945, 9751, 9558,13856/
      DATA FT( 316),FT( 317),FT( 318),FT( 319)/ 9887, 9949, 9947, 9881/
      DATA FT( 320),FT( 321),FT( 322),FT( 323)/ 9751,13526, 9558, 9749/
      DATA FT( 324),FT( 325),FT( 326),FT( 327)/ 9812, 9874, 9871, 9805/
      DATA FT( 328),FT( 329),FT( 330),FT( 331)/ 9740, 9547, 9291, 9100/
      DATA FT( 332),FT( 333),FT( 334),FT( 335)/ 9037, 8975, 8976, 9041/
      DATA FT( 336),FT( 337),FT( 338),FT( 339)/ 9104, 9039,13654, 9685/
      DATA FT( 340),FT( 341),FT( 342),FT( 343)/ 9748, 9810, 9807, 9741/
      DATA FT( 344),FT( 345),FT( 346)/ 9676, 9547,0/
      DATA FDT(1, 18),FDT(2, 18),FDT(3, 18)/ 52,21, 347/
      DATA FT( 347),FT( 348),FT( 349),FT( 350)/13983, 9483,14048, 9547/
      DATA FT( 351),FT( 352),FT( 353),FT( 354)/14048, 8977,10001,0/
      DATA FDT(1, 19),FDT(2, 19),FDT(3, 19)/ 53,21, 355/
      DATA FT( 355),FT( 356),FT( 357),FT( 358)/13536, 9110,13536,10080/
      DATA FT( 359),FT( 360),FT( 361),FT( 362)/13535, 9759,10080,13206/
      DATA FT( 363),FT( 364),FT( 365),FT( 366)/ 9175, 9368, 9560, 9751/
      DATA FT( 367),FT( 368),FT( 369),FT( 370)/ 9814, 9876, 9873, 9806/
      DATA FT( 371),FT( 372),FT( 373),FT( 374)/ 9676, 9483, 9291, 9100/
      DATA FT( 375),FT( 376),FT( 377),FT( 378)/ 9037, 8975, 8976, 9041/
      DATA FT( 379),FT( 380),FT( 381),FT( 382)/ 9104, 9039,13656, 9687/
      DATA FT( 383),FT( 384),FT( 385),FT( 386)/ 9750, 9812, 9809, 9742/
      DATA FT( 387),FT( 388),FT( 389)/ 9612, 9483,0/
      DATA FDT(1, 20),FDT(2, 20),FDT(3, 20)/ 54,21, 390/
      DATA FT( 390),FT( 391),FT( 392),FT( 393)/14045, 9884, 9947,10012/
      DATA FT( 394),FT( 395),FT( 396),FT( 397)/10013, 9951, 9824, 9632/
      DATA FT( 398),FT( 399),FT( 400),FT( 401)/ 9439, 9309, 9178, 9111/
      DATA FT( 402),FT( 403),FT( 404),FT( 405)/ 9043, 9039, 9101, 9164/
      DATA FT( 406),FT( 407),FT( 408),FT( 409)/ 9291, 9483, 9676, 9806/
      DATA FT( 410),FT( 411),FT( 412),FT( 413)/ 9872, 9875, 9813, 9750/
      DATA FT( 414),FT( 415),FT( 416),FT( 417)/ 9623, 9431, 9302, 9172/
      DATA FT( 418),FT( 419),FT( 420),FT( 421)/ 9106,13728, 9503, 9373/
      DATA FT( 422),FT( 423),FT( 424),FT( 425)/ 9242, 9175, 9107, 9102/
      DATA FT( 426),FT( 427),FT( 428),FT( 429)/ 9164,13579, 9612, 9742/
      DATA FT( 430),FT( 431),FT( 432),FT( 433)/ 9808, 9812, 9750,0/
      DATA FDT(1, 21),FDT(2, 21),FDT(3, 21)/ 55,21, 434/
      DATA FT( 434),FT( 435),FT( 436),FT( 437)/13344, 9114,14176,10013/
      DATA FT( 438),FT( 439),FT( 440),FT( 441)/ 9882, 9556, 9425, 9359/
      DATA FT( 442),FT( 443),FT( 444),FT( 445)/ 9291,13978, 9492, 9361/
      DATA FT( 446),FT( 447),FT( 448),FT( 449)/ 9295, 9227,13277, 9376/
      DATA FT( 450),FT( 451),FT( 452),FT( 453)/ 9504, 9821,13342, 9375/
      DATA FT( 454),FT( 455),FT( 456),FT( 457)/ 9503, 9821, 9949,10014/
      DATA FT( 458),FT( 459)/10080,0/
      DATA FDT(1, 22),FDT(2, 22),FDT(3, 22)/ 56,21, 460/
      DATA FT( 460),FT( 461),FT( 462),FT( 463)/13664, 9375, 9310, 9244/
      DATA FT( 464),FT( 465),FT( 466),FT( 467)/ 9241, 9303, 9430, 9622/
      DATA FT( 468),FT( 469),FT( 470),FT( 471)/ 9879, 9944,10010,10013/
      DATA FT( 472),FT( 473),FT( 474),FT( 475)/ 9951, 9760, 9568,13664/
      DATA FT( 476),FT( 477),FT( 478),FT( 479)/ 9439, 9374, 9308, 9305/
      DATA FT( 480),FT( 481),FT( 482),FT( 483)/ 9367, 9430,13718, 9815/
      DATA FT( 484),FT( 485),FT( 486),FT( 487)/ 9880, 9946, 9949, 9887/
      DATA FT( 488),FT( 489),FT( 490),FT( 491)/ 9760,13526, 9173, 9043/
      DATA FT( 492),FT( 493),FT( 494),FT( 495)/ 8977, 8974, 9036, 9227/
      DATA FT( 496),FT( 497),FT( 498),FT( 499)/ 9483, 9740, 9805, 9871/
      DATA FT( 500),FT( 501),FT( 502),FT( 503)/ 9874, 9812, 9749, 9622/
      DATA FT( 504),FT( 505),FT( 506),FT( 507)/13526, 9237, 9107, 9041/
      DATA FT( 508),FT( 509),FT( 510),FT( 511)/ 9038, 9100, 9227,13579/
      DATA FT( 512),FT( 513),FT( 514),FT( 515)/ 9676, 9741, 9807, 9811/
      DATA FT( 516),FT( 517)/ 9749,0/
      DATA FDT(1, 23),FDT(2, 23),FDT(3, 23)/ 57,21, 518/
      DATA FT( 518),FT( 519),FT( 520),FT( 521)/14041, 9879, 9749, 9620/
      DATA FT( 522),FT( 523),FT( 524),FT( 525)/ 9428, 9301, 9238, 9176/
      DATA FT( 526),FT( 527),FT( 528),FT( 529)/ 9179, 9245, 9375, 9568/
      DATA FT( 530),FT( 531),FT( 532),FT( 533)/ 9760, 9887, 9950,10012/
      DATA FT( 534),FT( 535),FT( 536),FT( 537)/10008, 9940, 9873, 9742/
      DATA FT( 538),FT( 539),FT( 540),FT( 541)/ 9612, 9419, 9227, 9100/
      DATA FT( 542),FT( 543),FT( 544),FT( 545)/ 9038, 9039, 9104, 9167/
      DATA FT(546),FT(547),FT(548),FT(549)/ 9102,13397, 9239, 9243/
      DATA FT( 550),FT( 551),FT( 552),FT( 553)/ 9309, 9439, 9568,13983/
      DATA FT( 554),FT( 555),FT( 556),FT( 557)/ 9949, 9944, 9876, 9809/
      DATA FT( 558),FT( 559),FT( 560),FT( 561)/ 9678, 9548, 9419,0/
      DATA FDT(1, 24),FDT(2, 24),FDT(3, 24)/ 58,11, 562/
      DATA FT( 562),FT( 563),FT( 564),FT( 565)/13337, 9176, 9239, 9304/
      DATA FT( 566),FT( 567),FT( 568),FT( 569)/ 9241,13133, 8972, 9035/
      DATA FT( 570),FT( 571)/ 9100,0/
      DATA FDT(1, 25),FDT(2, 25),FDT(3, 25)/ 59,11, 572/
      DATA FT( 572),FT( 573),FT( 574),FT( 575)/13337, 9176, 9239, 9304/
      DATA FT( 576),FT( 577),FT( 578),FT( 579)/ 9241,13131, 8972, 9037/
      DATA FT( 580),FT( 581),FT( 582),FT( 583)/ 9100, 9099, 9033, 8903/
      DATA FT( 584)/0/
      DATA FDT(1, 26),FDT(2, 26),FDT(3, 26)/ 60,24, 585/
      DATA FT( 585),FT( 586),FT( 587),FT( 588)/14237, 9108,10123,0/
      DATA FDT(1, 27),FDT(2, 27),FDT(3, 27)/ 61,26, 589/
      DATA FT( 589),FT( 590),FT( 591),FT( 592)/13207,10263,13201,10257/
      DATA FT( 593)/0/
      DATA FDT(1, 28),FDT(2, 28),FDT(3, 28)/ 62,24, 594/
      DATA FT( 594),FT( 595),FT( 596),FT( 597)/13213,10132, 9099,0/
      DATA FDT(1, 29),FDT(2, 29),FDT(3, 29)/ 63,21, 598/
      DATA FT( 598),FT( 599),FT( 600),FT( 601)/13404, 9371, 9306, 9243/
      DATA FT( 602),FT( 603),FT( 604),FT( 605)/ 9244, 9310, 9375, 9568/
      DATA FT( 606),FT( 607),FT( 608),FT( 609)/ 9824,10015,10077,10075/
      DATA FT( 610),FT( 611),FT( 612),FT( 613)/10009, 9944, 9558, 9429/
      DATA FT( 614),FT( 615),FT( 616),FT( 617)/ 9427, 9490, 9618,13920/
      DATA FT( 618),FT( 619),FT( 620),FT( 621)/ 9951,10013,10011, 9945/
      DATA FT( 622),FT( 623),FT( 624),FT( 625)/ 9880, 9751,13453, 9292/
      DATA FT( 626),FT( 627),FT( 628),FT( 629)/ 9355, 9420, 9357,0/
      DATA FDT(1, 30),FDT(2, 30),FDT(3, 30)/ 64,27, 630/
      DATA FT( 630),FT( 631),FT( 632),FT( 633)/14104, 9946, 9819, 9627/
      DATA FT( 634),FT( 635),FT( 636),FT( 637)/ 9498, 9433, 9366, 9363/
      DATA FT( 638),FT( 639),FT( 640),FT( 641)/ 9425, 9552, 9744, 9873/
      DATA FT( 642),FT( 643),FT( 644),FT( 645)/ 9939,13723, 9497, 9430/
      DATA FT( 646),FT( 647),FT( 648),FT( 649)/ 9427, 9489, 9552,14107/
      DATA FT( 650),FT( 651),FT( 652),FT( 653)/ 9939, 9937,10064,10192/
      DATA FT( 654),FT( 655),FT( 656),FT( 657)/10322,10389,10391,10330/
      DATA FT( 658),FT( 659),FT( 660),FT( 661)/10268,10142,10015, 9824/
      DATA FT( 662),FT( 663),FT( 664),FT( 665)/ 9632, 9439, 9310, 9180/
      DATA FT( 666),FT( 667),FT( 668),FT( 669)/ 9114, 9047, 9044, 9105/
      DATA FT( 670),FT( 671),FT( 672),FT( 673)/ 9167, 9293, 9420, 9611/
      DATA FT( 674),FT( 675),FT( 676),FT( 677)/ 9803, 9996,10125,10190/
      DATA FT( 678),FT( 679),FT( 680),FT( 681)/14171,10003,10001,10064/
      DATA FT( 682)/0/
      DATA FDT(1, 31),FDT(2, 31),FDT(3, 31)/ 65,20, 683/
      DATA FT( 683),FT( 684),FT( 685),FT( 686)/13792, 8843,13792, 9739/
      DATA FT( 687),FT( 688),FT( 689),FT( 690)/13726, 9675,13201, 9681/
      DATA FT( 691),FT( 692),FT( 693),FT( 694)/12811, 9099,13579, 9867/
      DATA FT( 695)/0/
      DATA FDT(1, 32),FDT(2, 32),FDT(3, 32)/ 66,24, 696/
      DATA FT( 696),FT( 697),FT( 698),FT( 699)/13536, 9035,13600, 9099/
      DATA FT( 700),FT( 701),FT( 702),FT( 703)/13344, 9952,10143,10205/
      DATA FT( 704),FT( 705),FT( 706),FT( 707)/10203,10136,10071, 9878/
      DATA FT( 708),FT( 709),FT( 710),FT( 711)/14048,10079,10141,10139/
      DATA FT( 712),FT( 713),FT( 714),FT( 715)/10072,10007, 9878,13398/
      DATA FT( 716),FT( 717),FT( 718),FT( 719)/ 9878,10005,10067,10065/
      DATA FT( 720),FT( 721),FT( 722),FT( 723)/ 9998, 9868, 9611, 8843/
      DATA FT( 724),FT( 725),FT( 726),FT( 727)/13974, 9941,10003,10001/
      DATA FT( 728),FT( 729),FT( 730),FT( 731)/ 9934, 9804, 9611,0/
      DATA FDT(1, 33),FDT(2, 33),FDT(3, 33)/ 67,21, 732/
      DATA FT( 732),FT( 733),FT( 734),FT( 735)/14110,10078,10144,10074/
      DATA FT( 736),FT( 737),FT( 738),FT( 739)/10076,10014, 9951, 9824/
      DATA FT( 740),FT( 741),FT( 742),FT( 743)/ 9632, 9439, 9309, 9178/
      DATA FT( 744),FT( 745),FT( 746),FT( 747)/ 9111, 9043, 9040, 9101/
      DATA FT( 748),FT( 749),FT( 750),FT( 751)/ 9164, 9355, 9547, 9676/
      DATA FT( 752),FT( 753),FT( 754),FT( 755)/ 9806, 9872,13728, 9503/
      DATA FT( 756),FT( 757),FT( 758),FT( 759)/ 9373, 9242, 9175, 9107/
      DATA FT( 760),FT( 761),FT( 762),FT( 763)/ 9104, 9165, 9228, 9355/
      DATA FT( 764)/0/
      DATA FDT(1, 34),FDT(2, 34),FDT(3, 34)/ 68,23, 765/
      DATA FT( 765),FT( 766),FT( 767),FT( 768)/13536, 9035,13600, 9099/
      DATA FT( 769),FT( 770),FT( 771),FT( 772)/13344, 9824,10015,10078/
      DATA FT( 773),FT( 774),FT( 775),FT( 776)/10139,10135,10067, 9935/
      DATA FT( 777),FT( 778),FT( 779),FT( 780)/ 9805, 9676, 9419, 8843/
      DATA FT( 781),FT( 782),FT( 783),FT( 784)/13920, 9951,10014,10075/
      DATA FT( 785),FT( 786),FT( 787),FT( 788)/10071,10003, 9871, 9741/
      DATA FT( 789),FT( 790),FT( 791)/ 9612, 9419,0/
      DATA FDT(1, 35),FDT(2, 35),FDT(3, 35)/ 69,23, 792/
      DATA FT( 792),FT( 793),FT( 794),FT( 795)/13536, 9035,13600, 9099/
      DATA FT( 796),FT( 797),FT( 798),FT( 799)/13850, 9618,13344,10208/
      DATA FT( 800),FT( 801),FT( 802),FT( 803)/10138,10144,13398, 9686/
      DATA FT( 804),FT( 805),FT( 806),FT( 807)/12939, 9803, 9936, 9739/
      DATA FT( 808)/0/
      DATA FDT(1, 36),FDT(2, 36),FDT(3, 36)/ 70,22, 809/
      DATA FT( 809),FT( 810),FT( 811),FT( 812)/13536, 9035,13600, 9099/
      DATA FT( 813),FT( 814),FT( 815),FT( 816)/13850, 9618,13344,10208/
      DATA FT( 817),FT( 818),FT( 819),FT( 820)/10138,10144,13398, 9686/
      DATA FT( 821),FT( 822),FT( 823)/12939, 9291,0/
      DATA FDT(1, 37),FDT(2, 37),FDT(3, 37)/ 71,22, 824/
      DATA FT( 824),FT( 825),FT( 826),FT( 827)/14110,10078,10144,10074/
      DATA FT( 828),FT( 829),FT( 830),FT( 831)/10076,10014, 9951, 9824/
      DATA FT( 832),FT( 833),FT( 834),FT( 835)/ 9632, 9439, 9309, 9178/
      DATA FT( 836),FT( 837),FT( 838),FT( 839)/ 9111, 9043, 9040, 9101/
      DATA FT( 840),FT( 841),FT( 842),FT( 843)/ 9164, 9355, 9483, 9676/
      DATA FT( 844),FT( 845),FT( 846),FT( 847)/ 9806, 9938,13728, 9503/
      DATA FT( 848),FT( 849),FT( 850),FT( 851)/ 9373, 9242, 9175, 9107/
      DATA FT( 852),FT( 853),FT( 854),FT( 855)/ 9104, 9165, 9228, 9355/
      DATA FT( 856),FT( 857),FT( 858),FT( 859)/13579, 9612, 9742, 9874/
      DATA FT( 860),FT( 861),FT( 862)/13778,10130,0/
      DATA FDT(1, 38),FDT(2, 38),FDT(3, 38)/ 72,26, 863/
      DATA FT( 863),FT( 864),FT( 865),FT( 866)/13536, 9035,13600, 9099/
      DATA FT( 867),FT( 868),FT( 869),FT( 870)/14368, 9867,14432, 9931/
      DATA FT( 871),FT( 872),FT( 873),FT( 874)/13344, 9696,14176,10528/
      DATA FT( 875),FT( 876),FT( 877),FT( 878)/13398,10070,12939, 9291/
      DATA FT( 879),FT( 880),FT( 881)/13771,10123,0/
      DATA FDT(1, 39),FDT(2, 39),FDT(3, 39)/ 73,13, 882/
      DATA FT( 882),FT( 883),FT( 884),FT( 885)/13536, 9035,13600, 9099/
      DATA FT( 886),FT( 887),FT( 888),FT( 889)/13344, 9696,12939, 9291/
      DATA FT( 890)/0/
      DATA FDT(1, 40),FDT(2, 40),FDT(3, 40)/ 74,18, 891/
      DATA FT( 891),FT( 892),FT( 893),FT( 894)/13920, 9487, 9421, 9356/
      DATA FT( 895),FT( 896),FT( 897),FT( 898)/ 9227, 9099, 8972, 8910/
      DATA FT( 899),FT( 900),FT( 901),FT( 902)/ 8912, 8977, 9040, 8975/
      DATA FT( 903),FT( 904),FT( 905),FT( 906)/13856, 9423, 9357, 9227/
      DATA FT( 907),FT( 908),FT( 909)/13664,10016,0/
      DATA FDT(1, 41),FDT(2, 41),FDT(3, 41)/ 75,23, 910/
      DATA FT( 910),FT( 911),FT( 912),FT( 913)/13536, 9035,13600, 9099/
      DATA FT( 914),FT( 915),FT( 916),FT( 917)/14432, 9235,13783, 9931/
      DATA FT( 918),FT( 919),FT( 920),FT( 921)/13719, 9867,13344, 9696/
      DATA FT( 922),FT( 923),FT( 924),FT( 925)/14176,10464,12939, 9291/
      DATA FT( 926),FT( 927),FT( 928)/13771,10059,0/
      DATA FDT(1, 42),FDT(2, 42),FDT(3, 42)/ 76,20, 929/
      DATA FT( 929),FT( 930),FT( 931),FT( 932)/13536, 9035,13600, 9099/
      DATA FT( 933),FT( 934),FT( 935),FT( 936)/13344, 9696,12939, 9803/
      DATA FT( 937),FT( 938),FT( 939)/ 9937, 9739,0/
      DATA FDT(1, 43),FDT(2, 43),FDT(3, 43)/ 77,27, 940/
      DATA FT( 940),FT( 941),FT( 942),FT( 943)/13536, 9035,13536, 9483/
      DATA FT( 944),FT( 945),FT( 946),FT( 947)/13600, 9549,14432, 9483/
      DATA FT( 948),FT( 949),FT( 950),FT( 951)/14432, 9931,14496, 9995/
      DATA FT( 952),FT( 953),FT( 954),FT( 955)/13344, 9504,14432,10592/
      DATA FT( 956),FT( 957),FT( 958),FT( 959)/12939, 9227,13835,10187/
      DATA FT( 960)/0/
      DATA FDT(1, 44),FDT(2, 44),FDT(3, 44)/ 78,25, 961/
      DATA FT( 961),FT( 962),FT( 963),FT( 964)/13536, 9035,13536, 9870/
      DATA FT( 965),FT( 966),FT( 967),FT( 968)/13533, 9867,14368, 9867/
      DATA FT( 969),FT( 970),FT( 971),FT( 972)/13344, 9440,14176,10464/
      DATA FT( 973),FT( 974),FT( 975)/12939, 9227,0/
      DATA FDT(1, 45),FDT(2, 45),FDT(3, 45)/ 79,22, 976/
      DATA FT( 976),FT( 977),FT( 978),FT( 979)/13728, 9439, 9309, 9178/
      DATA FT( 980),FT( 981),FT( 982),FT( 983)/ 9111, 9043, 9040, 9101/
      DATA FT( 984),FT( 985),FT( 986),FT( 987)/ 9164, 9291, 9483, 9676/
      DATA FT( 988),FT( 989),FT( 990),FT( 991)/ 9806, 9937,10004,10072/
      DATA FT( 992),FT( 993),FT( 994),FT( 995)/10075,10014, 9951, 9824/
      DATA FT( 996),FT( 997),FT( 998),FT( 999)/ 9632,13728, 9503, 9373/
      DATA FT(1000),FT(1001),FT(1002),FT(1003)/ 9242, 9175, 9107, 9104/
      DATA FT(1004),FT(1005),FT(1006),FT(1007)/ 9165, 9291,13579, 9612/
      DATA FT(1008),FT(1009),FT(1010),FT(1011)/ 9742, 9873, 9940,10008/
      DATA FT(1012),FT(1013),FT(1014),FT(1015)/10011, 9950, 9824,0/
      DATA FDT(1, 46),FDT(2, 46),FDT(3, 46)/ 80,23,1016/
      DATA FT(1016),FT(1017),FT(1018),FT(1019)/13536, 9035,13600, 9099/
      DATA FT(1020),FT(1021),FT(1022),FT(1023)/13344,10016,10207,10269/
      DATA FT(1024),FT(1025),FT(1026),FT(1027)/10267,10200,10070, 9813/
      DATA FT(1028),FT(1029),FT(1030),FT(1031)/ 9301,14112,10143,10205/
      DATA FT(1032),FT(1033),FT(1034),FT(1035)/10203,10136,10006, 9813/
      DATA FT(1036),FT(1037),FT(1038)/12939, 9291,0/
      DATA FDT(1, 47),FDT(2, 47),FDT(3, 47)/ 81,22,1039/
      DATA FT(1039),FT(1040),FT(1041),FT(1042)/13728, 9439, 9309, 9178/
      DATA FT(1043),FT(1044),FT(1045),FT(1046)/ 9111, 9043, 9040, 9101/
      DATA FT(1047),FT(1048),FT(1049),FT(1050)/ 9164, 9291, 9483, 9676/
      DATA FT(1051),FT(1052),FT(1053),FT(1054)/ 9806, 9937,10004,10072/
      DATA FT(1055),FT(1056),FT(1057),FT(1058)/10075,10014, 9951, 9824/
      DATA FT(1059),FT(1060),FT(1061),FT(1062)/ 9632,13728, 9503, 9373/
      DATA FT(1063),FT(1064),FT(1065),FT(1066)/ 9242, 9175, 9107, 9104/
      DATA FT(1067),FT(1068),FT(1069),FT(1070)/ 9165, 9291,13579, 9612/
      DATA FT(1071),FT(1072),FT(1073),FT(1074)/ 9742, 9873, 9940,10008/
      DATA FT(1075),FT(1076),FT(1077),FT(1078)/10011, 9950, 9824,13261/
      DATA FT(1079),FT(1080),FT(1081),FT(1082)/ 9166, 9232, 9361, 9425/
      DATA FT(1083),FT(1084),FT(1085),FT(1086)/ 9552, 9614, 9607, 9670/
      DATA FT(1087),FT(1088),FT(1089),FT(1090)/ 9798, 9864, 9865,13710/
      DATA FT(1091),FT(1092),FT(1093),FT(1094)/ 9672, 9735, 9799, 9864/
      DATA FT(1095)/0/
      DATA FDT(1, 48),FDT(2, 48),FDT(3, 48)/ 82,24,1096/
      DATA FT(1096),FT(1097),FT(1098),FT(1099)/13536, 9035,13600, 9099/
      DATA FT(1100),FT(1101),FT(1102),FT(1103)/13344, 9952,10143,10205/
      DATA FT(1104),FT(1105),FT(1106),FT(1107)/10203,10136,10071, 9878/
      DATA FT(1108),FT(1109),FT(1110),FT(1111)/ 9302,14048,10079,10141/
      DATA FT(1112),FT(1113),FT(1114),FT(1115)/10139,10072,10007, 9878/
      DATA FT(1116),FT(1117),FT(1118),FT(1119)/13718, 9749, 9812, 9868/
      DATA FT(1120),FT(1121),FT(1122),FT(1123)/ 9931,10059,10125,10126/
      DATA FT(1124),FT(1125),FT(1126),FT(1127)/13908, 9933, 9996,10060/
      DATA FT(1128),FT(1129),FT(1130),FT(1131)/10125,12939, 9291,0/
      DATA FDT(1, 49),FDT(2, 49),FDT(3, 49)/ 83,23,1132/
      DATA FT(1132),FT(1133),FT(1134),FT(1135)/14174,10142,10208,10138/
      DATA FT(1136),FT(1137),FT(1138),FT(1139)/10140,10078,10015, 9824/
      DATA FT(1140),FT(1141),FT(1142),FT(1143)/ 9568, 9375, 9245, 9243/
      DATA FT(1144),FT(1145),FT(1146),FT(1147)/ 9305, 9368, 9812, 9938/
      DATA FT(1148),FT(1149),FT(1150),FT(1151)/13339, 9369, 9813, 9876/
      DATA FT(1152),FT(1153),FT(1154),FT(1155)/ 9938, 9935, 9869, 9804/
      DATA FT(1156),FT(1157),FT(1158),FT(1159)/ 9611, 9355, 9164, 9101/
      DATA FT(1160),FT(1161),FT(1162),FT(1163)/ 9039, 9041, 8971, 9037/
      DATA FT(1164),FT(1165)/ 9101,0/
      DATA FDT(1, 50),FDT(2, 50),FDT(3, 50)/ 84,21,1166/
      DATA FT(1166),FT(1167),FT(1168),FT(1169)/13792, 9291,13856, 9355/
      DATA FT(1170),FT(1171),FT(1172),FT(1173)/13408, 9114, 9248,10208/
      DATA FT(1174),FT(1175),FT(1176),FT(1177)/10138,10144,13195, 9547/
      DATA FT(1178)/0/
      DATA FDT(1, 51),FDT(2, 51),FDT(3, 51)/ 85,25,1179/
      DATA FT(1179),FT(1180),FT(1181),FT(1182)/13472, 9173, 9105, 9102/
      DATA FT(1183),FT(1184),FT(1185),FT(1186)/ 9164, 9355, 9611, 9804/
      DATA FT(1187),FT(1188),FT(1189),FT(1190)/ 9934,10001,10272,13536/
      DATA FT(1191),FT(1192),FT(1193),FT(1194)/ 9237, 9169, 9166, 9228/
      DATA FT(1195),FT(1196),FT(1197),FT(1198)/ 9355,13280, 9632,14176/
      DATA FT(1199),FT(1200)/10464,0/
      DATA FDT(1, 52),FDT(2, 52),FDT(3, 52)/ 86,20,1201/
      DATA FT(1201),FT(1202),FT(1203),FT(1204)/13344, 9291,13408, 9357/
      DATA FT(1205),FT(1206),FT(1207),FT(1208)/14240, 9291,13216, 9504/
      DATA FT(1209),FT(1210),FT(1211)/13984,10272,0/
      DATA FDT(1, 53),FDT(2, 53),FDT(3, 53)/ 87,26,1212/
      DATA FT(1212),FT(1213),FT(1214),FT(1215)/13472, 9227,13536, 9293/
      DATA FT(1216),FT(1217),FT(1218),FT(1219)/13984, 9227,13984, 9739/
      DATA FT(1220),FT(1221),FT(1222),FT(1223)/14048, 9805,14496, 9739/
      DATA FT(1224),FT(1225),FT(1226),FT(1227)/13280, 9632,14304,10592/
      DATA FT(1228)/0/
      DATA FDT(1, 54),FDT(2, 54),FDT(3, 54)/ 88,22,1229/
      DATA FT(1229),FT(1230),FT(1231),FT(1232)/13408, 9739,13472, 9803/
      DATA FT(1233),FT(1234),FT(1235),FT(1236)/14304, 8907,13280, 9568/
      DATA FT(1237),FT(1238),FT(1239),FT(1240)/14048,10336,12875, 9163/
      DATA FT(1241),FT(1242),FT(1243)/13643, 9931,0/
      DATA FDT(1, 55),FDT(2, 55),FDT(3, 55)/ 89,21,1244/
      DATA FT(1244),FT(1245),FT(1246),FT(1247)/13344, 9494, 9291,13408/
      DATA FT(1248),FT(1249),FT(1250),FT(1251)/ 9558, 9355,14304, 9558/
      DATA FT(1252),FT(1253),FT(1254),FT(1255)/13216, 9504,14048,10336/
      DATA FT(1256),FT(1257),FT(1258)/13195, 9547,0/
      DATA FDT(1, 56),FDT(2, 56),FDT(3, 56)/ 90,22,1259/
      DATA FT(1259),FT(1260),FT(1261),FT(1262)/14240, 8907,14304, 8971/
      DATA FT(1263),FT(1264),FT(1265),FT(1266)/13472, 9178, 9312,10208/
      DATA FT(1267),FT(1268),FT(1269),FT(1270)/13003, 9803, 9937, 9739/
      DATA FT(1271)/0/
      DATA FDT(1, 57),FDT(2, 57),FDT(3, 57)/ 91,14,1272/
      DATA FT(1272),FT(1273),FT(1274),FT(1275)/13220, 9092,13284, 9156/
      DATA FT(1276),FT(1277),FT(1278),FT(1279)/13220, 9572,13188, 9540/
      DATA FT(1280)/0/
      DATA FDT(1, 58),FDT(2, 58),FDT(3, 58)/ 93,14,1281/
      DATA FT(1281),FT(1282),FT(1283),FT(1284)/13540, 9412,13604, 9476/
      DATA FT(1285),FT(1286),FT(1287),FT(1288)/13156, 9508,13124, 9476/
      DATA FT(1289)/0/
      DATA FDT(1, 59),FDT(2, 59),FDT(3, 59)/ 97,21,1290/
      DATA FT(1290),FT(1291),FT(1292),FT(1293)/13977, 9746, 9678, 9676/
      DATA FT(1294),FT(1295),FT(1296),FT(1297)/ 9739, 9931,10061,10127/
      DATA FT(1298),FT(1299),FT(1300),FT(1301)/14041, 9810, 9742, 9740/
      DATA FT(1302),FT(1303),FT(1304),FT(1305)/ 9803,13842, 9749, 9688/
      DATA FT(1306),FT(1307),FT(1308),FT(1309)/ 9561, 9433, 9240, 9109/
      DATA FT(1310),FT(1311),FT(1312),FT(1313)/ 9042, 9039, 9101, 9164/
      DATA FT(1314),FT(1315),FT(1316),FT(1317)/ 9291, 9419, 9548, 9679/
      DATA FT(1318),FT(1319),FT(1320),FT(1321)/ 9746,13529, 9304, 9173/
      DATA FT(1322),FT(1323),FT(1324),FT(1325)/ 9106, 9102, 9164,0/
      DATA FDT(1, 60),FDT(2, 60),FDT(3, 60)/ 98,19,1326/
      DATA FT(1326),FT(1327),FT(1328),FT(1329)/13472, 9107, 9104, 9165/
      DATA FT(1330),FT(1331),FT(1332),FT(1333)/ 9228,13536, 9171,13267/
      DATA FT(1334),FT(1335),FT(1336),FT(1337)/ 9238, 9368, 9497, 9625/
      DATA FT(1338),FT(1339),FT(1340),FT(1341)/ 9752, 9815, 9877, 9874/
      DATA FT(1342),FT(1343),FT(1344),FT(1345)/ 9807, 9676, 9483, 9355/
      DATA FT(1346),FT(1347),FT(1348),FT(1349)/ 9228, 9167, 9171,13848/
      DATA FT(1350),FT(1351),FT(1352),FT(1353)/ 9814, 9810, 9743, 9612/
      DATA FT(1354),FT(1355),FT(1356),FT(1357)/ 9483,13280, 9440,0/
      DATA FDT(1, 61),FDT(2, 61),FDT(3, 61)/ 99,18,1358/
      DATA FT(1358),FT(1359),FT(1360),FT(1361)/13846, 9749, 9813, 9814/
      DATA FT(1362),FT(1363),FT(1364),FT(1365)/ 9752, 9625, 9433, 9240/
      DATA FT(1366),FT(1367),FT(1368),FT(1369)/ 9109, 9042, 9039, 9101/
      DATA FT(1370),FT(1371),FT(1372),FT(1373)/ 9164, 9291, 9419, 9612/
      DATA FT(1374),FT(1375),FT(1376),FT(1377)/ 9743,13529, 9304, 9173/
      DATA FT(1378),FT(1379),FT(1380),FT(1381)/ 9106, 9102, 9164,0/
C     ASCII CODE 100 - LOWER CASE D
      DATA FDT(1, 62),FDT(2, 62),FDT(3, 62)/100,21,1382/
      DATA FT(1382),FT(1383),FT(1384),FT(1385)/14112, 9746, 9678, 9676/
      DATA FT(1386),FT(1387),FT(1388),FT(1389)/ 9739, 9931,10061,10127/
      DATA FT(1390),FT(1391),FT(1392),FT(1393)/14176, 9810, 9742, 9740/
      DATA FT(1394),FT(1395),FT(1396),FT(1397)/ 9803,13842, 9749, 9688/
      DATA FT(1398),FT(1399),FT(1400),FT(1401)/ 9561, 9433, 9240, 9109/
      DATA FT(1402),FT(1403),FT(1404),FT(1405)/ 9042, 9039, 9101, 9164/
      DATA FT(1406),FT(1407),FT(1408),FT(1409)/ 9291, 9419, 9548, 9679/
      DATA FT(1410),FT(1411),FT(1412),FT(1413)/ 9746,13529, 9304, 9173/
      DATA FT(1414),FT(1415),FT(1416),FT(1417)/ 9106, 9102, 9164,13920/
      DATA FT(1418),FT(1419)/10080,0/
      DATA FDT(1, 63),FDT(2, 63),FDT(3, 63)/101,18,1420/
      DATA FT(1420),FT(1421),FT(1422),FT(1423)/13200, 9361, 9554, 9748/
      DATA FT(1424),FT(1425),FT(1426),FT(1427)/ 9814, 9752, 9625, 9433/
      DATA FT(1428),FT(1429),FT(1430),FT(1431)/ 9240, 9109, 9042, 9039/
      DATA FT(1432),FT(1433),FT(1434),FT(1435)/ 9101, 9164, 9291, 9419/
      DATA FT(1436),FT(1437),FT(1438),FT(1439)/ 9612, 9742,13529, 9304/
      DATA FT(1440),FT(1441),FT(1442),FT(1443)/ 9173, 9106, 9102, 9164/
      DATA FT(1444)/0/
      DATA FDT(1, 64),FDT(2, 64),FDT(3, 64)/102,15,1445/
      DATA FT(1445),FT(1446),FT(1447),FT(1448)/13919, 9758, 9821, 9886/
      DATA FT(1449),FT(1450),FT(1451),FT(1452)/ 9887, 9824, 9696, 9567/
      DATA FT(1453),FT(1454),FT(1455),FT(1456)/ 9502, 9436, 9369, 9163/
      DATA FT(1457),FT(1458),FT(1459),FT(1460)/ 9095, 9029,13792, 9566/
      DATA FT(1461),FT(1462),FT(1463),FT(1464)/ 9500, 9432, 9295, 9227/
      DATA FT(1465),FT(1466),FT(1467),FT(1468)/ 9160, 9094, 9029, 8900/
      DATA FT(1469),FT(1470),FT(1471),FT(1472)/ 8772, 8709, 8710, 8775/
      DATA FT(1473),FT(1474),FT(1475),FT(1476)/ 8838, 8773,13209, 9753/
      DATA FT(1477)/0/
      DATA FDT(1, 65),FDT(2, 65),FDT(3, 65)/103,20,1478/
      DATA FT(1478),FT(1479),FT(1480),FT(1481)/14041, 9675, 9608, 9477/
      DATA FT(1482),FT(1483),FT(1484),FT(1485)/ 9284, 9092, 8965, 8902/
      DATA FT(1486),FT(1487),FT(1488),FT(1489)/ 8903, 8968, 9031, 8966/
      DATA FT(1490),FT(1491),FT(1492),FT(1493)/13977, 9611, 9544, 9413/
      DATA FT(1494),FT(1495),FT(1496),FT(1497)/ 9284,13842, 9749, 9688/
      DATA FT(1498),FT(1499),FT(1500),FT(1501)/ 9561, 9433, 9240, 9109/
      DATA FT(1502),FT(1503),FT(1504),FT(1505)/ 9042, 9039, 9101, 9164/
      DATA FT(1506),FT(1507),FT(1508),FT(1509)/ 9291, 9419, 9548, 9679/
      DATA FT(1510),FT(1511),FT(1512),FT(1513)/ 9746,13529, 9304, 9173/
      DATA FT(1514),FT(1515),FT(1516),FT(1517)/ 9106, 9102, 9164,0/
      DATA FDT(1, 66),FDT(2, 66),FDT(3, 66)/104,21,1518/
      DATA FT(1518),FT(1519),FT(1520),FT(1521)/13472, 8971,13536, 9035/
      DATA FT(1522),FT(1523),FT(1524),FT(1525)/13266, 9302, 9432, 9561/
      DATA FT(1526),FT(1527),FT(1528),FT(1529)/ 9689, 9816, 9879, 9877/
      DATA FT(1530),FT(1531),FT(1532),FT(1533)/ 9743, 9740, 9803,13785/
      DATA FT(1534),FT(1535),FT(1536),FT(1537)/ 9815, 9813, 9679, 9676/
      DATA FT(1538),FT(1539),FT(1540),FT(1541)/ 9739, 9931,10061,10127/
      DATA FT(1542),FT(1543),FT(1544)/13280, 9440,0/
      DATA FDT(1, 67),FDT(2, 67),FDT(3, 67)/105,13,1545/
      DATA FT(1545),FT(1546),FT(1547),FT(1548)/13536, 9375, 9438, 9503/
      DATA FT(1549),FT(1550),FT(1551),FT(1552)/ 9440,13013, 8983, 9113/
      DATA FT(1553),FT(1554),FT(1555),FT(1556)/ 9305, 9368, 9365, 9231/
      DATA FT(1557),FT(1558),FT(1559),FT(1560)/ 9228, 9291,13337, 9304/
      DATA FT(1561),FT(1562),FT(1563),FT(1564)/ 9301, 9167, 9164, 9227/
      DATA FT(1565),FT(1566),FT(1567),FT(1568)/ 9419, 9549, 9615,0/
      DATA FDT(1, 68),FDT(2, 68),FDT(3, 68)/106,13,1569/
      DATA FT(1569),FT(1570),FT(1571),FT(1572)/13600, 9439, 9502, 9567/
      DATA FT(1573),FT(1574),FT(1575),FT(1576)/ 9504,13077, 9047, 9177/
      DATA FT(1577),FT(1578),FT(1579),FT(1580)/ 9369, 9432, 9429, 9227/
      DATA FT(1581),FT(1582),FT(1583),FT(1584)/ 9160, 9094, 9029, 8900/
      DATA FT(1585),FT(1586),FT(1587),FT(1588)/ 8772, 8709, 8710, 8775/
      DATA FT(1589),FT(1590),FT(1591),FT(1592)/ 8838, 8773,13401, 9368/
      DATA FT(1593),FT(1594),FT(1595),FT(1596)/ 9365, 9163, 9096, 9030/
      DATA FT(1597),FT(1598)/ 8900,0/
      DATA FDT(1, 69),FDT(2, 69),FDT(3, 69)/107,20,1599/
      DATA FT(1599),FT(1600),FT(1601),FT(1602)/13472, 8971,13536, 9035/
      DATA FT(1603),FT(1604),FT(1605),FT(1606)/13976, 9815, 9878, 9943/
      DATA FT(1607),FT(1608),FT(1609),FT(1610)/ 9944, 9881, 9817, 9688/
      DATA FT(1611),FT(1612),FT(1613),FT(1614)/ 9428, 9299, 9171,13395/
      DATA FT(1615),FT(1616),FT(1617),FT(1618)/ 9426, 9548, 9611,13395/
      DATA FT(1619),FT(1620),FT(1621),FT(1622)/ 9362, 9484, 9547, 9675/
      DATA FT(1623),FT(1624),FT(1625),FT(1626)/ 9804, 9935,13280, 9440/
      DATA FT(1627)/0/
      DATA FDT(1, 70),FDT(2, 70),FDT(3, 70)/108,12,1628/
      DATA FT(1628),FT(1629),FT(1630),FT(1631)/13472, 9106, 9038, 9036/
      DATA FT(1632),FT(1633),FT(1634),FT(1635)/ 9099, 9291, 9421, 9487/
      DATA FT(1636),FT(1637),FT(1638),FT(1639)/13536, 9170, 9102, 9100/
      DATA FT(1640),FT(1641),FT(1642),FT(1643)/ 9163,13280, 9440,0/
      DATA FDT(1, 71),FDT(2, 71),FDT(3, 71)/109,33,1644/
      DATA FT(1644),FT(1645),FT(1646),FT(1647)/13013, 8983, 9113, 9305/
      DATA FT(1648),FT(1649),FT(1650),FT(1651)/ 9368, 9366, 9298, 9163/
      DATA FT(1652),FT(1653),FT(1654),FT(1655)/13337, 9304, 9302, 9234/
      DATA FT(1656),FT(1657),FT(1658),FT(1659)/ 9099,13394, 9430, 9560/
      DATA FT(1660),FT(1661),FT(1662),FT(1663)/ 9689, 9817, 9944,10007/
      DATA FT(1664),FT(1665),FT(1666),FT(1667)/10005, 9803,13913, 9943/
      DATA FT(1668),FT(1669),FT(1670),FT(1671)/ 9941, 9739,14034,10070/
      DATA FT(1672),FT(1673),FT(1674),FT(1675)/10200,10329,10457,10584/
      DATA FT(1676),FT(1677),FT(1678),FT(1679)/10647,10645,10511,10508/
      DATA FT(1680),FT(1681),FT(1682),FT(1683)/10571,14553,10583,10581/
      DATA FT(1684),FT(1685),FT(1686),FT(1687)/10447,10444,10507,10699/
      DATA FT(1688),FT(1689),FT(1690)/10829,10895,0/
      DATA FDT(1, 72),FDT(2, 72),FDT(3, 72)/110,23,1691/
      DATA FT(1691),FT(1692),FT(1693),FT(1694)/13013, 8983, 9113, 9305/
      DATA FT(1695),FT(1696),FT(1697),FT(1698)/ 9368, 9366, 9298, 9163/
      DATA FT(1699),FT(1700),FT(1701),FT(1702)/13337, 9304, 9302, 9234/
      DATA FT(1703),FT(1704),FT(1705),FT(1706)/ 9099,13394, 9430, 9560/
      DATA FT(1707),FT(1708),FT(1709),FT(1710)/ 9689, 9817, 9944,10007/
      DATA FT(1711),FT(1712),FT(1713),FT(1714)/10005, 9871, 9868, 9931/
      DATA FT(1715),FT(1716),FT(1717),FT(1718)/13913, 9943, 9941, 9807/
      DATA FT(1719),FT(1720),FT(1721),FT(1722)/ 9804, 9867,10059,10189/
      DATA FT(1723),FT(1724)/10255,0/
      DATA FDT(1, 73),FDT(2, 73),FDT(3, 73)/111,18,1725/
      DATA FT(1725),FT(1726),FT(1727),FT(1728)/13529, 9240, 9109, 9042/
      DATA FT(1729),FT(1730),FT(1731),FT(1732)/ 9039, 9101, 9164, 9291/
      DATA FT(1733),FT(1734),FT(1735),FT(1736)/ 9419, 9612, 9743, 9810/
      DATA FT(1737),FT(1738),FT(1739),FT(1740)/ 9813, 9751, 9688, 9561/
      DATA FT(1741),FT(1742),FT(1743),FT(1744)/ 9433,13529, 9304, 9173/
      DATA FT(1745),FT(1746),FT(1747),FT(1748)/ 9106, 9102, 9164,13515/
      DATA FT(1749),FT(1750),FT(1751),FT(1752)/ 9548, 9679, 9746, 9750/
      DATA FT(1753),FT(1754)/ 9688,0/
      DATA FDT(1, 74),FDT(2, 74),FDT(3, 74)/112,21,1755/
      DATA FT(1755),FT(1756),FT(1757),FT(1758)/13013, 8983, 9113, 9305/
      DATA FT(1759),FT(1760),FT(1761),FT(1762)/ 9368, 9366, 9298, 9028/
      DATA FT(1763),FT(1764),FT(1765),FT(1766)/13337, 9304, 9302, 9234/
      DATA FT(1767),FT(1768),FT(1769),FT(1770)/ 8964,13394, 9365, 9496/
      DATA FT(1771),FT(1772),FT(1773),FT(1774)/ 9625, 9753, 9880, 9943/
      DATA FT(1775),FT(1776),FT(1777),FT(1778)/10005,10002, 9935, 9804/
      DATA FT(1779),FT(1780),FT(1781),FT(1782)/ 9611, 9483, 9356, 9295/
      DATA FT(1783),FT(1784),FT(1785),FT(1786)/ 9298,13976, 9942, 9938/
      DATA FT(1787),FT(1788),FT(1789),FT(1790)/ 9871, 9740, 9611,12868/
      DATA FT(1791),FT(1792)/ 9220,0/
      DATA FDT(1, 75),FDT(2, 75),FDT(3, 75)/113,20,1793/
      DATA FT(1793),FT(1794),FT(1795),FT(1796)/13977, 9476,14041, 9540/
      DATA FT(1797),FT(1798),FT(1799),FT(1800)/13842, 9749, 9688, 9561/
      DATA FT(1801),FT(1802),FT(1803),FT(1804)/ 9433, 9240, 9109, 9042/
      DATA FT(1805),FT(1806),FT(1807),FT(1808)/ 9039, 9101, 9164, 9291/
      DATA FT(1809),FT(1810),FT(1811),FT(1812)/ 9419, 9548, 9679, 9746/
      DATA FT(1813),FT(1814),FT(1815),FT(1816)/13529, 9304, 9173, 9106/
      DATA FT(1817),FT(1818),FT(1819),FT(1820)/ 9102, 9164,13380, 9732/
      DATA FT(1821)/0/
      DATA FDT(1, 76),FDT(2, 76),FDT(3, 76)/114,17,1822/
      DATA FT(1822),FT(1823),FT(1824),FT(1825)/13013, 8983, 9113, 9305/
      DATA FT(1826),FT(1827),FT(1828),FT(1829)/ 9368, 9366, 9298, 9163/
      DATA FT(1830),FT(1831),FT(1832),FT(1833)/13337, 9304, 9302, 9234/
      DATA FT(1834),FT(1835),FT(1836),FT(1837)/ 9099,13394, 9430, 9560/
      DATA FT(1838),FT(1839),FT(1840),FT(1841)/ 9689, 9817, 9880, 9879/
      DATA FT(1842),FT(1843),FT(1844),FT(1845)/ 9814, 9751, 9816,0/
      DATA FDT(1, 77),FDT(2, 77),FDT(3, 77)/115,17,1846/
      DATA FT(1846),FT(1847),FT(1848),FT(1849)/13847, 9750, 9814, 9815/
      DATA FT(1850),FT(1851),FT(1852),FT(1853)/ 9752, 9561, 9369, 9176/
      DATA FT(1854),FT(1855),FT(1856),FT(1857)/ 9111, 9109, 9172, 9616/
      DATA FT(1858),FT(1859),FT(1860),FT(1861)/ 9679,13206, 9173, 9617/
      DATA FT(1862),FT(1863),FT(1864),FT(1865)/ 9680, 9677, 9612, 9419/
      DATA FT(1866),FT(1867),FT(1868),FT(1869)/ 9227, 9036, 8973, 8974/
      DATA FT(1870),FT(1871),FT(1872)/ 9038, 9037,0/
      DATA FDT(1, 78),FDT(2, 78),FDT(3, 78)/116,14,1873/
      DATA FT(1873),FT(1874),FT(1875),FT(1876)/13536, 9170, 9102, 9100/
      DATA FT(1877),FT(1878),FT(1879),FT(1880)/ 9163, 9355, 9485, 9551/
      DATA FT(1881),FT(1882),FT(1883),FT(1884)/13600, 9234, 9166, 9164/
      DATA FT(1885),FT(1886),FT(1887),FT(1888)/ 9227,13145, 9625,0/
      DATA FDT(1, 79),FDT(2, 79),FDT(3, 79)/117,23,1889/
      DATA FT(1889),FT(1890),FT(1891),FT(1892)/13013, 8983, 9113, 9305/
      DATA FT(1893),FT(1894),FT(1895),FT(1896)/ 9368, 9365, 9231, 9229/
      DATA FT(1897),FT(1898),FT(1899),FT(1900)/ 9355,13337, 9304, 9301/
      DATA FT(1901),FT(1902),FT(1903),FT(1904)/ 9167, 9165, 9228, 9355/
      DATA FT(1905),FT(1906),FT(1907),FT(1908)/ 9483, 9612, 9742, 9874/
      DATA FT(1909),FT(1910),FT(1911),FT(1912)/14105, 9874, 9806, 9804/
      DATA FT(1913),FT(1914),FT(1915),FT(1916)/ 9867,10059,10189,10255/
      DATA FT(1917),FT(1918),FT(1919),FT(1920)/14169, 9938, 9870, 9868/
      DATA FT(1921),FT(1922)/ 9931,0/
      DATA FDT(1, 80),FDT(2, 80),FDT(3, 80)/118,20,1923/
      DATA FT(1923),FT(1924),FT(1925),FT(1926)/13013, 8983, 9113, 9305/
      DATA FT(1927),FT(1928),FT(1929),FT(1930)/ 9368, 9365, 9231, 9229/
      DATA FT(1931),FT(1932),FT(1933),FT(1934)/ 9355,13337, 9304, 9301/
      DATA FT(1935),FT(1936),FT(1937),FT(1938)/ 9167, 9165, 9228, 9355/
      DATA FT(1939),FT(1940),FT(1941),FT(1942)/ 9419, 9612, 9742, 9873/
      DATA FT(1943),FT(1944),FT(1945),FT(1946)/ 9941, 9945, 9881, 9943/
      DATA FT(1947)/0/
      DATA FDT(1, 81),FDT(2, 81),FDT(3, 81)/119,29,1948/
      DATA FT(1948),FT(1949),FT(1950),FT(1951)/13013, 8983, 9113, 9305/
      DATA FT(1952),FT(1953),FT(1954),FT(1955)/ 9368, 9365, 9231, 9229/
      DATA FT(1956),FT(1957),FT(1958),FT(1959)/ 9355,13337, 9304, 9301/
      DATA FT(1960),FT(1961),FT(1962),FT(1963)/ 9167, 9165, 9228, 9355/
      DATA FT(1964),FT(1965),FT(1966),FT(1967)/ 9483, 9612, 9742, 9808/
      DATA FT(1968),FT(1969),FT(1970),FT(1971)/14041, 9808, 9805, 9868/
      DATA FT(1972),FT(1973),FT(1974),FT(1975)/ 9995,10123,10252,10382/
      DATA FT(1976),FT(1977),FT(1978),FT(1979)/10448,10516,10521,10457/
      DATA FT(1980),FT(1981),FT(1982),FT(1983)/10519,14105, 9872, 9869/
      DATA FT(1984),FT(1985)/ 9995,0/
C     ASCII CODE 120 - LOWER CASE X
      DATA FDT(1, 82),FDT(2, 82),FDT(3, 82)/120,20,1986/
      DATA FT(1986),FT(1987),FT(1988),FT(1989)/13141, 9176, 9305, 9497/
      DATA FT(1990),FT(1991),FT(1992),FT(1993)/ 9559, 9556,13529, 9495/
      DATA FT(1994),FT(1995),FT(1996),FT(1997)/ 9492, 9424, 9358, 9228/
      DATA FT(1998),FT(1999),FT(2000),FT(2001)/ 9099, 9035, 8972, 8973/
      DATA FT(2002),FT(2003),FT(2004),FT(2005)/ 9038, 9101, 9036,13520/
      DATA FT(2006),FT(2007),FT(2008),FT(2009)/ 9421, 9483, 9675, 9804/
      DATA FT(2010),FT(2011),FT(2012),FT(2013)/ 9935,14040, 9879, 9942/
      DATA FT(2014),FT(2015),FT(2016),FT(2017)/10007,10008, 9945, 9881/
      DATA FT(2018),FT(2019),FT(2020),FT(2021)/ 9752, 9622, 9556, 9488/
      DATA FT(2022),FT(2023),FT(2024)/ 9485, 9547,0/
      DATA FDT(1, 83),FDT(2, 83),FDT(3, 83)/121,21,2025/
      DATA FT(2025),FT(2026),FT(2027),FT(2028)/13013, 8983, 9113, 9305/
      DATA FT(2029),FT(2030),FT(2031),FT(2032)/ 9368, 9365, 9231, 9229/
      DATA FT(2033),FT(2034),FT(2035),FT(2036)/ 9355,13337, 9304, 9301/
      DATA FT(2037),FT(2038),FT(2039),FT(2040)/ 9167, 9165, 9228, 9355/
      DATA FT(2041),FT(2042),FT(2043),FT(2044)/ 9483, 9612, 9742, 9874/
      DATA FT(2045),FT(2046),FT(2047),FT(2048)/14169, 9803, 9736, 9605/
      DATA FT(2049),FT(2050),FT(2051),FT(2052)/ 9412, 9220, 9093, 9030/
      DATA FT(2053),FT(2054),FT(2055),FT(2056)/ 9031, 9096, 9159, 9094/
      DATA FT(2057),FT(2058),FT(2059),FT(2060)/14105, 9739, 9672, 9541/
      DATA FT(2061),FT(2062)/ 9412,0/
      DATA FDT(1, 84),FDT(2, 84),FDT(3, 84)/122,20,2063/
      DATA FT(2063),FT(2064),FT(2065),FT(2066)/14041, 9879, 9749, 9231/
      DATA FT(2067),FT(2068),FT(2069),FT(2070)/ 9101, 9035,13205, 9175/
      DATA FT(2071),FT(2072),FT(2073),FT(2074)/ 9305, 9497, 9751,13271/
      DATA FT(2075),FT(2076),FT(2077),FT(2078)/ 9304, 9496, 9751, 9879/
      DATA FT(2079),FT(2080),FT(2081),FT(2082)/13197, 9229, 9484, 9676/
      DATA FT(2083),FT(2084),FT(2085),FT(2086)/ 9805,13325, 9483, 9675/
      DATA FT(2087),FT(2088),FT(2089)/ 9805, 9871,0/
      DATA FDT(1, 85),FDT(2, 85),FDT(3, 85)/123,14,2090/
      DATA FT(2090),FT(2091),FT(2092),FT(2093)/13540, 9315, 9250, 9184/
      DATA FT(2094),FT(2095),FT(2096),FT(2097)/ 9182, 9244, 9307, 9369/
      DATA FT(2098),FT(2099),FT(2100),FT(2101)/ 9367, 9237,13411, 9249/
      DATA FT(2102),FT(2103),FT(2104),FT(2105)/ 9247, 9309, 9372, 9434/
      DATA FT(2106),FT(2107),FT(2108),FT(2109)/ 9432, 9366, 9108, 9362/
      DATA FT(2110),FT(2111),FT(2112),FT(2113)/ 9424, 9422, 9356, 9291/
      DATA FT(2114),FT(2115),FT(2116),FT(2117)/ 9225, 9223, 9285,13331/
      DATA FT(2118),FT(2119),FT(2120),FT(2121)/ 9361, 9359, 9293, 9228/
      DATA FT(2122),FT(2123),FT(2124),FT(2125)/ 9162, 9160, 9222, 9285/
      DATA FT(2126),FT(2127)/ 9412,0/
      DATA FDT(1, 86),FDT(2, 86),FDT(3, 86)/125,14,2128/
      DATA FT(2128),FT(2129),FT(2130),FT(2131)/13284, 9315, 9378, 9440/
      DATA FT(2132),FT(2133),FT(2134),FT(2135)/ 9438, 9372, 9307, 9241/
      DATA FT(2136),FT(2137),FT(2138),FT(2139)/ 9239, 9365,13411, 9377/
      DATA FT(2140),FT(2141),FT(2142),FT(2143)/ 9375, 9309, 9244, 9178/
      DATA FT(2144),FT(2145),FT(2146),FT(2147)/ 9176, 9238, 9492, 9234/
      DATA FT(2148),FT(2149),FT(2150),FT(2151)/ 9168, 9166, 9228, 9291/
      DATA FT(2152),FT(2153),FT(2154),FT(2155)/ 9353, 9351, 9285,13459/
      DATA FT(2156),FT(2157),FT(2158),FT(2159)/ 9233, 9231, 9293, 9356/
      DATA FT(2160),FT(2161),FT(2162),FT(2163)/ 9418, 9416, 9350, 9285/
      DATA FT(2164),FT(2165)/ 9156,0/
      DATA FDT(1, 87),FDT(2, 87),FDT(3, 87)/126,24,2166/
      DATA FT(2166),FT(2167),FT(2168),FT(2169)/13137, 9043, 9110, 9239/
      DATA FT(2170),FT(2171),FT(2172),FT(2173)/ 9367, 9494, 9747, 9874/
      DATA FT(2174),FT(2175),FT(2176),FT(2177)/10002,10131,10197,13139/
      DATA FT(2178),FT(2179),FT(2180),FT(2181)/ 9109, 9238, 9366, 9493/
      DATA FT(2182),FT(2183),FT(2184),FT(2185)/ 9746, 9873,10001,10130/
      DATA FT(2186),FT(2187),FT(2188)/10197,10199,0/
      DATA FDT(1,88),FDT(2,88),FDT(3,88)/32,26,2189/
      DATA FT(2189)/0/
      DO 50 I=1,128
      TXFDT(1,I)=0
      TXFDT(2,I)=0
      TXFDT(3,I)=0
50    CONTINUE
      DO 100 I=1,FDTMAX
      J=FDT(1,I)
      TXFDT(1,J)=FDT(2,I)
      TXFDT(2,J)=FDT(3,I)
      TXFDT(3,J)=32
100   CONTINUE
      DO 200 I=1,FTMAX
      TXFTAB(I)=FT(I)
200   CONTINUE
      RETURN
      END
      SUBROUTINE GTXGF4
      COMMON /TXT/ TXPTR,TXCPX,TXCPY,TXCPZ,TXCTM,TXSIZX,TXSIZY,
     1     TXFONT,TXFTAB,TXFDT,TXFRAS,TXFRMX,TXWID,TXHGHT,
     2     TXCBXO,TXCBYO,TXFTXO,TXFTYO,TXCBMW,TXCBMH,
     3     TXSPRW,TXSPRH,TXRATH,TXRATW,TXSPVH,TXSPVW,TXCSET
      INTEGER TXPTR,TXFONT,TXFTAB(2200),TXFDT(3,128),TXFRAS(128),
     1     TXFRMX,TXWID,TXHGHT,
     2     TXCBXO,TXCBYO,TXFTXO,TXFTYO,TXCBMW,TXCBMH,
     3     TXSPRW,TXSPRH,TXRATH,TXRATW,TXSPVH,TXSPVW,TXCSET
      REAL TXCPX,TXCPY,TXCPZ,TXCTM(4,4),TXSIZX,TXSIZY
      INTEGER I,FTMAX,FT(2134),FDT(3,88),FDTMAX
      DATA FTMAX,FDTMAX/2134,88/
      DATA FDT(1,  1),FDT(2,  1),FDT(3,  1)/ 33,10,   1/
      DATA FT(   1),FT(   2),FT(   3),FT(   4)/13280, 9118, 9170, 9246/
      DATA FT(   5),FT(   6),FT(   7),FT(   8)/ 9184,13278, 9176,13261/
      DATA FT(   9),FT(  10),FT(  11),FT(  12)/ 9100, 9163, 9228, 9165/
      DATA FT(  13)/0/
      DATA FDT(1,  2),FDT(2,  2),FDT(3,  2)/ 35,21,  14/
      DATA FT(  14),FT(  15),FT(  16),FT(  17)/13664, 9092,14048, 9476/
      DATA FT(  18),FT(  19),FT(  20),FT(  21)/13205,10005,13135, 9935/
      DATA FT(  22)/0/
      DATA FDT(1,  3),FDT(2,  3),FDT(3,  3)/ 36,19,  23/
      DATA FT(  23),FT(  24),FT(  25),FT(  26)/13540, 9415, 9479,13540/
      DATA FT(  27),FT(  28),FT(  29),FT(  30)/ 9508, 9479,13853, 9885/
      DATA FT(  31),FT(  32),FT(  33),FT(  34)/ 9759, 9568, 9376, 9183/
      DATA FT(  35),FT(  36),FT(  37),FT(  38)/ 9053, 9051, 9113, 9176/
      DATA FT(  39),FT(  40),FT(  41),FT(  42)/ 9684, 9747, 9809, 9807/
      DATA FT(  43),FT(  44),FT(  45),FT(  46)/ 9741, 9548, 9356, 9229/
      DATA FT(  47),FT(  48),FT(  49),FT(  50)/ 9166,13853, 9694, 9567/
      DATA FT(  51),FT(  52),FT(  53),FT(  54)/ 9375, 9182, 9117, 9115/
      DATA FT(  55),FT(  56),FT(  57),FT(  58)/ 9177, 9685, 9811, 9873/
      DATA FT(  59),FT(  60),FT(  61),FT(  62)/ 9871, 9805, 9740, 9547/
      DATA FT(  63),FT(  64),FT(  65),FT(  66)/ 9355, 9164, 9038, 9166/
      DATA FT(  67),FT(  68),FT(  69)/13902, 9612,0/
      DATA FDT(1,4),FDT(2,4),FDT(3,4)/37,24,70/
      DATA FT(  70),FT(  71),FT(  72),FT(  73)/14304, 9035,13472, 9502/
      DATA FT(  74),FT(  75),FT(  76),FT(  77)/ 9500, 9434, 9305, 9177/
      DATA FT(  78),FT(  79),FT(  80),FT(  81)/ 9051, 9053, 9119, 9248/
      DATA FT(  82),FT(  83),FT(  84),FT(  85)/ 9376, 9503, 9694, 9886/
      DATA FT(  86),FT(  87),FT(  88),FT(  89)/10079,10208,14034, 9809/
      DATA FT(  90),FT(  91),FT(  92),FT(  93)/ 9743, 9741, 9867, 9995/
      DATA FT(  94),FT(  95),FT(  96),FT(  97)/10124,10190,10192,10066/
      DATA FT(  98),FT(  99)/ 9938,0/
      DATA FDT(1,  5),FDT(2,  5),FDT(3,  5)/ 38,25, 100/
      DATA FT( 100),FT( 101),FT( 102),FT( 103)/14296,10135,10198,10263/
      DATA FT( 104),FT( 105),FT( 106),FT( 107)/10264,10201,10137,10072/
      DATA FT( 108),FT( 109),FT( 110),FT( 111)/10006, 9873, 9742, 9612/
      DATA FT( 112),FT( 113),FT( 114),FT( 115)/ 9483, 9291, 9100, 9038/
      DATA FT( 116),FT( 117),FT( 118),FT( 119)/ 9041, 9107, 9495, 9625/
      DATA FT( 120),FT( 121),FT( 122),FT( 123)/ 9691, 9693, 9631, 9504/
      DATA FT( 124),FT( 125),FT( 126),FT( 127)/ 9375, 9309, 9307, 9368/
      DATA FT( 128),FT( 129),FT( 130),FT( 131)/ 9493, 9806, 9932,10123/
      DATA FT( 132),FT( 133),FT( 134),FT( 135)/10187,10252,10253,13387/
      DATA FT( 136),FT( 137),FT( 138),FT( 139)/ 9164, 9102, 9105, 9171/
      DATA FT( 140),FT( 141),FT( 142),FT( 143)/ 9301,13403, 9369, 9870/
      DATA FT( 144),FT( 145),FT( 146)/ 9996,10123,0/
      DATA FDT(1,  6),FDT(2,  6),FDT(3,  6)/ 40,14, 147/
      DATA FT( 147),FT( 148),FT( 149),FT( 150)/13604, 9378, 9247, 9115/
      DATA FT( 151),FT( 152),FT( 153),FT( 154)/ 9046, 9042, 9101, 9225/
      DATA FT( 155),FT( 156),FT( 157),FT( 158)/ 9350, 9476, 9540,13604/
      DATA FT( 159),FT( 160),FT( 161),FT( 162)/ 9572, 9442, 9311, 9179/
      DATA FT( 163),FT( 164),FT( 165),FT( 166)/ 9110, 9106, 9165, 9289/
      DATA FT( 167),FT( 168),FT( 169)/ 9414, 9540,0/
      DATA FDT(1,  7),FDT(2,  7),FDT(3,  7)/ 41,14, 170/
      DATA FT( 170),FT( 171),FT( 172),FT( 173)/13156, 9186, 9311, 9435/
      DATA FT( 174),FT( 175),FT( 176),FT( 177)/ 9494, 9490, 9421, 9289/
      DATA FT( 178),FT( 179),FT( 180),FT( 181)/ 9158, 9028, 9092,13156/
      DATA FT( 182),FT( 183),FT( 184),FT( 185)/ 9124, 9250, 9375, 9499/
      DATA FT( 186),FT( 187),FT( 188),FT( 189)/ 9558, 9554, 9485, 9353/
      DATA FT( 190),FT( 191),FT( 192)/ 9222, 9092,0/
      DATA FDT(1,  8),FDT(2,  8),FDT(3,  8)/ 42,16, 193/
      DATA FT( 193),FT( 194),FT( 195),FT( 196)/13472, 9311, 9429, 9364/
      DATA FT( 197),FT( 198),FT( 199),FT( 200)/13472, 9364,13472, 9439/
      DATA FT( 201),FT( 202),FT( 203),FT( 204)/ 9301, 9364,13149, 9117/
      DATA FT( 205),FT( 206),FT( 207),FT( 208)/ 9623, 9687,13149, 9687/
      DATA FT( 209),FT( 210),FT( 211),FT( 212)/13149, 9052, 9688, 9687/
      DATA FT( 213),FT( 214),FT( 215),FT( 216)/13789, 9629, 9111, 9047/
      DATA FT( 217),FT( 218),FT( 219),FT( 220)/13789, 9047,13789, 9692/
      DATA FT( 221),FT( 222),FT( 223)/ 9048, 9047,0/
      DATA FDT(1,  9),FDT(2,  9),FDT(3,  9)/ 43,25, 224/
      DATA FT( 224),FT( 225),FT( 226),FT( 227)/13725, 9612, 9676,13725/
      DATA FT( 228),FT( 229),FT( 230),FT( 231)/ 9693, 9676,13205,10197/
      DATA FT( 232),FT( 233),FT( 234),FT( 235)/10196,13205, 9108,10196/
      DATA FT( 236)/0/
      DATA FDT(1, 10),FDT(2, 10),FDT(3, 10)/ 44,11, 237/
      DATA FT( 237),FT( 238),FT( 239),FT( 240)/13388, 9227, 9163, 9100/
      DATA FT( 241),FT( 242),FT( 243),FT( 244)/ 9101, 9166, 9230, 9293/
      DATA FT( 245),FT( 246),FT( 247),FT( 248)/ 9290, 9224, 9095,13261/
      DATA FT( 249),FT( 250),FT( 251),FT( 252)/ 9164, 9228, 9229, 9165/
      DATA FT( 253),FT( 254),FT( 255),FT( 256)/13323, 9290,13388, 9224/
      DATA FT( 257)/0/
      DATA FDT(1, 11),FDT(2, 11),FDT(3, 11)/ 45,25, 258/
      DATA FT( 258),FT( 259),FT( 260),FT( 261)/13205,10197,10196,13205/
      DATA FT( 262),FT( 263),FT( 264)/ 9108,10196,0/
      DATA FDT(1, 12),FDT(2, 12),FDT(3, 12)/ 46,11, 265/
      DATA FT( 265),FT( 266),FT( 267),FT( 268)/13262, 9101, 9100, 9163/
      DATA FT( 269),FT( 270),FT( 271),FT( 272)/ 9227, 9292, 9293, 9230/
      DATA FT( 273),FT( 274),FT( 275),FT( 276)/ 9166,13261, 9164, 9228/
      DATA FT( 277),FT( 278),FT( 279)/ 9229, 9165,0/
      DATA FDT(1, 13),FDT(2, 13),FDT(3, 13)/ 47,23, 280/
      DATA FT( 280),FT( 281),FT( 282),FT( 283)/14244, 8964, 9028,14244/
      DATA FT( 284),FT( 285),FT( 286)/10212, 9028,0/
      DATA FDT(1, 14),FDT(2, 14),FDT(3, 14)/ 48,20, 287/
      DATA FT( 287),FT( 288),FT( 289),FT( 290)/13536, 9247, 9116, 9047/
      DATA FT( 291),FT( 292),FT( 293),FT( 294)/ 9044, 9103, 9228, 9419/
      DATA FT( 295),FT( 296),FT( 297),FT( 298)/ 9547, 9740, 9871, 9940/
      DATA FT( 299),FT( 300),FT( 301),FT( 302)/ 9943, 9884, 9759, 9568/
      DATA FT( 303),FT( 304),FT( 305),FT( 306)/ 9440,13407, 9180, 9111/
      DATA FT( 307),FT( 308),FT( 309),FT( 310)/ 9108, 9167, 9292,13325/
      DATA FT( 311),FT( 312),FT( 313),FT( 314)/ 9420, 9548, 9741,13772/
      DATA FT( 315),FT( 316),FT( 317),FT( 318)/ 9807, 9876, 9879, 9820/
      DATA FT( 319),FT( 320),FT( 321),FT( 322)/ 9695,13854, 9567, 9439/
      DATA FT( 323),FT( 324)/ 9246,0/
      DATA FDT(1, 15),FDT(2, 15),FDT(3, 15)/ 49,20, 325/
      DATA FT( 325),FT( 326),FT( 327),FT( 328)/13340, 9373, 9568, 9547/
      DATA FT( 329),FT( 330),FT( 331),FT( 332)/13340, 9243, 9372, 9502/
      DATA FT( 333),FT( 334),FT( 335)/ 9483, 9547,0/
      DATA FDT(1, 16),FDT(2, 16),FDT(3, 16)/ 50,20, 336/
      DATA FT( 336),FT( 337),FT( 338),FT( 339)/13211, 9116, 9182, 9247/
      DATA FT( 340),FT( 341),FT( 342),FT( 343)/ 9376, 9632, 9759, 9822/
      DATA FT( 344),FT( 345),FT( 346),FT( 347)/ 9884, 9882, 9816, 9685/
      DATA FT( 348),FT( 349),FT( 350),FT( 351)/ 9099,13211, 9179, 9180/
      DATA FT( 352),FT( 353),FT( 354),FT( 355)/ 9246, 9375, 9631, 9758/
      DATA FT( 356),FT( 357),FT( 358),FT( 359)/ 9820, 9818, 9752, 9621/
      DATA FT( 360),FT( 361),FT( 362),FT( 363)/ 9035,13196, 9932, 9931/
      DATA FT( 364),FT( 365),FT( 366)/13131, 9931,0/
      DATA FDT(1, 17),FDT(2, 17),FDT(3, 17)/ 51,20, 367/
      DATA FT( 367),FT( 368),FT( 369),FT( 370)/13280, 9888, 9431,13280/
      DATA FT( 371),FT( 372),FT( 373),FT( 374)/ 9183, 9823,13920, 9367/
      DATA FT( 375),FT( 376),FT( 377),FT( 378)/13528, 9560, 9751, 9877/
      DATA FT( 379),FT( 380),FT( 381),FT( 382)/ 9938, 9937, 9870, 9740/
      DATA FT( 383),FT( 384),FT( 385),FT( 386)/ 9547, 9355, 9164, 9101/
      DATA FT( 387),FT( 388),FT( 389),FT( 390)/ 9039, 9103,13463, 9559/
      DATA FT( 391),FT( 392),FT( 393),FT( 394)/ 9750, 9875,13719, 9813/
      DATA FT( 395),FT( 396),FT( 397),FT( 398)/ 9874, 9873, 9806, 9612/
      DATA FT( 399),FT( 400),FT( 401),FT( 402)/13968, 9741, 9548, 9356/
      DATA FT( 403),FT( 404),FT( 405),FT( 406)/ 9165, 9103,13388, 9102/
      DATA FT( 407)/0/
      DATA FDT(1, 18),FDT(2, 18),FDT(3, 18)/ 52,20, 408/
      DATA FT( 408),FT( 409),FT( 410),FT( 411)/13789, 9675, 9739,13856/
      DATA FT( 412),FT( 413),FT( 414),FT( 415)/ 9739,13856, 9040,10000/
      DATA FT( 416),FT( 417),FT( 418),FT( 419)/13789, 9104,13201,10001/
      DATA FT( 420),FT( 421)/10000,0/
      DATA FDT(1, 19),FDT(2, 19),FDT(3, 19)/ 53,20, 422/
      DATA FT( 422),FT( 423),FT( 424),FT( 425)/13280, 9111,13343, 9176/
      DATA FT( 426),FT( 427),FT( 428),FT( 429)/13280, 9824, 9823,13343/
      DATA FT( 430),FT( 431),FT( 432),FT( 433)/ 9823,13272, 9369, 9561/
      DATA FT( 434),FT( 435),FT( 436),FT( 437)/ 9752, 9878, 9939, 9937/
      DATA FT( 438),FT( 439),FT( 440),FT( 441)/ 9870, 9740, 9547, 9355/
      DATA FT( 442),FT( 443),FT( 444),FT( 445)/ 9164, 9101, 9039, 9103/
      DATA FT( 446),FT( 447),FT( 448),FT( 449)/13207, 9175, 9304, 9560/
      DATA FT( 450),FT( 451),FT( 452),FT( 453)/ 9751, 9876,13720, 9814/
      DATA FT( 454),FT( 455),FT( 456),FT( 457)/ 9875, 9873, 9806, 9612/
      DATA FT( 458),FT( 459),FT( 460),FT( 461)/13968, 9741, 9548, 9356/
      DATA FT( 462),FT( 463),FT( 464),FT( 465)/ 9165, 9103,13388, 9102/
      DATA FT( 466)/0/
      DATA FDT(1, 20),FDT(2, 20),FDT(3, 20)/ 54,20, 467/
      DATA FT( 467),FT( 468),FT( 469),FT( 470)/13855, 9821, 9885, 9823/
      DATA FT( 471),FT( 472),FT( 473),FT( 474)/ 9632, 9504, 9311, 9180/
      DATA FT( 475),FT( 476),FT( 477),FT( 478)/ 9111, 9106, 9166, 9292/
      DATA FT( 479),FT( 480),FT( 481),FT( 482)/ 9483, 9547, 9740, 9870/
      DATA FT( 483),FT( 484),FT( 485),FT( 486)/ 9937, 9938, 9877, 9751/
      DATA FT( 487),FT( 488),FT( 489),FT( 490)/ 9560, 9496, 9303, 9173/
      DATA FT( 491),FT( 492),FT( 493),FT( 494)/13918, 9631, 9503, 9310/
      DATA FT( 495),FT( 496),FT( 497),FT( 498)/13471, 9244, 9175, 9170/
      DATA FT( 499),FT( 500),FT( 501),FT( 502)/ 9230, 9420,13264, 9293/
      DATA FT( 503),FT( 504),FT( 505),FT( 506)/ 9484, 9548, 9741, 9872/
      DATA FT( 507),FT( 508),FT( 509),FT( 510)/13708, 9806, 9873, 9874/
      DATA FT( 511),FT( 512),FT( 513),FT( 514)/ 9813, 9623,13971, 9750/
      DATA FT( 515),FT( 516),FT( 517),FT( 518)/ 9559, 9495, 9302, 9171/
      DATA FT( 519),FT( 520),FT( 521),FT( 522)/13527, 9237, 9170,0/
      DATA FDT(1, 21),FDT(2, 21),FDT(3, 21)/ 55,20, 523/
      DATA FT( 523),FT( 524),FT( 525),FT( 526)/13152, 9952, 9291,13152/
      DATA FT( 527),FT( 528),FT( 529),FT( 530)/ 9055, 9887,13984, 9227/
      DATA FT( 531),FT( 532)/ 9291,0/
      DATA FDT(1, 22),FDT(2, 22),FDT(3, 22)/ 56,20, 533/
      DATA FT( 533),FT( 534),FT( 535),FT( 536)/13472, 9183, 9117, 9115/
      DATA FT( 537),FT( 538),FT( 539),FT( 540)/ 9177, 9240, 9367, 9622/
      DATA FT( 541),FT( 542),FT( 543),FT( 544)/ 9749, 9812, 9874, 9871/
      DATA FT( 545),FT( 546),FT( 547),FT( 548)/ 9805, 9612, 9356, 9165/
      DATA FT( 549),FT( 550),FT( 551),FT( 552)/ 9103, 9106, 9172, 9237/
      DATA FT( 553),FT( 554),FT( 555),FT( 556)/ 9366, 9623, 9752, 9817/
      DATA FT( 557),FT( 558),FT( 559),FT( 560)/ 9883, 9885, 9823, 9632/
      DATA FT( 561),FT( 562),FT( 563),FT( 564)/ 9376,13343, 9181, 9179/
      DATA FT( 565),FT( 566),FT( 567),FT( 568)/ 9241, 9368, 9623, 9750/
      DATA FT( 569),FT( 570),FT( 571),FT( 572)/ 9876, 9938, 9935, 9869/
      DATA FT( 573),FT( 574),FT( 575),FT( 576)/ 9804, 9611, 9355, 9164/
      DATA FT( 577),FT( 578),FT( 579),FT( 580)/ 9101, 9039, 9042, 9108/
      DATA FT( 581),FT( 582),FT( 583),FT( 584)/ 9238, 9367, 9624, 9753/
      DATA FT( 585),FT( 586),FT( 587),FT( 588)/ 9819, 9821, 9759,13918/
      DATA FT( 589),FT( 590),FT( 591),FT( 592)/ 9631, 9375, 9182,13198/
      DATA FT( 593),FT( 594),FT( 595),FT( 596)/ 9292,13772, 9870,0/
      DATA FDT(1, 23),FDT(2, 23),FDT(3, 23)/ 57,20, 597/
      DATA FT( 597),FT( 598),FT( 599),FT( 600)/13910, 9684, 9491, 9427/
      DATA FT( 601),FT( 602),FT( 603),FT( 604)/ 9236, 9110, 9049, 9050/
      DATA FT( 605),FT( 606),FT( 607),FT( 608)/ 9117, 9247, 9440, 9504/
      DATA FT( 609),FT( 610),FT( 611),FT( 612)/ 9695, 9821, 9881, 9876/
      DATA FT( 613),FT( 614),FT( 615),FT( 616)/ 9807, 9676, 9483, 9355/
      DATA FT( 617),FT( 618),FT( 619),FT( 620)/ 9164, 9102, 9166, 9228/
      DATA FT( 621),FT( 622),FT( 623),FT( 624)/13913, 9750, 9556,13912/
      DATA FT( 625),FT( 626),FT( 627),FT( 628)/ 9685, 9492, 9428, 9237/
      DATA FT( 629),FT( 630),FT( 631),FT( 632)/ 9112,13460, 9174, 9113/
      DATA FT( 633),FT( 634),FT( 635),FT( 636)/ 9114, 9181, 9375,13211/
      DATA FT( 637),FT( 638),FT( 639),FT( 640)/ 9246, 9439, 9503, 9694/
      DATA FT( 641),FT( 642),FT( 643),FT( 644)/ 9819,13663, 9757, 9817/
      DATA FT( 645),FT( 646),FT( 647),FT( 648)/ 9812, 9743, 9612,13773/
      DATA FT( 649),FT( 650),FT( 651),FT( 652)/ 9484, 9356, 9165,0/
      DATA FDT(1, 24),FDT(2, 24),FDT(3, 24)/ 58,10, 653/
      DATA FT( 653),FT( 654),FT( 655),FT( 656)/13273, 9112, 9175, 9240/
      DATA FT( 657),FT( 658),FT( 659),FT( 660)/ 9177,13261, 9100, 9163/
      DATA FT( 661),FT( 662),FT( 663)/ 9228, 9165,0/
      DATA FDT(1, 25),FDT(2, 25),FDT(3, 25)/ 59,10, 664/
      DATA FT( 664),FT( 665),FT( 666),FT( 667)/13273, 9112, 9175, 9240/
      DATA FT( 668),FT( 669),FT( 670),FT( 671)/ 9177,13259, 9100, 9165/
      DATA FT( 672),FT( 673),FT( 674),FT( 675)/ 9228, 9226, 9160, 9095/
      DATA FT( 676)/0/
      DATA FDT(1, 26),FDT(2, 26),FDT(3, 26)/ 60,24, 677/
      DATA FT( 677),FT( 678),FT( 679),FT( 680)/14237, 9108,10123,0/
      DATA FDT(1, 27),FDT(2, 27),FDT(3, 27)/ 61,25, 681/
      DATA FT( 681),FT( 682),FT( 683),FT( 684)/13209,10201,10200,13209/
      DATA FT( 685),FT( 686),FT( 687),FT( 688)/ 9112,10200,13201,10193/
      DATA FT( 689),FT( 690),FT( 691),FT( 692)/10192,13201, 9104,10192/
      DATA FT( 693)/0/
      DATA FDT(1, 28),FDT(2, 28),FDT(3, 28)/ 62,24, 694/
      DATA FT( 694),FT( 695),FT( 696),FT( 697)/13213,10132, 9099,0/
      DATA FDT(1, 29),FDT(2, 29),FDT(3, 29)/ 63,18, 698/
      DATA FT( 698),FT( 699),FT( 700),FT( 701)/13212, 9179, 9114, 9051/
      DATA FT( 702),FT( 703),FT( 704),FT( 705)/ 9052, 9118, 9183, 9312/
      DATA FT( 706),FT( 707),FT( 708),FT( 709)/ 9504, 9695, 9758, 9820/
      DATA FT( 710),FT( 711),FT( 712),FT( 713)/ 9818, 9752, 9687, 9429/
      DATA FT( 714),FT( 715),FT( 716),FT( 717)/ 9426,13600, 9631, 9694/
      DATA FT( 718),FT( 719),FT( 720),FT( 721)/ 9756, 9754, 9688, 9558/
      DATA FT( 722),FT( 723),FT( 724),FT( 725)/13517, 9356, 9419, 9484/
      DATA FT( 726),FT( 727)/ 9421,0/
      DATA FDT(1, 30),FDT(2, 30),FDT(3, 30)/ 64,27, 728/
      DATA FT( 728),FT( 729),FT( 730),FT( 731)/14104, 9946, 9819, 9627/
      DATA FT( 732),FT( 733),FT( 734),FT( 735)/ 9498, 9433, 9366, 9363/
      DATA FT( 736),FT( 737),FT( 738),FT( 739)/ 9425, 9552, 9744, 9873/
      DATA FT( 740),FT( 741),FT( 742),FT( 743)/ 9939,13723, 9497, 9430/
      DATA FT( 744),FT( 745),FT( 746),FT( 747)/ 9427, 9489, 9552,14107/
      DATA FT( 748),FT( 749),FT( 750),FT( 751)/ 9939, 9937,10064,10192/
      DATA FT( 752),FT( 753),FT( 754),FT( 755)/10322,10389,10391,10330/
      DATA FT( 756),FT( 757),FT( 758),FT( 759)/10268,10142,10015, 9824/
      DATA FT( 760),FT( 761),FT( 762),FT( 763)/ 9632, 9439, 9310, 9180/
      DATA FT( 764),FT( 765),FT( 766),FT( 767)/ 9114, 9047, 9044, 9105/
      DATA FT( 768),FT( 769),FT( 770),FT( 771)/ 9167, 9293, 9420, 9611/
      DATA FT( 772),FT( 773),FT( 774),FT( 775)/ 9803, 9996,10125,10190/
      DATA FT( 776),FT( 777),FT( 778),FT( 779)/14171,10003,10001,10064/
      DATA FT( 780)/0/
      DATA FDT(1, 31),FDT(2, 31),FDT(3, 31)/ 65,20, 781/
      DATA FT( 781),FT( 782),FT( 783),FT( 784)/13600, 8971,13597, 9035/
      DATA FT( 785),FT( 786),FT( 787),FT( 788)/ 8971,13597, 9931, 9995/
      DATA FT( 789),FT( 790),FT( 791),FT( 792)/13600, 9995,13265, 9809/
      DATA FT( 793),FT( 794),FT( 795)/13200, 9872,0/
C     ASCII CODE 066 - UPPER CASE B
      DATA FDT(1, 32),FDT(2, 32),FDT(3, 32)/ 66,20, 796/
      DATA FT( 796),FT( 797),FT( 798),FT( 799)/13216, 9099,13279, 9164/
      DATA FT( 800),FT( 801),FT( 802),FT( 803)/13216, 9632, 9823, 9886/
      DATA FT( 804),FT( 805),FT( 806),FT( 807)/ 9948, 9945, 9879, 9814/
      DATA FT( 808),FT( 809),FT( 810),FT( 811)/ 9621,13279, 9631, 9822/
      DATA FT( 812),FT( 813),FT( 814),FT( 815)/ 9884, 9881, 9815, 9622/
      DATA FT( 816),FT( 817),FT( 818),FT( 819)/13270, 9622, 9813, 9876/
      DATA FT( 820),FT( 821),FT( 822),FT( 823)/ 9938, 9935, 9869, 9804/
      DATA FT( 824),FT( 825),FT( 826),FT( 827)/ 9611, 9099,13269, 9621/
      DATA FT( 828),FT( 829),FT( 830),FT( 831)/ 9812, 9874, 9871, 9805/
      DATA FT( 832),FT( 833),FT( 834)/ 9612, 9164,0/
      DATA FDT(1, 33),FDT(2, 33),FDT(3, 33)/ 67,21, 835/
      DATA FT( 835),FT( 836),FT( 837),FT( 838)/14107, 9949, 9823, 9696/
      DATA FT( 839),FT( 840),FT( 841),FT( 842)/ 9440, 9311, 9181, 9115/
      DATA FT( 843),FT( 844),FT( 845),FT( 846)/ 9048, 9043, 9104, 9166/
      DATA FT( 847),FT( 848),FT( 849),FT( 850)/ 9292, 9419, 9675, 9804/
      DATA FT( 851),FT( 852),FT( 853),FT( 854)/ 9934,10000,14107, 9947/
      DATA FT( 855),FT( 856),FT( 857),FT( 858)/ 9885, 9822, 9695, 9439/
      DATA FT( 859),FT( 860),FT( 861),FT( 862)/ 9310, 9179, 9112, 9107/
      DATA FT( 863),FT( 864),FT( 865),FT( 866)/ 9168, 9293, 9420, 9676/
      DATA FT( 867),FT( 868),FT( 869),FT( 870)/ 9805, 9870, 9936,10000/
      DATA FT( 871)/0/
      DATA FDT(1, 34),FDT(2, 34),FDT(3, 34)/ 68,21, 872/
      DATA FT( 872),FT( 873),FT( 874),FT( 875)/13216, 9099,13279, 9164/
      DATA FT( 876),FT( 877),FT( 878),FT( 879)/13216, 9568, 9759, 9885/
      DATA FT( 880),FT( 881),FT( 882),FT( 883)/ 9947,10008,10003, 9936/
      DATA FT( 884),FT( 885),FT( 886),FT( 887)/ 9870, 9740, 9547, 9099/
      DATA FT( 888),FT( 889),FT( 890),FT( 891)/13279, 9567, 9758, 9821/
      DATA FT( 892),FT( 893),FT( 894),FT( 895)/ 9883, 9944, 9939, 9872/
      DATA FT( 896),FT( 897),FT( 898),FT( 899)/ 9806, 9741, 9548, 9164/
      DATA FT( 900)/0/
      DATA FDT(1, 35),FDT(2, 35),FDT(3, 35)/ 69,19, 901/
      DATA FT( 901),FT( 902),FT( 903),FT( 904)/13216, 9099,13279, 9164/
      DATA FT( 905),FT( 906),FT( 907),FT( 908)/13216, 9888,13279, 9887/
      DATA FT( 909),FT( 910),FT( 911),FT( 912)/ 9888,13270, 9558, 9557/
      DATA FT( 913),FT( 914),FT( 915),FT( 916)/13269, 9557,13260, 9868/
      DATA FT( 917),FT( 918),FT( 919),FT( 920)/ 9867,13195, 9867,0/
      DATA FDT(1, 36),FDT(2, 36),FDT(3, 36)/ 70,18, 921/
      DATA FT( 921),FT( 922),FT( 923),FT( 924)/13216, 9099,13279, 9163/
      DATA FT( 925),FT( 926),FT( 927),FT( 928)/ 9099,13216, 9888,13279/
      DATA FT( 929),FT( 930),FT( 931),FT( 932)/ 9887, 9888,13270, 9558/
      DATA FT( 933),FT( 934),FT( 935),FT( 936)/ 9557,13269, 9557,0/
      DATA FDT(1, 37),FDT(2, 37),FDT(3, 37)/ 71,21, 937/
      DATA FT( 937),FT( 938),FT( 939),FT( 940)/14107, 9949, 9823, 9696/
      DATA FT( 941),FT( 942),FT( 943),FT( 944)/ 9440, 9311, 9181, 9115/
      DATA FT( 945),FT( 946),FT( 947),FT( 948)/ 9048, 9043, 9104, 9166/
      DATA FT( 949),FT( 950),FT( 951),FT( 952)/ 9292, 9419, 9675, 9804/
      DATA FT( 953),FT( 954),FT( 955),FT( 956)/ 9934,10000,10004, 9684/
      DATA FT( 957),FT( 958),FT( 959),FT( 960)/14107, 9947, 9885, 9822/
      DATA FT( 961),FT( 962),FT( 963),FT( 964)/ 9695, 9439, 9310, 9245/
      DATA FT( 965),FT( 966),FT( 967),FT( 968)/ 9179, 9112, 9107, 9168/
      DATA FT( 969),FT( 970),FT( 971),FT( 972)/ 9230, 9293, 9420, 9676/
      DATA FT( 973),FT( 974),FT( 975),FT( 976)/ 9805, 9870, 9936, 9939/
      DATA FT( 977),FT( 978),FT( 979)/ 9683, 9684,0/
      DATA FDT(1, 38),FDT(2, 38),FDT(3, 38)/ 72,22, 980/
      DATA FT( 980),FT( 981),FT( 982),FT( 983)/13216, 9099,13216, 9184/
      DATA FT( 984),FT( 985),FT( 986),FT( 987)/ 9163, 9099,14112, 9952/
      DATA FT( 988),FT( 989),FT( 990),FT( 991)/ 9931, 9995,14112, 9995/
      DATA FT( 992),FT( 993),FT( 994),FT( 995)/13270, 9942,13269, 9941/
      DATA FT( 996)/0/
      DATA FDT(1, 39),FDT(2, 39),FDT(3, 39)/ 73, 9, 997/
      DATA FT( 997),FT( 998),FT( 999),FT(1000)/13216, 9099, 9163,13216/
      DATA FT(1001),FT(1002),FT(1003)/ 9184, 9163,0/
      DATA FDT(1, 40),FDT(2, 40),FDT(3, 40)/ 74,17,1004/
      DATA FT(1004),FT(1005),FT(1006),FT(1007)/13728, 9616, 9549, 9420/

      DATA FT(1008),FT(1009),FT(1010),FT(1011)/ 9292, 9165, 9104, 9040/
      DATA FT(1012),FT(1013),FT(1014),FT(1015)/13728, 9696, 9680, 9613/
      DATA FT(1016),FT(1017),FT(1018),FT(1019)/ 9548, 9419, 9291, 9164/
      DATA FT(1020),FT(1021),FT(1022)/ 9101, 9040,0/
      DATA FDT(1, 41),FDT(2, 41),FDT(3, 41)/ 75,21,1023/
      DATA FT(1023),FT(1024),FT(1025),FT(1026)/13216, 9099, 9163,13216/
      DATA FT(1027),FT(1028),FT(1029),FT(1030)/ 9184, 9163,14112, 9952/
      DATA FT(1031),FT(1032),FT(1033),FT(1034)/ 9172,14112, 9171,13463/
      DATA FT(1035),FT(1036),FT(1037),FT(1038)/ 9931, 9995,13527, 9995/
      DATA FT(1039)/0/
      DATA FDT(1, 42),FDT(2, 42),FDT(3, 42)/ 76,17,1040/
      DATA FT(1040),FT(1041),FT(1042),FT(1043)/13216, 9099,13216, 9184/
      DATA FT(1044),FT(1045),FT(1046),FT(1047)/ 9164,13260, 9868, 9867/
      DATA FT(1048),FT(1049),FT(1050)/13195, 9867,0/
      DATA FDT(1, 43),FDT(2, 43),FDT(3, 43)/ 77,24,1051/
      DATA FT(1051),FT(1052),FT(1053),FT(1054)/13216, 9099,13275, 9163/
      DATA FT(1055),FT(1056),FT(1057),FT(1058)/ 9099,13275, 9611,13216/
      DATA FT(1059),FT(1060),FT(1061),FT(1062)/ 9614,14240, 9614,14171/
      DATA FT(1063),FT(1064),FT(1065),FT(1066)/ 9611,14171,10059,10123/
      DATA FT(1067),FT(1068),FT(1069)/14240,10123,0/
      DATA FDT(1, 44),FDT(2, 44),FDT(3, 44)/ 78,22,1070/
      DATA FT(1070),FT(1071),FT(1072),FT(1073)/13216, 9099,13277, 9163/
      DATA FT(1074),FT(1075),FT(1076),FT(1077)/ 9099,13277, 9995,13216/
      DATA FT(1078),FT(1079),FT(1080),FT(1081)/ 9934,14048, 9934,14048/
      DATA FT(1082),FT(1083),FT(1084)/10016, 9995,0/
      DATA FDT(1, 45),FDT(2, 45),FDT(3, 45)/ 79,22,1085/
      DATA FT(1085),FT(1086),FT(1087),FT(1088)/13536, 9311, 9181, 9115/
      DATA FT(1089),FT(1090),FT(1091),FT(1092)/ 9048, 9043, 9104, 9166/
      DATA FT(1093),FT(1094),FT(1095),FT(1096)/ 9292, 9419, 9675, 9804/
      DATA FT(1097),FT(1098),FT(1099),FT(1100)/ 9934,10000,10067,10072/
      DATA FT(1101),FT(1102),FT(1103),FT(1104)/10011, 9949, 9823, 9696/
      DATA FT(1105),FT(1106),FT(1107),FT(1108)/ 9440,13599, 9310, 9179/
      DATA FT(1109),FT(1110),FT(1111),FT(1112)/ 9112, 9107, 9168, 9293/
      DATA FT(1113),FT(1114),FT(1115),FT(1116)/ 9484, 9612, 9805, 9936/
      DATA FT(1117),FT(1118),FT(1119),FT(1120)/10003,10008, 9947, 9822/
      DATA FT(1121),FT(1122),FT(1123)/ 9631, 9503,0/
      DATA FDT(1, 46),FDT(2, 46),FDT(3, 46)/ 80,20,1124/
      DATA FT(1124),FT(1125),FT(1126),FT(1127)/13216, 9099,13279, 9163/
      DATA FT(1128),FT(1129),FT(1130),FT(1131)/ 9099,13216, 9696, 9823/
      DATA FT(1132),FT(1133),FT(1134),FT(1135)/ 9886, 9948, 9945, 9879/
      DATA FT(1136),FT(1137),FT(1138),FT(1139)/ 9814, 9685, 9173,13279/
      DATA FT(1140),FT(1141),FT(1142),FT(1143)/ 9695, 9822, 9884, 9881/
      DATA FT(1144),FT(1145),FT(1146),FT(1147)/ 9815, 9686, 9174,0/
      DATA FDT(1, 47),FDT(2, 47),FDT(3, 47)/ 81,22,1148/
      DATA FT(1148),FT(1149),FT(1150),FT(1151)/13536, 9311, 9181, 9115/
      DATA FT(1152),FT(1153),FT(1154),FT(1155)/ 9048, 9043, 9104, 9166/
      DATA FT(1156),FT(1157),FT(1158),FT(1159)/ 9292, 9419, 9675, 9804/
      DATA FT(1160),FT(1161),FT(1162),FT(1163)/ 9934,10000,10067,10072/
      DATA FT(1164),FT(1165),FT(1166),FT(1167)/10011, 9949, 9823, 9696/
      DATA FT(1168),FT(1169),FT(1170),FT(1171)/ 9440,13599, 9310, 9179/
      DATA FT(1172),FT(1173),FT(1174),FT(1175)/ 9112, 9107, 9168, 9293/
      DATA FT(1176),FT(1177),FT(1178),FT(1179)/ 9484, 9612, 9805, 9936/
      DATA FT(1180),FT(1181),FT(1182),FT(1183)/10003,10008, 9947, 9822/
      DATA FT(1184),FT(1185),FT(1186),FT(1187)/ 9631, 9503,13710, 9929/
      DATA FT(1188),FT(1189),FT(1190),FT(1191)/ 9993,13710, 9678, 9993/
      DATA FT(1192)/0/
      DATA FDT(1, 48),FDT(2, 48),FDT(3, 48)/ 82,20,1193/
      DATA FT(1193),FT(1194),FT(1195),FT(1196)/13216, 9099,13279, 9163/
      DATA FT(1197),FT(1198),FT(1199),FT(1200)/ 9099,13216, 9632, 9823/
      DATA FT(1201),FT(1202),FT(1203),FT(1204)/ 9886, 9948, 9945, 9879/
      DATA FT(1205),FT(1206),FT(1207),FT(1208)/ 9814, 9621, 9173,13279/
      DATA FT(1209),FT(1210),FT(1211),FT(1212)/ 9631, 9822, 9884, 9881/
      DATA FT(1213),FT(1214),FT(1215),FT(1216)/ 9815, 9622, 9174,13589/
      DATA FT(1217),FT(1218),FT(1219),FT(1220)/ 9867, 9931,13653, 9931/
      DATA FT(1221)/0/
      DATA FDT(1, 49),FDT(2, 49),FDT(3, 49)/ 83,20,1222/
      DATA FT(1222),FT(1223),FT(1224),FT(1225)/14045, 9823, 9632, 9376/
      DATA FT(1226),FT(1227),FT(1228),FT(1229)/ 9183, 9053, 9051, 9113/
      DATA FT(1230),FT(1231),FT(1232),FT(1233)/ 9176, 9303, 9621, 9748/
      DATA FT(1234),FT(1235),FT(1236),FT(1237)/ 9811, 9873, 9870, 9805/
      DATA FT(1238),FT(1239),FT(1240),FT(1241)/ 9612, 9356, 9229, 9166/
      DATA FT(1242),FT(1243),FT(1244),FT(1245)/ 9038,14045, 9821, 9758/
      DATA FT(1246),FT(1247),FT(1248),FT(1249)/ 9631, 9375, 9182, 9117/
      DATA FT(1250),FT(1251),FT(1252),FT(1253)/ 9115, 9177, 9304, 9622/
      DATA FT(1254),FT(1255),FT(1256),FT(1257)/ 9749, 9875, 9937, 9934/
      DATA FT(1258),FT(1259),FT(1260),FT(1261)/ 9804, 9611, 9355, 9164/
      DATA FT(1262),FT(1263)/ 9038,0/
      DATA FDT(1, 50),FDT(2, 50),FDT(3, 50)/ 84,17,1264/
      DATA FT(1264),FT(1265),FT(1266),FT(1267)/13471, 9355,13535, 9419/
      DATA FT(1268),FT(1269),FT(1270),FT(1271)/ 9355,13088, 9824, 9823/
      DATA FT(1272),FT(1273),FT(1274),FT(1275)/13088, 8991, 9823,0/
      DATA FDT(1, 51),FDT(2, 51),FDT(3, 51)/ 85,22,1276/
      DATA FT(1276),FT(1277),FT(1278),FT(1279)/13216, 9105, 9166, 9292/
      DATA FT(1280),FT(1281),FT(1282),FT(1283)/ 9483, 9611, 9804, 9934/
      DATA FT(1284),FT(1285),FT(1286),FT(1287)/10001,10016,13216, 9184/
      DATA FT(1288),FT(1289),FT(1290),FT(1291)/ 9169, 9230, 9293, 9484/
      DATA FT(1292),FT(1293),FT(1294),FT(1295)/ 9612, 9805, 9870, 9937/
      DATA FT(1296),FT(1297),FT(1298)/ 9952,10016,0/
      DATA FDT(1, 52),FDT(2, 52),FDT(3, 52)/ 86,20,1299/
      DATA FT(1299),FT(1300),FT(1301),FT(1302)/13088, 9483,13088, 9056/
      DATA FT(1303),FT(1304),FT(1305),FT(1306)/ 9486,14112, 9952, 9486/
      DATA FT(1307),FT(1308),FT(1309)/14112, 9483,0/
      DATA FDT(1, 53),FDT(2, 53),FDT(3, 53)/ 87,26,1310/
      DATA FT(1310),FT(1311),FT(1312),FT(1313)/13088, 9355,13088, 9056/
      DATA FT(1314),FT(1315),FT(1316),FT(1317)/ 9358,13792, 9358,13789/
      DATA FT(1318),FT(1319),FT(1320),FT(1321)/ 9355,13789, 9995,13792/
      DATA FT(1322),FT(1323),FT(1324),FT(1325)/ 9998,14496,10336, 9998/
      DATA FT(1326),FT(1327),FT(1328)/14496, 9995,0/
      DATA FDT(1, 54),FDT(2, 54),FDT(3, 54)/ 88,20,1329/
      DATA FT(1329),FT(1330),FT(1331),FT(1332)/13152, 9867, 9931,13152/
      DATA FT(1333),FT(1334),FT(1335),FT(1336)/ 9120, 9931,14048, 9888/
      DATA FT(1337),FT(1338),FT(1339),FT(1340)/ 9035,14048, 9099, 9035/
      DATA FT(1341)/0/
      DATA FDT(1, 55),FDT(2, 55),FDT(3, 55)/ 89,19,1342/
      DATA FT(1342),FT(1343),FT(1344),FT(1345)/13088, 9430, 9419, 9483/
      DATA FT(1346),FT(1347),FT(1348),FT(1349)/13088, 9056, 9494,14048/
      DATA FT(1350),FT(1351),FT(1352),FT(1353)/ 9888, 9430,14048, 9494/
      DATA FT(1354),FT(1355)/ 9483,0/
      DATA FDT(1, 56),FDT(2, 56),FDT(3, 56)/ 90,20,1356/
      DATA FT(1356),FT(1357),FT(1358),FT(1359)/13984, 9035,14048, 9099/
      DATA FT(1360),FT(1361),FT(1362),FT(1363)/13152, 9952,13152, 9055/
      DATA FT(1364),FT(1365),FT(1366),FT(1367)/ 9887,13196, 9932, 9931/
      DATA FT(1368),FT(1369),FT(1370)/13131, 9931,0/
      DATA FDT(1, 57),FDT(2, 57),FDT(3, 57)/ 91,14,1371/
      DATA FT(1371),FT(1372),FT(1373),FT(1374)/13220, 9092,13284, 9156/
      DATA FT(1375),FT(1376),FT(1377),FT(1378)/13220, 9572,13188, 9540/
      DATA FT(1379)/0/
      DATA FDT(1, 58),FDT(2, 58),FDT(3, 58)/ 93,14,1380/
      DATA FT(1380),FT(1381),FT(1382),FT(1383)/13540, 9412,13604, 9476/
      DATA FT(1384),FT(1385),FT(1386),FT(1387)/13156, 9508,13124, 9476/
      DATA FT(1388)/0/
      DATA FDT(1, 59),FDT(2, 59),FDT(3, 59)/ 97,20,1389/
      DATA FT(1389),FT(1390),FT(1391),FT(1392)/13913, 9803, 9867,13913/
      DATA FT(1393),FT(1394),FT(1395),FT(1396)/ 9881, 9867,13910, 9688/
      DATA FT(1397),FT(1398),FT(1399),FT(1400)/ 9561, 9369, 9240, 9110/
      DATA FT(1401),FT(1402),FT(1403),FT(1404)/ 9043, 9041, 9102, 9228/
      DATA FT(1405),FT(1406),FT(1407),FT(1408)/ 9355, 9547, 9676, 9806/
      DATA FT(1409),FT(1410),FT(1411),FT(1412)/13910, 9560, 9368, 9239/
      DATA FT(1413),FT(1414),FT(1415),FT(1416)/ 9174, 9107, 9105, 9166/
      DATA FT(1417),FT(1418),FT(1419),FT(1420)/ 9229, 9356, 9548, 9806/
      DATA FT(1421)/0/
      DATA FDT(1, 60),FDT(2, 60),FDT(3, 60)/ 98,20,1422/
      DATA FT(1422),FT(1423),FT(1424),FT(1425)/13216, 9099, 9163,13216/
      DATA FT(1426),FT(1427),FT(1428),FT(1429)/ 9184, 9163,13270, 9304/
      DATA FT(1430),FT(1431),FT(1432),FT(1433)/ 9433, 9625, 9752, 9878/
      DATA FT(1434),FT(1435),FT(1436),FT(1437)/ 9939, 9937, 9870, 9740/
      DATA FT(1438),FT(1439),FT(1440),FT(1441)/ 9611, 9419, 9292, 9166/
      DATA FT(1442),FT(1443),FT(1444),FT(1445)/13270, 9432, 9624, 9751/
      DATA FT(1446),FT(1447),FT(1448),FT(1449)/ 9814, 9875, 9873, 9806/
      DATA FT(1450),FT(1451),FT(1452),FT(1453)/ 9741, 9612, 9420, 9166/
      DATA FT(1454)/0/
      DATA FDT(1, 61),FDT(2, 61),FDT(3, 61)/ 99,18,1455/
      DATA FT(1455),FT(1456),FT(1457),FT(1458)/13910, 9688, 9561, 9369/
      DATA FT(1459),FT(1460),FT(1461),FT(1462)/ 9240, 9110, 9043, 9041/
      DATA FT(1463),FT(1464),FT(1465),FT(1466)/ 9102, 9228, 9355, 9547/
      DATA FT(1467),FT(1468),FT(1469),FT(1470)/ 9676, 9806,13910, 9749/
      DATA FT(1471),FT(1472),FT(1473),FT(1474)/ 9687, 9560, 9368, 9239/
      DATA FT(1475),FT(1476),FT(1477),FT(1478)/ 9174, 9107, 9105, 9166/
      DATA FT(1479),FT(1480),FT(1481),FT(1482)/ 9229, 9356, 9548, 9677/
      DATA FT(1483),FT(1484),FT(1485)/ 9743, 9806,0/
      DATA FDT(1, 62),FDT(2, 62),FDT(3, 62)/100,20,1486/
      DATA FT(1486),FT(1487),FT(1488),FT(1489)/13920, 9803, 9867,13920/
      DATA FT(1490),FT(1491),FT(1492),FT(1493)/ 9888, 9867,13910, 9688/
      DATA FT(1494),FT(1495),FT(1496),FT(1497)/ 9561, 9369, 9240, 9110/
      DATA FT(1498),FT(1499),FT(1500),FT(1501)/ 9043, 9041, 9102, 9228/
      DATA FT(1502),FT(1503),FT(1504),FT(1505)/ 9355, 9547, 9676, 9806/
      DATA FT(1506),FT(1507),FT(1508),FT(1509)/13910, 9560, 9368, 9239/
      DATA FT(1510),FT(1511),FT(1512),FT(1513)/ 9174, 9107, 9105, 9166/
      DATA FT(1514),FT(1515),FT(1516),FT(1517)/ 9229, 9356, 9548, 9806/
      DATA FT(1518)/0/
      DATA FDT(1, 63),FDT(2, 63),FDT(3, 63)/101,18,1519/
      DATA FT(1519),FT(1520),FT(1521),FT(1522)/13202, 9810, 9813, 9751/
      DATA FT(1523),FT(1524),FT(1525),FT(1526)/ 9688, 9561, 9369, 9240/
      DATA FT(1527),FT(1528),FT(1529),FT(1530)/ 9110, 9043, 9041, 9102/
      DATA FT(1531),FT(1532),FT(1533),FT(1534)/ 9228, 9355, 9547, 9676/
      DATA FT(1535),FT(1536),FT(1537),FT(1538)/ 9806,13203, 9747, 9749/
      DATA FT(1539),FT(1540),FT(1541),FT(1542)/ 9687, 9560, 9368, 9239/
      DATA FT(1543),FT(1544),FT(1545),FT(1546)/ 9174, 9107, 9105, 9166/
      DATA FT(1547),FT(1548),FT(1549),FT(1550)/ 9229, 9356, 9548, 9677/
      DATA FT(1551),FT(1552),FT(1553)/ 9743, 9806,0/
      DATA FDT(1, 64),FDT(2, 64),FDT(3, 64)/102,14,1554/
      DATA FT(1554),FT(1555),FT(1556),FT(1557)/13664, 9440, 9311, 9244/
      DATA FT(1558),FT(1559),FT(1560),FT(1561)/ 9227, 9291,13664, 9567/
      DATA FT(1562),FT(1563),FT(1564),FT(1565)/ 9439, 9310,13471, 9308/
      DATA FT(1566),FT(1567),FT(1568),FT(1569)/ 9291,13145, 9497, 9496/
      DATA FT(1570),FT(1571),FT(1572),FT(1573)/13145, 9048, 9496,0/
      DATA FDT(1, 65),FDT(2, 65),FDT(3, 65)/103,20,1574/
      DATA FT(1574),FT(1575),FT(1576),FT(1577)/13977, 9817, 9802, 9735/
      DATA FT(1578),FT(1579),FT(1580),FT(1581)/ 9670, 9541, 9413, 9286/
      DATA FT(1582),FT(1583),FT(1584),FT(1585)/ 9223, 9095,13977, 9866/
      DATA FT(1586),FT(1587),FT(1588),FT(1589)/ 9799, 9669, 9540, 9348/
      DATA FT(1590),FT(1591),FT(1592),FT(1593)/ 9221, 9095,13910, 9688/
      DATA FT(1594),FT(1595),FT(1596),FT(1597)/ 9561, 9369, 9240, 9110/
      DATA FT(1598),FT(1599),FT(1600),FT(1601)/ 9043, 9041, 9102, 9228/
      DATA FT(1602),FT(1603),FT(1604),FT(1605)/ 9355, 9547, 9676, 9806/
      DATA FT(1606),FT(1607),FT(1608),FT(1609)/13910, 9560, 9368, 9239/
      DATA FT(1610),FT(1611),FT(1612),FT(1613)/ 9174, 9107, 9105, 9166/
      DATA FT(1614),FT(1615),FT(1616),FT(1617)/ 9229, 9356, 9548, 9806/
      DATA FT(1618)/0/
      DATA FDT(1, 66),FDT(2, 66),FDT(3, 66)/104,20,1619/
      DATA FT(1619),FT(1620),FT(1621),FT(1622)/13216, 9099, 9163,13216/
      DATA FT(1623),FT(1624),FT(1625),FT(1626)/ 9184, 9163,13269, 9368/
      DATA FT(1627),FT(1628),FT(1629),FT(1630)/ 9497, 9689, 9816, 9877/
      DATA FT(1631),FT(1632),FT(1633),FT(1634)/ 9867,13269, 9367, 9496/
      DATA FT(1635),FT(1636),FT(1637),FT(1638)/ 9624, 9751, 9813, 9803/
      DATA FT(1639),FT(1640)/ 9867,0/
      DATA FDT(1, 67),FDT(2, 67),FDT(3, 67)/105, 9,1641/
      DATA FT(1641),FT(1642),FT(1643),FT(1644)/13216, 9055, 9054, 9117/
      DATA FT(1645),FT(1646),FT(1647),FT(1648)/ 9181, 9246, 9247, 9184/
      DATA FT(1649),FT(1650),FT(1651),FT(1652)/ 9120,13215, 9118, 9182/
      DATA FT(1653),FT(1654),FT(1655),FT(1656)/ 9183, 9119,13209, 9099/
      DATA FT(1657),FT(1658),FT(1659),FT(1660)/ 9163,13209, 9177, 9163/
      DATA FT(1661)/0/
      DATA FDT(1, 68),FDT(2, 68),FDT(3, 68)/106, 9,1662/
      DATA FT(1662),FT(1663),FT(1664),FT(1665)/13216, 9055, 9054, 9117/
      DATA FT(1666),FT(1667),FT(1668),FT(1669)/ 9181, 9246, 9247, 9184/
      DATA FT(1670),FT(1671),FT(1672),FT(1673)/ 9120,13215, 9118, 9182/
      DATA FT(1674),FT(1675),FT(1676),FT(1677)/ 9183, 9119,13209, 9092/
      DATA FT(1678),FT(1679),FT(1680),FT(1681)/ 9156,13209, 9177, 9156/
      DATA FT(1682)/0/
      DATA FDT(1, 69),FDT(2, 69),FDT(3, 69)/107,19,1683/
      DATA FT(1683),FT(1684),FT(1685),FT(1686)/13216, 9099, 9163,13216/
      DATA FT(1687),FT(1688),FT(1689),FT(1690)/ 9184, 9163,13977, 9817/
      DATA FT(1691),FT(1692),FT(1693),FT(1694)/ 9167,13977, 9166,13458/
      DATA FT(1695),FT(1696),FT(1697),FT(1698)/ 9739, 9867,13523, 9867/
      DATA FT(1699)/0/
      DATA FDT(1, 70),FDT(2, 70),FDT(3, 70)/108, 9,1700/
      DATA FT(1700),FT(1701),FT(1702),FT(1703)/13216, 9099, 9163,13216/
      DATA FT(1704),FT(1705),FT(1706)/ 9184, 9163,0/
      DATA FDT(1, 71),FDT(2, 71),FDT(3, 71)/109,31,1707/
      DATA FT(1707),FT(1708),FT(1709),FT(1710)/13209, 9099, 9163,13209/
      DATA FT(1711),FT(1712),FT(1713),FT(1714)/ 9177, 9163,13269, 9368/
      DATA FT(1715),FT(1716),FT(1717),FT(1718)/ 9497, 9689, 9816, 9877/
      DATA FT(1719),FT(1720),FT(1721),FT(1722)/ 9867,13269, 9367, 9496/
      DATA FT(1723),FT(1724),FT(1725),FT(1726)/ 9624, 9751, 9813, 9803/
      DATA FT(1727),FT(1728),FT(1729),FT(1730)/ 9867,13973,10072,10201/
      DATA FT(1731),FT(1732),FT(1733),FT(1734)/10393,10520,10581,10571/
      DATA FT(1735),FT(1736),FT(1737),FT(1738)/13973,10071,10200,10328/
      DATA FT(1739),FT(1740),FT(1741),FT(1742)/10455,10517,10507,10571/
      DATA FT(1743)/0/
      DATA FDT(1, 72),FDT(2, 72),FDT(3, 72)/110,20,1744/
      DATA FT(1744),FT(1745),FT(1746),FT(1747)/13209, 9099, 9163,13209/
      DATA FT(1748),FT(1749),FT(1750),FT(1751)/ 9177, 9163,13269, 9368/
      DATA FT(1752),FT(1753),FT(1754),FT(1755)/ 9497, 9689, 9816, 9877/
      DATA FT(1756),FT(1757),FT(1758),FT(1759)/ 9867,13269, 9367, 9496/
      DATA FT(1760),FT(1761),FT(1762),FT(1763)/ 9624, 9751, 9813, 9803/
      DATA FT(1764),FT(1765)/ 9867,0/
      DATA FDT(1, 73),FDT(2, 73),FDT(3, 73)/111,19,1766/
      DATA FT(1766),FT(1767),FT(1768),FT(1769)/13465, 9240, 9110, 9043/
      DATA FT(1770),FT(1771),FT(1772),FT(1773)/ 9041, 9102, 9228, 9355/
      DATA FT(1774),FT(1775),FT(1776),FT(1777)/ 9547, 9676, 9806, 9873/
      DATA FT(1778),FT(1779),FT(1780),FT(1781)/ 9875, 9814, 9688, 9561/
      DATA FT(1782),FT(1783),FT(1784),FT(1785)/ 9369,13464, 9239, 9174/
      DATA FT(1786),FT(1787),FT(1788),FT(1789)/ 9107, 9105, 9166, 9229/
      DATA FT(1790),FT(1791),FT(1792),FT(1793)/ 9356, 9548, 9677, 9742/
      DATA FT(1794),FT(1795),FT(1796),FT(1797)/ 9809, 9811, 9750, 9687/
      DATA FT(1798),FT(1799),FT(1800)/ 9560, 9368,0/
      DATA FDT(1, 74),FDT(2, 74),FDT(3, 74)/112,20,1801/
      DATA FT(1801),FT(1802),FT(1803),FT(1804)/13209, 9092, 9156,13209/
      DATA FT(1805),FT(1806),FT(1807),FT(1808)/ 9177, 9156,13270, 9304/
      DATA FT(1809),FT(1810),FT(1811),FT(1812)/ 9433, 9625, 9752, 9878/
      DATA FT(1813),FT(1814),FT(1815),FT(1816)/ 9939, 9937, 9870, 9740/
      DATA FT(1817),FT(1818),FT(1819),FT(1820)/ 9611, 9419, 9292, 9166/
      DATA FT(1821),FT(1822),FT(1823),FT(1824)/13270, 9432, 9624, 9751/
      DATA FT(1825),FT(1826),FT(1827),FT(1828)/ 9814, 9875, 9873, 9806/
      DATA FT(1829),FT(1830),FT(1831),FT(1832)/ 9741, 9612, 9420, 9166/
      DATA FT(1833)/0/
      DATA FDT(1, 75),FDT(2, 75),FDT(3, 75)/113,20,1834/
      DATA FT(1834),FT(1835),FT(1836),FT(1837)/13913, 9796, 9860,13913/
      DATA FT(1838),FT(1839),FT(1840),FT(1841)/ 9881, 9860,13910, 9688/
      DATA FT(1842),FT(1843),FT(1844),FT(1845)/ 9561, 9369, 9240, 9110/
      DATA FT(1846),FT(1847),FT(1848),FT(1849)/ 9043, 9041, 9102, 9228/
      DATA FT(1850),FT(1851),FT(1852),FT(1853)/ 9355, 9547, 9676, 9806/
      DATA FT(1854),FT(1855),FT(1856),FT(1857)/13910, 9560, 9368, 9239/
      DATA FT(1858),FT(1859),FT(1860),FT(1861)/ 9174, 9107, 9105, 9166/
      DATA FT(1862),FT(1863),FT(1864),FT(1865)/ 9229, 9356, 9548, 9806/
      DATA FT(1866)/0/
      DATA FDT(1, 76),FDT(2, 76),FDT(3, 76)/114,14,1867/
      DATA FT(1867),FT(1868),FT(1869),FT(1870)/13209, 9099, 9163,13209/
      DATA FT(1871),FT(1872),FT(1873),FT(1874)/ 9177, 9163,13267, 9238/
      DATA FT(1875),FT(1876),FT(1877),FT(1878)/ 9368, 9497, 9689,13267/
      DATA FT(1879),FT(1880),FT(1881),FT(1882)/ 9237, 9367, 9496, 9688/
      DATA FT(1883),FT(1884)/ 9689,0/
      DATA FDT(1, 77),FDT(2, 77),FDT(3, 77)/115,17,1885/
      DATA FT(1885),FT(1886),FT(1887),FT(1888)/13846, 9688, 9497, 9305/
      DATA FT(1889),FT(1890),FT(1891),FT(1892)/ 9112, 9046, 9108, 9235/
      DATA FT(1893),FT(1894),FT(1895),FT(1896)/ 9553, 9680,13713, 9679/
      DATA FT(1897),FT(1898),FT(1899),FT(1900)/ 9678, 9612,13773, 9484/
      DATA FT(1901),FT(1902),FT(1903),FT(1904)/ 9292, 9101,13260, 9102/
      DATA FT(1905),FT(1906),FT(1907),FT(1908)/ 9038,13846, 9686, 9624/
      DATA FT(1909),FT(1910),FT(1911),FT(1912)/13783, 9496, 9304, 9111/
      DATA FT(1913),FT(1914),FT(1915),FT(1916)/13272, 9110, 9172,13205/
      DATA FT(1917),FT(1918),FT(1919),FT(1920)/ 9236, 9554, 9681, 9743/
      DATA FT(1921),FT(1922),FT(1923),FT(1924)/ 9742, 9676, 9483, 9291/
      DATA FT(1925),FT(1926),FT(1927)/ 9100, 9038,0/
      DATA FDT(1, 78),FDT(2, 78),FDT(3, 78)/116,11,1928/
      DATA FT(1928),FT(1929),FT(1930),FT(1931)/13280, 9163, 9227,13280/
      DATA FT(1932),FT(1933),FT(1934),FT(1935)/ 9248, 9227,13081, 9433/
      DATA FT(1936),FT(1937),FT(1938),FT(1939)/ 9432,13081, 8984, 9432/
      DATA FT(1940)/0/
      DATA FDT(1, 79),FDT(2, 79),FDT(3, 79)/117,20,1941/
      DATA FT(1941),FT(1942),FT(1943),FT(1944)/13209, 9103, 9164, 9291/
      DATA FT(1945),FT(1946),FT(1947),FT(1948)/ 9483, 9612, 9807,13209/
      DATA FT(1949),FT(1950),FT(1951),FT(1952)/ 9177, 9167, 9229, 9356/
      DATA FT(1953),FT(1954),FT(1955),FT(1956)/ 9484, 9613, 9807,13913/
      DATA FT(1957),FT(1958),FT(1959),FT(1960)/ 9803, 9867,13913, 9881/
      DATA FT(1961),FT(1962)/ 9867,0/
      DATA FDT(1, 80),FDT(2, 80),FDT(3, 80)/118,16,1963/
      DATA FT(1963),FT(1964),FT(1965),FT(1966)/13081, 9355,13081, 9049/
      DATA FT(1967),FT(1968),FT(1969),FT(1970)/ 9357,13849, 9689, 9357/
      DATA FT(1971),FT(1972),FT(1973)/13849, 9355,0/
      DATA FDT(1, 81),FDT(2, 81),FDT(3, 81)/119,24,1974/
      DATA FT(1974),FT(1975),FT(1976),FT(1977)/13145, 9355,13145, 9113/
      DATA FT(1978),FT(1979),FT(1980),FT(1981)/ 9358,13721, 9358,13718/
      DATA FT(1982),FT(1983),FT(1984),FT(1985)/ 9355,13718, 9867,13721/
      DATA FT(1986),FT(1987),FT(1988),FT(1989)/ 9870,14297,10137, 9870/
      DATA FT(1990),FT(1991),FT(1992)/14297, 9867,0/
      DATA FDT(1, 82),FDT(2, 82),FDT(3, 82)/120,18,1993/
      DATA FT(1993),FT(1994),FT(1995),FT(1996)/13145, 9739, 9803,13145/
      DATA FT(1997),FT(1998),FT(1999),FT(2000)/ 9113, 9803,13913, 9753/
      DATA FT(2001),FT(2002),FT(2003),FT(2004)/ 9035,13913, 9099, 9035/
      DATA FT(2005)/0/
      DATA FDT(1, 83),FDT(2, 83),FDT(3, 83)/121,16,2006/
      DATA FT(2006),FT(2007),FT(2008),FT(2009)/13081, 9355,13081, 9049/
      DATA FT(2010),FT(2011),FT(2012),FT(2013)/ 9357,13849, 9689, 9357/
      DATA FT(2014),FT(2015),FT(2016),FT(2017)/ 9092,13849, 9355, 9156/
      DATA FT(2018),FT(2019)/ 9092,0/
      DATA FDT(1, 84),FDT(2, 84),FDT(3, 84)/122,18,2020/
      DATA FT(2020),FT(2021),FT(2022),FT(2023)/13784, 9035,13913, 9164/
      DATA FT(2024),FT(2025),FT(2026),FT(2027)/13145, 9817,13145, 9048/
      DATA FT(2028),FT(2029),FT(2030),FT(2031)/ 9688,13260, 9804, 9803/
      DATA FT(2032),FT(2033),FT(2034)/13131, 9803,0/
      DATA FDT(1, 85),FDT(2, 85),FDT(3, 85)/123,14,2035/
      DATA FT(2035),FT(2036),FT(2037),FT(2038)/13540, 9315, 9250, 9184/
      DATA FT(2039),FT(2040),FT(2041),FT(2042)/ 9182, 9244, 9307, 9369/
      DATA FT(2043),FT(2044),FT(2045),FT(2046)/ 9367, 9237,13411, 9249/
      DATA FT(2047),FT(2048),FT(2049),FT(2050)/ 9247, 9309, 9372, 9434/
      DATA FT(2051),FT(2052),FT(2053),FT(2054)/ 9432, 9366, 9108, 9362/
      DATA FT(2055),FT(2056),FT(2057),FT(2058)/ 9424, 9422, 9356, 9291/
      DATA FT(2059),FT(2060),FT(2061),FT(2062)/ 9225, 9223, 9285,13331/
      DATA FT(2063),FT(2064),FT(2065),FT(2066)/ 9361, 9359, 9293, 9228/
      DATA FT(2067),FT(2068),FT(2069),FT(2070)/ 9162, 9160, 9222, 9285/
      DATA FT(2071),FT(2072)/ 9412,0/
      DATA FDT(1, 86),FDT(2, 86),FDT(3, 86)/125,14,2073/
      DATA FT(2073),FT(2074),FT(2075),FT(2076)/13284, 9315, 9378, 9440/
      DATA FT(2077),FT(2078),FT(2079),FT(2080)/ 9438, 9372, 9307, 9241/
      DATA FT(2081),FT(2082),FT(2083),FT(2084)/ 9239, 9365,13411, 9377/
      DATA FT(2085),FT(2086),FT(2087),FT(2088)/ 9375, 9309, 9244, 9178/
      DATA FT(2089),FT(2090),FT(2091),FT(2092)/ 9176, 9238, 9492, 9234/
      DATA FT(2093),FT(2094),FT(2095),FT(2096)/ 9168, 9166, 9228, 9291/
      DATA FT(2097),FT(2098),FT(2099),FT(2100)/ 9353, 9351, 9285,13459/
      DATA FT(2101),FT(2102),FT(2103),FT(2104)/ 9233, 9231, 9293, 9356/
      DATA FT(2105),FT(2106),FT(2107),FT(2108)/ 9418, 9416, 9350, 9285/
      DATA FT(2109),FT(2110)/ 9156,0/
      DATA FDT(1, 87),FDT(2, 87),FDT(3, 87)/126,24,2111/
      DATA FT(2111),FT(2112),FT(2113),FT(2114)/13137, 9043, 9110, 9239/
      DATA FT(2115),FT(2116),FT(2117),FT(2118)/ 9367, 9494, 9747, 9874/
      DATA FT(2119),FT(2120),FT(2121),FT(2122)/10002,10131,10197,13139/
      DATA FT(2123),FT(2124),FT(2125),FT(2126)/ 9109, 9238, 9366, 9493/
      DATA FT(2127),FT(2128),FT(2129),FT(2130)/ 9746, 9873,10001,10130/
      DATA FT(2131),FT(2132),FT(2133)/10197,10199,0/
      DATA FDT(1,88),FDT(2,88),FDT(3,88)/32,26,2134/
      DATA FT(2134)/0/
      DO 50 I=1,128
      TXFDT(1,I)=0
      TXFDT(2,I)=0
      TXFDT(3,I)=0
50    CONTINUE
      DO 100 I=1,FDTMAX
      J=FDT(1,I)
      TXFDT(1,J)=FDT(2,I)
      TXFDT(2,J)=FDT(3,I)
      TXFDT(3,J)=32
100   CONTINUE
      DO 200 I=1,FTMAX
      TXFTAB(I)=FT(I)
200   CONTINUE
      RETURN
      END
**IN -1
