with Standard_Floating_Numbers;          use Standard_Floating_Numbers;
with Hexa_Double_Numbers;                use Hexa_Double_Numbers;

package Hexa_Double_Constants is

-- DESCRIPTION :
--   This package collects common definitions of hexa double constants
--   for use in hexa double mathematical functions.

  hd_eps : constant double_float := 5.327993384780537E-256; -- 2^(-53*16)

-- PI and multiples and factors :

  pi : constant hexa_double
     := create( 3.14159265358979312E+00, 1.22464679914735321E-16,
               -2.99476980971833967E-33, 1.11245422086336528E-49,
                5.67223197964031574E-66, 1.74498621613524860E-83,
                6.02937273224953984E-100, 1.91012354687998999E-116,
                3.04397816534429330E-133, -4.71430003094702878E-150,
                1.00154916943553891E-166, 6.21040447841589472E-183,
               -1.71681323916116030E-199, -5.49577495896909932E-216,
               -1.74900899480240872E-232, -3.59150954550134434E-249);

  twopi : constant hexa_double
        := create( 6.28318530717958623E+00, 2.44929359829470641E-16,
                  -5.98953961943667933E-33, 2.22490844172673056E-49,
                   1.13444639592806315E-65, 3.48997243227049720E-83,
                   1.20587454644990797E-99, 3.82024709375997998E-116,
                   6.08795633068858659E-133, -9.42860006189405755E-150,
                   2.00309833887107782E-166, 1.24208089568317894E-182,
                  -3.43362647832232061E-199, -1.09915499179381986E-215,
                  -3.49801798960481743E-232, -7.18302009100653462E-249);

  pi2 : constant hexa_double
      := create( 1.57079632679489656E+00, 6.12323399573676604E-17,
                -1.49738490485916983E-33, 5.56227110431682641E-50,
                 2.83611598982015787E-66, 8.72493108067624301E-84,
                 3.01468636612476992E-100, 9.55061773439994996E-117,
                 1.52198908267214665E-133, -2.35715001547351439E-150,
                 5.00774584717769456E-167, 3.10520223920794736E-183,
                -8.58406619580580152E-200, -2.74788747948454966E-216,
                -8.74504497401204358E-233, -1.79575527275174935E-249);

  pi4 : constant hexa_double
      := create( 7.85398163397448279E-01, 3.06161699786838302E-17,
                -7.48692452429584916E-34, 2.78113555215841320E-50,
                 1.41805799491007894E-66, 4.36246554033812150E-84,
                 1.50734318306238496E-100, 4.77530886719997498E-117,
                 7.60994541336073324E-134, -1.17857500773675719E-150,
                 2.50387292358884728E-167, 1.55260111960397368E-183,
                -4.29203309790290076E-200, -1.37394373974227483E-216,
                -4.37252248700602179E-233, -8.97877536376463220E-250);

  threepi4 : constant hexa_double
           := create( 2.35619449019234484E+00, 9.18485099360514844E-17,
                      3.91689846475040032E-33, -2.58679816327048642E-49,
                     -4.93609888149662566E-67, 1.30873966210143654E-83,
                     -4.62186958107104523E-100, 3.97053449747564186E-116,
                     -1.18054236907283148E-132, -5.24147068392039491E-149,
                      2.65277831174431516E-165, 1.77870793663081723E-181,
                     -6.39957784076233656E-198, -2.47792014887429673E-214,
                     -9.63187010976595200E-231, -2.88738099670834424E-247);

  pi1024 : constant hexa_double
         := create( 3.06796157577128234E-03, 1.19594413979233712E-19,
                   -2.92457989230306608E-36, 1.08638107506188016E-52,
                    5.53928904261749584E-69, 1.70408810169457871E-86,
                    5.88805930883744125E-103, 1.86535502624999023E-119,
                    2.97263492709403642E-136, -4.60380862397170779E-153,
                    9.78075360776893468E-170, 6.06484812345302219E-186,
                   -1.67657542886832061E-202, -5.36696773336826106E-219,
                   -1.70801659648672726E-235, -3.50733439208937947E-252);

-- INVERSE FACTORIALS FOR TAYLOR EXPANSION :

  i_fac0  : constant hexa_double
           := create( 1.66666666666666657E-01, 9.25185853854297066E-18,
                      5.13581318503262866E-34, 2.85094902409834186E-50,
                      1.58259462429329970E-66, 8.78516495269210220E-83,
                      4.87674620280437299E-99, 2.70713795980335902E-115,
                      1.50276344690523035E-131, 8.34201289659625339E-148,
                      4.63074739476057783E-164, 2.57058118944307625E-180,
                      1.42695921159401232E-196, 7.92121485956316549E-213,
                      4.39715756004497609E-229, 2.44091278303658703E-245);

  i_fac1  : constant hexa_double
           := create( 4.16666666666666644E-02, 2.31296463463574266E-18,
                      1.28395329625815716E-34, 7.12737256024585466E-51,
                      3.95648656073324926E-67, 2.19629123817302555E-83,
                      1.21918655070109325E-99, 6.76784489950839755E-116,
                      3.75690861726307587E-132, 2.08550322414906335E-148,
                      1.15768684869014446E-164, 6.42645297360769062E-181,
                      3.56739802898503079E-197, 1.98030371489079137E-213,
                      1.09928939001124402E-229, 6.10228195758646769E-246);

  i_fac2  : constant hexa_double
           := create( 8.33333333333333322E-03, 1.15648231731787138E-19,
                      1.60494162032269652E-36, 2.22730392507682967E-53,
                      3.09100512557285111E-70, 4.28963132455669071E-87,
                      5.95305932959518212E-104, 8.26152941834521220E-121,
                      1.14651752235811646E-137, 1.59111268932271075E-154,
                      2.20811242807415868E-171, 3.06437157326111359E-188,
                      4.25266984580162876E-205, 5.90176497367260294E-222,
                      8.19034419962200574E-239, 1.13630438323551254E-255);

  i_fac3  : constant hexa_double
           := create( 1.38888888888888894E-03,-5.30054395437357706E-20,
                     -1.73868675534958776E-36,-1.63335621172300840E-52,
                     -5.35774221765960817E-69,-5.03316742081318367E-85,
                     -1.65098178740773037E-101,-1.55096445613734114E-117,
                     -5.08748041921041505E-134,-4.77927822200827028E-150,
                     -1.56770094093457056E-166,-1.47272880645176247E-182,
                     -4.83085149758389568E-199,-4.53819601329139700E-215,
                     -1.48862104897355956E-231,-1.39843961527835708E-247);

  i_fac4  : constant hexa_double
           := create( 1.98412698412698413E-04, 1.72095582934207053E-22,
                      1.49269123913941271E-40, 1.29470326746002471E-58,
                      1.12297607624339191E-76, 9.74026481209866379E-95,
                      8.44833301588918793E-113, 7.32776080776645696E-131,
                      6.35581934978762198E-149, 5.51279451757211677E-167,
                      4.78158703393429388E-185, 4.14736564009606467E-203,
                      3.59726626966711041E-221, 3.12013112366552604E-239,
                      2.70501380569389918E-257, 7.39407616354234235E-274);

  i_fac5  : constant hexa_double
           := create( 2.48015873015873016E-05, 2.15119478667758816E-23,
                      1.86586404892426588E-41, 1.61837908432503088E-59,
                      1.40372009530423989E-77, 1.21753310151233297E-95,
                      1.05604162698614849E-113, 9.15970100970807120E-132,
                      7.94477418723452747E-150, 6.89099314696514596E-168,
                      5.97698379241786735E-186, 5.18420705012008084E-204,
                      4.49658283708388801E-222, 3.90016390458190755E-240,
                      3.38126725711737397E-258, 9.24259520442792794E-275);

  i_fac6  : constant hexa_double
           := create( 2.75573192239858925E-06,-1.85839327404647208E-22,
                      8.49175460488199287E-39,-5.72661640789429621E-55,
                      2.61672391582886888E-71,-1.76464992319726308E-87,
                      8.06340311310246955E-104,-5.43774740551399185E-120,
                      2.48472792147028858E-136,-1.67563528932694374E-152,
                      7.65665905218349604E-169,-5.16344988733876898E-185,
                      2.35939023081020584E-201,-1.59111084069898153E-217,
                      7.27043247361933967E-234,-4.90298882070342737E-250);

  i_fac7  : constant hexa_double
           := create( 2.75573192239858883E-07, 2.37677146222502973E-23,
                     -3.26318890334088294E-40, 1.61435111860404415E-56,
                     -9.99798078191450073E-74,-5.23082523455780306E-91,
                     -2.46767621898134459E-107, 8.08497474286222354E-124,
                     -4.24517638331796814E-140, 6.26790010302803998E-157,
                     -2.73093269874251108E-173,-2.23190422953293753E-190,
                      1.05349910655957186E-206,-4.11113357045017817E-223,
                      1.71065522370412005E-239,-4.14361871422611960E-256);

  i_fac8  : constant hexa_double
           := create( 2.50521083854417202E-08,-1.44881407093591197E-24,
                      2.04267351467144546E-41,-8.49632672007163175E-58,
                     -9.08907343810409139E-75,-2.26065446324988261E-91,
                     -7.19805892199252488E-108,-6.40212493137993289E-125,
                     -1.95076372700295719E-141, 5.69809100275276354E-158,
                     -1.74754343304733840E-174, 1.02132476461588104E-190,
                     -5.83808827887600326E-207,-2.25995691418344763E-223,
                      8.53554810077250039E-240, 5.92033414123434923E-257);

  i_fac9  : constant hexa_double
           := create( 2.08767569878681002E-09,-1.20734505911325997E-25,
                      1.70222792889287100E-42, 1.41609532150396700E-58,
                      5.13820161376913309E-75, 1.44797661649508516E-91,
                      1.30256332445267049E-107, 3.72847700075020451E-124,
                      8.58467087114439999E-141, 3.93203655585638094E-157,
                     -2.37308138558084163E-173, 1.16812430595384477E-189,
                      7.81948843600830630E-207,-3.07005092139969627E-223,
                     -5.68741073089031713E-240, 9.37335013640366863E-257);

  i_fac10 : constant hexa_double
           := create( 1.60590438368216133E-10, 1.25852945887520981E-26,
                     -5.31334602762985031E-43, 3.54021472597605528E-59,
                     -1.98567896059148884E-75,-1.02148490610754577E-91,
                      5.19442455358700245E-108, 2.03226501937080225E-124,
                     -2.56938883085768487E-141,-8.18079629597617230E-158,
                      6.88292886760408057E-174,-3.93556266117157556E-190,
                     -1.47326469681494656E-206, 6.14796300160548324E-223,
                      1.13755033086170987E-239, 7.44932430374539020E-256);

  i_fac11 : constant hexa_double
           := create( 1.14707455977297245E-11, 2.06555127528307454E-28,
                      6.88907923246664603E-45, 5.72920002655109095E-61,
                     -3.65551458930952487E-78,-1.73752114063892946E-94,
                     -1.29464103159491163E-110,-4.67626589929406776E-127,
                     -7.80208024976360939E-144, 9.41539866115573362E-162,
                      9.06482675066891685E-178,-2.46906360750046707E-194,
                      1.41597045006966087E-210,-1.13211894935522267E-227,
                      7.58099343876508036E-244,-4.81754630247785193E-260);

  i_fac12 : constant hexa_double
           := create( 7.64716373181981641E-13, 7.03872877733453001E-30,
                     -7.82753927716258345E-48, 1.92138649443790242E-64,
                     -1.43027453759388186E-80, 7.76151305461206293E-97,
                      3.19012607380048399E-114, 1.78550560936942146E-130,
                      4.02921430032281832E-148, 2.10653353634132368E-164,
                      1.56586909954632795E-180,-5.03931166719703315E-198,
                     -6.24571956466968188E-215,-1.73273407911286553E-231,
                     -1.08983989506144446E-247,-5.26696620078438194E-264);

  i_fac13 : constant hexa_double
           := create( 4.77947733238738525E-14, 4.39920548583408126E-31,
                     -4.89221204822661465E-49, 1.20086655902368901E-65,
                     -8.93921585996176165E-82, 4.85094565913253933E-98,
                      1.99382879612530249E-115, 1.11594100585588841E-131,
                      2.51825893770176145E-149, 1.31658346021332730E-165,
                      9.78668187216454969E-182,-3.14956979199814572E-199,
                     -3.90357472791855117E-216,-1.08295879944554096E-232,
                     -6.81149934413402789E-249,-3.29184137550409931E-265);

  i_fac14 : constant hexa_double
           := create( 2.81145725434552060E-15, 1.65088427308614326E-31,
                     -2.87777179307447918E-50, 4.27110689256293549E-67,
                     -2.93287743014724397E-83,-1.23436334109628973E-99,
                     -2.14851021924804564E-118, 2.19396004831602516E-134,
                      4.74996808318813472E-151, 3.35540063834416303E-167,
                     -1.55262790133658628E-183, 5.52474347273667915E-200,
                     -4.32491924732634944E-216, 6.94078749396983857E-233,
                      1.25140602480552373E-250, 2.52793536675536040E-267);

  i_fac15 : constant hexa_double
           := create( 1.56192069685862253E-16, 1.19106796602737540E-32,
                     -4.57750605962998323E-49, 2.87494142340899603E-67,
                      2.03110904687324058E-84,-6.85757411720160904E-101,
                     -5.65180691747504322E-117, 2.48255175510937718E-133,
                      1.61836077007489541E-149, 3.44798692295184089E-166,
                      1.01642700983668328E-182,-6.24012382853226869E-199,
                      4.48838347951861046E-215,-2.07162527715131518E-231,
                     -8.78921286762902590E-248, 6.76097507811965025E-264);

  i_fac16 : constant hexa_double
           := create( 8.22063524662432950E-18, 2.21418941196042654E-34,
                     -1.50891402377419897E-50, 1.40072951514781548E-67,
                     -5.96179899774792636E-84,-3.40489743808039776E-100,
                     -1.36550521394231557E-116,-3.57681499045122589E-133,
                     -3.82514166264397331E-149, 1.27484683929102177E-165,
                      6.71248525935463642E-182, 3.92767314689735615E-198,
                      2.02672633518469782E-214, 6.94232995423521338E-231,
                      1.76033761708643295E-247,-6.32990979474052545E-264);

  i_fac17 : constant hexa_double
           := create( 4.11031762331216484E-19, 1.44129733786595272E-36,
                     -5.28562754878981208E-53,-4.14764725635765685E-70,
                     -2.10538849298467203E-87,-5.82681010557201984E-104,
                      1.30202886782577633E-120,-3.27971291402577718E-137,
                     -1.32626890754641103E-153, 4.27146394677612704E-170,
                      1.12348154519030908E-186, 9.40258061711964835E-203,
                      1.10385616404951976E-219, 5.55764592979528651E-236,
                     -1.02310482991300946E-252, 5.52033782410369882E-269);

  i_fac18 : constant hexa_double
           := create( 1.95729410633912626E-20,-1.36435038300879085E-36,
                      1.33923482511250642E-53,-6.82108942414933122E-70,
                     -1.54203684683207840E-86,-7.25646161501115955E-103,
                      1.18641862580086732E-119, 4.32477008266988955E-136,
                      8.57431322263060114E-153,-3.26028387434457821E-169,
                      1.58131243551138389E-185,-1.62854780144633998E-201,
                      6.64221272545986402E-218, 2.34784253662522399E-235,
                      1.74100494456339599E-251,-6.72319437799326731E-268);

  i_fac19 : constant hexa_double
           := create( 8.89679139245057408E-22,-7.91140261487237622E-38,
                     -3.18779767905709333E-54, 1.27057810175205662E-70,
                     -6.55042310022825056E-87, 2.10550328869752187E-103,
                     -3.96700758009699443E-120, 1.44732684633021301E-136,
                     -4.81753638220929850E-153,-3.52058461171074154E-169,
                      1.40905816085536699E-185, 3.71345614694573334E-202,
                     -2.17038423963212927E-218,-6.75529917049125438E-235,
                      3.88832249164354273E-251, 2.43638346405630662E-267);

  i_fac20 : constant hexa_double
           := create( 3.86817017063068413E-23,-8.84317765548234385E-40,
                      3.87181571061732467E-56,-1.95652575315225570E-72,
                      5.39691325170565736E-89, 1.87480587934294261E-105,
                      1.81105888742894516E-121, 1.00313695134730449E-137,
                     -5.38057752710086799E-155, 8.93935263758267033E-172,
                      4.30605709940178036E-188, 3.36623603414523837E-205,
                      1.85989676065638256E-221,-9.53932605186492657E-238,
                     -2.32783191967346546E-254,-1.55314713642557766E-270);

  i_fac21 : constant hexa_double
           := create( 1.61173757109611839E-24,-3.68465735645097660E-41,
                      1.61325654609055195E-57,-8.15219063813439928E-74,
                      7.48508021786159889E-90, 7.81169116392892833E-107,
                     -5.21821124982141188E-124, 2.60976234532966935E-140,
                     -6.88086317291985256E-157, 3.72473026565944645E-173,
                     -2.99389012513641490E-189, 1.40259834756051608E-206,
                     -1.47193793529518201E-223, 5.04375295891231572E-240,
                      4.50868269410865932E-256,-5.56185470939559643E-273);

  i_fac22 : constant hexa_double
           := create( 6.44695028438447359E-26,-1.93304042337034648E-42,
                     -1.52130238070391442E-58, 6.64377273721295753E-75,
                     -2.89688007121263253E-91, 2.49254308464133028E-107,
                      2.21164149678796755E-124,-9.03290922321876539E-141,
                     -2.75234526916794096E-158, 8.42984168351427229E-175,
                      4.63309402250041534E-191,-1.86500282308111144E-208,
                      3.62192814803782222E-225,-2.78152862090109267E-241,
                      8.71074235306869717E-258,-2.96414950011247749E-274);

  i_fac23 : constant hexa_double
           := create( 2.47959626322479759E-27,-1.29537309647652288E-43,
                      6.40339015984996240E-60,-8.46024562770674585E-77,
                     -5.24149370502727977E-93, 4.15713747064484237E-110,
                     -1.94825926264674307E-126, 1.57228559591277112E-142,
                     -3.85995428441563175E-159,-8.42075688697199596E-176,
                      1.78195923942323685E-192,-1.86870112139811379E-208,
                     -2.35449224497543768E-225,-5.68427043541005384E-242,
                     -9.45739088531140750E-259,-5.58361289447985841E-275);

  i_fac24 : constant hexa_double
           := create( 9.18368986379554601E-29, 1.43031503967873220E-45,
                     -8.55122677465050480E-62, 8.38146710023453832E-78,
                      3.03029953301710766E-94, 2.32237352854655252E-110,
                     -1.27586459249083458E-126, 3.01211536378102089E-143,
                     -8.17362739266569861E-160,-1.24779993376567453E-176,
                     -5.83426501949777285E-193,-3.57613784331225483E-209,
                     -1.48804010049845578E-225,-2.10528534644816823E-243,
                      1.09503696901385800E-259, 5.95508134181420104E-276);

  i_fac25 : constant hexa_double
           := create( 3.27988923706983776E-30, 1.51175427440298787E-46,
                      8.05851771951971593E-63,-9.09648053071092885E-81,
                      1.21523807193217733E-97, 1.49898243133566639E-114,
                      5.73056590844191453E-131,-2.50926562681977975E-147,
                     -2.16278418018449709E-163,-5.65061829882555696E-181,
                      3.26176856418126922E-197, 1.80121239151869086E-213,
                      1.39837843743024495E-229, 8.49967590227697285E-246,
                      1.36262555756989473E-262,-4.90891738319154721E-279);

  i_fac26 : constant hexa_double
           := create( 1.13099628864477159E-31, 1.04980154129595060E-47,
                     -4.34615092939779518E-64,-4.96677980014005582E-81,
                     -2.54108908976355161E-97, 2.74015709219560046E-114,
                     -9.12989153567239791E-131,-8.37100817409627246E-147,
                      3.56614677311574793E-163,-2.23569490196392355E-179,
                      8.16705745441812722E-196,-2.71841368913761098E-212,
                      2.58625673460374993E-228,-4.01082227570236134E-245,
                      2.73801798485860572E-261,-3.71290716673426751E-278);

  i_fac27 : constant hexa_double
           := create( 3.76998762881590539E-33, 2.58703478327503238E-49,
                      3.23789002742563999E-66, 2.56128591057885727E-82,
                     -6.67503041391508032E-100,-3.04826384512978187E-116,
                      1.46499316215822502E-132, 3.37918778191504491E-149,
                      3.10287423484380446E-166, 1.84352419391958633E-183,
                     -7.54311628054975698E-200,-3.03658044392315124E-217,
                     -1.96375208692938591E-233, 7.64068022852904078E-250,
                      3.11457291847499006E-266, 2.35197200784253348E-282);

  i_fac28 : constant hexa_double
           := create( 1.21612504155351789E-34, 5.58629056788880577E-51,
                      6.61594857808279193E-68,-3.16204422895208591E-84,
                      7.96409263336490057E-102, 1.93557272906923875E-118,
                      7.49217813286381361E-135,-3.68425172923990291E-151,
                     -2.71895874500989746E-167, 4.23871727793205017E-184,
                      9.38143591126556716E-202, 4.86891663070938195E-218,
                      3.26238769550491609E-234,-2.45681966590533885E-250,
                     -1.30011714845791698E-266,-6.46077611391068325E-283);

  i_fac29 : constant hexa_double
           := create( 3.80039075485474342E-36, 1.74571580246525180E-52,
                      2.06748393065087248E-69,-9.88138821547526846E-86,
                      2.48877894792653143E-103, 6.04866477834137111E-120,
                      2.34130566651994175E-136,-1.15132866538746966E-152,
                     -8.49674607815592955E-169, 1.32459914935376568E-185,
                      2.93169872227048974E-203, 1.52153644709668186E-219,
                      1.01949615484528628E-235,-7.67756145595418390E-252,
                     -4.06286608893099055E-268,-2.01899247309790586E-284);

  i_fac30 : constant hexa_double
           := create( 1.15163356207719509E-37,-6.09957445788453978E-54,
                     -5.34474961965941049E-70, 2.62531262385000815E-86,
                      1.41462850501924472E-102,-4.33774986064765318E-119,
                     -6.59969874624964934E-136, 1.70087055000697328E-152,
                     -8.99837132959631924E-170, 1.29284723020740448E-186,
                     -5.29730804169009980E-204, 2.82177764010439932E-220,
                      5.47202787275454168E-237, 3.18734213839469075E-254,
                     -7.24974009818105753E-271, 3.13774022998428914E-287);

  i_fac31 : constant hexa_double
           := create( 3.38715753552116180E-39, 5.09056148151084995E-56,
                      3.98956734903634403E-72,-1.14951294479092623E-88,
                      6.31514658522693423E-105,-1.31445887181406313E-124,
                     -9.30669375144399396E-141, 1.08489203919451947E-157,
                      9.86066604131657411E-175,-2.44791873965200171E-191,
                      6.67125395830210309E-208,-2.03525551804015384E-224,
                      4.56793678725824765E-241,-1.06158409992748108E-257,
                     -2.27900645720545674E-274,-1.27265855976595563E-290);

  i_fac32 : constant hexa_double
           := create( 9.67759295863189067E-41, 3.20229554864556196E-57,
                      6.54750720501810104E-74,-5.91334284153607619E-91,
                     -1.57740298496631786E-107,-3.75559677661160897E-126,
                     -2.47161461794696992E-142,-1.77104109460519505E-158,
                      7.21288979309852215E-175,-1.99372291260543265E-191,
                     -6.99320864682222774E-209, 4.04983603180275637E-225,
                     -8.97851049892482712E-242,-1.25473713297580483E-258,
                      6.69226041431001992E-276,-3.63618159897006602E-292);

  i_fac33 : constant hexa_double
           := create( 2.68822026628663633E-42, 5.35506116594333401E-59,
                     -1.12906019874498676E-75,-7.09714352853527274E-92,
                     -1.95210877227131966E-108,-1.04322132683655816E-127,
                      4.52403211385561269E-144, 7.70703802556256731E-161,
                      2.48730406089782610E-177, 3.06705729007317369E-194,
                      2.11310405064572218E-210, 7.49730341488038779E-227,
                     -1.45257457338493051E-243,-5.94759513919044799E-261,
                     -4.15835336001887117E-277, 2.33016904481824520E-293);

  i_fac34 : constant hexa_double
           := create( 7.26546017915307136E-44,-4.36409714935444569E-61,
                      2.55032501210183748E-77, 3.62259693228430960E-94,
                      7.65730118197187690E-111, 5.56149999220443010E-127,
                      2.61645022746913080E-143, 8.47932799270419392E-160,
                     -2.29829686661559007E-176, 1.09080979985554995E-192,
                     -8.82150050284210500E-210,-2.80912964454223684E-226,
                      1.38937352757631956E-242,-6.82191149007816163E-259,
                      5.51691622639762275E-275,-1.50249648188652403E-291);

  i_fac35 : constant hexa_double
           := create( 1.91196320504028195E-45,-2.78608221768831261E-62,
                      2.03474372241013280E-78,-9.13939362246162657E-95,
                      5.10376432058759153E-111,-1.79742970921266983E-127,
                     -5.78556495951074042E-144, 8.22115199669247044E-161,
                     -1.43605974531664277E-177, 7.48488757647966441E-194,
                     -2.79361549203037603E-210, 2.81551009997787639E-227,
                      8.58945932880489047E-244,-5.21834416832632071E-260,
                     -2.34858915276868779E-276,-1.02828907997298296E-292);

  i_fac36 : constant hexa_double
           := create( 4.90246975651354352E-47,-1.21301910051792795E-63,
                     -4.47071800113765855E-80, 5.37597340717858998E-97,
                     -4.23910776174767480E-113, 8.65888708077644945E-130,
                     -5.38905657531752474E-146, 2.84185640600057003E-163,
                      9.05294262912149877E-180, 6.02008824292620365E-196,
                      2.09861149725750677E-212, 4.51331355273610825E-229,
                     -1.55282496651144388E-245, 1.21170957591536447E-262,
                      3.06282135856432812E-279,-1.67561066794789119E-295);

  i_fac37 : constant hexa_double
           := create( 1.22561743912838585E-48, 6.03392734831560539E-68,
                      4.07624961245823730E-84,-1.59820353307989972E-102,
                      1.20533484051576305E-119, 5.99994212728536605E-136,
                     -6.65816242051588594E-153, 1.71764418504096559E-169,
                     -1.23895713835341256E-185, 5.86777579067721249E-202,
                     -3.57503402208195582E-218, 2.21566958804096962E-234,
                     -9.08294025494110123E-251, 2.40482463310207913E-267,
                      1.32936414289746701E-283, 1.11075799316385284E-299);

  n_inv_fact : constant natural := 38;
  i_fac : array(0..n_inv_fact-1) of hexa_double
        := (i_fac0,i_fac1,i_fac2,i_fac3,i_fac4,i_fac5,i_fac6,i_fac7,
            i_fac8,i_fac9,i_fac10,i_fac11,i_fac12,i_fac13,i_fac14,
            i_fac15,i_fac16,i_fac17,i_fac18,i_fac19,i_fac20,i_fac21,
            i_fac22,i_fac23,i_fac24,i_fac25,i_fac26,i_fac27,i_fac28,
            i_fac29,i_fac30,i_fac31,i_fac32,i_fac33,i_fac34,i_fac35,
            i_fac36,i_fac37);

-- TABLES of sin(k * pi/1024) and cos(k * pi/1024).

  sin_t0   : constant hexa_double
           := create( 3.06795676296597614E-03, 1.26902790854559250E-19,
                      5.28794642453283888E-36,-1.78203340819552983E-52,
                      1.24867176529600562E-68, 9.55672442768777125E-85,
                     -4.78635016554141373E-101,-8.83022048198150353E-118,
                     -5.45848110690181013E-134,-5.74757416605915694E-151,
                     -6.91040847851847080E-169,-8.86906314812199689E-186,
                     -4.10641810963377397E-202, 7.38027895156163694E-219,
                     -4.87324470475221131E-235, 3.38285895125974005E-251);
  sin_t1   : constant hexa_double
           := create( 6.13588464915447527E-03, 9.05452574824749325E-20,
                      1.62601131337453203E-37,-9.74920012087674099E-55,
                      4.17002567067724779E-71,-1.96032877561331419E-87,
                      9.74228205614807724E-104,-1.98833998927193889E-120,
                     -6.99482038755513347E-137,-3.79805019355357331E-153,
                     -1.97813889215689713E-170,-8.31221534239880029E-187,
                      1.29205776096120177E-203,-1.32855427834759033E-219,
                      6.44466674362982017E-236, 3.32104404720481066E-252);
  sin_t2   : constant hexa_double
           := create( 9.20375478205981944E-03,-1.21365916935359338E-19,
                      5.56969039494255674E-36, 1.25056357919369509E-52,
                     -6.20114835670991562E-69,-3.60171168599636468E-85,
                     -3.46259917683846748E-102,-1.28977874687952156E-118,
                     -8.06505260573327132E-135,-5.00137649354863156E-151,
                     -7.73109257254449014E-169, 5.53080703114846396E-185,
                      2.03968286470417619E-201,-8.13579502493496042E-218,
                     -1.75305872664849621E-234, 6.24693591631774727E-251);
  sin_t3   : constant hexa_double
           := create( 1.22715382857199254E-02, 6.91979076402831699E-19,
                     -4.02037267134355554E-36,-2.06887036069528163E-52,
                     -1.64091649492352269E-68, 9.99330273992003136E-85,
                      2.79487261553066006E-102,-9.12920554076969506E-119,
                      5.83500302670796858E-136,-1.22357784155962402E-152,
                     -9.06273972841889409E-169,-2.93617090315990839E-185,
                      6.54746210261315508E-202,-3.19598997255526361E-218,
                      2.63624911560462863E-235,-9.09217551749657567E-252);
  sin_t4   : constant hexa_double
           := create( 1.53392062849881019E-02,-8.44625788654016957E-19,
                      4.65358975050586285E-35,-1.39236829785704672E-51,
                      1.34115203025621548E-67, 1.61333777554372834E-86,
                      5.08208232933158994E-103, 1.69914332528431097E-119,
                      4.29720955620886603E-137,-2.10489212265984344E-153,
                     -1.26238998185271663E-169,-1.68516378183519508E-186,
                     -2.27796423276339921E-203, 6.66121749025326817E-220,
                      1.37587237960808412E-237, 3.13628616832826870E-254);
  sin_t5   : constant hexa_double
           := create( 1.84067299058048202E-02, 7.41955338128331604E-19,
                      3.90684764867876066E-35, 3.63933212928986139E-52,
                     -2.19353176581903619E-68,-4.29241259606783756E-85,
                     -2.59677938349607068E-101, 2.51792510872904365E-118,
                     -1.12510560189119855E-135,-2.78908640859322191E-152,
                     -1.22961341600418544E-168, 6.67599933847104562E-185,
                      4.16793251692387915E-201, 6.44198814123496945E-218,
                     -3.01118109206193922E-234,-9.32189767328199456E-251);
  sin_t6   : constant hexa_double
           := create( 2.14740802754695079E-02,-4.54079602076885659E-19,
                     -2.20317701197230047E-35, 1.27098146548337412E-51,
                     -2.50649453460352302E-68, 3.88605110431610064E-85,
                     -2.16505604540818196E-101, 9.05360629654707290E-118,
                      4.06190170352046587E-134,-1.15832050301174837E-150,
                      5.26662227888274014E-167, 1.45430928646266013E-183,
                     -4.56658049464934885E-200, 9.34550570509587526E-217,
                     -6.37542382689899908E-233,-2.80790083119968860E-249);
  sin_t7   : constant hexa_double
           := create( 2.45412285229122881E-02,-9.18684901257787818E-20,
                      4.87061487044670605E-36,-2.81539478554692237E-52,
                      7.95004118779174058E-69,-1.22229777976689277E-85,
                      1.40195062694131108E-102, 2.51107195779642889E-119,
                      4.34017802111179799E-136, 2.23907710959917792E-152,
                     -1.48336670813667266E-168,-9.93506815887755328E-185,
                     -5.27030236602674024E-201,-2.67542109961520788E-217,
                     -8.84183452330280651E-234, 2.94993500122153765E-250);
  sin_t8   : constant hexa_double
           := create( 2.76081457789657432E-02,-1.59323588313892692E-18,
                     -7.04754162427760300E-35,-2.75184941766027441E-51,
                      1.18327750332464105E-67,-1.05832781649026863E-84,
                      5.50679374753733312E-101,-8.08900495379845942E-119,
                      2.44764177800045502E-135, 4.09800959498031517E-152,
                     -2.20005138441098027E-168,-1.29341948264584953E-184,
                      9.10030394229772940E-201,-1.09243496481812057E-217,
                     -7.02374456058622047E-234,-3.82213231329894219E-251);
  sin_t9   : constant hexa_double
           := create( 3.06748031766366260E-02,-1.69360548441079213E-20,
                      1.00531123166080144E-36, 4.37274329418026507E-54,
                      1.99763190099018758E-70, 1.20943664362514015E-86,
                     -8.66316411970888068E-103, 1.48262526031177689E-119,
                     -1.68682592582708394E-136,-4.45407150512888362E-153,
                     -2.33696990430360856E-169,-1.32282333234653693E-185,
                      8.07170043292874899E-202,-3.80139065177572987E-218,
                      1.61549973111385430E-234, 1.10748057097183306E-250);
  sin_t10  : constant hexa_double
           := create( 3.37411718513775868E-02,-2.00960742923683398E-18,
                     -1.35482370165371341E-34, 6.55548818758999731E-51,
                     -3.72227736510150863E-67, 2.70492399703400928E-83,
                      2.35695981258085198E-100,-1.54103417314555294E-116,
                      8.60867494470886344E-133,-6.59590221480657473E-149,
                     -1.06103260300884434E-165,-4.87068201901972826E-182,
                      1.46664139518262641E-198, 1.93425342628496333E-215,
                     -9.39416591499907005E-232, 7.07952965389435258E-248);
  sin_t11  : constant hexa_double
           := create( 3.68072229413588317E-02, 6.10600888035298419E-19,
                     -4.04487212598527268E-35,-2.11110567656714955E-51,
                     -9.23904371219639896E-69, 2.14598176126270627E-85,
                      1.26338281770142051E-101, 2.22676073313206986E-118,
                      2.05477415613812069E-134,-5.98975075519381039E-151,
                      9.44264283913501711E-168,-3.93792338824976117E-184,
                      1.57876754215356048E-200, 1.44525232364323453E-216,
                      5.52002604134729439E-233, 3.34833889782454707E-249);
  sin_t12  : constant hexa_double
           := create( 3.98729275877398107E-02, 4.66574534811832892E-19,
                      3.41193335622886843E-35, 2.40075347261875112E-51,
                      5.25864729846962600E-68, 2.52845885078272082E-85,
                      9.36713417811774289E-102, 3.90798751798522276E-118,
                     -1.10101799101914331E-134,-1.20101996741885805E-150,
                      2.98574678556450102E-167, 1.37708275504998794E-183,
                     -3.64631903698152281E-200,-2.22932085121534661E-216,
                     -2.15879139612883712E-233,-7.92632969438024156E-250);
  sin_t13  : constant hexa_double
           := create( 4.29382569349408202E-02, 2.83519405886609072E-18,
                      1.69913096011864755E-34, 6.80265360986726293E-51,
                      4.33267797183762470E-67,-2.87883945215165775E-83,
                     -5.93728361883032950E-100, 4.04652741874106067E-116,
                     -1.24660105201453806E-133,-5.57254338959691155E-150,
                     -1.30901797685907113E-166, 4.09948475365239299E-183,
                      2.63841899271436693E-199, 1.34125116599176030E-215,
                      2.91813666812087897E-232,-3.05427644763835591E-250);
  sin_t14  : constant hexa_double
           := create( 4.60031821309146299E-02,-1.11828139401577879E-18,
                      7.52350202703789460E-35, 4.11873049554937220E-52,
                      2.71658912037149379E-68,-1.36786339319123030E-84,
                      1.12307260321677812E-100, 1.42561559916829998E-117,
                     -2.85289976283089159E-134,-2.31044671565310978E-150,
                     -5.57161949488778447E-167, 2.56864106382603345E-183,
                      2.78401879635111519E-200, 2.64374233142707786E-216,
                     -3.70727653665974316E-233, 7.49974216208997078E-250);
  sin_t15  : constant hexa_double
           := create( 4.90676743274180149E-02,-6.79610372051828011E-19,
                     -4.43188681247183253E-35,-9.93766281325253159E-52,
                     -3.24651050179866359E-68, 1.61864844909595580E-84,
                      5.12323924879172258E-101,-2.62019795916202101E-117,
                      1.36879028379905669E-133, 1.77756574990745035E-150,
                      9.71188105679304350E-167, 4.86209395601640347E-183,
                      1.07687784408498635E-199,-1.03233059536367217E-215,
                     -2.88829520959729738E-232, 2.93878020201307042E-249);
  sin_t16  : constant hexa_double
           := create( 5.21317046802833237E-02,-2.42436952919537795E-18,
                     -1.36754053200922982E-34,-8.39381376211450699E-51,
                     -1.74550009910030472E-67, 9.69062131685494505E-84,
                      1.74418166782269283E-100,-4.48318060509326491E-117,
                      3.34031762955876482E-133,-7.55822773523643401E-150,
                      4.41277273237152566E-166, 8.65977454297403722E-183,
                      2.21929430957127078E-199, 9.51799679356233700E-216,
                      5.45225010825193477E-232,-3.47170957225173228E-248);
  sin_t17  : constant hexa_double
           := create( 5.51952443496899411E-02,-1.33402998608911026E-18,
                     -3.43595741256656076E-35, 1.19114627554093692E-51,
                      2.55262260673375794E-68,-1.86772762327757241E-84,
                      4.21123652198814818E-101,-1.04993035483230225E-117,
                     -2.51294358520498450E-134,-2.16670138381324725E-150,
                     -2.67368780898384984E-167, 1.32106700094680329E-184,
                      1.05835453540135543E-200,-4.29445784296885228E-217,
                      2.62820918979520675E-233,-1.86369461358269169E-249);
  sin_t18  : constant hexa_double
           := create( 5.82582645004357594E-02, 2.32999054960774918E-19,
                      1.93761089906286601E-36,-5.12737757100953014E-53,
                      3.51220352568903212E-69,-2.12103407570678699E-85,
                     -9.34585002006586359E-102, 3.50205723963112311E-118,
                     -1.00884500695740420E-134, 3.38613496552372144E-151,
                      6.10291729014224886E-168, 4.94031204818033750E-185,
                     -2.31896263931101946E-201,-1.99161140143585233E-218,
                     -4.29192264198764659E-235,-3.36279769812704579E-251);
  sin_t19  : constant hexa_double
           := create( 6.13207363022085783E-02,-5.11811340646381077E-19,
                     -4.27263358667063129E-35, 2.63684955574406907E-51,
                      6.60361134854085147E-68, 3.80427283057729097E-84,
                      1.30658598433432592E-100, 2.78618091452163955E-118,
                     -1.20825958242298152E-135,-4.30186678944415694E-152,
                      2.57136985716143697E-168,-6.15621727391386776E-185,
                      3.86649726325033743E-201, 7.63830519510575106E-218,
                     -3.65480998365225812E-234,-1.84135307483869712E-250);
  sin_t20  : constant hexa_double
           := create( 6.43826309298574651E-02,-4.23259970000527053E-18,
                      3.32601177118559366E-35, 1.47362677067183522E-51,
                      1.09501347268971187E-67,-7.29750189938547575E-84,
                     -3.97035459020836904E-100,-2.42662381311286416E-116,
                     -5.57086405376128482E-133,-1.37340850622396492E-150,
                      3.58378601861971322E-167, 1.68193707337083321E-183,
                     -3.36783390767096249E-200,-1.39237563978050599E-216,
                     -6.38707794231556368E-233,-7.67491037004469069E-250);
  sin_t21  : constant hexa_double
           := create( 6.74439195636640648E-02,-6.92217965569836359E-18,
                      1.59092863589110404E-34,-7.88289468918352183E-51,
                     -3.40224950677578928E-67, 3.35486710132031578E-84,
                      6.12345214854455644E-101, 3.11252771036061230E-117,
                      4.80590142574227974E-134,-4.17128232100490910E-150,
                     -3.50406823106423304E-167, 2.83953893121447047E-183,
                     -1.17160497923603181E-199,-2.02976783214030892E-216,
                     -1.00464659211403934E-232, 7.61823226458222460E-249);
  sin_t22  : constant hexa_double
           := create( 7.05045733896138699E-02,-6.85527911073428832E-18,
                     -1.99611776308415798E-34, 2.01271295804853003E-50,
                      5.78139634342966359E-67, 4.30525599157503775E-84,
                     -3.54383487423268438E-100, 6.79651882460436489E-117,
                     -1.51115083050470702E-133,-7.34234512440579221E-151,
                      2.41863730463952054E-167,-2.84760236847436555E-184,
                     -1.02919230637290396E-200,-1.40343066749538356E-217,
                      2.57272381382616656E-234,-1.17673151742869097E-250);
  sin_t23  : constant hexa_double
           := create( 7.35645635996674263E-02,-2.77849415062735933E-18,
                     -9.12403754898528210E-35,-1.95897520235467951E-51,
                      1.72892595832864613E-68, 3.30047289861029170E-85,
                     -1.10397616676790883E-101,-7.25541818801301675E-118,
                      2.10987006673859876E-134, 2.64100875294336275E-151,
                     -1.07773490138013248E-167, 8.40155926813407945E-184,
                      1.31604199646531477E-201,-3.76450113259762132E-218,
                      1.32295717235305174E-234,-4.77089517859724475E-251);
  sin_t24  : constant hexa_double
           := create( 7.66238613920314920E-02, 2.32537002879588012E-19,
                     -1.31860839212134400E-36,-4.99278726080996730E-53,
                     -6.75622016413686270E-70, 1.90640045815686919E-86,
                      1.14704672601347686E-102, 6.08235791186362312E-119,
                     -4.04820103856145071E-135,-2.49542402395743893E-151,
                      8.75858403844534572E-168, 1.11308382433280232E-184,
                      4.81623108397936464E-201,-2.83552752659531425E-217,
                     -1.78849927890896845E-233,-5.79131216371313364E-251);
  sin_t25  : constant hexa_double
           := create( 7.96824379714301256E-02,-4.48676643113730408E-18,
                      2.85407891436502636E-34, 2.84913485832627411E-51,
                      2.34228764339898482E-67,-3.73261010818490682E-84,
                     -2.62166830049628519E-101,-1.25938489278639043E-118,
                     -4.65011253698636811E-135, 2.41733397337819896E-151,
                      1.60894201695889907E-167,-4.13048650062702684E-185,
                      1.59140645391864142E-201,-4.87488903008447948E-218,
                     -4.75301325527946761E-234,-2.58311801667406871E-250);
  sin_t26  : constant hexa_double
           := create( 8.27402645493756916E-02, 1.47359835308777599E-18,
                      3.72840934522337134E-35, 2.90244300367240881E-52,
                     -1.57048255247903112E-68,-6.39124711770101570E-85,
                     -1.80116514887867025E-101, 1.00868908818279292E-117,
                     -8.04032012949620384E-134, 3.76388084913813101E-150,
                     -1.50671023717527059E-166,-1.03387645756317858E-182,
                     -2.19853807261527263E-199, 2.60003386191507235E-216,
                      3.73660841646908601E-233, 1.91076666715103358E-249);
  sin_t27  : constant hexa_double
           := create( 8.57973123444398939E-02,-3.38818938306840289E-18,
                     -1.61355295315082582E-34, 7.72946516205880486E-51,
                      3.89394073854801227E-67, 2.03594242671766312E-83,
                     -3.52108548965970156E-102,-1.64968845981580663E-118,
                      5.81396678577424565E-135, 1.91771683189334407E-151,
                     -1.21916817887192566E-168, 4.33811689750643039E-185,
                      2.84135862974796015E-201,-8.08662359464515188E-219,
                      6.15934241718164248E-235,-2.81822446142535877E-251);
  sin_t28  : constant hexa_double
           := create( 8.88535525825246003E-02,-3.75017758302906906E-18,
                      3.75436063739115777E-34,-2.05305335070232712E-50,
                     -4.65456325283412581E-67,-3.84824924104213256E-84,
                      4.66089732693259822E-101, 3.09756551661741010E-117,
                      1.16595208323730868E-133,-7.84680737068776618E-150,
                      4.85331389146292983E-166, 2.92177237374349005E-182,
                     -7.18384969080624106E-200,-1.68978105695332164E-216,
                     -1.98943631217384270E-233, 7.64340557981102351E-250);
  sin_t29  : constant hexa_double
           := create( 9.19089564971327239E-02, 4.76315948542745641E-18,
                      1.57228746429393444E-34,-4.84641454478314562E-51,
                     -3.52793110726296069E-68,-6.95220710003810539E-85,
                     -1.50348895443414149E-101,-5.25177904048400548E-118,
                     -2.33466577201125629E-134, 1.50080134390332109E-150,
                     -7.41088275880107705E-167,-4.80849574275328319E-183,
                      2.78433911106033460E-199,-1.12682833051583843E-215,
                      3.92880580130967740E-234, 5.98288288774519718E-251);
  sin_t30  : constant hexa_double
           := create( 9.49634953296390055E-02,-6.58858864004175640E-18,
                     -2.13711169916419652E-34, 1.38193705592492998E-50,
                      4.56104393082810257E-67, 2.58758898446223002E-83,
                     -1.37753556057404643E-99, 5.00185132538643362E-116,
                     -2.01011559463800373E-132,-8.77976531376604215E-149,
                     -8.06786717494085031E-165,-5.38249719262515108E-183,
                     -3.48337445430525180E-199, 1.60630892196238326E-215,
                     -8.59048997215706863E-232,-3.57611381447414650E-248);
  sin_t31  : constant hexa_double
           := create( 9.80171403295606036E-02,-1.63458236224425599E-18,
                     -1.32092388100064538E-35,-3.56910600491179416E-52,
                     -2.80870560395247626E-70,-8.56590019023935848E-87,
                      6.48842344630234380E-103, 5.71394239789677917E-120,
                     -8.53279772763884712E-137, 4.82690858396897223E-154,
                      1.63285781554786910E-170, 6.36088753581071289E-187,
                     -6.13206681288329418E-204,-2.11852472918850758E-221,
                      8.80563295706597679E-238, 2.05625649701568509E-254);
  sin_t32  : constant hexa_double
           := create( 1.01069862754827822E-01, 3.31643257193086556E-18,
                     -1.20042248851322819E-34, 7.20288284954186312E-51,
                      5.40076219370887877E-67,-2.11093157441623204E-83,
                     -1.70701640802714587E-99,-3.65931298372649385E-116,
                     -2.16304218004663140E-132, 8.89825393258060407E-149,
                      3.06225906305998930E-165, 8.75230567016754551E-183,
                     -6.14331862389073939E-199,-8.30860666878395369E-216,
                      1.50637253789864454E-233, 4.12435639911432509E-250);
  sin_t33  : constant hexa_double
           := create( 1.04121633872054573E-01, 6.57602540853851002E-18,
                      1.70662461712192141E-34,-4.94993409968935140E-51,
                      2.07083651001785294E-67, 5.34794700622502467E-84,
                      2.82034205793675201E-100,-9.26284597153554991E-117,
                     -1.26391813383765198E-133, 9.71059621437924811E-150,
                      4.90916713709140332E-166,-2.96945952628816062E-183,
                     -1.25105713335948659E-199, 5.78207858902360366E-216,
                      1.98105282770235122E-232, 3.75028682489353899E-249);
  sin_t34  : constant hexa_double
           := create( 1.07172424956808843E-01, 6.44240442790261976E-18,
                     -8.39569764996981391E-35,-4.06677302133183208E-51,
                     -1.60605665974102045E-67, 1.54397645981811330E-83,
                      7.69490527926525277E-100, 4.30449084427257403E-116,
                     -1.52892058590670731E-132, 5.27786057659155869E-150,
                     -4.42037981625649344E-166, 1.27227566499950473E-182,
                     -6.80868992877936828E-199,-3.69661970639941542E-215,
                     -1.55697035707317100E-231, 1.36657172599204512E-247);
  sin_t35  : constant hexa_double
           := create( 1.10222207293883059E-01,-5.67895035378232325E-19,
                      1.03802747923832327E-35, 1.52139979184566952E-52,
                     -8.51557122494676361E-69, 4.89688150976223126E-85,
                     -5.09638612553203020E-102, 2.22462970218491877E-118,
                     -1.73016363043000958E-134, 5.40028479193984645E-151,
                     -3.14888072759718424E-167, 8.00841396424195261E-185,
                      4.26837825345283674E-203, 1.93872823360687808E-219,
                      8.94927855986350881E-236,-1.62777540157917940E-252);
  sin_t36  : constant hexa_double
           := create( 1.13270952177564346E-01, 2.71004810121328995E-18,
                      1.53232929994916192E-35, 4.95644328103608790E-52,
                      2.20365393113530988E-69,-8.10820043479993803E-86,
                      4.29522884165877683E-102,-2.38699269859091463E-118,
                     -2.07131393992063815E-134, 8.52652529304881291E-151,
                      5.59469363231065932E-167,-3.55178537095589895E-184,
                     -1.54723361276104904E-200, 1.86766470184471667E-217,
                      7.84271684627105238E-234,-1.81121573688708003E-250);
  sin_t37  : constant hexa_double
           := create( 1.16318630911904766E-01, 1.02949148775097048E-18,
                     -9.39757349489930378E-35, 1.35348273237197078E-52,
                      6.72558403404510899E-69,-2.30016685085211769E-85,
                      3.81872231599344731E-102, 2.64469382670329387E-118,
                     -1.41532476642670497E-134, 2.87435460840390250E-151,
                      1.23341120381317415E-168,-7.73079204438208085E-185,
                     -4.33387057151013732E-201,-7.37223307945706146E-218,
                      8.39221560255990043E-235, 6.95120228898939969E-251);
  sin_t38  : constant hexa_double
           := create( 1.19365214810991369E-01,-3.95000893918985055E-18,
                      3.53173499782273111E-34, 1.88560468070122748E-51,
                      1.10020978623025641E-67, 6.78805784330018206E-84,
                      3.08307827722845500E-100, 2.15390763199215144E-116,
                      7.45291398298794418E-133,-2.54738791133464161E-149,
                      3.95745164394649898E-166, 7.11347606264946238E-183,
                      3.47067424366894459E-199,-2.02630103065833024E-215,
                      1.23212648725271148E-231, 1.39533385466398812E-248);
  sin_t39  : constant hexa_double
           := create( 1.22410675199216196E-01, 2.83545014899653353E-18,
                      1.81516557514933045E-34,-2.87165921779151915E-51,
                     -3.42479358759733376E-68, 1.92569167918437660E-84,
                     -1.00490567858699142E-100,-1.85045471075088884E-117,
                     -1.15374138311309194E-133, 7.13845328480844330E-151,
                     -3.93166296912059615E-167,-1.81661045888958886E-183,
                     -6.11207995973670392E-200, 8.18189557285301085E-217,
                      7.45252350066532793E-233,-2.54906589080342766E-249);
  sin_t40  : constant hexa_double
           := create( 1.25454983411546234E-01, 4.86867517631482349E-18,
                      5.98781052580979364E-35,-3.35346290987221065E-51,
                      2.95636376128706732E-67, 2.14159509153177471E-84,
                     -1.61454442335754400E-101,-1.35017597542095033E-117,
                     -2.99660999546997610E-134, 4.31260347658945759E-151,
                     -2.02099101997462959E-168, 9.95934764998274102E-185,
                     -1.11651655035004053E-201,-5.03913891315443160E-218,
                      2.44345824470355179E-235,-2.47247896938750031E-252);
  sin_t41  : constant hexa_double
           := create( 1.28498110793793169E-01, 3.81986039549888022E-18,
                     -1.86275014559477977E-34,-2.43081611335277907E-51,
                     -9.37108850912359351E-68,-3.03520412072352890E-84,
                     -1.81686426547226526E-100, 1.01017345049459640E-116,
                     -6.97704382260990917E-133, 3.29480978997677579E-149,
                      1.41770104974231256E-165, 1.19393204388233038E-181,
                     -1.83494614845137954E-199, 8.04179399711018420E-216,
                      1.35969772958793034E-232, 1.48816597756521671E-249);
  sin_t42  : constant hexa_double
           := create( 1.31540028702883116E-01,-5.00397082622138130E-18,
                     -1.29830041592455520E-34,-4.68720349157941220E-51,
                      1.43606684924838004E-67, 8.09870234180351493E-84,
                      3.86732674792833942E-100, 1.22603596075179043E-117,
                     -8.43746025364224191E-134,-4.39836104594934269E-150,
                     -8.76000611711547989E-167,-3.19997732670921870E-184,
                     -2.42720184390944122E-201,-1.34186267110188081E-217,
                     -8.00239173629525713E-234, 2.89113922484576294E-250);
  sin_t43  : constant hexa_double
           := create( 1.34580708507126195E-01,-9.16703591714806995E-18,
                      1.59164930070739730E-34, 4.02370024843668325E-51,
                     -1.02717877978233728E-67, 6.23598935311893397E-84,
                     -4.49215719918551625E-100,-9.95078960347874627E-117,
                     -6.93054527086767183E-133,-2.56353465469515154E-149,
                     -6.75634465348971259E-166, 2.55474720762305109E-182,
                      9.07114826333808526E-199, 8.04888975036260443E-215,
                     -2.60575015866669185E-231,-1.90002612422153997E-248);
  sin_t44  : constant hexa_double
           := create( 1.37620121586486038E-01, 6.62532558667744818E-18,
                     -2.37465830314014593E-34,-9.37038761730932495E-52,
                      2.42411173021019925E-68,-2.84602100800227938E-85,
                      2.59763439629371080E-101, 1.55086840385294101E-117,
                      8.56962867419736276E-134,-4.64312196896189218E-150,
                     -2.24575237966814437E-166, 1.20090440560882944E-182,
                      2.84988041533701189E-199, 5.99784276372493255E-216,
                      3.66249769542759444E-232,-4.45645235890110267E-249);
  sin_t45  : constant hexa_double
           := create( 1.40658239332849239E-01,-7.91939329655247413E-18,
                      6.09724642021083971E-34, 2.45666232410357969E-50,
                     -2.10711102615167760E-66,-1.28052439913987791E-82,
                      1.60259496952782748E-100, 3.09004581205557797E-117,
                     -1.41515002988286923E-133, 7.99050834571848315E-150,
                      1.26685010832450900E-166, 3.23310374957066638E-183,
                     -1.00871770143503472E-200, 1.37890255650006408E-218,
                     -5.87710277072811834E-235,-3.12850107551175781E-252);
  sin_t46  : constant hexa_double
           := create( 1.43695033150294443E-01, 1.14727230166186663E-17,
                     -5.18849545575764348E-35,-4.22206848321866068E-51,
                     -1.10194648716812339E-67,-1.16705291578018202E-84,
                      4.50875588782240834E-101,-1.97165234463791243E-117,
                     -1.52226915095260454E-133, 9.26676811869908830E-150,
                     -5.33071677027080166E-166, 1.01422612641706971E-182,
                     -6.78315814119182981E-200,-9.23330511470571491E-217,
                      3.01864694667604478E-233, 1.24865610746350055E-249);
  sin_t47  : constant hexa_double
           := create( 1.46730474455361748E-01, 3.72694714704656775E-18,
                      3.73523981512508271E-34,-4.08818222895086342E-51,
                      1.55176390752754226E-68, 9.78372264456757519E-85,
                     -1.81754325445953092E-101,-4.47428701685497407E-118,
                     -3.39412372542395421E-134,-1.75589239513703844E-150,
                     -2.83626837944351024E-167,-1.47095327256641376E-183,
                      1.04150880504854924E-199, 3.90992446873136006E-216,
                      2.73001826621139078E-232,-1.55124910505468810E-248);
  sin_t48  : constant hexa_double
           := create( 1.49764534677321509E-01, 8.08121141312851509E-18,
                      1.29791425549173248E-34, 9.93806674877362537E-51,
                      5.73740287319276834E-68, 3.38366048667785719E-84,
                      6.61985823237986893E-101, 5.96157298606967856E-117,
                     -7.16404122755813685E-134, 1.19457258282867204E-150,
                      1.14552775013385678E-167, 6.05122559241959947E-184,
                     -2.02960033646135957E-200, 1.41394189140082516E-216,
                      1.21634500265322156E-233, 5.58047611944403095E-250);
  sin_t49  : constant hexa_double
           := create( 1.52797185258443435E-01,-7.63135739384168378E-18,
                      5.77146904502841248E-34,-3.77311325829866872E-50,
                     -1.12335157722231889E-66, 1.37371132596995389E-83,
                     -1.22858617667660062E-100, 7.32642194958219683E-117,
                     -6.29120901992763435E-133, 3.31776350155708763E-149,
                      9.89977001590666579E-166,-4.23281939277111627E-182,
                      2.30111963587565827E-198, 1.40937624923888213E-214,
                     -7.77206269617644003E-231,-4.96488211157296945E-247);
  sin_t50  : constant hexa_double
           := create( 1.55828397654265233E-01, 3.03513071876782208E-18,
                     -1.09769423151761844E-34, 7.87346476852578675E-51,
                      4.24392301767977857E-67,-2.21959429914176478E-83,
                     -3.18443002931819062E-100,-1.13688942801505243E-116,
                      1.07297005353150126E-133,-5.67731440898086684E-150,
                      4.07117212950924541E-166, 2.96390193884198190E-182,
                      1.02821701890332685E-200,-6.71258380041956369E-217,
                      2.19107287544715266E-233, 6.70528938112248306E-251);
  sin_t51  : constant hexa_double
           := create( 1.58858143333861446E-01,-4.01632005738590786E-18,
                     -9.28405802576288120E-35,-2.85674200292748750E-51,
                      1.78746767309220706E-67,-1.62515863533510290E-83,
                      4.31051834545506324E-100, 1.82823036365252451E-116,
                     -2.65888701255813088E-133, 7.02562223742471639E-150,
                      4.95259191040311670E-166, 1.74080534059264321E-182,
                     -1.41566232432725732E-198, 8.32397966685762123E-215,
                      2.90683052793423027E-231,-1.33259306300361651E-247);
  sin_t52  : constant hexa_double
           := create( 1.61886393780111826E-01, 1.18505196435735283E-17,
                     -5.04409905191629570E-34, 3.05100287079280095E-50,
                     -4.30947315708130251E-67,-3.19794395349932226E-83,
                     -1.03680203634885848E-99, 1.97873415107642996E-116,
                     -8.11507101788254778E-133, 2.71481120867142269E-149,
                      1.14914722225610346E-165, 7.53685427684024282E-182,
                      3.65908326452690125E-198,-1.44297349739597573E-214,
                     -4.37878851807603319E-231, 1.19509526496581659E-247);
  sin_t53  : constant hexa_double
           := create( 1.64913120489969922E-01,-7.04052883191667383E-19,
                      3.32111074912455269E-35, 8.66632992546860315E-52,
                      6.70716075759242849E-68, 3.77905336370558319E-84,
                     -1.60556977933041428E-101,-4.53336802474728143E-118,
                      9.81066103238177828E-135, 6.57387719358703399E-152,
                     -6.23690618733260537E-169, 4.52791047666175815E-185,
                     -2.65244891105806318E-201,-5.94057244053664398E-218,
                     -2.17482336232509173E-234,-5.70850472604687825E-251);
  sin_t54  : constant hexa_double
           := create( 1.67938294974731173E-01, 5.42845337215581389E-18,
                     -3.32633393361813689E-34,-1.85363673351238475E-50,
                      6.37212819004787885E-67,-3.02607576348603856E-83,
                     -7.54950355176388181E-101, 1.68878087995375344E-117,
                     -1.50818578524145772E-133, 5.84968740605727650E-150,
                      1.54151572408807008E-167, 9.31264717537510702E-184,
                     -3.62818557542115507E-200, 1.24311747845940092E-216,
                      7.18889832164156992E-233,-1.86510128260985970E-249);
  sin_t55  : constant hexa_double
           := create( 1.70961888760301217E-01, 9.19199801817590944E-18,
                     -6.76887439409826057E-34,-1.03777113843183886E-50,
                      1.86569247309858739E-67,-1.08062018121900044E-83,
                      5.83208295835655638E-100, 1.92369394449120577E-116,
                     -7.11263204170462693E-133, 7.30530282575407106E-149,
                     -2.93244196573001345E-165, 2.25749181726081499E-181,
                      1.32380945399804869E-197, 3.70397944597235071E-214,
                     -3.22661800815501521E-231,-2.76003842483340599E-247);
  sin_t56  : constant hexa_double
           := create( 1.73983873387463822E-01, 5.81519946181079284E-18,
                     -1.67510142983016057E-34,-6.69822597971649632E-51,
                      2.68981537458849633E-67,-1.45125866211886185E-83,
                     -6.18686844530808796E-100,-2.56175648208501112E-116,
                     -8.32662164647761653E-133,-3.44415367265722047E-149,
                     -1.78021665497744571E-165,-1.07121290496387190E-181,
                     -1.33873693153328912E-198, 3.14518969347889606E-215,
                     -1.93413642011703295E-231, 3.79911915418887452E-248);
  sin_t57  : constant hexa_double
           := create( 1.77004220412148749E-01, 6.73293006354081671E-18,
                      2.80427366442466233E-34, 3.67868882327935990E-51,
                      1.38727517272938610E-67,-2.11240491184557759E-84,
                      9.43779315921888920E-101, 4.15288787564091342E-117,
                      1.94025939911538331E-133, 1.91794873687952517E-149,
                      3.04588468778939512E-166,-2.95367019579162430E-182,
                     -8.29170288440328059E-199,-1.42763370106065166E-216,
                      5.87307016851300493E-233,-1.57444007604311865E-249);
  sin_t58  : constant hexa_double
           := create( 1.80022901405699515E-01, 7.97018260473921427E-18,
                     -7.07659201105249775E-34, 1.96225126084617837E-50,
                      1.01456273354976480E-66,-2.16414525056017038E-83,
                     -1.02935181286685096E-99, 9.20921620032132056E-116,
                      3.28696924609531040E-132,-2.03806673694199919E-149,
                     -2.79394566167131947E-166, 6.05529883420242326E-183,
                     -1.33473358861938298E-199, 4.92373290839478122E-216,
                     -1.29239041706742884E-232, 5.00351458257959073E-249);
  sin_t59  : constant hexa_double
           := create( 1.83039887955140951E-01, 7.73499186886373835E-18,
                     -4.48037699681450831E-34, 1.12011487933288905E-50,
                     -5.70484980282081912E-68,-2.58441598521855717E-84,
                      2.14990804274506987E-100, 8.45857082297176154E-117,
                      5.97103422848749850E-133, 1.81702053034404304E-149,
                      9.71378397568597692E-166,-5.09544256461377590E-182,
                      4.01491207050639083E-199,-2.18112024966162987E-215,
                     -3.45579089612965156E-232, 3.23371648501381946E-248);
  sin_t60  : constant hexa_double
           := create( 1.86055151663446661E-01,-1.25648930076795521E-17,
                      7.59538442485308101E-34,-3.84716951324150389E-51,
                      2.93494161751752629E-67, 1.51466405418760871E-83,
                      5.87161205470116746E-100,-2.59706696508825614E-116,
                     -1.46775945722585654E-132,-1.41232510623698793E-148,
                     -7.55110668055681631E-165,-9.19277594446068085E-182,
                      6.98650120735396291E-199,-3.81038486329850669E-215,
                     -2.43986482673788681E-231, 9.82186514585352637E-248);
  sin_t61  : constant hexa_double
           := create( 1.89068664149806220E-01,-7.62089558035277776E-18,
                     -4.47922986566629895E-34, 4.13916466263052541E-50,
                     -7.02958654675518609E-67, 5.78703022169765588E-83,
                     -3.71978807477315389E-100, 9.73865940228132258E-117,
                      4.36323234810780258E-133,-2.45366161243536039E-149,
                     -5.31945626874722367E-166,-2.99488089896294962E-182,
                     -1.12485761535041905E-198,-4.60701632299141454E-215,
                      5.86295050200212698E-232, 1.76425814157503281E-248);
  sin_t62  : constant hexa_double
           := create( 1.92080397049892437E-01, 4.33483439411749035E-18,
                     -2.34041218481399366E-34, 1.57899709626118563E-50,
                     -3.57254602216994629E-67, 2.87240307276431677E-83,
                      3.74606176073540396E-100, 1.19551285078245729E-116,
                     -7.18863713396574345E-135,-5.52799951093565711E-152,
                     -1.39249962395597352E-168,-1.00128159375848735E-184,
                      3.78973762266985084E-201,-7.92422684064878163E-218,
                     -1.74445192671531980E-234,-6.10491389290000365E-251);
  sin_t63  : constant hexa_double
           := create( 1.95090322016128276E-01,-7.99107906846173126E-18,
                      6.18462700242207127E-34,-3.58402709180329370E-50,
                     -9.07403900926455768E-67,-3.41055954373888195E-83,
                      9.54337952630623091E-100, 2.36834608203971332E-117,
                      6.00175840201820247E-134, 2.89437551675503390E-150,
                      2.44910695916325913E-166, 9.69548808024468368E-183,
                     -4.38520139078771235E-199, 8.72568489071829031E-216,
                     -4.25739227831680478E-232, 1.55648628066864335E-248);
  sin_t64  : constant hexa_double
           := create( 1.98098410717953588E-01,-1.84344118006894450E-18,
                      1.41390313182372847E-34, 1.05428111253438094E-50,
                      5.04786838497206121E-67,-7.58831413866410294E-84,
                     -3.20942765989283302E-100, 1.62926053987493820E-116,
                      5.27931540650760168E-133,-1.60265358990030204E-149,
                      3.26811767468248268E-166,-2.11408765095012084E-182,
                     -4.29767358417684481E-199, 4.63210673042220349E-215,
                     -2.38688321599154879E-231,-1.08389386079444842E-247);
  sin_t65  : constant hexa_double
           := create( 2.01104634842091901E-01, 1.10100326693007386E-17,
                     -3.91235767574137906E-34, 2.40848525000635315E-51,
                      5.10723190909262353E-68, 2.57466667969522560E-84,
                     -2.20644792926840395E-100,-9.12131216069626137E-117,
                      1.31539842800847455E-133, 9.71118983869152752E-150,
                      2.77484641758210771E-166,-2.63602767383645506E-182,
                     -1.63450037160003451E-198, 1.20451647633438563E-215,
                      1.12577638913606477E-232, 3.43164464953124652E-249);
  sin_t66  : constant hexa_double
           := create( 2.04108966092816868E-01, 6.09412977739577521E-18,
                     -2.82754099704496409E-34, 4.61010085635329893E-51,
                     -2.34161035446829554E-67, 1.22639916348963898E-83,
                      1.78248112199774571E-100,-1.76637863202369565E-117,
                     -5.01802073271704256E-134, 4.66141505693382726E-150,
                      2.62206711400333541E-166, 5.30084049136788757E-184,
                     -2.61168413518237979E-200, 1.41935888078722473E-216,
                     -1.72450993055534828E-233,-9.54034959322001276E-251);
  sin_t67  : constant hexa_double
           := create( 2.07111376192218560E-01,-1.06133625289713558E-17,
                      2.24568051126908840E-34, 1.34837361252809044E-50,
                      9.08964713237916564E-67,-3.18691210021983370E-84,
                     -1.85758364055659700E-100,-1.01768078020383412E-117,
                     -8.20866305918361516E-134,-2.95895858011300354E-150,
                      2.03405434589683107E-166, 6.13230813802800637E-183,
                      1.16577776675442645E-199,-7.34971998878781345E-216,
                      2.48305696034152319E-232,-1.47350038121212633E-248);
  sin_t68  : constant hexa_double
           := create( 2.10111836880469610E-01, 1.15615484765128436E-17,
                      6.03559056104012542E-34, 3.33299096184056749E-50,
                     -2.21966170571301981E-66, 2.93685728359414516E-83,
                      5.70850349398451920E-100, 4.12171713298719901E-116,
                     -5.10256867926214856E-133,-3.36681092640230926E-149,
                      1.58657860862197407E-165, 5.43617348862694192E-182,
                      1.05557626938206192E-198, 1.71800475103454049E-215,
                      1.18102521600080746E-231, 3.23990312539450047E-248);
  sin_t69  : constant hexa_double
           := create( 2.13110319916091362E-01, 1.20318738210638598E-17,
                     -3.41426997196956354E-34,-1.24362627802417777E-50,
                     -2.65527034405922961E-67, 9.23715882768353469E-84,
                     -3.88430382525409780E-100,-3.39610516242628183E-118,
                     -1.46085245592716914E-134,-1.07157730869557412E-150,
                      1.75070279062591132E-167, 1.08814052652243244E-183,
                      8.90109389417570886E-200,-4.91494198143070144E-216,
                      3.10694305641621823E-232,-1.51945039739153760E-248);
  sin_t70  : constant hexa_double
           := create( 2.16106797076219520E-01,-1.01111960826091175E-17,
                      7.27895453351896431E-34,-2.93475403652586095E-50,
                      1.18882891152961383E-66,-3.88293994734515188E-83,
                      2.10742693032734185E-100, 3.89313339745640687E-117,
                     -3.22154956642229597E-133,-1.16544489513396662E-149,
                     -2.76193379109725713E-166, 4.84775621001359848E-183,
                     -2.36801721051130841E-199, 1.18406921807394680E-215,
                     -3.08898976180124325E-232,-4.75725668184206729E-249);
  sin_t71  : constant hexa_double
           := create( 2.19101240156869798E-01,-3.65138122991507758E-19,
                     -2.33594994186064421E-35, 3.17852981984586531E-52,
                      1.63757063858449075E-68, 4.96563698141715738E-85,
                      2.59699358857451374E-101, 1.36969124298657282E-117,
                     -8.54154986296869310E-134, 4.09421810121103270E-150,
                      2.41760818051446439E-166, 6.92858953401503941E-183,
                      2.63492312343753416E-199,-4.77034442091228191E-216,
                      2.12707285469311914E-232,-5.39737482427133191E-249);
  sin_t72  : constant hexa_double
           := create( 2.22093620973203537E-01,-3.03372109958121623E-18,
                      6.66546680336329981E-35, 2.01108623226569421E-51,
                      6.15985763115796938E-68, 1.49991836323130075E-84,
                     -4.67327451259251333E-101, 2.91885891613829426E-117,
                      4.14832948259226219E-134,-1.55043644747385400E-150,
                      5.44809467460625245E-167,-7.38685306544586575E-184,
                      2.39592992361275738E-200, 6.60755793434270864E-217,
                      5.73271760971935496E-234, 2.43282042910064537E-250);
  sin_t73  : constant hexa_double
           := create( 2.25083911359792832E-01, 3.95070408225565101E-18,
                      2.42879939583053746E-35, 5.66627975130203223E-52,
                      1.50886598195277854E-68, 5.91715463771356825E-85,
                     -3.40819580874471617E-101,-9.84762128874968364E-118,
                     -6.29668685940730057E-134,-7.67606179193120523E-151,
                      4.05007742219337459E-167,-1.45956290297179971E-183,
                     -6.47089420733561944E-200,-3.25183039842362666E-217,
                      7.29666763047440725E-234, 1.46073985829964745E-250);
  sin_t74  : constant hexa_double
           := create( 2.28072083170885731E-01, 8.23618373392580116E-18,
                      6.97867813163979374E-34,-6.41229624826395036E-51,
                     -4.03894879011491570E-67, 6.04543349327994713E-84,
                      2.06739106807475888E-101, 9.44078955647149053E-118,
                      3.25791535901235170E-134,-9.80281853108806012E-151,
                      2.33980380573039790E-167, 1.83461638755837416E-183,
                      9.09483923589170507E-201, 4.24453881404462918E-217,
                      9.80164971149298398E-234,-1.21347774623118149E-250);
  sin_t75  : constant hexa_double
           := create( 2.31058108280671110E-01, 1.01297871497618686E-17,
                     -6.93592346158160440E-34,-2.88773556048837821E-50,
                      1.59688388065607953E-66,-8.33259843562148299E-83,
                     -3.78334872586390280E-99,-2.48981034606182887E-115,
                      1.57039112917615359E-131,-1.88810486250215263E-149,
                     -8.13871665677825888E-166, 5.31802057854381022E-182,
                     -9.77675920485388863E-199,-1.18606765311581803E-215,
                     -5.40189739278152037E-232,-3.32581251542539413E-248);
  sin_t76  : constant hexa_double
           := create( 2.34041958583543430E-01,-6.99224026961011726E-18,
                     -5.73230319227502798E-34, 5.30925799668727269E-51,
                     -1.33071021660334324E-67, 6.87979134931095779E-84,
                     -3.50704739589457128E-100,-1.62990922734006731E-116,
                     -7.31692889291789001E-133, 1.68979334494272608E-149,
                      2.77480949301990301E-166, 1.92864613293586182E-182,
                      1.26897698108765575E-198,-6.56595343288322487E-215,
                      9.86607878292963497E-232,-1.45057014459913686E-248);
  sin_t77  : constant hexa_double
           := create( 2.37023605994367198E-01, 8.85448522850399180E-18,
                      1.35884808263541335E-34, 1.03810225202138672E-50,
                     -4.78361238841613321E-67, 2.13573033443488305E-83,
                     -5.81317983874262780E-100, 1.11859921298045118E-116,
                     -2.12604986153882322E-133,-3.26251870711204180E-150,
                      2.48985709063493437E-166, 2.67712776960938966E-184,
                     -6.23820059747229623E-201, 3.58085559918650756E-217,
                     -1.80218270178840208E-233,-1.00972696054685441E-249);
  sin_t78  : constant hexa_double
           := create( 2.40003022448741499E-01,-1.21377589756321639E-17,
                     -2.64488077317038911E-34,-1.99297338006704726E-51,
                     -7.70893711383538847E-68,-2.25220579180167779E-84,
                      1.82601089979310064E-100, 4.69253293840164990E-117,
                     -2.53482093110988942E-133,-4.42739733379409161E-150,
                      7.61807879305880850E-167, 1.37277050819043380E-183,
                      1.83149066351053669E-201,-1.01258927087789739E-217,
                     -5.17596011491160015E-234,-1.34435870770322098E-250);
  sin_t79  : constant hexa_double
           := create( 2.42980179903263899E-01,-8.75143152971966316E-18,
                     -6.57232603730794308E-34,-1.03331580831721772E-50,
                     -7.67303665548996940E-68,-1.64207904731718957E-85,
                     -7.72587767773904461E-102,-4.19026554882611894E-118,
                     -2.54053497961547643E-134, 8.96883812688747868E-151,
                     -5.84920052173344335E-167,-1.40441938636034657E-183,
                     -4.58150593815491907E-200, 1.56928470862296178E-216,
                     -9.77389532069135087E-233,-8.80278630481483379E-250);
  sin_t80  : constant hexa_double
           := create( 2.45955050335794623E-01,-1.11290440527418318E-17,
                      4.38059982028833967E-34, 1.22193995546862912E-50,
                      3.02355370311391133E-67, 2.48465122464541366E-83,
                     -3.44756092825038672E-100, 1.16426914159946003E-116,
                      3.67782202304420260E-133,-3.67552637317652301E-149,
                     -1.04004554692862685E-165,-5.28581170466923700E-182,
                      1.09795413849246332E-198, 7.68704872848660611E-215,
                     -3.89251500734321376E-231, 2.04345358652127119E-247);
  sin_t81  : constant hexa_double
           := create( 2.48927605745720176E-01,-8.17834361000209898E-18,
                      5.56668752611118396E-34, 3.80804730587481670E-50,
                     -1.10140116930784744E-66, 4.42088080681673841E-83,
                      2.99921010737057309E-99,-1.34096087439631684E-115,
                      8.37432492408991112E-132, 4.41805074210767294E-148,
                      3.10750495940227007E-164, 1.86439128617203360E-180,
                     -6.51624835436789189E-197, 2.81134239548848332E-213,
                      2.72185105882857209E-231,-2.39979632228419736E-247);
  sin_t82  : constant hexa_double
           := create( 2.51897818154216968E-01,-1.75914360325170387E-17,
                     -1.09596812325252852E-33, 5.62094260202324558E-50,
                     -4.28112473828177472E-66,-3.58163542964403378E-83,
                     -2.40556113146921592E-99,-2.98396626783772226E-116,
                     -4.84865001334887981E-133, 3.84020955166033325E-149,
                     -1.68905817911606197E-165, 5.03528315573637593E-182,
                     -3.07089461581565924E-198,-1.02134563141390628E-214,
                      1.33684364984919687E-231,-5.37058074817111515E-248);
  sin_t83  : constant hexa_double
           := create( 2.54865659604514572E-01,-1.36022998069014613E-19,
                     -6.00738446427625355E-36,-3.00727513118938785E-52,
                     -1.22704495507404083E-68,-8.03034598714414042E-85,
                     -5.46922327998671672E-101, 1.39912585450205386E-117,
                     -4.08983284736551477E-134,-1.81426968527145494E-150,
                      3.54739891368778847E-167, 3.28056356687894908E-183,
                      5.14948715629180891E-200, 7.54526974540044521E-217,
                     -7.62201396310824090E-233,-2.18538399482452059E-249);
  sin_t84  : constant hexa_double
           := create( 2.57831102162158987E-01, 1.84800386308799567E-17,
                      3.32016647140475995E-34,-5.55478192905767638E-51,
                      3.69201202971236860E-67, 1.69300719286625139E-83,
                     -3.74999602985559879E-100, 5.60028936238932763E-117,
                     -2.99440034324343909E-133,-1.28459371690594678E-149,
                      6.22079817754078628E-166,-2.00964329066932758E-183,
                     -1.86140454237578016E-199,-5.00574016252967776E-216,
                      2.35059505980506843E-232,-1.65024508506427357E-248);
  sin_t85  : constant hexa_double
           := create( 2.60794117915275514E-01, 4.27214209835500749E-18,
                      5.67821269347779200E-35, 3.14283380843653967E-51,
                      1.83862654848826093E-67, 1.02585540224865971E-83,
                     -3.08805031036283959E-100, 1.85281267072560652E-116,
                     -4.85532866780659555E-133,-3.40849175659954488E-150,
                     -2.54120146616843333E-166,-5.17260000696690581E-183,
                      4.07001641973100811E-199,-1.88725384612569056E-215,
                      6.95184266470832458E-233,-3.92183156293008576E-249);
  sin_t86  : constant hexa_double
           := create( 2.63754678974831402E-01,-1.88379476800386996E-17,
                      1.37201290457547940E-33,-8.27634066659660331E-50,
                      4.03232747874737897E-66,-1.97524885946060865E-82,
                      1.06634388098399124E-99, 2.08519022343101556E-116,
                      2.50895106883902606E-134, 2.19805999980408789E-150,
                     -8.70420863998344589E-167,-6.46806019598281443E-183,
                     -2.66373573592863828E-199, 1.86538747326071336E-215,
                      1.19115431806658073E-231,-3.14188387501653585E-248);
  sin_t87  : constant hexa_double
           := create( 2.66712757474898365E-01, 2.09412225788266884E-17,
                     -1.13034665247279894E-33, 1.99542240505089630E-50,
                     -1.15018997376335405E-66,-3.53906497779610396E-83,
                      2.01080326428584159E-99,-5.51062706665966420E-116,
                      3.20951360125694705E-132, 2.82321328954221722E-148,
                      9.83323847152866933E-165,-6.10379383350942403E-181,
                     -4.44099245454850153E-197,-1.16085324947648598E-213,
                      1.32298740421680805E-230,-7.84198972296684435E-247);
  sin_t88  : constant hexa_double
           := create( 2.69668325572915091E-01, 1.57656576181332587E-17,
                     -6.96961421733700858E-34,-4.04553468791467760E-50,
                     -1.42275530120596467E-66, 5.06661291343617801E-83,
                      3.29710618519863633E-99, 1.32985242526478086E-115,
                      1.02452216873445724E-131,-1.03979309433288215E-148,
                      4.26594636481804839E-165, 2.02438837236513298E-181,
                     -7.08645400260599395E-199,-1.14011554237621114E-215,
                     -4.85206462646293664E-232,-2.44357857221514319E-248);
  sin_t89  : constant hexa_double
           := create( 2.72621355449948977E-01, 7.86971660763878500E-18,
                      6.61793886029333718E-35,-2.76429036963862670E-51,
                      1.66189023046745488E-67, 1.06574295253096451E-83,
                     -4.65554643535425639E-100, 2.73346293776479004E-116,
                     -6.91289978616876219E-134, 1.25100068729912117E-150,
                     -1.12843660292872552E-166,-4.18897306860521048E-183,
                     -3.05303989202379668E-199, 1.00583816479525565E-215,
                     -4.90575732706728621E-232,-2.71413059792079212E-248);
  sin_t90  : constant hexa_double
           := create( 2.75571819310958144E-01, 1.93203289625565816E-17,
                      1.39320941801002799E-33, 1.36172539200181157E-50,
                     -8.59903883753700632E-67,-2.45914777761687186E-83,
                      2.76443812552678445E-100, 7.29703813514032750E-117,
                     -4.29104227452979559E-133, 1.77222794511328500E-149,
                      1.08024442342722180E-165, 5.82015227185792566E-183,
                     -4.00593983879214661E-199,-3.51080756085757666E-216,
                     -1.45764165729096324E-232,-2.03278654181639817E-249);
  sin_t91  : constant hexa_double
           := create( 2.78519689385053115E-01,-1.00302737195435440E-17,
                      7.25921153256892535E-34,-1.00685162966558511E-50,
                     -4.53535017230020529E-67, 2.62187814298213566E-83,
                      6.27276949158705022E-100, 4.21437996812238222E-116,
                      5.02240879844849374E-134, 2.26173034175472724E-151,
                      6.33210799422150642E-168,-3.12636004619189958E-184,
                     -1.28726803775475213E-201, 4.22231747212040481E-218,
                      1.53245965833517990E-234,-2.60743966264924070E-251);
  sin_t92  : constant hexa_double
           := create( 2.81464937925757996E-01,-1.23222996412740093E-17,
                     -1.05647887063864348E-34, 7.51374242512658853E-51,
                      3.58665823582072999E-67,-2.47392221022071423E-83,
                     -1.70635428822967862E-99, 6.92276798385997583E-116,
                     -1.95023765545940892E-132,-2.93207697777771227E-150,
                     -2.21316872987551325E-166, 1.44950203137681885E-182,
                      5.91979217788636963E-200, 3.65968832340527663E-216,
                     -3.15604860988391235E-232, 1.49142995201932417E-248);
  sin_t93  : constant hexa_double
           := create( 2.84407537211271821E-01, 2.22092685106614753E-17,
                     -9.18230956295237080E-34,-5.21928753088922177E-50,
                     -1.03445935928443390E-66, 5.13647689477255948E-83,
                     -1.63059935127107675E-99,-5.04002555843145888E-116,
                     -1.50691937911634978E-132,-1.36718216042096755E-148,
                     -2.33599040920898960E-165,-2.03752399676704364E-181,
                      4.76915294230778713E-198, 2.99226221292117457E-214,
                      7.11666155260582488E-231,-2.81529634946379309E-247);
  sin_t94  : constant hexa_double
           := create( 2.87347459544729511E-01, 1.54611173676457170E-17,
                     -6.32639736634440759E-34,-2.29825384164762143E-50,
                     -9.62276988638651218E-68,-1.00730303857294149E-84,
                      4.98254688228871583E-101, 8.01701050452985206E-118,
                     -4.46546140099399078E-134,-4.35145010248460000E-150,
                      7.72973793182766029E-167,-4.13960290589239442E-183,
                      4.56462774410184480E-200, 9.87869049204977123E-217,
                     -6.55263008749424807E-233, 1.39696086900934681E-249);
  sin_t95  : constant hexa_double
           := create( 2.90284677254462387E-01,-1.89279787077742515E-17,
                      1.15229531571423147E-33, 7.47386556547165956E-50,
                     -3.41637702108171592E-66, 8.71048343217906042E-83,
                     -2.23401472329868530E-99,-4.69668073672083961E-116,
                      7.51607883482359494E-133, 1.56251686481320585E-149,
                      2.49410607680115411E-166, 1.43172845915132780E-182,
                     -4.58546863924969166E-201, 2.86444279786249599E-217,
                      1.44296860549528888E-233, 1.05771533932855407E-249);
  sin_t96  : constant hexa_double
           := create( 2.93219162694258628E-01, 2.23854308119018331E-17,
                      1.36624846465396802E-33,-4.24513252539969377E-50,
                     -1.38873788365405033E-66, 1.00620826781653700E-82,
                      2.07492508636586772E-100,-2.83425474648516188E-117,
                     -3.45652887640779833E-134, 4.01229260563838433E-151,
                      1.64538065003048345E-167, 3.58260275126732318E-184,
                     -7.24826686986660762E-201,-7.02421175942877548E-217,
                      3.57155346832220746E-233, 8.93120645230377466E-250);
  sin_t97  : constant hexa_double
           := create( 2.96150888243623844E-01,-2.02207363608769380E-17,
                     -7.92522125339204134E-35,-2.89905777295724702E-51,
                      8.36274648052424006E-70,-1.49841704580304461E-86,
                     -5.30876075145934179E-103,-2.41162210997145315E-119,
                     -1.22285081148675001E-135, 7.11434894331801777E-152,
                      4.07021039547401377E-168,-9.66780887473929102E-185,
                     -4.95192296704740082E-201, 3.38326583111555246E-217,
                     -5.30272375923119042E-234,-3.38385723990746637E-250);
  sin_t98  : constant hexa_double
           := create( 2.99079826308040475E-01, 1.67011816092194466E-18,
                      8.60911511173162921E-35, 3.99312862300121018E-52,
                      3.42705154233895770E-68, 7.58741280448239564E-85,
                      7.11192384277790360E-102, 2.29703490939575048E-118,
                     -9.48416512473372248E-135,-1.20776851139128422E-152,
                      1.62247571008991271E-169,-8.82514580114192435E-187,
                     -4.40927228446112469E-203,-2.32646505848241518E-219,
                     -1.41823716458013424E-235,-6.95548570113978088E-252);
  sin_t99  : constant hexa_double
           := create( 3.02005949319228084E-01,-1.71676662352624742E-17,
                      2.33361821490080688E-34, 8.30253345552200042E-51,
                     -8.49514740336632099E-68, 1.50435736158517223E-84,
                      5.80260295138377131E-101,-4.02615119145615817E-117,
                     -1.45058553364391272E-134, 6.06703646213159899E-151,
                      3.74902531797246104E-168,-1.11757330940300668E-184,
                      4.78135943095408770E-201, 2.00419476637870082E-217,
                     -3.62989457382859120E-234, 1.73521442989771926E-250);
  sin_t100 : constant hexa_double
           := create( 3.04929229735402429E-01,-2.29890338981912620E-17,
                     -1.45989010996611334E-34, 3.77604876931218273E-51,
                     -4.36859442473001706E-68, 1.81704008552938600E-84,
                     -1.05219904323698258E-100,-3.21896656097575478E-117,
                      5.18385819674614140E-134,-1.75140166845268764E-150,
                     -1.15859332635640715E-166,-2.40649761815031421E-183,
                     -1.79868654324711626E-199,-4.89059240995432240E-217,
                     -1.43264612093356464E-233, 4.71643290619985829E-250);
  sin_t101 : constant hexa_double
           := create( 3.07849640041534867E-01, 2.70740885272451850E-17,
                      1.25688582068992839E-33, 7.29318151059016452E-50,
                     -4.34403975620837728E-66, 2.59392226067851353E-82,
                     -1.19045910069809790E-98,-3.71047086983658618E-115,
                      1.92121678177290415E-131, 4.43135234592520647E-148,
                      1.37548909869377865E-164,-3.92391372881392995E-181,
                     -2.26530228042868870E-197,-2.55637462292100987E-214,
                      7.83058785983680604E-231, 5.03710656355665225E-247);
  sin_t102 : constant hexa_double
           := create( 3.10767152749611475E-01, 2.08870763640485131E-17,
                     -3.01305907910659423E-34, 1.38767390099351791E-51,
                      7.05850317048596351E-68, 1.64691692440556230E-84,
                     -3.23065832264728263E-101, 3.53582022202242265E-119,
                      1.98190887826390114E-135,-9.54539656876765840E-152,
                     -6.71309563159396223E-168,-2.75642590040174774E-184,
                      2.36571246661830062E-200,-5.04113593020824947E-217,
                      1.76271165640877286E-233, 8.58036752542506407E-250);
  sin_t103 : constant hexa_double
           := create( 3.13681740398891462E-01, 1.45604472999689122E-17,
                      3.65641868980115946E-34, 1.16542647349993749E-50,
                      2.20627987078892904E-67, 1.44241743542421191E-83,
                      3.93419225290242587E-100, 1.92409876585653877E-116,
                      3.22811225744925819E-133,-1.10194467303960734E-150,
                      4.13308063097016665E-167,-3.14853526073819331E-183,
                      7.85546658237627258E-200,-3.35531882341324281E-216,
                     -5.55319617606870350E-233,-4.37171025237187201E-249);
  sin_t104 : constant hexa_double
           := create( 3.16593375556165846E-01, 2.14352925127262832E-17,
                      1.23381692313773158E-33, 3.39635421009892933E-50,
                     -1.93728229714585417E-66, 1.23572972769286304E-82,
                     -3.99620694623083571E-99,-1.08259753528319005E-115,
                      8.94347005767096811E-132,-6.21176861239545717E-148,
                     -1.07852844118054256E-164, 6.74944988093833511E-181,
                      2.66919776648782447E-197, 1.11116777107361561E-213,
                     -6.32998074212501601E-230, 3.60611655032574459E-246);
  sin_t105 : constant hexa_double
           := create( 3.19502030816015692E-01,-1.39815624910966264E-17,
                      8.17300006974113497E-34,-7.76710962702109518E-50,
                      2.01858875781622656E-66,-9.80058308180401479E-84,
                      5.54096900974084408E-100, 2.00824774002142862E-117,
                      1.14751962626856793E-133,-7.05959756509508721E-150,
                      3.18883870006025942E-167,-1.65134189199989077E-183,
                      2.42369136665338060E-200, 6.07305545886025846E-217,
                     -2.65624500761933472E-233,-4.63025237151770438E-250);
  sin_t106 : constant hexa_double
           := create( 3.22407678801069852E-01,-4.05190399379593982E-18,
                      3.74383027802967961E-34, 8.79367310466391951E-51,
                     -8.55228338329538054E-68, 3.55838653159921593E-84,
                     -4.69655825682594782E-101, 1.92516635676656938E-117,
                     -1.48823649774796055E-133, 4.96119722047790537E-150,
                      1.77167114881127226E-166, 1.10026713329240380E-182,
                      2.37107256363052924E-199, 2.57669836799690015E-216,
                      7.41112920169480655E-233,-1.21327034542284167E-249);
  sin_t107 : constant hexa_double
           := create( 3.25310292162262926E-01, 7.91712494637658925E-18,
                     -6.75766220681463915E-35, 2.30216550669295381E-51,
                     -1.19255802605666878E-67, 5.65529219697017358E-84,
                      9.69701113768915973E-101, 3.14387562288893286E-117,
                      1.49230530379727423E-133, 1.63961265298920349E-150,
                     -7.10804471344479636E-167, 1.35836429838797565E-183,
                      9.00788715649598063E-200, 3.10349812202480497E-216,
                      1.19845174114308285E-232,-2.89566299828885872E-249);
  sin_t108 : constant hexa_double
           := create( 3.28209843579092553E-01,-2.66931407196418959E-17,
                      7.89288514475347883E-34, 2.55251638219878091E-51,
                     -1.19204092531719092E-67, 2.68221919301586565E-85,
                      3.80270310625008163E-102, 2.98968140168781494E-118,
                      1.22859181572069105E-134, 1.00590774108174300E-153,
                      4.09962234005774564E-170, 5.14961793540157167E-187,
                      4.71434819813175956E-203, 2.76324870738933798E-220,
                     -1.81560586886009548E-236,-1.43518654033399234E-253);
  sin_t109 : constant hexa_double
           := create( 3.31106305759876429E-01,-2.74694654747786940E-17,
                     -1.34012459166102057E-33, 6.55317624899761627E-50,
                      4.16101557520311717E-66, 1.39395796768404633E-82,
                      2.38622353481304296E-99,-4.86989223390849381E-116,
                     -1.72099654235418698E-134,-9.20779843986347905E-151,
                      1.43391601989917937E-167, 1.73095225201759968E-184,
                     -8.74666843918083436E-201,-2.59185496218710075E-217,
                      1.72266524889043137E-233,-6.33537729655836826E-250);
  sin_t110 : constant hexa_double
           := create( 3.33999651442009382E-01, 2.25989868062881418E-17,
                      7.80630571925861152E-34, 2.04276008954866827E-50,
                     -5.00592200578385284E-67,-9.79997812035375432E-84,
                      7.87951887594339420E-100,-5.04488260683143345E-116,
                      2.41673022170850315E-132, 9.79084254997304892E-149,
                      8.50210541002897739E-166,-1.83263739497225609E-182,
                      6.50493739460915757E-199,-2.71252193945430146E-215,
                     -7.52989209001414967E-232, 4.44801816428873322E-248);
  sin_t111 : constant hexa_double
           := create( 3.36889853392220051E-01,-4.20009400334750924E-19,
                     -2.91786529699854378E-36,-1.15973764370367485E-52,
                      8.13714082453078616E-69, 4.95777216853127969E-85,
                     -8.93396613272086084E-103, 2.44496916950042010E-119,
                      9.45060656842817040E-136, 7.06019498536826287E-152,
                     -3.06496268379940861E-168,-2.23626049012031145E-184,
                     -1.19289499705392937E-200, 1.01206907757052883E-217,
                      3.00840623309328998E-234,-1.78716291855633973E-250);
  sin_t112 : constant hexa_double
           := create( 3.39776884406826851E-01, 6.60286794994182819E-18,
                      1.25750099886696825E-34, 2.55690676990083039E-51,
                     -1.06829152215916100E-67, 8.53518010985346333E-85,
                     -1.76434729744117232E-101, 1.43187327275854025E-117,
                     -8.48225590425498161E-134, 3.36070680562465717E-150,
                      2.17430425575435768E-166, 1.03876578565482000E-182,
                     -1.27845990549934859E-199,-1.03815619567624862E-215,
                      4.53147825138135387E-232,-2.08532613276777435E-248);
  sin_t113 : constant hexa_double
           := create( 3.42660717311994378E-01, 1.92615184493063189E-17,
                     -9.27541891359908673E-34, 8.54399966873901659E-50,
                      9.32963304574866163E-68,-8.03396329164393270E-84,
                     -3.28401482209420453E-100,-1.48798544009986274E-116,
                      1.29817571186384619E-132,-4.08203180542348143E-149,
                     -4.16799101693761937E-165, 1.18991925450312721E-181,
                      2.95789578374152202E-198,-1.78366625951170662E-214,
                      8.03830901310276681E-231, 4.87392574401213406E-247);
  sin_t114 : constant hexa_double
           := create( 3.45541324963989038E-01, 2.72511436729161234E-17,
                      7.01381636019417366E-34,-1.41762921974540153E-50,
                      9.42576230036345916E-67,-1.68806522916280685E-83,
                     -3.82669209245553588E-100, 2.47123766397266121E-116,
                     -2.61369700506650030E-133,-1.36898020404391427E-149,
                     -4.29596005653928813E-167,-9.27023695178767669E-184,
                      4.87493968137716104E-200, 9.22572949627033764E-217,
                     -3.98366091194548646E-233,-6.77999945043504736E-250);
  sin_t115 : constant hexa_double
           := create( 3.48418680249434565E-01, 3.69744205142049177E-18,
                      3.55321468784999958E-34, 1.95654625445013218E-50,
                      2.02352641219016910E-67, 3.74958059978421188E-84,
                      1.36249301317932123E-100,-5.53771067941087221E-117,
                      2.57572785395341271E-133, 1.85973707646193058E-149,
                      1.01426675034123312E-165, 4.42255130020695556E-182,
                     -1.85492812866017969E-200, 6.55178879671728880E-217,
                      1.46375715185258478E-233,-6.26641951549708289E-250);
  sin_t116 : constant hexa_double
           := create( 3.51292756085567148E-01,-2.26707120987958437E-17,
                     -1.69942166731396328E-34, 9.11056160345304866E-51,
                     -5.17862842813958020E-67, 2.73370049819498641E-83,
                     -1.70217726184498056E-99,-1.46843964222269468E-118,
                     -6.69433737890355350E-135,-4.95961560410527338E-151,
                      5.04676791610764122E-168, 4.19830987060119984E-184,
                     -4.46042293925293193E-201, 2.25744402991808964E-218,
                      1.22839343144121165E-235,-5.47395959869144452E-252);
  sin_t117 : constant hexa_double
           := create( 3.54163525420490399E-01,-1.69517633057648601E-17,
                      1.27723317778146171E-33,-3.37037854358433103E-50,
                      1.79793457972255570E-66,-8.95427957871373118E-83,
                     -3.59760475053243210E-99, 1.40941204508121450E-115,
                     -3.88968524652987578E-132,-3.12127942024956309E-148,
                      1.41066523354349364E-164, 6.77603954116039482E-181,
                     -1.53225412361526775E-197,-8.22599452385483515E-214,
                     -4.36517176757430613E-230, 2.40638487483754301E-246);
  sin_t118 : constant hexa_double
           := create( 3.57030961233430033E-01,-4.82181911379191658E-19,
                     -4.16724369944923610E-35,-7.15311671493643523E-52,
                      6.20967593983977441E-68,-7.31675547696572083E-85,
                     -2.99949921625586749E-101,-9.99398420040930671E-118,
                     -5.47963029096861824E-135, 2.90016533330336493E-151,
                      1.34195855903901862E-167,-4.10558560355955473E-184,
                     -1.95130907751555244E-201,-1.46284744281660838E-217,
                     -5.05544510089787172E-234, 2.20617108111686943E-250);
  sin_t119 : constant hexa_double
           := create( 3.59895036534988166E-01,-1.76016871238392825E-17,
                      1.33751254730467910E-33, 7.94678155935843403E-50,
                     -3.56009437536984743E-66, 1.64674395332976333E-83,
                     -4.63807576067395367E-100,-4.52965212454481292E-116,
                      6.19107477523916914E-133, 1.60853324096578818E-149,
                      4.86774983395750491E-166,-5.00484874892274306E-183,
                     -1.94577127638580771E-199, 1.07806717919848548E-215,
                     -2.72910556879564494E-233,-1.98533890259470331E-249);
  sin_t120 : constant hexa_double
           := create( 3.62755724367397225E-01,-9.16683526637498492E-18,
                     -7.43178439569367352E-34,-2.01995825118045641E-50,
                     -1.17856641422082888E-66, 6.72281042886257665E-84,
                      1.45648315934707610E-101,-9.77920682049448279E-118,
                      1.37057891417387636E-134,-8.79588095096027016E-151,
                     -5.11713438817615026E-167,-3.20975791586239064E-183,
                     -3.21607558151614235E-200, 8.89669820638154010E-217,
                     -7.20417887214422593E-233, 3.00953678046244531E-249);
  sin_t121 : constant hexa_double
           := create( 3.65612997804773854E-01, 1.62178987704575461E-17,
                      1.12869701519610553E-33,-7.18252873181390098E-50,
                      2.49980797789504764E-66,-2.14890693511455580E-82,
                     -9.96977516832914542E-99,-3.07864567708923780E-116,
                      2.57578187765513372E-132,-5.99095377602199407E-149,
                     -5.41970061971591859E-166, 8.34095943126197076E-183,
                      4.71751239316798887E-199,-1.68973807587826414E-215,
                      2.87206820428867325E-232,-1.25650049695566895E-248);
  sin_t122 : constant hexa_double
           := create( 3.68466829953372321E-01, 1.04636407961592684E-17,
                      2.05549847385173044E-35, 1.04418613056187690E-51,
                      6.63908600018281761E-68, 3.30903847157543902E-84,
                      7.72218329838374556E-101, 5.25922086312600548E-119,
                     -5.37997586793977391E-135,-1.14067576449185946E-151,
                     -2.09222111610355206E-168,-5.85905896929351924E-185,
                     -1.15201663202802528E-201,-5.14676831358305910E-218,
                      1.52850365073557282E-234,-1.36588505988332920E-250);
  sin_t123 : constant hexa_double
           := create( 3.71317193951837543E-01, 3.47492396482382656E-19,
                     -7.51510530428666715E-37,-2.81534684386508515E-53,
                      1.54670382177623091E-69, 4.76151224631190364E-86,
                     -1.55237787921883323E-102, 2.98041432263897182E-119,
                      1.05812996528871400E-135,-2.53524026121683126E-152,
                      9.89959785210170097E-169,-5.87072995732718330E-185,
                     -1.95077603261666781E-201,-4.11305072497605343E-218,
                      2.50203933929327429E-234, 1.25693937748244959E-250);
  sin_t124 : constant hexa_double
           := create( 3.74164062971457989E-01, 8.01141037619621177E-18,
                      5.34295998134060520E-34, 1.03513787965392099E-50,
                      1.26070376979965845E-67, 5.71975152402306685E-84,
                     -1.08743408690080497E-100, 5.39776830662065205E-117,
                      1.24073060258550667E-133, 8.88563532451384302E-150,
                     -5.22145822746882982E-166, 1.80065465844443072E-182,
                      5.52946926411820869E-199, 4.41076321278376554E-215,
                      1.80089160536258165E-231, 2.05232160806402030E-248);
  sin_t125 : constant hexa_double
           := create( 3.77007410216418259E-01,-2.72553020419569299E-18,
                      6.36465864450181373E-35, 8.30486571765035594E-52,
                     -1.47241614510515818E-68,-1.28446846708744689E-85,
                      8.79014244401513679E-103,-9.73195178218488810E-120,
                     -2.07916578028735695E-136, 4.30221542479241657E-153,
                      8.45118196573698749E-171, 7.93315018887636940E-187,
                      2.47289359581108695E-203, 8.37421680326609327E-220,
                      6.96335510324869695E-236, 2.68350595812327477E-252);
  sin_t126 : constant hexa_double
           := create( 3.79847208924051161E-01, 9.91513058551723705E-18,
                      4.87614096972248857E-34, 1.40250840007767047E-50,
                      1.50124853831174294E-67, 2.07221245953549079E-84,
                      1.56274968439721697E-100,-1.13477932768015179E-116,
                      3.04799544088851267E-133, 2.39645181108533454E-150,
                     -6.83201778411133327E-167, 4.80752274797079409E-183,
                     -2.25614584613940585E-199, 5.12574446465843365E-216,
                     -4.12886087128233367E-233, 3.40709195672173247E-249);
  sin_t127 : constant hexa_double
           := create( 3.82683432365089782E-01,-1.00507726964615876E-17,
                     -2.06053163028066947E-34,-1.27177246980852050E-50,
                      6.07736561771507054E-67,-2.18213633675164148E-83,
                     -8.42501228457432599E-100,-4.55038691861614569E-116,
                     -5.59111202338570939E-133, 1.31501334485453046E-149,
                      1.80248977055848293E-166, 7.11180489405509571E-184,
                      1.16922054572933137E-200,-4.67101539569466668E-217,
                     -3.87498640033663279E-233,-7.24699265447814838E-250);
  sin_t128 : constant hexa_double
           := create( 3.85516053843918849E-01, 1.51776653964723134E-17,
                      1.41982305180165351E-33, 5.89551671599042348E-50,
                     -6.60618952452351693E-67,-8.38410465649804950E-84,
                      4.47036513330724044E-100,-2.26738741002153613E-116,
                     -1.10002354451439579E-132, 1.66766344872759347E-149,
                      6.08596378868315376E-166,-3.79134951832098129E-182,
                     -1.79024895444693839E-198, 3.01947572108183836E-215,
                     -1.75971580224605954E-231,-7.60897554218319055E-248);
  sin_t129 : constant hexa_double
           := create( 3.88345046698826302E-01,-1.00537705983987169E-17,
                      7.59429992550571310E-34,-3.19679740466542192E-50,
                     -5.54944516189153787E-68, 1.81788043273150058E-84,
                     -3.12226350160964040E-101, 1.78299606718499133E-117,
                     -1.69005215776907858E-134,-3.87737434611170698E-151,
                     -1.82622678910787584E-167,-2.78976623576912709E-184,
                     -2.28921218519167227E-200,-1.50455109505118386E-217,
                      2.29224229131885186E-235,-1.29278921312292766E-251);
  sin_t130 : constant hexa_double
           := create( 3.91170384302253871E-01, 1.79977878582439952E-17,
                     -1.06134824026098561E-33,-5.45821488177910320E-50,
                     -9.71868199622811197E-67,-6.50416395633437059E-83,
                      2.48199913080417198E-99, 3.40963125384574983E-116,
                      1.03723115903375253E-132,-4.87018789623639401E-150,
                      2.47423513117622554E-166,-9.97257183543049292E-183,
                     -4.04176240708395499E-199, 1.62855923062464878E-215,
                      9.48765976529142591E-232,-4.04880215051430627E-248);
  sin_t131 : constant hexa_double
           := create( 3.93992040061048099E-01, 9.76492416412393360E-18,
                     -2.12335994412846166E-34,-5.55298367953408191E-51,
                      3.90719210847308485E-67, 3.06283560819357113E-83,
                     -1.71821561323903406E-100,-8.25917849179282102E-117,
                     -8.92723653809848864E-134, 3.99975147768017363E-152,
                     -3.66193157950608110E-168, 1.09016031497943980E-184,
                     -6.35462804442684654E-201, 3.04134096653895127E-217,
                      1.64010738888021293E-233, 5.20998238847229722E-250);
  sin_t132 : constant hexa_double
           := create( 3.96809987416710308E-01, 2.05450636708401260E-17,
                      6.13470588019228416E-34, 1.07337881506364299E-50,
                      4.16361014621386142E-67,-1.90389115936262464E-83,
                     -1.15158381762066368E-99,-8.62145960853751498E-116,
                      4.40936599910600345E-132, 2.26036778811320496E-148,
                     -1.42076024938442073E-164, 3.20075077164051069E-181,
                     -1.62944306499407995E-197,-9.78494358917390061E-216,
                     -2.07847087110818244E-232,-6.98181520590888440E-249);
  sin_t133 : constant hexa_double
           := create( 3.99624199845646844E-01,-1.50654974761893716E-17,
                     -9.96532588818672981E-34,-5.75243237127253548E-50,
                      6.21979448232916408E-67,-6.03832619886155209E-83,
                     -4.22356612309472786E-101,-2.94108201068720585E-117,
                      1.28034557609725532E-133,-6.17881931817557098E-150,
                     -5.06222443632764819E-166,-2.16590433494518399E-182,
                     -1.14373191396716910E-198, 3.10167593106978410E-215,
                      1.83615357976725605E-231, 1.33544832931576669E-247);
  sin_t134 : constant hexa_double
           := create( 4.02434650859418430E-01, 1.09026193393282696E-17,
                      7.39985281259897649E-34, 2.27457848068234989E-50,
                      1.60225633135131042E-66, 4.43217656927782080E-83,
                     -1.02315094071943250E-100,-4.27996593315948612E-117,
                      1.51873746986462720E-133,-3.55718159314264777E-150,
                     -6.50243016583802836E-167, 3.64264724745558615E-183,
                      7.55091053504700766E-200,-1.85530189388410209E-216,
                     -1.34925866564059430E-232,-3.11983438716444945E-249);
  sin_t135 : constant hexa_double
           := create( 4.05241314004989861E-01, 9.91114019428998842E-18,
                     -2.51690708954346477E-34, 9.27729848184365734E-53,
                      4.19931751188889834E-69,-7.68595548245619712E-86,
                     -3.88866589693576813E-102,-1.32848673446719518E-118,
                      7.15816620565158344E-135, 3.36548251349969197E-151,
                      4.76270531154391183E-169, 3.10737256149608310E-186,
                      1.97209397176660541E-202,-2.58262673178348828E-219,
                     -2.10061094988321661E-236, 1.37689724412454833E-252);
  sin_t136 : constant hexa_double
           := create( 4.08044162864978688E-01,-7.00060151373513107E-18,
                     -1.41082073342682282E-34, 1.51755469975771358E-52,
                     -8.58011210399058743E-69,-4.35983787910480077E-85,
                      2.18950602338367537E-101, 7.39785014279769569E-119,
                      1.63246839149416815E-135,-1.98210262375458944E-152,
                     -7.70599366115286249E-169,-3.83916462033581081E-186,
                      3.44453874583502118E-203, 1.51114800287761437E-219,
                     -1.29035892566965365E-235,-7.67375541896327724E-252);
  sin_t137 : constant hexa_double
           := create( 4.10843171057903966E-01,-2.42198351903554993E-17,
                     -1.14189029253133137E-33,-2.09968431650934681E-50,
                     -3.58396626808437780E-67, 4.68857604112512300E-84,
                     -1.58524753709479526E-100,-1.09295480339526143E-116,
                      3.93537021156101912E-133, 2.78784833529398961E-149,
                      1.64291048739171869E-165, 1.20152990257428724E-181,
                      1.40831277865038155E-198, 3.79460461671234559E-215,
                     -8.26612856756293484E-232,-8.19005968878186022E-249);
  sin_t138 : constant hexa_double
           := create( 4.13638312238434558E-01,-1.03939849405978709E-17,
                     -1.14816811745038799E-34,-2.02810528510286799E-51,
                     -1.32198238091455296E-67,-3.18722046570921303E-84,
                     -1.10457573774508088E-100,-3.27769307628216940E-117,
                     -2.02583897542428939E-133,-1.72036182745451726E-149,
                     -2.24668265394956693E-166,-1.22141905654824431E-182,
                     -1.99614830202403297E-199,-1.09194566212641017E-215,
                      3.60510307362327560E-232, 2.72704054472853509E-248);
  sin_t139 : constant hexa_double
           := create( 4.16429560097637208E-01,-2.54755804131317323E-17,
                     -3.44826785061128235E-34, 7.17886193518654803E-51,
                      4.67879696786894412E-67,-2.95932264463873355E-83,
                     -1.60900321794911505E-99, 1.07371726320995739E-116,
                      6.11674674031503852E-133,-1.03511573960191788E-149,
                      9.97973548362126384E-166,-7.66746977800500600E-184,
                      1.26682440579293322E-200,-1.20418351169228678E-217,
                     -8.47378668818929874E-234, 3.04864166568287350E-250);
  sin_t140 : constant hexa_double
           := create( 4.19216888363223961E-01,-4.22324637501105896E-18,
                     -3.60530230452557941E-34, 2.05545621514494970E-50,
                      1.16846638534326586E-67, 4.33787084636179890E-84,
                     -3.55027388994698667E-100,-3.86111864440964539E-117,
                     -1.16698568849807524E-133, 4.41198250099147593E-150,
                      2.69931173988416137E-166, 7.90016877070336411E-183,
                     -5.34157383963288845E-199,-1.07091884542368833E-215,
                     -3.81118798778725948E-233,-2.60379906201911321E-250);
  sin_t141 : constant hexa_double
           := create( 4.22000270799799682E-01, 4.35432669941285275E-18,
                      3.17343102722511904E-34,-1.35732479807386682E-50,
                      1.04323924361772305E-66, 1.65084724226252926E-83,
                     -2.79274295985653372E-100,-2.34858230027357275E-116,
                      7.89329920875335274E-133, 6.16661825694594461E-149,
                     -4.33861740744461008E-165, 1.44729691995061775E-181,
                      1.05321689128952329E-199, 4.27591769364532233E-216,
                      2.14260050722657283E-233, 9.98089905435237132E-250);
  sin_t142 : constant hexa_double
           := create( 4.24779681209108806E-01, 2.74623122042772811E-17,
                     -4.65528478021119482E-34, 6.59617810991931222E-51,
                     -1.34133607229630039E-67,-6.38348523402678775E-84,
                     -6.35930435215519189E-101, 6.28545860427507004E-117,
                     -1.64189516358863932E-133, 2.01983631162019731E-150,
                     -1.24827861910667564E-166,-4.15407928640169463E-183,
                     -2.99612827940991163E-199,-2.16787085455220000E-215,
                      4.66909510586908671E-232, 7.68942877503481540E-249);
  sin_t143 : constant hexa_double
           := create( 4.27555093430282085E-01, 9.41118981629547262E-18,
                     -1.74466824265988006E-34,-2.20544926264801693E-51,
                     -5.15215851093596162E-68, 1.03208115815492520E-84,
                      6.53956613897519999E-101, 1.99227926691509150E-117,
                     -1.55255123250539499E-133, 8.22270418951835935E-150,
                      3.77793820377468169E-166,-2.39112987825208055E-182,
                     -8.80236866194559862E-200, 3.22971955488839641E-216,
                      2.40588450329777971E-232, 1.45502074958060849E-248);
  sin_t144 : constant hexa_double
           := create( 4.30326481340082612E-01, 2.22596869740926898E-17,
                      8.59725913140850753E-34,-2.94208978890030203E-50,
                      1.75926705124073484E-66,-2.11017639613453163E-83,
                     -1.70028712866050335E-100,-4.18327177821188638E-117,
                      3.70956749015974740E-134,-9.87228804320601329E-151,
                      6.77842671931308215E-167, 9.30359439523032544E-184,
                     -2.61919086936323792E-200,-2.53576595432255880E-217,
                      6.93030293073354369E-234, 1.72085948226597168E-250);
  sin_t145 : constant hexa_double
           := create( 4.33093818853151957E-01, 1.12242833298475168E-17,
                      5.32237480410756612E-35,-5.29843957766736142E-51,
                      6.76146648124111829E-68,-3.01616882584315782E-84,
                     -2.70870956048747896E-101,-1.46405093803331340E-117,
                     -8.46166445563457908E-134, 1.75239773582706351E-150,
                      6.29134271081053879E-167, 2.31471818917848501E-183,
                      2.02152640796884956E-199, 4.06149260644497010E-216,
                      1.87933895425996795E-232,-1.12362201581588253E-248);
  sin_t146 : constant hexa_double
           := create( 4.35857079922255475E-01, 1.62305154506445271E-17,
                     -6.43714490635794420E-35, 3.78081519223010690E-51,
                     -1.05443929214259962E-67, 6.55631269454937484E-84,
                      1.65208077276557663E-100, 1.11624333718965509E-117,
                      4.42625068810368815E-134, 2.24418569651877293E-151,
                      1.51673015248190157E-167,-8.56505747389013882E-184,
                      3.90944875796938548E-200, 2.25032154122319929E-216,
                      1.02027127522737469E-232, 1.79586010476871199E-249);
  sin_t147 : constant hexa_double
           := create( 4.38616238538527659E-01,-2.08833158310750902E-17,
                     -1.42595835408918766E-34, 6.38647635906570774E-52,
                      1.76788005853839990E-68,-9.42253457285591945E-85,
                      5.61541325456574757E-101,-3.18038472694768712E-118,
                      8.55659798104891559E-136, 1.28058889681591956E-152,
                     -4.54251868564383454E-169,-1.97729575098509860E-185,
                     -6.33458878394597723E-202,-3.11789692897618726E-218,
                      1.51848842389971249E-234,-2.10970021061967457E-251);
  sin_t148 : constant hexa_double
           := create( 4.41371268731716671E-01, 2.23607838869649689E-17,
                      1.18647696035157695E-34,-3.80870032661892321E-51,
                     -9.31638331325958014E-68,-5.88740846958704811E-84,
                      2.41598936545314791E-101,-1.00530219499800980E-118,
                      1.81375561265609285E-135,-2.11152367580170649E-152,
                     -2.59842119425248845E-169, 3.35210132753300661E-186,
                     -2.06091414369589845E-203, 4.62341921978707385E-220,
                      1.77001452660780561E-236,-2.86839983485184765E-253);
  sin_t149 : constant hexa_double
           := create( 4.44122144570429256E-01,-2.42188744221783147E-17,
                      2.22052308387039070E-34, 9.21330359113562581E-51,
                      1.75117701549931936E-67, 4.34385628654253481E-84,
                     -1.59650430253157971E-100, 1.05368100122087423E-116,
                      4.48366276251707445E-133, 3.50085536466987601E-149,
                      3.35900119582968537E-166,-1.83257288431439521E-182,
                     -1.61630351888735761E-198,-6.82813010839953875E-215,
                      3.74842512513419225E-231, 1.78581222877067494E-247);
  sin_t150 : constant hexa_double
           := create( 4.46868840162374215E-01,-1.92221361423093823E-17,
                     -4.44256785897320493E-35,-1.36736092921495352E-51,
                     -7.40632758976008092E-68,-2.87677356289550370E-84,
                      3.38297030420845157E-101,-2.17930928276559544E-117,
                     -1.44912807855737617E-133,-1.94591338206234773E-150,
                      6.17742621657012310E-167,-3.53356585080210346E-183,
                      1.76581614021196394E-199,-3.84644684997174678E-217,
                     -9.91389682971194399E-234,-4.29173051922980525E-250);
  sin_t151 : constant hexa_double
           := create( 4.49611329654606595E-01, 4.88319242320352435E-18,
                      2.71510844981913810E-34,-1.56539931716131535E-50,
                     -9.84328637079578728E-67, 5.42013325779863042E-84,
                      3.06626570250924240E-100, 2.49557333332829462E-116,
                     -2.25946457826895040E-133, 1.07789362514880734E-149,
                     -3.91940961254447636E-166,-5.10369185013086265E-185,
                      2.01059959124849535E-201, 1.64845034134033923E-217,
                     -3.83816147059230559E-234,-1.34429045674240954E-250);
  sin_t152 : constant hexa_double
           := create( 4.52349587233770889E-01,-1.48279774721961223E-17,
                     -7.69475010889723245E-34, 1.76568568820313190E-50,
                      4.78856030489328032E-67, 1.05757287492197087E-83,
                     -8.96139401905120995E-100, 3.56844859016001897E-116,
                     -9.17988180205989537E-133,-2.15527222285723905E-149,
                     -1.22789157047820026E-165,-8.57122784444067654E-182,
                      6.56406561175031999E-198,-2.09021789505811131E-214,
                      1.54109060603294557E-230, 3.51031903099744069E-247);
  sin_t153 : constant hexa_double
           := create( 4.55083587126343836E-01,-1.23799067581164721E-17,
                      5.52896889555426431E-34,-8.53823128402093862E-51,
                      4.35761034232550185E-67, 1.06275321495045154E-83,
                     -3.83289275430714933E-100, 2.48658300545672635E-116,
                     -5.29542411951851184E-133,-3.47062785235423352E-149,
                     -7.07896488740657039E-168,-1.13071493103018702E-184,
                     -2.14530060682542716E-201, 3.49087819368515219E-218,
                     -2.23600265562374773E-234, 1.35354434649079697E-250);
  sin_t154 : constant hexa_double
           := create( 4.57813303598877230E-01,-8.45542549222959487E-18,
                     -6.37703942467642634E-34, 3.17782535755642491E-50,
                      1.63954755347278651E-66, 9.94921380496366312E-83,
                     -2.34369765957016175E-99, 9.27923204206177782E-116,
                     -4.60982843370064752E-132,-8.58914062296896542E-149,
                      3.43867579224338383E-165, 1.79559971812933320E-181,
                      7.39317661677412346E-198,-3.73533870859519493E-214,
                      3.18437175752442268E-230,-2.16196821367070043E-246);
  sin_t155 : constant hexa_double
           := create( 4.60538710958240005E-01, 1.84887774921778717E-17,
                     -1.05277321542097255E-33, 3.32355934909471024E-50,
                      1.48893748691692587E-66,-8.05039814004150823E-83,
                      5.16182103159212165E-100,-3.68003478412553394E-116,
                     -2.17175685435827350E-132, 8.18569215581264038E-149,
                     -4.02018017529467323E-165,-8.10743357394916011E-182,
                      4.59705357524286637E-198, 2.44108169039853717E-214,
                      1.26540799250008263E-230, 1.32453368253768394E-247);
  sin_t156 : constant hexa_double
           := create( 4.63259783551860205E-01,-7.35149245332317067E-18,
                      6.71753968817070354E-34, 3.95941276121233792E-50,
                      6.23152884028039170E-67, 4.84227359210742245E-83,
                      5.50191026148806027E-100, 2.64394033125971875E-116,
                     -2.72225294241825719E-132, 1.03646541282943447E-148,
                      8.01791032979398945E-165,-1.51716321501281289E-181,
                      9.18629766553626056E-198, 5.49897708366469209E-214,
                     -4.45081188144006018E-231, 1.20441549815751255E-247);
  sin_t157 : constant hexa_double
           := create( 4.65976495767966181E-01,-3.30235477782351354E-18,
                      3.49046770504768909E-35,-1.89714389379696671E-51,
                     -2.57573587999938835E-68,-7.20917984486729402E-87,
                     -2.33081932508047651E-103, 1.27248390569055507E-119,
                     -8.73231653645286627E-136, 2.03813844206681348E-153,
                     -7.35800662572854236E-170,-3.91833949802492625E-186,
                     -9.81351822611937171E-203, 2.45819844940427547E-219,
                      8.33710116130441813E-236, 5.30238509626564776E-252);
  sin_t158 : constant hexa_double
           := create( 4.68688822035827957E-01,-2.29492516818450541E-17,
                     -1.13647576418236581E-33, 6.88405225019186122E-50,
                      2.37995478956060175E-66,-1.76643806017233826E-82,
                     -1.33557531813477976E-99,-2.70042577896921252E-116,
                     -7.80783909945045822E-133, 5.86202358890741040E-149,
                      7.95750558636111884E-167,-3.73616202645800265E-183,
                      1.66774019670201179E-200, 5.74233986440703397E-217,
                     -2.03073576844811182E-233,-1.82148107371471849E-249);
  sin_t159 : constant hexa_double
           := create( 4.71396736825997642E-01, 6.51667813606901296E-18,
                      2.94575469662359839E-34,-6.21597177388366305E-51,
                      4.90363168400334462E-67,-1.54734589077876804E-83,
                      5.01089000683439180E-100, 8.62267126631534475E-117,
                      4.83812315993201668E-133, 5.17719337859616187E-150,
                     -2.12948910155899344E-166, 5.69552493961071061E-183,
                      2.81080452266139723E-199, 2.15405888505468473E-215,
                      1.20270779789460782E-231, 4.72370121865012376E-248);
  sin_t160 : constant hexa_double
           := create( 4.74100214650550023E-01,-8.14516015489780752E-18,
                     -3.47894485556144223E-34,-1.16819439746585078E-50,
                     -1.00679196118875977E-66,-8.14318999812223865E-84,
                     -3.35311680847673620E-100,-2.55012544402769616E-117,
                     -9.06570686736416571E-134,-4.37355070919945906E-150,
                     -5.26229984411630156E-167,-1.14586023913462573E-183,
                      7.87742557930149068E-200, 1.58074152758770002E-216,
                      3.84528745466124942E-233, 1.07302739595243255E-249);
  sin_t161 : constant hexa_double
           := create( 4.76799230063322144E-01,-1.02935153383057945E-17,
                     -3.65820450083699518E-34, 1.74241314791764755E-50,
                      7.64290068643720225E-68,-7.94821442098581988E-84,
                      4.02089145833352637E-100, 4.53026336969603360E-119,
                     -2.70017013157283264E-135, 9.36710531541475751E-152,
                     -1.76623565059291678E-169,-7.20931473110974335E-186,
                      1.84959779003225403E-202, 8.07019436937358739E-219,
                     -4.60958724740638885E-235,-2.65013659958429747E-251);
  sin_t162 : constant hexa_double
           := create( 4.79493757660153008E-01, 1.84199996626847708E-17,
                     -1.30408386212733120E-33, 1.09771318222464710E-50,
                     -1.01452353259774662E-66,-4.92872791661231722E-83,
                     -2.87470906671517064E-99, 1.66793539379023301E-115,
                      6.30226300071621553E-132,-3.94321239661430639E-148,
                     -1.00837639179865564E-164, 7.60173395599059332E-182,
                     -4.65165521483268548E-198, 9.66752081332369691E-215,
                      2.46358210236805774E-232, 1.45959556562554918E-248);
  sin_t163 : constant hexa_double
           := create( 4.82183772079122774E-01,-2.58615009255204420E-17,
                     -6.29131976065000067E-36, 4.08023598086847262E-52,
                     -3.27122422823965083E-68,-9.81131579124486336E-85,
                      5.13316853105007495E-101,-8.00846692593906573E-118,
                      1.17528808267819873E-134,-2.84699768284542095E-152,
                      7.88753921550864832E-169, 1.00169615385312524E-185,
                     -6.55564171705332864E-202,-2.71114105194848907E-218,
                     -1.10728214962720659E-235, 1.37945108218946888E-252);
  sin_t164 : constant hexa_double
           := create( 4.84869248000791120E-01,-1.80340042032622450E-17,
                     -3.52442769069580443E-34,-1.71383186547492462E-50,
                      2.73490284006916009E-67, 1.54269479875197795E-84,
                      1.03368944895574248E-100,-5.76898104380222011E-117,
                      1.41300864616425327E-133,-1.79118230937979288E-150,
                     -4.38722965351979597E-168,-9.78440737936096335E-185,
                      6.41363575376297261E-201, 2.76804294489948310E-217,
                     -1.37565704097802673E-234, 7.05742724525760189E-251);
  sin_t165 : constant hexa_double
           := create( 4.87550160148435940E-01, 1.42310909312736532E-17,
                     -1.82777330732626972E-34,-1.52082917904295566E-51,
                      1.90835864893336768E-68,-1.67966347634175453E-84,
                     -2.59839893899196797E-101,-1.47212545304801719E-117,
                      3.93072746974591955E-134, 2.23919131278853824E-151,
                      9.96688561352083764E-168, 4.91882402856440958E-184,
                      1.44452832715967752E-200, 2.22491718141559543E-218,
                     -1.13286662422889869E-234, 4.38344801739573291E-251);
  sin_t166 : constant hexa_double
           := create( 4.90226483288291159E-01,-5.14961456434404041E-18,
                     -3.69030274052841041E-34, 1.51729400951513044E-50,
                      9.51177428868984434E-67, 5.21488749326745008E-83,
                      3.09097894796168815E-101, 9.92307920152893204E-118,
                      2.06992340431510836E-135,-9.76655973496356002E-152,
                     -8.33631362406131137E-168, 8.29735375672796233E-185,
                      4.03891311743538938E-201,-3.95611828048065855E-218,
                      1.08366379030967458E-234, 4.58469817383658757E-251);
  sin_t167 : constant hexa_double
           := create( 4.92898192229784038E-01,-1.02578316765621855E-18,
                      6.95208177608850686E-35,-2.42609612140903889E-51,
                      8.42984754135809199E-68, 6.29390299185880572E-84,
                      3.22328918712547932E-100,-1.06177307471458175E-116,
                      1.49940038780155292E-133,-9.29978041986338329E-150,
                      2.36403130769892169E-167, 8.77098767821256329E-184,
                     -1.85115169876440705E-201,-4.80908146638859083E-218,
                     -3.86998046782527557E-234, 2.76851003713473974E-250);
  sin_t168 : constant hexa_double
           := create( 4.95565261825772541E-01,-9.43232419423653616E-18,
                      3.12129186576991429E-35, 4.20090723752427356E-52,
                      3.33881771940916825E-68,-4.85326709650289342E-85,
                      1.50436676336302327E-101,-1.01429678586771007E-117,
                      4.26439473712048851E-134, 2.08890667467658243E-150,
                      8.39348086524409684E-167, 5.98885472212784442E-183,
                      7.68285041566461530E-200,-4.35727173169414599E-216,
                     -1.21814105026174123E-232,-5.27299078570534563E-249);
  sin_t169 : constant hexa_double
           := create( 4.98227666972781869E-01,-1.61263838305407977E-17,
                     -1.50928973192988707E-33, 1.10492988908959171E-50,
                     -8.19156114106015927E-67, 2.86055839075918389E-83,
                      8.20013328268562607E-100,-6.49778303276352489E-117,
                     -3.76066094102881474E-134,-3.29485353751034010E-151,
                      4.37182799881749711E-169, 2.89212898271676255E-185,
                     -2.14009532728812049E-202, 1.19421129919998894E-218,
                      1.43551661069904028E-235,-3.10161818794593172E-252);
  sin_t170 : constant hexa_double
           := create( 5.00885382611240826E-01,-3.96040151470746387E-17,
                     -2.22083952018980066E-33, 1.36482027358394166E-49,
                      1.84246249086235095E-66,-8.64504173724520648E-83,
                      2.44523582308599862E-99, 9.12743793511014537E-116,
                     -2.77488751326675104E-132, 5.78025469698690536E-149,
                      2.36178299777011219E-165,-7.95078942915183987E-182,
                      9.49408279947262791E-199, 2.54040603019240900E-215,
                      1.02539778783057341E-231,-4.97025008701897418E-248);
  sin_t171 : constant hexa_double
           := create( 5.03538383725717575E-01,-1.67313082049674969E-17,
                     -1.01402336440747857E-33, 4.09530719376714769E-50,
                      1.70589927959393278E-66, 7.04473113528281631E-83,
                      4.03917247767082378E-99,-2.54218377887325899E-115,
                     -1.05850847572192823E-132,-1.53140856191775566E-149,
                      3.35157146460219562E-166,-2.52196713103794714E-182,
                      2.38647787172489775E-199,-9.36840246188596279E-216,
                      5.81982351699820434E-232,-3.51010543043950683E-248);
  sin_t172 : constant hexa_double
           := create( 5.06186645345155339E-01,-4.83215929864937112E-17,
                      9.28581072266422520E-34, 4.26998024010370046E-50,
                     -1.26563820798698634E-66, 1.25786903562437943E-82,
                      4.30621553335155989E-99, 5.24668620748806158E-116,
                     -5.75826217207089667E-133,-3.08458280739577136E-149,
                      1.31937686180849853E-165, 7.44423992411091292E-182,
                     -6.51096990974951435E-198,-3.52823055290502028E-214,
                     -1.43943593243974891E-232,-8.55800123694987301E-249);
  sin_t173 : constant hexa_double
           := create( 5.08830142543106989E-01, 4.78369682680141297E-17,
                     -1.07270229288060348E-33, 2.73093745136727574E-50,
                      1.55903014238376149E-66, 8.60429738645002481E-83,
                      4.59186550036684138E-99, 3.41794553305563843E-115,
                      1.17079098009141161E-131,-7.50328113502571313E-148,
                     -2.17028451850770283E-164, 7.28539393596500557E-181,
                      4.34694512379476614E-198,-1.37004941457041194E-214,
                      2.65722080544096073E-231,-2.34425857763010878E-247);
  sin_t174 : constant hexa_double
           := create( 5.11468850437970413E-01,-1.30880012210075789E-17,
                      4.09290333633668988E-34,-3.79521901534779262E-50,
                      7.49210687958463522E-67, 1.93556276607286329E-83,
                      1.73325249346675038E-99,-2.17196172188454166E-116,
                      9.05804452750319808E-133,-5.02707957857671895E-149,
                     -1.17617559864831060E-165, 8.40910793196860789E-182,
                     -3.59288022205020937E-198, 2.78154334602410481E-214,
                     -1.37936610609086367E-230, 1.07858184156443686E-246);
  sin_t175 : constant hexa_double
           := create( 5.14102744193221772E-01,-4.57127075236156240E-17,
                      1.54882794422382834E-33,-2.58539593055211305E-50,
                     -5.61934740949359583E-67, 2.78238575662766112E-83,
                      1.66343671905130830E-99, 1.02611613943763643E-116,
                      5.25133136146492680E-133, 2.05124078707980044E-150,
                      3.68882873980304322E-167,-3.16390194777734722E-183,
                     -1.35876873212807774E-199,-5.59384486741836492E-216,
                     -8.95669412176965724E-233,-5.86761309725503818E-249);
  sin_t176 : constant hexa_double
           := create( 5.16731799017649873E-01, 8.30186172338365153E-18,
                      5.82510274676952021E-34,-2.28123971905350764E-50,
                     -1.55795495996593512E-66, 5.07807951710912863E-83,
                      2.21573327195689219E-99,-1.89401446286088564E-115,
                     -6.45079716675648730E-132, 4.95585642718904817E-148,
                     -2.97546030815198552E-164,-1.54378854307241819E-180,
                     -3.19878254881448188E-197, 2.49354589334009399E-213,
                      7.52526955756942756E-230,-1.93734257925779801E-246);
  sin_t177 : constant hexa_double
           := create( 5.19355990165589643E-01,-5.53312481441711451E-17,
                     -3.16283756097690261E-35,-2.40919720511885711E-51,
                     -8.78120270230154531E-68,-7.39730320419324519E-84,
                      3.88695960892179327E-100,-2.12502728831123566E-116,
                      1.20268865149658364E-132, 1.34463255832293014E-149,
                      8.17043591315454573E-166, 2.97653303982216110E-182,
                      1.36785320990882685E-198, 3.68455305413416102E-215,
                      1.14033547849557114E-231,-7.15354115185854669E-250);
  sin_t178 : constant hexa_double
           := create( 5.21975292937154389E-01,-4.65557956920888829E-17,
                      4.63789809368504302E-34,-3.34705429346895319E-51,
                     -7.95475580886532071E-68,-2.82832721823990219E-84,
                     -7.84623444115327049E-102, 5.51090942525187956E-118,
                     -3.41727937485481728E-135, 1.02415475122160658E-152,
                     -1.96850606438198005E-169,-7.82538823948322873E-186,
                     -2.02426693531812699E-202, 9.62334790252220648E-219,
                     -4.04694620985447232E-235, 1.73764110317062636E-251);
  sin_t179 : constant hexa_double
           := create( 5.24589682678468949E-01,-4.30688690400823448E-17,
                     -4.20131552919320554E-34,-1.50960699267002743E-50,
                     -1.78160444348773757E-67, 7.91114491416668663E-84,
                     -2.00081317689602499E-100, 9.16435719981167617E-118,
                      9.45942400446994687E-135, 2.11366225164682270E-151,
                     -1.40911030919279789E-168,-1.14824692579332981E-184,
                      3.74452138618490685E-201, 9.46763666353536176E-218,
                      4.16578350604693636E-234, 8.46140815338232057E-251);
  sin_t180 : constant hexa_double
           := create( 5.27199134781901391E-01,-4.22029834805606191E-17,
                      8.55859161848672945E-34, 7.99743393367323068E-50,
                      2.22268804804906685E-66, 5.29121454912949153E-84,
                     -2.16739715725003772E-102,-1.17525981418490342E-118,
                      1.09927640053628430E-134,-2.17129572919116010E-151,
                      1.19805382015078100E-167,-5.14997734392560549E-184,
                     -1.07973110075947359E-200, 4.31098278517835798E-217,
                      1.11543604352453886E-233,-6.90032813669895745E-250);
  sin_t181 : constant hexa_double
           := create( 5.29803624686294716E-01,-4.80678417064823419E-17,
                      5.83097210466302958E-34,-8.97407615217566599E-51,
                      2.97235810125729858E-67, 1.22666055200279936E-83,
                     -6.14416122053005295E-102, 3.01011294842719771E-118,
                      1.90424076555166913E-134,-9.94388450357096961E-151,
                     -2.60215608208938314E-167, 3.84259453637041985E-184,
                     -7.77246043328546866E-201, 7.34011203301221703E-219,
                      8.65959891095033306E-236, 6.38782198538512752E-253);
  sin_t182 : constant hexa_double
           := create( 5.32403127877198012E-01,-4.10203061358008955E-17,
                     -1.92399963742308207E-33,-1.53269879138121844E-49,
                      8.20626131901962789E-66,-2.46700363515096821E-82,
                      1.05024145684911709E-98,-6.14470941700834373E-115,
                     -1.34389262935396531E-131, 3.51549637324486626E-148,
                      1.28674796220141081E-164,-3.81988453080066657E-181,
                     -1.44252661838460569E-197, 1.03443036571503738E-213,
                      3.55522116618953262E-230, 5.29374299485835810E-247);
  sin_t183 : constant hexa_double
           := create( 5.34997619887097264E-01,-5.36831327083581340E-17,
                     -1.39005699188381124E-33, 2.71540847264740923E-50,
                      2.88906455000423559E-68, 1.90484320728190398E-84,
                     -2.77564890279787574E-101,-1.24434420730948051E-117,
                     -2.88528436840241861E-134, 9.62366481441321351E-151,
                      6.66899588450584040E-167,-3.10807339806902708E-183,
                      1.84699532179313250E-199, 1.05609777386023361E-215,
                     -1.18547853948075305E-232, 1.69808120215961929E-249);
  sin_t184 : constant hexa_double
           := create( 5.37587076295645505E-01,-2.26173653884030542E-17,
                     -5.97872790334470747E-34, 3.12044197290436254E-51,
                      1.89704306032484395E-67,-1.44937350656576784E-83,
                      5.25087918828526031E-100,-3.88326271881161204E-116,
                     -1.58603401933839327E-132,-1.07262922623563371E-148,
                      8.20036659745700773E-165, 4.41872121956172849E-181,
                     -1.72569271847759176E-197,-1.17316548335712394E-213,
                     -4.87921167655975002E-230,-3.11366428724713888E-247);
  sin_t185 : constant hexa_double
           := create( 5.40171472729892854E-01, 2.70724479659358388E-17,
                      1.16987997092138293E-33,-5.90946685158815002E-50,
                     -2.39979693168273975E-66,-6.32478836374786016E-83,
                     -2.98607182580382153E-99, 1.01015328857454325E-115,
                     -7.74678051678955293E-133,-4.79248724538817553E-149,
                      1.28283313832262312E-165,-1.74825375145448986E-182,
                     -8.11409484149360016E-199, 1.81812862957194400E-215,
                      2.75242112601370622E-232, 5.36904714988266283E-249);
  sin_t186 : constant hexa_double
           := create( 5.42750784864515889E-01, 1.71482610047571013E-17,
                     -1.35259059252008698E-33, 4.97244112907273233E-50,
                      3.92021159501083647E-66, 1.86734876881603372E-82,
                     -6.18559281949176881E-99,-1.73979338208946707E-115,
                     -6.93901505618623255E-132,-1.84910012328674785E-148,
                      5.97863806469275716E-166, 5.81294990860048126E-182,
                      2.61897559629763809E-198, 3.83163107353444375E-215,
                      5.15061920157923970E-233,-3.27637532344303171E-249);
  sin_t187 : constant hexa_double
           := create( 5.45324988422046464E-01,-4.15178175383842578E-17,
                     -1.53189302193859406E-33, 6.36299211014139742E-50,
                      1.31608964229229922E-67,-8.08831724257032142E-84,
                      1.68091787417465648E-100,-1.78894677150068080E-117,
                      1.42305008303691961E-133,-4.71415299207521050E-150,
                      2.67652206421209387E-166, 2.38234324210057721E-183,
                      1.25416991090207708E-200, 5.26032639721062529E-217,
                      1.15922169039220863E-233, 4.30162715497351877E-251);
  sin_t188 : constant hexa_double
           := create( 5.47894059173100190E-01,-2.40658782971133627E-17,
                     -3.56392136693626063E-36,-2.60132708542716446E-52,
                     -3.91404198232171823E-69, 1.80489682903023005E-85,
                     -8.29286151273548521E-103, 1.55261799951404738E-119,
                      6.11687186105263667E-136,-1.37853947976128827E-152,
                     -7.54558673790217310E-169,-1.33506372495722442E-185,
                     -8.05689480140419053E-202, 1.69913289468751350E-218,
                      4.35714837860996463E-235, 6.05190273931814961E-252);
  sin_t189 : constant hexa_double
           := create( 5.50457972936604811E-01,-8.33199030158076632E-18,
                     -2.30584540357676377E-34, 2.11529449291061230E-50,
                     -6.24983431736289734E-67,-3.52468697446179383E-83,
                     -1.41148589389242068E-99, 6.79709637298784201E-116,
                     -2.64397637483735176E-132,-1.18605781184504351E-148,
                      8.03727166866798757E-165, 2.23595630837574072E-181,
                      9.43475279329075782E-198,-7.36724032691898733E-214,
                     -3.64095736848050472E-230, 1.20325188280456019E-246);
  sin_t190 : constant hexa_double
           := create( 5.53016705580027579E-01,-4.70615366237982039E-17,
                     -1.06171115459180559E-33,-1.61963161444073792E-50,
                      4.87793776246993030E-67, 1.17681865745260970E-83,
                      3.43733278217739062E-100, 4.17617202321411486E-117,
                      3.46756199647441421E-133, 8.73241843658202446E-150,
                      1.55377693406417796E-166,-9.63973400685495288E-183,
                     -6.59893385027387094E-199,-1.49141395931344683E-215,
                     -2.43495649295434374E-232,-7.43764180994635970E-249);
  sin_t191 : constant hexa_double
           := create( 5.55570233019602178E-01, 4.70941094056167682E-17,
                     -2.06405203836829206E-33, 1.22901631885671377E-49,
                      3.88576868196360505E-66, 1.74396944780609574E-82,
                     -7.72108496973436171E-100, 2.33433622424404137E-116,
                     -6.75702779426374964E-133,-1.15209704105373570E-149,
                     -1.59767920938605595E-166, 5.99314911756535251E-183,
                     -2.47675872922476872E-199,-1.65264006651779821E-215,
                      7.79771524849796561E-232, 1.19124358183602718E-248);
  sin_t192 : constant hexa_double
           := create( 5.58118531220556102E-01, 1.34811763247652260E-17,
                     -5.50167438730114378E-34,-2.34848227393354160E-50,
                      1.85461240105610639E-66,-1.14220541744252336E-82,
                      4.30846725253398281E-99, 2.65153846674908728E-115,
                     -1.61544071845519692E-131, 2.53249801176409597E-148,
                      2.44022389027506402E-165, 4.05761064354793469E-182,
                      1.29128212136918714E-198, 9.22120963891202311E-215,
                      2.52338877246679264E-231, 2.06610892152601139E-249);
  sin_t193 : constant hexa_double
           := create( 5.60661576197336031E-01,-7.39564181534761517E-18,
                      3.96806206117311926E-34, 3.19959522008362225E-50,
                     -1.71630231497906093E-66, 1.15907607797441955E-82,
                      5.45606522286511890E-99,-1.92200124014174877E-115,
                      9.17161919827055554E-132, 4.96180640227584142E-148,
                     -1.69016304364301463E-164,-6.96862870294865000E-181,
                      2.82828084594618123E-197,-1.40063078685511652E-213,
                     -1.38836622717973748E-232, 6.77322183040804849E-249);
  sin_t194 : constant hexa_double
           := create( 5.63199344013834091E-01, 2.38357751468548289E-17,
                      1.35117931737698137E-34, 9.32013115812481430E-51,
                      5.61530717534183517E-67, 1.14353859651037923E-83,
                      4.77637103994015678E-100,-3.99240028754291830E-116,
                     -2.22076150757558524E-132, 1.22285047463090238E-148,
                     -7.12776137243211625E-165, 8.61434389979448686E-182,
                      6.03966984138986746E-198, 3.42792117977155448E-214,
                      1.30781413332799907E-230,-3.40452203240063209E-247);
  sin_t195 : constant hexa_double
           := create( 5.65731810783613232E-01,-3.40960795965904665E-17,
                     -1.70732897443035458E-33, 8.91470899754045074E-50,
                      5.22879378448664091E-66,-1.44308158716926903E-82,
                     -8.30710739397395802E-99, 1.41797146649581310E-115,
                     -5.13998329747218564E-132, 1.91056105447474071E-148,
                      1.39635638252278317E-164,-7.32739327402490897E-181,
                      5.32643644152073905E-197,-2.54488188118452152E-213,
                      2.70295654636322744E-230,-1.33612421234826640E-247);
  sin_t196 : constant hexa_double
           := create( 5.68258952670131601E-01,-5.09356736427692475E-17,
                     -1.62743563510282493E-33, 9.81831515617029655E-51,
                      5.67886317959306896E-67, 2.62172797814423790E-83,
                      3.38967068442399839E-100,-1.28671608601508849E-116,
                      8.17036786858145001E-133,-6.89659546444737027E-149,
                     -2.60421913210753829E-166, 7.81781807697657599E-183,
                     -4.25499479099894119E-199, 3.68544218691096954E-215,
                      2.33860474964832329E-231,-5.97979803064024049E-248);
  sin_t197 : constant hexa_double
           := create( 5.70780745886967256E-01, 2.45681514555662075E-17,
                     -1.28444812475603499E-33,-1.80376343769362605E-50,
                     -4.95734042353730418E-67,-2.65873506350543923E-83,
                     -1.37511717085720690E-99,-3.21421169642697006E-116,
                      1.98058521125123339E-132,-7.58339499029587911E-150,
                      8.58027316234465710E-167,-6.58884490362023531E-183,
                      7.66479063187969374E-200,-3.67290767131279192E-216,
                      2.64665083040052219E-233,-1.01474120844079272E-249);
  sin_t198 : constant hexa_double
           := create( 5.73297166698042204E-01, 8.51766116693063998E-18,
                     -6.44432087880267658E-34, 2.25461055432730032E-50,
                      4.88161839186071226E-67, 5.27204544525972028E-84,
                      2.07064177132721181E-100,-3.86801831267257127E-118,
                      1.91311734079955813E-134, 1.59323660656465220E-151,
                     -1.64727482473517131E-167,-4.71293341836714122E-184,
                     -3.63703733259811002E-200,-1.47638114662007977E-216,
                     -8.18360076170475747E-234,-2.24253288999963567E-250);
  sin_t199 : constant hexa_double
           := create( 5.75808191417845339E-01,-3.79094954589427341E-17,
                     -2.74337380468543095E-33, 1.11308415242167973E-49,
                     -7.14503871863004114E-66,-2.73674562669213643E-82,
                      1.52977853937329281E-98,-1.94207287043890982E-115,
                     -6.31625765603037847E-132,-1.01394069320675410E-148,
                     -5.22078250987619849E-165,-2.34392218482888857E-181,
                      2.92006296423609478E-199,-5.64987792362739579E-216,
                      2.93875094352659200E-232, 1.33415700642983215E-248);
  sin_t200 : constant hexa_double
           := create( 5.78313796411655590E-01,-2.62376915123728308E-17,
                      1.36790516807381666E-33,-3.14098089353359002E-50,
                     -2.83084859311821715E-67,-1.57083163570623726E-83,
                     -3.96076254798867961E-100, 6.06601324357856541E-117,
                      1.41054962244397238E-133, 3.97098289182975755E-150,
                      8.02608506856574060E-167, 9.35884045014229182E-184,
                      2.34278395485352435E-200, 3.40590257049968909E-217,
                     -6.21277696476807475E-234,-2.75326477750707024E-250);
  sin_t201 : constant hexa_double
           := create( 5.80813958095764527E-01, 1.85853385866134080E-17,
                      2.76738431145491813E-34, 1.96053496198369368E-50,
                      3.11628270874890089E-68, 1.59824195468454168E-84,
                      1.08971005354611251E-100, 2.72047115264662162E-117,
                      5.98475773416135987E-134, 1.41012444971842646E-151,
                      4.06672299576897621E-169, 1.13086402490448442E-185,
                     -6.24874074478274045E-202, 4.50891229655189539E-218,
                     -2.16072917128014737E-234, 1.20855550902755070E-250);
  sin_t202 : constant hexa_double
           := create( 5.83308652937698291E-01, 3.45166010790448584E-18,
                      1.80659774789463059E-34,-6.39539580385446461E-51,
                     -1.45041239803651036E-68,-6.08578264858702688E-85,
                     -5.01763861911483901E-101, 4.04090144980844087E-118,
                     -5.46720875055133233E-135,-6.62961570216666401E-152,
                     -2.51786188308270604E-168,-2.00391419173687612E-184,
                      5.09606314059402013E-201, 2.33996354977386001E-217,
                      1.03899540729907955E-233,-2.19969443129017380E-250);
  sin_t203 : constant hexa_double
           := create( 5.85797857456438864E-01,-3.74855019643112936E-18,
                      2.79654037755366136E-34,-7.18169360241572021E-51,
                      4.90046109353813952E-68,-3.21996048009553181E-84,
                     -1.46263724693933932E-100, 8.41524248467131943E-118,
                      2.05690077102101744E-134, 2.96674830211769468E-151,
                      7.77909531590221452E-168, 3.97108733890577347E-184,
                      2.45750472845555473E-200,-1.14092607518255000E-216,
                     -5.90036845149719765E-233,-5.98392724848565068E-250);
  sin_t204 : constant hexa_double
           := create( 5.88281548222645334E-01,-2.92921667250068459E-17,
                     -2.37449546036939336E-33,-1.15716311915124803E-50,
                      9.67744974151397136E-67, 1.35219864237296078E-83,
                     -4.29342968033117638E-100,-1.19040160603063274E-116,
                      5.06321974832511146E-133, 1.14992324954726239E-149,
                     -7.18748861413515563E-166, 1.56754771134807977E-182,
                      4.95317560134816584E-199, 2.95664947238822263E-216,
                      2.04659130354447875E-232, 2.53849366275244994E-249);
  sin_t205 : constant hexa_double
           := create( 5.90759701858874275E-01,-4.70135841706595421E-17,
                      2.48084176117683556E-33, 1.25989076736431978E-50,
                     -5.00053739901223323E-67, 8.23634571976930574E-84,
                     -1.02523310024957001E-100,-2.12752832591997812E-117,
                     -1.52686713553619326E-133,-4.12583957638960519E-150,
                     -1.31657910576700630E-166,-4.58444697846342781E-183,
                      2.31711094465790136E-199, 9.51056426841939073E-216,
                     -3.30094094172434870E-232, 2.55898271079234471E-248);
  sin_t206 : constant hexa_double
           := create( 5.93232295039799795E-01, 1.28923209441890533E-17,
                      5.30583647763595832E-34, 4.11416746993900523E-50,
                      1.01735017952806524E-66,-2.19320706723724907E-84,
                     -2.02361402030226122E-100, 2.15314176083255220E-118,
                     -1.88698404544883140E-134,-1.05896595666096323E-150,
                     -6.77040325892864424E-167, 3.64907559574825870E-183,
                     -1.25798104558866879E-199, 1.79913109861710919E-216,
                     -9.38143357288538656E-233, 1.30472127264710257E-249);
  sin_t207 : constant hexa_double
           := create( 5.95699304492433357E-01,-1.34386419365794672E-17,
                     -6.78776879077210602E-35, 5.08636508720029357E-51,
                      9.10243433159323455E-68,-3.45925835501244779E-84,
                     -1.62179721114190179E-100,-1.51245216723603694E-117,
                     -6.74928589792141061E-134, 1.18457299482797933E-150,
                      6.40282669221723951E-167, 3.48222945493913504E-183,
                     -1.91776809067869906E-199,-7.03067037372723953E-217,
                      3.67515493492019454E-233, 1.96350344739634580E-249);
  sin_t208 : constant hexa_double
           := create( 5.98160706996342273E-01, 3.88018857830006574E-17,
                     -1.20841658580946627E-33,-4.04566108434300615E-50,
                      6.16553756722891208E-68,-3.65306365180145374E-84,
                      1.06574964070496396E-100, 2.41407055143999798E-117,
                     -1.64545642819146246E-133, 5.10267399283038835E-150,
                      3.82473572283290618E-166,-2.90248726984704427E-182,
                     -7.73016083370224000E-199,-7.34755926362512063E-216,
                     -3.87907721175818905E-232,-1.68983779374538083E-248);
  sin_t209 : constant hexa_double
           := create( 6.00616479383868973E-01,-4.63981982294619322E-17,
                     -1.66734930037108008E-33, 5.19828243784914448E-50,
                      8.73012275500980064E-67,-4.78514390797267157E-83,
                     -1.94572541126167107E-99,-1.39123157516787629E-115,
                      7.91024722714882364E-132,-8.11629336274377917E-149,
                     -2.95924829229687592E-165, 1.08745701931194410E-181,
                      2.74427782368870193E-198, 1.16035954712432700E-214,
                     -4.30115528561321910E-231,-3.28149017414484867E-248);
  sin_t210 : constant hexa_double
           := create( 6.03066598540348164E-01, 3.73233576805596498E-17,
                      2.77719208669743046E-33,-1.61942296497424577E-49,
                     -7.37508411905744173E-66, 3.35682700091095669E-82,
                     -1.45830099724495385E-98, 1.26824086440384910E-115,
                      4.99951256227865667E-132,-2.02713136693143332E-148,
                     -1.35580146294001239E-164, 6.91819726052298700E-181,
                      1.52867582706499081E-197, 1.09033139682668804E-213,
                      8.15158325918208477E-230, 1.43135765550554055E-246);
  sin_t211 : constant hexa_double
           := create( 6.05511041404325545E-01,-3.12026724933056770E-17,
                      1.27612673386809158E-33,-4.08593685983796467E-50,
                      1.75900787110181626E-66,-4.99620587203248457E-83,
                      3.63225256318426350E-99,-1.40119484298225805E-115,
                     -2.67512302308789202E-132,-7.01984110758279896E-149,
                      1.52736962319395089E-165,-1.06033645305591918E-182,
                      8.01155186946693989E-199,-3.49843949314024843E-215,
                     -1.41775506695604460E-231, 6.98999915374426221E-248);
  sin_t212 : constant hexa_double
           := create( 6.07949784967773632E-01, 3.51608323620966603E-17,
                     -2.55462427767783942E-34,-1.40853135512206942E-50,
                     -4.97540725567108556E-67,-2.51649414854921912E-83,
                      3.42086219399250868E-100,-2.49340451067699471E-116,
                      9.25999076442434846E-133, 7.03459838721995294E-149,
                      2.88984230689536029E-165,-1.21823314806019856E-181,
                      8.63592942505039640E-198,-5.88572759307771824E-214,
                     -1.81269028776702901E-230, 7.71085420373945084E-247);
  sin_t213 : constant hexa_double
           := create( 6.10382806276309475E-01,-2.25632656482291687E-17,
                      1.31855750112267303E-33, 8.23166914200634603E-50,
                      8.02255577567658064E-67,-1.07114392644803108E-83,
                     -7.98904799405371899E-100,-4.22687515933408549E-116,
                      3.73549686686707242E-133, 1.32549079269011785E-149,
                     -2.29908523626480484E-166, 3.24585255210434104E-183,
                     -2.02541886781332474E-199,-2.82879722566200079E-216,
                      1.11783088298469928E-232, 5.44403849450208769E-250);
  sin_t214 : constant hexa_double
           := create( 6.12810082429409708E-01,-4.26934765684096849E-18,
                      2.58399658866503197E-34, 1.68844120056225371E-50,
                     -7.71518677044124058E-67,-1.25354218337244017E-84,
                     -1.01234080309617067E-100,-6.02526760735004833E-117,
                     -1.65393704993765151E-133,-1.83225292854455398E-150,
                     -8.23925200101678459E-169,-3.04467326808171045E-186,
                      1.20355081004300059E-202,-7.94573099648214093E-219,
                      2.36253785980209929E-235, 8.58759886313482217E-252);
  sin_t215 : constant hexa_double
           := create( 6.15231590580626819E-01, 2.62314177672669503E-17,
                     -1.40953666211067163E-33, 7.20586904913045583E-50,
                     -3.42839232565893414E-66,-1.03821645383225418E-82,
                      3.28136913536308384E-99, 1.14531125173619919E-115,
                     -8.47434287722181498E-132,-2.46455806778464990E-148,
                      4.43995433295145442E-165, 1.15029236701852971E-181,
                     -3.61759658623570001E-198,-1.47550528853783337E-214,
                      6.22365754831513433E-231,-2.38496470627644221E-248);
  sin_t216 : constant hexa_double
           := create( 6.17647307937803980E-01,-4.74785945109024519E-17,
                     -7.29865582631239963E-34,-3.01523275174391538E-50,
                      1.91686923688726259E-66,-1.16501753240120418E-82,
                      1.85558804656382216E-99, 1.13554717159740694E-115,
                     -3.37928880668709935E-132,-1.65999144642535691E-148,
                      3.32976252330429398E-165, 7.96024973408263475E-182,
                      6.67957213373397292E-198, 3.34610843863541013E-214,
                     -2.04610822540240927E-231,-8.90669522469183003E-248);
  sin_t217 : constant hexa_double
           := create( 6.20057211763289207E-01,-2.79834108376811183E-17,
                      1.16499510561389229E-33,-5.45390891171352071E-50,
                     -1.71369509801439094E-66,-5.34482672784073242E-83,
                     -3.58130779365839579E-99, 1.18474976780496365E-115,
                      9.92995143640736190E-132,-9.44099717810506985E-149,
                     -6.70646400507630833E-165,-2.82962723322007258E-181,
                     -2.66300608690474139E-197, 6.49194006697792372E-214,
                     -3.06035885699345897E-230, 1.25569029732941940E-246);
  sin_t218 : constant hexa_double
           := create( 6.22461279374149967E-01, 5.29407286065730019E-18,
                     -4.84864112159458267E-35, 1.26965276419801086E-52,
                      2.88343763031018788E-69, 1.25936300469886697E-85,
                      4.91359376727124150E-102, 1.12266202694961301E-118,
                      2.27500529022376354E-135, 2.75154530440685844E-152,
                     -1.09093262525075805E-168,-8.09175731208323828E-185,
                     -5.90874683535038345E-201,-1.27852460204263857E-217,
                      5.97401618440263207E-234, 2.69794446445083002E-250);
  sin_t219 : constant hexa_double
           := create( 6.24859488142386343E-01, 3.36718460372439003E-17,
                     -2.78460533910120962E-33, 5.61027181200121039E-50,
                      3.54966437573498937E-66,-1.70890972826580455E-82,
                      7.16907172991214882E-99,-2.66293016338513025E-116,
                      1.17183897055303202E-133, 7.01278473546388763E-150,
                      5.37649935305371939E-166, 2.33018684514751280E-182,
                     -4.98686175717693395E-200, 2.77916718597768495E-216,
                      4.59135717224939587E-233, 3.74683282428260893E-249);
  sin_t220 : constant hexa_double
           := create( 6.27251815495144083E-01, 3.07635851812532250E-17,
                      2.70689302734981384E-34,-1.11722403092864839E-50,
                      3.03575976560143181E-67, 1.80124091593841570E-84,
                     -9.81430462918888961E-101,-1.88555761473032233E-117,
                     -5.02326088136417922E-134,-3.36277990491334252E-150,
                      1.95575434326066202E-166,-1.26453408695639058E-182,
                      3.23602775673405937E-199, 7.42363180140624705E-216,
                     -3.98905420304424247E-232,-2.10604540538591795E-248);
  sin_t221 : constant hexa_double
           := create( 6.29638238914926984E-01, 4.11153340496268057E-17,
                     -1.91674735802307466E-33, 1.11184240281617301E-49,
                      7.98870570644857055E-66,-4.94790815584510336E-82,
                      4.56218011450812815E-100,-7.75576462608736961E-117,
                      3.21897298578048256E-133,-1.16567912379488696E-150,
                     -4.84399379253266681E-168, 2.15150235061384775E-184,
                     -8.62181180987591725E-201, 4.01134150354340365E-218,
                     -1.46836167321859895E-234, 1.32049321271965270E-251);
  sin_t222 : constant hexa_double
           := create( 6.32018735939809062E-01,-4.01649422964636124E-17,
                     -7.22086436417367226E-34, 3.78289204705443437E-50,
                     -7.78594540583411322E-67, 5.91519959245143264E-83,
                     -6.15471885300076844E-100, 2.35473358174957182E-116,
                      4.51608787318285587E-133, 1.28417305354546160E-149,
                     -4.62242771891437599E-166,-6.51399220938757946E-183,
                      2.50162617996243901E-199,-6.40270865537470484E-216,
                      2.86338481235849127E-232,-8.58208174310009302E-249);
  sin_t223 : constant hexa_double
           := create( 6.34393284163645488E-01, 1.04209019292800346E-17,
                      4.11745589292804917E-34,-1.44641529866307047E-51,
                      2.58028489626117526E-68,-9.85971293301378270E-85,
                      5.03159228129794532E-101, 1.01470068282795913E-118,
                     -8.82389093249609911E-135, 2.22476698845627031E-151,
                     -1.30436859762331998E-167,-1.30603371211848339E-184,
                      1.98209448570044553E-201, 5.57459434206272762E-218,
                      3.60085626006358883E-234,-2.35302897289501096E-250);
  sin_t224 : constant hexa_double
           := create( 6.36761861236284199E-01, 3.14190487119016107E-17,
                     -2.26937384151264490E-33,-1.60235842042973904E-49,
                      4.66517715059801333E-66,-1.91564222697059998E-82,
                      1.78998793247835687E-99,-7.87849978693768483E-116,
                     -1.38976759211387899E-132, 3.46584624135138571E-149,
                      1.89560371956994631E-165,-4.90633457325547137E-182,
                     -2.71406570839340358E-198,-7.91587972928284474E-215,
                     -3.93005758340948128E-231,-1.64885149383714361E-247);
  sin_t225 : constant hexa_double
           := create( 6.39124444863775731E-01, 1.24167963122710428E-17,
                     -6.20954196263566053E-34, 2.77620659995066033E-50,
                     -1.28017953588201167E-66, 8.49646667332401847E-83,
                      1.03436403840429052E-99,-9.00467922822119601E-116,
                      1.64793770216850775E-132,-3.48553416660003899E-149,
                      5.03633226576964290E-166, 1.96280347453003987E-182,
                      1.34056745820950059E-199,-8.23549117785260709E-216,
                      5.29689530404891688E-232, 2.13912466670448901E-248);
  sin_t226 : constant hexa_double
           := create( 6.41481012808583162E-01,-9.98834301159433096E-18,
                      4.19692303767301283E-34, 5.69805437992575975E-51,
                      1.44517967098287091E-67, 6.09337922469104617E-84,
                      4.14683958488517766E-100, 2.36498118600062820E-116,
                      7.70286514346456717E-134, 1.49176379530847837E-150,
                      6.51742191519776241E-167, 1.63585159691148765E-183,
                     -2.93840892550378526E-200, 6.82423193170671436E-217,
                      8.66141931968439386E-235,-1.04287426121560041E-251);
  sin_t227 : constant hexa_double
           := create( 6.43831542889791497E-01,-3.20847987950468858E-17,
                     -1.25953119070533050E-33,-4.02058852308415357E-50,
                     -1.38114204746378912E-66,-6.54648672541083828E-83,
                      2.31668885549647098E-99,-5.16836465067820877E-116,
                      2.97609233118206408E-132,-1.00355558604724478E-148,
                      6.81422011306777005E-165, 2.50562391183611094E-181,
                     -1.07815255243138076E-197, 5.94516363345615676E-214,
                     -3.20042196071104486E-230,-2.55098114613184015E-247);
  sin_t228 : constant hexa_double
           := create( 6.46176012983316395E-01,-2.97561373822808148E-17,
                     -1.02753700775182591E-33, 8.08524786658930136E-51,
                      1.91397713644455189E-67, 1.53959405645638030E-83,
                      6.66005425961994199E-100, 4.24357047037356515E-116,
                      2.31820241042439488E-132,-1.12275248116152832E-148,
                      7.01863057459862310E-165,-1.52152221749855488E-181,
                     -7.87087358681142173E-198, 1.44328660527615021E-214,
                     -4.40025058815967203E-231, 2.17924833004832024E-248);
  sin_t229 : constant hexa_double
           := create( 6.48514401022112441E-01, 3.98702703133868310E-18,
                      1.94083885095407877E-34,-5.17984206361931902E-51,
                      3.34308197241945212E-68, 2.66728122249075353E-85,
                      1.43224015135665033E-102,-3.57452016333645263E-119,
                     -2.35821519317061437E-135,-5.66405711182186897E-152,
                     -1.71136569085233280E-168, 8.06744464501801083E-185,
                     -2.28399373678142038E-201, 5.73251996213833335E-218,
                      4.18745157557394487E-234, 1.15207760296334242E-250);
  sin_t230 : constant hexa_double
           := create( 6.50846684996380875E-01, 3.97146707105002572E-17,
                      2.91785467870029633E-34, 3.81406355082932784E-51,
                     -2.16931148649947718E-67,-4.40024493760145796E-84,
                     -3.59742102616582646E-100,-1.88148968553399107E-118,
                     -5.17257890219828369E-135, 5.15779760501300677E-152,
                     -2.59281955076257198E-168,-1.24484916258044572E-184,
                     -1.11857482113360608E-201,-7.35655112942383647E-218,
                      1.41553326167431683E-235,-3.39541380113093200E-253);
  sin_t231 : constant hexa_double
           := create( 6.53172842953776756E-01, 8.56956420600262380E-18,
                     -6.91653223050706326E-34, 2.38737512241853949E-50,
                     -2.09029827983373456E-66,-8.92356003171879901E-84,
                     -6.13388293101643140E-100,-2.94372987468226103E-117,
                     -1.39918073684974614E-133, 5.59472941289878005E-150,
                      9.09589799974272483E-167, 3.11002312111660578E-183,
                     -3.53959136320859585E-201,-2.15386121239116674E-217,
                      3.92121189270592379E-235,-2.88559211675776817E-251);
  sin_t232 : constant hexa_double
           := create( 6.55492852999615350E-01, 3.56387344263850047E-17,
                      1.26953657908898113E-33, 4.39849528654120501E-50,
                     -1.51248625610693883E-66,-1.03435673428736812E-82,
                     -4.91149054184080853E-99,-1.61142807318108414E-115,
                     -8.72727606064163648E-132, 5.33791027472521186E-148,
                     -2.57947336719998572E-164, 4.16525789935729219E-181,
                     -9.66900603016910232E-198, 5.00597203147465531E-214,
                      7.08677014032321803E-231,-7.66370596308727120E-248);
  sin_t233 : constant hexa_double
           := create( 6.57806693297078637E-01, 1.95809430584685454E-17,
                     -1.19442722566271922E-33, 2.85564026164368583E-50,
                     -1.12528639300865706E-66,-2.78426371277035596E-83,
                      1.14322103229636655E-99,-4.26329524978391191E-117,
                     -2.70346200296518347E-133,-1.66396512610947839E-150,
                     -7.57314078890554937E-167,-3.88729343853679529E-183,
                      1.86293631686781420E-199,-4.96064033758181166E-216,
                      2.02623927336146636E-232, 1.45602696919739474E-248);
  sin_t234 : constant hexa_double
           := create( 6.60114342067420479E-01,-1.39600543868236375E-19,
                      6.15157779314940466E-36, 5.35104988756226604E-52,
                     -3.63482042656562813E-68,-1.70195469543568536E-86,
                     -7.78554030198436450E-103, 1.97629154088938690E-119,
                      8.09044612470885833E-136,-5.64449893023379809E-152,
                      3.87234600400594708E-168,-1.92860757321932917E-184,
                     -6.80713533012030180E-201,-6.62223305158351198E-217,
                     -1.38456080513903456E-234,-1.06048013230008929E-250);
  sin_t235 : constant hexa_double
           := create( 6.62415777590171784E-01,-2.26155088857645914E-17,
                      5.01770503181268624E-34, 2.91625323995307621E-50,
                      2.19113648801362274E-66, 7.93016547020295871E-84,
                     -5.22054014891269000E-102, 3.64196782119481451E-118,
                     -1.72564710523210057E-134, 1.09137718356872283E-150,
                      5.10835127537157227E-167, 1.24448188506172442E-183,
                     -5.21905312352117751E-200,-2.26611846084353646E-216,
                      2.47577543401879296E-233, 5.19067932436840150E-250);
  sin_t236 : constant hexa_double
           := create( 6.64710978203344904E-01,-3.62277935980343671E-17,
                     -9.06079347655404268E-34, 3.09170363423802134E-50,
                      1.39074854554920572E-66,-7.72423934836349767E-83,
                     -3.03564997990684066E-99, 4.05243227784261206E-116,
                      1.15276494525028845E-132,-2.18805320685638055E-149,
                     -1.24197793152574411E-165,-2.55838748772220141E-182,
                     -1.53551897639710391E-198,-1.81974412249969238E-215,
                      6.78354844893137373E-232, 2.36826348723298517E-248);
  sin_t237 : constant hexa_double
           := create( 6.66999922303637471E-01, 3.52843649974281657E-17,
                     -1.03820572324582381E-33, 7.38127565501676261E-50,
                      4.20051962214655963E-66,-2.02776115737064969E-82,
                     -6.34674974309307474E-99,-2.63554828904906076E-115,
                     -1.17517579765463958E-131, 4.99802659107210352E-148,
                      1.43856211586707340E-164, 7.14322963154068898E-181,
                      3.00564256503707006E-197, 2.93359647003726239E-213,
                      5.94812134116286499E-230,-2.59765546567520535E-246);
  sin_t238 : constant hexa_double
           := create( 6.69282588346636120E-01,-5.45926524174479126E-17,
                     -2.51810147096951515E-33,-1.68678759994371737E-49,
                      4.50952366574911060E-66,-2.07788424762868051E-82,
                     -7.50899394130098507E-99, 5.31506492308346382E-115,
                     -2.16200856297251771E-131,-3.06525139807096706E-148,
                      7.01825468814939485E-165,-3.07584385069424799E-181,
                     -5.80433867992758150E-200,-1.85210609493236498E-216,
                      5.81845383852457833E-233, 3.21582906430737529E-249);
  sin_t239 : constant hexa_double
           := create( 6.71558954847018441E-01,-4.04890377492966925E-17,
                      3.19958356253556814E-34,-1.40444146556709596E-50,
                     -1.03266886487120775E-66,-4.74892468697725435E-83,
                      9.08704136447958725E-100,-9.13491206186852835E-117,
                     -2.46674377979490077E-133,-4.34248734479058648E-150,
                     -1.26403538150906540E-166,-5.14714042061622316E-183,
                      7.24295659315817518E-200, 3.81772309423309030E-216,
                     -2.79443922017289123E-232,-1.51861379848509061E-249);
  sin_t240 : constant hexa_double
           := create( 6.73829000378756038E-01, 2.30919012361610865E-17,
                      5.74280371928813190E-34, 1.12406683546259775E-50,
                     -1.62809842465025644E-67,-4.46988689971823802E-85,
                     -1.59180582284883064E-101,-2.32631271283867128E-118,
                     -4.72819680801585891E-135, 3.04781765808143152E-151,
                     -1.26062976905488975E-167, 1.29609878046372015E-184,
                     -3.74189547929884031E-201, 1.70064242396387304E-217,
                     -3.37613581781842334E-234,-1.35935388426893021E-250);
  sin_t241 : constant hexa_double
           := create( 6.76092703575315923E-01, 3.72569022480494661E-17,
                      1.70594178957643746E-33, 9.73263477953006713E-50,
                     -9.15621915906168915E-66, 4.42028658126193742E-82,
                      2.73525011751112449E-98,-1.41103290490708240E-115,
                     -1.10427970212477929E-131,-4.47704019566089508E-148,
                     -1.63903795634897049E-164, 9.44715908976911741E-181,
                      1.94161640865246545E-197,-1.40383026700129553E-213,
                     -3.18795026708457500E-230,-1.42001151173996012E-246);
  sin_t242 : constant hexa_double
           := create( 6.78350043129861469E-01, 1.83020930418631220E-17,
                      9.52416757468130715E-34, 5.03281011161335034E-50,
                      1.77584393257119488E-66, 4.83734937530211747E-83,
                      2.74414806212966615E-99, 9.52505689910944107E-116,
                     -8.65547359163061770E-133, 2.09448765234368401E-149,
                     -9.21652871268916953E-166, 9.73043108522812676E-183,
                     -7.80804545534066006E-199,-3.69034398768976393E-215,
                      8.03408358823558399E-233,-2.00522438927420848E-249);
  sin_t243 : constant hexa_double
           := create( 6.80600997795453022E-01, 2.84732933545220469E-17,
                      4.13318059772709032E-34, 4.25790305107485759E-50,
                      1.98049760789605078E-66, 5.68072312123240008E-83,
                      3.55211326950322693E-99, 8.65305755659055024E-117,
                     -1.89848646935401136E-133,-1.78330373167745855E-149,
                      9.55479189867690614E-166, 2.67138491073706205E-183,
                     -9.88208367202418717E-200, 4.55033312535442593E-216,
                      1.27719420219267759E-232,-5.31881101325500711E-249);
  sin_t244 : constant hexa_double
           := create( 6.82845546385248081E-01,-1.29580580615245309E-17,
                      1.82923869593306981E-34, 3.45362091160444873E-51,
                      2.76743539748949421E-67, 8.58649007405974912E-84,
                      8.84975004002922769E-100, 2.72778103605443430E-116,
                     -1.09773631537377056E-132,-2.24069229482092143E-149,
                     -1.23565114329091458E-166, 7.15270470799281699E-183,
                     -1.89641527575154958E-199, 6.59596788010415503E-216,
                     -5.33820073230383788E-232,-1.18491025447988302E-248);
  sin_t245 : constant hexa_double
           := create( 6.85083667772700355E-01, 2.59481351946451372E-17,
                     -8.50307431295007020E-34,-6.95720861410099303E-50,
                      1.90404618335118095E-66, 6.47582439850383951E-83,
                     -1.41006843714793515E-100, 4.84222183266288088E-117,
                      3.08273198988226712E-133, 3.17544069399776996E-150,
                      1.24954347912374718E-167, 8.92786044126312479E-184,
                      4.28271282518029968E-200,-8.18981263072996779E-217,
                     -4.26269308128555963E-233,-4.25088951278955291E-250);
  sin_t246 : constant hexa_double
           := create( 6.87315340891759163E-01,-5.51561587149171682E-17,
                      1.18964898542668288E-33,-7.85058962182206623E-51,
                      8.49101994996188345E-68, 5.16466772729114140E-84,
                      4.10144252328766083E-100, 1.66832767261761327E-117,
                     -9.98803751626424942E-134,-9.44135292865368805E-150,
                     -2.07535656364435267E-166,-1.16016926499548355E-182,
                     -1.86035862842988312E-199, 1.10979228150939329E-215,
                      5.61311093088684722E-232, 3.04379805535081934E-248);
  sin_t247 : constant hexa_double
           := create( 6.89540544737066941E-01,-1.58893232948067899E-17,
                      9.12423562402057118E-34, 3.83154541522676376E-50,
                      3.64527748294119434E-68,-8.75561504452244138E-86,
                     -2.45530731811725988E-102, 1.15935254851880374E-119,
                      3.26161266188026757E-136,-4.85192946128615914E-153,
                     -1.99222522393300734E-169,-1.44639425099538035E-185,
                     -5.10704654755783026E-203,-1.93553406142995591E-219,
                     -7.35610071774312650E-236, 1.02596777239645237E-252);
  sin_t248 : constant hexa_double
           := create( 6.91759258364157748E-01, 2.74060784724106682E-17,
                      1.32865089432020923E-33, 1.06518691295800791E-51,
                      2.44528726725697874E-68,-7.66214977588925940E-85,
                      1.62231696330129848E-101,-1.06915549012911892E-117,
                      5.46676885757363241E-134,-2.23201259234482848E-150,
                      1.15475656476629183E-166,-3.87362633729892944E-183,
                     -1.27873512062866206E-199, 3.36832001700685049E-216,
                     -2.28276758996876987E-232,-2.56044848290165432E-249);
  sin_t249 : constant hexa_double
           := create( 6.93971460889654002E-01, 7.43450769562801370E-18,
                      7.50615283881974596E-34,-1.59280002406865830E-50,
                     -7.97272367397494873E-67, 6.18303563207484492E-83,
                      1.72425841139322194E-99, 8.32126128004373864E-116,
                     -4.44914588301464025E-132, 4.83109064738686212E-149,
                     -1.14073846741030601E-165,-7.00885367641030158E-183,
                      2.34719432848018474E-199, 1.95020539859632000E-215,
                      2.04202660777772433E-232, 1.11885094163330086E-248);
  sin_t250 : constant hexa_double
           := create( 6.96177131491462986E-01,-4.12240812135828892E-17,
                     -3.18387167620832964E-35, 1.38297067897247816E-51,
                     -9.84905733325786196E-68, 7.64604544769398702E-84,
                      1.59166828507059935E-100, 6.74612815742894458E-117,
                     -1.54095491039563525E-133, 3.38542236962482624E-150,
                      2.41947544237575817E-166,-4.16376219429237476E-183,
                      9.80293099951662039E-200,-4.24916432114561620E-216,
                      1.93034319162215568E-232, 1.70887844588114240E-248);
  sin_t251 : constant hexa_double
           := create( 6.98376249408972805E-01, 4.89882824356677676E-17,
                      1.91340104132441523E-33, 2.61611532437939887E-50,
                      1.03327200245448079E-66, 5.66297561556869681E-83,
                      1.89789287942147789E-99,-1.54016547167223941E-116,
                     -6.43627389262702796E-133,-9.77034185375298643E-150,
                     -5.08755716887334750E-166, 1.82476494797462232E-182,
                     -6.27960947234781975E-199, 2.41921642558069977E-215,
                     -2.34769853821485768E-231, 1.39237362849766558E-247);
  sin_t252 : constant hexa_double
           := create( 7.00568793943248336E-01, 3.10279601929929218E-17,
                      9.56382505091799968E-34, 4.58969161381070479E-51,
                     -6.76731624709943623E-68, 2.24668316240760074E-84,
                     -2.51155109372052608E-101, 1.51192186123573206E-117,
                      3.76163070606042160E-134, 2.40396129916638468E-150,
                      1.11353776337004466E-166,-1.19260988252126189E-184,
                     -1.27718635629048365E-200, 1.44559804693519020E-217,
                      5.96819036776717291E-234,-6.90012179346257307E-251);
  sin_t253 : constant hexa_double
           := create( 7.02754744457225300E-01, 2.52782943836298217E-18,
                     -8.69855612106749531E-35, 5.00107260958748422E-51,
                     -2.62731902530561481E-67,-4.33503773631568896E-84,
                      2.48068789806382173E-100,-6.25512428574325721E-117,
                     -3.40370257605376140E-133, 1.16680624513143211E-149,
                      7.72546975307080365E-166, 3.43313562511914630E-182,
                      2.97893735939176520E-198,-4.96980723405260063E-215,
                     -3.71290525691402354E-231,-8.96800006116276506E-248);
  sin_t254 : constant hexa_double
           := create( 7.04934080375904881E-01, 2.76087255857485017E-17,
                      2.98165994716291371E-34, 1.15330441851112058E-50,
                      7.33114367656022885E-67, 5.71629261673559666E-83,
                      4.65380830452457425E-100,-3.57402117616356843E-116,
                     -1.75927983514735744E-132,-6.73348470687291816E-149,
                      4.28372213250677723E-165,-9.70688748841061003E-183,
                     -4.17267104749908704E-199,-1.92827006554526384E-215,
                      7.25866527831633598E-232, 4.63555546184602778E-248);
  sin_t255 : constant hexa_double
           := create( 7.07106781186547573E-01,-4.83364665672645673E-17,
                      2.06933765434970678E-33, 2.46777349573417546E-50,
                      2.04470214305994790E-67, 1.55277156441246667E-84,
                     -1.00055013355304061E-100, 1.53225205737542922E-117,
                     -7.36493242809339304E-134, 7.52458631289309432E-151,
                      4.64027643021166914E-167, 6.52165463025460234E-185,
                     -5.66006455585947973E-201,-2.29144733459981078E-217,
                      1.71963688291316437E-233, 1.00540218407228250E-249);
  cos_t0   : constant hexa_double
           := create( 9.99995293809576191E-01,-1.96680642853221887E-17,
                     -6.30539550958834812E-34, 5.32661108557267312E-52,
                      1.91390915786795595E-68,-1.77893176531166562E-84,
                     -5.42005211648319282E-101, 1.34126812728719205E-117,
                     -5.17151369914534457E-134,-4.14830617125247114E-151,
                     -8.28336613339991140E-168, 3.24607332805037658E-185,
                      6.47853102314638560E-202,-1.87725246304219431E-218,
                     -5.28901092657050148E-235,-1.99752430445192929E-251);
  cos_t1   : constant hexa_double
           := create( 9.99981175282601109E-01, 3.35681035228955846E-17,
                     -1.47401325593680629E-35, 9.86030975947555961E-52,
                      5.12832731239829224E-68, 2.11240472258526906E-84,
                      1.62258206144986809E-100, 1.10147920527880245E-117,
                     -9.17548379093590305E-135,-4.94992942352772894E-151,
                     -1.75458451849830523E-167,-1.49795558118937744E-183,
                     -1.70411438402930435E-200,-8.36164191816436144E-217,
                     -4.82810349549242024E-233, 1.91364066930939905E-249);
  cos_t2   : constant hexa_double
           := create( 9.99957644551963898E-01,-3.15278368666472871E-17,
                      2.63632511866384370E-33, 1.00075048154884004E-49,
                     -2.45224545327877928E-66, 1.71651249137784331E-82,
                     -2.46027292142140532E-99, 1.74126858063330681E-115,
                      6.72125906138568734E-132, 4.83671737349947350E-148,
                      2.97606958945869810E-164, 1.45621676957057713E-180,
                     -1.05983062453694283E-196,-4.20056388484847113E-215,
                      2.30624390550045097E-231, 3.69648252427352462E-248);
  cos_t3   : constant hexa_double
           := create( 9.99924701839144503E-01, 3.79310825126680122E-17,
                     -8.50999186605014844E-35,-4.99569732232951532E-51,
                      2.74762680122087446E-67,-3.64771596864154011E-84,
                     -1.61142890761787735E-100,-3.11125047596179137E-117,
                     -2.17939675426910496E-134, 3.88927564037528256E-151,
                      2.46286148572079319E-167, 1.08153429976260011E-183,
                      1.00388426290444077E-199,-4.06732618956511630E-216,
                     -4.03263126435532883E-233, 1.49772293552477023E-249);
  cos_t4   : constant hexa_double
           := create( 9.99882347454212561E-01,-3.54778148724085383E-17,
                      1.71020010353039741E-33,-1.07253885190265420E-49,
                     -1.77152475524247922E-66,-1.21776746997724741E-82,
                      6.74468501957268618E-99,-3.37677940468724558E-115,
                     -2.18097997364167259E-131, 8.24610274515842458E-148,
                      5.88739982869610514E-164,-7.82345124827127963E-181,
                      4.54632214067706257E-197,-2.62252566646921592E-213,
                      1.10535334765197806E-229,-5.64342124641634604E-246);
  cos_t5   : constant hexa_double
           := create( 9.99830581795823403E-01, 1.88251405175511193E-17,
                     -5.13835134576169366E-34,-3.83788279954037865E-50,
                     -1.86398261465470787E-66,-1.16941268279622312E-82,
                     -2.14322784657043002E-99,-5.99285423894471043E-117,
                      2.17083807997833605E-133, 3.25573013230959015E-150,
                      1.83499260395759544E-166,-1.18991748377694137E-182,
                      5.34496154025233962E-200,-4.65445196822746572E-216,
                     -6.78418897322249222E-233, 3.77082607443344923E-250);
  cos_t6   : constant hexa_double
           := create( 9.99769405351215279E-01, 4.26811770322890116E-17,
                      1.90623023597370993E-33,-6.02211532628811598E-50,
                     -2.42650316157993754E-66, 2.24728463834524652E-82,
                     -4.50986553604074784E-99, 3.08587221421861494E-115,
                     -1.04032669525889648E-131, 1.69039996258048186E-148,
                      1.16849994362544283E-164,-8.04449073169108848E-181,
                     -1.35757945334873126E-197, 5.35742938255367438E-214,
                     -3.50501918243039440E-230,-9.09035247860256948E-247);
  cos_t7   : constant hexa_double
           := create( 9.99698818696204250E-01,-2.98514864037997529E-17,
                     -1.90847873707337374E-33, 5.59802603440292015E-51,
                     -2.01704480376572711E-67, 8.44721223054990384E-85,
                      5.67606186799352514E-101, 2.19026107928370261E-117,
                     -2.09814287162236655E-134,-6.31459726807600370E-151,
                      3.24141635812804023E-167,-3.97467415789385009E-184,
                     -2.35067992144097988E-200, 1.01093801131592572E-216,
                     -3.65804212651036570E-233,-1.59477465106043007E-249);
  cos_t8   : constant hexa_double
           := create( 9.99618822495178638E-01,-4.11819655214247342E-17,
                      2.09153655936999163E-33, 8.14033909209037336E-50,
                     -2.70869324880270646E-66, 1.39240583354108177E-82,
                     -3.06055521334881155E-100,-1.04322463102580305E-116,
                      6.67629090171626243E-133,-3.80524931983616400E-150,
                      2.45543202177783628E-166,-1.17302276239845141E-182,
                     -1.29197486077666264E-199, 9.54012465810306658E-216,
                     -5.60146658038626955E-232,-2.23704147473698505E-248);
  cos_t9   : constant hexa_double
           := create( 9.99529417501093143E-01, 2.05179178237555913E-17,
                     -4.76738025857065202E-34,-2.94436041986567723E-50,
                     -1.59147008083688614E-66,-2.04615123609567971E-83,
                      1.10653355585645945E-99,-6.02444725763214112E-116,
                     -3.32761396345358009E-132,-1.27554634596556718E-148,
                     -3.29207455725449094E-165, 2.24285168931873892E-181,
                      2.46298939241172810E-198,-1.50717034943747735E-215,
                     -3.82253144271992759E-232, 1.03560951059248263E-248);
  cos_t10  : constant hexa_double
           := create( 9.99430604555461732E-01, 3.96444977522577981E-17,
                     -2.37572237167224280E-34,-1.28567590113617260E-51,
                     -1.03609800671890584E-68, 1.02101442113116168E-84,
                      6.69500473317417997E-102, 1.89392181562864510E-118,
                     -5.01553869441840485E-135,-2.84341396144865093E-151,
                      1.58736907735110495E-167, 4.82228499095278533E-184,
                     -1.00882731103118950E-200,-4.34808550432147031E-217,
                     -1.99385934171021297E-233,-9.07865792518660428E-250);
  cos_t11  : constant hexa_double
           := create( 9.99322384588349544E-01,-4.28585384408456820E-17,
                      3.32351016051465654E-34,-8.35542723770575433E-51,
                     -4.07583171927762145E-67,-2.51945007792082703E-83,
                      4.20362925049073802E-100, 1.17846080823709937E-116,
                     -5.72069469357701111E-133,-3.22235115146455495E-149,
                      1.72660606607677031E-168, 6.67821982168579613E-185,
                     -5.08820699075961227E-201, 4.69926129203037603E-218,
                      2.90298319772769942E-234, 2.67976449651364834E-250);
  cos_t12  : constant hexa_double
           := create( 9.99204758618363886E-01, 9.17963171103856931E-18,
                      5.54162081858685698E-34, 8.02670467176153108E-52,
                     -3.29221777194787692E-68,-1.75681319385651342E-84,
                      9.57922678619483470E-101,-6.00855034919348925E-118,
                     -2.79134312552953463E-134,-2.08263882335072581E-150,
                      1.06186228751515945E-166,-5.04656148874824208E-183,
                     -3.33191797562153663E-199,-2.21641093007569192E-215,
                      1.20021295459178399E-231,-5.63238965634097376E-248);
  cos_t13  : constant hexa_double
           := create( 9.99077727752645362E-01, 2.14190076535870320E-17,
                     -7.90482033185296178E-34,-5.31662961811127117E-50,
                      2.94307850181673490E-66, 6.16832063740849062E-83,
                      3.27169346199369429E-99,-6.77311908881136941E-116,
                      1.89206240654348872E-132,-1.08991492570261195E-148,
                      7.71316050712523075E-165,-3.69830218758551963E-181,
                     -1.31100406740998815E-197,-6.67679376667260551E-214,
                      2.17339030705092695E-230, 1.99438443258400031E-246);
  cos_t14  : constant hexa_double
           := create( 9.98941293186856871E-01,-2.06106419100586385E-17,
                     -1.25465254859134845E-33,-7.51758888061570636E-50,
                     -2.31695880524365778E-66, 3.95477556392195026E-83,
                      4.03337145690082665E-100,-1.62322395449940097E-117,
                     -9.33813448196307783E-134, 4.01590211919415983E-150,
                      2.54057914868147933E-166,-3.11950879734144512E-183,
                      1.66222629503468863E-199, 5.80616523344040955E-217,
                     -2.53317479227658943E-233, 9.17804870896722678E-250);
  cos_t15  : constant hexa_double
           := create( 9.98795456205172405E-01,-1.22916933370754648E-17,
                      2.44684467864912710E-34, 1.07238910852102681E-50,
                      3.86850910136902605E-67, 7.93561503494129318E-84,
                     -3.43091070055007960E-100,-1.15497612893909168E-116,
                     -6.37470658944054212E-133, 2.51989246216365484E-149,
                     -2.10134765878503158E-165, 2.00995597437648576E-182,
                     -7.24934767617957906E-199,-5.82434371655888684E-216,
                     -4.41754801112553015E-232,-3.23457963080877361E-248);
  cos_t16  : constant hexa_double
           := create( 9.98640218180265271E-01,-4.86902543129233022E-17,
                     -2.94708819679091466E-34,-1.30006507613469068E-50,
                      2.75300694627370753E-67, 4.42074826996169982E-84,
                      1.66204534475812494E-101,-8.86365685626486004E-118,
                     -6.90520927497377818E-134, 1.53181275863555743E-150,
                      9.75771977018882606E-168, 5.42210999686184807E-184,
                      3.43749768829712804E-201, 1.73287584386849532E-217,
                     -9.08464528893923300E-234,-9.15516156395700727E-251);
  cos_t17  : constant hexa_double
           := create( 9.98475580573294774E-01,-2.20029311827787949E-17,
                     -1.23715094549449923E-33,-2.49112251312320649E-50,
                     -9.53932577873467762E-67,-3.59464073777121486E-83,
                      1.96601640849066130E-99, 9.57793171322828412E-116,
                      4.08680040374502319E-132,-1.78042101207966820E-148,
                      1.11655789655141286E-164,-5.99089122995031210E-183,
                     -3.39467132150004410E-199, 2.09184766259943560E-215,
                      5.55223404735432910E-232,-9.18921435272686575E-249);
  cos_t18  : constant hexa_double
           := create( 9.98301544933892893E-01,-5.18694027027922775E-17,
                      1.04801954936334517E-33,-2.89956491431555115E-50,
                     -3.45152433771346240E-67, 2.54702953902471068E-83,
                      1.71976295722971083E-99,-2.99498300351969390E-116,
                      6.08685141469123317E-133, 2.33133315410664207E-149,
                      9.63742607441703795E-166, 5.80262598552343645E-182,
                      8.79649429698694367E-199, 7.46057408335602102E-215,
                     -3.99256242023300558E-231,-1.24786861692642886E-247);
  cos_t19  : constant hexa_double
           := create( 9.98118112900149179E-01, 2.79354875581138326E-17,
                      2.44233412558303451E-33,-6.76466991753344167E-50,
                     -1.17295727773754094E-66, 1.24698153437164865E-83,
                      1.74668518670530080E-100, 8.29136148131427661E-117,
                     -4.34121363964230594E-134, 1.53490844955120884E-150,
                     -6.45457812451361124E-168, 2.00063863222954744E-184,
                      6.66786065075803980E-201, 3.91110642924040340E-217,
                      2.80156510693787628E-233,-2.21978385666405264E-249);
  cos_t20  : constant hexa_double
           := create( 9.97925286198595996E-01, 1.71436597788863622E-17,
                      5.78858409028874604E-34,-9.26014326038945965E-51,
                     -2.38564730192505536E-67,-1.23823775422421644E-83,
                     -6.39107972759589716E-100, 2.15310180883531581E-116,
                     -9.96945481551656952E-133, 1.16705699536756652E-149,
                      7.20415788949952739E-166,-5.01636878616974317E-183,
                      2.99310246054801442E-200,-2.64725430462104849E-217,
                     -4.14580302319851794E-234,-1.96599929990263030E-250);
  cos_t21  : constant hexa_double
           := create( 9.97723066644191636E-01,-2.63944752748987206E-17,
                     -1.61762230876617832E-34,-9.99249428893622806E-51,
                      2.28197066750363497E-67,-3.33737051252090983E-84,
                     -6.55945492379988131E-101,-2.64496449991983451E-117,
                      9.11940400191338859E-135, 6.52887437615166772E-153,
                     -4.92115211197528976E-169,-1.20390265610221455E-185,
                     -4.64915905093911099E-202, 1.06265458389628778E-218,
                      4.70984709339273273E-235, 1.16204384791139565E-251);
  cos_t22  : constant hexa_double
           := create( 9.97511456140303454E-01, 5.60072059198069370E-18,
                     -5.94776735146856903E-35,-1.41668071627436270E-54,
                      6.20989982174911772E-71, 3.39472756627353839E-87,
                      3.52914218753507108E-104, 2.32243478412648976E-120,
                     -1.09428207943547845E-136,-8.76445668661384409E-154,
                     -2.30501056219882543E-170,-5.90244800220175288E-187,
                      2.37111160234102089E-203, 1.21004178314632474E-219,
                     -6.79397846058199565E-236,-6.76187261099314906E-253);
  cos_t23  : constant hexa_double
           := create( 9.97290456678690207E-01, 9.16476953711017346E-18,
                      6.78241343097392959E-34,-8.61913927955433572E-52,
                     -4.26913497573766520E-68, 3.98204022985038455E-84,
                      1.14911844320716265E-101,-6.53274052186337734E-119,
                     -1.29938545492823881E-135,-2.21124591468402698E-152,
                      1.58990814288339397E-168, 2.17818942971858288E-185,
                     -6.98238025728237899E-202,-8.77077361445214432E-219,
                     -4.42114602782949450E-235, 8.42830595511223347E-253);
  cos_t24  : constant hexa_double
           := create( 9.97060070339482962E-01, 1.67340935462419634E-17,
                     -1.31699514407800281E-33, 1.03110487679524771E-50,
                     -9.67800121860686581E-68,-4.12614329061330995E-84,
                      2.51709590242781601E-100, 7.78058965308424546E-117,
                      3.15446248627309390E-133,-1.24524460906445469E-149,
                      4.10785632697225912E-166, 3.29968695080129865E-183,
                     -3.70122793254719759E-200,-6.74567469927161505E-217,
                      3.72076643773849221E-233, 1.67195655264720536E-249);
  cos_t25  : constant hexa_double
           := create( 9.96820299291165668E-01, 4.70628207086156550E-17,
                      2.84120410764749371E-33,-8.00061556702636224E-50,
                     -2.39978097004205408E-67,-7.91228636384700789E-85,
                     -2.55336981288535038E-101,-1.07849752967779775E-117,
                     -4.84234163136115791E-134, 4.34724742181470708E-150,
                     -9.57107941983084733E-167,-6.06739696205547046E-183,
                      1.46165777335657824E-199,-1.98437402170714704E-216,
                      3.85584409318517438E-234, 3.20317442026014363E-251);
  cos_t26  : constant hexa_double
           := create( 9.96571145790554835E-01, 1.17071790883909861E-17,
                     -7.59344132630246627E-34, 2.84748484369260084E-50,
                     -8.22113003166783761E-67,-2.14933562267061605E-83,
                     -1.02979629006746281E-99,-8.36515691106041903E-116,
                     -5.20184240163708831E-132, 4.56363496965611347E-150,
                      1.00784850082432308E-166, 1.33859470890426182E-183,
                      5.67634988667326949E-200, 8.71229081608869670E-217,
                     -3.86020560951350331E-233,-1.52906882581510767E-249);
  cos_t27  : constant hexa_double
           := create( 9.96312612182778001E-01, 1.13364978916247349E-17,
                      3.40024586744143600E-34, 7.74190759215449010E-52,
                      5.78821081875662121E-68, 8.98103577480125886E-85,
                      5.57648189278119921E-101,-2.11813781613971451E-117,
                      3.25271877792154541E-134,-1.37105858117850431E-150,
                     -8.01461671920033157E-167,-3.74377542374688355E-183,
                     -1.53322301428975439E-199,-1.06189527189157806E-215,
                     -5.49021604219342672E-232,-4.28862882902679007E-249);
  cos_t28  : constant hexa_double
           := create( 9.96044700901251967E-01, 2.28700317076706948E-17,
                     -3.91848394050131483E-34,-3.70812604162463749E-50,
                      2.59243183926170746E-67, 1.50642008469898392E-83,
                     -3.19903903320151441E-101,-2.70902797785187790E-117,
                     -5.19812902744001102E-134, 3.74735009091919985E-150,
                      1.13871350684086984E-166, 2.99450833653003938E-183,
                      1.60985243956848530E-200,-1.35097638033538055E-216,
                     -4.81989204245379483E-233,-9.92769670681529912E-250);
  cos_t29  : constant hexa_double
           := create( 9.95767414467659817E-01,-2.31519083230943588E-17,
                     -1.63065129319445913E-34,-1.59254207838631923E-51,
                     -8.56758743545876085E-69,-4.26861198082222194E-86,
                     -3.40759466853772268E-102, 1.77187118118850337E-118,
                      3.14924663944676744E-135, 4.05520970064960518E-152,
                     -3.76544813767830573E-168,-1.03177640046209496E-184,
                      4.78515681989083415E-201, 1.08647308393877542E-217,
                      2.08228075590733498E-235, 1.15716688834221200E-251);
  cos_t30  : constant hexa_double
           := create( 9.95480755491926939E-01, 3.20846214122265538E-18,
                     -4.95012921460130232E-36,-2.78114288508785162E-52,
                      7.80587653851640341E-69,-9.82898958779051486E-86,
                      5.50719840551550884E-102,-2.44090326891330398E-118,
                     -3.99526275815900292E-136,-3.36095823246222809E-152,
                     -6.55770734451529622E-169, 5.06238015645471488E-185,
                     -1.09108215046608994E-201,-3.47229354188727648E-218,
                      2.12901776886498786E-234, 1.34834964839852730E-250);
  cos_t31  : constant hexa_double
           := create( 9.95184726672196929E-01,-4.24869136783044096E-17,
                      1.33155107725046145E-33, 6.79279874170518884E-50,
                      2.61716123052701635E-66, 2.54535704018462273E-82,
                     -1.40434345143490885E-98, 6.61348469925497652E-115,
                     -2.72283104660906815E-132,-1.07866607405043910E-148,
                      4.31495859396575130E-165,-1.21890214504594041E-181,
                     -6.85652585230642481E-198, 6.83586266905744667E-214,
                     -2.19585242541239148E-230,-2.03225822720800350E-246);
  cos_t32  : constant hexa_double
           := create( 9.94879330794805616E-01, 4.21308132849436624E-18,
                     -4.20625974882884518E-35, 2.51570645560876200E-51,
                     -4.59520978357192429E-68,-3.97944467335093376E-84,
                      3.71473526111383334E-101,-2.58749500208764656E-117,
                     -1.54403604713295920E-133, 8.68303204812637482E-150,
                      1.51181821980165723E-166, 1.01378773937407085E-183,
                     -9.06327588176414322E-201, 5.51910545678250987E-217,
                      2.72529164159840395E-233,-6.16017436812478448E-250);
  cos_t33  : constant hexa_double
           := create( 9.94564570734255415E-01, 3.67450696415280579E-17,
                     -3.06033041054710104E-33, 1.03978722804875260E-49,
                      2.43829312533316654E-66, 7.11965928997294609E-83,
                      4.52238414444860216E-99,-2.67430162239639854E-115,
                      3.26522075504620239E-132,-4.11125267584242398E-149,
                     -2.12922862652750688E-165,-5.43529495192824562E-182,
                      6.53951477906512345E-199, 1.76164611007379286E-215,
                      2.36637416493425229E-232, 1.63379406831600670E-248);
  cos_t34  : constant hexa_double
           := create( 9.94240449453187902E-01, 4.41294234724626735E-17,
                     -3.01072317082380655E-33, 7.42015829068618922E-50,
                     -1.38519263790160233E-66,-5.58257119565188988E-83,
                      8.75531365791685464E-100, 2.39559030120501934E-116,
                      1.01153169752465003E-132,-1.93905586545059893E-149,
                      7.52197793273137815E-166,-2.58759653858555470E-182,
                     -2.33399299170565861E-199, 7.85751330884500735E-216,
                      3.86963569451096247E-232,-1.09114119947702293E-248);
  cos_t35  : constant hexa_double
           := create( 9.93906970002356061E-01,-1.89648494711237457E-17,
                     -1.59808537779377516E-35,-8.53748071505970816E-52,
                      6.83422434140127349E-68,-1.99103719912616617E-84,
                      3.51780225012217231E-101,-1.23324071200568117E-117,
                     -7.01686065196319169E-134,-4.61117562490409361E-150,
                     -1.80201376066481505E-166,-8.54821402703368126E-183,
                      5.18471191260244414E-199, 2.45312673181864477E-215,
                      1.88394874200654620E-231, 5.81027430006374211E-249);
  cos_t36  : constant hexa_double
           := create( 9.93564135520595304E-01, 2.97523099277974285E-17,
                     -4.50667073311342330E-34,-3.35481916338050359E-50,
                      1.10333814987137020E-66, 9.53644935793553151E-84,
                     -1.12199329342380592E-101,-6.99255441037706881E-118,
                      2.62133222107300781E-134, 1.86409969165412567E-150,
                      9.88344839838754469E-167, 4.61704171167481784E-183,
                      3.98776713667927813E-199,-4.91666811245882986E-216,
                     -2.20327462879390244E-232, 7.96325418961179101E-249);
  cos_t37  : constant hexa_double
           := create( 9.93211949234794500E-01, 3.30969062612722618E-17,
                      1.55928119732495674E-33, 1.43739777332535918E-50,
                     -2.40789043417042093E-67,-6.98524848899963475E-84,
                     -1.17207320840425796E-100, 7.08785285194052238E-117,
                     -2.39182755640576869E-133,-1.82246667394987634E-149,
                     -1.07852256138620293E-165,-4.83437385398111650E-182,
                      1.27204435579756789E-198,-4.78803215507704058E-215,
                     -3.37260908850847769E-231, 6.15919192890742353E-248);
  cos_t38  : constant hexa_double
           := create( 9.92850414459865105E-01,-1.40945177336933023E-17,
                     -1.19545581316169161E-33, 1.87618737428679832E-50,
                     -6.30757528536727055E-67,-1.00831351979554370E-83,
                     -4.79575999677828619E-100, 5.18232243863142938E-117,
                      3.50752185014649550E-133,-1.33664192979185456E-149,
                      8.28220282272654619E-166, 5.82067964493977942E-182,
                     -6.17645759297687306E-199,-4.27278310945361037E-215,
                      1.16480637660755644E-231, 9.65014087744199460E-249);
  cos_t39  : constant hexa_double
           := create( 9.92479534598709967E-01, 3.10930550954289061E-17,
                     -1.83795947578180191E-33,-3.98857585593813140E-51,
                     -9.15534345276831994E-68,-7.98152145507745253E-84,
                     -2.47215520637108643E-100, 3.98015918362302325E-119,
                      6.70967272479603328E-137, 4.32737910507451150E-154,
                      1.75941513397184884E-170,-1.30935105369886020E-186,
                      9.70288771406377997E-203, 3.37876819176210889E-219,
                     -1.86798501265953860E-235,-1.72756344580215381E-251);
  cos_t40  : constant hexa_double
           := create( 9.92099313142191797E-01,-3.94319261495887785E-17,
                     -6.27580629110472295E-34,-1.29609295592123895E-50,
                     -7.55907361742899420E-67,-1.07907269674512670E-83,
                     -4.09468956873849556E-100, 1.70260990022612595E-116,
                     -1.21989964357704246E-132,-4.84647214195116886E-149,
                      9.09065745903592301E-166, 5.96611833346804062E-182,
                      2.36293070258704900E-198, 1.79643304038907696E-214,
                     -9.10182463866469774E-231,-2.85437561901428479E-247);
  cos_t41  : constant hexa_double
           := create( 9.91709753669099525E-01,-2.33728913118836612E-18,
                      2.70732988249685913E-35,-1.25694594418028720E-51,
                     -1.55863808007098786E-68, 3.20025026010067097E-85,
                     -1.96903486450261532E-101, 7.60434400565379034E-118,
                      4.33476215475731049E-134,-1.86764188121593637E-150,
                      1.19228523619006837E-166,-1.76931395829508962E-183,
                     -8.01519374523162960E-200,-5.74934584347296955E-217,
                      1.66153231372533887E-233, 6.96933344080339051E-250);
  cos_t42  : constant hexa_double
           := create( 9.91310859846115444E-01,-2.51921115833721052E-17,
                     -1.28524715673808870E-33, 5.23852125843104833E-50,
                      1.39395955888094931E-66, 3.10603359677739087E-83,
                     -2.26307982992181427E-100,-8.74838925732097158E-117,
                     -5.02364453284752043E-133,-2.92560417227684625E-150,
                     -3.24315485937790422E-167, 9.94860777015531857E-184,
                      6.29177431124465457E-200,-5.37828775435049218E-216,
                     -3.07912656568660270E-232,-1.21880597211505898E-248);
  cos_t43  : constant hexa_double
           := create( 9.90902635427780010E-01, 1.53945650945667038E-17,
                     -1.07999841331845674E-33, 2.74511159601335946E-51,
                      2.74295307140821957E-67,-1.37202956639149234E-83,
                      5.34351238546212769E-100, 2.19900704682449814E-116,
                      7.56571233421648376E-133,-3.93279539731767448E-149,
                     -2.53449296657042245E-165, 7.09776988046351820E-182,
                     -4.13714258434981797E-198, 1.24338901349295177E-214,
                      9.31284330539153171E-232,-4.84866957941487544E-248);
  cos_t44  : constant hexa_double
           := create( 9.90485084256457093E-01,-5.54114375537808667E-17,
                     -1.46140172107535854E-33,-3.83393743973876203E-50,
                     -1.54304701790074939E-66, 1.01701108038048691E-83,
                      7.74444204472651311E-100, 5.22300753537535776E-117,
                     -2.64840388213807763E-133,-2.10944641209960942E-150,
                     -2.61638390154894759E-167, 8.14193583735098162E-185,
                     -1.92047804037686442E-201,-6.91683695082703081E-218,
                      1.98935948105954477E-234, 7.75735778751962218E-251);
  cos_t45  : constant hexa_double
           := create( 9.90058210262297123E-01,-1.70554859062339627E-17,
                      1.34549396857587774E-33, 7.31175891373000357E-50,
                      9.18936572556167788E-67,-6.27355679215791661E-83,
                      3.55294653952654093E-99, 1.25743152900242351E-115,
                      2.11012310763242426E-132, 2.76340122905856368E-149,
                      1.18032178535761378E-165, 1.94081247856829171E-182,
                     -3.77133167359271510E-199,-1.05687503425572514E-215,
                     -3.83021640344504898E-232, 1.60194051399868355E-248);
  cos_t46  : constant hexa_double
           := create( 9.89622017463200887E-01,-5.23982179681325303E-17,
                      1.34631892114562195E-33, 5.80216405548948719E-50,
                     -1.99415305390991408E-67, 1.02917596544388029E-83,
                     -9.05314181948351785E-100,-1.75056666479271795E-116,
                     -3.23541745378295397E-133, 8.76044957304497861E-150,
                      1.47781250918740530E-166,-4.82814175636431866E-183,
                      3.02908076453844809E-199,-1.34904146861997636E-215,
                     -9.23534099144056813E-232, 5.95587648247260043E-248);
  cos_t47  : constant hexa_double
           := create( 9.89176509964781014E-01,-4.09873099370471114E-17,
                     -4.48575605520484373E-34,-3.94145045028711250E-50,
                     -1.10813384628218254E-66, 5.86311831108411458E-83,
                     -7.73345487155608671E-100, 3.45953928855912604E-116,
                      2.00618822908665046E-132,-4.58808669684553545E-149,
                     -3.49016667173239383E-165, 8.29418099049533696E-183,
                     -2.59059941505325746E-199,-6.64759267996877648E-216,
                     -1.93172239915973002E-232,-1.33216813691611805E-248);
  cos_t48  : constant hexa_double
           := create( 9.88721691960323779E-01,-1.09762272066561250E-17,
                      3.23113425776537643E-34, 9.63679465835750406E-51,
                     -4.13408597463624609E-67, 2.95103410580208815E-83,
                      1.37479860004498271E-99,-8.30843157948635366E-116,
                     -8.21391077924497267E-133, 7.18321364843303423E-149,
                      8.66830270060766497E-167,-2.91201065719848623E-183,
                      1.18516844423262993E-199, 1.05205849687946916E-215,
                     -5.50747619960959833E-232,-1.73381426783619893E-248);
  cos_t49  : constant hexa_double
           := create( 9.88257567730749464E-01, 2.70306077843726315E-17,
                      7.75148664886013771E-35, 2.10196449568649380E-51,
                     -4.86891372106515279E-68, 1.32264721680838175E-84,
                     -8.04049227617538703E-101, 9.56166660227564236E-118,
                      3.50691428437245225E-134, 4.22968214555258775E-151,
                     -4.66852549236979075E-168,-4.12306064405865909E-184,
                      6.91416669580339909E-201,-2.33513170409356051E-217,
                      6.87971456745918060E-234, 5.57290934542453377E-250);
  cos_t50  : constant hexa_double
           := create( 9.87784141644572178E-01,-2.36006933971590207E-17,
                     -1.23232837697078607E-33, 3.01309007168033386E-50,
                     -9.94701579676429690E-67, 2.68010215897179680E-83,
                     -3.10949141672238648E-100,-2.21818902684167404E-116,
                      3.90243619697202838E-133, 1.43668381898399719E-149,
                      7.15730080270794146E-167,-3.20178626598655619E-183,
                     -1.85606690269093053E-199,-1.01072030936764167E-215,
                      5.74311690121939249E-232,-2.57302296280426459E-248);
  cos_t51  : constant hexa_double
           := create( 9.87301418157858435E-01,-5.23322612557156525E-17,
                     -2.79376443331524725E-33, 1.20741605679584084E-49,
                      1.13657463527745169E-66,-2.22817119579308375E-83,
                     -1.08358952798673913E-99, 8.31823007992088613E-117,
                      2.29655099586311475E-133,-1.52036284012905254E-149,
                     -5.64308090389789940E-166,-2.06582813962703081E-182,
                     -3.73027026758514396E-199,-6.49868462435908893E-216,
                      1.79319774595271511E-232,-1.69949902642020130E-248);
  cos_t52  : constant hexa_double
           := create( 9.86809401814185527E-01,-5.02872143510610749E-17,
                     -2.26815262381444611E-33, 4.40036943201691332E-50,
                      4.54603713298411555E-66, 4.00096603785398856E-83,
                      3.37713551127682296E-99,-2.38844061870790620E-117,
                     -4.58292710088558885E-134,-4.83040041772673036E-150,
                      1.15034256660332601E-167,-8.04986733176231321E-184,
                     -2.50670053576745021E-200,-1.63601453180619754E-218,
                      4.21375567519091058E-236, 1.30807711671365418E-252);
  cos_t53  : constant hexa_double
           := create( 9.86308097244598669E-01,-2.15208771030133409E-17,
                      1.18665280541877157E-33,-7.85321991998138360E-50,
                     -4.06443126012895357E-66,-1.93515701218937409E-82,
                     -2.65618250804936956E-99, 1.69968596349126790E-115,
                     -5.29958546463176422E-132,-2.73455636393034460E-148,
                      3.86409435468983884E-165,-1.92186318315511266E-181,
                     -7.01099545836898424E-198,-3.04227159844132557E-214,
                     -1.35644053568055311E-230,-1.01770459639058172E-247);
  cos_t54  : constant hexa_double
           := create( 9.85797509167567476E-01,-5.14394529799530116E-17,
                      2.62764393099967253E-33, 7.54235527832863473E-50,
                     -1.47430810478738511E-67,-4.01579087923588949E-84,
                     -1.26088839343716867E-100,-8.07383059760856692E-117,
                     -6.58011764661241465E-133,-2.58498507174567057E-150,
                      4.55482523492038093E-167, 2.57433720284512676E-183,
                     -2.01595677177333590E-199,-4.58318269096670277E-216,
                     -2.04139307061549326E-233, 1.76354018614189339E-249);
  cos_t55  : constant hexa_double
           := create( 9.85277642388941222E-01, 2.31556370279002067E-17,
                     -7.52759715457648330E-34, 1.05822316604560938E-50,
                     -2.20931362370312839E-67, 1.51527219652343606E-83,
                      1.82657895910291741E-100, 3.29974259983817193E-117,
                     -3.01610157690759348E-133,-1.24382856316515810E-149,
                     -8.38906811145533701E-166,-2.91336506888824509E-182,
                      6.52810753006536741E-199, 3.56086223392912184E-216,
                      6.77209596958007212E-233,-3.70930474849880809E-249);
  cos_t56  : constant hexa_double
           := create( 9.84748501801904208E-01, 1.05481440618299566E-17,
                      2.87861452662673056E-34,-3.67822100814661117E-51,
                     -9.59929240016175224E-68, 4.86899611148854190E-84,
                      1.60498396044187144E-100, 1.12118079979530586E-116,
                     -5.57660761214787391E-133,-1.30122946669505740E-149,
                     -7.89884211472139504E-166, 4.22331662543358763E-182,
                     -7.42795596327072531E-199, 2.14268370754369094E-215,
                     -1.23394710488027591E-232,-3.57462720116371061E-249);
  cos_t57  : constant hexa_double
           := create( 9.84210092386929025E-01, 4.79839226270506910E-17,
                      2.25974196450705877E-34, 1.75738758148634002E-50,
                     -8.34269785789292007E-67,-5.82693326643445060E-83,
                      1.23922943076403646E-99,-1.36854293683982094E-116,
                     -7.00811618994160186E-133,-9.57606591749491801E-150,
                     -8.24652552733272763E-167,-5.17077134597516619E-183,
                      3.96734503343422576E-200, 1.32871829545152430E-216,
                      1.66254099042320755E-233, 1.39063359875989655E-250);
  cos_t58  : constant hexa_double
           := create( 9.83662419211730255E-01, 1.98649482016352550E-17,
                     -1.07430462812110326E-35, 1.79756627965581001E-52,
                      2.61289340783778145E-69, 1.84203296318514549E-86,
                      9.54919422326801129E-103,-4.17582728358588429E-119,
                      1.72376106138372613E-135, 1.35718443311621430E-151,
                     -7.56112829688301355E-168, 3.94197928711438411E-184,
                     -2.92525325384651997E-201,-1.75737791789809027E-217,
                      5.96536121849895488E-234, 1.66361668505406250E-251);
  cos_t59  : constant hexa_double
           := create( 9.83105487431216285E-01, 4.21700075228886281E-17,
                      8.23962656564409036E-34,-8.08037001390965615E-50,
                      3.22407590704885472E-66, 8.03895491713134467E-83,
                      5.05327202364715016E-100, 3.05151279797412319E-116,
                      5.61492173722771879E-133,-3.28155751381437061E-149,
                     -3.11989696783263346E-166, 1.50621756142996282E-182,
                     -8.50622739807303862E-199,-4.47412080057038015E-215,
                     -1.67454870013131315E-231,-7.52346565712335189E-248);
  cos_t60  : constant hexa_double
           := create( 9.82539302287441241E-01, 1.51495808137772237E-17,
                     -4.18027714221862370E-34,-2.21501743262261598E-50,
                      3.44393741838749221E-67, 1.29417545356935641E-83,
                      8.90427309390118165E-100,-2.52906278192474884E-116,
                     -1.13346753910926430E-132, 3.26556658678534174E-149,
                     -7.06758720045677159E-166, 6.01842410449555253E-182,
                      2.13453230929381320E-198,-1.83483087634506796E-214,
                     -8.72054297104500042E-231,-3.95267099161822517E-247);
  cos_t61  : constant hexa_double
           := create( 9.81963869109555243E-01, 2.11084437115130841E-17,
                     -1.52530134428960536E-33,-6.83880820793379687E-50,
                     -4.60505604057983488E-66, 4.71926919976347839E-83,
                      2.23615821902927661E-99,-7.78272760767018931E-116,
                      7.14519356431960358E-133, 1.32431878914186328E-150,
                      6.52756288299120844E-167,-3.60065722607869413E-183,
                     -2.74455506868802571E-200, 1.08635592612866557E-216,
                      5.44755622675066981E-233,-3.51630216380371200E-249);
  cos_t62  : constant hexa_double
           := create( 9.81379193313754561E-01, 1.34281632603556334E-17,
                     -6.52942904699629863E-34, 2.79654122874562679E-51,
                      1.53443005157334637E-67, 7.20444050501193441E-84,
                      2.41781571636343697E-100, 1.56611910549533379E-119,
                     -1.23806848273476594E-135,-3.88328461971762661E-152,
                     -1.45584953909283921E-168, 3.54589231354257020E-185,
                      1.77475516899002658E-201, 1.74689270652935067E-217,
                     -5.49008623565513894E-234, 6.65188243232836530E-251);
  cos_t63  : constant hexa_double
           := create( 9.80785280403230431E-01, 1.85469399978250057E-17,
                     -1.06965644455307566E-33, 6.66681744752649606E-50,
                      1.25019906217330185E-66, 4.29563840715566795E-83,
                      2.47946548647872342E-99,-3.38217924974884715E-116,
                     -7.91772466310557003E-133, 1.00809406256383239E-149,
                     -7.45349538479823714E-167, 1.93237615741253904E-184,
                     -4.95635460661265762E-202, 2.00511176799845490E-218,
                      1.24965998267089392E-234, 1.23359831867577213E-251);
  cos_t64  : constant hexa_double
           := create( 9.80182135968117430E-01,-3.68017869638561585E-17,
                      6.32451713879928420E-34, 1.86001761371759714E-50,
                      1.14347049424142521E-66,-4.29757498053305257E-83,
                      3.52925073215367280E-99, 1.87216027409591895E-115,
                     -5.98039526665291506E-132, 1.86800259559948181E-148,
                      9.51612746545005461E-166,-5.83011220307897163E-182,
                     -5.40485766475280856E-199, 4.09680373564200945E-215,
                      9.11006309441963917E-232, 6.62915209440563971E-248);
  cos_t65  : constant hexa_double
           := create( 9.79569765685440519E-01, 1.55739915849904202E-17,
                     -1.34010660297829900E-33,-1.72637021998621493E-50,
                     -7.98673886311878563E-67, 6.25949845075466295E-83,
                     -2.02118324860428437E-99, 2.00291649541741970E-116,
                     -7.76178191669638712E-133, 5.82818582227034842E-149,
                     -2.15017222423787335E-165, 6.34770226698330320E-182,
                     -1.80442185335639201E-198, 1.25239702298954387E-214,
                      3.67739657866534090E-231, 1.94580506158478509E-247);
  cos_t66  : constant hexa_double
           := create( 9.78948175319062197E-01,-2.38177279611480529E-18,
                     -1.06947503703816611E-34,-8.22930471960874622E-51,
                     -3.84909112809551807E-67,-1.27036580697574222E-83,
                      7.42123263314149340E-100, 3.08074248920414000E-116,
                      5.68093643688226820E-133,-2.90759628552351996E-149,
                     -1.27311677726037322E-165,-4.34583712668908680E-183,
                     -1.82323602783457599E-199,-1.31700774521715300E-216,
                      6.47270414875685536E-233,-2.50750916052408357E-249);
  cos_t67  : constant hexa_double
           := create( 9.78317370719627655E-01,-2.16230822333448952E-17,
                      1.09704030120280318E-33, 7.70919230993693393E-50,
                     -3.57933922537670313E-66,-2.22788512267157500E-82,
                     -3.38218053395532520E-99,-1.06499935361126710E-115,
                      6.31707131088148345E-132,-3.40405712264263431E-148,
                     -1.69580884237982725E-165,-9.58495130973522862E-182,
                      3.74022913496642504E-198,-3.62778294686879326E-214,
                      1.56646052434739461E-230, 9.64387333634273052E-248);
  cos_t68  : constant hexa_double
           := create( 9.77677357824509929E-01, 5.05141361670596278E-17,
                     -1.32547517014287881E-33, 7.01612543121245383E-50,
                     -4.22808578258530649E-66, 2.55511503489806707E-82,
                     -2.73917739122753280E-99,-1.04196996278482272E-115,
                      5.79963620822804674E-132,-4.32800254595695909E-148,
                      1.24675817588332239E-164,-3.96425901976666827E-181,
                     -5.61935753170834392E-198,-1.29265447312800839E-214,
                      3.18667839667040567E-231, 2.77355442198073843E-247);
  cos_t69  : constant hexa_double
           := create( 9.77028142657754395E-01,-4.33538757515559965E-17,
                      5.49488398315354785E-34,-9.27552631053773058E-51,
                     -4.25058150239580349E-67, 1.10847815393431722E-83,
                     -4.64420883033577086E-100, 1.21103933628312211E-116,
                     -6.50773733802506219E-133,-2.69409690249968762E-149,
                      9.62993074069196837E-166, 7.03469917471578374E-183,
                     -2.52552790876897836E-199,-5.75850928151675466E-216,
                      7.04787534736239484E-233,-3.73812434249630161E-249);
  cos_t70  : constant hexa_double
           := create( 9.76369731330021140E-01, 9.30939315262137798E-18,
                     -4.11849491556856653E-34,-3.19139260313936898E-50,
                      1.40853962602612807E-66, 4.64413981554671916E-83,
                      7.15207724189136246E-100, 7.32480312701871755E-117,
                      3.52153262555074702E-133, 1.47886363188500925E-149,
                     -2.47681995146713691E-166, 1.20304798144876333E-182,
                      8.33842631451996466E-200, 1.40392088612149178E-216,
                      7.10768285482832976E-233,-3.69186103316394881E-249);
  cos_t71  : constant hexa_double
           := create( 9.75702130038528570E-01,-2.55725560812596857E-17,
                     -9.31742445089422234E-34,-8.36758632116468632E-51,
                      2.12334620080920379E-68, 1.63450441303316426E-84,
                     -4.95349273130162712E-101, 2.69361997203231145E-117,
                      1.72915075656573707E-133,-4.81069737902794993E-151,
                      2.96931662762993778E-167,-3.38298477838575947E-184,
                      1.94719261600333732E-200, 1.04957786078728370E-216,
                      1.00318448773476800E-233, 2.57155203891857584E-250);
  cos_t72  : constant hexa_double
           := create( 9.75025345066994120E-01, 2.66426606518991355E-17,
                      1.78193927393538529E-34,-3.31596253856489471E-51,
                      2.95007891993014475E-68,-9.34914614065628015E-85,
                     -2.35973433953258568E-101,-1.34156308884222877E-117,
                      2.98149143719077663E-135, 1.54436880056044176E-151,
                     -1.44501877550563961E-167,-7.68165376065902943E-184,
                     -3.58299372722365883E-200, 1.22712540751033027E-216,
                      2.58643593467193086E-233,-7.86811187123105899E-250);
  cos_t73  : constant hexa_double
           := create( 9.74339382785575858E-01, 2.30412214761515121E-18,
                      1.07586860050314303E-34, 5.10741164328094776E-51,
                      7.72778458824261812E-68,-1.62633643973408358E-84,
                      3.19655323125310531E-101,-2.20615608093413326E-117,
                     -1.45847150659208535E-133,-1.23704833309707842E-150,
                      1.29092351397849978E-166, 6.76964191446429747E-183,
                      3.96341128526550556E-199,-2.94916764167042759E-216,
                     -2.42794871762899609E-232, 5.02946299011612433E-249);
  cos_t74  : constant hexa_double
           := create( 9.73644249650811977E-01,-5.17298086910058710E-17,
                     -1.55084730059898873E-33,-1.65051259176754027E-49,
                      7.96915446049543911E-66,-1.66344698689485860E-83,
                     -1.31220862667275281E-99,-1.99689379354672836E-116,
                     -9.16873090653998857E-133,-5.69790291822662886E-149,
                     -3.35758597206666942E-166, 2.76581775855417898E-182,
                      1.66038949564954772E-199,-9.96567020171866952E-216,
                     -5.92200093948441299E-232,-3.53893830245057208E-248);
  cos_t75  : constant hexa_double
           := create( 9.72939952205560177E-01,-3.13112111222817999E-17,
                     -2.68740877890061412E-33,-2.16524348188221452E-51,
                      4.79414741594388014E-68, 1.20190725928193214E-84,
                     -3.95462135206638842E-101, 8.42016898959033959E-118,
                     -2.26017087171754026E-135, 1.58962374885226572E-152,
                     -2.03946363416415543E-169,-9.94051639783919587E-186,
                     -5.38163386692125876E-202, 1.23299791844394430E-218,
                      7.77605541696580775E-235,-6.26250671937768151E-251);
  cos_t76  : constant hexa_double
           := create( 9.72226497078936269E-01, 3.64611697859382213E-17,
                      3.03096368838831329E-33,-1.27027169079673056E-51,
                      3.66763585449818093E-68,-1.69863399345301020E-84,
                      7.84561740807817259E-101, 3.84283121023098868E-117,
                     -3.15252775126458249E-134, 1.51765567540481404E-150,
                     -9.65280639931848619E-167,-3.29415634205330048E-184,
                     -7.43593276576962196E-202, 2.55881071842886168E-218,
                      9.63216876183061237E-235,-3.37842336894479461E-251);
  cos_t77  : constant hexa_double
           := create( 9.71503890986251784E-01,-7.98654211222890458E-18,
                     -4.36284172112633798E-34, 3.43075177987593518E-51,
                     -1.71729077144990356E-67, 1.02816740876531348E-83,
                     -1.38560997377986189E-100,-6.60797140033146819E-117,
                     -9.70019445524468153E-134,-5.16000976646557872E-150,
                     -7.15228591300813628E-167, 5.18571373948429202E-183,
                      1.94182337953543725E-199,-6.08298810603205075E-216,
                      6.61349551518277677E-234,-2.37306844574798343E-250);
  cos_t78  : constant hexa_double
           := create( 9.70772140728950350E-01,-4.79921633251149218E-17,
                      3.03475289109757830E-33, 8.59891995064797013E-50,
                     -7.49481543042292715E-66, 2.94997856929937779E-82,
                     -2.36546149345046766E-98,-2.95245850600016617E-115,
                     -2.05664019473859716E-131,-1.23972107218430814E-147,
                     -1.82667342647167087E-165,-3.32660238507336443E-182,
                      2.38182418242358768E-198, 3.13994831047896548E-215,
                     -1.09893451671536953E-231, 3.01027072545567886E-249);
  cos_t79  : constant hexa_double
           := create( 9.70031253194543974E-01, 1.83653003484288444E-17,
                     -1.43110975719449184E-33, 8.58467819987406972E-51,
                      1.62164617019844889E-67, 9.93971074826211097E-84,
                      6.35412877280818009E-100, 3.28427780309489795E-116,
                     -2.67705284565510852E-132,-2.95334544395013451E-149,
                     -1.70006517528352325E-165,-1.30858863973688735E-182,
                     -4.27145685334721627E-199,-3.38935531975646089E-215,
                      4.52258005840352487E-232,-2.01903540665134197E-249);
  cos_t80  : constant hexa_double
           := create( 9.69281235356548532E-01,-4.56636602619278955E-17,
                      9.61475269172393871E-34, 8.12676052078713300E-51,
                     -1.20711052357953293E-67, 6.09453764434430899E-84,
                      3.26073337427688091E-100, 2.12671505876037430E-116,
                      1.22237986663696186E-132, 7.28293723422898830E-151,
                     -1.12600758227731571E-167,-7.15223498819779781E-184,
                      2.37882849136125957E-200, 6.48816909040401594E-218,
                      7.17020164471737352E-235,-1.58687560495804502E-251);
  cos_t81  : constant hexa_double
           := create( 9.68522094274417267E-01, 4.94750749182447709E-17,
                      2.85587383519112405E-33, 6.29484223165074613E-50,
                     -1.85092668189800111E-67,-1.60239927272611526E-83,
                     -5.00466528836349518E-100,-4.59670977119475995E-116,
                      2.50709565046196379E-132, 1.08612418676592489E-148,
                      5.80853877485040785E-165, 1.69024355279166922E-181,
                     -1.07619938063504422E-197,-5.90066302321061662E-214,
                      4.00053480386014556E-230,-1.78060730244487564E-246);
  cos_t82  : constant hexa_double
           := create( 9.67753837093475511E-01,-4.55121328255158199E-17,
                     -1.41276179887190934E-33,-8.46206090897045783E-50,
                      1.24395936473099010E-66, 1.14293321503006500E-82,
                      7.04399065125957426E-99,-3.23066297849334417E-115,
                     -1.34450286085067085E-131,-1.15025977246437837E-148,
                     -3.12749113967826384E-165, 7.22139357492916267E-182,
                     -2.06856176658793877E-199,-1.13001556660401380E-215,
                     -2.57294046657786091E-232, 9.98048005497382235E-249);
  cos_t83  : constant hexa_double
           := create( 9.66976471044852071E-01, 3.84962288373378642E-17,
                     -5.38816315427456469E-34,-3.52218631714589587E-50,
                      1.44938221650369558E-66, 3.79895418846207444E-83,
                     -2.28718367225149526E-99,-1.08006133273322478E-115,
                     -6.21576021287856902E-132, 1.25256796156704506E-148,
                     -4.25253512388522710E-165, 1.28951873265936211E-181,
                     -1.03286851450026941E-197,-4.12557032900718432E-214,
                     -1.29545858205423091E-230,-7.07357458718954377E-247);
  cos_t84  : constant hexa_double
           := create( 9.66190003445412504E-01, 5.12988404016654925E-17,
                      1.45640759047698075E-34, 1.00959739713774320E-50,
                     -1.51706285249723938E-67, 8.66894665478795992E-84,
                     -7.17117120878777403E-100, 7.26842554113666122E-117,
                     -3.49570889275429691E-133, 7.56817955830710309E-150,
                     -1.97071520621836568E-166, 6.95855186620440694E-183,
                      1.26557131907400415E-199, 6.84069365324552385E-216,
                     -2.98008832297923617E-232, 1.03811419319048636E-248);
  cos_t85  : constant hexa_double
           := create( 9.65394441697689398E-01,-2.37453899183921563E-17,
                      5.92215155900538620E-34,-3.88111925562310936E-50,
                     -9.42019874222734875E-67, 4.59000233797429829E-83,
                      3.34225989389553376E-99,-1.22327783966708738E-115,
                     -1.80801162265626269E-133,-1.61912898936447266E-149,
                     -9.09148857352786598E-166, 1.21369943654996361E-182,
                     -3.02329220358386003E-199, 1.51198590331664742E-215,
                     -1.50827437009104017E-232, 6.85343770635250031E-249);
  cos_t86  : constant hexa_double
           := create( 9.64589793289812758E-01,-3.41894707359597856E-17,
                      2.29820741554635218E-33,-4.51287910456076340E-50,
                     -2.90435472553590522E-66, 2.27851433769356981E-82,
                     -7.57748661918793489E-99, 3.53663721834692119E-115,
                      1.97858668928451220E-131,-4.70058186203894557E-148,
                     -2.72004348134305668E-164, 8.11600824160775234E-181,
                     -6.40562278204986443E-198,-2.75918609069324402E-214,
                     -1.96506719605152720E-230,-1.11996005772874410E-247);
  cos_t87  : constant hexa_double
           := create( 9.63776065795439840E-01, 2.64639505612200288E-17,
                     -2.90732345901993230E-36,-1.29383286293956014E-52,
                      5.42377504217757778E-69, 2.31568658554524316E-85,
                     -7.78256473857223002E-102, 7.39933411115412867E-119,
                      4.97415077680190680E-136, 2.85132037356885374E-152,
                     -5.07109291114062201E-169,-1.51101988343285023E-186,
                     -2.43414233344909757E-203,-9.17454090248088983E-220,
                     -4.23907370125926338E-236,-1.25056164156832064E-252);
  cos_t88  : constant hexa_double
           := create( 9.62953266873683877E-01, 8.93419604043136339E-18,
                     -3.90712446610201256E-34, 1.62120911168473936E-50,
                      5.45609708106822516E-67, 7.45013740618382878E-84,
                     -1.79824171468069716E-101, 1.82075512815275648E-118,
                     -3.80637373992322301E-136, 2.90526060817339274E-152,
                      1.96584461203705406E-168,-9.17732389581246971E-185,
                      4.46694579764010265E-201, 1.38826276467739593E-217,
                     -8.91633487049247758E-234,-3.74892041079430145E-250);
  cos_t89  : constant hexa_double
           := create( 9.62121404269041580E-01, 1.52367704538463048E-17,
                     -1.30501735255971420E-33, 7.90161223940926659E-50,
                      3.09258698989453650E-66, 2.42945747300312265E-82,
                      8.46011306621555756E-99, 7.54340212118548061E-115,
                     -2.57366199155431226E-131, 9.40028859305346188E-148,
                     -7.58804690451442888E-165, 1.86567101139161247E-181,
                     -5.07431445798433402E-198,-3.51592336182555236E-214,
                      1.45252193619570127E-230,-6.80396612369142292E-247);
  cos_t90  : constant hexa_double
           := create( 9.61280485811320640E-01, 2.09339552166740391E-18,
                      1.07686074690156925E-34,-5.94536393043617736E-51,
                     -5.39774379960807517E-67,-1.02390685673233149E-83,
                     -6.92621794150414054E-100, 4.37032948036597055E-116,
                      1.18440917997325624E-132, 5.88325716498597744E-149,
                     -9.24263409653029031E-166,-2.37318617065651900E-183,
                     -1.74248665955274859E-199,-2.73111281063331819E-216,
                      5.63556068769862427E-233,-3.14311221949979531E-249);
  cos_t91  : constant hexa_double
           := create( 9.60430519415565787E-01, 2.46539048153171851E-17,
                     -1.37921694109063224E-33,-4.77265983785069034E-51,
                      2.43312491357664852E-67,-1.18220254871496246E-83,
                      4.78736167565198069E-100, 3.96379054800794783E-117,
                     -2.45488644030274505E-133, 1.12620294698543935E-149,
                     -3.78698984391941342E-166,-2.15712147238874905E-182,
                     -7.36601560589723754E-199, 2.33660424502954792E-215,
                     -3.51721702163463452E-232, 1.93372886472721874E-248);
  cos_t92  : constant hexa_double
           := create( 9.59571513081984517E-01, 1.10006400850009570E-17,
                     -4.20360308282239746E-34, 4.00237048426065730E-51,
                      2.18497216748766813E-67,-9.20882126898136034E-84,
                     -6.80679007032517504E-100,-1.66513242856990270E-116,
                     -2.53169925113958622E-133, 2.45017414604300614E-150,
                      1.45899004286631798E-166,-1.01202637448478420E-182,
                     -5.17415443992067441E-199,-1.11027177842183584E-216,
                      6.91965219742527528E-233,-2.99890015039196924E-249);
  cos_t93  : constant hexa_double
           := create( 9.58703474895871599E-01,-4.36850143923720533E-17,
                      2.20018006627291311E-33,-1.05537213243580767E-49,
                      7.59233777821841529E-66, 8.73471225330366257E-83,
                     -6.77293432348759834E-99,-2.47456894842052508E-115,
                     -2.19069302023550238E-131, 9.98538274923132888E-149,
                      1.61686239010244090E-165, 5.02699347972203095E-182,
                      7.34751245807513313E-199, 1.83837339561461567E-215,
                     -1.22746751642534986E-231, 6.87617724678322633E-248);
  cos_t94  : constant hexa_double
           := create( 9.57826413027532908E-01,-1.76967100753712627E-17,
                      1.91640341103821897E-34, 8.14892350717548131E-51,
                     -2.70794569294906723E-67, 9.07441597478512394E-84,
                     -4.68016123362953683E-100, 5.65851735365578967E-117,
                      1.76354215417962197E-133,-8.71943879990661938E-150,
                     -4.43928836038529084E-167,-5.25140549031141159E-184,
                     -4.15840288965458672E-200,-2.60193149152245883E-216,
                     -1.56734566250605934E-232,-2.87263947326196553E-249);
  cos_t95  : constant hexa_double
           := create( 9.56940335732208824E-01, 4.05538698618757006E-17,
                     -1.71470133643021491E-33, 2.57367452953294547E-50,
                     -1.06073717989001806E-66,-6.06834981124942937E-83,
                     -3.06437169362617683E-99, 1.95997253676932792E-115,
                     -4.96839068820042958E-132,-3.79922005829959699E-149,
                      8.43563950015550490E-166, 1.06007485782403876E-182,
                      2.15018821223615529E-199, 2.31954338487335617E-215,
                     -7.49105615484306200E-232, 4.02041915325701037E-248);
  cos_t96  : constant hexa_double
           := create( 9.56045251349996406E-01, 3.77050452795890670E-17,
                      1.96786999973475710E-33, 8.50931777312301799E-50,
                      1.78072153859820630E-66, 4.81230769400565826E-83,
                     -3.18116888009302172E-99,-8.72512963029218373E-116,
                     -5.14789082027789144E-132, 3.05829786973601160E-148,
                     -1.57963213548617433E-164,-5.97947150139345401E-181,
                     -5.10342618419876628E-197, 8.06871306435635238E-214,
                      1.81068101691910679E-230,-7.95735831626965038E-247);
  cos_t97  : constant hexa_double
           := create( 9.55141168305770671E-01, 5.00886529550146681E-17,
                     -2.69831818380592114E-33, 1.01023235755964930E-49,
                      8.70736756883692803E-66,-2.09861613758072834E-82,
                     -4.49423470421902387E-99,-3.79216290693442012E-115,
                      1.19244594594782449E-131,-7.29425577276807683E-148,
                     -3.24936543499968234E-165,-2.18034943189560768E-181,
                     -1.11806920074437018E-197,-3.40994507610931478E-214,
                     -8.41131000854587080E-231, 5.65417360879214584E-247);
  cos_t98  : constant hexa_double
           := create( 9.54228095109105667E-01,-3.75459016906268741E-17,
                      1.49516192412577644E-33,-8.27173331513949730E-50,
                      4.64025572425820192E-66, 1.35102594875214550E-82,
                     -1.12109676531992514E-98, 7.77172974375096880E-115,
                     -2.85788712208836110E-131, 1.76821579661666475E-147,
                     -4.47687992172370197E-164,-1.43769957997622389E-180,
                     -3.18054699092421862E-197,-1.24561913405994126E-213,
                      5.64831093938054773E-230, 2.36779954880225968E-246);
  cos_t99  : constant hexa_double
           := create( 9.53306040354193862E-01,-2.51907387799199336E-17,
                     -1.42722398211343787E-33,-4.67172868092831554E-50,
                      1.07355803110695776E-66, 8.98787279082884347E-84,
                      3.91384245651778361E-100, 1.47666486707701230E-116,
                     -8.63562120662870086E-133,-3.20350295298909362E-149,
                     -1.64601841999369994E-165,-7.94423735566525505E-182,
                     -4.49028530443015404E-198, 2.40548523047355044E-214,
                     -5.87550806536246592E-231,-4.74759373799960420E-247);
  cos_t100 : constant hexa_double
           := create( 9.52375012719765879E-01,-2.02693004622992721E-17,
                     -1.06359568872462463E-33,-3.55145376664876193E-50,
                     -1.16913925385888480E-66, 3.05382459417423301E-83,
                     -1.02660805067577601E-99, 3.88681271571159073E-116,
                     -1.28776054797344040E-132, 2.73573507116719400E-150,
                     -1.96386705785722171E-166, 8.22800322691736458E-183,
                     -1.69625435777426491E-199,-3.01102838773682547E-217,
                      2.71179434380166794E-234, 1.85572579921319877E-250);
  cos_t101 : constant hexa_double
           := create( 9.51435020969008338E-01, 3.13505841232666951E-17,
                     -2.48248334527378125E-33, 9.54503355253806126E-51,
                      5.53918767059611572E-67,-2.84449994016305898E-83,
                      1.45756841212546658E-99, 7.95274417611133811E-116,
                      1.14027135994616706E-132,-9.48014313555254109E-150,
                      3.61733700334427666E-166, 1.74696757289794293E-182,
                      1.26972176017917342E-198, 1.20353097377199459E-215,
                      5.29008317157028245E-232, 2.62972291928419199E-248);
  cos_t102 : constant hexa_double
           := create( 9.50486073949481702E-01, 1.94100975626304361E-17,
                     -8.15593939498167894E-34,-1.05012097201645618E-50,
                     -2.46659050179783976E-67,-5.13938908505698639E-84,
                     -1.25938517274140014E-100,-1.32275148405962913E-117,
                      4.51971992513849947E-134, 1.52513012884180200E-150,
                     -3.03053608784647330E-167, 2.95807284911548228E-185,
                     -1.97871614708100772E-202,-2.73002789899265457E-219,
                     -7.38653004642482298E-236, 3.91298732630368829E-253);
  cos_t103 : constant hexa_double
           := create( 9.49528180593036675E-01,-7.55441519280432984E-18,
                     -5.12602450240466856E-34, 1.80936433890404058E-50,
                      1.06925435595184381E-66, 1.85580824775036884E-83,
                      9.52521545126716726E-100,-1.36672850084663406E-116,
                     -5.08406854683940847E-133, 2.17826510360338465E-149,
                     -6.65631192997715151E-166, 2.68025893400499271E-182,
                     -1.26311783213755019E-198, 5.87319938240932401E-215,
                      5.05502645717194572E-231, 7.85419489607931081E-248);
  cos_t104 : constant hexa_double
           := create( 9.48561349915730268E-01, 2.06682622623332316E-17,
                     -5.94407302436673059E-34, 1.42688531115543005E-50,
                     -7.32845891867839664E-67,-1.61488109785671798E-83,
                      5.00580589956716106E-100,-2.05576822144118270E-116,
                     -1.07133092461087276E-132, 5.76933603823622282E-149,
                      2.53382275523823026E-165, 2.10747372536269028E-181,
                      4.96383492317688247E-198, 2.60570835912898709E-215,
                      9.10672729491965938E-233, 3.96334675099387053E-250);
  cos_t105 : constant hexa_double
           := create( 9.47585591017741091E-01, 4.34179938521259905E-17,
                     -2.77286678898403727E-34, 5.57091601965199683E-51,
                     -4.65524084437226262E-67, 1.05674991192480383E-83,
                     -1.24989038979712829E-100, 1.36648459676357626E-117,
                      6.87426069926136058E-134, 2.50465150973319603E-151,
                      8.81012391904881970E-168,-6.95288054134796102E-184,
                      2.25293896840391180E-200,-6.45461444093694965E-217,
                      1.55778975412475806E-233, 9.58257794926261208E-250);
  cos_t106 : constant hexa_double
           := create( 9.46600913083283535E-01, 3.50568002106807304E-17,
                      9.85785369403181171E-34, 6.60359110645851972E-50,
                     -8.63226846881280089E-67,-4.96118217013441903E-83,
                      2.10018870791639280E-99, 1.52417880924195845E-115,
                      2.29433734076481759E-132, 2.22240917611062153E-149,
                     -9.46514084697851833E-166, 3.87215154530395409E-182,
                      3.17681914338995133E-199, 1.09431715733131086E-216,
                      3.66591104484742755E-233, 1.81675951021870479E-249);
  cos_t107 : constant hexa_double
           := create( 9.45607325380521280E-01, 4.60191024785237379E-17,
                     -6.25343847694520592E-34, 1.57589412157799615E-50,
                      3.50354275814951774E-67,-9.86913826329273034E-84,
                      4.76591532343491806E-100,-2.98448753664147515E-116,
                      3.31219280335619808E-133,-1.16016970031041981E-149,
                      4.36237276763144507E-166, 6.83113508845037302E-184,
                      9.54516432464189711E-201,-7.13082290658225810E-217,
                      2.72024469374955108E-233,-1.22778394430113120E-249);
  cos_t108 : constant hexa_double
           := create( 9.44604837261480257E-01, 8.81005454766411651E-18,
                      5.22916956027578420E-34,-3.34872560184071233E-50,
                      2.39194940723815589E-67, 6.45407160912412937E-84,
                     -3.11215319917321197E-100, 6.28466941542440826E-117,
                     -1.43149700381583742E-133,-2.28029852526459759E-150,
                      1.18135618007652915E-166, 1.68418335607503757E-183,
                      7.83498480149134374E-200, 4.69522926983677470E-216,
                     -2.81187569207014263E-232,-1.16040660119257075E-248);
  cos_t109 : constant hexa_double
           := create( 9.43593458161960386E-01,-2.40931278444042141E-17,
                      1.02832798568039392E-34,-2.33982326145313548E-51,
                     -1.00344539939127154E-67,-7.78093352395119302E-84,
                     -2.94134011522936065E-100, 5.04802149998341297E-117,
                     -1.57734985170389363E-133, 4.63864562665240938E-150,
                      1.34638948124776107E-167,-2.32813638147242294E-185,
                     -8.22790447986534140E-202,-6.27719050111476026E-218,
                     -4.53698204279701280E-234,-2.76579506030970199E-250);
  cos_t110 : constant hexa_double
           := create( 9.42573197601446866E-01, 1.32355648064368862E-17,
                     -5.70482628853869107E-35, 3.99470504427537436E-51,
                     -1.53360535292408179E-67, 1.22879371215148752E-83,
                     -3.73272933341177773E-100, 2.13712777453120318E-116,
                      8.23408117680207725E-133,-3.83934454373304576E-149,
                     -1.30990874217641413E-165, 2.56001259556801811E-183,
                      7.25425288780982253E-200, 1.10364278757657998E-216,
                     -1.09342113342772493E-233, 1.94301301335024207E-250);
  cos_t111 : constant hexa_double
           := create( 9.41544065183020806E-01,-2.78963795476983411E-17,
                      1.62732363567338985E-33,-5.30759447084712028E-51,
                     -1.97563364352909530E-67,-9.84904967317238783E-84,
                     -7.22940592221540571E-100, 8.31254830802350592E-117,
                      2.51601493779843537E-133, 4.28059809380654294E-150,
                     -2.69517744394308600E-166, 5.04817902361903078E-183,
                      1.82255062376587219E-199,-1.43008724777147169E-216,
                      5.65199902114442244E-233,-5.53124337179111510E-250);
  cos_t112 : constant hexa_double
           := create( 9.40506070593268295E-01, 2.86104215671162683E-17,
                      2.92615011475388268E-33,-2.68498676908969248E-50,
                      2.09213372520891565E-66,-2.80351901621276408E-83,
                     -1.01978742425401925E-99, 4.80238403194639172E-116,
                      3.01695563299559020E-133, 1.65903929700113524E-149,
                     -3.59521788574960429E-166, 2.38866804336337140E-182,
                     -1.39008497651789600E-198,-8.44714448620462052E-215,
                      2.16519862118237410E-231, 1.40090517888992307E-247);
  cos_t113 : constant hexa_double
           := create( 9.39459223602189919E-01,-7.01528679430986548E-18,
                     -5.63956938180112096E-34, 3.55681426789876511E-50,
                     -2.08561420747572766E-66, 8.43574259773126629E-83,
                     -1.83268145527305285E-99, 1.79672756959986535E-115,
                      6.32672762407001742E-132,-4.40866822014496431E-148,
                     -3.04450649978669510E-164,-5.32663392992506260E-181,
                     -2.50884628318466606E-197, 3.75946627494542518E-215,
                      1.73598589408326262E-231, 1.00248588817643701E-247);
  cos_t114 : constant hexa_double
           := create( 9.38403534063108058E-01, 5.42425450447954901E-17,
                     -1.90399666078597588E-33,-1.56277929883412154E-49,
                     -5.21562779934203741E-66,-4.39115487120723673E-82,
                     -7.90809181835800649E-99, 5.86537199903655596E-115,
                     -3.88736951369354800E-131,-9.39978908320043481E-148,
                     -5.57717461812323005E-164,-3.77895479651264729E-180,
                      1.52804732211466999E-196, 8.03630928881108156E-213,
                      6.25992749179114074E-229, 2.49187968161646240E-245);
  cos_t115 : constant hexa_double
           := create( 9.37339011912574960E-01,-3.65709262843627764E-17,
                     -1.19029400712732472E-33,-1.12150823315832229E-50,
                      7.60707300254348212E-67,-5.26062862939899059E-83,
                      8.57127824561348457E-100,-3.48852376555868662E-116,
                      3.29224038742995321E-133,-1.91519619413867884E-149,
                     -7.78072767058341681E-166, 1.01149880944007123E-182,
                      7.70516457043194721E-199,-4.37949915277692743E-215,
                      1.89599364818867114E-231, 1.16064330529157399E-248);
  cos_t116 : constant hexa_double
           := create( 9.36265667170278260E-01,-1.30137661454976537E-17,
                      5.22298700619905950E-34,-3.39727770756341084E-51,
                     -1.90341799749199951E-67,-3.15356159885427870E-84,
                      9.20670470559841481E-101,-6.21090077072843663E-117,
                     -9.83941079223479620E-134,-8.62015258814028126E-150,
                      5.22177698775479778E-166,-1.12719926824065758E-182,
                     -3.95783192149889147E-199, 8.66223406014144975E-216,
                      3.76827152492099291E-232, 1.06201703284925008E-248);
  cos_t117 : constant hexa_double
           := create( 9.35183509938947610E-01,-3.26093953024850650E-17,
                     -8.18130152188752454E-34, 5.56421400249281388E-50,
                      3.39120020833333907E-66, 1.73251824602431850E-82,
                     -1.27465111561684163E-98, 3.09092949517218252E-115,
                      1.07269206004097402E-131,-2.26909117081504705E-148,
                      1.69799116836480073E-165,-7.94604462367815613E-182,
                      1.08227295876721649E-198,-7.20297648649612916E-215,
                      5.13070807471150639E-231,-1.16297412939256540E-247);
  cos_t118 : constant hexa_double
           := create( 9.34092550404258870E-01, 4.46628243607675113E-17,
                     -2.59032430473969160E-33, 8.15052090043430426E-50,
                     -3.96084807942105700E-67,-2.03534861617404378E-83,
                      1.17672537711663367E-100,-2.83661734960174942E-117,
                      1.08942883939120127E-133, 9.30198079810448810E-150,
                      4.77166913345146368E-166, 1.33464043353006515E-182,
                      4.60704424651557425E-199, 9.85546110742936758E-216,
                     -3.96759990212504367E-232,-1.87400230126142448E-248);
  cos_t119 : constant hexa_double
           := create( 9.32992798834738846E-01, 4.20414155553843554E-17,
                      9.02858964955212762E-34, 5.30199849776612590E-50,
                     -2.20337124483564173E-66, 8.36670783722345020E-83,
                      1.23427699568136070E-99, 1.68964307056419849E-116,
                     -6.12944275932347789E-133,-1.23372535087504059E-149,
                     -1.11921685042628233E-166,-6.45200908157860276E-183,
                     -1.65889041560933600E-200, 7.00856186050737119E-217,
                      6.15648919616520481E-234,-2.79630735873984291E-251);
  cos_t120 : constant hexa_double
           := create( 9.31884265581668148E-01,-4.07859443773180948E-17,
                      1.76314502987541687E-33, 2.57764033055074533E-50,
                      7.73467038309955434E-67,-6.41087611395991873E-83,
                     -3.17471443066570237E-99, 9.64975860284331691E-116,
                     -7.09336145296196435E-133, 5.22109940621533383E-149,
                     -3.22782962345165561E-165, 2.19703258049826173E-182,
                     -8.84701457732142831E-199, 3.77047464405394419E-215,
                     -1.93512282155003555E-231, 9.83368898251803873E-249);
  cos_t121 : constant hexa_double
           := create( 9.30766961078983712E-01, 1.97037751028383294E-17,
                      6.56579087182782053E-34,-1.94803479662595241E-51,
                     -9.73087044913080682E-68, 2.08236441694450518E-84,
                      1.09576586527377549E-100,-2.60750375818945636E-117,
                      9.17007463625583409E-134, 1.95784024438753045E-150,
                     -1.90116313133944503E-167,-1.82136797351514228E-183,
                     -1.11122744027995430E-200, 6.95208293666640105E-217,
                     -8.74835990217950730E-234,-2.70641601634683737E-250);
  cos_t122 : constant hexa_double
           := create( 9.29640895843181214E-01, 5.12825300168641071E-17,
                      2.37197398919162612E-34,-1.72300654269171267E-50,
                     -6.68792677476599850E-67, 1.23049318112029354E-83,
                      8.37244418565023376E-100, 4.02434900972948025E-116,
                     -1.55463193322432198E-132, 4.80899096780962870E-149,
                     -1.40932416325427348E-165, 1.08438226591536001E-181,
                     -6.36042207258272666E-199,-1.27620052614773722E-215,
                     -7.73163904593562566E-232, 7.03608130632573270E-248);
  cos_t123 : constant hexa_double
           := create( 9.28506080473215589E-01,-2.33066398484859428E-17,
                     -7.77990843332085032E-34,-5.85975580093003054E-50,
                      1.75833592434031391E-66,-1.19262802341714440E-82,
                     -7.37736511562237771E-101, 4.33493425197844834E-117,
                      1.79450409848617191E-133,-7.96128283472210605E-150,
                      3.08280701762073525E-166, 1.68363460436611405E-182,
                     -6.19849376704578841E-199,-2.70015225304511974E-215,
                      1.68443350893452996E-231,-3.75211948433926301E-248);
  cos_t124 : constant hexa_double
           := create( 9.27362525650401115E-01,-2.76771116921554372E-17,
                      2.21102934501995759E-34, 2.03491908196806129E-50,
                      8.39032375347225070E-67,-9.32778897381976315E-84,
                      4.79684902392223340E-101, 1.18478488401045131E-117,
                     -6.10012015257658584E-134,-4.05508493280452212E-150,
                     -1.75429835642014255E-166,-2.95153888899069887E-183,
                     -8.13340377862123164E-200,-4.69696634730380279E-216,
                      2.67954171358187922E-232, 1.35222604924490158E-248);
  cos_t125 : constant hexa_double
           := create( 9.26210242138311379E-01,-3.73037545860990542E-17,
                      2.04644578099934049E-33, 1.38317996312318165E-49,
                     -6.80112806695844948E-66,-3.81403409254158291E-82,
                     -6.68485648218491344E-99, 6.88291084626239389E-116,
                      2.72261656854795221E-132, 9.68224260632975826E-149,
                     -6.66593546374035963E-165,-2.52056999716070394E-181,
                      8.42980809594439685E-198,-5.97433960460709008E-214,
                     -8.12845894118873302E-231,-4.02234056800816322E-247);
  cos_t126 : constant hexa_double
           := create( 9.25049240782677584E-01, 6.05294474125761588E-18,
                     -8.82565177602785406E-35, 1.82854621223883285E-51,
                      4.09130392565241415E-68, 2.56828789316996150E-84,
                      1.08010652515540063E-100, 2.44618780187023231E-117,
                     -2.67855602389001075E-135,-5.59203472741129853E-152,
                     -3.50482055945973242E-168,-2.23992560957439125E-184,
                      1.19492783382350189E-200, 7.66784109044178133E-219,
                      4.97700635076269873E-235,-2.48154344230723457E-251);
  cos_t127 : constant hexa_double
           := create( 9.23879532511286739E-01, 1.76450470843366771E-17,
                     -5.04425373215868178E-34,-4.04786777168238900E-50,
                      1.31735239700201084E-66, 6.54375320157104185E-84,
                     -1.42764261912597804E-100,-3.88751015742232925E-117,
                     -3.02180943942433819E-133, 1.75916318117114914E-149,
                     -5.34882231789441022E-166, 1.89306548298258711E-182,
                     -1.60419078396223818E-198,-4.81799254827208970E-215,
                     -1.31984121897079550E-231,-9.24278707019237117E-248);
  cos_t128 : constant hexa_double
           := create( 9.22701128333878518E-01, 5.29637989185398138E-17,
                     -5.71356996288766851E-34, 3.01636717972190866E-50,
                      1.07463934459841561E-66, 1.11166515229030846E-84,
                      8.10373844610333058E-101, 1.72023532144832194E-117,
                      6.59697242173964777E-134,-4.44228319544822144E-150,
                     -7.49216677002915334E-167, 2.99636459422494291E-184,
                      2.41020796592327144E-200,-6.42773407893691823E-217,
                     -9.07739285114804744E-234, 6.15860542749077826E-251);
  cos_t129 : constant hexa_double
           := create( 9.21514039342041902E-01, 4.16398433906846436E-17,
                      1.18914856047023557E-33, 2.08624375943803242E-50,
                     -6.91693942914795348E-67,-3.50049466036502569E-83,
                     -1.27214433223848543E-99,-7.31815958744299068E-116,
                      1.09356473618568231E-132,-2.38207700236577583E-151,
                      2.32184472079222752E-168,-6.20140816210573263E-185,
                     -1.45805344263003660E-201,-2.64992903799228751E-218,
                     -6.99433225106918924E-236, 3.61767417708830101E-252);
  cos_t130 : constant hexa_double
           := create( 9.20318276709110594E-01,-2.78068887790368375E-17,
                      2.70110136770712743E-33, 1.19985787924554990E-49,
                      7.67396671848431259E-66,-1.54987464495404513E-82,
                      2.23718133923744613E-99,-1.48969758828585084E-115,
                     -9.92196174626709269E-132, 1.75890562965210995E-148,
                     -1.48627418849686111E-164, 8.79409854668621538E-181,
                     -1.76777960803156893E-197, 1.05910355433496471E-213,
                     -2.71182932952870541E-230, 1.09327704566690003E-246);
  cos_t131 : constant hexa_double
           := create( 9.19113851690057770E-01,-2.64964846223447180E-17,
                      6.54036047634619200E-34,-2.89971802011860779E-50,
                     -2.26723278231783554E-66,-8.67903385550794176E-84,
                      3.17018237483716193E-100, 1.50379978355683784E-116,
                     -3.35858778341538278E-133,-1.98378424288572289E-150,
                     -6.02836495982179833E-167, 1.58559834324918721E-183,
                     -5.32876243075732817E-201, 3.03315833415844442E-217,
                      4.30853407210280168E-234, 1.18496387812357098E-250);
  cos_t132 : constant hexa_double
           := create( 9.17900775621390497E-01,-3.90745796808495149E-17,
                      2.30046365414902636E-33, 3.98517627444431070E-50,
                     -3.54790303670753146E-67,-1.24676514023696537E-83,
                      8.30992887322625520E-101,-5.48847252842469518E-117,
                      2.97001115715439109E-134,-2.31413464910014389E-150,
                      7.35994230618552264E-167,-5.94865681022986446E-183,
                     -1.00252933326276079E-199, 1.83740972950593382E-216,
                      1.60118462458850203E-232,-1.71803379100867409E-249);
  cos_t133 : constant hexa_double
           := create( 9.16679059921042705E-01,-4.17339786982875676E-17,
                      1.20944448043811722E-33, 4.93569168260978155E-50,
                      2.26213938243848806E-66, 5.55299561362914361E-83,
                     -2.36487390714231140E-99, 1.06016933744567057E-115,
                     -4.22551099016873113E-132,-1.19009364469764179E-148,
                     -2.14427199334413209E-165, 1.03043647877773130E-182,
                     -1.11873264501061342E-199, 6.55696512438241911E-216,
                      3.57089978322719130E-232, 1.52961660318634163E-249);
  cos_t134 : constant hexa_double
           := create( 9.15448716088267833E-01,-1.35910566929008941E-17,
                      5.99230274755947351E-34, 2.14032959259628792E-50,
                     -5.07426480084617918E-67,-2.67698374962148665E-83,
                     -1.00282497079407074E-99,-7.27567635875714328E-116,
                      3.33376545500762698E-132, 8.08194409922498173E-149,
                      3.34975756475997710E-165,-2.18697894785636497E-181,
                     -1.32871399867837105E-197, 4.39586349261944565E-214,
                      2.88354097700239709E-230, 1.31245465250086664E-246);
  cos_t135 : constant hexa_double
           := create( 9.14209755703530691E-01,-3.63161825278144230E-17,
                     -1.94388197771225540E-33, 2.83406792877283164E-50,
                      1.36617856001305524E-66,-6.24708794138598536E-83,
                      1.76722288872753994E-99, 4.01135210160478946E-117,
                     -7.84106012976078174E-134, 9.48509467265808201E-151,
                      5.14858788844560757E-167, 1.89897824454872814E-183,
                     -1.12473578885801048E-199,-1.14463136958950538E-215,
                     -1.50184987863400673E-232, 5.67943578360000764E-249);
  cos_t136 : constant hexa_double
           := create( 9.12962190428398213E-01,-4.79325052280394689E-17,
                     -1.77535518894286383E-33, 4.06077829038681596E-51,
                     -1.19218090888976604E-67, 7.34235365808370103E-84,
                     -4.55753775880261135E-100,-1.24301716589214678E-116,
                     -2.11444315783382807E-133,-1.03019415724336695E-149,
                      5.47827100571016988E-166, 3.94886796699096356E-185,
                     -8.33669209406850406E-202,-7.15415546264718231E-219,
                     -5.08175552050928611E-235,-3.52648885759691810E-252);
  cos_t137 : constant hexa_double
           := create( 9.11706032005429878E-01,-2.69132731750341301E-17,
                     -5.19281019161625276E-35, 1.13381759360906298E-51,
                      6.57931209831338710E-68,-3.38062832397093344E-84,
                     -5.68095864663377634E-101, 3.06965993165979683E-118,
                     -1.16660435819976635E-134, 1.02268937203075222E-150,
                      4.86685699981402823E-167,-3.47710803312137880E-184,
                      2.49510609690430335E-200,-4.29365547068813124E-217,
                      1.40698627998387234E-233, 1.00057596852294993E-249);
  cos_t138 : constant hexa_double
           := create( 9.10441292258067247E-01,-5.04330416733138196E-17,
                      1.09387462574043045E-33, 9.53782720841707308E-51,
                     -4.79587246974103756E-67, 2.74335939397916893E-83,
                      3.43640814825976249E-100, 1.93635703801525373E-116,
                     -4.15144173575806797E-133, 2.73046451297945128E-149,
                      8.55736042383308892E-166, 3.07777554558250484E-182,
                     -1.20936042884981804E-198, 7.12430483338200601E-215,
                     -4.65471493956210019E-231, 7.49218610082088415E-248);
  cos_t139 : constant hexa_double
           := create( 9.09167983090522380E-01,-3.68785640913598945E-18,
                      2.99513303105076927E-34,-1.22256661369199255E-50,
                     -8.30747552639331380E-67, 4.35558969147325212E-84,
                     -4.18323179208477636E-100,-4.61697468250600271E-117,
                     -2.52382196352720403E-133, 8.66213023260675019E-150,
                     -2.21307351886198004E-166, 1.11454783760311004E-182,
                     -5.41013496413880444E-199, 3.36035121161132051E-215,
                     -1.93882029116298216E-231,-1.39632007610310798E-247);
  cos_t140 : constant hexa_double
           := create( 9.07886116487666262E-01,-4.94599643012258396E-17,
                     -1.65996827070753131E-33,-5.19252027126347157E-50,
                      2.44502604582037370E-66,-2.49025671686227720E-82,
                      1.02605003572779146E-98,-2.19500622166559831E-115,
                      9.88812809144647083E-132, 1.90976567510675903E-148,
                     -1.16204739848527543E-164, 5.35973773996379878E-181,
                      1.72837008636097543E-197, 1.43995125839503774E-213,
                      7.30084994245923791E-230,-2.07394940362986419E-246);
  cos_t141 : constant hexa_double
           := create( 9.06595704514915335E-01, 3.05067189554420234E-17,
                     -1.44788365571412037E-33, 1.89063737844487253E-50,
                     -3.68113553769296829E-67, 1.69521389347304407E-83,
                      1.70862682708653291E-99,-9.67120115591583006E-116,
                      4.15937458152607999E-133,-6.74516649759544462E-150,
                      1.72404931580971079E-166,-6.72751256811771630E-183,
                      3.87030612179686891E-199, 1.32206562357015125E-215,
                     -3.34609075527691106E-232,-1.37223249239687379E-248);
  cos_t142 : constant hexa_double
           := create( 9.05296759318118816E-01,-4.11530998268899011E-17,
                      2.98593687051842233E-33, 5.11452939174392112E-50,
                      4.42169060075559365E-66, 1.54752415043817613E-82,
                      9.62040222624798796E-99,-6.19453688724480299E-115,
                     -1.00559046987946611E-131,-6.18731553720607173E-148,
                      7.69453840172043279E-165, 1.42252245347623936E-181,
                      5.17426744772008302E-198,-3.51869592294642718E-214,
                      1.02720535604117922E-230, 4.11250768471450669E-247);
  cos_t143 : constant hexa_double
           := create( 9.03989293123443338E-01,-6.60975446874843085E-18,
                      1.27280130346803566E-34,-4.30260972340148227E-51,
                     -3.13816322520577034E-69, 3.68437472738792958E-86,
                      3.02492240548272987E-102,-1.08966512339559140E-118,
                     -7.08054699031448812E-135,-1.74103682721155005E-151,
                     -1.17974909484856198E-167, 6.49673906036205518E-184,
                      7.83699403826353912E-201, 9.03777228498628315E-218,
                     -4.81182913021819985E-234, 2.34787198443278783E-250);
  cos_t144 : constant hexa_double
           := create( 9.02673318237258826E-01,-1.92507870339614830E-17,
                      1.32421289932445272E-33,-5.29710306887036647E-50,
                      1.54789540534235651E-66, 7.54657066585132303E-83,
                      5.33555996595478614E-99,-3.75357027596638990E-117,
                      2.79575661419467211E-133,-1.80543924405381908E-149,
                     -5.43426204737793947E-166,-5.17786567545201046E-182,
                     -1.42854671617693159E-198, 9.27541707944560714E-215,
                     -1.16365963585675832E-231,-5.68672984347907053E-248);
  cos_t145 : constant hexa_double
           := create( 9.01348847046022028E-01,-1.35247893676986820E-17,
                      6.36053531158800906E-34, 3.62274006545738278E-50,
                     -1.66997184383873454E-67, 1.44483354167472010E-83,
                     -2.94194529894533352E-100,-2.28531935255889977E-116,
                      9.09744020477951361E-133,-6.13196644746266357E-150,
                     -1.42190439473555971E-166,-5.34240639655216206E-183,
                     -2.14757758637384851E-199,-1.26561751245526993E-215,
                      1.15203189514868488E-231, 4.61825022986180644E-248);
  cos_t146 : constant hexa_double
           := create( 9.00015892016160279E-01,-5.06396180508022727E-17,
                      1.07835253840315763E-33, 2.81300163265151114E-50,
                     -1.59414118363857990E-66, 3.00173555796078788E-84,
                     -5.27467677803455111E-101, 2.40557423410227474E-117,
                      1.70583769621009541E-133, 3.87524596783398844E-150,
                     -2.48349586594780079E-167, 1.83853275826498859E-183,
                     -1.60820165442592708E-200, 1.29616585089304106E-216,
                     -2.19903678778838820E-233,-5.05201344532114640E-250);
  cos_t147 : constant hexa_double
           := create( 8.98674465693953817E-01, 2.63169064610330135E-17,
                      3.70031370477968400E-35,-2.34477199004659381E-51,
                      7.43800282401806768E-68,-3.78898833916026033E-84,
                      2.23786471472600773E-100,-1.24876106813507631E-116,
                      2.75222470339548071E-133, 3.43283203636378812E-150,
                      1.89160406778157860E-166,-8.55371960113260485E-183,
                     -8.83123797737549248E-201, 5.74554563834492860E-217,
                     -1.66251518161215891E-233,-8.04301357387483808E-250);
  cos_t148 : constant hexa_double
           := create( 8.97324580705418318E-01,-3.63962833148672899E-17,
                     -2.36116498954748151E-33, 1.18372470479000824E-49,
                      2.36718765690566237E-66, 4.90824468118734516E-83,
                     -2.91626266939918703E-99,-1.19639288998458225E-115,
                      1.00953224929144150E-131,-4.09607714777652299E-148,
                     -1.99204958788813233E-165,-6.16613638965960789E-182,
                     -5.50174378933694922E-198, 1.26209541198611918E-214,
                     -5.85702882362141429E-231, 1.82373727911789043E-247);
  cos_t149 : constant hexa_double
           := create( 8.95966249756185107E-01, 4.90250991148118131E-17,
                     -1.94404898147953256E-33,-1.70704866677670326E-49,
                     -6.43085393921242098E-66, 1.36219297588791205E-82,
                      1.04564860732068228E-98, 4.15930978879588229E-115,
                      2.02214671492643177E-131,-7.47367471552835158E-148,
                      4.17660382660407733E-165,-1.61917624401551703E-181,
                      1.12772118862403049E-197, 4.48161084602032485E-214,
                      1.96451386436091371E-230,-2.24380781332302574E-247);
  cos_t150 : constant hexa_double
           := create( 8.94599485631382696E-01,-1.75162263968149192E-17,
                     -1.32006700472469226E-33,-1.59530098843246948E-50,
                      9.56135529357425679E-67,-2.51680348975634531E-84,
                     -1.49070740490683001E-100,-1.12356218117560415E-117,
                      1.45432651223736304E-134,-2.74557676978802495E-151,
                     -9.37399676707491649E-168, 7.36124654832320355E-184,
                     -1.81626198080700744E-200, 4.55341885487470861E-217,
                      2.76427324537767502E-233, 1.35444468054525326E-249);
  cos_t151 : constant hexa_double
           := create( 8.93224301195515324E-01,-4.11612391519089127E-18,
                      2.53802538057159990E-34, 4.28494555105161925E-51,
                      1.25260781969256085E-67,-6.27106178643637808E-85,
                      4.20635626812736010E-101, 3.99267357753090098E-118,
                      2.07742940633289198E-134, 6.35003499235566451E-151,
                      5.54033028368346452E-167,-1.22392762359514218E-183,
                     -5.32593023427712581E-200,-3.79568367759027700E-216,
                      1.38963904109685278E-233,-4.54185486986834639E-250);
  cos_t152 : constant hexa_double
           := create( 8.91840709392342723E-01, 4.66902281371245465E-18,
                      1.61502542868419821E-34,-3.96174488207250116E-51,
                      2.92506421225298359E-67, 3.03939365711243743E-84,
                      6.70823039866983636E-101,-6.23245824304293348E-117,
                     -2.62460243196478322E-133, 2.81819493535904281E-150,
                      6.14875390288481136E-167,-5.11695174614945708E-184,
                      3.37436638166304878E-200, 1.13823777133146267E-216,
                      1.76006067992817069E-234,-1.14688675016052661E-251);
  cos_t153 : constant hexa_double
           := create( 8.90448723244757878E-01, 1.17819314590518032E-17,
                     -1.33461422095719299E-34,-9.49823735307334314E-51,
                      3.87268252626796267E-67, 2.99662128219363086E-83,
                     -1.09907227994864728E-99, 4.58120531473482302E-116,
                     -1.05439041045487239E-133,-7.59338566784382356E-150,
                     -1.91855393269263516E-166,-1.18675196616344991E-182,
                      6.14396923702224654E-199,-9.70945858121165846E-216,
                      1.64064887773232725E-233,-1.37293521559487296E-250);
  cos_t154 : constant hexa_double
           := create( 8.89048355854664574E-01,-1.11645149667666750E-17,
                     -3.47976361077987357E-34,-1.56050799970406315E-50,
                     -1.07184758158533505E-67, 6.26045919082496246E-85,
                      1.32746736678679254E-101, 3.54512774037962057E-118,
                      1.03921055890636162E-134,-3.76831282482906650E-151,
                      6.09398790169121188E-168,-1.81439779675826290E-184,
                     -8.97620807552914087E-201, 7.11120253645883623E-217,
                      2.51003970659150095E-233,-4.45600628241212997E-250);
  cos_t155 : constant hexa_double
           := create( 8.87639620402853935E-01, 1.28050919185879605E-17,
                      3.99487420595844644E-35,-1.45145778765057735E-51,
                     -2.02973120139504795E-68,-2.40935325013997952E-85,
                      8.26360871779154612E-102, 1.80624444278659178E-118,
                     -4.81010609092327002E-136,-4.88746828095277578E-153,
                     -1.74010612583851957E-169,-9.74187369362800458E-186,
                     -1.26531411098059016E-202, 2.31595288859918895E-219,
                     -5.96452965702155490E-236, 2.87346268114894677E-252);
  cos_t156 : constant hexa_double
           := create( 8.86222530148880638E-01,-6.73073696002743145E-18,
                      1.23855934329174132E-34, 2.03640147591333204E-51,
                     -1.28817816294531839E-68,-9.94530821378804471E-85,
                      2.68224157902936971E-101,-1.31593959234570326E-117,
                      5.89723864618632650E-134,-1.18081298792846674E-150,
                      6.15711783739080282E-167,-8.97575398113875130E-184,
                      1.85058730306916297E-200, 2.70382700659667904E-217,
                     -8.53080508116807065E-234,-1.14776910204024633E-250);
  cos_t157 : constant hexa_double
           := create( 8.84797098430937790E-01,-9.43314696289726900E-18,
                     -5.71065414787014390E-34, 1.82601341119073970E-50,
                      6.90310493823286941E-67, 3.10303140437974252E-83,
                      6.15411222260062330E-100,-4.46600199860445290E-116,
                      1.23931534382110074E-132,-5.83018516355810423E-149,
                      1.53653673764393549E-165,-1.55704648598734342E-183,
                      5.79582327339194618E-200,-5.08444874854590218E-216,
                     -2.28709862920357742E-232, 7.14717439294141228E-249);
  cos_t158 : constant hexa_double
           := create( 8.83363338665731579E-01, 1.58226433802551274E-17,
                     -7.89213200075882501E-34,-1.47823210161798355E-50,
                      1.06126860704844144E-66, 6.28063470985803973E-83,
                     -7.86329224780793988E-100, 1.59246594473099978E-116,
                     -1.01096856972828965E-132, 2.42599236821818165E-149,
                     -3.50176465055774012E-166, 2.87328705728598382E-182,
                      5.40044067550355062E-200,-1.60127321392927910E-217,
                      2.16298463714093886E-234,-5.69850945660053595E-251);
  cos_t159 : constant hexa_double
           := create( 8.81921264348355050E-01,-1.98432484058905621E-17,
                     -7.04121140076738337E-34,-1.06367701693891040E-50,
                     -3.71942427921525743E-67,-1.43513301946188705E-83,
                      1.09129200800172888E-100, 4.51208157504180717E-117,
                      1.89026420866252396E-133,-8.75023340135394715E-150,
                      4.39721972798726475E-167,-2.10561524071058926E-183,
                     -1.69838044463189360E-199,-2.79562864282293368E-216,
                     -3.31921828476221770E-234,-3.90302741723310544E-251);
  cos_t160 : constant hexa_double
           := create( 8.80470889052160755E-01, 1.63110966029963503E-17,
                     -5.75413605947241719E-34,-4.01286118621700210E-50,
                      5.18486151133952877E-67, 5.33949721574292825E-84,
                      1.09810944827955464E-100, 2.11634291184424819E-117,
                     -3.24128590896855103E-135, 2.18166010974148290E-151,
                      9.98861549942197154E-169,-2.68989256713560901E-186,
                      1.88610054565568530E-202,-9.56719863032930661E-219,
                      4.61145540952091257E-235,-3.39686340942722282E-252);
  cos_t161 : constant hexa_double
           := create( 8.79012226428633525E-01,-4.73568372911180108E-17,
                      1.43887712979751925E-33,-2.90855543044791338E-50,
                     -2.07923337025886643E-66,-1.06401405709765915E-82,
                      1.08225061245609177E-99, 1.25858212647241052E-116,
                      6.08739192955826980E-134, 3.58990928137914490E-150,
                     -2.13671020709168709E-166,-1.12645539791317574E-182,
                      6.74205817717085967E-199, 1.56030129621154576E-215,
                      2.48492505157084665E-232,-1.28878490127483301E-248);
  cos_t162 : constant hexa_double
           := create( 8.77545290207261242E-01, 5.01133118464995501E-17,
                      2.83827690087395427E-34, 1.55506403931641403E-50,
                     -2.38305207285345852E-67,-7.10208977806837156E-84,
                     -2.56820620008990001E-100,-1.46963774505636116E-116,
                     -5.98311466119479223E-133, 2.21136258216042038E-149,
                     -4.55690469732884469E-166, 8.69298300414989476E-183,
                      4.54780973631514650E-199, 6.23604789249200497E-216,
                      2.81403720882431545E-233,-4.19064649707433761E-250);
  cos_t163 : constant hexa_double
           := create( 8.76070094195406601E-01, 5.87290242351476768E-18,
                      2.79411443917384576E-34,-1.85360738465098282E-50,
                     -2.13205724534811585E-67,-1.49173050008941418E-83,
                     -9.05880020501538453E-100, 9.53798882263581157E-117,
                     -2.40562986107106344E-133,-8.37023508448733740E-151,
                      2.48044706544049112E-167,-6.70800639072793141E-184,
                     -6.50946584131016078E-202,-8.68998519700554512E-219,
                     -4.55923907717564830E-235, 3.19103584955129967E-251);
  cos_t164 : constant hexa_double
           := create( 8.74586652278176113E-01,-5.72166177303970651E-19,
                     -2.97058115036895959E-35, 8.73895939697967523E-52,
                      4.13155974958278277E-68,-5.85628965707227393E-85,
                      4.44925347421914587E-101,-2.70603793742448176E-117,
                      1.49044925480699415E-133,-3.38137351158258501E-150,
                     -1.04208984135916337E-166, 2.11262559574515890E-183,
                     -1.80929440705754207E-199, 8.44778852984156046E-216,
                     -1.16265000903530752E-232, 5.38732434669965435E-249);
  cos_t165 : constant hexa_double
           := create( 8.73094978418290091E-01, 7.84246729901299026E-18,
                     -4.86850158397971649E-34,-2.28155705874775273E-50,
                     -1.30529312774659988E-66,-1.37836697330166865E-83,
                      6.94443008987875970E-100, 2.72704916954505765E-116,
                     -1.57869293930550087E-132,-1.34654918785897566E-148,
                     -6.66224728196325183E-165, 2.16196227305573903E-181,
                      3.11982609723812915E-198, 5.24632287001732759E-215,
                      8.78707420128894251E-232,-5.72564435433940073E-248);
  cos_t166 : constant hexa_double
           := create( 8.71595086655951090E-01,-5.52729980385510496E-17,
                     -2.21040902049849069E-33,-9.77497631876431909E-50,
                      7.60450749280500932E-66, 2.17416830794539454E-82,
                      9.65224708408154429E-99,-2.15051141127342394E-115,
                     -1.02234645188318280E-131, 1.11270987042913510E-148,
                     -3.06169514456381771E-165,-5.85318267343104140E-182,
                      1.02243535891697326E-198, 4.10733776955034701E-215,
                      1.02511218369182739E-232,-2.91995271416450618E-249);
  cos_t167 : constant hexa_double
           := create( 8.70086991108711461E-01,-4.18885108685499682E-17,
                      7.09001858618784148E-34, 3.76002511151572602E-50,
                      1.59845586416776705E-66,-6.55752179908687736E-83,
                      1.53088887074347386E-99,-6.26017198352983389E-116,
                      4.68321634810150401E-132, 2.64514565056667846E-148,
                      4.71355661899609815E-165, 3.43213987888954769E-181,
                     -2.63864010224251458E-197,-1.08164076125121634E-213,
                      7.50602654134780708E-230, 3.46442303207477088E-246);
  cos_t168 : constant hexa_double
           := create( 8.68570705971340895E-01, 2.71927816897829032E-19,
                     -1.67101403969324282E-35,-1.26255147346379688E-51,
                     -5.98654226661371267E-68,-1.50955507390121791E-84,
                     -2.59103317009717227E-101, 1.22697484212396339E-117,
                      5.35107555356786650E-134, 2.15003286428023704E-150,
                      9.43523519754927552E-167, 6.85795068990775832E-183,
                     -2.38571798408533649E-199, 2.22740191198899777E-215,
                      8.01086684146450937E-232, 2.49288245574638797E-248);
  cos_t169 : constant hexa_double
           := create( 8.67046245515692648E-01, 3.02678595509305667E-18,
                     -1.15594387821715718E-34,-5.35805563978080119E-52,
                     -4.28506058754367816E-69,-2.08467770100785323E-85,
                      8.89424881347040456E-102,-6.14206564148871148E-118,
                      1.18303636062475094E-134,-6.32419478896086374E-151,
                      5.87733423709569013E-167,-1.28304328550770453E-183,
                      1.24348291205379648E-200,-8.12693971084711061E-218,
                      2.22962811593079563E-234, 1.16453977727611196E-250);
  cos_t170 : constant hexa_double
           := create( 8.65513624090569089E-01,-6.37231135496288988E-18,
                      2.37255203217468325E-34, 1.59118803483951749E-50,
                      9.07552778100558198E-67,-5.44533838768258701E-84,
                      1.29883075832665651E-100, 1.07717916442005427E-116,
                      2.68441656810298216E-133, 1.19102357006051628E-149,
                     -2.45394356435637200E-166,-1.09507114112284887E-183,
                     -5.21990010352819563E-202,-2.14445704879110498E-218,
                     -8.93162765470944178E-235,-1.16643637930510385E-251);
  cos_t171 : constant hexa_double
           := create( 8.63972856121586696E-01, 4.14863559573616071E-17,
                      2.27099769322102664E-33,-8.12283856594799842E-50,
                     -3.76029505994081227E-66,-8.26358050616788289E-83,
                     -7.14825421516855036E-99, 2.38295041726871053E-115,
                      1.52948292009521519E-132,-6.69636856034666257E-149,
                     -4.05375222430316879E-165, 1.60150796994500948E-181,
                      1.16754780986358105E-197,-1.79215579930849580E-214,
                     -9.24984275281615437E-231, 1.59028539524266625E-247);
  cos_t172 : constant hexa_double
           := create( 8.62423956111040502E-01, 3.70089925273831299E-17,
                      5.21284115427015728E-34, 2.69456000810268615E-50,
                     -2.77241410008718926E-67,-8.87692199390093526E-84,
                     -8.86121097456247394E-100,-4.77766867578843616E-116,
                      3.48040509017828375E-133, 5.67304730859981891E-150,
                     -4.55081063487792363E-166,-1.87958938938123373E-182,
                      6.63521433112280774E-199,-6.86835817380605400E-216,
                      5.38347419962352666E-232, 2.37230669187997509E-248);
  cos_t173 : constant hexa_double
           := create( 8.60866938637767309E-01,-3.00500488985736562E-17,
                     -8.87061830908921111E-34, 1.50053205580973008E-50,
                     -9.27953646128873950E-67, 3.96849153291894039E-83,
                      1.60329666370346146E-99,-3.60560408737110614E-116,
                      2.61598896281333857E-132, 4.18922304410350765E-149,
                     -3.44570177657187645E-165, 1.35390143389283986E-181,
                     -2.34664173683924172E-198,-1.55497716404602017E-214,
                     -4.75870865610222589E-231, 1.45747280863343256E-247);
  cos_t174 : constant hexa_double
           := create( 8.59301818357008362E-01, 4.24356558168506872E-17,
                      7.61818140599120249E-34,-3.95921278506587079E-50,
                      9.72622088830955615E-67,-1.77062992351235503E-85,
                      1.11706313469972439E-101,-3.51675909670601207E-118,
                      2.18174568596524868E-134, 1.20337333415599940E-150,
                     -4.67815397739577354E-167,-3.35461922483882277E-183,
                      2.32222749012974575E-201,-1.43668300479369532E-217,
                      1.72026250794117944E-234, 6.26969141804916839E-251);
  cos_t175 : constant hexa_double
           := create( 8.57728610000272118E-01,-4.81834479363366201E-17,
                     -1.10441305176875334E-33, 8.36567080012549594E-50,
                      2.10780578646816070E-66, 4.52933101817810101E-83,
                     -6.72264346600263696E-100,-2.01493744763302878E-116,
                     -1.01676213781073593E-132, 4.78634502120187988E-149,
                     -1.31860629055096924E-165, 8.37545265132952951E-182,
                      6.68085480085496000E-198, 6.53769850509497808E-216,
                      5.80506667076763854E-232,-8.49303624661583281E-249);
  cos_t176 : constant hexa_double
           := create( 8.56147328375194472E-01, 9.18069256166062606E-18,
                      5.63286497859514699E-34, 2.33266461132173782E-51,
                      1.20279635197638733E-67, 2.20702248018362072E-84,
                     -7.47277371892129419E-101,-5.17221625097663478E-117,
                     -2.00004056888143559E-133,-7.44680627632644417E-150,
                     -2.00469703763755220E-166, 2.80591430249428387E-183,
                      8.43083277976795785E-200,-4.25282421960437338E-216,
                     -2.07686668694215066E-232, 1.68835585843055828E-248);
  cos_t177 : constant hexa_double
           := create( 8.54557988365400534E-01,-1.29911242363960916E-17,
                      1.28934077229480803E-34,-3.65069257475830527E-52,
                      1.29156216501808980E-68,-7.40461585629889932E-85,
                     -5.46350759368241801E-101,-2.10005744207930166E-117,
                     -1.57166457262588191E-133, 7.35125441961705692E-150,
                      3.98240271802772430E-166, 2.72745892944265760E-182,
                     -9.18508294835371962E-199, 8.56878169507166683E-215,
                     -4.56004068908404183E-231, 5.49483905792077380E-248);
  cos_t178 : constant hexa_double
           := create( 8.52960604930363631E-01, 2.71529842519813696E-17,
                      7.43364832831207193E-34, 4.21624176223506684E-50,
                     -3.99971106716386046E-67, 1.14048495105206873E-83,
                      1.01446380644951989E-101, 7.21424017847209023E-118,
                      2.11179153166723961E-135, 1.41487067185209752E-151,
                     -7.85936027928817340E-168,-4.08940455048075342E-184,
                     -1.26744180131480885E-200,-4.11162678239629880E-218,
                     -1.32547900797826424E-234,-4.21372393302861769E-251);
  cos_t179 : constant hexa_double
           := create( 8.51355193105265196E-01,-5.32798744460162087E-17,
                      2.22811563809199417E-33,-4.02818864041384766E-50,
                     -2.32974514667335517E-66,-9.54969389325849038E-83,
                     -6.70760407438132036E-100, 4.90970048913518058E-116,
                     -6.52180497395669402E-133, 2.52487036891690665E-149,
                     -5.39942872291562489E-166, 2.34801539128544103E-182,
                      1.57113929858708978E-199, 8.30202540605505857E-216,
                     -3.86413493724056570E-233,-7.76161312178346422E-250);
  cos_t180 : constant hexa_double
           := create( 8.49741768000852438E-01, 5.18123476599740155E-17,
                      3.08106260873312754E-33,-2.59313082019949651E-50,
                     -1.48769511923567653E-66, 1.29481628770209766E-83,
                     -2.85836681246348824E-100, 8.22589342191472184E-117,
                      3.94277609915110672E-133, 1.36176233249604646E-149,
                      4.36358154289038816E-166, 1.10771151490154992E-182,
                     -3.59416387187004899E-199,-8.25074672043737493E-216,
                      7.11335654976184988E-233, 3.77749402747292178E-250);
  cos_t181 : constant hexa_double
           := create( 8.48120344803297233E-01, 1.87625634152399810E-17,
                      1.40487733079196167E-33,-2.49152215099586914E-50,
                     -3.10879601359248259E-67,-6.28058823920548878E-84,
                     -1.27952757695492605E-100,-3.96326673293678578E-117,
                      1.92957088908888352E-133, 1.45273105033231475E-149,
                     -1.08097764454021716E-165,-4.63538036486504084E-182,
                      2.92807033615213657E-198,-1.33753228157588832E-214,
                      6.72539184244426529E-231, 3.12862377619310130E-247);
  cos_t182 : constant hexa_double
           := create( 8.46490938774052126E-01,-4.79694199585693451E-17,
                     -2.75182670978867026E-33,-7.35189597273133496E-50,
                     -1.79992545378431456E-66,-8.07549509177087165E-83,
                     -6.75692565312063963E-99, 3.69407563872155989E-115,
                      9.76521765506347593E-132,-4.66334172465042687E-148,
                      1.59231978388824049E-164,-6.47306099599902068E-181,
                     -3.23866104730998135E-198,-2.76534656531270540E-215,
                     -7.69765339901471488E-232,-4.46246430981728592E-248);
  cos_t183 : constant hexa_double
           := create( 8.44853565249707117E-01,-4.36313602968796371E-17,
                     -2.03077268533675470E-33, 4.30972298198517614E-50,
                     -2.94316743336060953E-66, 2.08364884809147169E-82,
                      3.89194394324208042E-99,-1.34383529796321358E-115,
                     -3.97060356852485471E-132, 1.94320812687411497E-148,
                      1.41773378883521107E-164,-8.42863512763263814E-181,
                     -2.53117025276783781E-197, 3.08037794852816313E-214,
                     -5.82859163828371353E-231, 2.87070715448365476E-247);
  cos_t184 : constant hexa_double
           := create( 8.43208239641845436E-01, 9.65367070059590768E-19,
                      2.89951424315563637E-36, 9.67150768114802837E-53,
                      1.40225208152153184E-69, 1.39009498829323027E-86,
                     -5.18183413117357503E-105, 2.60545478032205367E-121,
                     -1.61913069785761888E-137, 8.86197647393118689E-154,
                     -4.81887521123360624E-170, 4.46493070309891686E-188,
                     -9.25266783549961432E-205,-5.86878305870647047E-221,
                     -5.91626603981896847E-238, 2.64378564080883012E-254);
  cos_t185 : constant hexa_double
           := create( 8.41554977436898444E-01,-3.40954653913215567E-17,
                     -8.41302086075795948E-34,-4.94472839605686856E-50,
                      4.19142603088527515E-66, 1.15117232095336389E-82,
                      7.01650063703618002E-99, 1.45545069953295861E-115,
                     -5.10979365167556671E-132, 6.92555479427433673E-149,
                     -8.29149353795826332E-166,-2.04547028082983402E-182,
                     -2.26632930412838685E-199,-2.09990670926272136E-215,
                      1.00927015566375789E-231, 5.45634763474341622E-248);
  cos_t186 : constant hexa_double
           := create( 8.39893794195999521E-01,-1.66736948815114113E-17,
                     -1.47591841417502893E-33,-7.57950981619140581E-50,
                      4.49995646997760470E-66, 2.50140986439293233E-83,
                     -7.35614162110444218E-100, 3.58971486738000141E-116,
                      2.20373749701463363E-132, 3.03929174047903349E-149,
                      3.03189663647893330E-166, 1.78732654527802864E-182,
                      1.04402485619688326E-198,-5.08067867566692738E-215,
                      5.15123134200645522E-231,-2.30373130994635122E-248);
  cos_t187 : constant hexa_double
           := create( 8.38224705554838079E-01,-3.55600850528550261E-17,
                      1.16897915770226427E-33,-5.86273473597234114E-50,
                      4.06735227318414874E-66, 2.52619828812764647E-82,
                     -7.73362195345344032E-99,-2.50688542276844309E-115,
                      3.06189725601317968E-132,-5.69648287144527722E-149,
                      3.56763264557474839E-165,-1.93802905268182169E-181,
                      3.35891175365768622E-198, 9.17340158652129703E-215,
                     -4.08038870611577448E-231,-2.81430990285243012E-247);
  cos_t188 : constant hexa_double
           := create( 8.36547727223512005E-01,-2.08990590270665325E-17,
                     -9.81040978210025854E-35,-3.16091778682298533E-51,
                     -9.63876215166712618E-68, 1.68028987100428272E-84,
                     -6.16764417741841199E-101,-2.94514807857070266E-117,
                      1.35732455746475228E-133, 2.00710883477937707E-150,
                      3.24567868358427999E-167,-1.66055988079621981E-185,
                      1.32749572019987753E-201,-3.37073019480193735E-218,
                      1.79457941466438452E-234,-2.02195897919781595E-251);
  cos_t189 : constant hexa_double
           := create( 8.34862874986380010E-01, 4.60484306091596574E-17,
                     -5.18274232652399122E-34,-7.05053434355041089E-51,
                      5.86894939706931855E-68, 1.16026618462615502E-84,
                     -8.34924136658410209E-101, 6.14208978790693918E-117,
                     -3.00350498539121899E-133, 5.05683231186827977E-150,
                      2.49249003954866957E-166,-1.41493990044992856E-182,
                      4.58950909926326010E-199,-2.11498804490061408E-216,
                     -2.62358452758739862E-233,-1.70793170416102528E-249);
  cos_t190 : constant hexa_double
           := create( 8.33170164701913185E-01, 1.32751295072297644E-18,
                      4.85891641153708626E-35, 4.54222813005068589E-51,
                      1.24684694920008172E-67,-5.06101801832919203E-84,
                      4.21277862781142705E-100,-2.04508804433076737E-116,
                     -1.13090842236792066E-132, 6.83418974956706653E-149,
                     -3.27855378932207761E-165,-2.33827732152066075E-181,
                     -2.70907639355767776E-199,-2.21576565293524494E-215,
                     -5.17646646171988455E-232,-9.87247039021214032E-249);
  cos_t191 : constant hexa_double
           := create( 8.31469612302545236E-01, 1.40738569847280239E-18,
                      4.69513153839808352E-35,-2.02338815193825685E-52,
                      1.80862190676516987E-68,-8.69192376109987748E-85,
                     -1.44946744968666399E-101, 5.37893425803780335E-118,
                      2.22059430697790368E-134,-1.18558573228750413E-150,
                     -6.50049065945835994E-168,-4.28397444115100653E-184,
                      1.92179479033448961E-200, 1.30768631953921187E-216,
                      1.37779058411586618E-233,-6.77669812114595071E-250);
  cos_t192 : constant hexa_double
           := create( 8.29761233794523045E-01,-2.93491093764855972E-18,
                      1.14969179341498182E-34, 3.51866655449802329E-51,
                      2.78556961490874403E-67,-1.44309352476996495E-83,
                     -3.16443712628995738E-100,-2.01192204485881835E-116,
                      1.15371073791154707E-132, 4.34229472051510773E-149,
                     -1.42171293322495420E-165, 3.38199162976126470E-182,
                      2.77895626086476551E-199, 7.79121373419166082E-216,
                     -3.07161630302162723E-232,-1.61608422724354129E-248);
  cos_t193 : constant hexa_double
           := create( 8.28045045257755796E-01,-4.41965932258715322E-17,
                      2.79678648552112514E-33, 1.00307772873935024E-49,
                      8.76178885992477621E-66, 3.13938859489836763E-82,
                     -9.00567528534413452E-99, 5.17081704082530844E-115,
                      2.11125477574755006E-131, 9.37506361258751635E-148,
                     -5.31475523725992770E-164, 3.78608878418227757E-180,
                     -3.15683555850654663E-198,-1.81743413248281659E-214,
                      3.09569330319486548E-231, 6.71137397943318511E-248);
  cos_t194 : constant hexa_double
           := create( 8.26321062845663534E-01,-5.39574854536129017E-17,
                      6.89768961301385503E-34, 3.81061642741991960E-50,
                      1.51587929364825242E-66, 2.35521198265514756E-84,
                      6.89191177879717867E-102,-3.12863928351092492E-118,
                      1.06641647431771638E-135,-6.75803525121466853E-152,
                     -2.22810111273595698E-168, 2.32295322652948801E-184,
                     -5.95578907548237965E-201,-6.11440700893141411E-218,
                     -1.87848502696258588E-234,-8.18109045947768255E-251);
  cos_t195 : constant hexa_double
           := create( 8.24589302785025291E-01,-2.65123604888682752E-17,
                      1.69169643509143861E-34, 6.76939748135626486E-51,
                      2.77282255592114680E-67,-6.33966117698259256E-84,
                      4.08492416157300688E-100, 5.85303709901462227E-117,
                      9.75615139923900058E-134, 1.58524246173496085E-150,
                     -6.66383632996130568E-167, 2.06010226761004725E-183,
                      3.80591681121582353E-201, 2.05165816676739970E-217,
                     -1.11933397156514397E-233, 7.97280168371369926E-250);
  cos_t196 : constant hexa_double
           := create( 8.22849781375826317E-01, 1.51930190345054947E-17,
                      9.68905472465216850E-34, 5.69945629236532643E-50,
                     -2.55485291460119648E-66,-1.76042948552635333E-82,
                     -1.47705996151342594E-99,-2.00820866203629458E-116,
                     -6.09303367415126173E-133, 2.59466768159625348E-149,
                     -8.32467442072720052E-166,-5.52580183881343932E-182,
                     -2.35114801880388846E-198,-8.47109817453389927E-215,
                     -5.15143518684005610E-231, 1.61528512094079910E-247);
  cos_t197 : constant hexa_double
           := create( 8.21102514991104648E-01, 3.07151316096976817E-17,
                     -1.70371683258558788E-33,-1.11498624432838531E-49,
                     -4.57918879704099086E-66, 1.63510950982401734E-82,
                     -6.65040898151770911E-99,-3.36406740024041633E-115,
                      2.01788257488877981E-131,-1.22234252696899597E-147,
                     -4.58959650399238300E-164,-7.88230730846268794E-181,
                      4.09010219856561202E-198, 7.49496830628933995E-215,
                     -3.55491174030829190E-231,-2.71257510028862862E-248);
  cos_t198 : constant hexa_double
           := create( 8.19347520076797009E-01,-4.82007369951911332E-17,
                     -1.55744896466727808E-35,-9.56478536145222163E-53,
                     -8.47815998866343963E-69, 6.79115283386241611E-86,
                     -3.18474277469231575E-102, 2.02263447604729452E-119,
                      7.05670980242809707E-137,-3.46288888557415472E-153,
                     -1.14061332987850370E-169, 4.41014281889847382E-186,
                     -1.25912425900195393E-202, 1.12735881259291581E-218,
                      4.40343293177815117E-235, 3.45756852475619239E-251);
  cos_t199 : constant hexa_double
           := create( 8.17584813151583711E-01,-1.48831498124267717E-17,
                     -7.82732627712989171E-34, 4.13321491610315945E-50,
                      2.26241333804064943E-66, 4.57210587403679514E-83,
                     -1.47787828750723035E-99, 8.34737895353133910E-116,
                     -3.33807811148799934E-132,-5.82805395533136864E-149,
                      1.06453975345512596E-165, 5.99071856648026170E-183,
                     -1.64038034021409071E-199,-5.55659485297489228E-216,
                     -1.04018152357046207E-232,-6.70482265632639988E-249);
  cos_t200 : constant hexa_double
           := create( 8.15814410806733781E-01, 8.26526937821308706E-18,
                     -2.30287781351794708E-34, 1.51020713872498429E-50,
                      1.11074359445313109E-66,-3.53516918783849070E-83,
                     -1.11422455273816773E-99,-3.08729922156241098E-117,
                      1.44370580583534005E-133,-7.07227938349914236E-150,
                     -4.04064987565944009E-166, 2.42557823400763626E-182,
                      1.30787048038272904E-198, 3.22822116444900138E-215,
                      9.18463899608764299E-232,-6.06986054465184498E-248);
  cos_t201 : constant hexa_double
           := create( 8.14036329705948414E-01,-5.21273518770426242E-17,
                     -1.90476706113163596E-33,-1.69372695859415089E-49,
                      7.33648318429306217E-66,-2.91201700450456406E-82,
                     -2.29623110643455198E-99, 9.38703371803024460E-116,
                     -3.96509407968391191E-132, 1.37236962941784901E-148,
                      4.03369521827730830E-165,-2.83869862416135039E-182,
                      4.23570927287296595E-199, 4.55917250456410301E-215,
                     -8.89858875717019300E-232, 3.18806784856782507E-248);
  cos_t202 : constant hexa_double
           := create( 8.12250586585203882E-01, 3.10545456092148025E-17,
                      2.26495419227072515E-34,-7.42216841546494051E-51,
                     -1.89983046279279691E-67,-7.63967592611586337E-84,
                     -1.90583599871037281E-100,-1.09375821503590715E-116,
                     -1.89694507029740990E-133, 1.72222525264004577E-149,
                     -1.31494739264281376E-166, 5.98185227784965725E-183,
                     -2.62591626544510157E-199,-1.05629547029599351E-215,
                      5.14568941244638168E-232,-2.05344065521609562E-248);
  cos_t203 : constant hexa_double
           := create( 8.10457198252594768E-01, 2.35203673498404990E-17,
                     -7.75300709048463408E-34,-7.27926163571971404E-50,
                      2.39892753940360295E-66,-1.39234436198979365E-82,
                     -7.38085246595720096E-99, 2.71706101226970742E-115,
                     -1.29230710214701826E-132,-3.56342707427609320E-150,
                      1.70730242361892733E-166,-1.25484365945604853E-182,
                      7.25985993955289269E-199,-3.32862476014681264E-215,
                      8.84747923264480028E-232, 5.76478842298415666E-248);
  cos_t204 : constant hexa_double
           := create( 8.08656181588174983E-01, 9.32515978797216739E-18,
                     -7.18233019330683940E-34, 2.39254408461321061E-50,
                      9.75100280469822160E-67, 2.87072101066184638E-83,
                      8.50269913792596222E-100,-3.11040045719388525E-116,
                      2.58571384210847084E-132, 1.37478226176888303E-148,
                      6.36133724860315614E-165,-4.13894911959333155E-181,
                      2.49146324781267569E-198,-9.01876461594426720E-215,
                     -2.82198669430504801E-231, 2.61297781193064134E-248);
  cos_t205 : constant hexa_double
           := create( 8.06847553543799223E-01, 4.92206037660955458E-17,
                      2.97960168999034868E-33, 1.52207542236157884E-49,
                     -8.20537240314446833E-66,-5.08801529400560496E-82,
                      2.19519574810594033E-98,-7.14998273967986694E-115,
                      2.19941929477914378E-131,-2.71390144546456880E-148,
                      9.12680103354298647E-165, 3.89694590295979726E-181,
                      1.87405637044476506E-197,-3.13902850209089784E-214,
                     -9.78162433933389007E-231, 1.10586306487843640E-247);
  cos_t206 : constant hexa_double
           := create( 8.05031331142963547E-01, 5.13682895682121485E-17,
                      6.30828074022565241E-34, 7.32776460851298267E-51,
                     -1.57429892135200407E-67,-1.57140477187390270E-83,
                      5.62586099970600174E-100, 1.40219819106494183E-116,
                     -8.79014777400048193E-133,-7.21164215710786527E-149,
                     -3.68266203297837842E-165, 1.44302413944091359E-181,
                      3.28508737794707250E-198,-3.40015290795711954E-215,
                     -6.77097765821673645E-232,-2.33858313704516961E-248);
  cos_t207 : constant hexa_double
           := create( 8.03207531480644943E-01,-3.30606098048149096E-17,
                     -1.22427262524204334E-33, 2.84136732686301168E-50,
                     -1.77472778752101069E-66,-8.08418180719305248E-83,
                      3.04868199060977942E-99, 1.34097321446384906E-115,
                      5.43194011144908073E-132, 1.44967403797247366E-148,
                      7.18581183425214574E-165,-2.80017664821513065E-181,
                      2.64911439083341760E-197, 2.59681647660180398E-214,
                      6.25256113256249660E-231, 4.41753198302707610E-247);
  cos_t208 : constant hexa_double
           := create( 8.01376171723140240E-01,-2.09580134134958343E-17,
                     -4.37981621980069310E-34, 2.02356904977525149E-50,
                      7.99206533569950952E-67, 6.10990634086046154E-83,
                      3.33879628818755324E-100,-2.44560556815854340E-116,
                     -7.70415209097586842E-134,-2.59505060025905431E-150,
                      3.91355907761794313E-168,-2.03621637095731943E-184,
                      1.39309378409175215E-201, 3.17449603500476815E-218,
                     -1.92041194506700125E-234,-1.05447681715783781E-250);
  cos_t209 : constant hexa_double
           := create( 7.99537269107905013E-01, 2.03567238220054308E-17,
                     -9.74485136968963603E-34, 5.36081095996960076E-52,
                      3.11416781644117344E-68, 8.01347482037836151E-85,
                     -1.60075613925974116E-101, 5.34952993625944697E-118,
                      9.31055374056788053E-135, 1.40359036510401571E-151,
                     -6.59110279658326405E-170, 3.13938362106841976E-186,
                     -1.15778982067930814E-202,-2.50023847079734589E-219,
                      7.59867296046393336E-236, 2.15346548381422509E-253);
  cos_t210 : constant hexa_double
           := create( 7.97690840943391155E-01,-4.67307598847889437E-17,
                      2.30758970771917571E-33, 3.16055677746402533E-51,
                      2.95606214041708767E-67,-1.07914915777331787E-83,
                      3.60103478627628118E-100,-1.15937918663442059E-116,
                     -3.23074764865728480E-133,-5.61717383646556315E-150,
                      1.11885022603252924E-166, 7.16187629627663599E-183,
                     -3.93438571633140864E-199, 5.13125325703255656E-216,
                     -2.45653778776566860E-232,-1.28209495678809599E-248);
  cos_t211 : constant hexa_double
           := create( 7.95836904608883566E-01,-3.00627248519107210E-17,
                     -2.24962108320422348E-33,-6.58817741171830403E-50,
                     -2.26750460140100101E-66,-7.83779841151105783E-83,
                     -3.58687602231499806E-99, 2.81146703510034567E-116,
                     -1.48732979871183557E-132,-3.16431735780585757E-149,
                     -1.63064950793596089E-165, 2.83054580668559575E-182,
                      1.45955047461558808E-198,-2.89864379209323424E-215,
                     -1.05340880038958462E-231, 3.04845253836161823E-248);
  cos_t212 : constant hexa_double
           := create( 7.93975477554337172E-01,-7.41946317599214165E-18,
                      2.41243413046310687E-34,-4.99568086162449721E-51,
                      1.59478184276499887E-67,-4.34516373214877536E-84,
                     -3.58342168702975843E-100, 1.21714044941247247E-116,
                      4.76344275664773309E-134,-4.85927426337427161E-150,
                     -1.90786676645765004E-166,-1.00154246819477925E-182,
                      3.42815186146475048E-199,-7.22881449473280141E-216,
                      2.96510809517402310E-232,-5.88326476500267159E-249);
  cos_t213 : constant hexa_double
           := create( 7.92106577300212389E-01,-3.70878502023264666E-17,
                     -1.48744572672282636E-33, 2.93230972891535051E-50,
                      5.44957337644476069E-67,-1.36782586341549824E-83,
                     -1.52140483965265471E-101,-9.96570920545965255E-118,
                     -2.00918942325709742E-134, 8.55830140781112419E-151,
                      5.97213477978359417E-167,-1.05732319088295629E-183,
                      1.56060405120020247E-200,-3.98881909828726988E-217,
                     -3.16550866682642925E-233, 1.20130458506919768E-249);
  cos_t214 : constant hexa_double
           := create( 7.90230221437310032E-01, 2.30569059549544919E-17,
                      1.44810805332601935E-33,-7.67252370572034879E-50,
                      1.15364173026066538E-67, 9.04606685951134895E-85,
                     -2.80446127907435379E-101, 1.02321738401556100E-117,
                      2.76662960125123771E-134, 2.26129484807591289E-150,
                      5.78781412350620976E-167,-3.51520491275986808E-183,
                      8.51339827672419209E-200, 8.26161293930332290E-217,
                     -4.47195582760661895E-233,-2.18942913565110000E-249);
  cos_t215 : constant hexa_double
           := create( 7.88346427626606228E-01, 3.43969931540597076E-17,
                      1.77106237467371704E-33, 1.70841590984174018E-49,
                      1.29989097232837413E-66, 4.80336976345926870E-84,
                      4.45987160141755700E-101, 1.83346199383946818E-117,
                      7.87945825328298498E-134, 2.69340221865462057E-150,
                      3.77877645760695898E-167, 1.54963204010871175E-183,
                     -4.88229260857763443E-200, 2.38211751789448743E-216,
                      2.51946722495161259E-233, 2.01910698130409233E-249);
  cos_t216 : constant hexa_double
           := create( 7.86455213599085767E-01,-9.78414299393052654E-18,
                      3.39060632724454723E-34, 5.72695053203825766E-51,
                     -5.59911540376708308E-67,-1.54042605807597777E-83,
                      7.50229619808078922E-100, 2.23797071884846207E-116,
                     -1.34949561604314839E-132, 5.99506272930287403E-149,
                      3.66013178258589189E-165,-5.56091070139246535E-182,
                      8.79059762527912132E-199, 6.32019633207553016E-215,
                      1.18480470258848977E-231, 6.34770786352853441E-248);
  cos_t217 : constant hexa_double
           := create( 7.84556597155575242E-01,-8.56279654231734757E-18,
                     -2.11068344590018491E-34,-1.68903221824696034E-50,
                      3.42873394313861129E-67, 1.11257203233140109E-83,
                      3.94934970011989446E-100, 3.28485113660475476E-117,
                     -1.12866157847990586E-133,-9.13160387680997232E-151,
                      5.82880716114354419E-167,-1.85147759171155454E-184,
                      1.23394595487302285E-200, 3.53592118767173361E-217,
                     -1.15309795581818546E-233, 1.06638321762491317E-249);
  cos_t218 : constant hexa_double
           := create( 7.82650596166575729E-01, 9.07458669758088248E-18,
                      6.76238474042786663E-34,-1.71732377319872710E-50,
                     -9.93684984725503518E-67, 3.17443463756980676E-83,
                     -1.50513001978939340E-99,-2.11077380435569501E-116,
                     -8.21021190656664524E-133,-3.58991386060666845E-149,
                      3.81287941690692136E-166,-2.05197105231908454E-182,
                     -1.58665855677359584E-198, 4.77319655445225146E-215,
                     -2.02684642194453459E-231,-1.84244044961782870E-248);
  cos_t219 : constant hexa_double
           := create( 7.80737228572094488E-01,-9.91987820666788060E-18,
                     -2.12657940121627152E-36, 3.07721655989576468E-54,
                      1.80158482793033295E-70,-1.34669007254800522E-86,
                      7.80694206355215236E-103, 4.95134439641453292E-119,
                     -3.02390691894866006E-136,-7.95210247951452602E-153,
                     -2.24928472283210195E-169,-1.22465036066079389E-185,
                     -6.46632863496154953E-202, 5.91852714342659215E-219,
                     -1.71804533852579215E-235, 4.41601679238762126E-252);
  cos_t220 : constant hexa_double
           := create( 7.78816512381475978E-01,-2.48913855799738065E-17,
                      6.76654970248079802E-35,-6.52185942817013320E-52,
                      1.58969924388680187E-69, 6.51853256499713246E-86,
                      6.58973835507586416E-102, 2.92696066902391406E-118,
                     -1.10872706837361291E-134, 5.84149696407272135E-151,
                      1.86719345600300612E-167,-1.30176654875044356E-183,
                      7.39801906003919900E-200,-1.70715032279926703E-217,
                      4.61032212497734753E-234, 6.44212190713131790E-251);
  cos_t221 : constant hexa_double
           := create( 7.76888465673232442E-01, 7.74186025706728636E-18,
                     -5.99865178721578973E-34, 3.05665482329589716E-50,
                     -2.12151636991502970E-66,-2.28800022085562485E-83,
                      5.73272126517782747E-102, 1.79971793772880788E-118,
                      5.88317634486025619E-135, 3.68573165457711569E-151,
                      1.10153416751809167E-167, 9.22294711276708011E-184,
                     -4.35556427126444156E-200,-8.52518740121529771E-217,
                      6.34132276369724390E-233, 2.50530170059845742E-249);
  cos_t222 : constant hexa_double
           := create( 7.74953106594873931E-01,-5.22090831898264327E-17,
                     -9.66535933936866120E-34, 3.70277500765625693E-50,
                     -2.32003665023097361E-66,-9.43873230178152217E-83,
                     -6.24058604140948038E-100, 2.11505546980347515E-116,
                      5.77871897406133399E-133,-2.77897018072535694E-149,
                      1.26510680575576258E-165,-1.79504062655990381E-182,
                      5.58213785591821064E-199, 5.87083640639521323E-216,
                     -1.02932213025089701E-232, 1.39445910321637042E-249);
  cos_t223 : constant hexa_double
           := create( 7.73010453362736993E-01,-3.25659070336497723E-17,
                      1.38608072515239293E-33,-3.99713299175860216E-50,
                     -5.87184241638023931E-67, 2.90836779315596850E-84,
                     -1.18751113655406475E-100,-4.31542979610777401E-117,
                      1.78080669832515144E-134, 1.40087463162124237E-151,
                     -5.64600051397966941E-168, 4.43407152869934790E-185,
                      2.96224324558206087E-201, 1.28679287559537938E-217,
                      6.58620774935075149E-234,-7.37299787674397829E-252);
  cos_t224 : constant hexa_double
           := create( 7.71060524261813818E-01,-4.45584423477692650E-17,
                     -2.98635656140837829E-33,-6.87952620835962359E-50,
                     -2.79058077850289113E-66,-3.00471395073884376E-83,
                      7.64461639901323789E-101, 1.31350710903665172E-117,
                     -7.68717000759500802E-134,-4.20246317428233460E-150,
                      8.58707002969167328E-167, 6.11325420838665372E-183,
                     -1.38197629494321817E-200,-2.55727423728280845E-217,
                     -1.07736149060381567E-233,-6.03150137889880135E-250);
  cos_t225 : constant hexa_double
           := create( 7.69103337645579588E-01, 5.15464551845648167E-17,
                      2.61428295535242917E-33,-1.61990236327732983E-49,
                      8.23753465067406557E-66,-4.81932572971675509E-82,
                      1.85356119378349438E-98,-1.41099731146406473E-114,
                      6.36422630461697826E-131,-4.67228993257841506E-147,
                     -8.12663703395258605E-164,-3.41596917267535806E-180,
                      1.79073283204705875E-196,-8.83594230195339635E-213,
                     -4.17553117168109535E-229,-2.85150527581506414E-245);
  cos_t226 : constant hexa_double
           := create( 7.67138911935820400E-01,-1.88859036837507816E-17,
                     -1.36593593314954328E-33,-2.25388349629219338E-50,
                     -1.57641293479742966E-66, 5.37008075326108372E-83,
                      3.22758140620785202E-99,-6.88531766844382796E-116,
                     -1.21553108697318452E-132,-4.79707483101364968E-149,
                     -1.23544183898703243E-165, 3.41321115052350784E-182,
                     -3.00010501380443186E-198, 1.04828333655996933E-214,
                      4.17440311278356333E-231, 1.07608947013998831E-247);
  cos_t227 : constant hexa_double
           := create( 7.65167265622458959E-01,-3.27072256125345983E-17,
                      1.11771177470795276E-33,-3.70051822801757151E-50,
                      1.52856893645965124E-66,-9.88565803951930985E-83,
                     -6.41339777468150683E-99,-3.67702350647877322E-115,
                     -6.51368968700194243E-132,-4.50760412276779755E-148,
                      5.20809941257047794E-165, 1.54208798644044453E-181,
                     -6.04399850189407655E-198, 3.11110367818775711E-214,
                      1.56914349800154261E-230,-6.28324838392588481E-247);
  cos_t228 : constant hexa_double
           := create( 7.63188417263381269E-01, 2.63147484167507484E-18,
                      1.40480390630959103E-34, 8.96018866266303208E-52,
                      5.92016319737862517E-68,-2.72152413358343248E-85,
                     -1.35512522028139270E-101, 7.71590612095592004E-118,
                     -3.35012006041404699E-134,-1.84335541094190668E-150,
                      1.02242686160908572E-167,-3.88151869760893585E-184,
                      7.21352471357671884E-201, 3.83079416995063975E-217,
                      3.77511727162735478E-233, 1.47541994522002575E-249);
  cos_t229 : constant hexa_double
           := create( 7.61202385484261779E-01, 3.53155108816905509E-17,
                      1.28335663818643591E-33,-8.48355062650099085E-50,
                      2.59574018798442827E-66,-2.16126931530912636E-82,
                     -6.02393371067981473E-99, 2.41906811037512169E-115,
                      1.36444934974806780E-131, 8.41650868913202152E-149,
                      7.24440160404126123E-165, 2.07990097230505928E-181,
                     -1.82231877654978762E-198, 1.19466585131420370E-214,
                      8.04689366948338524E-231, 4.78042655430241681E-247);
  cos_t230 : constant hexa_double
           := create( 7.59209188978388072E-01,-3.85588421755231226E-17,
                      2.97202412083327591E-34,-1.25213889282201633E-50,
                     -9.50796849787696662E-69,-5.69624742907900866E-85,
                      1.21722832225560743E-101,-2.29174159138829256E-118,
                      7.17888009125953020E-135, 1.96704532552049797E-151,
                     -3.75961942512622228E-168, 6.03562503127018168E-185,
                     -7.88779885530402766E-202, 3.46242640932636045E-218,
                      2.05893687417592477E-235,-4.94018922467050983E-252);
  cos_t231 : constant hexa_double
           := create( 7.57208846506484568E-01,-1.99090987773355019E-17,
                      3.94092832661584820E-34, 2.07442542078029764E-50,
                      1.84967125011123820E-67,-3.21731322687720385E-84,
                     -8.11338110480626528E-101,-7.85111920398289294E-118,
                     -1.13711905079400944E-134,-3.90711420827763751E-152,
                      3.59709645039323927E-168, 1.56779644520659743E-184,
                     -1.71051814705668382E-201, 7.32227787521365503E-218,
                     -2.12488931548860235E-234, 9.51225930812474516E-251);
  cos_t232 : constant hexa_double
           := create( 7.55201376896536547E-01,-1.94022380018230173E-17,
                     -3.77562064447275734E-34,-2.12122423081782872E-50,
                     -4.35116900426565139E-68, 3.81396602626495010E-84,
                     -1.93406370120564640E-100,-1.03167960171057699E-116,
                     -1.92546249676087245E-133, 1.74281640548361424E-150,
                      6.86778340035347590E-167, 2.95310651274426112E-183,
                      1.22324034015345746E-199, 1.09982106462765600E-215,
                      6.07342461544563995E-232, 3.38248993489109307E-249);
  cos_t233 : constant hexa_double
           := create( 7.53186799043612520E-01,-3.79377898387365397E-17,
                     -6.70095399202315589E-34,-6.71285621150502140E-51,
                     -3.73199195403069783E-67, 3.09209542827111704E-83,
                     -1.04555741975290515E-99, 5.07450618893185909E-116,
                     -1.45032422677507287E-132, 8.04419736895769826E-149,
                     -2.11892755303583615E-165,-6.61951431217415489E-182,
                      2.33452904908726240E-198, 1.70488248846839835E-214,
                     -5.95776607246302473E-231,-3.19236040246671805E-248);
  cos_t234 : constant hexa_double
           := create( 7.51165131909686368E-01, 4.34997611586458684E-17,
                      2.52277189711022124E-33,-6.59697092127571017E-50,
                      1.70122728327206657E-66, 3.44850141010511855E-83,
                      1.02836296253189260E-99,-6.02766840068461899E-117,
                     -9.54551210464019460E-134,-2.46575947976244583E-151,
                      1.11042424882659478E-167,-5.56927079676761925E-184,
                      1.39551425098123175E-200, 2.30998302101224239E-217,
                     -7.42850394455868228E-234,-2.80550614340938599E-251);
  cos_t235 : constant hexa_double
           := create( 7.49136394523459370E-01,-4.47290784470118887E-17,
                     -2.42060252499837676E-33, 1.13366813511164239E-49,
                     -3.85460906711813256E-66, 7.99340477938902223E-83,
                      1.63607522210387854E-99, 3.87361859246198560E-116,
                     -1.53765182197959815E-132, 1.44214839922479531E-148,
                      6.53785355279871191E-165, 1.40565489720920340E-181,
                     -5.23958446988418451E-198,-3.70180201199773810E-214,
                      4.43639271866985085E-231,-2.04155268384521662E-247);
  cos_t236 : constant hexa_double
           := create( 7.47100605980180132E-01, 1.18748248759654303E-17,
                      2.19925238498335178E-34, 1.10250185646444830E-50,
                     -1.44201284749006903E-67,-7.65530350947307930E-85,
                      4.29655270597590688E-101,-5.83709489247448776E-118,
                      3.76888154701782128E-134, 9.08225326424575910E-151,
                     -2.20687343129655803E-167, 2.29000647799999302E-184,
                     -7.94350007587897132E-201,-6.82960530087846178E-217,
                      1.56690461352077309E-233,-5.36573866266715083E-250);
  cos_t237 : constant hexa_double
           := create( 7.45057785441465947E-01, 1.50786869118778628E-17,
                      8.08989872129424711E-34, 8.26779587653235318E-50,
                      4.57146336616658912E-66, 2.43022816459765415E-82,
                     -1.15870031193112784E-98, 5.57734619918296287E-115,
                     -3.12667448642909691E-131,-1.57802490016901818E-147,
                     -2.49396111292119279E-164,-2.55087034942333726E-181,
                     -1.82344622222239854E-197, 1.27342071047457533E-213,
                      3.79158816675666954E-230,-1.72625250467493976E-246);
  cos_t238 : constant hexa_double
           := create( 7.43007952135121719E-01,-2.51446296697192650E-17,
                      7.11289895125261566E-34, 3.01816290778212201E-50,
                     -1.45718227109412454E-66, 4.48897408258470590E-84,
                      4.06791923875464614E-100, 1.02574651231260981E-116,
                      5.22688580381798445E-133,-1.40585731455539556E-149,
                     -8.54064063989042630E-166,-3.08230528534511169E-182,
                      2.15514545889518514E-198,-2.64975828589879544E-215,
                     -2.18660373838554821E-231,-5.00103810251202171E-248);
  cos_t239 : constant hexa_double
           := create( 7.40951125354959106E-01,-1.47086169522973452E-17,
                     -4.95504338271420317E-34, 3.14341325337356709E-50,
                     -8.74572003205103851E-67, 5.95046846145053695E-83,
                      3.63711515266175249E-99, 1.91624730339486914E-115,
                     -1.12236741261824142E-131,-3.83796928884844959E-148,
                      1.01928564591940081E-164,-4.85236353729766879E-181,
                      3.86009485990174349E-197, 2.57044638161670547E-213,
                     -1.39907337917587993E-229,-4.55180046768305266E-246);
  cos_t240 : constant hexa_double
           := create( 7.38887324460615114E-01, 3.43248748082250910E-17,
                     -1.37066394447176100E-33,-3.35208275307189379E-51,
                      1.34306817695004519E-67, 6.93350429935821635E-84,
                     -3.25811294101672528E-101,-9.74631440640070672E-119,
                     -3.44807403900037188E-136, 2.50846185817892957E-152,
                     -1.22866665640003422E-168, 8.75327406193821732E-185,
                      4.35900617647206537E-201, 1.71670628833328566E-217,
                      5.63689340395794760E-234, 2.54700801898290787E-252);
  cos_t241 : constant hexa_double
           := create( 7.36816568877369904E-01,-2.89324681016562949E-17,
                     -3.46498871262023781E-34,-1.84844744762914758E-50,
                      1.10322689087000852E-66, 3.87239303525113149E-83,
                     -3.30158594540024819E-99,-1.22756570808872914E-115,
                      9.13259623155362053E-132,-1.73960336979414632E-148,
                     -1.51216337506533445E-164,-1.12226827661346107E-181,
                     -6.42408685108332364E-198, 2.90921045959613602E-214,
                     -1.22556897839697800E-230, 7.25422503817750033E-247);
  cos_t242 : constant hexa_double
           := create( 7.34738878095963499E-01,-3.45075959762639412E-17,
                     -2.37180006766664089E-33,-3.96960903871654021E-50,
                      5.56139266819586662E-67,-2.72404125872524782E-83,
                     -3.71762778283113930E-100, 2.20406154289584634E-117,
                     -3.62637929592373052E-134, 8.46601170429514814E-152,
                     -2.53018823552297968E-168,-1.11094336233990942E-184,
                      1.51563036093094035E-201, 5.75577935265109806E-218,
                      4.14624049591292465E-234, 2.41180760449400603E-250);
  cos_t243 : constant hexa_double
           := create( 7.32654271672412816E-01, 1.89186734815735196E-17,
                     -1.51237195441198860E-33,-9.79221520116257279E-51,
                      2.15939020123068802E-67,-1.59912297639812090E-83,
                      6.07786768426215207E-100, 1.68180575837333321E-116,
                      4.89079197448849869E-133, 2.85677803683654390E-149,
                      1.16747628631842709E-165, 1.00494179867548667E-181,
                      1.30506658820673040E-198,-7.48816882831136085E-215,
                      1.75757970734335201E-232,-1.60075213035403338E-248);
  cos_t244 : constant hexa_double
           := create( 7.30562769227827591E-01,-2.96899599044769280E-17,
                     -1.12768712442397442E-33,-3.05315209615390073E-50,
                      1.98951471390596132E-66, 9.76701320696808611E-84,
                      4.01417218036712560E-100,-1.45083788238704024E-116,
                      1.01639502615985258E-132, 6.87135696241394810E-149,
                      3.10750494397893437E-165, 2.62586476171342109E-182,
                     -9.18530588127184338E-199,-2.59404217718076675E-215,
                     -1.72713454136202274E-231, 1.74506096017810943E-248);
  cos_t245 : constant hexa_double
           := create( 7.28464390448225196E-01, 1.19246423233707176E-19,
                      5.90018923166110111E-36, 1.21780890695027036E-52,
                     -6.21747046015240160E-69, 2.03668407075855177E-85,
                      5.73312785998625447E-102, 5.47819166222143882E-119,
                      3.29525691792253325E-135, 3.84144644017237923E-152,
                      8.48042400454746361E-169,-3.74161011688774683E-185,
                     -1.85064533763097615E-202,-1.73335305358065969E-219,
                      8.93901657572253893E-236, 4.41605547869539486E-252);
  cos_t246 : constant hexa_double
           := create( 7.26359155084346009E-01,-3.19175024434605418E-17,
                      7.70479124120393961E-34, 4.14558801601821234E-50,
                     -1.39953003097243823E-67, 1.79118956773450665E-84,
                     -1.06876854786331409E-101, 8.73454262795612774E-119,
                     -1.28317381376785496E-135, 5.01498715014809927E-152,
                     -9.25714146884213481E-169,-5.05324586721136182E-185,
                      6.88109740837013595E-202,-5.69124222499458421E-220,
                     -2.93260156133620044E-236,-9.13456027398824621E-253);
  cos_t247 : constant hexa_double
           := create( 7.24247082951466892E-01, 2.91984713344030044E-17,
                      2.30273249687394643E-33,-1.29288205338921832E-51,
                      4.16385887990780634E-68, 1.72327966387108462E-84,
                     -9.87183634655684642E-101, 3.76094569754187731E-117,
                      2.79884972629846380E-133, 1.35665064463973725E-149,
                      1.76367470910757227E-166, 8.08175923157943764E-183,
                     -3.70840280430140570E-199, 1.96256011757865823E-216,
                     -2.17572202468119171E-233, 1.06353768392322473E-249);
  cos_t248 : constant hexa_double
           := create( 7.22128193929215345E-01,-2.38712620534520474E-17,
                      1.06361254328622726E-33,-4.45986388378025172E-50,
                      1.72751679066061951E-66,-5.53694502237793733E-83,
                     -3.57588524264425827E-99,-2.38384158661875562E-116,
                     -1.25636812221664539E-132, 5.49575561073532968E-149,
                      1.91926703936972125E-165, 7.10491982926771432E-182,
                     -2.79764222126406374E-199, 1.93112586880049962E-215,
                     -3.62979905035798672E-232,-2.73339635381425226E-248);
  cos_t249 : constant hexa_double
           := create( 7.20002507961381655E-01,-2.56896588544623333E-17,
                     -9.14925669485679253E-34, 4.44037808012677858E-50,
                     -2.12198361485441019E-66, 1.27884771498526192E-82,
                     -6.97751900566949928E-99, 3.31189435317157235E-115,
                      4.80253904390261803E-132, 3.92103308012360422E-149,
                      2.51100683719473026E-165, 6.47375967823272964E-182,
                      3.84360063314361065E-198,-1.00712964313768087E-214,
                     -1.03372002661292507E-231,-4.79294933322983846E-248);
  cos_t250 : constant hexa_double
           := create( 7.17870045055731709E-01, 2.70064760625114533E-17,
                     -2.28549565802153482E-34, 9.17269038902878672E-51,
                      1.44061942715007654E-68,-1.88923373167755234E-85,
                     -5.15336787790840759E-102,-1.05062779708296134E-118,
                      1.04584344167876434E-134,-4.19487519769112383E-151,
                     -2.52055765382381616E-167,-1.45034106314257876E-183,
                      2.50039108127948085E-200, 6.22117164817882399E-217,
                      9.64018497385181744E-234, 2.01136950428227544E-250);
  cos_t251 : constant hexa_double
           := create( 7.15730825283818706E-01,-5.15810184764102619E-17,
                     -1.37362713493002614E-34, 8.64750633662626798E-51,
                      1.30418039883353805E-67,-5.44803885877779374E-85,
                     -2.93010400980414548E-101, 2.85226611533079471E-117,
                     -9.86652121983760175E-134,-2.46353171855994588E-150,
                     -8.64236626008930422E-167,-5.10750114340898697E-183,
                     -2.30129363129273558E-199,-1.10115324999258725E-215,
                      2.17332600282022230E-232, 8.64946794307415546E-249);
  cos_t252 : constant hexa_double
           := create( 7.13584868780793635E-01,-4.23425044031335842E-17,
                     -4.26903661016172682E-34,-2.63523708830665222E-50,
                     -4.87237798306160764E-67,-3.14625609103327139E-83,
                     -1.32259290080673598E-99,-1.61642037983535338E-116,
                      7.70542393294793305E-133,-1.29853942679120169E-149,
                      7.93822027940873937E-166, 1.86785221602543314E-182,
                     -9.17602246868898366E-199, 2.30250190131844976E-215,
                     -1.06250292620154631E-231, 1.58164696037825260E-248);
  cos_t253 : constant hexa_double
           := create( 7.11432195745216434E-01, 7.96432986138568126E-18,
                      2.94882395107214687E-34, 1.69852364376663557E-50,
                     -8.30614212941238664E-67,-3.05786707202141167E-83,
                     -1.29248426058282786E-100,-7.51574582703618824E-117,
                      3.18299679830424919E-133,-8.34597053913074485E-150,
                      3.11183992827796964E-166, 1.21870880368254041E-182,
                     -6.29799116084100401E-199, 2.56864498146683414E-215,
                      2.34016446241626492E-231, 2.72096247060266256E-248);
  cos_t254 : constant hexa_double
           := create( 7.09272826438865689E-01,-3.75973591102457304E-17,
                      1.06131259546451192E-34, 8.94654801854860323E-51,
                     -3.93309712103078023E-67,-1.23882277375143911E-83,
                      1.34363675560727344E-101, 1.05825732919371533E-118,
                     -9.58818287523195177E-135, 2.93627100476884327E-151,
                     -3.89497288609805010E-168,-1.16803405932825900E-184,
                     -4.20043140086737215E-201, 2.65270696279202229E-217,
                     -1.40960811545966875E-233,-1.00449327865280809E-249);
  cos_t255 : constant hexa_double
           := create( 7.07106781186547573E-01,-4.83364665672645673E-17,
                      2.06933765434970678E-33, 2.46777349573417546E-50,
                      2.04470214305994790E-67, 1.55277156441246667E-84,
                     -1.00055013355304061E-100, 1.53225205737542922E-117,
                     -7.36493242809339304E-134, 7.52458631289309432E-151,
                      4.64027643021166914E-167, 6.52165463025460234E-185,
                     -5.66006455585947973E-201,-2.29144733459981078E-217,
                      1.71963688291316437E-233, 1.00540218407228250E-249);

  sin_table : array(0..255) of hexa_double 
            := (sin_t0  ,sin_t1  ,sin_t2  ,sin_t3  ,sin_t4  ,sin_t5  ,
                sin_t6  ,sin_t7  ,sin_t8  ,sin_t9  ,sin_t10 ,sin_t11 ,
                sin_t12 ,sin_t13 ,sin_t14 ,sin_t15 ,sin_t16 ,sin_t17 ,
                sin_t18 ,sin_t19 ,sin_t20 ,sin_t21 ,sin_t22 ,sin_t23 ,
                sin_t24 ,sin_t25 ,sin_t26 ,sin_t27 ,sin_t28 ,sin_t29 ,
                sin_t30 ,sin_t31 ,sin_t32 ,sin_t33 ,sin_t34 ,sin_t35 ,
                sin_t36 ,sin_t37 ,sin_t38 ,sin_t39 ,sin_t40 ,sin_t41 ,
                sin_t42 ,sin_t43 ,sin_t44 ,sin_t45 ,sin_t46 ,sin_t47 ,
                sin_t48 ,sin_t49 ,sin_t50 ,sin_t51 ,sin_t52 ,sin_t53 ,
                sin_t54 ,sin_t55 ,sin_t56 ,sin_t57 ,sin_t58 ,sin_t59 ,
                sin_t60 ,sin_t61 ,sin_t62 ,sin_t63 ,sin_t64 ,sin_t65 ,
                sin_t66 ,sin_t67 ,sin_t68 ,sin_t69 ,sin_t70 ,sin_t71 ,
                sin_t72 ,sin_t73 ,sin_t74 ,sin_t75 ,sin_t76 ,sin_t77 ,
                sin_t78 ,sin_t79 ,sin_t80 ,sin_t81 ,sin_t82 ,sin_t83 ,
                sin_t84 ,sin_t85 ,sin_t86 ,sin_t87 ,sin_t88 ,sin_t89 ,
                sin_t90 ,sin_t91 ,sin_t92 ,sin_t93 ,sin_t94 ,sin_t95 ,
                sin_t96 ,sin_t97 ,sin_t98 ,sin_t99 ,sin_t100,sin_t101,
                sin_t102,sin_t103,sin_t104,sin_t105,sin_t106,sin_t107,
                sin_t108,sin_t109,sin_t110,sin_t111,sin_t112,sin_t113,
                sin_t114,sin_t115,sin_t116,sin_t117,sin_t118,sin_t119,
                sin_t120,sin_t121,sin_t122,sin_t123,sin_t124,sin_t125,
                sin_t126,sin_t127,sin_t128,sin_t129,sin_t130,sin_t131,
                sin_t132,sin_t133,sin_t134,sin_t135,sin_t136,sin_t137,
                sin_t138,sin_t139,sin_t140,sin_t141,sin_t142,sin_t143,
                sin_t144,sin_t145,sin_t146,sin_t147,sin_t148,sin_t149,
                sin_t150,sin_t151,sin_t152,sin_t153,sin_t154,sin_t155,
                sin_t156,sin_t157,sin_t158,sin_t159,sin_t160,sin_t161,
                sin_t162,sin_t163,sin_t164,sin_t165,sin_t166,sin_t167,
                sin_t168,sin_t169,sin_t170,sin_t171,sin_t172,sin_t173,
                sin_t174,sin_t175,sin_t176,sin_t177,sin_t178,sin_t179,
                sin_t180,sin_t181,sin_t182,sin_t183,sin_t184,sin_t185,
                sin_t186,sin_t187,sin_t188,sin_t189,sin_t190,sin_t191,
                sin_t192,sin_t193,sin_t194,sin_t195,sin_t196,sin_t197,
                sin_t198,sin_t199,sin_t200,sin_t201,sin_t202,sin_t203,
                sin_t204,sin_t205,sin_t206,sin_t207,sin_t208,sin_t209,
                sin_t210,sin_t211,sin_t212,sin_t213,sin_t214,sin_t215,
                sin_t216,sin_t217,sin_t218,sin_t219,sin_t220,sin_t221,
                sin_t222,sin_t223,sin_t224,sin_t225,sin_t226,sin_t227,
                sin_t228,sin_t229,sin_t230,sin_t231,sin_t232,sin_t233,
                sin_t234,sin_t235,sin_t236,sin_t237,sin_t238,sin_t239,
                sin_t240,sin_t241,sin_t242,sin_t243,sin_t244,sin_t245,
                sin_t246,sin_t247,sin_t248,sin_t249,sin_t250,sin_t251,
                sin_t252,sin_t253,sin_t254,sin_t255);

  cos_table : array(0..255) of hexa_double
            := (cos_t0  ,cos_t1  ,cos_t2  ,cos_t3  ,cos_t4  ,cos_t5  ,
                cos_t6  ,cos_t7  ,cos_t8  ,cos_t9  ,cos_t10 ,cos_t11 ,
                cos_t12 ,cos_t13 ,cos_t14 ,cos_t15 ,cos_t16 ,cos_t17 ,
                cos_t18 ,cos_t19 ,cos_t20 ,cos_t21 ,cos_t22 ,cos_t23 ,
                cos_t24 ,cos_t25 ,cos_t26 ,cos_t27 ,cos_t28 ,cos_t29 ,
                cos_t30 ,cos_t31 ,cos_t32 ,cos_t33 ,cos_t34 ,cos_t35 ,
                cos_t36 ,cos_t37 ,cos_t38 ,cos_t39 ,cos_t40 ,cos_t41 ,
                cos_t42 ,cos_t43 ,cos_t44 ,cos_t45 ,cos_t46 ,cos_t47 ,
                cos_t48 ,cos_t49 ,cos_t50 ,cos_t51 ,cos_t52 ,cos_t53 ,
                cos_t54 ,cos_t55 ,cos_t56 ,cos_t57 ,cos_t58 ,cos_t59 ,
                cos_t60 ,cos_t61 ,cos_t62 ,cos_t63 ,cos_t64 ,cos_t65 ,
                cos_t66 ,cos_t67 ,cos_t68 ,cos_t69 ,cos_t70 ,cos_t71 ,
                cos_t72 ,cos_t73 ,cos_t74 ,cos_t75 ,cos_t76 ,cos_t77 ,
                cos_t78 ,cos_t79 ,cos_t80 ,cos_t81 ,cos_t82 ,cos_t83 ,
                cos_t84 ,cos_t85 ,cos_t86 ,cos_t87 ,cos_t88 ,cos_t89 ,
                cos_t90 ,cos_t91 ,cos_t92 ,cos_t93 ,cos_t94 ,cos_t95 ,
                cos_t96 ,cos_t97 ,cos_t98 ,cos_t99 ,cos_t100,cos_t101,
                cos_t102,cos_t103,cos_t104,cos_t105,cos_t106,cos_t107,
                cos_t108,cos_t109,cos_t110,cos_t111,cos_t112,cos_t113,
                cos_t114,cos_t115,cos_t116,cos_t117,cos_t118,cos_t119,
                cos_t120,cos_t121,cos_t122,cos_t123,cos_t124,cos_t125,
                cos_t126,cos_t127,cos_t128,cos_t129,cos_t130,cos_t131,
                cos_t132,cos_t133,cos_t134,cos_t135,cos_t136,cos_t137,
                cos_t138,cos_t139,cos_t140,cos_t141,cos_t142,cos_t143,
                cos_t144,cos_t145,cos_t146,cos_t147,cos_t148,cos_t149,
                cos_t150,cos_t151,cos_t152,cos_t153,cos_t154,cos_t155,
                cos_t156,cos_t157,cos_t158,cos_t159,cos_t160,cos_t161,
                cos_t162,cos_t163,cos_t164,cos_t165,cos_t166,cos_t167,
                cos_t168,cos_t169,cos_t170,cos_t171,cos_t172,cos_t173,
                cos_t174,cos_t175,cos_t176,cos_t177,cos_t178,cos_t179,
                cos_t180,cos_t181,cos_t182,cos_t183,cos_t184,cos_t185,
                cos_t186,cos_t187,cos_t188,cos_t189,cos_t190,cos_t191,
                cos_t192,cos_t193,cos_t194,cos_t195,cos_t196,cos_t197,
                cos_t198,cos_t199,cos_t200,cos_t201,cos_t202,cos_t203,
                cos_t204,cos_t205,cos_t206,cos_t207,cos_t208,cos_t209,
                cos_t210,cos_t211,cos_t212,cos_t213,cos_t214,cos_t215,
                cos_t216,cos_t217,cos_t218,cos_t219,cos_t220,cos_t221,
                cos_t222,cos_t223,cos_t224,cos_t225,cos_t226,cos_t227,
                cos_t228,cos_t229,cos_t230,cos_t231,cos_t232,cos_t233,
                cos_t234,cos_t235,cos_t236,cos_t237,cos_t238,cos_t239,
                cos_t240,cos_t241,cos_t242,cos_t243,cos_t244,cos_t245,
                cos_t246,cos_t247,cos_t248,cos_t249,cos_t250,cos_t251,
                cos_t252,cos_t253,cos_t254,cos_t255);

end Hexa_Double_Constants;
