benchmark.awl 130 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595145961459714598145991460014601146021460314604146051460614607146081460914610146111461214613146141461514616146171461814619146201462114622146231462414625146261462714628146291463014631146321463314634146351463614637146381463914640146411464214643146441464514646146471464814649146501465114652146531465414655146561465714658146591466014661146621466314664146651466614667146681466914670146711467214673146741467514676146771467814679146801468114682146831468414685146861468714688146891469014691146921469314694146951469614697146981469914700147011470214703147041470514706147071470814709147101471114712147131471414715147161471714718147191472014721147221472314724147251472614727147281472914730147311473214733147341473514736147371473814739147401474114742147431474414745147461474714748147491475014751147521475314754147551475614757147581475914760147611476214763147641476514766147671476814769147701477114772147731477414775147761477714778147791478014781147821478314784147851478614787147881478914790147911479214793147941479514796147971479814799148001480114802148031480414805148061480714808148091481014811148121481314814148151481614817148181481914820148211482214823148241482514826148271482814829148301483114832148331483414835148361483714838148391484014841148421484314844148451484614847148481484914850148511485214853148541485514856148571485814859148601486114862148631486414865148661486714868148691487014871148721487314874148751487614877148781487914880148811488214883148841488514886148871488814889148901489114892148931489414895148961489714898148991490014901149021490314904149051490614907149081490914910149111491214913149141491514916149171491814919149201492114922149231492414925149261492714928149291493014931149321493314934149351493614937149381493914940149411494214943149441494514946149471494814949149501495114952149531495414955149561495714958149591496014961149621496314964149651496614967149681496914970149711497214973149741497514976149771497814979149801498114982149831498414985149861498714988149891499014991149921499314994149951499614997149981499915000150011500215003150041500515006150071500815009150101501115012150131501415015150161501715018150191502015021150221502315024150251502615027150281502915030
  1. //
  2. //
  3. // GENERATED by generate_benchmark.py
  4. //
  5. // iterations=10000
  6. // seed=42
  7. //
  8. //
  9. ORGANIZATION_BLOCK OB 1
  10. BEGIN
  11. <>I;
  12. U TRUE;
  13. FR Z 42;
  14. TAD;
  15. >D;
  16. FP M 0.4;
  17. XOD;
  18. SET;
  19. CALL FC 42;
  20. CALL FC 42;
  21. CALL FC 42;
  22. TAN;
  23. O FALSE;
  24. CLR;
  25. NEGR;
  26. TRUNC;
  27. L 0;
  28. SI T 42;
  29. CC FC 43;
  30. U FALSE;
  31. XOD;
  32. COS;
  33. TAW;
  34. T MD 0;
  35. NOP 0;
  36. L 0;
  37. CLR;
  38. SPB AAAA;
  39. AAAA: NOP 0;
  40. UN M 0.4;
  41. <>R;
  42. TAN;
  43. +I;
  44. L 0;
  45. CLR;
  46. SPB AAAB;
  47. AAAB: NOP 0;
  48. ==R;
  49. NEGR;
  50. L 0;
  51. CLR;
  52. LOOP AAAC;
  53. AAAC: NOP 0;
  54. FP M 0.4;
  55. CLR;
  56. +R;
  57. SAVE;
  58. + 0;
  59. -I;
  60. CC FC 43;
  61. AUF DB 42;
  62. XN TRUE;
  63. UD;
  64. >=I;
  65. MOD;
  66. S M 0.4;
  67. PUSH;
  68. L 0;
  69. CLR;
  70. SPBI AAAD;
  71. AAAD: NOP 0;
  72. +D;
  73. +AR1;
  74. DTB;
  75. XN(;
  76. );
  77. XN FALSE;
  78. L 0;
  79. CLR;
  80. SPBNB AAAE;
  81. AAAE: NOP 0;
  82. S M 0.4;
  83. TRUNC;
  84. FN M 0.4;
  85. +R;
  86. L 0;
  87. CLR;
  88. SPB AAAF;
  89. AAAF: NOP 0;
  90. TAR1;
  91. -D;
  92. >R;
  93. *D;
  94. /I;
  95. NEGI;
  96. TDB;
  97. = M 0.4;
  98. UC FC 44;
  99. >=R;
  100. XOW;
  101. FR Z 42;
  102. >R;
  103. MCR(;
  104. MCRA;
  105. MCRD;
  106. )MCR;
  107. +R;
  108. L 0;
  109. CLR;
  110. SPA AAAG;
  111. AAAG: NOP 0;
  112. POP;
  113. TAW;
  114. L 0;
  115. CLR;
  116. SPPZ AAAH;
  117. AAAH: NOP 0;
  118. O(;
  119. );
  120. RND;
  121. O TRUE;
  122. SQR;
  123. TDB;
  124. X(;
  125. );
  126. NEGD;
  127. INC 0;
  128. L 0;
  129. CLR;
  130. SPN AAAI;
  131. AAAI: NOP 0;
  132. NEGD;
  133. RLDA;
  134. ABS;
  135. TAR2;
  136. <D;
  137. AUF DB 42;
  138. >D;
  139. L DW#16#89FA6A68;
  140. BLD 0;
  141. ASIN;
  142. BLD 0;
  143. SQR;
  144. +D;
  145. TAW;
  146. >D;
  147. L 0;
  148. SV T 42;
  149. RRD;
  150. CLR;
  151. U(;
  152. );
  153. <>I;
  154. ==R;
  155. <>R;
  156. TAN;
  157. CALL FB 45, DB 45;
  158. CALL FB 45, DB 45;
  159. CALL FB 45, DB 45;
  160. X(;
  161. );
  162. -R;
  163. +R;
  164. CALL FB 45, DB 45;
  165. CALL FB 45, DB 45;
  166. CALL FB 45, DB 45;
  167. SSI;
  168. OW;
  169. LC MW 0;
  170. PUSH;
  171. O M 0.4;
  172. >I;
  173. UD;
  174. TDB;
  175. +I;
  176. <>I;
  177. L 0;
  178. CLR;
  179. SPBI AAAJ;
  180. AAAJ: NOP 0;
  181. ATAN;
  182. <>R;
  183. TAR1;
  184. U M 0.4;
  185. AUF DB 42;
  186. RRDA;
  187. L 0;
  188. BTI;
  189. L 0;
  190. SI T 42;
  191. ==I;
  192. L 0;
  193. CLR;
  194. SPBIN AAAK;
  195. AAAK: NOP 0;
  196. L 0;
  197. SI T 42;
  198. UC FC 44;
  199. DTR;
  200. ==R;
  201. /D;
  202. >R;
  203. OD;
  204. OW;
  205. U M 0.4;
  206. SET;
  207. L 0;
  208. CLR;
  209. SPM AAAL;
  210. AAAL: NOP 0;
  211. RLD;
  212. X M 0.4;
  213. <>I;
  214. +D;
  215. L 0;
  216. CLR;
  217. SPS AAAM;
  218. AAAM: NOP 0;
  219. RND-;
  220. O(;
  221. );
  222. RND-;
  223. INC 0;
  224. S M 0.4;
  225. NOT;
  226. SRD;
  227. XN(;
  228. );
  229. XOW;
  230. <=I;
  231. <=I;
  232. SLW;
  233. TAK;
  234. <R;
  235. AUF DB 42;
  236. OW;
  237. UC FC 44;
  238. TAN;
  239. NEGD;
  240. OD;
  241. INVI;
  242. L 0;
  243. CLR;
  244. SPZ AAAN;
  245. AAAN: NOP 0;
  246. SQR;
  247. /D;
  248. LAR1;
  249. L 0;
  250. SS T 42;
  251. TAR;
  252. <I;
  253. L DW#16#3985C3CF;
  254. L 0;
  255. CLR;
  256. LOOP AAAO;
  257. AAAO: NOP 0;
  258. XN M 0.4;
  259. NOP 0;
  260. PUSH;
  261. RND;
  262. NOP 0;
  263. TAW;
  264. UN M 0.4;
  265. = M 0.4;
  266. ON(;
  267. );
  268. RND;
  269. XN(;
  270. );
  271. O TRUE;
  272. = M 0.4;
  273. L 0;
  274. SE T 42;
  275. RND+;
  276. L 0;
  277. CLR;
  278. SPB AAAP;
  279. AAAP: NOP 0;
  280. SRD;
  281. NEGD;
  282. OD;
  283. ==D;
  284. DEC 0;
  285. +AR1;
  286. SLW;
  287. FR Z 42;
  288. SLW;
  289. EXP;
  290. ITD;
  291. SAVE;
  292. SAVE;
  293. ACOS;
  294. /I;
  295. TAN;
  296. LN;
  297. SSI;
  298. UN(;
  299. );
  300. FN M 0.4;
  301. ON(;
  302. );
  303. SQRT;
  304. L 0;
  305. CLR;
  306. LOOP AAAQ;
  307. AAAQ: NOP 0;
  308. ==I;
  309. L DW#16#310C0C00;
  310. UD;
  311. T MD 0;
  312. >D;
  313. TAN;
  314. ITB;
  315. L 0;
  316. CLR;
  317. SPB AAAR;
  318. AAAR: NOP 0;
  319. MCR(;
  320. MCRA;
  321. MCRD;
  322. )MCR;
  323. L DW#16#134C6C92;
  324. TAK;
  325. FN M 0.4;
  326. U(;
  327. );
  328. OD;
  329. ON M 0.4;
  330. CLR;
  331. RND+;
  332. <R;
  333. EXP;
  334. SRD;
  335. SLD;
  336. NEGD;
  337. SQR;
  338. ON(;
  339. );
  340. <R;
  341. +R;
  342. U M 0.4;
  343. *R;
  344. AUF DB 42;
  345. TAR1;
  346. L 0;
  347. CLR;
  348. SPBB AAAS;
  349. AAAS: NOP 0;
  350. TAN;
  351. POP;
  352. SRD;
  353. ==R;
  354. ITD;
  355. L 0;
  356. CLR;
  357. SPBI AAAT;
  358. AAAT: NOP 0;
  359. NEGR;
  360. O(;
  361. );
  362. +AR2;
  363. OD;
  364. ON(;
  365. );
  366. L 0;
  367. CLR;
  368. SPN AAAU;
  369. AAAU: NOP 0;
  370. O(;
  371. );
  372. U(;
  373. );
  374. BLD 0;
  375. SRW;
  376. RRDA;
  377. OW;
  378. <>R;
  379. O(;
  380. );
  381. L 0;
  382. SV T 42;
  383. S M 0.4;
  384. L 0;
  385. BTD;
  386. XN(;
  387. );
  388. CALL FB 45, DB 45;
  389. CALL FB 45, DB 45;
  390. CALL FB 45, DB 45;
  391. XN(;
  392. );
  393. RND+;
  394. SQRT;
  395. <I;
  396. INC 0;
  397. L DW#16#14FCDD54;
  398. BLD 0;
  399. LEAVE;
  400. L 0;
  401. SA T 42;
  402. L 0;
  403. CLR;
  404. SPN AAAV;
  405. AAAV: NOP 0;
  406. ZR Z 42;
  407. INVD;
  408. L 0;
  409. CLR;
  410. SPN AAAW;
  411. AAAW: NOP 0;
  412. RND-;
  413. AUF DB 42;
  414. ABS;
  415. ==D;
  416. L 0;
  417. CLR;
  418. SPBIN AAAX;
  419. AAAX: NOP 0;
  420. TAR2;
  421. L 0;
  422. CLR;
  423. SPN AAAY;
  424. AAAY: NOP 0;
  425. = M 0.4;
  426. O M 0.4;
  427. TAR2;
  428. LEAVE;
  429. FN M 0.4;
  430. = M 0.4;
  431. UD;
  432. NEGD;
  433. L 0;
  434. SI T 42;
  435. AUF DB 42;
  436. ==D;
  437. *I;
  438. XN(;
  439. );
  440. FR Z 42;
  441. *D;
  442. L 0;
  443. CLR;
  444. SPBN AAAZ;
  445. AAAZ: NOP 0;
  446. <>R;
  447. LAR1;
  448. XOD;
  449. L 0;
  450. CLR;
  451. SPO AABA;
  452. AABA: NOP 0;
  453. L MW 50;
  454. + 1;
  455. T MW 50;
  456. T AW 0;
  457. OW;
  458. O M 0.4;
  459. PUSH;
  460. L 0;
  461. CLR;
  462. SPBIN AABB;
  463. AABB: NOP 0;
  464. FP M 0.4;
  465. <>D;
  466. AUF DB 42;
  467. >I;
  468. ==I;
  469. PUSH;
  470. ==R;
  471. L 0;
  472. CLR;
  473. SPA AABC;
  474. AABC: NOP 0;
  475. L 0;
  476. CLR;
  477. SPBN AABD;
  478. AABD: NOP 0;
  479. CC FC 43;
  480. NEGI;
  481. +I;
  482. INVD;
  483. AUF DB 42;
  484. L 0;
  485. SI T 42;
  486. RLD;
  487. LC MW 0;
  488. UN(;
  489. );
  490. CLR;
  491. TAN;
  492. L 0;
  493. L 0;
  494. CLR;
  495. SPL AABE;
  496. AABE: NOP 0;
  497. XN FALSE;
  498. L 0;
  499. CLR;
  500. SPU AABF;
  501. AABF: NOP 0;
  502. ==D;
  503. AUF DB 42;
  504. >R;
  505. LAR2;
  506. PUSH;
  507. ASIN;
  508. ENT;
  509. O M 0.4;
  510. <>I;
  511. R M 0.4;
  512. <=D;
  513. XOD;
  514. ON TRUE;
  515. BLD 0;
  516. PUSH;
  517. >=D;
  518. ACOS;
  519. <=I;
  520. X TRUE;
  521. -D;
  522. X TRUE;
  523. NEGI;
  524. L DW#16#AABC25FA;
  525. /I;
  526. ENT;
  527. EXP;
  528. ==R;
  529. RND+;
  530. >R;
  531. L 0;
  532. BTI;
  533. LN;
  534. U FALSE;
  535. L 0;
  536. CLR;
  537. SPU AABG;
  538. AABG: NOP 0;
  539. LN;
  540. L DW#16#444D610B;
  541. ==I;
  542. +R;
  543. ON TRUE;
  544. TAW;
  545. INVI;
  546. TAR2;
  547. *I;
  548. L 0;
  549. CLR;
  550. SPS AABH;
  551. AABH: NOP 0;
  552. RND;
  553. TAD;
  554. U FALSE;
  555. SQR;
  556. L 0;
  557. CLR;
  558. SPMZ AABI;
  559. AABI: NOP 0;
  560. L 0;
  561. CLR;
  562. SPB AABJ;
  563. AABJ: NOP 0;
  564. XN(;
  565. );
  566. L 0;
  567. CLR;
  568. SPB AABK;
  569. AABK: NOP 0;
  570. *I;
  571. L 0;
  572. SV T 42;
  573. SQR;
  574. UD;
  575. L 0;
  576. CLR;
  577. SPMZ AABL;
  578. AABL: NOP 0;
  579. UN FALSE;
  580. ZR Z 42;
  581. L 0;
  582. BTI;
  583. +AR2;
  584. AUF DB 42;
  585. ON FALSE;
  586. CALL FB 45, DB 45;
  587. CALL FB 45, DB 45;
  588. CALL FB 45, DB 45;
  589. ATAN;
  590. -I;
  591. L 0;
  592. CLR;
  593. SPN AABM;
  594. AABM: NOP 0;
  595. ATAN;
  596. UC FC 44;
  597. L 0;
  598. SV T 42;
  599. >I;
  600. -R;
  601. +AR1;
  602. ITD;
  603. ZV Z 42;
  604. XN TRUE;
  605. U M 0.4;
  606. L 0;
  607. SA T 42;
  608. UD;
  609. DTR;
  610. -D;
  611. ACOS;
  612. XN(;
  613. );
  614. L 0;
  615. CLR;
  616. SPMZ AABN;
  617. AABN: NOP 0;
  618. L 0;
  619. CLR;
  620. SPN AABO;
  621. AABO: NOP 0;
  622. >=I;
  623. L 0;
  624. CLR;
  625. SPBIN AABP;
  626. AABP: NOP 0;
  627. L 0;
  628. SI T 42;
  629. L 0;
  630. CLR;
  631. SPZ AABQ;
  632. AABQ: NOP 0;
  633. EXP;
  634. L 0;
  635. CLR;
  636. SPPZ AABR;
  637. AABR: NOP 0;
  638. SQRT;
  639. L 0;
  640. CLR;
  641. SPBI AABS;
  642. AABS: NOP 0;
  643. PUSH;
  644. <=I;
  645. DTB;
  646. COS;
  647. +R;
  648. <=R;
  649. INC 0;
  650. L 0;
  651. CLR;
  652. SPO AABT;
  653. AABT: NOP 0;
  654. SQRT;
  655. TAK;
  656. U M 0.4;
  657. L 0;
  658. CLR;
  659. SPO AABU;
  660. AABU: NOP 0;
  661. L 0;
  662. CLR;
  663. SPBB AABV;
  664. AABV: NOP 0;
  665. NEGI;
  666. ACOS;
  667. +AR2;
  668. UC FC 44;
  669. L 0;
  670. CLR;
  671. SPM AABW;
  672. AABW: NOP 0;
  673. SSI;
  674. LAR2;
  675. LAR2;
  676. NEGD;
  677. L 0;
  678. SV T 42;
  679. SLW;
  680. >=R;
  681. NOT;
  682. L 0;
  683. CLR;
  684. SPBN AABX;
  685. AABX: NOP 0;
  686. L 0;
  687. SE T 42;
  688. L 0;
  689. CLR;
  690. SPU AABY;
  691. AABY: NOP 0;
  692. CLR;
  693. RND+;
  694. L 0;
  695. CLR;
  696. SPZ AABZ;
  697. AABZ: NOP 0;
  698. TAD;
  699. DTR;
  700. >=D;
  701. U FALSE;
  702. FR Z 42;
  703. SLW;
  704. L MW 50;
  705. + 1;
  706. T MW 50;
  707. T AW 0;
  708. = M 0.4;
  709. TAR1;
  710. SIN;
  711. +AR1;
  712. DTB;
  713. -R;
  714. RRD;
  715. SQR;
  716. FR Z 42;
  717. >=D;
  718. UN M 0.4;
  719. ==I;
  720. TAN;
  721. TAW;
  722. L 0;
  723. BTI;
  724. L 0;
  725. SS T 42;
  726. MCR(;
  727. MCRA;
  728. MCRD;
  729. )MCR;
  730. U(;
  731. );
  732. POP;
  733. L DW#16#1F115B76;
  734. <>D;
  735. MCR(;
  736. MCRA;
  737. MCRD;
  738. )MCR;
  739. OW;
  740. ENT;
  741. CALL FB 45, DB 45;
  742. CALL FB 45, DB 45;
  743. CALL FB 45, DB 45;
  744. L 0;
  745. CLR;
  746. SPP AACA;
  747. AACA: NOP 0;
  748. LAR2;
  749. L MW 50;
  750. + 1;
  751. T MW 50;
  752. T AW 0;
  753. L 0;
  754. SI T 42;
  755. ASIN;
  756. TAK;
  757. T MD 0;
  758. <>R;
  759. SLW;
  760. TAR;
  761. ZR Z 42;
  762. L DW#16#3D3F3799;
  763. LAR1;
  764. R M 0.4;
  765. L 0;
  766. CLR;
  767. SPBB AACB;
  768. AACB: NOP 0;
  769. RND+;
  770. L 0;
  771. CLR;
  772. SPA AACC;
  773. AACC: NOP 0;
  774. L 0;
  775. CLR;
  776. SPU AACD;
  777. AACD: NOP 0;
  778. L 0;
  779. CLR;
  780. SPP AACE;
  781. AACE: NOP 0;
  782. OD;
  783. S M 0.4;
  784. >D;
  785. <=D;
  786. TRUNC;
  787. -R;
  788. ==R;
  789. NEGD;
  790. X(;
  791. );
  792. SIN;
  793. EXP;
  794. L 0;
  795. CLR;
  796. SPMZ AACF;
  797. AACF: NOP 0;
  798. OD;
  799. SSI;
  800. SIN;
  801. ON(;
  802. );
  803. INVD;
  804. COS;
  805. *R;
  806. BLD 0;
  807. XN M 0.4;
  808. +AR1;
  809. +R;
  810. SRW;
  811. UN M 0.4;
  812. /I;
  813. L 0;
  814. CLR;
  815. SPBIN AACG;
  816. AACG: NOP 0;
  817. *R;
  818. COS;
  819. UD;
  820. XOD;
  821. CC FC 43;
  822. TAW;
  823. SRD;
  824. TAW;
  825. L 0;
  826. CLR;
  827. SPA AACH;
  828. AACH: NOP 0;
  829. ATAN;
  830. SRD;
  831. UN TRUE;
  832. L 0;
  833. CLR;
  834. LOOP AACI;
  835. AACI: NOP 0;
  836. SQRT;
  837. <R;
  838. SSI;
  839. <=I;
  840. XOW;
  841. U TRUE;
  842. CALL FC 42;
  843. CALL FC 42;
  844. CALL FC 42;
  845. LEAVE;
  846. U FALSE;
  847. ASIN;
  848. <>D;
  849. MCR(;
  850. MCRA;
  851. MCRD;
  852. )MCR;
  853. ITB;
  854. U(;
  855. );
  856. ZR Z 42;
  857. +R;
  858. L 0;
  859. CLR;
  860. SPPZ AACJ;
  861. AACJ: NOP 0;
  862. NEGD;
  863. TAR1;
  864. L 0;
  865. CLR;
  866. SPPZ AACK;
  867. AACK: NOP 0;
  868. L 0;
  869. CLR;
  870. LOOP AACL;
  871. AACL: NOP 0;
  872. +R;
  873. L 0;
  874. CLR;
  875. SPB AACM;
  876. AACM: NOP 0;
  877. COS;
  878. LC MW 0;
  879. S M 0.4;
  880. SSD;
  881. X M 0.4;
  882. OD;
  883. UN(;
  884. );
  885. *I;
  886. TAD;
  887. XN(;
  888. );
  889. X FALSE;
  890. L DW#16#2702878B;
  891. <=I;
  892. SLW;
  893. >I;
  894. LEAVE;
  895. NEGR;
  896. SSI;
  897. ZV Z 42;
  898. *D;
  899. <R;
  900. UC FC 44;
  901. UC FC 44;
  902. >I;
  903. >R;
  904. L 0;
  905. CLR;
  906. SPZ AACN;
  907. AACN: NOP 0;
  908. ==I;
  909. +AR2;
  910. U TRUE;
  911. +AR1;
  912. MOD;
  913. ABS;
  914. DTR;
  915. R M 0.4;
  916. CALL FC 42;
  917. CALL FC 42;
  918. CALL FC 42;
  919. FR Z 42;
  920. FP M 0.4;
  921. L 0;
  922. CLR;
  923. SPO AACO;
  924. AACO: NOP 0;
  925. SET;
  926. <I;
  927. LEAVE;
  928. X TRUE;
  929. XOW;
  930. ASIN;
  931. *D;
  932. XN(;
  933. );
  934. L 0;
  935. SI T 42;
  936. +I;
  937. ON M 0.4;
  938. COS;
  939. RLD;
  940. ==I;
  941. ACOS;
  942. +D;
  943. TAR2;
  944. ==R;
  945. ATAN;
  946. L 0;
  947. BTI;
  948. L 0;
  949. SA T 42;
  950. L 0;
  951. CLR;
  952. SPA AACP;
  953. AACP: NOP 0;
  954. UD;
  955. SLD;
  956. SSI;
  957. ATAN;
  958. CALL FC 42;
  959. CALL FC 42;
  960. CALL FC 42;
  961. TDB;
  962. L 0;
  963. CLR;
  964. SPM AACQ;
  965. AACQ: NOP 0;
  966. FR Z 42;
  967. SET;
  968. L 0;
  969. CLR;
  970. SPB AACR;
  971. AACR: NOP 0;
  972. TAR;
  973. FR Z 42;
  974. MCR(;
  975. MCRA;
  976. MCRD;
  977. )MCR;
  978. INC 0;
  979. L MW 50;
  980. + 1;
  981. T MW 50;
  982. T AW 0;
  983. +R;
  984. L 0;
  985. CLR;
  986. LOOP AACS;
  987. AACS: NOP 0;
  988. UN TRUE;
  989. L 0;
  990. CLR;
  991. SPPZ AACT;
  992. AACT: NOP 0;
  993. ITB;
  994. SRD;
  995. NEGD;
  996. /I;
  997. ZR Z 42;
  998. +I;
  999. L 0;
  1000. CLR;
  1001. SPB AACU;
  1002. AACU: NOP 0;
  1003. CALL FB 45, DB 45;
  1004. CALL FB 45, DB 45;
  1005. CALL FB 45, DB 45;
  1006. L 0;
  1007. L 0;
  1008. CLR;
  1009. SPL AACV;
  1010. AACV: NOP 0;
  1011. POP;
  1012. O M 0.4;
  1013. L 0;
  1014. SS T 42;
  1015. ITD;
  1016. NOT;
  1017. RND-;
  1018. EXP;
  1019. RLD;
  1020. POP;
  1021. RND-;
  1022. SLW;
  1023. RLD;
  1024. T MD 0;
  1025. X M 0.4;
  1026. CLR;
  1027. L 0;
  1028. CLR;
  1029. SPBI AACW;
  1030. AACW: NOP 0;
  1031. TAW;
  1032. SQRT;
  1033. FR Z 42;
  1034. L 0;
  1035. CLR;
  1036. SPS AACX;
  1037. AACX: NOP 0;
  1038. +AR2;
  1039. *D;
  1040. SLW;
  1041. PUSH;
  1042. OW;
  1043. -I;
  1044. TAN;
  1045. TAK;
  1046. L 0;
  1047. CLR;
  1048. SPMZ AACY;
  1049. AACY: NOP 0;
  1050. /I;
  1051. TAR1;
  1052. L 0;
  1053. CLR;
  1054. SPA AACZ;
  1055. AACZ: NOP 0;
  1056. L 0;
  1057. CLR;
  1058. SPS AADA;
  1059. AADA: NOP 0;
  1060. LC MW 0;
  1061. TRUNC;
  1062. <I;
  1063. DTB;
  1064. L 0;
  1065. CLR;
  1066. SPN AADB;
  1067. AADB: NOP 0;
  1068. <I;
  1069. UD;
  1070. L 0;
  1071. BTD;
  1072. DTB;
  1073. NEGR;
  1074. SLD;
  1075. L 0;
  1076. L 0;
  1077. CLR;
  1078. SPL AADC;
  1079. AADC: NOP 0;
  1080. NOP 0;
  1081. UW;
  1082. CALL FB 45, DB 45;
  1083. CALL FB 45, DB 45;
  1084. CALL FB 45, DB 45;
  1085. L 0;
  1086. CLR;
  1087. SPBN AADD;
  1088. AADD: NOP 0;
  1089. FN M 0.4;
  1090. DTB;
  1091. L 0;
  1092. CLR;
  1093. SPBI AADE;
  1094. AADE: NOP 0;
  1095. RND;
  1096. +D;
  1097. L 0;
  1098. BTI;
  1099. L 0;
  1100. CLR;
  1101. SPO AADF;
  1102. AADF: NOP 0;
  1103. ON M 0.4;
  1104. XOW;
  1105. <=I;
  1106. L 0;
  1107. L 0;
  1108. CLR;
  1109. SPL AADG;
  1110. AADG: NOP 0;
  1111. XN FALSE;
  1112. PUSH;
  1113. L 0;
  1114. CLR;
  1115. SPBNB AADH;
  1116. AADH: NOP 0;
  1117. <=I;
  1118. RLD;
  1119. FP M 0.4;
  1120. ON M 0.4;
  1121. DEC 0;
  1122. L 0;
  1123. CLR;
  1124. SPBN AADI;
  1125. AADI: NOP 0;
  1126. SSD;
  1127. SRW;
  1128. LAR1;
  1129. +I;
  1130. L 0;
  1131. BTD;
  1132. UN(;
  1133. );
  1134. LC MW 0;
  1135. SRW;
  1136. >I;
  1137. X(;
  1138. );
  1139. SQR;
  1140. RLD;
  1141. = M 0.4;
  1142. +AR1;
  1143. UN(;
  1144. );
  1145. <=D;
  1146. <=D;
  1147. LEAVE;
  1148. L 0;
  1149. CLR;
  1150. SPO AADJ;
  1151. AADJ: NOP 0;
  1152. NOT;
  1153. L DW#16#C3B290D0;
  1154. UC FC 44;
  1155. CALL FB 45, DB 45;
  1156. CALL FB 45, DB 45;
  1157. CALL FB 45, DB 45;
  1158. TAD;
  1159. L 0;
  1160. SA T 42;
  1161. +R;
  1162. TAR;
  1163. LAR2;
  1164. L 0;
  1165. CLR;
  1166. SPBIN AADK;
  1167. AADK: NOP 0;
  1168. NOP 0;
  1169. ASIN;
  1170. L 0;
  1171. CLR;
  1172. SPS AADL;
  1173. AADL: NOP 0;
  1174. INC 0;
  1175. ON(;
  1176. );
  1177. L MW 50;
  1178. + 1;
  1179. T MW 50;
  1180. T AW 0;
  1181. FN M 0.4;
  1182. NEGI;
  1183. NEGD;
  1184. AUF DB 42;
  1185. S M 0.4;
  1186. <>R;
  1187. RND-;
  1188. <=R;
  1189. PUSH;
  1190. R M 0.4;
  1191. <>R;
  1192. U M 0.4;
  1193. EXP;
  1194. TAR;
  1195. CALL FB 45, DB 45;
  1196. CALL FB 45, DB 45;
  1197. CALL FB 45, DB 45;
  1198. SSD;
  1199. L 0;
  1200. CLR;
  1201. SPBNB AADM;
  1202. AADM: NOP 0;
  1203. O FALSE;
  1204. L 0;
  1205. CLR;
  1206. SPBB AADN;
  1207. AADN: NOP 0;
  1208. L 0;
  1209. CLR;
  1210. SPBN AADO;
  1211. AADO: NOP 0;
  1212. TAR1;
  1213. = M 0.4;
  1214. TRUNC;
  1215. AUF DB 42;
  1216. NOP 0;
  1217. DTR;
  1218. TAN;
  1219. >I;
  1220. XOD;
  1221. TAD;
  1222. <=D;
  1223. TDB;
  1224. <D;
  1225. = M 0.4;
  1226. ON(;
  1227. );
  1228. <R;
  1229. L 0;
  1230. CLR;
  1231. SPS AADP;
  1232. AADP: NOP 0;
  1233. CALL FB 45, DB 45;
  1234. CALL FB 45, DB 45;
  1235. CALL FB 45, DB 45;
  1236. INC 0;
  1237. L 0;
  1238. CLR;
  1239. SPBB AADQ;
  1240. AADQ: NOP 0;
  1241. LAR1;
  1242. >=I;
  1243. SSI;
  1244. L 0;
  1245. CLR;
  1246. SPO AADR;
  1247. AADR: NOP 0;
  1248. SQRT;
  1249. L 0;
  1250. CLR;
  1251. SPA AADS;
  1252. AADS: NOP 0;
  1253. RRDA;
  1254. OD;
  1255. RRD;
  1256. LAR1;
  1257. S M 0.4;
  1258. SET;
  1259. X TRUE;
  1260. L 0;
  1261. CLR;
  1262. SPM AADT;
  1263. AADT: NOP 0;
  1264. CC FC 43;
  1265. LC MW 0;
  1266. U FALSE;
  1267. RND;
  1268. +AR1;
  1269. NOP 0;
  1270. XN M 0.4;
  1271. TDB;
  1272. +AR1;
  1273. X FALSE;
  1274. SSD;
  1275. L 0;
  1276. SS T 42;
  1277. LAR2;
  1278. L 0;
  1279. CLR;
  1280. SPB AADU;
  1281. AADU: NOP 0;
  1282. ITB;
  1283. BLD 0;
  1284. ATAN;
  1285. RLD;
  1286. CLR;
  1287. SSD;
  1288. *I;
  1289. EXP;
  1290. L 0;
  1291. CLR;
  1292. SPU AADV;
  1293. AADV: NOP 0;
  1294. L 0;
  1295. CLR;
  1296. SPM AADW;
  1297. AADW: NOP 0;
  1298. FP M 0.4;
  1299. >R;
  1300. L 0;
  1301. CLR;
  1302. SPMZ AADX;
  1303. AADX: NOP 0;
  1304. LN;
  1305. RRD;
  1306. L 0;
  1307. CLR;
  1308. SPBB AADY;
  1309. AADY: NOP 0;
  1310. SQR;
  1311. TAK;
  1312. ON TRUE;
  1313. SET;
  1314. L 0;
  1315. CLR;
  1316. SPN AADZ;
  1317. AADZ: NOP 0;
  1318. LC MW 0;
  1319. L 0;
  1320. CLR;
  1321. SPM AAEA;
  1322. AAEA: NOP 0;
  1323. >I;
  1324. SQRT;
  1325. L 0;
  1326. SE T 42;
  1327. U M 0.4;
  1328. OD;
  1329. MCR(;
  1330. MCRA;
  1331. MCRD;
  1332. )MCR;
  1333. LN;
  1334. UN(;
  1335. );
  1336. ITD;
  1337. L 0;
  1338. SS T 42;
  1339. +D;
  1340. RLDA;
  1341. LAR2;
  1342. UN(;
  1343. );
  1344. INVD;
  1345. TDB;
  1346. TAK;
  1347. ==D;
  1348. L 0;
  1349. CLR;
  1350. SPBB AAEB;
  1351. AAEB: NOP 0;
  1352. LAR1;
  1353. SRD;
  1354. >=I;
  1355. UN FALSE;
  1356. <>R;
  1357. L 0;
  1358. CLR;
  1359. SPZ AAEC;
  1360. AAEC: NOP 0;
  1361. PUSH;
  1362. ON M 0.4;
  1363. PUSH;
  1364. EXP;
  1365. CLR;
  1366. TAD;
  1367. >I;
  1368. MCR(;
  1369. MCRA;
  1370. MCRD;
  1371. )MCR;
  1372. <I;
  1373. ==R;
  1374. RLDA;
  1375. L 0;
  1376. CLR;
  1377. SPBNB AAED;
  1378. AAED: NOP 0;
  1379. L 0;
  1380. SV T 42;
  1381. L 0;
  1382. CLR;
  1383. SPA AAEE;
  1384. AAEE: NOP 0;
  1385. SIN;
  1386. SLD;
  1387. SSD;
  1388. FR Z 42;
  1389. TAR1;
  1390. PUSH;
  1391. >=D;
  1392. -R;
  1393. ITD;
  1394. SET;
  1395. L 0;
  1396. SV T 42;
  1397. <>D;
  1398. XN(;
  1399. );
  1400. L 0;
  1401. L 0;
  1402. CLR;
  1403. SPL AAEF;
  1404. AAEF: NOP 0;
  1405. SIN;
  1406. +I;
  1407. L 0;
  1408. SI T 42;
  1409. TDB;
  1410. U M 0.4;
  1411. L 0;
  1412. CLR;
  1413. SPBN AAEG;
  1414. AAEG: NOP 0;
  1415. L 0;
  1416. CLR;
  1417. SPBIN AAEH;
  1418. AAEH: NOP 0;
  1419. NOP 0;
  1420. +AR2;
  1421. RLD;
  1422. <=D;
  1423. T MD 0;
  1424. UD;
  1425. SLD;
  1426. -I;
  1427. L 0;
  1428. CLR;
  1429. SPU AAEI;
  1430. AAEI: NOP 0;
  1431. PUSH;
  1432. XOD;
  1433. MOD;
  1434. TAR1;
  1435. L 0;
  1436. CLR;
  1437. SPM AAEJ;
  1438. AAEJ: NOP 0;
  1439. ITD;
  1440. RND-;
  1441. DEC 0;
  1442. -R;
  1443. TRUNC;
  1444. LN;
  1445. XN TRUE;
  1446. SLW;
  1447. +R;
  1448. -R;
  1449. <=D;
  1450. RRD;
  1451. ON FALSE;
  1452. RRDA;
  1453. CALL FC 42;
  1454. CALL FC 42;
  1455. CALL FC 42;
  1456. L 0;
  1457. CLR;
  1458. SPMZ AAEK;
  1459. AAEK: NOP 0;
  1460. FN M 0.4;
  1461. LAR1;
  1462. FN M 0.4;
  1463. UW;
  1464. TAR1;
  1465. ON M 0.4;
  1466. <D;
  1467. EXP;
  1468. ==R;
  1469. R M 0.4;
  1470. SSD;
  1471. AUF DB 42;
  1472. L 0;
  1473. CLR;
  1474. LOOP AAEL;
  1475. AAEL: NOP 0;
  1476. ABS;
  1477. S M 0.4;
  1478. L 0;
  1479. CLR;
  1480. SPMZ AAEM;
  1481. AAEM: NOP 0;
  1482. XOW;
  1483. +R;
  1484. L 0;
  1485. CLR;
  1486. SPP AAEN;
  1487. AAEN: NOP 0;
  1488. SRD;
  1489. OD;
  1490. ON FALSE;
  1491. RND+;
  1492. L 0;
  1493. CLR;
  1494. SPBB AAEO;
  1495. AAEO: NOP 0;
  1496. RND;
  1497. CLR;
  1498. ATAN;
  1499. FN M 0.4;
  1500. FN M 0.4;
  1501. LAR2;
  1502. <R;
  1503. L 0;
  1504. CLR;
  1505. SPBIN AAEP;
  1506. AAEP: NOP 0;
  1507. UN FALSE;
  1508. L 0;
  1509. CLR;
  1510. SPPZ AAEQ;
  1511. AAEQ: NOP 0;
  1512. O(;
  1513. );
  1514. L 0;
  1515. CLR;
  1516. SPBI AAER;
  1517. AAER: NOP 0;
  1518. + 0;
  1519. /D;
  1520. ACOS;
  1521. >=D;
  1522. FR Z 42;
  1523. OW;
  1524. LN;
  1525. LEAVE;
  1526. ITB;
  1527. >=R;
  1528. <=R;
  1529. S M 0.4;
  1530. L MW 50;
  1531. + 1;
  1532. T MW 50;
  1533. T AW 0;
  1534. +R;
  1535. RND-;
  1536. RLDA;
  1537. BLD 0;
  1538. <D;
  1539. TRUNC;
  1540. MCR(;
  1541. MCRA;
  1542. MCRD;
  1543. )MCR;
  1544. ZV Z 42;
  1545. TAR2;
  1546. ZV Z 42;
  1547. O M 0.4;
  1548. SSI;
  1549. L 0;
  1550. CLR;
  1551. SPBB AAES;
  1552. AAES: NOP 0;
  1553. XOD;
  1554. <>R;
  1555. = M 0.4;
  1556. LAR2;
  1557. -I;
  1558. NOP 0;
  1559. L 0;
  1560. CLR;
  1561. SPBIN AAET;
  1562. AAET: NOP 0;
  1563. TAN;
  1564. LC MW 0;
  1565. TAR1;
  1566. L 0;
  1567. CLR;
  1568. SPO AAEU;
  1569. AAEU: NOP 0;
  1570. DTR;
  1571. -R;
  1572. SLD;
  1573. ==I;
  1574. RND+;
  1575. +R;
  1576. DEC 0;
  1577. + 0;
  1578. +AR1;
  1579. L 0;
  1580. CLR;
  1581. SPBI AAEV;
  1582. AAEV: NOP 0;
  1583. L 0;
  1584. CLR;
  1585. SPBI AAEW;
  1586. AAEW: NOP 0;
  1587. XN M 0.4;
  1588. ABS;
  1589. L 0;
  1590. L 0;
  1591. CLR;
  1592. SPL AAEX;
  1593. AAEX: NOP 0;
  1594. O M 0.4;
  1595. LEAVE;
  1596. U(;
  1597. );
  1598. UC FC 44;
  1599. RLDA;
  1600. L 0;
  1601. CLR;
  1602. SPBB AAEY;
  1603. AAEY: NOP 0;
  1604. RND;
  1605. UC FC 44;
  1606. /I;
  1607. TAW;
  1608. ITD;
  1609. LC MW 0;
  1610. >D;
  1611. SAVE;
  1612. X TRUE;
  1613. LAR1;
  1614. O TRUE;
  1615. ==D;
  1616. CLR;
  1617. L 0;
  1618. CLR;
  1619. SPBI AAEZ;
  1620. AAEZ: NOP 0;
  1621. L 0;
  1622. CLR;
  1623. SPPZ AAFA;
  1624. AAFA: NOP 0;
  1625. SIN;
  1626. <=R;
  1627. INVI;
  1628. ==D;
  1629. OD;
  1630. -D;
  1631. OW;
  1632. RRDA;
  1633. L 0;
  1634. CLR;
  1635. SPA AAFB;
  1636. AAFB: NOP 0;
  1637. <R;
  1638. ZV Z 42;
  1639. SLD;
  1640. L 0;
  1641. CLR;
  1642. SPBI AAFC;
  1643. AAFC: NOP 0;
  1644. L 0;
  1645. CLR;
  1646. LOOP AAFD;
  1647. AAFD: NOP 0;
  1648. >I;
  1649. SSI;
  1650. R M 0.4;
  1651. <D;
  1652. TAD;
  1653. ABS;
  1654. POP;
  1655. -D;
  1656. CLR;
  1657. ABS;
  1658. ON M 0.4;
  1659. AUF DB 42;
  1660. UD;
  1661. >=I;
  1662. TAR1;
  1663. *D;
  1664. AUF DB 42;
  1665. BLD 0;
  1666. +R;
  1667. /D;
  1668. ==I;
  1669. TRUNC;
  1670. SSD;
  1671. U TRUE;
  1672. L MW 50;
  1673. + 1;
  1674. T MW 50;
  1675. T AW 0;
  1676. TAW;
  1677. X(;
  1678. );
  1679. MCR(;
  1680. MCRA;
  1681. MCRD;
  1682. )MCR;
  1683. L 0;
  1684. CLR;
  1685. SPO AAFE;
  1686. AAFE: NOP 0;
  1687. EXP;
  1688. >I;
  1689. >D;
  1690. XN FALSE;
  1691. L 0;
  1692. CLR;
  1693. SPO AAFF;
  1694. AAFF: NOP 0;
  1695. RRD;
  1696. >I;
  1697. SAVE;
  1698. RND+;
  1699. UD;
  1700. <>D;
  1701. *R;
  1702. TAR1;
  1703. *D;
  1704. OD;
  1705. COS;
  1706. NOP 0;
  1707. ==R;
  1708. SIN;
  1709. FN M 0.4;
  1710. RLD;
  1711. EXP;
  1712. L 0;
  1713. CLR;
  1714. SPB AAFG;
  1715. AAFG: NOP 0;
  1716. O TRUE;
  1717. NEGR;
  1718. LAR2;
  1719. LAR2;
  1720. RND+;
  1721. +D;
  1722. FN M 0.4;
  1723. *D;
  1724. XOD;
  1725. + 0;
  1726. ON(;
  1727. );
  1728. ABS;
  1729. L 0;
  1730. L 0;
  1731. CLR;
  1732. SPL AAFH;
  1733. AAFH: NOP 0;
  1734. ITD;
  1735. >=I;
  1736. TAR1;
  1737. CLR;
  1738. NEGD;
  1739. CALL FB 45, DB 45;
  1740. CALL FB 45, DB 45;
  1741. CALL FB 45, DB 45;
  1742. XN M 0.4;
  1743. U(;
  1744. );
  1745. L 0;
  1746. CLR;
  1747. SPU AAFI;
  1748. AAFI: NOP 0;
  1749. FR Z 42;
  1750. <=I;
  1751. LEAVE;
  1752. INVD;
  1753. XN(;
  1754. );
  1755. PUSH;
  1756. NEGI;
  1757. NOP 0;
  1758. NEGR;
  1759. TRUNC;
  1760. L 0;
  1761. CLR;
  1762. SPMZ AAFJ;
  1763. AAFJ: NOP 0;
  1764. >=D;
  1765. CALL FB 45, DB 45;
  1766. CALL FB 45, DB 45;
  1767. CALL FB 45, DB 45;
  1768. U M 0.4;
  1769. L 0;
  1770. L 0;
  1771. CLR;
  1772. SPL AAFK;
  1773. AAFK: NOP 0;
  1774. >=D;
  1775. ==D;
  1776. OD;
  1777. LC MW 0;
  1778. <=R;
  1779. <>I;
  1780. U FALSE;
  1781. ON M 0.4;
  1782. + 0;
  1783. RND+;
  1784. NOP 0;
  1785. L 0;
  1786. CLR;
  1787. SPM AAFL;
  1788. AAFL: NOP 0;
  1789. X M 0.4;
  1790. <=R;
  1791. AUF DB 42;
  1792. UN(;
  1793. );
  1794. <=I;
  1795. COS;
  1796. UW;
  1797. >I;
  1798. X(;
  1799. );
  1800. SLW;
  1801. T MD 0;
  1802. +D;
  1803. L 0;
  1804. SE T 42;
  1805. CALL FC 42;
  1806. CALL FC 42;
  1807. CALL FC 42;
  1808. ==I;
  1809. TAR;
  1810. RRDA;
  1811. TAW;
  1812. XN TRUE;
  1813. TAR2;
  1814. UN FALSE;
  1815. SRW;
  1816. SQR;
  1817. ASIN;
  1818. ==I;
  1819. RLD;
  1820. LAR2;
  1821. = M 0.4;
  1822. S M 0.4;
  1823. L 0;
  1824. CLR;
  1825. SPM AAFM;
  1826. AAFM: NOP 0;
  1827. UC FC 44;
  1828. >=D;
  1829. X(;
  1830. );
  1831. <=I;
  1832. L 0;
  1833. L 0;
  1834. CLR;
  1835. SPL AAFN;
  1836. AAFN: NOP 0;
  1837. BLD 0;
  1838. TAK;
  1839. L 0;
  1840. CLR;
  1841. SPPZ AAFO;
  1842. AAFO: NOP 0;
  1843. +R;
  1844. CALL FB 45, DB 45;
  1845. CALL FB 45, DB 45;
  1846. CALL FB 45, DB 45;
  1847. OW;
  1848. L 0;
  1849. CLR;
  1850. SPBI AAFP;
  1851. AAFP: NOP 0;
  1852. TAR1;
  1853. L 0;
  1854. SI T 42;
  1855. CC FC 43;
  1856. ACOS;
  1857. FN M 0.4;
  1858. >I;
  1859. PUSH;
  1860. NEGR;
  1861. ACOS;
  1862. TAR;
  1863. RND;
  1864. LN;
  1865. L 0;
  1866. CLR;
  1867. LOOP AAFQ;
  1868. AAFQ: NOP 0;
  1869. TAR1;
  1870. SQR;
  1871. SIN;
  1872. SAVE;
  1873. L 0;
  1874. CLR;
  1875. SPN AAFR;
  1876. AAFR: NOP 0;
  1877. ASIN;
  1878. L 0;
  1879. CLR;
  1880. SPN AAFS;
  1881. AAFS: NOP 0;
  1882. ZV Z 42;
  1883. /D;
  1884. ==R;
  1885. SLW;
  1886. XN(;
  1887. );
  1888. CLR;
  1889. NOT;
  1890. CLR;
  1891. ACOS;
  1892. SAVE;
  1893. /D;
  1894. ==D;
  1895. POP;
  1896. ON(;
  1897. );
  1898. NOP 0;
  1899. ENT;
  1900. ENT;
  1901. L 0;
  1902. CLR;
  1903. SPMZ AAFT;
  1904. AAFT: NOP 0;
  1905. >=I;
  1906. LN;
  1907. /I;
  1908. TAN;
  1909. UN(;
  1910. );
  1911. L 0;
  1912. CLR;
  1913. SPBB AAFU;
  1914. AAFU: NOP 0;
  1915. SET;
  1916. L 0;
  1917. CLR;
  1918. SPZ AAFV;
  1919. AAFV: NOP 0;
  1920. /I;
  1921. FP M 0.4;
  1922. +AR1;
  1923. L 0;
  1924. SI T 42;
  1925. NEGD;
  1926. ==R;
  1927. SLD;
  1928. TAD;
  1929. ==I;
  1930. *I;
  1931. POP;
  1932. *D;
  1933. >I;
  1934. L 0;
  1935. CLR;
  1936. SPB AAFW;
  1937. AAFW: NOP 0;
  1938. DEC 0;
  1939. TAD;
  1940. ASIN;
  1941. ENT;
  1942. POP;
  1943. U TRUE;
  1944. UN FALSE;
  1945. L 0;
  1946. CLR;
  1947. SPA AAFX;
  1948. AAFX: NOP 0;
  1949. L 0;
  1950. CLR;
  1951. SPZ AAFY;
  1952. AAFY: NOP 0;
  1953. L 0;
  1954. CLR;
  1955. LOOP AAFZ;
  1956. AAFZ: NOP 0;
  1957. *I;
  1958. UN M 0.4;
  1959. ITB;
  1960. <D;
  1961. LEAVE;
  1962. SQR;
  1963. XN(;
  1964. );
  1965. <D;
  1966. UN FALSE;
  1967. OW;
  1968. NEGR;
  1969. MOD;
  1970. COS;
  1971. TAR1;
  1972. +I;
  1973. <>R;
  1974. *D;
  1975. L 0;
  1976. CLR;
  1977. SPZ AAGA;
  1978. AAGA: NOP 0;
  1979. L 0;
  1980. CLR;
  1981. SPPZ AAGB;
  1982. AAGB: NOP 0;
  1983. INC 0;
  1984. CALL FB 45, DB 45;
  1985. CALL FB 45, DB 45;
  1986. CALL FB 45, DB 45;
  1987. NOT;
  1988. UN(;
  1989. );
  1990. ==R;
  1991. <>R;
  1992. U(;
  1993. );
  1994. S M 0.4;
  1995. L 0;
  1996. CLR;
  1997. SPA AAGC;
  1998. AAGC: NOP 0;
  1999. LAR2;
  2000. TAN;
  2001. SRD;
  2002. UC FC 44;
  2003. LAR2;
  2004. SIN;
  2005. L 0;
  2006. CLR;
  2007. SPA AAGD;
  2008. AAGD: NOP 0;
  2009. NEGR;
  2010. L 0;
  2011. SE T 42;
  2012. >I;
  2013. -I;
  2014. ACOS;
  2015. <>I;
  2016. L 0;
  2017. CLR;
  2018. SPBN AAGE;
  2019. AAGE: NOP 0;
  2020. CALL FC 42;
  2021. CALL FC 42;
  2022. CALL FC 42;
  2023. SRD;
  2024. UW;
  2025. L 0;
  2026. CLR;
  2027. SPS AAGF;
  2028. AAGF: NOP 0;
  2029. XN FALSE;
  2030. ABS;
  2031. SET;
  2032. O(;
  2033. );
  2034. UN M 0.4;
  2035. INVD;
  2036. L 0;
  2037. CLR;
  2038. SPO AAGG;
  2039. AAGG: NOP 0;
  2040. NEGD;
  2041. >D;
  2042. ZV Z 42;
  2043. L 0;
  2044. CLR;
  2045. SPBNB AAGH;
  2046. AAGH: NOP 0;
  2047. L 0;
  2048. CLR;
  2049. SPPZ AAGI;
  2050. AAGI: NOP 0;
  2051. <I;
  2052. UN M 0.4;
  2053. RLDA;
  2054. ACOS;
  2055. <=R;
  2056. ==D;
  2057. +R;
  2058. XOW;
  2059. RND;
  2060. RRDA;
  2061. ENT;
  2062. /I;
  2063. = M 0.4;
  2064. ABS;
  2065. X TRUE;
  2066. X M 0.4;
  2067. TAR2;
  2068. R M 0.4;
  2069. L 0;
  2070. CLR;
  2071. SPN AAGJ;
  2072. AAGJ: NOP 0;
  2073. +AR1;
  2074. ASIN;
  2075. DEC 0;
  2076. SQRT;
  2077. SIN;
  2078. L 0;
  2079. CLR;
  2080. SPBNB AAGK;
  2081. AAGK: NOP 0;
  2082. >I;
  2083. SQRT;
  2084. XN M 0.4;
  2085. L 0;
  2086. CLR;
  2087. SPPZ AAGL;
  2088. AAGL: NOP 0;
  2089. >=R;
  2090. TAR2;
  2091. +D;
  2092. SET;
  2093. ATAN;
  2094. ==I;
  2095. FR Z 42;
  2096. ATAN;
  2097. NOP 0;
  2098. SQR;
  2099. UW;
  2100. S M 0.4;
  2101. ABS;
  2102. L 0;
  2103. CLR;
  2104. SPZ AAGM;
  2105. AAGM: NOP 0;
  2106. L 0;
  2107. CLR;
  2108. LOOP AAGN;
  2109. AAGN: NOP 0;
  2110. TAW;
  2111. L 0;
  2112. CLR;
  2113. SPU AAGO;
  2114. AAGO: NOP 0;
  2115. >=R;
  2116. R M 0.4;
  2117. L 0;
  2118. SV T 42;
  2119. >I;
  2120. OW;
  2121. L 0;
  2122. SV T 42;
  2123. DTB;
  2124. *I;
  2125. *I;
  2126. >=D;
  2127. RND+;
  2128. FP M 0.4;
  2129. >=D;
  2130. ZV Z 42;
  2131. DTR;
  2132. <=R;
  2133. CC FC 43;
  2134. ==R;
  2135. R M 0.4;
  2136. L 0;
  2137. BTI;
  2138. RRD;
  2139. MCR(;
  2140. MCRA;
  2141. MCRD;
  2142. )MCR;
  2143. LEAVE;
  2144. +AR2;
  2145. T MD 0;
  2146. LEAVE;
  2147. L 0;
  2148. CLR;
  2149. SPM AAGP;
  2150. AAGP: NOP 0;
  2151. L 0;
  2152. CLR;
  2153. SPN AAGQ;
  2154. AAGQ: NOP 0;
  2155. <=D;
  2156. LAR1;
  2157. XN(;
  2158. );
  2159. SSD;
  2160. LAR2;
  2161. L 0;
  2162. CLR;
  2163. SPO AAGR;
  2164. AAGR: NOP 0;
  2165. L 0;
  2166. L 0;
  2167. CLR;
  2168. SPL AAGS;
  2169. AAGS: NOP 0;
  2170. CALL FC 42;
  2171. CALL FC 42;
  2172. CALL FC 42;
  2173. O(;
  2174. );
  2175. /I;
  2176. L 0;
  2177. SI T 42;
  2178. = M 0.4;
  2179. L 0;
  2180. CLR;
  2181. SPZ AAGT;
  2182. AAGT: NOP 0;
  2183. MCR(;
  2184. MCRA;
  2185. MCRD;
  2186. )MCR;
  2187. TAR;
  2188. ON FALSE;
  2189. *D;
  2190. L 0;
  2191. CLR;
  2192. SPBB AAGU;
  2193. AAGU: NOP 0;
  2194. R M 0.4;
  2195. CLR;
  2196. CALL FB 45, DB 45;
  2197. CALL FB 45, DB 45;
  2198. CALL FB 45, DB 45;
  2199. L 0;
  2200. SI T 42;
  2201. -R;
  2202. MCR(;
  2203. MCRA;
  2204. MCRD;
  2205. )MCR;
  2206. +AR2;
  2207. PUSH;
  2208. X TRUE;
  2209. DEC 0;
  2210. ITD;
  2211. L 0;
  2212. CLR;
  2213. SPM AAGV;
  2214. AAGV: NOP 0;
  2215. CC FC 43;
  2216. SLW;
  2217. RRDA;
  2218. <=D;
  2219. ON(;
  2220. );
  2221. TAR;
  2222. FP M 0.4;
  2223. +I;
  2224. NOT;
  2225. L 0;
  2226. SI T 42;
  2227. <=R;
  2228. X FALSE;
  2229. LAR1;
  2230. LAR1;
  2231. UW;
  2232. L 0;
  2233. SA T 42;
  2234. L MW 50;
  2235. + 1;
  2236. T MW 50;
  2237. T AW 0;
  2238. <>R;
  2239. -D;
  2240. /D;
  2241. L 0;
  2242. CLR;
  2243. SPBN AAGW;
  2244. AAGW: NOP 0;
  2245. *R;
  2246. EXP;
  2247. L 0;
  2248. CLR;
  2249. LOOP AAGX;
  2250. AAGX: NOP 0;
  2251. SET;
  2252. UN(;
  2253. );
  2254. L 0;
  2255. CLR;
  2256. SPU AAGY;
  2257. AAGY: NOP 0;
  2258. X(;
  2259. );
  2260. L 0;
  2261. CLR;
  2262. SPMZ AAGZ;
  2263. AAGZ: NOP 0;
  2264. SAVE;
  2265. POP;
  2266. -R;
  2267. L 0;
  2268. CLR;
  2269. SPBN AAHA;
  2270. AAHA: NOP 0;
  2271. LC MW 0;
  2272. CC FC 43;
  2273. <=D;
  2274. L 0;
  2275. CLR;
  2276. SPU AAHB;
  2277. AAHB: NOP 0;
  2278. S M 0.4;
  2279. BLD 0;
  2280. <D;
  2281. *I;
  2282. L 0;
  2283. CLR;
  2284. SPZ AAHC;
  2285. AAHC: NOP 0;
  2286. /R;
  2287. ==D;
  2288. CALL FB 45, DB 45;
  2289. CALL FB 45, DB 45;
  2290. CALL FB 45, DB 45;
  2291. NOT;
  2292. L 0;
  2293. CLR;
  2294. SPZ AAHD;
  2295. AAHD: NOP 0;
  2296. ENT;
  2297. MOD;
  2298. L 0;
  2299. CLR;
  2300. SPMZ AAHE;
  2301. AAHE: NOP 0;
  2302. <=I;
  2303. UW;
  2304. CLR;
  2305. TAN;
  2306. L 0;
  2307. SV T 42;
  2308. +D;
  2309. X M 0.4;
  2310. +D;
  2311. L 0;
  2312. CLR;
  2313. SPZ AAHF;
  2314. AAHF: NOP 0;
  2315. ITB;
  2316. NEGD;
  2317. +I;
  2318. SRD;
  2319. DTB;
  2320. TAD;
  2321. >D;
  2322. ==R;
  2323. R M 0.4;
  2324. L 0;
  2325. CLR;
  2326. SPBI AAHG;
  2327. AAHG: NOP 0;
  2328. FN M 0.4;
  2329. L 0;
  2330. SI T 42;
  2331. OD;
  2332. UW;
  2333. ON TRUE;
  2334. ==D;
  2335. CALL FB 45, DB 45;
  2336. CALL FB 45, DB 45;
  2337. CALL FB 45, DB 45;
  2338. MOD;
  2339. ==R;
  2340. >R;
  2341. ITB;
  2342. <R;
  2343. LAR1;
  2344. XN TRUE;
  2345. -D;
  2346. RND+;
  2347. LAR2;
  2348. L MW 50;
  2349. + 1;
  2350. T MW 50;
  2351. T AW 0;
  2352. L 0;
  2353. CLR;
  2354. SPBN AAHH;
  2355. AAHH: NOP 0;
  2356. T MD 0;
  2357. TRUNC;
  2358. XOW;
  2359. RND-;
  2360. L 0;
  2361. CLR;
  2362. SPZ AAHI;
  2363. AAHI: NOP 0;
  2364. SSD;
  2365. DTB;
  2366. *D;
  2367. DEC 0;
  2368. LAR1;
  2369. MCR(;
  2370. MCRA;
  2371. MCRD;
  2372. )MCR;
  2373. L 0;
  2374. CLR;
  2375. SPBN AAHJ;
  2376. AAHJ: NOP 0;
  2377. +R;
  2378. RRDA;
  2379. OW;
  2380. COS;
  2381. >R;
  2382. INVI;
  2383. CC FC 43;
  2384. >D;
  2385. LC MW 0;
  2386. UN(;
  2387. );
  2388. SLD;
  2389. /D;
  2390. PUSH;
  2391. FP M 0.4;
  2392. L 0;
  2393. SS T 42;
  2394. >=I;
  2395. L 0;
  2396. CLR;
  2397. SPBN AAHK;
  2398. AAHK: NOP 0;
  2399. NOT;
  2400. >R;
  2401. L 0;
  2402. CLR;
  2403. SPA AAHL;
  2404. AAHL: NOP 0;
  2405. TAR;
  2406. L 0;
  2407. SE T 42;
  2408. >=D;
  2409. ATAN;
  2410. CLR;
  2411. TAW;
  2412. TAR;
  2413. *I;
  2414. U TRUE;
  2415. UN(;
  2416. );
  2417. ABS;
  2418. RRDA;
  2419. /D;
  2420. RND+;
  2421. -R;
  2422. S M 0.4;
  2423. /D;
  2424. TAD;
  2425. UN TRUE;
  2426. FN M 0.4;
  2427. L 0;
  2428. CLR;
  2429. SPU AAHM;
  2430. AAHM: NOP 0;
  2431. >=D;
  2432. >D;
  2433. ON TRUE;
  2434. SSD;
  2435. >D;
  2436. SSD;
  2437. T MD 0;
  2438. UN M 0.4;
  2439. S M 0.4;
  2440. X M 0.4;
  2441. ZV Z 42;
  2442. NEGR;
  2443. <=D;
  2444. TAK;
  2445. UC FC 44;
  2446. OW;
  2447. TAN;
  2448. <>I;
  2449. L 0;
  2450. CLR;
  2451. SPBB AAHN;
  2452. AAHN: NOP 0;
  2453. RND+;
  2454. L 0;
  2455. CLR;
  2456. SPO AAHO;
  2457. AAHO: NOP 0;
  2458. >=I;
  2459. U(;
  2460. );
  2461. RND-;
  2462. COS;
  2463. TAR2;
  2464. X(;
  2465. );
  2466. <>I;
  2467. RLDA;
  2468. CALL FB 45, DB 45;
  2469. CALL FB 45, DB 45;
  2470. CALL FB 45, DB 45;
  2471. UD;
  2472. X M 0.4;
  2473. L 0;
  2474. SE T 42;
  2475. +AR1;
  2476. RND-;
  2477. <D;
  2478. L 0;
  2479. CLR;
  2480. SPBNB AAHP;
  2481. AAHP: NOP 0;
  2482. ASIN;
  2483. U M 0.4;
  2484. /I;
  2485. RND-;
  2486. DEC 0;
  2487. SIN;
  2488. L 0;
  2489. BTD;
  2490. NOT;
  2491. UW;
  2492. +D;
  2493. XN(;
  2494. );
  2495. UW;
  2496. XOD;
  2497. L 0;
  2498. SI T 42;
  2499. L 0;
  2500. SI T 42;
  2501. PUSH;
  2502. XN M 0.4;
  2503. *R;
  2504. SSD;
  2505. XN TRUE;
  2506. /D;
  2507. LC MW 0;
  2508. X M 0.4;
  2509. + 0;
  2510. XN(;
  2511. );
  2512. -I;
  2513. RND-;
  2514. FP M 0.4;
  2515. +AR2;
  2516. L 0;
  2517. CLR;
  2518. SPU AAHQ;
  2519. AAHQ: NOP 0;
  2520. <>D;
  2521. XN TRUE;
  2522. XOD;
  2523. L 0;
  2524. CLR;
  2525. LOOP AAHR;
  2526. AAHR: NOP 0;
  2527. <=R;
  2528. MCR(;
  2529. MCRA;
  2530. MCRD;
  2531. )MCR;
  2532. SRW;
  2533. ITB;
  2534. <>D;
  2535. X(;
  2536. );
  2537. TAR2;
  2538. ON TRUE;
  2539. INVI;
  2540. XN FALSE;
  2541. X TRUE;
  2542. L 0;
  2543. CLR;
  2544. SPZ AAHS;
  2545. AAHS: NOP 0;
  2546. L 0;
  2547. SE T 42;
  2548. ABS;
  2549. XOD;
  2550. SLW;
  2551. LC MW 0;
  2552. ON FALSE;
  2553. L 0;
  2554. CLR;
  2555. SPBB AAHT;
  2556. AAHT: NOP 0;
  2557. + 0;
  2558. U(;
  2559. );
  2560. L 0;
  2561. CLR;
  2562. SPMZ AAHU;
  2563. AAHU: NOP 0;
  2564. L 0;
  2565. CLR;
  2566. SPA AAHV;
  2567. AAHV: NOP 0;
  2568. >=I;
  2569. *D;
  2570. ATAN;
  2571. SQR;
  2572. LAR1;
  2573. -R;
  2574. L 0;
  2575. CLR;
  2576. LOOP AAHW;
  2577. AAHW: NOP 0;
  2578. L 0;
  2579. BTD;
  2580. RLDA;
  2581. RLDA;
  2582. *D;
  2583. L 0;
  2584. SS T 42;
  2585. TDB;
  2586. NOT;
  2587. TAN;
  2588. S M 0.4;
  2589. ACOS;
  2590. CC FC 43;
  2591. ITB;
  2592. XOD;
  2593. L 0;
  2594. CLR;
  2595. SPBI AAHX;
  2596. AAHX: NOP 0;
  2597. L 0;
  2598. CLR;
  2599. SPM AAHY;
  2600. AAHY: NOP 0;
  2601. FP M 0.4;
  2602. S M 0.4;
  2603. L 0;
  2604. CLR;
  2605. SPPZ AAHZ;
  2606. AAHZ: NOP 0;
  2607. L 0;
  2608. CLR;
  2609. SPBI AAIA;
  2610. AAIA: NOP 0;
  2611. L 0;
  2612. CLR;
  2613. SPS AAIB;
  2614. AAIB: NOP 0;
  2615. T MD 0;
  2616. CC FC 43;
  2617. ASIN;
  2618. <R;
  2619. LAR2;
  2620. *I;
  2621. T MD 0;
  2622. X TRUE;
  2623. ATAN;
  2624. L 0;
  2625. L 0;
  2626. CLR;
  2627. SPL AAIC;
  2628. AAIC: NOP 0;
  2629. O(;
  2630. );
  2631. R M 0.4;
  2632. SQRT;
  2633. -D;
  2634. L 0;
  2635. SE T 42;
  2636. <>R;
  2637. UN FALSE;
  2638. UC FC 44;
  2639. LAR1;
  2640. O FALSE;
  2641. XN(;
  2642. );
  2643. RND+;
  2644. -D;
  2645. +D;
  2646. -R;
  2647. INC 0;
  2648. O FALSE;
  2649. TAR;
  2650. *D;
  2651. /D;
  2652. LAR2;
  2653. R M 0.4;
  2654. DEC 0;
  2655. >D;
  2656. OW;
  2657. -D;
  2658. ABS;
  2659. L 0;
  2660. CLR;
  2661. SPN AAID;
  2662. AAID: NOP 0;
  2663. L 0;
  2664. CLR;
  2665. SPB AAIE;
  2666. AAIE: NOP 0;
  2667. L DW#16#F5E4A471;
  2668. U FALSE;
  2669. RLDA;
  2670. L 0;
  2671. SS T 42;
  2672. *R;
  2673. ENT;
  2674. <I;
  2675. AUF DB 42;
  2676. ZR Z 42;
  2677. T MD 0;
  2678. NEGD;
  2679. L MW 50;
  2680. + 1;
  2681. T MW 50;
  2682. T AW 0;
  2683. L 0;
  2684. CLR;
  2685. SPBB AAIF;
  2686. AAIF: NOP 0;
  2687. RLD;
  2688. INVI;
  2689. >=I;
  2690. <>D;
  2691. = M 0.4;
  2692. TAR;
  2693. <=R;
  2694. LAR2;
  2695. SET;
  2696. L 0;
  2697. CLR;
  2698. SPP AAIG;
  2699. AAIG: NOP 0;
  2700. -I;
  2701. X(;
  2702. );
  2703. TAK;
  2704. OD;
  2705. L 0;
  2706. CLR;
  2707. SPBNB AAIH;
  2708. AAIH: NOP 0;
  2709. L 0;
  2710. CLR;
  2711. SPBIN AAII;
  2712. AAII: NOP 0;
  2713. <>R;
  2714. <=R;
  2715. +D;
  2716. L 0;
  2717. SV T 42;
  2718. TAD;
  2719. >=I;
  2720. INVI;
  2721. >D;
  2722. RND+;
  2723. RRD;
  2724. U TRUE;
  2725. PUSH;
  2726. DEC 0;
  2727. *D;
  2728. SSI;
  2729. PUSH;
  2730. ==D;
  2731. L MW 50;
  2732. + 1;
  2733. T MW 50;
  2734. T AW 0;
  2735. SET;
  2736. X(;
  2737. );
  2738. L 0;
  2739. CLR;
  2740. SPZ AAIJ;
  2741. AAIJ: NOP 0;
  2742. ABS;
  2743. SRW;
  2744. UW;
  2745. LN;
  2746. EXP;
  2747. +AR1;
  2748. = M 0.4;
  2749. <=I;
  2750. L 0;
  2751. CLR;
  2752. SPP AAIK;
  2753. AAIK: NOP 0;
  2754. = M 0.4;
  2755. TAR;
  2756. SSI;
  2757. L 0;
  2758. SS T 42;
  2759. -I;
  2760. <=I;
  2761. PUSH;
  2762. NOP 0;
  2763. ITB;
  2764. ==D;
  2765. ACOS;
  2766. RRDA;
  2767. O(;
  2768. );
  2769. >=I;
  2770. L 0;
  2771. SS T 42;
  2772. ==R;
  2773. L 0;
  2774. CLR;
  2775. SPO AAIL;
  2776. AAIL: NOP 0;
  2777. <R;
  2778. >R;
  2779. L 0;
  2780. CLR;
  2781. SPM AAIM;
  2782. AAIM: NOP 0;
  2783. TAD;
  2784. -I;
  2785. L 0;
  2786. SS T 42;
  2787. L 0;
  2788. CLR;
  2789. SPBN AAIN;
  2790. AAIN: NOP 0;
  2791. S M 0.4;
  2792. LC MW 0;
  2793. DTR;
  2794. PUSH;
  2795. L 0;
  2796. L 0;
  2797. CLR;
  2798. SPL AAIO;
  2799. AAIO: NOP 0;
  2800. <=I;
  2801. L 0;
  2802. CLR;
  2803. SPO AAIP;
  2804. AAIP: NOP 0;
  2805. XOW;
  2806. CLR;
  2807. RRDA;
  2808. >=R;
  2809. CALL FC 42;
  2810. CALL FC 42;
  2811. CALL FC 42;
  2812. +AR2;
  2813. ==R;
  2814. >=R;
  2815. CC FC 43;
  2816. L 0;
  2817. CLR;
  2818. LOOP AAIQ;
  2819. AAIQ: NOP 0;
  2820. LEAVE;
  2821. X FALSE;
  2822. S M 0.4;
  2823. XN TRUE;
  2824. NEGI;
  2825. DEC 0;
  2826. SIN;
  2827. UN TRUE;
  2828. XOD;
  2829. L 0;
  2830. CLR;
  2831. SPBNB AAIR;
  2832. AAIR: NOP 0;
  2833. L 0;
  2834. CLR;
  2835. SPO AAIS;
  2836. AAIS: NOP 0;
  2837. SLD;
  2838. FR Z 42;
  2839. SQRT;
  2840. L 0;
  2841. CLR;
  2842. SPBIN AAIT;
  2843. AAIT: NOP 0;
  2844. TAR1;
  2845. = M 0.4;
  2846. ON(;
  2847. );
  2848. <>R;
  2849. LAR1;
  2850. SIN;
  2851. SLD;
  2852. MCR(;
  2853. MCRA;
  2854. MCRD;
  2855. )MCR;
  2856. INVD;
  2857. +I;
  2858. UC FC 44;
  2859. <D;
  2860. L 0;
  2861. CLR;
  2862. SPN AAIU;
  2863. AAIU: NOP 0;
  2864. L 0;
  2865. CLR;
  2866. SPP AAIV;
  2867. AAIV: NOP 0;
  2868. -I;
  2869. SQR;
  2870. ==D;
  2871. *D;
  2872. L 0;
  2873. SE T 42;
  2874. ENT;
  2875. ==I;
  2876. L 0;
  2877. CLR;
  2878. SPP AAIW;
  2879. AAIW: NOP 0;
  2880. RND-;
  2881. SSI;
  2882. >=I;
  2883. TDB;
  2884. TAR;
  2885. L DW#16#24108E9A;
  2886. U(;
  2887. );
  2888. L 0;
  2889. CLR;
  2890. SPBNB AAIX;
  2891. AAIX: NOP 0;
  2892. -R;
  2893. COS;
  2894. L DW#16#E6FDD7AF;
  2895. L 0;
  2896. CLR;
  2897. SPPZ AAIY;
  2898. AAIY: NOP 0;
  2899. +AR1;
  2900. L 0;
  2901. CLR;
  2902. SPN AAIZ;
  2903. AAIZ: NOP 0;
  2904. ITD;
  2905. <>R;
  2906. RLDA;
  2907. L 0;
  2908. SE T 42;
  2909. SSI;
  2910. RLDA;
  2911. L 0;
  2912. CLR;
  2913. SPS AAJA;
  2914. AAJA: NOP 0;
  2915. RLDA;
  2916. XN M 0.4;
  2917. CLR;
  2918. /R;
  2919. L 0;
  2920. SI T 42;
  2921. TAR2;
  2922. RND-;
  2923. NEGR;
  2924. BLD 0;
  2925. /I;
  2926. U(;
  2927. );
  2928. U(;
  2929. );
  2930. L 0;
  2931. CLR;
  2932. SPBN AAJB;
  2933. AAJB: NOP 0;
  2934. RRD;
  2935. CALL FB 45, DB 45;
  2936. CALL FB 45, DB 45;
  2937. CALL FB 45, DB 45;
  2938. SSD;
  2939. L 0;
  2940. CLR;
  2941. SPBB AAJC;
  2942. AAJC: NOP 0;
  2943. UD;
  2944. O M 0.4;
  2945. ==I;
  2946. ACOS;
  2947. <>D;
  2948. AUF DB 42;
  2949. -D;
  2950. SQRT;
  2951. -D;
  2952. XN TRUE;
  2953. UN(;
  2954. );
  2955. INC 0;
  2956. ENT;
  2957. DTB;
  2958. +D;
  2959. PUSH;
  2960. L 0;
  2961. CLR;
  2962. SPBB AAJD;
  2963. AAJD: NOP 0;
  2964. = M 0.4;
  2965. -R;
  2966. L 0;
  2967. SI T 42;
  2968. TAR;
  2969. TAK;
  2970. L 0;
  2971. CLR;
  2972. SPB AAJE;
  2973. AAJE: NOP 0;
  2974. L MW 50;
  2975. + 1;
  2976. T MW 50;
  2977. T AW 0;
  2978. <I;
  2979. <=I;
  2980. SAVE;
  2981. /R;
  2982. /D;
  2983. L 0;
  2984. CLR;
  2985. LOOP AAJF;
  2986. AAJF: NOP 0;
  2987. POP;
  2988. -D;
  2989. <D;
  2990. DTR;
  2991. CC FC 43;
  2992. L 0;
  2993. SV T 42;
  2994. SQR;
  2995. RRDA;
  2996. X FALSE;
  2997. ON FALSE;
  2998. L 0;
  2999. CLR;
  3000. SPU AAJG;
  3001. AAJG: NOP 0;
  3002. SLW;
  3003. L 0;
  3004. SS T 42;
  3005. TAR1;
  3006. <=D;
  3007. UC FC 44;
  3008. L 0;
  3009. SE T 42;
  3010. >D;
  3011. L 0;
  3012. CLR;
  3013. SPPZ AAJH;
  3014. AAJH: NOP 0;
  3015. L MW 50;
  3016. + 1;
  3017. T MW 50;
  3018. T AW 0;
  3019. L 0;
  3020. CLR;
  3021. SPP AAJI;
  3022. AAJI: NOP 0;
  3023. >R;
  3024. /R;
  3025. L 0;
  3026. CLR;
  3027. SPBIN AAJJ;
  3028. AAJJ: NOP 0;
  3029. CALL FC 42;
  3030. CALL FC 42;
  3031. CALL FC 42;
  3032. L 0;
  3033. CLR;
  3034. LOOP AAJK;
  3035. AAJK: NOP 0;
  3036. L 0;
  3037. SI T 42;
  3038. L 0;
  3039. SV T 42;
  3040. XOW;
  3041. RLD;
  3042. LEAVE;
  3043. L 0;
  3044. CLR;
  3045. SPBIN AAJL;
  3046. AAJL: NOP 0;
  3047. SLW;
  3048. X M 0.4;
  3049. *D;
  3050. L 0;
  3051. CLR;
  3052. SPMZ AAJM;
  3053. AAJM: NOP 0;
  3054. <>I;
  3055. SIN;
  3056. BLD 0;
  3057. L 0;
  3058. CLR;
  3059. SPS AAJN;
  3060. AAJN: NOP 0;
  3061. U TRUE;
  3062. AUF DB 42;
  3063. +AR2;
  3064. +AR1;
  3065. RND;
  3066. UN(;
  3067. );
  3068. BLD 0;
  3069. SRW;
  3070. >=R;
  3071. UW;
  3072. +R;
  3073. >=D;
  3074. FR Z 42;
  3075. O FALSE;
  3076. ITD;
  3077. X M 0.4;
  3078. LAR1;
  3079. L 0;
  3080. CLR;
  3081. SPN AAJO;
  3082. AAJO: NOP 0;
  3083. COS;
  3084. <=D;
  3085. LN;
  3086. INVD;
  3087. LN;
  3088. RRDA;
  3089. L MW 50;
  3090. + 1;
  3091. T MW 50;
  3092. T AW 0;
  3093. SSD;
  3094. ON(;
  3095. );
  3096. >D;
  3097. L 0;
  3098. SS T 42;
  3099. NEGI;
  3100. ENT;
  3101. L 0;
  3102. CLR;
  3103. SPPZ AAJP;
  3104. AAJP: NOP 0;
  3105. SRW;
  3106. UW;
  3107. MOD;
  3108. L 0;
  3109. CLR;
  3110. SPN AAJQ;
  3111. AAJQ: NOP 0;
  3112. <=R;
  3113. TAR2;
  3114. XOW;
  3115. +I;
  3116. XOD;
  3117. /I;
  3118. AUF DB 42;
  3119. L MW 50;
  3120. + 1;
  3121. T MW 50;
  3122. T AW 0;
  3123. SLD;
  3124. DTB;
  3125. L DW#16#4C6A70F4;
  3126. L 0;
  3127. CLR;
  3128. SPBIN AAJR;
  3129. AAJR: NOP 0;
  3130. L 0;
  3131. CLR;
  3132. SPBB AAJS;
  3133. AAJS: NOP 0;
  3134. NEGI;
  3135. RLD;
  3136. L 0;
  3137. CLR;
  3138. SPP AAJT;
  3139. AAJT: NOP 0;
  3140. SRW;
  3141. *I;
  3142. ENT;
  3143. L 0;
  3144. L 0;
  3145. CLR;
  3146. SPL AAJU;
  3147. AAJU: NOP 0;
  3148. L 0;
  3149. CLR;
  3150. SPBB AAJV;
  3151. AAJV: NOP 0;
  3152. >=I;
  3153. DEC 0;
  3154. XOD;
  3155. +R;
  3156. ABS;
  3157. -I;
  3158. >=D;
  3159. L 0;
  3160. CLR;
  3161. SPBNB AAJW;
  3162. AAJW: NOP 0;
  3163. X TRUE;
  3164. S M 0.4;
  3165. -I;
  3166. LAR2;
  3167. ZV Z 42;
  3168. SRW;
  3169. NEGD;
  3170. INVI;
  3171. UD;
  3172. L 0;
  3173. CLR;
  3174. SPA AAJX;
  3175. AAJX: NOP 0;
  3176. ENT;
  3177. L 0;
  3178. CLR;
  3179. SPA AAJY;
  3180. AAJY: NOP 0;
  3181. >D;
  3182. ==I;
  3183. NOP 0;
  3184. RND-;
  3185. FR Z 42;
  3186. U(;
  3187. );
  3188. OW;
  3189. TAD;
  3190. TRUNC;
  3191. UN(;
  3192. );
  3193. FN M 0.4;
  3194. LN;
  3195. L 0;
  3196. CLR;
  3197. SPMZ AAJZ;
  3198. AAJZ: NOP 0;
  3199. SSD;
  3200. FN M 0.4;
  3201. >D;
  3202. UN M 0.4;
  3203. TAK;
  3204. <>R;
  3205. EXP;
  3206. SLW;
  3207. SRW;
  3208. INVI;
  3209. L 0;
  3210. CLR;
  3211. SPBB AAKA;
  3212. AAKA: NOP 0;
  3213. L 0;
  3214. CLR;
  3215. SPM AAKB;
  3216. AAKB: NOP 0;
  3217. L 0;
  3218. CLR;
  3219. SPBB AAKC;
  3220. AAKC: NOP 0;
  3221. ON(;
  3222. );
  3223. SET;
  3224. DEC 0;
  3225. TRUNC;
  3226. XOW;
  3227. ON FALSE;
  3228. SIN;
  3229. L 0;
  3230. BTI;
  3231. ON TRUE;
  3232. RRD;
  3233. L 0;
  3234. BTD;
  3235. L 0;
  3236. CLR;
  3237. SPBNB AAKD;
  3238. AAKD: NOP 0;
  3239. ON FALSE;
  3240. L 0;
  3241. CLR;
  3242. SPBIN AAKE;
  3243. AAKE: NOP 0;
  3244. INC 0;
  3245. CC FC 43;
  3246. ==I;
  3247. L 0;
  3248. CLR;
  3249. SPU AAKF;
  3250. AAKF: NOP 0;
  3251. L 0;
  3252. CLR;
  3253. SPBN AAKG;
  3254. AAKG: NOP 0;
  3255. TAR1;
  3256. XOD;
  3257. UW;
  3258. RRD;
  3259. <>D;
  3260. L 0;
  3261. SI T 42;
  3262. SSI;
  3263. L 0;
  3264. CLR;
  3265. SPA AAKH;
  3266. AAKH: NOP 0;
  3267. DTB;
  3268. <>I;
  3269. L 0;
  3270. CLR;
  3271. SPMZ AAKI;
  3272. AAKI: NOP 0;
  3273. >R;
  3274. TAR2;
  3275. ZV Z 42;
  3276. L 0;
  3277. BTD;
  3278. ON M 0.4;
  3279. L 0;
  3280. CLR;
  3281. LOOP AAKJ;
  3282. AAKJ: NOP 0;
  3283. L 0;
  3284. CLR;
  3285. SPBI AAKK;
  3286. AAKK: NOP 0;
  3287. INC 0;
  3288. DTB;
  3289. <=R;
  3290. L MW 50;
  3291. + 1;
  3292. T MW 50;
  3293. T AW 0;
  3294. SQRT;
  3295. ASIN;
  3296. L 0;
  3297. SE T 42;
  3298. L 0;
  3299. CLR;
  3300. SPPZ AAKL;
  3301. AAKL: NOP 0;
  3302. SET;
  3303. SQR;
  3304. SAVE;
  3305. L 0;
  3306. BTD;
  3307. >D;
  3308. SRW;
  3309. L 0;
  3310. CLR;
  3311. SPM AAKM;
  3312. AAKM: NOP 0;
  3313. L DW#16#01BF9E73;
  3314. -R;
  3315. RND+;
  3316. T MD 0;
  3317. TDB;
  3318. L 0;
  3319. CLR;
  3320. SPMZ AAKN;
  3321. AAKN: NOP 0;
  3322. L 0;
  3323. CLR;
  3324. SPO AAKO;
  3325. AAKO: NOP 0;
  3326. BLD 0;
  3327. DEC 0;
  3328. O M 0.4;
  3329. ZR Z 42;
  3330. +D;
  3331. RND+;
  3332. ON(;
  3333. );
  3334. <I;
  3335. SSI;
  3336. L 0;
  3337. CLR;
  3338. SPS AAKP;
  3339. AAKP: NOP 0;
  3340. <>R;
  3341. SQRT;
  3342. RRDA;
  3343. L 0;
  3344. CLR;
  3345. SPZ AAKQ;
  3346. AAKQ: NOP 0;
  3347. <I;
  3348. L 0;
  3349. CLR;
  3350. SPBI AAKR;
  3351. AAKR: NOP 0;
  3352. *D;
  3353. TAW;
  3354. TAW;
  3355. <>D;
  3356. SRW;
  3357. ==R;
  3358. TAR1;
  3359. UC FC 44;
  3360. /D;
  3361. SIN;
  3362. TAK;
  3363. SSD;
  3364. UD;
  3365. NEGR;
  3366. L DW#16#C9912032;
  3367. UW;
  3368. T MD 0;
  3369. OW;
  3370. +D;
  3371. R M 0.4;
  3372. LEAVE;
  3373. <>I;
  3374. ON(;
  3375. );
  3376. TAK;
  3377. L 0;
  3378. SI T 42;
  3379. INVI;
  3380. DEC 0;
  3381. UD;
  3382. <=D;
  3383. <R;
  3384. L 0;
  3385. CLR;
  3386. SPPZ AAKS;
  3387. AAKS: NOP 0;
  3388. L 0;
  3389. SA T 42;
  3390. LAR2;
  3391. >I;
  3392. INVD;
  3393. BLD 0;
  3394. RLD;
  3395. CLR;
  3396. L 0;
  3397. SV T 42;
  3398. T MD 0;
  3399. O(;
  3400. );
  3401. TAR1;
  3402. ==D;
  3403. L 0;
  3404. SE T 42;
  3405. SIN;
  3406. TAR1;
  3407. LEAVE;
  3408. O(;
  3409. );
  3410. ENT;
  3411. MCR(;
  3412. MCRA;
  3413. MCRD;
  3414. )MCR;
  3415. L 0;
  3416. CLR;
  3417. SPS AAKT;
  3418. AAKT: NOP 0;
  3419. XN M 0.4;
  3420. ABS;
  3421. ZV Z 42;
  3422. U M 0.4;
  3423. NEGR;
  3424. +AR2;
  3425. = M 0.4;
  3426. XN TRUE;
  3427. -I;
  3428. X(;
  3429. );
  3430. OD;
  3431. ON(;
  3432. );
  3433. XN(;
  3434. );
  3435. SSD;
  3436. O TRUE;
  3437. EXP;
  3438. ITB;
  3439. <>D;
  3440. COS;
  3441. /D;
  3442. +R;
  3443. T MD 0;
  3444. MOD;
  3445. MOD;
  3446. S M 0.4;
  3447. OD;
  3448. <>D;
  3449. *I;
  3450. <I;
  3451. L 0;
  3452. BTI;
  3453. UD;
  3454. /R;
  3455. OW;
  3456. <=I;
  3457. TAD;
  3458. U M 0.4;
  3459. XN M 0.4;
  3460. L 0;
  3461. CLR;
  3462. SPBIN AAKU;
  3463. AAKU: NOP 0;
  3464. MCR(;
  3465. MCRA;
  3466. MCRD;
  3467. )MCR;
  3468. XOD;
  3469. TAN;
  3470. XOW;
  3471. +R;
  3472. RND;
  3473. L DW#16#75EB89C2;
  3474. ==R;
  3475. L 0;
  3476. L 0;
  3477. CLR;
  3478. SPL AAKV;
  3479. AAKV: NOP 0;
  3480. ITD;
  3481. <>I;
  3482. O TRUE;
  3483. X M 0.4;
  3484. RND-;
  3485. INVD;
  3486. XN(;
  3487. );
  3488. FN M 0.4;
  3489. CALL FB 45, DB 45;
  3490. CALL FB 45, DB 45;
  3491. CALL FB 45, DB 45;
  3492. O TRUE;
  3493. SET;
  3494. U(;
  3495. );
  3496. FR Z 42;
  3497. XN TRUE;
  3498. LAR1;
  3499. TRUNC;
  3500. OD;
  3501. NEGR;
  3502. O(;
  3503. );
  3504. >D;
  3505. RRDA;
  3506. L 0;
  3507. CLR;
  3508. SPBNB AAKW;
  3509. AAKW: NOP 0;
  3510. TRUNC;
  3511. +AR1;
  3512. L 0;
  3513. CLR;
  3514. SPP AAKX;
  3515. AAKX: NOP 0;
  3516. +AR1;
  3517. SET;
  3518. L 0;
  3519. CLR;
  3520. SPM AAKY;
  3521. AAKY: NOP 0;
  3522. RND+;
  3523. L 0;
  3524. CLR;
  3525. SPO AAKZ;
  3526. AAKZ: NOP 0;
  3527. <D;
  3528. L 0;
  3529. SA T 42;
  3530. TAW;
  3531. LN;
  3532. L 0;
  3533. CLR;
  3534. SPBIN AALA;
  3535. AALA: NOP 0;
  3536. L 0;
  3537. L 0;
  3538. CLR;
  3539. SPL AALB;
  3540. AALB: NOP 0;
  3541. ON(;
  3542. );
  3543. POP;
  3544. CALL FC 42;
  3545. CALL FC 42;
  3546. CALL FC 42;
  3547. <=R;
  3548. ASIN;
  3549. POP;
  3550. RRD;
  3551. U(;
  3552. );
  3553. -I;
  3554. +R;
  3555. UW;
  3556. L 0;
  3557. CLR;
  3558. SPP AALC;
  3559. AALC: NOP 0;
  3560. SIN;
  3561. EXP;
  3562. <=D;
  3563. L 0;
  3564. CLR;
  3565. SPBIN AALD;
  3566. AALD: NOP 0;
  3567. MOD;
  3568. L 0;
  3569. BTD;
  3570. UD;
  3571. SLW;
  3572. RND-;
  3573. TAD;
  3574. L 0;
  3575. CLR;
  3576. SPBIN AALE;
  3577. AALE: NOP 0;
  3578. <D;
  3579. MCR(;
  3580. MCRA;
  3581. MCRD;
  3582. )MCR;
  3583. O(;
  3584. );
  3585. ENT;
  3586. LN;
  3587. SIN;
  3588. POP;
  3589. OW;
  3590. <>D;
  3591. *R;
  3592. FR Z 42;
  3593. ZV Z 42;
  3594. INVD;
  3595. L 0;
  3596. CLR;
  3597. SPMZ AALF;
  3598. AALF: NOP 0;
  3599. S M 0.4;
  3600. TAR;
  3601. *D;
  3602. CLR;
  3603. UD;
  3604. ITD;
  3605. UN(;
  3606. );
  3607. TDB;
  3608. MOD;
  3609. CC FC 43;
  3610. CC FC 43;
  3611. X FALSE;
  3612. ITD;
  3613. NOP 0;
  3614. ENT;
  3615. NEGR;
  3616. SRW;
  3617. NEGI;
  3618. L 0;
  3619. CLR;
  3620. SPU AALG;
  3621. AALG: NOP 0;
  3622. L 0;
  3623. CLR;
  3624. SPO AALH;
  3625. AALH: NOP 0;
  3626. ON M 0.4;
  3627. NEGD;
  3628. ITD;
  3629. <I;
  3630. SRW;
  3631. FR Z 42;
  3632. CC FC 43;
  3633. INVD;
  3634. ABS;
  3635. RND-;
  3636. PUSH;
  3637. L 0;
  3638. CLR;
  3639. SPM AALI;
  3640. AALI: NOP 0;
  3641. L 0;
  3642. CLR;
  3643. SPBN AALJ;
  3644. AALJ: NOP 0;
  3645. +R;
  3646. SSI;
  3647. XOW;
  3648. + 0;
  3649. L 0;
  3650. CLR;
  3651. SPS AALK;
  3652. AALK: NOP 0;
  3653. ZR Z 42;
  3654. +D;
  3655. L 0;
  3656. SE T 42;
  3657. RLDA;
  3658. SSI;
  3659. FN M 0.4;
  3660. SSD;
  3661. L 0;
  3662. CLR;
  3663. SPP AALL;
  3664. AALL: NOP 0;
  3665. INVD;
  3666. *D;
  3667. L 0;
  3668. CLR;
  3669. SPN AALM;
  3670. AALM: NOP 0;
  3671. LN;
  3672. XN FALSE;
  3673. >=D;
  3674. X M 0.4;
  3675. ZR Z 42;
  3676. PUSH;
  3677. BLD 0;
  3678. +AR2;
  3679. SIN;
  3680. L 0;
  3681. CLR;
  3682. SPBI AALN;
  3683. AALN: NOP 0;
  3684. ==R;
  3685. DTR;
  3686. L 0;
  3687. CLR;
  3688. SPMZ AALO;
  3689. AALO: NOP 0;
  3690. RND;
  3691. +R;
  3692. INC 0;
  3693. FR Z 42;
  3694. RLDA;
  3695. TAK;
  3696. L 0;
  3697. CLR;
  3698. LOOP AALP;
  3699. AALP: NOP 0;
  3700. ZV Z 42;
  3701. RLD;
  3702. RLD;
  3703. TAR2;
  3704. >=R;
  3705. /I;
  3706. >=R;
  3707. >D;
  3708. XOD;
  3709. RLD;
  3710. L 0;
  3711. BTD;
  3712. OD;
  3713. ON(;
  3714. );
  3715. UW;
  3716. O FALSE;
  3717. U(;
  3718. );
  3719. UN M 0.4;
  3720. LN;
  3721. >D;
  3722. TRUNC;
  3723. XN(;
  3724. );
  3725. <=D;
  3726. O M 0.4;
  3727. NEGR;
  3728. L 0;
  3729. SI T 42;
  3730. TAR1;
  3731. /D;
  3732. ON(;
  3733. );
  3734. SLD;
  3735. SRD;
  3736. X M 0.4;
  3737. UN M 0.4;
  3738. XOW;
  3739. PUSH;
  3740. LN;
  3741. ON M 0.4;
  3742. X M 0.4;
  3743. OW;
  3744. L 0;
  3745. L 0;
  3746. CLR;
  3747. SPL AALQ;
  3748. AALQ: NOP 0;
  3749. UD;
  3750. L 0;
  3751. CLR;
  3752. SPBB AALR;
  3753. AALR: NOP 0;
  3754. X M 0.4;
  3755. RRDA;
  3756. ACOS;
  3757. L 0;
  3758. BTI;
  3759. ==I;
  3760. SAVE;
  3761. UW;
  3762. <=D;
  3763. RND-;
  3764. DTB;
  3765. UW;
  3766. LC MW 0;
  3767. /I;
  3768. TDB;
  3769. ABS;
  3770. S M 0.4;
  3771. /D;
  3772. SQRT;
  3773. TAR2;
  3774. LEAVE;
  3775. FR Z 42;
  3776. TAD;
  3777. L 0;
  3778. CLR;
  3779. SPBIN AALS;
  3780. AALS: NOP 0;
  3781. S M 0.4;
  3782. O FALSE;
  3783. SQRT;
  3784. +R;
  3785. MOD;
  3786. PUSH;
  3787. SLW;
  3788. O(;
  3789. );
  3790. O M 0.4;
  3791. >=R;
  3792. NOT;
  3793. RLDA;
  3794. ATAN;
  3795. L 0;
  3796. CLR;
  3797. SPMZ AALT;
  3798. AALT: NOP 0;
  3799. LEAVE;
  3800. SAVE;
  3801. OW;
  3802. X FALSE;
  3803. NEGD;
  3804. INC 0;
  3805. SLW;
  3806. L 0;
  3807. CLR;
  3808. SPA AALU;
  3809. AALU: NOP 0;
  3810. XN FALSE;
  3811. L 0;
  3812. CLR;
  3813. SPB AALV;
  3814. AALV: NOP 0;
  3815. XOD;
  3816. LEAVE;
  3817. O FALSE;
  3818. L 0;
  3819. CLR;
  3820. SPN AALW;
  3821. AALW: NOP 0;
  3822. X M 0.4;
  3823. NEGI;
  3824. NOP 0;
  3825. <D;
  3826. ABS;
  3827. R M 0.4;
  3828. L 0;
  3829. CLR;
  3830. SPBIN AALX;
  3831. AALX: NOP 0;
  3832. >R;
  3833. LEAVE;
  3834. RND-;
  3835. INC 0;
  3836. *R;
  3837. OD;
  3838. L 0;
  3839. CLR;
  3840. SPMZ AALY;
  3841. AALY: NOP 0;
  3842. -R;
  3843. >D;
  3844. S M 0.4;
  3845. RRDA;
  3846. -I;
  3847. UN(;
  3848. );
  3849. FN M 0.4;
  3850. ATAN;
  3851. TRUNC;
  3852. R M 0.4;
  3853. +I;
  3854. CC FC 43;
  3855. CALL FB 45, DB 45;
  3856. CALL FB 45, DB 45;
  3857. CALL FB 45, DB 45;
  3858. ABS;
  3859. L 0;
  3860. CLR;
  3861. SPPZ AALZ;
  3862. AALZ: NOP 0;
  3863. UN TRUE;
  3864. TAR;
  3865. RLD;
  3866. RND;
  3867. + 0;
  3868. PUSH;
  3869. MOD;
  3870. ACOS;
  3871. L 0;
  3872. BTD;
  3873. BLD 0;
  3874. +R;
  3875. NOT;
  3876. L 0;
  3877. CLR;
  3878. SPBI AAMA;
  3879. AAMA: NOP 0;
  3880. L DW#16#B68E47FA;
  3881. NOT;
  3882. TDB;
  3883. ==R;
  3884. +R;
  3885. ==R;
  3886. *R;
  3887. L 0;
  3888. CLR;
  3889. SPP AAMB;
  3890. AAMB: NOP 0;
  3891. +D;
  3892. ==I;
  3893. CLR;
  3894. UN M 0.4;
  3895. L 0;
  3896. CLR;
  3897. SPS AAMC;
  3898. AAMC: NOP 0;
  3899. LAR2;
  3900. +D;
  3901. L 0;
  3902. CLR;
  3903. SPA AAMD;
  3904. AAMD: NOP 0;
  3905. FP M 0.4;
  3906. ==D;
  3907. SET;
  3908. L 0;
  3909. BTD;
  3910. ACOS;
  3911. T MD 0;
  3912. POP;
  3913. POP;
  3914. L 0;
  3915. SE T 42;
  3916. EXP;
  3917. FP M 0.4;
  3918. U FALSE;
  3919. /I;
  3920. PUSH;
  3921. CLR;
  3922. CALL FB 45, DB 45;
  3923. CALL FB 45, DB 45;
  3924. CALL FB 45, DB 45;
  3925. SET;
  3926. L 0;
  3927. CLR;
  3928. SPPZ AAME;
  3929. AAME: NOP 0;
  3930. -R;
  3931. ON M 0.4;
  3932. L 0;
  3933. CLR;
  3934. SPBNB AAMF;
  3935. AAMF: NOP 0;
  3936. LN;
  3937. *R;
  3938. NOT;
  3939. ENT;
  3940. FR Z 42;
  3941. DEC 0;
  3942. L 0;
  3943. SA T 42;
  3944. >=R;
  3945. +R;
  3946. >=R;
  3947. >D;
  3948. TDB;
  3949. L 0;
  3950. CLR;
  3951. SPO AAMG;
  3952. AAMG: NOP 0;
  3953. TDB;
  3954. RRD;
  3955. >=D;
  3956. X(;
  3957. );
  3958. <R;
  3959. ATAN;
  3960. L 0;
  3961. L 0;
  3962. CLR;
  3963. SPL AAMH;
  3964. AAMH: NOP 0;
  3965. COS;
  3966. L 0;
  3967. CLR;
  3968. SPBIN AAMI;
  3969. AAMI: NOP 0;
  3970. SLD;
  3971. R M 0.4;
  3972. +D;
  3973. LC MW 0;
  3974. L DW#16#9DDE0188;
  3975. TAR2;
  3976. ==I;
  3977. <>D;
  3978. L 0;
  3979. CLR;
  3980. SPO AAMJ;
  3981. AAMJ: NOP 0;
  3982. UN M 0.4;
  3983. ABS;
  3984. L 0;
  3985. CLR;
  3986. SPU AAMK;
  3987. AAMK: NOP 0;
  3988. +R;
  3989. L 0;
  3990. CLR;
  3991. SPMZ AAML;
  3992. AAML: NOP 0;
  3993. LAR1;
  3994. L 0;
  3995. CLR;
  3996. SPU AAMM;
  3997. AAMM: NOP 0;
  3998. ACOS;
  3999. CALL FB 45, DB 45;
  4000. CALL FB 45, DB 45;
  4001. CALL FB 45, DB 45;
  4002. <>D;
  4003. L 0;
  4004. CLR;
  4005. SPBIN AAMN;
  4006. AAMN: NOP 0;
  4007. L 0;
  4008. CLR;
  4009. SPM AAMO;
  4010. AAMO: NOP 0;
  4011. CC FC 43;
  4012. INVI;
  4013. SRW;
  4014. L 0;
  4015. CLR;
  4016. SPN AAMP;
  4017. AAMP: NOP 0;
  4018. L 0;
  4019. BTI;
  4020. ABS;
  4021. L 0;
  4022. CLR;
  4023. SPP AAMQ;
  4024. AAMQ: NOP 0;
  4025. L 0;
  4026. CLR;
  4027. SPBNB AAMR;
  4028. AAMR: NOP 0;
  4029. RLD;
  4030. +AR1;
  4031. FR Z 42;
  4032. L 0;
  4033. CLR;
  4034. SPPZ AAMS;
  4035. AAMS: NOP 0;
  4036. MOD;
  4037. L 0;
  4038. CLR;
  4039. SPB AAMT;
  4040. AAMT: NOP 0;
  4041. /R;
  4042. -D;
  4043. >I;
  4044. LEAVE;
  4045. INVI;
  4046. CALL FC 42;
  4047. CALL FC 42;
  4048. CALL FC 42;
  4049. XOD;
  4050. ITB;
  4051. TAK;
  4052. U TRUE;
  4053. NEGI;
  4054. LAR1;
  4055. L 0;
  4056. CLR;
  4057. SPBNB AAMU;
  4058. AAMU: NOP 0;
  4059. XN(;
  4060. );
  4061. EXP;
  4062. RLDA;
  4063. >D;
  4064. L 0;
  4065. CLR;
  4066. SPO AAMV;
  4067. AAMV: NOP 0;
  4068. RND-;
  4069. LC MW 0;
  4070. ==R;
  4071. TAN;
  4072. MOD;
  4073. = M 0.4;
  4074. T MD 0;
  4075. SET;
  4076. SRW;
  4077. BLD 0;
  4078. SQR;
  4079. XOW;
  4080. L 0;
  4081. SI T 42;
  4082. COS;
  4083. XOD;
  4084. ON TRUE;
  4085. UD;
  4086. CALL FB 45, DB 45;
  4087. CALL FB 45, DB 45;
  4088. CALL FB 45, DB 45;
  4089. NOT;
  4090. ==I;
  4091. L DW#16#5AE1DBAD;
  4092. L MW 50;
  4093. + 1;
  4094. T MW 50;
  4095. T AW 0;
  4096. XN TRUE;
  4097. L 0;
  4098. CLR;
  4099. SPMZ AAMW;
  4100. AAMW: NOP 0;
  4101. ACOS;
  4102. ==I;
  4103. O M 0.4;
  4104. FN M 0.4;
  4105. ZR Z 42;
  4106. TAW;
  4107. L 0;
  4108. SV T 42;
  4109. L 0;
  4110. SS T 42;
  4111. POP;
  4112. +AR2;
  4113. +AR1;
  4114. TAW;
  4115. T MD 0;
  4116. /D;
  4117. /R;
  4118. MCR(;
  4119. MCRA;
  4120. MCRD;
  4121. )MCR;
  4122. NOP 0;
  4123. RRDA;
  4124. <=D;
  4125. -I;
  4126. U TRUE;
  4127. FP M 0.4;
  4128. L 0;
  4129. CLR;
  4130. SPBI AAMX;
  4131. AAMX: NOP 0;
  4132. SIN;
  4133. NOT;
  4134. >I;
  4135. <D;
  4136. *I;
  4137. L 0;
  4138. CLR;
  4139. SPZ AAMY;
  4140. AAMY: NOP 0;
  4141. +I;
  4142. TAR1;
  4143. INVD;
  4144. L 0;
  4145. SA T 42;
  4146. SLD;
  4147. *I;
  4148. SLW;
  4149. SAVE;
  4150. LAR1;
  4151. TAR;
  4152. L 0;
  4153. CLR;
  4154. SPP AAMZ;
  4155. AAMZ: NOP 0;
  4156. XN(;
  4157. );
  4158. L 0;
  4159. CLR;
  4160. SPBIN AANA;
  4161. AANA: NOP 0;
  4162. XN FALSE;
  4163. XN M 0.4;
  4164. +I;
  4165. ==I;
  4166. <R;
  4167. FR Z 42;
  4168. L 0;
  4169. SS T 42;
  4170. <=R;
  4171. PUSH;
  4172. <>R;
  4173. L 0;
  4174. CLR;
  4175. SPMZ AANB;
  4176. AANB: NOP 0;
  4177. ENT;
  4178. ASIN;
  4179. MCR(;
  4180. MCRA;
  4181. MCRD;
  4182. )MCR;
  4183. TRUNC;
  4184. SQRT;
  4185. L 0;
  4186. BTD;
  4187. L 0;
  4188. BTD;
  4189. ACOS;
  4190. ABS;
  4191. UN FALSE;
  4192. TAR;
  4193. CALL FC 42;
  4194. CALL FC 42;
  4195. CALL FC 42;
  4196. ASIN;
  4197. *R;
  4198. UN M 0.4;
  4199. NEGD;
  4200. INVD;
  4201. L 0;
  4202. CLR;
  4203. SPB AANC;
  4204. AANC: NOP 0;
  4205. X(;
  4206. );
  4207. +AR1;
  4208. FP M 0.4;
  4209. UD;
  4210. L 0;
  4211. BTD;
  4212. -D;
  4213. L 0;
  4214. CLR;
  4215. SPPZ AAND;
  4216. AAND: NOP 0;
  4217. DTR;
  4218. TAR2;
  4219. >I;
  4220. AUF DB 42;
  4221. RLD;
  4222. OW;
  4223. L 0;
  4224. CLR;
  4225. SPN AANE;
  4226. AANE: NOP 0;
  4227. CALL FB 45, DB 45;
  4228. CALL FB 45, DB 45;
  4229. CALL FB 45, DB 45;
  4230. *R;
  4231. L MW 50;
  4232. + 1;
  4233. T MW 50;
  4234. T AW 0;
  4235. /R;
  4236. NOP 0;
  4237. >I;
  4238. *I;
  4239. /I;
  4240. TAR2;
  4241. <=R;
  4242. L 0;
  4243. CLR;
  4244. SPBIN AANF;
  4245. AANF: NOP 0;
  4246. CALL FC 42;
  4247. CALL FC 42;
  4248. CALL FC 42;
  4249. NOT;
  4250. <>D;
  4251. L 0;
  4252. CLR;
  4253. SPN AANG;
  4254. AANG: NOP 0;
  4255. <I;
  4256. RND-;
  4257. L 0;
  4258. CLR;
  4259. SPS AANH;
  4260. AANH: NOP 0;
  4261. >I;
  4262. ITB;
  4263. /D;
  4264. <D;
  4265. L 0;
  4266. SV T 42;
  4267. *R;
  4268. COS;
  4269. CALL FB 45, DB 45;
  4270. CALL FB 45, DB 45;
  4271. CALL FB 45, DB 45;
  4272. >D;
  4273. +AR1;
  4274. -R;
  4275. TAN;
  4276. L 0;
  4277. BTD;
  4278. SRD;
  4279. UD;
  4280. <=R;
  4281. POP;
  4282. <R;
  4283. RLD;
  4284. L 0;
  4285. CLR;
  4286. SPBB AANI;
  4287. AANI: NOP 0;
  4288. >D;
  4289. L 0;
  4290. BTD;
  4291. L 0;
  4292. CLR;
  4293. SPN AANJ;
  4294. AANJ: NOP 0;
  4295. TAR;
  4296. UN(;
  4297. );
  4298. + 0;
  4299. O M 0.4;
  4300. SRD;
  4301. <>D;
  4302. DTB;
  4303. -R;
  4304. ENT;
  4305. L 0;
  4306. SI T 42;
  4307. RRD;
  4308. EXP;
  4309. RLD;
  4310. SIN;
  4311. LAR2;
  4312. RLD;
  4313. <R;
  4314. NOT;
  4315. LEAVE;
  4316. UN FALSE;
  4317. L 0;
  4318. CLR;
  4319. SPBNB AANK;
  4320. AANK: NOP 0;
  4321. O TRUE;
  4322. TAD;
  4323. UD;
  4324. L 0;
  4325. CLR;
  4326. SPBB AANL;
  4327. AANL: NOP 0;
  4328. >=R;
  4329. TAR2;
  4330. LEAVE;
  4331. RRD;
  4332. TAK;
  4333. L 0;
  4334. SV T 42;
  4335. <>I;
  4336. DEC 0;
  4337. >I;
  4338. TDB;
  4339. XOD;
  4340. -D;
  4341. OD;
  4342. X TRUE;
  4343. XOD;
  4344. NEGR;
  4345. TAN;
  4346. FP M 0.4;
  4347. L DW#16#FFD2F491;
  4348. TAR;
  4349. AUF DB 42;
  4350. *I;
  4351. SET;
  4352. LAR1;
  4353. <I;
  4354. RND+;
  4355. NEGI;
  4356. NOP 0;
  4357. *I;
  4358. L MW 50;
  4359. + 1;
  4360. T MW 50;
  4361. T AW 0;
  4362. ASIN;
  4363. <R;
  4364. >D;
  4365. INVD;
  4366. INVD;
  4367. ON(;
  4368. );
  4369. INC 0;
  4370. *I;
  4371. XOW;
  4372. L 0;
  4373. CLR;
  4374. SPB AANM;
  4375. AANM: NOP 0;
  4376. CALL FB 45, DB 45;
  4377. CALL FB 45, DB 45;
  4378. CALL FB 45, DB 45;
  4379. UD;
  4380. >=R;
  4381. L 0;
  4382. CLR;
  4383. SPM AANN;
  4384. AANN: NOP 0;
  4385. L 0;
  4386. CLR;
  4387. SPBNB AANO;
  4388. AANO: NOP 0;
  4389. L 0;
  4390. CLR;
  4391. SPBNB AANP;
  4392. AANP: NOP 0;
  4393. DEC 0;
  4394. TDB;
  4395. L 0;
  4396. SE T 42;
  4397. SAVE;
  4398. <>D;
  4399. LN;
  4400. ON(;
  4401. );
  4402. L 0;
  4403. L 0;
  4404. CLR;
  4405. SPL AANQ;
  4406. AANQ: NOP 0;
  4407. <=I;
  4408. ==D;
  4409. L DW#16#64880945;
  4410. <D;
  4411. +AR1;
  4412. TDB;
  4413. SIN;
  4414. MOD;
  4415. TAR;
  4416. R M 0.4;
  4417. CLR;
  4418. SQRT;
  4419. L 0;
  4420. SE T 42;
  4421. L 0;
  4422. CLR;
  4423. SPB AANR;
  4424. AANR: NOP 0;
  4425. *D;
  4426. TAR1;
  4427. SRD;
  4428. L 0;
  4429. CLR;
  4430. SPPZ AANS;
  4431. AANS: NOP 0;
  4432. +AR2;
  4433. U M 0.4;
  4434. CLR;
  4435. TAR2;
  4436. + 0;
  4437. X(;
  4438. );
  4439. XOW;
  4440. ABS;
  4441. NEGR;
  4442. ASIN;
  4443. NEGD;
  4444. RRD;
  4445. TDB;
  4446. L 0;
  4447. CLR;
  4448. SPM AANT;
  4449. AANT: NOP 0;
  4450. L 0;
  4451. CLR;
  4452. SPBN AANU;
  4453. AANU: NOP 0;
  4454. L 0;
  4455. CLR;
  4456. LOOP AANV;
  4457. AANV: NOP 0;
  4458. TAK;
  4459. +AR1;
  4460. ==D;
  4461. LEAVE;
  4462. SRD;
  4463. +I;
  4464. U(;
  4465. );
  4466. XN FALSE;
  4467. TAR2;
  4468. X M 0.4;
  4469. >=I;
  4470. <>R;
  4471. LAR1;
  4472. TAR1;
  4473. U M 0.4;
  4474. ASIN;
  4475. INVI;
  4476. ==D;
  4477. L 0;
  4478. CLR;
  4479. SPO AANW;
  4480. AANW: NOP 0;
  4481. <>R;
  4482. L 0;
  4483. L 0;
  4484. CLR;
  4485. SPL AANX;
  4486. AANX: NOP 0;
  4487. CLR;
  4488. +D;
  4489. LC MW 0;
  4490. NOT;
  4491. /D;
  4492. <R;
  4493. UN(;
  4494. );
  4495. ABS;
  4496. L 0;
  4497. CLR;
  4498. SPS AANY;
  4499. AANY: NOP 0;
  4500. TRUNC;
  4501. ASIN;
  4502. CLR;
  4503. SAVE;
  4504. U M 0.4;
  4505. NEGD;
  4506. SRW;
  4507. R M 0.4;
  4508. ==D;
  4509. CALL FC 42;
  4510. CALL FC 42;
  4511. CALL FC 42;
  4512. TAD;
  4513. L 0;
  4514. SS T 42;
  4515. LAR2;
  4516. O M 0.4;
  4517. O M 0.4;
  4518. +I;
  4519. <I;
  4520. TAN;
  4521. ==D;
  4522. SRW;
  4523. = M 0.4;
  4524. RND;
  4525. -R;
  4526. SET;
  4527. FP M 0.4;
  4528. FP M 0.4;
  4529. L 0;
  4530. CLR;
  4531. SPN AANZ;
  4532. AANZ: NOP 0;
  4533. *D;
  4534. L 0;
  4535. CLR;
  4536. SPBIN AAOA;
  4537. AAOA: NOP 0;
  4538. >D;
  4539. +R;
  4540. <>D;
  4541. <D;
  4542. XN(;
  4543. );
  4544. OW;
  4545. LEAVE;
  4546. O M 0.4;
  4547. L MW 50;
  4548. + 1;
  4549. T MW 50;
  4550. T AW 0;
  4551. <R;
  4552. LAR1;
  4553. *I;
  4554. NEGD;
  4555. <=D;
  4556. LN;
  4557. LAR2;
  4558. NEGR;
  4559. SET;
  4560. FN M 0.4;
  4561. >D;
  4562. >=I;
  4563. NOP 0;
  4564. -R;
  4565. *I;
  4566. ASIN;
  4567. L 0;
  4568. CLR;
  4569. SPN AAOB;
  4570. AAOB: NOP 0;
  4571. >D;
  4572. L DW#16#159152F2;
  4573. PUSH;
  4574. SET;
  4575. SET;
  4576. UC FC 44;
  4577. L 0;
  4578. CLR;
  4579. SPBN AAOC;
  4580. AAOC: NOP 0;
  4581. U TRUE;
  4582. INVD;
  4583. L 0;
  4584. SS T 42;
  4585. UC FC 44;
  4586. L 0;
  4587. SV T 42;
  4588. ITD;
  4589. /R;
  4590. L 0;
  4591. CLR;
  4592. SPBI AAOD;
  4593. AAOD: NOP 0;
  4594. UN(;
  4595. );
  4596. RND-;
  4597. RRD;
  4598. -R;
  4599. <>I;
  4600. RND-;
  4601. RLDA;
  4602. CALL FB 45, DB 45;
  4603. CALL FB 45, DB 45;
  4604. CALL FB 45, DB 45;
  4605. = M 0.4;
  4606. OW;
  4607. ON M 0.4;
  4608. +D;
  4609. L 0;
  4610. CLR;
  4611. SPP AAOE;
  4612. AAOE: NOP 0;
  4613. ==D;
  4614. *R;
  4615. INC 0;
  4616. COS;
  4617. -D;
  4618. XOD;
  4619. <=R;
  4620. SSD;
  4621. = M 0.4;
  4622. X M 0.4;
  4623. NOP 0;
  4624. XN(;
  4625. );
  4626. ON M 0.4;
  4627. AUF DB 42;
  4628. NEGR;
  4629. X FALSE;
  4630. ABS;
  4631. L 0;
  4632. SI T 42;
  4633. L 0;
  4634. CLR;
  4635. SPBB AAOF;
  4636. AAOF: NOP 0;
  4637. RRDA;
  4638. SIN;
  4639. TAN;
  4640. SQR;
  4641. NOT;
  4642. UD;
  4643. UD;
  4644. ==R;
  4645. L 0;
  4646. CLR;
  4647. SPB AAOG;
  4648. AAOG: NOP 0;
  4649. NOT;
  4650. L 0;
  4651. CLR;
  4652. SPZ AAOH;
  4653. AAOH: NOP 0;
  4654. S M 0.4;
  4655. L 0;
  4656. SV T 42;
  4657. INVD;
  4658. ==R;
  4659. UD;
  4660. L 0;
  4661. CLR;
  4662. SPPZ AAOI;
  4663. AAOI: NOP 0;
  4664. /R;
  4665. NOP 0;
  4666. X(;
  4667. );
  4668. L 0;
  4669. CLR;
  4670. SPZ AAOJ;
  4671. AAOJ: NOP 0;
  4672. ATAN;
  4673. RND-;
  4674. O(;
  4675. );
  4676. FR Z 42;
  4677. SET;
  4678. ATAN;
  4679. >I;
  4680. TAR1;
  4681. L MW 50;
  4682. + 1;
  4683. T MW 50;
  4684. T AW 0;
  4685. UC FC 44;
  4686. O(;
  4687. );
  4688. L 0;
  4689. CLR;
  4690. SPZ AAOK;
  4691. AAOK: NOP 0;
  4692. <=R;
  4693. <I;
  4694. ON M 0.4;
  4695. >D;
  4696. O M 0.4;
  4697. >R;
  4698. RLDA;
  4699. -I;
  4700. L 0;
  4701. SA T 42;
  4702. L 0;
  4703. SS T 42;
  4704. ZR Z 42;
  4705. <R;
  4706. /D;
  4707. <=I;
  4708. TDB;
  4709. <I;
  4710. UN TRUE;
  4711. ASIN;
  4712. L 0;
  4713. CLR;
  4714. SPA AAOL;
  4715. AAOL: NOP 0;
  4716. UW;
  4717. X(;
  4718. );
  4719. AUF DB 42;
  4720. +AR1;
  4721. R M 0.4;
  4722. RLDA;
  4723. TAR1;
  4724. L 0;
  4725. SV T 42;
  4726. +D;
  4727. O(;
  4728. );
  4729. RLDA;
  4730. INC 0;
  4731. <R;
  4732. *D;
  4733. <>R;
  4734. ZV Z 42;
  4735. FP M 0.4;
  4736. DEC 0;
  4737. >I;
  4738. RND;
  4739. L 0;
  4740. SV T 42;
  4741. U M 0.4;
  4742. XN FALSE;
  4743. FR Z 42;
  4744. XN TRUE;
  4745. -D;
  4746. -R;
  4747. <=D;
  4748. L 0;
  4749. BTI;
  4750. ON TRUE;
  4751. TAD;
  4752. L 0;
  4753. CLR;
  4754. SPM AAOM;
  4755. AAOM: NOP 0;
  4756. L DW#16#B864CA08;
  4757. L 0;
  4758. CLR;
  4759. SPA AAON;
  4760. AAON: NOP 0;
  4761. R M 0.4;
  4762. DEC 0;
  4763. /D;
  4764. <I;
  4765. RRDA;
  4766. UN(;
  4767. );
  4768. L 0;
  4769. BTI;
  4770. TAD;
  4771. L 0;
  4772. SS T 42;
  4773. XN TRUE;
  4774. XN(;
  4775. );
  4776. SSI;
  4777. L 0;
  4778. CLR;
  4779. SPBN AAOO;
  4780. AAOO: NOP 0;
  4781. L 0;
  4782. CLR;
  4783. SPZ AAOP;
  4784. AAOP: NOP 0;
  4785. L 0;
  4786. CLR;
  4787. SPPZ AAOQ;
  4788. AAOQ: NOP 0;
  4789. SET;
  4790. PUSH;
  4791. TAR1;
  4792. O M 0.4;
  4793. *D;
  4794. INVI;
  4795. L 0;
  4796. CLR;
  4797. SPBNB AAOR;
  4798. AAOR: NOP 0;
  4799. LEAVE;
  4800. L 0;
  4801. CLR;
  4802. SPO AAOS;
  4803. AAOS: NOP 0;
  4804. FR Z 42;
  4805. MCR(;
  4806. MCRA;
  4807. MCRD;
  4808. )MCR;
  4809. *D;
  4810. CALL FC 42;
  4811. CALL FC 42;
  4812. CALL FC 42;
  4813. RRD;
  4814. DTR;
  4815. XOD;
  4816. FR Z 42;
  4817. <=D;
  4818. UN M 0.4;
  4819. EXP;
  4820. U FALSE;
  4821. OD;
  4822. -I;
  4823. O M 0.4;
  4824. L 0;
  4825. CLR;
  4826. SPU AAOT;
  4827. AAOT: NOP 0;
  4828. U M 0.4;
  4829. MOD;
  4830. L 0;
  4831. CLR;
  4832. SPS AAOU;
  4833. AAOU: NOP 0;
  4834. FP M 0.4;
  4835. INVD;
  4836. OW;
  4837. RND+;
  4838. COS;
  4839. RLD;
  4840. ON(;
  4841. );
  4842. <D;
  4843. L 0;
  4844. CLR;
  4845. SPB AAOV;
  4846. AAOV: NOP 0;
  4847. CLR;
  4848. XN FALSE;
  4849. L 0;
  4850. SA T 42;
  4851. LN;
  4852. /D;
  4853. TAR2;
  4854. NOT;
  4855. +AR2;
  4856. SAVE;
  4857. L 0;
  4858. SI T 42;
  4859. <>D;
  4860. /R;
  4861. R M 0.4;
  4862. CALL FC 42;
  4863. CALL FC 42;
  4864. CALL FC 42;
  4865. INC 0;
  4866. ON(;
  4867. );
  4868. ATAN;
  4869. ==D;
  4870. RND+;
  4871. L 0;
  4872. CLR;
  4873. SPBNB AAOW;
  4874. AAOW: NOP 0;
  4875. ZR Z 42;
  4876. L 0;
  4877. CLR;
  4878. SPN AAOX;
  4879. AAOX: NOP 0;
  4880. /R;
  4881. L 0;
  4882. CLR;
  4883. SPPZ AAOY;
  4884. AAOY: NOP 0;
  4885. L 0;
  4886. CLR;
  4887. SPP AAOZ;
  4888. AAOZ: NOP 0;
  4889. TAR;
  4890. L 0;
  4891. CLR;
  4892. SPA AAPA;
  4893. AAPA: NOP 0;
  4894. TRUNC;
  4895. R M 0.4;
  4896. INVI;
  4897. <>D;
  4898. BLD 0;
  4899. ==I;
  4900. ==R;
  4901. ==I;
  4902. <R;
  4903. TAR;
  4904. SSI;
  4905. L 0;
  4906. CLR;
  4907. SPN AAPB;
  4908. AAPB: NOP 0;
  4909. EXP;
  4910. <I;
  4911. UD;
  4912. + 0;
  4913. NEGI;
  4914. TAR;
  4915. L 0;
  4916. CLR;
  4917. SPS AAPC;
  4918. AAPC: NOP 0;
  4919. MCR(;
  4920. MCRA;
  4921. MCRD;
  4922. )MCR;
  4923. AUF DB 42;
  4924. <I;
  4925. CLR;
  4926. <>R;
  4927. L 0;
  4928. CLR;
  4929. SPO AAPD;
  4930. AAPD: NOP 0;
  4931. CC FC 43;
  4932. X FALSE;
  4933. L 0;
  4934. CLR;
  4935. SPPZ AAPE;
  4936. AAPE: NOP 0;
  4937. >=D;
  4938. CLR;
  4939. L DW#16#F7E9101D;
  4940. ABS;
  4941. L 0;
  4942. SE T 42;
  4943. U(;
  4944. );
  4945. L 0;
  4946. CLR;
  4947. SPBIN AAPF;
  4948. AAPF: NOP 0;
  4949. ZR Z 42;
  4950. <=R;
  4951. UN TRUE;
  4952. TAR;
  4953. POP;
  4954. TAK;
  4955. L DW#16#183FEA70;
  4956. FP M 0.4;
  4957. >D;
  4958. >=I;
  4959. ON M 0.4;
  4960. ON(;
  4961. );
  4962. TAW;
  4963. ==D;
  4964. DTR;
  4965. SQR;
  4966. /D;
  4967. NOT;
  4968. BLD 0;
  4969. NOP 0;
  4970. ZR Z 42;
  4971. R M 0.4;
  4972. XN M 0.4;
  4973. X(;
  4974. );
  4975. DTR;
  4976. LAR2;
  4977. <=I;
  4978. CLR;
  4979. L 0;
  4980. CLR;
  4981. SPMZ AAPG;
  4982. AAPG: NOP 0;
  4983. >=I;
  4984. X TRUE;
  4985. U(;
  4986. );
  4987. >=R;
  4988. DEC 0;
  4989. ACOS;
  4990. ABS;
  4991. RLDA;
  4992. UN TRUE;
  4993. ASIN;
  4994. <=R;
  4995. /I;
  4996. NEGD;
  4997. L 0;
  4998. BTD;
  4999. L 0;
  5000. L 0;
  5001. CLR;
  5002. SPL AAPH;
  5003. AAPH: NOP 0;
  5004. L 0;
  5005. CLR;
  5006. SPB AAPI;
  5007. AAPI: NOP 0;
  5008. T MD 0;
  5009. <=D;
  5010. O FALSE;
  5011. L 0;
  5012. CLR;
  5013. SPBI AAPJ;
  5014. AAPJ: NOP 0;
  5015. RLDA;
  5016. LN;
  5017. TAK;
  5018. SRW;
  5019. ON(;
  5020. );
  5021. SET;
  5022. L 0;
  5023. CLR;
  5024. SPB AAPK;
  5025. AAPK: NOP 0;
  5026. -R;
  5027. >D;
  5028. COS;
  5029. INVI;
  5030. UW;
  5031. L DW#16#CB7B0B3A;
  5032. +R;
  5033. + 0;
  5034. SRW;
  5035. XOD;
  5036. SRD;
  5037. -I;
  5038. LEAVE;
  5039. RRDA;
  5040. L 0;
  5041. CLR;
  5042. SPM AAPL;
  5043. AAPL: NOP 0;
  5044. *R;
  5045. L 0;
  5046. CLR;
  5047. SPA AAPM;
  5048. AAPM: NOP 0;
  5049. ITB;
  5050. U TRUE;
  5051. CALL FB 45, DB 45;
  5052. CALL FB 45, DB 45;
  5053. CALL FB 45, DB 45;
  5054. TAW;
  5055. UN TRUE;
  5056. O(;
  5057. );
  5058. SSD;
  5059. OW;
  5060. + 0;
  5061. BLD 0;
  5062. TRUNC;
  5063. <>R;
  5064. FN M 0.4;
  5065. L DW#16#A8284442;
  5066. TDB;
  5067. XOW;
  5068. O(;
  5069. );
  5070. TAW;
  5071. +AR1;
  5072. *R;
  5073. /I;
  5074. <=R;
  5075. L 0;
  5076. BTI;
  5077. RND+;
  5078. CALL FC 42;
  5079. CALL FC 42;
  5080. CALL FC 42;
  5081. L 0;
  5082. CLR;
  5083. SPP AAPN;
  5084. AAPN: NOP 0;
  5085. + 0;
  5086. CALL FC 42;
  5087. CALL FC 42;
  5088. CALL FC 42;
  5089. UN TRUE;
  5090. INC 0;
  5091. LEAVE;
  5092. <D;
  5093. LEAVE;
  5094. ITD;
  5095. RRD;
  5096. OD;
  5097. L 0;
  5098. CLR;
  5099. SPZ AAPO;
  5100. AAPO: NOP 0;
  5101. <=R;
  5102. RLD;
  5103. ON FALSE;
  5104. O(;
  5105. );
  5106. TRUNC;
  5107. CC FC 43;
  5108. TAW;
  5109. XN M 0.4;
  5110. UW;
  5111. SRW;
  5112. U M 0.4;
  5113. L 0;
  5114. CLR;
  5115. SPMZ AAPP;
  5116. AAPP: NOP 0;
  5117. INVI;
  5118. ==D;
  5119. +I;
  5120. L 0;
  5121. BTI;
  5122. L 0;
  5123. CLR;
  5124. SPM AAPQ;
  5125. AAPQ: NOP 0;
  5126. ON(;
  5127. );
  5128. XN M 0.4;
  5129. >=D;
  5130. NOP 0;
  5131. <D;
  5132. <>I;
  5133. UW;
  5134. -D;
  5135. = M 0.4;
  5136. /D;
  5137. ABS;
  5138. NOP 0;
  5139. FN M 0.4;
  5140. L 0;
  5141. CLR;
  5142. LOOP AAPR;
  5143. AAPR: NOP 0;
  5144. L 0;
  5145. CLR;
  5146. SPO AAPS;
  5147. AAPS: NOP 0;
  5148. L 0;
  5149. CLR;
  5150. SPM AAPT;
  5151. AAPT: NOP 0;
  5152. <>D;
  5153. <>R;
  5154. ATAN;
  5155. SRD;
  5156. L 0;
  5157. CLR;
  5158. SPP AAPU;
  5159. AAPU: NOP 0;
  5160. <=R;
  5161. ENT;
  5162. + 0;
  5163. TAD;
  5164. NOP 0;
  5165. <=R;
  5166. MOD;
  5167. L 0;
  5168. CLR;
  5169. SPS AAPV;
  5170. AAPV: NOP 0;
  5171. L 0;
  5172. CLR;
  5173. SPBI AAPW;
  5174. AAPW: NOP 0;
  5175. <=I;
  5176. L 0;
  5177. BTI;
  5178. U M 0.4;
  5179. DEC 0;
  5180. /R;
  5181. INC 0;
  5182. O FALSE;
  5183. CC FC 43;
  5184. L 0;
  5185. CLR;
  5186. SPP AAPX;
  5187. AAPX: NOP 0;
  5188. L MW 50;
  5189. + 1;
  5190. T MW 50;
  5191. T AW 0;
  5192. TAW;
  5193. LEAVE;
  5194. FP M 0.4;
  5195. RLDA;
  5196. <D;
  5197. L 0;
  5198. CLR;
  5199. SPMZ AAPY;
  5200. AAPY: NOP 0;
  5201. R M 0.4;
  5202. RND+;
  5203. -I;
  5204. L 0;
  5205. CLR;
  5206. SPP AAPZ;
  5207. AAPZ: NOP 0;
  5208. <R;
  5209. SET;
  5210. L 0;
  5211. CLR;
  5212. SPU AAQA;
  5213. AAQA: NOP 0;
  5214. T MD 0;
  5215. O M 0.4;
  5216. AUF DB 42;
  5217. NEGI;
  5218. L DW#16#B173FCDF;
  5219. *I;
  5220. ZV Z 42;
  5221. ==I;
  5222. U M 0.4;
  5223. U(;
  5224. );
  5225. -R;
  5226. LAR1;
  5227. COS;
  5228. <R;
  5229. LN;
  5230. RRD;
  5231. MOD;
  5232. *I;
  5233. XOD;
  5234. MOD;
  5235. FN M 0.4;
  5236. SRW;
  5237. +AR1;
  5238. TAD;
  5239. >R;
  5240. TAR;
  5241. = M 0.4;
  5242. O TRUE;
  5243. XN M 0.4;
  5244. L 0;
  5245. CLR;
  5246. SPP AAQB;
  5247. AAQB: NOP 0;
  5248. ZR Z 42;
  5249. FP M 0.4;
  5250. = M 0.4;
  5251. +I;
  5252. >=R;
  5253. MOD;
  5254. >R;
  5255. R M 0.4;
  5256. TAK;
  5257. CLR;
  5258. L 0;
  5259. CLR;
  5260. LOOP AAQC;
  5261. AAQC: NOP 0;
  5262. CALL FB 45, DB 45;
  5263. CALL FB 45, DB 45;
  5264. CALL FB 45, DB 45;
  5265. SLD;
  5266. UN TRUE;
  5267. <R;
  5268. UC FC 44;
  5269. ATAN;
  5270. <>R;
  5271. UN(;
  5272. );
  5273. FN M 0.4;
  5274. L 0;
  5275. CLR;
  5276. SPMZ AAQD;
  5277. AAQD: NOP 0;
  5278. INVD;
  5279. ITD;
  5280. EXP;
  5281. PUSH;
  5282. OD;
  5283. AUF DB 42;
  5284. L 0;
  5285. CLR;
  5286. SPBN AAQE;
  5287. AAQE: NOP 0;
  5288. L 0;
  5289. CLR;
  5290. SPBIN AAQF;
  5291. AAQF: NOP 0;
  5292. RND+;
  5293. SAVE;
  5294. U(;
  5295. );
  5296. /R;
  5297. DEC 0;
  5298. TAK;
  5299. RLD;
  5300. ==R;
  5301. UN(;
  5302. );
  5303. +D;
  5304. U M 0.4;
  5305. ASIN;
  5306. SET;
  5307. L 0;
  5308. CLR;
  5309. SPBI AAQG;
  5310. AAQG: NOP 0;
  5311. SET;
  5312. SRW;
  5313. INVI;
  5314. SAVE;
  5315. U FALSE;
  5316. >=R;
  5317. L 0;
  5318. CLR;
  5319. SPBNB AAQH;
  5320. AAQH: NOP 0;
  5321. S M 0.4;
  5322. SLW;
  5323. >I;
  5324. L 0;
  5325. CLR;
  5326. SPS AAQI;
  5327. AAQI: NOP 0;
  5328. ABS;
  5329. SSD;
  5330. RLD;
  5331. AUF DB 42;
  5332. CLR;
  5333. XOD;
  5334. *R;
  5335. L 0;
  5336. BTD;
  5337. *D;
  5338. +R;
  5339. *D;
  5340. L 0;
  5341. BTD;
  5342. T MD 0;
  5343. XN TRUE;
  5344. LAR1;
  5345. SSI;
  5346. AUF DB 42;
  5347. TAD;
  5348. TDB;
  5349. LEAVE;
  5350. ON(;
  5351. );
  5352. <=D;
  5353. SAVE;
  5354. NOT;
  5355. -I;
  5356. OD;
  5357. LN;
  5358. NOP 0;
  5359. RND;
  5360. PUSH;
  5361. ON(;
  5362. );
  5363. *R;
  5364. L 0;
  5365. SA T 42;
  5366. COS;
  5367. UD;
  5368. SLW;
  5369. DEC 0;
  5370. RND+;
  5371. SLW;
  5372. L 0;
  5373. CLR;
  5374. SPBIN AAQJ;
  5375. AAQJ: NOP 0;
  5376. S M 0.4;
  5377. ABS;
  5378. O FALSE;
  5379. <I;
  5380. T MD 0;
  5381. <=R;
  5382. <R;
  5383. NEGD;
  5384. DTB;
  5385. <=I;
  5386. X TRUE;
  5387. S M 0.4;
  5388. ATAN;
  5389. INVI;
  5390. >=D;
  5391. CALL FB 45, DB 45;
  5392. CALL FB 45, DB 45;
  5393. CALL FB 45, DB 45;
  5394. ZR Z 42;
  5395. L 0;
  5396. CLR;
  5397. SPP AAQK;
  5398. AAQK: NOP 0;
  5399. XN(;
  5400. );
  5401. SET;
  5402. *R;
  5403. POP;
  5404. ABS;
  5405. PUSH;
  5406. L 0;
  5407. CLR;
  5408. SPPZ AAQL;
  5409. AAQL: NOP 0;
  5410. L 0;
  5411. L 0;
  5412. CLR;
  5413. SPL AAQM;
  5414. AAQM: NOP 0;
  5415. L 0;
  5416. SA T 42;
  5417. TAR2;
  5418. ON M 0.4;
  5419. NOP 0;
  5420. L 0;
  5421. SA T 42;
  5422. COS;
  5423. <>I;
  5424. SIN;
  5425. <=D;
  5426. >=D;
  5427. INC 0;
  5428. NOP 0;
  5429. BLD 0;
  5430. FN M 0.4;
  5431. ==I;
  5432. LEAVE;
  5433. FN M 0.4;
  5434. L 0;
  5435. CLR;
  5436. SPBB AAQN;
  5437. AAQN: NOP 0;
  5438. UD;
  5439. -I;
  5440. LN;
  5441. AUF DB 42;
  5442. -R;
  5443. SRD;
  5444. DEC 0;
  5445. UC FC 44;
  5446. SLW;
  5447. ON FALSE;
  5448. L 0;
  5449. L 0;
  5450. CLR;
  5451. SPL AAQO;
  5452. AAQO: NOP 0;
  5453. SQRT;
  5454. <D;
  5455. UC FC 44;
  5456. SQR;
  5457. ON TRUE;
  5458. L 0;
  5459. CLR;
  5460. SPMZ AAQP;
  5461. AAQP: NOP 0;
  5462. RND+;
  5463. U(;
  5464. );
  5465. SLW;
  5466. TDB;
  5467. /D;
  5468. XN M 0.4;
  5469. L 0;
  5470. CLR;
  5471. LOOP AAQQ;
  5472. AAQQ: NOP 0;
  5473. L 0;
  5474. CLR;
  5475. SPO AAQR;
  5476. AAQR: NOP 0;
  5477. L 0;
  5478. CLR;
  5479. SPZ AAQS;
  5480. AAQS: NOP 0;
  5481. L 0;
  5482. CLR;
  5483. SPB AAQT;
  5484. AAQT: NOP 0;
  5485. RLD;
  5486. FN M 0.4;
  5487. RND;
  5488. <>D;
  5489. L 0;
  5490. CLR;
  5491. SPBIN AAQU;
  5492. AAQU: NOP 0;
  5493. LAR2;
  5494. L 0;
  5495. CLR;
  5496. SPM AAQV;
  5497. AAQV: NOP 0;
  5498. TDB;
  5499. SIN;
  5500. CC FC 43;
  5501. SET;
  5502. ITD;
  5503. LAR2;
  5504. NEGD;
  5505. EXP;
  5506. SRD;
  5507. L 0;
  5508. SS T 42;
  5509. /D;
  5510. O(;
  5511. );
  5512. L 0;
  5513. SE T 42;
  5514. <>R;
  5515. X(;
  5516. );
  5517. L 0;
  5518. CLR;
  5519. SPZ AAQW;
  5520. AAQW: NOP 0;
  5521. L 0;
  5522. SI T 42;
  5523. SQRT;
  5524. <>D;
  5525. UW;
  5526. INC 0;
  5527. UN FALSE;
  5528. DTB;
  5529. INVI;
  5530. O(;
  5531. );
  5532. L DW#16#08775804;
  5533. U(;
  5534. );
  5535. +D;
  5536. DTR;
  5537. L 0;
  5538. L 0;
  5539. CLR;
  5540. SPL AAQX;
  5541. AAQX: NOP 0;
  5542. *D;
  5543. MCR(;
  5544. MCRA;
  5545. MCRD;
  5546. )MCR;
  5547. L 0;
  5548. SI T 42;
  5549. ABS;
  5550. >=I;
  5551. UN FALSE;
  5552. /D;
  5553. RLD;
  5554. CALL FB 45, DB 45;
  5555. CALL FB 45, DB 45;
  5556. CALL FB 45, DB 45;
  5557. T MD 0;
  5558. L 0;
  5559. BTI;
  5560. SLW;
  5561. NOP 0;
  5562. PUSH;
  5563. *I;
  5564. -I;
  5565. >R;
  5566. ZR Z 42;
  5567. CLR;
  5568. L 0;
  5569. CLR;
  5570. SPBN AAQY;
  5571. AAQY: NOP 0;
  5572. UN TRUE;
  5573. U(;
  5574. );
  5575. >R;
  5576. DEC 0;
  5577. NEGD;
  5578. TAW;
  5579. TAD;
  5580. INVD;
  5581. TDB;
  5582. EXP;
  5583. L 0;
  5584. SE T 42;
  5585. XN M 0.4;
  5586. O M 0.4;
  5587. SLW;
  5588. ==D;
  5589. <=R;
  5590. SET;
  5591. O M 0.4;
  5592. TAD;
  5593. LC MW 0;
  5594. UC FC 44;
  5595. L 0;
  5596. CLR;
  5597. SPS AAQZ;
  5598. AAQZ: NOP 0;
  5599. L 0;
  5600. L 0;
  5601. CLR;
  5602. SPL AARA;
  5603. AARA: NOP 0;
  5604. TAN;
  5605. MOD;
  5606. *I;
  5607. TAR2;
  5608. LC MW 0;
  5609. NEGR;
  5610. SSI;
  5611. L 0;
  5612. CLR;
  5613. SPO AARB;
  5614. AARB: NOP 0;
  5615. L 0;
  5616. SA T 42;
  5617. ABS;
  5618. BLD 0;
  5619. FP M 0.4;
  5620. UN M 0.4;
  5621. L 0;
  5622. SV T 42;
  5623. /D;
  5624. ENT;
  5625. CALL FB 45, DB 45;
  5626. CALL FB 45, DB 45;
  5627. CALL FB 45, DB 45;
  5628. UC FC 44;
  5629. L 0;
  5630. CLR;
  5631. SPBN AARC;
  5632. AARC: NOP 0;
  5633. L 0;
  5634. CLR;
  5635. SPBIN AARD;
  5636. AARD: NOP 0;
  5637. ==I;
  5638. SLD;
  5639. X(;
  5640. );
  5641. L 0;
  5642. CLR;
  5643. LOOP AARE;
  5644. AARE: NOP 0;
  5645. L 0;
  5646. L 0;
  5647. CLR;
  5648. SPL AARF;
  5649. AARF: NOP 0;
  5650. L 0;
  5651. CLR;
  5652. SPPZ AARG;
  5653. AARG: NOP 0;
  5654. L 0;
  5655. L 0;
  5656. CLR;
  5657. SPL AARH;
  5658. AARH: NOP 0;
  5659. ZR Z 42;
  5660. L 0;
  5661. CLR;
  5662. SPBIN AARI;
  5663. AARI: NOP 0;
  5664. ITD;
  5665. <=D;
  5666. L 0;
  5667. SS T 42;
  5668. RND-;
  5669. O(;
  5670. );
  5671. SET;
  5672. SQRT;
  5673. L 0;
  5674. CLR;
  5675. SPP AARJ;
  5676. AARJ: NOP 0;
  5677. >D;
  5678. U TRUE;
  5679. L 0;
  5680. CLR;
  5681. SPBI AARK;
  5682. AARK: NOP 0;
  5683. ZR Z 42;
  5684. COS;
  5685. SQRT;
  5686. *R;
  5687. ON FALSE;
  5688. +I;
  5689. TAW;
  5690. XOW;
  5691. SLW;
  5692. + 0;
  5693. L 0;
  5694. SI T 42;
  5695. L 0;
  5696. CLR;
  5697. SPBIN AARL;
  5698. AARL: NOP 0;
  5699. >=R;
  5700. POP;
  5701. ITB;
  5702. L 0;
  5703. CLR;
  5704. SPBI AARM;
  5705. AARM: NOP 0;
  5706. SAVE;
  5707. SSD;
  5708. <=I;
  5709. ZR Z 42;
  5710. ENT;
  5711. ITB;
  5712. L 0;
  5713. CLR;
  5714. SPU AARN;
  5715. AARN: NOP 0;
  5716. SET;
  5717. TAW;
  5718. /I;
  5719. TAD;
  5720. L 0;
  5721. CLR;
  5722. SPS AARO;
  5723. AARO: NOP 0;
  5724. COS;
  5725. L 0;
  5726. CLR;
  5727. SPMZ AARP;
  5728. AARP: NOP 0;
  5729. /D;
  5730. ZR Z 42;
  5731. BLD 0;
  5732. L 0;
  5733. CLR;
  5734. SPBI AARQ;
  5735. AARQ: NOP 0;
  5736. MCR(;
  5737. MCRA;
  5738. MCRD;
  5739. )MCR;
  5740. <I;
  5741. SSD;
  5742. UN(;
  5743. );
  5744. BLD 0;
  5745. +AR2;
  5746. = M 0.4;
  5747. SSD;
  5748. DTB;
  5749. RRDA;
  5750. <I;
  5751. +R;
  5752. OW;
  5753. L 0;
  5754. CLR;
  5755. SPBIN AARR;
  5756. AARR: NOP 0;
  5757. LN;
  5758. UN(;
  5759. );
  5760. <=D;
  5761. >D;
  5762. INVI;
  5763. +I;
  5764. EXP;
  5765. INC 0;
  5766. TAR2;
  5767. <D;
  5768. L 0;
  5769. CLR;
  5770. SPN AARS;
  5771. AARS: NOP 0;
  5772. ITB;
  5773. S M 0.4;
  5774. SRD;
  5775. L 0;
  5776. CLR;
  5777. SPU AART;
  5778. AART: NOP 0;
  5779. L 0;
  5780. BTI;
  5781. L 0;
  5782. CLR;
  5783. SPN AARU;
  5784. AARU: NOP 0;
  5785. O(;
  5786. );
  5787. UN M 0.4;
  5788. TAR;
  5789. L 0;
  5790. L 0;
  5791. CLR;
  5792. SPL AARV;
  5793. AARV: NOP 0;
  5794. NEGI;
  5795. >=R;
  5796. +AR1;
  5797. <>R;
  5798. RLD;
  5799. SET;
  5800. ==D;
  5801. ATAN;
  5802. ASIN;
  5803. SQRT;
  5804. ASIN;
  5805. SRW;
  5806. -R;
  5807. UN M 0.4;
  5808. ON FALSE;
  5809. /D;
  5810. ON M 0.4;
  5811. L 0;
  5812. CLR;
  5813. SPM AARW;
  5814. AARW: NOP 0;
  5815. OW;
  5816. ITD;
  5817. X M 0.4;
  5818. UN M 0.4;
  5819. L DW#16#E0821918;
  5820. L 0;
  5821. CLR;
  5822. SPZ AARX;
  5823. AARX: NOP 0;
  5824. ==D;
  5825. FP M 0.4;
  5826. -R;
  5827. RRDA;
  5828. NOP 0;
  5829. L 0;
  5830. CLR;
  5831. SPS AARY;
  5832. AARY: NOP 0;
  5833. <R;
  5834. X(;
  5835. );
  5836. XN TRUE;
  5837. L 0;
  5838. CLR;
  5839. SPBNB AARZ;
  5840. AARZ: NOP 0;
  5841. TAR1;
  5842. L 0;
  5843. SA T 42;
  5844. CALL FB 45, DB 45;
  5845. CALL FB 45, DB 45;
  5846. CALL FB 45, DB 45;
  5847. UW;
  5848. L 0;
  5849. CLR;
  5850. LOOP AASA;
  5851. AASA: NOP 0;
  5852. ATAN;
  5853. <>D;
  5854. +I;
  5855. RLD;
  5856. + 0;
  5857. ITD;
  5858. <R;
  5859. SQRT;
  5860. X M 0.4;
  5861. RND;
  5862. TAD;
  5863. ==D;
  5864. NEGD;
  5865. XN M 0.4;
  5866. NOP 0;
  5867. L 0;
  5868. SI T 42;
  5869. >=R;
  5870. >=I;
  5871. -D;
  5872. ON TRUE;
  5873. ZV Z 42;
  5874. XOW;
  5875. U(;
  5876. );
  5877. CALL FB 45, DB 45;
  5878. CALL FB 45, DB 45;
  5879. CALL FB 45, DB 45;
  5880. U(;
  5881. );
  5882. ==I;
  5883. XN M 0.4;
  5884. U(;
  5885. );
  5886. >I;
  5887. SIN;
  5888. LAR2;
  5889. +R;
  5890. >=I;
  5891. TAK;
  5892. LC MW 0;
  5893. SLW;
  5894. ==R;
  5895. INVD;
  5896. O M 0.4;
  5897. L 0;
  5898. CLR;
  5899. SPO AASB;
  5900. AASB: NOP 0;
  5901. COS;
  5902. FN M 0.4;
  5903. L 0;
  5904. SA T 42;
  5905. L 0;
  5906. CLR;
  5907. SPA AASC;
  5908. AASC: NOP 0;
  5909. UC FC 44;
  5910. >D;
  5911. COS;
  5912. FP M 0.4;
  5913. L 0;
  5914. SV T 42;
  5915. <I;
  5916. L 0;
  5917. CLR;
  5918. SPBN AASD;
  5919. AASD: NOP 0;
  5920. >I;
  5921. ==I;
  5922. RLDA;
  5923. DTR;
  5924. UC FC 44;
  5925. INVI;
  5926. AUF DB 42;
  5927. L 0;
  5928. SA T 42;
  5929. INVI;
  5930. + 0;
  5931. EXP;
  5932. L 0;
  5933. CLR;
  5934. SPBI AASE;
  5935. AASE: NOP 0;
  5936. >R;
  5937. X TRUE;
  5938. NEGI;
  5939. SLD;
  5940. L 0;
  5941. CLR;
  5942. SPMZ AASF;
  5943. AASF: NOP 0;
  5944. RND+;
  5945. U M 0.4;
  5946. ON M 0.4;
  5947. SET;
  5948. <>I;
  5949. DEC 0;
  5950. RRD;
  5951. <=D;
  5952. CLR;
  5953. L 0;
  5954. SV T 42;
  5955. R M 0.4;
  5956. FN M 0.4;
  5957. ZV Z 42;
  5958. TRUNC;
  5959. TAR1;
  5960. L 0;
  5961. CLR;
  5962. SPBI AASG;
  5963. AASG: NOP 0;
  5964. AUF DB 42;
  5965. MCR(;
  5966. MCRA;
  5967. MCRD;
  5968. )MCR;
  5969. U(;
  5970. );
  5971. FN M 0.4;
  5972. <=R;
  5973. X TRUE;
  5974. +D;
  5975. L 0;
  5976. CLR;
  5977. SPN AASH;
  5978. AASH: NOP 0;
  5979. ASIN;
  5980. >I;
  5981. SAVE;
  5982. XN FALSE;
  5983. >D;
  5984. >=R;
  5985. L 0;
  5986. CLR;
  5987. SPMZ AASI;
  5988. AASI: NOP 0;
  5989. + 0;
  5990. LAR1;
  5991. TDB;
  5992. CLR;
  5993. /D;
  5994. +I;
  5995. ITB;
  5996. >I;
  5997. SQR;
  5998. SQR;
  5999. TAR1;
  6000. L 0;
  6001. CLR;
  6002. SPA AASJ;
  6003. AASJ: NOP 0;
  6004. -R;
  6005. SRW;
  6006. COS;
  6007. <R;
  6008. <>I;
  6009. ==D;
  6010. ON(;
  6011. );
  6012. <>R;
  6013. FP M 0.4;
  6014. SIN;
  6015. CALL FC 42;
  6016. CALL FC 42;
  6017. CALL FC 42;
  6018. SLD;
  6019. INC 0;
  6020. LAR1;
  6021. ITB;
  6022. L MW 50;
  6023. + 1;
  6024. T MW 50;
  6025. T AW 0;
  6026. +R;
  6027. + 0;
  6028. L MW 50;
  6029. + 1;
  6030. T MW 50;
  6031. T AW 0;
  6032. UN FALSE;
  6033. SLD;
  6034. SRD;
  6035. <>I;
  6036. LN;
  6037. LAR1;
  6038. XN FALSE;
  6039. ZR Z 42;
  6040. L 0;
  6041. CLR;
  6042. SPN AASK;
  6043. AASK: NOP 0;
  6044. ON M 0.4;
  6045. UW;
  6046. +AR1;
  6047. LEAVE;
  6048. TAD;
  6049. L 0;
  6050. CLR;
  6051. LOOP AASL;
  6052. AASL: NOP 0;
  6053. L 0;
  6054. SS T 42;
  6055. L 0;
  6056. SA T 42;
  6057. SAVE;
  6058. ACOS;
  6059. L DW#16#7B5FBE41;
  6060. -R;
  6061. <=D;
  6062. POP;
  6063. L MW 50;
  6064. + 1;
  6065. T MW 50;
  6066. T AW 0;
  6067. UN(;
  6068. );
  6069. O M 0.4;
  6070. <>R;
  6071. L 0;
  6072. SI T 42;
  6073. SSD;
  6074. RRD;
  6075. <R;
  6076. R M 0.4;
  6077. RLD;
  6078. L 0;
  6079. CLR;
  6080. SPM AASM;
  6081. AASM: NOP 0;
  6082. RND-;
  6083. L 0;
  6084. CLR;
  6085. SPMZ AASN;
  6086. AASN: NOP 0;
  6087. L 0;
  6088. CLR;
  6089. SPB AASO;
  6090. AASO: NOP 0;
  6091. U(;
  6092. );
  6093. L 0;
  6094. SI T 42;
  6095. TAD;
  6096. TAK;
  6097. MOD;
  6098. SQRT;
  6099. RND+;
  6100. S M 0.4;
  6101. TAR2;
  6102. LAR2;
  6103. DEC 0;
  6104. T MD 0;
  6105. SET;
  6106. RLDA;
  6107. T MD 0;
  6108. L 0;
  6109. CLR;
  6110. SPN AASP;
  6111. AASP: NOP 0;
  6112. <I;
  6113. RLDA;
  6114. X M 0.4;
  6115. FP M 0.4;
  6116. SQRT;
  6117. LN;
  6118. ON FALSE;
  6119. CLR;
  6120. CC FC 43;
  6121. L 0;
  6122. CLR;
  6123. SPO AASQ;
  6124. AASQ: NOP 0;
  6125. L 0;
  6126. SV T 42;
  6127. ENT;
  6128. INVD;
  6129. TAR1;
  6130. +I;
  6131. -D;
  6132. UN(;
  6133. );
  6134. TAD;
  6135. TAR1;
  6136. L 0;
  6137. CLR;
  6138. SPMZ AASR;
  6139. AASR: NOP 0;
  6140. ENT;
  6141. SET;
  6142. SLW;
  6143. -D;
  6144. TAR;
  6145. >I;
  6146. SAVE;
  6147. TAW;
  6148. U M 0.4;
  6149. +I;
  6150. /I;
  6151. L 0;
  6152. CLR;
  6153. SPBNB AASS;
  6154. AASS: NOP 0;
  6155. TAK;
  6156. L 0;
  6157. SA T 42;
  6158. /D;
  6159. ==I;
  6160. XN FALSE;
  6161. RRD;
  6162. >D;
  6163. EXP;
  6164. ==I;
  6165. ZV Z 42;
  6166. L MW 50;
  6167. + 1;
  6168. T MW 50;
  6169. T AW 0;
  6170. DTR;
  6171. ITD;
  6172. <I;
  6173. /R;
  6174. NEGR;
  6175. TAR2;
  6176. ITD;
  6177. L 0;
  6178. CLR;
  6179. LOOP AAST;
  6180. AAST: NOP 0;
  6181. ==I;
  6182. SIN;
  6183. XN FALSE;
  6184. TAR;
  6185. TAR2;
  6186. NOP 0;
  6187. L 0;
  6188. SI T 42;
  6189. <>D;
  6190. RLDA;
  6191. UN M 0.4;
  6192. OW;
  6193. U(;
  6194. );
  6195. PUSH;
  6196. ACOS;
  6197. BLD 0;
  6198. SLD;
  6199. L 0;
  6200. SV T 42;
  6201. L 0;
  6202. BTI;
  6203. +AR2;
  6204. <=R;
  6205. <=I;
  6206. FP M 0.4;
  6207. *R;
  6208. SET;
  6209. UC FC 44;
  6210. L 0;
  6211. CLR;
  6212. SPM AASU;
  6213. AASU: NOP 0;
  6214. L 0;
  6215. SI T 42;
  6216. -R;
  6217. COS;
  6218. UC FC 44;
  6219. L DW#16#460A6125;
  6220. +I;
  6221. L 0;
  6222. CLR;
  6223. SPBI AASV;
  6224. AASV: NOP 0;
  6225. TAR;
  6226. <>D;
  6227. >D;
  6228. LN;
  6229. CC FC 43;
  6230. L 0;
  6231. SE T 42;
  6232. L 0;
  6233. CLR;
  6234. SPBIN AASW;
  6235. AASW: NOP 0;
  6236. TAK;
  6237. L 0;
  6238. CLR;
  6239. SPN AASX;
  6240. AASX: NOP 0;
  6241. PUSH;
  6242. NEGR;
  6243. INVI;
  6244. NEGI;
  6245. L 0;
  6246. CLR;
  6247. SPBNB AASY;
  6248. AASY: NOP 0;
  6249. -I;
  6250. ==D;
  6251. L 0;
  6252. BTI;
  6253. RRDA;
  6254. OD;
  6255. L 0;
  6256. CLR;
  6257. SPM AASZ;
  6258. AASZ: NOP 0;
  6259. >I;
  6260. /I;
  6261. ENT;
  6262. SRW;
  6263. BLD 0;
  6264. DEC 0;
  6265. SIN;
  6266. XOW;
  6267. L 0;
  6268. CLR;
  6269. SPBB AATA;
  6270. AATA: NOP 0;
  6271. TAN;
  6272. ON M 0.4;
  6273. L 0;
  6274. SA T 42;
  6275. ==I;
  6276. U TRUE;
  6277. >=D;
  6278. UN(;
  6279. );
  6280. O(;
  6281. );
  6282. INVI;
  6283. TDB;
  6284. >R;
  6285. L 0;
  6286. CLR;
  6287. SPBB AATB;
  6288. AATB: NOP 0;
  6289. LC MW 0;
  6290. >=D;
  6291. ON(;
  6292. );
  6293. L 0;
  6294. CLR;
  6295. SPBI AATC;
  6296. AATC: NOP 0;
  6297. INVD;
  6298. OD;
  6299. O TRUE;
  6300. TAR;
  6301. FP M 0.4;
  6302. ENT;
  6303. TAD;
  6304. ENT;
  6305. *R;
  6306. RND+;
  6307. L 0;
  6308. SV T 42;
  6309. L 0;
  6310. CLR;
  6311. SPBB AATD;
  6312. AATD: NOP 0;
  6313. U(;
  6314. );
  6315. +R;
  6316. *R;
  6317. SIN;
  6318. L 0;
  6319. CLR;
  6320. SPN AATE;
  6321. AATE: NOP 0;
  6322. PUSH;
  6323. UN(;
  6324. );
  6325. ON M 0.4;
  6326. LC MW 0;
  6327. INVI;
  6328. LAR2;
  6329. TAD;
  6330. *D;
  6331. NOP 0;
  6332. XOD;
  6333. CC FC 43;
  6334. DTR;
  6335. DTB;
  6336. L 0;
  6337. CLR;
  6338. SPBI AATF;
  6339. AATF: NOP 0;
  6340. T MD 0;
  6341. L 0;
  6342. BTI;
  6343. R M 0.4;
  6344. L 0;
  6345. BTD;
  6346. <=R;
  6347. L 0;
  6348. SE T 42;
  6349. <I;
  6350. MOD;
  6351. X TRUE;
  6352. L 0;
  6353. CLR;
  6354. SPB AATG;
  6355. AATG: NOP 0;
  6356. POP;
  6357. AUF DB 42;
  6358. ==D;
  6359. >R;
  6360. BLD 0;
  6361. ZV Z 42;
  6362. UN M 0.4;
  6363. L 0;
  6364. CLR;
  6365. SPMZ AATH;
  6366. AATH: NOP 0;
  6367. SSI;
  6368. ==R;
  6369. X FALSE;
  6370. L 0;
  6371. CLR;
  6372. SPM AATI;
  6373. AATI: NOP 0;
  6374. CALL FB 45, DB 45;
  6375. CALL FB 45, DB 45;
  6376. CALL FB 45, DB 45;
  6377. UN(;
  6378. );
  6379. L 0;
  6380. CLR;
  6381. SPO AATJ;
  6382. AATJ: NOP 0;
  6383. RLD;
  6384. DEC 0;
  6385. TAK;
  6386. + 0;
  6387. = M 0.4;
  6388. L 0;
  6389. CLR;
  6390. SPP AATK;
  6391. AATK: NOP 0;
  6392. UW;
  6393. TAW;
  6394. L 0;
  6395. BTD;
  6396. L 0;
  6397. SA T 42;
  6398. XN(;
  6399. );
  6400. L 0;
  6401. SI T 42;
  6402. <>R;
  6403. SIN;
  6404. XOD;
  6405. UD;
  6406. SQRT;
  6407. CLR;
  6408. *I;
  6409. TAW;
  6410. NEGD;
  6411. L 0;
  6412. CLR;
  6413. SPMZ AATL;
  6414. AATL: NOP 0;
  6415. L 0;
  6416. CLR;
  6417. SPMZ AATM;
  6418. AATM: NOP 0;
  6419. +D;
  6420. L 0;
  6421. CLR;
  6422. SPBI AATN;
  6423. AATN: NOP 0;
  6424. NEGR;
  6425. OW;
  6426. SLW;
  6427. ENT;
  6428. O M 0.4;
  6429. >I;
  6430. -I;
  6431. T MD 0;
  6432. RND-;
  6433. FR Z 42;
  6434. X TRUE;
  6435. +R;
  6436. >I;
  6437. -R;
  6438. ZV Z 42;
  6439. OD;
  6440. L 0;
  6441. CLR;
  6442. SPBN AATO;
  6443. AATO: NOP 0;
  6444. U TRUE;
  6445. L 0;
  6446. SE T 42;
  6447. L 0;
  6448. SV T 42;
  6449. T MD 0;
  6450. SRD;
  6451. XN TRUE;
  6452. DTB;
  6453. L 0;
  6454. CLR;
  6455. SPM AATP;
  6456. AATP: NOP 0;
  6457. L 0;
  6458. SE T 42;
  6459. NOT;
  6460. SAVE;
  6461. <R;
  6462. UD;
  6463. XOW;
  6464. UN M 0.4;
  6465. X(;
  6466. );
  6467. NEGI;
  6468. NEGD;
  6469. TAN;
  6470. FP M 0.4;
  6471. INVD;
  6472. UD;
  6473. ATAN;
  6474. = M 0.4;
  6475. ==R;
  6476. U TRUE;
  6477. L 0;
  6478. CLR;
  6479. SPMZ AATQ;
  6480. AATQ: NOP 0;
  6481. ON FALSE;
  6482. = M 0.4;
  6483. UN(;
  6484. );
  6485. L 0;
  6486. BTI;
  6487. LC MW 0;
  6488. POP;
  6489. = M 0.4;
  6490. +AR1;
  6491. RND;
  6492. ZR Z 42;
  6493. EXP;
  6494. *R;
  6495. TAR;
  6496. SQRT;
  6497. ACOS;
  6498. L 0;
  6499. CLR;
  6500. SPN AATR;
  6501. AATR: NOP 0;
  6502. X M 0.4;
  6503. *R;
  6504. <I;
  6505. XOW;
  6506. UN M 0.4;
  6507. X(;
  6508. );
  6509. BLD 0;
  6510. XN FALSE;
  6511. + 0;
  6512. RRDA;
  6513. ==I;
  6514. L 0;
  6515. CLR;
  6516. SPBNB AATS;
  6517. AATS: NOP 0;
  6518. L 0;
  6519. CLR;
  6520. SPO AATT;
  6521. AATT: NOP 0;
  6522. UC FC 44;
  6523. SET;
  6524. L 0;
  6525. CLR;
  6526. SPBN AATU;
  6527. AATU: NOP 0;
  6528. LAR1;
  6529. +R;
  6530. ABS;
  6531. UN TRUE;
  6532. <>R;
  6533. XOW;
  6534. TAW;
  6535. <>D;
  6536. /R;
  6537. XOD;
  6538. L 0;
  6539. CLR;
  6540. SPBI AATV;
  6541. AATV: NOP 0;
  6542. <D;
  6543. L 0;
  6544. CLR;
  6545. SPBIN AATW;
  6546. AATW: NOP 0;
  6547. /D;
  6548. O M 0.4;
  6549. PUSH;
  6550. POP;
  6551. <D;
  6552. >=I;
  6553. X FALSE;
  6554. DEC 0;
  6555. CALL FB 45, DB 45;
  6556. CALL FB 45, DB 45;
  6557. CALL FB 45, DB 45;
  6558. /R;
  6559. UD;
  6560. TAK;
  6561. NOT;
  6562. L 0;
  6563. CLR;
  6564. SPS AATX;
  6565. AATX: NOP 0;
  6566. NEGI;
  6567. -I;
  6568. NEGD;
  6569. LN;
  6570. L 0;
  6571. SE T 42;
  6572. <D;
  6573. >R;
  6574. L 0;
  6575. BTD;
  6576. TAW;
  6577. LC MW 0;
  6578. DTB;
  6579. >I;
  6580. ITB;
  6581. INC 0;
  6582. UN(;
  6583. );
  6584. TAK;
  6585. MCR(;
  6586. MCRA;
  6587. MCRD;
  6588. )MCR;
  6589. TAK;
  6590. = M 0.4;
  6591. L 0;
  6592. CLR;
  6593. SPBNB AATY;
  6594. AATY: NOP 0;
  6595. XN(;
  6596. );
  6597. LC MW 0;
  6598. FN M 0.4;
  6599. DTR;
  6600. +AR2;
  6601. SRD;
  6602. L 0;
  6603. CLR;
  6604. SPMZ AATZ;
  6605. AATZ: NOP 0;
  6606. + 0;
  6607. <=I;
  6608. RND+;
  6609. FN M 0.4;
  6610. L 0;
  6611. CLR;
  6612. SPBN AAUA;
  6613. AAUA: NOP 0;
  6614. XN(;
  6615. );
  6616. DTB;
  6617. L 0;
  6618. CLR;
  6619. SPP AAUB;
  6620. AAUB: NOP 0;
  6621. SRD;
  6622. TAR;
  6623. L 0;
  6624. CLR;
  6625. SPMZ AAUC;
  6626. AAUC: NOP 0;
  6627. L 0;
  6628. CLR;
  6629. SPS AAUD;
  6630. AAUD: NOP 0;
  6631. BLD 0;
  6632. ==R;
  6633. LEAVE;
  6634. INC 0;
  6635. -D;
  6636. L 0;
  6637. CLR;
  6638. SPN AAUE;
  6639. AAUE: NOP 0;
  6640. ASIN;
  6641. >=R;
  6642. UN M 0.4;
  6643. L 0;
  6644. CLR;
  6645. SPN AAUF;
  6646. AAUF: NOP 0;
  6647. L DW#16#C921057C;
  6648. ATAN;
  6649. L 0;
  6650. L 0;
  6651. CLR;
  6652. SPL AAUG;
  6653. AAUG: NOP 0;
  6654. +D;
  6655. <>D;
  6656. L 0;
  6657. CLR;
  6658. SPMZ AAUH;
  6659. AAUH: NOP 0;
  6660. SRW;
  6661. MCR(;
  6662. MCRA;
  6663. MCRD;
  6664. )MCR;
  6665. T MD 0;
  6666. + 0;
  6667. L 0;
  6668. CLR;
  6669. SPS AAUI;
  6670. AAUI: NOP 0;
  6671. SRD;
  6672. PUSH;
  6673. ==I;
  6674. <=R;
  6675. UC FC 44;
  6676. S M 0.4;
  6677. L 0;
  6678. CLR;
  6679. SPB AAUJ;
  6680. AAUJ: NOP 0;
  6681. >D;
  6682. UD;
  6683. DTR;
  6684. AUF DB 42;
  6685. R M 0.4;
  6686. R M 0.4;
  6687. X M 0.4;
  6688. L 0;
  6689. SI T 42;
  6690. UN TRUE;
  6691. CALL FC 42;
  6692. CALL FC 42;
  6693. CALL FC 42;
  6694. NEGD;
  6695. ON TRUE;
  6696. XOD;
  6697. OD;
  6698. SSD;
  6699. <=D;
  6700. -D;
  6701. /R;
  6702. TAD;
  6703. NOP 0;
  6704. L 0;
  6705. CLR;
  6706. SPBNB AAUK;
  6707. AAUK: NOP 0;
  6708. <>D;
  6709. MCR(;
  6710. MCRA;
  6711. MCRD;
  6712. )MCR;
  6713. RRDA;
  6714. L 0;
  6715. SV T 42;
  6716. CLR;
  6717. ABS;
  6718. -D;
  6719. RRDA;
  6720. O M 0.4;
  6721. RND-;
  6722. <R;
  6723. L 0;
  6724. SE T 42;
  6725. >D;
  6726. T MD 0;
  6727. <>R;
  6728. L 0;
  6729. BTI;
  6730. LEAVE;
  6731. LEAVE;
  6732. >=D;
  6733. SLD;
  6734. + 0;
  6735. X FALSE;
  6736. SRD;
  6737. TRUNC;
  6738. X(;
  6739. );
  6740. AUF DB 42;
  6741. *D;
  6742. TRUNC;
  6743. X FALSE;
  6744. L 0;
  6745. SS T 42;
  6746. +D;
  6747. *R;
  6748. SSD;
  6749. TAR1;
  6750. XN FALSE;
  6751. L 0;
  6752. CLR;
  6753. SPM AAUL;
  6754. AAUL: NOP 0;
  6755. FP M 0.4;
  6756. L 0;
  6757. SA T 42;
  6758. L 0;
  6759. L 0;
  6760. CLR;
  6761. SPL AAUM;
  6762. AAUM: NOP 0;
  6763. AUF DB 42;
  6764. +AR2;
  6765. XOD;
  6766. INC 0;
  6767. <=R;
  6768. MOD;
  6769. MOD;
  6770. -D;
  6771. NOP 0;
  6772. R M 0.4;
  6773. L 0;
  6774. SS T 42;
  6775. LC MW 0;
  6776. MOD;
  6777. TAD;
  6778. L 0;
  6779. SS T 42;
  6780. SQRT;
  6781. /I;
  6782. -I;
  6783. SRD;
  6784. SLD;
  6785. CC FC 43;
  6786. UN M 0.4;
  6787. RRDA;
  6788. >D;
  6789. LAR1;
  6790. <R;
  6791. RND;
  6792. R M 0.4;
  6793. L 0;
  6794. SE T 42;
  6795. L 0;
  6796. CLR;
  6797. SPB AAUN;
  6798. AAUN: NOP 0;
  6799. NEGD;
  6800. <=D;
  6801. L 0;
  6802. BTD;
  6803. <>R;
  6804. +D;
  6805. CC FC 43;
  6806. <I;
  6807. RND;
  6808. SIN;
  6809. L 0;
  6810. CLR;
  6811. SPMZ AAUO;
  6812. AAUO: NOP 0;
  6813. >I;
  6814. SLD;
  6815. SRW;
  6816. SRW;
  6817. NEGI;
  6818. CALL FC 42;
  6819. CALL FC 42;
  6820. CALL FC 42;
  6821. >R;
  6822. LN;
  6823. XN M 0.4;
  6824. FR Z 42;
  6825. XN FALSE;
  6826. DEC 0;
  6827. CALL FC 42;
  6828. CALL FC 42;
  6829. CALL FC 42;
  6830. >R;
  6831. <>D;
  6832. L 0;
  6833. SE T 42;
  6834. X FALSE;
  6835. O(;
  6836. );
  6837. <R;
  6838. ZR Z 42;
  6839. ITB;
  6840. L 0;
  6841. SS T 42;
  6842. SQRT;
  6843. SET;
  6844. LEAVE;
  6845. X M 0.4;
  6846. L 0;
  6847. CLR;
  6848. SPBN AAUP;
  6849. AAUP: NOP 0;
  6850. NOT;
  6851. NEGR;
  6852. T MD 0;
  6853. UC FC 44;
  6854. SSD;
  6855. SLD;
  6856. >=R;
  6857. TAW;
  6858. LN;
  6859. SET;
  6860. <D;
  6861. BLD 0;
  6862. ITB;
  6863. L 0;
  6864. SV T 42;
  6865. AUF DB 42;
  6866. <R;
  6867. +I;
  6868. TAR1;
  6869. CALL FB 45, DB 45;
  6870. CALL FB 45, DB 45;
  6871. CALL FB 45, DB 45;
  6872. CALL FC 42;
  6873. CALL FC 42;
  6874. CALL FC 42;
  6875. XN(;
  6876. );
  6877. RND;
  6878. MOD;
  6879. -R;
  6880. ==D;
  6881. ==I;
  6882. X M 0.4;
  6883. INVI;
  6884. L 0;
  6885. SA T 42;
  6886. L 0;
  6887. SI T 42;
  6888. COS;
  6889. <=D;
  6890. UC FC 44;
  6891. SAVE;
  6892. L 0;
  6893. BTI;
  6894. SLW;
  6895. SET;
  6896. ON FALSE;
  6897. CLR;
  6898. SLD;
  6899. ==D;
  6900. CC FC 43;
  6901. OD;
  6902. U M 0.4;
  6903. ACOS;
  6904. L 0;
  6905. SA T 42;
  6906. COS;
  6907. *D;
  6908. XN TRUE;
  6909. RND;
  6910. SLD;
  6911. +R;
  6912. *I;
  6913. NOP 0;
  6914. +AR1;
  6915. FN M 0.4;
  6916. TAN;
  6917. <>D;
  6918. ZV Z 42;
  6919. SRW;
  6920. TRUNC;
  6921. NOT;
  6922. L 0;
  6923. CLR;
  6924. SPBN AAUQ;
  6925. AAUQ: NOP 0;
  6926. SET;
  6927. XOD;
  6928. EXP;
  6929. ZV Z 42;
  6930. ITD;
  6931. UN M 0.4;
  6932. UN M 0.4;
  6933. +AR1;
  6934. L 0;
  6935. SA T 42;
  6936. <I;
  6937. L 0;
  6938. SA T 42;
  6939. UN M 0.4;
  6940. MOD;
  6941. INVD;
  6942. L 0;
  6943. CLR;
  6944. SPN AAUR;
  6945. AAUR: NOP 0;
  6946. EXP;
  6947. +D;
  6948. ==I;
  6949. ==R;
  6950. ASIN;
  6951. BLD 0;
  6952. LC MW 0;
  6953. ZR Z 42;
  6954. UD;
  6955. TAN;
  6956. LEAVE;
  6957. -D;
  6958. L MW 50;
  6959. + 1;
  6960. T MW 50;
  6961. T AW 0;
  6962. L 0;
  6963. L 0;
  6964. CLR;
  6965. SPL AAUS;
  6966. AAUS: NOP 0;
  6967. ABS;
  6968. INVD;
  6969. LN;
  6970. PUSH;
  6971. POP;
  6972. SLD;
  6973. L 0;
  6974. BTI;
  6975. *D;
  6976. ENT;
  6977. POP;
  6978. SLD;
  6979. LC MW 0;
  6980. L 0;
  6981. CLR;
  6982. SPS AAUT;
  6983. AAUT: NOP 0;
  6984. +AR1;
  6985. -I;
  6986. ABS;
  6987. >D;
  6988. <I;
  6989. RND;
  6990. T MD 0;
  6991. >R;
  6992. FN M 0.4;
  6993. NEGD;
  6994. L 0;
  6995. SV T 42;
  6996. SQR;
  6997. L 0;
  6998. CLR;
  6999. LOOP AAUU;
  7000. AAUU: NOP 0;
  7001. TAK;
  7002. UN(;
  7003. );
  7004. >R;
  7005. *R;
  7006. UN M 0.4;
  7007. CLR;
  7008. >=D;
  7009. SSD;
  7010. SET;
  7011. ATAN;
  7012. SET;
  7013. X(;
  7014. );
  7015. AUF DB 42;
  7016. TAW;
  7017. *D;
  7018. S M 0.4;
  7019. UC FC 44;
  7020. ON TRUE;
  7021. SQR;
  7022. L 0;
  7023. SA T 42;
  7024. L 0;
  7025. CLR;
  7026. SPBB AAUV;
  7027. AAUV: NOP 0;
  7028. CALL FB 45, DB 45;
  7029. CALL FB 45, DB 45;
  7030. CALL FB 45, DB 45;
  7031. O(;
  7032. );
  7033. <=R;
  7034. RRD;
  7035. LAR1;
  7036. O M 0.4;
  7037. INVI;
  7038. L 0;
  7039. SS T 42;
  7040. L 0;
  7041. CLR;
  7042. SPBB AAUW;
  7043. AAUW: NOP 0;
  7044. DTB;
  7045. O FALSE;
  7046. >=R;
  7047. ON TRUE;
  7048. RND-;
  7049. U M 0.4;
  7050. <>R;
  7051. SET;
  7052. L 0;
  7053. L 0;
  7054. CLR;
  7055. SPL AAUX;
  7056. AAUX: NOP 0;
  7057. SQR;
  7058. /I;
  7059. ABS;
  7060. SQRT;
  7061. NOP 0;
  7062. INVI;
  7063. L 0;
  7064. SS T 42;
  7065. ON M 0.4;
  7066. XN(;
  7067. );
  7068. CLR;
  7069. TAK;
  7070. L 0;
  7071. CLR;
  7072. SPBN AAUY;
  7073. AAUY: NOP 0;
  7074. ENT;
  7075. BLD 0;
  7076. *I;
  7077. -I;
  7078. L 0;
  7079. L 0;
  7080. CLR;
  7081. SPL AAUZ;
  7082. AAUZ: NOP 0;
  7083. TAD;
  7084. UC FC 44;
  7085. DTB;
  7086. TAR1;
  7087. SQRT;
  7088. +AR1;
  7089. UN M 0.4;
  7090. ZR Z 42;
  7091. <=R;
  7092. EXP;
  7093. L 0;
  7094. SI T 42;
  7095. ==I;
  7096. ENT;
  7097. = M 0.4;
  7098. RRDA;
  7099. L 0;
  7100. CLR;
  7101. SPBI AAVA;
  7102. AAVA: NOP 0;
  7103. +I;
  7104. >I;
  7105. L 0;
  7106. SE T 42;
  7107. ZV Z 42;
  7108. UD;
  7109. +AR1;
  7110. LC MW 0;
  7111. LAR2;
  7112. MOD;
  7113. LEAVE;
  7114. SLD;
  7115. FR Z 42;
  7116. L 0;
  7117. CLR;
  7118. LOOP AAVB;
  7119. AAVB: NOP 0;
  7120. TAR2;
  7121. TAR2;
  7122. NOP 0;
  7123. UN TRUE;
  7124. >I;
  7125. ZR Z 42;
  7126. XN(;
  7127. );
  7128. +R;
  7129. TAW;
  7130. RND;
  7131. L 0;
  7132. CLR;
  7133. SPN AAVC;
  7134. AAVC: NOP 0;
  7135. LN;
  7136. /I;
  7137. L 0;
  7138. SS T 42;
  7139. UD;
  7140. O M 0.4;
  7141. AUF DB 42;
  7142. L DW#16#498BCF67;
  7143. SQR;
  7144. +I;
  7145. R M 0.4;
  7146. PUSH;
  7147. L 0;
  7148. BTI;
  7149. SLW;
  7150. L 0;
  7151. CLR;
  7152. SPN AAVD;
  7153. AAVD: NOP 0;
  7154. /I;
  7155. NEGR;
  7156. DEC 0;
  7157. TDB;
  7158. ITB;
  7159. ITD;
  7160. RLDA;
  7161. INVI;
  7162. RND+;
  7163. RND-;
  7164. AUF DB 42;
  7165. INVD;
  7166. RND;
  7167. INVI;
  7168. L DW#16#5B249C2A;
  7169. ==I;
  7170. <I;
  7171. S M 0.4;
  7172. RRD;
  7173. UN M 0.4;
  7174. OD;
  7175. X TRUE;
  7176. /D;
  7177. L 0;
  7178. CLR;
  7179. SPN AAVE;
  7180. AAVE: NOP 0;
  7181. RRD;
  7182. +AR1;
  7183. L 0;
  7184. L 0;
  7185. CLR;
  7186. SPL AAVF;
  7187. AAVF: NOP 0;
  7188. RLD;
  7189. ITB;
  7190. L 0;
  7191. SV T 42;
  7192. L 0;
  7193. CLR;
  7194. SPB AAVG;
  7195. AAVG: NOP 0;
  7196. ABS;
  7197. TAW;
  7198. +AR1;
  7199. <=I;
  7200. UN(;
  7201. );
  7202. UW;
  7203. TAN;
  7204. SRW;
  7205. OD;
  7206. O TRUE;
  7207. /R;
  7208. <=R;
  7209. TAR2;
  7210. <I;
  7211. L 0;
  7212. SS T 42;
  7213. TAR2;
  7214. L 0;
  7215. CLR;
  7216. SPN AAVH;
  7217. AAVH: NOP 0;
  7218. O M 0.4;
  7219. ON M 0.4;
  7220. NEGI;
  7221. +R;
  7222. +AR2;
  7223. FN M 0.4;
  7224. L 0;
  7225. CLR;
  7226. SPPZ AAVI;
  7227. AAVI: NOP 0;
  7228. +D;
  7229. L MW 50;
  7230. + 1;
  7231. T MW 50;
  7232. T AW 0;
  7233. ZR Z 42;
  7234. L 0;
  7235. BTD;
  7236. TAK;
  7237. AUF DB 42;
  7238. RND+;
  7239. TDB;
  7240. SSD;
  7241. L MW 50;
  7242. + 1;
  7243. T MW 50;
  7244. T AW 0;
  7245. +I;
  7246. -D;
  7247. L 0;
  7248. BTD;
  7249. RLDA;
  7250. TAN;
  7251. NEGI;
  7252. COS;
  7253. /D;
  7254. -D;
  7255. SQR;
  7256. L 0;
  7257. CLR;
  7258. SPB AAVJ;
  7259. AAVJ: NOP 0;
  7260. TAR;
  7261. ITB;
  7262. DEC 0;
  7263. ==D;
  7264. +AR1;
  7265. RND;
  7266. FN M 0.4;
  7267. L 0;
  7268. CLR;
  7269. SPA AAVK;
  7270. AAVK: NOP 0;
  7271. RND+;
  7272. POP;
  7273. ACOS;
  7274. +R;
  7275. DTR;
  7276. >=D;
  7277. <=D;
  7278. SLW;
  7279. O M 0.4;
  7280. L 0;
  7281. BTI;
  7282. COS;
  7283. RLDA;
  7284. <>D;
  7285. L 0;
  7286. SS T 42;
  7287. XOW;
  7288. L 0;
  7289. CLR;
  7290. SPN AAVL;
  7291. AAVL: NOP 0;
  7292. SRD;
  7293. L 0;
  7294. CLR;
  7295. SPBIN AAVM;
  7296. AAVM: NOP 0;
  7297. LC MW 0;
  7298. ENT;
  7299. INC 0;
  7300. U(;
  7301. );
  7302. ABS;
  7303. FN M 0.4;
  7304. >R;
  7305. ON(;
  7306. );
  7307. NEGR;
  7308. ZV Z 42;
  7309. SLW;
  7310. SAVE;
  7311. TAR;
  7312. L 0;
  7313. CLR;
  7314. SPU AAVN;
  7315. AAVN: NOP 0;
  7316. ZR Z 42;
  7317. +D;
  7318. +D;
  7319. ENT;
  7320. POP;
  7321. ZV Z 42;
  7322. -I;
  7323. XN M 0.4;
  7324. LN;
  7325. >=I;
  7326. *I;
  7327. UC FC 44;
  7328. DTR;
  7329. +AR1;
  7330. +AR1;
  7331. UD;
  7332. <=R;
  7333. L 0;
  7334. CLR;
  7335. SPBN AAVO;
  7336. AAVO: NOP 0;
  7337. /I;
  7338. L 0;
  7339. CLR;
  7340. SPPZ AAVP;
  7341. AAVP: NOP 0;
  7342. L 0;
  7343. SV T 42;
  7344. SRD;
  7345. T MD 0;
  7346. S M 0.4;
  7347. +R;
  7348. L 0;
  7349. CLR;
  7350. SPBB AAVQ;
  7351. AAVQ: NOP 0;
  7352. MCR(;
  7353. MCRA;
  7354. MCRD;
  7355. )MCR;
  7356. >=D;
  7357. <R;
  7358. L 0;
  7359. CLR;
  7360. LOOP AAVR;
  7361. AAVR: NOP 0;
  7362. COS;
  7363. L MW 50;
  7364. + 1;
  7365. T MW 50;
  7366. T AW 0;
  7367. DEC 0;
  7368. SQRT;
  7369. = M 0.4;
  7370. S M 0.4;
  7371. >R;
  7372. +I;
  7373. RND;
  7374. L 0;
  7375. CLR;
  7376. SPN AAVS;
  7377. AAVS: NOP 0;
  7378. L 0;
  7379. CLR;
  7380. SPP AAVT;
  7381. AAVT: NOP 0;
  7382. L 0;
  7383. CLR;
  7384. SPBNB AAVU;
  7385. AAVU: NOP 0;
  7386. TDB;
  7387. CC FC 43;
  7388. ABS;
  7389. L 0;
  7390. CLR;
  7391. SPA AAVV;
  7392. AAVV: NOP 0;
  7393. LAR2;
  7394. +D;
  7395. NOP 0;
  7396. L 0;
  7397. SA T 42;
  7398. TAR;
  7399. LN;
  7400. <R;
  7401. L 0;
  7402. BTD;
  7403. XN M 0.4;
  7404. <=I;
  7405. RND+;
  7406. LC MW 0;
  7407. S M 0.4;
  7408. NEGI;
  7409. <R;
  7410. ABS;
  7411. FP M 0.4;
  7412. SAVE;
  7413. X(;
  7414. );
  7415. SLW;
  7416. TAK;
  7417. UN(;
  7418. );
  7419. U TRUE;
  7420. UW;
  7421. NOT;
  7422. FP M 0.4;
  7423. AUF DB 42;
  7424. ==R;
  7425. NOT;
  7426. *R;
  7427. L 0;
  7428. CLR;
  7429. SPZ AAVW;
  7430. AAVW: NOP 0;
  7431. RND;
  7432. L DW#16#BCD2E8EB;
  7433. LAR2;
  7434. <=I;
  7435. ==D;
  7436. UW;
  7437. >=R;
  7438. UN FALSE;
  7439. + 0;
  7440. L 0;
  7441. CLR;
  7442. SPPZ AAVX;
  7443. AAVX: NOP 0;
  7444. SLW;
  7445. SSI;
  7446. OD;
  7447. L 0;
  7448. CLR;
  7449. SPA AAVY;
  7450. AAVY: NOP 0;
  7451. TAK;
  7452. LAR2;
  7453. <>D;
  7454. OD;
  7455. L 0;
  7456. BTI;
  7457. CALL FC 42;
  7458. CALL FC 42;
  7459. CALL FC 42;
  7460. CALL FB 45, DB 45;
  7461. CALL FB 45, DB 45;
  7462. CALL FB 45, DB 45;
  7463. TAR1;
  7464. LEAVE;
  7465. ATAN;
  7466. UW;
  7467. XOW;
  7468. L 0;
  7469. CLR;
  7470. SPZ AAVZ;
  7471. AAVZ: NOP 0;
  7472. -I;
  7473. SLD;
  7474. OD;
  7475. RND;
  7476. SET;
  7477. LAR2;
  7478. L 0;
  7479. CLR;
  7480. SPS AAWA;
  7481. AAWA: NOP 0;
  7482. -D;
  7483. LN;
  7484. ZR Z 42;
  7485. ==R;
  7486. L 0;
  7487. CLR;
  7488. SPO AAWB;
  7489. AAWB: NOP 0;
  7490. O M 0.4;
  7491. U M 0.4;
  7492. L 0;
  7493. SA T 42;
  7494. <>D;
  7495. -I;
  7496. L 0;
  7497. CLR;
  7498. SPBB AAWC;
  7499. AAWC: NOP 0;
  7500. SSD;
  7501. XOW;
  7502. O M 0.4;
  7503. RLD;
  7504. SRW;
  7505. L 0;
  7506. CLR;
  7507. SPBIN AAWD;
  7508. AAWD: NOP 0;
  7509. O M 0.4;
  7510. ACOS;
  7511. L 0;
  7512. CLR;
  7513. SPBNB AAWE;
  7514. AAWE: NOP 0;
  7515. CALL FB 45, DB 45;
  7516. CALL FB 45, DB 45;
  7517. CALL FB 45, DB 45;
  7518. TRUNC;
  7519. UN M 0.4;
  7520. TAK;
  7521. /D;
  7522. ITD;
  7523. LN;
  7524. ENT;
  7525. ATAN;
  7526. ABS;
  7527. L DW#16#60DC12EB;
  7528. AUF DB 42;
  7529. S M 0.4;
  7530. TAN;
  7531. RND-;
  7532. L 0;
  7533. SS T 42;
  7534. L MW 50;
  7535. + 1;
  7536. T MW 50;
  7537. T AW 0;
  7538. L 0;
  7539. CLR;
  7540. SPA AAWF;
  7541. AAWF: NOP 0;
  7542. L 0;
  7543. CLR;
  7544. SPBN AAWG;
  7545. AAWG: NOP 0;
  7546. XOW;
  7547. TDB;
  7548. LN;
  7549. ITD;
  7550. XN(;
  7551. );
  7552. ITB;
  7553. <>D;
  7554. L 0;
  7555. CLR;
  7556. SPBNB AAWH;
  7557. AAWH: NOP 0;
  7558. <>I;
  7559. TAR1;
  7560. TAR;
  7561. L 0;
  7562. CLR;
  7563. SPA AAWI;
  7564. AAWI: NOP 0;
  7565. RLD;
  7566. ITD;
  7567. L 0;
  7568. CLR;
  7569. SPM AAWJ;
  7570. AAWJ: NOP 0;
  7571. X M 0.4;
  7572. <=D;
  7573. U(;
  7574. );
  7575. XOW;
  7576. XN M 0.4;
  7577. L 0;
  7578. BTD;
  7579. FP M 0.4;
  7580. L 0;
  7581. CLR;
  7582. SPBN AAWK;
  7583. AAWK: NOP 0;
  7584. TDB;
  7585. <=I;
  7586. LAR1;
  7587. O M 0.4;
  7588. TRUNC;
  7589. CLR;
  7590. <=D;
  7591. ON M 0.4;
  7592. RRD;
  7593. NEGR;
  7594. +I;
  7595. COS;
  7596. L 0;
  7597. CLR;
  7598. SPZ AAWL;
  7599. AAWL: NOP 0;
  7600. RLDA;
  7601. /D;
  7602. MCR(;
  7603. MCRA;
  7604. MCRD;
  7605. )MCR;
  7606. O TRUE;
  7607. S M 0.4;
  7608. >=D;
  7609. O(;
  7610. );
  7611. TDB;
  7612. /R;
  7613. = M 0.4;
  7614. XOD;
  7615. SSD;
  7616. ITB;
  7617. DTB;
  7618. LC MW 0;
  7619. +R;
  7620. ON M 0.4;
  7621. >=I;
  7622. L DW#16#F997C779;
  7623. L DW#16#08942176;
  7624. TAR2;
  7625. SAVE;
  7626. L 0;
  7627. SA T 42;
  7628. NEGI;
  7629. SLW;
  7630. *R;
  7631. L 0;
  7632. CLR;
  7633. SPZ AAWM;
  7634. AAWM: NOP 0;
  7635. L 0;
  7636. CLR;
  7637. SPM AAWN;
  7638. AAWN: NOP 0;
  7639. <>R;
  7640. X FALSE;
  7641. LC MW 0;
  7642. SLD;
  7643. L 0;
  7644. CLR;
  7645. SPBIN AAWO;
  7646. AAWO: NOP 0;
  7647. DTR;
  7648. +D;
  7649. UN(;
  7650. );
  7651. NEGR;
  7652. <>I;
  7653. RND+;
  7654. ATAN;
  7655. L 0;
  7656. CLR;
  7657. SPPZ AAWP;
  7658. AAWP: NOP 0;
  7659. ON M 0.4;
  7660. <R;
  7661. L 0;
  7662. L 0;
  7663. CLR;
  7664. SPL AAWQ;
  7665. AAWQ: NOP 0;
  7666. BLD 0;
  7667. <I;
  7668. ABS;
  7669. FR Z 42;
  7670. O M 0.4;
  7671. X TRUE;
  7672. CALL FB 45, DB 45;
  7673. CALL FB 45, DB 45;
  7674. CALL FB 45, DB 45;
  7675. ==R;
  7676. /D;
  7677. SET;
  7678. L DW#16#285EED0A;
  7679. CLR;
  7680. L 0;
  7681. CLR;
  7682. LOOP AAWR;
  7683. AAWR: NOP 0;
  7684. ON(;
  7685. );
  7686. ON(;
  7687. );
  7688. + 0;
  7689. ==R;
  7690. UD;
  7691. ==I;
  7692. <=I;
  7693. SRD;
  7694. TRUNC;
  7695. L 0;
  7696. CLR;
  7697. SPP AAWS;
  7698. AAWS: NOP 0;
  7699. POP;
  7700. -I;
  7701. LAR1;
  7702. DTB;
  7703. XN M 0.4;
  7704. MOD;
  7705. + 0;
  7706. <>D;
  7707. LC MW 0;
  7708. X TRUE;
  7709. LAR1;
  7710. ENT;
  7711. L 0;
  7712. CLR;
  7713. SPBI AAWT;
  7714. AAWT: NOP 0;
  7715. OD;
  7716. RLD;
  7717. ITD;
  7718. INC 0;
  7719. L 0;
  7720. BTD;
  7721. XOD;
  7722. *I;
  7723. L 0;
  7724. CLR;
  7725. SPM AAWU;
  7726. AAWU: NOP 0;
  7727. SSI;
  7728. L 0;
  7729. L 0;
  7730. CLR;
  7731. SPL AAWV;
  7732. AAWV: NOP 0;
  7733. SET;
  7734. PUSH;
  7735. >R;
  7736. XN(;
  7737. );
  7738. OW;
  7739. ==R;
  7740. TAR;
  7741. L 0;
  7742. CLR;
  7743. SPBI AAWW;
  7744. AAWW: NOP 0;
  7745. AUF DB 42;
  7746. OD;
  7747. -D;
  7748. TAR1;
  7749. U M 0.4;
  7750. L 0;
  7751. SI T 42;
  7752. +R;
  7753. L 0;
  7754. BTD;
  7755. X M 0.4;
  7756. -D;
  7757. RND-;
  7758. L 0;
  7759. CLR;
  7760. SPM AAWX;
  7761. AAWX: NOP 0;
  7762. X(;
  7763. );
  7764. UD;
  7765. *R;
  7766. ITD;
  7767. UW;
  7768. RLDA;
  7769. PUSH;
  7770. ==R;
  7771. L MW 50;
  7772. + 1;
  7773. T MW 50;
  7774. T AW 0;
  7775. L 0;
  7776. CLR;
  7777. SPBN AAWY;
  7778. AAWY: NOP 0;
  7779. L 0;
  7780. CLR;
  7781. SPM AAWZ;
  7782. AAWZ: NOP 0;
  7783. EXP;
  7784. L 0;
  7785. CLR;
  7786. SPM AAXA;
  7787. AAXA: NOP 0;
  7788. <>I;
  7789. SAVE;
  7790. L 0;
  7791. SA T 42;
  7792. XN(;
  7793. );
  7794. XN FALSE;
  7795. L 0;
  7796. BTI;
  7797. O FALSE;
  7798. ==I;
  7799. SRD;
  7800. DTB;
  7801. FN M 0.4;
  7802. O TRUE;
  7803. RLD;
  7804. UW;
  7805. CALL FC 42;
  7806. CALL FC 42;
  7807. CALL FC 42;
  7808. ZV Z 42;
  7809. U(;
  7810. );
  7811. -D;
  7812. TAW;
  7813. UC FC 44;
  7814. = M 0.4;
  7815. ON M 0.4;
  7816. NEGI;
  7817. RLD;
  7818. S M 0.4;
  7819. SSI;
  7820. ON(;
  7821. );
  7822. +D;
  7823. POP;
  7824. SIN;
  7825. *D;
  7826. O(;
  7827. );
  7828. TDB;
  7829. OW;
  7830. X FALSE;
  7831. L 0;
  7832. CLR;
  7833. SPO AAXB;
  7834. AAXB: NOP 0;
  7835. R M 0.4;
  7836. NEGR;
  7837. L 0;
  7838. SS T 42;
  7839. SAVE;
  7840. FN M 0.4;
  7841. TRUNC;
  7842. XOW;
  7843. -R;
  7844. ITD;
  7845. DTB;
  7846. UW;
  7847. L DW#16#F28F9444;
  7848. POP;
  7849. POP;
  7850. SIN;
  7851. ==I;
  7852. +AR1;
  7853. + 0;
  7854. TAR2;
  7855. ASIN;
  7856. FP M 0.4;
  7857. <R;
  7858. ITB;
  7859. TAK;
  7860. SQR;
  7861. L 0;
  7862. SI T 42;
  7863. L 0;
  7864. CLR;
  7865. LOOP AAXC;
  7866. AAXC: NOP 0;
  7867. <>R;
  7868. XOW;
  7869. SET;
  7870. LAR2;
  7871. /I;
  7872. L 0;
  7873. CLR;
  7874. SPN AAXD;
  7875. AAXD: NOP 0;
  7876. TAK;
  7877. L 0;
  7878. CLR;
  7879. SPPZ AAXE;
  7880. AAXE: NOP 0;
  7881. /D;
  7882. LN;
  7883. ACOS;
  7884. L 0;
  7885. CLR;
  7886. SPM AAXF;
  7887. AAXF: NOP 0;
  7888. UC FC 44;
  7889. RND-;
  7890. LEAVE;
  7891. XOD;
  7892. NEGD;
  7893. MOD;
  7894. TAK;
  7895. ZV Z 42;
  7896. +D;
  7897. TAR;
  7898. T MD 0;
  7899. ABS;
  7900. U M 0.4;
  7901. O TRUE;
  7902. CALL FB 45, DB 45;
  7903. CALL FB 45, DB 45;
  7904. CALL FB 45, DB 45;
  7905. X M 0.4;
  7906. L 0;
  7907. SS T 42;
  7908. <>D;
  7909. L 0;
  7910. CLR;
  7911. SPO AAXG;
  7912. AAXG: NOP 0;
  7913. UN M 0.4;
  7914. L 0;
  7915. CLR;
  7916. SPBIN AAXH;
  7917. AAXH: NOP 0;
  7918. TAW;
  7919. NEGD;
  7920. L 0;
  7921. CLR;
  7922. SPN AAXI;
  7923. AAXI: NOP 0;
  7924. XN M 0.4;
  7925. L 0;
  7926. L 0;
  7927. CLR;
  7928. SPL AAXJ;
  7929. AAXJ: NOP 0;
  7930. PUSH;
  7931. L 0;
  7932. SV T 42;
  7933. POP;
  7934. DEC 0;
  7935. DEC 0;
  7936. ==R;
  7937. SAVE;
  7938. ON TRUE;
  7939. + 0;
  7940. ==R;
  7941. >D;
  7942. AUF DB 42;
  7943. -D;
  7944. BLD 0;
  7945. L DW#16#3BA58126;
  7946. L 0;
  7947. CLR;
  7948. SPBIN AAXK;
  7949. AAXK: NOP 0;
  7950. CLR;
  7951. DEC 0;
  7952. SQR;
  7953. INC 0;
  7954. NEGR;
  7955. R M 0.4;
  7956. L 0;
  7957. CLR;
  7958. SPPZ AAXL;
  7959. AAXL: NOP 0;
  7960. SLD;
  7961. <=R;
  7962. SRD;
  7963. +AR1;
  7964. SAVE;
  7965. CALL FB 45, DB 45;
  7966. CALL FB 45, DB 45;
  7967. CALL FB 45, DB 45;
  7968. L 0;
  7969. CLR;
  7970. SPBIN AAXM;
  7971. AAXM: NOP 0;
  7972. ON TRUE;
  7973. S M 0.4;
  7974. O(;
  7975. );
  7976. L 0;
  7977. CLR;
  7978. SPU AAXN;
  7979. AAXN: NOP 0;
  7980. *I;
  7981. ATAN;
  7982. SIN;
  7983. <I;
  7984. RND;
  7985. CC FC 43;
  7986. O M 0.4;
  7987. +R;
  7988. UN(;
  7989. );
  7990. L 0;
  7991. CLR;
  7992. SPS AAXO;
  7993. AAXO: NOP 0;
  7994. UW;
  7995. X TRUE;
  7996. OD;
  7997. LEAVE;
  7998. <=D;
  7999. L 0;
  8000. CLR;
  8001. SPPZ AAXP;
  8002. AAXP: NOP 0;
  8003. RRDA;
  8004. TAW;
  8005. ==R;
  8006. U(;
  8007. );
  8008. /R;
  8009. T MD 0;
  8010. CALL FB 45, DB 45;
  8011. CALL FB 45, DB 45;
  8012. CALL FB 45, DB 45;
  8013. +AR1;
  8014. L 0;
  8015. SI T 42;
  8016. CLR;
  8017. TAW;
  8018. ACOS;
  8019. L 0;
  8020. CLR;
  8021. SPBNB AAXQ;
  8022. AAXQ: NOP 0;
  8023. /R;
  8024. >=D;
  8025. ==D;
  8026. L 0;
  8027. CLR;
  8028. LOOP AAXR;
  8029. AAXR: NOP 0;
  8030. NOT;
  8031. SLW;
  8032. DEC 0;
  8033. U(;
  8034. );
  8035. TAK;
  8036. SQR;
  8037. AUF DB 42;
  8038. NOT;
  8039. SQR;
  8040. RRDA;
  8041. ATAN;
  8042. ==D;
  8043. <>D;
  8044. SLD;
  8045. ENT;
  8046. DTR;
  8047. SRD;
  8048. ABS;
  8049. DEC 0;
  8050. DTR;
  8051. ENT;
  8052. UW;
  8053. L DW#16#3E085CB7;
  8054. TDB;
  8055. ACOS;
  8056. L 0;
  8057. CLR;
  8058. SPM AAXS;
  8059. AAXS: NOP 0;
  8060. +AR1;
  8061. SET;
  8062. <>I;
  8063. LN;
  8064. TAN;
  8065. -D;
  8066. *I;
  8067. ITD;
  8068. L 0;
  8069. CLR;
  8070. SPM AAXT;
  8071. AAXT: NOP 0;
  8072. -I;
  8073. CALL FB 45, DB 45;
  8074. CALL FB 45, DB 45;
  8075. CALL FB 45, DB 45;
  8076. U TRUE;
  8077. >=R;
  8078. *I;
  8079. LAR2;
  8080. >=D;
  8081. LAR1;
  8082. XN FALSE;
  8083. INVI;
  8084. /D;
  8085. ==R;
  8086. NOT;
  8087. <>I;
  8088. UN(;
  8089. );
  8090. FR Z 42;
  8091. >=D;
  8092. L 0;
  8093. CLR;
  8094. SPBB AAXU;
  8095. AAXU: NOP 0;
  8096. ON M 0.4;
  8097. +I;
  8098. <>I;
  8099. L 0;
  8100. CLR;
  8101. SPS AAXV;
  8102. AAXV: NOP 0;
  8103. TAR;
  8104. SSD;
  8105. XN M 0.4;
  8106. L 0;
  8107. CLR;
  8108. SPMZ AAXW;
  8109. AAXW: NOP 0;
  8110. NEGI;
  8111. UD;
  8112. NEGD;
  8113. INVD;
  8114. XOD;
  8115. L 0;
  8116. SA T 42;
  8117. ZR Z 42;
  8118. TAK;
  8119. SLD;
  8120. <D;
  8121. X M 0.4;
  8122. MOD;
  8123. BLD 0;
  8124. UW;
  8125. XN TRUE;
  8126. >=R;
  8127. ON(;
  8128. );
  8129. L 0;
  8130. CLR;
  8131. SPBN AAXX;
  8132. AAXX: NOP 0;
  8133. INVI;
  8134. L 0;
  8135. CLR;
  8136. SPA AAXY;
  8137. AAXY: NOP 0;
  8138. UN(;
  8139. );
  8140. SSI;
  8141. O M 0.4;
  8142. XN(;
  8143. );
  8144. *R;
  8145. L 0;
  8146. CLR;
  8147. SPA AAXZ;
  8148. AAXZ: NOP 0;
  8149. +D;
  8150. ==I;
  8151. X M 0.4;
  8152. L 0;
  8153. CLR;
  8154. SPBNB AAYA;
  8155. AAYA: NOP 0;
  8156. -R;
  8157. TRUNC;
  8158. +R;
  8159. L 0;
  8160. SV T 42;
  8161. FN M 0.4;
  8162. L 0;
  8163. CLR;
  8164. SPN AAYB;
  8165. AAYB: NOP 0;
  8166. SRD;
  8167. CALL FB 45, DB 45;
  8168. CALL FB 45, DB 45;
  8169. CALL FB 45, DB 45;
  8170. XOW;
  8171. SET;
  8172. L 0;
  8173. BTD;
  8174. DTR;
  8175. RRDA;
  8176. TAR2;
  8177. ENT;
  8178. XN M 0.4;
  8179. X FALSE;
  8180. OW;
  8181. L 0;
  8182. CLR;
  8183. SPS AAYC;
  8184. AAYC: NOP 0;
  8185. L 0;
  8186. CLR;
  8187. SPU AAYD;
  8188. AAYD: NOP 0;
  8189. RLD;
  8190. /R;
  8191. <>R;
  8192. X M 0.4;
  8193. -I;
  8194. /I;
  8195. /I;
  8196. L 0;
  8197. CLR;
  8198. SPO AAYE;
  8199. AAYE: NOP 0;
  8200. RND+;
  8201. RRDA;
  8202. L 0;
  8203. L 0;
  8204. CLR;
  8205. SPL AAYF;
  8206. AAYF: NOP 0;
  8207. ON(;
  8208. );
  8209. ZV Z 42;
  8210. *R;
  8211. UN TRUE;
  8212. TAD;
  8213. <=D;
  8214. +I;
  8215. /R;
  8216. >D;
  8217. SET;
  8218. +R;
  8219. L 0;
  8220. SA T 42;
  8221. L MW 50;
  8222. + 1;
  8223. T MW 50;
  8224. T AW 0;
  8225. RND;
  8226. SIN;
  8227. RND-;
  8228. DEC 0;
  8229. ==R;
  8230. ASIN;
  8231. L 0;
  8232. CLR;
  8233. SPZ AAYG;
  8234. AAYG: NOP 0;
  8235. CC FC 43;
  8236. L 0;
  8237. CLR;
  8238. SPMZ AAYH;
  8239. AAYH: NOP 0;
  8240. T MD 0;
  8241. OD;
  8242. ==D;
  8243. INVD;
  8244. >D;
  8245. +AR2;
  8246. OD;
  8247. INVI;
  8248. >D;
  8249. L 0;
  8250. CLR;
  8251. SPZ AAYI;
  8252. AAYI: NOP 0;
  8253. UW;
  8254. <>D;
  8255. ACOS;
  8256. >=D;
  8257. LEAVE;
  8258. <>R;
  8259. L 0;
  8260. CLR;
  8261. SPP AAYJ;
  8262. AAYJ: NOP 0;
  8263. XN(;
  8264. );
  8265. POP;
  8266. XOW;
  8267. <I;
  8268. L 0;
  8269. BTD;
  8270. L 0;
  8271. CLR;
  8272. SPP AAYK;
  8273. AAYK: NOP 0;
  8274. >=D;
  8275. UN TRUE;
  8276. LN;
  8277. LN;
  8278. L 0;
  8279. CLR;
  8280. SPO AAYL;
  8281. AAYL: NOP 0;
  8282. LAR2;
  8283. L 0;
  8284. L 0;
  8285. CLR;
  8286. SPL AAYM;
  8287. AAYM: NOP 0;
  8288. <=D;
  8289. ITD;
  8290. ==I;
  8291. ==D;
  8292. L 0;
  8293. BTD;
  8294. U TRUE;
  8295. UC FC 44;
  8296. INC 0;
  8297. L MW 50;
  8298. + 1;
  8299. T MW 50;
  8300. T AW 0;
  8301. TRUNC;
  8302. CALL FB 45, DB 45;
  8303. CALL FB 45, DB 45;
  8304. CALL FB 45, DB 45;
  8305. TRUNC;
  8306. TRUNC;
  8307. U TRUE;
  8308. S M 0.4;
  8309. SRW;
  8310. <>D;
  8311. RRDA;
  8312. CC FC 43;
  8313. SSD;
  8314. /D;
  8315. L 0;
  8316. BTD;
  8317. *R;
  8318. RLD;
  8319. SLW;
  8320. >D;
  8321. >R;
  8322. DTB;
  8323. TAD;
  8324. O TRUE;
  8325. ON M 0.4;
  8326. L 0;
  8327. CLR;
  8328. SPA AAYN;
  8329. AAYN: NOP 0;
  8330. LN;
  8331. TAW;
  8332. INVI;
  8333. INVD;
  8334. X(;
  8335. );
  8336. L 0;
  8337. BTI;
  8338. LAR1;
  8339. RLD;
  8340. L 0;
  8341. CLR;
  8342. SPPZ AAYO;
  8343. AAYO: NOP 0;
  8344. TAR2;
  8345. L DW#16#6D744A0B;
  8346. X TRUE;
  8347. L 0;
  8348. CLR;
  8349. SPN AAYP;
  8350. AAYP: NOP 0;
  8351. /R;
  8352. L MW 50;
  8353. + 1;
  8354. T MW 50;
  8355. T AW 0;
  8356. DEC 0;
  8357. CALL FB 45, DB 45;
  8358. CALL FB 45, DB 45;
  8359. CALL FB 45, DB 45;
  8360. UD;
  8361. UW;
  8362. ON FALSE;
  8363. TAR;
  8364. TAR1;
  8365. X FALSE;
  8366. L 0;
  8367. SS T 42;
  8368. UD;
  8369. ABS;
  8370. X TRUE;
  8371. L 0;
  8372. SS T 42;
  8373. U(;
  8374. );
  8375. ITD;
  8376. L 0;
  8377. CLR;
  8378. SPBNB AAYQ;
  8379. AAYQ: NOP 0;
  8380. LAR1;
  8381. ABS;
  8382. L 0;
  8383. CLR;
  8384. SPO AAYR;
  8385. AAYR: NOP 0;
  8386. L 0;
  8387. CLR;
  8388. SPBB AAYS;
  8389. AAYS: NOP 0;
  8390. MCR(;
  8391. MCRA;
  8392. MCRD;
  8393. )MCR;
  8394. <R;
  8395. TAN;
  8396. L 0;
  8397. CLR;
  8398. SPBI AAYT;
  8399. AAYT: NOP 0;
  8400. L MW 50;
  8401. + 1;
  8402. T MW 50;
  8403. T AW 0;
  8404. UN(;
  8405. );
  8406. L 0;
  8407. SS T 42;
  8408. <D;
  8409. MCR(;
  8410. MCRA;
  8411. MCRD;
  8412. )MCR;
  8413. TAR;
  8414. CLR;
  8415. RRDA;
  8416. <>I;
  8417. ITB;
  8418. BLD 0;
  8419. XOD;
  8420. <>D;
  8421. /R;
  8422. LN;
  8423. L 0;
  8424. CLR;
  8425. SPM AAYU;
  8426. AAYU: NOP 0;
  8427. TAR;
  8428. U FALSE;
  8429. TAR1;
  8430. CALL FC 42;
  8431. CALL FC 42;
  8432. CALL FC 42;
  8433. INVI;
  8434. TAR1;
  8435. CLR;
  8436. LC MW 0;
  8437. L 0;
  8438. CLR;
  8439. SPM AAYV;
  8440. AAYV: NOP 0;
  8441. >R;
  8442. >=I;
  8443. CLR;
  8444. >I;
  8445. TAR;
  8446. +D;
  8447. NOT;
  8448. UW;
  8449. -R;
  8450. L 0;
  8451. SV T 42;
  8452. L MW 50;
  8453. + 1;
  8454. T MW 50;
  8455. T AW 0;
  8456. <>R;
  8457. MOD;
  8458. TAK;
  8459. +R;
  8460. XN FALSE;
  8461. L 0;
  8462. CLR;
  8463. SPU AAYW;
  8464. AAYW: NOP 0;
  8465. LEAVE;
  8466. <=D;
  8467. >R;
  8468. >=D;
  8469. L 0;
  8470. BTI;
  8471. UN(;
  8472. );
  8473. COS;
  8474. L 0;
  8475. CLR;
  8476. SPS AAYX;
  8477. AAYX: NOP 0;
  8478. L 0;
  8479. CLR;
  8480. SPZ AAYY;
  8481. AAYY: NOP 0;
  8482. T MD 0;
  8483. L 0;
  8484. CLR;
  8485. SPBB AAYZ;
  8486. AAYZ: NOP 0;
  8487. ITB;
  8488. <I;
  8489. ==D;
  8490. INVI;
  8491. U M 0.4;
  8492. LC MW 0;
  8493. ON M 0.4;
  8494. TAR2;
  8495. RLDA;
  8496. RLDA;
  8497. XOD;
  8498. UN M 0.4;
  8499. UC FC 44;
  8500. RRD;
  8501. RND+;
  8502. NEGR;
  8503. NOP 0;
  8504. SLW;
  8505. TAR1;
  8506. EXP;
  8507. LAR2;
  8508. S M 0.4;
  8509. SET;
  8510. SET;
  8511. UN M 0.4;
  8512. FR Z 42;
  8513. TAK;
  8514. L 0;
  8515. CLR;
  8516. SPB AAZA;
  8517. AAZA: NOP 0;
  8518. POP;
  8519. NEGI;
  8520. U(;
  8521. );
  8522. L 0;
  8523. BTD;
  8524. >=D;
  8525. O(;
  8526. );
  8527. *I;
  8528. ON FALSE;
  8529. O TRUE;
  8530. L 0;
  8531. CLR;
  8532. SPMZ AAZB;
  8533. AAZB: NOP 0;
  8534. SET;
  8535. U(;
  8536. );
  8537. ==I;
  8538. SIN;
  8539. L 0;
  8540. BTI;
  8541. >R;
  8542. L 0;
  8543. CLR;
  8544. SPBN AAZC;
  8545. AAZC: NOP 0;
  8546. L MW 50;
  8547. + 1;
  8548. T MW 50;
  8549. T AW 0;
  8550. CALL FB 45, DB 45;
  8551. CALL FB 45, DB 45;
  8552. CALL FB 45, DB 45;
  8553. DEC 0;
  8554. ENT;
  8555. L 0;
  8556. BTI;
  8557. TAR1;
  8558. +AR2;
  8559. +D;
  8560. ON FALSE;
  8561. L 0;
  8562. CLR;
  8563. SPBIN AAZD;
  8564. AAZD: NOP 0;
  8565. L 0;
  8566. CLR;
  8567. SPM AAZE;
  8568. AAZE: NOP 0;
  8569. *D;
  8570. +R;
  8571. XN(;
  8572. );
  8573. ASIN;
  8574. TAK;
  8575. X(;
  8576. );
  8577. L 0;
  8578. CLR;
  8579. SPBNB AAZF;
  8580. AAZF: NOP 0;
  8581. SSD;
  8582. <>D;
  8583. >=I;
  8584. L 0;
  8585. L 0;
  8586. CLR;
  8587. SPL AAZG;
  8588. AAZG: NOP 0;
  8589. L 0;
  8590. CLR;
  8591. SPMZ AAZH;
  8592. AAZH: NOP 0;
  8593. UW;
  8594. LN;
  8595. UW;
  8596. NEGI;
  8597. NEGI;
  8598. L MW 50;
  8599. + 1;
  8600. T MW 50;
  8601. T AW 0;
  8602. O(;
  8603. );
  8604. ==I;
  8605. DEC 0;
  8606. OW;
  8607. SET;
  8608. SLD;
  8609. CC FC 43;
  8610. L 0;
  8611. CLR;
  8612. SPBB AAZI;
  8613. AAZI: NOP 0;
  8614. ASIN;
  8615. UC FC 44;
  8616. L 0;
  8617. CLR;
  8618. SPP AAZJ;
  8619. AAZJ: NOP 0;
  8620. ZR Z 42;
  8621. UW;
  8622. +AR1;
  8623. /I;
  8624. ==D;
  8625. LEAVE;
  8626. RLDA;
  8627. L 0;
  8628. SA T 42;
  8629. RLDA;
  8630. RRD;
  8631. ITB;
  8632. L MW 50;
  8633. + 1;
  8634. T MW 50;
  8635. T AW 0;
  8636. TRUNC;
  8637. L 0;
  8638. CLR;
  8639. SPBNB AAZK;
  8640. AAZK: NOP 0;
  8641. DTB;
  8642. U M 0.4;
  8643. <I;
  8644. U TRUE;
  8645. <I;
  8646. NEGI;
  8647. SIN;
  8648. LN;
  8649. XN TRUE;
  8650. *I;
  8651. ENT;
  8652. NEGD;
  8653. O M 0.4;
  8654. INVI;
  8655. L 0;
  8656. CLR;
  8657. SPBN AAZL;
  8658. AAZL: NOP 0;
  8659. ZV Z 42;
  8660. XN(;
  8661. );
  8662. L 0;
  8663. CLR;
  8664. SPS AAZM;
  8665. AAZM: NOP 0;
  8666. L 0;
  8667. CLR;
  8668. SPBIN AAZN;
  8669. AAZN: NOP 0;
  8670. L 0;
  8671. SI T 42;
  8672. TAK;
  8673. L 0;
  8674. CLR;
  8675. SPM AAZO;
  8676. AAZO: NOP 0;
  8677. UN M 0.4;
  8678. >I;
  8679. L 0;
  8680. CLR;
  8681. SPU AAZP;
  8682. AAZP: NOP 0;
  8683. +I;
  8684. ABS;
  8685. INC 0;
  8686. UN FALSE;
  8687. DTB;
  8688. L 0;
  8689. CLR;
  8690. SPMZ AAZQ;
  8691. AAZQ: NOP 0;
  8692. L 0;
  8693. CLR;
  8694. LOOP AAZR;
  8695. AAZR: NOP 0;
  8696. SRW;
  8697. SLW;
  8698. ON FALSE;
  8699. SLD;
  8700. ==R;
  8701. TAR2;
  8702. UD;
  8703. L 0;
  8704. CLR;
  8705. SPU AAZS;
  8706. AAZS: NOP 0;
  8707. MCR(;
  8708. MCRA;
  8709. MCRD;
  8710. )MCR;
  8711. LN;
  8712. O(;
  8713. );
  8714. L 0;
  8715. SA T 42;
  8716. L 0;
  8717. CLR;
  8718. SPBIN AAZT;
  8719. AAZT: NOP 0;
  8720. LEAVE;
  8721. L 0;
  8722. CLR;
  8723. SPN AAZU;
  8724. AAZU: NOP 0;
  8725. POP;
  8726. UD;
  8727. X M 0.4;
  8728. NEGI;
  8729. +AR1;
  8730. L 0;
  8731. CLR;
  8732. SPMZ AAZV;
  8733. AAZV: NOP 0;
  8734. /I;
  8735. X(;
  8736. );
  8737. <=D;
  8738. L 0;
  8739. CLR;
  8740. SPB AAZW;
  8741. AAZW: NOP 0;
  8742. UN TRUE;
  8743. MOD;
  8744. XOW;
  8745. <R;
  8746. DEC 0;
  8747. UC FC 44;
  8748. *R;
  8749. L 0;
  8750. BTD;
  8751. CALL FB 45, DB 45;
  8752. CALL FB 45, DB 45;
  8753. CALL FB 45, DB 45;
  8754. >I;
  8755. L 0;
  8756. CLR;
  8757. SPS AAZX;
  8758. AAZX: NOP 0;
  8759. L 0;
  8760. CLR;
  8761. SPN AAZY;
  8762. AAZY: NOP 0;
  8763. O TRUE;
  8764. LN;
  8765. SET;
  8766. RLDA;
  8767. RND+;
  8768. /D;
  8769. TAR;
  8770. L 0;
  8771. CLR;
  8772. SPO AAZZ;
  8773. AAZZ: NOP 0;
  8774. NEGR;
  8775. UW;
  8776. L 0;
  8777. CLR;
  8778. SPO ABAA;
  8779. ABAA: NOP 0;
  8780. <=R;
  8781. <>I;
  8782. /D;
  8783. ON FALSE;
  8784. CLR;
  8785. LAR2;
  8786. L 0;
  8787. SI T 42;
  8788. U TRUE;
  8789. RRDA;
  8790. ==R;
  8791. ITD;
  8792. +I;
  8793. SLD;
  8794. UW;
  8795. L 0;
  8796. CLR;
  8797. SPZ ABAB;
  8798. ABAB: NOP 0;
  8799. L 0;
  8800. CLR;
  8801. SPPZ ABAC;
  8802. ABAC: NOP 0;
  8803. <D;
  8804. FN M 0.4;
  8805. L 0;
  8806. SS T 42;
  8807. ==D;
  8808. INVD;
  8809. ON TRUE;
  8810. *R;
  8811. L 0;
  8812. SA T 42;
  8813. >I;
  8814. UN M 0.4;
  8815. L 0;
  8816. CLR;
  8817. SPZ ABAD;
  8818. ABAD: NOP 0;
  8819. XN FALSE;
  8820. L 0;
  8821. CLR;
  8822. SPU ABAE;
  8823. ABAE: NOP 0;
  8824. SSI;
  8825. XN FALSE;
  8826. L 0;
  8827. SA T 42;
  8828. L 0;
  8829. CLR;
  8830. SPZ ABAF;
  8831. ABAF: NOP 0;
  8832. XN M 0.4;
  8833. +AR1;
  8834. L 0;
  8835. CLR;
  8836. SPZ ABAG;
  8837. ABAG: NOP 0;
  8838. NEGI;
  8839. L 0;
  8840. CLR;
  8841. SPM ABAH;
  8842. ABAH: NOP 0;
  8843. INVI;
  8844. DTB;
  8845. L 0;
  8846. CLR;
  8847. SPBB ABAI;
  8848. ABAI: NOP 0;
  8849. L 0;
  8850. L 0;
  8851. CLR;
  8852. SPL ABAJ;
  8853. ABAJ: NOP 0;
  8854. XOW;
  8855. L 0;
  8856. CLR;
  8857. SPP ABAK;
  8858. ABAK: NOP 0;
  8859. LAR1;
  8860. <I;
  8861. L 0;
  8862. CLR;
  8863. SPA ABAL;
  8864. ABAL: NOP 0;
  8865. <=D;
  8866. <>R;
  8867. L 0;
  8868. L 0;
  8869. CLR;
  8870. SPL ABAM;
  8871. ABAM: NOP 0;
  8872. >I;
  8873. ON M 0.4;
  8874. ENT;
  8875. L 0;
  8876. SE T 42;
  8877. FP M 0.4;
  8878. INVD;
  8879. OD;
  8880. *I;
  8881. TAK;
  8882. L 0;
  8883. CLR;
  8884. SPP ABAN;
  8885. ABAN: NOP 0;
  8886. L 0;
  8887. CLR;
  8888. SPA ABAO;
  8889. ABAO: NOP 0;
  8890. <D;
  8891. L 0;
  8892. CLR;
  8893. SPBN ABAP;
  8894. ABAP: NOP 0;
  8895. DEC 0;
  8896. FR Z 42;
  8897. >=R;
  8898. = M 0.4;
  8899. L 0;
  8900. CLR;
  8901. SPZ ABAQ;
  8902. ABAQ: NOP 0;
  8903. L MW 50;
  8904. + 1;
  8905. T MW 50;
  8906. T AW 0;
  8907. L 0;
  8908. CLR;
  8909. LOOP ABAR;
  8910. ABAR: NOP 0;
  8911. OD;
  8912. LAR2;
  8913. U(;
  8914. );
  8915. ==D;
  8916. UN TRUE;
  8917. U(;
  8918. );
  8919. ==I;
  8920. -R;
  8921. UN(;
  8922. );
  8923. SET;
  8924. ASIN;
  8925. /R;
  8926. L 0;
  8927. BTI;
  8928. CALL FB 45, DB 45;
  8929. CALL FB 45, DB 45;
  8930. CALL FB 45, DB 45;
  8931. CALL FC 42;
  8932. CALL FC 42;
  8933. CALL FC 42;
  8934. T MD 0;
  8935. + 0;
  8936. L 0;
  8937. CLR;
  8938. SPZ ABAS;
  8939. ABAS: NOP 0;
  8940. L 0;
  8941. CLR;
  8942. SPU ABAT;
  8943. ABAT: NOP 0;
  8944. DTR;
  8945. XOW;
  8946. S M 0.4;
  8947. SSI;
  8948. INC 0;
  8949. ==D;
  8950. CLR;
  8951. SSI;
  8952. SAVE;
  8953. TAR1;
  8954. L 0;
  8955. CLR;
  8956. SPZ ABAU;
  8957. ABAU: NOP 0;
  8958. SSI;
  8959. SSD;
  8960. TRUNC;
  8961. TAD;
  8962. <D;
  8963. ZR Z 42;
  8964. -D;
  8965. /R;
  8966. ITB;
  8967. L 0;
  8968. CLR;
  8969. SPMZ ABAV;
  8970. ABAV: NOP 0;
  8971. L 0;
  8972. CLR;
  8973. SPPZ ABAW;
  8974. ABAW: NOP 0;
  8975. TAR1;
  8976. SRD;
  8977. UN FALSE;
  8978. SLW;
  8979. <>I;
  8980. *I;
  8981. SRW;
  8982. MCR(;
  8983. MCRA;
  8984. MCRD;
  8985. )MCR;
  8986. >=R;
  8987. L 0;
  8988. CLR;
  8989. SPBN ABAX;
  8990. ABAX: NOP 0;
  8991. *I;
  8992. CC FC 43;
  8993. +AR1;
  8994. <=I;
  8995. L 0;
  8996. SV T 42;
  8997. FP M 0.4;
  8998. SQRT;
  8999. ==I;
  9000. L 0;
  9001. CLR;
  9002. SPPZ ABAY;
  9003. ABAY: NOP 0;
  9004. POP;
  9005. = M 0.4;
  9006. L 0;
  9007. CLR;
  9008. SPO ABAZ;
  9009. ABAZ: NOP 0;
  9010. XOW;
  9011. MCR(;
  9012. MCRA;
  9013. MCRD;
  9014. )MCR;
  9015. SQR;
  9016. CALL FC 42;
  9017. CALL FC 42;
  9018. CALL FC 42;
  9019. LN;
  9020. RND-;
  9021. FR Z 42;
  9022. TAK;
  9023. <>R;
  9024. SLD;
  9025. -R;
  9026. X(;
  9027. );
  9028. +I;
  9029. NEGI;
  9030. CALL FC 42;
  9031. CALL FC 42;
  9032. CALL FC 42;
  9033. ACOS;
  9034. ATAN;
  9035. INC 0;
  9036. +I;
  9037. XOD;
  9038. RND+;
  9039. <=R;
  9040. R M 0.4;
  9041. DEC 0;
  9042. SRD;
  9043. >I;
  9044. CALL FC 42;
  9045. CALL FC 42;
  9046. CALL FC 42;
  9047. CALL FB 45, DB 45;
  9048. CALL FB 45, DB 45;
  9049. CALL FB 45, DB 45;
  9050. MCR(;
  9051. MCRA;
  9052. MCRD;
  9053. )MCR;
  9054. L 0;
  9055. CLR;
  9056. SPPZ ABBA;
  9057. ABBA: NOP 0;
  9058. POP;
  9059. SAVE;
  9060. LAR2;
  9061. L 0;
  9062. BTI;
  9063. L 0;
  9064. CLR;
  9065. SPS ABBB;
  9066. ABBB: NOP 0;
  9067. SQRT;
  9068. XN(;
  9069. );
  9070. SET;
  9071. ==I;
  9072. CALL FB 45, DB 45;
  9073. CALL FB 45, DB 45;
  9074. CALL FB 45, DB 45;
  9075. +R;
  9076. L 0;
  9077. CLR;
  9078. SPPZ ABBC;
  9079. ABBC: NOP 0;
  9080. RRD;
  9081. ON(;
  9082. );
  9083. CLR;
  9084. NEGR;
  9085. >D;
  9086. +AR2;
  9087. U M 0.4;
  9088. >=D;
  9089. <=D;
  9090. TAR;
  9091. XOW;
  9092. L 0;
  9093. CLR;
  9094. SPBNB ABBD;
  9095. ABBD: NOP 0;
  9096. *R;
  9097. +AR1;
  9098. T MD 0;
  9099. DTR;
  9100. INVD;
  9101. L 0;
  9102. CLR;
  9103. SPP ABBE;
  9104. ABBE: NOP 0;
  9105. L 0;
  9106. CLR;
  9107. SPBIN ABBF;
  9108. ABBF: NOP 0;
  9109. INC 0;
  9110. L 0;
  9111. CLR;
  9112. SPO ABBG;
  9113. ABBG: NOP 0;
  9114. ATAN;
  9115. -I;
  9116. SET;
  9117. BLD 0;
  9118. O M 0.4;
  9119. L MW 50;
  9120. + 1;
  9121. T MW 50;
  9122. T AW 0;
  9123. L 0;
  9124. SV T 42;
  9125. SQRT;
  9126. <=I;
  9127. L 0;
  9128. CLR;
  9129. SPBI ABBH;
  9130. ABBH: NOP 0;
  9131. ON(;
  9132. );
  9133. *D;
  9134. TAK;
  9135. UN(;
  9136. );
  9137. U M 0.4;
  9138. ENT;
  9139. + 0;
  9140. <>I;
  9141. L 0;
  9142. CLR;
  9143. SPBN ABBI;
  9144. ABBI: NOP 0;
  9145. UN FALSE;
  9146. ACOS;
  9147. CALL FC 42;
  9148. CALL FC 42;
  9149. CALL FC 42;
  9150. /R;
  9151. L 0;
  9152. CLR;
  9153. SPP ABBJ;
  9154. ABBJ: NOP 0;
  9155. +R;
  9156. SQRT;
  9157. +R;
  9158. ATAN;
  9159. XOD;
  9160. NEGD;
  9161. <=R;
  9162. SLW;
  9163. >D;
  9164. ITD;
  9165. POP;
  9166. -R;
  9167. +D;
  9168. SIN;
  9169. ==R;
  9170. L 0;
  9171. CLR;
  9172. SPBB ABBK;
  9173. ABBK: NOP 0;
  9174. <=I;
  9175. <>D;
  9176. O M 0.4;
  9177. = M 0.4;
  9178. X M 0.4;
  9179. <D;
  9180. SRD;
  9181. ATAN;
  9182. <>D;
  9183. NOT;
  9184. >D;
  9185. SIN;
  9186. TAR1;
  9187. CC FC 43;
  9188. TAN;
  9189. ITB;
  9190. TAR1;
  9191. L 0;
  9192. SV T 42;
  9193. TAN;
  9194. PUSH;
  9195. TAR;
  9196. -R;
  9197. /I;
  9198. TAD;
  9199. L 0;
  9200. BTD;
  9201. TAN;
  9202. CC FC 43;
  9203. UN M 0.4;
  9204. +AR1;
  9205. RLDA;
  9206. RND+;
  9207. RRDA;
  9208. TDB;
  9209. LN;
  9210. XOD;
  9211. +AR1;
  9212. -D;
  9213. O FALSE;
  9214. INC 0;
  9215. SLD;
  9216. *D;
  9217. <>I;
  9218. +AR2;
  9219. SLD;
  9220. S M 0.4;
  9221. <D;
  9222. UW;
  9223. L 0;
  9224. CLR;
  9225. SPB ABBL;
  9226. ABBL: NOP 0;
  9227. SSI;
  9228. L 0;
  9229. SS T 42;
  9230. S M 0.4;
  9231. L 0;
  9232. SA T 42;
  9233. L MW 50;
  9234. + 1;
  9235. T MW 50;
  9236. T AW 0;
  9237. SET;
  9238. FR Z 42;
  9239. SSD;
  9240. R M 0.4;
  9241. OD;
  9242. +AR2;
  9243. L 0;
  9244. CLR;
  9245. SPZ ABBM;
  9246. ABBM: NOP 0;
  9247. L MW 50;
  9248. + 1;
  9249. T MW 50;
  9250. T AW 0;
  9251. UN(;
  9252. );
  9253. +I;
  9254. XOW;
  9255. O M 0.4;
  9256. SSD;
  9257. TAR1;
  9258. L 0;
  9259. SE T 42;
  9260. SSD;
  9261. DEC 0;
  9262. L 0;
  9263. CLR;
  9264. SPMZ ABBN;
  9265. ABBN: NOP 0;
  9266. COS;
  9267. /I;
  9268. L 0;
  9269. CLR;
  9270. SPBI ABBO;
  9271. ABBO: NOP 0;
  9272. L 0;
  9273. CLR;
  9274. SPBNB ABBP;
  9275. ABBP: NOP 0;
  9276. <R;
  9277. ON TRUE;
  9278. LEAVE;
  9279. ZR Z 42;
  9280. ON(;
  9281. );
  9282. SLW;
  9283. +AR2;
  9284. >=R;
  9285. DEC 0;
  9286. UN(;
  9287. );
  9288. L 0;
  9289. CLR;
  9290. SPBNB ABBQ;
  9291. ABBQ: NOP 0;
  9292. U TRUE;
  9293. SRD;
  9294. NOT;
  9295. <=I;
  9296. L 0;
  9297. SI T 42;
  9298. R M 0.4;
  9299. L 0;
  9300. CLR;
  9301. SPB ABBR;
  9302. ABBR: NOP 0;
  9303. LC MW 0;
  9304. ==D;
  9305. L 0;
  9306. CLR;
  9307. SPB ABBS;
  9308. ABBS: NOP 0;
  9309. L 0;
  9310. L 0;
  9311. CLR;
  9312. SPL ABBT;
  9313. ABBT: NOP 0;
  9314. ZV Z 42;
  9315. ON M 0.4;
  9316. <>I;
  9317. CC FC 43;
  9318. <=R;
  9319. CALL FC 42;
  9320. CALL FC 42;
  9321. CALL FC 42;
  9322. <=D;
  9323. T MD 0;
  9324. *D;
  9325. <=R;
  9326. ZR Z 42;
  9327. RND+;
  9328. SRD;
  9329. ITB;
  9330. OW;
  9331. O TRUE;
  9332. NOT;
  9333. >=D;
  9334. CALL FB 45, DB 45;
  9335. CALL FB 45, DB 45;
  9336. CALL FB 45, DB 45;
  9337. ==R;
  9338. RRD;
  9339. LN;
  9340. -R;
  9341. RND+;
  9342. LAR1;
  9343. <R;
  9344. NEGI;
  9345. +AR1;
  9346. -I;
  9347. UN(;
  9348. );
  9349. AUF DB 42;
  9350. >I;
  9351. UN(;
  9352. );
  9353. <R;
  9354. MCR(;
  9355. MCRA;
  9356. MCRD;
  9357. )MCR;
  9358. SQR;
  9359. SLW;
  9360. L 0;
  9361. CLR;
  9362. SPO ABBU;
  9363. ABBU: NOP 0;
  9364. SLW;
  9365. XOW;
  9366. TRUNC;
  9367. +R;
  9368. *R;
  9369. SLW;
  9370. AUF DB 42;
  9371. >=D;
  9372. OW;
  9373. ATAN;
  9374. ON M 0.4;
  9375. L 0;
  9376. CLR;
  9377. SPBB ABBV;
  9378. ABBV: NOP 0;
  9379. T MD 0;
  9380. +R;
  9381. L 0;
  9382. CLR;
  9383. SPN ABBW;
  9384. ABBW: NOP 0;
  9385. OW;
  9386. X FALSE;
  9387. XOW;
  9388. /I;
  9389. ACOS;
  9390. L MW 50;
  9391. + 1;
  9392. T MW 50;
  9393. T AW 0;
  9394. L 0;
  9395. CLR;
  9396. SPA ABBX;
  9397. ABBX: NOP 0;
  9398. L 0;
  9399. CLR;
  9400. SPU ABBY;
  9401. ABBY: NOP 0;
  9402. L 0;
  9403. CLR;
  9404. SPA ABBZ;
  9405. ABBZ: NOP 0;
  9406. TDB;
  9407. FN M 0.4;
  9408. ZV Z 42;
  9409. BLD 0;
  9410. /R;
  9411. MCR(;
  9412. MCRA;
  9413. MCRD;
  9414. )MCR;
  9415. RND-;
  9416. NOP 0;
  9417. DTB;
  9418. L 0;
  9419. SA T 42;
  9420. L 0;
  9421. CLR;
  9422. LOOP ABCA;
  9423. ABCA: NOP 0;
  9424. ITB;
  9425. L 0;
  9426. CLR;
  9427. SPN ABCB;
  9428. ABCB: NOP 0;
  9429. TAK;
  9430. O M 0.4;
  9431. O M 0.4;
  9432. XN(;
  9433. );
  9434. ON M 0.4;
  9435. LN;
  9436. FN M 0.4;
  9437. UW;
  9438. FP M 0.4;
  9439. T MD 0;
  9440. *I;
  9441. TAW;
  9442. L 0;
  9443. CLR;
  9444. SPBN ABCC;
  9445. ABCC: NOP 0;
  9446. LC MW 0;
  9447. DTB;
  9448. O FALSE;
  9449. CLR;
  9450. O(;
  9451. );
  9452. CALL FB 45, DB 45;
  9453. CALL FB 45, DB 45;
  9454. CALL FB 45, DB 45;
  9455. NEGR;
  9456. SET;
  9457. >=I;
  9458. <I;
  9459. SET;
  9460. CC FC 43;
  9461. ==D;
  9462. MOD;
  9463. LEAVE;
  9464. L 0;
  9465. BTD;
  9466. <>I;
  9467. L 0;
  9468. BTD;
  9469. LC MW 0;
  9470. L 0;
  9471. CLR;
  9472. SPBI ABCD;
  9473. ABCD: NOP 0;
  9474. SSI;
  9475. R M 0.4;
  9476. TAR1;
  9477. L 0;
  9478. L 0;
  9479. CLR;
  9480. SPL ABCE;
  9481. ABCE: NOP 0;
  9482. ASIN;
  9483. L 0;
  9484. CLR;
  9485. SPM ABCF;
  9486. ABCF: NOP 0;
  9487. ZV Z 42;
  9488. >R;
  9489. = M 0.4;
  9490. L 0;
  9491. L 0;
  9492. CLR;
  9493. SPL ABCG;
  9494. ABCG: NOP 0;
  9495. ON(;
  9496. );
  9497. +R;
  9498. *R;
  9499. L 0;
  9500. CLR;
  9501. SPU ABCH;
  9502. ABCH: NOP 0;
  9503. ON(;
  9504. );
  9505. ZR Z 42;
  9506. AUF DB 42;
  9507. L 0;
  9508. BTI;
  9509. LAR1;
  9510. XN(;
  9511. );
  9512. RLD;
  9513. INVI;
  9514. L MW 50;
  9515. + 1;
  9516. T MW 50;
  9517. T AW 0;
  9518. /R;
  9519. L 0;
  9520. BTI;
  9521. RLD;
  9522. ==I;
  9523. <D;
  9524. OD;
  9525. ACOS;
  9526. NEGR;
  9527. ==I;
  9528. LAR2;
  9529. ZR Z 42;
  9530. FP M 0.4;
  9531. O FALSE;
  9532. = M 0.4;
  9533. DEC 0;
  9534. LC MW 0;
  9535. T MD 0;
  9536. X M 0.4;
  9537. RLDA;
  9538. <=D;
  9539. U M 0.4;
  9540. ON TRUE;
  9541. TDB;
  9542. <=D;
  9543. L 0;
  9544. CLR;
  9545. SPMZ ABCI;
  9546. ABCI: NOP 0;
  9547. /R;
  9548. +AR1;
  9549. U M 0.4;
  9550. L 0;
  9551. SE T 42;
  9552. RLD;
  9553. SRW;
  9554. ATAN;
  9555. SQRT;
  9556. XN(;
  9557. );
  9558. OD;
  9559. TAD;
  9560. U M 0.4;
  9561. -R;
  9562. SLD;
  9563. >=I;
  9564. INC 0;
  9565. UD;
  9566. + 0;
  9567. L 0;
  9568. CLR;
  9569. SPU ABCJ;
  9570. ABCJ: NOP 0;
  9571. L 0;
  9572. CLR;
  9573. SPO ABCK;
  9574. ABCK: NOP 0;
  9575. SQR;
  9576. O(;
  9577. );
  9578. CLR;
  9579. -D;
  9580. XOW;
  9581. +I;
  9582. S M 0.4;
  9583. TAR2;
  9584. L 0;
  9585. CLR;
  9586. SPBNB ABCL;
  9587. ABCL: NOP 0;
  9588. INVI;
  9589. L 0;
  9590. BTI;
  9591. PUSH;
  9592. X TRUE;
  9593. ITD;
  9594. L 0;
  9595. CLR;
  9596. SPBIN ABCM;
  9597. ABCM: NOP 0;
  9598. *R;
  9599. ==I;
  9600. + 0;
  9601. SRD;
  9602. NOT;
  9603. LAR1;
  9604. ITD;
  9605. >D;
  9606. ON FALSE;
  9607. U FALSE;
  9608. RLD;
  9609. *R;
  9610. X(;
  9611. );
  9612. OD;
  9613. L 0;
  9614. CLR;
  9615. SPS ABCN;
  9616. ABCN: NOP 0;
  9617. RLDA;
  9618. XOW;
  9619. TAR;
  9620. X M 0.4;
  9621. ON TRUE;
  9622. O(;
  9623. );
  9624. L 0;
  9625. CLR;
  9626. LOOP ABCO;
  9627. ABCO: NOP 0;
  9628. X TRUE;
  9629. <I;
  9630. NEGD;
  9631. L 0;
  9632. SA T 42;
  9633. TAR2;
  9634. UD;
  9635. <=D;
  9636. +AR2;
  9637. TRUNC;
  9638. = M 0.4;
  9639. ON FALSE;
  9640. RLD;
  9641. X M 0.4;
  9642. SSD;
  9643. XN FALSE;
  9644. ==D;
  9645. ON M 0.4;
  9646. <=R;
  9647. U(;
  9648. );
  9649. L 0;
  9650. CLR;
  9651. SPS ABCP;
  9652. ABCP: NOP 0;
  9653. SAVE;
  9654. TAR1;
  9655. L MW 50;
  9656. + 1;
  9657. T MW 50;
  9658. T AW 0;
  9659. >=R;
  9660. CALL FC 42;
  9661. CALL FC 42;
  9662. CALL FC 42;
  9663. X(;
  9664. );
  9665. ==I;
  9666. >I;
  9667. RLDA;
  9668. CALL FB 45, DB 45;
  9669. CALL FB 45, DB 45;
  9670. CALL FB 45, DB 45;
  9671. TAW;
  9672. X(;
  9673. );
  9674. INVI;
  9675. ASIN;
  9676. L 0;
  9677. CLR;
  9678. LOOP ABCQ;
  9679. ABCQ: NOP 0;
  9680. SQR;
  9681. L 0;
  9682. CLR;
  9683. SPPZ ABCR;
  9684. ABCR: NOP 0;
  9685. <I;
  9686. +AR1;
  9687. XOD;
  9688. >D;
  9689. L 0;
  9690. CLR;
  9691. SPM ABCS;
  9692. ABCS: NOP 0;
  9693. NEGD;
  9694. XN FALSE;
  9695. L 0;
  9696. CLR;
  9697. SPU ABCT;
  9698. ABCT: NOP 0;
  9699. X(;
  9700. );
  9701. <I;
  9702. L 0;
  9703. L 0;
  9704. CLR;
  9705. SPL ABCU;
  9706. ABCU: NOP 0;
  9707. <D;
  9708. SIN;
  9709. >=R;
  9710. *D;
  9711. PUSH;
  9712. <R;
  9713. LAR1;
  9714. FR Z 42;
  9715. +AR2;
  9716. X FALSE;
  9717. FN M 0.4;
  9718. L MW 50;
  9719. + 1;
  9720. T MW 50;
  9721. T AW 0;
  9722. MOD;
  9723. <>R;
  9724. X M 0.4;
  9725. SRD;
  9726. S M 0.4;
  9727. UN M 0.4;
  9728. UN M 0.4;
  9729. L 0;
  9730. BTI;
  9731. SET;
  9732. CALL FC 42;
  9733. CALL FC 42;
  9734. CALL FC 42;
  9735. L 0;
  9736. CLR;
  9737. SPBN ABCV;
  9738. ABCV: NOP 0;
  9739. SIN;
  9740. SLW;
  9741. <=I;
  9742. INVD;
  9743. <D;
  9744. L 0;
  9745. CLR;
  9746. SPA ABCW;
  9747. ABCW: NOP 0;
  9748. L 0;
  9749. SA T 42;
  9750. TAR;
  9751. LN;
  9752. RND-;
  9753. <=R;
  9754. L MW 50;
  9755. + 1;
  9756. T MW 50;
  9757. T AW 0;
  9758. ON FALSE;
  9759. RLDA;
  9760. L MW 50;
  9761. + 1;
  9762. T MW 50;
  9763. T AW 0;
  9764. SET;
  9765. L 0;
  9766. CLR;
  9767. SPO ABCX;
  9768. ABCX: NOP 0;
  9769. *I;
  9770. COS;
  9771. UN M 0.4;
  9772. POP;
  9773. RND+;
  9774. DTB;
  9775. <I;
  9776. OW;
  9777. SAVE;
  9778. +D;
  9779. OD;
  9780. L 0;
  9781. SI T 42;
  9782. TAW;
  9783. MCR(;
  9784. MCRA;
  9785. MCRD;
  9786. )MCR;
  9787. NEGI;
  9788. L 0;
  9789. L 0;
  9790. CLR;
  9791. SPL ABCY;
  9792. ABCY: NOP 0;
  9793. UN(;
  9794. );
  9795. DTB;
  9796. <>I;
  9797. <=D;
  9798. SLW;
  9799. RLDA;
  9800. L 0;
  9801. BTI;
  9802. <>R;
  9803. XN FALSE;
  9804. -D;
  9805. L 0;
  9806. CLR;
  9807. SPBN ABCZ;
  9808. ABCZ: NOP 0;
  9809. NEGI;
  9810. ATAN;
  9811. LC MW 0;
  9812. L 0;
  9813. CLR;
  9814. SPU ABDA;
  9815. ABDA: NOP 0;
  9816. TAR1;
  9817. XN FALSE;
  9818. UN(;
  9819. );
  9820. UD;
  9821. L 0;
  9822. BTI;
  9823. <>R;
  9824. UN TRUE;
  9825. L 0;
  9826. SE T 42;
  9827. >I;
  9828. = M 0.4;
  9829. RND+;
  9830. LAR2;
  9831. CALL FC 42;
  9832. CALL FC 42;
  9833. CALL FC 42;
  9834. +AR2;
  9835. L 0;
  9836. CLR;
  9837. SPPZ ABDB;
  9838. ABDB: NOP 0;
  9839. COS;
  9840. DTR;
  9841. L 0;
  9842. CLR;
  9843. SPPZ ABDC;
  9844. ABDC: NOP 0;
  9845. RND;
  9846. <>I;
  9847. L 0;
  9848. CLR;
  9849. SPPZ ABDD;
  9850. ABDD: NOP 0;
  9851. RND;
  9852. FN M 0.4;
  9853. RND+;
  9854. LN;
  9855. INVI;
  9856. MOD;
  9857. TAW;
  9858. = M 0.4;
  9859. SSD;
  9860. BLD 0;
  9861. SRD;
  9862. UN(;
  9863. );
  9864. ATAN;
  9865. >=D;
  9866. NEGR;
  9867. L MW 50;
  9868. + 1;
  9869. T MW 50;
  9870. T AW 0;
  9871. TAR1;
  9872. L 0;
  9873. BTI;
  9874. *R;
  9875. /D;
  9876. <>D;
  9877. TAR2;
  9878. DTB;
  9879. + 0;
  9880. L 0;
  9881. CLR;
  9882. SPA ABDE;
  9883. ABDE: NOP 0;
  9884. INVI;
  9885. L 0;
  9886. CLR;
  9887. SPU ABDF;
  9888. ABDF: NOP 0;
  9889. <=I;
  9890. O FALSE;
  9891. L 0;
  9892. CLR;
  9893. SPB ABDG;
  9894. ABDG: NOP 0;
  9895. <>D;
  9896. <>I;
  9897. SSI;
  9898. TAR2;
  9899. COS;
  9900. >=R;
  9901. +I;
  9902. TAW;
  9903. L 0;
  9904. CLR;
  9905. SPBI ABDH;
  9906. ABDH: NOP 0;
  9907. CC FC 43;
  9908. <>R;
  9909. L MW 50;
  9910. + 1;
  9911. T MW 50;
  9912. T AW 0;
  9913. >=R;
  9914. +AR1;
  9915. PUSH;
  9916. RND;
  9917. SET;
  9918. LN;
  9919. L 0;
  9920. SA T 42;
  9921. RLD;
  9922. NEGR;
  9923. CALL FC 42;
  9924. CALL FC 42;
  9925. CALL FC 42;
  9926. SLW;
  9927. MCR(;
  9928. MCRA;
  9929. MCRD;
  9930. )MCR;
  9931. L 0;
  9932. CLR;
  9933. SPB ABDI;
  9934. ABDI: NOP 0;
  9935. ON M 0.4;
  9936. ASIN;
  9937. L DW#16#3F71E1AE;
  9938. ATAN;
  9939. +AR2;
  9940. TAW;
  9941. CALL FC 42;
  9942. CALL FC 42;
  9943. CALL FC 42;
  9944. <=D;
  9945. DEC 0;
  9946. UN M 0.4;
  9947. SIN;
  9948. XN FALSE;
  9949. SSD;
  9950. L 0;
  9951. SI T 42;
  9952. O TRUE;
  9953. OW;
  9954. /R;
  9955. SRW;
  9956. FN M 0.4;
  9957. TAR;
  9958. RRD;
  9959. RND-;
  9960. NOT;
  9961. POP;
  9962. ON M 0.4;
  9963. EXP;
  9964. NEGR;
  9965. ==D;
  9966. + 0;
  9967. L 0;
  9968. CLR;
  9969. SPBI ABDJ;
  9970. ABDJ: NOP 0;
  9971. RND-;
  9972. CLR;
  9973. X M 0.4;
  9974. SRW;
  9975. L 0;
  9976. CLR;
  9977. SPS ABDK;
  9978. ABDK: NOP 0;
  9979. >R;
  9980. TAR2;
  9981. DEC 0;
  9982. BLD 0;
  9983. U TRUE;
  9984. MCR(;
  9985. MCRA;
  9986. MCRD;
  9987. )MCR;
  9988. >D;
  9989. SQRT;
  9990. L 0;
  9991. BTD;
  9992. *D;
  9993. MCR(;
  9994. MCRA;
  9995. MCRD;
  9996. )MCR;
  9997. U M 0.4;
  9998. = M 0.4;
  9999. -R;
  10000. L 0;
  10001. CLR;
  10002. SPU ABDL;
  10003. ABDL: NOP 0;
  10004. OW;
  10005. O TRUE;
  10006. ASIN;
  10007. L 0;
  10008. CLR;
  10009. SPA ABDM;
  10010. ABDM: NOP 0;
  10011. L MW 50;
  10012. + 1;
  10013. T MW 50;
  10014. T AW 0;
  10015. OD;
  10016. +AR1;
  10017. NEGI;
  10018. S M 0.4;
  10019. L 0;
  10020. CLR;
  10021. SPU ABDN;
  10022. ABDN: NOP 0;
  10023. O(;
  10024. );
  10025. L 0;
  10026. SE T 42;
  10027. -D;
  10028. UN(;
  10029. );
  10030. <>I;
  10031. -R;
  10032. -D;
  10033. SSI;
  10034. X TRUE;
  10035. -D;
  10036. <=R;
  10037. ENT;
  10038. XN(;
  10039. );
  10040. ENT;
  10041. INVD;
  10042. >D;
  10043. L 0;
  10044. CLR;
  10045. SPU ABDO;
  10046. ABDO: NOP 0;
  10047. RND-;
  10048. OD;
  10049. >I;
  10050. SRW;
  10051. +AR2;
  10052. NEGI;
  10053. TAD;
  10054. L 0;
  10055. CLR;
  10056. SPM ABDP;
  10057. ABDP: NOP 0;
  10058. /I;
  10059. TDB;
  10060. RRDA;
  10061. TAN;
  10062. L 0;
  10063. L 0;
  10064. CLR;
  10065. SPL ABDQ;
  10066. ABDQ: NOP 0;
  10067. UN(;
  10068. );
  10069. X(;
  10070. );
  10071. /D;
  10072. -I;
  10073. TAR;
  10074. SRD;
  10075. RRDA;
  10076. UW;
  10077. >=I;
  10078. SSD;
  10079. XOW;
  10080. XOW;
  10081. L 0;
  10082. CLR;
  10083. SPBNB ABDR;
  10084. ABDR: NOP 0;
  10085. TAR;
  10086. *D;
  10087. X(;
  10088. );
  10089. ITD;
  10090. TAR2;
  10091. SET;
  10092. S M 0.4;
  10093. /R;
  10094. L 0;
  10095. BTI;
  10096. L 0;
  10097. CLR;
  10098. SPBB ABDS;
  10099. ABDS: NOP 0;
  10100. R M 0.4;
  10101. ==I;
  10102. <R;
  10103. L 0;
  10104. L 0;
  10105. CLR;
  10106. SPL ABDT;
  10107. ABDT: NOP 0;
  10108. <>I;
  10109. >=D;
  10110. RLDA;
  10111. <=D;
  10112. INVD;
  10113. L 0;
  10114. SA T 42;
  10115. XN M 0.4;
  10116. L 0;
  10117. CLR;
  10118. SPBI ABDU;
  10119. ABDU: NOP 0;
  10120. SIN;
  10121. OD;
  10122. ==D;
  10123. SLW;
  10124. -I;
  10125. COS;
  10126. LAR2;
  10127. XN M 0.4;
  10128. L 0;
  10129. CLR;
  10130. SPBNB ABDV;
  10131. ABDV: NOP 0;
  10132. ITD;
  10133. X(;
  10134. );
  10135. XN M 0.4;
  10136. TRUNC;
  10137. L 0;
  10138. SA T 42;
  10139. L 0;
  10140. CLR;
  10141. SPU ABDW;
  10142. ABDW: NOP 0;
  10143. LN;
  10144. +AR2;
  10145. +I;
  10146. L 0;
  10147. CLR;
  10148. SPPZ ABDX;
  10149. ABDX: NOP 0;
  10150. SRD;
  10151. CALL FC 42;
  10152. CALL FC 42;
  10153. CALL FC 42;
  10154. OW;
  10155. TAK;
  10156. LAR2;
  10157. TAR2;
  10158. L 0;
  10159. CLR;
  10160. SPO ABDY;
  10161. ABDY: NOP 0;
  10162. INC 0;
  10163. ==D;
  10164. L 0;
  10165. CLR;
  10166. SPS ABDZ;
  10167. ABDZ: NOP 0;
  10168. >=R;
  10169. ZR Z 42;
  10170. RND;
  10171. SLD;
  10172. /D;
  10173. L 0;
  10174. CLR;
  10175. SPBB ABEA;
  10176. ABEA: NOP 0;
  10177. U(;
  10178. );
  10179. >=D;
  10180. /I;
  10181. L 0;
  10182. CLR;
  10183. SPBN ABEB;
  10184. ABEB: NOP 0;
  10185. TAR1;
  10186. <R;
  10187. >R;
  10188. UD;
  10189. L 0;
  10190. CLR;
  10191. SPBB ABEC;
  10192. ABEC: NOP 0;
  10193. ITB;
  10194. <=R;
  10195. ==R;
  10196. >R;
  10197. RND+;
  10198. >I;
  10199. X TRUE;
  10200. +AR1;
  10201. <=I;
  10202. LAR1;
  10203. ZR Z 42;
  10204. *D;
  10205. L 0;
  10206. BTD;
  10207. INVD;
  10208. ENT;
  10209. O TRUE;
  10210. -I;
  10211. >=D;
  10212. /D;
  10213. T MD 0;
  10214. OD;
  10215. >R;
  10216. XOW;
  10217. L 0;
  10218. CLR;
  10219. SPO ABED;
  10220. ABED: NOP 0;
  10221. >=I;
  10222. U TRUE;
  10223. RLDA;
  10224. >=D;
  10225. TAR2;
  10226. L 0;
  10227. CLR;
  10228. SPP ABEE;
  10229. ABEE: NOP 0;
  10230. ==R;
  10231. UN M 0.4;
  10232. XOD;
  10233. L 0;
  10234. SI T 42;
  10235. L 0;
  10236. CLR;
  10237. SPMZ ABEF;
  10238. ABEF: NOP 0;
  10239. L 0;
  10240. CLR;
  10241. SPBI ABEG;
  10242. ABEG: NOP 0;
  10243. SLW;
  10244. L 0;
  10245. CLR;
  10246. SPBNB ABEH;
  10247. ABEH: NOP 0;
  10248. DEC 0;
  10249. >=D;
  10250. LEAVE;
  10251. LAR2;
  10252. L 0;
  10253. CLR;
  10254. LOOP ABEI;
  10255. ABEI: NOP 0;
  10256. <>I;
  10257. SRW;
  10258. X FALSE;
  10259. PUSH;
  10260. >I;
  10261. L 0;
  10262. CLR;
  10263. SPS ABEJ;
  10264. ABEJ: NOP 0;
  10265. U TRUE;
  10266. TAW;
  10267. T MD 0;
  10268. + 0;
  10269. CLR;
  10270. L 0;
  10271. CLR;
  10272. SPPZ ABEK;
  10273. ABEK: NOP 0;
  10274. O(;
  10275. );
  10276. UC FC 44;
  10277. DTB;
  10278. BLD 0;
  10279. UW;
  10280. TAW;
  10281. L 0;
  10282. CLR;
  10283. SPB ABEL;
  10284. ABEL: NOP 0;
  10285. DTR;
  10286. XN M 0.4;
  10287. NOT;
  10288. UD;
  10289. T MD 0;
  10290. SET;
  10291. L 0;
  10292. SE T 42;
  10293. /R;
  10294. DTB;
  10295. RLD;
  10296. L 0;
  10297. CLR;
  10298. SPP ABEM;
  10299. ABEM: NOP 0;
  10300. CC FC 43;
  10301. CC FC 43;
  10302. L 0;
  10303. SV T 42;
  10304. O(;
  10305. );
  10306. +D;
  10307. ABS;
  10308. >=D;
  10309. ASIN;
  10310. *D;
  10311. -R;
  10312. /D;
  10313. ON M 0.4;
  10314. L 0;
  10315. CLR;
  10316. SPBN ABEN;
  10317. ABEN: NOP 0;
  10318. -I;
  10319. *I;
  10320. L 0;
  10321. CLR;
  10322. SPS ABEO;
  10323. ABEO: NOP 0;
  10324. T MD 0;
  10325. ENT;
  10326. SET;
  10327. NEGR;
  10328. LAR2;
  10329. SIN;
  10330. LAR2;
  10331. L 0;
  10332. CLR;
  10333. SPBB ABEP;
  10334. ABEP: NOP 0;
  10335. >R;
  10336. TAN;
  10337. SIN;
  10338. >D;
  10339. NOP 0;
  10340. SET;
  10341. SET;
  10342. <D;
  10343. NEGI;
  10344. L 0;
  10345. CLR;
  10346. SPO ABEQ;
  10347. ABEQ: NOP 0;
  10348. SLW;
  10349. UW;
  10350. L 0;
  10351. CLR;
  10352. SPU ABER;
  10353. ABER: NOP 0;
  10354. X(;
  10355. );
  10356. CALL FC 42;
  10357. CALL FC 42;
  10358. CALL FC 42;
  10359. MOD;
  10360. SET;
  10361. UN M 0.4;
  10362. EXP;
  10363. L 0;
  10364. CLR;
  10365. SPA ABES;
  10366. ABES: NOP 0;
  10367. SIN;
  10368. <=R;
  10369. POP;
  10370. MCR(;
  10371. MCRA;
  10372. MCRD;
  10373. )MCR;
  10374. INC 0;
  10375. >D;
  10376. INVI;
  10377. L 0;
  10378. BTD;
  10379. +R;
  10380. L 0;
  10381. CLR;
  10382. SPBNB ABET;
  10383. ABET: NOP 0;
  10384. PUSH;
  10385. RLD;
  10386. X TRUE;
  10387. BLD 0;
  10388. L 0;
  10389. CLR;
  10390. SPO ABEU;
  10391. ABEU: NOP 0;
  10392. RRD;
  10393. ENT;
  10394. MCR(;
  10395. MCRA;
  10396. MCRD;
  10397. )MCR;
  10398. TAD;
  10399. U FALSE;
  10400. ==R;
  10401. AUF DB 42;
  10402. L 0;
  10403. CLR;
  10404. SPBIN ABEV;
  10405. ABEV: NOP 0;
  10406. SSD;
  10407. >=I;
  10408. L 0;
  10409. CLR;
  10410. SPBB ABEW;
  10411. ABEW: NOP 0;
  10412. SIN;
  10413. L 0;
  10414. BTI;
  10415. RLD;
  10416. FR Z 42;
  10417. UN FALSE;
  10418. L 0;
  10419. L 0;
  10420. CLR;
  10421. SPL ABEX;
  10422. ABEX: NOP 0;
  10423. RRD;
  10424. XN(;
  10425. );
  10426. SET;
  10427. +D;
  10428. +AR2;
  10429. SLD;
  10430. LEAVE;
  10431. ATAN;
  10432. ZR Z 42;
  10433. SLW;
  10434. <I;
  10435. /D;
  10436. L 0;
  10437. SE T 42;
  10438. +AR1;
  10439. X M 0.4;
  10440. ZR Z 42;
  10441. >R;
  10442. +AR2;
  10443. O(;
  10444. );
  10445. >=D;
  10446. L 0;
  10447. CLR;
  10448. SPP ABEY;
  10449. ABEY: NOP 0;
  10450. MCR(;
  10451. MCRA;
  10452. MCRD;
  10453. )MCR;
  10454. <>D;
  10455. + 0;
  10456. >R;
  10457. UN(;
  10458. );
  10459. L 0;
  10460. CLR;
  10461. SPA ABEZ;
  10462. ABEZ: NOP 0;
  10463. +D;
  10464. COS;
  10465. + 0;
  10466. U(;
  10467. );
  10468. L 0;
  10469. CLR;
  10470. SPBNB ABFA;
  10471. ABFA: NOP 0;
  10472. L 0;
  10473. CLR;
  10474. SPBNB ABFB;
  10475. ABFB: NOP 0;
  10476. OW;
  10477. R M 0.4;
  10478. L 0;
  10479. SE T 42;
  10480. DTB;
  10481. ITB;
  10482. SAVE;
  10483. SET;
  10484. <R;
  10485. XOD;
  10486. L 0;
  10487. CLR;
  10488. SPM ABFC;
  10489. ABFC: NOP 0;
  10490. L 0;
  10491. CLR;
  10492. SPN ABFD;
  10493. ABFD: NOP 0;
  10494. L 0;
  10495. CLR;
  10496. SPO ABFE;
  10497. ABFE: NOP 0;
  10498. L 0;
  10499. CLR;
  10500. SPA ABFF;
  10501. ABFF: NOP 0;
  10502. +D;
  10503. SAVE;
  10504. XOW;
  10505. +AR2;
  10506. /I;
  10507. <D;
  10508. ON M 0.4;
  10509. >D;
  10510. L 0;
  10511. SS T 42;
  10512. L 0;
  10513. CLR;
  10514. SPBN ABFG;
  10515. ABFG: NOP 0;
  10516. /D;
  10517. SRD;
  10518. LN;
  10519. +I;
  10520. >R;
  10521. FP M 0.4;
  10522. NEGR;
  10523. ==R;
  10524. RRDA;
  10525. TAW;
  10526. ITD;
  10527. ENT;
  10528. UW;
  10529. XOW;
  10530. PUSH;
  10531. >I;
  10532. SIN;
  10533. TAR2;
  10534. R M 0.4;
  10535. >I;
  10536. ==D;
  10537. X M 0.4;
  10538. SRW;
  10539. *I;
  10540. L 0;
  10541. CLR;
  10542. SPZ ABFH;
  10543. ABFH: NOP 0;
  10544. +D;
  10545. >D;
  10546. LAR2;
  10547. CALL FB 45, DB 45;
  10548. CALL FB 45, DB 45;
  10549. CALL FB 45, DB 45;
  10550. L 0;
  10551. SA T 42;
  10552. +I;
  10553. <=R;
  10554. L 0;
  10555. CLR;
  10556. SPO ABFI;
  10557. ABFI: NOP 0;
  10558. UN FALSE;
  10559. TAW;
  10560. <=I;
  10561. <D;
  10562. RND;
  10563. L 0;
  10564. CLR;
  10565. SPS ABFJ;
  10566. ABFJ: NOP 0;
  10567. <=I;
  10568. NEGI;
  10569. ==D;
  10570. S M 0.4;
  10571. TAN;
  10572. <>I;
  10573. R M 0.4;
  10574. X M 0.4;
  10575. SLD;
  10576. ACOS;
  10577. X FALSE;
  10578. ==I;
  10579. O FALSE;
  10580. SSD;
  10581. <I;
  10582. LC MW 0;
  10583. XN FALSE;
  10584. L 0;
  10585. CLR;
  10586. SPO ABFK;
  10587. ABFK: NOP 0;
  10588. O M 0.4;
  10589. SAVE;
  10590. >=I;
  10591. CC FC 43;
  10592. INVD;
  10593. NOP 0;
  10594. INVI;
  10595. L 0;
  10596. BTD;
  10597. *I;
  10598. UN FALSE;
  10599. >=D;
  10600. L 0;
  10601. CLR;
  10602. SPB ABFL;
  10603. ABFL: NOP 0;
  10604. +AR2;
  10605. *I;
  10606. /I;
  10607. >R;
  10608. RRDA;
  10609. L MW 50;
  10610. + 1;
  10611. T MW 50;
  10612. T AW 0;
  10613. RND-;
  10614. L 0;
  10615. SI T 42;
  10616. INC 0;
  10617. XN(;
  10618. );
  10619. FN M 0.4;
  10620. +AR2;
  10621. ON M 0.4;
  10622. OW;
  10623. NEGR;
  10624. DTB;
  10625. L 0;
  10626. CLR;
  10627. SPBN ABFM;
  10628. ABFM: NOP 0;
  10629. >=R;
  10630. UD;
  10631. UN M 0.4;
  10632. FN M 0.4;
  10633. NEGD;
  10634. L 0;
  10635. SI T 42;
  10636. SLW;
  10637. -D;
  10638. NOP 0;
  10639. L 0;
  10640. BTD;
  10641. LAR1;
  10642. ==I;
  10643. ITB;
  10644. /I;
  10645. +R;
  10646. TAN;
  10647. NEGD;
  10648. L 0;
  10649. SE T 42;
  10650. RND;
  10651. EXP;
  10652. <>I;
  10653. L 0;
  10654. CLR;
  10655. SPN ABFN;
  10656. ABFN: NOP 0;
  10657. >=I;
  10658. SSI;
  10659. <>I;
  10660. L 0;
  10661. SA T 42;
  10662. <>D;
  10663. RRD;
  10664. +D;
  10665. L 0;
  10666. CLR;
  10667. SPBB ABFO;
  10668. ABFO: NOP 0;
  10669. POP;
  10670. X FALSE;
  10671. L 0;
  10672. CLR;
  10673. SPPZ ABFP;
  10674. ABFP: NOP 0;
  10675. RRD;
  10676. >I;
  10677. -R;
  10678. L 0;
  10679. CLR;
  10680. SPBN ABFQ;
  10681. ABFQ: NOP 0;
  10682. TAR1;
  10683. SET;
  10684. L 0;
  10685. CLR;
  10686. SPZ ABFR;
  10687. ABFR: NOP 0;
  10688. LAR2;
  10689. TAD;
  10690. PUSH;
  10691. EXP;
  10692. L 0;
  10693. CLR;
  10694. SPBNB ABFS;
  10695. ABFS: NOP 0;
  10696. ASIN;
  10697. ITD;
  10698. XN(;
  10699. );
  10700. SLW;
  10701. *D;
  10702. L 0;
  10703. BTI;
  10704. ON M 0.4;
  10705. RLD;
  10706. FP M 0.4;
  10707. ABS;
  10708. LAR1;
  10709. L 0;
  10710. SA T 42;
  10711. NOT;
  10712. <I;
  10713. <D;
  10714. ABS;
  10715. SQR;
  10716. CALL FC 42;
  10717. CALL FC 42;
  10718. CALL FC 42;
  10719. FP M 0.4;
  10720. >=R;
  10721. X(;
  10722. );
  10723. -D;
  10724. DTR;
  10725. L 0;
  10726. CLR;
  10727. LOOP ABFT;
  10728. ABFT: NOP 0;
  10729. INVI;
  10730. CALL FB 45, DB 45;
  10731. CALL FB 45, DB 45;
  10732. CALL FB 45, DB 45;
  10733. SQRT;
  10734. >=I;
  10735. TRUNC;
  10736. TAN;
  10737. RLDA;
  10738. L 0;
  10739. CLR;
  10740. SPB ABFU;
  10741. ABFU: NOP 0;
  10742. +AR2;
  10743. CALL FC 42;
  10744. CALL FC 42;
  10745. CALL FC 42;
  10746. L 0;
  10747. CLR;
  10748. SPA ABFV;
  10749. ABFV: NOP 0;
  10750. SQR;
  10751. + 0;
  10752. SLW;
  10753. CC FC 43;
  10754. SQRT;
  10755. SRD;
  10756. L 0;
  10757. SV T 42;
  10758. L 0;
  10759. CLR;
  10760. SPB ABFW;
  10761. ABFW: NOP 0;
  10762. >=D;
  10763. TAR1;
  10764. ==I;
  10765. >=I;
  10766. LC MW 0;
  10767. RLD;
  10768. RLDA;
  10769. TRUNC;
  10770. <>D;
  10771. UN FALSE;
  10772. UN(;
  10773. );
  10774. XN(;
  10775. );
  10776. RLDA;
  10777. U FALSE;
  10778. +R;
  10779. CC FC 43;
  10780. L 0;
  10781. CLR;
  10782. SPPZ ABFX;
  10783. ABFX: NOP 0;
  10784. ==R;
  10785. L 0;
  10786. CLR;
  10787. SPO ABFY;
  10788. ABFY: NOP 0;
  10789. SAVE;
  10790. R M 0.4;
  10791. L 0;
  10792. SA T 42;
  10793. RRD;
  10794. SSI;
  10795. INVI;
  10796. L 0;
  10797. CLR;
  10798. SPBI ABFZ;
  10799. ABFZ: NOP 0;
  10800. RLDA;
  10801. RLD;
  10802. L 0;
  10803. SI T 42;
  10804. ZR Z 42;
  10805. OD;
  10806. +I;
  10807. OD;
  10808. XOD;
  10809. X M 0.4;
  10810. O TRUE;
  10811. <I;
  10812. -R;
  10813. TAR;
  10814. L 0;
  10815. CLR;
  10816. SPN ABGA;
  10817. ABGA: NOP 0;
  10818. MOD;
  10819. LAR2;
  10820. TAR2;
  10821. ON FALSE;
  10822. L 0;
  10823. BTI;
  10824. POP;
  10825. L 0;
  10826. CLR;
  10827. SPO ABGB;
  10828. ABGB: NOP 0;
  10829. <R;
  10830. RLD;
  10831. ACOS;
  10832. <>D;
  10833. L 0;
  10834. CLR;
  10835. SPZ ABGC;
  10836. ABGC: NOP 0;
  10837. *R;
  10838. SRD;
  10839. <>I;
  10840. INC 0;
  10841. RLD;
  10842. PUSH;
  10843. OD;
  10844. DEC 0;
  10845. SSD;
  10846. SLW;
  10847. ENT;
  10848. <>R;
  10849. L 0;
  10850. SI T 42;
  10851. O(;
  10852. );
  10853. /R;
  10854. AUF DB 42;
  10855. RRD;
  10856. CALL FC 42;
  10857. CALL FC 42;
  10858. CALL FC 42;
  10859. MOD;
  10860. /I;
  10861. L 0;
  10862. CLR;
  10863. SPBN ABGD;
  10864. ABGD: NOP 0;
  10865. L 0;
  10866. CLR;
  10867. SPM ABGE;
  10868. ABGE: NOP 0;
  10869. ON(;
  10870. );
  10871. UN FALSE;
  10872. <=I;
  10873. -D;
  10874. *I;
  10875. BLD 0;
  10876. U TRUE;
  10877. +R;
  10878. SAVE;
  10879. ASIN;
  10880. -I;
  10881. + 0;
  10882. LN;
  10883. *I;
  10884. O(;
  10885. );
  10886. FR Z 42;
  10887. L DW#16#B020321B;
  10888. L 0;
  10889. CLR;
  10890. SPS ABGF;
  10891. ABGF: NOP 0;
  10892. >I;
  10893. L 0;
  10894. CLR;
  10895. LOOP ABGG;
  10896. ABGG: NOP 0;
  10897. >=R;
  10898. XN M 0.4;
  10899. UD;
  10900. L 0;
  10901. CLR;
  10902. SPPZ ABGH;
  10903. ABGH: NOP 0;
  10904. ON TRUE;
  10905. TAN;
  10906. INC 0;
  10907. L 0;
  10908. SE T 42;
  10909. COS;
  10910. TDB;
  10911. XN M 0.4;
  10912. SSD;
  10913. NOP 0;
  10914. XN M 0.4;
  10915. L 0;
  10916. CLR;
  10917. SPP ABGI;
  10918. ABGI: NOP 0;
  10919. MOD;
  10920. DEC 0;
  10921. *R;
  10922. L 0;
  10923. CLR;
  10924. SPM ABGJ;
  10925. ABGJ: NOP 0;
  10926. DEC 0;
  10927. FN M 0.4;
  10928. RLD;
  10929. FN M 0.4;
  10930. INVD;
  10931. L 0;
  10932. CLR;
  10933. LOOP ABGK;
  10934. ABGK: NOP 0;
  10935. RLDA;
  10936. RRDA;
  10937. L 0;
  10938. CLR;
  10939. LOOP ABGL;
  10940. ABGL: NOP 0;
  10941. <R;
  10942. L 0;
  10943. CLR;
  10944. SPBIN ABGM;
  10945. ABGM: NOP 0;
  10946. -D;
  10947. ATAN;
  10948. INVI;
  10949. RLDA;
  10950. R M 0.4;
  10951. UD;
  10952. NEGD;
  10953. L 0;
  10954. CLR;
  10955. SPBB ABGN;
  10956. ABGN: NOP 0;
  10957. AUF DB 42;
  10958. U(;
  10959. );
  10960. L 0;
  10961. CLR;
  10962. SPBIN ABGO;
  10963. ABGO: NOP 0;
  10964. DEC 0;
  10965. SQR;
  10966. TAD;
  10967. CLR;
  10968. +AR2;
  10969. SAVE;
  10970. CALL FC 42;
  10971. CALL FC 42;
  10972. CALL FC 42;
  10973. L 0;
  10974. CLR;
  10975. LOOP ABGP;
  10976. ABGP: NOP 0;
  10977. L 0;
  10978. CLR;
  10979. SPA ABGQ;
  10980. ABGQ: NOP 0;
  10981. XN(;
  10982. );
  10983. INC 0;
  10984. OW;
  10985. SLW;
  10986. ASIN;
  10987. NEGI;
  10988. -I;
  10989. R M 0.4;
  10990. L 0;
  10991. CLR;
  10992. SPO ABGR;
  10993. ABGR: NOP 0;
  10994. L 0;
  10995. SI T 42;
  10996. L 0;
  10997. CLR;
  10998. SPBIN ABGS;
  10999. ABGS: NOP 0;
  11000. ACOS;
  11001. OD;
  11002. L 0;
  11003. CLR;
  11004. SPN ABGT;
  11005. ABGT: NOP 0;
  11006. INVI;
  11007. SIN;
  11008. SQR;
  11009. LC MW 0;
  11010. L 0;
  11011. SE T 42;
  11012. TAR1;
  11013. TAK;
  11014. ITB;
  11015. X M 0.4;
  11016. L 0;
  11017. SS T 42;
  11018. L 0;
  11019. BTD;
  11020. +AR1;
  11021. RLDA;
  11022. NEGD;
  11023. SSI;
  11024. TDB;
  11025. XOW;
  11026. ATAN;
  11027. LEAVE;
  11028. ON(;
  11029. );
  11030. L 0;
  11031. SA T 42;
  11032. INVI;
  11033. -D;
  11034. MCR(;
  11035. MCRA;
  11036. MCRD;
  11037. )MCR;
  11038. >=D;
  11039. RND-;
  11040. <=D;
  11041. L 0;
  11042. CLR;
  11043. SPBIN ABGU;
  11044. ABGU: NOP 0;
  11045. ATAN;
  11046. LN;
  11047. L 0;
  11048. CLR;
  11049. SPP ABGV;
  11050. ABGV: NOP 0;
  11051. X(;
  11052. );
  11053. INVD;
  11054. LN;
  11055. TDB;
  11056. L 0;
  11057. CLR;
  11058. SPBB ABGW;
  11059. ABGW: NOP 0;
  11060. >R;
  11061. ZV Z 42;
  11062. SET;
  11063. RND+;
  11064. SQRT;
  11065. RND-;
  11066. >I;
  11067. <=D;
  11068. DTB;
  11069. UN FALSE;
  11070. L 0;
  11071. CLR;
  11072. SPZ ABGX;
  11073. ABGX: NOP 0;
  11074. MCR(;
  11075. MCRA;
  11076. MCRD;
  11077. )MCR;
  11078. SRD;
  11079. ENT;
  11080. ATAN;
  11081. TAN;
  11082. ON FALSE;
  11083. <>R;
  11084. L 0;
  11085. CLR;
  11086. SPA ABGY;
  11087. ABGY: NOP 0;
  11088. <>D;
  11089. UN TRUE;
  11090. L 0;
  11091. CLR;
  11092. SPB ABGZ;
  11093. ABGZ: NOP 0;
  11094. TAK;
  11095. L 0;
  11096. BTI;
  11097. X TRUE;
  11098. XN M 0.4;
  11099. O(;
  11100. );
  11101. NOT;
  11102. L 0;
  11103. CLR;
  11104. SPN ABHA;
  11105. ABHA: NOP 0;
  11106. CC FC 43;
  11107. L 0;
  11108. CLR;
  11109. SPBIN ABHB;
  11110. ABHB: NOP 0;
  11111. X(;
  11112. );
  11113. EXP;
  11114. -D;
  11115. CLR;
  11116. ABS;
  11117. >D;
  11118. RND+;
  11119. <>I;
  11120. DEC 0;
  11121. RRDA;
  11122. <I;
  11123. L 0;
  11124. SA T 42;
  11125. +AR2;
  11126. UW;
  11127. LC MW 0;
  11128. RLDA;
  11129. CLR;
  11130. RND+;
  11131. SET;
  11132. >=I;
  11133. L 0;
  11134. CLR;
  11135. SPN ABHC;
  11136. ABHC: NOP 0;
  11137. L 0;
  11138. CLR;
  11139. SPMZ ABHD;
  11140. ABHD: NOP 0;
  11141. BLD 0;
  11142. *R;
  11143. RND+;
  11144. TAN;
  11145. NEGR;
  11146. <D;
  11147. ==I;
  11148. <=R;
  11149. NEGD;
  11150. L 0;
  11151. L 0;
  11152. CLR;
  11153. SPL ABHE;
  11154. ABHE: NOP 0;
  11155. LAR1;
  11156. EXP;
  11157. ZV Z 42;
  11158. NOP 0;
  11159. O(;
  11160. );
  11161. RLD;
  11162. XOW;
  11163. /D;
  11164. <>I;
  11165. L 0;
  11166. CLR;
  11167. SPP ABHF;
  11168. ABHF: NOP 0;
  11169. XOD;
  11170. TAN;
  11171. SLW;
  11172. L DW#16#F69BD596;
  11173. >=D;
  11174. +D;
  11175. SLW;
  11176. *D;
  11177. L 0;
  11178. CLR;
  11179. SPS ABHG;
  11180. ABHG: NOP 0;
  11181. XN M 0.4;
  11182. UC FC 44;
  11183. O FALSE;
  11184. RND-;
  11185. LC MW 0;
  11186. PUSH;
  11187. -R;
  11188. L 0;
  11189. CLR;
  11190. SPZ ABHH;
  11191. ABHH: NOP 0;
  11192. +D;
  11193. >=I;
  11194. XOW;
  11195. RND+;
  11196. LAR2;
  11197. *R;
  11198. O M 0.4;
  11199. /R;
  11200. ZV Z 42;
  11201. L 0;
  11202. CLR;
  11203. SPO ABHI;
  11204. ABHI: NOP 0;
  11205. CLR;
  11206. RND+;
  11207. L 0;
  11208. CLR;
  11209. SPBIN ABHJ;
  11210. ABHJ: NOP 0;
  11211. NEGI;
  11212. >R;
  11213. LAR1;
  11214. L 0;
  11215. CLR;
  11216. SPP ABHK;
  11217. ABHK: NOP 0;
  11218. EXP;
  11219. O TRUE;
  11220. S M 0.4;
  11221. RLD;
  11222. SSD;
  11223. LN;
  11224. L 0;
  11225. CLR;
  11226. SPU ABHL;
  11227. ABHL: NOP 0;
  11228. TAN;
  11229. FN M 0.4;
  11230. >R;
  11231. ZR Z 42;
  11232. L 0;
  11233. SI T 42;
  11234. X(;
  11235. );
  11236. /I;
  11237. COS;
  11238. CC FC 43;
  11239. TAK;
  11240. L 0;
  11241. CLR;
  11242. SPPZ ABHM;
  11243. ABHM: NOP 0;
  11244. TAR1;
  11245. UN FALSE;
  11246. L 0;
  11247. BTD;
  11248. LAR2;
  11249. <>D;
  11250. U M 0.4;
  11251. SQR;
  11252. INVI;
  11253. L 0;
  11254. CLR;
  11255. SPS ABHN;
  11256. ABHN: NOP 0;
  11257. L 0;
  11258. CLR;
  11259. SPN ABHO;
  11260. ABHO: NOP 0;
  11261. +AR1;
  11262. NOT;
  11263. <>I;
  11264. <>R;
  11265. L DW#16#C35EA18A;
  11266. CALL FB 45, DB 45;
  11267. CALL FB 45, DB 45;
  11268. CALL FB 45, DB 45;
  11269. LN;
  11270. L 0;
  11271. CLR;
  11272. SPP ABHP;
  11273. ABHP: NOP 0;
  11274. TAR;
  11275. SRW;
  11276. <>D;
  11277. ZR Z 42;
  11278. <=R;
  11279. CALL FC 42;
  11280. CALL FC 42;
  11281. CALL FC 42;
  11282. L 0;
  11283. CLR;
  11284. SPPZ ABHQ;
  11285. ABHQ: NOP 0;
  11286. L 0;
  11287. CLR;
  11288. SPBN ABHR;
  11289. ABHR: NOP 0;
  11290. DTR;
  11291. NOT;
  11292. SIN;
  11293. *D;
  11294. ITB;
  11295. /R;
  11296. MOD;
  11297. DEC 0;
  11298. TAD;
  11299. XN M 0.4;
  11300. XN M 0.4;
  11301. POP;
  11302. L MW 50;
  11303. + 1;
  11304. T MW 50;
  11305. T AW 0;
  11306. RND;
  11307. SET;
  11308. MCR(;
  11309. MCRA;
  11310. MCRD;
  11311. )MCR;
  11312. DTR;
  11313. AUF DB 42;
  11314. >=R;
  11315. U(;
  11316. );
  11317. SQR;
  11318. ASIN;
  11319. SET;
  11320. ZR Z 42;
  11321. <=D;
  11322. SET;
  11323. *D;
  11324. >=R;
  11325. INC 0;
  11326. <I;
  11327. ON M 0.4;
  11328. UW;
  11329. ATAN;
  11330. TAR1;
  11331. RRD;
  11332. <I;
  11333. TAD;
  11334. INVD;
  11335. ITD;
  11336. TDB;
  11337. L 0;
  11338. CLR;
  11339. SPBB ABHS;
  11340. ABHS: NOP 0;
  11341. RRD;
  11342. +R;
  11343. ==D;
  11344. ACOS;
  11345. INVD;
  11346. SET;
  11347. NEGR;
  11348. L 0;
  11349. CLR;
  11350. SPBN ABHT;
  11351. ABHT: NOP 0;
  11352. ITD;
  11353. COS;
  11354. ITB;
  11355. EXP;
  11356. >=D;
  11357. UN TRUE;
  11358. AUF DB 42;
  11359. RND+;
  11360. TAR;
  11361. L DW#16#754A3E48;
  11362. O M 0.4;
  11363. SSD;
  11364. <>D;
  11365. L 0;
  11366. CLR;
  11367. SPM ABHU;
  11368. ABHU: NOP 0;
  11369. ABS;
  11370. NEGD;
  11371. -R;
  11372. TAN;
  11373. CALL FB 45, DB 45;
  11374. CALL FB 45, DB 45;
  11375. CALL FB 45, DB 45;
  11376. ZV Z 42;
  11377. = M 0.4;
  11378. SAVE;
  11379. POP;
  11380. ON(;
  11381. );
  11382. UN(;
  11383. );
  11384. L 0;
  11385. CLR;
  11386. SPU ABHV;
  11387. ABHV: NOP 0;
  11388. RND+;
  11389. SSD;
  11390. /I;
  11391. UC FC 44;
  11392. SET;
  11393. XN FALSE;
  11394. LC MW 0;
  11395. L 0;
  11396. SI T 42;
  11397. +R;
  11398. L 0;
  11399. CLR;
  11400. SPO ABHW;
  11401. ABHW: NOP 0;
  11402. ABS;
  11403. *D;
  11404. ==D;
  11405. ENT;
  11406. X FALSE;
  11407. ZR Z 42;
  11408. >=R;
  11409. RRDA;
  11410. RRD;
  11411. L 0;
  11412. CLR;
  11413. LOOP ABHX;
  11414. ABHX: NOP 0;
  11415. SSI;
  11416. ==D;
  11417. SET;
  11418. L 0;
  11419. CLR;
  11420. SPP ABHY;
  11421. ABHY: NOP 0;
  11422. OW;
  11423. ACOS;
  11424. <D;
  11425. ZR Z 42;
  11426. >I;
  11427. L 0;
  11428. CLR;
  11429. SPN ABHZ;
  11430. ABHZ: NOP 0;
  11431. XN FALSE;
  11432. RLDA;
  11433. L 0;
  11434. CLR;
  11435. SPB ABIA;
  11436. ABIA: NOP 0;
  11437. +D;
  11438. ACOS;
  11439. L 0;
  11440. CLR;
  11441. SPBN ABIB;
  11442. ABIB: NOP 0;
  11443. AUF DB 42;
  11444. L MW 50;
  11445. + 1;
  11446. T MW 50;
  11447. T AW 0;
  11448. AUF DB 42;
  11449. L 0;
  11450. SS T 42;
  11451. L 0;
  11452. CLR;
  11453. SPN ABIC;
  11454. ABIC: NOP 0;
  11455. ATAN;
  11456. <R;
  11457. L 0;
  11458. CLR;
  11459. SPN ABID;
  11460. ABID: NOP 0;
  11461. RLD;
  11462. <=D;
  11463. POP;
  11464. LAR1;
  11465. UN(;
  11466. );
  11467. ITD;
  11468. <=D;
  11469. UN(;
  11470. );
  11471. RND;
  11472. ITB;
  11473. ON TRUE;
  11474. ZR Z 42;
  11475. >R;
  11476. SSI;
  11477. ATAN;
  11478. >I;
  11479. RRD;
  11480. X TRUE;
  11481. + 0;
  11482. ENT;
  11483. SRD;
  11484. TAR2;
  11485. RRD;
  11486. <>I;
  11487. >=D;
  11488. >=I;
  11489. *I;
  11490. CLR;
  11491. INVD;
  11492. L 0;
  11493. CLR;
  11494. SPBN ABIE;
  11495. ABIE: NOP 0;
  11496. ITB;
  11497. >=R;
  11498. L 0;
  11499. SV T 42;
  11500. L 0;
  11501. CLR;
  11502. SPA ABIF;
  11503. ABIF: NOP 0;
  11504. LEAVE;
  11505. BLD 0;
  11506. NEGD;
  11507. BLD 0;
  11508. UN M 0.4;
  11509. UW;
  11510. DEC 0;
  11511. ITB;
  11512. SIN;
  11513. R M 0.4;
  11514. L DW#16#C4AC41B5;
  11515. SAVE;
  11516. L 0;
  11517. CLR;
  11518. SPMZ ABIG;
  11519. ABIG: NOP 0;
  11520. U TRUE;
  11521. >=I;
  11522. /R;
  11523. /D;
  11524. CALL FC 42;
  11525. CALL FC 42;
  11526. CALL FC 42;
  11527. ==I;
  11528. L 0;
  11529. CLR;
  11530. SPM ABIH;
  11531. ABIH: NOP 0;
  11532. ==R;
  11533. UN FALSE;
  11534. TAR2;
  11535. SRW;
  11536. TAR1;
  11537. TDB;
  11538. CALL FB 45, DB 45;
  11539. CALL FB 45, DB 45;
  11540. CALL FB 45, DB 45;
  11541. UN M 0.4;
  11542. L 0;
  11543. CLR;
  11544. SPMZ ABII;
  11545. ABII: NOP 0;
  11546. XN TRUE;
  11547. L 0;
  11548. CLR;
  11549. SPPZ ABIJ;
  11550. ABIJ: NOP 0;
  11551. INC 0;
  11552. ==D;
  11553. NEGD;
  11554. U(;
  11555. );
  11556. L 0;
  11557. CLR;
  11558. SPBN ABIK;
  11559. ABIK: NOP 0;
  11560. L 0;
  11561. CLR;
  11562. SPM ABIL;
  11563. ABIL: NOP 0;
  11564. O(;
  11565. );
  11566. = M 0.4;
  11567. TAK;
  11568. CC FC 43;
  11569. +R;
  11570. CLR;
  11571. SQR;
  11572. ZV Z 42;
  11573. L 0;
  11574. BTI;
  11575. RND-;
  11576. SQR;
  11577. SET;
  11578. XN M 0.4;
  11579. NEGI;
  11580. >R;
  11581. *R;
  11582. SQRT;
  11583. L 0;
  11584. CLR;
  11585. SPBN ABIM;
  11586. ABIM: NOP 0;
  11587. ==R;
  11588. <I;
  11589. L 0;
  11590. CLR;
  11591. SPBIN ABIN;
  11592. ABIN: NOP 0;
  11593. RLD;
  11594. ACOS;
  11595. L 0;
  11596. CLR;
  11597. SPZ ABIO;
  11598. ABIO: NOP 0;
  11599. CC FC 43;
  11600. ==D;
  11601. + 0;
  11602. SAVE;
  11603. *D;
  11604. L 0;
  11605. SE T 42;
  11606. INVI;
  11607. RLD;
  11608. T MD 0;
  11609. *R;
  11610. SLW;
  11611. TDB;
  11612. LEAVE;
  11613. SET;
  11614. TAN;
  11615. CLR;
  11616. TAN;
  11617. *D;
  11618. L 0;
  11619. BTD;
  11620. ATAN;
  11621. ASIN;
  11622. CLR;
  11623. X TRUE;
  11624. MCR(;
  11625. MCRA;
  11626. MCRD;
  11627. )MCR;
  11628. TAD;
  11629. ==R;
  11630. RRD;
  11631. UW;
  11632. UW;
  11633. NOT;
  11634. L 0;
  11635. CLR;
  11636. SPBNB ABIP;
  11637. ABIP: NOP 0;
  11638. SSI;
  11639. ATAN;
  11640. S M 0.4;
  11641. SRW;
  11642. L 0;
  11643. CLR;
  11644. SPBIN ABIQ;
  11645. ABIQ: NOP 0;
  11646. <=D;
  11647. <=I;
  11648. L 0;
  11649. CLR;
  11650. SPBIN ABIR;
  11651. ABIR: NOP 0;
  11652. L DW#16#85E95C6C;
  11653. L 0;
  11654. CLR;
  11655. SPBI ABIS;
  11656. ABIS: NOP 0;
  11657. INC 0;
  11658. U(;
  11659. );
  11660. PUSH;
  11661. R M 0.4;
  11662. XN FALSE;
  11663. L 0;
  11664. SV T 42;
  11665. TAN;
  11666. LN;
  11667. SAVE;
  11668. MCR(;
  11669. MCRA;
  11670. MCRD;
  11671. )MCR;
  11672. INC 0;
  11673. LC MW 0;
  11674. /I;
  11675. ZV Z 42;
  11676. BLD 0;
  11677. S M 0.4;
  11678. RRDA;
  11679. X M 0.4;
  11680. >I;
  11681. MCR(;
  11682. MCRA;
  11683. MCRD;
  11684. )MCR;
  11685. L 0;
  11686. BTI;
  11687. ITB;
  11688. /R;
  11689. XN FALSE;
  11690. SIN;
  11691. L 0;
  11692. CLR;
  11693. SPBIN ABIT;
  11694. ABIT: NOP 0;
  11695. L 0;
  11696. CLR;
  11697. SPN ABIU;
  11698. ABIU: NOP 0;
  11699. NOP 0;
  11700. TAR1;
  11701. TAR;
  11702. AUF DB 42;
  11703. +I;
  11704. L 0;
  11705. BTD;
  11706. NEGD;
  11707. L 0;
  11708. BTD;
  11709. S M 0.4;
  11710. CC FC 43;
  11711. ZR Z 42;
  11712. ==I;
  11713. ATAN;
  11714. XOW;
  11715. X M 0.4;
  11716. UN M 0.4;
  11717. ABS;
  11718. >I;
  11719. ON M 0.4;
  11720. >=R;
  11721. SRW;
  11722. TAR2;
  11723. SQRT;
  11724. CC FC 43;
  11725. SRD;
  11726. L 0;
  11727. CLR;
  11728. SPO ABIV;
  11729. ABIV: NOP 0;
  11730. +D;
  11731. ABS;
  11732. L 0;
  11733. CLR;
  11734. SPO ABIW;
  11735. ABIW: NOP 0;
  11736. SET;
  11737. <=I;
  11738. <>D;
  11739. ON M 0.4;
  11740. ITD;
  11741. <>I;
  11742. X M 0.4;
  11743. ITD;
  11744. U FALSE;
  11745. SLD;
  11746. >=D;
  11747. RND-;
  11748. ATAN;
  11749. UD;
  11750. ITD;
  11751. SET;
  11752. L 0;
  11753. CLR;
  11754. SPO ABIX;
  11755. ABIX: NOP 0;
  11756. MCR(;
  11757. MCRA;
  11758. MCRD;
  11759. )MCR;
  11760. >=D;
  11761. SLW;
  11762. TAN;
  11763. XN M 0.4;
  11764. >I;
  11765. <R;
  11766. ==R;
  11767. LAR2;
  11768. SRD;
  11769. SSD;
  11770. XN M 0.4;
  11771. TAR;
  11772. BLD 0;
  11773. FR Z 42;
  11774. INVI;
  11775. L 0;
  11776. CLR;
  11777. SPBI ABIY;
  11778. ABIY: NOP 0;
  11779. INC 0;
  11780. /R;
  11781. UN(;
  11782. );
  11783. L 0;
  11784. CLR;
  11785. SPU ABIZ;
  11786. ABIZ: NOP 0;
  11787. O M 0.4;
  11788. FP M 0.4;
  11789. ACOS;
  11790. SIN;
  11791. RRD;
  11792. +AR2;
  11793. CALL FB 45, DB 45;
  11794. CALL FB 45, DB 45;
  11795. CALL FB 45, DB 45;
  11796. PUSH;
  11797. L 0;
  11798. CLR;
  11799. SPBNB ABJA;
  11800. ABJA: NOP 0;
  11801. ON TRUE;
  11802. SQR;
  11803. SRD;
  11804. L 0;
  11805. SE T 42;
  11806. CALL FC 42;
  11807. CALL FC 42;
  11808. CALL FC 42;
  11809. L MW 50;
  11810. + 1;
  11811. T MW 50;
  11812. T AW 0;
  11813. SRD;
  11814. TRUNC;
  11815. ON(;
  11816. );
  11817. OW;
  11818. X M 0.4;
  11819. TAN;
  11820. +AR1;
  11821. L 0;
  11822. CLR;
  11823. SPN ABJB;
  11824. ABJB: NOP 0;
  11825. PUSH;
  11826. X(;
  11827. );
  11828. TDB;
  11829. SIN;
  11830. SLW;
  11831. >I;
  11832. RRD;
  11833. -I;
  11834. T MD 0;
  11835. ATAN;
  11836. XN M 0.4;
  11837. >R;
  11838. L 0;
  11839. CLR;
  11840. SPBB ABJC;
  11841. ABJC: NOP 0;
  11842. DTB;
  11843. SSD;
  11844. -I;
  11845. LAR1;
  11846. TRUNC;
  11847. L 0;
  11848. SI T 42;
  11849. TAW;
  11850. NOP 0;
  11851. L 0;
  11852. CLR;
  11853. LOOP ABJD;
  11854. ABJD: NOP 0;
  11855. CC FC 43;
  11856. SSI;
  11857. ==D;
  11858. L 0;
  11859. CLR;
  11860. SPBI ABJE;
  11861. ABJE: NOP 0;
  11862. *R;
  11863. SIN;
  11864. +D;
  11865. SSD;
  11866. >R;
  11867. NEGI;
  11868. L 0;
  11869. CLR;
  11870. SPBN ABJF;
  11871. ABJF: NOP 0;
  11872. SET;
  11873. SLD;
  11874. ==D;
  11875. <=R;
  11876. INVI;
  11877. <>R;
  11878. UC FC 44;
  11879. RLD;
  11880. FN M 0.4;
  11881. SIN;
  11882. RRD;
  11883. L 0;
  11884. CLR;
  11885. SPO ABJG;
  11886. ABJG: NOP 0;
  11887. RND+;
  11888. NEGI;
  11889. POP;
  11890. U(;
  11891. );
  11892. X M 0.4;
  11893. + 0;
  11894. ZR Z 42;
  11895. + 0;
  11896. <>R;
  11897. <=R;
  11898. RRDA;
  11899. O FALSE;
  11900. L 0;
  11901. CLR;
  11902. LOOP ABJH;
  11903. ABJH: NOP 0;
  11904. ACOS;
  11905. >I;
  11906. RND;
  11907. <I;
  11908. ENT;
  11909. TAD;
  11910. SRD;
  11911. ZR Z 42;
  11912. +I;
  11913. /I;
  11914. XN TRUE;
  11915. <=D;
  11916. L 0;
  11917. SE T 42;
  11918. CC FC 43;
  11919. FP M 0.4;
  11920. U(;
  11921. );
  11922. LAR1;
  11923. TAR2;
  11924. <>I;
  11925. ==I;
  11926. L MW 50;
  11927. + 1;
  11928. T MW 50;
  11929. T AW 0;
  11930. L MW 50;
  11931. + 1;
  11932. T MW 50;
  11933. T AW 0;
  11934. FP M 0.4;
  11935. ENT;
  11936. X FALSE;
  11937. <R;
  11938. <I;
  11939. INVD;
  11940. +D;
  11941. <>R;
  11942. L 0;
  11943. CLR;
  11944. SPBNB ABJI;
  11945. ABJI: NOP 0;
  11946. LAR2;
  11947. L 0;
  11948. SI T 42;
  11949. RLDA;
  11950. FN M 0.4;
  11951. ==R;
  11952. -D;
  11953. L 0;
  11954. CLR;
  11955. SPU ABJJ;
  11956. ABJJ: NOP 0;
  11957. >D;
  11958. >=I;
  11959. INVI;
  11960. LAR1;
  11961. SIN;
  11962. UN M 0.4;
  11963. FR Z 42;
  11964. SLW;
  11965. +I;
  11966. L 0;
  11967. CLR;
  11968. SPBB ABJK;
  11969. ABJK: NOP 0;
  11970. L 0;
  11971. SI T 42;
  11972. >=R;
  11973. NOT;
  11974. TDB;
  11975. /D;
  11976. SIN;
  11977. +D;
  11978. FR Z 42;
  11979. <=D;
  11980. OW;
  11981. COS;
  11982. RND;
  11983. >D;
  11984. ASIN;
  11985. LN;
  11986. EXP;
  11987. TAR2;
  11988. L 0;
  11989. SS T 42;
  11990. +D;
  11991. UN TRUE;
  11992. >=D;
  11993. O M 0.4;
  11994. L 0;
  11995. SS T 42;
  11996. XN(;
  11997. );
  11998. NOT;
  11999. L 0;
  12000. CLR;
  12001. LOOP ABJL;
  12002. ABJL: NOP 0;
  12003. L 0;
  12004. CLR;
  12005. SPN ABJM;
  12006. ABJM: NOP 0;
  12007. SQR;
  12008. <R;
  12009. ATAN;
  12010. ON(;
  12011. );
  12012. /R;
  12013. ON FALSE;
  12014. +AR1;
  12015. O(;
  12016. );
  12017. L 0;
  12018. SA T 42;
  12019. L 0;
  12020. CLR;
  12021. SPBI ABJN;
  12022. ABJN: NOP 0;
  12023. COS;
  12024. SQR;
  12025. PUSH;
  12026. L 0;
  12027. CLR;
  12028. SPO ABJO;
  12029. ABJO: NOP 0;
  12030. L 0;
  12031. CLR;
  12032. SPN ABJP;
  12033. ABJP: NOP 0;
  12034. -I;
  12035. O M 0.4;
  12036. L 0;
  12037. CLR;
  12038. SPB ABJQ;
  12039. ABJQ: NOP 0;
  12040. OW;
  12041. L MW 50;
  12042. + 1;
  12043. T MW 50;
  12044. T AW 0;
  12045. >=D;
  12046. SQRT;
  12047. T MD 0;
  12048. INVD;
  12049. XOD;
  12050. LAR2;
  12051. -I;
  12052. SQRT;
  12053. DTR;
  12054. L 0;
  12055. CLR;
  12056. SPO ABJR;
  12057. ABJR: NOP 0;
  12058. NOT;
  12059. ON TRUE;
  12060. *R;
  12061. <=I;
  12062. L 0;
  12063. SA T 42;
  12064. OD;
  12065. L 0;
  12066. CLR;
  12067. SPBN ABJS;
  12068. ABJS: NOP 0;
  12069. NEGD;
  12070. CLR;
  12071. L 0;
  12072. SV T 42;
  12073. PUSH;
  12074. L 0;
  12075. CLR;
  12076. SPZ ABJT;
  12077. ABJT: NOP 0;
  12078. L 0;
  12079. SA T 42;
  12080. +I;
  12081. <>R;
  12082. XN M 0.4;
  12083. UN TRUE;
  12084. RND-;
  12085. L 0;
  12086. CLR;
  12087. SPO ABJU;
  12088. ABJU: NOP 0;
  12089. TAN;
  12090. L 0;
  12091. SI T 42;
  12092. <>I;
  12093. ON(;
  12094. );
  12095. /D;
  12096. ZR Z 42;
  12097. L 0;
  12098. SI T 42;
  12099. /I;
  12100. >=I;
  12101. U(;
  12102. );
  12103. >=I;
  12104. T MD 0;
  12105. L 0;
  12106. CLR;
  12107. SPBIN ABJV;
  12108. ABJV: NOP 0;
  12109. DEC 0;
  12110. UN M 0.4;
  12111. TAR1;
  12112. L 0;
  12113. CLR;
  12114. LOOP ABJW;
  12115. ABJW: NOP 0;
  12116. RND+;
  12117. +AR2;
  12118. LEAVE;
  12119. XOW;
  12120. CALL FB 45, DB 45;
  12121. CALL FB 45, DB 45;
  12122. CALL FB 45, DB 45;
  12123. TRUNC;
  12124. *I;
  12125. L 0;
  12126. CLR;
  12127. SPBIN ABJX;
  12128. ABJX: NOP 0;
  12129. L 0;
  12130. CLR;
  12131. SPBN ABJY;
  12132. ABJY: NOP 0;
  12133. DEC 0;
  12134. >D;
  12135. MOD;
  12136. L 0;
  12137. SA T 42;
  12138. L DW#16#1AF026DF;
  12139. L 0;
  12140. SS T 42;
  12141. BLD 0;
  12142. DTB;
  12143. +D;
  12144. TAR1;
  12145. FN M 0.4;
  12146. >=D;
  12147. TAN;
  12148. LN;
  12149. S M 0.4;
  12150. CLR;
  12151. ON(;
  12152. );
  12153. TAN;
  12154. ==D;
  12155. SLW;
  12156. NEGD;
  12157. T MD 0;
  12158. R M 0.4;
  12159. *D;
  12160. UW;
  12161. SQRT;
  12162. NOP 0;
  12163. ENT;
  12164. L 0;
  12165. SS T 42;
  12166. ABS;
  12167. AUF DB 42;
  12168. BLD 0;
  12169. RLDA;
  12170. TAN;
  12171. LAR1;
  12172. RLD;
  12173. SIN;
  12174. >R;
  12175. <D;
  12176. L 0;
  12177. SI T 42;
  12178. <=I;
  12179. SRD;
  12180. TAR2;
  12181. ==D;
  12182. L 0;
  12183. SE T 42;
  12184. OW;
  12185. <I;
  12186. NEGD;
  12187. TAR1;
  12188. SLW;
  12189. O FALSE;
  12190. ENT;
  12191. *D;
  12192. <I;
  12193. CC FC 43;
  12194. EXP;
  12195. <>I;
  12196. <I;
  12197. *D;
  12198. DEC 0;
  12199. L 0;
  12200. CLR;
  12201. SPBNB ABJZ;
  12202. ABJZ: NOP 0;
  12203. X FALSE;
  12204. <I;
  12205. /D;
  12206. L 0;
  12207. CLR;
  12208. SPS ABKA;
  12209. ABKA: NOP 0;
  12210. /D;
  12211. L 0;
  12212. CLR;
  12213. SPO ABKB;
  12214. ABKB: NOP 0;
  12215. L 0;
  12216. CLR;
  12217. SPBI ABKC;
  12218. ABKC: NOP 0;
  12219. SRD;
  12220. UN FALSE;
  12221. <D;
  12222. NOP 0;
  12223. COS;
  12224. U(;
  12225. );
  12226. L 0;
  12227. CLR;
  12228. SPS ABKD;
  12229. ABKD: NOP 0;
  12230. L 0;
  12231. CLR;
  12232. SPBN ABKE;
  12233. ABKE: NOP 0;
  12234. NEGR;
  12235. ITB;
  12236. RLD;
  12237. U M 0.4;
  12238. >=I;
  12239. TAK;
  12240. *I;
  12241. XN(;
  12242. );
  12243. XN TRUE;
  12244. SLD;
  12245. DEC 0;
  12246. L 0;
  12247. CLR;
  12248. SPZ ABKF;
  12249. ABKF: NOP 0;
  12250. LEAVE;
  12251. TAR;
  12252. L 0;
  12253. CLR;
  12254. LOOP ABKG;
  12255. ABKG: NOP 0;
  12256. MOD;
  12257. SLW;
  12258. UC FC 44;
  12259. ==D;
  12260. >D;
  12261. L 0;
  12262. SI T 42;
  12263. TAR2;
  12264. TAR;
  12265. T MD 0;
  12266. <=D;
  12267. L 0;
  12268. CLR;
  12269. SPPZ ABKH;
  12270. ABKH: NOP 0;
  12271. SET;
  12272. EXP;
  12273. *R;
  12274. TRUNC;
  12275. ABS;
  12276. L 0;
  12277. CLR;
  12278. LOOP ABKI;
  12279. ABKI: NOP 0;
  12280. OD;
  12281. XN TRUE;
  12282. L 0;
  12283. CLR;
  12284. SPB ABKJ;
  12285. ABKJ: NOP 0;
  12286. SET;
  12287. <R;
  12288. U TRUE;
  12289. ENT;
  12290. >=I;
  12291. ENT;
  12292. NOT;
  12293. DTB;
  12294. OD;
  12295. +AR1;
  12296. UN(;
  12297. );
  12298. INC 0;
  12299. L 0;
  12300. SA T 42;
  12301. ITD;
  12302. SLW;
  12303. RRDA;
  12304. X M 0.4;
  12305. <I;
  12306. XOW;
  12307. ITB;
  12308. X M 0.4;
  12309. L 0;
  12310. L 0;
  12311. CLR;
  12312. SPL ABKK;
  12313. ABKK: NOP 0;
  12314. INVD;
  12315. FR Z 42;
  12316. +AR2;
  12317. LAR2;
  12318. NOT;
  12319. XOW;
  12320. UC FC 44;
  12321. L 0;
  12322. CLR;
  12323. SPM ABKL;
  12324. ABKL: NOP 0;
  12325. SQR;
  12326. NOP 0;
  12327. XN TRUE;
  12328. XN M 0.4;
  12329. +I;
  12330. ATAN;
  12331. ITB;
  12332. SIN;
  12333. U TRUE;
  12334. +R;
  12335. ZV Z 42;
  12336. CLR;
  12337. >I;
  12338. FN M 0.4;
  12339. OD;
  12340. >=R;
  12341. L 0;
  12342. CLR;
  12343. SPBB ABKM;
  12344. ABKM: NOP 0;
  12345. <D;
  12346. ITB;
  12347. ZV Z 42;
  12348. SET;
  12349. ==R;
  12350. L 0;
  12351. CLR;
  12352. SPS ABKN;
  12353. ABKN: NOP 0;
  12354. EXP;
  12355. >=R;
  12356. ON(;
  12357. );
  12358. L 0;
  12359. CLR;
  12360. SPPZ ABKO;
  12361. ABKO: NOP 0;
  12362. ITB;
  12363. U FALSE;
  12364. L 0;
  12365. CLR;
  12366. SPBIN ABKP;
  12367. ABKP: NOP 0;
  12368. *R;
  12369. FN M 0.4;
  12370. L 0;
  12371. CLR;
  12372. SPP ABKQ;
  12373. ABKQ: NOP 0;
  12374. <D;
  12375. LN;
  12376. L 0;
  12377. CLR;
  12378. SPM ABKR;
  12379. ABKR: NOP 0;
  12380. ZR Z 42;
  12381. MOD;
  12382. <I;
  12383. UN(;
  12384. );
  12385. INVI;
  12386. RND-;
  12387. CALL FB 45, DB 45;
  12388. CALL FB 45, DB 45;
  12389. CALL FB 45, DB 45;
  12390. NOP 0;
  12391. RND+;
  12392. RRD;
  12393. L 0;
  12394. SV T 42;
  12395. L 0;
  12396. SI T 42;
  12397. -R;
  12398. >I;
  12399. TDB;
  12400. ON(;
  12401. );
  12402. L 0;
  12403. CLR;
  12404. SPP ABKS;
  12405. ABKS: NOP 0;
  12406. MCR(;
  12407. MCRA;
  12408. MCRD;
  12409. )MCR;
  12410. PUSH;
  12411. EXP;
  12412. X(;
  12413. );
  12414. SLD;
  12415. UN TRUE;
  12416. TRUNC;
  12417. X M 0.4;
  12418. TDB;
  12419. PUSH;
  12420. NOP 0;
  12421. FN M 0.4;
  12422. L DW#16#20257194;
  12423. INC 0;
  12424. EXP;
  12425. T MD 0;
  12426. NOT;
  12427. RRDA;
  12428. INVD;
  12429. <D;
  12430. /D;
  12431. OD;
  12432. >=R;
  12433. FR Z 42;
  12434. UD;
  12435. TAN;
  12436. POP;
  12437. TAR;
  12438. X FALSE;
  12439. MCR(;
  12440. MCRA;
  12441. MCRD;
  12442. )MCR;
  12443. L 0;
  12444. CLR;
  12445. SPBNB ABKT;
  12446. ABKT: NOP 0;
  12447. <R;
  12448. U M 0.4;
  12449. ON(;
  12450. );
  12451. SLD;
  12452. L 0;
  12453. CLR;
  12454. SPA ABKU;
  12455. ABKU: NOP 0;
  12456. SET;
  12457. LC MW 0;
  12458. +R;
  12459. *I;
  12460. NEGD;
  12461. BLD 0;
  12462. L 0;
  12463. SV T 42;
  12464. L 0;
  12465. CLR;
  12466. SPBN ABKV;
  12467. ABKV: NOP 0;
  12468. XN FALSE;
  12469. XOW;
  12470. LEAVE;
  12471. XN(;
  12472. );
  12473. L 0;
  12474. CLR;
  12475. SPBIN ABKW;
  12476. ABKW: NOP 0;
  12477. SET;
  12478. ABS;
  12479. >=I;
  12480. >D;
  12481. POP;
  12482. L 0;
  12483. CLR;
  12484. SPB ABKX;
  12485. ABKX: NOP 0;
  12486. ACOS;
  12487. NEGI;
  12488. L MW 50;
  12489. + 1;
  12490. T MW 50;
  12491. T AW 0;
  12492. L 0;
  12493. SI T 42;
  12494. L 0;
  12495. CLR;
  12496. SPP ABKY;
  12497. ABKY: NOP 0;
  12498. +I;
  12499. ZR Z 42;
  12500. TAR;
  12501. L 0;
  12502. CLR;
  12503. SPA ABKZ;
  12504. ABKZ: NOP 0;
  12505. FR Z 42;
  12506. L 0;
  12507. CLR;
  12508. SPM ABLA;
  12509. ABLA: NOP 0;
  12510. +I;
  12511. NEGI;
  12512. TAR2;
  12513. SET;
  12514. L 0;
  12515. CLR;
  12516. SPMZ ABLB;
  12517. ABLB: NOP 0;
  12518. X M 0.4;
  12519. <>D;
  12520. U M 0.4;
  12521. UC FC 44;
  12522. SLW;
  12523. UN M 0.4;
  12524. O M 0.4;
  12525. <=R;
  12526. LN;
  12527. POP;
  12528. RLD;
  12529. /R;
  12530. UD;
  12531. S M 0.4;
  12532. R M 0.4;
  12533. UD;
  12534. UN TRUE;
  12535. >=I;
  12536. /I;
  12537. MOD;
  12538. SET;
  12539. + 0;
  12540. *R;
  12541. L 0;
  12542. BTI;
  12543. O M 0.4;
  12544. >=I;
  12545. MCR(;
  12546. MCRA;
  12547. MCRD;
  12548. )MCR;
  12549. *D;
  12550. DTB;
  12551. LAR2;
  12552. O M 0.4;
  12553. TAW;
  12554. XN M 0.4;
  12555. L 0;
  12556. CLR;
  12557. SPB ABLC;
  12558. ABLC: NOP 0;
  12559. + 0;
  12560. DTB;
  12561. CLR;
  12562. L 0;
  12563. CLR;
  12564. SPO ABLD;
  12565. ABLD: NOP 0;
  12566. TAW;
  12567. TRUNC;
  12568. RRD;
  12569. +D;
  12570. ON TRUE;
  12571. RRD;
  12572. UC FC 44;
  12573. NEGI;
  12574. UN M 0.4;
  12575. DTR;
  12576. ABS;
  12577. <>I;
  12578. L 0;
  12579. CLR;
  12580. SPB ABLE;
  12581. ABLE: NOP 0;
  12582. INC 0;
  12583. RRDA;
  12584. RRD;
  12585. >=R;
  12586. PUSH;
  12587. DTB;
  12588. LEAVE;
  12589. CC FC 43;
  12590. LEAVE;
  12591. <=R;
  12592. X(;
  12593. );
  12594. NOP 0;
  12595. <=I;
  12596. X(;
  12597. );
  12598. <=I;
  12599. ZR Z 42;
  12600. INC 0;
  12601. RND;
  12602. L 0;
  12603. SA T 42;
  12604. L 0;
  12605. L 0;
  12606. CLR;
  12607. SPL ABLF;
  12608. ABLF: NOP 0;
  12609. DTB;
  12610. XN M 0.4;
  12611. XOW;
  12612. LC MW 0;
  12613. ENT;
  12614. TAR1;
  12615. U M 0.4;
  12616. ASIN;
  12617. UN(;
  12618. );
  12619. L 0;
  12620. CLR;
  12621. SPM ABLG;
  12622. ABLG: NOP 0;
  12623. ACOS;
  12624. EXP;
  12625. L 0;
  12626. L 0;
  12627. CLR;
  12628. SPL ABLH;
  12629. ABLH: NOP 0;
  12630. >=I;
  12631. L 0;
  12632. SS T 42;
  12633. SSI;
  12634. RRD;
  12635. +D;
  12636. L 0;
  12637. SS T 42;
  12638. XN FALSE;
  12639. U(;
  12640. );
  12641. L 0;
  12642. CLR;
  12643. SPB ABLI;
  12644. ABLI: NOP 0;
  12645. COS;
  12646. XOW;
  12647. T MD 0;
  12648. L 0;
  12649. CLR;
  12650. SPN ABLJ;
  12651. ABLJ: NOP 0;
  12652. UN M 0.4;
  12653. /R;
  12654. DTB;
  12655. L 0;
  12656. CLR;
  12657. SPU ABLK;
  12658. ABLK: NOP 0;
  12659. S M 0.4;
  12660. DEC 0;
  12661. U FALSE;
  12662. TAN;
  12663. R M 0.4;
  12664. L DW#16#326684FF;
  12665. L 0;
  12666. CLR;
  12667. SPMZ ABLL;
  12668. ABLL: NOP 0;
  12669. L 0;
  12670. CLR;
  12671. SPZ ABLM;
  12672. ABLM: NOP 0;
  12673. X(;
  12674. );
  12675. SAVE;
  12676. UN TRUE;
  12677. ACOS;
  12678. U TRUE;
  12679. LC MW 0;
  12680. L DW#16#1B9B71F0;
  12681. RND-;
  12682. +I;
  12683. UN(;
  12684. );
  12685. L 0;
  12686. CLR;
  12687. SPU ABLN;
  12688. ABLN: NOP 0;
  12689. L 0;
  12690. SA T 42;
  12691. RND+;
  12692. = M 0.4;
  12693. SET;
  12694. LAR1;
  12695. SAVE;
  12696. T MD 0;
  12697. +AR2;
  12698. >=I;
  12699. NOT;
  12700. ON(;
  12701. );
  12702. O TRUE;
  12703. L 0;
  12704. CLR;
  12705. SPN ABLO;
  12706. ABLO: NOP 0;
  12707. X(;
  12708. );
  12709. <=I;
  12710. ON(;
  12711. );
  12712. LAR2;
  12713. O(;
  12714. );
  12715. L 0;
  12716. CLR;
  12717. SPO ABLP;
  12718. ABLP: NOP 0;
  12719. L MW 50;
  12720. + 1;
  12721. T MW 50;
  12722. T AW 0;
  12723. ACOS;
  12724. X(;
  12725. );
  12726. FP M 0.4;
  12727. O(;
  12728. );
  12729. ENT;
  12730. UN(;
  12731. );
  12732. L 0;
  12733. CLR;
  12734. SPBI ABLQ;
  12735. ABLQ: NOP 0;
  12736. +R;
  12737. SQR;
  12738. SAVE;
  12739. LN;
  12740. TRUNC;
  12741. SET;
  12742. O M 0.4;
  12743. TAR1;
  12744. -R;
  12745. MCR(;
  12746. MCRA;
  12747. MCRD;
  12748. )MCR;
  12749. ASIN;
  12750. FN M 0.4;
  12751. L 0;
  12752. CLR;
  12753. LOOP ABLR;
  12754. ABLR: NOP 0;
  12755. U TRUE;
  12756. L 0;
  12757. SS T 42;
  12758. L 0;
  12759. CLR;
  12760. SPMZ ABLS;
  12761. ABLS: NOP 0;
  12762. NOP 0;
  12763. DTB;
  12764. ==I;
  12765. FP M 0.4;
  12766. ON M 0.4;
  12767. CALL FB 45, DB 45;
  12768. CALL FB 45, DB 45;
  12769. CALL FB 45, DB 45;
  12770. XN(;
  12771. );
  12772. CALL FC 42;
  12773. CALL FC 42;
  12774. CALL FC 42;
  12775. DTB;
  12776. DEC 0;
  12777. <=I;
  12778. L 0;
  12779. SV T 42;
  12780. ZV Z 42;
  12781. /I;
  12782. COS;
  12783. SLD;
  12784. LAR2;
  12785. L 0;
  12786. BTD;
  12787. FR Z 42;
  12788. >D;
  12789. XN FALSE;
  12790. <=I;
  12791. L 0;
  12792. CLR;
  12793. SPZ ABLT;
  12794. ABLT: NOP 0;
  12795. BLD 0;
  12796. ATAN;
  12797. L 0;
  12798. SE T 42;
  12799. + 0;
  12800. L 0;
  12801. CLR;
  12802. SPZ ABLU;
  12803. ABLU: NOP 0;
  12804. BLD 0;
  12805. OD;
  12806. >=D;
  12807. >=D;
  12808. SSD;
  12809. L 0;
  12810. CLR;
  12811. SPZ ABLV;
  12812. ABLV: NOP 0;
  12813. CC FC 43;
  12814. +I;
  12815. L 0;
  12816. CLR;
  12817. SPBNB ABLW;
  12818. ABLW: NOP 0;
  12819. *D;
  12820. O M 0.4;
  12821. L 0;
  12822. SS T 42;
  12823. NOP 0;
  12824. >=D;
  12825. O(;
  12826. );
  12827. RND+;
  12828. L 0;
  12829. SI T 42;
  12830. ENT;
  12831. UN(;
  12832. );
  12833. TAN;
  12834. -I;
  12835. DTR;
  12836. INVI;
  12837. INVI;
  12838. XN(;
  12839. );
  12840. +I;
  12841. ITD;
  12842. SLW;
  12843. SSI;
  12844. SET;
  12845. L 0;
  12846. CLR;
  12847. SPMZ ABLX;
  12848. ABLX: NOP 0;
  12849. +AR2;
  12850. LEAVE;
  12851. L 0;
  12852. CLR;
  12853. SPU ABLY;
  12854. ABLY: NOP 0;
  12855. L 0;
  12856. CLR;
  12857. SPBIN ABLZ;
  12858. ABLZ: NOP 0;
  12859. COS;
  12860. L 0;
  12861. CLR;
  12862. SPMZ ABMA;
  12863. ABMA: NOP 0;
  12864. >R;
  12865. FP M 0.4;
  12866. TAR1;
  12867. X TRUE;
  12868. TAW;
  12869. U M 0.4;
  12870. TAD;
  12871. RND;
  12872. SSI;
  12873. NEGD;
  12874. RND-;
  12875. SLD;
  12876. L 0;
  12877. CLR;
  12878. SPMZ ABMB;
  12879. ABMB: NOP 0;
  12880. MOD;
  12881. INVD;
  12882. SQR;
  12883. L 0;
  12884. BTD;
  12885. UN M 0.4;
  12886. +D;
  12887. O M 0.4;
  12888. = M 0.4;
  12889. + 0;
  12890. UN FALSE;
  12891. <D;
  12892. L 0;
  12893. CLR;
  12894. SPBNB ABMC;
  12895. ABMC: NOP 0;
  12896. LAR1;
  12897. DTB;
  12898. BLD 0;
  12899. +D;
  12900. XN FALSE;
  12901. DTR;
  12902. DTR;
  12903. L 0;
  12904. CLR;
  12905. SPBN ABMD;
  12906. ABMD: NOP 0;
  12907. <=R;
  12908. TAW;
  12909. AUF DB 42;
  12910. <=R;
  12911. L 0;
  12912. CLR;
  12913. LOOP ABME;
  12914. ABME: NOP 0;
  12915. PUSH;
  12916. FR Z 42;
  12917. L 0;
  12918. BTI;
  12919. DTR;
  12920. XN M 0.4;
  12921. L 0;
  12922. BTI;
  12923. AUF DB 42;
  12924. FN M 0.4;
  12925. XN M 0.4;
  12926. >D;
  12927. +R;
  12928. <>I;
  12929. L 0;
  12930. CLR;
  12931. LOOP ABMF;
  12932. ABMF: NOP 0;
  12933. NEGI;
  12934. L 0;
  12935. CLR;
  12936. SPS ABMG;
  12937. ABMG: NOP 0;
  12938. TAR1;
  12939. RND-;
  12940. *D;
  12941. /D;
  12942. >=R;
  12943. UW;
  12944. ATAN;
  12945. X(;
  12946. );
  12947. <I;
  12948. <D;
  12949. ==D;
  12950. ITD;
  12951. DTB;
  12952. XOW;
  12953. MOD;
  12954. /D;
  12955. L 0;
  12956. CLR;
  12957. SPP ABMH;
  12958. ABMH: NOP 0;
  12959. SET;
  12960. ASIN;
  12961. FR Z 42;
  12962. XN FALSE;
  12963. UD;
  12964. L 0;
  12965. CLR;
  12966. SPBI ABMI;
  12967. ABMI: NOP 0;
  12968. <=D;
  12969. L 0;
  12970. CLR;
  12971. SPPZ ABMJ;
  12972. ABMJ: NOP 0;
  12973. L DW#16#CBAD3916;
  12974. <=I;
  12975. L 0;
  12976. SV T 42;
  12977. BLD 0;
  12978. RLD;
  12979. NEGI;
  12980. S M 0.4;
  12981. SSD;
  12982. X(;
  12983. );
  12984. <R;
  12985. L 0;
  12986. SV T 42;
  12987. *R;
  12988. L 0;
  12989. SV T 42;
  12990. /D;
  12991. RLDA;
  12992. L 0;
  12993. SS T 42;
  12994. MCR(;
  12995. MCRA;
  12996. MCRD;
  12997. )MCR;
  12998. L 0;
  12999. BTI;
  13000. L 0;
  13001. CLR;
  13002. SPM ABMK;
  13003. ABMK: NOP 0;
  13004. /D;
  13005. UW;
  13006. SLD;
  13007. RRD;
  13008. SLW;
  13009. TDB;
  13010. +AR2;
  13011. SQR;
  13012. BLD 0;
  13013. ON FALSE;
  13014. TAW;
  13015. INVI;
  13016. TAR;
  13017. RND+;
  13018. ABS;
  13019. NEGR;
  13020. L 0;
  13021. CLR;
  13022. SPS ABML;
  13023. ABML: NOP 0;
  13024. TAN;
  13025. MOD;
  13026. DEC 0;
  13027. <>R;
  13028. /D;
  13029. ZV Z 42;
  13030. TAK;
  13031. NOT;
  13032. <>D;
  13033. NOT;
  13034. L 0;
  13035. CLR;
  13036. SPBI ABMM;
  13037. ABMM: NOP 0;
  13038. LAR2;
  13039. L 0;
  13040. SS T 42;
  13041. /I;
  13042. RND;
  13043. BLD 0;
  13044. X TRUE;
  13045. L 0;
  13046. SE T 42;
  13047. L 0;
  13048. CLR;
  13049. LOOP ABMN;
  13050. ABMN: NOP 0;
  13051. ASIN;
  13052. TAR;
  13053. SSI;
  13054. ACOS;
  13055. EXP;
  13056. *D;
  13057. RLDA;
  13058. L 0;
  13059. CLR;
  13060. SPP ABMO;
  13061. ABMO: NOP 0;
  13062. L 0;
  13063. CLR;
  13064. SPA ABMP;
  13065. ABMP: NOP 0;
  13066. +R;
  13067. U FALSE;
  13068. LAR2;
  13069. TRUNC;
  13070. AUF DB 42;
  13071. R M 0.4;
  13072. + 0;
  13073. NOT;
  13074. L 0;
  13075. CLR;
  13076. SPBI ABMQ;
  13077. ABMQ: NOP 0;
  13078. RRDA;
  13079. L 0;
  13080. SE T 42;
  13081. XOD;
  13082. S M 0.4;
  13083. L 0;
  13084. L 0;
  13085. CLR;
  13086. SPL ABMR;
  13087. ABMR: NOP 0;
  13088. RND;
  13089. FN M 0.4;
  13090. <I;
  13091. = M 0.4;
  13092. +D;
  13093. ON FALSE;
  13094. L 0;
  13095. CLR;
  13096. SPU ABMS;
  13097. ABMS: NOP 0;
  13098. DTR;
  13099. L 0;
  13100. CLR;
  13101. SPMZ ABMT;
  13102. ABMT: NOP 0;
  13103. LC MW 0;
  13104. L 0;
  13105. CLR;
  13106. SPO ABMU;
  13107. ABMU: NOP 0;
  13108. L 0;
  13109. L 0;
  13110. CLR;
  13111. SPL ABMV;
  13112. ABMV: NOP 0;
  13113. ITD;
  13114. CC FC 43;
  13115. >D;
  13116. XOD;
  13117. ZR Z 42;
  13118. O M 0.4;
  13119. L 0;
  13120. CLR;
  13121. SPBIN ABMW;
  13122. ABMW: NOP 0;
  13123. L 0;
  13124. CLR;
  13125. SPBN ABMX;
  13126. ABMX: NOP 0;
  13127. -I;
  13128. SQRT;
  13129. SQRT;
  13130. +AR2;
  13131. ON M 0.4;
  13132. SSD;
  13133. L 0;
  13134. SE T 42;
  13135. <=D;
  13136. ABS;
  13137. RND;
  13138. RND;
  13139. NEGI;
  13140. SLW;
  13141. TRUNC;
  13142. L 0;
  13143. SS T 42;
  13144. NOP 0;
  13145. PUSH;
  13146. SSI;
  13147. MCR(;
  13148. MCRA;
  13149. MCRD;
  13150. )MCR;
  13151. +I;
  13152. NOT;
  13153. L 0;
  13154. CLR;
  13155. SPN ABMY;
  13156. ABMY: NOP 0;
  13157. ITD;
  13158. ASIN;
  13159. SIN;
  13160. NEGI;
  13161. LAR1;
  13162. TAR;
  13163. POP;
  13164. UN TRUE;
  13165. >D;
  13166. +AR1;
  13167. <=I;
  13168. L 0;
  13169. CLR;
  13170. SPS ABMZ;
  13171. ABMZ: NOP 0;
  13172. O M 0.4;
  13173. RLDA;
  13174. /I;
  13175. L 0;
  13176. CLR;
  13177. LOOP ABNA;
  13178. ABNA: NOP 0;
  13179. TAD;
  13180. COS;
  13181. TAN;
  13182. SQRT;
  13183. UD;
  13184. L 0;
  13185. CLR;
  13186. SPBIN ABNB;
  13187. ABNB: NOP 0;
  13188. L 0;
  13189. CLR;
  13190. SPPZ ABNC;
  13191. ABNC: NOP 0;
  13192. NOP 0;
  13193. XN M 0.4;
  13194. INC 0;
  13195. O FALSE;
  13196. ==R;
  13197. L 0;
  13198. CLR;
  13199. SPMZ ABND;
  13200. ABND: NOP 0;
  13201. INC 0;
  13202. CC FC 43;
  13203. UC FC 44;
  13204. DEC 0;
  13205. /R;
  13206. +R;
  13207. INVD;
  13208. /R;
  13209. X(;
  13210. );
  13211. XOW;
  13212. -R;
  13213. ITD;
  13214. SLW;
  13215. ==I;
  13216. L 0;
  13217. CLR;
  13218. SPMZ ABNE;
  13219. ABNE: NOP 0;
  13220. INC 0;
  13221. TAR;
  13222. L 0;
  13223. CLR;
  13224. SPO ABNF;
  13225. ABNF: NOP 0;
  13226. CLR;
  13227. >=R;
  13228. FP M 0.4;
  13229. PUSH;
  13230. L 0;
  13231. BTI;
  13232. O TRUE;
  13233. U FALSE;
  13234. DTR;
  13235. XN(;
  13236. );
  13237. -R;
  13238. L 0;
  13239. CLR;
  13240. SPBN ABNG;
  13241. ABNG: NOP 0;
  13242. INVD;
  13243. TRUNC;
  13244. L 0;
  13245. CLR;
  13246. SPBNB ABNH;
  13247. ABNH: NOP 0;
  13248. UW;
  13249. XN(;
  13250. );
  13251. TAR1;
  13252. O(;
  13253. );
  13254. *D;
  13255. L 0;
  13256. SS T 42;
  13257. O M 0.4;
  13258. >=R;
  13259. L 0;
  13260. CLR;
  13261. SPPZ ABNI;
  13262. ABNI: NOP 0;
  13263. LN;
  13264. /R;
  13265. <>R;
  13266. <>I;
  13267. ==D;
  13268. UD;
  13269. COS;
  13270. SRW;
  13271. XN(;
  13272. );
  13273. *R;
  13274. INVD;
  13275. ==D;
  13276. INVD;
  13277. L 0;
  13278. CLR;
  13279. SPZ ABNJ;
  13280. ABNJ: NOP 0;
  13281. ACOS;
  13282. SLW;
  13283. <>R;
  13284. CC FC 43;
  13285. +AR1;
  13286. L 0;
  13287. CLR;
  13288. SPZ ABNK;
  13289. ABNK: NOP 0;
  13290. NOP 0;
  13291. INVI;
  13292. RRDA;
  13293. TAR2;
  13294. L 0;
  13295. L 0;
  13296. CLR;
  13297. SPL ABNL;
  13298. ABNL: NOP 0;
  13299. INVI;
  13300. UN M 0.4;
  13301. <D;
  13302. T MD 0;
  13303. X(;
  13304. );
  13305. SQR;
  13306. CC FC 43;
  13307. L DW#16#869E8836;
  13308. INC 0;
  13309. RLD;
  13310. TAR2;
  13311. MCR(;
  13312. MCRA;
  13313. MCRD;
  13314. )MCR;
  13315. +AR1;
  13316. X FALSE;
  13317. L 0;
  13318. CLR;
  13319. SPBB ABNM;
  13320. ABNM: NOP 0;
  13321. TAR1;
  13322. -I;
  13323. L 0;
  13324. CLR;
  13325. SPBIN ABNN;
  13326. ABNN: NOP 0;
  13327. /R;
  13328. L MW 50;
  13329. + 1;
  13330. T MW 50;
  13331. T AW 0;
  13332. <=R;
  13333. SIN;
  13334. L DW#16#6E9C92BA;
  13335. -R;
  13336. ITB;
  13337. INC 0;
  13338. SAVE;
  13339. /R;
  13340. XN FALSE;
  13341. <>R;
  13342. L 0;
  13343. L 0;
  13344. CLR;
  13345. SPL ABNO;
  13346. ABNO: NOP 0;
  13347. UD;
  13348. L 0;
  13349. CLR;
  13350. SPBNB ABNP;
  13351. ABNP: NOP 0;
  13352. XN(;
  13353. );
  13354. NEGR;
  13355. RRD;
  13356. LN;
  13357. PUSH;
  13358. >=I;
  13359. *D;
  13360. R M 0.4;
  13361. FP M 0.4;
  13362. L 0;
  13363. SI T 42;
  13364. L 0;
  13365. CLR;
  13366. SPPZ ABNQ;
  13367. ABNQ: NOP 0;
  13368. EXP;
  13369. TAR;
  13370. <R;
  13371. LC MW 0;
  13372. NEGI;
  13373. L 0;
  13374. SI T 42;
  13375. XN TRUE;
  13376. U FALSE;
  13377. MCR(;
  13378. MCRA;
  13379. MCRD;
  13380. )MCR;
  13381. +R;
  13382. +I;
  13383. SQR;
  13384. DTB;
  13385. ABS;
  13386. ON FALSE;
  13387. LC MW 0;
  13388. >I;
  13389. <>D;
  13390. L 0;
  13391. CLR;
  13392. SPPZ ABNR;
  13393. ABNR: NOP 0;
  13394. MCR(;
  13395. MCRA;
  13396. MCRD;
  13397. )MCR;
  13398. SRD;
  13399. MCR(;
  13400. MCRA;
  13401. MCRD;
  13402. )MCR;
  13403. XN(;
  13404. );
  13405. NOT;
  13406. TAK;
  13407. FR Z 42;
  13408. LAR1;
  13409. >D;
  13410. SSD;
  13411. L 0;
  13412. CLR;
  13413. SPB ABNS;
  13414. ABNS: NOP 0;
  13415. >R;
  13416. >=R;
  13417. X M 0.4;
  13418. UC FC 44;
  13419. FN M 0.4;
  13420. L 0;
  13421. BTI;
  13422. L 0;
  13423. CLR;
  13424. SPBI ABNT;
  13425. ABNT: NOP 0;
  13426. >=I;
  13427. XOW;
  13428. /R;
  13429. >=R;
  13430. R M 0.4;
  13431. O M 0.4;
  13432. L 0;
  13433. CLR;
  13434. SPA ABNU;
  13435. ABNU: NOP 0;
  13436. ==R;
  13437. LAR1;
  13438. + 0;
  13439. L 0;
  13440. BTI;
  13441. NEGR;
  13442. O FALSE;
  13443. LAR2;
  13444. U(;
  13445. );
  13446. L 0;
  13447. SA T 42;
  13448. FP M 0.4;
  13449. *R;
  13450. L 0;
  13451. CLR;
  13452. SPS ABNV;
  13453. ABNV: NOP 0;
  13454. LAR2;
  13455. UN(;
  13456. );
  13457. SET;
  13458. UN M 0.4;
  13459. U(;
  13460. );
  13461. MOD;
  13462. INVI;
  13463. L DW#16#3D10FA95;
  13464. CLR;
  13465. X M 0.4;
  13466. COS;
  13467. UN FALSE;
  13468. L 0;
  13469. CLR;
  13470. LOOP ABNW;
  13471. ABNW: NOP 0;
  13472. DTB;
  13473. X(;
  13474. );
  13475. TAW;
  13476. SAVE;
  13477. <R;
  13478. <R;
  13479. XN TRUE;
  13480. L 0;
  13481. SE T 42;
  13482. ==I;
  13483. L 0;
  13484. CLR;
  13485. SPPZ ABNX;
  13486. ABNX: NOP 0;
  13487. L 0;
  13488. CLR;
  13489. SPM ABNY;
  13490. ABNY: NOP 0;
  13491. ENT;
  13492. ITD;
  13493. NEGI;
  13494. OD;
  13495. ABS;
  13496. ASIN;
  13497. <I;
  13498. TRUNC;
  13499. NEGD;
  13500. ==I;
  13501. + 0;
  13502. L 0;
  13503. CLR;
  13504. SPM ABNZ;
  13505. ABNZ: NOP 0;
  13506. <=R;
  13507. ON M 0.4;
  13508. SQR;
  13509. L 0;
  13510. CLR;
  13511. SPN ABOA;
  13512. ABOA: NOP 0;
  13513. ON M 0.4;
  13514. *R;
  13515. NEGD;
  13516. TAR2;
  13517. TAW;
  13518. X(;
  13519. );
  13520. L 0;
  13521. CLR;
  13522. SPB ABOB;
  13523. ABOB: NOP 0;
  13524. *D;
  13525. XN FALSE;
  13526. NEGR;
  13527. LN;
  13528. L 0;
  13529. CLR;
  13530. SPO ABOC;
  13531. ABOC: NOP 0;
  13532. SET;
  13533. RLDA;
  13534. FP M 0.4;
  13535. UD;
  13536. INC 0;
  13537. >=R;
  13538. LC MW 0;
  13539. SAVE;
  13540. SET;
  13541. L 0;
  13542. CLR;
  13543. SPPZ ABOD;
  13544. ABOD: NOP 0;
  13545. *R;
  13546. <>D;
  13547. L 0;
  13548. CLR;
  13549. SPU ABOE;
  13550. ABOE: NOP 0;
  13551. <=R;
  13552. L 0;
  13553. CLR;
  13554. SPP ABOF;
  13555. ABOF: NOP 0;
  13556. SLD;
  13557. XN(;
  13558. );
  13559. L 0;
  13560. CLR;
  13561. SPU ABOG;
  13562. ABOG: NOP 0;
  13563. X M 0.4;
  13564. UC FC 44;
  13565. BLD 0;
  13566. T MD 0;
  13567. +R;
  13568. L 0;
  13569. SV T 42;
  13570. TRUNC;
  13571. RRDA;
  13572. NOP 0;
  13573. ON M 0.4;
  13574. TRUNC;
  13575. XN M 0.4;
  13576. >=I;
  13577. L 0;
  13578. CLR;
  13579. SPZ ABOH;
  13580. ABOH: NOP 0;
  13581. RND+;
  13582. ASIN;
  13583. FR Z 42;
  13584. S M 0.4;
  13585. ON(;
  13586. );
  13587. >D;
  13588. /D;
  13589. RLDA;
  13590. L 0;
  13591. CLR;
  13592. SPBI ABOI;
  13593. ABOI: NOP 0;
  13594. INVI;
  13595. <=D;
  13596. MOD;
  13597. INVD;
  13598. ON FALSE;
  13599. SET;
  13600. LAR2;
  13601. L 0;
  13602. CLR;
  13603. SPMZ ABOJ;
  13604. ABOJ: NOP 0;
  13605. <>D;
  13606. L 0;
  13607. CLR;
  13608. SPB ABOK;
  13609. ABOK: NOP 0;
  13610. L 0;
  13611. CLR;
  13612. SPP ABOL;
  13613. ABOL: NOP 0;
  13614. X TRUE;
  13615. L 0;
  13616. CLR;
  13617. SPBB ABOM;
  13618. ABOM: NOP 0;
  13619. U FALSE;
  13620. L 0;
  13621. CLR;
  13622. SPMZ ABON;
  13623. ABON: NOP 0;
  13624. +I;
  13625. FR Z 42;
  13626. INVD;
  13627. OD;
  13628. UN(;
  13629. );
  13630. L DW#16#DF69A560;
  13631. L 0;
  13632. SA T 42;
  13633. L 0;
  13634. CLR;
  13635. SPM ABOO;
  13636. ABOO: NOP 0;
  13637. ITB;
  13638. LAR2;
  13639. UN M 0.4;
  13640. X(;
  13641. );
  13642. RLD;
  13643. XN(;
  13644. );
  13645. DTB;
  13646. UN(;
  13647. );
  13648. <D;
  13649. INVD;
  13650. <=I;
  13651. CLR;
  13652. <=R;
  13653. CALL FC 42;
  13654. CALL FC 42;
  13655. CALL FC 42;
  13656. TAK;
  13657. INVD;
  13658. RND+;
  13659. L 0;
  13660. SI T 42;
  13661. S M 0.4;
  13662. ASIN;
  13663. SSI;
  13664. L 0;
  13665. CLR;
  13666. SPZ ABOP;
  13667. ABOP: NOP 0;
  13668. <R;
  13669. DTR;
  13670. FR Z 42;
  13671. TAN;
  13672. L 0;
  13673. BTI;
  13674. UC FC 44;
  13675. L DW#16#4D980202;
  13676. +AR1;
  13677. T MD 0;
  13678. INVI;
  13679. L 0;
  13680. CLR;
  13681. SPA ABOQ;
  13682. ABOQ: NOP 0;
  13683. SLD;
  13684. S M 0.4;
  13685. +D;
  13686. ABS;
  13687. MOD;
  13688. <R;
  13689. SSD;
  13690. LAR1;
  13691. TAN;
  13692. L 0;
  13693. SI T 42;
  13694. L MW 50;
  13695. + 1;
  13696. T MW 50;
  13697. T AW 0;
  13698. ACOS;
  13699. ==R;
  13700. SLD;
  13701. XN M 0.4;
  13702. +R;
  13703. ASIN;
  13704. NOT;
  13705. L 0;
  13706. CLR;
  13707. SPBIN ABOR;
  13708. ABOR: NOP 0;
  13709. CALL FB 45, DB 45;
  13710. CALL FB 45, DB 45;
  13711. CALL FB 45, DB 45;
  13712. UD;
  13713. ==R;
  13714. PUSH;
  13715. <=R;
  13716. ZV Z 42;
  13717. +R;
  13718. MCR(;
  13719. MCRA;
  13720. MCRD;
  13721. )MCR;
  13722. L 0;
  13723. CLR;
  13724. SPS ABOS;
  13725. ABOS: NOP 0;
  13726. TAR1;
  13727. L 0;
  13728. CLR;
  13729. SPBN ABOT;
  13730. ABOT: NOP 0;
  13731. MOD;
  13732. ENT;
  13733. UC FC 44;
  13734. SLD;
  13735. = M 0.4;
  13736. L 0;
  13737. CLR;
  13738. SPU ABOU;
  13739. ABOU: NOP 0;
  13740. <>D;
  13741. SSD;
  13742. DTR;
  13743. ==R;
  13744. ITD;
  13745. UN M 0.4;
  13746. ON M 0.4;
  13747. RRDA;
  13748. /D;
  13749. RLD;
  13750. SQRT;
  13751. SIN;
  13752. ABS;
  13753. /D;
  13754. -R;
  13755. RLD;
  13756. L 0;
  13757. CLR;
  13758. SPS ABOV;
  13759. ABOV: NOP 0;
  13760. NOP 0;
  13761. = M 0.4;
  13762. EXP;
  13763. ON FALSE;
  13764. -R;
  13765. LEAVE;
  13766. >R;
  13767. DTB;
  13768. ATAN;
  13769. ZV Z 42;
  13770. *I;
  13771. L 0;
  13772. SV T 42;
  13773. RLD;
  13774. *D;
  13775. O(;
  13776. );
  13777. -R;
  13778. TAN;
  13779. L DW#16#3E0AD66D;
  13780. O TRUE;
  13781. UN FALSE;
  13782. ZR Z 42;
  13783. CC FC 43;
  13784. TAR1;
  13785. >=D;
  13786. ZV Z 42;
  13787. L DW#16#D76D9612;
  13788. ON M 0.4;
  13789. >I;
  13790. CLR;
  13791. -R;
  13792. ABS;
  13793. NOP 0;
  13794. S M 0.4;
  13795. L 0;
  13796. SS T 42;
  13797. ITD;
  13798. TAN;
  13799. <R;
  13800. ASIN;
  13801. LC MW 0;
  13802. L 0;
  13803. CLR;
  13804. SPO ABOW;
  13805. ABOW: NOP 0;
  13806. RRDA;
  13807. XOW;
  13808. +R;
  13809. NOP 0;
  13810. L 0;
  13811. CLR;
  13812. SPS ABOX;
  13813. ABOX: NOP 0;
  13814. LN;
  13815. SET;
  13816. ==I;
  13817. DEC 0;
  13818. -I;
  13819. <D;
  13820. TDB;
  13821. NEGI;
  13822. ABS;
  13823. L 0;
  13824. CLR;
  13825. SPS ABOY;
  13826. ABOY: NOP 0;
  13827. UN M 0.4;
  13828. >=R;
  13829. RLD;
  13830. U M 0.4;
  13831. SAVE;
  13832. XN(;
  13833. );
  13834. SIN;
  13835. UW;
  13836. SIN;
  13837. L 0;
  13838. CLR;
  13839. SPBB ABOZ;
  13840. ABOZ: NOP 0;
  13841. ACOS;
  13842. >=R;
  13843. L 0;
  13844. BTI;
  13845. /D;
  13846. L 0;
  13847. BTD;
  13848. <>D;
  13849. DTR;
  13850. SRD;
  13851. ITB;
  13852. RRDA;
  13853. <>I;
  13854. TAR;
  13855. INC 0;
  13856. NEGD;
  13857. L 0;
  13858. BTD;
  13859. INVI;
  13860. ON(;
  13861. );
  13862. ITB;
  13863. DTB;
  13864. ZR Z 42;
  13865. EXP;
  13866. LAR1;
  13867. ==I;
  13868. <R;
  13869. S M 0.4;
  13870. L 0;
  13871. CLR;
  13872. SPBI ABPA;
  13873. ABPA: NOP 0;
  13874. NOT;
  13875. MOD;
  13876. >=I;
  13877. L 0;
  13878. L 0;
  13879. CLR;
  13880. SPL ABPB;
  13881. ABPB: NOP 0;
  13882. X(;
  13883. );
  13884. +I;
  13885. UN FALSE;
  13886. SRW;
  13887. SRD;
  13888. FN M 0.4;
  13889. O M 0.4;
  13890. ON(;
  13891. );
  13892. TDB;
  13893. UN M 0.4;
  13894. BLD 0;
  13895. X FALSE;
  13896. NEGD;
  13897. L 0;
  13898. SA T 42;
  13899. UN M 0.4;
  13900. MOD;
  13901. CC FC 43;
  13902. L 0;
  13903. SA T 42;
  13904. TDB;
  13905. SRD;
  13906. SLW;
  13907. L 0;
  13908. CLR;
  13909. LOOP ABPC;
  13910. ABPC: NOP 0;
  13911. CC FC 43;
  13912. ASIN;
  13913. L 0;
  13914. CLR;
  13915. LOOP ABPD;
  13916. ABPD: NOP 0;
  13917. *D;
  13918. +I;
  13919. L 0;
  13920. CLR;
  13921. SPN ABPE;
  13922. ABPE: NOP 0;
  13923. RND-;
  13924. +D;
  13925. SQR;
  13926. MOD;
  13927. L MW 50;
  13928. + 1;
  13929. T MW 50;
  13930. T AW 0;
  13931. O(;
  13932. );
  13933. + 0;
  13934. L 0;
  13935. CLR;
  13936. SPMZ ABPF;
  13937. ABPF: NOP 0;
  13938. FN M 0.4;
  13939. U M 0.4;
  13940. TAR1;
  13941. SQR;
  13942. >D;
  13943. U FALSE;
  13944. OW;
  13945. L 0;
  13946. CLR;
  13947. SPB ABPG;
  13948. ABPG: NOP 0;
  13949. L DW#16#5E516BF8;
  13950. SLW;
  13951. L 0;
  13952. SE T 42;
  13953. LN;
  13954. ITD;
  13955. U M 0.4;
  13956. L 0;
  13957. CLR;
  13958. SPM ABPH;
  13959. ABPH: NOP 0;
  13960. X M 0.4;
  13961. +D;
  13962. XN TRUE;
  13963. LAR2;
  13964. TRUNC;
  13965. UC FC 44;
  13966. SRD;
  13967. SQR;
  13968. L MW 50;
  13969. + 1;
  13970. T MW 50;
  13971. T AW 0;
  13972. S M 0.4;
  13973. *I;
  13974. ASIN;
  13975. SLW;
  13976. FN M 0.4;
  13977. -R;
  13978. L 0;
  13979. CLR;
  13980. SPBI ABPI;
  13981. ABPI: NOP 0;
  13982. UC FC 44;
  13983. DTB;
  13984. <D;
  13985. L 0;
  13986. SA T 42;
  13987. DEC 0;
  13988. L 0;
  13989. SI T 42;
  13990. O FALSE;
  13991. RLDA;
  13992. SET;
  13993. L 0;
  13994. CLR;
  13995. SPO ABPJ;
  13996. ABPJ: NOP 0;
  13997. TAK;
  13998. SSI;
  13999. >=R;
  14000. T MD 0;
  14001. >I;
  14002. SLD;
  14003. OD;
  14004. RND-;
  14005. FR Z 42;
  14006. NEGD;
  14007. >=R;
  14008. SET;
  14009. ==I;
  14010. ATAN;
  14011. UN FALSE;
  14012. L 0;
  14013. CLR;
  14014. SPPZ ABPK;
  14015. ABPK: NOP 0;
  14016. -R;
  14017. L 0;
  14018. CLR;
  14019. SPB ABPL;
  14020. ABPL: NOP 0;
  14021. TAW;
  14022. ZV Z 42;
  14023. SLW;
  14024. >=I;
  14025. <>D;
  14026. XOW;
  14027. RLD;
  14028. CLR;
  14029. L 0;
  14030. CLR;
  14031. SPU ABPM;
  14032. ABPM: NOP 0;
  14033. TAD;
  14034. +AR1;
  14035. SET;
  14036. X(;
  14037. );
  14038. +I;
  14039. MOD;
  14040. +R;
  14041. ENT;
  14042. ATAN;
  14043. TRUNC;
  14044. TAD;
  14045. ZR Z 42;
  14046. >I;
  14047. L 0;
  14048. CLR;
  14049. SPBNB ABPN;
  14050. ABPN: NOP 0;
  14051. SET;
  14052. <>I;
  14053. SET;
  14054. +I;
  14055. CALL FC 42;
  14056. CALL FC 42;
  14057. CALL FC 42;
  14058. ITD;
  14059. >I;
  14060. DEC 0;
  14061. *D;
  14062. <=I;
  14063. L 0;
  14064. CLR;
  14065. SPN ABPO;
  14066. ABPO: NOP 0;
  14067. +R;
  14068. +AR1;
  14069. U M 0.4;
  14070. L 0;
  14071. CLR;
  14072. SPZ ABPP;
  14073. ABPP: NOP 0;
  14074. ON(;
  14075. );
  14076. CALL FC 42;
  14077. CALL FC 42;
  14078. CALL FC 42;
  14079. UD;
  14080. ITD;
  14081. *R;
  14082. TAN;
  14083. L 0;
  14084. CLR;
  14085. SPP ABPQ;
  14086. ABPQ: NOP 0;
  14087. -D;
  14088. <=I;
  14089. L 0;
  14090. SA T 42;
  14091. CC FC 43;
  14092. CALL FC 42;
  14093. CALL FC 42;
  14094. CALL FC 42;
  14095. TAW;
  14096. ==I;
  14097. ABS;
  14098. O M 0.4;
  14099. UD;
  14100. TAR2;
  14101. L 0;
  14102. CLR;
  14103. SPN ABPR;
  14104. ABPR: NOP 0;
  14105. >=D;
  14106. L 0;
  14107. CLR;
  14108. SPBI ABPS;
  14109. ABPS: NOP 0;
  14110. TAW;
  14111. RLDA;
  14112. TAR1;
  14113. >=D;
  14114. SET;
  14115. L 0;
  14116. CLR;
  14117. SPBN ABPT;
  14118. ABPT: NOP 0;
  14119. >=D;
  14120. O TRUE;
  14121. L 0;
  14122. CLR;
  14123. SPZ ABPU;
  14124. ABPU: NOP 0;
  14125. RRDA;
  14126. >=I;
  14127. L 0;
  14128. L 0;
  14129. CLR;
  14130. SPL ABPV;
  14131. ABPV: NOP 0;
  14132. DEC 0;
  14133. SRW;
  14134. NEGR;
  14135. RRD;
  14136. L 0;
  14137. CLR;
  14138. SPBNB ABPW;
  14139. ABPW: NOP 0;
  14140. MOD;
  14141. ON(;
  14142. );
  14143. L 0;
  14144. CLR;
  14145. SPU ABPX;
  14146. ABPX: NOP 0;
  14147. ==R;
  14148. NEGI;
  14149. TAD;
  14150. UN(;
  14151. );
  14152. L 0;
  14153. BTI;
  14154. SRD;
  14155. /R;
  14156. L 0;
  14157. CLR;
  14158. SPBIN ABPY;
  14159. ABPY: NOP 0;
  14160. <>R;
  14161. XN M 0.4;
  14162. TAK;
  14163. /R;
  14164. L 0;
  14165. CLR;
  14166. LOOP ABPZ;
  14167. ABPZ: NOP 0;
  14168. TAN;
  14169. SLW;
  14170. *I;
  14171. /R;
  14172. /R;
  14173. = M 0.4;
  14174. OW;
  14175. L 0;
  14176. CLR;
  14177. SPBN ABQA;
  14178. ABQA: NOP 0;
  14179. L 0;
  14180. CLR;
  14181. SPBN ABQB;
  14182. ABQB: NOP 0;
  14183. DTB;
  14184. TAK;
  14185. /R;
  14186. SAVE;
  14187. ==D;
  14188. L 0;
  14189. CLR;
  14190. SPM ABQC;
  14191. ABQC: NOP 0;
  14192. +AR2;
  14193. UN(;
  14194. );
  14195. L 0;
  14196. CLR;
  14197. SPO ABQD;
  14198. ABQD: NOP 0;
  14199. TAR2;
  14200. >R;
  14201. +AR1;
  14202. >D;
  14203. LAR2;
  14204. SLD;
  14205. L 0;
  14206. CLR;
  14207. SPBNB ABQE;
  14208. ABQE: NOP 0;
  14209. >=D;
  14210. NEGI;
  14211. NEGR;
  14212. DTR;
  14213. O M 0.4;
  14214. +D;
  14215. +AR1;
  14216. FP M 0.4;
  14217. >=D;
  14218. MOD;
  14219. ASIN;
  14220. >=R;
  14221. O(;
  14222. );
  14223. SAVE;
  14224. + 0;
  14225. SLW;
  14226. L 0;
  14227. BTI;
  14228. UN(;
  14229. );
  14230. <I;
  14231. L 0;
  14232. SE T 42;
  14233. L 0;
  14234. CLR;
  14235. LOOP ABQF;
  14236. ABQF: NOP 0;
  14237. CALL FC 42;
  14238. CALL FC 42;
  14239. CALL FC 42;
  14240. ATAN;
  14241. <=D;
  14242. SQRT;
  14243. FR Z 42;
  14244. O FALSE;
  14245. RND-;
  14246. ABS;
  14247. RLD;
  14248. L 0;
  14249. CLR;
  14250. SPO ABQG;
  14251. ABQG: NOP 0;
  14252. CALL FB 45, DB 45;
  14253. CALL FB 45, DB 45;
  14254. CALL FB 45, DB 45;
  14255. <=R;
  14256. MOD;
  14257. SET;
  14258. MCR(;
  14259. MCRA;
  14260. MCRD;
  14261. )MCR;
  14262. +R;
  14263. L 0;
  14264. L 0;
  14265. CLR;
  14266. SPL ABQH;
  14267. ABQH: NOP 0;
  14268. LAR2;
  14269. *D;
  14270. O M 0.4;
  14271. <I;
  14272. >I;
  14273. NOT;
  14274. >=I;
  14275. RLD;
  14276. L 0;
  14277. SV T 42;
  14278. TAD;
  14279. XN M 0.4;
  14280. NOP 0;
  14281. DEC 0;
  14282. DEC 0;
  14283. SRW;
  14284. L 0;
  14285. L 0;
  14286. CLR;
  14287. SPL ABQI;
  14288. ABQI: NOP 0;
  14289. SAVE;
  14290. CALL FC 42;
  14291. CALL FC 42;
  14292. CALL FC 42;
  14293. ITB;
  14294. -R;
  14295. SLD;
  14296. ATAN;
  14297. L 0;
  14298. CLR;
  14299. SPBIN ABQJ;
  14300. ABQJ: NOP 0;
  14301. DEC 0;
  14302. <=I;
  14303. FN M 0.4;
  14304. L 0;
  14305. CLR;
  14306. SPPZ ABQK;
  14307. ABQK: NOP 0;
  14308. X(;
  14309. );
  14310. UD;
  14311. L 0;
  14312. BTD;
  14313. SQRT;
  14314. XN M 0.4;
  14315. /R;
  14316. POP;
  14317. UD;
  14318. OW;
  14319. RLD;
  14320. X(;
  14321. );
  14322. L 0;
  14323. SS T 42;
  14324. BLD 0;
  14325. UD;
  14326. >=I;
  14327. NEGI;
  14328. <I;
  14329. ITB;
  14330. SET;
  14331. ITB;
  14332. UN M 0.4;
  14333. POP;
  14334. T MD 0;
  14335. L 0;
  14336. CLR;
  14337. SPN ABQL;
  14338. ABQL: NOP 0;
  14339. >=I;
  14340. X FALSE;
  14341. +AR1;
  14342. INVD;
  14343. >R;
  14344. SET;
  14345. ENT;
  14346. ZV Z 42;
  14347. O FALSE;
  14348. >=I;
  14349. L 0;
  14350. SI T 42;
  14351. L 0;
  14352. CLR;
  14353. SPBIN ABQM;
  14354. ABQM: NOP 0;
  14355. -D;
  14356. XOD;
  14357. >=R;
  14358. TAN;
  14359. U M 0.4;
  14360. L DW#16#4CF41EDD;
  14361. L 0;
  14362. SS T 42;
  14363. L 0;
  14364. CLR;
  14365. SPBI ABQN;
  14366. ABQN: NOP 0;
  14367. XOW;
  14368. LAR2;
  14369. >D;
  14370. +AR1;
  14371. RLD;
  14372. L 0;
  14373. CLR;
  14374. SPN ABQO;
  14375. ABQO: NOP 0;
  14376. L 0;
  14377. SA T 42;
  14378. /I;
  14379. UC FC 44;
  14380. UD;
  14381. L 0;
  14382. SV T 42;
  14383. NEGI;
  14384. FN M 0.4;
  14385. XN FALSE;
  14386. ON FALSE;
  14387. <D;
  14388. L 0;
  14389. CLR;
  14390. SPBIN ABQP;
  14391. ABQP: NOP 0;
  14392. NEGR;
  14393. <>D;
  14394. CC FC 43;
  14395. PUSH;
  14396. NEGR;
  14397. CALL FC 42;
  14398. CALL FC 42;
  14399. CALL FC 42;
  14400. + 0;
  14401. L 0;
  14402. CLR;
  14403. SPB ABQQ;
  14404. ABQQ: NOP 0;
  14405. <=I;
  14406. TAN;
  14407. R M 0.4;
  14408. TAK;
  14409. ZV Z 42;
  14410. ZR Z 42;
  14411. +R;
  14412. >R;
  14413. SQR;
  14414. TAR1;
  14415. NOT;
  14416. ZV Z 42;
  14417. TAN;
  14418. <D;
  14419. UD;
  14420. INVD;
  14421. = M 0.4;
  14422. TDB;
  14423. DTB;
  14424. /D;
  14425. LEAVE;
  14426. L 0;
  14427. SV T 42;
  14428. CC FC 43;
  14429. >R;
  14430. COS;
  14431. ==R;
  14432. L 0;
  14433. CLR;
  14434. SPN ABQR;
  14435. ABQR: NOP 0;
  14436. ATAN;
  14437. +R;
  14438. U FALSE;
  14439. R M 0.4;
  14440. L 0;
  14441. CLR;
  14442. SPA ABQS;
  14443. ABQS: NOP 0;
  14444. >=I;
  14445. XOW;
  14446. <>I;
  14447. TAK;
  14448. EXP;
  14449. X(;
  14450. );
  14451. L 0;
  14452. CLR;
  14453. SPMZ ABQT;
  14454. ABQT: NOP 0;
  14455. SET;
  14456. +D;
  14457. L 0;
  14458. CLR;
  14459. SPU ABQU;
  14460. ABQU: NOP 0;
  14461. L 0;
  14462. CLR;
  14463. SPA ABQV;
  14464. ABQV: NOP 0;
  14465. >=D;
  14466. TAD;
  14467. L 0;
  14468. L 0;
  14469. CLR;
  14470. SPL ABQW;
  14471. ABQW: NOP 0;
  14472. O M 0.4;
  14473. FN M 0.4;
  14474. MOD;
  14475. TAW;
  14476. MOD;
  14477. FP M 0.4;
  14478. >=I;
  14479. <=R;
  14480. UW;
  14481. L 0;
  14482. CLR;
  14483. SPS ABQX;
  14484. ABQX: NOP 0;
  14485. NOP 0;
  14486. RLD;
  14487. SAVE;
  14488. OW;
  14489. *I;
  14490. DEC 0;
  14491. L 0;
  14492. CLR;
  14493. SPBN ABQY;
  14494. ABQY: NOP 0;
  14495. PUSH;
  14496. L 0;
  14497. CLR;
  14498. SPA ABQZ;
  14499. ABQZ: NOP 0;
  14500. UC FC 44;
  14501. FN M 0.4;
  14502. U(;
  14503. );
  14504. >=R;
  14505. L 0;
  14506. CLR;
  14507. SPP ABRA;
  14508. ABRA: NOP 0;
  14509. *R;
  14510. ITB;
  14511. -I;
  14512. XOW;
  14513. PUSH;
  14514. CALL FB 45, DB 45;
  14515. CALL FB 45, DB 45;
  14516. CALL FB 45, DB 45;
  14517. SQRT;
  14518. SRW;
  14519. CALL FC 42;
  14520. CALL FC 42;
  14521. CALL FC 42;
  14522. <=I;
  14523. ZR Z 42;
  14524. O M 0.4;
  14525. L 0;
  14526. SE T 42;
  14527. ==R;
  14528. <=I;
  14529. <D;
  14530. MOD;
  14531. INC 0;
  14532. TDB;
  14533. UN(;
  14534. );
  14535. *D;
  14536. L DW#16#75318081;
  14537. LAR1;
  14538. /I;
  14539. SSI;
  14540. RRDA;
  14541. L 0;
  14542. CLR;
  14543. SPBB ABRB;
  14544. ABRB: NOP 0;
  14545. L 0;
  14546. L 0;
  14547. CLR;
  14548. SPL ABRC;
  14549. ABRC: NOP 0;
  14550. ASIN;
  14551. L 0;
  14552. SA T 42;
  14553. RND;
  14554. L 0;
  14555. CLR;
  14556. SPS ABRD;
  14557. ABRD: NOP 0;
  14558. SET;
  14559. L 0;
  14560. CLR;
  14561. SPS ABRE;
  14562. ABRE: NOP 0;
  14563. EXP;
  14564. L 0;
  14565. CLR;
  14566. SPN ABRF;
  14567. ABRF: NOP 0;
  14568. CLR;
  14569. S M 0.4;
  14570. R M 0.4;
  14571. RND-;
  14572. CLR;
  14573. <R;
  14574. +AR1;
  14575. O(;
  14576. );
  14577. NOT;
  14578. L 0;
  14579. CLR;
  14580. SPBB ABRG;
  14581. ABRG: NOP 0;
  14582. PUSH;
  14583. RRD;
  14584. O M 0.4;
  14585. TAN;
  14586. L 0;
  14587. SV T 42;
  14588. <>D;
  14589. SRW;
  14590. RLDA;
  14591. L 0;
  14592. SE T 42;
  14593. XOW;
  14594. >=I;
  14595. SQRT;
  14596. ON M 0.4;
  14597. ITD;
  14598. UN M 0.4;
  14599. TAN;
  14600. XOW;
  14601. -I;
  14602. FR Z 42;
  14603. OW;
  14604. UC FC 44;
  14605. X TRUE;
  14606. >=R;
  14607. UW;
  14608. TAD;
  14609. <=R;
  14610. R M 0.4;
  14611. -D;
  14612. <>D;
  14613. L 0;
  14614. SE T 42;
  14615. /I;
  14616. UN(;
  14617. );
  14618. TAN;
  14619. RRD;
  14620. +R;
  14621. >=R;
  14622. /D;
  14623. <>I;
  14624. L 0;
  14625. CLR;
  14626. LOOP ABRH;
  14627. ABRH: NOP 0;
  14628. L DW#16#DB992F51;
  14629. L 0;
  14630. CLR;
  14631. SPBNB ABRI;
  14632. ABRI: NOP 0;
  14633. L 0;
  14634. CLR;
  14635. SPBIN ABRJ;
  14636. ABRJ: NOP 0;
  14637. SLD;
  14638. L 0;
  14639. CLR;
  14640. SPBI ABRK;
  14641. ABRK: NOP 0;
  14642. AUF DB 42;
  14643. NEGD;
  14644. U M 0.4;
  14645. INC 0;
  14646. /R;
  14647. NEGR;
  14648. L 0;
  14649. CLR;
  14650. SPS ABRL;
  14651. ABRL: NOP 0;
  14652. L 0;
  14653. SE T 42;
  14654. ON TRUE;
  14655. SRD;
  14656. O(;
  14657. );
  14658. + 0;
  14659. UN M 0.4;
  14660. TAR2;
  14661. L 0;
  14662. CLR;
  14663. SPMZ ABRM;
  14664. ABRM: NOP 0;
  14665. L 0;
  14666. CLR;
  14667. SPBIN ABRN;
  14668. ABRN: NOP 0;
  14669. /I;
  14670. ==I;
  14671. UN M 0.4;
  14672. *I;
  14673. L 0;
  14674. BTD;
  14675. SQR;
  14676. /I;
  14677. O M 0.4;
  14678. FN M 0.4;
  14679. ACOS;
  14680. RLD;
  14681. DTR;
  14682. NOT;
  14683. OW;
  14684. L 0;
  14685. SE T 42;
  14686. ==R;
  14687. LN;
  14688. >=I;
  14689. SRD;
  14690. UN M 0.4;
  14691. ==R;
  14692. LC MW 0;
  14693. TAD;
  14694. SSD;
  14695. ABS;
  14696. /D;
  14697. L 0;
  14698. CLR;
  14699. SPBIN ABRO;
  14700. ABRO: NOP 0;
  14701. -D;
  14702. ASIN;
  14703. ITB;
  14704. UD;
  14705. TDB;
  14706. ==I;
  14707. LAR1;
  14708. LAR1;
  14709. >R;
  14710. >D;
  14711. /I;
  14712. ATAN;
  14713. UN M 0.4;
  14714. + 0;
  14715. DTR;
  14716. <>I;
  14717. ITD;
  14718. L 0;
  14719. CLR;
  14720. SPBN ABRP;
  14721. ABRP: NOP 0;
  14722. X FALSE;
  14723. ABS;
  14724. COS;
  14725. L 0;
  14726. CLR;
  14727. SPMZ ABRQ;
  14728. ABRQ: NOP 0;
  14729. O FALSE;
  14730. DTR;
  14731. SRW;
  14732. TDB;
  14733. <I;
  14734. COS;
  14735. RLD;
  14736. TAK;
  14737. RRD;
  14738. <=I;
  14739. L 0;
  14740. CLR;
  14741. SPPZ ABRR;
  14742. ABRR: NOP 0;
  14743. SQR;
  14744. RRDA;
  14745. *R;
  14746. ==D;
  14747. <>I;
  14748. ==I;
  14749. XN M 0.4;
  14750. <=I;
  14751. ==R;
  14752. -I;
  14753. RRDA;
  14754. ON M 0.4;
  14755. RND+;
  14756. UN(;
  14757. );
  14758. +I;
  14759. ASIN;
  14760. CALL FB 45, DB 45;
  14761. CALL FB 45, DB 45;
  14762. CALL FB 45, DB 45;
  14763. O M 0.4;
  14764. ATAN;
  14765. SRW;
  14766. L 0;
  14767. CLR;
  14768. SPBNB ABRS;
  14769. ABRS: NOP 0;
  14770. L 0;
  14771. CLR;
  14772. SPBN ABRT;
  14773. ABRT: NOP 0;
  14774. SRD;
  14775. NOT;
  14776. ASIN;
  14777. L DW#16#9E1BE56D;
  14778. L 0;
  14779. SV T 42;
  14780. L 0;
  14781. BTD;
  14782. L DW#16#B371D64D;
  14783. ASIN;
  14784. DTR;
  14785. SLW;
  14786. FP M 0.4;
  14787. RRDA;
  14788. L MW 50;
  14789. + 1;
  14790. T MW 50;
  14791. T AW 0;
  14792. ITB;
  14793. ITD;
  14794. CALL FC 42;
  14795. CALL FC 42;
  14796. CALL FC 42;
  14797. <=D;
  14798. RND;
  14799. <I;
  14800. ==D;
  14801. SQR;
  14802. ON TRUE;
  14803. DTB;
  14804. >=D;
  14805. ASIN;
  14806. X M 0.4;
  14807. INVI;
  14808. CLR;
  14809. UN(;
  14810. );
  14811. +R;
  14812. EXP;
  14813. UW;
  14814. L 0;
  14815. CLR;
  14816. SPS ABRU;
  14817. ABRU: NOP 0;
  14818. TRUNC;
  14819. TAW;
  14820. L 0;
  14821. CLR;
  14822. LOOP ABRV;
  14823. ABRV: NOP 0;
  14824. ASIN;
  14825. SRW;
  14826. ON(;
  14827. );
  14828. L 0;
  14829. SV T 42;
  14830. ASIN;
  14831. UN(;
  14832. );
  14833. L 0;
  14834. CLR;
  14835. SPO ABRW;
  14836. ABRW: NOP 0;
  14837. <>I;
  14838. TDB;
  14839. -D;
  14840. L 0;
  14841. CLR;
  14842. SPB ABRX;
  14843. ABRX: NOP 0;
  14844. *I;
  14845. COS;
  14846. L DW#16#0C2CA7FA;
  14847. X FALSE;
  14848. UN(;
  14849. );
  14850. L 0;
  14851. CLR;
  14852. SPM ABRY;
  14853. ABRY: NOP 0;
  14854. NEGD;
  14855. L 0;
  14856. CLR;
  14857. SPBB ABRZ;
  14858. ABRZ: NOP 0;
  14859. SSD;
  14860. L 0;
  14861. CLR;
  14862. SPB ABSA;
  14863. ABSA: NOP 0;
  14864. UC FC 44;
  14865. FN M 0.4;
  14866. ACOS;
  14867. L 0;
  14868. BTD;
  14869. LC MW 0;
  14870. RLD;
  14871. -D;
  14872. L 0;
  14873. CLR;
  14874. SPU ABSB;
  14875. ABSB: NOP 0;
  14876. L 0;
  14877. CLR;
  14878. SPO ABSC;
  14879. ABSC: NOP 0;
  14880. <>I;
  14881. SAVE;
  14882. ON M 0.4;
  14883. PUSH;
  14884. ==D;
  14885. L 0;
  14886. CLR;
  14887. SPMZ ABSD;
  14888. ABSD: NOP 0;
  14889. +D;
  14890. +D;
  14891. NOP 0;
  14892. OW;
  14893. CC FC 43;
  14894. /D;
  14895. RND+;
  14896. L 0;
  14897. L 0;
  14898. CLR;
  14899. SPL ABSE;
  14900. ABSE: NOP 0;
  14901. NEGI;
  14902. BLD 0;
  14903. -R;
  14904. SET;
  14905. ==I;
  14906. ==D;
  14907. CC FC 43;
  14908. <I;
  14909. X FALSE;
  14910. DTB;
  14911. T MD 0;
  14912. FN M 0.4;
  14913. R M 0.4;
  14914. XOD;
  14915. +I;
  14916. L 0;
  14917. CLR;
  14918. SPO ABSF;
  14919. ABSF: NOP 0;
  14920. SLW;
  14921. INVI;
  14922. XOW;
  14923. ==R;
  14924. XN FALSE;
  14925. DTB;
  14926. COS;
  14927. TAK;
  14928. LC MW 0;
  14929. ENT;
  14930. -I;
  14931. -D;
  14932. T MD 0;
  14933. <I;
  14934. ATAN;
  14935. XN(;
  14936. );
  14937. SLD;
  14938. COS;
  14939. UW;
  14940. RRDA;
  14941. XN M 0.4;
  14942. <R;
  14943. SET;
  14944. L 0;
  14945. L 0;
  14946. CLR;
  14947. SPL ABSG;
  14948. ABSG: NOP 0;
  14949. ==D;
  14950. L 0;
  14951. CLR;
  14952. SPBNB ABSH;
  14953. ABSH: NOP 0;
  14954. XN FALSE;
  14955. ITD;
  14956. ABS;
  14957. RRD;
  14958. XOW;
  14959. L 0;
  14960. SE T 42;
  14961. R M 0.4;
  14962. <R;
  14963. LAR1;
  14964. L 0;
  14965. SV T 42;
  14966. -R;
  14967. ENT;
  14968. *R;
  14969. SQR;
  14970. UC FC 44;
  14971. L 0;
  14972. CLR;
  14973. SPA ABSI;
  14974. ABSI: NOP 0;
  14975. INVD;
  14976. L 0;
  14977. BTD;
  14978. U M 0.4;
  14979. <>R;
  14980. DEC 0;
  14981. NEGR;
  14982. CALL FC 42;
  14983. CALL FC 42;
  14984. CALL FC 42;
  14985. O M 0.4;
  14986. L 0;
  14987. SE T 42;
  14988. TAR1;
  14989. RRDA;
  14990. UW;
  14991. ZR Z 42;
  14992. L 0;
  14993. CLR;
  14994. SPO ABSJ;
  14995. ABSJ: NOP 0;
  14996. END_ORGANIZATION_BLOCK
  14997. DATA_BLOCK DB 42
  14998. STRUCT
  14999. VAR : INT;
  15000. END_STRUCT
  15001. BEGIN
  15002. END_DATA_BLOCK
  15003. FUNCTION FC 42 : VOID
  15004. BEGIN
  15005. BE;
  15006. END_FUNCTION
  15007. FUNCTION FC 43 : VOID
  15008. BEGIN
  15009. BEA
  15010. END_FUNCTION
  15011. FUNCTION FC 44 : VOID
  15012. BEGIN
  15013. SET;
  15014. BEB;
  15015. END_FUNCTION
  15016. FUNCTION_BLOCK FB 45
  15017. BEGIN
  15018. END_FUNCTION_BLOCK
  15019. DATA_BLOCK DB 45
  15020. FB 45
  15021. BEGIN
  15022. END_DATA_BLOCK