home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1996-10-12 | 16.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs v18 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: '(require (quote calc-ext))
| default (weak)
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 72 65 71 75 69 72 | 65 20 28 71 75 6f 74 65 |.(requir|e (quote|
|00000010| 20 63 61 6c 63 2d 65 78 | 74 29 29 0a 0a 28 64 65 | calc-ex|t))..(de|
|00000020| 66 75 6e 20 63 61 6c 63 | 2d 4e 65 65 64 2d 63 61 |fun calc|-Need-ca|
|00000030| 6c 63 2d 68 65 6c 70 20 | 6e 69 6c 20 28 62 79 74 |lc-help |nil (byt|
|00000040| 65 2d 63 6f 64 65 20 22 | c0 87 22 20 5b 6e 69 6c |e-code "|.." [nil|
|00000050| 5d 20 31 29 29 0a 0a 28 | 64 65 66 75 6e 20 63 61 |] 1))..(|defun ca|
|00000060| 6c 63 2d 68 65 6c 70 2d | 70 72 65 66 69 78 20 28 |lc-help-|prefix (|
|00000070| 61 72 67 29 20 22 5c 0a | 54 68 69 73 20 6b 65 79 |arg) "\.|This key|
|00000080| 20 69 73 20 74 68 65 20 | 70 72 65 66 69 78 20 66 | is the |prefix f|
|00000090| 6f 72 20 43 61 6c 63 20 | 68 65 6c 70 20 66 75 6e |or Calc |help fun|
|000000a0| 63 74 69 6f 6e 73 2e 20 | 20 53 65 65 20 63 61 6c |ctions. | See cal|
|000000b0| 63 2d 68 65 6c 70 2d 66 | 6f 72 2d 68 65 6c 70 2e |c-help-f|or-help.|
|000000c0| 22 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 20 22 |" (inter|active "|
|000000d0| 50 22 29 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |P") (byt|e-code "|
|000000e0| c4 88 08 86 09 00 c5 09 | 21 88 c6 08 83 13 00 c7 |........|!.......|
|000000f0| 82 1a 00 c8 c9 ca cb 20 | 21 5c 22 0b 5c 22 1a cc |....... |!\".\"..|
|00000100| 0b 0a 5c 22 89 12 88 cd | ce 21 88 0a 83 32 00 cf |..\"....|.!...2..|
|00000110| 0a 21 82 34 00 d0 20 29 | 87 22 20 5b 63 61 6c 63 |.!.4.. )|." [calc|
|00000120| 2d 64 69 73 70 61 74 63 | 68 2d 68 65 6c 70 20 65 |-dispatc|h-help e|
|00000130| 63 68 6f 2d 6b 65 79 73 | 74 72 6f 6b 65 73 20 6b |cho-keys|trokes k|
|00000140| 65 79 20 63 61 6c 63 2d | 68 65 6c 70 2d 6d 61 70 |ey calc-|help-map|
|00000150| 20 6e 69 6c 20 73 69 74 | 2d 66 6f 72 20 63 61 6c | nil sit|-for cal|
|00000160| 63 2d 72 65 61 64 2d 6b | 65 79 2d 73 65 71 75 65 |c-read-k|ey-seque|
|00000170| 6e 63 65 20 22 43 61 6c | 63 20 48 65 6c 70 20 6f |nce "Cal|c Help o|
|00000180| 70 74 69 6f 6e 73 3a 20 | 48 65 6c 70 2c 20 49 6e |ptions: |Help, In|
|00000190| 66 6f 2c 20 54 75 74 6f | 72 69 61 6c 2c 20 53 75 |fo, Tuto|rial, Su|
|000001a0| 6d 6d 61 72 79 3b 20 4b | 65 79 2c 20 46 75 6e 63 |mmary; K|ey, Func|
|000001b0| 74 69 6f 6e 3b 20 3f 3d | 6d 6f 72 65 22 20 66 6f |tion; ?=|more" fo|
|000001c0| 72 6d 61 74 20 22 25 73 | 20 20 28 54 79 70 65 20 |rmat "%s| (Type |
|000001d0| 3f 20 66 6f 72 20 61 20 | 6c 69 73 74 20 6f 66 20 |? for a |list of |
|000001e0| 43 61 6c 63 20 48 65 6c | 70 20 6f 70 74 69 6f 6e |Calc Hel|p option|
|000001f0| 73 29 22 20 6b 65 79 2d | 64 65 73 63 72 69 70 74 |s)" key-|descript|
|00000200| 69 6f 6e 20 74 68 69 73 | 2d 63 6f 6d 6d 61 6e 64 |ion this|-command|
|00000210| 2d 6b 65 79 73 20 6c 6f | 6f 6b 75 70 2d 6b 65 79 |-keys lo|okup-key|
|00000220| 20 6d 65 73 73 61 67 65 | 20 22 22 20 63 61 6c 6c | message| "" call|
|00000230| 2d 69 6e 74 65 72 61 63 | 74 69 76 65 6c 79 20 62 |-interac|tively b|
|00000240| 65 65 70 5d 20 31 30 29 | 29 0a 0a 28 64 65 66 75 |eep] 10)|)..(defu|
|00000250| 6e 20 63 61 6c 63 2d 68 | 65 6c 70 2d 66 6f 72 2d |n calc-h|elp-for-|
|00000260| 68 65 6c 70 20 28 61 72 | 67 29 20 22 5c 0a 59 6f |help (ar|g) "\.Yo|
|00000270| 75 20 68 61 76 65 20 74 | 79 70 65 64 20 60 68 27 |u have t|yped `h'|
|00000280| 2c 20 74 68 65 20 43 61 | 6c 63 20 68 65 6c 70 20 |, the Ca|lc help |
|00000290| 63 68 61 72 61 63 74 65 | 72 2e 20 20 54 79 70 65 |characte|r. Type|
|000002a0| 20 61 20 48 65 6c 70 20 | 6f 70 74 69 6f 6e 3a 0a | a Help |option:.|
|000002b0| 0a 42 20 20 63 61 6c 63 | 2d 64 65 73 63 72 69 62 |.B calc|-describ|
|000002c0| 65 2d 62 69 6e 64 69 6e | 67 73 2e 20 20 44 69 73 |e-bindin|gs. Dis|
|000002d0| 70 6c 61 79 20 61 20 74 | 61 62 6c 65 20 6f 66 20 |play a t|able of |
|000002e0| 61 6c 6c 20 6b 65 79 20 | 62 69 6e 64 69 6e 67 73 |all key |bindings|
|000002f0| 2e 0a 48 20 20 63 61 6c | 63 2d 66 75 6c 6c 2d 68 |..H cal|c-full-h|
|00000300| 65 6c 70 2e 20 20 44 69 | 73 70 6c 61 79 20 61 6c |elp. Di|splay al|
|00000310| 6c 20 60 3f 27 20 6b 65 | 79 20 6d 65 73 73 61 67 |l `?' ke|y messag|
|00000320| 65 73 20 61 74 20 6f 6e | 63 65 2e 0a 0a 49 20 20 |es at on|ce...I |
|00000330| 63 61 6c 63 2d 69 6e 66 | 6f 2e 20 20 52 65 61 64 |calc-inf|o. Read|
|00000340| 20 74 68 65 20 43 61 6c | 63 20 6d 61 6e 75 61 6c | the Cal|c manual|
|00000350| 20 75 73 69 6e 67 20 74 | 68 65 20 49 6e 66 6f 20 | using t|he Info |
|00000360| 73 79 73 74 65 6d 2e 0a | 54 20 20 63 61 6c 63 2d |system..|T calc-|
|00000370| 74 75 74 6f 72 69 61 6c | 2e 20 20 52 65 61 64 20 |tutorial|. Read |
|00000380| 74 68 65 20 43 61 6c 63 | 20 74 75 74 6f 72 69 61 |the Calc| tutoria|
|00000390| 6c 20 75 73 69 6e 67 20 | 74 68 65 20 49 6e 66 6f |l using |the Info|
|000003a0| 20 73 79 73 74 65 6d 2e | 0a 53 20 20 63 61 6c 63 | system.|.S calc|
|000003b0| 2d 69 6e 66 6f 2d 73 75 | 6d 6d 61 72 79 2e 20 20 |-info-su|mmary. |
|000003c0| 52 65 61 64 20 74 68 65 | 20 43 61 6c 63 20 73 75 |Read the| Calc su|
|000003d0| 6d 6d 61 72 79 20 75 73 | 69 6e 67 20 74 68 65 20 |mmary us|ing the |
|000003e0| 49 6e 66 6f 20 73 79 73 | 74 65 6d 2e 0a 0a 43 20 |Info sys|tem...C |
|000003f0| 20 63 61 6c 63 2d 64 65 | 73 63 72 69 62 65 2d 6b | calc-de|scribe-k|
|00000400| 65 79 2d 62 72 69 65 66 | 6c 79 2e 20 20 4c 6f 6f |ey-brief|ly. Loo|
|00000410| 6b 20 75 70 20 74 68 65 | 20 63 6f 6d 6d 61 6e 64 |k up the| command|
|00000420| 20 6e 61 6d 65 20 66 6f | 72 20 61 20 67 69 76 65 | name fo|r a give|
|00000430| 6e 20 6b 65 79 2e 0a 4b | 20 20 63 61 6c 63 2d 64 |n key..K| calc-d|
|00000440| 65 73 63 72 69 62 65 2d | 6b 65 79 2e 20 20 4c 6f |escribe-|key. Lo|
|00000450| 6f 6b 20 75 70 20 61 20 | 6b 65 79 27 73 20 64 6f |ok up a |key's do|
|00000460| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 20 69 6e 20 74 |cumentat|ion in t|
|00000470| 68 65 20 6d 61 6e 75 61 | 6c 2e 0a 46 20 20 63 61 |he manua|l..F ca|
|00000480| 6c 63 2d 64 65 73 63 72 | 69 62 65 2d 66 75 6e 63 |lc-descr|ibe-func|
|00000490| 74 69 6f 6e 2e 20 20 4c | 6f 6f 6b 20 75 70 20 61 |tion. L|ook up a|
|000004a0| 20 66 75 6e 63 74 69 6f | 6e 27 73 20 64 6f 63 75 | functio|n's docu|
|000004b0| 6d 65 6e 74 61 74 69 6f | 6e 20 69 6e 20 74 68 65 |mentatio|n in the|
|000004c0| 20 6d 61 6e 75 61 6c 2e | 0a 56 20 20 63 61 6c 63 | manual.|.V calc|
|000004d0| 2d 64 65 73 63 72 69 62 | 65 2d 76 61 72 69 61 62 |-describ|e-variab|
|000004e0| 6c 65 2e 20 20 4c 6f 6f | 6b 20 75 70 20 61 20 76 |le. Loo|k up a v|
|000004f0| 61 72 69 61 62 6c 65 27 | 73 20 64 6f 63 75 6d 65 |ariable'|s docume|
|00000500| 6e 74 61 74 69 6f 6e 20 | 69 6e 20 74 68 65 20 6d |ntation |in the m|
|00000510| 61 6e 75 61 6c 2e 0a 0a | 4e 20 20 63 61 6c 63 2d |anual...|N calc-|
|00000520| 76 69 65 77 2d 6e 65 77 | 73 2e 20 20 44 69 73 70 |view-new|s. Disp|
|00000530| 6c 61 79 20 43 61 6c 63 | 20 68 69 73 74 6f 72 79 |lay Calc| history|
|00000540| 20 6f 66 20 63 68 61 6e | 67 65 73 2e 0a 0a 43 2d | of chan|ges...C-|
|00000550| 63 20 20 44 65 73 63 72 | 69 62 65 20 63 6f 6e 64 |c Descr|ibe cond|
|00000560| 69 74 69 6f 6e 73 20 66 | 6f 72 20 63 6f 70 79 69 |itions f|or copyi|
|00000570| 6e 67 20 43 61 6c 63 2e | 0a 43 2d 64 20 20 44 65 |ng Calc.|.C-d De|
|00000580| 73 63 72 69 62 65 20 68 | 6f 77 20 79 6f 75 20 63 |scribe h|ow you c|
|00000590| 61 6e 20 67 65 74 20 61 | 20 6e 65 77 20 63 6f 70 |an get a| new cop|
|000005a0| 79 20 6f 66 20 43 61 6c | 63 20 6f 72 20 72 65 70 |y of Cal|c or rep|
|000005b0| 6f 72 74 20 61 20 62 75 | 67 2e 0a 43 2d 77 20 20 |ort a bu|g..C-w |
|000005c0| 44 65 73 63 72 69 62 65 | 20 68 6f 77 20 74 68 65 |Describe| how the|
|000005d0| 72 65 20 69 73 20 6e 6f | 20 77 61 72 72 61 6e 74 |re is no| warrant|
|000005e0| 79 20 66 6f 72 20 43 61 | 6c 63 2e 22 20 28 69 6e |y for Ca|lc." (in|
|000005f0| 74 65 72 61 63 74 69 76 | 65 20 22 50 22 29 20 28 |teractiv|e "P") (|
|00000600| 62 79 74 65 2d 63 6f 64 | 65 20 22 c3 88 08 83 17 |byte-cod|e ".....|
|00000610| 00 c3 19 c5 8b 88 c6 09 | 41 21 88 c7 c3 21 29 82 |........|A!...!).|
|00000620| 1d 00 c2 18 c7 0c 21 29 | 87 22 20 5b 63 61 6c 63 |......!)|." [calc|
|00000630| 2d 64 69 73 70 61 74 63 | 68 2d 68 65 6c 70 20 6b |-dispatc|h-help k|
|00000640| 65 79 20 74 20 6e 69 6c | 20 61 72 67 20 28 28 62 |ey t nil| arg ((b|
|00000650| 79 74 65 2d 63 6f 64 65 | 20 22 c2 c3 21 88 c4 c5 |yte-code| "..!...|
|00000660| c6 21 21 88 c7 c8 21 88 | c9 c1 21 89 10 40 ca 3e |.!!...!.|..!..@.>|
|00000670| 85 21 00 cb cc cd 8f 88 | 82 0a 00 87 22 20 5b 6b |.!......|...." [k|
|00000680| 65 79 20 74 20 64 65 73 | 63 72 69 62 65 2d 66 75 |ey t des|cribe-fu|
|00000690| 6e 63 74 69 6f 6e 20 63 | 61 6c 63 2d 68 65 6c 70 |nction c|alc-help|
|000006a0| 2d 66 6f 72 2d 68 65 6c | 70 20 73 65 6c 65 63 74 |-for-hel|p select|
|000006b0| 2d 77 69 6e 64 6f 77 20 | 67 65 74 2d 62 75 66 66 |-window |get-buff|
|000006c0| 65 72 2d 77 69 6e 64 6f | 77 20 22 2a 48 65 6c 70 |er-windo|w "*Help|
|000006d0| 2a 22 20 6d 65 73 73 61 | 67 65 20 22 43 61 6c 63 |*" messa|ge "Calc|
|000006e0| 20 48 65 6c 70 20 6f 70 | 74 69 6f 6e 73 3a 20 48 | Help op|tions: H|
|000006f0| 65 6c 70 2c 20 49 6e 66 | 6f 2c 20 2e 2e 2e 20 20 |elp, Inf|o, ... |
|00000700| 70 72 65 73 73 20 53 50 | 43 2c 20 44 45 4c 20 74 |press SP|C, DEL t|
|00000710| 6f 20 73 63 72 6f 6c 6c | 2c 20 43 2d 67 20 74 6f |o scroll|, C-g to|
|00000720| 20 63 61 6e 63 65 6c 22 | 20 63 61 6c 63 2d 72 65 | cancel"| calc-re|
|00000730| 61 64 2d 6b 65 79 20 28 | 33 32 20 38 20 31 32 37 |ad-key (|32 8 127|
|00000740| 20 32 32 20 32 34 36 29 | 20 65 72 72 20 28 62 79 | 22 246)| err (by|
|00000750| 74 65 2d 63 6f 64 65 20 | 22 08 40 c1 3e 83 0c 00 |te-code |".@.>...|
|00000760| c2 20 82 0e 00 c3 20 87 | 22 20 5b 6b 65 79 20 28 |. .... .|" [key (|
|00000770| 33 32 20 32 32 29 20 73 | 63 72 6f 6c 6c 2d 75 70 |32 22) s|croll-up|
|00000780| 20 73 63 72 6f 6c 6c 2d | 64 6f 77 6e 5d 20 33 29 | scroll-|down] 3)|
|00000790| 20 28 28 65 72 72 6f 72 | 20 28 62 79 74 65 2d 63 | ((error| (byte-c|
|000007a0| 6f 64 65 20 22 c0 20 87 | 22 20 5b 62 65 65 70 5d |ode ". .|" [beep]|
|000007b0| 20 32 29 29 29 5d 20 39 | 29 29 20 63 61 6c 63 2d | 2)))] 9|)) calc-|
|000007c0| 75 6e 72 65 61 64 2d 63 | 6f 6d 6d 61 6e 64 20 63 |unread-c|ommand c|
|000007d0| 61 6c 63 2d 68 65 6c 70 | 2d 70 72 65 66 69 78 5d |alc-help|-prefix]|
|000007e0| 20 34 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 4))..(d|efun cal|
|000007f0| 63 2d 64 65 73 63 72 69 | 62 65 2d 63 6f 70 79 69 |c-descri|be-copyi|
|00000800| 6e 67 20 6e 69 6c 20 28 | 69 6e 74 65 72 61 63 74 |ng nil (|interact|
|00000810| 69 76 65 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |ive) (by|te-code |
|00000820| 22 c0 88 c1 20 88 c2 c3 | 21 87 22 20 5b 6e 69 6c |"... ...|!." [nil|
|00000830| 20 63 61 6c 63 2d 69 6e | 66 6f 20 49 6e 66 6f 2d | calc-in|fo Info-|
|00000840| 67 6f 74 6f 2d 6e 6f 64 | 65 20 22 43 6f 70 79 69 |goto-nod|e "Copyi|
|00000850| 6e 67 22 5d 20 33 29 29 | 0a 0a 28 64 65 66 75 6e |ng"] 3))|..(defun|
|00000860| 20 63 61 6c 63 2d 64 65 | 73 63 72 69 62 65 2d 64 | calc-de|scribe-d|
|00000870| 69 73 74 72 69 62 75 74 | 69 6f 6e 20 6e 69 6c 20 |istribut|ion nil |
|00000880| 28 69 6e 74 65 72 61 63 | 74 69 76 65 29 20 28 62 |(interac|tive) (b|
|00000890| 79 74 65 2d 63 6f 64 65 | 20 22 c0 88 c1 20 88 c2 |yte-code| "... ..|
|000008a0| c3 21 87 22 20 5b 6e 69 | 6c 20 63 61 6c 63 2d 69 |.!." [ni|l calc-i|
|000008b0| 6e 66 6f 20 49 6e 66 6f | 2d 67 6f 74 6f 2d 6e 6f |nfo Info|-goto-no|
|000008c0| 64 65 20 22 52 65 70 6f | 72 74 69 6e 67 20 42 75 |de "Repo|rting Bu|
|000008d0| 67 73 22 5d 20 33 29 29 | 0a 0a 28 64 65 66 75 6e |gs"] 3))|..(defun|
|000008e0| 20 63 61 6c 63 2d 64 65 | 73 63 72 69 62 65 2d 6e | calc-de|scribe-n|
|000008f0| 6f 2d 77 61 72 72 61 6e | 74 79 20 6e 69 6c 20 28 |o-warran|ty nil (|
|00000900| 69 6e 74 65 72 61 63 74 | 69 76 65 29 20 28 62 79 |interact|ive) (by|
|00000910| 74 65 2d 63 6f 64 65 20 | 22 c1 88 c2 20 88 c3 c4 |te-code |"... ...|
|00000920| 21 88 c1 18 c5 c6 21 29 | 88 c7 20 88 c8 c9 21 87 |!.....!)|.. ...!.|
|00000930| 22 20 5b 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |" [case-|fold-sea|
|00000940| 72 63 68 20 6e 69 6c 20 | 63 61 6c 63 2d 69 6e 66 |rch nil |calc-inf|
|00000950| 6f 20 49 6e 66 6f 2d 67 | 6f 74 6f 2d 6e 6f 64 65 |o Info-g|oto-node|
|00000960| 20 22 43 6f 70 79 69 6e | 67 22 20 73 65 61 72 63 | "Copyin|g" searc|
|00000970| 68 2d 66 6f 72 77 61 72 | 64 20 22 20 20 20 20 20 |h-forwar|d " |
|00000980| 4e 4f 20 57 41 52 52 41 | 4e 54 59 22 20 62 65 67 |NO WARRA|NTY" beg|
|00000990| 69 6e 6e 69 6e 67 2d 6f | 66 2d 6c 69 6e 65 20 72 |inning-o|f-line r|
|000009a0| 65 63 65 6e 74 65 72 20 | 30 5d 20 36 29 29 0a 0a |ecenter |0] 6))..|
|000009b0| 28 64 65 66 75 6e 20 63 | 61 6c 63 2d 64 65 73 63 |(defun c|alc-desc|
|000009c0| 72 69 62 65 2d 62 69 6e | 64 69 6e 67 73 20 6e 69 |ribe-bin|dings ni|
|000009d0| 6c 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 29 20 |l (inter|active) |
|000009e0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 88 c4 20 |(byte-co|de "... |
|000009f0| 88 8a c5 71 88 65 62 88 | c6 c7 c0 c1 23 85 1a 00 |...q.eb.|....#...|
|00000a00| c8 c9 ca 21 64 5c 22 88 | 65 62 88 cb cc c0 c1 23 |...!d\".|eb.....#|
|00000a10| 85 33 00 cd 20 88 c8 c9 | ca 21 60 5c 22 88 82 1e |.3.. ...|.!`\"...|
|00000a20| 00 88 65 62 88 cb ce c0 | c1 23 85 4c 00 cd 20 88 |..eb....|.#.L.. .|
|00000a30| c8 c9 ca 21 60 5c 22 88 | 82 37 00 88 65 62 88 c6 |...!`\".|.7..eb..|
|00000a40| cf c0 c1 23 85 63 00 d0 | d1 21 88 d2 d3 21 88 82 |...#.c..|.!...!..|
|00000a50| 50 00 88 65 62 88 cb d4 | c0 c1 23 85 9f 00 c9 d1 |P..eb...|..#.....|
|00000a60| 21 53 66 c9 d5 21 66 1b | 1a c8 d6 d1 21 d6 ca 21 |!Sf..!f.|....!..!|
|00000a70| 5c 22 88 c9 d1 21 62 88 | d7 d1 21 88 d8 d1 21 88 |\"...!b.|..!...!.|
|00000a80| d9 da 0a 0b 5e 0a 0b 5d | 23 63 2a 88 82 67 00 88 |....^..]|#c*..g..|
|00000a90| 65 62 29 87 22 20 5b 6e | 69 6c 20 74 20 64 69 67 |eb)." [n|il t dig|
|00000aa0| 31 20 64 69 67 32 20 64 | 65 73 63 72 69 62 65 2d |1 dig2 d|escribe-|
|00000ab0| 62 69 6e 64 69 6e 67 73 | 20 22 2a 48 65 6c 70 2a |bindings| "*Help*|
|00000ac0| 22 20 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |" search|-forward|
|00000ad0| 20 22 47 6c 6f 62 61 6c | 20 62 69 6e 64 69 6e 67 | "Global| binding|
|00000ae0| 73 3a 22 20 64 65 6c 65 | 74 65 2d 72 65 67 69 6f |s:" dele|te-regio|
|00000af0| 6e 20 6d 61 74 63 68 2d | 62 65 67 69 6e 6e 69 6e |n match-|beginnin|
|00000b00| 67 20 30 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |g 0 re-s|earch-fo|
|00000b10| 72 77 61 72 64 20 22 0a | 5b 61 2d 7a 5d 20 45 53 |rward ".|[a-z] ES|
|00000b20| 43 22 20 65 6e 64 2d 6f | 66 2d 6c 69 6e 65 20 22 |C" end-o|f-line "|
|00000b30| 0a 45 53 43 20 6d 22 20 | 22 0a 0a 0a 22 20 62 61 |.ESC m" |"..." ba|
|00000b40| 63 6b 77 61 72 64 2d 64 | 65 6c 65 74 65 2d 63 68 |ckward-d|elete-ch|
|00000b50| 61 72 20 31 20 62 61 63 | 6b 77 61 72 64 2d 63 68 |ar 1 bac|kward-ch|
|00000b60| 61 72 20 32 20 22 0a 5b | 61 2d 7a 5d 20 5b 30 2d |ar 2 ".[|a-z] [0-|
|00000b70| 39 5d 5c 5c 28 09 09 2e | 2a 0a 5c 5c 29 5c 5c 28 |9]\\(...|*.\\)\\(|
|00000b80| 5b 61 2d 7a 5d 20 5b 30 | 2d 39 5d 5c 5c 31 5c 5c |[a-z] [0|-9]\\1\\|
|00000b90| 29 2a 5b 61 2d 7a 5d 20 | 5c 5c 28 5b 30 2d 39 5d |)*[a-z] |\\([0-9]|
|00000ba0| 5c 5c 29 5c 5c 31 22 20 | 33 20 6d 61 74 63 68 2d |\\)\\1" |3 match-|
|00000bb0| 65 6e 64 20 64 65 6c 65 | 74 65 2d 62 61 63 6b 77 |end dele|te-backw|
|00000bc0| 61 72 64 2d 63 68 61 72 | 20 64 65 6c 65 74 65 2d |ard-char| delete-|
|00000bd0| 63 68 61 72 20 66 6f 72 | 6d 61 74 20 22 25 63 20 |char for|mat "%c |
|00000be0| 2e 2e 20 25 63 22 5d 20 | 33 30 29 29 0a 0a 28 64 |.. %c"] |30))..(d|
|00000bf0| 65 66 75 6e 20 63 61 6c | 63 2d 64 65 73 63 72 69 |efun cal|c-descri|
|00000c00| 62 65 2d 6b 65 79 2d 62 | 72 69 65 66 6c 79 20 28 |be-key-b|riefly (|
|00000c10| 6b 65 79 29 20 28 69 6e | 74 65 72 61 63 74 69 76 |key) (in|teractiv|
|00000c20| 65 20 22 6b 44 65 73 63 | 72 69 62 65 20 6b 65 79 |e "kDesc|ribe key|
|00000c30| 20 62 72 69 65 66 6c 79 | 3a 20 22 29 20 28 62 79 | briefly|: ") (by|
|00000c40| 74 65 2d 63 6f 64 65 20 | 22 c2 88 c3 08 c1 5c 22 |te-code |".....\"|
|00000c50| 87 22 20 5b 6b 65 79 20 | 74 20 6e 69 6c 20 63 61 |." [key |t nil ca|
|00000c60| 6c 63 2d 64 65 73 63 72 | 69 62 65 2d 6b 65 79 5d |lc-descr|ibe-key]|
|00000c70| 20 33 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 3))..(d|efun cal|
|00000c80| 63 2d 64 65 73 63 72 69 | 62 65 2d 6b 65 79 20 28 |c-descri|be-key (|
|00000c90| 6b 65 79 20 26 6f 70 74 | 69 6f 6e 61 6c 20 62 72 |key &opt|ional br|
|00000ca0| 69 65 66 6c 79 29 20 28 | 69 6e 74 65 72 61 63 74 |iefly) (|interact|
|00000cb0| 69 76 65 20 22 6b 44 65 | 73 63 72 69 62 65 20 6b |ive "kDe|scribe k|
|00000cc0| 65 79 3a 20 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |ey: ") (|byte-cod|
|00000cd0| 65 20 22 c6 88 d5 09 21 | d6 3d 83 5c 22 00 d7 d8 |e "....!|.=.\"...|
|00000ce0| d9 da 09 21 5c 22 0b 5c | 22 1a 09 0a 50 89 11 88 |...!\".\|"...P...|
|00000cf0| db 0b 0a 5c 22 29 82 45 | 00 d5 09 21 dc 3d 83 42 |...\").E|...!.=.B|
|00000d00| 00 d7 d8 d9 da 09 21 5c | 22 0c 5c 22 1a 09 0a 50 |......!\|".\"...P|
|00000d10| 89 11 88 db 0c 0a 5c 22 | 29 82 45 00 d5 09 21 c6 |......\"|).E...!.|
|00000d20| c6 1e 07 1d 18 dd 09 de | 5c 22 86 56 00 dd 09 df |........|\".V....|
|00000d30| 5c 22 85 9a 00 dd 09 de | 5c 22 83 67 00 0d 3f 89 |\"......|\".g..?.|
|00000d40| 15 82 6d 00 0e 07 3f 89 | 16 07 88 e0 d8 e1 0e 08 |..m...?.|........|
|00000d50| 83 7a 00 e2 82 7b 00 e3 | 0d 83 83 00 e4 82 84 00 |.z...{..|........|
|00000d60| e3 0e 07 83 8d 00 e5 82 | 8e 00 e3 24 21 11 d5 09 |........|...$!...|
|00000d70| 21 89 10 88 82 4b 00 88 | da 09 21 c6 1e 0a 1e 09 |!....K..|..!.....|
|00000d80| e6 e7 0e 09 5c 22 85 b5 | 00 e8 0e 09 e9 c6 4f 50 |....\"..|......OP|
|00000d90| 89 16 09 88 e6 ea 0e 09 | 5c 22 85 ce 00 eb 0e 09 |........|\"......|
|00000da0| ec ed 21 c6 4f 50 89 16 | 09 88 82 b6 00 88 0e 08 |..!.OP..|........|
|00000db0| 83 f1 03 8a ee ef 21 71 | 88 f0 20 ed 55 85 fb 00 |......!q|.. .U...|
|00000dc0| f1 f2 21 88 f3 8b 88 c6 | 89 16 0c 88 f4 f5 21 88 |..!.....|......!.|
|00000dd0| ec f6 21 f7 f6 21 5a 89 | 16 0d 88 65 62 88 e6 f8 |..!..!Z.|...eb...|
|00000de0| 0e 09 5c 22 85 0d 01 e6 | f9 0e 09 5c 22 3f 83 1a |..\"....|...\"?..|
|00000df0| 01 0e 09 ed fa 4f fb 50 | 82 1c 01 0e 09 89 16 0a |.....O.P|........|
|00000e00| 88 f4 d8 fc fd 0e 0d fe | 5c 5c ff 5c 22 e6 81 40 |........|\\.\"..@|
|00000e10| 00 0e 09 5c 22 83 3a 01 | 81 41 00 82 5d 01 0d 83 |...\".:.|.A..]...|
|00000e20| 4f 01 0e 07 83 49 01 81 | 42 00 82 4c 01 81 43 00 |O....I..|B..L..C.|
|00000e30| 82 5d 01 0e 07 83 5a 01 | 81 44 00 82 5d 01 81 45 |.]....Z.|.D..]..E|
|00000e40| 00 81 46 00 0e 0a 21 fd | 81 47 00 0e 0a 47 5a ed |..F...!.|.G...GZ.|
|00000e50| 5d 81 48 00 5c 22 25 c6 | ce 23 85 99 01 c6 1e 0f |].H.\"%.|.#......|
|00000e60| 81 49 00 20 88 81 4a 00 | 0e 0d 21 88 60 89 16 0f |.I. ..J.|..!.`...|
|00000e70| 88 81 4b 00 20 88 81 4c | 00 0e 0f 60 5c 22 29 29 |..K. ..L|...`\"))|
|00000e80| 1e 0b 0e 0b 83 c1 03 0e | 0b ed fe 4f 0e 0b fe 81 |........|...O....|
|00000e90| 4d 00 4f 0e 0b 81 4d 00 | 81 4e 00 4f e3 0e 0b 81 |M.O...M.|.N.O....|
|00000ea0| 4f 00 c6 4f c6 1e 0b 1e | 14 1e 13 1e 12 1e 11 1e |O..O....|........|
|00000eb0| 10 e6 81 50 00 0e 10 5c | 22 85 df 01 0e 10 ec ed |...P...\|".......|
|00000ec0| 21 c6 4f 89 16 10 88 e6 | 81 51 00 0e 10 5c 22 85 |!.O.....|.Q...\".|
|00000ed0| f4 01 0e 10 ed f7 ed 21 | 4f 89 16 10 88 e6 81 50 |.......!|O......P|
|00000ee0| 00 0e 11 5c 22 85 09 02 | 0e 11 ec ed 21 c6 4f 89 |...\"...|....!.O.|
|00000ef0| 16 11 88 e6 81 51 00 0e | 11 5c 22 85 1e 02 0e 11 |.....Q..|.\".....|
|00000f00| ed f7 ed 21 4f 89 16 11 | 88 e6 81 52 00 0e 12 5c |...!O...|...R...\|
|00000f10| 22 85 3d 02 0e 12 f7 ed | 21 54 c6 4f 16 13 0e 12 |".=.....|!T.O....|
|00000f20| ed f7 ed 21 4f 89 16 12 | 88 e6 81 51 00 0e 12 5c |...!O...|...Q...\|
|00000f30| 22 85 52 02 0e 12 ed f7 | ed 21 4f 89 16 12 88 e6 |".R.....|.!O.....|
|00000f40| 81 50 00 0e 12 5c 22 85 | 67 02 0e 12 ec ed 21 c6 |.P...\".|g.....!.|
|00000f50| 4f 89 16 12 88 d8 81 53 | 00 e6 81 54 00 0e 14 5c |O......S|...T...\|
|00000f60| 22 83 8d 02 81 55 00 0e | 14 f6 5c 22 81 55 00 0e |"....U..|..\".U..|
|00000f70| 14 81 56 00 5c 22 89 16 | 14 88 82 8e 02 08 0e 10 |..V.\"..|........|
|00000f80| dd 0e 10 e3 5c 22 83 9c | 02 e3 82 9f 02 81 57 00 |....\"..|......W.|
|00000f90| 0e 11 dd 0e 12 e3 5c 22 | 83 ad 02 e3 82 b0 02 81 |......\"|........|
|00000fa0| 57 00 0e 12 dd 0e 14 e3 | 5c 22 83 be 02 e3 82 c1 |W.......|\"......|
|00000fb0| 02 81 58 00 0e 14 26 09 | 89 16 0b 88 f1 81 59 00 |..X...&.|......Y.|
|00000fc0| 0d 83 d7 02 81 5a 00 82 | d8 02 e3 0e 07 83 e3 02 |.....Z..|........|
|00000fd0| 81 5b 00 82 e4 02 e3 0e | 09 0e 0b dd 0e 13 e3 5c |.[......|.......\|
|00000fe0| 22 83 f4 02 e3 82 fb 02 | d8 81 5c 5c 00 0e 13 5c |".......|..\\...\|
|00000ff0| 22 26 06 88 81 5d 00 ce | 21 19 09 40 81 5e 00 3d |"&...]..|!..@.^.=|
|00001000| 83 b5 03 dd 0e 13 e3 5c | 22 83 1d 03 f1 81 5f 00 |.......\|"....._.|
|00001010| 21 82 b2 03 e6 81 60 00 | 0e 13 5c 22 85 34 03 0e |!.....`.|..\".4..|
|00001020| 13 f7 ed 21 81 48 00 49 | 88 82 1d 03 88 81 61 00 |...!.H.I|......a.|
|00001030| 81 62 00 d8 81 63 00 0e | 13 5c 22 21 40 81 64 00 |.b...c..|.\"!@.d.|
|00001040| 5c 22 89 16 13 88 81 65 | 00 90 81 66 00 d8 81 67 |\".....e|...f...g|
|00001050| 00 0e 0b 5c 22 21 88 ef | 71 88 f4 81 68 00 21 88 |...\"!..|q...h.!.|
|00001060| 0e 13 85 ac 03 f4 d8 81 | 69 00 0e 13 40 5c 22 21 |........|i...@\"!|
|00001070| 88 81 49 00 20 88 60 1e | 0f 81 6a 00 f6 21 88 f4 |..I. .`.|..j..!..|
|00001080| 81 6b 00 c6 ce 23 86 8f | 03 64 62 88 81 49 00 20 |.k...#..|.db..I. |
|00001090| 88 81 66 00 81 4c 00 0e | 0f 60 5c 22 21 29 88 0e |..f..L..|.`\"!)..|
|000010a0| 13 41 89 16 13 88 82 65 | 03 88 81 6c 00 20 91 82 |.A.....e|...l. ..|
|000010b0| bb 03 81 6d 00 09 41 21 | 29 2e 06 82 ed 03 08 3f |...m..A!|)......?|
|000010c0| 86 cb 03 81 6e 00 08 21 | 83 d8 03 f1 81 6f 00 0e |....n..!|.....o..|
|000010d0| 09 5c 22 82 ed 03 f1 81 | 70 00 0e 09 08 39 83 e7 |.\".....|p....9..|
|000010e0| 03 08 82 ec 03 81 71 00 | 08 21 23 29 82 1f 04 0d |......q.|.!#)....|
|000010f0| 85 fe 03 81 5a 00 0e 09 | 50 89 16 09 88 0e 07 85 |....Z...|P.......|
|00001100| 0d 04 81 5b 00 0e 09 50 | 89 16 09 88 81 72 00 0e |...[...P|.....r..|
|00001110| 09 81 73 00 c6 e6 81 74 | 00 0e 09 5c 22 24 2a 2b |..s....t|...\"$*+|
|00001120| 87 22 20 5b 64 65 66 6e | 20 6b 65 79 20 6b 65 79 |." [defn| key key|
|00001130| 32 20 63 61 6c 63 2d 64 | 69 73 70 61 74 63 68 2d |2 calc-d|ispatch-|
|00001140| 6d 61 70 20 63 61 6c 63 | 2d 68 65 6c 70 2d 6d 61 |map calc|-help-ma|
|00001150| 70 20 69 6e 76 20 6e 69 | 6c 20 68 79 70 20 62 72 |p inv ni|l hyp br|
|00001160| 69 65 66 6c 79 20 64 65 | 73 63 20 74 61 72 67 65 |iefly de|sc targe|
|00001170| 74 20 6d 73 67 20 63 61 | 73 65 2d 66 6f 6c 64 2d |t msg ca|se-fold-|
|00001180| 73 65 61 72 63 68 20 63 | 61 6c 63 2d 73 75 6d 6d |search c|alc-summ|
|00001190| 61 72 79 2d 69 6e 64 65 | 6e 74 61 74 69 6f 6e 20 |ary-inde|ntation |
|000011a0| 74 20 70 74 20 61 72 67 | 73 20 6b 65 79 73 20 70 |t pt arg|s keys p|
|000011b0| 72 6f 6d 70 74 73 20 6e | 6f 74 65 73 20 63 6d 64 |rompts n|otes cmd|
|000011c0| 20 6b 65 79 2d 62 69 6e | 64 69 6e 67 20 63 61 6c | key-bin|ding cal|
|000011d0| 63 2d 64 69 73 70 61 74 | 63 68 20 63 61 6c 63 2d |c-dispat|ch calc-|
|000011e0| 72 65 61 64 2d 6b 65 79 | 2d 73 65 71 75 65 6e 63 |read-key|-sequenc|
|000011f0| 65 20 66 6f 72 6d 61 74 | 20 22 44 65 73 63 72 69 |e format| "Descri|
|00001200| 62 65 20 6b 65 79 20 62 | 72 69 65 66 6c 79 3a 20 |be key b|riefly: |
|00001210| 25 73 2d 22 20 6b 65 79 | 2d 64 65 73 63 72 69 70 |%s-" key|-descrip|
|00001220| 74 69 6f 6e 20 6c 6f 6f | 6b 75 70 2d 6b 65 79 20 |tion loo|kup-key |
|00001230| 63 61 6c 63 2d 68 65 6c | 70 2d 70 72 65 66 69 78 |calc-hel|p-prefix|
|00001240| 20 65 71 75 61 6c 20 22 | 49 22 20 22 48 22 20 72 | equal "|I" "H" r|
|00001250| 65 61 64 2d 6b 65 79 2d | 73 65 71 75 65 6e 63 65 |ead-key-|sequence|
|00001260| 20 22 44 65 73 63 72 69 | 62 65 20 6b 65 79 25 73 | "Descri|be key%s|
|00001270| 3a 25 73 25 73 20 22 20 | 22 20 62 72 69 65 66 6c |:%s%s " |" briefl|
|00001280| 79 22 20 22 22 20 22 20 | 49 22 20 22 20 48 22 20 |y" "" " |I" " H" |
|00001290| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 22 5e 45 |string-m|atch "^E|
|000012a0| 53 43 20 22 20 22 4d 2d | 22 20 34 20 22 5e 4d 2d |SC " "M-|" 4 "^M-|
|000012b0| 23 20 5c 5c 28 45 53 43 | 20 5c 5c 7c 43 2d 5c 5c |# \\(ESC| \\|C-\\|
|000012c0| 29 22 20 22 4d 2d 23 20 | 22 20 6d 61 74 63 68 2d |)" "M-# |" match-|
|000012d0| 65 6e 64 20 30 20 67 65 | 74 2d 62 75 66 66 65 72 |end 0 ge|t-buffer|
|000012e0| 2d 63 72 65 61 74 65 20 | 22 2a 43 61 6c 63 20 53 |-create |"*Calc S|
|000012f0| 75 6d 6d 61 72 79 2a 22 | 20 62 75 66 66 65 72 2d |ummary*"| buffer-|
|00001300| 73 69 7a 65 20 6d 65 73 | 73 61 67 65 20 22 52 65 |size mes|sage "Re|
|00001310| 61 64 69 6e 67 20 43 61 | 6c 63 20 73 75 6d 6d 61 |ading Ca|lc summa|
|00001320| 72 79 20 66 72 6f 6d 20 | 6d 61 6e 75 61 6c 2e 2e |ry from |manual..|
|00001330| 2e 22 20 28 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |." ((byt|e-code "|
|00001340| 8a c0 20 88 c1 c2 21 88 | 65 62 88 c3 c4 21 88 c5 |.. ...!.|eb...!..|
|00001350| c6 60 64 23 88 c7 20 29 | 87 22 20 5b 63 61 6c 63 |.`d#.. )|." [calc|
|00001360| 2d 69 6e 66 6f 20 49 6e | 66 6f 2d 67 6f 74 6f 2d |-info In|fo-goto-|
|00001370| 6e 6f 64 65 20 22 53 75 | 6d 6d 61 72 79 22 20 66 |node "Su|mmary" f|
|00001380| 6f 72 77 61 72 64 2d 6c | 69 6e 65 20 31 20 63 6f |orward-l|ine 1 co|
|00001390| 70 79 2d 74 6f 2d 62 75 | 66 66 65 72 20 22 2a 43 |py-to-bu|ffer "*C|
|000013a0| 61 6c 63 20 53 75 6d 6d | 61 72 79 2a 22 20 49 6e |alc Summ|ary*" In|
|000013b0| 66 6f 2d 6c 61 73 74 5d | 20 37 29 29 20 72 65 2d |fo-last]| 7)) re-|
|000013c0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|000013d0| 5e 5c 5c 28 2e 2a 5c 5c | 29 5c 5c 5b 5c 5c 2e 5c |^\\(.*\\|)\\[\\.\|
|000013e0| 5c 2e 20 61 20 62 22 20 | 31 20 6d 61 74 63 68 2d |\. a b" |1 match-|
|000013f0| 62 65 67 69 6e 6e 69 6e | 67 20 22 5b 30 2d 39 5d |beginnin|g "[0-9]|
|00001400| 5c 5c 27 22 20 22 5b 64 | 23 5d 22 20 2d 31 20 22 |\\'" "[d|#]" -1 "|
|00001410| 30 2d 39 22 20 22 0a 25 | 73 25 73 25 73 25 73 5b |0-9" ".%|s%s%s%s[|
|00001420| 20 61 2d 7a 41 2d 5a 5d | 22 20 6d 61 6b 65 2d 73 | a-zA-Z]|" make-s|
|00001430| 74 72 69 6e 67 20 39 20 | 34 36 20 22 4d 2d 23 22 |tring 9 |46 "M-#"|
|00001440| 20 22 20 20 20 22 20 22 | 49 20 48 20 22 20 22 20 | " " "|I H " " |
|00001450| 20 49 20 22 20 22 20 20 | 48 20 22 20 22 20 20 20 | I " " |H " " |
|00001460| 20 22 20 72 65 67 65 78 | 70 2d 71 75 6f 74 65 20 | " regex|p-quote |
|00001470| 36 20 33 32 20 62 65 67 | 69 6e 6e 69 6e 67 2d 6f |6 32 beg|inning-o|
|00001480| 66 2d 6c 69 6e 65 20 66 | 6f 72 77 61 72 64 2d 63 |f-line f|orward-c|
|00001490| 68 61 72 20 65 6e 64 2d | 6f 66 2d 6c 69 6e 65 20 |har end-|of-line |
|000014a0| 62 75 66 66 65 72 2d 73 | 75 62 73 74 72 69 6e 67 |buffer-s|ubstring|
|000014b0| 20 31 39 20 33 38 20 34 | 30 20 22 5c 5c 60 20 2b | 19 38 4|0 "\\` +|
|000014c0| 22 20 22 20 2b 5c 5c 27 | 22 20 22 20 5b 30 2d 39 |" " +\\'|" " [0-9|
|000014d0| 2c 5d 2b 5c 5c 27 22 20 | 22 25 73 3a 20 20 25 73 |,]+\\'" |"%s: %s|
|000014e0| 25 73 60 25 73 27 25 73 | 25 73 20 25 73 25 73 22 |%s`%s'%s|%s %s%s"|
|000014f0| 20 22 5c 5c 60 5c 5c 28 | 63 61 6c 63 2d 5b 2d 61 | "\\`\\(|calc-[-a|
|00001500| 2d 7a 41 2d 5a 30 2d 39 | 5d 2b 5c 5c 29 20 2a 5c |-zA-Z0-9|]+\\) *\|
|00001510| 5c 28 2e 2a 5c 5c 29 5c | 5c 27 22 20 6d 61 74 68 |\(.*\\)\|\'" math|
|00001520| 2d 6d 61 74 63 68 2d 73 | 75 62 73 74 72 69 6e 67 |-match-s|ubstring|
|00001530| 20 32 20 22 20 22 20 22 | 20 3d 3e 20 22 20 22 25 | 2 " " "| => " "%|
|00001540| 73 25 73 25 73 20 72 75 | 6e 73 20 25 73 25 73 22 |s%s%s ru|ns %s%s"|
|00001550| 20 22 49 20 22 20 22 48 | 20 22 20 22 20 20 28 3f | "I " "H| " " (?|
|00001560| 3d 6e 6f 74 65 73 20 25 | 73 29 22 20 63 61 6c 63 |=notes %|s)" calc|
|00001570| 2d 72 65 61 64 2d 6b 65 | 79 20 36 33 20 22 4e 6f |-read-ke|y 63 "No|
|00001580| 20 6e 6f 74 65 73 20 66 | 6f 72 20 74 68 69 73 20 | notes f|or this |
|00001590| 63 6f 6d 6d 61 6e 64 22 | 20 22 2c 22 20 73 6f 72 |command"| "," sor|
|000015a0| 74 20 72 65 61 64 2d 66 | 72 6f 6d 2d 73 74 72 69 |t read-f|rom-stri|
|000015b0| 6e 67 20 22 28 25 73 29 | 22 20 3c 20 22 2a 48 65 |ng "(%s)|" < "*He|
|000015c0| 6c 70 2a 22 20 70 72 69 | 6e 63 20 22 25 73 0a 0a |lp*" pri|nc "%s..|
|000015d0| 22 20 22 5e 20 2a 4e 4f | 54 45 53 22 20 22 5e 20 |" "^ *NO|TES" "^ |
|000015e0| 2a 25 64 5c 5c 2e 20 22 | 20 66 6f 72 77 61 72 64 |*%d\\. "| forward|
|000015f0| 2d 6c 69 6e 65 20 22 5e | 20 3f 20 3f 5b 30 2d 39 |-line "^| ? ?[0-9|
|00001600| 5d 2b 5c 5c 2e 20 22 20 | 70 72 69 6e 74 2d 68 65 |]+\\. " |print-he|
|00001610| 6c 70 2d 72 65 74 75 72 | 6e 2d 6d 65 73 73 61 67 |lp-retur|n-messag|
|00001620| 65 20 63 61 6c 63 2d 75 | 6e 72 65 61 64 2d 63 6f |e calc-u|nread-co|
|00001630| 6d 6d 61 6e 64 20 69 6e | 74 65 67 65 72 70 20 22 |mmand in|tegerp "|
|00001640| 25 73 20 69 73 20 75 6e | 64 65 66 69 6e 65 64 22 |%s is un|defined"|
|00001650| 20 22 25 73 20 72 75 6e | 73 20 74 68 65 20 63 6f | "%s run|s the co|
|00001660| 6d 6d 61 6e 64 20 25 73 | 22 20 70 72 69 6e 31 2d |mmand %s|" prin1-|
|00001670| 74 6f 2d 73 74 72 69 6e | 67 20 63 61 6c 63 2d 64 |to-strin|g calc-d|
|00001680| 65 73 63 72 69 62 65 2d | 74 68 69 6e 67 20 22 4b |escribe-|thing "K|
|00001690| 65 79 20 49 6e 64 65 78 | 22 20 22 5b 41 2d 5a 5d |ey Index|" "[A-Z]|
|000016a0| 5b 41 2d 5a 5d 5b 41 2d | 5a 5d 22 5d 20 39 36 29 |[A-Z][A-|Z]"] 96)|
|000016b0| 29 0a 0a 28 64 65 66 75 | 6e 20 63 61 6c 63 2d 64 |)..(defu|n calc-d|
|000016c0| 65 73 63 72 69 62 65 2d | 66 75 6e 63 74 69 6f 6e |escribe-|function|
|000016d0| 20 28 26 6f 70 74 69 6f | 6e 61 6c 20 66 75 6e 63 | (&optio|nal func|
|000016e0| 29 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 29 20 |) (inter|active) |
|000016f0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c2 88 08 86 |(byte-co|de "....|
|00001700| 11 00 c4 c5 c6 09 c2 c3 | c7 25 21 89 10 88 c8 08 |........|.%!.....|
|00001710| 21 89 10 88 c9 ca 08 5c | 22 83 26 00 cb 08 cc 5c |!......\|".&....\|
|00001720| 22 82 38 00 cb c9 cd 08 | 5c 22 83 35 00 08 ce c2 |".8.....|\".5....|
|00001730| 4f 82 36 00 08 cf 5c 22 | 87 22 20 5b 66 75 6e 63 |O.6...\"|." [func|
|00001740| 20 6f 62 61 72 72 61 79 | 20 6e 69 6c 20 74 20 69 | obarray| nil t i|
|00001750| 6e 74 65 72 6e 20 63 6f | 6d 70 6c 65 74 69 6e 67 |ntern co|mpleting|
|00001760| 2d 72 65 61 64 20 22 44 | 65 73 63 72 69 62 65 20 |-read "D|escribe |
|00001770| 66 75 6e 63 74 69 6f 6e | 3a 20 22 20 22 63 61 6c |function|: " "cal|
|00001780| 63 46 75 6e 63 2d 22 20 | 73 79 6d 62 6f 6c 2d 6e |cFunc-" |symbol-n|
|00001790| 61 6d 65 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |ame stri|ng-match|
|000017a0| 20 22 5c 5c 60 63 61 6c | 63 2d 2e 22 20 63 61 6c | "\\`cal|c-." cal|
|000017b0| 63 2d 64 65 73 63 72 69 | 62 65 2d 74 68 69 6e 67 |c-descri|be-thing|
|000017c0| 20 22 43 6f 6d 6d 61 6e | 64 20 49 6e 64 65 78 22 | "Comman|d Index"|
|000017d0| 20 22 5c 5c 60 63 61 6c | 63 46 75 6e 63 2d 2e 22 | "\\`cal|cFunc-."|
|000017e0| 20 39 20 22 46 75 6e 63 | 74 69 6f 6e 20 49 6e 64 | 9 "Func|tion Ind|
|000017f0| 65 78 22 5d 20 31 30 29 | 29 0a 0a 28 64 65 66 75 |ex"] 10)|)..(defu|
|00001800| 6e 20 63 61 6c 63 2d 64 | 65 73 63 72 69 62 65 2d |n calc-d|escribe-|
|00001810| 76 61 72 69 61 62 6c 65 | 20 28 26 6f 70 74 69 6f |variable| (&optio|
|00001820| 6e 61 6c 20 76 61 72 29 | 20 28 69 6e 74 65 72 61 |nal var)| (intera|
|00001830| 63 74 69 76 65 29 20 28 | 62 79 74 65 2d 63 6f 64 |ctive) (|byte-cod|
|00001840| 65 20 22 c2 88 08 86 11 | 00 c4 c5 c6 09 c2 c3 c7 |e ".....|........|
|00001850| 25 21 89 10 88 c8 08 21 | 89 10 88 c9 08 ca cb cc |%!.....!|........|
|00001860| 08 5c 22 83 29 00 08 cd | c2 4f 82 2a 00 08 23 87 |.\".)...|.O.*..#.|
|00001870| 22 20 5b 76 61 72 20 6f | 62 61 72 72 61 79 20 6e |" [var o|barray n|
|00001880| 69 6c 20 74 20 69 6e 74 | 65 72 6e 20 63 6f 6d 70 |il t int|ern comp|
|00001890| 6c 65 74 69 6e 67 2d 72 | 65 61 64 20 22 44 65 73 |leting-r|ead "Des|
|000018a0| 63 72 69 62 65 20 76 61 | 72 69 61 62 6c 65 3a 20 |cribe va|riable: |
|000018b0| 22 20 22 76 61 72 2d 22 | 20 73 79 6d 62 6f 6c 2d |" "var-"| symbol-|
|000018c0| 6e 61 6d 65 20 63 61 6c | 63 2d 64 65 73 63 72 69 |name cal|c-descri|
|000018d0| 62 65 2d 74 68 69 6e 67 | 20 22 56 61 72 69 61 62 |be-thing| "Variab|
|000018e0| 6c 65 20 49 6e 64 65 78 | 22 20 73 74 72 69 6e 67 |le Index|" string|
|000018f0| 2d 6d 61 74 63 68 20 22 | 5c 5c 60 76 61 72 2d 2e |-match "|\\`var-.|
|00001900| 22 20 34 5d 20 31 30 29 | 29 0a 0a 28 64 65 66 75 |" 4] 10)|)..(defu|
|00001910| 6e 20 63 61 6c 63 2d 64 | 65 73 63 72 69 62 65 2d |n calc-d|escribe-|
|00001920| 74 68 69 6e 67 20 28 74 | 68 69 6e 67 20 77 68 65 |thing (t|hing whe|
|00001930| 72 65 20 26 6f 70 74 69 | 6f 6e 61 6c 20 74 61 72 |re &opti|onal tar|
|00001940| 67 65 74 20 6e 6f 74 2d | 71 75 6f 74 65 64 29 20 |get not-|quoted) |
|00001950| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c9 ca 08 09 |(byte-co|de "....|
|00001960| 23 88 cb 20 1a cc 20 88 | cd 09 21 88 c4 1b ce cf |#.. .. .|..!.....|
|00001970| d0 d1 08 21 5c 22 c4 c5 | 23 29 86 4d 00 d2 d3 08 |...!\"..|#).M....|
|00001980| 5c 22 85 3e 00 ce cf d4 | 08 d5 d6 4f 5c 22 c4 c5 |\".>....|...O\"..|
|00001990| 23 85 3e 00 cf d7 08 d5 | d6 4f 5c 22 89 10 86 4d |#.>.....|.O\"...M|
|000019a0| 00 d8 20 88 d9 0a 21 88 | da db 08 09 23 88 c4 1e |.. ...!.|....#...|
|000019b0| 06 cd dc dd de 21 df de | 21 5c 22 21 29 88 c4 1b |.....!..|!\"!)...|
|000019c0| e0 cf e1 0e 07 86 68 00 | 08 0e 07 86 6e 00 08 0e |......h.|....n...|
|000019d0| 07 86 74 00 08 24 c4 c5 | 23 86 aa 00 0e 08 85 8d |..t..$..|#.......|
|000019e0| 00 c5 1b e0 0e 07 86 89 | 00 08 c4 c5 23 29 86 aa |........|....#)..|
|000019f0| 00 e0 cf e2 0e 07 86 99 | 00 08 5c 22 c4 c5 23 86 |........|..\"..#.|
|00001a00| aa 00 e0 0e 07 86 a7 00 | 08 c4 c5 23 29 86 e7 00 |........|...#)...|
|00001a10| c5 1b e0 cf e1 0e 07 86 | b9 00 08 0e 07 86 bf 00 |........|........|
|00001a20| 08 0e 07 86 c5 00 08 24 | c4 c5 23 86 e6 00 e0 cf |.......$|..#.....|
|00001a30| e2 0e 07 86 d5 00 08 5c | 22 c4 c5 23 86 e6 00 e0 |.......\|"..#....|
|00001a40| 0e 07 86 e3 00 08 c4 c5 | 23 29 88 e3 20 88 c9 e4 |........|#).. ...|
|00001a50| 08 09 23 29 87 22 20 5b | 74 68 69 6e 67 20 77 68 |..#)." [|thing wh|
|00001a60| 65 72 65 20 73 61 76 65 | 77 69 6e 20 63 61 73 65 |ere save|win case|
|00001a70| 2d 66 6f 6c 64 2d 73 65 | 61 72 63 68 20 6e 69 6c |-fold-se|arch nil|
|00001a80| 20 74 20 49 6e 66 6f 2d | 68 69 73 74 6f 72 79 20 | t Info-|history |
|00001a90| 74 61 72 67 65 74 20 6e | 6f 74 2d 71 75 6f 74 65 |target n|ot-quote|
|00001aa0| 64 20 6d 65 73 73 61 67 | 65 20 22 4c 6f 6f 6b 69 |d messag|e "Looki|
|00001ab0| 6e 67 20 66 6f 72 20 60 | 25 73 27 20 69 6e 20 25 |ng for `|%s' in %|
|00001ac0| 73 2e 2e 2e 22 20 63 75 | 72 72 65 6e 74 2d 77 69 |s..." cu|rrent-wi|
|00001ad0| 6e 64 6f 77 2d 63 6f 6e | 66 69 67 75 72 61 74 69 |ndow-con|figurati|
|00001ae0| 6f 6e 20 63 61 6c 63 2d | 69 6e 66 6f 20 49 6e 66 |on calc-|info Inf|
|00001af0| 6f 2d 67 6f 74 6f 2d 6e | 6f 64 65 20 72 65 2d 73 |o-goto-n|ode re-s|
|00001b00| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 66 6f |earch-fo|rward fo|
|00001b10| 72 6d 61 74 20 22 0a 5c | 5c 2a 20 2b 25 73 3a 20 |rmat ".\|\* +%s: |
|00001b20| 5c 5c 28 2e 2a 5c 5c 29 | 5c 5c 2e 22 20 72 65 67 |\\(.*\\)|\\." reg|
|00001b30| 65 78 70 2d 71 75 6f 74 | 65 20 73 74 72 69 6e 67 |exp-quot|e string|
|00001b40| 2d 6d 61 74 63 68 20 22 | 5c 5c 60 5c 5c 28 5b 61 |-match "|\\`\\([a|
|00001b50| 2d 7a 20 5d 2a 5c 5c 29 | 5b 30 2d 39 5d 5c 5c 27 |-z ]*\\)|[0-9]\\'|
|00001b60| 22 20 22 0a 5c 5c 2a 20 | 2b 25 73 5b 30 31 5d 2d |" ".\\* |+%s[01]-|
|00001b70| 39 3a 20 5c 5c 28 2e 2a | 5c 5c 29 5c 5c 2e 22 20 |9: \\(.*|\\)\\." |
|00001b80| 30 20 2d 31 20 22 25 73 | 39 22 20 49 6e 66 6f 2d |0 -1 "%s|9" Info-|
|00001b90| 6c 61 73 74 20 73 65 74 | 2d 77 69 6e 64 6f 77 2d |last set|-window-|
|00001ba0| 63 6f 6e 66 69 67 75 72 | 61 74 69 6f 6e 20 65 72 |configur|ation er|
|00001bb0| 72 6f 72 20 22 43 61 6e | 27 74 20 66 69 6e 64 20 |ror "Can|'t find |
|00001bc0| 60 25 73 27 20 69 6e 20 | 25 73 22 20 62 75 66 66 |`%s' in |%s" buff|
|00001bd0| 65 72 2d 73 75 62 73 74 | 72 69 6e 67 20 6d 61 74 |er-subst|ring mat|
|00001be0| 63 68 2d 62 65 67 69 6e | 6e 69 6e 67 20 31 20 6d |ch-begin|ning 1 m|
|00001bf0| 61 74 63 68 2d 65 6e 64 | 20 73 65 61 72 63 68 2d |atch-end| search-|
|00001c00| 66 6f 72 77 61 72 64 20 | 22 5c 5c 5b 60 25 73 27 |forward |"\\[`%s'|
|00001c10| 5c 5c 5d 5c 5c 7c 28 60 | 25 73 27 29 5c 5c 7c 5c |\\]\\|(`|%s')\\|\|
|00001c20| 5c 3c 54 68 65 5b 20 0a | 5d 60 25 73 27 22 20 22 |\<The[ .|]`%s'" "|
|00001c30| 60 25 73 27 22 20 62 65 | 67 69 6e 6e 69 6e 67 2d |`%s'" be|ginning-|
|00001c40| 6f 66 2d 6c 69 6e 65 20 | 22 46 6f 75 6e 64 20 60 |of-line |"Found `|
|00001c50| 25 73 27 20 69 6e 20 25 | 73 22 5d 20 33 34 29 29 |%s' in %|s"] 34))|
|00001c60| 0a 0a 28 64 65 66 75 6e | 20 63 61 6c 63 2d 76 69 |..(defun| calc-vi|
|00001c70| 65 77 2d 6e 65 77 73 20 | 6e 69 6c 20 28 69 6e 74 |ew-news |nil (int|
|00001c80| 65 72 61 63 74 69 76 65 | 29 20 28 62 79 74 65 2d |eractive|) (byte-|
|00001c90| 63 6f 64 65 20 22 c2 88 | 09 18 08 85 10 00 c3 c4 |code "..|........|
|00001ca0| c5 08 40 5c 22 21 3f 85 | 1b 00 08 41 89 10 88 82 |..@\"!?.|...A....|
|00001cb0| 04 00 88 08 85 27 00 c3 | c4 c6 08 40 5c 22 21 86 |.....'..|...@\"!.|
|00001cc0| 2d 00 c7 c8 21 88 c9 20 | 88 ca cb 21 88 cc 20 88 |-...!.. |...!.. .|
|00001cd0| cd c4 c6 08 40 5c 22 21 | 88 ce cf 21 88 d0 d1 21 |....@\"!|...!...!|
|00001ce0| 88 d2 65 60 5c 22 88 65 | 62 29 87 22 20 5b 70 61 |..e`\".e|b)." [pa|
|00001cf0| 74 68 20 6c 6f 61 64 2d | 70 61 74 68 20 6e 69 6c |th load-|path nil|
|00001d00| 20 66 69 6c 65 2d 65 78 | 69 73 74 73 2d 70 20 65 | file-ex|ists-p e|
|00001d10| 78 70 61 6e 64 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |xpand-fi|le-name |
|00001d20| 22 63 61 6c 63 2e 65 6c | 22 20 22 52 45 41 44 4d |"calc.el|" "READM|
|00001d30| 45 22 20 65 72 72 6f 72 | 20 22 43 61 6e 27 74 20 |E" error| "Can't |
|00001d40| 6c 6f 63 61 74 65 20 43 | 61 6c 63 20 73 6f 75 72 |locate C|alc sour|
|00001d50| 63 65 73 22 20 63 61 6c | 63 2d 71 75 69 74 20 73 |ces" cal|c-quit s|
|00001d60| 77 69 74 63 68 2d 74 6f | 2d 62 75 66 66 65 72 20 |witch-to|-buffer |
|00001d70| 22 2a 48 65 6c 70 2a 22 | 20 65 72 61 73 65 2d 62 |"*Help*"| erase-b|
|00001d80| 75 66 66 65 72 20 69 6e | 73 65 72 74 2d 66 69 6c |uffer in|sert-fil|
|00001d90| 65 2d 63 6f 6e 74 65 6e | 74 73 20 73 65 61 72 63 |e-conten|ts searc|
|00001da0| 68 2d 66 6f 72 77 61 72 | 64 20 22 53 75 6d 6d 61 |h-forwar|d "Summa|
|00001db0| 72 79 20 6f 66 20 63 68 | 61 6e 67 65 73 22 20 66 |ry of ch|anges" f|
|00001dc0| 6f 72 77 61 72 64 2d 6c | 69 6e 65 20 2d 31 20 64 |orward-l|ine -1 d|
|00001dd0| 65 6c 65 74 65 2d 72 65 | 67 69 6f 6e 5d 20 31 35 |elete-re|gion] 15|
|00001de0| 29 29 0a 0a 28 64 65 66 | 75 6e 20 63 61 6c 63 2d |))..(def|un calc-|
|00001df0| 66 75 6c 6c 2d 68 65 6c | 70 20 6e 69 6c 20 28 69 |full-hel|p nil (i|
|00001e00| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 62 79 74 |nteracti|ve) (byt|
|00001e10| 65 2d 63 6f 64 65 20 22 | c5 88 c6 90 c7 c8 c9 08 |e-code "|........|
|00001e20| 09 23 21 88 c7 ca 21 88 | c7 c8 cb 0a 5c 22 21 88 |.#!...!.|....\"!.|
|00001e30| c7 cc 21 88 c7 cd 21 88 | c7 ce 21 88 c7 cf 21 88 |..!...!.|..!...!.|
|00001e40| c4 1b d0 d1 d2 d3 d4 20 | 41 21 41 21 5c 22 88 d0 |....... |A!A!\"..|
|00001e50| d5 d6 5c 22 29 88 d7 20 | 91 87 22 20 5b 63 61 6c |..\").. |.." [cal|
|00001e60| 63 2d 76 65 72 73 69 6f | 6e 20 63 61 6c 63 2d 76 |c-versio|n calc-v|
|00001e70| 65 72 73 69 6f 6e 2d 64 | 61 74 65 20 63 61 6c 63 |ersion-d|ate calc|
|00001e80| 2d 69 6e 73 74 61 6c 6c | 65 64 2d 64 61 74 65 20 |-install|ed-date |
|00001e90| 63 61 6c 63 2d 66 75 6c | 6c 2d 68 65 6c 70 2d 66 |calc-ful|l-help-f|
|00001ea0| 6c 61 67 20 74 20 6e 69 | 6c 20 22 2a 48 65 6c 70 |lag t ni|l "*Help|
|00001eb0| 2a 22 20 70 72 69 6e 63 | 20 66 6f 72 6d 61 74 20 |*" princ| format |
|00001ec0| 22 47 4e 55 20 45 6d 61 | 63 73 20 43 61 6c 63 75 |"GNU Ema|cs Calcu|
|00001ed0| 6c 61 74 6f 72 20 76 65 | 72 73 69 6f 6e 20 25 73 |lator ve|rsion %s|
|00001ee0| 20 6f 66 20 25 73 2e 0a | 22 20 22 20 20 42 79 20 | of %s..|" " By |
|00001ef0| 44 61 76 65 20 47 69 6c | 6c 65 73 70 69 65 2c 20 |Dave Gil|lespie, |
|00001f00| 64 61 76 65 67 40 73 79 | 6e 61 70 74 69 63 73 2e |daveg@sy|naptics.|
|00001f10| 63 6f 6d 2e 0a 22 20 22 | 20 20 49 6e 73 74 61 6c |com.." "| Instal|
|00001f20| 6c 65 64 20 25 73 2e 0a | 22 20 22 20 20 43 6f 70 |led %s..|" " Cop|
|00001f30| 79 72 69 67 68 74 20 28 | 43 29 20 31 39 39 30 2c |yright (|C) 1990,|
|00001f40| 20 31 39 39 33 20 46 72 | 65 65 20 53 6f 66 74 77 | 1993 Fr|ee Softw|
|00001f50| 61 72 65 20 46 6f 75 6e | 64 61 74 69 6f 6e 2c 20 |are Foun|dation, |
|00001f60| 49 6e 63 2e 0a 0a 22 20 | 22 54 79 70 65 20 60 68 |Inc..." |"Type `h|
|00001f70| 20 73 27 20 66 6f 72 20 | 61 20 6d 6f 72 65 20 64 | s' for |a more d|
|00001f80| 65 74 61 69 6c 65 64 20 | 73 75 6d 6d 61 72 79 2e |etailed |summary.|
|00001f90| 0a 22 20 22 4f 72 20 74 | 79 70 65 20 60 68 20 69 |." "Or t|ype `h i|
|00001fa0| 27 20 74 6f 20 72 65 61 | 64 20 74 68 65 20 66 75 |' to rea|d the fu|
|00001fb0| 6c 6c 20 43 61 6c 63 20 | 6d 61 6e 75 61 6c 20 6f |ll Calc |manual o|
|00001fc0| 6e 2d 6c 69 6e 65 2e 0a | 0a 22 20 22 42 61 73 69 |n-line..|." "Basi|
|00001fd0| 63 20 6b 65 79 73 3a 0a | 22 20 6d 61 70 63 61 72 |c keys:.|" mapcar|
|00001fe0| 20 28 6c 61 6d 62 64 61 | 20 28 78 29 20 28 62 79 | (lambda| (x) (by|
|00001ff0| 74 65 2d 63 6f 64 65 20 | 22 c1 c2 c3 08 5c 22 21 |te-code |"....\"!|
|00002000| 87 22 20 5b 78 20 70 72 | 69 6e 63 20 66 6f 72 6d |." [x pr|inc form|
|00002010| 61 74 20 22 20 20 25 73 | 0a 22 5d 20 34 29 29 20 |at " %s|."] 4)) |
|00002020| 6e 72 65 76 65 72 73 65 | 20 72 65 76 65 72 73 65 |nreverse| reverse|
|00002030| 20 63 61 6c 63 2d 68 65 | 6c 70 20 28 6c 61 6d 62 | calc-he|lp (lamb|
|00002040| 64 61 20 28 70 72 65 66 | 69 78 29 20 28 62 79 74 |da (pref|ix) (byt|
|00002050| 65 2d 63 6f 64 65 20 22 | c2 c3 c4 8f 18 08 40 85 |e-code "|......@.|
|00002060| 3c 00 c5 c6 08 38 c7 3d | 83 17 00 c8 82 3b 00 c6 |<....8.=|.....;..|
|00002070| 08 38 83 33 00 c9 ca c6 | 08 38 cb c6 08 38 09 5c |.8.3....|.8...8.\|
|00002080| 22 41 86 2f 00 cc 08 38 | 23 82 3b 00 c9 cd ce cc |"A./...8|#.;.....|
|00002090| 08 38 21 5c 22 21 88 cf | d0 08 40 5c 22 29 87 22 |.8!\"!..|..@\")."|
|000020a0| 20 5b 6d 73 67 73 20 63 | 61 6c 63 2d 68 65 6c 70 | [msgs c|alc-help|
|000020b0| 2d 6c 6f 6e 67 2d 6e 61 | 6d 65 73 20 65 72 72 20 |-long-na|mes err |
|000020c0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c1 08 21 87 |(byte-co|de "..!.|
|000020d0| 22 20 5b 70 72 65 66 69 | 78 20 66 75 6e 63 61 6c |" [prefi|x funcal|
|000020e0| 6c 5d 20 32 29 20 28 28 | 65 72 72 6f 72 20 28 62 |l] 2) ((|error (b|
|000020f0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 87 22 20 5b 6e |yte-code| ".." [n|
|00002100| 69 6c 5d 20 31 29 29 29 | 20 70 72 69 6e 63 20 32 |il] 1)))| princ 2|
|00002110| 20 31 31 38 20 22 0a 60 | 76 27 20 6f 72 20 60 56 | 118 ".`|v' or `V|
|00002120| 27 20 70 72 65 66 69 78 | 20 28 76 65 63 74 6f 72 |' prefix| (vector|
|00002130| 2f 6d 61 74 72 69 78 29 | 20 6b 65 79 73 3a 20 0a |/matrix)| keys: .|
|00002140| 22 20 66 6f 72 6d 61 74 | 20 22 0a 60 25 63 27 20 |" format| ".`%c' |
|00002150| 70 72 65 66 69 78 20 28 | 25 73 29 20 6b 65 79 73 |prefix (|%s) keys|
|00002160| 3a 0a 22 20 61 73 73 71 | 20 31 20 22 0a 25 73 2d |:." assq| 1 ".%s-|
|00002170| 6d 6f 64 69 66 69 65 64 | 20 6b 65 79 73 3a 0a 22 |modified| keys:."|
|00002180| 20 63 61 70 69 74 61 6c | 69 7a 65 20 6d 61 70 63 | capital|ize mapc|
|00002190| 61 72 20 28 6c 61 6d 62 | 64 61 20 28 78 29 20 28 |ar (lamb|da (x) (|
|000021a0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c1 c2 c3 08 5c |byte-cod|e "....\|
|000021b0| 22 21 87 22 20 5b 78 20 | 70 72 69 6e 63 20 66 6f |"!." [x |princ fo|
|000021c0| 72 6d 61 74 20 22 20 20 | 25 73 0a 22 5d 20 34 29 |rmat " |%s."] 4)|
|000021d0| 29 5d 20 38 29 29 20 28 | 63 61 6c 63 2d 69 6e 76 |)] 8)) (|calc-inv|
|000021e0| 65 72 73 65 2d 70 72 65 | 66 69 78 2d 68 65 6c 70 |erse-pre|fix-help|
|000021f0| 20 63 61 6c 63 2d 68 79 | 70 65 72 62 6f 6c 69 63 | calc-hy|perbolic|
|00002200| 2d 70 72 65 66 69 78 2d | 68 65 6c 70 20 63 61 6c |-prefix-|help cal|
|00002210| 63 2d 69 6e 76 2d 68 79 | 70 2d 70 72 65 66 69 78 |c-inv-hy|p-prefix|
|00002220| 2d 68 65 6c 70 20 63 61 | 6c 63 2d 61 2d 70 72 65 |-help ca|lc-a-pre|
|00002230| 66 69 78 2d 68 65 6c 70 | 20 63 61 6c 63 2d 62 2d |fix-help| calc-b-|
|00002240| 70 72 65 66 69 78 2d 68 | 65 6c 70 20 63 61 6c 63 |prefix-h|elp calc|
|00002250| 2d 63 2d 70 72 65 66 69 | 78 2d 68 65 6c 70 20 63 |-c-prefi|x-help c|
|00002260| 61 6c 63 2d 64 2d 70 72 | 65 66 69 78 2d 68 65 6c |alc-d-pr|efix-hel|
|00002270| 70 20 63 61 6c 63 2d 66 | 2d 70 72 65 66 69 78 2d |p calc-f|-prefix-|
|00002280| 68 65 6c 70 20 63 61 6c | 63 2d 67 2d 70 72 65 66 |help cal|c-g-pref|
|00002290| 69 78 2d 68 65 6c 70 20 | 63 61 6c 63 2d 68 2d 70 |ix-help |calc-h-p|
|000022a0| 72 65 66 69 78 2d 68 65 | 6c 70 20 63 61 6c 63 2d |refix-he|lp calc-|
|000022b0| 6a 2d 70 72 65 66 69 78 | 2d 68 65 6c 70 20 63 61 |j-prefix|-help ca|
|000022c0| 6c 63 2d 6b 2d 70 72 65 | 66 69 78 2d 68 65 6c 70 |lc-k-pre|fix-help|
|000022d0| 20 63 61 6c 63 2d 6d 2d | 70 72 65 66 69 78 2d 68 | calc-m-|prefix-h|
|000022e0| 65 6c 70 20 63 61 6c 63 | 2d 72 2d 70 72 65 66 69 |elp calc|-r-prefi|
|000022f0| 78 2d 68 65 6c 70 20 63 | 61 6c 63 2d 73 2d 70 72 |x-help c|alc-s-pr|
|00002300| 65 66 69 78 2d 68 65 6c | 70 20 63 61 6c 63 2d 74 |efix-hel|p calc-t|
|00002310| 2d 70 72 65 66 69 78 2d | 68 65 6c 70 20 63 61 6c |-prefix-|help cal|
|00002320| 63 2d 75 2d 70 72 65 66 | 69 78 2d 68 65 6c 70 20 |c-u-pref|ix-help |
|00002330| 63 61 6c 63 2d 76 2d 70 | 72 65 66 69 78 2d 68 65 |calc-v-p|refix-he|
|00002340| 6c 70 20 63 61 6c 63 2d | 73 68 69 66 74 2d 59 2d |lp calc-|shift-Y-|
|00002350| 70 72 65 66 69 78 2d 68 | 65 6c 70 20 63 61 6c 63 |prefix-h|elp calc|
|00002360| 2d 73 68 69 66 74 2d 5a | 2d 70 72 65 66 69 78 2d |-shift-Z|-prefix-|
|00002370| 68 65 6c 70 20 63 61 6c | 63 2d 7a 2d 70 72 65 66 |help cal|c-z-pref|
|00002380| 69 78 2d 68 65 6c 70 29 | 20 70 72 69 6e 74 2d 68 |ix-help)| print-h|
|00002390| 65 6c 70 2d 72 65 74 75 | 72 6e 2d 6d 65 73 73 61 |elp-retu|rn-messa|
|000023a0| 67 65 5d 20 31 37 29 29 | 0a 0a 28 64 65 66 76 61 |ge] 17))|..(defva|
|000023b0| 72 20 63 61 6c 63 2d 68 | 65 6c 70 2d 6c 6f 6e 67 |r calc-h|elp-long|
|000023c0| 2d 6e 61 6d 65 73 20 28 | 71 75 6f 74 65 20 28 28 |-names (|quote ((|
|000023d0| 39 38 20 2e 20 22 62 69 | 6e 61 72 79 2f 62 75 73 |98 . "bi|nary/bus|
|000023e0| 69 6e 65 73 73 22 29 20 | 28 31 30 33 20 2e 20 22 |iness") |(103 . "|
|000023f0| 67 72 61 70 68 69 63 73 | 22 29 20 28 31 30 36 20 |graphics|") (106 |
|00002400| 2e 20 22 73 65 6c 65 63 | 74 69 6f 6e 22 29 20 28 |. "selec|tion") (|
|00002410| 31 30 37 20 2e 20 22 63 | 6f 6d 62 69 6e 61 74 6f |107 . "c|ombinato|
|00002420| 72 69 63 73 2f 73 74 61 | 74 69 73 74 69 63 73 22 |rics/sta|tistics"|
|00002430| 29 20 28 31 31 37 20 2e | 20 22 75 6e 69 74 73 2f |) (117 .| "units/|
|00002440| 73 74 61 74 69 73 74 69 | 63 73 22 29 29 29 29 0a |statisti|cs")))).|
|00002450| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 68 2d 70 |.(defun |calc-h-p|
|00002460| 72 65 66 69 78 2d 68 65 | 6c 70 20 6e 69 6c 20 28 |refix-he|lp nil (|
|00002470| 69 6e 74 65 72 61 63 74 | 69 76 65 29 20 28 62 79 |interact|ive) (by|
|00002480| 74 65 2d 63 6f 64 65 20 | 22 c0 88 c1 c2 c3 c4 23 |te-code |"......#|
|00002490| 87 22 20 5b 6e 69 6c 20 | 63 61 6c 63 2d 64 6f 2d |." [nil |calc-do-|
|000024a0| 70 72 65 66 69 78 2d 68 | 65 6c 70 20 28 22 48 65 |prefix-h|elp ("He|
|000024b0| 6c 70 3b 20 42 69 6e 64 | 69 6e 67 73 3b 20 49 6e |lp; Bind|ings; In|
|000024c0| 66 6f 2c 20 54 75 74 6f | 72 69 61 6c 2c 20 53 75 |fo, Tuto|rial, Su|
|000024d0| 6d 6d 61 72 79 3b 20 4e | 65 77 73 22 20 22 64 65 |mmary; N|ews" "de|
|000024e0| 73 63 72 69 62 65 3a 20 | 4b 65 79 2c 20 43 20 28 |scribe: |Key, C (|
|000024f0| 62 72 69 65 66 6c 79 29 | 2c 20 46 75 6e 63 74 69 |briefly)|, Functi|
|00002500| 6f 6e 2c 20 56 61 72 69 | 61 62 6c 65 22 29 20 22 |on, Vari|able") "|
|00002510| 68 65 6c 70 22 20 31 30 | 34 5d 20 34 29 29 0a 0a |help" 10|4] 4))..|
|00002520| 28 64 65 66 75 6e 20 63 | 61 6c 63 2d 69 6e 76 65 |(defun c|alc-inve|
|00002530| 72 73 65 2d 70 72 65 66 | 69 78 2d 68 65 6c 70 20 |rse-pref|ix-help |
|00002540| 6e 69 6c 20 28 69 6e 74 | 65 72 61 63 74 69 76 65 |nil (int|eractive|
|00002550| 29 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 88 |) (byte-|code "..|
|00002560| c1 c2 c3 c0 23 87 22 20 | 5b 6e 69 6c 20 63 61 6c |....#." |[nil cal|
|00002570| 63 2d 64 6f 2d 70 72 65 | 66 69 78 2d 68 65 6c 70 |c-do-pre|fix-help|
|00002580| 20 28 22 49 20 2b 20 53 | 20 28 61 72 63 73 69 6e | ("I + S| (arcsin|
|00002590| 29 2c 20 43 20 28 61 72 | 63 63 6f 73 29 2c 20 54 |), C (ar|ccos), T|
|000025a0| 20 28 61 72 63 74 61 6e | 29 3b 20 51 20 28 73 71 | (arctan|); Q (sq|
|000025b0| 75 61 72 65 29 22 20 22 | 49 20 2b 20 45 20 28 6c |uare)" "|I + E (l|
|000025c0| 6e 29 2c 20 4c 20 28 65 | 78 70 29 2c 20 42 20 28 |n), L (e|xp), B (|
|000025d0| 61 6c 6f 67 3a 20 42 5e | 58 29 3b 20 66 20 45 20 |alog: B^|X); f E |
|000025e0| 28 6c 6e 70 31 29 2c 20 | 66 20 4c 20 28 65 78 70 |(lnp1), |f L (exp|
|000025f0| 6d 31 29 22 20 22 49 20 | 2b 20 46 20 28 63 65 69 |m1)" "I |+ F (cei|
|00002600| 6c 69 6e 67 29 2c 20 52 | 20 28 74 72 75 6e 63 61 |ling), R| (trunca|
|00002610| 74 65 29 3b 20 61 20 53 | 20 28 69 6e 76 65 72 74 |te); a S| (invert|
|00002620| 20 66 75 6e 63 29 22 20 | 22 49 20 2b 20 61 20 6d | func)" |"I + a m|
|00002630| 20 28 6d 61 74 63 68 2d | 6e 6f 74 29 3b 20 63 20 | (match-|not); c |
|00002640| 68 20 28 66 72 6f 6d 2d | 68 6d 73 29 3b 20 6b 20 |h (from-|hms); k |
|00002650| 6e 20 28 70 72 65 76 20 | 70 72 69 6d 65 29 22 20 |n (prev |prime)" |
|00002660| 22 49 20 2b 20 66 20 47 | 20 28 67 61 6d 6d 61 2d |"I + f G| (gamma-|
|00002670| 51 29 3b 20 66 20 65 20 | 28 65 72 66 63 29 3b 20 |Q); f e |(erfc); |
|00002680| 6b 20 42 20 28 65 74 63 | 2e 2c 20 6c 6f 77 65 72 |k B (etc|., lower|
|00002690| 2d 74 61 69 6c 20 64 69 | 73 74 73 29 22 20 22 49 |-tail di|sts)" "I|
|000026a0| 20 2b 20 56 20 53 20 28 | 72 65 76 65 72 73 65 20 | + V S (|reverse |
|000026b0| 73 6f 72 74 29 3b 20 56 | 20 47 20 28 72 65 76 65 |sort); V| G (reve|
|000026c0| 72 73 65 20 67 72 61 64 | 65 29 22 20 22 49 20 2b |rse grad|e)" "I +|
|000026d0| 20 76 20 73 20 28 72 65 | 6d 6f 76 65 20 73 75 62 | v s (re|move sub|
|000026e0| 76 65 63 29 3b 20 76 20 | 68 20 28 74 61 69 6c 29 |vec); v |h (tail)|
|000026f0| 22 20 22 49 20 2b 20 74 | 20 2b 20 28 61 6c 74 20 |" "I + t| + (alt |
|00002700| 73 75 6d 29 2c 20 74 20 | 4d 20 28 6d 65 61 6e 20 |sum), t |M (mean |
|00002710| 77 69 74 68 20 65 72 72 | 6f 72 29 22 20 22 49 20 |with err|or)" "I |
|00002720| 2b 20 74 20 53 20 28 70 | 6f 70 20 73 74 64 20 64 |+ t S (p|op std d|
|00002730| 65 76 29 2c 20 74 20 43 | 20 28 70 6f 70 20 63 6f |ev), t C| (pop co|
|00002740| 76 61 72 29 22 29 20 22 | 69 6e 76 65 72 73 65 22 |var)") "|inverse"|
|00002750| 5d 20 34 29 29 0a 0a 28 | 64 65 66 75 6e 20 63 61 |] 4))..(|defun ca|
|00002760| 6c 63 2d 68 79 70 65 72 | 62 6f 6c 69 63 2d 70 72 |lc-hyper|bolic-pr|
|00002770| 65 66 69 78 2d 68 65 6c | 70 20 6e 69 6c 20 28 69 |efix-hel|p nil (i|
|00002780| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 62 79 74 |nteracti|ve) (byt|
|00002790| 65 2d 63 6f 64 65 20 22 | c0 88 c1 c2 c3 c0 23 87 |e-code "|......#.|
|000027a0| 22 20 5b 6e 69 6c 20 63 | 61 6c 63 2d 64 6f 2d 70 |" [nil c|alc-do-p|
|000027b0| 72 65 66 69 78 2d 68 65 | 6c 70 20 28 22 48 20 2b |refix-he|lp ("H +|
|000027c0| 20 53 20 28 73 69 6e 68 | 29 2c 20 43 20 28 63 6f | S (sinh|), C (co|
|000027d0| 73 68 29 2c 20 54 20 28 | 74 61 6e 68 29 3b 20 45 |sh), T (|tanh); E|
|000027e0| 20 28 65 78 70 31 30 29 | 2c 20 4c 20 28 6c 6f 67 | (exp10)|, L (log|
|000027f0| 31 30 29 22 20 22 48 20 | 2b 20 46 20 28 66 6c 6f |10)" "H |+ F (flo|
|00002800| 61 74 20 66 6c 6f 6f 72 | 29 2c 20 52 20 28 66 6c |at floor|), R (fl|
|00002810| 6f 61 74 20 72 6f 75 6e | 64 29 3b 20 50 20 28 63 |oat roun|d); P (c|
|00002820| 6f 6e 73 74 61 6e 74 20 | 5c 22 65 5c 22 29 22 20 |onstant |\"e\")" |
|00002830| 22 48 20 2b 20 61 20 64 | 20 28 74 6f 74 61 6c 20 |"H + a d| (total |
|00002840| 64 65 72 69 76 61 74 69 | 76 65 29 3b 20 6b 20 63 |derivati|ve); k c|
|00002850| 20 28 70 65 72 6d 75 74 | 61 74 69 6f 6e 73 29 22 | (permut|ations)"|
|00002860| 20 22 48 20 2b 20 6b 20 | 62 20 28 62 65 72 6e 2d | "H + k |b (bern-|
|00002870| 70 6f 6c 79 29 2c 20 6b | 20 65 20 28 65 75 6c 65 |poly), k| e (eule|
|00002880| 72 2d 70 6f 6c 79 29 3b | 20 6b 20 73 20 28 73 74 |r-poly);| k s (st|
|00002890| 69 72 6c 69 6e 67 2d 32 | 29 22 20 22 48 20 2b 20 |irling-2|)" "H + |
|000028a0| 66 20 47 20 28 67 61 6d | 6d 61 2d 67 29 2c 20 66 |f G (gam|ma-g), f|
|000028b0| 20 42 20 28 62 65 74 61 | 2d 42 29 3b 20 76 20 68 | B (beta|-B); v h|
|000028c0| 20 28 72 68 65 61 64 29 | 2c 20 76 20 6b 20 28 72 | (rhead)|, v k (r|
|000028d0| 63 6f 6e 73 29 22 20 22 | 48 20 2b 20 76 20 65 20 |cons)" "|H + v e |
|000028e0| 28 65 78 70 61 6e 64 20 | 77 2f 66 69 6c 6c 65 72 |(expand |w/filler|
|000028f0| 29 3b 20 56 20 48 20 28 | 77 65 69 67 68 74 65 64 |); V H (|weighted|
|00002900| 20 68 69 73 74 6f 67 72 | 61 6d 29 22 20 22 48 20 | histogr|am)" "H |
|00002910| 2b 20 61 20 53 20 28 67 | 65 6e 65 72 61 6c 20 73 |+ a S (g|eneral s|
|00002920| 6f 6c 76 65 20 65 71 6e | 29 2c 20 6a 20 49 20 28 |olve eqn|), j I (|
|00002930| 67 65 6e 65 72 61 6c 20 | 69 73 6f 6c 61 74 65 29 |general |isolate)|
|00002940| 22 20 22 48 20 2b 20 61 | 20 52 20 28 77 69 64 65 |" "H + a| R (wide|
|00002950| 6e 2f 72 6f 6f 74 29 2c | 20 61 20 4e 20 28 77 69 |n/root),| a N (wi|
|00002960| 64 65 6e 2f 6d 69 6e 29 | 2c 20 61 20 58 20 28 77 |den/min)|, a X (w|
|00002970| 69 64 65 6e 2f 6d 61 78 | 29 22 20 22 48 20 2b 20 |iden/max|)" "H + |
|00002980| 74 20 4d 20 28 6d 65 64 | 69 61 6e 29 2c 20 74 20 |t M (med|ian), t |
|00002990| 53 20 28 76 61 72 69 61 | 6e 63 65 29 2c 20 74 20 |S (varia|nce), t |
|000029a0| 43 20 28 63 6f 72 72 65 | 6c 61 74 69 6f 6e 20 63 |C (corre|lation c|
|000029b0| 6f 65 66 29 22 20 22 48 | 20 2b 20 63 20 66 2f 46 |oef)" "H| + c f/F|
|000029c0| 2f 63 20 28 70 65 72 76 | 61 73 69 76 65 20 66 6c |/c (perv|asive fl|
|000029d0| 6f 61 74 2f 66 72 61 63 | 2f 63 6c 65 61 6e 29 22 |oat/frac|/clean)"|
|000029e0| 29 20 22 68 79 70 65 72 | 62 6f 6c 69 63 22 5d 20 |) "hyper|bolic"] |
|000029f0| 34 29 29 0a 0a 28 64 65 | 66 75 6e 20 63 61 6c 63 |4))..(de|fun calc|
|00002a00| 2d 69 6e 76 2d 68 79 70 | 2d 70 72 65 66 69 78 2d |-inv-hyp|-prefix-|
|00002a10| 68 65 6c 70 20 6e 69 6c | 20 28 69 6e 74 65 72 61 |help nil| (intera|
|00002a20| 63 74 69 76 65 29 20 28 | 62 79 74 65 2d 63 6f 64 |ctive) (|byte-cod|
|00002a30| 65 20 22 c0 88 c1 c2 c3 | c0 23 87 22 20 5b 6e 69 |e ".....|.#." [ni|
|00002a40| 6c 20 63 61 6c 63 2d 64 | 6f 2d 70 72 65 66 69 78 |l calc-d|o-prefix|
|00002a50| 2d 68 65 6c 70 20 28 22 | 49 20 48 20 2b 20 53 20 |-help ("|I H + S |
|00002a60| 28 61 72 63 73 69 6e 68 | 29 2c 20 43 20 28 61 72 |(arcsinh|), C (ar|
|00002a70| 63 63 6f 73 68 29 2c 20 | 54 20 28 61 72 63 74 61 |ccosh), |T (arcta|
|00002a80| 6e 68 29 22 20 22 49 20 | 48 20 2b 20 45 20 28 6c |nh)" "I |H + E (l|
|00002a90| 6f 67 31 30 29 2c 20 4c | 20 28 65 78 70 31 30 29 |og10), L| (exp10)|
|00002aa0| 3b 20 66 20 47 20 28 67 | 61 6d 6d 61 2d 47 29 22 |; f G (g|amma-G)"|
|00002ab0| 20 22 49 20 48 20 2b 20 | 46 20 28 66 6c 6f 61 74 | "I H + |F (float|
|00002ac0| 20 63 65 69 6c 69 6e 67 | 29 2c 20 52 20 28 66 6c | ceiling|), R (fl|
|00002ad0| 6f 61 74 20 74 72 75 6e | 63 61 74 65 29 22 20 22 |oat trun|cate)" "|
|00002ae0| 49 20 48 20 2b 20 74 20 | 53 20 28 70 6f 70 20 76 |I H + t |S (pop v|
|00002af0| 61 72 69 61 6e 63 65 29 | 22 20 22 49 20 48 20 2b |ariance)|" "I H +|
|00002b00| 20 61 20 53 20 28 67 65 | 6e 65 72 61 6c 20 69 6e | a S (ge|neral in|
|00002b10| 76 65 72 74 20 66 75 6e | 63 29 3b 20 76 20 68 20 |vert fun|c); v h |
|00002b20| 28 72 74 61 69 6c 29 22 | 29 20 22 69 6e 76 65 72 |(rtail)"|) "inver|
|00002b30| 73 65 2d 68 79 70 65 72 | 62 6f 6c 69 63 22 5d 20 |se-hyper|bolic"] |
|00002b40| 34 29 29 0a 0a 28 64 65 | 66 75 6e 20 63 61 6c 63 |4))..(de|fun calc|
|00002b50| 2d 66 2d 70 72 65 66 69 | 78 2d 68 65 6c 70 20 6e |-f-prefi|x-help n|
|00002b60| 69 6c 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 29 |il (inte|ractive)|
|00002b70| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 88 c1 | (byte-c|ode "...|
|00002b80| c2 c3 c4 23 87 22 20 5b | 6e 69 6c 20 63 61 6c 63 |...#." [|nil calc|
|00002b90| 2d 64 6f 2d 70 72 65 66 | 69 78 2d 68 65 6c 70 20 |-do-pref|ix-help |
|00002ba0| 28 22 6d 69 4e 2c 20 6d | 61 58 3b 20 48 79 70 6f |("miN, m|aX; Hypo|
|00002bb0| 74 3b 20 49 6d 2c 20 52 | 65 3b 20 53 69 67 6e 3b |t; Im, R|e; Sign;|
|00002bc0| 20 5b 2c 20 5d 20 28 69 | 6e 63 72 2f 64 65 63 72 | [, ] (i|ncr/decr|
|00002bd0| 29 22 20 22 47 61 6d 6d | 61 2c 20 42 65 74 61 2c |)" "Gamm|a, Beta,|
|00002be0| 20 45 72 66 2c 20 62 65 | 73 73 65 6c 4a 2c 20 62 | Erf, be|sselJ, b|
|00002bf0| 65 73 73 65 6c 59 22 20 | 22 53 48 49 46 54 20 2b |esselY" |"SHIFT +|
|00002c00| 20 69 6e 74 2d 73 51 72 | 74 3b 20 49 6e 74 2d 6c | int-sQr|t; Int-l|
|00002c10| 6f 67 2c 20 45 78 70 28 | 78 29 2d 31 2c 20 4c 6e |og, Exp(|x)-1, Ln|
|00002c20| 28 78 2b 31 29 3b 20 61 | 72 63 54 61 6e 32 22 20 |(x+1); a|rcTan2" |
|00002c30| 22 53 48 49 46 54 20 2b | 20 41 62 73 73 71 72 3b |"SHIFT +| Abssqr;|
|00002c40| 20 4d 61 6e 74 69 73 73 | 61 2c 20 65 58 70 6f 6e | Mantiss|a, eXpon|
|00002c50| 65 6e 74 2c 20 53 63 61 | 6c 65 22 20 22 53 48 49 |ent, Sca|le" "SHI|
|00002c60| 46 54 20 2b 20 69 6e 63 | 6f 6d 70 6c 65 74 65 3a |FT + inc|omplete:|
|00002c70| 20 47 61 6d 6d 61 2d 50 | 2c 20 42 65 74 61 2d 49 | Gamma-P|, Beta-I|
|00002c80| 22 29 20 22 66 75 6e 63 | 74 69 6f 6e 73 22 20 31 |") "func|tions" 1|
|00002c90| 30 32 5d 20 34 29 29 0a | 0a 28 64 65 66 75 6e 20 |02] 4)).|.(defun |
|00002ca0| 63 61 6c 63 2d 73 2d 70 | 72 65 66 69 78 2d 68 65 |calc-s-p|refix-he|
|00002cb0| 6c 70 20 6e 69 6c 20 28 | 69 6e 74 65 72 61 63 74 |lp nil (|interact|
|00002cc0| 69 76 65 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |ive) (by|te-code |
|00002cd0| 22 c0 88 c1 c2 c3 c4 23 | 87 22 20 5b 6e 69 6c 20 |"......#|." [nil |
|00002ce0| 63 61 6c 63 2d 64 6f 2d | 70 72 65 66 69 78 2d 68 |calc-do-|prefix-h|
|00002cf0| 65 6c 70 20 28 22 53 74 | 6f 72 65 2c 20 69 6e 54 |elp ("St|ore, inT|
|00002d00| 6f 2c 20 58 63 68 67 2c | 20 55 6e 73 74 6f 72 65 |o, Xchg,| Unstore|
|00002d10| 3b 20 52 65 63 61 6c 6c | 2c 20 30 2d 39 3b 20 3a |; Recall|, 0-9; :|
|00002d20| 20 28 3a 3d 29 3b 20 3d | 20 28 3d 3e 29 22 20 22 | (:=); =| (=>)" "|
|00002d30| 4c 65 74 3b 20 43 6f 70 | 79 3b 20 44 65 63 6c 61 |Let; Cop|y; Decla|
|00002d40| 72 65 3b 20 49 6e 73 65 | 72 74 2c 20 50 65 72 6d |re; Inse|rt, Perm|
|00002d50| 3b 20 45 64 69 74 22 20 | 22 4e 65 67 61 74 65 2c |; Edit" |"Negate,|
|00002d60| 20 2b 2c 20 2d 2c 20 2a | 2c 20 2f 2c 20 5e 2c 20 | +, -, *|, /, ^, |
|00002d70| 26 2c 20 7c 2c 20 5b 2c | 20 5d 3b 20 4d 61 70 22 |&, |, [,| ]; Map"|
|00002d80| 20 22 53 48 49 46 54 20 | 2b 20 44 65 63 6c 73 2c | "SHIFT |+ Decls,|
|00002d90| 20 47 65 6e 43 6f 75 6e | 74 2c 20 54 69 6d 65 5a | GenCoun|t, TimeZ|
|00002da0| 6f 6e 65 2c 20 48 6f 6c | 69 64 61 79 73 3b 20 49 |one, Hol|idays; I|
|00002db0| 6e 74 65 67 4c 69 6d 69 | 74 22 20 22 53 48 49 46 |ntegLimi|t" "SHIF|
|00002dc0| 54 20 2b 20 4c 69 6e 65 | 53 74 79 6c 65 73 2c 20 |T + Line|Styles, |
|00002dd0| 50 6f 69 6e 74 53 74 79 | 6c 65 73 2c 20 70 6c 6f |PointSty|les, plo|
|00002de0| 74 52 65 6a 65 63 74 73 | 3b 20 55 6e 69 74 73 22 |tRejects|; Units"|
|00002df0| 20 22 53 48 49 46 54 20 | 2b 20 45 76 61 6c 2d 2c | "SHIFT |+ Eval-,|
|00002e00| 20 41 6c 67 53 69 6d 70 | 2d 2c 20 45 78 74 53 69 | AlgSimp|-, ExtSi|
|00002e10| 6d 70 2d 2c 20 46 69 74 | 52 75 6c 65 73 22 29 20 |mp-, Fit|Rules") |
|00002e20| 22 73 74 6f 72 65 22 20 | 31 31 35 5d 20 34 29 29 |"store" |115] 4))|
|00002e30| 0a 0a 28 64 65 66 75 6e | 20 63 61 6c 63 2d 72 2d |..(defun| calc-r-|
|00002e40| 70 72 65 66 69 78 2d 68 | 65 6c 70 20 6e 69 6c 20 |prefix-h|elp nil |
|00002e50| 28 69 6e 74 65 72 61 63 | 74 69 76 65 29 20 28 62 |(interac|tive) (b|
|00002e60| 79 74 65 2d 63 6f 64 65 | 20 22 c0 88 c1 c2 c3 c4 |yte-code| "......|
|00002e70| 23 87 22 20 5b 6e 69 6c | 20 63 61 6c 63 2d 64 6f |#." [nil| calc-do|
|00002e80| 2d 70 72 65 66 69 78 2d | 68 65 6c 70 20 28 22 64 |-prefix-|help ("d|
|00002e90| 69 67 69 74 73 20 30 2d | 39 3a 20 72 65 63 61 6c |igits 0-|9: recal|
|00002ea0| 6c 2c 20 73 61 6d 65 20 | 61 73 20 60 73 20 72 20 |l, same |as `s r |
|00002eb0| 30 2d 39 27 22 29 20 22 | 72 65 63 61 6c 6c 22 20 |0-9'") "|recall" |
|00002ec0| 31 31 34 5d 20 34 29 29 | 0a 0a 28 64 65 66 75 6e |114] 4))|..(defun|
|00002ed0| 20 63 61 6c 63 2d 6a 2d | 70 72 65 66 69 78 2d 68 | calc-j-|prefix-h|
|00002ee0| 65 6c 70 20 6e 69 6c 20 | 28 69 6e 74 65 72 61 63 |elp nil |(interac|
|00002ef0| 74 69 76 65 29 20 28 62 | 79 74 65 2d 63 6f 64 65 |tive) (b|yte-code|
|00002f00| 20 22 c0 88 c1 c2 c3 c4 | 23 87 22 20 5b 6e 69 6c | "......|#." [nil|
|00002f10| 20 63 61 6c 63 2d 64 6f | 2d 70 72 65 66 69 78 2d | calc-do|-prefix-|
|00002f20| 68 65 6c 70 20 28 22 53 | 65 6c 65 63 74 2c 20 41 |help ("S|elect, A|
|00002f30| 64 64 69 74 69 6f 6e 61 | 6c 2c 20 4f 6e 63 65 3b |dditiona|l, Once;|
|00002f40| 20 65 56 61 6c 2c 20 46 | 6f 72 6d 75 6c 61 3b 20 | eVal, F|ormula; |
|00002f50| 52 65 77 72 69 74 65 22 | 20 22 4d 6f 72 65 2c 20 |Rewrite"| "More, |
|00002f60| 4c 65 73 73 2c 20 31 2d | 39 2c 20 4e 65 78 74 2c |Less, 1-|9, Next,|
|00002f70| 20 50 72 65 76 69 6f 75 | 73 22 20 22 55 6e 73 65 | Previou|s" "Unse|
|00002f80| 6c 65 63 74 2c 20 43 6c | 65 61 72 3b 20 44 69 73 |lect, Cl|ear; Dis|
|00002f90| 70 6c 61 79 3b 20 45 6e | 61 62 6c 65 3b 20 42 72 |play; En|able; Br|
|00002fa0| 65 61 6b 61 62 6c 65 22 | 20 22 27 20 28 72 65 70 |eakable"| "' (rep|
|00002fb0| 6c 61 63 65 29 2c 20 60 | 20 28 65 64 69 74 29 2c |lace), `| (edit),|
|00002fc0| 20 2b 2c 20 2d 2c 20 2a | 2c 20 2f 2c 20 52 45 54 | +, -, *|, /, RET|
|00002fd0| 20 28 67 72 61 62 29 2c | 20 44 45 4c 22 20 22 53 | (grab),| DEL" "S|
|00002fe0| 48 49 46 54 20 2b 20 73 | 77 61 70 3a 20 4c 65 66 |HIFT + s|wap: Lef|
|00002ff0| 74 2c 20 52 69 67 68 74 | 3b 20 6d 61 79 62 65 3a |t, Right|; maybe:|
|00003000| 20 53 65 6c 65 63 74 2c | 20 4f 6e 63 65 22 20 22 | Select,| Once" "|
|00003010| 53 48 49 46 54 20 2b 20 | 43 6f 6d 6d 75 74 65 2c |SHIFT + |Commute,|
|00003020| 20 4d 65 72 67 65 2c 20 | 44 69 73 74 72 69 62 2c | Merge, |Distrib,|
|00003030| 20 6a 75 6d 70 2d 45 71 | 6e 2c 20 49 73 6f 6c 61 | jump-Eq|n, Isola|
|00003040| 74 65 22 20 22 53 48 49 | 46 54 20 2b 20 4e 65 67 |te" "SHI|FT + Neg|
|00003050| 61 74 65 2c 20 26 20 28 | 69 6e 76 65 72 74 29 3b |ate, & (|invert);|
|00003060| 20 55 6e 70 61 63 6b 22 | 29 20 22 73 65 6c 65 63 | Unpack"|) "selec|
|00003070| 74 22 20 31 30 36 5d 20 | 34 29 29 0a 0a 28 64 65 |t" 106] |4))..(de|
|00003080| 66 75 6e 20 63 61 6c 63 | 2d 61 2d 70 72 65 66 69 |fun calc|-a-prefi|
|00003090| 78 2d 68 65 6c 70 20 6e | 69 6c 20 28 69 6e 74 65 |x-help n|il (inte|
|000030a0| 72 61 63 74 69 76 65 29 | 20 28 62 79 74 65 2d 63 |ractive)| (byte-c|
|000030b0| 6f 64 65 20 22 c0 88 c1 | c2 c3 c4 23 87 22 20 5b |ode "...|...#." [|
|000030c0| 6e 69 6c 20 63 61 6c 63 | 2d 64 6f 2d 70 72 65 66 |nil calc|-do-pref|
|000030d0| 69 78 2d 68 65 6c 70 20 | 28 22 53 69 6d 70 6c 69 |ix-help |("Simpli|
|000030e0| 66 79 2c 20 45 78 74 65 | 6e 64 65 64 2d 73 69 6d |fy, Exte|nded-sim|
|000030f0| 70 6c 69 66 79 2c 20 65 | 56 61 6c 3b 20 5c 22 20 |plify, e|Val; \" |
|00003100| 28 65 78 70 2d 66 6f 72 | 6d 75 6c 61 29 22 20 22 |(exp-for|mula)" "|
|00003110| 65 58 70 61 6e 64 2c 20 | 43 6f 6c 6c 65 63 74 2c |eXpand, |Collect,|
|00003120| 20 46 61 63 74 6f 72 2c | 20 41 70 61 72 74 2c 20 | Factor,| Apart, |
|00003130| 4e 6f 72 6d 2d 72 61 74 | 22 20 22 47 43 44 2c 20 |Norm-rat|" "GCD, |
|00003140| 2f 2c 20 5c 5c 2c 20 25 | 20 28 70 6f 6c 79 73 29 |/, \\, %| (polys)|
|00003150| 3b 20 50 6f 6c 69 6e 74 | 22 20 22 44 65 72 69 76 |; Polint|" "Deriv|
|00003160| 61 74 69 76 65 2c 20 49 | 6e 74 65 67 72 61 6c 2c |ative, I|ntegral,|
|00003170| 20 54 61 79 6c 6f 72 3b | 20 5f 20 28 73 75 62 73 | Taylor;| _ (subs|
|00003180| 63 72 29 22 20 22 73 75 | 42 73 74 69 74 75 74 65 |cr)" "su|Bstitute|
|00003190| 3b 20 52 65 77 72 69 74 | 65 2c 20 4d 61 74 63 68 |; Rewrit|e, Match|
|000031a0| 22 20 22 53 48 49 46 54 | 20 2b 20 53 6f 6c 76 65 |" "SHIFT| + Solve|
|000031b0| 3b 20 52 6f 6f 74 2c 20 | 6d 69 4e 2c 20 6d 61 58 |; Root, |miN, maX|
|000031c0| 3b 20 50 6f 6c 79 2d 72 | 6f 6f 74 73 3b 20 46 69 |; Poly-r|oots; Fi|
|000031d0| 74 22 20 22 53 48 49 46 | 54 20 2b 20 4d 61 70 3b |t" "SHIF|T + Map;|
|000031e0| 20 54 61 62 75 6c 61 74 | 65 2c 20 2b 20 28 73 75 | Tabulat|e, + (su|
|000031f0| 6d 29 2c 20 2a 20 28 70 | 72 6f 64 29 3b 20 6e 75 |m), * (p|rod); nu|
|00003200| 6d 2d 49 6e 74 65 67 22 | 20 22 72 65 6c 61 74 69 |m-Integ"| "relati|
|00003210| 6f 6e 73 3a 20 3d 2c 20 | 23 20 28 6e 6f 74 20 3d |ons: =, |# (not =|
|00003220| 29 2c 20 3c 2c 20 3e 2c | 20 5b 20 28 3c 20 6f 72 |), <, >,| [ (< or|
|00003230| 20 3d 29 2c 20 5d 20 28 | 3e 20 6f 72 20 3d 29 22 | =), ] (|> or =)"|
|00003240| 20 22 6c 6f 67 69 63 61 | 6c 3a 20 26 20 28 61 6e | "logica|l: & (an|
|00003250| 64 29 2c 20 7c 20 28 6f | 72 29 2c 20 21 20 28 6e |d), | (o|r), ! (n|
|00003260| 6f 74 29 3b 20 3a 20 28 | 69 66 29 22 20 22 6d 69 |ot); : (|if)" "mi|
|00003270| 73 63 3a 20 7b 20 28 69 | 6e 2d 73 65 74 29 3b 20 |sc: { (i|n-set); |
|00003280| 2e 20 28 72 6d 65 71 29 | 22 29 20 22 61 6c 67 65 |. (rmeq)|") "alge|
|00003290| 62 72 61 22 20 39 37 5d | 20 34 29 29 0a 0a 28 64 |bra" 97]| 4))..(d|
|000032a0| 65 66 75 6e 20 63 61 6c | 63 2d 62 2d 70 72 65 66 |efun cal|c-b-pref|
|000032b0| 69 78 2d 68 65 6c 70 20 | 6e 69 6c 20 28 69 6e 74 |ix-help |nil (int|
|000032c0| 65 72 61 63 74 69 76 65 | 29 20 28 62 79 74 65 2d |eractive|) (byte-|
|000032d0| 63 6f 64 65 20 22 c0 88 | c1 c2 c3 c4 23 87 22 20 |code "..|....#." |
|000032e0| 5b 6e 69 6c 20 63 61 6c | 63 2d 64 6f 2d 70 72 65 |[nil cal|c-do-pre|
|000032f0| 66 69 78 2d 68 65 6c 70 | 20 28 22 41 6e 64 2c 20 |fix-help| ("And, |
|00003300| 4f 72 2c 20 58 6f 72 2c | 20 44 69 66 66 2c 20 4e |Or, Xor,| Diff, N|
|00003310| 6f 74 3b 20 57 6f 72 64 | 73 69 7a 65 2c 20 43 6c |ot; Word|size, Cl|
|00003320| 69 70 22 20 22 4c 73 68 | 69 66 74 2c 20 52 73 68 |ip" "Lsh|ift, Rsh|
|00003330| 69 66 74 2c 20 72 6f 54 | 61 74 65 3b 20 53 48 49 |ift, roT|ate; SHI|
|00003340| 46 54 20 2b 20 73 69 67 | 6e 65 64 20 4c 73 68 69 |FT + sig|ned Lshi|
|00003350| 66 74 2c 20 52 73 68 69 | 66 74 22 20 22 53 48 49 |ft, Rshi|ft" "SHI|
|00003360| 46 54 20 2b 20 62 75 73 | 69 6e 65 73 73 3a 20 50 |FT + bus|iness: P|
|00003370| 76 2c 20 4e 70 76 2c 20 | 46 76 2c 20 70 4d 74 2c |v, Npv, |Fv, pMt,|
|00003380| 20 23 70 6d 74 73 2c 20 | 72 61 54 65 2c 20 49 72 | #pmts, |raTe, Ir|
|00003390| 72 22 20 22 53 48 49 46 | 54 20 2b 20 62 75 73 69 |r" "SHIF|T + busi|
|000033a0| 6e 65 73 73 3a 20 53 6c | 6e 2c 20 73 59 64 2c 20 |ness: Sl|n, sYd, |
|000033b0| 44 64 62 3b 20 25 63 68 | 22 29 20 22 62 69 6e 61 |Ddb; %ch|") "bina|
|000033c0| 72 79 2f 62 75 73 22 20 | 39 38 5d 20 34 29 29 0a |ry/bus" |98] 4)).|
|000033d0| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 63 2d 70 |.(defun |calc-c-p|
|000033e0| 72 65 66 69 78 2d 68 65 | 6c 70 20 6e 69 6c 20 28 |refix-he|lp nil (|
|000033f0| 69 6e 74 65 72 61 63 74 | 69 76 65 29 20 28 62 79 |interact|ive) (by|
|00003400| 74 65 2d 63 6f 64 65 20 | 22 c0 88 c1 c2 c3 c4 23 |te-code |"......#|
|00003410| 87 22 20 5b 6e 69 6c 20 | 63 61 6c 63 2d 64 6f 2d |." [nil |calc-do-|
|00003420| 70 72 65 66 69 78 2d 68 | 65 6c 70 20 28 22 44 65 |prefix-h|elp ("De|
|00003430| 67 2c 20 52 61 64 2c 20 | 48 4d 53 3b 20 46 6c 6f |g, Rad, |HMS; Flo|
|00003440| 61 74 3b 20 50 6f 6c 61 | 72 2f 72 65 63 74 3b 20 |at; Pola|r/rect; |
|00003450| 43 6c 65 61 6e 2c 20 30 | 2d 39 3b 20 25 22 20 22 |Clean, 0|-9; %" "|
|00003460| 53 48 49 46 54 20 2b 20 | 46 72 61 63 74 69 6f 6e |SHIFT + |Fraction|
|00003470| 22 29 20 22 63 6f 6e 76 | 65 72 74 22 20 39 39 5d |") "conv|ert" 99]|
|00003480| 20 34 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 4))..(d|efun cal|
|00003490| 63 2d 64 2d 70 72 65 66 | 69 78 2d 68 65 6c 70 20 |c-d-pref|ix-help |
|000034a0| 6e 69 6c 20 28 69 6e 74 | 65 72 61 63 74 69 76 65 |nil (int|eractive|
|000034b0| 29 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 88 |) (byte-|code "..|
|000034c0| c1 c2 c3 c4 23 87 22 20 | 5b 6e 69 6c 20 63 61 6c |....#." |[nil cal|
|000034d0| 63 2d 64 6f 2d 70 72 65 | 66 69 78 2d 68 65 6c 70 |c-do-pre|fix-help|
|000034e0| 20 28 22 47 72 6f 75 70 | 2c 20 5c 22 2c 5c 22 3b | ("Group|, \",\";|
|000034f0| 20 4e 6f 72 6d 61 6c 2c | 20 46 69 78 2c 20 53 63 | Normal,| Fix, Sc|
|00003500| 69 2c 20 45 6e 67 2c 20 | 5c 22 2e 5c 22 3b 20 4f |i, Eng, |\".\"; O|
|00003510| 76 65 72 22 20 22 52 61 | 64 69 78 2c 20 5a 65 72 |ver" "Ra|dix, Zer|
|00003520| 6f 73 2c 20 32 2c 20 38 | 2c 20 30 2c 20 36 3b 20 |os, 2, 8|, 0, 6; |
|00003530| 48 6d 73 3b 20 44 61 74 | 65 3b 20 43 6f 6d 70 6c |Hms; Dat|e; Compl|
|00003540| 65 78 2c 20 49 2c 20 4a | 22 20 22 57 68 79 3b 20 |ex, I, J|" "Why; |
|00003550| 4c 69 6e 65 2d 6e 75 6d | 73 2c 20 6c 69 6e 65 2d |Line-num|s, line-|
|00003560| 42 72 65 61 6b 73 3b 20 | 3c 2c 20 3d 2c 20 3e 20 |Breaks; |<, =, > |
|00003570| 28 6a 75 73 74 69 66 79 | 29 3b 20 50 6c 61 69 6e |(justify|); Plain|
|00003580| 22 20 22 5c 22 20 28 73 | 74 72 69 6e 67 73 29 3b |" "\" (s|trings);|
|00003590| 20 54 72 75 6e 63 61 74 | 65 2c 20 5b 2c 20 5d 3b | Truncat|e, [, ];|
|000035a0| 20 53 50 43 20 28 72 65 | 66 72 65 73 68 29 2c 20 | SPC (re|fresh), |
|000035b0| 52 45 54 22 20 22 53 48 | 49 46 54 20 2b 20 6c 61 |RET" "SH|IFT + la|
|000035c0| 6e 67 75 61 67 65 3a 20 | 4e 6f 72 6d 61 6c 2c 20 |nguage: |Normal, |
|000035d0| 4f 6e 65 2d 6c 69 6e 65 | 2c 20 42 69 67 2c 20 55 |One-line|, Big, U|
|000035e0| 6e 66 6f 72 6d 61 74 74 | 65 64 22 20 22 53 48 49 |nformatt|ed" "SHI|
|000035f0| 46 54 20 2b 20 6c 61 6e | 67 75 61 67 65 3a 20 43 |FT + lan|guage: C|
|00003600| 2c 20 50 61 73 63 61 6c | 2c 20 46 6f 72 74 72 61 |, Pascal|, Fortra|
|00003610| 6e 3b 20 54 65 58 2c 20 | 45 71 6e 22 20 22 53 48 |n; TeX, |Eqn" "SH|
|00003620| 49 46 54 20 2b 20 6c 61 | 6e 67 75 61 67 65 3a 20 |IFT + la|nguage: |
|00003630| 4d 61 74 68 65 6d 61 74 | 69 63 61 2c 20 57 3d 4d |Mathemat|ica, W=M|
|00003640| 61 70 6c 65 22 29 20 22 | 64 69 73 70 6c 61 79 22 |aple") "|display"|
|00003650| 20 31 30 30 5d 20 34 29 | 29 0a 0a 28 64 65 66 75 | 100] 4)|)..(defu|
|00003660| 6e 20 63 61 6c 63 2d 67 | 2d 70 72 65 66 69 78 2d |n calc-g|-prefix-|
|00003670| 68 65 6c 70 20 6e 69 6c | 20 28 69 6e 74 65 72 61 |help nil| (intera|
|00003680| 63 74 69 76 65 29 20 28 | 62 79 74 65 2d 63 6f 64 |ctive) (|byte-cod|
|00003690| 65 20 22 c0 88 c1 c2 c3 | c4 23 87 22 20 5b 6e 69 |e ".....|.#." [ni|
|000036a0| 6c 20 63 61 6c 63 2d 64 | 6f 2d 70 72 65 66 69 78 |l calc-d|o-prefix|
|000036b0| 2d 68 65 6c 70 20 28 22 | 46 61 73 74 3b 20 41 64 |-help ("|Fast; Ad|
|000036c0| 64 2c 20 44 65 6c 65 74 | 65 2c 20 4a 75 67 67 6c |d, Delet|e, Juggl|
|000036d0| 65 3b 20 50 6c 6f 74 2c | 20 43 6c 65 61 72 3b 20 |e; Plot,| Clear; |
|000036e0| 51 75 69 74 22 20 22 48 | 65 61 64 65 72 2c 20 4e |Quit" "H|eader, N|
|000036f0| 61 6d 65 2c 20 47 72 69 | 64 2c 20 42 6f 72 64 65 |ame, Gri|d, Borde|
|00003700| 72 2c 20 4b 65 79 3b 20 | 56 69 65 77 2d 63 6f 6d |r, Key; |View-com|
|00003710| 6d 61 6e 64 73 2c 20 58 | 2d 64 69 73 70 6c 61 79 |mands, X|-display|
|00003720| 22 20 22 78 2d 61 78 69 | 73 3a 20 52 61 6e 67 65 |" "x-axi|s: Range|
|00003730| 2c 20 54 69 74 6c 65 2c | 20 4c 6f 67 2c 20 5a 65 |, Title,| Log, Ze|
|00003740| 72 6f 3b 20 6c 69 6e 65 | 53 74 79 6c 65 22 20 22 |ro; line|Style" "|
|00003750| 53 48 49 46 54 20 2b 20 | 79 2d 61 78 69 73 3a 20 |SHIFT + |y-axis: |
|00003760| 52 61 6e 67 65 2c 20 54 | 69 74 6c 65 2c 20 4c 6f |Range, T|itle, Lo|
|00003770| 67 2c 20 5a 65 72 6f 3b | 20 70 6f 69 6e 74 53 74 |g, Zero;| pointSt|
|00003780| 79 6c 65 22 20 22 53 48 | 49 46 54 20 2b 20 50 72 |yle" "SH|IFT + Pr|
|00003790| 69 6e 74 3b 20 44 65 76 | 69 63 65 2c 20 4f 75 74 |int; Dev|ice, Out|
|000037a0| 70 75 74 2d 66 69 6c 65 | 3b 20 58 2d 67 65 6f 6d |put-file|; X-geom|
|000037b0| 65 74 72 79 22 20 22 53 | 48 49 46 54 20 2b 20 4e |etry" "S|HIFT + N|
|000037c0| 75 6d 2d 70 74 73 3b 20 | 43 6f 6d 6d 61 6e 64 2c |um-pts; |Command,|
|000037d0| 20 4b 69 6c 6c 2c 20 56 | 69 65 77 2d 74 72 61 69 | Kill, V|iew-trai|
|000037e0| 6c 22 20 22 53 48 49 46 | 54 20 2b 20 33 64 3a 20 |l" "SHIF|T + 3d: |
|000037f0| 46 61 73 74 2c 20 41 64 | 64 3b 20 43 54 52 4c 20 |Fast, Ad|d; CTRL |
|00003800| 2b 20 7a 2d 61 78 69 73 | 3a 20 52 61 6e 67 65 2c |+ z-axis|: Range,|
|00003810| 20 54 69 74 6c 65 2c 20 | 4c 6f 67 22 29 20 22 67 | Title, |Log") "g|
|00003820| 72 61 70 68 22 20 31 30 | 33 5d 20 34 29 29 0a 0a |raph" 10|3] 4))..|
|00003830| 28 64 65 66 75 6e 20 63 | 61 6c 63 2d 6b 2d 70 72 |(defun c|alc-k-pr|
|00003840| 65 66 69 78 2d 68 65 6c | 70 20 6e 69 6c 20 28 69 |efix-hel|p nil (i|
|00003850| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 62 79 74 |nteracti|ve) (byt|
|00003860| 65 2d 63 6f 64 65 20 22 | c0 88 c1 c2 c3 c4 23 87 |e-code "|......#.|
|00003870| 22 20 5b 6e 69 6c 20 63 | 61 6c 63 2d 64 6f 2d 70 |" [nil c|alc-do-p|
|00003880| 72 65 66 69 78 2d 68 65 | 6c 70 20 28 22 47 43 44 |refix-he|lp ("GCD|
|00003890| 2c 20 4c 43 4d 3b 20 43 | 68 6f 6f 73 65 20 28 62 |, LCM; C|hoose (b|
|000038a0| 69 6e 6f 6d 69 61 6c 29 | 2c 20 44 6f 75 62 6c 65 |inomial)|, Double|
|000038b0| 2d 66 61 63 74 6f 72 69 | 61 6c 22 20 22 52 61 6e |-factori|al" "Ran|
|000038c0| 64 6f 6d 2c 20 72 61 6e | 64 6f 6d 2d 41 67 61 69 |dom, ran|dom-Agai|
|000038d0| 6e 2c 20 73 48 75 66 66 | 6c 65 22 20 22 46 61 63 |n, sHuff|le" "Fac|
|000038e0| 74 6f 72 73 2c 20 50 72 | 69 6d 65 2d 74 65 73 74 |tors, Pr|ime-test|
|000038f0| 2c 20 4e 65 78 74 2d 70 | 72 69 6d 65 2c 20 54 6f |, Next-p|rime, To|
|00003900| 74 69 65 6e 74 2c 20 4d | 6f 65 62 69 75 73 22 20 |tient, M|oebius" |
|00003910| 22 42 65 72 6e 6f 75 6c | 6c 69 2c 20 45 75 6c 65 |"Bernoul|li, Eule|
|00003920| 72 2c 20 53 74 69 72 6c | 69 6e 67 22 20 22 53 48 |r, Stirl|ing" "SH|
|00003930| 49 46 54 20 2b 20 45 78 | 74 65 6e 64 65 64 2d 67 |IFT + Ex|tended-g|
|00003940| 63 64 22 20 22 53 48 49 | 46 54 20 2b 20 64 69 73 |cd" "SHI|FT + dis|
|00003950| 74 73 3a 20 42 69 6e 6f | 6d 69 61 6c 2c 20 43 68 |ts: Bino|mial, Ch|
|00003960| 69 2d 73 71 75 61 72 65 | 2c 20 46 2c 20 4e 6f 72 |i-square|, F, Nor|
|00003970| 6d 61 6c 22 20 22 53 48 | 49 46 54 20 2b 20 64 69 |mal" "SH|IFT + di|
|00003980| 73 74 73 3a 20 50 6f 69 | 73 73 6f 6e 2c 20 73 74 |sts: Poi|sson, st|
|00003990| 75 64 65 6e 74 27 73 2d | 54 22 29 20 22 63 6f 6d |udent's-|T") "com|
|000039a0| 62 69 6e 61 74 6f 72 69 | 63 73 22 20 31 30 37 5d |binatori|cs" 107]|
|000039b0| 20 34 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 4))..(d|efun cal|
|000039c0| 63 2d 6d 2d 70 72 65 66 | 69 78 2d 68 65 6c 70 20 |c-m-pref|ix-help |
|000039d0| 6e 69 6c 20 28 69 6e 74 | 65 72 61 63 74 69 76 65 |nil (int|eractive|
|000039e0| 29 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 88 |) (byte-|code "..|
|000039f0| c1 c2 c3 c4 23 87 22 20 | 5b 6e 69 6c 20 63 61 6c |....#." |[nil cal|
|00003a00| 63 2d 64 6f 2d 70 72 65 | 66 69 78 2d 68 65 6c 70 |c-do-pre|fix-help|
|00003a10| 20 28 22 44 65 67 2c 20 | 52 61 64 2c 20 48 4d 53 | ("Deg, |Rad, HMS|
|00003a20| 3b 20 46 72 61 63 3b 20 | 50 6f 6c 61 72 3b 20 49 |; Frac; |Polar; I|
|00003a30| 6e 66 3b 20 41 6c 67 2c | 20 54 6f 74 61 6c 3b 20 |nf; Alg,| Total; |
|00003a40| 53 79 6d 62 3b 20 56 65 | 63 2f 6d 61 74 22 20 22 |Symb; Ve|c/mat" "|
|00003a50| 57 6f 72 6b 69 6e 67 3b | 20 58 74 65 6e 73 69 6f |Working;| Xtensio|
|00003a60| 6e 73 3b 20 4d 6f 64 65 | 2d 73 61 76 65 22 20 22 |ns; Mode|-save" "|
|00003a70| 53 48 49 46 54 20 2b 20 | 53 68 69 66 74 65 64 2d |SHIFT + |Shifted-|
|00003a80| 70 72 65 66 69 78 65 73 | 2c 20 6d 6f 64 65 2d 46 |prefixes|, mode-F|
|00003a90| 69 6c 65 6e 61 6d 65 3b | 20 52 65 63 6f 72 64 3b |ilename;| Record;|
|00003aa0| 20 72 65 43 6f 6d 70 75 | 74 65 22 20 22 53 48 49 | reCompu|te" "SHI|
|00003ab0| 46 54 20 2b 20 73 69 6d | 70 6c 69 66 79 3a 20 4f |FT + sim|plify: O|
|00003ac0| 66 66 2c 20 4e 75 6d 2c | 20 44 65 66 61 75 6c 74 |ff, Num,| Default|
|00003ad0| 2c 20 42 69 6e 2c 20 41 | 6c 67 2c 20 45 78 74 2c |, Bin, A|lg, Ext,|
|00003ae0| 20 55 6e 69 74 73 22 29 | 20 22 6d 6f 64 65 22 20 | Units")| "mode" |
|00003af0| 31 30 39 5d 20 34 29 29 | 0a 0a 28 64 65 66 75 6e |109] 4))|..(defun|
|00003b00| 20 63 61 6c 63 2d 74 2d | 70 72 65 66 69 78 2d 68 | calc-t-|prefix-h|
|00003b10| 65 6c 70 20 6e 69 6c 20 | 28 69 6e 74 65 72 61 63 |elp nil |(interac|
|00003b20| 74 69 76 65 29 20 28 62 | 79 74 65 2d 63 6f 64 65 |tive) (b|yte-code|
|00003b30| 20 22 c0 88 c1 c2 c3 c4 | 23 87 22 20 5b 6e 69 6c | "......|#." [nil|
|00003b40| 20 63 61 6c 63 2d 64 6f | 2d 70 72 65 66 69 78 2d | calc-do|-prefix-|
|00003b50| 68 65 6c 70 20 28 22 44 | 69 73 70 6c 61 79 3b 20 |help ("D|isplay; |
|00003b60| 46 77 64 2c 20 42 61 63 | 6b 3b 20 4e 65 78 74 2c |Fwd, Bac|k; Next,|
|00003b70| 20 50 72 65 76 2c 20 48 | 65 72 65 2c 20 5b 2c 20 | Prev, H|ere, [, |
|00003b80| 5d 3b 20 59 61 6e 6b 22 | 20 22 53 65 61 72 63 68 |]; Yank"| "Search|
|00003b90| 2c 20 52 65 76 3b 20 49 | 6e 2c 20 4f 75 74 3b 20 |, Rev; I|n, Out; |
|00003ba0| 3c 2c 20 3e 3b 20 4b 69 | 6c 6c 3b 20 4d 61 72 6b |<, >; Ki|ll; Mark|
|00003bb0| 65 72 3b 20 2e 20 28 61 | 62 62 72 65 76 29 22 20 |er; . (a|bbrev)" |
|00003bc0| 22 53 48 49 46 54 20 2b | 20 74 69 6d 65 3a 20 4e |"SHIFT +| time: N|
|00003bd0| 6f 77 3b 20 50 61 72 74 | 3b 20 44 61 74 65 2c 20 |ow; Part|; Date, |
|00003be0| 4a 75 6c 69 61 6e 2c 20 | 55 6e 69 78 2c 20 43 7a |Julian, |Unix, Cz|
|00003bf0| 6f 6e 65 22 20 22 53 48 | 49 46 54 20 2b 20 74 69 |one" "SH|IFT + ti|
|00003c00| 6d 65 3a 20 6e 65 77 57 | 65 65 6b 2c 20 6e 65 77 |me: newW|eek, new|
|00003c10| 4d 6f 6e 74 68 2c 20 6e | 65 77 59 65 61 72 3b 20 |Month, n|ewYear; |
|00003c20| 49 6e 63 6d 6f 6e 74 68 | 22 20 22 53 48 49 46 54 |Incmonth|" "SHIFT|
|00003c30| 20 2b 20 74 69 6d 65 3a | 20 2b 2c 20 2d 20 28 62 | + time:| +, - (b|
|00003c40| 75 73 69 6e 65 73 73 20 | 64 61 79 73 29 22 20 22 |usiness |days)" "|
|00003c50| 64 69 67 69 74 73 20 30 | 2d 39 3a 20 73 74 6f 72 |digits 0|-9: stor|
|00003c60| 65 2d 74 6f 2c 20 73 61 | 6d 65 20 61 73 20 60 73 |e-to, sa|me as `s|
|00003c70| 20 74 20 30 2d 39 27 22 | 29 20 22 74 72 61 69 6c | t 0-9'"|) "trail|
|00003c80| 2f 74 69 6d 65 22 20 31 | 31 36 5d 20 34 29 29 0a |/time" 1|16] 4)).|
|00003c90| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 75 2d 70 |.(defun |calc-u-p|
|00003ca0| 72 65 66 69 78 2d 68 65 | 6c 70 20 6e 69 6c 20 28 |refix-he|lp nil (|
|00003cb0| 69 6e 74 65 72 61 63 74 | 69 76 65 29 20 28 62 79 |interact|ive) (by|
|00003cc0| 74 65 2d 63 6f 64 65 20 | 22 c0 88 c1 c2 c3 c4 23 |te-code |"......#|
|00003cd0| 87 22 20 5b 6e 69 6c 20 | 63 61 6c 63 2d 64 6f 2d |." [nil |calc-do-|
|00003ce0| 70 72 65 66 69 78 2d 68 | 65 6c 70 20 28 22 53 69 |prefix-h|elp ("Si|
|00003cf0| 6d 70 6c 69 66 79 2c 20 | 43 6f 6e 76 65 72 74 2c |mplify, |Convert,|
|00003d00| 20 54 65 6d 70 65 72 61 | 74 75 72 65 2d 63 6f 6e | Tempera|ture-con|
|00003d10| 76 65 72 74 2c 20 42 61 | 73 65 2d 75 6e 69 74 73 |vert, Ba|se-units|
|00003d20| 22 20 22 41 75 74 6f 72 | 61 6e 67 65 3b 20 52 65 |" "Autor|ange; Re|
|00003d30| 6d 6f 76 65 2c 20 65 58 | 74 72 61 63 74 3b 20 45 |move, eX|tract; E|
|00003d40| 78 70 6c 61 69 6e 3b 20 | 56 69 65 77 2d 74 61 62 |xplain; |View-tab|
|00003d50| 6c 65 3b 20 30 2d 39 22 | 20 22 44 65 66 69 6e 65 |le; 0-9"| "Define|
|00003d60| 2c 20 55 6e 64 65 66 69 | 6e 65 2c 20 47 65 74 2d |, Undefi|ne, Get-|
|00003d70| 64 65 66 6e 2c 20 50 65 | 72 6d 61 6e 65 6e 74 22 |defn, Pe|rmanent"|
|00003d80| 20 22 53 48 49 46 54 20 | 2b 20 56 69 65 77 2d 74 | "SHIFT |+ View-t|
|00003d90| 61 62 6c 65 2d 6f 74 68 | 65 72 2d 77 69 6e 64 6f |able-oth|er-windo|
|00003da0| 77 22 20 22 53 48 49 46 | 54 20 2b 20 73 74 61 74 |w" "SHIF|T + stat|
|00003db0| 3a 20 4d 65 61 6e 2c 20 | 47 2d 6d 65 61 6e 2c 20 |: Mean, |G-mean, |
|00003dc0| 53 74 64 2d 64 65 76 2c | 20 43 6f 76 61 72 2c 20 |Std-dev,| Covar, |
|00003dd0| 6d 61 58 2c 20 6d 69 4e | 22 20 22 53 48 49 46 54 |maX, miN|" "SHIFT|
|00003de0| 20 2b 20 73 74 61 74 3a | 20 2b 20 28 73 75 6d 29 | + stat:| + (sum)|
|00003df0| 2c 20 2d 20 28 61 73 75 | 6d 29 2c 20 2a 20 28 70 |, - (asu|m), * (p|
|00003e00| 72 6f 64 29 2c 20 23 20 | 28 63 6f 75 6e 74 29 22 |rod), # |(count)"|
|00003e10| 29 20 22 75 6e 69 74 73 | 2f 73 74 61 74 22 20 31 |) "units|/stat" 1|
|00003e20| 31 37 5d 20 34 29 29 0a | 0a 28 64 65 66 75 6e 20 |17] 4)).|.(defun |
|00003e30| 63 61 6c 63 2d 76 2d 70 | 72 65 66 69 78 2d 68 65 |calc-v-p|refix-he|
|00003e40| 6c 70 20 6e 69 6c 20 28 | 69 6e 74 65 72 61 63 74 |lp nil (|interact|
|00003e50| 69 76 65 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |ive) (by|te-code |
|00003e60| 22 c0 88 c1 c2 c3 c4 23 | 87 22 20 5b 6e 69 6c 20 |"......#|." [nil |
|00003e70| 63 61 6c 63 2d 64 6f 2d | 70 72 65 66 69 78 2d 68 |calc-do-|prefix-h|
|00003e80| 65 6c 70 20 28 22 50 61 | 63 6b 2c 20 55 6e 70 61 |elp ("Pa|ck, Unpa|
|00003e90| 63 6b 2c 20 49 64 65 6e | 74 69 74 79 2c 20 44 69 |ck, Iden|tity, Di|
|00003ea0| 61 67 6f 6e 61 6c 2c 20 | 69 6e 64 65 58 2c 20 42 |agonal, |indeX, B|
|00003eb0| 75 69 6c 64 22 20 22 52 | 6f 77 2c 20 43 6f 6c 75 |uild" "R|ow, Colu|
|00003ec0| 6d 6e 2c 20 53 75 62 76 | 65 63 74 6f 72 3b 20 4c |mn, Subv|ector; L|
|00003ed0| 65 6e 67 74 68 3b 20 46 | 69 6e 64 3b 20 4d 61 73 |ength; F|ind; Mas|
|00003ee0| 6b 2c 20 45 78 70 61 6e | 64 22 20 22 54 72 61 6e |k, Expan|d" "Tran|
|00003ef0| 70 6f 73 65 2c 20 41 72 | 72 61 6e 67 65 2c 20 72 |pose, Ar|range, r|
|00003f00| 65 56 65 72 73 65 3b 20 | 48 65 61 64 2c 20 4b 6f |eVerse; |Head, Ko|
|00003f10| 6e 73 3b 20 72 4e 6f 72 | 6d 22 20 22 53 48 49 46 |ns; rNor|m" "SHIF|
|00003f20| 54 20 2b 20 44 65 74 2c | 20 26 20 28 69 6e 76 65 |T + Det,| & (inve|
|00003f30| 72 73 65 29 2c 20 4c 55 | 44 2c 20 54 72 61 63 65 |rse), LU|D, Trace|
|00003f40| 2c 20 63 6f 6e 4a 74 72 | 6e 2c 20 43 72 6f 73 73 |, conJtr|n, Cross|
|00003f50| 22 20 22 53 48 49 46 54 | 20 2b 20 53 6f 72 74 2c |" "SHIFT| + Sort,|
|00003f60| 20 47 72 61 64 65 2c 20 | 48 69 73 74 6f 67 72 61 | Grade, |Histogra|
|00003f70| 6d 3b 20 63 4e 6f 72 6d | 22 20 22 53 48 49 46 54 |m; cNorm|" "SHIFT|
|00003f80| 20 2b 20 41 70 70 6c 79 | 2c 20 4d 61 70 2c 20 52 | + Apply|, Map, R|
|00003f90| 65 64 75 63 65 2c 20 61 | 63 63 55 6d 2c 20 49 6e |educe, a|ccUm, In|
|00003fa0| 6e 65 72 2d 2c 20 4f 75 | 74 65 72 2d 70 72 6f 64 |ner-, Ou|ter-prod|
|00003fb0| 22 20 22 53 48 49 46 54 | 20 2b 20 73 65 74 73 3a |" "SHIFT| + sets:|
|00003fc0| 20 56 20 28 75 6e 69 6f | 6e 29 2c 20 5e 20 28 69 | V (unio|n), ^ (i|
|00003fd0| 6e 74 65 72 73 65 63 74 | 69 6f 6e 29 2c 20 2d 20 |ntersect|ion), - |
|00003fe0| 28 64 69 66 66 29 22 20 | 22 53 48 49 46 54 20 2b |(diff)" |"SHIFT +|
|00003ff0| 20 73 65 74 73 3a 20 58 | 6f 72 2c 20 7e 20 28 63 | sets: X|or, ~ (c|
|00004000| 6f 6d 70 6c 65 6d 65 6e | 74 29 2c 20 46 6c 6f 6f |omplemen|t), Floo|
|00004010| 72 2c 20 45 6e 75 6d 22 | 20 22 53 48 49 46 54 20 |r, Enum"| "SHIFT |
|00004020| 2b 20 73 65 74 73 3a 20 | 3a 20 28 73 70 61 6e 29 |+ sets: |: (span)|
|00004030| 2c 20 23 20 28 63 61 72 | 64 29 2c 20 2b 20 28 72 |, # (car|d), + (r|
|00004040| 64 75 70 29 22 20 22 3c | 2c 20 3d 2c 20 3e 20 28 |dup)" "<|, =, > (|
|00004050| 6a 75 73 74 69 66 69 63 | 61 74 69 6f 6e 29 3b 20 |justific|ation); |
|00004060| 2c 20 28 63 6f 6d 6d 61 | 73 29 3b 20 5b 2c 20 7b |, (comma|s); [, {|
|00004070| 2c 20 28 20 28 62 72 61 | 63 6b 65 74 73 29 22 20 |, ( (bra|ckets)" |
|00004080| 22 7d 20 28 6d 61 74 72 | 69 78 20 62 72 61 63 6b |"} (matr|ix brack|
|00004090| 65 74 73 29 3b 20 2e 20 | 28 61 62 62 72 65 76 69 |ets); . |(abbrevi|
|000040a0| 61 74 65 29 3b 20 2f 20 | 28 6d 75 6c 74 69 2d 6c |ate); / |(multi-l|
|000040b0| 69 6e 65 73 29 22 29 20 | 22 76 65 63 2f 6d 61 74 |ines)") |"vec/mat|
|000040c0| 22 20 31 31 38 5d 20 34 | 29 29 0a |" 118] 4|)). |
+--------+-------------------------+-------------------------+--------+--------+
