summaryrefslogtreecommitdiff
path: root/elpa/org-9.5.2/ob-calc.elc
blob: 7c13cb693894ea2fa46dd6c8f0b673d0b003e80e (plain)
ofshex dumpascii
0000 3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61 ;ELC.....;;;.Compiled.;;;.in.Ema
0020 63 73 20 76 65 72 73 69 6f 6e 20 32 37 2e 32 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74 cs.version.27.2.;;;.with.all.opt
0040 69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65 73 20 imizations...;;;.This.file.uses.
0060 64 79 6e 61 6d 69 63 20 64 6f 63 73 74 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65 64 20 dynamic.docstrings,.first.added.
0080 69 6e 20 45 6d 61 63 73 20 31 39 2e 32 39 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 64 in.Emacs.19.29...;;;.This.file.d
00a0 6f 65 73 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49 49 20 oes.not.contain.utf-8.non-ASCII.
00c0 63 68 61 72 61 63 74 65 72 73 2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 20 62 65 20 6c 6f characters,.;;;.and.so.can.be.lo
00e0 61 64 65 64 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 20 65 61 72 6c 69 65 72 20 74 aded.in.Emacs.versions.earlier.t
0100 68 61 6e 20 32 33 2e 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b han.23...;;;;;;;;;;;;;;;;;;;;;;;
0120 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0140 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;.;;;;;;;;;;;;;;;;;;;
0160 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0180 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c ;;;;;;;;;;;;;;;;...(byte-code."\
01a0 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 30 5c 33 30 32 21 5c 32 31 30 5c 33 30 30 5c 33 30 300\301!\210\300\302!\210\300\30
01c0 33 21 5c 32 31 30 5c 33 30 30 5c 33 30 34 21 5c 32 31 30 5c 33 30 30 5c 33 30 35 21 5c 32 30 37 3!\210\300\304!\210\300\305!\207
01e0 22 20 5b 72 65 71 75 69 72 65 20 6f 62 20 6f 72 67 2d 6d 61 63 73 20 63 61 6c 63 20 63 61 6c 63 ".[require.ob.org-macs.calc.calc
0200 2d 74 72 61 69 6c 20 63 61 6c 63 2d 73 74 6f 72 65 5d 20 32 29 0a 23 40 35 35 20 44 65 66 61 75 -trail.calc-store].2).#@55.Defau
0220 6c 74 20 61 72 67 75 6d 65 6e 74 73 20 66 6f 72 20 65 76 61 6c 75 61 74 69 6e 67 20 61 20 63 61 lt.arguments.for.evaluating.a.ca
0240 6c 63 20 73 6f 75 72 63 65 20 62 6c 6f 63 6b 2e 1f 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 62 61 lc.source.block...(defvar.org-ba
0260 62 65 6c 2d 64 65 66 61 75 6c 74 2d 68 65 61 64 65 72 2d 61 72 67 73 3a 63 61 6c 63 20 6e 69 6c bel-default-header-args:calc.nil
0280 20 28 23 24 20 2e 20 35 33 39 29 29 0a 23 40 37 38 20 45 78 70 61 6e 64 20 42 4f 44 59 20 61 63 .(#$...539)).#@78.Expand.BODY.ac
02a0 63 6f 72 64 69 6e 67 20 74 6f 20 50 41 52 41 4d 53 2c 20 72 65 74 75 72 6e 20 74 68 65 20 65 78 cording.to.PARAMS,.return.the.ex
02c0 70 61 6e 64 65 64 20 62 6f 64 79 2e 0a 0a 28 66 6e 20 42 4f 44 59 20 50 41 52 41 4d 53 29 1f 0a panded.body...(fn.BODY.PARAMS)..
02e0 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 65 78 70 61 6e 64 2d 62 6f 64 79 (defalias.'org-babel-expand-body
0300 3a 63 61 6c 63 20 23 5b 35 31 34 20 22 01 5c 32 30 37 22 20 5b 5d 20 33 20 28 23 24 20 2e 20 36 :calc.#[514.".\207".[].3.(#$...6
0320 35 38 29 5d 29 0a 23 40 36 30 20 45 78 65 63 75 74 65 20 61 20 62 6c 6f 63 6b 20 6f 66 20 63 61 58)]).#@60.Execute.a.block.of.ca
0340 6c 63 20 63 6f 64 65 20 77 69 74 68 20 42 61 62 65 6c 2e 0a 0a 28 66 6e 20 42 4f 44 59 20 50 41 lc.code.with.Babel...(fn.BODY.PA
0360 52 41 4d 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 65 78 65 63 RAMS)..(defalias.'org-babel-exec
0380 75 74 65 3a 63 61 6c 63 20 23 5b 35 31 34 20 22 5c 33 30 31 5c 33 30 32 21 5c 32 30 34 1c 00 5c ute:calc.#[514."\301\302!\204..\
03a0 33 30 33 20 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 05 21 5c 33 31 31 5c 22 303.\304\305\306\307\310.!\311\"
03c0 5c 33 31 32 24 5c 32 31 36 5c 33 31 33 20 5c 32 31 30 5c 33 31 34 20 5c 32 31 30 29 5c 32 31 30 \312$\216\313.\210\314.\210)\210
03e0 5c 33 31 35 01 21 5c 33 31 36 5c 33 31 37 02 5c 22 18 5c 33 31 36 5c 33 32 30 08 5c 22 5c 33 32 \315.!\316\317.\".\316\320.\"\32
0400 31 5c 33 32 32 03 5c 22 5c 32 31 30 5c 33 32 31 5c 33 30 34 5c 33 32 33 5c 33 32 34 5c 33 30 37 1\322.\"\210\321\304\323\324\307
0420 5c 33 31 30 06 06 21 5c 33 32 35 5c 22 5c 33 32 36 5c 33 32 37 25 5c 33 31 36 5c 33 33 30 5c 33 \310..!\325\"\326\327%\316\330\3
0440 33 31 5c 33 33 32 06 09 06 09 5c 22 5c 33 33 33 5c 22 5c 22 5c 22 5c 32 31 30 29 5c 32 36 36 02 31\332....\"\333\"\"\"\210)\266.
0460 5c 32 31 32 72 5c 33 30 31 5c 33 30 32 21 71 5c 32 31 30 5c 33 33 34 5c 33 33 35 5c 33 33 36 21 \212r\301\302!q\210\334\335\336!
0480 21 5c 33 33 37 5c 33 33 36 21 5c 32 31 30 2a 5c 32 30 37 22 20 5b 6f 72 67 2d 2d 76 61 72 2d 73 !\337\336!\210*\207".[org--var-s
04a0 79 6d 73 20 67 65 74 2d 62 75 66 66 65 72 20 22 2a 43 61 6c 63 75 6c 61 74 6f 72 2a 22 20 63 75 yms.get-buffer."*Calculator*".cu
04c0 72 72 65 6e 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 20 6d 61 6b 65 2d rrent-window-configuration.make-
04e0 62 79 74 65 2d 63 6f 64 65 20 30 20 22 5c 33 30 31 5c 33 30 30 21 5c 32 30 37 22 20 76 63 6f 6e byte-code.0."\301\300!\207".vcon
0500 63 61 74 20 76 65 63 74 6f 72 20 5b 73 65 74 2d 77 69 6e 64 6f 77 2d 63 6f 6e 66 69 67 75 72 61 cat.vector.[set-window-configura
0520 74 69 6f 6e 5d 20 32 20 63 61 6c 63 20 63 61 6c 63 2d 71 75 69 74 20 6f 72 67 2d 62 61 62 65 6c tion].2.calc.calc-quit.org-babel
0540 2d 2d 67 65 74 2d 76 61 72 73 20 6d 61 70 63 61 72 20 63 61 72 20 73 79 6d 62 6f 6c 2d 6e 61 6d --get-vars.mapcar.car.symbol-nam
0560 65 20 6d 61 70 63 20 23 5b 32 35 37 20 22 5c 33 30 30 01 41 43 21 5c 32 31 30 5c 33 30 31 01 40 e.mapc.#[257."\300.AC!\210\301.@
0580 21 5c 32 30 37 22 20 5b 63 61 6c 63 2d 70 75 73 68 2d 6c 69 73 74 20 63 61 6c 63 2d 73 74 6f 72 !\207".[calc-push-list.calc-stor
05a0 65 2d 69 6e 74 6f 5d 20 33 20 22 5c 6e 5c 6e 28 66 6e 20 50 41 49 52 29 22 5d 20 32 35 37 20 22 e-into].3."\n\n(fn.PAIR)"].257."
05c0 5c 32 31 31 47 5c 33 30 32 56 5c 32 30 35 63 00 5c 32 31 31 5c 33 30 30 5c 32 33 35 5c 32 30 33 \211G\302V\205c.\211\300\235\203
05e0 13 00 5c 33 30 33 5c 33 30 34 02 21 21 5c 32 30 37 5c 33 30 35 01 5c 33 30 32 5c 33 30 36 23 5c ..\303\304.!!\207\305.\302\306#\
0600 33 30 37 5c 32 33 30 5c 32 30 33 27 00 5c 33 31 30 09 5c 33 30 35 03 5c 33 30 36 5c 22 5c 22 5c 307\230\203'.\310.\305.\306\"\"\
0620 33 31 31 21 5c 32 30 37 5c 33 31 32 5c 33 31 33 02 21 5c 32 31 31 5c 32 34 37 5c 32 30 33 34 00 311!\207\312\313.!\211\247\2034.
0640 5c 32 31 31 5c 32 30 32 5f 00 5c 33 31 34 01 21 5c 32 30 33 40 00 5c 33 31 34 01 21 5c 32 30 32 \211\202_.\314.!\203@.\314.!\202
0660 5f 00 5c 32 31 31 3c 5c 32 30 33 4f 00 5c 33 31 35 5c 33 31 36 02 41 40 05 23 5c 32 30 32 5f 00 _.\211<\203O.\315\316.A@.#\202_.
0680 5c 33 31 37 5c 33 30 37 5c 33 32 30 5c 33 31 33 5c 33 32 31 5c 33 32 32 5c 33 32 33 5c 33 32 34 \317\307\320\313\321\322\323\324
06a0 06 5c 6e 21 40 5c 22 21 21 23 5c 32 36 32 01 43 21 5c 32 30 37 22 20 5b 63 61 6c 63 2d 6d 6f 64 .\n!@\"!!#\262.C!\207".[calc-mod
06c0 65 2d 6d 61 70 20 30 20 63 61 6c 63 2d 72 65 63 61 6c 6c 20 69 6e 74 65 72 6e 20 73 75 62 73 74 e-map.0.calc-recall.intern.subst
06e0 72 69 6e 67 20 31 20 22 27 22 20 6c 6f 6f 6b 75 70 2d 6b 65 79 20 6e 69 6c 20 63 61 6c 63 2d 70 ring.1."'".lookup-key.nil.calc-p
0700 75 73 68 2d 6c 69 73 74 20 63 61 6c 63 2d 65 76 61 6c 20 6d 61 74 68 2d 72 65 61 64 2d 6e 75 6d ush-list.calc-eval.math-read-num
0720 62 65 72 20 65 72 72 6f 72 20 22 43 61 6c 63 20 65 72 72 6f 72 20 5c 22 25 73 5c 22 20 6f 6e 20 ber.error."Calc.error.\"%s\".on.
0740 69 6e 70 75 74 20 5c 22 25 73 5c 22 22 20 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d input.\"%s\"".replace-regexp-in-
0760 73 74 72 69 6e 67 20 22 22 20 6d 61 74 68 2d 65 76 61 6c 75 61 74 65 2d 65 78 70 72 20 6d 61 70 string."".math-evaluate-expr.map
0780 63 61 72 20 6f 72 67 2d 62 61 62 65 6c 2d 63 61 6c 63 2d 6d 61 79 62 65 2d 72 65 73 6f 6c 76 65 car.org-babel-calc-maybe-resolve
07a0 2d 76 61 72 20 6d 61 74 68 2d 72 65 61 64 2d 65 78 70 72 73 5d 20 31 32 20 22 5c 6e 5c 6e 28 66 -var.math-read-exprs].12."\n\n(f
07c0 6e 20 4c 49 4e 45 29 22 20 6f 72 67 2d 74 72 69 6d 20 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 6f n.LINE)".org-trim.split-string.o
07e0 72 67 2d 62 61 62 65 6c 2d 65 78 70 61 6e 64 2d 62 6f 64 79 3a 63 61 6c 63 20 22 5b 5c 6e 0d 5d rg-babel-expand-body:calc."[\n.]
0800 22 20 63 61 6c 63 2d 65 76 61 6c 20 63 61 6c 63 2d 74 6f 70 20 31 20 63 61 6c 63 2d 70 6f 70 5d ".calc-eval.calc-top.1.calc-pop]
0820 20 31 32 20 28 23 24 20 2e 20 38 31 31 29 5d 29 0a 23 40 31 31 20 0a 0a 28 66 6e 20 45 4c 29 1f .12.(#$...811)]).#@11...(fn.EL).
0840 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 63 61 6c 63 2d 6d 61 79 62 65 .(defalias.'org-babel-calc-maybe
0860 2d 72 65 73 6f 6c 76 65 2d 76 61 72 20 23 5b 32 35 37 20 22 5c 32 31 31 3a 5c 32 30 33 27 00 5c -resolve-var.#[257."\211:\203'.\
0880 32 31 31 40 5c 33 30 31 3d 5c 32 30 33 5c 22 00 5c 32 31 31 41 40 08 5c 32 33 35 5c 32 30 33 5c 211@\301=\203\".\211A@.\235\203\
08a0 22 00 5c 33 30 32 01 41 40 21 5c 32 31 30 5c 33 30 33 5c 33 30 34 21 5c 33 30 35 5c 33 30 34 21 ".\302.A@!\210\303\304!\305\304!
08c0 5c 32 31 30 5c 32 30 37 5c 33 30 36 5c 33 30 37 02 5c 22 5c 32 30 37 5c 32 30 37 22 20 5b 6f 72 \210\207\306\307.\"\207\207".[or
08e0 67 2d 2d 76 61 72 2d 73 79 6d 73 20 76 61 72 20 63 61 6c 63 2d 72 65 63 61 6c 6c 20 63 61 6c 63 g--var-syms.var.calc-recall.calc
0900 2d 74 6f 70 20 31 20 63 61 6c 63 2d 70 6f 70 20 6d 61 70 63 61 72 20 6f 72 67 2d 62 61 62 65 6c -top.1.calc-pop.mapcar.org-babel
0920 2d 63 61 6c 63 2d 6d 61 79 62 65 2d 72 65 73 6f 6c 76 65 2d 76 61 72 5d 20 34 20 28 23 24 20 2e -calc-maybe-resolve-var].4.(#$..
0940 20 32 31 30 32 29 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 6f 62 2d 63 61 6c 63 29 0a .2102)]).(provide.'ob-calc).