sysrpl-data.49G.el 661 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710571157125713571457155716571757185719572057215722572357245725572657275728572957305731573257335734573557365737573857395740574157425743574457455746574757485749575057515752575357545755575657575758575957605761576257635764576557665767576857695770577157725773577457755776577757785779578057815782578357845785578657875788578957905791579257935794579557965797579857995800580158025803580458055806580758085809581058115812581358145815581658175818581958205821582258235824582558265827582858295830583158325833583458355836583758385839584058415842584358445845584658475848584958505851585258535854585558565857585858595860586158625863586458655866586758685869587058715872587358745875587658775878587958805881588258835884588558865887588858895890589158925893589458955896589758985899590059015902590359045905590659075908590959105911591259135914591559165917591859195920592159225923592459255926592759285929593059315932593359345935593659375938593959405941594259435944594559465947594859495950595159525953595459555956595759585959596059615962596359645965596659675968596959705971597259735974597559765977597859795980598159825983598459855986598759885989599059915992599359945995599659975998599960006001600260036004600560066007600860096010601160126013601460156016601760186019602060216022602360246025602660276028602960306031603260336034603560366037603860396040604160426043604460456046604760486049605060516052605360546055605660576058605960606061606260636064606560666067606860696070607160726073607460756076607760786079608060816082608360846085608660876088608960906091609260936094609560966097609860996100610161026103610461056106610761086109611061116112611361146115611661176118611961206121612261236124612561266127612861296130613161326133613461356136613761386139614061416142614361446145614661476148614961506151615261536154615561566157615861596160616161626163616461656166616761686169617061716172617361746175617661776178617961806181618261836184618561866187618861896190619161926193619461956196619761986199620062016202620362046205620662076208620962106211621262136214621562166217621862196220622162226223622462256226622762286229623062316232623362346235623662376238623962406241624262436244624562466247624862496250625162526253625462556256625762586259626062616262626362646265626662676268626962706271627262736274627562766277627862796280628162826283628462856286628762886289629062916292629362946295629662976298629963006301630263036304630563066307630863096310631163126313631463156316631763186319632063216322632363246325632663276328632963306331633263336334633563366337633863396340634163426343634463456346634763486349635063516352635363546355635663576358635963606361636263636364636563666367636863696370637163726373637463756376637763786379638063816382638363846385638663876388638963906391639263936394639563966397639863996400640164026403640464056406640764086409641064116412641364146415641664176418641964206421642264236424642564266427642864296430643164326433643464356436643764386439644064416442644364446445644664476448644964506451645264536454645564566457645864596460646164626463646464656466646764686469647064716472647364746475647664776478647964806481648264836484648564866487648864896490649164926493649464956496649764986499650065016502650365046505650665076508650965106511651265136514651565166517651865196520652165226523652465256526652765286529653065316532653365346535653665376538653965406541654265436544654565466547654865496550655165526553655465556556655765586559656065616562656365646565656665676568656965706571657265736574657565766577657865796580658165826583658465856586658765886589659065916592659365946595659665976598659966006601660266036604660566066607660866096610661166126613661466156616661766186619662066216622662366246625662666276628662966306631663266336634663566366637663866396640664166426643664466456646664766486649665066516652665366546655665666576658665966606661666266636664666566666667666866696670667166726673667466756676667766786679668066816682668366846685668666876688668966906691669266936694669566966697669866996700670167026703670467056706670767086709671067116712671367146715671667176718671967206721672267236724672567266727672867296730673167326733673467356736673767386739674067416742674367446745674667476748674967506751675267536754675567566757675867596760676167626763676467656766676767686769677067716772677367746775677667776778677967806781678267836784678567866787678867896790679167926793679467956796679767986799680068016802680368046805680668076808680968106811681268136814681568166817681868196820682168226823682468256826682768286829683068316832683368346835683668376838683968406841684268436844684568466847684868496850685168526853685468556856685768586859686068616862686368646865686668676868686968706871687268736874687568766877687868796880688168826883688468856886688768886889689068916892689368946895689668976898689969006901690269036904690569066907690869096910691169126913691469156916691769186919692069216922692369246925692669276928692969306931693269336934693569366937693869396940694169426943694469456946694769486949695069516952695369546955695669576958695969606961696269636964696569666967696869696970697169726973697469756976697769786979698069816982698369846985698669876988698969906991699269936994699569966997699869997000700170027003700470057006700770087009701070117012701370147015701670177018701970207021702270237024702570267027702870297030703170327033703470357036703770387039704070417042704370447045704670477048704970507051705270537054705570567057705870597060706170627063706470657066706770687069707070717072707370747075707670777078707970807081708270837084708570867087708870897090709170927093709470957096709770987099710071017102710371047105710671077108710971107111711271137114711571167117711871197120712171227123712471257126712771287129713071317132713371347135713671377138713971407141714271437144714571467147714871497150715171527153715471557156715771587159716071617162716371647165716671677168716971707171717271737174717571767177717871797180718171827183718471857186718771887189719071917192719371947195719671977198719972007201720272037204720572067207720872097210721172127213721472157216721772187219722072217222722372247225722672277228722972307231723272337234723572367237723872397240724172427243724472457246724772487249725072517252725372547255725672577258725972607261726272637264726572667267726872697270727172727273727472757276727772787279728072817282728372847285728672877288728972907291729272937294729572967297729872997300730173027303730473057306730773087309731073117312731373147315731673177318731973207321732273237324732573267327732873297330733173327333733473357336733773387339734073417342734373447345734673477348734973507351735273537354735573567357735873597360736173627363736473657366736773687369737073717372737373747375737673777378737973807381738273837384738573867387738873897390739173927393739473957396739773987399740074017402740374047405740674077408740974107411741274137414741574167417741874197420742174227423742474257426742774287429743074317432743374347435743674377438743974407441744274437444744574467447744874497450745174527453745474557456745774587459746074617462746374647465746674677468746974707471747274737474747574767477747874797480748174827483748474857486748774887489749074917492749374947495749674977498749975007501750275037504750575067507750875097510751175127513751475157516751775187519752075217522752375247525752675277528752975307531753275337534753575367537753875397540754175427543754475457546754775487549755075517552755375547555755675577558755975607561756275637564756575667567756875697570757175727573757475757576757775787579758075817582758375847585758675877588758975907591759275937594759575967597759875997600760176027603760476057606760776087609761076117612761376147615761676177618761976207621762276237624762576267627762876297630763176327633763476357636763776387639764076417642764376447645764676477648764976507651765276537654765576567657765876597660766176627663766476657666766776687669767076717672767376747675767676777678767976807681768276837684768576867687768876897690769176927693769476957696769776987699770077017702770377047705770677077708770977107711771277137714771577167717771877197720772177227723772477257726772777287729773077317732773377347735773677377738773977407741774277437744774577467747774877497750775177527753775477557756775777587759776077617762776377647765776677677768776977707771777277737774777577767777777877797780778177827783778477857786778777887789779077917792779377947795779677977798779978007801780278037804780578067807780878097810781178127813781478157816781778187819782078217822782378247825782678277828782978307831783278337834783578367837783878397840784178427843784478457846784778487849785078517852785378547855785678577858785978607861786278637864786578667867786878697870787178727873787478757876787778787879788078817882788378847885788678877888788978907891789278937894789578967897789878997900790179027903790479057906790779087909791079117912791379147915791679177918791979207921792279237924792579267927792879297930793179327933793479357936793779387939794079417942794379447945794679477948794979507951795279537954795579567957795879597960796179627963796479657966796779687969797079717972797379747975797679777978797979807981798279837984798579867987798879897990799179927993799479957996799779987999800080018002800380048005800680078008800980108011801280138014801580168017801880198020802180228023802480258026802780288029803080318032803380348035803680378038803980408041804280438044804580468047804880498050805180528053805480558056805780588059806080618062806380648065806680678068806980708071807280738074807580768077807880798080808180828083808480858086808780888089809080918092809380948095809680978098809981008101810281038104810581068107810881098110811181128113811481158116811781188119812081218122812381248125812681278128812981308131813281338134813581368137813881398140814181428143814481458146814781488149815081518152815381548155815681578158815981608161816281638164816581668167816881698170817181728173817481758176817781788179818081818182818381848185818681878188818981908191819281938194819581968197819881998200820182028203820482058206820782088209821082118212821382148215821682178218821982208221822282238224822582268227822882298230823182328233823482358236823782388239824082418242824382448245824682478248824982508251825282538254825582568257825882598260826182628263826482658266826782688269827082718272827382748275827682778278827982808281828282838284828582868287828882898290829182928293829482958296829782988299830083018302830383048305830683078308830983108311831283138314831583168317831883198320832183228323832483258326832783288329833083318332833383348335833683378338833983408341834283438344834583468347834883498350835183528353835483558356835783588359836083618362836383648365836683678368836983708371837283738374837583768377837883798380838183828383838483858386838783888389839083918392839383948395839683978398839984008401840284038404840584068407840884098410841184128413841484158416841784188419842084218422842384248425842684278428842984308431843284338434843584368437843884398440844184428443844484458446844784488449845084518452845384548455845684578458845984608461846284638464846584668467846884698470847184728473847484758476847784788479848084818482848384848485848684878488848984908491849284938494849584968497849884998500850185028503850485058506850785088509851085118512851385148515851685178518851985208521852285238524852585268527852885298530853185328533853485358536853785388539854085418542854385448545854685478548854985508551855285538554855585568557855885598560856185628563856485658566856785688569857085718572857385748575857685778578857985808581858285838584858585868587858885898590859185928593859485958596859785988599860086018602860386048605860686078608860986108611861286138614861586168617861886198620862186228623862486258626862786288629863086318632863386348635863686378638863986408641864286438644864586468647864886498650865186528653865486558656865786588659866086618662866386648665866686678668866986708671867286738674867586768677867886798680868186828683868486858686868786888689869086918692869386948695869686978698869987008701870287038704870587068707870887098710871187128713871487158716871787188719872087218722872387248725872687278728872987308731873287338734873587368737873887398740874187428743874487458746874787488749875087518752875387548755875687578758875987608761876287638764876587668767876887698770877187728773877487758776877787788779878087818782878387848785878687878788878987908791879287938794879587968797879887998800880188028803880488058806880788088809881088118812881388148815881688178818881988208821882288238824882588268827882888298830883188328833883488358836883788388839884088418842884388448845884688478848884988508851885288538854885588568857885888598860886188628863886488658866886788688869887088718872887388748875887688778878887988808881888288838884888588868887888888898890889188928893889488958896889788988899890089018902890389048905890689078908890989108911891289138914891589168917891889198920892189228923892489258926892789288929893089318932893389348935893689378938893989408941894289438944894589468947894889498950895189528953895489558956895789588959896089618962896389648965896689678968896989708971897289738974897589768977897889798980898189828983898489858986898789888989899089918992899389948995899689978998899990009001900290039004900590069007900890099010901190129013901490159016901790189019902090219022902390249025902690279028902990309031903290339034903590369037903890399040904190429043904490459046904790489049905090519052905390549055905690579058905990609061906290639064906590669067906890699070907190729073907490759076907790789079908090819082908390849085908690879088908990909091909290939094909590969097909890999100910191029103910491059106910791089109911091119112911391149115911691179118911991209121912291239124912591269127912891299130913191329133913491359136913791389139914091419142914391449145914691479148914991509151915291539154915591569157915891599160916191629163916491659166916791689169917091719172917391749175917691779178917991809181918291839184918591869187918891899190919191929193919491959196919791989199920092019202920392049205920692079208920992109211921292139214921592169217921892199220922192229223922492259226922792289229923092319232923392349235923692379238923992409241924292439244924592469247924892499250925192529253925492559256925792589259926092619262926392649265926692679268926992709271927292739274927592769277927892799280928192829283928492859286928792889289929092919292929392949295929692979298929993009301930293039304930593069307930893099310931193129313931493159316931793189319932093219322932393249325932693279328932993309331933293339334933593369337933893399340934193429343934493459346934793489349935093519352935393549355935693579358935993609361936293639364936593669367936893699370937193729373937493759376937793789379938093819382938393849385938693879388938993909391939293939394939593969397939893999400940194029403940494059406940794089409941094119412941394149415941694179418941994209421942294239424942594269427942894299430943194329433943494359436943794389439944094419442944394449445944694479448944994509451945294539454945594569457945894599460946194629463946494659466946794689469947094719472947394749475947694779478947994809481948294839484948594869487948894899490949194929493949494959496949794989499950095019502950395049505950695079508950995109511951295139514951595169517951895199520952195229523952495259526952795289529953095319532953395349535953695379538953995409541954295439544954595469547954895499550955195529553955495559556955795589559956095619562956395649565956695679568956995709571957295739574957595769577957895799580958195829583958495859586958795889589959095919592959395949595959695979598959996009601960296039604960596069607960896099610961196129613961496159616961796189619962096219622962396249625962696279628962996309631963296339634963596369637963896399640964196429643964496459646964796489649965096519652965396549655965696579658965996609661966296639664966596669667966896699670967196729673967496759676967796789679968096819682968396849685968696879688968996909691969296939694969596969697969896999700970197029703970497059706970797089709971097119712971397149715971697179718971997209721972297239724972597269727972897299730973197329733973497359736973797389739974097419742974397449745974697479748974997509751975297539754975597569757975897599760976197629763976497659766976797689769977097719772977397749775977697779778977997809781978297839784978597869787978897899790979197929793979497959796979797989799980098019802980398049805980698079808980998109811981298139814981598169817981898199820982198229823982498259826982798289829983098319832983398349835983698379838983998409841984298439844984598469847984898499850985198529853985498559856985798589859986098619862986398649865986698679868986998709871987298739874987598769877987898799880988198829883988498859886988798889889989098919892989398949895989698979898989999009901990299039904990599069907990899099910991199129913991499159916991799189919992099219922992399249925992699279928992999309931993299339934993599369937993899399940994199429943994499459946994799489949995099519952995399549955995699579958995999609961996299639964996599669967996899699970997199729973997499759976997799789979998099819982998399849985998699879988998999909991999299939994999599969997999899991000010001100021000310004100051000610007100081000910010100111001210013100141001510016100171001810019100201002110022100231002410025100261002710028100291003010031100321003310034100351003610037100381003910040100411004210043100441004510046100471004810049100501005110052100531005410055100561005710058100591006010061100621006310064100651006610067100681006910070100711007210073100741007510076100771007810079100801008110082100831008410085100861008710088100891009010091100921009310094100951009610097100981009910100101011010210103101041010510106101071010810109101101011110112101131011410115101161011710118101191012010121101221012310124101251012610127101281012910130101311013210133101341013510136101371013810139101401014110142101431014410145101461014710148101491015010151101521015310154101551015610157101581015910160101611016210163101641016510166101671016810169101701017110172101731017410175101761017710178101791018010181101821018310184101851018610187101881018910190101911019210193101941019510196101971019810199102001020110202102031020410205102061020710208102091021010211102121021310214102151021610217102181021910220102211022210223102241022510226102271022810229102301023110232102331023410235102361023710238102391024010241102421024310244102451024610247102481024910250102511025210253102541025510256102571025810259102601026110262102631026410265102661026710268102691027010271102721027310274102751027610277102781027910280102811028210283102841028510286102871028810289102901029110292102931029410295102961029710298102991030010301103021030310304103051030610307103081030910310103111031210313103141031510316103171031810319103201032110322103231032410325103261032710328103291033010331103321033310334103351033610337103381033910340103411034210343103441034510346103471034810349103501035110352103531035410355103561035710358103591036010361103621036310364103651036610367103681036910370103711037210373103741037510376103771037810379103801038110382103831038410385103861038710388103891039010391103921039310394103951039610397103981039910400104011040210403104041040510406104071040810409104101041110412104131041410415104161041710418104191042010421104221042310424104251042610427104281042910430104311043210433104341043510436104371043810439104401044110442104431044410445104461044710448104491045010451104521045310454104551045610457104581045910460104611046210463104641046510466104671046810469104701047110472104731047410475104761047710478104791048010481104821048310484104851048610487104881048910490104911049210493104941049510496104971049810499105001050110502105031050410505105061050710508105091051010511105121051310514105151051610517105181051910520105211052210523105241052510526105271052810529105301053110532105331053410535105361053710538105391054010541105421054310544105451054610547105481054910550105511055210553105541055510556105571055810559105601056110562105631056410565105661056710568105691057010571105721057310574105751057610577105781057910580105811058210583105841058510586105871058810589105901059110592105931059410595105961059710598105991060010601106021060310604106051060610607106081060910610106111061210613106141061510616106171061810619106201062110622106231062410625106261062710628106291063010631106321063310634106351063610637106381063910640106411064210643106441064510646106471064810649106501065110652106531065410655106561065710658106591066010661106621066310664106651066610667106681066910670106711067210673106741067510676106771067810679106801068110682106831068410685106861068710688106891069010691106921069310694106951069610697106981069910700107011070210703107041070510706107071070810709107101071110712107131071410715107161071710718107191072010721107221072310724107251072610727107281072910730107311073210733107341073510736107371073810739107401074110742107431074410745107461074710748107491075010751107521075310754107551075610757107581075910760107611076210763107641076510766107671076810769107701077110772107731077410775107761077710778107791078010781107821078310784107851078610787107881078910790107911079210793107941079510796107971079810799108001080110802108031080410805108061080710808108091081010811108121081310814108151081610817108181081910820108211082210823108241082510826108271082810829108301083110832108331083410835108361083710838108391084010841108421084310844108451084610847108481084910850108511085210853108541085510856108571085810859108601086110862108631086410865108661086710868108691087010871108721087310874108751087610877108781087910880108811088210883108841088510886108871088810889108901089110892108931089410895108961089710898108991090010901109021090310904109051090610907109081090910910109111091210913109141091510916109171091810919109201092110922109231092410925109261092710928109291093010931109321093310934109351093610937109381093910940109411094210943109441094510946109471094810949109501095110952109531095410955109561095710958109591096010961109621096310964109651096610967109681096910970109711097210973109741097510976109771097810979109801098110982109831098410985109861098710988109891099010991109921099310994109951099610997109981099911000110011100211003110041100511006110071100811009110101101111012110131101411015110161101711018110191102011021110221102311024110251102611027110281102911030110311103211033110341103511036110371103811039110401104111042110431104411045110461104711048110491105011051110521105311054110551105611057110581105911060110611106211063110641106511066110671106811069110701107111072110731107411075110761107711078110791108011081110821108311084110851108611087110881108911090110911109211093110941109511096110971109811099111001110111102111031110411105111061110711108111091111011111111121111311114111151111611117111181111911120111211112211123111241112511126111271112811129111301113111132111331113411135111361113711138111391114011141111421114311144111451114611147111481114911150111511115211153111541115511156111571115811159111601116111162111631116411165111661116711168111691117011171111721117311174111751117611177111781117911180111811118211183111841118511186111871118811189111901119111192111931119411195111961119711198111991120011201112021120311204112051120611207112081120911210112111121211213112141121511216112171121811219112201122111222112231122411225112261122711228112291123011231112321123311234112351123611237112381123911240112411124211243112441124511246112471124811249112501125111252112531125411255112561125711258112591126011261112621126311264112651126611267112681126911270112711127211273112741127511276112771127811279112801128111282112831128411285112861128711288112891129011291112921129311294112951129611297112981129911300113011130211303113041130511306113071130811309113101131111312113131131411315113161131711318113191132011321113221132311324113251132611327113281132911330113311133211333113341133511336113371133811339113401134111342113431134411345113461134711348113491135011351113521135311354113551135611357113581135911360113611136211363113641136511366113671136811369113701137111372113731137411375113761137711378113791138011381113821138311384113851138611387113881138911390113911139211393113941139511396113971139811399114001140111402114031140411405114061140711408114091141011411114121141311414114151141611417114181141911420114211142211423114241142511426114271142811429114301143111432114331143411435114361143711438114391144011441114421144311444114451144611447114481144911450114511145211453114541145511456114571145811459114601146111462114631146411465114661146711468114691147011471114721147311474114751147611477114781147911480114811148211483114841148511486114871148811489114901149111492114931149411495114961149711498114991150011501115021150311504115051150611507115081150911510115111151211513115141151511516115171151811519115201152111522115231152411525115261152711528115291153011531115321153311534115351153611537115381153911540115411154211543115441154511546115471154811549115501155111552115531155411555115561155711558115591156011561115621156311564115651156611567115681156911570115711157211573115741157511576115771157811579115801158111582115831158411585115861158711588115891159011591115921159311594115951159611597115981159911600116011160211603116041160511606116071160811609116101161111612116131161411615116161161711618116191162011621116221162311624116251162611627116281162911630116311163211633116341163511636116371163811639116401164111642116431164411645116461164711648116491165011651116521165311654116551165611657116581165911660116611166211663116641166511666116671166811669116701167111672116731167411675116761167711678116791168011681116821168311684116851168611687116881168911690116911169211693116941169511696116971169811699117001170111702117031170411705117061170711708117091171011711117121171311714117151171611717117181171911720117211172211723117241172511726117271172811729117301173111732117331173411735117361173711738117391174011741117421174311744117451174611747117481174911750117511175211753117541175511756117571175811759117601176111762117631176411765117661176711768117691177011771117721177311774117751177611777117781177911780117811178211783117841178511786117871178811789117901179111792117931179411795117961179711798117991180011801118021180311804118051180611807118081180911810118111181211813118141181511816118171181811819118201182111822118231182411825118261182711828118291183011831118321183311834118351183611837118381183911840118411184211843118441184511846118471184811849118501185111852118531185411855118561185711858118591186011861118621186311864118651186611867118681186911870118711187211873118741187511876118771187811879118801188111882118831188411885118861188711888118891189011891118921189311894118951189611897118981189911900119011190211903119041190511906119071190811909119101191111912119131191411915119161191711918119191192011921119221192311924119251192611927119281192911930119311193211933119341193511936119371193811939119401194111942119431194411945119461194711948119491195011951119521195311954119551195611957119581195911960119611196211963119641196511966119671196811969119701197111972119731197411975119761197711978119791198011981119821198311984119851198611987119881198911990119911199211993119941199511996119971199811999120001200112002120031200412005120061200712008120091201012011120121201312014120151201612017120181201912020120211202212023120241202512026120271202812029120301203112032120331203412035120361203712038120391204012041120421204312044120451204612047120481204912050120511205212053120541205512056120571205812059120601206112062120631206412065120661206712068120691207012071120721207312074120751207612077120781207912080120811208212083120841208512086120871208812089120901209112092120931209412095120961209712098120991210012101121021210312104121051210612107121081210912110121111211212113121141211512116121171211812119121201212112122121231212412125121261212712128121291213012131121321213312134121351213612137121381213912140121411214212143121441214512146121471214812149121501215112152121531215412155121561215712158121591216012161121621216312164121651216612167121681216912170121711217212173121741217512176121771217812179121801218112182121831218412185121861218712188121891219012191121921219312194121951219612197121981219912200122011220212203122041220512206122071220812209122101221112212122131221412215122161221712218122191222012221122221222312224122251222612227122281222912230122311223212233122341223512236122371223812239122401224112242122431224412245122461224712248122491225012251122521225312254122551225612257122581225912260122611226212263122641226512266122671226812269122701227112272122731227412275122761227712278122791228012281122821228312284122851228612287122881228912290122911229212293122941229512296122971229812299123001230112302123031230412305123061230712308123091231012311123121231312314123151231612317123181231912320123211232212323123241232512326123271232812329123301233112332123331233412335123361233712338123391234012341123421234312344123451234612347123481234912350123511235212353123541235512356123571235812359123601236112362123631236412365123661236712368123691237012371123721237312374123751237612377123781237912380123811238212383123841238512386123871238812389123901239112392123931239412395123961239712398123991240012401124021240312404124051240612407124081240912410124111241212413124141241512416124171241812419124201242112422124231242412425124261242712428124291243012431124321243312434124351243612437124381243912440124411244212443124441244512446124471244812449124501245112452124531245412455124561245712458124591246012461124621246312464124651246612467124681246912470124711247212473124741247512476124771247812479124801248112482124831248412485124861248712488124891249012491124921249312494124951249612497124981249912500125011250212503125041250512506125071250812509125101251112512125131251412515125161251712518125191252012521125221252312524125251252612527125281252912530125311253212533125341253512536125371253812539125401254112542125431254412545125461254712548125491255012551125521255312554125551255612557125581255912560125611256212563125641256512566125671256812569125701257112572125731257412575125761257712578125791258012581125821258312584125851258612587125881258912590125911259212593125941259512596125971259812599126001260112602126031260412605126061260712608126091261012611126121261312614126151261612617126181261912620126211262212623126241262512626126271262812629126301263112632126331263412635126361263712638126391264012641126421264312644126451264612647126481264912650126511265212653126541265512656126571265812659126601266112662126631266412665126661266712668126691267012671126721267312674126751267612677126781267912680126811268212683126841268512686126871268812689126901269112692126931269412695126961269712698126991270012701127021270312704127051270612707127081270912710127111271212713127141271512716127171271812719127201272112722127231272412725127261272712728127291273012731127321273312734127351273612737127381273912740127411274212743127441274512746127471274812749127501275112752127531275412755127561275712758127591276012761127621276312764127651276612767127681276912770127711277212773127741277512776127771277812779127801278112782127831278412785127861278712788127891279012791127921279312794127951279612797127981279912800128011280212803128041280512806128071280812809128101281112812128131281412815128161281712818128191282012821128221282312824128251282612827128281282912830128311283212833128341283512836128371283812839128401284112842128431284412845128461284712848128491285012851128521285312854128551285612857128581285912860128611286212863128641286512866128671286812869128701287112872128731287412875128761287712878128791288012881128821288312884128851288612887128881288912890128911289212893128941289512896128971289812899129001290112902129031290412905129061290712908129091291012911129121291312914129151291612917129181291912920129211292212923129241292512926129271292812929129301293112932129331293412935129361293712938129391294012941129421294312944129451294612947129481294912950129511295212953129541295512956129571295812959129601296112962129631296412965129661296712968129691297012971129721297312974129751297612977129781297912980129811298212983129841298512986129871298812989129901299112992129931299412995129961299712998129991300013001130021300313004130051300613007130081300913010130111301213013130141301513016130171301813019130201302113022130231302413025130261302713028130291303013031130321303313034130351303613037130381303913040130411304213043130441304513046130471304813049130501305113052130531305413055130561305713058130591306013061130621306313064130651306613067130681306913070130711307213073130741307513076130771307813079130801308113082130831308413085130861308713088130891309013091130921309313094130951309613097130981309913100131011310213103131041310513106131071310813109131101311113112131131311413115131161311713118131191312013121131221312313124131251312613127131281312913130131311313213133131341313513136131371313813139131401314113142131431314413145131461314713148131491315013151131521315313154131551315613157131581315913160131611316213163131641316513166131671316813169131701317113172131731317413175131761317713178131791318013181131821318313184131851318613187131881318913190131911319213193131941319513196131971319813199132001320113202132031320413205132061320713208132091321013211132121321313214132151321613217132181321913220132211322213223132241322513226132271322813229132301323113232132331323413235132361323713238132391324013241132421324313244132451324613247132481324913250132511325213253132541325513256132571325813259132601326113262132631326413265132661326713268132691327013271132721327313274132751327613277132781327913280132811328213283132841328513286132871328813289132901329113292132931329413295132961329713298132991330013301133021330313304133051330613307133081330913310133111331213313133141331513316133171331813319133201332113322133231332413325133261332713328133291333013331133321333313334133351333613337133381333913340133411334213343133441334513346133471334813349133501335113352133531335413355133561335713358133591336013361133621336313364133651336613367133681336913370133711337213373133741337513376133771337813379133801338113382133831338413385133861338713388133891339013391133921339313394133951339613397133981339913400134011340213403134041340513406134071340813409134101341113412134131341413415134161341713418134191342013421134221342313424134251342613427134281342913430134311343213433134341343513436134371343813439134401344113442134431344413445134461344713448134491345013451134521345313454134551345613457134581345913460134611346213463134641346513466134671346813469134701347113472134731347413475134761347713478134791348013481134821348313484134851348613487134881348913490134911349213493134941349513496134971349813499135001350113502135031350413505135061350713508135091351013511135121351313514135151351613517135181351913520135211352213523135241352513526135271352813529135301353113532135331353413535135361353713538135391354013541135421354313544135451354613547135481354913550135511355213553135541355513556135571355813559135601356113562135631356413565135661356713568135691357013571135721357313574135751357613577135781357913580135811358213583135841358513586135871358813589135901359113592135931359413595135961359713598135991360013601136021360313604136051360613607136081360913610136111361213613136141361513616136171361813619136201362113622136231362413625136261362713628136291363013631136321363313634136351363613637136381363913640136411364213643136441364513646136471364813649136501365113652136531365413655136561365713658136591366013661136621366313664136651366613667136681366913670136711367213673136741367513676136771367813679136801368113682136831368413685136861368713688136891369013691136921369313694136951369613697136981369913700137011370213703137041370513706137071370813709137101371113712137131371413715137161371713718137191372013721137221372313724137251372613727137281372913730137311373213733137341373513736137371373813739137401374113742137431374413745137461374713748137491375013751137521375313754137551375613757137581375913760137611376213763137641376513766137671376813769137701377113772137731377413775137761377713778137791378013781137821378313784137851378613787137881378913790137911379213793137941379513796137971379813799138001380113802138031380413805138061380713808138091381013811138121381313814138151381613817138181381913820138211382213823138241382513826138271382813829138301383113832138331383413835138361383713838138391384013841138421384313844138451384613847138481384913850138511385213853138541385513856138571385813859138601386113862138631386413865138661386713868138691387013871138721387313874138751387613877138781387913880138811388213883138841388513886138871388813889138901389113892138931389413895138961389713898138991390013901139021390313904139051390613907139081390913910139111391213913139141391513916139171391813919139201392113922139231392413925139261392713928139291393013931139321393313934139351393613937139381393913940139411394213943139441394513946139471394813949139501395113952139531395413955139561395713958139591396013961139621396313964139651396613967139681396913970139711397213973139741397513976139771397813979139801398113982139831398413985139861398713988139891399013991139921399313994139951399613997139981399914000140011400214003140041400514006140071400814009140101401114012140131401414015140161401714018140191402014021140221402314024140251402614027140281402914030140311403214033140341403514036140371403814039140401404114042140431404414045140461404714048140491405014051140521405314054140551405614057140581405914060140611406214063140641406514066140671406814069140701407114072140731407414075140761407714078140791408014081140821408314084140851408614087140881408914090140911409214093140941409514096140971409814099141001410114102141031410414105141061410714108141091411014111141121411314114141151411614117141181411914120141211412214123141241412514126141271412814129141301413114132141331413414135141361413714138141391414014141141421414314144141451414614147141481414914150141511415214153141541415514156141571415814159141601416114162141631416414165141661416714168141691417014171141721417314174141751417614177141781417914180141811418214183141841418514186141871418814189141901419114192141931419414195141961419714198141991420014201142021420314204142051420614207142081420914210142111421214213142141421514216142171421814219142201422114222142231422414225142261422714228142291423014231142321423314234142351423614237142381423914240142411424214243142441424514246142471424814249142501425114252142531425414255142561425714258142591426014261142621426314264142651426614267142681426914270142711427214273142741427514276142771427814279142801428114282142831428414285142861428714288142891429014291142921429314294142951429614297142981429914300143011430214303143041430514306143071430814309143101431114312143131431414315143161431714318143191432014321143221432314324143251432614327143281432914330143311433214333143341433514336143371433814339143401434114342143431434414345143461434714348143491435014351143521435314354143551435614357143581435914360143611436214363143641436514366143671436814369143701437114372143731437414375143761437714378143791438014381143821438314384143851438614387143881438914390143911439214393143941439514396143971439814399144001440114402144031440414405144061440714408144091441014411144121441314414144151441614417144181441914420144211442214423144241442514426144271442814429144301443114432144331443414435144361443714438144391444014441144421444314444144451444614447144481444914450144511445214453144541445514456144571445814459144601446114462144631446414465144661446714468144691447014471144721447314474144751447614477144781447914480144811448214483144841448514486144871448814489144901449114492144931449414495144961449714498144991450014501145021450314504145051450614507145081450914510145111451214513145141451514516145171451814519145201452114522145231452414525145261452714528145291453014531145321453314534145351453614537145381453914540145411454214543145441454514546145471454814549145501455114552145531455414555145561455714558145591456014561145621456314564145651456614567145681456914570145711457214573145741457514576145771457814579145801458114582145831458414585145861458714588145891459014591145921459314594145951459614597145981459914600146011460214603146041460514606146071460814609146101461114612146131461414615146161461714618146191462014621146221462314624146251462614627146281462914630146311463214633146341463514636146371463814639146401464114642146431464414645146461464714648146491465014651146521465314654146551465614657146581465914660146611466214663146641466514666146671466814669146701467114672146731467414675146761467714678146791468014681146821468314684146851468614687146881468914690146911469214693146941469514696146971469814699147001470114702147031470414705147061470714708147091471014711147121471314714147151471614717147181471914720147211472214723147241472514726147271472814729147301473114732147331473414735147361473714738147391474014741147421474314744147451474614747147481474914750147511475214753147541475514756147571475814759147601476114762147631476414765147661476714768147691477014771147721477314774147751477614777147781477914780147811478214783147841478514786147871478814789147901479114792147931479414795147961479714798147991480014801148021480314804148051480614807148081480914810148111481214813148141481514816148171481814819148201482114822148231482414825148261482714828148291483014831148321483314834148351483614837148381483914840148411484214843148441484514846148471484814849148501485114852148531485414855148561485714858148591486014861148621486314864148651486614867148681486914870148711487214873148741487514876148771487814879148801488114882148831488414885148861488714888148891489014891148921489314894148951489614897148981489914900149011490214903149041490514906149071490814909149101491114912149131491414915149161491714918149191492014921149221492314924149251492614927149281492914930149311493214933149341493514936149371493814939149401494114942149431494414945149461494714948149491495014951149521495314954149551495614957149581495914960149611496214963149641496514966149671496814969149701497114972149731497414975149761497714978149791498014981149821498314984149851498614987149881498914990149911499214993149941499514996149971499814999150001500115002150031500415005150061500715008150091501015011150121501315014150151501615017150181501915020150211502215023150241502515026150271502815029150301503115032150331503415035150361503715038150391504015041150421504315044150451504615047150481504915050150511505215053150541505515056150571505815059150601506115062150631506415065150661506715068150691507015071150721507315074150751507615077150781507915080150811508215083150841508515086150871508815089150901509115092150931509415095150961509715098150991510015101151021510315104151051510615107151081510915110151111511215113151141511515116151171511815119151201512115122151231512415125151261512715128151291513015131151321513315134151351513615137151381513915140151411514215143151441514515146151471514815149151501515115152151531515415155151561515715158151591516015161151621516315164151651516615167151681516915170151711517215173151741517515176151771517815179151801518115182151831518415185151861518715188151891519015191151921519315194151951519615197151981519915200152011520215203152041520515206152071520815209152101521115212152131521415215152161521715218152191522015221152221522315224152251522615227152281522915230152311523215233152341523515236152371523815239152401524115242152431524415245152461524715248152491525015251152521525315254152551525615257152581525915260152611526215263152641526515266152671526815269152701527115272152731527415275152761527715278152791528015281152821528315284152851528615287152881528915290152911529215293152941529515296152971529815299153001530115302153031530415305153061530715308153091531015311153121531315314153151531615317153181531915320153211532215323153241532515326153271532815329153301533115332153331533415335153361533715338153391534015341153421534315344153451534615347153481534915350153511535215353153541535515356153571535815359153601536115362153631536415365153661536715368153691537015371153721537315374153751537615377153781537915380153811538215383153841538515386153871538815389153901539115392153931539415395153961539715398153991540015401154021540315404154051540615407154081540915410154111541215413154141541515416154171541815419154201542115422154231542415425154261542715428154291543015431154321543315434154351543615437154381543915440154411544215443154441544515446154471544815449154501545115452154531545415455154561545715458154591546015461154621546315464154651546615467154681546915470154711547215473154741547515476154771547815479154801548115482154831548415485154861548715488154891549015491154921549315494154951549615497154981549915500155011550215503155041550515506155071550815509155101551115512155131551415515155161551715518155191552015521155221552315524155251552615527155281552915530155311553215533155341553515536155371553815539155401554115542155431554415545155461554715548155491555015551155521555315554155551555615557155581555915560155611556215563155641556515566155671556815569155701557115572155731557415575155761557715578155791558015581155821558315584155851558615587155881558915590155911559215593155941559515596155971559815599156001560115602156031560415605156061560715608156091561015611156121561315614156151561615617156181561915620156211562215623156241562515626156271562815629156301563115632156331563415635156361563715638156391564015641156421564315644156451564615647156481564915650156511565215653156541565515656156571565815659156601566115662156631566415665156661566715668156691567015671156721567315674156751567615677156781567915680156811568215683156841568515686156871568815689156901569115692156931569415695156961569715698156991570015701157021570315704157051570615707157081570915710157111571215713157141571515716157171571815719157201572115722157231572415725157261572715728157291573015731157321573315734157351573615737157381573915740157411574215743157441574515746157471574815749157501575115752157531575415755157561575715758157591576015761157621576315764157651576615767157681576915770157711577215773157741577515776157771577815779157801578115782157831578415785157861578715788157891579015791157921579315794157951579615797157981579915800158011580215803158041580515806158071580815809158101581115812158131581415815158161581715818158191582015821158221582315824158251582615827158281582915830158311583215833158341583515836158371583815839158401584115842158431584415845158461584715848158491585015851158521585315854158551585615857158581585915860158611586215863158641586515866158671586815869158701587115872158731587415875158761587715878158791588015881158821588315884158851588615887158881588915890158911589215893158941589515896158971589815899159001590115902159031590415905159061590715908159091591015911159121591315914159151591615917159181591915920159211592215923159241592515926159271592815929159301593115932159331593415935159361593715938159391594015941159421594315944159451594615947159481594915950159511595215953159541595515956159571595815959159601596115962159631596415965159661596715968159691597015971159721597315974159751597615977159781597915980159811598215983159841598515986159871598815989159901599115992159931599415995159961599715998159991600016001160021600316004160051600616007160081600916010160111601216013160141601516016160171601816019160201602116022160231602416025160261602716028160291603016031160321603316034160351603616037160381603916040160411604216043160441604516046160471604816049160501605116052160531605416055160561605716058160591606016061160621606316064160651606616067160681606916070160711607216073160741607516076160771607816079160801608116082160831608416085160861608716088160891609016091160921609316094160951609616097160981609916100161011610216103161041610516106161071610816109161101611116112161131611416115161161611716118161191612016121161221612316124161251612616127161281612916130161311613216133161341613516136161371613816139161401614116142161431614416145161461614716148161491615016151161521615316154161551615616157161581615916160161611616216163161641616516166161671616816169161701617116172161731617416175161761617716178161791618016181161821618316184161851618616187161881618916190161911619216193161941619516196161971619816199162001620116202162031620416205162061620716208162091621016211162121621316214162151621616217162181621916220162211622216223162241622516226162271622816229162301623116232162331623416235162361623716238162391624016241162421624316244162451624616247162481624916250162511625216253162541625516256162571625816259162601626116262162631626416265162661626716268162691627016271162721627316274162751627616277162781627916280162811628216283162841628516286162871628816289162901629116292162931629416295162961629716298162991630016301163021630316304163051630616307163081630916310163111631216313163141631516316163171631816319163201632116322163231632416325163261632716328163291633016331163321633316334163351633616337163381633916340163411634216343163441634516346163471634816349163501635116352163531635416355163561635716358163591636016361163621636316364163651636616367163681636916370163711637216373163741637516376163771637816379163801638116382163831638416385163861638716388163891639016391163921639316394163951639616397163981639916400164011640216403164041640516406164071640816409164101641116412164131641416415164161641716418164191642016421164221642316424164251642616427164281642916430164311643216433164341643516436164371643816439164401644116442164431644416445164461644716448164491645016451164521645316454164551645616457164581645916460164611646216463164641646516466164671646816469164701647116472164731647416475164761647716478164791648016481164821648316484164851648616487164881648916490164911649216493164941649516496164971649816499165001650116502165031650416505165061650716508165091651016511165121651316514165151651616517165181651916520165211652216523165241652516526165271652816529165301653116532165331653416535165361653716538165391654016541165421654316544165451654616547165481654916550165511655216553165541655516556165571655816559165601656116562165631656416565165661656716568165691657016571165721657316574165751657616577165781657916580165811658216583165841658516586165871658816589165901659116592165931659416595165961659716598165991660016601166021660316604166051660616607166081660916610166111661216613166141661516616166171661816619166201662116622166231662416625166261662716628166291663016631166321663316634166351663616637166381663916640166411664216643166441664516646166471664816649166501665116652166531665416655166561665716658166591666016661166621666316664166651666616667166681666916670166711667216673166741667516676166771667816679166801668116682166831668416685166861668716688166891669016691166921669316694166951669616697166981669916700167011670216703167041670516706167071670816709167101671116712167131671416715167161671716718167191672016721167221672316724167251672616727167281672916730167311673216733167341673516736167371673816739167401674116742167431674416745167461674716748167491675016751167521675316754167551675616757167581675916760167611676216763167641676516766167671676816769167701677116772167731677416775167761677716778167791678016781167821678316784167851678616787167881678916790167911679216793167941679516796167971679816799168001680116802168031680416805168061680716808168091681016811168121681316814168151681616817168181681916820168211682216823168241682516826168271682816829168301683116832168331683416835168361683716838168391684016841168421684316844168451684616847168481684916850168511685216853168541685516856168571685816859168601686116862168631686416865168661686716868168691687016871168721687316874168751687616877168781687916880168811688216883168841688516886168871688816889168901689116892168931689416895168961689716898168991690016901169021690316904169051690616907169081690916910169111691216913169141691516916169171691816919169201692116922169231692416925169261692716928169291693016931169321693316934169351693616937169381693916940169411694216943169441694516946169471694816949169501695116952169531695416955169561695716958169591696016961169621696316964169651696616967169681696916970169711697216973169741697516976169771697816979169801698116982169831698416985169861698716988169891699016991169921699316994169951699616997169981699917000170011700217003170041700517006170071700817009170101701117012170131701417015170161701717018170191702017021170221702317024170251702617027170281702917030170311703217033170341703517036170371703817039170401704117042170431704417045170461704717048170491705017051170521705317054170551705617057170581705917060170611706217063170641706517066170671706817069170701707117072170731707417075170761707717078170791708017081170821708317084170851708617087170881708917090170911709217093170941709517096170971709817099171001710117102171031710417105171061710717108171091711017111171121711317114171151711617117171181711917120171211712217123171241712517126171271712817129171301713117132171331713417135171361713717138171391714017141171421714317144171451714617147171481714917150171511715217153171541715517156171571715817159171601716117162171631716417165171661716717168171691717017171171721717317174171751717617177171781717917180171811718217183171841718517186171871718817189171901719117192171931719417195171961719717198171991720017201172021720317204172051720617207172081720917210172111721217213172141721517216172171721817219172201722117222172231722417225172261722717228172291723017231172321723317234172351723617237172381723917240172411724217243172441724517246172471724817249172501725117252172531725417255172561725717258172591726017261172621726317264172651726617267172681726917270172711727217273172741727517276172771727817279172801728117282172831728417285172861728717288172891729017291172921729317294172951729617297172981729917300173011730217303173041730517306173071730817309173101731117312173131731417315173161731717318173191732017321173221732317324173251732617327173281732917330173311733217333173341733517336173371733817339173401734117342173431734417345173461734717348173491735017351173521735317354173551735617357173581735917360173611736217363173641736517366173671736817369173701737117372173731737417375173761737717378173791738017381173821738317384173851738617387173881738917390173911739217393173941739517396173971739817399174001740117402174031740417405174061740717408174091741017411174121741317414174151741617417174181741917420174211742217423174241742517426174271742817429174301743117432174331743417435174361743717438174391744017441174421744317444174451744617447174481744917450174511745217453174541745517456174571745817459174601746117462174631746417465174661746717468174691747017471174721747317474174751747617477174781747917480174811748217483174841748517486174871748817489174901749117492174931749417495174961749717498174991750017501175021750317504175051750617507175081750917510175111751217513175141751517516175171751817519175201752117522175231752417525175261752717528175291753017531175321753317534175351753617537175381753917540175411754217543175441754517546175471754817549175501755117552175531755417555175561755717558175591756017561175621756317564175651756617567175681756917570175711757217573175741757517576175771757817579175801758117582175831758417585175861758717588175891759017591175921759317594175951759617597175981759917600176011760217603176041760517606176071760817609176101761117612176131761417615176161761717618176191762017621176221762317624176251762617627176281762917630176311763217633176341763517636176371763817639176401764117642176431764417645176461764717648176491765017651176521765317654176551765617657176581765917660176611766217663176641766517666176671766817669176701767117672176731767417675176761767717678176791768017681176821768317684176851768617687176881768917690176911769217693176941769517696176971769817699177001770117702177031770417705177061770717708177091771017711177121771317714177151771617717177181771917720177211772217723177241772517726177271772817729177301773117732177331773417735177361773717738177391774017741177421774317744177451774617747177481774917750177511775217753177541775517756177571775817759177601776117762177631776417765177661776717768177691777017771177721777317774177751777617777177781777917780177811778217783177841778517786177871778817789177901779117792177931779417795177961779717798177991780017801178021780317804178051780617807178081780917810178111781217813178141781517816178171781817819178201782117822178231782417825178261782717828178291783017831178321783317834178351783617837178381783917840178411784217843178441784517846178471784817849178501785117852178531785417855178561785717858178591786017861178621786317864178651786617867178681786917870178711787217873178741787517876178771787817879178801788117882178831788417885178861788717888178891789017891178921789317894178951789617897178981789917900179011790217903179041790517906179071790817909179101791117912179131791417915179161791717918179191792017921179221792317924179251792617927179281792917930179311793217933179341793517936179371793817939179401794117942179431794417945179461794717948179491795017951179521795317954179551795617957179581795917960179611796217963179641796517966179671796817969179701797117972179731797417975179761797717978179791798017981179821798317984179851798617987179881798917990179911799217993179941799517996179971799817999180001800118002180031800418005180061800718008180091801018011180121801318014180151801618017180181801918020180211802218023180241802518026180271802818029180301803118032180331803418035180361803718038180391804018041180421804318044180451804618047180481804918050180511805218053180541805518056180571805818059180601806118062180631806418065180661806718068180691807018071180721807318074180751807618077180781807918080180811808218083180841808518086180871808818089180901809118092180931809418095180961809718098180991810018101181021810318104181051810618107181081810918110181111811218113181141811518116181171811818119181201812118122181231812418125181261812718128181291813018131181321813318134181351813618137181381813918140181411814218143181441814518146181471814818149181501815118152181531815418155181561815718158181591816018161181621816318164181651816618167181681816918170181711817218173181741817518176181771817818179181801818118182181831818418185181861818718188181891819018191181921819318194181951819618197181981819918200182011820218203182041820518206182071820818209182101821118212182131821418215182161821718218182191822018221182221822318224182251822618227182281822918230182311823218233182341823518236182371823818239182401824118242182431824418245182461824718248182491825018251182521825318254182551825618257182581825918260182611826218263182641826518266182671826818269182701827118272182731827418275182761827718278182791828018281182821828318284182851828618287182881828918290182911829218293182941829518296182971829818299183001830118302183031830418305183061830718308183091831018311183121831318314183151831618317183181831918320183211832218323183241832518326183271832818329183301833118332183331833418335183361833718338183391834018341183421834318344183451834618347183481834918350183511835218353183541835518356183571835818359183601836118362183631836418365183661836718368183691837018371183721837318374183751837618377183781837918380183811838218383183841838518386183871838818389183901839118392183931839418395183961839718398183991840018401184021840318404184051840618407184081840918410184111841218413184141841518416184171841818419184201842118422184231842418425184261842718428184291843018431184321843318434184351843618437184381843918440184411844218443184441844518446184471844818449184501845118452184531845418455184561845718458184591846018461184621846318464184651846618467184681846918470184711847218473184741847518476184771847818479184801848118482184831848418485184861848718488184891849018491184921849318494184951849618497184981849918500185011850218503185041850518506185071850818509185101851118512185131851418515185161851718518185191852018521185221852318524185251852618527185281852918530185311853218533185341853518536185371853818539185401854118542185431854418545185461854718548185491855018551185521855318554185551855618557185581855918560185611856218563185641856518566185671856818569185701857118572185731857418575185761857718578185791858018581185821858318584185851858618587185881858918590185911859218593185941859518596185971859818599186001860118602186031860418605186061860718608186091861018611186121861318614186151861618617186181861918620186211862218623186241862518626186271862818629186301863118632186331863418635186361863718638186391864018641186421864318644186451864618647186481864918650186511865218653186541865518656186571865818659186601866118662186631866418665186661866718668186691867018671186721867318674186751867618677186781867918680186811868218683186841868518686186871868818689186901869118692186931869418695186961869718698186991870018701187021870318704187051870618707187081870918710187111871218713187141871518716187171871818719187201872118722187231872418725187261872718728187291873018731187321873318734187351873618737187381873918740187411874218743187441874518746187471874818749187501875118752187531875418755187561875718758187591876018761187621876318764187651876618767187681876918770187711877218773187741877518776187771877818779187801878118782187831878418785187861878718788187891879018791187921879318794187951879618797187981879918800188011880218803188041880518806188071880818809188101881118812188131881418815188161881718818188191882018821188221882318824188251882618827188281882918830188311883218833188341883518836188371883818839188401884118842188431884418845188461884718848188491885018851188521885318854188551885618857188581885918860188611886218863188641886518866188671886818869188701887118872188731887418875188761887718878188791888018881188821888318884188851888618887188881888918890188911889218893188941889518896188971889818899189001890118902189031890418905189061890718908189091891018911189121891318914189151891618917189181891918920189211892218923189241892518926189271892818929189301893118932189331893418935189361893718938189391894018941189421894318944189451894618947189481894918950189511895218953189541895518956189571895818959189601896118962189631896418965189661896718968189691897018971189721897318974189751897618977189781897918980189811898218983189841898518986189871898818989189901899118992189931899418995189961899718998189991900019001190021900319004190051900619007190081900919010190111901219013190141901519016190171901819019190201902119022190231902419025190261902719028190291903019031190321903319034190351903619037190381903919040190411904219043190441904519046190471904819049190501905119052190531905419055190561905719058190591906019061190621906319064190651906619067190681906919070190711907219073190741907519076190771907819079190801908119082190831908419085190861908719088190891909019091190921909319094190951909619097190981909919100191011910219103191041910519106191071910819109191101911119112191131911419115191161911719118191191912019121191221912319124191251912619127191281912919130191311913219133191341913519136191371913819139191401914119142191431914419145191461914719148191491915019151191521915319154191551915619157191581915919160191611916219163191641916519166191671916819169191701917119172191731917419175191761917719178191791918019181191821918319184191851918619187191881918919190191911919219193191941919519196191971919819199192001920119202192031920419205192061920719208192091921019211192121921319214192151921619217192181921919220192211922219223192241922519226192271922819229192301923119232192331923419235192361923719238192391924019241192421924319244192451924619247192481924919250192511925219253192541925519256192571925819259192601926119262192631926419265192661926719268192691927019271192721927319274192751927619277192781927919280192811928219283192841928519286192871928819289192901929119292192931929419295192961929719298192991930019301193021930319304193051930619307193081930919310193111931219313193141931519316193171931819319193201932119322193231932419325193261932719328193291933019331193321933319334193351933619337193381933919340193411934219343193441934519346193471934819349193501935119352193531935419355193561935719358193591936019361193621936319364193651936619367193681936919370193711937219373193741937519376193771937819379193801938119382193831938419385193861938719388193891939019391193921939319394193951939619397193981939919400194011940219403194041940519406194071940819409194101941119412194131941419415194161941719418194191942019421194221942319424194251942619427194281942919430194311943219433194341943519436194371943819439194401944119442194431944419445194461944719448194491945019451194521945319454194551945619457194581945919460194611946219463194641946519466194671946819469194701947119472194731947419475194761947719478194791948019481194821948319484194851948619487194881948919490194911949219493194941949519496194971949819499195001950119502195031950419505195061950719508195091951019511195121951319514195151951619517195181951919520195211952219523195241952519526195271952819529195301953119532195331953419535195361953719538195391954019541195421954319544195451954619547195481954919550195511955219553195541955519556195571955819559195601956119562195631956419565195661956719568195691957019571195721957319574195751957619577195781957919580195811958219583195841958519586195871958819589195901959119592195931959419595195961959719598195991960019601196021960319604196051960619607196081960919610196111961219613196141961519616196171961819619196201962119622196231962419625196261962719628196291963019631196321963319634196351963619637196381963919640196411964219643196441964519646196471964819649196501965119652196531965419655196561965719658196591966019661196621966319664196651966619667196681966919670196711967219673196741967519676196771967819679196801968119682196831968419685196861968719688196891969019691196921969319694196951969619697196981969919700197011970219703197041970519706197071970819709
  1. #s(hash-table size 8311 test eql rehash-size 1.5 rehash-threshold 0.8 data ("any" ("0d 0h
  2. " "" "33107" :NOSDIAG) "ZERO" ("0d 0h
  3. " "" "33107" :NOSDIAG) "BINT0" ("0d 0h
  4. " "" "33107" :NOSDIAG) "MEMERR" ("1d 1h
  5. " "" "33111" :NOSDIAG) "real" ("1d 1h
  6. " "" "33111" :NOSDIAG) "ONE" ("1d 1h
  7. " "" "33111" :NOSDIAG) "BINT1" ("1d 1h
  8. " "" "33111" :NOSDIAG) "cmp" ("2d 2h
  9. " "" "3311B" :NOSDIAG) "TWO" ("2d 2h
  10. " "" "3311B" :NOSDIAG) "BINT2" ("2d 2h
  11. " "" "3311B" :NOSDIAG) "str" ("3d 3h
  12. " "" "33125" :NOSDIAG) "THREE" ("3d 3h
  13. " "" "33125" :NOSDIAG) "BINT3" ("3d 3h
  14. " "" "33125" :NOSDIAG) "arry" ("4d 4h
  15. " "" "3312F" :NOSDIAG) "FOUR" ("4d 4h
  16. " "" "3312F" :NOSDIAG) "BINT4" ("4d 4h
  17. " "" "3312F" :NOSDIAG) "list" ("5d 5h
  18. " "" "33139" :NOSDIAG) "FIVE" ("5d 5h
  19. " "" "33139" :NOSDIAG) "BINT5" ("5d 5h
  20. " "" "33139" :NOSDIAG) "idnt" ("6d 6h
  21. " "" "33143" :NOSDIAG) "id" ("6d 6h
  22. " "" "33143" :NOSDIAG) "SIX" ("6d 6h
  23. " "" "33143" :NOSDIAG) "BINT6" ("6d 6h
  24. " "" "33143" :NOSDIAG) "lam" ("7d 7h
  25. " "" "3314D" :NOSDIAG) "SEVEN" ("7d 7h
  26. " "" "3314D" :NOSDIAG) "BINT7" ("7d 7h
  27. " "" "3314D" :NOSDIAG) "seco" ("8d 8h
  28. " "" "33157" :NOSDIAG) "EIGHT" ("8d 8h
  29. " "" "33157" :NOSDIAG) "BINT8" ("8d 8h
  30. " "" "33157" :NOSDIAG) "symb" ("9d 9h
  31. " "" "33161" :NOSDIAG) "NINE" ("9d 9h
  32. " "" "33161" :NOSDIAG) "BINT9" ("9d 9h
  33. " "" "33161" :NOSDIAG) "sym" ("10d Ah
  34. " "" "3316B" :NOSDIAG) "TEN" ("10d Ah
  35. " "" "3316B" :NOSDIAG) "BINT10" ("10d Ah
  36. " "" "3316B" :NOSDIAG) "hxs" ("11d Bh
  37. " "" "33175" :NOSDIAG) "ELEVEN" ("11d Bh
  38. " "" "33175" :NOSDIAG) "BINT11" ("11d Bh
  39. " "" "33175" :NOSDIAG) "grob" ("12d Ch
  40. " "" "3317F" :NOSDIAG) "TWELVE" ("12d Ch
  41. " "" "3317F" :NOSDIAG) "BINT12" ("12d Ch
  42. " "" "3317F" :NOSDIAG) "THIRTEEN" ("13d Dh
  43. " "" "33189" :NOSDIAG) "TAGGED" ("13d Dh
  44. " "" "33189" :NOSDIAG) "BINT13" ("13d Dh
  45. " "" "33189" :NOSDIAG) "unitob" ("14d Eh
  46. " "" "33193" :NOSDIAG) "FOURTEEN" ("14d Eh
  47. " "" "33193" :NOSDIAG) "EXT" ("14d Eh
  48. " "" "33193" :NOSDIAG) "BINT14" ("14d Eh
  49. " "" "33193" :NOSDIAG) "rompointer" ("15d Fh
  50. " "" "3319D" :NOSDIAG) "FIFTEEN" ("15d Fh
  51. " "" "3319D" :NOSDIAG) "BINT15" ("15d Fh
  52. " "" "3319D" :NOSDIAG) "SIXTEEN" ("16d 10h
  53. " "" "331A7" :NOSDIAG) "REALOB" ("16d 10h
  54. " "" "331A7" :NOSDIAG) "BINT16" ("16d 10h
  55. " "" "331A7" :NOSDIAG) "REALREAL" ("17d 11h
  56. " "" "331B1" :NOSDIAG) "2REAL" ("17d 11h
  57. " "" "331B1" :NOSDIAG) "SEVENTEEN" ("17d 11h
  58. " "" "331B1" :NOSDIAG) "BINT17" ("17d 11h
  59. " "" "331B1" :NOSDIAG) "EIGHTEEN" ("18d 12h
  60. " "" "331BB" :NOSDIAG) "BINT18" ("18d 12h
  61. " "" "331BB" :NOSDIAG) "NINETEEN" ("19d 13h
  62. " "" "331C5" :NOSDIAG) "BINT19" ("19d 13h
  63. " "" "331C5" :NOSDIAG) "TWENTY" ("20d 14h
  64. " "" "331CF" :NOSDIAG) "BINT20" ("20d 14h
  65. " "" "331CF" :NOSDIAG) "TWENTYONE" ("21d 15h
  66. " "" "331D9" :NOSDIAG) "BINT21" ("21d 15h
  67. " "" "331D9" :NOSDIAG) "TWENTYTWO" ("22d 16h
  68. " "" "331E3" :NOSDIAG) "BINT22" ("22d 16h
  69. " "" "331E3" :NOSDIAG) "TWENTYTHREE" ("23d 17h
  70. " "" "331ED" :NOSDIAG) "BINT23" ("23d 17h
  71. " "" "331ED" :NOSDIAG) "TWENTYFOUR" ("24d 18h
  72. " "" "331F7" :NOSDIAG) "BINT24" ("24d 18h
  73. " "" "331F7" :NOSDIAG) "TWENTYFIVE" ("25d 19h
  74. " "" "33201" :NOSDIAG) "BINT25" ("25d 19h
  75. " "" "33201" :NOSDIAG) "TWENTYSIX" ("26d 1Ah
  76. " "" "3320B" :NOSDIAG) "REALSYM" ("26d 1Ah
  77. " "" "3320B" :NOSDIAG) "BINT26" ("26d 1Ah
  78. " "" "3320B" :NOSDIAG) "TWENTYSEVEN" ("27d 1Bh
  79. " "" "33215" :NOSDIAG) "BINT27" ("27d 1Bh
  80. " "" "33215" :NOSDIAG) "TWENTYEIGHT" ("28d 1Ch
  81. " "" "3321F" :NOSDIAG) "BINT28" ("28d 1Ch
  82. " "" "3321F" :NOSDIAG) "TWENTYNINE" ("29d 1Dh
  83. " "" "33229" :NOSDIAG) "BINT29" ("29d 1Dh
  84. " "" "33229" :NOSDIAG) "THIRTY" ("30d 1Eh
  85. " "" "33233" :NOSDIAG) "REALEXT" ("30d 1Eh
  86. " "" "33233" :NOSDIAG) "BINT30" ("30d 1Eh
  87. " "" "33233" :NOSDIAG) "THIRTYONE" ("31d 1Fh
  88. " "" "3323D" :NOSDIAG) "BINT31" ("31d 1Fh
  89. " "" "3323D" :NOSDIAG) "THIRTYTWO" ("32d 20h
  90. " "" "33247" :NOSDIAG) "BINT32" ("32d 20h
  91. " "" "33247" :NOSDIAG) "THIRTYTHREE" ("33d 21h
  92. " "" "33251" :NOSDIAG) "BINT33" ("33d 21h
  93. " "" "33251" :NOSDIAG) "THIRTYFOUR" ("34d 22h
  94. " "" "3325B" :NOSDIAG) "BINT34" ("34d 22h
  95. " "" "3325B" :NOSDIAG) "THIRTYFIVE" ("35d 23h
  96. " "" "33265" :NOSDIAG) "BINT35" ("35d 23h
  97. " "" "33265" :NOSDIAG) "TTHIRTYSIX" ("36d 24h
  98. " "" "3326F" :NOSDIAG) "BINT36" ("36d 24h
  99. " "" "3326F" :NOSDIAG) "THIRTYSEVEN" ("37d 25h
  100. " "" "33279" :NOSDIAG) "BINT37" ("37d 25h
  101. " "" "33279" :NOSDIAG) "THIRTYEIGHT" ("38d 26h
  102. " "" "33283" :NOSDIAG) "BINT38" ("38d 26h
  103. " "" "33283" :NOSDIAG) "THIRTYNINE" ("39d 27h
  104. " "" "3328D" :NOSDIAG) "BINT39" ("39d 27h
  105. " "" "3328D" :NOSDIAG) "FOURTY" ("40d 28h
  106. " "" "33297" :NOSDIAG) "FORTY" ("40d 28h
  107. " "" "33297" :NOSDIAG) "BINT40" ("40d 28h
  108. " "" "33297" :NOSDIAG) "FORTYONE" ("41d 29h
  109. " "" "332A1" :NOSDIAG) "BINT41" ("41d 29h
  110. " "" "332A1" :NOSDIAG) "FORTYTWO" ("42d 2Ah
  111. " "" "332AB" :NOSDIAG) "BINT42" ("42d 2Ah
  112. " "" "332AB" :NOSDIAG) "FORTYTHREE" ("43d 2Bh
  113. " "" "332B5" :NOSDIAG) "BINT43" ("43d 2Bh
  114. " "" "332B5" :NOSDIAG) "(illnameerr)" ("44d 2Ch
  115. " "" "332BF" :NOSDIAG) "FORTYFOUR" ("44d 2Ch
  116. " "" "332BF" :NOSDIAG) "BINT44" ("44d 2Ch
  117. " "" "332BF" :NOSDIAG) "FORTYFIVE" ("45d 2Dh
  118. " "" "332C9" :NOSDIAG) "BINT45" ("45d 2Dh
  119. " "" "332C9" :NOSDIAG) "FORTYSIX" ("46d 2Eh
  120. " "" "332D3" :NOSDIAG) "BINT46" ("46d 2Eh
  121. " "" "332D3" :NOSDIAG) "(rrp)" ("47d 2Fh
  122. " "" "332DD" :NOSDIAG) "FORTYSEVEN" ("47d 2Fh
  123. " "" "332DD" :NOSDIAG) "BINT47" ("47d 2Fh
  124. " "" "332DD" :NOSDIAG) "FORTYEIGHT" ("48d 30h
  125. " "" "332E7" :NOSDIAG) "BINT48" ("48d 30h
  126. " "" "332E7" :NOSDIAG) "FORTYNINE" ("49d 31h
  127. " "" "332F1" :NOSDIAG) "BINT49" ("49d 31h
  128. " "" "332F1" :NOSDIAG) "FIFTY" ("50d 32h
  129. " "" "332FB" :NOSDIAG) "BINT50" ("50d 32h
  130. " "" "332FB" :NOSDIAG) "FIFTYONE" ("51d 33h
  131. " "" "33305" :NOSDIAG) "BINT51" ("51d 33h
  132. " "" "33305" :NOSDIAG) "(THREEFOUR)" ("52d 34h
  133. " "" "3330F" :NOSDIAG) "FIFTYTWO" ("52d 34h
  134. " "" "3330F" :NOSDIAG) "BINT52" ("52d 34h
  135. " "" "3330F" :NOSDIAG) "THREEFIVE" ("53d 35h
  136. " "" "33319" :NOSDIAG) "STRLIST" ("53d 35h
  137. " "" "33319" :NOSDIAG) "FIFTYTHREE" ("53d 35h
  138. " "" "33319" :NOSDIAG) "BINT53" ("53d 35h
  139. " "" "33319" :NOSDIAG) "FIFTYFOUR" ("54d 36h
  140. " "" "33323" :NOSDIAG) "BINT54" ("54d 36h
  141. " "" "33323" :NOSDIAG) "FIFTYFIVE" ("55d 37h
  142. " "" "3332D" :NOSDIAG) "(#THREESEVEN)" ("55d 37h
  143. " "" "3332D" :NOSDIAG) "BINT55" ("55d 37h
  144. " "" "3332D" :NOSDIAG) "FIFTYSIX" ("56d 38h
  145. " "" "33337" :NOSDIAG) "BINT56" ("56d 38h
  146. " "" "33337" :NOSDIAG) "FIFTYSEVEN" ("57d 39h
  147. " "" "33341" :NOSDIAG) "BINT57" ("57d 39h
  148. " "" "33341" :NOSDIAG) "FIFTYEIGHT" ("58d 3Ah
  149. " "" "3334B" :NOSDIAG) "BINT58" ("58d 3Ah
  150. " "" "3334B" :NOSDIAG) "FIFTYNINE" ("59d 3Bh
  151. " "" "33355" :NOSDIAG) "BINT59" ("59d 3Bh
  152. " "" "33355" :NOSDIAG) "SIXTY" ("60d 3Ch
  153. " "" "3335F" :NOSDIAG) "BINT60" ("60d 3Ch
  154. " "" "3335F" :NOSDIAG) "SIXTYONE" ("61d 3Dh
  155. " "" "33369" :NOSDIAG) "BINT61" ("61d 3Dh
  156. " "" "33369" :NOSDIAG) "SIXTYTWO" ("62d 3Eh
  157. " "" "33373" :NOSDIAG) "BINT62" ("62d 3Eh
  158. " "" "33373" :NOSDIAG) "SIXTYTHREE" ("63d 3Fh
  159. " "" "3337D" :NOSDIAG) "(BINT3Fh)" ("63d 3Fh
  160. " "" "3337D" :NOSDIAG) "BINT63" ("63d 3Fh
  161. " "" "3337D" :NOSDIAG) "YHI" ("64d 40h
  162. " "" "33387" :NOSDIAG) "SIXTYFOUR" ("64d 40h
  163. " "" "33387" :NOSDIAG) "(BINT_40h)" ("64d 40h
  164. " "" "33387" :NOSDIAG) "BINT40h" ("64d 40h
  165. " "" "33387" :NOSDIAG) "BINT64" ("64d 40h
  166. " "" "33387" :NOSDIAG) "(BINT_65d)" ("65d 41h
  167. " "" "33391" :NOSDIAG) "ARRYREAL" ("65d 41h
  168. " "" "33391" :NOSDIAG) "BINT65" ("65d 41h
  169. " "" "33391" :NOSDIAG) "(ARRYCMP)" ("66d 42h
  170. " "" "3339B" :NOSDIAG) "FOURTWO" ("66d 42h
  171. " "" "3339B" :NOSDIAG) "BINT66" ("66d 42h
  172. " "" "3339B" :NOSDIAG) "FOURTHREE" ("67d 43h
  173. " "" "333A5" :NOSDIAG) "BINT67" ("67d 43h
  174. " "" "333A5" :NOSDIAG) "SIXTYEIGHT" ("68d 44h
  175. " "" "333AF" :NOSDIAG) "(2ARRY)" ("68d 44h
  176. " "" "333AF" :NOSDIAG) "BINT68" ("68d 44h
  177. " "" "333AF" :NOSDIAG) "FOURFIVE" ("69d 45h
  178. " "" "333B9" :NOSDIAG) "BINT69" ("69d 45h
  179. " "" "333B9" :NOSDIAG) "(ARRYID)" ("70d 46h
  180. " "" "333C3" :NOSDIAG) "SEVENTY" ("70d 46h
  181. " "" "333C3" :NOSDIAG) "BINT70" ("70d 46h
  182. " "" "333C3" :NOSDIAG) "BINT71" ("71d 47h
  183. " "" "333CD" :NOSDIAG) "BINT72" ("72d 48h
  184. " "" "333D7" :NOSDIAG) "BINT73" ("73d 49h
  185. " "" "333E1" :NOSDIAG) "SEVENTYFOUR" ("74d 4Ah
  186. " "" "333EB" :NOSDIAG) "BINT74" ("74d 4Ah
  187. " "" "333EB" :NOSDIAG) "BINT75" ("75d 4Bh
  188. " "" "333F5" :NOSDIAG) "BINT76" ("76d 4Ch
  189. " "" "333FF" :NOSDIAG) "BINT77" ("77d 4Dh
  190. " "" "33409" :NOSDIAG) "BINT78" ("78d 4Eh
  191. " "" "33413" :NOSDIAG) "SEVENTYNINE" ("79d 4Fh
  192. " "" "3341D" :NOSDIAG) "BINT79" ("79d 4Fh
  193. " "" "3341D" :NOSDIAG) "(LISTOB)" ("80d 50h
  194. " "" "33427" :NOSDIAG) "EIGHTY" ("80d 50h
  195. " "" "33427" :NOSDIAG) "BINT80" ("80d 50h
  196. " "" "33427" :NOSDIAG) "LISTREAL" ("81d 51h
  197. " "" "33431" :NOSDIAG) "EIGHTYONE" ("81d 51h
  198. " "" "33431" :NOSDIAG) "BINT81" ("81d 51h
  199. " "" "33431" :NOSDIAG) "LISTCMP" ("82d 52h
  200. " "" "3343B" :NOSDIAG) "BINT82" ("82d 52h
  201. " "" "3343B" :NOSDIAG) "FIVETHREE" ("83d 53h
  202. " "" "33445" :NOSDIAG) "BINT83" ("83d 53h
  203. " "" "33445" :NOSDIAG) "FIVEFOUR" ("84d 54h
  204. " "" "3344F" :NOSDIAG) "BINT84" ("84d 54h
  205. " "" "3344F" :NOSDIAG) "2LIST" ("85d 55h
  206. " "" "33459" :NOSDIAG) "BINT85" ("85d 55h
  207. " "" "33459" :NOSDIAG) "(LISTID)" ("86d 56h
  208. " "" "33463" :NOSDIAG) "FIVESIX" ("86d 56h
  209. " "" "33463" :NOSDIAG) "BINT86" ("86d 56h
  210. " "" "33463" :NOSDIAG) "LISTLAM" ("87d 57h
  211. " "" "3346D" :NOSDIAG) "BINT87" ("87d 57h
  212. " "" "3346D" :NOSDIAG) "BINT88" ("88d 58h
  213. " "" "33477" :NOSDIAG) "BINT89" ("89d 59h
  214. " "" "33481" :NOSDIAG) "BINT90" ("90d 5Ah
  215. " "" "3348B" :NOSDIAG) "BINT_91d" ("91d 5Bh
  216. " "" "33495" :NOSDIAG) "BINT91" ("91d 5Bh
  217. " "" "33495" :NOSDIAG) "BINT92" ("92d 5Ch
  218. " "" "3349F" :NOSDIAG) "BINT93" ("93d 5Dh
  219. " "" "334A9" :NOSDIAG) "BINT94" ("94d 5Eh
  220. " "" "334B3" :NOSDIAG) "BINT95" ("95d 5Fh
  221. " "" "334BD" :NOSDIAG) "(idntany)" ("96d 60h
  222. " "" "334C7" :NOSDIAG) "BINT_96d" ("96d 60h
  223. " "" "334C7" :NOSDIAG) "BINT96" ("96d 60h
  224. " "" "334C7" :NOSDIAG) "IDREAL" ("97d 61h
  225. " "" "334D1" :NOSDIAG) "BINT97" ("97d 61h
  226. " "" "334D1" :NOSDIAG) "(NINETYEIGHT)" ("98d 62h
  227. " "" "334DB" :NOSDIAG) "(IDCMP)" ("98d 62h
  228. " "" "334DB" :NOSDIAG) "BINT98" ("98d 62h
  229. " "" "334DB" :NOSDIAG) "BINT99" ("99d 63h
  230. " "" "334E5" :NOSDIAG) "(IDARRY)" ("100d 64h
  231. " "" "334EF" :NOSDIAG) "ONEHUNDRED" ("100d 64h
  232. " "" "334EF" :NOSDIAG) "BINT100" ("100d 64h
  233. " "" "334EF" :NOSDIAG) "(SIXFIVE)" ("101d 65h
  234. " "" "334F9" :NOSDIAG) "(IDLIST)" ("101d 65h
  235. " "" "334F9" :NOSDIAG) "BINT101" ("101d 65h
  236. " "" "334F9" :NOSDIAG) "BINT102" ("102d 66h
  237. " "" "33503" :NOSDIAG) "BINT103" ("103d 67h
  238. " "" "3350D" :NOSDIAG) "BINT104" ("104d 68h
  239. " "" "33517" :NOSDIAG) "BINT105" ("105d 69h
  240. " "" "33521" :NOSDIAG) "BINT106" ("106d 6Ah
  241. " "" "3352B" :NOSDIAG) "BINT107" ("107d 6Bh
  242. " "" "33535" :NOSDIAG) "BINT108" ("108d 6Ch
  243. " "" "3353F" :NOSDIAG) "BINT109" ("109d 6Dh
  244. " "" "33549" :NOSDIAG) "BINT110" ("110d 6Eh
  245. " "" "33553" :NOSDIAG) "char" ("111d 6Fh
  246. " "" "3355D" :NOSDIAG) "BINT111" ("111d 6Fh
  247. " "" "3355D" :NOSDIAG) "(lamany)" ("112d 70h
  248. " "" "33567" :NOSDIAG) "BINT112" ("112d 70h
  249. " "" "33567" :NOSDIAG) "(LAMREAL)" ("113d 71h
  250. " "" "33571" :NOSDIAG) "BINT113" ("113d 71h
  251. " "" "33571" :NOSDIAG) "(BINT_114d)" ("114d 72h
  252. " "" "3357B" :NOSDIAG) "BINT114" ("114d 72h
  253. " "" "3357B" :NOSDIAG) "BINT_115d" ("115d 73h
  254. " "" "33585" :NOSDIAG) "BINT115" ("115d 73h
  255. " "" "33585" :NOSDIAG) "BINT_116d" ("116d 74h
  256. " "" "3358F" :NOSDIAG) "BINT116" ("116d 74h
  257. " "" "3358F" :NOSDIAG) "(LAMLIST)" ("117d 75h
  258. " "" "33599" :NOSDIAG) "(BINT_117d)" ("117d 75h
  259. " "" "33599" :NOSDIAG) "BINT117" ("117d 75h
  260. " "" "33599" :NOSDIAG) "BINT118" ("118d 76h
  261. " "" "335A3" :NOSDIAG) "BINT119" ("119d 77h
  262. " "" "335AD" :NOSDIAG) "BINT120" ("120d 78h
  263. " "" "335B7" :NOSDIAG) "BINT121" ("121d 79h
  264. " "" "335C1" :NOSDIAG) "BINT_122d" ("122d 7Ah
  265. " "" "335CB" :NOSDIAG) "BINT122" ("122d 7Ah
  266. " "" "335CB" :NOSDIAG) "BINT123" ("123d 7Bh
  267. " "" "335D5" :NOSDIAG) "BINT124" ("124d 7Ch
  268. " "" "335DF" :NOSDIAG) "BINT125" ("125d 7Dh
  269. " "" "335E9" :NOSDIAG) "BINT126" ("126d 7Eh
  270. " "" "335F3" :NOSDIAG) "BINT127" ("127d 7Fh
  271. " "" "335FD" :NOSDIAG) "BINT80h" ("128d 80h
  272. " "" "33607" :NOSDIAG) "BINT128" ("128d 80h
  273. " "" "33607" :NOSDIAG) "BINT129" ("129d 81h
  274. " "" "33611" :NOSDIAG) "XHI-1" ("130d 82h
  275. " "" "3361B" :NOSDIAG) "BINT_130d" ("130d 82h
  276. " "" "3361B" :NOSDIAG) "BINT130d" ("130d 82h
  277. " "" "3361B" :NOSDIAG) "BINT130" ("130d 82h
  278. " "" "3361B" :NOSDIAG) "XHI" ("131d 83h
  279. " "" "33625" :NOSDIAG) "BINT131d" ("131d 83h
  280. " "" "33625" :NOSDIAG) "BINT_131d" ("131d 83h
  281. " "" "33625" :NOSDIAG) "BINT131" ("131d 83h
  282. " "" "33625" :NOSDIAG) "(library)" ("143d 8Fh
  283. " "" "3362F" :UBS :NOSDIAG) "#8F" ("143d 8Fh
  284. " "" "3362F" :UBS :NOSDIAG) "SYMBREAL" ("145d 91h
  285. " "" "33639") "(SYMBCMP)" ("146d 92h
  286. " "" "33643" :UBS :NOSDIAG) "SYMBCMP" ("146d 92h
  287. " "" "33643" :UBS :NOSDIAG) "(SYMBSYM)" ("154d 9Ah
  288. " "" "3364D" :UBS :NOSDIAG) "(SYMCMP)" ("154d 9Ah
  289. " "" "3364D" :UBS :NOSDIAG) "SYMBSYM" ("154d 9Ah
  290. " "" "3364D" :UBS :NOSDIAG) "SYMBUNIT" ("158d 9Eh
  291. " "" "33657") "#9F" ("159d 9Fh
  292. " "" "3EAFB" :UBS :NOSDIAG) "backup" ("159d 9Fh
  293. " "" "33661" :UBS) "SYMOB" ("160d A0h
  294. " "" "3366B") "SYMREAL" ("161d A1h
  295. " "" "33675") "SYMCMP" ("162d A2h
  296. " "" "3367F" :UBS :NOSDIAG) "SYMARRY" ("164d A4h
  297. " "" "39E6B" :UBS :NOSDIAG) "SYMLIST" ("165d A5h
  298. " "" "33689" :UBS :NOSDIAG) "SYMID" ("166d A6h
  299. " "" "33693") "SYMLAM" ("167d A7h
  300. " "" "3369D") "SYMSYMB" ("169d A9h
  301. " "" "336A7" :UBS :NOSDIAG) "SYMSYM" ("170d AAh
  302. " "" "336B1") "SYMEXT" ("174d AEh
  303. " "" "336BB") "#AF" ("175d AFh
  304. " "" "3BD4C" :UBS :NOSDIAG) "HXSREAL" ("177d B1h
  305. " "" "336C5" :UBS :NOSDIAG) "#BB" ("187d BBh
  306. " "" "38275" :UBS :NOSDIAG) "2HXS" ("187d BBh
  307. " "" "336CF" :UBS :NOSDIAG) "BINTC0h" ("192d C0h
  308. " "" "336D9" :NOSDIAG) "#C8" ("200d C8h
  309. " "" "3E7DA" :UBS :NOSDIAG) "2GROB" ("204d CCh
  310. " "" "336E3") "#CF" ("207d CFh
  311. " "" "3BD65" :UBS) "TAGGEDANY" ("208d D0h
  312. " "" "336ED") "EXTREAL" ("225d E1h
  313. " "" "336F7") "(UNITSYM)" ("234d EAh
  314. " "" "33701") "EXTSYM" ("234d EAh
  315. " "" "33701") "2EXT" ("238d EEh
  316. " "" "3370B") "ROMPANY" ("240d F0h
  317. " "" "33715") "BINT253" ("253d FDh
  318. " "" "3371F") "BINT255d" ("255d FFh
  319. " "" "33729") "(FSTFLOATROM#)" ("256d 100h
  320. " "" "33733") "REALOBOB" ("256d 100h
  321. " "" "33733") "(Err#Chr00)" ("258d 102h
  322. " "" "3373D") "(#_258_d)" ("258d 102h
  323. " "" "3373D") "#_102" ("258d 102h
  324. " "" "3373D") "#SyntaxErr" ("262d 106h
  325. " "" "33747") "BINT_263d" ("263d 107h
  326. " "" "33751" :UBS :NOSDIAG) "REALREALOB" ("272d 110h
  327. " "" "3375B" :UBS :NOSDIAG) "3REAL" ("273d 111h
  328. " "" "33765") "#111" ("273d 111h
  329. " "" "3E17B" :UBS :NOSDIAG) "(#_291_d)" ("291d 123h
  330. " "" "3376F" :UBS) "(#_123)" ("291d 123h
  331. " "" "3376F" :UBS) "Err#Kill" ("291d 123h
  332. " "" "3376F" :UBS) "(#_292_d)" ("292d 124h
  333. " "" "33779" :UBS) "(#_124)" ("292d 124h
  334. " "" "33779" :UBS) "Err#NoLstStk" ("292d 124h
  335. " "" "33779" :UBS) "#12F" ("303d 12Fh
  336. " "" "2777E" :UBS :NOSDIAG) "(BINT_305d)" ("305d 131h
  337. " "" "33783" :UBS) "#NoRoomForSt" ("305d 131h
  338. " "" "33783" :UBS) "#132" ("306d 132h
  339. " "" "3378D" :UBS) "REALSTRSTR" ("307d 133h
  340. " "" "33797" :UBS) "(VLMpurgemsg)" ("308d 134h
  341. " "" "337A1" :UBS :NOSDIAG) "#134" ("308d 134h
  342. " "" "337A1" :UBS :NOSDIAG) "(VLMmsg)" ("309d 135h
  343. " "" "337AB" :UBS :NOSDIAG) "#135" ("309d 135h
  344. " "" "337AB" :UBS :NOSDIAG) "(VLMstkmsg)" ("310d 136h
  345. " "" "337B5" :UBS :NOSDIAG) "(REALSTRID)" ("310d 136h
  346. " "" "337B5" :UBS :NOSDIAG) "#136" ("310d 136h
  347. " "" "337B5" :UBS :NOSDIAG) "(VLMundomsg)" ("311d 137h
  348. " "" "337BF" :UBS :NOSDIAG) "#137" ("311d 137h
  349. " "" "337BF" :UBS :NOSDIAG) "(VLMhistmsg)" ("312d 138h
  350. " "" "337C9" :UBS :NOSDIAG) "#138" ("312d 138h
  351. " "" "337C9" :UBS :NOSDIAG) "(VLMUserKeys)" ("313d 139h
  352. " "" "337D3" :UBS :NOSDIAG) "#139" ("313d 139h
  353. " "" "337D3" :UBS :NOSDIAG) "(VLMAlarmMsg)" ("314d 13Ah
  354. " "" "337DD" :UBS :NOSDIAG) "#13A" ("314d 13Ah
  355. " "" "337DD" :UBS :NOSDIAG) "(VLMlastargs)" ("315d 13Bh
  356. " "" "337E7" :UBS :NOSDIAG) "#13B" ("315d 13Bh
  357. " "" "337E7" :UBS :NOSDIAG) "(VLMcmdlmsg)" ("317d 13Dh
  358. " "" "337F1" :UBS :NOSDIAG) "#13D" ("317d 13Dh
  359. " "" "337F1" :UBS :NOSDIAG) "Err#Cont" ("318d 13Eh
  360. " "" "337FB" :UBS :NOSDIAG) "(REALLISTREAL)" ("337d 151h
  361. " "" "33805") "INTEGER337" ("337d 151h
  362. " "" "33805") "CMPOBOB" ("512d 200h
  363. " "" "3380F" :UBS :NOSDIAG) "(#_517_d)" ("517d 205h
  364. " "" "33819" :UBS) "(#_205)" ("517d 205h
  365. " "" "33819" :UBS) "Err#NoLstArg" ("517d 205h
  366. " "" "33819" :UBS) "#304" ("772d 304h
  367. " "" "3A1C2" :UBS :NOSDIAG) "STRREALREAL" ("785d 311h
  368. " "" "33823" :NOSDIAG) "#313" ("787d 313h
  369. " "" "3B9FA" :UBS :NOSDIAG) "ARRYREALOB" ("1040d 410h
  370. " "" "3C11E" :UBS :NOSDIAG) "#411" ("1041d 411h
  371. " "" "3B928" :UBS :NOSDIAG) "ARRYREALREAL" ("1041d 411h
  372. " "" "3382D" :UBS :NOSDIAG) "ARRYREALCMP" ("1042d 412h
  373. " "" "33837" :UBS :NOSDIAG) "#414" ("1044d 414h
  374. " "" "3BA2D" :UBS :NOSDIAG) "#415" ("1045d 415h
  375. " "" "3B93D" :UBS :NOSDIAG) "3ARRY" ("1092d 444h
  376. " "" "33841" :UBS :NOSDIAG) "ARRYLISTOB" ("1104d 450h
  377. " "" "3C10F" :UBS :NOSDIAG) "#451" ("1105d 451h
  378. " "" "3B952" :UBS :NOSDIAG) "ARRYLISTREAL" ("1105d 451h
  379. " "" "3384B" :UBS :NOSDIAG) "ARRYLISTCMP" ("1106d 452h
  380. " "" "33855" :UBS :NOSDIAG) "#454" ("1108d 454h
  381. " "" "3BA18" :UBS :NOSDIAG) "#455" ("1109d 455h
  382. " "" "3B913" :UBS :NOSDIAG) "#4FF" ("1279d 4FFh
  383. " "" "3A12D" :UBS :NOSDIAG) "LISTREALOB" ("1296d 510h
  384. " "" "3385F" :UBS :NOSDIAG) "LISTREALREAL" ("1297d 511h
  385. " "" "33869" :UBS :NOSDIAG) "#515" ("1301d 515h
  386. " "" "3BA09" :UBS :NOSDIAG) "LISTLISTOB" ("1360d 550h
  387. " "" "33873" :UBS :NOSDIAG) "LN_0" ("1541d 605h
  388. " "" "277F6" :UBS :NOSDIAG) "LN_Neg" ("1542d 606h
  389. " "" "27800" :UBS :NOSDIAG) "InvalidEQ" ("1543d 607h
  390. " "" "2780A" :UBS :NOSDIAG) "Cureq#" ("1544d 608h
  391. " "" "27814" :UBS :NOSDIAG) "NoCureq#" ("1545d 609h
  392. " "" "2781E" :UBS :NOSDIAG) "EnterEq#" ("1546d 60Ah
  393. " "" "27828" :UBS :NOSDIAG) "EnterName#" ("1547d 60Bh
  394. " "" "27832" :UBS :NOSDIAG) "SelPtype#" ("1548d 60Ch
  395. " "" "2783C" :UBS :NOSDIAG) "EmptyCat#" ("1549d 60Dh
  396. " "" "27846" :UBS :NOSDIAG) "#60E" ("1550d 60Eh
  397. " "" "2768E" :UBS :NOSDIAG) "NoStatPlot#" ("1551d 60Fh
  398. " "" "27698" :UBS :NOSDIAG) "IDREALOB" ("1552d 610h
  399. " "" "3387D" :UBS :NOSDIAG) "SolvingFor#" ("1553d 611h
  400. " "" "276AC" :UBS :NOSDIAG) "NoCurrent#" ("1554d 612h
  401. " "" "276B6" :UBS :NOSDIAG) "PressSig+#" ("1555d 613h
  402. " "" "276C0" :UBS :NOSDIAG) "SelectModl#" ("1556d 614h
  403. " "" "276CA" :UBS :NOSDIAG) "NoAlarms#" ("1557d 615h
  404. " "" "276D4" :UBS :NOSDIAG) "PressALRM#" ("1558d 616h
  405. " "" "276DE" :UBS :NOSDIAG) "NextALRM#" ("1559d 617h
  406. " "" "276E8" :UBS :NOSDIAG) "PastDue#" ("1560d 618h
  407. " "" "27792" :UBS :NOSDIAG) "Acknowledge#" ("1561d 619h
  408. " "" "2779C" :UBS :NOSDIAG) "KeyInAlrm#" ("1562d 61Ah
  409. " "" "277A6" :UBS :NOSDIAG) "SelectRpt#" ("1563d 61Bh
  410. " "" "277B0" :UBS :NOSDIAG) "IOSetupMenu#" ("1564d 61Ch
  411. " "" "277BA" :UBS :NOSDIAG) "PlotType#" ("1565d 61Dh
  412. " "" "277C4" :UBS :NOSDIAG) "NoExecAct#" ("1566d 61Eh
  413. " "" "277CE" :UBS :NOSDIAG) "OffScreen#" ("1567d 61Fh
  414. " "" "277D8" :UBS :NOSDIAG) "OnlyPtypes#" ("1568d 620h
  415. " "" "277E2" :UBS :NOSDIAG) "StatName#" ("1569d 621h
  416. " "" "277EC" :UBS :NOSDIAG) "ZoomPrompt#" ("1570d 622h
  417. " "" "276F2" :UBS :NOSDIAG) "CatToStack#" ("1571d 623h
  418. " "" "276FC" :UBS :NOSDIAG) "XAutoZoom#" ("1572d 624h
  419. " "" "27706" :UBS :NOSDIAG) "IR/wire#" ("1576d 628h
  420. " "" "27710" :UBS :NOSDIAG) "ASCII/bin#" ("1577d 629h
  421. " "" "2771A" :UBS :NOSDIAG) "#62A" ("1578d 62Ah
  422. " "" "27724" :UBS :NOSDIAG) "#62B" ("1579d 62Bh
  423. " "" "2772E" :UBS :NOSDIAG) "#62C" ("1580d 62Ch
  424. " "" "27738" :UBS :NOSDIAG) "#62D" ("1581d 62Dh
  425. " "" "27742" :UBS :NOSDIAG) "EnterMatrix#" ("1582d 62Eh
  426. " "" "27788" :UBS :NOSDIAG) "IDLISTOB" ("1616d 650h
  427. " "" "33887" :UBS :NOSDIAG) "(LAMANYANY)" ("1792d 700h
  428. " "" "33891" :UBS :NOSDIAG) "FSTMACROROM#" ("1792d 700h
  429. " "" "33891" :UBS :NOSDIAG) "#710" ("1808d 710h
  430. " "" "3C17A" :UBS :NOSDIAG) "#750" ("1872d 750h
  431. " "" "3C16B" :UBS :NOSDIAG) "#7FF" ("2047d 7FFh
  432. " "" "08DF7" :UBS :NOSDIAG) "BINT800h" ("2048d 800h
  433. " "" "27878" :UBS :NOSDIAG) "#822" ("2082d 822h
  434. " "" "3B976" :UBS :NOSDIAG) "#82C" ("2092d 82Ch
  435. " "" "3C83C" :UBS :NOSDIAG) "#855" ("2133d 855h
  436. " "" "3B967" :UBS :NOSDIAG) "#85C" ("2140d 85Ch
  437. " "" "3C81E" :UBS :NOSDIAG) "PROGIDREAL" ("2145d 861h
  438. " "" "3389B" :UBS :NOSDIAG) "PROGIDCMP" ("2146d 862h
  439. " "" "338A5" :UBS :NOSDIAG) "PROGIDLIST" ("2149d 865h
  440. " "" "338AF" :UBS :NOSDIAG) "PROGIDEXT" ("2158d 86Eh
  441. " "" "338B9" :UBS :NOSDIAG) "#8F1" ("2289d 8F1h
  442. " "" "3E7FF" :UBS :NOSDIAG) "#8FD" ("2301d 8FDh
  443. " "" "3E759" :UBS :NOSDIAG) "#9F1" ("2545d 9F1h
  444. " "" "3E7E9" :UBS :NOSDIAG) "#9FD" ("2557d 9FDh
  445. " "" "3E743" :UBS :NOSDIAG) "Lackint#" ("2561d A01h
  446. " "" "2774C" :UBS :NOSDIAG) "Constant#" ("2562d A02h
  447. " "" "27756" :UBS :NOSDIAG) "Attn#" ("2563d A03h
  448. " "" "27882") "ATTNERR" ("2563d A03h
  449. " "" "338C3") "Zero#" ("2564d A04h
  450. " "" "27760" :UBS :NOSDIAG) "RevSgn#" ("2565d A05h
  451. " "" "2776A" :UBS :NOSDIAG) "Extremum#" ("2566d A06h
  452. " "" "27774" :UBS :NOSDIAG) "SYMREALREAL" ("2577d A11h
  453. " "" "338CD" :UBS :NOSDIAG) "SYMREALCMP" ("2578d A12h
  454. " "" "338D7" :UBS :NOSDIAG) "SYMREALSYM" ("2586d A1Ah
  455. " "" "338E1" :UBS :NOSDIAG) "SYMCMPREAL" ("2593d A21h
  456. " "" "338EB" :UBS :NOSDIAG) "SYMCMPCMP" ("2594d A22h
  457. " "" "338F5" :UBS :NOSDIAG) "SYMCMPSYM" ("2602d A2Ah
  458. " "" "338FF" :UBS :NOSDIAG) "SYMIDREAL" ("2657d A61h
  459. " "" "33909" :UBS :NOSDIAG) "SYMIDCMP" ("2658d A62h
  460. " "" "33913" :UBS :NOSDIAG) "SYMIDLIST" ("2661d A65h
  461. " "" "3391D" :UBS :NOSDIAG) "SYMIDEXT" ("2670d A6Eh
  462. " "" "33927" :UBS :NOSDIAG) "SYMSYMREAL" ("2721d AA1h
  463. " "" "33931" :UBS :NOSDIAG) "SYMSYMCMP" ("2722d AA2h
  464. " "" "3393B" :UBS :NOSDIAG) "3SYM" ("2730d AAAh
  465. " "" "33945" :UBS :NOSDIAG) "XFERFAIL" ("3078d C06h
  466. " "" "3394F" :UBS :NOSDIAG) "PROTERR" ("3079d C07h
  467. " "" "33959" :UBS :NOSDIAG) "InvalServCmd" ("3080d C08h
  468. " "" "33963" :UBS :NOSDIAG) "Connecting" ("3082d C0Ah
  469. " "" "3396D") "Retry" ("3083d C0Bh
  470. " "" "33977" :UBS :NOSDIAG) "#C2C" ("3116d C2Ch
  471. " "" "3C800" :UBS :NOSDIAG) "#C5C" ("3164d C5Ch
  472. " "" "3C7E2" :UBS :NOSDIAG) "#C22" ("3106d C22h
  473. " "" "3B904" :UBS :NOSDIAG) "#C55" ("3157d C55h
  474. " "" "3B8F5" :UBS :NOSDIAG) "#CAlarmErr" ("3583d DFFh
  475. " "" "33981" :NOSDIAG) "EXTOBOB" ("3584d E00h
  476. " "" "3398B") "#2111" ("8465d 2111h
  477. " "" "3C8D0" :UBS :NOSDIAG) "TYPEINT" ("9748d 2614h
  478. " "" "03FEF" :UBS :NOSDIAG) "TYPEMATRIX" ("9862d 2686h
  479. " "" "03FF9" :UBS :NOSDIAG) "TYPEREAL" ("10547d 2933h
  480. " "" "03F8B") "TYPEEREL" ("10581d 2955h
  481. " "" "03FDB" :UBS) "TYPEIDNT" ("10568d 2948h
  482. " "" "03FA9") "TYPECMP" ("10615d 2977h
  483. " "" "03F95" :UBS) "TYPELIST" ("10868d 2A74h
  484. " "" "03F9F" :UBS) "TYPERRP" ("10902d 2A96h
  485. " "" "03FC7" :UBS) "TYPESYMB" ("10936d 2AB8h
  486. " "" "03FBD" :UBS) "TYPEEXT" ("10970d 2ADAh
  487. " "" "03FE5" :UBS) "TYPECOL" ("11677d 2D9Dh
  488. " "" "03FB3" :UBS) "TYPEIDNT" ("11848d 2E48h
  489. " "" "03FA9" :UBS :NOSDIAG) "TYPELAM" ("11885d 2E6Dh
  490. " "" "03FD1" :UBS) "#5B11" ("23313d 5B11h
  491. " "" "3C8DF" :UBS :NOSDIAG) "SYMRRANY" ("41232d A110h
  492. " "" "3D50D" :UBS :NOSDIAG) "SYMRSYMANY" ("41376d A1A0h
  493. " "" "3D52B" :UBS :NOSDIAG) "SYMSYMRANY" ("43536d AA10h
  494. " "" "3D51C" :UBS :NOSDIAG) "SYMSYMSYMANY" ("43680d AAA0h
  495. " "" "2C4D2" :UBS :NOSDIAG) "#BBBB" ("48059d BBBBh
  496. " "" "3B7AD" :UBS :NOSDIAG) "#D6A8" ("54952d D6A8h
  497. " "" "08F1F" :UBS :NOSDIAG) "#FFFF" ("65535d FFFFh
  498. " "" "38266" :UBS :NOSDIAG) "#102A8" ("66216d 102A8h
  499. " "" "03880" :UBS :NOSDIAG) "#2D541" ("185665d 2D541h
  500. " "" "091B4" :UBS :NOSDIAG) "#37258" ("225880d 37258h
  501. " "" "350F5" :UBS :NOSDIAG) "#414C1" ("267457d 414C1h
  502. " "" "0803F" :UBS :NOSDIAG) "#536A8" ("341672d 536A8h
  503. " "" "08ECE" :UBS :NOSDIAG) "#61441" ("398401d 61441h
  504. " "" "0657E" :UBS :NOSDIAG) "#EXITERR" ("458752d 70000h
  505. " "" "33995") "#A8241" ("688705d A8241h
  506. " "" "03826" :UBS :NOSDIAG) "#B437D" ("738173d B437Dh
  507. " "" "39277" :UBS :NOSDIAG) "#E13A8" ("922536d E13A8h
  508. " "" "038DC" :UBS :NOSDIAG) "MINUSONE" ("1048575d FFFFFh
  509. " "" "3399F") "ZEROZERO" ("\\-> #0 #0
  510. " "" "37287") "#ZERO#ONE" ("\\-> #0 #1
  511. " "" "37294") "#ZERO#SEVEN" ("\\-> #0 #7
  512. " "" "37305") "ONEDUP" ("\\-> #1 #1
  513. " "" "36B12") "ONEONE" ("\\-> #1 #1
  514. " "" "36B12") "#ONE#27" ("\\-> #1 #27d
  515. " "" "37315") "#TWO#ONE" ("\\-> #2 #1
  516. " "" "37328") "#TWO#TWO" ("\\-> #2 #2
  517. " "" "3733A") "#TWO#FOUR" ("\\-> #2 #4
  518. " "" "3734A") "#THREE#FOUR" ("\\-> #3 #4
  519. " "" "3735C") "#FIVE#FOUR" ("\\-> #5 #4
  520. " "" "3736E") "ZEROZEROZERO" ("\\-> #0 #0 #0
  521. " "" "37380") "ZEROZEROONE" ("\\-> #0 #0 #1
  522. " "" "37394") "ZEROZEROTWO" ("\\-> #0 #0 #2
  523. " "" "373A8") "DROPZERO" ("ob \\-> #0
  524. " "" "3558C") "3DROPZERO" ("ob ob ob \\-> #0
  525. " "" "37711" :UBS) "2DROP00" ("ob ob \\-> #0 #0
  526. " "" "355A5") "DROPONE" ("ob \\-> #1
  527. " "" "3596D") "DUPZERO" ("ob \\-> ob ob #0
  528. " "" "36AD6") "DUPONE" ("ob \\-> ob ob #1
  529. " "" "36AEA") "DUPTWO" ("ob \\-> ob ob #2
  530. " "" "36B26") "SWAPONE" ("ob ob' \\-> ob' ob #1
  531. " "" "36AFE") "ZEROSWAP" ("ob \\-> #0 ob
  532. " "" "35E75") "ZEROOVER" ("ob \\-> ob #0 ob
  533. " "" "360BB") "ZEROFALSE" ("\\-> #0 F
  534. " "" "36568") "ONESWAP" ("ob \\-> #1 ob
  535. " "" "35EA2") "ONEFALSE" ("\\-> #1 F
  536. " "" "3657C") "COERCE" ("% \\-> #
  537. " "" "262F1") "COERCEDUP" ("% \\-> # #
  538. " "" "35D08") "COERCESWAP" ("ob % \\-> # ob
  539. " "" "35EB6") "COERCE2" ("% %' \\-> # #'
  540. " "" "3F481") "%ABSCOERCE" ("% \\-> #
  541. " "" "262EC") "Flag%isUser?" ("% \\-> # flag
  542. " "TRUE if real is greater 0, else FALSE.
  543. " "2F244" :UBS) "C%>#" ("C% \\-> # #'
  544. " "" "2F31F") "HXS>#" ("hxs \\-> #
  545. " "" "05A03") "2HXSLIST?" ("{ hxs hxs' } \\-> # #'
  546. " "Converts list of two hxs to two
  547. bints. Generates \"Bad Argument Value\" for
  548. invalid input.
  549. " "2F17E") "CHR>#" ("chr \\-> #
  550. " "" "05A51") "^Z2BIN" ("Z \\-> #
  551. " "Convert Z to bint.
  552. Returns FFFFF for overflows.
  553. Returns 0 for negative numbers.
  554. " "0EF006" :wasCSys) "^Z>#" ("z \\-> #
  555. " "Coerces Z to #, overflow error if Z<0 or
  556. Z>9999. 10000 is used to insure that the #*6
  557. can be represented in BCD on a 5 nibbles
  558. field.
  559. " "19D006" :wasCSys) "^COERCE2Z" ("z2 z1 \\-> #2 #1
  560. " "Converts 2 zints to bints.
  561. " "0F0006" :wasCSys) "#+" ("# #' \\-> #+#'
  562. " "" "03DBC") "#1+" ("# \\-> #+1
  563. " "" "03DEF") "#2+" ("# \\-> #+2
  564. " "" "03E2D") "#3+" ("# \\-> #+3
  565. " "" "355FD") "#4+" ("# \\-> #+4
  566. " "" "35602") "#5+" ("# \\-> #+5
  567. " "" "35607") "#6+" ("# \\-> #+6
  568. " "" "3560C") "#7+" ("# \\-> #+7
  569. " "" "35611") "#8+" ("# \\-> #+8
  570. " "" "35616") "#9+" ("# \\-> #+9
  571. " "" "3561B") "#10+" ("# \\-> #+10
  572. " "" "35620") "#11+" ("# \\-> #+11
  573. " "" "35625" :UBS) "#12+" ("# \\-> #+12
  574. " "" "3562A") "#-" ("# #' \\-> #-#'
  575. " "" "03DE0") "DIFF_OR_ZERO" ("# #' \\-> #''
  576. " "If #' is greater than #, returns #0,
  577. otherwise returns #-#'.
  578. " "2F13D" :UBS) "#1-" ("# \\-> #-1
  579. " "" "03E0E") "#2-" ("# \\-> #-2
  580. " "" "03E4E") "#3-" ("# \\-> #-3
  581. " "" "355DF") "#4-" ("# \\-> #-4
  582. " "" "355DA") "#5-" ("# \\-> #-5
  583. " "" "355D5") "#6-" ("# \\-> #-6
  584. " "" "355D0") "#7-" ("# \\-> #-7
  585. " "" "355CB" :UBS) "#8-" ("# \\-> #-8
  586. " "" "355C6" :UBS) "#9-" ("# \\-> #-9
  587. " "" "355C1" :UBS) "#*" ("# #' \\-> #*#'
  588. " "" "03EC2") "#*OVF" ("# #' \\-> #*#'
  589. " "0 \\<= result \\<= FFFFF
  590. " "2632D") "#2*" ("# \\-> #*2
  591. " "" "03E6F") "#3*" ("# \\-> #*2
  592. " "" "270DA") "#5*" ("# \\-> #*2
  593. " "" "270BF") "#6*" ("# \\-> #*6
  594. " "" "356B8") "#8*" ("# \\-> #*8
  595. " "" "3569B") "#10*" ("# \\-> #*10
  596. " "" "35675") "#/" ("# #' \\-> #r #q
  597. " "" "03EF7") "#2/" ("# \\-> #/2
  598. " "Rounded down.
  599. " "03E8E") "#-+1" ("# #' \\-> #-#'+1
  600. " "" "36815") "#1--" ("# #' \\-> #-#'+1
  601. " "" "36815") "$1-+" ("# #' \\-> #+#'-1
  602. " "$1-+ is a typo in EXTABLE.
  603. " "36851") "#+-1" ("# #' \\-> #+#'-1
  604. " "$1-+ is a typo in EXTABLE.
  605. " "36851") "#1-+" ("# #' \\-> #+#'-1
  606. " "$1-+ is a typo in EXTABLE.
  607. " "36851") "#-#2/" ("# #' \\-> (#-#')/2
  608. " "" "35552") "#+DUP" ("# #' \\-> #+#' #+#'
  609. " "" "357FC") "#+SWAP" ("ob # #' \\-> #+#' ob
  610. " "" "35E39") "#+OVER" ("ob # #' \\-> ob #+#' ob
  611. " "" "36093") "#-DUP" ("# #' \\-> #-#' #-#'
  612. " "" "3581F") "#-SWAP" ("ob # #' \\-> #-#' ob
  613. " "" "35E4D") "#-OVER" ("ob # #' \\-> ob #-#' ob
  614. " "" "360A7") "#1+DUP" ("# \\-> #+1 #+1
  615. " "" "35830") "#1+SWAP" ("ob # \\-> #+1 ob
  616. " "" "35E61") "#1+ROT" ("ob ob' # \\-> ob' #+1 ob
  617. " "" "2F222") "#1-DUP" ("# \\-> #-1 #-1
  618. " "" "35841") "pull" ("ob # \\-> #-1 ob
  619. " "" "28071") "#1-SWAP" ("ob # \\-> #-1 ob
  620. " "" "28071") "#1-ROT" ("ob ob' # \\-> ob' #-1 ob
  621. " "" "3601B") "#1-UNROT" ("ob ob' # \\-> #-1 ob ob'
  622. " "" "281D5") "#1-1SWAP" ("# \\-> 1 #-1
  623. " "Returns the bint ONE and the result.
  624. " "35E89") "DUP#1+" ("# \\-> # #+1
  625. " "" "35912") "DUP#2+" ("# \\-> # #+2
  626. " "" "3571E") "DUP#1-" ("# \\-> # #-1
  627. " "" "35956") "DUP3PICK#+" ("# #' \\-> # #' #+#'
  628. " "" "3674D") "2DUP#+" ("# #' \\-> # #' #+#'
  629. " "" "3674D") "DROP#1-" ("# ob \\-> #-1
  630. " "" "3683D") "SWAP#-" ("# #' \\-> #'-#
  631. " "" "357BB") "SWP1+" ("# ob \\-> ob #+1
  632. " "" "3592B") "SWAP#1+" ("# ob \\-> ob #+1
  633. " "" "3592B") "'RSWP1+" ("# \\-> nob #+1
  634. " "nob is the next object in the runstream.
  635. " "29786" :UBS) "SWAP#1+SWAP" ("# ob \\-> #+1 ob
  636. " "" "28099") "SWAP#1-" ("# ob \\-> ob #-1
  637. " "" "36829") "SWAP#1-SWAP" ("# ob \\-> #-1 ob
  638. " "" "280AD") "SWAPDROP#1-" ("ob # \\-> #-1
  639. " "" "28989" :UBS) "SWAPOVER#-" ("# #' \\-> #' #-#'
  640. " "" "367ED") "OVER#+" ("# #' \\-> # #'+#
  641. " "" "36775") "OVER#-" ("# #' \\-> # #'-#
  642. " "" "367C5") "OVER#1-" ("# #' \\-> # #' #''
  643. " "" "28286" :UBS) "ROT#+" ("# ob #' \\-> ob #'+#
  644. " "" "36761") "ROT#-" ("# ob #' \\-> ob #'-#
  645. " "" "367B1") "ROT#1+" ("# ob ob' \\-> ob ob' #+1
  646. " "" "36801") "ROT#1+UNROT" ("# ob ob' \\-> #+1 ob ob'
  647. " "" "28001") "ROT+SWAP" ("# ob #' \\-> #'+# ob
  648. " "" "35E07") "ROT#+SWAP" ("# ob #' \\-> #'+# ob
  649. " "" "35E07") "3PICK#+" ("# ob #' \\-> # ob #'+#
  650. " "" "36789") "3PICK#1+" ("# ob ob' \\-> # ob ob' #'
  651. " "" "28804" :UBS) "3PICK#2+" ("# ob ob' \\-> # ob ob' #'
  652. " "" "287E6" :UBS) "4PICK#+" ("# ob1 ob2 #' \\-> # ob1 ob2 #'+#
  653. " "" "3679D") "4PICK+SWAP" ("# ob1 ob2 #' \\-> # ob1 #'+# ob2
  654. " "" "35E20") "4PICK#+SWAP" ("# ob1 ob2 #' \\-> # ob1 #'+# ob2
  655. " "" "35E20") "#MIN" ("# #' \\-> #''
  656. " "" "35511") "#MAX" ("# #' \\-> #''
  657. " "" "3551D") "#AND" ("# #' \\-> #''
  658. " "Bitwise QANDQ.
  659. " "03EB1") "#=" ("# #' \\-> flag
  660. " "" "03D19") "#<>" ("# #' \\-> flag
  661. " "" "03D4E") "#<" ("# #' \\-> flag
  662. " "" "03CE4") "#<=" ("# #' \\-> flag
  663. " "" "37466" :UBS) "#>" ("# #' \\-> flag
  664. " "" "03D83") "#>=" ("# #' \\-> flag
  665. " "" "3747D" :UBS) "#0<>" ("# \\-> flag
  666. " "" "03CC7") "#0=" ("# \\-> flag
  667. " "" "03CA6") "#1<>" ("# \\-> flag
  668. " "" "3530D") "#1=" ("# \\-> flag
  669. " "" "352FE") "#2<>" ("# \\-> flag
  670. " "" "36711") "#2=" ("# \\-> flag
  671. " "" "352F1") "#3=" ("# \\-> flag
  672. " "" "352E0") "#5=" ("# \\-> flag
  673. " "" "366FD") "#<3" ("# \\-> flag
  674. " "" "366BC") "ONE#>" ("# \\-> flag
  675. " "" "36739") "#>1" ("# \\-> flag
  676. " "" "36739") "2DUP#<" ("# #' \\-> # #' flag
  677. " "" "358C2") "2DUP#>" ("# #' \\-> # #' flag
  678. " "" "358F8") "ONE_EQ" ("# \\-> flag
  679. " "Uses EQ test.
  680. " "363CE") "OVER#=" ("# #' \\-> # flag
  681. " "" "35268") "2DUP#=" ("# #' \\-> # #' flag
  682. " "" "358DC") "OVER#0=" ("# #' \\-> # #' flag
  683. " "" "36694") "DUP#0=" ("# \\-> # flag
  684. " "" "352BD") "OVER#<" ("# #' \\-> # flag
  685. " "" "366A8") "DUP#1=" ("# \\-> # flag
  686. " "" "3531C") "OVER#>" ("# #' \\-> # flag
  687. " "" "36725") "DUP#0<>" ("# \\-> # flag
  688. " "" "3532B") "DUP#<7" ("# \\-> # flag
  689. " "Returns TRUE if the argument is smaller than
  690. #7.
  691. " "366D0") "2#0=OR" ("# # \\-> flag
  692. " "Returns TRUE if either argument is zero.
  693. " "36676") "%-MAXREAL" ("-9.99E499
  694. " "" "2FB0A") "%-260" ("-260
  695. " "" "30B24" :UBS) "%-9" ("-9
  696. " "" "2FAB1") "%-8" ("-8
  697. " "" "2FA9C") "%-7" ("-7
  698. " "" "2FA87") "%-6" ("-6
  699. " "" "2FA72") "%-5" ("-5
  700. " "" "2FA5D") "%-4" ("-4
  701. " "" "2FA48") "%-3" ("-3
  702. " "" "2FA33") "%-2" ("-2
  703. " "" "2FA1E") "%-1" ("-1
  704. " "" "2FA09") "%-MINREAL" ("-1E-499
  705. " "" "2FB34") "%0" ("0
  706. " "" "2F937") "%MINREAL" ("1E-499
  707. " "" "2FB1F") "%.05" (".05
  708. " "" "2FF71" :UBS) "%.1" (".1
  709. " "" "27118") "%.15" (".15
  710. " "" "2712D" :UBS) "%.2776" (".2776
  711. " "" "2FF47" :UBS) "%.2887" (".2887
  712. " "" "2FF1D" :UBS) "%.2943" (".2943
  713. " "" "2FF5C" :UBS) "%.461368" (".461368
  714. " "" "2FEF3" :UBS) "%.522851" (".522851
  715. " "" "2FF32" :UBS) "%.5" (".5
  716. " "" "339BE") "%-.5" ("-.5
  717. " "" "339D3" :UBS) "%.99" (".99
  718. " "" "2FF86" :UBS) "%1" ("1
  719. " "" "2F94C") "%1.8" ("1.8
  720. " "" "270EE" :UBS) "%2" ("2
  721. " "" "2F961") "%e" ("e
  722. " "" "339A9") "%3" ("3
  723. " "" "2F976") "%PI" ("\\pi
  724. " "" "2FAC6") "%4" ("4
  725. " "" "2F98B") "%5" ("5
  726. " "" "2F9A0") "%6" ("6
  727. " "" "2F9B5") "%7" ("7
  728. " "" "2F9CA") "%8" ("8
  729. " "" "2F9DF") "%9" ("9
  730. " "" "2F9F4") "%10" ("10
  731. " "" "339E8") "%11" ("11
  732. " "" "2FCE6") "%12" ("12
  733. " "" "2FCFB") "%13" ("13
  734. " "" "2FD10") "%14" ("14
  735. " "" "2FD25") "%15" ("15
  736. " "" "2FD3A") "%16" ("16
  737. " "" "2FD4F") "%17" ("17
  738. " "" "2FD64") "%18" ("18
  739. " "" "2FD79") "%19" ("19
  740. " "" "2FD8E") "%20" ("20
  741. " "" "2FDA3") "%21" ("21
  742. " "" "2FDB8") "%22" ("22
  743. " "" "2FDCD") "%23" ("23
  744. " "" "2FDE2") "%24" ("24
  745. " "" "2FDF7") "%25" ("25
  746. " "" "2FE0C") "%26" ("26
  747. " "" "2FE21") "%27" ("27
  748. " "" "2FE36") "%28" ("28
  749. " "" "2FE4B" :UBS) "%29" ("29
  750. " "" "2FE60" :UBS) "%30" ("30
  751. " "" "2FE75" :UBS) "%31" ("31
  752. " "" "2FE8A" :UBS) "%32" ("32
  753. " "" "2FE9F" :UBS) "%33" ("33
  754. " "" "2FEB4" :UBS) "%34" ("34
  755. " "" "2FEC9" :UBS) "%35" ("35
  756. " "" "2FEDE" :UBS) "%50" ("50
  757. " "" "2FF08" :UBS) "%80" ("80
  758. " "" "27103") "%100" ("100
  759. " "" "27E5D") "%180" ("180
  760. " "" "339FD") "%200" ("200
  761. " "" "33A12" :UBS) "%400" ("400
  762. " "" "33A3C" :UBS) "%360" ("360
  763. " "" "33A27") "%1200" ("1200
  764. " "" "2FC7D" :UBS) "%2400" ("2400
  765. " "" "2FC92" :UBS) "%4800" ("4800
  766. " "" "2FCA7" :UBS) "~%TICKSsec" ("8192
  767. " "" "0CF0B5" :UBS) "%9600" ("9600
  768. " "" "2FCBC" :UBS) "%14400" ("14400
  769. " "" "26DF7" :UBS :1\.22) "%15360" ("15360
  770. " "" "2FCD1" :UBS) "%15396" ("15396
  771. " "" "2FCD1" :UBS) "%38400" ("38400
  772. " "" "26E21" :UBS :1\.22) "%57600" ("57600
  773. " "" "26E36" :UBS :1\.22) "%115200" ("115200
  774. " "" "26E4B" :UBS :1\.22) "~%TICKSmin" ("491520
  775. " "" "0CD0B5" :UBS) "~%HrTicks" ("29491200
  776. " "" "0CB0B5" :UBS) "~%TICKSweek" ("4954521600
  777. " "" "0C70B5" :UBS) "%MAXREAL" ("9.99E499
  778. " "" "2FAF5") "1REV" ("\\-> 6.28318530718
  779. \\-> 360.
  780. \\-> 400.
  781. " "Returns the angle of a full circle,
  782. corresponding to the current angular mode.
  783. " "2F180") "%%0" ("0
  784. " "" "2FB49") "%%.1" ("0.1
  785. " "" "2FBE5") "%%.4" ("0.4
  786. " "" "30DC8") "%%.5" ("0.5
  787. " "" "2FBFF") "cfF" ("0.555...
  788. " "%%5/9 for C\\<>F conversion.
  789. " "2DA11") "%%1" ("1
  790. " "" "2FB63") "cfC" ("1
  791. " "For C\\<>K conversion.
  792. " "2DA2B") "%%2" ("2
  793. " "" "2FB7D") "%%3" ("3
  794. " "" "2FB97") "%%PI" ("\\pi
  795. " "" "2FADB") "PI/180" ("\\pi/180
  796. " "" "30017") "%%4" ("4
  797. " "" "2FBB1") "%%5" ("5
  798. " "" "2FBCB") "%%2PI" ("2\\pi
  799. " "" "27A89") "%%7" ("7
  800. " "" "30BEA") "%%10" ("10
  801. " "" "2FC19") "%%12" ("12
  802. " "" "30CC7") "%%60" ("60
  803. " "" "30CEB") "DROP%0" ("ob \\-> %0
  804. " "" "282CC" :UBS) "2DROP%0" ("ob ob' \\-> %0
  805. " "" "2C4AA" :UBS) "%>%%" ("% \\-> %%
  806. " "" "2FFAC") "%>%%SWAP" ("ob % \\-> %% ob
  807. " "" "35ECA") "%%>%" ("%% \\-> %
  808. " "" "2FF9B") "2%>%%" ("% % \\-> %% %%
  809. " "" "30E47") "2%%>%" ("%% %%' \\-> % %'
  810. " "" "30E5B") "UNCOERCE" ("# \\-> %
  811. " "" "262F6") "UNCOERCE2" ("# # \\-> % %
  812. " "" "3F495") "UNCOERCE%%" ("# \\-> %%
  813. " "" "36BFA") "HXS>%" ("hxs \\-> %
  814. " "" "2EFCA") "C%>%" ("C% \\-> %re %im
  815. " "" "05D2C") "%IP>#" ("% \\-> #IP(ABS(%))
  816. " "Does ABS too.
  817. " "2B3FD") "^Z>R" ("Z \\-> %
  818. " "Converts zint to real.
  819. " "0F6006" :wasCSys) "^Z2%%" ("Z \\-> %%
  820. " "Converts integer to long real.
  821. " "18A006" :wasCSys) "^OBJ2REAL" ("z/% \\-> %
  822. " "Transforms ob in real.
  823. " "197006" :wasCSys) "%+" ("% %' \\-> %+%'
  824. " "" "3035F") "%+SWAP" ("ob % %' \\-> %+%' ob
  825. " "" "25E69") "%1+" ("% \\-> %+1
  826. " "" "26F36") "%-" ("% %' \\-> %-%'
  827. " "" "3036C") "%1-" ("% \\-> %-1
  828. " "" "26F4A") "%>%%-" ("% %' \\-> %%-%%'
  829. " "" "30346") "%*" ("% %' \\-> %*%'
  830. " "" "303A7") "%10*" ("% \\-> %*10
  831. " "" "35C18") "%/" ("% %' \\-> %/%'
  832. " "" "303E9") "%^" ("% %' \\-> %^%'
  833. " "" "3045B") "%ABS" ("% \\-> %'
  834. " "" "302EB") "DUP%ABS" ("% \\-> % %'
  835. " "" "2C53B" :UBS) "%CHS" ("% \\-> -%
  836. " "" "3030B") "%SGN" ("% \\-> -1/0/1
  837. " "" "302C2") "%1/" ("% \\-> 1/%
  838. " "" "3049A") "%>%%1/" ("% \\-> 1/%%
  839. " "" "30489") "%SQRT" ("% \\-> \\v/%
  840. " "" "304F4") "%2root" ("% \\-> \\v/%
  841. \\-> C%
  842. " "Computes square root of real, returns a
  843. complex number for negative arguments.
  844. " "3A4BE" :UBS) "%>%%SQRT" ("% \\-> \\v/%%
  845. " "" "304E1") "%SQ" ("% \\-> %'
  846. " "" "3A54B" :UBS) "%EXP" ("% \\-> e^%
  847. " "" "3051A") "%EXPM1" ("% \\-> e^%-1
  848. " "" "3052D") "%LN" ("% \\-> LN%
  849. " "" "30559") "%LNP1" ("% \\-> LN(%+1)
  850. " "" "30592") "%LOG" ("% \\-> LOG%
  851. " "" "3056C") "%ALOG" ("% \\-> 10^%
  852. " "" "305A5") "%SIN" ("% \\-> SIN%
  853. " "" "305DA") "%COS" ("% \\-> COS%
  854. " "" "3062B") "%TAN" ("% \\-> TAN%
  855. " "" "3067C") "%ASIN" ("% \\-> ASIN%
  856. " "" "306AC") "%ACOS" ("% \\-> ACOS%
  857. " "" "306DC") "%ATAN" ("% \\-> ATAN%
  858. " "" "3070C") "%SINH" ("% \\-> SINH%
  859. " "" "30799") "%COSH" ("% \\-> COSH%
  860. " "" "307C5") "%TANH" ("% \\-> TANH%
  861. " "" "307D8") "%ASINH" ("% \\-> ASINH%
  862. " "" "307EB") "%ACOSH" ("% \\-> ACOSH%
  863. " "" "307FE") "%ATANH" ("% \\-> ATANH%
  864. " "" "30811") "%MANTISSA" ("% \\-> %mant
  865. " "" "3031B") "%EXPONENT" ("% \\-> %expn
  866. " "" "30824") "%FP" ("% \\-> %frac
  867. " "" "30938") "%IP" ("% \\-> %int
  868. " "" "3094B") "%FLOOR" ("% \\-> %maxint <=%
  869. " "" "30971") "%CEIL" ("% \\-> %minint >=%
  870. " "" "3095E") "%MOD" ("% %' \\-> %rem
  871. " "" "305C7") "%ANGLE" ("%x %y \\-> %ang
  872. " "" "30723") "%0%ANGLE" ("%x \\-> %ang
  873. " "%ANGLE with y=0;
  874. " "3A3D1" :UBS) "%>%%ANGLE" ("%x %y \\-> %%ang
  875. " "" "30746") "RNDXY" ("% %places \\-> %'
  876. " "" "30F14") "TRCXY" ("% %places \\-> %'
  877. " "" "30F28") "%COMB" ("% %' \\-> COMB(%,%')
  878. " "" "3084D") "%PERM" ("% %' \\-> PERM(%,%')
  879. " "" "30860") "%NFACT" ("% \\-> %!
  880. " "Calculates factorial of number.
  881. " "30837") "%FACT" ("% \\-> gamma(%+1)
  882. " "Calculates gamma(x+1).
  883. " "30AAF") "%NROOT" ("% %n \\-> %'
  884. " "Calculates the %nth root of the real
  885. number. Equivalent to user function XROOT.
  886. " "3046C") "SWAP%NROOT" ("%n % \\-> %'
  887. " "Calculates the %nth root of the real
  888. number. Equivalent to user function XROOT.
  889. " "3A30E") "%MIN" ("% %' \\-> %lesser
  890. " "" "300F9") "%MAX" ("% %' \\-> %greater
  891. " "" "300E0") "%MAXorder" ("% %' \\-> %max %min
  892. " "" "35DBC") "%RAN" ("\\-> %random
  893. " "Returns next random number.
  894. " "309AD") "%RANDOMIZE" ("%seed \\->
  895. " "System level RDZ: seeds the random number
  896. generator.
  897. " "30A2F") "DORANDOMIZE" ("% \\->
  898. " "Stores given number as random number seed.
  899. " "30A66") "%OF" ("% %' \\-> %'/% * 100
  900. " "" "303B4") "%T" ("% %' \\-> %pctotal
  901. " "" "303F6") "%CH" ("% %' \\-> %pcchange
  902. " "" "3041B") "%D>R" ("%deg \\-> %rad
  903. " "" "3000D") "%R>D" ("%rad \\-> %deg
  904. " "" "30040") "%REC>%POL" ("%r %ang \\-> %x %y
  905. " "" "30E79") "%POL>%REC" ("%x %y \\-> %r %ang
  906. " "" "30EA6") "%SPH>%REC" ("%r %ang %ph \\-> %x %y %z
  907. " "" "30EDD") "%%+" ("%% %%' \\-> %%+%%'
  908. " "" "3032E") "%%1+" ("%% \\-> %%'
  909. " "" "27012" :UBS) "%%-" ("%% %%' \\-> %%-%%'
  910. " "" "3033A") "%%*" ("%% %%' \\-> %%*%%'
  911. " "" "30385") "%%*ROT" ("ob ob' %% %%' \\-> ob' %%+%%' ob
  912. " "" "3602F") "%%*SWAP" ("ob %% %%' \\-> %%+%%' ob
  913. " "" "35EDE") "%%*UNROT" ("ob ob' %% %%' \\-> %%+%%' ob ob'
  914. " "" "36C7C") "%%/" ("%% %%' \\-> %%/%%'
  915. " "" "303D3") "SWAP%%/" ("%% %%' \\-> %%''
  916. " "" "36C22") "%%/>%" ("%% %%' \\-> %
  917. " "" "36BE6") "%%^" ("%% %%' \\-> %%^%%'
  918. " "" "3044A") "^CK%%SQRT" ("%% \\-> %%/C%%
  919. " "" "51D006" :wasCSys) "%%SINRAD" ("%% \\-> %%'
  920. " "" "30612") "%%ANGLERAD" ("%% \\-> %%'
  921. " "" "30767") "%%ABS" ("%% \\-> %%abs
  922. " "" "302DB") "%%ACOSRAD" ("%% \\-> %%rad
  923. " "" "306F3") "%%ANGLE" ("%%x %%y \\-> %%ang
  924. " "" "3073A") "%%ANGLEDEG" ("%%x %%y \\-> %%deg
  925. " "" "30757") "%%ASINRAD" ("%% \\-> %%rad
  926. " "" "306C3") "%%CHS" ("%% \\-> -%%
  927. " "" "302FB") "%%1/" ("%% \\-> 1/%%
  928. " "" "3047D") "%%COS" ("%% \\-> %%cos
  929. " "" "30642") "%%COSDEG" ("%%deg \\-> %%cos
  930. " "" "30653") "%%COSH" ("%% \\-> %%cosh
  931. " "" "307B2") "%%COSRAD" ("%%rad \\-> %%cos
  932. " "" "30663") "%%EXP" ("%% \\-> e^%%
  933. " "" "30507") "%%LN" ("%% \\-> ln %%
  934. " "" "30546") "%%INT" ("%% \\-> %%maxint
  935. " "" "30984") "%%FLOOR" ("%% \\-> %%maxint
  936. " "" "30984") "%%LNP1" ("%% \\-> %%ln(%%+1)
  937. " "" "3057F") "%%MAX" ("%% %%' \\-> %%max
  938. " "" "300C7") "%%R>P" ("%%x %%y \\-> %%radius %%angle
  939. " "" "30E83") "%%P>R" ("%%r %%ang \\-> %%x %%y
  940. " "" "30EB0") "%%SIN" ("%% \\-> %%sin
  941. " "" "305F1") "%%SINDEG" ("%%deg \\-> %%sin
  942. " "" "30602") "%%SINH" ("%% \\-> %%sinh
  943. " "" "30780") "%%SQRT" ("%% \\-> \\v/%%
  944. " "" "304D5") "%%TANRAD" ("%%rad \\-> %%tan
  945. " "" "30693") "%%TANDEG" ("%%deg \\-> %%tan
  946. " "" "2D817" :UBS) "%=" ("% %' \\-> flag
  947. " "" "302AC") "%<>" ("% %' \\-> flag
  948. " "" "302B7") "%<" ("% %' \\-> flag
  949. " "" "3025C") "%<=" ("% %' \\-> flag
  950. " "" "302A1") "%>" ("% %' \\-> flag
  951. " "" "30275") "%>=" ("% %' \\-> flag
  952. " "" "3028B") "XEQAND" ("% %' \\-> flag
  953. " "Logical QANDQ for real numbers.
  954. " "3CA61" :UBS) "XEQOR" ("% %' \\-> flag
  955. " "Logical QORQ for real numbers.
  956. " "3CAE7" :UBS) "XEQNOT" ("% \\-> flag
  957. " "Logical QNOTQ for real numbers.
  958. " "3CB5D" :UBS) "XEQXOR" ("% %' \\-> flag
  959. " "Logical QXORQ for real numbers.
  960. " "3CBCA" :UBS) "%0=" ("% \\-> flag
  961. " "" "30156") "DUP%0=" ("% \\-> flag
  962. " "" "36C0E") "%0<>" ("% \\-> flag
  963. " "Can be used to change a user flag into a
  964. system flag.
  965. " "301BA") "%0<" ("% \\-> flag
  966. " "" "30123") "%0>" ("% \\-> flag
  967. " "" "30184") "%0>=" ("% \\-> flag
  968. " "" "301E2") "%%<" ("%% %%' \\-> flag
  969. " "" "3020A") "%%<=" ("%% %%' \\-> falg
  970. " "" "30296") "%%>" ("%% %%' \\-> flag
  971. " "" "3026A") "%%>=" ("%% %%' \\-> flag
  972. " "" "30280") "%%0=" ("%% \\-> flag
  973. " "" "30145") "DUP%%0=" ("%% \\-> %% flag
  974. " "" "2708A" :UBS) "%%0<>" ("%% \\-> flag
  975. " "" "301A6") "%%0<" ("%% \\-> flag
  976. " "" "30112") "%%0<=" ("%% \\-> flag
  977. " "" "301F6") "%%0>" ("%% \\-> flag
  978. " "" "30173") "%%0>=" ("%% \\-> flag
  979. " "" "301CE") "C%0" ("(0,0)
  980. " "" "27DE4") "C%1" ("(1,0)
  981. " "" "27E09") "C%-1" ("(-1,0)
  982. " "" "27DBF") "C%%1" ("(Q%%1,%%0Q)
  983. " "" "27E2E") "C%%>C%" ("C%% \\-> C%
  984. " "" "261D9") "%>C%" ("%re %im \\-> C%
  985. " "" "05C27") "SWAP%>C%" ("%im %re \\-> C%
  986. " "" "362F2") "Re>C%" ("%re \\-> C%
  987. " "" "261FC") "C>Re%" ("C% \\-> %re
  988. " "" "25E9C") "C>Im%" ("C% \\-> %im
  989. " "" "25E9B") "^E%%>C%%" ("%%re %%im \\-> C%%
  990. " "Converts long reals to long complex.
  991. " "18C006" :wasCSys) "%%>C%" ("%%re %%im \\-> C%
  992. " "" "261CF") "C%>%%" ("C% \\-> %%re %%im
  993. " "" "25E82") "C%>%%SWAP" ("C% \\-> %%im %%re
  994. " "" "25E83") "C%%>%%" ("C%% \\-> %%re %%im
  995. " "" "05DBC") "^C2C%%" ("C \\-> C%%
  996. " "Converts Gaussian integer to long complex.
  997. " "188006" :wasCSys) "^ZZ2C%%ext" ("Zre Zim \\-> C%%
  998. " "Converts Gaussian integer to long complex.
  999. " "189006" :wasCSys) "^C%>C%%" ("C% \\-> C%%
  1000. " "Converts complex to long complex.
  1001. " "18B006" :wasCSys) "^RIXCext" ("Zre Zim \\-> C
  1002. " "Convert integers to complex.
  1003. " "15E006" :wasCSys) "^IRXCext" ("Zim Zre \\-> C
  1004. " "Convert integers to complex.
  1005. " "15F006" :wasCSys) "^IRXC2" ("
  1006. " "" "160006" :wasCSys) "C%C^C" ("C% C%' \\-> C%''
  1007. " "" "25E8F") "C%C^R" ("C% % \\-> C%'
  1008. " "" "25E90") "C%R^C" ("% C% \\-> C%'
  1009. " "" "25E94") "C%ABS" ("C% \\-> %
  1010. " "" "25E84") "^CZABS" ("C% \\-> %
  1011. " "Absolute value.
  1012. " "50C006" :wasCSys) "C%CHS" ("C% \\-> -C%
  1013. " "" "261ED") "C%1/" ("C% \\-> 1/C%
  1014. " "" "25E81") "C%SQRT" ("C% \\-> \\v/C%
  1015. " "" "25E98") "C%C*C" ("C% \\-> C%^2
  1016. " "" "10293" :UBS) "C%SGN" ("C% \\-> C%/C%ABS
  1017. " "" "25E95") "C%CONJ" ("C% \\-> C%'
  1018. " "" "261F2") "C%ARG" ("C% \\-> %
  1019. " "" "25E88") "C%EXP" ("C% \\-> e^C%
  1020. " "" "25E91") "C%LN" ("C% \\-> ln C%
  1021. " "" "25E92") "C%LOG" ("C% \\-> log C%
  1022. " "" "25E93") "C%ALOG" ("C% \\-> 10^C%
  1023. " "" "25E87") "C%SIN" ("C% \\-> sin C%
  1024. " "" "25E96") "C%COS" ("C% \\-> cos C%
  1025. " "" "25E8D") "C%TAN" ("C% \\-> tan C%
  1026. " "" "25E99") "C%ASIN" ("C% \\-> asin C%
  1027. " "" "25E89") "C%ACOS" ("C% \\-> acos C%
  1028. " "" "25E85") "C%ATAN" ("C% \\-> atan C%
  1029. " "" "25E8B") "C%SINH" ("C% \\-> sinh C%
  1030. " "" "25E97") "C%COSH" ("C% \\-> cosh C%
  1031. " "" "25E8E") "C%TANH" ("C% \\-> tanh C%
  1032. " "" "25E9A") "C%ASINH" ("C% \\-> asinh C%
  1033. " "" "25E8A") "C%ACOSH" ("C% \\-> acosh C%
  1034. " "" "25E86") "C%ATANH" ("C% \\-> atanh C%
  1035. " "" "25E8C") "%%>C%%" ("%%re %%im \\-> C%%
  1036. " "" "05C72" :UBS) "C%%CHS" ("C%% \\-> -C%%
  1037. " "" "261DE") "C%%CONJ" ("C%% \\-> C%%'
  1038. " "" "261E3") "^ARG2" ("im re \\-> arg(ob)
  1039. " "ARG.
  1040. " "515006" :wasCSys) "^INTERNALARG2" ("
  1041. " "" "516006" :wasCSys) "^QUADRANT" ("re im ?re>0 ?im>0 \\-> newre newim Z
  1042. " "Returns Z0 Z1 Z-2 or Z-1 so that arg of
  1043. corresponding complex number is Z * \\pi/2 +
  1044. theta where \\Gh is in the interval
  1045. [0,\\pi/2]. The arguments on level 1 and 2
  1046. are flags.
  1047. " "517006" :wasCSys) "^C%%SQRT" ("C%% \\-> C%%'
  1048. " "" "51E006" :wasCSys) "C%0=" ("C% \\-> flag
  1049. " "" "261E8") "C%%0=" ("C%% \\-> flag
  1050. " "" "261D4") "CHR_00" ("'\\00', CHR 0d 00h
  1051. " "The NULL character.
  1052. " "33D2B" :NOSDIAG) "CHR_Newline" ("'\\0a', CHR 10d 0Ah
  1053. " "" "33F77" :NOSDIAG) "CHR_..." ("'...', CHR 31d 1Fh
  1054. " "" "33D32" :NOSDIAG) "CHR_Space" ("'\\ ', CHR 32d 20h
  1055. " "The space character.
  1056. " "33F93" :NOSDIAG) "CHR_DblQuote" ("'\"', CHR 34d 22h
  1057. " "" "33D39" :NOSDIAG) "CHR_#" ("'#', CHR 35d 23h
  1058. " "" "33D40" :NOSDIAG) "CHR_LeftPar" ("'(', CHR 40d 28h
  1059. " "" "33F70" :NOSDIAG) "CHR_RightPar" ("')', CHR 41d 29h
  1060. " "" "33F85" :NOSDIAG) "CHR_*" ("'*', CHR 42d 2Ah
  1061. " "" "33D47" :NOSDIAG) "CHR_+" ("'+', CHR 43d 2Bh
  1062. " "" "33D4E" :NOSDIAG) "CHR_," ("',', CHR 44d 2Ch
  1063. " "" "33D55" :NOSDIAG) "CHR_-" ("'-', CHR 45d 2Dh
  1064. " "" "33D5C" :NOSDIAG) "CHR_." ("'.', CHR 46d 2Eh
  1065. " "" "33D63" :NOSDIAG) "CHR_/" ("'/', CHR 47d 2Fh
  1066. " "" "33D6A" :NOSDIAG) "CHR_0" ("'0', CHR 48d 30h
  1067. " "" "33D71" :NOSDIAG) "CHR_1" ("'1', CHR 49d 31h
  1068. " "" "33D78" :NOSDIAG) "CHR_2" ("'2', CHR 50d 32h
  1069. " "" "33D7F" :NOSDIAG) "CHR_3" ("'3', CHR 51d 33h
  1070. " "" "33D86" :NOSDIAG) "CHR_4" ("'4', CHR 52d 34h
  1071. " "" "33D8D" :NOSDIAG) "CHR_5" ("'5', CHR 53d 35h
  1072. " "" "33D94" :NOSDIAG) "CHR_6" ("'6', CHR 54d 36h
  1073. " "" "33D9B" :NOSDIAG) "CHR_7" ("'7', CHR 55d 37h
  1074. " "" "33DA2" :NOSDIAG) "CHR_8" ("'8', CHR 56d 38h
  1075. " "" "33DA9" :NOSDIAG) "CHR_9" ("'9', CHR 57d 39h
  1076. " "" "33DB0" :NOSDIAG) "CHR_:" ("':', CHR 58d 3Ah
  1077. " "" "33DB7" :NOSDIAG) "CHR_;" ("';', CHR 59d 3Bh
  1078. " "" "33DBE" :NOSDIAG) "CHR_<" ("'<', CHR 60d 3Ch
  1079. " "" "33DC5" :NOSDIAG) "CHR_=" ("'=', CHR 61d 3Dh
  1080. " "" "33DCC" :NOSDIAG) "CHR_>" ("'>', CHR 62d 3Eh
  1081. " "" "33DD3" :NOSDIAG) "CHR_A" ("'A', CHR 65d 41h
  1082. " "" "33DDA" :NOSDIAG) "CHR_B" ("'B', CHR 66d 42h
  1083. " "" "33DE1" :NOSDIAG) "CHR_C" ("'C', CHR 67d 43h
  1084. " "" "33DE8" :NOSDIAG) "CHR_D" ("'D', CHR 68d 44h
  1085. " "" "33DEF" :NOSDIAG) "CHR_E" ("'E', CHR 69d 45h
  1086. " "" "33DF6" :NOSDIAG) "CHR_F" ("'F', CHR 70d 46h
  1087. " "" "33DFD" :NOSDIAG) "CHR_G" ("'G', CHR 71d 47h
  1088. " "" "33E04" :NOSDIAG) "CHR_H" ("'H', CHR 72d 48h
  1089. " "" "33E0B" :NOSDIAG) "CHR_I" ("'I', CHR 73d 49h
  1090. " "" "33E12" :NOSDIAG) "CHR_J" ("'J', CHR 74d 4Ah
  1091. " "" "33E19" :NOSDIAG) "CHR_K" ("'K', CHR 75d 4Bh
  1092. " "" "33E20" :NOSDIAG) "CHR_L" ("'L', CHR 76d 4Ch
  1093. " "" "33E27" :NOSDIAG) "CHR_M" ("'M', CHR 77d 4Dh
  1094. " "" "33E2E" :NOSDIAG) "CHR_N" ("'N', CHR 78d 4Eh
  1095. " "" "33E35" :NOSDIAG) "CHR_O" ("'O', CHR 79d 4Fh
  1096. " "" "33E3C" :NOSDIAG) "CHR_P" ("'P', CHR 80d 50h
  1097. " "" "33E43" :NOSDIAG) "CHR_Q" ("'Q', CHR 81d 51h
  1098. " "" "33E4A" :NOSDIAG) "CHR_R" ("'R', CHR 82d 52h
  1099. " "" "33E51" :NOSDIAG) "CHR_S" ("'S', CHR 83d 53h
  1100. " "" "33E58" :NOSDIAG) "CHR_T" ("'T', CHR 84d 54h
  1101. " "" "33E5F" :NOSDIAG) "CHR_U" ("'U', CHR 85d 55h
  1102. " "" "33E66" :NOSDIAG) "CHR_V" ("'V', CHR 86d 56h
  1103. " "" "33E6D" :NOSDIAG) "CHR_W" ("'W', CHR 87d 57h
  1104. " "" "33E74" :NOSDIAG) "CHR_X" ("'X', CHR 88d 58h
  1105. " "" "33E7B" :NOSDIAG) "CHR_Y" ("'Y', CHR 89d 59h
  1106. " "" "33E82" :NOSDIAG) "CHR_Z" ("'Z', CHR 90d 5Ah
  1107. " "" "33E89" :NOSDIAG) "CHR_[" ("'[', CHR 91d 5Bh
  1108. " "" "33FA1" :NOSDIAG) "CHR_]" ("']', CHR 93d 5Dh
  1109. " "" "33FA8" :NOSDIAG) "CHR_UndScore" ("'_', CHR 95d 5Fh
  1110. " "" "33F9A" :NOSDIAG) "CHR_a" ("'a', CHR 97d 61h
  1111. " "" "33E90" :NOSDIAG) "CHR_b" ("'b', CHR 98d 62h
  1112. " "" "33E97" :NOSDIAG) "CHR_c" ("'c', CHR 99d 63h
  1113. " "" "33E9E" :NOSDIAG) "CHR_d" ("'d', CHR 100d 64h
  1114. " "" "33EA5" :NOSDIAG) "CHR_e" ("'e', CHR 101d 65h
  1115. " "" "33EAC" :NOSDIAG) "CHR_f" ("'f', CHR 102d 66h
  1116. " "" "33EB3" :NOSDIAG) "CHR_g" ("'g', CHR 103d 67h
  1117. " "" "33EBA" :NOSDIAG) "CHR_h" ("'h', CHR 104d 68h
  1118. " "" "33EC1" :NOSDIAG) "CHR_i" ("'i', CHR 105d 69h
  1119. " "" "33EC8" :NOSDIAG) "CHR_j" ("'j', CHR 106d 6Ah
  1120. " "" "33ECF" :NOSDIAG) "CHR_k" ("'k', CHR 107d 6Bh
  1121. " "" "33ED6" :NOSDIAG) "CHR_l" ("'l', CHR 108d 6Ch
  1122. " "" "33EDD" :NOSDIAG) "CHR_m" ("'m', CHR 109d 5Dh
  1123. " "" "33EE4" :NOSDIAG) "CHR_n" ("'n', CHR 110d 6Eh
  1124. " "" "33EEB" :NOSDIAG) "CHR_o" ("'o', CHR 111d 6Fh
  1125. " "" "33EF2" :NOSDIAG) "CHR_p" ("'p', CHR 112d 70h
  1126. " "" "33EF9" :NOSDIAG) "CHR_q" ("'q', CHR 113d 71h
  1127. " "" "33F00" :NOSDIAG) "CHR_r" ("'r', CHR 114d 72h
  1128. " "" "33F07" :NOSDIAG) "CHR_s" ("'s', CHR 115d 73h
  1129. " "" "33F0E" :NOSDIAG) "CHR_t" ("'t', CHR 116d 74h
  1130. " "" "33F15" :NOSDIAG) "CHR_u" ("'u', CHR 117d 75h
  1131. " "" "33F1C" :NOSDIAG) "CHR_v" ("'v', CHR 118d 76h
  1132. " "" "33F23" :NOSDIAG) "CHR_w" ("'w', CHR 119d 77h
  1133. " "" "33F2A" :NOSDIAG) "CHR_x" ("'x', CHR 120d 78h
  1134. " "" "33F31" :NOSDIAG) "CHR_y" ("'y', CHR 121d 79h
  1135. " "" "33F38" :NOSDIAG) "CHR_z" ("'z', CHR 122d 7Ah
  1136. " "" "33F3F" :NOSDIAG) "CHR_{" ("'{', CHR 123d 7Bh
  1137. " "" "33FAF" :NOSDIAG) "CHR_}" ("'{', CHR 125d 7Dh
  1138. " "" "33FB6" :NOSDIAG) "CHR_Angle" ("'\\<)', CHR 128d 80h
  1139. " "" "33F5B" :NOSDIAG) "CHR_Integral" ("'\\.S', CHR 132d 84h
  1140. " "" "33F69" :NOSDIAG) "CHR_Deriv" ("'\\.d', CHR 136d 88h
  1141. " "" "33F62" :NOSDIAG) "CHR_->" ("'\\->', CHR 141d 8Dh
  1142. " "" "33F46" :NOSDIAG) "CHR_<<" ("'\\<<', CHR 171d ABh
  1143. " "" "33F4D" :NOSDIAG) "CHR_>>" ("'\\>>', CHR 187d BBh
  1144. " "" "33F54" :NOSDIAG) "CHR_Pi" ("'\\pi', CHR 135d 87h
  1145. " "" "33F7E" :NOSDIAG) "CHR_Sigma" ("'\\GS', CHR 133d 85h
  1146. " "" "33F8C" :NOSDIAG) "CHR_<=" ("'\\<=', CHR 137d 89h
  1147. " "" "33FBD" :NOSDIAG) "CHR_>=" ("'\\>=', CHR 138d 8Ah
  1148. " "" "33FC4" :NOSDIAG) "CHR_<>" ("'\\=/', CHR 139d 8Bh
  1149. " "" "33FCB" :NOSDIAG) "CHR_A8" ("'\\A8', CHR 168d A8h
  1150. " "" "37A78" :UBS :NOSDIAG) "NULL$" ("\"\"
  1151. " "Empty string.
  1152. " "055DF") "tok_" ("\"\\ \"
  1153. " "" "33B55") "SPACE$" ("\"\\ \"
  1154. " "" "33B55") "MARKED" ("\" \"
  1155. " "String of 2 spaces.
  1156. " "272E5" :UBS) "14SPACES$" ("\"\\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \"
  1157. " "String of 14 spaces.
  1158. " "33B13" :UBS) "(LF$)" ("\"\\0a\"
  1159. " "Newline.
  1160. " "33B39") "NEWLINE$" ("\"\\0a\"
  1161. " "Newline.
  1162. " "33B39") "CRLF$" ("\"\\0d\\0a\"
  1163. " "Carriage return and line feed.
  1164. " "27195") "toklparen" ("\"(\"
  1165. " "" "33BB5" :UBS) "tokrparen" ("\")\"
  1166. " "" "33BC1" :UBS) "tok[" ("\"[\"
  1167. " "" "33A6B" :UBS) "tok]" ("\"]\"
  1168. " "" "33A51" :UBS) "tok{" ("\"{\"
  1169. " "" "33A77") "tok}" ("\"}\"
  1170. " "" "33A83" :UBS) "tok<<" ("\"\\<<\"
  1171. " "" "33AD7") "tok>>" ("\"\\>>\"
  1172. " "" "33ACB" :UBS) "$_LRParens" ("\"()\"
  1173. " "" "34048") "$_[]" ("\"[]\"
  1174. " "" "3401E") "$_{}" ("\"{}\"
  1175. " "" "34010") "$_<<>>" ("\"\\<<\\>>\"
  1176. " "" "34002") "$_''" ("\"''\"
  1177. " "Two single quotes.
  1178. " "3402C") "$_::" ("\"::\"
  1179. " "" "3403A") "$_2DQ" ("\"\"\"\"
  1180. " "Two double quotes.
  1181. " "34056") "tok," ("\",\"
  1182. " "" "33B91") "tok'" ("\"'\"
  1183. " "One single quote.
  1184. " "33B85") "tok-" ("\"-\"
  1185. " "" "33BFD") "tok." ("\".\"
  1186. " "" "33B9D") "tok=" ("\"=\"
  1187. " "" "33C09") "tok->" ("\"\\->\"
  1188. " "" "272D9") "tok_g" ("\"g\"
  1189. " "" "2D848") "tok_m" ("\"m\"
  1190. " "" "2D86D") "tok_s" ("\"s\"
  1191. " "" "2D8AD") "tok0" ("\"0\"
  1192. " "" "33C4D") "tok1" ("\"1\"
  1193. " "" "33C59") "tok2" ("\"2\"
  1194. " "" "33C65" :UBS) "tok3" ("\"3\"
  1195. " "" "33C71" :UBS) "tok4" ("\"4\"
  1196. " "" "33C7D" :UBS) "tok5" ("\"5\"
  1197. " "" "33C89" :UBS) "tok6" ("\"6\"
  1198. " "" "33C95" :UBS) "tok7" ("\"7\"
  1199. " "" "33CA1" :UBS) "tok;" ("\";\"
  1200. " "" "33BA9" :UBS) "tok8" ("\"8\"
  1201. " "" "33CAD") "tok9" ("\"9\"
  1202. " "" "33CB9") "tokESC" ("\"\\1B\"
  1203. " "Escape character.
  1204. " "33ABF") "tokexponent" ("\"E\"
  1205. " "" "33AE3") "tokquote" ("\"\"\"
  1206. " "One double quote.
  1207. " "33B79") "toksharp" ("\"#\"
  1208. " "" "33A8F") "tok$" ("\"$\"
  1209. " "" "33AA7" :UBS) "tok&" ("\"&\"
  1210. " "" "33AB3" :UBS) "tok*" ("\"*\"
  1211. " "" "33BD9" :UBS) "tok+" ("\"+\"
  1212. " "" "33BF1" :UBS) "tok/" ("\"/\"
  1213. " "" "33BE5" :UBS) "tokanglesign" ("\"\\<)\"
  1214. " "" "33AEF" :UBS) "tokDER" ("\"\\.d\"
  1215. " "" "33C21" :UBS) "$DER" ("\"der\"
  1216. " "" "33B45" :UBS) "tokSIGMA" ("\"\\GS\"
  1217. " "" "33AFB" :UBS) "tokSQRT" ("\"\\v/\"
  1218. " "" "33C15" :UBS) "tokuscore" ("\"_\"
  1219. " "" "33A9B" :UBS) "tokWHERE" ("\"|\"
  1220. " "" "33B07" :UBS) "tok^" ("\"^\"
  1221. " "" "33BCD" :UBS) "$_..." ("\"\\1F\"
  1222. " "Character 31, the forward arrow (system font)
  1223. or dots (minifont).
  1224. " "33D1F" :UBS) "tok:" ("\":\"
  1225. " "" "2723F" :UBS) "tok`" ("\"`\"
  1226. " "One backquote.
  1227. " "2724B" :UBS) "tok?" ("\"?\"
  1228. " "" "2D933" :UBS) "$_RAD" ("\"RAD\"
  1229. " "" "340A4") "$_GRAD" ("\"GRAD\"
  1230. " "" "340B4") "$_XYZ" ("\"XYZ\"
  1231. " "" "33FF2") "$_R<Z" ("\"R\\<)Z\"
  1232. " "\"R<angle>Z\"
  1233. " "33FE2") "$_R<<" ("\"R\\<)\\<)\"
  1234. " "\"R<angle><angle>\"
  1235. " "33FD2") "tokmol" ("\"mol\"
  1236. " "" "2D90F" :UBS) "tokcd" ("\"cd\"
  1237. " "" "2D8ED" :UBS) "tokK" ("\"K\"
  1238. " "" "2D8CD" :UBS) "tokA" ("\"A\"
  1239. " "" "2D88D" :UBS) "tokdegR" ("\"\\^oR\"
  1240. " "Degrees R.
  1241. " "2D7FF" :UBS) "tokr" ("\"r\"
  1242. " "" "2D7B3" :UBS) "toksr" ("\"sr\"
  1243. " "" "2D7D3" :UBS) "$_EXIT" ("\"EXIT\"
  1244. " "" "34076") "$_ECHO" ("\"ECHO\"
  1245. " "" "34064") "$_Undefined" ("\"Undefined\"
  1246. " "" "34088") "tokCTGROB" ("\"GROB\"
  1247. " "" "33C2D" :UBS) "tokCTSTR" ("\"C$\"
  1248. " "" "33C3F" :UBS) "tokUNKNOWN" ("\"UNKNOWN\"
  1249. " "" "33B61" :UBS) "tokTO" ("\"TO\"
  1250. " "" "27221" :UBS) "tokDIR" ("\"DIR\"
  1251. " "" "2722F" :UBS) "tokELSE" ("\"ELSE\"
  1252. " "" "27257" :UBS) "tokEND" ("\"END\"
  1253. " "" "27269" :UBS) "tokUNTIL" ("\"UNTIL\"
  1254. " "" "27279" :UBS) "tokREPEAT" ("\"REPEAT\"
  1255. " "" "2728D" :UBS) "tokNEXT" ("\"NEXT\"
  1256. " "" "272A3" :UBS) "tokSTEP" ("\"STEP\"
  1257. " "" "272B5" :UBS) "tokTHEN" ("\"THEN\"
  1258. " "" "272C7" :UBS) "$1:_" ("\"1: \"
  1259. " "" "27C0B" :UBS) "<Skip$" ("\"\\->SKIP\"
  1260. " "" "27EB4" :UBS) ">Skip$" ("\"SKIP\\->\"
  1261. " "" "27F00" :UBS) "<Del$" ("\"\\->DEL\"
  1262. " "" "27F4C" :UBS) ">Del$" ("\"DEL\\->\"
  1263. " "" "27F9F" :UBS) "tokIntercept" ("\"Intercept\"
  1264. " "" "3DF97" :UBS) "tokSlope" ("\"Slope\"
  1265. " "" "3DFB3" :UBS) "tokIF-prompt" ("\"IF-prompt\"
  1266. " "" "37F5C" :UBS) "tokCopyright" ("\"Copyright HP xxxx\"
  1267. " "" "34133" :UBS) "tokVersion" ("\"Version HP49-B...\"
  1268. " "" "340CB" :UBS) "NULL$SWAP" ("ob \\-> $ ob
  1269. " "NULL$, then SWAP.
  1270. " "35D94") "DROPNULL$" ("ob \\-> NULL$
  1271. " "DROP then NULL$.
  1272. " "04D3E") "TWODROPNULL$" ("ob ob' \\-> NULL$
  1273. " "2DROP then NULL$.
  1274. " "04D57" :UBS) "NULL$TEMP" ("\\-> $
  1275. " "Creates null string in temporary memory
  1276. (NULL$, then <REF>TOTEMPOB).
  1277. " "25EEC") "#>$" ("# \\-> $
  1278. " "Creates string from the bint (decimal).
  1279. " "25F77") "#:>$" ("# \\-> \"#:\\ \"
  1280. " "Creates string from the bint and appends a
  1281. colon and a space. Ex: \"1:\\ \"
  1282. " "25F72") "a%>$," ("% \\-> $
  1283. " "Converts real number into string using
  1284. current display mode.
  1285. " "25F0F") "a%>$" ("% \\-> $
  1286. " "Converts real number into string using
  1287. current display mode.
  1288. " "25F0F") "ID>$" ("id/lam \\-> $
  1289. " "Converts identifier into string.
  1290. " "05BE9") "DOCHR" ("% \\-> $
  1291. " "Creates string of the character with the
  1292. number specified.
  1293. " "25EB3") "^Z>S" ("Z \\-> $
  1294. " "Converts Z into a string (decimal).
  1295. " "0F1006" :wasCSys) "hxs>$" ("hxs \\-> $
  1296. " "Uses current display mode and wordsize.
  1297. " "2EFC1") "HXS>$" ("hxs \\-> $
  1298. " "Does <REF>hxs>$ and then appends base character.
  1299. " "2EFC0") "#>CHR" ("# \\-> chr
  1300. " "Returns character with the specified ASCII
  1301. code.
  1302. " "05A75") "CHR>$" ("chr \\-> $* Strings
  1303. " "Converts a character into a string.
  1304. " "37AA5") "LEN$" ("$ \\-> #length
  1305. " "Returns length in bytes.
  1306. " "05636") "DUPLEN$" ("$ \\-> $ #
  1307. " "DUP then LEN$.
  1308. " "357E2") "OVERLEN$" ("$ ob \\-> $ ob #len
  1309. " "OVER then LEN$.
  1310. " "05622") "NEWLINE&$" ("$ \\-> \"$\\0a\"
  1311. " "Appends newline character to string.
  1312. " "361DA") "NEWLINE$&$" ("$ \\-> \"$\\0a\"
  1313. " "Appends newline character to string.
  1314. " "361DA") "APNDCRLF" ("$ \\-> $'
  1315. " "Appends carriage return and line feed to
  1316. string.
  1317. " "2F31A") "CAR$" ("$ \\-> chr
  1318. \\-> \"\"
  1319. " "Returns first character of string as a
  1320. string, or NULL$ for null string.
  1321. " "050ED") "CDR$" ("$ \\-> $'
  1322. " "Returns string without first character, or
  1323. NULL$ for null string.
  1324. " "0516C") "POS$" ("$ $find start# \\-> #pos
  1325. \\-> #0
  1326. " "Search for $find in $search, starting at
  1327. position #start. Returns position of $find
  1328. or 0 if not found.
  1329. Same entry as POSCHR.
  1330. " "378FA") "POSCHR" ("$search chr #start \\-> #pos
  1331. \\-> #0
  1332. " "Same entry as <REF>POS$.
  1333. " "378FA") "POS$REV" ("$ $find #limit \\-> #pos
  1334. \\-> #0
  1335. " "Searches backwards from #limit to #1.
  1336. Same entry as <REF>POSCHRREV.
  1337. " "37906") "POSCHRREV" ("$seach chr #start \\-> #pos
  1338. \\-> #0
  1339. " "Same entry as <REF>POS$REV.
  1340. " "37906") "COERCE$22" ("$ \\-> $'
  1341. " "If the string is longer than 22 characters,
  1342. truncates it to 21 characters and appends
  1343. \"...\".
  1344. " "25EA0") "Blank$" ("#len \\-> $
  1345. " "Creates a string with the specified number
  1346. of spaces.
  1347. " "2F16D") "PromptIdUtil" ("id ob \\-> $
  1348. " "Creates string of the form \"id: ob\".
  1349. " "2EEF0") "SEP$NL" ("$ \\-> $' $''
  1350. " "Separates string at the first newline. $'' is
  1351. the substring before the first newline; $'
  1352. the substring after the first newline.
  1353. " "25EF8") "^StrCutNchr" ("$ #width \\-> $'
  1354. " "Replace SPACE chars with NEWLINE in order to
  1355. fit the text in the given #width. This entry
  1356. will produce lines longer than#width
  1357. characters if a single word is longer than
  1358. that. Used by ViewStrObject. Very fast
  1359. (bang type).
  1360. " "09A003" :UBS) "^StrCutNchr2" ("$ #width #lines \\-> $' #lines'
  1361. " "Replace SPACE chars with NEWLINE in order to
  1362. fit the text in the given #width. If a
  1363. single word is longer than #width, the word
  1364. is cut into pieces. The output will not be
  1365. longer than #lines lines. #lines' gives the
  1366. number of lines in $'.
  1367. " "09B003" :UBS) "SUB$" ("$ #start #end \\-> $'
  1368. " "Returns substring between specified
  1369. positions.
  1370. " "05733") "XEQSUB$" ("$ % %' \\-> $'
  1371. " "Same as <REF>SUB$ but uses real numbers as
  1372. arguments.
  1373. " "2F2C0" :UBS) "#1-SUB$" ("$ #start #end+#1 \\-> $'
  1374. " "Does #1- and then SUB$.
  1375. " "3628E") "1_#1-SUB" ("$ #end \\-> $'
  1376. " "Returns substring with the first #end
  1377. characters.
  1378. " "362A2") "1_#1-SUB$" ("$ #end \\-> $'
  1379. " "Returns substring with the first #end
  1380. characters.
  1381. " "362A2") "LAST$" ("$ #start \\-> $'
  1382. " "Returns substring from the specified start
  1383. position to the end (inclusive).
  1384. " "362B6") "#1+LAST$" ("$ #start-#1 \\-> $'
  1385. " "Returns substring from the specified start
  1386. position to the end (exclusive).
  1387. " "362CA") "DEL_END$" ("$ \\-> $'
  1388. " "Removes the last character from a string.
  1389. " "29F0C" :UBS) "SUB$SWAP" ("ob $ # #' \\-> $' ob
  1390. " "SUB$ then SWAP.
  1391. " "35DA8") "SUB$1#" ("$ #pos \\-> #'
  1392. " "Returns bint with ASCII code of character at
  1393. the specified position.
  1394. " "2A5CA") "EXPAND" ("hxs #nibs \\-> hxs'
  1395. " "Appends null characters to the string. Since
  1396. refers to the number of nibbles, you must
  1397. use a number twice as large as the number
  1398. of null characters you want appended.
  1399. " "34C82") "&$" ("$ $' \\-> $+$'
  1400. " "Concatenates two strings.
  1401. " "05193") "&$SWAP" ("ob $ $' \\-> $+$' ob
  1402. " "&$ then SWAP.
  1403. " "36FF6") "!append$" ("$ $' \\-> $+$'
  1404. " "Tries &$, if not enough memory does
  1405. !!append$?.
  1406. " "353CD") "!insert$" ("$ $' \\-> $'+$
  1407. " "Does SWAP then <REF>!append$.
  1408. " "3533C") "!append$SWAP" ("ob $ $' \\-> $+$' ob
  1409. " "!append$ then SWAP.
  1410. " "35F6A") "!!append$?" ("$ $' \\-> $+$'
  1411. " "Attempts append \"in place\" if target is in
  1412. tempob.
  1413. " "35369") "!!append$" ("$ $' \\-> $+$'
  1414. " "Tries appending \"in place\".
  1415. " "353F7") "!!insert$" ("$ $' \\-> $'+$
  1416. " "Tries inserting \"in place\".
  1417. " "353EB") ">H$" ("$ chr \\-> $'
  1418. " "Prepends character to string
  1419. " "0525B") ">T$" ("$ chr \\-> $'
  1420. " "Appends character to string.
  1421. " "052EE") "APPEND_SPACE" ("$ \\-> $'
  1422. " "Appends space to string.
  1423. " "35BD7") "SWAP&$" ("$ $' \\-> $'+$
  1424. " "Concatenates two strings.
  1425. " "35346") "TIMESTR" ("%dt %tm \\-> \"dy dt tm\"
  1426. " "Returns string representation of time, using
  1427. current format. Example:
  1428. \"WED 06/24/98 10:00:45A\"
  1429. " "2EED3") "AND$" ("$1 $2 \\-> $'
  1430. " "Logical QANDQ. Errors if strings are not the
  1431. same length.
  1432. " "25E7C") "OR$" ("$ $' \\-> $''
  1433. " "Logical QORQ. Errors if strings are not the
  1434. same length.
  1435. " "25EF0") "XOR$" ("$ $' \\-> $''
  1436. " "Logical QXORQ. Errors if strings are not the
  1437. same length.
  1438. " "25F0D") "!NOT$" ("$ $' \\-> $'' ???
  1439. " "Logical QNOTQ \"in place\".
  1440. " "2647C" :UBS) "!AND$" ("$ $' \\-> $'' ???
  1441. " "Logical QANDQ. Does not check if strings are
  1442. the same length.
  1443. " "2646D" :UBS) "!OR$" ("$ $' \\-> $'' ???
  1444. " "Logical QORQ, does not check if strings are the
  1445. same length.
  1446. " "26472" :UBS) "!XOR$" ("$ $' \\-> $'' ???
  1447. " "Logical QXORQ. Does not check if strings are
  1448. the same length.
  1449. " "26477" :UBS) "CHARSEDIT" ("\\->
  1450. " "HP49 character browser. This is an
  1451. interactive application from which characters
  1452. can be echoed into the command line.
  1453. " "2F1A7") "DOSTR>" ("$ \\-> ?
  1454. " "Internal version of <REF>STR\\->.
  1455. " "25EB7") "palparse" ("$ \\-> ob T
  1456. \\-> $ #pos $' F
  1457. " "Tries parsing a string into an object. If
  1458. successful, returns object and TRUE,
  1459. otherwise returns position of error, the
  1460. offending part of the string $', and FALSE.
  1461. If the string contains several arguments, the
  1462. resulting object is a secondary containing
  1463. these objects.
  1464. " "2EF62") "^algparse" ("$ \\-> ob T
  1465. $ \\-> $ # #' F
  1466. " "Tries parsing a string into an object using
  1467. algebraic mode. If successful, returns object
  1468. and TRUE, otherwise returns the original
  1469. string with information about the position of
  1470. the error, and FALSE.
  1471. " "00E004") "!*trior" ("F \\-> <SKIP>
  1472. T T \\-> <COLA>
  1473. " "" "25E68") "!*triand" ("T T \\->
  1474. F T \\-> F T <SEMI>
  1475. " "" "25E67") "tok8cktrior" ("$1 $1 \\-> :: $1 <Ob1> ;
  1476. $1 $2 \\-> :: $1 <Ob2> <Rest> ;
  1477. " "" "26206") "tok8trior" ("GNT data $1 $1 \\-> :: GNT data GetNextToken ;
  1478. GNT data $1 $2 \\-> :: $1 <Ob1> <Rest> ;
  1479. " "" "261BB") "nultrior" ("NULL$ \\-> :: ;
  1480. $ \\-> :: $ <Ob1> <Rest> ;
  1481. " "" "29E67") "GetNextToken" ("hxs-mask $ #start \\-> hxs-mask $ #next $token
  1482. " "" "25EDB") "getmatchtok" ("hxs-mask $ #loc $_tok \\-> hxs-mask $ #next $match
  1483. " "" "2F33C") "Parse.1" ("
  1484. " "" "2EF6A") "Parse.2" ("
  1485. " "" "2EF6B") "ParseFail" ("ob $parsed #pos $' \\->
  1486. " "Uses DispBadToken to re-edit the parsed
  1487. string and displays \"Syntax Error\".
  1488. " "2EF6E") "ParseFail2" ("
  1489. " "" "2EF70") "DispBadToken" ("ob $parsed #pos $' \\->
  1490. " "Re-edits the parsed string, positions the
  1491. cursor to the location of the error. Used by
  1492. ParseFail.
  1493. " "2EF6F") "DispBadToken2" ("
  1494. " "" "2EF71") "!DcompWidth" ("# \\->
  1495. " "Sets the width (in characters) of decompiled
  1496. strings. This width is used to cut the
  1497. resulting string (for stack display) or to
  1498. break it into lines (mostly for editing).
  1499. Note that most decompilation entries reset
  1500. this value to the stack or editor width. Use
  1501. stkdecomp$w and editdecomp$w to make sure the
  1502. current width is used and not changed.
  1503. " "2F191") "DcompWidth@" ("\\-> #
  1504. " "Recalls the width of decompiled strings (in
  1505. characters).
  1506. " "2F190") "setStdWid" ("\\->
  1507. " "Sets DcompWidth to the standard value for
  1508. stack display, either 19 or 30 characters,
  1509. depending on system flag 72 (stack minifont).
  1510. --
  1511. Flags: -72
  1512. " "26459") "setStdEditWid" ("\\->
  1513. " "Sets DcompWidth to the width for editing,
  1514. either 21 or 32 characters, depending on
  1515. system flag 73 (edit minifont).
  1516. --
  1517. Flags: -73
  1518. " "2645E") "stkdecomp$w" ("ob \\-> $
  1519. " "Decompiles for stack display using the
  1520. current DcompWidth to cut the string if it is
  1521. too long.
  1522. " "25F13") "1stkdecomp$w" ("ob \\-> $
  1523. " "Calls setStdWid and decompiles for stack
  1524. display (cutting the string if necessary).
  1525. " "25E6D") "Decomp1Line" ("ob \\-> $
  1526. " "Same as <REF>1stkdecomp$w.
  1527. " "2A842") "RPNDecomp1Line" ("ob \\-> $
  1528. " "Same as <REF>Decomp1Line but enforce RPN mode
  1529. (system flag 95 clear) during execution.
  1530. --
  1531. Flags: -95
  1532. " "2A904") ">Review$" ("id \\-> $
  1533. " "Makes a string from the variable name and its
  1534. contents (decompiled with <REF>Decomp1Line),
  1535. for display with the review key. If the
  1536. argument is a command, returns its name.
  1537. " "25E6F") "DecompStd1Line32" ("ob \\-> $
  1538. " "Sets 32 as DcompWidth and decompiles using
  1539. stkdecomp$w.
  1540. " "2A8E4") "RPNDecompStd1Line32" ("ob \\-> $
  1541. " "Same as <REF>DecompStd1Line32 but enforce RPN
  1542. mode (system flag 95 clear) during execution.
  1543. --
  1544. Flags: -95
  1545. " "2A9C4") "DecompStd1Line" ("ob \\-> $
  1546. " "Calls setStdWid and decompiles, cutting if
  1547. the string becomes too long.
  1548. " "2A8C9") "RPNDecompStd1Line" ("ob \\-> $
  1549. " "Same as <REF>DecompStd1Line but enforce RPN
  1550. mode (system flag 95 clear) during execution.
  1551. --
  1552. Flags: -95
  1553. " "2A9A4") "Decomp#Disp" ("ob # \\-> $
  1554. " "Calls setStdWid and decompiles ob (UserRPL
  1555. components only), breaks the string into
  1556. lines and returns the first #+1 lines. Used
  1557. for multiline display in stack level 1.
  1558. " "2A893") "RPNDecomp#Disp" ("ob # \\-> $
  1559. " "Same as Decomp#Disp but enforce RPN mode
  1560. (system flag 95 clear) during execution.
  1561. --
  1562. Flags: -95
  1563. " "2A964") "Decomp#Line" ("ob # \\-> $
  1564. " "Similar to Decomp#Disp, but the returned
  1565. string is an internal representation of the
  1566. different lines to be displayed. Used for
  1567. multiline display in stack level 1.
  1568. " "2A878") "RPNDecomp#Line" ("ob # \\-> $
  1569. " "Same as Decomp#Line but enforce RPN mode
  1570. (system flag 95 clear) during execution.
  1571. --
  1572. Flags: -95
  1573. " "2A944") "editdecomp$w" ("ob \\-> $
  1574. " "Decompiles entire object for editing. It
  1575. only decompiles the UserRPL components. Some
  1576. System RPL entries like <REF>TakeOver are simply
  1577. skipped, others are written as \"External\".
  1578. Breaks the resulting strings into lines using
  1579. the current DcompWidth.
  1580. " "25F11") "EDITDECOMP$" ("ob \\-> $
  1581. " "Calls setStdEditWid and the decompiles for
  1582. editing like <REF>editdecomp$w.
  1583. " "25ECE") "DecompEdit" ("ob \\-> $
  1584. " "Same as EDITDECOMP$.
  1585. " "2A85D") "RPNDecompEdit" ("ob \\-> $
  1586. " "Same as DecompEdit but enforce RPN mode
  1587. (system flag 95 clear) during execution.
  1588. --
  1589. Flags: -95
  1590. " "2A924") "AlgDecomp" ("ob \\-> $
  1591. " "Calls <REF>DecompEdit with a few checks
  1592. around it.
  1593. " "2AA43") "DECOMP$" ("ob \\-> $
  1594. " "Calls <REF>setStdWid and decompiles entire
  1595. object (UserRPL components only). Breaks the
  1596. string into lines using DcompWidth as width.
  1597. " "25EAA") "Ob,$>$'" ("ob $ \\-> \"ob$\"
  1598. " "Applies <REF>DECOMP$ to ob and concatenates
  1599. with the string.
  1600. " "39CB3" :UBS) "$,Ob>$'" ("$ ob \\-> \"$ob\"
  1601. " "Applies <REF>DECOMP$ to ob and concatenates
  1602. with the string.
  1603. " "39C9F" :UBS) "DO>STR" ("$ \\-> $
  1604. ob \\-> $
  1605. " "Internal version of \\->STR.
  1606. " "25EB1") "^DO>STRID" ("id/ob \\-> $
  1607. " "Like <REF>DO>STR but without quotes for id.
  1608. " "1A7006" :wasCSys) "DecompEcho" ("ob \\-> $
  1609. " "Calls setStdEditWid and decompiles the entire
  1610. object (UserRPL only) into a single line.
  1611. " "2A8AE") "RPNDecompEcho" ("ob \\-> $
  1612. " "Same as <REF>DecompEcho but enforce RPN mode
  1613. (system flag 95 clear) during execution.
  1614. --
  1615. Flags: -95
  1616. " "2A984") "Decomp%Short" ("% #width \\-> $
  1617. " "Decompiles a real number into a string of the
  1618. given #width. It will QdropQ less significant
  1619. digits or add zeros as needed, but will also
  1620. exceed #width when necessary. E.g. \"-1.e-33\"
  1621. cannot be written with less than 7
  1622. characters, so even if #width is less, 7
  1623. chars will be used. Q%0Q is always decompiled
  1624. as \"0\".
  1625. " "2F1BF") "^FSTR1" ("ob \\-> $
  1626. " "The decompiler used by stkdecomp$w,
  1627. 1stkdecomp$w, Decomp1Line, DecompStd1Line32.
  1628. DcompWidth must be set before this is called.
  1629. " "001004") "^FSTR2" ("
  1630. " "" "002004") "^FSTR3" ("ob # \\-> $
  1631. " "The decompiler used by Decomp#Line.
  1632. DcompWidth must be set before this is called.
  1633. " "003004") "^FSTR4" ("ob \\-> $
  1634. " "The decompiler used by editdecomp$w,
  1635. DecompEdit, EDITDECOMP$. DcompWidth must be
  1636. set before this is called.
  1637. " "004004") "^FSTR5" ("ob \\-> $
  1638. " "The decompiler used by DecompEcho.
  1639. DcompWidth must be set before this is called.
  1640. " "005004") "^FSTR6" ("ob # \\-> $
  1641. " "The decompiler used by Decomp#Line.
  1642. DcompWidth must be set before this is called.
  1643. " "006004") "^FSTR7" ("ob \\-> $
  1644. " "The decompiler used by DO>STR. DcompWidth
  1645. must be set before this is called.
  1646. " "007004") "^FSTR8" ("
  1647. " "" "008004") "^FSTR9" ("ob \\-> $
  1648. " "The decompiler used by DecompStd1Line.
  1649. DcompWidth must be set before this is called.
  1650. " "009004") "^FSTR10" ("
  1651. " "" "00A004") "^FSTR11" ("
  1652. " "" "00B004") "^FSTR12" ("
  1653. " "" "00C004") "^FSTR13" ("ob \\-> $
  1654. " "The decompiler used by DECOMP$. DcompWidth
  1655. must be set before this is called.
  1656. " "00D004") "palrompdcmp" ("romptr \\-> $ T
  1657. " "Decompiles a rompointer for the UserRPL
  1658. stack. If it is a named rompointer, returns
  1659. the name. Otherwise returns \"XLIB n m\".
  1660. " "35B82") "NULL$?" ("ob \\-> flag
  1661. " "" "0556F") "DUPNULL$?" ("ob \\-> ob flag
  1662. " "" "36252") "$>$?" ("$ $' \\-> flag
  1663. " "String comparizon, alphabetically by
  1664. character numbers.
  1665. " "26436" :UBS) "CkChr00" ("$ \\-> $ flag
  1666. " "Returns FALSE if string contains any null
  1667. characters.
  1668. " "2F321") "hxsB010" ("HXS 4 B010
  1669. " "" "3ABD2" :UBS :NOSDIAG :NOETAB) "CHSpdata" ("HXS 4 0108
  1670. " "" "399ED" :UBS :NOSDIAG :NOETAB) "hxs0105" ("HXS 4 0105
  1671. " "" "3CB4A" :UBS :NOSDIAG :NOETAB) "PDataNSQRT" ("HXS 4 010C
  1672. " "" "3A4B0" :UBS :NOSDIAG :NOETAB) "hxs70107" ("HXS 5 70107
  1673. " "" "39C79" :UBS :NOSDIAG :NOETAB) "hxs80108" ("HXS 5 80108
  1674. " "" "39F2E" :UBS :NOSDIAG :NOETAB) "hxs80108" ("HXS 5 80108
  1675. " "" "3B002" :UBS :NOSDIAG :NOETAB) "hxs50105" ("HXS 5 50105
  1676. " "" "3CA52" :UBS :NOSDIAG :NOETAB) "hxs40104" ("HXS 5 40104
  1677. " "" "3CAD8" :UBS :NOSDIAG :NOETAB) "hxs60106" ("HXS 5 60106
  1678. " "" "3CCA5" :UBS :NOSDIAG :NOETAB) "ParseDataN^" ("HXS 5 A0109
  1679. " "" "3A17F" :UBS :NOSDIAG :NOETAB) "hxsA0127" ("HXS 5 A0127
  1680. " "" "3DB8F" :UBS :NOSDIAG :NOETAB) "hxs014250" ("HXS 6 014250
  1681. " "" "3D719" :UBS :NOSDIAG :NOETAB) "ParseDataPdiv" ("HXS 7 8014050
  1682. " "" "3A07D" :UBS :NOSDIAG :NOETAB) "ParseDataP^" ("HXS 7 0405109
  1683. " "" "3A18E" :UBS :NOSDIAG :NOETAB) "hxs0134250" ("HXS 7 0134250
  1684. " "" "3D28F" :UBS :NOSDIAG :NOETAB) "hxs014360950" ("HXS 9 014360950
  1685. " "" "3D7C0" :UBS :NOSDIAG :NOETAB) "hxs0140626250" ("HXS A 0140626250
  1686. " "" "39666" :UBS :NOSDIAG :NOETAB) "hxs2214370B50" ("HXS A 2214370B50
  1687. " "" "3D619" :UBS :NOSDIAG :NOETAB) "INTGPDATA" ("HXS C 014060626350
  1688. " "" "3D497" :UBS :NOSDIAG :NOETAB) "SUMETCPDATA" ("HXS C 014370606250
  1689. " "" "3D549" :UBS :NOSDIAG :NOETAB) "#>HXS" ("# \\-> hxs
  1690. " "Length will be five.
  1691. " "059CC") "%>#" ("% \\-> hxs
  1692. " "Converts real number into hxs. Should be
  1693. called %>HXS.
  1694. " "2EFCB") "WORDSIZE" ("\\-> #
  1695. " "Returns the current wordsize as a bint.
  1696. " "2EFBE") "dostws" ("# \\->
  1697. " "Sets the current wordsize.
  1698. " "2EFAA") "NULLHXS" ("HXS 0
  1699. " "Puts a null hxs in the stack.
  1700. " "055D5") "NULLHXS?" ("hxs \\-> flag
  1701. " "Returns TRUE if the input is a null hxs.
  1702. " "05566" :UBS) "&HXS" ("hxs hxs' \\-> hxs''
  1703. " "Appends hxs'' to hxs'.
  1704. " "0518A") "EXPAND" ("hxs #nibs \\-> hxs'
  1705. " "Appends #nibs zero nibbles to the hxs.
  1706. " "34C82") "LENHXS" ("hxs \\-> #nibs
  1707. " "Returns length in nibbles.
  1708. " "05616") "SUBHXS" ("hxs #m #n \\-> hxs'
  1709. " "Returns sub hxs string.
  1710. " "05815") "bit+" ("hxs hxs' \\-> hxs''
  1711. " "Adds two hxs.
  1712. " "2EFB9") "bit%#+" ("% hxs \\-> hxs'
  1713. " "Adds real to hxs, returns hxs.
  1714. " "2EFC8") "bit#%+" ("hxs % \\-> hxs'
  1715. " "Adds real to hxs, returns hxs.
  1716. " "2EFC9") "bit-" ("hxs hxs' \\-> hxs''
  1717. " "Subtracts hxs2 from hxs1.
  1718. " "2EFBA") "bit%#-" ("% hxs \\-> hxs'
  1719. " "Subtracts hxs from real, returns hxs.
  1720. " "2EFC6") "bit#%-" ("hxs % \\-> hxs'
  1721. " "Subtracts real from hxs, returns hxs.
  1722. " "2EFC7") "bit*" ("hxs hxs' \\-> hxs''
  1723. " "Multiplies two hxs.
  1724. " "2EFBC") "bit%#*" ("% hxs \\-> hxs'
  1725. " "Multiplies real by hxs, returns hxs.
  1726. " "2EFC4") "bit#%*" ("hxs % \\-> hxs'
  1727. " "Multiplies hxs by real, returns hxs.
  1728. " "2EFC5") "bit/" ("hxs hxs' \\-> hxs''
  1729. " "Divides hxs1 by hxs2.
  1730. " "2EFBD") "bit%#/" ("% hxs \\-> hxs'
  1731. " "Divides real by hxs, returns hxs.
  1732. " "2EFC2") "bit#%/" ("hxs % \\-> hxs'
  1733. " "Divides hxs by real, returns hxs.
  1734. " "2EFC3") "bitAND" ("hxs hxs' \\-> hxs''
  1735. " "Bitwise QANDQ.
  1736. " "2EFAC") "bitOR" ("hxs hxs' \\-> hxs''
  1737. " "Bitwise QORQ.
  1738. " "2EFAD") "bitXOR" ("hxs hxs' \\-> hxs''
  1739. " "Bitwise QXORQ.
  1740. " "2EFAE") "bitNOT" ("hxs \\-> hxs'
  1741. " "Bitwise QNOTQ.
  1742. " "2EFAF") "bitASR" ("hxs \\-> hxs'
  1743. " "Arithmetic shift one bit to the right. The
  1744. most significant bit (the sign) does not
  1745. change.
  1746. " "2EFB8") "bitRL" ("hxs \\-> hxs'
  1747. " "Shifts circularly one bit to the left.
  1748. " "2EFB6") "bitRLB" ("hxs \\-> hxs'
  1749. " "Shifts circularly one byte to the left
  1750. " "2EFB7") "bitRR" ("hxs \\-> hxs'
  1751. " "Shifts circularly one bit to the right.
  1752. " "2EFB4") "bitRRB" ("hxs \\-> hxs'
  1753. " "Shifts circularly one byte to the right.
  1754. " "2EFB5") "bitSL" ("hxs \\-> hxs'
  1755. " "Shifts one bit to the left.
  1756. " "2EFB0") "bitSLB" ("hxs \\-> hxs'
  1757. " "Shifts one byte to the left.
  1758. " "2EFB1") "bitSR" ("hxs \\-> hxs'
  1759. " "Shifts one bit to the right.
  1760. " "2EFB2") "bitSRB" ("hxs \\-> hxs'
  1761. " "Shifts one byte to the right.
  1762. " "2EFB3") "HXS==HXS" ("hxs hxs' \\-> %flag
  1763. " "== test
  1764. " "2EFCC") "HXS#HXS" ("hxs hxs' \\-> %flag
  1765. " "\\=/ test
  1766. " "2F0EE") "HXS<HXS" ("hxs hxs' \\-> %flag
  1767. " "< test
  1768. " "2EFCF") "HXS>HXS" ("hxs hxs' \\-> %flag
  1769. " "> test
  1770. " "2EFCD") "HXS>=HXS" ("hxs hxs' \\-> %flag
  1771. " "\\>= test
  1772. " "2EFCE") "HXS<=HXS" ("hxs hxs' \\-> %flag
  1773. " "\\<= test
  1774. " "2F0EF") ">TAG" ("ob $tag \\-> tagged
  1775. " "Tags an object.
  1776. " "05E81") "USER$>TAG" ("ob $tag \\-> tagged
  1777. " "Maximum of 255 characters in string.
  1778. " "2F266") "%>TAG" ("ob % \\-> tagged
  1779. " "Converts real to string using current display
  1780. mode and tags object.
  1781. " "2F223") "ID>TAG" ("ob id/lam \\-> tagged
  1782. " "Tags object with identifier or lam.
  1783. " "05F2E") "{}>TAG" ("{ id ob } \\-> tagged
  1784. " "" "05E9F" :UBS) "TAGOBS" ("ob $tag \\-> tagged
  1785. ob.. { $.. } \\-> tagged...
  1786. " "Tags one or more objects.
  1787. " "37B04") "TAG>" ("tagged \\-> ob $tag
  1788. " "" "05EC9" :UBS) "STRIPTAGS" ("tagged \\-> ob
  1789. " "Strips all tags from the object.
  1790. " "37ABE") "STRIPTAGSl2" ("tagged ob' \\-> ob ob'
  1791. " "Strips all tags from the object in level two.
  1792. " "37AEB") "ARSIZE" ("[] \\-> #
  1793. " "Returns number of elements as a bint.
  1794. " "03562" :UBS) "DIMLIMITS" ("[] \\-> {#n #m}
  1795. " "Returns list of array dimensions.
  1796. " "035A9" :UBS) "GETATELN" ("# [] \\-> ob T
  1797. \\-> F
  1798. " "Gets one element from array.
  1799. " "0371D") "ARRYEL?" ("{#n #m} [] \\-> # T
  1800. \\-> F
  1801. " "Returns TRUE if array element exists.
  1802. " "03685" :UBS) "FINDELN" ("{} A \\-> # flag
  1803. " "Return index # of element {} in array.
  1804. " "03685" :UBS) "^MDIMS" ("[[]] \\-> #rows #cols T
  1805. [] \\-> #elem F
  1806. " "Returns the size of an array. Equivalent to
  1807. the HP48 command MDIMS.
  1808. " "16D006" :wasCSys) "MDIMSDROP" ("[2D] \\-> #m #n
  1809. " "MDIMS followed by DROP.
  1810. " "35FD8") "^DIMLIMITS" ("[] \\-> { # }
  1811. [[]] \\-> {# #}
  1812. " "Returns the size of an array, like the User
  1813. command SIZE, but the lengths are bints and
  1814. not reals. Equivalent to the HP48 command
  1815. DIMLIMITS.
  1816. " "16E006" :wasCSys) "^ARSIZE" ("[] \\-> #
  1817. " "Returns max # in an array.
  1818. " "35E006" :CSys) "OVERARSIZE" ("[] ob \\-> [] ob #elts
  1819. " "Does OVER then <REF>ARSIZE.
  1820. " "36183") "PULLREALEL" ("[%] # \\-> [%] %
  1821. " "Gets real element.
  1822. " "260F8") "PULLCMPEL" ("[C%] # \\-> [C%] C%
  1823. " "Gets complex element.
  1824. " "260F3") "PUTEL" ("[%] % # \\-> [%]'
  1825. [C%] C% # \\-> [C%]'
  1826. " "Puts element at specified position. Converts
  1827. to \"short\" before. Warning: no copy to
  1828. tempob first.
  1829. " "26102") "PUTREALEL" ("[%] % # \\-> [%]'
  1830. " "Puts real element at specified position.
  1831. Warning: no copy to tempob first.
  1832. " "26107") "PUTCMPEL" ("[C%] C% # \\-> [C%]'
  1833. " "Puts complex element at specified position.
  1834. Warning: no copy to tempob first.
  1835. " "260FD") "^MATTRAN" ("M \\-> M'
  1836. " "Matrix transposition.
  1837. " "33B006" :wasCSys) "^Yext" ("V2 V1 \\-> ob
  1838. " "Scalar product of symbolic vectors, no check.
  1839. " "331006" :wasCSys) "MATR>C" ("[%re] [%im] \\-> [C%]
  1840. " "Creates complex matrix from real and
  1841. imaginary parts.
  1842. " "2F1D5" :UBS) "MATC>R" ("[C%] \\-> [%re] [%im]
  1843. " "Explodes complex matrix into real and
  1844. imaginary parts.
  1845. " "2F1D6" :UBS) "^BESTMATRIXTYPE" ("ob \\-> ob
  1846. " "Converts symbolic matrix with real/cmplex
  1847. entries to a numeric array.
  1848. " "169006" :wasCSys) "^CKNUMARRY" ("ob \\-> ob
  1849. " "Tests if ob is a numeric array. Tries to
  1850. convert symbolic array to numeric array.
  1851. " "172006" :wasCSys) "^MATRIX2ARRAY" ("[] \\-> []
  1852. [[]] \\-> [[]]
  1853. " "Tries to convert a symbolic matrix to a
  1854. numeric one.
  1855. " "178006" :wasCSys) "^ListToArry" ("{}/{{}} \\-> []/[[]] TRUE
  1856. \\-> FALSE
  1857. " "If possible, converts list of lists to normal
  1858. array (containing only real or complex
  1859. numbers) and returns TRUE. Otherwise, returns
  1860. FALSE.
  1861. " "001007" :wasCSys) "MAKEARRY" ("{#n #m} ob \\-> []
  1862. " "Makes array with all elements initialized to
  1863. ob.
  1864. " "03442" :UBS) "^XEQ>ARRY" ("ob1...obn {%n} \\-> []
  1865. ob11...obmn {%m %n} \\-> [[mxn]]
  1866. " "Builds a matrix a la \\->ARRY.
  1867. " "17F006" :wasCSys) "^XEQ>ARRAY1" ("
  1868. " "" "180006" :wasCSys) "^" ("" "Explodes a matrix a la \\->ARRY.
  1869. " "17C006" :wasCSys) "^ArryToMatrix" ("[] \\-> M
  1870. " "Converts array to symbolic array.
  1871. " "002007") "STATCLST" ("\\->
  1872. " "Clears \\GSDAT.
  1873. " "2EEDA") "STATN" ("\\-> N
  1874. " "Internal N\\GS.
  1875. " "2EEDC") "STATSMIN" ("\\-> %
  1876. " "Internal MIN\\GS.
  1877. " "2EEDF") "STATSMAX" ("\\-> %
  1878. " "Internal MAX\\GS.
  1879. " "2EEDD") "STATMEAN" ("\\-> %
  1880. \\-> []
  1881. " "Internal MEAN.
  1882. " "2EEDE") "STATSTDEV" ("\\-> %
  1883. \\-> []
  1884. " "Internal SDEV.
  1885. " "2EEE0") "STATTOT" ("\\-> %
  1886. \\-> []
  1887. " "Internal TOT.
  1888. " "2EEE1") "STATVAR" ("\\-> %
  1889. \\-> []
  1890. " "Internal VAR.
  1891. " "2EEE2") "ListIntSlp" ("\\-> {}
  1892. " "List with the two strings \"Intercept\" and
  1893. \"Slope\".
  1894. " "3DF92" :UBS) "SIbasis" ("{ 1_kg 1_m... }
  1895. " "Returns a list of the 10 base units of the
  1896. HP49G.
  1897. " "2D781" :UBS) "unit_kg" ("1_kg
  1898. " "" "2D837" :UBS) "unit_m" ("1_m
  1899. " "" "2D863" :UBS) "unit_A" ("1_A
  1900. " "" "2D883" :UBS) "unit_s" ("1_s
  1901. " "" "2D8A3" :UBS) "unit_K" ("1_K
  1902. " "" "2D8C3" :UBS) "unit_cd" ("1_cd
  1903. " "" "2D8E3" :UBS) "unit_mol" ("1_mol
  1904. " "" "2D905" :UBS) "unit_r" ("1_r
  1905. " "" "2D7A9" :UBS) "unit_sr" ("1_sr
  1906. " "" "2D7C9" :UBS) "unit_?" ("1_?
  1907. " "" "2D929" :UBS) "unit_R" ("1_\\^oR
  1908. " "" "2D7F5" :UBS) "um*" ("* marker
  1909. " "" "2D74F") "um/" ("/ marker
  1910. " "" "2D759") "um^" ("^ marker
  1911. " "" "2D763") "umP" ("Char prefix operator
  1912. " "" "2D76D") "umEND" ("Unit end operator
  1913. " "" "2D777") "EXTN" ("ob1..obn #n \\-> u
  1914. " "Builds a unit object.
  1915. " "05481") "U>NCQ" ("u \\-> n%% cf%% qhxs
  1916. " "Returns the number, conversion factor to base
  1917. units and a vector in the form:
  1918. [ kg m A s K cd mol r sr ? ]
  1919. where each element represents the exponent of
  1920. that unit. For example, 1_N U>NCQ would
  1921. return:
  1922. %%1 %%1 [ 1 1 0 -2 0 0 0 0 0 0 ]
  1923. since it is equivalent to 1_kg*m/s^2
  1924. " "2F099") "UM>U" ("% u \\-> u'
  1925. " "Replaces number part of unit.
  1926. " "2F07A") "UMCONV" ("u1 u2 \\-> u1'
  1927. " "Change units of unit1 to units of unit2.
  1928. " "2F08C") "UMSI" ("u \\-> u'
  1929. " "Equivalent to user word UBASE.
  1930. " "2F090") "UMU>" ("u \\-> % u'
  1931. " "Returns number and normalized part of unit.
  1932. " "2F095") "UNIT>$" ("u \\-> $
  1933. " "Converts unit to string.
  1934. " "2F019") "UMFACT" ("u1 u2 \\-> u
  1935. " "Equivalent to user word UFACT.
  1936. " "3900B" :UBS) "U>nbr" ("u \\-> %
  1937. " "Returns number part of unit.
  1938. " "2F07B") "Unbr>U" ("u % \\-> u'
  1939. " "Replaces number part of unit.
  1940. " "2F098") "TempConv" ("???
  1941. " "Used by UMCONV for the conversion of
  1942. temperature units.
  1943. " "2F09A") "KeepUnit" ("% ob ob' \\-> % ob
  1944. % ob u \\-> u' ob
  1945. " "If the level one object is a unit object,
  1946. replaces the numeric part of it with the
  1947. number on level 3. If not, just DROP.
  1948. " "25EE4") "UM+" ("u u' \\-> u''
  1949. " "" "2F081") "UM-" ("u u' \\-> u''
  1950. " "" "2F082") "UM*" ("u u' \\-> u''
  1951. " "" "2F080") "UM/" ("u u' \\-> u''
  1952. " "" "2F083") "UM^" ("u % \\-> u'
  1953. " "" "2F097") "UM%" ("u %percent \\-> u'
  1954. " "" "2F07D") "SWAPUM%" ("%percent u \\-> u'
  1955. " "" "3B2A6" :UBS) "UM%CH" ("u u' \\-> %
  1956. " "" "2F07E") "UM%T" ("u u' \\-> %
  1957. " "" "2F07F") "UMMIN" ("u u' \\-> u?
  1958. " "" "2F08F") "UMMAX" ("u u' \\-> u?
  1959. " "" "2F08E") "UMXROOT" ("u u' \\-> u''
  1960. " "" "2F096") "SWAPUMXROOT" ("u u' \\-> u''
  1961. " "DOes SWAP then <REF>UMXROOT.
  1962. " "3A2FA" :UBS) "UMABS" ("u \\-> u'
  1963. " "" "2F08A") "UMCHS" ("u \\-> u'
  1964. " "" "2F08B") "UMSQ" ("u \\-> u'
  1965. " "" "2F092") "UMSQRT" ("u \\-> u'
  1966. " "" "2F093") "UMSIGN" ("u \\-> %
  1967. " "" "2D949") "UMIP" ("u \\-> u'
  1968. " "" "2D95D") "UMFP" ("u \\-> u'
  1969. " "" "2D971") "UMFLOOR" ("u \\-> u'
  1970. " "" "2D985") "UMCEIL" ("u \\-> u'
  1971. " "" "2D999") "UMRND" ("u \\-> u'
  1972. " "" "2D9CB") "UMTRC" ("u \\-> u'
  1973. " "" "2D9EE") "UMCOS" ("u \\-> u'
  1974. " "" "2F08D") "UMSIN" ("u \\-> u'
  1975. " "" "2F091") "UMTAN" ("u \\-> u'
  1976. " "" "2F094") "UM=?" ("u u' \\-> %flag
  1977. " "" "2F087") "UM#?" ("u u' \\-> %flag
  1978. " "" "2F07C") "UM<?" ("u u' \\-> %flag
  1979. " "" "2F086") "UM>?" ("u u' \\-> %flag
  1980. " "" "2F089") "UM<=?" ("u u' \\-> %flag
  1981. " "" "2F085") "UM>=?" ("u u' \\-> %flag
  1982. " "" "2F088") "puretemp?" ("[] []' \\-> [] []' flag
  1983. " "Checks of the two arrays both denote pure
  1984. temperature units, i.e. if both arrays are
  1985. equal to
  1986. [0. 0. 0. 0. 1. 0. 0. 0. 0. 0.]
  1987. " "2F076") "&COMP" ("comp comp' \\-> comp''
  1988. " "Concatenates two composites.
  1989. " "0521F") ">TCOMP" ("comp ob \\-> comp+ob
  1990. " "Adds ob to tail (end) of composite.
  1991. " "052FA") "#>TCOMP+1" ("comp # \\-> comp&# #+1
  1992. " "Adds bint to tail of composite and increases
  1993. bint by one
  1994. " "08E33" :UBS) ">HCOMP" ("comp ob \\-> ob+comp
  1995. " "Adds ob to head (beginning) of composite.
  1996. " "052C6") "!>HCOMP" ("comp ob \\-> ob+comp
  1997. " "Tries do to >HCOMP in place???
  1998. " "2949D" :UBS) "!>HCOMPcopy" ("comp ob \\-> ob+comp
  1999. " "Calls <REF>!PTR>HCOMP if <REF>INHARDROM?, otherwise
  2000. does >TOPTEMP on both args and then <REF>!?HCOMP.
  2001. " "294CF" :UBS) "!&HCOMP" ("comp ob \\-> ob+comp
  2002. " ">HCOMP in place?
  2003. " "29501" :UBS) "!PTR>HCOMP" ("comp PTR \\-> PTR+comp
  2004. " "Can be used if PTR is in HARDROM.
  2005. " "295BA" :UBS) "SWAP>HCOMP" ("ob comp \\-> ob+comp
  2006. " "Does SWAP then >HCOMP.
  2007. " "39C8B" :UBS) "CARCOMP" ("comp \\-> ob_head
  2008. comp_null \\-> comp_null
  2009. " "Returns first object of the composite, or a
  2010. null composite if the argument is a null
  2011. composite.
  2012. " "05089") "?CARCOMP" ("comp T \\-> ob
  2013. comp F \\-> comp
  2014. " "If the flag is TRUE, does CARCOMP.
  2015. " "361C6") "CDRCOMP" ("comp \\-> comp-ob_head
  2016. comp_null \\-> comp_null
  2017. " "Returns the composite minus its first object,
  2018. or a null composite if the argument is a null
  2019. composite.
  2020. " "05153") "TWONTHCOMPDROP" ("comp \\-> ob2
  2021. " "Gets the second element of composite.
  2022. " "2825E" :UBS) "^LASTCOMP" ("comp \\-> ob
  2023. " "Gets the last element of composite. Does
  2024. <REF>DUPLENCOMP then <REF>NTHCOMPDROP.
  2025. " "2BC006" :wasCSys) "LENCOMP" ("comp \\-> #n
  2026. " "Returns length of composite (number of
  2027. objects).
  2028. " "0567B") "DUPLENCOMP" ("comp \\-> comp #n
  2029. " "Does DUP then <REF>LENCOMP.
  2030. " "3627A") "NULLCOMP?" ("comp \\-> flag
  2031. " "If the composite is empty, returns TRUE.
  2032. " "055B7") "DUPNULLCOMP?" ("comp \\-> comp flag
  2033. " "Does DUP then <REF>NULLCOMP?.
  2034. " "36266") "NTHELCOMP" ("comp #i \\-> ob T
  2035. \\-> F
  2036. " "Returns specified element of composite and
  2037. TRUE, or just FALSE if it could not be found.
  2038. " "056B6") "NTHCOMPDROP" ("comp #i \\-> ob
  2039. " "Does <REF>NTHELCOMP then DROP.
  2040. " "35BC3") "NTHCOMDDUP" ("comp #i \\-> ob ob
  2041. " "Does <REF>NTHCOMPDROP then DUP.
  2042. " "35D58") "POSCOMP" ("comp ob pred \\-> #i
  2043. \\-> #0
  2044. (eg: pred = ' %<)
  2045. " "Evaluates pred for all elements of composite
  2046. and ob, and returns index of first object for
  2047. which the pred is TRUE. If no one returned
  2048. TRUE, returns #0. For example, the program
  2049. below returns #4:
  2050. :: { %1 %2 %3 %-4 %-5 %6 %7 } %0
  2051. ' %< POSCOMP ;
  2052. " "376EE") "EQUALPOSCOMP" ("comp ob \\-> #pos
  2053. \\-> #0
  2054. " "POSCOMP with EQUAL as test.
  2055. " "3776B") "NTHOF" ("ob comp \\-> #i
  2056. \\-> #0
  2057. " "Does SWAP then <REF>EQUALPOSCOMP.
  2058. " "37784") "^ListPos" ("ob {} \\-> #i / #0
  2059. " "Equivalent to NTHOF, but faster. However, it
  2060. only works for lists.
  2061. " "0FD006" :wasCSys) "#=POSCOMP" ("comp # \\-> #i
  2062. \\-> #0
  2063. " "POSCOMP with #= as test.
  2064. " "37752") "SUBCOMP" ("comp #m #n \\-> comp'
  2065. " "Returns a sub-composite. Makes all index
  2066. checks first.
  2067. " "05821") "matchob?" ("ob comp \\-> T
  2068. \\-> ob F
  2069. " "Returns TRUE if ob is EQUAL to any element of
  2070. the composite.
  2071. " "376B7") "Embedded?" ("ob1 ob2 \\-> flag
  2072. " "Returns TRUE if ob2 is embedded in, or is the
  2073. same as, ob1. Otherwise returns FALSE.
  2074. " "371B3") "Find1stTrue" ("comp test \\-> ob T
  2075. \\-> F
  2076. " "Tests every element for test. The first one
  2077. that returns TRUE is put into the stack along
  2078. with TRUE. If no object returned TRUE, FALSE
  2079. is put into the stack. For example, the
  2080. program below returns %-4 and TRUE.
  2081. :: { %1 %2 %2 %-4 %-5 %6 } ' %0<
  2082. Find1stTrue ;
  2083. " "37798") "Find1stT.1" ("
  2084. " "Recursive internal function for Find1stTrue.
  2085. " "25F2C") "Lookup" ("ob test comp \\-> nextob T
  2086. \\-> ob F
  2087. " "Tests every odd element (1,3,...) in the
  2088. composite. If a test returns TRUE, the
  2089. object after the tested one is returned,
  2090. along with TRUE. If no object tests TRUE,
  2091. FALSE is returned. For example, the program
  2092. below returns %6 and TRUE.
  2093. :: %0 ' %<
  2094. { %1 %2 %3 %-4 %-5 %6 }
  2095. Lookup ;
  2096. " "377C5") "Lookup.1" ("ob test \\-> nextob T
  2097. \\-> ob F
  2098. Return Stack:
  2099. comp \\->
  2100. " "Lookup with the composite already pushed
  2101. (with >R) onto the runstream. Called by
  2102. Lookup.
  2103. " "377DE") "EQLookup" ("ob comp \\-> nextob T
  2104. \\-> ob F
  2105. " "Lookup with EQ as test.
  2106. " "37829") "NEXTCOMPOB" ("comp #ofs \\-> comp #ofs' ob T
  2107. \\-> comp F
  2108. " "Returns object at specified nibble offset
  2109. from start. If the object is SEMI (i.e., the
  2110. end of the composite has been reached)
  2111. returns FALSE. To get the first element, use
  2112. FIVE as offset value (to skip the prolog).
  2113. ZERO works as well.
  2114. " "37B54") "COMPN" ("obn..ob1 #n #prolog \\-> comp
  2115. " "" "05331" :UBS) "{}N" ("obn..ob1 #n \\-> { obn..ob1 }
  2116. " "" "05459") "::N" ("ob1..obn #n \\-> :: ob1..obn ;
  2117. " "" "05445") "SYMBN" ("ob1..obn #n \\-> symb
  2118. " "Build a symbolic object.
  2119. " "0546D") "top&Cr" ("meta1 meta2 \\-> symb
  2120. " "Does top& then <REF>SYMBN: .
  2121. " "36F8D") "ONESYMBN" ("ob1..obn #n \\-> symb
  2122. " "" "286F6" :UBS) "EXTN" ("ob1..obn #n \\-> u
  2123. " "Builds a unit object.
  2124. " "05481") "P{}N" ("ob1..obn #n \\-> {}
  2125. " "Build list with possible garbage collection.
  2126. " "293F8") "P::N" ("ob1..obn #n \\-> seco
  2127. " "Build seco with possible garbage collection.
  2128. " "2942F" :UBS) "PSYMBN" ("ob1..obn #n \\-> sym
  2129. " "Build symb with possible garbage collection.
  2130. " "293C1" :UBS) "INNERCOMP" ("comp \\-> obn..ob1 #n
  2131. " "" "054AF") "DUPINCOMP" ("comp \\-> comp obn..ob1 #n
  2132. " "" "3622A") "SWAPINCOMP" ("comp obj \\-> obj obn..ob1 #n
  2133. " "" "3623E") "INCOMPDROP" ("comp \\-> obn..ob1
  2134. " "" "35BAF") "INNERDUP" ("comp \\-> obn..ob1 #n #n
  2135. " "" "35C68") "ICMPDRPRTDRP" ("comp \\-> obn...ob4 ob2 ob1
  2136. " "Does <REF>INCOMPDROP then ROTDROP.
  2137. " "2F0EC") "XEQLIST>" ("comp \\-> obn..ob1 %n
  2138. " "" "3BADA" :UBS) "INNER#1=" ("comp \\-> obn..ob1 flag
  2139. " "" "366E9") "^SYMBINCOMP" ("symb \\-> ob1 .. obN #n
  2140. ob \\-> ob #1
  2141. {} \\-> {} #1
  2142. " "Explodes symbolic object into meta. Other
  2143. objects are converted into one-object metas
  2144. by pushing #1 into the stack.
  2145. " "157006" :wasCSys) "^2SYMBINCOMP" ("ob1 ob2 \\-> meta1 meta2
  2146. " "Does ^SYMBINCOMP for 2 objects.
  2147. " "12A006" :wasCSys) "^CKINNERCOMP" ("{} \\-> ob1 .. obN #n
  2148. ob \\-> ob #1
  2149. " "Explodes a list into a meta object. Other
  2150. objects are converted into one-object metas
  2151. by pushing #1 into the stack.
  2152. " "158006" :wasCSys) "INNERtop&" ("obn..ob1 #n comp \\-> obm..ob1 #m
  2153. " "Explodes composite and adds to meta:
  2154. INNERCOMP top&
  2155. Adds composite objects to meta object.
  2156. " "297EF" :UBS) "NULL{}" ("\\-> {}
  2157. " "Pushes a null list to the stack.
  2158. " "055E9") "DUPNULL{}?" ("{} \\-> {} flag
  2159. " "" "36ABD") "^DUPCKLEN{}" ("{} \\-> {} #n
  2160. ob \\-> ob #1
  2161. " "Return length of list, or 1 for non-lists.
  2162. " "159006" :wasCSys) "ONE{}N" ("ob \\-> { ob }
  2163. " "" "29D18") "TWO{}N" ("ob1 ob2 \\-> { ob1 ob2 }
  2164. " "" "36202") "THREE{}N" ("ob1 ob2 ob3 \\-> { ob1 ob2 ob3 }
  2165. " "" "36216") "#1-{}N" ("ob1..obn #n+1 \\-> {}
  2166. " "" "361EE") "PUTLIST" ("ob #i {} \\-> {}'
  2167. " "Replaces object at specified
  2168. position. Assumes valid #i.
  2169. " "2B42A") "^INSERT{}N" ("{} ob # \\-> {}'
  2170. " "Insert object into list at given position.
  2171. The position must be < than length of the
  2172. list. If the position is zero, >TCOMP is
  2173. used.
  2174. " "2FC006" :wasCSys) "^NEXTPext" ("list \\-> list1 list2
  2175. " "Extract in list2 all occurrances of the 1st
  2176. object of list, the remaining objects are
  2177. stored in list1. list1 = list-list2.
  2178. " "2FB006" :wasCSys) "^COMPRIMext" ("{} \\-> {}'
  2179. " "Suppress multiple occurrances in the list.
  2180. " "2FD006" :wasCSys) "^CKCARCOMP" ("{} \\-> ob1
  2181. ob \\-> ob
  2182. " "Returns first element for lists, or object
  2183. itself if it is not a list.
  2184. " "15A006" :wasCSys) "apndvarlst" ("{} ob \\-> {}'
  2185. " "Appends ob to list if not already there.
  2186. " "2EF5A") "^AppendList" ("{} ob \\-> {}'
  2187. " "Equivalent to apndvarlst, but faster.
  2188. " "0FE006" :wasCSys) "^prepvarlist" ("{} ob \\-> {}'
  2189. " "Adds ob at the beginning of the list if not
  2190. present. If ob is in list, move ob to the
  2191. beginning of list. Unfortunately moving an
  2192. entry does influence the sequence of the rest
  2193. of the list unchanged.
  2194. " "4EB006" :wasCSys) "^SortList" ("L pred \\-> L'
  2195. " "Sorts list according to give predicate. Pred
  2196. is a program that tests two elements and
  2197. returns FALSE if the first is to appear
  2198. earlier than the second. To sort in numerical
  2199. order, for example, the predicate would be a
  2200. > test.
  2201. " "100006" :wasCSys) "^PIext" ("{} \\-> ob
  2202. " "Returns the product of all elements of the
  2203. list.
  2204. " "28A006" :CSys) "EqList?" ("ob \\->
  2205. " "Is ob a list of equations? Returns T if ob
  2206. is a list of at least two elements, and the
  2207. second element is not a list itself.
  2208. " "25ED3") "NULL::" ("\\-> :: ;
  2209. " "Returns null secondary.
  2210. " "055FD") "Ob>Seco" ("ob \\-> :: ob ;
  2211. " "Does ONE then <REF>::N.
  2212. " "37073") "?Ob>Seco" ("ob \\-> :: ob ;
  2213. " "If the object is not a secondary, does
  2214. Ob>Seco.
  2215. " "3705A") "2Ob>Seco" ("ob1 ob2 \\-> :: ob1 ob2 ;
  2216. " "Does TWO then <REF>::N.
  2217. " "37087") "::NEVAL" ("ob1..obn #n \\-> ?
  2218. " "Does <REF>::N then <REF>EVAL.
  2219. " "3631A") "dup" ("meta \\-> meta meta
  2220. " "" "29A35" :UBS) "NDROP" ("meta \\->
  2221. " "Should be called drop.
  2222. " "0326E") "DROPNDROP" ("meta ob \\->
  2223. " "Should be called DROPdrop.
  2224. " "37032") "N+1DROP" ("ob meta \\->
  2225. " "Should be called dropDROP.
  2226. " "35FB0") "#1+NDROP" ("ob meta \\->
  2227. " "Should be called dropDROP.
  2228. " "35FB0") "NDROPFALSE" ("meta \\-> F
  2229. " "Should be called dropFALSE.
  2230. " "28211") "^NDROPZERO" ("obn..ob1 #n \\-> #0
  2231. " "Replace Meta object with empty Meta object.
  2232. Should be called dropZERO.
  2233. " "391006" :wasCSys) "psh" ("meta1 meta2 \\-> meta2 meta1
  2234. " "Should be called swap.
  2235. " "29A5D") "roll2ND" ("meta1 meta2 meta3 \\-> meta2 meta3 meta1
  2236. " "Should be called rot.
  2237. " "29A8F") "unroll2ND" ("meta1 meta2 meta3 \\-> meta3 meta1 meta2
  2238. " "Should be called unrot.
  2239. " "29B12") "SWAPUnNDROP" ("meta1 meta2 \\-> meta2
  2240. " "Should be called swapdrop.
  2241. " "3695A") "SWAPUnDROP" ("meta1 meta2 \\-> meta2 ob1..obn
  2242. " "Swaps two metas and drops the count. Should
  2243. be called swapDROP.
  2244. " "36946") "metaROTDUP" ("meta1 meta2 meta3 \\-> meta2 meta3 meta1 meta1
  2245. " "Should be called rotdup.
  2246. " "36FA6") "top&" ("meta1 meta2 \\-> meta1&meta2
  2247. " "" "296A7") "pshtop&" ("meta1 meta2 \\-> meta2&meta1
  2248. " "" "2973B") "top&top&" ("meta1 meta2 meta3 \\-> meta1&meta2&meta3
  2249. " "" "29722" :UBS) "ROTUntop&" ("meta1 meta2 meta3 \\-> meta2 meta3&meta1
  2250. " "" "36FBA") "rolltwotop&" ("meta1 meta2 meta3 \\-> meta3 meta1&meta2
  2251. " "" "36FCE") "roll2top&" ("meta1 meta2 meta3 \\-> meta3 meta1&meta2
  2252. " "" "36FCE") "psh&" ("meta1 meta2 meta3 \\-> meta1&meta3 meta2
  2253. " "" "2963E") "SWP1+" ("meta ob \\-> meta&ob
  2254. " "" "3592B") "SWAP#1+" ("meta ob \\-> meta&ob
  2255. " "" "3592B") "DUP#1+PICK" ("ob&meta \\-> ob&meta ob
  2256. " "" "34431") "'R'RROT2+" ("meta \\-> meta&nob&nob1
  2257. " "Takes nob and nob1 from run stream and adds
  2258. them to the meta.
  2259. " "2979A" :UBS) "get1" ("ob meta \\-> meta ob
  2260. " "" "34504") "OVER#2+UNROL" ("meta ob \\-> ob meta
  2261. " "" "36147") "psh1top&" ("meta ob \\-> ob&meta
  2262. " "" "29693") "#1-SWAP" ("meta&ob \\-> meta ob
  2263. " "" "28071") "pull" ("meta&ob \\-> meta ob
  2264. " "" "28071") "pullrev" ("ob&meta \\-> meta ob
  2265. " "" "28085") "pulldroppull" ("meta&ob1&ob2 \\-> meta ob1
  2266. " "" "29137" :UBS) "2pull2DROP" ("meta&ob1&ob2 \\-> meta
  2267. " "" "2899D" :UBS) "psh1&" ("meta1 meta2 ob \\-> ob&meta1 meta2
  2268. " "" "29821") "psh1&rev" ("meta1 meta2 ob \\-> ob&meta1 meta2
  2269. " "" "298C0") "(rot1)" ("ob meta1 meta2 \\-> meta1 meta2 ob
  2270. " "" "2F193") "UobROT" ("ob meta1 meta2 \\-> meta1 meta2 ob
  2271. " "" "2F193") "pullpsh1&" ("meta1 meta2&ob \\-> ob&meta1 meta2
  2272. " "" "29754") "^addt0meta" ("meta1&ob meta2 \\-> meta1 meta2
  2273. " "Removes the last object of meta1.
  2274. " "406006" :wasCSys) "pshzer" ("meta \\-> #0 meta
  2275. " "" "29972") "xnsgeneral" ("meta \\-> LAM3&meta&LAM1
  2276. " "Uses contents of LAM1 and LAM3.
  2277. " "2F38E") "xsngeneral" ("meta \\-> meta&LAM3&LAM1
  2278. " "Uses contents of LAM1 and LAM3.
  2279. " "2F38F") "SubMetaOb" ("meta #start #end \\-> meta'
  2280. " "Gets a sub-meta. Does range checks.
  2281. " "3760D") "SubMetaOb1" ("ob1..obi..obn #n #i #n #i \\-> ob1..obi #n #i
  2282. " "This function can be used to take the first i
  2283. objects of a meta, if you follow it with
  2284. SWAPDROP. Example:
  2285. :: %1 %2 %3 %4 %5 BINT5
  2286. BINT3 BINT5 BINT3
  2287. SubMetaOb1 ;
  2288. results in:
  2289. %1 %2 %3 #5 #3
  2290. " "37685") "^submeta" ("meta #begin #end \\-> meta'
  2291. " "Extracts QsubmetaQ from a meta.
  2292. " "33F006") "metatail" ("ob1..obn-i..obn #i #n+1 \\-> ob1..ob..obn-i #n-i obn-i+1..obn #i
  2293. " "#n is the count of the objects in meta. Takes
  2294. the last #i elements of meta and creates a
  2295. new one. Example:
  2296. :: %1 %2 %3 %4 %5
  2297. BINT2 BINT6 metatail ;
  2298. Results:
  2299. %1 %2 %3 #3 %4 %5 #2
  2300. " "2F356") "^metasplit" ("meta #i \\-> meta1 meta2
  2301. " "Split a meta in 2 metas at position i.
  2302. meta1 will contain #i elements
  2303. meta2 will contain #n-i elements.
  2304. " "385006" :wasCSys) "^metaEQUAL?" ("meta2 meta1 \\-> meta2 meta1 flag
  2305. " "Test equality of 2 metas.
  2306. " "39F006" :wasCSys) "^EQUALPOSMETA" ("Meta ob \\-> Meta ob #pos
  2307. " "Returns last occurrence of ob in Meta. If a
  2308. component of meta is a list/symb then search
  2309. if ob is embedded in this component of meta.
  2310. " "3BF006" :wasCSys) "^EQUALPOS2META" ("Meta2 Meta1 ob \\-> Meta2 Meta1 ob #pos
  2311. " "Returns last occurrence of ob in Meta1 or in
  2312. Meta2. #pos is >0 if in meta2, is <0 if in
  2313. meta1 (#pos=MINUSONE-#).
  2314. " "3C0006" :wasCSys) "^METAINT?" ("Meta \\-> Meta flag
  2315. " "Tests if Meta is an integer.
  2316. " "198006" :wasCSys) "^METAPOSINT?" ("Meta \\-> Meta flag
  2317. " "Tests if Meta is a positive integer smaller
  2318. than Zsmall.
  2319. " "199006" :wasCSys) "SYMBN" ("ob1..obn #n \\-> sym
  2320. " "" "0546D") "Cr" ("ob1..obn #n -> symb
  2321. " "Does 'R, SWAP#1+ then <REF>SYMBN . Creates a
  2322. symbolic from the meta in the stack and the
  2323. next object in the runstream. This object is
  2324. added to the end of the symbolic.
  2325. " "2BD8C" :UBS) "NULLSYMB" ("\\-> sym
  2326. " "Puts a null algebraic in the stack.
  2327. " "055F3" :UBS) "symcomp" ("ob \\-> ob'
  2328. " "If ob is symbolic, does nothing, otherwise
  2329. ONE SYMBN.
  2330. " "286E7") "SWAPcompSWAP" ("ob ob' \\-> ob'' ob'
  2331. " "Does SWAP symcomp SWAP.
  2332. " "2F073") "DROP?symcomp" ("%/C%/Z/id/lam ob' \\-> %/C%/Z/id/lam
  2333. ob ob' \\-> symb
  2334. " "Drop ob'. Then, if the object in the stack is
  2335. a real, complex, zint, identifier or lam,
  2336. does nothing. For other objects, calls
  2337. symcomp to create a one-object symbolics.
  2338. " "28ACE" :UBS) "?symcomp" ("%/C%/Z/id/lam #1 \\-> %/C%/Z/id/lam
  2339. ob #1 \\-> symb
  2340. ob # \\-> symb
  2341. " "If # is BINT1, calls DROP?symcomp. If it is
  2342. any other number, calls SYMBN.
  2343. " "293A3" :UBS) "SPLITEQ" ("sym \\-> arg1 arg2
  2344. " "Internal version of EQ\\->.
  2345. " "2F25E" :UBS) "EXPR>" ("sym \\-> arg1..argn %n ob
  2346. " "Internal version of OBJ\\->.
  2347. " "2F242" :UBS) "CRUNCH" ("ob \\-> %
  2348. " "Internal version of \\->NUM.
  2349. " "25EA2") "FINDVAR" ("sym \\-> {}
  2350. " "Returns a list of the variables of the
  2351. equation, recursing into programs and
  2352. functions in the equation.
  2353. " "2F110" :UBS) "^EQUATION?" ("ob \\-> ob flag
  2354. " "Returns TRUE if ob is a symbolic finishing by
  2355. x=.
  2356. " "462006" :wasCSys) "^USERFCN?" ("ob \\-> ob flag
  2357. " "Returns TRUE if ob is a symbolic finishing by
  2358. xFCNAPPLY.
  2359. " "463006" :wasCSys) "uncrunch" ("\\->
  2360. " "Clears numeric results flag (system flag 3)
  2361. for the next command only. Example:
  2362. SYMCOLCT = :: uncrunch colct ;
  2363. --
  2364. Flags: -3
  2365. " "29CB9") "cknumdsptch1" ("sym \\-> symf
  2366. " "Used by one argument functions to evaluate a
  2367. symbolic or numeric routine according to
  2368. numeric results flag. Usage:
  2369. :: cknumdsptch1 <sym> <num> ;
  2370. If numeric mode, CRUNCH is applied to the
  2371. level one object and COLA is applied to
  2372. <num>. If symbolic mode, ckseval1: is called.
  2373. Example:
  2374. :: cknumdsptch1 MetaRE xRE ;
  2375. --
  2376. Flags: -3
  2377. " "2BCA2") "sscknum2" ("sym sym \\-> symf
  2378. " "Used by two argument functions to evaluate
  2379. function according to current numeric mode.
  2380. Usage: :: sscknum2 <sym> <num> ;
  2381. " "2BB21") "sncknum2" ("sym % \\-> symf
  2382. " " Usage: :: sncknum2 <sym> <num> ;
  2383. In symbolic mode uses cksneval2:.
  2384. Example:
  2385. SYM+O = :: sncknum2 Meta+Con x+ ;
  2386. " "2BB3A") "nscknum2" ("% sym \\-> symf
  2387. " " Usage: :: nscknum2 <sym> <num> ;
  2388. In symbolic mode uses cknseval2:.
  2389. Example:
  2390. O+SYM = :: nscknum2 Con+Meta x+ ;
  2391. " "2BB53") "D/D*" ("
  2392. " "Derivative of multiplication.
  2393. " "2C07B") "D/D+" ("
  2394. " "Derivative of addition.
  2395. " "2C086") "D/D-" ("
  2396. " "Derivative of subtraction.
  2397. " "2C091") "D/D/" ("
  2398. " "Derivative of division.
  2399. " "2C09C") "D/Dalg=" ("
  2400. " "Derivative of equality.
  2401. " "2C10B") "D/D=" ("
  2402. " "Derivative of equality.
  2403. " "2C10B") "D/DABS" ("
  2404. " "Derivative of ABS.
  2405. " "2C116") "D/DACOS" ("
  2406. " "Derivative of ACOS.
  2407. " "2C13A") "D/DACOSH" ("
  2408. " "Derivative of ACOSH.
  2409. " "2C145") "D/DALOG" ("
  2410. " "Derivative of ALOG.
  2411. " "2C150") "D/DAPPLY" ("
  2412. " "" "2C2B5") "D/DARG" ("
  2413. " "Derivative of ARG.
  2414. " "2C15B") "D/DASIN" ("
  2415. " "Derivative of ASIN.
  2416. " "2C166") "D/DASINH" ("
  2417. " "Derivative of ASINH.
  2418. " "2C171") "D/DATAN" ("
  2419. " "Derivative of ATAN.
  2420. " "2C17C") "D/DATANH" ("
  2421. " "Derivative of ATANH.
  2422. " "2C187") "D/DCHS" ("
  2423. " "Derivative of CHS.
  2424. " "2C192") "D/DCONJ" ("
  2425. " "Derivative of CONJ.
  2426. " "2C1B0") "D/DCOS" ("
  2427. " "Derivative of COS.
  2428. " "2C1CE") "D/DCOSH" ("
  2429. " "Derivative of COSH.
  2430. " "2C1D9") "D/DDER" ("
  2431. " "Derivative of derivative.
  2432. " "2C289") "D/DEXPM1" ("
  2433. " "Derivative of EXP.
  2434. " "2C1E4") "D/DEXP" ("
  2435. " "Derivative of EXP.
  2436. " "2C1E4") "D/DIFTE" ("
  2437. " "Derivative of IFTE.
  2438. " "2C21B") "D/DINTEGRAL" ("
  2439. " "Derivative of integral.
  2440. " "2C29F") "D/DINV" ("
  2441. " "Derivative of INV.
  2442. " "2C1EF") "D/DLN" ("
  2443. " "Derivative of LN.
  2444. " "2C1FA") "D/DLNP1" ("
  2445. " "Derivative of LNP1.
  2446. " "2C205") "D/DLOG" ("
  2447. " "Derivative of LOG.
  2448. " "2C210") "D/DSIN" ("
  2449. " "Derivative of SIN.
  2450. " "2C226") "D/DSINH" ("
  2451. " "Derivative of SINH.
  2452. " "2C231") "D/DSQ" ("
  2453. " "Derivative of SQ.
  2454. " "2C23C") "D/DSQRT" ("
  2455. " "Derivative of SQRT.
  2456. " "2C247") "D/DSUM" ("
  2457. " "Derivative of SUM.
  2458. " "2C2AA") "D/DTAN" ("
  2459. " "Derivative of TAN.
  2460. " "2C252") "D/DTANH" ("
  2461. " "Derivative of TANH.
  2462. " "2C25D") "D/DWHERE" ("
  2463. " "" "2C294") "D/D^" ("
  2464. " "Derivative of power.
  2465. " "2C268") "D/D^X" ("
  2466. " "" "2C273") "D/D^Y" ("
  2467. " "" "2C27E") "SYMSHOW" ("sym id/lam \\-> symf
  2468. " "" "2EF26") "XEQSHOWLS" ("sym {} \\-> symf
  2469. " "" "2F2A9") "pshzerpsharg" ("meta \\-> M_last M_rest
  2470. " "Pushes last sub-expression in meta. If meta
  2471. is a valid expression M_rest will be empty.
  2472. " "29986") "pZpargSWAPUn" ("meta \\-> M_rest M_last
  2473. " "<REF>pshzerpsharg then <REF>psh .
  2474. " "3701E") "plDRPpZparg" ("meta&ob \\-> M_last M_rest
  2475. " "Drops ob then calls <REF>pshzerpsharg .
  2476. " "36FE2") "^DIVMETAOBJ" ("o1...on #n ob \\-> {o1/ob...on/ob}
  2477. " "Division of all elements of a meta by ob.
  2478. Tests if o=1.
  2479. " "3F1006" :wasCSys) "NEXTLIBBAK" ("#addr \\-> backup/library #nextaddr
  2480. " "Gets next library or QbackupQ.
  2481. " "25EEB") "#>ROMPTR" ("#lib #cmd \\-> ROMPTR
  2482. " "Creates rompointer.
  2483. " "07E50") "ROMPTR>#" ("ROMPTR \\-> #lib #cmd
  2484. " "Splits rompointer.
  2485. " "08CCC") "ROMPTR@" ("ROMPTR \\-> ob T
  2486. \\-> F
  2487. " "Recalls contents of rompointer.
  2488. " "07E99") "DUPROMPTR@" ("ROMPTR \\-> ROMPTR ob T
  2489. \\-> ROMPTR F
  2490. " "Does DUP then ROMPTR@.
  2491. " "35C40") "ROMSEC" ("ROMPTR \\-> ?
  2492. " "Recalls contents of rompointer and EVAL.
  2493. Generates \"Undefined XLIB Error\" if not
  2494. found.
  2495. " "02FEF" :UBS) "?>ROMPTR" ("ob \\-> ob'
  2496. " "If ROM-WORD? and TYPECOL? then RPL@.
  2497. " "35A88") "?ROMPTR>" ("ob \\-> ob'
  2498. " "If <REF>TYPEROMP? and content exists
  2499. <REF>INHARDROM? then return contents.
  2500. " "35AAB") "RESOROMP" ("\\-> ob
  2501. " "Recalls contents of next object in the
  2502. runstream (which must be a rompointer).
  2503. " "35BFF") "PTR>ROMPTR" ("ob \\-> ROMPTR T
  2504. \\-> F
  2505. " "If the object is a library command, returns
  2506. its rompointer and TRUE, if not just FALSE.
  2507. " "07E76" :UBS) "ROMPTRDECOMP" ("ROMPTR \\-> id T
  2508. \\-> F
  2509. " "If the library command exists and has a name,
  2510. returns that name and TRUE, otherwise FALSE.
  2511. " "081FB" :UBS) "COMPILEID" ("id \\-> id T
  2512. \\-> ROMPTR T
  2513. \\-> F
  2514. " "Searches id in current path, if found returns
  2515. TRUE. Else searches attached libraries. If
  2516. nothing was found, return FALSE.
  2517. " "07C18" :UBS) "ROM-WORD?" ("ob \\-> flag
  2518. " "" "34FCD") "DUPROM-WORD?" ("ob \\-> ob flag
  2519. " "" "34FC0") "TOSRRP" ("# \\->
  2520. " "Attaches library to HOME directory.
  2521. --
  2522. <REF>TEXT:Libraries
  2523. " "07709") "OFFSRRP" ("# \\->
  2524. " "Detaches library from HOME directory.
  2525. --
  2526. <REF>TEXT:Libraries
  2527. " "076AE") "ONSRRP?" ("# \\-> flag
  2528. " "Returns TRUE if library is attached to HOME
  2529. directory.
  2530. " "0778D" :UBS) "XEQSETLIB" ("% \\->
  2531. " "Internal ATTACH.
  2532. " "2F2A7") "^GETLIBS" ("\\-> {}
  2533. " "Returns a list of all attached libraries in
  2534. the format
  2535. { { \"Title1\" #id1 } { \"Title2\" #id2 } ...}
  2536. This is used for the library menu, so
  2537. libraries without titles are skipped.
  2538. " "015002" :UBS) "^LIBS" ("\\-> {}
  2539. " "Resturns a list of all attached libraries in
  2540. the format
  2541. { \"Title1\" #id1 #port1 \"Title2\" ... }
  2542. This is the internal version of the User word
  2543. LIBS, and it also lists libraries without
  2544. title.
  2545. --
  2546. <REF>TEXT:Libraries
  2547. " "014002" :UBS) "SETHASH" ("#libnum hxs \\->
  2548. " "" "07638") "GetLibExt" ("ob1..obn #msg #lib \\-> ob1'..obm' flag
  2549. " "Call the message handler of library #lib.
  2550. The flag is TRUE if the library is attached
  2551. and has a message handler, FALSE otherwise.
  2552. Note that library message handlers usually
  2553. require extra arguments on the stack which
  2554. may also be modified during the call. The
  2555. handling of most but not all messages leaves
  2556. the #msg unchanged on the stack, so most of
  2557. the time, obm' = #msg.
  2558. --
  2559. <REF>TEXT:Libraries
  2560. " "265DA" :UBS) "ExecGetLibsExtentions_sup" ("ob1..obn #msg \\-> ob1'..obm'
  2561. " "Calls the message handlers of all attached
  2562. libraries with the specified #msg. Note that
  2563. library message handlers usually require
  2564. extra arguments on the stack which may also
  2565. be modified during the call.
  2566. --
  2567. <REF>TEXT:Libraries
  2568. " "25F2E" :UBS) "ROMPARTNAME" ("#libnum \\-> id T
  2569. \\-> F
  2570. " "Returns title of library as an ID, and
  2571. TRUE. If library is not found, returns just
  2572. FALSE.
  2573. " "08199" :UBS) "LIB>#" ("lib \\-> #libnum T
  2574. " "Returns number of library.
  2575. " "081DE" :UBS) "ROMPART>ADDR" ("#libnum \\-> #addr T
  2576. \\-> F
  2577. " "Recalls library addres + 10 (prolog and
  2578. length skipped).
  2579. " "08081" :UBS) "ROMPARTSIZE" ("#libnum \\-> #nibbles-10 T
  2580. \\-> F
  2581. " "Returns size of library.
  2582. " "080BF" :UBS) "NEXTROMPID" ("#libnum \\-> #nextlibnum T
  2583. \\-> F
  2584. " "If specified library exists, #libnum is
  2585. returned with TRUE.
  2586. " "080DA" :UBS) "GETHASH" ("#libnum \\-> hxs_table T
  2587. \\-> F
  2588. " "Gets specified library's hash table.
  2589. " "08112" :UBS) "GETMSG" ("#libnum \\-> [] T
  2590. \\-> F
  2591. " "Gets specified library's message table.
  2592. --
  2593. <REF>TEXT:Libraries
  2594. " "08130" :UBS) "SETMESG" ("[$] #libnum \\->
  2595. " "Sets message table of specified library.
  2596. --
  2597. <REF>TEXT:Libraries
  2598. " "0764E") "GETLINK" ("#libnum \\-> hxs_table T
  2599. \\-> F
  2600. " "Gets specified library's link table.
  2601. " "0813C" :UBS) "GETCONFIG" ("#libnum \\-> ob T
  2602. \\-> F
  2603. " "" "08157" :UBS) "ROMPART" ("rrp \\-> {#lib1..#libn} T
  2604. ROMPTR \\-> #libnum
  2605. " "Gets the list of libraries attached to the
  2606. directory, along with TRUE. If the argument
  2607. is a rom pointer, returns the library number
  2608. of this pointer.
  2609. " "07F86" :UBS) "XEQXRCL" (":%port:%libnum \\-> lib
  2610. " "Puts a pointer to the library with romidid
  2611. %libnum in port %port onto the stack. The
  2612. argument is a tagged real. The tag can also
  2613. be '&' in order to search all ports. The
  2614. library is not yet in TEMPOB, you need to
  2615. execute TOTEMP in order the achieve this.
  2616. " "2F2C6" :UBS) "BAKNAME" ("bak \\-> id T
  2617. " "Returns backup's name
  2618. " "081D9") "BAK>OB" ("bak \\-> ob
  2619. " "Gets QbackupQ object.
  2620. " "0905F") "DUP" ("ob \\-> ob ob
  2621. " "" "03188") "DUPDUP" ("ob \\-> ob ob ob
  2622. " "" "35CE0") "^3DUP" ("3 2 1 \\-> 3 2 1 3 2 1
  2623. " "" "2D5006" :wasCSys) "NDUPN" ("ob #n \\-> ob..ob #n
  2624. ob #0 \\-> #0
  2625. " "" "28143") "DUPROT" ("1 2 \\-> 2 2 1
  2626. " "" "35FF3") "SWAPOVER" ("1 2 \\-> 2 1 2
  2627. " "" "3457F") "DUPUNROT" ("1 2 \\-> 2 1 2
  2628. " "" "3457F") "DUPROLL" ("1..n #n \\-> 1 3..n #n 2
  2629. " "" "36133") "DUPROLLSWAP" ("1..n #n \\-> 1 3..n 2 #n
  2630. " "" "281FD" :UBS) "DUP4UNROLL" ("1 2 3 \\-> 3 1 2 3
  2631. " "" "3432C") "DUPPICK" ("n..1 #n \\-> n..1 #n n-1
  2632. " "" "3611F") "2DUPSWAP" ("1 2 \\-> 1 2 2 1
  2633. " "" "35D30") "DUP3PICK" ("1 2 \\-> 1 2 2 1
  2634. " "" "35D30") "DUP#1+PICK" ("n..1 #n \\-> n..1 #n n
  2635. " "" "34431") "DUP#2+PICK" ("n..1 #n \\-> n..1 #n n+1
  2636. " "" "29362" :UBS) "2DUP" ("1 2 \\-> 1 2 1 2
  2637. " "" "031AC") "DUP3PICK" ("1 2 \\-> 1 2 2 1
  2638. " "" "35D30") "2DUPSWAP" ("1 2 \\-> 1 2 2 1
  2639. " "" "35D30") "2DUP5ROLL" ("1 2 3 \\-> 2 3 2 3 1
  2640. " "" "36CA4") "NDUP" ("1..n #n \\-> 1..n 1..n
  2641. " "" "031D9") "DROP" ("1 \\->
  2642. " "" "03244") "DROPDUP" ("1 2 \\-> 1 1
  2643. " "" "357CE") "DROPNDROP" ("1..n #n ob \\->
  2644. " "" "37032") "DROPSWAP" ("1 2 3 \\-> 2 1
  2645. " "" "35733") "XYZ>Y" ("1 2 3 \\-> 2
  2646. " "" "3574D") "ROT2DROP" ("1 2 3 \\-> 2
  2647. " "" "3574D") "DROPSWAPDROP" ("1 2 3 \\-> 2
  2648. " "" "3574D") "DROPROT" ("1 2 3 4 \\-> 2 3 1
  2649. " "" "36007") "DROPOVER" ("1 2 3 \\-> 1 2 1
  2650. " "" "3606B") "2DROP" ("1 2 \\->
  2651. " "" "03258") "XYZ>" ("1 2 3 \\->
  2652. " "" "341D2") "3DROP" ("1 2 3 \\->
  2653. " "" "341D2") "XYZW>" ("1..4 \\->
  2654. " "" "341D7") "4DROP" ("1..4 \\->
  2655. " "" "341D7") "5DROP" ("1..5 \\->
  2656. " "" "341DC") "6DROP" ("1..6 \\->
  2657. " "" "341E8") "7DROP" ("1..7 \\->
  2658. " "" "341F4") "NDROP" ("1..n #n \\->
  2659. " "" "0326E") "N+1DROP" ("ob 1..n #n \\->
  2660. " "" "35FB0") "#1+NDROP" ("ob 1..n #n \\->
  2661. " "" "35FB0") "RESETDEPTH" ("ob1..obn obn+1..obx #n \\-> ob1..obn
  2662. " "Drops all but #n levels of the stack.
  2663. " "2F0A1") "KEEP" ("ob1..obn ob1'..obm' #m \\-> ob1'..obm'
  2664. " "Drops all stack levels above #m.
  2665. " "28335" :UBS) "DEPTH" ("1..n \\-> 1..n #n
  2666. " "" "0314C") "UStackDepth" ("\\-> #
  2667. " "The depth of the stack, similar to DEPTH.
  2668. " "371F9") "reversym" ("1..n #n \\-> n..1 #n
  2669. " "" "28187") "SWAP" ("1 2 \\-> 2 1
  2670. " "" "03223") "SWAPDUP" ("1 2 \\-> 2 1 1
  2671. " "" "3576E") "SWAP2DUP" ("1 2 \\-> 2 1 2 1
  2672. " "" "368B5") "XY>Y" ("1 2 \\-> 2
  2673. " "" "3421A") "SWAPDROP" ("1 2 \\-> 2
  2674. " "" "3421A") "SWAPDROPDUP" ("1 2 \\-> 2 2
  2675. " "" "35857") "XYZ>ZX" ("1 2 3 \\-> 3 1
  2676. " "" "35872") "UNROTDROP" ("1 2 3 \\-> 3 1
  2677. " "" "35872") "SWAPDROPSWAP" ("1 2 3 \\-> 3 1
  2678. " "" "35872") "'Rswapop" ("1 2 \\-> nop 2
  2679. " "Replaces level two with the next object in
  2680. the runstream.
  2681. " "29808" :UBS) "XYZ>ZYX" ("1 2 3 \\-> 3 2 1
  2682. " "" "341BA") "UNROTSWAP" ("1 2 3 \\-> 3 2 1
  2683. " "" "341BA") "SWAPROT" ("1 2 3 \\-> 3 2 1
  2684. " "" "341BA") "XYZW>YWZX" ("1 2 3 4 \\-> 2 4 3 1
  2685. " "" "36C90") "SWAP4ROLL" ("1 2 3 4 \\-> 2 4 3 1
  2686. " "" "36C90") "DUPUNROT" ("1 2 \\-> 2 1 2
  2687. " "" "3457F") "SWAPOVER" ("1 2 \\-> 2 1 2
  2688. " "" "3457F") "SWAP3PICK" ("1 2 3 \\-> 1 3 2 1
  2689. " "" "36CB8") "2SWAP" ("1 2 3 4 \\-> 3 4 1 2
  2690. " "" "35018") "ROT" ("1 2 3 \\-> 2 3 1
  2691. " "" "03295") "ROTDUP" ("1 2 3 \\-> 2 3 1 1
  2692. " "" "3579C") "ROT2DUP" ("1 2 3 \\-> 2 3 1 3 1
  2693. " "" "35CA4") "XYZ>YZ" ("1 2 3 \\-> 2 3
  2694. " "" "341A8") "ROTDROP" ("1 2 3 \\-> 2 3
  2695. " "" "341A8") "XYZ>Y" ("1 2 3 \\-> 2
  2696. " "" "3574D") "DROPSWAPDROP" ("1 2 3 \\-> 2
  2697. " "" "3574D") "ROT2DROP" ("1 2 3 \\-> 2
  2698. " "" "3574D") "XYZ>ZY" ("1 2 3 \\-> 3 2
  2699. " "" "34195") "ROTDROPSWAP" ("1 2 3 \\-> 3 2
  2700. " "" "34195") "XYZ>YXZ" ("1 2 3 \\-> 2 1 3
  2701. " "" "3416E") "ROTSWAP" ("1 2 3 \\-> 2 1 3
  2702. " "" "3416E") "XYZ>Z" ("1 2 3 \\-> 3
  2703. " "" "343BD") "UNROT2DROP" ("1 2 3 \\-> 3
  2704. " "" "343BD") "ROTROT2DROP" ("1 2 3 \\-> 3
  2705. " "" "343BD") "ROTOVER" ("1 2 3 \\-> 2 3 1 3
  2706. " "" "35CCC") "XYZW>YZWX" ("1 2 3 4 \\-> 2 3 4 1
  2707. " "" "3423A") "FOURROLL" ("1 2 3 4 \\-> 2 3 4 1
  2708. " "" "3423A") "4ROLL" ("1 2 3 4 \\-> 2 3 4 1
  2709. " "" "3423A") "4ROLLDROP" ("1 2 3 4 \\-> 2 3 4
  2710. " "" "3588B") "4ROLLSWAP" ("1 2 3 4 \\-> 2 3 1 4
  2711. " "" "35F06") "FOURROLLROT" ("1 2 3 4 \\-> 2 4 1 3
  2712. " "" "36043") "4ROLLROT" ("1 2 3 4 \\-> 2 4 1 3
  2713. " "" "36043") "4ROLLOVER" ("1 2 3 4 \\-> 2 3 4 1 4
  2714. " "" "360E3") "FIVEROLL" ("1 2 3 4 5 \\-> 2 3 4 5 1
  2715. " "" "34257") "5ROLL" ("1 2 3 4 5 \\-> 2 3 4 5 1
  2716. " "" "34257") "5ROLLDROP" ("1 2 3 4 5 \\-> 2 3 4 5
  2717. " "" "358A7") "SIXROLL" ("1..6 \\-> 2..6 1
  2718. " "" "34281") "6ROLL" ("1..6 \\-> 2..6 1
  2719. " "" "34281") "SEVENROLL" ("1..7 \\-> 2..7 1
  2720. " "" "342EA") "7ROLL" ("1..7 \\-> 2..7 1
  2721. " "" "342EA") "EIGHTROLL" ("1..8 \\-> 2..8 1
  2722. " "" "342BB") "8ROLL" ("1..8 \\-> 2..8 1
  2723. " "" "342BB") "9ROLL" ("1..9 \\-> 2..9 1
  2724. " "" "34318" :UBS) "ROLL" ("1..n #n \\-> 2..n 1
  2725. " "" "03325") "ROLLDROP" ("1..n #n \\-> 2..n
  2726. " "" "35FC4") "ROLLSWAP" ("1..n #n \\-> 2..n-1 1 n
  2727. " "" "35D80") "#1+ROLL" ("ob 1..n #n \\-> 1..n ob
  2728. " "" "344F2") "#2+ROLL" ("a b 1..n #n \\-> b 1..n a
  2729. " "" "34517") "^#3+ROLL" ("obn+3...obn...ob1 #n \\-> obn+2...ob1 obn+3
  2730. " "" "2D6006" :wasCSys) "#+ROLL" ("1..n+m #n #m \\-> 2..n+m 1
  2731. " "" "344DD") "#-ROLL" ("1..n-m #n #m \\-> 2..n-m 1
  2732. " "" "344CB") "XYZ>ZXY" ("1 2 3 \\-> 3 1 2
  2733. " "" "3422B") "3UNROLL" ("1 2 3 \\-> 3 1 2
  2734. " "" "3422B") "UNROT" ("1 2 3 \\-> 3 1 2
  2735. " "" "3422B") "UNROTDUP" ("1 2 3 \\-> 3 1 2 1
  2736. " "" "35D1C") "XYZ>ZX" ("1 2 3 \\-> 3 1
  2737. " "" "35872") "SWAPDROPSWAP" ("1 2 3 \\-> 3 1
  2738. " "" "35872") "UNROTDROP" ("1 2 3 \\-> 3 1
  2739. " "" "35872") "XYZ>Z" ("1 2 3 \\-> 3
  2740. " "" "343BD") "ROTROT2DROP" ("1 2 3 \\-> 3
  2741. " "" "343BD") "UNROT2DROP" ("1 2 3 \\-> 3
  2742. " "" "343BD") "XYZ>ZYX" ("1 2 3 \\-> 3 2 1
  2743. " "" "341BA") "SWAPROT" ("1 2 3 \\-> 3 2 1
  2744. " "" "341BA") "UNROTSWAP" ("1 2 3 \\-> 3 2 1
  2745. " "" "341BA") "UNROTOVER" ("1 2 3 \\-> 3 1 2 1
  2746. " "" "360CF") "XYZ>ZXY" ("1 2 3 \\-> 3 1 2
  2747. " "" "3422B") "UNROT" ("1 2 3 \\-> 3 1 2
  2748. " "" "3422B") "3UNROLL" ("1 2 3 \\-> 3 1 2
  2749. " "" "3422B") "XYZW>WXYZ" ("1 2 3 4 \\-> 4 1 2 3
  2750. " "" "34331") "FOURUNROLL" ("1 2 3 4 \\-> 4 1 2 3
  2751. " "" "34331") "4UNROLL" ("1 2 3 4 \\-> 4 1 2 3
  2752. " "" "34331") "4UNROLLDUP" ("1 2 3 4 \\-> 4 1 2 3 3
  2753. " "" "35D44") "XYZW>W" ("1 2 3 4 \\-> 4
  2754. " "" "343CF") "4UNROLL3DROP" ("1 2 3 4 \\-> 4
  2755. " "" "343CF") "4UNROLLROT" ("1 2 3 4 \\-> 4 3 2 1
  2756. " "" "36057") "FIVEUNROLL" ("1 2 3 4 5 \\-> 5 1 2 3 4
  2757. " "" "34357") "5UNROLL" ("1 2 3 4 5 \\-> 5 1 2 3 4
  2758. " "" "34357") "SIXUNROLL" ("1..6 \\-> 6 1..5
  2759. " "" "3438D") "6UNROLL" ("1..6 \\-> 6 1..5
  2760. " "" "3438D") "(SEVENUNROLL)" ("1..7 \\-> 7 1..6
  2761. " "" "35BEB") "7UNROLL" ("1..7 \\-> 7 1..6
  2762. " "" "35BEB") "8UNROLL" ("1..8 \\-> 8 1..7
  2763. " "" "3615B") "9UNROLL" ("1..9 \\-> 9 1..8
  2764. " "" "28225" :UBS) "10UNROLL" ("1..10 \\-> 10 1..9
  2765. " "" "3616F") "UNROLL" ("1..n #n \\-> n 1..n-1
  2766. " "" "0339E") "#1+UNROLL" ("ob 1..n #n \\-> n ob 1..n-1
  2767. " "" "34552") "#2+UNROLL" ("a b 1..n #n \\-> n a b 1..n-1
  2768. " "" "34564") "#+UNROLL" ("1..n+m #n #m \\-> n+m 1..n+m-1
  2769. " "" "3453D") "#-UNROLL" ("1..n-m #n #m \\-> n-m 1..n+m-1
  2770. " "" "3452B") "OVER" ("1 2 \\-> 1 2 1
  2771. " "" "032C2") "OVERDUP" ("1 2 \\-> 1 2 1 1
  2772. " "" "35CF4") "OVERUNROT" ("1 2 \\-> 1 1 2
  2773. " "" "35D6C") "OVERSWAP" ("1 2 \\-> 1 1 2
  2774. " "" "35D6C") "OVERSWAP" ("1 2 \\-> 1 1 2
  2775. " "" "35D6C") "OVERUNROT" ("1 2 \\-> 1 1 2
  2776. " "" "35D6C") "OVER5PICK" ("1 2 3 4 \\-> 1 2 3 4 3 1
  2777. " "" "36CF4") "2OVER" ("1 2 3 4 \\-> 1 2 3 4 1 2
  2778. " "" "37046") "3PICK" ("1 2 3 \\-> 1 2 3 1
  2779. " "" "34485") "3PICKSWAP" ("1 2 3 \\-> 1 2 1 3
  2780. " "" "35F1A") "3PICKOVER" ("1 2 3 \\-> 1 2 3 1 3
  2781. " "" "360F7") "3PICK3PICK" ("1 2 3 \\-> 1 2 3 1 2
  2782. " "" "36CCC") "DROP3PICK" ("1 2 3 4 \\-> 1 2 3 1
  2783. " "" "2F1C6") "4PICK" ("1 2 3 4 \\-> 1 2 3 4 1
  2784. " "" "3448A") "4PICKSWAP" ("1 2 3 4 \\-> 1 2 3 1 4
  2785. " "" "35F2E") "SWAP4PICK" ("1 2 3 4 \\-> 1 2 4 3 1
  2786. " "" "36CE0") "4PICKOVER" ("1 2 3 4 \\-> 1 2 3 4 1 4
  2787. " "" "3610B") "5PICK" ("1 2 3 4 5 \\-> 1 2 3 4 5 1
  2788. " "" "3448F") "6PICK" ("1..6 \\-> 1..6 1
  2789. " "" "34494") "7PICK" ("1..7 \\-> 1..7 1
  2790. " "" "34499") "8PICK" ("1..8 \\-> 1..8 1
  2791. " "" "3449E") "9PICK" ("1..9 \\-> 1..9 1
  2792. " "" "344A3" :UBS) "10PICK" ("1..10 \\-> 1..10 1
  2793. " "" "344A8" :UBS) "PICK" ("1..n #n \\-> 1..n 1
  2794. " "" "032E2") "UNPICK" ("1..n ob #n \\-> ob 2..n
  2795. " "" "373D0" :UBS) "#1+UNPICK" ("1..n ob #n-1 \\-> ob 2..n
  2796. " "" "37408" :UBS) "#+UNPICK" ("1..n ob #n-#m #m \\-> ob 2..n
  2797. " "" "3741A" :UBS) "#1-UNPICK" ("1..n ob #n+1 \\-> ob 2..n
  2798. " "" "3742B" :UBS) "#1+PICK" ("1..n #n-1 \\-> 1..n 1
  2799. " "" "34436") "#2+PICK" ("1..n #n-2 \\-> 1..n 1
  2800. " "" "34451") "#3+PICK" ("1..n #n-3 \\-> 1..n 1
  2801. " "" "34465") "#4+PICK" ("1..n #n-4 \\-> 1..n 1
  2802. " "" "34474") "#+PICK" ("1..n+m #n #m \\-> 1..n+m 1
  2803. " "" "34417") "#-PICK" ("1..n-m #n #m \\-> 1..n-m 1
  2804. " "" "34405") "NULLID" ("\\-> id
  2805. " "Null (empty) identifier.
  2806. " "272FE") "EvalNULLID" ("\\->
  2807. " "Evaluates the empty identifyer, therefore
  2808. enters the hidden directory.
  2809. " "27308" :UBS) "NULLID1" ("\\-> id
  2810. " "Null (empty) identifier.
  2811. " "27308") "NULLID!" ("\\->
  2812. " "Evaluate empty identifier.
  2813. " "27308") "NULLLAM" ("\\-> lam
  2814. " "Puts NULLLAM in the stack.
  2815. " "2B3AB") "ID_CST" ("ID CST
  2816. " "" "3EA01" :UBS) "ID_S" ("ID S
  2817. " "" "3EF97" :UBS) "ID_X" ("ID X
  2818. " "" "2715F" :UBS) "'IDX" ("\\-> id
  2819. " "Puts ID X unevaluated on the stack.
  2820. " "27155") "CUREQ" ("ID EQ
  2821. " "" "272F3" :UBS) "ID_SIGMADAT" ("ID \\GSDAT
  2822. " "" "27937" :UBS) "'IDPAR" ("\\-> id
  2823. " "Puts ID PPAR unevaluated on the stack.
  2824. " "27AE9" :UBS) "ID_PPAR" ("ID PPAR
  2825. " "" "2799A" :UBS) "ID_TPAR" ("ID TPAR
  2826. " "" "27B2F" :UBS) "'IDTPAR" ("\\-> id
  2827. " "" "27B25" :UBS) "ID_VPAR" ("ID VPAR
  2828. " "" "27B11" :UBS) "'IDVPAR" ("\\-> id
  2829. " "" "27B07" :UBS) "ID_PYR" ("ID PYR
  2830. " "" "2799A" :UBS) "ID_FV" ("ID FV
  2831. " "" "2798A" :UBS) "ID_PMT" ("ID PMT
  2832. " "" "2797D" :UBS) "ID_PV" ("ID PV
  2833. " "" "27972" :UBS) "ID_I%YR" ("IT I%TR
  2834. " "" "27963" :UBS) "ID_N" ("ID N
  2835. " "" "2795A" :UBS) "ID_SIGMAPAR" ("ID \\GSPAR
  2836. " "" "27946" :UBS) "ID_STARTERR" ("ID STARTERR
  2837. " "" "271D8" :UBS) "IDSTARTERR" ("{ ID STARTERR }
  2838. " "" "271D3" :UBS) "ID_STARTUP" ("ID STARTUP
  2839. " "" "271B9" :UBS) "ListSTARTUP" ("{ ID STARTUP }
  2840. " "" "271B1" :UBS) "IDIOPAR" ("ID IOPAR
  2841. " "" "271A3" :UBS) "$>ID" ("$ \\-> ID
  2842. " "" "05B15") "DUP$>ID" ("$ \\-> $ ID
  2843. " "" "362DE") "ID>LAM" ("id \\-> lam
  2844. " "" "05AED" :UBS) "LAM>ID" ("lam \\-> id
  2845. " "" "05B01" :UBS) "BIND" ("obn..ob1 {lamn..lam1} \\->
  2846. " "Binds n objects to n differently named lams.
  2847. " "074D0") "DOBIND" ("obn..ob1 lamn..lam1 #n \\->
  2848. " "Binds n objects to n differently named lams.
  2849. " "074E4") "1LAMBIND" ("ob \\->
  2850. " "Binds one object to a null named lam.
  2851. " "36518") "DUP1LAMBIND" ("ob \\-> ob
  2852. " "Does DUP then <REF>1LAMBIND.
  2853. " "36513") "^2LAMBIND" ("ob1 ob2 \\->
  2854. " "Binds two objects to null named lams.
  2855. " "155006") "^3LAMBIND" ("ob1 ob2 ob3 \\->
  2856. " "Binds three objects to null named lams.
  2857. " "156006") "nNullBind" ("obn..ob1 #n \\->
  2858. " "Binds #n objects to null named lams. 1LAM has
  2859. the count, 2LAM the first object. Decompiles
  2860. to
  2861. :: ' NULLLAM CACHE ;
  2862. " "2E429" :UBS) "dvarlsBIND" ("ob \\->
  2863. " "Binds ob to LAM 'dvar.
  2864. " "36A77") "ABND" ("\\->
  2865. " "Abandons topmost temporary environment.
  2866. " "07497") "ABNDTrue" ("\\-> T
  2867. " "Does <REF>ABND then TRUE.
  2868. " "2A7CF" :UBS) "ABNDFalse" ("\\-> F
  2869. " "Does FALSE then <REF>ABND .
  2870. " "2A7E3" :UBS) "CACHE" ("obn..ob1 #n lam \\->
  2871. " "Binds all objects under the same name. 1LAM
  2872. has the count.
  2873. " "34D00") "DUMP" ("NULLLAM \\-> ob1..obn #n
  2874. " "Inverse of CACHE. Always does garbage
  2875. collection.
  2876. " "34EBE") "SAVESTACK" ("\\->
  2877. " "Caches stack to SAVELAM.
  2878. " "34D58") "CacheStack" ("\\->
  2879. " "Caches the stack using SAVESTACK if UNDO is
  2880. on and Suspend is OK. If there was a
  2881. previous environment caching the stack, it is
  2882. abandoned first.
  2883. " "2EF72") "undo" ("\\->
  2884. " "Dumps SAVELAM.
  2885. " "34FA6") "" ("" "" "8605E" :RAM) "STOLAM" ("ob lam \\->
  2886. " "Tries storing object in lam. Generates
  2887. \"Undefined Local Name\" error if lam is not
  2888. found.
  2889. " "07D1B") "DoLam" ("lam \\-> ob
  2890. \\-> !error!
  2891. " "Tries recalling object from lam, generates
  2892. \"Undefined Local Name\" error if not found.
  2893. " "02FD6" :UBS) "FIRST@LAM" ("lam \\-> ob T
  2894. \\-> F
  2895. " "@LAM for first environment only.
  2896. " "078E9" :UBS) "NTH@LAM" ("lam #n \\-> ob T
  2897. \\-> F
  2898. " "@LAM for nth environment only.
  2899. " "078F5" :UBS) "GETLAM" ("#n \\-> ob
  2900. " "Gets contents of nth topmost lam.
  2901. " "075A5") "1GETLAM" ("\\-> ob
  2902. " "" "34616") "2GETLAM" ("\\-> ob
  2903. " "" "34620") "3GETLAM" ("\\-> ob
  2904. " "" "3462A") "4GETLAM" ("\\-> ob
  2905. " "" "34634") "5GETLAM" ("\\-> ob
  2906. " "" "3463E") "6GETLAM" ("\\-> ob
  2907. " "" "34648") "7GETLAM" ("\\-> ob
  2908. " "" "34652") "8GETLAM" ("\\-> ob
  2909. " "" "3465C") "9GETLAM" ("\\-> ob
  2910. " "" "34666") "10GETLAM" ("\\-> ob
  2911. " "" "34670") "11GETLAM" ("\\-> ob
  2912. " "" "3467A") "12GETLAM" ("\\-> ob
  2913. " "" "34684") "13GETLAM" ("\\-> ob
  2914. " "" "3468E") "14GETLAM" ("\\-> ob
  2915. " "" "34698") "15GETLAM" ("\\-> ob
  2916. " "" "346A2") "16GETLAM" ("\\-> ob
  2917. " "" "346AC") "17GETLAM" ("\\-> ob
  2918. " "" "346B6") "18GETLAM" ("\\-> ob
  2919. " "" "346C0") "19GETLAM" ("\\-> ob
  2920. " "" "346CA") "20GETLAM" ("\\-> ob
  2921. " "" "346D4") "21GETLAM" ("\\-> ob
  2922. " "" "346DE") "22GETLAM" ("\\-> ob
  2923. " "" "346E8") "23GETLAM" ("\\-> ob
  2924. " "" "346F2" :UBS) "24GETLAM" ("\\-> ob
  2925. " "" "346FC" :UBS) "25GETLAM" ("\\-> ob
  2926. " "" "34706" :UBS) "26GETLAM" ("\\-> ob
  2927. " "" "34710" :UBS) "27GETLAM" ("\\-> ob
  2928. " "" "3471A" :UBS) "PUTLAM" ("ob #n \\->
  2929. " "Stores new contents to nth topmost lam.
  2930. " "075E9") "1PUTLAM" ("ob \\->
  2931. " "" "34611") "2PUTLAM" ("ob \\->
  2932. " "" "3461B") "3PUTLAM" ("ob \\->
  2933. " "" "34625") "4PUTLAM" ("ob \\->
  2934. " "" "3462F") "5PUTLAM" ("ob \\->
  2935. " "" "34639") "6PUTLAM" ("ob \\->
  2936. " "" "34643") "7PUTLAM" ("ob \\->
  2937. " "" "3464D") "8PUTLAM" ("ob \\->
  2938. " "" "34657") "9PUTLAM" ("ob \\->
  2939. " "" "34661") "10PUTLAM" ("ob \\->
  2940. " "" "3466B") "11PUTLAM" ("ob \\->
  2941. " "" "34675") "12PUTLAM" ("ob \\->
  2942. " "" "3467F") "13PUTLAM" ("ob \\->
  2943. " "" "34689") "14PUTLAM" ("ob \\->
  2944. " "" "34693") "15PUTLAM" ("ob \\->
  2945. " "" "3469D") "16PUTLAM" ("ob \\->
  2946. " "" "346A7") "17PUTLAM" ("ob \\->
  2947. " "" "346B1") "18PUTLAM" ("ob \\->
  2948. " "" "346BB") "19PUTLAM" ("ob \\->
  2949. " "" "346C5") "20PUTLAM" ("ob \\->
  2950. " "" "346CF") "21PUTLAM" ("ob \\->
  2951. " "" "346D9") "22PUTLAM" ("ob \\->
  2952. " "" "346E3") "23PUTLAM" ("ob \\->
  2953. " "" "346ED" :UBS) "24PUTLAM" ("ob \\->
  2954. " "" "346F7" :UBS) "25PUTLAM" ("ob \\->
  2955. " "" "34701" :UBS) "26PUTLAM" ("ob \\->
  2956. " "" "3470B" :UBS) "27PUTLAM" ("ob \\->
  2957. " "" "34715" :UBS) "DUP1PUTLAM" ("ob \\-> ob
  2958. " "" "3471F" :UBS) "DUP2PUTLAM" ("ob \\-> ob
  2959. " "" "34729" :UBS) "DUP4PUTLAM" ("ob \\-> ob
  2960. " "Does DUP then <REF>4PUTLAM .
  2961. " "34797") "1GETLAMSWAP" ("ob \\-> ob' ob
  2962. " "Does <REF>1GETLAM then SWAP.
  2963. " "34724" :UBS) "2GETLAMSWAP" ("ob \\-> ob' ob
  2964. " "Does <REF>2GETLAM then SWAP.
  2965. " "3472E" :UBS) "1GETABND" ("\\-> 1lamob
  2966. " "Does <REF>1GETLAM then <REF>ABND .
  2967. " "364FF") "1ABNDSWAP" ("ob \\-> 1lamob ob
  2968. " "Does <REF>1GETABND then SWAP.
  2969. " "35DEE") "1GETSWAP" ("ob \\-> 1lamob ob
  2970. " "Does <REF>1GETLAM then SWAP.
  2971. " "35F42") "1GETLAMSWP1+" ("# \\-> 1lamob #+1
  2972. " "Does <REF>1GETLAM then SWAP#1+.
  2973. " "2F318") "2GETEVAL" ("\\-> ?
  2974. " "Does <REF>2GETLAM then <REF>EVAL .
  2975. " "3632E") "GETLAMPAIR" ("#n \\-> #n ob lam F
  2976. \\-> #n T
  2977. " "Gets lam contents and name (10 = 1lam,
  2978. 20 = 2lam, etc.)
  2979. " "3483E") "DUPTEMPENV" ("\\->
  2980. " "Duplicates topmost tempenv (clears
  2981. protection word).
  2982. " "347AB") "1NULLLAM{}" ("\\-> {}
  2983. " "Puts a list with one NULLLAM in the stack.
  2984. " "2B3A6") "2NULLLAM{}" ("\\-> {}
  2985. " "Puts a list with two times NULLLAM in the
  2986. stack.
  2987. " "271F4" :UBS) "3NULLLAM{}" ("\\-> {}
  2988. " "Puts a list with three times NULLLAM in the
  2989. stack.
  2990. " "27208" :UBS) "4NULLLAM{}" ("\\-> {}
  2991. " "Puts a list with four times NULLLAM in the
  2992. stack.
  2993. " "2B3B7") "8NULLLAM{}" ("\\-> {}
  2994. " "Puts a list with eight times NULLLAM in the
  2995. stack.
  2996. " "27AB7" :UBS) "ERRBEEP" ("\\->
  2997. " "Beeps.
  2998. " "26067") "ERROR@" ("\\-> #
  2999. " "Returns current error number.
  3000. " "04CE6") "ERRORSTO" ("# \\->
  3001. " "Stores new error number.
  3002. " "04D0E") "ERROROUT" ("# \\->
  3003. " "Stores new error number and calls ERRJMP.
  3004. " "36883") "ERRORCLR" ("\\->
  3005. " "Stores zero as new error number.
  3006. " "04D33") "ERRJMP" ("\\->
  3007. " "Invokes error handling sub-system.
  3008. " "04ED1") "GETEXITMSG" ("\\-> $
  3009. " "Gets EXITMSG (user defined error message).
  3010. " "04E07") "EXITMSGSTO" ("$ \\->
  3011. " "Stores $ as EXITMSG.
  3012. " "04E37") "DO#EXIT" ("# \\->
  3013. " "Stores new error number, does <REF>AtUserStack
  3014. and then <REF>ERRJMP.
  3015. " "25EAE") "DO%EXIT" ("% \\->
  3016. " "Same as above, but takes real number as
  3017. argument.
  3018. " "25EB0") "DO$EXIT" ("$ \\->
  3019. " "Stores string as EXITMSG, #70000 as error
  3020. number, does <REF>AtUserStack and then
  3021. <REF>ERRJMP .
  3022. " "25EAF") "ABORT" ("\\->
  3023. " "Does <REF>ERRORCLR and <REF>ERRJMP .
  3024. " "04EA4") "ERRSET" ("\\->
  3025. " "Sets new error trap.
  3026. " "04E5E") "ERRTRAP" ("\\->
  3027. " "Error trap marker. If no error happens, still
  3028. removes all temporary environments created
  3029. since ERRSET.
  3030. " "04EB8") "JstGETTHEMSG" ("# \\-> $
  3031. " "Fetches message from message table. To get
  3032. a message from a library, use the formula:
  3033. libnum*#100+msgnum.
  3034. --
  3035. <REF>TEXT:Libraries
  3036. " "04D87") "JstGetTHEMESG" ("# \\-> $
  3037. " "Fetches message from message table. To get
  3038. a message from a library, use the formula:
  3039. libnum*#100+msgnum.
  3040. --
  3041. <REF>TEXT:Libraries
  3042. " "04D87") "GETTHEMESG" ("# \\-> $
  3043. " "If #70000 then does <REF>GETEXITMSG, else does
  3044. <REF>JstGetTHEMESG .
  3045. --
  3046. <REF>TEXT:Libraries
  3047. " "04D64") "?GetMsg" ("# \\-> $msg
  3048. ob \\-> ob
  3049. " "If the argument is a bint, does JstGETTHEMSG
  3050. to fetch a message. Other arguments are
  3051. returned unchanged.
  3052. --
  3053. <REF>TEXT:Libraries
  3054. " "39332" :UBS) "SPLITmsg" ("#msg \\-> #error #libnum
  3055. " "Splits message number into error and
  3056. library numbers.
  3057. --
  3058. <REF>TEXT:Libraries
  3059. " "04DD7" :UBS) "SETMEMERR" ("Error 001h
  3060. " "Generates \"Insufficient Memory\" error.
  3061. " "04FB6") "SETDIRRECUR" ("Error 002h
  3062. " "Generates \"Directory Recursion\" error.
  3063. " "04FC2" :UBS) "SETLAMERR" ("Error 003h
  3064. " "Generates \"Undefined Local Name\" error.
  3065. " "04FCE" :UBS) "SETROMPERR" ("Error 004h
  3066. " "Generates \"Undefined XLIB Name\" error.
  3067. " "05016") "SETLBERR" ("Error 006h
  3068. " "Generates \"Power Lost\" error.
  3069. " "04FAA" :UBS) "SETCORPORT" ("Error 008h
  3070. " "Generates \"Invalid Card Data\" error.
  3071. " "04FDA" :UBS) "SETOBINUSE" ("Error 009h
  3072. " "Generates \"Object In Use\" error.
  3073. " "04FE6" :UBS) "SETPORTNOTAV" ("Error 00Ah
  3074. " "Generates \"Port Not Available\" error.
  3075. " "04FF2") "SETNOROOM" ("Error 00Bh
  3076. " "Generates \"No Room In Port\" error.
  3077. " "04FFE" :UBS) "SETXNONEXT" ("Error 00Ch
  3078. " "Generates \"Object Not In Port\" error.
  3079. " "0500A" :UBS) "NOEQERR" ("Error 104h
  3080. " "Generates \"No Current Equation\" error.
  3081. " "26508" :UBS) "SYNTAXERR" ("Error 106h
  3082. " "Generates \"Invalid Syntax\" error.
  3083. " "26134") "NOHALTERR" ("Error 126h
  3084. " "Generates \"HALT Not Allowed\" error.
  3085. " "260C1") "SETCIRCERR" ("Error 129h
  3086. " "Generates \"Circular Reference\" error.
  3087. " "26116") "SETUNDOERR" ("Error 124h
  3088. " "Generates \"LAST STACK Disabled\" error.
  3089. " "26521" :UBS) "SETSTACKERR" ("Error 201h
  3090. " "Generates \"Too Few Arguments\" error.
  3091. " "262E2") "SETTYPEERR" ("Error 202h
  3092. " "Generates \"Bad Argument Type\" error.
  3093. " "262DD") "SETSIZEERR" ("Error 203h
  3094. " "Generates \"Bad Argument Value\" error.
  3095. " "262D8") "SETNONEXTERR" ("Error 204h
  3096. " "Generates \"Undefined Name\" error.
  3097. " "262E7") "SETIVLERR" ("Error 304h
  3098. " "Generates \"Undefined Result\" error.
  3099. " "2F458") "SetIOPARErr" ("Error C12h
  3100. " "Generates \"Invalid IOPAR\" error.
  3101. " "2F37B") "Sig?ErrJmp" ("# \\->
  3102. " "Calls ERRJMP if the error number is any of
  3103. {13E 123 DFF}.
  3104. " "3721C") "ListErrspecial" ("\\-> {}
  3105. " "List of error numbers handled specially by
  3106. Sig?ErrJmp. This is simply
  3107. { #13E #123 #DFF }
  3108. " "37226" :UBS) "ederr" ("\\->
  3109. " "Error handler for applications which use
  3110. savefmt1 to save the current display format.
  3111. Calls <REF>rstfmt1 and then errors out.
  3112. " "25F10") "COERCEFLAG" ("T \\-> %1
  3113. F \\-> %0
  3114. " "Converts system flag to user flag, drops
  3115. current stream.
  3116. " "2602B") "%0<>" ("% \\-> flag
  3117. " "Can be used to change a user flag into a
  3118. system flag.
  3119. " "301BA") "TRUE" ("\\-> T
  3120. " "" "03A81") "TrueTrue" ("\\-> T T
  3121. " "" "27E87") "TRUEFALSE" ("\\-> T F
  3122. " "" "36540") "TrueFalse" ("\\-> T F
  3123. " "" "36540") "TRUESWAP" ("ob \\-> T ob
  3124. " "" "09378" :UBS) "FALSE" ("\\-> F
  3125. " "" "03AC0") "FALSETRUE" ("\\-> F T
  3126. " "" "36554") "FalseTrue" ("\\-> F T
  3127. " "" "36554") "FalseFalse" ("\\-> F F
  3128. " "" "283E8") "failed" ("\\-> F T
  3129. " "" "27E9B") "DROPTRUE" ("ob \\-> T
  3130. " "" "35280") "^2DROPTRUE" ("ob ob' \\-> T
  3131. " "" "2D7006") "3DROPTRUE" ("ob1 ob2 ob3 \\-> T
  3132. " "" "28DAB" :UBS) "DROPFALSE" ("ob \\-> F
  3133. " "" "35289") "2DROPFALSE" ("ob1 ob2 \\-> F
  3134. " "" "35B32") "4DROPFALSE" ("ob1..ob4 \\-> F
  3135. " "" "28D38" :UBS) "5DROPFALSE" ("ob1..ob5 \\-> F
  3136. " "" "28E05" :UBS) "NDROPFALSE" ("ob1..obn #n \\-> F
  3137. " "" "28211") "SWAPTRUE" ("ob1 ob2 \\-> ob2 ob1 T
  3138. " "" "2812F") "SWAPFALSE" ("ob1 ob2 \\-> ob2 ob1 F
  3139. " "" "374AA" :UBS) "SWAPDROPTRUE" ("ob1 ob2 \\-> ob2 T
  3140. " "" "374BE") "SWAPDROPFALSE" ("ob1 ob2 \\-> ob2 F
  3141. " "" "28239" :UBS) "XYZ>ZTRUE" ("ob1 ob2 ob3 \\-> ob3 T
  3142. " "" "35EF2") "RDROPFALSE" ("\\-> F
  3143. " "Puts FALSE in the stack and drops rest of
  3144. current stream.
  3145. " "2962A") "RDROPTRUE" ("\\-> T
  3146. " "Puts TRUE in the stack and drops rest of
  3147. current stream.
  3148. " "29616" :UBS) "NOT" ("flag \\-> flag'
  3149. " "Returns FALSE if the input is TRUE, and
  3150. vice-versa.
  3151. " "03AF2") "AND" ("flag1 flag2 \\-> flag
  3152. " "Returns TRUE if both flags are TRUE.
  3153. " "03B46") "OR" ("flag1 flag2 \\-> flag
  3154. " "Returns TRUE if either flag is TRUE.
  3155. " "03B75") "XOR" ("flag1 flag2 \\-> flag
  3156. " "Returns TRUE if flags are different.
  3157. " "03ADA") "ORNOT" ("flag1 flag2 \\-> flag
  3158. " "Returns FALSE if either flag is TRUE.
  3159. " "365F9") "NOTAND" ("flag1 flag2 \\-> flag
  3160. " "Returns TRUE if flag1 is TRUE and flag2 is
  3161. FALSE.
  3162. " "35C7C") "ROTAND" ("flag1 ob flag2 \\-> ob flag
  3163. " "Returns TRUE if either flag is TRUE.
  3164. " "35CB8") "EQ" ("ob1 ob2 \\-> flag
  3165. " "Returns TRUE if both objects are the same,
  3166. i.e., they occupy the same physical space in
  3167. memory. Only the addresses of the objects are
  3168. tested.
  3169. " "03B2E") "2DUPEQ" ("ob1 ob2 \\-> ob1 ob2 flag
  3170. " "Does 2DUP then EQ.
  3171. " "36621") "EQOR" ("flag ob1 ob2 \\-> flag'
  3172. " "Does EQ then OR.
  3173. " "3664E") "EQOVER" ("ob3 ob1 ob2 \\-> ob3 flag ob3
  3174. " "Does EQ then OVER.
  3175. " "3607F") "EQ:" ("ob \\-> flag
  3176. " "EQ with the next object in the current
  3177. stream.
  3178. " "3663A") "DUPEQ:" ("ob \\-> ob flag
  3179. " "Does DUP then EQ:.
  3180. " "36635") "EQUAL" ("ob1 ob2 \\-> flag
  3181. " "Returns TRUE if the objects are equal
  3182. (but not necessarily the same), i.e., their
  3183. prologs and contents are the same.
  3184. " "03B97") "SAME" ("ob1 ob2 \\-> %1/%0
  3185. " "Does EQUAL, then COERCEFLAG. Identical to
  3186. what <REF>xSAME does.
  3187. " "3CCB4" :UBS) "EQUALNOT" ("ob1 ob2 \\-> flag
  3188. " "Returns TRUE if the objects are different.
  3189. " "3660D") "EQUALOR" ("flag ob1 ob2 \\-> flag'
  3190. " "Does EQUAL then OR.
  3191. " "36662") "^Contains?" ("ob1 ob2 \\-> ob1 ob2 flag
  3192. " "Tests if ob1 contains ob2. If ob1 is a
  3193. symbolic then ob1 is searched for embedded
  3194. ob2. If ob1 is a list then ob1 is traversed
  3195. for a direct match. Otherwise, tests if ob1
  3196. and ob2 are equal.
  3197. " "0FF006") "?SEMI" ("T \\-> :: ;
  3198. F \\-> :: <ob1> <rest> ;
  3199. " "" "34AA1") "NOT?SEMI" ("T \\-> :: <ob1> <rest> ;
  3200. F \\-> :: ;
  3201. " "" "34A92") "?SEMIDROP" ("ob T \\-> :: ob ;
  3202. ob F \\-> :: <ob1> <rest> ;
  3203. " "" "3692D") "NOT?DROP" ("ob T \\-> :: ob <ob1> <rest> ;
  3204. ob F \\-> :: <ob1> <rest> ;
  3205. " "" "34BD8") "?SWAP" ("ob1 ob2 T \\-> :: ob2 ob1 <ob1> <rest> ;
  3206. ob1 ob2 F \\-> :: ob1 ob2 <ob1> <rest> ;
  3207. " "" "35F56") "?SKIPSWAP" ("ob1 ob2 T \\-> :: ob1 ob2 <ob1> <rest> ;
  3208. ob1 ob2 F \\-> :: ob2 ob1 <ob1> <rest> ;
  3209. " "" "35DDA") "?SWAPDROP" ("ob1 ob2 T \\-> :: ob1 <ob1> <rest> ;
  3210. ob1 ob2 F \\-> :: ob2 <ob1> <rest> ;
  3211. " "" "35F97") "NOT?SWAPDROP" ("ob1 ob2 T \\-> :: ob2 <ob1> <rest> ;
  3212. ob1 ob2 F \\-> :: ob1 <ob1> <rest> ;
  3213. " "" "35F7E") "RPIT" ("T ob \\-> :: ob <ob1> <rest> ;
  3214. F ob \\-> :: <ob1> <rest> ;
  3215. " "ob is actually executed, and not pushed in
  3216. the stack.
  3217. " "070FD") "RPITE" ("T ob1 ob2 \\-> :: ob1 <ob1> <rest> ;
  3218. F ob1 ob2 \\-> ob2 <ob1> <rest> ;
  3219. " "ob1 or ob2 is actually executed, and not
  3220. pushed in the stack.
  3221. " "070C3") "COLARPITE" ("T ob1 ob2 \\-> :: ob1 ;
  3222. F ob1 ob2 \\-> :: ob2 ;
  3223. " "ob1 or ob2 is actually executed, and not
  3224. pushed in the stack.
  3225. " "34AF4") "2'RCOLARPITE" ("Return to composite and ITE there.
  3226. " "" "34B4F") "IT" ("T \\-> :: <ob1> <rest> ;
  3227. F \\-> :: <ob2> <rest> ;
  3228. " "" "34A22") "NOT_IT" ("T \\-> :: <ob2> <rest> ;
  3229. F \\-> :: <ob1> <rest> ;
  3230. " "" "0712A") "?SKIP" ("T \\-> :: <ob2> <rest> ;
  3231. F \\-> :: <ob1> <rest> ;
  3232. " "" "0712A") "ITE" ("T \\-> :: <ob1> <ob3> <rest> ;
  3233. F \\-> :: <ob2> <rest> ;
  3234. " "" "34B3E") "COLAITE" ("T \\-> :: <ob1> ;
  3235. F \\-> :: <ob2> ;
  3236. " "" "36865") "ITE_DROP" ("ob T \\-> :: <ob2> <rest> ;
  3237. ob F \\-> :: ob <ob1> <rest> ;
  3238. " "" "34ABE") "ANDITE" ("f1 f2 \\-> :: <ob1> <ob3> <rest> ;
  3239. f1 f2 \\-> :: <ob2> <rest> ;
  3240. " "" "36EED") "case" ("T \\-> :: <ob1> ;
  3241. F \\-> :: <ob2> <rest> ;
  3242. " "" "349F9") "NOTcase" ("T \\-> :: <ob2> <rest> ;
  3243. F \\-> :: <ob1> ;
  3244. " "" "34A13") "ANDcase" ("f1 f2 \\-> :: <ob1> ;
  3245. f1 f2 \\-> :: <ob2> <rest> ;
  3246. " "" "36D4E") "ANDNOTcase" ("f1 f2 \\-> :: <ob1> ;
  3247. f1 f2 \\-> :: <ob2> <rest> ;
  3248. " "" "36E6B") "ORcase" ("f1 f2 \\-> :: <ob1> ;
  3249. f1 f2 \\-> :: <ob2> <rest> ;
  3250. " "" "359E3") "casedrop" ("ob T \\-> :: <ob1> ;
  3251. ob F \\-> :: ob <ob2> <rest> ;
  3252. " "" "3495D") "NOTcasedrop" ("ob T \\-> :: ob <ob2> <rest> ;
  3253. ob F \\-> :: <ob1> ;
  3254. " "" "3494E") "case2drop" ("ob1 ob2 T \\-> :: <ob1> ;
  3255. ob1 ob2 F \\-> :: ob1 ob2 <ob2> <rest> ;
  3256. " "" "34985") "NOTcase2drop" ("ob1 ob2 T \\-> :: ob1 ob2 <ob2> <rest> ;
  3257. ob1 ob2 F \\-> :: <ob1> ;
  3258. " "" "34976") "caseDROP" ("ob T \\-> :: ;
  3259. ob F \\-> :: ob <ob1> <rest> ;
  3260. " "" "349B1") "NOTcaseDROP" ("ob T \\-> :: ob <ob1> <rest> ;
  3261. ob F \\-> :: ;
  3262. " "" "349C6") "casedrptru" ("ob T \\-> T
  3263. ob F \\-> :: ob <ob1> <rest> ;
  3264. " "Note: should be called caseDRPTRU.
  3265. " "368FB") "casedrpfls" ("ob T \\-> F
  3266. ob F \\-> :: ob <ob1> <rest> ;
  3267. " "Note: should be called caseDRPFLS.
  3268. " "365B3") "NOTcsdrpfls" ("ob T \\-> :: ob <ob1> <rest> ;
  3269. ob F \\-> F
  3270. " "Note: should be called NOTcaseDRPFLS.
  3271. " "36B3A") "case2DROP" ("ob1 ob2 T \\-> :: ;
  3272. ob1 ob2 F \\-> :: ob1 ob2 <ob1> <rest> ;
  3273. " "" "349D6") "NOTcase2DROP" ("ob1 ob2 T \\-> :: ob1 ob2 <ob1> <rest> ;
  3274. ob1 ob2 F \\-> :: ;
  3275. " "" "349EA") "case2drpfls" ("ob1 ob2 T \\-> F
  3276. ob1 ob2 F \\-> :: ob1 ob2 <ob1> <rest> ;
  3277. " "Note: should be called case2DRPFLS.
  3278. " "365CC") "caseTRUE" ("T \\-> T
  3279. F \\-> :: <ob1> <rest> ;
  3280. " "" "3652C") "NOTcaseTRUE" ("T \\-> :: <ob1> <rest> ;
  3281. F \\-> T
  3282. " "" "36914") "caseFALSE" ("T \\-> F
  3283. F \\-> :: <ob1> <rest> ;
  3284. " "" "365E5") "NOTcaseFALSE" ("T \\-> :: <ob1> <rest> ;
  3285. F \\-> F
  3286. " "" "2B2C5") "COLAcase" ("T \\-> :: <ob1> ;
  3287. F \\-> :: <ob2> <rest> ;
  3288. " "Drops the rest of current stream and executes
  3289. case in the stream above.
  3290. " "359AD") "COLANOTcase" ("T \\-> :: <ob2> <rest> ;
  3291. F \\-> :: <ob1> ;
  3292. " "Drops the rest of current stream and executes
  3293. NOTcase in the stream above.
  3294. " "359C8") "#=?SKIP" ("#m #n \\-> :: <ob2> <rest> ;
  3295. #m #n \\-> :: <ob1> <rest> ;
  3296. " "" "363B5") "#>?SKIP" ("#m #n \\-> :: <ob1> <rest> ;
  3297. #m #n \\-> :: <ob2> <rest> ;
  3298. " "" "363E2") "#=ITE" ("#m #n \\-> :: <ob1> <ob3> <rest> ;
  3299. #m #n \\-> :: <ob2> <rest> ;
  3300. " "" "35C54") "#<ITE" ("#m #n \\-> :: <ob1> <ob3> <rest> ;
  3301. #m #n \\-> :: <ob2> <rest> ;
  3302. " "" "36F29") "#>ITE" ("#m #n \\-> :: <ob2> <rest> ;
  3303. #m #n \\-> :: <ob1> <ob3> <rest> ;
  3304. " "" "36F3D") "#=case" ("#m #n \\-> :: <ob1> ;
  3305. #m #n \\-> :: <ob2> <rest> ;
  3306. " "" "348D2") "OVER#=case" ("#m #n \\-> :: #m <ob1> ;
  3307. #m #n \\-> :: #m <ob2> <rest> ;
  3308. " "" "348E2") "#=casedrop" ("#m #n \\-> :: <ob1> ;
  3309. #m #n \\-> :: #m <ob2> <rest> ;
  3310. " "Note: should be called OVER#=casedrop.
  3311. " "34939") "#=casedrpfls" ("#m #n \\-> F
  3312. #m #n \\-> :: #m <ob1> <rest> ;
  3313. " "Note: should be called OVER#=caseDRPFLS.
  3314. " "36590") "#<>case" ("#m #n \\-> :: <ob2> <rest> ;
  3315. #m #n \\-> :: <ob1> ;
  3316. " "" "36D9E") "#<case" ("#m #n \\-> :: <ob1> ;
  3317. #m #n \\-> :: <ob2> <rest> ;
  3318. " "" "36D76") "#>case" ("#m #n \\-> :: <ob2> <rest> ;
  3319. #m #n \\-> :: <ob1> ;
  3320. " "" "36DCB") "#0=?SEMI" ("#0 \\-> :: ;
  3321. # \\-> :: <ob1> <rest> ;
  3322. " "" "34A7E") "#0=?SKIP" ("#0 \\-> :: <ob2> <rest> ;
  3323. # \\-> :: <ob1> <rest> ;
  3324. " "" "36383") "#0=ITE" ("#0 \\-> :: <ob1> <ob3> <rest> ;
  3325. # \\-> :: <ob2> <rest>
  3326. " "" "36F15") "DUP#0=IT" ("#0 \\-> :: #0 <ob1> <rest> ;
  3327. # \\-> :: # <ob2> <rest> ;
  3328. " "" "36ED4") "DUP#0=ITE" ("#0 \\-> :: #0 <ob1> <ob3> <rest> ;
  3329. # \\-> :: # <ob2> <rest> ;
  3330. " "" "36F51") "#0=case" ("#0 \\-> :: <ob1> ;
  3331. # \\-> :: <ob2> <rest> ;
  3332. " "" "348FC") "DUP#0=case" ("#0 \\-> :: #0 <ob1> ;
  3333. # \\-> :: # <ob2> <rest> ;
  3334. " "" "348F7") "DUP#0=csedrp" ("#0 \\-> :: <ob1> ;
  3335. # \\-> :: # <ob2> <rest> ;
  3336. " "" "3490E") "DUP#0=csDROP" ("#0 \\-> :: ;
  3337. # \\-> :: # <ob1> <rest> ;
  3338. " "" "36D21") "#1=case" ("#1 \\-> :: <ob1> ;
  3339. # \\-> :: <ob2> <rest> ;
  3340. " "" "36D8A") "#1=?SKIP" ("#1 \\-> :: <ob2> <rest> ;
  3341. # \\-> :: <ob1> <rest> ;
  3342. " "" "3639C") "#>2case" ("#0/#1/#2 \\-> :: <ob2> <rest> ;
  3343. # \\-> :: <ob1> ;
  3344. " "" "36DB2") "?CaseKeyDef" ("# #' \\-> :: ' ob1 T ;
  3345. \\-> :: <ob2> <rest> ;
  3346. " "Compares two bints. If equal, quotes the
  3347. next object from the runsream and returns it
  3348. along with TRUE.
  3349. " "25E72") "?CaseRomptr@" ("# #' \\-> ob T
  3350. \\-> F
  3351. \\-> :: <ob2> <rest> ;
  3352. " "Compares two bints. If equal, tries to
  3353. resolve the rompointer which must be the next
  3354. object in the runstream. The ROMPTR@ pushes
  3355. TRUE when successful, so this entry can be
  3356. used directly for key handlers.
  3357. " "25E73") "%0=case" ("%0 \\-> :: %0 <ob1> ;
  3358. ob \\-> :: ob <ob2> <rest> ;
  3359. " "" "2B149") "j%0=case" ("%0 \\-> :: <ob1> ;
  3360. ob \\-> :: <ob2> <rest> ;
  3361. " "" "36DDF") "C%0=case" ("C%0 \\-> :: C%0 <ob1> ;
  3362. ob \\-> :: ob <ob2> <rest> ;
  3363. " "" "2B15D") "num0=case" ("0 \\-> :: 0 <ob1> ;
  3364. ob \\-> :: ob <ob2> <rest> ;
  3365. " "Both a real and a complex zero are TRUE
  3366. conditions for this test.
  3367. " "2B11C") "%1=case" ("%1 \\-> :: %1 <ob1> ;
  3368. ob \\-> :: ob <ob2> <rest> ;
  3369. " "" "2B1A3") "C%1=case" ("C%1 \\-> :: C%1 <ob1> ;
  3370. ob \\-> :: ob <ob2> <rest> ;
  3371. " "" "2B1C1") "num1=case" ("1 \\-> :: 1 <ob1> ;
  3372. ob \\-> :: ob <ob2> <rest> ;
  3373. " "Both a real and a complex one are TRUE
  3374. conditions for this test.
  3375. " "2B176") "%2=case" ("%2 \\-> :: %2 <ob1> ;
  3376. ob \\-> :: ob <ob2> <rest> ;
  3377. " "" "2B20C") "C%2=case" ("C%2 \\-> :: C%2 <ob1> ;
  3378. ob \\-> :: ob <ob2> <rest> ;
  3379. " "" "2B22A") "num2=case" ("2 \\-> :: 2 <ob1> ;
  3380. ob \\-> :: ob <ob2> <rest> ;
  3381. " "Both a real and a complex two are TRUE
  3382. conditions for this test.
  3383. " "2B1DF") "%-1=case" ("%-1 \\-> :: %-1 <ob1> ;
  3384. ob \\-> :: ob <ob2> <rest> ;
  3385. " "" "2B289") "C%-1=case" ("C%-1 \\-> :: C%-1 <ob1> ;
  3386. ob \\-> ob <ob2> <rest> ;
  3387. " "" "2B2A7") "num-1=case" ("-1 \\-> :: -1 <ob1> ;
  3388. ob \\-> :: ob <ob2> <rest> ;
  3389. " "Both a real and a complex -1 are TRUE
  3390. conditions for this test.
  3391. " "2B25C") "MEQ1stcase" ("meta&ob1 ob2 \\-> ob1=ob2 ? case
  3392. " "Meta&ob1 ob2 ob1=ob2 ? case
  3393. " "2AFFB") "AEQ1stcase" ("meta&ob \\-> ob=nob ? case
  3394. " "Meta&ob ob=nob ? case
  3395. " "2AF37") "MEQopscase" ("meta1&ob1 meta2&ob2 ob3 \\->
  3396. " "Meta1&ob1 Meta2&ob2 ob3
  3397. " "2B01B") "AEQopscase" ("meta1&ob1 meta2&ob2
  3398. " "Meta1&ob1 Meta2&ob2
  3399. " "2B06A") "Mid1stcase" ("meta&ob \\-> ob is id
  3400. lam ? case
  3401. " "Meta&ob ob is id or lam ? case
  3402. " "2B083") "M-1stcasechs" ("Meta&NEG \\-> Meta COLA
  3403. Meta \\-> Meta SKIP
  3404. Meta&(%<0) \\-> Meta&ABS(%) COLA
  3405. " "Meta&NEG Meta COLA ; Meta Meta SKIP
  3406. Meta&(%<0) Meta&ABS(%) COLA
  3407. " "2AE32") "EQIT" ("ob1 ob1 \\-> :: <ob1> <rest> ;
  3408. ob1 ob2 \\-> :: <ob2> <rest> ;
  3409. " "" "36EBB") "EQITE" ("ob1 ob1 \\-> :: <ob1> <ob3> <rest> ;
  3410. ob1 ob2 \\-> :: <ob2> <rest> ;
  3411. " "" "36F01") "jEQcase" ("ob1 ob1 \\-> :: <ob1> ;
  3412. ob1 ob2 \\-> :: <ob2> <rest> ;
  3413. " "" "36D3A") "EQcase" ("ob1 ob1 \\-> :: ob1 <ob1> ;
  3414. ob1 ob2 \\-> :: ob1 <ob2> <rest> ;
  3415. " "Note: Should be called OVEREQcase.
  3416. " "34999") "REQcase" ("ob \\-> :: ob <ob2> ;
  3417. \\-> :: ob <ob3> <rest> ;
  3418. " "EQcase with the next object in the
  3419. runstream.
  3420. " "359F7") "EQcasedrop" ("ob1 ob1 \\-> :: <ob1> ;
  3421. ob1 ob2 \\-> :: ob1 <ob2> <rest> ;
  3422. " "Note: should be called OVEREQcasedrop.
  3423. " "34920") "REQcasedrop" ("ob \\-> <ob2> ;
  3424. \\-> <ob3> <rest> ;
  3425. " "EQcasedrop with the next object in the
  3426. runstream.
  3427. " "35A10") "EQUALcase" ("ob1 ob1 \\-> :: <ob1> ;
  3428. ob1 ob2 \\-> :: <ob2> <rest> ;
  3429. " "" "36D62") "EQUALNOTcase" ("ob1 ob1 \\-> :: <ob2> <rest> ;
  3430. ob1 ob2 \\-> :: <ob1> ;
  3431. " "" "36E7F") "EQUALcasedrp" ("ob ob1 ob2 \\-> :: <ob1> ;
  3432. ob ob1 ob2 \\-> :: ob <ob2> <rest> ;
  3433. " "" "36D08") "EQUALcasedrop" ("ob1 ob2 \\-> :: <ob1> ;
  3434. ob1 ob2 \\-> :: ob1 <ob2> <rest> ;
  3435. " "" "2AD81") "tok=casedrop" ("$ $' \\-> :: <ob1> ;
  3436. \\-> :: $ <ob2> <rest> ;
  3437. " "Note: should be called OVERtok=casedrop.
  3438. " "29E99") "nonopcase" ("seco \\-> :: seco <ob2> <rest> ;
  3439. ob \\-> :: ob <ob1> ;
  3440. " "" "2ADBD") "idntcase" ("id \\-> :: id <ob1> ;
  3441. ob \\-> :: ob <ob2> <rest> ;
  3442. " "" "2B0CC") "dIDNTNcase" ("id \\-> :: id <ob2> <rest> ;
  3443. ob \\-> :: ob <ob1> ;
  3444. " "" "36E93") "idntlamcase" ("id/lam \\-> :: id <ob1> ;
  3445. ob \\-> :: ob <ob2> <rest> ;
  3446. " "" "2B0EF") "REALcase" ("% \\-> :: <ob1> ;
  3447. ob \\-> :: <ob2> <rest> ;
  3448. " "" "36DF3") "dREALcase" ("% \\-> :: % ob1 ;
  3449. ob \\-> :: ob <ob2> <rest> ;
  3450. " "" "3EB9D" :UBS) "dREALNcase" ("% \\-> :: % <ob2> <rest> ;
  3451. ob \\-> :: ob <ob1> ;
  3452. " "" "36EA7") "dARRYcase" ("[] \\-> :: [] <ob1> ;
  3453. ob \\-> :: ob <ob2> <rest> ;
  3454. " "" "36E07") "dLISTcase" ("{} \\-> :: {} ob1 ;
  3455. ob \\-> :: ob <ob2> <rest> ;
  3456. " "" "36E43") "NOTLISTcase" ("{} \\-> :: {} <ob2> <rest> ;
  3457. ob \\-> :: ob <ob1> ;
  3458. " "" "260C6") "NOTSECOcase" ("seco \\-> :: seco <ob2> <rest> ;
  3459. ob \\-> :: ob <ob1> ;
  3460. " "" "260D0") "NOTROMPcase" ("romp \\-> :: romp <ob2> <rest> ;
  3461. ob \\-> :: ob <ob1> ;
  3462. " "" "260CB") "numb1stcase" ("%/C%/[]/[L] \\-> :: <ob1> ;
  3463. ob \\-> :: ob2 <rest> ;
  3464. " "If %, C%, [ ] or [L] then <REF>COLA,
  3465. else <REF>SKIP .
  3466. " "2ADE0") "dZINTcase" ("zint \\-> :: zint ob1 ;
  3467. ob \\-> :: ob <ob2> <rest> ;
  3468. " "" "36E2F" :UBS) "UserITE" ("#set \\-> :: <ob1> <ob3> <rest> ;
  3469. #clr \\-> :: <ob2> <rest> ;
  3470. " "" "36F65") "SysITE" ("#set \\-> :: <ob1> <ob3> <rest> ;
  3471. #clr \\-> :: <ob2> <rest> ;
  3472. " "" "36F79") "caseDEADKEY" ("T \\-> :: DoBadKey ;
  3473. F \\-> :: <ob1> <rest> ;
  3474. " "" "36C4F") "caseDoBadKey" ("T \\-> :: DoBadKey ;
  3475. F \\-> :: <ob1> <rest> ;
  3476. " "" "36C4F") "caseDrpBadKy" ("ob T \\-> :: DoBadKey ;
  3477. ob F \\-> :: ob <ob1> <rest> ;
  3478. " "" "36C36") "caseERRJMP" ("T \\-> :: ERRJMP ;
  3479. F \\-> :: <ob> <rest> ;
  3480. " "" "361B2") "caseSIZEERR" ("T \\-> :: SIZEERR ;
  3481. F \\-> :: <ob> <rest> ;
  3482. " "" "36B53") "NcaseSIZEERR" ("T \\-> :: <ob> <rest> ;
  3483. F \\-> :: SIZEERR ;
  3484. " "" "36B67") "NcaseTYPEERR" ("T \\-> :: <ob1> <rest> ;
  3485. F \\-> :: TYPEERR ;
  3486. " "" "36BAA") "NoEdit?case" ("\\-> :: <ob1> <rest> ;
  3487. \\-> :: <rest> ;
  3488. " "Tests if there is no edit line active.
  3489. " "25EEE") "EditExstCase" ("\\-> :: <ob1> <rest> ;
  3490. \\-> :: <rest> ;
  3491. " "Tests if there is an edit line active.
  3492. " "36E57") "AlgebraicModecase" ("\\-> :: <ob1> ;
  3493. \\-> :: <ob2> <rest>
  3494. " "Tests for algebraic mode and does case.
  3495. " "2BE36" :UBS) "NOP" ("\\->
  3496. " "Does nothing.
  3497. " "06E8E") "xNEGNEG" ("\\->
  3498. " "Does nothing, decompiles to
  3499. :: CK1&Dispatch BINT0 NOP ;
  3500. There like NOP, but requires an argument.
  3501. " "39CD5") "'R" ("\\-> ob
  3502. " "Pushes next object in return stack (i.e., the
  3503. first object in the composite above this one)
  3504. to the stack (skipping it). If top return
  3505. stack is empty (contains SEMI), a null
  3506. secondary is pushed and the pointer is not
  3507. advanced.
  3508. " "06EEB") "'REVAL" ("\\-> ?
  3509. " "Does <REF>'R then <REF>EVAL.
  3510. " "06F66") "'R'R" ("\\-> ob1 ob2
  3511. " "Does <REF>'R twice.
  3512. " "36A27") "ticR" ("\\-> ob T
  3513. \\-> F
  3514. " "Pushes next object in return stack to stack
  3515. and TRUE, of just FALSE if the top return
  3516. stack body is empty. In this QcaseQ, it is
  3517. dropped.
  3518. " "34BEF") "'RRDROP" ("\\-> ob
  3519. " "Does <REF>'R , then <REF>RDROP.
  3520. " "36A4A") ">R" (":: \\->
  3521. " "Pushes :: to top of return stack (skips
  3522. prolog, i.e., the composite will be executed
  3523. automatically).
  3524. " "06F9F") "R>" ("\\-> ::
  3525. " "Creates and pops a secondary from top
  3526. return stack body to stack.
  3527. " "0701F") "R@" ("\\-> ::
  3528. " "Like <REF>R>, but the return stack is not
  3529. popped.
  3530. " "07012") "IDUP" ("\\->
  3531. " "Pushes top body into return stack.
  3532. " "0716B") "EVAL" ("ob \\->
  3533. " "Evaluates object.
  3534. " "06F8E") "COMPEVAL" ("comp \\->
  3535. " "EVAL just pushes a list back, this one
  3536. executes it.
  3537. " "262FB") "2@REVAL" ("\\->
  3538. " "EVAL first object in the stream above the
  3539. previous one.
  3540. " "34BAB") "3@REVAL" ("\\->
  3541. " "EVAL first object in the stream above the
  3542. stream above the previous one.
  3543. " "34BBB") "GOTO" ("\\->
  3544. " "Jumps to next address in stream. Address is
  3545. a five-nibble address, not a system binary.
  3546. Can only be used to jump to the middle of
  3547. programs, cannot jump to a program prolog.
  3548. " "34A31") "?GOTO" ("flag \\->
  3549. " "If TRUE, jumps, else skips five nibbles.
  3550. " "34A46") "NOT?GOTO" ("flag \\->
  3551. " "If FALSE jumps, else skips five nibbles.
  3552. " "34A59") "RDUP" ("\\->
  3553. " "Duplicates top return stack level.
  3554. " "26111") "RDROP" ("\\->
  3555. " "Pops the return stack.
  3556. " "06FB7") "2RDROP" ("\\->
  3557. " "Pops two return stack levels.
  3558. " "343E1") "3RDROP" ("\\->
  3559. " "Pops three return stack levels.
  3560. " "343F3") "DROPRDROP" ("ob \\->
  3561. " "Does DROP then <REF>RDROP .
  3562. " "36342") "RDROPCOLA" ("\\->
  3563. " "Does <REF>RDROP then <REF>COLA .
  3564. " "3597F") "RSWAP" ("\\->
  3565. " "Swap in the return stack.
  3566. " "34144") "RROLL" ("#n \\->
  3567. " "Rolls nth return stack level to top of return
  3568. stack.
  3569. " "2644A" :UBS) "RSKIP" ("\\->
  3570. " "Skips first object in the return stack (i.e.,
  3571. the first object in the composite above this
  3572. one).
  3573. " "368C9") "OBJ>R" ("ob \\->
  3574. " "Pushes an object into the return stack, for
  3575. example for temporary storage. If ob is a
  3576. list, the list is put as a whole onto the
  3577. stream, not the individual elements.
  3578. " "2B8BE" :UBS) "R>OBJ" ("\\-> ob
  3579. " "Gets an object from the return stack.
  3580. " "2B8E6" :UBS) "SEMI" ("\\->
  3581. " "DROP the rest of the current stream.
  3582. " "0312B") "'" ("\\-> nob (nextob)
  3583. " "Pushes next object in the stream to the stack
  3584. (skipping it).
  3585. " "06E97") "xSILENT'" ("\\-> nextob
  3586. " "Put the next ob in the runstream on the
  3587. stack. Quoter used in UserRPL.
  3588. " "38837") "DUP'" ("ob \\-> ob nob
  3589. " "Does DUP then '.
  3590. " "3696E") "DROP'" ("ob \\-> nob
  3591. " "Does DROP then '.
  3592. " "36996") "SWAP'" ("ob1 ob2 \\-> ob2 ob1 nob
  3593. " "Does SWAP then '.
  3594. " "36982") "OVER'" ("ob1 ob2 \\-> ob1 ob2 ob1 nob
  3595. " "Does OVER then '.
  3596. " "369AA") "STO'" ("ob id/lam \\-> nob
  3597. " "Does STO then '.
  3598. " "369BE") "TRUE'" ("\\-> T nob
  3599. " "Pushes TRUE and the next object to the stack.
  3600. " "369D2") "FALSE'" ("\\-> F nob
  3601. " "Pushes FALSE and the next object to the
  3602. stack.
  3603. " "369FF") "ONEFALSE'" ("\\-> #1 F nob
  3604. " "Pushes ONE, FALSE and the next object to the
  3605. stack.
  3606. " "369E6") "#1+'" ("# \\-> #+1 nob
  3607. " "Does #1+ then '.
  3608. " "36A13") "'NOP" ("\\-> NOP
  3609. " "Pushes NOP to the stack.
  3610. " "36306") "'ERRJMP" ("\\-> ERRJMP
  3611. " "Pushes ERRJMP to the stack.
  3612. " "3619E") "'DROPFALSE" ("\\-> DROPFALSE
  3613. " "Pushes DROPFALSE to the stack.
  3614. " "2B90B") "'DoBadKey" ("\\-> DoBadKey
  3615. " "Pushes DoBadKey to the stack.
  3616. " "25E6A") "'DoBadKeyT" ("\\-> DoBadKey T
  3617. " "Pushes <REF>DoBadKey and TRUE to the stack.
  3618. " "25E6B") "DROPDEADTRUE" ("ob \\-> DoBadKey T
  3619. " "Makes the user QdropQ dead, then pushes TRUE.
  3620. " "2F32E") "'x*" ("\\-> x*
  3621. " "Pushes <REF>x* (User word *) to the stack.
  3622. " "36BBE" :UBS) "'xDER" ("\\-> xDER
  3623. " "Pushes xDER (User word \\.d) to the stack.
  3624. " "36BD2") "'IDFUNCTION" ("\\-> xFUNCTION
  3625. " "Pushes xFUNCTION (User word FUNCTION) to the
  3626. stack.
  3627. " "27B43") "'IDPOLAR" ("\\-> xPOLAR
  3628. " "Pushes xPOLAR (User word POLAR) to the stack.
  3629. " "27B6B") "'IDCONIC" ("\\-> xCONIC
  3630. " "Pushes xCONIC (User word CONIC) to the stack.
  3631. " "27B57" :UBS) "'IDPARAMETER" ("\\-> xPARAMETRIC
  3632. " "Pushes xPARAMETRIC (user word PARAMETRIC)
  3633. to the stack.
  3634. " "27B7F") "'IDTRUTH" ("\\-> xTRUTH
  3635. " "Pushes xTRUTH (user word TRUTH) to the stack.
  3636. " "27B93" :UBS) "'IDSCATTER" ("\\-> xSCATTER
  3637. " "Pushes xSCATTER (user word SCATTER) to the
  3638. stack.
  3639. " "27BA7" :UBS) "'IDHISTOGRAM" ("\\-> xHISTOGRAM
  3640. " "Pushes xHISTOGRAM (user word HISTROGRAM) to
  3641. the stack.
  3642. " "27BBB" :UBS) "'IDBAR" ("\\-> xBAR
  3643. " "Pushes xBAR (user word BAR) to the stack.
  3644. " "27BCF" :UBS) "'IDFAST3D" ("\\-> xFAST3D
  3645. " "Pushes xFAST3D (user word FAST3D) to the
  3646. stack.
  3647. " "27BE3" :UBS) "'Rapndit" ("meta ob1...ob4 \\-> meta&ob ob1...ob4
  3648. " "Takes ob from runstream and appends it to the
  3649. meta starting in level 5.
  3650. " "29ED0") "'xDEREQ" ("ob \\-> flag
  3651. " "Is ob eq to user command xDER?
  3652. " "36AA4") "COLA" ("Evals next obj and
  3653. drops rest of this stream.
  3654. " "" "06FD1") "ONECOLA" ("Does ONE, then COLA.
  3655. " "" "36A63") "SWAPCOLA" ("Does SWAP, then COLA.
  3656. " "" "3635B") "XYZ>ZCOLA" ("Does UNROT2DROP, then COLA.
  3657. " "" "3636F") "COLA_EVAL" ("Returns and evals first obj
  3658. in previous stream.
  3659. " "" "34AD3") "COLACOLA" ("Drops rest of current stream
  3660. does COLA in the above one.
  3661. " "" "35994") "DROPCOLA" ("Does DROP then COLA
  3662. " "" "281E9" :UBS) "SKIP" ("Skips 1 obj in the runstream.
  3663. " "" "0714D") "2SKIP" ("Skips 2 objs in the runstream.
  3664. " "" "0715C" :UBS) "skipcola" ("Does SKIP, then COLA.
  3665. " "" "35715") "2skipcola" ("Does 2SKIP, then COLA.
  3666. " "" "3570C") "3skipcola" ("Does 3SKIP, then COLA.
  3667. " "" "35703") "5skipcola" ("Skips 5 objects, then does COLA.
  3668. " "" "356D5") "COLASKIP" ("Drops rest of current stream
  3669. and skips one obj in above stream.
  3670. " "" "363FB") "IDUP" ("\\->
  3671. " "Pushes interpreter pointer into the return
  3672. stack.
  3673. " "0716B") "BEGIN" ("\\->
  3674. " "Pushes interpreter pointer into the return
  3675. stack.
  3676. " "071A2") "AGAIN" ("\\->
  3677. " "Sets the interpreter pointer to the topmost
  3678. value in the return stack, without popping
  3679. it.
  3680. " "071AB") "REPEAT" ("\\->
  3681. " "Sets the interpreter pointer to the topmost
  3682. value in the return stack, without popping
  3683. it.
  3684. " "071E5") "UNTIL" ("flag \\->
  3685. " "If FALSE then <REF>AGAIN, otherwise
  3686. <REF>RDROP .
  3687. " "071C8") "NOT_UNTIL" ("flag \\->
  3688. " "NOT then <REF>UNTIL .
  3689. " "3640F") "#0=UNTIL" ("# \\-> #
  3690. " "Actually, should be called DUP#0=UNTIL.
  3691. " "35B96") "WHILE" ("flag \\->
  3692. " "If TRUE does nothing, otherwise <REF>RDROP then
  3693. <REF>2SKIP .
  3694. " "071EE") "NOT_WHILE" ("flag \\->
  3695. " "NOT then <REF>WHILE .
  3696. " "36428") "DUP#0<>WHILE" ("# \\->
  3697. " "Try to guess what it does.
  3698. " "36441") "DO" ("#stop #start \\->
  3699. " "" "073F7") "ZERO_DO" ("#stop \\->
  3700. " "" "073C3") "DUP#0_DO" ("#stop \\-> #stop
  3701. " "" "364C8") "ONE_DO" ("#stop \\->
  3702. " "" "073CE") "#1+_ONE_DO" ("#stop \\->
  3703. " "" "073DB") "toLEN_DO" ("{} \\-> {}
  3704. " "From ONE to #elements.
  3705. " "364E1") "LOOP" ("\\->
  3706. " "" "07334") "+LOOP" ("# \\->
  3707. " "Increments index by specified number.
  3708. " "073A5") "DROPLOOP" ("ob \\->
  3709. " "" "364AF") "SWAPLOOP" ("ob1 ob2 \\-> ob2 ob1
  3710. " "" "36496") "STOPLOOP" ("\\->
  3711. " "Destroys topmost loop environment.
  3712. " "07321" :UBS) "SEMILOOP" ("\\->
  3713. " "" "34AAD") "INDEX@" ("\\-> #
  3714. " "Recalls topmost loop counter value.
  3715. " "07221") "DUPINDEX@" ("ob \\-> ob #
  3716. " "" "3645A") "SWAPINDEX@" ("ob1 ob2 \\-> ob2 ob1 #
  3717. " "" "3646E") "OVERINDEX@" ("ob1 ob2 \\-> ob1 ob2 ob1 #
  3718. " "" "36482") "INDEX@#-" ("# \\-> #'
  3719. " "" "367D9") "INDEXSTO" ("# \\->
  3720. " "Stores new topmost loop counter value.
  3721. " "07270") "ISTOP@" ("\\-> #
  3722. " "Recalls topmost loop stop value.
  3723. " "07249") "ISTOPSTO" ("# \\->
  3724. " "Stores new topmost loop stop value.
  3725. " "07295") "ISTOP-INDEX" ("\\-> #
  3726. " "" "283FC") "JINDEX@" ("\\-> #
  3727. " "Recalls second topmost loop counter value.
  3728. " "07258") "JINDEXSTO" ("# \\->
  3729. " "Stores new second topmost loop counter
  3730. value.
  3731. " "072AD") "JSTOP@" ("\\-> #
  3732. " "Recalls second topmost loop stop value.
  3733. " "07264") "JSTOPSTO" ("# \\->
  3734. " "Stores new second topmost loop stop value.
  3735. " "072C2") "ZEROISTOPSTO" ("\\->
  3736. " "Does not exit loop immediately. Just stores
  3737. zero as the stop value, so all objects until
  3738. the next LOOP will be evaluated.
  3739. " "3709B") "(ExitAtLoop)" ("\\->
  3740. " "Does not exit loop immediately. Just stores
  3741. zero as the stop value, so all objects until
  3742. the next LOOP will be evaluated.
  3743. " "3709B") "ExitAtLOOP" ("\\->
  3744. " "Does not exit loop immediately. Just stores
  3745. zero as the stop value, so all objects until
  3746. the next LOOP will be evaluated.
  3747. " "3709B") "DUP@" ("id/lam \\-> id/lam ob T
  3748. \\-> id/lam F
  3749. " "Does DUP then <REF>@.
  3750. " "35C2C") "SAFE@" ("id/lam \\-> ob T
  3751. \\-> F
  3752. " "For lams does <REF>@. For ids does
  3753. <REF>?ROMPTR> to the ob found.
  3754. " "35A5B") "DUPSAFE@" ("id/lam \\-> id/lam ob T
  3755. \\-> id/lam F
  3756. " "Does DUP then <REF>SAFE@.
  3757. " "35A56") "SAFE@_HERE" ("id \\-> ob F
  3758. \\-> T
  3759. " "Same as <REF>SAFE@, but works only in the
  3760. current directory.
  3761. " "25EF7") "Sys@" ("ID \\-> ob T
  3762. \\-> F
  3763. " "Switches temporarily to the HOME directory
  3764. and executes @ there.
  3765. " "2F064") "XEQRCL" ("id \\-> ob
  3766. " "Same as <REF>SAFE@, but errors if variable is not
  3767. found. Also works for lams, but you get the
  3768. wrong error.
  3769. " "2F2A3") "DUPXEQRCL" ("id \\-> id ob
  3770. " "Tries to recall, errors if not existent.
  3771. " "3F2EA" :UBS) "LISTRCL" ("{path id} \\-> ob
  3772. " "Recalls from specified path.
  3773. " "2F24E") "STO" ("ob id/lam \\->
  3774. " "For ids this assumes ob is not pco. If
  3775. replacing some object, that object is copied
  3776. to TEMPOB and pointers are updated. For
  3777. lams: Errors if lam is unbound.
  3778. " "07D27") "EVALNOCKSTO" ("ob id/lam \\->
  3779. " "Same as <REF>EvalNoCK:_ <REF>STO.
  3780. " "2F2D5") "EVLNCKSTO" ("ob id \\->
  3781. " "Does EvalNoCk: xSTO
  3782. " "2F2D5" :UBS) "SAFESTO" ("ob id/lam \\->
  3783. " "For ids, does <REF>?>ROMPTR to the object
  3784. before storing.
  3785. " "35A29") "SysSTO" ("ob ID \\->
  3786. " "Switches temporarily to the HOME directory
  3787. and executes <REF>STO there.
  3788. " "2F380") "?STO_HERE" ("ob id/lam \\->
  3789. " "Same as <REF>SAFESTO, but will only store in the
  3790. current directory and will not overwrite a
  3791. directory.
  3792. " "25E79") "XEQSTOID" ("ob id/lam \\->
  3793. " "Same as <REF>SAFESTO, but will only store in the
  3794. current directory and will not overwrite a
  3795. directory.
  3796. " "25E79") "XEQStoKey" ("ob ID \\->
  3797. " "" "25F0C") "xSTO>" ("ob id \\->
  3798. ob symb \\->
  3799. " "Like <REF>xSTO, but if the level 1 argument is
  3800. symbolic, use the first element of it as the
  3801. variable to write to.
  3802. " "3E823") "^PROMPTSTO1" ("id/lam \\->
  3803. " "Inputs value for a variable and stores it.
  3804. " "0BD007" :wasCSys) "REPLACE" ("newob oldob \\-> newob
  3805. " "Replaces oldob (in memory) with newob.
  3806. " "085D3") "PURGE" ("id \\->
  3807. " "Purges variable. Does no type check first.
  3808. " "08C27") "?PURGE_HERE" ("id \\->
  3809. " "Like <REF>PURGE, but only works in current
  3810. directory.
  3811. " "25E78") "^SAFEPURGE" ("idnt/lam \\->
  3812. " "Purge idnt/lam if it exist.
  3813. " "1D3006" :wasCSys) "MOVEVAR" ("
  3814. " "Move the variable to a different directory.
  3815. Stack diagram unknown - level 1 must be rrp,
  3816. but level two??
  3817. " "2C388") "CREATE" ("ob id \\->
  3818. " "Creates a variable in the current directory.
  3819. Errors if id is or contains current
  3820. directory. Assumes id is not a pco.
  3821. " "08696") "DoHere:" ("\\->
  3822. " "Next object in the runstream is evaluated for
  3823. the current directory only.
  3824. " "25EC4") "'LAMLNAMESTO" ("ob \\->
  3825. " "STO to LAM LAMLNAME.
  3826. " "36A8B") "MAKERRP" ("#libnum \\-> rrp
  3827. " "Creates an empty directory.
  3828. " "077E4" :UBS) "CREATERRP" ("id \\->
  3829. " "Creates an empty directory. Does not check if
  3830. the name is already used.
  3831. :: # 7FF CRDIR# SWAP CREATE ;
  3832. " "08DF2" :UBS) "CREATEDIR" ("id \\->
  3833. " "Creates an empty directory. Calls
  3834. <REF>?PURGE_HERE first to delete the original.
  3835. " "25EA1") "LASTRAM-WORD" ("rrp \\-> ob T
  3836. \\-> F
  3837. " "Recalls first object in directory.
  3838. " "08326") "LastNonNull" ("rrp \\-> ob T
  3839. \\-> F
  3840. " "Recalls first object in directory (not null
  3841. named).
  3842. " "25EE7") "PREVRAM-WORD" ("ob \\-> ob' T
  3843. \\-> F
  3844. " "Recalls next object in directory.
  3845. " "08376") "PrevNonNull" ("ob \\-> ob' T
  3846. \\-> F
  3847. " "Recalls next object in directory (not null
  3848. named).
  3849. " "25EF2") "RAM-WORDNAME" ("ob \\-> id
  3850. " "Recalls name of object in current directory.
  3851. " "082E3") "XEQPGDIR" ("id \\->
  3852. " "Purges a directory. Checks references, etc.
  3853. first.
  3854. " "25F14") "XEQORDER" ("{id1 id2..} \\->
  3855. " "Orders the variables in the directory by
  3856. moving the given variables to the beginning of
  3857. the directory.
  3858. " "2F296") "DOVARS" ("\\-> {id1 id2..}
  3859. " "Returns list of variables from current
  3860. directory.
  3861. " "25EB9") "DOTVARS%" ("% \\-> {}
  3862. " "Returns a list of variables in the current
  3863. directory with user type given by the
  3864. number. Internal TVARS if a single number was
  3865. given.
  3866. " "25EB8") "^DOTVARS{}" ("{# #' ...} \\-> {}
  3867. " "Returns a list of variables in the current
  3868. directory with user type given by any of the
  3869. numbers in the list. This is the core of the
  3870. TVARS program.
  3871. " "0BD002") "DOTVARS" ("{# #' ...} \\-> {}
  3872. " "Pointer to ^DOTVARS{}.
  3873. " "2C3FA" :UBS) "PATHDIR" ("\\-> {HOME dir1 dir2..}
  3874. " "Returns current path.
  3875. " "25EF1") "UPDIR" ("\\->
  3876. " "Goes to parent directory.
  3877. " "2F265") "MYRAMROMPAIR" ("rrp \\-> rrp' T
  3878. \\-> F
  3879. " "Gets parent directory. Returns FALSE if
  3880. parent directory is HOME.
  3881. " "08309" :UBS) "SYSRRP?" ("rrp \\-> flag
  3882. " "Is the directory the HOME directory?
  3883. " "08DD4" :UBS) "CONTEXT@" ("\\-> rrp
  3884. " "Recalls current directory.
  3885. " "08D5A") "CONTEXT!" ("rrp \\->
  3886. " "Sets new current directory.
  3887. " "08D08") "LastContext!" ("rrp \\->
  3888. " "" "25917" :UBS) "LastContext@" ("\\-> rrp
  3889. " "" "2591C" :UBS) "SYSRRP?" ("rrp \\-> flag
  3890. " "Is rrp HOME?
  3891. " "08DD4") "STOPSIGN@" ("\\-> rrp
  3892. " "Recalls last directory.
  3893. " "08D82" :UBS) "STOPSIGN!" ("rrp \\->
  3894. " "Stores new last directory.
  3895. " "08D4A" :UBS) "SYSCONTEXT" ("\\->
  3896. " "Sets HOME as current directory.
  3897. " "08D92") "HOMEDIR" ("\\->
  3898. " "Sets HOME as current directory.
  3899. " "08D92") "SYSSTOPSIGN" ("\\->
  3900. " "Sets HOME as last directory.
  3901. " "08DC4" :UBS) "SaveVarRes" ("\\->
  3902. " "Binds current and last directories to two
  3903. nullnamed lams.
  3904. " "3712C") "RestVarRes" ("\\->
  3905. " "First sets HOME as both the current and last
  3906. directories (in QcaseQ an error happens). Then,
  3907. restores the current and last directories
  3908. from 1LAM and 2LAM.
  3909. " "37186") "SetHiddenRes" ("\\->
  3910. " "Sets the hidden directory as the current and
  3911. last directories.
  3912. " "3714A") "WithHidden" ("\\-> ?
  3913. " "Executes next command in hidden directory.
  3914. " "370C3") "RclHiddenVar" ("id \\-> ob T
  3915. \\-> F
  3916. " "Recalls variable in hidden directory. Same
  3917. as
  3918. :: WithHidden @ ;
  3919. " "370AF") "StoHiddenVar" ("ob id \\->
  3920. " "Stores variable in hidden directory. Same as
  3921. :: WithHidden STO ;
  3922. " "37104") "PuHiddenVar" ("id \\->
  3923. " "Purges variable in hidden directory. Same as
  3924. :: WithHidden PURGE ;
  3925. " "37118") "TOTEMPOB" ("ob \\-> ob'
  3926. " "Copies object to TEMPOB and returns
  3927. pointer to the new copy.
  3928. " "06657") "TOTEMPSWAP" ("ob1 ob2 \\-> ob2' ob1
  3929. " "Does TOTEMPOB then SWAP.
  3930. " "35C90") "CKREF" ("ob \\-> ob'
  3931. " "If object is in TEMPOB, is not embedded in a
  3932. composite and not referenced, does nothing.
  3933. Else copies it to TEMPOB and returns the
  3934. copy.
  3935. " "25E9F") "SWAPCKREF" ("ob1 ob2 \\-> ob2 ob1'
  3936. " "Does SWAP then <REF>CKREF.
  3937. " "3700A") "INTEMNOTREF?" ("ob \\-> ob flag
  3938. " "If the object is in TEMPOB area, is not
  3939. embedded in a composite and is not
  3940. referenced, returns the object and TRUE,
  3941. otherwise returns the object and FALSE.
  3942. " "06B4E") "FREEINTEMP?" ("ob \\-> ob flag
  3943. " "Tests if object is in TEMPOB area and not in
  3944. a composite.
  3945. " "06B3E" :UBS) "~INTEMPOB?" ("ob \\-> ob flag
  3946. " "" "01E0E8") "PTRREFD?" ("ob \\-> ob flag
  3947. " "Tests if object is referenced.
  3948. " "065D9" :UBS) "REFERENCED?" ("ob \\-> ob flag
  3949. " "Tests if object is referenced or in
  3950. composite.
  3951. " "065E5" :UBS) "NOTREF?" ("ob \\-> ob flag
  3952. " "Tests if object is not referenced or in
  3953. composite. ( :: REFERENCED? NOT ; )
  3954. " "06BC2" :UBS) ">TOPTEMP" ("ob \\-> ob'
  3955. " "Moves object to top ob TEMPOB area. Does
  3956. not garbage collection.
  3957. " "06DDE" :UBS) "TOTEMPOBADJ" ("ob \\-> ob ob'
  3958. " "Makes a standalone copy by moving
  3959. references to a new copy.
  3960. " "064BD" :UBS) "DOADJ1" ("ob1 ob2 \\-> ob1 ob'
  3961. " "Moves references from ob2 to ob1 (ob1 in
  3962. TEMPOB area).
  3963. " "064D6" :UBS) "DOADJ" ("ob1 ob2 \\-> ob1 ob'
  3964. " "Moves references from ob2 to ob1 (ob1 in
  3965. TEMPOB area). References to body of ob2 are
  3966. moved too.
  3967. " "064E2" :UBS) "SLOW" ("\\->
  3968. " "15 millisecond delay.
  3969. " "26120") "VERYSLOW" ("\\->
  3970. " "300 millisecond delay.
  3971. " "26125") "SORTASLOW" ("\\->
  3972. " "1.2 second delay (4 x VERYSLOW).
  3973. " "2F37E") "VERYVERYSLOW" ("\\->
  3974. " "3 second delay.
  3975. " "2612A") "dowait" ("%secs \\->
  3976. " "Waits specified number of seconds.
  3977. " "2F2D4") "%>HMS" ("% \\-> %hms
  3978. " "Converts from decimal to H.MMSS format.
  3979. " "3005E") "%%H>HMS" ("%% \\-> %%hms
  3980. " "Same as %>HMS, but for long reals.
  3981. " "30912") "%HMS>" ("%hms \\-> %
  3982. " "Converts from H.MMSS format to decimal.
  3983. " "30077") "%HMS+" ("%hms1 %hms2 \\-> %hms
  3984. " "Adds time in hms format.
  3985. " "3008B") "%HMS-" ("%hms1 %hms2 \\-> %hms
  3986. " "Subtracts time in hms format.
  3987. " "300B3") "TOD" ("\\-> %time
  3988. " "Returns current time.
  3989. " "2EECF") "VerifyTOD" ("%time \\-> %time
  3990. " "Checks for validaty of time. Errors if not
  3991. valid.
  3992. " "2F388") "DATE" ("\\-> %date
  3993. " "Returns current date.
  3994. " "2EED0") ">DATE" ("%date \\->
  3995. " "Sets date, errors if % is not a valid date.
  3996. " "2F03B" :UBS) "DATE+DAYS" ("%date %days \\-> %date'
  3997. " "Adds specified number of days to date.
  3998. " "2EED2") "DDAYS" ("%date1 %date2 \\-> %days
  3999. " "Returns number of days between two dates.
  4000. " "2EED1") "SysTime" ("\\-> hxs
  4001. " "Returns tick count.
  4002. " "2EED7") "CLKTICKS" ("\\-> hxs
  4003. " "Returns tick count.
  4004. " "2EED7") "TIMESTR" ("%dt %tm \\-> \"dy dt tm\"
  4005. " "Returns string representation of time, using
  4006. current format. Example:
  4007. \"WED 06/24/98 10:00:45A\"
  4008. " "2EED3") "Date>d$" ("%date \\-> $
  4009. " "Returns string representation of date, using
  4010. current format.
  4011. " "2F329") "TOD>t$" ("%time \\-> $
  4012. " "Returns string represent the time, using
  4013. current format.
  4014. " "2F381") "Date>hxs13" ("%date \\-> hxs
  4015. " "Converts date to ticks.
  4016. " "2F1AB") "Ticks>Date" ("hxs \\-> %date
  4017. " "Returns date from hxs of internal alarm list
  4018. format.
  4019. " "2F003" :UBS) "Ticks>TOD" ("hxs \\-> %time
  4020. " "Returns time from hxs of internal alarm list
  4021. format.
  4022. " "2F002" :UBS) "Ticks>Rpt" ("hxs \\-> %rpt
  4023. " "Converts hxs in internal alarm list format to
  4024. repetition interval.
  4025. " "2F004" :UBS) "ALARMS@" ("\\-> {}
  4026. " "Returns internal alarms list.
  4027. " "2F178") "STOALM" ("%date %time acti %rep \\-> %
  4028. " "Stores an alarm. %repeat is the number of
  4029. ticks between every repetition. Since there
  4030. are 8192 ticks in a second, 60 seconds in a
  4031. minute, and 60 minutes in an hour, to make an
  4032. alarm that repeats every hour, %repetition
  4033. would be 8192*60*60 = 29491200.
  4034. Returns real number representing the position
  4035. of the alarm in the list.
  4036. " "2F37F") "PURGALARM%" ("% \\->
  4037. " "Internal <REF>xDELALARM.
  4038. " "2F0AC") "RCLALARM%" ("%n \\-> {}
  4039. " "Recalls nth alarm. List is in the format of
  4040. STOALARMLS.
  4041. " "2F314") "ALARM?" ("\\-> flag
  4042. " "Returns TRUE if an alarm is due.
  4043. " "25FA9") "FNDALARM{}" ("
  4044. " "" "2F113") "FindNext" ("
  4045. " "" "2F336") "SetSysFlag" ("# \\->
  4046. " "Sets the system flag with number #.
  4047. <REF>TEXT:Flags
  4048. " "2614D") "ClrSysFlag" ("# \\->
  4049. " "Clears the system flag with number #.
  4050. <REF>TEXT:Flags
  4051. " "26044") "TestSysFlag" ("# \\-> flag
  4052. " "Returns TRUE if system flag is set.
  4053. <REF>TEXT:Flags
  4054. " "26170") "SetUserFlag" ("# \\->
  4055. " "Set the user flag with number #.
  4056. <REF>TEXT:Flags
  4057. " "26152") "ClrUserFlag" ("# \\->
  4058. " "Clear the user flag with number #.
  4059. <REF>TEXT:Flags
  4060. " "26049") "TestUserFlag" ("# \\-> flag
  4061. " "Returns TRUE if user flag is set.
  4062. <REF>TEXT:Flags
  4063. " "26175") "RCLSYSF" ("\\-> hxs
  4064. " "Recalls system flags from 1 to 64.
  4065. <REF>TEXT:Flags
  4066. " "2F259") "STOSYSF" ("hxs \\->
  4067. " "Stores system flags from 1 to 64.
  4068. <REF>TEXT:Flags
  4069. " "2F25F" :UBS) "DOSTOSYSF" ("hxs \\->
  4070. " "Stores system flags from 1 to 64, checking
  4071. for changes in LASTARG flag.
  4072. " "2F23E") "RCLSYSF2" ("\\-> hxs
  4073. " "Recalls system flags from 65 to 128.
  4074. " "2F25A" :UBS) "STOSYSF2" ("hxs \\->
  4075. " "Stores system flags from 65 to 128.
  4076. " "2F260" :UBS) "RCLUSERF" ("\\-> hxs
  4077. " "Recalls user flags from 1 to 64.
  4078. " "2F25B") "STOUSERF" ("hxs \\->
  4079. " "Stores user flags from 1 to 64.
  4080. " "2F261" :UBS) "RCLUSERF2" ("\\-> hxs
  4081. " "Recalls user flags from 65 to 128.
  4082. " "2F25C" :UBS) "STOUSERF2" ("hxs \\->
  4083. " "Stores user flags from 65 to 128.
  4084. " "2F262" :UBS) "STOALLFcont" ("hxs_usr hxs_sys \\->
  4085. " "Stores user and system flags from 1 to
  4086. 64. First is user flags, second is system
  4087. flags.
  4088. " "2F3A9" :UBS) "STOALLFcont2" ("hxs_sys1 hxs_usr1 hxs_sys2 hxs_usr2 \\->
  4089. " "Expects 4 hxs and stores them as user and
  4090. system flags.
  4091. " "2F3AA" :UBS) "DOSTOALLF" ("{} \\->
  4092. " "Stores system and user flags. Expects a list
  4093. with two or four hxs. The first two are the
  4094. system and user flags, respectively, from 1
  4095. to 64. The last two, if present, are the
  4096. system and user flags, respectively, from 65
  4097. to 128.
  4098. " "3B76C" :UBS) "SaveSysFlags" ("\\->
  4099. " "Save system flags in a virtual stack.
  4100. <REF>TEXT:Flags
  4101. " "25F23") "RestoreSysFlags" ("\\->
  4102. " "Restore system flags from virtual stack,
  4103. popping that level.
  4104. <REF>TEXT:Flags
  4105. " "25F22") "RunSafeFlags" ("RS
  4106. ob \\->
  4107. " "Evaluates the next object in the runstream,
  4108. but saves and restores the system flags
  4109. around it. Uses DoRunSafe. This is very
  4110. useful.
  4111. <REF>TEXT:Flags
  4112. " "2ABF0") "RunInApprox" ("RS
  4113. ob \\->
  4114. " "Eval next object in runstream with system
  4115. flags 20, 21 clear and 22, 105, 102, 120 set.
  4116. --
  4117. Flags: -20 -21 -22 -105 -102 -120
  4118. " "2AB69") "DoRunSafe" ("ob \\-> hxs1 hxs2
  4119. " "Evaluate ob and put the system flags as they
  4120. were before the evaluation on the stack.
  4121. Used by RunSafeFlags and RunSafeFlagsNoError.
  4122. " "2AC0E") "RunSafeFlagsNoError" ("RS
  4123. ob \\->
  4124. " " :: 'R DoRunSafe 2DROP ;
  4125. " "2ABD7") "DOHEX" ("\\->
  4126. " "Switch stack display format of HEX strings to
  4127. hexadecimal.
  4128. <REF>TEXT:Flags
  4129. " "2EFA5") "DODEC" ("\\->
  4130. " "Switch stack display format of HEX strings to
  4131. decimal.
  4132. <REF>TEXT:Flags
  4133. " "2EFA8") "DOBIN" ("\\->
  4134. " "Switch stack display format of HEX strings to
  4135. binary.
  4136. " "2EFA6") "DOOCT" ("\\->
  4137. " "Switch stack display of HEX strings to octal.
  4138. " "2EFA7") "BASE" ("\\-> #
  4139. " "Returns #10h, #10d, #10b or #10o. In decimal
  4140. terms, 16 for hexadecimal base, 10 for
  4141. decimal base, 8 for octal base or 2 for
  4142. binary base.
  4143. " "2EFBF") "DOSTD" ("\\->
  4144. " "Internal version of user word STD.
  4145. " "2605D") "DOFIX" ("# \\->
  4146. " "Internal version of user word FIX.
  4147. " "26053") "DOSCI" ("# \\->
  4148. " "Internal version of user word SCI.
  4149. " "26058") "DOENG" ("# \\->
  4150. " "Internal version of user word ENG.
  4151. " "2604E") "savefmt1" ("\\->
  4152. " "Saves the current number format, and changes
  4153. to STD mode.
  4154. " "261A7") "rstfmt1" ("\\->
  4155. " "Restores the number format saved by
  4156. savefmt1. Only one set of flags can be saved,
  4157. there is no nesting of these entries.
  4158. " "261A2") "SETRAD" ("\\->
  4159. " "Set angular mode to RAD.
  4160. " "2FFDB") "RAD?" ("\\-> flag
  4161. " "Is angular mode QRAD?Q
  4162. " "25EF3") "SETDEG" ("\\->
  4163. " "Set angular mode DEG.
  4164. " "2FFBD") "SETGRAD" ("\\->
  4165. " "Set angular mode GRAD.
  4166. " "2FFEF") "DPRADIX?" ("\\-> flag
  4167. " "Returns TRUE if current radix is \".\".
  4168. " "25EBA") "UNDO_OFF" ("\\->
  4169. " "Turns saving of the last stack for UNDO off.
  4170. " "256AC") "UNDO_ON" ("\\->
  4171. " "Turns saving of the last stack for UNDO on.
  4172. " "256A7") "UNDO_ON?" ("\\-> flag
  4173. " "Tests if last stack saving for UNDO is on.
  4174. " "256A2") "1A/LockA" ("\\->
  4175. " "Equivalent to pressing the ALPHA key, turns
  4176. on ALPHA mode for either 1 keypress or until
  4177. the next ALPHA keypress, depending on system
  4178. flag 60.
  4179. --
  4180. Flags: -60
  4181. " "25E6C") "IsApple" ("\\-> flag
  4182. " "Can be used to distinguish the old Saturn
  4183. HP49G from the new ARM-based hp48gII and
  4184. hp49g+. The entry returns TRUE on the new
  4185. machines. On an HP49G, this entry is not
  4186. present. But you can test on both machines
  4187. with the following ML program:
  4188. CODE
  4189. $80B
  4190. XM=0
  4191. ?XM=0
  4192. SKIPYES { }
  4193. GOVLNG =\"PushF/TLoop\"
  4194. ENDCODE
  4195. " "2F3BF" :UBS :1\.22) "IsMidApple" ("\\-> flag
  4196. " "Tests for the hp48gII. Returns TRUE on
  4197. hp48gII, FALSE on hp49g+ and HP49G+.
  4198. " "2F3C0" :UBS :1\.22) "IsBigApple" ("\\-> flag
  4199. " "Check for the hp49g+. Returns TRUE on
  4200. hp49g+, FALSE on hp48gII and HP49G+. Use
  4201. this entry to test for the large screen.
  4202. " "2F3C1" :UBS :1\.22) "DOBEEP" ("%freq %dur \\->
  4203. " "Beeps. Analog to user function BEEP.
  4204. " "25EB2") "setbeep" ("#ms #Hz \\->
  4205. " "Also beeps.
  4206. " "261AC") "^SERIAL" ("\\-> $
  4207. " "Return a string with the Serial number of the
  4208. unit.
  4209. " "0C4002") "TurnOff" ("\\->
  4210. " "Internal OFF.
  4211. " "041A7") "DEEPSLEEP" ("\\-> flag
  4212. " "Puts HP into deepsleep mode.
  4213. Returns TRUE if \"Invalid Card Data\" message.
  4214. " "041ED") "LowBat?" ("\\-> flag
  4215. " "Returns TRUE if low battery.
  4216. " "01118") "ShowInvRomp" ("\\->
  4217. " "Flashes \"Invalid Card Data\" message.
  4218. " "0426A") "?FlashAlert" ("\\->
  4219. " "Displays system warnings.
  4220. " "2EE5D") "AlertStatus" ("\\-> #
  4221. " "Gets last system warning:
  4222. #0h = OK
  4223. #1h = Alarm
  4224. #2h = LowBat (S)
  4225. #4h = LowBat (P1)
  4226. #8h = LowBat (P2)
  4227. " "04544" :UBS) "Alert$" ("# \\-> $
  4228. " "Recalls system warning message.
  4229. " "04575" :UBS) "DOAPWL" ("\\->
  4230. " "Forces a warm start but does not log a
  4231. warmstart event.
  4232. " "2F237" :UBS) "LiteSlp" ("\\->
  4233. " "Enters light sleep mode.
  4234. " "04912" :UBS) "GARBAGE" ("\\->
  4235. " "Forces garbage collection.
  4236. " "05F42") "MEM" ("\\-> #
  4237. " "Returns amount of free memory in nibbles.
  4238. Does not do garbage collection. (The user
  4239. word does.)
  4240. " "05F61") "OSIZE" ("ob \\-> #
  4241. " "Returns object size in nibbles. Forces
  4242. garbage collection.
  4243. " "05902") "OCRC" ("ob \\-> #nib hxs
  4244. " "Returns size in nibbles and checksum as hxs.
  4245. " "05944") "OCRC%" ("ob \\-> hxs %bytes
  4246. " "Returns checksum and size in bytes.
  4247. " "2F257") "VARSIZE" ("id \\-> hxs %bytes
  4248. " "Returns checksum and size in bytes of
  4249. specified variable.
  4250. " "2F267") "INHARDROM?" ("ob \\-> ob flag
  4251. " "Is object address < #80000h?
  4252. " "394C8") "CHANGETYPE" ("ob #prolog \\-> ob'
  4253. " "Changes prolog of object, does TOTEMPOB.
  4254. " "05AB3") ">LANGUAGE" ("# \\->
  4255. " "Sets the current language for messages.
  4256. Internal version of x\\->LANGUAGE.
  4257. " "25F90") "LANGUAGE>" ("\\-> #
  4258. " "Returns the current language for messages.
  4259. Internal version of the xLANGUAGE\\->
  4260. command.
  4261. " "25F95") "NOBLINK" ("\\->
  4262. " "Clears the BLINKFLAG, SysNib5.
  4263. " "256BE") "?BlinkCursor" ("\\->
  4264. " "Makes the cursor Blink if in App-mode or
  4265. Editline.
  4266. " "25E71") "PushVStack" ("obn..ob1 \\-> obn..ob1
  4267. VS
  4268. \\-> [obn..ob1]
  4269. " "Pushes the RPN stack onto the Virtual
  4270. Stack. The RPN stack is unchanged.
  4271. " "25F1E") "PushVStack&Clear" ("obn..ob1 \\->
  4272. VS
  4273. \\-> [obn..ob1]
  4274. " "Does PushVStack and then clears the RPN
  4275. stack.
  4276. " "25F1F") "PopMetaVStackDROP" ("\\-> obn..ob1
  4277. VS
  4278. [obn..ob1] \\->
  4279. " "Pops the topmost virtual stack into the RPN
  4280. stack. The previous contents of the RPN stack
  4281. are preserved. (The Meta in the name means
  4282. that a count is returned, but the DROP
  4283. removes it afterwards.)
  4284. " "25F1A") "PopVStack" ("obm..ob1 \\-> obn'..ob1'
  4285. VS
  4286. [obn'..ob1'] \\->
  4287. " "Pops the topmost virtual stack into the RPN
  4288. stack. The previous contents of the RPN stack
  4289. are lost.
  4290. " "25F1B") "GetMetaVStackDROP" ("\\-> obn..ob1
  4291. VS
  4292. [obn..ob1] \\-> [obn..ob1]
  4293. " "Inserts the objects from the topmost virtual
  4294. stack into the RPN stack. The Virtual Stack
  4295. is unchanged. (The Meta in the name means
  4296. that a count is returned, but it is removed
  4297. by DROP.)
  4298. " "25F17") "GetVStack" ("obm..ob1 \\-> obn'..ob1'
  4299. VS
  4300. [obn'..ob1'] \\-> [obn'..ob1']
  4301. " "Copies the topmost virtual stack into the RPN
  4302. stack. The Virtual Stack is not changed, but
  4303. the current RPN stack is lost.
  4304. " "25F18") "PushMetaVStack" ("obn..ob1 #n \\-> obn..ob1 #n
  4305. VS
  4306. \\-> [obn..ob1]
  4307. " "Pushes #n objects as a new virtual stack. Any
  4308. other objects in the RPN stack are not
  4309. pushed. The RPN stack is unchanged.
  4310. " "26265") "PushMetaVStack&Drop" ("obn..ob1 #n \\->
  4311. VS
  4312. \\-> [obn..ob1]
  4313. " "Does PushMetaVStack then drops the pushed
  4314. objects. Any other objects present in the RPN
  4315. stack are neither pushed nor dropped.
  4316. " "25F1D") "PopMetaVStack" ("\\-> obn..ob1 #n
  4317. VS
  4318. [obn..ob1] \\->
  4319. " "Insers the contents of the most recent
  4320. virtual stack into the RPN stack, followed by
  4321. the count. The previous contents of the RPN
  4322. stack are not lost.
  4323. " "25F19") "GetMetaVStack" ("\\-> obn..ob1 #n
  4324. VS
  4325. [obn..ob1] \\-> [obn..ob1]
  4326. " "Inserts the objects from the topmost virtual
  4327. stack into the RPN stack, along with the
  4328. count. The Virtual Stack is unchanged.
  4329. " "2624C") "SetMetaVStack" ("obn'..ob1' #n \\->
  4330. VS
  4331. [obn..ob1] \\-> [obn'..ob1']
  4332. " "Modify the elements of the Virtual Stack
  4333. according to a meta on the stack. The meta
  4334. on the RPN stack and the fist level of the
  4335. Virtual Stack must have the same number of
  4336. elements!
  4337. " "265D5" :UBS) "PushVStack&Keep" ("obn..ob1 obm'..ob1' #m \\-> obm'..ob1' #m
  4338. VS
  4339. \\-> [obn..ob1]
  4340. " "Pushes the contents of the RPN stack which do
  4341. not belong to the meta (ie, are \"above\" it)
  4342. into a new virtual stack, removing these
  4343. elements, but keeping the meta.
  4344. " "25F20") "PushVStack&KeepDROP" ("obn..ob1 obm'..ob1' #m \\-> obm'..ob1'
  4345. VS
  4346. \\-> [obn..ob1]
  4347. " "Does PushVStack&Keep and then DROP.
  4348. " "25F21") "PopVStackAbove" ("obm'..ob1' \\-> obn..ob1 obm'..ob1'
  4349. VS
  4350. [obn..ob1] \\->
  4351. " "Pops the contents of the topmost virtual
  4352. stack (like <REF>PopMetaVStackDROP would have
  4353. done) into the RPN stack, but *above* the
  4354. current contents of the RPN stack. This
  4355. undoes PushVStack&Keep (or
  4356. PushVStack&KeepDROP).
  4357. " "25F1C") "DropVStack" ("\\->
  4358. VS
  4359. [obn..ob1] \\->
  4360. " "Drops the topmost virtual stack from the
  4361. Virtual Stack.
  4362. " "26215") "GetElemTopVStack" ("#i \\-> obi
  4363. VS
  4364. [obn..ob1] \\-> [obn..ob1]
  4365. " "Returns the ith object from the topmost
  4366. virtual stack, counting from the
  4367. top. \"Counting from the top\" means that
  4368. object # 0 is the one at the highest-numbered
  4369. level (n), # 1 is the one at level n-1, and
  4370. so on. Note: no checking wheter #i is valid.
  4371. " "26229") "PutElemTopVStack" ("new_ob #i \\->
  4372. VS
  4373. [obn..ob(n-i)..ob1] \\-> [obn..new_ob..ob1]
  4374. " "Replaces the ith object from the topmost
  4375. virtual stack with new_ob, counting from the
  4376. top. Note: no checking wheter #i is valid.
  4377. " "2626F") "GetElemBotVStack" ("#i \\-> obi
  4378. VS
  4379. [obn..ob1] \\-> [obn..ob1]
  4380. " "Returns the ith object from the topmost
  4381. virtual stack, counting from the
  4382. bottom. \"Counting from the bottom\" means that
  4383. # 0 is the object in the lowest numbered
  4384. level (generally thought of as 1), # 1 is at
  4385. level 2, etc. Note: no checking wheter #i
  4386. is valid.
  4387. " "26224") "PutElemBotVStack" ("new_ob #i \\->
  4388. VS
  4389. [obn..obi..ob1] \\-> [obn..new_ob..ob1]
  4390. " "Replaces the ith object from the topmost
  4391. virtual stack with new_ob, counting from the
  4392. bottom. Note: no checking wheter #i is
  4393. valid.
  4394. " "2626A") "GetVStackProtectWord" ("\\-> #
  4395. " "Hacking stuff: Gets the protection word
  4396. of the last VStack level.
  4397. " "26233") "InitVirtualStack" ("
  4398. " "" "26251") "LAMLNAME" ("
  4399. " "" "27142") "'LamKPSto" ("
  4400. " "" "2F350") "SENDLIST" ("{} \\->
  4401. " "Internal SEND.
  4402. " "2EEBB") "GETNAME" ("$/id/lam \\->
  4403. " "Internal KGET.
  4404. " "2EEBC") "DOFINISH" ("\\->
  4405. " "Internal FINISH.
  4406. " "2EEBD") "DOPKT" ("$ $' \\->
  4407. " "Internal PKT.
  4408. " "2EEBE") "DOBAUD" ("% \\->
  4409. " "Internal BAUD.
  4410. " "2EEC1") "DOPARITY" ("% \\->
  4411. " "Internal PARITY.
  4412. " "2EEC2") "DOTRANSIO" ("% \\->
  4413. " "Internal TRANSIO.
  4414. " "2EEC3") "DOKERRM" ("\\-> $
  4415. " "Internal KERRM.
  4416. " "2EEC4") "DOBUFLEN" ("\\-> % 0/1
  4417. " "Internal BUFLEN.
  4418. " "2EEC5") "DOSTIME" ("
  4419. " "Internal STIME.
  4420. " "2F12E" :UBS) "DOSBRK" ("\\->
  4421. " "Internal SBRK.
  4422. " "2EEC6") "DOXMIT" ("$ \\->
  4423. " "Internal XMIT.
  4424. " "2F130" :UBS) "DOSRECV" ("% \\->
  4425. " "Internal SRECV.
  4426. " "2EEC7") "CLOSEUART" ("\\->
  4427. " "Internal CLOSEIO.
  4428. " "2EEC9") "DOCR" ("\\->
  4429. " "Internal CR.
  4430. " "2EECB") "DODELAY" ("% \\->
  4431. " "Internal DELAY.
  4432. " "2EECD") "KDispRow2" ("
  4433. " "" "2F34B") "KDispStatus2" ("
  4434. " "" "2F34C") "EXCHINITPK" ("
  4435. " "" "2F333") "SENDEOT" ("
  4436. " "" "2F372") "SENDNAK" ("
  4437. " "" "2F374") "SENDERROR" ("
  4438. " "" "2F373") "SENDPKT" ("
  4439. " "" "2F376") "InitIOEnv" ("
  4440. " "" "2F0E7") "KERMOPEN" ("
  4441. " "" "2F0E6") "DOOPENIO" ("
  4442. " "" "2EEC0") "OpenIO" ("
  4443. " "" "2F2FF") "OpenIOPrt" ("
  4444. " "" "2F35D") "APNDCRLF" ("$ \\-> $'
  4445. " "Appends carriage return and line feed to
  4446. string.
  4447. " "2F31A") "docr" ("
  4448. " "" "2EECA") "IOCheckReal" ("
  4449. " "" "2F346") "IDIOPAR" ("ID IOPAR
  4450. " "" "271A3" :UBS) "StdIOPAR" ("\\-> {}
  4451. " "Default IOPAR: { 9600 0 0 0 3 1 }.
  4452. " "2716D") "GetIOPAR" ("\\-> %baud % % % % %
  4453. " "Recalls IOPAR and explodes it into the stack.
  4454. " "2EEBF") "StoIOPAR" ("{} \\->
  4455. " "STO the list of IO parameters in the HOME
  4456. directory in the variable IOPAR.
  4457. " "2F062") "SetIOPARErr" ("\\->
  4458. " "Throws the IOPAR error: \"Invalid IOPAR\".
  4459. " "2F37B") "StdPRTPAR" ("
  4460. " "" "27A3A") "StoPRTPAR" ("
  4461. " "" "2F063") "GetChkPRTPAR" ("
  4462. " "" "2F338") "OpenUartClr" ("
  4463. " "" "2F312") "OpenUart?Clr" ("
  4464. " "" "2F313") "PRINT" ("
  4465. " "" "2F0BC") "PRINTxNLF" ("
  4466. " "" "2F362") "REMAP" ("
  4467. " "" "2F36A") "SetEcma94" ("
  4468. " "" "2EECE") "AllowPrlcdCl" ("
  4469. " "" "2F177") "PrintGrob" ("
  4470. " "" "2F361") "SetServMode" ("
  4471. " "" "2F37D") "ClrServMode" ("
  4472. " "" "2F325") "SendSetup" ("
  4473. " "" "2F377") "TRPACKETFAIL" ("
  4474. " "" "2F386") "IncrLAMPKNO" ("
  4475. " "Increases packet number.
  4476. " "2F343") "GetKermPkt#" ("
  4477. " "" "2F33A") "RecvNextPkt" ("
  4478. " "" "2F3A8" :UBS) "KVISLF" ("$ \\-> $'
  4479. " "String translation for transfer from HP to
  4480. PC. Inserts <cr> (character 12) in front of
  4481. every newline (character 10), and translates
  4482. characters >127 to the corresponding
  4483. backslash escape. Which translations are
  4484. being made depends upon the current
  4485. translation mode (the last number in the
  4486. IOPAR variable, can be set with DOTRANSIO).
  4487. 0: No translation
  4488. 1: CRLF translation
  4489. 2: CRLF and characters 128-159 (80h-9Fh)
  4490. 3: CRLF and characters 128-255 (80h-FFh)
  4491. " "2F34F") "KVIS" ("$ \\-> $'
  4492. " "Like <REF>KVISLF, but never translates newlines.
  4493. " "2F34E") "KINVISLF" ("$ \\-> $' $''
  4494. " "String translation for transfer from PC to
  4495. HP. Translates digraphs in the string to
  4496. characters and removes <cr> (character 12) in
  4497. front of newline characters. Which
  4498. translations are actually made depends upon
  4499. the current translation mode, see KVISLF.
  4500. $'' contains any incomplete trailing
  4501. backslash sequence in the original string.
  4502. " "2F34D") "GETKP" ("
  4503. " "" "2F33B") "SENDACK" ("
  4504. " "" "2F371") "SENDNULLACK" ("
  4505. " "" "2F375") "ACK_INIT" ("
  4506. " "" "2F319") "CHOOSE_INIT" ("
  4507. " "" "2F15A") "ENCODE1PKT" ("
  4508. " "" "2F331") "ENCODE" ("
  4509. " "" "2F330") "DECODE" ("
  4510. " "" "2F32A") "UARTBUFLEN" ("
  4511. " "" "2F387") "FLUSHRSBUF" ("
  4512. " "" "2EEC8") "PUTSERIAL" ("
  4513. " "" "2F364") "GETSERIAL" ("
  4514. " "" "2F33F") "VERSTRING" ("\\-> $
  4515. " "Returns version string.
  4516. " "2F389") "UART?" ("
  4517. " "" "25F06") "UARTxcp" ("
  4518. " "" "25F07") "SEND_PACKET" ("
  4519. " "" "2F3A7" :UBS) "XEQIOBACKUP" ("
  4520. " "" "2F292") "kermpktmsg" ("
  4521. " "" "00C10") "kermrecvmsg" ("
  4522. " "" "00C0E") "kermsendmsg" ("
  4523. " "" "00C0D") "CK0" ("\\->
  4524. " "Saves current command to LASTCKCMD. Marks
  4525. stack below level 1 to STACKMARK.
  4526. " "262B0") "CK1" ("ob \\-> ob
  4527. " "Saves current command to LASTCKCMD. Verifies
  4528. that there is at least one object in the
  4529. stack, if not generates a \"Too Few Arguments\"
  4530. error. Saves stack mark to STACKMARK.
  4531. If Last Arg is enabled then saves the
  4532. argument.
  4533. " "262B5") "CK2" ("ob1 ob2 \\-> ob1 ob2
  4534. " "Like <REF>CK1, but checks for at least two
  4535. arguments.
  4536. " "262BA") "CK3" ("ob1...ob3 \\-> ob1...ob3
  4537. " "Like <REF>CK1, but checks for at least three
  4538. arguments.
  4539. " "262BF") "CK4" ("ob1...ob5 \\-> ob1...ob5
  4540. " "Like <REF>CK1, but checks for at least four
  4541. arguments.
  4542. " "262C4") "CK5" ("ob1...ob5 \\-> ob1...ob5
  4543. " "Like <REF>CK1, but checks for at least five
  4544. arguments.
  4545. " "262C9") "CKN" ("ob1...obn %n \\-> ob1..obn #n
  4546. " "Checks for a real in level one. Then checks
  4547. for that number of arguments. Finally,
  4548. converts the real to a bint.
  4549. " "262CE") "CKN+1" ("ob1...obn+1 %n \\-> ob1..obn #n
  4550. " "Checks for a real in level one. Then checks
  4551. for n+1 of arguments. Finally,
  4552. converts the real to a bint.
  4553. " "262D3" :UBS) "CK0NOLASTWD" ("\\->
  4554. " "Like <REF>CK0, but does not save current
  4555. command.
  4556. " "26292") "CK1NOLASTWD" ("ob \\-> ob
  4557. " "Like <REF>CK1, but does not save current
  4558. command.
  4559. " "26297") "CK2NOLASTWD" ("ob1 ob2 \\-> ob1 ob2
  4560. " "Like <REF>CK2, but does not save current
  4561. command.
  4562. " "2629C") "CK3NOLASTWD" ("ob1...ob3 \\-> ob1...ob3
  4563. " "Like <REF>CK3, but does not save current
  4564. command.
  4565. " "262A1") "CK4NOLASTWD" ("ob1...ob4 \\-> ob1...ob4
  4566. " "Like <REF>CK4, but does not save current
  4567. command.
  4568. " "262A6") "CK5NOLASTWD" ("ob1...ob5 \\-> ob1...ob5
  4569. " "Like <REF>CK5, but does not save current
  4570. command.
  4571. " "262AB") "CKNNOLASTWD" ("ob1...obn %n \\-> ob1..obn #n
  4572. " "Like <REF>CKN, but does not save current
  4573. command.
  4574. " "25F25") "CK&DISPATCH0" ("\\->
  4575. " "Dispatches on stack argument. Does not
  4576. convert ZINTs to REAL.
  4577. --
  4578. <REF>CK&DISPATCH1 <REF>CK&DISPATCH2
  4579. <REF>TEXT:Dispatch_Types
  4580. " "2631E") "CK&DISPATCH1" ("\\->
  4581. " "Dispatches on stack arguments, stripping tags
  4582. and converting ZINTS to REALS (HP49 only) if
  4583. necessary.
  4584. --
  4585. <REF>CK&DISPATCH0 <REF>CK&DISPATCH2
  4586. <REF>TEXT:Dispatch_Types
  4587. " "26328") "CK&DISPATCH2" ("\\->
  4588. " "Equivalent to <REF>CK&DISPATCH1.
  4589. --
  4590. <REF>CK&DISPATCH0
  4591. <REF>TEXT:Dispatch_Types
  4592. " "26323") "CK1&Dispatch" ("\\->
  4593. " "Combines <REF>CK1 with <REF>CK&DISPATCH1.
  4594. --
  4595. <REF>TEXT:Dispatch_Types
  4596. " "26300") "CK2&Dispatch" ("\\->
  4597. " "Combines <REF>CK2 with <REF>CK&DISPATCH1.
  4598. --
  4599. <REF>TEXT:Dispatch_Types
  4600. " "26305") "CK3&Dispatch" ("\\->
  4601. " "Combines <REF>CK3 with <REF>CK&DISPATCH1.
  4602. --
  4603. <REF>TEXT:Dispatch_Types
  4604. " "2630A") "CK4&Dispatch" ("\\->
  4605. " "Combines <REF>CK4 with <REF>CK&DISPATCH1.
  4606. --
  4607. <REF>TEXT:Dispatch_Types
  4608. " "2630F") "CK5&Dispatch" ("\\->
  4609. " "Combines <REF>CK5 with <REF>CK&DISPATCH1.
  4610. --
  4611. <REF>TEXT:Dispatch_Types
  4612. " "26314") "0LastRomWrd!" ("\\->
  4613. " "Clears command save by last CK<n> command.
  4614. <REF>CK0
  4615. " "25F9A") "0LASTOWDOB!" ("\\->
  4616. " "Clears command save by last CK<n> command.
  4617. <REF>CK0
  4618. " "25F9A") "0LASTOWDOB!" ("\\->
  4619. " "Clears command save by last CK<n> command.
  4620. <REF>CK0
  4621. " "25F9A") "AtUserStack" ("\\->
  4622. " " :: CK0NOLASTWD 0LASTOWDOB! ;
  4623. " "2EF6C") "CK1NoBlame" ("\\->
  4624. " " :: 0LASTOWDOB! CK1NOLASTWD ;
  4625. " "25E9E") "'RSaveRomWrd" ("\\->
  4626. " "Stores first object in the composite above
  4627. the actual to LASTCKCMD.
  4628. " "354CB") "'RSAVEWORD" ("\\->
  4629. " "Stores first object in the composite above
  4630. the actual to LASTCKCMD.
  4631. " "354CB") "EvalNoCK" ("comp \\-> ?
  4632. " "Evaluates composite without saving as
  4633. current command. If first command is
  4634. CK<n>&Dispatch it is replaced by
  4635. CK&DISPATCH1. If first command is CK<n> it is
  4636. skipped.
  4637. Any other first command is also skipped!
  4638. " "26319") "EvalNoCK:" ("RS
  4639. ob \\->
  4640. " "<REF>EvalNoCK with the next object in the
  4641. runstream as argument.
  4642. " "25F29" :UBS) "EvalNoCK:" ("RS
  4643. ob \\->
  4644. " "<REF>EvalNoCK with the next object in the
  4645. runstream as argument.
  4646. " "25F29" :UBS) "'EvalNoCK:_sup" ("RS
  4647. ob \\->
  4648. " "<REF>EvalNoCK with the next object in the
  4649. runstream as argument.
  4650. " "25F29" :UBS) "RunRPN:" ("RS
  4651. ob \\->
  4652. " "Evaluate the next object in the runstream
  4653. with RPN mode on (i.e. system flag 95
  4654. clear). After the evaluation, the system
  4655. flag is restored to its old value.
  4656. --
  4657. Flags: -95
  4658. " "2A9E9") "CKREAL" ("% \\-> %
  4659. Z \\-> %
  4660. " "Checks for real. If a ZINT, convert
  4661. to real. Else SETTYPEERR.
  4662. " "36B7B") "^CK1Z" ("$/#/hxs \\-> Z
  4663. " "CHecks for an integer. Converts strings,
  4664. bints or hxs's to zints. Errors for other
  4665. object types.
  4666. " "184006" :wasCSys) "^CK2Z" ("ob ob' \\-> Z Z'
  4667. " "Like <REF>^CK1Z, but for two objects.
  4668. " "185006" :wasCSys) "^CK3Z" ("ob ob' ob'' \\-> Z Z' Z''
  4669. " "Like <REF>^CK1Z, but for three objects.
  4670. " "186006" :wasCSys) "CKARRY" ("\\->
  4671. " "Checks for array.
  4672. " "3F33F" :UBS) "CKLIST" ("\\->
  4673. " "Checks for list.
  4674. " "3F3C1" :UBS) "CKSYMBTYPE" ("\\->
  4675. " "Checks for quoted name (name as symbolic).
  4676. " "3D2B4") "nmetasyms" ("meta \\-> meta
  4677. " "Checks for meta containing %, C%, unit, id,
  4678. lam or symb.
  4679. " "2EF07") "TYPE" ("ob \\-> #prolog
  4680. " "Returns address of prolog of object.
  4681. " "03C64") "XEQTYPE" ("ob \\-> ob %type
  4682. " "System version of user word TYPE, but this
  4683. keeps the object.
  4684. " "3BC43") "TYPEREAL?" ("ob \\-> flag
  4685. " "" "3511D") "DTYPEREAL?" ("ob \\-> ob flag
  4686. " "" "35118") "DUPTYPEREAL?" ("ob \\-> ob flag
  4687. " "" "35118") "TYPECMP?" ("ob \\-> flag
  4688. " "" "3512C") "DUPTYPECMP?" ("ob \\-> ob flag
  4689. " "" "35127") "TYPECSTR?" ("ob \\-> flag
  4690. " "" "3510E") "DTYPECSTR?" ("ob \\-> ob flag
  4691. " "" "35109") "DUPTYPECSTR?" ("ob \\-> ob flag
  4692. " "" "35109") "DTYPEARRY?" ("ob \\-> ob flag
  4693. " "" "35136") "DUPTYPEARRY?" ("ob \\-> ob flag
  4694. " "" "35136") "TYPEARRY?" ("ob \\-> flag ???
  4695. " "" "3513B") "TYPERARRY?" ("ob \\-> flag
  4696. " "" "35292") "TYPECARRY?" ("ob \\-> flag
  4697. " "" "352AD") "TYPELIST?" ("ob \\-> flag
  4698. " "" "35195") "DTYPELIST?" ("ob \\-> ob flag
  4699. " "" "35190") "DUPTYPELIST?" ("ob \\-> ob flag
  4700. " "" "35190") "TYPEIDNT?" ("ob \\-> flag
  4701. " "" "3504B") "DUPTYPEIDNT?" ("ob \\-> ob flag
  4702. " "" "35046") "TYPELAM?" ("ob \\-> flag
  4703. " "" "350E1") "DUPTYPELAM?" ("ob \\-> ob flag
  4704. " "" "350DC") "^TYPEIDNTLAM?" ("ob \\-> flag
  4705. " "Tests if ob is ID or lam.
  4706. " "194006" :wasCSys) "NotIDorLAM?" ("ob \\-> ob flag
  4707. " "Tests if ob is neither an ID nor a LAM.
  4708. " "2F0D4" :UBS) "TYPESYMB?" ("ob \\-> flag
  4709. " "" "35168") "DUPTYPESYMB?" ("ob \\-> ob flag
  4710. " "" "35163") "TYPEHSTR?" ("ob \\-> flag
  4711. " "" "350FF") "DUPTYPEHSTR?" ("ob \\-> ob flag
  4712. " "" "350FA") "TYPEGROB?" ("ob \\-> flag
  4713. " "" "35186") "DUPTYPEGROB?" ("ob \\-> ob flag
  4714. " "" "35181") "TYPETAGGED?" ("ob \\-> flag
  4715. " "" "351A4") "DUPTYPETAG?" ("ob \\-> ob flag
  4716. " "" "3519F") "TYPEEXT?" ("ob \\-> flag
  4717. " "Is ob a unit object?
  4718. " "351B3") "DUPTYPEEXT?" ("ob \\-> ob flag
  4719. " "Is ob a unit object?
  4720. " "351AE") "TYPEROMP?" ("ob \\-> flag
  4721. " "" "3514A") "DUPTYPEROMP?" ("ob \\-> ob flag
  4722. " "" "35145") "TYPEBINT?" ("ob \\-> flag
  4723. " "" "350F0") "DUPTYPEBINT?" ("ob \\-> ob flag
  4724. " "" "350EB") "TYPERRP?" ("ob \\-> flag
  4725. " "" "35159") "DUPTYPERRP?" ("ob \\-> ob flag
  4726. " "" "35154") "TYPECHAR?" ("ob \\-> flag
  4727. " "" "3503C") "DUPTYPECHAR?" ("ob \\-> ob flag
  4728. " "" "35037") "TYPECOL?" ("ob \\-> flag
  4729. " "Is on a secondary?
  4730. " "35177") "DTYPECOL?" ("ob \\-> ob flag
  4731. " "Is ob a secondary?
  4732. " "35172") "DUPTYPECOL?" ("ob \\-> ob flag
  4733. " "Is ob a secondary?
  4734. " "35172") "TYPEAPLET?" ("ob \\-> flag
  4735. " "" "350D2") "DUPTYPEAPLET?" ("ob \\-> ob flag
  4736. " "" "350CD") "TYPEFLASHPTR?" ("ob \\-> flag
  4737. " "" "35087") "DUPTYPEFLASHPTR?" ("ob \\-> ob flag
  4738. " "" "35082") "TYPEFONT?" ("ob \\-> flag
  4739. " "" "350C3") "DUPTYPEFONT?" ("ob \\-> ob flag
  4740. " "" "350BE") "TYPELNGCMP?" ("ob \\-> flag
  4741. " "" "350B4") "DUPTYPELNGCMP?" ("ob \\-> ob flag
  4742. " "" "350AF") "TYPELNGREAL?" ("ob \\-> flag
  4743. " "" "350A5") "DUPTYPELNGREAL?" ("ob \\-> ob flag
  4744. " "" "350A0") "TYPEZINT?" ("ob \\-> flag
  4745. " "" "35096") "DUPTYPEZINT?" ("ob \\-> ob flag
  4746. " "" "35091") "^TYPEZ?" ("ob \\-> flag
  4747. " "" "182006" :wasCSys) "^DUPTYPEZ?" ("ob \\-> ob flag
  4748. " "" "183006" :wasCSys) "^TYPEGAUSSINT?" ("ob \\-> flag
  4749. " "Checks if ob is Gaussian integer.
  4750. " "114007" :1\.11 :wasCSys) "^DTYPEGAUSSINT?" ("ob \\-> ob flag
  4751. " "Checks if ob is Gaussian integer.
  4752. " "115007" :1\.11 :wasCSys) "^DUPTYPEGAUSSINT?" ("ob \\-> ob flag
  4753. " "Checks if ob is Gaussian integer.
  4754. " "116007" :1\.11 :wasCSys) "TYPEBAK?" ("ob \\-> flag
  4755. " "" "3505A" :UBS) "DUPTYPEBAK?" ("ob \\-> ob flag
  4756. " "" "35055" :UBS) "TYPELIB?" ("ob \\-> flag
  4757. " "" "35069" :UBS) "DUPTYPELIB?" ("ob \\-> ob flag
  4758. " "" "35064" :UBS) "TYPEMATRIX?" ("ob \\-> flag
  4759. " "" "35078" :UBS) "DUPTYPEMATRIX?" ("ob \\-> ob flag
  4760. " "" "35073" :UBS) "DTYPEMATRIX?" ("ob \\-> ob flag
  4761. " "" "35073" :UBS) "TYPEEXT0?" ("ob \\-> flag
  4762. " "" "351C2" :UBS) "DUPTYPEEXT0?" ("ob \\-> ob flag
  4763. " "" "351BD" :UBS) "^CK1Cext" ("ob \\-> flag
  4764. " "Checks if object is integer or Gaussian
  4765. integer.
  4766. " "187006" :wasCSys) "^CKALG" ("ob \\-> ob
  4767. " "Checks that an object is real/cmplx/unit or
  4768. idnt/lam/symbolic.
  4769. " "181006" :wasCSys) "?OKINALG" ("ob \\-> ob flag
  4770. " "Is object allowed in algebraics?
  4771. " "25E77") "^DTYPFMAT?" ("ob \\-> ob flag
  4772. " "Tests if object is a symbolic matrix.
  4773. " "171006" :wasCSys) "^IDNTLAM?" ("ob \\-> ob flag
  4774. " "Tests if ob is idnt or lam.
  4775. " "191006" :wasCSys) "^FLOAT?" ("ob \\-> ob flag
  4776. " "Tests if ob is real or complex.
  4777. " "192006" :wasCSys) "^REAL?" ("ob \\-> ob flag
  4778. " "Tests if ob is real, zint or hxs.
  4779. " "195006" :wasCSys) "^TYPEREALZINT?" ("ob \\-> flag
  4780. " "Tests if ob is real, zint or hxs.
  4781. " "196006" :wasCSys) "^CKSYMREALCMP" ("ob \\-> ob
  4782. " "Does \"Bad Argument Type\" error if ob is not a
  4783. real, complex or symbolics.
  4784. " "193006" :wasCSys) "Ck&DecKeyLoc" ("%rc.p \\-> #kc #p
  4785. " "Converts from user key representation format
  4786. to system. Does handle shift-hold keys.
  4787. " "25EA7") "CodePl>%rc.p" ("#kc #p \\-> %rc.p
  4788. " "Converts from system key representation
  4789. format to user. Does handle shift-hold
  4790. keys.
  4791. " "25EA9") "H/W>KeyCode" ("# \\-> #'
  4792. " "Converts the keycode offset for shift keys to
  4793. the keycode of the shift key, i.e. 80h->32d,
  4794. 40h->37d, C0h->42d
  4795. " "25EDC") "H/WKey>KeyOb" ("
  4796. " "" "25EDD") "ModifierKey?" ("#kc #pl \\-> flag
  4797. " "Is the key any of the three modifiers
  4798. right-shift, left-shift, or alpha?
  4799. " "25EEA") "KeyOb@" ("\\-> id/romptr
  4800. " "Returns the object assigned the the key which
  4801. caused the current program to be executed, or
  4802. whatever has been stored with KeyOb!
  4803. " "2594E") "KeyOb!" ("ob \\->
  4804. " "Store ob as the KeyOb.
  4805. " "25949") "KeyOb0" ("\\->
  4806. " "Clear the KeyOb.
  4807. " "2593F") "KeyOb0?" ("\\-> flag
  4808. " "Is the KeyOb clear?
  4809. " "25944" :UBS) "FLUSH" ("\\->
  4810. " "Flushes the key buffer.
  4811. " "261CA") "FLUSHKEYS" ("\\->
  4812. " "Flushes the key buffer.
  4813. " "261CA") "CHECKKEY" ("\\-> #kc T
  4814. \\-> F
  4815. " "Returns next key in the key buffer (if there
  4816. is one), but does not pop it. Does handle
  4817. shift-hold keys.
  4818. --
  4819. <REF>TEXT:Keycodes
  4820. " "04708") "GETTOUCH" ("\\-> #kc T
  4821. \\-> F
  4822. " "Pops next key from key buffer (if there is
  4823. one). Does handle shift-hold keys.
  4824. --
  4825. <REF>TEXT:Keycodes
  4826. " "04714") "GETKEY" ("\\-> #kc flag
  4827. " "Get a single keypress from the keybuffer,
  4828. waits if necessary. The key is returned
  4829. along with TRUE. If an exception happens,
  4830. returns FALSE. The exception is not
  4831. handled. Does handle shift-hold keys.
  4832. --
  4833. <REF>TEXT:Keycodes
  4834. " "25ED6") "GETKEY*" ("\\-> #kc T
  4835. \\-> F F
  4836. \\-> {Alrmlist} T F
  4837. " "Get a single keypress from the keybuffer,
  4838. waits if necessary. The key is returned
  4839. along with TRUE. If an exception happens
  4840. (error or alarm), the exceptions is handled
  4841. and the entry returns FALSE. Does handle
  4842. shift-hold keys.
  4843. --
  4844. <REF>TEXT:Keycodes
  4845. " "25ED7") "GetKeyOb" ("\\-> ob
  4846. " "Wait for a single key and return the object
  4847. associated with this key. Does handle
  4848. shift-hold keys.
  4849. --
  4850. <REF>TEXT:Keycodes
  4851. " "25ED9") "DoKeyOb" ("ob \\->
  4852. " "Execute ob as if it had been assigned to a
  4853. key and the key had been pressed.
  4854. " "25EC5") "REPKEY?" ("#kc \\-> flag
  4855. " "Returns TRUE if the key is being pressed.
  4856. --
  4857. <REF>TEXT:Keycodes
  4858. " "047C7") "REPEATER" ("\\->
  4859. " "Takes two objects from the runstream, a
  4860. BINT and a program. The BINT must represent
  4861. a keycode. The program is evaluated at least
  4862. once, and then again and again as long as the
  4863. specified key is being pressed.
  4864. --
  4865. <REF>TEXT:Keycodes
  4866. " "25EF5") "REPEATERCH" ("\\->
  4867. " "Same as REPEATER, but slower, so more
  4868. appropriate for scrolling and cursor motions.
  4869. --
  4870. <REF>TEXT:Keycodes
  4871. " "25EF6") "KEYINBUFFER?" ("\\-> flag
  4872. " "Returns TRUE if there is at least a key in
  4873. the key buffer.
  4874. " "25EE3") "WaitForKey" ("\\-> #kc #flag
  4875. " "Returns next full key press. Does *not* handle
  4876. shift-hold keys.
  4877. --
  4878. <REF>TEXT:Keycodes
  4879. " "25F0B") "Wait/GetKey" ("% \\-> ?
  4880. " "Internal WAIT command. Does *not* handle
  4881. shift-hold keys.
  4882. --
  4883. <REF>TEXT:Keycodes
  4884. " "2F268") "ATTN?" ("\\-> flag
  4885. " "Returns TRUE if `CANCEL' has been pressed.
  4886. " "25FAE") "?ATTN_QUIT" ("\\->
  4887. " "If `CANCEL' has been pressed, ABORTs program.
  4888. " "25E70") "?ATTNQUIT" ("\\->
  4889. " "If `CANCEL' has been pressed, ABORTs program.
  4890. " "25E70") "CK0ATTNABORT" ("\\->
  4891. " "Executed by the UserRPL program delimiters
  4892. x<< and x>> and by xUNTIL. Mainly just
  4893. ?ATTNQUIT.
  4894. " "25E9D") "NoAttn?Semi" ("\\->
  4895. " "If `CANCEL' has been not pressed, drops the
  4896. rest of the stream.
  4897. " "25EED") "ATTNFLG@" ("\\-> #
  4898. " "Recalls `CANCEL' key counter.
  4899. " "05040") "ATTNFLGCLR" ("\\->
  4900. " "Clears `CANCEL' key counter. Does not affect
  4901. the key buffer.
  4902. " "05068") "DoBadKey" ("\\->
  4903. " "Beeps.
  4904. " "25EBF") "DropBadKey" ("ob \\->
  4905. " "Beeps.
  4906. " "25ECD") "2DropBadKey" ("ob ob' \\->
  4907. " "Beeps.
  4908. " "25E6E") "UserKeys?" ("\\-> flag
  4909. " "Does BINT62 TestSysFlag.
  4910. " "25F09") "GetUserKeys" ("\\-> {}
  4911. " "Returns user keys list (internal format).
  4912. --
  4913. <REF>TEXT:Reserved|UserKeys
  4914. " "25967") "StoUserKeypatch" ("ob #kc #p \\->
  4915. " "Assigns an object to a key, specified in
  4916. system format. If ob is NULL{}, then this
  4917. actually deletes a key assignment.
  4918. --
  4919. <REF>TEXT:Reserved|UserKeys
  4920. " "2F3B3" :UBS) "UserKeys!" ("{} \\->
  4921. " "Stores user keys (list is in internal
  4922. format).
  4923. --
  4924. <REF>TEXT:Reserved|UserKeys
  4925. " "25962" :UBS) "UserKeys0" ("\\->
  4926. " "" "25958" :UBS) "UserKeys0?" ("\\-> flag
  4927. " "" "2595D" :UBS) "NonUsrKeyOK?" ("\\-> flag
  4928. " "Returns TRUE if the keys not defined do their
  4929. normal actions.
  4930. " "25621" :UBS) "SetNUsrKeyOK" ("\\->
  4931. " "Keys not defined do their normal actions.
  4932. " "25617" :UBS) "ClrNUsrKeyOK" ("\\->
  4933. " "Keys not defined just beep when pressed.
  4934. " "2561C" :UBS) "Key>StdKeyOb" ("#kc #pl \\-> ob
  4935. " "Recalls the standard assignment of the key.
  4936. This is the assignment which is active when
  4937. USER mode is of.
  4938. " "25EE5") "Key>U/SKeyOb" ("#kc #pl \\-> ob
  4939. " "If user mode is on, recalls the user object
  4940. assigned to a key. If user mode is off,
  4941. recalls the standard assignment instead.
  4942. " "25EE6") "?Key>UKeyOb" ("
  4943. " "" "25E76") "^KEYEVAL" ("% \\-> ?
  4944. " "Keystroke evaluation. If % is negative, the
  4945. standard key is always evaluated.
  4946. " "255006" :wasCSys) "Do1User?" ("\\-> flag
  4947. " "Checks if the 1USR flag is set.
  4948. --
  4949. Flags: -61
  4950. " "25600" :UBS) "SetDo1User" ("\\->
  4951. " "Sets the 1USR flag.
  4952. --
  4953. Flags: -61
  4954. " "25605" :UBS) "ClrDo1User" ("\\->
  4955. " "Clears the 1USR flag.
  4956. --
  4957. Flags: -61
  4958. " "2560A" :UBS) "NonUsrKeyOK?" ("\\-> flag
  4959. " "" "25612" :UBS) "GETDF" ("#menukey \\-> ob
  4960. " "Gets the definition of a menu key from
  4961. THOUCHTAB. #menukey = #1..#6
  4962. " "04A41") "GETPROC" ("#menukey \\-> ob
  4963. " "Gets the definition of a menu key from
  4964. THOUCHTAB. #menukey = #1..#6. With #7, get
  4965. the executor.
  4966. " "04A0B") "SETDF" ("
  4967. " "" "04A4C" :UBS) "SETPROC" ("
  4968. " "" "04A57" :UBS) "BadMenu?" ("\\-> flag
  4969. " "Does the menu need an update?
  4970. " "2581B" :UBS) "SetBadMenu" ("\\->
  4971. " "Mark the mennu as bad.
  4972. " "25820" :UBS) "ClrBadMenu" ("\\->
  4973. " "Mark the menu as OK.
  4974. " "25825" :UBS) "LabelDef!" ("ob \\->
  4975. " "Store a program which displays a menu label.
  4976. Prg has the stack diagram
  4977. ( #col ob \\-> )
  4978. For example, the LIBS command uses the
  4979. following program to make all menu label look
  4980. like directories:
  4981. :: DUPNULL$? ITE
  4982. MakeStdLabel MakeDirLabel
  4983. Grob>Menu ;
  4984. During execution, INDEX@ will contain the
  4985. menu key number.
  4986. " "25877") "LabelDef@" ("\\-> ob
  4987. " "Recall the current definition of LebelDef.
  4988. " "2587C" :UBS) "LastMenuDef!" ("menu \\->
  4989. " "Sets the definition of the last menu. menu
  4990. is a MenuList or a program, or a Rompointer.
  4991. " "25908") "LastMenuDef@" ("\\-> menu
  4992. " "Recalls the definition of the last menu.
  4993. menu is a MenuList or a program, or a
  4994. Rompointer.
  4995. " "2590D") "LastMenuDef?" ("ob \\->
  4996. " "Is there a value for LastMenuDef?
  4997. " "25903" :UBS) "SaveLastMenu" ("\\->
  4998. " "Stores row and definition of current menu as
  4999. the last menu.
  5000. " "25EFB") "LastMenuRow!" ("#n \\->
  5001. " "Sets the row of the last menu. #n is not the
  5002. row, but the index of the first menu key in
  5003. that row, i.e. 1,7,13,\\..
  5004. " "260A8") "LastMenuRow@" ("\\-> #n
  5005. " "Recalls the index to the first menu key in
  5006. the current row of the last menu. Returns 1
  5007. for the first page, 7 for the second page, 13
  5008. for the third and so on.
  5009. " "260AD") "MenuData!" ("ob \\->
  5010. " "Store ob as the current MenuData definition.
  5011. " "2584F" :UBS) "MenuData@" ("\\-> ob
  5012. " "Recall the current MenuData definition.
  5013. " "25854" :UBS) "GetMenuData" ("\\->
  5014. " "" "2585E" :UBS) "MenuDef?" ("\\->
  5015. " "Is there a current menu definition?
  5016. " "2582D" :UBS) "MenuDef!" ("ob \\->
  5017. " "Store ob as the current menu definition.
  5018. " "25840" :UBS) "MenuDef@" ("\\-> menu
  5019. " "Recalls the current menu definition. menu is
  5020. a MenuList or a program, or a Rompointer.
  5021. " "25845") "MenuExitAct!" ("ob \\->
  5022. " "Store ob as exit action.
  5023. " "258EF" :UBS) "NoExitAction" ("\\->
  5024. " "Sets NOP as ExitAction. Mostly used to avoid
  5025. that the menu is saved as the previous menu
  5026. when a new Menu gets installed.
  5027. " "25EEF") "MenuExitAct@" ("\\-> ob
  5028. " "Recall the current definition of MenuExitAct.
  5029. " "258F4" :UBS) "DoMenuExit" ("\\->
  5030. " "Execute the current definition of MenuExitAct.
  5031. " "258FE" :UBS) "MenuRow!" ("#n \\->
  5032. " "Sets the menu row. #n is not the row, but
  5033. the index of the first menu key in that row,
  5034. i.e. 1,7,13,\\..
  5035. " "260B7") "MenuRow@" ("\\-> #n
  5036. " "Recalls the index of the first menu key in
  5037. the current menu page. Returns 1 for the
  5038. first page, 7 for the second page, 13 for the
  5039. third and so on.
  5040. " "260BC") "MenuKeyLS!" ("ob \\-> ob
  5041. " "Set the action for left-shifted menu keys.
  5042. The program receives the action part of the
  5043. menu item as an argument, i.e.
  5044. {ob-NS ob-LS ob-RS}.
  5045. " "2589F") "StdMenuKeyLS" ("{ob-NS ob-LS ob-RS} \\-> ?
  5046. " "The content of MenuKeyLS for standard menus.
  5047. " "25F02") "MenuKeyLS@" ("\\-> ob
  5048. " "Recall the current definition of MenuKeyLS.
  5049. " "258A4" :UBS) "DoMenuKeyLS" ("???
  5050. " "Execute the current definition of MenuKeyLS.
  5051. " "258AE" :UBS) "MenuKeyNS!" ("og \\-> ob
  5052. " "Set the action for unshifted menu keys.
  5053. The program receives the action part of the
  5054. menu item as an argument, i.e. ob-NS or
  5055. {ob-NS ob-LS ob-RS}.
  5056. " "2588B") "MenuKeyNS@" ("\\-> ob
  5057. " "Recall the action for unshifted menu keys.
  5058. " "25890") "SetKeysNS" ("ob \\->
  5059. " "Sets ob as MenuKeysNS, DoBadKey to LS & RS.
  5060. " "25EFC") "StdMenuKeyNS" ("ob-NS \\-> ?
  5061. {ob-NS ob-LS ob-RS} \\-> ?
  5062. " "The content of MenuKeyNS for standard menus.
  5063. " "25F03") "MenuKeyRS!" ("ob \\-> ob
  5064. " "Set the action for right-shifted menu keys.
  5065. The program receives the action part of the
  5066. menu item as an argument, i.e.
  5067. {ob-NS ob-LS ob-RS}.
  5068. " "258B3") "MenuKeyRS@" ("\\-> ob
  5069. " "Recall the current definition of MenuKeyRS.
  5070. " "258B8" :UBS) "DoMenuKeyRS" ("???
  5071. " "Execute the current definition of MenuKeyRS.
  5072. " "258C2" :UBS) "Rebuild?" ("\\-> flag
  5073. " "Does the menu need a rebuild?
  5074. " "25809" :UBS) "SetRebuild" ("\\->
  5075. " "Sets the flag that the menu needs to be
  5076. rebuild.
  5077. " "2580E") "ClrRebuild" ("\\->
  5078. " "Clear the menu Rebuild flag.
  5079. " "25813" :UBS) "ReviewKey!" ("ob \\->
  5080. " "Store a program which is called with the
  5081. review key (RS DOWN). The program has the
  5082. stack diagram
  5083. ( \\-> )
  5084. " "258C7") "ReviewKey@" ("\\-> ob
  5085. " "Recall the current definition of the review
  5086. program.
  5087. " "258CC" :UBS) "DoReview" ("\\->
  5088. " "Execute the program stored with ReviewKey!.
  5089. This program should show information about
  5090. the commands in the current menu page. The
  5091. default program just displays the full names
  5092. of the menu entries (retrieved with GETPROC
  5093. >Review$).
  5094. " "258D6" :UBS) "MenuRowAct!" ("ob \\->
  5095. " "Stores ob as the RowAct menu property.
  5096. " "25863") "MenuRowAct@" ("\\-> ob
  5097. " "Recall the current MenuRowAct property.
  5098. " "25868" :UBS) "DoMenuRowAct" ("???
  5099. " "Execute the current MenuRowAct program.
  5100. " "25872" :UBS) "Track?" ("\\-> flag
  5101. " "Is there a Trach action defined for the
  5102. current menu?
  5103. " "257F7" :UBS) "SetTrack" ("ob \\->
  5104. " "Set the program which should be executed when
  5105. the current directory changes. For many
  5106. menus, this is just a NOP, but for example
  5107. the VAR menu needs it to display the correct
  5108. variables.
  5109. " "257FC" :UBS) "ClrTrack" ("\\->
  5110. " "Clear the TrackAct program.
  5111. " "25801" :UBS) "DoTrack" ("\\->
  5112. " "Execute the current TrackAct program.
  5113. " "258EA" :UBS) "InitTrack:" ("\\->
  5114. " "Execute the program which is next in the
  5115. runstream if the directory changes. Used by
  5116. the VAR menu to set first menurow when
  5117. diretory changes, or by the CST menu to
  5118. rebuild it.
  5119. " "25EE2") "TrackAct!" ("ob \\->
  5120. " "Store a program for the track action. This
  5121. program should have a stack diagram
  5122. ( \\-> ).
  5123. " "258DB" :UBS) "TrackAct@" ("\\-> ob
  5124. " "Recall the current TrackAct program.
  5125. " "258E0" :UBS) "TakeOver" ("\\->
  5126. " "Override the default menu key executer. If
  5127. this is the first entry in a program, the
  5128. program can be used in edit mode. When the
  5129. first in a program in the label slot of a
  5130. menu key, the program is evaluated to get the
  5131. label object (most likely a grob).
  5132. " "275C6") "NullMenuKey" ("\\->
  5133. " "A placeholder for an empty menu key when
  5134. defining menu lists.
  5135. " "27FED") "Modifier" ("\\->
  5136. " " :: TakeOver ;
  5137. " "275EE") "MenuMaker" ("\\-> ob
  5138. " "Quotes next object, and also provides
  5139. TakeOver. The disassembly is
  5140. :: TakeOver 'R ;
  5141. Normally this is used like this:
  5142. :: MenuMaker menu InitMenu ;
  5143. " "27620") "InitMenu" ("menu \\->
  5144. " "menu is {} or :: settings {} ;
  5145. Settings override the default settings
  5146. installed by InitMenu.
  5147. " "25EE0") "DoMenuKey" ("menu \\->
  5148. " " :: SetDA12NoCh InitMenu ;
  5149. " "25EC6") "InitMenu%" ("%mnu.pg \\->
  5150. %0 \\->
  5151. " "" "25EE1") "GetMenu%" ("\\-> %
  5152. " "" "25EDA") "StartMenu" ("menu #n \\->
  5153. " "#n is the index of the first menu key on the
  5154. page, use 1 for the first page, 7 for the
  5155. second etc. StartMenu does ExitAction
  5156. (Previous menu!), sets the default menu
  5157. properties and page. Then it evaluates menu,
  5158. stores result to MenuKeys and executes
  5159. SetThisRow.
  5160. " "25F00") "SetThisRow" ("\\->
  5161. " "Builds a new TOUCHTAB, SetBadMenu.
  5162. " "25EFE") "LoadTouchTbl" ("MenuKey1 .. MenuKeyN #n \\->
  5163. " "Builds new TOUCHTAB from menukeys.
  5164. " "25EE8") "SysMenuCheck" ("\\->
  5165. " "Checks menu validity. If DA3NoCh? then
  5166. nothing. If Track? then ?DoTrackAct@. If
  5167. Rebuild? then SetThisRow.
  5168. " "2EF66") "?DispMenu" ("\\->
  5169. " "Redisplay the menu now if no key is waiting
  5170. in the buffer. Even better is this:
  5171. :: DA3OK?NOTIT ?DispMenu ;
  5172. " "2DFCC") "DispMenu.1" ("\\->
  5173. " "Displays the menu immediately.
  5174. " "2DFF4") "DispMenu" ("\\->
  5175. " " :: DispMenu.1 SetDAsValid ;
  5176. " "2DFE0") "Grob>Menu" ("#col grob \\->
  5177. " "Displays grob as menu label.
  5178. " "2E0D5") "Str>Menu" ("#col $ \\->
  5179. " "Displays string as menu label.
  5180. " "2E0F3") "Id>Menu" ("#col id \\->
  5181. " "Displays id as menu label.
  5182. " "2E11B") "Seco>Menu" ("#col :: \\->
  5183. " "Does EVAL then DoLabel.
  5184. " "2E107") "DoLabel" ("#col ob \\->
  5185. " "If ob is of one of the supported types,
  5186. displays a menu label. If not, generates a
  5187. \"Bad Argument Type\" error.
  5188. " "25886") "MakeLabel" ("$ #w #x grob \\-> grob'
  5189. " "Inserts $ into grob using CENTER$3x5 with
  5190. y=5.
  5191. " "2E2AA") "^WRITEMENU" ("$6...$1 \\->
  5192. " "Displays the six strings as menu keys.
  5193. " "08E007" :wasCSys) "CheckMenuRow" ("# \\-> # #'
  5194. " "" "25EA6") "SetSomeRow" ("#n \\->
  5195. " "with Mod(n,FFFFFh)= 0.
  5196. " "25EFD") "DoMenuKeyNS" ("#n \\->
  5197. " "" "2589A") "MenuKey" ("\\->
  5198. " "Takes NOB from Runstream.
  5199. " "275FD") "CLEARMENU" ("\\->
  5200. " "" "2F15B") "CHECKMENU" ("\\->
  5201. " "" "25F2B") "ID_CST" ("\\-> ob
  5202. " "Evaluates ID CST.
  5203. " "3EA01" :UBS) "nCustomMenu" ("\\->
  5204. " "Installs the CST menu.
  5205. " "2C2C0") "SolvMenuInit" ("\\->
  5206. " "Sets MenuKeyNS/LS/RS, ReviewKey and LabelDef
  5207. properties needed by the Solver menu.
  5208. " "25EFF") "DoSolvrMenu" ("\\->
  5209. " "Installs the solver menu which is also
  5210. available via 75 MENU.
  5211. " "25ECC") "DoNameKeyLRS" ("
  5212. " "" "25EC7") "DoNameKeyRS" ("
  5213. " "" "25EC8") "DoFirstRow" ("\\->
  5214. " "Sets the first row of the current menu.
  5215. " "25EC3") "DoNextRow" ("
  5216. " "" "25EC9") "DoPrevRow" ("
  5217. " "" "25ECB") "InputLine" ("args \\-> $ T
  5218. \\-> $ ob1..obn T
  5219. \\-> ob1..obn T
  5220. \\-> F
  5221. args = $pr $line #pos
  5222. #I/R #I/A #alph
  5223. menu #row attn #parse
  5224. " "" "2EF5F") "Ck&Input1" ("$1 $2 \\-> $3
  5225. " "This is what the User command INPUT does if
  5226. level 1 is a string.
  5227. " "2F154" :UBS) "Ck&Input2" ("$1 {} \\-> $3
  5228. " "This is what the User command INPUT does if
  5229. level 1 is a list.
  5230. " "2F155" :UBS) "InputLAttn" ("
  5231. " "" "2F344") "InputLEnter" ("
  5232. " "" "2F345") "^IfMain" ("l1..ln f1..fm #n #m msg $ \\-> ob1..obn T
  5233. \\-> F\\n
  5234. l = $ #x #y
  5235. f = msg #x #y #w #h #type legal
  5236. dec $hlp ChDat ChDec res init
  5237. " "Starts an input form using the new engine.
  5238. " "020004") "DoInputForm" ("l1..ln f1..fm #n #m msg $ \\-> ob1..obn T
  5239. \\-> F\\n
  5240. l = $ #x #y
  5241. f = msg #x #y #w #h #type legal
  5242. dec $hlp ChDat ChDec res init
  5243. " "Starts an input form using the old engine.
  5244. " "2C371") "~IFMenuRow1" ("\\-> {}
  5245. " "Returns the menu for the first menu row of an
  5246. InputForm.
  5247. " "0050B0") "~IFMenuRow2" ("\\-> {}
  5248. " "Returns the menu for the second menu row of
  5249. an InputForm.
  5250. " "0060B0") "^IfSetFieldVisible" ("# T/F(fld/lbl) T/F(val) \\->
  5251. # T/F(fld/blb) #0 \\-> T/F(val)
  5252. " "Toggles the field or label visible or
  5253. invisible. Second argument specifies if #
  5254. means a field or a label. Third argument is
  5255. the value to set. ZERO as third argument
  5256. means to retrieve the current setting.
  5257. " "021004") "^IfSetSelected" ("# T/F(fld/lbl) T/F(val) \\->
  5258. # T/F(fld/blb) #0 \\-> T/F(val)
  5259. " "Toggles the field or label selected or not
  5260. selected (appears in inverse video on the
  5261. screen).
  5262. " "022004") "^IfSetGrob" ("# T/F(fld/lbl) grb \\->
  5263. " "Sets the grob of a field or a label (modifies
  5264. the data saved in the data string).
  5265. " "023004") "^IfSetFieldValue" ("val # \\->
  5266. " "Sets the value of a field (full handling,
  5267. including GROB setting).
  5268. " "024004") "^IfGetFieldValue" ("# \\-> val
  5269. " "Gets the value of the Nth field.
  5270. " "026004") "^IfGetCurrentFieldValue" ("\\->
  5271. " "Gets the value of the current field.
  5272. " "027004") "^IfSetCurrentFieldValue" ("val \\->
  5273. " "Sets the value of the current field.
  5274. " "025004") "^IfGetFieldMessageHandler" ("# \\-> prg
  5275. " "Retrieves a field message handler.
  5276. " "028004") "^IfGetFieldType" ("# \\-> #type
  5277. " "Retrieves the field type.
  5278. " "029004") "^IfGetFieldObjectsType" ("# \\-> {}
  5279. " "Retrieves the field object type list.
  5280. " "02A004") "^IfGetFieldDecompObject" ("# \\-> val
  5281. " "Retrieves the field decomp value.
  5282. " "02B004") "^IfGetFieldChooseData" ("# \\-> {}
  5283. " "Retrieves the field data for choose.
  5284. " "02C004") "^IfGetFieldChooseDecomp" ("# \\-> val
  5285. " "Retrieves the field decomp value in QcaseQ of
  5286. choose.
  5287. " "02D004") "^IfGetFieldResetValue" ("# \\-> val
  5288. " "Retrieves the field reset value.
  5289. " "02E004") "^IfSetFieldResetValue" ("val # \\->
  5290. " "Changes the field reset value.
  5291. " "02F004") "^IfGetFieldInternalValue" ("# \\-> val
  5292. " "Retrieves the field internal value.
  5293. " "030004") "^IfDisplayFromData" ("\\->
  5294. " "Displays the datastring on the screen. Takes
  5295. care of the command line size.
  5296. " "031004") "^IfGetNbFields" ("\\-> #n
  5297. " "Recalls the number of fields from the data
  5298. string.
  5299. " "032004") "^IfCheckSetValue" ("# val \\->
  5300. " "Checks or uncheck a check field.
  5301. " "033004") "^IfCheckFieldtype" ("ob \\-> ob flag
  5302. " "Checks if an object meets the current field
  5303. type requirements.
  5304. " "034004") "^IfGetPrlgFromTypes" ("{} \\-> {}'
  5305. #FFFFF \\-> #0
  5306. " "Generates a list of the allowed prologs for a
  5307. field.
  5308. " "04C004") "^IfReset" ("\\->
  5309. " "Resets all fields, set as the current value
  5310. their reset value. Used to explode the datalist
  5311. on the stack to work on it.
  5312. " "035004") "^IfSetField" ("# \\->
  5313. " "Makes a different field \"current\".
  5314. " "036004") "^IfKeyChoose" ("\\-> val
  5315. \\->
  5316. " "If the current field is a choose field,
  5317. displays the posibilities and let the user
  5318. choose. A value is returned only if the user
  5319. does not press `CANCEL'.
  5320. " "037004") "^IfKeyEdit" ("\\-> (cmd line)
  5321. " "Edits the current field value if
  5322. possible. You cannot edit a choose and a
  5323. label choose field.
  5324. " "038004") "^IfKeyTypes" ("\\-> (cmd line)
  5325. \\->
  5326. " "Displays a Choose box with all the possible
  5327. types for this field. A command line is
  5328. opened only if the user replies with OK.
  5329. " "039004") "^IfKeyCalc" ("\\-> val
  5330. " "Puts the value of the field on the stack and
  5331. HALT. Allows to the user to compute a new
  5332. value.
  5333. " "03A004") "^IfKeyInvertCheck" ("\\->
  5334. " "Inverts the current check field value.
  5335. " "03B004") "^IfONKeyPress" ("\\->
  5336. " "On Key handler. Gives the oportunity to the
  5337. user to perform his own program. Asks to the IF
  5338. if we can leave. If Yes, puts a FALSE (quit
  5339. with ON (if canceled)) and sets the 'Quit
  5340. LAM to TRUE.
  5341. " "03C004") "^IfEnterKeyPress" ("\\->
  5342. " "Enter Key management. Gives the oportunity to
  5343. the user to perform his own program. Asks to
  5344. the IF if we can leave. If yes, puts the
  5345. fields values on the stack put a TRUE (if
  5346. validated) and sets the 'Quit LAM to TRUE.
  5347. " "03D004") "^IfSetHelpString" ("$dat #n $/# \\-> $dat'
  5348. " "Sets the help string associated with a field.
  5349. This is used by the automatic IF generator
  5350. program and should not be use in other ways.
  5351. " "03F004" :NOSDIAG) "^IfSetTitle" ("$dat grb/$/# \\-> $dat'
  5352. " "Alters a DataString modifying the Title
  5353. part. This is used by automatic IF generator
  5354. program ans should not be use in other ways.
  5355. " "040004" :NOSDIAG) "^IfInitDepth" ("\\->
  5356. " "Initializes the internal depth counter. This
  5357. has to be used when running a command
  5358. modifying the stack
  5359. " "04A004") "^IfMain2" ("$dat handl {} \\-> F
  5360. \\-> ob1...obn T
  5361. " "Internal Inform Box main program. Alters a
  5362. DataString modifying the Title part. This is
  5363. used by automatic IF generator program ans
  5364. should not be used in a different way.
  5365. " "042004" :NOSDIAG) "^IfPutFieldsOnStack" ("\\-> ob1...obn
  5366. " "Puts on the stack the external value of each
  5367. field.
  5368. " "043004") "^IfSetFieldPos" ("# T/F(fld/lbl) #x #y #w #h \\->
  5369. " "Changes the size and position of an object
  5370. Note: You can not change the size or the X
  5371. position of a label or a check field.
  5372. " "044004") "^IfGetFieldPos" ("# T/F(fld/lbl) \\-> #x #y #w #h
  5373. " "Gets the size and position of an object.
  5374. " "045004") "^IfSetAllLabelsMessages" ("$dat bmsg #n \\-> $dat
  5375. " "Sets the text of a set of labels.
  5376. " "047004") "^IfSetAllHelpStrings" ("$dat bmsg #n \\-> $dat
  5377. " "Sets the Help String of all fields.
  5378. " "048004") "^IsUncompressDataString" ("$dc \\-> $dat
  5379. " "Uncompresses a compressed data string.
  5380. " "04D004") "^IfCreateTitleGrob" ("
  5381. " "" "049004") "^IfDisplayFromData2" ("
  5382. " "" "046004") "^IfSetTitle2" ("
  5383. " "" "041004") "^Filer" ("\\->
  5384. " "Calls the standard filer.
  5385. " "067004") "^FILER_MANAGER" ("{path} {args} \\-> flag
  5386. {args} = { item1 item2 ... }
  5387. item = {name loc action [prog] [key]} ... }
  5388. " "Customized Filer, browsing all object types.
  5389. {path} is the starting path for the filer, it
  5390. can be an empty list for HOME. Tagging the
  5391. empty list with \"0\", \"1\" or \"2\" makes the
  5392. filer start in the corresponding port. flag
  5393. is FALSE when filer is exited with ON,
  5394. otherwise TRUE.
  5395. <REF>Filer_Action_Reference
  5396. " "06D004") "^FILER_MANAGERTYPE" ("{types} {path} {args} \\->
  5397. {args} = { item1 item2 ... }
  5398. item = {name loc action [prog] [key]} ... }
  5399. " "Customized filer for selected types only.
  5400. The types are prologue addresses like
  5401. { DOFONT DORRP DOBAK } etc.
  5402. <REF>FILER_MANAGER
  5403. <REF>Filer_Action_Reference
  5404. " "06E004") "^" ("" "Uses the File Manager to search for fonts.
  5405. " "06F004") "~Choose" ("::Appl $Title ::Convert {} offset \\-> {}' T
  5406. \\-> ob T
  5407. \\-> F
  5408. " "The return value is a list if checkfields are
  5409. enabled, otherwise it is just the selected
  5410. object. Only FALSE is returned when the user
  5411. presses `CANCEL'.
  5412. --
  5413. <REF>TEXT:Browser48
  5414. " "0000B3") "~ChooseMenu0" ("\\-> {}
  5415. " "Menus with \"OK\".
  5416. --
  5417. <REF>TEXT:Browser48
  5418. " "0050B3") "~ChooseMenu1" ("\\-> {}
  5419. " "Menus with \"CANCL\", \"OK\".
  5420. --
  5421. <REF>TEXT:Browser48
  5422. " "0060B3") "~ChooseMenu2" ("\\-> {}
  5423. " "Menus with \"CHK\", \"CANCL\", \"OK\".
  5424. --
  5425. <REF>TEXT:Browser48
  5426. " "0070B3") "~ChooseSimple" ("$title {items} \\-> ob T
  5427. \\-> F
  5428. " "Simple interface to the HP48 choose engine.
  5429. On the HP49G, calls ^RunChooseSimple.
  5430. --
  5431. <REF>TEXT:Browser48
  5432. " "0630B3") "^RunChooseSimple" ("$title {items} \\-> ob T
  5433. \\-> F
  5434. " "Simple interface to the HP48 choose engine.
  5435. --
  5436. <REF>TEXT:Browser48
  5437. " "004002") "^DoCKeyCheck" ("\\->
  5438. " "Toggle check on current item.
  5439. --
  5440. <REF>TEXT:Browser48
  5441. " "09F002") "^DoCKeyChAll" ("\\->
  5442. " "Check all elements.
  5443. --
  5444. <REF>TEXT:Browser48
  5445. " "0A0002") "^DoCKeyUnChAll" ("\\->
  5446. " "Uncheck all items.
  5447. --
  5448. <REF>TEXT:Browser48
  5449. " "0B0002") "^DoCKeyCancel" ("\\->
  5450. " "Simulate Cancel.
  5451. --
  5452. <REF>TEXT:Browser48
  5453. " "09E002") "^DoCKeyOK" ("\\->
  5454. " "Simulate OK.
  5455. --
  5456. <REF>TEXT:Browser48
  5457. " "09D002") "^LEDispPrompt" ("\\->
  5458. " "Redraw title.
  5459. --
  5460. <REF>TEXT:Browser48
  5461. " "0B3002") "^LEDispList" ("\\->
  5462. " "Redraw browser lines.
  5463. --
  5464. <REF>TEXT:Browser48
  5465. " "0B2002") "^LEDispItem" ("# \\->
  5466. " "Redraw one line.
  5467. --
  5468. <REF>TEXT:Browser48
  5469. " "0B1002") "~BBMoveTo" ("# \\->
  5470. " "Moves selection to line and updates display.
  5471. --
  5472. <REF>TEXT:Browser48
  5473. " "0150B3" :UBS) "~BBRecalOff&Disp" ("flag \\->
  5474. " "Recalculates offset of selected item in page,
  5475. and redraws lines if the flag is TRUE.
  5476. --
  5477. <REF>TEXT:Browser48
  5478. " "0190B3" :UBS) "~BBRunEntryProc" ("\\->
  5479. " "Sends message 85 to ::Appl, thus running the
  5480. user-defined start-up procedure.
  5481. --
  5482. <REF>TEXT:Browser48
  5483. " "0220B3" :UBS) "~BBReReadPageSize" ("\\->
  5484. " "Re-reads the size of the page (message 57).
  5485. --
  5486. <REF>TEXT:Browser48
  5487. " "0230B3" :UBS) "~BBReReadHeight" ("\\->
  5488. " "Re-reads the height of the browser line
  5489. (message 58).
  5490. --
  5491. <REF>TEXT:Browser48
  5492. " "0240B3" :UBS) "~BBReReadCoords" ("\\->
  5493. " "Re-reads the coordinates of the browser box
  5494. (message 63).
  5495. --
  5496. <REF>TEXT:Browser48
  5497. " "0250B3" :UBS) "~BBReReadWidth" ("\\->
  5498. " "Re-reads the width of the browser line
  5499. (message 59).
  5500. --
  5501. <REF>TEXT:Browser48
  5502. " "0260B3" :UBS) "~BBRunENTERAction" ("\\->
  5503. " "Sends message 96 to ::Appl, thus running the
  5504. OK action. It does not check the value
  5505. returned and never exits.
  5506. --
  5507. <REF>TEXT:Browser48
  5508. " "0280B3" :UBS) "~BBRunCanclAction" ("\\->
  5509. " "Sends message 91 to ::Appl, thus running the
  5510. `CANCEL' action. It does not check the value
  5511. returned and never exits.
  5512. --
  5513. <REF>TEXT:Browser48
  5514. " "0290B3" :UBS) "~BBReDrawBackgr" ("\\->
  5515. " "Redraws the background.
  5516. --
  5517. <REF>TEXT:Browser48
  5518. " "02F0B3" :UBS) "~BBGetNGrob" ("#n \\-> grob
  5519. " "Returns nth element as a grob.
  5520. --
  5521. <REF>TEXT:Browser48
  5522. " "0370B3" :UBS) "~BBGetNStr" ("#n \\-> $
  5523. " "Returns nth element as a string.
  5524. --
  5525. <REF>TEXT:Browser48
  5526. " "0380B3" :UBS) "~BBRereadChkEnbl" ("\\->
  5527. " "Re-reads whether checkmarks are
  5528. enabled. (Message 61).
  5529. --
  5530. <REF>TEXT:Browser48
  5531. " "03B0B3" :UBS) "~BBRereadFullScr" ("\\->
  5532. " "Re-reads whether to use full-screen
  5533. mode. (Message 60).
  5534. --
  5535. <REF>TEXT:Browser48
  5536. " "03C0B3" :UBS) "~BReReadMenus" ("\\->
  5537. " "Re-reads the menu. (Message 83).
  5538. --
  5539. <REF>TEXT:Browser48
  5540. " "03D0B3" :UBS) "~BBReReadNElems" ("\\->
  5541. " "Re-reads the number of elements. (Message
  5542. 62).
  5543. --
  5544. <REF>TEXT:Browser48
  5545. " "03E0B3" :UBS) "~BBGetN" ("#n \\-> ob
  5546. " "Returns nth element.
  5547. --
  5548. <REF>TEXT:Browser48
  5549. " "03F0B3" :UBS) "~BBIsChecked?" ("#n \\-> flag
  5550. " "Returns whether the given element is
  5551. checked.
  5552. --
  5553. <REF>TEXT:Browser48
  5554. " "04B0B3" :UBS) "~BBUpArrow" ("\\-> grob
  5555. " "Returns up arrow as grob
  5556. --
  5557. <REF>TEXT:Browser48
  5558. " "0520B3" :UBS) "~BBDownArrow" ("\\-> grob
  5559. " "Returns down arrow as grob
  5560. --
  5561. <REF>TEXT:Browser48
  5562. " "0530B3" :UBS) "~BBSpace" ("\\-> grob
  5563. " "Returns a space as grob.
  5564. --
  5565. <REF>TEXT:Browser48
  5566. " "0540B3" :UBS) "~BBPgDown" ("\\->
  5567. " "Go down one page.
  5568. --
  5569. <REF>TEXT:Browser48
  5570. " "0590B3" :UBS) "~BBPgUp" ("\\->
  5571. " "Go up one page.
  5572. --
  5573. <REF>TEXT:Browser48
  5574. " "05A0B3" :UBS) "~BBEmpty?" ("\\-> flag
  5575. " "Returns TRUE if the browser has no elements.
  5576. --
  5577. <REF>TEXT:Browser48
  5578. " "05B0B3" :UBS) "~BBGetDefltHeight" ("\\-> #
  5579. " "Returns height of lines based on the font
  5580. that will be used. This value is the default
  5581. height of the browser.
  5582. Equivalent to FPTR 2 64.
  5583. --
  5584. <REF>TEXT:Browser48
  5585. " "05C0B3" :UBS) "~BRbrowse" ("
  5586. " "" "0100E0") "^BRDispItems" ("
  5587. " "" "0A5003") "^BRdone" ("
  5588. " "" "0A4003") "^BRGetItem" ("
  5589. " "" "0AB003") "^BRinverse" ("
  5590. " "" "0A6003") "~BRoutput" ("
  5591. " "" "0130E0") "^BrowseMem.1" ("
  5592. " "" "070004") "~BRRclC1" ("\\->
  5593. " " :: LAM 'BR5 ;
  5594. " "0190E0") "~BRRclCurRow" ("
  5595. " " :: LAM 'BR3 ;
  5596. " "0180E0") "~BRStoC1" ("
  5597. " " :: ' LAM 'BR5 STO ;
  5598. " "0030E0") "^BRViewItem" ("
  5599. " "" "0A7003") "^Choose3" ("meta $title #pos ::handler \\-> ob T
  5600. \\-> F
  5601. " "The main choose engine.
  5602. --
  5603. <REF>TEXT:Browser49
  5604. " "072002" :UBS) "^Choose3Save" ("meta $title #pos ::handler \\-> ob T
  5605. \\-> F
  5606. " "Save and restore HARDBUFF/2 around a ^Choose3
  5607. call.
  5608. --
  5609. <REF>TEXT:Browser49
  5610. " "073002" :UBS) "^Choose3Index" ("meta $title #pos ::handler \\-> #idx T
  5611. \\-> F
  5612. " "Same as ^Choose3, but returns the index of
  5613. the selected item instead of the item
  5614. itself. #idx starts at zero.
  5615. --
  5616. <REF>TEXT:Browser49
  5617. " "074002" :UBS) "^Choose2" ("meta $title #pos \\-> ob T
  5618. \\-> F
  5619. " "Call ^Choose3 with empty message handler.
  5620. --
  5621. <REF>TEXT:Browser49
  5622. " "06E002" :UBS) "^Choose2Save" ("meta $title #pos \\-> ob T
  5623. \\-> F
  5624. " "Save and restore HARDBUFF/2 around a ^Choose2
  5625. call.
  5626. --
  5627. <REF>TEXT:Browser49
  5628. " "06F002" :UBS) "^Choose2Index" ("meta $title #pos \\-> #idx T
  5629. \\-> F
  5630. " "Call Choose3Index with empty message handler.
  5631. This is just
  5632. :: 'DROPFALSE FPTR2 ^Choose3Index ;
  5633. --
  5634. <REF>TEXT:Browser49
  5635. " "070002" :UBS) "^sysCHOOSE" ("$title {} %sel \\-> ob %1
  5636. $title {} %sel \\-> %0
  5637. " "Equivalent to User RPL CHOOSE command.
  5638. --
  5639. <REF>TEXT:Browser49
  5640. " "005002" :UBS) "^ChooseDefHandler" ("\\-> ::handler
  5641. " "Pushed the default message handler (the one
  5642. used by the `CAT' key) on the stack.
  5643. --
  5644. <REF>TEXT:Browser49
  5645. " "075002" :UBS) "^SaveHARDBUFF" ("\\->
  5646. " "Save HARDBUFF and HARDBUFF2 is a safe place.
  5647. --
  5648. <REF>TEXT:Browser49
  5649. " "088002" :UBS) "^RestoreHARDBUFF" ("\\->
  5650. " "Restore HARDBUFF and HARDBUFF2 saved with
  5651. SaveHARDBUFF.
  5652. --
  5653. <REF>TEXT:Browser49
  5654. " "089002" :UBS) "^Choose3OK" ("\\->
  5655. " "The OK action executed by Choose3 if OK or
  5656. ENTER is pressed.
  5657. --
  5658. <REF>TEXT:Browser49
  5659. " "077002" :UBS) "^Choose3CANCL" ("\\->
  5660. " "The CANCEL action executed by Choose3 if
  5661. `CANCL' or `ON' is pressed.
  5662. --
  5663. <REF>TEXT:Browser49
  5664. " "076002" :UBS) "ParOuterLoop" ("Disp Keys NonAppKeys? DoStdKeys? menu #row suspendOK? ExitCond AppErr \\->
  5665. " "" "2B475") "POLSaveUI" ("Disp Keys NonAppKeys? DoStdKeys? menu #row suspendOK? ExitCond AppErr \\->
  5666. " "Saves current UI to LAMSavedUI.
  5667. " "2B4AC") "POLSetUI" ("<REF>ParOuterLoop
  5668. " "Sets new UI, same arguments as to
  5669. ParOuterLoop.
  5670. " "2B542") "POLKeyUI" ("\\->
  5671. " "Displays, reads and evaluates keys according
  5672. to set UI.
  5673. " "2B628") "POLRestoreUI" ("\\->
  5674. " "Restores saved UI from LAMSavedUI.
  5675. " "2B6CD") "POLResUI&Err" ("\\->
  5676. " "Restores saved UI and executes ERRJMP.
  5677. " "2B6B4") "AppDisplay!" ("ob \\->
  5678. " "" "29F25") "AppDisplay@" ("\\->
  5679. " "" "29F35") "AppKeys!" ("ob \\->
  5680. " "" "29F55") "AppKeys0" ("???
  5681. " "" "29F75") "AppKeys@" ("
  5682. " "" "29F65" :UBS) "AppExitCond!" ("ob \\->
  5683. " "" "2A055") "AppExitCond@" ("\\-> ob
  5684. " "" "2A065") "AppError!" ("ob \\->
  5685. " "" "2A145") "AppError@" ("\\-> ob
  5686. " "" "2A158") "AppMode?" ("\\-> flag
  5687. " "Is currently a POL active?
  5688. " "25690") "SetAppMode" ("\\->
  5689. " "" "25695") "ClrAppMode" ("\\->
  5690. " "" "2569A") "SetNAppKeyOK" ("\\->
  5691. " "" "2564D") "ClrNAppKeyOK" ("\\->
  5692. " "" "25652" :UBS) "DoStdKeys?" ("\\-> flag
  5693. " "" "2565A") "SetDoStdKeys" ("\\->
  5694. " "" "2565F") "ClrDoStdKeys" ("\\->
  5695. " "" "25664" :UBS) "SuspendOK?" ("\\-> flag
  5696. " "Does the current user interface allow
  5697. suspension?
  5698. " "25F04") "nohalt" ("\\-> ob
  5699. " " :: LAM 'nohalt ;
  5700. " "27E72") "AppSuspOK?" ("\\->
  5701. " "" "2566C" :UBS) "SetAppSuspOK" ("\\->
  5702. " "" "25671") "ClrAppSuspOK" ("\\->
  5703. " "" "25676") "InitPOLVars" ("
  5704. " "" "2B709") "EditLExists?" ("\\-> flag
  5705. " "Does an EditLine exist?
  5706. " "257A2") "NoEditLine?" ("\\-> flag
  5707. " "Does no EditLine exist?
  5708. " "2EEED") "RCL_CMD" ("\\-> $
  5709. " "Returns a copy of the current command
  5710. line to the stack. Same as EDITLINE$.
  5711. " "2F196") "EDITLINE$" ("\\-> $
  5712. " "Returns a copy of the current command
  5713. line to the stack. Same as RCL_CMD.
  5714. " "2EEEB") "RCL_CMD2" ("\\-> $
  5715. " "Similar to RCL_CMD, but if there is not
  5716. enough memory to copy the EditLine to
  5717. the stack, it will move the current
  5718. EditLine into TEMPOB. Of course, this
  5719. will delete the current EditLine.
  5720. " "2F197") "RCL_CMD_POS" ("\\-> #
  5721. " "Recalls the current cursor position.
  5722. " "2EF87") "CURSOR@" ("\\-> #
  5723. " "Recalls the current cursor position.
  5724. " "26585") "CURSOR_PART" ("\\-> #
  5725. " "Recalls the current cursor row (line). There
  5726. is no such entry for the column, but
  5727. CURSOR_OFF FIRSTC@ #+
  5728. can be used for this purpose.
  5729. " "26594" :UBS) "ChrAtCur" ("\\-> chr
  5730. " "Returns the character under the cursor. At
  5731. the end of the file, returns CHR_00.
  5732. " "2F158" :UBS) "CURSOR_END?" ("\\-> flag
  5733. " "Checks if the cursor is at the end of a line
  5734. or at the end of the file. Works by
  5735. checking the current character against
  5736. newline and CHR_00.
  5737. " "2EEEA") "CAL_CURS_POS" ("#l #c \\-> #
  5738. " "Computes a position in the current
  5739. EditLine from line and column number.
  5740. The result can be used by STO_CURS_POS
  5741. to move the cursor to that location. If #line
  5742. is larger than the number of lines in the
  5743. EditLine, computes the position of the last
  5744. line.
  5745. " "2EF91") "CAL_CURS_POS_VIS" ("#l #c \\-> #
  5746. " "Similar to CAL_CURS_POS, but will ignore
  5747. invisible characters. The result can be
  5748. used by STO_CURS_POS_VIS to move the
  5749. cursor to that location.
  5750. " "2EF90") "RCL_CMD_MODE" ("\\-> $
  5751. " "Recalls a string with current editor
  5752. settings. Can be used together with
  5753. STO_CMD_MODE to save and restore the
  5754. state of the EditLine, when temporarily
  5755. leaving the editor with HALT or when
  5756. calling a program which must temporarily
  5757. change settings.
  5758. " "2F199") "STO_CMD_MODE" ("$ \\->
  5759. " "Stores a mode string similar to the one
  5760. obtained by RCL_CMD_MODE.
  5761. " "2F198") "CURSOR_PART+" ("
  5762. " "" "26599" :UBS) "CURSOR_PART-" ("
  5763. " "" "2659E" :UBS) "CURPART->1" ("
  5764. " "" "265A3" :UBS) "CURPART->CR+" ("
  5765. " "" "265A8" :UBS) "CURSORPLUS" ("
  5766. " "" "26562" :UBS) "CURSORMINUS" ("
  5767. " "" "26567" :UBS) "?CURSOR+" ("
  5768. " "" "26571" :UBS) "CURSOR-" ("
  5769. " "" "2658F" :UBS) "TOPLINE!" ("# \\->
  5770. " "Sets the line of the current editor content
  5771. which should be displayed at the top of the
  5772. editor window.
  5773. " "264B3" :UBS) "TOPLINE@" ("\\-> #
  5774. " "Recalls the line number of the first
  5775. displayed line.
  5776. " "264B8" :UBS) "TOPLINE+" ("\\->
  5777. " "Increases TOPLINE by one. If the cursor
  5778. leaves the screen, cursor and display window
  5779. are moved to the beginning of the file.
  5780. " "264BD" :UBS) "TOPLINE-" ("\\->
  5781. " "Decreases TOPLINE by one. If the cursor
  5782. leaves the screen, cursor and display window
  5783. are moved to the beginning of the file.
  5784. " "264C2" :UBS) "FIRSTC@" ("\\-> #
  5785. " "Column of the left display window edge.
  5786. " "264CC") "FIRSTC+" ("\\->
  5787. " "Increases the position of the left window ege
  5788. by one.
  5789. " "264DB") "FIRSTC-" ("\\->
  5790. " "Decreases the position of the left window ege
  5791. by one.
  5792. " "264D6" :UBS) "SETFIRSTC_0" ("\\->
  5793. " "Sets the position of the left display window
  5794. edge to zero.
  5795. " "264D1") "CURSOR_OFF" ("\\-> #
  5796. " "Cursor column relative to left edge of
  5797. display window.
  5798. " "26030") "CURSOR_OFF+" ("\\->
  5799. " "Increases the CURSOR offset by one.
  5800. " "26580") "CURSOR_OFF0" ("\\->
  5801. " "Sets the cursor offset to zero.
  5802. " "2657B") "CURSOR_OFF!" ("# \\->
  5803. " "Sets the cursor offset.
  5804. " "26576" :UBS) "CMD_PLUS" ("$ \\->
  5805. " "Inserts string at current cursor position
  5806. in EditLine.
  5807. " "2EF74") "CMD_PLUS2" ("$ \\->
  5808. " "Replaces entire current EditLine with new
  5809. string. When there is not enough memory
  5810. to copy the string on stack level 1,
  5811. moves the string out of TEMPOB. You
  5812. must be careful that the string is not
  5813. referenced in any way. The cursor is
  5814. moved to the end of the new string.
  5815. " "2F194") "CMD_PLUS3" ("$ \\->
  5816. " "Same as CMD_PLUS2, but the cursor
  5817. position is not changed. Useful when
  5818. restoring a command line context after
  5819. HALT.
  5820. " "2F195") "InsertEcho" ("$ \\->
  5821. " "Inserts string at current cursor position
  5822. in EditLine.
  5823. " "2EF97") "Echo$Key" ("$/chr \\->
  5824. " "Same as CMD_PLUS.
  5825. " "2EEE4") "EchoChrKey" ("$/chr \\->
  5826. " "Same as CMD_PLUS, but first ?TogU/LCase.
  5827. " "2EEE3") "Echo$NoChr00" ("$ \\->
  5828. " "Inserts string at current cursor position
  5829. in EditLine.
  5830. " "2F11C") "DoDelim" ("\\->
  5831. " "Takes a character or string from the
  5832. runstream and inserts it.
  5833. " "25EC1") "DoDelims" ("\\->
  5834. " "Takes a character or a string from the
  5835. runstream, inserts it and moves the cursor
  5836. back by one character.
  5837. " "25EC2") "INSERT_MODE" ("\\->
  5838. " "Turns insert mode on. In insert mode, new
  5839. characters do not overwrite old ones.
  5840. " "25795") "TOGGLE_I/R" ("\\->
  5841. " "Toggles the insert/overwrite flag.
  5842. " "2577F" :UBS) "?TogU/LCase" ("chr \\-> chr'
  5843. " "Toggle upper/lowercase of character if some
  5844. condition is fulfilled.
  5845. " "2ACB0") "INSERT?" ("\\-> flag
  5846. " "Returns TRUE if insert mode is active.
  5847. " "25790") "CMD_DEL" ("\\->
  5848. " "Deletes next char in Editor. Same as
  5849. `LS'+`DEL'. If you hold down `BS' while this
  5850. entry is executed, the HP49G will think
  5851. you have pressed the key and want to
  5852. repeat it.
  5853. " "2EF82") "CMD_DROP" ("\\->
  5854. " "Backspace in Editor. Deletes char
  5855. before cursor. Same as `BS' key. If you
  5856. hold down `BS' while this entry is
  5857. executed, the HP49G will think you have
  5858. pressed the key and want to repeat it.
  5859. " "2EF81") "DEL_CMD" ("\\->
  5860. " "Clears the entire EditLine.
  5861. " "2EF95") "InitEdLine" ("\\->
  5862. " " :: DEL_CMD ;
  5863. " "2EEE7") "DO<Del" ("\\->
  5864. " "Deletes left to beginning of word. Same
  5865. as the `\\<-DEL' button in the editor TOOL
  5866. menu.
  5867. " "2F2F0") "DO>Del" ("\\->
  5868. " "Deletes right to beginning of next word,
  5869. Same as the `DEL\\->' button in the editor
  5870. TOOL menu.
  5871. " "2F2F1") "DODEL.L" ("\\->
  5872. " "Deletes all chars in the current line.
  5873. If the line is already empty, delete the
  5874. NEWLINE. Same as the `DEL.L' button in
  5875. the editor TOOL menu.
  5876. " "2F2F9") "DoFarBS" ("\\->
  5877. " "Deletes to beginning of line. Same as
  5878. the `RS'+`\\<-DEL' in the editor TOOL menu.
  5879. " "2F2DD") "DoFarDel" ("\\->
  5880. " "Deletes to end of line. Same as `RS'+`Del\\->'
  5881. in the editor TOOL menu.
  5882. " "2F2DE") "STO_CURS_POS" ("# \\->
  5883. " "Stores cursor position. Moves cursor to
  5884. specified position and if necessary
  5885. repositions the editor window to make
  5886. sure the cursor position is visible. If
  5887. it is necessary to scroll the window
  5888. horizontally, this command sets the left
  5889. edge of the window to the cursor column
  5890. and shows as much text as possible to
  5891. the right of the cursor. However, if
  5892. the cursor is also visible when the
  5893. window edge is moved to column zero,
  5894. this position takes precedence.
  5895. " "2EF8B") "STO_CURS_POS2" ("# \\->
  5896. " "Same as STO_CURS_POS, but moves the
  5897. right edge of the editor window to the
  5898. cursor column.
  5899. " "2EF8C") "STO_CURS_POS3" ("# \\->
  5900. " "Same as STO_CURS_POS, but without
  5901. checking for style/font switch
  5902. sequences. So while STO_CURS_POS always
  5903. makes sure the cursor ends up right
  5904. before a visible character, this command
  5905. allows you to position it within the
  5906. invisible escape sequences.
  5907. " "2EF8D") "STO_CURS_POS4" ("# \\->
  5908. " "Behaves with respect to editor window
  5909. positioning like <REF>STO_CURS_POS2, but with
  5910. respect to invisible chars like
  5911. <REF>STO_CURS_POS3.
  5912. " "2EF8E") "STO_CURS_POS_VIS" ("# \\->
  5913. " "Like <REF>STO_CURS_POS, but ignores the
  5914. invisible characters. So if you look at
  5915. your string and say, I want to go to
  5916. what I see as the 5th character, use
  5917. this entry.
  5918. " "2EF8F") "SetCursor" ("# \\->
  5919. {# #'} \\->
  5920. " "Sets the cursor to the given position. For
  5921. the list argument, the numbers are row and
  5922. column.
  5923. " "2F378") "SETCURSOR" ("
  5924. " "" "2611B") "CMD_NXT" ("\\->
  5925. " "Moves cursor to next char, like Right Arrow.
  5926. " "2EF7C") "CMD_BAK" ("\\->
  5927. " "Moves cursor to the left. Same as as
  5928. Left Arrow.
  5929. " "2EF7B") "CMD_DOWN" ("\\->
  5930. " "Moves cursor to the next line. Same as Down
  5931. Arrow.
  5932. " "2EF80") "CMD_UP" ("\\->
  5933. " "Moves cursor to the previous line, like Up
  5934. Arrow.
  5935. " "2EF7F") "CMD_DEB_LINE" ("\\->
  5936. " "Moves cursor to the beginning of line. Same
  5937. as RS+LEFT.
  5938. " "2EF7D") "CMD_END_LINE" ("\\->
  5939. " "Moves cursor to the end of line. Same as
  5940. RS+RIGHT.
  5941. " "2EF7E") "CMD_PAGED" ("\\->
  5942. " "Moves cursor one page down, like LS+DOWN.
  5943. " "2EF7A") "CMD_PAGEL" ("\\->
  5944. " "Moves cursor one page left, like LS+LEFT.
  5945. " "2EF77") "CMD_PAGER" ("\\->
  5946. " "Moves cursor one page right, like LS+RIGHT.
  5947. " "2EF78") "CMD_PAGEU" ("\\->
  5948. " "Moves cursor one page up, like LS+UP.
  5949. " "2EF79") "DO<Skip" ("\\->
  5950. " "Skips left to beginning of word. Same as
  5951. the \\<-SKIP button in the editor TOOL
  5952. menu.
  5953. " "2F2EE") "DO>Skip" ("\\->
  5954. " "Skips right to the beginning of the next
  5955. word. Same as the SKIP\\-> button in the
  5956. editor TOOL menu.
  5957. " "2F2EF") "DO>BEG" ("\\->
  5958. " "Goes to begin of selection (if active) or
  5959. to beginning of EditLine. Same as `\\->BEG'
  5960. button in the editor TOOL menu.
  5961. " "2F2E4") "DO>END" ("\\->
  5962. " "Goes to end of selection. Same as the
  5963. `\\->END' button in the editor TOOL menu.
  5964. When there is no selection, does not
  5965. move.
  5966. " "2F2E5") "GOTOLABEL" ("\\->
  5967. " "Brings up the CHOOSE-box with labels in
  5968. the EditLine. Same as the LABEL button
  5969. in the editor TOOL/GOTO menu.
  5970. " "2F2E6") "CMD_STO_DEBUT" ("# \\->
  5971. " "Sets begin marker, like `RS'+`BEGIN', but
  5972. takes position from stack.
  5973. " "2EF83") "CMD_STO_FIN" ("# \\->
  5974. " "Sets end marker, like `RS'+`END', but takes
  5975. position from stack.
  5976. " "2EF84") "RCL_CMD_DEB" ("\\-> #
  5977. \\-> #0
  5978. " "Recalls the position of the BEGIN marker. If
  5979. the selection has been cleared, returns ZERO.
  5980. " "2EF85") "RCL_CMD_FIN" ("\\-> #
  5981. \\-> #0
  5982. " "Recalls the position of the END marker. If
  5983. the selection has been cleared, returns ZERO.
  5984. " "2EF86") "ClearSelection" ("\\->
  5985. " "Unselects the selected text without changing
  5986. the contents of the editor. Sets both begin
  5987. and end marker to ZERO.
  5988. " "2F2DC") "VERIF_SELECTION" ("\\-> flag
  5989. " "Returns TRUE when the END marker is not
  5990. ZERO, indicating that the selection is
  5991. active. Use this command as a check
  5992. before doing anything with the
  5993. selection.
  5994. " "2EF93") "CMD_COPY" ("\\->
  5995. " "Copies selected string, like `RS'+`COPY'.
  5996. " "2EF8A") "CMD_CUT" ("\\->
  5997. " "Cuts string. Really is \"delete\", does
  5998. not copy to kill buffer. So a \"normal\"
  5999. CUT would be
  6000. :: CMD_COPY CMD_CUT ;
  6001. " "2EF88") "CUT.EXT" ("\\-> $
  6002. " "ML routine used by CMD_CUT. Should not
  6003. be used on its own since it does not
  6004. move the cursor position.
  6005. " "2EF89" :ML) "CMD_COPY.SBR" ("\\-> $
  6006. " "Puts the selection as a string on the
  6007. stack. This command is font/style
  6008. aware. It is recommended not to use it
  6009. because it may get the wrong text style
  6010. if the cursor is not re-positioned to
  6011. the beginning of the selection first.
  6012. If you don't use fonts,
  6013. :: RCL_CMD
  6014. RCL_CMD_DEB RCL_CMD_FIN
  6015. SUB$ ;
  6016. does something similar.
  6017. " "2F2FA") "PASTE.EXT" ("$ \\->
  6018. " "Pastes from stack with treatment of fonts
  6019. and styles. Inserts the string on stack
  6020. level 1 at the cursor position. It can
  6021. insert normal text right in the middle
  6022. of bold test etc. If you don't use
  6023. styles or different fonts, CMD_PLUS is
  6024. probably faster.
  6025. " "2EF94") "SELECT.LINE" ("\\->
  6026. " "Selects current line, position cursor at
  6027. beginning of line. Selection does not
  6028. include the NEWLINE char at the end of
  6029. the line.
  6030. " "2F2E1") "SELECT.LINEEND" ("\\->
  6031. " "Selects current line, position cursor at
  6032. end of line. Selection does not include
  6033. the NEWLINE char at the end of the line.
  6034. " "2F2E2") "Clipboard!" ("$ \\->
  6035. " "Stores string to Clipboard.
  6036. " "2A085" :UBS) "Clipboard@" ("\\-> $
  6037. " "Recalls Clipboard contents to stack.
  6038. " "2A095" :UBS) "Clipboard0" ("\\->
  6039. " "Clears the Clipboard.
  6040. " "2A0A5" :UBS) "Clipboard?" ("\\-> flag
  6041. " "Is there anything on the Clipboard?
  6042. " "2A0B5" :UBS) "GET.W->" ("\\-> #
  6043. " "Returns the position of the next
  6044. word-start to the right of the current
  6045. cursor position. Note the asymmetry of
  6046. this command and GET.W<-.
  6047. " "2F2F3") "GET.W<-" ("# \\-> #'
  6048. " "Takes a position from the stack and
  6049. return the position if the nearest
  6050. word-start to the left of that position.
  6051. Note the asymmetry of this command and
  6052. GET.W->.
  6053. " "2F2F4") "CaseSensitive?" ("\\-> flag
  6054. " "Is the flag for case-sensitive search
  6055. currently set?
  6056. " "2576D" :UBS) "SetCaseSensitive" ("\\->
  6057. " "Set case-sensitive seatch.
  6058. " "25772" :UBS) "ClrCaseSensitive" ("\\->
  6059. " "Set case-insensitive search.
  6060. " "25777" :UBS) "FindStrInCmd" ("$find \\-> $find $start $end T
  6061. \\-> $find F
  6062. " "Finds a string in the EditLine, starting
  6063. from the current cursor position. The
  6064. search string remains on the stack,
  6065. presumably in order to do repeated
  6066. searches. Returns the start and end
  6067. positions of the match and a flag. This
  6068. function respects the setting of the
  6069. internal flag for case-sensitive search.
  6070. " "2F2F2") "FindPattern!" ("$ \\->
  6071. " "Sets the find pattern.
  6072. " "2A0C5" :UBS) "FindPattern@" ("\\-> $
  6073. " "Recalls the current find pattern. If there
  6074. is not current pattern, this returns PTR 0 -
  6075. so always check first with FindPattern?.
  6076. " "2A0D5" :UBS) "FindPattern0" ("\\->
  6077. " "Deletes the current find pattern.
  6078. " "2A0E5" :UBS) "FindPattern?" ("\\-> flag
  6079. " "Checks if a find pattern has been defined.
  6080. " "2A0F5" :UBS) "ReplacePattern!" ("$ \\->
  6081. " "Sets the replace pattern.
  6082. " "2A105" :UBS) "ReplacePattern@" ("\\-> $
  6083. " "Recalls the current replace pattern. If there
  6084. is not current pattern, this returns PTR 0 -
  6085. so always check first with ReplacePattern?.
  6086. " "2A115" :UBS) "ReplacePattern0" ("\\->
  6087. " "Deletes the current replace pattern.
  6088. " "2A125" :UBS) "ReplacePattern?" ("\\-> flag
  6089. " "Checks if a replace pattern has been defined.
  6090. " "2A135" :UBS) "DOFIND" ("\\->
  6091. " "Same as the FIND menu button in the
  6092. editor TOOL/SEARCH menu. Pops up the
  6093. FIND input form.
  6094. " "2F2E8") "DONEXT" ("\\->
  6095. " "Finds next. Same as the NEXT button in
  6096. the editor TOOL/SEARCH menu. Uses the
  6097. pattern set with FindPattern!.
  6098. " "2F2EA") "DOREPL" ("\\->
  6099. " "Same as the REP button in the editor
  6100. TOOL/SEARCH menu. Pops up the QREPLACEQ
  6101. input form.
  6102. " "2F2E9") "DOREPLACE" ("\\->
  6103. " "Replaces current match. Same as the R
  6104. button in the editor TOOL/SEARCH menu. Uses
  6105. the pattern set with ReplacePattern!.
  6106. " "2F2EB") "DOREPLACE/NEXT" ("\\->
  6107. " "Replaces current match and move to next
  6108. match. Same as the R/N button in the
  6109. editor TOOL/SEARCH menu.
  6110. " "2F2EC") "REPLACEALL" ("\\->
  6111. " "Replaces all matches in buffer. Same as
  6112. the ALL button in the editor TOOL/SEARCH
  6113. menu.
  6114. " "2F2ED") "REPLACEALLNOSCREEN" ("\\->
  6115. " "Like <REF>REPLACEALL, but does not update the
  6116. screen. Much faster this way.
  6117. " "2F2FC") "EditSelect" ("\\->
  6118. " "Edits the current selection. Opens the
  6119. editor with the selection only. You can
  6120. then edit the selection. After pressing
  6121. ENTER the edited text is inserted back
  6122. into the previous editing environment.
  6123. " "2F2DF") "EVAL.LINE" ("\\->
  6124. " "Evaluates the current line and replace it
  6125. with the result of the evaluation.
  6126. Similar to EVAL.SELECTION, but without
  6127. the need to select the line first.
  6128. " "2F2E3") "EVAL.SELECTION" ("\\->
  6129. " "Evaluates the current selection and
  6130. replace it with the result of the
  6131. evaluation. Same as the EXEC button in
  6132. the editor TOOL menu.
  6133. " "2F2FB") "EXEC_CMD" ("cmd algflag \\-> obsel
  6134. " "Runs a command on the selection in the
  6135. Editline. Takes two arguments: the
  6136. command to run and a flag which says how
  6137. to compile the selection before the
  6138. command is applied. If the flag is
  6139. TRUE, and ALG mode in on, the ALG
  6140. compiler is used and the DOTAG :: xEVAL
  6141. prologue of the result is removed. Use
  6142. this if the result is to be edited by
  6143. another editor. The selection is left
  6144. on stack level 1 as an object.
  6145. " "2F2F8") "RunInNewContext" ("ob \\->
  6146. " "Saves current user interface, evaluate ob and
  6147. restore the user interface. Can be used to
  6148. run applications from inside another
  6149. application.
  6150. " "0B954" :UBS) "ViewLevel1" ("ob \\-> ob'
  6151. " "Edits the object in level 1.
  6152. " "2F19A") "AlgCharEdit" ("
  6153. " "" "2F2DA") "AlgObEdit" ("ob \\-> ob'
  6154. " "Used instead of ViewLevel1 if in Algebraic
  6155. mode. Does not execute STARTED and EXITED.
  6156. " "2F1AF") "CharEdit" ("
  6157. " "" "2F1AD") "DoLevel1:" ("ob \\-> ob'
  6158. " "Evaluates the next object in the runstream,
  6159. which usually in an editing command like
  6160. <REF>ObEdit. When the evaluation returns FALSE,
  6161. the original object which was saved in a
  6162. temporary variable is restored to the stack.
  6163. When the evaluation returns TRUE, the TRUE is
  6164. removed from the stack.
  6165. " "2B2F2" :UBS) "ClrNewEditL" ("
  6166. " "" "257BE") "EditFont" ("
  6167. " "" "2F1A8") "EditLevel1" ("ob \\-> ob'
  6168. " "" "2EEE5") "ObEdit" ("ob \\-> ob' T
  6169. \\-> F
  6170. " "Edits object. When the user cancels, only
  6171. FALSE is returned. Otherwise the changed
  6172. object along with TRUE is returned.
  6173. " "2F1AE") "StrEdit" ("
  6174. " "" "2F1AC") "^EQW3Edit" ("symb \\-> symb' T
  6175. \\-> F
  6176. " "Opens the equation editor to edit the
  6177. expression. If exited by ENTER, returns new
  6178. expression and TRUE. If exited by CANCEL,
  6179. returns just FALSE.
  6180. " "011004") "EditString" ("$ \\->
  6181. " "Starts editing the string in the command line
  6182. when the current program exits. This is the
  6183. entry to use if a program should exit with
  6184. the command line. Use InitEdLine before this
  6185. entry to clear the command line (if desired)
  6186. - if not, the string is inserted into the
  6187. existing command line. All code after this
  6188. entry will be executed *before* control is
  6189. handed to the editor application. For
  6190. example:
  6191. ::
  6192. \"SOME STRING\"
  6193. DUPLEN$ SWAP (get length)
  6194. InitEdLine (clear the editline)
  6195. EditString (string to editline)
  6196. STO_CURS_POS2 (cursor at end)
  6197. \"Starting editor...\"
  6198. FlashMsg (display *before* edit)
  6199. ;
  6200. Note that when you press ENTER after
  6201. editing, the command line will be parsed
  6202. normally.
  6203. " "2EEE9") "Rcl&Do:" ("id \\->
  6204. " "Executes the program which is next in the
  6205. runstream on the contents of the variable.
  6206. The program typically is an edit command,
  6207. with the stack diagrams
  6208. ( ob \\-> ob' T )
  6209. ( ob \\-> F )
  6210. If the flag is TRUE, ob' is stored back into
  6211. the original variable.
  6212. " "2B351") "Roll&Do:" ("# \\->
  6213. " "Does ROLL and then executes the program which
  6214. is next on the runsteam. So the program is
  6215. applied to the object on level #. Typically,
  6216. this is an edit command, with the stack
  6217. diagram
  6218. ( ob \\-> ob )
  6219. After the program exits, UNROLL is used to
  6220. put the object back to the right stack
  6221. position. This entry is probably used in the
  6222. interactive stack.
  6223. " "2B31A") "Rcl&Edit" ("id \\->
  6224. " "Uses Rcl&Do: to edit the contents of the
  6225. variable.
  6226. " "2F09B" :UBS) "Rcl&View" ("id \\->
  6227. " "Uses Rcl&Do: to view the contents of the
  6228. variable.
  6229. " "2F09C" :UBS) "Roll&Edit" ("# \\->
  6230. " "Uses Roll&Do: to edit the contents of
  6231. specified stack level.
  6232. " "2F09D" :UBS) "Roll&View" ("# \\->
  6233. " "Uses Roll&Do: to view the contents of
  6234. specified stack level.
  6235. " "2F09E" :UBS) "EditMenu" ("\\-> {}
  6236. " "Returns the Editor menu.
  6237. " "25ED2") "?Space/Go>" ("\\->
  6238. " "Inserts a SPACE character unless there is
  6239. already one before the cursor position.
  6240. Use this if you want to make sure the
  6241. next stuff echoed is separated by at
  6242. least one space from the word preceding
  6243. it.
  6244. " "2EF73") "AddLeadingSpace" ("$ \\-> $'
  6245. " "Adds a leading space to the string on
  6246. level1 if it does not start with a space
  6247. *and* if the cursor in the editor is
  6248. after a non-white character. So
  6249. :: \"DUP\" AddLeadingSpace
  6250. AddTrailingSpace CMD_PLUS ;
  6251. inserts DUP and makes sure it will be
  6252. surrounded by spaces.
  6253. " "2EF76") "AddTrailingSpace" ("$ \\-> $'
  6254. " "Adds a trailing space to the string on
  6255. level1 unless the string already ends
  6256. with a space.
  6257. " "2EF75") "CMDSIZE" ("\\-> #
  6258. " "ML entry point to get the size of the
  6259. EditLine. As ML entries cannot be
  6260. called directly from SysRPL, don't use
  6261. it unless you know the necessary magic.
  6262. :: RCL_CMD LEN$ ;
  6263. works for us assembler dummies ;-)
  6264. " "26855" :ML) "CommandLineHeight" ("\\-> #pix
  6265. " "Returns the number pixel rows occupied
  6266. by visible part of the EditLine.
  6267. " "2EF9A") "DOTEXTINFO" ("\\->
  6268. " "Displays the info screen about the
  6269. Editline. Same as the INFO button in
  6270. the editor TOOL menu.
  6271. " "2F2DB") "GET_CUR_FONT.EXT" ("\\-> #
  6272. " "Returns the ID (as a system binary) of
  6273. the font used for the character under
  6274. the cursor.
  6275. " "2F2F6") "NO_AFFCMD" ("\\->
  6276. " "Tells the next CMD_PLUS call not to
  6277. update the display. For speed, if you
  6278. want to do more insertion before the
  6279. user needs to see it.
  6280. " "2EF96") "DispCommandLine" ("\\->
  6281. " "Redisplays the command line.
  6282. " "2F19E") "?DispCommandLine" ("\\->
  6283. " "Redisplays the command line if necessary.
  6284. " "2F19F") "PUT_STYLE" ("# \\->
  6285. " "Changes the style at point. If the
  6286. selection is active, changes the style
  6287. of the text in the selection. Otherwise
  6288. changes the style of text typed
  6289. subsequently. Takes a BINT from the
  6290. stack which is the number of the style.
  6291. In think the ITALI button in the editor
  6292. TOOL/STYLE menu could be implemented
  6293. with the following program:
  6294. :: ERRSET PUT_STYLE
  6295. ERRTRAP ERRJMP ;
  6296. PUT_STYLE does not ABND its temporary
  6297. environment, so you need the ERRTRAP
  6298. construction to work around this bug.
  6299. " "2F2F7") "PUT_FONTE" ("# \\->
  6300. " "Changes the font at point. Works similar
  6301. to the PUT_STYLE command.
  6302. " "2F2F5") "SELECT.FONT" ("\\->
  6303. " "Pops up the CHOOSE box to select a font.
  6304. Same as the FONT button in the editor
  6305. TOOL/STYLE menu.
  6306. " "2F2E7") "ViewEditGrob" ("\\->
  6307. at cursor
  6308. " "Views the grob currently edited in the
  6309. Editline near the cursor. If the
  6310. EditLine contains
  6311. GROB 10 10 FFFFFF...
  6312. move the cursor to the \"1\" of the first \"10\".
  6313. Then this entry point will display the grob.
  6314. " "2F2E0") "XLINE_SIZE?" ("ob \\-> flag
  6315. " "Checks if the cursor is outside the current
  6316. line. In the HP49G editor, you can move the
  6317. cursor further to the right than the line
  6318. length, without actually making the line
  6319. longer. The line gets extended only if you
  6320. actually insert text or use CMD_DEL to catch
  6321. to following line to the position. This
  6322. entry returns TRUE if it is not on or before
  6323. the newline. Note that it takes an arbitrary
  6324. object from the stack first - so put
  6325. something there before calling it.
  6326. " "2EF92") "<DelKey" ("\\-> {}
  6327. " "Returns the `\\<-DEL' menu key.
  6328. " "27F47") ">DelKey" ("\\-> {}
  6329. " "Returns the `DEL\\->' menu key.
  6330. " "27F9A") "<SkipKey" ("\\-> {}
  6331. " "Returns the `\\<-SKIP' menu key.
  6332. " "27EAF") ">SkipKey" ("\\-> {}
  6333. " "Returns the `SKIP\\->' menu key.
  6334. " "27EFB") "InitEd&Modes" ("\\->
  6335. " ":: InitEdLine InitEdModes ;
  6336. " "2EEE6") "InitEdLine" ("\\->
  6337. " " :: DEL_CMD ;
  6338. " "2EEE7") "InitEdModes" ("\\->
  6339. " "" "2EEE8") "SaveLastEdit" ("$ \\->
  6340. " "Calls CMD_STO if history is on.
  6341. " "2F05E") "CMDSTO" ("$ \\->
  6342. " "Adds string to the list of the last 4
  6343. commands, accessible with the `CMD' key.
  6344. " "2F326") "^EQW3" ("
  6345. " "" "010004") "^EQW3Code" ("
  6346. " "" "01D004") "^EQW3CursorOff" ("
  6347. " "" "01C004") "^EQW3CursorOn" ("
  6348. " "" "01B004") "^EQW3Edit" ("
  6349. " "" "011004") "^EQW3StartEdit" ("
  6350. " "" "012004") "^EQW3ViewLeft" ("
  6351. " "" "016004") "^EQW3ViewLeftX" ("
  6352. " "" "014004") "^EQW3ViewMargin" ("
  6353. " "" "013004") "^EQW3ViewRight" ("
  6354. " "" "017004") "^EQW3ViewRightRPL" ("
  6355. " "" "018004") "^EQW3ViewRightX" ("
  6356. " "" "015004") "DoNewEqw" ("
  6357. " "" "2F192") "DoNewMatrix" ("\\-> []/[[]]
  6358. " "Start matrix editor to enter a new matrix.
  6359. " "2F142") "^DoNewMatrixReal" ("\\-> []/[[]]
  6360. " "Start matrix editor to enter a real
  6361. matrix. ZINTs are converted to reals.
  6362. " "007007") "^DoNewMatrixCplx" ("\\-> []/[[]]
  6363. " "Start matrix editor to enter a complex
  6364. matrix. ZINTs and REALS are converted to
  6365. complex.
  6366. " "008007") "^DoNewMatrixRealOrCplx" ("[] \\-> [[]]
  6367. " "Will edit an array of either reals or complex
  6368. numbers.
  6369. " "00B007") "DoOldMatrix" ("[] \\-> []'
  6370. " "Edit an existing matrix.
  6371. " "2F13C") "^DoOldMatrixReal" ("[] \\-> []'
  6372. " "Edit an existing real matrix in the matrix
  6373. editor.
  6374. " "009007") "^DoOldMatrixCplx" ("[] \\-> []'
  6375. " "Edit an existing complex matrix in the matrix
  6376. editor.
  6377. " "00A007") "^RunDoNewMatrix" ("\\-> []/[[]]
  6378. " "Start matrix editor for new matrix.
  6379. " "006007") "^RunDoOldMatrix" ("[] \\-> []'
  6380. " "Edit any kind of Arry/matrix.
  6381. " "005007") "TOADISP" ("\\->
  6382. " "Sets the text display as the active.
  6383. " "26166") "TOGDISP" ("\\->
  6384. " "Sets the graphic display as the active.
  6385. " "2616B") "ABUFF" ("\\-> textgrob
  6386. " "Returns the text grob to the stack.
  6387. " "25FA4") "GBUFF" ("\\-> graphgrob
  6388. " "Returns the graphic grob to the stack.
  6389. The HP49 extable address for ExitAction! is
  6390. the same, but this must be a bug.
  6391. " "26076") "HARDBUFF" ("\\-> dispgrob
  6392. " "Returns the current grob to the stack.
  6393. " "2608F") "HARDBUFF2" ("\\-> menugrob
  6394. " "Returns the menu grob to the stack.
  6395. " "26094") "HARDHEIGHT" ("\\-> #height
  6396. " "Returns the height of HARDBUFF.
  6397. " "25EDE") "GBUFFGROBDIM" ("\\-> #height #width
  6398. " "Returns dimensions of graphic grob.
  6399. " "25ED5") "RECLAIMDISP" ("\\->
  6400. " "Activates the text grob, clears it and sets
  6401. the default size.
  6402. " "25EF4") "ClrDA1IsStat" ("\\->
  6403. " "Suspends clock display.
  6404. " "2EE7D") "MENUOFF?" ("\\-> flag
  6405. " "Returns TRUE if the menu grob is off.
  6406. " "2EEFD") "TURNMENUOFF" ("\\->
  6407. " "Turns off menu display, enlarges ABUFF to
  6408. fill screen.
  6409. " "2F034") "TURNMENUON" ("\\->
  6410. " "Turns menu grob on.
  6411. " "2F031") "MENUOFF" ("\\->
  6412. " "" "2EEFC") "GetHeader" ("\\-> #
  6413. " "Gets header size in lines (0-2).
  6414. " "26247") "SetHeader" ("# \\->
  6415. " "Sets header size in lines (0-2).
  6416. " "26283") "HEIGHTENGROB" ("grob #rows \\->
  6417. " "Heightens graph or text grob.
  6418. " "26099") "KILLGDISP" ("\\->
  6419. " "Clears graph display by setting it to
  6420. NULLGROB. See DOERASE.
  6421. " "260A3") "DOERASE" ("\\->
  6422. " "Erases the graphics display grob without
  6423. changing its size.
  6424. " "2EEF9") "SysDisplay" ("\\->
  6425. " "Redisplays all required areas. Does it
  6426. immediately, without waiting for the current
  6427. command to finish.
  6428. " "2EF67") "?DispCommandLine" ("\\->
  6429. " "Redisplays the command line now if necessary.
  6430. " "2F19F") "DispCommandLine" ("\\->
  6431. " "Redisplays the command line now.
  6432. " "2F19E") "DispEditLine" ("\\->
  6433. " "Just calls DispCommandLine.
  6434. " "2EE5A") "?DispMenu" ("\\->
  6435. " "Redisplays the menu now if no key is waiting
  6436. in the buffer. Even better is this:
  6437. :: DA3OK?NOTIT ?DispMenu ;
  6438. " "2DFCC") "DispMenu.1" ("\\->
  6439. " "Displays menu now.
  6440. " "2DFF4") "DispMenu" ("\\->
  6441. " ":: DispMenu.1 SetDAsValid ;
  6442. " "2DFE0") "?DispStack" ("\\->
  6443. " "Redisplays the stack now if necessary.
  6444. " "2C341") "?DispStatus" ("\\->
  6445. " "Redisplays the status area now if necessary.
  6446. " "2C311") "DispStatus" ("\\->
  6447. " "Displays the status area now.
  6448. " "2C305") "DispStsBound" ("\\->
  6449. " "Displays a horizontal line at y=14, normally
  6450. the separation between header and stack.
  6451. " "2C2F9") "DispTime?" ("
  6452. " "" "2EE5B") "DispTimeReq?" ("\\-> flag
  6453. " "Is time display required? Checks system flag
  6454. 40 and something else.
  6455. " "2A7F7") "ShowClk?" ("\\-> flag
  6456. " "Checks both DispTime? and DispTimeReq?.
  6457. " "048F9" :UBS) "DispILPrompt" ("\\->
  6458. " "Redisplays the QInputLineQ prompt,
  6459. i.e. refreshes the region between the command
  6460. line and the header during InputLine.
  6461. Requires a string (the prompt) in 4LAM.
  6462. " "2F300") "nDISPSTACK" ("$prompt #height #header flag flag \\->
  6463. " "Used by DispILPrompt.
  6464. " "26260") "ClrDA1OK" ("\\->
  6465. " "" "2EE8D" :NOSDIAG) "ClrDA2aOK" ("\\->
  6466. " "" "2EE8E" :NOSDIAG) "ClrDA2bOK" ("\\->
  6467. " "" "2EE8F" :NOSDIAG) "ClrDA2OK" ("\\->
  6468. " "" "2EE90" :NOSDIAG) "ClrDA3OK" ("\\->
  6469. " "" "2EE6E" :NOSDIAG) "ClrDAsOK" ("\\->
  6470. " "" "2EE6D" :NOSDIAG) "DA1OK?" ("\\-> flag
  6471. " "" "2EE62") "DA2aOK?" ("\\-> flag
  6472. " "" "2EE82" :UBS) "DA2bOK?" ("\\-> flag
  6473. " "" "2EE84" :UBS) "DA2OK?" ("\\-> flag
  6474. " "" "2EE86" :UBS) "DA3OK?" ("\\-> flag
  6475. " "" "2EE63") "DAsOK?" ("\\-> flag
  6476. " "" "2EE88" :UBS) "DA2aLess1OK?" ("\\-> flag
  6477. " "" "2EE66") "DA1OK?NOTIT" ("\\->
  6478. " "Does DA1OK?, NOT then IT.
  6479. " "2BF3A") "DA2aOK?NOTIT" ("\\->
  6480. " "DA2aOK?, NOT then IT.
  6481. " "2BF53") "DA2bOK?NOTIT" ("\\->
  6482. " "DA2bOK?, NOT then IT.
  6483. " "2BF6C") "DA3OK?NOTIT" ("\\->
  6484. " "Does DA3OK?, NOT then IT.
  6485. " "2BF85") "SetDA1Temp" ("\\->
  6486. " "" "2EE69" :NOSDIAG) "SetDA2aTemp" ("\\->
  6487. " "" "2EE8A" :NOSDIAG) "SetDA2bTemp" ("\\->
  6488. " "" "2EE6A" :NOSDIAG) "ClrDA2bTemp" ("\\->
  6489. " "" "2EEA7" :NOSDIAG) "SetDA2OKTemp" ("\\->
  6490. " "" "2F37A" :NOSDIAG) "SetDA3Temp" ("\\->
  6491. " "" "2EE6B" :NOSDIAG) "SetDA12Temp" ("\\->
  6492. " "" "2EE71" :NOSDIAG) "SetDAsTemp" ("\\->
  6493. " "" "2EE64" :NOSDIAG) "SetDA2aTempF" ("\\->
  6494. " "" "2EEA3" :UBS) "SetDA2bTempF" ("\\->
  6495. " "" "2EEA5" :NOSDIAG) "SetDA3TempF" ("\\->
  6496. " "" "2EEA9" :UBS) "SetDA1Valid" ("\\->
  6497. " "" "2EE67" :NOSDIAG) "SetDA2aValid" ("\\->
  6498. " "" "2EF98" :NOSDIAG) "SetDA2bValid" ("\\->
  6499. " "" "2EE68" :NOSDIAG) "SetDA2Valid" ("\\->
  6500. " "" "2EE91" :NOSDIAG) "SetDA3Valid" ("\\->
  6501. " "" "2EF99" :NOSDIAG) "SetDAsValid" ("\\->
  6502. " "" "2EE92" :UBS) "SetDA1ValidF" ("\\->
  6503. " "" "2EE97" :UBS) "SetDA3ValidF" ("\\->
  6504. " "" "2EEA0" :NOSDIAG) "SetDA1Bad" ("\\->
  6505. " "" "2EE78" :NOSDIAG) "ClrDA1Bad" ("\\->
  6506. " "" "2EE74" :NOSDIAG) "DA1Bad?" ("\\-> flag
  6507. " "" "2EEB0" :NOSDIAG) "SetDA2aBad" ("\\->
  6508. " "" "2EE79" :NOSDIAG) "SetDA2aBadT" ("\\-> T
  6509. " "( SetDA2aBad TRUE )
  6510. " "2EE83" :UBS) "ClrDA2aBad" ("\\->
  6511. " "" "2EE75" :NOSDIAG) "DA2aBad?" ("\\-> flag
  6512. " "" "2EEB1" :NOSDIAG) "SetDA2bBad" ("\\->
  6513. " "" "2EE7A" :NOSDIAG) "SetDA2bBadT" ("\\-> T
  6514. " "( SetDA2bBad TRUE )
  6515. " "2EE85" :UBS) "ClrDA2bBad" ("\\->
  6516. " "" "2EEB3" :NOSDIAG) "DA2bBad?" ("\\-> flag
  6517. " "" "2EEB2" :NOSDIAG) "SetDA3Bad" ("\\->
  6518. " "" "2EE7B" :NOSDIAG) "SetDA3BadT" ("\\-> T
  6519. " "( SetDA3Bad TRUE )
  6520. " "2EE87" :UBS) "ClrDA3Bad" ("\\->
  6521. " "" "2EEB5" :NOSDIAG) "DA3Bad?" ("\\-> flag
  6522. " "" "2EEB4" :NOSDIAG) "SetDA1NoCh" ("\\->
  6523. " "" "2EE72" :NOSDIAG) "DA1NoCh?" ("\\-> flag
  6524. " "" "2EEBA" :UBS) "SetDA2aNoCh" ("\\->
  6525. " "" "2EE73" :NOSDIAG) "DA2aNoCh?" ("\\-> flag
  6526. " "" "2EEB9" :UBS) "SetDA2bNoCh" ("\\->
  6527. " "" "2EE76" :NOSDIAG) "ClrDA2bNoCh" ("\\->
  6528. " "" "2EE81" :NOSDIAG) "DA2bNoCh?" ("\\-> flag
  6529. " "" "2EEB7" :NOSDIAG) "SetDA2NoCh" ("\\->
  6530. " "" "2EE93" :NOSDIAG) "SetDA12NoCh" ("\\->
  6531. " "" "2EE6F" :NOSDIAG) "SetDA3NoCh" ("\\->
  6532. " "" "2EE77" :NOSDIAG) "ClrDA3NoCh" ("\\->
  6533. " "" "2EEB6" :UBS) "SetDA13NoCh" ("\\->
  6534. " "" "2EE70" :NOSDIAG) "SetDA23NoCh" ("\\->
  6535. " "" "2EE94" :NOSDIAG) "SetDA12a3NoCh" ("\\->
  6536. " "" "2EE65" :NOSDIAG) "SetDA12a3NCh" ("\\->
  6537. " "" "2EE65" :NOSDIAG) "SetDA123NoCh" ("\\->
  6538. " "" "2F379" :NOSDIAG) "SetDAsNoCh" ("\\->
  6539. " "" "2EE7C" :NOSDIAG) "SetDA2aEcho" ("\\->
  6540. " "" "2EE6C" :NOSDIAG) "SetDA1IsStat" ("\\->
  6541. " "" "2EEAC" :NOSDIAG) "SetNoRollDA2" ("\\->
  6542. " "" "2EEAE" :NOSDIAG) "ClrNoRollDA2" ("\\->
  6543. " "" "2EEAF" :NOSDIAG) "NoRollDA2?" ("\\-> flag
  6544. " "" "2EEAD" :UBS) "DA1IsStatus?" ("\\-> flag
  6545. " "" "2EEAB" :NOSDIAG) "SetDA2bIsEdL" ("\\->
  6546. " "" "2EE7F" :NOSDIAG) "DA2bIsEdL?" ("\\-> flag
  6547. " "" "2EE7E" :NOSDIAG) "ClrDA2bIsEdL" ("\\->
  6548. " "" "2EE80" :NOSDIAG) "MENoP&FixDA1" ("
  6549. " "" "2EE8B" :NOSDIAG) "MENP&FixDA12" ("
  6550. " "" "2EF59" :NOSDIAG) "Ck&Freeze" ("% \\->
  6551. " "Internal FREEZE.
  6552. " "25EA8") "BLANKIT" ("#startrow #rows \\->
  6553. " "Clears #rows from HARDBUFF, starting at
  6554. #startrow.
  6555. " "25E7E") "CLEARVDISP" ("\\->
  6556. " "Clears HARDBUFF.
  6557. " "26021") "Clr8" ("\\->
  6558. " "Clears top eight rows (first status line).
  6559. " "2EED4") "Clr8-15" ("\\->
  6560. " "Clears 2nd status line.
  6561. " "2EED5") "Clr16" ("\\->
  6562. " "Clears top 16 rows.
  6563. " "2F15E") "BlankDA1" ("\\->
  6564. " "Clears status area from HARDBUFF.
  6565. " "2EF5E") "BlankDA2a" ("\\->
  6566. " "Clears display area DA2a.
  6567. " "2F31C") "BlankDA2" ("\\->
  6568. " "Clears display areas DA2a and DA2b.
  6569. " "2F31B") "BlankDA12" ("\\->
  6570. " "Clears display areas DA1 and DA2
  6571. " "2EE5C") "CLCD10" ("\\->
  6572. " "Clears status and stack areas.
  6573. " "261C0") "CLEARLCD" ("\\->
  6574. " "Clears whole display.
  6575. " "261C5") "DOCLLCD" ("\\->
  6576. " "Like user word <REF>CLLCD.
  6577. " "2EF05") "SetLeftAnn" ("\\->
  6578. " "Sets left-shift annunciator.
  6579. " "2613E") "ClrLeftAnn" ("\\->
  6580. " "Clears left-shift annunciator.
  6581. " "2603A") "SetRightAnn" ("\\->
  6582. " "Sets right-shift annunciator.
  6583. " "26148") "ClrRightAnn" ("\\->
  6584. " "Clears right-shift annunciator.
  6585. " "2603F") "SetAlphaAnn" ("\\->
  6586. " "Sets alpha annunciator.
  6587. " "26139") "ClrAlphaAnn" ("\\->
  6588. " "Clears alpha annunciator.
  6589. " "26035") "LockAlpha" ("\\->
  6590. " "Sets alpha mode, annunciators, etc.
  6591. " "25EE9") "UnLockAlpha" ("\\->
  6592. " "Clears alpha mode, annunciators, etc.
  6593. " "25F08") "ClrBusyAnn" ("\\->
  6594. " "Clears the busy annunciator.
  6595. " "2649F" :UBS) "ClrI/OAnn" ("\\->
  6596. " "" "264A4" :UBS) "SetPrgmEntry" ("\\->
  6597. " "Sets program-entry mode.
  6598. " "26143") "ClrPrgmEntry" ("\\->
  6599. " "Clears program-entry mode.
  6600. " "264F4" :UBS) "PrgmEntry?" ("\\-> flag
  6601. " "Is program-entry mode set?
  6602. " "2610C") "LOWERCASE?" ("\\-> flag
  6603. " "Is the flag for lowercase letter entry set?
  6604. " "25726" :UBS) "SETLOWERCASE" ("\\->
  6605. " "Set the flag for lowercase letter entry.
  6606. " "2572B" :UBS) "CLRLOWERCASE" ("\\->
  6607. " "Clear the flag for lowercase letter entry.
  6608. " "25730" :UBS) "TOGLOWERCASE" ("\\->
  6609. " "Toggle the flag for lowercase letter entry.
  6610. " "25738" :UBS) "Do1st/2nd+:" ("\\-> :: <ob1> ; (PRG mode)
  6611. \\-> :: <ob2> <rest> ; (no PRG mode)
  6612. " "If in program mode, executes the next object
  6613. after it. If not in program mode, executes
  6614. the rest of the stream starting at the second
  6615. object after it.
  6616. " "25EBE") "SetAlgEntry" ("\\->
  6617. " "Sets algebraic-entry mode.
  6618. " "25719") "ClrAlgEntry" ("\\->
  6619. " "Clears algebraic-entry mode.
  6620. " "2571E") "AlgEntry?" ("\\-> flag
  6621. " "Is algebraic-entry mode set?
  6622. " "256EA") "ImmedEntry?" ("\\-> flag
  6623. " "Returns TRUE if immediate-entry mode
  6624. (program and algebraic-entry modes cleared).
  6625. " "25EDF") "?ClrAlg" ("\\->
  6626. " "Clears AlgEntry mode if set.
  6627. " "25E74") "?ClrAlgSetPr" ("\\->
  6628. " "Clears AlgEntry mode if set and sets
  6629. ProgramEntry mode.
  6630. " "25E75") "TOP8" ("\\-> HBgrob #x1 #y #x1+131 #y1+8
  6631. " "Returns coordinates of first status line.
  6632. " "2F384") "Rows8-15" ("\\-> HBgrob #x1 #y1+8 #x1+131 #y1+16
  6633. " "Returns coordinates of second status line.
  6634. " "2F36C") "TOP16" ("\\-> HBgrob #x1 #y1 #x1+131 #y1+16
  6635. " "Returns coordinates of status area.
  6636. " "2F383") "WINDOWCORNER" ("\\-> #y #x
  6637. " "Gets coordinates of corner of window. Note
  6638. the order of #x and #y.
  6639. " "2617F") "HBUFF_X_Y" ("\\-> HBgrob #x #y
  6640. " "Returns current grob and window coordinates.
  6641. " "2EED6") "LEFTCOL" ("\\-> #x
  6642. " "Gets x-coordinate of left column.
  6643. " "2F352") "RIGHTCOL" ("\\-> #x
  6644. " "Gets x-coordinate of right column.
  6645. " "2F36B") "TOPROW" ("\\-> #y
  6646. " "Gets y-coordinate of top row.
  6647. " "2F385") "BOTROW" ("\\-> #y
  6648. " "Gets y-coordinate of bottom row.
  6649. " "2F31D") "WINDOWXY" ("#y #x \\->
  6650. " "Sets corner coordinates. The name really
  6651. should be WINDOWYX
  6652. " "26198") "WINDOWUP" ("\\->
  6653. " "Moves display one pixel up.
  6654. " "26193") "WINDOWDOWN" ("\\->
  6655. " "Moves display one pixel down.
  6656. " "26184") "WINDOWLEFT" ("\\->
  6657. " "Moves display one pixel left.
  6658. " "26189") "WINDOWRIGHT" ("\\->
  6659. " "Moves display one pixel right.
  6660. " "2618E") "SCROLLUP" ("\\->
  6661. " "Moves display one pixel up, checks for
  6662. corresponding key being pressed.
  6663. " "2F370") "SCROLLDOWN" ("\\->
  6664. " "Moves display one pixel down, checks for
  6665. corresponding key being pressed.
  6666. " "2F36D") "SCROLLLEFT" ("\\->
  6667. " "Moves display one pixel left, checks for
  6668. corresponding key being pressed.
  6669. " "2F36E") "SCROLLRIGHT" ("\\->
  6670. " "Moves display one pixel right, checks for
  6671. corresponding key being pressed.
  6672. " "2F36F") "JUMPTOP" ("\\->
  6673. " "Jumps to top of display.
  6674. " "2F34A") "JUMPBOT" ("\\->
  6675. " "Jumps to bottom of display.
  6676. " "2F347") "JUMPLEFT" ("\\->
  6677. " "Jumps to left of display.
  6678. " "2F348") "JUMPRIGHT" ("\\->
  6679. " "Jumps to right of display.
  6680. " "2F349") "WINDOWTOP?" ("\\-> flag
  6681. " "Is window at the top?
  6682. " "2F38D") "WINDOWBOT?" ("\\-> flag
  6683. " "Is window at the bottom?
  6684. " "2F38A") "WINDOWLEFT?" ("\\-> flag
  6685. " "Is window at the left?
  6686. " "2F38B") "WINDOWRIGHT?" ("\\-> flag
  6687. " "Is window at the right?
  6688. " "2F38C") "ViewObject" ("ob \\->
  6689. " "" "2F21D") "ViewStrObject" ("flag $ \\-> F
  6690. " "Flag decides if it should be possible to
  6691. toggle TEXT/GRAPH.
  6692. " "2F21E") "ViewGrobObject" ("flag grob \\-> F
  6693. " "Flag decides if it should be possible to
  6694. toggle TEXT/GRAPH.
  6695. " "2F21F") "sstDISP" ("ob \\->
  6696. " "Displays ob in status line. Used for single
  6697. stepping during debugging.
  6698. " "25F12") "^SCROLLext" ("grob \\->
  6699. " "Launches PICT environment.
  6700. " "0C1007" :wasCSys) "WINDOW#" ("#x #y \\->
  6701. " "Internal PVIEW, displays PICT starting at the
  6702. given coordinates.
  6703. " "2EF61") "DODISP" ("ob %row \\->
  6704. " "Displays any object in specified row.
  6705. " "25EB4") "BIGDISPROW1" ("$ \\->
  6706. " "" "25FB8") "DISP@01" ("$ \\->
  6707. " "" "25FB8") "DISPROW1" ("$ \\->
  6708. " "" "25FB8") "DISPROW1*" ("$ \\->
  6709. " "Displays relative to window corner.
  6710. " "25EAB") "^DISPROW1_plus" ("$ \\->
  6711. " "Only useful on ROM 1.22-2.0! Deprecated since
  6712. ROM 2.0!
  6713. Write text to the first line of the extended
  6714. header on the 49G+ (pixel rows 1-8). This
  6715. messes up the second row, so this entry
  6716. should only be used together with
  6717. DISPROW2_plus. A good way to automatically
  6718. do the right thing is DISPSTATUS2.
  6719. " "0C8002" :UBS :1\.22) "BIGDISPROW2" ("$ \\->
  6720. " "" "25FBD") "DISP@09" ("$ \\->
  6721. " "" "25FBD") "DISPROW2" ("$ \\->
  6722. " "" "25FBD") "DISPROW2*" ("$ \\->
  6723. " "Displays relative to window corner.
  6724. " "25EAC") "^DISPROW2_plus" ("$ \\->
  6725. " "Only useful in ROM 1.22-2.0! Deprecated since
  6726. ROM 2.0!
  6727. Write text to the second line of the extended
  6728. header on the 49G+ (pixel rows 9-16). Should
  6729. be used together with DISPROW1_plus.
  6730. " "0C9002" :UBS :1\.22) "BIGDISPROW3" ("$ \\->
  6731. " "" "25FC2") "DISP@17" ("$ \\->
  6732. " "" "25FC2") "DISPROW3" ("$ \\->
  6733. " "" "25FC2") "BIGDISPROW4" ("$ \\->
  6734. " "" "25FC7") "DISP@25" ("$ \\->
  6735. " "" "25FC7") "DISPROW4" ("$ \\->
  6736. " "" "25FC7") "DISPROW5" ("$ \\->
  6737. " "" "25FCC") "DISPROW6" ("$ \\->
  6738. " "" "261F7") "DISPROW7" ("$ \\->
  6739. " "" "25FD1") "DISPROW8" ("$ \\->
  6740. " "May not be possible depending on the size of
  6741. the font and whether the menu is on or off.
  6742. " "25FD6") "DISPROW9" ("$ \\->
  6743. " "May not be possible depending on the size of
  6744. the font and whether the menu is on or off.
  6745. " "25FDB") "DISPROW10" ("$ \\->
  6746. " "May not be possible depending on the size of
  6747. the font and whether the menu is on or off.
  6748. " "25FE0") "BIGDISPN" ("$ #row \\->
  6749. " "" "25FB3") "DISPN" ("$ #row \\->
  6750. " "" "25FB3") "Disp5x7" ("$ #start #max \\->
  6751. " "Displays string on multiple lines, starting
  6752. at #start and no using more than #max
  6753. rows. New lines must be manually
  6754. specified. Segments longer than 22 characters
  6755. are truncated and appended with \"...\".
  6756. " "25EBC") "Save16" ("\\-> grob
  6757. " "Returns top 16 rows.
  6758. " "2F038" :UBS) "Save16Patch" ("\\-> grob
  6759. " "Get the Header area as a grob. On the 49G+,
  6760. this gets the extra 16 lines of the screen.
  6761. On a machine with small screen (48gII,49G),
  6762. this is equivalent to Save16. Also, starting
  6763. from ROM 2.0, this again just calls Save16.
  6764. " "2F3CF" :UBS :1\.22) "Restore16" ("grob \\->
  6765. " "Restores top 16 rows.
  6766. " "2F3B6" :UBS) "Rest16Patch" ("grob \\->
  6767. " "Display grob in the top 16 rows of the
  6768. display. This works with the extended screen
  6769. on the 49G+ - on a smaller screen, it is
  6770. equivalent to Restore16. Also, starting from
  6771. ROM 2.0, this again just calls Restore16.
  6772. " "2F3D0" :UBS :1\.22) "DISPSTATUS2" ("$ \\->
  6773. " "Displays message in status area using two
  6774. lines.
  6775. " "25EAD") "DoPrompt" ("$ \\->
  6776. " "DISPSTATUS2 and freeze status area.
  6777. " "38C00" :UBS) "DispCoord1" ("$ \\->
  6778. " "Displays $ in menu grob using minifont.
  6779. " "2EEFF") "DISPCOORD2" ("$ \\->
  6780. " "Displays $ in menu grob using minifont and
  6781. waits for a key. Then refreshes menu
  6782. display.
  6783. " "2F32B") "DISPLASTROW" ("$ \\->
  6784. " "Displays $ in the last stack display row,
  6785. just above the menu.
  6786. " "25FE5") "DISPLASTROWBUT1" ("$ \\->
  6787. " "Displays $ in the last stack display row. If
  6788. menu is turned on it can cover displayed
  6789. text.
  6790. " "25FEA") "FlashMsg" ("$ \\->
  6791. " "Displays message in status area, then
  6792. restores it to normal.
  6793. " "25ED4") "FlashWarning" ("$ \\->
  6794. " "Displays message in a message box and
  6795. beeps. Waits for OK to be pressed.
  6796. " "2EE61") "AskQuestion" ("$ \\-> flag
  6797. " "Use the string to ask the user a question
  6798. with yes/no in a choose box. If you prefer a
  6799. YES/NO menu, this can be implemented like
  6800. this, using ~DoMsgBox:
  6801. ::
  6802. 15 10 (BINTs, don't know what they do)
  6803. MINUSONE (could also be a grob)
  6804. '
  6805. ::
  6806. NoExitAction
  6807. { NullMenuKey NullMenuKey
  6808. NullMenuKey NullMenuKey
  6809. { \"NO\" :: TakeOver FALSETRUE 2PUTLAM ; }
  6810. { \"YES\" :: TakeOver TrueTrue 2PUTLAM ; }
  6811. }
  6812. ;
  6813. ROMPTR2 ~DoMsgBox
  6814. ;
  6815. " "2F1A5") "^DoAlert" ("$ \\->
  6816. " "Displays alert messagebox, a message box with
  6817. a little alert grob in the upper left corner.
  6818. " "02E002") "DoWarning" ("$ \\->
  6819. " "Displays message, beeps and freezes status
  6820. area.
  6821. " "2EE60") "^Ck&DoMsgBox" ("$ \\->
  6822. " "Displays a message box and waits for the user
  6823. to press OK.
  6824. " "007002") "~DoMsgBox" ("$ #x #y grob menu \\-> T
  6825. " "Displays a message box with a grob in the
  6826. upper left corner and the specified menu.
  6827. If no grob is desired, use MINUSONE.
  6828. The meaning of #x and #y is unclear - it
  6829. seems that any BINT will do.
  6830. " "0000B1") "~MsgBoxMenu" ("\\-> {}
  6831. " "The messsage box menu, with just the OK key.
  6832. " "0040B1") "FONT>" ("\\-> font
  6833. " "Recalls system font.
  6834. " "2621A") "MINIFONT>" ("\\-> minifont
  6835. " "Recalls the current minifont.
  6836. " "2625B") ">FONT" ("font \\->
  6837. " "Sets system font.
  6838. " "25F15") ">MINIFONT" ("minifont \\->
  6839. " "Sets the current minifont.
  6840. " "2620B") "StackLineHeight" ("\\-> #
  6841. " "Returns height of text grob minus size of
  6842. header and menu.
  6843. " "26288") "StackFontHeight" ("\\-> #
  6844. " "Returns stack font height (used for display
  6845. stack rows).
  6846. " "26242") "GetFontStkHeight" ("\\-> #
  6847. " "Returns stack font height (used for display
  6848. stack rows).
  6849. " "26242") "GetFontCmdHeight" ("\\-> #
  6850. " "Returns command line font height (used for
  6851. editing objects).
  6852. " "26238") "GetFontHeight" ("\\-> #
  6853. " "Returns system font height.
  6854. " "2623D") "CHECK_SCAN_FONT" ("
  6855. " "" "26210") "DOMINIFONT" ("
  6856. " "" "026FE") "^" ("" "Uses the File Manager to search for fonts.
  6857. " "06F004") "FSCANFONT" ("
  6858. " "" "2621F") "INITMKFONT" ("
  6859. " "" "26256") "Init_MetaKernelFont" ("
  6860. " "" "26904" :ML) "SCANFONT" ("
  6861. " "" "2627E") "NULLPAINT" ("\\-> grob
  6862. " "0x0 Null grob
  6863. " "27AA3" :UBS) "CROSSGROB" (" \\-> grob
  6864. . 48G: 5053C
  6865. " "5x5 Cross cursor (\"+\")
  6866. " "27D3F") "MARKGROB" (" \\-> grob
  6867. . 48G: 5055A
  6868. " "5x5 Mark symbol (\"x\")
  6869. " "27D5D") "NullMenuLbl" ("21x8 normal menu key
  6870. " "" "27D7B" :UBS) "InvLabelGrob" ("21x8 inverse menu key
  6871. " "" "2E25C" :UBS) "StdBaseLabel" ("21x8 inverted nomal menu key grob
  6872. " "" "279F6" :UBS) "BoxLabelGrobInv" ("21x8 inverted box label grob
  6873. " "" "2E198" :UBS) "DirLabelGrobInv" ("21x8 inverted DIR label grob
  6874. " "" "2E1FA" :UBS) "~grobAlertIcon" ("9x9 Alert grob
  6875. " "" "0860B0") "~grobCheckKey" ("21x8 Check Key menu grob
  6876. " "A tickmark and \"CHK\" in a menu grob.
  6877. " "0870B0") "GROBDIM" ("grob \\-> #height #width
  6878. " "" "26085") "DUPGROBDIM" ("grob \\-> grob #height #width
  6879. " "" "25EBB") "GROBDIMw" ("grob \\-> #width
  6880. " "" "36C68") "CKGROBFITS" ("g1 g2 #n #m \\-> g1 g2' #n #m
  6881. " "Shrinks g2 if it does not fit in g1.
  6882. " "2F324") "CHECKHEIGHT" ("grob #height \\->
  6883. " "Forces grob (ABUFF/GBUFF) to be at least 64
  6884. rows high.
  6885. " "2F320") "GROB!" ("grob1 grob2 #x #y \\->
  6886. " "Stores grob1 into grob2. Bang type.
  6887. " "2607B") "GROB+" ("grob1 grob2 \\-> grob
  6888. " "Combines two grobs using bitwise QORQ. Errors
  6889. when grobs have different sizes.
  6890. " "2EFDB" :UBS) "GROB+#" ("flag grob1 grob2 #x #y \\-> grob'
  6891. " "Inserts grob2 into the specified position of
  6892. grob1, using QORQ (if flag is TRUE) or QXORQ (if
  6893. flag is FALSE). Does all necessary checks first.
  6894. " "2F342") "GROB!ZERO" ("grob #x1 #y1 #x2 #y2 \\-> grob'
  6895. " "Blanks a rectangular region of the grob. Bang
  6896. type.
  6897. " "26080") "GROB!ZERODRP" ("grob #x1 #y1 #x2 #y2 \\->
  6898. " "Blanks a rectangular region of the
  6899. grob. Probably only useful if grob is the
  6900. text or graphics grob (see section on
  6901. display-organization). Bang type.
  6902. " "368E7") "SUBGROB" ("grob #x1 #y1 #x2 #y2 \\-> grob'
  6903. " "Returns specified portion of grob.
  6904. " "2612F") "XYGROBDISP" ("#x #y grob \\->
  6905. " "Stores grob in QHARDBUFFQ with upper left
  6906. corner at (#x,#y). QHARDBUFFQ is expanded if
  6907. necessary.
  6908. " "25F0E") "GROB>GDISP" ("grob \\->
  6909. " "Stores new graph grob.
  6910. " "25ED8") "MAKEGROB" ("#height #width \\-> grob
  6911. " "Creates a blank grob.
  6912. " "260B2") "MAKEPICT#" ("#w #h \\->
  6913. " "Creates blank graph grob. Minimum size is
  6914. 131x64. Smaller grobs will be automatically
  6915. resized.
  6916. " "2F0DB") "INVGROB" ("grob \\-> grob'
  6917. " "Inverts grob data bits. Bang type.
  6918. " "2609E") "PIXON" ("#x #y \\->
  6919. " "Sets pixel in text grob.
  6920. " "260E4") "PIXOFF" ("#x #y \\->
  6921. " "Clears pixel in text grob.
  6922. " "260DF") "PIXON?" ("#x #y \\-> flag
  6923. " "Is pixel in text grob on?
  6924. " "260EE") "PIXON3" ("#x #y \\->
  6925. " "Sets pixel in graph grob.
  6926. " "260DA") "PIXOFF3" ("#x #y \\->
  6927. " "Clears pixel in graph grob.
  6928. " "260D5") "PIXON?3" ("#x #y \\-> flag
  6929. " "Is pixel in graph grob on?
  6930. " "260E9") "ORDERXY#" ("#x1 #y1 #x2 #y2 \\-> #x1' #y1' #x2' #y2'
  6931. " "Orders the bints to be appropriate for
  6932. defining a rectangle in a grob. Swaps #x1
  6933. and #x2 if #x2<#x1. Swaps #y1 and #y2 if
  6934. #y2<#y1.
  6935. " "280C1") "ORDERXY%" ("%x1 %y1 %x2 %y2 \\-> %x1' %y1' %x2' %y2'
  6936. " "ORDERXY# with real numbers.
  6937. " "280F8") "LINEON" ("#x1 #y1 #x2 #y2 \\->
  6938. " "Draws a line in text grob.
  6939. " "2EF9F") "LINEOFF" ("#x1 #y1 #x2 #y2 \\->
  6940. " "Clears a line in text grob.
  6941. " "2EFA0") "TOGLINE" ("#x1 #y1 #x2 #y2 \\->
  6942. " "Toggles a line in text grob.
  6943. " "2EFA1") "LINEON3" ("#x1 #y1 #x2 #y2 \\->
  6944. " "Draws a line in graph grob.
  6945. " "2EFA2") "DRAWLINE#3" ("#x1 #y1 #x2 #y2 \\->
  6946. " "Draws a line in graph grob. x1<x2 is not
  6947. required.
  6948. " "2F13F") "LINEOFF3" ("#x1 #y1 #x2 #y2 \\->
  6949. " "Clears a line in graph grob.
  6950. " "2EFA3") "TOGLINE3" ("#x1 #y1 #x2 #y2 \\->
  6951. " "Toggles a line in graph grob.
  6952. " "2EFA4") "TOGGLELINE#3" ("#x1 #y1 #x2 #y2 \\->
  6953. " "Toggles line in graph grob. x1<x2 is not
  6954. required.
  6955. " "2F382") "DRAWBOX#" ("#x1 #y1 #x2 #y2 \\->
  6956. " "Draws rectangle in graph grob.
  6957. " "2F32C") "DOLCD>" ("\\-> grob
  6958. " "Returns current display.
  6959. " "2EF03") "DO>LCD" ("grob \\->
  6960. " "Grob to display.
  6961. " "2EF04") "^GROBADDext" ("grob2 grob1 \\-> grob
  6962. " "Vertical grob addition.
  6963. grob2 will be above grob1.
  6964. " "0BF007" :wasCSys) "SubRepl" ("grb1 grb2 #x1 #y1 #x2 #y2 #W #H \\-> grb1'
  6965. " "Replace a part of grb1 with a part of
  6966. grb2 in QREPLACEQ mode.
  6967. " "25592") "SubGor" ("grb1 grb2 #x1 #y1 #x2 #y2 #W #H \\-> grb1'
  6968. " "Replace a part of grb1 with a part of
  6969. grb2 in QORQ mode.
  6970. " "25597") "SubGxor" ("grb1 grb2 #x1 #y1 #x2 #y2 #W #H \\-> grb1'
  6971. " "Replace a part of grb1 with a part of
  6972. rgb2 in QXORQ mode.
  6973. " "2559C") "LineW" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  6974. " "Draw a white line.
  6975. " "25565") "LineG1" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  6976. " "Draw a light grey line.
  6977. " "2556F") "LineG2" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  6978. " "Draw a dark grey line.
  6979. " "25574") "LineB" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  6980. " "Draw a black line.
  6981. " "2556A") "LineXor" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  6982. " "QXORQ a line.
  6983. " "25579") "CircleW" ("grb #Cx #Cy #r \\-> grb'
  6984. " "Draw a white circle.
  6985. " "2F218") "CircleG1" ("grb #Cx #Cy #r \\-> grb'
  6986. " "Draw a light grey circle.
  6987. " "2F216") "CircleG2" ("grb #Cx #Cy #r \\-> grb'
  6988. " "Draw a dark grey circle.
  6989. " "2F217") "CircleB" ("grb #Cx #Cy #r \\-> grb'
  6990. " "Draw a black circle
  6991. " "2F215") "CircleXor" ("grb #Cx #Cy #r \\-> grb'
  6992. " "QXORQ a circle.
  6993. " "2F219") "Sub" ("grb #x1 #y1 #x2 #y2 \\-> grb' flag
  6994. " "Get a part of a grob.
  6995. " "2557E") "Repl" ("grb1 grb2 #x #y \\-> grb1'
  6996. " "Copy grb2 into grb1 in QREPLACEQ mode.
  6997. " "25583") "Gor" ("grb1 grb2 #x #y \\-> grb1'
  6998. " "Copy grb2 into grb1 in QORQ mode.
  6999. " "25588") "Gxor" ("grb1 grb2 #x #y \\-> grb1'
  7000. " "Copy grb2 into grb1 in QXORQ mode.
  7001. " "2558D") "Grey?" ("grob \\-> flag
  7002. " "Is grob a Greyscale Grob?
  7003. " "255A1") "ScrollVGrob" ("grb #W #X #Yd #Ys #h \\-> grb'
  7004. " "Scroll up and down a portion of a
  7005. graphical object.
  7006. " "255B0") "PixonW" ("grb #x #y \\-> grb'
  7007. " "Make a pixel white.
  7008. " "255BA") "PixonG1" ("grb #x #y \\-> grb'
  7009. " "Make a pixel light grey.
  7010. " "255C4") "PixonG2" ("grb #x #y \\-> grb'
  7011. " "Make a pixel dark grey.
  7012. " "255C9") "PixonB" ("grb #x #y \\-> grb'
  7013. " "Make a pixel black.
  7014. " "255BF") "PixonXor" ("grb #x #y \\-> grb'
  7015. " "Apply QXORQ to a pixel.
  7016. " "255CE") "FBoxW" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7017. " "Make a white filled rectangle.
  7018. " "255D3") "FBoxG1" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7019. " "Make a light grey filled rectangle.
  7020. " "255D3") "FBoxG2" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7021. " "Make a dark grey filled rectangle.
  7022. " "255D8") "FBoxB" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7023. " "Make a black filled rectangle.
  7024. " "255DD") "FBoxXor" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7025. " "Apply QXORQ to a filled rectangle.
  7026. " "255E2") "LBoxW" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7027. " "Draw a white rectangle.
  7028. " "255E7") "LBoxG1" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7029. " "Draw a light grey rectangle.
  7030. " "255EC") "LBoxG2" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7031. " "Draw a dark grey rectangle.
  7032. " "255F1") "LBoxB" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7033. " "Draw a black rectangle.
  7034. " "255F6") "LBoxXor" ("grb #x1 #y1 #x2 #y2 \\-> grb'
  7035. " "Apply QXORQ to a rectangle.
  7036. " "255FB") "ToGray" ("grb \\-> grb'/grb
  7037. " "Convert a B&W grob to Greyscale.
  7038. " "2F21B") "Dither" ("grb \\-> grb'/grb
  7039. " "Convert a greyscale grob to B&W
  7040. " "2F21A") "Distance" ("#\\GDx #\\GDy \\-> #SQRT(\\GDx^2+\\GDy^2)
  7041. " "Compute the distance between two
  7042. points.
  7043. " "255B5") "MakeStdLabel" ("$ \\-> grob
  7044. " "Makes standard menu label.
  7045. " "2E166") "MakeBoxLabel" ("$ \\-> grob
  7046. " "Makes label with a box.
  7047. " "2E189") "MakeDirLabel" ("$ \\-> grob
  7048. " "Makes directory label.
  7049. " "2E1EB") "MakeDir/StdLabel" ("ob \\-> grob
  7050. " "Makes directory label if ob is a directory
  7051. (rrp), otherwise calls MakeStdLabel.
  7052. " "2E139" :UBS) "MakeInvLabel" ("$ \\-> grob
  7053. " "Makes inverse label.
  7054. " "2E24D") "Box/StdLabel" ("$ flag \\-> grob
  7055. " "If TRUE makes box label, otherwise makes
  7056. standard label.
  7057. " "25E7F") "Std/BoxLabel" ("$ flag \\-> grob
  7058. " "If TRUE makes standard label, otherwise makes
  7059. box label.
  7060. " "25F01") "Box/StdLbl:" ("\\-> grob
  7061. " "Does Box/StdLabel with the next two objects
  7062. from the stream.
  7063. Usage: :: Box/StdLbl: $ <test> ;
  7064. " "25E80") "Grob>Menu" ("#col grob \\->
  7065. " "Displays grob as menu label.
  7066. " "2E0D5") "Str>Menu" ("#col $ \\->
  7067. " "Displays string as menu label.
  7068. " "2E0F3") "Id>Menu" ("#col id \\->
  7069. " "Displays id as menu label.
  7070. " "2E11B") "Seco>Menu" ("#col :: \\->
  7071. " "Does EVAL then DoLabel.
  7072. " "2E107") "DoLabel" ("#col ob \\->
  7073. " "If ob is of one of the supported types,
  7074. displays a menu label. If not, generates a
  7075. \"Bad Argument Type\" error.
  7076. " "25886") "StdLabelDef" ("#col grob \\->
  7077. #col $ \\->
  7078. #col id \\->
  7079. #col :: \\->
  7080. " "Works by dispatching the object type.
  7081. " "2E094" :UBS) "$>GROB" ("$ \\-> grob
  7082. " "Makes grob of the string using the system
  7083. font. Linefeed does *not* make new line.
  7084. " "25F7C") "$>GROBCR" ("$ \\-> grob
  7085. " "Makes grob of the string using the system
  7086. font. Linefeed *does* make new line.
  7087. " "25F86") "$>grob" ("$ \\-> grob
  7088. " "Makes grob of the string using the minifont.
  7089. Linefeed does *not* make new line.
  7090. " "25F81") "$>grobCR" ("$ \\-> grob
  7091. " "Makes grob of the string using the minifont.
  7092. Linefeed *does* make new line.
  7093. " "25F8B") "~$>grobOrGROB" ("$ \\-> grob
  7094. " "Converts string to a grob using either the
  7095. current font or the minifont, depending on
  7096. system flag 90.
  7097. " "05F0B3" :UBS) "RIGHT$3x6" ("$ #n \\-> flag grob
  7098. " "Transforms string into grob (using the
  7099. minifont), then takes all characters starting
  7100. after column #n. flag is FALSE if #n is
  7101. greater than the width of the grob. In this
  7102. QcaseQ, the whole grob is returned.
  7103. " "25F24") "CENTER$3x5" ("grob #x #y $ #w \\-> grob'
  7104. " "Creates grob from string (using the minifont)
  7105. and embeds it at specified position (#x, #y).
  7106. The grob is centered around #x and the to is
  7107. put at #y. #w represents the maximum width of
  7108. the grob created. If the text is wider, it is
  7109. truncated. Bangtype.
  7110. " "25FEF") "MakeLabel" ("$ #w #x grob \\-> grob'
  7111. " "Inserts $ into grob using CENTER$3x5 with
  7112. y=5.
  7113. " "2E2AA") "^MkTitle" ("$ \\-> grob
  7114. " "Create a title grob. This is the text
  7115. embedded in a dot matrix pattern, as used for
  7116. Choose boxes etc. The size of the grob is
  7117. 131x7.
  7118. " "02F002" :UBS) "LEFT$3x5" ("grob #x #y $ #w \\-> grob'
  7119. " "Like <REF>CENTER$3x5, but the left corner of
  7120. the text is positioned at #x.
  7121. " "25FF9") "ERASE&LEFT$3x5" ("grob #x #y $ #w \\-> grob'
  7122. " "Like <REF>LEFT$3x5, but erase background
  7123. first.
  7124. " "26071") "LEFT$3x5Arrow" ("grob #x #y $ #w \\-> grob'
  7125. " "Like <REF>LEFT$3x5, but if the text does not
  7126. fit, replace the last character by character
  7127. 31 (dots) to show that the text was
  7128. truncated.
  7129. " "26008") "LEFT$3x5CR" ("grob #x #y $ #w #h \\-> grob'
  7130. " "Like <REF>LEFT$3x5, but newlines in the
  7131. strings are interpreted and start new lines.
  7132. Note the additional argument #h for the
  7133. maximum height of the text grob.
  7134. " "2601C") "LEFT$3x5CRArrow" ("grob #x #y $ #w #h \\-> grob'
  7135. " "Like <REF>LEFT$3x5CR, but show truncation
  7136. with arrows.
  7137. " "26012") "CENTER$5x7" ("grob #x #y $ #w \\-> grob'
  7138. " "Same as CENTER$3x5, but using system
  7139. font.
  7140. " "25FF4") "LEFT$5x7" ("grob #x #y $ #w \\-> grob'
  7141. " "Like <REF>CENTER$5x7, but the left corner of
  7142. the text is positioned at #x.
  7143. " "25FFE") "ERASE&LEFT$5x7" ("grob #x #y $ #w \\-> grob'
  7144. " "Like <REF>LEFT$5x7, but erase background
  7145. first.
  7146. " "2606C") "LEFT$5x7Arrow" ("grob #x #y $ #w \\-> grob'
  7147. " "Like <REF>LEFT$5x7, but if the text has to be
  7148. truncated, replace the last character with
  7149. character 31 (arrow).
  7150. " "26003") "LEFT$5x7CR" ("grob #x #y $ #w \\-> grob'
  7151. " "Like <REF>LEFT$5x7, but interpret newlines.
  7152. " "26017") "LEFT$5x7CRArrow" ("grob #x #y $ #w \\-> grob'
  7153. " "Like <REF>LEFT$5x7CR, but show truncation
  7154. with arrows.
  7155. " "2600D") "^EQW3GROB" ("ob \\-> ext grob #0
  7156. \\-> #2
  7157. " "" "019004") "^EQW3GROBStk" ("ob \\-> ext grob #0
  7158. \\-> #2
  7159. " "" "01A004") "^EQW3GROBmini" ("ob \\-> ext grob #0
  7160. \\-> #2
  7161. " "" "01F004") "^EQW3GROBsys" ("ob \\-> ext grob #0
  7162. \\-> #2
  7163. " "" "01E004" :wasCSys) "^XGROBext" ("ob \\-> grob
  7164. " "Convert object to a grob.
  7165. " "0BE007" :wasCSys) "^DISPLAYext" ("grob ob \\-> grob'
  7166. " "Adds ob to grob after converting it to a
  7167. grob.
  7168. " "0C0007" :wasCSys) "'IDPAR" ("\\-> id
  7169. " "Puts ID PPAR unevaluated on the stack.
  7170. --
  7171. <REF>TEXT:Reserved|PPAR
  7172. " "27AE9" :UBS) "ID_PPAR" ("ID PPAR
  7173. " " --
  7174. <REF>TEXT:Reserved|PPAR
  7175. " "2799A" :UBS) "CHECKPICT" ("\\->
  7176. " "Checks size of GBUFF. If it is smaller than
  7177. 131x64 sets GBUFF back to its default size
  7178. (131x64).
  7179. " "2F162") "CKPICT" ("xPICT \\->
  7180. " "Checks for user word xPICT on level 1. Errors
  7181. (SETTYPEERR) if there is another object.
  7182. " "2EF06") "PICTRCL" ("xPICT \\-> grob
  7183. " "Does CKPICT, then recalls GBUFF and does
  7184. TOTEMPOB.
  7185. " "2F258") "MAKEPVARS" ("\\-> {}
  7186. " "Creates the default PPAR variable in the
  7187. current directory and returns its value.
  7188. --
  7189. <REF>TEXT:Reserved|PPAR
  7190. " "2F355") "CHECKPVARS" ("\\-> {}
  7191. " "Recalls contents of PPAR in current path to
  7192. stack. Creates PPAR in current directory if
  7193. non-existent. Errors \"Invalid PPAR\" if
  7194. existing PPAR is invalid.
  7195. --
  7196. <REF>TEXT:Reserved|PPAR
  7197. " "2F163") "GETPARAM" ("# \\-> ob
  7198. " "Extracts the #th item from PPAR. No error
  7199. checking!
  7200. --
  7201. <REF>TEXT:Reserved|PPAR
  7202. " "2F33D") "GETXMIN" ("\\-> %
  7203. " "Recalls XMIN from the PPAR list if
  7204. existent. If not, the default PPAR is created
  7205. in the current directory.
  7206. --
  7207. <REF>TEXT:Reserved|PPAR
  7208. " "2F0FF") "PUTXMIN" ("% \\->
  7209. " "Sets a new value for XMIN. PPAR is created
  7210. if necessary.
  7211. --
  7212. <REF>TEXT:Reserved|PPAR
  7213. " "2F366") "GETXMAX" ("\\-> %
  7214. " "Recalls XMAX from the PPAR list if
  7215. existent. If not, the default PPAR is created
  7216. in the current directory.
  7217. --
  7218. <REF>TEXT:Reserved|PPAR
  7219. " "2F0FE") "PUTXMAX" ("% \\->
  7220. " "Sets a new value for XMAX. PPAR is created
  7221. if necessary.
  7222. --
  7223. <REF>TEXT:Reserved|PPAR
  7224. " "2F365") "GETYMIN" ("\\-> %
  7225. " "Recalls YMIN from the PPAR list if
  7226. existent. If not, the default PPAR is created
  7227. in the current directory.
  7228. --
  7229. <REF>TEXT:Reserved|PPAR
  7230. " "2F100") "PUTYMIN" ("% \\->
  7231. " "Sets a new value for YMIN. PPAR is created
  7232. if necessary.
  7233. --
  7234. <REF>TEXT:Reserved|PPAR
  7235. " "2F368") "GETYMAX" ("\\-> %
  7236. " "Recalls YMAX from the PPAR list if
  7237. existent. If not, the default PPAR is created
  7238. in the current directory.
  7239. --
  7240. <REF>TEXT:Reserved|PPAR
  7241. " "2F10E") "PUTYMAX" ("% \\->
  7242. " "Sets a new value for YMAX. PPAR is created
  7243. if necessary.
  7244. --
  7245. <REF>TEXT:Reserved|PPAR
  7246. " "2F367") "GETPMIN&MAX" ("\\-> C% C%
  7247. " " --
  7248. Returns PMIN and PMAX.
  7249. --
  7250. <REF>TEXT:Reserved|PPAR
  7251. " "2F107") "PUTINDEP" ("ID \\->
  7252. " "Internal xINDEP if the arg is an ID.
  7253. " "2EEF2") "PUTINDEPLIST" ("{} \\->
  7254. " "Internal xINDEP if the arg is a list.
  7255. " "2EEF3") "INDEPVAR" ("\\-> id
  7256. " "Recalls the independent variable. If a list,
  7257. extract first element.
  7258. :: GETINDEP DUPTYPELIST? ?CARCOMP ;
  7259. " "2F0E8") "GETINDEP" ("\\-> id
  7260. \\-> {}
  7261. " "Recalls the independent variable field in
  7262. PPAR.
  7263. --
  7264. <REF>TEXT:Reserved|PPAR
  7265. " "2F106") "GETPTYPE" ("\\-> name
  7266. " "Recalls the plot type using GETPARAM.
  7267. --
  7268. <REF>TEXT:Reserved|PPAR
  7269. " "2EEF5") "PUTPTYPE" ("name \\->
  7270. " "Sets a new plot type. PPAR is created if
  7271. necessary.
  7272. --
  7273. <REF>TEXT:Reserved|PPAR
  7274. " "2EEF6") "GETRES" ("\\-> %
  7275. " "Recalls the plot resolution using GETPARAM.
  7276. --
  7277. <REF>TEXT:Reserved|PPAR
  7278. " "2F10D") "PUTRES" ("% \\->
  7279. " "Set new plot resolution. PPAR is created if
  7280. necessary.
  7281. --
  7282. <REF>TEXT:Reserved|PPAR
  7283. " "2EEF4") "GETSCALE" ("\\-> % %'
  7284. " "Recalls the plot scale parameters.
  7285. --
  7286. <REF>TEXT:Reserved|PPAR
  7287. " "2F33E") "PUTSCALE" ("% %' \\->
  7288. " "Set new plot scale. PPAR is created if
  7289. necessary.
  7290. --
  7291. <REF>TEXT:Reserved|PPAR
  7292. " "2EEF1") "AUTOSCALE" ("\\->
  7293. " "Internal AUTO.
  7294. " "2EEEF") "DOGRAPHIC" ("\\->
  7295. " "Sets the scroll mode of PICTURE and is
  7296. essentially the same as { } PVIEW.
  7297. " "2EF60") "GETXPOS" ("
  7298. " "" "2F109") "getxpos" ("
  7299. " "" "2F007") "GETYPOS" ("
  7300. " "" "2F340") "getypos" ("
  7301. " "" "2F008") "EQUATION" ("\\-> ob T
  7302. \\-> F
  7303. " "Recall the current equation, stored in the
  7304. 'EQ' variable, and TRUE. If there is no 'EQ'
  7305. variable on the path, just returns FALSE.
  7306. " "25ECF") "GetEqN" ("#n \\-> ob T
  7307. \\-> NULL$ F
  7308. " "Get the #nth equation, if EQ is a list of
  7309. equations.
  7310. " "2F339") "DORCLE" ("\\-> ob
  7311. " "Recalls the contents of the EQ variable,
  7312. errors if it does not exist.
  7313. " "25EB5") "DOSTOE" ("ob \\->
  7314. " "Stores ob into the variable EQ.
  7315. " "25EB6") "XEQPURGEPICT" ("xPICT \\->
  7316. " "If object in level one is xPICT, erases the
  7317. graphic display. Otherwise, errors.
  7318. " "2F297") "CRER" ("
  7319. " "" "00113") "CROSSMARKON" ("
  7320. " "" "2F328") "CROSS_HAIRS" ("
  7321. " "" "2EEFA") "CROSS_OFF" ("
  7322. " "" "2EEFB") "GDISPCENTER" ("\\->
  7323. " "Moves to center of graphics display
  7324. " "2F105") "GetRes" ("
  7325. " "" "2F10A") "HSCALE" ("
  7326. " "" "2EEF8") "VSCALE" ("
  7327. " "" "2EEF7") "PLOTERR" ("
  7328. " "" "2F35E") "PlotOneMore?" ("
  7329. " "" "2F35F") "PLOTPREP" ("
  7330. " "" "2F0C5") "DOPX>C" ("{ hxs hxs' } \\-> C%
  7331. " "Converts a list of two hex strings into a
  7332. complex number. Used for plotting
  7333. coordinates. Inverse operation is DOC>PX.
  7334. " "2EF01") "DOC>PX" ("C% \\-> { hxs hxs' }
  7335. " "Converts a complex coordinate point into list
  7336. of two HXS numbers. Inverse operation is
  7337. DOPX>C.
  7338. " "2EF02") "^SYMBINCOMP" ("symb \\-> ob1 .. obN #n
  7339. ob \\-> ob #1
  7340. {} \\-> {} #1
  7341. " "Explodes symbolic object into meta. Other
  7342. objects are converted into one-object metas
  7343. by pushing #1 into the stack.
  7344. " "157006" :CSys) "^2SYMBINCOMP" ("ob1 ob2 \\-> meta1 meta2
  7345. " "Does ^SYMBINCOMP for 2 objects.
  7346. " "12A006" :CSys) "^VXXLext" ("ob Lvar \\-> Q
  7347. " "Converts object to internal form. The object
  7348. can be a symbolic, a symbolic vector or a
  7349. symbolic matrix. If the conversion was not
  7350. successfull, vxxxlflag is cleared.
  7351. " "4D7006" :CSys) "^R2SYM" ("lvar ob \\-> ob
  7352. " "Back conversion of a scalar object.
  7353. " "400006" :CSys) "^METALISTVXXL" ("Meta \\-> Meta
  7354. " "Conversion of all elements of a meta object
  7355. with respect to the variables in LAM1.
  7356. " "4D8006" :CSys) "^VXXLFext" ("n/d \\-> Z1/Z2
  7357. " "Conversion of a fraction which does not
  7358. depend on any variables.
  7359. " "4D9006" :CSys) "^VXXL1ext" ("n \\-> Z
  7360. " "Conversion of an object which does not depend
  7361. on any variables.
  7362. " "4DA006" :CSys) "^VXXL0" ("ob \\-> Q
  7363. " "Conversion of object with respect to Lvar in
  7364. LAM1.
  7365. " "4DB006" :CSys) "^VXXL2NR" ("Meta \\-> Q
  7366. " "Converts symbolic meta to internal form
  7367. (LAM1=Lvar). Set nocareflag to avoid
  7368. square root problems.
  7369. " "4DC006" :CSys) "^VXXL2" ("Meta \\-> Q
  7370. " "Converts symbolic meta to internal form
  7371. (LAM1=Lvar).
  7372. " "4DD006" :CSys) "^TYPEIRRQ?" ("ob \\-> flag
  7373. " "Is ob an irrquad?
  7374. " "167006" :CSys) "^DTYPEIRRQ?" ("ob \\-> ob flag
  7375. " "DUP, then ^TYPEIRRQ?.
  7376. " "168006" :CSys) "^CKMATRIXELEM" ("ob \\-> ob
  7377. " "Checks that ob is a valid internal matrix
  7378. element. Look for CK[]NCK for user matrix
  7379. element.
  7380. " "177006" :CSys) "^CKFPOLYext" ("ob \\-> ob
  7381. " "Errors if list contains secondaries or empty
  7382. lists.
  7383. " "18F006" :CSys) "^CK2FPOLY" ("ob ob \\-> ob ob
  7384. " "Does CKFPOLYext on two objects.
  7385. " "190006" :CSys) "^CLEANIDLAM" ("ob \\-> ob
  7386. " "Suppresses SYMB if not needed.
  7387. " "19E006" :CSys) "Z-9" ("-9
  7388. " "" "2733F" :UBS) "Z-8" ("-8
  7389. " "" "2734B" :UBS) "Z-7" ("-7
  7390. " "" "27357" :UBS) "Z-6" ("-6
  7391. " "" "27363" :UBS) "Z-5" ("-5
  7392. " "" "2736F" :UBS) "Z-4" ("-4
  7393. " "" "2737B" :UBS) "Z-3" ("-3
  7394. " "" "27387" :UBS) "Z-2" ("-2
  7395. " "" "27393" :UBS) "Z-1" ("-1
  7396. " "" "2739F" :UBS) "Z0" ("0
  7397. " "" "273AB" :UBS) "Z1" ("1
  7398. " "" "273B6" :UBS) "Z2" ("2
  7399. " "" "273C2" :UBS) "Z3" ("3
  7400. " "" "273CE" :UBS) "Z4" ("4
  7401. " "" "273DA" :UBS) "Z5" ("5
  7402. " "" "273E6" :UBS) "Z6" ("6
  7403. " "" "273F2" :UBS) "Z7" ("7
  7404. " "" "273FE" :UBS) "Z8" ("8
  7405. " "" "2740A" :UBS) "Z9" ("9
  7406. " "" "27416" :UBS) "Z10" ("10
  7407. " "" "27422" :UBS) "Z12" ("12
  7408. " "" "2742F" :UBS) "Z24" ("24
  7409. " "" "2743C" :UBS) "Z100" ("100
  7410. " "" "27449" :UBS) "ZINT1_0" ("\\-> 1 0
  7411. " "Pushes the ZINTS 1 and 0.
  7412. " "274A9" :UBS) "^DROPZ0" ("ob \\-> z0
  7413. " "" "2E0006" :CSys) "^DROPZ1" ("ob \\-> z1
  7414. " "" "2DF006" :CSys) "^2DROPZ0" ("2 1 \\-> z0
  7415. " "" "392006" :CSys) "^NDROPZ0" ("obn...ob1 #n \\-> z0
  7416. " "Replaces meta with Z0.
  7417. " "3B3006" :CSys) "^NDROPZ1" ("obn...ob1 #n \\-> z1
  7418. " "Replaces meta with Z1.
  7419. " "3B4006" :CSys) "INTERNALiX" ("{ 1 0 0 }
  7420. " "List with the three ZINTS 1, 0, and 0.
  7421. " "274A4" :UBS) "Z0ONE" ("\\-> ZINT 0 #1
  7422. " "" "27C70" :UBS) "^#>Z" ("# \\-> Z
  7423. " "Converts bint to zint.
  7424. " "0EE006" :CSys) "^R>Z" ("% \\-> z
  7425. " "Converts real to zint. Do not call this entry
  7426. if the number if not an integer.
  7427. " "0F5006" :CSys) "^R2Zext" ("% \\-> %%/Z
  7428. " "Converts real to zint, or to long real if the
  7429. number is not an integer. mode if number is
  7430. not an integer.
  7431. " "18D006" :CSys) "^H>Z" ("HXS \\-> Z / Error
  7432. " "Checks if HXS is a proper zint number and
  7433. trims it.
  7434. " "0ED006" :CSys) "^S>Z" ("$ \\-> z
  7435. " "Converts decimal in a string into a zint.
  7436. " "0F2006" :CSys) "^S>Z?" ("$ \\-> z T
  7437. \\-> $ F
  7438. " "If possible, converts string into a zint and
  7439. returns TRUE. If not, keeps the original
  7440. string and returns FALSE.
  7441. " "0F3006" :CSys) "^CK1Z" ("$/#/hxs \\-> Z
  7442. " "Checks for an integer. Converts strings,
  7443. bints or hxs's to zints. Errors for other
  7444. object types.
  7445. " "184006" :CSys) "^CK2Z" ("ob ob' \\-> Z Z'
  7446. " "Like <REF>^CK1Z, but for two objects.
  7447. " "185006" :CSys) "^CK3Z" ("ob ob' ob'' \\-> Z Z' Z''
  7448. " "Like <REF>^CK1Z, but for three objects.
  7449. " "186006" :CSys) "^CK&CONVINT" ("symb \\-> zint
  7450. \\-> :: zint zint' ;
  7451. " "Check that a sym is a zint or Gauss integer,
  7452. convert it.
  7453. " "202006" :CSys) "^CK&CONV2INT" ("symb symb' \\-> zint zint'
  7454. \\-> :: zint1 zint2 ; :: zint3 zint4 ;
  7455. " "Check that 2 sym are zint or Gauss integer,
  7456. convert them.
  7457. " "203006" :CSys) "^CONVBACKINT" ("zint|c \\-> symb
  7458. " "" "205006" :CSys) "^CONVBACK2INT" ("zint|c zint|c \\-> symb symb
  7459. " "" "204006" :CSys) "^Z>ZH" ("Z \\-> Z'
  7460. " "Converts decimal Z to hex Z.
  7461. " "0F4006" :CSys) "^Z2Sext" ("Z \\-> '$Z'
  7462. " "Converts Z to string number. The number is
  7463. embedded in a symbolic to enable using it in
  7464. algebraics.
  7465. " "18E006" :CSys) "^ZTrim" ("Z \\-> Z'
  7466. " "Strips Z from unnecessary leading nibbles.
  7467. Counts nibbles required for
  7468. representation. If that equals used nibbles
  7469. then quick exit. Else allocates new object,
  7470. copies significant mantissa nibbles and
  7471. apends original sign.
  7472. " "101006" :CSys) "^ZAbs" ("Z \\-> |Z|
  7473. " "Takes the absolute value of Z. If Z is
  7474. already positive then does nothing. Else
  7475. duplicate object and change sign.
  7476. " "102006" :CSys) "^ZABS" ("Z \\-> Z'
  7477. " "Absolute value.
  7478. " "50B006" :CSys) "^ZSQ" ("Z \\-> Z'
  7479. " "Computes the square of a zint.
  7480. " "590006" :CSys :UBS) "^ZSQRT" ("Z \\-> Z' flag
  7481. " "Calculates integer part of square root. If
  7482. the number was a square, then flag is TRUE to
  7483. indicate that the returned result is exact.
  7484. " "0E0006" :CSys) "^Mod" ("Z Zn \\-> Z'
  7485. " "Make Z modulo N.
  7486. " "3D0006" :CSys) "^ZMod" ("Z1 Z2 \\-> Z'
  7487. " "" "0DD006" :CSys) "^ZNMax" ("Z1 Z2 \\-> NormMax[Z1,Z2]
  7488. " "Returns the integer with the greatest
  7489. absolute value. (Returns Z1 if |Z1|\\>=|Z2|;
  7490. returns Z2 if |Z1|<|Z2|).
  7491. " "105006" :CSys) "^ZNMin" ("Z1 Z2 \\-> NormMin[Z1,Z2]
  7492. " "Returns the integer with the smallest
  7493. absolute value. (Returns Z1 if |Z1|\\<=|Z2|;
  7494. returns Z2 if |Z1|>|Z2|).
  7495. " "106006" :CSys) "^ZBits" ("Z \\-> Z #bits
  7496. " "Calculates number of bits used in Z.
  7497. " "10D006" :CSys) "^ZBit?" ("Z #bit \\-> Z flag
  7498. " "Tests if a bit in Z is set.
  7499. Count starts from zero, as opposed to ZBits.
  7500. " "10E006" :CSys) "^ZGCDext" ("Z2 Z1 \\-> Z
  7501. " "Integer GCD.
  7502. " "2B7006" :CSys) "^ZGcd" ("Z2 Z1 \\-> Z
  7503. " "This is the same entry as ZGCDext.
  7504. " "2B8006" :CSys) "^IEGCD" ("
  7505. " "Internal EGCD for integers.
  7506. " "20A006" :CSys) "^IEGCDext" ("a b \\-> d u v
  7507. " "Bezout for integers.
  7508. d=au+bv=gcd(a,b).
  7509. " "3D6006" :CSys) "^INEGCD" ("a b \\-> d u v
  7510. " "" "3D9006" :CSys) "^EGCDSWAP" ("
  7511. " "" "3DA006" :CSys) "^EGCDNEWG" ("
  7512. " "" "3DB006" :CSys) "^#FACT" ("# \\-> Z
  7513. " "Calculates the factorial of an integer. Works
  7514. fine for all numbers #0 - #FFFFF, although at
  7515. some point you will get an out of memory
  7516. error.
  7517. " "07C007" :CSys) "^factzint" ("z \\-> z!
  7518. " "Factorial for long integers.
  7519. " "576006" :CSys) "^PA2B2" ("z/% \\-> a+bi
  7520. " "Internal PA2B2.
  7521. " "215006" :CSys) "^ZFactor" ("Zs \\-> Lf
  7522. " "Factors signed long integer.
  7523. " "0C9006" :CSys) "^NFactor" ("z \\-> {}
  7524. " "Factors positive long integer.
  7525. " "0CA006" :CSys) "^NFactorSpc" ("z \\-> {}
  7526. " "Semi-factors positive long integer. This is
  7527. regular factorization with an extra
  7528. 'hopeless?' test.
  7529. " "0CB006" :CSys) "^SFactor" ("S \\-> Lf
  7530. " "Factors short integer. Pollard Rho, with the
  7531. assumption that trial division has been done
  7532. already. Thus any factor less than 4012009 is
  7533. known to be a prime, for greater factors a
  7534. primality test is used before calling the
  7535. actual Pollard Rho. Pollard Rho does not
  7536. find the factors in order of magnitude, thus
  7537. the results will be sorted after full
  7538. factorization has been achieved.
  7539. " "0CD006" :CSys) "^SPollard" ("S \\-> S1 S2
  7540. " "Factors short integer into 2 parts using
  7541. Pollard Rho algorithm. Trial division and
  7542. primality tests should be done prior to
  7543. calling this subroutine, otherwise an eternal
  7544. loop is risked. The random number generator
  7545. is modeled after the user level RAND command,
  7546. although the starting value is different.
  7547. " "0CE006" :CSys) "^BFactor" ("N \\-> Lf
  7548. " "Factors long integer. Brent-Pollard, with the
  7549. assumption that trial division has been done
  7550. already. When a small factor is found SFactor
  7551. is called to get full short
  7552. factorization. Since the factorization can
  7553. potentially take a very long time, an
  7554. execution time test is used to abort
  7555. factoring very long integers (limit is 60s
  7556. for each composite). The factors are sorted
  7557. at exit.
  7558. " "0CF006" :CSys) "^BrentPow" ("Za Z1 Z2 Zn #k \\-> Z
  7559. " "Modular * + ^ mod for Brent-Pollard
  7560. factorization. Output is Z1*Z2+Za mod Zn
  7561. repeated k times Note that k=0 and k=1 give
  7562. the same result. Also Z1\\=/Z2 makes no sense
  7563. for k\\=/0. All arguments are assumed to be
  7564. positive. Za is assumed to be < 16. In some
  7565. instances k can be a very high number, thus
  7566. it might make sense to use Montgomery
  7567. multiplication.
  7568. " "0D0006" :CSys) "^ZPrime?" ("Z \\-> flag
  7569. " "Primality test for a positive integer.
  7570. According to Pinch commercial software
  7571. packages use only about 5-10 bases by
  7572. default, maximum around 25. The latest
  7573. versions usually implement a deterministic.
  7574. " "0D1006" :CSys) "^ZIsPrime?" ("Z \\-> flag
  7575. " "Probabilistic primality test for a positive
  7576. integer.
  7577. " "0D2006" :CSys) "^SIsPrime?" ("S \\-> flag
  7578. " "Tests if positive short Z is prime. M-R test
  7579. fails for integers \\<= 3, so we just test them
  7580. separately at the start. For convenience lets
  7581. define 0 and 1 to be primes also.
  7582. " "0D3006" :CSys) "^BIsPrime?" ("S \\-> flag
  7583. " "Test if positive long Z is prime.
  7584. " "0D4006" :CSys) "^BRabin" ("Z #base \\-> Z flag
  7585. " "Performs Miller-Rabin test for long positive
  7586. integer. Returns TRUE if base witnesses
  7587. composite. Else returns FALSE.
  7588. " "0D5006" :CSys) "^ZTrialDiv2" ("Z \\-> Z' #n
  7589. " "Remove factors of 2 from integer.
  7590. #n is the power of two extracted from the
  7591. number. The sign is also handled correctly,
  7592. even though it is never required in ALG48
  7593. (absolute Z).
  7594. " "0D6006" :CSys) "^ZTrialPrime?" ("Z \\-> flag
  7595. " "Trial division primality test for a positive
  7596. integer. works for Z \\>= 3 (return false for
  7597. Z=2).
  7598. " "0D7006" :CSys) "^ZTrialDiv" ("Z \\-> Mf Z'
  7599. " "Trial division of a positive integer. If Z'
  7600. is one then full factorization was achieved.
  7601. The long trial division is not too slow,
  7602. since division by short integer is quite
  7603. fast. The quotient is also checked so that a
  7604. final factor less than 2000^2 will also be
  7605. automatically detected.
  7606. " "0D8006" :CSys) "^Prime+" ("Z \\-> Z'
  7607. " "Returns next prime ( Z' > Z ).
  7608. " "0C7006" :CSys) "^Prime-" ("Z \\-> Z'
  7609. " "Returns previous prime ( Z' < Z ).
  7610. " "0C8006" :CSys) "Z1Z0" ("(1,0)
  7611. " "" "274A9" :UBS) "Z0Z1" ("(0,1)
  7612. " "" "27516" :UBS) "Z-1Z0" ("(-1,0)
  7613. " "" "2754B" :UBS) "Z1Z1" ("(1,1)
  7614. " "" "2756C" :UBS) "^TYPEGAUSSINT?" ("ob \\-> flag
  7615. " "Checks if ob is Gaussian integer.
  7616. " "114007" :1\.11 :wasCSys) "^DTYPEGAUSSINT?" ("ob \\-> ob flag
  7617. " "Checks if ob is Gaussian integer.
  7618. " "115007" :1\.11 :wasCSys) "^DUPTYPEGAUSSINT?" ("ob \\-> ob flag
  7619. " "Checks if ob is Gaussian integer.
  7620. " "116007" :1\.11 :wasCSys) "^CK1Cext" ("ob \\-> flag
  7621. " "Checks if object is integer or Gaussian
  7622. integer.
  7623. " "187006" :wasCSys) "^CXRIext" ("C \\-> Zre Zim
  7624. " "Returns real and imaginary part of Gaussian
  7625. integer.
  7626. " "15D006" :CSys) "^CGCDext" ("C2 C1 \\-> C
  7627. " "GCD for Gauss integers.
  7628. " "2B5006" :CSys) "^CSQFFext" ("C \\-> { factor1 mult1 ... factn multn }
  7629. " "Factorization of Gauss integers. This is not
  7630. the complete factorization of C over Gauss
  7631. integers since the GCD of the real part and
  7632. imaginary part of c is factored only over R.
  7633. " "4D5006" :CSys) "^SECOSQFFext" (":: x<< a b c x>> ; \\-> { fact1 mult1 ... factn multn }
  7634. " "Factorization of irrquads and Gauss integers.
  7635. " "4D4006" :CSys) "^SUMSQRext" ("Z \\-> Z C
  7636. " "Returns a Gauss integer C so that |C|^2=Z.
  7637. Z must be 2 or so that Z=1 mod 4.
  7638. If Z \\=/ 1 mod 4, \"Z is not 1 mod 4\" error.
  7639. Z should be prime to ensure the existence of
  7640. a solution.
  7641. " "4D6006" :CSys) "^CNORMext" ("C \\-> |C|^2
  7642. " "Square modulus of a Gauss integer.
  7643. " "518006" :CSys) "Z=" ("Z Z' \\-> flag
  7644. " "" "265C1") "Z<>" ("Z Z' \\-> flag
  7645. " "" "265C6") "Z<" ("Z Z' \\-> flag
  7646. " "" "265BC") "Z<=" ("Z Z' \\-> flag
  7647. " "" "265D0") "Z>" ("Z Z' \\-> flag
  7648. " "" "265B7") "Z>=" ("Z Z' \\-> flag
  7649. " "" "265CB") "^QIsZero?" ("Q \\-> flag
  7650. " "Tests if Q is zero. Assumes list contains only
  7651. lists or hexes!.
  7652. " "0F8006" :CSys) "^DupQIsZero?" ("Q \\-> Q flag
  7653. " "Duplicates Q and tests if Q is zero. Assumes
  7654. list contains only lists or hexes!.
  7655. " "0F7006" :CSys) "^ZIsOne?" ("Z \\-> flag
  7656. " "Tests if Z is Z1.
  7657. " "0FA006" :CSys) "^DupZIsOne?" ("Z \\-> Z flag
  7658. " "Duplicates Z, and returns TRUE if Z is 1.
  7659. " "0F9006" :CSys) "^DupZIsTwo?" ("Z \\-> Z flag
  7660. " "Returns TRUE if Z is 2.
  7661. " "109006" :CSys) "^ZIsNeg?" ("Z \\-> flag
  7662. " "Tests if Z is negative.
  7663. " "0FC006" :CSys) "^DupZIsNeg?" ("Z \\-> Z flag
  7664. " "Tests if Z is negative.
  7665. " "0FB006" :CSys) "^DupZIsEven?" ("Z \\-> Z flag
  7666. " "Tests if Z is even.
  7667. " "10A006" :CSys) "^ZNLT?" ("Z1 Z2 \\-> flag
  7668. " "TRUE if |Z1|<|Z2|.
  7669. " "107006" :CSys) "^OBJINT?" ("z/% \\-> z flag
  7670. " "Tests if Obj is an integer.
  7671. " "19A006" :CSys) "^OBJPOSINT?" ("z/% \\-> z flag
  7672. " "Tests if Obj is a positive integer smaller
  7673. than Zsmall.
  7674. " "19B006" :CSys) "^CKINT>0" ("Obj \\-> Obj flag
  7675. " "Tests if Obj is a strictly positive integer.
  7676. " "19C006" :CSys) "^METAINT?" ("Meta \\-> Meta flag
  7677. " "Tests if Meta is an integer.
  7678. " "198006" :CSys) "^METAPOSINT?" ("Meta \\-> Meta flag
  7679. " "Tests if Meta is a positive integer smaller
  7680. than Zsmall.
  7681. " "199006" :CSys) "^DupTypeS?" ("Z \\-> Z flag
  7682. " "Tests if Z is short (\\<= 64 bits).
  7683. " "0CC006" :CSys) "^MATIDN" ("M/z/% \\-> M'
  7684. " "Creates identity matrix.
  7685. " "371006" :CSys) "^MATCON" ("M ob \\-> [ob]
  7686. " "Creates constant matrix from matrix.
  7687. " "372006" :CSys) "^MAKEARRY" ("{#el} ob \\-> []
  7688. {#rows #cols} ob \\-> [[]]
  7689. " "Creates constant matrix/array, initializing
  7690. all elements with ob. ob may be symbolic,
  7691. real, complex or zint.
  7692. " "373006" :CSys) "^DIMRANM" ("{} \\-> M'
  7693. " "Creates symbolic random matrix from
  7694. dimensions.
  7695. " "345006" :CSys) "^MATRANM" ("M \\-> M'
  7696. " "Changes all elements of matrix to elements
  7697. generated randomly.
  7698. " "344006" :CSys) "^OBJDIMS2MAT" ("ob {} \\-> M
  7699. " "Creates constant matrix from dimension and
  7700. ob.
  7701. " "374006" :CSys) "^LCPROG2M" ("#n #m prg \\-> M
  7702. " "Fills a matrix of specified size using a
  7703. program. prg must take two arguments and
  7704. return one argument. On entry MAKE2DMATRIX
  7705. provide the indexes as Z integers.
  7706. " "375006" :CSys) "^MAKE2DMATRIX" ("#n #m prg \\-> M
  7707. " "Creates matrix from size and program (with
  7708. stack checking). prg must take 2 args and
  7709. return 1 arg. On entry MAKE2DMATRIX provide
  7710. the indexes as Z integers.
  7711. " "376006" :CSys) "^make2dmatrix" ("#n #m prg \\-> meta-M
  7712. " "Create meta-matrix from size and program
  7713. (with stack checking). prg must take 2 args
  7714. and return 1 arg On entry make2dmatrix
  7715. provide the indexes as Z integers.
  7716. " "377006" :CSys) "^MATREDIM" ("M {} \\-> M'
  7717. " "Changes size of a matrix, removing elements
  7718. and/or adding zeros, as necessary.
  7719. " "341006" :CSys) "^VRRDM" ("[]/[[]] {} \\-> []
  7720. " "Vector Right ReDiMension: adds 0 to the
  7721. right.
  7722. " "342006" :CSys) "^VRRDMmeta" ("meta #l \\-> meta-#l
  7723. " "Meta Right ReDiMension: adds 0 to the right.
  7724. " "343006" :CSys) "^{}TO[]" ("{} \\-> []
  7725. " "Converts from list-of-lists representation to
  7726. matrix. No checks on the element type.
  7727. " "16A006" :CSys) "^LIST2MATRIX" ("{} \\-> []
  7728. {{}} \\-> [[]]
  7729. ob \\-> ob
  7730. " "Converts a symbolic list to a matrix. Does
  7731. not check that matrix is a valid one. Use
  7732. DTYPFMAT? to do that.
  7733. " "17A006" :CSys) "^[]TO{}" ("[] \\-> {}
  7734. " "Converts from matrix to list-of-lists.
  7735. " "16B006" :CSys) "^MATRIX2LIST" ("[] \\-> { }
  7736. [[]] \\-> {{}}
  7737. ob \\-> ob
  7738. " "Converts a symbolic matrix to a list.
  7739. " "179006" :CSys) "^ARRAY2MATRIX" ("[] \\-> []
  7740. [[]] \\-> [[]]
  7741. " "Converts array to symbolic array if necessary.
  7742. " "17E006" :CSys) "^SAMEMATRIX" ("M1 M2 \\-> M1 M2 flag
  7743. " "If one object is a symbolic array, converts
  7744. both arrays to symbolic form. Returns TRUE
  7745. for symbolic matrices and FALSE for numeric.
  7746. " "175006" :CSys) "^SAMEMATSCTYPE" ("M ob \\-> M ob flag
  7747. " "If M is a numeric matrix and ob is not float,
  7748. converts matrix to symbolic form. Returns
  7749. TRUE for symbolic and FALSE for numeric.
  7750. " "176006" :CSys) "^ArryToList" ("[]/[[]] \\-> {}/{{}}
  7751. " "Converts normal array (containing only real
  7752. or complex numbers) to list of lists; errors
  7753. for symbolic arrays.
  7754. " "003007" :CSys) "^MATEXPLODE" ("[[ob1..obn]] \\-> ob1..obn [[ob1..obn]]
  7755. " "" "17D006" :CSys) "^DUPNULL[]?" ("ob \\-> ob flag
  7756. " "Tests for a null array.
  7757. " "16C006" :CSys) "^NULLVECTOR?" ("V \\-> flag
  7758. " "Returns true if vector is null.
  7759. " "359006" :CSys) "^CKSAMESIZE" ("arry1 arry2 \\-> arry1 arry2 flag
  7760. " "Tests if arry1 and 2 have the same size.
  7761. " "16F006" :CSys) "^DTYPENDO?" ("ob \\-> ob flag
  7762. " "Tests if object is a square symbolic matrix.
  7763. Convert numeric array to symbolic matrix.
  7764. " "170006" :CSys) "^2DMATRIX?" ("ob \\-> ob flag
  7765. " "Tests if object is a 2D matrix.
  7766. " "173006" :CSys) "^MAT+" ("M2 M1 \\-> M2+M1
  7767. " "" "320006" :CSys) "^MADD" ("M2 M1 \\-> M2+M1
  7768. " "" "321006" :CSys) "^MAT-" ("M2 M1 \\-> M2-M1
  7769. " "" "322006" :CSys) "^MSUB" ("M2 M1 \\-> M2-M1
  7770. " "" "323006" :CSys) "^VADD" ("V2 V1 \\-> V2+V1
  7771. " "" "324006" :CSys) "^VSUB" ("V2 V1 \\-> V2-V1
  7772. " "" "325006" :CSys) "^MAT*" ("M2 M1 \\-> M2*M1
  7773. " "Matrix product with size and type checking.
  7774. " "326006" :CSys) "^MMMULT" ("M2 M1 \\-> M2*M1
  7775. " "" "327006" :CSys) "^MVMULT" ("M V \\-> V'
  7776. " "Product of matrix by vector.
  7777. " "328006" :CSys) "^SCL*MAT" ("ob M \\-> M*ob
  7778. " "Scalar times matrix.
  7779. " "329006" :CSys) "^MAT*SCL" ("M ob \\-> M*ob
  7780. " "Matrix times scalar.
  7781. " "32A006" :CSys) "^VPMULT" ("V ob \\-> V'
  7782. " "Multiplies vector by a scalar.
  7783. " "32B006" :CSys) "^MATSQUARE" ("M \\-> M*M
  7784. " "" "335006" :CSys) "^MAT^" ("M z/% \\-> M'
  7785. " "Integral matrix power.
  7786. " "32C006" :CSys) "^MATCROSS" ("[] []' \\-> []''
  7787. " "Vector product.
  7788. " "32D006" :CSys) "^MATDOT" ("V2 V1 \\-> ob
  7789. " "Scalar product with checking.
  7790. " "32E006" :CSys) "^RNDARRY" ("M % \\-> M
  7791. " "Rounds array.
  7792. " "32F006" :CSys) "^TRCARRY" ("M % \\-> M
  7793. " "Truncates array.
  7794. " "330006" :CSys) "^MAT/SCL" ("M ob \\-> M/ob
  7795. " "Divides matrix by scalar.
  7796. " "332006" :CSys) "^MAT/" ("V M \\-> M^-1*V
  7797. " "\"Divides\" Vector by matrix.
  7798. " "333006" :CSys) "^MATCHS" ("M \\-> -M
  7799. " "" "334006" :CSys) "^MATINV" ("M \\-> M^-1
  7800. " "" "34E006" :CSys) "^MATCONJ" ("M \\-> M'
  7801. " "" "336006" :CSys) "^MATRE" ("M \\-> re[M]
  7802. " "" "337006" :CSys) "^MATIM" ("M \\-> im[M]
  7803. " "" "338006" :CSys) "^MATTRACE" ("M \\-> trace
  7804. " "Matrix trace.
  7805. " "339006" :CSys) "^MATTRN" ("M \\-> M'
  7806. " "Matrix transposition and conjugation.
  7807. " "33A006" :CSys) "^mattran" ("M \\-> Meta-M'
  7808. " "Transposes matrix, returns meta-matrix.
  7809. " "33C006" :CSys) "^mattrn" ("Meta-M \\-> Meta-M'
  7810. " "Transposes meta-matrix.
  7811. " "33D006" :CSys) "^MATDET" ("M \\-> det
  7812. " "Determinant, expanding all (not row
  7813. reduction).
  7814. " "346006" :CSys) "^MATRDET" ("M \\-> det
  7815. " "Determinant using row reduction.
  7816. " "347006" :CSys) "^MATFNORM" ("M \\-> ob
  7817. " "Frobenius norm.
  7818. " "348006" :CSys) "^MATRNORM" ("M \\-> ob
  7819. " "Row norm.
  7820. " "349006" :CSys) "^MATCNORM" ("M \\-> ob
  7821. " "Column norm.
  7822. " "34A006" :CSys) "^MATRIXDIM" ("ob \\-> #
  7823. " "Returns symbolic matrix dimensionality of an
  7824. object.
  7825. " "174006" :CSys) "^MATREF" ("M \\-> M'
  7826. " "Returns matrix in Row-Echelon form.
  7827. " "34C006" :CSys) "^MATRREF" ("M \\-> M'
  7828. " "Returns matrix in Reduced Row-Echelon form.
  7829. " "34B006" :CSys) "^MATREFRREF" ("M #full_ref \\-> M list M'
  7830. " "If #full_ref is 1, returns Reduced
  7831. Row-Echelon form, otherwise returns just
  7832. Row-Echolong form.
  7833. " "34F006" :CSys) "^MATRIXRCI" ("ncol i M const \\-> M'
  7834. " "Multiplies row #i of symbolic matrix M by
  7835. constant. ncol is not used, it's here
  7836. because of the stack state at call-time from
  7837. inside laRCI.
  7838. " "367006" :CSys) "^MATRIXRCIJ" ("ncol #i #j M const \\-> M'
  7839. " "Does Lj <- c*Li+Lj. ncol is not used, it's
  7840. here because of the stack state at call-time
  7841. from inside laRCI.
  7842. " "368006" :CSys) "^INXREDext" ("Lvar #full_ref M \\-> Lvar pivot M
  7843. " "" "350006" :CSys) "^METAMATRED" ("Meta-M Lvar #full_red \\-> meta-M Lvar pivot
  7844. " "" "351006" :CSys) "^METAPIVOT" ("meta-M #l #c \\-> meta-M #l #l' #c' flag
  7845. " "Searchs a pivot in column #c starting from
  7846. row #l. Flag is FALSE if pivot is not
  7847. found. If pivot is found #l' is the row, #c
  7848. is updated to #c'.
  7849. " "352006" :CSys) "^PIVOTNORM" ("
  7850. " "" "353006" :CSys) "^PIVOTFLOAT" ("float \\-> float_modulus
  7851. " "" "354006" :CSys) "^MATRANK" ("M \\-> Z/%
  7852. " "Rank of a matrix.
  7853. " "34D006" :CSys) "^LINSOLV" ("b a \\-> y
  7854. " "Solves y'=ay+b.
  7855. " "080007" :CSys) "^SOLVEMETASYST" ("meta-M \\-> d meta-sol T
  7856. \\-> F
  7857. " "Solves linear system in meta representation.
  7858. Meta-sol has been reduced to the same
  7859. denominator d.
  7860. " "0F4007" :CSys) "^REDUCEMETASYST" ("meta-M \\-> meta->M'
  7861. " "Reduces linear system in meta representation.
  7862. " "0F5007" :CSys) "^REDUCEMETAPSYST" ("meta-M \\-> meta-M'
  7863. " "Reduces linear system in meta representation.
  7864. Does not reduce last column of
  7865. meta-matr. This is useful to solve linear
  7866. system with parameters in the last column.
  7867. " "0F6007" :CSys) "^SOLVECRAMER" ("meta-M \\-> d meta-sol T
  7868. \\-> F
  7869. " "Solves cramer system. Meta-matr must be
  7870. fully reduced. Meta-sol is reduced to the
  7871. same denominator. d flag is FALSE if
  7872. dimension do not match.
  7873. " "0F7007" :CSys) "^SYSText" ("M linc \\-> linc linc' res cas_p
  7874. " "" "355006" :CSys) "^STOSYSText" ("M2 M1 \\-> M2 list
  7875. " "" "356006" :CSys) "^MAKESYSText" ("M_eq M_inc \\-> M_eq M lidnt flag
  7876. " "Converts linear equations to a matrix and
  7877. checks that equation are linear with respect
  7878. to lidnt.
  7879. " "357006" :CSys) "^VARGENext" ("
  7880. " "" "358006" :CSys) "^FINDELN" ("{} A \\-> # flag
  7881. " "Returns index # of element {} in array.
  7882. " "35A006" :CSys) "^PULLEL[S]" ("A # \\-> A el
  7883. " "Extracts element of index # from array.
  7884. Array type test is made in assembly for array
  7885. speed.
  7886. " "35B006" :CSys) "^BANGARRY" ("el # M \\-> M'
  7887. " "Puts el at index # of matrix M.
  7888. " "35C006" :CSys) "^PUT[]" ("el #i V \\-> V
  7889. " "Replaces #i-th vector component by element.
  7890. " "35D006" :CSys) "^LENMATRIX" ("[] \\-> #el
  7891. [[]] \\-> #row
  7892. " "" "17B006" :CSys) "^MATSUB" ("M rmin nrows cmin ncols { #m #n } \\-> M'
  7893. " "Extracts submatrix from a matrix.
  7894. " "33E006" :CSys) "^MATREPL" ("M1 M2 \\-> M2'
  7895. " "Replaces part of matrix destination (M2) by
  7896. matrix source (M1). LAM1 to 9 must be bound
  7897. like in Llib/LIMain.s ( 9:r 8:c 7:dmat? 6:f
  7898. 5:md 4:nd 3:smat? 2:ms 1:ns ). Copy begins in
  7899. matrix d at row r and column c.
  7900. " "340006" :CSys) "^MATRIX>DIAG" ("A ncols+1 ndiags \\-> V
  7901. " "Extracts diagonal terms. ncols+1 is there
  7902. because MATRIX>DIAG is called inside la>DIAG.
  7903. " "35F006" :CSys) "^MATRIXDIAG>" ("ncol+1 diagV dlen dims{} \\-> M
  7904. " "Constructs a matrix from a vector of diagonal
  7905. terms.
  7906. " "360006" :CSys) "^la+ELEMsym" ("V ob %i \\-> V'
  7907. " "Inserts element in symbolic vector at row %i.
  7908. " "361006" :CSys) "^INSERTROW[]" ("V ob #i \\-> V
  7909. M V #i \\-> M'
  7910. " "Inserts element/vector in symbolic
  7911. vector/matrix at row #i. Checks for 0 < #i <
  7912. #n + 1, but does not check for matrix/vector
  7913. size.
  7914. " "362006" :CSys) "^insertrow[]" ("ob #i meta \\-> meta
  7915. " "Inserts element/vector in meta-object at
  7916. position #i. Checks for 0 < #i < #n + 1, but
  7917. does not check for vector size.
  7918. " "363006" :CSys) "^INSERTCOL[]" ("M V #i \\-> M'
  7919. " "Inserts vector in symbolic matrix at col #i.
  7920. Checks for 0 < #i < #n + 1, but does not
  7921. check for matrix/vector size.
  7922. " "364006" :CSys) "^INSERT[]ROW[]" ("M3 M2 #i \\-> M
  7923. " "Inserts matrix2 in matrix3 starting from row
  7924. #i. Checks for 0 < #i < #n+1, but does not
  7925. check for matrix size.
  7926. " "365006" :CSys) "^INSERT[]COL[]" ("M3 M2 #i \\-> M
  7927. " "Inserts matrix2 in matrix3 starting from row
  7928. #i. Checks for 0 < #i < #n + 1, but does not
  7929. check for matrix size.
  7930. " "366006" :CSys) "^MATRIXCSWAP" ("M #c #c' \\-> M
  7931. " "Exchanges columns c and c' of a symbolic
  7932. matrix.
  7933. " "369006" :CSys) "^MATRIXRSWAP" ("M #r #r' \\-> M
  7934. " "Exchanges lines r and r' of a symbolic
  7935. matrix.
  7936. " "36A006" :CSys) "^SWAPROWS" ("M % %' \\-> M'
  7937. " "SWAP two rows in matrix. Internal version of
  7938. xRSWP.
  7939. " "0AC003" :1\.11) "^MATRIX-ROW" ("M #r \\-> M' lr
  7940. " "Extracts row #r from M. Checks boundaries.
  7941. " "36B006" :CSys) "^METAMAT-ROW" ("meta-M #r \\-> meta-M lr
  7942. " "Extracts row #r from meta-matrix. Checks
  7943. boundaries.
  7944. " "36C006" :CSys) "^MATRIX-COL" ("M #c \\-> M cc
  7945. " "Extracts column #r from matrix.
  7946. Checks boundaries.
  7947. " "36D006" :CSys) "^METAMATCSWAP" ("meta-M #c #c' \\-> meta-M
  7948. " "Exchanges columns c and c' of a meta-matrix.
  7949. " "36E006" :CSys) "^METAMATRSWAP" ("meta-M #l #l' \\-> meta-M
  7950. " "Exchanges lines l and l' of a meta-matrix (or
  7951. vector).
  7952. " "36F006" :CSys) "^STOMAText" ("M \\->
  7953. " "Stores matrix in 'MATRIX' in current
  7954. directory.
  7955. " "370006" :CSys) "^ADDMATOBJext" ("arry ob \\-> arry arry
  7956. ob arry \\-> arry arry
  7957. " "Used for addition of numeric matrix and
  7958. symbolic object.
  7959. " "378006" :CSys) "^VUNARYOP" ("v op \\-> V
  7960. " "Applies unary op(v[i]) to get V[i].
  7961. " "379006" :CSys) "^VBINARYOP" ("V2 V1 binop \\-> V
  7962. " "Works even if V2 and V1 do not have not the
  7963. same dimension.
  7964. " "37A006" :CSys) "^PEVAL" ("V r \\-> P[r]
  7965. " "Horner evaluation, where elements of V
  7966. represent coefficients of a polynomial.
  7967. " "37B006" :CSys) "^MATEGVL" ("M \\-> V
  7968. " "Computes eigenvalues of a matrix like <REF>xEGVL.
  7969. " "37C006" :CSys) "^MATEGV" ("M \\-> V
  7970. " "Computes eigenvalues/eigenvectors of a matrix
  7971. like <REF>xEGV.
  7972. " "37F006" :CSys) "^MADJ" ("M \\-> M^-1 P[M] P[lambda]
  7973. " "Computes inverse, matrix polynomial and
  7974. characteristic polynomial.
  7975. " "37E006" :CSys) "^JORDAN" ("M \\-> pmin pcar {evect} {eval}
  7976. pmadj pcar \\-> pmin pcar {evect} {eval}
  7977. " "Eigenvalue/eigenfunctions computation.
  7978. " "380006" :CSys) "^FLAGJORDAN" ("M \\->
  7979. " "Internal JORDAN.
  7980. " "22D006" :CSys) "^QXA" ("symb lidnt \\-> M lidnt
  7981. " "Converts symbolic quad form to matrix quad
  7982. form.
  7983. " "381006" :CSys) "^FLAGQXA" ("symb lidnt \\-> M lidnt
  7984. " "Internal QXA.
  7985. " "224006" :CSys) "^AXQ" ("M lidnt \\-> symb lidnt
  7986. " "Converts matrix quad form to qymbolic quad
  7987. form.
  7988. " "382006" :CSys) "^FLAGAXQ" ("M lidnt \\-> symb lidnt
  7989. " "Internal AXQ.
  7990. " "225006" :CSys) "^GAUSS" ("symb \\-> D P symb'
  7991. " "Gauss reduction of quadratic form (symbolic).
  7992. " "383006" :CSys) "^FLAGGAUSS" ("symb lidnt \\-> symb'
  7993. " "Internal GAUSS.
  7994. " "226006" :CSys) "^SYLVESTER" ("M \\-> D P
  7995. " "Gauss reduction of a quadratic form (matrix).
  7996. " "384006" :CSys) "^FLAGSYLVESTER" ("M \\-> P D
  7997. " "Internal SYLVESTER.
  7998. " "227006" :CSys) "^PCAR" ("[[]] \\-> symb
  7999. " "Internal PCAR.
  8000. " "228006" :CSys) "^x+ext" ("ob2 ob1 \\-> ob2+ob1
  8001. " "Symbolic addition, tests for infinities.
  8002. " "125006" :CSys) "^x-ext" ("ob2 ob1 \\-> ob2-ob1
  8003. " "Symbolic subtraction, tests for infinities.
  8004. " "126006" :CSys) "^x*ext" ("ob2 ob1 \\-> ob2*ob1
  8005. " "Symbolic multiplication, tests for
  8006. infinities.
  8007. " "127006" :CSys) "^x/ext" ("ob2 ob1 \\-> ob2/ob1
  8008. " "Symbolic division, tests for infinities.
  8009. " "129006" :CSys) "^x^ext" ("ob power \\-> ob^power
  8010. " "Power.
  8011. " "12B006" :CSys) "^EXPAND^" ("x y \\-> x^y=exp[y*ln[x]]
  8012. " "Power with simplifications. If y is a
  8013. fraction of integers, use XROOT^ instead.
  8014. " "12C006" :CSys) "^QNeg" ("ob \\-> -ob
  8015. " "Symbolic negation.
  8016. " "4FB006" :CSys) "^RNEGext" ("ob \\-> -ob
  8017. " "Symbolic negation.
  8018. " "4FC006" :CSys) "^SWAPRNEG" ("ob2 ob1 \\-> ob1 -ob2
  8019. " "Does SWAP then symbolic negation.
  8020. " "4FA006" :CSys) "^RREext" ("ob \\-> Re(ob)
  8021. " "Symboloc real part.
  8022. " "4FE006" :CSys) "^SWAPRRE" ("ob2 ob1 \\-> ob1 Re(ob2)
  8023. " "SWAP, then RREext.
  8024. " "4FD006" :CSys) "^RIMext" ("ob \\-> Im(ob)
  8025. " "Symbolic imaginary part.
  8026. " "500006" :CSys) "^SWAPRIM" ("ob1 ob2 \\-> ob2 Im(ob1)
  8027. " "SWAP, then RIMext.
  8028. " "4FF006" :CSys) "^xREext" ("symb \\-> symb'
  8029. " "Complex real part.
  8030. Expands only + - * / ^.
  8031. " "501006" :CSys) "^xIMext" ("symb \\-> symb'
  8032. " "Complex imaginary part.
  8033. Expands only + - * / ^.
  8034. " "503006" :CSys) "^RCONJext" ("ob \\-> Conj(ob)
  8035. " "Symbolic complex conjugate.
  8036. " "505006" :CSys) "^xSYMCONJ" ("
  8037. " "" "507006" :CSys) "^xABSext" ("ob \\-> abs(ob)
  8038. " "Symbolic QABSQ function.
  8039. " "50D006" :CSys) "^RABSext" ("ob \\-> abs(ob)
  8040. " "Internal ABS.
  8041. Internal representation.
  8042. " "50A006" :CSys) "^xSYMABS" ("
  8043. " "" "50F006" :CSys) "^xSYMSIGN" ("
  8044. " "" "512006" :CSys) "^xSYMARG" ("
  8045. " "" "514006" :CSys) "^CXIRext" ("
  8046. " "" "519006" :CSys) "^xINVext" ("ob \\-> 1/ob
  8047. " "Symbolic inversion.
  8048. " "52A006" :CSys) "^xSYMINV" ("symb \\-> 1/symb
  8049. " "Symbolic inversion.
  8050. " "557006" :CSys) "^xSQext" ("symb \\-> sq(symb)
  8051. " "Symbolic square.
  8052. " "553006" :CSys) "SYMSQ" ("symb \\-> symb^2
  8053. " "Calls ^xSYMSQ for symbolic objects and xSQ
  8054. for other objects.
  8055. " "2EF53" :UBS) "^xSYMSQ" ("symb \\-> symb^2
  8056. " "" "555006" :CSys) "^SXSQRext" ("ob \\-> sqrt(ob)
  8057. " "Does not take care of the sign.
  8058. " "51B006" :CSys) "^XSQRext" ("ob \\-> sqrt(ob)
  8059. " "Tries to return a positive square root if
  8060. nocareflag is cleared.
  8061. " "51C006" :CSys) "^xvext" ("ob \\-> sqrt(ob)
  8062. " "Symbolic square root, tests for 0 and 1.
  8063. " "52B006" :CSys) "^xSYMSQRT" ("symb \\-> sqrt(symb)
  8064. " "" "552006" :CSys) "^CKLN" ("ob \\-> ln(ob)
  8065. " "Symbolic LN with special handling for
  8066. fractions. Does not use the internal
  8067. representation.
  8068. " "521006" :CSys) "^xLNext" ("ob \\-> ln(ob)
  8069. " "Symbolic LN, without fraction handling.
  8070. " "522006" :CSys) "^xSYMLN" ("
  8071. " "" "524006" :CSys) "^EXPANDLN" ("ob \\-> ln(ob)
  8072. " "Symbolic LN using internal representation.
  8073. Before switching to internal representation,
  8074. test for ABS, 0 and 1 and, in real mode, test
  8075. if ob=exp(x).
  8076. " "525006" :CSys) "^REALLN" ("ob \\-> ln(ob)
  8077. " "Internal natural logarithm for a real
  8078. argument.
  8079. " "528006" :CSys) "^CMPLXLN" ("ob \\-> ln(ob)
  8080. " "Internal complex natural logarithm.
  8081. " "526006" :CSys) "^LNATANext" ("ob \\-> ln(ob)
  8082. " "Internal natural logarithm for complex.
  8083. " "527006" :CSys) "^xEXPext" ("y d n \\-> exp(y*n/d*i*\\pi)
  8084. " "Symbolic EXP, tests for 0, infinity and
  8085. i*k*\\pi/12 where k is an integer.
  8086. Tests for d=1,2,3,4,6.
  8087. " "529006" :CSys) "^xCOSext" ("ob \\-> cos(ob)
  8088. " "Symbolic COS, tests for 0 and multiples of
  8089. \\pi/12. Also tests if ob=acos(x) or
  8090. ob=asin(x).
  8091. " "52C006" :CSys) "^xSYMCOS" ("ob \\-> cos(ob)
  8092. " "" "536006" :CSys) "^xACOSext" ("ob \\-> acos(ob)
  8093. " "Symbolic ACOS. Tests for 0, infinity and
  8094. tables.
  8095. " "533006" :CSys) "^xSYMACOS" ("ob \\-> acos(ob)
  8096. " "" "53F006" :CSys) "^xSINext" ("ob \\-> sin(ob)
  8097. " "Symbolic SIN, tests for 0 and multiplies of
  8098. \\pi/12. Also tests if ob=acos(x) or
  8099. ob=asin(x).
  8100. " "52D006" :CSys) "^xSYMSIN" ("ob \\-> sin(ob)
  8101. " "" "538006" :CSys) "^xASINext" ("ob \\-> asin(ob)
  8102. " "Symbolic ASIN. Tests for 0, infinity and
  8103. tables.
  8104. " "532006" :CSys) "^xSYMASIN" ("ob \\-> asin(ob)
  8105. " "" "53D006" :CSys) "^xTANext" ("ob \\-> tan(ob)
  8106. " "Symbolic TAN. Tests for 0 and multiplies of
  8107. \\pi/12. Also tests if ob=atan(x).
  8108. " "52E006" :CSys) "^xSYMTAN" ("ob \\-> tan(ob)
  8109. " "" "53A006" :CSys) "^xATANext" ("ob \\-> atan(ob)
  8110. " "Symbolic ATAN. Tests for 0, infinity and
  8111. tables.
  8112. " "534006" :CSys) "^xSYMATAN" ("ob \\-> atan(ob)
  8113. " "" "541006" :CSys) "^xCOSHext" ("ob \\-> cosh(ob)
  8114. " "Symbolic COSH. Tests for 0, infinity and
  8115. acosh(x).
  8116. " "52F006" :CSys) "^xSYMCOSH" ("ob \\-> cosh(ob)
  8117. " "" "545006" :CSys) "^xACOSHext" ("symb \\-> acosh(symb)
  8118. " "Symbolic ACOSH.
  8119. " "54E006" :CSys) "^xSYMACOSH" ("symb \\-> acosh(symb)
  8120. " "" "550006" :CSys) "^xSINHext" ("ob \\-> sinh(ob)
  8121. " "Symbolic SINH. Tests for 0, infinity and
  8122. asinh(x).
  8123. " "530006" :CSys) "^xSYMSINH" ("ob \\-> sinh(ob)
  8124. " "" "543006" :CSys) "^xASINHext" ("symb \\-> symb'
  8125. " "Symbolic ASINH.
  8126. " "54B006" :CSys) "^xSYMASINH" ("symb \\-> asinh(symb)
  8127. " "" "54D006" :CSys) "^xTANHext" ("ob \\-> tanh(ob)
  8128. " "Symbolic TANH. Tests for 0 and atanh(x).
  8129. " "531006" :CSys) "^xSYMTANH" ("ob \\-> tanh(ob)
  8130. " "Symbolic TANH.
  8131. " "547006" :CSys) "^xATANHext" ("symb \\-> symb'
  8132. " "Symbolic ATANH.
  8133. " "548006" :CSys) "^xSYMATANH" ("ob \\-> atanh(ob)
  8134. " "" "54A006" :CSys) "^xSYMD>R" ("
  8135. " "" "55B006" :CSys) "^xSYMR>D" ("
  8136. " "" "55D006" :CSys) "^xSYMFLOOR" ("symb \\-> symb'
  8137. " "" "55F006" :CSys) "^xSYMCEIL" ("symb \\-> symb'
  8138. " "" "561006" :CSys) "^xSYMIP" ("symb \\-> symb'
  8139. " "" "563006" :CSys) "^xSYMFP" ("symb \\-> symb'
  8140. " "" "565006" :CSys) "^xSYMXPON" ("symb \\-> symb'
  8141. " "" "567006" :CSys) "^xSYMMANT" ("symb \\-> symb'
  8142. " "" "569006" :CSys) "^xSYMLNP1" ("symb \\-> symb'
  8143. " "" "56B006" :CSys) "^xSYMLOG" ("symb \\-> symb'
  8144. " "" "56D006" :CSys) "^xSYMALOG" ("symb \\-> symb'
  8145. " "" "56F006" :CSys) "^xSYMEXPM1" ("symb \\-> symb'
  8146. " "" "571006" :CSys) "^factorial" ("symb \\-> symb!
  8147. " "Symbolic factorial.
  8148. " "572006" :CSys) "^facts" ("symb \\-> symb!
  8149. " "Symbolic factorial.
  8150. " "573006" :CSys) "^xSYMFACT" ("symb \\-> symb!
  8151. " "" "575006" :CSys) "^xSYMNOT" ("symb \\-> symb'
  8152. " "" "578006" :CSys) "^x=ext" ("ob2 ob1 \\-> ob2=ob1
  8153. " "" "128006" :CSys) "^xssSYMXROOT" ("
  8154. " "" "12E006" :CSys) "^xssSYM+" ("
  8155. " "" "3AC006" :CSys) "^xssSYM-" ("
  8156. " "" "3AE006" :CSys) "^xssSYM*" ("
  8157. " "" "3B0006" :CSys) "^xssSYM/" ("
  8158. " "" "3B2006" :CSys) "^xssSYM^" ("
  8159. " "" "3B6006" :CSys) "^xSYMCHS" ("
  8160. " "" "3B8006" :CSys) "^xssSYMMIN" ("
  8161. " "" "130006" :CSys) "^xssSYMMAX" ("
  8162. " "" "132006" :CSys) "^xssSYM<?" ("
  8163. " "" "134006" :CSys) "^xssSYM<=?" ("
  8164. " "" "136006" :CSys) "^xssSYM>?" ("
  8165. " "" "138006" :CSys) "^xssSYM>=?" ("
  8166. " "" "13A006" :CSys) "^xssSYM=?" ("
  8167. " "" "13C006" :CSys) "^xssSYM#?" ("
  8168. " "" "13E006" :CSys) "^xssSYM%" ("
  8169. " "" "140006" :CSys) "^xssSYM%CH" ("
  8170. " "" "142006" :CSys) "^xssSYM%T" ("
  8171. " "" "144006" :CSys) "^xssSYMMOD" ("
  8172. " "" "146006" :CSys) "^xssSYMTRCXY" ("
  8173. " "" "148006" :CSys) "^xssSYMRNDXY" ("
  8174. " "" "14A006" :CSys) "^xssSYMCOMB" ("
  8175. " "" "14C006" :CSys) "^xssSYMPERM" ("
  8176. " "" "14E006" :CSys) "^xssSYMOR" ("
  8177. " "" "150006" :CSys) "^xssSYMAND" ("
  8178. " "" "152006" :CSys) "^xssSYMXOR" ("
  8179. " "" "154006" :CSys) "^COS2TAN/2" ("symb \\-> symb'
  8180. " "x \\-> (1-(tan(x/2))^2)/(1+(tan(x/2))^2)
  8181. " "408006" :CSys) "^SIN2TAN/2" ("symb \\-> symb'
  8182. " "x \\-> 2 tan(x/2)/(1+(tan(x/2))^2)
  8183. " "40B006" :CSys) "^TAN2TAN/2" ("symb \\-> symb'
  8184. " "x \\-> 2 tan(x/2)/(1-(tan(x/2))^2)
  8185. " "40E006" :CSys) "^COS2TAN" ("symb \\-> symb2
  8186. " "x \\-> 1/sqrt(1+(tan(x))^2)
  8187. " "412006" :CSys) "^SIN2TAN" ("symb \\-> symb'
  8188. " "x \\-> tan(x)/sqrt(1+(tan(x))^2)
  8189. " "414006" :CSys) "^LNP12LN" ("symb \\-> symb'
  8190. " "x \\-> ln(x+1)
  8191. " "41A006" :CSys) "^LOG2LN" ("symb \\-> symb'
  8192. " "x \\-> log(x)
  8193. " "41B006" :CSys) "^ALOG2EXP" ("symb \\-> symb'
  8194. " "x \\-> alog(x)
  8195. " "41C006" :CSys) "^EXPM2EXP" ("symb \\-> symb'
  8196. " "x \\-> exp(x)-1
  8197. " "41D006" :CSys) "^SQRT2LNEXP" ("symb \\-> symb'
  8198. " "x \\-> exp(ln(x)/2)
  8199. " "41E006" :CSys) "^sqrt2lnexp" ("meta \\-> meta'
  8200. " "x \\-> exp(ln(x)/2)
  8201. " "41F006" :CSys) "^TAN2EXP" ("symb \\-> symb'
  8202. " "x \\-> (exp(i2x)-1)/(i*(exp(i2x)+1))
  8203. " "420006" :CSys) "^ASIN2LN" ("symb \\-> symb'
  8204. " "x \\-> = i*ln(x+sqrt(x^2-1))+pi/2.
  8205. " "422006" :CSys) "^ACOS2LN" ("symb \\-> symb'
  8206. " "x \\-> ln(x+sqrt(x^2-1))/i
  8207. " "424006" :CSys) "^TAN2SC" ("symb \\-> symb'
  8208. " "x \\-> sin(x)/cos(x)
  8209. " "427006" :CSys) "^SIN2TC" ("symb \\-> symb'
  8210. " "x \\-> cos(x)*tan(x)
  8211. " "42A006" :CSys) "^COS2ext" ("symb \\-> symb'
  8212. " "x \\-> sqrt(1-(sin(x))^2).
  8213. " "42C006" :CSys) "^SIN2ext" ("symb \\-> symb'
  8214. " "x \\-> sqrt(1-(cos(x))^2).
  8215. " "42E006" :CSys) "^ATAN2ASIN" ("symb \\-> symb'
  8216. " "x \\-> asin(x/sqrt(x^2+1))
  8217. " "431006" :CSys) "^ASIN2ATAN" ("symb \\-> symb'
  8218. " "x \\-> atan(x/sqrt(1-x^2))
  8219. " "434006" :CSys) "^ASIN2ACOS" ("symb \\-> symb'
  8220. " "x \\-> \\pi/2-acos(x)
  8221. " "437006" :CSys) "^ACOS2ASIN" ("symb \\-> symb'
  8222. " "x \\-> \\pi/2-asin(x)
  8223. " "43C006" :CSys) "^ATAN2LNext" ("symb \\-> symb'
  8224. " "x \\-> i/2*ln((i+x)/(i-x))
  8225. " "43D006" :CSys) "^TAN2SC2" ("symb \\-> symb'
  8226. " "x \\-> (1-cos(2x))/sin(2x)
  8227. " "440006" :CSys) "^TAN2CS2" ("symb \\-> symb'
  8228. " "x \\-> sin(2x)/(1+cos(2x))
  8229. " "442006" :CSys) "^SIN2EXPext" ("symb \\-> symb'
  8230. " "x \\-> (e^(i*x)-1/e^(i*x))/(2i)
  8231. " "444006" :CSys) "^COS2EXPext" ("symb \\-> symb'
  8232. " "x \\-> (e^(i*x)+1/e^(i*x))/2
  8233. " "446006" :CSys) "^SINH2EXPext" ("symb \\-> symb'
  8234. " "x \\-> (e^x-1/e^x)/2
  8235. " "448006" :CSys) "^COSH2EXPext" ("symb \\-> symb'
  8236. " "x \\-> (e^x+1/e^x)/2
  8237. " "44A006" :CSys) "^TANH2EXPext" ("symb \\-> symb'
  8238. " "x \\-> (e^2x-1)/(e^2x+1)
  8239. " "44C006" :CSys) "^ASINH2LNext" ("symb \\-> symb'
  8240. " "x \\-> ln(x+sqrt(x^2+1))
  8241. " "44E006" :CSys) "^ACOSH2LNext" ("symb \\-> symb'
  8242. " "x \\-> ln(x+sqrt(x^2-1))
  8243. " "450006" :CSys) "^ATANH2LNext" ("symb \\-> symb'
  8244. " "x \\-> ln((1+x)/(1-x))/2
  8245. " "452006" :CSys) "^XROOT2ext" ("symb1 symb2 \\-> symb'
  8246. " "x y \\-> exp(ln(y)/x)
  8247. " "454006" :CSys) "^LN2ATAN" ("symb \\-> symb'
  8248. " "x \\-> ln(x)
  8249. " "45A006" :CSys) "^VAR=LIST" ("idnt {} \\-> {}'
  8250. " "Replaces all elements of the initial list by
  8251. idnt=element.
  8252. " "45B006" :CSys) "^SYMBEXEC" ("ob symb \\-> ob'
  8253. " "If symb is an equation, executes the
  8254. corresponding change of variables in ob,
  8255. otherwise tries to find symb so that ob is
  8256. zero. Note that change of variable works for
  8257. change of user functions.
  8258. " "464006" :CSys) "^MEVALext" ("ob {} {}' \\-> ob'
  8259. " "Replaces all occurrances of an element of
  8260. list2 by the corresponding element of list1
  8261. in ob. Looks in ob from outer to inner
  8262. expressions. list2 and list1 may contain
  8263. secondaries. If vxxlflag is set SIGN var are
  8264. leaved unchanged.
  8265. " "465006" :CSys) "^CASNUMEVAL" ("symb list1 list2 \\-> symb'
  8266. " "Evaluation of a symbolic. The lists' formats are
  8267. list1={idnt/lam1... idnt_n/lam_n}
  8268. list2={value1...value_n}.
  8269. The idnt's/lam's in list1 are *not*
  8270. evaluated before replacing value1...value_n.
  8271. " "466006" :CSys) "^CASCOMPEVAL" ("symb \\-> symb'
  8272. " "Evaluation of a symbolic.
  8273. " "467006" :CSys) "^REPLACE2BY1" ("symb idnt a \\-> symb'
  8274. " "Evaluation of a symbolic replacing an idnt by
  8275. a value; for example evaluation of F(X) for
  8276. X=1/2)
  8277. " "468006" :CSys) "^NR_REPLACE" ("symb idnt a \\-> symb'
  8278. " "Like <REF>REPLACE2BY1 but prevents evaluation
  8279. of INT.
  8280. " "469006" :CSys) "^SYMBWHERE" ("
  8281. " "" "46A006" :CSys) "^CASCRUNCH" ("ob \\-> %
  8282. " "Like <REF>CRUNCH but in approximate mode.
  8283. " "46B006" :CSys) "^APPROXCOMPEVAL" ("symb \\-> symb'
  8284. " "Like <REF>CASCOMPEVAL but in approximate
  8285. mode.
  8286. " "46C006" :CSys) "^ALGCASCOMPEVAL" ("expr \\-> expr
  8287. " "" "11A007" :1\.11 :CSys) "^SLVARext" ("Lvar \\-> Lvar'
  8288. " "Simplifies all elements of the list that are
  8289. supposed to be variables.
  8290. " "297006" :CSys) "^SIMPLIFY" ("symb \\-> symb'
  8291. " "Simplifies one object like <REF>xEVAL.
  8292. " "298006" :CSys) "^SIMP1ext" ("symb \\-> symb'
  8293. " "Simplifies one object like <REF>xEXPAND.
  8294. Object must be a symbolic, a real or a
  8295. complex number.
  8296. " "299006" :CSys) "^SYMEXPAN" ("symb \\-> symb'
  8297. " "Simplifies one object like <REF>xEXPAN.
  8298. Object must be symb/real/cmplx.
  8299. " "29A006" :CSys) "^SIMPVAR" ("ob \\-> ob'
  8300. " "Simplifies variable.
  8301. " "29B006" :CSys) "^SIMPSYMBS" ("inf sup fcn var \\-> int(inf,sup,fcn,var)
  8302. " "" "2A0006" :CSys) "^SYMINTEGRAL" ("
  8303. " "" "2A1006" :CSys) "^SIMPUSERFCN" ("ob1..obn #n ob \\-> id[]
  8304. " "Simplification of user functions. Tests for
  8305. derivative of user functions. Ob must be an
  8306. id, a symbolic, a secondary or a romptr.
  8307. " "2A2006" :CSys) "^EVALUSERFCN" ("V1..Vn #n fcn \\-> f[]
  8308. " "Evaluates a user function with stack checking.
  8309. " "2A3006" :CSys) "^SIMP|" ("ob list \\-> ob'
  8310. " "Executes the WHERE operator.
  8311. " "2A4006" :CSys) "^SIMPext" ("ob1 ob2 \\-> ob1' ob2'
  8312. " "Simplifies two objects in internal
  8313. representation. Checks that o2 is not a
  8314. complex or an irrquad because decomposition
  8315. of the corresponding fraction with larg would
  8316. generate a \"Try to recover Memory\".
  8317. " "2A9006" :CSys) "^SIMPEXTOK" ("
  8318. " "" "2AA006" :CSys) "^SLOWSIMP2L" ("
  8319. " "" "2AC006" :CSys) "^SIMPGCDext" ("o1 o2 gcd \\-> o1/gcd o2/gcd
  8320. " "Divides o1 and o2 by gcd.
  8321. " "2AD006" :CSys) "^SIMP3ext" ("a b \\-> g a'' b''
  8322. " "Calculates g = gcd(a,b) and a''=a/g and
  8323. b''=b/g.
  8324. " "2AE006" :CSys) "^SIMP3LISText" ("
  8325. " "" "2AF006" :CSys) "^SIMP3LSTSLOW" ("
  8326. " "" "2B0006" :CSys) "^TSIMP2ext" ("symb \\-> symb
  8327. " "Transcendental simplifications. Converts
  8328. only sqrt ^ and XROOT to EXP/LN. LN are
  8329. returned as -1/INV[-LN[]] for use by SERIES.
  8330. " "2B9006" :CSys) "^TSIMPext" ("symb \\-> symb
  8331. " "Transcendental simplifications. Convert
  8332. transcendental functions to EXP and LN.
  8333. " "2BA006" :CSys) "^TSIMP3ext" ("symb \\-> symb
  8334. " "" "2BB006" :CSys) "^COLCext" ("symb \\-> symb'
  8335. " "Factorization with respect to the current
  8336. variable of symb and factorization of the
  8337. integer content of symb.
  8338. " "26E006" :CSys) "^TCOLLECT" ("symb \\-> symb'
  8339. " "Performs trigonometric linearization and then
  8340. collects sines and cosines of the same angle.
  8341. " "2FE006" :CSys) "^SIGMAEXPext" ("symb \\-> symb'
  8342. " "Conversion to exp and ln with exponential
  8343. linearization.
  8344. " "2FF006" :CSys) "^LINEXPext" ("symb \\-> Meta
  8345. " "Meta = arg_exp1 coef1 ... arg_expn coefn #2n.
  8346. " "300006" :CSys) "^SIGMAEXP2ext" ("Meta \\-> symb
  8347. " "Back conversion from arg_exp/coef_meta to
  8348. symbolic.
  8349. " "301006" :CSys) "^SINEXPA" ("symb \\-> symb'
  8350. " "Expands SIN.
  8351. " "303006" :CSys) "^LNEXPA" ("symb \\-> symb'
  8352. " "Expands LN.
  8353. " "316006" :CSys) "^MTRIG2SYMB" ("Meta \\-> symb
  8354. " "Back conversion of trig-meta to symbolic.
  8355. " "31C006" :CSys) "^COSEXPA" ("symb \\-> symb'
  8356. " "Expands COS.
  8357. " "309006" :CSys) "^EXPEXPA" ("symb \\-> symb'
  8358. " "Expands EXP.
  8359. " "30F006" :CSys) "^LINEXPA" ("symb \\-> Meta
  8360. " "Alternates trig operator and coefficient.
  8361. " "31B006" :CSys) "^LNCOLCext" ("symb \\-> symb'
  8362. " "Collects logarithms.
  8363. " "31D006" :CSys) "^TEXPAext" ("symb \\-> symb
  8364. " "Main transcendental expansion program.
  8365. " "31F006" :CSys) "^SYMCOLCT" ("
  8366. " "" "26F006" :CSys) "^COLC1" ("
  8367. " "" "270006" :CSys) "^COLC2" ("
  8368. " "" "271006" :CSys) "^EXLR" ("'a=b' \\-> a b
  8369. ob \\-> X ob
  8370. " "Internal equation splitter.
  8371. " "240006" :CSys) "^HALFTAN" ("symb \\-> symb'
  8372. " "Converts trigonometric functions to QTANQ of
  8373. the half angle.
  8374. " "407006" :CSys) "^TRIGTAN" ("symb \\-> symb'
  8375. " "Convert sin and cos to tan of the same
  8376. angle.
  8377. " "411006" :CSys) "^TRIGext" ("symb \\-> symb'
  8378. " "Applies sin^2+cos^2=1 to simplify
  8379. trigonometric expressions. If flag -116
  8380. is set, tries to keep only sin, else only
  8381. cos.
  8382. " "416006" :CSys) "^HYP2EXPext" ("symb \\-> symb'
  8383. " "Converts hyperbolic functions to exp and ln.
  8384. Converts QXROOTQ and ^ to QexpQ and QlnQ.
  8385. " "417006" :CSys) "^EXPLNext" ("symb \\-> symb'
  8386. " "Converts all transcendental functions to exp
  8387. and ln.
  8388. " "418006" :CSys) "^SERIESEXPLN" ("symb \\-> symb'
  8389. " "Converts QsqrtQ, ^ and QXROOTQ to QEXP/LNQ.
  8390. " "419006" :CSys) "^TAN2SCext" ("symb \\-> symb'
  8391. " "Converts QtanQ to Qsin/cosQ.
  8392. " "426006" :CSys) "^SIN2TCext" ("symb \\-> symb'
  8393. " "Converts QsinQ to Qcos*tanQ.
  8394. " "429006" :CSys) "^ATAN2Sext" ("symb \\-> symb'
  8395. " "Converts QATANQ to QASINQ using
  8396. asin(x)=atan(x/sqrt(1-x^2)).
  8397. " "430006" :CSys) "^ASIN2Text" ("symb \\-> symb'
  8398. " "Converts QASINQ to QATANQ using
  8399. asin(x)=atan(x/sqrt(1-x^2)).
  8400. " "433006" :CSys) "^ASIN2Cext" ("symb \\-> symb'
  8401. " "Converts QASINQ to QACOSQ using
  8402. asin(x)=pi/2-acos(x).
  8403. " "436006" :CSys) "^ACOS2Sext" ("symb \\-> symb'
  8404. " "Converts QACOSQ to QASINQ using
  8405. acos(x)=pi/2-asin(x).
  8406. " "43A006" :CSys) "^TAN2SC2ext" ("symb \\-> symb'
  8407. " "Converts QTANQ to QSIN/COSQ of the double
  8408. angle. If flag -116 is set calls TAN2SC2,
  8409. else TAN2CS2.
  8410. " "43F006" :CSys) "^LN2ext" ("symb \\-> symb'
  8411. " "If symb contains x, returns -1/inv(-ln(x)),
  8412. else ln(x). Used by SERIES.
  8413. " "456006" :CSys) "^SINCOSext" ("symb \\-> symb'
  8414. " "Converts exp and ln to exp*sin+cos and
  8415. ln+i*atan.
  8416. " "457006" :CSys) "^PSEUDODIV" ("Q2 Q1 \\-> a Q2*a/Q1 Q2*a/Q1
  8417. " "" "3E8006" :CSys) "^IDIV2" ("
  8418. " "" "3E9006" :CSys) "^BESTDIV2" ("o2 o1 \\-> quo mod
  8419. " "" "3EA006" :CSys) "^CDIV2ext" ("
  8420. " "" "3EB006" :CSys) "^QUOText" ("o2 o1 \\-> o2 div o1
  8421. " "Euclidean quotient of 2 objets (works even if
  8422. o2 mod o1=0).
  8423. " "3EC006" :CSys) "^NEWDIVext" ("ob2 ob1 \\-> quo mod
  8424. " "Euclidean division, ob2 and ob1 may be
  8425. fractions of returns a fraction of Q.
  8426. " "3ED006" :CSys) "^QUOTOBJext" ("a_a-1...a0 bb_1...b0 #b #a flag \\-> r q
  8427. " "SRPL Euclidean division: step 2 computes the
  8428. remainder r only if flag is TRUE.
  8429. " "3F3006" :CSys) "^DIVISIBLE?" ("a b \\-> a/b T
  8430. \\-> ob F
  8431. " "Returns TRUE and quotient if b divides a,
  8432. otherwise returns FALSE.
  8433. " "3F4006" :CSys) "^QDiv?" ("a b \\-> a/b T
  8434. \\-> F
  8435. " "Returns TRUE and quotient if b divides a,
  8436. otherwise returns FALSE.
  8437. " "3F5006" :CSys) "^" ("" "Euclidean division. Assumes P and Q have
  8438. integer or Gaussian integer coefficient.
  8439. Returns FALSE in complex mode or if sparse
  8440. short division fails.
  8441. " "3F6006" :CSys) "^POTENCEext" ("z1 z2 \\-> q r
  8442. " "Step by step Euclidean division for small
  8443. integers.
  8444. " "3F7006" :CSys) "^DENOLCMext" ("list \\-> ob
  8445. " "Calculates the LCM of the denominator of the
  8446. elements of the list. If input is not a list,
  8447. returns the denominator of the object.
  8448. " "2A5006" :CSys) "^METADENOLCM" ("Meta \\-> ob
  8449. " "Calculates LCM of the denominators of the
  8450. elements of Meta.
  8451. " "2A6006" :CSys) "^LPGCDext" ("{} \\-> {} ob
  8452. " "Calculates the GCD of all the elements in the
  8453. list. The algorithm is far from optimal.
  8454. " "2B1006" :CSys) "^SLOWGCDext" ("c 1 A B \\-> c* gcd(A,B)
  8455. " "Euclidean algorithm for polynomial GCD. Used
  8456. if A or B contains irrquads. c is the GCD of
  8457. the contents of the original polynomials
  8458. returned after failure of GCDHEUext.
  8459. " "2B2006" :CSys) "^QGcd" ("ob2 ob1 \\-> gcd
  8460. " "Generic internal GCD.
  8461. ( LAM2: GCDext ob1, ob2 \\-> pgcd ).
  8462. " "2B3006" :CSys) "^GCDext" ("
  8463. " "" "2B4006" :CSys) "^SYMBINCOMP" ("symb \\-> ob1 .. obN #n
  8464. ob \\-> ob #1
  8465. {} \\-> {} #1
  8466. " "Explodes symbolic object into meta. Other
  8467. objects are converted into one-object metas
  8468. by pushing #1 into the stack.
  8469. " "157006" :CSys) "^m-1&m+1" ("meta \\-> meta&1&+ meta&1&-
  8470. " "Creates two copies of the meta. To the first
  8471. one, adds 1 and +, to the second one, adds 1
  8472. and -.
  8473. " "386006" :CSys) "^meta1/meta" ("meta \\-> meta 1&meta&/
  8474. " "Duplicates the meta, and inverts the
  8475. expression represented by it.
  8476. " "387006" :CSys) "^1&meta" ("Meta \\-> 1&Meta
  8477. " "Prepends the number 1 to the meta.
  8478. " "388006" :CSys) "^meta/2" ("Meta \\-> Meta&2&/
  8479. " "Divides the expression by two.
  8480. " "389006" :CSys) "^addt2" ("Meta \\-> Meta&2
  8481. " "Appends the number 2 to the meta.
  8482. " "38A006" :CSys) "^addt/" ("Meta \\-> Meta&/
  8483. " "Appends division to meta.
  8484. " "38B006" :CSys) "^meta2*" ("Meta \\-> 2&Meta&*
  8485. " "Multiplies the expression by 2.
  8486. " "38C006" :CSys) "^metai*" ("meta \\-> meta*i
  8487. " "Multiplies meta by i.
  8488. " "459006" :CSys) "^meta1-sq" ("Meta \\-> 1&Meta&SQ&-
  8489. " "Changes x into 1-x^2, where x is the
  8490. original expression.
  8491. " "38D006" :CSys) "^metasq+1" ("Meta \\-> Meta&SQ&1&+
  8492. " "Changes x into x^2+1, where x is the
  8493. original expression.
  8494. " "38E006" :CSys) "^metasq-1" ("Meta \\-> Meta&SQ&1&-
  8495. " "Changes x into x^2-1, where x is the
  8496. original equation.
  8497. " "38F006" :CSys) "^meta-1" ("Meta \\-> Meta&1&-
  8498. " "Subtracts one from the expression.
  8499. " "390006" :CSys) "^addt^" ("Meat \\-> Meta&^
  8500. " "Append power operator to meta object.
  8501. " "398006" :CSys) "^top&addt*" ("meta2 meta1 \\-> meta2*meta1
  8502. " "top& addt*.
  8503. No checks.
  8504. " "39C006" :CSys) "^top&addt/" ("meta2 meta1 \\-> meta2/meta1
  8505. " "top& addt/.
  8506. No checks.
  8507. " "39D006" :CSys) "^addti" ("meta \\-> meta&i
  8508. " "Appends i (the Imaginary unit) to
  8509. expression.
  8510. " "39E006" :CSys) "^metaadd" ("Meta1 Meta2 \\-> Meta1+Meta2
  8511. " "Adds 2 meta objects with trivial
  8512. simplifications. metaadd checks for
  8513. Meta1/2=Z0 ONE.
  8514. " "393006" :CSys) "^MetaAdd" ("Meta2 Meta1 \\-> Meta2+Meta1
  8515. " "Adds 2 meta objects with trivial
  8516. simplifications. Checks for infinities then
  8517. call metaadd.
  8518. " "3AB006" :CSys) "^ckaddt+" ("Meta1 Meta2 \\-> Meta1+Meta2
  8519. " "Adds 2 meta objects with trivial
  8520. simplifications.
  8521. " "1CE006" :CSys) "^metasub" ("Meta1 Meta2 \\-> Meta1+Meta2
  8522. " "Subtracts 2 meta objects with trivial
  8523. simplifications. metasub checks for
  8524. Meta1/2=Z0 ONE.
  8525. " "394006" :CSys) "^MetaSub" ("Meta2 Meta1 \\-> Meta2-Meta1
  8526. " "Subtracts 2 meta objects with trivial
  8527. simplifications. Checks for infinities then
  8528. call metasub.
  8529. " "3AD006" :CSys) "^ckaddt-" ("Meta1 Meta2 \\-> Meta1+Meta2
  8530. " "Subtracts 2 meta objects with trivial
  8531. simplifications.
  8532. " "1CF006" :CSys) "^metamult" ("Meta1 Meta2 \\-> Meta1*Meta2
  8533. " "Multiplies 2 meta objects with trivial
  8534. simplifications. Checks for meta1, meta2= Z0
  8535. or Z1, checks for xNEG.
  8536. " "395006" :CSys) "^MetaMul" ("Meta2 Meta1 \\-> Meta2*Meta1
  8537. " "Multiplies 2 meta objects with trivial
  8538. simplifications. Checks for infinities/0
  8539. then call metamult.
  8540. " "3AF006" :CSys) "^ckaddt*" ("Meta1 Meta2 \\-> Meta1*Meta2
  8541. " "Multiplies 2 meta objects with trivial
  8542. simplifications.
  8543. " "1CD006" :CSys) "^metadiv" ("Meta2 Meta1 \\-> Meta2/Meta1
  8544. " "Divides 2 meta objects with trivial
  8545. simplifications. Checks for infinities and
  8546. 0, meta2 =1 or Z-1, checks for xNEG.
  8547. " "396006" :CSys) "^MetaDiv" ("Meta2 Meta1 \\-> Meta2/Meta1
  8548. " "Divide 2 meta objects with trivial
  8549. simplifications. Checks for infinities and 0
  8550. then call metadiv.
  8551. " "3B1006" :CSys) "^DIVMETAOBJ" ("o1...on #n ob \\-> {o1/ob...on/ob}
  8552. " "Division of all elements of a meta by ob.
  8553. Tests if o=1.
  8554. " "3F1006" :wasCSys) "^meta^" ("Meta ob \\-> Meta&ob&^
  8555. " "Elevates expression to a power. If ob=1, just
  8556. returns the expression. Tests for present of
  8557. xNEG in the end of meta for integral powers.
  8558. " "397006" :CSys) "^metapow" ("Meta2 Meta1 \\-> Meta2^Meta1
  8559. " "Elevates expression to a power (any other
  8560. expression). If length of Meta1 is ONE, calls
  8561. meta^.
  8562. " "399006" :CSys) "^MetaPow" ("Meta2 Meta1 \\-> Meta2^Meta1
  8563. " "Power. Checks for infinities then calls
  8564. metapow.
  8565. " "3B5006" :CSys) "^metaxroot" ("Meta2 Meta1 \\-> Meta2&XROOT&Meta1
  8566. " "Root of expression.
  8567. " "39B006" :CSys) "^metaneg" ("meta \\-> meta
  8568. " "Checks only for meta finishing by xNEG.
  8569. " "3B9006" :CSys) "^metackneg" ("meta \\-> meta
  8570. " "Like <REF>metaneg but checks for meta=ob
  8571. ONE.
  8572. " "3BA006" :CSys) "^MetaNeg" ("Meta \\-> Meta
  8573. " "Negates meta. Only checks for final <REF>xNEG
  8574. in meta.
  8575. " "3B7006" :CSys) "^xSYMRE" ("meta \\-> meta'
  8576. " "Meta complex real part.
  8577. Expands only + - * / ^.
  8578. " "502006" :CSys) "^xSYMIM" ("meta \\-> meta'
  8579. " "Meta complex imaginary part.
  8580. Expands only + - * / ^.
  8581. " "504006" :CSys) "^addtABS" ("Meta \\-> Meta'
  8582. " "Meta QABSQ.
  8583. Does a QCRUNCHQ first to find sign.
  8584. " "50E006" :CSys) "^addtABSEXACT" ("Meta \\-> Meta'
  8585. " "Meta QABSQ.
  8586. No crunch, sign is only found using exact
  8587. methods.
  8588. " "510006" :CSys) "^addtSIGN" ("Meta \\-> Meta'
  8589. " "Meta QSIGNQ.
  8590. " "511006" :CSys) "^addtARG" ("Meta \\-> Meta'
  8591. " "Meta QARGQ.
  8592. " "513006" :CSys) "^addtXROOT" ("Meta2 Meta1 \\-> Meta'
  8593. " "Meta QXROOTQ.
  8594. QXROOTQ(o2,o1) is o1^[1/o2], compared to o2^o1.
  8595. " "12D006" :CSys) "^addtMIN" ("Meta2 Meta1 \\-> Meta'
  8596. " "Meta QMINQ.
  8597. " "12F006" :CSys) "^addtMAX" ("Meta2 Meta1 \\-> Meta'
  8598. " "Meta QMAXQ.
  8599. " "131006" :CSys) "^addt<" ("Meta2 Meta1 \\-> Meta'
  8600. " "Meta <.
  8601. " "133006" :CSys) "^addt<=" ("Meta2 Meta1 \\-> Meta'
  8602. " "Meta <=.
  8603. " "135006" :CSys) "^addt>" ("Meta2 Meta1 \\-> Meta'
  8604. " "Meta >.
  8605. " "137006" :CSys) "^addt>=" ("Meta2 Meta1 \\-> Meta'
  8606. " "Meta >=.
  8607. " "139006" :CSys) "^addt==" ("Meta2 Meta1 \\-> Meta'
  8608. " "Meta ==.
  8609. " "13B006" :CSys) "^addt!=" ("Meta2 Meta1 \\-> Meta'
  8610. " "Meta !=.
  8611. " "13D006" :CSys) "^addt%" ("Meta2 Meta1 \\-> Meta'
  8612. " "Meta %.
  8613. " "13F006" :CSys) "^addt%CH" ("Meta2 Meta1 \\-> Meta'
  8614. " "Meta Q%CHQ.
  8615. Meta2*(1+Meta'/100)=Meta1.
  8616. " "141006" :CSys) "^addt%T" ("Meta2 Meta1 \\-> Meta'
  8617. " "Meta Q%TQ.
  8618. " "143006" :CSys) "^addtMOD" ("Meta2 Meta1 \\-> Meta'
  8619. " "Meta QMODQ.
  8620. " "145006" :CSys) "^addtTRNC" ("Meta2 Meta1 \\-> Meta'
  8621. " "Meta QTRNCQ.
  8622. " "147006" :CSys) "^addtRND" ("Meta2 Meta1 \\-> Meta'
  8623. " "Meta QRNDQ.
  8624. " "149006" :CSys) "^addtCOMB" ("Meta2 Meta1 \\-> Meta'
  8625. " "Meta QCOMBQ.
  8626. " "14B006" :CSys) "^addtPERM" ("Meta2 Meta1 \\-> Meta'
  8627. " "Meta QPERMQ.
  8628. " "14D006" :CSys) "^addtOR" ("Meta2 Meta1 \\-> Meta'
  8629. " "Meta QORQ.
  8630. " "14F006" :CSys) "^addtAND" ("Meta2 Meta1 \\-> Meta'
  8631. " "Meta QANDQ.
  8632. " "151006" :CSys) "^addtXOR" ("Meta2 Meta1 \\-> Meta'
  8633. " "Meta QXORQ.
  8634. " "153006" :CSys) "^addtCONJ" ("meta \\-> meta'
  8635. " "Meta complex conjugate.
  8636. " "506006" :CSys) "^addtLN" ("Meta \\-> Meta'
  8637. " "Meta QLNQ.
  8638. " "523006" :CSys) "^addtCOS" ("Meta \\-> Meta'
  8639. " "Meta QCOSQ.
  8640. " "535006" :CSys) "^addtSIN" ("Meta \\-> Meta'
  8641. " "Meta QSINQ.
  8642. " "537006" :CSys) "^addtTAN" ("Meta \\-> Meta'
  8643. " "Meta QTANQ.
  8644. " "539006" :CSys) "^addtSINACOS" ("meta \\-> meta'
  8645. " "If meta stands for x, meta' stands for
  8646. sqrt[1-x^2].
  8647. " "53B006" :CSys) "^addtASIN" ("Meta \\-> Meta'
  8648. " "Meta QASINQ.
  8649. " "53C006" :CSys) "^addtACOS" ("Meta \\-> Meta'
  8650. " "Meta QACOSQ.
  8651. " "53E006" :CSys) "^addtATAN" ("Meta \\-> Meta'
  8652. " "Meta QATANQ.
  8653. " "540006" :CSys) "^addtSINH" ("Meta \\-> Meta'
  8654. " "Meta QSINHQ.
  8655. " "542006" :CSys) "^addtCOSH" ("Meta \\-> Meta'
  8656. " "Meta QCOSHQ.
  8657. " "544006" :CSys) "^addtTANH" ("Meta \\-> Meta'
  8658. " "Meta QTANHQ.
  8659. " "546006" :CSys) "^addtATANH" ("Meta \\-> Meta'
  8660. " "Meta QATANHQ.
  8661. " "549006" :CSys) "^addtASINH" ("Meta \\-> Meta'
  8662. " "Meta QASINHQ.
  8663. " "54C006" :CSys) "^addtACOSH" ("Meta \\-> Meta'
  8664. " "Meta QACOSHQ.
  8665. " "54F006" :CSys) "^addtSQRT" ("Meta \\-> Meta'
  8666. " "Meta QSQRTQ.
  8667. " "551006" :CSys) "^addtSQ" ("Meta \\-> Meta'
  8668. " "Meta QSQQ.
  8669. " "554006" :CSys) "^addtINV" ("Meta \\-> Meta'
  8670. " "Meta QINVQ.
  8671. " "556006" :CSys) "^addtEXP" ("Meta \\-> Meta'
  8672. " "Meta QEXPQ.
  8673. Does not apply EXP[-..]=1/EXP[..].
  8674. " "558006" :CSys) "^xSYMEXP" ("Meta \\-> Meta'
  8675. " "Meta EXP.
  8676. Applies EXP[-..]=1/EXP[..].
  8677. " "559006" :CSys) "^addtD->R" ("Meta \\-> Meta'
  8678. " "Meta D\\->R.
  8679. " "55A006" :CSys) "^addtR->D" ("Meta \\-> Meta'
  8680. " "Meta R\\->D.
  8681. " "55C006" :CSys) "^addtFLOOR" ("Meta \\-> Meta'
  8682. " "Meta QFLOORQ.
  8683. " "55E006" :CSys) "^addtCEIL" ("Meta \\-> Meta'
  8684. " "Meta QCEILQ.
  8685. " "560006" :CSys) "^addtIP" ("Meta \\-> Meta'
  8686. " "Meta QIPQ.
  8687. " "562006" :CSys) "^addtFP" ("Meta \\-> Meta'
  8688. " "Meta QFPQ.
  8689. " "564006" :CSys) "^addtXPON" ("Meta \\-> Meta'
  8690. " "Meta QXPONQ.
  8691. " "566006" :CSys) "^addtMANT" ("Meta \\-> Meta'
  8692. " "Meta QMANTQ.
  8693. " "568006" :CSys) "^addtLNP1" ("meta \\-> meta
  8694. " "Meta QLNP1Q.
  8695. " "56A006" :CSys) "^addtLOG" ("meta \\-> meta
  8696. " "Meta QLOGQ.
  8697. " "56C006" :CSys) "^addtALOG" ("meta \\-> meta
  8698. " "Meta QALOGQ.
  8699. " "56E006" :CSys) "^addtEXPM" ("meta \\-> meta
  8700. " "Meta QEXPMQ.
  8701. " "570006" :CSys) "^addtFACT" ("Meta \\-> Meta'
  8702. " "Meta QFACTQ.
  8703. " "574006" :CSys) "^addtNOT" ("Meta \\-> Meta'
  8704. " "Meta QNOTQ.
  8705. " "577006" :CSys) "^cos2tan/2" ("meta \\-> meta'
  8706. " "x \\-> (1-(tan(x/2))^2)/(1+(tan(x/2))^2)
  8707. " "409006" :CSys) "^1-x^2/1+x^2" ("meta \\-> meta'
  8708. " "x \\-> (1-x^2)/(1+x^2)
  8709. " "40A006" :CSys) "^sin2tan/2" ("meta \\-> meta'
  8710. " "x \\-> 2 tan(x/2)/(1+(tan(x/2))^2)
  8711. " "40C006" :CSys) "^2x/1+x^2" ("meta \\-> meta'
  8712. " "x \\-> 2x/(1+x^2)
  8713. " "40D006" :CSys) "^tan2tan/2" ("meta \\-> meta'
  8714. " "x \\-> 2 tan(x/2)/(1-(tan(x/2))^2)
  8715. " "40F006" :CSys) "^addtTAN/2" ("meta \\-> meta'
  8716. " "x \\-> tan(x/2)
  8717. " "410006" :CSys) "^cos2tan" ("meta \\-> meta'
  8718. " "x \\-> 1/sqrt(1+(tan(x))^2)
  8719. " "413006" :CSys) "^sin2tan" ("meta \\-> meta'
  8720. " "x \\-> tan(x)/sqrt(1+(tan(x))^2)
  8721. " "415006" :CSys) "^tan2exp" ("meta \\-> meta'
  8722. " "x \\-> (exp(i2x)-1)/(i*(exp(i2x)+1))
  8723. " "421006" :CSys) "^asin2ln" ("meta \\-> meta'
  8724. " "x \\-> = i*ln(x+sqrt(x^2-1))+\\pi/2.
  8725. " "423006" :CSys) "^acos2ln" ("meta \\-> meta'
  8726. " "x \\-> ln(x+sqrt(x^2-1))/i
  8727. " "425006" :CSys) "^sin/cos" ("meta \\-> meta'
  8728. " "x \\-> sin(x)/cos(x)
  8729. " "428006" :CSys) "^cos*tan" ("meta \\-> meta'
  8730. " "x \\-> cos(x)*tan(x)
  8731. " "42B006" :CSys) "^sqrt1-sin^2" ("meta \\-> meta'
  8732. " "x \\-> sqrt(1-(sin(x))^2).
  8733. " "42D006" :CSys) "^sqrt1-cos^2" ("meta \\-> meta'
  8734. " "x \\-> sqrt(1-(cos(x))^2).
  8735. " "42F006" :CSys) "^atan2asin" ("meta \\-> meta'
  8736. " "x \\-> asin(x/sqrt(x^2+1))
  8737. " "432006" :CSys) "^asin2atan" ("meta \\-> meta'
  8738. " "x \\-> atan(x/sqrt(1-x^2))
  8739. " "435006" :CSys) "^pi/2-acos" ("meta \\-> meta'
  8740. " "x \\-> \\pi/2-acos(x)
  8741. " "438006" :CSys) "^pi/2-meta" ("meta \\-> meta'
  8742. " "x \\-> \\pi/2-x
  8743. " "439006" :CSys) "^pi/2-asin" ("meta \\-> meta'
  8744. " "x \\-> \\pi/2-asin(x)
  8745. " "43B006" :CSys) "^atan2ln" ("meta \\-> meta'
  8746. " "x \\-> i/2*ln((i+x)/(i-x))
  8747. " "43E006" :CSys) "^2*1-cos/sin" ("meta \\-> meta'
  8748. " "x \\-> (1-cos(2x))/sin(2x)
  8749. " "441006" :CSys) "^2*sin/1+cos" ("meta \\-> meta'
  8750. " "x \\-> sin(2x)/(1+cos(2x))
  8751. " "443006" :CSys) "^sin2exp" ("meta \\-> meta'
  8752. " "x \\-> (e^(i*x)-1/e^(i*x))/(2i)
  8753. " "445006" :CSys) "^cos2exp" ("meta \\-> meta'
  8754. " "x \\-> (e^(i*x)+1/e^(i*x))/2
  8755. " "447006" :CSys) "^sinh2exp" ("meta \\-> meta'
  8756. " "x \\-> (e^x-1/e^x)/2
  8757. " "449006" :CSys) "^cosh2exp" ("meta \\-> meta'
  8758. " "x \\-> (e^x+1/e^x)/2
  8759. " "44B006" :CSys) "^tanh2exp" ("meta \\-> meta'
  8760. " "x \\-> (e^2x-1)/(e^2x+1)
  8761. " "44D006" :CSys) "^asinh2ln" ("meta \\-> meta'
  8762. " "x \\-> ln(x+sqrt(x^2+1))
  8763. " "44F006" :CSys) "^acosh2ln" ("meta \\-> meta'
  8764. " "x \\-> ln(x+sqrt(x^2-1))
  8765. " "451006" :CSys) "^atanh2ln" ("meta \\-> meta'
  8766. " "x \\-> ln((1+x)/(1-x))/2
  8767. " "453006" :CSys) "^xroot2expln" ("meta1 meta2 \\-> meta'
  8768. " "x y \\-> exp(ln(y)/x)
  8769. " "455006" :CSys) "^exp2sincos" ("meta \\-> meta'
  8770. " "Returns QEXPQ of meta as EXP[RE]*[COS+i*SIN].
  8771. " "458006" :CSys) "^1metaundef#" ("meta \\-> meta #
  8772. " "Tests presence of undef in meta. # is the
  8773. position of undef.
  8774. " "3A1006" :CSys) "^2metaundef#" ("meta2 meta1 \\-> meta2 meta1 #
  8775. " "Tests presence of undef in meta2 and meta1. #
  8776. is the position of undef.
  8777. " "3A0006" :CSys) "^metaundef" ("\\-> meta
  8778. " "Returns undef meta.
  8779. " "3A2006" :CSys) "^1metainf#" ("meta \\-> meta #
  8780. " "Finds position of infinity in meta. Metas of
  8781. length>2 are considered as finite meta.
  8782. " "3A4006" :CSys) "^2metainf#" ("meta2 meta1 \\-> meta2 meta1 #
  8783. " "Finds position of infinity in meta 2 and
  8784. meta1. Metas of length>2 are considered as
  8785. finite meta.
  8786. " "3A3006" :CSys) "^metainftype" ("meta \\-> #
  8787. " "Returns infinity type: 1 for +infinity, 2 for
  8788. -infinity or 0 for unsigned.
  8789. " "3A5006" :CSys) "^unsignedinf" ("\\-> meta
  8790. " "Returns unsigned infinty.
  8791. " "3A6006" :CSys) "^plusinf" ("\\-> meta
  8792. " "Returns plus infinty.
  8793. " "3A7006" :CSys) "^NDROPplusinf" ("ob1..obn \\-> meta
  8794. " "Replaces meta by plus infinty.
  8795. " "3A8006" :CSys) "^minusinf" ("\\-> meta
  8796. " "Returns minus infinty.
  8797. " "3A9006" :CSys) "^NDROPminusinf" ("ob1..obn \\-> meta
  8798. " "Replace meta by minus infinty.
  8799. " "3AA006" :CSys) "^metasimp" ("Meta \\-> Meta
  8800. " "Simplifies a meta object.
  8801. Non recursive rational simplification.
  8802. " "3BB006" :CSys) "^DISTRIB*" ("meta \\-> meta' T
  8803. meta \\-> meta F
  8804. " "Distribute *.
  8805. Returns FALSE if no distribution done.
  8806. " "118007" :1\.11 :CSys) "^DISTRIB/" ("meta \\-> meta' T
  8807. meta \\-> meta F
  8808. " "Distribute /.
  8809. Returns FALSE if no distribution done.
  8810. " "3C2006" :CSys) "^METASINEXPA" ("Meta \\-> Meta'
  8811. " "Expands SIN.
  8812. " "304006" :CSys) "^SINEXPA+" ("Meta \\-> Meta'
  8813. " "Expands SIN(x+y).
  8814. " "305006" :CSys) "^SINEXPA-" ("Meta \\-> Meta'
  8815. " "Expands SIN(x-y).
  8816. " "306006" :CSys) "^SINEXPA*" ("Meta \\-> Meta'
  8817. " "Expands SIN(x*y).
  8818. Expands if x or y is an integer.
  8819. " "307006" :CSys) "^SINEXPA*1" ("Meta2 Meta1 \\-> Meta'
  8820. " "Expands SIN(x*y).
  8821. Meta1 is assumed to be an integer.
  8822. " "308006" :CSys) "^METACOSEXPA" ("Meta \\-> Meta'
  8823. " "Expands COS.
  8824. " "30A006" :CSys) "^COSEXPA+" ("Meta \\-> Meta'
  8825. " "Expands COS(x+y).
  8826. " "30B006" :CSys) "^COSEXPA-" ("Meta \\-> Meta'
  8827. " "Expands COS(x-y).
  8828. " "30C006" :CSys) "^COSEXPA*" ("Meta \\-> Meta'
  8829. " "Expands COS(x*y).
  8830. " "30D006" :CSys) "^COSEXPA*1" ("meta2 meta1 \\-> Meta'
  8831. " "Expands COS(x*y).
  8832. meta1 represents an integer.
  8833. " "30E006" :CSys) "^METAEXPEXPA" ("Meta \\-> Meta'
  8834. " "Expands EXP.
  8835. " "310006" :CSys) "^EXPEXPA+" ("Meta \\-> Meta'
  8836. " "Expands EXP(x+y).
  8837. " "311006" :CSys) "^EXPEXPA-" ("Meta \\-> Meta'
  8838. " "Expands EXP(x-y).
  8839. " "312006" :CSys) "^EXPEXPA*" ("Meta \\-> Meta'
  8840. " "Expands EXP(x*y).
  8841. " "313006" :CSys) "^EXPEXPANEG" ("Meta \\-> Meta'
  8842. " "Expands EXP(-x).
  8843. " "314006" :CSys) "^EXPEXPA*1" ("Meta2 meta1 \\-> Meta'
  8844. " "Expands EXP(x*y).
  8845. meta1 represents an integer.
  8846. " "315006" :CSys) "^METALNEXPA" ("Meta \\-> Meta'
  8847. " "Expands LN.
  8848. " "317006" :CSys) "^LNEXPA*" ("Meta \\-> Meta'
  8849. " "Expands LN(x*y).
  8850. " "318006" :CSys) "^LNEXPA/" ("Meta \\-> Meta'
  8851. " "Expands LN(x/y).
  8852. " "319006" :CSys) "^LNEXPA^" ("Meta \\-> Meta'
  8853. " "Expands LN(x^y).
  8854. " "31A006" :CSys) "^METATANEXPA" ("meta \\-> tan[meta]
  8855. " "Expands tan[meta].
  8856. " "31E006" :CSys) "^metafraction?" ("Meta \\-> Meta flag
  8857. " "Tests if meta is a fraction of integers.
  8858. " "39A006" :CSys) "^metapi?" ("Meta \\-> Meta#
  8859. " "Tests presence of \\pi in a meta.
  8860. # is the last occurence of \\pi or 0.
  8861. " "3BC006" :CSys) "^metaCOMPARE" ("Meta2 Meta1 \\-> Meta2 Meta1 #
  8862. " "Comparison of 2 meta.
  8863. # =0 if undef
  8864. # =1 if >
  8865. # =2 if <
  8866. # =3 if =
  8867. Assumes generic situation, e.g. X^2 > 0 in
  8868. real mode. Look below STRICTmetaCOMPARE for a
  8869. more careful comparison.
  8870. " "3BD006" :CSys) "^STRICTmetaCOMPARE" ("Meta2 Meta1 \\-> Meta2 Meta1 #
  8871. " "Comparison of 2 meta.
  8872. # =0 if undef
  8873. # =1 if >
  8874. # =2 if <
  8875. # =3 if =
  8876. Unlike <REF>metaCOMPARE it does not assume generic
  8877. situation.
  8878. " "3BE006" :CSys) "^metareal?" ("meta \\-> meta flag
  8879. " "Tests if IM[meta]==0.
  8880. " "3C3006" :CSys) "^QAdd" ("o1 \\-> o2+o1
  8881. " "Adds two polynomials.
  8882. " "118006" :CSys) "^RADDext" ("o2 o1 \\-> o2+o1
  8883. " "Internal +. This is the same entry as
  8884. ^QAdd.
  8885. " "119006" :CSys) "^SWAPRADD" ("o2 o1 \\-> o1+o2
  8886. " "SWAP, then QAdd.
  8887. " "117006" :CSys) "^QSub" ("o2 o1 \\-> o2-o1
  8888. " "Subtracts two polynomials.
  8889. " "115006" :CSys) "^RSUBext" ("o2 o1 \\-> o2-o1
  8890. " "Internal -. This is the same entry as
  8891. ^QSub.
  8892. " "116006" :CSys) "^SWAPRSUB" ("o2 o1 \\-> o1-o2
  8893. " "SWAP, then QSub.
  8894. " "114006" :CSys) "^QMul" ("Q1 Q2 \\-> Q
  8895. " "Multiplication of polynomials with
  8896. extensions.
  8897. " "111006" :CSys) "^RMULText" ("Q1 Q2 \\-> Q
  8898. " "Multiplication of polynomials with
  8899. extensions. This is the same entry as
  8900. ^QMul.
  8901. " "112006" :CSys) "^SWAPRMULT" ("Q1 Q2 \\-> Q
  8902. " "SWAP, then ^QMul.
  8903. " "110006" :CSys) "^QDiv" ("o2 o1 \\-> o2/o1
  8904. " "Internal /.
  8905. " "11C006" :CSys) "^RDIVext" ("o2 o1 \\-> o2/o1
  8906. " "Internal /. This is the same entry as
  8907. ^QDiv.
  8908. " "11B006" :CSys) "^SWAPRDIV" ("o2 o1 \\-> o1/o2
  8909. " "SWAP, then QDiv.
  8910. " "11A006" :CSys) "^QMod" ("Q, Z \\-> Q mod Z
  8911. " "" "0D9006" :CSys) "^QRoot" ("
  8912. " "Extracts Nth power factors from polynomial.
  8913. " "0DF006" :CSys) "^RASOP" ("n1/d1 n2/d2 \\-> d1*d2 n1*d2 n2*d1
  8914. " "Used by RADDext and RSUBext for rational
  8915. input.
  8916. " "113006" :CSys) "^R15SIMP" ("
  8917. " "" "11D006" :CSys) "^PPow#" ("
  8918. " "" "11E006" :CSys) "^RP#" ("o2 # \\-> o2^#
  8919. " "Internal power (not for matrices).
  8920. " "11F006" :CSys) "^MPext" ("ob # prg* \\-> ob^#
  8921. " "General power with a specified multiplication
  8922. program.
  8923. " "120006" :CSys) "^RPext" ("o2 o1 \\-> o2^o1
  8924. " "Tries to convert o1 to an integer to call
  8925. RP#, otherwise x^ext.
  8926. " "123006" :CSys) "^MPEXEC" ("
  8927. " "" "122006" :CSys) "^DISTDIVext" ("P Q \\-> quo mod T
  8928. \\-> P Q F
  8929. " "Euclidean division. Assumes P and Q have
  8930. integer coefficientes. Returns FALSE if
  8931. sparse short division fails.
  8932. " "108006" :CSys) "^PTAYLext" ("P, r \\-> symb
  8933. " "Taylor for polynomials.
  8934. " "3E5006" :CSys) "^CARCOMPext" ("Q1/Q2 \\-> Q1'/Q2'
  8935. " "Extracts leading coefficients for the first
  8936. variable from a rational polynomial.
  8937. " "15B006" :CSys) "^QDivRem" ("ob2 ob1 \\-> quo mod
  8938. " "Polynomial Euclidean division of 2 objects.
  8939. Dispatchs to DIV2LISText for list
  8940. polynomials.
  8941. " "3EE006" :CSys) "^DIV2LISText" ("Z0 l1 l2 \\-> div mod
  8942. " "Euclidean division, l1 and l2 are list
  8943. polynomials. Test first if l1=l2, then tries
  8944. fast division, if it fails switch to SRPL
  8945. division.
  8946. " "3EF006" :CSys) "^PDIV2ext" ("A B \\-> Q R
  8947. " "Step by step Euclidean division for univar
  8948. poly.
  8949. " "3F8006" :CSys) "^PSetSign" ("P1 P2 \\-> sign[P2]*P1
  8950. " "Sets sign of P1 according to leading coeff of
  8951. P2.
  8952. " "3F9006" :CSys) "^ModExpa" ("Zn Fraction \\-> Fraction modulo Zn
  8953. " "" "3C4006" :CSys) "^ModAdd" ("Q1 Q2 Zn \\-> Z
  8954. " "Modular addition. Z = Q1+Q2 (mod Zn).
  8955. " "3C5006" :CSys) "^ModSub" ("Q1 Q2 Zn \\-> Z
  8956. " "Modular subtraction. Z = Q1-Q2 (mod Zn).
  8957. " "3C6006" :CSys) "^ModMul" ("Q1 Q2 Zn \\-> Z
  8958. " "Modular multiplication. Z = Q1*Q2 (mod Zn).
  8959. " "3C7006" :CSys) "^ModDiv" ("Z1 Z2 Zn \\-> Z
  8960. " "Modular division. Z = Z1/Z2 (mod Zn).
  8961. " "3C8006" :CSys) "^ModDiv2" ("Q1 Q2 Zn \\-> quo mod mod'
  8962. " "Modular division. mod' = Q1 mod Q2 mod Zn.
  8963. If Q1 and Q2 are integers, Q1 mod Q2 mod Zn
  8964. is always 0.
  8965. " "3C9006" :CSys) "^ModInv" ("Z Zn \\-> Z'
  8966. " "Modular inversion. Z' = INV(Z) (mod Zn).
  8967. NONINTERR if GCD[Z,Zn] \\=/ 1 or if Z = 0
  8968. (otherwise the results would be
  8969. unpredictable).
  8970. " "3CA006" :CSys) "^ModGcd" ("Q1 Q2 Zn \\-> Q'
  8971. " "Modular GCD.
  8972. " "3CB006" :CSys) "^ModLGCD" ("
  8973. " "" "3CC006" :CSys) "^ModLOPD" ("
  8974. " "" "3CD006" :CSys) "^MODULOMODext" ("
  8975. " "" "3CE006" :CSys) "^MODULOMAText" ("
  8976. " "" "3CF006" :CSys) "^ModFctr" ("
  8977. " "" "3D1006" :CSys) "^BerlekampP" ("P #prime \\-> P F / P Lf #prime T
  8978. " "Berlekamp's algorithm for finding modular
  8979. factors of a univariate polynomial.
  8980. " "08E006" :CSys) "^Berlekamp" ("P \\-> P F / P Lf #prime T
  8981. " "Berlekamp's algorithm for finding modular
  8982. factors of a univariate polynomial with a
  8983. leading frontend for finding linear factors
  8984. faster. The input polynomial must be square
  8985. free, otherwise the polynomial is not fully
  8986. factored. Due to memory restrictions byte
  8987. sized coefficients are used and the following
  8988. restrictions were imposed: prime<128 and
  8989. degree<256. If the conditions are not met
  8990. FALSE is returned. BCD: prime\\<=97.
  8991. " "08F006" :CSys) "^ALG48FCTR?" ("P \\-> [ meta cst_coeff TRUE | P FALSE ]
  8992. " "Factorizes square-free polynomial in Erable
  8993. format.
  8994. " "0A8006" :CSys) "^MFactTriv" ("P \\-> meta-factor P'
  8995. " "Extracts all trivial power factors of P.
  8996. " "0A9006" :CSys) "^CheckPNoExt" ("P \\-> P flag
  8997. " "Checks that P does not contain any DOCOL
  8998. (i.e. extensions).
  8999. " "0AA006" :CSys) "^PPP" ("P \\-> PP PC
  9000. " "Computes primitive polynomial and content of
  9001. non-const P with respect to X1. The results
  9002. are trimmed (provided P was).
  9003. " "0AB006" :CSys) "^PFactor" ("P \\-> Lfk Z
  9004. " "Does a complete factorization of P.
  9005. The result is trimmed.
  9006. " "0AC006" :CSys) "^PSqff" ("P \\-> Lfk
  9007. " "Square-free and trivial factorization,
  9008. including integer content, of P taken
  9009. positive. Factors of same power are not
  9010. necessarily merged or adjacent, but all Fi's
  9011. are square-free.
  9012. " "0AD006" :CSys) "^PHFctr" ("P \\-> Lf
  9013. " "Heuristic factorization of polynomial taken
  9014. positive. LAM FullFact? must be bound. If LAM
  9015. FullFact? is TRUE, a full factorization is
  9016. done. If it is FALSE, only square-free and
  9017. trivial factorization is done.
  9018. " "0AE006" :CSys) "^PHFctr1" ("P \\-> Lf
  9019. " "Heuristic factorization of primitive
  9020. polynomial. LAM FullFact? must be bound. If
  9021. TRUE, a full factorization is done. When
  9022. FALSE, only a square-free and trivial
  9023. factorization are done.
  9024. " "0AF006" :CSys) "^PHFctr0" ("P \\-> Lf
  9025. " "Heuristic factorization of primitive
  9026. square-free non constant polynomial.
  9027. " "0B0006" :CSys) "^P2P#" ("P \\-> P' #
  9028. " "Extracts trivial power of poly. P must be a
  9029. valid poly (if list, begin with a non zero
  9030. coeff).
  9031. " "0D8007" :CSys) "^DeCntMulti" ("R \\-> L
  9032. " "Transforms list with count into simple list.
  9033. R = { {f1 #k1} ... {fn #kn} }
  9034. L = { f1 f1 .. fn fn }.
  9035. " "0B1006" :CSys) "^DoLS" ("L S F \\-> L'
  9036. " "Applies program F(Li,S) to every elem of L.
  9037. " "0B2006" :CSys) "^PNFctr" ("Z \\-> Lf
  9038. " "Factorization of positive integer as
  9039. polynomial.
  9040. Lf = {} if Z is 1
  9041. Lf = { {Z1 #k1} ... {Zn #kn} } o/w.
  9042. " "0B3006" :CSys) "^PSQFF" ("P \\-> Lsqff
  9043. " "Computes the square-free factorization of
  9044. primitive P. The result is trimmed (provided P
  9045. was).
  9046. " "0B4006" :CSys) "^LiftZAdic" ("p z F \\-> L
  9047. " "Lift n-1 z-adic factorization into n
  9048. factorization.
  9049. " "0B5006" :CSys) "^LFCProd" ("C L \\-> C P
  9050. " "Calculates combination product.
  9051. " "0B6006" :CSys) "^UFactor" ("P \\-> Lf
  9052. " "Factorization of a square free primitive
  9053. univariate polynomial.
  9054. " "0B7006" :CSys) "^UFactor1" ("P \\-> Lf
  9055. " "Factorization of a square free primitive
  9056. univariate polynomial of degree > 2.
  9057. " "0B8006" :CSys) "^MonicLf" ("Lfp p \\-> Lfp'
  9058. " "Converts true modular factorization to monic
  9059. factorization by dividing by the leading
  9060. coefficient of factor 1.
  9061. " "0B9006" :CSys) "^DemonicLf" ("Lfp lc p \\-> Lfp'
  9062. " "Converts monic modular factorization to true
  9063. modular factorization by multiplying factor1
  9064. by lcoeff.
  9065. " "0BA006" :CSys) "^LiftLinear" ("#root1 .. #rootn #n \\->
  9066. " "Lifts modular roots of a polynomial to find
  9067. linear factors of a univariate polynomial.
  9068. Lflin = list of found true factors
  9069. Lfplin' = remaining linear factors
  9070. P' = remaining polynomial
  9071. Assumes UFactor lambda variables available
  9072. and uses them for input and output.
  9073. " "0BB006" :CSys) "^LiftGeneral" ("\\->
  9074. " "Lifts factorization mod p to factorization mod
  9075. p^k where p^k exceeds the factor bound for
  9076. succesful true factor extraction. Assumes
  9077. UFactor lambda variables.
  9078. " "0BC006" :CSys) "^UFactorDeg2" ("P \\-> Lf
  9079. " "Factorization of a degree 2 polynomial.
  9080. Polynomial is univariate, square free and
  9081. primitive.
  9082. " "0BD006" :CSys) "^CombineFac" ("P Lfp p \\-> Tf Tfp
  9083. " "Combines modular factors to true factors. P
  9084. is the polynomial to factor, Lfp is the list
  9085. of modular factors, and p the modulo. The
  9086. entry returns the a list of found true
  9087. factors (Tf) and the list of modular factors
  9088. for each true factor (Tfp)
  9089. " "0BE006" :CSys) "^CombProd" ("lc Lfp p Cb \\-> F
  9090. " "Calculates modular combination.
  9091. " "0BF006" :CSys) "^CombInit" ("#r \\-> Cb
  9092. " "Inits modular combination list to value
  9093. { 1 0 0 0 .. }.
  9094. " "0C0006" :CSys) "^CombNext" ("Cb \\-> Cb' flag
  9095. " "Gets next possible modular combination.
  9096. Assumes Cb is valid and is in tempob area.
  9097. " "0C1006" :CSys) "^RmCombNext" ("Lf Cb \\-> Lfrm Lf' Cb' flag
  9098. " "Removes next possible combination after a
  9099. successful combination has been found, and
  9100. remove the used factors from the factor list.
  9101. " "0C2006" :CSys) "^PFactTriv" ("P \\-> P' Lf
  9102. " "Extracts all trivial power factors of P.
  9103. " "0C3006" :CSys) "^VarFactor" ("P #var \\-> P #n
  9104. " "Calculates what power of the given variable
  9105. is a factor in P.
  9106. " "0C4006" :CSys) "^PFactPowCnt" ("P \\-> P Lk flag
  9107. " "Calculates trivial power factors in P.
  9108. flag is TRUE if any of the powers is nonzero.
  9109. " "0C5006" :CSys) "^PDivLk" ("P Lk \\-> P'
  9110. " "Divides polynomial by its trivial powers.
  9111. " "0C6006" :CSys) "^FEVIDENText" ("P \\-> meta-fact cst coeff
  9112. " "Real mode: full factorization over the
  9113. integer Complex mode: find all 1st order
  9114. factors of P.
  9115. " "282006" :CSys) "^ONE{}POLY" ("ob \\-> {ob} ob1 \\-> Q
  9116. " "Replaces ONE{}N for polynomial
  9117. building.
  9118. " "09B006" :CSys) "^TWO{}POLY" ("ob1 ob2 \\-> Q
  9119. " "Replaces TWO{}N for polynomial
  9120. building.
  9121. " "09C006" :CSys) "^THREE{}POLY" ("ob1 ob2 ob3 \\-> Q
  9122. " "Replaces THREE{}N for polynomial
  9123. building.
  9124. " "09D006" :CSys) "^TWO::POLY" ("ob1 ob2 \\-> ::
  9125. " "Replaces 2Ob>Seco for polynomial
  9126. building.
  9127. " "09E006" :CSys) "^::POLY" ("Meta \\-> ::
  9128. " "Replaces ::N for polynomial building.
  9129. As opposed to the regular ::N code, we do pop
  9130. the binary number. This is enforced by the
  9131. entry to the common polyxml code.
  9132. " "09F006" :CSys) "^{}POLY" ("Meta \\-> Q
  9133. " "Replaces {}N for polynomial building.
  9134. As opposed to the regular {}N code, we do pop
  9135. the binary number. This allows us to enter
  9136. the code here with fixed sizes, as in
  9137. ONE{}POLY and TWO{}POLY.
  9138. " "0A0006" :CSys) "^>POLY" ("Meta \\-> Q
  9139. " "Builds polynomial.
  9140. " "0A7006" :CSys) "^>TPOLY" ("P ob \\-> P'
  9141. " "Replaces >TCOMP for polynomial
  9142. building.
  9143. " "0A1006" :CSys) "^>HPOLY" ("P ob \\-> P'
  9144. " "Replaces >HCOMP for polynomial
  9145. building.
  9146. " "0A2006" :CSys) "^>TPOLYN" ("P ob1 .. obn #n \\-> P'
  9147. " "Improved >TCOMP for polynomial building.
  9148. " "0A3006" :CSys) "^>HPOLYN" ("P ob1 .. obn #n \\-> P'
  9149. " "Improved >HCOMP for polynomial building.
  9150. " "0A4006" :CSys) "^MKPOLY" ("#n #k \\-> P
  9151. " "Makes polynomial of nth variable to the power
  9152. k.
  9153. " "0A5006" :CSys) "^MAKEPROFOND" ("ob # \\-> {{{...{o}...}}}
  9154. " "Embedds ob in the given number of lists.
  9155. " "2AB006" :CSys) "^TRIMext" ("Q \\-> Q'
  9156. " "Removes unnecessary zeros from polynomial.
  9157. " "4F4006" :CSys) "^PTrim" ("ob \\-> ob'
  9158. " "Trims polynomial.
  9159. " "4F5006" :CSys) "^ONE>POLY" ("Q \\-> Q'
  9160. " "Increases variable depth. Constants (Z,Irr,C)
  9161. are not modified.
  9162. " "0A6006" :CSys) "^TCHEBext" ("zint \\-> P
  9163. " "Tchebycheff polynomial. If zint>0 then 1st
  9164. kind, if <0 then second kind.
  9165. " "302006" :CSys) "^LRDMext" ("P # \\-> []
  9166. " "Left ReDiMension. Adds 0 to the left of
  9167. polynomial to get a symbolic vector of lenght
  9168. #+1.
  9169. " "3DE006" :CSys) "^RRDMext" ("{} # \\-> {}
  9170. " "Right ReDiMension: like <REF>LRDMext but 0 at
  9171. the right and {}.
  9172. " "3DF006" :CSys) "^DEGREext" ("{} \\-> degre
  9173. " "Degree of a list-polynomial.
  9174. " "3E0006" :CSys) "^FHORNER" ("P/d r \\-> P[X]_div_[X-r]/d r P[r]/d
  9175. " "Horner scheme.
  9176. " "3E1006" :CSys) "^HORNext" ("P r \\-> P[X]_div_[X-r] r P[r]
  9177. " "Horner scheme.
  9178. " "3E2006" :CSys) "^HORN1" ("
  9179. " "" "3E3006" :CSys) "^MHORNext" ("P r \\-> P[X]_div_[X-r] r P[r]
  9180. " "Horner scheme for matrices.
  9181. " "3E4006" :CSys) "^LAGRANGEext" ("M \\-> symb
  9182. " "Lagrange interpolation. Format of the matrix
  9183. is
  9184. [ [ x1 .. xn ] [ f(x1) .. f(xn) ] ]
  9185. Returns a polynomial P such that P(xi)=f(xi)
  9186. " "3E6006" :CSys) "^RESULTANT" ("P1 P2 \\-> P
  9187. " "Resultant of two polynomials. Depth of P is
  9188. one less than depth of P1 and P2.
  9189. " "10F007" :1\.11 :CSys) "^RESULTANTLP" ("res g h P1 P2 \\-> +/-res g' h' P1' P2'
  9190. " "Subresultant algorithm innerloop.
  9191. " "110007" :1\.11 :CSys) "^RESPSHIFTQ" ("P Q \\-> P'
  9192. " "Resultant of P and Q shifted.
  9193. gcd[Q(x-r),P(x)]!=1 equivalent to r root of
  9194. P' P' has same depth than P and Q.
  9195. " "111007" :1\.11 :CSys) "^ADDONEVAR" ("P \\-> P'
  9196. " "Adds one variable just below the main var.
  9197. works for polynomial, not for fractions.
  9198. " "112007" :1\.11 :CSys) "^SHRINKEVEN" ("P \\-> P'
  9199. " "Changes var Y=X^2 in an even polynomial.
  9200. " "0CF007" :CSys) "^SINTEST" ("
  9201. " "" "0D0007" :CSys) "^SHRINK2SYM" ("N D \\-> N' D'
  9202. " "Shrinks 2 polynomials using symmetry
  9203. properties.
  9204. " "0D1007" :CSys) "^SHRINKSYM" ("N \\-> N'
  9205. " "Shrinks 1 polynomial using symmetry
  9206. properties. Degree of N must be even. If it
  9207. is odd then N should be divided by X+1.
  9208. " "0D2007" :CSys) "^SHRINK2ASYM" ("N D \\-> N' D'
  9209. " "Shrinks 2 polynomials using antisymmetry
  9210. properties.
  9211. " "0D3007" :CSys) "^SHRINKASYM" ("N \\-> N'
  9212. " "Shrinks 1 polynomial using antisymmetry
  9213. properties. Degree of N must be even. If it
  9214. is odd then N should be divided by X+1.
  9215. " "0D4007" :CSys) "^PNMax" ("P \\-> Z
  9216. " "Gets the coefficient of P with max norm.
  9217. " "103006" :CSys) "^SWAPNDXF" ("Qden Qnom \\-> symb
  9218. " "Builds a symbolic from rational polynomial.
  9219. " "161006" :CSys) "^NDXFext" ("Qnom Qden \\-> symb
  9220. " "Builds a symbolic from rational polynomial.
  9221. " "162006" :CSys) "^SWAPFXND" ("symb ob \\-> ob Qnom Qden
  9222. " "Converts symbolic to rational polynomial.
  9223. " "163006" :CSys) "^FXNDext" ("symb \\-> Qnom Qden
  9224. " "Converts symbolic to rational polynomial.
  9225. " "164006" :CSys) "^REGCDext" ("a b \\-> d u v au+bv=d
  9226. " "" "3D7006" :CSys) "^EGCDext" ("a b \\-> d u v au+bv=d
  9227. " "Bezout identity for polynomials.
  9228. " "3D8006" :CSys) "^PEvalFast?" ("Z Pn \\-> Z Pn F / Pn[Z] T
  9229. " "Attempts to evaluate Pn at X1=Z using fast
  9230. register arithmetic.
  9231. Fails if any of the following is true:
  9232. Pn is not sunivariate;
  9233. Z is polynomial after all;
  9234. Z size is too big for register;
  9235. Any overflow occurs during Horner evaluation.
  9236. " "0EA006" :CSys) "^FLAGRESULTANT" ("symb1 symb2 \\-> symb
  9237. " "Resultant of two polynomials in symbolic
  9238. form.
  9239. " "10E007" :1\.11 :CSys) "^Univar?" ("P \\-> P flag
  9240. " "Tests if polynomial is univariate.
  9241. " "10B006" :CSys) "^SUnivar?" ("P \\-> P flag
  9242. " "Tests if polynomial is univariate and the
  9243. coefficients are bounded by register size.
  9244. " "10C006" :CSys) "^POLYPARITY" ("poly \\-> Z
  9245. " "Tests if a polynomial (internal rep) is
  9246. even/odd/none. Z=1 if even, -1 if odd, 0 if
  9247. neither even nor odd.
  9248. " "0CC007" :CSys) "^POLYSYM" ("P \\-> Z
  9249. " "Tests symmetry of coefficients of polynomial.
  9250. Z=1 for symmetric, -1 for anti, 0 otherwise.
  9251. " "0D6007" :CSys) "^POLYASYM" ("P \\-> Z
  9252. " "Tests \"antisymmetry\" of coef of polynomial.
  9253. Z=1 for symmetric, -1 for anti, 0 otherwise.
  9254. " "0D7007" :CSys) "^MULMULText" ("{} % \\-> {}'
  9255. " "Multiplies multiplicities in a factor list by
  9256. coeff.
  9257. " "272006" :CSys) "^METAMULMULT" ("
  9258. " "" "273006" :CSys) "^METAMM2" ("meta % \\-> meta'
  9259. " "Multiplies by % all multiplicities of meta.
  9260. " "274006" :CSys) "^COMPLISText" ("{} \\-> {}'
  9261. " "" "275006" :CSys) "^METACOMPRIM" ("Meta \\-> Meta'
  9262. " "Suppresses multiple occurrances of the same
  9263. factor by adding corresponding
  9264. multiplicities.
  9265. " "276006" :CSys) "^METACOMP0" ("
  9266. " "" "277006" :CSys) "^METACOMP1" ("f1...fk-1 mk-1 meta-res mk fk # \\-> f1...fk-1 mk-1 meta-res
  9267. " "" "278006" :CSys) "^ADDLISText" ("{} %n ob \\-> {}'
  9268. " "Adds ob with multiplicity %n to the
  9269. list. Checks if ob is in {}.
  9270. " "279006" :CSys) "^DIVISext" ("ob \\-> {divisors}
  9271. " "Returns list of divisors of ob.
  9272. " "27A006" :CSys) "^FACT1ext" ("symb-poly \\-> Lvar Q {}
  9273. " "{} is the list of root/multiplicity of sym
  9274. with respect to the current variable.
  9275. " "27B006" :CSys) "^FACTOext" ("symb \\-> Lvar Q {}
  9276. " "{} is the list of factors/multiplicity of
  9277. symb.
  9278. " "27C006" :CSys) "^ZFACTO" ("C \\-> {} C Lfact
  9279. " "" "27D006" :CSys) "^SOLVext" ("symb \\-> {}
  9280. " "Numeric solver for univariate polynomials.
  9281. The list contains the roots without
  9282. multiplicity.
  9283. " "27E006" :CSys) "^FRND" ("ob \\-> ob')
  9284. " "Float rounding for %%, C%% or list of either
  9285. type. Used by SOLVext to reconstruct
  9286. factors.
  9287. " "27F006" :CSys) "^BICARREE?" ("P #5 \\-> meta cst_coeff T
  9288. P #5 \\-> P #5 F
  9289. P # \\-> P # F
  9290. " "Searches if P is a bisquared 4-th order
  9291. equation. Returns a meta of factors and the
  9292. multiplying coeff in that QcaseQ.
  9293. " "280006" :CSys) "^REALBICAR" ("f1 #1 coef \\-> meta rest T
  9294. " "" "281006" :CSys) "^IROOTS" ("P \\-> list
  9295. " "Finds integer roots of a polynomial.
  9296. " "113007" :1\.11 :CSys) "^EVIDENText" ("P \\-> meta cst_coeff
  9297. " "Returns the roots of a polynomial P.
  9298. Calls the numeric solver.
  9299. " "283006" :CSys) "^EVIDSOLV" ("P \\-> meta cst_coeff
  9300. " "Returns the roots of a 1st, 2nd order and some
  9301. other poly. Calls the numeric solver if
  9302. exact solving fails.
  9303. " "284006" :CSys) "^DEG2ext" ("P \\-> {}
  9304. " "Returns the roots of a 2nd order polynomial.
  9305. " "285006" :CSys) "^METADEG2" ("P \\-> P meta
  9306. " "Returns the roots of a 2nd order polynomial.
  9307. P must be of order 1 or 2.
  9308. " "286006" :CSys) "^METADEG1" ("P \\-> P meta
  9309. " "Returns the roots of a 1st order polynomial.
  9310. P must be of order 1.
  9311. " "287006" :CSys) "^DEG1" ("f \\-> r
  9312. " "Root of a first order factor.
  9313. f is one level depth deeper than r.
  9314. " "288006" :CSys) "^FDEG2ext" ("P \\-> meta-fact cst_coef
  9315. " "Returns factors of a 2nd order polynomial and
  9316. the corresponding multiplying coefficient.
  9317. tests for 1st order polynomial.
  9318. " "289006" :CSys) "^RACTOFACext" ("r \\-> n d
  9319. " "Converts root to factor.
  9320. Factor is n/d, one level depth deeper than r.
  9321. " "28B006" :CSys) "^FACTORACext" ("f \\-> r cst_coef
  9322. " "Converts a factor to a root, solving 1st order
  9323. factor. f and cst_coef are one level depth
  9324. deeper than r.
  9325. " "28C006" :CSys) "^RFACText" ("ob # \\-> {} intob meta
  9326. " "{} is the list of variables. Meta is made of
  9327. roots or factors of numerator (N) or
  9328. denomenator (D) or both (N/D), depending on #.
  9329. ZERO for roots N/D; ONE for roots N;
  9330. TWO for roots D with numeric solver call;
  9331. THREE for roots D without num. solver call;
  9332. FOUR for factors N/D;
  9333. FIVE for factors N;
  9334. SIX for factors D with numeric solver call;
  9335. SEVEN for factors D without num.solver call.
  9336. " "28D006" :CSys) "^RFACT2ext" ("ob {} # \\-> {} intob meta
  9337. " "Like <REF>RFACText, but the list of variables
  9338. is given.
  9339. " "28E006" :CSys) "^RFACTSTEP3" ("ob \\-> meta-fact
  9340. " "Partial square-free factorization w.r.t. the
  9341. main variable. Extract trivial factors Etape
  9342. 3 ob \\-> meta-fact.
  9343. " "28F006" :CSys) "^RFACTSTEP5" ("%m on \\-> add-to-meta-res
  9344. " "Factorization of a square-free polynomial.
  9345. " "290006" :CSys) "^METASOLV" ("pn cst_coeff \\-> meta cst_coeff
  9346. " "Non-integer factorization (sqrt extensions
  9347. and numeric). multiplicty is in LAM 5,.
  9348. " "291006" :CSys) "^METASOLVOUT" ("
  9349. " "" "292006" :CSys) "^METASOLV2" ("cst_coeff p \\-> fr1 %m [fr2 %m] # cst_coeff
  9350. " "Returns roots/factors of 1st and 2nd order
  9351. polynomials.
  9352. " "293006" :CSys) "^METASOLV4" ("cst1 f1 ... fk #k cst2 \\-> fr1 %m ... frn %m #2k cst_coeff
  9353. " "Returns factors or convert to roots if
  9354. needed.
  9355. #k=1,2 or 4, fk are of order 1 or 2.
  9356. " "294006" :CSys) "^ADDMULTIPL" ("meta cst_coeff \\-> meta' cst_coeff
  9357. " "Adds multiplicities to a meta.
  9358. Multiplicity is in LAM 5.
  9359. " "295006" :CSys) "^FACTOOBJext" ("{ fact mult } flag prg* prg^ \\-> ob
  9360. " "Rebuilds an object from its list of factors
  9361. (flag=TRUE) or roots (flag=FALSE) using prg*
  9362. to multiply and prg^ to take multiplicity
  9363. power.
  9364. " "296006" :CSys) "^ID>DERext" ("id \\-> {} stripped_id
  9365. " "" "29C006" :CSys) "^ALG48MSOLV" ("Lp \\-> Lidnt Lsol
  9366. " "Calculates Groebner basis multivar solution.
  9367. LAM3 must be bound to Lvar and LAM4 to Lidnt.
  9368. " "093006" :CSys) "^GMSOLV" ("Lp \\-> meta-sol
  9369. " "Calculates Groebner basis multivar solutions.
  9370. LAM1 must be bound to the number of vars
  9371. A solution is a list { o1 ... on } where
  9372. #n=LAM1
  9373. ok embedded in k-1 lists is the value of the
  9374. k-th var ok may be undef.
  9375. " "094006" :CSys) "^GBASIS" ("Lp \\-> G
  9376. " "Calculate Groebner basis.
  9377. G = { 1 } if no solutions
  9378. G = { 0 } if identically true.
  9379. " "095006" :CSys) "^GSOLVE" ("Lp \\-> Lg
  9380. " "Calculate factorized Groebner basis.
  9381. Lg = { Lg1 Lg2 .. Lgn }
  9382. Lgi = independent solution (probably)
  9383. Lg = {} if no solutions
  9384. Lg = { { 0 } } if identically true.
  9385. " "096006" :CSys) "^GFACTOR" ("Lp fctr? \\-> Lg
  9386. " "Calculate Groebner basis or factorized Groebner
  9387. basis. Redundant bases are not removed.
  9388. " "097006" :CSys) "^GREDUCE" ("
  9389. " "Interreduce basis. Lambda variables
  9390. {{ fctr? G k tmp todo Lg Irred }}.
  9391. " "098006" :CSys) "^REDUCE" ("p G \\-> q
  9392. " "Reduces polynomial with respect to given
  9393. basis.
  9394. " "099006" :CSys) "^FASTREDUCE" ("r P \\-> q T / r P F
  9395. " "Assembly version of REDUCE for polynomials
  9396. with short coefficients. Returns FALSE if an
  9397. overflow occurs during the reduction.
  9398. Assumes r is a genuine polynomial (not
  9399. constant). Assumes G is not empty. Assumes
  9400. G does not contain zeros (is trimmed).
  9401. " "09A006" :CSys) "^ROOTM2ROOT" ("{}/V \\-> V'
  9402. " "Transforms list of root/multiplicites to
  9403. vector of roots.
  9404. " "37D006" :CSys) "^PASCAL_NEXTLINE" ("{} \\-> {}'
  9405. " "Finds next line in the Pascal triangle.
  9406. " "0F2007" :CSys) "^DELTAPSOLVE" ("Q \\-> P
  9407. " "Solves P(x+1)-P(x)=Q(x).
  9408. Internal polynomial function.
  9409. " "0F3007" :CSys) "^LIMIText" ("
  9410. " "" "46D006" :CSys) "^REWRITEIFINF" ("
  9411. " "" "46E006" :CSys) "^SYMTAYLOR" ("symb id %/z \\-> symb
  9412. " "Taylor series expansion around point 0
  9413. (McLaurin's series) with regard to given
  9414. variable, and of the given order.
  9415. " "46F006" :CSys) "^SYMPAPRX" ("
  9416. " "" "470006" :CSys) "^TRUNCDL" ("DL-l reste-l \\-> truncated_DL
  9417. " "Series expansion truncation.
  9418. " "471006" :CSys) "^LIMSERIES!" ("expression X=a|X %|zint \\->
  9419. a lim DL-l rest-l num-l/deno-l equiv-l lvar #
  9420. " "Series expansion.
  9421. #=1 for X=a-h or X=-1/h.
  9422. " "472006" :CSys) "^LIMITX!" ("
  9423. " "" "473006" :CSys) "^LIMITNOVX!" ("
  9424. " "" "474006" :CSys) "^LIMERR0!" ("
  9425. " "" "475006" :CSys) "^LIMERR1!" ("
  9426. " "" "476006" :CSys) "^LIMIT!" ("symb \\-> DL-l reste-l num-l/deno-l equiv.-l lim. lvar flag
  9427. " "lim. = { symf direction }
  9428. " "477006" :CSys) "^LIMSTEP1!" ("symb \\-> { DL-l reste-l num-l/deno-l equiv.-l } flag
  9429. " "" "478006" :CSys) "^LIMSTEP2!" ("
  9430. " "" "479006" :CSys) "^LIMSTEP3!" ("
  9431. " "" "47A006" :CSys) "^LIMSTEP4!" ("
  9432. " "" "47B006" :CSys) "^LIMLIM!" ("# lvar equiv-l \\-> lvar lim
  9433. " "" "47C006" :CSys) "^n{}N" ("
  9434. " "" "47D006" :CSys) "^LIMLIM1!" ("
  9435. " "" "47E006" :CSys) "^LIMCMPL!" ("reste-1-l reste-2-l \\-> reste-l
  9436. " "" "47F006" :CSys) "^LIMEQUFR!" ("n/d # \\-> n/d-l equiv %
  9437. " "" "480006" :CSys) "^LIMEQU!" ("{} # \\-> {} / {}-equiv-l {}-equiv-l { # # # }
  9438. " "" "481006" :CSys) "^LIMEQU0!" ("
  9439. " "" "482006" :CSys) "^LIM+-!" ("DL1...DLn #n op \\-> DL flag
  9440. " "DL = { DL-l reste-l num-l/deno-l equiv-l }.
  9441. " "483006" :CSys) "^LIMERR10!" ("
  9442. " "" "484006" :CSys) "^LIMNEG!" ("
  9443. " "" "485006" :CSys) "^LIMRAC!" ("
  9444. " "Racine carree, donc independant de x.
  9445. " "486006" :CSys) "^LIMINV!" ("
  9446. " "" "487006" :CSys) "^LIM/!" ("
  9447. " "" "488006" :CSys) "^LIMPOW!" ("
  9448. " "" "489006" :CSys) "^LIMSQ!" ("
  9449. " "" "48A006" :CSys) "^LIM*!" ("
  9450. " "" "48B006" :CSys) "^LIMDIVPC!" ("#ordre num-l deno-l \\-> num-l deno-l
  9451. " "" "48C006" :CSys) "^DIVPC!" ("
  9452. " "" "48D006" :CSys) "^LIMPROFEND!" ("num deno #prof \\-> num deno
  9453. " "" "48E006" :CSys) "^LIMPROF!" ("
  9454. " "" "48F006" :CSys) "^LIM%#!" ("num-l deno-l {%...%} \\-> num-l' deno-l' #prof {%...%}
  9455. " "" "490006" :CSys) "^LIMPROF0!" ("
  9456. " "" "491006" :CSys) "^LIMPROF1!" ("
  9457. " "" "492006" :CSys) "^LIMPROF2!" ("
  9458. " "" "493006" :CSys) "^LIMINVLN!" ("
  9459. " "Operator INV[-LN].
  9460. " "494006" :CSys) "^LIMLN!" ("
  9461. " "Operator LN.
  9462. " "495006" :CSys) "^LIMEXP!" ("
  9463. " "" "496006" :CSys) "^LIMSINCOS!" ("
  9464. " "" "497006" :CSys) "^LIMATAN!" ("
  9465. " "" "498006" :CSys) "^LIMASIN!" ("
  9466. " "" "499006" :CSys) "^LIMSQRT!" ("
  9467. " "" "49A006" :CSys) "^LIMFLOOR!" ("
  9468. " "" "49B006" :CSys) "^LIMABS!" ("
  9469. " "" "49C006" :CSys) "^LPROF!" ("
  9470. " "" "49D006" :CSys) "^LIM#VARX!" ("lvar lvar \\-> #varx
  9471. " "" "49E006" :CSys) "^LIMBETA!" ("
  9472. " "" "49F006" :CSys) "^LIMALPHA!" ("
  9473. " "" "4A0006" :CSys) "^HORNEXP!" ("lim lvar X-l reste-l \\-> lvar DL reste-l
  9474. " "" "4A1006" :CSys) "^HORNCOS!" ("
  9475. " "" "4A2006" :CSys) "^HORNSIN!" ("
  9476. " "" "4A3006" :CSys) "^LIMSC0!" ("
  9477. " "" "4A4006" :CSys) "^LIMSC1!" ("
  9478. " "" "4A5006" :CSys) "^HORNATAN!" ("
  9479. " "" "4A6006" :CSys) "^LIMATAS!" ("
  9480. " "" "4A7006" :CSys) "^HORNASIN!" ("
  9481. " "" "4A8006" :CSys) "^HORNASIN1!" ("
  9482. " "" "4A9006" :CSys) "^HORNLN!" ("
  9483. " "" "4AA006" :CSys) "^LNOBJ!" ("
  9484. " "" "4AB006" :CSys) "^NEWLIMHORN" ("
  9485. " "" "4AC006" :CSys) "^LIMHORN!" ("
  9486. " "" "4AD006" :CSys) "^LRDM!" ("
  9487. " "" "4AE006" :CSys) "^LIMDL!" ("
  9488. " "" "4AF006" :CSys) "^LIMDLINF!" ("
  9489. " "" "4B0006" :CSys) "^LIMINFSIGN!" ("
  9490. " "" "4B1006" :CSys) "^LIMMAX!" ("
  9491. " "" "4B2006" :CSys) "^LIMCOMP!" ("
  9492. " "" "4B3006" :CSys) "^VARCOMP2!" ("
  9493. " "" "4B4006" :CSys) "^LIMSORT!" ("
  9494. " "" "4B5006" :CSys) "^VARCOMP!" ("var1 var2 \\-> flag
  9495. " "" "4B6006" :CSys) "^VARCOMPLN!" ("
  9496. " "" "4B7006" :CSys) "^VARCOMP3!" ("
  9497. " "" "4B8006" :CSys) "^VARCOMP31!" ("
  9498. " "" "4B9006" :CSys) "^VARCOMP32!" ("var \\-> 0:
  9499. " "" "4BA006" :CSys) "^VARCOMP33!" ("
  9500. " "" "4BB006" :CSys) "^LIMERR6!" ("
  9501. " "" "4BC006" :CSys) "^LIMVALOBJ!" ("ob lvar \\-> symb
  9502. " "" "4BD006" :CSys) "^LIMVAL!" ("ob \\-> coeff val
  9503. " "" "4BE006" :CSys) "^EQUIV!" ("{} lequiv \\-> equiv ordre
  9504. " "" "4BF006" :CSys) "^LVARXNX2!" ("ob \\-> ob lvarx lvarnx
  9505. " "" "4C0006" :CSys) "^SIMP1!" ("
  9506. " "" "4C1006" :CSys) "^FindCurVar" ("symb \\-> symb
  9507. " "Sets a new current var if needed.
  9508. " "4C2006" :CSys) "^LIMVAR!" ("symb \\-> symb lvar
  9509. " "" "4C3006" :CSys) "^VAR%" ("
  9510. " "" "4C4006" :CSys) "^RISCH13" ("{}/{}' \\-> {}''
  9511. " "Assuming {}' has length 1, divides all
  9512. elements of {} by this element. Used by
  9513. RISCHext and by SERIES to have a nicer output
  9514. of series.
  9515. " "15C006" :CSys) "^PDer" ("{} \\-> der
  9516. " "" "3DC006" :CSys) "^ssSYMDER" ("
  9517. " "Algebraic derivative.
  9518. " "19F006" :CSys) "^SYMDER" ("
  9519. " "" "1A0006" :CSys) "^DERIVext" ("ob id \\-> ob'
  9520. ob sym \\-> ob'
  9521. ob V \\-> V'
  9522. " "Calculates the derivative of the object. For
  9523. a list argument calculates the gradient with
  9524. respect to the variables in the list. If the
  9525. variable is a symbolic, the first variable in
  9526. it is used. Note that the gradient is a
  9527. vector quantity, thus the result is returned
  9528. as a list.
  9529. " "1A1006" :CSys) "^siSYMDER" ("
  9530. " "" "1A2006" :CSys) "^DERIVIDNT" ("ob id \\-> ob'
  9531. " "Main entry point for derivative with respect
  9532. to a identifier.
  9533. " "1A3006" :CSys) "^DERIVIDNT1" ("ob \\-> ob'
  9534. " "Main entry point for derivative with respect
  9535. to the identifier stored in LAM1.
  9536. " "1A4006" :CSys) "^DERIV" ("symb \\-> symb'
  9537. " "Derivative of symb with respect to the
  9538. variable stored in LAM1.
  9539. " "1A5006" :CSys) "^METADERIV" ("Meta \\-> Meta'
  9540. " "Derivative of Meta object.
  9541. " "1A6006" :CSys) "^METADER&NEG" ("Meta \\-> Meta'
  9542. " "Meta derivative and negate.
  9543. " "1BD006" :CSys) "^METADEROP" ("
  9544. " "Table of derivable functions and the
  9545. respective derivative calculation
  9546. subroutines.
  9547. " "1A8006" :CSys) "^METADER+" ("Meta&+ \\-> Meta'
  9548. " "Meta derivative of addition.
  9549. " "1A9006" :CSys) "^METADER-" ("Meta&- \\-> Meta'
  9550. " "Meta derivative of subtraction.
  9551. " "1AA006" :CSys) "^METADER*" ("Meta&* \\-> Meta'
  9552. " "Meta derivative of multiplication.
  9553. " "1AB006" :CSys) "^METADER/" ("Meta&/ \\-> Meta'
  9554. " "Meta derivative of division.
  9555. " "1AC006" :CSys) "^METADER^" ("Meta&^ \\-> Meta'
  9556. " "Meta derivative of power.
  9557. " "1AD006" :CSys) "^METADERFCN" ("Meta \\-> Meta'
  9558. " "Meta derivative of a function.
  9559. " "1AE006" :CSys) "^METADERDER" ("symb_id_; sym_fcn_; xDER #3 \\-> Meta'
  9560. " "Meta derivative of a derivative of a
  9561. function.
  9562. " "1AF006" :CSys) "^METADERI4" ("Meta \\-> Meta'
  9563. " "Meta derivative of a defined integral.
  9564. " "1B0006" :CSys) "^METADERI3" ("Meta \\-> Meta'
  9565. " "Meta derivative of an undefined integral.
  9566. " "1B1006" :CSys) "^METADERIFTE" ("Meta \\-> Meta'
  9567. " "Meta derivative of IFTE.
  9568. " "1B2006" :CSys) "^METADEREXP" ("Meta \\-> Meta'
  9569. " "Meta derivative of QEXPQ.
  9570. " "1B4006" :CSys) "^METADERLN" ("Meta \\-> Meta'
  9571. " "Meta derivative of QLNQ.
  9572. " "1B5006" :CSys) "^METADERLNP1" ("Meta \\-> Meta'
  9573. " "Meta derivative of QLNP1Q.
  9574. " "1B6006" :CSys) "^METADERLOG" ("Meta \\-> Meta'
  9575. " "Meta derivative of QLOGQ.
  9576. " "1B7006" :CSys) "^METADERALOG" ("Meta \\-> Meta'
  9577. " "Meta derivative of QALOGQ.
  9578. " "1B8006" :CSys) "^METADERABS" ("Meta \\-> Meta'
  9579. " "Meta derivative of QABSQ.
  9580. " "1B9006" :CSys) "^METADERINV" ("Meta \\-> Meta'
  9581. " "Meta derivative of QINVQ.
  9582. " "1BA006" :CSys) "^METADERNEG" ("Meta \\-> Meta'
  9583. " "Meta derivative of QNEGQ.
  9584. " "1BB006" :CSys) "^METADERSQRT" ("Meta \\-> Meta'
  9585. " "Meta derivative of QSQRTQ.
  9586. " "1BC006" :CSys) "^METADERSQ" ("Meta \\-> Meta'
  9587. " "Meta derivative of QSQQ.
  9588. " "1BE006" :CSys) "^METADERSIN" ("Meta \\-> Meta'
  9589. " "Meta derivative of QSINQ.
  9590. " "1BF006" :CSys) "^METADERCOS" ("Meta \\-> Meta'
  9591. " "Meta derivative of QCOSQ.
  9592. " "1C0006" :CSys) "^METADERTAN" ("Meta \\-> Meta'
  9593. " "Meta derivative of QTANQ.
  9594. " "1C1006" :CSys) "^METADERSINH" ("Meta \\-> Meta'
  9595. " "Meta derivative of QSINHQ.
  9596. " "1C2006" :CSys) "^METADERCOSH" ("Meta \\-> Meta'
  9597. " "Meta derivative of QCOSHQ.
  9598. " "1C3006" :CSys) "^METADERTANH" ("Meta \\-> Meta'
  9599. " "Meta derivative of QTANHQ.
  9600. " "1C4006" :CSys) "^METADERASIN" ("Meta \\-> Meta'
  9601. " "Meta derivative of QASINQ.
  9602. " "1C5006" :CSys) "^METADERACOS" ("Meta \\-> Meta'
  9603. " "Meta derivative of QACOSQ.
  9604. " "1C6006" :CSys) "^METADERATAN" ("Meta \\-> Meta'
  9605. " "Meta derivative of QATANQ.
  9606. " "1C7006" :CSys) "^METADERASH" ("Meta \\-> Meta'
  9607. " "Meta derivative of QASINHQ.
  9608. " "1C8006" :CSys) "^METADERACH" ("Meta \\-> Meta'
  9609. " "Meta derivative of QACOSHQ.
  9610. " "1C9006" :CSys) "^METADERATH" ("Meta \\-> Meta'
  9611. " "Meta derivative of QATANHQ.
  9612. " "1CA006" :CSys) "^DERARG" ("meta-symb \\-> arg1 ... argk der1 ... derk #k op
  9613. " "Finds derivative of arguments.
  9614. " "1B3006" :CSys) "^pshder*" ("Meta1 Meta2 \\-> Meta2&Meta1'&*
  9615. " "Meta derivative utility.
  9616. " "1CB006" :CSys) "^SQRTINVpshd*" ("Meta1 Meta2 \\-> Meta2&SQRT&INV&Meta1'&*
  9617. " "Meta derivative utility.
  9618. " "1CC006" :CSys) "^ODE_INT" ("symb idnt \\-> symb
  9619. " "Integration with addition of a constant.
  9620. " "07F007" :CSys) "^IBP" ("u'*v u \\-> u*v -u*v'
  9621. " "Internal integration by parts. If u is a
  9622. constant return INTVX(u'*v)+u. If stack 2 is a
  9623. list it must be of the form { olduv u'*v }
  9624. then olduv will be added to u*v at stack
  9625. level 2. This permits multiple IBP in
  9626. algebraic mode, e.g.
  9627. IBP(ASIN(X)^2,X)
  9628. IBP(ANS(1),sqrt(1-X^2))
  9629. IBP(ANS(1),C) the last step with an integral
  9630. containing a cst C.
  9631. " "2C5006" :CSys) "^PREVALext" ("symb inf sup x \\-> symb|x=sup - symb|x=inf
  9632. " "Evaluates an antiderivative between 2 bounds
  9633. Does not check for discontinuities of symb in
  9634. this interval.
  9635. " "2D0006" :CSys) "^WARNSING" ("symb inf sup vx \\-> symb inf sup vx
  9636. " "Warns user for singularity.
  9637. " "2D1006" :CSys) "^INText" ("symb x \\-> int[$,x, symb, xt]
  9638. " "Return unevaluated integral.
  9639. " "2D2006" :CSys) "^INT3" ("f(x) x y \\-> F(y) where F'=f
  9640. " "Undefined integration.
  9641. No limit for underdetermined form.
  9642. " "2D3006" :CSys) "^INTEGRext" ("{} \\-> prim
  9643. " "" "3DD006" :CSys) "^PARTFRAC" ("o \\-> symb
  9644. " "Partial fraction expansion of o with respect to
  9645. the current variable.
  9646. " "3D2006" :CSys) "^INPARTFRAC" ("o list \\-> symb
  9647. " "Partial fraction expansion of o.
  9648. lvar must be bound to LAM2,
  9649. list is =lvar if o is in external format.
  9650. list is NULL{} if o is still in internal
  9651. format.
  9652. " "3D3006" :CSys) "^PARTFRACRAT" ("
  9653. " "" "3D4006" :CSys) "^PFext" ("
  9654. " "" "3D5006" :CSys) "^DESOLVE" ("list symb1 \\-> list_sols
  9655. symb symb1 \\-> list_sols
  9656. " "Solves ordinary differential equation.
  9657. For some ode's returned level2 is not symb1.
  9658. " "07E007" :CSys) "^LDECSOLV" ("2nd_member char_eq \\-> solution
  9659. " "Linear differential equation with constant
  9660. coefficients.
  9661. " "081007" :CSys) "^LDEGENE" ("eq. carac \\-> sol generale
  9662. " "" "082007" :CSys) "^LDEPART" ("2nd membre, eq carac \\-> eq. carac, sol part
  9663. " "" "083007" :CSys) "^LDSSOLVext" ("V M \\-> V'
  9664. " "M is the matrix of the system.
  9665. V is the vector of the 2nd members.
  9666. " "084007" :CSys) "^ODETYPESTO" ("type \\->
  9667. " "Store ode type in variable ODETYPE.
  9668. " "085007" :CSys) "^ODE_SEPAR" ("symb \\-> symb symb-y symb-x T
  9669. \\-> symb F
  9670. " "Tries to separate symb as a product of a
  9671. function of y and a function of x.
  9672. " "086007" :CSys) "^LAPext" ("symb \\-> symb'
  9673. " "Laplace transform for polynomial*exp/sin/cos.
  9674. Returns LAP() for unknown transforms.
  9675. " "087007" :CSys) "^ILAPext" ("symb \\-> symb'
  9676. " "Inverse Laplace transform for rational fractions.
  9677. Delta functions for the integral part.
  9678. " "088007" :CSys) "^ILAPRAText" ("
  9679. " "" "089007" :CSys) "^ILAPDELTA" ("
  9680. " "" "08A007" :CSys) "^ILAPEXP" ("ck rk \\-> ck*exp[rk*x]
  9681. " "" "08B007" :CSys) "^ILAPEXPSC" ("
  9682. " "" "08C007" :CSys) "^QUOTExSIGMA" ("
  9683. " "" "0F8007" :CSys) "^SUM" ("sym idnt \\-> sym
  9684. " "Internal SUM. The variable can be
  9685. specified.
  9686. " "0F9007" :CSys) "^FLAGSUM" ("
  9687. " "" "0FA007" :CSys) "^SUMVX" ("sym \\-> sym
  9688. " "Internal SUMVX. Works always with respect to
  9689. the current variable.
  9690. --
  9691. <REF>TEXT:Reserved|VX
  9692. " "0FB007" :CSys) "^FLAGSUMVX" ("
  9693. " "" "0FC007" :CSys) "^RATSUM" ("sym \\-> sym
  9694. " "Discrete rational sum.
  9695. " "0FD007" :CSys) "^FTAYL" ("f shift \\-> f'
  9696. " "Taylor shift for rational fractions.
  9697. " "0FE007" :CSys) "^CSTFRACTION?" ("ob \\-> ob flag
  9698. " "Taylor shift for rational fractions. Returns
  9699. TRUE if ob is a cst fraction.
  9700. " "0FF007" :CSys) "^HYPERGEO" ("symb \\-> symb
  9701. " "Tests and does hypergeometric summation.
  9702. " "104007" :1\.11 :CSys) "^NONRATSUM" ("z/symb \\-> symb
  9703. " "Discrete summation (hypergeometric QcaseQ).
  9704. " "100007" :CSys) "^meta_cst?" ("meta \\-> meta flag
  9705. " "Tests for meta to be cst with respect to
  9706. current var.
  9707. " "103007" :1\.11 :CSys) "^fk+1/fk" ("
  9708. " "" "105007" :1\.11 :CSys) "^ZEILBERGER" ("f(n,k) n k d \\-> C T
  9709. \\-> F
  9710. " "Zeilberger algorithm * QNOTQ IMPLEMENTED YET*.
  9711. " "108007" :1\.11 :CSys) "^SYMPSI" ("sym \\-> Psi(x)
  9712. " "Digamma function.
  9713. " "109007" :1\.11 :CSys) "^sympsi" ("
  9714. " "" "10A007" :1\.11 :CSys) "^SYMPSIN" ("sym int \\-> Psi(x,n)
  9715. " "Digamma function.
  9716. " "10B007" :1\.11 :CSys) "^sympsin" ("
  9717. " "" "10C007" :1\.11 :CSys) "^%%PSI" ("%%x \\-> %%
  9718. " "Digamma function.
  9719. " "11C007" :1\.11) "^IBERNOULLI" ("#/zint \\-> Q
  9720. " "Bernoulli numbers.
  9721. " "10D007" :1\.11 :CSys) "^PARITYTEST" ("
  9722. " "" "0CD007" :CSys) "^COSTEST" ("
  9723. " "" "0CE007" :CSys) "^NDEvalN/D" ("num deno n d \\-> num' deno'
  9724. " "Evals list poly over a list fraction.
  9725. " "0D9007" :CSys) "^PEvalN/D" ("P n d \\-> num d #
  9726. " "Evals list poly over a list fraction.
  9727. " "0DA007" :CSys) "^vgerxssSYMSUM" ("Meta2 Meta1 \\-> meta
  9728. " "Symbolic sum with tests for two zints.
  9729. lam'sumvar bound to 'id/lam' and lam'sumexpr
  9730. to 'expr'.
  9731. " "3C1006" :CSys) "^MAT*SCMOD" ("
  9732. " "mat*scalar modulo.
  9733. " "246006" :CSys) "^SC*MATMOD" ("
  9734. " "scalar*mat modulo.
  9735. " "247006" :CSys) "^MAT*MATMOD" ("
  9736. " "mat*mat modulo.
  9737. " "248006" :CSys) "^DIVMOD" ("
  9738. " "division modulo.
  9739. " "249006" :CSys) "^GCD1MOD" ("
  9740. " "GCD modulo.
  9741. " "24A006" :CSys) "^INVMOD" ("
  9742. " "Inversion modulo for zint.
  9743. " "24B006" :CSys) "^MINVMOD" ("
  9744. " "Inversion modulo for matrix of zint.
  9745. " "24C006" :CSys) "^FLAGDIV2MOD" ("
  9746. " "Euclidean division modulo.
  9747. " "24D006" :CSys) "^FLAGPOWMOD" ("
  9748. " "Power modulo.
  9749. " "24E006" :CSys) "^FLAGMPOWMOD" ("
  9750. " "Matrix Power modulo.
  9751. " "24F006" :CSys) "^EXPAMOD" ("
  9752. " "expand modulo.
  9753. " "250006" :CSys) "^FLAGEXPAMOD" ("
  9754. " "" "251006" :CSys) "^FLAGFACTORMOD" ("symb \\-> symb
  9755. " "FACTOR modulo.
  9756. " "252006" :CSys) "^MFACTORMOD" ("M \\-> M'
  9757. " "FACTOR modulo for amtrices.
  9758. " "253006" :CSys) "^RREFMOD" ("
  9759. " "RREF modulo.
  9760. " "254006" :CSys) "^LIFCext" ("{contfrac} \\-> fraction
  9761. " "Converts continued fraction to rational.
  9762. " "256006" :CSys) "^PEvalMod" ("Q Z Zn \\-> Q'
  9763. " "Computes value of polynomial mod Zn.
  9764. " "0E1006" :CSys) "^QAddMod" ("Q1 Q2 Zn \\-> Q'
  9765. " "Polynomial addition modulo Zn.
  9766. " "0E2006" :CSys) "^QSubMod" ("Q1 Q2 Zn \\-> Q'
  9767. " "Polynomial subtraction modulo Zn.
  9768. " "0E3006" :CSys) "^QMulMod" ("Q1 Q2 Zn \\-> Q'
  9769. " "Polynomial multiplication modulo Zn.
  9770. " "0E4006" :CSys) "^QDivMod" ("Q1 Q2 Zn \\-> Qquo Qrem
  9771. " "Polynomial division modulo Zn. In regular
  9772. division the coefficients in the remainder
  9773. can increase very quickly to tens of digits,
  9774. thus it is important to normalize the
  9775. coefficients whenever possible.
  9776. " "0E5006" :CSys) "^QInvMod" ("Q Zn \\-> Q'
  9777. " "Polynomial inversion modulo Zn.
  9778. " "0E6006" :CSys) "^QGcdMod" ("Q1 Q2 Zn \\-> Q'
  9779. " "Polynomial GCD modulo Zn for univariate
  9780. polynomials. The result is made monic.
  9781. " "0E7006" :CSys) "^QGcdExMod" ("
  9782. " "Extended polynomial GCD modulo Zn for
  9783. univariate polynomials. The equation:
  9784. Q1*Q1' + Q2*Q2' = 1 MOD Zn.
  9785. " "0E8006" :CSys) "^ISOL1" ("symb id \\-> id symb'
  9786. " "" "4C5006" :CSys) "^ISOLALL" ("symb id \\-> id {}
  9787. " "Internal SOLVE.
  9788. " "4C6006" :CSys) "^ISOL2ext" ("symb id \\-> symb'
  9789. symb id \\-> {}
  9790. " "Like <REF>ISOL1 if isolflag is set.
  9791. Otherwise returns the list of all found
  9792. solutions.
  9793. " "4C7006" :CSys) "^BEZOUTMSOLV" ("Lpoly Lidnt \\-> Lidnt sols
  9794. " "If no extension in Lpoly, calls ALG48 GSOLVE
  9795. Otherwise, solves by Bezout \"Gaussian\"
  9796. elimination. In the latter case, if system
  9797. seems underdetermined, Lidnt is truncated.
  9798. Then the system must be exactly determined
  9799. and polynomials must be prime together.
  9800. " "4C8006" :CSys) "^ROOT{}N" ("meta of roots \\-> list of roots
  9801. " "Drops tagged roots.
  9802. " "4C9006" :CSys) "^MHORNER" ("poly-l {r1...rk} # \\-> P[r1...rk]
  9803. " "Top-level call. Poly-l might be a matrix.
  9804. " "4CA006" :CSys) "^MHORNER1" ("P { r } \\-> P[..r..]
  9805. " "" "4CB006" :CSys) "^SQFFext" ("Q \\-> { F1 mult1 .. Fn multn }
  9806. " "" "4CC006" :CSys) "^MSQFF" ("Q \\-> F1 mult1 .. Fn multn #2n
  9807. " "Full square-free factorization of object. The
  9808. result is given as a Meta object.
  9809. " "4CD006" :CSys) "^%1TWO" ("ob \\-> ob %1 #2
  9810. " "Square free factorization of unknown (?)
  9811. object. See MSQFF.
  9812. " "4CE006" :CSys) "^MZSQFF" ("Z \\-> Z1 mult1 .. Zn multn #2n
  9813. " "Full factorization of an integer.
  9814. " "4CF006" :CSys) "^MZSQFF1" ("Meta curfac %n newfac T \\-> Meta curfac %n+1
  9815. Meta curfac %n newfac F \\-> Meta' newfac %1
  9816. " "Adds integer factor to factor list. If the
  9817. factor is the same as the last time, only the
  9818. multiplicity is increased.
  9819. " "4D0006" :CSys) "^MLISTSQFF" ("P \\-> Meta
  9820. " "Full square-free factorization of a
  9821. polynomial with a recursive call on the GCD
  9822. of all coefficients.
  9823. " "4D2006" :CSys) "^METASQFFext" ("P-list \\-> S1 %1 ..Se-1 %e-1 %e ee Te Re
  9824. " "Square-free factorization.
  9825. " "4D3006" :CSys) "^LIDNText" ("ob \\-> {}
  9826. " "Gets list of all ids present in ob.
  9827. " "4DE006" :CSys) "^LVARXNXext" ("symb \\-> symb x lvarnx lvarx
  9828. " "Finds variable of symb depending on current
  9829. variable and other variable. Using LVAR is
  9830. impossible here because of sqrt.
  9831. " "4DF006" :CSys) "^ISPOLYNOMIAL?" ("ob \\-> flag
  9832. " "Returns TRUE if symb is polynomial with
  9833. respect to current variable.
  9834. " "4E0006" :CSys) "^2POLYNOMIAL?" ("symb1 symb2 \\-> symb1 symb2 flag
  9835. " "Returns TRUE if symb1 and symb2 are
  9836. polynomial with respect to current variable.
  9837. " "4E1006" :CSys) "^VXINDEP?" ("symb \\-> symb flag
  9838. " "Returns TRUE if symb is independent of
  9839. current variable.
  9840. " "4E2006" :CSys) "^LVARXNX2ext" ("
  9841. " "" "4E3006" :CSys) "^RLVARext" ("ob \\-> {}
  9842. " "Recursive search of all variables.
  9843. " "4E4006" :CSys) "^LLVARDext" ("o \\-> #depth o lvar
  9844. " "" "4E5006" :CSys) "^VXLVARext" ("symb \\-> symb lvar
  9845. " "" "4E6006" :CSys) "^LVARext" ("ob \\-> ob {}
  9846. " "List of variables. Square roots *are* included
  9847. in the list of rational operators.
  9848. " "4E7006" :CSys) "^VX>LVARext" ("ob \\-> ob {}
  9849. " "Like <REF>LVARext but the current variable is
  9850. added using >HCOMP. Square roots *are*
  9851. included in the list of rational operators.
  9852. " "4E8006" :CSys) "^VX>" ("{} \\-> {}'
  9853. " "If VX is in the list then moves it to the
  9854. beginning of the list. Otherwise does
  9855. nothing.
  9856. --
  9857. <REF>TEXT:Reserved|VX
  9858. " "4E9006" :CSys) "^VX!" ("{} \\-> {}
  9859. " "If VX is in the list then moves it at the
  9860. beginning. Otherwise VX is added to the
  9861. beginning of the list.
  9862. --
  9863. <REF>TEXT:Reserved|VX
  9864. " "4EA006" :CSys) "^LIDNTLVAR" ("symb lidnt \\-> symb lidnt lvar
  9865. " "lvar is the list of variables in symb, but
  9866. elements of lidnt are moved to the beginning
  9867. of lvar.
  9868. " "4EC006" :CSys) "^LISTOPRAC" ("\\-> {}
  9869. " "Returns the list of rational operator with
  9870. sqrt appended to the list.
  9871. " "4ED006" :CSys) "^LISTOPext" ("\\-> {}
  9872. " "List of basic \"rational\" operators without
  9873. square root.
  9874. " "4EE006" :CSys) "^LISTOPSQRT" ("\\-> {}
  9875. " "List of basic \"rational\" operators with
  9876. square root.
  9877. " "4EF006" :CSys) "^LVARDext" ("ob listop \\-> lidnt
  9878. Meta listop \\-> lidnt
  9879. " "Determines list of variables in ob (or Meta)
  9880. using the given list of basic \"rational\"
  9881. operators.
  9882. " "4F0006" :CSys) "^>VARLIST" ("
  9883. " "" "4F1006" :CSys) "^DEPTHext" ("ob \\-> #
  9884. " "Returns the max number of embedded lists in
  9885. ob.
  9886. " "4F2006" :CSys) "^DEPTHOBJext" ("objet # \\-> depth
  9887. " "" "4F3006" :CSys) "^TRIMOBJext" ("ob \\-> ob '
  9888. " "Trims object.
  9889. " "4F6006" :CSys) "^NEWTRIMext" ("Q \\-> Q
  9890. " "Recursively tests if Q is a list of one
  9891. constant element. This is much faster than
  9892. TRIMOBJext and sufficient for the output of
  9893. programs which are trimmed on the fly.
  9894. " "4F7006" :CSys) "^>POLYTRIM" ("meta \\-> {}
  9895. " "Equivalent to {}POLY TRIMOBJext.
  9896. " "4F8006" :CSys) "^ELMGext" ("ob \\-> ob'
  9897. " "Trims small numbers (less than epsilon).
  9898. " "4F9006" :CSys) "^ZINTSQRT" ("
  9899. " "" "51F006" :CSys) "^SHALT" ("
  9900. " "" "520006" :CSys) "^IsV>V?" ("v1 v2 \\-> flag
  9901. " "Returns TRUE if v1 is lexicographically after
  9902. v2.
  9903. " "0E9006" :CSys) "^PZadic" ("Q Z \\-> Q'
  9904. " "" "0EB006" :CSys) "^LISTMAXext" ("P \\-> P Z T depth
  9905. \\-> P ? F #0
  9906. " "Step 1 for gcdheu:
  9907. Returns FALSE if gcdheu can not be applied
  9908. (e.g. if P contains irrquads). Returns TRUE
  9909. otherwise, Z is the max of all integers of P
  9910. or 2*max if there are complex in P.
  9911. " "104006" :CSys) "^GCDHEUext" ("A B \\-> a b c pr[pgcd] A'/G' B'/G' flag
  9912. " "Heuristic GCD.
  9913. " "0EC006" :CSys) "^SIGNE" ("symb \\-> sign
  9914. " "Compute the sign table of the expression with
  9915. respect to the current variable. Internal
  9916. version of the UserRPL command SIGNTAB.
  9917. " "237006" :CSys) "^SIGNE1ext" ("expr \\-> sign
  9918. " "Sign table of a polynomial or rational
  9919. expression.
  9920. " "0DC007" :CSys) "^SIGNEext" ("
  9921. " "" "0DD007" :CSys) "^SIGNUNDEF" ("\\-> sign
  9922. " "Returns undefined sign table.
  9923. " "0DE007" :CSys) "^SIGNPLUS" ("\\-> sign
  9924. " "Returns always positive sign table.
  9925. " "0DF007" :CSys) "^SIGNMOINS" ("\\-> sign
  9926. " "Returns always negative sign table.
  9927. " "0E0007" :CSys) "^SIGNELN" ("sign \\-> sign
  9928. " "Returns ln of a sign table.
  9929. " "0E1007" :CSys) "^SIGNEEXP" ("sign \\-> sign'
  9930. " "Returns exp of a sign table.
  9931. " "0E2007" :CSys) "^SIGNESIN" ("sign \\-> sign'
  9932. " "Returns sin of a sign table.
  9933. " "0E3007" :CSys) "^SIGNECOS" ("sign \\-> sign'
  9934. " "Returns cos of a sign table.
  9935. " "0E4007" :CSys) "^SIGNETAN" ("sign \\-> sign'
  9936. " "Returns tan of a sign table.
  9937. " "0E5007" :CSys) "^SIGNEATAN" ("sign \\-> sign'
  9938. " "Returns atan of a sign table.
  9939. " "0E6007" :CSys) "^SIGNESQRT" ("sign \\-> sign'
  9940. " "Returns sqrt of a sign table.
  9941. " "0E7007" :CSys) "^SUBSIGNE" ("sign min max \\-> sign'
  9942. " "Truncates a sign table.
  9943. " "0E8007" :CSys) "^SIGNERIGHT" ("sign ob \\-> sign'
  9944. " "Places ob at the end of a sign table.
  9945. " "0E9007" :CSys) "^SIGNELEFT" ("sign ob \\-> sign'
  9946. " "Places ob at the beginning of a sign table.
  9947. " "0EA007" :CSys) "^>SIGNE" ("sign \\-> sign'
  9948. " "Prepends { -infinity ? } to a sign table.
  9949. " "0EB007" :CSys) "^SIGNE>" ("sign \\-> sign'
  9950. " "Appends { ? +infinity } to a sign table.
  9951. " "0EC007" :CSys) "^SIGNMULText" ("sign1 sign2 \\-> sign'
  9952. " "Multiplies two sign tables.
  9953. " "0ED007" :CSys) "^POSITIFext" ("ob \\-> ob flag
  9954. " "Tries to determine if ob is positive. In
  9955. internal representation, this depends on
  9956. increaseflag so that x-1 is positive if
  9957. increaseflag is cleared, negative otherwise,
  9958. because x is assumed to tend to +infinity or
  9959. zero.
  9960. " "0DB007" :CSys) "^ZSIGNECK" ("ob \\-> ob flag
  9961. " "Returns sign of an expression.
  9962. Error if unable to find sign.
  9963. " "0EE007" :CSys) "^ZSIGNE" ("ob \\-> zint
  9964. " "Returns sign of an expression.
  9965. zint=1 for +, -1 for -, 0 for undef.
  9966. Expression does not need to be
  9967. polynomial/rational.
  9968. " "0F0007" :CSys) "^zsigne" ("meta \\-> zint
  9969. " "Returns sign of a meta symbolic.
  9970. zint=1 for +, -1 for -, 0 for undef.
  9971. Expression does not need to be
  9972. polynomial/rational.
  9973. " "0F1007" :CSys) "^CHECKSING" ("symb inf sup vx \\-> symb inf sup vx flag
  9974. " "Checks for singularities in expr.
  9975. " "07D007" :CSys) "^ERABLEERROR" ("# \\->
  9976. " "Calls CAS Error.
  9977. " "57E006" :CSys) "^GETERABLEMSG" ("# \\-> $
  9978. " "Get string in erable messages table.
  9979. " "57D006" :CSys) "^ErrInfRes" ("Error 305h
  9980. " "Generates \"Infinite Result\" error.
  9981. " "090006" :CSys) "^ErrUndefRes" ("Error 304h
  9982. " "Generates \"Undefined Result\" error.
  9983. " "091006" :CSys) "^ErrBadDim" ("Error 501h
  9984. " "Generates \"Invalid Dimension\" error.
  9985. " "092006" :CSys) "^CANTFACTOR" ("Error DE1Ch
  9986. " "Generates \"Unable to find factor\" error.
  9987. " "57F006" :CSys) "^TRANSCERROR" ("Error DE20h
  9988. " "Generates \"Not reducible to a rational
  9989. expression\" error.
  9990. " "580006" :CSys) "^NONUNARYERR" ("Error DE21h
  9991. " "Generates \"Non unary operator\" error.
  9992. " "581006" :CSys) "^INTERNALERR" ("Error DE26h
  9993. " "Generates \"CAS internal error\" error.
  9994. " "582006" :CSys) "^INVALIDOP" ("Error DE28h
  9995. " "Generates \"Operator not implemented (SERIES)\"
  9996. error.
  9997. " "583006" :CSys) "^ISOLERR" ("Error DE2Ah
  9998. " "Generates \"No solution found\" error.
  9999. " "584006" :CSys) "^NONINTERR" ("Error DE2Ch
  10000. " "Generates \"No solution in ring\" error.
  10001. " "585006" :CSys) "^INTVARERR" ("Error DE32h
  10002. " "Generates \"No name in expression\" error.
  10003. " "586006" :CSys) "^Z>#ERR" ("Error DE35h
  10004. " "Generates \"Integer too large\" error.
  10005. " "587006" :CSys) "^SIGNEERROR" ("Error DE36h
  10006. " "Generates \"Unable to find sign\" error.
  10007. " "0EF007" :CSys) "^Z<0ERR" ("Error DE46h
  10008. " "Generates \"Negative integer\" error.
  10009. " "588006" :CSys) "^VXINDEPERR" ("Error DE47h
  10010. " "Generates \"Parameter is cur. var. dependent\"
  10011. error.
  10012. " "589006" :CSys) "^NONPOLYSYST" ("Error DE49h
  10013. " "Generates \"Non polynomial systrem\" error.
  10014. " "58A006" :CSys) "^COMPLEXERR" ("Error DE4Dh
  10015. " "Generates \"Complex number not allowed\" error.
  10016. " "58B006" :CSys) "^VALMUSTBE0" ("Error DE4Eh
  10017. " "Generates \"Polyn. valuation must be 0\" error.
  10018. " "58C006" :CSys) "^SWITCHNOTALLOWED" ("Error DE4Fh
  10019. " "Generates \"Mode switch not allowed here\"
  10020. error.
  10021. " "58D006" :CSys) "^NONALGERR" ("Error DE50h
  10022. " "Generates \"Non algebraic in expression\"
  10023. error.
  10024. " "119007" :1\.11 :CSys) "^ERR$EVALext" ("seco \\-> action
  10025. " "" "58E006" :CSys) "^Sys1IT" ("ob \\->
  10026. " "Execute object if display flag is set.
  10027. " "58F006" :CSys) "^CFGDISPLAY" ("\\->
  10028. " "Display current configuration of the CAS.
  10029. " "08F007" :CSys) "^NEWVX" ("\\->
  10030. " "Input new current variable from the user.
  10031. --
  10032. <REF>TEXT:Reserved|VX
  10033. " "090007" :CSys) "^NEWMODULO" ("\\->
  10034. " "Input new modulo from the user.
  10035. " "091007" :CSys) "^SWITCHON" ("#flag \\->
  10036. " "Asks the user if a certain mode may be
  10037. switched on by toggling system flag #flag.
  10038. Errors if the user does not want to switch.
  10039. " "092007" :CSys) "^SWITCHOFF" ("#flag \\->
  10040. " "Asks the user is a certain mode may be
  10041. switched off by toggling system flag #flag.
  10042. Error if the user does not want to switch.
  10043. " "093007" :CSys) "^FLAGNAME" ("# \\-> # $
  10044. " "Find the name of a flag.
  10045. " "094007" :CSys) "^PUSHFLAGS" ("\\->
  10046. " "Internal version of User PUSH command: stores
  10047. the current flag settings and path in the
  10048. CASDIR/ENVSTK variable.
  10049. " "1DC007" :UBS) "^POPFLAGS" ("\\->
  10050. " "Internal version of User POP command: pops
  10051. the last pushed flag settings and path from
  10052. the CASDIR/ENVSTK variable.
  10053. " "1DD007" :UBS) "^COMPLEXON" ("\\->
  10054. " "Turns complex mode on. Depending on system
  10055. flag 120, the user is asked first.
  10056. " "095007" :CSys) "^COMPLEXOFF" ("\\->
  10057. " "Turns complex mode off. Depending on system
  10058. flag 120, the user is asked first.
  10059. " "096007" :CSys) "^EXACTON" ("\\->
  10060. " "Turns exact mode on. Depending on system
  10061. flag 120, the user is asked first.
  10062. " "097007" :CSys) "^EXACTOFF" ("\\->
  10063. " "Turns exact mode off. Depending on system
  10064. flag 120, the user is asked first.
  10065. " "098007" :CSys) "^COMPLEXMODE" ("\\->
  10066. " "Set complex mode, refresh configuration
  10067. display.
  10068. " "099007" :CSys) "^SETCOMPLEX" ("\\->
  10069. " "Set complex mode.
  10070. " "09A007" :CSys) "^COMPLEX?" ("\\-> flag
  10071. " "Test complex mode.
  10072. " "09B007" :CSys) "^REALMODE" ("\\->
  10073. " "Set real mode, refresh configuration display.
  10074. " "09C007" :CSys) "^CLRCOMPLEX" ("\\->
  10075. " "Set real mode.
  10076. " "09D007" :CSys) "^EXACTMODE" ("\\->
  10077. " "Set exact mode, refresh configuration
  10078. display.
  10079. " "09E007" :CSys) "^SETEXACT" ("\\->
  10080. " "Set exact mode and gcd mode.
  10081. " "09F007" :CSys) "^NUMMODE" ("\\->
  10082. " "Set numeric mode, refresh configuration
  10083. display.
  10084. " "0A0007" :CSys) "^CLREXACT" ("\\->
  10085. " "Clear exact mode.
  10086. " "0A1007" :CSys) "^EXACT?" ("\\-> flag
  10087. " "Test exact mode.
  10088. " "0A2007" :CSys) "^STEPBYSTEP" ("\\->
  10089. " "Set step by step flag, refresh display.
  10090. " "0A3007" :CSys) "^NOSTEPBYSTEP" ("\\->
  10091. " "Clear step by step flag, refresh display.
  10092. " "0A4007" :CSys) "^VERBOSEMODE" ("\\->
  10093. " "Set verbose mode, refresh configuration
  10094. display.
  10095. " "0A5007" :CSys) "^SILENTMODE" ("\\->
  10096. " "Set silent mode, refresh configuration
  10097. display.
  10098. " "0A6007" :CSys) "^RECURMODE" ("\\->
  10099. " "Set recursive mode, refresh configuration
  10100. display.
  10101. " "0A7007" :CSys) "^NONRECMODE" ("\\->
  10102. " "Set nonrecursive mode, refresh configuration
  10103. display.
  10104. " "0A8007" :CSys) "^PLUSAT0" ("\\->
  10105. " "Set positive mode, refresh configuration
  10106. display.
  10107. " "0A9007" :CSys) "^SETPLUSAT0" ("\\->
  10108. " "Set positive mode.
  10109. " "0AA007" :CSys) "^PLUSATINFTY" ("\\->
  10110. " "Set positive infinity mode, refresh
  10111. configuration display.
  10112. " "0AB007" :CSys) "^CLRPLUSAT0" ("\\->
  10113. " "Set positive infinity mode.
  10114. " "0AC007" :CSys) "^SPARSEDATA" ("\\->
  10115. " "Set full data mode, refresh configuration
  10116. display.
  10117. " "0AD007" :CSys) "^FULLDATA" ("\\->
  10118. " "Set sparse mode, refresh configuration
  10119. display.
  10120. " "0AE007" :CSys) "^RIGORMODE" ("\\->
  10121. " "Set rigorous mode, refresh configuration
  10122. display.
  10123. " "0AF007" :CSys) "^SLOPPYMODE" ("\\->
  10124. " "Set sloppy mode, refresh configuration
  10125. display.
  10126. " "0B0007" :CSys) "^SLOPPY?" ("\\-> flag
  10127. " "Test sloppy mode.
  10128. " "0B1007" :CSys) "^SAVECASFLAGS" ("\\->
  10129. " "Saves CAS flags and current var.
  10130. " "1D2006" :CSys) "^RESTORECASFLAGS" ("\\->
  10131. " "Restore CAS flags and current var.
  10132. " "1D4006" :CSys) "^CASFLAGEVAL" ("\\->
  10133. " "Execute next runstream object with flag
  10134. protection.
  10135. " "1D5006" :CSys) "^RCLMODULO" ("\\-> Z
  10136. " "Fetch MODULO from the home directory.
  10137. " "0C2007" :CSys) "^RCLPERIOD" ("\\-> sym
  10138. " "Fetch PERIOD from the home directory.
  10139. " "0C3007" :CSys) "^RCLVX" ("\\-> id
  10140. " "Fetch VX from home directory.
  10141. --
  10142. <REF>TEXT:Reserved|VX
  10143. " "0C4007" :CSys) "^STOVX" ("ob \\->
  10144. " "Store object in VX.
  10145. --
  10146. <REF>TEXT:Reserved|VX
  10147. " "0C5007" :CSys) "^STOMODULO" ("ob \\->
  10148. " "Store object in MODULO.
  10149. " "0C6007" :CSys) "^RCLEPS" ("\\-> %
  10150. " "Fetch EPS from home directory.
  10151. " "0C7007" :CSys) "^ISIDREAL?" ("id \\-> id id T
  10152. \\-> id F
  10153. " "Test if id is in the REALASSUME list.
  10154. " "0C8007" :CSys) "^ADDTOREAL" ("id \\->
  10155. " "Add idnt to the list of real var.
  10156. " "0C9007" :CSys) "^RESETCASCFG" ("\\->
  10157. " "Reset CAS config.
  10158. " "0CA007" :CSys) "^VERNUMext" ("\\-> %version
  10159. " "CAS version number.
  10160. " "1D0006" :CSys) "^MENUXYext" ("#2 #1 \\-> {}
  10161. " "Make list of Erable commands between the
  10162. given numbers.
  10163. " "1D1006" :CSys) "^MENUext" ("$6...$1 \\->
  10164. " "If the CAS quiet flag is not set, displays
  10165. the six strings as menu keys. Otherwise does
  10166. nothing.
  10167. " "08D007" :CSys) "^MENUCHOOSE?" ("\\-> prg flag
  10168. " "Return best CHOOSE command.
  10169. " "0B2007" :CSys) "^MENUCHOOSE" ("{} \\->
  10170. " "Offers a selection to the user. If Flag -117
  10171. is set, only installs a menu. If not, offer
  10172. a CHOOSE box.
  10173. " "0B3007" :CSys) "^MENUGENE1" ("\\-> {}
  10174. " "Menu for CAS.
  10175. " "0B4007" :CSys) "^MENUBASE1" ("\\-> {}
  10176. " "Base algebra menu.
  10177. " "0B5007" :CSys) "^MENUCMPLX1" ("\\-> {}
  10178. " "Complex operations menu.
  10179. " "0B6007" :CSys) "^MENUTRIG1" ("\\-> {}
  10180. " "Trigonometric operations menu.
  10181. " "0B7007" :CSys) "^MENUMAT1" ("\\-> {}
  10182. " "Matrix operations menu.
  10183. " "0B8007" :CSys) "^MENUARIT1" ("\\-> {}
  10184. " "Arithmetic operations menu.
  10185. " "0B9007" :CSys) "^MENUSOLVE1" ("\\-> {}
  10186. " "Solver menu.
  10187. " "0BA007" :CSys) "^MENUEXPLN1" ("\\-> {}
  10188. " "Exponential and logarithmic operations menu.
  10189. " "0BB007" :CSys) "^MENUDIFF1" ("\\->
  10190. " "Differential calculus menu.
  10191. " "0BC007" :CSys) "^ISPRIME" ("z/% \\-> %0/%1
  10192. " "Internal ISPRIME.
  10193. " "218006" :CSys) "^FLAGEXPAND" ("symb \\-> symb'
  10194. " "Internal xEXPAND. Expands symbolic expression.
  10195. " "1D6006" :CSys) "^EXPANDBOTH" ("
  10196. " "" "1D7006" :CSys) "^FLAGFACTOR" ("symb \\-> symb'
  10197. z \\-> symb
  10198. " "Internal xFACTOR. Factors symbolic or
  10199. number.
  10200. " "1D8006" :CSys) "^FLAGLISTEXEC" ("symb {} \\-> symb'
  10201. " "Internal xSUBST for the QcaseQ that level 1 is an
  10202. array or a matrix.
  10203. " "1D9006" :CSys) "^FLAGSYMBEXEC" ("symb symb' \\-> symb''
  10204. " "Internal xSUBST for the QcaseQ that level 1 is a
  10205. symbolic.
  10206. " "1DA006" :CSys) "^FLAGIDNTEXEC" ("symb id \\-> symb'
  10207. " "Internal xSUBST for the QcaseQ that level 1 is
  10208. an id or a lam.
  10209. " "1DB006" :CSys) "^FLAGINTVX" ("symb \\-> symb'
  10210. " "Internal xINTVX.
  10211. " "1DC006" :CSys) "^DERVX" ("symb \\-> symb'
  10212. " "Internal xDERVX.
  10213. " "1DD006" :CSys) "^SOLVEXFLOAT" ("% \\-> {}
  10214. " "Internal xSOLVEVX for a float.
  10215. " "1DE006" :CSys) "^SYMLIMIT" ("symb symb' \\-> symb''
  10216. " "Internal xLIMIT for scalars.
  10217. " "1DF006" :CSys) "^FLAGMATRIXLIMIT" ("[] symb \\-> []'
  10218. " "Internal xLIMIT for matrices.
  10219. " "1E0006" :CSys) "^TAYLOR0" ("symb \\-> symb'
  10220. " "Internal xTAYLOR0.
  10221. " "1E1006" :CSys) "^FLAGSERIES" ("symb id z \\-> {} symb'
  10222. " "Internal xSERIES.
  10223. " "1E2006" :CSys) "^PLOTSTK" ("
  10224. " "Internal PLOTSTK.
  10225. " "1E3006" :CSys) "^PLOTADD" ("symb \\->
  10226. " "Internal xPLOTADD.
  10227. " "1E4006" :CSys) "^FLAGIBP" ("symb1 symb2 \\-> symb3 symb4
  10228. " "Internal xIBP.
  10229. " "1E5006" :CSys) "^FLAGPREVAL" ("symb1 symb2 symb3 \\-> symb4
  10230. " "Internal xPREVAL. Evaluates symb1 at the points
  10231. symb2 and symb3 and takes the difference.
  10232. " "1E6006" :CSys) "^MATRIXRISCH" ("[] id \\-> symb'
  10233. " "Internal xRISCH for matrix arguments.
  10234. " "1E7006" :CSys) "^FLAGRISCH" ("symb id \\-> symb'
  10235. " "Internal xRISCH for non-matrix argumetns.
  10236. " "1E8006" :CSys) "^FLAGDERIV" ("symb id \\-> symb'
  10237. " "Internal xDERIV.
  10238. " "1E9006" :CSys) "^FLAGLAP" ("symb \\-> symb'
  10239. " "Internal xLAP.
  10240. " "1EA006" :CSys) "^FLAGILAP" ("symb \\-> symb'
  10241. " "Internal xILAP.
  10242. " "1EB006" :CSys) "^FLAGDESOLVE" ("symb symb' \\-> symb''
  10243. " "Internal xDESOLVE.
  10244. " "1EC006" :CSys) "^FLAGLDSSOLV" ("symb1 symb2 \\-> symb3
  10245. " "Internal xLDEC.
  10246. " "1ED006" :CSys) "^FLAGLDECSOLV" ("
  10247. " "" "1EE006" :CSys) "^FLAGTEXPAND" ("symb \\-> symb'
  10248. " "Internal xTEXPAND.
  10249. " "1EF006" :CSys) "^FLAGLIN" ("symb \\-> symb'
  10250. " "Internal xLIN.
  10251. " "1F0006" :CSys) "^FLAGTSIMP" ("symb \\-> symb'
  10252. " "Internal xTSIMP.
  10253. " "1F1006" :CSys) "^FLAGLNCOLLECT" ("symb \\-> symb'
  10254. " "Internal xLNCOLLECT.
  10255. " "1F2006" :CSys) "^FLAGEXPLN" ("symb \\-> symb'
  10256. " "Internal xEXPLN.
  10257. " "1F3006" :CSys) "^FLAGSINCOS" ("symb \\-> symb'
  10258. " "Internal xSINCOS.
  10259. " "1F4006" :CSys) "^FLAGTLIN" ("symb \\-> symb'
  10260. " "Internal xTLIN.
  10261. " "1F5006" :CSys) "^FLAGTCOLLECT" ("symb \\-> symb'
  10262. " "Internal TCOLLECT.
  10263. " "1F6006" :CSys) "^FLAGTRIG" ("symb \\-> symb'
  10264. " "Internal xTRIG.
  10265. " "1F7006" :CSys) "^FLAGTRIGCOS" ("symb \\-> symb'
  10266. " "Internal xTRIGCOS.
  10267. " "1F8006" :CSys) "^FLAGTRIGSIN" ("symb \\-> symb'
  10268. " "Internal xTRIGSIN.
  10269. " "1F9006" :CSys) "^FLAGTRIGTAN" ("symb \\-> symb'
  10270. " "Internal xTRIGTAN.
  10271. " "1FA006" :CSys) "^FLAGTAN2SC" ("symb \\-> symb'
  10272. " "Internal xTAN2SC.
  10273. " "1FB006" :CSys) "^FLAGHALFTAN" ("symb \\-> symb'
  10274. " "Internal xHALFTAN.
  10275. " "1FC006" :CSys) "^FLAGTAN2SC2" ("symb \\-> symb'
  10276. " "Internal xTAN2SC2.
  10277. " "1FD006" :CSys) "^FLAGATAN2S" ("symb \\-> symb'
  10278. " "Internal xATAN2S.
  10279. " "1FE006" :CSys) "^FLAGASIN2T" ("symb \\-> symb'
  10280. " "Internal xASIN2T.
  10281. " "1FF006" :CSys) "^FLAGASIN2C" ("symb \\-> symb'
  10282. " "Internal xASIN2C.
  10283. " "200006" :CSys) "^FLAGACOS2S" ("symb \\-> symb'
  10284. " "Internal xACOS2S.
  10285. " "201006" :CSys) "^STEPIDIV2" ("z1 z2 \\-> z3 z4
  10286. " "Internal xIDIV2.
  10287. " "206006" :CSys) "^FLAGDIV2" ("symb1 symb2 \\-> symb3 symb4
  10288. " "Internal xDIV2.
  10289. " "207006" :CSys) "^FLAGGCD" ("symb1 symb2 \\-> symb3
  10290. " "Internal xGCD for the QcaseQ with two symbolica
  10291. arguments.
  10292. " "208006" :CSys) "^PEGCD" ("symb1 symb2 \\-> symb3 symb4 symb5
  10293. " "Internal xEGCD for polynomials.
  10294. " "209006" :CSys) "^ABCUV" ("symb1 symb2 symb3 \\-> symb4 symb5
  10295. " "Internal polynomial xABCUV.
  10296. " "20B006" :CSys) "^IABCUV" ("z1 z2 z3 \\-> z4 z5
  10297. " "Internal integer xIABCUV.
  10298. " "20C006" :CSys) "^FLAGLGCD" ("{} \\-> {} symb
  10299. " "Internal xLGCD.
  10300. " "20D006" :CSys) "^FLAGLCM" ("symb1 symb2 \\-> symb3
  10301. " "Internal xLCM.
  10302. " "20E006" :CSys) "^FLAGSIMP2" ("symb1 symb2 \\-> symb3 symb4
  10303. " "Internal xSIMP2.
  10304. " "20F006" :CSys) "^FLAGPARTFRAC" ("symb \\-> symb'
  10305. " "Internal xPARTFRAC.
  10306. " "210006" :CSys) "^FLAGPROPFRAC" ("symb \\-> symb'
  10307. " "Internal xPROPFRAC.
  10308. " "211006" :CSys) "^FLAGPTAYL" ("P(X) r \\-> P(X+r)
  10309. " "Internal xPTAYL.
  10310. " "212006" :CSys) "^FLAGHORNER" ("symb1 symb2 \\-> symb3 symb4 symb5
  10311. " "Internal xHORNER.
  10312. " "213006" :CSys) "^EULER" ("z \\-> z'
  10313. " "Internal xEULER.
  10314. " "214006" :CSys) "^FLAGCHINREM" ("A1 A2 \\-> A3
  10315. " "Internal xCHINREM.
  10316. " "216006" :CSys) "^ICHINREM" ("A1 A2 \\-> A3
  10317. " "Internal xICHINREM.
  10318. " "217006" :CSys) "^SOLVE1EQ" ("symb id \\-> {}
  10319. " "Internal xSOLVE for single equations.
  10320. " "219006" :CSys) "^SOLVEMANYEQ" ("[] []' \\-> {}''
  10321. " "Internal xSOLVE for arrays of equations.
  10322. " "21A006" :CSys) "^ZEROS1EQ" ("symb id \\-> {}
  10323. " "Internal xZEROS for single equations.
  10324. " "21B006" :CSys) "^ZEROSMANYEQ" ("[] []' \\-> {}
  10325. " "Internal xZEROS for arrays of equations.
  10326. " "21C006" :CSys) "^FCOEF" ("[] \\-> symb
  10327. " "Internal xFCOEF.
  10328. " "21D006" :CSys) "^FROOTS" ("symb \\-> []
  10329. " "Internal xFROOTS.
  10330. " "21E006" :CSys) "^FACTORS" ("symb \\-> {}
  10331. " "Internal xFACTORS.
  10332. " "21F006" :CSys) "^DIVIS" ("symb \\-> {}
  10333. " "Internal xDIVIS.
  10334. " "220006" :CSys) "^STUDMULT" ("
  10335. " "Internal xSTUDMULT.
  10336. " "221006" :CSys) "^STUDDIV" ("
  10337. " "Internal xSTUDDIV.
  10338. " "222006" :CSys) "^rref" ("M \\-> A M'
  10339. " "Internal xrref.
  10340. " "223006" :CSys) "^MADNOCK" ("M \\-> symb1 []' []'' symb3
  10341. " "Internal xMAD.
  10342. " "229006" :CSys) "^SYSTEM" ("[] []' \\-> []'' {} []'''
  10343. " "Internal xLINSOLVE.
  10344. " "22A006" :CSys) "^VANDERMONDE" ("{} \\-> M
  10345. " "Internal xVANDERMONDE.
  10346. " "22B006" :CSys) "^HILBERTNOCK" ("z \\-> M
  10347. " "Internal xHILBERT.
  10348. " "22C006" :CSys) "^CURL" ("[exprs] [vars] \\-> []
  10349. " "Internal xCURL.
  10350. " "22E006" :CSys) "^DIVERGENCE" ("[exprs] [vars] \\-> symb
  10351. " "Internal xDIV.
  10352. " "22F006" :CSys) "^LAPLACIAN" ("[expr] [vars] \\-> symb
  10353. " "Internal xLAPL.
  10354. " "230006" :CSys) "^HESSIAN" ("symb A \\-> M A' A''
  10355. " "Internal xHESS.
  10356. " "231006" :CSys) "^HERMITE" ("z \\-> symb
  10357. " "Internal xHERMITE.
  10358. " "232006" :CSys) "^TCHEBNOCK" ("%degree \\-> symb
  10359. " "Internal xTCHEBYCHEFF.
  10360. " "233006" :CSys) "^LEGENDRE" ("z \\-> symb
  10361. " "Internal xLEGENDRE.
  10362. " "234006" :CSys) "^LAGRANGE" ("A \\-> symb
  10363. " "Internal xLAGRANGE.
  10364. " "235006" :CSys) "^FOURIER" ("symb z \\-> C%
  10365. " "Internal xFOURIER.
  10366. " "236006" :CSys) "^TABVAR" ("symb \\-> symb {{}} grob
  10367. " "Internal xTABVAR.
  10368. " "238006" :CSys) "^FLAGDIVPC" ("symb1 symb2 z \\-> symb3
  10369. " "Internal xDIVPC.
  10370. " "239006" :CSys) "^FLAGTRUNC" ("symb1 symb2 \\-> symb3
  10371. " "Internal xTRUNC.
  10372. " "23A006" :CSys) "^FLAGSEVAL" ("symb \\-> symb'
  10373. " "Internal xSEVAL.
  10374. " "23B006" :CSys) "^XNUM" ("symb \\-> symb'
  10375. " "Internal xXNUM.
  10376. " "23C006" :CSys) "^REORDER" ("symb id \\-> symb'
  10377. " "Internal xREORDER.
  10378. " "23D006" :CSys) "^USERLVAR" ("symb \\-> symb []
  10379. " "Internal xLVAR.
  10380. " "23E006" :CSys) "^USERLIDNT" ("symb \\-> []
  10381. " "Internal xLNAME.
  10382. " "23F006" :CSys) "^ADDTMOD" ("symb1 symb2 \\-> symb3
  10383. " "Internal xADDTMOD for scalars.
  10384. " "241006" :CSys) "^MADDTMOD" ("M M' \\-> M''
  10385. " "Internal xADDTMOD for matrices.
  10386. " "242006" :CSys) "^SUBTMOD" ("symb1 symb2 \\-> symb3
  10387. " "Internal xSUBTMOD for scalars.
  10388. " "243006" :CSys) "^MSUBTMOD" ("M M' \\-> M''
  10389. " "Internal xSUBTMOD for matrices.
  10390. " "244006" :CSys) "^MULTMOD" ("symb1 symb2 \\-> symb3
  10391. " "Internal xMULTMOD.
  10392. " "245006" :CSys) "^Verbose1" ("$ \\->
  10393. " "Display message on line 1 if verbose mode on.
  10394. " "579006" :CSys) "^Verbose2" ("$ \\->
  10395. " "Display message on line 2 if verbose mode on.
  10396. " "57A006" :CSys) "^Verbose3" ("$ \\->
  10397. " "Display message on line 3 if verbose mode on.
  10398. " "57B006" :CSys) "^VerboseN" ("$ # \\->
  10399. " "Display message on given line if verbose mode
  10400. on.
  10401. " "57C006" :CSys) "^EvalNoCKx*" ("ob ob' \\-> ob''
  10402. " "" "257006" :CSys) "^EvalNoCKx+" ("ob ob' \\-> ob''
  10403. " "" "258006" :CSys) "^EvalNoCKx-" ("ob ob' \\-> ob''
  10404. " "" "259006" :CSys) "^EvalNoCKx/" ("ob ob' \\-> ob''
  10405. " "" "25A006" :CSys) "^EvalNoCKx^" ("ob ob' \\-> ob''
  10406. " "" "25B006" :CSys) "^EvalNoCKxCHS" ("ob \\-> ob'
  10407. " "" "25C006" :CSys) "^EvalNoCKxINV" ("ob \\-> ob'
  10408. " "" "25D006" :CSys) "^EvalNoCKxMOD" ("ob ob' \\-> ob''
  10409. " "" "25E006" :CSys) "^EvalNoCKxPERM" ("ob ob' \\-> ob''
  10410. " "" "25F006" :CSys) "^EvalNoCKxCOMB" ("ob ob' \\-> ob''
  10411. " "" "260006" :CSys) "^EvalNoCKxOR" ("ob ob' \\-> ob''
  10412. " "" "261006" :CSys) "^EvalNoCKxAND" ("ob ob' \\-> ob''
  10413. " "" "262006" :CSys) "^EvalNoCKxXOR" ("ob ob' \\-> ob''
  10414. " "" "263006" :CSys) "^EvalNoCKxXROOT" ("ob ob' \\-> ob''
  10415. " "" "264006" :CSys) "^TABVALext" ("fnct x {} \\-> {}'
  10416. " "Table of values.
  10417. " "265006" :CSys) "^TOLISText" ("o1..on #n \\-> Lvar Q1..Qn
  10418. " "Convert meta of symbolic objects to internal
  10419. form.
  10420. " "266006" :CSys) "^FROMLISText" ("Lvar Meta L \\-> L'
  10421. " "Conversion of elements of Meta objec to user
  10422. format. Meta does not contain the #n number
  10423. of element. L is the list of depth of the
  10424. elements of Meta. For example to convert a
  10425. polynomial, a vector and a matrix:
  10426. Lvar = { X }
  10427. Meta = { Z1 Z3 }
  10428. { Z0 Z1 }
  10429. { { Z1 { Z1 Z0 } } }
  10430. L = { #0 #1 #2 }
  10431. L' = { 'X+2' { 0 1 } { { 1 X } } }.
  10432. " "267006" :CSys) "^QPI" ("ob \\-> ob'
  10433. " "Internal xXQ.
  10434. " "074007" :CSys) "^QpiZ" ("ob \\-> symb
  10435. " "Calls ^Qpi% and converts the resulting
  10436. (real) integers into zints.
  10437. " "073007" :CSys) "^QpiSym" ("symb \\-> symb'
  10438. " "Internal xXQ for symbolics.
  10439. " "075007" :CSys) "^QpiArry" ("[] \\-> []'
  10440. " "Internal xXQ for arrays. Converts each
  10441. element of the array.
  10442. " "076007" :CSys) "^QpiList" ("{} \\-> {}'
  10443. " "Internal xXQ for lists. Converts each
  10444. element of the list.
  10445. " "077007" :CSys) "^Qpi" ("%/C% \\-> symb
  10446. " "Internal xXQ for real and complex numbers.
  10447. " "078007" :CSys) "^Qpi%" ("% \\-> symb
  10448. " "xXQ for reals, but does not convert numbers
  10449. to zints.
  10450. " "079007" :CSys) "^GetRoot" ("%' \\-> %' %''
  10451. " "Tries to find a square number which is a
  10452. factor of the argument. The algorithm only
  10453. tries numbers smaller than 1024^2-1 and
  10454. assumes that % is an integer. The returned
  10455. results are such that %=(%')^2*%''. For
  10456. numbers which do not contain a square factor,
  10457. %'=1 and %''=%.
  10458. " "07A007" :CSys) "^Approx" ("% \\-> %' %''
  10459. " "Approximates a real number with a fraction.
  10460. Returns numerator %' and denominator %''.
  10461. The accuracy of the approximation is
  10462. determinated by the current display format.
  10463. " "07B007" :CSys) "^INFINIext" ("\\-> '\\oo'
  10464. " "" "2E2006" :CSys) "^MINUSINFext" ("\\-> '-\\oo'
  10465. " "" "2E3006" :CSys) "^PLUSINFext" ("\\-> '+\\oo'
  10466. " "" "2E4006" :CSys) "^?ext" ("\\-> '?'
  10467. " "Pushed the undefined symbolic.
  10468. " "2E5006" :CSys) "^POSINFext" ("symb \\-> symb #
  10469. " "Returns #1 if the symbolic contains '\\oo'.
  10470. " "2E6006" :CSys) "^TESTINFINI" ("ob \\-> ob flag
  10471. " "Test if object contains infinity.
  10472. " "2E1006" :CSys) "^POSUNDEFext" ("symb \\-> symb #
  10473. " "Returns #1 if the symbolic contains the
  10474. undefined symbolic '?'.
  10475. " "2E7006" :CSys) "^pi" ("\\-> '\\pi'
  10476. " "" "2EA006" :CSys) "^metapi" ("\\-> \\pi #1
  10477. " "" "2EB006" :CSys) "^meta-pi" ("\\-> \\pi xNEG #2
  10478. " "" "2F1006" :CSys) "^pisur2" ("\\-> '\\pi/2'
  10479. " "" "2E8006" :CSys) "^metapi/2" ("\\-> \\pi 2 x/ #3
  10480. " "" "2F2006" :CSys) "^pisur-2" ("\\-> '-\\pi/2'
  10481. " "" "2E9006" :CSys) "^meta-pi/2" ("\\-> \\pi 2 x/ xNEG #4
  10482. " "" "2F4006" :CSys) "^metapi/4" ("\\-> \\pi 4 x/ #3
  10483. " "" "2F3006" :CSys) "^meta-pi/4" ("\\-> \\pi 4 x/ xNEG #4
  10484. " "" "2F5006" :CSys) "^pifois2" ("\\-> '2*\\pi'
  10485. " "" "2F6006" :CSys) "^'xPI" ("\\-> xPI
  10486. " "" "2EC006" :CSys) "^base_ln" ("\\-> 'e'
  10487. " "" "2F9006" :CSys) "^meta_e" ("\\-> e #1
  10488. " "" "2FA006" :CSys) "^'xi" ("\\-> xi
  10489. " "" "2EE006" :CSys) "^metai" ("\\-> i #1
  10490. " "" "2ED006" :CSys) "^ipi" ("\\-> 'i*\\pi'
  10491. " "" "2EF006" :CSys) "^metaipi" ("\\-> i \\pi x* #3
  10492. " "" "2F0006" :CSys) "^metapi*2" ("\\-> \\pi 2 x* #3
  10493. " "" "2F8006" :CSys) "^deuxipi" ("\\-> '2*i*\\pi'
  10494. " "" "2F7006" :CSys) "^DIVOBJext" ("{o1...on} ob \\-> {o1/ob...on/ob}
  10495. " "Division of all elements of a list by ob.
  10496. Tests if ob=1.
  10497. " "3F0006" :CSys) "^LOPDext" ("{o1...on} ob \\-> {o1/ob...on/ob}
  10498. " "LOPDext calls QUOText for the division,
  10499. unlike DIVOBJ which calls RDIVext.
  10500. " "3F2006" :CSys) "^LOP1ext" ("{} ob binop \\-> {}'
  10501. " "Applies non-recursively << ob binop >> to the
  10502. elements of the list.
  10503. " "269006" :CSys) "^LOPAext" ("{} ob binop \\-> {}'
  10504. " "Applies recursively << op binop >> to the
  10505. elements of the list (not the list elements
  10506. themselves).
  10507. " "26A006" :CSys) "^LOPMext" ("ob {} \\-> {}'
  10508. " "Multiplies each element of the list by the
  10509. given object.
  10510. " "10F006" :CSys) "^LISTEXEC" ("ob {} \\-> ob'
  10511. ob {} \\-> {}'
  10512. " "The list should be of the form { 'X=1' 'Y=2'
  10513. ... } in the first QcaseQ or { 'X=1' 'X=2' } in
  10514. the second QcaseQ. In the first QcaseQ, all
  10515. occurences of X in ob are replace by 1, or Y
  10516. by 2, etc. In the second QcaseQ ob is
  10517. evaluated with X=1, X=2 successively.
  10518. " "45F006" :CSys) "^LISTEXEC1" ("{} objet \\-> {}'
  10519. " "" "460006" :CSys) "^SECOEXEC" ("{} prog \\-> {}
  10520. " "Executes prog on each element of ob.
  10521. " "461006" :CSys) "^PFEXECext" ("symb prg \\-> symb
  10522. " "" "268006" :CSys) "^LISTSECOext" ("composite \\-> composite
  10523. " "Applies 1LAM non-recursively to all elements of
  10524. the list.
  10525. " "26B006" :CSys) "^CK1TONOext" ("ob \\-> ob'
  10526. " "Applies prg to ob, recursively for lists.
  10527. prg is fetched from runstream.
  10528. " "26D006" :CSys) "^TYPEIRRQ?" ("ob \\-> flag
  10529. " "Is ob an irrquad?
  10530. " "167006" :CSys) "^DTYPEIRRQ?" ("ob \\-> ob flag
  10531. " "DUP, then ^TYPEIRRQ?.
  10532. " "168006" :CSys) "^QXNDext" ("irrq \\-> a b c
  10533. " "b=0 and c=1 if stack level 1 is not an irrq.
  10534. " "165006" :CSys) "^NDXQext" ("a b c \\-> irrq
  10535. " "" "166006" :CSys) "^IRRQ#ULTIMATE" ("ob \\-> # c
  10536. " "Finds \\<< depth and returns ultimate c of an
  10537. irrq.
  10538. " "2D8006" :CSys) "^QCONJext" ("irrq \\-> irrq'
  10539. " "irrq-conjugate of an irrq.
  10540. This is *not* the complex conjugate.
  10541. " "508006" :CSys) "^QABSext" ("irrq \\-> irrq sign
  10542. " "Finds the sign of an irrq.
  10543. Work always if irrq is made of Z.
  10544. " "509006" :CSys) "^QNORMext" ("Zirr \\-> a^2-b*c^2
  10545. " "Irrq-norm of an irrquad.
  10546. This is *not* the complex modulus.
  10547. " "51A006" :CSys) "^SECOSQFFext" (":: x<< a b c x>> ; \\-> { fact1 mult1 ... factn multn }
  10548. " "Factorization of irrquads and Gauss integers.
  10549. " "4D4006" :CSys) "^PREPARext" ("o1 o2 \\-> a1 b1 c1 a2 b2 c2
  10550. " "Returns irrquad decomposition of o1 and o2.
  10551. with either c1=c2 or c1 and c2 have no
  10552. factors in comon. c1<c2, ordering handled
  10553. by LESSCOMPLEX? is made by type, then by CRC.
  10554. " "124006" :CSys) "^LISTIRRQ" ("ob {} \\-> {}'
  10555. " "Add the C-part of all irrquads of object to
  10556. the list.
  10557. " "2DA006" :CSys) "^QMODSYMext" ("
  10558. " "" "0DA006" :CSys :\?) "^ModPow" ("
  10559. " "" "0DB006" :CSys :\?) "^ZQUOText" ("
  10560. " "" "0DC006" :CSys :\?) "^ZDIVext" ("
  10561. " "" "0DE006" :CSys :\?) "^PSEUDOPREP" ("o2 o1 \\-> o2*a1.n^ o1 a1.n^
  10562. " "" "3E7006" :CSys :\?) "^PLCZ" ("
  10563. " "" "3FA006" :CSys :\?) "^HSECO2RCext" ("ob \\-> ob'
  10564. " "Conversion of constants from internal to user
  10565. form.
  10566. " "3FB006" :CSys :\?) "^SECO2CMPext" ("seco \\-> symb
  10567. " "Back conversion of complex. polarflag should
  10568. be disabled if not at the top level of
  10569. rational expressions.
  10570. " "3FC006" :CSys :\?) "^SECO2CMPPOL" ("
  10571. " "Conversion of a complex in polar coordinates.
  10572. should be used only at the top level of
  10573. rational expr.
  10574. " "3FD006" :CSys :\?) "^SECO2CMPCART" ("
  10575. " "Conversion of a complex in cartesian
  10576. coordinates.
  10577. " "3FE006" :CSys :\?) "^VALOBJext" ("# {..{Q}..} {var1..varn} \\-> {..{ob}..}
  10578. " "Back conversion of objects embedded at depth
  10579. # in lists. Simplifies var1..varn.
  10580. " "3FF006" :CSys :\?) "^VAL2ext" ("# {..{Q}..} {var1..varn} \\-> {..{ob}..}
  10581. " "Back conversion of objects embedded at depth
  10582. # in lists. Does not simplify var1..varn.
  10583. Conversion is done in asc. power if
  10584. positivfflag is set, which is useful for
  10585. SERIES and LIMIT commands.
  10586. " "401006" :CSys :\?) "^INVAL2" ("P # \\-> symbpoly
  10587. " "LAM2 must contain Lvar, # is the depth.
  10588. " "402006" :CSys :\?) "^METAVAL2" ("# Meta_list \\-> Meta_symb
  10589. " "LMA2 must contain Lvar, LAM1 is modified.
  10590. " "403006" :CSys :\?) "^VAL1" ("ob \\-> ob
  10591. " "LAM2 must contain Lvar, LAM1 is modified.
  10592. " "404006" :CSys :\?) "^VAL1M" ("ob \\-> Meta_symb
  10593. " "LAM2 must contain Lvar, LAM1 is modified.
  10594. " "405006" :CSys :\?) "^IDNTEXEC" ("symb idnt \\-> symb'
  10595. " "Tries to find idnt such that symb=0. Return
  10596. a solution as an equality 'idnt=..' in symb'.
  10597. " "45C006" :CSys :\?) "^SYMISOL" ("
  10598. " "" "45D006" :CSys :\?) "^SYMQFORM" ("
  10599. " "" "45E006" :CSys :\?) "^MP0" ("ob \\-> ob 1
  10600. " "Returns number 1 of the selected type.
  10601. The symbolic/ROMPTR one looks very strange
  10602. it is used to avoid infinity^0/undef^0 to
  10603. return 1.
  10604. " "121006" :CSys :\?) "^rpnQOBJext" ("ob \\-> ob'
  10605. " "prg is fetched from the stack.
  10606. " "26C006" :CSys :\?) "^SIMPIDNT" ("idnt \\-> ob
  10607. " "Evaluates idnt (looks recursively for its
  10608. content if defined). Does not error for
  10609. circular definition, but displays a warning.
  10610. " "29D006" :CSys :\?) "^RCLALLIDNT" ("
  10611. " "" "29E006" :CSys :\?) "^RCL1IDNT" ("idnt/lam \\-> ob
  10612. " "Recursive content of an idnt.
  10613. LAM1 to LAM3 must be bound.
  10614. " "29F006" :CSys :\?) "^SWPSIMPNDXF" ("ob2 ob1 \\-> ob1/ob2
  10615. " "Simplified fraction (internal).
  10616. " "2A7006" :CSys :\?) "^SIMPNDXFext" ("ob2 ob1 \\-> ob2/ob1
  10617. " "Simplified fraction (internal).
  10618. " "2A8006" :CSys :\?) "^CMODext" ("C2 C1 \\-> C1 C2_mod_C1
  10619. " "" "2B6006" :CSys :\?) "^SQFF2ext" ("l1...ln #n-1 \\-> l1'...ln' #n-1
  10620. " "" "2BD006" :CSys :\?) "^PPZ" ("p \\-> p/pgcd pgcd
  10621. " "ob is the gcd of all constant coefficients of
  10622. P (integer, Gauss integers, irrquads with the
  10623. implementation of the \"gcd\" for irrquads).
  10624. " "2BE006" :CSys :\?) "^PPZZ" ("ob \\-> ob zint
  10625. " "PPZ with further check to ensure returning a
  10626. zint.
  10627. " "117007" :1\.11 :CSys :\?) "^PZHSTR" ("a z \\-> a mod z
  10628. " "" "2BF006" :CSys :\?) "^HORNER1ext" ("P r \\-> P[r]
  10629. " "" "2C0006" :CSys :\?) "^PEval" ("P r \\-> P[r]
  10630. " "P must be a list polynomial.
  10631. " "2C1006" :CSys :\?) "^RISCHext" ("
  10632. " "" "2C2006" :CSys :\?) "^risch/" ("
  10633. " "" "2C3006" :CSys :\?) "^rischABS" ("
  10634. " "" "2C4006" :CSys :\?) "^SQRT_IN?" ("{} \\-> {} flag
  10635. " "Returns TRUE if one element of {} is a symb
  10636. containing a sqrt.
  10637. " "2C6006" :CSys :\?) "^IS_SQRT?" ("symb \\-> flag
  10638. " "" "2C7006" :CSys :\?) "^XROOT_IN?" ("
  10639. " "" "2C8006" :CSys :\?) "^IS_XROOT?" ("symb \\-> flag
  10640. " "" "2C9006" :CSys :\?) "^STOPRIMIT" ("symb \\->
  10641. " "Stores antiderivative in PRIMIT variable.
  10642. " "2CA006" :CSys :\?) "^CONTAINS_LN?" ("symb \\-> symb flag
  10643. " "" "2CB006" :CSys :\?) "^ISNT_IDNT?" ("
  10644. " "" "2CC006" :CSys :\?) "^RISCHPF" ("
  10645. " "" "2CD006" :CSys :\?) "^RISCHRAT" ("
  10646. " "" "2CE006" :CSys :\?) "^rischlogpart" ("
  10647. " "" "2CF006" :CSys :\?) "^FOURIERext" ("symb n \\-> cn
  10648. " "Computes n-th Fourier coefficient of a 2 \\pi
  10649. periodic function.
  10650. " "2D4006" :CSys) "^LESSCOMPLEX?" ("ob1 ob2 \\-> ob1 ob2 flag
  10651. " "Compares objects by type and then by CRC.
  10652. flag is true if ob1 is less complex than ob2
  10653. (ob1>ob2). If ob1 or ob2 is an irrq, find
  10654. first ultimate type of ob1 and ob2. If these
  10655. ultimate types are equal sort is done by
  10656. comparing the << depth.
  10657. " "2D9006" :CSys :\?) "^LIST1i-1-i" ("
  10658. " "Various constants. Caution: these constants
  10659. are \"covered\" if you are using them be sure
  10660. to return an uncovered result on the stack
  10661. when exiting.
  10662. " "2DB006" :CSys :\?) "^LIST10-10" ("
  10663. " "" "2DC006" :CSys :\?) "^TABLECOSext" ("\\-> {}
  10664. " "Table of special COS values (k*pi/12).
  10665. " "2DD006" :CSys :\?) "^TABLETANext" ("\\-> {}
  10666. " "Table of special TAN values (k*pi/12).
  10667. " "2DE006" :CSys :\?) "^LINEARAPPLY" ("symb nonrat_prg rat_prg \\-> symb
  10668. " "Applies linearity. nonrat_prg is applied for
  10669. a non rational part symb \\-> symb. rat_prg is
  10670. applied for a rational part symb \\-> symb.
  10671. Linearity is applied on symb.
  10672. " "101007" :CSys :\?) "^linearapply" ("
  10673. " "" "102007" :1\.11 :CSys) "^A/B2PQR" ("A B \\-> P Q R
  10674. " "Writes a fraction A/B as E[P]/P*Q/E[R]. Q and
  10675. positive shifts of R are prime together.
  10676. " "106007" :1\.11 :CSys :\?) "^GOSPER?" ("P Q R \\-> P R Y T
  10677. \\-> F
  10678. " "Solves P = Q E[Y] - R Y for Y.
  10679. " "107007" :1\.11 :CSys :\?) "^FRACPARITY" ("fr \\-> Z
  10680. " "Tests if a fraction (internal rep) is
  10681. even/odd/none. Z=1 if even, -1 if odd, 0 if
  10682. neither even nor odd.
  10683. " "0CB007" :CSys :\?) "^FR2ND%" ("fraction-l \\-> N D %
  10684. " "Extract trivial power of fraction.
  10685. " "0D5007" :CSys :\?) "^MSECOSQFF" ("ob \\-> Meta
  10686. " "Factorization of an extension.
  10687. " "4D1006" :CSys :\?) "TopOuterLoop" ("
  10688. " "" "2E2CD" :UBS :NOSDIAG :NOETAB) "TOLSaveUI" ("
  10689. " "" "2E3DE" :UBS :NOSDIAG :NOETAB) "TOLSetTopicUI" ("
  10690. " "" "2E451" :UBS :NOSDIAG :NOETAB) "TOLSetTopUI.1" ("
  10691. " "" "2E46F" :UBS :NOSDIAG :NOETAB) "TOLSetViewUI" ("
  10692. " "" "2E4AB" :UBS :NOSDIAG :NOETAB) "TOLSetViUI.1" ("
  10693. " "" "2E4C9" :UBS :NOSDIAG :NOETAB) "TOLKeyUI" ("
  10694. " "" "2E51E" :UBS :NOSDIAG :NOETAB) "TOLErrorTrap" ("
  10695. " "" "2E573" :UBS :NOSDIAG :NOETAB) "TOLResUI&Err" ("
  10696. " "" "2E5A5" :UBS :NOSDIAG :NOETAB) "TOLRestoreUI" ("
  10697. " "" "2E5C3" :UBS :NOSDIAG :NOETAB) "?ExitThisTop" ("
  10698. " "" "2E659" :UBS :NOSDIAG :NOETAB) "BadTOLUI?" ("
  10699. " "" "2E686" :UBS :NOSDIAG :NOETAB) "SetBadTOLUI" ("
  10700. " "" "2E68B" :UBS :NOSDIAG :NOETAB) "ClrBadTOLUI" ("
  10701. " "" "2E690" :UBS :NOSDIAG :NOETAB) "CALCCXT!" ("ob \\->
  10702. " "" "2E698" :UBS :NOSDIAG :NOETAB) "CALCCXT@" ("\\-> ob
  10703. " "" "2E69D" :UBS :NOSDIAG :NOETAB) "PGMCXT!" ("ob \\->
  10704. " "" "2E6A7" :UBS :NOSDIAG :NOETAB) "PGMCXT@" ("\\-> ob
  10705. " "" "2E6AC" :UBS :NOSDIAG :NOETAB) "NOTESCXT!" ("ob \\->
  10706. " "" "2E6B6" :UBS :NOSDIAG :NOETAB) "NOTESCXT@" ("\\-> ob
  10707. " "" "2E6BB" :UBS :NOSDIAG :NOETAB) "apletPTR!" ("ob \\->
  10708. " "" "2E6C5" :UBS :NOSDIAG :NOETAB) "apletPTR@" ("\\-> ob
  10709. " "" "2E6CA" :UBS :NOSDIAG :NOETAB) "funcPTR!" ("ob \\->
  10710. " "" "2E6D4" :UBS :NOSDIAG :NOETAB) "funcPTR@" ("\\-> ob
  10711. " "" "2E6D9" :UBS :NOSDIAG :NOETAB) "polarPTR!" ("ob \\->
  10712. " "" "2E6E3" :UBS :NOSDIAG :NOETAB) "polarPTR@" ("\\-> ob
  10713. " "" "2E6E8" :UBS :NOSDIAG :NOETAB) "paramPTR!" ("ob \\->
  10714. " "" "2E6F2" :UBS :NOSDIAG :NOETAB) "paramPTR@" ("\\-> ob
  10715. " "" "2E6F7" :UBS :NOSDIAG :NOETAB) "seqPTR!" ("ob \\->
  10716. " "" "2E701" :UBS :NOSDIAG :NOETAB) "seqPTR@" ("\\-> ob
  10717. " "" "2E706" :UBS :NOSDIAG :NOETAB) "statPTR!" ("ob \\->
  10718. " "" "2E710" :UBS :NOSDIAG :NOETAB) "statPTR@" ("\\-> ob
  10719. " "" "2E715" :UBS :NOSDIAG :NOETAB) "solvePTR!" ("ob \\->
  10720. " "" "2E71F" :UBS :NOSDIAG :NOETAB) "solvePTR@" ("\\-> ob
  10721. " "" "2E724" :UBS :NOSDIAG :NOETAB) "otherPTR!" ("ob \\->
  10722. " "" "2E72E" :UBS :NOSDIAG :NOETAB) "otherPTR@" ("\\-> ob
  10723. " "" "2E733" :UBS :NOSDIAG :NOETAB) "TopicDoN" ("
  10724. " "" "2E73D" :ML :UBS :NOSDIAG :NOETAB) "TopicVar1!" ("ob \\->
  10725. " "" "2E76A" :UBS :NOSDIAG :NOETAB) "TopicVar1@" ("\\-> ob
  10726. " "" "2E76B" :UBS :NOSDIAG :NOETAB) "TopicVar2!" ("ob \\->
  10727. " "" "2E76C" :UBS :NOSDIAG :NOETAB) "TopicVar2@" ("\\-> ob
  10728. " "" "2E76D" :UBS :NOSDIAG :NOETAB) "TopicVar3!" ("ob \\->
  10729. " "" "2E76E" :UBS :NOSDIAG :NOETAB) "TopicVar3@" ("\\-> ob
  10730. " "" "2E76F" :UBS :NOSDIAG :NOETAB) "TopicVar4!" ("ob \\->
  10731. " "" "2E770" :UBS :NOSDIAG :NOETAB) "TopicVar4@" ("\\-> ob
  10732. " "" "2E771" :UBS :NOSDIAG :NOETAB) "TopicVar5!" ("ob \\->
  10733. " "" "2E772" :UBS :NOSDIAG :NOETAB) "TopicVar5@" ("\\-> ob
  10734. " "" "2E773" :UBS :NOSDIAG :NOETAB) "TopicVar6!" ("ob \\->
  10735. " "" "2E774" :UBS :NOSDIAG :NOETAB) "TopicVar6@" ("\\-> ob
  10736. " "" "2E775" :UBS :NOSDIAG :NOETAB) "TopicVar7!" ("ob \\->
  10737. " "" "2E776" :UBS :NOSDIAG :NOETAB) "TopicVar7@" ("\\-> ob
  10738. " "" "2E777" :UBS :NOSDIAG :NOETAB) "TopicVar8!" ("ob \\->
  10739. " "" "2E778" :UBS :NOSDIAG :NOETAB) "TopicVar8@" ("\\-> ob
  10740. " "" "2E779" :UBS :NOSDIAG :NOETAB) "TopicVar9!" ("ob \\->
  10741. " "" "2E77A" :UBS :NOSDIAG :NOETAB) "TopicVar9@" ("\\-> ob
  10742. " "" "2E77B" :UBS :NOSDIAG :NOETAB) "TopicVar10!" ("ob \\->
  10743. " "" "2E77C" :UBS :NOSDIAG :NOETAB) "TopicVar10@" ("\\-> ob
  10744. " "" "2E77D" :UBS :NOSDIAG :NOETAB) "TopicVar11!" ("ob \\->
  10745. " "" "2E77E" :UBS :NOSDIAG :NOETAB) "TopicVar11@" ("\\-> ob
  10746. " "" "2E77F" :UBS :NOSDIAG :NOETAB) "TopicVar12!" ("ob \\->
  10747. " "" "2E780" :UBS :NOSDIAG :NOETAB) "TopicVar12@" ("\\-> ob
  10748. " "" "2E781" :UBS :NOSDIAG :NOETAB) "TopicVar13!" ("ob \\->
  10749. " "" "2E782" :UBS :NOSDIAG :NOETAB) "TopicVar13@" ("\\-> ob
  10750. " "" "2E783" :UBS :NOSDIAG :NOETAB) "TopicVar14!" ("ob \\->
  10751. " "" "2E784" :UBS :NOSDIAG :NOETAB) "TopicVar14@" ("\\-> ob
  10752. " "" "2E785" :UBS :NOSDIAG :NOETAB) "TopicVar15!" ("ob \\->
  10753. " "" "2E786" :UBS :NOSDIAG :NOETAB) "TopicVar15@" ("\\-> ob
  10754. " "" "2E787" :UBS :NOSDIAG :NOETAB) "TopicVar16!" ("ob \\->
  10755. " "" "2E788" :UBS :NOSDIAG :NOETAB) "TopicVar16@" ("\\-> ob
  10756. " "" "2E789" :UBS :NOSDIAG :NOETAB) "TopicVar17!" ("ob \\->
  10757. " "" "2E78A" :UBS :NOSDIAG :NOETAB) "TopicVar17@" ("\\-> ob
  10758. " "" "2E78B" :UBS :NOSDIAG :NOETAB) "TopicVar18!" ("ob \\->
  10759. " "" "2E78C" :UBS :NOSDIAG :NOETAB) "TopicVar18@" ("\\-> ob
  10760. " "" "2E78D" :UBS :NOSDIAG :NOETAB) "TopicVar19!" ("ob \\->
  10761. " "" "2E78E" :UBS :NOSDIAG :NOETAB) "TopicVar19@" ("\\-> ob
  10762. " "" "2E78F" :UBS :NOSDIAG :NOETAB) "TopicVar20!" ("ob \\->
  10763. " "" "2E790" :UBS :NOSDIAG :NOETAB) "TopicVar20@" ("\\-> ob
  10764. " "" "2E791" :UBS :NOSDIAG :NOETAB) "TopicVar21!" ("ob \\->
  10765. " "" "2E792" :UBS :NOSDIAG :NOETAB) "TopicVar21@" ("\\-> ob
  10766. " "" "2E793" :UBS :NOSDIAG :NOETAB) "TopicVar22!" ("ob \\->
  10767. " "" "2E794" :UBS :NOSDIAG :NOETAB) "TopicVar22@" ("\\-> ob
  10768. " "" "2E795" :UBS :NOSDIAG :NOETAB) "TopicVar23!" ("ob \\->
  10769. " "" "2E796" :UBS :NOSDIAG :NOETAB) "TopicVar23@" ("\\-> ob
  10770. " "" "2E797" :UBS :NOSDIAG :NOETAB) "TopicVar24!" ("ob \\->
  10771. " "" "2E798" :UBS :NOSDIAG :NOETAB) "TopicVar24@" ("\\-> ob
  10772. " "" "2E799" :UBS :NOSDIAG :NOETAB) "TopicVar25!" ("ob \\->
  10773. " "" "2E79A" :UBS :NOSDIAG :NOETAB) "TopicVar25@" ("\\-> ob
  10774. " "" "2E79B" :UBS :NOSDIAG :NOETAB) "TopicVar26!" ("ob \\->
  10775. " "" "2E79C" :UBS :NOSDIAG :NOETAB) "TopicVar26@" ("\\-> ob
  10776. " "" "2E79D" :UBS :NOSDIAG :NOETAB) "TopicVar27!" ("ob \\->
  10777. " "" "2E79E" :UBS :NOSDIAG :NOETAB) "TopicVar27@" ("\\-> ob
  10778. " "" "2E79F" :UBS :NOSDIAG :NOETAB) "TopicVar28!" ("ob \\->
  10779. " "" "2E7A0" :UBS :NOSDIAG :NOETAB) "TopicVar28@" ("\\-> ob
  10780. " "" "2E7A1" :UBS :NOSDIAG :NOETAB) "TopicVar29!" ("ob \\->
  10781. " "" "2E7A2" :UBS :NOSDIAG :NOETAB) "TopicVar29@" ("\\-> ob
  10782. " "" "2E7A3" :UBS :NOSDIAG :NOETAB) "TopicVar30!" ("ob \\->
  10783. " "" "2E7A4" :UBS :NOSDIAG :NOETAB) "TopicVar30@" ("\\-> ob
  10784. " "" "2E7A5" :UBS :NOSDIAG :NOETAB) "TopicVar31!" ("ob \\->
  10785. " "" "2E7A6" :UBS :NOSDIAG :NOETAB) "TopicVar31@" ("\\-> ob
  10786. " "" "2E7A7" :UBS :NOSDIAG :NOETAB) "TopicVar32!" ("ob \\->
  10787. " "" "2E7A8" :UBS :NOSDIAG :NOETAB) "TopicVar32@" ("\\-> ob
  10788. " "" "2E7A9" :UBS :NOSDIAG :NOETAB) "TopicVar33!" ("ob \\->
  10789. " "" "2E7AA" :UBS :NOSDIAG :NOETAB) "TopicVar33@" ("\\-> ob
  10790. " "" "2E7AB" :UBS :NOSDIAG :NOETAB) "TopicVar34!" ("ob \\->
  10791. " "" "2E7AC" :UBS :NOSDIAG :NOETAB) "TopicVar34@" ("\\-> ob
  10792. " "" "2E7AD" :UBS :NOSDIAG :NOETAB) "TopicVar35!" ("ob \\->
  10793. " "" "2E7AE" :UBS :NOSDIAG :NOETAB) "TopicVar35@" ("\\-> ob
  10794. " "" "2E7AF" :UBS :NOSDIAG :NOETAB) "TopicVar36!" ("ob \\->
  10795. " "" "2E7B0" :UBS :NOSDIAG :NOETAB) "TopicVar36@" ("\\-> ob
  10796. " "" "2E7B1" :UBS :NOSDIAG :NOETAB) "TopicVar37!" ("ob \\->
  10797. " "" "2E7B2" :UBS :NOSDIAG :NOETAB) "TopicVar37@" ("\\-> ob
  10798. " "" "2E7B3" :UBS :NOSDIAG :NOETAB) "TopicVar38!" ("ob \\->
  10799. " "" "2E7B4" :UBS :NOSDIAG :NOETAB) "TopicVar38@" ("\\-> ob
  10800. " "" "2E7B5" :UBS :NOSDIAG :NOETAB) "TopicVar39!" ("ob \\->
  10801. " "" "2E7B6" :UBS :NOSDIAG :NOETAB) "TopicVar39@" ("\\-> ob
  10802. " "" "2E7B7" :UBS :NOSDIAG :NOETAB) "TopicVar40!" ("ob \\->
  10803. " "" "2E7B8" :UBS :NOSDIAG :NOETAB) "TopicVar40@" ("\\-> ob
  10804. " "" "2E7B9" :UBS :NOSDIAG :NOETAB) "TopicVar41!" ("ob \\->
  10805. " "" "2E7BA" :UBS :NOSDIAG :NOETAB) "TopicVar41@" ("\\-> ob
  10806. " "" "2E7BB" :UBS :NOSDIAG :NOETAB) "TopicVar42!" ("ob \\->
  10807. " "" "2E7BC" :UBS :NOSDIAG :NOETAB) "TopicVar42@" ("\\-> ob
  10808. " "" "2E7BD" :UBS :NOSDIAG :NOETAB) "TopicVar43!" ("ob \\->
  10809. " "" "2E7BE" :UBS :NOSDIAG :NOETAB) "TopicVar43@" ("\\-> ob
  10810. " "" "2E7BF" :UBS :NOSDIAG :NOETAB) "TopicVar44!" ("ob \\->
  10811. " "" "2E7C0" :UBS :NOSDIAG :NOETAB) "TopicVar44@" ("\\-> ob
  10812. " "" "2E7C1" :UBS :NOSDIAG :NOETAB) "TopicVar45!" ("ob \\->
  10813. " "" "2E7C2" :UBS :NOSDIAG :NOETAB) "TopicVar45@" ("\\-> ob
  10814. " "" "2E7C3" :UBS :NOSDIAG :NOETAB) "TopicVar46!" ("ob \\->
  10815. " "" "2E7C4" :UBS :NOSDIAG :NOETAB) "TopicVar46@" ("\\-> ob
  10816. " "" "2E7C5" :UBS :NOSDIAG :NOETAB) "TopicVar47!" ("ob \\->
  10817. " "" "2E7C6" :UBS :NOSDIAG :NOETAB) "TopicVar47@" ("\\-> ob
  10818. " "" "2E7C7" :UBS :NOSDIAG :NOETAB) "TopicVar48!" ("ob \\->
  10819. " "" "2E7C8" :UBS :NOSDIAG :NOETAB) "TopicVar48@" ("\\-> ob
  10820. " "" "2E7C9" :UBS :NOSDIAG :NOETAB) "TopicVar49!" ("ob \\->
  10821. " "" "2E7CA" :UBS :NOSDIAG :NOETAB) "TopicVar49@" ("\\-> ob
  10822. " "" "2E7CB" :UBS :NOSDIAG :NOETAB) "TopicVar50!" ("ob \\->
  10823. " "" "2E7CC" :UBS :NOSDIAG :NOETAB) "TopicVar50@" ("\\-> ob
  10824. " "" "2E7CD" :UBS :NOSDIAG :NOETAB) "TopicVar51!" ("ob \\->
  10825. " "" "2E7CE" :UBS :NOSDIAG :NOETAB) "TopicVar51@" ("\\-> ob
  10826. " "" "2E7CF" :UBS :NOSDIAG :NOETAB) "TopicVar52@" ("ob \\->
  10827. " "" "2E7D0" :UBS :NOSDIAG :NOETAB) "TopicVar52!" ("\\-> ob
  10828. " "" "2E7D1" :UBS :NOSDIAG :NOETAB) "TopicVar53@" ("ob \\->
  10829. " "" "2E7D2" :UBS :NOSDIAG :NOETAB) "TopicVar53!" ("\\-> ob
  10830. " "" "2E7D3" :UBS :NOSDIAG :NOETAB) "TopicVar54@" ("ob \\->
  10831. " "" "2E7D4" :UBS :NOSDIAG :NOETAB) "TopicVar54!" ("\\-> ob
  10832. " "" "2E7D5" :UBS :NOSDIAG :NOETAB) "TopicVar55@" ("ob \\->
  10833. " "" "2E7D6" :UBS :NOSDIAG :NOETAB) "TopicVar55!" ("\\-> ob
  10834. " "" "2E7D7" :UBS :NOSDIAG :NOETAB) "TopicVar56@" ("ob \\->
  10835. " "" "2E7D8" :UBS :NOSDIAG :NOETAB) "TopicVar56!" ("\\-> ob
  10836. " "" "2E7D9" :UBS :NOSDIAG :NOETAB) "TopicVar57@" ("ob \\->
  10837. " "" "2E7DA" :UBS :NOSDIAG :NOETAB) "TopicVar57!" ("\\-> ob
  10838. " "" "2E7DB" :UBS :NOSDIAG :NOETAB) "TopicVar58@" ("ob \\->
  10839. " "" "2E7DC" :UBS :NOSDIAG :NOETAB) "TopicVar58!" ("\\-> ob
  10840. " "" "2E7DD" :UBS :NOSDIAG :NOETAB) "TopicVar59@" ("ob \\->
  10841. " "" "2E7DE" :UBS :NOSDIAG :NOETAB) "TopicVar59!" ("\\-> ob
  10842. " "" "2E7DF" :UBS :NOSDIAG :NOETAB) "TopicVar60@" ("ob \\->
  10843. " "" "2E7E0" :UBS :NOSDIAG :NOETAB) "TopicVar60!" ("\\-> ob
  10844. " "" "2E7E1" :UBS :NOSDIAG :NOETAB) "TopicVar61@" ("ob \\->
  10845. " "" "2E7E2" :UBS :NOSDIAG :NOETAB) "TopicVar61!" ("\\-> ob
  10846. " "" "2E7E3" :UBS :NOSDIAG :NOETAB) "TopicVar62@" ("ob \\->
  10847. " "" "2E7E4" :UBS :NOSDIAG :NOETAB) "TopicVar62!" ("\\-> ob
  10848. " "" "2E7E5" :UBS :NOSDIAG :NOETAB) "TopicVar63@" ("ob \\->
  10849. " "" "2E7E6" :UBS :NOSDIAG :NOETAB) "TopicVar63!" ("\\-> ob
  10850. " "" "2E7E7" :UBS :NOSDIAG :NOETAB) "TopicVar64@" ("ob \\->
  10851. " "" "2E7E8" :UBS :NOSDIAG :NOETAB) "TopicVar64!" ("\\-> ob
  10852. " "" "2E7E9" :UBS :NOSDIAG :NOETAB) "TopicVar65@" ("ob \\->
  10853. " "" "2E7EA" :UBS :NOSDIAG :NOETAB) "TopicVar65!" ("\\-> ob
  10854. " "" "2E7EB" :UBS :NOSDIAG :NOETAB) "TopicVar66@" ("ob \\->
  10855. " "" "2E7EC" :UBS :NOSDIAG :NOETAB) "TopicVar66!" ("\\-> ob
  10856. " "" "2E7ED" :UBS :NOSDIAG :NOETAB) "TopicVar67@" ("ob \\->
  10857. " "" "2E7EE" :UBS :NOSDIAG :NOETAB) "TopicVar67!" ("\\-> ob
  10858. " "" "2E7EF" :UBS :NOSDIAG :NOETAB) "TopicVar68@" ("ob \\->
  10859. " "" "2E7F0" :UBS :NOSDIAG :NOETAB) "TopicVar68!" ("\\-> ob
  10860. " "" "2E7F1" :UBS :NOSDIAG :NOETAB) "TopicVar69@" ("ob \\->
  10861. " "" "2E7F2" :UBS :NOSDIAG :NOETAB) "TopicVar69!" ("\\-> ob
  10862. " "" "2E7F3" :UBS :NOSDIAG :NOETAB) "TopicVar70@" ("ob \\->
  10863. " "" "2E7F4" :UBS :NOSDIAG :NOETAB) "TopicVar70!" ("\\-> ob
  10864. " "" "2E7F5" :UBS :NOSDIAG :NOETAB) "TopicVar71@" ("ob \\->
  10865. " "" "2E7F6" :UBS :NOSDIAG :NOETAB) "TopicVar71!" ("\\-> ob
  10866. " "" "2E7F7" :UBS :NOSDIAG :NOETAB) "TopicVar72@" ("ob \\->
  10867. " "" "2E7F8" :UBS :NOSDIAG :NOETAB) "TopicVar72!" ("\\-> ob
  10868. " "" "2E7F9" :UBS :NOSDIAG :NOETAB) "TopicVar73@" ("ob \\->
  10869. " "" "2E7FA" :UBS :NOSDIAG :NOETAB) "TopicVar73!" ("\\-> ob
  10870. " "" "2E7FB" :UBS :NOSDIAG :NOETAB) "TopicVar74@" ("ob \\->
  10871. " "" "2E7FC" :UBS :NOSDIAG :NOETAB) "TopicVar74!" ("\\-> ob
  10872. " "" "2E7FD" :UBS :NOSDIAG :NOETAB) "TopicVar75@" ("ob \\->
  10873. " "" "2E7FE" :UBS :NOSDIAG :NOETAB) "TopicVar75!" ("\\-> ob
  10874. " "" "2E7FF" :UBS :NOSDIAG :NOETAB) "TopicVar76@" ("ob \\->
  10875. " "" "2E800" :UBS :NOSDIAG :NOETAB) "TopicVar76!" ("\\-> ob
  10876. " "" "2E801" :UBS :NOSDIAG :NOETAB) "TopicVar77@" ("ob \\->
  10877. " "" "2E802" :UBS :NOSDIAG :NOETAB) "TopicVar77!" ("\\-> ob
  10878. " "" "2E803" :UBS :NOSDIAG :NOETAB) "TopicVar78@" ("ob \\->
  10879. " "" "2E804" :UBS :NOSDIAG :NOETAB) "TopicVar78!" ("\\-> ob
  10880. " "" "2E805" :UBS :NOSDIAG :NOETAB) "TopicVar79@" ("ob \\->
  10881. " "" "2E806" :UBS :NOSDIAG :NOETAB) "TopicVar79!" ("\\-> ob
  10882. " "" "2E807" :UBS :NOSDIAG :NOETAB) "TopicVar80@" ("ob \\->
  10883. " "" "2E808" :UBS :NOSDIAG :NOETAB) "TopicVar80!" ("\\-> ob
  10884. " "" "2E809" :UBS :NOSDIAG :NOETAB) "TopicVar81@" ("ob \\->
  10885. " "" "2E80A" :UBS :NOSDIAG :NOETAB) "TopicVar81!" ("\\-> ob
  10886. " "" "2E80B" :UBS :NOSDIAG :NOETAB) "TopicVar82@" ("ob \\->
  10887. " "" "2E80C" :UBS :NOSDIAG :NOETAB) "TopicVar82!" ("\\-> ob
  10888. " "" "2E80D" :UBS :NOSDIAG :NOETAB) "TopicVar83@" ("ob \\->
  10889. " "" "2E80E" :UBS :NOSDIAG :NOETAB) "TopicVar83!" ("\\-> ob
  10890. " "" "2E80F" :UBS :NOSDIAG :NOETAB) "TopicVar84@" ("ob \\->
  10891. " "" "2E810" :UBS :NOSDIAG :NOETAB) "TopicVar84!" ("\\-> ob
  10892. " "" "2E811" :UBS :NOSDIAG :NOETAB) "TopicVar85@" ("ob \\->
  10893. " "" "2E812" :UBS :NOSDIAG :NOETAB) "TopicVar85!" ("\\-> ob
  10894. " "" "2E813" :UBS :NOSDIAG :NOETAB) "TopicVar86@" ("ob \\->
  10895. " "" "2E814" :UBS :NOSDIAG :NOETAB) "TopicVar86!" ("\\-> ob
  10896. " "" "2E815" :UBS :NOSDIAG :NOETAB) "TopicVar87@" ("ob \\->
  10897. " "" "2E816" :UBS :NOSDIAG :NOETAB) "TopicVar87!" ("\\-> ob
  10898. " "" "2E817" :UBS :NOSDIAG :NOETAB) "TopicVar88@" ("ob \\->
  10899. " "" "2E818" :UBS :NOSDIAG :NOETAB) "TopicVar88!" ("\\-> ob
  10900. " "" "2E819" :UBS :NOSDIAG :NOETAB) "TopicVar89@" ("ob \\->
  10901. " "" "2E81A" :UBS :NOSDIAG :NOETAB) "TopicVar89!" ("\\-> ob
  10902. " "" "2E81B" :UBS :NOSDIAG :NOETAB) "TopicVar90@" ("ob \\->
  10903. " "" "2E81C" :UBS :NOSDIAG :NOETAB) "TopicVar90!" ("\\-> ob
  10904. " "" "2E81D" :UBS :NOSDIAG :NOETAB) "TopicVar91!" ("ob \\->
  10905. " "" "2E81E" :UBS :NOSDIAG :NOETAB) "TopicVar91@" ("\\-> ob
  10906. " "" "2E81F" :UBS :NOSDIAG :NOETAB) "TOLVar1!" ("ob \\->
  10907. " "" "2E820" :UBS :NOSDIAG :NOETAB) "TOLVar1@" ("\\-> ob
  10908. " "" "2E821" :UBS :NOSDIAG :NOETAB) "TOLVar2!" ("ob \\->
  10909. " "" "2E822" :UBS :NOSDIAG :NOETAB) "TOLVar2@" ("\\-> ob
  10910. " "" "2E823" :UBS :NOSDIAG :NOETAB) "TOLVar3!" ("ob \\->
  10911. " "" "2E824" :UBS :NOSDIAG :NOETAB) "TOLVar3@" ("\\-> ob
  10912. " "" "2E825" :UBS :NOSDIAG :NOETAB) "TOLVar4!" ("ob \\->
  10913. " "" "2E826" :UBS :NOSDIAG :NOETAB) "TOLVar4@" ("\\-> ob
  10914. " "" "2E827" :UBS :NOSDIAG :NOETAB) "TOLVar5!" ("ob \\->
  10915. " "" "2E828" :UBS :NOSDIAG :NOETAB) "TOLVar5@" ("\\-> ob
  10916. " "" "2E829" :UBS :NOSDIAG :NOETAB) "TOLVar6!" ("ob \\->
  10917. " "" "2E82A" :UBS :NOSDIAG :NOETAB) "TOLVar6@" ("\\-> ob
  10918. " "" "2E82B" :UBS :NOSDIAG :NOETAB) "TOLVar7!" ("ob \\->
  10919. " "" "2E82C" :UBS :NOSDIAG :NOETAB) "TOLVar7@" ("\\-> ob
  10920. " "" "2E82D" :UBS :NOSDIAG :NOETAB) "TOLVar8!" ("ob \\->
  10921. " "" "2E82E" :UBS :NOSDIAG :NOETAB) "TOLVar8@" ("\\-> ob
  10922. " "" "2E82F" :UBS :NOSDIAG :NOETAB) "TOLVar9!" ("ob \\->
  10923. " "" "2E830" :UBS :NOSDIAG :NOETAB) "TOLVar9@" ("\\-> ob
  10924. " "" "2E831" :UBS :NOSDIAG :NOETAB) "TOLVar10!" ("ob \\->
  10925. " "" "2E832" :UBS :NOSDIAG :NOETAB) "TOLVar10@" ("\\-> ob
  10926. " "" "2E833" :UBS :NOSDIAG :NOETAB) "TOLVar11!" ("ob \\->
  10927. " "" "2E834" :UBS :NOSDIAG :NOETAB) "TOLVar11@" ("\\-> ob
  10928. " "" "2E835" :UBS :NOSDIAG :NOETAB) "TOLVar12!" ("ob \\->
  10929. " "" "2E836" :UBS :NOSDIAG :NOETAB) "TOLVar12@" ("\\-> ob
  10930. " "" "2E837" :UBS :NOSDIAG :NOETAB) "TOLVar13!" ("ob \\->
  10931. " "" "2E838" :UBS :NOSDIAG :NOETAB) "TOLVar13@" ("\\-> ob
  10932. " "" "2E839" :UBS :NOSDIAG :NOETAB) "TOLVar14!" ("ob \\->
  10933. " "" "2E83A" :UBS :NOSDIAG :NOETAB) "TOLVar14@" ("\\-> ob
  10934. " "" "2E83B" :UBS :NOSDIAG :NOETAB) "TOLVar15!" ("ob \\->
  10935. " "" "2E83C" :UBS :NOSDIAG :NOETAB) "TOLVar15@" ("\\-> ob
  10936. " "" "2E83D" :UBS :NOSDIAG :NOETAB) "TOLVar16!" ("ob \\->
  10937. " "" "2E83E" :UBS :NOSDIAG :NOETAB) "TOLVar16@" ("\\-> ob
  10938. " "" "2E83F" :UBS :NOSDIAG :NOETAB) "TOLVar17!" ("ob \\->
  10939. " "" "2E840" :UBS :NOSDIAG :NOETAB) "TOLVar17@" ("\\-> ob
  10940. " "" "2E841" :UBS :NOSDIAG :NOETAB) "TOLVar18!" ("ob \\->
  10941. " "" "2E842" :UBS :NOSDIAG :NOETAB) "TOLVar18@" ("\\-> ob
  10942. " "" "2E843" :UBS :NOSDIAG :NOETAB) "TOLVar19!" ("ob \\->
  10943. " "" "2E844" :UBS :NOSDIAG :NOETAB) "TOLVar19@" ("\\-> ob
  10944. " "" "2E845" :UBS :NOSDIAG :NOETAB) "TOLVar20!" ("ob \\->
  10945. " "" "2E846" :UBS :NOSDIAG :NOETAB) "TOLVar20@" ("\\-> ob
  10946. " "" "2E847" :UBS :NOSDIAG :NOETAB) "TOLVar21!" ("ob \\->
  10947. " "" "2E848" :UBS :NOSDIAG :NOETAB) "TOLVar21@" ("\\-> ob
  10948. " "" "2E849" :UBS :NOSDIAG :NOETAB) "TOLVar22!" ("ob \\->
  10949. " "" "2E84A" :UBS :NOSDIAG :NOETAB) "TOLVar22@" ("\\-> ob
  10950. " "" "2E84B" :UBS :NOSDIAG :NOETAB) "TOLVar23!" ("ob \\->
  10951. " "" "2E84C" :UBS :NOSDIAG :NOETAB) "TOLVar23@" ("\\-> ob
  10952. " "" "2E84D" :UBS :NOSDIAG :NOETAB) "TOLVar24!" ("ob \\->
  10953. " "" "2E84E" :UBS :NOSDIAG :NOETAB) "TOLVar24@" ("\\-> ob
  10954. " "" "2E84F" :UBS :NOSDIAG :NOETAB) "TOLVar25!" ("ob \\->
  10955. " "" "2E850" :UBS :NOSDIAG :NOETAB) "TOLVar25@" ("\\-> ob
  10956. " "" "2E851" :UBS :NOSDIAG :NOETAB) "TOLVar26!" ("ob \\->
  10957. " "" "2E852" :UBS :NOSDIAG :NOETAB) "TOLVar26@" ("\\-> ob
  10958. " "" "2E853" :UBS :NOSDIAG :NOETAB) "TOLVar27!" ("ob \\->
  10959. " "" "2E854" :UBS :NOSDIAG :NOETAB) "TOLVar27@" ("\\-> ob
  10960. " "" "2E855" :UBS :NOSDIAG :NOETAB) "TOLVar28!" ("ob \\->
  10961. " "" "2E856" :UBS :NOSDIAG :NOETAB) "TOLVar28@" ("\\-> ob
  10962. " "" "2E857" :UBS :NOSDIAG :NOETAB) "TOLVar29!" ("ob \\->
  10963. " "" "2E858" :UBS :NOSDIAG :NOETAB) "TOLVar29@" ("\\-> ob
  10964. " "" "2E859" :UBS :NOSDIAG :NOETAB) "TOLVar30!" ("ob \\->
  10965. " "" "2E85A" :UBS :NOSDIAG :NOETAB) "TOLVar30@" ("\\-> ob
  10966. " "" "2E85B" :UBS :NOSDIAG :NOETAB) "TOLVar31!" ("ob \\->
  10967. " "" "2E85C" :UBS :NOSDIAG :NOETAB) "TOLVar31@" ("\\-> ob
  10968. " "" "2E85D" :UBS :NOSDIAG :NOETAB) "TOLVar32!" ("ob \\->
  10969. " "" "2E85E" :UBS :NOSDIAG :NOETAB) "TOLVar32@" ("\\-> ob
  10970. " "" "2E85F" :UBS :NOSDIAG :NOETAB) "TOLVar33!" ("ob \\->
  10971. " "" "2E860" :UBS :NOSDIAG :NOETAB) "TOLVar33@" ("\\-> ob
  10972. " "" "2E861" :UBS :NOSDIAG :NOETAB) "TOLVar34!" ("ob \\->
  10973. " "" "2E862" :UBS :NOSDIAG :NOETAB) "TOLVar34@" ("\\-> ob
  10974. " "" "2E863" :UBS :NOSDIAG :NOETAB) "TOLVar35!" ("ob \\->
  10975. " "" "2E864" :UBS :NOSDIAG :NOETAB) "TOLVar35@" ("\\-> ob
  10976. " "" "2E865" :UBS :NOSDIAG :NOETAB) "TOLVar36!" ("ob \\->
  10977. " "" "2E866" :UBS :NOSDIAG :NOETAB) "TOLVar36@" ("\\-> ob
  10978. " "" "2E867" :UBS :NOSDIAG :NOETAB) "TOLVar37!" ("ob \\->
  10979. " "" "2E868" :UBS :NOSDIAG :NOETAB) "TOLVar37@" ("\\-> ob
  10980. " "" "2E869" :UBS :NOSDIAG :NOETAB) "TOLVar38!" ("ob \\->
  10981. " "" "2E86A" :UBS :NOSDIAG :NOETAB) "TOLVar38@" ("\\-> ob
  10982. " "" "2E86B" :UBS :NOSDIAG :NOETAB) "TOLVar39!" ("ob \\->
  10983. " "" "2E86C" :UBS :NOSDIAG :NOETAB) "TOLVar39@" ("\\-> ob
  10984. " "" "2E86D" :UBS :NOSDIAG :NOETAB) "TOLVar40!" ("ob \\->
  10985. " "" "2E86E" :UBS :NOSDIAG :NOETAB) "TOLVar40@" ("\\-> ob
  10986. " "" "2E86F" :UBS :NOSDIAG :NOETAB) "TOLVar41!" ("ob \\->
  10987. " "" "2E870" :UBS :NOSDIAG :NOETAB) "TOLVar41@" ("\\-> ob
  10988. " "" "2E871" :UBS :NOSDIAG :NOETAB) "TOLVar42!" ("ob \\->
  10989. " "" "2E872" :UBS :NOSDIAG :NOETAB) "TOLVar42@" ("\\-> ob
  10990. " "" "2E873" :UBS :NOSDIAG :NOETAB) "TOLVar43!" ("ob \\->
  10991. " "" "2E874" :UBS :NOSDIAG :NOETAB) "TOLVar43@" ("\\-> ob
  10992. " "" "2E875" :UBS :NOSDIAG :NOETAB) "TOLVar44!" ("ob \\->
  10993. " "" "2E876" :UBS :NOSDIAG :NOETAB) "TOLVar44@" ("\\-> ob
  10994. " "" "2E877" :UBS :NOSDIAG :NOETAB) "TOLVar45!" ("ob \\->
  10995. " "" "2E878" :UBS :NOSDIAG :NOETAB) "TOLVar45@" ("\\-> ob
  10996. " "" "2E879" :UBS :NOSDIAG :NOETAB) "TOLVar46!" ("ob \\->
  10997. " "" "2E87A" :UBS :NOSDIAG :NOETAB) "TOLVar46@" ("\\-> ob
  10998. " "" "2E87B" :UBS :NOSDIAG :NOETAB) "TOLVar47!" ("ob \\->
  10999. " "" "2E87C" :UBS :NOSDIAG :NOETAB) "TOLVar47@" ("\\-> ob
  11000. " "" "2E87D" :UBS :NOSDIAG :NOETAB) "TOLVar48!" ("ob \\->
  11001. " "" "2E87E" :UBS :NOSDIAG :NOETAB) "TOLVar48@" ("\\-> ob
  11002. " "" "2E87F" :UBS :NOSDIAG :NOETAB) "TOLVar49!" ("ob \\->
  11003. " "" "2E880" :UBS :NOSDIAG :NOETAB) "TOLVar49@" ("\\-> ob
  11004. " "" "2E881" :UBS :NOSDIAG :NOETAB) "TOLVar50!" ("ob \\->
  11005. " "" "2E882" :UBS :NOSDIAG :NOETAB) "TOLVar50@" ("\\-> ob
  11006. " "" "2E883" :UBS :NOSDIAG :NOETAB) "TOLVar51!" ("ob \\->
  11007. " "" "2E884" :UBS :NOSDIAG :NOETAB) "TOLVar51@" ("\\-> ob
  11008. " "" "2E885" :UBS :NOSDIAG :NOETAB) "TOLVar52!" ("ob \\->
  11009. " "" "2E886" :UBS :NOSDIAG :NOETAB) "TOLVar52@" ("\\-> ob
  11010. " "" "2E887" :UBS :NOSDIAG :NOETAB) "TOLVar53!" ("ob \\->
  11011. " "" "2E888" :UBS :NOSDIAG :NOETAB) "TOLVar53@" ("\\-> ob
  11012. " "" "2E889" :UBS :NOSDIAG :NOETAB) "TOLVar54!" ("ob \\->
  11013. " "" "2E88A" :UBS :NOSDIAG :NOETAB) "TOLVar54@" ("\\-> ob
  11014. " "" "2E88B" :UBS :NOSDIAG :NOETAB) "TOLVar55!" ("ob \\->
  11015. " "" "2E88C" :UBS :NOSDIAG :NOETAB) "TOLVar55@" ("\\-> ob
  11016. " "" "2E88D" :UBS :NOSDIAG :NOETAB) "TOLVar56!" ("ob \\->
  11017. " "" "2E88E" :UBS :NOSDIAG :NOETAB) "TOLVar56@" ("\\-> ob
  11018. " "" "2E88F" :UBS :NOSDIAG :NOETAB) "TOLVar57!" ("ob \\->
  11019. " "" "2E890" :UBS :NOSDIAG :NOETAB) "TOLVar57@" ("\\-> ob
  11020. " "" "2E891" :UBS :NOSDIAG :NOETAB) "TOLVar58!" ("ob \\->
  11021. " "" "2E892" :UBS :NOSDIAG :NOETAB) "TOLVar58@" ("\\-> ob
  11022. " "" "2E893" :UBS :NOSDIAG :NOETAB) "TOLVar59!" ("ob \\->
  11023. " "" "2E894" :UBS :NOSDIAG :NOETAB) "TOLVar59@" ("\\-> ob
  11024. " "" "2E895" :UBS :NOSDIAG :NOETAB) "TOLVar60!" ("ob \\->
  11025. " "" "2E896" :UBS :NOSDIAG :NOETAB) "TOLVar60@" ("\\-> ob
  11026. " "" "2E897" :UBS :NOSDIAG :NOETAB) "TOLVar61!" ("ob \\->
  11027. " "" "2E898" :UBS :NOSDIAG :NOETAB) "TOLVar61@" ("\\-> ob
  11028. " "" "2E899" :UBS :NOSDIAG :NOETAB) "TOLVar62!" ("ob \\->
  11029. " "" "2E89A" :UBS :NOSDIAG :NOETAB) "TOLVar62@" ("\\-> ob
  11030. " "" "2E89B" :UBS :NOSDIAG :NOETAB) "TOLVar63!" ("ob \\->
  11031. " "" "2E89C" :UBS :NOSDIAG :NOETAB) "TOLVar63@" ("\\-> ob
  11032. " "" "2E89D" :UBS :NOSDIAG :NOETAB) "TOLVar64!" ("ob \\->
  11033. " "" "2E89E" :UBS :NOSDIAG :NOETAB) "TOLVar64@" ("\\-> ob
  11034. " "" "2E89F" :UBS :NOSDIAG :NOETAB) "TOLVar65!" ("ob \\->
  11035. " "" "2E8A0" :UBS :NOSDIAG :NOETAB) "TOLVar65@" ("\\-> ob
  11036. " "" "2E8A1" :UBS :NOSDIAG :NOETAB) "TOLVar66!" ("ob \\->
  11037. " "" "2E8A2" :UBS :NOSDIAG :NOETAB) "TOLVar66@" ("\\-> ob
  11038. " "" "2E8A3" :UBS :NOSDIAG :NOETAB) "TOLVar67!" ("ob \\->
  11039. " "" "2E8A4" :UBS :NOSDIAG :NOETAB) "TOLVar67@" ("\\-> ob
  11040. " "" "2E8A5" :UBS :NOSDIAG :NOETAB) "TOLVar68!" ("ob \\->
  11041. " "" "2E8A6" :UBS :NOSDIAG :NOETAB) "TOLVar68@" ("\\-> ob
  11042. " "" "2E8A7" :UBS :NOSDIAG :NOETAB) "TOLVar69!" ("ob \\->
  11043. " "" "2E8A8" :UBS :NOSDIAG :NOETAB) "TOLVar69@" ("\\-> ob
  11044. " "" "2E8A9" :UBS :NOSDIAG :NOETAB) "TOLVar70!" ("ob \\->
  11045. " "" "2E8AA" :UBS :NOSDIAG :NOETAB) "TOLVar70@" ("\\-> ob
  11046. " "" "2E8AB" :UBS :NOSDIAG :NOETAB) "TOLVar71!" ("ob \\->
  11047. " "" "2E8AC" :UBS :NOSDIAG :NOETAB) "TOLVar71@" ("\\-> ob
  11048. " "" "2E8AD" :UBS :NOSDIAG :NOETAB) "TOLVar72!" ("ob \\->
  11049. " "" "2E8AE" :UBS :NOSDIAG :NOETAB) "TOLVar72@" ("\\-> ob
  11050. " "" "2E8AF" :UBS :NOSDIAG :NOETAB) "TOLVar73!" ("ob \\->
  11051. " "" "2E8B0" :UBS :NOSDIAG :NOETAB) "TOLVar73@" ("\\-> ob
  11052. " "" "2E8B1" :UBS :NOSDIAG :NOETAB) "TOLVar74!" ("ob \\->
  11053. " "" "2E8B2" :UBS :NOSDIAG :NOETAB) "TOLVar74@" ("\\-> ob
  11054. " "" "2E8B3" :UBS :NOSDIAG :NOETAB) "TOLVar75!" ("ob \\->
  11055. " "" "2E8B4" :UBS :NOSDIAG :NOETAB) "TOLVar75@" ("\\-> ob
  11056. " "" "2E8B5" :UBS :NOSDIAG :NOETAB) "TOLVar76!" ("ob \\->
  11057. " "" "2E8B6" :UBS :NOSDIAG :NOETAB) "TOLVar76@" ("\\-> ob
  11058. " "" "2E8B7" :UBS :NOSDIAG :NOETAB) "TOLVar77!" ("ob \\->
  11059. " "" "2E8B8" :UBS :NOSDIAG :NOETAB) "TOLVar77@" ("\\-> ob
  11060. " "" "2E8B9" :UBS :NOSDIAG :NOETAB) "TOLVar78!" ("ob \\->
  11061. " "" "2E8BA" :UBS :NOSDIAG :NOETAB) "TOLVar78@" ("\\-> ob
  11062. " "" "2E8BB" :UBS :NOSDIAG :NOETAB) "TOLVar79!" ("ob \\->
  11063. " "" "2E8BC" :UBS :NOSDIAG :NOETAB) "TOLVar79@" ("\\-> ob
  11064. " "" "2E8BD" :UBS :NOSDIAG :NOETAB) "TOLVar80!" ("ob \\->
  11065. " "" "2E8BE" :UBS :NOSDIAG :NOETAB) "TOLVar80@" ("\\-> ob
  11066. " "" "2E8BF" :UBS :NOSDIAG :NOETAB) "TOLVar81!" ("ob \\->
  11067. " "" "2E8C0" :UBS :NOSDIAG :NOETAB) "TOLVar81@" ("\\-> ob
  11068. " "" "2E8C1" :UBS :NOSDIAG :NOETAB) "TOLVar82!" ("ob \\->
  11069. " "" "2E8C2" :UBS :NOSDIAG :NOETAB) "TOLVar82@" ("\\-> ob
  11070. " "" "2E8C3" :UBS :NOSDIAG :NOETAB) "TOLVar83!" ("ob \\->
  11071. " "" "2E8C4" :UBS :NOSDIAG :NOETAB) "TOLVar83@" ("\\-> ob
  11072. " "" "2E8C5" :UBS :NOSDIAG :NOETAB) "TOLVar84!" ("ob \\->
  11073. " "" "2E8C6" :UBS :NOSDIAG :NOETAB) "TOLVar84@" ("\\-> ob
  11074. " "" "2E8C7" :UBS :NOSDIAG :NOETAB) "TOLVar85!" ("ob \\->
  11075. " "" "2E8C8" :UBS :NOSDIAG :NOETAB) "TOLVar85@" ("\\-> ob
  11076. " "" "2E8C9" :UBS :NOSDIAG :NOETAB) "TOLVar86!" ("ob \\->
  11077. " "" "2E8CA" :UBS :NOSDIAG :NOETAB) "TOLVar86@" ("\\-> ob
  11078. " "" "2E8CB" :UBS :NOSDIAG :NOETAB) "TOLVar87!" ("ob \\->
  11079. " "" "2E8CC" :UBS :NOSDIAG :NOETAB) "TOLVar87@" ("\\-> ob
  11080. " "" "2E8CD" :UBS :NOSDIAG :NOETAB) "TOLVar88!" ("ob \\->
  11081. " "" "2E8CE" :UBS :NOSDIAG :NOETAB) "TOLVar88@" ("\\-> ob
  11082. " "" "2E8CF" :UBS :NOSDIAG :NOETAB) "TOLVar89!" ("ob \\->
  11083. " "" "2E8D0" :UBS :NOSDIAG :NOETAB) "TOLVar89@" ("\\-> ob
  11084. " "" "2E8D1" :UBS :NOSDIAG :NOETAB) "TOLVar90!" ("ob \\->
  11085. " "" "2E8D2" :UBS :NOSDIAG :NOETAB) "TOLVar90@" ("\\-> ob
  11086. " "" "2E8D3" :UBS :NOSDIAG :NOETAB) "TOLVar91!" ("ob \\->
  11087. " "" "2E8D4" :UBS :NOSDIAG :NOETAB) "TOLVar91@" ("\\-> ob
  11088. " "" "2E8D5" :UBS :NOSDIAG :NOETAB) "TOLVar92!" ("ob \\->
  11089. " "" "2E8D6" :UBS :NOSDIAG :NOETAB) "TOLVar92@" ("\\-> ob
  11090. " "" "2E8D7" :UBS :NOSDIAG :NOETAB) "TOLVar93!" ("ob \\->
  11091. " "" "2E8D8" :UBS :NOSDIAG :NOETAB) "TOLVar93@" ("\\-> ob
  11092. " "" "2E8D9" :UBS :NOSDIAG :NOETAB) "TOLVar94!" ("ob \\->
  11093. " "" "2E8DA" :UBS :NOSDIAG :NOETAB) "TOLVar94@" ("\\-> ob
  11094. " "" "2E8DB" :UBS :NOSDIAG :NOETAB) "TOLVar95!" ("ob \\->
  11095. " "" "2E8DC" :UBS :NOSDIAG :NOETAB) "TOLVar95@" ("\\-> ob
  11096. " "" "2E8DD" :UBS :NOSDIAG :NOETAB) "TOLVar96!" ("ob \\->
  11097. " "" "2E8DE" :UBS :NOSDIAG :NOETAB) "TOLVar96@" ("\\-> ob
  11098. " "" "2E8DF" :UBS :NOSDIAG :NOETAB) "TOLVar97!" ("ob \\->
  11099. " "" "2E8E0" :UBS :NOSDIAG :NOETAB) "TOLVar97@" ("\\-> ob
  11100. " "" "2E8E1" :UBS :NOSDIAG :NOETAB) "TOLVar98!" ("ob \\->
  11101. " "" "2E8E2" :UBS :NOSDIAG :NOETAB) "TOLVar98@" ("\\-> ob
  11102. " "" "2E8E3" :UBS :NOSDIAG :NOETAB) "TOLVar99!" ("ob \\->
  11103. " "" "2E8E4" :UBS :NOSDIAG :NOETAB) "TOLVar99@" ("\\-> ob
  11104. " "" "2E8E5" :UBS :NOSDIAG :NOETAB) "TOLVar100!" ("ob \\->
  11105. " "" "2E8E6" :UBS :NOSDIAG :NOETAB) "TOLVar100@" ("\\-> ob
  11106. " "" "2E8E7" :UBS :NOSDIAG :NOETAB) "TOLVar101!" ("ob \\->
  11107. " "" "2E8E8" :UBS :NOSDIAG :NOETAB) "TOLVar101@" ("\\-> ob
  11108. " "" "2E8E9" :UBS :NOSDIAG :NOETAB) "TOLVar102!" ("ob \\->
  11109. " "" "2E8EA" :UBS :NOSDIAG :NOETAB) "TOLVar102@" ("\\-> ob
  11110. " "" "2E8EB" :UBS :NOSDIAG :NOETAB) "TOLVar103!" ("ob \\->
  11111. " "" "2E8EC" :UBS :NOSDIAG :NOETAB) "TOLVar103@" ("\\-> ob
  11112. " "" "2E8ED" :UBS :NOSDIAG :NOETAB) "TOLVar104!" ("ob \\->
  11113. " "" "2E8EE" :UBS :NOSDIAG :NOETAB) "TOLVar104@" ("\\-> ob
  11114. " "" "2E8EF" :UBS :NOSDIAG :NOETAB) "TOLVar105!" ("ob \\->
  11115. " "" "2E8F0" :UBS :NOSDIAG :NOETAB) "TOLVar105@" ("\\-> ob
  11116. " "" "2E8F1" :UBS :NOSDIAG :NOETAB) "TOLVar106!" ("ob \\->
  11117. " "" "2E8F2" :UBS :NOSDIAG :NOETAB) "TOLVar106@" ("\\-> ob
  11118. " "" "2E8F3" :UBS :NOSDIAG :NOETAB) "TOLVar107!" ("ob \\->
  11119. " "" "2E8F4" :UBS :NOSDIAG :NOETAB) "TOLVar107@" ("\\-> ob
  11120. " "" "2E8F5" :UBS :NOSDIAG :NOETAB) "TOLVar108!" ("ob \\->
  11121. " "" "2E8F6" :UBS :NOSDIAG :NOETAB) "TOLVar108@" ("\\-> ob
  11122. " "" "2E8F7" :UBS :NOSDIAG :NOETAB) "TOLVar109!" ("ob \\->
  11123. " "" "2E8F8" :UBS :NOSDIAG :NOETAB) "TOLVar109@" ("\\-> ob
  11124. " "" "2E8F9" :UBS :NOSDIAG :NOETAB) "TOLVar110!" ("ob \\->
  11125. " "" "2E8FA" :UBS :NOSDIAG :NOETAB) "TOLVar110@" ("\\-> ob
  11126. " "" "2E8FB" :UBS :NOSDIAG :NOETAB) "TOLVar111!" ("ob \\->
  11127. " "" "2E8FC" :UBS :NOSDIAG :NOETAB) "TOLVar111@" ("\\-> ob
  11128. " "" "2E8FD" :UBS :NOSDIAG :NOETAB) "TOLVar112!" ("ob \\->
  11129. " "" "2E8FE" :UBS :NOSDIAG :NOETAB) "TOLVar112@" ("\\-> ob
  11130. " "" "2E8FF" :UBS :NOSDIAG :NOETAB) "TOLVar113!" ("ob \\->
  11131. " "" "2E900" :UBS :NOSDIAG :NOETAB) "TOLVar113@" ("\\-> ob
  11132. " "" "2E901" :UBS :NOSDIAG :NOETAB) "TOLVar114!" ("ob \\->
  11133. " "" "2E902" :UBS :NOSDIAG :NOETAB) "TOLVar114@" ("\\-> ob
  11134. " "" "2E903" :UBS :NOSDIAG :NOETAB) "TOLVar115!" ("ob \\->
  11135. " "" "2E904" :UBS :NOSDIAG :NOETAB) "TOLVar115@" ("\\-> ob
  11136. " "" "2E905" :UBS :NOSDIAG :NOETAB) "TOLVar116!" ("ob \\->
  11137. " "" "2E906" :UBS :NOSDIAG :NOETAB) "TOLVar116@" ("\\-> ob
  11138. " "" "2E907" :UBS :NOSDIAG :NOETAB) "TOLVar117!" ("ob \\->
  11139. " "" "2E908" :UBS :NOSDIAG :NOETAB) "TOLVar117@" ("\\-> ob
  11140. " "" "2E909" :UBS :NOSDIAG :NOETAB) "TOLVar118!" ("ob \\->
  11141. " "" "2E90A" :UBS :NOSDIAG :NOETAB) "TOLVar118@" ("\\-> ob
  11142. " "" "2E90B" :UBS :NOSDIAG :NOETAB) "TOLVar119!" ("ob \\->
  11143. " "" "2E90C" :UBS :NOSDIAG :NOETAB) "TOLVar119@" ("\\-> ob
  11144. " "" "2E90D" :UBS :NOSDIAG :NOETAB) "TOLVar120!" ("ob \\->
  11145. " "" "2E90E" :UBS :NOSDIAG :NOETAB) "TOLVar120@" ("\\-> ob
  11146. " "" "2E90F" :UBS :NOSDIAG :NOETAB) "TOLVar121!" ("ob \\->
  11147. " "" "2E910" :UBS :NOSDIAG :NOETAB) "TOLVar121@" ("\\-> ob
  11148. " "" "2E911" :UBS :NOSDIAG :NOETAB) "TOLVar122!" ("ob \\->
  11149. " "" "2E912" :UBS :NOSDIAG :NOETAB) "TOLVar122@" ("\\-> ob
  11150. " "" "2E913" :UBS :NOSDIAG :NOETAB) "TOLVar123!" ("ob \\->
  11151. " "" "2E914" :UBS :NOSDIAG :NOETAB) "TOLVar123@" ("\\-> ob
  11152. " "" "2E915" :UBS :NOSDIAG :NOETAB) "TOLVar124!" ("ob \\->
  11153. " "" "2E916" :UBS :NOSDIAG :NOETAB) "TOLVar124@" ("\\-> ob
  11154. " "" "2E917" :UBS :NOSDIAG :NOETAB) "TOLVar125!" ("ob \\->
  11155. " "" "2E918" :UBS :NOSDIAG :NOETAB) "TOLVar125@" ("\\-> ob
  11156. " "" "2E919" :UBS :NOSDIAG :NOETAB) "TOLVar126!" ("ob \\->
  11157. " "" "2E91A" :UBS :NOSDIAG :NOETAB) "TOLVar126@" ("\\-> ob
  11158. " "" "2E91B" :UBS :NOSDIAG :NOETAB) "TOLVar127!" ("ob \\->
  11159. " "" "2E91C" :UBS :NOSDIAG :NOETAB) "TOLVar127@" ("\\-> ob
  11160. " "" "2E91D" :UBS :NOSDIAG :NOETAB) "TOLVar128!" ("ob \\->
  11161. " "" "2E91E" :UBS :NOSDIAG :NOETAB) "TOLVar128@" ("\\-> ob
  11162. " "" "2E91F" :UBS :NOSDIAG :NOETAB) "TOLVar129!" ("ob \\->
  11163. " "" "2E920" :UBS :NOSDIAG :NOETAB) "TOLVar129@" ("\\-> ob
  11164. " "" "2E921" :UBS :NOSDIAG :NOETAB) "TOLVar130!" ("ob \\->
  11165. " "" "2E922" :UBS :NOSDIAG :NOETAB) "TOLVar130@" ("\\-> ob
  11166. " "" "2E923" :UBS :NOSDIAG :NOETAB) "TOLVar131!" ("ob \\->
  11167. " "" "2E924" :UBS :NOSDIAG :NOETAB) "TOLVar131@" ("\\-> ob
  11168. " "" "2E925" :UBS :NOSDIAG :NOETAB) "TOLVar132!" ("ob \\->
  11169. " "" "2E926" :UBS :NOSDIAG :NOETAB) "TOLVar132@" ("\\-> ob
  11170. " "" "2E927" :UBS :NOSDIAG :NOETAB) "TOLVar133!" ("ob \\->
  11171. " "" "2E928" :UBS :NOSDIAG :NOETAB) "TOLVar133@" ("\\-> ob
  11172. " "" "2E929" :UBS :NOSDIAG :NOETAB) "TOLVar134!" ("ob \\->
  11173. " "" "2E92A" :UBS :NOSDIAG :NOETAB) "TOLVar134@" ("\\-> ob
  11174. " "" "2E92B" :UBS :NOSDIAG :NOETAB) "TOLVar135!" ("ob \\->
  11175. " "" "2E92C" :UBS :NOSDIAG :NOETAB) "TOLVar135@" ("\\-> ob
  11176. " "" "2E92D" :UBS :NOSDIAG :NOETAB) "TOLVar136!" ("ob \\->
  11177. " "" "2E92E" :UBS :NOSDIAG :NOETAB) "TOLVar136@" ("\\-> ob
  11178. " "" "2E92F" :UBS :NOSDIAG :NOETAB) "TOLVar137!" ("ob \\->
  11179. " "" "2E930" :UBS :NOSDIAG :NOETAB) "TOLVar137@" ("\\-> ob
  11180. " "" "2E931" :UBS :NOSDIAG :NOETAB) "TOLVar138!" ("ob \\->
  11181. " "" "2E932" :UBS :NOSDIAG :NOETAB) "TOLVar138@" ("\\-> ob
  11182. " "" "2E933" :UBS :NOSDIAG :NOETAB) "TOLVar139!" ("ob \\->
  11183. " "" "2E934" :UBS :NOSDIAG :NOETAB) "TOLVar139@" ("\\-> ob
  11184. " "" "2E935" :UBS :NOSDIAG :NOETAB) "TOLVar140!" ("ob \\->
  11185. " "" "2E936" :UBS :NOSDIAG :NOETAB) "TOLVar140@" ("\\-> ob
  11186. " "" "2E937" :UBS :NOSDIAG :NOETAB) "TOLVar141!" ("ob \\->
  11187. " "" "2E938" :UBS :NOSDIAG :NOETAB) "TOLVar141@" ("\\-> ob
  11188. " "" "2E939" :UBS :NOSDIAG :NOETAB) "TOLVar142!" ("ob \\->
  11189. " "" "2E93A" :UBS :NOSDIAG :NOETAB) "TOLVar142@" ("\\-> ob
  11190. " "" "2E93B" :UBS :NOSDIAG :NOETAB) "TOLVar143!" ("ob \\->
  11191. " "" "2E93C" :UBS :NOSDIAG :NOETAB) "TOLVar143@" ("\\-> ob
  11192. " "" "2E93D" :UBS :NOSDIAG :NOETAB) "TOLVar144!" ("ob \\->
  11193. " "" "2E93E" :UBS :NOSDIAG :NOETAB) "TOLVar144@" ("\\-> ob
  11194. " "" "2E93F" :UBS :NOSDIAG :NOETAB) "TOLVar145!" ("ob \\->
  11195. " "" "2E940" :UBS :NOSDIAG :NOETAB) "TOLVar145@" ("\\-> ob
  11196. " "" "2E941" :UBS :NOSDIAG :NOETAB) "TOLVar146!" ("ob \\->
  11197. " "" "2E942" :UBS :NOSDIAG :NOETAB) "TOLVar146@" ("\\-> ob
  11198. " "" "2E943" :UBS :NOSDIAG :NOETAB) "TOLVar147!" ("ob \\->
  11199. " "" "2E944" :UBS :NOSDIAG :NOETAB) "TOLVar147@" ("\\-> ob
  11200. " "" "2E945" :UBS :NOSDIAG :NOETAB) "TOLVar148!" ("ob \\->
  11201. " "" "2E946" :UBS :NOSDIAG :NOETAB) "TOLVar148@" ("\\-> ob
  11202. " "" "2E947" :UBS :NOSDIAG :NOETAB) "TOLVar149!" ("ob \\->
  11203. " "" "2E948" :UBS :NOSDIAG :NOETAB) "TOLVar149@" ("\\-> ob
  11204. " "" "2E949" :UBS :NOSDIAG :NOETAB) "TOLVar150!" ("ob \\->
  11205. " "" "2E94A" :UBS :NOSDIAG :NOETAB) "TOLVar150@" ("\\-> ob
  11206. " "" "2E94B" :UBS :NOSDIAG :NOETAB) "TOLVar151!" ("ob \\->
  11207. " "" "2E94C" :UBS :NOSDIAG :NOETAB) "TOLVar151@" ("\\-> ob
  11208. " "" "2E94D" :UBS :NOSDIAG :NOETAB) "TOLVar152!" ("ob \\->
  11209. " "" "2E94E" :UBS :NOSDIAG :NOETAB) "TOLVar152@" ("\\-> ob
  11210. " "" "2E94F" :UBS :NOSDIAG :NOETAB) "TOLVar153!" ("ob \\->
  11211. " "" "2E950" :UBS :NOSDIAG :NOETAB) "TOLVar153@" ("\\-> ob
  11212. " "" "2E951" :UBS :NOSDIAG :NOETAB) "TOLVar154!" ("ob \\->
  11213. " "" "2E952" :UBS :NOSDIAG :NOETAB) "TOLVar154@" ("\\-> ob
  11214. " "" "2E953" :UBS :NOSDIAG :NOETAB) "TOLVar155!" ("ob \\->
  11215. " "" "2E954" :UBS :NOSDIAG :NOETAB) "TOLVar155@" ("\\-> ob
  11216. " "" "2E955" :UBS :NOSDIAG :NOETAB) "TOLVar156!" ("ob \\->
  11217. " "" "2E956" :UBS :NOSDIAG :NOETAB) "TOLVar156@" ("\\-> ob
  11218. " "" "2E957" :UBS :NOSDIAG :NOETAB) "TOLVar157!" ("ob \\->
  11219. " "" "2E958" :UBS :NOSDIAG :NOETAB) "TOLVar157@" ("\\-> ob
  11220. " "" "2E959" :UBS :NOSDIAG :NOETAB) "TOLVar158!" ("ob \\->
  11221. " "" "2E95A" :UBS :NOSDIAG :NOETAB) "TOLVar158@" ("\\-> ob
  11222. " "" "2E95B" :UBS :NOSDIAG :NOETAB) "TOLVar159!" ("ob \\->
  11223. " "" "2E95C" :UBS :NOSDIAG :NOETAB) "TOLVar159@" ("\\-> ob
  11224. " "" "2E95D" :UBS :NOSDIAG :NOETAB) "TOLVar160!" ("ob \\->
  11225. " "" "2E95E" :UBS :NOSDIAG :NOETAB) "TOLVar160@" ("\\-> ob
  11226. " "" "2E95F" :UBS :NOSDIAG :NOETAB) "TOLVar161!" ("ob \\->
  11227. " "" "2E960" :UBS :NOSDIAG :NOETAB) "TOLVar161@" ("\\-> ob
  11228. " "" "2E961" :UBS :NOSDIAG :NOETAB) "TOLVar162!" ("ob \\->
  11229. " "" "2E962" :UBS :NOSDIAG :NOETAB) "TOLVar162@" ("\\-> ob
  11230. " "" "2E963" :UBS :NOSDIAG :NOETAB) "TOLVar163!" ("ob \\->
  11231. " "" "2E964" :UBS :NOSDIAG :NOETAB) "TOLVar163@" ("\\-> ob
  11232. " "" "2E965" :UBS :NOSDIAG :NOETAB) "TOLVar164!" ("ob \\->
  11233. " "" "2E966" :UBS :NOSDIAG :NOETAB) "TOLVar164@" ("\\-> ob
  11234. " "" "2E967" :UBS :NOSDIAG :NOETAB) "TOLVar165!" ("ob \\->
  11235. " "" "2E968" :UBS :NOSDIAG :NOETAB) "TOLVar165@" ("\\-> ob
  11236. " "" "2E969" :UBS :NOSDIAG :NOETAB) "TOLVar166!" ("ob \\->
  11237. " "" "2E96A" :UBS :NOSDIAG :NOETAB) "TOLVar166@" ("\\-> ob
  11238. " "" "2E96B" :UBS :NOSDIAG :NOETAB) "TOLVar167!" ("ob \\->
  11239. " "" "2E96C" :UBS :NOSDIAG :NOETAB) "TOLVar167@" ("\\-> ob
  11240. " "" "2E96D" :UBS :NOSDIAG :NOETAB) "TOLVar168!" ("ob \\->
  11241. " "" "2E96E" :UBS :NOSDIAG :NOETAB) "TOLVar168@" ("\\-> ob
  11242. " "" "2E96F" :UBS :NOSDIAG :NOETAB) "TOLVar169!" ("ob \\->
  11243. " "" "2E970" :UBS :NOSDIAG :NOETAB) "TOLVar169@" ("\\-> ob
  11244. " "" "2E971" :UBS :NOSDIAG :NOETAB) "TOLVar170!" ("ob \\->
  11245. " "" "2E972" :UBS :NOSDIAG :NOETAB) "TOLVar170@" ("\\-> ob
  11246. " "" "2E973" :UBS :NOSDIAG :NOETAB) "TOLVar171!" ("ob \\->
  11247. " "" "2E974" :UBS :NOSDIAG :NOETAB) "TOLVar171@" ("\\-> ob
  11248. " "" "2E975" :UBS :NOSDIAG :NOETAB) "TOLVar172!" ("ob \\->
  11249. " "" "2E976" :UBS :NOSDIAG :NOETAB) "TOLVar172@" ("\\-> ob
  11250. " "" "2E977" :UBS :NOSDIAG :NOETAB) "TOLVar173!" ("ob \\->
  11251. " "" "2E978" :UBS :NOSDIAG :NOETAB) "TOLVar173@" ("\\-> ob
  11252. " "" "2E979" :UBS :NOSDIAG :NOETAB) "TOLVar174!" ("ob \\->
  11253. " "" "2E97A" :UBS :NOSDIAG :NOETAB) "TOLVar174@" ("\\-> ob
  11254. " "" "2E97B" :UBS :NOSDIAG :NOETAB) "TOLVar175!" ("ob \\->
  11255. " "" "2E97C" :UBS :NOSDIAG :NOETAB) "TOLVar175@" ("\\-> ob
  11256. " "" "2E97D" :UBS :NOSDIAG :NOETAB) "TOLVar176!" ("ob \\->
  11257. " "" "2E97E" :UBS :NOSDIAG :NOETAB) "TOLVar176@" ("\\-> ob
  11258. " "" "2E97F" :UBS :NOSDIAG :NOETAB) "TOLVar177!" ("ob \\->
  11259. " "" "2E980" :UBS :NOSDIAG :NOETAB) "TOLVar177@" ("\\-> ob
  11260. " "" "2E981" :UBS :NOSDIAG :NOETAB) "TOLVar178!" ("ob \\->
  11261. " "" "2E982" :UBS :NOSDIAG :NOETAB) "TOLVar178@" ("\\-> ob
  11262. " "" "2E983" :UBS :NOSDIAG :NOETAB) "TOLVar179!" ("ob \\->
  11263. " "" "2E984" :UBS :NOSDIAG :NOETAB) "TOLVar179@" ("\\-> ob
  11264. " "" "2E985" :UBS :NOSDIAG :NOETAB) "TOLVar180!" ("ob \\->
  11265. " "" "2E986" :UBS :NOSDIAG :NOETAB) "TOLVar180@" ("\\-> ob
  11266. " "" "2E987" :UBS :NOSDIAG :NOETAB) "TOLVar181!" ("ob \\->
  11267. " "" "2E988" :UBS :NOSDIAG :NOETAB) "TOLVar181@" ("\\-> ob
  11268. " "" "2E989" :UBS :NOSDIAG :NOETAB) "TOLVar182!" ("ob \\->
  11269. " "" "2E98A" :UBS :NOSDIAG :NOETAB) "TOLVar182@" ("\\-> ob
  11270. " "" "2E98B" :UBS :NOSDIAG :NOETAB) "TOLVar183!" ("ob \\->
  11271. " "" "2E98C" :UBS :NOSDIAG :NOETAB) "TOLVar183@" ("\\-> ob
  11272. " "" "2E98D" :UBS :NOSDIAG :NOETAB) "TOLVar184!" ("ob \\->
  11273. " "" "2E98E" :UBS :NOSDIAG :NOETAB) "TOLVar184@" ("\\-> ob
  11274. " "" "2E98F" :UBS :NOSDIAG :NOETAB) "TOLVar185!" ("ob \\->
  11275. " "" "2E990" :UBS :NOSDIAG :NOETAB) "TOLVar185@" ("\\-> ob
  11276. " "" "2E991" :UBS :NOSDIAG :NOETAB) "TOLVar186!" ("ob \\->
  11277. " "" "2E992" :UBS :NOSDIAG :NOETAB) "TOLVar186@" ("\\-> ob
  11278. " "" "2E993" :UBS :NOSDIAG :NOETAB) "TOLVar187!" ("ob \\->
  11279. " "" "2E994" :UBS :NOSDIAG :NOETAB) "TOLVar187@" ("\\-> ob
  11280. " "" "2E995" :UBS :NOSDIAG :NOETAB) "TOLVar188!" ("ob \\->
  11281. " "" "2E996" :UBS :NOSDIAG :NOETAB) "TOLVar188@" ("\\-> ob
  11282. " "" "2E997" :UBS :NOSDIAG :NOETAB) "TOLVar189!" ("ob \\->
  11283. " "" "2E998" :UBS :NOSDIAG :NOETAB) "TOLVar189@" ("\\-> ob
  11284. " "" "2E999" :UBS :NOSDIAG :NOETAB) "TOLVar190!" ("ob \\->
  11285. " "" "2E99A" :UBS :NOSDIAG :NOETAB) "TOLVar190@" ("\\-> ob
  11286. " "" "2E99B" :UBS :NOSDIAG :NOETAB) "TOLVar191!" ("ob \\->
  11287. " "" "2E99C" :UBS :NOSDIAG :NOETAB) "TOLVar191@" ("\\-> ob
  11288. " "" "2E99D" :UBS :NOSDIAG :NOETAB) "TOLVar192!" ("ob \\->
  11289. " "" "2E99E" :UBS :NOSDIAG :NOETAB) "TOLVar192@" ("\\-> ob
  11290. " "" "2E99F" :UBS :NOSDIAG :NOETAB) "TOLVar193!" ("ob \\->
  11291. " "" "2E9A0" :UBS :NOSDIAG :NOETAB) "TOLVar193@" ("\\-> ob
  11292. " "" "2E9A1" :UBS :NOSDIAG :NOETAB) "TOLVar194!" ("ob \\->
  11293. " "" "2E9A2" :UBS :NOSDIAG :NOETAB) "TOLVar194@" ("\\-> ob
  11294. " "" "2E9A3" :UBS :NOSDIAG :NOETAB) "TOLVar195!" ("ob \\->
  11295. " "" "2E9A4" :UBS :NOSDIAG :NOETAB) "TOLVar195@" ("\\-> ob
  11296. " "" "2E9A5" :UBS :NOSDIAG :NOETAB) "TOLVar196!" ("ob \\->
  11297. " "" "2E9A6" :UBS :NOSDIAG :NOETAB) "TOLVar196@" ("\\-> ob
  11298. " "" "2E9A7" :UBS :NOSDIAG :NOETAB) "TOLVar197!" ("ob \\->
  11299. " "" "2E9A8" :UBS :NOSDIAG :NOETAB) "TOLVar197@" ("\\-> ob
  11300. " "" "2E9A9" :UBS :NOSDIAG :NOETAB) "TOLVar198!" ("ob \\->
  11301. " "" "2E9AA" :UBS :NOSDIAG :NOETAB) "TOLVar198@" ("\\-> ob
  11302. " "" "2E9AB" :UBS :NOSDIAG :NOETAB) "TOLVar199!" ("ob \\->
  11303. " "" "2E9AC" :UBS :NOSDIAG :NOETAB) "TOLVar199@" ("\\-> ob
  11304. " "" "2E9AD" :UBS :NOSDIAG :NOETAB) "TOLVar200!" ("ob \\->
  11305. " "" "2E9AE" :UBS :NOSDIAG :NOETAB) "TOLVar200@" ("\\-> ob
  11306. " "" "2E9AF" :UBS :NOSDIAG :NOETAB) "TOLVar201!" ("ob \\->
  11307. " "" "2E9B0" :UBS :NOSDIAG :NOETAB) "TOLVar201@" ("\\-> ob
  11308. " "" "2E9B1" :UBS :NOSDIAG :NOETAB) "TOLVar202!" ("ob \\->
  11309. " "" "2E9B2" :UBS :NOSDIAG :NOETAB) "TOLVar202@" ("\\-> ob
  11310. " "" "2E9B3" :UBS :NOSDIAG :NOETAB) "TOLVar203!" ("ob \\->
  11311. " "" "2E9B4" :UBS :NOSDIAG :NOETAB) "TOLVar203@" ("\\-> ob
  11312. " "" "2E9B5" :UBS :NOSDIAG :NOETAB) "TOLVar204!" ("ob \\->
  11313. " "" "2E9B6" :UBS :NOSDIAG :NOETAB) "TOLVar204@" ("\\-> ob
  11314. " "" "2E9B7" :UBS :NOSDIAG :NOETAB) "TOLVar205!" ("ob \\->
  11315. " "" "2E9B8" :UBS :NOSDIAG :NOETAB) "TOLVar205@" ("\\-> ob
  11316. " "" "2E9B9" :UBS :NOSDIAG :NOETAB) "TOLVar206!" ("ob \\->
  11317. " "" "2E9BA" :UBS :NOSDIAG :NOETAB) "TOLVar206@" ("\\-> ob
  11318. " "" "2E9BB" :UBS :NOSDIAG :NOETAB) "TOLVar207!" ("ob \\->
  11319. " "" "2E9BC" :UBS :NOSDIAG :NOETAB) "TOLVar207@" ("\\-> ob
  11320. " "" "2E9BD" :UBS :NOSDIAG :NOETAB) "TOLVar208!" ("ob \\->
  11321. " "" "2E9BE" :UBS :NOSDIAG :NOETAB) "TOLVar208@" ("\\-> ob
  11322. " "" "2E9BF" :UBS :NOSDIAG :NOETAB) "TOLVar209!" ("ob \\->
  11323. " "" "2E9C0" :UBS :NOSDIAG :NOETAB) "TOLVar209@" ("\\-> ob
  11324. " "" "2E9C1" :UBS :NOSDIAG :NOETAB) "TOLVar210!" ("ob \\->
  11325. " "" "2E9C2" :UBS :NOSDIAG :NOETAB) "TOLVar210@" ("\\-> ob
  11326. " "" "2E9C3" :UBS :NOSDIAG :NOETAB) "TOLVar211!" ("ob \\->
  11327. " "" "2E9C4" :UBS :NOSDIAG :NOETAB) "TOLVar211@" ("\\-> ob
  11328. " "" "2E9C5" :UBS :NOSDIAG :NOETAB) "TOLVar212!" ("ob \\->
  11329. " "" "2E9C6" :UBS :NOSDIAG :NOETAB) "TOLVar212@" ("\\-> ob
  11330. " "" "2E9C7" :UBS :NOSDIAG :NOETAB) "TOLVar213!" ("ob \\->
  11331. " "" "2E9C8" :UBS :NOSDIAG :NOETAB) "TOLVar213@" ("\\-> ob
  11332. " "" "2E9C9" :UBS :NOSDIAG :NOETAB) "TOLVar214!" ("ob \\->
  11333. " "" "2E9CA" :UBS :NOSDIAG :NOETAB) "TOLVar214@" ("\\-> ob
  11334. " "" "2E9CB" :UBS :NOSDIAG :NOETAB) "TOLVar215!" ("ob \\->
  11335. " "" "2E9CC" :UBS :NOSDIAG :NOETAB) "TOLVar215@" ("\\-> ob
  11336. " "" "2E9CD" :UBS :NOSDIAG :NOETAB) "TOLVar216!" ("ob \\->
  11337. " "" "2E9CE" :UBS :NOSDIAG :NOETAB) "TOLVar216@" ("\\-> ob
  11338. " "" "2E9CF" :UBS :NOSDIAG :NOETAB) "TOLVarN!" ("ob \\->
  11339. " "" "2E9D4" :UBS :NOSDIAG :NOETAB) "TOLVarN@" ("\\-> ob
  11340. " "" "2E9F8" :UBS :NOSDIAG :NOETAB) "ClrAllTVars" ("
  11341. " "" "2EA1C" :UBS :NOSDIAG :NOETAB) "ClrAllTOLVs" ("
  11342. " "" "2EA52" :UBS :NOSDIAG :NOETAB) "%0AllTopicVs" ("
  11343. " "" "2EA6E" :UBS :NOSDIAG :NOETAB) "%0AllTOLVars" ("
  11344. " "" "2EAA9" :UBS :NOSDIAG :NOETAB) "TOLVarSet!" ("
  11345. " "" "2EAE4" :UBS :NOSDIAG :NOETAB) "SaveTOLVarSet" ("
  11346. " "" "2EB11" :UBS :NOSDIAG :NOETAB) "RestTOLVarSet" ("
  11347. " "" "2EB66" :UBS :NOSDIAG :NOETAB) "%0TOLVarSet" ("
  11348. " "" "2EBB1" :UBS :NOSDIAG :NOETAB) "1getcxt!" ("
  11349. " "" "2EC01" :UBS :NOSDIAG :NOETAB) "DoInCxt" ("
  11350. " "" "2EC15" :UBS :NOSDIAG :NOETAB) "DoInCalcCxt" ("
  11351. " "" "2EC6F" :UBS :NOSDIAG :NOETAB) "DoInAppCxt" ("
  11352. " "" "2EC88" :UBS :NOSDIAG :NOETAB) "DoInFuncCxt" ("
  11353. " "" "2ECA1" :UBS :NOSDIAG :NOETAB) "DoInPolarCxt" ("
  11354. " "" "2ECBA" :UBS :NOSDIAG :NOETAB) "DoInParamCxt" ("
  11355. " "" "2ECD3" :UBS :NOSDIAG :NOETAB) "DoInSeqCxt" ("
  11356. " "" "2ECEC" :UBS :NOSDIAG :NOETAB) "DoInStatCxt" ("
  11357. " "" "2ED05" :UBS :NOSDIAG :NOETAB) "DoInSolveCxt" ("
  11358. " "" "2ED1E" :UBS :NOSDIAG :NOETAB) "DoInOtherCxt" ("
  11359. " "" "2ED37" :UBS :NOSDIAG :NOETAB) "DoInOtherN" ("
  11360. " "" "2ED91" :UBS :NOSDIAG :NOETAB) "DoInOtherU" ("
  11361. " "" "2EDD7" :UBS :NOSDIAG :NOETAB) "otherNG?" ("
  11362. " "" "2EE04" :UBS :NOSDIAG :NOETAB) "GET@tTYPER" ("
  11363. " "" "2EE37" :UBS :NOSDIAG :NOETAB) "~dontuple#" ("comp ob # \\-> {}
  11364. " "Takes objects from comp in groups of # and
  11365. evals ob on them. The results are returned
  11366. as a list.
  11367. " "0030E8" :UBS) "~xABCUV" ("pa pb c \\-> u v
  11368. " " --
  11369. Related: LABCUV,EGCD
  11370. " "030314" :CASHELP :Usr) "xABS" ("x \\-> x'
  11371. " "Absolute Value Function
  11372. --
  11373. Returns the absolute value of
  11374. its argument.
  11375. x \\-> |x|
  11376. (x,y) \\-> sqrt(x^2+y^2)
  11377. x_unit \\-> |x|_unit
  11378. [ array ] \\-> || array ||
  11379. 'sym' \\-> 'ABS(sym)'
  11380. --
  11381. Flags: -3
  11382. --
  11383. Related: NEG,SIGN
  11384. " "39A07" :Usr) "xACK" ("\\->
  11385. " "Acknowledge Alarm cmd
  11386. --
  11387. Acknowledges the oldest past due
  11388. alarm.
  11389. --
  11390. Flags: -43 -44
  11391. Repeat Alarms Not Rescheduled -43
  11392. Acknowledge Alarms Saved -44
  11393. --
  11394. Clears alert annunciator if
  11395. 1. There are no other past-due
  11396. alarms and
  11397. 2. There are no other active
  11398. alert sources - ie low batt.
  11399. Has no effect on control alarms
  11400. Control alarms that come due are
  11401. automatically acknowledged AND
  11402. saved in the sys alarm list.
  11403. --
  11404. Related: ACKALL
  11405. " "390E4" :Usr) "xACKALL" ("\\->
  11406. " "Acknowledge All Alarms cmd
  11407. --
  11408. Acknowledges all past due alarms.
  11409. --
  11410. Flags: -43 -44
  11411. Repeat Alarms Not Rescheduled -43
  11412. Acknowledge Alarms Saved -44
  11413. --
  11414. Clears alert annunciator if there
  11415. are no other active alert sources,
  11416. ie low batt.
  11417. Has no effect on control alarms
  11418. Control alarms that come due are
  11419. automatically acknowledged AND
  11420. saved in the sys alarm list.
  11421. --
  11422. Related: ACK
  11423. " "390C9" :Usr) "xACOS" ("x \\-> x'
  11424. " "Arc cos fn
  11425. --
  11426. Returns angle with given cos.
  11427. --
  11428. z \\-> arc cos z
  11429. 'sym' \\-> 'ACOS(sym)'
  11430. --
  11431. Related: ASIN,ATAN,COS,ISOL,ACOSH
  11432. " "3A7DC" :Usr) "~xACOS2S" ("symb \\-> symb'
  11433. " "" "025314" :CASHELP :Usr) "xACOSH" ("x \\-> x'
  11434. " "Arc hyp cos fn
  11435. --
  11436. Returns val with given hyp cos.
  11437. --
  11438. z \\-> arc hyp cos z
  11439. 'sym' \\-> 'ACOSH(sym)'
  11440. --
  11441. Related: ASINH,ATANH,COSH,ISOL
  11442. " "3A8D8" :Usr) "~xADD" ("{} {}' \\-> {}''
  11443. {} ob \\-> {}'
  11444. ob {} \\-> {}'
  11445. " "Add list cmd
  11446. --
  11447. Adds corresponding elems of 2
  11448. lists or adds a number to elem in
  11449. a list.
  11450. --
  11451. Related: +,\\GDLIST,\\PILIST,\\GSLIST
  11452. " "05C0AB" :Usr) "~xADDTMOD" ("symb1 symb2 \\-> symb3
  11453. " "" "06E314" :CASHELP :Usr) "~xADDTOREAL" ("var \\->
  11454. " "Make CAS assume that var is real. Add it to
  11455. the list in CASDIR.
  11456. " "0000DE" :CASHELP :Usr) "xALOG" ("x \\-> x'
  11457. " "Common antilog fn
  11458. --
  11459. ALOG x = 10^x
  11460. --
  11461. Flags: -3
  11462. numeric result
  11463. --
  11464. z \\-> 10^z
  11465. 'sym' \\-> 'ALOG(sym)'
  11466. --
  11467. Related: EXP,LN,LOG
  11468. " "3AAE5" :Usr) "~xAMORT" ("n \\-> princ intr bal
  11469. " "Amortize cmd
  11470. --
  11471. Flags: -14
  11472. Fin pmt mode -14
  11473. --
  11474. Related: TVM,TVMBEG,TVMEND,TVMROOT
  11475. " "04B0AB" :Usr) "xAND" ("x1 x2 \\-> x3
  11476. " "And fn
  11477. --
  11478. Logical AND of 2 args.
  11479. --
  11480. #n1 #n1 \\-> #n3
  11481. \"str1\" \"str2\" \\-> \"str3\"
  11482. T/F1 T/F2 \\-> 0/1
  11483. T/F 'sym' \\-> 'T/F AND sym'
  11484. 'sym' T/F \\-> 'sym AND T/F'
  11485. 'sym1' 'sym2' \\-> 'sym1 AND sym2'
  11486. --
  11487. Flags: -3 -5
  11488. Numeric res -3
  11489. Bin int wordsize -5 \\-> -10
  11490. --
  11491. Related: NOT,OR,XOR
  11492. " "3CA07" :Usr) "~xANIMATE" ("g1...gn n \\-> same stack
  11493. g1...gn {n {#X #Y} delay rep} \\-> same stack
  11494. " "Animate cmd
  11495. --
  11496. Displays grobs in sequence
  11497. " "0140AB") "xANS" ("n \\-> ob
  11498. " "Invokes results of previous calculations.
  11499. --
  11500. Related: LASTARG
  11501. " "3F033" :Usr) "xAPPLY" ("{symb1 .. symbn} f \\-> f(symb1...symbn)
  11502. " "Apply to args fn
  11503. --
  11504. Creates expr for specified fn
  11505. name & args
  11506. --
  11507. Related: QUOTE,|
  11508. " "3D7AC" :Usr) "xARC" ("c r \\Gh1 \\Gh2 \\->
  11509. {#x #y} #r \\Gh1 \\Gh2 \\->
  11510. " "Draw arc fn
  11511. --
  11512. Draws arc in PICT anticlockwise
  11513. from \\Gh1 to \\Gh2 centred on coord
  11514. specified on lev4 with radius on
  11515. lev3
  11516. --
  11517. Flags: -17 -18
  11518. angle mode (-17 & -18)
  11519. --
  11520. Related: BOX,LINE,TLINE
  11521. " "3C8C6" :Usr) "xARCHIVE" (":port:name \\->
  11522. :IO:name \\->
  11523. " "Archive HOME cmd
  11524. --
  11525. Creates backup of HOME in RAM
  11526. (including user key assignments
  11527. & alarm catalog)
  11528. --
  11529. if :IO: is used backup
  11530. transmitted through IO port via
  11531. Kermit to filename 'name'
  11532. --
  11533. Flags: -33 -39
  11534. I/O Device -33
  11535. I/O Messages -39 if :IO:name
  11536. --
  11537. Related: RESTORE
  11538. " "3EAC7" :Usr) "xARG" ("c \\-> \\Gh
  11539. " "Argument fn
  11540. --
  11541. Returns angle of a complex number
  11542. --
  11543. (x,y) \\-> \\Gh
  11544. 'sym' \\-> 'ARG(sym)'
  11545. --
  11546. Flags: -17 -18
  11547. Ang Mode -17,-18
  11548. " "3A390" :Usr) "~xARIT" ("\\->
  11549. " "Display menu of arithmetic commands.
  11550. --
  11551. Related: BASE,CMPLX,DIFF,EXP&LN, SOLVER,TRIGO
  11552. " "085314" :Usr) "xARRY\\->" ("[] \\-> x1...xn {n}
  11553. [[]] \\-> x11...xnm {n m}
  11554. " "Array to stack cmd
  11555. --
  11556. Return elems of array to stack.
  11557. OBJ\\-> includes this functionality.
  11558. --
  11559. Related: \\->ARRY,DTAG,EQ\\->,LIST\\->, OBJ\\->,STR\\->
  11560. " "3BEC5" :Usr) "xARRY>" ("[] \\-> x1...xn {n}
  11561. [[]] \\-> x11...xnm {n m}
  11562. " "Array to stack cmd
  11563. --
  11564. Return elems of array to stack.
  11565. OBJ\\-> includes this functionality.
  11566. --
  11567. Related: \\->ARRY,DTAG,EQ\\->,LIST\\->, OBJ\\->,STR\\->
  11568. " "3BEC5" :Usr) "x\\->ARRY" ("x1..xn n \\-> []
  11569. x11...xnm {n m} \\-> [[]]
  11570. " "Stack to Array Cmd
  11571. --
  11572. Returns a vector of n real or
  11573. complex elements or a matrix of
  11574. n \327 m real or complex solutions.
  11575. --
  11576. Related: ARRY\\->,LIST\\->,\\->LIST, OBJ\\->,STR\\->,\\->TAG,\\->UNIT
  11577. " "3BE9B" :Usr) "x>ARRY" ("x1..xn n \\-> []
  11578. x11...xnm {n m} \\-> [[]]
  11579. " "Stack to Array Cmd
  11580. --
  11581. Returns a vector of n real or
  11582. complex elements or a matrix of
  11583. n \327 m real or complex solutions.
  11584. --
  11585. Related: ARRY\\->,LIST\\->,\\->LIST, OBJ\\->,STR\\->,\\->TAG,\\->UNIT
  11586. " "3BE9B" :Usr) "xASIN" ("x \\-> x'
  11587. " "Arc sin fn
  11588. --
  11589. Gives angle whose sin is given
  11590. --
  11591. z \\-> arc sin z
  11592. 'sym' \\-> 'ASIN(sym)'
  11593. --
  11594. Flags: -1 -3 -17 -18
  11595. Principal soln -1
  11596. Numerical res -3
  11597. Angle mode -17,-18
  11598. --
  11599. Related: ACOS,ATAN,ISOL,SIN
  11600. " "3A756" :Usr) "~xASIN2C" ("symb \\-> symb'
  11601. " "" "024314" :CASHELP :Usr) "~xASIN2T" ("symb \\-> symb'
  11602. " "" "023314" :CASHELP :Usr) "xASINH" ("x \\-> x'
  11603. " "Arc hyp sin fn
  11604. --
  11605. Gives Val whose hyp sin is given
  11606. --
  11607. z \\-> arc hyp sin z
  11608. 'sym' \\-> 'ASINH(sym)'
  11609. --
  11610. Flags: -1 -3
  11611. Principal soln -1
  11612. Numerical res -3
  11613. --
  11614. Related: ACOSH,ATANH,ISOL,SINH
  11615. " "3A88E" :Usr) "xASN" ("obj key \\->
  11616. 'SKEY' \\->
  11617. " "Assign cmd
  11618. --
  11619. Defines single key on user kbd by
  11620. assigning the given obj to the
  11621. key x_key
  11622. --
  11623. Flags: -61 -62
  11624. User mode lock -61
  11625. User mode -62
  11626. --
  11627. The arg x_key is a real number
  11628. rc.p where r=row,c=col,p=plane as
  11629. follows:
  11630. 0,1 - unshifted
  11631. 2 - left shifted
  11632. 3 - right shifted
  11633. 4 - \214 shifted
  11634. 5 - \214 left shifted
  11635. 6 - \214 right shifted
  11636. Add 0.01 if the modifier is to be held
  11637. pressed down.
  11638. --
  11639. After ASN, pressing the assigned
  11640. in User or 1-User mode exeutes
  11641. the assigned obj instead. Remains
  11642. in effect until altered by ASN or
  11643. STOKEYS or DELKEYS. If 'SKEY' is
  11644. passed instead, the specified key
  11645. is restored to std.
  11646. --
  11647. Related: DELKEYS,RCLKEYS,STOKEYS
  11648. <REF>TEXT:Keycodes
  11649. " "3EEE7" :Usr) "xASR" ("# \\-> #'
  11650. " "Arithmetic shift right cmd
  11651. --
  11652. Shifts a bint 1 bit to the right
  11653. except for the most significant
  11654. bit which stays.
  11655. --
  11656. Flags: -5 -6 -7 -8 -9 -10 -11 -12
  11657. bint wordsize -5 -> -10
  11658. bint base -11, -12
  11659. --
  11660. Related: SL,SLB,SR,SRB
  11661. " "38DE1" :Usr) "~xASSUME" ("
  11662. " "" "0260DE" :Usr) "xATAN" ("x \\-> x'
  11663. " "Arc tan fn
  11664. --
  11665. Returns the angle having the tan
  11666. --
  11667. z \\-> arc tan z
  11668. 'sym' \\-> 'ATAN(sym)'
  11669. --
  11670. Flags: -1 -3 -17 -18
  11671. Principle soln -1
  11672. Numeric results -3
  11673. Angle mode -17,-18
  11674. --
  11675. Related: ACOS,ASIN,ISOL,TAN
  11676. " "3A844" :Usr) "~xATAN2S" ("symb \\-> symb'
  11677. " "" "022314" :CASHELP :Usr) "xATANH" ("x \\-> x'
  11678. " "Arc hyp tan fn
  11679. --
  11680. Returns the value with given hyp
  11681. tan.
  11682. --
  11683. z \\-> arc hyp tan z
  11684. 'sym' \\-> 'ATANH(sym)'
  11685. --
  11686. Flags: -1 -3 -22
  11687. Principle soln -1
  11688. Numeric results -3
  11689. Infinite result exception -22
  11690. --
  11691. Related: ACOSH,ASINH,ISOL,TANH
  11692. " "3A94F" :Usr) "xATTACH" ("n \\->
  11693. :nport:n \\->
  11694. " "Attach library cmd
  11695. --
  11696. Attaches lib with given num to
  11697. current directory.
  11698. --
  11699. Related: DETACH,LIBS
  11700. " "3EB64" :Usr) "~xAUGMENT" ("
  11701. " "" "0130DE" :Usr) "xAUTO" ("\\->
  11702. " " Calculates a y-axis display range
  11703. or an x- & y-axis display range.
  11704. --
  11705. Action depends on plot type:
  11706. FUNCTION sets range to max &
  11707. min of y vals sampled
  11708. at 40 equi-spaced x
  11709. vals (excluding \261\330\331)
  11710. CONIC sets y-axis scale = to
  11711. x-axis scale
  11712. POLAR same as FUNCTION
  11713. PARAMETRIC same as POLAR
  11714. TRUTH no action
  11715. BAR sets x-axis range from
  11716. 0 to # of elems in
  11717. \\GSDAT +1. sets y-range
  11718. to min & max of the
  11719. elts x-axis is always
  11720. included.
  11721. HISTOGRAM sets x-axis range to
  11722. min & max of the elems
  11723. in \\GSDAT. sets y-range
  11724. from 0 to # of rows in
  11725. \\GSDAT.
  11726. SCATTER x-range is min & max
  11727. of XCOL. y-range is
  11728. min & max of YCOL
  11729. --
  11730. Related: DRAW,SCALEH,SCALE,SCL\\GS, SCALEW,XRNG,YRNG
  11731. " "3C49F" :Usr) "xAXES" ("c \\->
  11732. {c tick $x $y } \\->
  11733. " "Axes cmd
  11734. --
  11735. Specifies intersection coords of
  11736. x- & y- axes, tick mark annotatn
  11737. and x- & y- axes labels. stored
  11738. in PPAR.
  11739. --
  11740. <REF>TEXT:Reserved|PPAR
  11741. --
  11742. Related: ATICK,DRAW,DRAX,LABEL
  11743. " "3C3B2" :Usr) "~xAXL" ("{} \\-> []
  11744. [] \\-> ()
  11745. " "" "04A314" :CASHELP :Usr) "~xAXM" ("[A] \\-> [M]
  11746. " "" "049314" :CASHELP :Usr) "~xAXQ" ("[nxn] [n] \\-> [nxn]' [n]
  11747. " "" "04C314" :CASHELP :Usr) "xBAR" ("\\->
  11748. " "Bar plot type cmd
  11749. --
  11750. Sets plot type to BAR
  11751. When plot type is BAR, the DRAW
  11752. Cmd plots a bar chart using data
  11753. from 1 col of the stat matrix
  11754. (\\GSDAT). The col to be plotted is
  11755. specified by the XCOL cmd & is
  11756. stored in 1st param of \\GSPAR. Plot
  11757. params are specified in PPAR of
  11758. ff form:
  11759. { (xmin,ymin) (xmax,ymax) indep
  11760. res axes ptype depend }
  11761. For BAR they are used as follows:
  11762. --
  11763. (xmin,ymin) specifies lower left
  11764. cnr of PICT (default: (-6.5,-3.1))
  11765. --
  11766. (xmax,ymax) specifies upper
  11767. right cnr of PICT
  11768. (default: (6.5,3.2))
  11769. --
  11770. indep name - specifies horiz
  11771. axis label or
  11772. list - { name x1 x2 } smaller of
  11773. x1 & x2 is horiz location of 1st
  11774. bar (default: X)
  11775. --
  11776. res real - bar width in user
  11777. units or bint - bar width in
  11778. pixels
  11779. (default: 0 - 1 in user units)
  11780. --
  11781. axes list containing one or more
  11782. of the ff in order:
  11783. (x,y) - user unit origin pos
  11784. a list specifying tick mark
  11785. annotatn & 2 strings specifying
  11786. horiz & vert axes labels
  11787. (default: (0,0))
  11788. --
  11789. ptype plot type - BAR in this
  11790. case
  11791. --
  11792. depend label for vert axis.
  11793. (default: Y)
  11794. --
  11795. <REF>TEXT:Reserved|PPAR
  11796. --
  11797. Related: CONIC,DIFFEQ,FUNCTION,GRIDMAP, HISTOGRAM,PARAMETRIC,PARSURFACE,PCONTOUR, SCATTER,SLOPEFIELD,TRUTH,YSLICE
  11798. " "3C9D3" :Usr) "xBARPLOT" ("\\->
  11799. " "Draw bar plot cmd
  11800. --
  11801. Draws bar chart of specified col
  11802. of stat matrix (\\GSDAT)
  11803. Col to be plotted is specified by
  11804. XCOL & is stored as first param
  11805. in \\GSPAR. Default col is 1. data
  11806. can be +ve or -ve giving bars
  11807. above or below the axis. y-axis
  11808. is autoscaled & plot type is BAR.
  11809. When executed from a program,
  11810. plot doesn't persist unless
  11811. PICTURE,PVIEW (with empty list)
  11812. or FREEZE is subsequently
  11813. executed
  11814. --
  11815. Related: FREEZE,HISTPLOT,PICTURE, PVIEW,SCATRPLOT,XCOL
  11816. " "3E196" :Usr) "~xALGB" ("\\->
  11817. " "Display menu of basic algebra commands.
  11818. --
  11819. Related: ARIT,CMPLX,DIFF,EXP&LN.SOLVER,TRIGO
  11820. " "080314" :Usr) "~xBASE" ("\\->
  11821. " "Display menu of basic algebra commands.
  11822. --
  11823. Related: ARIT,CMPLX,DIFF,EXP&LN.SOLVER,TRIGO
  11824. " "080314" :Usr) "~xBASIS" ("
  11825. " "" "0110DE" :Usr) "xBAUD" ("n \\->
  11826. " "Baud rate cmd
  11827. --
  11828. Specify bit transfer rate.
  11829. --
  11830. Related: CKSM,PARITY,TRANSIO
  11831. " "3EDCC" :Usr) "xBEEP" ("freq dur \\->
  11832. " "Beep cmd
  11833. --
  11834. Sounds a tone of n Hz for x secs.
  11835. --
  11836. Flags: -56
  11837. Error Beep -56
  11838. Max Freq = 4400 Hz
  11839. Max Duration = 1048.575 secs.
  11840. --
  11841. Related: HALT,INPUT,PROMPT,WAIT
  11842. " "39765" :Usr) "xBESTFIT" ("\\->
  11843. " "Best fit model cmd
  11844. --
  11845. Executes LR with each of the 4
  11846. curve fitting models and selects
  11847. the model giving the largest
  11848. correlation coefficient.
  11849. --
  11850. Selected model stored in 5th
  11851. param of \\GSPAR & regression coeffs
  11852. intercept & slope are stored in
  11853. 3rd & 4th params.
  11854. --
  11855. Related: EXPFIT,LINFIT,LOGFIT,LR,PWRFIT
  11856. " "3E2C1" :Usr) "xBIN" ("\\->
  11857. " "Binary mode cmd
  11858. --
  11859. Selects binary base for bint ops.
  11860. (Default base is 10)
  11861. --
  11862. Flags: -5 -6 -7 -8 -9 -10 -11 -12
  11863. Bint wordsize -5 \\-> -10
  11864. Bint base -11, -12
  11865. Bints require prefix #. Bints
  11866. entered & returned in binary show
  11867. the b suffix. If current base not
  11868. binary, enter binary nums by
  11869. using b suffix.
  11870. The current base doesn't affect
  11871. the internal representation of
  11872. bints as unsigned bints.
  11873. --
  11874. Related: DEC,HEX,OCT,STWS,RCWS
  11875. " "3B655" :Usr) "xBINS" ("min width n \\-> [[]] []
  11876. " "Sort Into Frequency Bins Cmd
  11877. --
  11878. Sorts the elements of the indep.
  11879. col (XCOL) of the stat matrix
  11880. (\\GSDAT) into (nbins + 2) bins,
  11881. where the left edge for bin 1
  11882. starts at value xmin and each bin
  11883. has width xwidth.
  11884. --
  11885. xmin xwidth nbins \\->
  11886. [[ nbin1...nbinn ]]
  11887. [ nbinL nbinR ]
  11888. --
  11889. Related: BARPLOT,XCOL
  11890. " "3E171" :Usr) "xBLANK" ("#width #height \\-> grob
  11891. " "Blank Graphics Obj Cmd
  11892. --
  11893. Creates a blank graphics obj of
  11894. the specified width and height.
  11895. --
  11896. Related: \\->GROB,LCD\\->
  11897. " "3C70A" :Usr) "xBOX" ("{#n1 #m1} {#n2 #m2} \\->
  11898. c1 c2 \\->
  11899. " "Box Cmd
  11900. --
  11901. Draws in PICT a box whose
  11902. opposite corners are defined by
  11903. the specified pixel or user-unit
  11904. coords.
  11905. --
  11906. Related: ARC,LINE,TLINE
  11907. " "3C6E0" :Usr) "xBUFLEN" ("\\-> nchars 0/1
  11908. " "Buffer Length Cmd
  11909. --
  11910. Returns the number of characters
  11911. in the HP 48's serial input
  11912. buffer and a single digit
  11913. indicating whether an error
  11914. occurred during data reception.
  11915. --
  11916. Related: CLOSEIO,OPENIO,SBRK,SRECV, STIME,XMIT
  11917. " "3EE47" :Usr) "xBYTES" ("obj \\-> chksum size
  11918. " "Bytes Size Cmd
  11919. --
  11920. Returns the number of bytes & the
  11921. checksum for the given obj.
  11922. --
  11923. Related: MEM
  11924. " "39480" :Usr) "xB\\->R" ("# \\-> R
  11925. " "Binary to Real Cmd
  11926. --
  11927. Converts a binary integer to its
  11928. floating-point equivalent.
  11929. --
  11930. Related: R\\->B
  11931. " "38F21" :Usr) "xB>R" ("# \\-> R
  11932. " "Binary to Real Cmd
  11933. --
  11934. Converts a binary integer to its
  11935. floating-point equivalent.
  11936. --
  11937. Related: R\\->B
  11938. " "38F21" :Usr) "~xC2P" ("{} \\-> ?????
  11939. " "" "01E0DE" :Usr) "~xCASCFG" ("\\->
  11940. " "" "07E314" :CASHELP :Usr) "~xCASCMD" ("\\-> ?
  11941. " "" "0330DE" :Usr) "xCASE" ("\\->
  11942. " "CASE Conditional Structure Cmd
  11943. --
  11944. Starts CASE ... END conditional
  11945. structure.
  11946. --
  11947. CASE \\->
  11948. THEN T/F \\->
  11949. END \\->
  11950. END \\->
  11951. --
  11952. Related: END,IF,IFERR,THEN
  11953. " "38B28" :Usr) "xCEIL" ("x \\-> n
  11954. " "Ceiling Func
  11955. --
  11956. Returns the smallest integer
  11957. greater than or equal to the
  11958. argument.
  11959. --
  11960. x \\-> n
  11961. x_u \\-> n_u
  11962. 'sym' \\-> 'CEIL(sym)'
  11963. --
  11964. Flags: -3
  11965. --
  11966. Related: FLOOR,IP,RND,TRNC
  11967. " "3AD1B" :Usr) "xCENTR" ("(x,y) \\->
  11968. x \\->
  11969. " "Centre Cmd
  11970. --
  11971. Adjusts the first two parameters
  11972. in the reserved variable PPAR,
  11973. (xmin, ymin) and (xmax,ymax), so
  11974. that the point represented by the
  11975. argument (x,y) is the plot centre.
  11976. --
  11977. <REF>TEXT:Reserved|PPAR
  11978. --
  11979. Related: SCALE
  11980. " "3C3DC" :Usr) "xCF" ("n \\->
  11981. " "Clear Flag Cmd
  11982. --
  11983. Clears the specified user or
  11984. system flag.
  11985. --
  11986. Related: FC?,FC?C,FS?,FS?C,SF
  11987. " "3B4E9" :Usr) "~xCHINREM" ("[]1 []2 \\-> []3
  11988. " "" "03A314" :CASHELP :Usr) "~xCHOLESKY" ("
  11989. " "" "00B0DE" :Usr) "~xCHOOSE" ("title {elems} pos \\-> ob 1
  11990. \\-> 0
  11991. " "User-Defined Choose Box Cmd
  11992. --
  11993. Creates a user-defined choose box
  11994. --
  11995. Related: INFORM,NOVAL
  11996. " "04D0AB" :Usr) "xCHR" ("n \\-> $
  11997. " "Character Cmd
  11998. --
  11999. Returns a string representing the
  12000. HP 48 character corresponding to
  12001. the character code n.
  12002. --
  12003. Related: NUM,POS,REPL,SIZE,SUB
  12004. " "3BC19" :Usr) "x%CH" ("x1 x2 \\-> x3
  12005. " "Percent Change Func
  12006. --
  12007. Returns the percent change from
  12008. x (level 2) to y (level 1) as a
  12009. percentage of x.
  12010. --
  12011. x y \\-> 100(y-x)/x
  12012. x 'sym' \\-> '%CH(x,sym)'
  12013. 'sym' x \\-> '%CH(sym,x)'
  12014. 'sym1' 'sym2' \\-> '%CH(sym1,sym2)'
  12015. x_u y_u \\-> 100(y_u-x_u)/x_u
  12016. x_u 'sym' \\-> '%CH(x_u,sym)'
  12017. 'sym' x_u \\-> '%CH(sym,x_u)'
  12018. --
  12019. Flags: -3
  12020. --
  12021. Related: %,%T
  12022. " "3B362" :Usr) "~xCIRC" ("prg {} \\-> ?????
  12023. " "" "01D0DE" :Usr) "xCKSM" ("n_type \\->
  12024. " "Checksum Cmd
  12025. --
  12026. Specifies the error-detection
  12027. scheme.
  12028. --
  12029. Related: BAUD,PARITY,TRANSIO
  12030. " "3EDAC" :Usr) "xCLEAR" ("ob1 .. obn \\->
  12031. " "Clear Cmd
  12032. --
  12033. Removes all objects from the
  12034. stack.
  12035. --
  12036. Related: CLVAR,PURGE
  12037. " "3DD4E" :Usr) "xCL\\GS" ("\\->
  12038. " "Clear Sigma Cmd
  12039. --
  12040. Purges the current statistics
  12041. matrix (reserved variable \\GSDAT).
  12042. --
  12043. <REF>TEXT:Reserved|\\GSDAT
  12044. --
  12045. Related: RCL\\GS,STO\\GS,\\GS+,\\GS-
  12046. " "3DD8E" :Usr) "xCLSIGMA" ("\\->
  12047. " "Clear Sigma Cmd
  12048. --
  12049. Purges the current statistics
  12050. matrix (reserved variable \\GSDAT).
  12051. --
  12052. <REF>TEXT:Reserved|\\GSDAT
  12053. --
  12054. Related: RCL\\GS,STO\\GS,\\GS+,\\GS-
  12055. " "3DD8E" :Usr) "xCLKADJ" ("ticks \\->
  12056. " "Adjust System Clock Cmd
  12057. --
  12058. Adjusts the system time by x
  12059. clock ticks, where 8192 clock
  12060. ticks equal 1 second.
  12061. --
  12062. Related: \\->TIME
  12063. " "39144" :Usr) "xCLLCD" ("\\->
  12064. " "Clear LCD Cmd
  12065. --
  12066. Clears (blanks) the stack display
  12067. --
  12068. Related: DISP,FREEZE
  12069. " "39839" :Usr) "xCLOSEIO" ("\\->
  12070. " "Close I/O Port Cmd
  12071. --
  12072. Closes the serial port and the
  12073. IR port, and clears the input
  12074. buffer and any error messages for
  12075. KERMIT.
  12076. --
  12077. Related: BUFLEN,OPENIO
  12078. " "3EC95" :Usr) "xCLVAR" ("\\->
  12079. " "Clear Variables Cmd
  12080. --
  12081. Purges all variables and empty
  12082. subdirectories in the current
  12083. directory.
  12084. --
  12085. Related: CLUSR,PGDIR,PURGE
  12086. " "3E91A" :Usr) "xCLUSR" ("\\->
  12087. " "Clear Variables Cmd
  12088. --
  12089. Purges all variables and empty
  12090. subdirectories in the current
  12091. directory.
  12092. --
  12093. Related: CLUSR,PGDIR,PURGE
  12094. " "3E91A" :Usr) "~xCMPLX" ("\\->
  12095. " "Display a menu pertaining to complex numbers.
  12096. --
  12097. Related: ARIT,BASE,DIFF,EXP&LN,SOLVER,TRIGO
  12098. " "081314" :Usr) "xCNRM" ("[] \\-> col_norm
  12099. " "Column Norm Cmd
  12100. --
  12101. Returns the column norm (onenorm)
  12102. of the array argument.
  12103. --
  12104. Related: CROSS,DET,DOT,RNRM
  12105. " "3B193" :Usr) "~x\\->COL" ("[[]] \\-> [v1]...[vn] n
  12106. [] \\-> x1...xn n
  12107. " "Matrix to Columns Cmd
  12108. --
  12109. Transforms a matrix into a series
  12110. of column vectors and returns the
  12111. vectors and a column count, or
  12112. transforms a vector into its
  12113. elements and returns the elements
  12114. and an element count.
  12115. --
  12116. Related: COL\\->,\\->ROW,ROW\\->
  12117. " "0380AB" :Usr) "~xCOL\\->" ("[v1]...[vn] n \\-> [[]]
  12118. x1...xn n \\-> []
  12119. " "Columns to Matrix Cmd
  12120. --
  12121. Transforms a series of column
  12122. vectors and a column count into
  12123. a matrix containing those columns,
  12124. or transforms a sequence of
  12125. numbers and an element count into
  12126. a vector with those numbers as
  12127. elements.
  12128. --
  12129. Related: \\->COL,\\->ROW,ROW\\->
  12130. " "0390AB" :Usr) "~xCOL+" ("[[]] [[]]' n \\-> [[]]''
  12131. [] x n \\-> []'
  12132. " "Insert Column Cmd
  12133. --
  12134. Inserts an array (vector or
  12135. matrix) into a matrix (one or
  12136. more elements into a vector) at
  12137. the position indicated by nindex,
  12138. and returns the modified array.
  12139. --
  12140. [[mat]]1 [mat]2 nidx \\-> [[mat]]3
  12141. [[mat]]1 [vec]col nidx \\-> [[mat]]2
  12142. [vec]1 nelement nidx \\-> [vec]2
  12143. --
  12144. Related: COL-,CSWP,ROW+,ROW-
  12145. " "03F0AB" :Usr) "~xCOL-" ("[] n \\-> []' xn
  12146. [[]] n \\-> [[]]' [vn]
  12147. " "Delete Column Cmd
  12148. --
  12149. Deletes column n of a matrix (or
  12150. element n of a vector), and
  12151. returns the modified matrix (or
  12152. vector) and the deleted column
  12153. (or element).
  12154. --
  12155. Related: COL+,CSWP,ROW+,ROW-
  12156. " "03E0AB" :Usr) "xCOLCT" ("symb \\-> symb'
  12157. " "Collect Like Terms Cmd
  12158. --
  12159. Simplifies an algebraic expression
  12160. or equation by \"collecting\"
  12161. like terms. Does not modify numbers.
  12162. --
  12163. Related: EXPAN,ISOL,QUAD,SHOW
  12164. " "3E5A0" :Usr) "~xCOLLECT" ("symb \\-> symb'
  12165. " "" "0300DE" :CASHELP :Usr) "xCOL\\GS" ("x_col y_col \\->
  12166. " "Sigma Columns Cmd
  12167. --
  12168. Specifies the independent variable
  12169. and dependent-variable columns
  12170. of the current stat matrix
  12171. (the reserved variable \\GSDAT).
  12172. --
  12173. <REF>TEXT:Reserved|\\GSDAT
  12174. --
  12175. Related: BARPLOT,BESTFIT,CORR,COV, EXPFIT,HISTPLOT,LINFIT,LOGFIT, LR,PREDX,PREDY,PWRFIT,SCATRPLOT,XCOL,YCOL
  12176. " "3E0FD" :Usr) "xSIGMACOL" ("x_col y_col \\->
  12177. " "Sigma Columns Cmd
  12178. --
  12179. Specifies the independent variable
  12180. and dependent-variable columns
  12181. of the current stat matrix
  12182. (the reserved variable \\GSDAT).
  12183. --
  12184. <REF>TEXT:Reserved|\\GSDAT
  12185. --
  12186. Related: BARPLOT,BESTFIT,CORR,COV, EXPFIT,HISTPLOT,LINFIT,LOGFIT, LR,PREDX,PREDY,PWRFIT,SCATRPLOT,XCOL,YCOL
  12187. " "3E0FD" :Usr) "xCOMB" ("n k \\-> Cn,k
  12188. " "Combinations Func
  12189. --
  12190. Returns the number of possible
  12191. combinations ofn items taken m
  12192. at a time.
  12193. --
  12194. n m \\-> Cn:m
  12195. 'symn' m \\-> 'COMB(symn,m)'
  12196. n 'symm' \\-> 'COMB(n,symm)'
  12197. 'symn' 'symm' \\-> 'COMB(symn,symm)'
  12198. --
  12199. Related: PERM,!
  12200. " "3B423" :Usr) "xCON" ("{ n } x \\-> []
  12201. { n k } x \\-> [[]]
  12202. [] x \\-> []'
  12203. " "Constant Array Cmd
  12204. --
  12205. Returns a constant array, defined
  12206. as an array whose elements all
  12207. have the same value.
  12208. --
  12209. {ncols} zcnst \\-> [[veccnst]]
  12210. {nrows mrows} zcnst \\-> [[matcnst]]
  12211. [R-arr] xcnst \\-> [R-arrcnst]
  12212. [C-arr] xcnst \\-> [C-arrcnst]
  12213. 'name' zcnst \\->
  12214. --
  12215. Related: IDN
  12216. " "3BF77" :Usr) "~xCOND" ("[[n*n]] \\-> x
  12217. " "Conditional Number Cmd
  12218. --
  12219. Returns the 1-norm (column norm)
  12220. condition number of a square
  12221. matrix.
  12222. --
  12223. Related: SNRM,SRAD,TRACE
  12224. " "0260AB" :Usr) "xCONIC" ("\\->
  12225. " "Conic Plot Type Cmd
  12226. --
  12227. Sets the plot type to CONIC.
  12228. --
  12229. Related: BAR,DIFFEQ,FUNCTION,GRIDMAP, HISTOGRAM,PARAMETRIC,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH,WIREFRAME,YSLICE
  12230. " "3C967" :Usr) "xCONJ" ("x \\-> x'
  12231. " "Conjugate Analytic Func
  12232. --
  12233. Conjugates a complex number or a
  12234. complex array.
  12235. --
  12236. x \\-> x
  12237. (x,y) \\-> (x,-y)
  12238. [ R-arr ] \\-> [ R-arr ]
  12239. [ C-arr ]1 \\-> [ C-arr ]2
  12240. 'sym' \\-> 'CONJ(sym)'
  12241. --
  12242. Flags: -3
  12243. --
  12244. Related: ABS,IM,RE,SCONJ,SIGN
  12245. " "39A6C" :Usr) "~xCONLIB" ("\\->
  12246. " "Open Constants Library Cmd
  12247. --
  12248. Opens the Constants Library.
  12249. --
  12250. Related: CONST
  12251. " "0180AB" :Usr) "~xCONST" ("name \\-> x
  12252. " "Constant Value Cmd
  12253. --
  12254. Returns the value of a constant.
  12255. --
  12256. Flags: +60 +61
  12257. --
  12258. Related: CONLIB
  12259. " "0190AB" :Usr) "~xCONSTANTS" ("
  12260. " "" "02A0DE" :Usr) "xCONT" ("\\->
  12261. " "Continue Program Execution Cmd
  12262. --
  12263. Resumes execution of a halted
  12264. program.
  12265. --
  12266. Related: HALT,KILL,PROMPT
  12267. " "3989C" :Usr) "xCONVERT" ("x1_u1 x2_u2 \\-> x3_u2
  12268. " "Convert Units Cmd
  12269. --
  12270. Converts a source unit object to
  12271. the dimensions of a target object
  12272. --
  12273. Related: UBASE,UFACT,\\->UNIT,UVAL
  12274. " "38F41" :Usr) "xCORR" ("\\-> x_correlation
  12275. " "Correlation Cmd
  12276. --
  12277. Returns the correlation coefficient
  12278. of the independent and
  12279. dependent data columns in the
  12280. current statistics matrix
  12281. (reserved variable \\GSDAT).
  12282. --
  12283. <REF>TEXT:Reserved|\\GSDAT
  12284. --
  12285. Related: COL\\GS,COV,PREDX,PREDY,XCOL,YCOL
  12286. " "3DE24" :Usr) "xCOS" ("x \\-> x'
  12287. " "Cos Func
  12288. --
  12289. Returns the cos of the argument.
  12290. --
  12291. z \\-> cos z
  12292. 'sym' \\-> 'COS(sym)'
  12293. x_uangular \\-> cos(x_uangular)
  12294. --
  12295. Flags: -3 -17 -18
  12296. --
  12297. Related: ACOS,SIN,TAN
  12298. " "3A5D0" :Usr) "xCOSH" ("x \\-> x'
  12299. " "Hyp Cos Func
  12300. --
  12301. Returns the hyp cos of the argument.
  12302. --
  12303. z \\-> cosh z
  12304. 'sym' \\-> 'COSH(sym)'
  12305. --
  12306. Flags: -3
  12307. --
  12308. Related: ACOSH,SINH,TANH
  12309. " "3A6C2" :Usr) "xCOV" ("\\-> x_covariance
  12310. " "Covariance Cmd
  12311. --
  12312. Returns the sample covariance of
  12313. the independent and dependent
  12314. data columns in the current stat
  12315. matrix (reserved variable \\GSDAT).
  12316. --
  12317. <REF>TEXT:Reserved|\\GSDAT
  12318. --
  12319. Related: COL\\GS,CORR,PCOV,PREDX,PREDY, XCOL,YCOL
  12320. " "3DE3F" :Usr) "xCR" ("\\->
  12321. " "Carriage Right Cmd
  12322. --
  12323. Prints the contents, if any, of
  12324. the printer buffer.
  12325. --
  12326. Flags: -37 -34 -33
  12327. --
  12328. Related: DELAY,OLDPRT,PRLCD,PRST,PRSTC, PRVAR,PR1
  12329. " "3D128" :Usr) "xCRDIR" ("name \\->
  12330. " "Create Directory Cmd
  12331. --
  12332. Creates an empty subdirectory
  12333. with the specified name within
  12334. the current directory.
  12335. --
  12336. Related: HOME,PATH,PGDIR,UPDIR
  12337. " "393CA" :Usr) "xCROSS" ("[1] [2] \\-> [3]
  12338. " "Cross Product Cmd
  12339. --
  12340. CROSS returns the cross product
  12341. [3] = [1] x [2] of vectors [1] and [2].
  12342. --
  12343. Related: CNRM,DET,DOT,RNRM
  12344. " "3B208" :Usr) "~xCSWP" ("[[]] n1 n2 \\-> [[]]'
  12345. [] n1 n2 \\-> []'
  12346. " "Column Swap Cmd
  12347. --
  12348. Swaps columns i and j of the argument
  12349. matrix and returns the modified
  12350. matrix, or swaps elements
  12351. ments i and j of the argument
  12352. vector and returns the modified
  12353. vector.
  12354. --
  12355. Related: COL+,COL-,RSWP
  12356. " "0410AB") "xC\\->PX" ("(x,y) \\-> {#n #m}
  12357. " "Complex to Pixel Cmd
  12358. --
  12359. Converts the specifiec user-unit
  12360. coordiates to pixel coordiates.
  12361. --
  12362. (x,y) \\-> { #n #m }
  12363. --
  12364. Related: PX\\->C
  12365. " "3C58E" :Usr) "xC>PX" ("(x,y) \\-> {#n #m}
  12366. " "Complex to Pixel Cmd
  12367. --
  12368. Converts the specifiec user-unit
  12369. coordiates to pixel coordiates.
  12370. --
  12371. (x,y) \\-> { #n #m }
  12372. --
  12373. Related: PX\\->C
  12374. " "3C58E" :Usr) "xC\\->R" ("(x,y) \\-> x y
  12375. [C] \\-> [R] [I]
  12376. " "Complex to Real Cmd
  12377. --
  12378. Separates the real and imaginary
  12379. parts of a complex number or
  12380. complex array.
  12381. --
  12382. Related: R\\->C,RE,IM
  12383. " "3BAF5" :Usr) "xC>R" ("(x,y) \\-> x y
  12384. [C] \\-> [R] [I]
  12385. " "Complex to Real Cmd
  12386. --
  12387. Separates the real and imaginary
  12388. parts of a complex number or
  12389. complex array.
  12390. --
  12391. Related: R\\->C,RE,IM
  12392. " "3BAF5" :Usr) "~xCURL" ("[func] [vars] \\-> []
  12393. " "" "057314" :CASHELP :Usr) "~xCYCLOTOMIC" ("
  12394. " "" "0150DE" :Usr) "~xCYLIN" ("\\->
  12395. " "Cylindrical Mode Cmd
  12396. --
  12397. Sets Cylindrical coordinate mode.
  12398. --
  12399. Related: RECT,SPHERE
  12400. " "0120AB" :Usr) "~xDARCY" ("xe/D yRe \\-> xDarcy
  12401. " "Darcy Friction Factor Func
  12402. --
  12403. Calculates the Darcy friction
  12404. factor of certain fluid flows.
  12405. --
  12406. Related: FANNING
  12407. " "0610AB" :Usr) "xDATE" ("\\-> date
  12408. " "Returns the system date.
  12409. --
  12410. Related: DATE+,DDAYS,TIME,TSTR
  12411. " "39078" :Usr) "x\\->DATE" ("date \\->
  12412. " "Set Date Cmd
  12413. --
  12414. Sets the system date to date.
  12415. --
  12416. Related: \\->TIME
  12417. " "39104" :Usr) "xSETDATE" ("date \\->
  12418. " "Set Date Cmd
  12419. --
  12420. Sets the system date to date.
  12421. --
  12422. Related: \\->TIME
  12423. " "39104" :Usr) "xDATE+" ("date ndays \\-> date'
  12424. " "Date Addition Cmd
  12425. --
  12426. Returns a past or future date,
  12427. given a date in level 2 and a
  12428. nmber of days in level 1.
  12429. --
  12430. Flags: -42
  12431. --
  12432. Related: DATE,DDAYS
  12433. " "39238" :Usr) "~xdB" ("\\-> %1
  12434. " "" "0690AB" :Usr) "~xDBUG" ("prog \\->
  12435. name \\->
  12436. " "Debug Operation
  12437. --
  12438. Starts program execution, then
  12439. suspends it as if HALT were the
  12440. first program command.
  12441. --
  12442. Related: HALT,NEXT
  12443. " "0150DD" :Usr) "xDDAYS" ("date1 date2 \\-> days
  12444. " "Delta Days Cmd
  12445. --
  12446. Returns the number of days
  12447. between two dates.
  12448. --
  12449. Related: DATE,DATE+
  12450. " "39218" :Usr) "xDEC" ("\\->
  12451. " "Decimal Mode Cmd
  12452. --
  12453. Selects decimal base for binary
  12454. integer operations. (The default
  12455. base is decimal.)
  12456. --
  12457. Related: BIN,HEX,OCT,RCWS,STWS
  12458. " "3B670" :Usr) "xDECR" ("name \\-> x_new
  12459. " "Decrement Cmd
  12460. --
  12461. Takes a variable on level 1,
  12462. subtracts 1, stores the new value
  12463. back into the original variable,
  12464. and returns the new value to
  12465. level 1.
  12466. --
  12467. Related: INCR,STO+,STO-
  12468. " "3E576" :Usr) "~xDEDICACE" ("
  12469. " "Dedication message.
  12470. " "0370DE" :Usr) "~xDEF" ("
  12471. " "" "0250DE" :Usr) "xDEFINE" ("'name=expr' \\->
  12472. 'name(name1...)=expr(name1...) \\->
  12473. " "Define Variable or Func Cmd
  12474. --
  12475. Stores the expression on the
  12476. right side of the = in the variable
  12477. specified on the left side,
  12478. or creates a user-defined function
  12479. --
  12480. Related: STO
  12481. " "3E85C" :Usr) "xDEG" ("\\->
  12482. " "Degrees Cmd
  12483. --
  12484. Sets Degrees angle mode.
  12485. --
  12486. Related: GRAD,RAD
  12487. " "3B549" :Usr) "~xDEGREE" ("
  12488. " "" "0360DE" :Usr) "xDELALARM" ("n \\->
  12489. " "Delete Alarm Cmd
  12490. --
  12491. Deletes the alarm specified in
  12492. level 1.
  12493. --
  12494. Related: FINDALARM,RCLALARM,STOALARM
  12495. " "391D8" :Usr) "xDELAY" ("x_delay \\->
  12496. " "Delay Cmd
  12497. --
  12498. Specifies how many seconds the
  12499. HP 48 waits between sending lines
  12500. of information to the printer.
  12501. --
  12502. Related: CR,OLDPRT,PRLCD,PRST,PRSTC,PRVAR,PR1
  12503. " "3D1C7" :Usr) "xDEPND" ("name \\->
  12504. {name} \\->
  12505. {name y1 y2} \\->
  12506. {y1 y2} \\->
  12507. y1 y2 \\->
  12508. " "Dependent Variable Cmd
  12509. --
  12510. Species the dependent variable
  12511. (and its plotting range for TRUTH
  12512. plots).
  12513. --
  12514. Related: INDEP
  12515. " "3C51F" :Usr) "xDEPTH" ("\\-> n
  12516. " "Depth Cmd
  12517. --
  12518. Returns a real number representing
  12519. the number of objects present
  12520. on the stack (before DEPTH was
  12521. executed).
  12522. " "3DCA7" :Usr) "~xDERIV" ("symb var \\-> symb'
  12523. " "" "00E314" :CASHELP :Usr) "~xDERVX" ("symb \\-> symb'
  12524. " "" "003314" :CASHELP :Usr) "~xDESOLVE" ("eq func \\-> func'
  12525. " "" "00F314" :CASHELP :Usr) "xDET" ("[[]] \\-> x
  12526. " "Determinant Func
  12527. --
  12528. Returns the determinant of a
  12529. square matrix.
  12530. --
  12531. Related: CNRM,CROSS,DOT,RNRM
  12532. " "3B1BA" :Usr) "xDETACH" ("n \\->
  12533. :port:n \\->
  12534. " "Detach Library Cmd
  12535. --
  12536. Detaches the library with the
  12537. specified number from the current
  12538. directory. Each library has a
  12539. unique number. If a port number
  12540. is specified, it is ignored.
  12541. --
  12542. Related: ATTACH,LIBS,PURGE
  12543. " "3EB84" :Usr) "~x\\->DIAG" ("[[]] \\-> vec
  12544. " "Matrix Diagonal to Array Cmd
  12545. --
  12546. Returns a vector that contains
  12547. the major diagonal elements of a
  12548. matrix.
  12549. --
  12550. Related: DIAG\\->
  12551. " "03A0AB" :Usr) "~xDIAG\\->" ("[] { dims } \\-> [[]]
  12552. " "Array to Matrix Diagonal Cmd
  12553. --
  12554. Takes an array and a specified
  12555. dimension and returns a matrix
  12556. whose major diagonal elements are
  12557. the elements of the array.
  12558. --
  12559. Related: \\->DIAG
  12560. " "03B0AB" :Usr) "~xDIAGMAP" ("
  12561. " "" "00C0DE" :Usr) "~xDIFF" ("\\->
  12562. " "Display a menu of calculus commands.
  12563. --
  12564. Related: ARIT,BASE,CMPLX,EXP&LN,SOLVER,TRIGO
  12565. " "084314" :Usr) "~xDIFFEQ" ("\\->
  12566. " "Differential Eqn Plot Type Cmd
  12567. --
  12568. Sets the plot type to DIFFEQ.
  12569. --
  12570. Related: AXES,CONIC,FUNCTION,PARAMETRIC, POLAR,RKFSTEP,RRKSTEP,TRUTH
  12571. " "00E0AB" :Usr) "xDIR" ("
  12572. " "" "38BAE" :Usr) "xDISP" ("obj n_line \\->
  12573. " "Display Cmd
  12574. --
  12575. Displays obj in the nth display
  12576. line.
  12577. --
  12578. Related: FREEZE,HALT,INPUT,PROMPT
  12579. " "39725" :Usr) "~xDISPXY" ("ob {#x #y} %size \\->
  12580. " "Display ob (decompiled if nexessary) at the
  12581. given display coordinates, using either the
  12582. system font (%size=2) or the minifont
  12583. (%size=1).
  12584. " "0160DD" :Usr :1\.19-6) "~xDISTRIB" ("
  12585. " "" "0190DE" :Usr) "~xDIV" ("[func] [vars] \\-> func
  12586. " "" "056314" :CASHELP :Usr) "~xDIV2" ("symb1 symb2 \\-> squot srem
  12587. " "" "026314" :CASHELP :Usr) "~xDIV2MOD" ("symb1 symb2 \\-> squot srem
  12588. " "" "072314" :CASHELP :Usr) "~xDIVIS" ("symb \\-> {}
  12589. " "" "044314" :CASHELP :Usr) "~xDIVMOD" ("symb1 symb2 \\-> sq
  12590. " "" "071314" :CASHELP :Usr) "~xDIVPC" ("symb1 symb2 n \\-> symb3
  12591. " "" "062314" :CASHELP :Usr) "xDO" ("\\->
  12592. " "DO Indefinite Loop Structure Cmd
  12593. --
  12594. Starts DO ... UNTIL ... END
  12595. indefinite loop structure.
  12596. --
  12597. DO \\->
  12598. UNTIL \\->
  12599. END T/F \\->
  12600. --
  12601. Related: END,UNTIL,WHILE
  12602. " "3816B" :Usr) "xDOERR" ("n \\->
  12603. #n \\->
  12604. $ \\->
  12605. 0 \\->
  12606. " "Do Error Cmd
  12607. --
  12608. Executes a \"user-specified\"
  12609. error, causing a program to behave
  12610. exactly as if a normal error
  12611. had occurred during program execution.
  12612. --
  12613. Related: ERRM,ERRN,ERR0
  12614. " "39527" :Usr) "~xDOLIST" ("{1}...{n} n prog \\-> {}
  12615. {1}...{n} prog \\-> {} (n=1)
  12616. " "Do to List Cmd
  12617. --
  12618. Applies commands, programs, or
  12619. user-defined functions to lists.
  12620. --
  12621. {lst}1 ...{lst}n n \\<<prog\\>> \\-> {res}
  12622. {lst}1 ...{lst}n n cmd \\-> {res}
  12623. {lst}1 ...{lst}n n name \\-> {res}
  12624. {lst}1 ...{lst}n \\<<prog\\>> \\-> {res}
  12625. {lst}1 ...{lst}n cmd \\-> {res}
  12626. {lst}1 ...{lst}n name \\-> {res}
  12627. --
  12628. Related: DOSUBS,ENDSUB,NSUB,STREAM
  12629. " "05B0AB" :Usr) "~xDOMAIN" ("
  12630. " "" "0210DE" :Usr) "~xDOSUBS" ("{} n prog \\-> {}'
  12631. {} prog \\-> {}' (n=1)
  12632. " "Do to Sublist Cmd
  12633. --
  12634. Applies a program or command to
  12635. groups of elements in a list.
  12636. --
  12637. {list}1 n \\<<prog\\>> \\-> {list}2
  12638. {list}1 n command \\-> {list}2
  12639. {list}1 n name \\-> {list}2
  12640. {list}1 \\<<prog\\>> \\-> {list}2
  12641. {list}1 command \\-> {list}2
  12642. {list}1 name \\-> {list}2
  12643. --
  12644. Related: DOLIST,ENDSUB,NSUB,STREAM
  12645. " "0540AB" :Usr) "xDOT" ("[1] [2] \\-> x
  12646. " "Dot Product Cmd
  12647. --
  12648. Returns the dot product AoB of
  12649. two arrays A and B, calculated
  12650. as the sum of the products of the
  12651. corresponding elements of the two
  12652. arrays.
  12653. --
  12654. Related: CNRM,CROSS,DET,RNRM
  12655. " "3B1E1" :Usr) "xDRAW" ("\\->
  12656. " "Draw Plot Cmd
  12657. --
  12658. Plots the mathematical data in
  12659. the reserved variable EQ or the
  12660. statistical data in the reserved
  12661. variable \\GSDAT, using the
  12662. specified x- and y-axis display
  12663. ranges.
  12664. --
  12665. <REF>TEXT:Reserved|EQ
  12666. --
  12667. Related: AUTO,AXES,DRAX,ERASE,FREEZE, PICTURE,LABEL,PVIEW
  12668. " "3C484" :Usr) "~xDRAW3DMATRIX" ("[[]] v_min v_max \\->
  12669. " " --
  12670. Related: FAST3D
  12671. " "06B0AB" :Usr) "xDRAX" ("\\->
  12672. " "Draw Axes Cmd
  12673. --
  12674. Draws axes in PICT.
  12675. --
  12676. Related: AXES,DRAW,LABEL
  12677. " "3C4BA" :Usr) "~xDROITE" ("
  12678. " "" "0230DE" :Usr) "xDROP" ("ob \\->
  12679. " "Drop Object Cmd
  12680. --
  12681. Removes the level 1 object from
  12682. the stack.
  12683. --
  12684. Related: CLEAR,DROPN,DROP2
  12685. " "3DC3B" :Usr) "xDROP2" ("ob1 ob2 \\->
  12686. " "Drop 2 Objects Cmd
  12687. --
  12688. Removes the first two objects
  12689. from the stack.
  12690. --
  12691. Related: CLEAR,DROP,DROPN
  12692. " "3DC56" :Usr) "xDROPN" ("ob1...obn n \\->
  12693. " "Drop n Objects Cmd
  12694. --
  12695. Removes the first n + 1 objects
  12696. from the stack (the first n objects
  12697. excluding the integer n itself).
  12698. --
  12699. Related: CLEAR,DROP,DROP2
  12700. " "3DCC7" :Usr) "xDTAG" ("tag:obj \\-> obj
  12701. " "Delete Tag Cmd
  12702. --
  12703. DTAG removes all tags (labels)
  12704. from an object.
  12705. --
  12706. Related: LIST\\->,\\->TAG
  12707. " "3EFEF" :Usr) "xDUP" ("ob \\-> ob ob
  12708. " "Duplicate Object Cmd
  12709. --
  12710. DUP returns a copy to level 1 of
  12711. the object in level 1.
  12712. --
  12713. Related: DUPN,DUP2,PICK
  12714. " "3DBEA" :Usr) "xDUP2" ("1 2 \\-> 1 2 1 2
  12715. " "Duplicate 2 Objects Cmd
  12716. --
  12717. DUP2 returns copies of the objects
  12718. in levels 1 and 2 of the stack.
  12719. --
  12720. Related: DUP,DUPN,PICK
  12721. " "3DC05" :Usr) "xDUPDUP" ("1 \\-> 1 1
  12722. " "Duplicate 2 Objects Cmd
  12723. --
  12724. DUP2 returns copies of the objects
  12725. in levels 1 and 2 of the stack.
  12726. --
  12727. Related: DUP,DUPN,NDUPN,DUP2
  12728. " "3F29A" :Usr) "xDUPN" ("1...n n \\-> 1...n 1...n
  12729. " "Duplicate n Objects Cmd
  12730. --
  12731. Takes an integer n from level 1
  12732. of the stack, and returns copies
  12733. of the objects in stack levels
  12734. 2n through n + 1.
  12735. --
  12736. Related: DUP,DUP2,PICK
  12737. " "3DCE2" :Usr) "xD\\->R" ("x \\-> (\\pi/180)x
  12738. " "Degrees to Radians Func
  12739. --
  12740. Converts a real number representing
  12741. an angle in degrees to its
  12742. equivalent in radians.
  12743. --
  12744. x \\-> (\\pi/180) x
  12745. 'sym' \\-> 'D\\->R(sym)'
  12746. --
  12747. Related: R\\->D
  12748. " "3B06E" :Usr) "xD>R" ("x \\-> (\\pi/180)x
  12749. " "Degrees to Radians Func
  12750. --
  12751. Converts a real number representing
  12752. an angle in degrees to its
  12753. equivalent in radians.
  12754. --
  12755. x \\-> (\\pi/180) x
  12756. 'sym' \\-> 'D\\->R(sym)'
  12757. --
  12758. Related: R\\->D
  12759. " "3B06E" :Usr) "~xEDIT" ("ob \\-> ob'
  12760. " "Move object to command line to edit it.
  12761. --
  12762. Related: VISIT,EDITB,VISITB
  12763. " "0070DD" :Usr) "~xEDITB" ("ob \\-> ob'
  12764. " "Open the most suitable editor for object.
  12765. For example, for a matrix, the matrix editor
  12766. is opened.
  12767. --
  12768. Related: VISIT,VISITB,EDIT
  12769. " "0090DD" :Usr) "xe" ("\\-> e
  12770. " "e Func
  12771. --
  12772. Returns the symbolic constant e
  12773. or its numerical representation,
  12774. 2.71828182846.
  12775. --
  12776. Related: EXP,EXPM,i,LN,LNP1,MAXR,MINR,\\pi
  12777. " "39B1E" :Usr) "xCONSTANTe" ("\\-> e
  12778. " "e Func
  12779. --
  12780. Returns the symbolic constant e
  12781. or its numerical representation,
  12782. 2.71828182846.
  12783. --
  12784. Related: EXP,EXPM,i,LN,LNP1,MAXR,MINR,\\pi
  12785. " "39B1E" :Usr) "~xEGCD" ("symb1 symb2 \\-> symb3 symb4 symb5
  12786. " "" "02E314" :CASHELP :Usr) "~xEGV" ("[[]] \\-> [[evect]]' [evals]
  12787. " "Eigenvalues and Eigenvectors Command
  12788. --
  12789. Computes the eigenvalues and right
  12790. eigenvectors for a square matrix.
  12791. --
  12792. Related: EGVL
  12793. " "02C0AB" :Usr) "~xEGVL" ("[[]] \\-> [egval]
  12794. " "Eigenvalues Cmd
  12795. --
  12796. Computes the eigenvalues of a
  12797. square matrix.
  12798. --
  12799. Related: EGV
  12800. " "02D0AB" :Usr) "xELSE" ("\\->
  12801. " "ELSE Cmd
  12802. --
  12803. Starts false clause in conditional
  12804. or error-trapping structure.
  12805. See the IF and IFERR keyword
  12806. entries for syntax information.
  12807. --
  12808. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12809. " "3805D" :Usr) "xEND" ("1/0 \\->
  12810. " "END Cmd
  12811. --
  12812. Ends conditional, error-trapping,
  12813. and indefinite loop structures.
  12814. See the IF, CASE, IFERR, DO, and
  12815. WHILE keyword entries for syntax
  12816. information.
  12817. --
  12818. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12819. " "38A54" :Usr) "xENDDO" ("1/0 \\->
  12820. " "END Cmd
  12821. --
  12822. Ends conditional, error-trapping,
  12823. and indefinite loop structures.
  12824. See the IF, CASE, IFERR, DO, and
  12825. WHILE keyword entries for syntax
  12826. information.
  12827. --
  12828. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12829. " "38A54" :Usr) "xEND" ("
  12830. " "END Cmd
  12831. --
  12832. Ends conditional, error-trapping,
  12833. and indefinite loop structures.
  12834. --
  12835. See the IF, CASE, IFERR, DO, and
  12836. WHILE keyword entries for syntax
  12837. information.
  12838. --
  12839. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12840. " "3807D" :Usr) "xIFEND" ("
  12841. " "END Cmd
  12842. --
  12843. Ends conditional, error-trapping,
  12844. and indefinite loop structures.
  12845. --
  12846. See the IF, CASE, IFERR, DO, and
  12847. WHILE keyword entries for syntax
  12848. information.
  12849. --
  12850. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12851. " "3807D" :Usr) "xEND" ("
  12852. " "END Cmd
  12853. --
  12854. Ends conditional, error-trapping,
  12855. and indefinite loop structures.
  12856. --
  12857. See the IF, CASE, IFERR, DO, and
  12858. WHILE keyword entries for syntax
  12859. information.
  12860. --
  12861. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12862. " "38A2F" :Usr) "xWHILEEND" ("
  12863. " "END Cmd
  12864. --
  12865. Ends conditional, error-trapping,
  12866. and indefinite loop structures.
  12867. --
  12868. See the IF, CASE, IFERR, DO, and
  12869. WHILE keyword entries for syntax
  12870. information.
  12871. --
  12872. Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE
  12873. " "38A2F" :Usr) "~xENDSUB" ("\\-> x
  12874. " "Ending Sublist Cmd
  12875. --
  12876. Provides a way to access the
  12877. total number of sublists contained
  12878. in the list used by DOSUBS.
  12879. --
  12880. Related: DOSUBS,NSUB
  12881. " "0570AB" :Usr) "xENG" ("n \\->
  12882. " "Engineering Mode Cmd
  12883. --
  12884. Sets the number display format to
  12885. Engineering mode, which displays
  12886. one to three digits to the left
  12887. of the fraction mark (decimal
  12888. point) and an exponent that is a
  12889. multiple of three. The total
  12890. number of significant digits
  12891. displayed is n + 1.
  12892. --
  12893. Related: FIX,SCI,STD
  12894. " "3B5DA" :Usr) "~xEPSX0" ("symb1 \\-> symb2
  12895. " "" "088314" :CASHELP :Usr) "~xEQW" ("symb \\-> symb'
  12896. " "Open Equation Writer to edit an object.
  12897. If the object is not symbolic, the object
  12898. is placed into the command line.
  12899. --
  12900. Related: EDIT,EDITB,VISIT,VISITB
  12901. " "00B0DD" :Usr) "xEQ\\->" ("'l=r' \\-> l r
  12902. " "Equation to Stack Cmd
  12903. --
  12904. Separates an equation into its
  12905. left and right sides.
  12906. --
  12907. 'sym1=sym2' \\-> 'sym1' 'sym2'
  12908. z \\-> z 0
  12909. 'name' \\-> 'name' 0
  12910. x_u \\-> x_u 0
  12911. 'sym' \\-> 'sym' 0
  12912. --
  12913. Related: ARRY\\->,DTAG,LIST\\->,OBJ\\->,STR\\->
  12914. " "3BDE6" :Usr) "xEQ>" ("'l=r' \\-> l r
  12915. " "Equation to Stack Cmd
  12916. --
  12917. Separates an equation into its
  12918. left and right sides.
  12919. --
  12920. 'sym1=sym2' \\-> 'sym1' 'sym2'
  12921. z \\-> z 0
  12922. 'name' \\-> 'name' 0
  12923. x_u \\-> x_u 0
  12924. 'sym' \\-> 'sym' 0
  12925. --
  12926. Related: ARRY\\->,DTAG,LIST\\->,OBJ\\->,STR\\->
  12927. " "3BDE6" :Usr) "xERASE" ("\\->
  12928. " "Erase PICT Cmd
  12929. --
  12930. Erases PICT, leaving a blank PICT
  12931. of the same dimensions.
  12932. --
  12933. Related: DRAW
  12934. " "3C553" :Usr) "xERR0" ("\\->
  12935. " "Clear Last Error Number Cmd
  12936. --
  12937. Clears the last error number so
  12938. that a subsequent execution of
  12939. ERRN returns # 0h, and clears the
  12940. last error message.
  12941. --
  12942. Related: DOERR,ERRM,ERRN
  12943. " "3955B" :Usr) "xERRM" ("\\-> $msg
  12944. " "Error Message Cmd
  12945. --
  12946. Returns a string containing the
  12947. error message of the most recent
  12948. calculator error.
  12949. --
  12950. Related: DOERR,ERRN,ERR0
  12951. " "39591" :Usr) "xERRN" ("\\-> $nerr
  12952. " "Error Number Cmd
  12953. --
  12954. Returns the error number of the
  12955. most recent calculator error.
  12956. --
  12957. Related: DOERR,ERRM,ERR0
  12958. " "39576" :Usr) "~xEULER" ("z1 \\-> z2
  12959. " "" "038314" :Usr) "xEVAL" ("ob \\-> ?
  12960. " "Evaluate Object Cmd
  12961. --
  12962. Evaluates the object.
  12963. --
  12964. obj \\-> (see below)
  12965. Obj. Type Effects of Evaluation
  12966. Local Name Recalls the contents
  12967. of the variable.
  12968. Global Name Calls the contents of
  12969. the variable:
  12970. A name is evaluated.
  12971. A program is evaluated.
  12972. A directory becomes the current
  12973. directory.
  12974. Other objects are put on the
  12975. stack.
  12976. If no variable exists for a given
  12977. name, evaluating the name returns
  12978. the name to the stack.
  12979. Program. Enters each object in
  12980. the program:
  12981. Names are evaluated (unless quoted).
  12982. ed).
  12983. Cmds are evaluated.
  12984. Other objects are put on the
  12985. stack.
  12986. List Enters each object in the
  12987. list:
  12988. Names are evaluated.
  12989. Cmds are evaluated.
  12990. Programs are evaluated.
  12991. Other objects are put on the
  12992. stack.
  12993. Tagged If the tag specifies a
  12994. port, recalls and evaluates the
  12995. specified object. Otherwise, puts
  12996. the untagged object on the stack.
  12997. Algebraic Enters each object in
  12998. the algebraic expression:
  12999. Names are evaluated.
  13000. Cmds are evaluated.
  13001. Other objects are put on the
  13002. stack.
  13003. Cmd,
  13004. Func, XLIB
  13005. Name Evaluates the specified object.
  13006. Other Objects Puts the object on
  13007. the stack.
  13008. --
  13009. Related: \\->NUM,SYSEVAL
  13010. " "395AC" :Usr) "xEXP" ("x \\-> x'
  13011. " "Exponential Analytic Func
  13012. --
  13013. Returns the exponential, or
  13014. natural antilogarithm, of the
  13015. argument; that is, e raised to
  13016. the given power.
  13017. --
  13018. z \\-> ez
  13019. 'sym' \\-> 'EXP(sym)'
  13020. --
  13021. Related: ALOG,EXPM,LN,LOG
  13022. " "3A9B7" :Usr) "~xEXLR" ("symb \\-> symb1 symb2
  13023. " "" "06C314" :Usr) "~xEXP2POW" ("
  13024. " "" "01A0DE" :Usr) "xEXPAN" ("symb1 \\-> symb2
  13025. " "Expand Products Cmd
  13026. --
  13027. Rewrites an algebraic expression
  13028. or equation by expanding products
  13029. and powers.
  13030. --
  13031. Related: COLCT,EXPAND,ISOL,QUAD,SHOW
  13032. " "3E5E9" :CASHELP :Usr) "~xEXPAND" ("symb1 \\-> symb2
  13033. [symb1] \\-> [symb2]
  13034. " "Expand Products Cmd
  13035. --
  13036. Rewrites an algebraic expression
  13037. or equation by expanding products
  13038. and powers.
  13039. " "000314" :CASHELP :Usr) "~xEXPANDMOD" ("symb1 \\-> symb2
  13040. " "" "076314" :CASHELP :Usr) "xEXPFIT" ("\\->
  13041. " "Exponential Curve Fit Cmd
  13042. --
  13043. Stores EXPFIT as the fifth parameter
  13044. in the reserved variable
  13045. \\GSPAR, indicating that subsequent
  13046. executions of LR are to use the
  13047. exponential curve futting model.
  13048. --
  13049. <REF>TEXT:Reserved|\\GSPAR
  13050. --
  13051. Related: BESTFIT,LR,LINFIT,LOGFIT,PWRFIT
  13052. " "3E25E" :Usr) "~xEXP&LN" ("
  13053. " "" "087314" :Usr) "~xEXPLN" ("symb1 \\-> symb2
  13054. " "" "017314" :CASHELP :Usr) "xEXPM" ("x \\-> x'
  13055. " "Exponential Minus 1 Analytic Func
  13056. --
  13057. Returns e^x - 1.
  13058. --
  13059. x \\-> e^x - 1
  13060. 'sym' \\-> 'EXPM(sym)'
  13061. --
  13062. Related: EXP,LNP1
  13063. " "3AB6F" :Usr) "~xEYEPT" ("xx xy xz \\->
  13064. " "Eye point command.
  13065. --
  13066. Specifies the coordinates of the eye
  13067. point in a perspective plot. The y
  13068. coordinate must be 1 unit less than
  13069. the volume's nearest point. These
  13070. values are stored in reserved variable
  13071. VPAR.
  13072. --
  13073. <REF>TEXT:Reserved|VPAR
  13074. --
  13075. Related: NUMX,NUMY,XVOL,XXRNG,YVOL, YYRNG,ZVOL
  13076. " "0050AB" :Usr) "~xF0\\Gl" ("y_lambda xT \\-> x_power
  13077. " "Black Body Emissive Power Func
  13078. --
  13079. Returns the fraction of total
  13080. black-body emissive power.
  13081. " "0620AB" :Usr) "~xFACTOR" ("symb \\-> symb1*symb2...
  13082. z \\-> z1*z2...
  13083. " "" "001314" :CASHELP :Usr) "~xFACTORMOD" ("symb \\-> symb1*symb2...
  13084. " "" "077314" :CASHELP :Usr) "~xFACTORS" ("z \\-> {z1 m1...}
  13085. symb \\-> {symb1 m1...}
  13086. " "" "043314" :CASHELP :Usr) "~xFANNING" ("x_x/D y_Re \\-> x_fanning
  13087. " "Fanning Friction Factor Func
  13088. --
  13089. Calculates the Fanning friction
  13090. factor of certain fluid flows.
  13091. --
  13092. xx/D yRe \\-> xfanning
  13093. xx/D 'sym' \\-> 'FANNING(xx/D,sym)'
  13094. 'sym' yRe \\-> 'FANNING(sym,yRe)'
  13095. 'sym1' 'sym2'\\-> 'FANNING(sym1,sym2)'
  13096. --
  13097. Related: DARCY
  13098. " "0600AB" :Usr) "xFAST3D" ("\\->
  13099. " "Fast 3D plot type command
  13100. --
  13101. Set the plot type to FAST3D.
  13102. --
  13103. Related: BAR,CONIC,DIFFEQ,FUNCTION,GRIDMAP, HISTOGRAM,PARAMETRIC,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH,WIREFRAME,YSLICE
  13104. " "3F2DF" :Usr) "xFC?" ("n \\-> 0/1
  13105. " "Flag Clear? Cmd
  13106. --
  13107. Tests whether the system or user
  13108. flag specified by nflag number is
  13109. clear, and returns a corresponding
  13110. test result: 1 (true) if the
  13111. flag is clear or 0 (false) if the
  13112. flag is set.
  13113. --
  13114. Related: CF,FC?C,FS?,FS?C,SF
  13115. " "3B529" :Usr) "xFC?C" ("n \\-> 0/1
  13116. " "Flag Clear? Clear Cmd
  13117. --
  13118. Tests whether the system or user
  13119. flag specified by nflag number is
  13120. clear, and returns a corresponding
  13121. test result: 1 (true) if the
  13122. flag is clear or 0 (false) if the
  13123. flag is set. After testing,
  13124. clears the flag.
  13125. --
  13126. Related: CF,FC?,FS?,FS?C,SF
  13127. " "3B635" :Usr) "~xFCOEF" ("[] \\-> symb
  13128. " "" "041314" :CASHELP :Usr) "~xFDISTRIB" ("
  13129. " "" "0180DE" :Usr) "~xFFT" ("[] \\-> []'
  13130. " "Discrete Fourier Transform Cmd
  13131. --
  13132. Computes the 1- or 2-dimensional
  13133. discrete Fourier transform of an
  13134. array.
  13135. --
  13136. Related: IFFT
  13137. " "01A0AB" :Usr) "~xFILER" ("\\->
  13138. " "" "00C0DD" :Usr) "xFINDALARM" ("date \\-> n
  13139. {date time} \\-> n
  13140. 0 \\-> n
  13141. " "Find Alarm Cmd
  13142. --
  13143. Returns the alarm index nindex of
  13144. the first alarm due after the
  13145. specified time.
  13146. --
  13147. Related: DELALARM,RCLALARM,STOALARM
  13148. " "391AE" :Usr) "xFINISH" ("\\->
  13149. " "Finish Server Mode Cmd
  13150. --
  13151. Terminates Kermit Server mode in
  13152. a device connected to an HP 48.
  13153. --
  13154. Related: BAUD,CKSM,KGET,PARITY,PKT, RECN,RECV,SEND,SERVER
  13155. " "3ED76" :Usr) "xFIX" ("n \\->
  13156. " "Fix Mode Cmd
  13157. --
  13158. Sets the number display format to
  13159. Fix mode, which rounds the display
  13160. to n display places.
  13161. --
  13162. Related: SCI,STD,ENG
  13163. " "3B59A" :Usr) "~xFLASHEVAL" ("# \\-> ?
  13164. " "Evaluate flash command
  13165. --
  13166. Evaluates unnamed flash functions.
  13167. The number is of the form ffffbbbh,
  13168. where bbb is the bank ID and ffff is
  13169. the function number.
  13170. --
  13171. Related: EVAL,LIBEVAL,SYSEVAL
  13172. " "0170AB" :Usr) "xFLOOR" ("x \\-> n
  13173. " "Floor Func
  13174. --
  13175. Returns the greatest integer that
  13176. is less than or equal to the argument.
  13177. --
  13178. x \\-> n
  13179. x_u \\-> n_u
  13180. 'sym' \\-> 'FLOOR(sym)'
  13181. --
  13182. Related: CEIL,IP,RND,TRNC
  13183. " "3ACD1" :Usr) "~xFONT6" ("\\-> font
  13184. " "Returns the system FONT6 object.
  13185. --
  13186. Related: FONT7,FONT8,\\->FONT,FONT\\->
  13187. " "00F0DD" :Usr) "~xFONT7" ("\\-> font
  13188. " "Returns the system FONT7 object.
  13189. --
  13190. Related: FONT6,FONT8,\\->FONT,FONT\\->
  13191. " "00E0DD" :Usr) "~xFONT8" ("\\-> font
  13192. " "Returns the system FONT8 object.
  13193. --
  13194. Related: FONT6,FONT7,\\->FONT,FONT\\->
  13195. " "00D0DD" :Usr) "~xFONT\\->" ("\\-> font
  13196. " "Returns the current system font.
  13197. --
  13198. Related: FONT6,FONT7,FONT8,\\->FONT
  13199. " "0030DD" :Usr) "~x\\->FONT" ("font \\->
  13200. " "Set font function.
  13201. --
  13202. Sets the system font.
  13203. --
  13204. Related: FONT6,FONT7,FONT8,FONT\\->
  13205. " "0020DD" :Usr) "xFOR" ("start finish \\->
  13206. " "FOR Definite Loop Structure Cmd
  13207. --
  13208. Starts
  13209. FOR ... NEXT and
  13210. FOR ... STEP
  13211. definite loop structures.
  13212. --
  13213. FOR xstart xfinish \\->
  13214. NEXT \\->
  13215. FOR xstart xfinish \\->
  13216. STEP xincrement \\->
  13217. STEP 'symincrement' \\->
  13218. --
  13219. Related: NEXT,START,STEP
  13220. " "38252" :Usr) "xSTARTVAR" ("start finish \\->
  13221. " "FOR Definite Loop Structure Cmd
  13222. --
  13223. Starts
  13224. FOR ... NEXT and
  13225. FOR ... STEP
  13226. definite loop structures.
  13227. --
  13228. FOR xstart xfinish \\->
  13229. NEXT \\->
  13230. FOR xstart xfinish \\->
  13231. STEP xincrement \\->
  13232. STEP 'symincrement' \\->
  13233. --
  13234. Related: NEXT,START,STEP
  13235. " "38252" :Usr) "~xFOURIER" ("symb z \\-> c_z
  13236. " "" "05E314" :CASHELP :Usr) "xFP" ("x \\-> x'
  13237. " "Fractional part Func
  13238. --
  13239. Returns the fractional part of an
  13240. argument.
  13241. --
  13242. x \\-> y
  13243. x_u \\-> y_u
  13244. 'sym' \\-> 'FP(sym)'
  13245. --
  13246. Related: IP
  13247. " "3AC87" :Usr) "xFREE" ("
  13248. " "Not useful on the 49G.
  13249. Free RAM Card Cmd
  13250. --
  13251. Frees (makes independent) the
  13252. previously merged RAM in port 1.
  13253. FREE is provided for compatibility
  13254. with the HP 48SX, which could
  13255. merge RAM in port 2 as well. See
  13256. FREE1.
  13257. --
  13258. { } nport \\->
  13259. { namebackup ... nlib } nport \\->
  13260. namebackup nport \\->
  13261. nlib nport \\->
  13262. " "3EB2C" :Usr) "xFREEZE" ("n \\->
  13263. " "Freeze Display Cmd
  13264. --
  13265. Freezes the part of the display
  13266. specified by ndisplay area, so
  13267. that it is not updated until a
  13268. key is pressed.
  13269. --
  13270. Related: CLLCD,DISP,HALT
  13271. " "39745" :Usr) "~xFROOTS" ("symb \\-> []
  13272. " "" "042314" :CASHELP :Usr) "xFS?C" ("n \\-> 0/1
  13273. " "Flag Set? Clear Cmd
  13274. --
  13275. Tests whether the system or user
  13276. flag specified by nflag number is
  13277. clear, and returns a corresponding
  13278. test result: 1 (true) if the
  13279. flag is set or 0 (false) if the
  13280. flag is clear. After testing,
  13281. clears the flag
  13282. --
  13283. Related: CF,FC?,FC?C,FS?C,SF
  13284. " "3B615" :Usr) "xFS?" ("n \\-> 0/1
  13285. " "Flag Set Cmd
  13286. --
  13287. Tests whether the system or user
  13288. flag specified by nflag number is
  13289. set, and returns a corresponding
  13290. test result: 1 (true) if the flag
  13291. is set or 0 (false) if the flag
  13292. is clear.
  13293. --
  13294. Related: CF,FC?,FC?C,FS?,SF
  13295. " "3B509" :Usr) "xFUNCTION" ("\\->
  13296. " "Function Plot Type Cmd
  13297. --
  13298. Sets the plot type to FUNCTION.
  13299. --
  13300. Related: BAR,CONIC,DIFFEQ,FASTEQ,FAST3D, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE
  13301. " "3C955" :Usr) "~xFXND" ("'x/y' \\-> x y
  13302. " "" "06B314" :CASHELP :Usr) "~xGAMMA" ("x \\-> x'
  13303. " "" "0070DE" :Usr) "~xGAUSS" ("symb [vars] \\-> [diag] [P] symb' [vars]
  13304. " "" "04D314" :CASHELP :Usr) "~xGCDMOD" ("x1 x2 \\-> x3
  13305. " "" "075314" :CASHELP :Usr) "~xGCD" ("x1 x2 \\-> x3
  13306. " "" "02C314" :CASHELP :Usr) "xGET" ("ob n \\-> elm
  13307. ob = [] or [[]] or {} or name
  13308. pos = n or {n} or {n m}
  13309. " "Get Element Command
  13310. --
  13311. Returns from the level 2 array or
  13312. list (or named array or list) the
  13313. real or complex number zget or
  13314. object objget whose position is
  13315. specified in level 1.
  13316. --
  13317. [[ mat ]] nposition \\-> zget
  13318. [[ mat ]] { nrow mcol } \\-> zget
  13319. 'namematrix' nposition \\-> zget
  13320. 'namematrix' { nrow mcol } \\-> zget
  13321. [ vector ] nposition \\-> zget
  13322. [ vector ] { nposition }\\-> zget
  13323. 'namevector' nposition \\-> zget
  13324. 'namevector' { nposition } \\-> zget
  13325. { list } nposition \\-> objget
  13326. { list } {nposition} \\-> objget
  13327. 'namelist' nposition \\-> objget
  13328. 'namelist' {nposition} \\-> objget
  13329. --
  13330. Related: GETI,PUT,PUTI
  13331. " "3C1C7" :Usr) "xGETI" ("ob pos \\-> ob' pos' elm
  13332. ob = [] or [[]] or {} or name
  13333. pos = n or {n} or {n m}
  13334. " "Get and Increment Index Command
  13335. --
  13336. Returns from the level 2 array or
  13337. list (or named array or list) the
  13338. real or complex number zget or
  13339. object objget whose position is
  13340. specified in level 1, along with
  13341. the level 2 argument and the next
  13342. position in that argument.
  13343. --
  13344. [[ mat ]] npos1
  13345. \\-> [[ mat ]] npos2 zget
  13346. [[ mat ]] { nr mc }1
  13347. \\-> [[ mat ]] { nr mc }2 zget
  13348. 'namemat' npos1
  13349. \\-> 'namemat' npos2 zget
  13350. 'namemat' { nr mc }1
  13351. \\-> 'namemat' { nr mc }2 zget
  13352. [ vec ] npos1
  13353. \\-> [ vec ] npos2 zget
  13354. [ vec ] { npos1 }
  13355. \\-> [ vec ] { npos2 } zget
  13356. 'namevec' npos1
  13357. \\-> 'namevec' npos2 zget
  13358. 'namevec' { npos1 }
  13359. \\-> 'namevec' { npos2 } zget
  13360. { list } npos1
  13361. \\-> { list } npos2 objget
  13362. { list } { npos1 }
  13363. \\-> { list } { npos2 } objget
  13364. 'namelist' npos1
  13365. \\-> 'namelist' npos2 objget
  13366. 'namelist' { npos1 }
  13367. \\-> 'namelist' { npos2 } objget
  13368. --
  13369. Related: GET,PUT,PUTI
  13370. " "3C22D" :Usr) "~xgmol" ("
  13371. " "" "0660AB" :Usr) "xGOR" ("g_targ {#n #m} grob \\-> g_targ'
  13372. g_targ (x,y) grob \\-> g_targ'
  13373. PICT ... ... \\->
  13374. " "Graphics OR Cmd
  13375. --
  13376. Superimposes grob1 onto grobtgt
  13377. or PICT, with the upper left
  13378. corner of grob1 positioned at the
  13379. specified coordinate in grobtgt
  13380. or PICT.
  13381. --
  13382. grobtgt {#n #m} grob1 \\-> grob'
  13383. grobtgt (x,y) grob1 \\-> grob'
  13384. PICT {#n #m} grob1 \\->
  13385. PICT (x,y) grob1 \\->
  13386. --
  13387. Related: GXOR,REPL,SUB
  13388. " "3C74A" :Usr) "xGRAD" ("\\->
  13389. " "Grads Mode Cmd
  13390. --
  13391. Sets Grads angle mode.
  13392. --
  13393. Related: GRAD,RAD
  13394. " "3B57F" :Usr) "~xGRAMSCHMIDT" ("
  13395. " "" "0090DE" :Usr) "~xGRIDMAP" ("\\->
  13396. " "GRIDMAP Plot Type Cmd
  13397. --
  13398. Sets plot type to GRIDMAP.
  13399. --
  13400. Related: BAR,CONIC,DIFFEQ,FUNCTION, HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD, TRUTH,WIREFRAME,YSLICE
  13401. " "00A0AB" :Usr) "~xGROBADD" ("gr1 gr2 \\-> gr3
  13402. " "Combines two grob objects.
  13403. " "07C314" :Usr) "xGROB" ("
  13404. " "" "38C1B" :Usr) "x\\->GROB" ("ob n_chrsize \\-> grob
  13405. " "Stack to Graphics Object Cmd
  13406. --
  13407. Creates a graphics object representing
  13408. the level 2 object, where
  13409. the argument nchar size specifies
  13410. the character size of the representation.
  13411. --
  13412. Related: \\->LCD,LCD\\->
  13413. " "3C8A1" :Usr) "x>GROB" ("ob n_chrsize \\-> grob
  13414. " "Stack to Graphics Object Cmd
  13415. --
  13416. Creates a graphics object representing
  13417. the level 2 object, where
  13418. the argument nchar size specifies
  13419. the character size of the representation.
  13420. --
  13421. Related: \\->LCD,LCD\\->
  13422. " "3C8A1" :Usr) "xGXOR" ("g_targ {#n #m} g_src \\-> g_targ'
  13423. g_targ (x,y) g_src \\-> g_targ'
  13424. PICT ... ... \\->
  13425. " "Graphics Exclusive OR Cmd
  13426. --
  13427. Superimposes grob1 onto grobtgt
  13428. or PICT, with the upper left
  13429. corner of grob1 positioned at the
  13430. specified coordinate in grobtgt
  13431. or PICT.
  13432. --
  13433. grobtgt {#n #m} grob1\\-> grobresult
  13434. grobtgt (x,y) grob1\\-> grobresult
  13435. PICT {#n #m} grob1\\->
  13436. PICT (x,y) grob1\\->
  13437. --
  13438. Related: GOR,REPL,SUB
  13439. " "3C7D8" :Usr) "~xHADAMARD" ("[M1] [M2] \\-> [M3]
  13440. " "" "046314" :CASHELP :Usr) "~xHALFTAN" ("symb \\-> symb'
  13441. " "" "020314" :CASHELP :Usr) "xHALT" ("\\->
  13442. " "Halt Program Cmd
  13443. --
  13444. Halts program execution.
  13445. --
  13446. Related: CONT,KILL
  13447. " "3880D" :Usr) "~xHEAD" ("{} \\-> ob
  13448. $ \\-> $'
  13449. " "First Listed Element Cmd
  13450. --
  13451. Returns the first element of a
  13452. list or string.
  13453. --
  13454. Related: TAIL
  13455. " "0510AB" :Usr) "~x\\->HEADER" ("n \\->
  13456. " "Set header size in lines: 0,1 or 2.
  13457. --
  13458. Related: \\->HEADER
  13459. " "0040DD" :Usr) "~xHEADER\\->" ("\\-> n
  13460. " "Header size: Returns current header size
  13461. in lines.
  13462. --
  13463. Related: \\->HEADER
  13464. " "0050DD" :Usr) "~xHELP" ("
  13465. " "" "0320DE" :Usr) "~xHERMITE" ("z \\-> symb
  13466. " "" "05C314" :CASHELP :Usr) "~xHESS" ("symb [vars] \\-> [M] [grad] [vars]
  13467. " "" "059314" :CASHELP :Usr) "xHEX" ("\\->
  13468. " "Hexadecimal Mode Cmd
  13469. --
  13470. Selects hexadecimal base for
  13471. binary integer operations. (The
  13472. default base is decimal.)
  13473. --
  13474. Related: BIN,OCT,DEC,RCWS,STWS
  13475. " "3B68B" :Usr) "~xHILBERT" ("z \\-> [M]
  13476. " "" "054314" :CASHELP :Usr) "xHISTOGRAM" ("\\->
  13477. " "Histogram Plot Type Cmd
  13478. --
  13479. Sets the plot type to HISTOGRAM.
  13480. --
  13481. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,PARAMETRIC,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH,WIREFRAME,YSLICE
  13482. " "3C9C1" :Usr) "xHISTPLOT" ("\\->
  13483. " "Draw Histogram Plot Cmd
  13484. --
  13485. Plots a frequency histogram of
  13486. the specified column in the
  13487. current stat matrix (reserved
  13488. matrix \\GSDAT).
  13489. --
  13490. <REF>TEXT:Reserved|\\GSDAT
  13491. --
  13492. Related: BARPLOT,BINS,FREESE,PICTURE, PVIEW,RES,SCATRPLOT,XCOL
  13493. " "3E1CA" :Usr) "xHMS-" ("hms1 hms2 \\-> hms3
  13494. " "Hours-Minutes-Seconds Minus Cmd
  13495. --
  13496. Returns the difference of two
  13497. real number, where the arguments
  13498. and the result are interpreted in
  13499. hours-minutes-seconds format.
  13500. --
  13501. Related: HMS\\->,\\->HMS,HMS+
  13502. " "3B14C" :Usr) "xHMS+" ("hms1 hms2 \\-> hms3
  13503. " "Hours-Minutes-Seconds Plus Cmd
  13504. --
  13505. Returns the sum of two real number,
  13506. where the arguments and the
  13507. result are interpreted in
  13508. hours-minutes-seconds format.
  13509. --
  13510. Related: HMS\\->,\\->HMS,HMS-
  13511. " "3B12C" :Usr) "x\\->HMS" ("x \\-> x'
  13512. " "Decimal to Hours-Minutes-Seconds
  13513. Cmd
  13514. --
  13515. Converts a real number representing
  13516. hours or degrees with a decimal
  13517. fraction to hours-minutes-seconds format.
  13518. --
  13519. Related: HMS\\->,HMS+,HMS-
  13520. " "3B0EC" :Usr) "x>HMS" ("x \\-> x'
  13521. " "Decimal to Hours-Minutes-Seconds
  13522. Cmd
  13523. --
  13524. Converts a real number representing
  13525. hours or degrees with a decimal
  13526. fraction to hours-minutes-seconds format.
  13527. --
  13528. Related: HMS\\->,HMS+,HMS-
  13529. " "3B0EC" :Usr) "xHMS\\->" ("x \\-> x'
  13530. " "Hours-Min-Sec to Decimal Cmd
  13531. --
  13532. Converts a real number in hours
  13533. -minutes-seconds format to its
  13534. decimal form (hours or degrees
  13535. with a decimal fraction.
  13536. --
  13537. Related: \\->HMS,HMS+,HMS-
  13538. " "3B10C" :Usr) "xHMS>" ("x \\-> x'
  13539. " "Hours-Min-Sec to Decimal Cmd
  13540. --
  13541. Converts a real number in hours
  13542. -minutes-seconds format to its
  13543. decimal form (hours or degrees
  13544. with a decimal fraction.
  13545. --
  13546. Related: \\->HMS,HMS+,HMS-
  13547. " "3B10C" :Usr) "xHOME" ("\\->
  13548. " "HOME Directory Cmd
  13549. --
  13550. Makes the HOME directory the
  13551. current directory.
  13552. --
  13553. Related: CRDIR,PATH,PGDIR,UPDIR
  13554. " "39405" :Usr) "~xHORNER" ("symb1 x \\-> symb2 x symb3
  13555. " "" "037314" :CASHELP :Usr) "~xHYPERBOLIC" ("
  13556. " "" "02B0DE" :Usr) "xi" ("\\-> (0.,1.)
  13557. \\-> 'i'
  13558. " "Returns the complex constant i.
  13559. --
  13560. Related: e,MAXR,MINR,\\pi
  13561. " "39B3B" :Usr) "~xIABCUV" ("n1 n2 n3 \\-> n4 n5
  13562. " "" "031314" :CASHELP :Usr) "~xIBASIS" ("
  13563. " "" "0120DE" :Usr) "~xIBERNOULLI" ("n \\-> x
  13564. " "" "0060DE" :CASHELP :Usr) "~xIBP" ("uv' v \\-> uv -u'v
  13565. " "" "00B314" :CASHELP :Usr) "~xICHINREM" ("[]1 []2 \\-> []3
  13566. " "" "03B314" :CASHELP :Usr) "~xIDIV2" ("n1 n2 \\-> quot rem
  13567. " "" "027314" :CASHELP :Usr) "xIDN" ("n \\-> [[]]
  13568. [[]] \\-> [[]]'
  13569. name \\-> [[]]
  13570. " "Identity Matrix Cmd
  13571. --
  13572. Returns an identity matrix; that
  13573. is, a square matrix with its
  13574. diagonal elements equal to 1 and
  13575. its off-diagonal elements equal
  13576. to 0.
  13577. --
  13578. Related: CON
  13579. " "3C02E" :Usr) "~xIEGCD" ("n1 n2 \\-> c b a
  13580. " "" "02F314" :CASHELP :Usr) "xIF" ("\\->
  13581. " "IF Conditional Structure Cmd
  13582. --
  13583. Starts IF ... THEN ... END and
  13584. IF ... THEN ... ELSE ... END
  13585. conditional structures.
  13586. --
  13587. IF \\->
  13588. THEN T/F \\->
  13589. END \\->
  13590. \\->
  13591. IF \\->
  13592. THEN T/F \\->
  13593. ELSE \\->
  13594. END \\->
  13595. --
  13596. Related: CASE,ELSE,END,IFERR,THEN
  13597. " "37F48" :Usr) "xIFERR" ("\\->
  13598. " "If Error Conditional Struct Cmd
  13599. --
  13600. Starts IFERR ... THEN ... END and
  13601. IFERR ... THEN ... ELSE ... END
  13602. error trapping structures.
  13603. --
  13604. Related: CASE,ELSE,END,IF,THEN
  13605. " "387AC" :Usr) "~xIFFT" ("[] \\-> []'
  13606. " "Inverse Discrete Fourier Tsfm Cmd
  13607. --
  13608. Computes the 1D or 2D
  13609. inverse discrete Fourier
  13610. transform of an array.
  13611. --
  13612. Related: FFT
  13613. " "01B0AB" :Usr) "xIFT" ("0/1 obj \\-> ?
  13614. " "IF-THEN Cmd
  13615. --
  13616. Executes obj if T/F is nonzero.
  13617. Discards obj if T/F is zero.
  13618. --
  13619. Related: IFTE
  13620. " "396A4" :Usr) "xIFTE" ("0/1 objT objF \\-> ?
  13621. " "IF-THEN-ELSE Cmd
  13622. --
  13623. Executes objT if T/F is nonzero.
  13624. Discards objF if T/F is zero.
  13625. " "395F3" :Usr) "xi" ("\\-> i
  13626. " "" "39B3B" :Usr) "~xILAP" ("symb \\-> symb'
  13627. " "" "011314" :CASHELP :Usr) "xIM" ("(x,y) \\-> y
  13628. [] \\-> []'
  13629. " "Imaginary Part Func
  13630. --
  13631. Returns the imaginary part of its
  13632. (complex) argument.
  13633. --
  13634. x \\-> 0
  13635. (x,y) \\-> y
  13636. [ R-arr ] \\-> [ R-arr ]
  13637. [ C-arr ] \\-> [ R-arr ]
  13638. 'sym' \\-> 'IM(sym)'
  13639. --
  13640. Related: C\\->R,RE,R\\->C
  13641. " "3B87E" :Usr) "~xIMAGE" ("
  13642. " "" "0100DE" :Usr) "xINCR" ("name \\-> x
  13643. " "Increment Cmd
  13644. --
  13645. Takes a variable on level 1, adds
  13646. 1, stores the new value back into
  13647. the original variable, and returns
  13648. the new value to level 1.
  13649. --
  13650. Related: DECR
  13651. " "3E54C" :Usr) "~x\\oo" ("\\-> '+\\oo'
  13652. " "Infinity
  13653. " "08A314" :Usr) "~x\\oo" ("\\-> '+\\oo'
  13654. " "Infinity
  13655. " "08A314" :Usr) "~xINFORM" ("$ {flds} fmt {rst} {init} \\-> {} 1
  13656. \\-> 0
  13657. " "User-Defined Dialog Box Cmd
  13658. --
  13659. Creates a user-defined input form
  13660. (dialog box).
  13661. --
  13662. 5: \"title\"
  13663. 4: { s1 ... s2...sn }
  13664. 3: format
  13665. 2: { resets }
  13666. 1: { init }
  13667. \\|v
  13668. 2: { vals }
  13669. 1: 1
  13670. --
  13671. 5: \"title\"
  13672. 4: { s1 ... s2...sn }
  13673. 3: format
  13674. 2: { resets }
  13675. 1: { init }
  13676. \\|v
  13677. 1: 0
  13678. --
  13679. \"title\"
  13680. --
  13681. Title. This appears at the top of
  13682. the dialog box.
  13683. --
  13684. { s1 ... s2...sn }
  13685. --
  13686. Field definitions. A field definition
  13687. (sx) can have two formats
  13688. : \"label\", a field type,
  13689. or { \"label\" \"helpInfo\"
  13690. type0 type1 ... typen },
  13691. a field label with optional help
  13692. text that appears near the bottom
  13693. of the screen, and an optional
  13694. list of valid object types for
  13695. that field. If object types
  13696. aren't specified, all object
  13697. types are valid. For information
  13698. about object types, see the TYPE
  13699. command.
  13700. When creating a multi-column
  13701. dialog box, you can span columns
  13702. by using an empty list as a field
  13703. definition. A field that appears
  13704. to the left of an empty space
  13705. automatically expands to fill the
  13706. empty space.
  13707. --
  13708. { resets }
  13709. --
  13710. Default values displayed when
  13711. RESET is selected. Specify reset
  13712. values in the list in the same
  13713. order as the fields were specified.
  13714. To specify no value, use the
  13715. NOVAL command as a place holder.
  13716. This list can be empty.
  13717. --
  13718. { init }
  13719. --
  13720. Initial values displayed when the
  13721. dialog box appears. Specify initial
  13722. values in the list in the
  13723. same order as the fields were
  13724. specified. To specify no value,
  13725. use the NOVAL command as a place
  13726. holder. This list can be empty.
  13727. --
  13728. Related: CHOOSE,INPUT,NOVAL,TYPE
  13729. " "04C0AB" :Usr) "xINPUT" ("$prompt $ \\-> $'
  13730. $prompt {specs} \\-> $'
  13731. " "Input Cmd
  13732. --
  13733. Prompts for data input to the
  13734. command line and prevents the
  13735. user access to stack operations.
  13736. --
  13737. Related: PROMPT,STR\\->
  13738. " "3EEBD" :Usr) "~xINTEGER" ("
  13739. " "" "0290DE" :Usr) "xINT" ("f(var) var x0 \\-> F(x0)
  13740. " "" "3F007" :CASHELP :Usr) "xINV" ("x \\-> 1/x
  13741. [[]] \\-> [[]]'
  13742. " "Inverse (1/x) Analytic Func
  13743. --
  13744. Returns the reciprocal or the
  13745. matrix inverse.
  13746. --
  13747. Related: SINV,/
  13748. " "3A32B" :Usr) "~xINTVX" ("f(x) \\-> F(x)
  13749. " "" "004314" :CASHELP :Usr) "~xINVMOD" ("x \\-> x'
  13750. " "" "074314" :CASHELP :Usr) "xIP" ("x \\-> n
  13751. " "Integer Part Func
  13752. --
  13753. Returns the integer part of the
  13754. argument.
  13755. --
  13756. x \\-> n
  13757. x_u \\-> n_u
  13758. 'sym' \\-> 'IP(sym)'
  13759. --
  13760. Related: FP
  13761. " "3AC3D" :Usr) "~xIQUOT" ("n1 n2 \\-> n3
  13762. " "" "029314" :CASHELP :Usr) "~xIREMAINDER" ("n1 n2 \\-> n3
  13763. " "" "02B314" :CASHELP :Usr) "xI\\->R" ("n \\-> x
  13764. " "" "3F0B7" :CASHELP :Usr) "xI>R" ("n \\-> x
  13765. " "" "3F0B7" :CASHELP :Usr) "xISOL" ("symb var \\-> symb'
  13766. " "Isolate Variable Cmd
  13767. --
  13768. Returns an algebraic symb' that
  13769. rearranges symb to \"isolate\"
  13770. the first occurrence of variable
  13771. var.
  13772. --
  13773. Related: COLCT,EXPAN,QUAD,SHOW,SOLVE
  13774. " "3E648" :Usr) "~xISOM" ("
  13775. " "" "00D0DE" :Usr) "~xISPRIME?" ("n \\-> 1
  13776. \\-> 0
  13777. " "" "03C314" :CASHELP :Usr) "x_" ("
  13778. " "" "3DB62" :Usr) "xFORMUNIT" ("
  13779. " "" "3DB62" :Usr) "x;" ("
  13780. " "" "3F053" :Usr) "~x?" ("
  13781. " "" "089314" :Usr) "x'" ("
  13782. " "" "389EF" :Usr) "x'" ("
  13783. " "" "38A14" :Usr) "xENDTIC" ("
  13784. " "" "38A14" :Usr) "x\\<<" ("
  13785. " "" "389B9" :Usr) "x<<" ("
  13786. " "" "389B9" :Usr) "x\\>>" ("
  13787. " "" "389D4" :Usr) "x>>" ("
  13788. " "" "389D4" :Usr) "x\\>>" ("
  13789. " "" "38999" :Usr) "x>>ABND" ("
  13790. " "" "38999" :Usr) "~xJORDAN" ("[nxn] \\-> minpol chrpol {} []
  13791. " "" "050314" :CASHELP :Usr) "~xKER" ("
  13792. " "" "00F0DE" :Usr) "xKERRM" ("\\-> msg
  13793. " "Kermit Error Message Cmd
  13794. --
  13795. Returns the text of the most
  13796. recent Kermit error packet.
  13797. --
  13798. Related: FINISH,KGET,PKT,RECN,RECV, SEND,SERVER
  13799. " "3EE2C" :Usr) "xKEY" ("\\-> rc 1
  13800. \\-> 0
  13801. " "Key Cmd
  13802. --
  13803. Returns to level 1 a test result,
  13804. and if a key is pressed, returns
  13805. to level 2 the row-column location
  13806. xn m of that key.
  13807. --
  13808. Related: WAIT,KEYEVAL
  13809. " "39854" :Usr) "~xKEYEVAL" ("rc.p \\-> ?
  13810. " "Execute the action associated with the
  13811. specified key. The number is row r, column
  13812. c, plane p. If negative, force the default
  13813. key action even in USER mode.
  13814. --
  13815. <REF>TEXT:Keycodes
  13816. " "07B314" :Usr) "~x\\->KEYTIME" ("ticks \\->
  13817. " "Set a new keytime value. This is the number
  13818. of ticks which will be required between
  13819. subsequent key presses. Keys pressed faster
  13820. will not register.
  13821. --
  13822. Related: KEYTIME\\->
  13823. " "06C0AB" :Usr) "~xKEYTIME\\->" ("\\-> ticks
  13824. " "Return the current value of keytime.
  13825. --
  13826. Related: \\->KEYTIME
  13827. " "06D0AB" :Usr) "xKGET" ("name \\->
  13828. \"name\" \\->
  13829. {names} \\->
  13830. {{old new}...} \\->
  13831. " "Kermit Get Cmd
  13832. --
  13833. Used by a local Kermit to get a
  13834. Kermit server to transmit the
  13835. named object(s).
  13836. --
  13837. Related: BAUD,CKSM,FINISH,PARITY,RECN, RECV,SEND,SERVER,TRANSIO
  13838. " "3ECE4" :Usr) "xKILL" ("\\->
  13839. " "Cancel Halted Programs Cmd
  13840. --
  13841. Cancels all currently halted
  13842. programs. (Halted programs are
  13843. typically canceled by pressing
  13844. PRG NXT RUN KILL.) If KILL is
  13845. executed within a program, that
  13846. program is also canceled.
  13847. --
  13848. Related: CONT,DOERR,HALT,PROMPT
  13849. " "394F1" :Usr) "xLABEL" ("\\->
  13850. " "Label Axes Cmd
  13851. --
  13852. Labels axes in PICT with x- and
  13853. y-axis variable names and with
  13854. the minimum and maximum values of
  13855. the display ranges.
  13856. --
  13857. Related: LABEL,DRAW,DRAX
  13858. " "3C5C9" :Usr) "~xLAGRANGE" ("[2xn] \\-> pol
  13859. " "" "05D314" :CASHELP :Usr) "~x\\->LANGUAGE" ("n \\->
  13860. " "Set language for error messages etc.
  13861. 0 English
  13862. 1 French
  13863. 2 Spanish
  13864. --
  13865. Related: LANGUAGE\\->
  13866. " "0000DD" :Usr) "~xLANGUAGE\\->" ("\\-> n
  13867. " "Return the current language value.
  13868. --
  13869. Related: \\->LANGUAGE
  13870. " "0010DD" :Usr) "~xLAPL" ("symb [vars] \\-> symb'
  13871. " "" "058314" :CASHELP :Usr) "~xLAP" ("symb \\-> symb'
  13872. " "" "010314" :CASHELP :Usr) "xLASTARG" ("\\-> ob1 .. obn
  13873. " "Last Arguments Cmd
  13874. --
  13875. Returns copies of the arguments
  13876. of the most recently executed
  13877. command.
  13878. " "397E5" :Usr) "xLAST" ("\\-> ob1 .. obn
  13879. " "Last Arguments Cmd
  13880. --
  13881. Returns copies of the arguments
  13882. of the most recently executed
  13883. command.
  13884. " "397E5" :Usr) "~xlbmol" ("
  13885. " "" "0670AB" :Usr) "x\\->LCD" ("grob \\->
  13886. " "Graphics Object to LCD Cmd
  13887. --
  13888. Displays the graphics object from
  13889. level 1, with its upper left
  13890. pixel in the upper left corner of
  13891. the display.
  13892. --
  13893. Related: LCD\\->,BLANK,\\->GROB
  13894. " "3C881" :Usr) "x>LCD" ("grob \\->
  13895. " "Graphics Object to LCD Cmd
  13896. --
  13897. Displays the graphics object from
  13898. level 1, with its upper left
  13899. pixel in the upper left corner of
  13900. the display.
  13901. --
  13902. Related: LCD\\->,BLANK,\\->GROB
  13903. " "3C881" :Usr) "xLCD\\->" ("\\-> grob
  13904. " "LCD to Graphics Object Cmd
  13905. --
  13906. Returns the current stack and
  13907. menu display as a 131x64 graphics
  13908. object.
  13909. --
  13910. Related: \\->LCD,\\->GROB
  13911. " "3C866" :Usr) "xLCD>" ("\\-> grob
  13912. " "LCD to Graphics Object Cmd
  13913. --
  13914. Returns the current stack and
  13915. menu display as a 131x64 graphics
  13916. object.
  13917. --
  13918. Related: \\->LCD,\\->GROB
  13919. " "3C866" :Usr) "~xLCM" ("symb1 symb2 \\-> symb3
  13920. " "" "02D314" :CASHELP :Usr) "~xLCXM" ("n1 n2 prog \\-> []
  13921. " "" "055314" :CASHELP :Usr) "~xLDEC" ("symb1 symb2 \\-> symb3
  13922. " "" "012314" :CASHELP :Usr) "~xLEGENDRE" ("n \\-> pol
  13923. " "" "05A314" :CASHELP :Usr) "~xLGCD" ("{symb...} \\-> {} gcd
  13924. " "" "032314" :CASHELP :Usr) "~" ("" "Evaluate Library Func Cmd
  13925. --
  13926. Evaluates unnamed library
  13927. functions. The number is of the form lllfffh
  13928. where lll is a library number and fff a
  13929. function number.
  13930. --
  13931. Related: EVAL,SYSEVAL
  13932. " "0160AB" :Usr) "xLIBS" ("\\-> {title nlib nport ...}
  13933. " "Libraries Cmd
  13934. --
  13935. Lists the title, number, and
  13936. port of each library attached to
  13937. the current directory.
  13938. --
  13939. Related: ATTACH,DETACH
  13940. " "3EB42" :Usr) "~xLIMIT" ("func point \\-> lim
  13941. " "" "005314" :CASHELP :Usr) "~xLIN" ("symb \\-> symb'
  13942. " "" "014314" :CASHELP :Usr) "xLINE" ("(x1,y1) (x2,y2) \\->
  13943. {#n1 #m1} {#n2 #m2} \\->
  13944. " "Draw Line Cmd
  13945. --
  13946. Draws a line in PICT between the
  13947. coordinates in levels 1 and 2.
  13948. --
  13949. Related: ARC,BOX,TLINE
  13950. " "3C68C" :Usr) "x\\GSLINE" ("\\-> symb
  13951. " "Regression Model Formula Cmd
  13952. --
  13953. Returns an expression representing
  13954. the best fit line according
  13955. to the current statistical model,
  13956. using X as the independent variable
  13957. name, and explicit values
  13958. of the slope and intercept taken
  13959. from the reserved variable \\GSPAR.
  13960. --
  13961. <REF>TEXT:Reserved|\\GSPAR
  13962. --
  13963. Related: BESTFIT,COL\\GS,CORR,COV, EXPFIT,LINFIT,LOGFIT,LR,PREDX, PREDY,PWRFIT,XCOL,YCOL
  13964. " "3E156" :Usr) "xSIGMALINE" ("\\-> symb
  13965. " "Regression Model Formula Cmd
  13966. --
  13967. Returns an expression representing
  13968. the best fit line according
  13969. to the current statistical model,
  13970. using X as the independent variable
  13971. name, and explicit values
  13972. of the slope and intercept taken
  13973. from the reserved variable \\GSPAR.
  13974. --
  13975. <REF>TEXT:Reserved|\\GSPAR
  13976. --
  13977. Related: BESTFIT,COL\\GS,CORR,COV, EXPFIT,LINFIT,LOGFIT,LR,PREDX, PREDY,PWRFIT,XCOL,YCOL
  13978. " "3E156" :Usr) "xLINFIT" ("\\->
  13979. " "Linear Curve Fit Cmd
  13980. --
  13981. Stores LINFIT as the fifth parameter
  13982. in the reserved variable
  13983. \\GSPAR, indicating that subsequent
  13984. executions of LR are to use the
  13985. linear curve fitting model.
  13986. --
  13987. <REF>TEXT:Reserved|\\GSPAR
  13988. --
  13989. Related: BESTFIT,EXPFIT,LOGFIT,LR, PWRFIT
  13990. " "3E214" :Usr) "~xLININ" ("symb var \\-> 0/1
  13991. " "Linear Test Func
  13992. --
  13993. Tests whether an algebraic is
  13994. structurally linear for a given
  13995. variable.
  13996. " "0150AB" :Usr) "~xLINSOLVE" ("[eqs] [vars] \\-> [eqs] {pp} sol
  13997. " "" "052314" :CASHELP :Usr) "xLIST\\->" ("{} \\-> ob1...obn n
  13998. " "List to Stack Cmd
  13999. --
  14000. Takes a list of n objects and
  14001. returns them in separate levels,
  14002. and returns the total number of
  14003. objects to level 1.
  14004. --
  14005. Related: ARRY\\->,DTAG,EQ\\->,\\->LIST, OBJ\\->,STR\\->
  14006. " "3BAC1" :Usr) "xLIST>" ("{} \\-> ob1...obn n
  14007. " "List to Stack Cmd
  14008. --
  14009. Takes a list of n objects and
  14010. returns them in separate levels,
  14011. and returns the total number of
  14012. objects to level 1.
  14013. --
  14014. Related: ARRY\\->,DTAG,EQ\\->,\\->LIST, OBJ\\->,STR\\->
  14015. " "3BAC1" :Usr) "x\\->LIST" ("ob1 .. obn n \\-> {}
  14016. " "Stack to List Cmd
  14017. --
  14018. Takes n objects from level n+1
  14019. through level 2 and returns a
  14020. list of those n objects.
  14021. --
  14022. Related: \\->ARRY,LIST\\->,\\->STR, \\->TAG,\\->UNIT
  14023. " "3B7D2" :Usr) "x>LIST" ("ob1 .. obn n \\-> {}
  14024. " "Stack to List Cmd
  14025. --
  14026. Takes n objects from level n+1
  14027. through level 2 and returns a
  14028. list of those n objects.
  14029. --
  14030. Related: \\->ARRY,LIST\\->,\\->STR, \\->TAG,\\->UNIT
  14031. " "3B7D2" :Usr) "~x\\GDLIST" ("{} \\-> {}'
  14032. " "List Differences Cmd
  14033. --
  14034. Returns the first differences of
  14035. the elements in a list.
  14036. --
  14037. Related: \\GSLIST,\\PILIST,STREAM
  14038. " "0550AB" :Usr) "~x\\PILIST" ("{} \\-> x
  14039. " "List Product Cmd
  14040. --
  14041. Returns the product of the
  14042. elements in a list.
  14043. --
  14044. Related: \\GSLIST,\\GDLIST,STREAM
  14045. " "05A0AB" :Usr) "~x\\GSLIST" ("{} \\-> x
  14046. " "List Sum Cmd
  14047. --
  14048. Returns the sum of the elems in a
  14049. list.
  14050. --
  14051. Related: \\PILIST,STREAM
  14052. " "0590AB" :Usr) "xLN" ("x \\-> x'
  14053. " "Natural Logarithm Analytic Func
  14054. --
  14055. Returns the natural (base e)
  14056. logarithm of the argument.
  14057. --
  14058. z \\-> ln z
  14059. 'sym' \\-> 'LN(sym)'
  14060. --
  14061. Related: ALOG,EXP,ISOL,LNP1,LOG
  14062. " "3AA01" :Usr) "~xLNAME" ("symb \\-> [vars]
  14063. " "" "06D314" :CASHELP :Usr) "~xLNCOLLECT" ("symb \\-> symb'
  14064. " "" "016314" :CASHELP :Usr) "xLNP1" ("x \\-> x'
  14065. " "Natural Log of x+1 Analytic Func
  14066. --
  14067. Returns ln (x + 1).
  14068. --
  14069. x \\-> ln(x+1)
  14070. 'sym' \\-> 'LNP1(sym)'
  14071. --
  14072. Related: EXPM,LN
  14073. " "3AB2F" :Usr) "xLOG" ("x \\-> x'
  14074. " "Common Logarithm Analytic Func
  14075. --
  14076. Returns the common logarithm
  14077. (base 10) of the argument.
  14078. --
  14079. z \\-> log z
  14080. 'sym' \\-> 'LOG(sym)'
  14081. --
  14082. Related: ALOG,EXP,ISOL,LN
  14083. " "3AA73" :Usr) "xLOGFIT" ("\\->
  14084. " "Logarithmic Curve Fit Cmd
  14085. --
  14086. Stores LOGFIT as the fifth parameter
  14087. in the reserved variable
  14088. \\GSPAR, indicating that subsequent
  14089. executions of LR are to use the
  14090. logarithmic curve-fitting model.
  14091. --
  14092. <REF>TEXT:Reserved|\\GSPAR
  14093. --
  14094. Related: BESTFIT,EXPFIT,LINFIT,LR,PWRFIT
  14095. " "3E239" :Usr) "~xLQ" ("[[]] \\-> [[L]] [[Q]] [[P]]
  14096. " "LQ Factorization of a Matrix Cmd
  14097. --
  14098. Returns the LQ factorization of
  14099. an n\327m matrix.
  14100. --
  14101. Related: LSQ,QR
  14102. " "0320AB" :Usr) "xLR" ("\\-> Intercept Slope
  14103. " "Linear Regression Cmd
  14104. --
  14105. Uses the currently selected statistical
  14106. model to calculate the
  14107. linear regression coefficients
  14108. (intercept and slope) for the
  14109. selected dependent and independent
  14110. variables in the current stat
  14111. matrix (reserved variable \\GSDAT).
  14112. --
  14113. <REF>TEXT:Reserved|\\GSDAT
  14114. --
  14115. Related: BESTFIT,COL\\GS,CORR,COV,EXPFIT, \\GSLINE,LINFIT,LOGFIT,PREDX,PREDY, PWRFIT,XCOL,YCOL
  14116. " "3DF83" :Usr) "~xLSQ" ("[B] [[A]] \\-> []'
  14117. [[B]] [[A]] \\-> [[]]'
  14118. " "Least Squares Solution Cmd
  14119. --
  14120. Returns the minimum norm least
  14121. squares solution to any system of
  14122. linear equations where A \327 X = B
  14123. --
  14124. Related: LQ,RANK,QR,/
  14125. " "02B0AB" :Usr) "~xLU" ("[[]] \\-> [[L]] [[U]] [[P]]
  14126. " "LU Dec of a Sq. Matrix Cmd
  14127. --
  14128. Returns the LU decomposition of a square
  14129. matrix.
  14130. --
  14131. Related: DET,INV,LSQ,/
  14132. " "0300AB" :Usr) "~xLVAR" ("symb \\-> symb [vars]
  14133. " "" "06A314" :CASHELP :Usr) "~xMAD" ("[] \\-> det inv coeff cpol
  14134. " "" "051314" :CASHELP :Usr) "~xMAIN" ("
  14135. " "Show the main CAS menu.
  14136. " "07F314" :Usr) "xMANT" ("x \\-> x'
  14137. " "Mantissa Func
  14138. --
  14139. Returns the mantissa of the argument.
  14140. --
  14141. x \\-> ymant
  14142. 'sym' \\-> 'MANT(sym)'
  14143. --
  14144. Related: SIGN,XPON
  14145. " "3B02E" :Usr) "~xMAP" ("{} prog \\-> {}'
  14146. " "" "066314" :Usr) "x\\|vMATCH" ("symb {spat srepl} \\-> symb' 0/1
  14147. symb {spat srepl scond} \\-> symb' 0/1
  14148. " "Match Pattern Down Cmd
  14149. --
  14150. Rewrites an expression.
  14151. --
  14152. Related: X\\|^MATCH
  14153. " "3DB04" :Usr) "xMATCHDN" ("symb {spat srepl} \\-> symb' 0/1
  14154. symb {spat srepl scond} \\-> symb' 0/1
  14155. " "Match Pattern Down Cmd
  14156. --
  14157. Rewrites an expression.
  14158. --
  14159. Related: X\\|^MATCH
  14160. " "3DB04" :Usr) "x\\|^MATCH" ("symb {spat srepl} \\-> symb' 0/1
  14161. symb {spat srepl scond} \\-> symb' 0/1
  14162. " "Bottom-Up Match and Replace Cmd
  14163. --
  14164. Rewrites an expression.
  14165. --
  14166. Related: X\\|VMATCH
  14167. " "3DAD0" :Usr) "xMATCHUP" ("symb {spat srepl} \\-> symb' 0/1
  14168. symb {spat srepl scond} \\-> symb' 0/1
  14169. " "Bottom-Up Match and Replace Cmd
  14170. --
  14171. Rewrites an expression.
  14172. --
  14173. Related: X\\|VMATCH
  14174. " "3DAD0" :Usr) "~xMATHS" ("
  14175. " "Show the main MATH menu.
  14176. " "02F0DE" :Usr) "~xMATR" ("
  14177. " "Show the matrix menu.
  14178. --
  14179. Related: ARIT,BASE,CMPLX,DIFF,EXP&LN, SOLVER,TRIGO
  14180. " "083314" :Usr) "xMAX" ("x y \\-> x'
  14181. " "Maximum Func
  14182. --
  14183. Returns the greater (more positive)
  14184. of the arguments.
  14185. --
  14186. x y \\-> max(x, y)
  14187. x 'sym' \\-> 'MAX(x, sym)'
  14188. 'sym' x \\-> 'MAX(sym, x)'
  14189. 'sym1' 'sym2' \\-> 'MAX(sym1, sym2)'
  14190. x_u1 y_u2 \\-> max(x_u1, y_u2)
  14191. --
  14192. Related: MIN
  14193. " "3ADA5" :Usr) "xMAXR" ("\\-> MAXR
  14194. " "Maximum Real Func
  14195. --
  14196. Returns the symbolic constant
  14197. 'MAXR' or its numerical
  14198. representation, 9.99999999999E499.
  14199. --
  14200. \\-> 'MAXR'
  14201. \\-> 9.99999999999E499
  14202. --
  14203. Related: Ee,i,MINR,\\pi
  14204. " "39AE4" :Usr) "xMAX\\GS" ("\\-> xmax
  14205. \\-> [x1...xn]
  14206. " "Maximum Sigma Cmd
  14207. --
  14208. Finds the maximum coordinate
  14209. value in each of the m columns of
  14210. the current stat matrix (reserved
  14211. variable \\GSDAT).
  14212. --
  14213. <REF>TEXT:Reserved|\\GSDAT
  14214. --
  14215. Related: BINS,MEAN,MIN\\GS,SDEV,TOT,VAR
  14216. " "3DEE1" :Usr) "xMAXSIGMA" ("\\-> xmax
  14217. \\-> [x1...xn]
  14218. " "Maximum Sigma Cmd
  14219. --
  14220. Finds the maximum coordinate
  14221. value in each of the m columns of
  14222. the current stat matrix (reserved
  14223. variable \\GSDAT).
  14224. --
  14225. <REF>TEXT:Reserved|\\GSDAT
  14226. --
  14227. Related: BINS,MEAN,MIN\\GS,SDEV,TOT,VAR
  14228. " "3DEE1" :Usr) "~xMCALC" ("var \\->
  14229. {vars} \\->
  14230. \"ALL\" \\->
  14231. " "Make Calculated Value Cmd
  14232. --
  14233. Designates a variable as a calculated
  14234. value (not user-defined)
  14235. for the Multiple-Equation Solver.
  14236. --
  14237. Related: MUSER
  14238. " "0760AB" :Usr) "xMEAN" ("\\-> xmean
  14239. \\-> [x1...xn]
  14240. " "Mean Cmd
  14241. --
  14242. Returns the mean of each of the
  14243. m columns of coordinate values in
  14244. the current stat matrix (reserved
  14245. variable \\GSDAT).
  14246. --
  14247. <REF>TEXT:Reserved|\\GSDAT
  14248. --
  14249. Related: BINS,MAX\\GS,MIN\\GS,SDEV,TOT,VAR
  14250. " "3DEFC" :Usr) "xMEM" ("\\-> x
  14251. " "Memory Available Cmd
  14252. --
  14253. Returns the number of bytes of
  14254. available RAM.
  14255. --
  14256. Related: BYTES
  14257. " "3E8C1" :Usr) "~xMENUXY" ("n1 n2 \\->
  14258. " "Menu of CAS commands.
  14259. " "07A314" :CASHELP :Usr) "xMERGE" ("1 \\->
  14260. " "Merge RAM Card Cmd
  14261. Only useful on the 48.
  14262. --
  14263. Merges the RAM from the card in
  14264. port 1 with the rest of main user
  14265. memory. Merged memory is no
  14266. longer independent.
  14267. --
  14268. Related: FREE,FREE1
  14269. " "3EB16" :Usr) "xMIN" ("x y \\-> x'
  14270. " "Minumum Func
  14271. --
  14272. Returns the lesser (more
  14273. negative) of its two arguments.
  14274. --
  14275. x y \\-> min(x, y)
  14276. x 'sym' \\-> 'MIN(x, sym)'
  14277. 'sym' x \\-> 'MIN(sym, x)'
  14278. 'sym1' 'sym2' \\-> 'MIN(sym1, sym2)'
  14279. x_u1 y_u2 \\-> min(x_u1, y_u2)
  14280. --
  14281. Related: MAX
  14282. " "3AE2B" :Usr) "~xMINIFONT\\->" ("\\-> font
  14283. " "Returns the current minifont.
  14284. --
  14285. Related: \\->MINIFONT
  14286. " "0120DD" :Usr) "~x\\->MINIFONT" ("font \\->
  14287. " "Sets the font as current minifont.
  14288. --
  14289. Related: MINIFONT\\->
  14290. " "0110DD" :Usr) "~xMINIT" ("\\->
  14291. " "Multiple Equation Menu Init Cmd
  14292. --
  14293. Creates the reserved variable
  14294. Mpar.
  14295. --
  14296. <REF>TEXT:Reserved|Mpar
  14297. --
  14298. Related: MITM,MROOT,MSOLVER
  14299. " "0730AB" :Usr) "xMINR" ("\\-> MINR
  14300. " "Minimum Real Func
  14301. --
  14302. Returns the symbolic constant
  14303. 'MINR' or its numerical representation,
  14304. 1.00000000000E-499.
  14305. --
  14306. \\-> 'MAXR'
  14307. \\-> 1.00000000000E-499
  14308. --
  14309. Related: e,i,MAXR,\\pi
  14310. " "39B01" :Usr) "xMIN\\GS" ("\\-> xmin
  14311. \\-> [x1...xn]
  14312. " "Minimum Sigma Cmd
  14313. --
  14314. Finds the minimum coordinate
  14315. value in each of the m current
  14316. statistics matrix (reserved
  14317. variable \\GSDAT).
  14318. --
  14319. <REF>TEXT:Reserved|\\GSDAT
  14320. --
  14321. Related: BINS,MAX\\GS,MEAN,SDEV,TOT,VAR
  14322. " "3DF17" :Usr) "xMINSIGMA" ("\\-> xmin
  14323. \\-> [x1...xn]
  14324. " "Minimum Sigma Cmd
  14325. --
  14326. Finds the minimum coordinate
  14327. value in each of the m current
  14328. statistics matrix (reserved
  14329. variable \\GSDAT).
  14330. --
  14331. <REF>TEXT:Reserved|\\GSDAT
  14332. --
  14333. Related: BINS,MAX\\GS,MEAN,SDEV,TOT,VAR
  14334. " "3DF17" :Usr) "~xMITM" ("title {vars} \\->
  14335. " "Multiple Equation Menu Item
  14336. --
  14337. Order Cmd
  14338. --
  14339. Changes multiple equation menu
  14340. titles and order.
  14341. --
  14342. Related: MINIT
  14343. " "0740AB" :Usr) "~xMKISOM" ("
  14344. " "" "00E0DE" :CASHELP :Usr) "xMOD" ("x y \\-> x'
  14345. " "Modulo Func
  14346. --
  14347. Returns a remainder defined by:
  14348. x mod y = x - y floor (x/y)
  14349. --
  14350. x y \\-> x mod y
  14351. x 'sym' \\-> 'MOD(x, sym)'
  14352. 'sym' x \\-> 'MOD(sym, x)'
  14353. 'sym1' 'sym2' \\-> 'MOD(sym1, sym2)'
  14354. --
  14355. Related: FLOOR,/
  14356. " "3AFCB" :Usr) "~xMODSTO" ("mod \\->
  14357. " "" "079314" :CASHELP :Usr) "~xMODULAR" ("
  14358. " "" "02C0DE" :Usr) "~xMROOT" ("var \\-> x
  14359. \"ALL\" \\->
  14360. " "Multiple Roots Cmd
  14361. --
  14362. Uses the Multiple-Equation Solver
  14363. to solve for one or more variables
  14364. using the equation set in Mpar
  14365. --
  14366. Related: MCALC,MUSER
  14367. " "0770AB" :Usr) "~xMSGBOX" ("$ \\->
  14368. " "Message Box Cmd
  14369. --
  14370. Creates a user-defined message
  14371. box.
  14372. --
  14373. Related: CHOOSE,INFORM,PROMPT
  14374. " "04E0AB" :Usr) "~xMSLV" ("
  14375. " "" "0200DE" :CASHELP :Usr) "~xMSOLVR" ("\\->
  14376. " "Multiple-Equation Solver Cmd
  14377. --
  14378. Gets the Multiple-Equation Solver
  14379. variable menu for the set of
  14380. equations defined by Mpar.
  14381. " "0720AB" :Usr) "~xMULTMOD" ("symb1 symb2 \\-> symb3
  14382. " "" "070314" :CASHELP :Usr) "~xMUSER" ("var \\->
  14383. {vars} \\->
  14384. \"ALL\" \\->
  14385. " "Make User-Defined Variable Cmd
  14386. --
  14387. Designates a variable as user -
  14388. defined for the Multiple-Equation
  14389. Solver.
  14390. --
  14391. Related: MCALC
  14392. " "0750AB" :Usr) "~x\\->NDISP" ("n \\->
  14393. " "Set the number of program lines displayed on
  14394. the screen.
  14395. " "0060DD" :Usr) "~xNDIST" ("xq v x \\-> x'
  14396. " "Normal Distribution Cmd
  14397. --
  14398. Returns the normal probability
  14399. distribution (bell curve) at x
  14400. based on the mean m and variance
  14401. v of the normal distribution.
  14402. --
  14403. Related: UTPN
  14404. " "01C0AB" :Usr) "xNDUPN" ("ob n \\-> ob .. ob n
  14405. " "Duplicates object n times and returns n.
  14406. --
  14407. Related: DUP,DUPDUP,DUPN,DUP2
  14408. " "3F2B5" :Usr) "xNEG" ("x \\-> x'
  14409. " "Negate Analytic Func
  14410. --
  14411. Changes the sign or negates an
  14412. object.
  14413. --
  14414. z \\-> -z
  14415. #n1 \\-> #n2
  14416. [ arr ] \\-> [ -arr ]
  14417. 'sym' \\-> '-(sym)'
  14418. x_u \\-> -x_u
  14419. grob1 \\-> grob2
  14420. PICT1 \\-> PICT2
  14421. --
  14422. Related: ABS,CONJ,NOT,SIGN
  14423. " "39976" :Usr) "xNEWOB" ("ob \\-> ob
  14424. " "New Object Cmd
  14425. --
  14426. Creates a new copy of the
  14427. specifiedfied object.
  14428. --
  14429. Related: MEM,PURGE
  14430. " "394AA" :Usr) "xNEXT" ("\\->
  14431. " "NEXT Cmd
  14432. --
  14433. Ends definite loop structures.
  14434. See the FOR and START command
  14435. entries for syntax information.
  14436. --
  14437. Related: FOR,START,STEP
  14438. " "3831C" :Usr) "~xNEXTPRIME" ("n \\-> n'
  14439. " "" "03D314" :CASHELP :Usr) "xNIP" ("ob1 ob2 \\-> ob2
  14440. " " --
  14441. Related: DUP,DUPDUP,DUPN,DUP2
  14442. " "3F264" :Usr) "xNOT" ("x \\-> x'
  14443. " "NOT Cmd
  14444. --
  14445. Returns the one's complement or
  14446. the logical inverse of the argument.
  14447. --
  14448. #n1 \\-> #n2
  14449. T/F \\-> 0/1
  14450. \"str1\" \\-> \"str2\"
  14451. 'sym' \\-> 'NOT sym'
  14452. --
  14453. Related: AND,OR,XOR
  14454. " "3CB13" :Usr) "xNOVAL" ("\\->
  14455. " "INFORM Place Holder/Result Cmd
  14456. --
  14457. Place holder for reset and initial
  14458. values in user-defined dialog
  14459. boxes. NOVAL is returned to the
  14460. stack when a field is empty.
  14461. --
  14462. Related: INFORM
  14463. " "3F0FC" :Usr) "xN\\GS" ("\\-> nrows
  14464. " "Number of Rows Cmd
  14465. --
  14466. Returns the number of rows in the
  14467. current statistical matrix
  14468. (reserved variable \\GSDAT).
  14469. --
  14470. <REF>TEXT:Reserved|\\GSDAT
  14471. --
  14472. Related: \\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2
  14473. " "3DE09" :Usr) "xNSIGMA" ("\\-> nrows
  14474. " "Number of Rows Cmd
  14475. --
  14476. Returns the number of rows in the
  14477. current statistical matrix
  14478. (reserved variable \\GSDAT).
  14479. --
  14480. <REF>TEXT:Reserved|\\GSDAT
  14481. --
  14482. Related: \\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2
  14483. " "3DE09" :Usr) "~xNSUB" ("\\-> npos
  14484. " "Number of Sublist Cmd
  14485. --
  14486. Provides a way to access the
  14487. current sublist position during
  14488. an iteration of a program or
  14489. command applied using DOSUBS.
  14490. --
  14491. Related: DOSUBS,ENDSUB
  14492. " "0560AB" :Usr) "xNUM" ("$ \\-> n
  14493. " "Character Number Cmd
  14494. --
  14495. Returns the character code n for
  14496. the first character in the string.
  14497. --
  14498. Related: CHR,POS,REPL,SIZE,SUB
  14499. " "3BBF9" :Usr) "~xNUMX" ("n \\->
  14500. " "Number of X-Steps Cmd
  14501. --
  14502. Sets the number of x-steps for
  14503. each y-step in 3D perspective
  14504. plots.
  14505. --
  14506. Related: NUMY
  14507. " "0060AB" :Usr) "~xNUMY" ("n \\->
  14508. " "Number of Y-Steps Cmd
  14509. --
  14510. Sets the number of y-steps across
  14511. the view volume in 3D perspective
  14512. plots.
  14513. --
  14514. Related: NUMX
  14515. " "0070AB" :Usr) "x\\->NUM" ("x \\-> x'
  14516. " "Evaluate to Number Cmd
  14517. --
  14518. Evaluates a symbolic argument
  14519. object and returns the numerical
  14520. result.
  14521. --
  14522. objsym \\-> z
  14523. --
  14524. Related: \\->Q,\\->Qpi
  14525. " "39785" :Usr) "x>NUM" ("x \\-> x'
  14526. " "Evaluate to Number Cmd
  14527. --
  14528. Evaluates a symbolic argument
  14529. object and returns the numerical
  14530. result.
  14531. --
  14532. objsym \\-> z
  14533. --
  14534. Related: \\->Q,\\->Qpi
  14535. " "39785" :Usr) "xOBJ\\->" ("ob \\-> ?
  14536. " "Object to Stack Cmd
  14537. --
  14538. Separates an object into its
  14539. components onto the stack. For some
  14540. object types, the number of
  14541. composites is returned to level 1.
  14542. --
  14543. (x,y) \\-> x y
  14544. {obj1 ... objn} \\-> obj1 objn n
  14545. [x1 ... xn] \\-> x1 xn {n}
  14546. [[x11 ... xm n]] \\-> x11 xm n {m n}
  14547. \"obj\" \\-> evaluated-obj
  14548. 'sym' \\-> obj1 ... objn n func
  14549. x_u \\-> x 1_u
  14550. :tag:obj \\-> obj \"tag\"
  14551. --
  14552. Related: ARRY\\->,C\\->R,DTAG,EQ\\->, R\\->C,STR\\->,\\->TAG
  14553. " "3BE38" :Usr) "xOBJ>" ("ob \\-> ?
  14554. " "Object to Stack Cmd
  14555. --
  14556. Separates an object into its
  14557. components onto the stack. For some
  14558. object types, the number of
  14559. composites is returned to level 1.
  14560. --
  14561. (x,y) \\-> x y
  14562. {obj1 ... objn} \\-> obj1 objn n
  14563. [x1 ... xn] \\-> x1 xn {n}
  14564. [[x11 ... xm n]] \\-> x11 xm n {m n}
  14565. \"obj\" \\-> evaluated-obj
  14566. 'sym' \\-> obj1 ... objn n func
  14567. x_u \\-> x 1_u
  14568. :tag:obj \\-> obj \"tag\"
  14569. --
  14570. Related: ARRY\\->,C\\->R,DTAG,EQ\\->, R\\->C,STR\\->,\\->TAG
  14571. " "3BE38" :Usr) "xOCT" ("\\->
  14572. " "Octal Mode Cmd
  14573. --
  14574. Selects octal base for binary
  14575. integer operations. (The default
  14576. base is decimal.)
  14577. --
  14578. Related: BIN,DEC,HEX,RCWS,STWS
  14579. " "3B6A6" :Usr) "xOFF" ("\\->
  14580. " "Off Cmd
  14581. --
  14582. Turns off the calculator.
  14583. --
  14584. Related: CONT,HALT,KILL
  14585. " "3950C" :Usr) "xOLDPRT" ("
  14586. " "Old Printer Cmd
  14587. --
  14588. Modifies the remapping string in
  14589. the reserved variable PRTPAR so
  14590. that the extended character set
  14591. of the HP 48 matches that of the
  14592. HP 82240A Infrared Printer.
  14593. Not useful on the 49G.
  14594. " "3D0BC" :Usr) "xOPENIO" ("\\->
  14595. " "Open I/O Port Cmd
  14596. --
  14597. Opens the serial port or the IR
  14598. port using the I/O parameters in
  14599. the reserved variable IOPAR.
  14600. --
  14601. <REF>TEXT:Reserved|IOPAR
  14602. --
  14603. Related: BUFLEN,CLOSEIO,SBRK,SRECV, STIME,XMIT
  14604. " "3EC75" :Usr) "xOR" ("x y \\-> x'
  14605. " "OR Func
  14606. --
  14607. Returns the logical OR of two
  14608. arguments.
  14609. --
  14610. #n1 #n2 \\-> #n3
  14611. \"str1\" \"str2\" \\-> \"str3\"
  14612. T/F1 T/F2 \\-> 0/1
  14613. T/F 'sym' \\-> 'T/F OR sym'
  14614. 'sym' T/F \\-> 'sym OR T/F'
  14615. 'sym1' 'sym2' \\-> 'sym1 OR sym2'
  14616. --
  14617. Related: AND,NOT,XOR
  14618. " "3CA8D" :Usr) "xORDER" ("{names} \\->
  14619. " "Order Variables Cmd
  14620. --
  14621. Reorders the variables in the
  14622. current directory (shown in the
  14623. VAR menu) to the order specified.
  14624. --
  14625. Related: VARS
  14626. " "3E8F0" :Usr) "xOVER" ("1 2 \\-> 1 2 1
  14627. " "Over Cmd
  14628. --
  14629. Returns a copy to stack level 1
  14630. of the object in level 2.
  14631. --
  14632. Related: PICK,ROLL,ROLLD,ROT,SWAP
  14633. " "3DC8C" :Usr) "~xP2C" ("???
  14634. " "" "01F0DE" :CASHELP :Usr) "~xPA2B2" ("n \\-> n'
  14635. " "" "039314" :CASHELP :Usr) "xPARAMETRIC" ("\\->
  14636. " "Parametric Plot Type Cmd
  14637. --
  14638. Sets the plot type to PARAMETRIC.
  14639. --
  14640. Related: BAR,CONTOUR,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE
  14641. " "3C98B" :Usr) "xPARITY" ("n \\->
  14642. " "Parity Cmd
  14643. --
  14644. Sets the parity value in the
  14645. reserved variable IOPAR.
  14646. --
  14647. <REF>TEXT:Reserved|IOPAR
  14648. --
  14649. Related: BAUD,CKSM,TRANSIO
  14650. " "3EDEC" :Usr) "~xPARSURFACE" ("\\->
  14651. " "PARSURFACE Plot Type Cmd
  14652. --
  14653. Sets the plot type to PARSURFACE.
  14654. --
  14655. Related: BAR,CONIC,DIFFEQ,FAST3D, FUNCTION,GRIDMAP,HISTOGRAM,PARAMETRIC, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE
  14656. " "0090AB" :Usr) "~xPARTFRAC" ("symb \\-> symb'
  14657. " "" "034314" :CASHELP :Usr) "xPATH" ("\\-> {HOME dir1 .. dirn}
  14658. " "Current Path Cmd
  14659. --
  14660. Returns a list specifying the
  14661. path to the current directory.
  14662. --
  14663. Related: CRDIR,HOME,PGDIR,UPDIR
  14664. " "393EA" :Usr) "~xPCAR" ("[nxn] \\-> pol
  14665. " "" "04F314" :CASHELP :Usr) "~xPCOEF" ("[roots] \\-> [coefs]
  14666. " "Monic Polynomial Coefficients Cmd
  14667. --
  14668. Returns the coefficients of a
  14669. monic polynomial (a polynomial
  14670. with a leading coefficient of 1)
  14671. having specific roots.
  14672. --
  14673. Related: PEVAL,PROOT
  14674. " "0450AB" :Usr) "~xPCONTOUR" ("\\->
  14675. " "PCONTOUR Plot Type Cmd
  14676. --
  14677. Sets the plot type to PCONTOUR.
  14678. --
  14679. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, POLAR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE
  14680. " "00D0AB" :Usr) "~xPCOV" ("\\-> xpcovariance
  14681. " "Population Covariance Cmd
  14682. --
  14683. Returns the population covariance
  14684. of the independent and dependent
  14685. data columns in the current stat
  14686. matrix (reserved variable \\GSDAT).
  14687. --
  14688. <REF>TEXT:Reserved|\\GSDAT
  14689. --
  14690. Related: COL\\GS,CORR,COV,PREDX,PREDY, XCOL,YCOL
  14691. " "01F0AB" :Usr) "xPDIM" ("(xmin,ymin) (xmax,ymax) \\->
  14692. #width #height \\->
  14693. " "PICT Dimension Cmd
  14694. --
  14695. Replaces PICT with a blank PICT
  14696. of the specified dimensions.
  14697. --
  14698. Related: PMAX,PMIN
  14699. " "3C4F5" :Usr) "xPERM" ("n k \\-> n'
  14700. " "Permutations Func
  14701. --
  14702. Returns the number of possible
  14703. permutations of n items taken m
  14704. at a time.
  14705. --
  14706. n m \\-> Pn,m
  14707. 'symn' m \\-> 'PERM(symn,m)'
  14708. n 'symm' \\-> 'PERM(n,symm)'
  14709. 'symn' 'symm' \\-> 'PERM(symn,symm)'
  14710. --
  14711. Related: COMB,!
  14712. " "3B477" :Usr) "~xPEVAL" ("[coefs] x \\-> x'
  14713. " "Polynomial Evaluation Cmd
  14714. --
  14715. Evaluates an n-degree polynomial
  14716. at x.
  14717. --
  14718. Related: PCOEFF,PROOT
  14719. " "0460AB" :Usr) "xPGDIR" ("name \\->
  14720. " "Purge Directory Cmd
  14721. --
  14722. Purges the named directory
  14723. (whether empty or not).
  14724. --
  14725. Related: CLVAR,CRDIR,HOME,PATH,PURGE, UPDIR
  14726. " "3EAA7" :Usr) "xPICK" ("1...n n \\-> 1..n 1
  14727. " "Pick Object Cmd
  14728. --
  14729. Copies the contents of a specified
  14730. level to level 1.
  14731. --
  14732. Related: DUP,DUPN,DUP2,OVER,ROLL,ROLLD, ROT,SWAP
  14733. " "3DCFD" :Usr) "xPICK3" ("1 2 3 \\-> 1 2 3 1
  14734. " "Duplicate the object on level 3 of the stack.
  14735. --
  14736. Related: PICK,OVER,DUP
  14737. " "3F27F" :Usr) "xPICT" ("\\-> PICT
  14738. " "PICT Cmd
  14739. --
  14740. Puts the name PICT on the stack.
  14741. --
  14742. Related: GOR,GCOR,NEG,PICTURE,PVIEW, RCL,REPL,SIZE,STO,SUB
  14743. " "3C72A" :Usr) "xPICTURE" ("\\->
  14744. " "Picture Environment Cmd
  14745. --
  14746. Selects the Picture environment
  14747. (selects the graphics display and
  14748. activates the graphics cursor and
  14749. Picture menu).
  14750. --
  14751. Related: PVIEW,TEXT,PIC
  14752. " "3C5AE" :Usr) "xGRAPH" ("\\->
  14753. " "Picture Environment Cmd
  14754. --
  14755. Selects the Picture environment
  14756. (selects the graphics display and
  14757. activates the graphics cursor and
  14758. Picture menu).
  14759. --
  14760. Related: PVIEW,TEXT,PIC
  14761. " "3C5AE" :Usr) "~xPINIT" ("\\->
  14762. " "Port Initialize Cmd
  14763. --
  14764. Initializes all currently active
  14765. ports. Does not affect data
  14766. already stored in a port.
  14767. " "06A0AB" :Usr) "xPIX?" ("(x,y) \\-> 1/0
  14768. {#n #m} \\-> 1/0
  14769. " "Pixel On? Cmd
  14770. --
  14771. Tests whether the specified pixel
  14772. in PICT is on; returns 1 (true)
  14773. if the pixel is on, and 0 (false)
  14774. if the pixel is off.
  14775. --
  14776. Related: PIXON,PIXOFF
  14777. " "3C662" :Usr) "xPIXOFF" ("(x,y) \\->
  14778. {#n #m} \\->
  14779. " "Pixel Off Cmd
  14780. --
  14781. Turns off the pixel at the specified
  14782. coordinate in PICT.
  14783. --
  14784. Related: PIX?,PIXON
  14785. " "3C638" :Usr) "xPIXON" ("(x,y) \\->
  14786. {#n #m} \\->
  14787. " "Pixel On Cmd
  14788. --
  14789. Turns on the pixel at the
  14790. specified coordinate in PICT.
  14791. --
  14792. Related: PIX?,PIXOFF
  14793. " "3C60E" :Usr) "xPKT" ("$data $type \\-> $response
  14794. " "Packet Cmd
  14795. --
  14796. Used to send command \"packets\"
  14797. (and receive requested data) to
  14798. a Kermit server.
  14799. --
  14800. Related: CLOSEIO,KERRM,SERVER
  14801. " "3EE9D" :Usr) "~xPLOT" ("f \\-> f
  14802. " "Plots a function.
  14803. " "009314" :CASHELP :Usr) "~xPLOTADD" ("f \\->
  14804. " "Adds function to existing plot function list,
  14805. and opens the Plot Setup screen.
  14806. " "00A314" :Usr) "xPMAX" ("(x,y) \\->
  14807. " "PICT Maximum Cmd
  14808. --
  14809. Specifies (x,y) as the coordinates
  14810. at the upper right corner of
  14811. the display.
  14812. --
  14813. Related: PDIM,PMIN,XRNG,YRNG
  14814. " "3C392" :Usr) "xPMIN" ("(x,y) \\->
  14815. " "PICT Minimum Cmd
  14816. --
  14817. Specifies (x,y) as the coordinates
  14818. at the lower left corner of
  14819. the display.
  14820. --
  14821. Related: PDIM,PMAX,XRNG,YRNG
  14822. " "3C372" :Usr) "~xPMINI" ("
  14823. " "" "0140DE" :CASHELP :Usr) "xPOLAR" ("\\->
  14824. " "Polar Plot Type Cmd
  14825. --
  14826. Sets the plot type to POLAR.
  14827. --
  14828. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE
  14829. " "3C979" :Usr) "~xPOLYNOMIAL" ("\\->
  14830. " "Display polynomial menu.
  14831. " "02D0DE" :CASHELP :Usr) "~xPOP" ("\\->
  14832. " " --
  14833. Related: PUSH
  14834. " "0350DE" :Usr) "xPOS" ("str substring \\-> n/0
  14835. {} ob \\-> n/0
  14836. " "Position Cmd
  14837. --
  14838. Returns the position of a substring
  14839. within a string or the
  14840. position of an object within a
  14841. list.
  14842. --
  14843. Related: CHR,NUM,REPL,SIZE,SUB
  14844. " "3BB94" :Usr) "~xPOTENTIAL" ("
  14845. " "" "0380DE" :CASHELP :Usr) "~xPOWEXPAND" ("
  14846. " "" "01B0DE" :CASHELP :Usr) "~xPOWMOD" ("symb exp \\-> symb'
  14847. " "" "073314" :CASHELP :Usr) "xPR1" ("ob \\-> ob
  14848. " "Print Level 1 Cmd
  14849. --
  14850. Prints an object in multiline
  14851. printer format.
  14852. --
  14853. Related: CR,DELAY,OLDPRT,PRTLCD,PRST, PRSTC,PRVAR
  14854. " "3D0D7" :Usr) "xPREDV" ("x \\-> y
  14855. " "Predicted y-Value Cmd
  14856. --
  14857. Returns the predicted dependent
  14858. variable value ydepend, based on
  14859. the independent-variable value
  14860. xindep, the currently selected
  14861. stat model, and the current
  14862. regression coefficients in the
  14863. reserved variable \\GSPAR.
  14864. --
  14865. <REF>TEXT:Reserved|\\GSPAR
  14866. --
  14867. Related: PREDX
  14868. " "3DFDD" :Usr) "xPREDX" ("y \\-> x
  14869. " "Predicted x-Value Cmd
  14870. --
  14871. Returns the predicted dependent
  14872. variable value xindepend, based
  14873. on the independent-variable value
  14874. ydepend, the currently selected
  14875. stat model, and the current
  14876. regression coefficients in the
  14877. reserved variable \\GSPAR.
  14878. --
  14879. <REF>TEXT:Reserved|\\GSPAR
  14880. --
  14881. Related: COL\\GS,CORR,COV,EXPFIT, \\GSLINE,LINFIT,LOGFIT,LR, PREDY,PWRFIT,XCOL,YCOL
  14882. " "3E01D" :Usr) "xPREDY" ("x \\-> y
  14883. " "Predicted y-Value Cmd
  14884. --
  14885. Returns the predicted dependent
  14886. variable value ydepend, based on
  14887. the independent-variable value
  14888. xindepend, the currently selected
  14889. stat model, and the current
  14890. regression coefficients in the
  14891. reserved variable \\GSPAR.
  14892. --
  14893. <REF>TEXT:Reserved|\\GSPAR
  14894. --
  14895. Related: COL\\GS,CORR,COV,EXPFIT, \\GSLINE,LINFIT,LOGFIT,LR, PREDX,PWRFIT,XCOL,YCOL
  14896. " "3DFFD" :Usr) "~xPREVAL" ("f x1 x2 \\-> symb
  14897. \\-> x
  14898. " "" "00C314" :CASHELP :Usr) "~xPREVPRIME" ("n \\-> n'
  14899. " "" "03E314" :CASHELP :Usr) "xPRLCD" ("\\->
  14900. " "Print LCD Cmd
  14901. --
  14902. Prints a pixel-by-pixel image of
  14903. the current display (excluding
  14904. the annunciators)
  14905. --
  14906. Related: CR,DELAY,OLDPRT,PRST,PRSTC, PRVAR,PR1
  14907. " "3D1E7" :Usr) "xPROMPT" ("$ \\->
  14908. " "Prompt Cmd
  14909. --
  14910. Displays the contents of \"prompt\"
  14911. in the status area, and halts
  14912. program execution.
  14913. --
  14914. Related: CONT,DISP,FREEZE,HALT,INFORM, INPUT,MSGBOX
  14915. " "38BBF" :Usr) "~xPROMPTSTO" ("var \\->
  14916. " "Creates a variable and promts for a value to
  14917. store there.
  14918. --
  14919. Related: PROMPT,STO
  14920. " "08B314" :Usr) "~xPROOT" ("[coefs] \\-> [roots]
  14921. " "Polynomial Roots Cmd
  14922. --
  14923. Returns all roots of an n-degree
  14924. polynomial having real or complex
  14925. roots.
  14926. --
  14927. Related: PCOEFF,PEVAL
  14928. " "0440AB" :Usr) "~xPROPFRAC" ("x \\-> symb'
  14929. " "" "035314" :CASHELP :Usr) "xPRST" ("\\->
  14930. " "Print Stack Cmd
  14931. --
  14932. Prints all objects in the stack,
  14933. starting with the object in the
  14934. highest level.
  14935. --
  14936. Related: CR,DELAY,OLDPRT,PRLCD,PRSTC, PRVAR,PR1
  14937. " "3D10D" :Usr) "xPRSTC" ("
  14938. " "Print Stack (Compact) Cmd
  14939. --
  14940. Prints in compact form all objects
  14941. in the stack, starting with
  14942. the object in the highest level.
  14943. --
  14944. Related: PR,DELAY,OLDPRT,PRLCD,PRST, PRVAR,PR1
  14945. " "3D0F2" :Usr) "xPRVAR" ("name \\->
  14946. {names} \\->
  14947. :port:name \\->
  14948. " "Print Variable Cmd
  14949. --
  14950. Searches the current directory
  14951. path or port for the specified
  14952. variables and prints the name and
  14953. contents of each variable.
  14954. --
  14955. Related: CP,DELAY,OLDPRT,PR1,PRLCD, PRST,PRSTC
  14956. " "3D143" :Usr) "~xPSDEV" ("\\-> xpsdev
  14957. \\-> {x1...xn}
  14958. " "Population Standard Deviation Cmd
  14959. --
  14960. Calculates the population standard
  14961. deviation of each of the m
  14962. columns of coordiate values in
  14963. the current stastics matrix
  14964. (reserved variable \\GSDAT).
  14965. --
  14966. <REF>TEXT:Reserved|\\GSDAT
  14967. --
  14968. Related: MEAN,PCOV,PVAR,SDEV,TOT,VAR
  14969. " "01D0AB" :Usr) "~xPSI" ("symb \\-> symb'
  14970. " "" "0040DE" :CASHELP :Usr) "~xPsi" ("symb n \\-> symb'
  14971. " "" "0030DE" :CASHELP :Usr) "~xPTAYL" ("pol x \\-> pol'
  14972. " "" "036314" :CASHELP :Usr) "~xPUSH" ("\\->
  14973. " "" "0340DE" :Usr) "xPUT" ("ob pos obj \\-> ob'
  14974. ob = [] or [[]] or {} or name
  14975. pos = n or {n} or {n m}
  14976. " "Put Element Cmd
  14977. --
  14978. In the level 3 array or list, PUT
  14979. replaces with zput or objput the
  14980. object whose position is specified
  14981. in level 2; if the array or
  14982. list is unnamed, returns the new
  14983. array or list.
  14984. --
  14985. Related: GET,GETI,PUTI
  14986. " "3C0BF" :Usr) "xPUTI" ("ob pos obj \\-> [] pos'
  14987. ob = [] or [[]] or {} or name
  14988. pos = n or {n} or {n m}
  14989. " "Put and Increment Index Cmd
  14990. --
  14991. In the level 3 array or list,
  14992. replaces with zput or objput the
  14993. object whose position is specified
  14994. in level 2, returning the
  14995. new array or list and the next
  14996. position in that array or list.
  14997. --
  14998. Related: GET,GETI,PUT
  14999. " "3C139" :Usr) "~xPVAR" ("\\-> xpvariance
  15000. \\-> [x1...xn]
  15001. " "Poplulation Variance Cmd
  15002. --
  15003. Calculates the population variance
  15004. of the coordinate values in
  15005. each of the m columns in the
  15006. current stat matrix (\\GSDAT).
  15007. --
  15008. Related: MEAN,PCOV,PSDEV,SDEV,VAR
  15009. " "01E0AB" :Usr) "xPVARS" ("nport \\-> {} mem
  15010. " "Port-Variables Cmd
  15011. --
  15012. Returns a list of the backup objects
  15013. (:nport:name) and the lib-
  15014. rary objects (:nport:nlibrary) in
  15015. the specified port. Also returns
  15016. the available memory size (if
  15017. RAM) or the memory type.
  15018. --
  15019. Related: VARS
  15020. " "3EA49" :Usr) "xPVIEW" ("(x,y) \\->
  15021. {#n #m} \\->
  15022. " "PICT View Cmd
  15023. --
  15024. Displays PICT with the specified
  15025. coordinate at the upper left
  15026. corner of the graphics display.
  15027. --
  15028. Related: FREEZE,PICTURE,PICT,TEXT
  15029. " "3C5E4" :Usr) "xPWRFIT" ("
  15030. " "Power Curve Fit Cmd
  15031. --
  15032. Stores PWRFIT as the fifth parameter
  15033. in the reserved variable
  15034. \\GSPAR, indicating that subsequent
  15035. executions of LR are to use the
  15036. power curve fitting model.
  15037. --
  15038. <REF>TEXT:Reserved|\\GSPAR
  15039. --
  15040. Related: BESTFIT,EXPFIT,LINFIT, LOGFIT,LR
  15041. " "3E283" :Usr) "xPX\\->C" ("{#m #n} \\-> (x,y)
  15042. " "Pixel to Complex Cmd
  15043. --
  15044. Converts the specified pixel
  15045. coordinates to user-unit
  15046. coordinates.
  15047. --
  15048. Related: C\\->PX
  15049. " "3C56E" :Usr) "xPX>C" ("{#m #n} \\-> (x,y)
  15050. " "Pixel to Complex Cmd
  15051. --
  15052. Converts the specified pixel
  15053. coordinates to user-unit
  15054. coordinates.
  15055. --
  15056. Related: C\\->PX
  15057. " "3C56E" :Usr) "x\\->Q" ("x \\-> a/b
  15058. " "To Quotient Cmd
  15059. --
  15060. Returns a rational form of the
  15061. argument.
  15062. --
  15063. x \\-> 'a/b'
  15064. (x,y) \\-> 'a/b+c/d*i
  15065. 'sym1' \\-> 'sym2'
  15066. --
  15067. Related: \\->Q\\pi,/
  15068. " "3DA3E" :Usr) "x->Q" ("x \\-> a/b
  15069. " "To Quotient Cmd
  15070. --
  15071. Returns a rational form of the
  15072. argument.
  15073. --
  15074. x \\-> 'a/b'
  15075. (x,y) \\-> 'a/b+c/d*i
  15076. 'sym1' \\-> 'sym2'
  15077. --
  15078. Related: \\->Q\\pi,/
  15079. " "3DA3E" :Usr) "x\\->Q\\pi" ("x \\-> symb
  15080. " "To Quotient Times \\pi Cmd
  15081. --
  15082. Returns a rational form of the
  15083. argument, or a rational form of
  15084. the argument with \\pi factored out,
  15085. whichever yields the smaller
  15086. denominator.
  15087. --
  15088. x \\-> 'a/b*\\pi'
  15089. x \\-> 'a/b'
  15090. 'sym1' \\-> 'symb2'
  15091. (x,y) \\-> 'a/b*\\pi+c/d*\\pi*i
  15092. (x,y) \\-> 'a/b+c/d*i
  15093. --
  15094. Related: \\->Q,/,\\pi
  15095. " "3DA63" :Usr) "x->QPI" ("x \\-> symb
  15096. " "To Quotient Times \\pi Cmd
  15097. --
  15098. Returns a rational form of the
  15099. argument, or a rational form of
  15100. the argument with \\pi factored out,
  15101. whichever yields the smaller
  15102. denominator.
  15103. --
  15104. x \\-> 'a/b*\\pi'
  15105. x \\-> 'a/b'
  15106. 'sym1' \\-> 'symb2'
  15107. (x,y) \\-> 'a/b*\\pi+c/d*\\pi*i
  15108. (x,y) \\-> 'a/b+c/d*i
  15109. --
  15110. Related: \\->Q,/,\\pi
  15111. " "3DA63" :Usr) "~xqr" ("
  15112. " "" "0080DE" :Usr) "~xQR" ("[[]] \\-> [[Q]] [[R]] [[P]]
  15113. " "QR Factorization of a Matrix Cmd
  15114. --
  15115. Returns the QR factorization of
  15116. an n\327m matrix.
  15117. --
  15118. Related: LQ,LSQ
  15119. " "0310AB" :Usr) "xQUAD" ("symb var \\-> symb'
  15120. " "Solve Quadratic Equation Cmd
  15121. --
  15122. Solves an algebraic object symb
  15123. for the variable var, and
  15124. returns an expression symb'
  15125. representing the solution.
  15126. --
  15127. Related: COLCT,EXPAN,ISOL,SHOW,SOLVE
  15128. " "3E66F" :Usr) "xQUOTE" ("ob \\-> 'ob
  15129. " "Quote Argument Func
  15130. --
  15131. Returns its argument unevaluated.
  15132. --
  15133. 'sym' \\-> 'sym'
  15134. obj \\-> obj
  15135. --
  15136. Related: APPLY,|
  15137. " "3D6F6" :Usr) "~xQUOT" ("p1 p2 \\-> p3
  15138. " "" "028314" :CASHELP :Usr) "~xQXA" ("symb [vars] \\-> [[]] [vars]
  15139. " "" "04B314" :CASHELP :Usr) "xRAD" ("\\->
  15140. " "Radians Mode Cmd
  15141. --
  15142. Sets Radians angle mode.
  15143. --
  15144. Related: DEG,RAD
  15145. " "3B564" :Usr) "xRAND" ("\\-> x
  15146. " "Random Number Cmd
  15147. --
  15148. Returns a pseudo-random number
  15149. generated using a seed value, and
  15150. updates the seed value.
  15151. --
  15152. Related: COMB,PERM,RDZ,!
  15153. " "3B3E6" :Usr) "~xRANK" ("[[]] \\-> n
  15154. " "Matrix Rank Cmd
  15155. --
  15156. Returns the rank of a rectangular
  15157. matrix.
  15158. --
  15159. Related: LQ,LSQ,QR
  15160. " "02A0AB" :Usr) "~xRANM" ("{m n} \\-> [[]]
  15161. [[]] \\-> [[]]'
  15162. " "Random Matrix Cmd
  15163. --
  15164. Returns a matrix of specified
  15165. dimensions that contains random
  15166. integers in the range -9 through
  15167. 9.
  15168. --
  15169. { m n } \\-> [[ rand mat ]]m\327n
  15170. [[ mat ]]m\327n \\-> [[ rand mat ]]m\327n
  15171. --
  15172. Related: RAND,RDZ
  15173. " "0350AB" :Usr) "xRATIO" ("x y \\-> x/y
  15174. " "Prefix Divide Func
  15175. --
  15176. Prefix form of / (divide) generated
  15177. by the Equation Writer Application.
  15178. --
  15179. z1 z2 \\-> z1/z2
  15180. [arr] [[mat]] \\-> [[arr\327mat^-1]]
  15181. [arr] z \\-> [arr/z]
  15182. z 'sym' \\-> 'z/sym'
  15183. 'sym' z \\-> 'sym/z'
  15184. 'sym1' 'sym2' \\-> 'sym1/sym2'
  15185. #n1 n2 \\-> #n3
  15186. n1 #n2 \\-> #n3
  15187. #n1 #n2 \\-> #n3
  15188. x_u1 y_u2 \\-> (x/y)_u1/u2
  15189. x y_u \\-> (x/y)_1/u
  15190. x_u y \\-> (x/y)_u
  15191. 'sym' x_u \\-> 'sym/x_u'
  15192. x_u 'sym' \\-> 'x_u/sym'
  15193. --
  15194. Related: /
  15195. " "3DBCA" :Usr) "xPREDIV" ("x y \\-> x/y
  15196. " "Prefix Divide Func
  15197. --
  15198. Prefix form of / (divide) generated
  15199. by the Equation Writer Application.
  15200. --
  15201. z1 z2 \\-> z1/z2
  15202. [arr] [[mat]] \\-> [[arr\327mat^-1]]
  15203. [arr] z \\-> [arr/z]
  15204. z 'sym' \\-> 'z/sym'
  15205. 'sym' z \\-> 'sym/z'
  15206. 'sym1' 'sym2' \\-> 'sym1/sym2'
  15207. #n1 n2 \\-> #n3
  15208. n1 #n2 \\-> #n3
  15209. #n1 #n2 \\-> #n3
  15210. x_u1 y_u2 \\-> (x/y)_u1/u2
  15211. x y_u \\-> (x/y)_1/u
  15212. x_u y \\-> (x/y)_u
  15213. 'sym' x_u \\-> 'sym/x_u'
  15214. x_u 'sym' \\-> 'x_u/sym'
  15215. --
  15216. Related: /
  15217. " "3DBCA" :Usr) "xRCEQ" ("\\-> EQ
  15218. " "Recall from EQ Cmd
  15219. --
  15220. Returns the unevaluated contents
  15221. of the reserved variable EQ from
  15222. the current directory.
  15223. --
  15224. <REF>TEXT:Reserved|EQ
  15225. --
  15226. Related: STEQ
  15227. " "3D393" :Usr) "~xRCI" ("[[]] x nrow \\-> [[]]'
  15228. [] x n []'
  15229. " "Multiply Row by Constant Cmd
  15230. --
  15231. Multiplies row n of a matrix (or
  15232. element n of a vector) by a const
  15233. x, and returns the modified
  15234. matrix.
  15235. --
  15236. Related: RCIJ
  15237. " "0420AB" :Usr) "~xRCIJ" ("[[]] x n* n+ \\-> [[]]'
  15238. [] x n* n+ \\-> []'
  15239. " "Add Multiplied Row Cmd
  15240. --
  15241. Multiplies row n* of a matrix by a
  15242. constant x, adds this product
  15243. to row n+ of the matrix, and
  15244. returns the modified matrix. Or,
  15245. multiplies element n* of a vector
  15246. by a constant x, adds this
  15247. product to element n+ of the vector,
  15248. and returns the modified
  15249. vector.
  15250. --
  15251. Related: RCI
  15252. " "0430AB" :Usr) "xRCL" ("var \\-> x
  15253. :port:nlib \\-> lib
  15254. :port:name \\-> ob
  15255. :port:{path} \\-> ob
  15256. " "Recall Cmd
  15257. --
  15258. Returns the unevaluated contents
  15259. of a specified variable or plug
  15260. -in object.
  15261. --
  15262. Related: STO
  15263. " "3E6F1" :Usr) "xRCLALARM" ("n \\-> {date time action rep}
  15264. " "Recall Alarm Cmd
  15265. --
  15266. Recalls a specified alarm.
  15267. --
  15268. Related: DELALARM,FINDALARM,STOALARM
  15269. " "3918E" :Usr) "xRCLF" ("\\-> {#s1 #u1 #s2 #u2}
  15270. " "Recall Flags Cmd
  15271. --
  15272. Returns a list containing four 64
  15273. bit binary integers representing
  15274. the states of the 64 system and
  15275. user flags, respectively.
  15276. --
  15277. Related: STOF
  15278. " "3B715" :Usr) "xRCLKEYS" ("\\-> {ob ... key ...}
  15279. \\-> {S ob ... key ...}
  15280. " "Recall Key Assignments Cmd
  15281. --
  15282. Returns the current user key
  15283. assignments. This includes an S
  15284. if the standard key definitions
  15285. are active (not suppressed) for
  15286. those keys without user key
  15287. assignments.
  15288. --
  15289. Related: ASN,DELKEYS,STOKEYS
  15290. " "3EF79" :Usr) "xRCLMENU" ("\\-> x
  15291. " "Recall Menu Number Cmd
  15292. --
  15293. Returns the menu number of the
  15294. currently displayed menu.
  15295. --
  15296. Related: MENU,TMENU
  15297. " "3EA2E" :Usr) "xRCL\\GS" ("\\-> [[]]
  15298. " "Recall Sigma Cmd
  15299. --
  15300. Returns the current stat matrix
  15301. (the contents of reserved var
  15302. \\GSDAT) from the current directory.
  15303. --
  15304. <REF>TEXT:Reserved|\\GSDAT
  15305. --
  15306. Related: CL\\GS,STO\\GS,\\GS+,\\GS-
  15307. " "3DDA9" :Usr) "xRCLSIGMA" ("\\-> [[]]
  15308. " "Recall Sigma Cmd
  15309. --
  15310. Returns the current stat matrix
  15311. (the contents of reserved var
  15312. \\GSDAT) from the current directory.
  15313. --
  15314. <REF>TEXT:Reserved|\\GSDAT
  15315. --
  15316. Related: CL\\GS,STO\\GS,\\GS+,\\GS-
  15317. " "3DDA9" :Usr) "~xRCLVX" ("\\-> name
  15318. " "Recall the current content of the reserved
  15319. --
  15320. CAS variable VX.
  15321. --
  15322. <REF>TEXT:Reserved|VX
  15323. " "03F0DE" :Usr :1\.19-6) "xRCWS" ("\\-> n
  15324. " "Recall Wordsize Cmd
  15325. --
  15326. Returns the current wordsize in
  15327. bits (1 through 64).
  15328. --
  15329. Related: BIN,DEC,HEX,OCT,STWS
  15330. " "3B6FA" :Usr) "xRDM" ("ob size \\-> ob'
  15331. name size \\->
  15332. ob= [] or [[]]
  15333. size = {n} or {n m}
  15334. " "Redimension Array Cmd
  15335. --
  15336. Rearranges the elements of the
  15337. argument according to the
  15338. specified dimensions.
  15339. --
  15340. Related: TRN
  15341. " "3BEEC" :Usr) "xRDZ" ("x \\->
  15342. " "Randomize Cmd
  15343. --
  15344. Uses a real number xseed as a
  15345. seed for the RAND command.
  15346. --
  15347. Related: COMB,PERM,RAND,!
  15348. " "3B401" :Usr) "xRE" ("(x,y) \\-> x
  15349. [] \\-> []'
  15350. " "Real Part Func
  15351. --
  15352. Returns the real part of the
  15353. argument.
  15354. --
  15355. x \\-> x
  15356. x_u \\-> x
  15357. (x,y) \\-> x
  15358. [ R-arr ] \\-> [ R-arr ]
  15359. [ C-arr ] \\-> [ R-arr ]
  15360. 'sym' \\-> 'RE(sym)'
  15361. --
  15362. Related: C\\->R,IM,R\\->C
  15363. " "3B819" :Usr) "xRECN" ("name \\->
  15364. $name \\->
  15365. " "Receive Renamed Object Cmd
  15366. --
  15367. Prepares the HP 48 to receive a
  15368. file from another Kermit device,
  15369. and to store the file in a
  15370. specified variable.
  15371. --
  15372. Related: BAUD,CKSM,CLOSEIO,FINISH, KERRM,KGET,PARITY,RECV,SEND, SERVER,TRANSIO
  15373. " "3ED22" :Usr) "~xRECT" ("\\->
  15374. " "Rectangular Mode Cmd
  15375. --
  15376. Sets Rectangular coordinate mode.
  15377. --
  15378. Related: CYLIN,SPHERE
  15379. " "0110AB" :Usr) "xRECV" ("\\->
  15380. " "Receive Object Cmd
  15381. --
  15382. Instructs the HP 48 to look for a
  15383. named file from another Kermit
  15384. device. The received file is
  15385. stored in a variable named by the
  15386. sender.
  15387. --
  15388. Related: BAUD,CKSM,FINISH,KGET,PARITY, RECN,SEND,SERVER,TRANSIO
  15389. " "3ED56" :Usr) "~xREF" ("[[]] \\-> [[]]'
  15390. " "" "048314" :CASHELP :Usr) "~xREMAINDER" ("p1 p2 \\-> p3
  15391. " "" "02A314" :CASHELP :Usr) "~xRENAME" ("name name' \\->
  15392. " " --
  15393. Related: COPY
  15394. " "0130DD" :Usr) "~xREORDER" ("pol var \\-> pol'
  15395. " "" "069314" :CASHELP :Usr) "xREPEAT" ("1/0 \\->
  15396. " "REPEAT Cmd
  15397. --
  15398. Starts loop clause in
  15399. WHILE ... REPEAT ... END
  15400. indefinite loop structure.
  15401. --
  15402. Related: END,WHILE
  15403. " "38105" :Usr) "xREPL" ("ob pos new \\-> ob'
  15404. ob= [[]] or [] or {} or $ or PICT
  15405. pos= N or {n m} or (n,m)
  15406. " "Replace Cmd
  15407. --
  15408. Replaces a portion of the level
  15409. 3 target object with the level 1
  15410. object, beginning at a position
  15411. specified in level 2.
  15412. --
  15413. Related: CHR,GOR,GXOR,NUM,POS,SIZE,SUB
  15414. " "3B9D2" :Usr) "xRES" ("n_int \\->
  15415. #n_int \\->
  15416. " "Resolution Cmd
  15417. --
  15418. Specifies the resolution of
  15419. mathematical and statistical plots,
  15420. where the resolution is the
  15421. interval between values of the
  15422. independent variable used to
  15423. generate the plots.
  15424. --
  15425. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD, TRUTH,WIREFRAME,YSLICE
  15426. " "3C41A" :Usr) "xRESTORE" (":port:name \\->
  15427. ob \\->
  15428. " "Restore HOME Cmd
  15429. --
  15430. Replaces the current HOME directory
  15431. with the specified backup copy.
  15432. --
  15433. :nport:namebackup \\-> obj
  15434. backup \\->
  15435. --
  15436. Related: ARCHIVE
  15437. " "3EAE7" :Usr) "~xRESULTANT" ("p1 p2 \\-> res
  15438. " "" "0050DE" :CASHELP :Usr) "~xREVLIST" ("{1...n} \\-> {n...1}'
  15439. " "Reverse List Cmd
  15440. --
  15441. Reverses the order of the
  15442. elements in a list.
  15443. --
  15444. Related: SORT
  15445. " "05D0AB" :Usr) "~xREWRITE" ("
  15446. " "" "0280DE" :Usr) "~xRISCH" ("f var \\-> F
  15447. " "" "00D314" :CASHELP :Usr) "~xRKF" ("{} xtol xTf \\-> {} xtol
  15448. {} {xtol step} xTf \\-> {} xtol
  15449. " "Runge-Kutta-Fehlberg) Cmd
  15450. --
  15451. Computes the solution to an initial
  15452. value problem for a differential
  15453. equation, using the Runge-Kutta-Fehlberg
  15454. (4,5) method.
  15455. --
  15456. Related: RKFERR,RKFSTEP,RRK,RRKSTEP,RBSERR
  15457. " "0200AB" :Usr) "~xRKFERR" ("{} h \\-> {} h dy err
  15458. " "Error Estimates for <REF>RKF
  15459. --
  15460. Returns the absolute error estimate
  15461. for a given step h when solving
  15462. an initial value problem for
  15463. a differential equation.
  15464. --
  15465. Related: RKF,RKFSTEP,RRK,RRKSTEP,RSBERR
  15466. " "0220AB" :Usr) "~xRKFSTEP" ("{} tol h \\-> {} tol h'
  15467. " "Next Solution Step for RKF Cmd
  15468. --
  15469. Computes the next solution step
  15470. (hnext) to an initial value problem
  15471. for a differential equation.
  15472. --
  15473. Related: RKF,RKFERR,RRK,RRKSTEP,RSBERR
  15474. " "0210AB" :Usr) "xRL" ("# \\-> #'
  15475. " "Rotate Left Cmd
  15476. --
  15477. Rotates a binary integer one bit
  15478. to the left.
  15479. --
  15480. Related: RLB,RR,RRB
  15481. " "38E01" :Usr) "xRLB" ("# \\-> #'
  15482. " "Rotate Left Byte Cmd
  15483. --
  15484. Rotates a binary integer one byte
  15485. to the left.
  15486. --
  15487. Related: RL,RR,RRB
  15488. " "38E21" :Usr) "xRND" ("x n \\-> x'
  15489. " "Round Func
  15490. --
  15491. Rounds an object to a specified
  15492. number of decimal places or
  15493. significant digits, or to fit the
  15494. current display format.
  15495. --
  15496. z1 nrnd \\-> z2
  15497. z 'symrnd' \\-> 'RND(z,symrnd)'
  15498. 'sym' nrnd \\-> 'RND(symb,nrnd)'
  15499. 'sym1' 'symrnd' \\-> 'RND(sym1,symrnd)'
  15500. [arr1] nrnd \\-> [arr2]
  15501. x_u nrnd \\-> y_u
  15502. x_u 'symrnd' \\-> 'RND(x_u,symrnd)'
  15503. --
  15504. Related: TRNC
  15505. " "3AEB1" :Usr) "xRNRM" ("[] \\-> x
  15506. " "Row Norm Cmd
  15507. --
  15508. Returns the row norm (infinity
  15509. norm) of its argument array.
  15510. --
  15511. Related: CNRM,CROSS,DET,DOT
  15512. " "3B16C" :Usr) "xROLL" ("1...n n \\-> 2...n 1
  15513. " "Roll Objects Cmd
  15514. --
  15515. Moves the contents of a specified
  15516. level to level 1, and rolls
  15517. upwards the portion of the stack
  15518. beneath the specified level.
  15519. --
  15520. Related: OVER,PICK,ROLLD,ROT,SWAP
  15521. " "3DD18" :Usr) "xROLLD" ("n ... 1 n \\-> 1 n...2
  15522. " "Roll Down Cmd
  15523. --
  15524. Moves the contents of level 1 to
  15525. a specified level, and rolls
  15526. downwards the portion of the
  15527. stack beneath the specified level
  15528. --
  15529. Related: OVER,PICK,ROLL,ROT,SWAP
  15530. " "3DD33" :Usr) "~xROMUPLOAD" ("\\->
  15531. " "Upload the rom to another calculator
  15532. --
  15533. 1. On the sending calculator, enter ROMUPLOAD
  15534. and press ENTER. On the receving calc, hold
  15535. down ON and press F4. On the receiving calc,
  15536. hold down ON and +, and press ENTER. On the
  15537. receiving calc, press 4 to select Download
  15538. option. On the sending calc, press any key
  15539. to start the process (takes about 20 min).
  15540. " "06F0AB" :Usr) "xROOT" ("prog/s var guess \\-> x
  15541. prog/s var {guesses} \\-> x
  15542. " "Root-Finder Cmd
  15543. --
  15544. Returns a real number xroot that
  15545. is a value of the specified
  15546. variable var for which the
  15547. specified program or algebraic object
  15548. most nearly evaluates to zero or
  15549. a local extremum.
  15550. " "3D3CE" :Usr) "xROT" ("1 2 3 \\-> 2 3 1
  15551. " "Rotate Objects Cmd
  15552. --
  15553. Rotates the first three objects
  15554. on the stack, moving the object
  15555. in level 3 to level 1.
  15556. --
  15557. Related: OVER,PICK,ROLL,ROLLD,SWAP,UNROT
  15558. " "3DC71" :Usr) "~xROW-" ("[[]] nrow \\-> [[]]' []
  15559. [] n \\-> []' elt
  15560. " "Delete Row Cmd
  15561. --
  15562. Deletes row n of a matrix (or
  15563. element n of a vector), and
  15564. returns the modified matrix (or
  15565. vector) and the deleted row (or
  15566. element).
  15567. --
  15568. Related: COL-,COL+,ROW-,RSWP
  15569. " "03C0AB" :Usr) "~xROW+" ("[[]] [[]]' n \\-> [[]]''
  15570. [[]] [] n \\-> [[]]'
  15571. [] n n' \\-> []
  15572. " "Insert Row Cmd
  15573. --
  15574. Inserts an array into a matrix
  15575. (or one or more numbers into a
  15576. vector) at a position indicated
  15577. by nindex, and returns the
  15578. modified matrix (or vector).
  15579. --
  15580. Related: COL-,COL+,ROW-,RSWP
  15581. " "03D0AB" :Usr) "~xROW\\->" ("[1]...[n] n \\-> []
  15582. x1...xn \\-> []
  15583. " "Rows to Matrix Cmd
  15584. --
  15585. Transforms a series of row vectors
  15586. and a row count into a matrix
  15587. rix containing those rows, or
  15588. transforms a sequence of numbers
  15589. and an element count into a
  15590. vector with those numbers as
  15591. elements.
  15592. --
  15593. Related: \\->COL,COL\\->,\\->ROW
  15594. " "0370AB" :Usr) "~x\\->ROW" ("[[]] \\-> [1]...[n] n
  15595. [] \\-> x1...xn n
  15596. " "Matrix to Rows Cmd
  15597. --
  15598. Transforms a matrix into a series
  15599. of row vectors and returns the
  15600. vectors and a row count, or
  15601. transforms a vector into its
  15602. elements and returns the elements
  15603. and an element count.
  15604. --
  15605. Related: \\->COL,COL\\->,ROW\\->
  15606. " "0360AB" :Usr) "xRPL>" ("
  15607. " "" "3F218" :Usr) "~xrpm" ("
  15608. " "" "0680AB" :Usr) "xRR" ("# \\-> x'
  15609. " "Rotate Right Cmd
  15610. --
  15611. Rotates a binary integer one bit
  15612. to the right.
  15613. --
  15614. Related: RL,RLB,RRB
  15615. " "38E41" :Usr) "xRRB" ("# \\-> x'
  15616. " "Rotate Right Byte Cmd
  15617. --
  15618. Rotates a binary integer one byte
  15619. to the right.
  15620. --
  15621. Related: RL,RLB,RR
  15622. " "38E61" :Usr) "~xRREF" ("[[]] \\-> [[]]'
  15623. " "Reduced Row Echelon Form Cmd
  15624. --
  15625. Converts a rectangular matrix to
  15626. a reduced row echelon form.
  15627. " "0340AB" :CASHELP :Usr) "~xrref" ("[[]] \\-> [pp] [[]]'
  15628. " "" "047314" :CASHELP :Usr) "~xRREFMOD" ("[[]] \\-> [[]]'
  15629. " "" "078314" :CASHELP :Usr) "~xRRK" ("{} xtol xTfinal \\-> {} xtol
  15630. " "Solve for Initial Values
  15631. (Rosenbrock, Runge-Kutta) Cmd
  15632. --
  15633. Computes the solution to an initial
  15634. value problem for a differential
  15635. equation with known partial derivatives.
  15636. --
  15637. Related: RKF,RKFERR,RKFSTEP,RRKSTEP,RSBERR
  15638. " "0230AB" :Usr) "~xRRKSTEP" ("{} xtol h last \\-> {} xtol h' cur
  15639. " "Next Solution Step and Method
  15640. (RKF or RRK) Cmd
  15641. --
  15642. Computes the next solution step
  15643. (hnext) to an initial value problem
  15644. for a differential equation,
  15645. and displays the method used to
  15646. arrive at that result.
  15647. --
  15648. Related: RKF,RKFERR,RKFSTEP,RRK,RSBERR
  15649. " "0240AB" :Usr) "~xRSBERR" ("{} h \\-> {} h dy err
  15650. " "Error Estimate for Rosenbrock
  15651. Method Cmd
  15652. --
  15653. Returns an error estimate for a
  15654. given step h when solving an
  15655. initial value problem for a
  15656. differential equation.
  15657. --
  15658. Related: RKF,RKFERR,RKFSTEP,RRK,RRKSTEP
  15659. " "0250AB" :Usr) "xRSD" ("[B] [[A]] [Z] \\-> []'
  15660. [[B]] [[A]] [[Z]] \\-> [[]]'
  15661. " "Residual Cmd
  15662. --
  15663. Computes the residual B - AZ of
  15664. the arrays B, A, and Z.
  15665. " "3B22F" :Usr) "~xRSWP" ("[]/[[]] i j \\-> []/[[]]
  15666. " "Row Swap Cmd
  15667. --
  15668. Swaps rows i and j of a matrix
  15669. and returns the modified matrix,
  15670. or swaps elements i and j of a
  15671. vector and returns the modified
  15672. vector.
  15673. --
  15674. Related: CSWP,ROW+,ROW-
  15675. " "0400AB" :Usr) "xRULES" ("
  15676. " "" "3E632" :Usr) "xR\\->B" ("x \\-> #
  15677. " "Real to Binary Cmd
  15678. --
  15679. Converts a positive real integer
  15680. to its binary integer equivalent.
  15681. --
  15682. Related: B\\->R
  15683. " "38F01" :Usr) "xR>B" ("x \\-> #
  15684. " "Real to Binary Cmd
  15685. --
  15686. Converts a positive real integer
  15687. to its binary integer equivalent.
  15688. --
  15689. Related: B\\->R
  15690. " "38F01" :Usr) "xR\\->C" ("x y \\-> (x,y)
  15691. [X] [Y] \\-> [(x,y)]
  15692. " "Real to Complex Cmd
  15693. --
  15694. Combines two real numbers or real
  15695. arrays into a single complex
  15696. number or array.
  15697. --
  15698. Related: C\\->R,IM,RE
  15699. " "3B7ED" :Usr) "xR>C" ("x y \\-> (x,y)
  15700. [X] [Y] \\-> [(x,y)]
  15701. " "Real to Complex Cmd
  15702. --
  15703. Combines two real numbers or real
  15704. arrays into a single complex
  15705. number or array.
  15706. --
  15707. Related: C\\->R,IM,RE
  15708. " "3B7ED" :Usr) "xR\\->D" ("x \\-> (180/\\pi)x
  15709. " "Radians to Degrees Func
  15710. --
  15711. Converts a real number expressed
  15712. in radians to its equivalent in
  15713. degrees.
  15714. --
  15715. x \\-> (180/\\pi)x
  15716. 'sym' \\-> 'R\\->D(sym)'
  15717. --
  15718. Related: D\\->R
  15719. " "3B0AE" :Usr) "xR>D" ("x \\-> (180/\\pi)x
  15720. " "Radians to Degrees Func
  15721. --
  15722. Converts a real number expressed
  15723. in radians to its equivalent in
  15724. degrees.
  15725. --
  15726. x \\-> (180/\\pi)x
  15727. 'sym' \\-> 'R\\->D(sym)'
  15728. --
  15729. Related: D\\->R
  15730. " "3B0AE" :Usr) "xR\\->I" ("x \\-> n
  15731. " "" "3F070" :CASHELP :Usr) "xR>I" ("x \\-> n
  15732. " "" "3F070" :CASHELP :Usr) "xSAME" ("ob1 ob2 \\-> 1/0
  15733. " "Display information about the makers of the
  15734. calculator.
  15735. Same Object Cmd
  15736. --
  15737. Compares two objects, and returns
  15738. a true result (1) if they are
  15739. identical, and a false result (0)
  15740. if they are not.
  15741. --
  15742. Related: TYPE,==
  15743. " "3C9E5" :Usr) "xSBRK" ("\\->
  15744. " "Serial Break Cmd
  15745. --
  15746. Interrupts serial transmission or
  15747. reception.
  15748. --
  15749. Related: BUFLEN,SRECV,STIME,XMIT
  15750. " "3EE82" :Usr) "xSCALE" ("xs ys \\->
  15751. " "Scale Plot Cmd
  15752. --
  15753. Adjusts the first two parameters
  15754. in PPAR, (xmin, ymin) and (xmax,
  15755. ymax), so that xscale and yscale
  15756. are the new plot horizontal and
  15757. vertical scales, and the center
  15758. point doesn't change.
  15759. --
  15760. <REF>TEXT:Reserved|PPAR
  15761. --
  15762. Related: AUTO,CENTR,SCALEH,SCALEW
  15763. " "3C4D5" :Usr) "xSCALEH" ("xf \\->
  15764. " "Multiply Height Cmd
  15765. --
  15766. Multiplies the vertical plot
  15767. scale by xfactor.
  15768. --
  15769. Related: AUTO,SCALEW,YRING
  15770. " "3C444" :Usr) "x*H" ("xf \\->
  15771. " "Multiply Height Cmd
  15772. --
  15773. Multiplies the vertical plot
  15774. scale by xfactor.
  15775. --
  15776. Related: AUTO,SCALEW,YRING
  15777. " "3C444" :Usr) "xSCALEW" ("yf \\->
  15778. " "Multiply Width Cmd
  15779. --
  15780. Multiplies a plot's horizontal
  15781. scale by xfactor.
  15782. --
  15783. Related: AUTO,SCALEH,YRING
  15784. " "3C464" :Usr) "x*W" ("yf \\->
  15785. " "Multiply Width Cmd
  15786. --
  15787. Multiplies a plot's horizontal
  15788. scale by xfactor.
  15789. --
  15790. Related: AUTO,SCALEH,YRING
  15791. " "3C464" :Usr) "xSCATRPLOT" ("\\->
  15792. " "Draw Scatter Plot Cmd
  15793. --
  15794. Draws a scatter plot of (x, y)
  15795. data points from the specified
  15796. columns of the current statistics
  15797. matrix (reserved variable \\GSDAT).
  15798. --
  15799. Related: BARPLOT,PICTURE,HISTPLOT, PVIEW,SCL\\GS,XCOL,YCOL
  15800. " "3E1EF" :Usr) "xSCATTER" ("
  15801. " "Scatter Plot Type Cmd
  15802. --
  15803. Sets the plot type to SCATTER.
  15804. --
  15805. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE
  15806. " "3C9AF" :Usr) "~xSCHUR" ("[[]] \\-> [[Q]] [[T]]
  15807. " "Schur Decomp. of Squ. Matrix Cmd
  15808. --
  15809. Returns the Schur decomposition
  15810. of a square matrix.
  15811. --
  15812. Related: LQ,LU,QR,SVD,SVL,TRN
  15813. " "0330AB" :Usr) "xSCI" ("n \\->
  15814. " "Scientific Mode Cmd
  15815. --
  15816. Sets the number display format to
  15817. Scientific mode, which displays
  15818. one digit to the left of the
  15819. fraction mark and n significant
  15820. digits to the right.
  15821. --
  15822. Related: ENG,FIX,STD
  15823. " "3B5BA" :Usr) "xSCL\\GS" ("\\->
  15824. " "Scale Sigma Cmd
  15825. --
  15826. Adjusts (xmin,ymin) and (xmax,
  15827. ymax) in PPAR so that a subsequent
  15828. scatter plot exactly fills
  15829. PICT.
  15830. --
  15831. <REF>TEXT:Reserved|PPAR
  15832. --
  15833. Related: AUTO,SCATRPLOT
  15834. " "3E127" :Usr) "xSCLSIGMA" ("\\->
  15835. " "Scale Sigma Cmd
  15836. --
  15837. Adjusts (xmin,ymin) and (xmax,
  15838. ymax) in PPAR so that a subsequent
  15839. scatter plot exactly fills
  15840. PICT.
  15841. --
  15842. <REF>TEXT:Reserved|PPAR
  15843. --
  15844. Related: AUTO,SCATRPLOT
  15845. " "3E127" :Usr) "xSCONJ" ("name \\->
  15846. " "Store Conjugate Cmd
  15847. --
  15848. Conjugates the contents of a
  15849. named object.
  15850. --
  15851. Related: CONJ,SINV,SNEG
  15852. " "3E385" :Usr) "~xSCROLL" ("ob \\->
  15853. " "" "07D314" :Usr) "xSDEV" ("\\-> xsdev
  15854. \\-> [x1...xn]
  15855. " "Standard Deviation Cmd
  15856. --
  15857. Calculates the sample standard
  15858. deviation of each of the m columns
  15859. of coordinate values in the
  15860. current stat matrix (reserved var
  15861. \\GSDAT).
  15862. --
  15863. Related: MAX\\GS,MEAN,MIN\\GS,PSDEV, PVAR,TOT,VAR
  15864. " "3DF32" :Usr) "xSEND" ("name \\->
  15865. {names} \\->
  15866. {{old new}...} \\->
  15867. " "Send Object Cmd
  15868. --
  15869. Sends a copy of the named object
  15870. to a Kermit device.
  15871. --
  15872. Related: BAUD,CLOSEIO,CKSM,FINISH, KERRM,KGET,PARITY,RECN, RECV,SERVER,TRANSIO
  15873. " "3ECB0" :Usr) "~xSEQ" ("prog var start end incr \\-> {}
  15874. " "Sequential Calculation Cmd
  15875. --
  15876. Returns a list of results generated
  15877. ated by repeatedly executing prog
  15878. using index var over the range
  15879. start to end, in increments of
  15880. incr.
  15881. --
  15882. Related: DOSUBS,STREAM
  15883. " "0530AB" :Usr) "~xSERIES" ("func var order \\-> {} symb'
  15884. " "" "007314" :CASHELP :Usr) "xSERVER" ("\\->
  15885. " "Server Mode Cmd
  15886. --
  15887. Selects Kermit Server mode.
  15888. --
  15889. Related: BAUD,CKSM,FINISH,KERRM, KGET,PARITY,PKT,RECN,RECV, SEND,TRANSIO
  15890. " "3ED91" :Usr) "~xSEVAL" ("symb \\-> symb'
  15891. " "" "064314" :CASHELP :Usr) "xSF" ("n \\->
  15892. " "Set Flag Cmd
  15893. --
  15894. Sets a specified user or system
  15895. flag.
  15896. --
  15897. Related: CF,FC?,FC?C,FS?,FS?C
  15898. " "3B4C9" :Usr) "xSHOW" ("symb name \\-> symb'
  15899. symb {names} \\-> symb'
  15900. " "Show Variable Cmd
  15901. --
  15902. Returns symb' which is equivalent
  15903. to symb except that all
  15904. implicit references to a variable
  15905. name are made explicit.
  15906. --
  15907. Related: COLCT,EXPAN,ISOL,QUAD
  15908. " "3E696" :Usr) "~xSIDENS" ("x \\-> x'
  15909. " "Silicon Intrinsic Density Cmd
  15910. --
  15911. Calculates the intrinsic density
  15912. of silicon as a function of
  15913. temperature, xT.
  15914. --
  15915. xT \\-> xdensity
  15916. x_u \\-> x_1/cm3
  15917. 'sym' \\-> 'SIDENS(symb)'
  15918. " "0630AB" :Usr) "~xSIGMA" ("f var \\-> F
  15919. " "" "0020DE" :CASHELP :Usr) "~xSIGMAVX" ("f(x) \\-> F(x)
  15920. " "" "0010DE" :CASHELP :Usr) "xSIGN" ("x \\-> x'
  15921. " "Sign Func
  15922. --
  15923. Returns the sign of a real number
  15924. argument, the sign of the numerical
  15925. part of a unit object argument,
  15926. or the unit vector in the
  15927. direction of a complex number
  15928. argument.
  15929. --
  15930. Related: ABS,MANT,XPON
  15931. " "3A3EE" :Usr) "~xSIGNTAB" ("symb \\-> {}
  15932. " "" "05F314" :CASHELP :Usr) "~xSIMP2" ("x y \\-> x/gcd y/gcd
  15933. " "" "033314" :CASHELP :Usr) "~xSIMPLIFY" ("symb \\-> symb'
  15934. " "" "0220DE" :Usr) "~xSINCOS" ("symb \\-> symb'
  15935. " "" "018314" :CASHELP :Usr) "xSIN" ("x \\-> x'
  15936. " "Sine Analytic Func
  15937. --
  15938. z \\-> sin z
  15939. 'sym' \\-> 'SIN(sym)'
  15940. x_uangular \\-> sin(x_uangular)
  15941. --
  15942. Related: ASIN,COS,TAN
  15943. " "3A57C" :Usr) "xSINH" ("x \\-> x'
  15944. " "Hyperbolic Sine Analytic Func
  15945. --
  15946. Returns the hyperbolic sine of
  15947. the argument.
  15948. --
  15949. z \\-> sinh z
  15950. 'sym' \\-> 'SINH(sym)'
  15951. --
  15952. Related: ANUSH,COSH,TANH
  15953. " "3A678" :Usr) "xSINV" ("name \\->
  15954. " "Store Inverse Cmd
  15955. --
  15956. Replaces the contents of the
  15957. named variable with its inverse.
  15958. --
  15959. Related: INV,SCONJ,SNEG
  15960. " "3E331" :Usr) "xSIZE" ("ob \\-> n
  15961. \\-> {N m}
  15962. \\-> #nw #nh
  15963. " "Size Cmd
  15964. --
  15965. Returns the number of characters
  15966. in a string, the number of elements
  15967. in a list, the dimensions
  15968. of an array, the number of objects
  15969. in a unit object or algebraic
  15970. object, or the dimensions of a
  15971. graphics object.
  15972. --
  15973. \"str\" \\-> n
  15974. { list } \\-> n
  15975. [ vector ] \\-> { n }
  15976. [[ mat ]] \\-> { n m }
  15977. 'sym' \\-> n
  15978. grob \\-> #nwidth #mheight
  15979. PICT \\-> #nwidth #mheight
  15980. x_u \\-> n
  15981. --
  15982. Related: CHR,NUM,POS,REPL,SUB
  15983. " "3BB1F" :Usr) "xSL" ("# \\-> #'
  15984. " "Shift Left Cmd
  15985. --
  15986. Shifts a binary integer one bit
  15987. to the left.
  15988. --
  15989. Related: ASR,SLB,SR,SRB
  15990. " "38E81" :Usr) "xSLB" ("# \\-> #'
  15991. " "Shift Left Byte Cmd
  15992. --
  15993. Shifts a binary integer one byte
  15994. to the left.
  15995. --
  15996. Related: ASR,SL,SR,SRB
  15997. " "38EA1" :Usr) "~xSLOPEFIELD" ("\\->
  15998. " "SLOPEFIELD Plot Type Cmd
  15999. --
  16000. Sets the plot type to SLOPEFIELD.
  16001. --
  16002. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAX,HISTOGRAM,PARAMETRIC, PARSURFACE,PCONTOUR,POLAR,SCATTER, TRUTH,WIREFRAME,YSLICE
  16003. " "00C0AB" :Usr) "xSNEG" ("name \\->
  16004. " "Store Negate Cmd
  16005. --
  16006. Replaces the contents of a variable
  16007. with its negative.
  16008. --
  16009. Related: NEG,SCONJ,SINV
  16010. " "3E35B" :Usr) "~xSNRM" ("[] \\-> x
  16011. " "Spectral Norm Cmd
  16012. --
  16013. Returns the spectral norm of an
  16014. array.
  16015. --
  16016. Related: ABS,CNRM,COND,RNRM,SRAD,TRACE
  16017. " "0290AB" :Usr) "~xSOLVE" ("symb var \\-> {zeros}
  16018. " "" "03F314" :CASHELP :Usr) "~xSOLVER" ("\\->
  16019. " "Displays a menu of commands used in solving
  16020. equations.
  16021. " "086314" :Usr) "~xSOLVEVX" ("symb \\-> {zeros}
  16022. " "" "008314" :CASHELP :Usr) "~xSORT" ("{} \\-> {}'
  16023. " "Ascending Order Sort Cmd
  16024. --
  16025. Sorts the elements in a list in
  16026. ascending order.
  16027. --
  16028. Related: REVLIST
  16029. " "05E0AB" :Usr) "~xSPHERE" ("\\->
  16030. " "Spherical Mode Cmd
  16031. --
  16032. Sets Spherical coordinate mode.
  16033. --
  16034. Related: CYLIN,RECT
  16035. " "0130AB" :Usr) "xSQ" ("x \\-> x'
  16036. " "Square Analytic Func
  16037. --
  16038. Returns the square of the argument.
  16039. --
  16040. z \\-> z2
  16041. x_u \\-> x2_u2
  16042. [[ mat ]] \\-> [[ mat \327 mat ]]
  16043. 'sym' \\-> 'SQ(sym)'
  16044. --
  16045. Related: \\v/,^
  16046. " "3A4EF" :Usr) "xSR" ("# \\-> #'
  16047. " "Shift Right Cmd
  16048. --
  16049. Shifts a binary integer one bit
  16050. to the right.
  16051. --
  16052. Related: ASR,SL,SLB,SRB
  16053. " "38EC1" :Usr) "~xSRAD" ("[[]] \\-> x
  16054. " "Spectral Radius Cmd
  16055. --
  16056. Returns the spectral radius of a
  16057. square matrix.
  16058. --
  16059. Related: COND,SNRM,TRACE
  16060. " "0280AB" :Usr) "xSRB" ("# \\-> #'
  16061. " "Shift Right Byte Cmd
  16062. --
  16063. Shifts a binary integer one byte
  16064. to the right.
  16065. --
  16066. Related: ASR,SL,SLB,SR
  16067. " "38EE1" :Usr) "xSRECV" ("n \\-> $ 0/1
  16068. " "Serial Receive Cmd
  16069. --
  16070. Reads up to n characters from the
  16071. serial input buffer and returns
  16072. them as a string, along with a
  16073. digit indicating whether errors
  16074. occurred.
  16075. --
  16076. Related: BUFFLEN,CLOSEIO,OPENIO, SBRK,STIME,XMIT
  16077. " "3EC55" :Usr) "~xSREPL" ("str find repl \\-> str' n
  16078. " "Globally replace find with repl in str. n is
  16079. the number of matches. Efficient ML
  16080. implementation.
  16081. " "0100DD" :Usr) "xSTART" ("start finish \\->
  16082. " "START Definite Loop Structure Cmd
  16083. --
  16084. START xstart xfinish \\->
  16085. NEXT xstart xfinish \\->
  16086. STEP xincrement \\->
  16087. STEP 'symbincrement' \\->
  16088. --
  16089. Related: FOR,NEXT,STEP
  16090. " "381AB" :Usr) "xSTD" ("\\->
  16091. " "Standard Mode Cmd
  16092. --
  16093. Sets the number display format
  16094. to Standard mode.
  16095. --
  16096. Related: ENG,FIX,SCI
  16097. " "3B5FA" :Usr) "xSTEP" ("n \\->
  16098. symb \\->
  16099. " "STEP Cmd
  16100. --
  16101. Defines the increment (step) value,
  16102. and ends definite loop struct
  16103. See the FOR and START command
  16104. entries for syntax information.
  16105. --
  16106. Related: FOR,BEXT,START
  16107. " "3851F" :Usr) "xSTEQ" ("ob \\->
  16108. " "Store in EQ Cmd
  16109. --
  16110. Stores an object into the reserved
  16111. variable EQ in the current
  16112. directory.
  16113. --
  16114. <REF>TEXT:Reserved|EQ
  16115. --
  16116. Related: RCEQ
  16117. " "3D3AE" :Usr) "xSTIME" ("x/0 \\->
  16118. " "Serial Time-Out Cmd
  16119. --
  16120. Specifies the period that SRECV
  16121. (serial reception) and XMIT
  16122. (serial transmission) wait before
  16123. timing out.
  16124. --
  16125. Related: BUFLEN,CLOSEIO,SBRK,SRECV,XMIT
  16126. " "3EE62" :Usr) "xSTO" (" ob name \\->
  16127. ob :port:name \\->
  16128. lib port \\->
  16129. bup port \\->
  16130. ob 'name(i)' \\->
  16131. . 38G: 107002 \\~%s\\ [Usr]
  16132. " "Store Cmd
  16133. --
  16134. Stores an object into a specified
  16135. variable or object.
  16136. --
  16137. Related: DEFINE,RCL,\\->
  16138. " "3E739" :Usr) "xSTO-" ("ob name \\->
  16139. name ob \\->
  16140. " "Store Minus Cmd
  16141. --
  16142. Calculates the difference between
  16143. a number (or other object) and
  16144. the contents of a specified
  16145. variable, and stores the new
  16146. value to the specified variable.
  16147. --
  16148. Related: STO+,STO*,STO/,-
  16149. " "3E406" :Usr) "xSTO*" ("ob name \\->
  16150. name ob \\->
  16151. " "Store Times Cmd
  16152. --
  16153. Multiplies the contents of a
  16154. specified variable by a number or
  16155. other object.
  16156. --
  16157. Related: STO+,STO-,STO/,*
  16158. " "3E4D2" :Usr) "xSTO/" ("ob name \\->
  16159. name ob \\->
  16160. " "Store Divide Cmd
  16161. --
  16162. Calculates the quotient of a number
  16163. (or other object) and the
  16164. contents of a specified variable,
  16165. and stores the new value to the
  16166. specified variable.
  16167. --
  16168. Related: STO+,STO-,STO*,/
  16169. " "3E46C" :Usr) "xSTO+" ("ob name \\->
  16170. name ob \\->
  16171. " "Store Plus Cmd
  16172. --
  16173. Adds a number or other object to
  16174. the contents of a specified variable.
  16175. --
  16176. Related: STO-,STO*,STO/,+
  16177. " "3E3AF" :Usr) "xSTOALARM" ("time \\-> n
  16178. {date time act rep} \\-> n
  16179. " "Store Alarm Cmd
  16180. --
  16181. Stores an alarm in the system
  16182. alarm list and returns its alarm
  16183. index number. act and rep arguments are
  16184. optional.
  16185. --
  16186. Related: DELALARM,FINDALARM,RCLALARM
  16187. " "39164" :Usr) "xSTOF" ("{#s1 #u1 #s2 #u2} \\->
  16188. " "Store Flags Cmd
  16189. --
  16190. Sets the states of the system
  16191. flags or the system and user
  16192. flags.
  16193. --
  16194. Related: RCLF,STWS,RCWS
  16195. " "3B749" :Usr) "xSTOKEYS" ("{ob key ...} \\->
  16196. {'S' ob key ...} \\->
  16197. 'S' \\->
  16198. " "Store Key Assignments Cmd
  16199. --
  16200. Defines multiple keys on the user
  16201. keyboard by assigning objects to
  16202. specified keys.
  16203. --
  16204. Related: ASN,DELKEYS,RCLKEYS
  16205. " "3EF07" :Usr) "xSTO\\GS" ("ob \\->
  16206. " "Store Sigma Cmd
  16207. --
  16208. Stores obj in the reserved
  16209. variable \\GSDAT.
  16210. --
  16211. Related: CL\\GS,RCL\\GS,\\GS+,\\GS-
  16212. " "3DD6E" :Usr) "xSTOSIGMA" ("ob \\->
  16213. " "Store Sigma Cmd
  16214. --
  16215. Stores obj in the reserved
  16216. variable \\GSDAT.
  16217. --
  16218. Related: CL\\GS,RCL\\GS,\\GS+,\\GS-
  16219. " "3DD6E" :Usr) "~xSTOVX" ("name \\->
  16220. " "Store object into the reserved CAS variable
  16221. VX.
  16222. --
  16223. <REF>TEXT:Reserved|VX
  16224. " "0400DE" :Usr :1\.19-6) "xSTO>" ("ob id \\->
  16225. ob symb \\->
  16226. " "Like <REF>xSTO, but if the level 1 argument
  16227. is symbolic, use the first element of it as
  16228. the variable to write to.
  16229. " "3E823") "~xSTORE" ("
  16230. " "" "0240DE" :Usr) "xSTR\\->" ("$ \\-> ob
  16231. " "Evaluate String Cmd
  16232. --
  16233. Evaluates the text of a string as
  16234. if the text were entered from the
  16235. command line.
  16236. --
  16237. Related: ARRY\\->,DTAG,EQ\\->,LIST\\->, OBJ\\->,\\->STR
  16238. " "3BBD9" :Usr) "xSTR>" ("$ \\-> ob
  16239. " "Evaluate String Cmd
  16240. --
  16241. Evaluates the text of a string as
  16242. if the text were entered from the
  16243. command line.
  16244. --
  16245. Related: ARRY\\->,DTAG,EQ\\->,LIST\\->, OBJ\\->,\\->STR
  16246. " "3BBD9" :Usr) "x\\->STR" ("ob \\-> $
  16247. " "Object to String Cmd
  16248. --
  16249. Converts any object to string
  16250. form.
  16251. --
  16252. Related: \\->ARRY,\\->LIST,STR\\->, \\->TAG,\\->UNIT
  16253. " "3BBBE" :Usr) "x>STR" ("ob \\-> $
  16254. " "Object to String Cmd
  16255. --
  16256. Converts any object to string
  16257. form.
  16258. --
  16259. Related: \\->ARRY,\\->LIST,STR\\->, \\->TAG,\\->UNIT
  16260. " "3BBBE" :Usr) "~xSTREAM" ("{} prog \\-> x
  16261. " "Stream Execution Cmd
  16262. --
  16263. Moves the first two elements from
  16264. the list onto the stack, and
  16265. executes prog. The moves the next
  16266. element (if any) onto the stack,
  16267. and executes obj again using the
  16268. previous result and the new element.
  16269. Repeats this until the list
  16270. is exhausted, and returns the
  16271. final result.
  16272. --
  16273. Related: DOSUBS
  16274. " "0580AB" :Usr) "~xSTURMAB" ("
  16275. " "" "0170DE" :Usr) "~xSTURM" ("
  16276. " "" "0160DE" :Usr) "xSTWS" ("n \\->
  16277. #n \\->
  16278. " "Set Wordsize Cmd
  16279. --
  16280. Sets the current binary integer
  16281. wordsize to n bits, where n is a
  16282. value from 1 through 64 (the
  16283. default is 64).
  16284. --
  16285. Related: BIN,DEC,HEX,OCT,RCWS
  16286. " "3B6C1" :Usr) "xSUB" ("ob start end \\-> ob'
  16287. ob= [[]], $, {}, grob, PICT
  16288. start,end = n, {n m}, (n,m)
  16289. " "Subset Cmd
  16290. --
  16291. Returns the portion of a string
  16292. or list defined by specified
  16293. positions, or returns the
  16294. rectangular portion of a graphics object
  16295. or PICT defined by two corner
  16296. pixel coordinates.
  16297. --
  16298. Related: CHR,GOR,GXOR,NUM,POS,REPL,SIZE
  16299. " "3B8D7" :Usr) "~xSUBST" ("symb var=s1 \\-> symb'
  16300. " "" "002314" :CASHELP :Usr) "~xSUBTMOD" ("x1 x2 \\-> x3
  16301. " "" "06F314" :CASHELP :Usr) "~xSVD" ("[[]] \\-> [[U]] [[V]] [S]
  16302. " "Singular Value Decomposition Cmd
  16303. --
  16304. Returns the sigular value
  16305. decomposition of an m\327n matrix.
  16306. --
  16307. Related: DIAG\\->,MIN,SVL
  16308. " "02E0AB" :Usr) "~xSVL" ("[[]] \\-> []
  16309. " "Singular Values Cmd
  16310. --
  16311. Returns the singular values of an
  16312. m\327n matrix.
  16313. --
  16314. Related: MIN,SVD
  16315. " "02F0AB" :Usr) "xSWAP" ("ob1 ob2 \\-> ob2 ob1
  16316. " "Swap Objects Cmd
  16317. --
  16318. Interchanges the first two
  16319. objects on the stack.
  16320. --
  16321. Related:
  16322. DUP,DUPN,DUP2,OVER,PICK,ROLL,ROLLD,ROT
  16323. " "3DC20" :Usr) "~xSYLVESTER" ("[[]] \\-> [D] [P]
  16324. " "" "04E314" :CASHELP :Usr) "xSYSEVAL" ("# \\-> ?
  16325. " "Evaluate System Object Cmd
  16326. --
  16327. Evaluates unnamed operating system
  16328. objects specified by their
  16329. memory addresses.
  16330. --
  16331. Related: EVAL,LIBEVAL,FLASHEVAL
  16332. " "39705" :Usr) "~xSYST2MAT" ("
  16333. " "" "00A0DE" :Usr) "x%T" ("x y \\-> 100y/x
  16334. " "Percent of Total Function
  16335. --
  16336. Returns the percent of the level
  16337. 2 argument that is represented by
  16338. the level 1 argument.
  16339. --
  16340. x y \\-> 100y/x
  16341. x 'sym' \\-> '%T(x,sym)'
  16342. 'sym' x \\-> '%T(sym,x)'
  16343. 'sym1' 'sym2' \\-> '%T(sym1,sym2)'
  16344. x_u1 y_u2 \\-> 100y_u2/x_u1
  16345. x_u 'sym' \\-> '%T(x_u,sym)'
  16346. 'sym' x_u \\-> '%T(sym,x_u)'
  16347. --
  16348. Related: %,%ch
  16349. " "3B2DC" :Usr) "~xTABVAL" ("symb(x) {vals} \\-> symb(x) {{vals} {res}}
  16350. " "" "061314" :CASHELP :Usr) "~xTABVAR" ("symb(x) \\-> symb(x) {{}{}} grob
  16351. " "" "060314" :CASHELP :Usr) "x\\->TAG" ("ob tag \\-> :tag:ob
  16352. " "Stack to Tag Cmd
  16353. --
  16354. Combines objects in levels 1 and
  16355. 2 to created tagged (labeled)
  16356. object. Tag may be any object. It will eb
  16357. converted to a string.
  16358. --
  16359. Related: \\->ARRY,DTAG,\\->LIST,OBJ\\->, \\->STR,\\->UNIT
  16360. " "3EFB1" :Usr) "x->TAG" ("ob tag \\-> :tag:ob
  16361. " "Stack to Tag Cmd
  16362. --
  16363. Combines objects in levels 1 and
  16364. 2 to created tagged (labeled)
  16365. object. Tag may be any object. It will eb
  16366. converted to a string.
  16367. --
  16368. Related: \\->ARRY,DTAG,\\->LIST,OBJ\\->, \\->STR,\\->UNIT
  16369. " "3EFB1" :Usr) "~xTAIL" ("{} \\-> {}'
  16370. $ \\-> $'
  16371. " "Last Listed Elements Cmd
  16372. --
  16373. Returns all but the first element
  16374. of a list or string.
  16375. --
  16376. Related: HEAD
  16377. " "0520AB" :Usr) "~xTAN2CS2" ("symb \\-> symb'
  16378. " "" "01C0DE" :CASHELP :Usr) "~xTAN2SC2" ("symb \\-> symb'
  16379. " "" "021314" :CASHELP :Usr) "~xTAN2SC" ("symb \\-> symb'
  16380. " "" "01F314" :CASHELP :Usr) "xTAN" ("x \\-> x'
  16381. " "Tangent Analytic Func
  16382. --
  16383. Returns the tangent of the
  16384. argument.
  16385. --
  16386. z \\-> tan z
  16387. 'sym' \\-> 'TAN(symb)'
  16388. x_unitang \\-> tan(x_unitang)
  16389. -
  16390. Related: ATAN,COS,SIN
  16391. " "3A624" :Usr) "xTANH" ("x \\-> x'
  16392. " "Hyperbolic Tangent Analytic Func
  16393. --
  16394. Returns the hyperbolic tangent of
  16395. the argument.
  16396. --
  16397. z \\-> tanh z
  16398. 'sym' \\-> 'TANH(sym)'
  16399. -
  16400. Related: ATANH,COSH,SINH
  16401. " "3A70C" :Usr) "~xTAYLOR0" ("symb \\-> symb'
  16402. " "" "006314" :CASHELP :Usr) "xTAYLR" ("symb var n \\-> symb'
  16403. " "Taylor's Polynomial Cmd
  16404. --
  16405. Calculates the nth order Taylor's
  16406. polynomial of 'symb' in the
  16407. variable var.
  16408. --
  16409. Related: \\.d,\\.S,\\GS
  16410. " "3E6CA" :Usr) "~xTCHEBYCHEFF" ("n \\-> pol
  16411. " "" "05B314" :CASHELP :Usr) "~xTCOLLECT" ("symb \\-> symb'
  16412. " "" "01A314" :CASHELP :Usr) "~xTDELTA" ("x y \\-> x'
  16413. " "Temperature Delta Func
  16414. --
  16415. Calculates a temperature change.
  16416. --
  16417. x y \\-> x\222
  16418. x_u1 y_u2 \\-> x_u1\222
  16419. x_u 'sym' \\-> 'TDELTA(x_u,sym)'
  16420. 'sym' y_u \\-> 'TDELTA(sym,y_u)'
  16421. 'sym1' 'sym2' \\-> 'TDELTA(sym1,sym2)'
  16422. --
  16423. Related: TINC
  16424. " "0640AB" :Usr) "~xTESTS" ("
  16425. " "" "02E0DE" :Usr) "~xTEVAL" ("ob \\-> ? time
  16426. " "Execute ob and return how long it took.
  16427. " "065314" :Usr) "~xTEXPAND" ("symb \\-> symb'
  16428. " "" "013314" :CASHELP :Usr) "xTEXT" ("\\->
  16429. " "Show Stack Display Cmd
  16430. --
  16431. Displays the stack display.
  16432. --
  16433. Related: PICTURE,PVIEW
  16434. " "3C8FA" :Usr) "xTHEN" ("0/1 \\->
  16435. " "THEN Cmd
  16436. --
  16437. Starts the true-clause in conditional
  16438. or error-trapping structure
  16439. --
  16440. Related: CASE,ELSE,END,IFERR
  16441. " "37F7F" :Usr) "xTHEN" ("
  16442. " "THEN in a CASE statement.
  16443. --
  16444. Related: CASE,ELSE,END,IFERR
  16445. " "38B43" :Usr) "xTHENCASE" ("
  16446. " "THEN in a CASE statement.
  16447. --
  16448. Related: CASE,ELSE,END,IFERR
  16449. " "38B43" :Usr) "xTHEN" ("
  16450. " "THEN in an ON ERROR construct.
  16451. --
  16452. Related: CASE,ELSE,END,IFERR
  16453. " "38ABA" :Usr) "xERRTHEN" ("
  16454. " "THEN in an ON ERROR construct.
  16455. --
  16456. Related: CASE,ELSE,END,IFERR
  16457. " "38ABA" :Usr) "xTICKS" ("\\-> #
  16458. " "Ticks Cmd
  16459. --
  16460. Returns the system time as a binary
  16461. integer, in units of 1/8192
  16462. second.
  16463. --
  16464. Related: TIME
  16465. " "39093" :Usr) "xTIME" ("\\-> time
  16466. " "Time Cmd
  16467. --
  16468. Returns the system time in the
  16469. form HH.MMSSs.
  16470. --
  16471. Related: DATE,TICKS,TSTR
  16472. " "3905D" :Usr) "x\\->TIME" ("time \\->
  16473. " "Set System Time Cmd
  16474. --
  16475. Sets the system time.
  16476. --
  16477. Related: CLKADJ,\\->DATE
  16478. " "39124" :Usr) "xSETTIME" ("time \\->
  16479. " "Set System Time Cmd
  16480. --
  16481. Sets the system time.
  16482. --
  16483. Related: CLKADJ,\\->DATE
  16484. " "39124" :Usr) "~xTINC" ("x y \\-> x'
  16485. " "Temperature Increment Cmd
  16486. --
  16487. Calculates a temperature increment.
  16488. --
  16489. xinit y\222 \\-> xfinal
  16490. x_u1 y_u2 \\-> x_u1final
  16491. x_u 'sym' \\-> 'TINC(x_u,sym)'
  16492. 'sym' y_u\222 \\-> 'TINC(sym,y_u\222)'
  16493. 'sym1' 'sym2' \\-> 'TINC(sym1,sym2)'
  16494. --
  16495. Related: TDELTA
  16496. " "0650AB" :Usr) "xTLINE" ("(x1,y1) (x2,y2) \\->
  16497. {#n1 #m1} {#n2 #m2} \\->
  16498. " "Toggle Line Cmd
  16499. --
  16500. For each pixel along the line in
  16501. PICT defined by the specified
  16502. coordinates, TLINE turns off
  16503. every pixel that is on, and turns
  16504. on every pixel that is off.
  16505. --
  16506. Related: ARC,BOX,LINE
  16507. " "3C6B6" :Usr) "~xTLIN" ("symb \\-> symb'
  16508. " "" "019314" :CASHELP :Usr) "xTMENU" ("% \\-> [InitMenu%]
  16509. {} \\->
  16510. name \\->
  16511. Ob \\-> [@LIST InitMenu]
  16512. " "Temporary Menu Cmd
  16513. --
  16514. Displays a built-in menu, libary
  16515. menu, or a user-defined menu.
  16516. --
  16517. Related: MENU,RCLMENU
  16518. " "3E97B" :Usr) "xTOT" ("\\-> xsum
  16519. \\-> {x1...xn}
  16520. " "Total Cmd
  16521. --
  16522. Computes the sum of each of the
  16523. m columns of coordinate values in
  16524. the current stat matrix (reserved
  16525. variable \\GSDAT).
  16526. --
  16527. <REF>TEXT:Reserved|\\GSDAT
  16528. --
  16529. Related: MAX\\GS,MIN\\GS,MEANMPSDEV, PVAR,SDEV,VAR
  16530. " "3DF4D" :Usr) "~xTRACE" ("[[]] \\-> x
  16531. " "Matrix Trace Cmd
  16532. --
  16533. Returns the trace of a square
  16534. matrix.
  16535. " "0270AB" :Usr) "~xTRAN" ("[[]] \\-> [[]]'
  16536. name \\->
  16537. " " --
  16538. Related: CONJ,TRN
  16539. " "045314" :CASHELP :Usr) "xTRANSIO" ("n \\->
  16540. " "I/O Translation Cmd
  16541. --
  16542. Specifies the character translation
  16543. option. These translations
  16544. affect only ASCII Kermit transfer
  16545. and files printed to the serial
  16546. port.
  16547. --
  16548. Related: BAUD,CKSM,PARITY
  16549. " "3EE0C" :Usr) "~xTRIG" ("symb \\-> symb'
  16550. " "" "01B314" :CASHELP :Usr) "~xTRIGCOS" ("symb \\-> symb'
  16551. " "" "01C314" :CASHELP :Usr) "~xTRIGO" ("\\->
  16552. " "" "082314" :Usr) "~xTRIGSIN" ("symb \\-> symb'
  16553. " "" "01D314" :CASHELP :Usr) "~xTRIGTAN" ("symb \\-> symb'
  16554. " "" "01E314" :CASHELP :Usr) "xTRN" ("[[]] \\-> [[]]'
  16555. name \\->
  16556. " "Transpose Matrix Cmd
  16557. --
  16558. Returns the (conjugate) transpose
  16559. of a matrix.
  16560. --
  16561. Related: CONJ
  16562. " "3C084" :Usr) "xTRNC" ("x n \\->
  16563. " "Truncate Func
  16564. --
  16565. Truncates an object to a specified
  16566. number of decimal places or
  16567. significant digits, or to fit the
  16568. current display format.
  16569. --
  16570. z1 ntrnc \\-> z2
  16571. z1 'symtrnc' \\->
  16572. 'TRNC(z1,symtrnc)'
  16573. 'sym1' ntrnc \\->
  16574. 'TRNC(sym1,ntrnc)'
  16575. 'sym1' 'symtrnc' \\->
  16576. 'TRNC(sym1,symtrnc)'
  16577. [ arr ]1 ntrnc \\-> [ arr ]2
  16578. x_u ntrnc \\-> y_u
  16579. x_u 'symtrnc' \\->
  16580. 'TRNC(x_u,symtrnc)'
  16581. --
  16582. Related: RND
  16583. " "3AF3E" :Usr) "~xTRUNC" ("symb1 symb2 \\-> symb3
  16584. " "" "063314" :CASHELP :Usr) "xTRUTH" ("\\->
  16585. " "Truth Plot Type Cmd
  16586. --
  16587. Sets the plot type to TRUTH.
  16588. --
  16589. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,WIREFRAME,YSLICE
  16590. " "3C99D" :Usr) "~xTSIMP" ("symb \\-> symb'
  16591. " "" "015314" :CASHELP :Usr) "xTSTR" ("date time \\-> $
  16592. " "Date and Time String Cmd
  16593. --
  16594. Returns a string derived from the
  16595. date and time.
  16596. --
  16597. Related: DATE,TICKS,TIME
  16598. " "391F8" :Usr) "xTVARS" ("ntype \\-> {}
  16599. {n...} \\-> {}
  16600. " "Typed Variables Cmd
  16601. --
  16602. Lists all global variables in the
  16603. current directory that contain
  16604. objects of the specified types.
  16605. --
  16606. Related: PVARS,TYPE,VARS
  16607. " "39456" :Usr) "~xTVM" ("\\->
  16608. " "TVM Menu Cmd
  16609. --
  16610. Displays the TVM Solver menu.
  16611. --
  16612. Related: AMORT
  16613. " "0470AB" :Usr) "~xTVMBEG" ("\\->
  16614. " "Payment at Start of Period Cmd
  16615. --
  16616. Specifies that TVM calculations
  16617. treat payments as being made at
  16618. the beginnign of the compounding
  16619. periods.
  16620. --
  16621. Related: AMORT,TVM,TVMEND,TVMROOT
  16622. " "0480AB" :Usr) "~xTVMEND" ("\\->
  16623. " "Payment at End of Period Cmd
  16624. --
  16625. Specifies that TVM calculations
  16626. treat payments as being made at
  16627. the end of the compounding
  16628. periods.
  16629. --
  16630. Related: AMORT,TVM,TVMBEG,TVMROOT
  16631. " "0490AB" :Usr) "~xTVMROOT" ("var \\-> x
  16632. " "TVM Root Cmd
  16633. --
  16634. Solves for the specified TVM variable
  16635. using values from the re-
  16636. maining TVM variables.
  16637. --
  16638. Related: AMORT,TVM,TVMBEG,TVMEND
  16639. " "04A0AB" :Usr) "xTYPE" ("ob \\-> %type
  16640. " "Type Cmd
  16641. --
  16642. Returns the type number of an
  16643. object.
  16644. --
  16645. User Objects:
  16646. --
  16647. Object Type Number
  16648. ------ ---- ------
  16649. Real number 0
  16650. Complex number 1
  16651. Character string 2
  16652. Real Array 3
  16653. Complex Array 4
  16654. List 5
  16655. Global name 6
  16656. Local name 7
  16657. Program 8
  16658. Algebraic Object 9
  16659. Binary Integer 10
  16660. Graphics object 11
  16661. Tagged object 12
  16662. Unit object 13
  16663. XLIB name 14
  16664. Directory 15
  16665. Library 16
  16666. Backup object 17
  16667. --
  16668. Built-in Cmds:
  16669. --
  16670. Object Type Number
  16671. ------ ---- ------
  16672. Built-in function 18
  16673. Built-in command 19
  16674. --
  16675. System Objects:
  16676. --
  16677. Object Type Number
  16678. ------ ---- ------
  16679. System binary 20
  16680. Extended real 21
  16681. Extended complex 22
  16682. Linked array 23
  16683. Character 24
  16684. Code object 25
  16685. Library data 26
  16686. External object 26-31
  16687. --
  16688. Related: SAME,TVARS,VTYPE
  16689. " "3BC39" :Usr) "xUBASE" ("u \\-> u'
  16690. " "Convert to SI Base Units Func
  16691. --
  16692. Converts a unit object to SI base
  16693. units.
  16694. --
  16695. x_u \\-> y_base-units
  16696. 'sym' \\-> 'UBASE(symb)'
  16697. --
  16698. Related: CONVERT,UFACT,\\->UNIT,UVAL
  16699. " "38FD7" :Usr) "xUFACT" ("u1 u2 \\-> u3
  16700. " "Factor Unit Cmd
  16701. --
  16702. Factors the level 1 unit from the
  16703. unit expression of the level 2
  16704. unit object.
  16705. --
  16706. Related: CONVERT,UBASE,\\->UNIT,UVAL
  16707. " "3900B" :Usr) "~xUFL1\\->MINIF" ("ob n \\-> font
  16708. " "" "0140DD" :Usr) "~xUNASSIGN" ("
  16709. " "" "0310DE" :Usr) "~xUNASSUME" ("
  16710. " "" "0270DE" :Usr) "x\\->UNIT" ("x u \\-> u'
  16711. " "Stack to Unit Object Cmd
  16712. --
  16713. Creates a unit object from a real
  16714. number and the unit part of a
  16715. unit object.
  16716. --
  16717. Related: \\->ARRY,\\->LIST,\\->STR,\\->TAG
  16718. " "38FB5" :Usr) "x>UNIT" ("x u \\-> u'
  16719. " "Stack to Unit Object Cmd
  16720. --
  16721. Creates a unit object from a real
  16722. number and the unit part of a
  16723. unit object.
  16724. --
  16725. Related: \\->ARRY,\\->LIST,\\->STR,\\->TAG
  16726. " "38FB5" :Usr) "xUNPICK" ("obn...ob1 ob n \\-> ob...ob2
  16727. " "Replaces the object at level n+2 with the
  16728. object at level 2 and deletes the objects at
  16729. level 1 and level 2.
  16730. --
  16731. Related: OVER,PICK,ROLL,ROLLD,SWAP,ROT
  16732. " "3F249" :Usr) "xUNROT" ("1 2 3 \\-> 3 1 2
  16733. " "Changes the order of the first three objects
  16734. on the stack, in the opposite way compared to
  16735. ROT.
  16736. --
  16737. Related: OVER,PICK,ROLL,ROLLD,SWAP,ROT
  16738. " "3F22E" :Usr) "xUNTIL" ("\\->
  16739. " "UNTIL Cmd
  16740. --
  16741. Starts test-clause in
  16742. DO ... UNTIL ... END
  16743. indefinite loop structure.
  16744. --
  16745. See the DO entry for syntax info.
  16746. --
  16747. Related: DO,END
  16748. " "38195" :Usr) "xUPDIR" ("\\->
  16749. " "Up Directory Cmd
  16750. --
  16751. Makes the parent of the current
  16752. directory the new current directory.
  16753. --
  16754. Related: CRDIR,HOME,PATH,PGDIR
  16755. " "39420" :Usr) "xUTPC" ("n x \\-> x'
  16756. " "Upper Chi-Square Distribution Cmd
  16757. --
  16758. Returns the probability utpc(n,x)
  16759. that a chi-square random variable
  16760. is greater than x, where n is the
  16761. number of degrees of freedom of
  16762. the distribution.
  16763. --
  16764. Related: UTPF,UTPN,UTPT
  16765. " "3E07D" :Usr) "xUTPF" ("n1 n2 x \\-> x'
  16766. " "Upper Snedecor's F Distrib. Cmd
  16767. --
  16768. Returns the probability
  16769. utpf(n1,n2,x)
  16770. that a Snedecor's F random variable
  16771. is greater than x, where n1
  16772. and n2 are the numerator and
  16773. denominator degrees of freedom of
  16774. the F distribution.
  16775. --
  16776. Related: UTPC,UTPN,UTPT
  16777. " "3E0BD" :Usr) "xUTPN" ("n v x \\-> x'
  16778. " "Upper Normal Distribution Cmd
  16779. --
  16780. Returns the probability
  16781. utpn(m,v,x)
  16782. that a normal random variable is
  16783. greater than x, where m and v are
  16784. the mean and variance, respectively,
  16785. of the normal distribution.
  16786. --
  16787. Related: UTPC,UTPF,UTPT
  16788. " "3E09D" :Usr) "xUTPT" ("n x \\-> x'
  16789. " "Upper Student's t Distrib. Cmd
  16790. --
  16791. Returns the probability utpt(n,x)
  16792. that a Student's t random variable
  16793. is greater than x, where n
  16794. is the number of degrees of freedom
  16795. of the distribution.
  16796. --
  16797. Related: UTPC,UTPF,UTPN
  16798. " "3E0DD" :Usr) "xUVAL" ("u \\-> x
  16799. " "Unit Value Func
  16800. --
  16801. Returns the numerical part of a
  16802. unit object.
  16803. --
  16804. x_u \\-> x
  16805. 'sym' \\-> 'UVAL(sym)'
  16806. --
  16807. Related: CONVERT,UBASE,UFACT,\\->UNIT
  16808. " "38F81" :Usr) "xV\\->" ("[]/() \\-> x y
  16809. \\-> x y z
  16810. (in current co-system)
  16811. " "Vector/Complex Num to Stack Cmd
  16812. --
  16813. [ x y ] \\-> x y
  16814. [ xr ANGy\\Gh ] \\-> xr y\\Gh
  16815. [ x1 x2 x3 ] \\-> x1 x2 x3
  16816. [ x1 ANGx\\Gh xz ] \\-> x1 x\\Gh xz
  16817. [ x1 ANGx\\Gh ANGx\324\325] \\-> x1 x\\Gh x\324\325
  16818. [ x1 x2 ... xn ] \\-> x1 ... xn
  16819. (x,y) \\-> x y
  16820. (xr ANGy\\Gh) \\-> xr y\\Gh
  16821. --
  16822. Related: \\->V2,\\->V3
  16823. " "3C2AC" :Usr) "xV>" ("[]/() \\-> x y
  16824. \\-> x y z
  16825. (in current co-system)
  16826. " "Vector/Complex Num to Stack Cmd
  16827. --
  16828. [ x y ] \\-> x y
  16829. [ xr ANGy\\Gh ] \\-> xr y\\Gh
  16830. [ x1 x2 x3 ] \\-> x1 x2 x3
  16831. [ x1 ANGx\\Gh xz ] \\-> x1 x\\Gh xz
  16832. [ x1 ANGx\\Gh ANGx\324\325] \\-> x1 x\\Gh x\324\325
  16833. [ x1 x2 ... xn ] \\-> x1 ... xn
  16834. (x,y) \\-> x y
  16835. (xr ANGy\\Gh) \\-> xr y\\Gh
  16836. --
  16837. Related: \\->V2,\\->V3
  16838. " "3C2AC" :Usr) "x\\->V2" ("x y \\-> []
  16839. \\-> ()
  16840. " "Stack to Vector/Complex Num Cmd
  16841. --
  16842. Converts two numbers from the
  16843. stack into a 2-element vector or
  16844. complex number.
  16845. --
  16846. Related: V\\->,\\->V3
  16847. " "3C2D6" :Usr) "x>V2" ("x y \\-> []
  16848. \\-> ()
  16849. " "Stack to Vector/Complex Num Cmd
  16850. --
  16851. Converts two numbers from the
  16852. stack into a 2-element vector or
  16853. complex number.
  16854. --
  16855. Related: V\\->,\\->V3
  16856. " "3C2D6" :Usr) "x\\->V3" ("x y z \\-> []
  16857. " "Stack to 3-Element Vector Cmd
  16858. --
  16859. Converts three numbers into a
  16860. 3-element vector.
  16861. --
  16862. Related: V\\->,\\->V2
  16863. " "3C30A" :Usr) "x>V3" ("x y z \\-> []
  16864. " "Stack to 3-Element Vector Cmd
  16865. --
  16866. Converts three numbers into a
  16867. 3-element vector.
  16868. --
  16869. Related: V\\->,\\->V2
  16870. " "3C30A" :Usr) "~xVANDERMONDE" ("{} \\-> [[]]
  16871. " "" "053314" :Usr) "xVAR" ("\\-> x
  16872. \\-> [x1...xn]
  16873. " "Variance Cmd
  16874. --
  16875. Calculates the sample variance
  16876. of the coordinate values in each
  16877. of the m columns in the current
  16878. stat matrix (\\GSDAT).
  16879. --
  16880. Related: MAX\\GS,MEAN,MIN\\GS,PSDEV,PVAR, SDEV,TOT
  16881. " "3DF68" :Usr) "xVARS" ("\\-> {}
  16882. " "Variables Cmd
  16883. --
  16884. Returns a list of all variables'
  16885. names in the VAR menu (the current
  16886. directory).
  16887. --
  16888. Related: ORDER,PVARS,TVARS
  16889. " "3943B" :Usr) "~xVER" ("\\-> $
  16890. " "" "08C314" :CASHELP :Usr) "~xVERSION" ("\\-> $ $
  16891. " "Software Version Cmd
  16892. --
  16893. Displays the software version and
  16894. copyright message.
  16895. " "00F0AB" :Usr) "~xVISIT" ("name \\->
  16896. " "For a specified variable, opens the content
  16897. in the command-line editor.
  16898. --
  16899. Related: VISITB,EDIT,EDITB
  16900. " "0080DD" :Usr) "~xVISITB" ("name \\->
  16901. " "For a specified variable, opens the contents
  16902. in the most suitable editor for the object
  16903. type. For example, if the variable holds an
  16904. equation, the equation writer is used.
  16905. --
  16906. Related: VISIT,EDIT,EDITB
  16907. " "00A0DD" :Usr) "~xVPOTENTIAL" ("
  16908. " "" "0390DE" :Usr) "xVTYPE" ("name \\-> n
  16909. " "Variable Type Cmd
  16910. --
  16911. Returns the type number of the
  16912. object contained in the named
  16913. variable.
  16914. --
  16915. 'name' \\-> ntype
  16916. :nport:namebackup \\-> ntype
  16917. :nport:nlibrary \\-> ntype
  16918. --
  16919. Related: TYPE
  16920. " "3BDB2" :Usr) "xWAIT" ("sec \\->
  16921. 0 \\-> rc.p
  16922. " "Wait Cmd
  16923. --
  16924. Suspends program execution for
  16925. specified time, or until a key is
  16926. pressed.
  16927. --
  16928. Related: KEY
  16929. " "39819" :Usr) "xWHILE" ("\\->
  16930. " "WHILE Indefinite Loop Struct Cmd
  16931. --
  16932. Starts the
  16933. WHILE ... REPEAT ... END
  16934. indefinite loop structure.
  16935. --
  16936. Related: DO,END,REPEAT
  16937. " "380DB" :Usr) "~xWIREFRAME" ("\\->
  16938. " "WIREFRAME Plot Type Cmd
  16939. --
  16940. Sets the plot type to WIREFRAME.
  16941. --
  16942. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,TRUTH,YSLICE
  16943. " "0080AB" :Usr) "xWSLOG" ("\\-> $ $ $ $
  16944. " "Warmstart Log Cmd
  16945. --
  16946. Returns four strings recording
  16947. the date, time, and cause of the
  16948. four most recent warmstart events
  16949. " "390AE" :Usr) "x\\GSX2" ("\\-> xsum
  16950. " "Sum of Squares of x-Values Cmd
  16951. --
  16952. Sums the squares of the values in
  16953. the independent-variable column
  16954. of the current stat matrix
  16955. (reserved variable \\GSDAT).
  16956. --
  16957. <REF>TEXT:Reserved|\\GSDAT
  16958. --
  16959. Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2
  16960. " "3DE90" :Usr) "xSUMX2" ("\\-> xsum
  16961. " "Sum of Squares of x-Values Cmd
  16962. --
  16963. Sums the squares of the values in
  16964. the independent-variable column
  16965. of the current stat matrix
  16966. (reserved variable \\GSDAT).
  16967. --
  16968. <REF>TEXT:Reserved|\\GSDAT
  16969. --
  16970. Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2
  16971. " "3DE90" :Usr) "xXCOL" ("n \\->
  16972. " "Independent Column Cmd
  16973. --
  16974. Specifies the independent
  16975. variable column of the current
  16976. stat matrix (reserved variable
  16977. \\GSDAT).
  16978. --
  16979. <REF>TEXT:Reserved|\\GSDAT
  16980. " "3E03D" :Usr) "~xXGET" ("name \\->
  16981. " "Xmodem get command: Retrieves a specified
  16982. filename via XMODEM. The other calculator
  16983. needs to be in server mode.
  16984. --
  16985. Related: BAUD,RECN,RECV,SEND,XRECV,XSERV,XPUT
  16986. " "0700AB" :Usr) "xXMIT" ("$ \\-> 1
  16987. \\-> $rest 0
  16988. " "Serial Transmit Cmd
  16989. --
  16990. Sends a string serially without
  16991. using Kermit protocol, and
  16992. returns a single digit that
  16993. indicates whether the transmission
  16994. was successful.
  16995. --
  16996. Related: BUFLEN,SBRK,SRECV,STIME
  16997. " "3EC35" :Usr) "~xXNUM" ("x \\-> x'
  16998. " "" "067314" :CASHELP :Usr) "xXOR" ("# #' \\-> #''
  16999. $ $' \\-> $''
  17000. 1/0 1/0 \\-> 1/0
  17001. " "Exclusive OR Cmd
  17002. --
  17003. Returns the logical exclusive OR
  17004. of two arguments.
  17005. #n1 #n2 \\-> #n3
  17006. \"str1\" \"str2\" \\-> \"str3\"
  17007. T/F1 T/F2 \\-> 0/1
  17008. T/F 'sym' \\-> 'T/F XOR sym'
  17009. 'sym' T/F \\-> 'sym XOR T/F'
  17010. 'sym1' 'sym2' \\-> 'sym1 XOR sym2'
  17011. --
  17012. Related: AND,OR,NOT
  17013. " "3CB7A" :Usr) "~xXPUT" ("name \\->
  17014. " "Xmodem command: Sends a specified filename
  17015. via XMODEM to a claculator. The receiving
  17016. calculator needs to be in server mode.
  17017. --
  17018. Related: BAUD,RECN,RECV,SEND,XRECV,XSERV,XGET
  17019. " "0710AB" :Usr) "~xXQ" ("x \\-> x'
  17020. " "" "068314" :CASHELP :Usr) "~xXRECV" ("name \\->
  17021. " "XModem Receive Cmd
  17022. --
  17023. Prepares the HP 48 to receive an
  17024. object via XModem. The received
  17025. object is stored in the given
  17026. name.
  17027. --
  17028. Related: BAUD,RECV,RECN,SEND,XSEND
  17029. " "0500AB" :Usr) "xXRNG" ("x1 x2 \\->
  17030. " "x-Axis Display Range Cmd
  17031. --
  17032. Specifies the x-axis display
  17033. range.
  17034. --
  17035. Related: AUTO,PDIM,PMAX,PMIN,YRNG
  17036. " "3C915" :Usr) "xXROOT" ("y x \\-> Y'
  17037. " "xth Root of y Cmd
  17038. --
  17039. Computes the xth root of a real
  17040. number.
  17041. y x \\-> x ROOT y
  17042. 'sym1' 'sym2' \\-> 'XROOT(sym2,sym1)'
  17043. 'sym' x \\-> 'XROOT(x,sym)'
  17044. y 'sym' \\-> 'XROOT(sym,y)'
  17045. y_u x \\-> x ROOT y_u1/x
  17046. y_u 'sym' \\-> 'XROOT(sym,y_u)'
  17047. " "3A278" :Usr) "~xXSEND" ("name \\->
  17048. " "XModem Send Cmd
  17049. --
  17050. Sends a copy of the named object
  17051. via XModem.
  17052. --
  17053. Related: BAUD,RECN,RECV,SEND,XRECV
  17054. " "04F0AB" :Usr) "~xXSERV" ("\\->
  17055. " "Xmodem server command: Puts the calculator
  17056. in XMODEM server mode. When in server mode,
  17057. the following commands are available:
  17058. P: Put a file in calc
  17059. G: Get a file from calc
  17060. E: Execute a cmd line
  17061. M: Get the calc memory
  17062. L: List files in current dir
  17063. --
  17064. Related: BAUD,RECN,RECV,SEND,XRECV, XGET,XPUT
  17065. " "06E0AB" :Usr) "~xXVOL" ("x1 x2 \\->
  17066. " "X Volume Coordinates Cmd
  17067. --
  17068. Sets the width of the view volume
  17069. in the reserved variable VPAR.
  17070. --
  17071. <REF>TEXT:Reserved|VPAR
  17072. --
  17073. Related: EYEPT,XXRNG,YVOL,YYRNG,ZVOL
  17074. " "0000AB" :Usr) "~xXXRNG" ("x1 x2 \\->
  17075. " "X Range of an Input Plane Cmd
  17076. --
  17077. Specifies the x range of an input
  17078. plane (domain) for GRIDMAP and
  17079. PARSURFACE plots.
  17080. --
  17081. Related: EYEPT,NUMX,NUMY,XVOL,YVOL, YYRNG,ZVOL
  17082. " "0030AB" :Usr) "x\\GSXY" ("\\-> xsum
  17083. " "Sum of x Times Y Cmd
  17084. --
  17085. Sums the products of the
  17086. corresponding values in the
  17087. independent and dependent variable
  17088. columns of the current stat
  17089. matrix (reserved variable \\GSDAT).
  17090. --
  17091. <REF>TEXT:Reserved|\\GSDAT
  17092. --
  17093. Related: N\\GS,XCOL,\\GSX,\\GSX2,\\GSY,\\GSY2
  17094. " "3DEC6" :Usr) "xSUMXY" ("\\-> xsum
  17095. " "Sum of x Times Y Cmd
  17096. --
  17097. Sums the products of the
  17098. corresponding values in the
  17099. independent and dependent variable
  17100. columns of the current stat
  17101. matrix (reserved variable \\GSDAT).
  17102. --
  17103. <REF>TEXT:Reserved|\\GSDAT
  17104. --
  17105. Related: N\\GS,XCOL,\\GSX,\\GSX2,\\GSY,\\GSY2
  17106. " "3DEC6" :Usr) "x\\GSY" ("\\-> xsum
  17107. " "Sum of y-Values Cmd
  17108. --
  17109. Sums the values in the dependent
  17110. variable column of the current
  17111. stat matrix (reserved var \\GSDAT).
  17112. --
  17113. <REF>TEXT:Reserved|\\GSDAT
  17114. --
  17115. Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY2
  17116. " "3DE75" :Usr) "xSUMY" ("\\-> xsum
  17117. " "Sum of y-Values Cmd
  17118. --
  17119. Sums the values in the dependent
  17120. variable column of the current
  17121. stat matrix (reserved var \\GSDAT).
  17122. --
  17123. <REF>TEXT:Reserved|\\GSDAT
  17124. --
  17125. Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY2
  17126. " "3DE75" :Usr) "x\\GSY2" ("\\-> xsum
  17127. " "Sum of Squares of y-Values Cmd
  17128. --
  17129. Sums the squares of the values in
  17130. the dependent-variable column of
  17131. the current stat matrix (reserved
  17132. variable \\GSDAT).
  17133. --
  17134. <REF>TEXT:Reserved|\\GSDAT
  17135. --
  17136. Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY
  17137. " "3DEAB" :Usr) "xSUMY2" ("\\-> xsum
  17138. " "Sum of Squares of y-Values Cmd
  17139. --
  17140. Sums the squares of the values in
  17141. the dependent-variable column of
  17142. the current stat matrix (reserved
  17143. variable \\GSDAT).
  17144. --
  17145. <REF>TEXT:Reserved|\\GSDAT
  17146. --
  17147. Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY
  17148. " "3DEAB" :Usr) "xYCOL" ("n \\->
  17149. " "Dependent Column Cmd
  17150. --
  17151. Specifies the dependent-variable
  17152. column of the current stat matrix
  17153. (reserved variable \\GSDAT).
  17154. --
  17155. <REF>TEXT:Reserved|\\GSDAT
  17156. --
  17157. Related: BARPLOT,BESTFIT,COL\\GS,CORR, COV,EXPFIT,HISTPLOT,LINFIT,LOGFIT, LR,PREDX,PREFY,PWRFIT,SCATRPLOT,XCOL
  17158. " "3E05D" :Usr) "xYRNG" ("y1 y2 \\->
  17159. " "y-Axis Display Range Cmd
  17160. --
  17161. Specifies the y-axis display
  17162. range.
  17163. --
  17164. Related: AUTO,PDIM,PMAX,PMIN,XRNG
  17165. " "3C935" :Usr) "~xYSLICE" ("\\->
  17166. " "Y-Slice Plot Cmd
  17167. --
  17168. Sets the plot type to YSLICE.
  17169. --
  17170. Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,TRUTH,WIREFRAME
  17171. " "00B0AB" :Usr) "~xYVOL" ("y1 y2 \\->
  17172. " "Y Volume Coordinates Cmd
  17173. --
  17174. Sets the depth of the view volume
  17175. in the reserved variable VPAR.
  17176. ynear yfar \\->
  17177. --
  17178. <REF>TEXT:Reserved|VPAR
  17179. --
  17180. Related: EYEPT,XVOL,XXRNG,YYRNG,ZVOL
  17181. " "0010AB" :Usr) "~xYYRNG" ("y1 y2 \\->
  17182. " "Y Range of an Input Plane Cmd
  17183. --
  17184. Specifies the y range of an input
  17185. plane (domain) for GRIDMAP and
  17186. PARSURFACE p lots.
  17187. --
  17188. Related: EYEPT,XVOL,XXRNG,YYRNG,ZVOL
  17189. " "0040AB" :Usr) "~xZEROS" ("symb var \\-> {zeros}
  17190. " "" "040314" :CASHELP :Usr) "~xZFACTOR" ("xTr yPr \\-> xZf
  17191. " "Gas Compressibility Z Factor Func
  17192. --
  17193. Calculates the gas compressibility
  17194. ity correction factor for non-ideal
  17195. behavior of a hydro-carbon
  17196. gas.
  17197. " "05F0AB" :Usr) "~xZVOL" ("x1 x2 \\->
  17198. " "Z Volume Coordinates Cmd
  17199. --
  17200. Sets the height of the view volume
  17201. in the reserved variable VPAR.
  17202. --
  17203. <REF>TEXT:Reserved|VPAR
  17204. --
  17205. Related: EYEPT,XVOL,XXRNG,YVOL,YYRNG
  17206. " "0020AB" :Usr) "x^" ("y x \\-> y^x
  17207. " "Power Analytic Func
  17208. --
  17209. Returns the value of the level 2
  17210. object raised to the power of the
  17211. level 1 object.
  17212. w z \\-> w^z
  17213. z 'sym' \\-> 'z^sym'
  17214. 'sym' z \\-> '(sym)^z'
  17215. 'sym1' 'sym2' \\-> 'sym1^(sym2)'
  17216. x_u y \\-> xy_uy
  17217. x_u 'sym' \\-> '(x_u)^(sym)'
  17218. --
  17219. Flags: -1 -3
  17220. Principal soln -1
  17221. Numeric results -3
  17222. --
  17223. Related: EXP,ISOL,LN,XROOT
  17224. " "3A097" :Usr) "x|" ("symb {var val ...} \\-> x'
  17225. " "Where Func
  17226. --
  17227. Substitutes values for names in
  17228. an expression.
  17229. --
  17230. 2: 'symold'
  17231. 1: { name1 'sym1' name2
  17232. 'sym2' ... }
  17233. \\|v
  17234. 1: 'symnew'
  17235. --
  17236. 2: x
  17237. 1: { name1 'sym1' name2
  17238. 'sym2' ... }
  17239. \\|v
  17240. 1: x
  17241. --
  17242. 2: (x, y)
  17243. 1: { name1 'sym1' name2
  17244. 'sym2' ... }
  17245. \\|v
  17246. 1: (x, y)
  17247. --
  17248. Flags: -3
  17249. Numeric results -3
  17250. --
  17251. Related: APPLY,QUOTE
  17252. " "3D56B" :Usr) "x\\v/" ("x \\-> x'
  17253. " "Square Root Analytic Func
  17254. --
  17255. Returns the (+ve) square root of
  17256. the argument.
  17257. --
  17258. z \\-> \\v/z
  17259. x_u \\-> \\v/(x)_u
  17260. 'sym' \\-> 'SQRT(sym)'
  17261. --
  17262. Flags: -1 -3
  17263. --
  17264. Related: SQ,^,ISOL
  17265. " "3A442" :Usr) "xSQRT" ("x \\-> x'
  17266. " "Square Root Analytic Func
  17267. --
  17268. Returns the (+ve) square root of
  17269. the argument.
  17270. --
  17271. z \\-> \\v/z
  17272. x_u \\-> \\v/(x)_u
  17273. 'sym' \\-> 'SQRT(sym)'
  17274. --
  17275. Flags: -1 -3
  17276. --
  17277. Related: SQ,^,ISOL
  17278. " "3A442" :Usr) "x\\.S" ("x1 x2 symb var \\-> symb'
  17279. " "Integral Func
  17280. --
  17281. Integrates symb from
  17282. lower limit x1 to upper limit x2
  17283. respect to a variable var
  17284. of integration.
  17285. --
  17286. Flags: -3 -45 -46 -47 -48 -49 -50
  17287. --
  17288. Related: TAYLR,\\.d,\\GS
  17289. " "3D434" :Usr) "x\\GS+" ("x \\->
  17290. x1...xn \\->
  17291. []/[[]] \\->
  17292. " "Sigma Plus Cmd
  17293. --
  17294. Adds one or more data points to
  17295. the current stat matrix (reserved
  17296. variable \\GSDAT).
  17297. --
  17298. <REF>TEXT:Reserved|\\GSDAT
  17299. --
  17300. Related: CL\\GS,RCL\\GS,STO\\GS,\\GS-
  17301. " "3DDC4" :Usr) "xSIGMA+" ("x \\->
  17302. x1...xn \\->
  17303. []/[[]] \\->
  17304. " "Sigma Plus Cmd
  17305. --
  17306. Adds one or more data points to
  17307. the current stat matrix (reserved
  17308. variable \\GSDAT).
  17309. --
  17310. <REF>TEXT:Reserved|\\GSDAT
  17311. --
  17312. Related: CL\\GS,RCL\\GS,STO\\GS,\\GS-
  17313. " "3DDC4" :Usr) "x\\GS-" ("\\-> x
  17314. \\-> []
  17315. " "Sigma Minus Cmd
  17316. --
  17317. Returns a vector of m real numbers
  17318. (or one number x if m = 1)
  17319. corresponding to the coordinate
  17320. values of the last data point
  17321. entered by \\GS+ into the current stat
  17322. matrix (reserved variable \\GSDAT).
  17323. --
  17324. <REF>TEXT:Reserved|\\GSDAT
  17325. --
  17326. Related: CL\\GS,RCL\\GS,STO\\GS,\\GS+
  17327. " "3DDEE" :Usr) "xSIGMA-" ("\\-> x
  17328. \\-> []
  17329. " "Sigma Minus Cmd
  17330. --
  17331. Returns a vector of m real numbers
  17332. (or one number x if m = 1)
  17333. corresponding to the coordinate
  17334. values of the last data point
  17335. entered by \\GS+ into the current stat
  17336. matrix (reserved variable \\GSDAT).
  17337. --
  17338. <REF>TEXT:Reserved|\\GSDAT
  17339. --
  17340. Related: CL\\GS,RCL\\GS,STO\\GS,\\GS+
  17341. " "3DDEE" :Usr) "x\\pi" ("\\-> \\pi
  17342. " "PI Func
  17343. --
  17344. Returns the symbolic constant '\\pi'
  17345. or its numerical representation,
  17346. 3.14159265359.
  17347. \\-> '\\pi'
  17348. \\-> 3.14159265359
  17349. --
  17350. Flags: -2 -3
  17351. --
  17352. Related: e,i,MAXR,MINR,\\->Q\\pi
  17353. " "39AC7" :Usr) "xPI" ("\\-> \\pi
  17354. " "PI Func
  17355. --
  17356. Returns the symbolic constant '\\pi'
  17357. or its numerical representation,
  17358. 3.14159265359.
  17359. \\-> '\\pi'
  17360. \\-> 3.14159265359
  17361. --
  17362. Flags: -2 -3
  17363. --
  17364. Related: e,i,MAXR,MINR,\\->Q\\pi
  17365. " "39AC7" :Usr) "x\\.d" ("symb var \\-> symb'
  17366. " "Derivative Func
  17367. --
  17368. Takes the derivative of an expression,
  17369. number, or unit object with
  17370. respect to a specified variable
  17371. of differentiation.
  17372. --
  17373. 'sym1' 'name' \\-> 'sym2'
  17374. z 'name' \\-> 0
  17375. x_unit 'name' \\-> 0
  17376. --
  17377. Flags: -3
  17378. --
  17379. Related: TAYLR,\\.S,\\GS
  17380. " "3D202" :Usr) "x\\<=" ("x y \\-> 1 \\n \\-> 0
  17381. " "Less Than or Equal Func
  17382. --
  17383. Tests whether one object is less
  17384. than or equal to another object.
  17385. --
  17386. x y \\-> 0/1
  17387. #n1 #n2 \\-> 0/1
  17388. \"str1\" \"str2\" \\-> 0/1
  17389. x 'sym' \\-> 'x<=sym'
  17390. 'sym' z \\-> 'sym<=z'
  17391. 'sym1' 'sym2' \\-> 'sym1<=sym2'
  17392. x_u1 y_u2 \\-> 0/1
  17393. x_u 'sym' \\-> 'x_unit<=sym'
  17394. 'sym' x_u \\-> 'sym<=x_unit'
  17395. --
  17396. Flags: -3
  17397. --
  17398. Related: <,>,\\>=,==,\\=/
  17399. " "3CF80" :Usr) "x<=?" ("x y \\-> 1 \\n \\-> 0
  17400. " "Less Than or Equal Func
  17401. --
  17402. Tests whether one object is less
  17403. than or equal to another object.
  17404. --
  17405. x y \\-> 0/1
  17406. #n1 #n2 \\-> 0/1
  17407. \"str1\" \"str2\" \\-> 0/1
  17408. x 'sym' \\-> 'x<=sym'
  17409. 'sym' z \\-> 'sym<=z'
  17410. 'sym1' 'sym2' \\-> 'sym1<=sym2'
  17411. x_u1 y_u2 \\-> 0/1
  17412. x_u 'sym' \\-> 'x_unit<=sym'
  17413. 'sym' x_u \\-> 'sym<=x_unit'
  17414. --
  17415. Flags: -3
  17416. --
  17417. Related: <,>,\\>=,==,\\=/
  17418. " "3CF80" :Usr) "x\\>=" ("x y \\-> 1 \\n \\-> 0
  17419. " "Greater Than or Equal Func
  17420. --
  17421. x y \\-> 0/1
  17422. #n1 #n2 \\-> 0/1
  17423. \"str1\" \"str2\" \\-> 0/1
  17424. x 'sym' \\-> 'x\\>=sym'
  17425. 'sym' z \\-> 'sym\\>=z'
  17426. 'sym1' 'sym2' \\-> 'sym1\\>=sym2'
  17427. x_u1 y_u2 \\-> 0/1
  17428. x_u 'sym' \\-> 'x_u\\>=sym'
  17429. 'sym' x_u \\-> 'sym\\>=x_u'
  17430. --
  17431. Flags: -3
  17432. --
  17433. Related: <,\\<=,>,==,\\=/
  17434. " "3D01F" :Usr) "x>=?" ("x y \\-> 1 \\n \\-> 0
  17435. " "Greater Than or Equal Func
  17436. --
  17437. x y \\-> 0/1
  17438. #n1 #n2 \\-> 0/1
  17439. \"str1\" \"str2\" \\-> 0/1
  17440. x 'sym' \\-> 'x\\>=sym'
  17441. 'sym' z \\-> 'sym\\>=z'
  17442. 'sym1' 'sym2' \\-> 'sym1\\>=sym2'
  17443. x_u1 y_u2 \\-> 0/1
  17444. x_u 'sym' \\-> 'x_u\\>=sym'
  17445. 'sym' x_u \\-> 'sym\\>=x_u'
  17446. --
  17447. Flags: -3
  17448. --
  17449. Related: <,\\<=,>,==,\\=/
  17450. " "3D01F" :Usr) "x\\=/" ("x y \\-> 1 \\n \\-> 0
  17451. " "Not Equal Func
  17452. --
  17453. Tests if two objects are equal.
  17454. obj1 obj2 \\-> 0/1
  17455. (x,0) x \\-> 0/1
  17456. x (x,0) \\-> 0/1
  17457. z 'sym' \\-> 'z\\=/sym'
  17458. 'sym' z \\-> 'sym\\=/z'
  17459. 'sym1' 'sym2' \\-> 'sym1\\=/sym2'
  17460. --
  17461. Flags: -3
  17462. --
  17463. Related: SAME,TYPE,<,\\<=,>,\\>=, ==
  17464. " "3CD21" :Usr) "x#?" ("x y \\-> 1 \\n \\-> 0
  17465. " "Not Equal Func
  17466. --
  17467. Tests if two objects are equal.
  17468. obj1 obj2 \\-> 0/1
  17469. (x,0) x \\-> 0/1
  17470. x (x,0) \\-> 0/1
  17471. z 'sym' \\-> 'z\\=/sym'
  17472. 'sym' z \\-> 'sym\\=/z'
  17473. 'sym1' 'sym2' \\-> 'sym1\\=/sym2'
  17474. --
  17475. Flags: -3
  17476. --
  17477. Related: SAME,TYPE,<,\\<=,>,\\>=, ==
  17478. " "3CD21" :Usr) "x\\->" ("ob1 .. obn \\->
  17479. " "Create Local Variables Cmd
  17480. --
  17481. Creates local variables.
  17482. obj1 ... objn \\->
  17483. --
  17484. Syntax:
  17485. \\-> name1 name2 ... nameN \\<< prog \\>>
  17486. \\-> name1 name2 ... nameN 'Expr'
  17487. --
  17488. Related: DEFINE,STO
  17489. " "3885C" :Usr) "xRPN->" ("ob1 .. obn \\->
  17490. " "Create Local Variables Cmd
  17491. --
  17492. Creates local variables.
  17493. obj1 ... objn \\->
  17494. --
  17495. Syntax:
  17496. \\-> name1 name2 ... nameN \\<< prog \\>>
  17497. \\-> name1 name2 ... nameN 'Expr'
  17498. --
  17499. Related: DEFINE,STO
  17500. " "3885C" :Usr) "x\\->" ("
  17501. " "Create local variable comand.
  17502. <REF>xRPN->
  17503. " "38093" :Usr) "xALG->" ("
  17504. " "Create local variable comand.
  17505. <REF>xRPN->
  17506. " "38093" :Usr) "x!" ("x \\-> x'
  17507. " "Factorial (Gamma) Func
  17508. --
  17509. Returns the factorial n! of a
  17510. positive integer argument n, or
  17511. the gamma function \242(x+1) of a
  17512. non-integer argument x.
  17513. n \\-> n!
  17514. x \\-> \242(x+1)
  17515. 'sym' \\-> '(sym!)'
  17516. --
  17517. Flags: -3 -20 -21
  17518. Numerical Results -3
  17519. Underflow exception -20
  17520. Overflow exception -21
  17521. --
  17522. Related: COMB,PERM
  17523. " "3ABAF" :Usr) "xFACT" ("x \\-> x'
  17524. " "Factorial (Gamma) Func
  17525. --
  17526. Returns the factorial n! of a
  17527. positive integer argument n, or
  17528. the gamma function \242(x+1) of a
  17529. non-integer argument x.
  17530. n \\-> n!
  17531. x \\-> \242(x+1)
  17532. 'sym' \\-> '(sym!)'
  17533. --
  17534. Flags: -3 -20 -21
  17535. Numerical Results -3
  17536. Underflow exception -20
  17537. Overflow exception -21
  17538. --
  17539. Related: COMB,PERM
  17540. " "3ABAF" :Usr) "x%" ("x y \\-> xy/100
  17541. " "Percent Func
  17542. --
  17543. Returns x (level 2) percent of y
  17544. (level 1).
  17545. x y \\-> xy/100
  17546. x 'sym' \\-> '%(x,sym)'
  17547. 'sym' x \\-> '%(sym,x)'
  17548. 'sym1' 'sym2' \\-> '%(sym1,sym2)'
  17549. x y_unit \\-> (xy/100)_unit
  17550. x_unit y \\-> (xy/100)_unit
  17551. 'sym' x_unit \\-> '%(sym,x_unit)'
  17552. x_unit 'sym' \\-> '%(x_unit,sym)'
  17553. --
  17554. Flags:
  17555. Numerical Results -3
  17556. --
  17557. Related: %CH,%T
  17558. " "3B251" :Usr) "x*" ("x y \\-> x*y
  17559. " "Multiply Analytic Func
  17560. --
  17561. Returns the product of the args.
  17562. z1 z2 \\-> z1\267z2
  17563. [[ mat ]] [ arr ] \\-> [[ mat\327arr ]]
  17564. z [ arr ] \\-> [ z \327 array ]
  17565. [ arr ] z \\-> [ arr \327 z ]
  17566. z 'sym' \\-> 'z * sym'
  17567. 'sym' z \\-> 'sym * z'
  17568. 'sym1' 'sym2' \\-> 'sym1 * sym2'
  17569. #n1 n2 \\-> #n'
  17570. n1 #n2 \\-> #n'
  17571. #n1 #n2 \\-> #n'
  17572. x_u y_u \\-> xy_ux \327 unity
  17573. x y_u \\-> xy_u
  17574. x_u y \\-> xy_u
  17575. 'sym' x_u \\-> 'sym * x_u'
  17576. x_u 'sym' \\-> 'x_u * sym'
  17577. --
  17578. Flags: -3 -5 -6 -7 -8 -9 -10
  17579. Numeric results -3
  17580. bint wordsize -5 \\-> -10
  17581. --
  17582. Related: +,-,/,=
  17583. " "39DE8" :Usr) "x+" (" x y \\-> x+y
  17584. . 38G: 036002 \\~%s\\ [Usr]
  17585. " "Add Analytic Func
  17586. --
  17587. Returns the sum of the arguments.
  17588. Addition. If one arg is list, insert element
  17589. in list or concatenate lists. <REF>xADD
  17590. z1 z2 \\-> z1+z2
  17591. [ arr ]1 [ arr ]2 \\-> [ arr ]1+2
  17592. z 'sym' \\-> 'z+(sym)'
  17593. 'symb' z \\-> 'sym+z'
  17594. 'sym1' 'sym2' \\-> 'sym1 + sym2'
  17595. { lst1 } { lst2 } \\-> { lst1 lst2 }
  17596. obj { o... } \\-> { obj o... }
  17597. { o... } o \\-> { o... obj }
  17598. \"str1\" \"str2\" \\-> \"str1str2\"
  17599. obj \"str\" \\-> \"obj str\"
  17600. \"str\" obj \\-> \"str obj\"
  17601. #n1 n2 \\-> #n'
  17602. n1 #n2 \\-> #n'
  17603. #n1 #n2 \\-> #n'
  17604. x1_u1 y_u2 \\-> (x2+y)_u2
  17605. 'sym' x_u \\-> 'sym+x_u'
  17606. x_u 'sym' \\-> 'x_u+sym'
  17607. grob1 grob2 \\-> grob'
  17608. --
  17609. Flags: -3 -4 -5 -6 -7 -8 -9 -10
  17610. Numeric results -3
  17611. Bint wordsize -5 \\-> -10
  17612. --
  17613. Related: -,*,/,=
  17614. " "39B58" :Usr) "x-" ("x y \\-> x-y
  17615. " "Subtract Analytic Func
  17616. --
  17617. Returns the difference of the
  17618. arguments: the object in level 1
  17619. is subtracted from the object in
  17620. level 2.
  17621. z1 z2 \\-> z1-z2
  17622. [ arr ]1 [ arr ]2 \\-> [ arr ]1_2
  17623. z 'sym' \\-> 'z-sym'
  17624. 'sym' z \\-> 'sym-z'
  17625. 'sym1' 'sym2' \\-> 'sym1 - sym2'
  17626. #n1 n2 \\-> #n'
  17627. n1 #n2 \\-> #n'
  17628. #n1 #n2 \\-> #n'
  17629. x1_u1 y_u2 \\-> (x2-y)_u2
  17630. 'sym' x_u \\-> 'sym-x_u'
  17631. x_u 'sym' \\-> 'x_u-sym'
  17632. --
  17633. Flags: -3
  17634. Numeric results -3
  17635. --
  17636. Related: +,*,/,=
  17637. " "39CFC" :Usr) "x/" ("x y \\-> x/y
  17638. " "Divide Analytic Func
  17639. --
  17640. Returns the quotient of the
  17641. arguments: the level 2 object
  17642. divided by the level 1 object.
  17643. (Abbrev. _u = _unit)
  17644. z1 z2 \\-> z1 / z2
  17645. [ arr ] [[ mat ]] \\-> [[mat^-1\327arr]]
  17646. [ arr ] z \\-> [ arr / z ]
  17647. z 'sym' \\-> 'z / sym'
  17648. 'sym' z \\-> 'sym / z'
  17649. 'sym1' 'sym2' \\-> 'sym1 / sym2'
  17650. #n1 n2 \\-> #n'
  17651. n1 #n2 \\-> #n'
  17652. #n1 #n2 \\-> #n'
  17653. x_u1 y_u2 \\-> (x/y)_u1/u2
  17654. x y_u \\-> (x/y)_1/u
  17655. x_u y \\-> (x/y)_u
  17656. 'sym' x_u \\-> 'sym/x_u'
  17657. x_u 'sym' \\-> 'x_u/sym'
  17658. --
  17659. Related: +,-,*,=,RATIO
  17660. " "39F49" :Usr) "x<" ("x y \\-> 1 \\n \\-> 0
  17661. " "Less Than Func
  17662. --
  17663. Tests whether one object is less
  17664. than another object.
  17665. x y \\-> 0/1
  17666. #n1 #n2 \\-> 0/1
  17667. \"str1\" \"str2\" \\-> 0/1
  17668. x 'sym' \\-> 'x<sym'
  17669. 'sym' x \\-> 'sym<z'
  17670. 'sym1' 'sym2' \\-> 'sym1<sym2'
  17671. x_u1 y_u2 \\-> 0/1
  17672. x_u 'sym' \\-> 'x_u<sym'
  17673. 'sym' x_u \\-> 'sym<x_u'
  17674. --
  17675. Flags: -3
  17676. Numeric results -3
  17677. " "3CE42" :Usr) "x=" ("x y \\-> x=y
  17678. " "Makes equation out of two expressions.
  17679. Equals Analytic Func
  17680. --
  17681. Returns an equation formed from
  17682. the two arguments.
  17683. z1 z2 \\-> 'z1=z2'
  17684. z 'sym' \\-> 'z=sym'
  17685. 'sym' z \\-> 'sym=z'
  17686. 'sym1' 'sym2' \\-> 'sym1=sym2'
  17687. y x_u \\-> 'y=x_u'
  17688. y_u x \\-> 'y_u=x'
  17689. y_u x_u \\-> 'y_u=x_u'
  17690. 'sym' x_u \\-> 'sym=x_u'
  17691. x_u 'sym' \\-> 'x_u=sym'
  17692. --
  17693. Flags: -3
  17694. Numeric results -3
  17695. --
  17696. Related: DEFINE,EVAL,-
  17697. " "398B9" :Usr) "x==" ("x y \\-> 1 \\n \\-> 0
  17698. " "Logical Equality Func
  17699. --
  17700. Tests if two objects are equal.
  17701. obj1 obj2 \\-> 0/1
  17702. (x,0) x \\-> 0/1
  17703. x (x,0) \\-> 0/1
  17704. z 'sym' \\-> 'z==sym'
  17705. 'sym' z \\-> 'sym==z'
  17706. 'sym1' 'sym2' \\-> 'sym1==sym2'
  17707. --
  17708. Flags: -3
  17709. Numeric results -3
  17710. --
  17711. Related: SAME,TYPE,<,\\<=,>,\\>=,\\=/
  17712. " "3CBF6" :Usr) "x>" ("x y \\-> 1 \\n \\-> 0
  17713. " "Greater Than Func
  17714. --
  17715. Tests whether one object is
  17716. greater than another object.
  17717. x y \\-> 0/1
  17718. #n1 #n2 \\-> 0/1
  17719. \"str1\" \"str2\" \\-> 0/1
  17720. x 'sym' \\-> 'x>sym'
  17721. 'sym' z \\-> 'sym>z'
  17722. 'sym1' 'sym2' \\-> 'sym1>sym2'
  17723. x_u1 y_u2 \\-> 0/1
  17724. x_u 'sym' \\-> 'x_u>sym'
  17725. 'sym' x_u \\-> 'sym>x_u'
  17726. --
  17727. Flags: -3
  17728. Numeric results -3
  17729. --
  17730. Related: <,\\<=,\\>=,==,\\=/
  17731. " "3CEE1" :Usr) "~x\\->H" ("ob \\-> $hex
  17732. " "" "000100" :Lib) "~xH\\->" ("$hex \\-> ob
  17733. " "" "001100" :Lib) "~x\\->A" ("ob \\-> hxs
  17734. " "" "002100" :Lib) "~xA\\->" ("hxs \\-> ob
  17735. " "" "003100" :Lib) "~xA\\->H" ("hxs \\-> $hex
  17736. " "" "004100" :Lib) "~xH\\->A" ("$hex \\-> hxs
  17737. " "" "005100" :Lib) "~x\\->CD" ("$hex \\-> code
  17738. " "" "006100" :Lib) "~xCD\\->" ("code \\-> $hex
  17739. " "" "007100" :Lib) "~xS\\->H" ("$ \\-> $hex
  17740. " "" "008100" :Lib) "~xH\\->S" ("$hex \\-> $
  17741. " "" "009100" :Lib) "~x\\->LST" ("comp \\-> {}
  17742. ob1..obn %n \\-> {}
  17743. " "" "00A100" :Lib) "~x\\->ALG" ("comp \\-> symb
  17744. ob1..obn %n \\-> symb
  17745. " "" "00B100" :Lib) "~x\\->PRG" ("comp \\-> ::
  17746. ob1..obn %n \\-> ::
  17747. " "" "00C100" :Lib) "~xCOMP\\->" ("comp \\-> ob1...obn %n
  17748. " "" "00D100" :Lib) "~x\\->RAM" ("ob \\-> ob
  17749. " "" "00E100" :Lib) "~xSREV" ("$ \\-> $'
  17750. " "" "00F100" :Lib) "~xPOKE" ("hxs $hex \\->
  17751. " "" "010100" :Lib) "~xPEEK" ("hxs1 hxs2 \\-> $hex
  17752. " "" "011100" :Lib) "~xAPEEK" ("hxs \\-> hxs'
  17753. " "" "012100" :Lib) "~xR~SB" ("% \\-> #
  17754. # \\-> %
  17755. " "" "013100" :Lib) "~xSB~B" ("# \\-> hxs
  17756. hxs \\-> #
  17757. " "" "014100" :Lib) "~xLR~R" ("%% \\-> %
  17758. % \\-> %%
  17759. " "" "015100" :Lib) "~xS~N" ("$ \\-> ID
  17760. ID \\-> $
  17761. " "" "016100" :Lib) "~xLC~C" ("%%C \\-> %C
  17762. %C \\-> %%C
  17763. " "" "017100" :Lib) "~xASM\\->" ("Code \\-> $
  17764. " "" "018100" :Lib) "~xBetaTesting" ("\\-> $
  17765. " "" "019100" :Lib) "~xCRLIB" ("\\-> lib
  17766. " "" "01A100" :Lib) "~xCRC" ("$ \\-> #crc
  17767. " "" "01B100" :Lib) "~xMAKESTR" ("xlen \\-> $
  17768. " "" "01C100" :Lib) "~xSERIAL" ("\\-> $
  17769. " "" "01D100" :Lib) "~xASM" ("$ \\-> ob
  17770. " "" "01E100" :Lib) "~xER" ("$ {errors} \\-> $'
  17771. " "" "01F100" :Lib) "~x\\->S2" ("ob \\-> $
  17772. " "" "020100" :Lib) "~xXLIB~" ("xlib xn \\-> ROMPTR
  17773. ROMPTR \\-> xlib xn
  17774. " "" "021100" :Lib) "~xGETADR" ("$ \\-> hxs
  17775. " "Get the address of an entry name.
  17776. " "001102" :Lib) "~xGETNAME" ("hxs \\-> $
  17777. " "Get the entry name corresponding to an
  17778. address.
  17779. " "002102" :Lib) "~xGETNAMES" ("$start \\-> {}
  17780. " "Get all entry names which start with the
  17781. given string.
  17782. " "003102" :Lib) "~xGETNEAR" ("$sub \\-> {}
  17783. " "Get all entry names which contain the given
  17784. string.
  17785. " "004102" :Lib) "SAVPTR" (" D0 to RPLTOP
  17786. D1 to DSKTOP
  17787. B to RETTOP
  17788. D to FREETOP
  17789. Clear carry
  17790. . 38G: 8121A \\$j%s\\ [ML]
  17791. " "" "0679B" :ML) "GETPTR" ("<REF>SAVPTR in reverse
  17792. Clears Carry.
  17793. " "" "067D2" :ML) "GETPTRLOOP" ("<REF>GETPTR , Loop to RPL
  17794. " "" "05143" :ML) "D0=DSKTOP" ("Get new D0 from DSKTOP, uses A
  17795. " "" "36897" :ML) "D1=DSKTOP" ("Get new D1 from DSKTOP, uses C
  17796. " "" "368A6" :ML) "AllowIntr" ("Allow interrupts.
  17797. " "" "26767" :ML) "DisableIntr" ("Disable interrupts.
  17798. " "" "26791" :ML) "AINRTN" ("A=IN see also <REF>CINRTN
  17799. For hardware reasons (bug)
  17800. A=IN must be at even addr
  17801. " "" "0020A" :ML) "CINRTN" ("C=IN see also <REF>AINRTN
  17802. For hardware reasons (bug)
  17803. C=IN must be at even addr
  17804. " "" "00212" :ML) "DOMEMERR" ("Insufficient Memory error
  17805. " "" "04FBB") "DOSIZEERR" ("Bad Argument Value error
  17806. " "" "26CA7" :ML) "Errjmp" ("Error exit
  17807. A.A = error number
  17808. " "" "05023" :ML) "ErrjmpC" ("A=C.A <REF>Errjmp
  17809. " "" "266C6" :ML) "GPErrjmpC" ("A=C.A <REF>GETPTR <REF>Errjmp
  17810. " "" "266DB" :ML) "GPMEMERR" ("<REF>GETPTR <REF>DOMEMERR
  17811. " "" "065AA" :ML) "argtypeerr" ("\"Bad Argument Type\"
  17812. " "" "00202") "argvalerr" ("\"Bad Argument Value\"
  17813. " "" "00203") "constuniterr" ("\"Inconsistent Units\"
  17814. " "" "00B02") "infreserr" ("\"Infinite Result\"
  17815. " "" "00305") "intrptderr" ("\"Interrupted\"
  17816. " "" "00A03") "lowbaterr" ("\"Low Battery\"
  17817. " "" "00C14") "negunferr" ("\"Negative Underflow\"
  17818. " "" "00302") "ofloerr" ("\"Overflow\"
  17819. " "" "00303") "portnotaverr" ("\"Port Not Avaliable\"
  17820. " "" "0000A") "posunferr" ("\"Positive Underflow\"
  17821. " "" "00301") "prtparerr" ("\"Invalid PRTPAR\"
  17822. " "" "00C13") "timeouterr" ("\"Timeout\"
  17823. " "" "00C02") "xferfailerr" ("\"Transfer Failed\"
  17824. " "" "00C06") "ADIV3" ("A.A = A.A/3
  17825. Uses A.6 C.6 P
  17826. " "" "26A2A" :ML) "ADIV6" ("A.A = A.A/6
  17827. Uses A.6 C.6 P
  17828. " "" "26A23" :ML) "ADivC" ("B.A=A.A/C.A
  17829. Uses A.A C.A
  17830. " "" "26A15" :ML) "AMULT34" ("A.A=A.A*34
  17831. Uses C.A
  17832. " "" "269F2" :ML) "BMULT34" ("B.A=B.A*34
  17833. Uses C.A
  17834. " "" "26A1C" :ML) "CMULT34" ("C.A=A.A*34
  17835. Uses A.A
  17836. " "" "269F9" :ML) "DCHXW" ("Converts BCD in C.W to hex in
  17837. A.W B.W C.W. See <REF>HXDCW
  17838. Uses P CRY
  17839. " "" "26F00" :ML) "DIV5" ("C.A = C.A/5
  17840. Uses A.10 C.10 D.10 P
  17841. " "" "06A8E" :ML) "HEXTODEC" ("Converts hex in C.A to BCD in A.A
  17842. Uses A.6 B.6 P
  17843. " "" "26A0E" :ML) "HXDCW" ("Converts hex in A.W to BCD in
  17844. A.W B.W C.W. See <REF>DCHXW
  17845. Uses P CRY
  17846. " "Note that HXDCW wants the input
  17847. in A but DCHXW wants it in C
  17848. " "2DEAA" :ML) "IntDiv" ("A.A/C.A -> A.A=remainder,
  17849. C.A=quotient, uses D.A P SB
  17850. " "" "03F24" :ML) "MPY" ("Multiply A.W and C.W (-> A.W=C.W)
  17851. Uses D.W, SB. Returns carry clear
  17852. " "" "2709E" :ML) "MUL#" ("B.A = A.A*C.A
  17853. " "" "03991" :ML) "MULTB+A*C" ("B.A=B.A+(A.A*C.A)
  17854. " "" "26A07" :ML) "MULTBAC" ("B=0.A <REF>MULTB+A*C
  17855. " "" "26A00" :ML) "STAB0" ("A.W -> R0
  17856. B.W -> R1
  17857. " "" "31348" :ML) "STAB2" ("A.W -> R2
  17858. B.W -> R3
  17859. " "" "31356" :ML) "STCD0" ("C.W -> R0
  17860. B.W -> R1
  17861. " "" "31364" :ML) "STCD2" ("C.W -> R2
  17862. B.W -> R3
  17863. " "" "31372" :ML) "RCAB0" ("R0 -> A.W
  17864. R1 -> B.W
  17865. " "" "3139C" :ML) "RCAB2" ("R2 -> A.W
  17866. R3 -> B.W
  17867. " "" "313A7" :ML) "RCCD0" ("R0 -> C.W
  17868. R1 -> D.W
  17869. " "" "313B2" :ML) "RCCD2" ("R2 -> C.W
  17870. R3 -> D.W
  17871. " "" "313BD" :ML) "EXAB0" ("A.W <-> R0
  17872. B.W <-> R1
  17873. " "" "31380" :ML) "EXAB2" ("A.W <-> R2
  17874. B.W <-> R3
  17875. " "" "3138E" :ML) "XYEX" ("A:B <-> C:D
  17876. " "" "3133A" :ML) "DIVF" ("x=x/y
  17877. " "" "31756" :ML) "MULTF" ("x=x*y
  17878. " "" "316FD" :ML) "RADD1" ("x=x+1 see <REF>RADDF
  17879. " "" "3158F" :ML) "RADDF" ("x=x+y
  17880. " "" "315A9" :ML) "RSUB1" ("x=x-1 see <REF>RADDF
  17881. " "" "31586" :ML) "PACK" ("( x -> A )
  17882. <REF>PACKSB without rounding
  17883. " "" "2F4A2" :ML) "PACKSB" ("( x -> A )
  17884. Converts %% to %.If SB is clear
  17885. uses roundup, if set uses
  17886. lowest nibble in % field to
  17887. determine rounding direction.
  17888. Obeys and sets flow
  17889. flags/indicators
  17890. " "" "2F47D" :ML) "SPLITA" ("( A -> x ) Convert % to %%
  17891. " "" "31131" :ML) "SPLITC" ("( C -> y ) Convert % to %%
  17892. " "" "31193" :ML :UBS) "SPLTAC" ("( A,C -> x, y )
  17893. Convert 2 reals to long reals
  17894. " "" "31187" :ML) "ADJMEM" ("D= @FREETOP=<REF>ROOM / 5
  17895. Uses A.10 B.10 C.10 D.10 <REF>DIV5
  17896. " "" "069F7" :ML) "DOGARBAGE" ("If ST=1 10 then <REF>GPMEMERR
  17897. else <REF>GARBAGECOL
  17898. and <REF>GETPTR
  17899. " "" "0554C" :ML) "GARBAGECOL" ("Garbage collection
  17900. does not use R1..R4
  17901. " "" "0613E" :ML) "ROOM" ("-> C.A = @DSKTOP-@RETTOP
  17902. Uses A.A D0
  17903. " "" "06806" :ML) "SKIPOB" ("Skip object in D0, clears ST1,
  17904. clears carry, P=0
  17905. --> D0 = addr past object
  17906. Uses: A.A C.A P ST1 RSTK2
  17907. " "" "03019" :ML) "BLKSWAP+" ("<REF>SWAPMEM_D0D1C and adjusts
  17908. all refs
  17909. " "" "2682B" :ML) "NEWADR" ("Moves TEMPOB zone at D0 to top
  17910. of TEMPOB area -> D0=new addr
  17911. " "Note that (1) the object must be
  17912. skippable and (2) it must be a
  17913. TEMPOB zone of its own (not
  17914. embedded). This entry is however
  17915. safe to use from TEMPOB because
  17916. it keeps track of one RSTK address
  17917. as well.
  17918. " "26871" :ML) "EndTempOb" ("Moves TEMPOB zone at D0 to top
  17919. of TEMPOB area -> D0=new addr
  17920. " "Note that (1) the object must be
  17921. skippable and (2) it must be a
  17922. TEMPOB zone of its own (not
  17923. embedded). This entry is however
  17924. safe to use from TEMPOB because
  17925. it keeps track of one RSTK address
  17926. as well.
  17927. " "26871" :ML) "MOVEDOWN" ("Copy downwards C.A nibbles from
  17928. D0 to D1, D0 and D1 will point
  17929. to the next locations
  17930. Used: A.W C.A P
  17931. Use this to move upwards
  17932. " "" "0670C" :ML) "MOVERSD" ("Delete a block below RSK
  17933. A.A=end C.A=nibbles
  17934. Adjusts all refs, then <REF>ADJMEM
  17935. Uses A.W B.A C.W D.10 D0 D1 P
  17936. " "" "06992" :ML) "MOVERSU" ("Open a block below RSK
  17937. A.A=start C.A=nibbles
  17938. Adjusts all refs, then <REF>ADJMEM
  17939. Uses A.W B.A C.10 D.10 D0 D1 P
  17940. " "" "06A53" :ML) "MOVEDSD" ("Open a block above stack
  17941. A.A=end C.A=nibbles
  17942. Adjusts all refs, then <REF>ADJMEM
  17943. Uses A.W B.A C.10 D.10 D0 D1 P
  17944. " "" "06A1D" :ML) "MOVEDSU" ("Delete a block above stack
  17945. A.A=start C.A=nibbles
  17946. Adjusts all refs, then <REF>ADJMEM
  17947. Uses A.W B.A C.10 D.10 D0 D1 P
  17948. " "" "069C5" :ML) "MOVEUP" ("Copy upwards C.A nibbles from
  17949. D0 to D1
  17950. D0 D1 will point to start of
  17951. area
  17952. Used: A.W C.A P
  17953. Use this to move downwards
  17954. " "" "066B9" :ML) "SWAPMEM" ("Swaps two memory areas
  17955. Area 1: R1.A to R2.A
  17956. Area 2: R2.A to R3.A
  17957. Uses <REF>SWAPMEM_D0D1C
  17958. " "" "269B3" :ML) "SWAPMEMEQ" ("Swaps two memory areas of the
  17959. same size <REF>SWAPMEMEQ_D0D1C
  17960. R1.A->Area1 R2.A->Area2
  17961. " "" "269DD" :ML) "SWAPMEMEQ_D0D1C" ("Swaps two memory areas of the
  17962. same size
  17963. D0->Area1 D1->Area2 C=(D1-D0)
  17964. Uses A.W B.A C.W P CRY
  17965. " "" "269E4" :ML) "SWAPMEM_D0D1C" ("D=C.A <REF>SWAPMEM_D0D1D
  17966. " "" "269BA" :ML) "SWAPMEM_D0D1C_nofree" ("D=C.A <REF>SWAPMEM_D0D1D_nofree
  17967. " "" "269C1" :ML) "SWAPMEM_D0D1D" ("Swaps two memory areas
  17968. Area 1: D0 to D1
  17969. Area 2: D1 to (D1+D.A)
  17970. Uses A.W B.A C.W D.W P CRY
  17971. " "" "269C8" :ML) "SWAPMEM_D0D1D_nofree" ("<REF>SWAPMEM_D0D1D but does not
  17972. alter the memory @RSKTOP
  17973. " "" "269CF" :ML) "SWAPMEM_nofree" ("<REF>SWAPMEM but does not alter
  17974. the memory @RSKTOP
  17975. " "" "269D6" :ML) "CREATETEMP" ("Allocates C.A nibbles
  17976. carry if not enough memory
  17977. -> D0=bottom, D1=top of area
  17978. -> B.A = C.A = @D1 = offset
  17979. to previous tempob = #nibbles+6
  17980. " "" "06AD8" :ML) "GETTEMP" ("<REF>CREATETEMP with
  17981. <REF>GARBAGECOL if necessary
  17982. <REF>GPMEMERR if not
  17983. enough memory
  17984. " "" "039BE" :ML) "GETBOTTEMP" ("Allocates C.A nibbles at the
  17985. bottom of TEMPOB, errors if not
  17986. enough memory
  17987. Returns D0=top D1=bottom of area
  17988. C.A=nibbles
  17989. Uses A.W B.A C.W D.10 R1.A
  17990. " "Bottom of TEMPOB means two things:
  17991. 1. VERY dangerous if called from TEMPOB
  17992. 2. The allocated string will not be moved by GC
  17993. " "268CC" :ML) "MAKE$" ("Creates character string in
  17994. tempob area Does SETHEX,
  17995. C=C+C.A and then <REF>MAKE$N
  17996. " "" "05B79" :ML) "MAKE$N" (" Creates character string in
  17997. tempob area If not enough mem
  17998. even after GC then memerr
  17999. C.A = nibbles -> A=nibbles+5,
  18000. B=nibbles+16 C=D1=addr of stack
  18001. D0 = addr of body of $
  18002. R0 = addr of $ Not used: R1-R4
  18003. . 38G: 81148 \\$j%s\\ [ML]
  18004. " "" "05B7D" :ML) "MAKEBOT$N" ("Creates a C.A nibs long string
  18005. at the bottom of TEMPOB
  18006. D0->body R0.A->string R1.A=len
  18007. Uses A.W B.A C.W D.10
  18008. See <REF>WIPEOUT <REF>GETBOTTEMP
  18009. " "" "26919" :ML) "MAKERAM$" ("Allocates all free mem in a str,
  18010. leaves 5 nibbles for pushing
  18011. See <REF>MAKE$N <REF>ROOM
  18012. " "" "26920" :ML) "Clean$" ("Shrink strobj in top of TEMPOB
  18013. R1=addr of length field
  18014. A.A=new end address
  18015. Uses A.W B.A C.W D.A D0 D1
  18016. " "" "26840" :ML) "Clean$R0" ("R1=R0+5 <REF>Clean$
  18017. " "" "26847" :ML) "Shrink$" ("Shrinks a strobj
  18018. R0.A=->$ D0=end of $
  18019. Uses A.W B.A C.W D.10 D0 D1
  18020. " "" "26721" :ML) "SIZEPLUS" ("Expands a strobj
  18021. R0.A=->$ D0=end of $
  18022. Uses A.W B.A C.10 D.10 D0 D1
  18023. " "" "26990" :ML) "Stretch$" ("Expands a strobj
  18024. R0.A=->$ D0=end of $
  18025. Uses A.W B.A C.10 D.10 D0 D1
  18026. " "" "26990" :ML) "DoCRC" ("Calculates the CRC of A.A nibs
  18027. at D0. Returns CRC in A.A
  18028. Uses C.W P
  18029. " "Turns interrupts off and on
  18030. " "05981" :ML) "DoCRCc" ("D0=C <REF>DoCRC
  18031. " "" "0597E" :ML) "CKLBCRC" ("Check CRC of library at D0
  18032. CC: Ok CS: CRC is wrong
  18033. Uses A.A C.W D0 P
  18034. " "Disables and re-enables interrupts
  18035. " "266B8" :ML) "CompareACbBytes" ("Compares A.B=C.B bytes at D0 and D1
  18036. CC: Equal CS: Not equal
  18037. D0/D1 always point past the end
  18038. Uses A.M A.A C.M C.B P
  18039. " "" "26C53" :ML) "INV.ZONE" ("Inverts (bitwise NOT) C.A nibbles
  18040. at D0
  18041. Uses A.W C.A P
  18042. " "" "2690B" :ML) "WIPEOUT" ("Zeroes C.A nibbles at D1
  18043. Uses A.W C.A P
  18044. " "" "0675C" :ML) "WIPESPACE" ("Inits C.A nibbles at D1 with
  18045. spaces (#20h) see <REF>WIPEOUT
  18046. " "" "269EB" :ML) "aBZU" ("Decompress a BZ-compressed string
  18047. D0->compressed
  18048. D1->room to decompress to
  18049. Uses A-D R0-R2
  18050. " "" "26808" :ML) "GETRRP" ("Returns the RRP in which the
  18051. object at A.A lies. If ob is
  18052. SysRRP, returns CS and leaves
  18053. A.A unchanged; else CC and
  18054. A.A->RRP B.A->RAM-WORD
  18055. Uses A.A B.A C.A D.A D0
  18056. " "An RRP is a directory, the returned address
  18057. points to the last-object-offset inside the
  18058. directory. The SysRRP is the same as HOME.
  18059. " "083D1" :ML) "RclAssembly" ("Recalls an object from the
  18060. current directory
  18061. D1->Name (ID etc)
  18062. Returns object at D0
  18063. Uses A.W B.A C.W D.A D0 D1 ST P
  18064. " "" "26C68" :ML) "ACCESSBank0" ("P=0: Switch to bank 0
  18065. P=1: Switch back
  18066. Uses D0 C.A P
  18067. " "" "26BB9" :ML) "ACCESSBank1" ("Bank 1, see <REF>ACCESSBank0
  18068. " "" "26BC0" :ML) "ACCESSBank2" ("Bank 2, see <REF>ACCESSBank0
  18069. " "" "26BC7" :ML) "ACCESSBank3" ("Bank 3, see <REF>ACCESSBank0
  18070. " "" "26BCE" :ML) "ACCESSBank4" ("Bank 4, see <REF>ACCESSBank0
  18071. " "" "26BD5" :ML) "ACCESSBank5" ("Bank 5, see <REF>ACCESSBank0
  18072. " "" "26BDC" :ML) "ACCESSBank6" ("Bank 6, see <REF>ACCESSBank0
  18073. " "" "26BE3" :ML) "ACCESSBank7" ("Bank 7, see <REF>ACCESSBank0
  18074. " "" "26BEA" :ML) "ACCESSBank8" ("Bank 8, see <REF>ACCESSBank0
  18075. " "" "26BF1" :ML) "ACCESSBank9" ("Bank 9, see <REF>ACCESSBank0
  18076. " "" "26BF8" :ML) "ACCESSBank10" ("Bank 10, see <REF>ACCESSBank0
  18077. " "" "26BFF" :ML) "ACCESSBank11" ("Bank 11, see <REF>ACCESSBank0
  18078. " "" "26C06" :ML) "ACCESSBank12" ("Bank 12, see <REF>ACCESSBank0
  18079. " "" "26C0D" :ML) "ACCESSBank13" ("Bank 13, see <REF>ACCESSBank0
  18080. " "" "26C14" :ML) "ACCESSBank14" ("Bank 14, see <REF>ACCESSBank0
  18081. " "" "26C1B" :ML) "ACCESSBank15" ("Bank 15, see <REF>ACCESSBank0
  18082. " "" "26C22" :ML) "ANNCTRL" ("Annunciator control
  18083. [LA4 LA3 LA2 LA1]
  18084. (alarm alpha -> <-)
  18085. " "" "0010B" :ML) "CRC" ("4 nibbles for CRC.
  18086. Every memory fetch updates CRC.
  18087. " "" "00104" :ML) "TIMER1" ("1 nibble timer
  18088. decremented 16 times/s
  18089. " "" "00137" :ML) "TIMER2" ("8 nibble timer
  18090. decremented 8192 times/s
  18091. " "" "00138" :ML) "$5x7" ("( D.A B.A C.A D0 D1 --> )
  18092. Displays string body at D1 in
  18093. grob at D0 C.A = chars B.A =
  18094. xlocation D.A = row length in
  18095. nibbles -> D1 = addr after $
  18096. D0 = location of next char
  18097. D.A = row length
  18098. " "" "266B1" :ML) "D0->Row1" ("( --> D0 )
  18099. Gets addr of current display
  18100. " "" "2677C" :ML) "D0->Sft1" ("( --> D0 )
  18101. Gets address of menu grob
  18102. " "" "26783" :ML) "DISP_DEC" ("Displays hex in C.A as dec
  18103. D0->GROB
  18104. Uses A.6 B.W C.W CRY RSTK2
  18105. ST see <REF>MINI_DISP_AWP
  18106. " "If C.A > #99999h, it displays
  18107. ----- instead of the actual number
  18108. " "26A38" :ML) "DispOn" ("Turns display on <REF>Dispoff
  18109. " "" "2679F" :ML) "DispOff" ("Turns display off <REF>Dispon
  18110. " "" "26798" :ML) "GET_HEADERTYPE" ("Returns the header type in A.A
  18111. Uses D0
  18112. " "The header type is the header
  18113. height in pixels, including the
  18114. black separator line
  18115. " "2689B" :ML) "GET_@FONTE" ("Returns the address of the system
  18116. font in A.A
  18117. " "Currently LA 84D82 RTN
  18118. " "2687F" :ML) "GET_HFONTE" ("Returns the heigth of the system
  18119. font in A.A, uses D0
  18120. " "" "268A2" :ML) "GET_HFONTECMD" ("Returns the heigth of the command
  18121. line font, uses D0
  18122. -> A.A=height ST9=normal/minifont
  18123. " "" "268A9" :ML) "GET_HFONTESTK" ("Returns the height of the stack
  18124. font, uses D0
  18125. -> A.A=height ST9=normal/minifont
  18126. " "" "268B0" :ML) "GET_HFONTESTKD1C" ("Returns the height of the stack
  18127. font, uses D1
  18128. -> C.A=height ST9=normal/minifont
  18129. " "" "268B7" :ML) "makegrob" (" R0.A = x, R1.A = y
  18130. --> D0 = body
  18131. Makes a grob of size x,y
  18132. Prolog is in D0-20
  18133. . 38G: 81156 \\$j%s\\ [ML]
  18134. " "" "2674B" :ML) "MINI_DISP_AWP" ("Display A.WP in minifont
  18135. D0->GROB, ST11=normal/inverted
  18136. ST10=show/hide starting zeros
  18137. Uses A.A B.W C.W CRY RSTK2
  18138. " "" "2692E" :ML) "MINI_DISP_VAL" ("Display C.A digits of B.W
  18139. in minifont, D0->GROB
  18140. ST/Uses see <REF>MINI_DISP_AWP
  18141. " "" "2693C" :ML) "SCREEN.MARGIN2" ("Zeroes R0.A then does
  18142. <REF>SCREEN.MARGIN
  18143. Uses R0.W
  18144. " "" "2696D" :ML) "STYLE.MINIFONT" ("Changes minifont character data
  18145. in A.6, uses P
  18146. ST1=1 -> italic
  18147. ST2=2 -> underline
  18148. ST3=3 -> invert
  18149. " "" "269AC" :ML) "w->W" ("Calculates GROB width
  18150. A.A=width in pixels
  18151. -> A.A=width in nibbles
  18152. " "Basically the same as 8 / CEIL 2 *
  18153. since the width must be an even
  18154. number of nibbles
  18155. " "26760" :ML) "Arrows" ("Draws arrows to signal that
  18156. further scrolling is possible
  18157. D0->GROB ST4-7=arrows:
  18158. 4=up 5=down 6=left 7=right
  18159. ST9=normal/minifont
  18160. Uses D1 A.A B.A C.A D.A ST0-7
  18161. P RSTK2
  18162. " "ST9 actually selects big or small
  18163. arrow
  18164. " "26B7A" :ML) "aCircleB" ("Draws black circle on GROB at D0
  18165. A.A = cx, B.A = cy, C.A = r
  18166. Uses: RSTK2 D0 D1 R3.A R4.A
  18167. A.S C.S
  18168. " "" "26AB6" :ML) "aCircleG1" ("Draws light gray circle.
  18169. <REF>aCircleB
  18170. " "" "26AC4" :ML) "aCircleG2" ("Draws dark gray circle.
  18171. <REF>aCircleB
  18172. " "" "26ACB" :ML) "aCircleW" ("Draws white circle.
  18173. <REF>aCircleB
  18174. " "" "26ABD" :ML) "aCircleXor" ("Inverts circle.
  18175. <REF>aCircleB
  18176. " "" "26AD2" :ML) "aDistance" ("C.A=sqrt(A.A^2+B.A^2)
  18177. Uses A.6 B.6 C.6 D.6 CRY SB P
  18178. " "" "26B0A" :ML) "aFBoxB" ("Draws a black filled box
  18179. D0->GROB
  18180. A.A=x1 B.A=y1 C.A=x2 D.A=y2
  18181. Uses RSTK2 A.W B.W C.W D.A D.S
  18182. D0 D1 R3.A R4.A
  18183. " "" "26B34" :ML) "aFBoxG1" ("Draws a light gray filled box
  18184. <REF>aFBoxB
  18185. " "" "26B42" :ML) "aFBoxG2" ("Draws a dark gray filled box
  18186. <REF>aFBoxB
  18187. " "" "26B49" :ML) "aFBoxW" ("Draws a white filled box
  18188. <REF>aFBoxB
  18189. " "" "26B3B" :ML) "aFBoxXor" ("Inverts a filled box <REF>aFBoxB
  18190. " "" "26B50" :ML) "aGrey?" ("Returns info about GROB at D0
  18191. ST0: 0=B&W 1=Gray
  18192. R4.A= Plane len R3.A= Line len
  18193. " "" "26AF5" :ML) "aGNeg" ("Inverts GROB at D0
  18194. Uses RSTK2 A.W B.A C.A D0 R3.A
  18195. R4.A
  18196. " "" "26AFC" :ML) "aLBoxB" ("Draws a black rectangle
  18197. D0->GROB
  18198. A.A=x1 B.A=x2 C.A=y1 D.A=y2
  18199. Uses same as <REF>aFBoxB
  18200. " "" "26B57" :ML) "aLBoxG1" ("Draws light gray rectangle
  18201. <REF>aLBoxB
  18202. " "" "26B65" :ML) "aLBoxG2" ("Draws dark gray rectangle
  18203. <REF>aLBoxB
  18204. " "" "26B6C" :ML) "aLBoxW" ("Draws white rectangle
  18205. <REF>aLBoxB
  18206. " "" "26B5E" :ML) "aLBoxXor" ("Inverts a rectangle
  18207. <REF>aLBoxB
  18208. " "" "26B73" :ML) "aLineB" ("Draws black line on GROB at D0
  18209. A.A=x1, B.A=x2, C.A=y1, D.A=y2
  18210. Uses: RSTK2 D0 D1 R3.A R4.A A.A
  18211. A.S B.A B.S C D.A
  18212. " "" "26A93" :ML) "aLineG1" ("Draws light gray line. <REF>aLineB
  18213. " "" "26AA1" :ML) "aLineG2" ("Draws dark gray line. <REF>aLineB
  18214. " "" "26AA8" :ML) "aLineW" ("Draws white line. <REF>aLineB
  18215. " "" "26A9A" :ML) "aLineXor" ("Inverts a line. <REF>aLineB
  18216. " "" "26AAF" :ML) "aPixonB" ("Draws black pixel on GROB at D0
  18217. A.A = x, B.A = y
  18218. Uses RSTK2 C.W D0 D1 R3.A R4.A
  18219. " "" "26B18" :ML) "aPixonG1" ("Draws light gray pixel. <REF>aPixonB
  18220. " "" "26B1F" :ML) "aPixonG2" ("Draws dark gray pixel. <REF>aPixonB
  18221. " "" "26B26" :ML) "aPixonW" ("Draws white pixel. <REF>aPixonB
  18222. " "" "26B11" :ML) "aPixonXor" ("Inverts pixel. <REF>aPixonB
  18223. " "" "26B2D" :ML) "aScroolVGrob" ("Scroll GROB at D0
  18224. R0.A=h R1.A=Ys R2.A=Yd R3.A=X
  18225. R4.A=w
  18226. Uses A.A B.A B.S C.W D.A D.S
  18227. RSTK2 R3.A R4.A D0 D1
  18228. " "" "26B03" :ML) "aSubReplGor" ("
  18229. " "" "26AE0" :ML) "aSubReplGxor" ("
  18230. " "" "26AE7" :ML) "aSubReplRepl" ("
  18231. " "" "26AD9" :ML) "DropLoop" ("Pop stack, Loop
  18232. " "" "03249" :ML) "4DropLoop" ("Pop 4, Loop
  18233. " "" "34202" :ML) "GPOverWrALp" ("<REF>GETPTR , OverWr A, Loop
  18234. " "" "03672" :ML) "GPOverWrR0Lp" ("<REF>GETPTR , OverWr R0, Loop
  18235. " "" "0366F" :ML) "GPPushA" ("<REF>GETPTR , Push A, Clear Carry
  18236. " "" "266E2" :ML) "GPPushALp" ("<REF>GETPTR , Push A, Loop
  18237. " "" "268EF" :ML) "GPPushR0Lp" ("<REF>GETPTR , Push R0, Loop
  18238. " "" "268E8" :ML) "PopASavptr" ("Pop to A.A, <REF>SAVPTR
  18239. " "" "26705" :ML) "PopSavptr" ("Pop <REF>SAVPTR
  18240. " "" "2670C" :ML) "PUSHA" ("Push A, Loop
  18241. " "" "03A86" :ML) "GETPTRFALSE" ("<REF>GETPTR , Do FALSE
  18242. " "" "266CD" :ML) "GETPTRTRUE" ("<REF>GETPTR , Do TRUE
  18243. " "" "266D4" :ML) "GPOverWrFLp" ("<REF>GETPTR , OverWr FALSE, Loop
  18244. " "" "35213" :ML) "GPOverWrTLp" ("<REF>GETPTR , OverWr TRUE, Loop
  18245. " "" "351F3" :ML) "GPOverWrT/FL" ("<REF>GETPTR , OverWr
  18246. TRUE/FALSE, Loop
  18247. " "" "351F0" :ML) "GPPushFLoop" ("<REF>GETPTR , Push FALSE, Loop
  18248. " "" "3524F" :ML) "GPPushTLoop" ("<REF>GETPTR , Push TRUE, Loop
  18249. " "" "35236" :ML) "GPPushT/FLp" ("<REF>GETPTR , Push TRUE/FALSE,
  18250. Loop
  18251. " "" "35233" :ML) "OverWrFLoop" ("OverWr FALSE, Loop
  18252. " "" "3521D" :ML) "OverWrTLoop" ("OverWr TRUE, Loop
  18253. " "" "351FD" :ML) "OverWrT/FLp" ("OverWr TRUE/FALSE, Loop
  18254. " "" "3521A" :ML) "popflag" ("Pop to A.A,
  18255. if TRUE then set carry
  18256. " "" "34A68" :ML) "DOFALSE" ("Push FALSE, Loop
  18257. " "" "35259" :ML) "PushFLoop" ("Push FALSE, Loop
  18258. " "" "35259" :ML) "PushF/TLoop" ("Push FALSE (CRY)/TRUE, Loop
  18259. " "" "3523D" :ML) "DOTRUE" ("Push TRUE, Loop
  18260. " "" "35240" :ML) "PushTLoop" ("Push TRUE, Loop
  18261. " "" "35240" :ML) "PushT/F" ("Push TRUE (CRY)/FALSE, Loop
  18262. " "" "35256" :ML) "PushT/FLoop" ("Push TRUE (CRY)/FALSE, Loop
  18263. " "" "35256" :ML) "POP#" ("Pop # to A.A
  18264. " "" "06641" :ML) "POP2#" ("( #1 #2 --> )
  18265. Pop #1 to A.A and #2 to C.A
  18266. " "" "03F5D" :ML) "PUSH#" ("<REF>GETPTR , Push R0 as #
  18267. " "" "06537" :ML) "#PUSHA-" ("<REF>SAVPTR , R0=A,
  18268. <REF>PUSH# , Loop
  18269. " "" "03DC7" :ML) "PUSH2#" ("<REF>GETPTR , Push R0 & R1 as #
  18270. " "" "06529" :ML) "PUSH#LOOP" ("<REF>GETPTR , Push R0 as #, Loop
  18271. " "" "0357F" :ML) "PUSH#ALOOP" ("<REF>GETPTR , Push A as #, Loop
  18272. " "" "0357C" :ML) "Push2#Loop" ("<REF>GETPTR , Push R0 & R1
  18273. as #, Loop
  18274. " "" "03F14" :ML) "Push2#aLoop" ("<REF>GETPTR , Push R0 & A as #, Loop
  18275. " "" "35812" :ML) "Push#TLoop" ("<REF>GETPTR , Push R0 as #, Do TRUE
  18276. " "" "036F7" :ML) "Push#FLoop" ("<REF>GETPTR , Push R0 as #, Do FALSE
  18277. " "" "283A3" :ML) "PUSHhxs" ("Push A.WP as hxs
  18278. " "" "266FE" :ML) "PUSHhxsLoop" ("Push A.WP as hxs, Loop
  18279. " "" "0596D" :ML) "PUSHzint" ("Push A.WP as ZINT
  18280. " "" "26951" :ML) "PUSHzintLoop" ("Push A.WP as ZINT, Loop
  18281. " "" "26958" :ML) "POP1%SPLITA" ("( %pop -> x ) Pop %,
  18282. convert to %%, <REF>SAVPTR
  18283. " "" "2F62C" :ML) "POP1%" (" ( %pop -> A ) Pop %, <REF>SAVPTR
  18284. . 38G: 811BF \\$j%s\\ [ML]
  18285. " "" "2F636" :ML) "POP2%" ("( %pop1 %pop2 -> A,C )
  18286. Pop 2 reals, <REF>SAVPTR
  18287. " "" "2F65E" :ML) "PUSH%" ("( A -> %push )
  18288. Push A as %, <REF>GETPTR
  18289. " "" "2F7E4" :ML) "PUSH%LOOP" ("( A -> %push ) Push A as %,
  18290. <REF>GETPTRLOOP
  18291. " "" "2F899" :ML) "POPC%" ("( C%pop -> A:C ) Pop C%
  18292. (<REF>SETDEC )
  18293. " "" "26A62" :ML) "POPC%%" ("( C%%pop -> A:B C:D)
  18294. Pop C%% (<REF>SETDEC )
  18295. " "" "26A70" :ML) "PUSHC%" ("( A:C -> C%push ) Push C%
  18296. " "" "26A69" :ML) "PUSHC%%" ("( A:B:C:D -> C%%push )
  18297. Push C%%
  18298. " "" "26A77" :ML) "ATTNchk" ("ATTN exit check with restoreiram
  18299. " "" "2A4AA" :ML) "KeyInBuff?" ("Carry if true
  18300. " "" "04999" :ML) "OnKeyDown?" ("Carry if true
  18301. " "" "267C2" :ML) "OnKeyStable?" ("Carry if true
  18302. " "" "267C9" :ML) "Flush" ("Flushes key buffer.
  18303. " "" "267A6" :ML) "FlushAttn" ("Flushes attn counter.
  18304. " "" "267AD" :ML) "POPKEY" ("( -> C.A ) Sets carry if buffer
  18305. is empty.Else returns key in
  18306. C.B (and in @KEYSTORE)
  18307. Uses: A.S C.S C.A D1 (sets P=0)
  18308. " "" "04840" :ML) "SrvcKbdAB" ("( A.W -> ) Sets KEYSTATE and
  18309. KEYBUFFER
  18310. " "" "267DE" :ML) "ThisKeyDn?" ("CS if key in A.B is down
  18311. Uses: A.A C.A D1 P OR
  18312. " "" "26D1E" :ML :UBS) "ThisKeyDnCb?" ("A=C.B <REF>ThisKeyDn?
  18313. " "" "26D17" :ML :UBS) "ASRW5" ("ASR.W 5 times
  18314. " "" "26E60" :ML) "ASLW5" ("ASL.W 5 times
  18315. " "" "26E71" :ML) "CCSB1" ("Uses D.S to set SB, clears carry
  18316. " "" "313C8" :ML) "CHANGE_FLAG" ("Change ST flag # A.B (1-4)
  18317. If A.B > 10, A.B-11 is stored
  18318. into R0.B. Clears carry if ok
  18319. See <REF>CHANGE_FLAG2
  18320. " "" "26832" :ML) "clkspd" ("Measure CPU clock speed
  18321. Interrupts off on entry and exit
  18322. -> A.A=spd/16 B.A=loops/16s
  18323. Uses C.A D0 P CRY
  18324. " "" "267EC" :ML) "CSRW5" ("CSR.W 5 times
  18325. " "" "26E82" :ML) "CSLW5" ("CSL.W 5 times
  18326. " "" "26E93" :ML) "DeepSleep" ("Puts calc into \"deep sleep\"
  18327. Low power mode, display off
  18328. Wakeup on ON key or interrupt
  18329. " "" "04292" :ML) "GetStrLenStk" ("Pop $ -> C.A = length, D1 = body
  18330. " "" "266F7" :ML) "GetStrLenC" ("D1 = C, <REF>GetStrLen
  18331. " "" "266F0" :ML) "GetStrLen" ("D1=$ -> C.A = length,
  18332. D1 = body
  18333. " "" "266E9" :ML) "GetStrLenL" ("D1=$ -> C.A = length in chars
  18334. " "" "268D3" :ML) "makebeep" ("C = msec, D = Hz
  18335. Checks BEEP flag.
  18336. " "" "267F3" :ML) "liteslp" ("Puts calc into \"lite sleep\"
  18337. Low power mode with display on
  18338. Wakeup on any key or interrupt
  18339. " "" "04929" :ML) "DBUG" ("Displays the contents of all
  18340. registers. Uses one RSTK level
  18341. and #8190C to save them.
  18342. <REF>DBUG.TOUCHE
  18343. " "" "2685C" :ML) "DBUG.TOUCHE" ("<REF>DBUG then freezes display
  18344. until keypress
  18345. " "" "26863" :ML) "DOARRY" ("Array prologue
  18346. 5 size
  18347. 5 prologue of objects
  18348. 5 # of dimensions
  18349. 5n dimensions
  18350. .. objects (content only)
  18351. " "" "029E8") "DOBAK" ("Backup prologue
  18352. 5 size
  18353. 2 # of chars in name
  18354. .. name
  18355. .. object
  18356. 5 DOBINT
  18357. 5 CRC
  18358. " "Apparently unused on the 49
  18359. " "02B62") "DOBINT" ("BINT prologue
  18360. 5 number (hex)
  18361. " "" "02911") "DOCHAR" ("Character prologue
  18362. 2 character
  18363. " "" "029BF") "DOCMP" ("Complex number prologue
  18364. 3 real exponent
  18365. 12 real mantissa
  18366. 1 real sign
  18367. 3 complex exponent
  18368. 12 complex mantissa
  18369. 1 complex sign
  18370. " "" "02977") "DOCODE" ("Code prologue
  18371. 5 length
  18372. .. machine code
  18373. " "" "02DCC") "DOCOL" ("Secondary prologue
  18374. .. objects
  18375. 5 SEMI
  18376. " "" "02D9D") "DOCSTR" ("String prologue
  18377. 5 length
  18378. .. characters
  18379. " "" "02A2C") "DOECMP" ("Long complex prologue
  18380. 5 real exponent
  18381. 15 real mantissa
  18382. 1 real sign
  18383. 5 complex exponent
  18384. 15 complex mantissa
  18385. 1 complex sign
  18386. " "" "0299D") "DOEREL" ("Long real prologue
  18387. 5 exponent
  18388. 15 mantissa
  18389. 1 sign
  18390. " "" "02955") "DOEXT" ("Unit object prologue
  18391. .. object (usually a real)
  18392. .. unit
  18393. 5 SEMI
  18394. " "" "02ADA") "DOFLASHP" ("Flash pointer prologue
  18395. 3 flash bank #
  18396. 4 command #
  18397. " "" "026AC") "DOHXS" ("HXS prologue
  18398. 5 length
  18399. .. hex digits, reverse order
  18400. " "" "02A4E") "DOHSTR" ("HXS prologue
  18401. 5 length
  18402. .. hex digits, reverse order
  18403. " "" "02A4E") "DOIDNT" ("Global name (ID) prologue
  18404. 2 # of characters
  18405. .. characters
  18406. " "" "02E48") "DOINT" ("ZINT prologue
  18407. 5 length
  18408. .. BCD digits, reverse order
  18409. 1 sign
  18410. " "" "02614") "DOLAM" ("Local name (LAM) prologue
  18411. see <REF>DOIDNT
  18412. " "" "02E6D") "DOLNKARRY" ("Linked array prologue
  18413. " "Not used by the system.
  18414. " "02A0A") "DOLIB" ("Library prologue
  18415. " " 5 size
  18416. 2 # of characters
  18417. .. name
  18418. 2 # of characters (unless 0)
  18419. 3 library ID
  18420. 5 hash table offset
  18421. 5 message table offset
  18422. 5 link table offset
  18423. 5 config object offset
  18424. .. contents
  18425. 4 CRC
  18426. XLIBs:
  18427. 1 or 3: kind
  18428. 3 library ID
  18429. 3 command ID
  18430. .. object
  18431. --
  18432. <REF>TEXT:Libraries
  18433. " "02B40") "DOLIST" ("List prologue
  18434. see <REF>DOCOL
  18435. " "" "02A74") "DOMATRIX" ("Matrix prologue
  18436. .. objects
  18437. 5 SEMI
  18438. Nested DOMATRIX objects build a
  18439. multi-dimensional matrix
  18440. " "" "02686") "DOREAL" ("Real number prologue
  18441. 3 exponent
  18442. 12 mantissa
  18443. 1 sign
  18444. " "" "02933") "DOROMP" ("XLIB prologue
  18445. 3 library ID
  18446. 3 command #
  18447. " "" "02E92") "DORRP" ("Directory prologue
  18448. " " Home directory:
  18449. 3 # of attached libs
  18450. n*[
  18451. 3 library ID
  18452. 5 address of hash table
  18453. 5 address of message table
  18454. ]
  18455. 5 offset of last object
  18456. *[
  18457. 5 offset to previous object
  18458. 00000 for the first one
  18459. 2 # of characters
  18460. .. name of object
  18461. 2 # of characters
  18462. .. object
  18463. ]
  18464. Subdirectories:
  18465. 3 # of attached library
  18466. 7FF if none
  18467. 5 offset of last object
  18468. .. same as above
  18469. " "02A96") "DOSYMB" ("Symbolic prologue
  18470. .. objects
  18471. 5 SEMI
  18472. " "" "02AB8") "DOTAG" ("Tagged object prologue
  18473. 2 # of chars in tag
  18474. .. tag
  18475. .. object
  18476. " "" "02AFC") "DOAPLET" ("
  18477. " "" "026D5") "DOEXT0" ("
  18478. " "" "02B88") "DOACPTR" ("
  18479. " "" "02BAA") "DOEXT1" ("
  18480. " "" "02BAA") "DOEXT2" ("
  18481. " "" "02BCC") "DOEXT3" ("
  18482. " "" "02BEE") "DOEXT4" ("
  18483. " "" "02C10") "DOLNGCMP" ("
  18484. " "" "02660") "DOLNGREAL" ("
  18485. " "" "0263A") "AVMEM" ("Free mem / 5 (5)
  18486. " "" "80E9B" :RAM) "DSKTOP" ("->Data stack
  18487. " "" "806F8" :RAM) "RSKTOP" ("->Return stack
  18488. " "" "806F3" :RAM) "OBUPSTART" ("->RPL runstream
  18489. " "" "8076B" :RAM) "INTRPPTR" ("->RPL runstream
  18490. " "" "8076B" :RAM) "TEMPOB" ("->Beginning of TempOb area
  18491. " "" "806E9" :RAM) "TEMPTOP" ("->End of TempOb area
  18492. " "" "806EE" :RAM) "USEROB" ("->UserOb Area (HOME)
  18493. " "" "80711" :RAM) "ADISP" ("->Stack grob
  18494. " "" "806D5" :RAM) "GDISP" ("->Blackboard grob
  18495. " "" "806E4" :RAM) "GROBSCR1" ("<REF>SCREEN1 with GROB header
  18496. " "" "8229E" :RAM) "GROBSCR2" ("<REF>SCREEN2 with GROB header
  18497. " "" "82B32" :RAM) "GROBSCR3" ("<REF>SCREEN3 with GROB header
  18498. " "" "833C6" :RAM) "GROBSCR4" ("<REF>SCREEN4 with GROB header
  18499. " "" "83C5A" :RAM) "GROBSCR5" ("<REF>SCREEN5 with GROB header
  18500. " "" "844EE" :RAM) "GreyOn?" ("Zero if greyscale on (1)
  18501. " "If this is set to zero the
  18502. interrupt system will display in
  18503. greyscale, by showing each of
  18504. GreyScrN/GreySoftN for one screen
  18505. refresh. Note that the entries
  18506. for PrintLCD use the same memory
  18507. area!
  18508. " "8069C" :RAM) "GreyScr1" ("->1st greyscale screen
  18509. " "" "8069D" :RAM) "GreyScr2" ("->2nd greyscale screen
  18510. " "" "806A7" :RAM) "GreyScr3" ("->3rd greyscale screen
  18511. " "" "806B1" :RAM) "GreySoft1" ("->1st greyscale menu
  18512. " "" "806A2" :RAM) "GreySoft2" ("->2nd greyscale menu
  18513. " "" "806AC" :RAM) "GreySoft4" ("->3rd greyscale menu
  18514. " "" "806B6" :RAM) "ECRAN" ("Space for one screen (2176)
  18515. " "" "822B2" :RAM) "SCREEN1" ("Space for one screen (2176)
  18516. " "" "822B2" :RAM) "SCREEN2" ("<REF>SCREEN1
  18517. " "" "82B46" :RAM) "SCREEN3" ("<REF>SCREEN1
  18518. " "" "833DA" :RAM) "SCREEN4" ("<REF>SCREEN1
  18519. " "" "83C6E" :RAM) "SCREEN5" ("Extra screen used by <REF>DBUG (2176)
  18520. " "" "84502" :RAM) "SYSUPSTART" ("->Display grob
  18521. " "" "806DA" :RAM) "VDISP1" ("->Display grob
  18522. " "" "806DA" :RAM) "VDISP" ("->Display grob
  18523. " "" "806DA" :RAM) "VDISP2" ("->Menu grob
  18524. " "" "806D0" :RAM) "VDISP3" ("->Not displayed grob <REF>VDISP
  18525. " "" "806DF" :RAM) "ANNUNCIATORS" ("Annunciator flags (2)
  18526. " "" "80F00" :RAM) "INTRAM" ("Save area for the interrupt sys
  18527. (16)
  18528. " "" "805DB" :RAM) "R1[A]save" ("Used by PrintLCD inside the
  18529. interrupt system (5)
  18530. " "" "806C0" :RAM) "R2[A]save" ("<REF>R1[A]save (5)
  18531. " "" "806BA" :RAM) "R2[S]save" ("<REF>R1[A]save (1)
  18532. " "" "806BF" :RAM) "SavTEMPENV" ("Backup of <REF>TEMPENV
  18533. " "" "81269" :RAM) "SAUV_80702" ("Backup of <REF>TEMPENV
  18534. " "" "81269" :RAM) "SavFIRSTCHAR" ("Backup of <REF>FIRSTCHAR
  18535. " "" "8126E" :RAM) "SAUV_80865" ("Backup of <REF>FIRSTCHAR
  18536. " "" "8126E" :RAM) "SavChars" ("Used by CHARS (31)
  18537. " "" "818CF" :RAM) "SAUV_CHARS" ("Used by CHARS (31)
  18538. " "" "818CF" :RAM) "SavMisc" ("Free area (128)
  18539. " "" "8221D" :RAM) "SAUV_DIVERS" ("Free area (128)
  18540. " "" "8221D" :RAM) "SavMatrix" ("Used by MTRW (40)
  18541. " "" "81278" :RAM) "SAUV_MATRIX" ("Used by MTRW (40)
  18542. " "" "81278" :RAM) "SavRegA" ("Used by <REF>DBUG (5)
  18543. " "" "818F3" :RAM) "SAUV_REGA" ("Used by <REF>DBUG (5)
  18544. " "" "818F3" :RAM) "SavRegB" ("Used by <REF>DBUG (5)
  18545. " "" "818F8" :RAM) "SAUV_REGB" ("Used by <REF>DBUG (5)
  18546. " "" "818F8" :RAM) "SavRegC" ("Used by <REF>DBUG (5)
  18547. " "" "818FD" :RAM) "SAUV_REGC" ("Used by <REF>DBUG (5)
  18548. " "" "818FD" :RAM) "SavRegD" ("Used by <REF>DBUG (5)
  18549. " "" "81902" :RAM) "SAUV_REGD" ("Used by <REF>DBUG (5)
  18550. " "" "81902" :RAM) "SavRegD1" ("Used by <REF>DBUG (5)
  18551. " "" "81907" :RAM) "SAUV_REGD1" ("Used by <REF>DBUG (5)
  18552. " "" "81907" :RAM) "SavRegisters" ("Used by <REF>DBUG (101)
  18553. " "" "8190C" :RAM) "SAUV_REGISTR" ("Used by <REF>DBUG (101)
  18554. " "" "8190C" :RAM) "SAVECLK" ("Save of CLKON state (1)
  18555. " "" "80EF0" :RAM) "SAVECROSS" ("cursor moves in plotting (10)
  18556. " "" "80FB7" :RAM) "SAVE_A" ("<REF>INTRAM (16)
  18557. " "" "805F5" :RAM) "SAVE_B" ("<REF>INTRAM (16)
  18558. " "" "80608" :RAM) "SAVE_C[A]" ("<REF>INTRAM (5)
  18559. " "" "805F0" :RAM) "SAVE_BO" ("Save BitOffset (1)
  18560. " "" "806C5" :RAM) "SAVE_D" ("<REF>INTRAM (16)
  18561. " "" "80618" :RAM) "SAVE_D0" ("<REF>INTRAM (5)
  18562. " "" "8063D" :RAM) "SAVE_LC" ("Save LineCount (2)
  18563. " "" "806C6" :RAM) "SAVE_LN" ("Save LineNibs (3)
  18564. " "" "806C8" :RAM) "SAVE_MODES" ("<REF>INTRAM (5)
  18565. " "" "805EB" :RAM) "SAVE_OFFSET" ("Save Window Offset (5)
  18566. " "" "806CB" :RAM) "SAVE_PC" ("<REF>INTRAM (5)
  18567. " "" "80638" :RAM) "SAVE_R0" ("<REF>INTRAM (16)
  18568. " "" "80628" :RAM) "SAVE_ST" ("<REF>INTRAM (3)
  18569. " "" "80605" :RAM) "Stk0save" ("RSTK0 used by PrintLCD inside
  18570. the interrupt sys (5)
  18571. " "" "8069C" :RAM) "Stk1save" ("RSTK1 <REF>Stk0save (5)
  18572. " "" "806A1" :RAM) "Stk2save" ("RSTK2 <REF>Stk0save (5)
  18573. " "" "806A6" :RAM) "Stk3save" ("RSTK3 <REF>Stk0save (5)
  18574. " "" "806AB" :RAM) "Stk4save" ("RSTK4 <REF>Stk0save (5)
  18575. " "" "806B0" :RAM) "Stk5save" ("RSTK5 <REF>Stk0save (5)
  18576. " "" "806B5" :RAM) "FLAG_SYSTEM2" ("Metakernel system flags (16)
  18577. " "For compatibility only.
  18578. " "80F12" :RAM) "FLAG_USER2" ("Metakernel system flags (16)
  18579. " "Dito.
  18580. " "80F32" :RAM) "SystemFlags" ("128 System flags (16)
  18581. " "" "80F02" :RAM) "UserFlags" ("128 User Flags (16)
  18582. " "" "80F22" :RAM) "SysNib1" ("ISysFlags 1
  18583. " "" "80EC0" :RAM) "NoRolDA2MASK" ("DA2 can't be rolled up to become
  18584. valid <REF>SysNib1
  18585. " "" "001C0" :RAM) "AbbrStkMASK" ("Display obj types only
  18586. <REF>SysNib1
  18587. " "" "002C0" :RAM) "DA2bIsEdMASK" ("DA2b shows the edit line
  18588. <REF>SysNib1
  18589. " "" "004C0" :RAM) "IgnorAlmMASK" ("Ignore <REF>ALARMSDUE in <REF>GETKEY
  18590. <REF>SysNib1
  18591. " "" "008C0" :RAM) "SysNib2" ("ISysFlags 2
  18592. " "" "80EC1" :RAM) "ReqClkOnMASK" ("Flag for System Request of CLKON
  18593. state <REF>SysNib2
  18594. " "" "001C1" :RAM) "ServModeMASK" ("Server mode on <REF>SysNib2
  18595. " "" "002C1" :RAM) "TrackMASK" ("New context needs to be compared
  18596. with old <REF>SysNib2
  18597. " "" "004C1" :RAM) "BadMenuMASK" ("Menu system corrupt <REF>SysNib2
  18598. " "" "008C1" :RAM) "SysNib3" ("ISysFlags 3
  18599. " "" "80EC2" :RAM) "UNDOMASK" ("Automatic stack save <REF>SysNib3
  18600. " "" "001C2" :RAM) "INSERTMASK" ("Insert/replace mode <REF>SysNib3
  18601. " "" "002C2" :RAM) "ALGMASK" ("Algebraic entry mode <REF>SysNib3
  18602. " "" "004C2" :RAM) "PRINTINGMASK" ("<REF>SysNib3
  18603. " "" "008C2" :RAM) "SysNib4" ("ISysFlags 4
  18604. " "" "80EC3" :RAM) "DA2aTempMASK" ("DA2a temporarily valid <REF>SysNib4
  18605. " "" "001C3" :RAM) "DA2bTempMASK" ("DA2b temporarily valid <REF>SysNib4
  18606. " "" "002C3" :RAM) "DA3TempMASK" ("DA3 temporarily valid <REF>SysNib4
  18607. " "" "004C3" :RAM) "RebuildMASK" ("Menu requires TOUCHTAB rebuild
  18608. each time it is redisplayed
  18609. <REF>SysNib4
  18610. " "" "008C3" :RAM) "SysNib5" ("ISysFlags 5
  18611. " "" "80EC4" :RAM) "COMMANDMASK" ("CMD history enabled <REF>SysNib5
  18612. " "" "001C4" :RAM) "BLINKMASK" ("Active Timer1 Int's <REF>SysNib5
  18613. " "" "002C4" :RAM) "LOWERMASK" ("Lowercase keys <REF>SysNib5
  18614. " "" "004C4" :RAM) "STKDCMASK" ("Decompilation for stack display
  18615. (not editing) <REF>SysNib5
  18616. " "" "008C4" :RAM) "SysNib6" ("ISysFlags 6
  18617. " "" "80EC5" :RAM) "Do1UserMASK" ("One-key user mode <REF>SysNib6
  18618. " "" "001C5" :RAM) "ASuspOKMASK" ("Suspending current environment
  18619. is allowed <REF>SysNib6
  18620. " "" "002C5" :RAM) "BadPOLUIMASK" ("POL UI possibly corrupt <REF>SysNib6
  18621. " "" "004C5" :RAM) "DA1TempMASK" ("DA1 temporarily valid <REF>SysNib6
  18622. " "" "008C5" :RAM) "SysNib7" ("ISysFlags 7
  18623. " "" "80EC6" :RAM) "DA1ValidMASK" ("DA1 known to be valid <REF>SysNib7
  18624. " "" "001C6" :RAM) "DA2aValdMASK" ("DA2a known to be valid <REF>SysNib7
  18625. " "" "002C6" :RAM) "DA2bValdMASK" ("DA2b known to be valid <REF>SysNib7
  18626. " "" "004C6" :RAM) "DA3ValidMASK" ("DA3 known to be valid <REF>SysNib7
  18627. " "" "008C6" :RAM) "SysNib8" ("ISysFlags 8
  18628. " "" "80EC7" :RAM) "DA1NoChMASK" ("DA1 not changed <REF>SysNib8
  18629. " "" "001C7" :RAM) "DA2aNoChMASK" ("DA2a not changed <REF>SysNib8
  18630. " "" "002C7" :RAM) "DA2bNoChMASK" ("DA2b not changed <REF>SysNib8
  18631. " "" "004C7" :RAM) "DA3NoChMASK" ("DA3 not changed <REF>SysNib8
  18632. " "" "008C7" :RAM) "SysNib9" ("ISysFlags 9
  18633. " "" "80EC8" :RAM) "DA1BadMASK" ("DA1 invalid <REF>SysNib9
  18634. " "" "001C8" :RAM) "DA2aBadMASK" ("DA2a invalid <REF>SysNib9
  18635. " "" "002C8" :RAM) "DA2bBadMASK" ("DA2b invalid <REF>SysNib9
  18636. " "" "004C8" :RAM) "DA3BadMASK" ("DA3 invalid <REF>SysNib9
  18637. " "" "008C8" :RAM) "EDITLFLAG" ("ISysFlags 10
  18638. " "" "80EC9" :RAM) "EDITFLAG" ("ISysFlags 10
  18639. " "" "80EC9" :RAM) "SysNib10" ("ISysFlags 10
  18640. " "" "80EC9" :RAM) "EDITLMASK" ("Edit line exists <REF>SysNib10
  18641. " "" "001C9" :RAM) "NAppKeyMASK" ("Non-app keys allowed in POL <REF>SysNib10
  18642. " "" "002C9" :RAM) "NUsrKeyMASK" ("Non-user keys allowed in USR mode
  18643. <REF>SysNib10
  18644. " "" "004C9" :RAM) "AppModeMASK" ("POL application running <REF>SysNib10
  18645. " "" "008C9" :RAM) "ParenModFLAG" ("ISysFlags 11
  18646. " "" "80ECA" :RAM) "SysNib11" ("ISysFlags 11
  18647. " "" "80ECA" :RAM) "ParenModMASK" ("Implicit parenthesized \"/\", \"^\",
  18648. and \"SQRT\" in EQW <REF>SysNib11
  18649. " "" "001CA" :RAM) "1PDCMASK" ("Partial DeCompile info will not
  18650. be saved <REF>SysNib11
  18651. " "" "002CA" :RAM) "NewEditLMASK" ("New one-line edit line has been
  18652. created <REF>SysNib11
  18653. " "" "004CA" :RAM) "DoStdKeyMASK" ("Do only standard keys <REF>SysNib11
  18654. " "" "008CA" :RAM) "SysNib12" ("ISysFlags 12
  18655. " "" "80ECB" :RAM) "DispTimeMASK" ("Status bar clock may be displayed
  18656. <REF>SysNib12
  18657. " "" "001CB" :RAM) "NOP2MASK12" ("unused <REF>SysNib12
  18658. " "" "002CB" :RAM) "CaseSensitiv" ("unused <REF>SysNib12
  18659. " "" "004CB" :RAM) "SpeedMASK" ("Metakernel repeat speed <REF>SysNib12
  18660. " "" "008CB" :RAM) "SysNib13" ("ISysFlags 13
  18661. " "" "80ECC" :RAM) "InApletMASK" ("Aplet running <REF>SysNib13
  18662. " "" "001CC" :RAM) "SplitMASK" ("<REF>SysNib13
  18663. " "" "002CC" :RAM) "RightMASK" ("<REF>SysNib13
  18664. " "" "004CC" :RAM) "CurTknMASK" ("<REF>SysNib13
  18665. " "" "008CC" :RAM) "SysNib14" ("
  18666. " "" "80ECD" :RAM) "SizeMLDisp" ("
  18667. " "" "80ECD" :RAM) "SysNib15" ("ISysFlags 15
  18668. " "" "80ECE" :RAM) "NOP1MASK15" ("TOL UI potentially corrupt
  18669. <REF>SysNib15
  18670. " "" "001CE" :RAM) "BadTOLUIMASK" ("TOL UI potentially corrupt
  18671. <REF>SysNib15
  18672. " "" "001CE" :RAM) "NOP2MASK15" ("EVAL-> will not create a list nor
  18673. return NOVAL <REF>SysNib15
  18674. " "" "002CE" :RAM) "NoAlgProcess" ("EVAL-> will not create a list nor
  18675. return NOVAL <REF>SysNib15
  18676. " "" "002CE" :RAM) "NOP4MASK15" ("<REF>SysNib15
  18677. " "" "004CE" :RAM) "InSimplyExpr" ("<REF>SysNib15
  18678. " "" "004CE" :RAM) "NOP8MASK15" ("<REF>SysNib15
  18679. " "" "008CE" :RAM) "DoCreateMenu" ("<REF>SysNib15
  18680. " "" "008CE" :RAM) "SysNib16" ("ISysFlags 16 (unused)
  18681. " "" "80ECF" :RAM) "NOP1MASK16" ("<REF>SysNib16
  18682. " "" "001CF" :RAM) "NOP2MASK16" ("<REF>SysNib16
  18683. " "" "002CF" :RAM) "NOP4MASK16" ("<REF>SysNib16
  18684. " "" "004CF" :RAM) "NOP8MASK16" ("<REF>SysNib16
  18685. " "" "008CF" :RAM) "SysNib17" ("ISysFlags 17 (unused)
  18686. " "" "80ED0" :RAM) "NOP1MASK17" ("<REF>SysNib17
  18687. " "" "001D0" :RAM) "NOP2MASK17" ("<REF>SysNib17
  18688. " "" "002D0" :RAM) "NOP4MASK17" ("<REF>SysNib17
  18689. " "" "004D0" :RAM) "NOP8MASK17" ("<REF>SysNib17
  18690. " "" "008D0" :RAM) "SysNib18" ("ISysFlags 18 (unused)
  18691. " "" "80ED1" :RAM) "NOP1MASK18" ("<REF>SysNib18
  18692. " "" "001D1" :RAM) "NOP2MASK18" ("<REF>SysNib18
  18693. " "" "002D1" :RAM) "NOP4MASK18" ("<REF>SysNib18
  18694. " "" "004D1" :RAM) "NOP8MASK18" ("<REF>SysNib18
  18695. " "" "008D1" :RAM) "SysNib19" ("ISysFlags 19 (unused)
  18696. " "" "80ED2" :RAM) "NOP1MASK19" ("<REF>SysNib19
  18697. " "" "001D2" :RAM) "NOP2MASK19" ("<REF>SysNib19
  18698. " "" "002D2" :RAM) "NOP4MASK19" ("<REF>SysNib19
  18699. " "" "004D2" :RAM) "NOP8MASK19" ("<REF>SysNib19
  18700. " "" "008D2" :RAM) "SysNib20" ("ISysFlags 20 (unused)
  18701. " "" "80ED3" :RAM) "NOP1MASK20" ("<REF>SysNib20
  18702. " "" "001D3" :RAM) "NOP2MASK20" ("<REF>SysNib20
  18703. " "" "002D3" :RAM) "NOP4MASK20" ("<REF>SysNib20
  18704. " "" "004D3" :RAM) "NOP8MASK20" ("<REF>SysNib20
  18705. " "" "008D3" :RAM) "FAILSTK1" ("Warmstart log 1st (newest)
  18706. entry (18)
  18707. " "Each entry consists of a one-nibble
  18708. cause (as displayed by WSLOG), a
  18709. 13-nibble time stamp and a 4-nibble
  18710. CRC of the previous 14 nibbles.
  18711. " "80010" :RAM) "FAILSTK2" ("<REF>FAILSTK1 2nd entry (18)
  18712. " "" "80022" :RAM) "FAILSTK3" ("<REF>FAILSTK1 3rd entry (18)
  18713. " "" "80034" :RAM) "FAILSTK4" ("<REF>FAILSTK1 4th entry (18)
  18714. " "" "80046" :RAM) "BEG" ("Absolute BEGIN in CommandLine (5)
  18715. " "" "810B6" :RAM) "BEGIN_REL" ("Relative BEGIN in CommandLine (5)
  18716. " "" "810A2" :RAM) "BEGX" ("X position of BEGIN (5)
  18717. " "" "810AC" :RAM) "CheckCLE" ("Checksum of cmd line (5)
  18718. " "" "81273" :RAM) "CHECK_TEXTE" ("Checksum of cmd line (5)
  18719. " "" "81273" :RAM) "CHECK_VAL" ("Backup of the size of the cmd
  18720. line (5)
  18721. " "" "8125F" :RAM) "CHECK_VAL2" ("Checksum of the key cmd line
  18722. definition (5)
  18723. " "" "81264" :RAM) "CR_COUNT" ("# of newlines in editline (5)
  18724. " "" "80F49" :RAM) "CURSOREPOSN" ("Cursor editline position (5)
  18725. " "" "80F61" :RAM) "CURSOR" ("Cursor editline position (5)
  18726. " "" "80F61" :RAM) "CURSORCHR" ("Char under Cursor (2)
  18727. " "" "80F6E" :RAM) "CURSORGROB" ("Cursor Grob Data (40)
  18728. " "" "80F70" :RAM) "CURSORPOSN" ("Cursor position from left of
  18729. screen (2)
  18730. " "" "80F6B" :RAM) "CURSOROFFSET" ("Cursor position from left of
  18731. screen (2)
  18732. " "" "80F6B" :RAM) "CURSORROW" ("Cursor display row (5)
  18733. " "" "80F66" :RAM) "CURSORPART" ("Cursor display row (5)
  18734. " "" "80F66" :RAM) "CURSORSTATE" ("Show cursor/char underneath (1)
  18735. " "" "80F6D" :RAM) "CURSORX" ("Pxl X-Coord of Cursor (5)
  18736. " "" "80F98" :RAM) "CURSORY" ("Pxl Y-Coord of Cursor (5)
  18737. " "" "80F9D" :RAM) "EDITLINE" ("->Command line
  18738. " "" "806FD" :RAM) "END" ("Absolute END in CmdLine
  18739. " "" "810BB" :RAM) "ENDX" ("Y Position of END
  18740. " "" "810B1" :RAM) "END_REL" ("Relative END in CmdLine
  18741. " "" "810A7" :RAM) "T_ECRAN" ("Size of CmdLine screen
  18742. " "" "810C0" :RAM) "SizeCLScreen" ("Size of CmdLine screen
  18743. " "" "810C0" :RAM) "AppCount" ("# of nested POLs (2)
  18744. " "" "80ED4" :RAM) "AppCursor" ("->App cursor sub-programs
  18745. " "" "807DE" :RAM) "AppDisplay" ("->App display object
  18746. " "" "807C0" :RAM) "AppDoKeyOb" ("->App DoKeyOb procedure for POL
  18747. " "" "807E3" :RAM) "AppError" ("->App error handler
  18748. " "" "807CF" :RAM) "AppExitCond" ("->App exit condition
  18749. " "" "807CA" :RAM) "AppKeys" ("->App key assignments
  18750. " "" "807C5" :RAM) "AppResume" ("->App resume procedure of POL
  18751. " "" "807D9" :RAM) "AppSuspend" ("->App suspend procedure of POL
  18752. " "" "807D4" :RAM) "TopicVar1" ("->generic topic var 1
  18753. " "" "8086A" :RAM :NOSDIAG) "TopicVar2" ("->generic topic var 2
  18754. " "" "8086F" :RAM :NOSDIAG) "TopicVar3" ("->generic topic var 3
  18755. " "" "80874" :RAM :NOSDIAG) "TopicVar4" ("->generic topic var 4
  18756. " "" "80879" :RAM :NOSDIAG) "TopicVar5" ("->generic topic var 5
  18757. " "" "8087E" :RAM :NOSDIAG) "TopicVar6" ("->generic topic var 6
  18758. " "" "80883" :RAM :NOSDIAG) "TopicVar7" ("->generic topic var 7
  18759. " "" "80888" :RAM :NOSDIAG) "TopicVar8" ("->generic topic var 8
  18760. " "" "8088D" :RAM :NOSDIAG) "TopicVar9" ("->generic topic var 9
  18761. " "" "80892" :RAM :NOSDIAG) "TopicVar10" ("->generic topic var 10
  18762. " "" "80897" :RAM :NOSDIAG) "TopicVar11" ("->generic topic var 11
  18763. " "" "8089C" :RAM :NOSDIAG) "TopicVar12" ("->generic topic var 12
  18764. " "" "808A1" :RAM :NOSDIAG) "TopicVar13" ("->generic topic var 13
  18765. " "" "808A6" :RAM :NOSDIAG) "TopicVar14" ("->generic topic var 14
  18766. " "" "808AB" :RAM :NOSDIAG) "TopicVar15" ("->generic topic var 15
  18767. " "" "808B0" :RAM :NOSDIAG) "TopicVar16" ("->generic topic var 16
  18768. " "" "808B5" :RAM :NOSDIAG) "TopicVar17" ("->generic topic var 17
  18769. " "" "808BA" :RAM :NOSDIAG) "TopicVar18" ("->generic topic var 18
  18770. " "" "808BF" :RAM :NOSDIAG) "TopicVar19" ("->generic topic var 19
  18771. " "" "808C4" :RAM :NOSDIAG) "TopicVar20" ("->generic topic var 20
  18772. " "" "808C9" :RAM :NOSDIAG) "TopicVar21" ("->generic topic var 21
  18773. " "" "808CE" :RAM :NOSDIAG) "TopicVar22" ("->generic topic var 22
  18774. " "" "808D3" :RAM :NOSDIAG) "TopicVar23" ("->generic topic var 23
  18775. " "" "808D8" :RAM :NOSDIAG) "TopicVar24" ("->generic topic var 24
  18776. " "" "808DD" :RAM :NOSDIAG) "TopicVar25" ("->generic topic var 25
  18777. " "" "808E2" :RAM :NOSDIAG) "TopicVar26" ("->generic topic var 26
  18778. " "" "808E7" :RAM :NOSDIAG) "TopicVar27" ("->generic topic var 27
  18779. " "" "808EC" :RAM :NOSDIAG) "TopicVar28" ("->generic topic var 28
  18780. " "" "808F1" :RAM :NOSDIAG) "TopicVar29" ("->generic topic var 29
  18781. " "" "808F6" :RAM :NOSDIAG) "TopicVar30" ("->generic topic var 30
  18782. " "" "808FB" :RAM :NOSDIAG) "TopicVar31" ("->generic topic var 31
  18783. " "" "80900" :RAM :NOSDIAG) "TopicVar32" ("->generic topic var 32
  18784. " "" "80905" :RAM :NOSDIAG) "TopicVar33" ("->generic topic var 33
  18785. " "" "8090A" :RAM :NOSDIAG) "TopicVar34" ("->generic topic var 34
  18786. " "" "8090F" :RAM :NOSDIAG) "TopicVar35" ("->generic topic var 35
  18787. " "" "80914" :RAM :NOSDIAG) "TopicVar36" ("->generic topic var 36
  18788. " "" "80919" :RAM :NOSDIAG) "TopicVar37" ("->generic topic var 37
  18789. " "" "8091E" :RAM :NOSDIAG) "TopicVar38" ("->generic topic var 38
  18790. " "" "80923" :RAM :NOSDIAG) "TopicVar39" ("->generic topic var 39
  18791. " "" "80928" :RAM :NOSDIAG) "TopicVar40" ("->generic topic var 40
  18792. " "" "8092D" :RAM :NOSDIAG) "TopicVar41" ("->generic topic var 41
  18793. " "" "80932" :RAM :NOSDIAG) "TopicVar42" ("->generic topic var 42
  18794. " "" "80937" :RAM :NOSDIAG) "TopicVar43" ("->generic topic var 43
  18795. " "" "8093C" :RAM :NOSDIAG) "TopicVar44" ("->generic topic var 44
  18796. " "" "80941" :RAM :NOSDIAG) "TopicVar45" ("->generic topic var 45
  18797. " "" "80946" :RAM :NOSDIAG) "TopicVar46" ("->generic topic var 46
  18798. " "" "8094B" :RAM :NOSDIAG) "TopicVar47" ("->generic topic var 47
  18799. " "" "80950" :RAM :NOSDIAG) "TopicVar48" ("->generic topic var 48
  18800. " "" "80955" :RAM :NOSDIAG) "TopicVar49" ("->generic topic var 49
  18801. " "" "8095A" :RAM :NOSDIAG) "TopicVar50" ("->generic topic var 50
  18802. " "" "8095F" :RAM :NOSDIAG) "TopicVar51" ("->generic topic var 51
  18803. " "" "80964" :RAM :NOSDIAG) "TopicVar52" ("->generic topic var 52
  18804. " "" "80969" :RAM :NOSDIAG) "TopicVar53" ("->generic topic var 53
  18805. " "" "8096E" :RAM :NOSDIAG) "TopicVar54" ("->generic topic var 54
  18806. " "" "80973" :RAM :NOSDIAG) "TopicVar55" ("->generic topic var 55
  18807. " "" "80978" :RAM :NOSDIAG) "TopicVar56" ("->generic topic var 56
  18808. " "" "8097D" :RAM :NOSDIAG) "TopicVar57" ("->generic topic var 57
  18809. " "" "80982" :RAM :NOSDIAG) "TopicVar58" ("->generic topic var 58
  18810. " "" "80987" :RAM :NOSDIAG) "TopicVar59" ("->generic topic var 59
  18811. " "" "8098C" :RAM :NOSDIAG) "TopicVar60" ("->generic topic var 60
  18812. " "" "80991" :RAM :NOSDIAG) "TopicVar61" ("->generic topic var 61
  18813. " "" "80996" :RAM :NOSDIAG) "TopicVar62" ("->generic topic var 62
  18814. " "" "8099B" :RAM :NOSDIAG) "TopicVar63" ("->generic topic var 63
  18815. " "" "809A0" :RAM :NOSDIAG) "TopicVar64" ("->generic topic var 64
  18816. " "" "809A5" :RAM :NOSDIAG) "TopicVar65" ("->generic topic var 65
  18817. " "" "809AA" :RAM :NOSDIAG) "TopicVar66" ("->generic topic var 66
  18818. " "" "809AF" :RAM :NOSDIAG) "TopicVar67" ("->generic topic var 67
  18819. " "" "809B4" :RAM :NOSDIAG) "TopicVar68" ("->generic topic var 68
  18820. " "" "809B9" :RAM :NOSDIAG) "TopicVar69" ("->generic topic var 69
  18821. " "" "809BE" :RAM :NOSDIAG) "TopicVar70" ("->generic topic var 70
  18822. " "" "809C3" :RAM :NOSDIAG) "TopicVar71" ("->generic topic var 71
  18823. " "" "809C8" :RAM :NOSDIAG) "TopicVar72" ("->generic topic var 72
  18824. " "" "809CD" :RAM :NOSDIAG) "TopicVar73" ("->generic topic var 73
  18825. " "" "809D2" :RAM :NOSDIAG) "TopicVar74" ("->generic topic var 74
  18826. " "" "809D7" :RAM :NOSDIAG) "TopicVar75" ("->generic topic var 75
  18827. " "" "809DC" :RAM :NOSDIAG) "TopicVar76" ("->generic topic var 76
  18828. " "" "809E1" :RAM :NOSDIAG) "TopicVar77" ("->generic topic var 77
  18829. " "" "809E6" :RAM :NOSDIAG) "TopicVar78" ("->generic topic var 78
  18830. " "" "809EB" :RAM :NOSDIAG) "TopicVar79" ("->generic topic var 79
  18831. " "" "809F0" :RAM :NOSDIAG) "TopicVar80" ("->generic topic var 80
  18832. " "" "809F5" :RAM :NOSDIAG) "TopicVar81" ("->generic topic var 81
  18833. " "" "809FA" :RAM :NOSDIAG) "TopicVar82" ("->generic topic var 82
  18834. " "" "809FF" :RAM :NOSDIAG) "TopicVar83" ("->generic topic var 83
  18835. " "" "80A04" :RAM :NOSDIAG) "TopicVar84" ("->generic topic var 84
  18836. " "" "80A09" :RAM :NOSDIAG) "TopicVar85" ("->generic topic var 85
  18837. " "" "80A0E" :RAM :NOSDIAG) "TopicVar86" ("->generic topic var 86
  18838. " "" "80A13" :RAM :NOSDIAG) "TopicVar87" ("->generic topic var 87
  18839. " "" "80A18" :RAM :NOSDIAG) "TopicVar88" ("->generic topic var 88
  18840. " "" "80A1D" :RAM :NOSDIAG) "TopicVar89" ("->generic topic var 89
  18841. " "" "80A22" :RAM :NOSDIAG) "TopicVar90" ("->generic topic var 90
  18842. " "" "80A27" :RAM :NOSDIAG) "TopicVar91" ("->generic topic var 91
  18843. " "" "80A2C" :RAM :NOSDIAG) "TopicVarNum" ("Number of TopicVars
  18844. " "" "0005B" :RAM) "TOLVar1" ("->TOL var 1
  18845. " "" "80A31" :RAM :NOSDIAG) "TOLVar2" ("->TOL var 2
  18846. " "" "80A36" :RAM :NOSDIAG) "TOLVar3" ("->TOL var 3
  18847. " "" "80A3B" :RAM :NOSDIAG) "TOLVar4" ("->TOL var 4
  18848. " "" "80A40" :RAM :NOSDIAG) "TOLVar5" ("->TOL var 5
  18849. " "" "80A45" :RAM :NOSDIAG) "TOLVar6" ("->TOL var 6
  18850. " "" "80A4A" :RAM :NOSDIAG) "TOLVar7" ("->TOL var 7
  18851. " "" "80A4F" :RAM :NOSDIAG) "TOLVar8" ("->TOL var 8
  18852. " "" "80A54" :RAM :NOSDIAG) "TOLVar9" ("->TOL var 9
  18853. " "" "80A59" :RAM :NOSDIAG) "TOLVar10" ("->TOL var 10
  18854. " "" "80A5E" :RAM :NOSDIAG) "TOLVar11" ("->TOL var 11
  18855. " "" "80A63" :RAM :NOSDIAG) "TOLVar12" ("->TOL var 12
  18856. " "" "80A68" :RAM :NOSDIAG) "TOLVar13" ("->TOL var 13
  18857. " "" "80A6D" :RAM :NOSDIAG) "TOLVar14" ("->TOL var 14
  18858. " "" "80A72" :RAM :NOSDIAG) "TOLVar15" ("->TOL var 15
  18859. " "" "80A77" :RAM :NOSDIAG) "TOLVar16" ("->TOL var 16
  18860. " "" "80A7C" :RAM :NOSDIAG) "TOLVar17" ("->TOL var 17
  18861. " "" "80A81" :RAM :NOSDIAG) "TOLVar18" ("->TOL var 18
  18862. " "" "80A86" :RAM :NOSDIAG) "TOLVar19" ("->TOL var 19
  18863. " "" "80A8B" :RAM :NOSDIAG) "TOLVar20" ("->TOL var 20
  18864. " "" "80A90" :RAM :NOSDIAG) "TOLVar21" ("->TOL var 21
  18865. " "" "80A95" :RAM :NOSDIAG) "TOLVar22" ("->TOL var 22
  18866. " "" "80A9A" :RAM :NOSDIAG) "TOLVar23" ("->TOL var 23
  18867. " "" "80A9F" :RAM :NOSDIAG) "TOLVar24" ("->TOL var 24
  18868. " "" "80AA4" :RAM :NOSDIAG) "TOLVar25" ("->TOL var 25
  18869. " "" "80AA9" :RAM :NOSDIAG) "TOLVar26" ("->TOL var 26
  18870. " "" "80AAE" :RAM :NOSDIAG) "TOLVar27" ("->TOL var 27
  18871. " "" "80AB3" :RAM :NOSDIAG) "TOLVar28" ("->TOL var 28
  18872. " "" "80AB8" :RAM :NOSDIAG) "TOLVar29" ("->TOL var 29
  18873. " "" "80ABD" :RAM :NOSDIAG) "TOLVar30" ("->TOL var 30
  18874. " "" "80AC2" :RAM :NOSDIAG) "TOLVar31" ("->TOL var 31
  18875. " "" "80AC7" :RAM :NOSDIAG) "TOLVar32" ("->TOL var 32
  18876. " "" "80ACC" :RAM :NOSDIAG) "TOLVar33" ("->TOL var 33
  18877. " "" "80AD1" :RAM :NOSDIAG) "TOLVar34" ("->TOL var 34
  18878. " "" "80AD6" :RAM :NOSDIAG) "TOLVar35" ("->TOL var 35
  18879. " "" "80ADB" :RAM :NOSDIAG) "TOLVar36" ("->TOL var 36
  18880. " "" "80AE0" :RAM :NOSDIAG) "TOLVar37" ("->TOL var 37
  18881. " "" "80AE5" :RAM :NOSDIAG) "TOLVar38" ("->TOL var 38
  18882. " "" "80AEA" :RAM :NOSDIAG) "TOLVar39" ("->TOL var 39
  18883. " "" "80AEF" :RAM :NOSDIAG) "TOLVar40" ("->TOL var 40
  18884. " "" "80AF4" :RAM :NOSDIAG) "TOLVar41" ("->TOL var 41
  18885. " "" "80AF9" :RAM :NOSDIAG) "TOLVar42" ("->TOL var 42
  18886. " "" "80AFE" :RAM :NOSDIAG) "TOLVar43" ("->TOL var 43
  18887. " "" "80B03" :RAM :NOSDIAG) "TOLVar44" ("->TOL var 44
  18888. " "" "80B08" :RAM :NOSDIAG) "TOLVar45" ("->TOL var 45
  18889. " "" "80B0D" :RAM :NOSDIAG) "TOLVar46" ("->TOL var 46
  18890. " "" "80B12" :RAM :NOSDIAG) "TOLVar47" ("->TOL var 47
  18891. " "" "80B17" :RAM :NOSDIAG) "TOLVar48" ("->TOL var 48
  18892. " "" "80B1C" :RAM :NOSDIAG) "TOLVar49" ("->TOL var 49
  18893. " "" "80B21" :RAM :NOSDIAG) "TOLVar50" ("->TOL var 50
  18894. " "" "80B26" :RAM :NOSDIAG) "TOLVar51" ("->TOL var 51
  18895. " "" "80B2B" :RAM :NOSDIAG) "TOLVar52" ("->TOL var 52
  18896. " "" "80B30" :RAM :NOSDIAG) "TOLVar53" ("->TOL var 53
  18897. " "" "80B35" :RAM :NOSDIAG) "TOLVar54" ("->TOL var 54
  18898. " "" "80B3A" :RAM :NOSDIAG) "TOLVar55" ("->TOL var 55
  18899. " "" "80B3F" :RAM :NOSDIAG) "TOLVar56" ("->TOL var 56
  18900. " "" "80B44" :RAM :NOSDIAG) "TOLVar57" ("->TOL var 57
  18901. " "" "80B49" :RAM :NOSDIAG) "TOLVar58" ("->TOL var 58
  18902. " "" "80B4E" :RAM :NOSDIAG) "TOLVar59" ("->TOL var 59
  18903. " "" "80B53" :RAM :NOSDIAG) "TOLVar60" ("->TOL var 60
  18904. " "" "80B58" :RAM :NOSDIAG) "TOLVar61" ("->TOL var 61
  18905. " "" "80B5D" :RAM :NOSDIAG) "TOLVar62" ("->TOL var 62
  18906. " "" "80B62" :RAM :NOSDIAG) "TOLVar63" ("->TOL var 63
  18907. " "" "80B67" :RAM :NOSDIAG) "TOLVar64" ("->TOL var 64
  18908. " "" "80B6C" :RAM :NOSDIAG) "TOLVar65" ("->TOL var 65
  18909. " "" "80B71" :RAM :NOSDIAG) "TOLVar66" ("->TOL var 66
  18910. " "" "80B76" :RAM :NOSDIAG) "TOLVar67" ("->TOL var 67
  18911. " "" "80B7B" :RAM :NOSDIAG) "TOLVar68" ("->TOL var 68
  18912. " "" "80B80" :RAM :NOSDIAG) "TOLVar69" ("->TOL var 69
  18913. " "" "80B85" :RAM :NOSDIAG) "TOLVar70" ("->TOL var 70
  18914. " "" "80B8A" :RAM :NOSDIAG) "TOLVar71" ("->TOL var 71
  18915. " "" "80B8F" :RAM :NOSDIAG) "TOLVar72" ("->TOL var 72
  18916. " "" "80B94" :RAM :NOSDIAG) "TOLVar73" ("->TOL var 73
  18917. " "" "80B99" :RAM :NOSDIAG) "TOLVar74" ("->TOL var 74
  18918. " "" "80B9E" :RAM :NOSDIAG) "TOLVar75" ("->TOL var 75
  18919. " "" "80BA3" :RAM :NOSDIAG) "TOLVar76" ("->TOL var 76
  18920. " "" "80BA8" :RAM :NOSDIAG) "TOLVar77" ("->TOL var 77
  18921. " "" "80BAD" :RAM :NOSDIAG) "TOLVar78" ("->TOL var 78
  18922. " "" "80BB2" :RAM :NOSDIAG) "TOLVar79" ("->TOL var 79
  18923. " "" "80BB7" :RAM :NOSDIAG) "TOLVar80" ("->TOL var 80
  18924. " "" "80BBC" :RAM :NOSDIAG) "TOLVar81" ("->TOL var 81
  18925. " "" "80BC1" :RAM :NOSDIAG) "TOLVar82" ("->TOL var 82
  18926. " "" "80BC6" :RAM :NOSDIAG) "TOLVar83" ("->TOL var 83
  18927. " "" "80BCB" :RAM :NOSDIAG) "TOLVar84" ("->TOL var 84
  18928. " "" "80BD0" :RAM :NOSDIAG) "TOLVar85" ("->TOL var 85
  18929. " "" "80BD5" :RAM :NOSDIAG) "TOLVar86" ("->TOL var 86
  18930. " "" "80BDA" :RAM :NOSDIAG) "TOLVar87" ("->TOL var 87
  18931. " "" "80BDF" :RAM :NOSDIAG) "TOLVar88" ("->TOL var 88
  18932. " "" "80BE4" :RAM :NOSDIAG) "TOLVar89" ("->TOL var 89
  18933. " "" "80BE9" :RAM :NOSDIAG) "TOLVar90" ("->TOL var 90
  18934. " "" "80BEE" :RAM :NOSDIAG) "TOLVar91" ("->TOL var 91
  18935. " "" "80BF3" :RAM :NOSDIAG) "TOLVar92" ("->TOL var 92
  18936. " "" "80BF8" :RAM :NOSDIAG) "TOLVar93" ("->TOL var 93
  18937. " "" "80BFD" :RAM :NOSDIAG) "TOLVar94" ("->TOL var 94
  18938. " "" "80C02" :RAM :NOSDIAG) "TOLVar95" ("->TOL var 95
  18939. " "" "80C07" :RAM :NOSDIAG) "TOLVar96" ("->TOL var 96
  18940. " "" "80C0C" :RAM :NOSDIAG) "TOLVar97" ("->TOL var 97
  18941. " "" "80C11" :RAM :NOSDIAG) "TOLVar98" ("->TOL var 98
  18942. " "" "80C16" :RAM :NOSDIAG) "TOLVar99" ("->TOL var 99
  18943. " "" "80C1B" :RAM :NOSDIAG) "TOLVar100" ("->TOL var 100
  18944. " "" "80C20" :RAM :NOSDIAG) "TOLVar101" ("->TOL var 101
  18945. " "" "80C25" :RAM :NOSDIAG) "TOLVar102" ("->TOL var 102
  18946. " "" "80C2A" :RAM :NOSDIAG) "TOLVar103" ("->TOL var 103
  18947. " "" "80C2F" :RAM :NOSDIAG) "TOLVar104" ("->TOL var 104
  18948. " "" "80C34" :RAM :NOSDIAG) "TOLVar105" ("->TOL var 105
  18949. " "" "80C39" :RAM :NOSDIAG) "TOLVar106" ("->TOL var 106
  18950. " "" "80C3E" :RAM :NOSDIAG) "TOLVar107" ("->TOL var 107
  18951. " "" "80C43" :RAM :NOSDIAG) "TOLVar108" ("->TOL var 108
  18952. " "" "80C48" :RAM :NOSDIAG) "TOLVar109" ("->TOL var 109
  18953. " "" "80C4D" :RAM :NOSDIAG) "TOLVar110" ("->TOL var 110
  18954. " "" "80C52" :RAM :NOSDIAG) "TOLVar111" ("->TOL var 111
  18955. " "" "80C57" :RAM :NOSDIAG) "TOLVar112" ("->TOL var 112
  18956. " "" "80C5C" :RAM :NOSDIAG) "TOLVar113" ("->TOL var 113
  18957. " "" "80C61" :RAM :NOSDIAG) "TOLVar114" ("->TOL var 114
  18958. " "" "80C66" :RAM :NOSDIAG) "TOLVar115" ("->TOL var 115
  18959. " "" "80C6B" :RAM :NOSDIAG) "TOLVar116" ("->TOL var 116
  18960. " "" "80C70" :RAM :NOSDIAG) "TOLVar117" ("->TOL var 117
  18961. " "" "80C75" :RAM :NOSDIAG) "TOLVar118" ("->TOL var 118
  18962. " "" "80C7A" :RAM :NOSDIAG) "TOLVar119" ("->TOL var 119
  18963. " "" "80C7F" :RAM :NOSDIAG) "TOLVar120" ("->TOL var 120
  18964. " "" "80C84" :RAM :NOSDIAG) "TOLVar121" ("->TOL var 121
  18965. " "" "80C89" :RAM :NOSDIAG) "TOLVar122" ("->TOL var 122
  18966. " "" "80C8E" :RAM :NOSDIAG) "TOLVar123" ("->TOL var 123
  18967. " "" "80C93" :RAM :NOSDIAG) "TOLVar124" ("->TOL var 124
  18968. " "" "80C98" :RAM :NOSDIAG) "TOLVar125" ("->TOL var 125
  18969. " "" "80C9D" :RAM :NOSDIAG) "TOLVar126" ("->TOL var 126
  18970. " "" "80CA2" :RAM :NOSDIAG) "TOLVar127" ("->TOL var 127
  18971. " "" "80CA7" :RAM :NOSDIAG) "TOLVar128" ("->TOL var 128
  18972. " "" "80CAC" :RAM :NOSDIAG) "TOLVar129" ("->TOL var 129
  18973. " "" "80CB1" :RAM :NOSDIAG) "TOLVar130" ("->TOL var 130
  18974. " "" "80CB6" :RAM :NOSDIAG) "TOLVar131" ("->TOL var 131
  18975. " "" "80CBB" :RAM :NOSDIAG) "TOLVar132" ("->TOL var 132
  18976. " "" "80CC0" :RAM :NOSDIAG) "TOLVar133" ("->TOL var 133
  18977. " "" "80CC5" :RAM :NOSDIAG) "TOLVar134" ("->TOL var 134
  18978. " "" "80CCA" :RAM :NOSDIAG) "TOLVar135" ("->TOL var 135
  18979. " "" "80CCF" :RAM :NOSDIAG) "TOLVar136" ("->TOL var 136
  18980. " "" "80CD4" :RAM :NOSDIAG) "TOLVar137" ("->TOL var 137
  18981. " "" "80CD9" :RAM :NOSDIAG) "TOLVar138" ("->TOL var 138
  18982. " "" "80CDE" :RAM :NOSDIAG) "TOLVar139" ("->TOL var 139
  18983. " "" "80CE3" :RAM :NOSDIAG) "TOLVar140" ("->TOL var 140
  18984. " "" "80CE8" :RAM :NOSDIAG) "TOLVar141" ("->TOL var 141
  18985. " "" "80CED" :RAM :NOSDIAG) "TOLVar142" ("->TOL var 142
  18986. " "" "80CF2" :RAM :NOSDIAG) "TOLVar143" ("->TOL var 143
  18987. " "" "80CF7" :RAM :NOSDIAG) "TOLVar144" ("->TOL var 144
  18988. " "" "80CFC" :RAM :NOSDIAG) "TOLVar145" ("->TOL var 145
  18989. " "" "80D01" :RAM :NOSDIAG) "TOLVar146" ("->TOL var 146
  18990. " "" "80D06" :RAM :NOSDIAG) "TOLVar147" ("->TOL var 147
  18991. " "" "80D0B" :RAM :NOSDIAG) "TOLVar148" ("->TOL var 148
  18992. " "" "80D10" :RAM :NOSDIAG) "TOLVar149" ("->TOL var 149
  18993. " "" "80D15" :RAM :NOSDIAG) "TOLVar150" ("->TOL var 150
  18994. " "" "80D1A" :RAM :NOSDIAG) "TOLVar151" ("->TOL var 151
  18995. " "" "80D1F" :RAM :NOSDIAG) "TOLVar152" ("->TOL var 152
  18996. " "" "80D24" :RAM :NOSDIAG) "TOLVar153" ("->TOL var 153
  18997. " "" "80D29" :RAM :NOSDIAG) "TOLVar154" ("->TOL var 154
  18998. " "" "80D2E" :RAM :NOSDIAG) "TOLVar155" ("->TOL var 155
  18999. " "" "80D33" :RAM :NOSDIAG) "TOLVar156" ("->TOL var 156
  19000. " "" "80D38" :RAM :NOSDIAG) "TOLVar157" ("->TOL var 157
  19001. " "" "80D3D" :RAM :NOSDIAG) "TOLVar158" ("->TOL var 158
  19002. " "" "80D42" :RAM :NOSDIAG) "TOLVar159" ("->TOL var 159
  19003. " "" "80D47" :RAM :NOSDIAG) "TOLVar160" ("->TOL var 160
  19004. " "" "80D4C" :RAM :NOSDIAG) "TOLVar161" ("->TOL var 161
  19005. " "" "80D51" :RAM :NOSDIAG) "TOLVar162" ("->TOL var 162
  19006. " "" "80D56" :RAM :NOSDIAG) "TOLVar163" ("->TOL var 163
  19007. " "" "80D5B" :RAM :NOSDIAG) "TOLVar164" ("->TOL var 164
  19008. " "" "80D60" :RAM :NOSDIAG) "TOLVar165" ("->TOL var 165
  19009. " "" "80D65" :RAM :NOSDIAG) "TOLVar166" ("->TOL var 166
  19010. " "" "80D6A" :RAM :NOSDIAG) "TOLVar167" ("->TOL var 167
  19011. " "" "80D6F" :RAM :NOSDIAG) "TOLVar168" ("->TOL var 168
  19012. " "" "80D74" :RAM :NOSDIAG) "TOLVar169" ("->TOL var 169
  19013. " "" "80D79" :RAM :NOSDIAG) "TOLVar170" ("->TOL var 170
  19014. " "" "80D7E" :RAM :NOSDIAG) "TOLVar171" ("->TOL var 171
  19015. " "" "80D83" :RAM :NOSDIAG) "TOLVar172" ("->TOL var 172
  19016. " "" "80D88" :RAM :NOSDIAG) "TOLVar173" ("->TOL var 173
  19017. " "" "80D8D" :RAM :NOSDIAG) "TOLVar174" ("->TOL var 174
  19018. " "" "80D92" :RAM :NOSDIAG) "TOLVar175" ("->TOL var 175
  19019. " "" "80D97" :RAM :NOSDIAG) "TOLVar176" ("->TOL var 176
  19020. " "" "80D9C" :RAM :NOSDIAG) "TOLVar177" ("->TOL var 177
  19021. " "" "80DA1" :RAM :NOSDIAG) "TOLVar178" ("->TOL var 178
  19022. " "" "80DA6" :RAM :NOSDIAG) "TOLVar179" ("->TOL var 179
  19023. " "" "80DAB" :RAM :NOSDIAG) "TOLVar180" ("->TOL var 180
  19024. " "" "80DB0" :RAM :NOSDIAG) "TOLVar181" ("->TOL var 181
  19025. " "" "80DB5" :RAM :NOSDIAG) "TOLVar182" ("->TOL var 182
  19026. " "" "80DBA" :RAM :NOSDIAG) "TOLVar183" ("->TOL var 183
  19027. " "" "80DBF" :RAM :NOSDIAG) "TOLVar184" ("->TOL var 184
  19028. " "" "80DC4" :RAM :NOSDIAG) "TOLVar185" ("->TOL var 185
  19029. " "" "80DC9" :RAM :NOSDIAG) "TOLVar186" ("->TOL var 186
  19030. " "" "80DCE" :RAM :NOSDIAG) "TOLVar187" ("->TOL var 187
  19031. " "" "80DD3" :RAM :NOSDIAG) "TOLVar188" ("->TOL var 188
  19032. " "" "80DD8" :RAM :NOSDIAG) "TOLVar189" ("->TOL var 189
  19033. " "" "80DDD" :RAM :NOSDIAG) "TOLVar190" ("->TOL var 190
  19034. " "" "80DE2" :RAM :NOSDIAG) "TOLVar191" ("->TOL var 191
  19035. " "" "80DE7" :RAM :NOSDIAG) "TOLVar192" ("->TOL var 192
  19036. " "" "80DEC" :RAM :NOSDIAG) "TOLVar193" ("->TOL var 193
  19037. " "" "80DF1" :RAM :NOSDIAG) "TOLVar194" ("->TOL var 194
  19038. " "" "80DF6" :RAM :NOSDIAG) "TOLVar195" ("->TOL var 195
  19039. " "" "80DFB" :RAM :NOSDIAG) "TOLVar196" ("->TOL var 196
  19040. " "" "80E00" :RAM :NOSDIAG) "TOLVar197" ("->TOL var 197
  19041. " "" "80E05" :RAM :NOSDIAG) "TOLVar198" ("->TOL var 198
  19042. " "" "80E0A" :RAM :NOSDIAG) "TOLVar199" ("->TOL var 199
  19043. " "" "80E0F" :RAM :NOSDIAG) "TOLVar200" ("->TOL var 200
  19044. " "" "80E14" :RAM :NOSDIAG) "TOLVar201" ("->TOL var 201
  19045. " "" "80E19" :RAM :NOSDIAG) "TOLVar202" ("->TOL var 202
  19046. " "" "80E1E" :RAM :NOSDIAG) "TOLVar203" ("->TOL var 203
  19047. " "" "80E23" :RAM :NOSDIAG) "TOLVar204" ("->TOL var 204
  19048. " "" "80E28" :RAM :NOSDIAG) "TOLVar205" ("->TOL var 205
  19049. " "" "80E2D" :RAM :NOSDIAG) "TOLVar206" ("->TOL var 206
  19050. " "" "80E32" :RAM :NOSDIAG) "TOLVar207" ("->TOL var 207
  19051. " "" "80E37" :RAM :NOSDIAG) "TOLVar208" ("->TOL var 208
  19052. " "" "80E3C" :RAM :NOSDIAG) "TOLVar209" ("->TOL var 209
  19053. " "" "80E41" :RAM :NOSDIAG) "TOLVar210" ("->TOL var 210
  19054. " "" "80E46" :RAM :NOSDIAG) "TOLVar211" ("->TOL var 211
  19055. " "" "80E4B" :RAM :NOSDIAG) "TOLVar212" ("->TOL var 212
  19056. " "" "80E50" :RAM :NOSDIAG) "TOLVar213" ("->TOL var 213
  19057. " "" "80E55" :RAM :NOSDIAG) "TOLVar214" ("->TOL var 214
  19058. " "" "80E5A" :RAM :NOSDIAG) "TOLVar215" ("->TOL var 215
  19059. " "" "80E5F" :RAM :NOSDIAG) "TOLVar216" ("->TOL var 216
  19060. " "" "80E64" :RAM :NOSDIAG) "TOLVarNum" ("number of TOLVars
  19061. " "" "000D8" :RAM) "UserInt1" ("->User interrupt routine 1
  19062. " "This interrupt handler is called
  19063. *before* the normal one. Only
  19064. D1, P, Hex/Dec, CRY, SB, C.W and A.W
  19065. are saved at that point.
  19066. " "8600D" :RAM) "UserInt1g" ("Copy of <REF>UserInt1
  19067. " "If this address is not equal to the
  19068. one in UserInt1, none of the two
  19069. will be called.
  19070. " "86017" :RAM) "UserInt2" ("->User interrupt routine 2
  19071. " "This interrupt handler is called
  19072. *after* the normal one, before
  19073. RESTORECPU. All registers are still
  19074. saved.
  19075. " "86012" :RAM) "UserInt2g" ("Copy of <REF>UserInt2
  19076. " "If this address is not equal to the
  19077. one in UserInt2, none of the two
  19078. will be called.
  19079. " "8601C" :RAM) "uart_buf_end" ("# of bytes in the UART buffer (2)
  19080. " "" "80519" :RAM) "uart_buf_st" ("UART buffer offset (2)
  19081. " "" "8051C" :RAM) "uart_buffer" ("UART buffer area (512)
  19082. " "" "80319" :RAM) "uart_error" ("UART error flag (1)
  19083. " "" "8051B" :RAM) "uart_handshk" ("UART handshake (1)
  19084. " "" "8051E" :RAM) "uart_modes" ("UART mode (1)
  19085. " "" "8051F" :RAM) "uart_parity" ("(1)
  19086. " "" "80520" :RAM) "uart_timeout" ("(2)
  19087. " "" "80521" :RAM) "FROMPTABPTR" ("-> <REF>FROMPTAB0_15
  19088. " "" "860AE" :RAM) "FlashROMPTAB" ("Library table (3+n*16)
  19089. " "Header:
  19090. 3 number of libraries
  19091. For each library:
  19092. 3 library ID
  19093. 5 address
  19094. 5 switch routine (0 if none)
  19095. 3 000
  19096. " "8611D" :RAM) "RESRAMEND" ("Library table (3+n*16)
  19097. " "Header:
  19098. 3 number of libraries
  19099. For each library:
  19100. 3 library ID
  19101. 5 address
  19102. 5 switch routine (0 if none)
  19103. 3 000
  19104. " "8611D" :RAM) "ROMPTAB" ("Library table (3+n*16)
  19105. " "Header:
  19106. 3 number of libraries
  19107. For each library:
  19108. 3 library ID
  19109. 5 address
  19110. 5 switch routine (0 if none)
  19111. 3 000
  19112. " "8611D" :RAM) "FlashROMTAB2" ("Bank switcher addresses (16*5)
  19113. sorted by physical bank number
  19114. " "" "860CC" :RAM) "@FONTE" ("Array of used fonts (1708)
  19115. " "" "81971" :RAM) "ArryFont" ("Array of used fonts (1708)
  19116. " "" "81971" :RAM) "SystemFont" ("Big system font (4626)
  19117. " "" "84D82" :RAM) "FONTE_SYSTEM" ("Big system font (4626)
  19118. " "" "84D82" :RAM) "H_FONTE" ("Height of the current font (5)
  19119. " "" "81098" :RAM) "FontHeight" ("Height of the current font (5)
  19120. " "" "81098" :RAM) "TAB_FONTE" ("Font hash table (512)
  19121. " "" "8201D" :RAM) "HashArryFont" ("Font hash table (512)
  19122. " "" "8201D" :RAM) "MiniFont" ("Minifont (1536)
  19123. " "" "812CF" :RAM) "MINI_FONT" ("Minifont (1536)
  19124. " "" "812CF" :RAM) "MiniFontObj" ("<REF>MINI_FONT with font header
  19125. " "" "812C3" :RAM) "MINI_FONT.OBJ" ("<REF>MINI_FONT with font header
  19126. " "" "812C3" :RAM) "NbFont" ("Number of detected fonts (5)
  19127. " "" "812AA" :RAM) "NB_FONTE" ("Number of detected fonts (5)
  19128. " "" "812AA" :RAM) "IRAMHOMEmsn" ("MSN of the IRAM base address
  19129. " "" "00008" :RAM) "LOCUPSIZE" ("Number of variables between
  19130. <REF>SYSUPSTART and <REF>OBUPSTART
  19131. " "" "0001D" :RAM) "NBMAXFONT" ("Maximum number of fonts
  19132. " "" "000F4" :RAM) "OBUPSIZE" ("Number of variables between
  19133. <REF>OBUPSTART and <REF>OBUPEND
  19134. " "" "0016F" :RAM) "ParenModmask" ("
  19135. " "" "00001" :RAM) "mEditLExists" ("
  19136. " "" "00001" :RAM) "SYSUPSIZE" ("<REF>OBUPSIZE + <REF>LOCUPSIZE
  19137. " "" "0018C" :RAM) "ACCUM" ("(1)
  19138. " "" "80FF1" :RAM) "ALARMS" ("->System Alarm List (5)
  19139. " "" "8072A" :RAM) "ALARMSDUE" ("Flags Alarm Due (1)
  19140. " "" "80EF1" :RAM) "ATTNFLG" ("Counts ON presses (5)
  19141. " "" "80EAB" :RAM) "AccessInit" ("Saved value of INITEN & sALLOWINTR (2)
  19142. " "" "800E6" :RAM) "BounceTiming" ("Minimum time between 2 same key
  19143. press for key validation (8)
  19144. " "" "86051" :RAM) "CALCCXT" ("->Calculator variables dir (5)
  19145. " "" "80734" :RAM) "RAMSTART" ("Quick RAM corrupt check (5)
  19146. " "" "80000" :RAM) "HARDROMEND" ("Quick RAM corrupt check (5)
  19147. " "" "80000" :RAM) "CMOS" ("Quick RAM corrupt check (5)
  19148. " "" "80000" :RAM) "COLCOUNT" ("Dot Cols on line (2)
  19149. " "" "81001" :RAM) "COLWIDTH" ("(2)
  19150. " "" "80FF3" :RAM) "CONFRAM" ("RAM configuration (7)
  19151. " "Port1:
  19152. 1 Status [r w s 0]
  19153. 1 Size/Address Code
  19154. Port2:
  19155. 1 Status [r w s 0]
  19156. 1 Size/Address Code
  19157. where r=readable, w=writable,
  19158. s=system RAM
  19159. 2 #banks
  19160. 1 ID
  19161. " "80524" :RAM) "CONFTAB" ("RAM configuration with CRC (11)
  19162. " "4 nibbles for CRC
  19163. 7 nibbles as in CONFRAM
  19164. " "8052B" :RAM) "CONTEXT" ("->Current dir
  19165. " "" "8071B" :RAM) "COVERsave" ("Save area for G/DoCovered (10)
  19166. " "" "800EB" :RAM) "COVERstate" ("Iram state before uncovering (3)
  19167. " "" "800E8" :RAM) "TIMEOUTCLK" ("ScratchPad (4)
  19168. " "" "80076" :RAM) "CSPEED" ("CPU speed (16hz units) (5)
  19169. " "" "80655" :RAM) "CURRENTMENU" ("Menu ID of current menu (2)
  19170. " "" "80FA2" :RAM) "CatalogCache" ("->CAT list
  19171. " "" "80E69" :RAM) "CatalogEntry" ("->Last CAT item selected
  19172. " "" "86059" :RAM) "Clipboard" ("->Clipboard
  19173. " "" "80E6E" :RAM) "ClkOnNib" ("Clock display on/off (1)
  19174. " "" "80FFA" :RAM) "CplxX" ("Complex number used by plotter (37)
  19175. " "" "85FBE" :RAM) "CplxY" ("<REF>CplxX
  19176. " "" "85FE3" :RAM) "CtlAlarm" ("->Control alarm data
  19177. " "" "807E8" :RAM) "CurRAMBank1" ("Backup of current RAM view 1 (5)
  19178. " "" "860BD" :RAM) "CurRAMBank2" ("Backup of current RAM view 2 (5)
  19179. " "" "860C2" :RAM) "CurRAMBank3" ("Backup of current RAM view 3 (5)
  19180. " "" "860C7" :RAM) "CurROMBank1" ("Backup of current ROM view 1 (5)
  19181. " "" "860B3" :RAM) "CurROMBank2" ("Backup of current ROM view 2 (5)
  19182. " "" "860B8" :RAM) "DEPTHSAVE" ("Saved user stack depth (5)
  19183. " "" "80EDC" :RAM) "DIGITS" ("Infinite precision digits (5)
  19184. " "" "86008" :RAM) "HANDSHK" ("Keyboard handshake (1)
  19185. " "" "8065B" :RAM) "DISABLE_KBD" ("Keyboard handshake (1)
  19186. " "" "8065B" :RAM) "DISP1CTLg" ("Ghost for DISP1CTL (5)
  19187. " "" "8068D" :RAM) "DISP2CTLg" ("Ghost for DISP2CTL (5)
  19188. " "" "80695" :RAM) "DOLPENV" ("->DO LOOP environments
  19189. " "" "80707" :RAM) "DOUSEALARM" ("Flags Deactivate Curr Alarm (1)
  19190. " "" "80EF3" :RAM) "DREND" ("Display Refresh Hi Bound (5)
  19191. " "" "8064A" :RAM) "DRSTART" ("Display Refresh Lo Bound (5)
  19192. " "" "80645" :RAM) "DcompWidth" ("String Decomp Width (2)
  19193. " "" "80FCD" :RAM) "DelayCt" ("REDEYE Print time/line (2)
  19194. " "" "80FFD" :RAM) "ELEMENT" ("decompile obj depth counter (2)
  19195. " "" "80F42" :RAM) "ENTRWISE" ("(1)
  19196. " "" "80FF5" :RAM) "ERROR" ("(5)
  19197. " "" "80EA5" :RAM) "EXITMSG" ("->msg set by user in EXIT word
  19198. " "" "807BB" :RAM) "EqPtr" ("Points to Curr Eqn in EqList (5)
  19199. " "" "8102B" :RAM) "FIRSTCHAR" ("offset to 1st visible (5)
  19200. " "" "80F44" :RAM) "FIRSTPROC" ("->StartupProc Secondary (5)
  19201. " "" "80EB0" :RAM) "FONTCOUNT" ("counter (3)
  19202. " "" "80FD1" :RAM) "FONTHEIGHT" ("font-height selector (1)
  19203. " "" "80FCF" :RAM) "FONTWIDTH" ("font-width selector (1)
  19204. " "" "80FD0" :RAM) "VSTACK" ("
  19205. " "" "8072F" :RAM) "FSTVGERPTR" ("
  19206. " "" "8072F" :RAM) "FailTime" ("SelfTest Fail Time (Ticks) (13)
  19207. " "" "80085" :RAM) "FifoByteCt" ("Sum of FIFO Line Counts (2)
  19208. " "" "81009" :RAM) "FindPattern" ("->Find Pattern address
  19209. " "" "80E73" :RAM) "FlagMBox" ("->Flag mailbox
  19210. " "" "80833" :RAM) "FlashPtrBkp" ("Space to create a FPTR (12)
  19211. " "" "81082" :RAM) "FreeRoom" ("DSKTOP-RSKTOP, used by SWAPMEM (5)
  19212. " "" "818EE" :RAM) "GARBSCRATCH1" ("Saves 1 RSTK level in G.C. (5)
  19213. " "" "80FAD" :RAM) "GARBSCRATCH2" ("Saves counter in G.C. (5)
  19214. " "" "80FB2" :RAM) "GCOLCOUNT" ("Graphics #Cols (2)
  19215. " "" "80FFF" :RAM) "GraphContext" ("->Graphic Context
  19216. " "" "8085B" :RAM) "IRAMBEND" ("(11)
  19217. " "" "8030E" :RAM) "GraphPrtHook" ("(11)
  19218. " "" "8030E" :RAM) "HARDRAMEND" ("IRAM Home ends at #7FFFF
  19219. " "Appears to be an obsolete constant
  19220. from the 48G, where IRAM was only
  19221. 32kB big and thus ranged from
  19222. #80000 to #8FFFF. The description
  19223. even seems to come from the 48S!
  19224. " "90000" :RAM) "HISTORY1" ("-> $ with the most recent CMD
  19225. history entry
  19226. " "" "80798" :RAM) "HISTORY2" ("->2nd entry <REF>HISTORY1
  19227. " "" "8079D" :RAM) "HISTORY3" ("->3rd entry <REF>HISTORY1
  19228. " "" "807A2" :RAM) "HISTORY4" ("->4th (oldest) entry <REF>HISTORY1
  19229. " "" "807A7" :RAM) "HISTORYLEVEL" ("which stack level is next (1)
  19230. " "" "80F59" :RAM) "HOMEMASK" ("Home Size of RAM (mask) (5)
  19231. " "" "8000A" :RAM) "HRAMEND" ("M.S.N. of size of RAM chip (1)
  19232. " "" "8000F" :RAM) "HStackPtr" ("->Highlight in stack
  19233. " "" "80851" :RAM) "HStackTop" ("->How many items on stack
  19234. " "" "80856" :RAM) "TAB_CMD" ("Command line hash table (360)
  19235. " "" "810E8" :RAM) "HashCLE" ("Command line hash table (360)
  19236. " "" "810E8" :RAM) "T_HEADER" ("Header size in lines (5)
  19237. " "" "8108E" :RAM) "HeaderHeight" ("Header size in lines (5)
  19238. " "" "8108E" :RAM) "HiLitePtr" ("->Highlight in window
  19239. " "" "80847" :RAM) "INITEN" ("Warmstart Enable flag (1)
  19240. " "" "8065A" :RAM) "KEYBUFFER" ("Key Buffer (max 15 keys). (34)
  19241. " "" "80669" :RAM) "INPUTSTREAM" ("Key Buffer (max 15 keys). (34)
  19242. " "" "80669" :RAM) "IOCNIB" ("Saves IOC in OUTUART (1)
  19243. " "" "80523" :RAM) "IOCsave" ("Save of IOC before change (1)
  19244. " "" "81006" :RAM) "IOSAVE" ("Saves HiNib of ANNCTRL (1)
  19245. " "" "80654" :RAM) "IRAMBSIZE" ("Size of <REF>IRAMBUFF
  19246. " "" "00219" :RAM) "IRAMBUFF" ("Exec Buff (code under IRAM) (537)
  19247. " "" "800F5" :RAM) "IRAMBUFF2" ("<REF>IRAMBUFF +50
  19248. " "" "80127" :RAM) "IRAMMASK" ("IRAM Size Config Mask (5)
  19249. " "" "80005" :RAM) "IREG" ("Saves Interrupt History (3)
  19250. " "" "8064F" :RAM) "ITEM1LINES" ("# display lines currently (1)
  19251. " "" "80ED6" :RAM) "ITEM1STATE" ("->list of lists describing stack
  19252. level 1
  19253. " "" "80793" :RAM) "PDCSYMB" ("->Kermit error message
  19254. " "" "807B1" :RAM) "KERMERRM" ("->Kermit error message
  19255. " "" "807B1" :RAM) "KERMMODE" ("Kermit Mode information (1)
  19256. " "" "80FCC" :RAM) "KEYLIST" ("(5)
  19257. " "" "80FEB" :RAM) "KEYLOCK" ("(1)
  19258. " "" "80FF0" :RAM) "KEYSTATE" ("location of kbd state (16)
  19259. " "" "8065C" :RAM) "KSTATEVGER" ("KeyState for Vger Keyboard
  19260. " "From rammap.a:
  19261. \"(we didn't use the previous \\
  19262. KEYSTATE to maintain the entry \\
  19263. points)\"
  19264. " "86037" :RAM) "KeyOb" ("->Pending key-object
  19265. " "" "8082E" :RAM) "KeyRomPtr0" ("RomPtr for KeyOb (11)
  19266. " "" "81030" :RAM) "KeyRomPtr1" ("RomPtr for MenuKey 1 (11)
  19267. " "" "8103B" :RAM) "KeyRomPtr2" ("RomPtr for MenuKey 2 (11)
  19268. " "" "81046" :RAM) "KeyRomPtr3" ("RomPtr for MenuKey 3 (11)
  19269. " "" "81051" :RAM) "KeyRomPtr4" ("RomPtr for MenuKey 4 (11)
  19270. " "" "8105C" :RAM) "KeyRomPtr5" ("RomPtr for MenuKey 5 (11)
  19271. " "" "81067" :RAM) "KeyRomPtr6" ("RomPtr for MenuKey 6 (11)
  19272. " "" "81072" :RAM) "LANGUAGE" ("(5)
  19273. " "" "80EA0" :RAM) "LASTARG1" ("->1st argument saved in CK<n>
  19274. " "" "80775" :RAM) "LASTARG" ("->1st argument saved in CK<n>
  19275. " "" "80775" :RAM) "LASTARG2" ("->2nd <REF>LASTARG
  19276. " "" "8077A" :RAM) "LASTARG3" ("->3rd <REF>LASTARG
  19277. " "" "8077F" :RAM) "LASTARG4" ("->4th <REF>LASTARG
  19278. " "" "80784" :RAM) "LASTARG5" ("->5th <REF>LASTARG
  19279. " "" "80789" :RAM) "LASTARGCOUNT" ("# of args saved by CK<n> (1)
  19280. " "" "80F5A" :RAM) "LASTARGf" ("Flag #Args>3 (1)
  19281. " "" "80F5B" :RAM) "LASTERROR" ("Save area for error number (5)
  19282. " "" "80F5C" :RAM) "LASTOP" ("3-state encoding of operand/
  19283. unary/binary (1)
  19284. " "" "80FDA" :RAM) "LASTROMWDOB" ("->Last user-level ROM-WORD
  19285. evaluated (set by CK<n>)
  19286. " "" "80829" :RAM) "LEFTTREE" ("(3)
  19287. " "" "80FDB" :RAM) "LINECOUNTg" ("Ghost for LINECOUNT (2)
  19288. " "" "8069A" :RAM) "LINENIBSg" ("Ghost for LINENIBS (3)
  19289. " "" "80692" :RAM) "LPD_HIST" ("Low Power Detect History (1)
  19290. " "" "80EFF" :RAM) "LabelDef" ("->How to make menu labels
  19291. " "" "80801" :RAM) "LastContext" ("->RRP saved for CheckContext
  19292. " "" "8081A" :RAM) "LastKey" ("Last key press (2)
  19293. " "" "86047" :RAM) "LastKeyTime" ("Last key press time (8)
  19294. " "" "86049" :RAM) "LastMenuDef" ("->Last menu definition
  19295. " "" "807F2" :RAM) "LastMenuRow" ("(5)
  19296. " "" "8107D" :RAM) "LastPrntTime" ("Time (Upper 11 nibs) (11)
  19297. " "" "8100B" :RAM) "LineByteCt" ("Line Byte Counter (2)
  19298. " "" "81007" :RAM) "LoBatTime" ("Flag periodic ((*)) updates (1)
  19299. " "" "80077" :RAM) "MENULEVEL" ("User-menu level (5)
  19300. " "" "80FA4" :RAM) "MenuData" ("->Menu data for touch table
  19301. " "" "807F7" :RAM) "MenuDef" ("->Current menu definition
  19302. " "" "807ED" :RAM) "MenuExitAct" ("->Menu exit action definition
  19303. " "" "80824" :RAM) "MenuKeyLS" ("->Left-shift menu key handler
  19304. " "" "8080B" :RAM) "MenuKeyNS" ("->No-shift menu key handler
  19305. " "" "80806" :RAM) "MenuKeyRS" ("->Right-shift menu key handler
  19306. " "" "80810" :RAM) "MenuRow" ("(5)
  19307. " "" "81026" :RAM) "MenuRowAct" ("->Prev/Next action definition
  19308. " "" "807FC" :RAM) "StackHeight" ("Size of the stack's screen
  19309. in lines (5)
  19310. " "" "81093" :RAM) "NB_LIGNE" ("Size of the stack's screen
  19311. in lines (5)
  19312. " "" "81093" :RAM) "NEXTIRQ" ("Time at next Timer2 int. (13)
  19313. " "" "80058" :RAM) "NOALARMSRV" ("Flags Disable Alarm Service (1)
  19314. " "" "80EF4" :RAM) "NODECOUNT" ("expr-tree node count (3)
  19315. " "" "80FD4" :RAM) "NOTESCXT" ("->\"notes\" directory (5)
  19316. " "" "8073E" :RAM) "OBTREELEN" ("object length (3)
  19317. " "" "80FD7" :RAM) "OLDMENU" ("Saves previous menu number (2)
  19318. " "" "80FA9" :RAM) "ORghost" ("
  19319. " "" "80642" :RAM) "SAVE_OR" ("
  19320. " "" "80642" :RAM) "OSAVE" ("
  19321. " "" "80770" :RAM) "ObjectU1" ("->Updatable object 1
  19322. " "" "80E7D" :RAM) "ObjectU2" ("->Updatable object 2
  19323. " "" "80E82" :RAM) "ObjectU3" ("->Updatable object 3
  19324. " "" "80E87" :RAM) "ObjectU4" ("->Updatable object 4
  19325. " "" "80E8C" :RAM) "OBUPEND" ("->Updatable object 5
  19326. " "" "80E91" :RAM) "ObjectU5" ("->Updatable object 5
  19327. " "" "80E91" :RAM) "PADCOUNT" ("Indentation count for decomp (1)
  19328. " "" "80FAC" :RAM) "PADJSAVE1" ("Status save in PTRADJUST (1)
  19329. " "" "80FC1" :RAM) "PADJSAVE2" ("RSTK save in PTRADJUST (10)
  19330. " "" "80FC2" :RAM) "PAINTTREE" ("->hxs of \"textbook-mode\" graphics
  19331. " "" "807B6" :RAM) "PARENCOUNT" ("(2)
  19332. " "" "80FF6" :RAM) "PARENTTREE" ("(3)
  19333. " "" "80FE1" :RAM) "PASTDUE" ("Flags Past Due Alarm (1)
  19334. " "" "80EF2" :RAM) "PDCHXS" ("->hxs map of outermost symbolic
  19335. " "" "807AC" :RAM) "PFIFO" ("FIFO Buffer (16)
  19336. " "" "81016" :RAM) "PGMCXT" ("->programming dir (5)
  19337. " "" "80739" :RAM) "POPPEDKEY" ("Last Key from POPKEY (2)
  19338. " "" "8068B" :RAM) "PORT0EOS" ("(5)
  19339. " "" "80536" :RAM) "PORT1EOS" ("(5)
  19340. " "" "8053B" :RAM) "PORT2EOS" ("(5)
  19341. " "" "80540" :RAM) "PRECSTACK" ("Op Precedence textbook entry (7)
  19342. " "" "80FE4" :RAM) "Port1CRC" ("CRC for Device in Port1 (4)
  19343. " "" "800E2" :RAM) "PortStat" ("Copy of CARDSTAT Nib (1)
  19344. " "" "800E1" :RAM) "ProgMBox" ("->Program mailbox
  19345. " "" "8083D" :RAM) "PrtStatus" ("CPU Status Bits et al. (3)
  19346. " "" "81003" :RAM) "SYSNOUPSTART" ("->End of RAM
  19347. " "" "80E96" :RAM) "RAMEND" ("->End of RAM
  19348. " "" "80E96" :RAM) "RESRAMEND0" ("End of statically reserved RAM
  19349. " "" "8611C" :RAM) "RIGHTTREE" ("(3)
  19350. " "" "80FDE" :RAM) "RNSEED" ("Random number seed (15)
  19351. " "" "80EE1" :RAM) "ROMPARTS" ("->RomParts Area
  19352. " "" "80716" :RAM) "RealX" ("Real number used by plotter (21)
  19353. " "" "85F94" :RAM) "RealY" ("<REF>RealX
  19354. " "" "85FA9" :RAM) "ReplacePatte" ("->Replace pattern
  19355. " "" "80E78" :RAM) "ReviewKey" ("->Review-key definition
  19356. " "" "80815" :RAM) "SEMAPH" ("Saves control byte for IREG (2)
  19357. " "" "80652" :RAM) "STACKNUM" ("ref. number of 1st visible (5)
  19358. " "" "80F4E" :RAM) "STOPSIGN" ("(5)
  19359. " "" "80720" :RAM) "STRETCHCOUNT" ("(2)
  19360. " "" "80FF8" :RAM) "SWITCH" ("Used by the Memory Manager (15)
  19361. " "" "812B4" :RAM) "SW_ETime" ("Stopwatch Elapsed Time Ticks (13)
  19362. " "" "800D4" :RAM) "SW_Image" ("\"HH:MM:SS:ss\" Stopwatch (22)
  19363. " "" "800BE" :RAM) "T_LIGNE" ("Size of one line of text
  19364. " "" "812A0" :RAM) "SizeLine" ("Size of one line of text
  19365. " "" "812A0" :RAM) "StartTime" ("SelfTest Start Time (Ticks) (13)
  19366. " "" "80078" :RAM) "T1COUNT" ("Decremented by srvc_timer1 (1)
  19367. " "" "80FAB" :RAM) "TEMPENV" ("->LAM environments (5)
  19368. " "" "80702" :RAM) "TESTMSG" ("SelfTest Msg Buffer (44)
  19369. " "" "80092" :RAM) "TIMECRC" ("CRC CheckSum for NEXTIRQ (4)
  19370. " "" "80065" :RAM) "TIMEOUT" ("Time at scheduled timeout (13)
  19371. " "" "80069" :RAM) "TIMExmit" ("Time at scheduled timeout (13)
  19372. " "" "80069" :RAM) "TOPLINE" ("Editline-segment which appears
  19373. first on the screen (5)
  19374. " "" "80F53" :RAM) "TOUCHTAB" ("(5)
  19375. " "" "8070C" :RAM) "TYPE_HEADER" ("Type of header (5)
  19376. " "" "8109D" :RAM) "T_BLOC" ("Size of a HashCLE block (5)
  19377. " "" "8125A" :RAM) "WidthScreen" ("Width of the current screen in
  19378. nibbles (5)
  19379. " "" "812A5" :RAM) "T_LARGEUR" ("Width of the current screen in
  19380. nibbles (5)
  19381. " "" "812A5" :RAM) "Title" ("->Home Title
  19382. " "" "80842" :RAM) "TrackAct" ("->Action when CONTEXT changes
  19383. " "" "8081F" :RAM) "UserKeys" ("->User key assignments (5)
  19384. " "" "80725" :RAM) "VERIF_CARD" ("
  19385. " "" "812AF" :RAM) "VGERPTRCT" ("
  19386. " "" "0000C" :RAM) "VIEWLEVEL" ("stack element currently viewed (5)
  19387. " "" "80ED7" :RAM) "ViewMBox" ("->View mailbox
  19388. " "" "80838" :RAM) "WindowPtr" ("->Item at bottom of window
  19389. " "" "8084C" :RAM) "XmitSrcvTOut" ("XMIT/SRECV timeout (2)
  19390. " "" "80FFB" :RAM) "apletPTR" ("->current aplet (5)
  19391. " "" "80743" :RAM) "funcPTR" ("->current func instance (5)
  19392. " "" "80748" :RAM) "has_font_f_s" ("Tells if the Decompiler has found
  19393. a special font character (2)
  19394. " "" "86026" :RAM) "leeway" ("->hxs which will be GC'ed in a
  19395. very-low-memory condition
  19396. " "" "8078E" :RAM) "misc1_f_s" ("(5)
  19397. " "" "86028" :RAM) "misc2_f_s" ("(5)
  19398. " "" "8602D" :RAM) "misc3_f_s" ("(5)
  19399. " "" "86032" :RAM) "nb_line_f_s" ("Number of line created during
  19400. decompilation (FSTR3) (5)
  19401. " "" "86021" :RAM) "otherPTR" ("->current \"other\" instance (5)
  19402. " "" "80766" :RAM) "paramPTR" ("->current param instance (5)
  19403. " "" "80752" :RAM) "polarPTR" ("->current polar instance (5)
  19404. " "" "8074D" :RAM) "seqPTR" ("->current sequence instance (5)
  19405. " "" "80757" :RAM) "solvePTR" ("->current solve instance (5)
  19406. " "" "80761" :RAM) "statPTR" ("->current stat instance (5)
  19407. " "" "8075C" :RAM) "^algunwrap" ("
  19408. " "" "00F004") "^laDELROW" ("
  19409. " "" "06C003") "^laGPROW" ("
  19410. " "" "06E003") "^laINSROW" ("
  19411. " "" "06D003") "laMGET0" ("
  19412. " "" "2F205") "x<STRUCT" ("
  19413. " "" "38D83") "xCMDAPPLY" ("
  19414. " "" "3F11C") "xDER" ("
  19415. " "" "3D258") "xEVAL>" ("
  19416. " "" "38C2C") "xFCNAPPLY" ("
  19417. " "" "3D81D") "xINTEGRAL" ("
  19418. " "" "3D47E") "xNOEVAL>" ("
  19419. " "" "38D2F") "xSTRUCT->" ("
  19420. " "" "38D94") "xSTRUCT>" ("
  19421. " "" "38D72") "xWHERE" ("
  19422. " "" "3D605") "xssgeneral" ("
  19423. " "" "2F390") "!#1+IF<dim-1" ("
  19424. " "" "2F315") "!#1-IF>0" ("
  19425. " "" "2F316") "!MATTRNnc" ("
  19426. " "" "263D2") "!REDIMTEMP" ("
  19427. " "" "25F68") "!REDIMUSER" ("
  19428. " "" "25F63") "1/X15" ("
  19429. " "" "31568") ">LASTRAM-WORD" ("
  19430. " "" "37C06") "?ACCPTR>" ("
  19431. " "" "25F9F") "ACCESSERAM1" ("
  19432. " "" "26C37" :ML) "ACCESSERAM2" ("
  19433. " "" "26C3E" :ML) "ACCESSID1" ("
  19434. " "" "26B81" :ML) "ACCESSID2" ("
  19435. " "" "26B88" :ML) "ACCESSID3" ("
  19436. " "" "26B8F" :ML) "ACCESSID4" ("
  19437. " "" "26B96" :ML) "ACCESSID5" ("
  19438. " "" "26B9D" :ML) "ACCESSID6" ("
  19439. " "" "26BA4" :ML) "ACCESSID7" ("
  19440. " "" "26BAB" :ML) "ACCESSIDn" ("
  19441. " "" "26C29" :ML) "ACCESSRAM0" ("
  19442. " "" "26C30" :ML) "ADDF" ("
  19443. " "" "315BB") "addrADISP" ("
  19444. " "" "26CD8" :ML) "addrATTNFLG" ("
  19445. " "" "26CDF" :ML) "addrClkOnNib" ("
  19446. " "" "2B7CC") "addrKEYSTATE" ("
  19447. " "" "00A0E") "addrLINECNTg" ("
  19448. " "" "26CE6" :ML) "addrORghost" ("
  19449. " "" "01661") "addrTEMPENV" ("
  19450. " "" "04E66") "addrTEMPTOP" ("
  19451. " "" "2ACA9") "addrVDISP" ("
  19452. " "" "26CED" :ML) "addrVDISP2" ("
  19453. " "" "26CF4" :ML) "addtics" ("
  19454. " "" "2619D") "AdjEdModes" ("
  19455. " "" "2F179") "adrDISABLE_K" ("
  19456. " "" "047CF") "adrKEYBUFFER" ("
  19457. " "" "047DD") "adrTIMEOUTCLK" ("
  19458. " "" "26CFB" :ML) "AFFICHE.REG" ("
  19459. " "" "2680F" :ML) "AFFICHE.SBR" ("
  19460. " "" "26816" :ML) "AFFICHEPIX.SBR" ("
  19461. " "" "2681D" :ML) "aH>HMS" ("
  19462. " "" "31123") "ALARMxcp" ("
  19463. " "" "25E7A") "ALGeq?" ("
  19464. " "" "25E7B") "allkeys" ("
  19465. " "" "000FF") "aMODF" ("
  19466. " "" "31066") "APPprompt1!" ("
  19467. " "" "2EEEE") "APPprompt2" ("
  19468. " "" "2F17A") "^Arbo" ("
  19469. " "" "068004") "ATTNxcp" ("
  19470. " "" "25E7D") "BITMAP" ("
  19471. " "" "2676E" :ML) "BUILDKPACKET" ("
  19472. " "" "2F31E") "CASEVAL" ("
  19473. " "" "2AA70") "^ChangeFocus" ("
  19474. " "" "0BE002") "ChkGrHook" ("
  19475. " "" "26D10" :UBS) "CkEQUtil" ("
  19476. " "" "2BF1C") "CkSecoType" ("
  19477. " "" "2A7A7") "CleanVirtualStack" ("
  19478. " "" "2684E" :ML) "CLKADJ*" ("
  19479. " "" "2F153") "ClrDouseAlm" ("
  19480. " "" "2EF68") "CLRFRC" ("
  19481. " "" "319C1") "clrtimeout" ("
  19482. " "" "26736" :ML) "COLAthexFCN" ("
  19483. " "" "2BAB3") "Coldstart" ("
  19484. " "" "26775" :ML) "COMPCONFCRC" ("
  19485. " "" "266BF" :ML) "ComputePixel" ("
  19486. " "" "26AEE" :ML) "convertbase" ("
  19487. " "" "2F327") "COPYVAR" ("
  19488. " "" "2C393") "corner" ("
  19489. " "" "2673D" :ML) "CRUNCHNoBlame" ("
  19490. " "" "25EA3") "CtlAlarm!" ("
  19491. " "" "2597B") "CtlAlarm@" ("
  19492. " "" "25980") "CtlAlarm0" ("
  19493. " "" "25971" :UBS) "CtlAlarm0?" ("
  19494. " "" "25976" :UBS) "CURRENTMARK?" ("
  19495. " "" "2EEFE") "CURSOR+" ("
  19496. " "" "2658A") "D0=ALoop" ("
  19497. " "" "26A31" :ML) "DA2bTemp?" ("
  19498. " "" "2EEA6") "DaDGNTc" ("
  19499. " "" "29EE9") "DAY#" ("
  19500. " "" "2DEBB") "Day>Date" ("
  19501. " "" "2DD27") "^DEB.MATRIX" ("
  19502. " "" "00C007") "^DEB.MATRIXTYPE" ("
  19503. " "" "00D007") "delimcase" ("
  19504. " "" "29D6A") "derprod1" ("
  19505. " "" "2C0ED") "derquot" ("
  19506. " "" "2C0A7") "^DIMS" ("
  19507. " "" "004007") "DispVarsUtil" ("
  19508. " "" "25EBD") "DISP_LINE" ("
  19509. " "" "25F16") "DIV2" ("
  19510. " "" "31994") "DoCAlarmKey" ("
  19511. " "" "25EC0") "^DoKeyCancel" ("
  19512. " "" "0AF002") "^DoKeyEdit" ("
  19513. " "" "0B5002") "^DoKeyOK" ("
  19514. " "" "0B4002") "^DoMKeyOK" ("
  19515. " "" "0AE002") "DoPlotMenu" ("
  19516. " "" "25ECA") "DOPRLCD" ("
  19517. " "" "2EECC") "dowutil" ("
  19518. " "" "2DE4A" :ML) "drax" ("
  19519. " "" "2F32D") "DropSysErr$" ("
  19520. " "" "2F32F") "DropSysObs" ("
  19521. " "" "26062") "DupAndThen" ("
  19522. " "" "37258") "DZP" ("
  19523. " "" "00003") "easyabs" ("
  19524. " "" "2C121") "Echo2Macros" ("
  19525. " "" "25ED1") "ECUSER" ("
  19526. " "" "039EF") "EDITF" ("
  19527. " "" "2F1A9") "EDITPARTS" ("
  19528. " "" "2EEEC") "EQCURSOR?" ("
  19529. " "" "2F332") "ErrorHandled?" ("
  19530. " "" "2F1A1") "EVALCRUNCH" ("
  19531. " "" "25ED0") "EvalParsed" ("
  19532. " "" "2EF69") "ExitFcn" ("
  19533. " "" "27C33") "Extobcode" ("
  19534. " "" "2F334") "FcnUtilEnd" ("
  19535. " "" "2F335") "FindInDir" ("
  19536. " "" "26C5A" :ML) "FixRRP" ("
  19537. " "" "2F337") "FLOAT" ("
  19538. " "" "2DCB5") "GET.FONT" ("
  19539. " "" "26878" :ML) "GETAB0" ("
  19540. " "" "314E4") "GETAB1" ("
  19541. " "" "314CA") "GetBankAccess" ("
  19542. " "" "26BB2" :ML) "getBPOFF" ("
  19543. " "" "2DDD5") "GETCD0" ("
  19544. " "" "31518") "^GetFieldVals" ("
  19545. " "" "0BB002") "GetLastEdit" ("
  19546. " "" "2EF6D") "GETRHS" ("
  19547. " "" "2F108") "GetTimChk" ("
  19548. " "" "267B4" :ML) "GetTime++" ("
  19549. " "" "267BB" :ML) "GETX.VISIBLE" ("
  19550. " "" "268DA" :ML) "GETX.VISIBLE.STR" ("
  19551. " "" "268E1" :ML) "GET_@TAB" ("
  19552. " "" "26886" :ML) "GET_ATTRIBN.REAL" ("
  19553. " "" "2688D" :ML) "GET_NBLIGNE" ("
  19554. " "" "268BE" :ML) "GET_NBLIGNESTK" ("
  19555. " "" "268C5" :ML) "~gFldVal" ("
  19556. " "" "0C80B0") "GraphicExit" ("
  19557. " "" "2F341") "GsstFIN" ("
  19558. " "" "2608A") "HISTON?" ("
  19559. " "" "25636") "HISTON" ("
  19560. " "" "2563B" :UBS) "^IFEDispField" ("
  19561. " "" "0BC002") "^IfTet" ("
  19562. " "" "04B004") "InitEnab" ("
  19563. " "" "092DB") "InitSysUI" ("
  19564. " "" "2F075") "INIT_AFFICHELIGNE" ("
  19565. " "" "268F6" :ML) "INIT_AFFICHELIGNENORM" ("
  19566. " "" "268FD" :ML) "InverseParcelle" ("
  19567. " "" "26912" :ML) "IOC" ("
  19568. " "" "00110") "IRAM@" ("
  19569. " "" "0011F") "IRC" ("
  19570. " "" "0011A") "^KeyLookup" ("
  19571. " "" "04E004") "Keyword?" ("
  19572. " "" "25F2A") "LASTPT?" ("
  19573. " "" "2F351") "lbrac" ("
  19574. " "" "33A5D" :UBS) "Lift" ("
  19575. " "" "2F21C") "LINECHANGE" ("
  19576. " "" "2F353") "List" ("
  19577. " "" "2F354") "Loop" ("
  19578. " "" "05149") "MACRODCMP" ("
  19579. " "" "35AE2") "MATATLOOP" ("
  19580. " "" "2639B") "matchob?Lp" ("
  19581. " "" "376C1") "~MESRclEqn" ("
  19582. " "" "0120E4") "MiniFontCmd?" ("
  19583. " "" "26943" :ML) "MiniFontStk?" ("
  19584. " "" "2694A" :ML) "mpop1%" ("
  19585. " "" "2DE26") "nCOLCTQUOTE" ("
  19586. " "" "2C2CB") "need'case" ("
  19587. " "" "2AC72") "NEWACCESSRAM" ("
  19588. " "" "26C45" :ML) "newBASE" ("
  19589. " "" "2F357") "NEWINDEP" ("
  19590. " "" "2F0D5") "NEWMARK" ("
  19591. " "" "2F358") "nextpos" ("
  19592. " "" "37702") "NEXTRRPOB" ("
  19593. " "" "2F359") "NEXTSTEP" ("
  19594. " "" "2F35A") "nextsym'R" ("
  19595. " "" "26201") "ngsizecase" ("
  19596. " "" "29E29") "NoIgnoreAlm" ("
  19597. " "" "257E2") "norecCSseq" ("
  19598. " "" "267FA" :ML) "NUMSOLVE" ("
  19599. " "" "2F35B") "nWHEREDER" ("
  19600. " "" "2C044") "nWHEREIFTE" ("
  19601. " "" "2C039") "nWHEREINTG" ("
  19602. " "" "2C04F") "nWHERESUM" ("
  19603. " "" "2C05A") "nWHEREWHERE" ("
  19604. " "" "2C065") "OB>BAKcode" ("
  19605. " "" "2F35C") "OngoingText?" ("
  19606. " "" "2F19B") "OUTCINRTN" ("
  19607. " "" "0020F") "OverWrF/TLp" ("
  19608. " "" "351FA") "PALPTRDCMP" ("
  19609. " "" "35B46") "~PCunpack" ("
  19610. " "" "02E0E7") "POLErrorTrap" ("
  19611. " "" "2B682") "preFACT" ("
  19612. " "" "3ABFD") "PREMARKON" ("
  19613. " "" "2F360") "PRLG" ("
  19614. " "" "028FC") "PtoR" ("
  19615. " "" "2F363") "PTYPE>PINFO" ("
  19616. " "" "2C37D") "PUTAB0" ("
  19617. " "" "31532") "RBR" ("
  19618. " "" "00114") "RCKBp" ("
  19619. " "" "267D0" :ML) "RclCompareNames" ("
  19620. " "" "26C4C" :ML) "RCL_NB_AFF_LGN" ("
  19621. " "" "26274") "RCL_NB_AFF_LGNSTK" ("
  19622. " "" "26279") "RCS" ("
  19623. " "" "00111") "realPAcode" ("
  19624. " "" "25F6D") "RECORDX&YC%" ("
  19625. " "" "2F369") "^RENAME" ("
  19626. " "" "069004") "REPLACE_MODE" ("
  19627. " "" "2579A") "RNDC[B]" ("
  19628. " "" "313D3") "Rom-Word?" ("
  19629. " "" "34FE6") "rpnXROOT" ("
  19630. " "" "3A200") "SAFESKIPOB" ("
  19631. " "" "26713" :ML) "sALLOWINTR" ("
  19632. " "" "0000F") "SAVELAM" ("
  19633. " "" "34D51") "SavPtrTime*" ("
  19634. " "" "267D7" :ML) "sBEG" ("
  19635. " "" "00008") "sBPOFF" ("
  19636. " "" "00004") "SCAN.FONTE" ("
  19637. " "" "26966" :ML) "ScanEveryObjects" ("
  19638. " "" "26C61" :ML) "SET" ("
  19639. " "" "07661") "SetBadPOLUI" ("
  19640. " "" "25683") "setflag" ("
  19641. " "" "26752" :ML) "SetISysFlag" ("
  19642. " "" "2671A" :ML) "SETLOOPENV" ("
  19643. " "" "2F37C") "SETROMPART" ("
  19644. " "" "2F25D") "settimeout" ("
  19645. " "" "26759" :ML) "SET_HEADER" ("
  19646. " "" "2697B" :ML) "~sFldVal" ("
  19647. " "" "0D80B0") "Shrink$Any" ("
  19648. " "" "26982" :ML) "Shrink$AnySafe" ("
  19649. " "" "26989" :ML) "Shrink$List" ("
  19650. " "" "26A4D" :ML) "SimplifyExpression" ("
  19651. " "" "2AAE0") "SLEEPxcp" ("
  19652. " "" "25EFA") "sFLUSH" ("
  19653. " "" "00002") "sNEGATE" ("
  19654. " "" "00002") "SPLITWHERE" ("
  19655. " "" "2C2D6") "SQRF" ("
  19656. " "" "317EE") "srvc_timer2" ("
  19657. " "" "26801" :ML) "stackitw" ("
  19658. " "" "261B1") "StartupProc" ("
  19659. " "" "2B74F") "STOAPPLDATA" ("
  19660. " "" "2F066") "STOFONT" ("
  19661. " "" "26997" :ML) "STOMINIFONT" ("
  19662. " "" "2699E" :ML) "STO_ML_DISP_SIZE" ("
  19663. " "" "2628D") "Stretch$Any" ("
  19664. " "" "269A5" :ML) "sTRUNC" ("
  19665. " "" "00001") "subpdcdptch" ("
  19666. " "" "261B6") "symbn" ("
  19667. " "" "2EFEC") "SYMBNUMSOLVE" ("
  19668. " "" "2EED9") "SysErrorTrap" ("
  19669. " "" "2EE5E") "SysErrorTrapAction" ("
  19670. " "" "2F1A3") "SysErrorTrapConfirm" ("
  19671. " "" "2EE5F") "SysPtr@" ("
  19672. " "" "08D66" :ML) "SystemLevel?" ("
  19673. " "" "26157") "TBR" ("
  19674. " "" "00116") "TCS" ("
  19675. " "" "00112") "TIMEOUT?" ("
  19676. " "" "26161") "TIMERCTRL.1" ("
  19677. " "" "0012E") "TIMERCTRL.2" ("
  19678. " "" "0012F") "TogInsertKey" ("
  19679. " "" "25F2D") "TST15" ("
  19680. " "" "3125D") "TurnOffKey" ("
  19681. " "" "25F05") "~UTTYPEEXT0?" ("
  19682. " "" "02F0E7") "~UTVUNS1Arg" ("
  19683. " "" "0110E7") "ValidPortTag?" ("
  19684. " "" "26C6F" :ML) "VLM" ("
  19685. " "" "25F0A") "WaitTbz0" ("
  19686. " "" "2A4FC") "norecPWLseq" ("
  19687. " "" "267E5" :ML) "Warmstart" ("
  19688. " "" "267E5" :ML) "WindowXY" ("
  19689. " "" "26728" :ML) "Y<=X" ("
  19690. " "" "31219") "ZoomX" ("
  19691. " "" "255A6") "ZoomY" ("
  19692. " "" "255AB") "{}>DIR" ("
  19693. " "" "2F317")))