1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143514451455146514751485149515051515152515351545155515651575158515951605161516251635164516551665167516851695170517151725173517451755176517751785179518051815182518351845185518651875188518951905191519251935194519551965197519851995200520152025203520452055206520752085209521052115212521352145215521652175218521952205221522252235224522552265227522852295230523152325233523452355236523752385239524052415242524352445245524652475248524952505251525252535254525552565257525852595260526152625263526452655266526752685269527052715272527352745275527652775278527952805281528252835284528552865287528852895290529152925293529452955296529752985299530053015302530353045305530653075308530953105311531253135314531553165317531853195320532153225323532453255326532753285329533053315332533353345335533653375338533953405341534253435344534553465347534853495350535153525353535453555356535753585359536053615362536353645365536653675368536953705371537253735374537553765377537853795380538153825383538453855386538753885389539053915392539353945395539653975398539954005401540254035404540554065407540854095410541154125413541454155416541754185419542054215422542354245425542654275428542954305431543254335434543554365437543854395440544154425443544454455446544754485449545054515452545354545455545654575458545954605461546254635464546554665467546854695470547154725473547454755476547754785479548054815482548354845485548654875488548954905491549254935494549554965497549854995500550155025503550455055506550755085509551055115512551355145515551655175518551955205521552255235524552555265527552855295530553155325533553455355536553755385539554055415542554355445545554655475548554955505551555255535554555555565557555855595560556155625563556455655566556755685569557055715572557355745575557655775578557955805581558255835584558555865587558855895590559155925593559455955596559755985599560056015602560356045605560656075608560956105611561256135614561556165617561856195620562156225623562456255626562756285629563056315632563356345635563656375638563956405641564256435644564556465647564856495650565156525653565456555656565756585659566056615662566356645665566656675668566956705671567256735674567556765677567856795680568156825683568456855686568756885689569056915692569356945695569656975698569957005701570257035704570557065707570857095710 |
- #s(hash-table size 5541 test equal rehash-size 1.5 rehash-threshold 0.8 data ("any" ("0d 0h" "" "03FEF") "ZERO" ("0d 0h" "" "03FEF") "BINT0" ("0d 0h" "" "03FEF") "MEMERR" ("1d 1h" "" "03FF9") "real" ("1d 1h" "" "03FF9") "ONE" ("1d 1h" "" "03FF9") "BINT1" ("1d 1h" "" "03FF9") "cmp" ("2d 2h" "" "04003") "TWO" ("2d 2h" "" "04003") "BINT2" ("2d 2h" "" "04003") "str" ("3d 3h" "" "0400D") "THREE" ("3d 3h" "" "0400D") "BINT3" ("3d 3h" "" "0400D") "arry" ("4d 4h" "" "04017") "FOUR" ("4d 4h" "" "04017") "BINT4" ("4d 4h" "" "04017") "list" ("5d 5h" "" "04021") "FIVE" ("5d 5h" "" "04021") "BINT5" ("5d 5h" "" "04021") "idnt" ("6d 6h" "" "0402B") "id" ("6d 6h" "" "0402B") "SIX" ("6d 6h" "" "0402B") "BINT6" ("6d 6h" "" "0402B") "lam" ("7d 7h" "" "04035") "SEVEN" ("7d 7h" "" "04035") "BINT7" ("7d 7h" "" "04035") "seco" ("8d 8h" "" "0403F") "EIGHT" ("8d 8h" "" "0403F") "BINT8" ("8d 8h" "" "0403F") "symb" ("9d 9h" "" "04049") "NINE" ("9d 9h" "" "04049") "BINT9" ("9d 9h" "" "04049") "sym" ("10d Ah" "" "04053") "TEN" ("10d Ah" "" "04053") "BINT10" ("10d Ah" "" "04053") "hxs" ("11d Bh" "" "0405D") "ELEVEN" ("11d Bh" "" "0405D") "BINT11" ("11d Bh" "" "0405D") "grob" ("12d Ch" "" "04067") "TWELVE" ("12d Ch" "" "04067") "BINT12" ("12d Ch" "" "04067") "THIRTEEN" ("13d Dh" "" "04071") "TAGGED" ("13d Dh" "" "04071") "BINT13" ("13d Dh" "" "04071") "unitob" ("14d Eh" "" "0407B") "FOURTEEN" ("14d Eh" "" "0407B") "EXT" ("14d Eh" "" "0407B") "BINT14" ("14d Eh" "" "0407B") "rompointer" ("15d Fh" "" "04085") "FIFTEEN" ("15d Fh" "" "04085") "BINT15" ("15d Fh" "" "04085") "SIXTEEN" ("16d 10h" "" "0408F") "REALOB" ("16d 10h" "" "0408F") "BINT16" ("16d 10h" "" "0408F") "REALREAL" ("17d 11h" "" "04099") "2REAL" ("17d 11h" "" "04099") "SEVENTEEN" ("17d 11h" "" "04099") "BINT17" ("17d 11h" "" "04099") "EIGHTEEN" ("18d 12h" "" "040A3") "BINT18" ("18d 12h" "" "040A3") "NINETEEN" ("19d 13h" "" "040AD") "BINT19" ("19d 13h" "" "040AD") "TWENTY" ("20d 14h" "" "040B7") "BINT20" ("20d 14h" "" "040B7") "TWENTYONE" ("21d 15h" "" "040C1") "BINT21" ("21d 15h" "" "040C1") "TWENTYTWO" ("22d 16h" "" "040CB") "BINT22" ("22d 16h" "" "040CB") "TWENTYTHREE" ("23d 17h" "" "040D5") "BINT23" ("23d 17h" "" "040D5") "TWENTYFOUR" ("24d 18h" "" "040DF") "BINT24" ("24d 18h" "" "040DF") "TWENTYFIVE" ("25d 19h" "" "040E9") "BINT25" ("25d 19h" "" "040E9") "TWENTYSIX" ("26d 1Ah" "" "040F3") "REALSYM" ("26d 1Ah" "" "040F3") "BINT26" ("26d 1Ah" "" "040F3") "TWENTYSEVEN" ("27d 1Bh" "" "040FD") "BINT27" ("27d 1Bh" "" "040FD") "TWENTYEIGHT" ("28d 1Ch" "" "04107") "BINT28" ("28d 1Ch" "" "04107") "TWENTYNINE" ("29d 1Dh" "" "04111") "BINT29" ("29d 1Dh" "" "04111") "THIRTY" ("30d 1Eh" "" "0411B") "REALEXT" ("30d 1Eh" "" "0411B") "BINT30" ("30d 1Eh" "" "0411B") "THIRTYONE" ("31d 1Fh" "" "04125") "BINT31" ("31d 1Fh" "" "04125") "THIRTYTWO" ("32d 20h" "" "0412F") "BINT32" ("32d 20h" "" "0412F") "THIRTYTHREE" ("33d 21h" "" "04139") "BINT33" ("33d 21h" "" "04139") "THIRTYFOUR" ("34d 22h" "" "04143") "BINT34" ("34d 22h" "" "04143") "THIRTYFIVE" ("35d 23h" "" "0414D") "BINT35" ("35d 23h" "" "0414D") "THIRTYSIX" ("36d 24h" "" "04157") "BINT36" ("36d 24h" "" "04157") "THIRTYSEVEN" ("37d 25h" "" "04161") "BINT37" ("37d 25h" "" "04161") "THIRTYEIGHT" ("38d 26h" "" "0416B") "BINT38" ("38d 26h" "" "0416B") "THIRTYNINE" ("39d 27h" "" "04175") "BINT39" ("39d 27h" "" "04175") "FOURTY" ("40d 28h" "" "0417F") "FORTY" ("40d 28h" "" "0417F") "BINT40" ("40d 28h" "" "0417F") "FORTYONE" ("41d 29h" "" "04189") "BINT41" ("41d 29h" "" "04189") "FORTYTWO" ("42d 2Ah" "" "04193") "BINT42" ("42d 2Ah" "" "04193") "FORTYTHREE" ("43d 2Bh" "" "0419D") "BINT43" ("43d 2Bh" "" "0419D") "(illnameerr)" ("44d 2Ch" "" "64B12") "FORTYFOUR" ("44d 2Ch" "" "64B12") "BINT44" ("44d 2Ch" "" "64B12") "FORTYFIVE" ("45d 2Dh" "" "64B1C") "BINT45" ("45d 2Dh" "" "64B1C") "FORTYSIX" ("46d 2Eh" "" "64B26") "BINT46" ("46d 2Eh" "" "64B26") "(rrp)" ("47d 2Fh" "" "64B30") "FORTYSEVEN" ("47d 2Fh" "" "64B30") "BINT47" ("47d 2Fh" "" "64B30") "FORTYEIGHT" ("48d 30h" "" "64B3A") "BINT48" ("48d 30h" "" "64B3A") "FORTYNINE" ("49d 31h" "" "64B44") "BINT49" ("49d 31h" "" "64B44") "FIFTY" ("50d 32h" "" "64B4E") "BINT50" ("50d 32h" "" "64B4E") "FIFTYONE" ("51d 33h" "" "64B58") "BINT51" ("51d 33h" "" "64B58") "(THREEFOUR)" ("52d 34h" "" "64B62") "FIFTYTWO" ("52d 34h" "" "64B62") "BINT52" ("52d 34h" "" "64B62") "THREEFIVE" ("53d 35h" "" "64B6C") "STRLIST" ("53d 35h" "" "64B6C") "FIFTYTHREE" ("53d 35h" "" "64B6C") "BINT53" ("53d 35h" "" "64B6C") "FIFTYFOUR" ("54d 36h" "" "64B76") "BINT54" ("54d 36h" "" "64B76") "FIFTYFIVE" ("55d 37h" "" "64B80") "(#THREESEVEN)" ("55d 37h" "" "64B80") "BINT55" ("55d 37h" "" "64B80") "FIFTYSIX" ("56d 38h" "" "64B8A") "BINT56" ("56d 38h" "" "64B8A") "FIFTYSEVEN" ("57d 39h" "" "64B94") "BINT57" ("57d 39h" "" "64B94") "FIFTYEIGHT" ("58d 3Ah" "" "64B9E") "BINT58" ("58d 3Ah" "" "64B9E") "FIFTYNINE" ("59d 3Bh" "" "64BA8") "BINT59" ("59d 3Bh" "" "64BA8") "SIXTY" ("60d 3Ch" "" "64BB2") "BINT60" ("60d 3Ch" "" "64BB2") "SIXTYONE" ("61d 3Dh" "" "64BBC") "BINT61" ("61d 3Dh" "" "64BBC") "SIXTYTWO" ("62d 3Eh" "" "64BC6") "BINT62" ("62d 3Eh" "" "64BC6") "SIXTYTHREE" ("63d 3Fh" "" "64BD0") "(BINT3Fh)" ("63d 3Fh" "" "64BD0") "BINT63" ("63d 3Fh" "" "64BD0") "YHI" ("64d 40h" "" "64BDA") "SIXTYFOUR" ("64d 40h" "" "64BDA") "(BINT_40h)" ("64d 40h" "" "64BDA") "BINT40h" ("64d 40h" "" "64BDA") "BINT64" ("64d 40h" "" "64BDA") "(BINT_65d)" ("65d 41h" "" "64BE4") "ARRYREAL" ("65d 41h" "" "64BE4") "BINT65" ("65d 41h" "" "64BE4") "(ARRYCMP)" ("66d 42h" "" "64BEE") "FOURTWO" ("66d 42h" "" "64BEE") "BINT66" ("66d 42h" "" "64BEE") "FOURTHREE" ("67d 43h" "" "64BF8") "BINT67" ("67d 43h" "" "64BF8") "SIXTYEIGHT" ("68d 44h" "" "64C02") "(2ARRY)" ("68d 44h" "" "64C02") "BINT68" ("68d 44h" "" "64C02") "FOURFIVE" ("69d 45h" "" "64C0C") "BINT69" ("69d 45h" "" "64C0C") "(ARRYID)" ("70d 46h" "" "64C16") "SEVENTY" ("70d 46h" "" "64C16") "BINT70" ("70d 46h" "" "64C16") "SEVENTYFOUR" ("74d 4Ah" "" "64C20") "BINT74" ("74d 4Ah" "" "64C20") "SEVENTYNINE" ("79d 4Fh" "" "64C2A") "BINT79" ("79d 4Fh" "" "64C2A") "(LISTOB)" ("80d 50h" "" "64C3A") "EIGHTY" ("80d 50h" "" "64C3A") "BINT80" ("80d 50h" "" "64C3A") "LISTREAL" ("81d 51h" "" "64C3E") "EIGHTYONE" ("81d 51h" "" "64C3E") "BINT81" ("81d 51h" "" "64C3E") "LISTCMP" ("82d 52h" "" "64C48") "BINT82" ("82d 52h" "" "64C48") "FIVETHREE" ("83d 53h" "" "64C52") "BINT83" ("83d 53h" "" "64C52") "FIVEFOUR" ("84d 54h" "" "64C5C") "BINT84" ("84d 54h" "" "64C5C") "2LIST" ("85d 55h" "" "64C66") "BINT85" ("85d 55h" "" "64C66") "(LISTID)" ("86d 56h" "" "64C70") "FIVESIX" ("86d 56h" "" "64C70") "BINT86" ("86d 56h" "" "64C70") "LISTLAM" ("87d 57h" "" "64C7A") "BINT87" ("87d 57h" "" "64C7A") "BINT_91d" ("91d 5Bh" "" "64C84") "BINT91" ("91d 5Bh" "" "64C84") "(idntany)" ("96d 60h" "" "64C8E") "BINT_96d" ("96d 60h" "" "64C8E") "BINT96" ("96d 60h" "" "64C8E") "IDREAL" ("97d 61h" "" "64C98") "BINT97" ("97d 61h" "" "64C98") "(NINETYEIGHT)" ("98d 62h" "" "64CA2" :UBS) "(IDCMP)" ("98d 62h" "" "64CA2" :UBS) "BINT98" ("98d 62h" "" "64CA2" :UBS) "(IDARRY)" ("100d 64h" "" "64CAC") "ONEHUNDRED" ("100d 64h" "" "64CAC") "BINT100" ("100d 64h" "" "64CAC") "(SIXFIVE)" ("101d 65h" "" "64CB6" :UBS) "(IDLIST)" ("101d 65h" "" "64CB6" :UBS) "BINT101" ("101d 65h" "" "64CB6" :UBS) "char" ("111d 6Fh" "" "64CC0") "BINT111" ("111d 6Fh" "" "64CC0") "(lamany)" ("112d 70h" "" "64CCA" :UBS) "BINT112" ("112d 70h" "" "64CCA" :UBS) "(LAMREAL)" ("113d 71h" "" "64CD4" :UBS) "BINT113" ("113d 71h" "" "64CD4" :UBS) "(BINT_114d)" ("114d 72h" "" "64CDE" :UBS) "BINT114" ("114d 72h" "" "64CDE" :UBS) "BINT_115d" ("115d 73h" "" "64CE8") "BINT115" ("115d 73h" "" "64CE8") "BINT_116d" ("116d 74h" "" "64CF2") "BINT116" ("116d 74h" "" "64CF2") "(LAMLIST)" ("117d 75h" "" "64CFC" :UBS) "(BINT_117d)" ("117d 75h" "" "64CFC" :UBS) "BINT117" ("117d 75h" "" "64CFC" :UBS) "BINT_122d" ("122d 7Ah" "" "64D06") "BINT122" ("122d 7Ah" "" "64D06") "BINT80h" ("128d 80h" "" "64D10") "BINT128" ("128d 80h" "" "64D10") "XHI-1" ("130d 82h" "" "64D1A") "BINT_130d" ("130d 82h" "" "64D1A") "BINT130d" ("130d 82h" "" "64D1A") "BINT130" ("130d 82h" "" "64D1A") "XHI" ("131d 83h" "" "64D24") "BINT131d" ("131d 83h" "" "64D24") "BINT_131d" ("131d 83h" "" "64D24") "BINT131" ("131d 83h" "" "64D24") "(library)" ("143d 8Fh" "" "64D2E" :UBS) "#8F" ("143d 8Fh" "" "64D2E" :UBS) "SYMBREAL" ("145d 91h" "" "64D38") "(SYMBCMP)" ("146d 92h" "" "64D42" :UBS) "SYMBCMP" ("146d 92h" "" "64D42" :UBS) "(SYMBSYM)" ("154d 9Ah" "" "64D4C" :UBS) "(SYMCMP)" ("154d 9Ah" "" "64D4C" :UBS) "SYMBSYM" ("154d 9Ah" "" "64D4C" :UBS) "SYMBUNIT" ("158d 9Eh" "" "64D56") "backup" ("159d 9Fh" "" "64D60" :UBS) "SYMOB" ("160d A0h" "" "64D6A") "SYMREAL" ("161d A1h" "" "64D74") "SYMLIST" ("165d A5h" "" "64D88" :UBS) "SYMID" ("166d A6h" "" "64D92") "SYMLAM" ("167d A7h" "" "64D9C") "SYMSYMB" ("169d A9h" "" "64DA6" :UBS) "SYMSYM" ("170d AAh" "" "64DB0") "SYMEXT" ("174d AEh" "" "64DBA") "BINT_AFh" ("175d AFh" "" "1CD69" :U) "HXSREAL" ("177d B1h" "" "64DC4" :U) "2HXS" ("187d BBh" "" "64DCE" :UBS) "BINTC0h" ("192d C0h" "" "64DD8") "2GROB" ("204d CCh" "" "64DE2") "TAGGEDANY" ("208d D0h" "" "64DEC") "EXTREAL" ("225d E1h" "" "64DF6") "(UNITSYM)" ("234d EAh" "" "64E00") "EXTSYM" ("234d EAh" "" "64E00") "2EXT" ("238d EEh" "" "64E0A") "ROMPANY" ("240d F0h" "" "64E14") "BINT253" ("253d FDh" "" "64E1E") "BINT255d" ("255d FFh" "" "64E28") "(FSTFLOATROM#)" ("256d 100h" "" "64E32") "REALOBOB" ("256d 100h" "" "64E32") "(Err#Chr00)" ("258d 102h" "" "64E3C") "(#_258_d)" ("258d 102h" "" "64E3C") "#_102" ("258d 102h" "" "64E3C") "#SyntaxErr" ("262d 106h" "" "64E46" :UBS) "BINT_263d" ("263d 107h" "" "64E50" :UBS) "REALREALOB" ("272d 110h" "" "64E5A" :UBS) "3REAL" ("273d 111h" "" "64E64") "BINT_117h" ("279d 117h" "" "15D6F" :U) "(#_291_d)" ("291d 123h" "" "64E6E" :UBS) "(#_123)" ("291d 123h" "" "64E6E" :UBS) "Err#Kill" ("291d 123h" "" "64E6E" :UBS) "(#_292_d)" ("292d 124h" "" "64E78" :UBS) "(#_124)" ("292d 124h" "" "64E78" :UBS) "Err#NoLstStk" ("292d 124h" "" "64E78" :UBS) "(BINT_305d)" ("305d 131h" "" "64E82" :UBS) "#NoRoomForSt" ("305d 131h" "" "64E82" :UBS) "#132" ("306d 132h" "" "64E8C" :UBS) "REALSTRSTR" ("307d 133h" "" "64E96" :UBS) "(VLMpurgemsg)" ("308d 134h" "" "64EA0" :UBS) "#134" ("308d 134h" "" "64EA0" :UBS) "(VLMmsg)" ("309d 135h" "" "64EAA" :UBS) "#135" ("309d 135h" "" "64EAA" :UBS) "(VLMstkmsg)" ("310d 136h" "" "64EB4" :UBS) "(REALSTRID)" ("310d 136h" "" "64EB4" :UBS) "#136" ("310d 136h" "" "64EB4" :UBS) "(VLMundomsg)" ("311d 137h" "" "64EBE" :UBS) "#137" ("311d 137h" "" "64EBE" :UBS) "(VLMhistmsg)" ("312d 138h" "" "64EC8" :UBS) "#138" ("312d 138h" "" "64EC8" :UBS) "(VLMUserKeys)" ("313d 139h" "" "64ED2" :UBS) "#139" ("313d 139h" "" "64ED2" :UBS) "(VLMAlarmMsg)" ("314d 13Ah" "" "64EDC" :UBS) "#13A" ("314d 13Ah" "" "64EDC" :UBS) "(VLMlastargs)" ("315d 13Bh" "" "64EE6" :UBS) "#13B" ("315d 13Bh" "" "64EE6" :UBS) "(VLMcmdlmsg)" ("317d 13Dh" "" "64EF0" :UBS) "#13D" ("317d 13Dh" "" "64EF0" :UBS) "Err#Cont" ("318d 13Eh" "" "64EFA" :UBS) "(REALLISTREAL)" ("337d 151h" "" "64F04") "INTEGER337" ("337d 151h" "" "64F04") "CMPOBOB" ("512d 200h" "" "64F0E" :UBS) "(#_517_d)" ("517d 205h" "" "64F18" :UBS) "(#_205)" ("517d 205h" "" "64F18" :UBS) "Err#NoLstArg" ("517d 205h" "" "64F18" :UBS) "STRREALREAL" ("785d 311h" "" "64F22") "ARRYREALREAL" ("1041d 411h" "" "64F2C" :UBS) "ARRYREALCMP" ("1042d 412h" "" "64F36" :UBS) "3ARRY" ("1092d 444h" "" "64F40" :UBS) "ARRYLISTREAL" ("1105d 451h" "" "64F4A" :UBS) "ARRYLISTCMP" ("1106d 452h" "" "64F54" :UBS) "LISTREALOB" ("1296d 510h" "" "64F5E" :UBS) "LISTREALREAL" ("1297d 511h" "" "64F68" :UBS) "LISTLISTOB" ("1360d 550h" "" "64F72" :UBS) "IDREALOB" ("1552d 610h" "" "64F7C" :U) "IDLISTOB" ("1616d 650h" "" "64F86" :U) "(LAMANYANY)" ("1792d 700h" "" "64F90" :UBS) "FSTMACROROM#" ("1792d 700h" "" "64F90" :UBS) "PROGIDREAL" ("2145d 861h" "" "64F9A" :UBS) "PROGIDCMP" ("2146d 862h" "" "64FA4" :UBS) "PROGIDLIST" ("2149d 865h" "" "64FAE" :UBS) "PROGIDEXT" ("2158d 86Eh" "" "64FB8" :UBS) "Attn#" ("2563d A03h" "" "34301") "ATTN#" ("2563d A03h" "" "34301") "ATTNERR" ("2563d A03h" "" "64FC2") "SYMREALREAL" ("2577d A11h" "" "64FCC" :UBS) "SYMREALCMP" ("2578d A12h" "" "64FD6" :UBS) "SYMREALSYM" ("2586d A1Ah" "" "64FE0" :UBS) "SYMCMPREAL" ("2593d A21h" "" "64FEA" :UBS) "SYMCMPCMP" ("2594d A22h" "" "64FF4" :UBS) "SYMCMPSYM" ("2602d A2Ah" "" "64FFE" :UBS) "SYMIDREAL" ("2657d A61h" "" "65008" :UBS) "SYMIDCMP" ("2658d A62h" "" "65012" :UBS) "SYMIDLIST" ("2661d A65h" "" "6501C" :UBS) "SYMIDEXT" ("2670d A6Eh" "" "65026" :UBS) "SYMSYMREAL" ("2721d AA1h" "" "65030" :UBS) "SYMSYMCMP" ("2722d AA2h" "" "6503A" :UBS) "3SYM" ("2730d AAAh" "" "65044" :UBS) "XFERFAIL" ("3078d C06h" "" "6504E" :UBS) "PROTERR" ("3079d C07h" "" "65058" :UBS) "InvalServCmd" ("3080d C08h" "" "65062" :UBS) "Connecting" ("3082d C0Ah" "" "6506C") "Retry" ("3083d C0Bh" "" "65076" :UBS) "#CAlarmErr" ("3583d DFFh" "" "65080" :UBS) "EXTOBOB" ("3584d E00h" "" "6508A") "TYPEREAL" ("10547d 2933h" "" "03F8B") "TYPEEREL" ("10581d 2955h" "" "03FDB" :U) "TYPEIDNT" ("10568d 2948h" "" "03FA9") "TYPECMP" ("10615d 2977h" "" "03F95" :U) "TYPELIST" ("10868d 2A74h" "" "03F9F" :U) "TYPERRP" ("10902d 2A96h" "" "03FC7" :U) "TYPESYMB" ("10936d 2AB8h" "" "03FBD" :U) "TYPEEXT" ("10970d 2ADAh" "" "03FE5" :U) "TYPECOL" ("11677d 2D9Dh" "" "03FB3" :U) "TYPELAM" ("11885d 2E6Dh" "" "03FD1" :U) "#EXITERR" ("458752d 70000h" "" "65094") "MINUSONE" ("1048575d FFFFFh" "" "6509E") "ZEROZERO" ("--> #0 #0" "" "641FC") "#ZERO#ONE" ("--> #0 #1" "" "64209") "#ZERO#SEVEN" ("--> #0 #7" "" "6427A") "ONEDUP" ("--> #1 #1" "" "63AC4") "ONEONE" ("--> #1 #1" "" "63AC4") "#ONE#27" ("--> #1 #27d" "" "6428A") "#TWO#ONE" ("--> #2 #1" "" "6429D") "#TWO#TWO" ("--> #2 #2" "" "642AF") "#TWO#FOUR" ("--> #2 #4" "" "642BF") "#THREE#FOUR" ("--> #3 #4" "" "642D1") "#FIVE#FOUR" ("--> #5 #4" "" "642E3") "ZEROZEROZERO" ("--> #0 #0 #0" "" "64309") "ZEROZEROONE" ("--> #0 #0 #1" "" "6431D") "ZEROZEROTWO" ("--> #0 #0 #2" "" "64331") "DROPZERO" ("ob --> #0" "" "62535") "3DROPZERO" ("ob ob ob --> #0" "" "64449" :U) "2DROP00" ("ob ob --> #0 #0" "" "6254E") "DROPONE" ("ob --> #1" "" "62946") "DUPZERO" ("ob --> ob ob #0" "" "63A88") "DUPONE" ("ob --> ob ob #1" "" "63A9C") "DUPTWO" ("ob --> ob ob #2" "" "63AD8") "SWAPONE" ("ob ob' --> ob' ob #1" "" "63AB0") "ZEROSWAP" ("ob --> #0 ob" "" "62E3A") "ZEROOVER" ("ob --> ob #0 ob" "" "63079") "ZEROFALSE" ("--> #0 F" "" "6351F") "ONESWAP" ("ob --> #1 ob" "" "62E67") "ONEFALSE" ("--> #1 F" "" "63533") "COERCE" ("% --> #" "" "18CEA") "COERCEDUP" ("% --> # #" "" "62CE1") "COERCESWAP" ("ob % --> # ob" "" "62E7B") "COERCE2" ("% %' --> # #'" "" "194F7") "%ABSCOERCE" ("% --> #" "" "18CD7") "COERCE{}2" ("{%} --> {#}" "" "193DA" :U) "C%>#" ("C% --> # #'" "" "4F408") "HXS>#" ("hxs --> #" "" "05A03") "2HXS>#" ("hxs hxs --> # #" "" "4F3D1" :U) "2HXSLIST?" ("{ hxs hxs' } --> # #'" "Converts list of two hxs to two
- bints. Generates \"Bad Argument Value\" for
- invalid input." "51532") "CHR>#" ("chr --> #" "" "05A51") "#+" ("# #' --> #+#'" "" "03DBC") "#+OVF" ("# #' --> #+#'" "0 \\<= result \\<= FFFFF" "25B0B" :U) "#1+" ("# --> #+1" "" "03DEF") "#2+" ("# --> #+2" "" "03E2D") "#3+" ("# --> #+3" "" "6256A") "#4+" ("# --> #+4" "" "6257A") "#5+" ("# --> #+5" "" "6258A") "#6+" ("# --> #+6" "" "6259A") "#7+" ("# --> #+7" "" "625AA") "#8+" ("# --> #+8" "" "625BA") "#9+" ("# --> #+9" "" "625CA") "#10+" ("# --> #+10" "" "625DA") "#12+" ("# --> #+12" "" "625EA") "#-" ("# #' --> #-#'" "" "03DE0") "#1-" ("# --> #-1" "" "03E0E") "#2-" ("# --> #-2" "" "03E4E") "#3-" ("# --> #-3" "" "625FA") "#4-" ("# --> #-4" "" "6260A") "#5-" ("# --> #-5" "" "6261A") "#6-" ("# --> #-6" "" "6262A") "#*" ("# #' --> #*#'" "" "03EC2") "#*OVF" ("# #' --> #*#'" "0 \\<= result \\<= FFFFF" "191B9") "#2*" ("# --> #*2" "" "03E6F") "#6*" ("# --> #*6" "" "62691") "#8*" ("# --> #*8" "" "62674") "#10*" ("# --> #*10" "" "6264E") "#/" ("# #' --> #r #q" "" "03EF7") "#2/" ("# --> #/2" "Rounded down." "03E8E") "#-+1" ("# #' --> #-#'+1" "" "637CC") "#1--" ("# #' --> #-#'+1" "" "637CC") "$1-+" ("# #' --> #+#'-1" "$1-+ is a typo in EXTABLE." "63808") "#+-1" ("# #' --> #+#'-1" "$1-+ is a typo in EXTABLE." "63808") "#1-+" ("# #' --> #+#'-1" "$1-+ is a typo in EXTABLE." "63808") "#-#2/" ("# #' --> (#-#')/2" "" "624FB") "#+DUP" ("# #' --> #+#' #+#'" "" "627D5") "#+SWAP" ("ob # #' --> #+#' ob" "" "62DFE") "#+OVER" ("ob # #' --> ob #+#' ob" "" "63051") "#-DUP" ("# #' --> #-#' #-#'" "" "627F8") "#-SWAP" ("ob # #' --> #-#' ob" "" "62E12") "#-OVER" ("ob # #' --> ob #-#' ob" "" "63065") "#1+DUP" ("# --> #+1 #+1" "" "62809") "#1+SWAP" ("ob # --> #+1 ob" "" "62E26") "#1+ROT" ("ob ob' # --> ob' #+1 ob" "" "1DABB") "#1-DUP" ("# --> #-1 #-1" "" "6281A") "pull" ("meta&ob --> meta ob" "" "5E4A9") "#1-SWAP" ("meta&ob --> meta ob" "" "5E4A9") "#1-ROT" ("ob ob' # --> ob' #-1 ob" "" "62FD9") "#1-UNROT" ("ob ob' # --> #-1 ob ob'" "" "28558") "#1-1SWAP" ("# --> 1 #-1" "Returns the bint ONE and the result." "62E4E") "DUP#1+" ("# --> # #+1" "" "628EB") "DUP#2+" ("# --> # #+2" "" "626F7") "DUP#1-" ("# --> # #-1" "" "6292F") "DUP3PICK#+" ("# #' --> # #' #+#'" "" "63704") "2DUP#+" ("# #' --> # #' #+#'" "" "63704") "DROP#1-" ("# ob --> #-1" "" "637F4") "SWAP#-" ("# #' --> #'-#" "" "62794") "SWP1+" ("meta ob --> meta&ob" "" "62904") "SWAP#1+" ("meta ob --> meta&ob" "" "62904") "SWAP#1+SWAP" ("# ob --> #+1 ob" "" "51843") "SWAP#1-" ("# ob --> ob #-1" "" "637E0") "SWAP#1-SWAP" ("# ob --> #-1 ob" "" "51857") "SWAPDROP#1-" ("ob # --> #-1" "" "5EAF4" :U) "SWAPOVER#-" ("# #' --> #' #-#'" "" "637A4") "OVER#+" ("# #' --> # #'+#" "" "6372C") "OVER#-" ("# #' --> # #'-#" "" "6377C") "ROT#+" ("# ob #' --> ob #'+#" "" "63718") "ROT#-" ("# ob #' --> ob #'-#" "" "63768") "ROT#1+" ("# ob ob' --> ob ob' #+1" "" "637B8") "ROT#1+UNROT" ("# ob ob' --> #+1 ob ob'" "" "5FB76") "ROT+SWAP" ("# ob #' --> #'+# ob" "" "62DCC") "ROT#+SWAP" ("# ob #' --> #'+# ob" "" "62DCC") "3PICK#+" ("# ob #' --> # ob #'+#" "" "63740") "4PICK#+" ("# ob1 ob2 #' --> # ob1 ob2 #'+#" "" "63754") "4PICK+SWAP" ("# ob1 ob2 #' --> # ob1 #'+# ob2" "" "62DE5") "4PICK#+SWAP" ("# ob1 ob2 #' --> # ob1 #'+# ob2" "" "62DE5") "#MIN" ("# #' --> #''" "" "624BA") "#MAX" ("# #' --> #''" "" "624C6") "#AND" ("# #' --> #''" "Bitwise QANDQ." "03EB1") "#=" ("# #' --> flag" "" "03D19") "#<>" ("# #' --> flag" "" "03D4E") "#<" ("# #' --> flag" "" "03CE4") "#>" ("# #' --> flag" "" "03D83") "#0<>" ("# --> flag" "" "03CC7") "#0=" ("# --> flag" "" "03CA6") "#1<>" ("# --> flag" "" "622B6") "#1=" ("# --> flag" "" "622A7") "#2<>" ("# --> flag" "" "636C8") "#2=" ("# --> flag" "" "6229A") "#3=" ("# --> flag" "" "62289") "#5=" ("# --> flag" "" "636B4") "#<3" ("# --> flag" "" "63673") "ONE#>" ("# --> flag" "" "636F0") "#>1" ("# --> flag" "" "636F0") "2DUP#<" ("# #' --> # #' flag" "" "6289B") "2DUP#>" ("# #' --> # #' flag" "" "628D1") "ONE_EQ" ("# --> flag" "Uses EQ test." "63385") "OVER#=" ("# #' --> # flag" "" "620EB") "2DUP#=" ("# #' --> # #' flag" "" "628B5") "OVER#0=" ("# #' --> # #' flag" "" "6364B") "DUP#0=" ("# --> # flag" "" "62266") "OVER#<" ("# #' --> # flag" "" "6365F") "DUP#1=" ("# --> # flag" "" "622C5") "OVER#>" ("# #' --> # flag" "" "636DC") "DUP#0<>" ("# --> # flag" "" "622D4") "DUP#<7" ("# --> # flag" "Returns TRUE if the argument is smaller than
- #7." "63687") "2#0=OR" ("# # --> flag" "Returns TRUE if either argument is zero." "6362D") "%-MAXREAL" ("-9.99E499" "" "2A487") "%-9" ("-9" "" "2A42E") "%-8" ("-8" "" "2A419") "%-7" ("-7" "" "2A404") "%-6" ("-6" "" "2A3EF") "%-5" ("-5" "" "2A3DA") "%-4" ("-4" "" "2A3C5") "%-3" ("-3" "" "2A3B0") "%-2" ("-2" "" "2A39B") "%-1" ("-1" "" "2A386") "%-MINREAL" ("-1E-499" "" "2A4B1") "%0" ("0" "" "2A2B4") "%MINREAL" ("1E-499" "" "2A49C") "%.1" (".1" "" "494B4") "%.15" (".15" "" "495AA" :U) "%.5" (".5" "" "650BD") "%-.5" ("-.5" "" "650D2" :UBS) "%1" ("1" "" "2A2C9") "%2" ("2" "" "2A2DE") "%e" ("e" "" "650A8") "%3" ("3" "" "2A2F3") "%PI" ("\\pi" "" "2A443") "%4" ("4" "" "2A308") "%5" ("5" "" "2A31D") "%6" ("6" "" "2A332") "%2PI" ("2\\pi" "" "514EB" :U) "%7" ("7" "" "2A347") "%8" ("8" "" "2A35C") "%9" ("9" "" "2A371") "%10" ("10" "" "650E7") "%11" ("11" "" "1CC03") "%12" ("12" "" "1CC1D") "%13" ("13" "" "1CC37") "%14" ("14" "" "1CC51") "%15" ("15" "" "1CC85") "%16" ("16" "" "1CD3A") "%17" ("17" "" "1CD54") "%18" ("18" "" "1CDF2") "%19" ("19" "" "1CE07") "%20" ("20" "" "1CC6B") "%21" ("21" "" "1CCA4") "%22" ("22" "" "1CCC3") "%23" ("23" "" "1CCE2") "%24" ("24" "" "1CD01") "%25" ("25" "" "1CD20") "%26" ("26" "" "1CD73") "%27" ("27" "" "1CD8D") "%80" ("80" "" "320B1") "%100" ("100" "" "415F1") "%180" ("180" "" "650FC") "%200" ("200" "" "65111" :UBS) "%400" ("400" "" "6513B" :UBS) "%360" ("360" "" "65126") "%1200" ("1200" "" "22352" :U) "%2400" ("2400" "" "22367" :U) "%4800" ("4800" "" "2237C" :U) "%TICKSsec" ("8192" "" "0EFEE" :U) "%9600" ("9600" "" "22391" :U) "%TICKSmin" ("491520" "" "0F003" :U) "%HrTicks" ("29491200" "" "0F018" :U) "%TICKSday" ("707788800" "" "0F02D" :U) "%TICKSweek" ("4954521600" "" "0F042" :U) "%MAXREAL" ("9.99E499" "" "2A472") "1REV" ("--> 6.28318530718
- --> 360.
- --> 400." "Returns the angle of a full circle,
- corresponding to the current angular mode." "514DC") "%%0" ("0" "" "2A4C6") "%%.1" ("0.1" "" "2A562") "%%.4" ("0.4" "" "2B3DD") "%%.5" ("0.5" "" "2A57C") "cfF" ("0.555..." "%%5/9 for C\\<>F conversion." "10E68") "%%1" ("1" "" "2A4E0") "cfC" ("1" "For C\\<>K conversion." "10E82") "%%2" ("2" "" "2A4FA") "%%3" ("3" "" "2A514") "%%PI" ("\\pi" "" "2A458" :UBS) "PI/180" ("\\pi/180" "" "2A62C") "%%4" ("4" "" "2A52E") "%%5" ("5" "" "2A548") "%%2PI" ("2\\pi" "" "0F688") "%%7" ("7" "" "2B1FF") "%%10" ("10" "" "2A596") "%%12" ("12" "" "2B2DC") "%%60" ("60" "" "2B300") "%%KZERO" ("273.15" "" "10E9C" :U) "%%RZERO" ("459.67" "" "10EB6" :U) "DROP%0" ("ob --> %0" "" "5198F" :U) "DROP%1" ("ob --> %1" "" "1CA0D" :U) "DROP%0ABND" ("ob --> %0" "" "54B1E" :U) "DROP%1ABND" ("ob --> %1" "" "54A9C" :U) "2DROP%0" ("ob ob' --> %0" "" "1F047" :U) "4DROP%0" ("1...4 --> %0" "" "56AFB" :U) "UNROT2DROP%0" ("1 2 3 --> 3 %0" "" "50A3B" :U) "%>%%" ("% --> %%" "" "2A5C1") "%>%%SWAP" ("ob % --> %% ob" "" "62E8F") "%%>%" ("%% --> %" "" "2A5B0") "2%>%%" ("% % --> %% %%" "" "2B45C") "2%%>%" ("%% %%' --> % %'" "" "2B470") "UNCOERCE" ("# --> %" "" "18DBF") "UNCOERCE2" ("# # --> % %" "" "1950B") "UNCOERCE%%" ("# --> %%" "" "63B96") "UNCOERCE{}2" ("{#} --> {%}
- {# #} --> {% %}" "" "19529" :U) "HXS>%" ("hxs --> %" "" "5435D") "C%>%" ("C% --> %re %im" "" "05D2C") "%IP>#" ("% --> #IP(ABS(%))" "Does ABS too." "2EC11") "%+" ("% %' --> %+%'" "" "2A974") "%+SWAP" ("ob % %' --> %+%' ob" "" "51BE4") "%1+" ("% --> %+1" "" "50262") "%-" ("% %' --> %-%'" "" "2A981") "%1-" ("% --> %-1" "" "50276") "%>%%-" ("% %' --> %%-%%'" "" "2A95B") "%*" ("% %' --> %*%'" "" "2A9BC") "%10*" ("% --> %*10" "" "62BF1") "%/" ("% %' --> %/%'" "" "2A9FE") "%^" ("% %' --> %^%'" "" "2AA70") "%ABS" ("% --> %'" "" "2A900") "%CHS" ("% --> -%" "" "2A920") "%SGN" ("% --> -1/0/1" "" "2A8D7") "%1/" ("% --> 1/%" "" "2AAAF") "%>%%1/" ("% --> 1/%%" "" "2AA9E") "%SQRT" ("% --> \\v/%" "" "2AB09") "%>%%SQRT" ("% --> \\v/%%" "" "2AAF6") "CK%SQRT" ("% --> \\v/%%" "" "1B3F5" :U) "%SQ" ("% --> %'" "" "1B47B" :U) "%EXP" ("% --> e^%" "" "2AB2F") "%EXPM1" ("% --> e^%-1" "" "2AB42") "%LN" ("% --> LN%" "" "2AB6E") "CK%LN" ("% --> LN%" "" "1B995" :U) "%LNP1" ("% --> LN(%+1)" "" "2ABA7") "%LOG" ("% --> LOG%" "" "2AB81") "CK%LOG" ("% --> LOG%" "" "1BA0C" :U) "%ALOG" ("% --> 10^%" "" "2ABBA") "%SIN" ("% --> SIN%" "" "2ABEF") "%COS" ("% --> COS%" "" "2AC40") "%TAN" ("% --> TAN%" "" "2AC91") "%ASIN" ("% --> ASIN%" "" "2ACC1") "CK%ASIN" ("% --> ASIN%" "" "1B6EA" :U) "%ACOS" ("% --> ACOS%" "" "2ACF1") "CK%ACOS" ("% --> ACOS%" "" "1B775" :U) "%ATAN" ("% --> ATAN%" "" "2AD21") "%SINH" ("% --> SINH%" "" "2ADAE") "%COSH" ("% --> COSH%" "" "2ADDA") "%TANH" ("% --> TANH%" "" "2ADED") "%ASINH" ("% --> ASINH%" "" "2AE00") "%ACOSH" ("% --> ACOSH%" "" "2AE13") "CK%ACOSH" ("% --> ACOSH%" "" "1B86C" :U) "%ATANH" ("% --> ATANH%" "" "2AE26") "CK%ATANH" ("% --> ATANH%" "" "1B8DE" :U) "%MANTISSA" ("% --> %mant" "" "2A930") "%EXPONENT" ("% --> %expn" "" "2AE39") "%FP" ("% --> %frac" "" "2AF4D") "%IP" ("% --> %int" "" "2AF60") "%FLOOR" ("% --> %maxint <=%" "" "2AF86") "%CEIL" ("% --> %minint >=%" "" "2AF73") "%MOD" ("% %' --> %rem" "" "2ABDC") "%INT" ("% %' --> %rem" "" "2AFAC" :U) "%ARG" ("% %' --> %rem" "" "1B30D" :U) "%ANGLE" ("%x %y --> %ang" "" "2AD38") "%>%%ANGLE" ("%x %y --> %%ang" "" "2AD5B") "RNDXY" ("% %places --> %'" "" "2B529") "TRCXY" ("% %places --> %'" "" "2B53D") "%COMB" ("% %' --> COMB(%,%')" "" "2AE62") "%PERM" ("% %' --> PERM(%,%')" "" "2AE75") "%NFACT" ("% --> %!" "Calculates factorial of number." "2AE4C") "%FACT" ("% --> gamma(%+1)" "Calculates gamma(x+1)." "2B0C4") "%NROOT" ("% %n --> %'" "Calculates the %nth root of the real
- number. Equivalent to user function XROOT." "2AA81") "%MIN" ("% %' --> %lesser" "" "2A70E") "%MAX" ("% %' --> %greater" "" "2A6F5") "%MAXorder" ("% %' --> %max %min" "" "62D81") "%MAXIMIZE" ("% %' --> %max %min" "" "51AB7" :U) "%RAN" ("--> %random" "Returns next random number." "2AFC2") "%RANDOMIZE" ("%seed -->" "System level RDZ: seeds the random number
- generator. " "2B044") "DORANDOMIZE" ("% -->" "Stores given number as random number seed." "2B07B") "%OF" ("% %' --> %'/% * 100" "" "2A9C9") "%T" ("% %' --> %pctotal" "" "2AA0B") "%CH" ("% %' --> %pcchange" "" "2AA30") "%D>R" ("%deg --> %rad" "" "2A622") "%R>D" ("%rad --> %deg" "" "2A655") "%REC>%POL" ("%r %ang --> %x %y" "" "2B48E") "%POL>%REC" ("%x %y --> %r %ang" "" "2B4BB") "%SPH>%REC" ("%r %ang %ph --> %x %y %z" "" "2B4F2") "2%>%%SQR" ("%r %ang %ph --> %x %y %z" "Does <REF>2%>%% and then <REF>%%SQR" "51A71" :U) "%%+" ("%% %%' --> %%+%%'" "" "2A943") "%%-" ("%% %%' --> %%-%%'" "" "2A94F") "%%*" ("%% %%' --> %%*%%'" "" "2A99A") "%%*ROT" ("ob ob' %% %%' --> ob' %%+%%' ob" "" "62FED") "%%*SWAP" ("ob %% %%' --> %%+%%' ob" "" "62EA3") "%%*UNROT" ("ob ob' %% %%' --> %%+%%' ob ob'" "" "63C18") "%%/" ("%% %%' --> %%/%%'" "" "2A9E8") "SWAP%%/" ("%% %%' --> %%''" "" "63BBE") "%%/>%" ("%% %%' --> %" "" "63B82") "%%^" ("%% %%' --> %%^%%'" "" "2AA5F") "%%SINRAD" ("%% --> %%'" "" "2AC27") "%%ANGLERAD" ("%% --> %%'" "" "2AD7C") "%%SQR" ("%% --> %%'" "" "51A94" :U) "2DUP%%R" ("" "" "520B2" :U) "%%ABS" ("%% --> %%abs" "" "2A8F0") "%%ACOSRAD" ("%% --> %%rad" "" "2AD08") "%%ANGLE" ("%%x %%y --> %%ang" "" "2AD4F") "%%ANGLEDEG" ("%%x %%y --> %%deg" "" "2AD6C") "%%ASINRAD" ("%% --> %%rad" "" "2ACD8") "%%CHS" ("%% --> -%%" "" "2A910") "%%1/" ("%% --> 1/%%" "" "2AA92") "%%COS" ("%% --> %%cos" "" "2AC57") "%%COSDEG" ("%%deg --> %%cos" "" "2AC68") "%%COSH" ("%% --> %%cosh" "" "2ADC7") "%%COSRAD" ("%%rad --> %%cos" "" "2AC78") "%%EXP" ("%% --> e^%%" "" "2AB1C") "%%LN" ("%% --> ln %%" "" "2AB5B") "%%INT" ("%% --> %%maxint" "" "2AF99") "%%FLOOR" ("%% --> %%maxint" "" "2AF99") "%%LNP1" ("%% --> %%ln(%%+1)" "" "2AB94") "%%MAX" ("%% %%' --> %%max" "" "2A6DC") "%%R>P" ("%%x %%y --> %%radius %%angle" "" "2B498") "%%P>R" ("%%r %%ang --> %%x %%y" "" "2B4C5") "%%SIN" ("%% --> %%sin" "" "2AC06") "%%SINDEG" ("%%deg --> %%sin" "" "2AC17") "%%SINH" ("%% --> %%sinh" "" "2AD95") "%%SQRT" ("%% --> \\v/%%" "" "2AAEA") "%%TANRAD" ("%%rad --> %%tan" "" "2ACA8") "%=" ("% %' --> flag" "" "2A8C1") "%<>" ("% %' --> flag" "" "2A8CC") "%<" ("% %' --> flag" "" "2A871") "%<=" ("% %' --> flag" "" "2A8B6") "%>" ("% %' --> flag" "" "2A88A") "%>=" ("% %' --> flag" "" "2A8A0") "%0=" ("% --> flag" "" "2A76B") "DUP%0=" ("% --> flag" "" "63BAA") "%0<>" ("% --> flag" "Can be used to change a user flag into a
- system flag. " "2A7CF") "%0<" ("% --> flag" "" "2A738") "%0>" ("% --> flag" "" "2A799") "%0>=" ("% --> flag" "" "2A7F7") "%%<" ("%% %%' --> flag" "" "2A81F") "%%<=" ("%% %%' --> falg" "" "2A8AB") "%%>" ("%% %%' --> flag" "" "2A87F") "%%>=" ("%% %%' --> flag" "" "2A895") "%%0=" ("%% --> flag" "" "2A75A") "%%0<>" ("%% --> flag" "" "2A7BB") "%%0<" ("%% --> flag" "" "2A727") "%%0<=" ("%% --> flag" "" "2A80B") "%%0>" ("%% --> flag" "" "2A788") "%%0>=" ("%% --> flag" "" "2A7E3") "C%0" ("(0,0)" "" "524AF") "C%1" ("(1,0)" "" "524F7") "C%-1" ("(-1,0)" "" "5196A") "C%%1" ("(Q%%1,%%0Q)" "" "5193B") "C%i" ("(0,1)" "" "5267F" :U) "C%-i" ("(0,-1)" "" "526AE" :U) "C%%>C%" ("C%% --> C%" "" "519F8") "%>C%" ("%re %im --> C%" "" "05C27") "SWAP%>C%" ("%im %re --> C%" "" "632A9") "Re>C%" ("%re --> C%" "" "51A37") "C>Re%" ("C% --> %re" "" "519A3") "C>Im%" ("C% --> %im" "" "519B7") "%%>C%" ("%%re %%im --> C%" "" "51A07") "C%>%%" ("C% --> %%re %%im" "" "519CB") "C%>%%SWAP" ("C% --> %%im %%re" "" "519DF") "SWAP2C%>%" ("C% C%' --> %re %im %re' %im'" "" "51C6B" :U) "C%%>%%" ("C%% --> %%re %%im" "" "05DBC") "C%*i" ("C% --> C%'" "" "51A4A" :U) "C/i" ("C% --> C%'" "" "51A5F" :U) "C%C+C" ("C% C%' --> C%''" "" "51C16" :U) "C%C-C" ("C% C%' --> C%''" "" "51CFC" :U) "C%C*C" ("C% --> C%^2" "" "1B48F" :U) "C%C/C" ("C% C%' --> C%''" "" "51EC8" :U) "C%C+R" ("C% % --> C%'" "" "51BD0" :U) "C%R+C" ("% C% --> C%'" "" "51BF8" :U) "C%C-R" ("C% % --> C%'" "" "51CE8" :U) "C%R-C" ("% C% --> C%'" "" "51CD4" :U) "C%C*R" ("C% % --> C%'" "" "51D4C" :U) "C%R*C" ("% C% --> C%'" "" "51D60" :U) "C%R/C" ("% C% --> C%'" "" "51E19" :U) "C%C/R" ("C% % --> C%'" "" "51E64" :U) "C%C^C" ("C% C%' --> C%''" "" "52374") "C%C^R" ("C% % --> C%'" "" "52360") "C%R^C" ("% C% --> C%'" "" "52342") "C%ABS" ("C% --> %" "" "52062") "C%CHS" ("C% --> -C%" "" "51B70") "C%1/" ("C% --> 1/C%" "" "51EFA") "C%SQRT" ("C% --> \\v/C%" "" "52107") "C%SGN" ("C% --> C%/C%ABS" "" "520CB") "C%CONJ" ("C% --> C%'" "" "51BB2") "C%ARG" ("C% --> %" "" "52099") "C%EXP" ("C% --> e^C%" "" "52193") "C%LN" ("C% --> ln C%" "" "521E3") "C%LOG" ("C% --> log C%" "" "522BF") "C%ALOG" ("C% --> 10^C%" "" "52305") "C%SIN" ("C% --> sin C%" "" "52530") "C%COS" ("C% --> cos C%" "" "52571") "C%TAN" ("C% --> tan C%" "" "525B7") "C%ASIN" ("C% --> asin C%" "" "52804") "C%ACOS" ("C% --> acos C%" "" "52863") "C%ATAN" ("C% --> atan C%" "" "52675") "C%SINH" ("C% --> sinh C%" "" "5262F") "C%COSH" ("C% --> cosh C%" "" "52648") "C%TANH" ("C% --> tanh C%" "" "5265C") "C%ASINH" ("C% --> asinh C%" "" "5281D") "C%ACOSH" ("C% --> acosh C%" "" "52836") "C%ATANH" ("C% --> atanh C%" "" "527EB") "%%>C%%" ("%%re %%im --> C%%" "" "05C72" :U) "SWAP2C%%>%%" ("C%% C%%' --> %%re %%im %%re' %%im'" "" "51C84" :U) "C%%C+C" ("C%% C%%' --> C%%''" "" "51C3E" :U) "C%%C-C" ("C%% C%%' --> C%%''" "" "51D10" :U) "C%%C*C" ("C%% C%%' --> C%%''" "" "51DE2" :U) "C%%C/C" ("C%% C%%' --> C%%''" "" "51F13" :U) "C%%C+R" ("C%% %% --> C%%'" "" "51C9D" :U) "C%%R+C" ("%% C%% --> C%%'" "" "51CB1" :U) "C%%R-C" ("%% C%% --> C%%'" "" "51D24" :U) "C%%C-R" ("C%% %% --> C%%'" "" "51D38" :U) "C%%C*R" ("C%% %% --> C%%'" "" "51DAB" :U) "C%%R*C" ("%% C%% --> C%%'" "" "51DBF" :U) "C%%R/C" ("%% C%% --> C%%'" "" "51F3B" :U) "C%%C/R" ("C%% %% --> C%%'" "" "51F7C" :U) "C%%ABS" ("C%% --> %%" "" "52080" :U) "C%%CHS" ("C%% --> -C%%" "" "51B91") "C%%CONJ" ("C%% --> C%%'" "" "51BC1") "C%0=" ("C% --> flag" "" "51B43") "C%%0=" ("C%% --> flag" "" "51B2A") "SWITCHFLOATS" ("B% --> ?" "Dispatches action based on type. The order is
- %, C%, %%, C%%. For example, to change the
- sign of any float:
- :: SWITCHFLOATS %CHS C%CHS %%CHS C%%CHS ;" "35B47" :U) "SWITCH2FLOATS" ("L% L% --> ?" "Works similarly to the above function. The
- order is %% %%, C%% %%, %% C%%, C%% C%%." "35B88" :U) "F%>L%" ("% --> %%
- C% --> C%%" "Converts float to long float." "37D19" :U) "L%+" ("L% L% --> L%" "Adds long real or complex numbers." "37BE9" :U) "L%-" ("L% L% --> L%" "Subtracts long real or complex numbers." "37C0C" :U) "L%*" ("L% L% --> L%" "Multiplies long real or complex numbers." "37C2F" :U) "L%/" ("L% L% --> L%" "Divides long real or complex numbers." "37C52" :U) "B%NEG" ("B% --> B%'" "Changes sign of any number." "37CD3" :U) "B%ABS" ("B% --> B%'" "Absolute value of any number." "37C75" :U) "B%0=" ("B% --> flag" "Compares any number to zero." "37DF6" :U) "CHR_00" ("'\\00', CHR 0d 00h" "The NULL character." "6541E") "CHR_Newline" ("'\\0a', CHR 10d 0Ah" "" "6566A") "CHR_..." ("'...', CHR 31d 1Fh" "" "65425") "CHR_Space" ("'\\ ', CHR 32d 20h" "The space character." "65686") "CHR_DblQuote" ("'\"', CHR 34d 22h" "" "6542C") "CHR_#" ("'#', CHR 35d 23h" "" "65433") "CHR_LeftPar" ("'(', CHR 40d 28h" "" "65663") "CHR_RightPar" ("')', CHR 41d 29h" "" "65678") "CHR_*" ("'*', CHR 42d 2Ah" "" "6543A") "CHR_+" ("'+', CHR 43d 2Bh" "" "65441") "CHR_," ("',', CHR 44d 2Ch" "" "65448") "CHR_-" ("'-', CHR 45d 2Dh" "" "6544F") "CHR_." ("'.', CHR 46d 2Eh" "" "65456") "CHR_/" ("'/', CHR 47d 2Fh" "" "6545D") "CHR_0" ("'0', CHR 48d 30h" "" "65464") "CHR_1" ("'1', CHR 49d 31h" "" "6546B") "CHR_2" ("'2', CHR 50d 32h" "" "65472") "CHR_3" ("'3', CHR 51d 33h" "" "65479") "CHR_4" ("'4', CHR 52d 34h" "" "65480") "CHR_5" ("'5', CHR 53d 35h" "" "65487") "CHR_6" ("'6', CHR 54d 36h" "" "6548E") "CHR_7" ("'7', CHR 55d 37h" "" "65495") "CHR_8" ("'8', CHR 56d 38h" "" "6549C") "CHR_9" ("'9', CHR 57d 39h" "" "654A3") "CHR_:" ("':', CHR 58d 3Ah" "" "654AA") "CHR_;" ("';', CHR 59d 3Bh" "" "654B1") "CHR_<" ("'<', CHR 60d 3Ch" "" "654B8") "CHR_=" ("'=', CHR 61d 3Dh" "" "654BF") "CHR_>" ("'>', CHR 62d 3Eh" "" "654C6") "CHR_A" ("'A', CHR 65d 41h" "" "654CD") "CHR_B" ("'B', CHR 66d 42h" "" "654D4") "CHR_C" ("'C', CHR 67d 43h" "" "654DB") "CHR_D" ("'D', CHR 68d 44h" "" "654E2") "CHR_E" ("'E', CHR 69d 45h" "" "654E9") "CHR_F" ("'F', CHR 70d 46h" "" "654F0") "CHR_G" ("'G', CHR 71d 47h" "" "654F7") "CHR_H" ("'H', CHR 72d 48h" "" "654FE") "CHR_I" ("'I', CHR 73d 49h" "" "65505") "CHR_J" ("'J', CHR 74d 4Ah" "" "6550C") "CHR_K" ("'K', CHR 75d 4Bh" "" "65513") "CHR_L" ("'L', CHR 76d 4Ch" "" "6551A") "CHR_M" ("'M', CHR 77d 4Dh" "" "65521") "CHR_N" ("'N', CHR 78d 4Eh" "" "65528") "CHR_O" ("'O', CHR 79d 4Fh" "" "6552F") "CHR_P" ("'P', CHR 80d 50h" "" "65536") "CHR_Q" ("'Q', CHR 81d 51h" "" "6553D") "CHR_R" ("'R', CHR 82d 52h" "" "65544") "CHR_S" ("'S', CHR 83d 53h" "" "6554B") "CHR_T" ("'T', CHR 84d 54h" "" "65552") "CHR_U" ("'U', CHR 85d 55h" "" "65559") "CHR_V" ("'V', CHR 86d 56h" "" "65560") "CHR_W" ("'W', CHR 87d 57h" "" "65567") "CHR_X" ("'X', CHR 88d 58h" "" "6556E") "CHR_Y" ("'Y', CHR 89d 59h" "" "65575") "CHR_Z" ("'Z', CHR 90d 5Ah" "" "6557C") "CHR_[" ("'[', CHR 91d 5Bh" "" "65694") "CHR_]" ("']', CHR 93d 5Dh" "" "6569B") "CHR_UndScore" ("'_', CHR 95d 5Fh" "" "6568D") "CHR_a" ("'a', CHR 97d 61h" "" "65583") "CHR_b" ("'b', CHR 98d 62h" "" "6558A") "CHR_c" ("'c', CHR 99d 63h" "" "65591") "CHR_d" ("'d', CHR 100d 64h" "" "65598") "CHR_e" ("'e', CHR 101d 65h" "" "6559F") "CHR_f" ("'f', CHR 102d 66h" "" "655A6") "CHR_g" ("'g', CHR 103d 67h" "" "655AD") "CHR_h" ("'h', CHR 104d 68h" "" "655B4") "CHR_i" ("'i', CHR 105d 69h" "" "655BB") "CHR_j" ("'j', CHR 106d 6Ah" "" "655C2") "CHR_k" ("'k', CHR 107d 6Bh" "" "655C9") "CHR_l" ("'l', CHR 108d 6Ch" "" "655D0") "CHR_m" ("'m', CHR 109d 5Dh" "" "655D7") "CHR_n" ("'n', CHR 110d 6Eh" "" "655DE") "CHR_o" ("'o', CHR 111d 6Fh" "" "655E5") "CHR_p" ("'p', CHR 112d 70h" "" "655EC") "CHR_q" ("'q', CHR 113d 71h" "" "655F3") "CHR_r" ("'r', CHR 114d 72h" "" "655FA") "CHR_s" ("'s', CHR 115d 73h" "" "65601") "CHR_t" ("'t', CHR 116d 74h" "" "65608") "CHR_u" ("'u', CHR 117d 75h" "" "6560F") "CHR_v" ("'v', CHR 118d 76h" "" "65616") "CHR_w" ("'w', CHR 119d 77h" "" "6561D") "CHR_x" ("'x', CHR 120d 78h" "" "65624") "CHR_y" ("'y', CHR 121d 79h" "" "6562B") "CHR_z" ("'z', CHR 122d 7Ah" "" "65632") "CHR_{" ("'{', CHR 123d 7Bh" "" "656A2") "CHR_}" ("'{', CHR 125d 7Dh" "" "656A9") "CHR_Angle" ("'\\<)', CHR 128d 80h" "" "6564E") "CHR_Integral" ("'\\.S', CHR 132d 84h" "" "6565C") "CHR_Deriv" ("'\\.d', CHR 136d 88h" "" "65655") "CHR_->" ("'-->', CHR 141d 8Dh" "" "65639") "CHR_<<" ("'\\<<', CHR 171d ABh" "" "65640") "CHR_>>" ("'\\>>', CHR 187d BBh" "" "65647") "CHR_Pi" ("'\\pi', CHR 135d 87h" "" "65671") "CHR_Sigma" ("'\\GS', CHR 133d 85h" "" "6567F") "CHR_<=" ("'\\<=', CHR 137d 89h" "" "656B0") "CHR_>=" ("'\\>=', CHR 138d 8Ah" "" "656B7") "CHR_<>" ("'\\=/', CHR 139d 8Bh" "" "656BE") "NULL$" ("\"\"" "Empty string." "055DF") "tok_" ("\"\\ \"" "" "65254") "SPACE$" ("\"\\ \"" "" "65254") "14SPACES$" ("\"\\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \"" "String of 14 spaces." "65212" :U) "(LF$)" ("\"\\0a\"" "Newline." "65238") "NEWLINE$" ("\"\\0a\"" "Newline." "65238") "CRLF$" ("\"\\0d\\0a\"" "Carriage return and line feed." "2E4F0") "toklparen" ("\"(\"" "" "652B4" :UBS) "tokrparen" ("\")\"" "" "652C0" :UBS) "tok[" ("\"[\"" "" "6516A" :UBS) "tok]" ("\"]\"" "" "65150" :UBS) "tok{" ("\"{\"" "" "65176") "tok}" ("\"}\"" "" "65182" :UBS) "tok<<" ("\"\\<<\"" "" "651D6") "tok>>" ("\"\\>>\"" "" "651CA" :UBS) "$_LRParens" ("\"()\"" "" "6573B") "$_[]" ("\"[]\"" "" "65711") "$_{}" ("\"{}\"" "" "65703") "$_<<>>" ("\"\\<<\\>>\"" "" "656F5") "$_''" ("\"''\"" "Two single quotes." "6571F") "$_::" ("\"::\"" "" "6572D") "$_2DQ" ("\"\"\"\"" "Two double quotes." "65749") "$_:" ("\":\"" "\":\\ \"" "414BD" :U) "tok," ("\",\"" "" "65290") "tok'" ("\"'\"" "One single quote." "65284") "tok-" ("\"-\"" "" "652FC") "tok." ("\".\"" "" "6529C") "tok=" ("\"=\"" "" "65308") "tok->" ("\"-->\"" "" "25446") "tok_g" ("\"g\"" "" "0FA69") "tok_m" ("\"m\"" "" "0FA8E") "tok_s" ("\"s\"" "" "0FACE") "tok0" ("\"0\"" "" "6534C") "tok1" ("\"1\"" "" "65358") "tok2" ("\"2\"" "" "65364" :UBS) "tok3" ("\"3\"" "" "65370" :UBS) "tok4" ("\"4\"" "" "6537C" :UBS) "tok5" ("\"5\"" "" "65388" :UBS) "tok6" ("\"6\"" "" "65394" :UBS) "tok7" ("\"7\"" "" "653A0" :UBS) "tok;" ("\";\"" "" "652A8" :UBS) "tok8" ("\"8\"" "" "653AC") "tok9" ("\"9\"" "" "653B8") "tokESC" ("\"\\1B\"" "Escape character." "651BE") "tokexponent" ("\"E\"" "" "651E2") "tokquote" ("\"\"\"" "One double quote." "65278") "toksharp" ("\"#\"" "" "6518E") "tok$" ("\"$\"" "" "651A6" :UBS) "tok&" ("\"&\"" "" "651B2" :UBS) "tok*" ("\"*\"" "" "652D8" :UBS) "tok+" ("\"+\"" "" "652F0" :UBS) "tok/" ("\"/\"" "" "652E4" :UBS) "tokanglesign" ("\"\\<)\"" "" "651EE" :UBS) "tokDER" ("\"\\.d\"" "" "65320" :UBS) "$DER" ("\"der\"" "" "65244" :UBS) "tokSIGMA" ("\"\\GS\"" "" "651FA" :UBS) "tokSQRT" ("\"\\v/\"" "" "65314" :UBS) "tokuscore" ("\"_\"" "" "6519A" :UBS) "tokWHERE" ("\"|\"" "" "65206" :UBS) "tok^" ("\"^\"" "" "652CC" :UBS) "$_RAD" ("\"RAD\"" "" "65797") "$_GRAD" ("\"GRAD\"" "" "657A7") "$_XYZ" ("\"XYZ\"" "" "656E5") "$_R<Z" ("\"R\\<)Z\"" "\"R<angle>Z\"" "656D5") "$_R<<" ("\"R\\<)\\<)\"" "\"R<angle><angle>\"" "656C5") "$_EXIT" ("\"EXIT\"" "" "65769") "$_ECHO" ("\"ECHO\"" "" "65757") "$_Undefined" ("\"Undefined\"" "" "6577B") "tokCTGROB" ("\"GROB\"" "" "6532C" :UBS) "tokCTSTR" ("\"C$\"" "" "6533E" :UBS) "tokUNKNOWN" ("\"UNKNOWN\"" "" "65260" :UBS) "NULL$SWAP" ("ob --> $ ob" "NULL$, then SWAP." "62D59") "DROPNULL$" ("ob --> NULL$" "DROP then NULL$." "04D3E") "TWODROPNULL$" ("ob ob' --> NULL$" "2DROP then NULL$." "04D57" :U) "NULL$TEMP" ("--> $" "Creates null string in temporary memory
- (NULL$, then <REF>TOTEMPOB)." "1613F") "#>$" ("# --> $" "Creates string from the bint (decimal)." "167E4") "#:>$" ("# --> \"#:\\ \"" "Creates string from the bint and appends a
- colon and a space. Ex: \"1:\\ \"" "167D8") "a%>$," ("% --> $" "Converts real number into string using
- current display mode." "162B8") "a%>$" ("% --> $" "Converts real number into string using
- current display mode." "162B8") "ID>$" ("id/lam --> $" "Converts identifier into string." "05BE9") "DOCHR" ("% --> $" "Creates string of the character with the
- number specified." "140F1") "hxs>$" ("hxs --> $" "Uses current display mode and wordsize." "540BB") "HXS>$" ("hxs --> $" "Does <REF>hxs>$ and then appends base character." "54061") "#>CHR" ("# --> chr" "Returns character with the specified ASCII
- code." "05A75") "CHR>$" ("chr --> $* Strings" "Converts a character into a string." "6475C") "LEN$" ("$ --> #length" "Returns length in bytes." "05636") "LEN$>%" ("$ --> %" "LEN$ then UNCOERCE." "1CA26" :U) "DUPLEN$" ("$ --> $ #" "DUP then LEN$." "627BB") "OVERLEN$" ("$ ob --> $ ob #len" "OVER then LEN$." "05622") "NEWLINE&$" ("$ --> \"$\\0a\"" "Appends newline character to string." "63191") "NEWLINE$&$" ("$ --> \"$\\0a\"" "Appends newline character to string." "63191") "APNDCRLF" ("$ --> $'" "Appends carriage return and line feed to
- string." "2E4DC") "2LEN$#+" ("$ $' --> $ $' #" "Returns sum of length of two strings." "1782E" :U) "DROPDUPLEN$1+" ("$ ob --> $ #len+1" "Does DROP, then DUP, then LEN$ and finally
- #1+." "127CA" :U) "CAR$" ("$ --> chr
- --> \"\"" "Returns first character of string as a
- string, or NULL$ for null string." "050ED") "CDR$" ("$ --> $'" "Returns string without first character, or
- NULL$ for null string." "0516C") "POS$" ("$ $find start# --> #pos
- --> #0" "Search for $find in $search, starting at
- position #start. Returns position of $find
- or 0 if not found.
- Same entry as POSCHR." "645B1") "POSCHR" ("$search chr #start --> #pos
- --> #0" "Same entry as <REF>POS$." "645B1") "ONEPOS$" ("$ $find/chr --> #pos
- --> #0" "<REF>POS$ with #start = 1." "15EF6" :U) "XEQPOS$" ("$ $find/chr --> %pos
- --> %0" "<REF>POS$ with #start = 1 and followed by
- UNCOERCE." "1CAD7" :U) "POS$REV" ("$ $find #limit --> #pos
- --> #0" "Searches backwards from #limit to #1.
- Same entry as <REF>POSCHRREV." "645BD") "POSCHRREV" ("$seach chr #start --> #pos
- --> #0" "Same entry as <REF>POS$REV." "645BD") "COERCE$22" ("$ --> $'" "If the string is longer than 22 characters,
- truncates it to 21 characters and appends
- \"...\"." "12770") "Blank$" ("#len --> $" "Creates a string with the specified number
- of spaces." "45676") "PromptIdUtil" ("id ob --> $" "Creates string of the form \"id: ob\"." "49709") "SEP$NL" ("$ --> $' $''" "Separates string at the first newline. $'' is
- the substring before the first newline; $'
- the substring after the first newline." "127A7") "SUB$" ("$ #start #end --> $'" "Returns substring between specified
- positions. " "05733") "XEQSUB$" ("$ % %' --> $'" "Same as <REF>SUB$ but uses real numbers as
- arguments." "1C8BB" :U) "#1-SUB$" ("$ #start #end+#1 --> $'" "Does #1- and then SUB$." "63245") "1_#1-SUB" ("$ #end --> $'" "Returns substring with the first #end
- characters." "63259") "1_#1-SUB$" ("$ #end --> $'" "Returns substring with the first #end
- characters." "63259") "LAST$" ("$ #start --> $'" "Returns substring from the specified start
- position to the end (inclusive)." "6326D") "#1+LAST$" ("$ #start-#1 --> $'" "Returns substring from the specified start
- position to the end (exclusive)." "63281") "SUB$SWAP" ("ob $ # #' --> $' ob" "SUB$ then SWAP." "62D6D") "SUB$1#" ("$ #pos --> #'" "Returns bint with ASCII code of character at
- the specified position." "30805") "EXPAND" ("hxs #nibs --> hxs'" "Appends #nibs zero nibbles to the hxs." "61C1C") "&$" ("$ $' --> $+$'" "Concatenates two strings." "05193") "&$SWAP" ("ob $ $' --> $+$' ob" "&$ then SWAP." "63F6A") "!append$" ("$ $' --> $+$'" "Tries &$, if not enough memory does
- !!append$?." "62376") "!insert$" ("$ $' --> $'+$" "Does SWAP then <REF>!append$." "622E5") "!append$SWAP" ("ob $ $' --> $+$' ob" "!append$ then SWAP." "62F2F") "!!append$?" ("$ $' --> $+$'" "Attempts append \"in place\" if target is in
- tempob." "62312") "!!append$" ("$ $' --> $+$'" "Tries appending \"in place\"." "623A0") "!!insert$" ("$ $' --> $'+$" "Tries inserting \"in place\"." "62394") ">H$" ("$ chr --> $'" "Prepends character to string" "0525B") ">T$" ("$ chr --> $'" "Appends character to string." "052EE") "APPEND_SPACE" ("$ --> $'" "Appends space to string." "62BB0") "SWAP&$" ("$ $' --> $'+$" "Concatenates two strings." "622EF") "TIMESTR" ("%dt %tm --> \"dy dt tm\"" "Returns string representation of time, using
- current format. Example:
- \"WED 06/24/98 10:00:45A\"" "0D304") "NOT$" ("$1 $2 --> $'" "Logical QNOTQ." "188D2" :U) "AND$" ("$1 $2 --> $'" "Logical QANDQ. Errors if strings are not the
- same length." "18873") "OR$" ("$ $' --> $''" "Logical QORQ. Errors if strings are not the
- same length." "18887") "XOR$" ("$ $' --> $''" "Logical QXORQ. Errors if strings are not the
- same length." "1889B") "!NOT$" ("$ $' --> $'' ???" "Logical QNOTQ \"in place\"." "18961" :U) "!AND$" ("$ $' --> $'' ???" "Logical QANDQ. Does not check if strings are
- the same length." "188E6" :U) "!OR$" ("$ $' --> $'' ???" "Logical QORQ, does not check if strings are the
- same length." "188F5" :U) "!XOR$" ("$ $' --> $'' ???" "Logical QXORQ. Does not check if strings are
- the same length." "18904" :U) "DONUM" ("$ --> CHR" "Returns number of first character of string." "1410F" :U) "DOSTR>" ("$ --> ?" "Internal version of <REF>STR\\->." "14137") "palparse" ("$ --> ob T
- --> $ #pos $' F" "Tries parsing a string into an object. If
- successful, returns object and TRUE,
- otherwise returns position of error, the
- offending part of the string $', and FALSE.
- If the string contains several arguments, the
- resulting object is a secondary containing
- these objects." "238A4") "!*trior" ("F --> <SKIP>
- T T --> <COLA>" "" "0BC6F") "!*triand" ("T T -->
- F T --> F T <SEMI>" "" "0BCCF") "tok8cktrior" ("$1 $1 --> :: $1 <Ob1> ;
- $1 $2 --> :: $1 <Ob2> <Rest> ;" "" "0BD54") "tok8trior" ("GNT data $1 $1 --> :: GNT data GetNextToken ;
- GNT data $1 $2 --> :: $1 <Ob1> <Rest> ;" "" "0BD60") "nultrior" ("NULL$ --> :: ;
- $ --> :: $ <Ob1> <Rest> ;" "" "2534A") "GetNextToken" ("hxs-mask $ #start --> hxs-mask $ #next $token" "" "26162") "getmatchtok" ("hxs-mask $ #loc $_tok --> hxs-mask $ #next $match" "" "25452") "Parse.1" ("" "" "40AD9") "ParseFail" ("ob $parsed #pos $' -->" "Uses DispBadToken to re-edit the parsed
- string and displays \"Syntax Error\"." "40B2E") "DispBadToken" ("ob $parsed #pos $' -->" "Re-edits the parsed string, positions the
- cursor to the location of the error. Used by
- ParseFail." "40B56" :UBS) "!DcompWidth" ("# -->" "Sets the width (in characters) of decompiled
- strings. This width is used to cut the
- resulting string (for stack display) or to
- break it into lines (mostly for editing).
- Note that most decompilation entries reset
- this value to the stack or editor width. Use
- stkdecomp$w and editdecomp$w to make sure the
- current width is used and not changed." "1795A") "DcompWidth@" ("--> #" "Recalls the width of decompiled strings (in
- characters)." "17980") "setStdWid" ("-->" "Sets DcompWidth to the standard value for
- stack display, either 19 or 30 characters,
- depending on system flag 72 (stack minifont).
- --
- Flags: -72" "159FA" :UBS) "stkdecomp$w" ("ob --> $" "Decompiles for stack display using the
- current DcompWidth to cut the string if it is
- too long." "159EB") "1stkdecomp$w" ("ob --> $" "Calls setStdWid and decompiles for stack
- display (cutting the string if necessary)." "15978") ">Review$" ("id --> $" "Makes a string from the variable name and its
- contents (decompiled with <REF>Decomp1Line),
- for display with the review key. If the
- argument is a command, returns its name." "41422") "editdecomp$w" ("ob --> $" "Decompiles entire object for editing. It
- only decompiles the UserRPL components. Some
- System RPL entries like <REF>TakeOver are simply
- skipped, others are written as \"External\".
- Breaks the resulting strings into lines using
- the current DcompWidth." "15B31") "EDITDECOMP$" ("ob --> $" "Calls setStdEditWid and the decompiles for
- editing like <REF>editdecomp$w." "15A0E") "DECOMP$" ("ob --> $" "Calls <REF>setStdWid and decompiles entire
- object (UserRPL components only). Breaks the
- string into lines using DcompWidth as width." "15B13") "DO>STR" ("$ --> $
- ob --> $" "Internal version of \\->STR." "14088") "palrompdcmp" ("romptr --> $ T" "Decompiles a rompointer for the UserRPL
- stack. If it is a named rompointer, returns
- the name. Otherwise returns \"XLIB n m\"." "62B5B") "NULL$?" ("ob --> flag" "" "0556F") "DUPNULL$?" ("ob --> ob flag" "" "63209") "$<$?" ("$ $' --> flag" "String comparizon, alphabetically by
- character numbers." "142A6" :U) "$>$?" ("$ $' --> flag" "String comparizon, alphabetically by
- character numbers." "1420A" :U) "$<=$?" ("$ $' --> flag" "String comparizon, alphabetically by
- character numbers." "142E2" :U) "$>=$?" ("$ $' --> flag" "String comparizon, alphabetically by
- character numbers." "142BA" :U) "CkChr00" ("$ --> $ flag" "Returns FALSE if string contains any null
- characters." "42C3D") "#>HXS" ("# --> hxs" "Length will be five." "059CC") "%>#" ("% --> hxs" "Converts real number into hxs. Should be
- called %>HXS." "543F9") "WORDSIZE" ("--> #" "Returns the current wordsize as a bint." "54039") "dostws" ("# -->" "Sets the current wordsize." "53CAA") "NULLHXS" ("HXS 0" "Puts a null hxs in the stack." "055D5") "NULLHXS?" ("hxs --> flag" "Returns TRUE if the input is a null hxs." "05566" :U) "#>%" ("hxs --> %" "" "5435D") "&HXS" ("hxs hxs' --> hxs''" "Appends hxs'' to hxs'." "0518A") "MAKEHXS" ("#nibs --> hxs" "Makes blank hxs of specified size." "0EDE1") "!MAKEHXS" ("#nibs --> hxs" "Makes hxs filled with random data." "3742D" :U) "LENHXS" ("hxs --> #nibs" "Returns length in nibbles." "05616") "SUBHXS" ("hxs #m #n --> hxs'" "Returns sub hxs string." "05815") "bit+" ("hxs hxs' --> hxs''" "Adds two hxs." "53EA0") "bit%#+" ("% hxs --> hxs'" "Adds real to hxs, returns hxs." "54330") "bit#%+" ("hxs % --> hxs'" "Adds real to hxs, returns hxs." "54349") "bit-" ("hxs hxs' --> hxs''" "Subtracts hxs2 from hxs1." "53EB0") "bit%#-" ("% hxs --> hxs'" "Subtracts hxs from real, returns hxs." "542FE") "bit#%-" ("hxs % --> hxs'" "Subtracts real from hxs, returns hxs." "5431C") "bit*" ("hxs hxs' --> hxs''" "Multiplies two hxs." "53ED3") "bit%#*" ("% hxs --> hxs'" "Multiplies real by hxs, returns hxs." "542D1") "bit#%*" ("hxs % --> hxs'" "Multiplies hxs by real, returns hxs." "542EA") "bit/" ("hxs hxs' --> hxs''" "Divides hxs1 by hxs2." "53F05") "bit%#/" ("% hxs --> hxs'" "Divides real by hxs, returns hxs." "5429F") "bit#%/" ("hxs % --> hxs'" "Divides hxs by real, returns hxs." "542BD") "bitAND" ("hxs hxs' --> hxs''" "Bitwise QANDQ." "53D04") "bitOR" ("hxs hxs' --> hxs''" "Bitwise QORQ." "53D15") "bitXOR" ("hxs hxs' --> hxs''" "Bitwise QXORQ." "53D26") "bitNOT" ("hxs --> hxs'" "Bitwise QNOTQ." "53D4E") "bitASR" ("hxs --> hxs'" "Arithmetic shift one bit to the right. The
- most significant bit (the sign) does not
- change." "53E65") "bitRL" ("hxs --> hxs'" "Shifts circularly one bit to the left." "53E0C") "bitRLB" ("hxs --> hxs'" "Shifts circularly one byte to the left" "53E3B") "bitRR" ("hxs --> hxs'" "Shifts circularly one bit to the right." "53DA4") "bitRRB" ("hxs --> hxs'" "Shifts circularly one byte to the right." "53DE1") "bitSL" ("hxs --> hxs'" "Shifts one bit to the left." "53D5E") "bitSLB" ("hxs --> hxs'" "Shifts one byte to the left." "53D6E") "bitSR" ("hxs --> hxs'" "Shifts one bit to the right." "53D81") "bitSRB" ("hxs --> hxs'" "Shifts one byte to the right." "53D91") "bitNEG" ("hxs --> hxs'" "Changes sign of hxs." "53EC3" :U) "HXS==HXS" ("hxs hxs' --> %flag" "== test" "544D9") "HXS#HXS" ("hxs hxs' --> %flag" "\\=/ test" "544EC") "HXS<HXS" ("hxs hxs' --> %flag" "< test" "54552") "HXS>HXS" ("hxs hxs' --> %flag" "> test" "54500") "HXS>=HXS" ("hxs hxs' --> %flag" "\\>= test" "5452C") "HXS<=HXS" ("hxs hxs' --> %flag" "\\<= test" "5453F") ">TAG" ("ob $tag --> tagged" "Tags an object." "05E81") "USER$>TAG" ("ob $tag --> tagged" "Maximum of 255 characters in string." "225F5") "%>TAG" ("ob % --> tagged" "Converts real to string using current display
- mode and tags object." "22618") "ID>TAG" ("ob id/lam --> tagged" "Tags object with identifier or lam." "05F2E") "{}>TAG" ("{ id ob } --> tagged" "" "05E9F" :U) "TAGOBS" ("ob $tag --> tagged
- ob.. { $.. } --> tagged..." "Tags one or more objects." "647BB") "TAG>" ("tagged --> ob $tag" "" "05EC9" :U) "STRIPTAGS" ("tagged --> ob" "Strips all tags from the object." "64775") "STRIPTAGSl2" ("tagged ob' --> ob ob'" "Strips all tags from the object in level two." "647A2") "ARSIZE" ("[] --> #" "Returns number of elements as a bint." "03562") "DIMLIMITS" ("[] --> {#n #m}" "Returns list of array dimensions." "035A9") "GETATELN" ("# [] --> ob T
- --> F" "Gets one element from array." "0371D") "rGETATELN" ("" "Gets one element from array referenced by
- rompointer. " "0C506") "GETEL" ("#i [] --> ob T
- --> F" "Gets one element from array." "0C501" :U) "MATIDN" ("[F%] --> [F%]'" "Creates identity matrix. Errors if input is
- not a square matrix." "35D35" :U) "SWAPROWS" ("M % %' --> M'" "SWAP two rows in matrix. Internal version of
- xRSWP. " "3745E") "SWAPCOLUMNS" ("[] #m #n --> []' #m #n" "" "37508" :U) "TYPEARRY@" ("[] --> #" "Returns address of the prolog of the array
- element type." "9358F" :UBS) "ARRYEL?" ("{#n #m} [] --> # T
- --> F" "Returns TRUE if array element exists." "03685" :U) "FINDELN" ("{} A --> # flag" "Return index # of element {} in array." "03685" :U) "BANGARRY" ("el # M --> M'" "Puts el at index # of matrix M." "1DBB0" :UBS) "MATCON" ("[%] % --> [%]'
- [C%] C% --> [C%]'" "Replace all elements of [F%] by F%." "35CAE") "METREDIM" ("[F%] {#n #m} --> [F%]'" "Redimensions matrix. Removes elements or adds
- zeros as necessary." "37E0F") "MDIMS" ("[1D] --> #m F
- [2D] --> #m #n T" "If it is a vector, returns number of elements
- and FALSE. If it is an array (including
- arrays with only one line), returns
- dimensions and TRUE." "357A8") "MDIMSDROP" ("[2D] --> #m #n" "MDIMS followed by DROP." "62F9D") "OVERARSIZE" ("[] ob --> [] ob #elts" "Does OVER then <REF>ARSIZE." "63141") "PULLREALEL" ("[%] # --> [%] %" "Gets real element." "355B8") "PULLCMPEL" ("[C%] # --> [C%] C%" "Gets complex element." "355C8") "PULLEL" ("[F%] #n --> [F%] F%" "Gets real or complex element." "3558E" :U) "PULLEREALEL" ("[%] #n --> [%] %%" "Gets real element then converts to long real." "35602" :U) "PULLLONGEL" ("[F%] #n --> [F%] L%" "Gets element then converts to long." "355D8" :U) "PUTEL" ("[%] % # --> [%]'
- [C%] C% # --> [C%]'" "Puts element at specified position. Converts
- to \"short\" before. Warning: no copy to
- tempob first." "35628") "PUTREALEL" ("[%] % # --> [%]'" "Puts real element at specified position.
- Warning: no copy to tempob first." "3566F") "PUTCMPEL" ("[C%] C% # --> [C%]'" "Puts complex element at specified position.
- Warning: no copy to tempob first." "356F3") "MAT+" ("[F%] [F%]' --> [F%]''" "Adds two arrays." "36115" :U) "MAT-" ("[F%] [F%]' --> [F%]''" "Subtracts two arrays." "36278" :U) "MAT*" ("[F%] [F%]' --> [F%]''" "Multiplies two arrays." "3644E" :U) "MAT/" ("[F%] [F%]' --> [F%]''" "Divides two arrays." "36AC3" :U) "MATFLOAT*" ("[F%] F% --> [F%]'" "Multiplies matrix by float." "362DC" :U) "MATFLOAT/" ("[F%] F% --> [F%]'" "Divides matrix by float." "363DB" :U) "MATSQ" ("[F%] --> [F%]'" "Squares matrix." "36444" :U) "MATCONJ" ("[F%] --> [F%]'" "If a complex array, does the conjugate of all
- elements. If a real array, does nothing." "35F30" :U) "MATNEG" ("[F%] --> [F%]'" "Changes sign of all elements of array." "35DEB" :U) "MATINV" ("[F%] --> [F%]'" "Reciprocal of all elements of array." "36A99" :U) "MATREDIM" ("[F%] {#n #m} --> [F%]'" "" "37E0F") "MATTRN" ("[F%] --> [F%]'" "Transposes matrix." "3811F") "DUP%0CON" ("[F%] --> [F%] [0%]" "DUP then creates a matrix of the same size
- filled with zeros." "35FA3" :U) "MATDET" ("[F%] --> F%" "Calculates determinant of matrix. Generates
- \"Invalid Dimension\" error for non-square
- matrices." "36A48" :U) "MATABS" ("[F%] --> F%" "Returns the scalar magnitude of array." "369E9" :U) "MATDOT" ("[F%] [F%]' --> F%" "Returns the dot product of two vectors." "36705" :U) "MATCROSS" ("[F%] [F%]' --> [F%]''" "Returns the cross product of two vectors.
- Generates a \"Invalid Dimension\" error if
- inputs are not vectors." "36791" :U) "MATRSD" ("[F%] [F%] [F%] --> [F%]" "Calculates residuals of solutions of a linear
- system." "365BB" :U) "MATRNRM" ("" "Row norm." "368F4" :U) "MATCNRM" ("[F%] --> F%" "Column norm." "3690D" :U) "MATR>C" ("[%re] [%im] --> [C%]" "Creates complex matrix from real and
- imaginary parts." "36039" :U) "MATC>R" ("[C%] --> [%re] [%im]" "Explodes complex matrix into real and
- imaginary parts." "360B6" :U) "MATRE" ("[F%] --> [%re]" "Returns (real) matrix with real part of
- complex numbers. Does nothing if the input is
- a real matrix." "35F8F" :U) "MATIM" ("[F%] --> [%im]" "Returns (real) matrix with imaginary part of
- complex numbers. Returns an array of zeros if
- input is a real matrix." "35FEE" :U) "MATRND" ("[F%] % --> [F%]'" "RND on all elements of matrix." "35E2C" :U) "MATTRNC" ("[F%] % --> [F%]'" "TRNC on all elements of matrix." "35EA9" :U) "DOARRYPRG1" ("seco [F%] --> [F%]'" "Evaluates seco for each element in array,
- then builds array again. Argument for seco
- will be L%." "35C2C" :U) "DOARRYPRG2" ("seco [F%] [F%] --> [F%]'" "Same as above, but seco has two arguments:
- one from array1 and another from
- array2. Arrays must be F%. Arguments for seco
- will be L%." "35C63" :U) "MAKEARRY" ("{#n #m} ob --> []" "Makes array with all elements initialized to
- ob." "03442") ">ARRY" ("F%..F% #n [%F] --> [F%]'" "Copies floats into array." "19294" :U) "XEQ>ARRY" ("F%..F% {#n #m} --> [F%]" "Makes array with specified dimensions and
- elements. Does checks first." "1D054") "XEQ>ARRAY" ("F%..F% {#n #m} --> [F%]" "Makes array with specified dimensions and
- elements. Does checks first." "1D054") "XEQ>VECTOR" ("F%..F% %n --> [%F]" "Creates a vector." "1D02C" :U) "DOARRY>" ("[] --> F%..F% {#n #m}" "Explodes array. Only works for arrays of
- (normal) real and complex numbers." "1D0AB" :U) "STATCLST" ("-->" "Clears \\GSDAT." "2C22F") "STATRCL" ("--> ob" "Recalls \\GSDAT." "2C270" :U) "STATSTO" ("ob -->" "Stores ob into \\GSDAT." "2C1F3" :U) "STATN" ("--> N" "Internal N\\GS." "2C535") "STATSMIN" ("--> %" "Internal MIN\\GS." "2C58A") "STATSMAX" ("--> %" "Internal MAX\\GS." "2C558") "STATMEAN" ("--> %
- --> []" "Internal MEAN." "2C571") "STATSTDEV" ("--> %
- --> []" "Internal SDEV." "2C5A3") "STATTOT" ("--> %
- --> []" "Internal TOT." "2C5BC") "STATVAR" ("--> %
- --> []" "Internal VAR." "2C5D5") "STATCOL" ("% %' -->" "Internal COL\\GS." "2C675" :U) "STATXCOL" ("n -->" "Internal XCOL." "2C6B6" :U) "STATYCOL" ("n -->" "Internal YCOL." "2C6CF" :U) "STATGETXCOL" ("" "" "2C6F2" :U) "STATGETYCOL" ("" "" "2C706" :U) "STATCOV" ("--> %" "Internal COV." "2C8E6" :U) "STATX" ("--> %" "Internal \\GSX." "2C940" :U) "STATY" ("--> %" "Internal \\GSY." "2C959" :U) "STATXX" ("--> %" "Internal \\GSX2." "2C972" :U) "STATYY" ("--> %" "Internal \\GSY2." "2C99A" :U) "STATXY" ("--> %" "Internal \\GSXY." "2C9C2" :U) "STATLR" ("" "" "2CA0D" :U) "STATPREDX" ("% --> %'" "Internal PREDX." "2CB4D" :U) "STATPREDY" ("% --> %'" "Internal PREDY." "2CADA" :U) "ColumnMIN" ("" "" "2CCD3" :U) "ColumnMAX" ("" "" "2CCBA" :U) "ColumnMEAN" ("" "" "2CCEE" :U) "ColumnTDEV" ("" "" "2CD09" :U) "ColumnTOT" ("" "" "2CCDF" :U) "ColumnVAR" ("" "" "2CCFD" :U) "STATCORR" ("--> %" "Internal CORR." "2C83C" :U) "um*" ("* marker" "" "10B5E") "um/" ("/ marker" "" "10B68") "um^" ("^ marker" "" "10B72") "umP" ("Char prefix operator" "" "10B7C") "umEND" ("Unit end operator" "" "10B86") "EXTN" ("ob1..obn #n --> u" "Builds a unit object." "05481") "U>NCQ" ("u --> n%% cf%% qhxs" "Returns the number, conversion factor to base
- units and a vector in the form:
- [ kg m A s K cd mol r sr ? ]
- where each element represents the exponent of
- that unit. For example, 1_N U>NCQ would
- return:
- %%1 %%1 [ 1 1 0 -2 0 0 0 0 0 0 ]
- since it is equivalent to 1_kg*m/s^2" "0FE44") "UM>U" ("% u --> u'" "Replaces number part of unit." "0F33A") "UMCONV" ("u1 u2 --> u1'" "Change units of unit1 to units of unit2." "0F371") "UMSI" ("u --> u'" "Equivalent to user word UBASE." "0F945") "UMU>" ("u --> % u'" "Returns number and normalized part of unit." "0F34E") "UNIT>$" ("u --> $" "Converts unit to string." "0F218") "UMFACT" ("u1 u2 --> u" "Equivalent to user word UFACT." "197C8" :U) "U>nbr" ("u --> %" "Returns number part of unit." "10047") "Unbr>U" ("u % --> u'" "Replaces number part of unit." "10065") "TempConv" ("???" "Used by UMCONV for the conversion of
- temperature units." "0F41B") "KeepUnit" ("% ob ob' --> % ob
- % ob u --> u' ob" "If the level one object is a unit object,
- replaces the numeric part of it with the
- number on level 3. If not, just DROP." "1553B") "UM+" ("u u' --> u''" "" "0F6A2") "UM-" ("u u' --> u''" "" "0F774") "UM*" ("u u' --> u''" "" "0F792") "UM/" ("u u' --> u''" "" "0F823") "UM%" ("u %percent --> u'" "" "0FBAB") "UM%CH" ("u u' --> %" "" "0FC3C") "UM%T" ("u u' --> %" "" "0FCCD") "UMMIN" ("u u' --> u?" "" "0FB8D") "UMMAX" ("u u' --> u?" "" "0FB6F") "UMXROOT" ("u u' --> u''" "" "0F8FA") "UMABS" ("u --> u'" "" "0F5FC") "UMCHS" ("u --> u'" "" "0F615") "UMINV" ("u --> u'" "" "0F841" :U) "UMSQ" ("u --> u'" "" "0F913") "UMSQRT" ("u --> u'" "" "0F92C") "UMOPER:" ("u --> u'" "Evaluates next object with numeric unit part,
- then builds unit again. For example:
- :: UMOPER: %1/ ;" "0FD4A" :U) "UMSIGN" ("u --> %" "" "0FCE6") "UMIP" ("u --> u'" "" "0FCFA") "UMFP" ("u --> u'" "" "0FD0E") "UMFLOOR" ("u --> u'" "" "0FD22") "UMCEIL" ("u --> u'" "" "0FD36") "UMRND" ("u --> u'" "" "0FD68") "UMTRC" ("u --> u'" "" "0FD8B") "UMCOS" ("u --> u'" "" "0F660") "UMSIN" ("u --> u'" "" "0F62E") "UMTAN" ("u --> u'" "" "0F674") "UM=?" ("u u' --> %flag" "" "0F584") "UM#?" ("u u' --> %flag" "" "0F598") "UM<?" ("u u' --> %flag" "" "0F5AC") "UM>?" ("u u' --> %flag" "" "0F5C0") "UM<=?" ("u u' --> %flag" "" "0F5D4") "UM>=?" ("u u' --> %flag" "" "0F5E8") "puretemp?" ("[] []' --> [] []' flag" "Checks of the two arrays both denote pure
- temperature units, i.e. if both arrays are
- equal to
- [0. 0. 0. 0. 1. 0. 0. 0. 0. 0.]" "0F3E4") "&COMP" ("comp comp' --> comp''" "Concatenates two composites." "0521F") ">TCOMP" ("comp ob --> comp+ob" "Adds ob to tail (end) of composite." "052FA") ">HCOMP" ("comp ob --> ob+comp" "Adds ob to head (beginning) of composite." "052C6") "SWAP>HCOMP" ("ob comp --> ob+comp" "Does SWAP then >HCOMP." "1AC93" :U) "CARCOMP" ("comp --> ob_head
- comp_null --> comp_null" "Returns first object of the composite, or a
- null composite if the argument is a null
- composite." "05089") "?CARCOMP" ("comp T --> ob
- comp F --> comp" "If the flag is TRUE, does CARCOMP." "6317D") "CDRCOMP" ("comp --> comp-ob_head
- comp_null --> comp_null" "Returns the composite minus its first object,
- or a null composite if the argument is a null
- composite." "05153") "LENCOMP" ("comp --> #n" "Returns length of composite (number of
- objects)." "0567B") "DUPLENCOMP" ("comp --> comp #n" "Does DUP then <REF>LENCOMP." "63231") "LENCOMP>%" ("comp --> %n" "Returns length of composite as a real number." "1CA3A" :U) "NULLCOMP?" ("comp --> flag" "If the composite is empty, returns TRUE." "055B7") "DUPNULLCOMP?" ("comp --> comp flag" "Does DUP then <REF>NULLCOMP?." "6321D") "NTHELCOMP" ("comp #i --> ob T
- --> F" "Returns specified element of composite and
- TRUE, or just FALSE if it could not be found." "056B6") "NTHCOMPDROP" ("comp #i --> ob" "Does <REF>NTHELCOMP then DROP." "62B9C") "NTHCOMDDUP" ("comp #i --> ob ob" "Does <REF>NTHCOMPDROP then DUP." "62D1D") "rNTHELCOMP" ("romptr #i --> ob T
- --> F" "Returns specified element of composite
- referenced by the romptr, and TRUE, or just
- FALSE if it could not be found." "71C3B") "POSCOMP" ("comp ob pred --> #i
- --> #0
- (eg: pred = ' %<)" "Evaluates pred for all elements of composite
- and ob, and returns index of first object for
- which the pred is TRUE. If no one returned
- TRUE, returns #0. For example, the program
- below returns #4:
- :: { %1 %2 %3 %-4 %-5 %6 %7 } %0
- ' %< POSCOMP ;" "64426") "EQUALPOSCOMP" ("comp ob --> #pos
- --> #0" "POSCOMP with EQUAL as test." "644A3") "NTHOF" ("ob comp --> #i
- --> #0" "Does SWAP then <REF>EQUALPOSCOMP." "644BC") "#=POSCOMP" ("comp # --> #i
- --> #0" "POSCOMP with #= as test." "6448A") "SUBCOMP" ("comp #m #n --> comp'" "Returns a sub-composite. Makes all index
- checks first." "05821") "matchob?" ("ob comp --> T
- --> ob F" "Returns TRUE if ob is EQUAL to any element of
- the composite." "643EF") "Embedded?" ("ob1 ob2 --> flag" "Returns TRUE if ob2 is embedded in, or is the
- same as, ob1. Otherwise returns FALSE." "64127") "Find1stTrue" ("comp test --> ob T
- --> F" "Tests every element for test. The first one
- that returns TRUE is put into the stack along
- with TRUE. If no object returned TRUE, FALSE
- is put into the stack. For example, the
- program below returns %-4 and TRUE.
- :: { %1 %2 %2 %-4 %-5 %6 } ' %0<
- Find1stTrue ;" "644D0") "Find1stT.1" ("" "Recursive internal function for Find1stTrue." "644EE") "Lookup" ("ob test comp --> nextob T
- --> ob F" "Tests every odd element (1,3,...) in the
- composite. If a test returns TRUE, the
- object after the tested one is returned,
- along with TRUE. If no object tests TRUE,
- FALSE is returned. For example, the program
- below returns %6 and TRUE.
- :: %0 ' %<
- { %1 %2 %3 %-4 %-5 %6 }
- Lookup ;" "6452F") "Lookup.1" ("ob test --> nextob T
- --> ob F
- Return Stack:
- comp -->" "Lookup with the composite already pushed
- (with >R) onto the runstream. Called by
- Lookup. " "64548") "EQLookup" ("ob comp --> nextob T
- --> ob F" "Lookup with EQ as test." "64593") "NEXTCOMPOB" ("comp #ofs --> comp #ofs' ob T
- --> comp F" "Returns object at specified nibble offset
- from start. If the object is SEMI (i.e., the
- end of the composite has been reached)
- returns FALSE. To get the first element, use
- FIVE as offset value (to skip the prolog).
- ZERO works as well." "6480B") "COMPN" ("obn..ob1 #n #prolog --> comp" "" "05331") "{}N" ("obn..ob1 #n --> { obn..ob1 }" "" "05459") "::N" ("ob1..obn #n --> :: ob1..obn ;" "" "05445") "SYMBN" ("ob1..obn #n --> sym" "" "0546D") "SYMBN:" ("ob1..obn #n --> symb" "Does 'R, SWAP#1+ then SYMBN. Creates a
- symbolic from the meta in the stack and the
- next object in the runstream. This object is
- added to the end of the symbolic." "54CEF" :U) "top&Cr" ("meta1 meta2 --> symb" "Does top& then <REF>SYMBN: ." "63F01") "ONESYMBN" ("ob1..obn #n --> symb" "" "5E661" :U) "P{}N" ("ob1..obn #n --> {}" "Build list with possible garbage collection." "5E0DA") "P::N" ("ob1..obn #n --> seco" "Build seco with possible garbage collection." "5E111" :U) "PSYMBN" ("ob1..obn #n --> sym" "Build symb with possible garbage collection." "5E0A3" :U) "INNERCOMP" ("comp --> obn..ob1 #n" "" "054AF") "DUPINCOMP" ("comp --> comp obn..ob1 #n" "" "631E1") "SWAPINCOMP" ("comp obj --> obj obn..ob1 #n" "" "631F5") "INCOMPDROP" ("comp --> obn..ob1" "" "62B88") "INNERDUP" ("comp --> obn..ob1 #n #n" "" "62C41") "ICMPDRPRTDRP" ("comp --> obn...ob4 ob2 ob1" "Does <REF>INCOMPDROP then ROTDROP." "4A95A") "XEQLIST>" ("comp --> obn..ob1 %n" "" "1C973" :U) "INNER#1=" ("comp --> obn..ob1 flag" "" "636A0") "INNERtop&" ("obn..ob1 #n comp --> obm..ob1 #m" "Explodes composite and adds to meta:
- INNERCOMP top&
- Adds composite objects to meta object." "5E585") "NULL{}" ("--> {}" "Pushes a null list to the stack." "055E9") "DUPNULL{}?" ("{} --> {} flag" "" "63A6F") "ONE{}N" ("ob --> { ob }" "" "23EED") "TWO{}N" ("ob1 ob2 --> { ob1 ob2 }" "" "631B9") "THREE{}N" ("ob1 ob2 ob3 --> { ob1 ob2 ob3 }" "" "631CD") "#1-{}N" ("ob1..obn #n+1 --> {}" "" "631A5") "PUTLIST" ("ob #i {} --> {}'" "Replaces object at specified
- position. Assumes valid #i." "1DC00") "INSERTN{}" ("{} ob #n --> {}'" "Insert ob at #nth position. Assumes valid #n." "0E461" :U) "REMOVEN{}" ("{} #n --> {}'" "Removes nth ob. Assumes valid #n." "0E4DE" :U) "ROLL{}" ("{} --> {}'" "Rolls list elements." "49CD6" :U) "apndvarlst" ("{} ob --> {}'" "Appends ob to list if not already there." "35491") "EqList?" ("ob -->" "Is ob a list of equations? Returns T if ob
- is a list of at least two elements, and the
- second element is not a list itself." "152FF") "NULL::" ("--> :: ;" "Returns null secondary." "055FD") "Ob>Seco" ("ob --> :: ob ;" "Does ONE then <REF>::N." "63FE7") "?Ob>Seco" ("ob --> :: ob ;" "If the object is not a secondary, does
- Ob>Seco." "63FCE") "2Ob>Seco" ("ob1 ob2 --> :: ob1 ob2 ;" "Does TWO then <REF>::N." "63FFB") "::NEVAL" ("ob1..obn #n --> ?" "Does <REF>::N then <REF>EVAL." "632D1") "argum" ("seco --> seco #args" "Returns argument count for secondary. Checks
- first command, it it is different from CK0,
- CK1&Dispatch, etc. #5 is returned." "5E8DE" :U) "infarg?" ("seco --> seco flag" "Is first command in secondary CKINFARGS?" "5E9A7" :U) "dup" ("meta --> meta meta" "" "5E35C" :U) "NDROP" ("1..n #n -->" "" "0326E") "DROPNDROP" ("1..n #n ob -->" "" "63FA6") "N+1DROP" ("ob 1..n #n -->" "" "62F75") "#1+NDROP" ("ob 1..n #n -->" "" "62F75") "NDROPFALSE" ("ob1..obn #n --> F" "" "169A5") "psh" ("meta1 meta2 --> meta2 meta1" "Should be called swap." "5EB1C") "rot" ("meta1 meta2 meta3 --> meta2 meta3 meta1" "" "5EB58" :UBS) "unrot" ("meta1 meta2 meta3 --> meta3 meta1 meta2" "" "5EBDB" :UBS) "4roll" ("meta1 meta2 meta3 meta4 --> meta2 meta3 meta4 meta1" "" "5EBC6" :U) "4unroll" ("meta1 meta2 meta3 meta4 --> meta4 meta1 meta2 meta3" "" "5EBEA" :U) "5roll" ("meta1..meta5 --> meta2..meta5 meta1" "" "5ED45" :U) "5unroll" ("meta1..meta5 --> meta5 meta1..meta4" "" "5ED5A" :U) "N+1roll" ("META1..METAn+1 #n --> META2..METAn+1 META1" "" "5EBFC" :U) "N+1unroll" ("META1..METAn+1 #n --> METAn+1 META1..METAn" "" "5ED6C" :U) "SWAPUnNDROP" ("meta1 meta2 --> meta2" "Should be called swapdrop." "63911") "SWAPUnDROP" ("meta1 meta2 --> meta2 ob1..obn" "Swaps two metas and drops the count. Should
- be called swapDROP." "638FD") "rotswap" ("meta1 meta2 meta3 --> meta2 meta1 meta3" "" "5E857" :U) "metaROTDUP" ("meta1 meta2 meta3 --> meta2 meta3 meta1 meta1" "Should be called rotdup." "63F1A") "4rollunrot" ("meta1 meta2 meta3 meta4 --> meta2 meta1 meta3 meta4" "" "5E870" :U) "top&" ("meta1 meta2 --> meta1&meta2" "" "5E415") "pshtop&" ("meta1 meta2 --> meta2&meta1" "" "5E4D1") "ROTUntop&" ("meta1 meta2 meta3 --> meta2 meta3&meta1" "" "63F2E") "rolltwotop&" ("meta1 meta2 meta3 --> meta3 meta1&meta2" "" "63F42") "roll2top&" ("meta1 meta2 meta3 --> meta3 meta1&meta2" "" "63F42") "over&" ("meta1 meta2 meta3 --> meta1&meta2 meta3" "" "5E3C0" :U) "psh&" ("meta1 meta2 meta3 --> meta1&meta3 meta2" "" "5E3AC") "overev&" ("meta1 meta2 meta3 --> meta2&meta1 meta3" "" "5E843" :U) "2top&" ("meta1 meta2 meta3 --> meta1&meta2&meta3" "" "5E490" :U) "top&pshtop&" ("meta1 meta2 meta3 --> meta2&meta3&meta1" "" "5B861" :U) "DUP#1+PICK" ("n..1 #n --> n..1 #n n" "" "6119E") "pick1" ("ob meta --> ob meta ob" "" "5FC24" :U) "get1" ("ob meta --> meta ob" "" "61305") "OVER#2+UNROL" ("meta ob --> ob meta" "" "63105") "pshm1" ("meta ob --> ob #1 meta" "" "5E3E8" :U) "psh1top&" ("meta ob --> ob&meta" "" "5E401") "pulldrop" ("meta&ob --> meta" "" "5EAF4" :U) "pullpshm1" ("meta&ob --> ob #1 meta" "" "5E6BB" :U) "pullrev" ("ob&meta --> meta ob" "" "5E4BD") "pulldroppull" ("meta&ob1&ob2 --> meta ob1" "" "5FA45" :U) "2pull2DROP" ("meta&ob1&ob2 --> meta" "" "5CC12" :U) "revpulldrop" ("meta&ob1 ob2 --> meta ob2" "" "5FA63" :U) "revpull&psh" ("meta&ob1 ob2 --> ob1&ob2 meta" "" "548AA" :U) "psh1&" ("meta1 meta2 ob --> ob&meta1 meta2" "" "5E706") "psh1&rev" ("meta1 meta2 ob --> ob&meta1 meta2" "" "5E7A5") "addtpsh" ("meta1 meta2 ob --> meta1&ob meta2" "" "57432" :U) "(rot1)" ("ob meta1 meta2 --> meta1 meta2 ob" "" "10ADB" :UBS) "UobROT" ("ob meta1 meta2 --> meta1 meta2 ob" "" "10ADB" :UBS) "unrot1" ("meta1 meta2 ob --> ob meta1 meta2" "" "10AF9" :U) "pullpsh1&" ("meta1 meta2&ob --> ob&meta1 meta2" "" "5E4EA") "pullrev1&" ("meta1 meta2&ob --> meta1&ob meta2" "" "5E503" :U) "pshpullpsh1&" ("meta1&ob meta2 --> ob&meta2 meta1" "" "5D6FA" :U) "pshzer" ("meta --> #0 meta" "" "5E67A") "4psh" ("meta1 ob1..ob4 --> ob1&..ob4 meta1" "meta2 = ob1&ob2&b3&ob4" "25322" :U) "repl%1" ("meta&ob --> meta&%1" "" "554B3" :U) "repl%-1" ("meta&ob --> meta&%-1" "" "55607" :U) "COLAkeep1st" ("meta&ob --> ob" "Returns and ( meta&ob ob )" "5483C" :U) "%1pshm1" ("meta --> %1 #1 meta" "" "5FC38" :U) "addt:" ("meta --> meta&ob" "ob is next ob in runstream. " "5E51C" :U) "addt2:" ("meta --> meta&ob1&ob2" "ob is next ob in runstream. " "5E530" :U) "repl:" ("meta&ob --> meta&ob'" "ob is next ob in runstream. " "5E59E" :U) "psh1&rev:" ("meta1 meta2 --> meta1&ob meta2" "ob is next ob in runstream. " "5E549" :U) "psh1&rev2:" ("meta1 meta2 --> meta1&ob1&ob2 meta2" "ob is next ob in runstream. " "5E562" :U) "2psh1&rev:" ("meta1 meta2 --> meta1&ob meta2&ob" "ob is next ob in runstream. " "5DD65" :U) "replfunc" ("meta&ob --> meta&LAM1" "Uses contents of LAM1. " "55477" :U) "xssgneral" ("meta1 meta2 --> meta1&meta2&LAM1" "Uses contents of LAM1. " "560ED") "xnsgeneral" ("meta --> LAM3&meta&LAM1" "Uses contents of LAM1 and LAM3." "56101") "xsngeneral" ("meta --> meta&LAM3&LAM1" "Uses contents of LAM1 and LAM3." "5611F") "dropaddoper" ("meta1 meta2 meta3 --> meta1&meta2&LAM1" "Uses contents of LAM1." "562BE" :U) "MetaUnCalc" ("meta ob --> LAM3 #1" "Uses contents of LAM1 LAM3." "56309" :U) "SubMetaOb" ("meta #start #end --> meta'" "Gets a sub-meta. Does range checks." "64345") "SubMetaOb1" ("ob1..obi..obn #n #i #n #i --> ob1..obi #n #i" "This function can be used to take the first i
- objects of a meta, if you follow it with
- SWAPDROP. Example:
- :: %1 %2 %3 %4 %5 BINT5
- BINT3 BINT5 BINT3
- SubMetaOb1 ;
- results in:
- %1 %2 %3 #5 #3" "643BD") "tailpsh" ("meta #n --> meta1 meta2" "Pushes n-1 last objects in meta to meta1." "5F996" :U) "metatail" ("ob1..obn-i..obn #i #n+1 --> ob1..ob..obn-i #n-i obn-i+1..obn #i" "#n is the count of the objects in meta. Takes
- the last #i elements of meta and creates a
- new one. Example:
- :: %1 %2 %3 %4 %5
- BINT2 BINT6 metatail ;
- Results:
- %1 %2 %3 #3 %4 %5 #2" "28296") "MEQU?" ("meta1 meta2 --> meta1 meta2 flag" "If the metas are equal (i.e., same count and
- equal objects) returns TRUE." "584B2" :U) "ObInMeta?" ("meta ob --> meta ob flag" "Returns TRUE if ob is equal to some ob in
- meta." "5768A" :U) "?addinver:" ("meta&Nob --> meta
- meta --> meta&1LAM" "If next object in the runstream is equal to
- first object of meta, drops that object.
- Otherwise, adds 1LAM to meta." "55314" :U) "?addrever" ("meta&1LAM --> meta&1LAM
- meta --> meta&1LAM" "Adds 1LAM to meta, if not already there." "5540E" :U) "?addsimir" ("meta meta --> meta" "" "5613D" :U) "NoIdsInMeta?" ("meta --> meta flag" "If meta has any ids, lams or secondaries
- starting with CK0, returns FALSE." "58715" :U) "dvars?" ("meta --> meta flag" "Returns TRUE if meta contains any LAM dvar." "5AD08" :U) ">dvars" ("meta1 meta2 --> meta1&meta2'" "All ids in meta2 matching lam 'dvar contents
- are changed to LAM_'dvar. (meta1 can be #0)." "5670F" :U) "dvars>" ("meta --> meta'" "Lam 'dvars: are changed to 1LAM)" "5AC86" :U) "dropDROPf" ("ob meta --> F" "" "50F60" :U) "DROP2dropf" ("meta1 meta2 ob --> F" "" "57419" :U) "2DROP2dropf" ("meta1 meta2 ob1 ob2 --> F" "" "57405" :U) "Repl0" ("meta --> %0 #0" "" "5551C" :U) "Repl1" ("meta --> %1 #1" "" "55535" :U) "Repl-1" ("meta --> %-1 #1" "" "5554E" :U) "2Repl0" ("meta1 meta2 --> %0 #1" "" "56183" :U) "2Repl-1" ("meta1 meta2 --> %-1 #1" "" "561D8" :U) "DropRepl0" ("meta ob --> %0 #1" "" "5643A" :U) "Repl0ABND" ("meta --> %0" "" "5499F" :U) "Cr" ("ob1..obn #n -> symb" "Does 'R, SWAP#1+ then <REF>SYMBN . Creates a
- symbolic from the meta in the stack and the
- next object in the runstream. This object is
- added to the end of the symbolic." "54CEF" :U) "NULLSYMB" ("--> sym" "Puts a null algebraic in the stack." "055F3" :U) "SINNER" ("sym --> meta
- ob --> ob #1" "If the argument is a symbolic, does
- INNERCOMP, otherwise ONE. Note that ob #1 is
- a meta object with only one object." "5E067" :U) "2SINNER" ("ob1 ob2 --> meta1 meta2" "SINNER for two objects." "5E30C" :U) "2SINNERtop&" ("ob1 ob2 --> meta" "Does <REF>2SINNER then <REF>top& ." "5E2F8" :U) "SINNERMETA" ("meta --> meta'" "Explodes each object in meta with SINNER and
- merges the result with top&." "5E32A" :U) "EXPLODE" ("ob --> meta" "Uses recursive calls to SINNER to explode
- object." "5F2A3" :U) "IMPLODE" ("meta --> ob" "Builds symbolic obeying VUNS properties
- (UNSYM element), checking fcnapply, etc.
- Does not build symbolic if result is a single
- object valid in symbolics." "5F2EE" :U) "symcomp" ("ob --> ob'" "If ob is symbolic, does nothing, otherwise
- ONE SYMBN." "5E652") "SWAPcompSWAP" ("ob ob' --> ob'' ob'" "Does SWAP symcomp SWAP." "5A01D") "CKSYMBN" ("meta --> ob" "If size is not one, does SYMBN, else DROPSYM." "5E085" :U) "DROPSYM" ("ob1 ob2 --> ob" "Drops ob2, if ob1 if symf does nothing, else
- does ONESYMBN." "5F384" :U) "SPLITEQ" ("sym --> arg1 arg2" "Internal version of EQ\\->." "1CF2E" :U) "EXPR>" ("sym --> arg1..argn %n ob" "Internal version of OBJ\\->." "1CFD0" :U) "CRUNCH" ("ob --> %" "Internal version of \\->NUM." "1578D") "SYMCRUNCH1" ("ob --> %" "If id does <REF>XEQRCL , then does
- <REF>CRUNCH for all object types." "22F68" :U) "SYMCRUNCH2" ("ob1 ob2 --> % ob2" "<REF>SYMCRUNCH1 for the object in level two." "22F86" :U) "FINDVAR" ("sym --> {}" "Returns a list of the variables of the
- equation, recursing into programs and
- functions in the equation." "353AB" :U) "uncrunch" ("-->" "Clears numeric results flag (system flag 3)
- for the next command only. Example:
- SYMCOLCT = :: uncrunch colct ;
- --
- Flags: -3" "5A036") "cknumdsptch1" ("sym --> symf" "Used by one argument functions to evaluate a
- symbolic or numeric routine according to
- numeric results flag. Usage:
- :: cknumdsptch1 <sym> <num> ;
- If numeric mode, CRUNCH is applied to the
- level one object and COLA is applied to
- <num>. If symbolic mode, ckseval1: is called.
- Example:
- :: cknumdsptch1 MetaRE xRE ;
- --
- Flags: -3" "545A0") "ckseval1:" ("symf' --> symf'" "Binds next two objects in the runstream to
- LAMxSYMfcn and LAMxfnc. Explodes symf, then
- evaluates next on Meta, then builds ob with
- CKSYMBN. If symf is equation next is
- evaluated on both sides, then equation is
- rebuilt (ckevaleq1)." "54DBC" :U) "ckevaleq1" ("meta&= --> sym" "Evaluates 2LAM on both sides of equation,
- rebuilds symbolic and abandons temporary
- environment." "54E2A" :U) "sscknum2" ("sym sym --> symf" "Used by two argument functions to evaluate
- function according to current numeric mode.
- Usage: :: sscknum2 <sym> <num> ;" "558DC") "sncknum2" ("sym % --> symf" " Usage: :: sncknum2 <sym> <num> ;
- In symbolic mode uses cksneval2:.
- Example:
- SYM+O = :: sncknum2 Meta+Con x+ ;" "558F5") "nscknum2" ("% sym --> symf" " Usage: :: nscknum2 <sym> <num> ;
- In symbolic mode uses cknseval2:.
- Example:
- O+SYM = :: nscknum2 Con+Meta x+ ;" "5590E") "cknum2:" ("symf symf --> symf" "Used by the three above functions to
- determine (and possibly to CRUNCH) the
- program to COLA." "55657" :U) "cksseval2:" ("sym sym --> symf" "Binds next two objects in the runstream to
- LAMxSYMfcn and LAMxfcn. Explodes the objects
- in the stack, and evaluates next object in
- the runstream. If either is an equation,
- ckevaleq2 is called. Rebuilds one symbolic." "557EC" :U) "cksneval2:" ("sym % --> symf" "Binds % and next two objects in the runstream
- to LAMsc1, LAMxSYMfcn and LAMxfcn. Explodes
- sym, evaluates LAMxSYMfnc, rebuilds symbolic.
- If sym is equation, ckevaleq1 is called." "5576F" :U) "cknseval:" ("% sym --> symf" "Does SWAP then <REF>cknseval2: ." "5575B" :U) "parameval" ("sym param --> ?" "Ensures sym is symbolic (using symcomp), then
- executes param on each element of symbolic.
- param is bound to 1LAM during the loop. param
- should return a flag. If TRUE, or if the
- object in level 1 is not an operator the loop
- continues, else possible COLCT property is
- executed. (Better return TRUE always)." "58CE4" :U) "eval" ("sym --> ?" "Like <REF>parameval, but without binding of a
- new param. Use this for recursive evaluation
- with the same parameter. (See SHOWLS and
- showparam for examples)." "58CEE" :U) "evalTRUE" ("sym --> ? T" "Used for recursive parameval." "5918A" :U) "SYM+O" ("" "" "55F2B" :U) "O+SYM" ("" "" "55F44" :U) "SYM+" ("" "" "55F5D" :U) "SYM-O" ("" "" "55F76" :U) "O-SYM" ("" "" "55F85" :U) "SYM-" ("" "" "55F8F" :U) "SYM*O" ("" "" "55FC1" :U) "O*SYM" ("" "" "55FDA" :U) "SYM*" ("" "" "55FF3" :U) "SYM/O" ("" "" "5600C" :U) "O/SYM" ("" "" "56025" :U) "SYM/" ("" "" "5603E" :U) "SYM^O" ("" "" "55EE0" :U) "O^SYM" ("" "" "55EF9" :U) "SYM^" ("" "" "55F12" :U) "SYM%MOD" ("" "" "56057" :U) "%SYMMOD" ("" "" "56070" :U) "SYMMOD" ("" "" "56089" :U) "SYM%MIN" ("" "" "55E95" :U) "%SYMMIN" ("" "" "55EAE" :U) "SYMMIN" ("" "" "55EC7" :U) "SYM%MAX" ("" "" "55E4A" :U) "%SYMMAX" ("" "" "55E63" :U) "SYMMAX" ("" "" "55E7C" :U) "SYM%%OF" ("" "" "55C3D" :U) "%SYM%OF" ("" "" "55C56" :U) "SYM%OF" ("" "" "55C6F" :U) "SYM%%CH" ("" "" "55C88" :U) "%SYM%CH" ("" "" "55CA1" :U) "SYM%CH" ("" "" "55CBA" :U) "SYM%%T" ("" "" "55CD3" :U) "%SYM%T" ("" "" "55CEC" :U) "SYM%T" ("" "" "55D05" :U) "SYM%COMB" ("" "" "55D1E" :U) "%SYMCOMB" ("" "" "55D37" :U) "SYMCOMB" ("" "" "55D50" :U) "SYM%PERM" ("" "" "55D69" :U) "%SYMPERM" ("" "" "55D82" :U) "SYMPERM" ("" "" "55D9B" :U) "SYM%RND" ("" "" "55DB4" :U) "SYMRND" ("" "" "55DCD" :U) "RNDSYM" ("" "" "55DE6" :U) "SYM%TRNC" ("" "" "55DFF" :U) "TRCNYM" ("" "" "55E18" :U) "SYMTRCN" ("" "" "55E31" :U) "SYM%XROOT" ("" "" "560A2" :U) "%SYMXROOT" ("" "" "560BB" :U) "SYMXROOT" ("" "" "560D4" :U) "SYMNEG" ("" "" "54EEB" :U) "SYMABS" ("" "" "54F04" :U) "SYMSIGN" ("" "" "54F68" :U) "SYMINV" ("" "" "54F36" :U) "SYMIP" ("" "" "5518E" :U) "SYMFP" ("" "" "551A7" :U) "SYMFLOOR" ("" "" "551C0" :U) "SYMCEIL" ("" "" "551D9" :U) "SYMMANT" ("" "" "5520B" :U) "SYMEXPONENT" ("" "" "551F2" :U) "SYMRE" ("" "" "54AE0" :U) "SYMIM" ("" "" "54EB9" :U) "SYMCONJ" ("" "" "54F1D" :U) "SYMNOT" ("" "" "54ED2" :U) "SYMSQ" ("" "" "54F9A" :U) "SYMSQRT" ("" "" "54F81" :U) "SYMSIN" ("" "" "54FB3" :U) "SYMCOS" ("" "" "54FCC" :U) "SYMTAN" ("" "" "54FE5" :U) "SYMASIN" ("" "" "55049" :U) "SYMACOS" ("" "" "55062" :U) "SYMATAN" ("" "" "5507B" :U) "SYMSINH" ("" "" "54FFE" :U) "SYMCOSH" ("" "" "55017" :U) "SYMTANH" ("" "" "55030" :U) "SYMASINH" ("" "" "55094" :U) "SYMACOSH" ("" "" "550AD" :U) "SYMATANH" ("" "" "550C6" :U) "SYMLN" ("" "" "550F8" :U) "SYMLNP1" ("" "" "55143" :U) "SYMEXP" ("" "" "550DF" :U) "SYMEXPM" ("" "" "5515C" :U) "SYMLOG" ("" "" "55111" :U) "SYMALOG" ("" "" "5512A" :U) "SYMFACT" ("" "" "55175" :U) "SYMD>R" ("" "" "55224" :U) "SYMR>D" ("" "" "5523D" :U) "SYMARG" ("" "" "54F4F" :U) "SYMUBASE" ("" "" "55256" :U) "SYMUVAL" ("" "" "5226F" :U) "SYM%AND" ("" "" "5599A" :U) "%SYMAND" ("" "" "559B3" :U) "SYMAND" ("" "" "559CC" :U) "SYM%OR" ("" "" "559E5" :U) "%SYMOR" ("" "" "559FE" :U) "SYMOR" ("" "" "55A17" :U) "SYM%XOR" ("" "" "55A30" :U) "%SYMXOR" ("" "" "55A49" :U) "SYMXOR" ("" "" "55A62" :U) "SYMFLOAT==" ("" "" "55A7B" :U) "SYM==" ("" "" "55AAD" :U) "FLOATSYM==" ("" "" "55A94" :U) "SYMFLOAT<>" ("" "" "55AC6" :U) "FLOATSYM<>" ("" "" "55ADF" :U) "SYM<>" ("" "" "55AF8" :U) "SYM%<" ("" "" "55B11" :U) "%SYM<" ("" "" "55B2A" :U) "SYM<" ("" "" "55B43" :U) "SYM%>" ("" "" "55B5C" :U) "%SYM>" ("" "" "55B75" :U) "SYM>" ("" "" "55B8E" :U) "SYM%<=" ("" "" "55BA7" :U) "%SYM<=" ("" "" "55BC0" :U) "SYM<=" ("" "" "55BD9" :U) "SYM%>=" ("" "" "55BF2" :U) "%SYM>=" ("" "" "55C0B" :U) "SYM>=" ("" "" "55C24" :U) "Con+Meta" ("" "" "56331" :U) "Meta+Con" ("" "" "56543" :U) "Meta+" ("" "" "56160" :U) "Meta-Con" ("" "" "56566" :U) "Con-Meta" ("" "" "56359" :U) "Meta-" ("" "" "56174" :U) "Meta*Con" ("" "" "56589" :U) "Con*Meta" ("" "" "56390" :U) "Meta*" ("" "" "561BA" :U) "Meta/Con" ("" "" "565CF" :U) "Con/Meta" ("" "" "563DB" :U) "Meta/" ("" "" "56214") "Meta^Con" ("" "" "5645D" :U) "Con^Meta" ("" "" "562FA" :U) "MetamodCon" ("" "" "5660B" :U) "ConmodMeta" ("" "" "5642B" :U) "Metamod" ("" "" "56250" :U) "MetaNEG" ("" "" "553D2" :U) "MetaABS" ("" "" "555B2" :U) "MetaINV" ("" "" "553EB" :U) "MetaRE" ("" "" "5542C" :U) "MetaIM" ("" "" "55495" :U) "MetaCONJ" ("" "" "55567" :U) "MetaSQ" ("" "" "555E9" :U) "MetaSIN" ("" "" "5533C" :U) "MetaCOS" ("" "" "55378" :U) "MetaTAN" ("" "" "553A5" :U) "MetaSINH" ("" "" "5529C" :U) "MetaCOSH" ("" "" "552B0" :U) "MetaTANH" ("" "" "552C4" :U) "MetaEXP" ("" "" "552D8" :U) "MetaEXPM" ("" "" "55300" :U) "MetaALOG" ("" "" "552EC" :U) "SYMCOLCT" ("symf --> symf" " :: uncrunch colct ;" "57D90") "colct" ("symf --> symf" "Basic collection function, does not check
- numeric results flag. Disassembly:
- :: EXPLODE
- pshzer colfac
- pshzer colrev
- ATTNFLG@ #0<> case
- :: CKSYMBN CK0NOLASTWD
- ?ATTNQUIT ;
- pshzer colunfac
- SYMN COLA coleval
- ;
- --
- Flags: -3" "57DA4" :U) "colfac" ("meta1 meta2 --> meta'" "Appends objects in meta2 tail to meta1 tail
- replacing all -, /, NEG, INV and SQ with +,
- *, ^, and -1 as a possible factor. Example
- rules:
- 'SQ(A)' 'A^2'
- '-A' '-1*A'
- 'A-B' 'A+-1*b'
- 'A/B' 'A*B^-1'" "587AA" :U) "colrev" ("meta1 meta2 --> meta'" "Appends objects in meta2 to tail of meta1
- collecting numeric factors, ordering terms
- according to a comparison function,
- collecting numeric terms to front. Only + and
- * factors are checked. Sub-routines used by
- this function:" "57E08" :U) "MetaLess?" ("meta1 meta2 --> meta1 meta2 flag" "" "58511" :U) "MetaMore?" ("meta1 meta2 --> meta1 meta2 flag" "" "58525" :U) "BodyMore?" ("ob1 ob2 --> flag" "" "585A7" :U) "colunfac" ("meta1 meta2 --> meta'" "Appends objects in meta2 to head of meta1
- converting ^, + and * to / and - when
- suitable." "58A20" :U) "coleval" ("ob --> ob'" "Passes FALSE as parameter to parameval. Thus
- eval uses ?COLCT to check special evaluation." "58CDA" :U) "SYMEXPAN" ("symf --> symf" "Expands symbolic or float" "57A0C" :U) "expan" ("meta1 meta2 meta3 --> meta" "Expands meta3. Successful part is added to
- tail of meta2. Calls expan1 and larg until
- meta3 becomes empty." "57A48" :U) "expan1" ("meta --> meta1 meta2" "Expands meta. Meta1 is the unsuccessful part,
- meta2 the successful part (could be just and
- operator). Sub-expanders:" "57AA2" :U) "?expan^" ("" "If ^ then expands (returns if successful.)" "57B63" :U) "expansq" ("" "Expands SQ." "57AB6" :U) "?expanneginv" ("" "Prevents Meta->()
- from expanding [Expr INV NEG]." "57B4C" :U) "?expanapp" ("" "If <REF>xFCNAPPLY then tries calling
- <REF>?EXPAN ." "57B01" :U) "expansum^" ("" "Expands (A+B)^2 or (A-B)^2" "57C71" :U) "NXTPOT%" ("% --> flag %' T
- % --> % F" "Returns next number when expanding ^.
- The flag indicates wheter %0>. Do not
- use for %0." "57CF8" :U) "XEQINTEGID" ("ob ob ob id/lam --> symf" "" "1F201" :U) "XEQINTEG" ("ob ob ob QN --> symf" "" "1F27A" :U) "SYMINTEG" ("symf symf symf QN --> symf" "" "5AAC7" :U) "NUMINTEG" ("symf QN symf_lo symf_hi --> %" "" "5662E" :U) "CALCINTEG" ("seco %precision %lo %hi --> %integral %error" "Low level numeric integration. If %low = %hi
- returns %0 %0. Checks that
- 1E-12 \\<= %accuracy \\<=1 1.
- seco gets % as input and should return one
- value. " "52C36" :U) "intg" ("#0 #0 meta --> meta_ok meta_fail" "Integrates meta where variable of integration
- has been changed to LAMdvar. Meta objects
- should be merged by addition. Use colunfac
- to resume /, -, etc. from *, +." "5ACC7" :U) "forceadd" ("meta --> meta'" "Forces top level operators to be +, NEG when
- possible by changing from -, +, NEG. Attempts
- to arrange rightmost term to be second
- argument for top +. Example:
- 'A+(B+C)' 'A+B+-C'" "5D0C2" :U) "forcemul?aga" ("meta --> meta'" "Recursive Meta<-D, MetaD-> and forcemul
- calling. If any operation was successful
- AGAIN is executed." "5B659" :U) "forcemul" ("meta --> meta'" "Forces top level operator to be + and NEG
- when possible by changing from / and INV.
- LAMdvar is ordered specially." "5B717" :U) "intg1" ("M_ok M_fail M_temp meta --> M_ok' M_fail' M_temp" "Integrates meta, ok part is adds to meta1
- (meta3 is the next part to integrate in the
- top level loop.)" "5AFAB" :U) "intg1ok" ("M1 M2 M3 M4 --> M1' M2 M3 T" "Adds M4 to M1. (Successful intg1)." "5B0FA" :U) "intg1fail" ("M1 M2 M3 M4 --> M1 M2' M4 T" "Adds M4 to M2. (Unsuccessful intg1)." "5B09B" :U) "intgconst" ("M_ok M_fail M_temp meta --> M_ok' M_fail' M_temp" "Integrates constant to meta. (dvars? gives
- FALSE)." "5B0CD" :U) "intglinear" ("M1 M2 M3 M4 --> M1' M2 M3" "Integrates linear term (M4)." "5B131" :U) "intgaddlin" ("meta #loc --> meta'" "Adds 2^/2 to LAMdvar in meta at stack level
- #loc." "5B140" :U) "linear?" ("meta #level --> meta' T
- meta #level --> meta' #loc F" "Is meta linear in LAMdvar?
- #level is first location of LAMdvar obtained
- from dvars?
- :: linear DUP IT SWAPDROP ;" "5AD80" :U) "linear" ("meta #level --> meta #loc flag" " :: linear SWAPDROP ;" "5AD9E" :U) "linear!" ("meta #level --> meta' flag" "" "5AD6C" :U) "D/D*" ("" "Derivative of multiplication." "7DBE2") "D/D+" ("" "Derivative of addition." "7DBED") "D/D-" ("" "Derivative of subtraction." "7DBF8") "D/D/" ("" "Derivative of division." "7DC03") "D/Dalg=" ("" "Derivative of equality." "7DC72") "D/D=" ("" "Derivative of equality." "7DC72") "D/DABS" ("" "Derivative of ABS." "7DC7D") "D/DACOS" ("" "Derivative of ACOS." "7DCA1") "D/DACOSH" ("" "Derivative of ACOSH." "7DCAC") "D/DALOG" ("" "Derivative of ALOG." "7DCB7") "D/DAPPLY" ("" "" "7DE1C") "D/DARG" ("" "Derivative of ARG." "7DCC2") "D/DASIN" ("" "Derivative of ASIN." "7DCCD") "D/DASINH" ("" "Derivative of ASINH." "7DCD8") "D/DATAN" ("" "Derivative of ATAN." "7DCE3") "D/DATANH" ("" "Derivative of ATANH." "7DCEE") "D/DCHS" ("" "Derivative of CHS." "7DCF9") "D/DCONJ" ("" "Derivative of CONJ." "7DD17") "D/DCOS" ("" "Derivative of COS." "7DD35") "D/DCOSH" ("" "Derivative of COSH." "7DD40") "D/DDER" ("" "Derivative of derivative." "7DDF0") "D/DEXPM1" ("" "Derivative of EXP." "7DD4B") "D/DEXP" ("" "Derivative of EXP." "7DD4B") "D/DIFTE" ("" "Derivative of IFTE." "7DD82") "D/DINTEGRAL" ("" "Derivative of integral." "7DE06") "D/DINV" ("" "Derivative of INV." "7DD56") "D/DLN" ("" "Derivative of LN." "7DD61") "D/DLNP1" ("" "Derivative of LNP1." "7DD6C") "D/DLOG" ("" "Derivative of LOG." "7DD77") "D/DSIN" ("" "Derivative of SIN." "7DD8D") "D/DSINH" ("" "Derivative of SINH." "7DD98") "D/DSQ" ("" "Derivative of SQ." "7DDA3") "D/DSQRT" ("" "Derivative of SQRT." "7DDAE") "D/DSUM" ("" "Derivative of SUM." "7DE11") "D/DTAN" ("" "Derivative of TAN." "7DDB9") "D/DTANH" ("" "Derivative of TANH." "7DDC4") "D/DWHERE" ("" "" "7DDFB") "D/D^" ("" "Derivative of power." "7DDCF") "D/D^X" ("" "" "7DDDA") "D/D^Y" ("" "" "7DDE5") "SYMWHERE" ("symf {} --> symf" "" "1F38B" :U) "XEQSYMWHERE" ("symf QN1 id1..QNn idn --> symf" "" "1F439" :U) "CKWHEREARGS" ("checks pairs of quoted names" "Checks pairs of quoted names/ids." "1F43E" :U) "SYMBWHERE" ("symf QN1 id1..QNn idn #2n+1 --> symf" "" "547B5") "WHERE1" ("QN1 id1..QNn idn #n meta1 --> symf" "Used when meta size is 1." "547E2" :U) "WHEREN" ("QN1 id1..QNn idn #2 metan --> symf" "" "54887" :U) "SYMSHOW" ("sym id/lam --> symf" "" "58D75") "XEQSHOWLS" ("sym {} --> symf" "" "20B00") "SHOWLS" ("sym {names} --> symf" "See this for a good example of recursive
- parameval." "5910B" :U) "%IFTE" ("% ob1 ob2 --> ?" "" "1A4A3" :U) "SYMIFTE" ("sym symf symf --> symf" "Uses cknumdsptch1 with:" "54564" :U) "MetaIFTE" ("" "" "54609" :U) "NumIFTE" ("" "" "54653" :U) "SYMQUAD" ("sym id --> symf" "Avoids the obvious in solving a quadratic
- equation." "591AD" :U) "SYMTAYLR" ("sym id % --> symf" "Calculates taylor polynomial." "595DD" :U) "SYMISOL" ("sym id --> symb" "Isolate a variable." "57293" :U) "XEQSYMDERCON" ("QN %/C%/u --> symf" "" "1F113" :U) "XEQSYMDERSTEP" ("QN sym --> symf" "" "1F0F5" :U) "SYMDERSTEP" ("QN sym --> symf" "No CKSYMBTYPE check." "54977" :U) "SYMDER" ("sym sym --> symf" "" "54954" :U) "SYMSUM" ("sym sym sym ob --> symf" "" "56949" :U) "SYM%SUM" ("sym sym % ob --> symf" "" "56A06" :U) "%SYMSUM" ("sym % sym ob --> symf" "" "56A4C" :U) "%%SUM" ("sym % % ob --> symf" "" "56AC9" :U) "addt+" ("meta --> meta&+" "" "5BC94" :U) "addt-" ("meta --> meta&-" "" "5BC67" :U) "addt*" ("meta --> meta&*" "" "5CD16" :U) "addtNEG" ("meta --> meta&NEG" "" "5CD2A" :U) "addtINV" ("meta --> meta&INV" "" "5CD3E" :U) "repl/" ("meta&ob --> meta&/" "" "5BCC1" :U) "repl*" ("meta&ob --> meta&*" "" "5BCEE" :U) "M1st+?Drp" ("meta&+ --> meta" "" "5ACD6" :U) "meta+" ("meta&NEG --> meta&-" "" "5BC5D" :U) "meta-" ("meta&NEG --> meta&+" "" "5BC8A" :U) "meta*" ("meta&INV --> meta&/" "" "5BCB7" :U) "meta/" ("meta&INV --> meta&*" "" "5BCE4" :U) "drpmeta+" ("meta&NEG&ob --> meta&-
- meta&ob --> meta&+" "" "5BD3E" :U) "drpmeta-" ("meta&NEG&ob --> meta&+
- meta&ob --> meta&-" "" "5BD57" :U) "drpmeta*" ("meta&INV&ob --> meta&/
- meta&ob --> meta&*" "" "5BD70" :U) "drpmeta/" ("meta&INV&ob --> meta&*
- meta&ob --> meta&/" "" "5BD89" :U) "metaneg" ("meta&NEG --> meta
- meta --> meta&NEG" "" "5BBE5" :U) "metainv" ("meta&INV --> meta
- meta --> meta&INV" "" "5BC3F" :U) "metaneglft" ("meta --> meta'" "metaneg on left sub-expression." "5BC03" :U) "metainvlft" ("meta --> meta'" "metainv on left sub-expression." "5BC21" :U) "pshzerpsharg" ("meta --> M_last M_rest" "Pushes last sub-expression in meta. If meta
- is a valid expression M_rest will be empty." "5EA9F") "pZpargSWAPUn" ("meta --> M_rest M_last" "<REF>pshzerpsharg then <REF>psh ." "63F92") "plDRPpZparg" ("meta&ob --> M_last M_rest" "Drops ob then calls <REF>pshzerpsharg ." "63F56") "pargop" ("meta --> M_last&op M_rest" "Pushes last sub-expression ignoring first
- object in meta. Thus op is +, -, etc. and
- M_last is their second argument." "5E68E" :U) "larg" ("meta --> M_rest M_last" "Splits last sub-expression from meta." "5EAC2" :U) "parg&" ("meta1 meta2 --> meta1&M_last M_rest" "" "5E6F2" :U) "larg&" ("meta1 meta2 --> meta1&M_rest M_last" "" "5CCEE" :U) "drppargtop&" ("meta&ob --> M_last&M_rest" "" "5CBF9" :U) "swappargunrot" ("meta1 meta2 --> M_rest meta2 M_last" "" "57F4B" :U) "drppargsym" ("meta&ob --> 'M_rest''MetaLast'" "Buids objects with PSYMBN. Will give invalid
- expressions if ob is not a two-argument
- function." "1CF42" :U) "splitup" ("meta #n #m --> meta #level" "Calculates stack level of last object to be
- included when splitting last #m sub-
- expressions from meta starting from stack
- level n. (2 1 would give level of first
- object in the last sub-expression.)" "5F926" :U) "splitdown" ("meta #n #m --> meta #lowlevel #args+1" "Seeks stack level n-1 downwards for extra
- operators for #m expressions. #lowlevel is the
- stack level of the extra operator. #args
- indicates how many expressions the lowlevel
- operator is still missing." "5F96E" :U) "?spliteq" ("meta1&meta2&= --> meta2 meta1" "If meta contains =, splits two sides,
- otherwise DUP." "558BE" :U) "count+" ("meta --> meta #0
- meta &+&+..&+ --> meta #n" "" "58C02" :U) "count*" ("meta --> meta #0
- meta &*&*..&* --> meta #n" "Same as count+ for *." "58C0E" :U) "MetaMulInv" ("" "Simplifiy combinations of INV and *
- (using /)." "5BE56" :U) "colinv1" ("[expr1 INV expr2 INV *] --> [expr1 expr2 /]" "" "58A61" :U) "colinv2" ("[expr INV *] --> [expr /]" "" "58A93" :U) "colinv3" ("[expr1 INV expr2 *] --> [expr1 expr2 /]" "" "58AAC" :U) "MetaDNEG" ("double negate" "Double negation." "5971D" :U) "MetaDINV" ("double invert" "Double inversion." "5976B" :U) "Meta*1" ("mult by one" "Multiply by one." "597B5" :U) "Meta^1" ("pow by one" "Raise to power of one." "5983B" :U) "Meta1/" ("div by one" "Divide by one." "59885" :U) "Meta+1-1" ("add 1 subtract 1" "Add one and subtract one." "5990F" :U) "MetaRCOLCT" ("restricted collection" "Restricted collection." "596D3" :U) "Meta<-T" ("move nearest right term to left" "Move nearest right term to the left." "5C6D9" :U) "MetaT->" ("move nearest left term to right" "Move nearest left term to the right." "5C68D" :U) "Meta(())" ("parenthesise nearest term" "Put parentheses over nearest term." "5C623" :U) "Meta(<-" ("include left term" "Include left term." "5C589" :U) "Meta->)" ("include right term" "Include right term." "5C5D6" :U) "Meta<-->" ("commute terms" "Commute terms." "5BE81" :U) "Meta<-A" ("associate left term" "Associate left term." "5BECE" :U) "MetaA->" ("associate right term" "Associate right term." "5BF53" :U) "Meta->()" ("remove prefix" "Remove prefix." "5C137" :U) "Meta<-D" ("delete left term" "Delete left term (via expansion)." "5C0B9" :U) "Meta<-D!" ("delete left term" "Delete left term (above - ^ expansion)." "5C102" :U) "MetaD->" ("delete right term" "Delete right term (via expansion)." "5BFD8" :U) "Meta<-M" ("merge common factor on left" "Merge common factor on left side." "5C3C2" :U) "MetaM->" ("merge common factor on right" "Merge common factor on right side." "5C4CF" :U) "Meta-()" ("double negate & remove prefix" "Double negate, then remove prefix." "5C261" :U) "Meta1/()" ("double invert & remove prefix" "Double inversion, then remove prefix." "5C204" :U) "MetaL*" ("LN(a^b) --> b*LN(a)" "Transform LN(A^B) to LN(A)*B." "5C348" :U) "MetaL()" ("b*LN(a) --> LN(a^b)" "Transform LN(A)*B to LN(A^B)." "5C375" :U) "MetaE^" ("EXP(a*b) --> EXP(a)^b" "Transform EXP(A*B) to EXP(A)^B." "5C2CE" :U) "MetaE()" ("EXP(a)^b --> EXP(a*b)" "Transform EXP(A)^B to EXP(A*B)." "5C31B" :U) "Meta->TRG" ("change EXP to trig. fns." "Change EXP to trigonometric functions." "5C670" :U) "MetaAF" ("add fractions" "Add fractions." "5C53C" :U) "Meta->DEF" ("define function" "Define function (SIN, SINH, ASIN...)" "5C845" :U) "MetaTRG*" ("expand trig fns. of a sum" "Expand trigonometric function of a sum." "5C91D" :U) "Meta->()C%" ("remove 1st RE,IM; CONJ" "Remove first RE, IM or CONJ." "5C73D" :U) "Meta<-Dall" ("" "" "5CDF2" :U) "MetaD->all" ("" "" "5CEF1" :U) "Meta<-Aall" ("" "" "5CE15" :U) "MetaA->all" ("" "" "5CE4C" :U) "Meta<-Mall" ("" "" "5CFF5" :U) "MetaM->all" ("" "" "5D009" :U) "Meta<-Tall" ("" "" "5CF5A" :U) "MetaT->all" ("" "" "5CF23" :U) "Meta(<-all" ("" "" "5CEBA" :U) "Meta->)all" ("" "" "5CE83" :U) "Meta->()all" ("" "" "5CF91" :U) "Meta->()C%all" ("" "" "5CFC3" :U) "evalcase:" ("meta --> ?" "Evaluates next object. If it drops current
- stream then continue, else SKIP
- next. Example:
- :: evalcase: Meta<-D Meta<-Daga ;" "5CD52" :U) "revalcase:" ("meta --> ?omeg" "Evaluates next object for sub-expressions
- until current stream is not dropped by
- ob. Example:
- Meta<-Daga =
- :: revalcase: Meta<-D COLA RDROP ;
- COLA RDROP is there to mark successful
- operation." "5CD7A" :U) "PORTSTATUS" ("#port --> present? writeable? merged? #size #addr" "Returns information for port." "0AAB2") "PORTEND" ("#port --> #addr" "Gets end address of port." "0AB22" :U) "NEXTLIBBAK" ("#addr --> backup/library #nextaddr" "Gets next library or QbackupQ." "0AB82") "MERGE" ("#port -->" "Merges specified port. Only works for port
- one. Checks if wrong port number was
- entered." "0B409" :U) "#>ROMPTR" ("#lib #cmd --> ROMPTR" "Creates rompointer." "07E50") "ROMPTR>#" ("ROMPTR --> #lib #cmd" "Splits rompointer." "08CCC") "ROMPTR@" ("ROMPTR --> ob T
- --> F" "Recalls contents of rompointer." "07E99") "DUPROMPTR@" ("ROMPTR --> ROMPTR ob T
- --> ROMPTR F" "Does DUP then ROMPTR@." "62C19") "ROMSEC" ("ROMPTR --> ?" "Recalls contents of rompointer and EVAL.
- Generates \"Undefined XLIB Error\" if not
- found." "02FEF" :U) "?>ROMPTR" ("ob --> ob'" "If ROM-WORD? and TYPECOL? then RPL@." "62A61") "?ROMPTR>" ("ob --> ob'" "If <REF>TYPEROMP? and content exists
- <REF>INHARDROM? then return contents." "62A84") "RESOROMP" ("--> ob" "Recalls contents of next object in the
- runstream (which must be a rompointer)." "62BD8") "PTR>ROMPTR" ("ob --> ROMPTR T
- --> F" "If the object is a library command, returns
- its rompointer and TRUE, if not just FALSE." "07E76" :U) "ROMPTRDECOMP" ("ROMPTR --> id T
- --> F" "If the library command exists and has a name,
- returns that name and TRUE, otherwise FALSE." "081FB" :U) "PTR>ID" ("ob --> id T
- --> F" "If the object is a library command and has a
- name, returns its name and TRUE, if not
- returns just FALSE." "081E3" :U) "COMPILEID" ("id --> id T
- --> ROMPTR T
- --> F" "Searches id in current path, if found returns
- TRUE. Else searches attached libraries. If
- nothing was found, return FALSE." "07C18" :U) "ROM-WORD?" ("ob --> flag" "" "61FB6") "DUPROM-WORD?" ("ob --> ob flag" "" "61FA9") "TOSRRP" ("# -->" "Attaches library to HOME directory.
- --
- <REF>TEXT:Libraries" "07709") "OFFSRRP" ("# -->" "Detaches library from HOME directory.
- --
- <REF>TEXT:Libraries" "076AE") "ONSRRP?" ("# --> flag" "Returns TRUE if library is attached to HOME
- directory." "0778D" :U) "XEQSETLIB" ("% -->" "Internal ATTACH." "21C6F") "SETHASH" ("#libnum hxs -->" "" "07638") "ROMPOLL" ("-->" "Configures internal and external libraries.
- --
- <REF>TEXT:Libraries" "021DD" :U) "DOROMPOLL" ("{#libnum1 #libnum2..} -->" "Configures specified libraries.
- --
- <REF>TEXT:Libraries" "0210F" :U) "ROMPARTNAME" ("#libnum --> id T
- --> F" "Returns title of library as an ID, and
- TRUE. If library is not found, returns just
- FALSE." "08199" :U) "LIB>#" ("lib --> #libnum T" "Returns number of library." "081DE" :U) "ROMPART>ADDR" ("#libnum --> #addr T
- --> F" "Recalls library addres + 10 (prolog and
- length skipped)." "08081" :U) "ROMPARTSIZE" ("#libnum --> #nibbles-10 T
- --> F" "Returns size of library." "080BF" :U) "NEXTROMPID" ("#libnum --> #nextlibnum T
- --> F" "If specified library exists, #libnum is
- returned with TRUE." "080DA" :U) "GETHASH" ("#libnum --> hxs_table T
- --> F" "Gets specified library's hash table." "08112" :U) "GETMSG" ("#libnum --> [] T
- --> F" "Gets specified library's message table.
- --
- <REF>TEXT:Libraries" "08130" :U) "SETMESG" ("[$] #libnum -->" "Sets message table of specified library.
- --
- <REF>TEXT:Libraries" "0764E" :U) "GETLINK" ("#libnum --> hxs_table T
- --> F" "Gets specified library's link table." "0813C" :U) "GETCONFIG" ("#libnum --> ob T
- --> F" "" "08157" :U) "ROMPART" ("rrp --> {#lib1..#libn} T
- ROMPTR --> #libnum" "Gets the list of libraries attached to the
- directory, along with TRUE. If the argument
- is a rom pointer, returns the library number
- of this pointer." "07F86" :U) "BAKNAME" ("bak --> id T" "Returns backup's name" "081D9") "BAK>OB" ("bak --> ob" "Gets QbackupQ object." "0948E") ">BAK" ("id ob --> bak" "Creates backup object with specified name and
- contents." "21674") "DUP" ("ob --> ob ob" "" "03188") "DUPDUP" ("ob --> ob ob ob" "" "62CB9") "NDUPN" ("ob #n --> ob..ob #n
- ob #0 --> #0" "" "5E370") "DUPROT" ("1 2 --> 2 2 1" "" "62FB1") "SWAPOVER" ("1 2 --> 2 1 2" "" "61380") "DUPUNROT" ("1 2 --> 2 1 2" "" "61380") "DUPROLL" ("1..n #n --> 1 3..n #n 2" "" "630F1") "DUP4UNROLL" ("1 2 3 --> 3 1 2 3" "" "61099") "DUPPICK" ("n..1 #n --> n..1 #n n-1" "" "630DD") "2DUPSWAP" ("1 2 --> 1 2 2 1" "" "611F9") "DUP3PICK" ("1 2 --> 1 2 2 1" "" "611F9") "DUP#2+PICK" ("n..1 #n --> n..1 #n n+1" "" "5FC24" :U) "2DUP" ("1 2 --> 1 2 1 2" "" "031AC") "2DUP5ROLL" ("1 2 3 --> 2 3 2 3 1" "" "63C40") "NDUP" ("1..n #n --> 1..n 1..n" "" "031D9") "DROP" ("1 -->" "" "03244") "DROPDUP" ("1 2 --> 1 1" "" "627A7") "DROPSWAP" ("1 2 3 --> 2 1" "" "6270C") "XYZ>Y" ("1 2 3 --> 2" "" "62726") "ROT2DROP" ("1 2 3 --> 2" "" "62726") "DROPSWAPDROP" ("1 2 3 --> 2" "" "62726") "DROPROT" ("1 2 3 4 --> 2 3 1" "" "62FC5") "DROPOVER" ("1 2 3 --> 1 2 1" "" "63029") "2DROP" ("1 2 -->" "" "03258") "XYZ>" ("1 2 3 -->" "" "60F4B") "3DROP" ("1 2 3 -->" "" "60F4B") "XYZW>" ("1..4 -->" "" "60F7E") "4DROP" ("1..4 -->" "" "60F7E") "5DROP" ("1..5 -->" "" "60F72") "6DROP" ("1..6 -->" "" "60F66") "7DROP" ("1..7 -->" "" "60F54") "RESETDEPTH" ("ob1..obn obn+1..obx #n --> ob1..obn" "Drops all but #n levels of the stack. " "4B710") "DEPTH" ("1..n --> 1..n #n" "" "0314C") "UStackDepth" ("--> #" "The depth of the stack, similar to DEPTH." "6416D") "reversym" ("1..n #n --> n..1 #n" "" "5DE7D") "SWAP" ("1 2 --> 2 1" "" "03223") "SWAPDUP" ("1 2 --> 2 1 1" "" "62747") "SWAP2DUP" ("1 2 --> 2 1 2 1" "" "6386C") "XY>Y" ("1 2 --> 2" "" "60F9B") "SWAPDROP" ("1 2 --> 2" "" "60F9B") "SWAPDROPDUP" ("1 2 --> 2 2" "" "62830") "XYZ>ZX" ("1 2 3 --> 3 1" "" "6284B") "UNROTDROP" ("1 2 3 --> 3 1" "" "6284B") "SWAPDROPSWAP" ("1 2 3 --> 3 1" "" "6284B") "XYZ>ZYX" ("1 2 3 --> 3 2 1" "" "60F33") "UNROTSWAP" ("1 2 3 --> 3 2 1" "" "60F33") "SWAPROT" ("1 2 3 --> 3 2 1" "" "60F33") "XYZW>YWZX" ("1 2 3 4 --> 2 4 3 1" "" "63C2C") "SWAP4ROLL" ("1 2 3 4 --> 2 4 3 1" "" "63C2C") "SWAP3PICK" ("1 2 3 --> 1 3 2 1" "" "63C54") "2SWAP" ("1 2 3 4 --> 3 4 1 2" "" "62001") "ROT" ("1 2 3 --> 2 3 1" "" "03295") "ROTDUP" ("1 2 3 --> 2 3 1 1" "" "62775") "ROT2DUP" ("1 2 3 --> 2 3 1 3 1" "" "62C7D") "XYZ>YZ" ("1 2 3 --> 2 3" "" "60F21") "ROTDROP" ("1 2 3 --> 2 3" "" "60F21") "XYZ>ZY" ("1 2 3 --> 3 2" "" "60F0E") "ROTDROPSWAP" ("1 2 3 --> 3 2" "" "60F0E") "XYZ>YXZ" ("1 2 3 --> 2 1 3" "" "60EE7") "ROTSWAP" ("1 2 3 --> 2 1 3" "" "60EE7") "XYZ>Z" ("1 2 3 --> 3" "" "6112A") "UNROT2DROP" ("1 2 3 --> 3" "" "6112A") "ROTROT2DROP" ("1 2 3 --> 3" "" "6112A") "ROTOVER" ("1 2 3 --> 2 3 1 3" "" "62CA5") "XYZW>YZWX" ("1 2 3 4 --> 2 3 4 1" "" "60FBB") "FOURROLL" ("1 2 3 4 --> 2 3 4 1" "" "60FBB") "4ROLL" ("1 2 3 4 --> 2 3 4 1" "" "60FBB") "4ROLLDROP" ("1 2 3 4 --> 2 3 4" "" "62864") "4ROLLSWAP" ("1 2 3 4 --> 2 3 1 4" "" "62ECB") "FOURROLLROT" ("1 2 3 4 --> 2 4 1 3" "" "63001") "4ROLLROT" ("1 2 3 4 --> 2 4 1 3" "" "63001") "4ROLLOVER" ("1 2 3 4 --> 2 3 4 1 4" "" "630A1") "FIVEROLL" ("1 2 3 4 5 --> 2 3 4 5 1" "" "60FD8") "5ROLL" ("1 2 3 4 5 --> 2 3 4 5 1" "" "60FD8") "5ROLLDROP" ("1 2 3 4 5 --> 2 3 4 5" "" "62880") "SIXROLL" ("1..6 --> 2..6 1" "" "61002") "6ROLL" ("1..6 --> 2..6 1" "" "61002") "SEVENROLL" ("1..7 --> 2..7 1" "" "6106B") "7ROLL" ("1..7 --> 2..7 1" "" "6106B") "EIGHTROLL" ("1..8 --> 2..8 1" "" "6103C") "8ROLL" ("1..8 --> 2..8 1" "" "6103C") "ROLL" ("1..n #n --> 2..n 1" "" "03325") "ROLLDROP" ("1..n #n --> 2..n" "" "62F89") "ROLLSWAP" ("1..n #n --> 2..n-1 1 n" "" "62D45") "#1+ROLL" ("ob 1..n #n --> 1..n ob" "" "612F3") "#2+ROLL" ("a b 1..n #n --> b 1..n a" "" "61318") "#+ROLL" ("1..n+m #n #m --> 2..n+m 1" "" "612DE") "#-ROLL" ("1..n-m #n #m --> 2..n-m 1" "" "612CC") "XYZ>ZXY" ("1 2 3 --> 3 1 2" "" "60FAC") "3UNROLL" ("1 2 3 --> 3 1 2" "" "60FAC") "UNROT" ("1 2 3 --> 3 1 2" "" "60FAC") "UNROTDUP" ("1 2 3 --> 3 1 2 1" "" "62CF5") "UNROTSWAPDROP" ("1 2 3 --> 3 2" "" "60F0E") "UNROTOVER" ("1 2 3 --> 3 1 2 1" "" "6308D") "XYZW>WXYZ" ("1 2 3 4 --> 4 1 2 3" "" "6109E") "FOURUNROLL" ("1 2 3 4 --> 4 1 2 3" "" "6109E") "4UNROLL" ("1 2 3 4 --> 4 1 2 3" "" "6109E") "4UNROLLDUP" ("1 2 3 4 --> 4 1 2 3 3" "" "62D09") "XYZW>W" ("1 2 3 4 --> 4" "" "6113C") "4UNROLL3DROP" ("1 2 3 4 --> 4" "" "6113C") "4UNROLLROT" ("1 2 3 4 --> 4 3 2 1" "" "63015") "FIVEUNROLL" ("1 2 3 4 5 --> 5 1 2 3 4" "" "610C4") "5UNROLL" ("1 2 3 4 5 --> 5 1 2 3 4" "" "610C4") "SIXUNROLL" ("1..6 --> 6 1..5" "" "610FA") "6UNROLL" ("1..6 --> 6 1..5" "" "610FA") "(SEVENUNROLL)" ("1..7 --> 7 1..6" "" "62BC4") "7UNROLL" ("1..7 --> 7 1..6" "" "62BC4") "8UNROLL" ("1..8 --> 8 1..7" "" "63119") "10UNROLL" ("1..10 --> 10 1..9" "" "6312D") "UNROLL" ("1..n #n --> n 1..n-1" "" "0339E") "#1+UNROLL" ("ob 1..n #n --> n ob 1..n-1" "" "61353") "#2+UNROLL" ("a b 1..n #n --> n a b 1..n-1" "" "61365") "#+UNROLL" ("1..n+m #n #m --> n+m 1..n+m-1" "" "6133E") "#-UNROLL" ("1..n-m #n #m --> n-m 1..n+m-1" "" "6132C") "OVER" ("1 2 --> 1 2 1" "" "032C2") "OVERDUP" ("1 2 --> 1 2 1 1" "" "62CCD") "OVERUNROT" ("1 2 --> 1 1 2" "" "62D31") "OVERSWAP" ("1 2 --> 1 1 2" "" "62D31") "OVER#2+UNROLL" ("1..n #n ob --> ob 1..n #n" "" "63105") "OVER5PICK" ("1 2 3 4 --> 1 2 3 4 3 1" "" "63C90") "2OVER" ("1 2 3 4 --> 1 2 3 4 1 2" "" "63FBA") "3PICK" ("1 2 3 --> 1 2 3 1" "" "611FE") "3PICKSWAP" ("1 2 3 --> 1 2 1 3" "" "62EDF") "3PICKOVER" ("1 2 3 --> 1 2 3 1 3" "" "630B5") "3PICK3PICK" ("1 2 3 --> 1 2 3 1 2" "" "63C68") "DROP3PICK" ("1 2 3 4 --> 1 2 3 1" "" "35D08" :UBS) "4PICK" ("1 2 3 4 --> 1 2 3 4 1" "" "6121C") "4PICKSWAP" ("1 2 3 4 --> 1 2 3 1 4" "" "62EF3") "SWAP4PICK" ("1 2 3 4 --> 1 2 4 3 1" "" "63C7C") "4PICKOVER" ("1 2 3 4 --> 1 2 3 4 1 4" "" "630C9") "5PICK" ("1 2 3 4 5 --> 1 2 3 4 5 1" "" "6123A") "6PICK" ("1..6 --> 1..6 1" "" "6125E") "7PICK" ("1..7 --> 1..7 1" "" "61282") "8PICK" ("1..8 --> 1..8 1" "" "612A9") "PICK" ("1..n #n --> 1..n 1" "" "032E2") "#1+PICK" ("1..n #n-1 --> 1..n 1" "" "611A3") "#2+PICK" ("1..n #n-2 --> 1..n 1" "" "611BE") "#3+PICK" ("1..n #n-3 --> 1..n 1" "" "611D2") "#4+PICK" ("1..n #n-4 --> 1..n 1" "" "611E1") "#+PICK" ("1..n+m #n #m --> 1..n+m 1" "" "61184") "#-PICK" ("1..n-m #n #m --> 1..n-m 1" "" "61172") "NULLID" ("--> id" "Null (empty) identifier." "15777") "NULLLAM" ("--> lam" "Puts NULLLAM in the stack." "34D30") "ID_CST" ("ID CST" "" "211B4" :U) "ID_S" ("ID S" "" "225A4" :U) "ID_SKEY" ("ID SKEY" "ID SKEY" "3FACF" :U) "LAM_SKEY" ("LAM SKEY" "" "3FAE8" :U) "ID_X" ("ID X" "" "4AB1C") "'IDX" ("--> id" "Puts ID X unevaluated on the stack." "4744F") "ID_Y" ("ID Y" "" "4AB59") "'idUserKeys" ("--> id" "Puts ID UserKeys unevaluated on the stack. " "41A39" :U) "ID_UserKeys" ("ID UserKeys" "ID UserKeys" "41A43" :U) "'idUserKeys." ("--> id" "Puts ID UserKeys.CRC unevaluated on the
- stack. " "41A5F" :U) "ID_UserKeys." ("ID UserKeys.CRC" "" "41A69" :U) "CUREQ" ("ID EQ" "" "1576C" :U) "ID_SIGMADAT" ("ID \\GSDAT" "" "2C1FD" :U) "lam'dvar" ("LAM 'dvar" "LAM 'dvar" "549DB" :U) "'IDPAR" ("--> id" "Puts ID PPAR unevaluated on the stack.
- --
- <REF>TEXT:Reserved|PPAR" "5127E" :U) "$>ID" ("$ --> ID" "" "05B15") "DUP$>ID" ("$ --> $ ID" "" "63295") "ID>LAM" ("id --> lam" "" "05AED" :U) "LAM>ID" ("lam --> id" "" "05B01" :U) "BIND" ("obn..ob1 {lamn..lam1} -->" "Binds n objects to n differently named lams." "074D0") "DOBIND" ("obn..ob1 lamn..lam1 #n -->" "Binds n objects to n differently named lams." "074E4") "1LAMBIND" ("ob -->" "Binds one object to a null named lam." "634CF") "DUP1LAMBIND" ("ob --> ob" "Does DUP then <REF>1LAMBIND." "634CA") "~nNullBind" ("obn..ob1 #n -->" "Binds #n objects to null named lams. 1LAM has
- the count, 2LAM the first object. Decompiles
- to
- :: ' NULLLAM CACHE ; " "0DB0B0") "dvarlsBIND" ("ob -->" "Binds ob to LAM 'dvar." "63A29") "ABND" ("-->" "Abandons topmost temporary environment." "07497") "CACHE" ("obn..ob1 #n lam -->" "Binds all objects under the same name. 1LAM
- has the count." "61CE9") "DUMP" ("NULLLAM --> ob1..obn #n" "Inverse of CACHE. Always does garbage
- collection." "61EA7") "SAVESTACK" ("-->" "Caches stack to SAVELAM." "61D41") "CacheStack" ("-->" "Caches the stack using SAVESTACK if UNDO is
- on and Suspend is OK. If there was a
- previous environment caching the stack, it is
- abandoned first." "40CE9") "undo" ("-->" "Dumps SAVELAM." "61F8F") "STOLAM" ("ob lam -->" "Tries storing object in lam. Generates
- \"Undefined Local Name\" error if lam is not
- found." "07D1B") "DoLam" ("lam --> ob
- --> !error!" "Tries recalling object from lam, generates
- \"Undefined Local Name\" error if not found." "02FD6" :U) "FIRST@LAM" ("lam --> ob T
- --> F" "@LAM for first environment only." "078E9" :U) "NTH@LAM" ("lam #n --> ob T
- --> F" "@LAM for nth environment only." "078F5" :U) "GETLAM" ("#n --> ob" "Gets contents of nth topmost lam." "075A5") "1GETLAM" ("--> ob" "" "613B6") "2GETLAM" ("--> ob" "" "613E7") "3GETLAM" ("--> ob" "" "6140E") "4GETLAM" ("--> ob" "" "61438") "5GETLAM" ("--> ob" "" "6145C") "6GETLAM" ("--> ob" "" "6146C") "7GETLAM" ("--> ob" "" "6147C") "8GETLAM" ("--> ob" "" "6148C") "9GETLAM" ("--> ob" "" "6149C") "10GETLAM" ("--> ob" "" "614AC") "11GETLAM" ("--> ob" "" "614BC") "12GETLAM" ("--> ob" "" "614CC") "13GETLAM" ("--> ob" "" "614DC") "14GETLAM" ("--> ob" "" "614EC") "15GETLAM" ("--> ob" "" "614FC") "16GETLAM" ("--> ob" "" "6150C") "17GETLAM" ("--> ob" "" "6151C") "18GETLAM" ("--> ob" "" "6152C") "19GETLAM" ("--> ob" "" "6153C") "20GETLAM" ("--> ob" "" "6154C") "21GETLAM" ("--> ob" "" "6155C") "22GETLAM" ("--> ob" "" "615GC") "PUTLAM" ("ob #n -->" "Stores new contents to nth topmost lam." "075E9") "1PUTLAM" ("ob -->" "" "615E0") "2PUTLAM" ("ob -->" "" "615F0") "3PUTLAM" ("ob -->" "" "61600") "4PUTLAM" ("ob -->" "" "61615") "5PUTLAM" ("ob -->" "" "61625") "6PUTLAM" ("ob -->" "" "61635") "7PUTLAM" ("ob -->" "" "61645") "8PUTLAM" ("ob -->" "" "61655") "9PUTLAM" ("ob -->" "" "61665") "10PUTLAM" ("ob -->" "" "61675") "11PUTLAM" ("ob -->" "" "61685") "12PUTLAM" ("ob -->" "" "61695") "13PUTLAM" ("ob -->" "" "616A5") "14PUTLAM" ("ob -->" "" "616B5") "15PUTLAM" ("ob -->" "" "616C5") "16PUTLAM" ("ob -->" "" "616D5") "17PUTLAM" ("ob -->" "" "616E5") "18PUTLAM" ("ob -->" "" "616F5") "19PUTLAM" ("ob -->" "" "61705") "20PUTLAM" ("ob -->" "" "61715") "21PUTLAM" ("ob -->" "" "61725") "22PUTLAM" ("ob -->" "" "61735") "DUP4PUTLAM" ("ob --> ob" "Does DUP then <REF>4PUTLAM ." "61610") "1GETABND" ("--> 1lamob" "Does <REF>1GETLAM then <REF>ABND ." "634B6") "1ABNDSWAP" ("ob --> 1lamob ob" "Does <REF>1GETABND then SWAP." "62DB3") "1GETSWAP" ("ob --> 1lamob ob" "Does <REF>1GETLAM then SWAP." "62F07") "1GETLAMSWP1+" ("# --> 1lamob #+1" "Does <REF>1GETLAM then SWAP#1+." "55288") "2GETEVAL" ("--> ?" "Does <REF>2GETLAM then <REF>EVAL ." "632E5") "GETLAMPAIR" ("#n --> #n ob lam F
- --> #n T" "Gets lam contents and name (10 = 1lam,
- 20 = 2lam, etc.)" "617D8") "DUPTEMPEVN" ("-->" "Duplicates topmost temporary environment
- (clears protection word)." "61745") "DUPTEMPENV" ("-->" "Duplicates topmost tempenv (clears
- protection word)." "61745") "1NULLLAM{}" ("--> {}" "Puts a list with one NULLLAM in the stack." "34D2B") "2NULLLAM{}" ("--> {}" "Puts a list with two times NULLLAM in the
- stack." "37DB9" :U) "3NULLLAM{}" ("--> {}" "Puts a list with three times NULLLAM in the
- stack." "37B17" :U) "4NULLLAM{}" ("--> {}" "Puts a list with four times NULLLAM in the
- stack." "52D26" :U) "7NULLLAM{}" ("--> {}" "Puts a list with seven times NULLLAM in the
- stack." "3306C" :U) "8NULLLAM{}" ("--> {}" "Puts a list with eight times NULLLAM in the
- stack." "10E36" :U) "ERRBEEP" ("-->" "Beeps." "141E5") "ERROR@" ("--> #" "Returns current error number." "04CE6") "ERRORSTO" ("# -->" "Stores new error number." "04D0E") "ERROROUT" ("# -->" "Stores new error number and calls ERRJMP." "6383A") "ERRORCLR" ("-->" "Stores zero as new error number." "04D33") "ERRJMP" ("-->" "Invokes error handling sub-system." "04ED1") "GETEXITMSG" ("--> $" "Gets EXITMSG (user defined error message)." "04E07") "EXITMSGSTO" ("$ -->" "Stores $ as EXITMSG." "04E37") "DO#EXIT" ("# -->" "Stores new error number, does <REF>AtUserStack
- and then <REF>ERRJMP." "1502F") "DO%EXIT" ("% -->" "Same as above, but takes real number as
- argument." "15007") "DOHXSEXIT" ("hxs -->" "Same as above functions, but input is hxs." "1501B" :U) "DO$EXIT" ("$ -->" "Stores string as EXITMSG, #70000 as error
- number, does <REF>AtUserStack and then
- <REF>ERRJMP ." "15048") "ABORT" ("-->" "Does <REF>ERRORCLR and <REF>ERRJMP ." "04EA4") "ERRSET" ("-->" "Sets new error trap." "04E5E") "ERRTRAP" ("-->" "Error trap marker. If no error happens, still
- removes all temporary environments created
- since ERRSET." "04EB8") "SAVEERRN" ("-->" "Saves error number to last error." "13FE5" :U) "ERR0" ("-->" "Clears last error." "1400E" :U) "ERRN" ("--> #" "Returns last error number." "14039" :U) "ERRN>HXS" ("--> hxs" "Returns last error number as hxs." "1404C" :U) "ERRM" ("--> $" "Returns last error message." "14065" :U) "JstGETTHEMSG" ("# --> $" "Fetches message from message table. To get
- a message from a library, use the formula:
- libnum*#100+msgnum.
- --
- <REF>TEXT:Libraries" "04D87") "JstGetTHEMESG" ("# --> $" "Fetches message from message table. To get
- a message from a library, use the formula:
- libnum*#100+msgnum.
- --
- <REF>TEXT:Libraries" "04D87") "GETTHEMESG" ("# --> $" "If #70000 then does <REF>GETEXITMSG, else does
- <REF>JstGetTHEMESG .
- --
- <REF>TEXT:Libraries" "04D64") "SPLITmsg" ("#msg --> #error #libnum" "Splits message number into error and
- library numbers.
- --
- <REF>TEXT:Libraries" "04DD7" :U) "SETMEMERR" ("Error 001h" "Generates \"Insufficient Memory\" error." "04FB6") "SETDIRRECUR" ("Error 002h" "Generates \"Directory Recursion\" error." "04FC2" :U) "SETLAMERR" ("Error 003h" "Generates \"Undefined Local Name\" error." "04FCE" :U) "SETROMPERR" ("Error 004h" "Generates \"Undefined XLIB Name\" error." "05016") "SETLBERR" ("Error 006h" "Generates \"Power Lost\" error." "04FAA" :U) "SETCORPORT" ("Error 008h" "Generates \"Invalid Card Data\" error." "04FDA" :U) "SETOBINUSE" ("Error 009h" "Generates \"Object In Use\" error." "04FE6" :U) "SETPORTNOTAV" ("Error 00Ah" "Generates \"Port Not Available\" error." "04FF2" :U) "SETNOROOM" ("Error 00Bh" "Generates \"No Room In Port\" error." "04FFE" :U) "SETXNONEXT" ("Error 00Ch" "Generates \"Object Not In Port\" error." "0500A" :U) "NULLCHARERR" ("Error 102h" "Generates \"Can't Edit Null Char\" error." "10F54" :U) "INVFUNCERR" ("Error 103h" "Generates \"Invalid User Function\" error." "10F64" :U) "NOEQERR" ("Error 104h" "Generates \"No Current Equation\" error." "10F74" :U) "SYNTAXERR" ("Error 106h" "Generates \"Invalid Syntax\" error." "10F86") "LASTSTKERR" ("Error 124h" "Generates \"'Last Stack' Disabled\" error." "10FE6" :U) "LASTCMDERR" ("Error 125h" "Generates \"'Last Cmd' Disabled\" error." "10FF6" :U) "NOHALTERR" ("Error 126h" "Generates \"HALT Not Allowed\" error." "10FC6") "ARGNUMERR" ("Error 128h" "Generates \"Wrong Argument Count\" error." "11006" :U) "SETCIRCERR" ("Error 129h" "Generates \"Circular Reference\" error." "11016") "DIRARGERR" ("Error 12Ah" "Generates \"directory not allowed\" error." "11026" :U) "EMPTYDIRERR" ("Error 12Bh" "Generates \"Non-Empty Directory\" error." "11036" :U) "INVDEFERR" ("Error 12Ch" "Generates \"Invalid Definition\" error." "11046" :U) "MISLIBERR" ("Error 12Dh" "Generates \"Missing Library\" error." "11056" :U) "SETINVPPAR" ("Error 12Eh" "Generates \"Invalid PPAR\" error." "10F96" :U) "SETNONERAL" ("Error 12Fh" "Generates \"Non-real Result\" error." "10FA6" :U) "SETISOLERR" ("Error 130h" "Generates \"Unable To Isolate\" error." "10FB6" :U) "IDCONFERR" ("Error 13Ch" "Generates \"Name Conflict\" error." "11066" :U) "SETSTACKERR" ("Error 201h" "Generates \"Too Few Arguments\" error." "18CC2") "SETTYPEERR" ("Error 202h" "Generates \"Bad Argument Type\" error." "18CB2") "SETSIZEERR" ("Error 203h" "Generates \"Bad Argument Value\" error." "18CA2") "SETNONEXTERR" ("Error 204h" "Generates \"Undefined Name\" error." "18C92") "POSFLOWERR" ("Error 301h" "Generates \"Positive Underflow\" error." "29DCC" :U) "NEGFLOWERR" ("Error 302h" "Generates \"Negative Underflow\" error." "29DDC" :U) "OVERFLOWERR" ("Error 303h" "Generates \"Overflow\" error." "29DEC" :U) "SETIVLERR" ("Error 304h" "Generates \"Undefined Result\" error." "29DFC") "INFRESERR" ("Error 305h" "Generates \"Infinite Result\" error." "29E0C" :U) "INVUNITERR" ("Error B01h" "Generates \"Invalid Unit\" error." "10EEA" :U) "CONSTUNITERR" ("Error B02h" "Generates \"Inconsistent Units\" error." "10EFA" :U) "SetIOPARerr" ("-->" "Throws the IOPAR error: \"Invalid IOPAR\"." "2EC34") "NOALARMERR" ("Error D04h" "Generates \"nonexistent alarm\" error." "0CBAE" :U) "Sig?ErrJmp" ("# -->" "Calls ERRJMP if the error number is any of
- {13E 123 DFF}." "64190") "ederr" ("-->" "Error handler for applications which use
- savefmt1 to save the current display format.
- Calls <REF>rstfmt1 and then errors out." "15A40") "COERCEFLAG" ("T --> %1
- F --> %0" "Converts system flag to user flag, drops
- current stream." "5380E") "TRUE" ("--> T" "" "03A81") "TrueTrue" ("--> T T" "" "0BBED") "TRUEFALSE" ("--> T F" "" "634F7") "TrueFalse" ("--> T F" "" "634F7") "FALSE" ("--> F" "" "03AC0") "FALSETRUE" ("--> F T" "" "6350B") "FalseTrue" ("--> F T" "" "6350B") "FalseFalse" ("--> F F" "" "2F934") "failed" ("--> F T" "" "0BC01") "DROPTRUE" ("ob --> T" "" "62103") "2DROPTRUE" ("ob ob' --> T" "" "2F542" :U) "3DROPTRUE" ("ob1 ob2 ob3 --> T" "" "5F657" :U) "4DROPTRUE" ("ob1..ob4 --> T" "" "10029" :U) "DROPFALSE" ("ob --> F" "" "6210C") "2DROPFALSE" ("ob1 ob2 --> F" "" "62B0B") "4DROPFALSE" ("ob1..ob4 --> F" "" "5F5E4" :U) "5DROPFALSE" ("ob1..ob5 --> F" "" "5F6B1" :U) "SWAPTRUE" ("ob1 ob2 --> ob2 ob1 T" "" "4F1D8") "SWAPDROPTRUE" ("ob1 ob2 --> ob2 T" "" "21660") "XYZ>ZTRUE" ("ob1 ob2 ob3 --> ob3 T" "" "62EB7") "COLATRUE" ("--> T" "Puts TRUE in the stack and drops rest of
- current stream." "5DE41" :U) "RDROPFALSE" ("--> F" "Puts FALSE in the stack and drops rest of
- current stream." "5DE55") "NOT" ("flag --> flag'" "Returns FALSE if the input is TRUE, and
- vice-versa." "03AF2") "AND" ("flag1 flag2 --> flag" "Returns TRUE if both flags are TRUE." "03B46") "OR" ("flag1 flag2 --> flag" "Returns TRUE if either flag is TRUE." "03B75") "XOR" ("flag1 flag2 --> flag" "Returns TRUE if flags are different." "03ADA") "ORNOT" ("flag1 flag2 --> flag" "Returns FALSE if either flag is TRUE." "635B0") "NOTAND" ("flag1 flag2 --> flag" "Returns TRUE if flag1 is TRUE and flag2 is
- FALSE." "62C55") "ROTAND" ("flag1 ob flag2 --> ob flag" "Returns TRUE if either flag is TRUE." "62C91") "EQ" ("ob1 ob2 --> flag" "Returns TRUE if both objects are the same,
- i.e., they occupy the same physical space in
- memory. Only the addresses of the objects are
- tested." "03B2E") "2DUPEQ" ("ob1 ob2 --> ob1 ob2 flag" "Does 2DUP then EQ." "635D8") "EQOR" ("flag ob1 ob2 --> flag'" "Does EQ then OR." "63605") "EQOVER" ("ob3 ob1 ob2 --> ob3 flag ob3" "Does EQ then OVER." "6303D") "EQ:" ("ob --> flag" "EQ with the next object in the current
- stream." "635F1") "DUPEQ:" ("ob --> ob flag" "Does DUP then EQ:." "635EC") "EQUAL" ("ob1 ob2 --> flag" "Returns TRUE if the objects are equal
- (but not necessarily the same), i.e., their
- prologs and contents are the same." "03B97") "EQUALNOT" ("ob1 ob2 --> flag" "Returns TRUE if the objects are different." "635C4") "EQUALOR" ("flag ob1 ob2 --> flag'" "Does EQUAL then OR." "63619") "?SEMI" ("T --> :: ;
- F --> :: <ob1> <rest> ;" "" "61A3B") "NOT?SEMI" ("T --> :: <ob1> <rest> ;
- F --> :: ;" "" "61A2C") "?SEMIDROP" ("ob T --> :: ob ;
- ob F --> :: <ob1> <rest> ;" "" "638E4") "NOT?DROP" ("ob T --> :: ob <ob1> <rest> ;
- ob F --> :: <ob1> <rest> ;" "" "61B72") "?SWAP" ("ob1 ob2 T --> :: ob2 ob1 <ob1> <rest> ;
- ob1 ob2 F --> :: ob1 ob2 <ob1> <rest> ;" "" "62F1B") "?SKIPSWAP" ("ob1 ob2 T --> :: ob1 ob2 <ob1> <rest> ;
- ob1 ob2 F --> :: ob2 ob1 <ob1> <rest> ;" "" "62D9F") "?SWAPDROP" ("ob1 ob2 T --> :: ob1 <ob1> <rest> ;
- ob1 ob2 F --> :: ob2 <ob1> <rest> ;" "" "62F5C") "NOT?SWAPDROP" ("ob1 ob2 T --> :: ob2 <ob1> <rest> ;
- ob1 ob2 F --> :: ob1 <ob1> <rest> ;" "" "62F43") "RPIT" ("T ob --> :: ob <ob1> <rest> ;
- F ob --> :: <ob1> <rest> ;" "ob is actually executed, and not pushed in
- the stack." "070FD") "RPITE" ("T ob1 ob2 --> :: ob1 <ob1> <rest> ;
- F ob1 ob2 --> ob2 <ob1> <rest> ;" "ob1 or ob2 is actually executed, and not
- pushed in the stack." "070C3") "COLARPITE" ("T ob1 ob2 --> :: ob1 ;
- F ob1 ob2 --> :: ob2 ;" "ob1 or ob2 is actually executed, and not
- pushed in the stack." "61A8E") "2'RCOLARPITE" ("Return to composite and ITE there." "" "61AE9") "IT" ("T --> :: <ob1> <rest> ;
- F --> :: <ob2> <rest> ;" "" "619BC") "NOT_IT" ("T --> :: <ob2> <rest> ;
- F --> :: <ob1> <rest> ;" "" "0712A") "?SKIP" ("T --> :: <ob2> <rest> ;
- F --> :: <ob1> <rest> ;" "" "0712A") "ITE" ("T --> :: <ob1> <ob3> <rest> ;
- F --> :: <ob2> <rest> ;" "" "61AD8") "COLAITE" ("T --> :: <ob1> ;
- F --> :: <ob2> ;" "" "6381C") "ITE_DROP" ("ob T --> :: <ob2> <rest> ;
- ob F --> :: ob <ob1> <rest> ;" "" "61A58") "ANDITE" ("f1 f2 --> :: <ob1> <ob3> <rest> ;
- f1 f2 --> :: <ob2> <rest> ;" "" "63E61") "case" ("T --> :: <ob1> ;
- F --> :: <ob2> <rest> ;" "" "61993") "NOTcase" ("T --> :: <ob2> <rest> ;
- F --> :: <ob1> ;" "" "619AD") "ANDcase" ("f1 f2 --> :: <ob1> ;
- f1 f2 --> :: <ob2> <rest> ;" "" "63CEA") "ANDNOTcase" ("f1 f2 --> :: <ob1> ;
- f1 f2 --> :: <ob2> <rest> ;" "" "63DDF") "ORcase" ("f1 f2 --> :: <ob1> ;
- f1 f2 --> :: <ob2> <rest> ;" "" "629BC") "casedrop" ("ob T --> :: <ob1> ;
- ob F --> :: ob <ob2> <rest> ;" "" "618F7") "NOTcasedrop" ("ob T --> :: ob <ob2> <rest> ;
- ob F --> :: <ob1> ;" "" "618E8") "case2drop" ("ob1 ob2 T --> :: <ob1> ;
- ob1 ob2 F --> :: ob1 ob2 <ob2> <rest> ;" "" "6191F") "NOTcase2drop" ("ob1 ob2 T --> :: ob1 ob2 <ob2> <rest> ;
- ob1 ob2 F --> :: <ob1> ;" "" "61910") "caseDROP" ("ob T --> :: ;
- ob F --> :: ob <ob1> <rest> ;" "" "6194B") "NOTcaseDROP" ("ob T --> :: ob <ob1> <rest> ;
- ob F --> :: ;" "" "61960") "casedrptru" ("ob T --> T
- ob F --> :: ob <ob1> <rest> ;" "Note: should be called caseDRPTRU." "638B2") "casedrpfls" ("ob T --> F
- ob F --> :: ob <ob1> <rest> ;" "Note: should be called caseDRPFLS." "6356A") "NOTcsdrpfls" ("ob T --> :: ob <ob1> <rest> ;
- ob F --> F" "Note: should be called NOTcaseDRPFLS." "63AEC") "case2DROP" ("ob1 ob2 T --> :: ;
- ob1 ob2 F --> :: ob1 ob2 <ob1> <rest> ;" "" "61970") "NOTcase2DROP" ("ob1 ob2 T --> :: ob1 ob2 <ob1> <rest> ;
- ob1 ob2 F --> :: ;" "" "61984") "case2drpfls" ("ob1 ob2 T --> F
- ob1 ob2 F --> :: ob1 ob2 <ob1> <rest> ;" "Note: should be called case2DRPFLS." "63583") "caseTRUE" ("T --> T
- F --> :: <ob1> <rest> ;" "" "634E3") "NOTcaseTRUE" ("T --> :: <ob1> <rest> ;
- F --> T" "" "638CB") "caseFALSE" ("T --> F
- F --> :: <ob1> <rest> ;" "" "6359C") "NOTcaseFALSE" ("T --> :: <ob1> <rest> ;
- F --> F" "" "5FB49") "COLAcase" ("T --> :: <ob1> ;
- F --> :: <ob2> <rest> ;" "Drops the rest of current stream and executes
- case in the stream above." "62986") "COLANOTcase" ("T --> :: <ob2> <rest> ;
- F --> :: <ob1> ;" "Drops the rest of current stream and executes
- NOTcase in the stream above." "629A1") "#=?SKIP" ("#m #n --> :: <ob2> <rest> ;
- #m #n --> :: <ob1> <rest> ;" "" "6336C") "#>?SKIP" ("#m #n --> :: <ob1> <rest> ;
- #m #n --> :: <ob2> <rest> ;" "" "63399") "#=ITE" ("#m #n --> :: <ob1> <ob3> <rest> ;
- #m #n --> :: <ob2> <rest> ;" "" "62C2D") "#<ITE" ("#m #n --> :: <ob1> <ob3> <rest> ;
- #m #n --> :: <ob2> <rest> ;" "" "63E9D") "#>ITE" ("#m #n --> :: <ob2> <rest> ;
- #m #n --> :: <ob1> <ob3> <rest> ;" "" "63EB1") "#=case" ("#m #n --> :: <ob1> ;
- #m #n --> :: <ob2> <rest> ;" "" "6186C") "OVER#=case" ("#m #n --> :: #m <ob1> ;
- #m #n --> :: #m <ob2> <rest> ;" "" "6187C") "#=casedrop" ("#m #n --> :: <ob1> ;
- #m #n --> :: #m <ob2> <rest> ;" "Note: should be called OVER#=casedrop." "618D3") "#=casedrpfls" ("#m #n --> F
- #m #n --> :: #m <ob1> <rest> ;" "Note: should be called OVER#=caseDRPFLS." "63547") "#<>case" ("#m #n --> :: <ob2> <rest> ;
- #m #n --> :: <ob1> ;" "" "63D3A") "#<case" ("#m #n --> :: <ob1> ;
- #m #n --> :: <ob2> <rest> ;" "" "63D12") "#>case" ("#m #n --> :: <ob2> <rest> ;
- #m #n --> :: <ob1> ;" "" "63D67") "#0=?SEMI" ("#0 --> :: ;
- # --> :: <ob1> <rest> ;" "" "61A18") "#0=?SKIP" ("#0 --> :: <ob2> <rest> ;
- # --> :: <ob1> <rest> ;" "" "6333A") "#0=ITE" ("#0 --> :: <ob1> <ob3> <rest> ;
- # --> :: <ob2> <rest>" "" "63E89") "DUP#0=IT" ("#0 --> :: #0 <ob1> <rest> ;
- # --> :: # <ob2> <rest> ;" "" "63E48") "DUP#0=ITE" ("#0 --> :: #0 <ob1> <ob3> <rest> ;
- # --> :: # <ob2> <rest> ;" "" "63EC5") "#0=case" ("#0 --> :: <ob1> ;
- # --> :: <ob2> <rest> ;" "" "61896") "DUP#0=case" ("#0 --> :: #0 <ob1> ;
- # --> :: # <ob2> <rest> ;" "" "61891") "DUP#0=csedrp" ("#0 --> :: <ob1> ;
- # --> :: # <ob2> <rest> ;" "" "618A8") "DUP#0=csDROP" ("#0 --> :: ;
- # --> :: # <ob1> <rest> ;" "" "63CBD") "#1=case" ("#1 --> :: <ob1> ;
- # --> :: <ob2> <rest> ;" "" "63D26") "#1=?SKIP" ("#1 --> :: <ob2> <rest> ;
- # --> :: <ob1> <rest> ;" "" "63353") "#>2case" ("#0/#1/#2 --> :: <ob2> <rest> ;
- # --> :: <ob1> ;" "" "63D4E") "?CaseKeyDef" ("# #' --> :: ' ob1 T ;
- --> :: <ob2> <rest> ;" "Compares two bints. If equal, quotes the
- next object from the runsream and returns it
- along with TRUE." "3FF1B") "?CaseRomptr@" ("# #' --> ob T
- --> F
- --> :: <ob2> <rest> ;" "Compares two bints. If equal, tries to
- resolve the rompointer which must be the next
- object in the runstream. The ROMPTR@ pushes
- TRUE when successful, so this entry can be
- used directly for key handlers." "3FF48") "%0=case" ("%0 --> :: %0 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F127") "j%0=case" ("%0 --> :: <ob1> ;
- ob --> :: <ob2> <rest> ;" "" "63D7B") "C%0=case" ("C%0 --> :: C%0 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F13B") "num0=case" ("0 --> :: 0 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "Both a real and a complex zero are TRUE
- conditions for this test." "5F0FA") "%1=case" ("%1 --> :: %1 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F181") "C%1=case" ("C%1 --> :: C%1 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F19F") "num1=case" ("1 --> :: 1 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "Both a real and a complex one are TRUE
- conditions for this test." "5F154") "%2=case" ("%2 --> :: %2 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F1EA") "C%2=case" ("C%2 --> :: C%2 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F208") "num2=case" ("2 --> :: 2 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "Both a real and a complex two are TRUE
- conditions for this test." "5F1BD") "%-1=case" ("%-1 --> :: %-1 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F267") "C%-1=case" ("C%-1 --> :: C%-1 <ob1> ;
- ob --> ob <ob2> <rest> ;" "" "5F285") "num-1=case" ("-1 --> :: -1 <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "Both a real and a complex -1 are TRUE
- conditions for this test." "5F23A") "REALNEGcase" ("%<0 --> :: % <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5EEDB" :U) "pick1#0=case" ("#0 M --> COLA
- ob M --> SKIP" "" "5FBE6" :U) "MEQ1stcase" ("meta&ob1 ob2 --> ob1=ob2 ? case" "Meta&ob1 ob2 ob1=ob2 ? case" "5EFD9") "AEQ1stcase" ("meta&ob --> ob=nob ? case" "Meta&ob ob=nob ? case" "5EF15") "MEQopscase" ("meta1&ob1 meta2&ob2 ob3 -->" "Meta1&ob1 Meta2&ob2 ob3 " "5EFF9") "AEQopscase" ("meta1&ob1 meta2&ob2" "Meta1&ob1 Meta2&ob2 " "5F048") "Mid1stcase" ("meta&ob --> ob is id
- lam ? case" "Meta&ob ob is id or lam ? case" "5F061") "MetaConcase" ("meta --> meta" "( Meta Meta ) COLA if meta contains no
- ids, lams, symbs or romptrs. Else SKIP." "549EC" :U) "M1st+case" ("Meta&+ ? case" "Meta&+ ? case" "5EF2E" :U) "M1st-case" ("Meta&- ? case" "Meta&- ? case" "5EF41" :U) "M1st*case" ("Meta&* ? case" "Meta&* ? case" "5EF54" :U) "M1st/case" ("Meta&/ ? case" "Meta&/ ? case" "5EF67" :U) "M1st^case" ("Meta&^ ? case" "Meta&^ ? case" "5EFA0" :U) "M-1potcase" ("Meta&-1&^ ? case" "Meta&-1&^ ? case" "58ADE" :U) "M1stSQcase" ("Meta&SQ ? case" "Meta&SQ ? case" "5EFB3" :U) "M1stNEGcase" ("Meta&NEG ? case" "Meta&NEG ? case" "5EF7A" :U) "M1stINVcase" ("Meta&INV ? case" "Meta&INV ? case" "5EF8D" :U) "M1stFNCcase" ("Meta&FNCAPPLY ? case" "Meta&FCNAPPLY ? case" "5EFC6" :U) "M-1stcasechs" ("Meta&NEG --> Meta COLA
- Meta --> Meta SKIP
- Meta&(%<0) --> Meta&ABS(%) COLA" "Meta&NEG Meta COLA ; Meta Meta SKIP
- Meta&(%<0) Meta&ABS(%) COLA" "5EE10") "EQIT" ("ob1 ob1 --> :: <ob1> <rest> ;
- ob1 ob2 --> :: <ob2> <rest> ;" "" "63E2F") "EQITE" ("ob1 ob1 --> :: <ob1> <ob3> <rest> ;
- ob1 ob2 --> :: <ob2> <rest> ;" "" "63E75") "jEQcase" ("ob1 ob1 --> :: <ob1> ;
- ob1 ob2 --> :: <ob2> <rest> ;" "" "63CD6") "EQcase" ("ob1 ob1 --> :: ob1 <ob1> ;
- ob1 ob2 --> :: ob1 <ob2> <rest> ;" "Note: Should be called OVEREQcase." "61933") "REQcase" ("ob --> :: ob <ob2> ;
- --> :: ob <ob3> <rest> ;" "EQcase with the next object in the
- runstream. " "629D0") "EQcasedrop" ("ob1 ob1 --> :: <ob1> ;
- ob1 ob2 --> :: ob1 <ob2> <rest> ;" "Note: should be called OVEREQcasedrop." "618BA") "REQcasedrop" ("ob --> <ob2> ;
- --> <ob3> <rest> ;" "EQcasedrop with the next object in the
- runstream." "629E9") "EQUALcase" ("ob1 ob1 --> :: <ob1> ;
- ob1 ob2 --> :: <ob2> <rest> ;" "" "63CFE") "EQUALNOTcase" ("ob1 ob1 --> :: <ob2> <rest> ;
- ob1 ob2 --> :: <ob1> ;" "" "63DF3") "EQUALcasedrp" ("ob ob1 ob2 --> :: <ob1> ;
- ob ob1 ob2 --> :: ob <ob2> <rest> ;" "" "63CA4") "EQUALcasedro" ("ob1 ob2 --> :: <ob1> ;
- ob1 ob2 --> :: ob1 <ob2> <rest> ;" "Note: should be called OVEREQUALcasedrp." "517FE") "EQUALcasedrop" ("ob1 ob2 --> :: <ob1> ;
- ob1 ob2 --> :: ob1 <ob2> <rest> ;" "" "517F3") "tok=casedrop" ("$ $' --> :: <ob1> ;
- --> :: $ <ob2> <rest> ;" "Note: should be called OVERtok=casedrop. " "2856C") "nonopcase" ("seco --> :: seco <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "5E984") "idntcase" ("id --> :: id <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F0AA") "dIDNTNcase" ("id --> :: id <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "63E07") "idntlamcase" ("id/lam --> :: id <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "5F0CD") "REALcase" ("% --> :: <ob1> ;
- ob --> :: <ob2> <rest> ;" "" "63D8F") "dREALNcase" ("% --> :: % <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "63E1B") "dARRYcase" ("[] --> :: [] <ob1> ;
- ob --> :: ob <ob2> <rest> ;" "" "63DA3") "dLISTcase" ("{} --> :: {} ob1 ;
- ob --> :: ob <ob2> <rest> ;" "" "63DB7") "NOTLISTcase" ("{} --> :: {} <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "27244") "DNOTSYMB?SEMI" ("symb --> :: symb <ob1> <rest> ;
- ob --> :: ob ;" "" "18E45" :U) "NOTSECOcase" ("seco --> :: seco <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "27254") "NOTROMPcase" ("romp --> :: romp <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "27264") "DNOTBAKcase" ("bak --> :: bak <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "27224" :U) "DNOTLIBcase" ("lib --> :: lib <ob2> <rest> ;
- ob --> :: ob <ob1> ;" "" "27234" :U) "numb1stcase" ("%/C%/[]/[L] --> :: <ob1> ;
- ob --> :: ob2 <rest> ;" "If %, C%, [ ] or [L] then <REF>COLA,
- else <REF>SKIP ." "5EDFC") "UserITE" ("#set --> :: <ob1> <ob3> <rest> ;
- #clr --> :: <ob2> <rest> ;" "" "63ED9") "SysITE" ("#set --> :: <ob1> <ob3> <rest> ;
- #clr --> :: <ob2> <rest> ;" "" "63EED") "caseDEADKEY" ("T --> :: DoBadKey ;
- F --> :: <ob1> <rest> ;" "" "63BEB") "caseDoBadKey" ("T --> :: DoBadKey ;
- F --> :: <ob1> <rest> ;" "" "63BEB") "caseDrpBadKy" ("ob T --> :: DoBadKey ;
- ob F --> :: ob <ob1> <rest> ;" "" "63BD2") "caseERRJMP" ("T --> :: ERRJMP ;
- F --> :: <ob> <rest> ;" "" "63169") "caseSIZEERR" ("T --> :: SIZEERR ;
- F --> :: <ob> <rest> ;" "" "63B05") "NcaseSIZEERR" ("T --> :: <ob> <rest> ;
- F --> :: SIZEERR ;" "" "63B19") "NcaseTYPEERR" ("T --> :: <ob1> <rest> ;
- F --> :: TYPEERR ;" "" "63B46") "NoEdit?case" ("--> :: <ob1> <rest> ;
- --> :: <rest> ;" "Tests if there is no edit line active." "40D93") "EditExstCase" ("--> :: <ob1> <rest> ;
- --> :: <rest> ;" "Tests if there is an edit line active." "63DCB") "NOP" ("-->" "Does nothing." "06E8E") "xNEGNEG" ("-->" "Does nothing, decompiles to
- :: CK1&Dispatch BINT0 NOP ;
- There like NOP, but requires an argument. " "1ACDD") "'R" ("--> ob" "Pushes next object in return stack (i.e., the
- first object in the composite above this one)
- to the stack (skipping it). If top return
- stack is empty (contains SEMI), a null
- secondary is pushed and the pointer is not
- advanced." "06EEB") "'REVAL" ("--> ?" "Does <REF>'R then <REF>EVAL." "06F66") "'R'R" ("--> ob1 ob2" "Does <REF>'R twice." "639DE") "ticR" ("--> ob T
- --> F" "Pushes next object in return stack to stack
- and TRUE, of just FALSE if the top return
- stack body is empty. In this QcaseQ, it is
- dropped." "61B89") "'RRDROP" ("--> ob" "Does <REF>'R , then <REF>RDROP." "639FC") ">R" (":: -->" "Pushes :: to top of return stack (skips
- prolog, i.e., the composite will be executed
- automatically)." "06F9F") "R>" ("--> ::" "Creates and pops a secondary from top
- return stack body to stack." "0701F") "R@" ("--> ::" "Like <REF>R>, but the return stack is not
- popped." "07012") "IDUP" ("-->" "Pushes interpreter pointer into the return
- stack. " "0716B") "EVAL" ("ob -->" "Evaluates object." "06F8E") "COMPEVAL" ("comp -->" "EVAL just pushes a list back, this one
- executes it." "18EBA") "2@REVAL" ("-->" "EVAL first object in the stream above the
- previous one." "61B45") "3@REVAL" ("-->" "EVAL first object in the stream above the
- stream above the previous one." "61B55") "GOTO" ("-->" "Jumps to next address in stream. Address is
- a five-nibble address, not a system binary.
- Can only be used to jump to the middle of
- programs, cannot jump to a program prolog." "619CB") "?GOTO" ("flag -->" "If TRUE, jumps, else skips five nibbles." "619E0") "NOT?GOTO" ("flag -->" "If FALSE jumps, else skips five nibbles." "619F3") "RDUP" ("-->" "Duplicates top return stack level." "14EA5") "RDROP" ("-->" "Pops the return stack." "06FB7") "2RDROP" ("-->" "Pops two return stack levels." "6114E") "3RDROP" ("-->" "Pops three return stack levels." "61160") "DROPRDROP" ("ob -->" "Does DROP then <REF>RDROP ." "632F9") "RDROPCOLA" ("-->" "Does <REF>RDROP then <REF>COLA ." "62958") "RDROPCOLATRUE" ("--> T" "Does <REF>RDROP then <REF>COLATRUE ." "54C4F" :U) "RSWAP" ("-->" "Swap in the return stack." "60EBD") "RROLL" ("#n -->" "Rolls nth return stack level to top of return
- stack." "14F2A" :U) "RSKIP" ("-->" "Skips first object in the return stack (i.e.,
- the first object in the composite above this
- one)." "63880") "SEMI" ("-->" "DROP the rest of the current stream." "0312B") "'" ("--> nob (nextob)" "Pushes next object in the stream to the stack
- (skipping it)." "06E97") "xSILENT'" ("--> nextob" "Put the next ob in the runstream on the
- stack. Quoter used in UserRPL." "2349C") "DUP'" ("ob --> ob nob" "Does DUP then '." "63925") "DROP'" ("ob --> nob" "Does DROP then '." "6394D") "SWAP'" ("ob1 ob2 --> ob2 ob1 nob" "Does SWAP then '." "63939") "OVER'" ("ob1 ob2 --> ob1 ob2 ob1 nob" "Does OVER then '." "63961") "STO'" ("ob id/lam --> nob" "Does STO then '." "63975") "TRUE'" ("--> T nob" "Pushes TRUE and the next object to the stack." "63989") "FALSE'" ("--> F nob" "Pushes FALSE and the next object to the
- stack." "639B6") "ONEFALSE'" ("--> #1 F nob" "Pushes ONE, FALSE and the next object to the
- stack." "6399D") "#1+'" ("# --> #+1 nob" "Does #1+ then '." "639CA") "'NOP" ("--> NOP" "Pushes NOP to the stack." "632BD") "'ERRJMP" ("--> ERRJMP" "Pushes ERRJMP to the stack." "63155") "'DROPFALSE" ("--> DROPFALSE" "Pushes DROPFALSE to the stack." "3A9B8") "'DoBadKey" ("--> DoBadKey" "Pushes DoBadKey to the stack." "3FDFE") "'DoBadKeyT" ("--> DoBadKey T" "Pushes <REF>DoBadKey and TRUE to the stack." "3FE12") "DROPDEADTRUE" ("ob --> DoBadKey T" "Makes the user QdropQ dead, then pushes TRUE." "4D11E") "'x*" ("--> x*" "Pushes <REF>x* (User word *) to the stack." "63B5A") "'xDER" ("--> xDER" "Pushes xDER (User word \\.d) to the stack." "63B6E") "'IDFUNCTION" ("--> xFUNCTION" "Pushes xFUNCTION (User word FUNCTION) to the
- stack." "5129C") "'IDPOLAR" ("--> xPOLAR" "Pushes xPOLAR (User word POLAR) to the stack." "512C4") "'IDCONIC" ("--> xCONIC" "Pushes xCONIC (User word CONIC) to the stack." "512B0" :U) "'IDPARAMETER" ("--> xPARAMETRIC" "Pushes xPARAMETRIC (user word PARAMETRIC)
- to the stack." "512D8") "'IDTRUTH" ("--> xTRUTH" "Pushes xTRUTH (user word TRUTH) to the stack." "512EC" :U) "'IDSCATTER" ("--> xSCATTER" "Pushes xSCATTER (user word SCATTER) to the
- stack." "51300" :U) "'IDHISTOGRAM" ("--> xHISTOGRAM" "Pushes xHISTOGRAM (user word HISTROGRAM) to
- the stack." "51314" :U) "'IDBAR" ("--> xBAR" "Pushes xBAR (user word BAR) to the stack." "51328" :U) "'Rapndit" ("meta ob1...ob4 --> meta&ob ob1...ob4" "Takes ob from runstream and appends it to the
- meta starting in level 5." "2520A") "'xDEREQ" ("ob --> flag" "Is ob eq to user command xDER?" "63A56") "COLA" ("Evals next obj and
- drops rest of this stream." "" "06FD1") "ONECOLA" ("Does ONE, then COLA." "" "63A15") "SWAPCOLA" ("Does SWAP, then COLA." "" "63312") "XYZ>ZCOLA" ("Does UNROT2DROP, then COLA." "" "63326") "COLA_EVAL" ("Returns and evals first obj
- in previous stream." "" "61A6D") "COLACOLA" ("Drops rest of current stream
- does COLA in the above one." "" "6296D") "SKIP" ("Skips 1 obj in the runstream." "" "0714D") "2SKIP" ("Skips 2 objs in the runstream." "" "0715C" :U) "3SKIP" ("Skips 3 objs in the runstream." "" "283D8" :U) "MEMSKIP" ("ob --> #nextaddress" "" "21C47" :U) "skipcola" ("Does SKIP, then COLA." "" "626EE") "2skipcola" ("Does 2SKIP, then COLA." "" "626E5") "3skipcola" ("Does 3SKIP, then COLA." "" "626DC") "5skipcola" ("Skips 5 objects, then does COLA." "" "626AE") "COLASKIP" ("Drops rest of current stream
- and skips one obj in above stream." "" "633B2") "COLAskipcola" ("Drops rest of current stream,
- skipcola in the above." "" "283C4" :U) "BEGIN" ("-->" "Pushes interpreter pointer into the return
- stack. " "071A2") "AGAIN" ("-->" "Sets the interpreter pointer to the topmost
- value in the return stack, without popping
- it." "071AB") "REPEAT" ("-->" "Sets the interpreter pointer to the topmost
- value in the return stack, without popping
- it." "071E5") "UNTIL" ("flag -->" "If FALSE then <REF>AGAIN, otherwise
- <REF>RDROP ." "071C8") "NOT_UNTIL" ("flag -->" "NOT then <REF>UNTIL ." "633C6") "#0=UNTIL" ("# --> #" "Actually, should be called DUP#0=UNTIL." "62B6F") "WHILE" ("flag -->" "If TRUE does nothing, otherwise <REF>RDROP then
- <REF>2SKIP ." "071EE") "NOT_WHILE" ("flag -->" "NOT then <REF>WHILE ." "633DF") "DUP#0<>WHILE" ("# -->" "Try to guess what it does." "633F8") "DO" ("#stop #start -->" "" "073F7") "ZERO_DO" ("#stop -->" "" "073C3") "DUP#0_DO" ("#stop --> #stop" "" "6347F") "ONE_DO" ("#stop -->" "" "073CE") "#1+_ONE_DO" ("#stop -->" "" "073DB") "toLEN_DO" ("{} --> {}" "From ONE to #elements." "63498") "ONE_DO_ARRY" ("[] --> []" "From ONE to #elements." "37BCB" :U) "LOOP" ("-->" "" "07334") "+LOOP" ("# -->" "Increments index by specified number." "073A5") "DROPLOOP" ("ob -->" "" "63466") "SWAPLOOP" ("ob1 ob2 --> ob2 ob1" "" "6344D") "SWAPDROPLOOP" ("ob1 ob2 --> ob2" "" "54CB3" :U) "STOPLOOP" ("-->" "Destroys topmost loop environment." "07321" :U) "SEMILOOP" ("-->" "" "61A47") "INDEX@" ("--> #" "Recalls topmost loop counter value." "07221") "DUPINDEX@" ("ob --> ob #" "" "63411") "SWAPINDEX@" ("ob1 ob2 --> ob2 ob1 #" "" "63425") "OVERINDEX@" ("ob1 ob2 --> ob1 ob2 ob1 #" "" "63439") "INDEX@#-" ("# --> #'" "" "63790") "INDEX@-" ("# --> #'" "" "63790") "INDEXSTO" ("# -->" "Stores new topmost loop counter value." "07270") "ISTOP@" ("--> #" "Recalls topmost loop stop value." "07249") "ISTOPSTO" ("# -->" "Stores new topmost loop stop value." "07295") "ISTOP-INDEX" ("--> #" "" "5182F") "JINDEX@" ("--> #" "Recalls second topmost loop counter value." "07258") "JINDEXSTO" ("# -->" "Stores new second topmost loop counter
- value." "072AD") "JSTOP@" ("--> #" "Recalls second topmost loop stop value." "07264") "JSTOPSTO" ("# -->" "Stores new second topmost loop stop value." "072C2") "ZEROISTOPSTO" ("-->" "Does not exit loop immediately. Just stores
- zero as the stop value, so all objects until
- the next LOOP will be evaluated." "6400F") "(ExitAtLoop)" ("-->" "Does not exit loop immediately. Just stores
- zero as the stop value, so all objects until
- the next LOOP will be evaluated." "6400F") "ExitAtLOOP" ("-->" "Does not exit loop immediately. Just stores
- zero as the stop value, so all objects until
- the next LOOP will be evaluated." "6400F") "DUPExitAtLOOP" ("ob --> ob ob" "" "3F78C" :U) "ExitAtLOOPDUP" ("ob --> ob ob" "" "3F7EB" :U) "DRPExitAtLOOP" ("ob -->" "" "4334F" :U) "DUP@" ("id/lam --> id/lam ob T
- --> id/lam F" "Does DUP then <REF>@." "62C05") "SAFE@" ("id/lam --> ob T
- --> F" "For lams does <REF>@. For ids does
- <REF>?ROMPTR> to the ob found." "62A34") "SAFE@NOT" ("id --> ob F
- --> T" "Does <REF>SAFE@ then NOT." "5E5EE" :U) "DUPSAFE@" ("id/lam --> id/lam ob T
- --> id/lam F" "Does DUP then <REF>SAFE@." "62A2F") "SAFE@_HERE" ("id --> ob F
- --> T" "Same as <REF>SAFE@, but works only in the
- current directory." "1853B") "Sys@" ("ID --> ob T
- --> F" "Switches temporarily to the HOME directory
- and executes @ there." "2EA6A") "XEQRCL" ("id --> ob" "Same as <REF>SAFE@, but errors if variable is not
- found. Also works for lams, but you get the
- wrong error." "20B81") "LISTRCL" ("{path id} --> ob" "Recalls from specified path." "20B9A") "ROMPTR@NOT" ("ROMPTR --> ob F
- --> ROMPTR T" "Recalls contents of ROMPTR if possible." "5E616" :U) "STO" ("ob id/lam -->" "For ids this assumes ob is not pco. If
- replacing some object, that object is copied
- to TEMPOB and pointers are updated. For
- lams: Errors if lam is unbound." "07D27") "SAFESTO" ("ob id/lam -->" "For ids, does <REF>?>ROMPTR to the object
- before storing." "62A02") "SysSTO" ("ob ID -->" "Switches temporarily to the HOME directory
- and executes <REF>STO there." "2E9E6") "?STO_HERE" ("ob id/lam -->" "Same as <REF>SAFESTO, but will only store in the
- current directory and will not overwrite a
- directory." "18513") "XEQSTOID" ("ob id/lam -->" "Same as <REF>SAFESTO, but will only store in the
- current directory and will not overwrite a
- directory." "18513") "XEQStoKey" ("ob ID -->" "" "40F22") "REPLACE" ("newob oldob --> newob" "Replaces oldob (in memory) with newob." "085D3") "PURGE" ("id -->" "Purges variable. Does no type check first." "08C27") "?PURGE_HERE" ("id -->" "Like <REF>PURGE, but only works in current
- directory." "1854F") "MOVEVAR" ("" "Move the variable to a different directory.
- Stack diagram unknown - level 1 must be rrp,
- but level two??" "7DF7C") "CREATE" ("ob id -->" "Creates a variable in the current directory.
- Errors if id is or contains current
- directory. Assumes id is not a pco." "08696") "DoHere:" ("-->" "Next object in the runstream is evaluated for
- the current directory only." "185C7") "'LAMLNAMESTO" ("ob -->" "STO to LAM LAMLNAME." "63A3D") "MAKERRP" ("#libnum --> rrp" "Creates an empty directory." "077E4" :U) "CREATERRP" ("id -->" "Creates an empty directory. Does not check if
- the name is already used.
- :: # 7FF CRDIR# SWAP CREATE ;" "08DF2" :U) "CREATEDIR" ("id -->" "Creates an empty directory. Calls
- <REF>?PURGE_HERE first to delete the original." "184E1") "LASTRAM-WORD" ("rrp --> ob T
- --> F" "Recalls first object in directory." "08326") "LastNonNull" ("rrp --> ob T
- --> F" "Recalls first object in directory (not null
- named)." "18621") "PREVRAM-WORD" ("ob --> ob' T
- --> F" "Recalls next object in directory." "08376") "PrevNonNull" ("ob --> ob' T
- --> F" "Recalls next object in directory (not null
- named)." "1863A") "CkNonNull" ("ob --> ob T
- --> F" "Checks that the variable (ob) has a name." "18653" :U) "RAM-WORDNAME" ("ob --> id" "Recalls name of object in current directory." "082E3") "XEQPGDIR" ("id -->" "Purges a directory. Checks references, etc.
- first." "18595") "XEQORDER" ("{id1 id2..} -->" "Orders the variables in the directory by
- moving the given variables to the beginning of
- the directory." "20FF2") "DOVARS" ("--> {id1 id2..}" "Returns list of variables from current
- directory." "18779") "DOTVARS%" ("% --> {}" "Returns a list of variables in the current
- directory with user type given by the
- number. Internal TVARS if a single number was
- given. " "186E8") "DODIRPRG" ("ob :: --> {}" "Executes seco (can be single object) on all
- directory variables.
- At execution: ob :: id_contents { } id
- To be returned: ob :: id_contents { } ob flag
- If flag is TRUE, ob is added with >TCOMP to
- list, else it is dropped." "1867F" :U) "PATHDIR" ("--> {HOME dir1 dir2..}" "Returns current path." "1848C") "UPDIR" ("-->" "Goes to parent directory." "1A16F") "MYRAMROMPAIR" ("rrp --> rrp' T
- --> F" "Gets parent directory. Returns FALSE if
- parent directory is HOME." "08309" :U) "SYSRRP?" ("rrp --> flag" "Is rrp HOME?" "08DD4") "CONTEXT@" ("--> rrp" "Recalls current directory." "08D5A") "CONTEXT!" ("rrp -->" "Sets new current directory." "08D08") "STOPSIGN@" ("--> rrp" "Recalls last directory." "08D82" :U) "STOPSIGN!" ("rrp -->" "Stores new last directory." "08D4A" :U) "SYSCONTEXT" ("-->" "Sets HOME as current directory." "08D92") "HOMEDIR" ("-->" "Sets HOME as current directory." "08D92") "SYSSTOPSIGN" ("-->" "Sets HOME as last directory." "08DC4" :U) "SaveVarRes" ("-->" "Binds current and last directories to two
- nullnamed lams." "640A0") "RestVarRes" ("-->" "First sets HOME as both the current and last
- directories (in QcaseQ an error happens). Then,
- restores the current and last directories
- from 1LAM and 2LAM." "640FA") "SetHiddenRes" ("-->" "Sets the hidden directory as the current and
- last directories." "640BE") "WithHidden" ("--> ?" "Executes next command in hidden directory." "64037") "RclHiddenVar" ("id --> ob T
- --> F" "Recalls variable in hidden directory. Same
- as
- :: WithHidden @ ;" "64023") "StoHiddenVar" ("ob id -->" "Stores variable in hidden directory. Same as
- :: WithHidden STO ;" "64078") "PuHiddenVar" ("id -->" "Purges variable in hidden directory. Same as
- :: WithHidden PURGE ;" "6408C") "TOTEMPOB" ("ob --> ob'" "Copies object to TEMPOB and returns
- pointer to the new copy." "06657") "TOTEMPSWAP" ("ob1 ob2 --> ob2' ob1" "Does TOTEMPOB then SWAP." "62C69") "CKREF" ("ob --> ob'" "If object is in TEMPOB, is not embedded in a
- composite and not referenced, does nothing.
- Else copies it to TEMPOB and returns the
- copy." "37B44") "SWAPCKREF" ("ob1 ob2 --> ob2 ob1'" "Does SWAP then <REF>CKREF." "63F7E") "INTEMNOTREF?" ("ob --> ob flag" "If the object is in TEMPOB area, is not
- embedded in a composite and is not
- referenced, returns the object and TRUE,
- otherwise returns the object and FALSE." "06B4E") "FREEINTEMP?" ("ob --> ob flag" "Tests if object is in TEMPOB area and not in
- a composite." "06B3E" :U) "~INTEMPOB?" ("ob --> ob flag" "" "01E0E8") "PTRREFD?" ("ob --> ob flag" "Tests if object is referenced." "065D9" :U) "REFERENCED?" ("ob --> ob flag" "Tests if object is referenced or in
- composite." "065E5" :U) "NOTREF?" ("ob --> ob flag" "Tests if object is not referenced or in
- composite. ( :: REFERENCED? NOT ; )" "06BC2" :U) ">TOPTEMP" ("ob --> ob'" "Moves object to top ob TEMPOB area. Does
- not garbage collection." "06DDE" :U) "TOTEMPOBADJ" ("ob --> ob ob'" "Makes a standalone copy by moving
- references to a new copy." "064BD" :U) "DOADJ1" ("ob1 ob2 --> ob1 ob'" "Moves references from ob2 to ob1 (ob1 in
- TEMPOB area)." "064D6" :U) "DOADJ" ("ob1 ob2 --> ob1 ob'" "Moves references from ob2 to ob1 (ob1 in
- TEMPOB area). References to body of ob2 are
- moved too." "064E2" :U) "SLOW" ("-->" "15 millisecond delay." "40EE7") "VERYSLOW" ("-->" "300 millisecond delay." "40F02") "SORTASLOW" ("-->" "1.2 second delay (4 x VERYSLOW). " "48FF9") "VERYVERYSLOW" ("-->" "3 second delay." "40F12") "wait" ("hxs -->" "Wait specified number of ticks (there are
- 8192 ticks in a second)." "1A7ED" :U) "dowait" ("%secs -->" "Waits specified number of seconds." "1A7C9") "dowait/quit?" ("%secs -->" "Waits specified number of seconds, exits
- program if `CANCEL' is pressed." "1A7B5" :U) "%>HMS" ("% --> %hms" "Converts from decimal to H.MMSS format." "2A673") "%%H>HMS" ("%% --> %%hms" "Same as %>HMS, but for long reals." "2AF27") "%HMS>" ("%hms --> %" "Converts from H.MMSS format to decimal." "2A68C") "%HMS+" ("%hms1 %hms2 --> %hms" "Adds time in hms format." "2A6A0") "%HMS-" ("%hms1 %hms2 --> %hms" "Subtracts time in hms format." "2A6C8") "TOD" ("--> %time" "Returns current time." "0CBFA") ">TIME" ("%time -->" "Sets time." "0CD53" :U) "CLKADJ" ("%time -->" "Also sets time." "0CD3F" :U) "VerifyTOD" ("%time --> %time" "Checks for validaty of time. Errors if not
- valid." "0E66A") "DATE" ("--> %date" "Returns current date." "0CC0E") ">DATE" ("%date -->" "Sets date, errors if % is not a valid date." "0CD2B" :U) "DATE+DAYS" ("%date %days --> %date'" "Adds specified number of days to date." "0CC5B") "DDAYS" ("%date1 %date2 --> %days" "Returns number of days between two dates." "0CC39") "SysTime" ("--> hxs" "Returns tick count." "0EB81") "CLKTICKS" ("--> hxs" "Returns tick count." "0EB81") "Date>d$" ("%date --> $" "Returns string representation of date, using
- current format." "0CFD9") "Date>wd$" ("%date --> $weekday" "Returns weekday: \"SUN\", \"MON\", etc." "0D2F0" :U) "Ticks>wd$" ("hxs --> $weekday" "Same function but using clock ticks." "0CF5B" :U) "TOD>t$" ("%time --> $" "Returns string represent the time, using
- current format." "0D06A") "Date>hxs13" ("%date --> hxs" "Converts date to ticks." "0EE50") "Ticks>Date" ("hxs --> %date" "Returns date from hxs of internal alarm list
- format." "0D156" :U) "TOD>Ticks" ("%time --> hxs" "Converts time to ticks." "0EE83" :U) "Ticks>TOD" ("hxs --> %time" "Returns time from hxs of internal alarm list
- format." "0D143" :U) "Ticks>Rpt" ("hxs --> %rpt" "Converts hxs in internal alarm list format to
- repetition interval." "0D169" :U) "Date+Time" ("hxs_d hxs_t --> hxs" "Takes two hxs representing the date and the
- time, and joins them into only one hxs." "0EE26" :U) "ALARMS@" ("--> {}" "Returns internal alarms list." "0E235") "STOALM" ("%date %time acti %rep --> %" "Stores an alarm. %repeat is the number of
- ticks between every repetition. Since there
- are 8192 ticks in a second, 60 seconds in a
- minute, and 60 minutes in an hour, to make an
- alarm that repeats every hour, %repetition
- would be 8192*60*60 = 29491200.
- Returns real number representing the position
- of the alarm in the list." "0E6ED") "STOALARMLS" ("{} --> %" "Stores an alarm. List contents:
- { %date %time action %repeats }
- You may omit %repeats and action. In this
- QcaseQ, the alarm has no repetition and no
- message is displayed.
- Returns real number representing the position
- of the alarm in the list." "0E54D" :U) "STOALARM%" ("%time --> %" "Store an alarm at specified time today, with
- no message and no repetition.
- Returns real number representing the position
- of the alarm in the list." "0E510" :U) "PURGALARM%" ("% -->" "Internal <REF>xDELALARM." "0E724" :UBS) ">ALRMLS" ("$ %date %time %rpt --> {}" "Generates list (of the internal type)
- representing the alarm." "0EF45" :U) "ALRMLS>" ("{} --> {}'" "Converts list of internal format to list in
- the format of STOALARMLS." "0E1D8" :U) "RCLALM" ("#n --> {} T
- --> F" "Recalls nth alarm. List is in the internal
- format." "0E402" :U) "RCLALARM%" ("%n --> {}" "Recalls nth alarm. List is in the format of
- STOALARMLS." "0E3DF" :UBS) "FINDALARM%" ("%date --> %" "Returns position in the internal alarm list
- of the first alarm of that day (or in any
- following day)." "0EAD7" :U) "FINDALARMLS" ("{} --> %" "Takes a list of the format: { %date %time }
- Returns real represent the position of the
- specified alarm in the alarm list, or 0 if
- not found." "0EB31" :U) "DELALARM" ("%n -->" "Deletes nth alarm." "0E724" :U) "ALARM?" ("--> flag" "Returns TRUE if an alarm is due." "422A1") "ACKALM" ("--> flag" "Tries acknowledging first alarm due. Returns
- TRUE if no due alarm was found, or FALSE if a
- due alarm has been found and acknowledged." "0DDC1" :U) "ACKALLALMS" ("-->" "Acknowledges all due alarms." "0DDA8" :U) "FNDALARM{}" ("" "" "0EB31" :UBS) "FindNext" ("" "" "0EBD5") "SetSysFlag" ("# -->" "Sets the system flag with number #.
- <REF>TEXT:Flags" "53731") "ClrSysFlag" ("# -->" "Clears the system flag with number #.
- <REF>TEXT:Flags" "53761") "TestSysFlag" ("# --> flag" "Returns TRUE if system flag is set.
- <REF>TEXT:Flags" "53784") "TestSysClr" ("# --> flag" "Clears flag after testing.
- <REF>TEXT:Flags" "1C4EC" :U) "TogSysFlag" ("# -->" "Toggles system flag.
- <REF>TEXT:Flags" "3EDA2" :U) "SetUserFlag" ("# -->" "Set the user flag with number #.
- <REF>TEXT:Flags" "53725") "ClrUserFlag" ("# -->" "Clear the user flag with number #.
- <REF>TEXT:Flags" "53755") "TestUserFlag" ("# --> flag" "Returns TRUE if user flag is set.
- <REF>TEXT:Flags" "53778") "TestUserClr" ("# --> flag" "Clears flag after testing.
- <REF>TEXT:Flags" "1C4CE" :U) "RCLSYSF" ("--> hxs" "Recalls system flags from 1 to 64.
- <REF>TEXT:Flags" "1C637") "STOSYSF" ("hxs -->" "Stores system flags from 1 to 64.
- <REF>TEXT:Flags" "1C731" :U) "DOSTOSYSF" ("hxs -->" "Stores system flags from 1 to 64, checking
- for changes in LASTARG flag." "1C6E3") "RCLUSERF" ("--> hxs" "Recalls user flags from 1 to 64." "1C64E") "STOUSERF" ("hxs -->" "Stores user flags from 1 to 64." "1C6F7" :U) "STOALLFcont" ("hxs_usr hxs_sys -->" "Stores user and system flags from 1 to
- 64. First is user flags, second is system
- flags." "1C6CF" :U) "DOSTOALLF0" ("{} -->" "Stores user and system flags from 1 to
- 64. Expects a list of two hxs, first is user
- flags, second is system flags." "1C6A2") "XEQSTWS" ("% -->" "" "53C96" :U) "XEQRCWS" ("--> %" "" "53CF0" :U) "DOHEX" ("-->" "Switch stack display format of HEX strings to
- hexadecimal.
- <REF>TEXT:Flags" "53C37") "DODEC" ("-->" "Switch stack display format of HEX strings to
- decimal.
- <REF>TEXT:Flags" "53C5B") "DOBIN" ("-->" "Switch stack display format of HEX strings to
- binary." "53C43") "DOOCT" ("-->" "Switch stack display of HEX strings to octal." "53C4F") "BASE" ("--> #" "Returns #10h, #10d, #10b or #10o. In decimal
- terms, 16 for hexadecimal base, 10 for
- decimal base, 8 for octal base or 2 for
- binary base." "54050") "BASECHAR" ("--> char" "Returns \"h\", \"d\", \"b\" or \"o\"." "5407A" :U) "DOSTD" ("-->" "Internal version of user word STD." "16707") "DOFIX" ("# -->" "Internal version of user word FIX." "166E3") "DOSCI" ("# -->" "Internal version of user word SCI." "166EF") "DOENG" ("# -->" "Internal version of user word ENG." "166FB") "savefmt1" ("-->" "Saves the current number format, and changes
- to STD mode." "15A8B") "rstfmt1" ("-->" "Restores the number format saved by
- savefmt1. Only one set of flags can be saved,
- there is no nesting of these entries." "15A60") "NumbMode" ("--> #" "Returns 0 for STD mode, 1 for FIX mode, 2
- for SCI mode or 3 for ENG mode." "53B61" :U) "SETRAD" ("-->" "Set angular mode to RAD." "2A5F0") "RAD?" ("--> flag" "Is angular mode QRAD?Q" "53BDD") "SETDEG" ("-->" "Set angular mode DEG." "2A5D2") "DEG?" ("--> flag" "Is angular mode DEG?" "53BC9" :U) "SETGRAD" ("-->" "Set angular mode GRAD." "2A604") "DPRADIX?" ("--> flag" "Returns TRUE if current radix is \".\"." "167BF") "PRSOL?" ("--> flag" "Returns TRUE if general solutions flag (1) is
- set." "53C23" :U) "NOTCONST?" ("--> flag" "Returns TRUE if symbolic constants flag (2)
- is cleared." "53C0A" :U) "SETNUM" ("-->" "Sets numeric results flag (3)." "53B9C" :U) "CLRNUM" ("-->" "Clears numeric results flag (3)." "53B88" :U) "NOTNUM?" ("--> flag" "Returns TRUE if numeric results flag (3) is
- cleared." "53BB0" :U) "UNDO_OFF" ("-->" "Turns saving of the last stack for UNDO off. " "538DC") "UNDO_ON" ("-->" "Turns saving of the last stack for UNDO on. " "538CE") "UNDO_ON?" ("--> flag" "Tests if last stack saving for UNDO is on." "538C0") "1A/LockA" ("-->" "Equivalent to pressing the ALPHA key, turns
- on ALPHA mode for either 1 keypress or until
- the next ALPHA keypress, depending on system
- flag 60.
- --
- Flags: -60" "3AA0A") "DOBEEP" ("%freq %dur -->" "Beeps. Analog to user function BEEP." "1415A") "setbeep" ("#ms #Hz -->" "Also beeps." "141B2") "TurnOff" ("-->" "Internal OFF." "041A7") "!TurnOff" ("-->" "Internal OFF. Does not do alarm check, etc." "041DA" :U) "DEEPSLEEP" ("--> flag" "Puts HP into deepsleep mode.
- Returns TRUE if \"Invalid Card Data\" message." "041ED") "ChkLowBat" ("" "" "325AA") "ShowInvRomp" ("-->" "Flashes \"Invalid Card Data\" message." "0426A") "?FlashAlert" ("-->" "Displays system warnings." "386D8") "AlertStatus" ("--> #" "Gets last system warning:
- #0h = OK
- #1h = Alarm
- #2h = LowBat (S)
- #4h = LowBat (P1)
- #8h = LowBat (P2)" "04544" :U) "Alert$" ("# --> $" "Recalls system warning message." "04575" :U) "WSLOG" ("--> $4 $3 $2 $1" "Recalls warm start log messages." "0D2A3" :U) "WSLOGN" ("#n --> $" "Recalls specified warm start log message." "0D18A" :U) "DOAPWL" ("-->" "Forces a warm start but does not log a
- warmstart event." "21B4E" :U) "LiteSlp" ("-->" "Enters light sleep mode." "04912" :U) "GARBAGE" ("-->" "Forces garbage collection." "05F42") "MEM" ("--> #" "Returns amount of free memory in nibbles.
- Does not do garbage collection. (The user
- word does.)" "05F61") "OSIZE" ("ob --> #" "Returns object size in nibbles. Forces
- garbage collection." "05902") "OCRC" ("ob --> #nib hxs" "Returns size in nibbles and checksum as hxs." "05944") "OCRC%" ("ob --> hxs %bytes" "Returns checksum and size in bytes." "1A1FC") "VARSIZE" ("id --> hxs %bytes" "Returns checksum and size in bytes of
- specified variable." "1A265") "INHARDROM?" ("ob --> ob flag" "Is object address < #80000h?" "1A2DA") "NOTINHARDROM?" ("ob --> ob flag" "Is object address #80000h?" "19350" :U) "CHANGETYPE" ("ob #prolog --> ob'" "Changes prolog of object, does TOTEMPOB." "05AB3") "!CHANGETYPE" ("ob #prolog --> ob'" "Changes prolog of object." "05ACC" :U) "getnibs" ("hxs hxs --> hxs'" "Peek. First hxs is data, second is address.
- The data is overwritten for its length
- (maximum 16) with nibbles starting from
- specified address." "6595A") "putnibs" ("hxs hxs -->" "Poke. First hxs is data, second is address.
- See <REF>getnibs." "6594E") "NOBLINK" ("-->" "Clears the BLINKFLAG, SysNib5." "538F8") "cursorblink+" ("" "" "13D28") "cursorblink-" ("" "" "13D55") "?BlinkCursor" ("-->" "Makes the cursor Blink if in App-mode or
- Editline." "42078") "MAXRETRY" ("" "Maximum number of retries = 10." "2D396") "LAMPKNO" ("" "Contains packet number." "2D3A0") "LAMPACKET" ("" "" "2D3B1") "LAMRETRY" ("" "Contains #retry." "2D3C6") "LAMERRMSG" ("" "" "2D3D9" :U) "LAMKP" ("" "" "2D3EE") "LAMLNAME" ("" "" "2D3FB") "LAMOBJ" ("" "" "2D40E") "LAMOPOS" ("" "" "2D41D") "LAMEXCHP" ("" "" "2D42E" :U) "LAMKLIST" ("" "" "2D45A") "LAMKMODE" ("" "" "2D46D") "LAMKPTRN" ("" "" "2D480" :U) "LAMKRM" ("" "" "2D493") "LAMMaxR" ("" "" "2D4A2" :U) "LAMKML" ("" "" "2F211") "'LamKPSto" ("" "" "2D441") "DORECN" ("$/id/lam -->" "Internal RECN." "2D816" :U) "DOSERVER" ("" "Internal SERVER." "2D9F5" :U) "SENDLIST" ("{} -->" "Internal SEND." "2E6EB") "SENDNAME" ("id/lam -->" "Internal SEND." "2E5AB" :U) "GETNAME" ("$/id/lam -->" "Internal KGET." "2E7EF") "DOFINISH" ("-->" "Internal FINISH." "2E876") "DOPKT" ("$ $' -->" "Internal PKT." "2E8D1") "DOBAUD" ("% -->" "Internal BAUD." "2EC84") "DOPARITY" ("% -->" "Internal PARITY." "2ECCA") "DOTRANSIO" ("% -->" "Internal TRANSIO." "2ED10") "DOCKSM" ("" "Internal CKSM." "2ED4C" :U) "DOKERRM" ("--> $" "Internal KERRM." "2EDA6") "DOBUFLEN" ("--> % 0/1" "Internal BUFLEN." "2EDE1") "DOSTIME" ("" "Internal STIME." "2EDF5" :U) "DOSBRK" ("-->" "Internal SBRK." "2EE18") "DOXMIT" ("$ -->" "Internal XMIT." "2EE6F" :U) "DOSRECV" ("% -->" "Internal SRECV." "2EE97") "CLOSEUART" ("-->" "Internal CLOSEIO." "315C6") "DOCR" ("-->" "Internal CR." "31868") "DODELAY" ("% -->" "Internal DELAY." "31FFD") "KDispRow2" ("" "" "2D730") "KDispStatus2" ("" "" "2D74E") "EXCHINITPK" ("" "" "2D517") "SENDEOT" ("" "" "2D58C") "SENDNAK" ("" "" "2E0A9") "SENDERROR" ("" "" "2E0C7") "SENDPKT" ("" "" "2E0F4") "InitIOEnv" ("" "" "2E6BE") "KERMOPEN" ("" "" "2EAE2") "DOOPENIO" ("" "" "2EB37") "OpenIO" ("" "" "2EB62") "OpenIOPrt" ("" "" "3187C") "docr" ("" "" "31854") "IOCheckReal" ("" "" "2EC25") "StdIOPAR" ("--> {}" "Default IOPAR: { 9600 0 0 0 3 1 }." "2E99E") "GetIOPAR" ("--> %baud % % % % %" "Recalls IOPAR and explodes it into the stack." "2EA4F") "StoIOPAR" ("{} -->" "STO the list of IO parameters in the HOME
- directory in the variable IOPAR." "2E9CB") "StdPRTPAR" ("" "" "31F4A") "StoPRTPAR" ("" "" "31F7D") "GetChkPRTPAR" ("" "" "3205C") "OUTUART" ("" "" "30ED2") "POPUART" ("" "" "31289") "OpenUartClr" ("" "" "3161E") "CloseUart" ("" "" "315F9") "OpenUart?Clr" ("" "" "31608" :UBS) "PRINT" ("" "" "32161") "PRINTxNLF" ("" "" "32387") "REMAP" ("" "" "323F9") "SetEcma94" ("" "" "3252B") "AllowPrlcdCl" ("" "" "324A6") "PrintGrob" ("" "" "32B74") "SetServMode" ("" "" "2D9A1") "ClrServMode" ("" "" "2D9B2") "SendSetup" ("" "" "2EEC4") "TRPACKETFAIL" ("" "" "2EFD7") "IncrLAMPKNO" ("" "Increases packet number." "2F383") "GetKermPkt#" ("" "" "2F39C") "RecvNextPkt" ("" "" "2F989") "KVISLF" ("$ --> $'" "String translation for transfer from HP to
- PC. Inserts <cr> (character 12) in front of
- every newline (character 10), and translates
- characters >127 to the corresponding
- backslash escape. Which translations are
- being made depends upon the current
- translation mode (the last number in the
- IOPAR variable, can be set with DOTRANSIO).
- 0: No translation
- 1: CRLF translation
- 2: CRLF and characters 128-159 (80h-9Fh)
- 3: CRLF and characters 128-255 (80h-FFh)" "2FEC9") "KVIS" ("$ --> $'" "Like <REF>KVISLF, but never translates newlines." "2FEDD") "KINVISLF" ("$ --> $' $''" "String translation for transfer from PC to
- HP. Translates digraphs in the string to
- characters and removes <cr> (character 12) in
- front of newline characters. Which
- translations are actually made depends upon
- the current translation mode, see KVISLF.
- $'' contains any incomplete trailing
- backslash sequence in the original string." "3016B") "GETKP" ("" "" "307E2") "SENDACK" ("" "" "2FEA1") "SENDNULLACK" ("" "" "2FEB5") "ACK_INIT" ("" "" "30914") "CHOOSE_INIT" ("" "" "30B1D" :UBS) "ENCODE1PKT" ("" "" "30BBE") "ENCODE" ("" "" "30BD7") "DECODE" ("" "" "30D31") "UARTBUFLEN" ("" "" "3133B") "FLUSHRSBUF" ("" "" "3136C") "PUTSERIAL" ("" "" "31444") "GETSERIAL" ("" "" "314E5") "VERSTRING" ("--> $" "Returns version string." "30794") "VERSTRING?" ("$ --> $ flag" "Checks if $ starts with VERSTRING." "3037A" :U) "UART?" ("" "" "42249") "UARTxcp" ("" "" "42145") "SEND_PACKET" ("" "" "2D5E1") "XEQIOBACKUP" ("" "" "21B5A") "kermpktmsg" ("" "" "00C10") "kermrecvmsg" ("" "" "00C0E") "kermsendmsg" ("" "" "00C0D") "CK0" ("-->" "Saves current command to LASTCKCMD. Marks
- stack below level 1 to STACKMARK." "18A1E") "CK1" ("ob --> ob" "Saves current command to LASTCKCMD. Verifies
- that there is at least one object in the
- stack, if not generates a \"Too Few Arguments\"
- error. Saves stack mark to STACKMARK.
- If Last Arg is enabled then saves the
- argument." "18AA5") "CK2" ("ob1 ob2 --> ob1 ob2" "Like <REF>CK1, but checks for at least two
- arguments." "18A80") "CK3" ("ob1...ob3 --> ob1...ob3" "Like <REF>CK1, but checks for at least three
- arguments." "18A5B") "CK4" ("ob1...ob5 --> ob1...ob5" "Like <REF>CK1, but checks for at least four
- arguments." "18B92") "CK5" ("ob1...ob5 --> ob1...ob5" "Like <REF>CK1, but checks for at least five
- arguments." "18B6D") "CKN" ("ob1...obn %n --> ob1..obn #n" "Checks for a real in level one. Then checks
- for that number of arguments. Finally,
- converts the real to a bint." "18C34") "CK0NOLASTWD" ("-->" "Like <REF>CK0, but does not save current
- command." "18A15") "CK1NOLASTWD" ("ob --> ob" "Like <REF>CK1, but does not save current
- command." "18AB2") "CK2NOLASTWD" ("ob1 ob2 --> ob1 ob2" "Like <REF>CK2, but does not save current
- command." "18A8D") "CK3NOLASTWD" ("ob1...ob3 --> ob1...ob3" "Like <REF>CK3, but does not save current
- command." "18A68") "CK4NOLASTWD" ("ob1...ob4 --> ob1...ob4" "Like <REF>CK4, but does not save current
- command." "18B9F") "CK5NOLASTWD" ("ob1...ob5 --> ob1...ob5" "Like <REF>CK5, but does not save current
- command." "18B7A") "CKNNOLASTWD" ("ob1...obn %n --> ob1..obn #n" "Like <REF>CKN, but does not save current
- command." "18C4A") "CK&DISPATCH0" ("-->" "Dispatches on stack argument. Does not
- convert ZINTs to REAL.
- --
- <REF>CK&DISPATCH1 <REF>CK&DISPATCH2
- <REF>TEXT:Dispatch_Types" "18F9D") "CK&DISPATCH1" ("-->" "Dispatches on stack arguments, stripping tags
- and converting ZINTS to REALS (HP49 only) if
- necessary.
- --
- <REF>CK&DISPATCH0 <REF>CK&DISPATCH2
- <REF>TEXT:Dispatch_Types" "18FB2") "CK&DISPATCH2" ("-->" "Equivalent to <REF>CK&DISPATCH1.
- --
- <REF>CK&DISPATCH0
- <REF>TEXT:Dispatch_Types" "18FA9") "CK1&Dispatch" ("-->" "Combines <REF>CK1 with <REF>CK&DISPATCH1.
- --
- <REF>TEXT:Dispatch_Types" "18ECE") "CK2&Dispatch" ("-->" "Combines <REF>CK2 with <REF>CK&DISPATCH1.
- --
- <REF>TEXT:Dispatch_Types" "18EDF") "CK3&Dispatch" ("-->" "Combines <REF>CK3 with <REF>CK&DISPATCH1.
- --
- <REF>TEXT:Dispatch_Types" "18EF0") "CK4&Dispatch" ("-->" "Combines <REF>CK4 with <REF>CK&DISPATCH1.
- --
- <REF>TEXT:Dispatch_Types" "18F01") "CK5&Dispatch" ("-->" "Combines <REF>CK5 with <REF>CK&DISPATCH1.
- --
- <REF>TEXT:Dispatch_Types" "18F12") "CKINFARGS" ("-->" "Gets meta as argument and checks its length
- (using DEPTH), and errors if it is too short.
- Collects the arguments to a list, does
- CK1NOLASTWD, and explodes the meta again." "5EA09") "0LastRomWrd!" ("-->" "Clears command save by last CK<n> command.
- <REF>CK0" "1884D") "0LASTOWDOB!" ("-->" "Clears command save by last CK<n> command.
- <REF>CK0" "1884D") "AtUserStack" ("-->" " :: CK0NOLASTWD 0LASTOWDOB! ;" "40BC9") "CK1NoBlame" ("-->" " :: 0LASTOWDOB! CK1NOLASTWD ;" "1592D") "'RSaveRomWrd" ("-->" "Stores first object in the composite above
- the actual to LASTCKCMD." "62474") "'RSAVEWORD" ("-->" "Stores first object in the composite above
- the actual to LASTCKCMD." "62474") "EvalNoCK" ("comp --> ?" "Evaluates composite without saving as
- current command. If first command is
- CK<n>&Dispatch it is replaced by
- CK&DISPATCH1. If first command is CK<n> it is
- skipped.
- Any other first command is also skipped!" "18F23") "EvalNoCK:" ("RS
- ob -->" "<REF>EvalNoCK with the next object in the
- runstream as argument." "18F6A" :U) "'EvalNoCK:_sup" ("RS
- ob -->" "<REF>EvalNoCK with the next object in the
- runstream as argument." "18F6A" :U) "CKREAL" ("% --> %
- Z --> %" "Checks for real. If a ZINT, convert
- to real. Else SETTYPEERR." "63B2D") "CKARRY" ("-->" "Checks for array." "193C") "CKRARRY" ("-->" "Checks for real array." "194B") "CKCARRY" ("-->" "Checks for complex array." "194D") "CKLIST" ("-->" "Checks for list." "1944") "CKNAMELIST" ("-->" "Checks for non-empty list of names." "20BE") "CKLISTTYPE" ("-->" "Checks for non-empty list of certain type." "1945") "CKSYMBTYPE" ("-->" "Checks for quoted name (name as symbolic)." "1F05") "nmetasyms" ("meta --> meta" "Checks for meta containing %, C%, unit, id,
- lam or symb." "54C63") "CKNFLOATS" ("-->" "Checks for #n floats (F%)
- zero = C%0 if at least one float was complex,
- otherwise it is %0." "19207" :U) "TYPE" ("ob --> #prolog" "Returns address of prolog of object." "03C64") "XEQTYPE" ("ob --> ob %type" "System version of user word TYPE, but this
- keeps the object." "1CB90") "TYPEREAL?" ("ob --> flag" "" "6216E") "DTYPEREAL?" ("ob --> ob flag" "" "62169") "DUPTYPEREAL?" ("ob --> ob flag" "" "62169") "TYPECMP?" ("ob --> flag" "" "62183") "DUPTYPECMP?" ("ob --> ob flag" "" "6217E") "TYPECSTR?" ("ob --> flag" "" "62159") "DTYPECSTR?" ("ob --> ob flag" "" "62154") "DUPTYPECSTR?" ("ob --> ob flag" "" "62154") "TYPEARRAY?" ("ob --> flag" "" "62198") "DTYPEARRY?" ("ob --> ob flag" "" "62193") "DUPTYPEARRY?" ("ob --> ob flag" "" "62193") "TYPEARRY?" ("ob --> flag ???" "" "62198") "TYPERARRY?" ("ob --> flag" "" "6223B") "TYPECARRY?" ("ob --> flag" "" "62256") "TYPELIST?" ("ob --> flag" "" "62216") "DTYPELIST?" ("ob --> ob flag" "" "62211") "DUPTYPELIST?" ("ob --> ob flag" "" "62211") "TYPEIDNT?" ("ob --> flag" "" "6203A") "DUPTYPEIDNT?" ("ob --> ob flag" "" "62035") "TYPELAM?" ("ob --> flag" "" "6211A") "DUPTYPELAM?" ("ob --> ob flag" "" "62115") "TYPESYMB?" ("ob --> flag" "" "621D7") "DUPTYPESYMB?" ("ob --> ob flag" "" "621D2") "TYPEHSTR?" ("ob --> flag" "" "62144") "DUPTYPEHSTR?" ("ob --> ob flag" "" "6213F") "TYPEGROB?" ("ob --> flag" "" "62201") "DUPTYPEGROB?" ("ob --> ob flag" "" "621FC") "TYPETAGGED?" ("ob --> flag" "" "6222B") "DUPTYPETAG?" ("ob --> ob flag" "" "62226") "TYPEEXT?" ("ob --> flag" "Is ob a unit object?" "6204F") "DUPTYPEEXT?" ("ob --> ob flag" "Is ob a unit object?" "6204A") "TYPEROMP?" ("ob --> flag" "" "621AD") "DUPTYPEROMP?" ("ob --> ob flag" "" "621A8") "TYPEBINT?" ("ob --> flag" "" "6212F") "DUPTYPEBINT?" ("ob --> ob flag" "" "6212A") "TYPERRP?" ("ob --> flag" "" "621C2") "DUPTYPERRP?" ("ob --> ob flag" "" "621BD") "TYPECHAR?" ("ob --> flag" "" "62025") "DUPTYPECHAR?" ("ob --> ob flag" "" "62020") "TYPECOL?" ("ob --> flag" "Is on a secondary?" "621EC") "DTYPECOL?" ("ob --> ob flag" "Is ob a secondary?" "621E7") "DUPTYPECOL?" ("ob --> ob flag" "Is ob a secondary?" "621E7") "?OKINALG" ("ob --> ob flag" "Is object allowed in algebraics?" "26A2D") "Ck&DecKeyLoc" ("%rc.p --> #kc #p" "Converts from user key representation format
- to system. Does handle shift-hold keys." "41CA2") "CodePl>%rc.p" ("#kc #p --> %rc.p" "Converts from system key representation
- format to user. Does handle shift-hold
- keys. " "41D92") "H/W>KeyCode" ("# --> #'" "Converts the keycode offset for shift keys to
- the keycode of the shift key, i.e. 80h->32d,
- 40h->37d, C0h->42d" "3FE44") "H/WKey>KeyOb" ("" "" "3FE26") "ModifierKey?" ("#kc #pl --> flag" "Is the key any of the three modifiers
- right-shift, left-shift, or alpha?" "3FE7B") "KeyOb@" ("--> id/romptr" "Returns the object assigned the the key which
- caused the current program to be executed, or
- whatever has been stored with KeyOb!" "40A82") "KeyOb!" ("ob -->" "Store ob as the KeyOb." "40A6F") "KeyOb0" ("-->" "Clear the KeyOb." "40A95") "FLUSH" ("-->" "Flushes the key buffer." "00D71") "FLUSHKEYS" ("-->" "Flushes the key buffer." "00D71") "CHECKKEY" ("--> #kc T
- --> F" "Returns next key in the key buffer (if there
- is one), but does not pop it. Does handle
- shift-hold keys.
- --
- <REF>TEXT:Keycodes" "04708") "GETTOUCH" ("--> #kc T
- --> F" "Pops next key from key buffer (if there is
- one). Does handle shift-hold keys.
- --
- <REF>TEXT:Keycodes" "04714") "GETKEY" ("--> #kc flag" "Get a single keypress from the keybuffer,
- waits if necessary. The key is returned
- along with TRUE. If an exception happens,
- returns FALSE. The exception is not
- handled. Does handle shift-hold keys.
- --
- <REF>TEXT:Keycodes" "42159") "GETKEY*" ("--> #kc T
- --> F F
- --> {Alrmlist} T F" "Get a single keypress from the keybuffer,
- waits if necessary. The key is returned
- along with TRUE. If an exception happens
- (error or alarm), the exceptions is handled
- and the entry returns FALSE. Does handle
- shift-hold keys.
- --
- <REF>TEXT:Keycodes" "420A0") "GetKeyOb" ("--> ob" "Wait for a single key and return the object
- associated with this key. Does handle
- shift-hold keys.
- --
- <REF>TEXT:Keycodes" "4203C") "DoKeyOb" ("ob -->" "Execute ob as if it had been assigned to a
- key and the key had been pressed." "40454") "REPKEY?" ("#kc --> flag" "Returns TRUE if the key is being pressed.
- --
- <REF>TEXT:Keycodes" "047C7") "REPEATER" ("-->" "Takes two objects from the runstream, a
- BINT and a program. The BINT must represent
- a keycode. The program is evaluated at least
- once, and then again and again as long as the
- specified key is being pressed.
- --
- <REF>TEXT:Keycodes" "40E88") "REPEATERCH" ("-->" "Same as REPEATER, but slower, so more
- appropriate for scrolling and cursor motions.
- --
- <REF>TEXT:Keycodes" "51735") "KEYINBUFFER?" ("--> flag" "Returns TRUE if there is at least a key in
- the key buffer." "42402") "WaitForKey" ("--> #kc #flag" "Returns next full key press. Does *not* handle
- shift-hold keys.
- --
- <REF>TEXT:Keycodes" "41F65") "Wait/GetKey" ("% --> ?" "Internal WAIT command. Does *not* handle
- shift-hold keys.
- --
- <REF>TEXT:Keycodes" "1A738") "ATTN?" ("--> flag" "Returns TRUE if `CANCEL' has been pressed." "42262") "?ATTN_QUIT" ("-->" "If `CANCEL' has been pressed, ABORTs program." "4243E") "?ATTNQUIT" ("-->" "If `CANCEL' has been pressed, ABORTs program." "4243E") "CK0ATTNABORT" ("-->" "Executed by the UserRPL program delimiters
- x<< and x>> and by xUNTIL. Mainly just
- ?ATTNQUIT." "23768") "NoAttn?Semi" ("-->" "If `CANCEL' has been not pressed, drops the
- rest of the stream." "4245C") "ATTNFLG@" ("--> #" "Recalls `CANCEL' key counter." "05040") "ATTNFLGCLR" ("-->" "Clears `CANCEL' key counter. Does not affect
- the key buffer." "05068") "DoBadKey" ("-->" "Beeps." "3FDD1") "DropBadKey" ("ob -->" "Beeps." "3FDC7") "2DropBadKey" ("ob ob' -->" "Beeps." "3FDBD") "UserKeys?" ("--> flag" "Does BINT62 TestSysFlag." "41A8D") "GetUserKeys" ("--> {}" "Returns user keys list (internal format).
- --
- <REF>TEXT:Reserved|UserKeys" "41F3F") "XEQRclKeys" ("--> {}" "Recalls all key assignments (in user format)
- plus status of non defined keys.
- --
- <REF>TEXT:Reserved|UserKeys" "41C02" :U) "XEQAsnKey" ("ob %rc.p -->" "Assigns an object to a key, specified in user
- format." "41B28" :U) "StoUserKeypatch" ("ob #kc #p -->" "Assigns an object to a key, specified in
- system format. If ob is NULL{}, then this
- actually deletes a key assignment.
- --
- <REF>TEXT:Reserved|UserKeys" "41E78" :U) "UserKeys!" ("{} -->" "Stores user keys (list is in internal
- format).
- --
- <REF>TEXT:Reserved|UserKeys" "41F2C" :U) "StoUserKeys" ("{} -->" "Like <REF>UserKeys!, but also recalculates
- CRC.
- --
- <REF>TEXT:Reserved|UserKeys" "41E32" :U) "Ck&AsnUKeys" ("{} -->" "Stores user keys (list in user format),
- recalculates CRC." "41AA1" :U) "DelKey" ("#kc #plane -->" "Deletes that key assignment, recalculates
- CRC." "41B8C" :U) "XEQDelKeys" ("{} -->" "Deletes specified keys (in user format)." "41B3C" :U) "Ck&ClrUKey" ("0 -->
- %rc.p -->" "System version of user word DELKEYS: if 0,
- deletes all keys, otherwise deletes
- specified key." "41B69" :U) "PgUserKeys" ("-->" "Deletes all user keys." "41F52" :U) "ClrUserKeys" ("-->" "Deletes all user keys and recalculates CRC.
- --
- <REF>TEXT:Reserved|UserKeys" "41F13" :U) "NonUsrKeyOK?" ("--> flag" "Returns TRUE if the keys not defined do their
- normal actions." "3FF75" :U) "SetNUsrKeyOK" ("-->" "Keys not defined do their normal actions." "3FF86" :U) "ClrNUsrKeyOK" ("-->" "Keys not defined just beep when pressed." "3FF97" :U) "Key>StdKeyOb" ("#kc #pl --> ob" "Recalls the standard assignment of the key.
- This is the assignment which is active when
- USER mode is of." "3FB1A") "Key>U/SKeyOb" ("#kc #pl --> ob" "If user mode is on, recalls the user object
- assigned to a key. If user mode is off,
- recalls the standard assignment instead." "3FA57") "?Key>UKeyOb" ("" "" "3FA7A") "GETDF" ("#menukey --> ob" "Gets the definition of a menu key from
- THOUCHTAB. #menukey = #1..#6" "04A41") "GETPROC" ("#menukey --> ob" "Gets the definition of a menu key from
- THOUCHTAB. #menukey = #1..#6. With #7, get
- the executor." "04A0B") "LabelDef!" ("ob -->" "Store a program which displays a menu label.
- Prg has the stack diagram
- ( #col ob \\-> )
- For example, the LIBS command uses the
- following program to make all menu label look
- like directories:
- :: DUPNULL$? ITE
- MakeStdLabel MakeDirLabel
- Grob>Menu ;
- During execution, INDEX@ will contain the
- menu key number." "418F4") "LastMenuDef!" ("menu -->" "Sets the definition of the last menu. menu
- is a MenuList or a program, or a Rompointer." "419E4") "LastMenuDef@" ("--> menu" "Recalls the definition of the last menu.
- menu is a MenuList or a program, or a
- Rompointer." "419F4") "SaveLastMenu" ("-->" "Stores row and definition of current menu as
- the last menu." "4139B") "LastMenuRow!" ("#n -->" "Sets the row of the last menu. #n is not the
- row, but the index of the first menu key in
- that row, i.e. 1,7,13,\\.." "4186E") "LastMenuRow@" ("--> #n" "Recalls the index to the first menu key in
- the current row of the last menu. Returns 1
- for the first page, 7 for the second page, 13
- for the third and so on." "41881") "MenuDef@" ("--> menu" "Recalls the current menu definition. menu is
- a MenuList or a program, or a Rompointer." "418A4") "MenuExitAct!" ("ob -->" "Store ob as exit action." "419C4") "NoExitAction" ("-->" "Sets NOP as ExitAction. Mostly used to avoid
- that the menu is saved as the previous menu
- when a new Menu gets installed." "3EC85") "MenuRow!" ("#n -->" "Sets the menu row. #n is not the row, but
- the index of the first menu key in that row,
- i.e. 1,7,13,\\.." "41848") "MenuRow@" ("--> #n" "Recalls the index of the first menu key in
- the current menu page. Returns 1 for the
- first page, 7 for the second page, 13 for the
- third and so on." "4185B") "MenuKeyLS!" ("ob --> ob" "Set the action for left-shifted menu keys.
- The program receives the action part of the
- menu item as an argument, i.e.
- {ob-NS ob-LS ob-RS}." "41944") "StdMenuKeyLS" ("{ob-NS ob-LS ob-RS} --> ?" "The content of MenuKeyLS for standard menus." "401D4") "MenuKeyNS!" ("og --> ob" "Set the action for unshifted menu keys.
- The program receives the action part of the
- menu item as an argument, i.e. ob-NS or
- {ob-NS ob-LS ob-RS}." "41914") "MenuKeyNS@" ("--> ob" "Recall the action for unshifted menu keys." "41924") "SetKeysNS" ("ob -->" "Sets ob as MenuKeysNS, DoBadKey to LS & RS." "3FCAF") "StdMenuKeyNS" ("ob-NS --> ?
- {ob-NS ob-LS ob-RS} --> ?" "The content of MenuKeyNS for standard menus." "4019D") "MenuKeyRS!" ("ob --> ob" "Set the action for right-shifted menu keys.
- The program receives the action part of the
- menu item as an argument, i.e.
- {ob-NS ob-LS ob-RS}." "41964") "SetRebuild" ("-->" "Sets the flag that the menu needs to be
- rebuild. " "417F3") "ReviewKey!" ("ob -->" "Store a program which is called with the
- review key (RS DOWN). The program has the
- stack diagram
- ( \\-> )" "41984") "MenuRowAct!" ("ob -->" "Stores ob as the RowAct menu property." "418D4") "InitTrack:" ("-->" "Execute the program which is next in the
- runstream if the directory changes. Used by
- the VAR menu to set first menurow when
- diretory changes, or by the CST menu to
- rebuild it." "41741") "TakeOver" ("-->" "Override the default menu key executer. If
- this is the first entry in a program, the
- program can be used in edit mode. When the
- first in a program in the label slot of a
- menu key, the program is evaluated to get the
- label object (most likely a grob)." "40788") "NullMenuKey" ("-->" "A placeholder for an empty menu key when
- defining menu lists." "3EC71") "Modifier" ("-->" " :: TakeOver ;" "4085A") "MenuMaker" ("--> ob" "Quotes next object, and also provides
- TakeOver. The disassembly is
- :: TakeOver 'R ;
- Normally this is used like this:
- :: MenuMaker menu InitMenu ;" "407FB") "InitMenu" ("menu -->" "menu is {} or :: settings {} ;
- Settings override the default settings
- installed by InitMenu." "40F86") "DoMenuKey" ("menu -->" " :: SetDA12NoCh InitMenu ;" "40DC0") "InitMenu%" ("%mnu.pg -->
- %0 -->" "" "41679") "GetMenu%" ("--> %" "" "415C9") "StartMenu" ("menu #n -->" "#n is the index of the first menu key on the
- page, use 1 for the first page, 7 for the
- second etc. StartMenu does ExitAction
- (Previous menu!), sets the default menu
- properties and page. Then it evaluates menu,
- stores result to MenuKeys and executes
- SetThisRow." "41008") "SetThisRow" ("-->" "Builds a new TOUCHTAB, SetBadMenu." "410C6") "LoadTouchTbl" ("MenuKey1 .. MenuKeyN #n -->" "Builds new TOUCHTAB from menukeys." "41175") "SysMenuCheck" ("-->" "Checks menu validity. If DA3NoCh? then
- nothing. If Track? then ?DoTrackAct@. If
- Rebuild? then SetThisRow." "3866F") "?DispMenu" ("-->" "Redisplays the menu now if no key is waiting
- in the buffer. Even better is this:
- :: DA3OK?NOTIT ?DispMenu ;" "3A1CA") "DispMenu.1" ("-->" "Displays menu now." "3A1FC") "DispMenu" ("-->" ":: DispMenu.1 SetDAsValid ;" "3A1E8") "Grob>Menu" ("#col grob -->" "Displays grob as menu label." "3A297") "Str>Menu" ("#col $ -->" "Displays string as menu label." "3A2B5") "Id>Menu" ("#col id -->" "Displays id as menu label." "3A2DD") "Seco>Menu" ("#col :: -->" "Does EVAL then DoLabel." "3A2C9") "DoLabel" ("#col ob -->" "If ob is of one of the supported types,
- displays a menu label. If not, generates a
- \"Bad Argument Type\" error." "41904") ">MENU" ("#col grob -->
- #col $ -->
- #col id -->
- #col :: -->" "Works by dispatching the object type." "3A260" :U) "MakeLabel" ("$ #w #x grob --> grob'" "Inserts $ into grob using CENTER$3x5 with
- y=5." "3A4AB") "CheckMenuRow" ("# --> # #'" "" "41111") "SetSomeRow" ("#n -->" "with Mod(n,FFFFFh)= 0." "3A9E7") "DoMenuKeyNS" ("#n -->" "" "41934") "MenuKey" ("-->" "Takes NOB from Runstream." "40828") "CLEARMENU" ("-->" "" "51125") "CHECKMENU" ("-->" "" "4E266") "nCustomMenu" ("-->" "Installs the CST menu." "7DEE2") "SolvMenuInit" ("-->" "Sets MenuKeyNS/LS/RS, ReviewKey and LabelDef
- properties needed by the Solver menu." "151A6") "DoSolvrMenu" ("-->" "Installs the solver menu which is also
- available via 75 MENU." "3BE54") "DoNameKeyLRS" ("" "" "40350") "DoNameKeyRS" ("" "" "40337") "DoFirstRow" ("-->" "Sets the first row of the current menu." "3B211") "DoNextRow" ("" "" "3A71C") "DoPrevRow" ("" "" "3A735") "InputLine" ("args --> $ T
- --> $ ob1..obn T
- --> ob1..obn T
- --> F
- args = $pr $line #pos
- #I/R #I/A #alph
- menu #row attn #parse" "" "42F44") "InputLAttn" ("" "" "43200") "InputLEnter" ("" "" "43179") "DoInputForm" ("l1..ln f1..fm #n #m msg $ --> ob1..obn T
- --> F\\n
- l = $ #x #y
- f = msg #x #y #w #h #type legal
- dec $hlp ChDat ChDec res init" "Starts an input form using the old engine." "199EB") "~IFMenuRow1" ("--> {}" "Returns the menu for the first menu row of an
- InputForm." "0050B0") "~IFMenuRow2" ("--> {}" "Returns the menu for the second menu row of
- an InputForm." "0060B0") "~Choose" ("::Appl $Title ::Convert {} offset --> {}' T
- --> ob T
- --> F" "The return value is a list if checkfields are
- enabled, otherwise it is just the selected
- object. Only FALSE is returned when the user
- presses `CANCEL'.
- --
- <REF>TEXT:Browser48" "0000B3") "~ChooseMenu0" ("--> {}" "Menus with \"OK\".
- --
- <REF>TEXT:Browser48" "0050B3") "~ChooseMenu1" ("--> {}" "Menus with \"CANCL\", \"OK\".
- --
- <REF>TEXT:Browser48" "0060B3") "~ChooseMenu2" ("--> {}" "Menus with \"CHK\", \"CANCL\", \"OK\".
- --
- <REF>TEXT:Browser48" "0070B3") "~ChooseSimple" ("$title {items} --> ob T
- --> F" "Simple interface to the HP48 choose engine.
- On the HP49G, calls ^RunChooseSimple.
- --
- <REF>TEXT:Browser48" "0660B3") "DoCKeyCheck" ("-->" "Toggle check on current item.
- --
- <REF>TEXT:Browser48" "02A0B3" :UBS) "DoCKeyChAll" ("-->" "Check all elements.
- --
- <REF>TEXT:Browser48" "02B0B3" :UBS) "DoCKeyUnChAll" ("-->" "Uncheck all items.
- --
- <REF>TEXT:Browser48" "02C0B3" :UBS) "DoCKeyCancel" ("-->" "Simulate Cancel.
- --
- <REF>TEXT:Browser48" "02D0B3" :UBS) "DoCKeyOK" ("-->" "Simulate OK.
- --
- <REF>TEXT:Browser48" "02E0B3" :UBS) "LEDispPrompt" ("-->" "Redraw title.
- --
- <REF>TEXT:Browser48" "0300B3" :UBS) "LEDispList" ("-->" "Redraw browser lines.
- --
- <REF>TEXT:Browser48" "0350B3" :UBS) "LEDispItem" ("# -->" "Redraw one line.
- --
- <REF>TEXT:Browser48" "0360B3" :UBS) "~BBMoveTo" ("# -->" "Moves selection to line and updates display.
- --
- <REF>TEXT:Browser48" "0150B3" :UBS) "~BBRecalOff&Disp" ("flag -->" "Recalculates offset of selected item in page,
- and redraws lines if the flag is TRUE.
- --
- <REF>TEXT:Browser48" "0190B3" :UBS) "~BBRunEntryProc" ("-->" "Sends message 85 to ::Appl, thus running the
- user-defined start-up procedure.
- --
- <REF>TEXT:Browser48" "0220B3" :UBS) "~BBReReadPageSize" ("-->" "Re-reads the size of the page (message 57).
- --
- <REF>TEXT:Browser48" "0230B3" :UBS) "~BBReReadHeight" ("-->" "Re-reads the height of the browser line
- (message 58).
- --
- <REF>TEXT:Browser48" "0240B3" :UBS) "~BBReReadCoords" ("-->" "Re-reads the coordinates of the browser box
- (message 63).
- --
- <REF>TEXT:Browser48" "0250B3" :UBS) "~BBReReadWidth" ("-->" "Re-reads the width of the browser line
- (message 59).
- --
- <REF>TEXT:Browser48" "0260B3" :UBS) "~BBRunENTERAction" ("-->" "Sends message 96 to ::Appl, thus running the
- OK action. It does not check the value
- returned and never exits.
- --
- <REF>TEXT:Browser48" "0280B3" :UBS) "~BBRunCanclAction" ("-->" "Sends message 91 to ::Appl, thus running the
- `CANCEL' action. It does not check the value
- returned and never exits.
- --
- <REF>TEXT:Browser48" "0290B3" :UBS) "~BBReDrawBackgr" ("-->" "Redraws the background.
- --
- <REF>TEXT:Browser48" "02F0B3" :UBS) "~BBGetNGrob" ("#n --> grob" "Returns nth element as a grob.
- --
- <REF>TEXT:Browser48" "0370B3" :UBS) "~BBGetNStr" ("#n --> $" "Returns nth element as a string.
- --
- <REF>TEXT:Browser48" "0380B3" :UBS) "~BBRereadChkEnbl" ("-->" "Re-reads whether checkmarks are
- enabled. (Message 61).
- --
- <REF>TEXT:Browser48" "03B0B3" :UBS) "~BBRereadFullScr" ("-->" "Re-reads whether to use full-screen
- mode. (Message 60).
- --
- <REF>TEXT:Browser48" "03C0B3" :UBS) "~BReReadMenus" ("-->" "Re-reads the menu. (Message 83).
- --
- <REF>TEXT:Browser48" "03D0B3" :UBS) "~BBReReadNElems" ("-->" "Re-reads the number of elements. (Message
- 62).
- --
- <REF>TEXT:Browser48" "03E0B3" :UBS) "~BBGetN" ("#n --> ob" "Returns nth element.
- --
- <REF>TEXT:Browser48" "03F0B3" :UBS) "~BBIsChecked?" ("#n --> flag" "Returns whether the given element is
- checked.
- --
- <REF>TEXT:Browser48" "04B0B3" :UBS) "~BBUpArrow" ("--> grob" "Returns up arrow as grob
- --
- <REF>TEXT:Browser48" "0520B3" :UBS) "~BBDownArrow" ("--> grob" "Returns down arrow as grob
- --
- <REF>TEXT:Browser48" "0530B3" :UBS) "~BBSpace" ("--> grob" "Returns a space as grob.
- --
- <REF>TEXT:Browser48" "0540B3" :UBS) "~BBPgDown" ("-->" "Go down one page.
- --
- <REF>TEXT:Browser48" "0590B3" :UBS) "~BBPgUp" ("-->" "Go up one page.
- --
- <REF>TEXT:Browser48" "05A0B3" :UBS) "~BBEmpty?" ("--> flag" "Returns TRUE if the browser has no elements.
- --
- <REF>TEXT:Browser48" "05B0B3" :UBS) "~BBGetDefltHeight" ("--> #" "Returns height of lines based on the font
- that will be used. This value is the default
- height of the browser.
- Equivalent to FPTR 2 64.
- --
- <REF>TEXT:Browser48" "05C0B3" :UBS) "~BRbrowse" ("" "" "0100E0") "BRDispItems" ("" "" "0450E0") "BRdone" ("" "" "0130E0") "BRGetItem" ("" "" "0530E0") "BRinverse" ("" "" "0490E0") "~BRoutput" ("" "" "0120E0") "BrowseMem.1" ("" "" "0B41D8") "~BRRclC1" ("-->" " :: LAM 'BR5 ;" "0180E0") "~BRRclCurRow" ("" " :: LAM 'BR3 ;" "0170E0") "~BRStoC1" ("" " :: ' LAM 'BR5 STO ;" "0030E0") "BRViewItem" ("" "" "0520E0") "sysCHOOSE" ("$title {} %sel --> ob %1
- $title {} %sel --> %0" "Equivalent to User RPL CHOOSE command.
- --
- <REF>TEXT:Browser49" "0600B3" :UBS) "ParOuterLoop" ("Disp Keys NonAppKeys? DoStdKeys? menu #row suspendOK? ExitCond AppErr -->" "" "38985") "POLSaveUI" ("Disp Keys NonAppKeys? DoStdKeys? menu #row suspendOK? ExitCond AppErr -->" "Saves current UI to LAMSavedUI." "389BC") "POLSetUI" ("<REF>ParOuterLoop" "Sets new UI, same arguments as to
- ParOuterLoop." "38A64") "POLKeyUI" ("-->" "Displays, reads and evaluates keys according
- to set UI. " "38AEB") "1POLKeyUI" ("-->" "Executes UI once, doesn't check exit
- condition." "38B09" :U) "POLKeyErr" ("-->" "Handles error caused by a key press." "38B45" :U) "POLSet&KeyUI" ("<REF>ParOuterLoop" " :: POLSetUI POLKeyUI ;" "38994" :U) "POLRestoreUI" ("-->" "Restores saved UI from LAMSavedUI." "38B90") "POLResUI&Err" ("-->" "Restores saved UI and executes ERRJMP." "38B77") "RclUI" ("" "Recalls current ParOuterLoop UI" "389CB" :U) "RclHPUI" ("" "Recalls system UI." "38A11" :U) "NormAppFlags" ("" "Sets default application flags." "38BD6" :U) "SavedUILS" ("" "{ LAMSavedUI }" "38A3E" :U) "LAMSavedUI" ("" "" "38A3E" :U) "AppDisplay!" ("ob -->" "" "38C08") "AppDisplay@" ("-->" "" "38C18") "NoAppDisplay!" ("" "" "38C28" :U) "AppKeys!" ("ob -->" "" "38C38") "AppKeys0" ("???" "" "38C58") "AppKeys@" ("" "" "38C48" :U) "NoAppKeys!" ("" "" "38C58" :U) "AppExitCond!" ("ob -->" "" "38C68") "AppExitCond@" ("--> ob" "" "38C78") "NoAppExitCnd!" ("" "" "38C88" :U) "AppError!" ("ob -->" "" "38C98") "AppError@" ("--> ob" "" "38CAB") "NoAppError!" ("-->" "" "38CBE" :U) "AppError?" ("--> flag" "" "38CD1" :U) "SetAppError" ("-->" "" "38CDF" :U) "ClrAppError" ("-->" "" "38CED" :U) "AppMode?" ("--> flag" "Is currently a POL active?" "38CFB") "SetAppMode" ("-->" "" "38D09") "ClrAppMode" ("-->" "" "38D17") "NAppKeyOK?" ("--> flag" "" "38D25" :U) "SetNAppKeyOK" ("-->" "" "38D33") "ClrNAppKeyOK" ("-->" "" "38D41" :U) "DoStdKeys?" ("--> flag" "" "38D4F" :UBS) "SetDoStdKeys" ("-->" "" "38D5D") "ClrDoStdKeys" ("-->" "" "38D6B" :U) "SuspendOK?" ("--> flag" "Does the current user interface allow
- suspension?" "1446F") "nohalt" ("--> ob" " :: LAM 'nohalt ;" "14483") "AppSuspOK?" ("-->" "" "38D79" :U) "SetAppSuspOK" ("-->" "" "38D8A") "ClrAppSuspOK" ("-->" "" "38D9B") "InitPOLVars" ("" "" "38BD6" :UBS) "EditLExists?" ("--> flag" "Does an EditLine exist?" "53A4A") "NoEditLine?" ("--> flag" "Does no EditLine exist?" "4488A") "EDITLINE$" ("--> $" "Returns a copy of the current command
- line to the stack. Same as RCL_CMD." "44683") "CURSOR@" ("--> #" "Recalls the current cursor position." "13EF1" :UBS) "CURSOR_END?" ("--> flag" "Checks if the cursor is at the end of a line
- or at the end of the file. Works by
- checking the current character against
- newline and CHR_00." "444A5") "FIRSTC@" ("--> #" "Column of the left display window edge." "11432" :UBS) "FIRSTC+" ("-->" "Increases the position of the left window ege
- by one." "11462" :UBS) "SETFIRSTC_0" ("-->" "Sets the position of the left display window
- edge to zero." "11442" :UBS) "CURSOR_OFF" ("--> #" "Cursor column relative to left edge of
- display window." "13E85") "CURSOR_OFF+" ("-->" "Increases the CURSOR offset by one." "13ED2" :UBS) "CURSOR_OFF0" ("-->" "Sets the cursor offset to zero." "13EBC" :UBS) "InsertEcho" ("$ -->" "Inserts string at current cursor position
- in EditLine." "42CFB" :UBS) "Echo$Key" ("$/chr -->" "Same as CMD_PLUS." "42BD4") "EchoChrKey" ("$/chr -->" "Same as CMD_PLUS, but first ?TogU/LCase." "42AE4") "Echo$NoChr00" ("$ -->" "Inserts string at current cursor position
- in EditLine." "42BB6") "DoDelim" ("-->" "Takes a character or string from the
- runstream and inserts it." "40DD4") "DoDelims" ("-->" "Takes a character or a string from the
- runstream, inserts it and moves the cursor
- back by one character." "40DF7") "INSERT_MODE" ("-->" "Turns insert mode on. In insert mode, new
- characters do not overwrite old ones." "53A2E") "?TogU/LCase" ("chr --> chr'" "Toggle upper/lowercase of character if some
- condition is fulfilled." "448C1") "INSERT?" ("--> flag" "Returns TRUE if insert mode is active." "53A3C") "SetCursor" ("# -->
- {# #'} -->" "Sets the cursor to the given position. For
- the list argument, the numbers are row and
- column. " "4325A") "SETCURSOR" ("" "" "13F29" :UBS) "ViewLevel1" ("ob --> ob'" "Edits the object in level 1." "42D46") "Char>Edit" ("" "" "444EE") "CharEdit" ("" "" "42D82") "ClrNewEditL" ("" "" "53A90") "EditLevel1" ("ob --> ob'" "" "42D32") "ObEdit" ("ob --> ob' T
- --> F" "Edits object. When the user cancels, only
- FALSE is returned. Otherwise the changed
- object along with TRUE is returned." "42DC8") "EditString" ("$ -->" "Starts editing the string in the command line
- when the current program exits. This is the
- entry to use if a program should exit with
- the command line. Use InitEdLine before this
- entry to clear the command line (if desired)
- - if not, the string is inserted into the
- existing command line. All code after this
- entry will be executed *before* control is
- handed to the editor application. For
- example:
- ::
- \"SOME STRING\"
- DUPLEN$ SWAP (get length)
- InitEdLine (clear the editline)
- EditString (string to editline)
- STO_CURS_POS2 (cursor at end)
- \"Starting editor...\"
- FlashMsg (display *before* edit)
- ;
- Note that when you press ENTER after
- editing, the command line will be parsed
- normally." "443CB") "Rcl&Do:" ("id -->" "Executes the program which is next in the
- runstream on the contents of the variable.
- The program typically is an edit command,
- with the stack diagrams
- ( ob \\-> ob' T )
- ( ob \\-> F )
- If the flag is TRUE, ob' is stored back into
- the original variable." "42E86") "Roll&Do:" ("# -->" "Does ROLL and then executes the program which
- is next on the runsteam. So the program is
- applied to the object on level #. Typically,
- this is an edit command, with the stack
- diagram
- ( ob \\-> ob )
- After the program exits, UNROLL is used to
- put the object back to the right stack
- position. This entry is probably used in the
- interactive stack." "42E27") "EditMenu" ("--> {}" "Returns the Editor menu." "3BDFA") "<DelKey" ("--> {}" "Returns the `\\<-DEL' menu key." "3E3E1") ">DelKey" ("--> {}" "Returns the `DEL\\->' menu key." "3E4CA") "<SkipKey" ("--> {}" "Returns the `\\<-SKIP' menu key." "3E2DD") ">SkipKey" ("--> {}" "Returns the `SKIP\\->' menu key." "3E35F") "InitEd&Modes" ("-->" ":: InitEdLine InitEdModes ;" "44277") "InitEdLine" ("-->" " :: DEL_CMD ;" "4428B") "InitEdModes" ("-->" "" "44394") "SaveLastEdit" ("$ -->" "Calls CMD_STO if history is on." "40C76") "CMDSTO" ("$ -->" "Adds string to the list of the last 4
- commands, accessible with the `CMD' key." "40C94") "DoNewMatrix" ("--> []/[[]]" "Start matrix editor to enter a new matrix. " "44C31") "DoOldMatrix" ("[] --> []'" "Edit an existing matrix." "44FE7") "TOADISP" ("-->" "Sets the text display as the active." "1314D") "TOGDISP" ("-->" "Sets the graphic display as the active." "13135") "GDISPON?" ("--> flag" "Returns a flag indicating whether the graphic
- display is active." "13167" :U) "ABUFF" ("--> textgrob" "Returns the text grob to the stack." "12655") "GBUFF" ("--> graphgrob" "Returns the graphic grob to the stack.
- The HP49 extable address for ExitAction! is
- the same, but this must be a bug." "12665") "HARDBUFF" ("--> dispgrob" "Returns the current grob to the stack." "12635") "HARDBUFF2" ("--> menugrob" "Returns the menu grob to the stack." "12645") "HBUF_X_Y" ("--> HBgrob #x #y" "" "0E128") "HARDHEIGHT" ("--> #height" "Returns the height of HARDBUFF." "12B6C") "HBUFFDIMw" ("--> #width" "" "12B58" :U) "GBUFFGROBDIM" ("--> #height #width" "Returns dimensions of graphic grob." "5187F") "RECLAIMDISP" ("-->" "Activates the text grob, clears it and sets
- the default size." "130AC") "ClrDA1IsStat" ("-->" "Suspends clock display." "39531") "MENUOFF?" ("--> flag" "Returns TRUE if the menu grob is off." "4E360") "TURNMENUOFF" ("-->" "Turns off menu display, enlarges ABUFF to
- fill screen." "4E2CF") "TURNMENUON" ("-->" "Turns menu grob on." "4E347") "MENUOFF" ("-->" "" "4E2AC") "RSZVDISP" ("-->" "Sets standard size for currently displayed
- grob." "130CA" :U) "BROADENHBUFF" ("#cols -->" "Broadens currently displayed grob." "1297D" :U) "HEIGHTENHBUFF" ("#rows -->" "Heightens currently displayed grob." "12964" :U) "BROADENGROB" ("grob #cols -->" "Broadens graph or text grob." "12BB7" :U) "HEIGHTENGROB" ("grob #rows -->" "Heightens graph or text grob." "12DD1") "KILLADISP" ("-->" "Clears text display." "13043" :U) "KILLGDISP" ("-->" "Clears graph display by setting it to
- NULLGROB. See DOERASE." "13061") "DOERASE" ("-->" "Erases the graphics display grob without
- changing its size." "4B60C") "SysDisplay" ("-->" "Redisplays all required areas. Does it
- immediately, without waiting for the current
- command to finish." "386A1") "DispEditLine" ("-->" "Just calls DispCommandLine." "3A00D") "?DispStack" ("-->" "Redisplays the stack now if necessary." "39B85") "?DispStatus" ("-->" "Redisplays the status area now if necessary." "3959C") "DispStatus" ("-->" "Displays the status area now." "395BA") "DispStsBound" ("-->" "Displays a horizontal line at y=14, normally
- the separation between header and stack." "39B0A") "DispTime?" ("" "" "39515" :UBS) "DispTimeReq?" ("--> flag" "Is time display required? Checks system flag
- 40 and something else." "39AF1") "DispDir?Tim1" ("" "" "398F4") "DispDir?Tim2" ("" "" "39958") "DispDir?Time" ("" "" "3988B") "DispILPrompt" ("-->" "Redisplays the QInputLineQ prompt,
- i.e. refreshes the region between the command
- line and the header during InputLine.
- Requires a string (the prompt) in 4LAM." "430CF") "ClrDA1OK" ("-->" "" "390CC") "ClrDA2aOK" ("-->" "" "390E5") "ClrDA2bOK" ("-->" "" "390FE") "ClrDA2OK" ("-->" "" "39117") "ClrDA3OK" ("-->" "" "3912B") "ClrDAsOK" ("-->" "" "39144") "DA1OK?" ("--> flag" "" "38DAC") "DA2aOK?" ("--> flag" "" "38DFC" :U) "DA2bOK?" ("--> flag" "" "38E4C" :U) "DA2OK?" ("--> flag" "" "38E9C" :U) "DA3OK?" ("--> flag" "" "38EB5") "DAsOK?" ("--> flag" "" "38F05" :U) "DA2aLess1OK?" ("--> flag" "" "38FB9") "DA1OK?NOTIT" ("-->" "Does DA1OK?, NOT then IT." "38F28") "DA2aOK?NOTIT" ("-->" "DA2aOK?, NOT then IT." "38F41") "DA2bOK?NOTIT" ("-->" "DA2bOK?, NOT then IT." "38F5A") "DA3OK?NOTIT" ("-->" "Does DA3OK?, NOT then IT." "38F73") "SetDA1Temp" ("-->" "" "3902C") "SetDA2aTemp" ("-->" "" "39045") "SetDA2bTemp" ("-->" "" "39059") "ClrDA2bTemp" ("-->" "" "3938D" :UBS) "SetDA2OKTemp" ("-->" "" "39207") "SetDA3Temp" ("-->" "" "39072") "SetDA12Temp" ("-->" "" "3921B") "SetDAsTemp" ("-->" "" "3922F") "SetDA1TempF" ("-->" "" "3932B" :U) "ClrDA1TempF" ("-->" "" "39339" :U) "DA1TempF" ("-->" "" "3931D" :U) "SetDA2aTempF" ("-->" "" "39355" :U) "ClrDA2aTempF" ("-->" "" "39363" :U) "DA2aTempF?" ("--> flag" "" "39347" :U) "SetDA2bTempF" ("-->" "" "3937F" :UBS) "ClrDA2bTempF" ("-->" "" "3938D" :U) "DA2bTempF?" ("--> flag" "" "39371" :U) "SetDA3TempF" ("-->" "" "393A9" :U) "ClrDA3TempF" ("-->" "" "393B7" :U) "DA3TempF?" ("--> flag" "" "3939B" :U) "SetDA1Valid" ("-->" "" "38FD2") "SetDA2aValid" ("-->" "" "38FEB") "SetDA2bValid" ("-->" "" "38FFF") "SetDA2Valid" ("-->" "" "3915D") "SetDA3Valid" ("-->" "" "39018") "SetDAsValid" ("-->" "" "39171" :U) "SetDA1ValidF" ("-->" "" "39283" :U) "ClrDA1ValidF" ("-->" "" "39291" :U) "DA1ValidF?" ("--> flag" "" "39275" :U) "SetDA2aValidF" ("-->" "" "392AD" :U) "ClrDA2aValidF" ("-->" "" "392BB" :U) "DA2aValidF?" ("--> flag" "" "3929F" :U) "SetDA2bValidF" ("-->" "" "392D7" :U) "ClrDA2bValidF" ("-->" "" "392E5" :U) "DA2bValidF?" ("--> flag" "" "392C9" :U) "SetDA3ValidF" ("-->" "" "39301") "ClrDA3ValidF" ("-->" "" "3930F" :U) "DA3ValidF?" ("--> flag" "" "392F3" :U) "DAsBad?" ("--> flag" "Is any DA \"Bad\"?" "39248" :U) "SetDA1Bad" ("-->" "" "3947B") "SetDA1BadT" ("--> T" "( SetDA1Bad TRUE )" "38DE8" :U) "ClrDA1Bad" ("-->" "" "39489") "DA1Bad?" ("--> flag" "" "3946D" :U) "SetDA2aBad" ("-->" "" "394A5") "SetDA2aBadT" ("--> T" "( SetDA2aBad TRUE )" "38E38" :U) "ClrDA2aBad" ("-->" "" "394B3") "DA2aBad?" ("--> flag" "" "39497") "SetDA2bBad" ("-->" "" "394CF") "SetDA2bBadT" ("--> T" "( SetDA2bBad TRUE )" "38E88" :U) "ClrDA2bBad" ("-->" "" "394DD") "DA2bBad?" ("--> flag" "" "394C1" :UBS) "SetDA3Bad" ("-->" "" "394F9") "SetDA3BadT" ("--> T" "( SetDA3Bad TRUE )" "38EF1" :U) "ClrDA3Bad" ("-->" "" "39507") "DA3Bad?" ("--> flag" "" "394EB" :UBS) "SetDA1NoCh" ("-->" "" "393D3") "ClrDA1NoCh" ("-->" "" "393E1" :U) "DA1NoCh?" ("--> flag" "" "393C5" :U) "SetDA2aNoCh" ("-->" "" "393FD") "ClrDA2NoCh" ("-->" "" "3940B" :U) "DA2aNoCh?" ("--> flag" "" "393EF" :U) "SetDA2bNoCh" ("-->" "" "39427") "ClrDA2bNoCh" ("-->" "" "39435" :U) "DA2bNoCh?" ("--> flag" "" "39419") "SetDA2NoCh" ("-->" "" "3918A") "SetDA12NoCh" ("-->" "" "3919E") "SetDA3NoCh" ("-->" "" "39451") "ClrDA3NoCh" ("-->" "" "3945F" :U) "DA3NoCh?" ("--> flag" "" "39443" :U) "SetDA13NoCh" ("-->" "" "391C6") "SetDA23NoCh" ("-->" "" "391B2") "SetDA12a3NoCh" ("-->" "" "391DA" :UBS) "SetDA12a3NCh" ("-->" "" "391DA" :UBS) "SetDA123NoCh" ("-->" "" "391EE") "SetDAsNoCh" ("-->" "" "391EE" :UBS) "SetDA2Echo" ("-->" "" "39086") "SetDA2aEcho" ("-->" "" "39086") "SetDA1IsStat" ("-->" "" "39523") "SetNoRollDA2" ("-->" "" "3957A") "ClrNoRollDA2" ("-->" "" "3958B") "NoRollDA2?" ("--> flag" "" "39569" :U) "?SetEditRoll" (":: EditExst?NOT ITE SetDA2RollF SetDA2aNoCh ;" "" "39086" :U) "DA1IsStat?" ("--> flag" "" "39515" :U) "DA1IsStatus?" ("--> flag" "" "39515" :UBS) "SetDA2bIsEdL" ("-->" "" "3954D" :UBS) "DA2bIsEdL?" ("--> flag" "" "3953F" :UBS) "ClrDA2bIsEdL" ("-->" "" "3955B" :UBS) "SetDA2bEdit" ("-->" "" "3954D" :U) "ClrDA2bEdit" ("-->" "" "3955B" :U) "DA2bEdit?" ("--> flag" "" "3953F" :U) "MENoP&FixDA1" ("" "" "390A4") "MENP&FixDA12" ("" "" "390B3") "InitDispModes" ("-->" "" "38F8C" :U) "Ck&Freeze" ("% -->" "Internal FREEZE." "142FB") "BLANKIT" ("#startrow #rows -->" "Clears #rows from HARDBUFF, starting at
- #startrow." "126DF") "CLEARVDISP" ("-->" "Clears HARDBUFF." "134AE") "Clr8" ("-->" "Clears top eight rows (first status line)." "0E083") "Clr8-15" ("-->" "Clears 2nd status line." "0E097") "Clr16" ("-->" "Clears top 16 rows." "0E06F") "BlankDA1" ("-->" "Clears status area from HARDBUFF." "3A546") "BlankDA2a" ("-->" "Clears display area DA2a." "3A591") "BlankDA2" ("-->" "Clears display areas DA2a and DA2b." "3A55F") "BlankDA12" ("-->" "Clears display areas DA1 and DA2" "3A578") "CLCD10" ("-->" "Clears status and stack areas." "01F6D") "CLEARLCD" ("-->" "Clears whole display." "01FA7") "DOCLLCD" ("-->" "Like user word <REF>CLLCD." "5046A") "SetLeftAnn" ("-->" "Sets left-shift annunciator." "11361") "ClrLeftAnn" ("-->" "Clears left-shift annunciator." "1136E") "SetRightAnn" ("-->" "Sets right-shift annunciator." "11347") "ClrRightAnn" ("-->" "Clears right-shift annunciator." "11354") "SetAlphaAnn" ("-->" "Sets alpha annunciator." "1132D") "ClrAlphaAnn" ("-->" "Clears alpha annunciator." "1133A") "SetLock" ("-->" "Sets alpha mode." "11543" :U) "ClrLock" ("-->" "Clears alpha mode." "1156C" :U) "LockAlpha" ("-->" "Sets alpha mode, annunciators, etc." "40D25") "UnLockAlpha" ("-->" "Clears alpha mode, annunciators, etc." "40D39") "Lock?" ("--> flag" "Is alpha mode set?" "11501" :U) "ClrBusyAnn" ("-->" "Clears the busy annunciator." "11320" :U) "SetPrgmEntry" ("-->" "Sets program-entry mode." "11533") "ClrPrgmEntry" ("-->" "Clears program-entry mode." "1155C" :U) "PrgmEntry?" ("--> flag" "Is program-entry mode set?" "11511") "Do1st/1st+:" ("--> :: ob1 ; (PRG mode)
- --> :: ob1 <rest> (no PRG mode)" "If in program mode, executes only the next
- object after it. If not, execution continues
- normally." "3EDF2" :U) "Do1st/2nd+:" ("--> :: <ob1> ; (PRG mode)
- --> :: <ob2> <rest> ; (no PRG mode)" "If in program mode, executes the next object
- after it. If not in program mode, executes
- the rest of the stream starting at the second
- object after it." "3EE1A") "SetAlgEntry" ("-->" "Sets algebraic-entry mode." "53976") "ClrAlgEntry" ("-->" "Clears algebraic-entry mode." "53984") "AlgEntry?" ("--> flag" "Is algebraic-entry mode set?" "53968") "ImmedEntry?" ("--> flag" "Returns TRUE if immediate-entry mode
- (program and algebraic-entry modes cleared)." "408AA") "?ClrAlg" ("-->" "Clears AlgEntry mode if set." "40E3D") "?ClrAlgSetPr" ("-->" "Clears AlgEntry mode if set and sets
- ProgramEntry mode." "40E5B") "TOP8" ("--> HBgrob #x1 #y #x1+131 #y1+8" "Returns coordinates of first status line." "0E0D3") "Rows8-15" ("--> HBgrob #x1 #y1+8 #x1+131 #y1+16" "Returns coordinates of second status line." "0E0FB") "TOP16" ("--> HBgrob #x1 #y1 #x1+131 #y1+16" "Returns coordinates of status area." "0E0AB") "WINDOWCORNER" ("--> #y #x" "Gets coordinates of corner of window. Note
- the order of #x and #y." "137B6") "HBUFF_X_Y" ("--> HBgrob #x #y" "Returns current grob and window coordinates." "0E128") "LEFTCOL" ("--> #x" "Gets x-coordinate of left column." "515FA") "RIGHTCOL" ("--> #x" "Gets x-coordinate of right column." "5160E") "TOPROW" ("--> #y" "Gets y-coordinate of top row." "515A0") "BOTROW" ("--> #y" "Gets y-coordinate of bottom row." "515B4") "WINDOWXY" ("#y #x -->" "Sets corner coordinates. The name really
- should be WINDOWYX" "13679") "REDISPHBUFF" ("-->" "Sets #0 and #0 as window corner coordinates." "13695" :U) "WINDOWUP" ("-->" "Moves display one pixel up." "131C8") "WINDOWDOWN" ("-->" "Moves display one pixel down." "13220") "WINDOWLEFT" ("-->" "Moves display one pixel left." "134E4") "WINDOWRIGHT" ("-->" "Moves display one pixel right." "1357F") "SCROLLUP" ("-->" "Moves display one pixel up, checks for
- corresponding key being pressed." "4D132") "SCROLLDOWN" ("-->" "Moves display one pixel down, checks for
- corresponding key being pressed." "4D16E") "SCROLLLEFT" ("-->" "Moves display one pixel left, checks for
- corresponding key being pressed." "4D150") "SCROLLRIGHT" ("-->" "Moves display one pixel right, checks for
- corresponding key being pressed." "4D18C") "JUMPTOP" ("-->" "Jumps to top of display." "51690") "JUMPBOT" ("-->" "Jumps to bottom of display." "516AE") "JUMPLEFT" ("-->" "Jumps to left of display." "516E5") "JUMPRIGHT" ("-->" "Jumps to right of display." "51703") "WINDOWTOP?" ("--> flag" "Is window at the top?" "5162C") "WINDOWBOT?" ("--> flag" "Is window at the bottom?" "51645") "WINDOWLEFT?" ("--> flag" "Is window at the left?" "5165E") "WINDOWRIGHT?" ("--> flag" "Is window at the right?" "51677") "ScreenUpN" ("(#n --> ) moves stk displ up #n lines" "( #n ) Moves stack display up #n lines." "12996" :U) "ScreenDnN" ("(#n --> ) moves stk displ down #n lines" "( #n ) Moves stack display down #n lines." "12A4A" :U) "ScreenUp" ("moves stk displ up 1 line" "Moves stack display up one line." "12A0D" :U) "ScreenDn" ("moves stk displ down 1 line" "Moves stack display down one line." "12AF6" :U) "sstDISP" ("ob -->" "Displays ob in status line. Used for single
- stepping during debugging." "14C17") "WINDOW#" ("#x #y -->" "Internal PVIEW, displays PICT starting at the
- given coordinates. " "4F052") "DODISP" ("ob %row -->" "Displays any object in specified row." "140AB") "BIGDISPROW1" ("$ -->" "" "1245B") "DISP@01" ("$ -->" "" "1245B") "DISPROW1" ("$ -->" "" "1245B") "DISPROW1*" ("$ -->" "Displays relative to window corner." "12725") "DISPROW1*!" ("$ -->" "Does Clr8 then DISPROW1*." "0E029") "BIGDISPROW2" ("$ -->" "" "1246B") "DISP@09" ("$ -->" "" "1246B") "DISPROW2" ("$ -->" "" "1246B") "DISPROW2*" ("$ -->" "Displays relative to window corner." "12748") "BIGDISPROW3" ("$ -->" "" "1247B") "DISP@17" ("$ -->" "" "1247B") "DISPROW3" ("$ -->" "" "1247B") "BIGDISPROW4" ("$ -->" "" "1248B") "DISP@25" ("$ -->" "" "1248B") "DISPROW4" ("$ -->" "" "1248B") "DISPROW5" ("$ -->" "" "1249B") "DISPROW6" ("$ -->" "" "124AB") "DISPROW7" ("$ -->" "" "124BB") "DISPROW8" ("$ -->" "May not be possible depending on the size of
- the font and whether the menu is on or off." "124CB") "BIGDISPN" ("$ #row -->" "" "12429") "DISPN" ("$ #row -->" "" "12429") "Disp5x7" ("$ #start #max -->" "Displays string on multiple lines, starting
- at #start and no using more than #max
- rows. New lines must be manually
- specified. Segments longer than 22 characters
- are truncated and appended with \"...\"." "3A4CE") "Blank&GROB!" ("$ #x #x1 #x2 -->" "Clears HARDBUFF between (#x1, 0) and
- (#x2, 6). Converts string to grob with small
- characters and displays it at (#x, 0)." "39632") "Save16" ("--> grob" "Returns top 16 rows." "0E047" :U) "Restore16" ("grob -->" "Restores top 16 rows." "0E05B" :U) "DISPSTATUS2" ("$ -->" "Displays message in status area using two
- lines." "1270C") "DispCoord1" ("$ -->" "Displays $ in menu grob using minifont." "4E6EF") "DISPCOORD2" ("$ -->" "Displays $ in menu grob using minifont and
- waits for a key. Then refreshes menu
- display. " "4A055") "FlashMsg" ("$ -->" "Displays message in status area, then
- restores it to normal." "12B85") "FlashWarning" ("$ -->" "Displays message in a message box and
- beeps. Waits for OK to be pressed." "38926") "DoAlert" ("$ -->" "Displays alert messagebox, a message box with
- a little alert grob in the upper left corner." "0910B0") "DoWarning" ("$ -->" "Displays message, beeps and freezes status
- area." "38908") "Ck&DoMsgBox" ("$ -->" "Displays a message box and waits for the user
- to press OK." "00E0B1") "~DoMsgBox" ("$ #x #y grob menu --> T" "Displays a message box with a grob in the
- upper left corner and the specified menu.
- If no grob is desired, use MINUSONE.
- The meaning of #x and #y is unclear - it
- seems that any BINT will do." "0000B1") "~MsgBoxMenu" ("--> {}" "The messsage box menu, with just the OK key." "0020B1") "NULLPAINT" ("--> grob" "0x0 Null grob" "505B2" :U) "CURSOR1" ("--> grob" "6x10 Insert cursor (arrow)" "13D8C") "CURSOR2" ("--> grob" "6x10 Replace cursor (solid box)" "13DB4") "SmallCursor" ("--> grob" "4x6 Cursor (box outline)" "66EF1") "MediumCursor" ("--> grob" "6x8 Cursor (box outline)" "66ECD") "BigCursor" ("--> grob" "6x10 Cursor (box outline)" "66EA5") "LineGrob" ("131x2 line" "131x2 Line (status area divider)" "39B2D" :U) "NullMenuLbl" ("21x8 normal menu key" "" "3A337" :U) "BoxLabelGrob" ("21x8 menu key with box" "" "3A399" :U) "DirLabelGrob" ("21x8 directory menu key" "" "3A3FB" :U) "InvLabelGrob" ("21x8 inverse menu key" "" "3A45D" :U) "~grobAlertIcon" ("9x9 Alert grob" "" "0850B0") "~grobCheckKey" ("21x8 Check Key menu grob" "A tickmark and \"CHK\" in a menu grob." "0860B0") "GROBDIM" ("grob --> #height #width" "" "50578") "DUPGROBDIM" ("grob --> grob #height #width" "" "5179E") "GROBDIMw" ("grob --> #width" "" "63C04") "CKGROBFITS" ("g1 g2 #n #m --> g1 g2' #n #m" "Shrinks g2 if it does not fit in g1." "4F7E6") "CHECKHEIGHT" ("grob #height -->" "Forces grob (ABUFF/GBUFF) to be at least 64
- rows high." "511E3") "GROB!" ("grob1 grob2 #x #y -->" "Stores grob1 into grob2. Bang type." "11679") "GROB+#" ("flag grob1 grob2 #x #y --> grob'" "Inserts grob2 into the specified position of
- grob1, using QORQ (if flag is TRUE) or QXORQ (if
- flag is FALSE). Does all necessary checks first." "4F78C") "GROB!ZERO" ("grob #x1 #y1 #x2 #y2 --> grob'" "Blanks a rectangular region of the grob. Bang
- type." "11A6D") "GROB!ZERODRP" ("grob #x1 #y1 #x2 #y2 -->" "Blanks a rectangular region of the
- grob. Probably only useful if grob is the
- text or graphics grob (see section on
- display-organization). Bang type." "6389E") "SUBGROB" ("grob #x1 #y1 #x2 #y2 --> grob'" "Returns specified portion of grob." "1192F") "XYGROBDISP" ("#x #y grob -->" "Stores grob in QHARDBUFFQ with upper left
- corner at (#x,#y). QHARDBUFFQ is expanded if
- necessary." "128B0") "GROB>GDISP" ("grob -->" "Stores new graph grob." "12F94") "MAKEGROB" ("#height #width --> grob" "Creates a blank grob." "1158F") "MAKEPICT#" ("#w #h -->" "Creates blank graph grob. Minimum size is
- 131x64. Smaller grobs will be automatically
- resized." "4B323") "INVGROB" ("grob --> grob'" "Inverts grob data bits. Bang type." "122FF") "PIXON" ("#x #y -->" "Sets pixel in text grob." "1384A") "PIXOFF" ("#x #y -->" "Clears pixel in text grob." "1383B") "PIXON?" ("#x #y --> flag" "Is pixel in text grob on?" "13992") "PIXON3" ("#x #y -->" "Sets pixel in graph grob." "13825") "PIXOFF3" ("#x #y -->" "Clears pixel in graph grob." "1380F") "PIXON?3" ("#x #y --> flag" "Is pixel in graph grob on?" "13986") "ORDERXY#" ("#x1 #y1 #x2 #y2 --> #x1' #y1' #x2' #y2'" "Orders the bints to be appropriate for
- defining a rectangle in a grob. Swaps #x1
- and #x2 if #x2<#x1. Swaps #y1 and #y2 if
- #y2<#y1." "51893") "ORDERXY%" ("%x1 %y1 %x2 %y2 --> %x1' %y1' %x2' %y2'" "ORDERXY# with real numbers." "518CA") "LINEON" ("#x1 #y1 #x2 #y2 -->" "Draws a line in text grob." "50B17") "LINEOFF" ("#x1 #y1 #x2 #y2 -->" "Clears a line in text grob." "50B08") "TOGLINE" ("#x1 #y1 #x2 #y2 -->" "Toggles a line in text grob." "50AF9") "LINEON3" ("#x1 #y1 #x2 #y2 -->" "Draws a line in graph grob." "50AEA") "DRAWLINE#3" ("#x1 #y1 #x2 #y2 -->" "Draws a line in graph grob. x1<x2 is not
- required." "50758") "LINEOFF3" ("#x1 #y1 #x2 #y2 -->" "Clears a line in graph grob." "50ACC") "TOGLINE3" ("#x1 #y1 #x2 #y2 -->" "Toggles a line in graph grob." "50ADB") "TOGGLELINE#3" ("#x1 #y1 #x2 #y2 -->" "Toggles line in graph grob. x1<x2 is not
- required." "5072B") "DRAWBOX#" ("#x1 #y1 #x2 #y2 -->" "Draws rectangle in graph grob." "4E582") "DOLCD>" ("--> grob" "Returns current display." "503D4") "DO>LCD" ("grob -->" "Grob to display." "50438") "Symb>HBuff" ("symb -->" "Displays symbolic in HARDBUFF in Equation
- Writer form. Enlarges HARDBUFF if necessary,
- so use RECLAIMDISP after." "659DE") "MakeStdLabel" ("$ --> grob" "Makes standard menu label." "3A328") "MakeBoxLabel" ("$ --> grob" "Makes label with a box." "3A38A") "MakeDirLabel" ("$ --> grob" "Makes directory label." "3A3EC") "DirLabel:" ("--> grob" "Makes directory label with next string in the
- stream.
- Usage: :: DirLabel: $ ;" "3ED6B" :U) "MakeInvLabel" ("$ --> grob" "Makes inverse label." "3A44E") "Box/StdLabel" ("$ flag --> grob" "If TRUE makes box label, otherwise makes
- standard label." "3EC99") "Std/BoxLabel" ("$ flag --> grob" "If TRUE makes standard label, otherwise makes
- box label." "3ED0C") "Box/StdLbl:" ("--> grob" "Does Box/StdLabel with the next two objects
- from the stream.
- Usage: :: Box/StdLbl: $ <test> ;" "3ECB2") "FBox/StdLbl:" ("--> grob" "Takes a string and a bint from the runstream.
- Tests the system flag specified, does
- Box/StdLabel.
- Usage: :: FBox/StdLbl: $ #flag ;" "3ECEE" :U) "BBox/StdLbl:" ("--> grob" "Takes a string and a bint from the runstream.
- Does BASE then EQ, and finally Box/StdLabel.
- Usage: :: BBox/StdLabel: $ #base ;" "3ED25" :U) "MBox/StdLbl:" ("--> grob" "Takes a string and a bint from the runstream.
- Does NumbMode and EQ, then Box/StdLabel.
- Usage: :: MBox/StdLbl: $ #mode ;" "3ED48" :U) "FStd/BoxLbl:" ("--> grob" "Takes a string an a bint from the runstream.
- Tests the system flag specified, does
- Std/BoxLabel.
- Usage: :: FStd/BoxLbl: $ #flag ;" "3ECD0" :U) "StdLabelDef" ("#col grob -->
- #col $ -->
- #col id -->
- #col :: -->" "Works by dispatching the object type." "3A260" :U) "$>BIGGROB" ("$ --> grob" "Makes grob of the string using the large font
- (5x9)." "11CF3") "$>GROB" ("$ --> grob" "Makes grob of the string using the system
- font. Linefeed does *not* make new line." "11D00") "$>grob" ("$ --> grob" "Makes grob of the string using the minifont.
- Linefeed does *not* make new line." "11F80") "~$>grobOrGROB" ("$ --> grob" "Converts string to a grob using either the
- current font or the minifont, depending on
- system flag 90." "05F0B3" :UBS) "RIGHT$3x6" ("$ #n --> flag grob" "Transforms string into grob (using the
- minifont), then takes all characters starting
- after column #n. flag is FALSE if #n is
- greater than the width of the grob. In this
- QcaseQ, the whole grob is returned." "1200C") "CENTER$3x5" ("grob #x #y $ #w --> grob'" "Creates grob from string (using the minifont)
- and embeds it at specified position (#x, #y).
- The grob is centered around #x and the to is
- put at #y. #w represents the maximum width of
- the grob created. If the text is wider, it is
- truncated. Bangtype." "1215E") "CHECKPICT" ("-->" "Checks size of GBUFF. If it is smaller than
- 131x64 sets GBUFF back to its default size
- (131x64)." "51166") "CKPICT" ("xPICT -->" "Checks for user word xPICT on level 1. Errors
- (SETTYPEERR) if there is another object." "51148") "PICTRCL" ("xPICT --> grob" "Does CKPICT, then recalls GBUFF and does
- TOTEMPOB." "20CAD") "MAKEPVARS" ("--> {}" "Creates the default PPAR variable in the
- current directory and returns its value.
- --
- <REF>TEXT:Reserved|PPAR" "4AAEA") "CHECKPVARS" ("--> {}" "Recalls contents of PPAR in current path to
- stack. Creates PPAR in current directory if
- non-existent. Errors \"Invalid PPAR\" if
- existing PPAR is invalid.
- --
- <REF>TEXT:Reserved|PPAR" "4A9AF") "GETPARAM" ("# --> ob" "Extracts the #th item from PPAR. No error
- checking!
- --
- <REF>TEXT:Reserved|PPAR" "4B364") "GETXMIN" ("--> %" "Recalls XMIN from the PPAR list if
- existent. If not, the default PPAR is created
- in the current directory.
- --
- <REF>TEXT:Reserved|PPAR" "4B10C") "PUTXMIN" ("% -->" "Sets a new value for XMIN. PPAR is created
- if necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4B166") "GETXMAX" ("--> %" "Recalls XMAX from the PPAR list if
- existent. If not, the default PPAR is created
- in the current directory.
- --
- <REF>TEXT:Reserved|PPAR" "4B139") "PUTXMAX" ("% -->" "Sets a new value for XMAX. PPAR is created
- if necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4B1AC") "GETYMIN" ("--> %" "Recalls YMIN from the PPAR list if
- existent. If not, the default PPAR is created
- in the current directory.
- --
- <REF>TEXT:Reserved|PPAR" "4B120") "PUTYMIN" ("% -->" "Sets a new value for YMIN. PPAR is created
- if necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4B189") "GETYMAX" ("--> %" "Recalls YMAX from the PPAR list if
- existent. If not, the default PPAR is created
- in the current directory.
- --
- <REF>TEXT:Reserved|PPAR" "4B14D") "PUTYMAX" ("% -->" "Sets a new value for YMAX. PPAR is created
- if necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4B1CF") "GETPMIN&MAX" ("--> C% C%" " --
- Returns PMIN and PMAX.
- --
- <REF>TEXT:Reserved|PPAR" "4B0DA") "PUTINDEP" ("ID -->" "Internal xINDEP if the arg is an ID. " "4AF77") "PUTINDEPLIST" ("{} -->" "Internal xINDEP if the arg is a list." "4AF8B") "INDEPVAR" ("--> id" "Recalls the independent variable. If a list,
- extract first element.
- :: GETINDEP DUPTYPELIST? ?CARCOMP ;" "510AD") "GETINDEP" ("--> id
- --> {}" "Recalls the independent variable field in
- PPAR.
- --
- <REF>TEXT:Reserved|PPAR" "4AF63") "GETPTYPE" ("--> name" "Recalls the plot type using GETPARAM.
- --
- <REF>TEXT:Reserved|PPAR" "4B062") "PUTPTYPE" ("name -->" "Sets a new plot type. PPAR is created if
- necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4B076") "GETRES" ("--> %" "Recalls the plot resolution using GETPARAM.
- --
- <REF>TEXT:Reserved|PPAR" "4AFDB") "PUTRES" ("% -->" "Set new plot resolution. PPAR is created if
- necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4B012") "GETSCALE" ("--> % %'" "Recalls the plot scale parameters.
- --
- <REF>TEXT:Reserved|PPAR" "4ADB0") "PUTSCALE" ("% %' -->" "Set new plot scale. PPAR is created if
- necessary.
- --
- <REF>TEXT:Reserved|PPAR" "4AE3C") "AUTOSCALE" ("-->" "Internal AUTO." "491D5") "DOGRAPHIC" ("-->" "Sets the scroll mode of PICTURE and is
- essentially the same as { } PVIEW." "4CE6F") "GETXPOS" ("" "" "505C6") "getxpos" ("" "" "505E4") "GETYPOS" ("" "" "5068D") "getypos" ("" "" "506AB") "EQUATION" ("--> ob T
- --> F" "Recall the current equation, stored in the
- 'EQ' variable, and TRUE. If there is no 'EQ'
- variable on the path, just returns FALSE." "15744") "GetEqN" ("#n --> ob T
- --> NULL$ F" "Get the #nth equation, if EQ is a list of
- equations. " "4A0AA") "DORCLE" ("--> ob" "Recalls the contents of the EQ variable,
- errors if it does not exist." "1572B") "DOSTOE" ("ob -->" "Stores ob into the variable EQ." "15717") "XEQPURGEPICT" ("xPICT -->" "If object in level one is xPICT, erases the
- graphic display. Otherwise, errors." "20F8A") "CRER" ("" "" "00113") "CROSSMARKON" ("" "" "4ECAD") "CROSS_HAIRS" ("" "" "4DA0D") "CROSS_OFF" ("" "" "4DA76") "GDISPCENTER" ("-->" "Moves to center of graphics display" "4CF05") "GetRes" ("" "" "4B7D8") "HSCALE" ("" "" "4B5AD") "VSCALE" ("" "" "4B553") "PLOTERR" ("" "" "4B6D9") "PlotOneMore?" ("" "" "50DA5") "PLOTPREP" ("" "" "4B765") "DOPX>C" ("{ hxs hxs' } --> C%" "Converts a list of two hex strings into a
- complex number. Used for plotting
- coordinates. Inverse operation is DOC>PX." "4F0AC") "DOC>PX" ("C% --> { hxs hxs' }" "Converts a complex coordinate point into list
- of two HXS numbers. Inverse operation is
- DOPX>C. " "4F179") "xABS" ("x --> x'" "Absolute Value Function
- --
- Returns the absolute value of
- its argument.
- x \\-> |x|
- (x,y) \\-> sqrt(x^2+y^2)
- x_unit \\-> |x|_unit
- [ array ] \\-> || array ||
- 'sym' \\-> 'ABS(sym)'
- --
- Flags: -3
- --
- Related: NEG,SIGN" "1AA1F" :Usr) "xACK" ("-->" "Acknowledge Alarm cmd
- --
- Acknowledges the oldest past due
- alarm.
- --
- Flags: -43 -44
- Repeat Alarms Not Rescheduled -43
- Acknowledge Alarms Saved -44
- --
- Clears alert annunciator if
- 1. There are no other past-due
- alarms and
- 2. There are no other active
- alert sources - ie low batt.
- Has no effect on control alarms
- Control alarms that come due are
- automatically acknowledged AND
- saved in the sys alarm list.
- --
- Related: ACKALL" "1987E" :Usr) "xACKALL" ("-->" "Acknowledge All Alarms cmd
- --
- Acknowledges all past due alarms.
- --
- Flags: -43 -44
- Repeat Alarms Not Rescheduled -43
- Acknowledge Alarms Saved -44
- --
- Clears alert annunciator if there
- are no other active alert sources,
- ie low batt.
- Has no effect on control alarms
- Control alarms that come due are
- automatically acknowledged AND
- saved in the sys alarm list.
- --
- Related: ACK" "19863" :Usr) "xACOS" ("x --> x'" "Arc cos fn
- --
- Returns angle with given cos.
- --
- z \\-> arc cos z
- 'sym' \\-> 'ACOS(sym)'
- --
- Related: ASIN,ATAN,COS,ISOL,ACOSH" "1B72F" :Usr) "xACOSH" ("x --> x'" "Arc hyp cos fn
- --
- Returns val with given hyp cos.
- --
- z \\-> arc hyp cos z
- 'sym' \\-> 'ACOSH(sym)'
- --
- Related: ASINH,ATANH,COSH,ISOL" "1B830" :Usr) "xALOG" ("x --> x'" "Common antilog fn
- --
- ALOG x = 10^x
- --
- Flags: -3
- numeric result
- --
- z \\-> 10^z
- 'sym' \\-> 'ALOG(sym)'
- --
- Related: EXP,LN,LOG" "1BA3D" :Usr) "xAND" ("x1 x2 --> x3" "And fn
- --
- Logical AND of 2 args.
- --
- #n1 #n1 \\-> #n3
- \"str1\" \"str2\" \\-> \"str3\"
- T/F1 T/F2 \\-> 0/1
- T/F 'sym' \\-> 'T/F AND sym'
- 'sym' T/F \\-> 'sym AND T/F'
- 'sym1' 'sym2' \\-> 'sym1 AND sym2'
- --
- Flags: -3 -5
- Numeric res -3
- Bin int wordsize -5 \\-> -10
- --
- Related: NOT,OR,XOR" "1E783" :Usr) "xAPPLY" ("{symb1 .. symbn} f --> f(symb1...symbn)" "Apply to args fn
- --
- Creates expr for specified fn
- name & args
- --
- Related: QUOTE,|" "1F5C5" :Usr) "xARC" ("c r \\Gh1 \\Gh2 -->
- {#x #y} #r \\Gh1 \\Gh2 -->" "Draw arc fn
- --
- Draws arc in PICT anticlockwise
- from \\Gh1 to \\Gh2 centred on coord
- specified on lev4 with radius on
- lev3
- --
- Flags: -17 -18
- angle mode (-17 & -18)
- --
- Related: BOX,LINE,TLINE" "1E5D2" :Usr) "xARCHIVE" (":port:name -->
- :IO:name -->" "Archive HOME cmd
- --
- Creates backup of HOME in RAM
- (including user key assignments
- & alarm catalog)
- --
- if :IO: is used backup
- transmitted through IO port via
- Kermit to filename 'name'
- --
- Flags: -33 -39
- I/O Device -33
- I/O Messages -39 if :IO:name
- --
- Related: RESTORE" "2125A" :Usr) "xARG" ("c --> \\Gh" "Argument fn
- --
- Returns angle of a complex number
- --
- (x,y) \\-> \\Gh
- 'sym' \\-> 'ARG(sym)'
- --
- Flags: -17 -18
- Ang Mode -17,-18" "1B2DB" :Usr) "xARRY\\->" ("[] --> x1...xn {n}
- [[]] --> x11...xnm {n m}" "Array to stack cmd
- --
- Return elems of array to stack.
- OBJ\\-> includes this functionality.
- --
- Related: \\->ARRY,DTAG,EQ\\->,LIST\\->, OBJ\\->,STR\\->" "1D092" :Usr) "xARRY>" ("[] --> x1...xn {n}
- [[]] --> x11...xnm {n m}" "Array to stack cmd
- --
- Return elems of array to stack.
- OBJ\\-> includes this functionality.
- --
- Related: \\->ARRY,DTAG,EQ\\->,LIST\\->, OBJ\\->,STR\\->" "1D092" :Usr) "x\\->ARRY" ("x1..xn n --> []
- x11...xnm {n m} --> [[]]" "Stack to Array Cmd
- --
- Returns a vector of n real or
- complex elements or a matrix of
- n \327 m real or complex solutions.
- --
- Related: ARRY\\->,LIST\\->,\\->LIST, OBJ\\->,STR\\->,\\->TAG,\\->UNIT" "1D009" :Usr) "x>ARRY" ("x1..xn n --> []
- x11...xnm {n m} --> [[]]" "Stack to Array Cmd
- --
- Returns a vector of n real or
- complex elements or a matrix of
- n \327 m real or complex solutions.
- --
- Related: ARRY\\->,LIST\\->,\\->LIST, OBJ\\->,STR\\->,\\->TAG,\\->UNIT" "1D009" :Usr) "xASIN" ("x --> x'" "Arc sin fn
- --
- Gives angle whose sin is given
- --
- z \\-> arc sin z
- 'sym' \\-> 'ASIN(sym)'
- --
- Flags: -1 -3 -17 -18
- Principal soln -1
- Numerical res -3
- Angle mode -17,-18
- --
- Related: ACOS,ATAN,ISOL,SIN" "1B6A4" :Usr) "xASINH" ("x --> x'" "Arc hyp sin fn
- --
- Gives Val whose hyp sin is given
- --
- z \\-> arc hyp sin z
- 'sym' \\-> 'ASINH(sym)'
- --
- Flags: -1 -3
- Principal soln -1
- Numerical res -3
- --
- Related: ACOSH,ATANH,ISOL,SINH" "1B7EB" :Usr) "xASN" ("obj key -->
- 'SKEY' -->" "Assign cmd
- --
- Defines single key on user kbd by
- assigning the given obj to the
- key x_key
- --
- Flags: -61 -62
- User mode lock -61
- User mode -62
- --
- The arg x_key is a real number
- rc.p where r=row,c=col,p=plane as
- follows:
- 0,1 - unshifted
- 2 - left shifted
- 3 - right shifted
- 4 - \214 shifted
- 5 - \214 left shifted
- 6 - \214 right shifted
- Add 0.01 if the modifier is to be held
- pressed down.
- --
- After ASN, pressing the assigned
- in User or 1-User mode exeutes
- the assigned obj instead. Remains
- in effect until altered by ASN or
- STOKEYS or DELKEYS. If 'SKEY' is
- passed instead, the specified key
- is restored to std.
- --
- Related: DELKEYS,RCLKEYS,STOKEYS
- <REF>TEXT:Keycodes" "224F4" :Usr) "xASR" ("# --> #'" "Arithmetic shift right cmd
- --
- Shifts a bint 1 bit to the right
- except for the most significant
- bit which stays.
- --
- Flags: -5 -6 -7 -8 -9 -10 -11 -12
- bint wordsize -5 -> -10
- bint base -11, -12
- --
- Related: SL,SLB,SR,SRB" "1957B" :Usr) "xATAN" ("x --> x'" "Arc tan fn
- --
- Returns the angle having the tan
- --
- z \\-> arc tan z
- 'sym' \\-> 'ATAN(sym)'
- --
- Flags: -1 -3 -17 -18
- Principle soln -1
- Numeric results -3
- Angle mode -17,-18
- --
- Related: ACOS,ASIN,ISOL,TAN" "1B79C" :Usr) "xATANH" ("x --> x'" "Arc hyp tan fn
- --
- Returns the value with given hyp
- tan.
- --
- z \\-> arc hyp tan z
- 'sym' \\-> 'ATANH(sym)'
- --
- Flags: -1 -3 -22
- Principle soln -1
- Numeric results -3
- Infinite result exception -22
- --
- Related: ACOSH,ASINH,ISOL,TANH" "1B8A2" :Usr) "xATTACH" ("n -->
- :nport:n -->" "Attach library cmd
- --
- Attaches lib with given num to
- current directory.
- --
- Related: DETACH,LIBS" "21448" :Usr) "xAUTO" ("-->" " Calculates a y-axis display range
- or an x- & y-axis display range.
- --
- Action depends on plot type:
- FUNCTION sets range to max &
- min of y vals sampled
- at 40 equi-spaced x
- vals (excluding \261\330\331)
- CONIC sets y-axis scale = to
- x-axis scale
- POLAR same as FUNCTION
-
- PARAMETRIC same as POLAR
-
- TRUTH no action
-
- BAR sets x-axis range from
- 0 to # of elems in
- \\GSDAT +1. sets y-range
- to min & max of the
- elts x-axis is always
- included.
- HISTOGRAM sets x-axis range to
- min & max of the elems
- in \\GSDAT. sets y-range
- from 0 to # of rows in
- \\GSDAT.
- SCATTER x-range is min & max
- of XCOL. y-range is
- min & max of YCOL
- --
- Related: DRAW,SCALEH,SCALE,SCL\\GS, SCALEW,XRNG,YRNG" "1E1AB" :Usr) "xAXES" ("c -->
- {c tick $x $y } -->" "Axes cmd
- --
- Specifies intersection coords of
- x- & y- axes, tick mark annotatn
- and x- & y- axes labels. stored
- in PPAR.
- --
- <REF>TEXT:Reserved|PPAR
- --
- Related: ATICK,DRAW,DRAX,LABEL" "1E0BE" :Usr) "xBAR" ("-->" "Bar plot type cmd
- --
- Sets plot type to BAR
- When plot type is BAR, the DRAW
- Cmd plots a bar chart using data
- from 1 col of the stat matrix
- (\\GSDAT). The col to be plotted is
- specified by the XCOL cmd & is
- stored in 1st param of \\GSPAR. Plot
- params are specified in PPAR of
- ff form:
- { (xmin,ymin) (xmax,ymax) indep
- res axes ptype depend }
- For BAR they are used as follows:
- --
- (xmin,ymin) specifies lower left
- cnr of PICT (default: (-6.5,-3.1))
- --
- (xmax,ymax) specifies upper
- right cnr of PICT
- (default: (6.5,3.2))
- --
- indep name - specifies horiz
- axis label or
- list - { name x1 x2 } smaller of
- x1 & x2 is horiz location of 1st
- bar (default: X)
- --
- res real - bar width in user
- units or bint - bar width in
- pixels
- (default: 0 - 1 in user units)
- --
- axes list containing one or more
- of the ff in order:
- (x,y) - user unit origin pos
- a list specifying tick mark
- annotatn & 2 strings specifying
- horiz & vert axes labels
- (default: (0,0))
- --
- ptype plot type - BAR in this
- case
- --
- depend label for vert axis.
- (default: Y)
- --
- <REF>TEXT:Reserved|PPAR
- --
- Related: CONIC,DIFFEQ,FUNCTION,GRIDMAP, HISTOGRAM,PARAMETRIC,PARSURFACE,PCONTOUR, SCATTER,SLOPEFIELD,TRUTH,YSLICE" "1E741" :Usr) "xBARPLOT" ("-->" "Draw bar plot cmd
- --
- Draws bar chart of specified col
- of stat matrix (\\GSDAT)
- Col to be plotted is specified by
- XCOL & is stored as first param
- in \\GSPAR. Default col is 1. data
- can be +ve or -ve giving bars
- above or below the axis. y-axis
- is autoscaled & plot type is BAR.
- When executed from a program,
- plot doesn't persist unless
- PICTURE,PVIEW (with empty list)
- or FREEZE is subsequently
- executed
- --
- Related: FREEZE,HISTPLOT,PICTURE, PVIEW,SCATRPLOT,XCOL" "20133" :Usr) "xBAUD" ("n -->" "Baud rate cmd
- --
- Specify bit transfer rate.
- --
- Related: CKSM,PARITY,TRANSIO" "2200C" :Usr) "xBEEP" ("freq dur -->" "Beep cmd
- --
- Sounds a tone of n Hz for x secs.
- --
- Flags: -56
- Error Beep -56
- Max Freq = 4400 Hz
- Max Duration = 1048.575 secs.
- --
- Related: HALT,INPUT,PROMPT,WAIT" "1A5C4" :Usr) "xBESTFIT" ("-->" "Best fit model cmd
- --
- Executes LR with each of the 4
- curve fitting models and selects
- the model giving the largest
- correlation coefficient.
- --
- Selected model stored in 5th
- param of \\GSPAR & regression coeffs
- intercept & slope are stored in
- 3rd & 4th params.
- --
- Related: EXPFIT,LINFIT,LOGFIT,LR,PWRFIT" "2025E" :Usr) "xBIN" ("-->" "Binary mode cmd
- --
- Selects binary base for bint ops.
- (Default base is 10)
- --
- Flags: -5 -6 -7 -8 -9 -10 -11 -12
- Bint wordsize -5 \\-> -10
- Bint base -11, -12
- Bints require prefix #. Bints
- entered & returned in binary show
- the b suffix. If current base not
- binary, enter binary nums by
- using b suffix.
- The current base doesn't affect
- the internal representation of
- bints as unsigned bints.
- --
- Related: DEC,HEX,OCT,STWS,RCWS" "1C559" :Usr) "xBINS" ("min width n --> [[]] []" "Sort Into Frequency Bins Cmd
- --
- Sorts the elements of the indep.
- col (XCOL) of the stat matrix
- (\\GSDAT) into (nbins + 2) bins,
- where the left edge for bin 1
- starts at value xmin and each bin
- has width xwidth.
- --
- xmin xwidth nbins \\->
- [[ nbin1...nbinn ]]
- [ nbinL nbinR ]
- --
- Related: BARPLOT,XCOL" "2010E" :Usr) "xBLANK" ("#width #height --> grob" "Blank Graphics Obj Cmd
- --
- Creates a blank graphics obj of
- the specified width and height.
- --
- Related: \\->GROB,LCD\\->" "1E416" :Usr) "xBOX" ("{#n1 #m1} {#n2 #m2} -->
- c1 c2 -->" "Box Cmd
- --
- Draws in PICT a box whose
- opposite corners are defined by
- the specified pixel or user-unit
- coords.
- --
- Related: ARC,LINE,TLINE" "1E3EC" :Usr) "xBUFLEN" ("--> nchars 0/1" "Buffer Length Cmd
- --
- Returns the number of characters
- in the HP 48's serial input
- buffer and a single digit
- indicating whether an error
- occurred during data reception.
- --
- Related: CLOSEIO,OPENIO,SBRK,SRECV, STIME,XMIT" "22087" :Usr) "xBYTES" ("obj --> chksum size" "Bytes Size Cmd
- --
- Returns the number of bytes & the
- checksum for the given obj.
- --
- Related: MEM" "1A1D9" :Usr) "xB\\->R" ("# --> R" "Binary to Real Cmd
- --
- Converts a binary integer to its
- floating-point equivalent.
- --
- Related: R\\->B" "196BB" :Usr) "xB>R" ("# --> R" "Binary to Real Cmd
- --
- Converts a binary integer to its
- floating-point equivalent.
- --
- Related: R\\->B" "196BB" :Usr) "xCASE" ("-->" "CASE Conditional Structure Cmd
- --
- Starts CASE ... END conditional
- structure.
- --
- CASE \\->
- THEN T/F \\->
- END \\->
- END \\->
- --
- Related: END,IF,IFERR,THEN" "2378D" :Usr) "xCEIL" ("x --> n" "Ceiling Func
- --
- Returns the smallest integer
- greater than or equal to the
- argument.
- --
- x \\-> n
- x_u \\-> n_u
- 'sym' \\-> 'CEIL(sym)'
- --
- Flags: -3
- --
- Related: FLOOR,IP,RND,TRNC" "1BC0F" :Usr) "xCENTR" ("(x,y) -->
- x -->" "Centre Cmd
- --
- Adjusts the first two parameters
- in the reserved variable PPAR,
- (xmin, ymin) and (xmax,ymax), so
- that the point represented by the
- argument (x,y) is the plot centre.
- --
- <REF>TEXT:Reserved|PPAR
- --
- Related: SCALE" "1E0E8" :Usr) "xCF" ("n -->" "Clear Flag Cmd
- --
- Clears the specified user or
- system flag.
- --
- Related: FC?,FC?C,FS?,FS?C,SF" "1C2D5" :Usr) "xCHR" ("n --> $" "Character Cmd
- --
- Returns a string representing the
- HP 48 character corresponding to
- the character code n.
- --
- Related: NUM,POS,REPL,SIZE,SUB" "1CB66" :Usr) "x%CH" ("x1 x2 --> x3" "Percent Change Func
- --
- Returns the percent change from
- x (level 2) to y (level 1) as a
- percentage of x.
- --
- x y \\-> 100(y-x)/x
- x 'sym' \\-> '%CH(x,sym)'
- 'sym' x \\-> '%CH(sym,x)'
- 'sym1' 'sym2' \\-> '%CH(sym1,sym2)'
- x_u y_u \\-> 100(y_u-x_u)/x_u
- x_u 'sym' \\-> '%CH(x_u,sym)'
- 'sym' x_u \\-> '%CH(sym,x_u)'
- --
- Flags: -3
- --
- Related: %,%T" "1C149" :Usr) "xCKSM" ("n_type -->" "Checksum Cmd
- --
- Specifies the error-detection
- scheme.
- --
- Related: BAUD,PARITY,TRANSIO
- " "21FEC" :Usr) "xCLEAR" ("ob1 .. obn -->" "Clear Cmd
- --
- Removes all objects from the
- stack.
- --
- Related: CLVAR,PURGE" "1FCEB" :Usr) "xCL\\GS" ("-->" "Clear Sigma Cmd
- --
- Purges the current statistics
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: RCL\\GS,STO\\GS,\\GS+,\\GS-" "1FD2B" :Usr) "xCLSIGMA" ("-->" "Clear Sigma Cmd
- --
- Purges the current statistics
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: RCL\\GS,STO\\GS,\\GS+,\\GS-" "1FD2B" :Usr) "xCLKADJ" ("ticks -->" "Adjust System Clock Cmd
- --
- Adjusts the system time by x
- clock ticks, where 8192 clock
- ticks equal 1 second.
- --
- Related: \\->TIME" "198DE" :Usr) "xCLLCD" ("-->" "Clear LCD Cmd
- --
- Clears (blanks) the stack display
- --
- Related: DISP,FREEZE" "1A858" :Usr) "xCLOSEIO" ("-->" "Close I/O Port Cmd
- --
- Closes the serial port and the
- IR port, and clears the input
- buffer and any error messages for
- KERMIT.
- --
- Related: BUFLEN,OPENIO" "21ED5" :Usr) "xCLVAR" ("-->" "Clear Variables Cmd
- --
- Purges all variables and empty
- subdirectories in the current
- directory.
- --
- Related: CLUSR,PGDIR,PURGE" "210FC" :Usr) "xCLUSR" ("-->" "Clear Variables Cmd
- --
- Purges all variables and empty
- subdirectories in the current
- directory.
- --
- Related: CLUSR,PGDIR,PURGE" "210FC" :Usr) "xCNRM" ("[] --> col_norm" "Column Norm Cmd
- --
- Returns the column norm (onenorm)
- of the array argument.
- --
- Related: CROSS,DET,DOT,RNRM" "1BFBE" :Usr) "xCOLCT" ("symb --> symb'" "Collect Like Terms Cmd
- --
- Simplifies an algebraic expression
- or equation by \"collecting\"
- like terms. Does not modify numbers.
- --
- Related: EXPAN,ISOL,QUAD,SHOW" "20A15" :Usr) "xCOL\\GS" ("x_col y_col -->" "Sigma Columns Cmd
- --
- Specifies the independent variable
- and dependent-variable columns
- of the current stat matrix
- (the reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BARPLOT,BESTFIT,CORR,COV, EXPFIT,HISTPLOT,LINFIT,LOGFIT, LR,PREDX,PREDY,PWRFIT,SCATRPLOT,XCOL,YCOL" "2009A" :Usr) "xSIGMACOL" ("x_col y_col -->" "Sigma Columns Cmd
- --
- Specifies the independent variable
- and dependent-variable columns
- of the current stat matrix
- (the reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BARPLOT,BESTFIT,CORR,COV, EXPFIT,HISTPLOT,LINFIT,LOGFIT, LR,PREDX,PREDY,PWRFIT,SCATRPLOT,XCOL,YCOL" "2009A" :Usr) "xCOMB" ("n k --> Cn,k" "Combinations Func
- --
- Returns the number of possible
- combinations ofn items taken m
- at a time.
- --
- n m \\-> Cn:m
- 'symn' m \\-> 'COMB(symn,m)'
- n 'symm' \\-> 'COMB(n,symm)'
- 'symn' 'symm' \\-> 'COMB(symn,symm)'
- --
- Related: PERM,!" "1C1F6" :Usr) "xCON" ("{ n } x --> []
- { n k } x --> [[]]
- [] x --> []'" "Constant Array Cmd
- --
- Returns a constant array, defined
- as an array whose elements all
- have the same value.
- --
- {ncols} zcnst \\-> [[veccnst]]
- {nrows mrows} zcnst \\-> [[matcnst]]
- [R-arr] xcnst \\-> [R-arrcnst]
- [C-arr] xcnst \\-> [C-arrcnst]
- 'name' zcnst \\->
- --
- Related: IDN" "1D186" :Usr) "xCONIC" ("-->" "Conic Plot Type Cmd
- --
- Sets the plot type to CONIC.
- --
- Related: BAR,DIFFEQ,FUNCTION,GRIDMAP, HISTOGRAM,PARAMETRIC,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH,WIREFRAME,YSLICE" "1E681" :Usr) "xCONJ" ("x --> x'" "Conjugate Analytic Func
- --
- Conjugates a complex number or a
- complex array.
- --
- x \\-> x
- (x,y) \\-> (x,-y)
- [ R-arr ] \\-> [ R-arr ]
- [ C-arr ]1 \\-> [ C-arr ]2
- 'sym' \\-> 'CONJ(sym)'
- --
- Flags: -3
- --
- Related: ABS,IM,RE,SCONJ,SIGN" "1AA6E" :Usr) "xCONT" ("-->" "Continue Program Execution Cmd
- --
- Resumes execution of a halted
- program.
- --
- Related: HALT,KILL,PROMPT" "1A8BB" :Usr) "xCONVERT" ("x1_u1 x2_u2 --> x3_u2" "Convert Units Cmd
- --
- Converts a source unit object to
- the dimensions of a target object
- --
- Related: UBASE,UFACT,\\->UNIT,UVAL" "196DB" :Usr) "xCORR" ("--> x_correlation" "Correlation Cmd
- --
- Returns the correlation coefficient
- of the independent and
- dependent data columns in the
- current statistics matrix
- (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: COL\\GS,COV,PREDX,PREDY,XCOL,YCOL" "1FDC1" :Usr) "xCOS" ("x --> x'" "Cos Func
- --
- Returns the cos of the argument.
- --
- z \\-> cos z
- 'sym' \\-> 'COS(sym)'
- x_uangular \\-> cos(x_uangular)
- --
- Flags: -3 -17 -18
- --
- Related: ACOS,SIN,TAN" "1B505" :Usr) "xCOSH" ("x --> x'" "Hyp Cos Func
- --
- Returns the hyp cos of the argument.
- --
- z \\-> cosh z
- 'sym' \\-> 'COSH(sym)'
- --
- Flags: -3
- --
- Related: ACOSH,SINH,TANH" "1B606" :Usr) "xCOV" ("--> x_covariance" "Covariance Cmd
- --
- Returns the sample covariance of
- the independent and dependent
- data columns in the current stat
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: COL\\GS,CORR,PCOV,PREDX,PREDY, XCOL,YCOL" "1FDDC" :Usr) "xCR" ("-->" "Carriage Right Cmd
- --
- Prints the contents, if any, of
- the printer buffer.
- --
- Flags: -37 -34 -33
- --
- Related: DELAY,OLDPRT,PRLCD,PRST,PRSTC, PRVAR,PR1" "1EEA4" :Usr) "xCRDIR" ("name -->" "Create Directory Cmd
- --
- Creates an empty subdirectory
- with the specified name within
- the current directory.
- --
- Related: HOME,PATH,PGDIR,UPDIR" "1A105" :Usr) "xCROSS" ("[1] [2] --> [3]" "Cross Product Cmd
- --
- CROSS returns the cross product
- [3] = [1] x [2] of vectors [1] and [2].
- --
- Related: CNRM,DET,DOT,RNRM" "1C01E" :Usr) "xC\\->PX" ("(x,y) --> {#n #m}" "Complex to Pixel Cmd
- --
- Converts the specifiec user-unit
- coordiates to pixel coordiates.
- --
- (x,y) \\-> { #n #m }
- --
- Related: PX\\->C" "1E29A" :Usr) "xC>PX" ("(x,y) --> {#n #m}" "Complex to Pixel Cmd
- --
- Converts the specifiec user-unit
- coordiates to pixel coordiates.
- --
- (x,y) \\-> { #n #m }
- --
- Related: PX\\->C" "1E29A" :Usr) "xC\\->R" ("(x,y) --> x y
- [C] --> [R] [I]" "Complex to Real Cmd
- --
- Separates the real and imaginary
- parts of a complex number or
- complex array.
- --
- Related: R\\->C,RE,IM" "1C98E" :Usr) "xC>R" ("(x,y) --> x y
- [C] --> [R] [I]" "Complex to Real Cmd
- --
- Separates the real and imaginary
- parts of a complex number or
- complex array.
- --
- Related: R\\->C,RE,IM" "1C98E" :Usr) "xDATE" ("--> date" "Returns the system date.
- --
- Related: DATE+,DDAYS,TIME,TSTR" "19812" :Usr) "x\\->DATE" ("date -->" "Set Date Cmd
- --
- Sets the system date to date.
- --
- Related: \\->TIME" "1989E" :Usr) "xSETDATE" ("date -->" "Set Date Cmd
- --
- Sets the system date to date.
- --
- Related: \\->TIME" "1989E" :Usr) "xDATE+" ("date ndays --> date'" "Date Addition Cmd
- --
- Returns a past or future date,
- given a date in level 2 and a
- nmber of days in level 1.
- --
- Flags: -42
- --
- Related: DATE,DDAYS" "199D2" :Usr) "xDBUG" ("prog -->
- name -->" "Debug Operation
- --
- Starts program execution, then
- suspends it as if HALT were the
- first program command.
- --
- Related: HALT,NEXT" "1508E" :UBS :Usr) "xDDAYS" ("date1 date2 --> days" "Delta Days Cmd
- --
- Returns the number of days
- between two dates.
- --
- Related: DATE,DATE+" "199B2" :Usr) "xDEC" ("-->" "Decimal Mode Cmd
- --
- Selects decimal base for binary
- integer operations. (The default
- base is decimal.)
- --
- Related: BIN,HEX,OCT,RCWS,STWS" "1C574" :Usr) "xDECR" ("name --> x_new" "Decrement Cmd
- --
- Takes a variable on level 1,
- subtracts 1, stores the new value
- back into the original variable,
- and returns the new value to
- level 1.
- --
- Related: INCR,STO+,STO-" "209AA" :Usr) "xDEFINE" ("'name=expr' -->
- 'name(name1...)=expr(name1...) -->" "Define Variable or Func Cmd
- --
- Stores the expression on the
- right side of the = in the variable
- specified on the left side,
- or creates a user-defined function
- --
- Related: STO" "20D65" :Usr) "xDEG" ("-->" "Degrees Cmd
- --
- Sets Degrees angle mode.
- --
- Related: GRAD,RAD" "1C399" :Usr) "xDELALARM" ("n -->" "Delete Alarm Cmd
- --
- Deletes the alarm specified in
- level 1.
- --
- Related: FINDALARM,RCLALARM,STOALARM" "19972" :Usr) "xDELAY" ("x_delay -->" "Delay Cmd
- --
- Specifies how many seconds the
- HP 48 waits between sending lines
- of information to the printer.
- --
- Related: CR,OLDPRT,PRLCD,PRST,PRSTC,PRVAR,PR1" "1EF43" :Usr) "xDEPND" ("name -->
- {name} -->
- {name y1 y2} -->
- {y1 y2} -->
- y1 y2 -->" "Dependent Variable Cmd
- --
- Species the dependent variable
- (and its plotting range for TRUTH
- plots).
- --
- Related: INDEP" "1E22B" :Usr) "xDEPTH" ("--> n" "Depth Cmd
- --
- Returns a real number representing
- the number of objects present
- on the stack (before DEPTH was
- executed)." "1FC44" :Usr) "xDET" ("[[]] --> x" "Determinant Func
- --
- Returns the determinant of a
- square matrix.
- --
- Related: CNRM,CROSS,DOT,RNRM" "1BFDE" :Usr) "xDETACH" ("n -->
- :port:n -->" "Detach Library Cmd
- --
- Detaches the library with the
- specified number from the current
- directory. Each library has a
- unique number. If a port number
- is specified, it is ignored.
- --
- Related: ATTACH,LIBS,PURGE" "2147C" :Usr) "xDIR" ("" "" "23813" :Usr) "xDISP" ("obj n_line -->" "Display Cmd
- --
- Displays obj in the nth display
- line.
- --
- Related: FREEZE,HALT,INPUT,PROMPT" "1A584" :Usr) "xDO" ("-->" "DO Indefinite Loop Structure Cmd
- --
- Starts DO ... UNTIL ... END
- indefinite loop structure.
- --
- DO \\->
- UNTIL \\->
- END T/F \\->
- --
- Related: END,UNTIL,WHILE" "230C3" :Usr) "xDOERR" ("n -->
- #n -->
- $ -->
- 0 -->" "Do Error Cmd
- --
- Executes a \"user-specified\"
- error, causing a program to behave
- exactly as if a normal error
- had occurred during program execution.
- --
- Related: ERRM,ERRN,ERR0" "1A339" :Usr) "xDOT" ("[1] [2] --> x" "Dot Product Cmd
- --
- Returns the dot product AoB of
- two arrays A and B, calculated
- as the sum of the products of the
- corresponding elements of the two
- arrays.
- --
- Related: CNRM,CROSS,DET,RNRM" "1BFFE" :Usr) "xDRAW" ("-->" "Draw Plot Cmd
- --
- Plots the mathematical data in
- the reserved variable EQ or the
- statistical data in the reserved
- variable \\GSDAT, using the
- specified x- and y-axis display
- ranges.
- --
- <REF>TEXT:Reserved|EQ
- --
- Related: AUTO,AXES,DRAX,ERASE,FREEZE, PICTURE,LABEL,PVIEW" "1E190" :Usr) "xDRAX" ("-->" "Draw Axes Cmd
- --
- Draws axes in PICT.
- --
- Related: AXES,DRAW,LABEL" "1E1C6" :Usr) "xDROP" ("ob -->" "Drop Object Cmd
- --
- Removes the level 1 object from
- the stack.
- --
- Related: CLEAR,DROPN,DROP2" "1FBD8" :Usr) "xDROP2" ("ob1 ob2 -->" "Drop 2 Objects Cmd
- --
- Removes the first two objects
- from the stack.
- --
- Related: CLEAR,DROP,DROPN" "1FBF3" :Usr) "xDROPN" ("ob1...obn n -->" "Drop n Objects Cmd
- --
- Removes the first n + 1 objects
- from the stack (the first n objects
- excluding the integer n itself).
- --
- Related: CLEAR,DROP,DROP2" "1FC64" :Usr) "xDTAG" ("tag:obj --> obj" "Delete Tag Cmd
- --
- DTAG removes all tags (labels)
- from an object.
- --
- Related: LIST\\->,\\->TAG" "22633" :Usr) "xDUP" ("ob --> ob ob" "Duplicate Object Cmd
- --
- DUP returns a copy to level 1 of
- the object in level 1.
- --
- Related: DUPN,DUP2,PICK" "1FB87" :Usr) "xDUP2" ("1 2 --> 1 2 1 2" "Duplicate 2 Objects Cmd
- --
- DUP2 returns copies of the objects
- in levels 1 and 2 of the stack.
- --
- Related: DUP,DUPN,PICK" "1FBA2" :Usr) "xDUPN" ("1...n n --> 1...n 1...n" "Duplicate n Objects Cmd
- --
- Takes an integer n from level 1
- of the stack, and returns copies
- of the objects in stack levels
- 2n through n + 1.
- --
- Related: DUP,DUP2,PICK" "1FC7F" :Usr) "xD\\->R" ("x --> (\\pi/180)x" "Degrees to Radians Func
- --
- Converts a real number representing
- an angle in degrees to its
- equivalent in radians.
- --
- x \\-> (\\pi/180) x
- 'sym' \\-> 'D\\->R(sym)'
- --
- Related: R\\->D" "1BEC8" :Usr) "xD>R" ("x --> (\\pi/180)x" "Degrees to Radians Func
- --
- Converts a real number representing
- an angle in degrees to its
- equivalent in radians.
- --
- x \\-> (\\pi/180) x
- 'sym' \\-> 'D\\->R(sym)'
- --
- Related: R\\->D" "1BEC8" :Usr) "xe" ("--> e" "e Func
- --
- Returns the symbolic constant e
- or its numerical representation,
- 2.71828182846.
- --
- Related: EXP,EXPM,i,LN,LNP1,MAXR,MINR,\\pi" "1AB23" :Usr) "xCONSTANTe" ("--> e" "e Func
- --
- Returns the symbolic constant e
- or its numerical representation,
- 2.71828182846.
- --
- Related: EXP,EXPM,i,LN,LNP1,MAXR,MINR,\\pi" "1AB23" :Usr) "xELSE" ("-->" "ELSE Cmd
- --
- Starts false clause in conditional
- or error-trapping structure.
- See the IF and IFERR keyword
- entries for syntax information.
- --
- Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE" "22FB5" :Usr) "xEND" ("" "END Cmd
- --
- Ends conditional, error-trapping,
- and indefinite loop structures.
- --
- See the IF, CASE, IFERR, DO, and
- WHILE keyword entries for syntax
- information.
- --
- Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE" "23694" :Usr) "xENDDO" ("1/0 -->" "END Cmd
- --
- Ends conditional, error-trapping,
- and indefinite loop structures.
- See the IF, CASE, IFERR, DO, and
- WHILE keyword entries for syntax
- information.
- --
- Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE" "236B9" :Usr) "xIFEND" ("" "END Cmd
- --
- Ends conditional, error-trapping,
- and indefinite loop structures.
- --
- See the IF, CASE, IFERR, DO, and
- WHILE keyword entries for syntax
- information.
- --
- Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE" "22FD5" :Usr) "xWHILEEND" ("" "END Cmd
- --
- Ends conditional, error-trapping,
- and indefinite loop structures.
- --
- See the IF, CASE, IFERR, DO, and
- WHILE keyword entries for syntax
- information.
- --
- Related: IF,CASE,DO,ELSE,IFERR,REPEAT, THEN,UNTIL,WHILE" "23694" :Usr) "xENG" ("n -->" "Engineering Mode Cmd
- --
- Sets the number display format to
- Engineering mode, which displays
- one to three digits to the left
- of the fraction mark (decimal
- point) and an exponent that is a
- multiple of three. The total
- number of significant digits
- displayed is n + 1.
- --
- Related: FIX,SCI,STD" "1C452" :Usr) "xEQ\\->" ("'l=r' --> l r" "Equation to Stack Cmd
- --
- Separates an equation into its
- left and right sides.
- --
- 'sym1=sym2' \\-> 'sym1' 'sym2'
- z \\-> z 0
- 'name' \\-> 'name' 0
- x_u \\-> x_u 0
- 'sym' \\-> 'sym' 0
- --
- Related: ARRY\\->,DTAG,LIST\\->,OBJ\\->,STR\\->" "1CEE3" :Usr) "xEQ>" ("'l=r' --> l r" "Equation to Stack Cmd
- --
- Separates an equation into its
- left and right sides.
- --
- 'sym1=sym2' \\-> 'sym1' 'sym2'
- z \\-> z 0
- 'name' \\-> 'name' 0
- x_u \\-> x_u 0
- 'sym' \\-> 'sym' 0
- --
- Related: ARRY\\->,DTAG,LIST\\->,OBJ\\->,STR\\->" "1CEE3" :Usr) "xERASE" ("-->" "Erase PICT Cmd
- --
- Erases PICT, leaving a blank PICT
- of the same dimensions.
- --
- Related: DRAW" "1E25F" :Usr) "xERR0" ("-->" "Clear Last Error Number Cmd
- --
- Clears the last error number so
- that a subsequent execution of
- ERRN returns # 0h, and clears the
- last error message.
- --
- Related: DOERR,ERRM,ERRN" "1A36D" :Usr) "xERRM" ("--> $msg" "Error Message Cmd
- --
- Returns a string containing the
- error message of the most recent
- calculator error.
- --
- Related: DOERR,ERRN,ERR0" "1A3A3" :Usr) "xERRN" ("--> $nerr" "Error Number Cmd
- --
- Returns the error number of the
- most recent calculator error.
- --
- Related: DOERR,ERRM,ERR0" "1A388" :Usr) "xEVAL" ("ob --> ?" "Evaluate Object Cmd
- --
- Evaluates the object.
- --
- obj \\-> (see below)
- Obj. Type Effects of Evaluation
- Local Name Recalls the contents
- of the variable.
- Global Name Calls the contents of
- the variable:
- A name is evaluated.
- A program is evaluated.
- A directory becomes the current
- directory.
- Other objects are put on the
- stack.
- If no variable exists for a given
- name, evaluating the name returns
- the name to the stack.
- Program. Enters each object in
- the program:
- Names are evaluated (unless quoted).
- ed).
- Cmds are evaluated.
- Other objects are put on the
- stack.
- List Enters each object in the
- list:
- Names are evaluated.
- Cmds are evaluated.
- Programs are evaluated.
- Other objects are put on the
- stack.
- Tagged If the tag specifies a
- port, recalls and evaluates the
- specified object. Otherwise, puts
- the untagged object on the stack.
- Algebraic Enters each object in
- the algebraic expression:
- Names are evaluated.
- Cmds are evaluated.
- Other objects are put on the
- stack.
- Cmd,
- Func, XLIB
- Name Evaluates the specified object.
- Other Objects Puts the object on
- the stack.
- --
- Related: \\->NUM,SYSEVAL" "1A3BE" :Usr) "xEXP" ("x --> x'" "Exponential Analytic Func
- --
- Returns the exponential, or
- natural antilogarithm, of the
- argument; that is, e raised to
- the given power.
- --
- z \\-> ez
- 'sym' \\-> 'EXP(sym)'
- --
- Related: ALOG,EXPM,LN,LOG" "1B905" :Usr) "xEXPAN" ("symb1 --> symb2" "Expand Products Cmd
- --
- Rewrites an algebraic expression
- or equation by expanding products
- and powers.
- --
- Related: COLCT,EXPAND,ISOL,QUAD,SHOW" "20A49" :Usr) "xEXPFIT" ("-->" "Exponential Curve Fit Cmd
- --
- Stores EXPFIT as the fifth parameter
- in the reserved variable
- \\GSPAR, indicating that subsequent
- executions of LR are to use the
- exponential curve futting model.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: BESTFIT,LR,LINFIT,LOGFIT,PWRFIT" "201FB" :Usr) "xEXPM" ("x --> x'" "Exponential Minus 1 Analytic Func
- --
- Returns e^x - 1.
- --
- x \\-> e^x - 1
- 'sym' \\-> 'EXPM(sym)'
- --
- Related: EXP,LNP1" "1BAC2" :Usr) "xFC?" ("n --> 0/1" "Flag Clear? Cmd
- --
- Tests whether the system or user
- flag specified by nflag number is
- clear, and returns a corresponding
- test result: 1 (true) if the
- flag is clear or 0 (false) if the
- flag is set.
- --
- Related: CF,FC?C,FS?,FS?C,SF" "1C360" :Usr) "xFC?C" ("n --> 0/1" "Flag Clear? Clear Cmd
- --
- Tests whether the system or user
- flag specified by nflag number is
- clear, and returns a corresponding
- test result: 1 (true) if the
- flag is clear or 0 (false) if the
- flag is set. After testing,
- clears the flag.
- --
- Related: CF,FC?,FS?,FS?C,SF" "1C520" :Usr) "xFINDALARM" ("date --> n
- {date time} --> n
- 0 --> n" "Find Alarm Cmd
- --
- Returns the alarm index nindex of
- the first alarm due after the
- specified time.
- --
- Related: DELALARM,RCLALARM,STOALARM" "19948" :Usr) "xFINISH" ("-->" "Finish Server Mode Cmd
- --
- Terminates Kermit Server mode in
- a device connected to an HP 48.
- --
- Related: BAUD,CKSM,KGET,PARITY,PKT, RECN,RECV,SEND,SERVER" "21FB6" :Usr) "xFIX" ("n -->" "Fix Mode Cmd
- --
- Sets the number display format to
- Fix mode, which rounds the display
- to n display places.
- --
- Related: SCI,STD,ENG" "1C3EA" :Usr) "xFLOOR" ("x --> n" "Floor Func
- --
- Returns the greatest integer that
- is less than or equal to the argument.
- --
- x \\-> n
- x_u \\-> n_u
- 'sym' \\-> 'FLOOR(sym)'
- --
- Related: CEIL,IP,RND,TRNC" "1BBD9" :Usr) "xFOR" ("start finish -->" "FOR Definite Loop Structure Cmd
- --
- Starts
- FOR ... NEXT and
- FOR ... STEP
- definite loop structures.
- --
- FOR xstart xfinish \\->
- NEXT \\->
- FOR xstart xfinish \\->
- STEP xincrement \\->
- STEP 'symincrement' \\->
- --
- Related: NEXT,START,STEP" "231A0" :Usr) "xSTARTVAR" ("start finish -->" "FOR Definite Loop Structure Cmd
- --
- Starts
- FOR ... NEXT and
- FOR ... STEP
- definite loop structures.
- --
- FOR xstart xfinish \\->
- NEXT \\->
- FOR xstart xfinish \\->
- STEP xincrement \\->
- STEP 'symincrement' \\->
- --
- Related: NEXT,START,STEP" "231A0" :Usr) "xFP" ("x --> x'" "Fractional part Func
- --
- Returns the fractional part of an
- argument.
- --
- x \\-> y
- x_u \\-> y_u
- 'sym' \\-> 'FP(sym)'
- --
- Related: IP" "1BBA3" :Usr) "xFREE" ("" "Not useful on the 49G.
- Free RAM Card Cmd
- --
- Frees (makes independent) the
- previously merged RAM in port 1.
- FREE is provided for compatibility
- with the HP 48SX, which could
- merge RAM in port 2 as well. See
- FREE1.
- --
- { } nport \\->
- { namebackup ... nlib } nport \\->
- namebackup nport \\->
- nlib nport \\->" "213D1" :Usr) "xFREEZE" ("n -->" "Freeze Display Cmd
- --
- Freezes the part of the display
- specified by ndisplay area, so
- that it is not updated until a
- key is pressed.
- --
- Related: CLLCD,DISP,HALT" "1A5A4" :Usr) "xFS?C" ("n --> 0/1" "Flag Set? Clear Cmd
- --
- Tests whether the system or user
- flag specified by nflag number is
- clear, and returns a corresponding
- test result: 1 (true) if the
- flag is set or 0 (false) if the
- flag is clear. After testing,
- clears the flag
- --
- Related: CF,FC?,FC?C,FS?C,SF" "1C4A1" :Usr) "xFS?" ("n --> 0/1" "Flag Set Cmd
- --
- Tests whether the system or user
- flag specified by nflag number is
- set, and returns a corresponding
- test result: 1 (true) if the flag
- is set or 0 (false) if the flag
- is clear.
- --
- Related: CF,FC?,FC?C,FS?,SF" "1C313" :Usr) "xFUNCTION" ("-->" "Function Plot Type Cmd
- --
- Sets the plot type to FUNCTION.
- --
- Related: BAR,CONIC,DIFFEQ,FASTEQ,FAST3D, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE" "1E661" :Usr) "xGET" ("ob n --> elm
- ob = [] or [[]] or {} or name
- pos = n or {n} or {n m}" "Get Element Command
- --
- Returns from the level 2 array or
- list (or named array or list) the
- real or complex number zget or
- object objget whose position is
- specified in level 1.
- --
- [[ mat ]] nposition \\-> zget
- [[ mat ]] { nrow mcol } \\-> zget
- 'namematrix' nposition \\-> zget
- 'namematrix' { nrow mcol } \\-> zget
- [ vector ] nposition \\-> zget
- [ vector ] { nposition }\\-> zget
- 'namevector' nposition \\-> zget
- 'namevector' { nposition } \\-> zget
- { list } nposition \\-> objget
- { list } {nposition} \\-> objget
- 'namelist' nposition \\-> objget
- 'namelist' {nposition} \\-> objget
- --
- Related: GETI,PUT,PUTI" "1D7C6" :Usr) "xGETI" ("ob pos --> ob' pos' elm
- ob = [] or [[]] or {} or name
- pos = n or {n} or {n m}" "Get and Increment Index Command
- --
- Returns from the level 2 array or
- list (or named array or list) the
- real or complex number zget or
- object objget whose position is
- specified in level 1, along with
- the level 2 argument and the next
- position in that argument.
- --
- [[ mat ]] npos1
- \\-> [[ mat ]] npos2 zget
- [[ mat ]] { nr mc }1
- \\-> [[ mat ]] { nr mc }2 zget
- 'namemat' npos1
- \\-> 'namemat' npos2 zget
- 'namemat' { nr mc }1
- \\-> 'namemat' { nr mc }2 zget
- [ vec ] npos1
- \\-> [ vec ] npos2 zget
- [ vec ] { npos1 }
- \\-> [ vec ] { npos2 } zget
- 'namevec' npos1
- \\-> 'namevec' npos2 zget
- 'namevec' { npos1 }
- \\-> 'namevec' { npos2 } zget
- { list } npos1
- \\-> { list } npos2 objget
- { list } { npos1 }
- \\-> { list } { npos2 } objget
- 'namelist' npos1
- \\-> 'namelist' npos2 objget
- 'namelist' { npos1 }
- \\-> 'namelist' { npos2 } objget
- --
- Related: GET,PUT,PUTI" "1D8C7" :Usr) "xGOR" ("g_targ {#n #m} grob --> g_targ'
- g_targ (x,y) grob --> g_targ'
- PICT ... ... -->" "Graphics OR Cmd
- --
- Superimposes grob1 onto grobtgt
- or PICT, with the upper left
- corner of grob1 positioned at the
- specified coordinate in grobtgt
- or PICT.
- --
- grobtgt {#n #m} grob1 \\-> grob'
- grobtgt (x,y) grob1 \\-> grob'
- PICT {#n #m} grob1 \\->
- PICT (x,y) grob1 \\->
- --
- Related: GXOR,REPL,SUB" "1E456" :Usr) "xGRAD" ("-->" "Grads Mode Cmd
- --
- Sets Grads angle mode.
- --
- Related: GRAD,RAD" "1C3CF" :Usr) "xGROB" ("" "" "23813" :Usr) "x\\->GROB" ("ob n_chrsize --> grob" "Stack to Graphics Object Cmd
- --
- Creates a graphics object representing
- the level 2 object, where
- the argument nchar size specifies
- the character size of the representation.
- --
- Related: \\->LCD,LCD\\->" "1E5AD" :Usr) "x>GROB" ("ob n_chrsize --> grob" "Stack to Graphics Object Cmd
- --
- Creates a graphics object representing
- the level 2 object, where
- the argument nchar size specifies
- the character size of the representation.
- --
- Related: \\->LCD,LCD\\->" "1E5AD" :Usr) "xGXOR" ("g_targ {#n #m} g_src --> g_targ'
- g_targ (x,y) g_src --> g_targ'
- PICT ... ... -->" "Graphics Exclusive OR Cmd
- --
- Superimposes grob1 onto grobtgt
- or PICT, with the upper left
- corner of grob1 positioned at the
- specified coordinate in grobtgt
- or PICT.
- --
- grobtgt {#n #m} grob1\\-> grobresult
- grobtgt (x,y) grob1\\-> grobresult
- PICT {#n #m} grob1\\->
- PICT (x,y) grob1\\->
- --
- Related: GOR,REPL,SUB" "1E4E4" :Usr) "xHALT" ("-->" "Halt Program Cmd
- --
- Halts program execution.
- --
- Related: CONT,KILL" "23472" :Usr) "xHEX" ("-->" "Hexadecimal Mode Cmd
- --
- Selects hexadecimal base for
- binary integer operations. (The
- default base is decimal.)
- --
- Related: BIN,OCT,DEC,RCWS,STWS" "1C58F" :Usr) "xHISTOGRAM" ("-->" "Histogram Plot Type Cmd
- --
- Sets the plot type to HISTOGRAM.
- --
- Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,PARAMETRIC,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH,WIREFRAME,YSLICE" "1E721" :Usr) "xHISTPLOT" ("-->" "Draw Histogram Plot Cmd
- --
- Plots a frequency histogram of
- the specified column in the
- current stat matrix (reserved
- matrix \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BARPLOT,BINS,FREESE,PICTURE, PVIEW,RES,SCATRPLOT,XCOL" "20167" :Usr) "xHMS-" ("hms1 hms2 --> hms3" "Hours-Minutes-Seconds Minus Cmd
- --
- Returns the difference of two
- real number, where the arguments
- and the result are interpreted in
- hours-minutes-seconds format.
- --
- Related: HMS\\->,\\->HMS,HMS+" "1BF7E" :Usr) "xHMS+" ("hms1 hms2 --> hms3" "Hours-Minutes-Seconds Plus Cmd
- --
- Returns the sum of two real number,
- where the arguments and the
- result are interpreted in
- hours-minutes-seconds format.
- --
- Related: HMS\\->,\\->HMS,HMS-" "1BF5E" :Usr) "x\\->HMS" ("x --> x'" "Decimal to Hours-Minutes-Seconds
- Cmd
- --
- Converts a real number representing
- hours or degrees with a decimal
- fraction to hours-minutes-seconds format.
- --
- Related: HMS\\->,HMS+,HMS-" "1BF1E" :Usr) "x>HMS" ("x --> x'" "Decimal to Hours-Minutes-Seconds
- Cmd
- --
- Converts a real number representing
- hours or degrees with a decimal
- fraction to hours-minutes-seconds format.
- --
- Related: HMS\\->,HMS+,HMS-" "1BF1E" :Usr) "xHMS\\->" ("x --> x'" "Hours-Min-Sec to Decimal Cmd
- --
- Converts a real number in hours
- -minutes-seconds format to its
- decimal form (hours or degrees
- with a decimal fraction.
- --
- Related: \\->HMS,HMS+,HMS-" "1BF3E" :Usr) "xHMS>" ("x --> x'" "Hours-Min-Sec to Decimal Cmd
- --
- Converts a real number in hours
- -minutes-seconds format to its
- decimal form (hours or degrees
- with a decimal fraction.
- --
- Related: \\->HMS,HMS+,HMS-" "1BF3E" :Usr) "xHOME" ("-->" "HOME Directory Cmd
- --
- Makes the HOME directory the
- current directory.
- --
- Related: CRDIR,PATH,PGDIR,UPDIR" "1A140" :Usr) "xIDN" ("n --> [[]]
- [[]] --> [[]]'
- name --> [[]]" "Identity Matrix Cmd
- --
- Returns an identity matrix; that
- is, a square matrix with its
- diagonal elements equal to 1 and
- its off-diagonal elements equal
- to 0.
- --
- Related: CON" "1D2DC" :Usr) "xIF" ("-->" "IF Conditional Structure Cmd
- --
- Starts IF ... THEN ... END and
- IF ... THEN ... ELSE ... END
- conditional structures.
- --
- IF \\->
- THEN T/F \\->
- END \\->
- \\->
- IF \\->
- THEN T/F \\->
- ELSE \\->
- END \\->
- --
- Related: CASE,ELSE,END,IFERR,THEN" "22EC3" :Usr) "xIFERR" ("-->" "If Error Conditional Struct Cmd
- --
- Starts IFERR ... THEN ... END and
- IFERR ... THEN ... ELSE ... END
- error trapping structures.
- --
- Related: CASE,ELSE,END,IF,THEN" "233DF" :Usr) "xIFT" ("0/1 obj --> ?" "IF-THEN Cmd
- --
- Executes obj if T/F is nonzero.
- Discards obj if T/F is zero.
- --
- Related: IFTE" "1A4CD" :Usr) "xIFTE" ("0/1 objT objF --> ?" "IF-THEN-ELSE Cmd
- --
- Executes objT if T/F is nonzero.
- Discards objF if T/F is zero." "1A3FE" :Usr) "xi" ("--> i" "" "1AB45" :Usr) "xIM" ("(x,y) --> y
- [] --> []'" "Imaginary Part Func
- --
- Returns the imaginary part of its
- (complex) argument.
- --
- x \\-> 0
- (x,y) \\-> y
- [ R-arr ] \\-> [ R-arr ]
- [ C-arr ] \\-> [ R-arr ]
- 'sym' \\-> 'IM(sym)'
- --
- Related: C\\->R,RE,R\\->C" "1C819" :Usr) "xINCR" ("name --> x" "Increment Cmd
- --
- Takes a variable on level 1, adds
- 1, stores the new value back into
- the original variable, and returns
- the new value to level 1.
- --
- Related: DECR" "208F4" :Usr) "xINPUT" ("$prompt $ --> $'
- $prompt {specs} --> $'" "Input Cmd
- --
- Prompts for data input to the
- command line and prevents the
- user access to stack operations.
- --
- Related: PROMPT,STR\\->" "224CA" :Usr) "xINV" ("x --> 1/x
- [[]] --> [[]]'" "Inverse (1/x) Analytic Func
- --
- Returns the reciprocal or the
- matrix inverse.
- --
- Related: SINV,/" "1B278" :Usr) "xIP" ("x --> n" "Integer Part Func
- --
- Returns the integer part of the
- argument.
- --
- x \\-> n
- x_u \\-> n_u
- 'sym' \\-> 'IP(sym)'
- --
- Related: FP" "1BB6D" :Usr) "xISOL" ("symb var --> symb'" "Isolate Variable Cmd
- --
- Returns an algebraic symb' that
- rearranges symb to \"isolate\"
- the first occurrence of variable
- var.
- --
- Related: COLCT,EXPAN,QUAD,SHOW,SOLVE" "20A93" :Usr) "x_" ("" "" "1FAEB" :Usr) "xFORMUNIT" ("" "" "1FAEB" :Usr) "x'" ("" "" "23679" :Usr) "xENDTIC" ("" "" "23679" :Usr) "x\\<<" ("" "" "2361E" :Usr) "x<<" ("" "" "2361E" :Usr) "x\\>>" ("" "" "235FE" :Usr) "x>>" ("" "" "23639" :Usr) "x>>ABND" ("" "" "235FE" :Usr) "xKERRM" ("--> msg" "Kermit Error Message Cmd
- --
- Returns the text of the most
- recent Kermit error packet.
- --
- Related: FINISH,KGET,PKT,RECN,RECV, SEND,SERVER" "2206C" :Usr) "xKEY" ("--> rc 1
- --> 0" "Key Cmd
- --
- Returns to level 1 a test result,
- and if a key is pressed, returns
- to level 2 the row-column location
- xn m of that key.
- --
- Related: WAIT,KEYEVAL" "1A873" :Usr) "xKGET" ("name -->
- \"name\" -->
- {names} -->
- {{old new}...} -->" "Kermit Get Cmd
- --
- Used by a local Kermit to get a
- Kermit server to transmit the
- named object(s).
- --
- Related: BAUD,CKSM,FINISH,PARITY,RECN, RECV,SEND,SERVER,TRANSIO" "21F24" :Usr) "xKILL" ("-->" "Cancel Halted Programs Cmd
- --
- Cancels all currently halted
- programs. (Halted programs are
- typically canceled by pressing
- PRG NXT RUN KILL.) If KILL is
- executed within a program, that
- program is also canceled.
- --
- Related: CONT,DOERR,HALT,PROMPT" "1A303" :Usr) "xLABEL" ("-->" "Label Axes Cmd
- --
- Labels axes in PICT with x- and
- y-axis variable names and with
- the minimum and maximum values of
- the display ranges.
- --
- Related: LABEL,DRAW,DRAX" "1E2D5" :Usr) "xLASTARG" ("--> ob1 .. obn" "Last Arguments Cmd
- --
- Returns copies of the arguments
- of the most recently executed
- command." "1A604" :Usr) "xLAST" ("--> ob1 .. obn" "Last Arguments Cmd
- --
- Returns copies of the arguments
- of the most recently executed
- command." "1A604" :Usr) "x\\->LCD" ("grob -->" "Graphics Object to LCD Cmd
- --
- Displays the graphics object from
- level 1, with its upper left
- pixel in the upper left corner of
- the display.
- --
- Related: LCD\\->,BLANK,\\->GROB" "1E58D" :Usr) "x>LCD" ("grob -->" "Graphics Object to LCD Cmd
- --
- Displays the graphics object from
- level 1, with its upper left
- pixel in the upper left corner of
- the display.
- --
- Related: LCD\\->,BLANK,\\->GROB" "1E58D" :Usr) "xLCD\\->" ("--> grob" "LCD to Graphics Object Cmd
- --
- Returns the current stack and
- menu display as a 131x64 graphics
- object.
- --
- Related: \\->LCD,\\->GROB" "1E572" :Usr) "xLCD>" ("--> grob" "LCD to Graphics Object Cmd
- --
- Returns the current stack and
- menu display as a 131x64 graphics
- object.
- --
- Related: \\->LCD,\\->GROB" "1E572" :Usr) "xLIBS" ("--> {title nlib nport ...}" "Libraries Cmd
- --
- Lists the title, number, and
- port of each library attached to
- the current directory.
- --
- Related: ATTACH,DETACH" "2142D" :Usr) "xLINE" ("(x1,y1) (x2,y2) -->
- {#n1 #m1} {#n2 #m2} -->" "Draw Line Cmd
- --
- Draws a line in PICT between the
- coordinates in levels 1 and 2.
- --
- Related: ARC,BOX,TLINE" "1E398" :Usr) "x\\GSLINE" ("--> symb" "Regression Model Formula Cmd
- --
- Returns an expression representing
- the best fit line according
- to the current statistical model,
- using X as the independent variable
- name, and explicit values
- of the slope and intercept taken
- from the reserved variable \\GSPAR.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: BESTFIT,COL\\GS,CORR,COV, EXPFIT,LINFIT,LOGFIT,LR,PREDX, PREDY,PWRFIT,XCOL,YCOL" "200F3" :Usr) "xSIGMALINE" ("--> symb" "Regression Model Formula Cmd
- --
- Returns an expression representing
- the best fit line according
- to the current statistical model,
- using X as the independent variable
- name, and explicit values
- of the slope and intercept taken
- from the reserved variable \\GSPAR.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: BESTFIT,COL\\GS,CORR,COV, EXPFIT,LINFIT,LOGFIT,LR,PREDX, PREDY,PWRFIT,XCOL,YCOL" "200F3" :Usr) "xLINFIT" ("-->" "Linear Curve Fit Cmd
- --
- Stores LINFIT as the fifth parameter
- in the reserved variable
- \\GSPAR, indicating that subsequent
- executions of LR are to use the
- linear curve fitting model.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: BESTFIT,EXPFIT,LOGFIT,LR, PWRFIT" "201B1" :Usr) "xLIST\\->" ("{} --> ob1...obn n" "List to Stack Cmd
- --
- Takes a list of n objects and
- returns them in separate levels,
- and returns the total number of
- objects to level 1.
- --
- Related: ARRY\\->,DTAG,EQ\\->,\\->LIST, OBJ\\->,STR\\->" "1C95A" :Usr) "xLIST>" ("{} --> ob1...obn n" "List to Stack Cmd
- --
- Takes a list of n objects and
- returns them in separate levels,
- and returns the total number of
- objects to level 1.
- --
- Related: ARRY\\->,DTAG,EQ\\->,\\->LIST, OBJ\\->,STR\\->" "1C95A" :Usr) "x\\->LIST" ("ob1 .. obn n --> {}" "Stack to List Cmd
- --
- Takes n objects from level n+1
- through level 2 and returns a
- list of those n objects.
- --
- Related: \\->ARRY,LIST\\->,\\->STR, \\->TAG,\\->UNIT" "1C783" :Usr) "x>LIST" ("ob1 .. obn n --> {}" "Stack to List Cmd
- --
- Takes n objects from level n+1
- through level 2 and returns a
- list of those n objects.
- --
- Related: \\->ARRY,LIST\\->,\\->STR, \\->TAG,\\->UNIT" "1C783" :Usr) "xLN" ("x --> x'" "Natural Logarithm Analytic Func
- --
- Returns the natural (base e)
- logarithm of the argument.
- --
- z \\-> ln z
- 'sym' \\-> 'LN(sym)'
- --
- Related: ALOG,EXP,ISOL,LNP1,LOG" "1B94F" :Usr) "xLNP1" ("x --> x'" "Natural Log of x+1 Analytic Func
- --
- Returns ln (x + 1).
- --
- x \\-> ln(x+1)
- 'sym' \\-> 'LNP1(sym)'
- --
- Related: EXPM,LN" "1BA8C" :Usr) "xLOG" ("x --> x'" "Common Logarithm Analytic Func
- --
- Returns the common logarithm
- (base 10) of the argument.
- --
- z \\-> log z
- 'sym' \\-> 'LOG(sym)'
- --
- Related: ALOG,EXP,ISOL,LN" "1B9C6" :Usr) "xLOGFIT" ("-->" "Logarithmic Curve Fit Cmd
- --
- Stores LOGFIT as the fifth parameter
- in the reserved variable
- \\GSPAR, indicating that subsequent
- executions of LR are to use the
- logarithmic curve-fitting model.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: BESTFIT,EXPFIT,LINFIT,LR,PWRFIT" "201D6" :Usr) "xLR" ("--> Intercept Slope" "Linear Regression Cmd
- --
- Uses the currently selected statistical
- model to calculate the
- linear regression coefficients
- (intercept and slope) for the
- selected dependent and independent
- variables in the current stat
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BESTFIT,COL\\GS,CORR,COV,EXPFIT, \\GSLINE,LINFIT,LOGFIT,PREDX,PREDY, PWRFIT,XCOL,YCOL" "1FF20" :Usr) "xMANT" ("x --> x'" "Mantissa Func
- --
- Returns the mantissa of the argument.
- --
- x \\-> ymant
- 'sym' \\-> 'MANT(sym)'
- --
- Related: SIGN,XPON" "1BE9C" :Usr) "x\\|vMATCH" ("symb {spat srepl} --> symb' 0/1
- symb {spat srepl scond} --> symb' 0/1" "Match Pattern Down Cmd
- --
- Rewrites an expression.
- --
- Related: X\\|^MATCH" "1FA8D" :Usr) "xMATCHDN" ("symb {spat srepl} --> symb' 0/1
- symb {spat srepl scond} --> symb' 0/1" "Match Pattern Down Cmd
- --
- Rewrites an expression.
- --
- Related: X\\|^MATCH" "1FA8D" :Usr) "x\\|^MATCH" ("symb {spat srepl} --> symb' 0/1
- symb {spat srepl scond} --> symb' 0/1" "Bottom-Up Match and Replace Cmd
- --
- Rewrites an expression.
- --
- Related: X\\|VMATCH" "1FA59" :Usr) "xMATCHUP" ("symb {spat srepl} --> symb' 0/1
- symb {spat srepl scond} --> symb' 0/1" "Bottom-Up Match and Replace Cmd
- --
- Rewrites an expression.
- --
- Related: X\\|VMATCH" "1FA59" :Usr) "xMAX" ("x y --> x'" "Maximum Func
- --
- Returns the greater (more positive)
- of the arguments.
- --
- x y \\-> max(x, y)
- x 'sym' \\-> 'MAX(x, sym)'
- 'sym' x \\-> 'MAX(sym, x)'
- 'sym1' 'sym2' \\-> 'MAX(sym1, sym2)'
- x_u1 y_u2 \\-> max(x_u1, y_u2)
- --
- Related: MIN" "1BC71" :Usr) "xMAXR" ("--> MAXR" "Maximum Real Func
- --
- Returns the symbolic constant
- 'MAXR' or its numerical
- representation, 9.99999999999E499.
- --
- \\-> 'MAXR'
- \\-> 9.99999999999E499
- --
- Related: Ee,i,MINR,\\pi" "1AADF" :Usr) "xMAX\\GS" ("--> xmax
- --> [x1...xn]" "Maximum Sigma Cmd
- --
- Finds the maximum coordinate
- value in each of the m columns of
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BINS,MEAN,MIN\\GS,SDEV,TOT,VAR" "1FE7E" :Usr) "xMAXSIGMA" ("--> xmax
- --> [x1...xn]" "Maximum Sigma Cmd
- --
- Finds the maximum coordinate
- value in each of the m columns of
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BINS,MEAN,MIN\\GS,SDEV,TOT,VAR" "1FE7E" :Usr) "xMEAN" ("--> xmean
- --> [x1...xn]" "Mean Cmd
- --
- Returns the mean of each of the
- m columns of coordinate values in
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BINS,MAX\\GS,MIN\\GS,SDEV,TOT,VAR" "1FE99" :Usr) "xMEM" ("--> x" "Memory Available Cmd
- --
- Returns the number of bytes of
- available RAM.
- --
- Related: BYTES" "20FAA" :Usr) "xMERGE" ("1 -->" "Merge RAM Card Cmd
- Only useful on the 48.
- --
- Merges the RAM from the card in
- port 1 with the rest of main user
- memory. Merged memory is no
- longer independent.
- --
- Related: FREE,FREE1" "2137F" :Usr) "xMIN" ("x y --> x'" "Minumum Func
- --
- Returns the lesser (more
- negative) of its two arguments.
- --
- x y \\-> min(x, y)
- x 'sym' \\-> 'MIN(x, sym)'
- 'sym' x \\-> 'MIN(sym, x)'
- 'sym1' 'sym2' \\-> 'MIN(sym1, sym2)'
- x_u1 y_u2 \\-> min(x_u1, y_u2)
- --
- Related: MAX" "1BCE3" :Usr) "xMINR" ("--> MINR" "Minimum Real Func
- --
- Returns the symbolic constant
- 'MINR' or its numerical representation,
- 1.00000000000E-499.
- --
- \\-> 'MAXR'
- \\-> 1.00000000000E-499
- --
- Related: e,i,MAXR,\\pi" "1AB01" :Usr) "xMIN\\GS" ("--> xmin
- --> [x1...xn]" "Minimum Sigma Cmd
- --
- Finds the minimum coordinate
- value in each of the m current
- statistics matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BINS,MAX\\GS,MEAN,SDEV,TOT,VAR" "1FEB4" :Usr) "xMINSIGMA" ("--> xmin
- --> [x1...xn]" "Minimum Sigma Cmd
- --
- Finds the minimum coordinate
- value in each of the m current
- statistics matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BINS,MAX\\GS,MEAN,SDEV,TOT,VAR" "1FEB4" :Usr) "xMOD" ("x y --> x'" "Modulo Func
- --
- Returns a remainder defined by:
- x mod y = x - y floor (x/y)
- --
- x y \\-> x mod y
- x 'sym' \\-> 'MOD(x, sym)'
- 'sym' x \\-> 'MOD(sym, x)'
- 'sym1' 'sym2' \\-> 'MOD(sym1, sym2)'
- --
- Related: FLOOR,/" "1BE4D" :Usr) "xNEG" ("x --> x'" "Negate Analytic Func
- --
- Changes the sign or negates an
- object.
- --
- z \\-> -z
- #n1 \\-> #n2
- [ arr ] \\-> [ -arr ]
- 'sym' \\-> '-(sym)'
- x_u \\-> -x_u
- grob1 \\-> grob2
- PICT1 \\-> PICT2
- --
- Related: ABS,CONJ,NOT,SIGN" "1A995" :Usr) "xNEWOB" ("ob --> ob" "New Object Cmd
- --
- Creates a new copy of the
- specifiedfied object.
- --
- Related: MEM,PURGE" "1A2BC" :Usr) "xNEXT" ("-->" "NEXT Cmd
- --
- Ends definite loop structures.
- See the FOR and START command
- entries for syntax information.
- --
- Related: FOR,START,STEP" "2324C" :Usr) "xNOT" ("x --> x'" "NOT Cmd
- --
- Returns the one's complement or
- the logical inverse of the argument.
- --
- #n1 \\-> #n2
- T/F \\-> 0/1
- \"str1\" \\-> \"str2\"
- 'sym' \\-> 'NOT sym'
- --
- Related: AND,OR,XOR" "1E88F" :Usr) "~xNOVAL" ("-->" "INFORM Place Holder/Result Cmd
- --
- Place holder for reset and initial
- values in user-defined dialog
- boxes. NOVAL is returned to the
- stack when a field is empty.
- --
- Related: INFORM" "05B0AB" :Usr) "xN\\GS" ("--> nrows" "Number of Rows Cmd
- --
- Returns the number of rows in the
- current statistical matrix
- (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: \\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2" "1FDA6" :Usr) "xNSIGMA" ("--> nrows" "Number of Rows Cmd
- --
- Returns the number of rows in the
- current statistical matrix
- (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: \\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2" "1FDA6" :Usr) "xNUM" ("$ --> n" "Character Number Cmd
- --
- Returns the character code n for
- the first character in the string.
- --
- Related: CHR,POS,REPL,SIZE,SUB" "1CB46" :Usr) "x\\->NUM" ("x --> x'" "Evaluate to Number Cmd
- --
- Evaluates a symbolic argument
- object and returns the numerical
- result.
- --
- objsym \\-> z
- --
- Related: \\->Q,\\->Qpi" "1A5E4" :Usr) "x>NUM" ("x --> x'" "Evaluate to Number Cmd
- --
- Evaluates a symbolic argument
- object and returns the numerical
- result.
- --
- objsym \\-> z
- --
- Related: \\->Q,\\->Qpi" "1A5E4" :Usr) "xOBJ\\->" ("ob --> ?" "Object to Stack Cmd
- --
- Separates an object into its
- components onto the stack. For some
- object types, the number of
- composites is returned to level 1.
- --
- (x,y) \\-> x y
- {obj1 ... objn} \\-> obj1 objn n
- [x1 ... xn] \\-> x1 xn {n}
- [[x11 ... xm n]] \\-> x11 xm n {m n}
- \"obj\" \\-> evaluated-obj
- 'sym' \\-> obj1 ... objn n func
- x_u \\-> x 1_u
- :tag:obj \\-> obj \"tag\"
- --
- Related: ARRY\\->,C\\->R,DTAG,EQ\\->, R\\->C,STR\\->,\\->TAG" "1CF7B" :Usr) "xOBJ>" ("ob --> ?" "Object to Stack Cmd
- --
- Separates an object into its
- components onto the stack. For some
- object types, the number of
- composites is returned to level 1.
- --
- (x,y) \\-> x y
- {obj1 ... objn} \\-> obj1 objn n
- [x1 ... xn] \\-> x1 xn {n}
- [[x11 ... xm n]] \\-> x11 xm n {m n}
- \"obj\" \\-> evaluated-obj
- 'sym' \\-> obj1 ... objn n func
- x_u \\-> x 1_u
- :tag:obj \\-> obj \"tag\"
- --
- Related: ARRY\\->,C\\->R,DTAG,EQ\\->, R\\->C,STR\\->,\\->TAG" "1CF7B" :Usr) "xOCT" ("-->" "Octal Mode Cmd
- --
- Selects octal base for binary
- integer operations. (The default
- base is decimal.)
- --
- Related: BIN,DEC,HEX,RCWS,STWS" "1C5AA" :Usr) "xOFF" ("-->" "Off Cmd
- --
- Turns off the calculator.
- --
- Related: CONT,HALT,KILL" "1A31E" :Usr) "xOLDPRT" ("" "Old Printer Cmd
- --
- Modifies the remapping string in
- the reserved variable PRTPAR so
- that the extended character set
- of the HP 48 matches that of the
- HP 82240A Infrared Printer.
- Not useful on the 49G." "1EE38" :Usr) "xOPENIO" ("-->" "Open I/O Port Cmd
- --
- Opens the serial port or the IR
- port using the I/O parameters in
- the reserved variable IOPAR.
- --
- <REF>TEXT:Reserved|IOPAR
- --
- Related: BUFLEN,CLOSEIO,SBRK,SRECV, STIME,XMIT" "21EB5" :Usr) "xOR" ("x y --> x'" "OR Func
- --
- Returns the logical OR of two
- arguments.
- --
- #n1 #n2 \\-> #n3
- \"str1\" \"str2\" \\-> \"str3\"
- T/F1 T/F2 \\-> 0/1
- T/F 'sym' \\-> 'T/F OR sym'
- 'sym' T/F \\-> 'sym OR T/F'
- 'sym1' 'sym2' \\-> 'sym1 OR sym2'
- --
- Related: AND,NOT,XOR" "1E809" :Usr) "xORDER" ("{names} -->" "Order Variables Cmd
- --
- Reorders the variables in the
- current directory (shown in the
- VAR menu) to the order specified.
- --
- Related: VARS" "20FD9" :Usr) "xOVER" ("1 2 --> 1 2 1" "Over Cmd
- --
- Returns a copy to stack level 1
- of the object in level 2.
- --
- Related: PICK,ROLL,ROLLD,ROT,SWAP" "1FC29" :Usr) "xPARAMETRIC" ("-->" "Parametric Plot Type Cmd
- --
- Sets the plot type to PARAMETRIC.
- --
- Related: BAR,CONTOUR,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARSURFACE,PCONTOUR, POLAR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE" "1E6C1" :Usr) "xPARITY" ("n -->" "Parity Cmd
- --
- Sets the parity value in the
- reserved variable IOPAR.
- --
- <REF>TEXT:Reserved|IOPAR
- --
- Related: BAUD,CKSM,TRANSIO" "2202C" :Usr) "xPATH" ("--> {HOME dir1 .. dirn}" "Current Path Cmd
- --
- Returns a list specifying the
- path to the current directory.
- --
- Related: CRDIR,HOME,PGDIR,UPDIR" "1A125" :Usr) "xPDIM" ("(xmin,ymin) (xmax,ymax) -->
- #width #height -->" "PICT Dimension Cmd
- --
- Replaces PICT with a blank PICT
- of the specified dimensions.
- --
- Related: PMAX,PMIN" "1E201" :Usr) "xPERM" ("n k --> n'" "Permutations Func
- --
- Returns the number of possible
- permutations of n items taken m
- at a time.
- --
- n m \\-> Pn,m
- 'symn' m \\-> 'PERM(symn,m)'
- n 'symm' \\-> 'PERM(n,symm)'
- 'symn' 'symm' \\-> 'PERM(symn,symm)'
- --
- Related: COMB,!" "1C236" :Usr) "xPGDIR" ("name -->" "Purge Directory Cmd
- --
- Purges the named directory
- (whether empty or not).
- --
- Related: CLVAR,CRDIR,HOME,PATH,PURGE, UPDIR" "2123A" :Usr) "xPICK" ("1...n n --> 1..n 1" "Pick Object Cmd
- --
- Copies the contents of a specified
- level to level 1.
- --
- Related: DUP,DUPN,DUP2,OVER,ROLL,ROLLD, ROT,SWAP" "1FC9A" :Usr) "xPICT" ("--> PICT" "PICT Cmd
- --
- Puts the name PICT on the stack.
- --
- Related: GOR,GCOR,NEG,PICTURE,PVIEW, RCL,REPL,SIZE,STO,SUB" "1E436" :Usr) "xPICTURE" ("-->" "Picture Environment Cmd
- --
- Selects the Picture environment
- (selects the graphics display and
- activates the graphics cursor and
- Picture menu).
- --
- Related: PVIEW,TEXT,PIC" "1E2BA" :Usr) "xGRAPH" ("-->" "Picture Environment Cmd
- --
- Selects the Picture environment
- (selects the graphics display and
- activates the graphics cursor and
- Picture menu).
- --
- Related: PVIEW,TEXT,PIC" "1E2BA" :Usr) "xPIX?" ("(x,y) --> 1/0
- {#n #m} --> 1/0" "Pixel On? Cmd
- --
- Tests whether the specified pixel
- in PICT is on; returns 1 (true)
- if the pixel is on, and 0 (false)
- if the pixel is off.
- --
- Related: PIXON,PIXOFF" "1E36E" :Usr) "xPIXOFF" ("(x,y) -->
- {#n #m} -->" "Pixel Off Cmd
- --
- Turns off the pixel at the specified
- coordinate in PICT.
- --
- Related: PIX?,PIXON" "1E344" :Usr) "xPIXON" ("(x,y) -->
- {#n #m} -->" "Pixel On Cmd
- --
- Turns on the pixel at the
- specified coordinate in PICT.
- --
- Related: PIX?,PIXOFF" "1E31A" :Usr) "xPKT" ("$data $type --> $response" "Packet Cmd
- --
- Used to send command \"packets\"
- (and receive requested data) to
- a Kermit server.
- --
- Related: CLOSEIO,KERRM,SERVER" "220DD" :Usr) "xPMAX" ("(x,y) -->" "PICT Maximum Cmd
- --
- Specifies (x,y) as the coordinates
- at the upper right corner of
- the display.
- --
- Related: PDIM,PMIN,XRNG,YRNG" "1E09E" :Usr) "xPMIN" ("(x,y) -->" "PICT Minimum Cmd
- --
- Specifies (x,y) as the coordinates
- at the lower left corner of
- the display.
- --
- Related: PDIM,PMAX,XRNG,YRNG" "1E07E" :Usr) "xPOLAR" ("-->" "Polar Plot Type Cmd
- --
- Sets the plot type to POLAR.
- --
- Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,SCATTER,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE" "1E6a1" :Usr) "xPOS" ("str substring --> n/0
- {} ob --> n/0" "Position Cmd
- --
- Returns the position of a substring
- within a string or the
- position of an object within a
- list.
- --
- Related: CHR,NUM,REPL,SIZE,SUB" "1CAB4" :Usr) "xPR1" ("ob --> ob" "Print Level 1 Cmd
- --
- Prints an object in multiline
- printer format.
- --
- Related: CR,DELAY,OLDPRT,PRTLCD,PRST, PRSTC,PRVAR" "1EE53" :Usr) "xPREDV" ("x --> y" "Predicted y-Value Cmd
- --
- Returns the predicted dependent
- variable value ydepend, based on
- the independent-variable value
- xindep, the currently selected
- stat model, and the current
- regression coefficients in the
- reserved variable \\GSPAR.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: PREDX" "1FF7A" :Usr) "xPREDX" ("y --> x" "Predicted x-Value Cmd
- --
- Returns the predicted dependent
- variable value xindepend, based
- on the independent-variable value
- ydepend, the currently selected
- stat model, and the current
- regression coefficients in the
- reserved variable \\GSPAR.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: COL\\GS,CORR,COV,EXPFIT, \\GSLINE,LINFIT,LOGFIT,LR, PREDY,PWRFIT,XCOL,YCOL" "1FFBA" :Usr) "xPREDY" ("x --> y" "Predicted y-Value Cmd
- --
- Returns the predicted dependent
- variable value ydepend, based on
- the independent-variable value
- xindepend, the currently selected
- stat model, and the current
- regression coefficients in the
- reserved variable \\GSPAR.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: COL\\GS,CORR,COV,EXPFIT, \\GSLINE,LINFIT,LOGFIT,LR, PREDX,PWRFIT,XCOL,YCOL" "1FF9A" :Usr) "xPRLCD" ("-->" "Print LCD Cmd
- --
- Prints a pixel-by-pixel image of
- the current display (excluding
- the annunciators)
- --
- Related: CR,DELAY,OLDPRT,PRST,PRSTC, PRVAR,PR1" "1EF63" :Usr) "xPROMPT" ("$ -->" "Prompt Cmd
- --
- Displays the contents of \"prompt\"
- in the status area, and halts
- program execution.
- --
- Related: CONT,DISP,FREEZE,HALT,INFORM, INPUT,MSGBOX" "23824" :Usr) "xPRST" ("-->" "Print Stack Cmd
- --
- Prints all objects in the stack,
- starting with the object in the
- highest level.
- --
- Related: CR,DELAY,OLDPRT,PRLCD,PRSTC, PRVAR,PR1" "1EE89" :Usr) "xPRSTC" ("" "Print Stack (Compact) Cmd
- --
- Prints in compact form all objects
- in the stack, starting with
- the object in the highest level.
- --
- Related: PR,DELAY,OLDPRT,PRLCD,PRST, PRVAR,PR1" "1EE6E" :Usr) "xPRVAR" ("name -->
- {names} -->
- :port:name -->" "Print Variable Cmd
- --
- Searches the current directory
- path or port for the specified
- variables and prints the name and
- contents of each variable.
- --
- Related: CP,DELAY,OLDPRT,PR1,PRLCD, PRST,PRSTC" "1EEBF" :Usr) "xPUT" ("ob pos obj --> ob'
- ob = [] or [[]] or {} or name
- pos = n or {n} or {n m}" "Put Element Cmd
- --
- In the level 3 array or list, PUT
- replaces with zput or objput the
- object whose position is specified
- in level 2; if the array or
- list is unnamed, returns the new
- array or list.
- --
- Related: GET,GETI,PUTI" "1D407" :Usr) "xPUTI" ("ob pos obj --> [] pos'
- ob = [] or [[]] or {} or name
- pos = n or {n} or {n m}" "Put and Increment Index Cmd
- --
- In the level 3 array or list,
- replaces with zput or objput the
- object whose position is specified
- in level 2, returning the
- new array or list and the next
- position in that array or list.
- --
- Related: GET,GETI,PUT" "1D5DF" :Usr) "xPVARS" ("nport --> {} mem" "Port-Variables Cmd
- --
- Returns a list of the backup objects
- (:nport:name) and the lib-
- rary objects (:nport:nlibrary) in
- the specified port. Also returns
- the available memory size (if
- RAM) or the memory type.
- --
- Related: VARS" "211FC" :Usr) "xPVIEW" ("(x,y) -->
- {#n #m} -->" "PICT View Cmd
- --
- Displays PICT with the specified
- coordinate at the upper left
- corner of the graphics display.
- --
- Related: FREEZE,PICTURE,PICT,TEXT" "1E2F0" :Usr) "xPWRFIT" ("" "Power Curve Fit Cmd
- --
- Stores PWRFIT as the fifth parameter
- in the reserved variable
- \\GSPAR, indicating that subsequent
- executions of LR are to use the
- power curve fitting model.
- --
- <REF>TEXT:Reserved|\\GSPAR
- --
- Related: BESTFIT,EXPFIT,LINFIT, LOGFIT,LR" "20220" :Usr) "xPX\\->C" ("{#m #n} --> (x,y)" "Pixel to Complex Cmd
- --
- Converts the specified pixel
- coordinates to user-unit
- coordinates.
- --
- Related: C\\->PX" "1E27A" :Usr) "xPX>C" ("{#m #n} --> (x,y)" "Pixel to Complex Cmd
- --
- Converts the specified pixel
- coordinates to user-unit
- coordinates.
- --
- Related: C\\->PX" "1E27A" :Usr) "x\\->Q" ("x --> a/b" "To Quotient Cmd
- --
- Returns a rational form of the
- argument.
- --
- x \\-> 'a/b'
- (x,y) \\-> 'a/b+c/d*i
- 'sym1' \\-> 'sym2'
- --
- Related: \\->Q\\pi,/" "1F9C4" :Usr) "x->Q" ("x --> a/b" "To Quotient Cmd
- --
- Returns a rational form of the
- argument.
- --
- x \\-> 'a/b'
- (x,y) \\-> 'a/b+c/d*i
- 'sym1' \\-> 'sym2'
- --
- Related: \\->Q\\pi,/" "1F9C4" :Usr) "x\\->Q\\pi" ("x --> symb" "To Quotient Times \\pi Cmd
- --
- Returns a rational form of the
- argument, or a rational form of
- the argument with \\pi factored out,
- whichever yields the smaller
- denominator.
- --
- x \\-> 'a/b*\\pi'
- x \\-> 'a/b'
- 'sym1' \\-> 'symb2'
- (x,y) \\-> 'a/b*\\pi+c/d*\\pi*i
- (x,y) \\-> 'a/b+c/d*i
- --
- Related: \\->Q,/,\\pi" "1F9E9" :Usr) "x->QPI" ("x --> symb" "To Quotient Times \\pi Cmd
- --
- Returns a rational form of the
- argument, or a rational form of
- the argument with \\pi factored out,
- whichever yields the smaller
- denominator.
- --
- x \\-> 'a/b*\\pi'
- x \\-> 'a/b'
- 'sym1' \\-> 'symb2'
- (x,y) \\-> 'a/b*\\pi+c/d*\\pi*i
- (x,y) \\-> 'a/b+c/d*i
- --
- Related: \\->Q,/,\\pi" "1F9E9" :Usr) "xQUAD" ("symb var --> symb'" "Solve Quadratic Equation Cmd
- --
- Solves an algebraic object symb
- for the variable var, and
- returns an expression symb'
- representing the solution.
- --
- Related: COLCT,EXPAN,ISOL,SHOW,SOLVE" "20AB3" :Usr) "xQUOTE" ("ob --> 'ob" "Quote Argument Func
- --
- Returns its argument unevaluated.
- --
- 'sym' \\-> 'sym'
- obj \\-> obj
- --
- Related: APPLY,|" "1F500" :Usr) "xRAD" ("-->" "Radians Mode Cmd
- --
- Sets Radians angle mode.
- --
- Related: DEG,RAD" "1C3B4" :Usr) "xRAND" ("--> x" "Random Number Cmd
- --
- Returns a pseudo-random number
- generated using a seed value, and
- updates the seed value.
- --
- Related: COMB,PERM,RDZ,!" "1C1B9" :Usr) "xRATIO" ("x y --> x/y" "Prefix Divide Func
- --
- Prefix form of / (divide) generated
- by the Equation Writer Application.
- --
- z1 z2 \\-> z1/z2
- [arr] [[mat]] \\-> [[arr\327mat^-1]]
- [arr] z \\-> [arr/z]
- z 'sym' \\-> 'z/sym'
- 'sym' z \\-> 'sym/z'
- 'sym1' 'sym2' \\-> 'sym1/sym2'
- #n1 n2 \\-> #n3
- n1 #n2 \\-> #n3
- #n1 #n2 \\-> #n3
- x_u1 y_u2 \\-> (x/y)_u1/u2
- x y_u \\-> (x/y)_1/u
- x_u y \\-> (x/y)_u
- 'sym' x_u \\-> 'sym/x_u'
- x_u 'sym' \\-> 'x_u/sym'
- --
- Related: /" "1FB5D" :Usr) "xPREDIV" ("x y --> x/y" "Prefix Divide Func
- --
- Prefix form of / (divide) generated
- by the Equation Writer Application.
- --
- z1 z2 \\-> z1/z2
- [arr] [[mat]] \\-> [[arr\327mat^-1]]
- [arr] z \\-> [arr/z]
- z 'sym' \\-> 'z/sym'
- 'sym' z \\-> 'sym/z'
- 'sym1' 'sym2' \\-> 'sym1/sym2'
- #n1 n2 \\-> #n3
- n1 #n2 \\-> #n3
- #n1 #n2 \\-> #n3
- x_u1 y_u2 \\-> (x/y)_u1/u2
- x y_u \\-> (x/y)_1/u
- x_u y \\-> (x/y)_u
- 'sym' x_u \\-> 'sym/x_u'
- x_u 'sym' \\-> 'x_u/sym'
- --
- Related: /" "1FB5D" :Usr) "xRCEQ" ("--> EQ" "Recall from EQ Cmd
- --
- Returns the unevaluated contents
- of the reserved variable EQ from
- the current directory.
- --
- <REF>TEXT:Reserved|EQ
- --
- Related: STEQ" "1F133" :Usr) "xRCL" ("var --> x
- :port:nlib --> lib
- :port:name --> ob
- :port:{path} --> ob" "Recall Cmd
- --
- Returns the unevaluated contents
- of a specified variable or plug
- -in object.
- --
- Related: STO" "20B40" :Usr) "xRCLALARM" ("n --> {date time action rep}" "Recall Alarm Cmd
- --
- Recalls a specified alarm.
- --
- Related: DELALARM,FINDALARM,STOALARM" "19928" :Usr) "xRCLF" ("--> {#s1 #u1 #s2 #u2}" "Recall Flags Cmd
- --
- Returns a list containing four 64
- bit binary integers representing
- the states of the 64 system and
- user flags, respectively.
- --
- Related: STOF" "1C619" :Usr) "xRCLKEYS" ("--> {ob ... key ...}
- --> {S ob ... key ...}" "Recall Key Assignments Cmd
- --
- Returns the current user key
- assignments. This includes an S
- if the standard key definitions
- are active (not suppressed) for
- those keys without user key
- assignments.
- --
- Related: ASN,DELKEYS,STOKEYS" "22586" :Usr) "xRCLMENU" ("--> x" "Recall Menu Number Cmd
- --
- Returns the menu number of the
- currently displayed menu.
- --
- Related: MENU,TMENU" "211E1" :Usr) "xRCL\\GS" ("--> [[]]" "Recall Sigma Cmd
- --
- Returns the current stat matrix
- (the contents of reserved var
- \\GSDAT) from the current directory.
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: CL\\GS,STO\\GS,\\GS+,\\GS-" "1FD46" :Usr) "xRCLSIGMA" ("--> [[]]" "Recall Sigma Cmd
- --
- Returns the current stat matrix
- (the contents of reserved var
- \\GSDAT) from the current directory.
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: CL\\GS,STO\\GS,\\GS+,\\GS-" "1FD46" :Usr) "xRCWS" ("--> n" "Recall Wordsize Cmd
- --
- Returns the current wordsize in
- bits (1 through 64).
- --
- Related: BIN,DEC,HEX,OCT,STWS" "1C5FE" :Usr) "xRDM" ("ob size --> ob'
- name size -->
- ob= [] or [[]]
- size = {n} or {n m}" "Redimension Array Cmd
- --
- Rearranges the elements of the
- argument according to the
- specified dimensions.
- --
- Related: TRN" "1D0DF" :Usr) "xRDZ" ("x -->" "Randomize Cmd
- --
- Uses a real number xseed as a
- seed for the RAND command.
- --
- Related: COMB,PERM,RAND,!" "1C1D4" :Usr) "xRE" ("(x,y) --> x
- [] --> []'" "Real Part Func
- --
- Returns the real part of the
- argument.
- --
- x \\-> x
- x_u \\-> x
- (x,y) \\-> x
- [ R-arr ] \\-> [ R-arr ]
- [ C-arr ] \\-> [ R-arr ]
- 'sym' \\-> 'RE(sym)'
- --
- Related: C\\->R,IM,R\\->C" "1C7CA" :Usr) "xRECN" ("name -->
- $name -->" "Receive Renamed Object Cmd
- --
- Prepares the HP 48 to receive a
- file from another Kermit device,
- and to store the file in a
- specified variable.
- --
- Related: BAUD,CKSM,CLOSEIO,FINISH, KERRM,KGET,PARITY,RECV,SEND, SERVER,TRANSIO" "21F62" :Usr) "xRECV" ("-->" "Receive Object Cmd
- --
- Instructs the HP 48 to look for a
- named file from another Kermit
- device. The received file is
- stored in a variable named by the
- sender.
- --
- Related: BAUD,CKSM,FINISH,KGET,PARITY, RECN,SEND,SERVER,TRANSIO" "21F96" :Usr) "xREPEAT" ("1/0 -->" "REPEAT Cmd
- --
- Starts loop clause in
- WHILE ... REPEAT ... END
- indefinite loop structure.
- --
- Related: END,WHILE" "2305D" :Usr) "xREPL" ("ob pos new --> ob'
- ob= [[]] or [] or {} or $ or PICT
- pos= N or {n m} or (n,m)" "Replace Cmd
- --
- Replaces a portion of the level
- 3 target object with the level 1
- object, beginning at a position
- specified in level 2.
- --
- Related: CHR,GOR,GXOR,NUM,POS,SIZE,SUB" "1C8EA" :Usr) "xRES" ("n_int -->
- #n_int -->" "Resolution Cmd
- --
- Specifies the resolution of
- mathematical and statistical plots,
- where the resolution is the
- interval between values of the
- independent variable used to
- generate the plots.
- --
- Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD, TRUTH,WIREFRAME,YSLICE" "1E126" :Usr) "xRESTORE" (":port:name -->
- ob -->" "Restore HOME Cmd
- --
- Replaces the current HOME directory
- with the specified backup copy.
- --
- :nport:namebackup \\-> obj
- backup \\->
- --
- Related: ARCHIVE" "2133C" :Usr) "xRL" ("# --> #'" "Rotate Left Cmd
- --
- Rotates a binary integer one bit
- to the left.
- --
- Related: RLB,RR,RRB" "1959B" :Usr) "xRLB" ("# --> #'" "Rotate Left Byte Cmd
- --
- Rotates a binary integer one byte
- to the left.
- --
- Related: RL,RR,RRB" "195BB" :Usr) "xRND" ("x n --> x'" "Round Func
- --
- Rounds an object to a specified
- number of decimal places or
- significant digits, or to fit the
- current display format.
- --
- z1 nrnd \\-> z2
- z 'symrnd' \\-> 'RND(z,symrnd)'
- 'sym' nrnd \\-> 'RND(symb,nrnd)'
- 'sym1' 'symrnd' \\-> 'RND(sym1,symrnd)'
- [arr1] nrnd \\-> [arr2]
- x_u nrnd \\-> y_u
- x_u 'symrnd' \\-> 'RND(x_u,symrnd)'
- --
- Related: TRNC" "1BD55" :Usr) "xRNRM" ("[] --> x" "Row Norm Cmd
- --
- Returns the row norm (infinity
- norm) of its argument array.
- --
- Related: CNRM,CROSS,DET,DOT" "1BF9E" :Usr) "xROLL" ("1...n n --> 2...n 1" "Roll Objects Cmd
- --
- Moves the contents of a specified
- level to level 1, and rolls
- upwards the portion of the stack
- beneath the specified level.
- --
- Related: OVER,PICK,ROLLD,ROT,SWAP" "1FCB5" :Usr) "xROLLD" ("n ... 1 n --> 1 n...2" "Roll Down Cmd
- --
- Moves the contents of level 1 to
- a specified level, and rolls
- downwards the portion of the
- stack beneath the specified level
- --
- Related: OVER,PICK,ROLL,ROT,SWAP" "1FCD0" :Usr) "xROOT" ("prog/s var guess --> x
- prog/s var {guesses} --> x" "Root-Finder Cmd
- --
- Returns a real number xroot that
- is a value of the specified
- variable var for which the
- specified program or algebraic object
- most nearly evaluates to zero or
- a local extremum." "1F16E" :Usr) "xROT" ("1 2 3 --> 2 3 1" "Rotate Objects Cmd
- --
- Rotates the first three objects
- on the stack, moving the object
- in level 3 to level 1.
- --
- Related: OVER,PICK,ROLL,ROLLD,SWAP,UNROT" "1FC0E" :Usr) "xRR" ("# --> x'" "Rotate Right Cmd
- --
- Rotates a binary integer one bit
- to the right.
- --
- Related: RL,RLB,RRB" "195DB" :Usr) "xRRB" ("# --> x'" "Rotate Right Byte Cmd
- --
- Rotates a binary integer one byte
- to the right.
- --
- Related: RL,RLB,RR" "195FB" :Usr) "xRSD" ("[B] [[A]] [Z] --> []'
- [[B]] [[A]] [[Z]] --> [[]]'" "Residual Cmd
- --
- Computes the residual B - AZ of
- the arrays B, A, and Z." "1C03E" :Usr) "xRULES" ("" "" "20A7D" :Usr) "xR\\->B" ("x --> #" "Real to Binary Cmd
- --
- Converts a positive real integer
- to its binary integer equivalent.
- --
- Related: B\\->R" "1969B" :Usr) "xR>B" ("x --> #" "Real to Binary Cmd
- --
- Converts a positive real integer
- to its binary integer equivalent.
- --
- Related: B\\->R" "1969B" :Usr) "xR\\->C" ("x y --> (x,y)
- [X] [Y] --> [(x,y)]" "Real to Complex Cmd
- --
- Combines two real numbers or real
- arrays into a single complex
- number or array.
- --
- Related: C\\->R,IM,RE" "1C79E" :Usr) "xR>C" ("x y --> (x,y)
- [X] [Y] --> [(x,y)]" "Real to Complex Cmd
- --
- Combines two real numbers or real
- arrays into a single complex
- number or array.
- --
- Related: C\\->R,IM,RE" "1C79E" :Usr) "xR\\->D" ("x --> (180/\\pi)x" "Radians to Degrees Func
- --
- Converts a real number expressed
- in radians to its equivalent in
- degrees.
- --
- x \\-> (180/\\pi)x
- 'sym' \\-> 'R\\->D(sym)'
- --
- Related: D\\->R" "1BEF4" :Usr) "xR>D" ("x --> (180/\\pi)x" "Radians to Degrees Func
- --
- Converts a real number expressed
- in radians to its equivalent in
- degrees.
- --
- x \\-> (180/\\pi)x
- 'sym' \\-> 'R\\->D(sym)'
- --
- Related: D\\->R" "1BEF4" :Usr) "xSAME" ("ob1 ob2 --> 1/0" "Display information about the makers of the
- calculator.
- Same Object Cmd
- --
- Compares two objects, and returns
- a true result (1) if they are
- identical, and a false result (0)
- if they are not.
- --
- Related: TYPE,==" "1E761" :Usr) "xSBRK" ("-->" "Serial Break Cmd
- --
- Interrupts serial transmission or
- reception.
- --
- Related: BUFLEN,SRECV,STIME,XMIT" "220C2" :Usr) "xSCALE" ("xs ys -->" "Scale Plot Cmd
- --
- Adjusts the first two parameters
- in PPAR, (xmin, ymin) and (xmax,
- ymax), so that xscale and yscale
- are the new plot horizontal and
- vertical scales, and the center
- point doesn't change.
- --
- <REF>TEXT:Reserved|PPAR
- --
- Related: AUTO,CENTR,SCALEH,SCALEW" "1E1E1" :Usr) "xSCALEH" ("xf -->" "Multiply Height Cmd
- --
- Multiplies the vertical plot
- scale by xfactor.
- --
- Related: AUTO,SCALEW,YRING" "1E150" :Usr) "x*H" ("xf -->" "Multiply Height Cmd
- --
- Multiplies the vertical plot
- scale by xfactor.
- --
- Related: AUTO,SCALEW,YRING" "1E150" :Usr) "xSCALEW" ("yf -->" "Multiply Width Cmd
- --
- Multiplies a plot's horizontal
- scale by xfactor.
- --
- Related: AUTO,SCALEH,YRING" "1E170" :Usr) "x*W" ("yf -->" "Multiply Width Cmd
- --
- Multiplies a plot's horizontal
- scale by xfactor.
- --
- Related: AUTO,SCALEH,YRING" "1E170" :Usr) "xSCATRPLOT" ("-->" "Draw Scatter Plot Cmd
- --
- Draws a scatter plot of (x, y)
- data points from the specified
- columns of the current statistics
- matrix (reserved variable \\GSDAT).
- --
- Related: BARPLOT,PICTURE,HISTPLOT, PVIEW,SCL\\GS,XCOL,YCOL" "2018C" :Usr) "xSCATTER" ("" "Scatter Plot Type Cmd
- --
- Sets the plot type to SCATTER.
- --
- Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SLOPEFIELD,TRUTH, WIREFRAME,YSLICE" "1E701" :Usr) "xSCI" ("n -->" "Scientific Mode Cmd
- --
- Sets the number display format to
- Scientific mode, which displays
- one digit to the left of the
- fraction mark and n significant
- digits to the right.
- --
- Related: ENG,FIX,STD" "1C41E" :Usr) "xSCL\\GS" ("-->" "Scale Sigma Cmd
- --
- Adjusts (xmin,ymin) and (xmax,
- ymax) in PPAR so that a subsequent
- scatter plot exactly fills
- PICT.
- --
- <REF>TEXT:Reserved|PPAR
- --
- Related: AUTO,SCATRPLOT" "200C4" :Usr) "xSCLSIGMA" ("-->" "Scale Sigma Cmd
- --
- Adjusts (xmin,ymin) and (xmax,
- ymax) in PPAR so that a subsequent
- scatter plot exactly fills
- PICT.
- --
- <REF>TEXT:Reserved|PPAR
- --
- Related: AUTO,SCATRPLOT" "200C4" :Usr) "xSCONJ" ("name -->" "Store Conjugate Cmd
- --
- Conjugates the contents of a
- named object.
- --
- Related: CONJ,SINV,SNEG" "203CC" :Usr) "xSDEV" ("--> xsdev
- --> [x1...xn]" "Standard Deviation Cmd
- --
- Calculates the sample standard
- deviation of each of the m columns
- of coordinate values in the
- current stat matrix (reserved var
- \\GSDAT).
- --
- Related: MAX\\GS,MEAN,MIN\\GS,PSDEV, PVAR,TOT,VAR" "1FECF" :Usr) "xSEND" ("name -->
- {names} -->
- {{old new}...} -->" "Send Object Cmd
- --
- Sends a copy of the named object
- to a Kermit device.
- --
- Related: BAUD,CLOSEIO,CKSM,FINISH, KERRM,KGET,PARITY,RECN, RECV,SERVER,TRANSIO" "21EF0" :Usr) "xSERVER" ("-->" "Server Mode Cmd
- --
- Selects Kermit Server mode.
- --
- Related: BAUD,CKSM,FINISH,KERRM, KGET,PARITY,PKT,RECN,RECV, SEND,TRANSIO" "21FD1" :Usr) "xSF" ("n -->" "Set Flag Cmd
- --
- Sets a specified user or system
- flag.
- --
- Related: CF,FC?,FC?C,FS?,FS?C" "1C274" :Usr) "xSHOW" ("symb name --> symb'
- symb {names} --> symb'" "Show Variable Cmd
- --
- Returns symb' which is equivalent
- to symb except that all
- implicit references to a variable
- name are made explicit.
- --
- Related: COLCT,EXPAN,ISOL,QUAD" "20AD3" :Usr) "xSIGN" ("x --> x'" "Sign Func
- --
- Returns the sign of a real number
- argument, the sign of the numerical
- part of a unit object argument,
- or the unit vector in the
- direction of a complex number
- argument.
- --
- Related: ABS,MANT,XPON" "1B32A" :Usr) "xSIN" ("x --> x'" "Sine Analytic Func
- --
- z \\-> sin z
- 'sym' \\-> 'SIN(sym)'
- x_uangular \\-> sin(x_uangular)
- --
- Related: ASIN,COS,TAN" "1B4AC" :Usr) "xSINH" ("x --> x'" "Hyperbolic Sine Analytic Func
- --
- Returns the hyperbolic sine of
- the argument.
- --
- z \\-> sinh z
- 'sym' \\-> 'SINH(sym)'
- --
- Related: ANUSH,COSH,TANH" "1B5B7" :Usr) "xSINV" ("name -->" "Store Inverse Cmd
- --
- Replaces the contents of the
- named variable with its inverse.
- --
- Related: INV,SCONJ,SNEG" "202CE" :Usr) "xSIZE" ("ob --> n
- --> {N m}
- --> #nw #nh" "Size Cmd
- --
- Returns the number of characters
- in a string, the number of elements
- in a list, the dimensions
- of an array, the number of objects
- in a unit object or algebraic
- object, or the dimensions of a
- graphics object.
- --
- \"str\" \\-> n
- { list } \\-> n
- [ vector ] \\-> { n }
- [[ mat ]] \\-> { n m }
- 'sym' \\-> n
- grob \\-> #nwidth #mheight
- PICT \\-> #nwidth #mheight
- x_u \\-> n
- --
- Related: CHR,NUM,POS,REPL,SUB" "1C9B8" :Usr) "xSL" ("# --> #'" "Shift Left Cmd
- --
- Shifts a binary integer one bit
- to the left.
- --
- Related: ASR,SLB,SR,SRB" "1961B" :Usr) "xSLB" ("# --> #'" "Shift Left Byte Cmd
- --
- Shifts a binary integer one byte
- to the left.
- --
- Related: ASR,SL,SR,SRB" "1963B" :Usr) "xSNEG" ("name -->" "Store Negate Cmd
- --
- Replaces the contents of a variable
- with its negative.
- --
- Related: NEG,SCONJ,SINV" "2034D" :Usr) "xSQ" ("x --> x'" "Square Analytic Func
- --
- Returns the square of the argument.
- --
- z \\-> z2
- x_u \\-> x2_u2
- [[ mat ]] \\-> [[ mat \327 mat ]]
- 'sym' \\-> 'SQ(sym)'
- --
- Related: \\v/,^" "1B426" :Usr) "xSR" ("# --> #'" "Shift Right Cmd
- --
- Shifts a binary integer one bit
- to the right.
- --
- Related: ASR,SL,SLB,SRB" "1965B" :Usr) "xSRB" ("# --> #'" "Shift Right Byte Cmd
- --
- Shifts a binary integer one byte
- to the right.
- --
- Related: ASR,SL,SLB,SR" "1967B" :Usr) "xSRECV" ("n --> $ 0/1" "Serial Receive Cmd
- --
- Reads up to n characters from the
- serial input buffer and returns
- them as a string, along with a
- digit indicating whether errors
- occurred.
- --
- Related: BUFFLEN,CLOSEIO,OPENIO, SBRK,STIME,XMIT" "21E95" :Usr) "xSTART" ("start finish -->" "START Definite Loop Structure Cmd
- --
- START xstart xfinish \\->
- NEXT xstart xfinish \\->
- STEP xincrement \\->
- STEP 'symbincrement' \\->
- --
- Related: FOR,NEXT,STEP" "23103" :Usr) "xSTD" ("-->" "Standard Mode Cmd
- --
- Sets the number display format
- to Standard mode.
- --
- Related: ENG,FIX,SCI" "1C486" :Usr) "xSTEP" ("n -->
- symb -->" "STEP Cmd
- --
- Defines the increment (step) value,
- and ends definite loop struct
- See the FOR and START command
- entries for syntax information.
- --
- Related: FOR,BEXT,START" "23380" :Usr) "xSTEQ" ("ob -->" "Store in EQ Cmd
- --
- Stores an object into the reserved
- variable EQ in the current
- directory.
- --
- <REF>TEXT:Reserved|EQ
- --
- Related: RCEQ" "1F14E" :Usr) "xSTIME" ("x/0 -->" "Serial Time-Out Cmd
- --
- Specifies the period that SRECV
- (serial reception) and XMIT
- (serial transmission) wait before
- timing out.
- --
- Related: BUFLEN,CLOSEIO,SBRK,SRECV,XMIT" "220A2" :Usr) "xSTO" (" ob name -->
- ob :port:name -->
- lib port -->
- bup port -->
- ob 'name(i)' -->
- . 38G: 107002 \\~%s\\ [Usr]" "Store Cmd
- --
- Stores an object into a specified
- variable or object.
- --
- Related: DEFINE,RCL,\\->" "20CCD" :Usr) "xSTO-" ("ob name -->
- name ob -->" "Store Minus Cmd
- --
- Calculates the difference between
- a number (or other object) and
- the contents of a specified
- variable, and stores the new
- value to the specified variable.
- --
- Related: STO+,STO*,STO/,-" "20538" :Usr) "xSTO*" ("ob name -->
- name ob -->" "Store Times Cmd
- --
- Multiplies the contents of a
- specified variable by a number or
- other object.
- --
- Related: STO+,STO-,STO/,*" "20753" :Usr) "xSTO/" ("ob name -->
- name ob -->" "Store Divide Cmd
- --
- Calculates the quotient of a number
- (or other object) and the
- contents of a specified variable,
- and stores the new value to the
- specified variable.
- --
- Related: STO+,STO-,STO*,/" "2060C" :Usr) "xSTO+" ("ob name -->
- name ob -->" "Store Plus Cmd
- --
- Adds a number or other object to
- the contents of a specified variable.
- --
- Related: STO-,STO*,STO/,+" "2044B" :Usr) "xSTOALARM" ("time --> n
- {date time act rep} --> n" "Store Alarm Cmd
- --
- Stores an alarm in the system
- alarm list and returns its alarm
- index number. act and rep arguments are
- optional.
- --
- Related: DELALARM,FINDALARM,RCLALARM" "198FE" :Usr) "xSTOF" ("{#s1 #u1 #s2 #u2} -->" "Store Flags Cmd
- --
- Sets the states of the system
- flags or the system and user
- flags.
- --
- Related: RCLF,STWS,RCWS" "1C67F" :Usr) "xSTOKEYS" ("{ob key ...} -->
- {'S' ob key ...} -->
- 'S' -->" "Store Key Assignments Cmd
- --
- Defines multiple keys on the user
- keyboard by assigning objects to
- specified keys.
- --
- Related: ASN,DELKEYS,RCLKEYS" "22514" :Usr) "xSTO\\GS" ("ob -->" "Store Sigma Cmd
- --
- Stores obj in the reserved
- variable \\GSDAT.
- --
- Related: CL\\GS,RCL\\GS,\\GS+,\\GS-" "1FD0B" :Usr) "xSTOSIGMA" ("ob -->" "Store Sigma Cmd
- --
- Stores obj in the reserved
- variable \\GSDAT.
- --
- Related: CL\\GS,RCL\\GS,\\GS+,\\GS-" "1FD0B" :Usr) "xSTR\\->" ("$ --> ob" "Evaluate String Cmd
- --
- Evaluates the text of a string as
- if the text were entered from the
- command line.
- --
- Related: ARRY\\->,DTAG,EQ\\->,LIST\\->, OBJ\\->,\\->STR" "1CB26" :Usr) "xSTR>" ("$ --> ob" "Evaluate String Cmd
- --
- Evaluates the text of a string as
- if the text were entered from the
- command line.
- --
- Related: ARRY\\->,DTAG,EQ\\->,LIST\\->, OBJ\\->,\\->STR" "1CB26" :Usr) "x\\->STR" ("ob --> $" "Object to String Cmd
- --
- Converts any object to string
- form.
- --
- Related: \\->ARRY,\\->LIST,STR\\->, \\->TAG,\\->UNIT" "1CB0B" :Usr) "x>STR" ("ob --> $" "Object to String Cmd
- --
- Converts any object to string
- form.
- --
- Related: \\->ARRY,\\->LIST,STR\\->, \\->TAG,\\->UNIT" "1CB0B" :Usr) "xSTWS" ("n -->
- #n -->" "Set Wordsize Cmd
- --
- Sets the current binary integer
- wordsize to n bits, where n is a
- value from 1 through 64 (the
- default is 64).
- --
- Related: BIN,DEC,HEX,OCT,RCWS" "1C5C5" :Usr) "xSUB" ("ob start end --> ob'
- ob= [[]], $, {}, grob, PICT
- start,end = n, {n m}, (n,m)" "Subset Cmd
- --
- Returns the portion of a string
- or list defined by specified
- positions, or returns the
- rectangular portion of a graphics object
- or PICT defined by two corner
- pixel coordinates.
- --
- Related: CHR,GOR,GXOR,NUM,POS,REPL,SIZE" "1C85C" :Usr) "xSWAP" ("ob1 ob2 --> ob2 ob1" "Swap Objects Cmd
- --
- Interchanges the first two
- objects on the stack.
- --
- Related:
- DUP,DUPN,DUP2,OVER,PICK,ROLL,ROLLD,ROT" "1FBBD" :Usr) "xSYSEVAL" ("# --> ?" "Evaluate System Object Cmd
- --
- Evaluates unnamed operating system
- objects specified by their
- memory addresses.
- --
- Related: EVAL,LIBEVAL,FLASHEVAL" "1A52E" :Usr) "x%T" ("x y --> 100y/x" "Percent of Total Function
- --
- Returns the percent of the level
- 2 argument that is represented by
- the level 1 argument.
- --
- x y \\-> 100y/x
- x 'sym' \\-> '%T(x,sym)'
- 'sym' x \\-> '%T(sym,x)'
- 'sym1' 'sym2' \\-> '%T(sym1,sym2)'
- x_u1 y_u2 \\-> 100y_u2/x_u1
- x_u 'sym' \\-> '%T(x_u,sym)'
- 'sym' x_u \\-> '%T(sym,x_u)'
- --
- Related: %,%ch" "1C0D7" :Usr) "x\\->TAG" ("ob tag --> :tag:ob" "Stack to Tag Cmd
- --
- Combines objects in levels 1 and
- 2 to created tagged (labeled)
- object. Tag may be any object. It will eb
- converted to a string.
- --
- Related: \\->ARRY,DTAG,\\->LIST,OBJ\\->, \\->STR,\\->UNIT" "225BE" :Usr) "x->TAG" ("ob tag --> :tag:ob" "Stack to Tag Cmd
- --
- Combines objects in levels 1 and
- 2 to created tagged (labeled)
- object. Tag may be any object. It will eb
- converted to a string.
- --
- Related: \\->ARRY,DTAG,\\->LIST,OBJ\\->, \\->STR,\\->UNIT" "225BE" :Usr) "xTAN" ("x --> x'" "Tangent Analytic Func
- --
- Returns the tangent of the
- argument.
- --
- z \\-> tan z
- 'sym' \\-> 'TAN(symb)'
- x_unitang \\-> tan(x_unitang)
- -
- Related: ATAN,COS,SIN" "1B55E" :Usr) "xTANH" ("x --> x'" "Hyperbolic Tangent Analytic Func
- --
- Returns the hyperbolic tangent of
- the argument.
- --
- z \\-> tanh z
- 'sym' \\-> 'TANH(sym)'
- -
- Related: ATANH,COSH,SINH" "1B655" :Usr) "xTAYLR" ("symb var n --> symb'" "Taylor's Polynomial Cmd
- --
- Calculates the nth order Taylor's
- polynomial of 'symb' in the
- variable var.
- --
- Related: \\.d,\\.S,\\GS" "20B20" :Usr) "xTEXT" ("-->" "Show Stack Display Cmd
- --
- Displays the stack display.
- --
- Related: PICTURE,PVIEW" "1E606" :Usr) "xTHEN" ("" "THEN in an ON ERROR construct.
- --
- Related: CASE,ELSE,END,IFERR" "2371F" :Usr) "xTHENCASE" ("" "THEN in a CASE statement.
- --
- Related: CASE,ELSE,END,IFERR" "237A8" :Usr) "xERRTHEN" ("" "THEN in an ON ERROR construct.
- --
- Related: CASE,ELSE,END,IFERR" "2371F" :Usr) "xTICKS" ("--> #" "Ticks Cmd
- --
- Returns the system time as a binary
- integer, in units of 1/8192
- second.
- --
- Related: TIME" "1982D" :Usr) "xTIME" ("--> time" "Time Cmd
- --
- Returns the system time in the
- form HH.MMSSs.
- --
- Related: DATE,TICKS,TSTR" "197F7" :Usr) "x\\->TIME" ("time -->" "Set System Time Cmd
- --
- Sets the system time.
- --
- Related: CLKADJ,\\->DATE" "198BE" :Usr) "xSETTIME" ("time -->" "Set System Time Cmd
- --
- Sets the system time.
- --
- Related: CLKADJ,\\->DATE" "198BE" :Usr) "xTLINE" ("(x1,y1) (x2,y2) -->
- {#n1 #m1} {#n2 #m2} -->" "Toggle Line Cmd
- --
- For each pixel along the line in
- PICT defined by the specified
- coordinates, TLINE turns off
- every pixel that is on, and turns
- on every pixel that is off.
- --
- Related: ARC,BOX,LINE" "1E3C2" :Usr) "xTMENU" ("% --> [InitMenu%]
- {} -->
- name -->
- Ob --> [@LIST InitMenu]" "Temporary Menu Cmd
- --
- Displays a built-in menu, libary
- menu, or a user-defined menu.
- --
- Related: MENU,RCLMENU" "2115D" :Usr) "xTOT" ("--> xsum
- --> {x1...xn}" "Total Cmd
- --
- Computes the sum of each of the
- m columns of coordinate values in
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: MAX\\GS,MIN\\GS,MEANMPSDEV, PVAR,SDEV,VAR" "1FEEA" :Usr) "xTRANSIO" ("n -->" "I/O Translation Cmd
- --
- Specifies the character translation
- option. These translations
- affect only ASCII Kermit transfer
- and files printed to the serial
- port.
- --
- Related: BAUD,CKSM,PARITY" "2204C" :Usr) "xTRN" ("[[]] --> [[]]'
- name -->" "Transpose Matrix Cmd
- --
- Returns the (conjugate) transpose
- of a matrix.
- --
- Related: CONJ" "1D392" :Usr) "xTRNC" ("x n -->" "Truncate Func
- --
- Truncates an object to a specified
- number of decimal places or
- significant digits, or to fit the
- current display format.
- --
- z1 ntrnc \\-> z2
- z1 'symtrnc' \\->
- 'TRNC(z1,symtrnc)'
- 'sym1' ntrnc \\->
- 'TRNC(sym1,ntrnc)'
- 'sym1' 'symtrnc' \\->
- 'TRNC(sym1,symtrnc)'
- [ arr ]1 ntrnc \\-> [ arr ]2
- x_u ntrnc \\-> y_u
- x_u 'symtrnc' \\->
- 'TRNC(x_u,symtrnc)'
- --
- Related: RND" "1BDD1" :Usr) "xTRUTH" ("-->" "Truth Plot Type Cmd
- --
- Sets the plot type to TRUTH.
- --
- Related: BAR,CONIC,DIFFEQ,FUNCTION, GRIDMAP,HISTOGRAM,PARAMETRIC,PARSURFACE, PCONTOUR,POLAR,SCATTER,SLOPEFIELD,WIREFRAME,YSLICE" "1E6E1" :Usr) "xTSTR" ("date time --> $" "Date and Time String Cmd
- --
- Returns a string derived from the
- date and time.
- --
- Related: DATE,TICKS,TIME" "19992" :Usr) "xTVARS" ("ntype --> {}
- {n...} --> {}" "Typed Variables Cmd
- --
- Lists all global variables in the
- current directory that contain
- objects of the specified types.
- --
- Related: PVARS,TYPE,VARS" "1A1AF" :Usr) "xTYPE" ("ob --> %type" "Type Cmd
- --
- Returns the type number of an
- object.
- --
- User Objects:
- --
- Object Type Number
- ------ ---- ------
- Real number 0
- Complex number 1
- Character string 2
- Real Array 3
- Complex Array 4
- List 5
- Global name 6
- Local name 7
- Program 8
- Algebraic Object 9
- Binary Integer 10
- Graphics object 11
- Tagged object 12
- Unit object 13
- XLIB name 14
- Directory 15
- Library 16
- Backup object 17
- --
- Built-in Cmds:
- --
- Object Type Number
- ------ ---- ------
- Built-in function 18
- Built-in command 19
- --
- System Objects:
- --
- Object Type Number
- ------ ---- ------
- System binary 20
- Extended real 21
- Extended complex 22
- Linked array 23
- Character 24
- Code object 25
- Library data 26
- External object 26-31
- --
- Related: SAME,TVARS,VTYPE" "1CB86" :Usr) "xUBASE" ("u --> u'" "Convert to SI Base Units Func
- --
- Converts a unit object to SI base
- units.
- --
- x_u \\-> y_base-units
- 'sym' \\-> 'UBASE(symb)'
- --
- Related: CONVERT,UFACT,\\->UNIT,UVAL" "19771" :Usr) "xUFACT" ("u1 u2 --> u3" "Factor Unit Cmd
- --
- Factors the level 1 unit from the
- unit expression of the level 2
- unit object.
- --
- Related: CONVERT,UBASE,\\->UNIT,UVAL" "197A5" :Usr) "x\\->UNIT" ("x u --> u'" "Stack to Unit Object Cmd
- --
- Creates a unit object from a real
- number and the unit part of a
- unit object.
- --
- Related: \\->ARRY,\\->LIST,\\->STR,\\->TAG" "1974F" :Usr) "x>UNIT" ("x u --> u'" "Stack to Unit Object Cmd
- --
- Creates a unit object from a real
- number and the unit part of a
- unit object.
- --
- Related: \\->ARRY,\\->LIST,\\->STR,\\->TAG" "1974F" :Usr) "xUNTIL" ("-->" "UNTIL Cmd
- --
- Starts test-clause in
- DO ... UNTIL ... END
- indefinite loop structure.
- --
- See the DO entry for syntax info.
- --
- Related: DO,END" "230ED" :Usr) "xUPDIR" ("-->" "Up Directory Cmd
- --
- Makes the parent of the current
- directory the new current directory.
- --
- Related: CRDIR,HOME,PATH,PGDIR" "1A15B" :Usr) "xUTPC" ("n x --> x'" "Upper Chi-Square Distribution Cmd
- --
- Returns the probability utpc(n,x)
- that a chi-square random variable
- is greater than x, where n is the
- number of degrees of freedom of
- the distribution.
- --
- Related: UTPF,UTPN,UTPT" "2001A" :Usr) "xUTPF" ("n1 n2 x --> x'" "Upper Snedecor's F Distrib. Cmd
- --
- Returns the probability
- utpf(n1,n2,x)
- that a Snedecor's F random variable
- is greater than x, where n1
- and n2 are the numerator and
- denominator degrees of freedom of
- the F distribution.
- --
- Related: UTPC,UTPN,UTPT" "2005A" :Usr) "xUTPN" ("n v x --> x'" "Upper Normal Distribution Cmd
- --
- Returns the probability
- utpn(m,v,x)
- that a normal random variable is
- greater than x, where m and v are
- the mean and variance, respectively,
- of the normal distribution.
- --
- Related: UTPC,UTPF,UTPT" "2003A" :Usr) "xUTPT" ("n x --> x'" "Upper Student's t Distrib. Cmd
- --
- Returns the probability utpt(n,x)
- that a Student's t random variable
- is greater than x, where n
- is the number of degrees of freedom
- of the distribution.
- --
- Related: UTPC,UTPF,UTPN" "2007A" :Usr) "xUVAL" ("u --> x" "Unit Value Func
- --
- Returns the numerical part of a
- unit object.
- --
- x_u \\-> x
- 'sym' \\-> 'UVAL(sym)'
- --
- Related: CONVERT,UBASE,UFACT,\\->UNIT" "1971B" :Usr) "xV\\->" ("[]/() --> x y
- --> x y z
- (in current co-system)" "Vector/Complex Num to Stack Cmd
- --
- [ x y ] \\-> x y
- [ xr ANGy\\Gh ] \\-> xr y\\Gh
- [ x1 x2 x3 ] \\-> x1 x2 x3
- [ x1 ANGx\\Gh xz ] \\-> x1 x\\Gh xz
- [ x1 ANGx\\Gh ANGx\324\325] \\-> x1 x\\Gh x\324\325
- [ x1 x2 ... xn ] \\-> x1 ... xn
- (x,y) \\-> x y
- (xr ANGy\\Gh) \\-> xr y\\Gh
- --
- Related: \\->V2,\\->V3" "1DD06" :Usr) "xV>" ("[]/() --> x y
- --> x y z
- (in current co-system)" "Vector/Complex Num to Stack Cmd
- --
- [ x y ] \\-> x y
- [ xr ANGy\\Gh ] \\-> xr y\\Gh
- [ x1 x2 x3 ] \\-> x1 x2 x3
- [ x1 ANGx\\Gh xz ] \\-> x1 x\\Gh xz
- [ x1 ANGx\\Gh ANGx\324\325] \\-> x1 x\\Gh x\324\325
- [ x1 x2 ... xn ] \\-> x1 ... xn
- (x,y) \\-> x y
- (xr ANGy\\Gh) \\-> xr y\\Gh
- --
- Related: \\->V2,\\->V3" "1DD06" :Usr) "x\\->V2" ("x y --> []
- --> ()" "Stack to Vector/Complex Num Cmd
- --
- Converts two numbers from the
- stack into a 2-element vector or
- complex number.
- --
- Related: V\\->,\\->V3" "1DE66" :Usr) "x>V2" ("x y --> []
- --> ()" "Stack to Vector/Complex Num Cmd
- --
- Converts two numbers from the
- stack into a 2-element vector or
- complex number.
- --
- Related: V\\->,\\->V3" "1DE66" :Usr) "x\\->V3" ("x y z --> []" "Stack to 3-Element Vector Cmd
- --
- Converts three numbers into a
- 3-element vector.
- --
- Related: V\\->,\\->V2" "1DEC2" :Usr) "x>V3" ("x y z --> []" "Stack to 3-Element Vector Cmd
- --
- Converts three numbers into a
- 3-element vector.
- --
- Related: V\\->,\\->V2" "1DEC2" :Usr) "xVAR" ("--> x
- --> [x1...xn]" "Variance Cmd
- --
- Calculates the sample variance
- of the coordinate values in each
- of the m columns in the current
- stat matrix (\\GSDAT).
- --
- Related: MAX\\GS,MEAN,MIN\\GS,PSDEV,PVAR, SDEV,TOT" "1FF05" :Usr) "xVARS" ("--> {}" "Variables Cmd
- --
- Returns a list of all variables'
- names in the VAR menu (the current
- directory).
- --
- Related: ORDER,PVARS,TVARS" "1A194" :Usr) "xVTYPE" ("name --> n" "Variable Type Cmd
- --
- Returns the type number of the
- object contained in the named
- variable.
- --
- 'name' \\-> ntype
- :nport:namebackup \\-> ntype
- :nport:nlibrary \\-> ntype
- --
- Related: TYPE" "1CE28" :Usr) "xWAIT" ("sec -->
- 0 --> rc.p" "Wait Cmd
- --
- Suspends program execution for
- specified time, or until a key is
- pressed.
- --
- Related: KEY" "1A71F" :Usr) "xWHILE" ("-->" "WHILE Indefinite Loop Struct Cmd
- --
- Starts the
- WHILE ... REPEAT ... END
- indefinite loop structure.
- --
- Related: DO,END,REPEAT" "23033" :Usr) "xWSLOG" ("--> $ $ $ $" "Warmstart Log Cmd
- --
- Returns four strings recording
- the date, time, and cause of the
- four most recent warmstart events" "19848" :Usr) "x\\GSX2" ("--> xsum" "Sum of Squares of x-Values Cmd
- --
- Sums the squares of the values in
- the independent-variable column
- of the current stat matrix
- (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2" "1FE2D" :Usr) "xSUMX2" ("--> xsum" "Sum of Squares of x-Values Cmd
- --
- Sums the squares of the values in
- the independent-variable column
- of the current stat matrix
- (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY,\\GSY2" "1FE2D" :Usr) "xXCOL" ("n -->" "Independent Column Cmd
- --
- Specifies the independent
- variable column of the current
- stat matrix (reserved variable
- \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT" "1FFDA" :Usr) "xXMIT" ("$ --> 1
- --> $rest 0" "Serial Transmit Cmd
- --
- Sends a string serially without
- using Kermit protocol, and
- returns a single digit that
- indicates whether the transmission
- was successful.
- --
- Related: BUFLEN,SBRK,SRECV,STIME" "21E75" :Usr) "xXOR" ("# #' --> #''
- $ $' --> $''
- 1/0 1/0 --> 1/0" "Exclusive OR Cmd
- --
- Returns the logical exclusive OR
- of two arguments.
- #n1 #n2 \\-> #n3
- \"str1\" \"str2\" \\-> \"str3\"
- T/F1 T/F2 \\-> 0/1
- T/F 'sym' \\-> 'T/F XOR sym'
- 'sym' T/F \\-> 'sym XOR T/F'
- 'sym1' 'sym2' \\-> 'sym1 XOR sym2'
- --
- Related: AND,OR,NOT" "1E8F6" :Usr) "xXRNG" ("x1 x2 -->" "x-Axis Display Range Cmd
- --
- Specifies the x-axis display
- range.
- --
- Related: AUTO,PDIM,PMAX,PMIN,YRNG" "1E621" :Usr) "xXROOT" ("y x --> Y'" "xth Root of y Cmd
- --
- Computes the xth root of a real
- number.
- y x \\-> x ROOT y
- 'sym1' 'sym2' \\-> 'XROOT(sym2,sym1)'
- 'sym' x \\-> 'XROOT(x,sym)'
- y 'sym' \\-> 'XROOT(sym,y)'
- y_u x \\-> x ROOT y_u1/x
- y_u 'sym' \\-> 'XROOT(sym,y_u)'" "1B1CA" :Usr) "x\\GSXY" ("--> xsum" "Sum of x Times Y Cmd
- --
- Sums the products of the
- corresponding values in the
- independent and dependent variable
- columns of the current stat
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSX2,\\GSY,\\GSY2" "1FE63" :Usr) "xSUMXY" ("--> xsum" "Sum of x Times Y Cmd
- --
- Sums the products of the
- corresponding values in the
- independent and dependent variable
- columns of the current stat
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSX2,\\GSY,\\GSY2" "1FE63" :Usr) "x\\GSY" ("--> xsum" "Sum of y-Values Cmd
- --
- Sums the values in the dependent
- variable column of the current
- stat matrix (reserved var \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY2" "1FE12" :Usr) "xSUMY" ("--> xsum" "Sum of y-Values Cmd
- --
- Sums the values in the dependent
- variable column of the current
- stat matrix (reserved var \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY2" "1FE12" :Usr) "x\\GSY2" ("--> xsum" "Sum of Squares of y-Values Cmd
- --
- Sums the squares of the values in
- the dependent-variable column of
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY" "1FE48" :Usr) "xSUMY2" ("--> xsum" "Sum of Squares of y-Values Cmd
- --
- Sums the squares of the values in
- the dependent-variable column of
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: N\\GS,XCOL,\\GSX,\\GSXY,\\GSX2,\\GSY" "1FE48" :Usr) "xYCOL" ("n -->" "Dependent Column Cmd
- --
- Specifies the dependent-variable
- column of the current stat matrix
- (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: BARPLOT,BESTFIT,COL\\GS,CORR, COV,EXPFIT,HISTPLOT,LINFIT,LOGFIT, LR,PREDX,PREFY,PWRFIT,SCATRPLOT,XCOL" "1FFFA" :Usr) "xYRNG" ("y1 y2 -->" "y-Axis Display Range Cmd
- --
- Specifies the y-axis display
- range.
- --
- Related: AUTO,PDIM,PMAX,PMIN,XRNG" "1E641" :Usr) "x^" ("y x --> y^x" "Power Analytic Func
- --
- Returns the value of the level 2
- object raised to the power of the
- level 1 object.
- w z \\-> w^z
- z 'sym' \\-> 'z^sym'
- 'sym' z \\-> '(sym)^z'
- 'sym1' 'sym2' \\-> 'sym1^(sym2)'
- x_u y \\-> xy_uy
- x_u 'sym' \\-> '(x_u)^(sym)'
- --
- Flags: -1 -3
- Principal soln -1
- Numeric results -3
- --
- Related: EXP,ISOL,LN,XROOT" "1B02D" :Usr) "x\\v/" ("x --> x'" "Square Root Analytic Func
- --
- Returns the (+ve) square root of
- the argument.
- --
- z \\-> \\v/z
- x_u \\-> \\v/(x)_u
- 'sym' \\-> 'SQRT(sym)'
- --
- Flags: -1 -3
- --
- Related: SQ,^,ISOL" "1B374" :Usr) "xSQRT" ("x --> x'" "Square Root Analytic Func
- --
- Returns the (+ve) square root of
- the argument.
- --
- z \\-> \\v/z
- x_u \\-> \\v/(x)_u
- 'sym' \\-> 'SQRT(sym)'
- --
- Flags: -1 -3
- --
- Related: SQ,^,ISOL" "1B374" :Usr) "x\\GS+" ("x -->
- x1...xn -->
- []/[[]] -->" "Sigma Plus Cmd
- --
- Adds one or more data points to
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: CL\\GS,RCL\\GS,STO\\GS,\\GS-" "1FD61" :Usr) "xSIGMA+" ("x -->
- x1...xn -->
- []/[[]] -->" "Sigma Plus Cmd
- --
- Adds one or more data points to
- the current stat matrix (reserved
- variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: CL\\GS,RCL\\GS,STO\\GS,\\GS-" "1FD61" :Usr) "x\\GS-" ("--> x
- --> []" "Sigma Minus Cmd
- --
- Returns a vector of m real numbers
- (or one number x if m = 1)
- corresponding to the coordinate
- values of the last data point
- entered by \\GS+ into the current stat
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: CL\\GS,RCL\\GS,STO\\GS,\\GS+" "1FD8B" :Usr) "xSIGMA-" ("--> x
- --> []" "Sigma Minus Cmd
- --
- Returns a vector of m real numbers
- (or one number x if m = 1)
- corresponding to the coordinate
- values of the last data point
- entered by \\GS+ into the current stat
- matrix (reserved variable \\GSDAT).
- --
- <REF>TEXT:Reserved|\\GSDAT
- --
- Related: CL\\GS,RCL\\GS,STO\\GS,\\GS+" "1FD8B" :Usr) "x\\pi" ("--> \\pi" "PI Func
- --
- Returns the symbolic constant '\\pi'
- or its numerical representation,
- 3.14159265359.
- \\-> '\\pi'
- \\-> 3.14159265359
- --
- Flags: -2 -3
- --
- Related: e,i,MAXR,MINR,\\->Q\\pi" "1AABD" :Usr) "xPI" ("--> \\pi" "PI Func
- --
- Returns the symbolic constant '\\pi'
- or its numerical representation,
- 3.14159265359.
- \\-> '\\pi'
- \\-> 3.14159265359
- --
- Flags: -2 -3
- --
- Related: e,i,MAXR,MINR,\\->Q\\pi" "1AABD" :Usr) "x\\<=" ("x y --> 1 \\n --> 0" "Less Than or Equal Func
- --
- Tests whether one object is less
- than or equal to another object.
- --
- x y \\-> 0/1
- #n1 #n2 \\-> 0/1
- \"str1\" \"str2\" \\-> 0/1
- x 'sym' \\-> 'x<=sym'
- 'sym' z \\-> 'sym<=z'
- 'sym1' 'sym2' \\-> 'sym1<=sym2'
- x_u1 y_u2 \\-> 0/1
- x_u 'sym' \\-> 'x_unit<=sym'
- 'sym' x_u \\-> 'sym<=x_unit'
- --
- Flags: -3
- --
- Related: <,>,\\>=,==,\\=/" "1ECFC" :Usr) "x<=?" ("x y --> 1 \\n --> 0" "Less Than or Equal Func
- --
- Tests whether one object is less
- than or equal to another object.
- --
- x y \\-> 0/1
- #n1 #n2 \\-> 0/1
- \"str1\" \"str2\" \\-> 0/1
- x 'sym' \\-> 'x<=sym'
- 'sym' z \\-> 'sym<=z'
- 'sym1' 'sym2' \\-> 'sym1<=sym2'
- x_u1 y_u2 \\-> 0/1
- x_u 'sym' \\-> 'x_unit<=sym'
- 'sym' x_u \\-> 'sym<=x_unit'
- --
- Flags: -3
- --
- Related: <,>,\\>=,==,\\=/" "1ECFC" :Usr) "x\\>=" ("x y --> 1 \\n --> 0" "Greater Than or Equal Func
- --
- x y \\-> 0/1
- #n1 #n2 \\-> 0/1
- \"str1\" \"str2\" \\-> 0/1
- x 'sym' \\-> 'x\\>=sym'
- 'sym' z \\-> 'sym\\>=z'
- 'sym1' 'sym2' \\-> 'sym1\\>=sym2'
- x_u1 y_u2 \\-> 0/1
- x_u 'sym' \\-> 'x_u\\>=sym'
- 'sym' x_u \\-> 'sym\\>=x_u'
- --
- Flags: -3
- --
- Related: <,\\<=,>,==,\\=/" "1ED9B" :Usr) "x>=?" ("x y --> 1 \\n --> 0" "Greater Than or Equal Func
- --
- x y \\-> 0/1
- #n1 #n2 \\-> 0/1
- \"str1\" \"str2\" \\-> 0/1
- x 'sym' \\-> 'x\\>=sym'
- 'sym' z \\-> 'sym\\>=z'
- 'sym1' 'sym2' \\-> 'sym1\\>=sym2'
- x_u1 y_u2 \\-> 0/1
- x_u 'sym' \\-> 'x_u\\>=sym'
- 'sym' x_u \\-> 'sym\\>=x_u'
- --
- Flags: -3
- --
- Related: <,\\<=,>,==,\\=/" "1ED9B" :Usr) "x\\=/" ("x y --> 1 \\n --> 0" "Not Equal Func
- --
- Tests if two objects are equal.
- obj1 obj2 \\-> 0/1
- (x,0) x \\-> 0/1
- x (x,0) \\-> 0/1
- z 'sym' \\-> 'z\\=/sym'
- 'sym' z \\-> 'sym\\=/z'
- 'sym1' 'sym2' \\-> 'sym1\\=/sym2'
- --
- Flags: -3
- --
- Related: SAME,TYPE,<,\\<=,>,\\>=, ==" "1EA9D" :Usr) "x#?" ("x y --> 1 \\n --> 0" "Not Equal Func
- --
- Tests if two objects are equal.
- obj1 obj2 \\-> 0/1
- (x,0) x \\-> 0/1
- x (x,0) \\-> 0/1
- z 'sym' \\-> 'z\\=/sym'
- 'sym' z \\-> 'sym\\=/z'
- 'sym1' 'sym2' \\-> 'sym1\\=/sym2'
- --
- Flags: -3
- --
- Related: SAME,TYPE,<,\\<=,>,\\>=, ==" "1EA9D" :Usr) "x\\->" ("" "Create local variable comand.
- <REF>xRPN->" "22FEB" :Usr) "xRPN->" ("ob1 .. obn -->" "Create Local Variables Cmd
- --
- Creates local variables.
- obj1 ... objn \\->
- --
- Syntax:
- \\-> name1 name2 ... nameN \\<< prog \\>>
- \\-> name1 name2 ... nameN 'Expr'
- --
- Related: DEFINE,STO" "234C1" :Usr) "xALG->" ("" "Create local variable comand.
- <REF>xRPN->" "22FEB" :Usr) "x!" ("x --> x'" "Factorial (Gamma) Func
- --
- Returns the factorial n! of a
- positive integer argument n, or
- the gamma function \242(x+1) of a
- non-integer argument x.
- n \\-> n!
- x \\-> \242(x+1)
- 'sym' \\-> '(sym!)'
- --
- Flags: -3 -20 -21
- Numerical Results -3
- Underflow exception -20
- Overflow exception -21
- --
- Related: COMB,PERM" "1BB02" :Usr) "xFACT" ("x --> x'" "Factorial (Gamma) Func
- --
- Returns the factorial n! of a
- positive integer argument n, or
- the gamma function \242(x+1) of a
- non-integer argument x.
- n \\-> n!
- x \\-> \242(x+1)
- 'sym' \\-> '(sym!)'
- --
- Flags: -3 -20 -21
- Numerical Results -3
- Underflow exception -20
- Overflow exception -21
- --
- Related: COMB,PERM" "1BB02" :Usr) "x%" ("x y --> xy/100" "Percent Func
- --
- Returns x (level 2) percent of y
- (level 1).
- x y \\-> xy/100
- x 'sym' \\-> '%(x,sym)'
- 'sym' x \\-> '%(sym,x)'
- 'sym1' 'sym2' \\-> '%(sym1,sym2)'
- x y_unit \\-> (xy/100)_unit
- x_unit y \\-> (xy/100)_unit
- 'sym' x_unit \\-> '%(sym,x_unit)'
- x_unit 'sym' \\-> '%(x_unit,sym)'
- --
- Flags:
- Numerical Results -3
- --
- Related: %CH,%T" "1C060" :Usr) "x*" ("x y --> x*y" "Multiply Analytic Func
- --
- Returns the product of the args.
- z1 z2 \\-> z1\267z2
- [[ mat ]] [ arr ] \\-> [[ mat\327arr ]]
- z [ arr ] \\-> [ z \327 array ]
- [ arr ] z \\-> [ arr \327 z ]
- z 'sym' \\-> 'z * sym'
- 'sym' z \\-> 'sym * z'
- 'sym1' 'sym2' \\-> 'sym1 * sym2'
- #n1 n2 \\-> #n'
- n1 #n2 \\-> #n'
- #n1 #n2 \\-> #n'
- x_u y_u \\-> xy_ux \327 unity
- x y_u \\-> xy_u
- x_u y \\-> xy_u
- 'sym' x_u \\-> 'sym * x_u'
- x_u 'sym' \\-> 'x_u * sym'
- --
- Flags: -3 -5 -6 -7 -8 -9 -10
- Numeric results -3
- bint wordsize -5 \\-> -10
- --
- Related: +,-,/,=" "1ADEE" :Usr) "x+" (" x y --> x+y
- . 38G: 036002 \\~%s\\ [Usr]" "Add Analytic Func
- --
- Returns the sum of the arguments.
- Addition. If one arg is list, insert element
- in list or concatenate lists. <REF>xADD
- z1 z2 \\-> z1+z2
- [ arr ]1 [ arr ]2 \\-> [ arr ]1+2
- z 'sym' \\-> 'z+(sym)'
- 'symb' z \\-> 'sym+z'
- 'sym1' 'sym2' \\-> 'sym1 + sym2'
- { lst1 } { lst2 } \\-> { lst1 lst2 }
- obj { o... } \\-> { obj o... }
- { o... } o \\-> { o... obj }
- \"str1\" \"str2\" \\-> \"str1str2\"
- obj \"str\" \\-> \"obj str\"
- \"str\" obj \\-> \"str obj\"
- #n1 n2 \\-> #n'
- n1 #n2 \\-> #n'
- #n1 #n2 \\-> #n'
- x1_u1 y_u2 \\-> (x2+y)_u2
- 'sym' x_u \\-> 'sym+x_u'
- x_u 'sym' \\-> 'x_u+sym'
- grob1 grob2 \\-> grob'
- --
- Flags: -3 -4 -5 -6 -7 -8 -9 -10
- Numeric results -3
- Bint wordsize -5 \\-> -10
- --
- Related: -,*,/,=" "1AB67" :Usr) "x-" ("x y --> x-y" "Subtract Analytic Func
- --
- Returns the difference of the
- arguments: the object in level 1
- is subtracted from the object in
- level 2.
- z1 z2 \\-> z1-z2
- [ arr ]1 [ arr ]2 \\-> [ arr ]1_2
- z 'sym' \\-> 'z-sym'
- 'sym' z \\-> 'sym-z'
- 'sym1' 'sym2' \\-> 'sym1 - sym2'
- #n1 n2 \\-> #n'
- n1 #n2 \\-> #n'
- #n1 #n2 \\-> #n'
- x1_u1 y_u2 \\-> (x2-y)_u2
- 'sym' x_u \\-> 'sym-x_u'
- x_u 'sym' \\-> 'x_u-sym'
- --
- Flags: -3
- Numeric results -3
- --
- Related: +,*,/,=" "1AD09" :Usr) "x/" ("x y --> x/y" "Divide Analytic Func
- --
- Returns the quotient of the
- arguments: the level 2 object
- divided by the level 1 object.
- (Abbrev. _u = _unit)
- z1 z2 \\-> z1 / z2
- [ arr ] [[ mat ]] \\-> [[mat^-1\327arr]]
- [ arr ] z \\-> [ arr / z ]
- z 'sym' \\-> 'z / sym'
- 'sym' z \\-> 'sym / z'
- 'sym1' 'sym2' \\-> 'sym1 / sym2'
- #n1 n2 \\-> #n'
- n1 #n2 \\-> #n'
- #n1 #n2 \\-> #n'
- x_u1 y_u2 \\-> (x/y)_u1/u2
- x y_u \\-> (x/y)_1/u
- x_u y \\-> (x/y)_u
- 'sym' x_u \\-> 'sym/x_u'
- x_u 'sym' \\-> 'x_u/sym'
- --
- Related: +,-,*,=,RATIO" "1AF05" :Usr) "x<" ("x y --> 1 \\n --> 0" "Less Than Func
- --
- Tests whether one object is less
- than another object.
- x y \\-> 0/1
- #n1 #n2 \\-> 0/1
- \"str1\" \"str2\" \\-> 0/1
- x 'sym' \\-> 'x<sym'
- 'sym' x \\-> 'sym<z'
- 'sym1' 'sym2' \\-> 'sym1<sym2'
- x_u1 y_u2 \\-> 0/1
- x_u 'sym' \\-> 'x_u<sym'
- 'sym' x_u \\-> 'sym<x_u'
- --
- Flags: -3
- Numeric results -3" "1EBBE" :Usr) "x=" ("x y --> x=y" "Makes equation out of two expressions.
- Equals Analytic Func
- --
- Returns an equation formed from
- the two arguments.
- z1 z2 \\-> 'z1=z2'
- z 'sym' \\-> 'z=sym'
- 'sym' z \\-> 'sym=z'
- 'sym1' 'sym2' \\-> 'sym1=sym2'
- y x_u \\-> 'y=x_u'
- y_u x \\-> 'y_u=x'
- y_u x_u \\-> 'y_u=x_u'
- 'sym' x_u \\-> 'sym=x_u'
- x_u 'sym' \\-> 'x_u=sym'
- --
- Flags: -3
- Numeric results -3
- --
- Related: DEFINE,EVAL,-" "1A8D8" :Usr) "x==" ("x y --> 1 \\n --> 0" "Logical Equality Func
- --
- Tests if two objects are equal.
- obj1 obj2 \\-> 0/1
- (x,0) x \\-> 0/1
- x (x,0) \\-> 0/1
- z 'sym' \\-> 'z==sym'
- 'sym' z \\-> 'sym==z'
- 'sym1' 'sym2' \\-> 'sym1==sym2'
- --
- Flags: -3
- Numeric results -3
- --
- Related: SAME,TYPE,<,\\<=,>,\\>=,\\=/" "1E972" :Usr) "x>" ("x y --> 1 \\n --> 0" "Greater Than Func
- --
- Tests whether one object is
- greater than another object.
- x y \\-> 0/1
- #n1 #n2 \\-> 0/1
- \"str1\" \"str2\" \\-> 0/1
- x 'sym' \\-> 'x>sym'
- 'sym' z \\-> 'sym>z'
- 'sym1' 'sym2' \\-> 'sym1>sym2'
- x_u1 y_u2 \\-> 0/1
- x_u 'sym' \\-> 'x_u>sym'
- 'sym' x_u \\-> 'sym>x_u'
- --
- Flags: -3
- Numeric results -3
- --
- Related: <,\\<=,\\>=,==,\\=/
- " "1EC5D" :Usr) "SAVPTR" (" D0 to RPLTOP
- D1 to DSKTOP
- B to RETTOP
- D to FREETOP
- Clear carry
- . 38G: 8121A \\$j%s\\ [ML]" "" "0679B" :ML) "GETPTR" ("<REF>SAVPTR in reverse
- Clears Carry." "" "067D2" :ML) "GETPTRLOOP" ("<REF>GETPTR , Loop to RPL" "" "05143" :ML) "D0=DSKTOP" ("Get new D0 from DSKTOP, uses A" "" "6384E" :ML) "D1=DSKTOP" ("Get new D1 from DSKTOP, uses C" "" "6385D" :ML) "AllowIntr" ("Allow interrupts." "" "010E5" :ML) "DisableIntr" ("Disable interrupts." "" "01115" :ML) "AINRTN" ("A=IN see also <REF>CINRTN
- For hardware reasons (bug)
- A=IN must be at even addr" "" "0115A" :ML) "CINRTN" ("C=IN see also <REF>AINRTN
- For hardware reasons (bug)
- C=IN must be at even addr" "" "01160" :ML) "DOMEMERR" ("Insufficient Memory error" "" "04FBB") "DOSIZEERR" ("Bad Argument Value error" "" "18CA7" :ML) "Errjmp" ("Error exit
- A.A = error number" "" "05023" :ML) "ErrjmpC" ("A=C.A <REF>Errjmp" "" "10F80" :ML) "GPErrjmpC" ("A=C.A <REF>GETPTR <REF>Errjmp" "" "10F40" :ML) "GPMEMERR" ("<REF>GETPTR <REF>DOMEMERR" "" "065AA" :ML) "argtypeerr" ("\"Bad Argument Type\"" "" "00202") "argvalerr" ("\"Bad Argument Value\"" "" "00203") "constuniterr" ("\"Inconsistent Units\"" "" "00B02") "infreserr" ("\"Infinite Result\"" "" "00305") "intrptderr" ("\"Interrupted\"" "" "00A03") "lowbaterr" ("\"Low Battery\"" "" "00C14") "negunferr" ("\"Negative Underflow\"" "" "00302") "ofloerr" ("\"Overflow\"" "" "00303") "portnotaverr" ("\"Port Not Avaliable\"" "" "0000A") "posunferr" ("\"Positive Underflow\"" "" "00301") "prtparerr" ("\"Invalid PRTPAR\"" "" "00C13") "timeouterr" ("\"Timeout\"" "" "00C02") "xferfailerr" ("\"Transfer Failed\"" "" "00C06") "DCHXW" ("Converts BCD in C.W to hex in
- A.W B.W C.W. See <REF>HXDCW
- Uses P CRY" "" "0D62F" :ML) "DIV5" ("C.A = C.A/5
- Uses A.10 C.10 D.10 P" "" "06A8E" :ML) "HXDCW" ("Converts hex in A.W to BCD in
- A.W B.W C.W. See <REF>DCHXW
- Uses P CRY" "Note that HXDCW wants the input
- in A but DCHXW wants it in C" "0DB91" :ML) "IntDiv" ("A.A/C.A -> A.A=remainder,
- C.A=quotient, uses D.A P SB" "" "03F24" :ML) "MPY" ("Multiply A.W and C.W (-> A.W=C.W)
- Uses D.W, SB. Returns carry clear" "" "53EE4" :ML) "MUL#" ("B.A = A.A*C.A" "" "03991" :ML) "STAB0" ("A.W -> R0
- B.W -> R1" "" "2BE61" :ML) "STAB2" ("A.W -> R2
- B.W -> R3" "" "2BE6F" :ML) "STCD0" ("C.W -> R0
- B.W -> R1" "" "2BE7D" :ML) "STCD2" ("C.W -> R2
- B.W -> R3" "" "2BE8B" :ML) "RCAB0" ("R0 -> A.W
- R1 -> B.W" "" "2BEB5" :ML) "RCAB2" ("R2 -> A.W
- R3 -> B.W" "" "2BEC0" :ML) "RCCD0" ("R0 -> C.W
- R1 -> D.W" "" "2BECB" :ML) "RCCD2" ("R2 -> C.W
- R3 -> D.W" "" "2BED6" :ML) "EXAB0" ("A.W <-> R0
- B.W <-> R1" "" "2BE99" :ML) "EXAB2" ("A.W <-> R2
- B.W <-> R3" "" "2BEA7" :ML) "XYEX" ("A:B <-> C:D" "" "2BE53" :ML) "DIVF" ("x=x/y" "" "2B977" :ML) "MULTF" ("x=x*y" "" "2B91E" :ML) "RADD1" ("x=x+1 see <REF>RADDF" "" "2B7B0" :ML) "RADDF" ("x=x+y" "" "2B7CA" :ML) "RSUB1" ("x=x-1 see <REF>RADDF" "" "2B7A7" :ML) "PACK" ("( x -> A )
- <REF>PACKSB without rounding" "" "29E46" :ML) "PACKSB" ("( x -> A )
- Converts %% to %.If SB is clear
- uses roundup, if set uses
- lowest nibble in % field to
- determine rounding direction.
- Obeys and sets flow
- flags/indicators" "" "29E21" :ML) "SPLITA" ("( A -> x ) Convert % to %%" "" "2BC4A" :ML) "SPLTAC" ("( A,C -> x, y )
- Convert 2 reals to long reals" "" "2BCA0" :ML) "ADJMEM" ("D= @FREETOP=<REF>ROOM / 5
- Uses A.10 B.10 C.10 D.10 <REF>DIV5" "" "069F7" :ML) "DOGARBAGE" ("If ST=1 10 then <REF>GPMEMERR
- else <REF>GARBAGECOL
- and <REF>GETPTR" "" "0554C" :ML) "GARBAGECOL" ("Garbage collection
- does not use R1..R4" "" "0613E" :ML) "ROOM" ("-> C.A = @DSKTOP-@RETTOP
- Uses A.A D0" "" "06806" :ML) "SKIPOB" ("Skip object in D0, clears ST1,
- clears carry, P=0
- --> D0 = addr past object
- Uses: A.A C.A P ST1 RSTK2" "" "03019" :ML) "MOVEDOWN" ("Copy downwards C.A nibbles from
- D0 to D1, D0 and D1 will point
- to the next locations
- Used: A.W C.A P
- Use this to move upwards" "" "0670C" :ML) "MOVERSD" ("Delete a block below RSK
- A.A=end C.A=nibbles
- Adjusts all refs, then <REF>ADJMEM
- Uses A.W B.A C.W D.10 D0 D1 P" "" "06992" :ML) "MOVERSU" ("Open a block below RSK
- A.A=start C.A=nibbles
- Adjusts all refs, then <REF>ADJMEM
- Uses A.W B.A C.10 D.10 D0 D1 P" "" "06A53" :ML) "MOVEDSD" ("Open a block above stack
- A.A=end C.A=nibbles
- Adjusts all refs, then <REF>ADJMEM
- Uses A.W B.A C.10 D.10 D0 D1 P" "" "06A1D" :ML) "MOVEDSU" ("Delete a block above stack
- A.A=start C.A=nibbles
- Adjusts all refs, then <REF>ADJMEM
- Uses A.W B.A C.10 D.10 D0 D1 P" "" "069C5" :ML) "MOVEUP" ("Copy upwards C.A nibbles from
- D0 to D1
- D0 D1 will point to start of
- area
- Used: A.W C.A P
- Use this to move downwards" "" "066B9" :ML) "CREATETEMP" ("Allocates C.A nibbles
- carry if not enough memory
- -> D0=bottom, D1=top of area
- -> B.A = C.A = @D1 = offset
- to previous tempob = #nibbles+6" "" "06AD8" :ML) "GETTEMP" ("<REF>CREATETEMP with
- <REF>GARBAGECOL if necessary
- <REF>GPMEMERR if not
- enough memory" "" "039BE" :ML) "MAKE$" ("Creates character string in
- tempob area Does SETHEX,
- C=C+C.A and then <REF>MAKE$N" "" "05B79" :ML) "MAKE$N" (" Creates character string in
- tempob area If not enough mem
- even after GC then memerr
- C.A = nibbles -> A=nibbles+5,
- B=nibbles+16 C=D1=addr of stack
- D0 = addr of body of $
- R0 = addr of $ Not used: R1-R4
- . 38G: 81148 \\$j%s\\ [ML]" "" "05B7D" :ML) "Clean$" ("Shrink strobj in top of TEMPOB
- R1=addr of length field
- A.A=new end address
- Uses A.W B.A C.W D.A D0 D1" "" "16683" :ML :UBS) "Clean$R0" ("R1=R0+5 <REF>Clean$" "" "16677" :ML :UBS) "Shrink$" ("Shrinks a strobj
- R0.A=->$ D0=end of $
- Uses A.W B.A C.W D.10 D0 D1" "" "16671" :ML) "DoCRC" ("Calculates the CRC of A.A nibs
- at D0. Returns CRC in A.A
- Uses C.W P" "Turns interrupts off and on" "05981" :ML) "DoCRCc" ("D0=C <REF>DoCRC" "" "0597E" :ML) "CKLBCRC" ("Check CRC of library at D0
- CC: Ok CS: CRC is wrong
- Uses A.A C.W D0 P" "Disables and re-enables interrupts" "0A00E" :ML) "WIPEOUT" ("Zeroes C.A nibbles at D1
- Uses A.W C.A P" "" "0675C" :ML) "GETRRP" ("Returns the RRP in which the
- object at A.A lies. If ob is
- SysRRP, returns CS and leaves
- A.A unchanged; else CC and
- A.A->RRP B.A->RAM-WORD
- Uses A.A B.A C.A D.A D0" "An RRP is a directory, the returned address
- points to the last-object-offset inside the
- directory. The SysRRP is the same as HOME." "083D1" :ML :UBS) "ANNCTRL2" ("Annunciator control
- [AON XTRA LA6 LA5]
- (on extra io busy)" "" "0010C" :ML :U) "ANNCTRL" ("Annunciator control
- [LA4 LA3 LA2 LA1]
- (alarm alpha -> <-)" "" "0010B" :ML) "CONTRAST" ("5 bit value for contrast.
- [CON3 CON2 CON1 CON0]" "" "00101" :ML :U) "CRC" ("4 nibbles for CRC.
- Every memory fetch updates CRC." "" "00104" :ML) "DISPADDR" ("Display start address
- write-only" "" "00120" :ML :U) "DISPTEST" ("High bit of contrast and
- display test bits." "" "00102" :ML :U) "LINEOFFS" ("3 nibble offset for display
- write-only" "" "00125" :ML :U) "LINECOUNT" ("Display line counter
- [LC3 LC2 LC1 LC0]
- and miscellaneous
- [DA19 M32 LC5 LC4]" "" "00128" :ML :U) "MENUADDR" ("Menu display start addr
- write-only" "" "00130" :ML :U) "POWERSTATUS" ("Low power registers" "" "00108" :ML :U) "POWERCTRL" ("Low power detection" "" "00109" :ML :U) "TIMER1" ("1 nibble timer
- decremented 16 times/s" "" "00137" :ML) "TIMER2" ("8 nibble timer
- decremented 8192 times/s" "" "00138" :ML) "TIMER1CTRL" ("TIMER1 control
- [SRQ WKE INT XTRA]" "" "0012E" :ML :U) "TIMER2CTRL" ("TIMER2 control
- [SRQ WKE INT TRUN]" "" "0012F" :ML :U) "$5x7" ("( D.A B.A C.A D0 D1 --> )
- Displays string body at D1 in
- grob at D0 C.A = chars B.A =
- xlocation D.A = row length in
- nibbles -> D1 = addr after $
- D0 = location of next char
- D.A = row length" "" "11D8F" :ML) "D0->Row1" ("( --> D0 )
- Gets addr of current display" "" "01C31" :ML) "D0->Sft1" ("( --> D0 )
- Gets address of menu grob" "" "01C58" :ML) "DispOn" ("Turns display on <REF>Dispoff" "" "01B8F" :ML) "DispOff" ("Turns display off <REF>Dispon" "" "01BBD" :ML) "grob!" ("R0,R1 = (row,col),
- D0 = grob1, D1 = grob2 -->
- Stores grob1 into grob2" "" "116B5" :ML :U) "makegrob" (" R0.A = x, R1.A = y
- --> D0 = body
- Makes a grob of size x,y
- Prolog is in D0-20
- . 38G: 81156 \\$j%s\\ [ML]" "" "115B3" :ML) "w->W" ("Calculates GROB width
- A.A=width in pixels
- -> A.A=width in nibbles" "Basically the same as 8 / CEIL 2 *
- since the width must be an even
- number of nibbles" "1165A" :ML) "DropLoop" ("Pop stack, Loop" "" "03249" :ML) "4DropLoop" ("Pop 4, Loop" "" "60F83" :ML) "GPOverWrALp" ("<REF>GETPTR , OverWr A, Loop" "" "03672" :ML) "GPOverWrR0Lp" ("<REF>GETPTR , OverWr R0, Loop" "" "0366F" :ML) "GPPushA" ("<REF>GETPTR , Push A, Clear Carry" "" "54266" :ML) "PopASavptr" ("Pop to A.A, <REF>SAVPTR" "" "3251C" :ML) "PopSavptr" ("Pop <REF>SAVPTR" "" "3251F" :ML) "PUSHA" ("Push A, Loop" "" "03A86" :ML) "GETPTRFALSE" ("<REF>GETPTR , Do FALSE" "" "26FAE" :ML) "GETPTRTRUE" ("<REF>GETPTR , Do TRUE" "" "25CE1" :ML) "GPOverWrFLp" ("<REF>GETPTR , OverWr FALSE, Loop" "" "62096" :ML) "GPOverWrTLp" ("<REF>GETPTR , OverWr TRUE, Loop" "" "62076" :ML) "GPOverWrT/FL" ("<REF>GETPTR , OverWr
- TRUE/FALSE, Loop" "" "62073" :ML) "GPPushFLoop" ("<REF>GETPTR , Push FALSE, Loop" "" "620D2" :ML) "GPPushFTLp" ("<REF>GETPTR , Loop to FalseTrue" "" "267D5" :ML) "GPPushTLoop" ("<REF>GETPTR , Push TRUE, Loop" "" "620B9" :ML) "GPPushT/FLp" ("<REF>GETPTR , Push TRUE/FALSE,
- Loop" "" "620B6" :ML) "OverWrFLoop" ("OverWr FALSE, Loop" "" "620A0" :ML) "OverWrTLoop" ("OverWr TRUE, Loop" "" "62080" :ML) "OverWrT/FLp" ("OverWr TRUE/FALSE, Loop" "" "6209D" :ML) "popflag" ("Pop to A.A,
- if TRUE then set carry" "" "61A02" :ML) "DOFALSE" ("Push FALSE, Loop" "" "620DC" :ML) "PushFLoop" ("Push FALSE, Loop" "" "620DC" :ML) "PushF/TLoop" ("Push FALSE (CRY)/TRUE, Loop" "" "620C0" :ML) "DOTRUE" ("Push TRUE, Loop" "" "620C3" :ML) "PushTLoop" ("Push TRUE, Loop" "" "620C3" :ML) "PushT/F" ("Push TRUE (CRY)/FALSE, Loop" "" "620D9" :ML) "PushT/FLoop" ("Push TRUE (CRY)/FALSE, Loop" "" "620D9" :ML) "PushFTLp" ("Loop to False/True" "" "267DC" :ML :U) "POP#" ("Pop # to A.A" "" "06641" :ML) "POP2#" ("( #1 #2 --> )
- Pop #1 to A.A and #2 to C.A" "" "03F5D" :ML) "PUSH#" ("<REF>GETPTR , Push R0 as #" "" "06537" :ML) "Push#Loop" ("<REF>SAVPTR , R0=A,
- <REF>PUSH# , Loop" "" "03DC7" :ML) "PUSH2#" ("<REF>GETPTR , Push R0 & R1 as #" "" "06529" :ML) "PUSH#LOOP" ("<REF>GETPTR , Push R0 as #, Loop" "" "0357F" :ML) "PUSH#ALOOP" ("<REF>GETPTR , Push A as #, Loop" "" "0357C" :ML) "Push2#Loop" ("<REF>GETPTR , Push R0 & R1
- as #, Loop" "" "03F14" :ML) "Push2#aLoop" ("<REF>GETPTR , Push R0 & A as #, Loop" "" "627EB" :ML) "Push#TLoop" ("<REF>GETPTR , Push R0 as #, Do TRUE" "" "036F7" :ML) "Push#FLoop" ("<REF>GETPTR , Push R0 as #, Do FALSE" "" "2E31F" :ML) "POPHXS" ("Pop hxs to A, <REF>SAVPTR ,
- Clear Carry" "" "53F8D" :ML :U) "POP2HXS" ("Pop hxs to C and hxs to A,
- <REF>SAVPTR , Clear Carry
- P has current wordsize." "" "53F77" :ML :U) "PUSHhxs" ("Push A.WP as hxs" "" "5422C" :ML) "PUSHhxsLoop" ("Push A.WP as hxs, Loop" "" "0596D" :ML) "POP1%SPLITA" ("( %pop -> x ) Pop %,
- convert to %%, <REF>SAVPTR" "" "29FD0" :ML) "POP1%" (" ( %pop -> A ) Pop %, <REF>SAVPTR
- . 38G: 811BF \\$j%s\\ [ML]" "" "29FDA" :ML) "POP2%" ("( %pop1 %pop2 -> A,C )
- Pop 2 reals, <REF>SAVPTR" "" "2A002" :ML) "PUSH%" ("( A -> %push )
- Push A as %, <REF>GETPTR" "" "2A188" :ML) "PUSH%LOOP" ("( A -> %push ) Push A as %,
- <REF>GETPTRLOOP" "" "2A23D" :ML) "POPC%" ("( C%pop -> A:C ) Pop C%
- (<REF>SETDEC )" "" "52AB7" :ML :UBS) "POPC%%" ("( C%%pop -> A:B C:D)
- Pop C%% (<REF>SETDEC )" "" "52B57" :ML :UBS) "PUSHC%" ("( A:C -> C%push ) Push C%" "" "52ADB" :ML :UBS) "PUSHC%%" ("( A:B:C:D -> C%%push )
- Push C%%" "" "52B95" :ML :UBS) "Attn?" ("Sets carry when ATTNFLG <> 0." "" "04988" :ML :U) "ATTNchk" ("ATTN exit check with restoreiram" "" "0CA60" :ML) "KeyInBuff?" ("Carry if true" "" "04999" :ML) "OnKeyDown?" ("Carry if true" "" "00C74" :ML) "OnKeyStable?" ("Carry if true" "" "00C80" :ML) "Flush" ("Flushes key buffer." "" "00D57" :ML) "FlushAttn" ("Flushes attn counter." "" "00D8E" :ML) "POPKEY" ("( -> C.A ) Sets carry if buffer
- is empty.Else returns key in
- C.B (and in @KEYSTORE)
- Uses: A.S C.S C.A D1 (sets P=0)" "" "04840" :ML) "SrvcKbdAB" ("( A.W -> ) Sets KEYSTATE and
- KEYBUFFER" "" "007B5" :ML) "ASRW5" ("ASR.W 5 times" "" "0D5E5" :ML) "ASLW5" ("ASL.W 5 times" "" "0D5F6" :ML) "CCSB1" ("Uses D.S to set SB, clears carry" "" "2BEE1" :ML) "clkspd" ("Measure CPU clock speed
- Interrupts off on entry and exit
- -> A.A=spd/16 B.A=loops/16s
- Uses C.A D0 P CRY" "" "018E2" :ML) "CSRW5" ("CSR.W 5 times" "" "0D607" :ML) "CSLW5" ("CSL.W 5 times" "" "0D618" :ML) "DeepSleep" ("Puts calc into \"deep sleep\"
- Low power mode, display off
- Wakeup on ON key or interrupt" "" "04292" :ML) "doskip" ("Exit to rpl SKIP" "" "5F090" :ML :U) "docola" ("Exit to rpl COLA" "" "5F09D" :ML :U) "GetStrLenStk" ("Pop $ -> C.A = length, D1 = body" "" "2FFB4" :ML) "GetStrLenC" ("D1 = C, <REF>GetStrLen" "" "2FFB7" :ML) "GetStrLen" ("D1=$ -> C.A = length,
- D1 = body" "" "2FFBA" :ML) "getwordsize" ("Fetches current word size to A,
- Clear Carry" "" "54021" :ML :U) "makebeep" ("C = msec, D = Hz
- Checks BEEP flag." "" "017A6" :ML) "liteslp" ("Puts calc into \"lite sleep\"
- Low power mode with display on
- Wakeup on any key or interrupt" "" "04929" :ML) "DOARRY" ("Array prologue
- 5 size
- 5 prologue of objects
- 5 # of dimensions
- 5n dimensions
- .. objects (content only)" "" "029E8") "DOBAK" ("Backup prologue
- 5 size
- 2 # of chars in name
- .. name
- .. object
- 5 DOBINT
- 5 CRC" "Apparently unused on the 49" "02B62") "DOBINT" ("BINT prologue
- 5 number (hex)" "" "02911") "DOCHAR" ("Character prologue
- 2 character" "" "029BF") "DOCMP" ("Complex number prologue
- 3 real exponent
- 12 real mantissa
- 1 real sign
- 3 complex exponent
- 12 complex mantissa
- 1 complex sign" "" "02977") "DOCODE" ("Code prologue
- 5 length
- .. machine code" "" "02DCC") "DOCOL" ("Secondary prologue
- .. objects
- 5 SEMI" "" "02D9D") "DOCSTR" ("String prologue
- 5 length
- .. characters" "" "02A2C") "DOECMP" ("Long complex prologue
- 5 real exponent
- 15 real mantissa
- 1 real sign
- 5 complex exponent
- 15 complex mantissa
- 1 complex sign" "" "0299D") "DOEREL" ("Long real prologue
- 5 exponent
- 15 mantissa
- 1 sign" "" "02955") "DOEXT" ("Unit object prologue
- .. object (usually a real)
- .. unit
- 5 SEMI" "" "02ADA") "DOHXS" ("HXS prologue
- 5 length
- .. hex digits, reverse order" "" "02A4E") "DOHSTR" ("HXS prologue
- 5 length
- .. hex digits, reverse order" "" "02A4E") "DOIDNT" ("Global name (ID) prologue
- 2 # of characters
- .. characters" "" "02E48") "DOLAM" ("Local name (LAM) prologue
- see <REF>DOIDNT" "" "02E6D") "DOLNKARRY" ("Linked array prologue" "Not used by the system." "02A0A") "DOLIB" ("Library prologue" " 5 size
- 2 # of characters
- .. name
- 2 # of characters (unless 0)
- 3 library ID
- 5 hash table offset
- 5 message table offset
- 5 link table offset
- 5 config object offset
- .. contents
- 4 CRC
-
- XLIBs:
- 1 or 3: kind
- 3 library ID
- 3 command ID
- .. object
- --
- <REF>TEXT:Libraries" "02B40") "DOLIST" ("List prologue
- see <REF>DOCOL" "" "02A74") "DOREAL" ("Real number prologue
- 3 exponent
- 12 mantissa
- 1 sign" "" "02933") "DOROMP" ("XLIB prologue
- 3 library ID
- 3 command #" "" "02E92") "DORRP" ("Directory prologue" " Home directory:
- 3 # of attached libs
- n*[
- 3 library ID
- 5 address of hash table
- 5 address of message table
- ]
- 5 offset of last object
- *[
- 5 offset to previous object
- 00000 for the first one
- 2 # of characters
- .. name of object
- 2 # of characters
- .. object
- ]
-
- Subdirectories:
- 3 # of attached library
- 7FF if none
- 5 offset of last object
- .. same as above" "02A96") "DOSYMB" ("Symbolic prologue
- .. objects
- 5 SEMI" "" "02AB8") "DOTAG" ("Tagged object prologue
- 2 # of chars in tag
- .. tag
- .. object" "" "02AFC") "DOEXT0" ("" "" "02B88") "DOACPTR" ("" "" "02BAA") "DOEXT1" ("" "" "02BAA") "DOEXT2" ("" "" "02BCC") "DOEXT3" ("" "" "02BEE") "DOEXT4" ("" "" "02C10") "AVMEM" ("Free mem / 5 (5)" "" "807ED" :RAM) "DSKTOP" ("->Data stack" "" "806F8" :RAM) "RSKTOP" ("->Return stack" "" "806F3" :RAM) "OBUPSTART" ("->RPL runstream" "" "8072F" :RAM) "INTRPPTR" ("->RPL runstream" "" "8072F" :RAM) "TEMPOB" ("->Beginning of TempOb area" "" "806E9" :RAM) "TEMPTOP" ("->End of TempOb area" "" "806EE" :RAM) "USEROB" ("->UserOb Area (HOME)" "" "80711" :RAM) "ADISP" ("->Stack grob" "" "806D5" :RAM) "GDISP" ("->Blackboard grob" "" "806E4" :RAM) "SYSUPSTART" ("->Display grob" "" "806DA" :RAM) "VDISP1" ("->Display grob" "" "806DA" :RAM) "VDISP" ("->Display grob" "" "806DA" :RAM) "VDISP2" ("->Menu grob" "" "806D0" :RAM) "VDISP3" ("->Not displayed grob <REF>VDISP" "" "806DF" :RAM) "ANNUNCIATORS" ("Annunciator flags (2)" "" "80841" :RAM) "Ann_Susp.b" ("" "" "00004" :RAM) "Ann_Shift.b" ("" "" "00010" :RAM) "Ann_RAD.b" ("" "" "00001" :RAM) "Ann_IO.b" ("" "" "00002" :RAM) "Ann_Busy.b" ("" "" "00080" :RAM) "Ann_Alpha.b" ("" "" "00040" :RAM) "Ann_Alert.b" ("" "" "00008" :RAM) "Ann_ALT.b" ("" "" "00020" :RAM) "INTRAM" ("Save area for the interrupt sys
- (16)" "" "805DB" :RAM) "R1[A]save" ("Used by PrintLCD inside the
- interrupt system (5)" "" "806C0" :RAM) "R2[A]save" ("<REF>R1[A]save (5)" "" "806BA" :RAM) "R2[S]save" ("<REF>R1[A]save (1)" "" "806BF" :RAM) "SAVECLK" ("Save of CLKON state (1)" "" "80831" :RAM) "SAVECROSS" ("cursor moves in plotting (10)" "" "808D8" :RAM) "SAVE_A" ("<REF>INTRAM (16)" "" "805F5" :RAM) "SAVE_B" ("<REF>INTRAM (16)" "" "80608" :RAM) "SAVE_C[A]" ("<REF>INTRAM (5)" "" "805F0" :RAM) "SAVE_BO" ("Save BitOffset (1)" "" "806C5" :RAM) "SAVE_D" ("<REF>INTRAM (16)" "" "80618" :RAM) "SAVE_D0" ("<REF>INTRAM (5)" "" "8063D" :RAM) "SAVE_LC" ("Save LineCount (2)" "" "806C6" :RAM) "SAVE_LN" ("Save LineNibs (3)" "" "806C8" :RAM) "SAVE_MODES" ("<REF>INTRAM (5)" "" "805EB" :RAM) "SAVE_OFFSET" ("Save Window Offset (5)" "" "806CB" :RAM) "SAVE_PC" ("<REF>INTRAM (5)" "" "80638" :RAM) "SAVE_R0" ("<REF>INTRAM (16)" "" "80628" :RAM) "SAVE_ST" ("<REF>INTRAM (3)" "" "80605" :RAM) "Stk0save" ("RSTK0 used by PrintLCD inside
- the interrupt sys (5)" "" "8069C" :RAM) "Stk1save" ("RSTK1 <REF>Stk0save (5)" "" "806A1" :RAM) "Stk2save" ("RSTK2 <REF>Stk0save (5)" "" "806A6" :RAM) "Stk3save" ("RSTK3 <REF>Stk0save (5)" "" "806AB" :RAM) "Stk4save" ("RSTK4 <REF>Stk0save (5)" "" "806B0" :RAM) "Stk5save" ("RSTK5 <REF>Stk0save (5)" "" "806B5" :RAM) "SystemFlags" ("128 System flags (16)" "" "80843" :RAM) "UserFlags" ("128 User Flags (16)" "" "80853" :RAM) "SysNib1" ("ISysFlags 1" "" "80801" :RAM) "NoRolDA2MASK" ("DA2 can't be rolled up to become
- valid <REF>SysNib1" "" "00101" :RAM) "AbbrStkMASK" ("Display obj types only
- <REF>SysNib1" "" "00201" :RAM) "DA2bIsEdMASK" ("DA2b shows the edit line
- <REF>SysNib1" "" "00401" :RAM) "IgnorAlmMASK" ("Ignore <REF>ALARMSDUE in <REF>GETKEY
- <REF>SysNib1" "" "00801" :RAM) "SysNib2" ("ISysFlags 2" "" "80802" :RAM) "ReqClkOnMASK" ("Flag for System Request of CLKON
- state <REF>SysNib2" "" "00102" :RAM) "ServModeMASK" ("Server mode on <REF>SysNib2" "" "00202" :RAM) "TrackMASK" ("New context needs to be compared
- with old <REF>SysNib2" "" "00402" :RAM) "BadMenuMASK" ("Menu system corrupt <REF>SysNib2" "" "00802" :RAM) "SysNib3" ("ISysFlags 3" "" "80803" :RAM) "UNDOMASK" ("Automatic stack save <REF>SysNib3" "" "00103" :RAM) "INSERTMASK" ("Insert/replace mode <REF>SysNib3" "" "00203" :RAM) "ALGMASK" ("Algebraic entry mode <REF>SysNib3" "" "00403" :RAM) "PRINTINGMASK" ("<REF>SysNib3" "" "00803" :RAM) "SysNib4" ("ISysFlags 4" "" "80804" :RAM) "DA2aTempMASK" ("DA2a temporarily valid <REF>SysNib4" "" "00104" :RAM) "DA2bTempMASK" ("DA2b temporarily valid <REF>SysNib4" "" "00204" :RAM) "DA3TempMASK" ("DA3 temporarily valid <REF>SysNib4" "" "00404" :RAM) "RebuildMASK" ("Menu requires TOUCHTAB rebuild
- each time it is redisplayed
- <REF>SysNib4" "" "00804" :RAM) "SysNib5" ("ISysFlags 5" "" "80805" :RAM) "COMMANDMASK" ("CMD history enabled <REF>SysNib5" "" "00105" :RAM) "BLINKMASK" ("Active Timer1 Int's <REF>SysNib5" "" "00205" :RAM) "LOWERMASK" ("Lowercase keys <REF>SysNib5" "" "00405" :RAM) "STKDCMASK" ("Decompilation for stack display
- (not editing) <REF>SysNib5" "" "00805" :RAM) "SysNib6" ("ISysFlags 6" "" "80806" :RAM) "Do1UserMASK" ("One-key user mode <REF>SysNib6" "" "00106" :RAM) "ASuspOKMASK" ("Suspending current environment
- is allowed <REF>SysNib6" "" "00206" :RAM) "BadPOLUIMASK" ("POL UI possibly corrupt <REF>SysNib6" "" "00406" :RAM) "DA1TempMASK" ("DA1 temporarily valid <REF>SysNib6" "" "00806" :RAM) "SysNib7" ("ISysFlags 7" "" "80807" :RAM) "DA1ValidMASK" ("DA1 known to be valid <REF>SysNib7" "" "00107" :RAM) "DA2aValdMASK" ("DA2a known to be valid <REF>SysNib7" "" "00207" :RAM) "DA2bValdMASK" ("DA2b known to be valid <REF>SysNib7" "" "00407" :RAM) "DA3ValidMASK" ("DA3 known to be valid <REF>SysNib7" "" "00807" :RAM) "SysNib8" ("ISysFlags 8" "" "80808" :RAM) "DA1NoChMASK" ("DA1 not changed <REF>SysNib8" "" "00108" :RAM) "DA2aNoChMASK" ("DA2a not changed <REF>SysNib8" "" "00208" :RAM) "DA2bNoChMASK" ("DA2b not changed <REF>SysNib8" "" "00408" :RAM) "DA3NoChMASK" ("DA3 not changed <REF>SysNib8" "" "00808" :RAM) "SysNib9" ("ISysFlags 9" "" "80809" :RAM) "DA1BadMASK" ("DA1 invalid <REF>SysNib9" "" "00109" :RAM) "DA2aBadMASK" ("DA2a invalid <REF>SysNib9" "" "00209" :RAM) "DA2bBadMASK" ("DA2b invalid <REF>SysNib9" "" "00409" :RAM) "DA3BadMASK" ("DA3 invalid <REF>SysNib9" "" "00809" :RAM) "EDITLFLAG" ("ISysFlags 10" "" "8080A" :RAM) "EDITFLAG" ("ISysFlags 10" "" "8080A" :RAM) "SysNib10" ("ISysFlags 10" "" "8080A" :RAM) "EDITLMASK" ("Edit line exists <REF>SysNib10" "" "0010A" :RAM) "NAppKeyMASK" ("Non-app keys allowed in POL <REF>SysNib10" "" "0020A" :RAM) "NUsrKeyMASK" ("Non-user keys allowed in USR mode
- <REF>SysNib10" "" "0040A" :RAM) "AppModeMASK" ("POL application running <REF>SysNib10" "" "0080A" :RAM) "ParenModFLAG" ("ISysFlags 11" "" "8080B" :RAM) "SysNib11" ("ISysFlags 11" "" "8080B" :RAM) "ParenModMASK" ("Implicit parenthesized \"/\", \"^\",
- and \"SQRT\" in EQW <REF>SysNib11" "" "0010B" :RAM) "1PDCMASK" ("Partial DeCompile info will not
- be saved <REF>SysNib11" "" "0020B" :RAM) "NewEditLMASK" ("New one-line edit line has been
- created <REF>SysNib11" "" "0040B" :RAM) "DoStdKeyMASK" ("Do only standard keys <REF>SysNib11" "" "0080B" :RAM) "SysNib12" ("ISysFlags 12" "" "8080C" :RAM) "DispTimeMASK" ("Status bar clock may be displayed
- <REF>SysNib12" "" "0010C" :RAM) "NOP2MASK12" ("unused <REF>SysNib12" "" "0020C" :RAM) "NOP4MASK12" ("unused <REF>SysNib12" "" "0040C" :RAM) "NOP8MASK12" ("unused <REF>SysNib12" "" "0080C" :RAM) "SysNib13" ("ISysFlags 13" "" "8080D" :RAM) "NOP1MASK13" ("unused <REF>SysNib13" "" "0010D" :RAM) "NOP2MASK13" ("unused <REF>SysNib13" "" "0020D" :RAM) "NOP4MASK13" ("unused <REF>SysNib13" "" "0040D" :RAM) "NOP8MASK13" ("unused <REF>SysNib13" "" "0080D" :RAM) "SysNib14" ("" "" "8080E" :RAM) "SizeMLDisp" ("" "" "8080E" :RAM) "NOP1MASK14" ("unused <REF>SysNib14" "" "0010E" :RAM) "NOP2MASK14" ("unused <REF>SysNib14" "" "0020E" :RAM) "NOP4MASK14" ("unused <REF>SysNib14" "" "0040E" :RAM) "NOP8MASK14" ("unused <REF>SysNib14" "" "0080E" :RAM) "SysNib15" ("ISysFlags 15" "" "8080F" :RAM) "NOP1MASK15" ("TOL UI potentially corrupt
- <REF>SysNib15" "" "001CE" :RAM) "BadTOLUIMASK" ("TOL UI potentially corrupt
- <REF>SysNib15" "" "001CE" :RAM) "NOP2MASK15" ("EVAL-> will not create a list nor
- return NOVAL <REF>SysNib15" "" "002CE" :RAM) "NoAlgProcess" ("EVAL-> will not create a list nor
- return NOVAL <REF>SysNib15" "" "002CE" :RAM) "NOP4MASK15" ("<REF>SysNib15" "" "004CE" :RAM) "InSimplyExpr" ("<REF>SysNib15" "" "004CE" :RAM) "NOP8MASK15" ("<REF>SysNib15" "" "008CE" :RAM) "DoCreateMenu" ("<REF>SysNib15" "" "008CE" :RAM) "SysNib16" ("ISysFlags 16 (unused)" "" "80810" :RAM) "NOP1MASK16" ("<REF>SysNib16" "" "00110" :RAM) "NOP2MASK16" ("<REF>SysNib16" "" "00210" :RAM) "NOP4MASK16" ("<REF>SysNib16" "" "00410" :RAM) "NOP8MASK16" ("<REF>SysNib16" "" "00810" :RAM) "SysNib17" ("ISysFlags 17 (unused)" "" "80811" :RAM) "NOP1MASK17" ("<REF>SysNib17" "" "00111" :RAM) "NOP2MASK17" ("<REF>SysNib17" "" "00211" :RAM) "NOP4MASK17" ("<REF>SysNib17" "" "00411" :RAM) "NOP8MASK17" ("<REF>SysNib17" "" "00811" :RAM) "SysNib18" ("ISysFlags 18 (unused)" "" "80812" :RAM) "NOP1MASK18" ("<REF>SysNib18" "" "00112" :RAM) "NOP2MASK18" ("<REF>SysNib18" "" "00212" :RAM) "NOP4MASK18" ("<REF>SysNib18" "" "00412" :RAM) "NOP8MASK18" ("<REF>SysNib18" "" "00812" :RAM) "SysNib19" ("ISysFlags 19 (unused)" "" "80813" :RAM) "NOP1MASK19" ("<REF>SysNib19" "" "00113" :RAM) "NOP2MASK19" ("<REF>SysNib19" "" "00213" :RAM) "NOP4MASK19" ("<REF>SysNib19" "" "00413" :RAM) "NOP8MASK19" ("<REF>SysNib19" "" "00813" :RAM) "SysNib20" ("ISysFlags 20 (unused)" "" "80814" :RAM) "NOP1MASK20" ("<REF>SysNib20" "" "00114" :RAM) "NOP2MASK20" ("<REF>SysNib20" "" "00214" :RAM) "NOP4MASK20" ("<REF>SysNib20" "" "00414" :RAM) "NOP8MASK20" ("<REF>SysNib20" "" "00814" :RAM) "FAILSTK1" ("Warmstart log 1st (newest)
- entry (18)" "Each entry consists of a one-nibble
- cause (as displayed by WSLOG), a
- 13-nibble time stamp and a 4-nibble
- CRC of the previous 14 nibbles." "80010" :RAM) "FAILSTK2" ("<REF>FAILSTK1 2nd entry (18)" "" "80022" :RAM) "FAILSTK3" ("<REF>FAILSTK1 3rd entry (18)" "" "80034" :RAM) "FAILSTK4" ("<REF>FAILSTK1 4th entry (18)" "" "80046" :RAM) "CR_COUNT" ("# of newlines in editline (5)" "" "8086A" :RAM) "CURSOREPOSN" ("Cursor editline position (5)" "" "80882" :RAM) "CURSOR" ("Cursor editline position (5)" "" "80882" :RAM) "CURSORCHR" ("Char under Cursor (2)" "" "8088F" :RAM) "CURSORGROB" ("Cursor Grob Data (40)" "" "80891" :RAM) "CURSORPOSN" ("Cursor position from left of
- screen (2)" "" "8088C" :RAM) "CURSOROFFSET" ("Cursor position from left of
- screen (2)" "" "8088C" :RAM) "CURSORROW" ("Cursor display row (5)" "" "80887" :RAM) "CURSORPART" ("Cursor display row (5)" "" "80887" :RAM) "CURSORSTATE" ("Show cursor/char underneath (1)" "" "8088E" :RAM) "CURSORX" ("Pxl X-Coord of Cursor (5)" "" "808B9" :RAM) "CURSORY" ("Pxl Y-Coord of Cursor (5)" "" "808BE" :RAM) "EDITLINE" ("->Command line" "" "806FD" :RAM) "AppCount" ("# of nested POLs (2)" "" "80815" :RAM) "AppDisplay" ("->App display object" "" "80784" :RAM) "AppError" ("->App error handler" "" "80793" :RAM) "AppExitCond" ("->App exit condition" "" "8078E" :RAM) "AppKeys" ("->App key assignments" "" "80789" :RAM) "uart_buf_end" ("# of bytes in the UART buffer (2)" "" "80519" :RAM) "uart_buf_st" ("UART buffer offset (2)" "" "8051C" :RAM) "uart_buffer" ("UART buffer area (512)" "" "80319" :RAM) "uart_error" ("UART error flag (1)" "" "8051B" :RAM) "uart_handshk" ("UART handshake (1)" "" "8051E" :RAM) "uart_modes" ("UART mode (1)" "" "8051F" :RAM) "uart_parity" ("(1)" "" "80520" :RAM) "uart_timeout" ("(2)" "" "80521" :RAM) "FlashROMPTAB" ("Library table (3+n*16)" "Header:
- 3 number of libraries
- For each library:
- 3 library ID
- 5 address
- 5 switch routine (0 if none)
- 3 000" "809A3" :RAM) "RESRAMEND" ("Library table (3+n*16)" "Header:
- 3 number of libraries
- For each library:
- 3 library ID
- 5 address
- 5 switch routine (0 if none)
- 3 000" "809A3" :RAM) "ROMPTAB" ("Library table (3+n*16)" "Header:
- 3 number of libraries
- For each library:
- 3 library ID
- 5 address
- 5 switch routine (0 if none)
- 3 000" "809A3" :RAM) "IRAMHOMEmsn" ("MSN of the IRAM base address" "" "00008" :RAM) "LOCUPSIZE" ("Number of variables between
- <REF>SYSUPSTART and <REF>OBUPSTART" "" "00011" :RAM) "OBUPSIZE" ("Number of variables between
- <REF>OBUPSTART and <REF>OBUPEND" "" "00025" :RAM) "ParenModmask" ("" "" "00001" :RAM) "mEditLExists" ("" "" "00001" :RAM) "SYSUPSIZE" ("<REF>OBUPSIZE + <REF>LOCUPSIZE" "" "00036" :RAM) "ACCUM" ("(1)" "" "80912" :RAM) "ALARMS" ("->System Alarm List (5)" "" "8072A" :RAM) "ALARMSDUE" ("Flags Alarm Due (1)" "" "80832" :RAM) "ALARM#" ("" "" "80836" :RAM) "ATTNFLG" ("Counts ON presses (5)" "" "807F7" :RAM) "AccessInit" ("Saved value of INITEN & sALLOWINTR (2)" "" "800E6" :RAM) "RAMSTART" ("Quick RAM corrupt check (5)" "" "80000" :RAM) "HARDROMEND" ("Quick RAM corrupt check (5)" "" "80000" :RAM) "CMOS" ("Quick RAM corrupt check (5)" "" "80000" :RAM) "COLCOUNT" ("Dot Cols on line (2)" "" "80922" :RAM) "COLWIDTH" ("(2)" "" "80914" :RAM) "CONFRAM" ("RAM configuration (7)" "Port1:
- 1 Status [r w s 0]
- 1 Size/Address Code
- Port2:
- 1 Status [r w s 0]
- 1 Size/Address Code
- where r=readable, w=writable,
- s=system RAM
- 2 #banks
- 1 ID" "80524" :RAM) "CONFTAB" ("RAM configuration with CRC (11)" "4 nibbles for CRC
- 7 nibbles as in CONFRAM" "8052B" :RAM) "CONTEXT" ("->Current dir" "" "8071B" :RAM) "COVERsave" ("Save area for G/DoCovered (10)" "" "800EB" :RAM) "COVERstate" ("Iram state before uncovering (3)" "" "800E8" :RAM) "TIMEOUTCLK" ("ScratchPad (4)" "" "80076" :RAM) "CSPEED" ("CPU speed (16hz units) (5)" "" "80655" :RAM) "CURRENTMENU" ("Menu ID of current menu (2)" "" "808C3" :RAM) "ClkOnNib" ("Clock display on/off (1)" "" "8091B" :RAM) "CtlAlarm" ("->Control alarm data" "" "80798" :RAM) "DEPTHSAVE" ("Saved user stack depth (5)" "" "8081D" :RAM) "HANDSHK" ("Keyboard handshake (1)" "" "8065B" :RAM) "DISABLE_KBD" ("Keyboard handshake (1)" "" "8065B" :RAM) "DISP1CTLg" ("Ghost for DISP1CTL (5)" "" "8068D" :RAM) "DISP2CTLg" ("Ghost for DISP2CTL (5)" "" "80695" :RAM) "DOLPENV" ("->DO LOOP environments" "" "80707" :RAM) "DOUSEALARM" ("Flags Deactivate Curr Alarm (1)" "" "80834" :RAM) "DREND" ("Display Refresh Hi Bound (5)" "" "8064A" :RAM) "DRSTART" ("Display Refresh Lo Bound (5)" "" "80645" :RAM) "DcompWidth" ("String Decomp Width (2)" "" "808EE" :RAM) "DelayCt" ("REDEYE Print time/line (2)" "" "8091E" :RAM) "ELEMENT" ("decompile obj depth counter (2)" "" "80863" :RAM) "ENTRWISE" ("(1)" "" "80916" :RAM) "ERROR" ("(5)" "" "807F2" :RAM) "EXITMSG" ("->msg set by user in EXIT word" "" "8077F" :RAM) "EqPtr" ("Points to Curr Eqn in EqList (5)" "" "8094C" :RAM) "FIRSTCHAR" ("offset to 1st visible (5)" "" "80865" :RAM) "FIRSTPROC" ("->StartupProc Secondary (5)" "" "807FC" :RAM) "FONTCOUNT" ("counter (3)" "" "808F2" :RAM) "FONTHEIGHT" ("font-height selector (1)" "" "808F0" :RAM) "FONTWIDTH" ("font-width selector (1)" "" "808F1" :RAM) "FailTime" ("SelfTest Fail Time (Ticks) (13)" "" "80085" :RAM) "FifoByteCt" ("Sum of FIFO Line Counts (2)" "" "8092A" :RAM) "GARBSCRATCH1" ("Saves 1 RSTK level in G.C. (5)" "" "808CE" :RAM) "GARBSCRATCH2" ("Saves counter in G.C. (5)" "" "808D3" :RAM) "GCOLCOUNT" ("Graphics #Cols (2)" "" "80920" :RAM) "IRAMBEND" ("(11)" "" "8030E" :RAM) "GraphPrtHook" ("(11)" "" "8030E" :RAM) "HARDRAMEND" ("IRAM Home ends at #7FFFF" "Appears to be an obsolete constant
- from the 48G, where IRAM was only
- 32kB big and thus ranged from
- #80000 to #8FFFF. The description
- even seems to come from the 48S!" "90000" :RAM) "HISTORY1" ("-> $ with the most recent CMD
- history entry" "" "8075C" :RAM) "HISTORY2" ("->2nd entry <REF>HISTORY1" "" "80761" :RAM) "HISTORY3" ("->3rd entry <REF>HISTORY1" "" "80766" :RAM) "HISTORY4" ("->4th (oldest) entry <REF>HISTORY1" "" "8076B" :RAM) "HISTORYLEVEL" ("which stack level is next (1)" "" "8087A" :RAM) "HOMEMASK" ("Home Size of RAM (mask) (5)" "" "8000A" :RAM) "HRAMEND" ("M.S.N. of size of RAM chip (1)" "" "8000F" :RAM) "INITEN" ("Warmstart Enable flag (1)" "" "8065A" :RAM) "KEYBUFFER" ("Key Buffer (max 15 keys). (34)" "" "80669" :RAM) "INPUTSTREAM" ("Key Buffer (max 15 keys). (34)" "" "80669" :RAM) "IOCNIB" ("Saves IOC in OUTUART (1)" "" "80523" :RAM) "IOCsave" ("Save of IOC before change (1)" "" "80927" :RAM) "IOSAVE" ("Saves HiNib of ANNCTRL (1)" "" "80654" :RAM) "IRAMBSIZE" ("Size of <REF>IRAMBUFF" "" "00219" :RAM) "IRAMBUFF" ("Exec Buff (code under IRAM) (537)" "" "800F5" :RAM) "IRAMBUFF2" ("<REF>IRAMBUFF +50" "" "80127" :RAM) "IRAMMASK" ("IRAM Size Config Mask (5)" "" "80005" :RAM) "IREG" ("Saves Interrupt History (3)" "" "8064F" :RAM) "ITEM1LINES" ("# display lines currently (1)" "" "80817" :RAM) "ITEM1STATE" ("->list of lists describing stack
- level 1" "" "80757" :RAM) "PDCSYMB" ("->Kermit error message" "" "80775" :RAM) "KERMERRM" ("->Kermit error message" "" "80775" :RAM) "KERMMODE" ("Kermit Mode information (1)" "" "808ED" :RAM) "KEYLIST" ("(5)" "" "8090C" :RAM) "KEYLOCK" ("(1)" "" "80911" :RAM) "KEYSTATE" ("location of kbd state (16)" "" "8065C" :RAM) "KeyOb" ("->Pending key-object" "" "807DE" :RAM) "KeyRomPtr0" ("RomPtr for KeyOb (11)" "" "80951" :RAM) "KeyRomPtr1" ("RomPtr for MenuKey 1 (11)" "" "8095C" :RAM) "KeyRomPtr2" ("RomPtr for MenuKey 2 (11)" "" "80967" :RAM) "KeyRomPtr3" ("RomPtr for MenuKey 3 (11)" "" "80972" :RAM) "KeyRomPtr4" ("RomPtr for MenuKey 4 (11)" "" "8097D" :RAM) "KeyRomPtr5" ("RomPtr for MenuKey 5 (11)" "" "80988" :RAM) "KeyRomPtr6" ("RomPtr for MenuKey 6 (11)" "" "80993" :RAM) "LASTARG1" ("->1st argument saved in CK<n>" "" "80739" :RAM) "LASTARG" ("->1st argument saved in CK<n>" "" "80739" :RAM) "LASTARG2" ("->2nd <REF>LASTARG" "" "8073E" :RAM) "LASTARG3" ("->3rd <REF>LASTARG" "" "80743" :RAM) "LASTARG4" ("->4th <REF>LASTARG" "" "80748" :RAM) "LASTARG5" ("->5th <REF>LASTARG" "" "8074D" :RAM) "LASTARGCOUNT" ("# of args saved by CK<n> (1)" "" "8087B" :RAM) "LASTARGf" ("Flag #Args>3 (1)" "" "8087C" :RAM) "LASTERROR" ("Save area for error number (5)" "" "8087D" :RAM) "LASTLAST?" ("true if lastkey was last hit (1)" "" "80879" :RAM) "LASTOP" ("3-state encoding of operand/
- unary/binary (1)" "" "808FB" :RAM) "LASTROMWDOB" ("->Last user-level ROM-WORD
- evaluated (set by CK<n>)" "" "807D9" :RAM) "LEFTTREE" ("(3)" "" "808FC" :RAM) "LINECOUNTg" ("Ghost for LINECOUNT (2)" "" "8069A" :RAM) "LINENIBSg" ("Ghost for LINENIBS (3)" "" "80692" :RAM) "LPD_HIST" ("Low Power Detect History (1)" "" "80840" :RAM) "LabelDef" ("->How to make menu labels" "" "807B1" :RAM) "LastContext" ("->RRP saved for CheckContext" "" "807CA" :RAM) "LastMenuDef" ("->Last menu definition" "" "807A2" :RAM) "LastMenuRow" ("(5)" "" "8099E" :RAM) "LastPrntTime" ("Time (Upper 11 nibs) (11)" "" "8092C" :RAM) "LineByteCt" ("Line Byte Counter (2)" "" "80928" :RAM) "LoBatTime" ("Flag periodic ((*)) updates (1)" "" "80077" :RAM) "MENULEVEL" ("User-menu level (5)" "" "808C5" :RAM) "MenuData" ("->Menu data for touch table" "" "807A7" :RAM) "MenuDef" ("->Current menu definition" "" "8079D" :RAM) "MenuExitAct" ("->Menu exit action definition" "" "807D4" :RAM) "MenuKeyLS" ("->Left-shift menu key handler" "" "807BB" :RAM) "MenuKeyNS" ("->No-shift menu key handler" "" "807B6" :RAM) "MenuKeyRS" ("->Right-shift menu key handler" "" "807C0" :RAM) "MenuRow" ("(5)" "" "80947" :RAM) "MenuRowAct" ("->Prev/Next action definition" "" "807AC" :RAM) "NEXTIRQ" ("Time at next Timer2 int. (13)" "" "80058" :RAM) "NOALARMSRV" ("Flags Disable Alarm Service (1)" "" "80835" :RAM) "NODECOUNT" ("expr-tree node count (3)" "" "808F5" :RAM) "OBTREELEN" ("object length (3)" "" "808F8" :RAM) "OLDMENU" ("Saves previous menu number (2)" "" "808CA" :RAM) "ORghost" ("" "" "80642" :RAM) "SAVE_OR" ("" "" "80642" :RAM) "OB/EXP?" ("" "" "80913" :RAM) "OSAVE" ("" "" "80734" :RAM) "PADCOUNT" ("Indentation count for decomp (1)" "" "808CD" :RAM) "PADJSAVE1" ("Status save in PTRADJUST (1)" "" "808E2" :RAM) "PADJSAVE2" ("RSTK save in PTRADJUST (10)" "" "808E3" :RAM) "PAINTTREE" ("->hxs of \"textbook-mode\" graphics" "" "8077A" :RAM) "PARENCOUNT" ("(2)" "" "80917" :RAM) "PARENTTREE" ("(3)" "" "80902" :RAM) "PASTDUE" ("Flags Past Due Alarm (1)" "" "80833" :RAM) "PASTDUE#" ("" "" "8083B" :RAM) "PDCHXS" ("->hxs map of outermost symbolic" "" "80770" :RAM) "PFIFO" ("FIFO Buffer (16)" "" "80937" :RAM) "POPPEDKEY" ("Last Key from POPKEY (2)" "" "8068B" :RAM) "PORT0EOS" ("(5)" "" "80536" :RAM) "PORT1EOS" ("(5)" "" "8053B" :RAM) "PORT2EOS" ("(5)" "" "80540" :RAM) "PRECSTACK" ("Op Precedence textbook entry (7)" "" "80905" :RAM) "Port1CRC" ("CRC for Device in Port1 (4)" "" "800E2" :RAM) "PortStat" ("Copy of CARDSTAT Nib (1)" "" "800E1" :RAM) "PrtStatus" ("CPU Status Bits et al. (3)" "" "80924" :RAM) "SYSNOUPSTART" ("->End of RAM" "" "807E8" :RAM) "RAMEND" ("->End of RAM" "" "807E8" :RAM) "RIGHTTREE" ("(3)" "" "808FF" :RAM) "RNSEED" ("Random number seed (15)" "" "80822" :RAM) "ROMPARTS" ("->RomParts Area" "" "80716" :RAM) "ReviewKey" ("->Review-key definition" "" "807C5" :RAM) "SEMAPH" ("Saves control byte for IREG (2)" "" "80652" :RAM) "STACKNUM" ("ref. number of 1st visible (5)" "" "8086F" :RAM) "STOPSIGN" ("(5)" "" "80720" :RAM) "STRETCHCOUNT" ("(2)" "" "80919" :RAM) "SW_ETime" ("Stopwatch Elapsed Time Ticks (13)" "" "800D4" :RAM) "SW_Image" ("\"HH:MM:SS:ss\" Stopwatch (22)" "" "800BE" :RAM) "StartTime" ("SelfTest Start Time (Ticks) (13)" "" "80078" :RAM) "T1COUNT" ("Decremented by srvc_timer1 (1)" "" "808CC" :RAM) "TEMPENV" ("->LAM environments (5)" "" "80702" :RAM) "TESTMSG" ("SelfTest Msg Buffer (44)" "" "80092" :RAM) "TIMECRC" ("CRC CheckSum for NEXTIRQ (4)" "" "80065" :RAM) "TIMEOUT" ("Time at scheduled timeout (13)" "" "80069" :RAM) "TIMExmit" ("Time at scheduled timeout (13)" "" "80069" :RAM) "TOPLINE" ("Editline-segment which appears
- first on the screen (5)" "" "80874" :RAM) "TOUCHTAB" ("(5)" "" "8070C" :RAM) "TrackAct" ("->Action when CONTEXT changes" "" "807CF" :RAM) "UserKeys" ("->User key assignments (5)" "" "80725" :RAM) "VIEWLEVEL" ("stack element currently viewed (5)" "" "80818" :RAM) "XmitSrcvTOut" ("XMIT/SRECV timeout (2)" "" "8091C" :RAM) "leeway" ("->hxs which will be GC'ed in a
- very-low-memory condition" "" "80752" :RAM) "xDER" ("" "" "1EFD2") "xFCNAPPLY" ("" "" "1F640") "xINTEGRAL" ("" "" "1F223") "xWHERE" ("" "" "1F3F3") "xssgeneral" ("" "" "560ED") "!#1+IF<dim-1" ("" "" "50E59") "!#1-IF>0" ("" "" "50EA5") "1/X15" ("" "" "2B789") ">LASTRAM-WORD" ("" "" "648BD") "?ACCPTR>" ("" "" "715B1") "?RollUpDA2" ("" "" "39BF3") "AbbrevStack?" ("" "" "39FB0") "ADDF" ("" "" "2B7DC") "addrADISP" ("" "" "1265A" :ML) "addrATTNFLG" ("" "" "4226A" :ML) "addrClkOnNib" ("" "" "0E7D3") "addrKEYSTATE" ("" "" "00D48") "addrLINECNTg" ("" "" "136AC" :ML) "addrORghost" ("" "" "0188D") "addrTEMPENV" ("" "" "04E66") "addrTEMPTOP" ("" "" "179E8") "addrVDISP" ("" "" "1263A" :ML) "addrVDISP2" ("" "" "1264A" :ML) "addtics" ("" "" "1605F") "AdjEdModes" ("" "" "42EC7") "adrDISABLE_K" ("" "" "047CF") "adrGraphPrtH" ("" "" "32CB6") "adrKEYBUFFER" ("" "" "047DD") "adrTIMEOUTCLK" ("" "" "42284" :ML) "adr_uart_han" ("" "" "312DA") "aH>HMS" ("" "" "2B770") "ALARMxcp" ("" "" "42113") "AlgEntryStat" ("" "" "3981B") "ALGeq?" ("" "" "1568F") "allkeys" ("" "" "001FF") "aMODF" ("" "" "2B67D") "AngleStatus" ("" "" "39673") "APPprompt1!" ("" "" "47984") "APPprompt2" ("" "" "479A7") "ATTNxcp" ("" "" "420F5") "BANKMTHDS" ("" "" "70601") "BindMatVars" ("" "" "44F42") "BITMAP" ("" "" "008E6" :ML) "BUILDKPACKET" ("" "" "2E108") "ChangeFocus" ("" "" "0B006B") "check_pdata" ("" "" "27D00") "ChkGrHook" ("" "" "32CAF") "CkEQUtil" ("" "" "49C54") "CkSecoType" ("" "" "40882" :UBS) "CKTIME" ("" "" "0D9C7") "CLKADJ*" ("" "" "0CD3F" :UBS) "CLKUTL1" ("" "" "0D7A1") "ClrAbbrevStk" ("" "" "39FD2") "ClrDouseAlm" ("" "" "0ED78" :UBS) "CLRFRC" ("" "" "2BBE2") "clrtimeout" ("" "" "423D3" :ML) "COLAthexFCN" ("" "" "5573D") "Coldstart" ("" "" "01FD3" :ML) "COMPCONFCRC" ("" "" "09B73" :ML) "ComVecStatus" ("" "" "396C8") "convertbase" ("" "" "256E4") "CopyColsLeft" ("" "" "4651C") "CopyColsRght" ("" "" "4677E") "CopyRowsDown" ("" "" "46625") "CopyRowsUp" ("" "" "46409") "COPYVAR" ("" "" "7DF87") "corner" ("" "" "137DC" :ML) "CRUNCHNoBlame" ("" "" "15941") "CtlAlarm!" ("" "" "4248E") "CtlAlarm@" ("" "" "424A1" :UBS) "CURRENTMARK?" ("" "" "4E442") "Cursor&Disp" ("" "" "427AF") "CURSOR+" ("" "" "13F01" :UBS) "D0=ALoop" ("" "" "53A05" :ML :UBS) "DA2bTemp?" ("" "" "39371" :UBS) "DaDGNTc" ("" "" "25223") "DAY#" ("" "" "0D4AD") "Day>Date" ("" "" "0D744") "DCursor" ("" "" "424DA") "delimcase" ("" "" "2512D") "derprod1" ("" "" "7DC54") "derquot" ("" "" "7DC0E") "DISPCHAR+PC" ("" "" "13B51") "disprange" ("" "" "133AB") "DispVarsUtil" ("" "" "153FC") "DIV2" ("" "" "2BBB5") "DoCAlarmKey" ("" "" "42475") "DoKeyCancel" ("" "" "0590B0") "DoKeyEdit" ("" "" "0560B0") "DoKeyOK" ("" "" "05A0B0") "DoMKeyOK" ("" "" "0090B1") "DoPlotMenu" ("" "" "3ADED") "DOPRLCD" ("" "" "31EE2") "dowutil" ("" "" "0DB51" :ML) "drax" ("" "" "4C639") "DropSysErr$" ("" "" "2DDC4") "DropSysObs" ("" "" "18308") "DupAndThen" ("" "" "641CC") "DZP" ("" "" "00003") "easyabs" ("" "" "7DC88") "Echo2Macros" ("" "" "3EE47") "ECUSER" ("" "" "039EF") "EDITPARTS" ("" "" "44730") "ENTERCODE" ("" "" "00019") "EQCURSOR?" ("" "" "4E46A") "ErrFixEIRU" ("" "" "32B08") "ErrTime" ("" "" "0CBC4") "EVALCRUNCH" ("" "" "1583C") "ExitFcn" ("" "" "4CF68") "EXITFCNsto" ("" "" "4CE4C") "Extobcode" ("" "" "25C41") "FcnUtilEnd" ("" "" "49BA5") "FixEIRU" ("" "" "32B1A") "FixRRP" ("" "" "17ADB") "FLOAT" ("" "" "0D6D8") "GETAB0" ("" "" "2BFFD") "GETAB1" ("" "" "2BFE3") "getBPOFF" ("" "" "0D809") "GetBVars" ("" "" "21922") "GETCD0" ("" "" "2C031") "GetElt" ("" "" "45D1F") "GetFieldVals" ("" "" "0C80B0") "GetLastEdit" ("" "" "40BDD" :UBS) "GetMat/Vec" ("" "" "45AE0") "GETPIX" ("" "" "138EF") "GETPIX3" ("" "" "138F2") "GETRHS" ("" "" "514AF") "GetTimChk" ("" "" "012EE" :ML) "GetTime++" ("" "" "0130E" :ML) "~gFldVal" ("" "" "0C50B0") "GraphicExit" ("" "" "4CEE7") "GsstFIN" ("" "" "1518D") "HISTON?" ("" "" "53860") "IFEDispField" ("" "" "0130B0") "InitEnab" ("" "" "0970A") "InitOldMat" ("" "" "45023") "InitSysUI" ("" "" "385E8") "IOC" ("" "" "00110") "IRAM@" ("" "" "0011F") "IRC" ("" "" "0011A") "IStackKey" ("" "" "3E5CD") "LastERow?" ("" "" "426F1") "LASTPT?" ("" "" "50D78") "lbrac" ("" "" "6515C" :UBS) "LCursor" ("" "" "4256B") "LINECHANGE" ("" "" "4E37E") "LINESOFSTACK" ("" "" "39F6F") "List" ("" "" "24C0D") "longhxs" ("" "" "15E83") "Loop" ("" "" "2D564") "MACRODCMP" ("" "" "62ABB") "MANMENU*/" ("" "" "7DF0E") "MANMENU+-" ("" "" "7DF03") "MANMENUATG" ("" "" "7DF66") "MANMENUCSIV" ("" "" "7DF3A") "MANMENUCX" ("" "" "7DF50") "MANMENUEQ" ("" "" "7DF45") "MANMENUEXP" ("" "" "7DF24") "MANMENULN" ("" "" "7DF2F") "MANMENUTRG" ("" "" "7DF5B") "MANMENU^" ("" "" "7DF19") "matchob?Lp" ("" "" "643F9") "~MESRclEqn" ("" "" "0120E4") "mpop1%" ("" "" "0D8AE") "nCOLCTQUOTE" ("" "" "7DEED") "need'case" ("" "" "255FB") "newBASE" ("" "" "25632") "NEWINDEP" ("" "" "4C09B") "NEWMARK" ("" "" "4E4B0") "nextpos" ("" "" "6443A") "NEXTRRPOB" ("" "" "179D0") "NEXTSTEP" ("" "" "4BFAE") "nextsym'R" ("" "" "29A8D") "ngsizecase" ("" "" "255BD") "nINTGACOS" ("" "" "7DEA0") "nINTGALOG" ("" "" "7DECC") "nINTGASIN" ("" "" "7DE95") "nINTGATAN" ("" "" "7DEAB") "nINTGCOS" ("" "" "7DE5E") "nINTGCOSH" ("" "" "7DE7F") "nINTGEXPM" ("" "" "7DED7") "nINTGINV" ("" "" "7DE27") "nINTGLN" ("" "" "7DEB6") "nINTGLOG" ("" "" "7DEC1") "nINTGSIGN" ("" "" "7DE32") "nINTGSIN" ("" "" "7DE53") "nINTGSINH" ("" "" "7DE74") "nINTGSQ" ("" "" "7DE48") "nINTGSQRT" ("" "" "7DE3D") "nINTGTAN" ("" "" "7DE69") "nINTGTANH" ("" "" "7DE8A") "NoIgnoreAlm" ("" "" "53AE4") "norecCSseq" ("" "" "01FDA" :ML) "NUMSOLVE" ("" "" "3303F") "nWHEREDER" ("" "" "7DBAB") "nWHEREFCNAPP" ("" "" "7DBD7") "nWHEREIFTE" ("" "" "7DBA0") "nWHEREINTG" ("" "" "7DBB6") "nWHERESUM" ("" "" "7DBC1") "nWHEREWHERE" ("" "" "7DBCC") "OB>BAKcode" ("" "" "216D8") "OverWrF/TLp" ("" "" "6207D") "PALPTRDCMP" ("" "" "62B1F") "PathStatus" ("" "" "39971") "~PCunpack" ("" "" "0630E3") "pixon2" ("" "" "138CA") "PointDerivUt" ("" "" "49AD3") "PointMoveCur" ("" "" "49F06") "POLErrorTrap" ("" "" "38B45") "POPDATE%" ("" "" "0D92C") "POPTIME%" ("" "" "0D948") "preFACT" ("" "" "1BB41") "PREMARKON" ("" "" "4E497") "PrgmEntrStat" ("" "" "39853") "PRLG" ("" "" "028FC") "PSubErr" ("" "" "323E9") "PtoR" ("" "" "5133C") "PTYPE>PINFO" ("" "" "7DF71") "PUTAB0" ("" "" "2C04B") "PutSerialECk" ("" "" "30E4E") "PvarsC%0" ("" "" "4AB2A") "RBR" ("" "" "00114") "RCKBp" ("" "" "01AD7" :ML) "RCS" ("" "" "00111") "realPAcode" ("" "" "265ED") "RECORDX&YC%" ("" "" "510D5") "REPLACE_MODE" ("" "" "53A20") "restoreiram" ("" "" "0C147") "RNDC[B]" ("" "" "2BEEC") "Rom-Word?" ("" "" "61FCF") "RootUtil" ("" "" "49BD2") "RowElt#" ("" "" "45C2F") "ROWNUM" ("" "" "4489E") "rpnXROOT" ("" "" "1B185") "RPTRACC" ("" "" "71DB2") "SAFESKIPOB" ("" "" "0A532" :ML) "sALLOWINTR" ("" "" "0000F") "SAVELAM" ("" "" "61D3A") "SavPtrTime*" ("" "" "01307" :ML) "sBEG" ("" "" "00008") "sBPOFF" ("" "" "00004") "SET" ("" "" "07661") "SetAbbrevStk" ("" "" "39FC1") "SetBadPOLUI" ("" "" "38CDF" :UBS) "setflag" ("" "" "53B31" :ML) "SetISysFlag" ("" "" "539F9" :ML) "SETLOOPENV" ("" "" "4CF41") "SETROMPART" ("" "" "21CBA") "settimeout" ("" "" "423BB" :ML) "Sfkey1" ("" "" "00001") "Sfkey6" ("" "" "00006") "~sFldVal" ("" "" "0D50B0") "SLEEPxcp" ("" "" "42131") "sFLUSH" ("" "" "00002") "sNEGATE" ("" "" "00002") "SPLITWHERE" ("" "" "7DEF8") "SQRF" ("" "" "2BA0F") "srvc_timer2" ("" "" "0131D" :ML) "stackitw" ("" "" "1686A") "StartupProc" ("" "" "3858E") "STOAPPLDATA" ("" "" "47467") "sTRUNC" ("" "" "00001") "subpdcdptch" ("" "" "29BC2") "symbn" ("" "" "5A310") "SYMBNUMSOLVE" ("" "" "32FF9") "SysErrorTrap" ("" "" "38728") "SysPtr@" ("" "" "08D66" :ML) "SystemLevel?" ("" "" "40792") "TBR" ("" "" "00116") "TCS" ("" "" "00112") "TIMEOUT?" ("" "" "4227F") "TIMERCTRL.1" ("" "" "0012E") "TIMERCTRL.2" ("" "" "0012F") "TogInsertKey" ("" "" "3E586") "TopERow?" ("" "" "4272D") "TST15" ("" "" "2BD76") "TurnOffKey" ("" "" "3A9CE") "UCursor" ("" "" "42660") "UserFlagStat" ("" "" "39748") "UserKeysStat" ("" "" "397BB") "~UTTYPEEXT0?" ("" "" "0580E7") "~UTVUNS1Arg" ("" "" "0110E7") "VLM" ("" "" "17B86") "WaitTbz0" ("" "" "31416" :UBS) "norecPWLseq" ("" "" "01FBD" :ML) "Warmstart" ("" "" "01FBD" :ML) "WindowXY" ("" "" "136AA" :ML) "X@" ("" "" "0931B") "Y<=X" ("" "" "2BD32") "YMD>Ticks" ("" "" "0DB3A" :ML) "Z-BOX" ("" "" "4E776") "{}>DIR" ("" "" "24EA6")))
|