function [ai,bi] = bluecoeff(n)

% Function outputs Lieblein's BLUE coefficients for 4 =< n =<100.  
% Written by Dat Duthinh 2_6_2017.
% References: 1)Julius Lieblein "Efficient Methods of Extreme-Value
% Methodology" NBSIR 74-602 OCT 1974 for n = 4:16
% 2)Nicholas John Cook "The designer's guide to wind loading of
% building structures" part 1, British Research Establishment 1985 Table C3
% pp. 321-323 for n = 17:24. Extension to n=100 by Adam Pintar Feb 12 2016.

% n = number of epochs or data (e.g., annual wind speed max)
if(n == 4)
    ai = [0.510998; 0.263943; 0.153680; 0.071380];
    bi = [-0.558619; 0.085903; 0.223919; 0.248797];
elseif(n == 5)
    ai = [0.418934; 0.246282; 0.167609; 0.108824; 0.058350];
    bi = [-0.503127; 0.006534; 0.130455; 0.181656; 0.184483];
elseif(n == 6)
    ai = [0.355450; 0.225488; 0.165620; 0.121054; 0.083522; 0.048867];
    bi = [-0.459273; -0.035992; 0.073199; 0.126724; 0.149534; 0.145807];
elseif(n == 7)
    ai = [0.309008; 0.206260; 0.158590; 0.123223; 0.093747;
        0.067331; 0.041841];
    bi = [-0.423700; -0.060698; 0.036192; 0.087339; 0.114868;
        0.125859; 0.120141];
elseif(n == 8)
    ai = [0.273535; 0.189428; 0.150200; 0.121174;
          0.097142; 0.075904; 0.056132; 0.036485];
    bi = [-0.394187; -0.075767; 0.011124; 0.058928;
           0.087162; 0.102728; 0.108074; 0.101936];
elseif(n == 9)
    ai = [0.245539; 0.174882; 0.141789; 0.117357; 0.097218;
        0.079569; 0.063400; 0.047957; 0.032291];
    bi = [-0.369242; -0.085203; -0.006486; 0.037977; 0.065574;
        0.082654; 0.091965; 0.094369; 0.088391];
elseif(n == 10)
    ai = [0.222867; 0.162308; 0.133845; 0.112868; 0.095636;
        0.080618; 0.066988; 0.054193; 0.041748; 0.028929];
    bi = [-0.347830; -0.091158; -0.019210; 0.022179; 0.048671;
        0.066064; 0.077021; 0.082771; 0.083552; 0.077940];
elseif(n == 11)
    ai = [0.204123; 0.151384; 0.126522; 0.108226; 0.093234; 0.080222;
        0.068485; 0.057578; 0.047159; 0.036886; 0.026180];
    bi = [-0.329210; -0.094869; -0.028604; 0.010032; 0.035284; 0.052464;
        0.064071; 0.071381; 0.074977; 0.074830; 0.069644];
elseif(n == 12)
    ai = [0.188361; 0.141833; 0.119838; 0.103673; 0.090455; 0.079018;
        0.068747; 0.059266; 0.050303; 0.041628; 0.032984; 0.023894];
    bi = [-0.312840; -0.097086; -0.035655; 0.000534; 0.024548;
        0.041278; 0.053053; 0.061112; 0.066122; 0.068357;
        0.067671; 0.062906];
elseif(n == 13)
    ai = [0.174916; 0.133422; 0.113759; 0.099323; 0.087540;
        0.077368; 0.068264; 0.059900; 0.052047;
        0.044528; 0.037177; 0.029790; 0.021965];
    bi = [-0.298313; -0.098284; -0.041013; -0.006997;
        0.015836; 0.032014; 0.043710; 0.052101; 0.057862;
        0.061355; 0.062699; 0.061699; 0.057330];
elseif(n == 14)
    ai = [0.163309; 0.125966; 0.108230; 0.095223; 0.084619;
        0.075484; 0.067331; 0.059866; 0.052891; 0.046260;
        0.039847; 0.033526; 0.027131; 0.020317];
    bi = [-0.285316; -0.098775; -0.045120; -0.013039;
        0.008690; 0.024282; 0.035768; 0.044262; 0.050418;
        0.054624; 0.057083; 0.057829; 0.056652; 0.052642];
elseif(n == 15)
    ai = [0.153184; 0.119134; 0.103196; 0.091384; 0.081767;
      0.073495; 0.066128; 0.059401; 0.053140; 0.047217;
      0.041529; 0.035984; 0.030484; 0.024887; 0.018894];
    bi = [-0.273606; -0.098768; -0.048285; -0.017934; 0.002773;
      0.017779; 0.028988; 0.037452; 0.043798; 0.048415;
      0.051534; 0.053267; 0.053603; 0.052334; 0.048648];
elseif(n == 16)
    ai = [0.144271; 0.113346; 0.098600; 0.087801;
        0.079021; 0.071476; 0.064771; 0.058660;
        0.052989; 0.047646; 0.042539; 0.037597;
        0.032748; 0.027911; 0.022969; 0.017653];
    bi = [-0.262990; -0.098406; -0.050731; -0.021933;
        -0.002167; 0.012270; 0.023168; 0.031528;
        0.037939; 0.042787; 0.046308; 0.048646;
        0.049860; 0.049912; 0.048602; 0.045207];

elseif(n == 17)
    ai = [0.131; 0.111; 0.097; 0.086; 0.077;
        0.070; 0.063; 0.058; 0.052; 0.047;
        0.043; 0.038; 0.034; 0.030; 0.025;
        0.021; 0.017];
    bi = [-0.205; -0.120; -0.067; -0.035; -0.012;
        0.004; 0.016; 0.025; 0.032; 0.037;
        0.042; 0.045; 0.047; 0.048; 0.048;
        0.048; 0.046];
elseif(n == 18)
    ai = [0.124; 0.106; 0.093; 0.083; 0.075;
        0.068; 0.062; 0.057; 0.052; 0.047;
        0.043; 0.039; 0.035; 0.031; 0.027;
        0.023; 0.020; 0.016];
    bi = [-0.193; -0.118; -0.069; -0.038; -0.016;
        -0.001; 0.011; 0.020; 0.027; 0.033;
        0.037; 0.040; 0.043; 0.045; 0.046; 
        0.046; 0.045; 0.043];
elseif(n == 19)
    ai = [0.117; 0.101; 0.089; 0.080; 0.073;
        0.066; 0.061; 0.056; 0.051; 0.047;
        0.043; 0.039; 0.035; 0.032; 0.029;
        0.025; 0.022; 0.019; 0.015];
    bi = [-0.183; -0.116; -0.071; -0.041; -0.020;
        -0.005; 0.007; 0.016; 0.023; 0.028;
        0.033; 0.036; 0.039; 0.041; 0.042;
        0.043; 0.043; 0.043; 0.041];
elseif(n == 20)
    ai = [0.111; 0.097; 0.086; 0.078; 0.070;
        0.064; 0.059; 0.055; 0.050; 0.046;
        0.043; 0.039; 0.036; 0.033; 0.030;
        0.026; 0.023; 0.020; 0.018; 0.015];
    bi = [-0.174; -0.113; -0.072; -0.043; -0.023;
        -0.008; 0.003; 0.012; 0.019; 0.024;
        0.029; 0.032; 0.035; 0.038; 0.039;
        0.040; 0.041; 0.041; 0.040; 0.039];
elseif(n == 21)
    ai = [0.106; 0.093; 0.083; 0.076; 0.068;
        0.063; 0.058; 0.054; 0.050; 0.046;
        0.042; 0.039; 0.036; 0.033; 0.030;
        0.027; 0.025; 0.022; 0.019; 0.017; 0.014];
    bi = [-0.166; -0.111; -0.072; -0.045; -0.026;
        -0.011; 0.000; 0.008; 0.015; 0.021;
        0.025; 0.029; 0.032; 0.034; 0.036;
        0.038; 0.039; 0.039; 0.039; 0.038; 0.037];
elseif(n == 22)
    ai = [0.101; 0.090; 0.080; 0.073; 0.066;
        0.061; 0.057; 0.052; 0.049; 0.045;
        0.042; 0.039; 0.036; 0.033; 0.031;
        0.028; 0.026; 0.023; 0.021; 0.018;
        0.016; 0.013];
    bi = [-0.158; -0.109; -0.072; -0.047; -0.028;
        -0.014; -0.003; 0.005; 0.012; 0.017;
        0.022; 0.026; 0.029; 0.031; 0.034;
        0.035; 0.036; 0.037; 0.037; 0.037;
        0.037; 0.035];
elseif(n == 23)
    ai = [0.097; 0.086; 0.077; 0.070; 0.065;
        0.060; 0.055; 0.051; 0.048; 0.045;
        0.042; 0.039; 0.036; 0.034; 0.031;
        0.029; 0.026; 0.024; 0.022; 0.019;
        0.017; 0.015; 0.013];
    bi = [-0.151; -0.106; -0.072; -0.048; -0.030;
        -0.017; -0.006; 0.002; 0.009; 0.015;
        0.019; 0.023; 0.026; 0.029; 0.031;
        0.033; 0.034; 0.035; 0.035; 0.036;
        0.035; 0.035; 0.034];
elseif(n == 24)
    ai = [0.093; 0.083; 0.075; 0.068; 0.063;
        0.058; 0.054; 0.050; 0.047; 0.044;
        0.041; 0.039; 0.036; 0.034; 0.031;
        0.029; 0.027; 0.025; 0.022; 0.020;
        0.018; 0.016; 0.014; 0.012];
    bi = [-0.145; -0.103; -0.072; -0.049; -0.032;
        -0.019; -0.008; 0.000; 0.006; 0.012;
        0.016; 0.020; 0.023; 0.026; 0.028;
        0.030; 0.032; 0.033; 0.034; 0.034;
        0.034; 0.034; 0.033; 0.032];
 elseif(n == 25)
    ai = [0.09233344; 0.07996344; 0.0715326747826087; 0.0652812834782609; 0.0602965324901186;
        0.0560986241897233; 0.0524265330726024; 0.0491299837903058; 0.0461160078336739; 0.0433227041466489;
        0.0407061773198399; 0.0382337316731727; 0.0358800403822856; 0.0336247952079688; 0.0314511680906521;
        0.0293447625130019; 0.0272928577589055; 0.0252837913875598; 0.0233063530684419; 0.0213490940711462;
        0.0193994662450593; 0.0174426393675889; 0.0154596591304348; 0.01342432; 0.01129792];
    bi = [-0.1683136; -0.10248; -0.0651112; -0.0421029913043478; -0.0266013217391304;
        -0.0152924347826087; -0.00654492265446224; 0.000485316247139589; 0.00627107174586081; 0.0111023672095841;
        0.0151718232655808; 0.0186148321227621; 0.021530069382151; 0.0239910447758783; 0.0260531235653887;
        0.0277579687666271; 0.0291363698214613; 0.0302099605408779; 0.0309920405075931; 0.0314874991304348;
        0.031691651541502; 0.0315875440316205; 0.031140827826087; 0.03029048; 0.02893248];
elseif(n == 26)
    ai = [0.0887821538461539; 0.0773636923076923; 0.0694299384615385; 0.063491779264214; 0.058744319854059;
        0.0547482748555792; 0.051257533596838; 0.0481279015282201; 0.0452696924421117; 0.0426233591095941;
        0.0401469115870803; 0.0378092382285637; 0.0355863578864533; 0.0334591564409746; 0.0314119223811052;
        0.0294313517880692; 0.0275058430783915; 0.0256249581923797; 0.0237789506328911; 0.0219582797202797;
        0.0201530466403162; 0.0183522826391; 0.0165429632107023; 0.0147084923076923; 0.0128262153846154;
        0.0108633846153846];
    bi = [-0.16184; -0.101070523076923; -0.0654814461538462; -0.0431384387959866; -0.0279630662207358;
        -0.0168790501672241; -0.00831185150501672; -0.00142610638972012; 0.00424964421756733; 0.00900298157946509;
        0.0130231161953674; 0.0164422194476946; 0.0193564956708119; 0.0218378245876347; 0.0239407302339066;
        0.0257067900441193; 0.0271674934099687; 0.0283460758189179; 0.0292585989726521; 0.0299143755548799;
        0.0303157015506233; 0.0304567253268471; 0.0303210943143813; 0.0298776923076923; 0.0290732307692308;
        0.0278196923076923];
elseif(n == 27)
    ai = [0.0854939259259259; 0.0749212763532764; 0.0674461447293447; 0.0618000273504274; 0.0572719316239316;
        0.0534605693050911; 0.050134826706305; 0.0471567727486684; 0.0444399139327323; 0.0419268272904484;
        0.0395771917218232; 0.0373612815143089; 0.0352562914501152; 0.0332441365280208; 0.0313100466202558;
        0.0294416187179756; 0.0276281503478898; 0.0258601465208916; 0.0241289204639246; 0.0224262229654404;
        0.0207438471943516; 0.0190731626904496; 0.0174045211445559; 0.0157264307692308; 0.0140243054131054;
        0.0122784729344729; 0.010461037037037];
    bi = [-0.155845925925926; -0.0995778917378918; -0.0656924353276353; -0.0440232752136752; -0.0291756004459309;
        -0.0183064957264957; -0.00990782707791404; -0.00315848081258516; 0.00241054610364633; 0.00708509202996343;
        0.0110518398118715; 0.0144402803653504; 0.0173443545468038; 0.0198343023466595; 0.0219636410012506;
        0.0237735423701449; 0.0252956879557628; 0.0265541507533233; 0.0275665983896941; 0.0283449633097981;
        0.0288956192741236; 0.0292190133036046; 0.0293086049795615; 0.0291488239316239; 0.0287115213675214;
        0.0279500170940171; 0.0267893333333333];
elseif(n == 28)
    ai = [0.0824405714285714; 0.0726231111111111; 0.0655712918192918; 0.0601978246642247; 0.0558733763125763;
        0.0522318636725593; 0.0490569563093911; 0.046217115782768; 0.0436290195254021; 0.0412372184508093;
        0.0390028761491242; 0.036897486184607; 0.0348992767829798; 0.0329910607229925; 0.0311588756234149;
        0.0293910758542694; 0.027677698332657; 0.0260100007543944; 0.0243801043411204; 0.0227806883049318;
        0.0212046924881882; 0.0196449916865743; 0.018094006604024; 0.0165432039072039; 0.014982401953602;
        0.013398735042735; 0.0117750476190476; 0.0100874285714286];
    bi = [-0.15028; -0.0980311111111111; -0.0657666666666667; -0.0447727111111111; -0.0302547111111111;
        -0.0195936038647343; -0.011353690821256; -0.00473301449275363; 0.000733304623878542; 0.00532952040971995;
        0.00924043561076604; 0.0125933829920069; 0.0154803100923665; 0.0179698872129172; 0.0201145559239104;
        0.0219548972664463; 0.0235224730512753; 0.0248417215279; 0.0259312178238238; 0.0268044669958061;
        0.0274703071826724; 0.0279329315920794; 0.0281914756277539; 0.0282390432234432; 0.0280609406593407;
        0.0276317167277167; 0.0269103492063492; 0.0258325714285714];
elseif(n == 29)
    ai = [0.0795977931034483; 0.0704573990147783; 0.0637965451559934; 0.0586779135194308; 0.0545431837985769;
        0.0510586119321292; 0.0480222145117917; 0.0453089008828919; 0.0428385281644892; 0.0405575284928964;
        0.0384284122480113; 0.0364237552682306; 0.0345226987152745; 0.0327088451387457; 0.0309689347879208;
        0.0292919696709216; 0.0276686066779378; 0.0260907199983968; 0.0245510709307001; 0.0230430405939887;
        0.0215603898622117; 0.0200970166916542; 0.0186466847147855; 0.0172026955665025; 0.0157574655719759;
        0.0143019397920088; 0.0128247312534209; 0.0113108177339901; 0.00973958620689655];
    bi = [-0.145097931034483; -0.0964524137931035; -0.0657239846743295; -0.0454006130268199; -0.0312139279693487;
        -0.0207560842911877; -0.0126669938364151; -0.00616790138264201; -0.000799931843602008; 0.00371933204826159;
        0.00757320845141339; 0.0108873207787084; 0.0137519157717912; 0.0162342185998111; 0.0183855932384685;
        0.0202459311490503; 0.0218464838923602; 0.0232117578854683; 0.0243607988186358; 0.025308046262583;
        0.0260638550819828; 0.0266347231717475; 0.0270232189238714; 0.0272275570881226; 0.0272407172413793;
        0.0270489195402299; 0.0266291494252874; 0.0259452413793103; 0.0249417931034483];
elseif(n == 30)
    ai = [0.0769445333333334; 0.0684134988505747; 0.0621140505747126; 0.0572338462324393; 0.0532763749680715;
        0.0499374201787995; 0.0470287535121328; 0.0444317107002055; 0.0420693432839136; 0.0398899107779444;
        0.0378571705880393; 0.0359446709852092; 0.0341323647126145; 0.0324045535172833; 0.030748595125375;
        0.0291540532403905; 0.0276121133849312; 0.0261151651168568; 0.0246564913402948; 0.023230025120773;
        0.0218301440213227; 0.020451477354656; 0.019088705340663; 0.0177363307279693; 0.016388400715198;
        0.0150381466155811; 0.0136774876117497; 0.0122963126436782; 0.010881416091954; 0.00941493333333333];
    bi = [-0.140261333333333; -0.0948588505747126; -0.0655817471264368; -0.0459195964240102; -0.0320650217113665;
        -0.021807188761175; -0.0138625787994891; -0.00747875957576767; -0.00220472599255928; 0.00223957514576046;
        0.00603614270198235; 0.00930923556607661; 0.0121476805821651; 0.0146174134210088; 0.0167687652991461;
        0.0186408978221244; 0.0202646396328496; 0.0216643773598581; 0.0228593476314474; 0.0238645213393304;
        0.0246911873663168; 0.0253472914031873; 0.0258375480748515; 0.0261633125925926; 0.026322165210728;
        0.0263071203065134; 0.0261053118773946; 0.0256959172413793; 0.0250469517241379; 0.0241104];
elseif(n == 31)
    ai = [0.0744624516129032; 0.0664818064516129; 0.060516787541713; 0.0558598709677419; 0.0520684236806328;
        0.0488650767519466; 0.0460746646891608; 0.0435848587319244; 0.0413219108983143; 0.0392358779320017;
        0.0372916941787171; 0.0354637943608841; 0.033732858601599; 0.0320838113244453; 0.0305045571370312;
        0.0289851524350478; 0.0275172399753318; 0.0260936475504183; 0.02470809252216; 0.0233549552191646;
        0.022029094923506; 0.0207256877625703; 0.0194400691783141; 0.0181675657397108; 0.0169033013471759;
        0.0156419597083179; 0.0143774762081325; 0.013102616240267; 0.0118083737486096; 0.0104830967741935;
        0.00911122580645161];
    bi = [-0.135736774193548; -0.0932634838709678; -0.0653550522803115; -0.0463411078976641; -0.0328183532319862;
        -0.0227582202447163; -0.0149530652824126; -0.00867901683351873; -0.00349464672394986; 0.000877049810578584;
        0.00461672920958876; 0.00784751759604069; 0.0106570670087707; 0.0131101895395257; 0.0152562591187245;
        0.0171337079619051; 0.0187728812907704; 0.0201979283689225; 0.0214280956146714; 0.0224786238622624;
        0.0233613645306379; 0.0240851792684303; 0.0246561546925462; 0.0250776385119268; 0.0253500804350513;
        0.0254706365097021; 0.0254324637251267; 0.0252235862068965; 0.024825147942158; 0.0242087741935484;
        0.0233326451612903];
elseif(n == 32)
    ai = [0.0721355; 0.0646536451612903; 0.0589984516129032; 0.0545508359288098; 0.0509152163515017;
        0.0478385660610555; 0.0451580336793969; 0.0427674769496972; 0.0405963381411445; 0.0385964535184021;
        0.0367338861585336; 0.0349838913494865; 0.0333278076800309; 0.0317511176769001; 0.0302422134334926;
        0.0287915873755073; 0.0273912824559607; 0.026034504540203; 0.0247153393342378; 0.0234285381422192;
        0.0221693483919331; 0.020933370969354; 0.0197164297931679; 0.0185144411568409; 0.0173232714744778;
        0.0161385716227908; 0.014955572920529; 0.0137688225806452; 0.0125718242491657; 0.0113565322580645;
        0.0101126290322581; 0.0088265];
    bi = [-0.131495; -0.0916762903225806; -0.0650569838709678; -0.0466755055617353; -0.0334831240266963;
        -0.0236189216413299; -0.0159492485477691; -0.00978024565566679; -0.00468153154121864; -0.000379897646338122;
        0.00330380660959843; 0.00649169916332157; 0.00927045263497283; 0.0117039150882963; 0.0138405955803649;
        0.0157182254428547; 0.0173666420860012; 0.0188096868471254; 0.0200664985509792; 0.0211524157195596;
        0.0220796089713208; 0.0228575139946156; 0.0234931042543245; 0.0239910208132493; 0.0243535589791126;
        0.024580494685453; 0.024668714621184; 0.0246115895439377; 0.0243979955506118; 0.0240108387096774;
        0.0234248709677419; 0.0226035];
elseif(n == 33)
    ai = [0.0699495757575758; 0.0629211666666667; 0.0575533587487781; 0.0533021089931574; 0.0498130121684026;
        0.0468550716789699; 0.0442769779403228; 0.0419785805908548; 0.0398924827571226; 0.0379722870967742;
        0.0361851524445988; 0.0345071050328208; 0.0329200863574078; 0.0314100829000456; 0.0299659239175597;
        0.0285784905116974; 0.0272401793122269; 0.0259445263592236; 0.0246859343152419; 0.0234594679757384;
        0.0222606952590176; 0.0210855574816209; 0.0199302563411354; 0.0187911471410434; 0.0176646290775759;
        0.0165470238854994; 0.0154344333247192; 0.0143225630835609; 0.0132064948259008; 0.0120803787878788;
        0.0109370068426197; 0.00976721212121212; 0.0085590303030303];
    bi = [-0.127510303030303; -0.0901048484848485; -0.0646988514173998; -0.0469321397849463; -0.0340675604543769;
        -0.0243977728621027; -0.0168604240027266; -0.0107924509462441; -0.00577571885559339; -0.00154155847687105;
        0.00208741724084195; 0.00523235015561623; 0.00797907401997926; 0.010390614270675; 0.0125147130812944;
        0.0143884474616364; 0.0160411478927786; 0.0174963096414819; 0.0187728891806656; 0.0198862083885721;
        0.0208485946074861; 0.0216698315860154; 0.0223574651643875; 0.0229169874293547; 0.0233519082227541;
        0.0236637102204844; 0.023851671198451; 0.0239125224997472; 0.0238398936191728; 0.0236234662756598;
        0.023247724340176; 0.0226901363636364; 0.0219185454545455];
elseif(n == 34)
    ai = [0.0678922352941176; 0.0612772620320855; 0.0561763663101604; 0.0521095101776781; 0.0487584055545972;
        0.0459119725839168; 0.0434296716018392; 0.0412171159101319; 0.0392100209898501; 0.0373637422099025;
        0.0356465110939269; 0.0340350878709602; 0.0325119727617475; 0.0310636111955063; 0.0296792269127727;
        0.0283500496462926; 0.0270687910733828; 0.0258292785310422; 0.0246261908586663; 0.0234548618720569;
        0.0223111293494705; 0.0211912144182006; 0.0200916201278867; 0.0190090402134279; 0.0179402703848007;
        0.0168821152359822; 0.0158312839498829; 0.0147842670079054; 0.013737183543212; 0.0126855842677247;
        0.011624187769536; 0.0105465187165775; 0.0094444064171123; 0.00830729411764706];
    bi = [-0.12376; -0.0885548663101604; -0.0642904144385027; -0.0471194337588408; -0.0345790533034328;
        -0.0251022188944341; -0.0176946495660657; -0.0117243144888656; -0.00678625232234667; -0.00261702568074252;
        0.000958676816783948; 0.00406097920802406; 0.00677496342020468; 0.00916294846097737; 0.011272004362766;
        0.0131386103096727; 0.0147916080459829; 0.0162541314247337; 0.0175449091546076; 0.0186791709374311;
        0.0196692911079047; 0.0205252489938057; 0.0212549532853118; 0.0218644580316018; 0.0223580844796853;
        0.0227384525686096; 0.0230064165918162; 0.0231608899222547; 0.023198532296729; 0.0231132582370191;
        0.022895504743833; 0.0225311684491979; 0.0220000855614973; 0.0212738823529412];
elseif(n == 35)
    ai = [0.0659524571428571; 0.0597154823529412; 0.0548628070282658; 0.0509692546982429; 0.0477482916385322;
        0.0450068352201878; 0.042614361153; 0.0404819951653267; 0.0385484992290616; 0.0367709641187489;
        0.0351186768100934; 0.0335691040875794; 0.0321052701488562; 0.0307140423145242; 0.0293850027140726;
        0.0281096956277471; 0.0268811152474735; 0.0256933480935778; 0.0245413162084977; 0.0234205872684432;
        0.0223272299523921; 0.0212577001078711; 0.0202087473924301; 0.0191773344368315; 0.0181605619705793;
        0.0171555941926816; 0.0161595790781314; 0.0151695581629193; 0.0141823593565892; 0.0131944641169078;
        0.0122018365459967; 0.0111996964858671; 0.0101822117647059; 0.00914207731092437; 0.00806994285714286];
    bi = [-0.120224; -0.0870305882352941; -0.0638400855614973; -0.0472449625668449; -0.0350242666896671;
        -0.0257388461273072; -0.0184589571776127; -0.012583401090338; -0.00772105932262682; -0.0036143403691338;
        -9.03432344174389e-05; 0.00296994190769077; 0.00565088416402262; 0.00801418406123388; 0.0101063247345429;
        0.0119632474664363; 0.013613334565213; 0.0150793591714909; 0.0163797974891122; 0.0175297382285431;
        0.0185415284074082; 0.0194252385767278; 0.0201889976367847; 0.0208392275402797; 0.0213807953587227;
        0.021817091003132; 0.0221500314148108; 0.0223799850695663; 0.0225056031886716; 0.022523535079721;
        0.0224279933167402; 0.0222101186401833; 0.0218570731856379; 0.0213507630252101; 0.0206660571428571];
elseif(n == 36)
    ai = [0.0641204444444445; 0.0582299682539683; 0.0536084332399627; 0.0498779047619048; 0.0467798349885409;
        0.0441374031888415; 0.0418293745766146; 0.0397721220194486; 0.0379073733474244; 0.0361939322263619;
        0.0346021267066618; 0.0331101095281371; 0.0317014017354068; 0.0303632623015184; 0.0290856013721907;
        0.0278602487018342; 0.0266804533262764; 0.0255405340247625; 0.0244356289230239; 0.0233615112293485;
        0.0223144498515207; 0.021291100847512; 0.0202884199576321; 0.0193035889796631; 0.0183339502266758;
        0.0173769441997583; 0.016430046130914; 0.0154906972336917; 0.0145562262238296; 0.0136237557234037;
        0.0126900862843671; 0.0117515477463713; 0.010803803412274; 0.0098415873015873; 0.00885834920634921;
        0.00784577777777778];
    bi = [-0.116884444444444; -0.0855351111111111; -0.0633551111111111; -0.0473155294117647; -0.0354092254901961;
        -0.0263135199240987; -0.0191595231920725; -0.0133763314103543; -0.00858710584537857; -0.00454062176392;
        -0.00106672179310483; 0.00195235639461074; 0.00460026774068916; 0.00693815398553999; 0.00901198323007434;
        0.0108572172318575; 0.0125018143389452; 0.0139681986859849; 0.015274583955604; 0.0164358878874951;
        0.0174643802967218; 0.0183701510174934; 0.0191614504990615; 0.0198449354480391; 0.0204258391642407;
        0.0209080776110941; 0.0212942958004091; 0.0215858535765673; 0.0217827445630155; 0.02188343619305;
        0.0218846116382037; 0.0217807852049911; 0.0215637504456328; 0.0212218039215686; 0.0207386666666667;
        0.020092];
elseif(n == 37)
    ai = [0.0623874594594595; 0.0568153873873874; 0.0524093693693694; 0.048832328563858; 0.045850441585971;
        0.0433015857782917; 0.0410731258494997; 0.0390864097459543; 0.0372860386454992; 0.0356325008172592;
        0.0340971518009953; 0.0326588143777488; 0.031301485296957; 0.0300127906890598; 0.0287829433083636;
        0.0276040336032805; 0.0264695417771588; 0.0253739960274915; 0.0243127279205448; 0.023281692984767;
        0.0222773357354406; 0.0212964853944491; 0.0203362729203274; 0.0193940625881394; 0.0184673929251898;
        0.0175539227530875; 0.0166513786622394; 0.0157575005577812; 0.0148699819549731; 0.0139864013663482;
        0.0131041402542788; 0.0122202814472226; 0.0113314795008913; 0.0104337912029677; 0.00952245045045045;
        0.00859156756756757; 0.00763372972972973];
    bi = [-0.113725405405405; -0.0840706306306306; -0.0628417297297297; -0.0473372379438262; -0.0357393873873874;
        -0.0268314931107578; -0.0198018058191018; -0.014108926303913; -0.0093905301338766; -0.00540218216849317;
        -0.00197678335837637; 0.00100202622003015; 0.0036171541219424; 0.00592921681882104; 0.00798372396916744;
        0.00981571108973306; 0.0114527503375304; 0.0129169356431293; 0.0142262185823946; 0.0153953294390241;
        0.0164364281756068; 0.0173595743646908; 0.0181730710641004; 0.0188837168189979; 0.0194969870465899;
        0.0200171576440014; 0.0204473777268253; 0.0207896937513555; 0.0210450231526489; 0.0212130715048324;
        0.0212921825843439; 0.0212791050488992; 0.021168652117358; 0.0209532209856916; 0.0206221261261261;
        0.0201606846846847; 0.019548972972973];
elseif(n == 38)
    ai = [0.0607456842105263; 0.055466879089616; 0.0512620711237553; 0.0478296652441916; 0.0449577338576967;
        0.0424974461272418; 0.0403441162106379; 0.0384237940348718; 0.0366838525970293; 0.0350864308077039;
        0.0336038975473543; 0.0322157327271689; 0.0309063922357082; 0.0296638496157336; 0.0284785990984;
        0.0273429707604638; 0.0262506556571796; 0.0251963718621455; 0.0241756252364526; 0.0231845343214778;
        0.022219699136785; 0.0212781004409326; 0.0203570203284945; 0.0194539777210916; 0.0185666739511267;
        0.0176929446359683; 0.0168307146543396; 0.0159779534067967; 0.0151326277161219; 0.0142926496743423;
        0.0134558163886947; 0.0126197378043678; 0.0117817474688311; 0.0109387891668759; 0.0100872697961119;
        0.0092228658131816; 0.00834026742532006; 0.00743284210526316];
    bi = [-0.110732631578947; -0.0826386344238976; -0.0623053105737316; -0.0473155599810337; -0.0360197035673444;
        -0.0272974925389786; -0.0203906562909659; -0.0147863271013448; -0.0101367574819401; -0.00620462820849206;
        -0.00282618348318667; 0.000113370125753785; 0.00269613599181373; 0.0049822159799199; 0.0070167022830091;
        0.00883425009241155; 0.0104620824874702; 0.0119219860158053; 0.0132316577537322; 0.014405633762314;
        0.0154559438885736; 0.0163925837242841; 0.0172238605785448; 0.0179566492089547; 0.0185965798753057;
        0.0191481728392833; 0.0196149277299767; 0.0199993720036273; 0.0203030693003103; 0.0205265853543547;
        0.0206694058746153; 0.0207297971160014; 0.020704595319778; 0.0205889053635679; 0.0203756813655761;
        0.0200551522048364; 0.0196140426742532; 0.0190345263157895];
elseif(n == 39)
    ai = [0.0591881025641026; 0.0541800053981107; 0.0501632902213955; 0.0468672947927685; 0.0440995285163706;
        0.0417231895253195; 0.0396409332180478; 0.0377832417578331; 0.0361001520561501; 0.0345554145332482;
        0.0331223958821272; 0.0317812219654989; 0.0305167946372933; 0.0293174189604499; 0.0281738531533813;
        0.0270786490760684; 0.0260256911955223; 0.025009870648131; 0.0240268512371198; 0.0230728982461712;
        0.0221447505356843; 0.0212395228043164; 0.0203546291014469; 0.0194877213685063; 0.0186366384774865;
        0.0177993622832245; 0.0169739778560834; 0.0161586354651778; 0.0153515121167058; 0.0145507705342722;
        0.0137545133676878; 0.0129607300687208; 0.0121672331936604; 0.0113715798027129; 0.0105709720732879;
        0.00976212923855029; 0.0089411206185943; 0.00810314709851552; 0.00724225641025641];
    bi = [-0.107893333333333; -0.0812400539811066; -0.0617504730641573; -0.0472553982322403; -0.036254670800355;
        -0.0277157890159748; -0.0209304091421738; -0.0154130957481654; -0.010830598494076; -0.00695294962522387;
        -0.00361998511831147; -0.000718641664607722; 0.00183230711015903; 0.00409244018952759; 0.00610645842336146;
        0.00790867400950262; 0.00952599528725459; 0.0109799258620232; 0.0122879205989523; 0.0134643215078174;
        0.0145210170574514; 0.015467916537766; 0.0163132977228453; 0.0170640649087398; 0.0177259410069024;
        0.0183036088152135; 0.0188008109379765; 0.0192204138653659; 0.0195644386949915; 0.0198340584076459;
        0.0200295591699375; 0.0201502605621816; 0.0201943866571978; 0.0201588762146285; 0.0200391155852208;
        0.0198285719079403; 0.0195182965313492; 0.0190962591093117; 0.0185464615384615];
elseif(n == 40)
    ai = [0.0577084; 0.0529507076923077; 0.0491100437246964; 0.0459428120800963; 0.0432738169311012;
        0.040977152161068; 0.0389622483336874; 0.0371637567194248; 0.0355342661950829; 0.0340390951125699;
        0.0326525906478543; 0.0313555142434342; 0.0301332029698227; 0.0289742805814128; 0.0278697548570208;
        0.026812384378159; 0.0257962320678527; 0.024816347614569; 0.0238685386911468; 0.0229492034607175;
        0.0220552056275356; 0.0211837792931766; 0.0203324549104889; 0.0194990002807345; 0.0186813722501612;
        0.0178776758475576; 0.017086128287323; 0.0163050256924096; 0.0155327106577186; 0.0147675389181798;
        0.0140078434084339; 0.0132518938737022; 0.0124978498638672; 0.0117437043551768; 0.010987214341467;
        0.0102258134879819; 0.00945650036108984; 0.0086756939271255; 0.00787904615384615; 0.0070612];
    bi = [-0.105196; -0.0798753846153846; -0.0611811902834008; -0.0471611438888281; -0.0364483767735347;
        -0.0280902545136229; -0.0214249558946896; -0.0159932981984128; -0.011476332982542; -0.007651596880085;
        -0.00436272661708179; -0.00149854507276106; 0.00102121479997503; 0.00325558593399462; 0.00524889058093557;
        0.00703512631446212; 0.00864091689397243; 0.010087507221196; 0.0113921249523604; 0.0125689230384111;
        0.0136296438561981; 0.0145840963971567; 0.0154405056279806; 0.016205772154132; 0.0168856668228323;
        0.0174849762146387; 0.0180076092847311; 0.018456671542744; 0.0188345103468788; 0.0191427326557803;
        0.0193821946189704; 0.0195529604691379; 0.0196542261147549; 0.0196842004243825; 0.0196399342305869;
        0.0195170833278623; 0.0193095869569975; 0.0190092372469636; 0.0186051076923077; 0.0180828];
elseif(n == 41)
    ai = [0.0563008780487805; 0.0517752682926829; 0.0480995872420263; 0.0450540043448208; 0.0424787477521958;
        0.0402577904949484; 0.0383068135685799; 0.0365643831726056; 0.034985526146294; 0.0335370815669613;
        0.0321943578185689; 0.0309387417118534; 0.029755996440884; 0.0286350540074595; 0.027567159863959;
        0.0265452666416899; 0.0255636029190002; 0.0246173643972825; 0.0237024904455481; 0.0228155001904111;
        0.0219533702869527; 0.0211134420670391; 0.0202933495814314; 0.0194909626271642; 0.0187043405546392;
        0.0179316937553023; 0.0171713504404639; 0.0164217267746109; 0.0156812987141486; 0.0149485740774101;
        0.0142220634543837; 0.0135002485493847; 0.012781546411449; 0.0120642677071672; 0.0113465666859711;
        0.0106263797412501; 0.0099013484637002; 0.0091687218327244; 0.00842523076923077; 0.00766692682926829;
        0.0068889756097561];
    bi = [-0.102630243902439; -0.0785447804878049; -0.0606008780487805; -0.047036729139923; -0.0366045399854283;
        -0.0284244095571823; -0.0218778055488094; -0.0165305739465963; -0.0120777814885035; -0.00830454878354909;
        -0.00505848212959277; -0.00223043414385293; 0.000258816427467513; 0.00246772225896415; 0.00444022824829877;
        0.00621003698964845; 0.00780351284113981; 0.00924166471426924; 0.0105415092422794; 0.0117170184854019;
        0.0127797887290776; 0.0137395207933204; 0.0146043712692951; 0.0153812135625316; 0.0160758341674264;
        0.0166930808241558; 0.0172369734528498; 0.0177107848961808; 0.0181170957892531; 0.0184578258359285;
        0.0187342420942223; 0.0189469433514713; 0.0190958181446451; 0.0191799723111607; 0.0191976199954274;
        0.0191459296270695; 0.0190208133568544; 0.0188166446134097; 0.0185258836772983; 0.0181385853658537;
        0.017641756097561];
elseif(n == 42)
    ai = [0.054960380952381; 0.0506502764227642; 0.0471293914053426; 0.044198831591173; 0.0417126115288221;
        0.0395636713471219; 0.037673457568333; 0.0359842076868726; 0.0344532721002035; 0.0330489606061763;
        0.031747521620125; 0.0305309568419014; 0.0293854475554256; 0.0283002253795323; 0.0272667636293173;
        0.0262781983486505; 0.0253289128390963; 0.0244142379799473; 0.0235302342713974; 0.0226735314917728;
        0.0218412090436722; 0.0210307051753998; 0.0202397468457633; 0.0194662944681399; 0.0187084974400192;
        0.0179646574750194; 0.0172331974820195; 0.0165126342080257; 0.0158015531660247; 0.0150985845628388;
        0.0144023790552506; 0.0137115822042795; 0.0130248064591274; 0.0123405993627418; 0.0116574064010829;
        0.0109735264870592; 0.0102870574524644; 0.0095958281068525; 0.00889731242740999; 0.00818852032520325;
        0.00746585830429733; 0.00672495238095238];
    bi = [-0.100186666666667; -0.0772481300813008; -0.0600124715447154; -0.046885674796748; -0.0367265451433462;
        -0.0287214629520406; -0.0222921345607482; -0.0170281941196652; -0.0126383662069854; -0.0089153712969072;
        -0.00571091509173493; -0.00291800780335973; -0.000458560317373268; 0.00172525801923986; 0.0036770065316563;
        0.00543010441560336; 0.00701067649673501; 0.00843951598671045; 0.00973344470069698; 0.0109062638638608;
        0.011969426976635; 0.012932523313739; 0.013803631227849; 0.0145895805552228; 0.0152961501511192;
        0.0159282177945751; 0.0164898738862095; 0.0169845064707971; 0.0174148624369846; 0.0177830878076067;
        0.018090748526531; 0.0183388318675144; 0.0185277273940211; 0.0186571851729185; 0.0187262475844632;
        0.0187331494667233; 0.0186751793656851; 0.0185484922061251; 0.0183478606271777; 0.0180663484320557;
        0.0176948850174216; 0.0172217142857143];
elseif(n == 43)
    ai = [0.0536822325581395; 0.0495725980066445; 0.0461971211409124; 0.0433754094481809; 0.0409738270804635;
        0.0388934627322703; 0.0370610814079703; 0.0354223598143924; 0.033936858439579; 0.0325743057885035;
        0.0313118673931573; 0.0301321488353563; 0.029021742064316; 0.0279701710285342; 0.0269691287659148;
        0.0260119258105424; 0.0250930908696491; 0.0242080806456586; 0.0233530675849439; 0.0225247831504029;
        0.0217204006696801; 0.0209374464790816; 0.0201737314133502; 0.0194272970313305; 0.0186963725850164;
        0.0179793398389723; 0.0172747035828562; 0.0165810661659281; 0.015897104701141; 0.0152215497937586;
        0.01455316478019; 0.0138907245339498; 0.0132329929099586; 0.0125786978468809; 0.0119265030126019;
        0.0112749746383097; 0.0106225418197423; 0.00996744805291731; 0.00930769111093104; 0.00864094757313021;
        0.00796447743294708; 0.00727500332225913; 0.00656855813953488];
    bi = [-0.0978567441860465; -0.0759851162790697; -0.0594184912081679; -0.046711133295519; -0.0368174747589336;
        -0.0289843454637729; -0.0226708284162599; -0.0174891101421749; -0.0131611628836006; -0.00948726857350712;
        -0.00632332548615324; -0.00356461181193571; -0.00113425356189569; 0.00102491159144426; 0.00295604174780777;
        0.00469227714409617; 0.00625951766429684; 0.00767835814214549; 0.00896544094366315; 0.0101344073995823;
        0.0111965737386787; 0.012161417583671; 0.0130369334292846; 0.0138298964834827; 0.0145460613033835;
        0.0151903129368781; 0.0157667824381001; 0.0162789346974328; 0.0167296338441884; 0.0171211895853823;
        0.0174553864313157; 0.0177334966247702; 0.01795627659769; 0.0181239458269526; 0.0182361459663938;
        0.0182918770168204; 0.0182894059766546; 0.0182261418037436; 0.0180984685195689; 0.0179015258082813;
        0.0176289234259784; 0.0172723720930232; 0.0168212093023256];
elseif(n == 44)
    ai = [0.0524621818181818; 0.0485393488372093; 0.0453006173361522; 0.0425819941215903; 0.0402609294075182;
        0.0382459254370133; 0.03646865428383; 0.0348780118903163; 0.0334356573613729; 0.032112684608303;
        0.0308871518604369; 0.0297422569103666; 0.0286649952276834; 0.0276451767657303; 0.026674707468432;
        0.0257470648678161; 0.0248569151465728; 0.0239998327629809; 0.0231720941192148; 0.0223705245391729;
        0.0215923836002432; 0.0208352781046154; 0.020097095050458; 0.0193759491621288; 0.0186701410878919;
        0.0179781234483389; 0.017298472652769; 0.016629864895272; 0.0159710550718887; 0.0153208575783116;
        0.0146781280898916; 0.0140417455134838; 0.0134105933430895; 0.0127835396476692; 0.0121594148615311;
        0.0115369864215351; 0.0109149290844851; 0.0102917894465447; 0.00966594276285257; 0.00903553962770072;
        0.00839843943691022; 0.00775212684989429; 0.00709360676532769; 0.00641927272727273];
    bi = [-0.0956327272727273; -0.0747552642706131; -0.0588210993657505; -0.0465159273964833; -0.0368801374722838;
        -0.0292157386685918; -0.0230165164587331; -0.0179159946370935; -0.0136489450468959; -0.0100231272148102;
        -0.00689869151768473; -0.00417327632567337; -0.00177130004913625; 0.000363682987242815; 0.00227440847651466;
        0.00399373605117749; 0.00554735025548985; 0.00695566163610976; 0.00823514704886813; 0.00939929898908127;
        0.0104593032723013; 0.0114245280762049; 0.0123028815649032; 0.0131010772396182; 0.0138248336447244;
        0.0144790264874635; 0.0150678054046939; 0.0155946836588097; 0.0160626063452488; 0.0164740008108367;
        0.0168308116174676; 0.0171345213379097; 0.0173861576038008; 0.0175862860453022; 0.0177349879957712;
        0.0178318210217806; 0.017875759419139; 0.0178651107263337; 0.0177974029804569; 0.0176692358067344;
        0.0174760864229361; 0.0172120591966173; 0.0168695644820296; 0.0164389090909091];
elseif(n == 45)
    ai = [0.0512963555555556; 0.0475478707070707; 0.0444378805731736; 0.0418169691331924; 0.0395725589508242;
        0.0376199053129136; 0.0358952092312805; 0.0343503782206337; 0.0329490613362656; 0.0316636639453991;
        0.0304731113186197; 0.0293611810779312; 0.0283152651157837; 0.0273254537266116; 0.0263838599727374;
        0.0254841220709588; 0.0246210369330911; 0.0237902898242716; 0.0229882541518498; 0.0222118422609867;
        0.0214583932708732; 0.0207255878224725; 0.0200113824313692; 0.0193139581903386; 0.0186316800366429;
        0.0179630638381275; 0.0173067492757034; 0.0166614769965419; 0.0160260688492852; 0.0153994102390988;
        0.0147804337912851; 0.0141681036102651; 0.0135613994788568; 0.0129593003654737; 0.0123607665919125;
        0.0117647199543868; 0.0111700209744699; 0.0105754422722614; 0.00997963678990701; 0.00938109924199453;
        0.00877811873012599; 0.00816871994362227; 0.00755058980502702; 0.00692098585858586; 0.00627662222222222];
    bi = [-0.0935075555555556; -0.0735579797979798; -0.0582221489311722; -0.046302584918957; -0.0369170935217174;
        -0.0294180998985888; -0.0233316012765202; -0.0183112759285243; -0.0141042217507778; -0.0105255546208982;
        -0.00743970630554184; -0.00474674945426119; -0.00237246483289868; -0.000261171734094311; 0.00162941813592977;
        0.00333187716959705; 0.00487167964383457; 0.0062690626337398; 0.00754034961601215; 0.00869889485901169;
        0.00975576129593014; 0.0107202114326898; 0.0116000669356528; 0.0124019755116612; 0.0131316117032294;
        0.0137938298751093; 0.0143927819101898; 0.0149320081805889; 0.0154145076437923; 0.0158427910261059;
        0.0162189197104366; 0.0165445319452071; 0.0168208572013049; 0.0170487188316389; 0.0172285245666219;
        0.0173602437566226; 0.0174433696030492; 0.0174768638576106; 0.0174590805662983; 0.0173876643393664;
        0.0172594172880249; 0.0170701271317829; 0.0168143470049331; 0.0164851151515152; 0.0160736];
elseif(n == 46)
    ai = [0.0501812173913044; 0.0465957101449275; 0.0436070566534914; 0.0410788335937739; 0.0389074520329687;
        0.0370143262450145; 0.0353398389542917; 0.0338387138478922; 0.0324764846784108; 0.0312268142187121;
        0.0300694681653409; 0.0289887908946626; 0.0279725635164356; 0.0270111514294948; 0.0260968698114657;
        0.0252235122113006; 0.0243860005259779; 0.0235801248465685; 0.0228023495421051; 0.0220496679928435;
        0.0213194929780775; 0.0206095731832104; 0.0199179288699106; 0.0192428016545422; 0.018582614724731;
        0.0179359408191005; 0.0173014760006452; 0.0166780177474293; 0.0160644462248049; 0.0154597078359751;
        0.0148628003052661; 0.0142727586537728; 0.0136886414946439; 0.0131095171127817; 0.0125344488029813;
        0.0119624789187132; 0.0113926110245251; 0.0108237894398582; 0.0102548753016366; 0.00968461804909436;
        0.00911162094196546; 0.00853429886325336; 0.00795082624015687; 0.00735907246376811; 0.00675652173913044;
        0.00614017391304348];
    bi = [-0.0914747826086957; -0.0723925797101449; -0.0576232252964427; -0.0460733698562981; -0.0369306776970922;
        -0.0295936839902639; -0.0236182836777352; -0.0186771672656427; -0.0145292698305864; -0.0109969122197682;
        -0.00794881015006404; -0.00528752719143132; -0.00294026810732154; -0.000852163876493495; 0.00101859908557614;
        0.002704295372323; 0.00423019009532077; 0.00561635451499787; 0.00687896884868792; 0.00803125889214206;
        0.00908417238214103; 0.010046870904328; 0.0109270911095476; 0.01173141306036; 0.0124654621314715;
        0.0131340628278896; 0.0137413572401401; 0.014290896930994; 0.0147857143261078; 0.0152283777845146;
        0.0156210331834723; 0.0159654338751399; 0.0162629601274694; 0.0165146285570159; 0.0167210915327949;
        0.0168826260303912; 0.0169991109057795; 0.0170699910037762; 0.0170942258815933; 0.0170702201765615;
        0.0169957317394518; 0.0168677525507859; 0.0166823560989061; 0.0164345032938076; 0.0161177971014493;
        0.0157241739130435];
elseif(n == 47)
    ai = [0.0491135319148936; 0.0456805994449584; 0.0428064236817761; 0.0403661917977182; 0.0382644323353145;
        0.0364281837491582; 0.034801691822165; 0.0333423130371881; 0.0320173644375053; 0.0308017125148521;
        0.0296759360880722; 0.0286249325772753; 0.0276368648998885; 0.0267023685720637; 0.025813956467656;
        0.0249655728877086; 0.024152259811918; 0.0233699070104705; 0.0226150645620676; 0.0218848016405696;
        0.0211765995167422; 0.020488269832338; 0.0198178915512443; 0.0191637617460088; 0.0185243566734701;
        0.0178983005387103; 0.017284340027862; 0.0166813231748633; 0.0160881814675427; 0.0155039143347004;
        0.0149275753183725; 0.0143582593461668; 0.0137950905924627; 0.0132372104636045; 0.0126837652653267;
        0.0121338931108552; 0.0115867096025303; 0.0110412917631096; 0.0104966595984618; 0.00995175453420183;
        0.00940541377905462; 0.00885633942418831; 0.00830306079185678; 0.00774388820676702; 0.00717685599753315;
        0.00659965217391304; 0.00600953191489362];
    bi = [-0.0895285106382979; -0.071258316373728; -0.0570256823928461; -0.0458303102065988; -0.0369230200575121;
        -0.0297445623848145; -0.0238785840649147; -0.0190156916830683; -0.0149261615252643; -0.0114393442682276;
        -0.00842821888510612; -0.00579788007129363; -0.00347700940310868; -0.00141159347488224; 0.000439678222713348;
        0.00210876899629053; 0.00362073252801683; 0.00499547899054024; 0.00624905338368561; 0.00739456166410439;
        0.00844284382507464; 0.00940296580070556; 0.0102825818409438; 0.0110882041682527; 0.0118254059647024;
        0.0124989760143078; 0.0131130378367645; 0.0136711422802696; 0.0141763398284633; 0.0146312369743377;
        0.0150380396695956; 0.0153985858896753; 0.0157143686338095; 0.0159865501159084; 0.0162159674325974;
        0.0164031295740877; 0.016548205237274; 0.016651000479741; 0.0167109247914094; 0.0167269436301717;
        0.0166975148404079; 0.0166205056185415; 0.016493085777205; 0.0163115919603061; 0.0160713561517114;
        0.0157664902867715; 0.0153896170212766];
elseif(n == 48)
    ai = [0.0480903333333333; 0.044800439716312; 0.0420343805118717; 0.0396777439613527; 0.0376424032835291;
        0.0358605391487754; 0.0342799680667441; 0.0328605075883891; 0.0315711607783377; 0.0303879449062901;
        0.0292922241751498; 0.028269434786473; 0.0273081138004875; 0.0263991619822649; 0.025535285905032;
        0.0247105766546149; 0.0239201920910999; 0.0231601172315983; 0.0224269833018422; 0.021717930679484;
        0.0210305045784048; 0.0203625751144245; 0.0197122755227613; 0.0190779539079756; 0.0184581351123755;
        0.0178514901810079; 0.0172568115539911; 0.0166729925885321; 0.0160990103495726; 0.0155339108454864;
        0.0149767960511113; 0.0144268121751712; 0.0138831387075891; 0.0133449778342027; 0.0128115438377458;
        0.0122820521170145; 0.0117557074503879; 0.0112316911025983; 0.0107091463205067; 0.0101871616794505;
        0.00966475162128033; 0.00914083336429936; 0.00861419916198319; 0.00808348264326895; 0.00754711768938226;
        0.0070032880049337; 0.00644986524822695; 0.00588433333333333];
    bi = [-0.0876633333333333; -0.0701543971631206; -0.0564306737588652; -0.0455752228389351; -0.0368960646520711;
        -0.0298726400093702; -0.0241143608535498; -0.019328703245357; -0.0152967881864553; -0.0118548028316673;
        -0.00887994877981673; -0.00627987688130704; -0.00398478937425682; -0.00194156875805019; -0.000109435985391894;
        0.00154324544212494; 0.00304131275644105; 0.00440451713942694; 0.00564877437409598; 0.00678707793510311;
        0.00783016701164797; 0.008787017315519; 0.00966520403414828; 0.0104711725495786; 0.0112104424422129;
        0.0118877629465069; 0.0125072327280012; 0.0130723930666257; 0.0135863008455906; 0.0140515858450732;
        0.0144704954919429; 0.0148449292498389; 0.0151764641245157; 0.0154663722195507; 0.0157156308450969;
        0.0159249253131242; 0.0160946442141078; 0.0162248666370114; 0.0163153404448509; 0.0163654503313821;
        0.0163741739393692; 0.0163400237951661; 0.0162609721846827; 0.0161343553387716; 0.0159567523897626;
        0.0157238334875116; 0.015430170212766; 0.015069];
elseif(n == 49)
    ai = [0.0471088979591837; 0.0439532857142857; 0.0412894363873209; 0.0390122779550303; 0.0370403412310345;
        0.0353105142819385; 0.0337739161978756; 0.0323926650528809; 0.0311373569763392; 0.0299851081295991;
        0.0289180401575223; 0.0279221133270643; 0.0269862309031679; 0.0261015540568492; 0.0252609793576081;
        0.0244587411873015; 0.0236901096610007; 0.0229511612189438; 0.0222386042698783; 0.0215496463763273;
        0.0208818926894901; 0.0202332678415503; 0.0196019554307986; 0.0189863507086306; 0.0183850231936414;
        0.0177966867749504; 0.0172201754876328; 0.0166544235983048; 0.0160984489687827; 0.0155513389020785;
        0.0150122378425428; 0.01448033641964; 0.0139548614066715; 0.0134350662217037; 0.012920221634517;
        0.0124096063641284; 0.0119024972574934; 0.011398158730468; 0.0108958311245674; 0.0103947175839758;
        0.00989396898261761; 0.00939266632699161; 0.00888979992392801; 0.008384244432278; 0.00787472871553802;
        0.00735979918442863; 0.00683777507598784; 0.00630669387755102; 0.00576424489795918];
    bi = [-0.0858742857142857; -0.06908; -0.055839179331307; -0.0453097356944628; -0.0368515864499361;
        -0.0299796702788423; -0.0243273264470472; -0.0196179052864181; -0.0156428806820626; -0.0122450694716964;
        -0.00930583840713691; -0.00673540573849683; -0.00446552938875368; -0.00244402384483868; -0.000630669104408714;
        0.00100582775120908; 0.00249008031183903; 0.00384168057513741; 0.0050764191782156; 0.00620718312705743;
        0.00724461704139196; 0.00819761172986981; 0.00907366705774027; 0.00987916339846684; 0.0106195665265918;
        0.0112995838535711; 0.0119232848290859; 0.0124941946541872; 0.0130153678117823; 0.0134894460322147;
        0.0139187039634116; 0.0143050848468876; 0.014650227795655; 0.0149554877429036; 0.0152219487203282;
        0.0154504307887553; 0.0156414906498319; 0.0157954156924309; 0.0159122109521417; 0.0159915781700332;
        0.0160328858116375; 0.0160351285322511; 0.0159968741327566; 0.0159161955231676; 0.0157905845809184;
        0.0156168440408541; 0.0153909526704299; 0.0151078979591837; 0.0147614693877551];
elseif(n == 50)
    ai = [0.04616672; 0.043137332244898; 0.040570201632653; 0.0383686619018671; 0.0364572893443335;
        0.0347772866912093; 0.0332828296440056; 0.0319381869121225; 0.0307154591290591; 0.0295928107594203;
        0.0285530929487872; 0.0275827749632238; 0.0266711180668397; 0.0258095389557551; 0.0249911206862435;
        0.0242102378146474; 0.0234622695561969; 0.0227433804648643; 0.0220503526861443; 0.0213804574483501;
        0.0207313563104352; 0.020101024920854; 0.0194876937829134; 0.0188898018666553; 0.0183059599369634;
        0.0177349212487969; 0.0171755578472853; 0.0166268411465758; 0.0160878257819394; 0.0155576359627253;
        0.0150354537214133; 0.0145205085734469; 0.0140120681868379; 0.0135094297193484; 0.0130119115211136;
        0.0125188449261179; 0.0120295658691208; 0.0115434060658574; 0.0110596834825605; 0.0105776917939577;
        0.0100966884840518; 0.0096158811780651; 0.00913441170402287; 0.00865133726645144; 0.00816560797195844;
        0.00767603977873851; 0.00718128175423361; 0.00667977632653061; 0.00616971102040816; 0.00564896];
    bi = [-0.0841568; -0.0680342857142857; -0.0552520285714286; -0.0450353075987842; -0.0367912066604995;
        -0.0300672684903749; -0.0245190611779217; -0.0198848661431778; -0.0159660270051183; -0.0126117741001284;
        -0.00970756785190605; -0.0071661928108277; -0.00492098912491696; -0.0029207348093598; -0.00112579504964093;
        0.000494762139499557; 0.00196531788620066; 0.00330530287411321; 0.00453038489754314; 0.00565334916395638;
        0.0066847511348303; 0.00763340172611171; 0.00850672937232246; 0.00931105181376327; 0.01005178169456;
        0.01073358351301; 0.0113604946252364; 0.0119360194555487; 0.0124632034872934; 0.0129446917437196;
        0.0133827751254252; 0.0137794270021947; 0.0141363317525308; 0.0144549064228615; 0.0147363162812729;
        0.0149814847250812; 0.0151910977368601; 0.015365602847059; 0.0155052023357186; 0.0156098401766771;
        0.0156791819821213; 0.0157125869307029; 0.0157090703456768; 0.0156672552169508; 0.0155853105184794;
        0.0154608736460949; 0.0152909536778115; 0.0150718114285714; 0.0147988114285714; 0.01446624];
elseif(n == 51)
    ai = [0.0452614901960784; 0.0423509019607843; 0.0398753792717087; 0.037745837535014; 0.0358923521068002;
        0.0342600852514919; 0.0328060436173236; 0.0314965067593982; 0.0303049956611267; 0.0292106739862307;
        0.028197094618543; 0.0272512205098507; 0.0263626624725214; 0.025523087769252; 0.0247257625506929;
        0.0239651987020846; 0.0232368817636285; 0.0225370615254092; 0.0218625908691015; 0.0212108016065803;
        0.0205794085937266; 0.0199664353965472; 0.0193701563564777; 0.0187890511256216; 0.018221768689427;
        0.0176670986204707; 0.0171239478588935; 0.0165913217303519; 0.0160683082217018; 0.0155540647626172;
        0.0150478069276476; 0.0145487985933197; 0.0140563431708507; 0.0135697755959721; 0.013088454799915;
        0.0126117564143283; 0.0121390654805477; 0.0116697689414434; 0.0112032476920257; 0.0107388679520274;
        0.0102759716980162; 0.00981386585193551; 0.00935180986491995; 0.00888900125761066; 0.00842455857952185;
        0.00795750113003573; 0.00748672464390011; 0.00701097198879552; 0.00652879775910364; 0.00603852549019608;
        0.00553819607843137];
    bi = [-0.0825066666666667; -0.0670164078431373; -0.0546699204481793; -0.0447532459383754; -0.0367164066034925;
        -0.0301369238307719; -0.0246910255445255; -0.020131032792198; -0.0162676875168704; -0.0129564113951241;
        -0.0100866755897554; -0.00757381894104406; -0.00535278236228975; -0.00337333424647516; -0.00159644919839433;
        8.4264536837346e-06; 0.00146543141887874; 0.00279383135119896; 0.0040091719304984; 0.0051241399438425;
        0.00614920622203993; 0.00709310635075835; 0.00796320118430366; 0.00876574852029461; 0.00950610916840936;
        0.0101889045135147; 0.0108181380851752; 0.0113972902423334; 0.0119293925779572; 0.01241708681862;
        0.0128626716631391; 0.0132681400378408; 0.013635208541486; 0.0139653403337679; 0.0142597623309345;
        0.0145194772690347; 0.0147452709493915; 0.0149377147701096; 0.0150971634552327; 0.0152237477065976;
        0.0153173613115353; 0.0153776420322215; 0.0154039453697047; 0.0153953100271129; 0.0153504135815041;
        0.0152675165012166; 0.0151443922045414; 0.0149782403361345; 0.0147655798319328; 0.0145021176470588;
        0.0141825882352941];
elseif(n == 52)
    ai = [0.0443910769230769; 0.0415924343891403; 0.0392037574660633; 0.037142814221073; 0.0353446903684551;
        0.0337581861942813; 0.032342932197856; 0.0310670885141305; 0.0299055166827622; 0.0288383320840736;
        0.0278497619081263; 0.0269272473307308; 0.026060740048972; 0.0252421528341222; 0.0244649315989455;
        0.023723722914143; 0.0230141161723144; 0.0223324438816461; 0.0216756270411099; 0.0210410553446827;
        0.0204264942026372; 0.0198300123531668; 0.0192499252511902; 0.0186847505330075; 0.0181331727236432;
        0.017594015026306; 0.017066216550088; 0.0165488137253571; 0.0160409249528653; 0.0155417377539794;
        0.0150504978530599; 0.014566499742759; 0.0140890783698537; 0.0136176016416456; 0.0131514634973386;
        0.0126900773197361; 0.0122328694831546; 0.0117792728453937; 0.0113287199955997; 0.010880636065641;
        0.0104344308992168; 0.00998949034880807; 0.00954516643395328; 0.00910076604331621; 0.00865553779599081;
        0.00820865659343649; 0.0077592052923297; 0.00730615281189399; 0.00684832786037492; 0.00638438733031674;
        0.00591277828054299; 0.00543169230769231];
    bi = [-0.08092; -0.0660255203619909; -0.0540934407239819; -0.0444647224305107; -0.0366285402714932;
        -0.0301900101775571; -0.02484457100939; -0.0203577427243921; -0.016549208183904; -0.0132803551201355;
        -0.0104445733294464; -0.00795973440632831; -0.00576239114272747; -0.00380332446299659; -0.00204414038060082;
        -0.000454680493140389; 0.00098894082537876; 0.00230581923195583; 0.00351137765438516; 0.00461820663235441;
        0.00563669599538631; 0.00657551002279979; 0.00744194565502865; 0.00824220357321602; 0.00898159446219468;
        0.00966469704926184; 0.0102954801823223; 0.0108773979637641; 0.0114134645399683; 0.0119063133609692;
        0.0123582444131638; 0.0127712619675794; 0.0131471046826757; 0.0134872693822473; 0.0137930294418076;
        0.0140654484209089; 0.0143053893447331; 0.0145135198444042; 0.0146903131958114; 0.0148360451391009;
        0.0149507862055921; 0.0150343891172146; 0.0150864706477047; 0.0151063871368116; 0.0150932026204519;
        0.0150456482725959; 0.0149620715399744; 0.0148403729799612; 0.0146779283775048; 0.0144714932126697;
        0.0142170859728507; 0.0139098461538462];
elseif(n == 53)
    ai = [0.0435535094339623; 0.0408604760522497; 0.038554202680782; 0.0365586635703919; 0.0348135168786818;
        0.033270909490066; 0.0318929056276805; 0.0306494246890729; 0.0295165932481996; 0.0284754326369816;
        0.0275108173770197; 0.0266106513499878; 0.0257652183005217; 0.0249666713427812; 0.024208632838446;
        0.0234858815435372; 0.0227941084684832; 0.0221297266186219; 0.0214897228163654; 0.0208715422670871;
        0.0202729985165668; 0.0196922030415764; 0.0191275099868939; 0.018577472570464; 0.0180408084727206;
        0.0175163721471951; 0.0170031324714386; 0.0165001545280435; 0.0160065845882786; 0.0155216375844268;
        0.0150445865167302; 0.014574753359298; 0.0141115011163276; 0.013654226743329; 0.0132023546937367;
        0.0127553308838182; 0.0123126168913391; 0.0118736842180684; 0.0114380084540256; 0.011005063182674;
        0.0105743134606838; 0.010145208692543; 0.00971717469791457; 0.00928960473678938; 0.00886184921271396;
        0.0084332037164838; 0.00800289500098221; 0.00757006439243332; 0.00713374804551719; 0.00669285334244002;
        0.00624613062409289; 0.00579213933236575; 0.00532920754716981];
    bi = [-0.0793932075471698; -0.0650607837445573; -0.0535230769230769; -0.0441707871937164; -0.0365288457123343;
        -0.0302277958434462; -0.0249809495754204; -0.0205662343332712; -0.0168118321110739; -0.0135848706381313;
        -0.0107825590761906; -0.00832527202421454; -0.00615117846386866; -0.00421208941344008; -0.00247026182914686;
        -0.000895948753871823; 0.000534471355158285; 0.00183991824811119; 0.00303569030989246; 0.00413428291133988;
        0.0051460076320651; 0.00607946087943219; 0.00694187905948029; 0.00773940856016837; 0.00847731189997426;
        0.00916012607330069; 0.00979178505700356; 0.0103757153588076; 0.0109149111687667; 0.0114119939426674;
        0.0118692599607298; 0.0122887184552311; 0.0126721222003029; 0.0130209919394528; 0.0133366356405461;
        0.0136201632758248; 0.0138724975975179; 0.0140943811966262; 0.0142863799779003; 0.0144488830461312;
        0.0145820988685121; 0.0146860474475215; 0.014760548101888; 0.0148052023034454; 0.014819370848742;
        0.0148021444495944; 0.0147523065996086; 0.0146682873071435; 0.0145481059726068; 0.014389301323316;
        0.0141888458977205; 0.0139430420899855; 0.0136473962264151];
elseif(n == 54)
    ai = [0.042746962962963; 0.0401536715583508; 0.0379256534967478; 0.0359925145659619; 0.034298092246981;
        0.0327976155540107; 0.03145540780447; 0.0302430347239096; 0.0291378165496586; 0.0281216365789072;
        0.0271799902515123; 0.0263012286638278; 0.0254759586392823; 0.0246965683632968; 0.0239568533240432;
        0.0232517220598353; 0.0225769651487125; 0.0219290741154556; 0.0213050995871849; 0.0207025401961464;
        0.020119255488675; 0.0195533975218213; 0.0190033569723776; 0.0184677204965274; 0.0179452368037043;
        0.0174347894803607; 0.0169353750473318; 0.016446085082555; 0.0159660915091145; 0.0154946343534504;
        0.0150310114336592; 0.0145745695541332; 0.014124696869267; 0.0136808161426924; 0.0132423786750775;
        0.0128088587072132; 0.0123797481290781; 0.0119545513420119; 0.0115327801314256; 0.0111139484123043;
        0.0106975667091824; 0.0102831362258991; 0.00987014234747897; 0.00945804739589297; 0.00904628243209553;
        0.00863423785748145; 0.00822125251787279; 0.00780660095186599; 0.00738947835304417; 0.00696898273333523;
        0.00654409368507926; 0.00611364704617535; 0.00567630468204053; 0.00523051851851852];
    bi = [-0.077922962962963; -0.0641213696715584; -0.0529592313067785; -0.0438723813047232; -0.036418455345912;
        -0.0302514523897609; -0.0251013223167674; -0.0207576560436744; -0.0170567096234166; -0.0138711258718045;
        -0.0111018286418057; -0.00867165879361311; -0.00652039965387388; -0.00460090549199807; -0.00287610116897941;
        -0.001316666297858; 0.0001007455570168; 0.00139487166610544; 0.00258088313541181; 0.00367118027543543;
        0.0046759983349064; 0.0056038686743555; 0.00646197018872957; 0.0072563976883907; 0.0079923676026536;
        0.008674376436144; 0.00930632360083174; 0.00989160733089064; 0.0104332001715885; 0.0109337088614491;
        0.0113954221736446; 0.0118203493481057; 0.0122102510513658; 0.0125666642851676; 0.0128909222798476;
        0.0131841701182215; 0.0134473766127314; 0.0136813427824848; 0.0138867071322278; 0.0140639478108139;
        0.0142133816136279; 0.014335159684801; 0.0144292596651235; 0.0144954739151044; 0.0145333933146348;
        0.0145423859961138; 0.0145215702014556; 0.0144697802597123; 0.0143855244556652; 0.0142669332953888;
        0.0141116963677585; 0.0139169856474762; 0.0136793626834382; 0.0133946666666667];
elseif(n == 55)
    ai = [0.0419697454545455; 0.0394707555555556; 0.0373171149990471; 0.0354435491518963; 0.0337977212838709;
        0.0323377022432987; 0.0310299139625204; 0.029847463393728; 0.0287687970741013; 0.0277766180908682;
        0.0268570170337384; 0.0259987768238406; 0.0251928183057416; 0.0244317593673789; 0.0237095652735979;
        0.0230212720035313; 0.0223627677928807; 0.021730620905454; 0.021121943985761; 0.0205342872549388;
        0.0199655543734159; 0.0194139360633141; 0.0188778576108391; 0.0183559371955825; 0.0178469526550507;
        0.0173498148186012; 0.0168635459602667; 0.0163872622455808; 0.0159201593008821; 0.0154615002291015;
        0.0150106055456606; 0.0145668446216091; 0.0141296283064752; 0.0136984024669518; 0.0132726422246017;
        0.0128518467102684; 0.0124355341778742; 0.0120232373380017; 0.0116144987836229; 0.0112088663874575;
        0.0108058885531041; 0.0104051092002394; 0.0100060623574092; 0.00960826622357124; 0.00921121654073174;
        0.00881437909384785; 0.00841718111976598; 0.00801900136369242; 0.00761915846923332; 0.00721689732665164;
        0.00681137293467416; 0.00640163125595578; 0.00598658646845817; 0.00556499393939394; 0.00513541818181818];
    bi = [-0.0765061818181818; -0.0632064646464646; -0.0524022321326472; -0.0435703480083858; -0.0362984053184453;
        -0.0302620626150517; -0.02520676700988; -0.0209330743685467; -0.0172849071095738; -0.0141402009243991;
        -0.0114034857992272; -0.0090000262397314; -0.00687121256338291; -0.00497095128495057; -0.00326284952085727;
        -0.00171802733002097; -0.000313424174528903; 0.000969507747548852; 0.0021458087793586; 0.00322778344023753;
        0.00422559179810047; 0.00514770238703211; 0.00600123921591213; 0.00679224804874349; 0.0075259013200179;
        0.00820665648571847; 0.00883837905750968; 0.00942443882102735; 0.00996778563138618; 0.0104710095729508;
        0.0109363890547444; 0.0113659294979894; 0.0117613945867169; 0.0121243315397017; 0.0124560914780482;
        0.0127578456734704; 0.013030598241548; 0.0132751956722419; 0.0134923334518194; 0.0136825599148926;
        0.0138462773640608; 0.0139837404011119; 0.0140950513226022; 0.0141801523393902; 0.0142388142801989;
        0.0142706213295198; 0.0142749512260524; 0.0142509502052073; 0.0141975018036397; 0.0141131884509916;
        0.0139962445498268; 0.0138444994854202; 0.0136553087097389; 0.0134254707070707; 0.0131511272727273];
elseif(n == 56)
    ai = [0.0412202857142857; 0.0388105454545455; 0.0367276536796537; 0.0349109982302813; 0.0333117496800893;
        0.0318906021175766; 0.0306159285289873; 0.0294622792970819; 0.028409163743439; 0.0274400643901223;
        0.0265416419183377; 0.0257030958503591; 0.0249156519470174; 0.0241721523465099; 0.0234667287028717;
        0.022794542129379; 0.022151576713908; 0.021534475837254; 0.0209404125673451; 0.0203669870876296;
        0.0198121455030059; 0.0192741154999003; 0.0187513552598322; 0.018242512773356; 0.0177463933035812;
        0.0172619332309697; 0.016788178895203; 0.0163242693536333; 0.0158694222142871; 0.0154229218871825;
        0.0149841097413314; 0.0145523757648946; 0.0141271514096504; 0.0137079033640468; 0.0132941280463035;
        0.0128853466440433; 0.0124811005526656; 0.0120809470833103; 0.0116844553243867; 0.0112912020492967;
        0.0109007675677654; 0.0105127314192968; 0.0101266678045781; 0.00974214064377594; 0.00935869813902114;
        0.00897586670127512; 0.00859314407848026; 0.00820999149175965; 0.00782582454896195; 0.00744000265986326;
        0.0070518166251063; 0.0066604740123608; 0.00626508186991206; 0.00586462626262626; 0.00545794805194805;
        0.00504371428571429];
    bi = [-0.07514; -0.0623152727272727; -0.0518523434343434; -0.0432654427291786; -0.0361696439870402;
        -0.0302606278097288; -0.0252982849852577; -0.0210934810492751; -0.0174974148053275; -0.0143930965447951;
        -0.011688551253736; -0.00931141961320859; -0.00720468669825432; -0.00532331638021253; -0.00363160979186528;
        -0.00210113992881603; -0.000709142501552904; 0.000562733632854734; 0.00172939400521692; 0.00280304590457794;
        0.00379377467389763; 0.00470998765927146; 0.00555875618999655; 0.0063460792772459; 0.00707708739447141;
        0.00775620049235717; 0.00838725109457966; 0.00897358074181299; 0.00951811605421772; 0.0100234291465521;
        0.0104917859563774; 0.0109251851544432; 0.0113253896326812; 0.0116939520577696; 0.0120322355962298;
        0.012341430628591; 0.0126225680506133; 0.0128765295899577; 0.0131040554326093; 0.013305749343915;
        0.013482081376011; 0.013633388170394; 0.013759870786438; 0.0138615899097246; 0.0139384582145599;
        0.0139902295697169; 0.0140164846820068; 0.0140166126654664; 0.0139897879013469; 0.0139349414122195;
        0.0138507258089056; 0.0137354726782651; 0.0135871410601977; 0.0134032554112554; 0.0131808311688312;
        0.0129162857142857];
elseif(n == 57)
    ai = [0.0404971228070176; 0.0381719348370927; 0.0361563928001823; 0.0343941380218222; 0.0328395609874696;
        0.0314557799367869; 0.0302129831430672; 0.0290870734256127; 0.0280585630537146; 0.0271116754390649;
        0.0262336170551712; 0.0254139890239978; 0.024644312910054; 0.0239176495826518; 0.0232282936556448;
        0.0225715290850459; 0.0219434340811646; 0.021340725645427; 0.0207606358356086; 0.0202008133512606;
        0.0196592452607159; 0.0191341947028006; 0.0186241512251246; 0.0181277910964367; 0.0176439454785113;
        0.0171715747850806; 0.0167097479098474; 0.0162576252881727; 0.0158144449807328; 0.0153795111433027;
        0.0149521843840367; 0.0145318736158533; 0.0141180290931269; 0.0137101363840621; 0.0133077110771275;
        0.0129102940551848; 0.0125174471971732; 0.0121287493865179; 0.0117437927193816; 0.0113621788155987;
        0.0109835151413353; 0.010607411255576; 0.0102334748925361; 0.00986130778887623; 0.00949050115779641;
        0.00912063070122768; 0.00875125103585015; 0.0083818893879721; 0.00801203838589753; 0.00764114774593296;
        0.00726861460954037; 0.00689377224460045; 0.00651587677407737; 0.00613409154198628; 0.0057474686716792;
        0.00535492731829574; 0.00495522807017544];
    bi = [-0.0738217543859649; -0.0614470175438596; -0.0513097735247209; -0.0429583420166578; -0.0360330396182948;
        -0.0302480743549363; -0.0253768073003729; -0.0212397994089699; -0.0176951536675425; -0.0146307415939178;
        -0.0119579705810493; -0.00960680607693829; -0.00752181140494199; -0.00565900932327097; -0.00398340422072487;
        -0.00246703305191994; -0.00108743752496794; 0.00017352963429711; 0.00133063469455488; 0.0023959856941843;
        0.00337959309389252; 0.00428980414432195; 0.00513363928006763; 0.00591705278103571; 0.00664513507503486;
        0.00732227017762908; 0.00795225869541538; 0.00853841440467066; 0.00908364053138351; 0.00959049039524951;
        0.0100612159519715; 0.0104978069036628; 0.0109020223881848; 0.0112754167580207; 0.0116193605803723;
        0.0119350577029553; 0.0122235590112551; 0.01248577333477; 0.0127224758281642; 0.0129343140476898;
        0.0131218118556627; 0.0132853712100414; 0.0134252718274856; 0.0135416686428641; 0.0136345869228527;
        0.0137039148231944; 0.0137493931057377; 0.0137706016498863; 0.0137669423009327; 0.0137376174921322;
        0.013681603955516; 0.0135976206955353; 0.0134840902370277; 0.0133390919723551; 0.0131603062200957;
        0.0129449473684211; 0.0126896842105263];
elseif(n == 58)
    ai = [0.0397988965517242; 0.037553887477314; 0.0356025081669692; 0.0338922867513612; 0.0323805738693652;
        0.0310327303732805; 0.0298206348261577; 0.0287214578152087; 0.0277166582247744; 0.026791163595837;
        0.025932702689374; 0.0251312634950134; 0.0243786542972483; 0.023668149128748; 0.0229942020922388;
        0.0223522176966655; 0.0217383665980773; 0.0211494380206359; 0.0205827217104555; 0.020035913590077;
        0.01950704037365; 0.0189943993064803; 0.0184965099369133; 0.0180120754389088; 0.0175399515018164;
        0.0170791212083683; 0.0166286746485752; 0.0161877922795011; 0.0157557312501739; 0.0153318140767884;
        0.0149154191839323; 0.014505972929609; 0.0141029428109565; 0.01370583160846; 0.0133141722729663;
        0.0129275233950609; 0.0125454651228843; 0.0121675954142373; 0.0117935265233781; 0.0114228816333907;
        0.0110552915521836; 0.0106903913945511; 0.0103278171745213; 0.00996720223143656; 0.00960817340968807;
        0.00925034690544087; 0.00889332368363491; 0.00853668435456341; 0.00817998338096101; 0.00782274246338694;
        0.00746444292350742; 0.00710451687162347; 0.00674233690671741; 0.00637720405506976; 0.00600833360831546;
        0.00563483847549909; 0.00525570961887477; 0.00486979310344827];
    bi = [-0.0725489655172414; -0.060600943738657; -0.0507746823956443; -0.0426496515426497; -0.0358893873764872;
        -0.030225259733589; -0.02544320031808; -0.0213728900267432; -0.0178789814651955; -0.0148539996468265;
        -0.0122126212629051; -0.00988708199880523; -0.00782350320940775; -0.00597896480152014; -0.00431918124167177;
        -0.00281666295675018; -0.00144926667852422; -0.000199056078492598; 0.00094859114663773; 0.00200568130302666;
        0.00298214928202947; 0.00388628283047126; 0.00472505286168017; 0.00550437065511672; 0.00622928834863806;
        0.00690415556137935; 0.00753274214096953; 0.00811833477441957; 0.00866381342656725; 0.0091717121806398;
        0.00964426797518477; 0.0100834598966612; 0.010491041045204; 0.0108685645000447; 0.0112174045365736;
        0.0115387739616905; 0.0118337382162543; 0.0121032267260662; 0.0123480418526962; 0.012568865692359;
        0.0127662648871355; 0.0129406935421178; 0.0130924942798969; 0.0132218974065858; 0.0133290181083294;
        0.0134138515414949; 0.0134762656212079; 0.0135159912494575; 0.0135326096534989; 0.0135255364255648;
        0.0134940017637107; 0.0134370263086987; 0.0133533918509133; 0.0132416060422739; 0.0130998600890942;
        0.0129259782214156; 0.0127173575317604; 0.0124708965517241];
elseif(n == 59)
    ai = [0.0391243389830509; 0.0369554319111631; 0.0350652242763543; 0.0334048016241656; 0.0319342395923926;
        0.0306209759174693; 0.0294384642915234; 0.0283650642772669; 0.0273831283688202; 0.0264782532240506;
        0.0256386672042089; 0.0248547307431991; 0.024118529823959; 0.0234235460450489; 0.0227643894891691;
        0.0221365829210203; 0.0215363878011168; 0.0209606642544642; 0.0204067585218588; 0.0198724125849433;
        0.0193556916271227; 0.0188549257997698; 0.0183686634317194; 0.0178956333713698; 0.0174347146033148;
        0.016984911651213; 0.0165453345791862; 0.0161151826470519; 0.0156937308700211; 0.0152803188895239;
        0.0148743416856569; 0.0144752417593448; 0.014082502488684; 0.0136956424232723; 0.0133142103260819;
        0.0129377808074614; 0.0125659504224686; 0.0121983341228085; 0.011834561969637; 0.0114742760245113;
        0.0111171273436429; 0.0107627730058796; 0.0104108731078557; 0.0100610876606096; 0.00971307332065833;
        0.00936647988485922; 0.00902094647209998; 0.00867609730561082; 0.00833153699709583; 0.00798684521758596;
        0.00764157061961706; 0.00729522385085157; 0.00694726947058856; 0.00659711654798935; 0.00624410768486489;
        0.00588750616752284; 0.00552648091297795; 0.00516008883693747; 0.00478725423728813];
    bi = [-0.0713193220338983; -0.0597763179427236; -0.0502471881632779; -0.042339913254791; -0.0357394156695069;
        -0.0301929780129263; -0.0254982707617236; -0.0214935558235671; -0.0180496981944699; -0.0150636748454451;
        -0.01245331893369; -0.0101530794548441; -0.00811061240031219; -0.00628405013204588; -0.00463982172635322;
        -0.00315091908076838; -0.00179552216620373; -0.00055591241954421; 0.000582383668688854; 0.00163126784074842;
        0.002600598284367; 0.00349860338389925; 0.00433220551340431; 0.00510727438555473; 0.00582882541655077;
        0.0065011752922283; 0.00712806428994725; 0.00771275281039295; 0.00825809790645365; 0.00876661428150855;
        0.0092405231987181; 0.00968179193967087; 0.010092165828279; 0.010473194355811; 0.0108262525742252;
        0.0111525586423552; 0.0114531881928551; 0.0117290860211661; 0.0119810754685498; 0.0122098657696606;
        0.0124160575536068; 0.0126001466201451; 0.012762526055039; 0.0129034866971925; 0.0130232159221422;
        0.0131217946595637; 0.0131991925146315; 0.013255260812556; 0.0132897233306601; 0.0133021644212124;
        0.0132920141591174; 0.0132585300696634; 0.0132007749009799; 0.0131175898018606; 0.0130075621464266;
        0.0128689871112615; 0.0126998219569965; 0.0124976317942724; 0.0122595254237288];
elseif(n == 60)
    ai = [0.0384722666666667; 0.0363756564971752; 0.0345438107929086; 0.032931076063039; 0.0315000397346376;
        0.0302200649584218; 0.0290660743825926; 0.0280175432076424; 0.0270576676837994; 0.0261726802753652;
        0.0253512870874457; 0.0245842069153309; 0.0238637945107411; 0.0231837334297286; 0.0225387861940549;
        0.0219245915143738; 0.0213375000364058; 0.0207744415217747; 0.0202328175996094; 0.0197104152552175;
        0.0192053370859442; 0.0187159450760138; 0.0182408152428092; 0.017778701004981; 0.0173285035338148;
        0.0168892476870685; 0.0164600624007447; 0.0160401646390615; 0.0156288461848018; 0.0152254626986055;
        0.0148294245928294; 0.014440189358617; 0.0140572550582251; 0.0136801547521942; 0.0133084516757217;
        0.012941735013199; 0.0125796161464231; 0.0122217252722187; 0.011867708300485; 0.0115172239551011;
        0.0111699410084945; 0.0108255355865865; 0.0104836884846748; 0.0101440824367925; 0.00980639928127826;
        0.00947031696362756; 0.00913550631401373; 0.00880162753093381; 0.00846832629395622; 0.00813522941722592;
        0.00780193994093086; 0.00746803154012137; 0.00713304210897336; 0.00679646635381883; 0.00645774720026249;
        0.00611626578896101; 0.00577132980200355; 0.0054221598285603; 0.00506787344632768; 0.00470746666666667];
    bi = [-0.0701306666666667; -0.0589724293785311; -0.0497273726865381; -0.0420296117793022; -0.0355837919140341;
        -0.0301519648507593; -0.0255427703074818; -0.0216025466359593; -0.0182080509084417; -0.0152605171003747;
        -0.0126808229367543; -0.0104055720350518; -0.00838392893788003; -0.00657507112130281; -0.00494614465890896;
        -0.00347062942415178; -0.00212703597398424; -0.000897869974105334; 0.000231188447740788; 0.00127193338891708;
        0.00223414483175469; 0.00312599154266464; 0.00395434797402904; 0.00472504341147115; 0.0054430579138765;
        0.00611267658915886; 0.00673761131943659; 0.00732109709601917; 0.00786596856318443; 0.00837472112887354;
        0.00884956002013468; 0.00929243989118409; 0.00970509699055002; 0.0100890754264049; 0.0104457487075534;
        0.0107763374585734; 0.0110819239926742; 0.0113634642600216; 0.011621797560731; 0.0118576543111109;
        0.0120716620717492; 0.0122643499810081; 0.0124361516830293; 0.0125874067920293; 0.01271836089181;
        0.0128291640288382; 0.012919867617169; 0.0129904196323059; 0.0130406579273325; 0.0130703014569078;
        0.0130789391415446; 0.0130660160445382; 0.0130308164654892; 0.0129724434760516; 0.0128897943338768;
        0.0127815311083085; 0.0126460457350272; 0.0124814185856224; 0.0122853694915254; 0.0120552];
elseif(n == 61)
    ai = [0.0378415737704918; 0.0358137049180328; 0.034037579327591; 0.032470537179868; 0.0310774840883912;
        0.0298295700227276; 0.0287030886296809; 0.0276785624702163; 0.0267399846757165; 0.0258741918557019;
        0.0250703468381301; 0.0243195130625101; 0.0236143052376974; 0.0229486032760144; 0.0223173185728316;
        0.0217162034599614; 0.0211416961611777; 0.0205907948533641; 0.0200609555176318; 0.0195500091779753;
        0.0190560948941331; 0.0185776055208093; 0.0181131437852304; 0.0176614866847362; 0.0172215565792931;
        0.0167923976621765; 0.0163731567457229; 0.0159630675067071; 0.015561437505039; 0.0151676374264922;
        0.0147810921105418; 0.0144012730127476; 0.0140276918214106; 0.0136598950037815; 0.013297459100711;
        0.0129399866226268; 0.0125871024260544; 0.0122384504701424; 0.0118936908681145; 0.0115524971602629;
        0.011214553743835; 0.0108795534015314; 0.0105471948747669; 0.0102171804305982; 0.00988921337244789;
        0.00956299544445795; 0.00923822407742722; 0.00891458942066861; 0.00859177109856226; 0.00826943462284164;
        0.00794722738148532; 0.00762477411227158; 0.00730167175341145; 0.00697748354512; 0.00665173223455396;
        0.00632389221244659; 0.00599338038343984; 0.00565954554426038; 0.00532165601555988; 0.00497888524590164;
        0.00463029508196721];
    bi = [-0.0689809836065574; -0.0581885901639344; -0.0492152864684635; -0.0417191801554072; -0.0354231277754609;
        -0.0301029020715071; -0.0255773997657143; -0.0217005633419379; -0.0183547380381416; -0.0154452267261489;
        -0.0128958412760895; -0.0106452800331448; -0.00864418776129283; -0.00685277735891267; -0.00523891229521396;
        -0.00377656547492565; -0.00244458448593008; -0.00122570525318461; -0.000105766307029227; 0.000926915564797958;
        0.00188204034505786; 0.00276771658411097; 0.00359077109756928; 0.00435699360044427; 0.00507132994712889;
        0.00573803489290939; 0.00636079305211433; 0.00694281491464623; 0.00748691332312194; 0.00799556464471194;
        0.00847095794213519; 0.00891503471259859; 0.00932952118448019; 0.00971595470821448; 0.0100757054244944;
        0.0104099941185034; 0.0107199069562758; 0.011006407634581; 0.011270347347818; 0.01151247287544;
        0.0117334330144167; 0.0119337835177192; 0.0121139906474896; 0.0122744334071271; 0.0124154044773483;
        0.0125371098453119; 0.0126396670814249; 0.0127231021840479; 0.0127873448766996; 0.0128322222043488;
        0.0128574502337842; 0.012862623616715; 0.0128472027219656; 0.0128104979836605; 0.012751651044427;
        0.0126696121951601; 0.0125631135246784; 0.012430637092679; 0.0122703773270353; 0.0120801967213115;
        0.0118575737704918];
elseif(n == 62)
    ai = [0.0372312258064516; 0.0352687720782655; 0.0335458804865151; 0.0320226434583083; 0.0306661087380285;
        0.0294490861566888; 0.028349149915626; 0.027347806351604; 0.0264298014124953; 0.0255825457835153;
        0.024795638827446; 0.0240604752958861; 0.0233699211838273; 0.0227180471828832; 0.0220999099804401;
        0.0215113731895274; 0.0209489610098771; 0.0204097388433555; 0.0198912160422374; 0.019391266779193;
        0.0189080657132091; 0.0184400357033737; 0.0179858053077708; 0.0175441742109722; 0.0171140850623792;
        0.0166946004890433; 0.0162848842793047; 0.0158841859252026; 0.0154918278686143; 0.0151071949240949;
        0.0147297254551865; 0.0143589039646649; 0.0139942548262714; 0.0136353369389102; 0.0132817391265769;
        0.0129330761405352; 0.0125889851462246; 0.0122491225975392; 0.0119131614166459; 0.0115807884093911;
        0.0112517018553396; 0.0109256092181913; 0.0106022249271757; 0.0102812681833185; 0.00996246074641831;
        0.00964552465921746; 0.00933017986462055; 0.00901614166981354; 0.00870311800763553; 0.00839080644038146;
        0.00807889084416807; 0.0077670377028785; 0.00745489192933589; 0.00714207211760914; 0.00682816511416706;
        0.00651271977701851; 0.00619523977119691; 0.00587517522634053; 0.0055519130582868; 0.00522476573241671;
        0.00489295822316235; 0.00455561290322581];
    bi = [-0.0678683870967742; -0.0574241353781068; -0.0487109529349551; -0.0414090049745001; -0.0352579839326274;
        -0.0300464218529306; -0.0256028128958601; -0.0217882615939459; -0.0184904132702744; -0.0156184585823068;
        -0.0130990350377751; -0.0108728750918424; -0.00889207355969494; -0.00711786700200992; -0.00551883485322312;
        -0.0040694467141095; -0.00274889273331716; -0.00154014463549894; -0.000429203963864191; 0.000595498288515464;
        0.00154358008779566; 0.002423088880817; 0.00324080383315553; 0.00400247567840283; 0.00471301700732954;
        0.00537665330359613; 0.00599704296838138; 0.00657737289524289; 0.00712043479472772; 0.00762868637098901;
        0.00810430057334757; 0.00854920544490562; 0.0089651165347271; 0.00935356340190083; 0.00971591139581677;
        0.0100533796280385; 0.0103670558415003; 0.0106579087195508; 0.0109267980502241; 0.0111744830616868;
        0.0114016291664572; 0.0116088132894431; 0.011796527903976; 0.0119651838575862; 0.012115112032718;
        0.0122465638549301; 0.0123597106307374; 0.0124546416678007; 0.0125313611005063; 0.012589783313072;
        0.0126297268191785; 0.0126509064208088; 0.0126529234284979; 0.012635253679572; 0.0125972330391719;
        0.0125380400099104; 0.012456675008909; 0.0123519357947965; 0.0122223884412337; 0.0120663331570598;
        0.0118817641459545; 0.0116663225806452];
elseif(n == 63)
    ai = [0.036640253968254; 0.034740100358423; 0.033068101164245; 0.0315868826269799; 0.0302654742958554;
        0.029078229438435; 0.0280039192415109; 0.0270249745832953; 0.0261268528109139; 0.0252975101466471;
        0.0245269631247991; 0.023806924876065; 0.0231305041705079; 0.0224919569420799; 0.0218864815812935;
        0.0213100506287998; 0.0207592726585204; 0.0202312791288715; 0.0197236318260134; 0.0192342472429811;
        0.0187613348498197; 0.0183033467272335; 0.0178589364727786; 0.017426925655661; 0.0170062764037102;
        0.0165960689627632; 0.016195483282065; 0.0158037838559257; 0.0154203071974374; 0.0150444514394436;
        0.014675667655378; 0.0143134525716729; 0.0139573424072606; 0.0136069076269104; 0.0132617484359857;
        0.0129214908765816; 0.0125857834104937; 0.0122542938944252; 0.011926706868349; 0.0116027210899236;
        0.0112820472570336; 0.0109644058674752; 0.0106495251699611; 0.0103371391643112; 0.0100269856111356;
        0.00971880401262731; 0.00941233352631638; 0.00910731077276776; 0.00880346749615789; 0.00850052803331904;
        0.00819820654204904; 0.0078962039330831; 0.00759420444195303; 0.00729187176687753; 0.00698884468673381;
        0.00668473205902092; 0.00637910708159076; 0.00607150068396709; 0.00576139389461742; 0.00544820901009796;
        0.00513129937129091; 0.00480993753200205; 0.00448330158730159];
    bi = [-0.0667911111111111; -0.0566784229390681; -0.048214372172278; -0.0410994309888948; -0.0350888744125459;
        -0.0299831105600029; -0.0256196198934246; -0.0218662552053658; -0.0186156890372442; -0.015780825782456;
        -0.0132910223458313; -0.0110889843666585; -0.00912822506487072; -0.00737099110118286; -0.00578657477750553;
        -0.00434994473589672; -0.00304063830410066; -0.00184186801688642; -0.000739802823000085; 0.000277008747503896;
        0.00121810046758297; 0.00209145755487629; 0.00290381124927294; 0.00366087364476647; 0.0043675248025427;
        0.00502796186375072; 0.00564581798024173; 0.00622425732507617; 0.00676605117599275; 0.00727363903634509;
        0.00774917792820305; 0.00819458232644205; 0.00861155667109195; 0.00900162197303362; 0.00936613769440473;
        0.00970631982239091; 0.0100232558490221; 0.0103179172083219; 0.0105911695960049; 0.0108437814980561;
        0.0110764311766592; 0.0112897123000484; 0.0114841383529544; 0.0116601459232556; 0.0118180969257574;
        0.011958279793748; 0.0120809096415648; 0.012186127375582; 0.0122739977057384; 0.0123445059840436;
        0.0123975537695832; 0.0124329529905873; 0.0124504185423339; 0.0124495591242308; 0.012429866079528;
        0.0123906999559338; 0.0123312744541022; 0.0122506373727269; 0.0121476480930656; 0.0120209510714915;
        0.0118689447256428; 0.0116897450076805; 0.0114811428571429];
elseif(n == 64)
    ai = [0.03606775; 0.0342269761904762; 0.0326036620583718; 0.0311627697048677; 0.0298751642806779;
        0.0287166356079454; 0.027667074584324; 0.0267097814274236; 0.0258308859572911; 0.0250188628627683;
        0.0242641272981379; 0.0235586982488777; 0.0228959189251357; 0.0222702250206343; 0.0216769530417578;
        0.0211121820922155; 0.0205726035158008; 0.0200554136737959; 0.0195582258826608; 0.0190789981778973;
        0.0186159741156542; 0.0181676342873441; 0.0177326566153603; 0.017309883829693; 0.0168982968043838;
        0.0164969926668399; 0.0161051667885664; 0.0157220979285794; 0.0153471359355661; 0.0149796915260432;
        0.0146192277470434; 0.0142652528064101; 0.0139173140143533; 0.013574992628858; 0.0132378994368521;
        0.0129056709344341; 0.0125779659943792; 0.0122544629288019; 0.0119348568702638; 0.0116188574066215;
        0.0113061864141987; 0.0109965760409817; 0.0106897667969241; 0.0103855057124149; 0.0100835445287698;
        0.00978363788638114; 0.00948554147700367; 0.00918901012658054; 0.00889379577398783; 0.00859964530903443;
        0.00830629822988421; 0.00801348407564841; 0.00772091958409069; 0.00742830551706697; 0.00713532308737486;
        0.00684162991003948; 0.00654685538869229; 0.00625059543366369; 0.00595240639286216; 0.00565179805973156;
        0.0053482256049961; 0.00504108026113671; 0.00472967857142857; 0.00441325];
    bi = [-0.0657475; -0.0559508333333333; -0.0477255241935484; -0.0407907652476644; -0.0349162705358717;
        -0.0299135122584828; -0.0256283905825816; -0.0219351192305384; -0.0187311396670524; -0.0159329030248097;
        -0.0134723819086503; -0.0112941942635998; -0.00935323891731732; -0.00761275751410097; -0.00604275061741143;
        -0.0046186870154004; -0.0033204549385481; -0.00213151218666385; -0.00103819923967124; -2.91854491692249e-05;
        0.000904976485252277; 0.00177220823631323; 0.0025791926160542; 0.00333160319568651; 0.00403428804333689;
        0.00469141673259523; 0.00530659802697598; 0.00588297420576982; 0.00642329681659186; 0.00692998767718005;
        0.00740518816751646; 0.00785079922219438; 0.00826851392578119; 0.0086598442083913; 0.00902614281595126;
        0.00936862147392361; 0.00968836596140111; 0.0099863486535967; 0.0102634389658806; 0.0105204120343365;
        0.010757955890397; 0.010976677325689; 0.0111771065939699; 0.0113597010569086; 0.0115248478470725;
        0.0116728655929148; 0.011804005225297; 0.0119184498619197; 0.012016313743969; 0.0120976401774655;
        0.0121623984094806; 0.0122104793458717; 0.0122416899918158; 0.0122557464685313; 0.0122522654285033;
        0.0122307536565861; 0.0121905956048595; 0.0121310385643779; 0.0120511751263045; 0.0119499225277631;
        0.0118259984135378; 0.0116778924731183; 0.0115038333333333; 0.01130175];
elseif(n == 65)
    ai = [0.0355128615384615; 0.0337287269230769; 0.0321520153846154; 0.0307498452026468; 0.0294947836255407;
        0.0283639588041872; 0.0273383098390533; 0.0264019548223602; 0.0255416594619644; 0.0247463912471981;
        0.024006946195802; 0.0233156370380005; 0.0226660332783629; 0.0220527449550633; 0.0214712431134888;
        0.0209177110483835; 0.0203889212651368; 0.0198821338836465; 0.0193950128727804; 0.0189255570734759;
        0.0184720434561036; 0.0180329804736082; 0.0176070697256416; 0.01719317444878; 0.0167902936013536;
        0.016397540524867; 0.0160141253431286; 0.0156393404099804; 0.01527254824124; 0.0149131714698912;
        0.014560684448935; 0.0142146061964597; 0.0138744944348374; 0.0135399405225886; 0.0132105651151806;
        0.0128860144213602; 0.0125659569458807; 0.0122500806287643; 0.011938090306482; 0.0116297054323973;
        0.0113246580031635; 0.0110226906449958; 0.0107235548192856; 0.0104270091112069; 0.0101328175680254;
        0.00984074805593666; 0.00955057060553228; 0.00926205571647756; 0.00897497259168724; 0.008689087270168;
        0.00840416062569385; 0.00811994619550037; 0.00783618779912009; 0.00755261690222374; 0.00726894967377484;
        0.00698488367686111; 0.00670009412418076; 0.00641422961832471; 0.0061269072847641; 0.00583770719196192;
        0.0055461659385212; 0.00525176927212573; 0.00495394358974359; 0.00465204615384615; 0.00434535384615385];
    bi = [-0.064736; -0.0552407692307692; -0.0472443717948718; -0.0404832808105873; -0.0347406045098917;
        -0.0298381319373822; -0.025629657343702; -0.0219953927725963; -0.0188373042338345; -0.016075229590277;
        -0.0136436562048494; -0.011489053799476; -0.00956767315174921; -0.00784373444837346; -0.00628794055489207;
        -0.00487626035408909; -0.00358893583533408; -0.00240967394966952; -0.00132499052899733; -0.000323678934867209;
        0.000603619328734085; 0.00146476092848872; 0.00226637955497181; 0.00301411017219067; 0.00371276920661464;
        0.0043664992869944; 0.00497888553957789; 0.00555304911295131; 0.00609172251013634; 0.00659731040588409;
        0.00707193889247633; 0.00751749550039115; 0.00793566185746489; 0.0083279404617063; 0.00869567673175141;
        0.00904007725080121; 0.00936222492277663; 0.00966309160336849; 0.00994354864537799; 0.010204375700427;
        0.0104462680421998; 0.0106698426153404; 0.0108756429653273; 0.011064143165166; 0.0112357508222374;
        0.0113908092212868; 0.0115295986358373; 0.0116523368191014; 0.0117591786657792; 0.0118502150171763;
        0.0119254705631693; 0.0119849007750745; 0.0120283877828788; 0.0120557350880013; 0.0120666609782419;
        0.0120607904842609; 0.0120376456862722; 0.0119966341450405; 0.0119370351921807; 0.0118579837706274;
        0.0117584514664606; 0.0116372243176179; 0.0114928769230769; 0.0113237423076923; 0.0111278769230769];
elseif(n == 66)
    ai = [0.0349747878787879; 0.033244717948718; 0.0317126427738928; 0.0303476734654235; 0.0291239573025541;
        0.0280198703996808; 0.0270173338383222; 0.026101235584398; 0.0252589428471342; 0.0244798915909208;
        0.0237552417157741; 0.0230775880031189; 0.0224407183062006; 0.0218394116709395; 0.0212692701236184;
        0.0207265787745683; 0.0202081896782703; 0.0197114255745811; 0.0192340002261563; 0.0187739525751927;
        0.0183295923786997; 0.0178994553548021; 0.017482266191242; 0.0170769080384624; 0.0166823973397912;
        0.0162978630458866; 0.0159225294246751; 0.0155557018158141; 0.0151967547940202; 0.0148451223016977;
        0.0145002893910525; 0.0141617852817669; 0.0138291774944901; 0.0135020668647344; 0.0131800832778577;
        0.0128628819950322; 0.0125501404636289; 0.0122415555242877; 0.0119368409419403; 0.0116357251999262;
        0.0113379495056815; 0.0110432659637819; 0.0107514358777787; 0.0104622281466035; 0.0101754177245703;
        0.00989078411636175; 0.00960810987997272; 0.00932717911146384; 0.00904777588560009; 0.00876968262599035;
        0.00849267837717891; 0.00821653694920291; 0.00794102490234213; 0.00766589933606136; 0.00739090544138796;
        0.00711577377009436; 0.00684021716699772; 0.00656392730340759; 0.00628657074024518; 0.0060077844386796;
        0.00572717062439881; 0.00544429089906509; 0.00515865947940948; 0.00486973543123543; 0.00457691375291375;
        0.00427951515151515];
    bi = [-0.0637551515151515; -0.054547655011655; -0.0467708630536131; -0.0401772200854701; -0.0345622727022082;
        -0.0297574384665514; -0.0256239178015562; -0.0220475815487349; -0.0189346891440809; -0.0162083120478791;
        -0.0138053543510529; -0.0116740776276523; -0.00977205034297607; -0.00806445367103272; -0.00652268561479885;
        -0.00512321403072479; -0.00384663669086054; -0.00267691301189116; -0.00160073766601403; -0.000607031076588497;
        0.000313474107510451; 0.00116856798116544; 0.00196483426197787; 0.00270786904539939; 0.00340245729702692;
        0.00405271517644155; 0.00466220481068776; 0.0052340269069811; 0.0057708955763285; 0.00627519890008759;
        0.00674904808201809; 0.00719431746484947; 0.0076126772319524; 0.00800562024349913; 0.00837448415730769;
        0.00872046974447479; 0.00904465611802069; 0.00934801343995535; 0.00963141355080618; 0.00989563886940672;
        0.0101413898344254; 0.01036929109846; 0.0105798966370731; 0.0107736938961019; 0.0109511070687013;
        0.0111124995670669; 0.0112581757312137; 0.0113883817973967; 0.0115033061308351; 0.0116030787105758;
        0.0116877698379751; 0.0117573880238285; 0.0118118769921409; 0.0118511117204332; 0.0118748934168596;
        0.0118829433128169; 0.0118748951256827; 0.0118502860193612; 0.0118085458599639; 0.0117489845297337;
        0.0116707770237871; 0.0115729460109783; 0.0114543414918415; 0.0113136171328671; 0.0111492027972028;
        0.0109592727272727];
elseif(n == 67)
    ai = [0.034452776119403; 0.0327743500678426; 0.031285053334725; 0.0299558411439307; 0.0287623290540306;
        0.0276840579237806; 0.026703869443245; 0.0258073766619065; 0.024982515967298; 0.0242191687508461;
        0.0235088425670531; 0.0228444029708217; 0.0222198484264516; 0.021630121739409; 0.0210709523853927;
        0.02053872491578; 0.0200303693180091; 0.0195432698161951; 0.0190751891223576; 0.0186242056019556;
        0.0181886612078215; 0.0177671183719222; 0.0173583243316461; 0.0169611816127231; 0.0165747235999153;
        0.0161980943041214; 0.015830531584777; 0.0154713532131788; 0.015119945268889; 0.014775752450588;
        0.0144382699571465; 0.0141070366564846; 0.0137816293108836; 0.0134616576694688; 0.0131467602730211;
        0.0128366008443436; 0.0125308651601497; 0.0122292583187853; 0.0119315023327949; 0.0116373339870699;
        0.0113465029126085; 0.0110587698332461; 0.0107739049484407; 0.0104916864196472; 0.0102118989312105;
        0.00993433229924267; 0.00965878010376262; 0.00938503832054524; 0.0091129039297174; 0.00884217347815285;
        0.00857264157215492; 0.00830409927573385; 0.00803633238793046; 0.00776911957004374; 0.00750223029020849;
        0.0072354225484683; 0.00696844034022778; 0.0067010108096946; 0.006432841037606; 0.00616361439918243;
        0.00589298641891297; 0.00562058003856198; 0.00534598020387573; 0.00506872766412692; 0.00478831186723724;
        0.00450416282225237; 0.00421564179104478];
    bi = [-0.0628035820895523; -0.0538709362279512; -0.046304933514247; -0.0398727978290366; -0.0343816386250565;
        -0.0296718673129951; -0.0256116372969057; -0.0220921602386008; -0.0190237704887548; -0.0163326267018782;
        -0.0139579546886232; -0.0118497487669023; -0.0099668604485453; -0.00827541341826005; -0.00674749258752236;
        -0.00536006268341712; -0.00409407849305408; -0.00293375464667606; -0.00186596779377185; -0.000879768302297403;
        3.40177225926989e-05; 0.000883112170300963; 0.00167404780765173; 0.00241238144742783; 0.00310286662036889;
        0.00374959335313099; 0.00435610129873121; 0.00492547133225123; 0.00546039978053663; 0.00596325867189205;
        0.00643614474560118; 0.00688091943003422; 0.00729924156360544; 0.00769259427895374; 0.00806230718377338;
        0.00840957474006698; 0.008735471557339; 0.0090409651660518; 0.00932692671852055; 0.00959413996948392;
        0.00984330881300491; 0.0100750635921335; 0.010289966349628; 0.0104885151493207; 0.0106711475662674;
        0.0108382434179099; 0.0109901267867067; 0.011127067365934; 0.0112492811437324; 0.0113569304252344;
        0.0114501231781551; 0.0115289116730471; 0.0115932903750605; 0.011643193029091; 0.0116784888642643;
        0.011698977826392; 0.0117043847279787; 0.0116943521841517; 0.0116684321791442; 0.0116260760812837;
        0.0115666228944291; 0.0114892855000881; 0.0113931346066868; 0.0112770800803674; 0.0111398492850433;
        0.0109799620081411; 0.0107957014925373];
elseif(n == 68)
    ai = [0.0339461176470588; 0.0323170570676032; 0.0308687818660707; 0.0295739557825844; 0.0284095602202889;
        0.0273562240668316; 0.0263976526997152; 0.0255201424384868; 0.0247121684612622; 0.0239640357537465;
        0.0232675840269189; 0.0226159387441706; 0.0220033014574221; 0.02142477358047; 0.0208762085408462;
        0.020354087961786; 0.0198554181451609; 0.0193776436649398; 0.0189185753483388; 0.0184763303267451;
        0.0180492821883341; 0.0176360195657746; 0.0172353117515642; 0.0168460801557011; 0.0164673746103193;
        0.0160983536878085; 0.0157382683365149; 0.015386448254649; 0.015042290521407; 0.0147052500870607;
        0.0143748317931186; 0.0140505836515439; 0.013732091160124; 0.0134189724708985; 0.0131108742613476;
        0.0128074681849225; 0.0125084477994266; 0.0122135258895455; 0.0119224321141896; 0.0116349109208376;
        0.0113507196782827; 0.0110696269864904; 0.0107914111280493; 0.010515858630213; 0.0102427629100341;
        0.0099719229777619; 0.00970314217564967; 0.00943622693070217; 0.00917098550074709; 0.00890722669357212;
        0.00864475853873935; 0.00838338689105357; 0.00812291394348701; 0.00786313662560186; 0.00760384486110401;
        0.00734481965504539; 0.00708583097730486; 0.00682663540426367; 0.00656697347501089; 0.00630656671194431;
        0.00604511424828437; 0.00578228899683916; 0.00551773328544443; 0.00525105387500998; 0.00498181626626227;
        0.00470953819139596; 0.00443368217734855; 0.00415364705882353];
    bi = [-0.06188; -0.0532100790166813; -0.0458465081012052; -0.0395702038470748; -0.0341990356572751;
        -0.0295818230372203; -0.0255932511616062; -0.0221295746381527; -0.0191049961874315; -0.0164486218104078;
        -0.0141019071216221; -0.012016521066491; -0.0101525633804826; -0.00847708103554605; -0.00696283669109303;
        -0.00558728894633126; -0.00433175008941812; -0.00318069215758415; -0.00212117655198514; -0.00114238627341089;
        -0.000235243133589574; 0.000607904882474867; 0.00139353851604337; 0.00212717475386491; 0.00281353557961956;
        0.00345668509324594; 0.00406014088866743; 0.004626964534644; 0.00515983512858769; 0.00566110916422735;
        0.00613286934917654; 0.00657696450874806; 0.00699504230128361; 0.00738857613357951; 0.00775888739042572;
        0.00810716386932665; 0.00843447513117529; 0.00874178533239849; 0.00902996398745683; 0.00929979501717428;
        0.00955198436368367; 0.0097871663930687; 0.0100059092589751; 0.010208719362025; 0.0103960450087391;
        0.0105682793481772; 0.0107257626433044; 0.0108687839160867; 0.0109975819896434; 0.0111123459367222;
        0.0112132149307406; 0.0113002774831568; 0.0113735700385935; 0.0114330748865512; 0.0114787173353875;
        0.0115103620801653; 0.0115278086806723; 0.0115307860490633; 0.0115189458278397; 0.0114918545179379;
        0.0114489841932062; 0.0113897016111868; 0.011313255500572; 0.0112187617726874; 0.0111051863676271;
        0.0109713254050603; 0.0108157822651449; 0.0106369411764706];
elseif(n == 69)
    ai = [0.0334541449275362; 0.0318723034953112; 0.0304633872071866; 0.0292016445140029; 0.0280653286554903;
        0.0270360857581426; 0.0260984320548309; 0.0252393080818218; 0.0244476992345454; 0.0237143134148174;
        0.0230313076970835; 0.0223920569958527; 0.0217909586455896; 0.0212232676213382; 0.0206849578453952;
        0.0201726056534399; 0.0196832920425644; 0.0192145208026039; 0.0187641500490704; 0.0183303350381006;
        0.0179114804576078; 0.0175062006600931; 0.0171132865365071; 0.0167316779317758; 0.0163604406752301;
        0.0159987474468659; 0.0156458618263282; 0.0153011249786451; 0.0149639445215428; 0.0146337851958865;
        0.0143101610253671; 0.0139926287057073; 0.0136807820088967; 0.0133742470255875; 0.0130726780999473;
        0.0127757543369509; 0.0124831765831719; 0.0121946647993434; 0.0119099557569336; 0.0116288010022853;
        0.0113509650409481; 0.011076223702099; 0.0108043626487229; 0.0105351760037891; 0.0102684650662346;
        0.0100040370933342; 0.00974170412813537; 0.00948128185217798; 0.00922258844476299; 0.0089654434306446;
        0.00870966649820165; 0.0084550762699075; 0.00820148900624026; 0.00794871722302666; 0.0076965682005501;
        0.00744484236052624; 0.0071933314842058; 0.00694181674135185; 0.00669006649561452; 0.00643783384685712;
        0.00618485386525991; 0.00593084046555392; 0.00567548286256079; 0.00541844154142101; 0.00515934366761866;
        0.00489777785335124; 0.00463328818821494; 0.00436536743393009; 0.00409344927536232];
    bi = [-0.0609831884057971; -0.0525645694799659; -0.0453955027929407; -0.0392696054255576; -0.0340147695283175;
        -0.0294876815888588; -0.0255691668151146; -0.0221602436385299; -0.0191787879471175; -0.0165567196014629;
        -0.0142376352341762; -0.0121748214366352; -0.0103295913348539; -0.00866989537538126; -0.00716916399734302;
        -0.00580534586263699; -0.00456011054769626; -0.00341818915299855; -0.00236683023819959; -0.00139535191137466;
        -0.000494773853340831; 0.000342484401028082; 0.00112285042249916; 0.0018518007216365; 0.00253402550139158;
        0.00317356302174007; 0.00377390912678879; 0.00433810652049891; 0.00486881756686289; 0.00536838371208565;
        0.00583887406080477; 0.00628212516881379; 0.00669977372646591; 0.0070932834872122; 0.0074639675335678;
        0.00781300675873449; 0.00814146526801984; 0.00845030326315709; 0.0087403878587659; 0.00901250218853436;
        0.00926735308507412; 0.00950557755831719; 0.0097277482498875; 0.00993437800270368; 0.0101259236541861;
        0.0103027891362512; 0.0104653279444761; 0.0106138450213497; 0.0107485980835512; 0.0108697984100036;
        0.0109776110954991; 0.0110721547634991; 0.0111535007208935; 0.0112216715267206; 0.0112766389357854;
        0.0113183211664995; 0.0113465794298163; 0.01136121364258; 0.0113619572336821; 0.0113484709348403;
        0.0113203354293033; 0.0112770427110708; 0.0112179859840147; 0.0111424479043402; 0.0110495869409058;
        0.0109384215958108; 0.0108078121922358; 0.0106564398976982; 0.0104827826086957];
elseif(n == 70)
    ai = [0.0329762285714286; 0.0314395826086956; 0.0300684507124589; 0.0288385528506536; 0.0277293277237554;
        0.0267233733114082; 0.0258059676286171; 0.0249646589350967; 0.0241889159708834; 0.0234698299714279;
        0.0227998612610872; 0.0221726241489625; 0.0215827046678406; 0.0210255064169658; 0.0204971204027925;
        0.0199942153280955; 0.0195139452672993; 0.0190538720922714; 0.0186119003849922; 0.0181862228976767;
        0.0177752749026399; 0.017377696018489; 0.0169922983105412; 0.0166180396457335; 0.0162540014392567;
        0.0158993700648979; 0.0155534213164375; 0.0152155074059136; 0.0148850460683616; 0.0145615114137172;
        0.0142444262266559; 0.0139333554657608; 0.013627900755883; 0.0133276957030677; 0.0130324018909733;
        0.0127417054422069; 0.0124553140482129; 0.0121729543879478; 0.0118943698691427; 0.0116193186369853;
        0.0113475718039844; 0.0110789118619664; 0.0108131312429097; 0.0105500309999086; 0.0102894195831798;
        0.0100311116888654; 0.00977492716057836; 0.00952068992528968; 0.00926822694635093; 0.00901736717723255;
        0.0087679404999723; 0.00851977663238027; 0.00827270398773249; 0.008026548469988; 0.00778113218645273;
        0.00753627205825175; 0.00729177830691635; 0.00704745279279932; 0.00680308717785952; 0.00655846088156897;
        0.00631333879426809; 0.00606746870721837; 0.00582057841288955; 0.00557237242271223; 0.00532252824270054;
        0.00507069214012311; 0.00481647432694038; 0.00455944347826087; 0.00429912049689441; 0.00403497142857143];
    bi = [-0.060112; -0.0519339130434782; -0.0449518260869565; -0.0389711495209375; -0.0338291205863267;
        -0.0293897924189793; -0.0255397656983624; -0.0221845610470665; -0.019245543055463; -0.0166573181087405;
        -0.0143655382118718; -0.0123250518700111; -0.0104983509046613; -0.00885426897677787; -0.00736689364441719;
        -0.00601465909346489; -0.00477959132614419; -0.00364668164666801; -0.0026033678128879; -0.00163910528706464;
        -0.000745013672017053; 8.64142904170052e-05; 0.000861551809715404; 0.001585834184468; 0.00226391949831281;
        0.00289982014987646; 0.00349701044310228; 0.0040585145754893; 0.00458697861164783; 0.00508472939889214;
        0.00555382285334222; 0.00599608360428388; 0.006413137618304; 0.00680643912161449; 0.00717729288914411;
        0.0075268727638835; 0.0078562371022728; 0.00816634170482515; 0.00845805068031017; 0.00873214560211286;
        0.0089893332429789; 0.00923025211601313; 0.00945547800280406; 0.0096655286116494; 0.00986086747819448;
        0.0100419071958343; 0.0102090120427215; 0.0103625000551438; 0.0105026445825623; 0.0106296753470583;
        0.0107437790187809; 0.0108450993087634; 0.0109337365708163; 0.0110097468947841; 0.0110731406639956;
        0.0111238805399884; 0.0111618788273083; 0.0111869941601498; 0.0111990274405734; 0.011197716944795;
        0.011182732499345; 0.0111536686125152; 0.0111100364282071; 0.0110512543488424; 0.0109766371511757;
        0.0108853833934589; 0.0107765608842888; 0.0106490899525027; 0.0105017242236025; 0.0103330285714286];
elseif(n == 71)
    ai = [0.0325117746478873; 0.0310184144869215; 0.0296835748403464; 0.0284843435652277; 0.0274012653685982;
        0.0264178296318354; 0.025520030536619; 0.024695989948048; 0.0239356346714866; 0.0232304207323247;
        0.0225730982447818; 0.0219575112487429; 0.0213784276129902; 0.020831394738718; 0.0203126173576605;
        0.0198188542124949; 0.0193473308406153; 0.0188956660624573; 0.0184618101081758; 0.018043992606991;
        0.0176406789166976; 0.0172505334910056; 0.0168723891734188; 0.0165052214717172; 0.0161481270099073;
        0.0158003054774905; 0.0154610445015577; 0.0151297069577197; 0.014805720313194; 0.0144885676611956;
        0.0141777801616584; 0.0138729306505775; 0.0135736282201112; 0.0132795136050373; 0.0129902552391457;
        0.0127055458684691; 0.0124250996275872; 0.0121486495012135; 0.0118759451064026; 0.0116067507414522;
        0.0113408436563231; 0.0110780125064843; 0.0108180559578036; 0.0105607814146852; 0.0103060038473049;
        0.0100535446966863; 0.00980323083861534; 0.00955489358913867; 0.00930836773568486; 0.00906349057877577;
        0.00882010096987427; 0.00857803833118046; 0.00833714164314027; 0.00809724838506505; 0.00785819341355769;
        0.00761980776237573; 0.00738191734590038; 0.00714434154648766; 0.00690689166361514; 0.00666936919987282;
        0.00643156395544815; 0.00619325189880731; 0.00595419277676979; 0.00571412742212715; 0.00547277471140544;
        0.0052298281193824; 0.0049849518106463; 0.00473777620196885; 0.00448789292275391; 0.0042348490945674;
        0.00397814084507042];
    bi = [-0.0592653521126761; -0.0513176338028169; -0.0445153802816901; -0.0386749647346998; -0.0336423458701593;
        -0.0292884804248632; -0.0255054050592827; -0.0222028972655454; -0.0193056360255667; -0.0167507928469343;
        -0.0144859925887283; -0.012467591276919; -0.0106592249987393; -0.00903059004840756; -0.00755641985580639;
        -0.00621562894094123; -0.00499059826911585; -0.00386657999743459; -0.00283120275929852; -0.00187406138148122;
        -0.000986377314678107; -0.000160718125097533; 0.000609233820500189; 0.00132887180695; 0.00200282137112143;
        0.00263506893242621; 0.00322906737173646; 0.00378782265788454; 0.00431396492680154; 0.00480980683228683;
        0.00527739149437258; 0.00571853195803775; 0.00613484373003713; 0.00652777167470096; 0.00689861231188846;
        0.00724853236416854; 0.00757858423911382; 0.00788971900061019; 0.00818279727539833; 0.00845859845348726;
        0.00871782847005468; 0.00896112639896502; 0.0091890700415643; 0.00940218065683251; 0.00960092694853;
        0.00978572840020577; 0.0099569580286436; 0.0101149446095242; 0.0102599744149757; 0.0103922924906165;
        0.0105121034891342; 0.0106195720679483; 0.0107148228497238; 0.010797939936121; 0.0108689659569334;
        0.0109279006284449; 0.0109746987862206; 0.0110092678484299; 0.011031464655994; 0.0110410916251631;
        0.0110378921363542; 0.0110215450700378; 0.010991658385938; 0.0109477616256189; 0.0108892972004643;
        0.0108156103069538; 0.010725937288809; 0.0106193922409135; 0.0104949516227802; 0.0103514366197183;
        0.0101874929577465];
elseif(n == 72)
    ai = [0.0320602222222222; 0.0306083442879499; 0.0293083818466354; 0.0281386956521739; 0.0270808632494026;
        0.0261192094797795; 0.0252404022593229; 0.0244331051448806; 0.0236876792206672; 0.0229959277423265;
        0.0223508777813186; 0.0217465938280163; 0.0211780189465463; 0.0206408396363127; 0.0201313710517875;
        0.019646459670342; 0.0191834008838022; 0.0187398693286549; 0.018313860067466; 0.0179036389947066;
        0.0175077010679361; 0.0171247351639018; 0.0167535945319395; 0.0163932719670981; 0.016042878955373;
        0.0157016281557256; 0.0153688186803451; 0.0150438237178017; 0.0147260801150485; 0.0144150795951784;
        0.0141103613397759; 0.0138115057088127; 0.0135181289083725; 0.0132298784479873; 0.0129464292558286;
        0.0126674803421526; 0.0123927519198672; 0.0121219829064164; 0.0118549287438528; 0.0115913594843913;
        0.0113310580972793; 0.0110738189597747; 0.0108194465006756; 0.0105677539693992; 0.0103185623072692;
        0.0100716991005912; 0.00982699759740211; 0.0095842957715868; 0.00934343541943622; 0.00910426127474479;
        0.00886662012925205; 0.00863035994565552; 0.00839532895057013; 0.00816137469468896; 0.0079283430669999;
        0.00769607724921784; 0.00746441659557703; 0.00723319542176596; 0.00700224168504557; 0.00677137553544121;
        0.00654040771530971; 0.00630913778153348; 0.00607735212106919; 0.00584482172657658; 0.00561129969438855;
        0.00537651840218955; 0.00514018631850653; 0.00490198439057191; 0.00466156195141866; 0.00441853208137715;
        0.00417246635367762; 0.00392288888888889];
    bi = [-0.0584422222222222; -0.0507152738654147; -0.0440860625978091; -0.0383811630945091; -0.033454681003326;
        -0.0291840477415523; -0.0254664196028132; -0.0222156008390262; -0.0193594201074315; -0.0168374983436115;
        -0.0145993538386357; -0.0126027971540437; -0.0108125745867868; -0.00919922427487847; -0.00773811378414819;
        -0.00640863220180284; -0.00519351344245043; -0.00407827070050607; -0.00305072480828672; -0.00210061172588466;
        -0.00121925653719733; -0.00039930319254329; 0.000365509145171718; 0.00108053089729312; 0.00175035455290982;
        0.00237894034957836; 0.00296971977737808; 0.00352568077755283; 0.00404943786490602; 0.00454328985879571;
        0.00500926744774834; 0.00544917242565361; 0.005864610112898; 0.00625701620458141; 0.00662767906221813;
        0.00697775827814116; 0.00730830018720904; 0.00762025087316608; 0.00791446711265739; 0.00819172561461288;
        0.00845273084321091; 0.00869812165612767; 0.00892847694391522; 0.00914432041914688; 0.00934612467376306;
        0.00953431459846111; 0.00970927023785494; 0.00987132913853931; 0.0100207882333556; 0.0101579052934357;
        0.0102828999694812; 0.010395954434789; 0.0104972136344175; 0.0105867851372992; 0.0106647385808111;
        0.0107311046900896; 0.0107858738470309; 0.010828994176286; 0.0108603691074563; 0.0108798543639667;
        0.0108872543195789; 0.0108823176530276; 0.0108647322196637; 0.0108341190460979; 0.0107900253394842;
        0.0107319163871098; 0.0106591662042082; 0.010571046768248; 0.0104667156562564; 0.0103452018779343;
        0.0102053896713615; 0.010046];
elseif(n == 73)
    ai = [0.0316210410958904; 0.0302089406392694; 0.0289425125731558; 0.0278013033635604; 0.0267678559392887;
        0.0258272787861951; 0.0249668740547121; 0.0241758171264726; 0.0234448809764623; 0.022766199462364;
        0.0221330643817126; 0.0215397517685411; 0.0209813734620408; 0.0204537504773637; 0.0199533051494802;
        0.0194769694107713; 0.0190221069071013; 0.018586446960283; 0.0181680286514925; 0.0177651535342644;
        0.0173763456907782; 0.017000318024461; 0.0166359438383948; 0.0162822328852385; 0.0159383111927159;
        0.0156034040712798; 0.015276821799243; 0.0149579475571287; 0.0146462272487751; 0.014341160903138;
        0.0140422953989855; 0.0137492182958133; 0.0134615525892727; 0.0131789522390109; 0.0129010983418227;
        0.0126276958440225; 0.0123584707045577; 0.0120931674350639; 0.0118315469552715; 0.0115733847122626;
        0.0113184690203916; 0.0110665995854995; 0.0108175861826138; 0.0105712474608442; 0.010327409852837;
        0.0100859065690832; 0.00984657665972123; 0.00960926412832287; 0.00937381708359775; 0.00914008691604802;
        0.00890792748740801; 0.00867719432124138; 0.00844774378336287; 0.00821943224081242; 0.00799211518793428;
        0.00776564632769449; 0.00753987659569084; 0.00731465311334767; 0.00708981805552142; 0.0068652074161428;
        0.00664064965356424; 0.00641596419494193; 0.00619095977624339; 0.00596543259132258; 0.00573916421994534;
        0.00551191930069291; 0.00528344291034999; 0.00505345760675064; 0.00482166008718581; 0.00458771740947971;
        0.00435126271785967; 0.0041118904109589; 0.00386915068493151];
    bi = [-0.0576416438356165; -0.0501263926940639; -0.0436637661585954; -0.0380898416618432; -0.033266341926085;
        -0.0290767753931594; -0.0254231230169176; -0.0222229998870739; -0.0194072286792852; -0.0169177695426631;
        -0.0147059578278292; -0.0127310071044063; -0.0109587402884347; -0.00936051646364463; -0.00791232519628622;
        -0.00659402386664363; -0.00538869682200095; -0.00428211804177385; -0.00326230153776154; -0.00231912592916897;
        -0.00144402156783499; -0.000629710275354136; 0.000130010781131964; 0.000840448278168661; 0.00150616109691379;
        0.0021310830171634; 0.0027186240938141; 0.00327175436957652; 0.00379307298393622; 0.00428486523302041;
        0.00474914970642879; 0.00518771726482187; 0.00560216331694296; 0.00599391459868917; 0.00636425144274051;
        0.00671432634888846; 0.00704517951715901; 0.00735775188339106; 0.00765289609603647; 0.00793138579008032;
        0.00819392344612691; 0.00844114706728226; 0.00867363586129889; 0.00889191507867964; 0.0090964601275045;
        0.00928770006133956; 0.00946602051662246; 0.00963176615948856; 0.00978524268836193; 0.00992671842717049;
        0.0100564255342517; 0.010174560843481; 0.0102812863465395; 0.0103767293182577; 0.0104609820803939;
        0.0105341013928238; 0.0105961074547605; 0.010646982492124; 0.010686668900397; 0.0107150669050889;
        0.01073203169415; 0.0107373699681865; 0.010730835844991; 0.0107121260445711; 0.0106808742693991;
        0.0106366446818663; 0.0105789243667739; 0.0105071146510026; 0.0104205211351492; 0.010318342272815;
        0.010199656312303; 0.0100634063926941; 0.00990838356164383];
elseif(n == 74)
    ai = [0.0311937297297297; 0.0298197941503147; 0.0285856253239541; 0.0274718753130904; 0.026461990179259;
        0.0255418140156447; 0.0246992464105795; 0.0239239466044619; 0.0232070783848896; 0.0225410904645873;
        0.0219195277117775; 0.0213368691601133; 0.0207883892217159; 0.020270038968221; 0.0197783447365193;
        0.0193103216630667; 0.0188634000577989; 0.0184353627999537; 0.0180242921772592; 0.017628524800387;
        0.0172466134094126; 0.0168772945510583; 0.0165194612472469; 0.0161721398992569; 0.0158344707795784;
        0.0155056915572882; 0.0151851233840229; 0.014872159137939; 0.0145662534837092; 0.0142669144588183;
        0.0139736963412232; 0.0136861935917934; 0.0134040356976514; 0.0131268827703572; 0.0128544217764521;
        0.0125863632977926; 0.0123224387358574; 0.0120623978882559; 0.0118060068373909; 0.01155304610098;
        0.0113033090022085; 0.0110566002239465; 0.010812734516919; 0.0105715355361854; 0.0103328347839111;
        0.0100964706393513; 0.0098622874593284; 0.00963013473436881; 0.00939986628715461; 0.00917133950110057;
        0.00894441456774034; 0.00871895374223134; 0.00849482059669151; 0.00827187926127676; 0.0080499936429003;
        0.00782902661128224; 0.00760883914158967; 0.00738928940226947; 0.00717023177577009; 0.00695151579867247;
        0.00673298500628247; 0.0065144756649557; 0.00629581537331185; 0.00607682151103459; 0.0058572995111372;
        0.00563704092840527; 0.00541582127321867; 0.00519339757613451; 0.00496950564452666; 0.00474385696829378;
        0.0045161352272589; 0.0042859923485129; 0.00405304405775639; 0.00381686486486486];
    bi = [-0.0568627027027027; -0.0495505664568678; -0.0432483808466; -0.0378010839838488; -0.0330775264803681;
        -0.0289669248157468; -0.0253758093850329; -0.0222254034279095; -0.0194493765304072; -0.0169919230924866;
        -0.0148061221429712; -0.0128525402240448; -0.011098043822262; -0.00951479204822065; -0.00807938401448529;
        -0.00677213867850843; -0.00557648784757233; -0.00447846562585611; -0.00346627985579478; -0.00252995309989991;
        -0.00166102245511668; -0.000852289016796617; -9.76091381089294e-05; 0.000608279214519841; 0.00126990070844356;
        0.00189116232765794; 0.00247545257912853; 0.00302572366937163; 0.00354455954899016; 0.00403423225387903;
        0.00449674857252771; 0.00493388873002448; 0.0053472384928238; 0.00573821585684708; 0.00610809327867988;
        0.00645801623991458; 0.00678901879317389; 0.00710203662076975; 0.00739791803959645; 0.00767743330551559;
        0.0079412825043973; 0.00819010226275994; 0.0084244714665692; 0.00864491614048975; 0.00885191361026398;
        0.00904589604669203; 0.00922725346987062; 0.00939633627605349; 0.00955345733600675; 0.00969889370245712;
        0.0098328879546799; 0.00995564920004617; 0.0100673537451127; 0.0101681454423209; 0.0102581357123433;
        0.010337403236385; 0.0104059933071495; 0.0104639168215585; 0.010511148892556; 0.0105476270512793;
        0.0105732490044498; 0.0105878699048836; 0.0105912990854387; 0.0105832961983804; 0.0105635666929344;
        0.0105317565535929; 0.0104874462104134; 0.0104301435199982; 0.0103592757019449; 0.0102741801002237;
        0.0101740936220805; 0.0100581406886338; 0.00992531951129211; 0.00977448648648649];
elseif(n == 75)
    ai = [0.0307778133333333; 0.029440516036036; 0.028237394821671; 0.0271501336426838; 0.0261630241840065;
        0.0252626015730104; 0.0244373285335103; 0.0236773219649734; 0.0229741166165121; 0.0223204611421624;
        0.0217101423759951; 0.0211378341588892; 0.0205989674889033; 0.0200896191592505; 0.0196064163966166;
        0.0191464553222497; 0.0187072313328187; 0.0182865797410659; 0.0178826252310091; 0.0174937388718561;
        0.0171185016015469; 0.0167556732373834; 0.016404166199735; 0.016063023247317; 0.0157313986208145;
        0.0154085420772878; 0.0150937853723013; 0.0147865308113567; 0.0144862415481722; 0.0141924333556585;
        0.0139046676370449; 0.0136225454803338; 0.01334570258985; 0.0130738049547619; 0.0128065451366697;
        0.0125436390771964; 0.0122848233424415; 0.0120298527345625; 0.0117784982119973; 0.0115305450692339;
        0.0112857913348572; 0.0110440463530771; 0.0108051295192955; 0.0105688691446569; 0.0103351014281265;
        0.0101036695175625; 0.00987442264361805; 0.00964721531221857; 0.00942190654287631; 0.00919835914130787;
        0.00897643899574395; 0.00875601438701437; 0.00853695530297657; 0.00831913274815283; 0.00810241803955935;
        0.00788668207965172; 0.00767179459707226; 0.0074576233454559; 0.00724403324991934; 0.00703088549000696;
        0.00681803650677737; 0.00660533692036873; 0.00639263034275994; 0.00617975206853369; 0.00596652762423448;
        0.00575277115439421; 0.0055382836194733; 0.0053228507778479; 0.00510624092059075; 0.00488820232418411;
        0.004668460382528; 0.00444671437574561; 0.00422263382944588; 0.00399585441441441; 0.00376597333333333];
    bi = [-0.0561045333333333; -0.0489873873873874; -0.0428397940515858; -0.0375149614052409; -0.0328884158608155;
        -0.0288547392625116; -0.0253247544943563; -0.0222231026048689; -0.0194861610457353; -0.0170602585304706;
        -0.014900147307667; -0.0129676983691667; -0.0112307893289171; -0.00966235846174489; -0.00823960172725609;
        -0.00694329256332369; -0.00575720685353773; -0.00466763778776704; -0.00366298737586557; -0.00273342317006128;
        -0.00187059032765732; -0.00106737052596895; -0.0003176804473492; 0.000383696396853419; 0.00104124982094206;
        0.00165885962355104; 0.00223989259089701; 0.00278728309462582; 0.00330360002661271; 0.00379110237793695;
        0.00425178539743454; 0.00468741894852549; 0.0050995794141251; 0.00548967627191888; 0.00585897427039995;
        0.0062086119748062; 0.00653961731703377; 0.00685292067087886; 0.0071493658801963; 0.00742971958983076;
        0.0076946791649351; 0.00794487943135157; 0.00818089842621509; 0.00840326231223543; 0.00861244957985958;
        0.00880889463754597; 0.00899299087072281; 0.00916509323383151; 0.00932552042648991; 0.00947455669367678;
        0.00961245328046898; 0.00973942956386316; 0.00985567387726507; 0.00996134403706282; 0.0100565675750959;
        0.0101414416756026; 0.0102160328102167; 0.0102803760596535; 0.0103344741057505; 0.0103782958723999;
        0.0104117747885207; 0.0104348066404656; 0.0104472469750406; 0.010448908007531; 0.0104395549816758;
        0.0104189019203076; 0.0103866066962725; 0.0103422653431691; 0.0102854055142873; 0.0102154789858043;
        0.0101318530867198; 0.0100338009231149; 0.00992049024805627; 0.00979097081081081; 0.00964416];
elseif(n == 76)
    ai = [0.0303728421052632; 0.0290707368421053; 0.0278975112375533; 0.0268358132465559; 0.0258707269952;
        0.0249894372504047; 0.0241809378717141; 0.0234357788599047; 0.0227458472240276; 0.0221041774333069;
        0.0215047877087014; 0.0209425388461165; 0.0204130126540471; 0.0199124074372273; 0.0194374482687253;
        0.0189853100695294; 0.018553551760425; 0.0181400599689439; 0.0177430009671935; 0.0173607796870147;
        0.0169920048095027; 0.0166354590585683; 0.0162900739448472; 0.0159549083086104; 0.0156291300999624;
        0.0153120009129572; 0.0150028628585822; 0.0147011274210165; 0.0144062659931853; 0.0141178018323327;
        0.0138353032149576; 0.0135583776037247; 0.0132866666675556; 0.0130198420205927; 0.0127576015666495;
        0.0124996663535697; 0.0122457778570301; 0.0119956956261015; 0.0117491952336484; 0.0115060664836884;
        0.0112661118353863; 0.0110291450096548; 0.0107949897495525; 0.0105634787099832; 0.0103344524557477;
        0.0101077585499022; 0.00988325071674733; 0.00966078806568642; 0.00944023436373883; 0.00922145734572294;
        0.009004328052092; 0.0087887201851485; 0.00857450947491064; 0.0083615730462779; 0.00814978877935525;
        0.00793903465485261; 0.00772918807637986; 0.00752012516120164; 0.00731171999059304; 0.00710384381033359;
        0.00689636417107998; 0.00668914399734976; 0.006482040572615; 0.00627490442653; 0.00606757810858862;
        0.00585989483051556; 0.00565167695743786; 0.00544273432536177; 0.0052328623597078; 0.00502183996665614;
        0.00480942716586221; 0.00459536242976935; 0.00437935969134239; 0.00416110497866287; 0.00394025263157895;
        0.00371642105263158];
    bi = [-0.0553663157894737; -0.0484364631578947; -0.0424378913229018; -0.0372315342543697; -0.0326991759439324;
        -0.0287404451010512; -0.0252702170484954; -0.0222163718235734; -0.0195178633013581; -0.0171230593739826;
        -0.0149883178987245; -0.0130767673159343; -0.0113572645809445; -0.00980350639347507; -0.00839327268193486;
        -0.00710778394352977; -0.00593115638647244; -0.0048499408973767; -0.00385273369215979; -0.00292984812716944;
        -0.00207303857134708; -0.00127526849056746; -0.000530515990537162; 0.000166388978254557; 0.000819900715691143;
        0.00143387140396189; 0.00201164588376685; 0.00255614063810867; 0.00306990957763579; 0.00355519881785353;
        0.00401399229240346; 0.00444804975073147; 0.00485893843631835; 0.00524805952745685; 0.00561667024120578;
        0.0059659023481085; 0.00629677771654395; 0.00661022139767955; 0.00690707267185078; 0.00718809440212583;
        0.00745398097849945; 0.00770536508458279; 0.00794282347607716; 0.00816688192524714; 0.00837801945676324;
        0.00857667197657974; 0.00876323537602732; 0.00893806817725334; 0.00910149377288342; 0.00925380230175792;
        0.00939525219336267; 0.00952607140574518; 0.00964645837497343; 0.00975658268829514; 0.00985658548787377;
        0.00994657960713589; 0.0100266494372087; 0.0100968505165278; 0.0101572088323377; 0.0102077198183905;
        0.0102483470285764; 0.0102790204613984; 0.0102996345050579; 0.0103100454673412; 0.0103100686484265;
        0.0102994749080527; 0.0102779866711415; 0.010245273307837; 0.0102009458149409; 0.010144550715798;
        0.0100755630847355; 0.00999337859012581; 0.00989730443695317; 0.00978654907539118; 0.00966021052631579;
        0.00951726315789474];
elseif(n == 77)
    ai = [0.0299783896103896; 0.0287101052631579; 0.0275656792891319; 0.0265286610481979; 0.0255848778784496;
        0.0247221257111005; 0.0239298996691223; 0.0231991598238367; 0.0225221278196508; 0.0218921105590625;
        0.0213033475728228; 0.0207508790882245; 0.0202304321560053; 0.019738322507116; 0.0192713700880799;
        0.0188268264710671; 0.0184023125550385; 0.0179957651700639; 0.0176053913706261; 0.017229629357617;
        0.0168671151048369; 0.0165166538859846; 0.0161771960040292; 0.0158478161180239; 0.0155276956442169;
        0.0152161077799984; 0.0149124047618961; 0.0146160070235263; 0.0143263939670306; 0.0140430961028833;
        0.0137656883488056; 0.0134937843094974; 0.0132270313856057; 0.0129651065833094; 0.0127077129155771;
        0.0124545763029752; 0.0122054428962301; 0.01196007675491; 0.0117182578268895; 0.0114797801819319;
        0.0112444504600187; 0.0110120865011527; 0.0107825161284453; 0.0105555760605221; 0.0103311109327687;
        0.0101089724098132; 0.00988901837399898; 0.00967111217651988; 0.00945512193944982; 0.00924091989815224;
        0.00902838177455245; 0.00881738617253772; 0.00860781398734516; 0.00839954782122929; 0.0081924713979847;
        0.00798646896904472; 0.00778142470388758; 0.00757722205735693; 0.00737374310623858; 0.00717086784702156;
        0.00696847344619863; 0.00676643343371591; 0.00656461682925059; 0.00636288718986539; 0.00616110156624654;
        0.00595910935316795; 0.00575675101803124; 0.00555385668930639; 0.00535024458444497; 0.00514571925436923;
        0.00494006961897536; 0.00473306676526056; 0.00452446147673718; 0.00431398145979199; 0.00410132822966507;
        0.00388617361585783; 0.00366815584415584];
    bi = [-0.0546472727272727; -0.0478974162679426; -0.042042556937799; -0.036950852916074; -0.0325099585062417;
        -0.0286242530116142; -0.0252124397922206; -0.022205469807351; -0.0195447490789732; -0.0171805941268708;
        -0.0150709035721512; -0.0131800178236584; -0.011477742090541; -0.0099385109394962; -0.00854067526998198;
        -0.00726589494525115; -0.00609862241928341; -0.0050256645651332; -0.00403581156231232; -0.00311952316103499;
        -0.00226866392907565; -0.00147628022051297; -0.000736412601058323; -4.39383368164059e-05; 0.000605560684338297;
        0.00121590856486149; 0.00179042793105651; 0.00233201727440298; 0.00284321555316313; 0.00332625613234485;
        0.00378311181800214; 0.00421553246555095; 0.00462507640547292; 0.00501313672830065; 0.00538096329953475;
        0.0057296812300604; 0.00606030640511252; 0.00637375857170946; 0.00667087239795004; 0.00695240684520567;
        0.00721905313390927; 0.00747144153349189; 0.00771014716544286; 0.00793569497408407; 0.00814856399126361;
        0.00834919099777036; 0.00853797366498036; 0.00871527324433287; 0.00888141685907658; 0.00903669944180197;
        0.00918138535214708; 0.00931570970136527; 0.00943987940387158; 0.00955407397018675; 0.00965844605066442;
        0.009753121734843; 0.00983820060706213; 0.00991375555499904; 0.00997983232390509; 0.0100364488054618;
        0.0100835940462423; 0.0101212269566771; 0.0101492746971106; 0.0101676307129101; 0.0101761523855968;
        0.0101746582615105; 0.0101629248135441; 0.0101406826848963; 0.0101076123565252; 0.0100633391719677;
        0.0100074276443412; 0.00993937496060841; 0.00985860358749184; 0.00976445287173708; 0.00965616951469583;
        0.0095328967874231; 0.00939366233766234];
elseif(n == 78)
    ai = [0.0295940512820513; 0.0283582870462871; 0.0272416174001437; 0.0262284353260774; 0.0253052657605079;
        0.0244604800075831; 0.0236840465483883; 0.0229673139147747; 0.0223028217711103; 0.0216841367742706;
        0.0211057101662789; 0.020562754399024; 0.0200511363999877; 0.019567285365173; 0.0191081132134443;
        0.0186709460580431; 0.0182534652486465; 0.0178536567133268; 0.0174697674862576; 0.0171002684459447;
        0.016743822411898; 0.0163992568566245; 0.0160655405860676; 0.0157417638264867; 0.0154271212304624;
        0.0151208973803249; 0.014822454424829; 0.0145312215352245; 0.0142466859108107; 0.013968385102337;
        0.0136959004548764; 0.0134288515006391; 0.0131668911571304; 0.0129097016075718; 0.0126569907590043;
        0.012408489189361; 0.0121639475083659; 0.0119231340686784; 0.0116858329735292; 0.0114518423354116;
        0.0112209727474099; 0.0109930459346444; 0.0107678935582564; 0.0105453561484731; 0.0103252821467223;
        0.0101075270395976; 0.00989195256981249; 0.00967842601119934; 0.00946681949637179; 0.0092570093869398;
        0.00904887567718626; 0.00884230142292508; 0.00863717218789219; 0.00843337550049739; 0.00823080031410295;
        0.00802933646420696; 0.00782887411600184; 0.00762930319575296; 0.00743051279929788; 0.00723239057069826;
        0.00703482204367526; 0.00683768993791758; 0.00664087340165571; 0.00644424719103722; 0.00624768077580244;
        0.00605103735953898; 0.00585417280137728; 0.00565693442437381; 0.00545915969401077; 0.00526067474822637;
        0.00506129275818813; 0.00486081209665146; 0.00465901428823649; 0.00445566171334593; 0.00425049503478977;
        0.0040432303135461; 0.00383355577755578; 0.0036211282051282];
    bi = [-0.0539466666666667; -0.0473698834498835; -0.0416536743957797; -0.0366729588026009; -0.0323209023412813;
        -0.0285063590944543; -0.0251516505553506; -0.0221906405776938; -0.0195670698065123; -0.0172331172094612;
        -0.0151481600077287; -0.0132777066109631; -0.0115924801252444; -0.0100676326577537; -0.00868207301489502;
        -0.0074178925084013; -0.00625987547051675; -0.00519508275686937; -0.00421249800447211; -0.00330272773107646;
        -0.00245774752792323; -0.00167068762640148; -0.000935652024480682; -0.000247566154005479; 0.000397951233158151;
        0.0010046956728366; 0.00157596727141386; 0.00211464638280353; 0.0026232569972856; 0.00310401981274723;
        0.00355889665918521; 0.0039896276894027; 0.00439776252748605; 0.0047846863772543; 0.00515164193131047;
        0.00549974778392633; 0.0058300139345101; 0.00614335486996849; 0.0064406006313463; 0.00672250620048547;
        0.00698975948413936; 0.00724298812430754; 0.00748276532304051; 0.00770961483631925; 0.00792401526373588;
        0.0081264037376348; 0.00831717909630548; 0.00849670461005209; 0.0086653103159128; 0.0088232950059642;
        0.00897092790510346; 0.00910845006660255; 0.00923607550727928; 0.00935399209858559; 0.00946236222506881;
        0.0095613232173473; 0.00965098756281427; 0.00973144289362208; 0.00980275174800181; 0.00986495109754761;
        0.00991805162966447; 0.00996203677086681; 0.0099968614329569; 0.0100224504602398; 0.0100386967517822;
        0.0100454590282297; 0.0100425592078035; 0.0100297793507233; 0.0100068581254061; 0.00997348674328183;
        0.00992930430189905; 0.00987389246810098; 0.00980676942437519; 0.00972738299197247; 0.0096351028340081;
        0.00952921163047479; 0.00940889510489511; 0.00927323076923077];
elseif(n == 79)
    ai = [0.0292194430379747; 0.0280149639727361; 0.0269250569177658; 0.0259349050842562; 0.0250316887035683;
        0.02420432113109; 0.023443218120626; 0.0227400963770598; 0.0220877979151382; 0.0214801371311983;
        0.0209117678360718; 0.0203780678046035; 0.0198750386732592; 0.0193992192650137; 0.0189476106426944;
        0.0185176113906124; 0.0181069618018326; 0.0177136958068345; 0.0173360996204473; 0.016972676209489;
        0.0166221147950504; 0.0162832647022463; 0.0159551129577914; 0.015636765113118; 0.0153274288389956;
        0.0150263998977061; 0.0147330501516399; 0.0144468173135042; 0.0141671961838838; 0.0138937311573167;
        0.0136260098089136; 0.013363657400395; 0.0131063321677019; 0.0128537212724815; 0.0126055373171346;
        0.0123615153380718; 0.0121214102046628; 0.0118849943623462; 0.0116520558677335; 0.0114223966715024;
        0.0111958311116207; 0.0109721845851348; 0.010751292371548; 0.0105329985848301; 0.0103171552344478;
        0.0101036213785978; 0.00989226235513277; 0.00968294907757426; 0.00947555738517369; 0.00926996743725913;
        0.00906606314314184; 0.00886373161968958; 0.00866286266933293; 0.00846334827178128; 0.00826508208310545;
        0.00806795893610661; 0.00787187433604595; 0.00767672394585971; 0.00748240305493201; 0.00728880602533977;
        0.00709582570921582; 0.00690335283049101; 0.00671127532376432; 0.00651947762240339; 0.00632783988718501;
        0.00613623716583754; 0.00594453847273545; 0.0057526057767138; 0.005560292883513; 0.00536744419773139;
        0.00517389334735887; 0.00497946165199895; 0.00478395641377626; 0.00458716900769612; 0.00438887274590832;
        0.00418882048797305; 0.00398674196689387; 0.00378234079844206; 0.00357529113924051];
    bi = [-0.0532637974683544; -0.0468535150925024; -0.0412711268478357; -0.0363978852326887; -0.0321321342843699;
        -0.0283869458936907; -0.0250880632221768; -0.0221721143658698; -0.0195850634313597; -0.0172808698191321;
        -0.0152203297800021; -0.0133700772534119; -0.0117017236404771; -0.0101911185364832; -0.00881771557166878;
        -0.00756402940826212; -0.00641517163679062; -0.00535845482490906; -0.00438305531508829; -0.00347972655972761;
        -0.00264055583849464; -0.00185875813659838; -0.00112850178673102; -0.000444761202953885; 0.000196807327777327;
        0.000799970272016377; 0.00136800488110471; 0.00190377318798929; 0.00240978415927568; 0.00288824587020122;
        0.00334110929143427; 0.00377010503590719; 0.00417677420664866; 0.00456249430865168; 0.00492850103549756;
        0.00527590661145188; 0.0056057152591237; 0.00591883626893141; 0.00621609506724879; 0.00649824261318277;
        0.00676596339767993; 0.0070198822715075; 0.00726057028924525; 0.00748854972356855; 0.007704298376773;
        0.00790825329379826; 0.00810081396218957; 0.0082823450688351; 0.00845317887037828; 0.00861361722345176;
        0.00876393331191274; 0.00890437310074108; 0.00903515653990625; 0.00915647853608154; 0.00926850970538321;
        0.00937139691617433; 0.00946526362725775; 0.00955021002337313; 0.00962631294671034; 0.00969362562006976;
        0.0097521771542635; 0.00980197182929453; 0.00984298813570953; 0.00987517755923902; 0.00989846308835823;
        0.00991273742066869; 0.00991786083995956; 0.00991365873140243; 0.00989991869750941; 0.00987638723218426;
        0.00984276590436608; 0.0097987069963486; 0.00974380853480407; 0.00967760864480065; 0.00959957914863285;
        0.00950911832205103; 0.00940554271045411; 0.00928807789678676; 0.00915584810126582];
elseif(n == 80)
    ai = [0.0288542; 0.0276798329113924; 0.026615741382668; 0.0256478494644596; 0.024763953413808;
        0.0239534775902312; 0.023207260619903; 0.0225173683249086; 0.0218769302873911; 0.0212799972552516;
        0.0207214169000117; 0.0201967257113728; 0.0197020550595451; 0.0192340496780409; 0.0187897970185666;
        0.0183667661079951; 0.0179627546970656; 0.0175758436331861; 0.0172043575171288; 0.016846830816973;
        0.0165019787137219; 0.0161686720428293; 0.0158459157755441; 0.0155328305545476; 0.0152286368607448;
        0.0149326414431377; 0.0146442256922159; 0.0143628356799562; 0.0140879736269524; 0.0138191905899808;
        0.0135560801919534; 0.0132982732411911; 0.0130454331086829; 0.0127972517508539; 0.0125534462816928;
        0.0123137560121859; 0.0120779398871386; 0.0118457742598883; 0.0116170509543279; 0.0113915755712713;
        0.0111691660026663; 0.0109496511226446; 0.0107328696290367; 0.0105186690128806; 0.0103069046367275;
        0.0100974389052809; 0.00989014051418599; 0.00968488376467021; 0.00948154793329936; 0.00928001668739106;
        0.00908017753767587; 0.00888192132064427; 0.00868514170369809; 0.00848973470676198; 0.00829559823442281;
        0.00810263161296698; 0.00791073512688784; 0.00771980954954416; 0.00752975566266794; 0.0073404737593473;
        0.00715186312494359; 0.00696382149013754; 0.00677624444993045; 0.00658902484194508; 0.0064020520767699;
        0.00621521141235939; 0.00602838316363548; 0.00584144183742301; 0.00565425518168976; 0.00546668313674639;
        0.00527857667459284; 0.00508977651098089; 0.00490011167300448; 0.00470939790314804; 0.00451743587873818;
        0.00432400922368771; 0.00412888228733292; 0.0039317976630964; 0.00373247341772152; 0.0035306];
    bi = [-0.052598; -0.0463479746835443; -0.0408947974683544; -0.0361256582278481; -0.0319437701532312;
        -0.0282661833444371; -0.0250218786322632; -0.0221501084612233; -0.0195989552319187; -0.0173240807277686;
        -0.0152876431626433; -0.0134573610101504; -0.0118057051369113; -0.0103092028841761; -0.00894783964586544;
        -0.00770454519629759; -0.00656475354562504; -0.00551602646212253; -0.00454773201335936; -0.00365077055712918;
        -0.0028173415708217; -0.00204074555663867; -0.00131521601061041; -0.000635777105752889; 1.87667696074412e-06;
        0.00060148222354147; 0.00116629357213719; 0.00169915421956588; 0.0022025580173345; 0.0026787004266132;
        0.00312952164232894; 0.00355674287197509; 0.00396189686076897; 0.00434635358771729; 0.00471134191364434;
        0.00505796783932871; 0.00538722992693233; 0.0057000323485337; 0.00599719594970743; 0.00627946765187517;
        0.00654752846296035; 0.00680200032027703; 0.00704345195131737; 0.00727240390607517; 0.00748933288780089;
        0.00769467548679907; 0.0078888314033372; 0.00807216623032041; 0.00824501385357264; 0.00840767851690111;
        0.00856043659022572; 0.00870353807160375; 0.00883720784770006; 0.00896164673191439; 0.00907703229478729;
        0.00918351949730325; 0.00928124113415863; 0.00937030809084876; 0.00945080941545698; 0.00952281220321632;
        0.00958636128918991; 0.00964147874171719; 0.00968816314654154; 0.00972638866871905; 0.00975610387645838;
        0.00977723030790808; 0.0097896607585451; 0.00979325726317649; 0.00978784874259961; 0.0097732282806249;
        0.00974914999240241; 0.00971532543975976; 0.0096714195435091; 0.00961704593636876; 0.00955176169323016;
        0.00947506136794585; 0.00938637025759052; 0.00928503680623174; 0.00917032405063291; 0.0090414];
elseif(n == 81)
    ai = [0.028497975308642; 0.0273526049382716; 0.0263134258477887; 0.0253670571964369; 0.024501874781571;
        0.0237077850164985; 0.0229760265606692; 0.0222989964451561; 0.0216700978677954; 0.0210836071322146;
        0.0205345574759671; 0.0200186377775908; 0.0195321043529079; 0.0190717042494176; 0.0186346086261478;
        0.0182183549666442; 0.0178207970165447; 0.0174400614659363; 0.0170745105118437; 0.0167227095390222;
        0.0163833992489231; 0.0160554716483344; 0.0157379493817753; 0.0154299679561325; 0.015130760463097;
        0.0148396444554468; 0.0145560106777931; 0.0142793133916976; 0.0140090620696333; 0.0137448142626005;
        0.0134861694728036; 0.013232763886036; 0.0129842658387024; 0.0127403719120576; 0.0125008035615667;
        0.0122653042025631; 0.0120336366848492; 0.0118055810987571; 0.0115809328636732; 0.0113595010572952;
        0.0111411069500926; 0.0109255827147217; 0.0107127702846231; 0.0105025203398168; 0.010294691401098;
        0.0100891490165132; 0.0098857650262376; 0.00968441689383776; 0.0094849870934537; 0.00928736254371348;
        0.00909143408024481; 0.00889709595950807; 0.00870424538737097; 0.00851278206640212; 0.00832260775629802;
        0.00813362584219048; 0.00794574090582048; 0.00775885829471756; 0.00757288368459575; 0.00738772263016916;
        0.00720328009950259; 0.00701945998684163; 0.00683616459860835; 0.00665329410689734; 0.0064707459643556;
        0.0062884142737708; 0.00610618910501995; 0.00592395575123551; 0.00574159391512397; 0.00555897681531857;
        0.00537597020145895; 0.00519243126536938; 0.00500820743425506; 0.00482313503026374; 0.00463703777907882;
        0.004449725148442; 0.00426099049567404; 0.00407060900140647; 0.00387833536490077; 0.0036839012345679;
        0.00348701234567901];
    bi = [-0.0519486419753086; -0.0458529382716049; -0.0405245697765276; -0.0358562972339428; -0.0317559156118143;
        -0.0281442296493696; -0.0249532854179518; -0.0221248280011746; -0.0196089585726905; -0.017362967021714;
        -0.0153503188723792; -0.0135397775862895; -0.011904645449775; -0.0104221081483907; -0.00907266983957512;
        -0.00783966706725092; -0.00670885123531807; -0.00566803058505364; -0.00470676371785785; -0.00381609768195935;
        -0.00298834451101093; -0.00221689087443132; -0.00149603618347475; -0.00082085510212289; -0.000187080946027995;
        0.000408993076775303; 0.000970597416141811; 0.00150055679116909; 0.0020013498154227; 0.00247515931185153;
        0.0029239147520351; 0.00334932804492564; 0.00375292371876683; 0.00413606438306282; 0.00449997222234602;
        0.00484574715737462; 0.00517438220988711; 0.00548677652201784; 0.00578374640903694; 0.00606603476253669;
        0.00633431906905458; 0.00658921826508862; 0.0068312986123666; 0.00706107874606701; 0.00727903402256962;
        0.00748560027146923; 0.00768117703834842; 0.0078661303895978; 0.00804079533789758; 0.00820547793640733;
        0.00836045708088675; 0.0085059860515805; 0.00864229382048144; 0.00876958614431841; 0.00888804645910921;
        0.00899783658822077; 0.00909909727245419; 0.0091919485276119; 0.00927648983221335; 0.00935280014542598;
        0.00942093775279972; 0.00948093993497791; 0.00953282245215079; 0.00957657883457211; 0.00961217946693029;
        0.00963957045170884; 0.00965867223384648; 0.00966937796597303; 0.0096715515902123; 0.00966502560896601;
        0.00964959851318231; 0.00962503183232603; 0.00959104676556513; 0.00954732034852772; 0.00949348110432925;
        0.0094291041213826; 0.00935370549375613; 0.0092667360525082; 0.0091675743084857; 0.00905551851851852;
        0.00892977777777778];
elseif(n == 82)
    ai = [0.0281504390243903; 0.0270330045167118; 0.0260178762420958; 0.025092326083725; 0.0242452754508136;
        0.0234670857946554; 0.0227493744164535; 0.0220848527178809; 0.0214671843403697; 0.0208908609064586;
        0.0203510933184855; 0.0198437167886219; 0.0193651079717285; 0.0189121127505878; 0.0184819833834603;
        0.0180723238681797; 0.0176810425066063; 0.0173063107695266; 0.0169465276662562; 0.0166002889163952;
        0.0162663603044482; 0.015943654672286; 0.0156312120705866; 0.0153281826492258; 0.0150338119188257;
        0.0147474280619811; 0.0144684310136614; 0.0141962830664888; 0.0139305007885134; 0.0136706480692024;
        0.0134163301340366; 0.0131671883897404; 0.0129228959810923; 0.0126831539567798; 0.0124476879561414;
        0.0122162453411309; 0.0119885927086645; 0.0117645137278626; 0.0115438072547648; 0.0113262856840201;
        0.0111117735029952; 0.010900106018813; 0.0106911282331538; 0.010484693843315; 0.0102806643511289;
        0.0100789082639498; 0.00987930037412101; 0.00968172110516648; 0.00948605591449006; 0.00929219474363491;
        0.00910003150821053; 0.00890946362046009; 0.00872039153814851; 0.00853271833402343; 0.00834634928055807;
        0.00816119144504078; 0.00797715329034365; 0.00779414427689011; 0.00761207446145513; 0.00743085408847404;
        0.00725039316950859; 0.00707060104642062; 0.00689138593363097; 0.0067126544345912; 0.0065343110272619;
        0.00635625751296886; 0.0061783924224899; 0.0060006103726053; 0.00582280136561739; 0.0056448500235046;
        0.00546663474741888; 0.00528802679216195; 0.00510888924408404; 0.00492907588954548; 0.00474842995967157;
        0.00456678273562882; 0.00438395199707271; 0.00419974029478691; 0.00401393302688301; 0.0038262962962963;
        0.00363657452574526; 0.00344448780487805];
    bi = [-0.0513151219512195; -0.0453680939476061; -0.0401603279132792; -0.0355898157753308; -0.0315686669639692;
        -0.02802123209038; -0.0248824607834464; -0.0220964667074705; -0.0196152756075098; -0.0173977347892393;
        -0.0154085647580008; -0.0136175358370298; -0.0119987544764628; -0.0105300456699713; -0.0091924194308415;
        -0.00796961065892912; -0.00684768296794743; -0.00581468815175415; -0.00486037396043915; -0.00397593374293633;
        -0.00315379230257139; -0.00238742301459889; -0.00167119187881096; -0.00100022473345179; -0.00037029434603104;
        0.000222275471325816; 0.000780691193706798; 0.00130775849949951; 0.00180594061426997; 0.00227740766906753;
        0.00272407843547971; 0.00314765560438256; 0.00354965560557555; 0.00393143381836977; 0.00429420589602925;
        0.00463906581733345; 0.00496700118427325; 0.00527890620408059; 0.00557559272469838; 0.00585779963389002;
        0.00612620088210616; 0.00638141234676564; 0.00662399771970756; 0.00685447356929647; 0.00707331370319542;
        0.00728095293644543; 0.00747779035158267; 0.00766419212254513; 0.0078404939616014; 0.00800700323807337;
        0.00816400080887629; 0.00831174259356878; 0.00845046092044083; 0.00858036566495649; 0.00870164519742858;
        0.00881446715298472; 0.00891897903355754; 0.00901530864868993; 0.00910356439929753; 0.00918383540609707;
        0.00925619148212626; 0.00932068294658953; 0.0093773402751158; 0.00942617357936339; 0.00946717190671256;
        0.00950030234850989; 0.00952550894293269; 0.00954271135599191; 0.00955180332145032; 0.00955265081746636;
        0.00954508995454422; 0.00952892454584395; 0.00950392332704343; 0.00946981678871313; 0.00942629357952874;
        0.00937299643357305; 0.0093095175694373; 0.00923539350279579; 0.00915009920757436; 0.00905304155374887;
        0.00894355194218609; 0.00882087804878049];
elseif(n == 83)
    ai = [0.0278112771084337; 0.0267207687334705; 0.0257288687759167; 0.0248234625221754; 0.0239939854156429;
        0.0232312287161751; 0.0225271683182939; 0.0218748141536897; 0.0212680778666314; 0.020701656689576;
        0.0201709316625969; 0.0196718785360903; 0.0192009898733067; 0.0187552070291932; 0.0183318608263076;
        0.0179286198785535; 0.0175434456304444; 0.0171745532847173; 0.0168203778854443; 0.0164795449083345;
        0.0161508447855867; 0.0158332108602754; 0.0155257003256083; 0.0152274777581664; 0.0149378009020881;
        0.0146560084036574; 0.0143815092334524; 0.0141137735665752; 0.0138523249209809; 0.0135967333799351;
        0.0133466097475419; 0.0131016005064084; 0.0128613834641724; 0.0126256639910633; 0.0123941717641602;
        0.0121666579457603; 0.0119428927334853; 0.0117226632286073; 0.0115057715767281; 0.0112920333415505;
        0.0110812760781518; 0.0108733380770378; 0.0106680672544132; 0.0104653201676494; 0.0102649611379368;
        0.0100668614646619; 0.00987089871819335; 0.00967695609957247; 0.0094849218571163; 0.00929468875120439;
        0.00910615355957207; 0.0089192166163012; 0.00873378137841421; 0.00854975401456085; 0.00836704301075772;
        0.0081855587885156; 0.00800521333097854; 0.00782591981291374; 0.00764759223053674; 0.00747014502723802;
        0.00729349271129676; 0.00711754946162478; 0.00694222871747829; 0.00676744274790342; 0.00659310219644037;
        0.00641911559629511; 0.00624538885079257; 0.00607182467344461; 0.00589832198139522; 0.00572477523533927;
        0.00555107371824516; 0.00537710074434364; 0.0052027327888735; 0.00502783852800053; 0.00485227777715347;
        0.00467590031475626; 0.00449854457699069; 0.00432003620781366; 0.00414018644699893; 0.00395879033750177;
        0.00377562473199029; 0.00359044607699089; 0.00340298795180723];
    bi = [-0.0506968674698795; -0.0448931413458713; -0.0398019568790066; -0.0353262220480839; -0.0313821118830232;
        -0.0278973277804711; -0.0248095712299302; -0.0220652075728243; -0.0196180979351264; -0.0174285797600248;
        -0.0154625784393789; -0.013690834418881; -0.0120882318481537; -0.0106332163785787; -0.0093072910924918;
        -0.00809458079049245; -0.00698145598105297; -0.00595620891950755; -0.00500877494216482; -0.00413049314522088;
        -0.00331390117612232; -0.00255255954511484; -0.00184090143433534; -0.00117410448778684; -0.000547981514128229;
        4.1112568852959e-05; 0.00059635986869942; 0.00112054674340429; 0.00161612085730801; 0.00208523956957118;
        0.00252981094839724; 0.00295152852196845; 0.00335190071830144; 0.00373227580824231; 0.00409386304619248;
        0.00443775059970718; 0.00476492076988643; 0.00507626292773177; 0.00537258452580471; 0.00565462048819889;
        0.00592304123378385; 0.0061784595467921; 0.00642143647412602; 0.00665248639939744; 0.00687208141892133;
        0.00708065512400331; 0.00727860587630682; 0.00746629964835501; 0.00764407248887487; 0.00781223266234807;
        0.00797106250346638; 0.00812082001991955; 0.00826174027082893; 0.00839403654297713; 0.0085179013425982;
        0.00863350721673686; 0.00874100741493542; 0.00884053639915696; 0.00893221020731514; 0.00901612667347936;
        0.009092365505694; 0.00916098822033833; 0.00922203793001044; 0.00927553898000241; 0.00932149642650702;
        0.0093598953477227; 0.00939069997697079; 0.00941385264477553; 0.00942927251455126; 0.00943685409406187;
        0.00943646550213464; 0.00942794646719185; 0.0094111060309783; 0.00938571992738058; 0.0093515276024217;
        0.00930822883734538; 0.00925547993214669; 0.00919288940193555; 0.00912001313311288; 0.00903634894047736;
        0.00894133046005159; 0.00883432030561269; 0.00871460240963855];
elseif(n == 84)
    ai = [0.0274801904761905; 0.0264156465863454; 0.0254461893847166; 0.0245602810488308; 0.0237478416419582;
        0.0230000686540461; 0.0223092777714962; 0.0216687625465295; 0.0210726708717485; 0.0205158963789084;
        0.0199939830745873; 0.0195030417010365; 0.0190396764694983; 0.0186009209571013; 0.0181841820883801;
        0.0177871912397173; 0.0174079616106742; 0.0170447511012964; 0.0166960300199856; 0.0163604530232958;
        0.0160368347578411; 0.0157241287361237; 0.0154214090331924; 0.0151278544402259; 0.0148427347549904;
        0.0145653989281468; 0.01429526481907; 0.0140318103456122; 0.0137745658395006; 0.0135231074431541;
        0.0132770514049735; 0.0130360491488932; 0.0127997830104507; 0.0125679625460816; 0.0123403213350001;
        0.0121166142040726; 0.0118966148157283; 0.0116801135673201; 0.0114669157576171; 0.0112568399823883;
        0.0110497167264589; 0.0108453871242835; 0.0106437018650777; 0.0104445202219732; 0.0102477091875727;
        0.0100531427007656; 0.00986070095175718; 0.009670269754044; 0.00948173997355415; 0.00929500700642438;
        0.00910997029792974; 0.00892653289595017; 0.00874460103307742; 0.00856408373205689; 0.00838489242974118;
        0.00820694061512037; 0.00803014347730112; 0.00785441755954207; 0.00767968041562399; 0.007505850264945;
        0.00733284564278698; 0.00716058504220056; 0.00698898654390215; 0.00681796743046667; 0.00664744378093078;
        0.00647733004168971; 0.00630753856927322; 0.00613797914021686; 0.00596855842279955; 0.0057991794048931;
        0.00562974077155876; 0.00546013622532774; 0.00529025374131369; 0.00511997474842584; 0.0049491732269812;
        0.00477771471195905; 0.00460545519000489; 0.00443223987708529; 0.00425790186243405; 0.00408226060313003;
        0.00390512025233467; 0.00372626780291899; 0.003545471026965; 0.00336247619047619];
    bi = [-0.0500933333333333; -0.0444277911646586; -0.0394493427368009; -0.0350655194581397; -0.031196330082752;
        -0.0277726443606174; -0.024734773230803; -0.0220312235017161; -0.0196176072109175; -0.0174556879006902;
        -0.0155125479008918; -0.013759862392769; -0.0121732675505414; -0.0107318114348394; -0.00941747755573853;
        -0.00821477214453409; -0.00711036718307652; -0.00609279214720712; -0.00515216823561725; -0.00427997958565795;
        -0.00346887663095385; -0.00271250733923439; -0.00200537258913074; -0.00134270240782052; -0.000720350202862496;
        -0.000134702486425406; 0.000417398086976714; 0.000938718262922915; 0.0014316899519912; 0.00189845763831876;
        0.00234091865895463; 0.00276075741122231; 0.00315947439686147; 0.00353841088233408; 0.00389876984218655;
        0.00424163375479383; 0.0045679797354062; 0.0048786924185888; 0.00517457493946451; 0.00545635830937065;
        0.00572470943548406; 0.00598023799464769; 0.00622350233814803; 0.00645501457575376; 0.00667524496323118;
        0.00688462569718555; 0.00708355420389886; 0.00727239599437143; 0.007451487145615; 0.00762113645803217;
        0.0077816273301404; 0.00793321938469299; 0.00807614987418468; 0.00821063488861008; 0.00833687038400134;
        0.00845503304656587; 0.00856528100405381; 0.00866775439320714; 0.00876257578969026; 0.00884985050470355;
        0.0089296667504729; 0.00900209567493782; 0.0090671912641809; 0.00912499010941316; 0.00917551103361651;
        0.00921875457121387; 0.00925470229235954; 0.0092833159615887; 0.0093045365186072; 0.00931828286691551;
        0.00932445045371525; 0.0093229096221174; 0.00931350371403064; 0.00929604689922883; 0.00927032170295188;
        0.00923607620095703; 0.00919302084718185; 0.00914082489508224; 0.0090791123692445; 0.00900745753902175;
        0.00892537984069456; 0.0088323381889929; 0.00872772461273666; 0.00861085714285714];
elseif(n == 85)
    ai = [0.0271568941176471; 0.0261173983193277; 0.0251696332084641; 0.0243026039189346; 0.0235066877123762;
        0.0227734662574051; 0.0220955773894233; 0.0214665842409793; 0.0208808598426485; 0.0203334854854573;
        0.0198201613095123; 0.0193371277411309; 0.0188810965437214; 0.0184491903771491; 0.0180388898774827;
        0.0176479873748964; 0.0172745464630744; 0.0169168667196273; 0.0165734529546163; 0.0162429884340465;
        0.0159243115878558; 0.015616395768123; 0.0153183316735606; 0.0150293121013789; 0.0147486187278217;
        0.0144756106545343; 0.0142097144898574; 0.0139504157625269; 0.0136972514904609; 0.0134498037496352;
        0.0132076941078022; 0.0129705788052414; 0.0127381445800944; 0.0125101050493534; 0.0122861975684327;
        0.0120661805026419; 0.0118498308529597; 0.0116369421864235; 0.0114273228283359; 0.0112207942794652;
        0.011017189826585; 0.0108163533191648; 0.0106181380888608; 0.0104224059917558; 0.0102290265561145;
        0.010037876220831; 0.00984883765178813; 0.00966179912508489; 0.00947665396755367; 0.00929330004622361;
        0.00911163929942153; 0.00893157730306791; 0.00875302286644572; 0.00857588765231608; 0.00840008581674479;
        0.00822553366440301; 0.00805214931542556; 0.00787985238016235; 0.00770856363834899; 0.00753820471935813;
        0.0073686977802775; 0.00719996517859552; 0.00703192913626215; 0.00686451139183101; 0.00669763283727627;
        0.00653121313591301; 0.0063651703176287; 0.00619942034735285; 0.00603387666234752; 0.005868449673489;
        0.00570304622522753; 0.00553756900835215; 0.00537191591905131; 0.00520597935704217; 0.00503964545474499;
        0.0048727932286026; 0.00470529364269326; 0.00453700857376439; 0.00436778966573244; 0.004197477060564;
        0.00402589799129107; 0.00385286522173959; 0.00367817531639162; 0.00350160672268908; 0.00332291764705882];
    bi = [-0.049504; -0.0439717647058824; -0.0391023727852587; -0.0348077071096437; -0.0310113939347378;
        -0.0276473006459122; -0.0246582138607805; -0.0219946779087972; -0.0196139757181584; -0.0174792359700002;
        -0.0155586520432105; -0.013824799783317; -0.0122540424982613; -0.0108260128238898; -0.00952316222340528;
        -0.00833036989775212; -0.00723460379719705; -0.0062246272467668; -0.00529074543765255; -0.00442458670052347;
        -0.00361891407169654; -0.00286746319555056; -0.00216480308222662; -0.00150621666384775; -0.000887598470111083;
        -0.000305367079654839; 0.000243609698795162; 0.000762078698058558; 0.00125245586674528; 0.00171687269076796;
        0.00215721572627192; 0.00257516024967501; 0.00297219889171659; 0.00334966600112314; 0.00370875837774925;
        0.00405055292307561; 0.00437602167614207; 0.00468604463392592; 0.00498142069554991; 0.0052628770183623;
        0.00553107702983676; 0.00578662730146703; 0.00603008345855789; 0.00626195527230905; 0.00648271105720486;
        0.00669278147688987; 0.00689256284492579; 0.00708241999264694; 0.00726268876437611; 0.00743367819019131;
        0.00759567237795744; 0.00774893215920034; 0.00789369651738759; 0.00803018382210236; 0.00815859288829394;
        0.00827910387612334; 0.00839187904377877; 0.00849706336291365; 0.00859478500397602; 0.00868515569658017;
        0.00876827096815956; 0.00884421026238137; 0.00891303693715441; 0.00897479814048322; 0.00902952456087968;
        0.00907723004750749; 0.0091179110936775; 0.00915154617570703; 0.00917809493747938; 0.00919749720926623;
        0.00920967184748352; 0.0092145153800154; 0.00921190043953907; 0.00920167396489123; 0.0091836551479112;
        0.009157633100353; 0.00912336421235517; 0.00908056917057151; 0.00902892960037508; 0.0089680842925344;
        0.00889762497040609; 0.00881709154897927; 0.00872596683203402; 0.0086236705882353; 0.00850955294117647];
elseif(n == 86)
    ai = [0.0268411162790698; 0.0258257948016416; 0.0248990041039672; 0.0240502607090469; 0.0232703734927699;
        0.0225512876645848; 0.0218859466431264; 0.0212681699130506; 0.0206925451373461; 0.0201543329706812;
        0.0196493831752092; 0.0191740607819572; 0.0187251811695957; 0.0182999530491059; 0.0178959284486204;
        0.0175109588884301; 0.01714315702268; 0.0167908631024061; 0.01645261568503; 0.0161271260788928;
        0.0158132560685065; 0.0155099985174982; 0.0152164604922445; 0.0149318485904347; 0.0146554561957002;
        0.014386652412414; 0.01412487246418; 0.0138696093657292; 0.0136204067012445; 0.0133768523628249;
        0.0131385731211416; 0.0129052299165687; 0.0126765137734038; 0.0124521422524359; 0.0122318563682335;
        0.0120154179072935; 0.0118026070917457; 0.0115932205407888; 0.0113870694885567; 0.0111839782227965;
        0.010983782713662; 0.0107863294062004; 0.01059147415379; 0.0103990812729623; 0.0102090227027668;
        0.0100211772541673; 0.00983542993695304; 0.00965167135334032; 0.00946979714887861; 0.00928970751249046;
        0.00911130671849923; 0.00893450270435822; 0.00875920667851442; 0.00858533275343881; 0.00841279759935066;
        0.00824152011457039; 0.00807142110876639; 0.00790242299562561; 0.00773444949168417; 0.00756742531820816;
        0.00740127590312122; 0.00723592708003744; 0.00707130478147618; 0.00690733472331159; 0.0067439420774417;
        0.00658105112954904; 0.00641858491866516; 0.00625646485504039; 0.00609461031255699; 0.00593293819160236;
        0.00577136244793771; 0.00560979358265214; 0.00544813808777932; 0.00528629784157269; 0.00512416944678273;
        0.00496164350455698; 0.00479860381579113; 0.00463492650090112; 0.00447047902806686; 0.00430511913902612;
        0.00413869366048343; 0.00397103718815739; 0.00380197062943978; 0.00363129958960328; 0.00345881258549932;
        0.00328427906976744];
    bi = [-0.0489283720930233; -0.0435247934336525; -0.0387609357045144; -0.0345527802482158; -0.0308273690366551;
        -0.0275214072249612; -0.0245800313822922; -0.0219557252780424; -0.0196073669019602; -0.0174993920370168;
        -0.0156010611969859; -0.0138858180981486; -0.0123307290671265; -0.0109159939046217; -0.00962451973716549;
        -0.00844155030457823; -0.00735434395779803; -0.00635189438758712; -0.00542468877633167; -0.00456449866918543;
        -0.00376419940314819; -0.00301761441884724; -0.0023193812149115; -0.00166483609360201; -0.00104991519312933;
        -0.000471069610837994; 7.48073041614959e-05; 0.000590442166917044; 0.00107823474360605; 0.00154030338161185;
        0.00197852378683714; 0.00239456210461488; 0.0027899031308207; 0.00316587436610524; 0.00352366652678371;
        0.00386435103924424; 0.0041888949693219; 0.00449817377262442; 0.00479298219511663; 0.00507404360431526;
        0.00534201798926914; 0.00559750883125414; 0.00584106901604191; 0.00607320593203453; 0.00629438587589532;
        0.00650503786802109; 0.00670555696382605; 0.00689630713293135; 0.00707762376661592; 0.0072498158639688;
        0.00741316793881484; 0.00756794168242606; 0.00771437741107219; 0.00785269532242812; 0.00798309658058883;
        0.0081057642458124; 0.00822086406200571; 0.00832854511229037; 0.00842894035065516; 0.00852216701564732;
        0.00860832693021859; 0.00868750669017309; 0.00875977774211856; 0.00882519635036463; 0.00888380345080697;
        0.00893562438845731; 0.00898066853389962; 0.00901892877254789; 0.00905038085913055; 0.00907498262830624;
        0.00909267305070801; 0.00910337112199471; 0.00910697457064089; 0.00910335836819822; 0.00909237302359272;
        0.00907384264066128; 0.00904756271555842; 0.00901329764785953; 0.00897077793613027; 0.00891969702540509;
        0.00885970777040444; 0.00879041847440478; 0.00871138845944654; 0.00862212311901505; 0.0085220683994528;
        0.00841060465116279];
elseif(n == 87)
    ai = [0.0265325977011494; 0.0255406169473403; 0.0246341141877762; 0.0238030879443999; 0.0230387548188887;
        0.0223334042332783; 0.0216802696257198; 0.0210734143635963; 0.0205076308047977; 0.0199783510917077;
        0.0194815684025599; 0.0190137675123459; 0.0185718636314203; 0.0181531485952813; 0.0177552435745765;
        0.0173760575610097; 0.0170137509632469; 0.0166667037178342; 0.0163334873841994; 0.0160128407505907;
        0.0157036485298768; 0.0154049227709887; 0.015115786653892; 0.0148354603737817; 0.0145632488540672;
        0.0142985310580432; 0.0140407506962478; 0.0137894081506998; 0.0135440534587655; 0.0133042802185874;
        0.0130697202950422; 0.0128400392203065; 0.0126149321964828; 0.0123941206195566; 0.0121773490543789;
        0.0119643825995418; 0.0117550045890788; 0.0115490145849798; 0.0113462266206977; 0.0111464676612086;
        0.0109495762498887; 0.0107554013165421; 0.0105638011244503; 0.0103746423373603; 0.0101877991899603;
        0.0100031527476479; 0.00982059024333124; 0.00964000448065592; 0.00946129329445658; 0.00928435906042757;
        0.00910910824701719; 0.00893545100340228; 0.00876330077811629; 0.00859257396350281; 0.00842318956166571;
        0.00825506886799963; 0.00808813516872338; 0.00792231344911295; 0.00775753010934991; 0.00759371268506881;
        0.00743078956981196; 0.00726868973668196; 0.00710734245652586; 0.00694667700999041; 0.0067866223907547;
        0.00662710699717517; 0.00646805830946597; 0.00630940254938313; 0.00615106431918129; 0.00599296621636405;
        0.00583502842045021; 0.00567716824762482; 0.00551929966873408; 0.00536133278561305; 0.00520317326020428;
        0.0050447216903314; 0.00488587292533611; 0.00472651531406928; 0.00456652987695198; 0.00440578939299384;
        0.0042441573917815; 0.0040814870395396; 0.00391761990743293; 0.00375238460933692; 0.00358559529537557;
        0.00341704998663459; 0.00324652873563218];
    bi = [-0.0483659770114942; -0.0430866185511895; -0.0384249216786956; -0.0343007306633961; -0.0306443147356159;
        -0.027395067016151; -0.024500355792335; -0.0219145116855333; -0.0195979358687038; -0.0175163159651487;
        -0.0156399376016218; -0.0139430808106665; -0.0124034915878752; -0.0110019199185061; -0.00972171650276573;
        -0.0085484812377303; -0.00746975726343809; -0.00647476505777101; -0.00555417167548415; -0.00469989077684742;
        -0.00390490958610907; -0.00316313936426647; -0.00246928637895374; -0.00181874071080334; -0.00120748055425823;
        -0.000631989955050012; -8.91881796792878e-05; 0.000423630862763976; 0.00090885052646929; 0.00136857586570633;
        0.00180467164955443; 0.00221879486374448; 0.00261242248749418; 0.00298687522667426; 0.00334333779126817;
        0.00368287622343547; 0.00400645271125158; 0.00431493826118973; 0.00460912354856697; 0.00488972821853294;
        0.00515740886987345; 0.00541276591915484; 0.00565634951285653; 0.00588866462950904; 0.00611017549192095;
        0.00632130939085234; 0.00652246000554037; 0.00671399029292123; 0.00689623500588631; 0.00706950289116121;
        0.00723407860914682; 0.00739022441108585; 0.0075381816030185; 0.00767817182099947; 0.00781039813781564;
        0.00793504601784563; 0.00805228413362834; 0.00816226505506605; 0.00826512581989869; 0.00836098839208198;
        0.00844996001292554; 0.00853213344824898; 0.00860758713335146; 0.00867638521622823; 0.00873857749817344;
        0.00879419926965582; 0.00884327103811695; 0.00888579814309981; 0.00892177025284605; 0.00895116073518637;
        0.00897392589416971; 0.00899000406241597; 0.00899931453761599; 0.0090017563499237; 0.00899720684516989;
        0.00898552006685894; 0.00896652491776829; 0.00894002307964062; 0.00890578666692052; 0.00886355558772559;
        0.00881303458223947; 0.00875388990545728; 0.0086857456176894; 0.00860817944242653; 0.00852071814708241;
        0.00842283239775461; 0.00831393103448276];
elseif(n == 88)
    ai = [0.0262310909090909; 0.0252616551724138; 0.0243747834074506; 0.0235609287487832; 0.0228116932016519;
        0.022119692286628; 0.0214784348304883; 0.0208822163234971; 0.020326024414634; 0.0198054552545043;
        0.0193166395217522; 0.0188561770837096; 0.018421079346644; 0.0180087184461282; 0.017616782514523;
        0.017243236341038; 0.016886286810985; 0.0165443525752681; 0.0162160374594406; 0.0159001071743177;
        0.0155954689376541; 0.0153011536592349; 0.0150163003802811; 0.0147401426927449; 0.0144719968951931;
        0.0142112516698904; 0.0139573590906845; 0.0137098267936441; 0.0134682111623495; 0.0132321113975258;
        0.0130011643565344; 0.0127750400623122; 0.0125534377938223; 0.0123360826811363; 0.0121227227380342;
        0.01191312627363; 0.0117070796321196; 0.0115043852164194; 0.0113048597573116; 0.0111083327948321;
        0.0109146453431035; 0.0107236487137088; 0.0105352034760799; 0.0103491785363093; 0.0101654503183199;
        0.00998390203351621; 0.00980442302691345; 0.00962690818935006; 0.00945125742676466; 0.00927737517868886;
        0.00910516997910243; 0.00893455405364044; 0.00876544294785215; 0.00859775518180976; 0.008431411926865;
        0.00826633670076821; 0.00810245507770914; 0.00793969441012069; 0.00777798355931475; 0.00761725263219967;
        0.0074574327214665; 0.00729845564673023; 0.00714025369417532; 0.00698275935228294; 0.00682590504121301;
        0.00666962283337397; 0.0065138441626403; 0.00635849951956685; 0.00620351812980111; 0.00604882761270525;
        0.00589435361696747; 0.00574001942970411; 0.00558574555522725; 0.00543144925927466; 0.00527704407406842;
        0.00512243925908293; 0.00496753921186231; 0.00481224282263152; 0.00465644276579513; 0.00450002472071769;
        0.00434286651343157; 0.00418483717013112; 0.00402579587249331; 0.00386559080402592; 0.00370405787580032;
        0.00354101931909309; 0.00337628213166144; 0.00320963636363636];
    bi = [-0.0478163636363636; -0.0426569905956112; -0.0380942224976307; -0.0340515470541063; -0.0304622846103375;
        -0.0272683757841188; -0.0244193093326823; -0.0218711752885114; -0.0195858298535439; -0.0175301598647719;
        -0.0156754358520042; -0.0139967438094147; -0.0124724868047573; -0.011083948461498; -0.00981491117682935;
        -0.00865132268929622; -0.00758100528986124; -0.00659340258548202; -0.00567935928009415; -0.00483092993931617;
        -0.00404121315688927; -0.0033042079471577; -0.00261468955279381; -0.00196810218417443; -0.00136046649974487;
        -0.000788299898517685; -0.000248547929451554; 0.000261474669482929; 0.000744134604762265; 0.00120152347134746;
        0.00163549499995219; 0.00204769697165771; 0.00243959855059095; 0.00281251368554225; 0.00316762114368339;
        0.00350598166264807; 0.00382855263997167; 0.00413620072017949; 0.00442971258869308; 0.00470980423731469;
        0.00497712892756102; 0.00523228404484016; 0.0054758170077619; 0.00570823037217305; 0.0059299862483068;
        0.00614151013127547; 0.00634319422961776; 0.0065354003633778; 0.00671846249192937; 0.00689268892218813;
        0.00705836423973288; 0.00721575099847248; 0.00736509119866036; 0.00750660757811321; 0.00764050473729417;
        0.00776697011535137; 0.0078861748311572; 0.00799827440078178; 0.00810340934057833; 0.00820170566309453;
        0.00829327527129441; 0.00837821625503331; 0.00845661309233208; 0.00852853675671158; 0.00859404473064313;
        0.00865318092401934; 0.00870597549542886; 0.00875244457290718; 0.00879258986971435; 0.00882639818954241;
        0.00885384081436285; 0.00887487276687165; 0.00888943193816124; 0.00889743806982841; 0.00889879157819957;
        0.0088933722067051; 0.00888103749064467; 0.00886162101664278; 0.00883493045698015; 0.00880074535668779;
        0.00875881464879232; 0.00870885387038796; 0.0086505420492721; 0.00858351822770371; 0.00850737758642131;
        0.00842166712838084; 0.00832588087774294; 0.00821945454545455];
elseif(n == 89)
    ai = [0.0259363595505618; 0.024988708886619; 0.0241208391391638; 0.0233236325153812; 0.022589055549819;
        0.0219100328741392; 0.0212803349417956; 0.0206944782698504; 0.0201476368961651; 0.0196355638745792;
        0.0191545217442889; 0.0187012210133136; 0.0182727657904434; 0.0178666057861347; 0.0174804939811292;
        0.0171124493327373; 0.0167607239533431; 0.0164237742542784; 0.0161002356012997; 0.0157889000759246;
        0.0154886969803015; 0.015198675762466; 0.0149179910741766; 0.0146458897053357; 0.0143816991676206;
        0.0141248177256508; 0.0138747056970741; 0.0136308778636042; 0.0133928968535169; 0.0131603673726085;
        0.0129329311753345; 0.0127102626809479; 0.0124920651511016; 0.0122780673557149; 0.0120680206630616;
        0.0118616964981302; 0.0116588841204595; 0.0114593886789417; 0.0112630295066238; 0.0110696386233924;
        0.010879059418677; 0.0106911454900175; 0.010505759616578; 0.0103227728494983; 0.0101420637034122;
        0.00996351743556844; 0.00978702540081024; 0.00961248447222792; 0.00943979651864483; 0.00926886793123972;
        0.00909960919258805; 0.00893193448223506; 0.00876576131361776; 0.00860101019774725; 0.00843760432956334;
        0.00827546929329131; 0.00811453278347991; 0.00795472433868722; 0.00779597508501622; 0.0076382174868917;
        0.00748138510261845; 0.00732541234237273; 0.00717023422635767; 0.00701578614090021; 0.00686200359028338;
        0.00670882194209491; 0.00655617616382886; 0.0064040005484023; 0.00625222842614122; 0.00610079186064805;
        0.00594962132578407; 0.0057986453607827; 0.00564779020025093; 0.00549697937551359; 0.00534613328340768;
        0.00519516871823832; 0.00504399836216461; 0.00489253022879039; 0.00474066705419337; 0.00458830562903679;
        0.0044353360647738; 0.00428164098627949; 0.00412709464253609; 0.00397156192625927; 0.00381489729259976;
        0.00365694356629557; 0.00349753062590257; 0.00333647395301328; 0.00317357303370786];
    bi = [-0.0472791011235955; -0.0422356690500511; -0.0377687316403085; -0.0338052153605835; -0.0302813269155593;
        -0.0271414226194781; -0.0243370069661197; -0.0218258467831259; -0.0195711886583327; -0.0175410685168413;
        -0.0157077033157758; -0.01404695581682; -0.012537864301961; -0.011162229922182; -0.00990425511849826;
        -0.00875022723562994; -0.00768824206627808; -0.00670796262356028; -0.00580040894545244; -0.00495777519252365;
        -0.00417327071297522; -0.00344098212083416; -0.00275575376766136; -0.0021130842886022; -0.00150903717307706;
        -0.000940163551688047; -0.00040343560660063; 0.000103810794868165; 0.000583925472261327; 0.00103898638592816;
        0.00147083611390619; 0.00188111317284278; 0.00227127889804652; 0.0026426405042059; 0.00299637086592516;
        0.00333352548482322; 0.00365505704644784; 0.00396182791469782; 0.00425462086293792; 0.0045341482987354;
        0.00480106020242154; 0.00505595096783696; 0.00529936530607117; 0.00553180334923089; 0.00575372507079903;
        0.00596555412155788; 0.00616768116497323; 0.0063604667830396; 0.00654424401257651; 0.00671932056258289;
        0.00688598075527254; 0.00704448722662763; 0.00719508241654317; 0.00733798987374114; 0.00747341539647321;
        0.00760154802649186; 0.00772256091074952; 0.00783661204269884; 0.00794384489283926; 0.00804438893622318;
        0.00813836008294287; 0.00822586101612201; 0.00830698144059213; 0.00838179824421024; 0.00845037557264019;
        0.00851276481735111; 0.00856900451555856; 0.00861912015982905; 0.00866312391406714; 0.00870101423159097;
        0.00873277536996068; 0.00875837679614135; 0.00877777247444201; 0.00879090002846289; 0.00879767976698984;
        0.00879801356238353; 0.00879178356850926; 0.00877885076362596; 0.00875905330188695; 0.00873220465518676;
        0.00869809152500407; 0.00865647150162802; 0.00860707044570164; 0.00854957956436071; 0.00848365215137974;
        0.00840889995765117; 0.00832488915501391; 0.00823113585291114; 0.0081271011235955];
elseif(n == 90)
    ai = [0.0256481777777778; 0.0247215860174781; 0.0238721158097832; 0.0230910545971141; 0.022370713908846;
        0.0217043115464087; 0.0210858666379319; 0.0205101062524478; 0.0199723823860909; 0.019468598244798;
        0.0189951428504957; 0.018548833091396; 0.0181268624224878; 0.0177267555002445; 0.0173463281065619;
        0.01698365178155; 0.0166370226435316; 0.0163049339279431; 0.0159860518252143; 0.0156791942415491;
        0.0153833121462144; 0.0150974732048224; 0.0148208474304898; 0.0145526946139802; 0.01429235332026;
        0.0140392312625797; 0.0137927968864732; 0.0135525720151606; 0.0133181254249494; 0.0130890672345389;
        0.012865044005811; 0.0126457344658928; 0.0124308457711458; 0.0122201102434043; 0.0120132825173633;
        0.0118101370456242; 0.0116104659146338; 0.0114140769306886; 0.0112207919404177; 0.011030445354755;
        0.0108428828494541; 0.01065796021874; 0.0104755423617767; 0.0102955023843309; 0.0101177208003497;
        0.00994208482020621; 0.00976848771412209; 0.00959682824079615; 0.00942701013257086; 0.00925894162959094;
        0.00909253505636577; 0.0089277064349658; 0.00876437512977867; 0.00860246351934046; 0.00844189669125632;
        0.0082826021566432; 0.00812450958087945; 0.00796755052773718; 0.00781165821421513; 0.00765676727358564;
        0.00750281352432708; 0.00734973374273513; 0.0071974654370974; 0.0070459466213771; 0.00689511558638553;
        0.00674491066642997; 0.00659526999940364; 0.0064461312782376; 0.00629743149155913; 0.00614910665129672;
        0.00600109150483623; 0.00585331922916397; 0.00570572110422911; 0.00555822616251706; 0.00541076081154579;
        0.0052632484256768; 0.00511560890326947; 0.00496775818480177; 0.00481960772713086; 0.00467106392857382;
        0.00452202749895453; 0.00437239276818793; 0.00422204692636301; 0.00407086918764501; 0.00391872986965308;
        0.00376548937929068; 0.00361099709532364; 0.00345509013732834; 0.00329759200998751; 0.00313831111111111];
    bi = [-0.0467537777777778; -0.0418224219725343; -0.0374483443422994; -0.0335617190659012; -0.0301014849918319;
        -0.0270142903845995; -0.0242535568211645; -0.0217786498331018; -0.0195541450621106; -0.0175491797696922;
        -0.0157368805234967; -0.0140938587798388; -0.0125997669005871; -0.0112369078890147; -0.00998989280886574;
        -0.00884534046904544; -0.00779161451787087; -0.0068185936002563; -0.0059174706927912; -0.00508057814933613;
        -0.00430123536717514; -0.00357361632432447; -0.00289263454546292; -0.00225384333004396; -0.00165334932418291;
        -0.00108773774038846; -0.000554007728441435; -4.95165788487854e-05; 0.000428068400713883; 0.000880811353902977;
        0.00131054358109233; 0.00171889426173303; 0.00210731687466245; 0.00247711190967851; 0.00282944638632094;
        0.0031653706276426; 0.00348583267683746; 0.00379169069203174; 0.00408372360853724; 0.00436264031768165;
        0.0046290875763119; 0.00488365683061619; 0.00512689011149442; 0.0053592851358409; 0.00558129972835684;
        0.00579335566149448; 0.00599584199650568; 0.00618911799601561; 0.00637351566779486; 0.00654934199021738;
        0.00671688086205303; 0.00687639481256388; 0.00702812650218593; 0.00717230003923854; 0.00730912213398427;
        0.00743878310785277; 0.00756145777264753; 0.00767730619198984; 0.00778647433505055; 0.00788909463071346;
        0.0079852864286526; 0.00807515637234368; 0.00815879868772836; 0.00823629539007522; 0.00830771641050511;
        0.00837311964264488; 0.00843255090892244; 0.00848604384509625; 0.00853361970070872; 0.00857528705224947;
        0.00861104142489578; 0.0086408648177528; 0.0086647251265299; 0.00868257545655192; 0.00869435331790113;
        0.00869997969330675; 0.00869935796813076; 0.00869237271043027; 0.00867888828759534; 0.00865874730445485;
        0.00863176884599975; 0.00859774650598171; 0.00855644618059343; 0.00850760360421555; 0.00845092160181331;
        0.00838606702997647; 0.00831266737581158; 0.00823030697991147; 0.00813852284644195; 0.0080368];
elseif(n == 91)
    ai = [0.0253663296703297; 0.0244601025641026; 0.023628454541713; 0.0228630560151459; 0.0221565452148265;
        0.021502418142736; 0.020894930405107; 0.0203290097298757; 0.019800178084385; 0.0193044824099281;
        0.0188384330822817; 0.0183989492920411; 0.0179833106159429; 0.0175891141210018; 0.0172142364077157;
        0.0168568000573041; 0.0165151440013861; 0.0161877973810976; 0.0158734565067957; 0.0155709645695501;
        0.0152792937919339; 0.0149975297384973; 0.0147248575360374; 0.0144605497806367; 0.0142039559326669;
        0.0139544930227932; 0.0137116375116633; 0.0134749181636253; 0.0132439098106743; 0.0130182278970374;
        0.0127975237075256; 0.0125814801941518; 0.0123698083256596; 0.0121622438936468; 0.011958544717012;
        0.0117584881935939; 0.0115618691542055; 0.0113684979798675; 0.0111781989479988; 0.0109908087776791;
        0.010806175347944; 0.0106241565664382; 0.0104446193687073; 0.0102674388309884; 0.0100924973816115;
        0.00991968409807711; 0.00974889407858085; 0.00958002787821948; 0.00941299100138672; 0.00924769344295825;
        0.00908404927180416; 0.00892197625097056; 0.00876139548955836; 0.00860223112191062; 0.00844441001021552;
        0.00828786146705065; 0.00813251699474638; 0.00797831003874127; 0.0078251757523477; 0.00767305077054777;
        0.00752187299060385; 0.00737158135739858; 0.00722211565151984; 0.00707341627817932; 0.00692542405510064;
        0.00677807999753636; 0.00663132509857215; 0.00648510010285175; 0.00633934527180723; 0.00619400013840452;
        0.00604900324931313; 0.00590429189228009; 0.0057598018063289; 0.00561546687221445; 0.0054712187803406;
        0.00532698667308886; 0.00518269675821109; 0.00503827188960629; 0.00489363111142977; 0.00474868916107308;
        0.00460335592610386; 0.00445753584976932; 0.00431112727914631; 0.00416402174946863; 0.00401610319758351;
        0.00386724709688973; 0.00371731950549773; 0.00356617601873782; 0.00341366061653702; 0.0032596043956044;
        0.00310382417582418];
    bi = [-0.04624; -0.0414170256410257; -0.0371329576490925; -0.0333210394698934; -0.0299227976435291;
        -0.0268870561280233; -0.0241690606075321; -0.0217297014713802; -0.0195348252061306; -0.0175546249110337;
        -0.0157631015338094; -0.0141375882347882; -0.0126583310286138; -0.0113081195292502; -0.0100719622408792;
        -0.00893680139902631; -0.00789126287722167; -0.00692543713870896; -0.00603068763390747; -0.00519948342599888;
        -0.0044252531724064; -0.00370225790207765; -0.0030254803101826; -0.00239052854569882; -0.0017935526957926;
        -0.0012311723761519; -0.000700414020553316; -0.000198656627861454; 0.000276415127873568; 0.000726851386909717;
        0.00115447203827065; 0.00156089684017705; 0.00194757137478988; 0.00231578940346742; 0.00266671211607738;
        0.00300138470375359; 0.00332075062795996; 0.00362566390901833; 0.00391689971363893; 0.00419516348279909;
        0.00446109880794353; 0.00471529423438441; 0.00495828914546827; 0.0051905788591075; 0.00541261904924631;
        0.00562482958838802; 0.00582759789313182; 0.00602128184246635; 0.00620621232808938; 0.00638269548704243;
        0.00655101465926363; 0.00671143210609556; 0.00686419052018008; 0.00700951435239209; 0.00714761097738807;
        0.00727867171586793; 0.00740287272867881; 0.00752037579534697; 0.00763132898743987; 0.00773586724527582;
        0.00783411286486138; 0.00792617590050302; 0.00801215448727145; 0.00809213508636173; 0.00816619265536206;
        0.008234390744494; 0.00829678151899671; 0.00835340570697821; 0.00840429247123227; 0.00844945920270484;
        0.00848891123247669; 0.00852264145829565; 0.00855062988083231; 0.00857284304393479; 0.00858923337221165;
        0.00859973839826578; 0.00860427987082575; 0.00860276273386442; 0.00859507396554621; 0.0085810812644949;
        0.00856063156941083; 0.00853354939648148; 0.00849963497731041; 0.00845866217822817; 0.00841037617983502;
        0.0083544908934507; 0.00829068608880465; 0.00821860420478398; 0.00813784681236367; 0.0080479706959707;
        0.00794848351648352];
elseif(n == 92)
    ai = [0.0250906086956522; 0.0242040821786909; 0.0233897028189202; 0.0226395031843259; 0.0219464310625053;
        0.0213042465907546; 0.0207074303618534; 0.0201511014146229; 0.0196309441178582; 0.0191431430475388;
        0.0186843250409142; 0.0182515076876998; 0.0178420535887389; 0.0174536297765804; 0.017084171750958;
        0.0167318516355527; 0.0163950500110959; 0.0160723310241825; 0.0157624204114765; 0.0154641861156166;
        0.0151766212023729; 0.0148988288187546; 0.01463000895906; 0.0143694468305669; 0.0141165026328691;
        0.0138706025850111; 0.0136312310527254; 0.0133979236444231; 0.0131702611592825; 0.0129478642839769;
        0.012730388946415; 0.0125175222454609; 0.0123089788850736; 0.0121044980497639; 0.0119038406658008;
        0.0117067869993117; 0.011513134548377; 0.0113226961915049; 0.0111352985595533; 0.0109507806022963;
        0.0107689923244816; 0.0105897936694306; 0.010413053531055; 0.0102386488776289; 0.0100664639728177;
        0.00989638968134852; 0.00972832284834441; 0.00956216574277127; 0.0093978255566757; 0.00923521395295866;
        0.00907424665534656; 0.00891484307500907; 0.00875692596894832; 0.00860042112586084; 0.00844525707566465;
        0.00829136481930084; 0.0081386775757713; 0.00798713054367116; 0.00783666067472247; 0.00768720645702221;
        0.00753870770588681; 0.00739110536031296; 0.00724434128318247; 0.00709835806342143; 0.00695309881838254;
        0.00680850699475529; 0.00666452616632286; 0.006521099826878; 0.00637817117658136; 0.00623568289999563;
        0.00609357693395535; 0.00595179422333515; 0.00581027446265669; 0.00566895582132467; 0.005527774650105;
        0.00538666516624964; 0.00524555911443391; 0.00510438540039937; 0.00496306969388997; 0.00482153399712857;
        0.0046796961747064; 0.00453746944034897; 0.00439476179558045; 0.00425147541483579; 0.0041075059710701;
        0.00396274189539062; 0.00381706356369571; 0.00367034240275276; 0.00352243990759281; 0.00337320656155439;
        0.003222480649785; 0.00307008695652174];
    bi = [-0.0457373913043478; -0.0410192642140468; -0.0368224704570792; -0.0330831559380206; -0.0297452994876805;
        -0.0267597914698658; -0.0240836140044388; -0.0216791124766159; -0.0195133489552161; -0.0175575290169558;
        -0.0157864942755315; -0.0141782736484235; -0.0127136870660647; -0.0113759959418858; -0.0101505952821434;
        -0.00902474282542595; -0.00798732106713093; -0.0070286284475786; -0.00614019636708703; -0.00531462904039306;
        -0.00454546351913948; -0.0038270474974562; -0.00315443277443813; -0.00252328248088826; -0.00192979038820517;
        -0.00137061080674827; -0.000842797751259945; -0.000343752203674701; 0.000128823559520808; 0.000576965485834086;
        0.00100248191241088; 0.00140698308257623; 0.00179190663041596; 0.00215853957357801; 0.00250803728624242;
        0.00284143986383597; 0.00315968623774921; 0.00346362635132075; 0.00375403166701695; 0.00403160423845077;
        0.00429698454909873; 0.00455075829179245; 0.00479346223882707; 0.00502558933143799; 0.00524759309907942;
        0.00545989150306449; 0.00566287028539979; 0.00585688589180125; 0.00604226802767639; 0.00621932189708871;
        0.00638833016719489; 0.00654955469419856; 0.00670323804134774; 0.00684960481478743; 0.00698886283904926;
        0.00712120419051728; 0.00724680610426481; 0.00736583176713575; 0.00747843100777869; 0.00758474089247585;
        0.00768488623399187; 0.0077789800192569; 0.00786712376045717; 0.0079494077730025; 0.00802591138284703;
        0.00809670306473237; 0.00816184051208176; 0.00822137063848105; 0.0082753295099224; 0.00832374220624493;
        0.00836662260947119; 0.00840397311599736; 0.00843578426883805; 0.00846203430534331; 0.00848268861498666;
        0.00849769910095789; 0.00850700343837593; 0.0085105242209531; 0.00850816798688615; 0.00849982411360967;
        0.00848536356981642; 0.00846463751181622; 0.00843747570986169; 0.00840368478850641; 0.00836304626336969;
        0.00831531435485522; 0.00826021355739982; 0.00819743594070805; 0.00812663815715306; 0.0080474381270903;
        0.00795941137123746; 0.00786208695652174];
elseif(n == 93)
    ai = [0.0248208172043011; 0.0239533557737261; 0.0231557141726903; 0.0224202676544276; 0.0217402574864277;
        0.0211096947172922; 0.0205232740931604; 0.0199762971266228; 0.0194646034109363; 0.018984509354908;
        0.0185327535895736; 0.0181064483672446; 0.017703036337113; 0.0173202521398222; 0.0169560883166328;
        0.0166087650774401; 0.0162767035162595; 0.0159585019032507; 0.0156529147191887; 0.0153588341318071;
        0.0150752736439052; 0.0148013536707678; 0.0145362888295355; 0.0142793767458871; 0.0140299882039646;
        0.0137875584840588; 0.0135515797493566; 0.0133215943581837; 0.0130971889918057; 0.0128779895001047;
        0.0126636563784628; 0.0124538807990536; 0.0122483811285932; 0.0120468998725108; 0.0118492009925636;
        0.0116550675512236; 0.011464299641767; 0.0112767125679862; 0.0110921352418609; 0.0109104087714439;
        0.0107313852146763; 0.0105549264779001; 0.0103809033405251; 0.0102091945896686; 0.0100396862506551;
        0.00987227090107719; 0.00970684705769758; 0.00954331862684833; 0.00938159441018013; 0.00922158765864873;
        0.00906321566852138; 0.00890639941395749; 0.00875106321138069; 0.00859713441142832; 0.00844454311474992;
        0.00829322190834072; 0.00814310561944747; 0.00799413108438124; 0.00784623692982249; 0.00769936336441246;
        0.00755345197859904; 0.00740844555084728; 0.00726428785843955; 0.00712092349117975; 0.00697829766638368;
        0.00683635604358342; 0.00669504453740047; 0.00655430912704927; 0.00641409566092104; 0.00627434965466681;
        0.00613501608114744; 0.00599603915054697; 0.00585736207885231; 0.0057189268427861; 0.00558067391913888;
        0.00544254200628085; 0.00530446772543995; 0.00516638529911184; 0.00502822620371624; 0.00488991879333311;
        0.00475138789104046; 0.00461255434403287; 0.0044733345383271; 0.00433363986845913; 0.00419337615714804;
        0.00405244301944831; 0.00391073316543836; 0.00376813163500312; 0.00362451495777005; 0.00347975023075724;
        0.0033336941058007; 0.00318619167835437; 0.0030370752688172];
    bi = [-0.0452455913978495; -0.0406289294062646; -0.036516783543712; -0.0328480461274739; -0.0295690212759997;
        -0.0266325629603949; -0.0239973070236659; -0.0216269877262734; -0.0194898302371084; -0.0175580112796159;
        -0.0158071808684209; -0.0142160387371306; -0.0127659596673791; -0.0114406624867507; -0.0102259180128343;
        -0.00910929168591344; -0.00807991705708351; -0.00712829668504968; -0.00624612734646081; -0.00542614678412201;
        -0.00466199950737531; -0.00394811942173462; -0.00327962730273877; -0.0026522413440147; -0.00206219920364806;
        -0.00150619014792756; -0.000981296049017325; -0.000484940134654559; -1.48425149845161e-05; 0.000431018374555386;
        0.000854439173596745; 0.0012570205088375; 0.00164019200502577; 0.00200523391015945; 0.00235329578606143;
        0.00268541265867887; 0.00300251897217259; 0.00330546064644475; 0.00359500549859251; 0.00387185225431776;
        0.00413663834506629; 0.00438994666015551; 0.00463231139996383; 0.00486422315602178; 0.00508613332622671;
        0.00529845795809252; 0.0055015810996705; 0.00569585772628867; 0.00588161630133572; 0.00605916102076299;
        0.00622877378361958; 0.00639071592461377; 0.00654522973927134; 0.00669253982761441; 0.0068328542783053;
        0.00696636571179407; 0.00709325219809141; 0.00721367806228866; 0.00732779458879945; 0.00743574063344781;
        0.00753764315092786; 0.00763361764376847; 0.00772376853771659; 0.00780818948737499; 0.00788696361496642;
        0.00796016368422399; 0.00802785221060712; 0.00809008150829574; 0.00814689367370806; 0.00819832050460515;
        0.00824438335317754; 0.008285092910843; 0.00832044892181259; 0.00835043982179248; 0.00837504229747489;
        0.00839422076172348; 0.0084079267385679; 0.00841609815128219; 0.00841865850592202; 0.00841551596173045;
        0.00840656227878033; 0.00839167163209794; 0.0083706992802962; 0.00834348007543095; 0.00830982679937093;
        0.00826952831043452; 0.00822234748238654; 0.00816801891610027; 0.00810624640226796; 0.00803670011148272;
        0.00795901348581293; 0.00787277980364657; 0.00777754838709677];
elseif(n == 94)
    ai = [0.0245567659574468; 0.0237077611530542; 0.0229263478857689; 0.0222052258661335; 0.0215379147543593;
        0.0209186640697219; 0.0203423724937097; 0.0198045156546988; 0.0193010815632188; 0.0188285129416032;
        0.0183836557604648; 0.01796371335744; 0.0175662055714159; 0.0171889323783856; 0.0168299415635266;
        0.0164875000084023; 0.0161600682126704; 0.0158462777066326; 0.015544911044656; 0.0152548841001948;
        0.0149752304110768; 0.0147050873491201; 0.0144436839112118; 0.0141903299499086; 0.0139444066805835;
        0.0137053583193097; 0.013472684721196; 0.0132459349029016; 0.0130247013457076; 0.0128086149869049;
        0.0125973408175138; 0.0123905740135496; 0.0121880365363181; 0.0119894741446194; 0.0117946537683683;
        0.01160336119905; 0.0114153990577103; 0.0112305850058788; 0.0110487501689981; 0.0108697377456441;
        0.0106934017791021; 0.0105196060707716; 0.0103482232174317; 0.0101791337566597; 0.0100122254066757;
        0.00984739238862961; 0.00968453482086529; 0.00952355817602988; 0.00936437279305133; 0.00920689343701458;
        0.00905103890083889; 0.00889673164341282; 0.00874389745949359; 0.00859246517723733; 0.00844236637970613;
        0.00829353514710843; 0.00814590781687911; 0.00799942275900245; 0.00785402016423297; 0.00770964184308032;
        0.00756623103360123; 0.00742373221618781; 0.00728209093366124; 0.00714125361507536; 0.00700116740170884;
        0.00686177997377952; 0.0067230393764502; 0.00658489384371396; 0.00644729161874868; 0.00631018076931441;
        0.00617350899673477; 0.00603722343695215; 0.00590127045207745; 0.00576559541076533; 0.00563014245563628;
        0.0054948542558348; 0.00535967174265769; 0.00522453382600708; 0.00508937708921774; 0.00495413545957709;
        0.0048187398515976; 0.00468311777981565; 0.00454719293757759; 0.00441088473793341; 0.00427410781239255;
        0.00413677146290606; 0.00399877906202791; 0.00386002739577825; 0.00372040594328856; 0.00357979608685705;
        0.003438070245591; 0.00329509092536779; 0.00315070967741935; 0.00300476595744681];
    bi = [-0.044764255319149; -0.0402458201784489; -0.0362157995881949; -0.0326156861925935; -0.0293939901922752;
        -0.0265054324137739; -0.0239102243491628; -0.0215734265279273; -0.0194643773613234; -0.0175561853151246;
        -0.0158252779242031; -0.0142510017659292; -0.0128152680628008; -0.0115022390916594; -0.0102980510407279;
        -0.00919056937972088; -0.00816917319542601; -0.00722456529823612; -0.00634860522676016; -0.00553416257029557;
        -0.00477498829490253; -0.00406560200021036; -0.00340119325290015; -0.00277753534089383; -0.00219090997136244;
        -0.00163804159734336; -0.00111604020351359; -0.000622351512879457; -0.000154713694088522; 0.000288880245074401;
        0.000710215097587833; 0.00111088176520664; 0.00149230179350396; 0.0018557486252704; 0.00220236600343666;
        0.00253318390122899; 0.00284913230985401; 0.00315105317203502; 0.00343971071263286; 0.00371580038487518;
        0.00397995662192791; 0.00423275955825324; 0.00447474086302859; 0.00470638880850568; 0.00492815267925603;
        0.0051404466134962; 0.00534365295485925; 0.00553812518184885; 0.00572419047257408; 0.00590215195403215;
        0.00607229067801906; 0.00623486735955721; 0.00639012390840469; 0.00653828477963784; 0.00667955816537324;
        0.00681413704632943; 0.00694220011904096; 0.00706391261205959; 0.00717942700234812; 0.00728888364123822;
        0.00739241129773923; 0.00749012762560841; 0.00758213955939212; 0.0076685436435893; 0.00774942629814921;
        0.00782486402267116; 0.00789492354090612; 0.0079596618864507; 0.0080191264298597; 0.00807335484676999;
        0.00812237502601536; 0.00816620491610799; 0.00820485230785915; 0.00823831455029967; 0.00826657819643262;
        0.00828961857469829; 0.00830739928134722; 0.00831987158819408; 0.00832697375945575; 0.00832863027055389;
        0.00832475092087851; 0.00831522983155725; 0.00829994431824776; 0.00827875362786058; 0.00825149752692061;
        0.00821799472797877; 0.0081780411390859; 0.00813140791983224; 0.00807783932583152; 0.00801705032178489;
        0.00794872394139238; 0.00787250837038584; 0.00778801372683596; 0.0076948085106383];
elseif(n == 95)
    ai = [0.0242982736842105; 0.0234671426651736; 0.022701468713651; 0.0219942589207943; 0.0213392971721776;
        0.0207310597471268; 0.0201646396196293; 0.0196356786254185; 0.0191403067334148; 0.0186750877274236;
        0.018236970666264; 0.017823246547712; 0.0174315096541619; 0.0170596231060804; 0.0167056881934687;
        0.0163680170959651; 0.0160451086391867; 0.0157356267686959; 0.0154383814538236; 0.0151523117617166;
        0.0148764708676167; 0.0146100127907198; 0.0143521806661884; 0.0141022963831725; 0.0138597514361963;
        0.0136239988531259; 0.0133945460772987; 0.0131709486943863; 0.0129528049062942; 0.0127397506649931;
        0.0125314553887161; 0.0123276181915427; 0.0121279645651085; 0.0119322434581082; 0.0117402247054648;
        0.0115516967645983; 0.0113664647211894; 0.0111843485312671; 0.0110051814703925; 0.0108288087642248;
        0.0106550863778661; 0.0104838799441482; 0.0103150638134617; 0.0101485202098864; 0.00998413848028223;
        0.00982181442466588; 0.00966144969766838; 0.00950295127214814; 0.00934623095715575; 0.00919120496342286;
        0.00903779351039621; 0.00888592046957404; 0.00873551303953892; 0.00858650144863043; 0.00843881868167433;
        0.00829240022759017; 0.00814718384504714; 0.00800310934363368; 0.00786011837825819; 0.00771815425471112;
        0.00757716174449749; 0.00743708690719866; 0.0072978769187453; 0.00715947990408415; 0.00702184477280093;
        0.00688492105632295; 0.00674865874536899; 0.00661300812634147; 0.00647791961536858; 0.00634334358870021;
        0.00620923020814362; 0.00607552924019019; 0.0059421898674343; 0.00580916049081817; 0.00567638852115116;
        0.00554382015824823; 0.00541140015590824; 0.00527907157080803; 0.00514677549322143; 0.00501445075728271;
        0.00488203362830036; 0.00474945746438957; 0.00461665234942963; 0.00448354469406534; 0.00435005680116139;
        0.00421610639178443; 0.0040816060874331; 0.00394646284386185; 0.00381057733145493; 0.00367384325670492;
        0.00353614661894209; 0.00339736489605141; 0.00325736615251237; 0.00311600806270997; 0.00297313684210526];
    bi = [-0.0442930526315789; -0.0398697424412094; -0.0359194231839035; -0.0323860509714799; -0.0292202301271067;
        -0.0263784572188132; -0.0238224456548312; -0.0215185229302507; -0.0194370933189182; -0.0175521594530263;
        -0.0158408968293085; -0.0142832758288248; -0.0128617263404296; -0.0115608405393771; -0.0103671097951733;
        -0.00926869206956702; -0.00825520651914487; -0.00731755233985709; -0.00644774918528444; -0.00563879675874327;
        -0.00488455142345999; -0.00417961789692957; -0.00351925429698357; -0.00289928898968595; -0.00231604785449287;
        -0.00176629073158687; -0.00124715595126159; -0.00075611196692411; -0.000290915222847024; 0.000150426513697565;
        0.000569686037872142; 0.000968444412981485; 0.00134811502825113; 0.00170996447712763; 0.00205513066805677;
        0.00238463852939782; 0.00269941362542922; 0.0030002939607431; 0.00328804021520811; 0.00356334462064018;
        0.00382683866293805; 0.00407909976933122; 0.00432065711920129; 0.00455199669835809; 0.00477356570039001;
        0.00498577636450353; 0.00518900932688494; 0.00538361655184507; 0.00556992389965424; 0.00574823337986923;
        0.00591882513194154; 0.00608195916884139; 0.00623787691421023; 0.00638680255905895; 0.00652894426016183;
        0.00666449519897238; 0.00679363451703162; 0.00691652814138463; 0.0070333295114104; 0.00714418021665133;
        0.00724921055365713; 0.00734854000849653; 0.00744227767040283; 0.00753052258097865; 0.00761336402246518;
        0.0076908817477596; 0.00776314615412282; 0.00783021840184083; 0.00789215047847368; 0.00794898520873231;
        0.00800075620945545; 0.00804748778860605; 0.00808919478665975; 0.00812588235821065; 0.00815754569106135;
        0.00818416965949172; 0.00820572840780337; 0.0082221848596109; 0.00823349014768874; 0.00823958295847697;
        0.0082403887845959; 0.00823581907790951; 0.00822577029480703; 0.0082101228244319; 0.00818873978957363;
        0.00816146570884275; 0.00812812500756697; 0.00808852036357157; 0.00804243087263396; 0.00798961001692558;
        0.00792978341817063; 0.00786264635555646; 0.00778786102662284; 0.00770505352743561; 0.00761381052631579];
elseif(n == 96)
    ai = [0.0240451666666667; 0.023231350877193; 0.0224809466218738; 0.0217872523630628; 0.0211443028994931;
        0.0205467902406489; 0.0199899925482267; 0.0194697103788983; 0.0189822095292754; 0.0185241698454079;
        0.0180926394156945; 0.0176849936180907; 0.0172988985402915; 0.0169322783354447; 0.0165832861162093;
        0.0162502780268671; 0.0159317901669915; 0.015626518071088; 0.0153332984768848; 0.0150510931407615;
        0.0147789744823498; 0.0145161128618043; 0.0142617653127874; 0.014015265571987; 0.0137760152621466;
        0.0135434761002471; 0.0133171630157801; 0.0130966380760972; 0.0128815051267138; 0.0126714050642924;
        0.0124660116689202; 0.0122650279303014; 0.0120681828097; 0.0118752283859509; 0.0116859373396774;
        0.0115001007350747; 0.0113175260632887; 0.011138035515599; 0.0109614644583388; 0.0107876600848114;
        0.0106164802224128; 0.010447792275797; 0.0102814722892468; 0.0101174041134682; 0.00995547866384786;
        0.00979559325881244; 0.0096376510283373; 0.00948156038389088; 0.00932723454218157; 0.0091745910960217;
        0.00902355162644763; 0.00887404135095275; 0.00872598880331275; 0.00857932554102125; 0.00843398587681969;
        0.00828990663120515; 0.00814702690314466; 0.0080052878565184; 0.0078646325200657; 0.00772500559882118;
        0.00758635329520916; 0.00744862313811563; 0.0073117638183845; 0.00717572502928799; 0.0070404573106064;
        0.00690591189501822; 0.00677204055555225; 0.00663879545288837; 0.00650612898131429; 0.00637399361215247;
        0.00624234173346463; 0.00611112548482043; 0.00598029658588211; 0.00584980615750733; 0.00571960453400748;
        0.00558964106511772; 0.00545986390613669; 0.00533021979457791; 0.00520065381153949; 0.00507110912584392;
        0.00494152671882419; 0.00481184508743524; 0.00468199992315135; 0.0045519237638692; 0.00442154561577358;
        0.00429079054183919; 0.00415957921333707; 0.0040278274203914; 0.00389544553729195; 0.00376233793791373;
        0.00362840235623076; 0.003493529186541; 0.00335760071764862; 0.00322049029488615; 0.00308206140350877;
        0.00294216666666667];
    bi = [-0.0438316666666667; -0.0395005087719298; -0.0356275608435984; -0.0321591141554986; -0.0290477619317982;
        -0.0262516906284242; -0.023734045902009; -0.0214623660150613; -0.0194080760644572; -0.0175460370086513;
        -0.0158541440106405; -0.0143129691119133; -0.0129054437104329; -0.0116165767359845; -0.0104332048016699;
        -0.00934377096346834; -0.00833812904297414; -0.00740737076389913; -0.00654367322275343; -0.0057401644602593;
        -0.00499080512431629; -0.00429028441943175; -0.00363392872304428; -0.00301762141758344; -0.00243773263980684;
        -0.00189105778722294; -0.00137476374644071; -0.0008863419211969; -0.000423567239631517; 1.55375879320372e-05;
        0.000432733207006418; 0.000829590725050536; 0.00120751529161697; 0.00156776659910626; 0.00191147669764377;
        0.00223966547026934; 0.00255325407248589; 0.0028530766027498; 0.00313989023724063; 0.00341438403280173;
        0.00367718657590833; 0.00392887263254527; 0.00416996893364146; 0.00440095921291954; 0.00462228859841299;
        0.00483436744523674; 0.00503757468525546; 0.00523226075887662; 0.00541875018512825; 0.00559734381830252;
        0.00576832083261282; 0.00593194047039624; 0.00608844358427908; 0.00623805399930852; 0.00638097971724811;
        0.0065174139819562; 0.00664753622194465; 0.00677151288378561; 0.00688949816794264; 0.00700163467679856;
        0.00710805398309458; 0.00720887712564549; 0.00730421503802165; 0.00739416891486141; 0.00747883051957348;
        0.00755828243638567; 0.00763259826897599; 0.00770184278726846; 0.00776607202337465; 0.00782533331710129;
        0.007879665310913; 0.00792909789372794; 0.0079736520924251; 0.00801333990944579; 0.00804816410437371;
        0.00807811791686912; 0.0081031847278087; 0.008123337654936; 0.00813853907875373; 0.00814874009378168;
        0.00815387987965725; 0.00815388498586459; 0.00814866852313616; 0.00813812925377256; 0.00812215057226656;
        0.00810059936668943; 0.0080733247502977; 0.00804015665173852; 0.00800090425107016; 0.00795535424756225;
        0.00790326894389744; 0.00784438412995576; 0.00777840674782357; 0.00770501231802911; 0.00762384210526315;
        0.0075345];
elseif(n == 97)
    ai = [0.0237972783505155; 0.0230002422680413; 0.0222646565382529; 0.0215840959755718; 0.0209528337753156;
        0.0203657672824383; 0.019818351245199; 0.0193065378511292; 0.0188267229031693; 0.0183756975496285;
        0.0179506050330289; 0.0175489019702098; 0.0171683237196038; 0.0168068534316052; 0.0164626944146947;
        0.0161342454837049; 0.0158200789875175; 0.0155189212418022; 0.0152296351183155; 0.0149512045659737;
        0.0146827208605548; 0.0144233703996358; 0.014172423877381; 0.0139292266901975; 0.0136931904391984;
        0.0134637854089815; 0.0132405339145467; 0.0130230044193482; 0.0128108063376006; 0.0126035854431164;
        0.012401019815232; 0.0122028162598569; 0.012008707150417; 0.0118184476395362; 0.011631813197756;
        0.0114485974404976; 0.0112686102088661; 0.0110916758738353; 0.0109176318368702; 0.0107463272031903;
        0.010577621606676; 0.0104113841679151; 0.0102474925691011; 0.010085832231458; 0.00992629558260504;
        0.00976878140281019; 0.00961319424043544; 0.00945944388806708; 0.0093074449118709; 0.00915711622762801;
        0.009008380717708; 0.00886116488393508; 0.00871539853191036; 0.00857101448288134; 0.00842794830970696;
        0.00828613809386077; 0.00814552420075542; 0.00800604907096354; 0.00786765702516045; 0.00773029408082743;
        0.00759390777893609; 0.00745844701898769; 0.00732386190090972; 0.00719010357241987; 0.00705712408055502;
        0.00692487622613383; 0.00679331341997701; 0.00666238953975014; 0.00653205878632175; 0.00640227553854436;
        0.0062729942053686; 0.00614416907419072; 0.00601575415431177; 0.00588770301435116; 0.00575996861240935;
        0.00563250311771169; 0.00550525772238846; 0.00537818244195367; 0.00525122590293596; 0.00512433511598934;
        0.00499745523266702; 0.00487052928387926; 0.00474349789787432; 0.00461629899538002; 0.00448886745932264;
        0.00436113477629882; 0.00423302864671692; 0.00410447256024586; 0.00397538533291525; 0.00384568060190082;
        0.00371526627370742; 0.00358404392113098; 0.00345190812404502; 0.00331874574872144; 0.00318443516006511;
        0.00304884536082474; 0.00291183505154639];
    bi = [-0.043379793814433; -0.0391379381443299; -0.0353401209983722; -0.0319348484432182; -0.0288766036530663;
        -0.026125182029336; -0.0236450956180552; -0.021405040171696; -0.0193774187813683; -0.0175379165395132;
        -0.0158651211855834; -0.0143401851405121; -0.0129465247527765; -0.011669552962086; -0.0104964419385641;
        -0.00941591257799985; -0.00841804802941675; -0.00749412870184115; -0.00663648644458714; -0.00583837582136373;
        -0.00509386060467242; -0.00439771380482499; -0.00374532971889459; -0.00313264664034649; -0.00255607901121748;
        -0.00201245792668041; -0.00149897901771801; -0.00101315684243799; -0.0005527850112212; -0.000115901356266674;
        0.000299242467014275; 0.000694207490159627; 0.00107039053469178; 0.00142904433368097; 0.00177129504766523;
        0.00209815750622641; 0.00241054846679226; 0.00270929814684759; 0.00299516025427267; 0.0032688207125988;
        0.00353090525322614; 0.00378198602476527; 0.00402258735034577; 0.00425319074671462; 0.00447423930397872;
        0.00468614151170782; 0.00488927460560478; 0.0050839874988862; 0.00527060335373437; 0.00544942184053096;
        0.00562072112593109; 0.00578475962506273; 0.00594177754813283; 0.00609199826739235; 0.00623562952667094;
        0.00637286451246237; 0.00650388280275602; 0.00662885120740705; 0.00674792451176686; 0.00686124613350683;
        0.00696894870102391; 0.00707115456047796; 0.00716797621734801; 0.00725951671737929; 0.00734586997090188;
        0.00742712102371374; 0.00750334627701788; 0.00757461365826986; 0.00764098274421387; 0.0077025048368514;
        0.00775922299258586; 0.0078111720043095; 0.00785837833573829; 0.00790086000684831; 0.0079386264288166;
        0.00797167818641526; 0.00800000676534255; 0.0080235942214954; 0.00804241278868634; 0.00805642442078179;
        0.00806558026368094; 0.00806982005196089; 0.00806907142437942; 0.00806324915174582; 0.00805225426993912;
        0.00803597311006434; 0.00801427621688937; 0.00798701714578914; 0.00795403112743868; 0.00791513358843485;
        0.00787011851488647; 0.00781875664478811; 0.00776079347368273; 0.00769594705671835; 0.00762390558871406;
        0.00754432474226805; 0.00745682474226804];
elseif(n == 98)
    ai = [0.0235544489795918; 0.0227736789396171; 0.0220524781190827; 0.0213846835848827; 0.020764795153129;
        0.0201879057026623; 0.0196496384388544; 0.0191460904624288; 0.0186737820529704; 0.0182296111275085;
        0.0178108123813245; 0.0174149206612384; 0.0170397381613147; 0.0166833050674458; 0.0163438733108381;
        0.0160198831212675; 0.0157099420992673; 0.0154128065523671; 0.0151273648642792; 0.0148526226876933;
        0.0145876897712469; 0.0143317682494283; 0.0140841422407711; 0.0138441686148406; 0.0136112688023084;
        0.0133849215349656; 0.0131646564139422; 0.0129500482147666; 0.0127407118473081; 0.0125362978971667;
        0.0123364886827963; 0.0121409947696199; 0.0119495518886992; 0.0117619182132048; 0.0115778719510496;
        0.0113972092166562; 0.0112197421489668; 0.0110452972465119; 0.0108737138936845; 0.0107048430553365;
        0.0105385461194709; 0.010374693870173; 0.0102131655750305; 0.0100538481731641; 0.00989663555165529;
        0.00974142789962609; 0.00958813113052526; 0.00943665636432468; 0.00928691946233565; 0.00913884060824304;
        0.00899234392973139; 0.00884735715575634; 0.00870381130510806; 0.00856164040242885; 0.00842078121829583;
        0.0082811730303677; 0.00814275740293035; 0.00800547798246531; 0.00786928030711371; 0.00773411162812152;
        0.00759992074153347; 0.00746665782855774; 0.00733427430315385; 0.00720272266550599; 0.00707195636013456;
        0.00694192963747304; 0.00681259741779714; 0.00668391515643841; 0.00655583870924837; 0.00642832419730043;
        0.00630132786982711; 0.00617480596438907; 0.00604871456326047; 0.0059230094449917; 0.00579764593007552;
        0.00567257871959549; 0.00554776172567598; 0.00542314789247944; 0.00529868900640989; 0.00517433549407907;
        0.00505003620647435; 0.00492573818763364; 0.00480138642598177; 0.00467692358631519; 0.00455228972023588;
        0.00442742195263275; 0.0043022541415876; 0.00417671650884521; 0.00405073523773339; 0.00392423203514963;
        0.00379712365394924; 0.00366932137177716; 0.00354073042208444; 0.00341124937276604; 0.00328076944755113;
        0.00314917378497791; 0.00301633662949716; 0.00288212244897959];
    bi = [-0.0429371428571429; -0.0387818556701031; -0.0350570139911635; -0.0317132256801798; -0.0287067707500821;
        -0.0259989771935127; -0.0235556611573371; -0.0213466253548881; -0.0193452101317892; -0.0175278920868314;
        -0.015873925597356; -0.0143650230114843; -0.0129850696497158; -0.0117198701081767; -0.0105569226772451;
        -0.00948521898443315; -0.00849506624113014; -0.0075779297208916; -0.00672629332403596; -0.00593353629095435;
        -0.00519382431619439; -0.00450201348841653; -0.00385356563901269; -0.00324447382571649; -0.00267119680803257;
        -0.00213060148981048; -0.00161991241175173; -0.00113666747396985; -0.000678679156760474; -0.000244000587260702;
        0.00016910412859139; 0.000562185824775285; 0.000936632902449735; 0.00129369107143276; 0.00163448056477614;
        0.00196001114341143; 0.00227119517039264; 0.00256885900083846; 0.00285375290390098; 0.00312655970660576;
        0.00338790232589634; 0.00363835033437885; 0.00387842568682815; 0.00410860771823937; 0.00432933750986036;
        0.00454102170701886; 0.0047440358614735; 0.00493872736130341; 0.00512541800285226; 0.00530440625182112;
        0.00547596923413581; 0.00564036449158542; 0.00579783153233918; 0.00594859320220717; 0.00609285689883711;
        0.00623081564786042; 0.00636264905725397; 0.00648852416380995; 0.00660859618355629; 0.00672300917619902;
        0.00683189663212545; 0.00693538198918025; 0.00703357908527361; 0.00712659255187572; 0.0072145181525718;
        0.00729744307007614; 0.0073754461444149; 0.00744859806437035; 0.00751696151371993; 0.0075805912732918;
        0.0076395342793818; 0.00769382963862901; 0.00774350859901777; 0.0077885944762577; 0.00782910253438323;
        0.00786503981900388; 0.00789640494122197; 0.00792318780980902; 0.00794536930879267; 0.00796292091714585;
        0.00797580426678693; 0.00798397063458704; 0.00798736036353555; 0.00798590220763197; 0.00797951259444753;
        0.00796809479862854; 0.00795153801889099; 0.00792971635027823; 0.00790248764261625; 0.00786969223519919;
        0.00783115155676879; 0.00778666657881017; 0.00773601610907061; 0.00767895491101394; 0.00761521163364966;
        0.00754448653482011; 0.00746644897959183; 0.00738073469387755];
elseif(n == 99)
    ai = [0.0233165252525253; 0.0225515283446712; 0.0218442955283957; 0.0211889128779909; 0.0205800957447844;
        0.0200131232940731; 0.019483779500915; 0.0189883000116465; 0.0185233243279471; 0.0180858528164141;
        0.0176732080892085; 0.0172830003406294; 0.0169130962606861; 0.0165615911801008; 0.016226784131865;
        0.0159071555427048; 0.0156013472937394; 0.015308144913427; 0.0150264616877267; 0.0147553244924149;
        0.0144938611708194; 0.0142412892969915; 0.0139969061796568; 0.0137600799762705; 0.0135302417992626;
        0.0133068787081838; 0.0130895274920499; 0.0128777691558068; 0.0126712240335862; 0.0124695474593579;
        0.0122724259327793; 0.0120795737245577; 0.0118907298715352; 0.0117056555170241; 0.0115241315567287;
        0.0113459565549099; 0.0111709448993491; 0.0109989251671615; 0.0108297386766517; 0.0106632382032177;
        0.010499286839826; 0.01033775698483; 0.0101785294419089; 0.0100214926186903; 0.00986654181220812;
        0.00971357857075425; 0.00956251012293044; 0.00941324886581057; 0.00926571190509462; 0.0091198206409935;
        0.00897550039433595; 0.00883268006804898; 0.00869129183974041; 0.00855127088161642; 0.0084125551044058;
        0.00827508492234426; 0.00813880303660269; 0.00800365423482938; 0.00786958520472259; 0.0077365443597621;
        0.00760448167540973; 0.00747334853424422; 0.00734309757862745; 0.00721368256961012; 0.00708505825087837;
        0.00695718021661977; 0.00683000478224979; 0.00670348885698989; 0.00657758981732588; 0.00645226538040253;
        0.00632747347642616; 0.00620317211915384; 0.00607931927354328; 0.00595587271962431; 0.00583278991162827;
        0.00571002783137738; 0.00558754283489019; 0.00546529049110221; 0.00534322541153125; 0.00522130106963519;
        0.00509946960851378; 0.00497768163549691; 0.00485588600203704; 0.00473402956718399; 0.00461205694276543;
        0.004489910218225; 0.00436752866288352; 0.00424484840318604; 0.00412180207227992; 0.00399831842903655;
        0.00387432194338445; 0.00374973234456385; 0.00362446412864652; 0.00349842602139073; 0.00337152039222437;
        0.00324364261487163; 0.00311468036986741; 0.00298451288394146; 0.0028530101010101];
    bi = [-0.0425034343434344; -0.0384320923520923; -0.0347781520655747; -0.0314942169857634; -0.0285382762952367;
        -0.0258731185125969; -0.0234658049458191; -0.0212871973272341; -0.0193115344919206; -0.0175160534031727;
        -0.0158806502367237; -0.0143875776118187; -0.0130211744041755; -0.0117676248953669; -0.0106147443071017;
        -0.00955178803905686; -0.00856928217700608; -0.00765887306557002; -0.006813193948474; -0.00602574687012199;
        -0.00529079820689141; -0.00460328635604197; -0.00395874025565786; -0.00335320754167706; -0.0027831912688041;
        -0.00224559423188868; -0.00173767002405249; -0.00125698005827431; -0.000801355861054436; -0.000368866020879214;
        4.22127588524594e-05; 0.000433420992386638; 0.000806138565196885; 0.00116160409519163; 0.00150093184418573;
        0.00182512648284934; 0.00213509597704197; 0.00243166283187549; 0.00271557390167596; 0.00298750894890786;
        0.00324808811279008; 0.00349787842849843; 0.00373739952026554; 0.00396712857612905; 0.00418750469833325;
        0.00439893271126986; 0.00460178649817666; 0.0047964119284417; 0.0049831294291432; 0.00516223624726258;
        0.00533400844272298; 0.00549870264692365; 0.00565655761666711; 0.00580779560922524; 0.00595262360068707;
        0.00609123436660646; 0.00622380744126111; 0.00635050996949176; 0.00647149746306292; 0.00658691447173316;
        0.00669689517770413; 0.00680156392080123; 0.00690103566059621; 0.00699541638068573; 0.00708480343946956;
        0.00716928587100686; 0.00724894463885154; 0.00732385284516444; 0.00739407589685637; 0.00745967163002159;
        0.00752069039346582; 0.00757717509170799; 0.00762916118743183; 0.00767667666297717; 0.00771974194008351;
        0.00775836975672557; 0.00779256499950685; 0.00782232448969779; 0.00784763672061573; 0.00786848154364032;
        0.00788482979973568; 0.00789664289290627; 0.00790387230154249; 0.00790645902311041; 0.00790433294710455;
        0.00789741215060819; 0.00788560211018936; 0.00786879482319774; 0.00784686783081461; 0.0078196831344408;
        0.0077870859961826; 0.0077489036133094; 0.00770494365560565; 0.00765499265352158; 0.00759881422393848;
        0.00753614711920382; 0.00746670308385772; 0.0073901645021645; 0.00730618181818182];
elseif(n == 100)
    ai = [0.02308336; 0.022333663030303; 0.0216399972294372; 0.0209966852287232; 0.0203986474726648;
        0.0198413406836679; 0.0193207023334953; 0.0188331005757788; 0.0183752891393636; 0.0179443667242879;
        0.017537740481037; 0.0171530931895668; 0.0167883537876725; 0.0164416709287759; 0.0161113892772994;
        0.0157960282756518; 0.0154942631406364; 0.0152049078689458; 0.0149269000514755; 0.0146592873146;
        0.0144012152234303; 0.0141519164975255; 0.0139107014036739; 0.0136769492032866; 0.0134501005437519;
        0.0132296506938717; 0.0130151435333243; 0.0128061662150344; 0.0126023444274721; 0.0124033381912905;
        0.0122088381314251; 0.0120185621718608; 0.011832252605787; 0.0116496734988425; 0.0114706083876618;
        0.0112948582399973; 0.0111222396463575; 0.0109525832163993; 0.0107857321562789; 0.0106215410058248;
        0.0104598745167844; 0.01030060665553; 0.0101436197155166; 0.00998880352648735; 0.00983605474893818;
        0.00968527624370095; 0.00953637650770009; 0.0093892691679988; 0.00924387252718733; 0.00910010915399311;
        0.00895790551372136; 0.00881719163377484; 0.00867790080006346; 0.00853996928060597; 0.00840333607305548;
        0.00826794267325467; 0.00813373286225194; 0.00800065250949187; 0.0078686493901373; 0.00773767301469116;
        0.00760767446926706; 0.00747860626501274; 0.00735042219532358; 0.00722307719959494; 0.00709652723235791;
        0.00697072913672166; 0.00684564052111148; 0.00672121963834412; 0.00659742526612415; 0.00647421658807562;
        0.00635155307444535; 0.00622939436162565; 0.00610770012964745; 0.00598642997678892; 0.00586554329042906;
        0.00574499911325177; 0.00562475600387155; 0.00550477189090793; 0.00538500391948128; 0.00526540828903672;
        0.00514594008132577; 0.0050265530772856; 0.00490719956145377; 0.00478783011244018; 0.00466839337784937;
        0.00454883583190212; 0.00442910151384836; 0.00430913174509099; 0.00418886482275451; 0.00406823568723279;
        0.0039471755610375; 0.00382561155604495; 0.003703466246004; 0.0035806572009247; 0.00345709647971851;
        0.00333269007720802; 0.00320733732137278; 0.00308093021645022; 0.00295335272727273; 0.00282448];
    bi = [-0.0420784; -0.0380884848484849; -0.0345034493506493; -0.0312777928683001; -0.0283711311599054;
        -0.0257476452166029; -0.0233755857103676; -0.0212268278872627; -0.0192764721738264; -0.0175024861671283;
        -0.0158853840510013; -0.01440793982444; -0.0130549310450509; -0.0118129100825583; -0.0106700001463878;
        -0.00961571359887301; -0.00864079029316415; -0.00773705388385845; -0.00689728425006654; -0.00611510434630765;
        -0.00538487995746862; -0.00470163098115993; -0.00406095299518579; -0.00345894799047587; -0.00289216326160557;
        -0.00235753754879865; -0.00185235361784937; -0.00137419654845167; -0.000920917077665455; -0.000490599414321238;
        -8.15330026555668e-05; 0.000307812230067175; 0.000678807556245637; 0.00103268442934144; 0.00137055109108588;
        0.00169340709448859; 0.00200215599936221; 0.00229761646726834; 0.00258053195613503; 0.00285157919099834;
        0.00311137556610929; 0.00336048561477302; 0.00359942666652069; 0.00382867379634645; 0.00404866415758007;
        0.00425980077833568; 0.00446245589121777; 0.00465697385693271; 0.00484367373451505; 0.00502285154391146;
        0.00519478226056555; 0.00535972157631207; 0.00551790745623384; 0.00566956151707718; 0.00581489024929081;
        0.00595408610168473; 0.00608732844504189; 0.00621478442870538; 0.00633660974216102; 0.00645294929190038;
        0.00656393780234451; 0.00666970034830398; 0.00677035282531736; 0.00686600236322248; 0.00695674768745322;
        0.00704267943179755; 0.00712388040568554; 0.00720042581848315; 0.00727238346273729; 0.00733981385783738;
        0.0074027703551202; 0.00746129920503897; 0.00751543958663634; 0.0075652235991993; 0.00761067621562398;
        0.00765181519667677; 0.00768865096499801; 0.00772118643735379; 0.00774941681329358; 0.00777332931801449;
        0.00779290289686204; 0.00780810785850903; 0.00781890546344537; 0.00782524745397793; 0.00782707552147843;
        0.00782432070612401; 0.00781690272384766; 0.00780472921464847; 0.00778769490580361; 0.00776568068286908;
        0.00773855256065315; 0.00770616054559092; 0.00766833738013705; 0.00762489715892455; 0.00757563380550721;
        0.00752031939750971; 0.00745870232695139; 0.00739050528138528; 0.00731542303030303; 0.00723312];
   
end



