rpl-tools/data/sysrpl-data.48G.el

#s(hash-table size 5541 test eql 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") "TTHIRTYSIX" ("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" ("ob # \\-> #-1 ob
" "" "5E4A9") "#1-SWAP" ("ob # \\-> #-1 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+" ("# ob \\-> ob #+1
" "" "62904") "SWAP#1+" ("# ob \\-> ob #+1
" "" "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%' \\-> C%''
" "" "51D88" :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%C*C" ("C% \\-> C%^2
" "" "1B48F" :U) "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 null characters to the string. Since
refers to the number of nibbles, you must
use a number twice as large as the number
of null characters you want appended.
" "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") "EXPAND" ("hxs #nibs \\-> hxs'
" "Appends #nibs zero nibbles to the hxs.
" "61C1C") "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 #n \\-> []' #m #n
" "Swaps two rows. Does not make copy in
tempob.
" "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'
" "Put element at index # of matrix.
" "1DBB0" :U) "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 \\-> symb
" "Build a symbolic object.
" "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) "EXTN" ("ob1..obn #n \\-> u
" "Builds a unit object.
" "05481") "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" ("meta \\->
" "Should be called drop.
" "0326E") "DROPNDROP" ("meta ob \\->
" "Should be called DROPdrop.
" "63FA6") "N+1DROP" ("ob meta \\->
" "Should be called dropDROP.
" "62F75") "#1+NDROP" ("ob meta \\->
" "Should be called dropDROP.
" "62F75") "NDROPFALSE" ("meta \\-> F
" "Should be called dropFALSE.
" "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) "SWP1+" ("meta ob \\-> meta&ob
" "" "62904") "SWAP#1+" ("meta ob \\-> meta&ob
" "" "62904") "DUP#1+PICK" ("ob&meta \\-> ob&meta ob
" "" "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") "#1-SWAP" ("meta&ob \\-> meta ob
" "" "5E4A9") "pull" ("meta&ob \\-> meta ob
" "" "5E4A9") "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) "SYMBN" ("ob1..obn #n \\-> sym
" "" "0546D") "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#1+PICK" ("n..1 #n \\-> n..1 #n n
" "" "6119E") "DUP#2+PICK" ("n..1 #n \\-> n..1 #n n+1
" "" "5FC24" :U) "2DUP" ("1 2 \\-> 1 2 1 2
" "" "031AC") "DUP3PICK" ("1 2 \\-> 1 2 2 1
" "" "611F9") "2DUPSWAP" ("1 2 \\-> 1 2 2 1
" "" "611F9") "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") "DROPNDROP" ("1..n #n ob \\->
" "" "63FA6") "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") "NDROP" ("1..n #n \\->
" "" "0326E") "N+1DROP" ("ob 1..n #n \\->
" "" "62F75") "#1+NDROP" ("ob 1..n #n \\->
" "" "62F75") "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") "DUPUNROT" ("1 2 \\-> 2 1 2
" "" "61380") "SWAPOVER" ("1 2 \\-> 2 1 2
" "" "61380") "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>Y" ("1 2 3 \\-> 2
" "" "62726") "DROPSWAPDROP" ("1 2 3 \\-> 2
" "" "62726") "ROT2DROP" ("1 2 3 \\-> 2
" "" "62726") "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") "XYZ>ZX" ("1 2 3 \\-> 3 1
" "" "6284B") "SWAPDROPSWAP" ("1 2 3 \\-> 3 1
" "" "6284B") "UNROTDROP" ("1 2 3 \\-> 3 1
" "" "6284B") "XYZ>Z" ("1 2 3 \\-> 3
" "" "6112A") "ROTROT2DROP" ("1 2 3 \\-> 3
" "" "6112A") "UNROT2DROP" ("1 2 3 \\-> 3
" "" "6112A") "XYZ>ZYX" ("1 2 3 \\-> 3 2 1
" "" "60F33") "SWAPROT" ("1 2 3 \\-> 3 2 1
" "" "60F33") "UNROTSWAP" ("1 2 3 \\-> 3 2 1
" "" "60F33") "XYZ>ZY" ("1 2 3 \\-> 3 2
" "" "60F0E") "ROTDROPSWAP" ("1 2 3 \\-> 3 2
" "" "60F0E") "UNROTSWAPDROP" ("1 2 3 \\-> 3 2
" "" "60F0E") "UNROTOVER" ("1 2 3 \\-> 3 1 2 1
" "" "6308D") "XYZ>ZXY" ("1 2 3 \\-> 3 1 2
" "" "60FAC") "UNROT" ("1 2 3 \\-> 3 1 2
" "" "60FAC") "3UNROLL" ("1 2 3 \\-> 3 1 2
" "" "60FAC") "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") "OVERSWAP" ("1 2 \\-> 1 1 2
" "" "62D31") "OVERUNROT" ("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.
" "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") "" ("" "" "02B1E") "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" ("Error C12h
" "Generates \"Invalid IOPAR\" error.
" "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") "%0<>" ("% \\-> flag
" "Can be used to change a user flag into a
system flag. 
" "2A7CF") "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) "NDROPFALSE" ("ob1..obn #n \\-> F
" "" "169A5") "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 top body into 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) "IDUP" ("\\->
" "Pushes interpreter pointer into the return
stack. 
" "0716B") "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 the directory the HOME directory?
" "08DD4" :U) "CONTEXT@" ("\\-> rrp
" "Recalls current directory.
" "08D5A") "CONTEXT!" ("rrp \\->
" "Sets new current directory.
" "08D08") "SYSRRP?" ("rrp \\-> flag
" "Is rrp HOME?
" "08DD4") "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") "TIMESTR" ("%dt %tm \\-> \"dy dt tm\"
" "Returns string representation of time, using
current format.  Example:
 \"WED 06/24/98  10:00:45A\"
" "0D304") "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") "APNDCRLF" ("$ \\-> $'
" "Appends carriage return and line feed to
string.
" "2E4DC") "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") "SetIOPARerr" ("\\->
" "Throws the IOPAR error: \"Invalid IOPAR\".
" "2EC34") "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") "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:" ("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" ("\\->
" "Redisplay the menu now if no key is waiting
in the buffer.  Even better is this:
 :: DA3OK?NOTIT ?DispMenu ;
" "3A1CA") "DispMenu.1" ("\\->
" "Displays the menu immediately.
" "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") "?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") "?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) "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") "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") "MakeLabel" ("$ #w #x grob \\-> grob'
" "Inserts $ into grob using CENTER$3x5 with
y=5.
" "3A4AB") "'IDPAR" ("\\-> id
" "Puts ID PPAR unevaluated on the stack.
 --
<REF>TEXT:Reserved|PPAR
" "5127E" :U) "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") "BANGARRY" ("el # M \\-> M'
" "Puts el at index # of matrix M.
" "1DBB0" :UBS) "SWAPROWS" ("M % %' \\-> M'
" "SWAP two rows in matrix.  Internal version of
xRSWP. 
" "3745E") "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" ("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) "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) "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
" "22FD5" :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) "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) "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'" ("
" "" "23654" :Usr) "x'" ("
" "" "23679" :Usr) "xENDTIC" ("
" "" "23679" :Usr) "x\\<<" ("
" "" "2361E" :Usr) "x<<" ("
" "" "2361E" :Usr) "x\\>>" ("
" "" "23639" :Usr) "x>>" ("
" "" "23639" :Usr) "x\\>>" ("
" "" "235FE" :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" ("0/1 \\->
" "THEN Cmd
 --
Starts the true-clause in conditional
or error-trapping structure
 --
Related: CASE,ELSE,END,IFERR
" "22EFA" :Usr) "xTHEN" ("
" "THEN in a CASE statement.
 --
Related: CASE,ELSE,END,IFERR
" "237A8" :Usr) "xTHENCASE" ("
" "THEN in a CASE statement.
 --
Related: CASE,ELSE,END,IFERR
" "237A8" :Usr) "xTHEN" ("
" "THEN in an ON ERROR construct.
 --
Related: CASE,ELSE,END,IFERR
" "2371F" :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\\->" ("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) "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) "x\\->" ("
" "Create local variable comand.
<REF>xRPN->
" "22FEB" :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")))