RE: android free app anomaly
CLIST is quite large, but here they are:
Code:
fCAS(z):=
BEGIN
LOCAL a,b,c,d;
a:=1;
b:=1;
c:=1;
d:=1;
FOR K FROM 3 TO 105 STEP 3 DO
a:=a*(K-2);
b:=b*z^3;
c:=c*(K-2)*(K-1)*K;
d:=d+a*b/c;
END;
RETURN d;
END;
gCAS(z):=
BEGIN
LOCAL a,b,c,d;
a:=1;
b:=z;
c:=1;
d:=z;
FOR K FROM 3 TO 105 STEP 3 DO
a:=a*(K-1);
b:=b*z^3;
c:=c*(K-1)*(K)*(K+1);
d:=d+a*b/c;
END;
RETURN d;
END;
aismallzCAS(z):=
BEGIN
RETURN(0.355028053887817*fCAS(z)-0.258819403792807*gCAS(z));
END;
aibigzCAS(z):=
BEGIN
LOCAL a,c,s;
IF z ≥ 0 THEN
s:=2/3*z^(3/2);
a:=1;
FOR K FROM 1 TO 48 DO
a:=a+(−1)^K*CLIST(K)*s^(−K);
END;
RETURN(0.282094791774/z^(0.25)/exp(s)*a);
END;
z:=−z;
s:=2/3*z^(3/2);
a:=1;
c:=5/(72*s);
FOR K FROM 1 TO 24 DO
a:=a+(−1)^K*CLIST(2*K)*s^(−2*K);
c:=c+(−1)^K*CLIST(2*K+1)*s^(−2*K-1);
END;
s:=s+π/4;
RETURN((0.564189583547/z^(0.25))*(sin(s)*a-cos(s)*c));
END;
bismallzCAS(z):=
BEGIN
RETURN((0.355028053887817*fCAS(z)+0.258819403792807*gCAS(z))*√3);
END;
bibigzCAS(z):=
BEGIN
LOCAL a,c,s;
if z ≥ 0 then
s:=2/3*z^(3/2);
a:=1;
FOR K FROM 1 TO 48 DO
a:=a+CLIST(K)/s^K;
END;
RETURN(0.564189583548/z^(0.25)*exp(s)*a);
END;
z:=−z;
s:=2/3*z^(3/2);
a:=1;
c:=5/(72*s);
FOR K FROM 1 TO 24 DO
a:=a+(−1)^K*CLIST(2*K)*s^(−2*K);
c:=c+(−1)^K*CLIST(2*K+1)*s^(−2*K-1);
END;
s:=s+π/4;
RETURN((0.564189583548/z^(0.25))*(cos(s)*a+sin(s)*c));
END;
AiryCAS_Ai(z):=
BEGIN
HAngle:=0;
IF (z < 6.389) AND (z > -7.189) THEN
RETURN aismallzCAS(z);
END;
RETURN aibigzCAS(z);
END;
AiryCAS_Bi(z):=
BEGIN
HAngle:=0;
IF (z < 10.172) AND (z > -7.123) THEN
RETURN bismallzCAS(z);
END;
RETURN bibigzCAS(z);
END;
Code:
CLIST:={5/72,385/10368,85085/2239488,37182145/644972544,5391411025/46438023168,5849680962125/20061226008576,1267709431363375/1444408272617472,2562040760785380875/831979165027663872,6653619855759634132375/539122498937926189056,4318199286388002551911375/77633639847061371224064,1556514560957130010757145625/5589622068988418728132608,7404339766473067461171741738125/4829433467605993781106573312,3201522602103470169172796946923125/347719209667631552239673278464,2998911957427493414180861368710704375/50071566192138943522512952098816,4537353791587797535655643250859295719375/10815458297502011800862797653344256,39225423528276509695743035903678611493996875/12459407958722317594593942896652582912,22605380841560292087599677808725844518040434375/897077373028006866810763888558985969664,249133902254835979097436049129967532433323627246875/1162612275444296899386749999572445816684544,161504330214358671291743148270200531420065637726303125/83708083831989376755845999969216098801287168,442037351796699683325500996815538854496719650456891653125/24107928143612940505683647991134236454770704384,955116420846440387185457510976432167751840673308640893359375/5207312479020395149227667966084995074230472146944,1444570172147475338327677873646809270444306661985078049347265625/749852996978936901488784187116239290689187989159936,1144413613334745571289939936335587465946335290783917701615501171875/53989415782483456907192461472369228929621535219515392,22747509392254737720530136114542472060615306574911932155011316793359375/93293710472131413535628573424254027590386012859322597376,19658397616786544338082143630187604354783747942038891768360779972821171875/6717147153993461774565257286546289986507792925871227011072,35392676632376082325600967051118529224901047737186173987575696558759963671875/967269190175058495537397049262665758057122181325456689594368,894620687236570232944215644151123063217823783652854919883950881915775601733984375/1880371305700313715324699863766622233663045520496687804571451392,3478924246752382615853499149919674414836054459259194824880146708089903950685826953125/541546936041690350013513560764787203294957109903046087716578000896,3507355455251703811714094987800052443674542214667623417069684458773259372627638711328125/38991379395001705200972976375064678637236911913019318315593616064512,21973581927151924380388805098567328559621006974892660707941573134214469969512156526470703125/16844275898640736646820325794027941171286345946424345512336442139869184,23735012607441360899268359313726677316739013501750991735658825045134565384810147138350693359375/1212787864702133038571063457170011764332616908142552876888223834070581248,847743445299983087239167989608375733721967345242040171822526254137071271849264025340471714716796875/2794263240273714520867730205319707105022349356360441828350467713698619195392,2930186684886423359992764193900004888349356403040691761169479155322326075180078864315461369567939453125/603560859899122336507429724349056734684827460973855434923701026158901746204672,6962985382903343792566335008292852792626408859625577945644908790444470968179390934220687820378591181640625/86912763825473616457069880306264169794615154380235182629012947766881851453472768,8523688820871250422642989240865922225716528216875939630890174775045524532332742987905296276117735405068359375/6257718995434100384909031382051020225212291115376933149288932239215493304650039296,386677143358824275423199206911882561769630302558577001355332778669940220409274885646323765566081066650926123046875/16220007636165188197684209342276244423750258571057010722956912364046558645652901855232,501185831461057723688388226104679784183409741075721006864802542342549274328853937592993211493312154415634164404296875/1167840549803893550233263072643889598510018617116104772052897690211352222487008933576704,1335290946020537001622626336507631334481493921210214373079114183995904569252679746047100492579102872035464054542626953125/168169039171760671233589882460720102185442680864719087175617267390434720038129286435045376,5480547615909060984275267187464437316456082396462569869567868885805344623201171785371933921734091687938173504479303564453125/36324512461100304986455414611515542072055619066779322829933329756333899528235925869969801216,61562991369506482036364076316788024375751173559464047344855871194251436152418762665082933742839051930609502975816016939501953125/20922919177593775672198318816232952233504036582464889950041597939648326128263893301102605500416,88658215253963664191149192344506070713810440068745235987244266211331123112672337599020044459656873688849709834318456590070556640625/1506450180786751848398278954768772560812290633937472076402995051654679481235000317679387596029952,785220481585712184122668068254620409434872264705999770785883253186270805659478130589492242337906742583945065799748764744943471435546875/650786478099876798508056508460109746270909553860987937006093862314821535893520137237495441484939264,1187344672864757951717209313162411014927089058684856072006253837335453815227556454164171513698907774640713770310824754243743475725830078125/46856626423191129492580068609127901731505487877991131464438758086667150584333449881099671786915627008,7352577916502610672465558798607631918526229582766940096077272057979918866532314817118260999875318262291045444751131798620097666910578857421875/13494708409879045293863059759428835698673580508861445861758362328960139368288033565756705474631700578304,104825703355577720357341471791749008262428455161508264949773667730619703280151212347655047075222412465483434905816886052926732437144122770263671875/8744571049601621350423262724109885532740480169742216918419418789166170310650645750610345147561341974740992,339658067068453461288298834142612819163368722648321888929647069027149277693620395661260538403519577782180564624174062308450640646876771715386962890625/1259218231142633474460949832271823516714629144442879236252396305639928524733692988087889701248833244362702848,562509892902281107793559922407628808621683643931434699332275295997153581443368739086926309100313901613438055503230563572401542894275474042778192138671875/90663712642269610161188387923571293203453298399887305010172534006074853780825895142328058489915993594114605056,45687616011416173856100730457870019465061767243755057714466731816184811038411852357379241751436595402945052306027889603914025715415948277228487543695068359375/313333790891683772717067068663862389311134599270010526115156277524994694666534293611885770141149673861260075073536,78952862469360966400266154142470604862102760508151980042610192857124107026522457593179633750742787529289350900357624652869958275597474536140339586478924560546875/22560032944201231635628828943798092030401691147440757880291251981799618015990469140055775450162776518010725405294592,278561489364399361653419045045464788074470959624861815986337282438505274410976534880256383799370702960838687846641771300255786787963009658410346129014941634521484375/3248644743964977355530551367906925252377843525231469134761940285379144994302627556168031664823439818593544458362421248,1504313972417569611564243260611699698186870967550614059801511424368645689252923575569525724394189846195282102221232224365881323886408476570021283904365689221014404296875/701707264696435108794599095467895854513614201449997333108579101641895318769367552132294839601863000816205603006282989568,11048260395731714907947634907186404006445221489909998352897608174188091113292414171127046737537235688091303790290506852752403935438663239805840163333624839211907098388671875/202091692232573311332844539494754006099920890017599231935270781272865851805577855014100913805336544235067213665809500995584,20683385749526348771348533643885701734405685310384149935336860012285218648150691065535786874437397400152967044838007178055590016569049156920288053700482833423483664324951171875/14550601840745278415964806843622288439194304081267144699339496251646341330001605561015265793984231184924839383938284071682048,2131154017473946398353438861065051049607958597326051656887304045085832073849502755319610872181406115919561265398973745605313828537225117981595720189136649707455486321049993896484375/56572739956817642481271169008003457451587454267966658591031961426400975091046242421227353407010690846987775524752048470699802624,4143157151243667611708026367625101517806017691256146789321363364014592627206510583864534409236306344449074332777913959069966929388050831639674952385880659453994143179604919952392578125/4073237276890870258651524168576248936514296707293599418554301222700870206555329454328369445304769740983119837782147489890385788928,65630568673664869017749214824872768828845753099276833819128482374108300495399132298831271138309689857747943912868427050210468995027716638052193870758339560508020080924355935560150146484375/2346184671489141268983277921099919387432234903401113265087277504275701238975869765693140800495547370806277026562516954176862214422528,396950950540607671205930869475258103973919337311031363789094095209758082527883267704462799231638664704358972138689527964686129763242111205002313844522953014468428612609695318250830230712890625/506775889041654514100388030957582587685362739134640465258851940923551467618787869389718412907038232094155837737503662102202238315266048,1629155140837712608089693035028092923899305291244698756880750631240021266915558427774236787149960879716465835273067803720169236225891010956226910209964358301208511789704087809432140168609619140625/72975728021998250030455876457891892626692234435388226997274679492991411337105453192119451458613505421558440634200527342717122317398310912,3401813998064130172522473098921287524502079897719883944939624330794523729155865281805129651974808991498804093358239562964638803310527031809733672154864051688711610626375839082349345294105072021484375/5254252417583874002192823104968216269121840879347952343803776923495381616271592629832600505020172390352207725662437968675632806852678385664,86708836996656613967425316818404697712033514512982121872566084567621615332453850167930949699185906384313017535608168220405678457582023513798301569555329813493570243255693762370002462201444180755615234375/4539674088792467137894599162692538856521270519756630825046463261900009716458656032175366836337428945264307474972346404935746745120714125213696}
-road
|