home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1996-10-12 | 27.8 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%
| detectItEasy
| Format: plain text[LF]
| 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 67 72 61 70 68 | 20 6e 69 6c 20 28 62 79 |lc-graph| nil (by|
|00000040| 74 65 2d 63 6f 64 65 20 | 22 c0 87 22 20 5b 6e 69 |te-code |".." [ni|
|00000050| 6c 5d 20 31 29 29 0a 0a | 28 64 65 66 76 61 72 20 |l] 1))..|(defvar |
|00000060| 63 61 6c 63 2d 67 6e 75 | 70 6c 6f 74 2d 74 65 6d |calc-gnu|plot-tem|
|00000070| 70 66 69 6c 65 20 22 2f | 74 6d 70 2f 63 61 6c 63 |pfile "/|tmp/calc|
|00000080| 22 29 0a 0a 28 64 65 66 | 76 61 72 20 63 61 6c 63 |")..(def|var calc|
|00000090| 2d 67 6e 75 70 6c 6f 74 | 2d 64 65 66 61 75 6c 74 |-gnuplot|-default|
|000000a0| 2d 64 65 76 69 63 65 20 | 22 64 65 66 61 75 6c 74 |-device |"default|
|000000b0| 22 29 0a 0a 28 64 65 66 | 76 61 72 20 63 61 6c 63 |")..(def|var calc|
|000000c0| 2d 67 6e 75 70 6c 6f 74 | 2d 64 65 66 61 75 6c 74 |-gnuplot|-default|
|000000d0| 2d 6f 75 74 70 75 74 20 | 22 53 54 44 4f 55 54 22 |-output |"STDOUT"|
|000000e0| 29 0a 0a 28 64 65 66 76 | 61 72 20 63 61 6c 63 2d |)..(defv|ar calc-|
|000000f0| 67 6e 75 70 6c 6f 74 2d | 70 72 69 6e 74 2d 64 65 |gnuplot-|print-de|
|00000100| 76 69 63 65 20 22 70 6f | 73 74 73 63 72 69 70 74 |vice "po|stscript|
|00000110| 22 29 0a 0a 28 64 65 66 | 76 61 72 20 63 61 6c 63 |")..(def|var calc|
|00000120| 2d 67 6e 75 70 6c 6f 74 | 2d 70 72 69 6e 74 2d 6f |-gnuplot|-print-o|
|00000130| 75 74 70 75 74 20 22 61 | 75 74 6f 22 29 0a 0a 28 |utput "a|uto")..(|
|00000140| 64 65 66 76 61 72 20 63 | 61 6c 63 2d 67 6e 75 70 |defvar c|alc-gnup|
|00000150| 6c 6f 74 2d 6b 65 65 70 | 2d 6f 75 74 66 69 6c 65 |lot-keep|-outfile|
|00000160| 20 6e 69 6c 29 0a 0a 28 | 64 65 66 76 61 72 20 63 | nil)..(|defvar c|
|00000170| 61 6c 63 2d 67 6e 75 70 | 6c 6f 74 2d 76 65 72 73 |alc-gnup|lot-vers|
|00000180| 69 6f 6e 20 6e 69 6c 29 | 0a 0a 28 64 65 66 76 61 |ion nil)|..(defva|
|00000190| 72 20 63 61 6c 63 2d 67 | 6e 75 70 6c 6f 74 2d 64 |r calc-g|nuplot-d|
|000001a0| 69 73 70 6c 61 79 20 28 | 67 65 74 65 6e 76 20 22 |isplay (|getenv "|
|000001b0| 44 49 53 50 4c 41 59 22 | 29 29 0a 0a 28 64 65 66 |DISPLAY"|))..(def|
|000001c0| 76 61 72 20 63 61 6c 63 | 2d 67 6e 75 70 6c 6f 74 |var calc|-gnuplot|
|000001d0| 2d 67 65 6f 6d 65 74 72 | 79 20 6e 69 6c 29 0a 0a |-geometr|y nil)..|
|000001e0| 28 64 65 66 76 61 72 20 | 63 61 6c 63 2d 67 72 61 |(defvar |calc-gra|
|000001f0| 70 68 2d 64 65 66 61 75 | 6c 74 2d 72 65 73 6f 6c |ph-defau|lt-resol|
|00000200| 75 74 69 6f 6e 20 31 35 | 29 0a 0a 28 64 65 66 76 |ution 15|)..(defv|
|00000210| 61 72 20 63 61 6c 63 2d | 67 72 61 70 68 2d 64 65 |ar calc-|graph-de|
|00000220| 66 61 75 6c 74 2d 72 65 | 73 6f 6c 75 74 69 6f 6e |fault-re|solution|
|00000230| 2d 33 64 20 35 29 0a 0a | 28 64 65 66 76 61 72 20 |-3d 5)..|(defvar |
|00000240| 63 61 6c 63 2d 67 72 61 | 70 68 2d 64 65 66 61 75 |calc-gra|ph-defau|
|00000250| 6c 74 2d 70 72 65 63 69 | 73 69 6f 6e 20 35 29 0a |lt-preci|sion 5).|
|00000260| 0a 28 64 65 66 76 61 72 | 20 63 61 6c 63 2d 67 6e |.(defvar| calc-gn|
|00000270| 75 70 6c 6f 74 2d 62 75 | 66 66 65 72 20 6e 69 6c |uplot-bu|ffer nil|
|00000280| 29 0a 0a 28 64 65 66 76 | 61 72 20 63 61 6c 63 2d |)..(defv|ar calc-|
|00000290| 67 6e 75 70 6c 6f 74 2d | 69 6e 70 75 74 20 6e 69 |gnuplot-|input ni|
|000002a0| 6c 29 0a 0a 28 64 65 66 | 76 61 72 20 63 61 6c 63 |l)..(def|var calc|
|000002b0| 2d 67 6e 75 70 6c 6f 74 | 2d 6c 61 73 74 2d 65 72 |-gnuplot|-last-er|
|000002c0| 72 6f 72 2d 70 6f 73 20 | 31 29 0a 0a 28 64 65 66 |ror-pos |1)..(def|
|000002d0| 76 61 72 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 6c |var calc|-graph-l|
|000002e0| 61 73 74 2d 64 65 76 69 | 63 65 20 6e 69 6c 29 0a |ast-devi|ce nil).|
|000002f0| 0a 28 64 65 66 76 61 72 | 20 63 61 6c 63 2d 67 72 |.(defvar| calc-gr|
|00000300| 61 70 68 2d 6c 61 73 74 | 2d 6f 75 74 70 75 74 20 |aph-last|-output |
|00000310| 6e 69 6c 29 0a 0a 28 64 | 65 66 76 61 72 20 63 61 |nil)..(d|efvar ca|
|00000320| 6c 63 2d 67 72 61 70 68 | 2d 66 69 6c 65 2d 63 61 |lc-graph|-file-ca|
|00000330| 63 68 65 20 6e 69 6c 29 | 0a 0a 28 64 65 66 76 61 |che nil)|..(defva|
|00000340| 72 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 76 61 72 |r calc-g|raph-var|
|00000350| 2d 63 61 63 68 65 20 6e | 69 6c 29 0a 0a 28 64 65 |-cache n|il)..(de|
|00000360| 66 76 61 72 20 63 61 6c | 63 2d 67 72 61 70 68 2d |fvar cal|c-graph-|
|00000370| 64 61 74 61 2d 63 61 63 | 68 65 20 6e 69 6c 29 0a |data-cac|he nil).|
|00000380| 0a 28 64 65 66 76 61 72 | 20 63 61 6c 63 2d 67 72 |.(defvar| calc-gr|
|00000390| 61 70 68 2d 64 61 74 61 | 2d 63 61 63 68 65 2d 6c |aph-data|-cache-l|
|000003a0| 69 6d 69 74 20 31 30 29 | 0a 0a 28 64 65 66 75 6e |imit 10)|..(defun|
|000003b0| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 66 61 73 74 | calc-gr|aph-fast|
|000003c0| 20 28 6d 61 6e 79 29 20 | 28 69 6e 74 65 72 61 63 | (many) |(interac|
|000003d0| 74 69 76 65 20 22 50 22 | 29 20 28 62 79 74 65 2d |tive "P"|) (byte-|
|000003e0| 63 6f 64 65 20 22 c3 88 | c1 18 c4 c1 21 88 c5 0a |code "..|....!...|
|000003f0| 21 88 c6 c3 21 29 87 22 | 20 5b 63 61 6c 63 2d 67 |!...!)."| [calc-g|
|00000400| 72 61 70 68 2d 6e 6f 2d | 61 75 74 6f 2d 76 69 65 |raph-no-|auto-vie|
|00000410| 77 20 74 20 6d 61 6e 79 | 20 6e 69 6c 20 63 61 6c |w t many| nil cal|
|00000420| 63 2d 67 72 61 70 68 2d | 64 65 6c 65 74 65 20 63 |c-graph-|delete c|
|00000430| 61 6c 63 2d 67 72 61 70 | 68 2d 61 64 64 20 63 61 |alc-grap|h-add ca|
|00000440| 6c 63 2d 67 72 61 70 68 | 2d 70 6c 6f 74 5d 20 34 |lc-graph|-plot] 4|
|00000450| 29 29 0a 0a 28 64 65 66 | 75 6e 20 63 61 6c 63 2d |))..(def|un calc-|
|00000460| 67 72 61 70 68 2d 66 61 | 73 74 2d 33 64 20 28 6d |graph-fa|st-3d (m|
|00000470| 61 6e 79 29 20 28 69 6e | 74 65 72 61 63 74 69 76 |any) (in|teractiv|
|00000480| 65 20 22 50 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |e "P") (|byte-cod|
|00000490| 65 20 22 c3 88 c1 18 c4 | c1 21 88 c5 0a 21 88 c6 |e ".....|.!...!..|
|000004a0| c3 21 29 87 22 20 5b 63 | 61 6c 63 2d 67 72 61 70 |.!)." [c|alc-grap|
|000004b0| 68 2d 6e 6f 2d 61 75 74 | 6f 2d 76 69 65 77 20 74 |h-no-aut|o-view t|
|000004c0| 20 6d 61 6e 79 20 6e 69 | 6c 20 63 61 6c 63 2d 67 | many ni|l calc-g|
|000004d0| 72 61 70 68 2d 64 65 6c | 65 74 65 20 63 61 6c 63 |raph-del|ete calc|
|000004e0| 2d 67 72 61 70 68 2d 61 | 64 64 2d 33 64 20 63 61 |-graph-a|dd-3d ca|
|000004f0| 6c 63 2d 67 72 61 70 68 | 2d 70 6c 6f 74 5d 20 34 |lc-graph|-plot] 4|
|00000500| 29 29 0a 0a 28 64 65 66 | 75 6e 20 63 61 6c 63 2d |))..(def|un calc-|
|00000510| 67 72 61 70 68 2d 64 65 | 6c 65 74 65 20 28 61 6c |graph-de|lete (al|
|00000520| 6c 29 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 20 |l) (inte|ractive |
|00000530| 22 50 22 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |"P") (by|te-code |
|00000540| 22 c0 88 c1 c2 21 87 22 | 20 5b 6e 69 6c 20 63 61 |"....!."| [nil ca|
|00000550| 6c 63 2d 64 6f 20 28 6c | 61 6d 62 64 61 20 6e 69 |lc-do (l|ambda ni|
|00000560| 6c 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c5 20 |l (byte-|code ". |
|00000570| 88 8a 08 71 88 c6 c1 0a | 5c 22 85 24 00 c7 c8 21 |...q....|\".$...!|
|00000580| 83 1f 00 c4 89 13 88 c9 | 60 64 5c 22 82 24 00 c9 |........|`d\".$..|
|00000590| 60 64 53 5c 22 29 88 ca | 20 87 22 20 5b 63 61 6c |`dS\")..| ." [cal|
|000005a0| 63 2d 67 6e 75 70 6c 6f | 74 2d 69 6e 70 75 74 20 |c-gnuplo|t-input |
|000005b0| 74 20 61 6c 6c 20 63 61 | 6c 63 2d 67 72 61 70 68 |t all ca|lc-graph|
|000005c0| 2d 76 61 72 2d 63 61 63 | 68 65 20 6e 69 6c 20 63 |-var-cac|he nil c|
|000005d0| 61 6c 63 2d 67 72 61 70 | 68 2d 69 6e 69 74 20 63 |alc-grap|h-init c|
|000005e0| 61 6c 63 2d 67 72 61 70 | 68 2d 66 69 6e 64 2d 70 |alc-grap|h-find-p|
|000005f0| 6c 6f 74 20 6c 6f 6f 6b | 69 6e 67 2d 61 74 20 22 |lot look|ing-at "|
|00000600| 73 3f 70 6c 6f 74 22 20 | 64 65 6c 65 74 65 2d 72 |s?plot" |delete-r|
|00000610| 65 67 69 6f 6e 20 63 61 | 6c 63 2d 67 72 61 70 68 |egion ca|lc-graph|
|00000620| 2d 76 69 65 77 2d 63 6f | 6d 6d 61 6e 64 73 5d 20 |-view-co|mmands] |
|00000630| 37 29 29 5d 20 32 29 29 | 0a 0a 28 64 65 66 75 6e |7))] 2))|..(defun|
|00000640| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 66 69 6e 64 | calc-gr|aph-find|
|00000650| 2d 70 6c 6f 74 20 28 26 | 6f 70 74 69 6f 6e 61 6c |-plot (&|optional|
|00000660| 20 62 65 66 6f 72 65 20 | 61 6c 6c 29 20 28 62 79 | before |all) (by|
|00000670| 74 65 2d 63 6f 64 65 20 | 22 65 62 88 c5 c6 c0 c1 |te-code |"eb.....|
|00000680| 23 85 39 00 60 1a 64 62 | 88 0b 86 20 00 c7 c8 c0 |#.9.`.db|... ....|
|00000690| c1 23 3f 86 20 00 60 0a | 57 83 2f 00 0a 62 88 0c |.#?. .`.|W./..b..|
|000006a0| 85 2c 00 c9 20 82 36 00 | 0c 86 36 00 c5 ca 21 88 |.,.. .6.|..6...!.|
|000006b0| c1 29 87 22 20 5b 6e 69 | 6c 20 74 20 62 65 67 20 |.)." [ni|l t beg |
|000006c0| 61 6c 6c 20 62 65 66 6f | 72 65 20 72 65 2d 73 65 |all befo|re re-se|
|000006d0| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 22 5e 73 |arch-for|ward "^s|
|000006e0| 3f 70 6c 6f 74 5b 20 09 | 5d 2b 22 20 73 65 61 72 |?plot[ .|]+" sear|
|000006f0| 63 68 2d 62 61 63 6b 77 | 61 72 64 20 22 2c 22 20 |ch-backw|ard "," |
|00000700| 62 65 67 69 6e 6e 69 6e | 67 2d 6f 66 2d 6c 69 6e |beginnin|g-of-lin|
|00000710| 65 20 22 2c 5b 20 09 5d | 2b 22 5d 20 35 29 29 0a |e ",[ .]|+"] 5)).|
|00000720| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 67 72 61 |.(defun |calc-gra|
|00000730| 70 68 2d 61 64 64 20 28 | 6d 61 6e 79 29 20 28 69 |ph-add (|many) (i|
|00000740| 6e 74 65 72 61 63 74 69 | 76 65 20 22 50 22 29 20 |nteracti|ve "P") |
|00000750| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 88 c1 c2 |(byte-co|de "....|
|00000760| 21 87 22 20 5b 6e 69 6c | 20 63 61 6c 63 2d 64 6f |!." [nil| calc-do|
|00000770| 20 28 6c 61 6d 62 64 61 | 20 6e 69 6c 20 28 62 79 | (lambda| nil (by|
|00000780| 74 65 2d 63 6f 64 65 20 | 22 c5 20 88 08 3f 83 17 |te-code |". ..?..|
|00000790| 00 c6 c7 c8 c9 21 21 c7 | c8 ca 21 21 5c 22 82 b6 |.....!!.|..!!\"..|
|000007a0| 00 08 3a 86 1f 00 08 cb | 3d 83 4e 00 c7 c8 c9 21 |..:.....|=.N....!|
|000007b0| 21 c8 ca 21 1a 19 cc 0a | 21 cd 3d 86 37 00 ce cf |!..!....|!.=.7...|
|000007c0| 21 88 0a 41 89 12 85 4a | 00 c6 09 c7 0a 40 21 5c |!..A...J|.....@!\|
|000007d0| 22 88 82 38 00 2a 82 b6 | 00 d0 08 21 89 10 cb 56 |"..8.*..|...!...V|
|000007e0| 83 7a 00 c7 c8 08 54 21 | 21 19 08 cb 56 85 76 00 |.z....T!|!...V.v.|
|000007f0| c6 09 c7 c8 08 21 21 5c | 22 88 08 53 89 10 88 82 |.....!!\|"..S....|
|00000800| 5f 00 29 82 b6 00 d1 1c | 08 5b 89 10 88 08 cb 56 |_.).....|.[.....V|
|00000810| 85 b5 00 c8 08 21 89 14 | 88 cc 0c 21 cd 3d 85 99 |.....!..|...!.=..|
|00000820| 00 0c 47 d2 55 86 9f 00 | ce d3 21 88 c6 c7 ca 0c |..G.U...|..!.....|
|00000830| 38 21 c7 c9 0c 38 21 5c | 22 88 08 53 89 10 88 82 |8!...8!\|"..S....|
|00000840| 81 00 29 88 d4 20 87 22 | 20 5b 6d 61 6e 79 20 78 |..).. ."| [many x|
|00000850| 64 61 74 61 20 79 6c 69 | 73 74 20 74 20 70 61 69 |data yli|st t pai|
|00000860| 72 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 69 6e 69 |r calc-g|raph-ini|
|00000870| 74 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 61 64 64 |t calc-g|raph-add|
|00000880| 2d 63 75 72 76 65 20 63 | 61 6c 63 2d 67 72 61 70 |-curve c|alc-grap|
|00000890| 68 2d 6c 6f 6f 6b 75 70 | 20 63 61 6c 63 2d 74 6f |h-lookup| calc-to|
|000008a0| 70 2d 6e 20 32 20 31 20 | 30 20 63 61 72 2d 73 61 |p-n 2 1 |0 car-sa|
|000008b0| 66 65 20 76 65 63 20 65 | 72 72 6f 72 20 22 59 20 |fe vec e|rror "Y |
|000008c0| 61 72 67 75 6d 65 6e 74 | 20 6d 75 73 74 20 62 65 |argument| must be|
|000008d0| 20 61 20 76 65 63 74 6f | 72 22 20 70 72 65 66 69 | a vecto|r" prefi|
|000008e0| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 20 |x-numeri|c-value |
|000008f0| 6e 69 6c 20 33 20 22 41 | 72 67 75 6d 65 6e 74 20 |nil 3 "A|rgument |
|00000900| 6d 75 73 74 20 62 65 20 | 61 6e 20 5b 78 2c 79 5d |must be |an [x,y]|
|00000910| 20 76 65 63 74 6f 72 22 | 20 63 61 6c 63 2d 67 72 | vector"| calc-gr|
|00000920| 61 70 68 2d 76 69 65 77 | 2d 63 6f 6d 6d 61 6e 64 |aph-view|-command|
|00000930| 73 5d 20 32 39 29 29 5d | 20 32 29 29 0a 0a 28 64 |s] 29))]| 2))..(d|
|00000940| 65 66 75 6e 20 63 61 6c | 63 2d 67 72 61 70 68 2d |efun cal|c-graph-|
|00000950| 61 64 64 2d 33 64 20 28 | 6d 61 6e 79 29 20 28 69 |add-3d (|many) (i|
|00000960| 6e 74 65 72 61 63 74 69 | 76 65 20 22 50 22 29 20 |nteracti|ve "P") |
|00000970| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 88 c1 c2 |(byte-co|de "....|
|00000980| 21 87 22 20 5b 6e 69 6c | 20 63 61 6c 63 2d 64 6f |!." [nil| calc-do|
|00000990| 20 28 6c 61 6d 62 64 61 | 20 6e 69 6c 20 28 62 79 | (lambda| nil (by|
|000009a0| 74 65 2d 63 6f 64 65 20 | 22 c6 20 88 08 3f 83 1c |te-code |". ..?..|
|000009b0| 00 c7 c8 c9 ca 21 21 c8 | c9 cb 21 21 c8 c9 cc 21 |.....!!.|..!!...!|
|000009c0| 21 23 82 d1 00 08 3a 86 | 24 00 08 cd 3d 83 5a 00 |!#....:.|$...=.Z.|
|000009d0| c8 c9 ca 21 21 c8 c9 cb | 21 21 c9 cc 21 1b 1a 19 |...!!...|!!..!...|
|000009e0| ce 0b 21 cf 3d 86 42 00 | d0 d1 21 88 0b 41 89 13 |..!.=.B.|..!..A..|
|000009f0| 85 56 00 c7 09 0a c8 0b | 40 21 23 88 82 43 00 2b |.V......|@!#..C.+|
|00000a00| 82 d1 00 d2 08 21 89 10 | cd 56 83 90 00 c8 c9 08 |.....!..|.V......|
|00000a10| cb 5c 5c 21 21 c8 c9 08 | cc 5c 5c 21 21 1a 19 08 |.\\!!...|.\\!!...|
|00000a20| cd 56 85 8c 00 c7 09 0a | c8 c9 08 21 21 23 88 08 |.V......|...!!#..|
|00000a30| 53 89 10 88 82 74 00 2a | 82 d1 00 d3 1d 08 5b 89 |S....t.*|......[.|
|00000a40| 10 88 08 cd 56 85 d0 00 | c9 08 21 89 15 88 ce 0d |....V...|..!.....|
|00000a50| 21 cf 3d 85 af 00 0d 47 | d4 55 86 b5 00 d0 d5 21 |!.=....G|.U.....!|
|00000a60| 88 c7 c8 cc 0d 38 21 c8 | cb 0d 38 21 c8 ca 0d 38 |.....8!.|..8!...8|
|00000a70| 21 23 88 08 53 89 10 88 | 82 97 00 29 88 d6 20 87 |!#..S...|...).. .|
|00000a80| 22 20 5b 6d 61 6e 79 20 | 78 64 61 74 61 20 79 64 |" [many |xdata yd|
|00000a90| 61 74 61 20 7a 6c 69 73 | 74 20 74 20 63 75 72 76 |ata zlis|t t curv|
|00000aa0| 65 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 69 6e 69 |e calc-g|raph-ini|
|00000ab0| 74 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 61 64 64 |t calc-g|raph-add|
|00000ac0| 2d 63 75 72 76 65 20 63 | 61 6c 63 2d 67 72 61 70 |-curve c|alc-grap|
|00000ad0| 68 2d 6c 6f 6f 6b 75 70 | 20 63 61 6c 63 2d 74 6f |h-lookup| calc-to|
|00000ae0| 70 2d 6e 20 33 20 32 20 | 31 20 30 20 63 61 72 2d |p-n 3 2 |1 0 car-|
|00000af0| 73 61 66 65 20 76 65 63 | 20 65 72 72 6f 72 20 22 |safe vec| error "|
|00000b00| 5a 20 61 72 67 75 6d 65 | 6e 74 20 6d 75 73 74 20 |Z argume|nt must |
|00000b10| 62 65 20 61 20 76 65 63 | 74 6f 72 22 20 70 72 65 |be a vec|tor" pre|
|00000b20| 66 69 78 2d 6e 75 6d 65 | 72 69 63 2d 76 61 6c 75 |fix-nume|ric-valu|
|00000b30| 65 20 6e 69 6c 20 34 20 | 22 41 72 67 75 6d 65 6e |e nil 4 |"Argumen|
|00000b40| 74 20 6d 75 73 74 20 62 | 65 20 61 6e 20 5b 78 2c |t must b|e an [x,|
|00000b50| 79 2c 7a 5d 20 76 65 63 | 74 6f 72 22 20 63 61 6c |y,z] vec|tor" cal|
|00000b60| 63 2d 67 72 61 70 68 2d | 76 69 65 77 2d 63 6f 6d |c-graph-|view-com|
|00000b70| 6d 61 6e 64 73 5d 20 33 | 37 29 29 5d 20 32 29 29 |mands] 3|7))] 2))|
|00000b80| 0a 0a 28 64 65 66 75 6e | 20 63 61 6c 63 2d 67 72 |..(defun| calc-gr|
|00000b90| 61 70 68 2d 61 64 64 2d | 63 75 72 76 65 20 28 78 |aph-add-|curve (x|
|00000ba0| 64 61 74 61 20 79 64 61 | 74 61 20 26 6f 70 74 69 |data yda|ta &opti|
|00000bb0| 6f 6e 61 6c 20 7a 64 61 | 74 61 29 20 28 62 79 74 |onal zda|ta) (byt|
|00000bc0| 65 2d 63 6f 64 65 20 22 | c9 20 ca cb 21 ca cc 21 |e-code "|. ..!..!|
|00000bd0| 1a 19 18 8a 0b 71 88 65 | 62 88 cd 0c 83 1b 00 ce |.....q.e|b.......|
|00000be0| 82 1c 00 cf c5 c6 23 85 | 25 00 d0 d1 21 88 cd d2 |......#.|%...!...|
|00000bf0| c5 c6 23 83 36 00 d3 20 | 88 d4 63 82 52 00 64 62 |..#.6.. |..c.R.db|
|00000c00| 88 68 d5 3d 86 41 00 d6 | 63 88 d7 0c 83 4b 00 d8 |.h.=.A..|c....K..|
|00000c10| 82 4c 00 d9 da 5c 22 88 | db dc 21 88 d7 dd de df |.L...\".|..!.....|
|00000c20| 0e 07 38 21 e0 de df 0e | 08 38 21 24 88 0c 85 70 |..8!....|.8!$...p|
|00000c30| 00 d7 e0 de df 0c 38 21 | 5c 22 88 d7 e1 e2 de df |......8!|\"......|
|00000c40| 0e 08 38 21 e3 e4 25 88 | e5 09 21 e6 3d 85 8a 00 |..8!..%.|..!.=...|
|00000c50| 08 54 09 38 89 11 88 e5 | 0a 21 e6 3d 85 99 00 08 |.T.8....|.!.=....|
|00000c60| 54 0a 38 89 12 88 e7 0a | 3a 3f 86 b6 00 0a 40 e8 |T.8.....|:?....@.|
|00000c70| 3e 86 b6 00 0a 40 e9 3d | 85 b6 00 ea 0a 38 eb 59 |>....@.=|.....8.Y|
|00000c80| 85 bc 00 ec 0a 21 86 c0 | 00 eb 09 3a 3f 86 d9 00 |.....!..|...:?...|
|00000c90| 09 40 ed 3e 86 d9 00 09 | 40 e9 3d 85 d9 00 ea 09 |.@.>....|@.=.....|
|00000ca0| 38 eb 59 85 df 00 ec 09 | 21 86 f4 00 e5 ca ea 0e |8.Y.....|!.......|
|00000cb0| 08 38 21 21 e6 3d 83 f3 | 00 eb 82 f4 00 dc 5c 22 |.8!!.=..|......\"|
|00000cc0| 29 2b 87 22 20 5b 6e 75 | 6d 20 70 73 74 79 6c 65 |)+." [nu|m pstyle|
|00000cd0| 20 6c 73 74 79 6c 65 20 | 63 61 6c 63 2d 67 6e 75 | lstyle |calc-gnu|
|00000ce0| 70 6c 6f 74 2d 69 6e 70 | 75 74 20 7a 64 61 74 61 |plot-inp|ut zdata|
|00000cf0| 20 6e 69 6c 20 74 20 78 | 64 61 74 61 20 79 64 61 | nil t x|data yda|
|00000d00| 74 61 20 63 61 6c 63 2d | 67 72 61 70 68 2d 63 6f |ta calc-|graph-co|
|00000d10| 75 6e 74 2d 63 75 72 76 | 65 73 20 63 61 6c 63 2d |unt-curv|es calc-|
|00000d20| 76 61 72 2d 76 61 6c 75 | 65 20 76 61 72 2d 50 6f |var-valu|e var-Po|
|00000d30| 69 6e 74 53 74 79 6c 65 | 73 20 76 61 72 2d 4c 69 |intStyle|s var-Li|
|00000d40| 6e 65 53 74 79 6c 65 73 | 20 72 65 2d 73 65 61 72 |neStyles| re-sear|
|00000d50| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5e 70 6c 6f |ch-forwa|rd "^plo|
|00000d60| 74 5b 20 09 5d 22 20 22 | 5e 73 70 6c 6f 74 5b 20 |t[ .]" "|^splot[ |
|00000d70| 09 5d 22 20 65 72 72 6f | 72 20 22 43 61 6e 27 74 |.]" erro|r "Can't|
|00000d80| 20 6d 69 78 20 32 64 20 | 61 6e 64 20 33 64 20 63 | mix 2d |and 3d c|
|00000d90| 75 72 76 65 73 20 6f 6e | 20 6f 6e 65 20 67 72 61 |urves on| one gra|
|00000da0| 70 68 22 20 22 5e 73 3f | 70 6c 6f 74 5b 20 09 5d |ph" "^s?|plot[ .]|
|00000db0| 22 20 65 6e 64 2d 6f 66 | 2d 6c 69 6e 65 20 22 2c |" end-of|-line ",|
|00000dc0| 20 22 20 31 30 20 22 0a | 22 20 69 6e 73 65 72 74 | " 10 ".|" insert|
|00000dd0| 20 22 73 70 6c 6f 74 22 | 20 22 70 6c 6f 74 22 20 | "splot"| "plot" |
|00000de0| 22 20 0a 22 20 66 6f 72 | 77 61 72 64 2d 63 68 61 |" ." for|ward-cha|
|00000df0| 72 20 2d 31 20 22 7b 22 | 20 73 79 6d 62 6f 6c 2d |r -1 "{"| symbol-|
|00000e00| 6e 61 6d 65 20 31 20 22 | 3a 22 20 22 7d 20 22 20 |name 1 "|:" "} " |
|00000e10| 22 74 69 74 6c 65 20 5c | 22 22 20 22 5c 22 20 22 |"title \|"" "\" "|
|00000e20| 20 22 77 69 74 68 20 64 | 6f 74 73 22 20 63 61 72 | "with d|ots" car|
|00000e30| 2d 73 61 66 65 20 76 65 | 63 20 63 61 6c 63 2d 67 |-safe ve|c calc-g|
|00000e40| 72 61 70 68 2d 73 65 74 | 2d 73 74 79 6c 65 73 20 |raph-set|-styles |
|00000e50| 28 62 69 67 70 6f 73 20 | 62 69 67 6e 65 67 29 20 |(bigpos |bigneg) |
|00000e60| 66 6c 6f 61 74 20 32 20 | 30 20 6d 61 74 68 2d 74 |float 2 |0 math-t|
|00000e70| 72 75 6e 63 20 28 62 69 | 67 70 6f 73 20 62 69 67 |runc (bi|gpos big|
|00000e80| 6e 65 67 29 5d 20 32 36 | 29 29 0a 0a 28 64 65 66 |neg)] 26|))..(def|
|00000e90| 75 6e 20 63 61 6c 63 2d | 67 72 61 70 68 2d 6c 6f |un calc-|graph-lo|
|00000ea0| 6f 6b 75 70 20 28 74 68 | 69 6e 67 29 20 28 62 79 |okup (th|ing) (by|
|00000eb0| 74 65 2d 63 6f 64 65 20 | 22 c5 08 21 c4 3d 85 0d |te-code |"..!.=..|
|00000ec0| 00 c6 c7 08 38 21 83 14 | 00 08 82 43 00 c8 08 0a |....8!..|...C....|
|00000ed0| 5c 22 19 09 86 3f 00 c9 | ca 0a 47 54 21 50 13 c4 |\"...?..|..GT!P..|
|00000ee0| cb 0b 21 cb cc 0b 50 21 | 45 14 08 0c 42 11 09 0a |..!...P!|E...B...|
|00000ef0| 42 89 12 88 c7 0c 38 08 | 4c 88 09 41 29 87 22 20 |B.....8.|L..A)." |
|00000f00| 5b 74 68 69 6e 67 20 66 | 6f 75 6e 64 20 63 61 6c |[thing f|ound cal|
|00000f10| 63 2d 67 72 61 70 68 2d | 76 61 72 2d 63 61 63 68 |c-graph-|var-cach|
|00000f20| 65 20 76 61 72 6e 61 6d | 65 20 76 61 72 20 63 61 |e varnam|e var ca|
|00000f30| 72 2d 73 61 66 65 20 63 | 61 6c 63 2d 76 61 72 2d |r-safe c|alc-var-|
|00000f40| 76 61 6c 75 65 20 32 20 | 61 73 73 6f 63 20 22 50 |value 2 |assoc "P|
|00000f50| 6c 6f 74 44 61 74 61 22 | 20 69 6e 74 2d 74 6f 2d |lotData"| int-to-|
|00000f60| 73 74 72 69 6e 67 20 69 | 6e 74 65 72 6e 20 22 76 |string i|ntern "v|
|00000f70| 61 72 2d 22 5d 20 31 30 | 29 29 0a 0a 28 64 65 66 |ar-"] 10|))..(def|
|00000f80| 75 6e 20 63 61 6c 63 2d | 67 72 61 70 68 2d 6a 75 |un calc-|graph-ju|
|00000f90| 67 67 6c 65 20 28 61 72 | 67 29 20 28 69 6e 74 65 |ggle (ar|g) (inte|
|00000fa0| 72 61 63 74 69 76 65 20 | 22 70 22 29 20 28 62 79 |ractive |"p") (by|
|00000fb0| 74 65 2d 63 6f 64 65 20 | 22 c3 88 c4 20 88 8a 08 |te-code |"... ...|
|00000fc0| 71 88 09 c5 57 85 28 00 | c6 20 1a 0a c5 56 85 27 |q...W.(.|. ...V.'|
|00000fd0| 00 09 c5 57 85 27 00 09 | 0a 5c 5c 89 11 88 82 18 |...W.'..|.\\.....|
|00000fe0| 00 29 88 09 53 89 11 c5 | 59 85 38 00 c7 20 88 82 |.)..S...|Y.8.. ..|
|00000ff0| 29 00 29 87 22 20 5b 63 | 61 6c 63 2d 67 6e 75 70 |).)." [c|alc-gnup|
|00001000| 6c 6f 74 2d 69 6e 70 75 | 74 20 61 72 67 20 6e 75 |lot-inpu|t arg nu|
|00001010| 6d 20 6e 69 6c 20 63 61 | 6c 63 2d 67 72 61 70 68 |m nil ca|lc-graph|
|00001020| 2d 69 6e 69 74 20 30 20 | 63 61 6c 63 2d 67 72 61 |-init 0 |calc-gra|
|00001030| 70 68 2d 63 6f 75 6e 74 | 2d 63 75 72 76 65 73 20 |ph-count|-curves |
|00001040| 63 61 6c 63 2d 67 72 61 | 70 68 2d 64 6f 2d 6a 75 |calc-gra|ph-do-ju|
|00001050| 67 67 6c 65 5d 20 35 29 | 29 0a 0a 28 64 65 66 75 |ggle] 5)|)..(defu|
|00001060| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 63 6f 75 |n calc-g|raph-cou|
|00001070| 6e 74 2d 63 75 72 76 65 | 73 20 6e 69 6c 20 28 62 |nt-curve|s nil (b|
|00001080| 79 74 65 2d 63 6f 64 65 | 20 22 8a 08 71 88 c4 c5 |yte-code| "..q...|
|00001090| c1 c2 23 83 27 00 c6 1b | 65 62 88 c7 c8 c1 c2 23 |..#.'...|eb.....#|
|000010a0| 85 21 00 0b 54 89 13 88 | 82 11 00 88 0b 29 82 28 |.!..T...|.....).(|
|000010b0| 00 c9 29 87 22 20 5b 63 | 61 6c 63 2d 67 6e 75 70 |..)." [c|alc-gnup|
|000010c0| 6c 6f 74 2d 69 6e 70 75 | 74 20 6e 69 6c 20 74 20 |lot-inpu|t nil t |
|000010d0| 6e 75 6d 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |num re-s|earch-fo|
|000010e0| 72 77 61 72 64 20 22 5e | 73 3f 70 6c 6f 74 5b 20 |rward "^|s?plot[ |
|000010f0| 09 5d 22 20 31 20 73 65 | 61 72 63 68 2d 66 6f 72 |.]" 1 se|arch-for|
|00001100| 77 61 72 64 20 22 2c 22 | 20 30 5d 20 35 29 29 0a |ward ","| 0] 5)).|
|00001110| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 67 72 61 |.(defun |calc-gra|
|00001120| 70 68 2d 64 6f 2d 6a 75 | 67 67 6c 65 20 6e 69 6c |ph-do-ju|ggle nil|
|00001130| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c2 18 c4 | (byte-c|ode "...|
|00001140| c1 c1 5c 22 85 30 00 60 | 89 10 88 c4 c1 c2 5c 22 |..\".0.`|......\"|
|00001150| 88 08 60 3d 86 30 00 c5 | 60 c6 5c 5c 64 53 5c 22 |..`=.0..|`.\\dS\"|
|00001160| 1b c7 60 64 53 5c 22 88 | 08 c8 5c 5c 62 88 c9 0b |..`dS\".|..\\b...|
|00001170| ca 5c 22 29 29 87 22 20 | 5b 62 61 73 65 20 74 20 |.\"))." |[base t |
|00001180| 6e 69 6c 20 73 74 72 20 | 63 61 6c 63 2d 67 72 61 |nil str |calc-gra|
|00001190| 70 68 2d 66 69 6e 64 2d | 70 6c 6f 74 20 62 75 66 |ph-find-|plot buf|
|000011a0| 66 65 72 2d 73 75 62 73 | 74 72 69 6e 67 20 32 20 |fer-subs|tring 2 |
|000011b0| 64 65 6c 65 74 65 2d 72 | 65 67 69 6f 6e 20 35 20 |delete-r|egion 5 |
|000011c0| 69 6e 73 65 72 74 20 22 | 2c 20 22 5d 20 37 29 29 |insert "|, "] 7))|
|000011d0| 0a 0a 28 64 65 66 75 6e | 20 63 61 6c 63 2d 67 72 |..(defun| calc-gr|
|000011e0| 61 70 68 2d 70 72 69 6e | 74 20 28 66 6c 61 67 29 |aph-prin|t (flag)|
|000011f0| 20 28 69 6e 74 65 72 61 | 63 74 69 76 65 20 22 50 | (intera|ctive "P|
|00001200| 22 29 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c2 |") (byte|-code ".|
|00001210| 88 c3 08 c1 5c 22 87 22 | 20 5b 66 6c 61 67 20 74 |....\"."| [flag t|
|00001220| 20 6e 69 6c 20 63 61 6c | 63 2d 67 72 61 70 68 2d | nil cal|c-graph-|
|00001230| 70 6c 6f 74 5d 20 33 29 | 29 0a 0a 28 64 65 66 75 |plot] 3)|)..(defu|
|00001240| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 70 6c 6f |n calc-g|raph-plo|
|00001250| 74 20 28 66 6c 61 67 20 | 26 6f 70 74 69 6f 6e 61 |t (flag |&optiona|
|00001260| 6c 20 70 72 69 6e 74 69 | 6e 67 29 20 28 69 6e 74 |l printi|ng) (int|
|00001270| 65 72 61 63 74 69 76 65 | 20 22 50 22 29 20 28 62 |eractive| "P") (b|
|00001280| 79 74 65 2d 63 6f 64 65 | 20 22 c0 88 c1 c2 c3 5c |yte-code| ".....\|
|00001290| 22 87 22 20 5b 6e 69 6c | 20 63 61 6c 63 2d 64 6f |"." [nil| calc-do|
|000012a0| 20 28 6c 61 6d 62 64 61 | 20 6e 69 6c 20 28 62 79 | (lambda| nil (by|
|000012b0| 74 65 2d 63 6f 64 65 20 | 22 70 81 60 00 81 61 00 |te-code |"p.`..a.|
|000012c0| 21 81 62 00 c4 81 63 00 | 0e 07 85 1e 00 81 64 00 |!.b...c.|......d.|
|000012d0| 0e 07 21 81 63 00 56 0e | 07 85 2d 00 81 64 00 0e |..!.c.V.|..-..d..|
|000012e0| 07 21 81 63 00 57 c4 c4 | c4 c4 c4 c4 c4 c4 c4 1e |.!.c.W..|........|
|000012f0| 11 1e 10 1e 0f 1e 0e 1e | 0d 1e 0c 1e 0b 1e 0a 1e |........|........|
|00001300| 09 1e 08 1e 06 1d 1b 1a | 19 18 81 65 00 d3 21 86 |........|...e..!.|
|00001310| 7a 00 0e 12 83 6e 00 c4 | 89 16 13 88 81 66 00 d4 |z....n..|.....f..|
|00001320| 81 67 00 5c 22 82 7a 00 | 0e 14 89 16 13 88 81 67 |.g.\".z.|.......g|
|00001330| 00 89 16 14 88 8a 81 68 | 00 20 88 09 71 88 81 69 |.......h|. ..q..i|
|00001340| 00 20 88 0e 15 71 88 65 | 62 88 81 6a 00 81 6b 00 |. ...q.e|b..j..k.|
|00001350| c4 d6 23 89 16 0c 88 81 | 6c 00 20 0e 19 1e 18 1e |..#.....|l. .....|
|00001360| 17 81 60 00 81 6d 00 21 | 71 88 81 69 00 20 88 81 |..`..m.!|q..i. ..|
|00001370| 6e 00 63 88 0e 18 81 6f | 00 59 85 dd 00 81 70 00 |n.c....o|.Y....p.|
|00001380| 81 71 00 81 72 00 81 73 | 00 81 74 00 81 75 00 81 |.q..r..s|..t..u..|
|00001390| 76 00 81 77 00 26 07 88 | 0e 18 81 78 00 59 85 09 |v..w.&..|...x.Y..|
|000013a0| 01 81 70 00 81 79 00 81 | 7a 00 0e 0c 83 fb 00 81 |..p..y..|z.......|
|000013b0| 7b 00 82 fe 00 81 7c 00 | 81 7d 00 81 7e 00 81 7f |{.....|.|.}..~...|
|000013c0| 00 26 06 88 60 89 16 11 | 88 81 70 00 81 80 00 0e |.&..`...|..p.....|
|000013d0| 17 5c 22 2a 88 65 62 88 | 0e 0c 85 35 01 0e 06 83 |.\"*.eb.|...5....|
|000013e0| 31 01 81 81 00 81 82 00 | 21 82 35 01 d6 89 16 08 |1.......|!.5.....|
|000013f0| 88 70 d6 1e 1a 1e 15 0e | 1b 83 4d 01 0e 1c 16 0d |.p......|..M.....|
|00001400| 0e 1d 89 16 0e 82 83 01 | 81 83 00 81 84 00 21 16 |........|......!.|
|00001410| 0d 81 83 00 81 85 00 21 | 89 16 0e 88 0e 0d 86 6b |.......!|.......k|
|00001420| 01 0e 1e 89 16 0d 88 0e | 0e 83 7e 01 81 86 00 0e |........|..~.....|
|00001430| 0e 21 40 89 16 0e 82 83 | 01 0e 1f 89 16 0e 88 81 |.!@.....|........|
|00001440| 87 00 0e 0d 81 7b 00 5c | 22 86 99 01 81 87 00 0e |.....{.\|".......|
|00001450| 0d 81 88 00 5c 22 85 d5 | 01 0e 1b 83 a7 01 81 89 |....\"..|........|
|00001460| 00 82 d2 01 0e 20 81 8a | 00 3d 86 b7 01 81 8b 00 |..... ..|.=......|
|00001470| 81 8c 00 21 83 c0 01 81 | 8d 00 82 d2 01 0e 19 81 |...!....|........|
|00001480| 78 00 59 83 cf 01 81 8e | 00 82 d2 01 81 89 00 89 |x.Y.....|........|
|00001490| 16 0d 88 81 87 00 0e 0d | 81 8e 00 5c 22 85 f6 01 |........|...\"...|
|000014a0| 81 8f 00 81 90 00 81 91 | 00 20 53 81 92 00 20 53 |........|. S... S|
|000014b0| 23 89 16 0d 88 81 87 00 | 0e 0d 81 93 00 5c 22 85 |#.......|.....\".|
|000014c0| 2b 02 81 8f 00 81 90 00 | 81 94 00 81 95 00 81 91 |+.......|........|
|000014d0| 00 20 81 78 00 5a 5c 22 | 81 94 00 81 95 00 81 92 |. .x.Z\"|........|
|000014e0| 00 20 81 78 00 5a 5c 22 | 23 89 16 0d 88 0e 0e 3b |. .x.Z\"|#......;|
|000014f0| 83 60 02 81 87 00 0e 0e | 81 96 00 5c 22 86 4e 02 |.`......|...\".N.|
|00001500| 81 87 00 0e 0e 81 97 00 | 5c 22 85 4e 02 d6 89 16 |........|\".N....|
|00001510| 0a 85 5d 02 81 98 00 81 | 99 00 21 13 0b 89 16 0e |..].....|..!.....|
|00001520| 82 69 02 81 9a 00 0e 0e | 21 89 16 0e 88 81 87 00 |.i......|!.......|
|00001530| 0e 0d 0e 21 5c 22 86 84 | 02 0e 0d 89 16 21 88 81 |...!\"..|.....!..|
|00001540| 9b 00 81 9c 00 0e 0d 5c | 22 88 81 87 00 0e 0e 0e |.......\|".......|
|00001550| 5c 22 5c 22 86 b5 02 0e | 0e 89 16 5c 22 88 81 9b |\"\"....|...\"...|
|00001560| 00 81 9d 00 81 87 00 0e | 0e 81 9e 00 5c 22 83 ae |........|....\"..|
|00001570| 02 81 7b 00 82 b4 02 81 | 9f 00 0e 0e 21 5c 22 88 |..{.....|....!\".|
|00001580| 81 83 00 81 a0 00 21 89 | 16 0f 88 0e 0f 83 d2 02 |......!.|........|
|00001590| 81 a1 00 0e 0f 21 89 16 | 0f 82 e1 02 0e 0c 83 dc |.....!..|........|
|000015a0| 02 0e 23 82 de 02 0e 24 | 89 16 0f 88 81 83 00 81 |..#....$|........|
|000015b0| a2 00 21 89 16 10 88 0e | 10 83 fe 02 81 a1 00 0e |..!.....|........|
|000015c0| 10 21 89 16 10 82 03 03 | 0e 25 89 16 10 88 81 a3 |.!......|.%......|
|000015d0| 00 81 84 00 21 88 81 a3 | 00 81 85 00 21 88 81 a3 |....!...|....!...|
|000015e0| 00 81 a0 00 21 88 81 a3 | 00 81 a2 00 21 2a 88 0e |....!...|....!*..|
|000015f0| 11 62 88 81 70 00 81 a4 | 00 81 a5 00 0e 0c 83 3d |.b..p...|.......=|
|00001600| 03 81 a6 00 82 40 03 81 | a7 00 81 a8 00 0e 0f 5c |.....@..|.......\|
|00001610| 5c 5d 21 81 a9 00 23 88 | 81 6a 00 81 aa 00 c4 d6 |\]!...#.|.j......|
|00001620| 23 85 a7 03 81 ab 00 81 | ac 00 81 63 00 21 81 ad |#.......|...c.!..|
|00001630| 00 81 63 00 21 5c 22 88 | 81 ae 00 81 af 00 21 83 |..c.!\".|......!.|
|00001640| 80 03 81 b0 00 81 62 00 | 21 82 a3 03 68 81 b1 00 |......b.|!...h...|
|00001650| 3e 85 93 03 81 b2 00 81 | 99 00 21 88 82 80 03 88 |>.......|..!.....|
|00001660| 68 81 b3 00 3d 85 a3 03 | 81 b4 00 81 62 00 21 88 |h...=...|....b.!.|
|00001670| 82 4d 03 88 8a 08 71 88 | 81 b5 00 0e 26 0e 27 0e |.M....q.|....&.'.|
|00001680| 28 0e 29 0e 2a 0e 10 0e | 0c 26 07 89 16 0b 88 0e |(.).*...|.&......|
|00001690| 08 3f 85 d3 03 81 87 00 | 0e 2b 40 41 0e 0b 5c 22 |.?......|.+@A..\"|
|000016a0| 83 f0 03 0e 2b 47 0e 2c | 56 85 ed 03 81 b6 00 0e |....+G.,|V.......|
|000016b0| 2b 0e 2b 41 41 5c 22 88 | 82 d6 03 82 f8 03 c4 0e |+.+AA\".|........|
|000016c0| 0b 42 43 89 16 2b 29 88 | 81 b7 00 d6 d6 5c 22 88 |.BC..+).|.....\".|
|000016d0| 81 6a 00 0e 0c 83 0f 04 | 81 b8 00 82 12 04 81 b9 |.j......|........|
|000016e0| 00 c4 d6 23 85 12 06 0d | 54 89 15 88 81 ba 00 81 |...#....|T.......|
|000016f0| ac 00 81 62 00 21 81 ad | 00 81 62 00 21 5c 22 1e |...b.!..|..b.!\".|
|00001700| 2d 81 bb 00 81 bc 00 0e | 2d 50 21 1e 2e 81 bd 00 |-.......|-P!.....|
|00001710| 81 be 00 0e 2e 21 21 1e | 2f 0e 0c 85 60 04 81 ba |.....!!.|/...`...|
|00001720| 00 81 ac 00 81 6f 00 21 | 81 ad 00 81 6f 00 21 5c |.....o.!|....o.!\|
|00001730| 22 1e 30 0e 0c 85 71 04 | 81 bb 00 81 bc 00 0e 30 |".0...q.|.......0|
|00001740| 50 21 1e 31 0e 0c 85 7e | 04 81 be 00 0e 31 21 1e |P!.1...~|.....1!.|
|00001750| 32 81 ba 00 81 ac 00 81 | 78 00 21 81 ad 00 81 78 |2.......|x.!....x|
|00001760| 00 21 5c 22 1e 33 81 bb | 00 81 bc 00 0e 33 50 21 |.!\".3..|.....3P!|
|00001770| 1e 34 81 be 00 0e 34 21 | 1e 35 c4 1e 36 81 ab 00 |.4....4!|.5..6...|
|00001780| 81 ac 00 81 63 00 21 81 | ad 00 81 63 00 21 5c 22 |....c.!.|...c.!\"|
|00001790| 88 81 98 00 0d 21 89 16 | 36 88 8a 08 71 88 c4 0e |.....!..|6...q...|
|000017a0| 2f 0e 35 c4 c4 c4 c4 c4 | c4 c4 c4 c4 c4 c4 c4 c4 |/.5.....|........|
|000017b0| c4 c4 c4 c4 c4 c4 c4 c4 | 0e 0c 3f 85 f1 04 81 bf |........|..?.....|
|000017c0| 00 0e 36 21 81 63 00 c4 | c4 81 78 00 0e 10 5d 0e |..6!.c..|..x...].|
|000017d0| 28 81 c0 00 3e 3f 85 08 | 05 0e 28 d6 c4 81 63 00 |(...>?..|..(...c.|
|000017e0| c4 1e 56 1e 55 1e 54 1e | 53 1e 28 1e 52 1e 51 1e |..V.U.T.|S.(.R.Q.|
|000017f0| 50 1e 4f 1e 4e 1e 4d 1e | 4c 1e 4b 1e 4a 1e 49 1e |P.O.N.M.|L.K.J.I.|
|00001800| 48 1e 47 1e 46 1e 45 1e | 44 1e 43 1e 42 1e 41 1e |H.G.F.E.|D.C.B.A.|
|00001810| 40 1e 3f 1e 3e 1e 3d 1e | 3c 1e 3b 1e 3a 1e 39 1e |@.?.>.=.|<.;.:.9.|
|00001820| 38 1e 37 1a 8a 0e 0c 83 | 5e 05 81 c1 00 20 82 62 |8.7.....|^.... .b|
|00001830| 05 81 c2 00 20 88 09 71 | 88 64 62 88 81 70 00 81 |.... ..q|.db..p..|
|00001840| a9 00 0e 2d 5c 22 88 0e | 0c 85 81 05 81 70 00 81 |...-\"..|.....p..|
|00001850| c3 00 0e 30 5c 22 88 81 | 70 00 81 c3 00 0e 33 81 |...0\"..|p.....3.|
|00001860| 80 00 23 88 60 89 12 88 | c4 c4 81 c4 00 0e 0c 3f |..#.`...|.......?|
|00001870| 85 a7 05 0e 37 0e 38 0e | 3b 0e 4c 46 1e 5a 1e 59 |....7.8.|;.LF.Z.Y|
|00001880| 1e 58 1e 57 81 87 00 0e | 5a 81 62 00 0d 54 0e 5b |.X.W....|Z.b..T.[|
|00001890| 38 38 5c 22 86 c5 05 c4 | 89 16 4e 88 81 c5 00 0d |88\"....|..N.....|
|000018a0| 54 0e 5b 38 41 0e 5a 5c | 22 88 0e 4e 86 dc 05 81 |T.[8A.Z\|"..N....|
|000018b0| c6 00 20 2c 88 0e 4e 86 | 00 06 0e 54 86 f3 05 81 |.. ,..N.|...T....|
|000018c0| 81 00 81 c7 00 0e 2d 0e | 33 23 88 81 c8 00 0a 64 |......-.|3#.....d|
|000018d0| 0e 36 c4 81 c9 00 25 29 | 2e 5c 22 29 88 81 9f 00 |.6....%)|.\")....|
|000018e0| 0e 36 21 63 2e 0a 88 82 | 01 04 88 0e 09 85 1f 06 |.6!c....|........|
|000018f0| 81 b6 00 0e 0b c4 5c 22 | 88 0d 81 63 00 55 83 42 |......\"|...c.U.B|
|00001900| 06 81 9b 00 81 ca 00 21 | 88 81 cb 00 81 cc 00 21 |.......!|.......!|
|00001910| 88 81 cd 00 81 ce 00 21 | 82 f2 06 0d 0e 2c 5d 16 |.......!|.....,].|
|00001920| 2c 81 98 00 81 63 00 21 | 89 16 36 88 81 c8 00 65 |,....c.!|..6....e|
|00001930| 64 0e 36 c4 81 c9 00 25 | 88 81 9b 00 81 cf 00 81 |d.6....%|........|
|00001940| 9f 00 0e 36 21 5c 22 88 | 81 87 00 0e 0e 81 9e 00 |...6!\".|........|
|00001950| 5c 22 86 8d 06 0e 5c 5c | 86 8d 06 81 9e 00 89 16 |\"....\\|........|
|00001960| 5c 22 88 81 9b 00 81 9d | 00 21 88 0e 1b 83 98 06 |\"......|.!......|
|00001970| 0e 5e 82 b7 06 0e 5f 86 | b7 06 81 d0 00 81 d1 00 |.^...._.|........|
|00001980| 0e 0d 5c 22 85 ac 06 81 | d2 00 86 b7 06 0e 0a 85 |..\"....|........|
|00001990| b7 06 81 d3 00 1e 5d 0e | 5d 85 f1 06 0e 5d 3b 83 |......].|]....];.|
|000019a0| da 06 81 9b 00 81 d4 00 | 81 8f 00 0e 5d 0b 86 d5 |........|....]...|
|000019b0| 06 0e 1d 5c 22 5c 22 82 | f1 06 0e 5d 39 83 eb 06 |...\"\".|...]9...|
|000019c0| 81 d5 00 0e 5d 0e 0e 5c | 22 82 f1 06 81 9a 00 0e |....]..\|".......|
|000019d0| 5d 21 29 29 2e 10 87 22 | 20 5b 63 61 6c 63 62 75 |]!))..."| [calcbu|
|000019e0| 66 20 74 65 6d 70 62 75 | 66 20 74 65 6d 70 62 75 |f tempbu|f tempbu|
|000019f0| 66 74 6f 70 20 74 65 6d | 70 6f 75 74 66 69 6c 65 |ftop tem|poutfile|
|00001a00| 20 6e 69 6c 20 63 75 72 | 76 65 2d 6e 75 6d 20 72 | nil cur|ve-num r|
|00001a10| 65 66 69 6e 65 20 66 6c | 61 67 20 72 65 63 6f 6d |efine fl|ag recom|
|00001a20| 70 75 74 65 20 73 75 72 | 70 72 69 73 65 2d 73 70 |pute sur|prise-sp|
|00001a30| 6c 6f 74 20 74 74 79 2d | 6f 75 74 70 75 74 20 63 |lot tty-|output c|
|00001a40| 61 63 68 65 2d 65 6e 76 | 20 69 73 2d 73 70 6c 6f |ache-env| is-splo|
|00001a50| 74 20 64 65 76 69 63 65 | 20 6f 75 74 70 75 74 20 |t device| output |
|00001a60| 72 65 73 6f 6c 75 74 69 | 6f 6e 20 70 72 65 63 69 |resoluti|on preci|
|00001a70| 73 69 6f 6e 20 73 61 6d | 70 6c 65 73 2d 70 6f 73 |sion sam|ples-pos|
|00001a80| 20 63 61 6c 63 2d 65 6d | 61 63 73 2d 74 79 70 65 | calc-em|acs-type|
|00001a90| 2d 31 39 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 70 |-19 calc|-graph-p|
|00001aa0| 72 65 76 2d 6b 69 6c 6c | 2d 68 6f 6f 6b 20 6b 69 |rev-kill|-hook ki|
|00001ab0| 6c 6c 2d 65 6d 61 63 73 | 2d 68 6f 6f 6b 20 63 61 |ll-emacs|-hook ca|
|00001ac0| 6c 63 2d 67 6e 75 70 6c | 6f 74 2d 69 6e 70 75 74 |lc-gnupl|ot-input|
|00001ad0| 20 74 20 73 74 72 20 76 | 65 72 20 63 61 6c 63 2d | t str v|er calc-|
|00001ae0| 67 6e 75 70 6c 6f 74 2d | 76 65 72 73 69 6f 6e 20 |gnuplot-|version |
|00001af0| 63 61 6c 63 2d 67 72 61 | 70 68 2d 6e 6f 2d 61 75 |calc-gra|ph-no-au|
|00001b00| 74 6f 2d 76 69 65 77 20 | 70 72 69 6e 74 69 6e 67 |to-view |printing|
|00001b10| 20 63 61 6c 63 2d 67 6e | 75 70 6c 6f 74 2d 70 72 | calc-gn|uplot-pr|
|00001b20| 69 6e 74 2d 64 65 76 69 | 63 65 20 63 61 6c 63 2d |int-devi|ce calc-|
|00001b30| 67 6e 75 70 6c 6f 74 2d | 70 72 69 6e 74 2d 6f 75 |gnuplot-|print-ou|
|00001b40| 74 70 75 74 20 63 61 6c | 63 2d 67 6e 75 70 6c 6f |tput cal|c-gnuplo|
|00001b50| 74 2d 64 65 66 61 75 6c | 74 2d 64 65 76 69 63 65 |t-defaul|t-device|
|00001b60| 20 63 61 6c 63 2d 67 6e | 75 70 6c 6f 74 2d 64 65 | calc-gn|uplot-de|
|00001b70| 66 61 75 6c 74 2d 6f 75 | 74 70 75 74 20 77 69 6e |fault-ou|tput win|
|00001b80| 64 6f 77 2d 73 79 73 74 | 65 6d 20 63 61 6c 63 2d |dow-syst|em calc-|
|00001b90| 67 72 61 70 68 2d 6c 61 | 73 74 2d 64 65 76 69 63 |graph-la|st-devic|
|00001ba0| 65 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 6c 61 73 |e calc-g|raph-las|
|00001bb0| 74 2d 6f 75 74 70 75 74 | 20 63 61 6c 63 2d 67 72 |t-output| calc-gr|
|00001bc0| 61 70 68 2d 64 65 66 61 | 75 6c 74 2d 72 65 73 6f |aph-defa|ult-reso|
|00001bd0| 6c 75 74 69 6f 6e 2d 33 | 64 20 63 61 6c 63 2d 67 |lution-3|d calc-g|
|00001be0| 72 61 70 68 2d 64 65 66 | 61 75 6c 74 2d 72 65 73 |raph-def|ault-res|
|00001bf0| 6f 6c 75 74 69 6f 6e 20 | 63 61 6c 63 2d 67 72 61 |olution |calc-gra|
|00001c00| 70 68 2d 64 65 66 61 75 | 6c 74 2d 70 72 65 63 69 |ph-defau|lt-preci|
|00001c10| 73 69 6f 6e 20 63 61 6c | 63 2d 61 6e 67 6c 65 2d |sion cal|c-angle-|
|00001c20| 6d 6f 64 65 20 63 61 6c | 63 2d 63 6f 6d 70 6c 65 |mode cal|c-comple|
|00001c30| 78 2d 6d 6f 64 65 20 63 | 61 6c 63 2d 73 69 6d 70 |x-mode c|alc-simp|
|00001c40| 6c 69 66 79 2d 6d 6f 64 | 65 20 63 61 6c 63 2d 69 |lify-mod|e calc-i|
|00001c50| 6e 66 69 6e 69 74 65 2d | 6d 6f 64 65 20 63 61 6c |nfinite-|mode cal|
|00001c60| 63 2d 77 6f 72 64 2d 73 | 69 7a 65 20 63 61 6c 63 |c-word-s|ize calc|
|00001c70| 2d 67 72 61 70 68 2d 64 | 61 74 61 2d 63 61 63 68 |-graph-d|ata-cach|
|00001c80| 65 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 64 61 74 |e calc-g|raph-dat|
|00001c90| 61 2d 63 61 63 68 65 2d | 6c 69 6d 69 74 20 78 6e |a-cache-|limit xn|
|00001ca0| 61 6d 65 20 78 76 61 72 | 20 78 76 61 6c 75 65 20 |ame xvar| xvalue |
|00001cb0| 79 33 6e 61 6d 65 20 79 | 33 76 61 72 20 79 33 76 |y3name y|3var y3v|
|00001cc0| 61 6c 75 65 20 79 6e 61 | 6d 65 20 79 76 61 72 20 |alue yna|me yvar |
|00001cd0| 79 76 61 6c 75 65 20 66 | 69 6c 65 6e 61 6d 65 20 |yvalue f|ilename |
|00001ce0| 78 70 20 79 70 20 7a 70 | 20 78 6c 6f 77 20 78 68 |xp yp zp| xlow xh|
|00001cf0| 69 67 68 20 79 33 6c 6f | 77 20 79 33 68 69 67 68 |igh y3lo|w y3high|
|00001d00| 20 78 76 65 63 20 78 76 | 61 6c 20 78 73 74 65 70 | xvec xv|al xstep|
|00001d10| 20 76 61 72 2d 44 55 4d | 4d 59 20 79 33 76 65 63 | var-DUM|MY y3vec|
|00001d20| 20 79 33 76 61 6c 20 79 | 33 73 74 65 70 20 76 61 | y3val y|3step va|
|00001d30| 72 2d 44 55 4d 4d 59 32 | 20 7a 76 61 6c 20 79 76 |r-DUMMY2| zval yv|
|00001d40| 65 63 20 79 76 61 6c 20 | 79 63 61 63 68 65 20 79 |ec yval |ycache y|
|00001d50| 63 61 63 68 65 70 74 72 | 20 79 76 65 63 74 6f 72 |cacheptr| yvector|
|00001d60| 20 6e 75 6d 73 74 65 70 | 73 20 6e 75 6d 73 74 65 | numstep|s numste|
|00001d70| 70 73 33 20 6b 65 65 70 | 2d 66 69 6c 65 20 73 74 |ps3 keep|-file st|
|00001d80| 65 70 63 6f 75 6e 74 20 | 63 61 6c 63 2d 73 79 6d |epcount |calc-sym|
|00001d90| 62 6f 6c 69 63 2d 6d 6f | 64 65 20 63 61 6c 63 2d |bolic-mo|de calc-|
|00001da0| 70 72 65 66 65 72 2d 66 | 72 61 63 20 63 61 6c 63 |prefer-f|rac calc|
|00001db0| 2d 69 6e 74 65 72 6e 61 | 6c 2d 70 72 65 63 20 62 |-interna|l-prec b|
|00001dc0| 6c 61 6e 6b 20 6e 6f 6e | 2d 62 6c 61 6e 6b 20 6d |lank non|-blank m|
|00001dd0| 61 74 68 2d 77 6f 72 6b | 69 6e 67 2d 73 74 65 70 |ath-work|ing-step|
|00001de0| 20 6d 61 74 68 2d 77 6f | 72 6b 69 6e 67 2d 73 74 | math-wo|rking-st|
|00001df0| 65 70 2d 32 20 63 61 6c | 63 2d 67 72 6f 75 70 2d |ep-2 cal|c-group-|
|00001e00| 64 69 67 69 74 73 20 63 | 61 6c 63 2d 6c 65 61 64 |digits c|alc-lead|
|00001e10| 69 6e 67 2d 7a 65 72 6f | 73 20 63 61 6c 63 2d 6e |ing-zero|s calc-n|
|00001e20| 75 6d 62 65 72 2d 72 61 | 64 69 78 20 65 6e 74 72 |umber-ra|dix entr|
|00001e30| 79 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 66 69 6c |y calc-g|raph-fil|
|00001e40| 65 2d 63 61 63 68 65 20 | 63 61 6c 63 2d 67 6e 75 |e-cache |calc-gnu|
|00001e50| 70 6c 6f 74 2d 6b 65 65 | 70 2d 6f 75 74 66 69 6c |plot-kee|p-outfil|
|00001e60| 65 20 63 6f 6d 6d 61 6e | 64 20 63 61 6c 63 2d 67 |e comman|d calc-g|
|00001e70| 6e 75 70 6c 6f 74 2d 70 | 72 69 6e 74 2d 63 6f 6d |nuplot-p|rint-com|
|00001e80| 6d 61 6e 64 20 63 61 6c | 63 2d 67 6e 75 70 6c 6f |mand cal|c-gnuplo|
|00001e90| 74 2d 70 6c 6f 74 2d 63 | 6f 6d 6d 61 6e 64 20 67 |t-plot-c|ommand g|
|00001ea0| 65 74 2d 62 75 66 66 65 | 72 2d 63 72 65 61 74 65 |et-buffe|r-create|
|00001eb0| 20 22 2a 47 6e 75 70 6c | 6f 74 20 54 65 6d 70 2d | "*Gnupl|ot Temp-|
|00001ec0| 32 2a 22 20 31 20 30 20 | 70 72 65 66 69 78 2d 6e |2*" 1 0 |prefix-n|
|00001ed0| 75 6d 65 72 69 63 2d 76 | 61 6c 75 65 20 62 6f 75 |umeric-v|alue bou|
|00001ee0| 6e 64 70 20 61 64 64 2d | 68 6f 6f 6b 20 63 61 6c |ndp add-|hook cal|
|00001ef0| 63 2d 67 72 61 70 68 2d | 6b 69 6c 6c 2d 68 6f 6f |c-graph-|kill-hoo|
|00001f00| 6b 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 69 6e 69 |k calc-g|raph-ini|
|00001f10| 74 20 65 72 61 73 65 2d | 62 75 66 66 65 72 20 72 |t erase-|buffer r|
|00001f20| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00001f30| 20 22 5e 73 70 6c 6f 74 | 5b 20 09 5d 22 20 62 75 | "^splot|[ .]" bu|
|00001f40| 66 66 65 72 2d 73 74 72 | 69 6e 67 20 22 2a 47 6e |ffer-str|ing "*Gn|
|00001f50| 75 70 6c 6f 74 20 54 65 | 6d 70 2a 22 20 22 23 20 |uplot Te|mp*" "# |
|00001f60| 28 4e 6f 74 65 3a 20 54 | 68 69 73 20 69 73 20 61 |(Note: T|his is a|
|00001f70| 20 74 65 6d 70 6f 72 61 | 72 79 20 63 6f 70 79 2d | tempora|ry copy-|
|00001f80| 2d 2d 64 6f 20 6e 6f 74 | 20 65 64 69 74 21 29 0a |--do not| edit!).|
|00001f90| 22 20 32 20 69 6e 73 65 | 72 74 20 22 73 65 74 20 |" 2 inse|rt "set |
|00001fa0| 6e 6f 61 72 72 6f 77 0a | 73 65 74 20 6e 6f 6c 61 |noarrow.|set nola|
|00001fb0| 62 65 6c 0a 22 20 22 73 | 65 74 20 61 75 74 6f 73 |bel." "s|et autos|
|00001fc0| 63 61 6c 65 20 78 79 0a | 73 65 74 20 6e 6f 6c 6f |cale xy.|set nolo|
|00001fd0| 67 73 63 61 6c 65 20 78 | 79 0a 22 20 22 73 65 74 |gscale x|y." "set|
|00001fe0| 20 78 6c 61 62 65 6c 0a | 73 65 74 20 79 6c 61 62 | xlabel.|set ylab|
|00001ff0| 65 6c 0a 73 65 74 20 74 | 69 74 6c 65 0a 22 20 22 |el.set t|itle." "|
|00002000| 73 65 74 20 6e 6f 63 6c | 69 70 20 70 6f 69 6e 74 |set nocl|ip point|
|00002010| 73 0a 73 65 74 20 63 6c | 69 70 20 6f 6e 65 0a 73 |s.set cl|ip one.s|
|00002020| 65 74 20 63 6c 69 70 20 | 74 77 6f 0a 22 20 22 73 |et clip |two." "s|
|00002030| 65 74 20 66 6f 72 6d 61 | 74 20 5c 22 25 67 5c 22 |et forma|t \"%g\"|
|00002040| 0a 73 65 74 20 74 69 63 | 73 0a 73 65 74 20 78 74 |.set tic|s.set xt|
|00002050| 69 63 73 0a 73 65 74 20 | 79 74 69 63 73 0a 22 20 |ics.set |ytics." |
|00002060| 22 73 65 74 20 64 61 74 | 61 20 73 74 79 6c 65 20 |"set dat|a style |
|00002070| 6c 69 6e 65 73 70 6f 69 | 6e 74 73 0a 22 20 22 73 |linespoi|nts." "s|
|00002080| 65 74 20 6e 6f 67 72 69 | 64 0a 73 65 74 20 6e 6f |et nogri|d.set no|
|00002090| 6b 65 79 0a 73 65 74 20 | 6e 6f 70 6f 6c 61 72 0a |key.set |nopolar.|
|000020a0| 22 20 33 20 22 73 65 74 | 20 73 75 72 66 61 63 65 |" 3 "set| surface|
|000020b0| 0a 73 65 74 20 6e 6f 63 | 6f 6e 74 6f 75 72 0a 22 |.set noc|ontour."|
|000020c0| 20 22 73 65 74 20 22 20 | 22 22 20 22 6e 6f 22 20 | "set " |"" "no" |
|000020d0| 22 70 61 72 61 6d 65 74 | 72 69 63 0a 22 20 22 73 |"paramet|ric." "s|
|000020e0| 65 74 20 6e 6f 74 69 6d | 65 0a 73 65 74 20 62 6f |et notim|e.set bo|
|000020f0| 72 64 65 72 0a 73 65 74 | 20 7a 74 69 63 73 0a 73 |rder.set| ztics.s|
|00002100| 65 74 20 7a 65 72 6f 61 | 78 69 73 0a 22 20 22 73 |et zeroa|xis." "s|
|00002110| 65 74 20 76 69 65 77 20 | 36 30 2c 33 30 2c 31 2c |et view |60,30,1,|
|00002120| 31 0a 73 65 74 20 6f 66 | 66 73 65 74 73 20 30 2c |1.set of|fsets 0,|
|00002130| 30 2c 30 2c 30 0a 22 20 | 22 0a 0a 22 20 65 72 72 |0,0,0." |".." err|
|00002140| 6f 72 20 22 54 68 69 73 | 20 6f 70 74 69 6f 6e 20 |or "This| option |
|00002150| 77 6f 72 6b 73 20 6f 6e | 6c 79 20 66 6f 72 20 32 |works on|ly for 2|
|00002160| 64 20 70 6c 6f 74 73 22 | 20 63 61 6c 63 2d 67 72 |d plots"| calc-gr|
|00002170| 61 70 68 2d 66 69 6e 64 | 2d 63 6f 6d 6d 61 6e 64 |aph-find|-command|
|00002180| 20 22 74 65 72 6d 69 6e | 61 6c 22 20 22 6f 75 74 | "termin|al" "out|
|00002190| 70 75 74 22 20 72 65 61 | 64 2d 66 72 6f 6d 2d 73 |put" rea|d-from-s|
|000021a0| 74 72 69 6e 67 20 65 71 | 75 61 6c 20 22 64 65 66 |tring eq|ual "def|
|000021b0| 61 75 6c 74 22 20 22 70 | 6f 73 74 73 63 72 69 70 |ault" "p|ostscrip|
|000021c0| 74 22 20 78 20 67 65 74 | 65 6e 76 20 22 44 49 53 |t" x get|env "DIS|
|000021d0| 50 4c 41 59 22 20 22 78 | 31 31 22 20 22 64 75 6d |PLAY" "x|11" "dum|
|000021e0| 62 22 20 66 6f 72 6d 61 | 74 20 22 64 75 6d 62 20 |b" forma|t "dumb |
|000021f0| 25 64 20 25 64 22 20 73 | 63 72 65 65 6e 2d 77 69 |%d %d" s|creen-wi|
|00002200| 64 74 68 20 73 63 72 65 | 65 6e 2d 68 65 69 67 68 |dth scre|en-heigh|
|00002210| 74 20 22 62 69 67 22 20 | 2a 20 34 20 22 61 75 74 |t "big" |* 4 "aut|
|00002220| 6f 22 20 22 74 74 79 22 | 20 63 61 6c 63 2d 74 65 |o" "tty"| calc-te|
|00002230| 6d 70 2d 66 69 6c 65 2d | 6e 61 6d 65 20 2d 31 20 |mp-file-|name -1 |
|00002240| 65 76 61 6c 20 63 61 6c | 63 2d 67 6e 75 70 6c 6f |eval cal|c-gnuplo|
|00002250| 74 2d 63 6f 6d 6d 61 6e | 64 20 22 73 65 74 20 74 |t-comman|d "set t|
|00002260| 65 72 6d 69 6e 61 6c 22 | 20 22 73 65 74 20 6f 75 |erminal"| "set ou|
|00002270| 74 70 75 74 22 20 22 53 | 54 44 4f 55 54 22 20 70 |tput" "S|TDOUT" p|
|00002280| 72 69 6e 31 2d 74 6f 2d | 73 74 72 69 6e 67 20 22 |rin1-to-|string "|
|00002290| 73 61 6d 70 6c 65 73 22 | 20 73 74 72 69 6e 67 2d |samples"| string-|
|000022a0| 74 6f 2d 69 6e 74 20 22 | 70 72 65 63 69 73 69 6f |to-int "|precisio|
|000022b0| 6e 22 20 63 61 6c 63 2d | 67 72 61 70 68 2d 73 65 |n" calc-|graph-se|
|000022c0| 74 2d 63 6f 6d 6d 61 6e | 64 20 22 73 65 74 20 73 |t-comman|d "set s|
|000022d0| 61 6d 70 6c 65 73 20 22 | 20 69 6e 74 2d 74 6f 2d |amples "| int-to-|
|000022e0| 73 74 72 69 6e 67 20 32 | 30 20 32 30 30 20 35 20 |string 2|0 200 5 |
|000022f0| 22 0a 22 20 22 7b 5c 5c | 2a 5b 5e 7d 5d 2b 7d 5b |"." "{\\|*[^}]+}[|
|00002300| 5e 2c 0a 5d 2a 22 20 64 | 65 6c 65 74 65 2d 72 65 |^,.]*" d|elete-re|
|00002310| 67 69 6f 6e 20 6d 61 74 | 63 68 2d 62 65 67 69 6e |gion mat|ch-begin|
|00002320| 6e 69 6e 67 20 6d 61 74 | 63 68 2d 65 6e 64 20 6c |ning mat|ch-end l|
|00002330| 6f 6f 6b 69 6e 67 2d 61 | 74 20 22 2c 22 20 64 65 |ooking-a|t "," de|
|00002340| 6c 65 74 65 2d 63 68 61 | 72 20 28 33 32 20 39 29 |lete-cha|r (32 9)|
|00002350| 20 66 6f 72 77 61 72 64 | 2d 63 68 61 72 20 34 34 | forward|-char 44|
|00002360| 20 64 65 6c 65 74 65 2d | 62 61 63 6b 77 61 72 64 | delete-|backward|
|00002370| 2d 63 68 61 72 20 6c 69 | 73 74 20 73 65 74 63 64 |-char li|st setcd|
|00002380| 72 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 66 69 6e |r calc-g|raph-fin|
|00002390| 64 2d 70 6c 6f 74 20 22 | 7b 5c 5c 28 5b 5e 7b 7d |d-plot "|{\\([^{}|
|000023a0| 3a 0a 5d 2b 5c 5c 29 3a | 5c 5c 28 5b 5e 7b 7d 3a |:.]+\\):|\\([^{}:|
|000023b0| 0a 5d 2b 5c 5c 29 3a 5c | 5c 28 5b 5e 7b 7d 3a 0a |.]+\\):\|\([^{}:.|
|000023c0| 5d 2b 5c 5c 29 7d 22 20 | 22 7b 5c 5c 28 5b 5e 7b |]+\\)}" |"{\\([^{|
|000023d0| 7d 3a 0a 5d 2b 5c 5c 29 | 5c 5c 28 3a 5c 5c 29 5c |}:.]+\\)|\\(:\\)\|
|000023e0| 5c 28 5b 5e 7b 7d 3a 0a | 5d 2b 5c 5c 29 7d 22 20 |\([^{}:.|]+\\)}" |
|000023f0| 62 75 66 66 65 72 2d 73 | 75 62 73 74 72 69 6e 67 |buffer-s|ubstring|
|00002400| 20 69 6e 74 65 72 6e 20 | 22 76 61 72 2d 22 20 6d | intern |"var-" m|
|00002410| 61 74 68 2d 65 76 61 6c | 75 61 74 65 2d 65 78 70 |ath-eval|uate-exp|
|00002420| 72 20 63 61 6c 63 2d 76 | 61 72 2d 76 61 6c 75 65 |r calc-v|ar-value|
|00002430| 20 66 69 6c 65 2d 65 78 | 69 73 74 73 2d 70 20 28 | file-ex|ists-p (|
|00002440| 6e 6f 6e 65 20 6e 75 6d | 29 20 63 61 6c 63 2d 67 |none num|) calc-g|
|00002450| 72 61 70 68 2d 63 6f 6d | 70 75 74 65 2d 33 64 20 |raph-com|pute-3d |
|00002460| 63 61 6c 63 2d 67 72 61 | 70 68 2d 63 6f 6d 70 75 |calc-gra|ph-compu|
|00002470| 74 65 2d 32 64 20 22 3a | 22 20 31 30 20 73 65 74 |te-2d ":|" 10 set|
|00002480| 63 61 72 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 66 |car calc|-graph-f|
|00002490| 6f 72 6d 61 74 2d 64 61 | 74 61 20 22 4e 6f 20 76 |ormat-da|ta "No v|
|000024a0| 61 6c 69 64 20 64 61 74 | 61 20 70 6f 69 6e 74 73 |alid dat|a points|
|000024b0| 20 66 6f 72 20 25 73 3a | 25 73 22 20 77 72 69 74 | for %s:|%s" writ|
|000024c0| 65 2d 72 65 67 69 6f 6e | 20 71 75 69 65 74 20 22 |e-region| quiet "|
|000024d0| 63 6c 65 61 72 22 20 63 | 61 6c 63 2d 63 6c 65 61 |clear" c|alc-clea|
|000024e0| 72 2d 63 6f 6d 6d 61 6e | 64 2d 66 6c 61 67 20 63 |r-comman|d-flag c|
|000024f0| 6c 65 61 72 2d 6d 65 73 | 73 61 67 65 20 6d 65 73 |lear-mes|sage mes|
|00002500| 73 61 67 65 20 22 4e 6f | 20 64 61 74 61 20 74 6f |sage "No| data to|
|00002510| 20 70 6c 6f 74 21 22 20 | 22 6c 6f 61 64 22 20 73 | plot!" |"load" s|
|00002520| 74 72 69 6e 67 2d 6d 61 | 74 63 68 20 22 5e 64 75 |tring-ma|tch "^du|
|00002530| 6d 62 22 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 73 |mb" calc|-graph-s|
|00002540| 68 6f 77 2d 64 75 6d 62 | 20 63 61 6c 63 2d 67 72 |how-dumb| calc-gr|
|00002550| 61 70 68 2d 73 68 6f 77 | 2d 74 74 79 20 22 21 22 |aph-show|-tty "!"|
|00002560| 20 66 75 6e 63 61 6c 6c | 5d 20 31 32 30 29 29 20 | funcall|] 120)) |
|00002570| 34 36 39 36 5d 20 33 29 | 29 0a 0a 28 64 65 66 75 |4696] 3)|)..(defu|
|00002580| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 63 6f 6d |n calc-g|raph-com|
|00002590| 70 75 74 65 2d 32 64 20 | 6e 69 6c 20 28 62 79 74 |pute-2d |nil (byt|
|000025a0| 65 2d 63 6f 64 65 20 22 | cd 09 21 ce 3d 89 10 83 |e-code "|..!.=...|
|000025b0| 6f 00 09 47 53 89 12 cf | 55 83 1a 00 d0 d1 21 82 |o..GS...|U.....!.|
|000025c0| 6c 00 cd 0c 21 ce 3d 89 | 13 83 35 00 0c 47 53 0a |l...!.=.|..5..GS.|
|000025d0| 55 86 32 00 d0 d2 0d 0e | 06 23 82 6c 00 cd 0c 21 |U.2.....|.#.l...!|
|000025e0| d3 3d 85 40 00 d4 0c 21 | 83 59 00 d5 d6 d7 0c 38 |.=.@...!|.Y.....8|
|000025f0| d8 0c 38 5c 22 0a 53 5c | 22 16 07 d8 0c 38 89 14 |..8\".S\|"....8..|
|00002600| 82 6c 00 d9 0c 21 83 66 | 00 da 89 16 07 82 6c 00 |.l...!.f|......l.|
|00002610| d0 db 0d 0e 06 23 82 e6 | 00 d9 09 21 86 a7 00 c9 |.....#..|...!....|
|00002620| 1e 08 dc 09 21 89 11 88 | dd 09 21 88 0e 08 86 8c |....!...|..!.....|
|00002630| 00 d0 de 0e 06 5c 22 88 | 0e 08 41 85 9a 00 d0 df |.....\".|..A.....|
|00002640| 0e 06 0e 08 23 88 e0 09 | e1 0e 08 40 21 e2 23 89 |....#...|...@!.#.|
|00002650| 11 29 88 e3 09 0e 0b 5c | 22 89 16 0a 88 e4 0e 0a |.).....\|".......|
|00002660| 0e 0b 5c 22 88 e5 0e 0b | 0e 0a 86 c5 00 09 43 89 |..\"....|......C.|
|00002670| 16 0a 43 5c 22 88 cd 0c | 21 ce 3d 89 13 3f 85 dc |..C\"...|!.=..?..|
|00002680| 00 0e 0c 85 dc 00 0e 0a | 41 41 83 e4 00 e6 20 82 |........|AA.... .|
|00002690| e6 00 e7 20 87 22 20 5b | 79 76 65 63 20 79 76 61 |... ." [|yvec yva|
|000026a0| 6c 75 65 20 6e 75 6d 73 | 74 65 70 73 20 78 76 65 |lue nums|teps xve|
|000026b0| 63 20 78 76 61 6c 75 65 | 20 78 6e 61 6d 65 20 79 |c xvalue| xname y|
|000026c0| 6e 61 6d 65 20 78 73 74 | 65 70 20 61 72 67 6c 69 |name xst|ep argli|
|000026d0| 73 74 20 6e 69 6c 20 79 | 63 61 63 68 65 20 63 61 |st nil y|cache ca|
|000026e0| 6c 63 2d 67 72 61 70 68 | 2d 64 61 74 61 2d 63 61 |lc-graph|-data-ca|
|000026f0| 63 68 65 20 72 65 66 69 | 6e 65 20 63 61 72 2d 73 |che refi|ne car-s|
|00002700| 61 66 65 20 76 65 63 20 | 30 20 65 72 72 6f 72 20 |afe vec |0 error |
|00002710| 22 43 61 6e 27 74 20 70 | 6c 6f 74 20 61 6e 20 65 |"Can't p|lot an e|
|00002720| 6d 70 74 79 20 76 65 63 | 74 6f 72 22 20 22 25 73 |mpty vec|tor" "%s|
|00002730| 20 61 6e 64 20 25 73 20 | 68 61 76 65 20 64 69 66 | and %s |have dif|
|00002740| 66 65 72 65 6e 74 20 6c | 65 6e 67 74 68 73 22 20 |ferent l|engths" |
|00002750| 69 6e 74 76 20 6d 61 74 | 68 2d 63 6f 6e 73 74 70 |intv mat|h-constp|
|00002760| 20 6d 61 74 68 2d 64 69 | 76 20 6d 61 74 68 2d 73 | math-di|v math-s|
|00002770| 75 62 20 33 20 32 20 6d | 61 74 68 2d 72 65 61 6c |ub 3 2 m|ath-real|
|00002780| 70 20 31 20 22 25 73 20 | 69 73 20 6e 6f 74 20 61 |p 1 "%s |is not a|
|00002790| 20 73 75 69 74 61 62 6c | 65 20 62 61 73 69 73 20 | suitabl|e basis |
|000027a0| 66 6f 72 20 25 73 22 20 | 6d 61 74 68 2d 65 76 61 |for %s" |math-eva|
|000027b0| 6c 75 61 74 65 2d 65 78 | 70 72 20 63 61 6c 63 2d |luate-ex|pr calc-|
|000027c0| 64 65 66 61 75 6c 74 2d | 66 6f 72 6d 75 6c 61 2d |default-|formula-|
|000027d0| 61 72 67 6c 69 73 74 20 | 22 25 73 20 64 6f 65 73 |arglist |"%s does|
|000027e0| 20 6e 6f 74 20 63 6f 6e | 74 61 69 6e 20 61 6e 79 | not con|tain any|
|000027f0| 20 75 6e 61 73 73 69 67 | 6e 65 64 20 76 61 72 69 | unassig|ned vari|
|00002800| 61 62 6c 65 73 22 20 22 | 25 73 20 63 6f 6e 74 61 |ables" "|%s conta|
|00002810| 69 6e 73 20 6d 6f 72 65 | 20 74 68 61 6e 20 6f 6e |ins more| than on|
|00002820| 65 20 76 61 72 69 61 62 | 6c 65 3a 20 25 73 22 20 |e variab|le: %s" |
|00002830| 6d 61 74 68 2d 65 78 70 | 72 2d 73 75 62 73 74 20 |math-exp|r-subst |
|00002840| 6d 61 74 68 2d 62 75 69 | 6c 64 2d 76 61 72 2d 6e |math-bui|ld-var-n|
|00002850| 61 6d 65 20 28 76 61 72 | 20 44 55 4d 4d 59 20 76 |ame (var| DUMMY v|
|00002860| 61 72 2d 44 55 4d 4d 59 | 29 20 61 73 73 6f 63 20 |ar-DUMMY|) assoc |
|00002870| 64 65 6c 71 20 6e 63 6f | 6e 63 20 63 61 6c 63 2d |delq nco|nc calc-|
|00002880| 67 72 61 70 68 2d 72 65 | 66 69 6e 65 2d 32 64 20 |graph-re|fine-2d |
|00002890| 63 61 6c 63 2d 67 72 61 | 70 68 2d 72 65 63 6f 6d |calc-gra|ph-recom|
|000028a0| 70 75 74 65 2d 32 64 5d | 20 32 34 29 29 0a 0a 28 |pute-2d]| 24))..(|
|000028b0| 64 65 66 75 6e 20 63 61 | 6c 63 2d 67 72 61 70 68 |defun ca|lc-graph|
|000028c0| 2d 72 65 66 69 6e 65 2d | 32 64 20 6e 69 6c 20 28 |-refine-|2d nil (|
|000028d0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c1 10 0b 41 89 |byte-cod|e "...A.|
|000028e0| 12 88 d0 d1 21 89 14 85 | 13 00 d2 d3 0c 5c 22 83 |....!...|.....\".|
|000028f0| 39 00 d4 d5 21 d6 d5 21 | 1e 06 1d d7 0c d4 d8 21 |9...!..!|.......!|
|00002900| d6 d8 21 4f 21 16 07 d7 | 0c 0d 0e 06 4f 21 89 16 |..!O!...|....O!..|
|00002910| 08 2a 82 58 00 0e 07 85 | 58 00 0a 41 85 4d 00 d9 |.*.X....|X..A.M..|
|00002920| d8 0a 38 40 0e 07 5c 22 | da 55 85 58 00 0a 41 89 |..8@..\"|.U.X..A.|
|00002930| 12 88 82 3e 00 88 0a 47 | 53 89 16 09 88 0a 41 85 |...>...G|S.....A.|
|00002940| 74 00 0e 08 3f 86 74 00 | d9 0a 40 40 0e 08 5c 22 |t...?.t.|..@@..\"|
|00002950| da 55 85 a7 00 db dc 0a | 40 40 d8 0a 38 40 5c 22 |.U......|@@..8@\"|
|00002960| d5 5c 22 16 0a 0e 0b 54 | 16 0b dd 0e 0d 21 89 16 |.\"....T|.....!..|
|00002970| 0c 88 de 0a 0e 0a 0e 0c | 42 0a 41 42 5c 22 88 0a |........|B.AB\"..|
|00002980| 41 41 89 12 88 82 60 00 | 88 0b 16 0e df 89 16 0f |AA....`.|........|
|00002990| 87 22 20 5b 6b 65 65 70 | 2d 66 69 6c 65 20 6e 69 |." [keep|-file ni|
|000029a0| 6c 20 79 63 61 63 68 65 | 70 74 72 20 79 63 61 63 |l ycache|ptr ycac|
|000029b0| 68 65 20 78 76 61 6c 20 | 62 32 20 65 32 20 78 6c |he xval |b2 e2 xl|
|000029c0| 6f 77 20 78 68 69 67 68 | 20 6d 61 74 68 2d 77 6f |ow xhigh| math-wo|
|000029d0| 72 6b 69 6e 67 2d 73 74 | 65 70 2d 32 20 76 61 72 |rking-st|ep-2 var|
|000029e0| 2d 44 55 4d 4d 59 20 6d | 61 74 68 2d 77 6f 72 6b |-DUMMY m|ath-work|
|000029f0| 69 6e 67 2d 73 74 65 70 | 20 79 76 61 6c 20 79 76 |ing-step| yval yv|
|00002a00| 61 6c 75 65 20 79 70 20 | 6e 75 6d 73 74 65 70 73 |alue yp |numsteps|
|00002a10| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 66 69 6e 64 | calc-gr|aph-find|
|00002a20| 2d 63 6f 6d 6d 61 6e 64 | 20 22 78 72 61 6e 67 65 |-command| "xrange|
|00002a30| 22 20 73 74 72 69 6e 67 | 2d 6d 61 74 63 68 20 22 |" string|-match "|
|00002a40| 5c 5c 60 5c 5c 5b 5c 5c | 28 5b 30 2d 39 2e 65 45 |\\`\\[\\|([0-9.eE|
|00002a50| 2b 2d 5d 2a 5c 5c 29 3a | 5c 5c 28 5b 30 2d 39 2e |+-]*\\):|\\([0-9.|
|00002a60| 65 45 2b 2d 5d 2a 5c 5c | 29 5c 5c 5d 5c 5c 27 22 |eE+-]*\\|)\\]\\'"|
|00002a70| 20 6d 61 74 63 68 2d 62 | 65 67 69 6e 6e 69 6e 67 | match-b|eginning|
|00002a80| 20 32 20 6d 61 74 63 68 | 2d 65 6e 64 20 6d 61 74 | 2 match|-end mat|
|00002a90| 68 2d 72 65 61 64 2d 6e | 75 6d 62 65 72 20 31 20 |h-read-n|umber 1 |
|00002aa0| 6d 61 74 68 2d 63 6f 6d | 70 61 72 65 20 2d 31 20 |math-com|pare -1 |
|00002ab0| 6d 61 74 68 2d 64 69 76 | 20 6d 61 74 68 2d 61 64 |math-div| math-ad|
|00002ac0| 64 20 6d 61 74 68 2d 65 | 76 61 6c 75 61 74 65 2d |d math-e|valuate-|
|00002ad0| 65 78 70 72 20 73 65 74 | 63 64 72 20 31 30 30 30 |expr set|cdr 1000|
|00002ae0| 30 30 30 5d 20 31 38 29 | 29 0a 0a 28 64 65 66 75 |000] 18)|)..(defu|
|00002af0| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 72 65 63 |n calc-g|raph-rec|
|00002b00| 6f 6d 70 75 74 65 2d 32 | 64 20 6e 69 6c 20 28 62 |ompute-2|d nil (b|
|00002b10| 79 74 65 2d 63 6f 64 65 | 20 22 09 89 10 88 0a 83 |yte-code| "......|
|00002b20| 12 00 0c 47 53 13 c6 89 | 15 82 4b 00 d7 0c 21 d8 |...GS...|..K...!.|
|00002b30| 3d 85 1d 00 d9 0c 21 83 | 44 00 0e 07 13 c6 16 08 |=.....!.|D.......|
|00002b40| da 0c 38 16 09 db 0c 38 | 16 0a dc dd 0e 0a 0e 09 |..8....8|........|
|00002b50| 5c 22 0b 53 5c 22 16 0b | da 0c 38 89 14 82 4b 00 |\".S\"..|..8...K.|
|00002b60| de df 0e 0c 0e 0d 23 88 | 0b 89 16 0e 88 0b 53 89 |......#.|......S.|
|00002b70| 13 e0 59 85 0e 01 0e 0f | 54 89 16 0f 88 0a 83 91 |..Y.....|T.......|
|00002b80| 00 0e 10 41 16 10 0e 10 | 40 89 16 11 88 08 09 3d |...A....|@......=|
|00002b90| 3f 85 8e 00 08 40 3a 85 | 8e 00 e1 08 40 40 0e 11 |?....@:.|....@@..|
|00002ba0| 5c 22 e2 55 3f 85 8e 00 | 09 89 10 82 a9 00 0b e0 |\".U?...|........|
|00002bb0| 55 83 9f 00 0e 0a 89 16 | 11 82 a9 00 0c 16 11 e3 |U.......|........|
|00002bc0| 0c 0e 0b 5c 22 89 14 88 | 08 41 85 b9 00 e1 e4 08 |...\"...|.A......|
|00002bd0| 38 40 0e 11 5c 22 e2 55 | 85 c4 00 08 41 89 10 88 |8@..\".U|....A...|
|00002be0| 82 aa 00 88 08 41 85 d4 | 00 e1 e4 08 38 40 0e 11 |.....A..|....8@..|
|00002bf0| 5c 22 e0 55 86 ed 00 c6 | 16 12 0e 11 89 16 13 88 |\".U....|........|
|00002c00| e5 08 0e 11 e6 0e 14 21 | 42 08 41 42 5c 22 88 08 |.......!|B.AB\"..|
|00002c10| 41 89 10 88 0a 83 01 01 | 08 40 41 0d 42 89 15 82 |A.......|.@A.B...|
|00002c20| 0a 01 0e 08 86 0a 01 08 | 89 16 08 88 82 51 00 88 |........|.....Q..|
|00002c30| 0a 83 29 01 0c 16 10 d6 | 16 15 e7 e8 0d 21 42 16 |..).....|.....!B.|
|00002c40| 08 0e 10 47 53 89 13 82 | 2c 01 e9 89 13 87 22 20 |...GS...|,....." |
|00002c50| 5b 79 63 61 63 68 65 70 | 74 72 20 79 63 61 63 68 |[ycachep|tr ycach|
|00002c60| 65 20 78 76 65 63 20 6e | 75 6d 73 74 65 70 73 20 |e xvec n|umsteps |
|00002c70| 78 76 61 6c 75 65 20 79 | 76 65 63 74 6f 72 20 6e |xvalue y|vector n|
|00002c80| 69 6c 20 72 65 73 6f 6c | 75 74 69 6f 6e 20 79 70 |il resol|ution yp|
|00002c90| 20 78 6c 6f 77 20 78 68 | 69 67 68 20 78 73 74 65 | xlow xh|igh xste|
|00002ca0| 70 20 78 6e 61 6d 65 20 | 79 6e 61 6d 65 20 6d 61 |p xname |yname ma|
|00002cb0| 74 68 2d 77 6f 72 6b 69 | 6e 67 2d 73 74 65 70 2d |th-worki|ng-step-|
|00002cc0| 32 20 6d 61 74 68 2d 77 | 6f 72 6b 69 6e 67 2d 73 |2 math-w|orking-s|
|00002cd0| 74 65 70 20 78 70 20 78 | 76 61 6c 20 6b 65 65 70 |tep xp x|val keep|
|00002ce0| 2d 66 69 6c 65 20 76 61 | 72 2d 44 55 4d 4d 59 20 |-file va|r-DUMMY |
|00002cf0| 79 76 61 6c 75 65 20 79 | 76 65 63 20 74 20 63 61 |yvalue y|vec t ca|
|00002d00| 72 2d 73 61 66 65 20 69 | 6e 74 76 20 6d 61 74 68 |r-safe i|ntv math|
|00002d10| 2d 63 6f 6e 73 74 70 20 | 32 20 33 20 6d 61 74 68 |-constp |2 3 math|
|00002d20| 2d 64 69 76 20 6d 61 74 | 68 2d 73 75 62 20 65 72 |-div mat|h-sub er|
|00002d30| 72 6f 72 20 22 25 73 20 | 69 73 20 6e 6f 74 20 61 |ror "%s |is not a|
|00002d40| 20 73 75 69 74 61 62 6c | 65 20 62 61 73 69 73 20 | suitabl|e basis |
|00002d50| 66 6f 72 20 25 73 22 20 | 30 20 6d 61 74 68 2d 63 |for %s" |0 math-c|
|00002d60| 6f 6d 70 61 72 65 20 2d | 31 20 6d 61 74 68 2d 61 |ompare -|1 math-a|
|00002d70| 64 64 20 31 20 73 65 74 | 63 64 72 20 6d 61 74 68 |dd 1 set|cdr math|
|00002d80| 2d 65 76 61 6c 75 61 74 | 65 2d 65 78 70 72 20 76 |-evaluat|e-expr v|
|00002d90| 65 63 20 6e 72 65 76 65 | 72 73 65 20 31 30 30 30 |ec nreve|rse 1000|
|00002da0| 30 30 30 5d 20 31 35 29 | 29 0a 0a 28 64 65 66 75 |000] 15)|)..(defu|
|00002db0| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 63 6f 6d |n calc-g|raph-com|
|00002dc0| 70 75 74 65 2d 33 64 20 | 6e 69 6c 20 28 62 79 74 |pute-3d |nil (byt|
|00002dd0| 65 2d 63 6f 64 65 20 22 | d7 09 21 d8 3d 89 10 83 |e-code "|..!.=...|
|00002de0| 6e 01 d9 09 21 83 1e 01 | 09 47 53 12 da 09 38 47 |n...!...|.GS...8G|
|00002df0| 53 89 13 88 d7 0c 21 d8 | 3d 83 33 00 0c 47 53 0a |S.....!.|=.3..GS.|
|00002e00| 55 86 30 00 db dc 0d 5c | 22 82 6e 00 d7 0c 21 dd |U.0....\|".n...!.|
|00002e10| 3d 85 3e 00 de 0c 21 83 | 58 00 df 0a e0 0c 38 e1 |=.>...!.|X.....8.|
|00002e20| e2 e3 0c 38 e0 0c 38 5c | 22 0a 53 5c 22 23 89 14 |...8..8\|".S\"#..|
|00002e30| 82 6e 00 e4 0c 21 83 68 | 00 df 0a 0c da 23 89 14 |.n...!.h|.....#..|
|00002e40| 82 6e 00 db e5 0d 0e 06 | 23 88 d7 0e 07 21 d8 3d |.n......|#....!.=|
|00002e50| 83 89 00 0e 07 47 53 0b | 55 86 86 00 db dc 0e 08 |.....GS.|U.......|
|00002e60| 5c 22 82 ce 00 d7 0e 07 | 21 dd 3d 85 96 00 de 0e |\"......|!.=.....|
|00002e70| 07 21 83 b4 00 df 0b e0 | 0e 07 38 e1 e2 e3 0e 07 |.!......|..8.....|
|00002e80| 38 e0 0e 07 38 5c 22 0b | 53 5c 22 23 89 16 07 82 |8...8\".|S\"#....|
|00002e90| ce 00 e4 0e 07 21 83 c7 | 00 df 0b 0e 07 da 23 89 |.....!..|......#.|
|00002ea0| 16 07 82 ce 00 db e5 0e | 08 0e 06 23 88 ca 16 09 |........|...#....|
|00002eb0| ca 16 0b ca 16 0c ce 89 | 16 0d 88 0c 41 14 09 41 |........|....A..A|
|00002ec0| 89 11 85 12 01 e6 0e 09 | e7 0b 54 0c 40 5c 22 5c |........|..T.@\"\|
|00002ed0| 22 16 09 e6 0e 0b e8 e9 | 0e 07 41 21 42 5c 22 16 |".......|..A!B\".|
|00002ee0| 0b e6 0e 0c ea e9 09 40 | 41 21 42 5c 22 89 16 0c |.......@|A!B\"...|
|00002ef0| 88 82 dd 00 88 eb 0a 0b | 54 5c 22 53 89 12 82 6b |........|T\"S...k|
|00002f00| 01 09 47 53 89 12 e8 55 | 85 2b 01 db ec 21 88 d7 |..GS...U|.+...!..|
|00002f10| 0c 21 d8 3d 85 39 01 0c | 47 53 0a 55 86 42 01 db |.!.=.9..|GS.U.B..|
|00002f20| e5 0d 0e 06 23 88 d7 0e | 07 21 d8 3d 85 52 01 0e |....#...|.!.=.R..|
|00002f30| 07 47 53 0a 55 86 5c 5c | 01 db e5 0e 08 0e 06 23 |.GS.U.\\|.......#|
|00002f40| 88 0c 16 09 0e 07 16 0b | 09 16 0c ce 89 16 0d 82 |........|........|
|00002f50| bd 02 e4 09 21 86 b1 01 | ca 1e 0f ed 09 21 89 11 |....!...|.....!..|
|00002f60| 88 ee 09 21 88 ef 0e 0f | f0 5c 22 89 16 0f 88 0e |...!....|.\".....|
|00002f70| 0f 41 86 95 01 db f1 0e | 06 5c 22 88 0e 0f 41 41 |.A......|.\"...AA|
|00002f80| 85 a4 01 db f2 0e 06 0e | 0f 23 88 f3 09 f4 f5 0e |........|.#......|
|00002f90| 0f 5c 22 f6 23 89 11 29 | 88 d7 0c 21 d8 3d 89 16 |.\".#..)|...!.=..|
|00002fa0| 0d 83 c5 01 0c 47 53 89 | 12 82 f3 01 d7 0c 21 dd |.....GS.|......!.|
|00002fb0| 3d 85 d0 01 de 0c 21 83 | ed 01 0e 10 12 df 0a e0 |=.....!.|........|
|00002fc0| 0c 38 e1 e2 e3 0c 38 e0 | 0c 38 5c 22 0a 53 5c 22 |.8....8.|.8\".S\"|
|00002fd0| 23 89 14 82 f3 01 db e5 | 0d 0e 06 23 88 d7 0e 07 |#.......|...#....|
|00002fe0| 21 d8 3d 89 16 11 83 09 | 02 0e 07 47 53 89 13 82 |!.=.....|...GS...|
|00002ff0| 3e 02 d7 0e 07 21 dd 3d | 85 16 02 de 0e 07 21 83 |>....!.=|......!.|
|00003000| 37 02 0e 10 13 df 0b e0 | 0e 07 38 e1 e2 e3 0e 07 |7.......|..8.....|
|00003010| 38 e0 0e 07 38 5c 22 0b | 53 5c 22 23 89 16 07 82 |8...8\".|S\"#....|
|00003020| 3e 02 db e5 0e 08 0e 06 | 23 88 ca 16 09 ca 16 0b |>.......|#.......|
|00003030| ca 16 0c ce 89 16 0d 88 | e8 89 16 12 88 0c 41 89 |........|......A.|
|00003040| 14 85 ae 02 e6 0e 09 e7 | 0b 54 0c 40 5c 22 5c 22 |........|.T.@\"\"|
|00003050| 16 09 e6 0e 0b e8 e9 0e | 07 41 21 42 5c 22 16 0b |........|.A!B\"..|
|00003060| f7 0e 0c 42 16 0c 0e 07 | 16 13 0c 40 16 14 e8 16 |...B....|...@....|
|00003070| 15 0e 12 54 89 16 12 88 | 0e 13 41 89 16 13 85 aa |...T....|..A.....|
|00003080| 02 0e 15 54 16 15 0e 13 | 40 16 16 ed 09 21 0e 0c |...T....|@....!..|
|00003090| 42 89 16 0c 88 82 8a 02 | 88 82 52 02 88 f8 0e 0c |B.......|..R.....|
|000030a0| 21 16 0c eb 0a 0b 54 5c | 22 53 89 12 87 22 20 5b |!.....T\|"S..." [|
|000030b0| 79 76 65 63 20 79 76 61 | 6c 75 65 20 6e 75 6d 73 |yvec yva|lue nums|
|000030c0| 74 65 70 73 20 6e 75 6d | 73 74 65 70 73 33 20 78 |teps num|steps3 x|
|000030d0| 76 61 6c 75 65 20 78 6e | 61 6d 65 20 79 6e 61 6d |value xn|ame ynam|
|000030e0| 65 20 79 33 76 61 6c 75 | 65 20 79 33 6e 61 6d 65 |e y3valu|e y3name|
|000030f0| 20 78 70 20 6e 69 6c 20 | 79 70 20 7a 70 20 78 76 | xp nil |yp zp xv|
|00003100| 65 63 20 74 20 61 72 67 | 6c 69 73 74 20 72 65 73 |ec t arg|list res|
|00003110| 6f 6c 75 74 69 6f 6e 20 | 79 33 76 65 63 20 6d 61 |olution |y3vec ma|
|00003120| 74 68 2d 77 6f 72 6b 69 | 6e 67 2d 73 74 65 70 20 |th-worki|ng-step |
|00003130| 79 33 73 74 65 70 20 76 | 61 72 2d 44 55 4d 4d 59 |y3step v|ar-DUMMY|
|00003140| 20 6d 61 74 68 2d 77 6f | 72 6b 69 6e 67 2d 73 74 | math-wo|rking-st|
|00003150| 65 70 2d 32 20 76 61 72 | 2d 44 55 4d 4d 59 32 20 |ep-2 var|-DUMMY2 |
|00003160| 63 61 72 2d 73 61 66 65 | 20 76 65 63 20 6d 61 74 |car-safe| vec mat|
|00003170| 68 2d 6d 61 74 72 69 78 | 70 20 31 20 65 72 72 6f |h-matrix|p 1 erro|
|00003180| 72 20 22 25 73 20 68 61 | 73 20 77 72 6f 6e 67 20 |r "%s ha|s wrong |
|00003190| 6c 65 6e 67 74 68 22 20 | 69 6e 74 76 20 6d 61 74 |length" |intv mat|
|000031a0| 68 2d 63 6f 6e 73 74 70 | 20 63 61 6c 63 46 75 6e |h-constp| calcFun|
|000031b0| 63 2d 69 6e 64 65 78 20 | 32 20 6d 61 74 68 2d 64 |c-index |2 math-d|
|000031c0| 69 76 20 6d 61 74 68 2d | 73 75 62 20 33 20 6d 61 |iv math-|sub 3 ma|
|000031d0| 74 68 2d 72 65 61 6c 70 | 20 22 25 73 20 69 73 20 |th-realp| "%s is |
|000031e0| 6e 6f 74 20 61 20 73 75 | 69 74 61 62 6c 65 20 62 |not a su|itable b|
|000031f0| 61 73 69 73 20 66 6f 72 | 20 25 73 22 20 6e 63 6f |asis for| %s" nco|
|00003200| 6e 63 20 6d 61 6b 65 2d | 6c 69 73 74 20 30 20 63 |nc make-|list 0 c|
|00003210| 6f 70 79 2d 73 65 71 75 | 65 6e 63 65 20 28 73 6b |opy-sequ|ence (sk|
|00003220| 69 70 29 20 2a 20 22 43 | 61 6e 27 74 20 70 6c 6f |ip) * "C|an't plo|
|00003230| 74 20 61 6e 20 65 6d 70 | 74 79 20 76 65 63 74 6f |t an emp|ty vecto|
|00003240| 72 22 20 6d 61 74 68 2d | 65 76 61 6c 75 61 74 65 |r" math-|evaluate|
|00003250| 2d 65 78 70 72 20 63 61 | 6c 63 2d 64 65 66 61 75 |-expr ca|lc-defau|
|00003260| 6c 74 2d 66 6f 72 6d 75 | 6c 61 2d 61 72 67 6c 69 |lt-formu|la-argli|
|00003270| 73 74 20 73 6f 72 74 20 | 73 74 72 69 6e 67 2d 6c |st sort |string-l|
|00003280| 65 73 73 70 20 22 25 73 | 20 64 6f 65 73 20 6e 6f |essp "%s| does no|
|00003290| 74 20 63 6f 6e 74 61 69 | 6e 20 65 6e 6f 75 67 68 |t contai|n enough|
|000032a0| 20 75 6e 61 73 73 69 67 | 6e 65 64 20 76 61 72 69 | unassig|ned vari|
|000032b0| 61 62 6c 65 73 22 20 22 | 25 73 20 63 6f 6e 74 61 |ables" "|%s conta|
|000032c0| 69 6e 73 20 74 6f 6f 20 | 6d 61 6e 79 20 76 61 72 |ins too |many var|
|000032d0| 69 61 62 6c 65 73 3a 20 | 25 73 22 20 6d 61 74 68 |iables: |%s" math|
|000032e0| 2d 6d 75 6c 74 69 2d 73 | 75 62 73 74 20 6d 61 70 |-multi-s|ubst map|
|000032f0| 63 61 72 20 6d 61 74 68 | 2d 62 75 69 6c 64 2d 76 |car math|-build-v|
|00003300| 61 72 2d 6e 61 6d 65 20 | 28 28 76 61 72 20 44 55 |ar-name |((var DU|
|00003310| 4d 4d 59 20 76 61 72 2d | 44 55 4d 4d 59 29 20 28 |MMY var-|DUMMY) (|
|00003320| 76 61 72 20 44 55 4d 4d | 59 32 20 76 61 72 2d 44 |var DUMM|Y2 var-D|
|00003330| 55 4d 4d 59 32 29 29 20 | 28 73 6b 69 70 29 20 6e |UMMY2)) |(skip) n|
|00003340| 72 65 76 65 72 73 65 5d | 20 36 35 29 29 0a 0a 28 |reverse]| 65))..(|
|00003350| 64 65 66 75 6e 20 63 61 | 6c 63 2d 67 72 61 70 68 |defun ca|lc-graph|
|00003360| 2d 66 6f 72 6d 61 74 2d | 64 61 74 61 20 6e 69 6c |-format-|data nil|
|00003370| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 08 54 89 | (byte-c|ode ".T.|
|00003380| 10 09 58 85 16 02 0a 83 | 28 00 0b 41 13 0b 40 14 |..X.....|(..A..@.|
|00003390| 0d 41 15 0d 40 16 06 0e | 07 41 16 07 0e 07 40 89 |.A..@...|.A....@.|
|000033a0| 16 08 82 66 00 0e 09 83 | 43 00 0e 0a 14 d5 0e 0a |...f....|C.......|
|000033b0| 0e 0b 5c 22 16 0a 0d 41 | 15 0d 40 89 16 06 82 66 |..\"...A|..@....f|
|000033c0| 00 0d 40 40 14 0d 40 41 | 16 06 0d 41 89 15 88 0d |..@@..@A|...A....|
|000033d0| 3f 86 60 00 0e 0c 85 60 | 00 d6 0c 0e 0c 5c 22 85 |?.`....`|.....\".|
|000033e0| 66 00 d7 89 11 88 0e 0d | 83 92 00 d8 0e 08 21 d9 |f.......|......!.|
|000033f0| 3d 85 7a 00 0e 08 47 da | 55 85 8f 00 db 0e 08 38 |=.z...G.|U......8|
|00003400| 14 dc 0e 08 38 16 06 dd | 0e 08 38 89 16 08 82 f2 |....8...|..8.....|
|00003410| 00 d8 0e 06 21 d9 3d 85 | a0 00 0e 06 47 da 55 83 |....!.=.|....G.U.|
|00003420| d5 00 0e 0e 86 bf 00 8a | de df 21 71 88 8a 64 62 |........|..!q..db|
|00003430| 88 e0 e1 21 88 e2 63 88 | cf 89 16 0e 29 29 88 db |...!..c.|....))..|
|00003440| 0e 06 38 14 dd 0e 06 38 | 16 08 dc 0e 06 38 89 16 |..8....8|.....8..|
|00003450| 06 82 f2 00 d8 0e 06 21 | e3 3d 85 e3 00 0e 06 47 |.......!|.=.....G|
|00003460| dd 55 85 f2 00 db 0e 06 | 38 14 dc 0e 06 38 89 16 |.U......|8....8..|
|00003470| 06 88 0c 3a 3f 86 fd 00 | 0c 40 e4 3e 85 21 01 0e |...:?...|.@.>.!..|
|00003480| 06 3a 3f 86 0c 01 0e 06 | 40 e5 3e 85 21 01 0e 08 |.:?.....|@.>.!...|
|00003490| 3f 86 21 01 0e 08 3a 3f | 86 21 01 0e 08 40 e6 3e |?.!...:?|.!...@.>|
|000034a0| 83 d9 01 d1 16 10 cf 89 | 16 12 88 0c 3a 3f 86 36 |........|....:?.6|
|000034b0| 01 0c 40 e7 3e 83 40 01 | e8 0c 21 63 82 5a 01 0c |..@.>.@.|..!c.Z..|
|000034c0| 40 e9 3d 85 4c 01 ea 0c | 21 89 14 88 eb e8 db 0c |@.=.L...|!.......|
|000034d0| 38 21 ec ed dc 0c 38 21 | 23 88 ee 63 88 0e 06 3a |8!....8!|#..c...:|
|000034e0| 3f 86 6a 01 0e 06 40 ef | 3e 83 75 01 e8 0e 06 21 |?.j...@.|>.u....!|
|000034f0| 63 82 94 01 0e 06 40 e9 | 3d 85 84 01 ea 0e 06 21 |c.....@.|=......!|
|00003500| 89 16 06 88 eb e8 db 0e | 06 38 21 ec ed dc 0e 06 |........|.8!.....|
|00003510| 38 21 23 88 0e 08 85 d3 | 01 ee 63 88 0e 08 3a 3f |8!#.....|..c...:?|
|00003520| 86 a9 01 0e 08 40 f0 3e | 83 b4 01 e8 0e 08 21 63 |.....@.>|......!c|
|00003530| 82 d3 01 0e 08 40 e9 3d | 85 c3 01 ea 0e 08 21 89 |.....@.=|......!.|
|00003540| 16 08 88 eb e8 db 0e 08 | 38 21 ec ed dc 0e 08 38 |........|8!.....8|
|00003550| 21 23 88 f1 63 82 12 02 | d6 0e 08 f2 5c 22 3f 85 |!#..c...|....\"?.|
|00003560| 05 02 f3 d3 21 85 05 02 | d8 0e 13 21 f4 3d 85 05 |....!...|...!.=..|
|00003570| 02 f5 0e 13 f6 f4 0e 14 | 08 0c 0e 06 25 43 5c 22 |........|....%C\"|
|00003580| 85 05 02 f7 d3 21 88 0e | 10 86 12 02 f1 63 88 cf |.....!..|.....c..|
|00003590| 89 16 10 88 82 00 00 87 | 22 20 5b 73 74 65 70 63 |........|" [stepc|
|000035a0| 6f 75 6e 74 20 6e 75 6d | 73 74 65 70 73 20 78 76 |ount num|steps xv|
|000035b0| 65 63 20 78 70 20 78 76 | 61 6c 20 79 70 20 79 76 |ec xp xv|al yp yv|
|000035c0| 61 6c 20 7a 70 20 7a 76 | 61 6c 20 79 76 65 63 20 |al zp zv|al yvec |
|000035d0| 78 76 61 6c 75 65 20 78 | 73 74 65 70 20 78 68 69 |xvalue x|step xhi|
|000035e0| 67 68 20 69 73 2d 73 70 | 6c 6f 74 20 73 75 72 70 |gh is-sp|lot surp|
|000035f0| 72 69 73 65 2d 73 70 6c | 6f 74 20 74 20 62 6c 61 |rise-spl|ot t bla|
|00003600| 6e 6b 20 6e 69 6c 20 6e | 6f 6e 2d 62 6c 61 6e 6b |nk nil n|on-blank|
|00003610| 20 76 61 72 2d 50 6c 6f | 74 52 65 6a 65 63 74 73 | var-Plo|tRejects|
|00003620| 20 63 75 72 76 65 2d 6e | 75 6d 20 6d 61 74 68 2d | curve-n|um math-|
|00003630| 61 64 64 20 65 71 75 61 | 6c 20 30 20 63 61 72 2d |add equa|l 0 car-|
|00003640| 73 61 66 65 20 63 61 6c | 63 46 75 6e 63 2d 78 79 |safe cal|cFunc-xy|
|00003650| 7a 20 34 20 31 20 32 20 | 33 20 67 65 74 2d 62 75 |z 4 1 2 |3 get-bu|
|00003660| 66 66 65 72 2d 63 72 65 | 61 74 65 20 22 2a 47 6e |ffer-cre|ate "*Gn|
|00003670| 75 70 6c 6f 74 20 54 65 | 6d 70 2a 22 20 72 65 2d |uplot Te|mp*" re-|
|00003680| 73 65 61 72 63 68 2d 62 | 61 63 6b 77 61 72 64 20 |search-b|ackward |
|00003690| 22 5e 70 6c 6f 74 5b 20 | 09 5d 22 20 22 73 65 74 |"^plot[ |.]" "set|
|000036a0| 20 70 61 72 61 6d 65 74 | 72 69 63 0a 73 22 20 63 | paramet|ric.s" c|
|000036b0| 61 6c 63 46 75 6e 63 2d | 78 79 20 28 62 69 67 70 |alcFunc-|xy (bigp|
|000036c0| 6f 73 20 62 69 67 6e 65 | 67 20 66 72 61 63 20 66 |os bigne|g frac f|
|000036d0| 6c 6f 61 74 29 20 28 62 | 69 67 70 6f 73 20 62 69 |loat) (b|igpos bi|
|000036e0| 67 6e 65 67 20 66 72 61 | 63 20 66 6c 6f 61 74 29 |gneg fra|c float)|
|000036f0| 20 28 62 69 67 70 6f 73 | 20 62 69 67 6e 65 67 20 | (bigpos| bigneg |
|00003700| 66 72 61 63 20 66 6c 6f | 61 74 29 20 28 62 69 67 |frac flo|at) (big|
|00003710| 70 6f 73 20 62 69 67 6e | 65 67 29 20 6d 61 74 68 |pos bign|eg) math|
|00003720| 2d 66 6f 72 6d 61 74 2d | 6e 75 6d 62 65 72 20 66 |-format-|number f|
|00003730| 72 61 63 20 6d 61 74 68 | 2d 66 6c 6f 61 74 20 69 |rac math|-float i|
|00003740| 6e 73 65 72 74 20 22 65 | 22 20 69 6e 74 2d 74 6f |nsert "e|" int-to|
|00003750| 2d 73 74 72 69 6e 67 20 | 22 20 22 20 28 62 69 67 |-string |" " (big|
|00003760| 70 6f 73 20 62 69 67 6e | 65 67 29 20 28 62 69 67 |pos bign|eg) (big|
|00003770| 70 6f 73 20 62 69 67 6e | 65 67 29 20 22 0a 22 20 |pos bign|eg) "." |
|00003780| 28 73 6b 69 70 29 20 62 | 6f 75 6e 64 70 20 76 65 |(skip) b|oundp ve|
|00003790| 63 20 6e 63 6f 6e 63 20 | 6c 69 73 74 20 63 61 6c |c nconc |list cal|
|000037a0| 63 2d 72 65 66 72 65 73 | 68 2d 65 76 61 6c 74 6f |c-refres|h-evalto|
|000037b0| 73 5d 20 33 34 29 29 0a | 0a 28 64 65 66 75 6e 20 |s] 34)).|.(defun |
|000037c0| 63 61 6c 63 2d 74 65 6d | 70 2d 66 69 6c 65 2d 6e |calc-tem|p-file-n|
|000037d0| 61 6d 65 20 28 6e 75 6d | 29 20 28 62 79 74 65 2d |ame (num|) (byte-|
|000037e0| 63 6f 64 65 20 22 08 47 | 09 54 58 85 13 00 c4 08 |code ".G|.TX.....|
|000037f0| c2 43 5c 22 89 10 88 82 | 00 00 88 09 54 08 38 86 |.C\"....|....T.8.|
|00003800| 39 00 c5 c6 09 54 08 5c | 22 c7 0b 09 c8 58 83 31 |9....T.\|"....X.1|
|00003810| 00 c9 ca 09 5a 21 82 34 | 00 cb 09 21 50 21 c2 44 |....Z!.4|...!P!.D|
|00003820| 5c 22 40 87 22 20 5b 63 | 61 6c 63 2d 67 72 61 70 |\"@." [c|alc-grap|
|00003830| 68 2d 66 69 6c 65 2d 63 | 61 63 68 65 20 6e 75 6d |h-file-c|ache num|
|00003840| 20 6e 69 6c 20 63 61 6c | 63 2d 67 6e 75 70 6c 6f | nil cal|c-gnuplo|
|00003850| 74 2d 74 65 6d 70 66 69 | 6c 65 20 6e 63 6f 6e 63 |t-tempfi|le nconc|
|00003860| 20 73 65 74 63 61 72 20 | 6e 74 68 63 64 72 20 6d | setcar |nthcdr m|
|00003870| 61 6b 65 2d 74 65 6d 70 | 2d 6e 61 6d 65 20 30 20 |ake-temp|-name 0 |
|00003880| 63 68 61 72 2d 74 6f 2d | 73 74 72 69 6e 67 20 36 |char-to-|string 6|
|00003890| 35 20 69 6e 74 2d 74 6f | 2d 73 74 72 69 6e 67 5d |5 int-to|-string]|
|000038a0| 20 39 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 9))..(d|efun cal|
|000038b0| 63 2d 67 72 61 70 68 2d | 64 65 6c 65 74 65 2d 74 |c-graph-|delete-t|
|000038c0| 65 6d 70 73 20 6e 69 6c | 20 28 62 79 74 65 2d 63 |emps nil| (byte-c|
|000038d0| 6f 64 65 20 22 08 85 1e | 00 08 40 85 15 00 c1 08 |ode "...|..@.....|
|000038e0| 40 40 21 85 15 00 c2 c3 | c4 8f 88 08 41 89 10 88 |@@!.....|....A...|
|000038f0| 82 00 00 87 22 20 5b 63 | 61 6c 63 2d 67 72 61 70 |...." [c|alc-grap|
|00003900| 68 2d 66 69 6c 65 2d 63 | 61 63 68 65 20 66 69 6c |h-file-c|ache fil|
|00003910| 65 2d 65 78 69 73 74 73 | 2d 70 20 65 72 72 20 28 |e-exists|-p err (|
|00003920| 62 79 74 65 2d 63 6f 64 | 65 20 22 c1 08 40 40 21 |byte-cod|e "..@@!|
|00003930| 87 22 20 5b 63 61 6c 63 | 2d 67 72 61 70 68 2d 66 |." [calc|-graph-f|
|00003940| 69 6c 65 2d 63 61 63 68 | 65 20 64 65 6c 65 74 65 |ile-cach|e delete|
|00003950| 2d 66 69 6c 65 5d 20 32 | 29 20 28 28 65 72 72 6f |-file] 2|) ((erro|
|00003960| 72 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 87 |r (byte-|code "..|
|00003970| 22 20 5b 6e 69 6c 5d 20 | 31 29 29 29 5d 20 35 29 |" [nil] |1)))] 5)|
|00003980| 29 0a 0a 28 64 65 66 75 | 6e 20 63 61 6c 63 2d 67 |)..(defu|n calc-g|
|00003990| 72 61 70 68 2d 6b 69 6c | 6c 2d 68 6f 6f 6b 20 6e |raph-kil|l-hook n|
|000039a0| 69 6c 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c1 |il (byte|-code ".|
|000039b0| 20 88 08 85 0a 00 c2 08 | 21 87 22 20 5b 63 61 6c | .......|!." [cal|
|000039c0| 63 2d 67 72 61 70 68 2d | 70 72 65 76 2d 6b 69 6c |c-graph-|prev-kil|
|000039d0| 6c 2d 68 6f 6f 6b 20 63 | 61 6c 63 2d 67 72 61 70 |l-hook c|alc-grap|
|000039e0| 68 2d 64 65 6c 65 74 65 | 2d 74 65 6d 70 73 20 66 |h-delete|-temps f|
|000039f0| 75 6e 63 61 6c 6c 5d 20 | 33 29 29 0a 0a 28 64 65 |uncall] |3))..(de|
|00003a00| 66 75 6e 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 73 |fun calc|-graph-s|
|00003a10| 68 6f 77 2d 74 74 79 20 | 28 6f 75 74 70 75 74 29 |how-tty |(output)|
|00003a20| 20 22 5c 0a 44 65 66 61 | 75 6c 74 20 63 61 6c 63 | "\.Defa|ult calc|
|00003a30| 2d 67 6e 75 70 6c 6f 74 | 2d 70 6c 6f 74 2d 63 6f |-gnuplot|-plot-co|
|00003a40| 6d 6d 61 6e 64 20 66 6f | 72 20 5c 22 74 74 79 5c |mmand fo|r \"tty\|
|00003a50| 22 20 6f 75 74 70 75 74 | 20 6d 6f 64 65 2e 0a 54 |" output| mode..T|
|00003a60| 68 69 73 20 69 73 20 75 | 73 65 66 75 6c 20 66 6f |his is u|seful fo|
|00003a70| 72 20 74 65 6b 34 30 78 | 78 20 61 6e 64 20 6f 74 |r tek40x|x and ot|
|00003a80| 68 65 72 20 67 72 61 70 | 68 69 63 73 2d 74 65 72 |her grap|hics-ter|
|00003a90| 6d 69 6e 61 6c 20 74 79 | 70 65 73 2e 22 20 28 62 |minal ty|pes." (b|
|00003aa0| 79 74 65 2d 63 6f 64 65 | 20 22 c4 c5 c5 08 c1 0a |yte-code| "......|
|00003ab0| c1 c6 c7 c8 0b 0b 23 26 | 08 87 22 20 5b 73 68 65 |......#&|.." [she|
|00003ac0| 6c 6c 2d 66 69 6c 65 2d | 6e 61 6d 65 20 6e 69 6c |ll-file-|name nil|
|00003ad0| 20 63 61 6c 63 2d 67 6e | 75 70 6c 6f 74 2d 62 75 | calc-gn|uplot-bu|
|00003ae0| 66 66 65 72 20 6f 75 74 | 70 75 74 20 63 61 6c 6c |ffer out|put call|
|00003af0| 2d 70 72 6f 63 65 73 73 | 2d 72 65 67 69 6f 6e 20 |-process|-region |
|00003b00| 31 20 22 2d 63 22 20 66 | 6f 72 6d 61 74 20 22 63 |1 "-c" f|ormat "c|
|00003b10| 61 74 20 25 73 20 3e 2f | 64 65 76 2f 74 74 79 3b |at %s >/|dev/tty;|
|00003b20| 20 72 6d 20 25 73 22 5d | 20 31 32 29 29 0a 0a 28 | rm %s"]| 12))..(|
|00003b30| 64 65 66 75 6e 20 63 61 | 6c 63 2d 67 72 61 70 68 |defun ca|lc-graph|
|00003b40| 2d 73 68 6f 77 2d 64 75 | 6d 62 20 28 26 6f 70 74 |-show-du|mb (&opt|
|00003b50| 69 6f 6e 61 6c 20 6f 75 | 74 70 75 74 29 20 22 5c |ional ou|tput) "\|
|00003b60| 0a 44 65 66 61 75 6c 74 | 20 63 61 6c 63 2d 67 6e |.Default| calc-gn|
|00003b70| 75 70 6c 6f 74 2d 70 6c | 6f 74 2d 63 6f 6d 6d 61 |uplot-pl|ot-comma|
|00003b80| 6e 64 20 66 6f 72 20 50 | 69 6e 61 72 64 27 73 20 |nd for P|inard's |
|00003b90| 5c 22 64 75 6d 62 5c 22 | 20 74 65 72 6d 69 6e 61 |\"dumb\"| termina|
|00003ba0| 6c 20 74 79 70 65 2e 0a | 54 68 69 73 20 5c 22 64 |l type..|This \"d|
|00003bb0| 75 6d 62 5c 22 20 64 72 | 69 76 65 72 20 77 69 6c |umb\" dr|iver wil|
|00003bc0| 6c 20 62 65 20 70 72 65 | 73 65 6e 74 20 69 6e 20 |l be pre|sent in |
|00003bd0| 47 6e 75 70 6c 6f 74 20 | 33 2e 30 2e 22 20 28 69 |Gnuplot |3.0." (i|
|00003be0| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 62 79 74 |nteracti|ve) (byt|
|00003bf0| 65 2d 63 6f 64 65 20 22 | c2 88 c8 8b 87 22 20 5b |e-code "|....." [|
|00003c00| 63 61 6c 63 2d 67 6e 75 | 70 6c 6f 74 2d 62 75 66 |calc-gnu|plot-buf|
|00003c10| 66 65 72 20 63 61 6c 63 | 2d 67 6e 75 70 6c 6f 74 |fer calc|-gnuplot|
|00003c20| 2d 74 72 61 69 6c 2d 6d | 61 72 6b 20 6e 69 6c 20 |-trail-m|ark nil |
|00003c30| 74 20 66 6f 75 6e 64 2d | 70 74 20 70 74 20 63 61 |t found-|pt pt ca|
|00003c40| 6c 63 2d 64 75 6d 62 2d | 6d 61 70 20 74 72 75 6e |lc-dumb-|map trun|
|00003c50| 63 61 74 65 2d 6c 69 6e | 65 73 20 28 28 62 79 74 |cate-lin|es ((byt|
|00003c60| 65 2d 63 6f 64 65 20 22 | c8 08 21 88 c9 20 88 09 |e-code "|..!.. ..|
|00003c70| 62 88 ca cb c2 c3 23 86 | 15 00 cc cd 21 88 64 62 |b.....#.|....!.db|
|00003c80| 88 ce cf 21 88 60 89 14 | 88 d0 cb 21 83 5e 00 d1 |...!.`..|...!.^..|
|00003c90| cd 21 88 6c 85 32 00 d2 | cd 21 88 d3 d4 21 86 52 |.!.l.2..|.!...!.R|
|00003ca0| 00 d3 d5 21 86 52 00 d3 | d6 21 86 52 00 60 1d d7 |...!.R..|.!.R.`..|
|00003cb0| d8 d9 da 20 5c 22 21 88 | 0d 62 29 88 db dc 20 60 |... \"!.|.b)... `|
|00003cc0| 5c 22 88 64 62 82 68 00 | dd 20 88 de cd 21 88 df |\".db.h.|. ...!..|
|00003cd0| e0 21 88 e1 c6 21 86 b3 | 00 e2 20 89 16 06 88 e3 |.!...!..|.. .....|
|00003ce0| 0e 06 e4 e5 23 88 e3 0e | 06 e6 e5 23 88 e3 0e 06 |....#...|...#....|
|00003cf0| e7 e8 23 88 e3 0e 06 e9 | ea 23 88 e3 0e 06 eb ec |..#.....|.#......|
|00003d00| 23 88 e3 0e 06 ed e8 23 | 88 e3 0e 06 ee e5 23 88 |#......#|......#.|
|00003d10| e3 0e 06 ef f0 23 88 e3 | 0e 06 f1 f0 23 88 f2 0e |.....#..|....#...|
|00003d20| 06 21 88 c3 89 16 07 88 | f3 f4 f5 f6 20 f7 5c 22 |.!......|.... .\"|
|00003d30| f8 3d 83 ce 00 f9 82 cf | 00 fa 5c 22 88 fb 20 88 |.=......|..\".. .|
|00003d40| fc fd 21 87 22 20 5b 63 | 61 6c 63 2d 67 6e 75 70 |..!." [c|alc-gnup|
|00003d50| 6c 6f 74 2d 62 75 66 66 | 65 72 20 63 61 6c 63 2d |lot-buff|er calc-|
|00003d60| 67 6e 75 70 6c 6f 74 2d | 74 72 61 69 6c 2d 6d 61 |gnuplot-|trail-ma|
|00003d70| 72 6b 20 6e 69 6c 20 74 | 20 66 6f 75 6e 64 2d 70 |rk nil t| found-p|
|00003d80| 74 20 70 74 20 63 61 6c | 63 2d 64 75 6d 62 2d 6d |t pt cal|c-dumb-m|
|00003d90| 61 70 20 74 72 75 6e 63 | 61 74 65 2d 6c 69 6e 65 |ap trunc|ate-line|
|00003da0| 73 20 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |s switch|-to-buff|
|00003db0| 65 72 20 64 65 6c 65 74 | 65 2d 6f 74 68 65 72 2d |er delet|e-other-|
|00003dc0| 77 69 6e 64 6f 77 73 20 | 73 65 61 72 63 68 2d 66 |windows |search-f|
|00003dd0| 6f 72 77 61 72 64 20 22 | 0c 22 20 73 6c 65 65 70 |orward "|." sleep|
|00003de0| 2d 66 6f 72 20 31 20 72 | 65 2d 73 65 61 72 63 68 |-for 1 r|e-search|
|00003df0| 2d 62 61 63 6b 77 61 72 | 64 20 22 0c 5c 5c 7c 5e |-backwar|d ".\\|^|
|00003e00| 5b 20 09 5d 2b 5c 5c 5e | 24 5c 5c 7c 47 20 4e 20 |[ .]+\\^|$\\|G N |
|00003e10| 55 20 50 20 4c 20 4f 20 | 54 22 20 6c 6f 6f 6b 69 |U P L O |T" looki|
|00003e20| 6e 67 2d 61 74 20 66 6f | 72 77 61 72 64 2d 63 68 |ng-at fo|rward-ch|
|00003e30| 61 72 20 66 6f 72 77 61 | 72 64 2d 6c 69 6e 65 20 |ar forwa|rd-line |
|00003e40| 63 61 6c 63 2d 67 72 61 | 70 68 2d 66 69 6e 64 2d |calc-gra|ph-find-|
|00003e50| 63 6f 6d 6d 61 6e 64 20 | 22 74 69 6d 65 22 20 22 |command |"time" "|
|00003e60| 74 69 74 6c 65 22 20 22 | 79 6c 61 62 65 6c 22 20 |title" "|ylabel" |
|00003e70| 69 6e 73 65 72 74 2d 62 | 65 66 6f 72 65 2d 6d 61 |insert-b|efore-ma|
|00003e80| 72 6b 65 72 73 20 66 6f | 72 6d 61 74 20 22 28 25 |rkers fo|rmat "(%|
|00003e90| 73 29 22 20 63 75 72 72 | 65 6e 74 2d 74 69 6d 65 |s)" curr|ent-time|
|00003ea0| 2d 73 74 72 69 6e 67 20 | 73 65 74 2d 77 69 6e 64 |-string |set-wind|
|00003eb0| 6f 77 2d 73 74 61 72 74 | 20 73 65 6c 65 63 74 65 |ow-start| selecte|
|00003ec0| 64 2d 77 69 6e 64 6f 77 | 20 65 6e 64 2d 6f 66 2d |d-window| end-of-|
|00003ed0| 6c 69 6e 65 20 62 61 63 | 6b 77 61 72 64 2d 63 68 |line bac|kward-ch|
|00003ee0| 61 72 20 72 65 63 65 6e | 74 65 72 20 28 34 29 20 |ar recen|ter (4) |
|00003ef0| 62 6f 75 6e 64 70 20 6d | 61 6b 65 2d 73 70 61 72 |boundp m|ake-spar|
|00003f00| 73 65 2d 6b 65 79 6d 61 | 70 20 64 65 66 69 6e 65 |se-keyma|p define|
|00003f10| 2d 6b 65 79 20 22 0a 22 | 20 73 63 72 6f 6c 6c 2d |-key "."| scroll-|
|00003f20| 75 70 20 22 20 22 20 22 | 7f 22 20 73 63 72 6f 6c |up " " "|." scrol|
|00003f30| 6c 2d 64 6f 77 6e 20 22 | 3c 22 20 73 63 72 6f 6c |l-down "|<" scrol|
|00003f40| 6c 2d 6c 65 66 74 20 22 | 3e 22 20 73 63 72 6f 6c |l-left "|>" scrol|
|00003f50| 6c 2d 72 69 67 68 74 20 | 22 7b 22 20 22 7d 22 20 |l-right |"{" "}" |
|00003f60| 22 71 22 20 65 78 69 74 | 2d 72 65 63 75 72 73 69 |"q" exit|-recursi|
|00003f70| 76 65 2d 65 64 69 74 20 | 22 03 03 22 20 75 73 65 |ve-edit |".." use|
|00003f80| 2d 6c 6f 63 61 6c 2d 6d | 61 70 20 6d 65 73 73 61 |-local-m|ap messa|
|00003f90| 67 65 20 22 54 79 70 65 | 20 60 71 27 25 73 20 74 |ge "Type| `q'%s t|
|00003fa0| 6f 20 72 65 74 75 72 6e | 20 74 6f 20 43 61 6c 63 |o return| to Calc|
|00003fb0| 2e 22 20 6c 6f 6f 6b 75 | 70 2d 6b 65 79 20 63 75 |." looku|p-key cu|
|00003fc0| 72 72 65 6e 74 2d 67 6c | 6f 62 61 6c 2d 6d 61 70 |rrent-gl|obal-map|
|00003fd0| 20 22 1b 23 22 20 63 61 | 6c 63 2d 64 69 73 70 61 | ".#" ca|lc-dispa|
|00003fe0| 74 63 68 20 22 20 6f 72 | 20 60 4d 2d 23 20 4d 2d |tch " or| `M-# M-|
|00003ff0| 23 27 22 20 22 22 20 72 | 65 63 75 72 73 69 76 65 |#'" "" r|ecursive|
|00004000| 2d 65 64 69 74 20 62 75 | 72 79 2d 62 75 66 66 65 |-edit bu|ry-buffe|
|00004010| 72 20 22 2a 47 6e 75 70 | 6c 6f 74 20 54 72 61 69 |r "*Gnup|lot Trai|
|00004020| 6c 2a 22 5d 20 33 37 29 | 29 5d 20 31 29 29 0a 0a |l*"] 37)|)] 1))..|
|00004030| 28 64 65 66 75 6e 20 63 | 61 6c 63 2d 67 72 61 70 |(defun c|alc-grap|
|00004040| 68 2d 63 6c 65 61 72 20 | 6e 69 6c 20 28 69 6e 74 |h-clear |nil (int|
|00004050| 65 72 61 63 74 69 76 65 | 29 20 28 62 79 74 65 2d |eractive|) (byte-|
|00004060| 63 6f 64 65 20 22 c2 88 | 08 85 2b 00 c3 08 c4 5c |code "..|..+....\|
|00004070| 22 86 11 00 c3 08 c5 5c | 22 83 28 00 c6 c7 c3 09 |"......\|".(.....|
|00004080| c8 5c 22 83 21 00 c9 82 | 24 00 ca 09 21 5c 22 82 |.\".!...|$...!\".|
|00004090| 2b 00 c6 cb 21 87 22 20 | 5b 63 61 6c 63 2d 67 72 |+...!." |[calc-gr|
|000040a0| 61 70 68 2d 6c 61 73 74 | 2d 64 65 76 69 63 65 20 |aph-last|-device |
|000040b0| 63 61 6c 63 2d 67 72 61 | 70 68 2d 6c 61 73 74 2d |calc-gra|ph-last-|
|000040c0| 6f 75 74 70 75 74 20 6e | 69 6c 20 65 71 75 61 6c |output n|il equal|
|000040d0| 20 22 78 31 31 22 20 22 | 58 31 31 22 20 63 61 6c | "x11" "|X11" cal|
|000040e0| 63 2d 67 6e 75 70 6c 6f | 74 2d 63 6f 6d 6d 61 6e |c-gnuplo|t-comman|
|000040f0| 64 20 22 73 65 74 20 6f | 75 74 70 75 74 22 20 22 |d "set o|utput" "|
|00004100| 53 54 44 4f 55 54 22 20 | 22 22 20 70 72 69 6e 31 |STDOUT" |"" prin1|
|00004110| 2d 74 6f 2d 73 74 72 69 | 6e 67 20 22 63 6c 65 61 |-to-stri|ng "clea|
|00004120| 72 22 5d 20 37 29 29 0a | 0a 28 64 65 66 75 6e 20 |r"] 7)).|.(defun |
|00004130| 63 61 6c 63 2d 67 72 61 | 70 68 2d 74 69 74 6c 65 |calc-gra|ph-title|
|00004140| 2d 78 20 28 74 69 74 6c | 65 29 20 28 69 6e 74 65 |-x (titl|e) (inte|
|00004150| 72 61 63 74 69 76 65 20 | 22 73 58 20 61 78 69 73 |ractive |"sX axis|
|00004160| 20 74 69 74 6c 65 3a 20 | 22 29 20 28 62 79 74 65 | title: |") (byte|
|00004170| 2d 63 6f 64 65 20 22 c1 | 88 c2 c3 c4 08 c5 5c 22 |-code ".|......\"|
|00004180| 3f 85 0f 00 c6 08 21 5c | 22 87 22 20 5b 74 69 74 |?.....!\|"." [tit|
|00004190| 6c 65 20 6e 69 6c 20 63 | 61 6c 63 2d 67 72 61 70 |le nil c|alc-grap|
|000041a0| 68 2d 73 65 74 2d 63 6f | 6d 6d 61 6e 64 20 22 78 |h-set-co|mmand "x|
|000041b0| 6c 61 62 65 6c 22 20 65 | 71 75 61 6c 20 22 22 20 |label" e|qual "" |
|000041c0| 70 72 69 6e 31 2d 74 6f | 2d 73 74 72 69 6e 67 5d |prin1-to|-string]|
|000041d0| 20 35 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 5))..(d|efun cal|
|000041e0| 63 2d 67 72 61 70 68 2d | 74 69 74 6c 65 2d 79 20 |c-graph-|title-y |
|000041f0| 28 74 69 74 6c 65 29 20 | 28 69 6e 74 65 72 61 63 |(title) |(interac|
|00004200| 74 69 76 65 20 22 73 59 | 20 61 78 69 73 20 74 69 |tive "sY| axis ti|
|00004210| 74 6c 65 3a 20 22 29 20 | 28 62 79 74 65 2d 63 6f |tle: ") |(byte-co|
|00004220| 64 65 20 22 c1 88 c2 c3 | c4 08 c5 5c 22 3f 85 0f |de "....|...\"?..|
|00004230| 00 c6 08 21 5c 22 87 22 | 20 5b 74 69 74 6c 65 20 |...!\"."| [title |
|00004240| 6e 69 6c 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 73 |nil calc|-graph-s|
|00004250| 65 74 2d 63 6f 6d 6d 61 | 6e 64 20 22 79 6c 61 62 |et-comma|nd "ylab|
|00004260| 65 6c 22 20 65 71 75 61 | 6c 20 22 22 20 70 72 69 |el" equa|l "" pri|
|00004270| 6e 31 2d 74 6f 2d 73 74 | 72 69 6e 67 5d 20 35 29 |n1-to-st|ring] 5)|
|00004280| 29 0a 0a 28 64 65 66 75 | 6e 20 63 61 6c 63 2d 67 |)..(defu|n calc-g|
|00004290| 72 61 70 68 2d 74 69 74 | 6c 65 2d 7a 20 28 74 69 |raph-tit|le-z (ti|
|000042a0| 74 6c 65 29 20 28 69 6e | 74 65 72 61 63 74 69 76 |tle) (in|teractiv|
|000042b0| 65 20 22 73 5a 20 61 78 | 69 73 20 74 69 74 6c 65 |e "sZ ax|is title|
|000042c0| 3a 20 22 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |: ") (by|te-code |
|000042d0| 22 c1 88 c2 c3 c4 08 c5 | 5c 22 3f 85 0f 00 c6 08 |".......|\"?.....|
|000042e0| 21 5c 22 87 22 20 5b 74 | 69 74 6c 65 20 6e 69 6c |!\"." [t|itle nil|
|000042f0| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 73 65 74 2d | calc-gr|aph-set-|
|00004300| 63 6f 6d 6d 61 6e 64 20 | 22 7a 6c 61 62 65 6c 22 |command |"zlabel"|
|00004310| 20 65 71 75 61 6c 20 22 | 22 20 70 72 69 6e 31 2d | equal "|" prin1-|
|00004320| 74 6f 2d 73 74 72 69 6e | 67 5d 20 35 29 29 0a 0a |to-strin|g] 5))..|
|00004330| 28 64 65 66 75 6e 20 63 | 61 6c 63 2d 67 72 61 70 |(defun c|alc-grap|
|00004340| 68 2d 72 61 6e 67 65 2d | 78 20 28 72 61 6e 67 65 |h-range-|x (range|
|00004350| 29 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 20 22 |) (inter|active "|
|00004360| 73 58 20 61 78 69 73 20 | 72 61 6e 67 65 3a 20 22 |sX axis |range: "|
|00004370| 29 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c1 88 |) (byte-|code "..|
|00004380| c2 c3 08 5c 22 87 22 20 | 5b 72 61 6e 67 65 20 6e |...\"." |[range n|
|00004390| 69 6c 20 63 61 6c 63 2d | 67 72 61 70 68 2d 73 65 |il calc-|graph-se|
|000043a0| 74 2d 72 61 6e 67 65 20 | 22 78 72 61 6e 67 65 22 |t-range |"xrange"|
|000043b0| 5d 20 33 29 29 0a 0a 28 | 64 65 66 75 6e 20 63 61 |] 3))..(|defun ca|
|000043c0| 6c 63 2d 67 72 61 70 68 | 2d 72 61 6e 67 65 2d 79 |lc-graph|-range-y|
|000043d0| 20 28 72 61 6e 67 65 29 | 20 28 69 6e 74 65 72 61 | (range)| (intera|
|000043e0| 63 74 69 76 65 20 22 73 | 59 20 61 78 69 73 20 72 |ctive "s|Y axis r|
|000043f0| 61 6e 67 65 3a 20 22 29 | 20 28 62 79 74 65 2d 63 |ange: ")| (byte-c|
|00004400| 6f 64 65 20 22 c1 88 c2 | c3 08 5c 22 87 22 20 5b |ode "...|..\"." [|
|00004410| 72 61 6e 67 65 20 6e 69 | 6c 20 63 61 6c 63 2d 67 |range ni|l calc-g|
|00004420| 72 61 70 68 2d 73 65 74 | 2d 72 61 6e 67 65 20 22 |raph-set|-range "|
|00004430| 79 72 61 6e 67 65 22 5d | 20 33 29 29 0a 0a 28 64 |yrange"]| 3))..(d|
|00004440| 65 66 75 6e 20 63 61 6c | 63 2d 67 72 61 70 68 2d |efun cal|c-graph-|
|00004450| 72 61 6e 67 65 2d 7a 20 | 28 72 61 6e 67 65 29 20 |range-z |(range) |
|00004460| 28 69 6e 74 65 72 61 63 | 74 69 76 65 20 22 73 5a |(interac|tive "sZ|
|00004470| 20 61 78 69 73 20 72 61 | 6e 67 65 3a 20 22 29 20 | axis ra|nge: ") |
|00004480| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c1 88 c2 c3 |(byte-co|de "....|
|00004490| 08 5c 22 87 22 20 5b 72 | 61 6e 67 65 20 6e 69 6c |.\"." [r|ange nil|
|000044a0| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 73 65 74 2d | calc-gr|aph-set-|
|000044b0| 72 61 6e 67 65 20 22 7a | 72 61 6e 67 65 22 5d 20 |range "z|range"] |
|000044c0| 33 29 29 0a 0a 28 64 65 | 66 75 6e 20 63 61 6c 63 |3))..(de|fun calc|
|000044d0| 2d 67 72 61 70 68 2d 73 | 65 74 2d 72 61 6e 67 65 |-graph-s|et-range|
|000044e0| 20 28 63 6d 64 20 72 61 | 6e 67 65 29 20 28 62 79 | (cmd ra|nge) (by|
|000044f0| 74 65 2d 63 6f 64 65 20 | 22 c2 08 c3 5c 22 85 0a |te-code |"...\"..|
|00004500| 00 c4 c5 21 88 c6 c7 08 | 5c 22 85 18 00 08 c8 c9 |...!....|\"......|
|00004510| 4f 89 10 88 c6 ca 08 5c | 22 3f 85 2c 00 c6 cb 08 |O......\|"?.,....|
|00004520| 5c 22 86 2c 00 c6 cc 08 | 5c 22 85 35 00 08 cd ce |\".,....|\".5....|
|00004530| 21 cf 49 88 d0 09 c2 08 | d1 5c 22 3f 85 44 00 d2 |!.I.....|.\"?.D..|
|00004540| 08 d3 51 5c 22 87 22 20 | 5b 72 61 6e 67 65 20 63 |..Q\"." |[range c|
|00004550| 6d 64 20 65 71 75 61 6c | 20 22 24 22 20 63 61 6c |md equal| "$" cal|
|00004560| 63 2d 64 6f 20 28 6c 61 | 6d 62 64 61 20 6e 69 6c |c-do (la|mbda nil|
|00004570| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c2 c3 21 | (byte-c|ode "..!|
|00004580| 18 c4 08 21 c5 3d 85 0f | 00 c6 08 21 83 27 00 c7 |...!.=..|...!.'..|
|00004590| c8 c9 08 38 21 21 ca c7 | c8 cb 08 38 21 21 51 89 |...8!!..|...8!!Q.|
|000045a0| 11 82 4e 00 c4 08 21 cc | 3d 85 33 00 08 47 cb 55 |..N...!.|=.3..G.U|
|000045b0| 83 4b 00 c7 c8 c3 08 38 | 21 21 ca c7 c8 c9 08 38 |.K.....8|!!.....8|
|000045c0| 21 21 51 89 11 82 4e 00 | cd ce 21 88 cf c3 21 29 |!!Q...N.|..!...!)|
|000045d0| 87 22 20 5b 76 61 6c 20 | 72 61 6e 67 65 20 63 61 |." [val |range ca|
|000045e0| 6c 63 2d 74 6f 70 2d 6e | 20 31 20 63 61 72 2d 73 |lc-top-n| 1 car-s|
|000045f0| 61 66 65 20 69 6e 74 76 | 20 6d 61 74 68 2d 63 6f |afe intv| math-co|
|00004600| 6e 73 74 70 20 6d 61 74 | 68 2d 66 6f 72 6d 61 74 |nstp mat|h-format|
|00004610| 2d 6e 75 6d 62 65 72 20 | 6d 61 74 68 2d 66 6c 6f |-number |math-flo|
|00004620| 61 74 20 32 20 22 3a 22 | 20 33 20 76 65 63 20 65 |at 2 ":"| 3 vec e|
|00004630| 72 72 6f 72 20 22 52 61 | 6e 67 65 20 73 70 65 63 |rror "Ra|nge spec|
|00004640| 69 66 69 63 61 74 69 6f | 6e 20 6d 75 73 74 20 62 |ificatio|n must b|
|00004650| 65 20 61 6e 20 69 6e 74 | 65 72 76 61 6c 20 6f 72 |e an int|erval or|
|00004660| 20 32 2d 76 65 63 74 6f | 72 22 20 63 61 6c 63 2d | 2-vecto|r" calc-|
|00004670| 70 6f 70 2d 73 74 61 63 | 6b 5d 20 31 36 29 29 20 |pop-stac|k] 16)) |
|00004680| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 22 5c 5c |string-m|atch "\\|
|00004690| 5b 2e 2b 5c 5c 5d 22 20 | 31 20 2d 31 20 22 3a 22 |[.+\\]" |1 -1 ":"|
|000046a0| 20 22 2c 22 20 22 20 22 | 20 6d 61 74 63 68 2d 62 | "," " "| match-b|
|000046b0| 65 67 69 6e 6e 69 6e 67 | 20 30 20 35 38 20 63 61 |eginning| 0 58 ca|
|000046c0| 6c 63 2d 67 72 61 70 68 | 2d 73 65 74 2d 63 6f 6d |lc-graph|-set-com|
|000046d0| 6d 61 6e 64 20 22 22 20 | 22 5b 22 20 22 5d 22 5d |mand "" |"[" "]"]|
|000046e0| 20 31 33 29 29 0a 0a 28 | 64 65 66 75 6e 20 63 61 | 13))..(|defun ca|
|000046f0| 6c 63 2d 67 72 61 70 68 | 2d 6c 6f 67 2d 78 20 28 |lc-graph|-log-x (|
|00004700| 66 6c 61 67 29 20 28 69 | 6e 74 65 72 61 63 74 69 |flag) (i|nteracti|
|00004710| 76 65 20 22 50 22 29 20 | 28 62 79 74 65 2d 63 6f |ve "P") |(byte-co|
|00004720| 64 65 20 22 c1 88 c2 08 | c3 c3 23 87 22 20 5b 66 |de "....|..#." [f|
|00004730| 6c 61 67 20 6e 69 6c 20 | 63 61 6c 63 2d 67 72 61 |lag nil |calc-gra|
|00004740| 70 68 2d 73 65 74 2d 6c | 6f 67 20 30 5d 20 34 29 |ph-set-l|og 0] 4)|
|00004750| 29 0a 0a 28 64 65 66 75 | 6e 20 63 61 6c 63 2d 67 |)..(defu|n calc-g|
|00004760| 72 61 70 68 2d 6c 6f 67 | 2d 79 20 28 66 6c 61 67 |raph-log|-y (flag|
|00004770| 29 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 20 22 |) (inter|active "|
|00004780| 50 22 29 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |P") (byt|e-code "|
|00004790| c1 88 c2 c3 08 c3 23 87 | 22 20 5b 66 6c 61 67 20 |......#.|" [flag |
|000047a0| 6e 69 6c 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 73 |nil calc|-graph-s|
|000047b0| 65 74 2d 6c 6f 67 20 30 | 5d 20 34 29 29 0a 0a 28 |et-log 0|] 4))..(|
|000047c0| 64 65 66 75 6e 20 63 61 | 6c 63 2d 67 72 61 70 68 |defun ca|lc-graph|
|000047d0| 2d 6c 6f 67 2d 7a 20 28 | 66 6c 61 67 29 20 28 69 |-log-z (|flag) (i|
|000047e0| 6e 74 65 72 61 63 74 69 | 76 65 20 22 50 22 29 20 |nteracti|ve "P") |
|000047f0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c1 88 c2 c3 |(byte-co|de "....|
|00004800| c3 08 23 87 22 20 5b 66 | 6c 61 67 20 6e 69 6c 20 |..#." [f|lag nil |
|00004810| 63 61 6c 63 2d 67 72 61 | 70 68 2d 73 65 74 2d 6c |calc-gra|ph-set-l|
|00004820| 6f 67 20 30 5d 20 34 29 | 29 0a 0a 28 64 65 66 75 |og 0] 4)|)..(defu|
|00004830| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 73 65 74 |n calc-g|raph-set|
|00004840| 2d 6c 6f 67 20 28 78 66 | 6c 61 67 20 79 66 6c 61 |-log (xf|lag yfla|
|00004850| 67 20 7a 66 6c 61 67 29 | 20 28 62 79 74 65 2d 63 |g zflag)| (byte-c|
|00004860| 6f 64 65 20 22 c8 c9 21 | 86 07 00 ca 18 cb cc 08 |ode "..!|........|
|00004870| 5c 22 19 cb cd 08 5c 22 | 1a cb ce 08 5c 22 1b cf |\"....\"|....\"..|
|00004880| 1c 0d 83 2f 00 0d d0 3d | 83 27 00 09 82 2c 00 d1 |.../...=|.'...,..|
|00004890| 0d 21 d0 56 82 31 00 09 | 3f 83 38 00 cc 82 39 00 |.!.V.1..|?.8...9.|
|000048a0| ca 0e 06 83 52 00 0e 06 | d0 3d 83 49 00 0a 82 4f |....R...|.=.I...O|
|000048b0| 00 d1 0e 06 21 d0 56 82 | 54 00 0a 3f 83 5b 00 cd |....!.V.|T..?.[..|
|000048c0| 82 5c 5c 00 ca 0e 07 83 | 75 00 0e 07 d0 3d 83 6c |.\\.....|u....=.l|
|000048d0| 00 0b 82 72 00 d1 0e 07 | 21 d0 56 82 77 00 0b 3f |...r....|!.V.w..?|
|000048e0| 83 7e 00 ce 82 7f 00 ca | 51 89 14 88 d2 c9 d3 0c |.~......|Q.......|
|000048f0| ca 5c 22 3f 85 8e 00 0c | 5c 22 2d 87 22 20 5b 6f |.\"?....|\"-." [o|
|00004900| 6c 64 20 78 6f 6c 64 20 | 79 6f 6c 64 20 7a 6f 6c |ld xold |yold zol|
|00004910| 64 20 73 74 72 20 78 66 | 6c 61 67 20 79 66 6c 61 |d str xf|lag yfla|
|00004920| 67 20 7a 66 6c 61 67 20 | 63 61 6c 63 2d 67 72 61 |g zflag |calc-gra|
|00004930| 70 68 2d 66 69 6e 64 2d | 63 6f 6d 6d 61 6e 64 20 |ph-find-|command |
|00004940| 22 6c 6f 67 73 63 61 6c | 65 22 20 22 22 20 73 74 |"logscal|e" "" st|
|00004950| 72 69 6e 67 2d 6d 61 74 | 63 68 20 22 78 22 20 22 |ring-mat|ch "x" "|
|00004960| 79 22 20 22 7a 22 20 6e | 69 6c 20 30 20 70 72 65 |y" "z" n|il 0 pre|
|00004970| 66 69 78 2d 6e 75 6d 65 | 72 69 63 2d 76 61 6c 75 |fix-nume|ric-valu|
|00004980| 65 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 73 65 74 |e calc-g|raph-set|
|00004990| 2d 63 6f 6d 6d 61 6e 64 | 20 65 71 75 61 6c 5d 20 |-command| equal] |
|000049a0| 31 32 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c |12))..(d|efun cal|
|000049b0| 63 2d 67 72 61 70 68 2d | 6c 69 6e 65 2d 73 74 79 |c-graph-|line-sty|
|000049c0| 6c 65 20 28 73 74 79 6c | 65 29 20 28 69 6e 74 65 |le (styl|e) (inte|
|000049d0| 72 61 63 74 69 76 65 20 | 22 50 22 29 20 28 62 79 |ractive |"P") (by|
|000049e0| 74 65 2d 63 6f 64 65 20 | 22 c2 88 c3 08 85 0a 00 |te-code |".......|
|000049f0| c4 08 21 c1 5c 22 87 22 | 20 5b 73 74 79 6c 65 20 |..!.\"."| [style |
|00004a00| 74 20 6e 69 6c 20 63 61 | 6c 63 2d 67 72 61 70 68 |t nil ca|lc-graph|
|00004a10| 2d 73 65 74 2d 73 74 79 | 6c 65 73 20 70 72 65 66 |-set-sty|les pref|
|00004a20| 69 78 2d 6e 75 6d 65 72 | 69 63 2d 76 61 6c 75 65 |ix-numer|ic-value|
|00004a30| 5d 20 34 29 29 0a 0a 28 | 64 65 66 75 6e 20 63 61 |] 4))..(|defun ca|
|00004a40| 6c 63 2d 67 72 61 70 68 | 2d 70 6f 69 6e 74 2d 73 |lc-graph|-point-s|
|00004a50| 74 79 6c 65 20 28 73 74 | 79 6c 65 29 20 28 69 6e |tyle (st|yle) (in|
|00004a60| 74 65 72 61 63 74 69 76 | 65 20 22 50 22 29 20 28 |teractiv|e "P") (|
|00004a70| 62 79 74 65 2d 63 6f 64 | 65 20 22 c2 88 c3 c0 09 |byte-cod|e ".....|
|00004a80| 85 0b 00 c4 09 21 5c 22 | 87 22 20 5b 74 20 73 74 |.....!\"|." [t st|
|00004a90| 79 6c 65 20 6e 69 6c 20 | 63 61 6c 63 2d 67 72 61 |yle nil |calc-gra|
|00004aa0| 70 68 2d 73 65 74 2d 73 | 74 79 6c 65 73 20 70 72 |ph-set-s|tyles pr|
|00004ab0| 65 66 69 78 2d 6e 75 6d | 65 72 69 63 2d 76 61 6c |efix-num|eric-val|
|00004ac0| 75 65 5d 20 34 29 29 0a | 0a 28 64 65 66 75 6e 20 |ue] 4)).|.(defun |
|00004ad0| 63 61 6c 63 2d 67 72 61 | 70 68 2d 73 65 74 2d 73 |calc-gra|ph-set-s|
|00004ae0| 74 79 6c 65 73 20 28 6c | 69 6e 65 73 20 70 6f 69 |tyles (l|ines poi|
|00004af0| 6e 74 73 29 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |nts) (by|te-code |
|00004b00| 22 cd 20 88 8a 08 71 88 | ce c1 c1 5c 22 86 11 00 |". ...q.|...\"...|
|00004b10| cf d0 21 88 60 c1 c1 c1 | c1 c1 c1 c1 1e 09 1e 08 |..!.`...|........|
|00004b20| 1e 07 1e 06 1d 1c 1b 1a | d1 d2 21 88 d3 d4 21 88 |........|..!...!.|
|00004b30| 60 16 07 0e 07 89 16 06 | 88 0a 62 88 d5 d6 21 85 |`.......|..b...!.|
|00004b40| 82 00 d7 d8 21 89 16 06 | 88 d9 da 21 62 88 d5 db |....!...|...!b...|
|00004b50| 21 85 5c 5c 00 dc d7 d8 | 21 d9 d8 21 5c 22 89 13 |!.\\....|!..!\"..|
|00004b60| 88 d5 dd 21 85 6f 00 de | dc d7 d8 21 d9 d8 21 5c |...!.o..|...!..!\|
|00004b70| 22 21 89 14 88 d5 df 21 | 85 82 00 de dc d7 d8 21 |"!.....!|.......!|
|00004b80| d9 d8 21 5c 22 21 89 15 | 88 e0 0b e1 5c 22 86 8e |..!\"!..|....\"..|
|00004b90| 00 e0 0b e2 5c 22 16 08 | e0 0b e3 5c 22 86 9b 00 |....\"..|...\"...|
|00004ba0| e0 0b e2 5c 22 89 16 09 | 88 0e 0a 83 b8 00 0e 0a |...\"...|........|
|00004bb0| cb 3d 86 b5 00 0e 0a 14 | 0e 0a da 59 89 16 08 82 |.=......|...Y....|
|00004bc0| be 00 0e 08 3f 89 16 08 | 88 0e 0c 83 d8 00 0e 0c |....?...|........|
|00004bd0| cb 3d 86 d5 00 0e 0c 15 | 0e 0c da 59 89 16 09 82 |.=......|...Y....|
|00004be0| de 00 0e 09 3f 89 16 09 | 88 e4 0e 06 0e 07 5c 22 |....?...|......\"|
|00004bf0| 88 0e 06 62 88 e5 e6 0e | 08 83 fe 00 0e 09 83 fa |...b....|........|
|00004c00| 00 e2 82 fb 00 e1 82 08 | 01 0e 09 83 07 01 e3 82 |........|........|
|00004c10| 08 01 e7 5c 22 88 0d 85 | 11 01 0d da 56 83 2f 01 |...\"...|....V./.|
|00004c20| e5 e8 0c 85 1d 01 0c da | 56 83 26 01 e9 0c 21 82 |........|V.&...!.|
|00004c30| 27 01 ea e8 e9 0d 21 24 | 82 3f 01 0c 85 36 01 0c |'.....!$|.?...6..|
|00004c40| da 56 85 3f 01 e5 e8 e9 | 0c 21 5c 22 2e 08 29 88 |.V.?....|.!\"..).|
|00004c50| eb 20 87 22 20 5b 63 61 | 6c 63 2d 67 6e 75 70 6c |. ." [ca|lc-gnupl|
|00004c60| 6f 74 2d 69 6e 70 75 74 | 20 6e 69 6c 20 62 61 73 |ot-input| nil bas|
|00004c70| 65 20 6d 6f 64 65 20 6c | 73 74 79 6c 65 20 70 73 |e mode l|style ps|
|00004c80| 74 79 6c 65 20 73 74 61 | 72 74 20 65 6e 64 20 6c |tyle sta|rt end l|
|00004c90| 65 6e 62 6c 20 70 65 6e | 62 6c 20 6c 69 6e 65 73 |enbl pen|bl lines|
|00004ca0| 20 74 20 70 6f 69 6e 74 | 73 20 63 61 6c 63 2d 67 | t point|s calc-g|
|00004cb0| 72 61 70 68 2d 69 6e 69 | 74 20 63 61 6c 63 2d 67 |raph-ini|t calc-g|
|00004cc0| 72 61 70 68 2d 66 69 6e | 64 2d 70 6c 6f 74 20 65 |raph-fin|d-plot e|
|00004cd0| 72 72 6f 72 20 22 4e 6f | 20 64 61 74 61 20 70 6f |rror "No| data po|
|00004ce0| 69 6e 74 73 20 68 61 76 | 65 20 62 65 65 6e 20 73 |ints hav|e been s|
|00004cf0| 65 74 21 22 20 72 65 2d | 73 65 61 72 63 68 2d 66 |et!" re-|search-f|
|00004d00| 6f 72 77 61 72 64 20 22 | 5b 2c 0a 5d 22 20 66 6f |orward "|[,.]" fo|
|00004d10| 72 77 61 72 64 2d 63 68 | 61 72 20 2d 31 20 6c 6f |rward-ch|ar -1 lo|
|00004d20| 6f 6b 69 6e 67 2d 61 74 | 20 22 5b 5e 2c 0a 5d 2a |oking-at| "[^,.]*|
|00004d30| 5b 5e 2c 0a 20 09 5d 5c | 5c 28 5b 20 09 5d 2b 77 |[^,. .]\|\([ .]+w|
|00004d40| 69 74 68 5c 5c 29 22 20 | 6d 61 74 63 68 2d 62 65 |ith\\)" |match-be|
|00004d50| 67 69 6e 6e 69 6e 67 20 | 31 20 6d 61 74 63 68 2d |ginning |1 match-|
|00004d60| 65 6e 64 20 30 20 22 5b | 20 09 5d 2b 5c 5c 28 5b |end 0 "[| .]+\\([|
|00004d70| 61 2d 7a 5d 2b 5c 5c 29 | 22 20 62 75 66 66 65 72 |a-z]+\\)|" buffer|
|00004d80| 2d 73 75 62 73 74 72 69 | 6e 67 20 22 5b 20 09 61 |-substri|ng "[ .a|
|00004d90| 2d 7a 5d 2b 5c 5c 28 5b | 30 2d 39 5d 2b 5c 5c 29 |-z]+\\([|0-9]+\\)|
|00004da0| 22 20 73 74 72 69 6e 67 | 2d 74 6f 2d 69 6e 74 20 |" string|-to-int |
|00004db0| 22 5b 20 09 61 2d 7a 5d | 2b 5b 30 2d 39 5d 2b 5b |"[ .a-z]|+[0-9]+[|
|00004dc0| 20 09 5d 2b 5c 5c 28 5b | 30 2d 39 5d 2b 5c 5c 29 | .]+\\([|0-9]+\\)|
|00004dd0| 22 20 65 71 75 61 6c 20 | 22 6c 69 6e 65 73 22 20 |" equal |"lines" |
|00004de0| 22 6c 69 6e 65 73 70 6f | 69 6e 74 73 22 20 22 70 |"linespo|ints" "p|
|00004df0| 6f 69 6e 74 73 22 20 64 | 65 6c 65 74 65 2d 72 65 |oints" d|elete-re|
|00004e00| 67 69 6f 6e 20 69 6e 73 | 65 72 74 20 22 20 77 69 |gion ins|ert " wi|
|00004e10| 74 68 20 22 20 22 64 6f | 74 73 22 20 22 20 22 20 |th " "do|ts" " " |
|00004e20| 69 6e 74 2d 74 6f 2d 73 | 74 72 69 6e 67 20 22 31 |int-to-s|tring "1|
|00004e30| 22 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 76 69 65 |" calc-g|raph-vie|
|00004e40| 77 2d 63 6f 6d 6d 61 6e | 64 73 5d 20 33 35 29 29 |w-comman|ds] 35))|
|00004e50| 0a 0a 28 64 65 66 75 6e | 20 63 61 6c 63 2d 67 72 |..(defun| calc-gr|
|00004e60| 61 70 68 2d 7a 65 72 6f | 2d 78 20 28 66 6c 61 67 |aph-zero|-x (flag|
|00004e70| 29 20 28 69 6e 74 65 72 | 61 63 74 69 76 65 20 22 |) (inter|active "|
|00004e80| 50 22 29 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |P") (byt|e-code "|
|00004e90| c1 88 c2 c3 08 83 10 00 | c4 08 21 c5 58 82 14 00 |........|..!.X...|
|00004ea0| c6 c3 21 3f 85 18 00 c7 | 5c 22 87 22 20 5b 66 6c |..!?....|\"." [fl|
|00004eb0| 61 67 20 6e 69 6c 20 63 | 61 6c 63 2d 67 72 61 70 |ag nil c|alc-grap|
|00004ec0| 68 2d 73 65 74 2d 63 6f | 6d 6d 61 6e 64 20 22 6e |h-set-co|mmand "n|
|00004ed0| 6f 78 7a 65 72 6f 61 78 | 69 73 22 20 70 72 65 66 |oxzeroax|is" pref|
|00004ee0| 69 78 2d 6e 75 6d 65 72 | 69 63 2d 76 61 6c 75 65 |ix-numer|ic-value|
|00004ef0| 20 30 20 63 61 6c 63 2d | 67 72 61 70 68 2d 66 69 | 0 calc-|graph-fi|
|00004f00| 6e 64 2d 63 6f 6d 6d 61 | 6e 64 20 22 20 22 5d 20 |nd-comma|nd " "] |
|00004f10| 35 29 29 0a 0a 28 64 65 | 66 75 6e 20 63 61 6c 63 |5))..(de|fun calc|
|00004f20| 2d 67 72 61 70 68 2d 7a | 65 72 6f 2d 79 20 28 66 |-graph-z|ero-y (f|
|00004f30| 6c 61 67 29 20 28 69 6e | 74 65 72 61 63 74 69 76 |lag) (in|teractiv|
|00004f40| 65 20 22 50 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |e "P") (|byte-cod|
|00004f50| 65 20 22 c1 88 c2 c3 08 | 83 10 00 c4 08 21 c5 58 |e ".....|.....!.X|
|00004f60| 82 14 00 c6 c3 21 3f 85 | 18 00 c7 5c 22 87 22 20 |.....!?.|...\"." |
|00004f70| 5b 66 6c 61 67 20 6e 69 | 6c 20 63 61 6c 63 2d 67 |[flag ni|l calc-g|
|00004f80| 72 61 70 68 2d 73 65 74 | 2d 63 6f 6d 6d 61 6e 64 |raph-set|-command|
|00004f90| 20 22 6e 6f 79 7a 65 72 | 6f 61 78 69 73 22 20 70 | "noyzer|oaxis" p|
|00004fa0| 72 65 66 69 78 2d 6e 75 | 6d 65 72 69 63 2d 76 61 |refix-nu|meric-va|
|00004fb0| 6c 75 65 20 30 20 63 61 | 6c 63 2d 67 72 61 70 68 |lue 0 ca|lc-graph|
|00004fc0| 2d 66 69 6e 64 2d 63 6f | 6d 6d 61 6e 64 20 22 20 |-find-co|mmand " |
|00004fd0| 22 5d 20 35 29 29 0a 0a | 28 64 65 66 75 6e 20 63 |"] 5))..|(defun c|
|00004fe0| 61 6c 63 2d 67 72 61 70 | 68 2d 6e 61 6d 65 20 28 |alc-grap|h-name (|
|00004ff0| 6e 61 6d 65 29 20 28 69 | 6e 74 65 72 61 63 74 69 |name) (i|nteracti|
|00005000| 76 65 20 22 73 54 69 74 | 6c 65 20 66 6f 72 20 63 |ve "sTit|le for c|
|00005010| 75 72 72 65 6e 74 20 63 | 75 72 76 65 3a 20 22 29 |urrent c|urve: ")|
|00005020| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c1 88 c6 | (byte-c|ode "...|
|00005030| 20 88 8a 08 71 88 c7 c1 | c1 5c 22 86 13 00 c8 c9 | ...q...|.\".....|
|00005040| 21 88 60 c1 1b 1a ca cb | 21 88 cc cd 21 89 14 88 |!.`.....|!...!...|
|00005050| 0a 62 88 ce cf 21 83 37 | 00 cc d0 21 62 88 d1 60 |.b...!.7|...!b..`|
|00005060| 0c 5c 22 82 39 00 0c 62 | 88 d2 d3 d4 0d 21 5c 22 |.\".9..b|.....!\"|
|00005070| 2a 29 88 d5 20 87 22 20 | 5b 63 61 6c 63 2d 67 6e |*).. ." |[calc-gn|
|00005080| 75 70 6c 6f 74 2d 69 6e | 70 75 74 20 6e 69 6c 20 |uplot-in|put nil |
|00005090| 62 61 73 65 20 73 74 61 | 72 74 20 65 6e 64 20 6e |base sta|rt end n|
|000050a0| 61 6d 65 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 69 |ame calc|-graph-i|
|000050b0| 6e 69 74 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 66 |nit calc|-graph-f|
|000050c0| 69 6e 64 2d 70 6c 6f 74 | 20 65 72 72 6f 72 20 22 |ind-plot| error "|
|000050d0| 4e 6f 20 64 61 74 61 20 | 70 6f 69 6e 74 73 20 68 |No data |points h|
|000050e0| 61 76 65 20 62 65 65 6e | 20 73 65 74 21 22 20 72 |ave been| set!" r|
|000050f0| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00005100| 20 22 5b 2c 0a 5d 5c 5c | 7c 5b 20 09 5d 2b 77 69 | "[,.]\\||[ .]+wi|
|00005110| 74 68 22 20 6d 61 74 63 | 68 2d 62 65 67 69 6e 6e |th" matc|h-beginn|
|00005120| 69 6e 67 20 30 20 6c 6f | 6f 6b 69 6e 67 2d 61 74 |ing 0 lo|oking-at|
|00005130| 20 22 5b 5e 2c 0a 5d 2a | 5b 5e 2c 0a 20 09 5d 5c | "[^,.]*|[^,. .]\|
|00005140| 5c 28 5b 20 09 5d 2b 74 | 69 74 6c 65 5c 5c 29 22 |\([ .]+t|itle\\)"|
|00005150| 20 31 20 64 65 6c 65 74 | 65 2d 72 65 67 69 6f 6e | 1 delet|e-region|
|00005160| 20 69 6e 73 65 72 74 20 | 22 20 74 69 74 6c 65 20 | insert |" title |
|00005170| 22 20 70 72 69 6e 31 2d | 74 6f 2d 73 74 72 69 6e |" prin1-|to-strin|
|00005180| 67 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 76 69 65 |g calc-g|raph-vie|
|00005190| 77 2d 63 6f 6d 6d 61 6e | 64 73 5d 20 31 32 29 29 |w-comman|ds] 12))|
|000051a0| 0a 0a 28 64 65 66 75 6e | 20 63 61 6c 63 2d 67 72 |..(defun| calc-gr|
|000051b0| 61 70 68 2d 68 69 64 65 | 20 28 66 6c 61 67 29 20 |aph-hide| (flag) |
|000051c0| 28 69 6e 74 65 72 61 63 | 74 69 76 65 20 22 50 22 |(interac|tive "P"|
|000051d0| 29 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 88 |) (byte-|code "..|
|000051e0| c2 20 88 c3 c0 c0 5c 22 | 85 42 00 c4 c5 21 86 15 |. ....\"|.B...!..|
|000051f0| 00 c6 c7 21 88 c8 c9 21 | 88 c4 ca 21 83 33 00 09 |...!...!|...!.3..|
|00005200| 3f 86 2a 00 cb 09 21 cc | 58 85 30 00 cd c9 21 82 |?.*...!.|X.0...!.|
|00005210| 42 00 09 3f 86 3d 00 cb | 09 21 cc 56 85 42 00 ca |B..?.=..|.!.V.B..|
|00005220| 63 87 22 20 5b 6e 69 6c | 20 66 6c 61 67 20 63 61 |c." [nil| flag ca|
|00005230| 6c 63 2d 67 72 61 70 68 | 2d 69 6e 69 74 20 63 61 |lc-graph|-init ca|
|00005240| 6c 63 2d 67 72 61 70 68 | 2d 66 69 6e 64 2d 70 6c |lc-graph|-find-pl|
|00005250| 6f 74 20 6c 6f 6f 6b 69 | 6e 67 2d 61 74 20 22 7b |ot looki|ng-at "{|
|00005260| 22 20 65 72 72 6f 72 20 | 22 43 61 6e 27 74 20 68 |" error |"Can't h|
|00005270| 69 64 65 20 74 68 69 73 | 20 63 75 72 76 65 20 28 |ide this| curve (|
|00005280| 77 72 6f 6e 67 20 66 6f | 72 6d 61 74 29 22 20 66 |wrong fo|rmat)" f|
|00005290| 6f 72 77 61 72 64 2d 63 | 68 61 72 20 31 20 22 2a |orward-c|har 1 "*|
|000052a0| 22 20 70 72 65 66 69 78 | 2d 6e 75 6d 65 72 69 63 |" prefix|-numeric|
|000052b0| 2d 76 61 6c 75 65 20 30 | 20 64 65 6c 65 74 65 2d |-value 0| delete-|
|000052c0| 63 68 61 72 5d 20 31 31 | 29 29 0a 0a 28 64 65 66 |char] 11|))..(def|
|000052d0| 75 6e 20 63 61 6c 63 2d | 67 72 61 70 68 2d 68 65 |un calc-|graph-he|
|000052e0| 61 64 65 72 20 28 74 69 | 74 6c 65 29 20 28 69 6e |ader (ti|tle) (in|
|000052f0| 74 65 72 61 63 74 69 76 | 65 20 22 73 54 69 74 6c |teractiv|e "sTitl|
|00005300| 65 20 66 6f 72 20 65 6e | 74 69 72 65 20 67 72 61 |e for en|tire gra|
|00005310| 70 68 3a 20 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |ph: ") (|byte-cod|
|00005320| 65 20 22 c1 88 c2 c3 c4 | 08 c5 5c 22 3f 85 0f 00 |e ".....|..\"?...|
|00005330| c6 08 21 5c 22 87 22 20 | 5b 74 69 74 6c 65 20 6e |..!\"." |[title n|
|00005340| 69 6c 20 63 61 6c 63 2d | 67 72 61 70 68 2d 73 65 |il calc-|graph-se|
|00005350| 74 2d 63 6f 6d 6d 61 6e | 64 20 22 74 69 74 6c 65 |t-comman|d "title|
|00005360| 22 20 65 71 75 61 6c 20 | 22 22 20 70 72 69 6e 31 |" equal |"" prin1|
|00005370| 2d 74 6f 2d 73 74 72 69 | 6e 67 5d 20 35 29 29 0a |-to-stri|ng] 5)).|
|00005380| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 67 72 61 |.(defun |calc-gra|
|00005390| 70 68 2d 62 6f 72 64 65 | 72 20 28 66 6c 61 67 29 |ph-borde|r (flag)|
|000053a0| 20 28 69 6e 74 65 72 61 | 63 74 69 76 65 20 22 50 | (intera|ctive "P|
|000053b0| 22 29 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c1 |") (byte|-code ".|
|000053c0| 88 c2 c3 08 83 10 00 c4 | 08 21 c5 58 82 14 00 c6 |........|.!.X....|
|000053d0| c3 21 3f 85 18 00 c7 5c | 22 87 22 20 5b 66 6c 61 |.!?....\|"." [fla|
|000053e0| 67 20 6e 69 6c 20 63 61 | 6c 63 2d 67 72 61 70 68 |g nil ca|lc-graph|
|000053f0| 2d 73 65 74 2d 63 6f 6d | 6d 61 6e 64 20 22 6e 6f |-set-com|mand "no|
|00005400| 62 6f 72 64 65 72 22 20 | 70 72 65 66 69 78 2d 6e |border" |prefix-n|
|00005410| 75 6d 65 72 69 63 2d 76 | 61 6c 75 65 20 30 20 63 |umeric-v|alue 0 c|
|00005420| 61 6c 63 2d 67 72 61 70 | 68 2d 66 69 6e 64 2d 63 |alc-grap|h-find-c|
|00005430| 6f 6d 6d 61 6e 64 20 22 | 20 22 5d 20 35 29 29 0a |ommand "| "] 5)).|
|00005440| 0a 28 64 65 66 75 6e 20 | 63 61 6c 63 2d 67 72 61 |.(defun |calc-gra|
|00005450| 70 68 2d 67 72 69 64 20 | 28 66 6c 61 67 29 20 28 |ph-grid |(flag) (|
|00005460| 69 6e 74 65 72 61 63 74 | 69 76 65 20 22 50 22 29 |interact|ive "P")|
|00005470| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c1 88 c2 | (byte-c|ode "...|
|00005480| c3 08 83 10 00 c4 08 21 | c5 56 82 14 00 c6 c3 21 |.......!|.V.....!|
|00005490| 3f 85 18 00 c7 5c 22 87 | 22 20 5b 66 6c 61 67 20 |?....\".|" [flag |
|000054a0| 6e 69 6c 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 73 |nil calc|-graph-s|
|000054b0| 65 74 2d 63 6f 6d 6d 61 | 6e 64 20 22 67 72 69 64 |et-comma|nd "grid|
|000054c0| 22 20 70 72 65 66 69 78 | 2d 6e 75 6d 65 72 69 63 |" prefix|-numeric|
|000054d0| 2d 76 61 6c 75 65 20 30 | 20 63 61 6c 63 2d 67 72 |-value 0| calc-gr|
|000054e0| 61 70 68 2d 66 69 6e 64 | 2d 63 6f 6d 6d 61 6e 64 |aph-find|-command|
|000054f0| 20 22 20 22 5d 20 35 29 | 29 0a 0a 28 64 65 66 75 | " "] 5)|)..(defu|
|00005500| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 6b 65 79 |n calc-g|raph-key|
|00005510| 20 28 66 6c 61 67 29 20 | 28 69 6e 74 65 72 61 63 | (flag) |(interac|
|00005520| 74 69 76 65 20 22 50 22 | 29 20 28 62 79 74 65 2d |tive "P"|) (byte-|
|00005530| 63 6f 64 65 20 22 c1 88 | c2 c3 08 83 10 00 c4 08 |code "..|........|
|00005540| 21 c5 56 82 14 00 c6 c3 | 21 3f 85 18 00 c7 5c 22 |!.V.....|!?....\"|
|00005550| 87 22 20 5b 66 6c 61 67 | 20 6e 69 6c 20 63 61 6c |." [flag| nil cal|
|00005560| 63 2d 67 72 61 70 68 2d | 73 65 74 2d 63 6f 6d 6d |c-graph-|set-comm|
|00005570| 61 6e 64 20 22 6b 65 79 | 22 20 70 72 65 66 69 78 |and "key|" prefix|
|00005580| 2d 6e 75 6d 65 72 69 63 | 2d 76 61 6c 75 65 20 30 |-numeric|-value 0|
|00005590| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 66 69 6e 64 | calc-gr|aph-find|
|000055a0| 2d 63 6f 6d 6d 61 6e 64 | 20 22 20 22 5d 20 35 29 |-command| " "] 5)|
|000055b0| 29 0a 0a 28 64 65 66 75 | 6e 20 63 61 6c 63 2d 67 |)..(defu|n calc-g|
|000055c0| 72 61 70 68 2d 6e 75 6d | 2d 70 6f 69 6e 74 73 20 |raph-num|-points |
|000055d0| 28 72 65 73 20 66 6c 61 | 67 29 20 28 69 6e 74 65 |(res fla|g) (inte|
|000055e0| 72 61 63 74 69 76 65 20 | 22 73 4e 75 6d 62 65 72 |ractive |"sNumber|
|000055f0| 20 6f 66 20 64 61 74 61 | 20 70 6f 69 6e 74 73 3a | of data| points:|
|00005600| 20 0a 50 22 29 20 28 62 | 79 74 65 2d 63 6f 64 65 | .P") (b|yte-code|
|00005610| 20 22 c4 88 08 83 3a 00 | c5 08 21 c6 56 83 24 00 | "....:.|..!.V.$.|
|00005620| c7 09 c8 5c 22 83 1c 00 | c9 ca 0a 5c 22 82 21 00 |...\"...|...\".!.|
|00005630| cb 09 21 89 12 82 37 00 | c7 09 c8 5c 22 83 32 00 |..!...7.|...\".2.|
|00005640| c9 cc 0b 5c 22 82 37 00 | cb 09 21 89 13 82 46 00 |...\".7.|..!...F.|
|00005650| cd ce c7 09 c8 5c 22 3f | 85 45 00 09 5c 22 87 22 |.....\"?|.E..\"."|
|00005660| 20 5b 66 6c 61 67 20 72 | 65 73 20 63 61 6c 63 2d | [flag r|es calc-|
|00005670| 67 72 61 70 68 2d 64 65 | 66 61 75 6c 74 2d 72 65 |graph-de|fault-re|
|00005680| 73 6f 6c 75 74 69 6f 6e | 20 63 61 6c 63 2d 67 72 |solution| calc-gr|
|00005690| 61 70 68 2d 64 65 66 61 | 75 6c 74 2d 72 65 73 6f |aph-defa|ult-reso|
|000056a0| 6c 75 74 69 6f 6e 2d 33 | 64 20 6e 69 6c 20 70 72 |lution-3|d nil pr|
|000056b0| 65 66 69 78 2d 6e 75 6d | 65 72 69 63 2d 76 61 6c |efix-num|eric-val|
|000056c0| 75 65 20 30 20 65 71 75 | 61 6c 20 22 22 20 6d 65 |ue 0 equ|al "" me|
|000056d0| 73 73 61 67 65 20 22 44 | 65 66 61 75 6c 74 20 72 |ssage "D|efault r|
|000056e0| 65 73 6f 6c 75 74 69 6f | 6e 20 69 73 20 25 64 2e |esolutio|n is %d.|
|000056f0| 22 20 73 74 72 69 6e 67 | 2d 74 6f 2d 69 6e 74 20 |" string|-to-int |
|00005700| 22 44 65 66 61 75 6c 74 | 20 33 44 20 72 65 73 6f |"Default| 3D reso|
|00005710| 6c 75 74 69 6f 6e 20 69 | 73 20 25 64 2e 22 20 63 |lution i|s %d." c|
|00005720| 61 6c 63 2d 67 72 61 70 | 68 2d 73 65 74 2d 63 6f |alc-grap|h-set-co|
|00005730| 6d 6d 61 6e 64 20 22 73 | 61 6d 70 6c 65 73 22 5d |mmand "s|amples"]|
|00005740| 20 31 32 29 29 0a 0a 28 | 64 65 66 75 6e 20 63 61 | 12))..(|defun ca|
|00005750| 6c 63 2d 67 72 61 70 68 | 2d 64 65 76 69 63 65 20 |lc-graph|-device |
|00005760| 28 6e 61 6d 65 20 66 6c | 61 67 29 20 28 69 6e 74 |(name fl|ag) (int|
|00005770| 65 72 61 63 74 69 76 65 | 20 22 73 44 65 76 69 63 |eractive| "sDevic|
|00005780| 65 20 6e 61 6d 65 3a 20 | 0a 50 22 29 20 28 62 79 |e name: |.P") (by|
|00005790| 74 65 2d 63 6f 64 65 20 | 22 c4 88 c5 08 c6 5c 22 |te-code |".....\"|
|000057a0| 83 12 00 c7 c8 21 88 c9 | 20 82 52 00 09 83 46 00 |.....!..| .R...F.|
|000057b0| ca 09 21 cb 56 83 32 00 | c5 08 cc 5c 22 83 2c 00 |..!.V.2.|...\".,.|
|000057c0| cd ce 0a 5c 22 82 2f 00 | 08 89 12 82 43 00 c5 08 |...\"./.|....C...|
|000057d0| cc 5c 22 83 40 00 cd cf | 0b 5c 22 82 43 00 08 89 |.\".@...|.\".C...|
|000057e0| 13 82 52 00 d0 d1 c5 08 | cc 5c 22 3f 85 51 00 08 |..R.....|.\"?.Q..|
|000057f0| 5c 22 87 22 20 5b 6e 61 | 6d 65 20 66 6c 61 67 20 |\"." [na|me flag |
|00005800| 63 61 6c 63 2d 67 6e 75 | 70 6c 6f 74 2d 64 65 66 |calc-gnu|plot-def|
|00005810| 61 75 6c 74 2d 64 65 76 | 69 63 65 20 63 61 6c 63 |ault-dev|ice calc|
|00005820| 2d 67 6e 75 70 6c 6f 74 | 2d 70 72 69 6e 74 2d 64 |-gnuplot|-print-d|
|00005830| 65 76 69 63 65 20 6e 69 | 6c 20 65 71 75 61 6c 20 |evice ni|l equal |
|00005840| 22 3f 22 20 63 61 6c 63 | 2d 67 6e 75 70 6c 6f 74 |"?" calc|-gnuplot|
|00005850| 2d 63 6f 6d 6d 61 6e 64 | 20 22 73 65 74 20 74 65 |-command| "set te|
|00005860| 72 6d 69 6e 61 6c 22 20 | 63 61 6c 63 2d 67 72 61 |rminal" |calc-gra|
|00005870| 70 68 2d 76 69 65 77 2d | 74 72 61 69 6c 20 70 72 |ph-view-|trail pr|
|00005880| 65 66 69 78 2d 6e 75 6d | 65 72 69 63 2d 76 61 6c |efix-num|eric-val|
|00005890| 75 65 20 30 20 22 22 20 | 6d 65 73 73 61 67 65 20 |ue 0 "" |message |
|000058a0| 22 44 65 66 61 75 6c 74 | 20 47 4e 55 50 4c 4f 54 |"Default| GNUPLOT|
|000058b0| 20 64 65 76 69 63 65 20 | 69 73 20 5c 22 25 73 5c | device |is \"%s\|
|000058c0| 22 2e 22 20 22 47 4e 55 | 50 4c 4f 54 20 64 65 76 |"." "GNU|PLOT dev|
|000058d0| 69 63 65 20 66 6f 72 20 | 50 72 69 6e 74 20 63 6f |ice for |Print co|
|000058e0| 6d 6d 61 6e 64 20 69 73 | 20 5c 22 25 73 5c 22 2e |mmand is| \"%s\".|
|000058f0| 22 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 73 65 74 |" calc-g|raph-set|
|00005900| 2d 63 6f 6d 6d 61 6e 64 | 20 22 74 65 72 6d 69 6e |-command| "termin|
|00005910| 61 6c 22 5d 20 31 33 29 | 29 0a 0a 28 64 65 66 75 |al"] 13)|)..(defu|
|00005920| 6e 20 63 61 6c 63 2d 67 | 72 61 70 68 2d 6f 75 74 |n calc-g|raph-out|
|00005930| 70 75 74 20 28 6e 61 6d | 65 20 66 6c 61 67 29 20 |put (nam|e flag) |
|00005940| 28 69 6e 74 65 72 61 63 | 74 69 76 65 20 22 46 4f |(interac|tive "FO|
|00005950| 75 74 70 75 74 20 66 69 | 6c 65 20 6e 61 6d 65 3a |utput fi|le name:|
|00005960| 20 0a 70 22 29 20 28 62 | 79 74 65 2d 63 6f 64 65 | .p") (b|yte-code|
|00005970| 20 22 c5 88 c6 c7 08 5c | 22 83 0f 00 c8 89 10 82 | ".....\|".......|
|00005980| 3d 00 c6 c9 08 5c 22 83 | 1c 00 ca 89 10 82 3d 00 |=....\".|......=.|
|00005990| c6 cb 08 5c 22 83 29 00 | cc 89 10 82 3d 00 cd ce |...\".).|....=...|
|000059a0| 08 21 cf 5c 22 83 38 00 | cf 89 10 82 3d 00 d0 08 |.!.\".8.|....=...|
|000059b0| 21 89 10 88 0a 83 72 00 | d1 0a 21 d2 56 83 5e 00 |!.....r.|..!.V.^.|
|000059c0| cd 08 cf 5c 22 83 58 00 | d3 d4 0b 5c 22 82 5b 00 |...\".X.|...\".[.|
|000059d0| 08 89 13 82 6f 00 cd 08 | cf 5c 22 83 6c 00 d3 d5 |....o...|.\".l...|
|000059e0| 0c 5c 22 82 6f 00 08 89 | 14 82 80 00 d6 d7 cd 08 |.\".o...|........|
|000059f0| cf 5c 22 3f 85 7f 00 d8 | 08 21 5c 22 87 22 20 5b |.\"?....|.!\"." [|
|00005a00| 6e 61 6d 65 20 74 20 66 | 6c 61 67 20 63 61 6c 63 |name t f|lag calc|
|00005a10| 2d 67 6e 75 70 6c 6f 74 | 2d 64 65 66 61 75 6c 74 |-gnuplot|-default|
|00005a20| 2d 6f 75 74 70 75 74 20 | 63 61 6c 63 2d 67 6e 75 |-output |calc-gnu|
|00005a30| 70 6c 6f 74 2d 70 72 69 | 6e 74 2d 6f 75 74 70 75 |plot-pri|nt-outpu|
|00005a40| 74 20 6e 69 6c 20 73 74 | 72 69 6e 67 2d 6d 61 74 |t nil st|ring-mat|
|00005a50| 63 68 20 22 5c 5c 3c 5b | 61 41 5d 5b 75 55 5d 5b |ch "\\<[|aA][uU][|
|00005a60| 74 54 5d 5b 6f 4f 5d 24 | 22 20 22 61 75 74 6f 22 |tT][oO]$|" "auto"|
|00005a70| 20 22 5c 5c 3c 5b 74 54 | 5d 5b 74 54 5d 5b 79 59 | "\\<[tT|][tT][yY|
|00005a80| 5d 24 22 20 22 74 74 79 | 22 20 22 5c 5c 3c 5b 73 |]$" "tty|" "\\<[s|
|00005a90| 53 5d 5b 74 54 5d 5b 64 | 44 5d 5b 6f 4f 5d 5b 75 |S][tT][d|D][oO][u|
|00005aa0| 55 5d 5b 74 54 5d 24 22 | 20 22 53 54 44 4f 55 54 |U][tT]$"| "STDOUT|
|00005ab0| 22 20 65 71 75 61 6c 20 | 66 69 6c 65 2d 6e 61 6d |" equal |file-nam|
|00005ac0| 65 2d 6e 6f 6e 64 69 72 | 65 63 74 6f 72 79 20 22 |e-nondir|ectory "|
|00005ad0| 22 20 65 78 70 61 6e 64 | 2d 66 69 6c 65 2d 6e 61 |" expand|-file-na|
|00005ae0| 6d 65 20 70 72 65 66 69 | 78 2d 6e 75 6d 65 72 69 |me prefi|x-numeri|
|00005af0| 63 2d 76 61 6c 75 65 20 | 30 20 6d 65 73 73 61 67 |c-value |0 messag|
|00005b00| 65 20 22 44 65 66 61 75 | 6c 74 20 47 4e 55 50 4c |e "Defau|lt GNUPL|
|00005b10| 4f 54 20 6f 75 74 70 75 | 74 20 66 69 6c 65 20 69 |OT outpu|t file i|
|00005b20| 73 20 5c 22 25 73 5c 22 | 2e 22 20 22 47 4e 55 50 |s \"%s\"|." "GNUP|
|00005b30| 4c 4f 54 20 6f 75 74 70 | 75 74 20 66 69 6c 65 20 |LOT outp|ut file |
|00005b40| 66 6f 72 20 50 72 69 6e | 74 20 63 6f 6d 6d 61 6e |for Prin|t comman|
|00005b50| 64 20 69 73 20 5c 22 25 | 73 5c 22 2e 22 20 63 61 |d is \"%|s\"." ca|
|00005b60| 6c 63 2d 67 72 61 70 68 | 2d 73 65 74 2d 63 6f 6d |lc-graph|-set-com|
|00005b70| 6d 61 6e 64 20 22 6f 75 | 74 70 75 74 22 20 70 72 |mand "ou|tput" pr|
|00005b80| 69 6e 31 2d 74 6f 2d 73 | 74 72 69 6e 67 5d 20 31 |in1-to-s|tring] 1|
|00005b90| 36 29 29 0a 0a 28 64 65 | 66 75 6e 20 63 61 6c 63 |6))..(de|fun calc|
|00005ba0| 2d 67 72 61 70 68 2d 64 | 69 73 70 6c 61 79 20 28 |-graph-d|isplay (|
|00005bb0| 6e 61 6d 65 29 20 28 69 | 6e 74 65 72 61 63 74 69 |name) (i|nteracti|
|00005bc0| 76 65 20 22 73 58 20 64 | 69 73 70 6c 61 79 20 6e |ve "sX d|isplay n|
|00005bd0| 61 6d 65 3a 20 22 29 20 | 28 62 79 74 65 2d 63 6f |ame: ") |(byte-co|
|00005be0| 64 65 20 22 c2 88 c3 08 | c4 5c 22 83 14 00 c5 c6 |de "....|.\".....|
|00005bf0| 09 86 10 00 c7 5c 22 82 | 20 00 08 89 11 88 c8 20 |.....\".| ...... |
|00005c00| 85 20 00 c9 ca 21 87 22 | 20 5b 6e 61 6d 65 20 63 |. ...!."| [name c|
|00005c10| 61 6c 63 2d 67 6e 75 70 | 6c 6f 74 2d 64 69 73 70 |alc-gnup|lot-disp|
|00005c20| 6c 61 79 20 6e 69 6c 20 | 65 71 75 61 6c 20 22 22 |lay nil |equal ""|
|00005c30| 20 6d 65 73 73 61 67 65 | 20 22 43 75 72 72 65 6e | message| "Curren|
|00005c40| 74 20 58 20 64 69 73 70 | 6c 61 79 20 69 73 20 5c |t X disp|lay is \|
|00005c50| 22 25 73 5c 22 2e 22 20 | 22 3c 6e 6f 6e 65 3e 22 |"%s\"." |"<none>"|
|00005c60| 20 63 61 6c 63 2d 67 6e | 75 70 6c 6f 74 2d 61 6c | calc-gn|uplot-al|
|00005c70| 69 76 65 20 63 61 6c 63 | 2d 67 6e 75 70 6c 6f 74 |ive calc|-gnuplot|
|00005c80| 2d 63 6f 6d 6d 61 6e 64 | 20 22 65 78 69 74 22 5d |-command| "exit"]|
|00005c90| 20 35 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 5))..(d|efun cal|
|00005ca0| 63 2d 67 72 61 70 68 2d | 67 65 6f 6d 65 74 72 79 |c-graph-|geometry|
|00005cb0| 20 28 6e 61 6d 65 29 20 | 28 69 6e 74 65 72 61 63 | (name) |(interac|
|00005cc0| 74 69 76 65 20 22 73 58 | 20 67 65 6f 6d 65 74 72 |tive "sX| geometr|
|00005cd0| 79 20 73 70 65 63 20 28 | 6f 72 20 5c 22 64 65 66 |y spec (|or \"def|
|00005ce0| 61 75 6c 74 5c 22 29 3a | 20 22 29 20 28 62 79 74 |ault\"):| ") (byt|
|00005cf0| 65 2d 63 6f 64 65 20 22 | c2 88 c3 08 c4 5c 22 83 |e-code "|.....\".|
|00005d00| 14 00 c5 c6 09 86 10 00 | c7 5c 22 82 28 00 c3 08 |........|.\".(...|
|00005d10| c7 5c 22 3f 85 1d 00 08 | 89 11 88 c8 20 85 28 00 |.\"?....|.... .(.|
|00005d20| c9 ca 21 87 22 20 5b 6e | 61 6d 65 20 63 61 6c 63 |..!." [n|ame calc|
|00005d30| 2d 67 6e 75 70 6c 6f 74 | 2d 67 65 6f 6d 65 74 72 |-gnuplot|-geometr|
|00005d40| 79 20 6e 69 6c 20 65 71 | 75 61 6c 20 22 22 20 6d |y nil eq|ual "" m|
|00005d50| 65 73 73 61 67 65 20 22 | 43 75 72 72 65 6e 74 20 |essage "|Current |
|00005d60| 58 20 67 65 6f 6d 65 74 | 72 79 20 69 73 20 5c 22 |X geomet|ry is \"|
|00005d70| 25 73 5c 22 2e 22 20 22 | 64 65 66 61 75 6c 74 22 |%s\"." "|default"|
|00005d80| 20 63 61 6c 63 2d 67 6e | 75 70 6c 6f 74 2d 61 6c | calc-gn|uplot-al|
|00005d90| 69 76 65 20 63 61 6c 63 | 2d 67 6e 75 70 6c 6f 74 |ive calc|-gnuplot|
|00005da0| 2d 63 6f 6d 6d 61 6e 64 | 20 22 65 78 69 74 22 5d |-command| "exit"]|
|00005db0| 20 36 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 6))..(d|efun cal|
|00005dc0| 63 2d 67 72 61 70 68 2d | 66 69 6e 64 2d 63 6f 6d |c-graph-|find-com|
|00005dd0| 6d 61 6e 64 20 28 63 6d | 64 29 20 28 62 79 74 65 |mand (cm|d) (byte|
|00005de0| 2d 63 6f 64 65 20 22 c4 | 20 88 8a 08 71 88 65 62 |-code ".| ...q.eb|
|00005df0| 88 c5 c6 09 c7 51 c2 c3 | 23 85 1d 00 c8 c9 ca 21 |.....Q..|#......!|
|00005e00| cb ca 21 5c 22 29 87 22 | 20 5b 63 61 6c 63 2d 67 |..!\")."| [calc-g|
|00005e10| 6e 75 70 6c 6f 74 2d 69 | 6e 70 75 74 20 63 6d 64 |nuplot-i|nput cmd|
|00005e20| 20 6e 69 6c 20 74 20 63 | 61 6c 63 2d 67 72 61 70 | nil t c|alc-grap|
|00005e30| 68 2d 69 6e 69 74 20 72 | 65 2d 73 65 61 72 63 68 |h-init r|e-search|
|00005e40| 2d 66 6f 72 77 61 72 64 | 20 22 5e 73 65 74 5b 20 |-forward| "^set[ |
|00005e50| 09 5d 2b 22 20 22 5b 20 | 09 5d 2a 5c 5c 28 2e 2a |.]+" "[ |.]*\\(.*|
|00005e60| 5c 5c 29 24 22 20 62 75 | 66 66 65 72 2d 73 75 62 |\\)$" bu|ffer-sub|
|00005e70| 73 74 72 69 6e 67 20 6d | 61 74 63 68 2d 62 65 67 |string m|atch-beg|
|00005e80| 69 6e 6e 69 6e 67 20 31 | 20 6d 61 74 63 68 2d 65 |inning 1| match-e|
|00005e90| 6e 64 5d 20 37 29 29 0a | 0a 28 64 65 66 75 6e 20 |nd] 7)).|.(defun |
|00005ea0| 63 61 6c 63 2d 67 72 61 | 70 68 2d 73 65 74 2d 63 |calc-gra|ph-set-c|
|00005eb0| 6f 6d 6d 61 6e 64 20 28 | 63 6d 64 20 26 72 65 73 |ommand (|cmd &res|
|00005ec0| 74 20 61 72 67 73 29 20 | 28 62 79 74 65 2d 63 6f |t args) |(byte-co|
|00005ed0| 64 65 20 22 c6 20 88 8a | 08 71 88 65 62 88 c7 c8 |de ". ..|.q.eb...|
|00005ee0| 09 c9 51 c2 c3 23 83 2a | 00 ca cb 21 88 cc 20 88 |..Q..#.*|...!.. .|
|00005ef0| 60 1c cd 20 88 ce 60 0c | 54 5c 22 29 82 40 00 cf |`.. ..`.|T\").@..|
|00005f00| c3 c3 5c 22 83 3d 00 68 | d0 3d 85 3a 00 ca cb 21 |..\".=.h|.=.:...!|
|00005f10| 82 40 00 64 53 62 88 0d | 85 47 00 0d 40 85 5c 5c |.@.dSb..|.G..@.\\|
|00005f20| 00 6e 86 50 00 d1 63 88 | d2 d3 d4 d5 09 0d 42 d6 |.n.P..c.|......B.|
|00005f30| 23 d1 23 29 88 d7 20 87 | 22 20 5b 63 61 6c 63 2d |#.#).. .|" [calc-|
|00005f40| 67 6e 75 70 6c 6f 74 2d | 69 6e 70 75 74 20 63 6d |gnuplot-|input cm|
|00005f50| 64 20 6e 69 6c 20 74 20 | 65 6e 64 20 61 72 67 73 |d nil t |end args|
|00005f60| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 69 6e 69 74 | calc-gr|aph-init|
|00005f70| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|00005f80| 72 64 20 22 5e 73 65 74 | 5b 20 09 5d 2b 22 20 22 |rd "^set|[ .]+" "|
|00005f90| 5b 20 09 0a 5d 22 20 66 | 6f 72 77 61 72 64 2d 63 |[ ..]" f|orward-c|
|00005fa0| 68 61 72 20 2d 31 20 65 | 6e 64 2d 6f 66 2d 6c 69 |har -1 e|nd-of-li|
|00005fb0| 6e 65 20 62 65 67 69 6e | 6e 69 6e 67 2d 6f 66 2d |ne begin|ning-of-|
|00005fc0| 6c 69 6e 65 20 64 65 6c | 65 74 65 2d 72 65 67 69 |line del|ete-regi|
|00005fd0| 6f 6e 20 63 61 6c 63 2d | 67 72 61 70 68 2d 66 69 |on calc-|graph-fi|
|00005fe0| 6e 64 2d 70 6c 6f 74 20 | 31 30 20 22 0a 22 20 69 |nd-plot |10 "." i|
|00005ff0| 6e 73 65 72 74 20 22 73 | 65 74 20 22 20 6d 61 70 |nsert "s|et " map|
|00006000| 63 6f 6e 63 61 74 20 69 | 64 65 6e 74 69 74 79 20 |concat i|dentity |
|00006010| 22 20 22 20 63 61 6c 63 | 2d 67 72 61 70 68 2d 76 |" " calc|-graph-v|
|00006020| 69 65 77 2d 63 6f 6d 6d | 61 6e 64 73 5d 20 31 34 |iew-comm|ands] 14|
|00006030| 29 29 0a 0a 28 64 65 66 | 75 6e 20 63 61 6c 63 2d |))..(def|un calc-|
|00006040| 67 72 61 70 68 2d 63 6f | 6d 6d 61 6e 64 20 28 63 |graph-co|mmand (c|
|00006050| 6d 64 29 20 28 69 6e 74 | 65 72 61 63 74 69 76 65 |md) (int|eractive|
|00006060| 20 22 73 47 4e 55 50 4c | 4f 54 20 63 6f 6d 6d 61 | "sGNUPL|OT comma|
|00006070| 6e 64 3a 20 22 29 20 28 | 62 79 74 65 2d 63 6f 64 |nd: ") (|byte-cod|
|00006080| 65 20 22 c0 88 c1 c2 21 | 87 22 20 5b 6e 69 6c 20 |e "....!|." [nil |
|00006090| 63 61 6c 63 2d 64 6f 20 | 28 6c 61 6d 62 64 61 20 |calc-do |(lambda |
|000060a0| 6e 69 6c 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |nil (byt|e-code "|
|000060b0| c1 20 88 c2 20 88 c3 08 | 21 88 c4 20 88 c2 20 87 |. .. ...|!.. .. .|
|000060c0| 22 20 5b 63 6d 64 20 63 | 61 6c 63 2d 67 72 61 70 |" [cmd c|alc-grap|
|000060d0| 68 2d 69 6e 69 74 20 63 | 61 6c 63 2d 67 72 61 70 |h-init c|alc-grap|
|000060e0| 68 2d 76 69 65 77 2d 74 | 72 61 69 6c 20 63 61 6c |h-view-t|rail cal|
|000060f0| 63 2d 67 6e 75 70 6c 6f | 74 2d 63 6f 6d 6d 61 6e |c-gnuplo|t-comman|
|00006100| 64 20 61 63 63 65 70 74 | 2d 70 72 6f 63 65 73 73 |d accept|-process|
|00006110| 2d 6f 75 74 70 75 74 5d | 20 36 29 29 5d 20 32 29 |-output]| 6))] 2)|
|00006120| 29 0a 0a 28 64 65 66 75 | 6e 20 63 61 6c 63 2d 67 |)..(defu|n calc-g|
|00006130| 72 61 70 68 2d 6b 69 6c | 6c 20 28 26 6f 70 74 69 |raph-kil|l (&opti|
|00006140| 6f 6e 61 6c 20 6e 6f 2d | 76 69 65 77 29 20 28 69 |onal no-|view) (i|
|00006150| 6e 74 65 72 61 63 74 69 | 76 65 29 20 28 62 79 74 |nteracti|ve) (byt|
|00006160| 65 2d 63 6f 64 65 20 22 | c0 88 c1 20 88 c2 20 85 |e-code "|... .. .|
|00006170| 0d 00 c3 c4 21 87 22 20 | 5b 6e 69 6c 20 63 61 6c |....!." |[nil cal|
|00006180| 63 2d 67 72 61 70 68 2d | 64 65 6c 65 74 65 2d 74 |c-graph-|delete-t|
|00006190| 65 6d 70 73 20 63 61 6c | 63 2d 67 6e 75 70 6c 6f |emps cal|c-gnuplo|
|000061a0| 74 2d 61 6c 69 76 65 20 | 63 61 6c 63 2d 64 6f 20 |t-alive |calc-do |
|000061b0| 28 6c 61 6d 62 64 61 20 | 6e 69 6c 20 28 62 79 74 |(lambda |nil (byt|
|000061c0| 65 2d 63 6f 64 65 20 22 | 08 86 06 00 c5 20 88 c2 |e-code "|..... ..|
|000061d0| 19 c6 c7 21 29 88 c8 c9 | 21 88 ca 0b 21 85 1b 00 |...!)...|!...!...|
|000061e0| cb 0b 21 88 c4 89 13 87 | 22 20 5b 6e 6f 2d 76 69 |..!.....|" [no-vi|
|000061f0| 65 77 20 63 61 6c 63 2d | 67 72 61 70 68 2d 6e 6f |ew calc-|graph-no|
|00006200| 2d 77 61 69 74 20 74 20 | 63 61 6c 63 2d 67 6e 75 |-wait t |calc-gnu|
|00006210| 70 6c 6f 74 2d 70 72 6f | 63 65 73 73 20 6e 69 6c |plot-pro|cess nil|
|00006220| 20 63 61 6c 63 2d 67 72 | 61 70 68 2d 76 69 65 77 | calc-gr|aph-view|
|00006230| 2d 74 72 61 69 6c 20 63 | 61 6c 63 2d 67 6e 75 70 |-trail c|alc-gnup|
|00006240| 6c 6f 74 2d 63 6f 6d 6d | 61 6e 64 20 22 65 78 69 |lot-comm|and "exi|
|00006250| 74 22 20 73 69 74 2d 66 | 6f 72 20 31 20 70 72 6f |t" sit-f|or 1 pro|
|00006260| 63 65 73 73 2d 73 74 61 | 74 75 73 20 64 65 6c 65 |cess-sta|tus dele|
|00006270| 74 65 2d 70 72 6f 63 65 | 73 73 5d 20 37 29 29 5d |te-proce|ss] 7))]|
|00006280| 20 34 29 29 0a 0a 28 64 | 65 66 75 6e 20 63 61 6c | 4))..(d|efun cal|
|00006290| 63 2d 67 72 61 70 68 2d | 71 75 69 74 20 6e 69 6c |c-graph-|quit nil|
|000062a0| 20 28 69 6e 74 65 72 61 | 63 74 69 76 65 29 20 28 | (intera|ctive) (|
|000062b0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c3 88 c4 08 21 |byte-cod|e "....!|
|000062c0| 85 0b 00 c5 c1 21 88 c4 | 0a 21 85 15 00 c6 c1 21 |.....!..|.!.....!|
|000062d0| 88 c7 c1 21 87 22 20 5b | 63 61 6c 63 2d 67 6e 75 |...!." [|calc-gnu|
|000062e0| 70 6c 6f 74 2d 69 6e 70 | 75 74 20 74 20 63 61 6c |plot-inp|ut t cal|
|000062f0| 63 2d 67 6e 75 70 6c 6f | 74 2d 62 75 66 66 65 72 |c-gnuplo|t-buffer|
|00006300| 20 6e 69 6c 20 67 65 74 | 2d 62 75 66 66 65 72 2d | nil get|-buffer-|
|00006310| 77 69 6e 64 6f 77 20 63 | 61 6c 63 2d 67 72 61 70 |window c|alc-grap|
|00006320| 68 2d 76 69 65 77 2d 63 | 6f 6d 6d 61 6e 64 73 20 |h-view-c|ommands |
|00006330| 63 61 6c 63 2d 67 72 61 | 70 68 2d 76 69 65 77 2d |calc-gra|ph-view-|
|00006340| 74 72 61 69 6c 20 63 61 | 6c 63 2d 67 72 61 70 68 |trail ca|lc-graph|
|00006350| 2d 6b 69 6c 6c 5d 20 36 | 29 29 0a 0a 28 64 65 66 |-kill] 6|))..(def|
|00006360| 75 6e 20 63 61 6c 63 2d | 67 72 61 70 68 2d 76 69 |un calc-|graph-vi|
|00006370| 65 77 2d 63 6f 6d 6d 61 | 6e 64 73 20 28 26 6f 70 |ew-comma|nds (&op|
|00006380| 74 69 6f 6e 61 6c 20 6e | 6f 2d 6e 65 65 64 29 20 |tional n|o-need) |
|00006390| 28 69 6e 74 65 72 61 63 | 74 69 76 65 20 22 70 22 |(interac|tive "p"|
|000063a0| 29 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c4 88 |) (byte-|code "..|
|000063b0| 08 86 08 00 c5 20 88 c6 | 09 0a 0b 3f 23 87 22 20 |..... ..|...?#." |
|000063c0| 5b 63 61 6c 63 2d 67 72 | 61 70 68 2d 6e 6f 2d 61 |[calc-gr|aph-no-a|
|000063d0| 75 74 6f 2d 76 69 65 77 | 20 63 61 6c 63 2d 67 6e |uto-view| calc-gn|
|000063e0| 75 70 6c 6f 74 2d 69 6e | 70 75 74 20 63 61 6c 63 |uplot-in|put calc|
|000063f0| 2d 67 6e 75 70 6c 6f 74 | 2d 62 75 66 66 65 72 20 |-gnuplot|-buffer |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
