summaryrefslogtreecommitdiff
path: root/.localrepo/treepy-20240930.728.tar
blob: f6496330cad1cc6d8df53ccb1466eb39cbf6f045 (plain)
ofshex dumpascii
0000 74 72 65 65 70 79 2d 32 30 32 34 30 39 33 30 2e 37 32 38 2f 00 00 00 00 00 00 00 00 00 00 00 00 treepy-20240930.728/............
0020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0060 00 00 00 00 30 30 30 30 37 35 35 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000755.0000000.0000000.0000
0080 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 32 32 34 35 00 20 35 00 00 00 0000000.00000000000.012245..5...
00a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
00e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0100 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0120 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
01e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0200 74 72 65 65 70 79 2d 32 30 32 34 30 39 33 30 2e 37 32 38 2f 74 72 65 65 70 79 2d 70 6b 67 2e 65 treepy-20240930.728/treepy-pkg.e
0220 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 l...............................
0240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0260 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0280 30 30 30 30 36 37 32 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 36 36 33 00 20 30 00 00 00 0000672.00000000000.014663..0...
02a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
02e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0300 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0320 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
03e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0400 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 ;;.-*-.no-byte-compile:.t;.lexic
0420 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b al-binding:.nil.-*-.(define-pack
0440 61 67 65 20 22 74 72 65 65 70 79 22 20 22 32 30 32 34 30 39 33 30 2e 37 32 38 22 0a 20 20 22 47 age."treepy"."20240930.728"..."G
0460 65 6e 65 72 69 63 20 74 72 65 65 20 74 72 61 76 65 72 73 61 6c 20 74 6f 6f 6c 73 2e 22 0a 20 20 eneric.tree.traversal.tools."...
0480 27 28 28 65 6d 61 63 73 20 22 32 35 2e 31 22 29 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a '((emacs."25.1"))...:url."https:
04a0 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 76 6f 6c 72 61 74 68 2f 74 72 65 65 70 79 2e 65 6c 22 0a //github.com/volrath/treepy.el".
04c0 20 20 3a 63 6f 6d 6d 69 74 20 22 36 35 31 65 32 36 33 34 66 30 31 66 33 34 36 64 61 39 65 63 38 ..:commit."651e2634f01f346da9ec8
04e0 61 36 34 36 31 33 63 35 31 66 35 34 62 34 34 34 62 63 33 22 0a 20 20 3a 72 65 76 64 65 73 63 20 a64613c51f54b444bc3"...:revdesc.
0500 22 36 35 31 65 32 36 33 34 66 30 31 66 22 0a 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 6c 69 "651e2634f01f"...:keywords.'("li
0520 73 70 22 20 22 6d 61 69 6e 74 22 20 22 74 6f 6f 6c 73 22 29 0a 20 20 3a 61 75 74 68 6f 72 73 20 sp"."maint"."tools")...:authors.
0540 27 28 28 22 44 61 6e 69 65 6c 20 42 61 72 72 65 74 6f 22 20 2e 20 22 64 61 6e 69 65 6c 2e 62 61 '(("Daniel.Barreto"..."daniel.ba
0560 72 72 65 74 6f 2e 6e 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e rreto.n@gmail.com"))...:maintain
0580 65 72 73 20 27 28 28 22 44 61 6e 69 65 6c 20 42 61 72 72 65 74 6f 22 20 2e 20 22 64 61 6e 69 65 ers.'(("Daniel.Barreto"..."danie
05a0 6c 2e 62 61 72 72 65 74 6f 2e 6e 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 29 29 0a 00 00 00 00 00 00 l.barreto.n@gmail.com"))).......
05c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
05e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0600 74 72 65 65 70 79 2d 32 30 32 34 30 39 33 30 2e 37 32 38 2f 74 72 65 65 70 79 2e 65 6c 00 00 00 treepy-20240930.728/treepy.el...
0620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0660 00 00 00 00 30 30 30 30 36 34 34 00 30 30 30 30 30 30 30 00 30 30 30 30 30 30 30 00 30 30 30 30 ....0000644.0000000.0000000.0000
0680 30 30 34 32 34 36 36 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 31 33 00 20 30 00 00 00 0042466.00000000000.014113..0...
06a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
06e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0700 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .ustar...root...................
0720 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .........root...................
0740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
07e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
0800 3b 3b 3b 20 74 72 65 65 70 79 2e 65 6c 20 2d 2d 2d 20 47 65 6e 65 72 69 63 20 74 72 65 65 20 74 ;;;.treepy.el.---.Generic.tree.t
0820 72 61 76 65 72 73 61 6c 20 74 6f 6f 6c 73 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 raversal.tools..-*-.lexical-bind
0840 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 ing:.t.-*-..;;.Copyright.(C).201
0860 37 20 44 61 6e 69 65 6c 20 42 61 72 72 65 74 6f 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 44 61 6e 7.Daniel.Barreto..;;.Author:.Dan
0880 69 65 6c 20 42 61 72 72 65 74 6f 20 3c 64 61 6e 69 65 6c 2e 62 61 72 72 65 74 6f 2e 6e 40 67 6d iel.Barreto.<daniel.barreto.n@gm
08a0 61 69 6c 2e 63 6f 6d 3e 0a 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 6c 69 73 70 2c 20 6d 61 69 6e ail.com>.;;.Keywords:.lisp,.main
08c0 74 2c 20 74 6f 6f 6c 73 0a 3b 3b 20 43 72 65 61 74 65 64 3a 20 4d 6f 6e 20 4a 75 6c 20 31 30 20 t,.tools.;;.Created:.Mon.Jul.10.
08e0 31 35 3a 31 37 3a 33 36 20 32 30 31 37 20 28 2b 30 32 30 30 29 0a 3b 3b 20 50 61 63 6b 61 67 65 15:17:36.2017.(+0200).;;.Package
0900 2d 56 65 72 73 69 6f 6e 3a 20 32 30 32 34 30 39 33 30 2e 37 32 38 0a 3b 3b 20 50 61 63 6b 61 67 -Version:.20240930.728.;;.Packag
0920 65 2d 52 65 76 69 73 69 6f 6e 3a 20 36 35 31 65 32 36 33 34 66 30 31 66 0a 3b 3b 20 50 61 63 6b e-Revision:.651e2634f01f.;;.Pack
0940 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32 35 2e 31 22 29 29 0a 3b age-Requires:.((emacs."25.1")).;
0960 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 76 6f 6c 72 61 74 ;.URL:.https://github.com/volrat
0980 68 2f 74 72 65 65 70 79 2e 65 6c 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 h/treepy.el..;;.This.program.is.
09a0 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 free.software:.you.can.redistrib
09c0 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 ute.it.and/or.modify.;;.it.under
09e0 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 .the.terms.of.the.GNU.General.Pu
0a00 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 blic.License.as.published.by.;;.
0a20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 the.Free.Software.Foundation,.ei
0a40 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f ther.version.3.of.the.License,.o
0a60 72 20 28 61 74 0a 3b 3b 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 r.(at.;;.your.option).any.later.
0a80 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 version..;;.;;.This.program.is.d
0aa0 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 istributed.in.the.hope.that.it.w
0ac0 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 20 62 75 74 0a 3b 3b 20 57 49 54 48 4f 55 54 20 41 4e ill.be.useful,.but.;;.WITHOUT.AN
0ae0 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 Y.WARRANTY;.without.even.the.imp
0b00 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c lied.warranty.of.;;.MERCHANTABIL
0b20 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 ITY.or.FITNESS.FOR.A.PARTICULAR.
0b40 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 47 4e 55 0a 3b 3b 20 47 65 6e 65 72 61 6c PURPOSE...See.the.GNU.;;.General
0b60 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 .Public.License.for.more.details
0b80 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 ..;;.;;.You.should.have.received
0ba0 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 .a.copy.of.the.GNU.General.Publi
0bc0 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 47 4e 55 20 45 6d 61 63 c.License.;;.along.with.GNU.Emac
0be0 73 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e s...If.not,.see.<http://www.gnu.
0c00 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a org/licenses/>...;;;.Commentary:
0c20 0a 0a 3b 3b 20 47 65 6e 65 72 69 63 20 74 6f 6f 6c 73 20 66 6f 72 20 72 65 63 75 72 73 69 76 65 ..;;.Generic.tools.for.recursive
0c40 20 61 6e 64 20 69 74 65 72 61 74 69 76 65 20 74 72 65 65 20 74 72 61 76 65 72 73 61 6c 20 62 61 .and.iterative.tree.traversal.ba
0c60 73 65 64 20 6f 6e 0a 3b 3b 20 63 6c 6f 6a 75 72 65 2e 77 61 6c 6b 20 61 6e 64 20 63 6c 6f 6a 75 sed.on.;;.clojure.walk.and.cloju
0c80 72 65 2e 7a 69 70 20 72 65 73 70 65 63 74 69 76 65 6c 79 2e 20 20 44 65 70 65 6e 64 73 20 6f 6e re.zip.respectively...Depends.on
0ca0 20 60 6d 61 70 27 2c 20 61 20 6d 61 70 0a 3b 3b 20 6d 61 6e 69 70 75 6c 61 74 69 6f 6e 20 6c 69 .`map',.a.map.;;.manipulation.li
0cc0 62 72 61 72 79 20 62 75 69 6c 74 20 69 6e 20 45 6d 61 63 73 20 32 35 2e 31 2e 20 20 41 6c 6c 20 brary.built.in.Emacs.25.1...All.
0ce0 66 75 6e 63 74 69 6f 6e 73 20 61 72 65 20 70 72 65 66 69 78 65 64 0a 3b 3b 20 77 69 74 68 20 22 functions.are.prefixed.;;.with."
0d00 74 72 65 65 70 79 2d 22 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 treepy-"...;;;.Code:..(require.'
0d20 6d 61 70 29 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 0a 3b 3b 3b 20 57 61 6c 6b map).(require.'cl-lib)..;;;.Walk
0d40 20 28 72 65 63 75 72 73 69 76 65 20 74 72 65 65 20 74 72 61 76 65 72 73 61 6c 29 0a 0a 28 64 65 .(recursive.tree.traversal)..(de
0d60 66 75 6e 20 74 72 65 65 70 79 2d 77 61 6c 6b 20 28 69 6e 6e 65 72 20 6f 75 74 65 72 20 66 6f 72 fun.treepy-walk.(inner.outer.for
0d80 6d 29 0a 20 20 22 55 73 69 6e 67 20 49 4e 4e 45 52 20 61 6e 64 20 4f 55 54 45 52 2c 20 74 72 61 m)..."Using.INNER.and.OUTER,.tra
0da0 76 65 72 73 65 20 46 4f 52 4d 2c 20 61 6e 20 61 72 62 69 74 72 61 72 79 20 64 61 74 61 20 73 74 verse.FORM,.an.arbitrary.data.st
0dc0 72 75 63 74 75 72 65 2e 0a 49 4e 4e 45 52 20 61 6e 64 20 4f 55 54 45 52 20 61 72 65 20 66 75 6e ructure..INNER.and.OUTER.are.fun
0de0 63 74 69 6f 6e 73 2e 20 20 41 70 70 6c 79 20 49 4e 4e 45 52 20 74 6f 20 65 61 63 68 20 65 6c 65 ctions...Apply.INNER.to.each.ele
0e00 6d 65 6e 74 20 6f 66 0a 46 4f 52 4d 2c 20 62 75 69 6c 64 69 6e 67 20 75 70 20 61 20 64 61 74 61 ment.of.FORM,.building.up.a.data
0e20 20 73 74 72 75 63 74 75 72 65 20 6f 66 20 74 68 65 20 73 61 6d 65 20 74 79 70 65 2c 20 74 68 65 .structure.of.the.same.type,.the
0e40 6e 20 61 70 70 6c 79 0a 4f 55 54 45 52 20 74 6f 20 74 68 65 20 72 65 73 75 6c 74 2e 20 20 52 65 n.apply.OUTER.to.the.result...Re
0e60 63 6f 67 6e 69 7a 65 20 63 6f 6e 73 2c 20 6c 69 73 74 73 2c 20 61 6c 69 73 74 73 2c 20 76 65 63 cognize.cons,.lists,.alists,.vec
0e80 74 6f 72 73 20 61 6e 64 0a 68 61 73 68 20 74 61 62 6c 65 73 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 tors.and.hash.tables."...(cond..
0ea0 20 20 28 28 61 6e 64 20 28 6c 69 73 74 70 20 66 6f 72 6d 29 20 28 63 64 72 20 66 6f 72 6d 29 20 ..((and.(listp.form).(cdr.form).
0ec0 28 61 74 6f 6d 20 28 63 64 72 20 66 6f 72 6d 29 29 29 0a 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 (atom.(cdr.form))).....(funcall.
0ee0 6f 75 74 65 72 20 28 63 6f 6e 73 20 28 66 75 6e 63 61 6c 6c 20 69 6e 6e 65 72 20 28 63 61 72 20 outer.(cons.(funcall.inner.(car.
0f00 66 6f 72 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 form))..........................
0f20 28 66 75 6e 63 61 6c 6c 20 69 6e 6e 65 72 20 28 63 64 72 20 66 6f 72 6d 29 29 29 29 29 0a 20 20 (funcall.inner.(cdr.form)))))...
0f40 20 28 28 6c 69 73 74 70 20 66 6f 72 6d 29 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 65 72 20 28 6d .((listp.form).(funcall.outer.(m
0f60 61 70 63 61 72 20 69 6e 6e 65 72 20 66 6f 72 6d 29 29 29 0a 20 20 20 28 28 76 65 63 74 6f 72 70 apcar.inner.form)))....((vectorp
0f80 20 66 6f 72 6d 29 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 65 72 20 28 61 70 70 6c 79 20 23 27 76 .form).(funcall.outer.(apply.#'v
0fa0 65 63 74 6f 72 20 28 6d 61 70 63 61 72 20 69 6e 6e 65 72 20 66 6f 72 6d 29 29 29 29 0a 20 20 20 ector.(mapcar.inner.form))))....
0fc0 28 28 68 61 73 68 2d 74 61 62 6c 65 2d 70 20 66 6f 72 6d 29 0a 20 20 20 20 28 66 75 6e 63 61 6c ((hash-table-p.form).....(funcal
0fe0 6c 20 6f 75 74 65 72 20 28 6d 61 70 2d 61 70 70 6c 79 20 28 6c 61 6d 62 64 61 20 28 6b 20 76 29 l.outer.(map-apply.(lambda.(k.v)
1000 20 28 66 75 6e 63 61 6c 6c 20 69 6e 6e 65 72 20 28 63 6f 6e 73 20 6b 20 76 29 29 29 20 66 6f 72 .(funcall.inner.(cons.k.v))).for
1020 6d 29 29 29 0a 20 20 20 28 74 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 65 72 20 66 6f 72 6d 29 29 m)))....(t.(funcall.outer.form))
1040 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 20 28 66 20 66 6f ))..(defun.treepy-postwalk.(f.fo
1060 72 6d 29 0a 20 20 22 50 65 72 66 6f 72 6d 20 61 20 64 65 70 74 68 2d 66 69 72 73 74 2c 20 70 6f rm)..."Perform.a.depth-first,.po
1080 73 74 2d 6f 72 64 65 72 20 74 72 61 76 65 72 73 61 6c 20 6f 66 20 46 20 61 70 70 6c 69 65 64 20 st-order.traversal.of.F.applied.
10a0 74 6f 20 46 4f 52 4d 2e 0a 43 61 6c 6c 20 46 20 6f 6e 20 65 61 63 68 20 73 75 62 2d 66 6f 72 6d to.FORM..Call.F.on.each.sub-form
10c0 2c 20 75 73 65 20 46 27 73 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 6e 20 70 6c 61 63 65 20 ,.use.F's.return.value.in.place.
10e0 6f 66 20 74 68 65 0a 6f 72 69 67 69 6e 61 6c 2e 20 20 52 65 63 6f 67 6e 69 7a 65 20 63 6f 6e 73 of.the.original...Recognize.cons
1100 2c 20 6c 69 73 74 73 2c 20 61 6c 69 73 74 73 2c 20 76 65 63 74 6f 72 73 20 61 6e 64 0a 68 61 73 ,.lists,.alists,.vectors.and.has
1120 68 20 74 61 62 6c 65 73 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 77 61 6c 6b 20 28 61 70 70 6c 79 h.tables."...(treepy-walk.(apply
1140 2d 70 61 72 74 69 61 6c 6c 79 20 23 27 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 20 66 29 20 -partially.#'treepy-postwalk.f).
1160 66 20 66 6f 72 6d 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 20 f.form))..(defun.treepy-prewalk.
1180 28 66 20 66 6f 72 6d 29 0a 20 20 22 50 65 72 66 6f 72 6d 20 61 20 64 65 70 74 68 2d 66 69 72 73 (f.form)..."Perform.a.depth-firs
11a0 74 2c 20 70 72 65 2d 6f 72 64 65 72 20 74 72 61 76 65 72 73 61 6c 20 6f 66 20 46 20 61 70 70 6c t,.pre-order.traversal.of.F.appl
11c0 69 65 64 20 74 6f 20 46 4f 52 4d 2e 0a 4c 69 6b 65 20 60 74 72 65 65 70 79 2d 70 6f 73 74 77 61 ied.to.FORM..Like.`treepy-postwa
11e0 6c 6b 27 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 77 61 6c 6b 20 28 61 70 70 6c 79 2d 70 61 72 74 lk'."...(treepy-walk.(apply-part
1200 69 61 6c 6c 79 20 23 27 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 20 66 29 20 23 27 69 64 65 6e ially.#'treepy-prewalk.f).#'iden
1220 74 69 74 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 66 20 66 tity................(funcall.f.f
1240 6f 72 6d 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 2d 64 orm)))..(defun.treepy-postwalk-d
1260 65 6d 6f 20 28 66 6f 72 6d 29 0a 20 20 22 44 65 6d 6f 6e 73 74 72 61 74 65 20 74 68 65 20 62 65 emo.(form)..."Demonstrate.the.be
1280 68 61 76 69 6f 72 20 6f 66 20 60 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 27 20 66 6f 72 20 havior.of.`treepy-postwalk'.for.
12a0 46 4f 52 4d 2e 0a 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 65 61 63 68 20 66 6f 72 6d FORM..Return.a.list.of.each.form
12c0 20 61 73 20 69 74 20 69 73 20 77 61 6c 6b 65 64 2e 22 0a 20 20 28 6c 65 74 20 28 28 77 61 6c 6b .as.it.is.walked."...(let.((walk
12e0 20 6e 69 6c 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 20 28 6c 61 6d .nil)).....(treepy-postwalk.(lam
1300 62 64 61 20 28 78 29 20 28 70 75 73 68 20 78 20 77 61 6c 6b 29 20 78 29 0a 20 20 20 20 20 20 20 bda.(x).(push.x.walk).x)........
1320 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 29 0a 20 20 20 20 28 72 65 76 65 72 73 65 ..............form).....(reverse
1340 20 77 61 6c 6b 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 2d .walk)))..(defun.treepy-prewalk-
1360 64 65 6d 6f 20 28 66 6f 72 6d 29 0a 20 20 22 44 65 6d 6f 6e 73 74 72 61 74 65 20 74 68 65 20 62 demo.(form)..."Demonstrate.the.b
1380 65 68 61 76 69 6f 72 20 6f 66 20 60 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 27 20 66 6f 72 20 ehavior.of.`treepy-prewalk'.for.
13a0 46 4f 52 4d 2e 0a 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 65 61 63 68 20 66 6f 72 6d FORM..Return.a.list.of.each.form
13c0 20 61 73 20 69 74 20 69 73 20 77 61 6c 6b 65 64 2e 22 0a 20 20 28 6c 65 74 20 28 28 77 61 6c 6b .as.it.is.walked."...(let.((walk
13e0 20 6e 69 6c 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 20 28 6c 61 6d 62 .nil)).....(treepy-prewalk.(lamb
1400 64 61 20 28 78 29 20 28 70 75 73 68 20 78 20 77 61 6c 6b 29 20 78 29 0a 20 20 20 20 20 20 20 20 da.(x).(push.x.walk).x).........
1420 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 29 0a 20 20 20 20 28 72 65 76 65 72 73 65 20 77 ............form).....(reverse.w
1440 61 6c 6b 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 2d 72 alk)))..(defun.treepy-postwalk-r
1460 65 70 6c 61 63 65 20 28 73 6d 61 70 20 66 6f 72 6d 20 26 6f 70 74 69 6f 6e 61 6c 20 74 65 73 74 eplace.(smap.form.&optional.test
1480 66 6e 29 0a 20 20 22 55 73 65 20 53 4d 41 50 20 74 6f 20 74 72 61 6e 73 66 6f 72 6d 20 46 4f 52 fn)..."Use.SMAP.to.transform.FOR
14a0 4d 20 62 79 20 64 6f 69 6e 67 20 72 65 70 6c 61 63 69 6e 67 20 6f 70 65 72 61 74 69 6f 6e 73 2e M.by.doing.replacing.operations.
14c0 0a 52 65 63 75 72 73 69 76 65 6c 79 20 72 65 70 6c 61 63 65 20 69 6e 20 46 4f 52 4d 20 6b 65 79 .Recursively.replace.in.FORM.key
14e0 73 20 69 6e 20 53 4d 41 50 20 77 69 74 68 20 74 68 65 69 72 20 76 61 6c 75 65 73 2e 0a 44 6f 65 s.in.SMAP.with.their.values..Doe
1500 73 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 61 74 20 74 68 65 20 6c 65 61 76 65 73 20 6f 66 20 74 s.replacement.at.the.leaves.of.t
1520 68 65 20 74 72 65 65 20 66 69 72 73 74 2e 22 0a 20 20 3b 3b 20 41 6c 73 6f 20 73 65 65 20 63 6f he.tree.first."...;;.Also.see.co
1540 6d 6d 65 6e 74 20 69 6e 20 60 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 2d 6b 65 79 27 73 20 64 65 66 mment.in.`map-contains-key's.def
1560 69 6e 69 74 69 6f 6e 2e 0a 20 20 28 64 65 63 6c 61 72 65 20 28 61 64 76 65 72 74 69 73 65 64 2d inition....(declare.(advertised-
1580 63 61 6c 6c 69 6e 67 2d 63 6f 6e 76 65 6e 74 69 6f 6e 20 28 73 6d 61 70 20 6b 65 79 29 20 22 30 calling-convention.(smap.key)."0
15a0 2e 31 2e 33 22 29 29 0a 20 20 28 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 20 28 6c 61 6d 62 .1.3"))...(treepy-postwalk.(lamb
15c0 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 da.(x)......................(if.
15e0 28 77 69 74 68 2d 73 75 70 70 72 65 73 73 65 64 2d 77 61 72 6e 69 6e 67 73 20 28 28 63 61 6c 6c (with-suppressed-warnings.((call
1600 61 72 67 73 20 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 2d 6b 65 79 29 29 0a 20 20 20 20 20 20 20 20 args.map-contains-key)).........
1620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 ...................(map-contains
1640 2d 6b 65 79 20 73 6d 61 70 20 78 20 74 65 73 74 66 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 -key.smap.x.testfn))............
1660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 2d 65 6c 74 20 73 6d 61 70 20 78 29 0a 20 ..............(map-elt.smap.x)..
1680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 78 29 29 0a 20 20 20 20 20 20 ......................x)).......
16a0 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 .............form))..(defun.tree
16c0 70 79 2d 70 72 65 77 61 6c 6b 2d 72 65 70 6c 61 63 65 20 28 73 6d 61 70 20 66 6f 72 6d 20 26 6f py-prewalk-replace.(smap.form.&o
16e0 70 74 69 6f 6e 61 6c 20 74 65 73 74 66 6e 29 0a 20 20 22 55 73 65 20 53 4d 41 50 20 74 6f 20 74 ptional.testfn)..."Use.SMAP.to.t
1700 72 61 6e 73 66 6f 72 6d 20 46 4f 52 4d 20 62 79 20 64 6f 69 6e 67 20 72 65 70 6c 61 63 69 6e 67 ransform.FORM.by.doing.replacing
1720 20 6f 70 65 72 61 74 69 6f 6e 73 2e 0a 52 65 63 75 72 73 69 76 65 6c 79 20 72 65 70 6c 61 63 65 .operations..Recursively.replace
1740 20 69 6e 20 46 4f 52 4d 20 6b 65 79 73 20 69 6e 20 53 4d 41 50 20 77 69 74 68 20 74 68 65 69 72 .in.FORM.keys.in.SMAP.with.their
1760 20 76 61 6c 75 65 73 2e 0a 44 6f 65 73 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 61 74 20 74 68 65 .values..Does.replacement.at.the
1780 20 72 6f 6f 74 20 6f 66 20 74 68 65 20 74 72 65 65 20 66 69 72 73 74 2e 22 0a 20 20 3b 3b 20 41 .root.of.the.tree.first."...;;.A
17a0 6c 73 6f 20 73 65 65 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 60 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 lso.see.comment.in.`map-contains
17c0 2d 6b 65 79 27 73 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 20 20 28 64 65 63 6c 61 72 65 20 28 61 -key's.definition....(declare.(a
17e0 64 76 65 72 74 69 73 65 64 2d 63 61 6c 6c 69 6e 67 2d 63 6f 6e 76 65 6e 74 69 6f 6e 20 28 73 6d dvertised-calling-convention.(sm
1800 61 70 20 6b 65 79 29 20 22 30 2e 31 2e 33 22 29 29 0a 20 20 28 74 72 65 65 70 79 2d 70 72 65 77 ap.key)."0.1.3"))...(treepy-prew
1820 61 6c 6b 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 alk.(lambda.(x).................
1840 20 20 20 20 28 69 66 20 28 77 69 74 68 2d 73 75 70 70 72 65 73 73 65 64 2d 77 61 72 6e 69 6e 67 ....(if.(with-suppressed-warning
1860 73 20 28 28 63 61 6c 6c 61 72 67 73 20 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 2d 6b 65 79 29 29 0a s.((callargs.map-contains-key)).
1880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 2d 63 ..........................(map-c
18a0 6f 6e 74 61 69 6e 73 2d 6b 65 79 20 73 6d 61 70 20 78 20 74 65 73 74 66 6e 29 29 0a 20 20 20 20 ontains-key.smap.x.testfn)).....
18c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 2d 65 6c 74 20 73 6d 61 ....................(map-elt.sma
18e0 70 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 78 29 29 0a 20 p.x).......................x))..
1900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 29 29 0a 0a 0a 3b 3b 3b 20 5a 69 .................form))...;;;.Zi
1920 70 70 65 72 20 28 69 74 65 72 61 74 69 76 65 20 74 72 65 65 20 74 72 61 76 65 72 73 61 6c 29 0a pper.(iterative.tree.traversal).
1940 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 28 6c 6f 63 20 26 6f 70 .(defun.treepy--context.(loc.&op
1960 74 69 6f 6e 61 6c 20 6b 65 79 29 0a 20 20 22 52 65 74 75 72 6e 20 63 6f 6e 74 65 78 74 20 66 6f tional.key)..."Return.context.fo
1980 72 20 74 68 69 73 20 4c 4f 43 2e 0a 49 66 20 4b 45 59 20 69 73 20 67 69 76 65 6e 2c 20 6f 6e 6c r.this.LOC..If.KEY.is.given,.onl
19a0 79 20 72 65 74 75 72 6e 20 74 68 69 73 20 6b 65 79 27 73 20 76 61 6c 75 65 20 69 6e 20 63 6f 6e y.return.this.key's.value.in.con
19c0 74 65 78 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 6f 6e 74 65 78 74 20 28 63 64 72 20 28 63 61 text."...(let.((context.(cdr.(ca
19e0 72 20 6c 6f 63 29 29 29 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 63 6f 6e 74 65 78 74 20 6b r.loc)))).....(if.(and.context.k
1a00 65 79 29 0a 20 20 20 20 20 20 20 20 28 6d 61 70 2d 65 6c 74 20 63 6f 6e 74 65 78 74 20 6b 65 79 ey).........(map-elt.context.key
1a20 29 0a 20 20 20 20 20 20 63 6f 6e 74 65 78 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 ).......context)))..(defun.treep
1a40 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 2d 31 20 28 63 6f 6e 74 65 78 74 20 6b 20 76 29 y--context-assoc-1.(context.k.v)
1a60 0a 20 20 22 41 73 73 6f 63 20 69 6e 20 43 4f 4e 54 45 58 54 20 61 20 6b 65 79 20 4b 20 77 69 74 ..."Assoc.in.CONTEXT.a.key.K.wit
1a80 68 20 61 20 76 61 6c 75 65 20 56 2e 22 0a 20 20 28 69 66 20 28 6d 61 70 2d 63 6f 6e 74 61 69 6e h.a.value.V."...(if.(map-contain
1aa0 73 2d 6b 65 79 20 63 6f 6e 74 65 78 74 20 6b 29 0a 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 s-key.context.k).......(mapcar.(
1ac0 6c 61 6d 62 64 61 20 28 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 lambda.(entry).................(
1ae0 69 66 20 28 65 71 75 61 6c 20 28 63 61 72 20 65 6e 74 72 79 29 20 6b 29 0a 20 20 20 20 20 20 20 if.(equal.(car.entry).k)........
1b00 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 6b 20 76 29 0a 20 20 20 20 20 20 20 20 .............(cons.k.v).........
1b20 20 20 20 20 20 20 20 20 20 20 65 6e 74 72 79 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..........entry))...............
1b40 63 6f 6e 74 65 78 74 29 0a 20 20 20 20 28 63 6f 6e 73 20 28 63 6f 6e 73 20 6b 20 76 29 20 63 6f context).....(cons.(cons.k.v).co
1b60 6e 74 65 78 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 ntext)))..(defun.treepy--context
1b80 2d 61 73 73 6f 63 20 28 63 6f 6e 74 65 78 74 20 26 72 65 73 74 20 6b 76 73 29 0a 20 20 22 49 6d -assoc.(context.&rest.kvs)..."Im
1ba0 6d 75 74 61 62 6c 65 20 6d 61 70 20 61 73 73 6f 63 69 61 74 69 6f 6e 20 69 6e 20 43 4f 4e 54 45 mutable.map.association.in.CONTE
1bc0 58 54 20 75 73 69 6e 67 20 4b 56 53 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e XT.using.KVS."...(declare.(inden
1be0 74 20 64 65 66 75 6e 29 29 0a 20 20 28 73 65 71 2d 72 65 64 75 63 65 20 28 6c 61 6d 62 64 61 20 t.defun))...(seq-reduce.(lambda.
1c00 28 63 6f 6e 74 65 78 74 20 6b 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 (context.kv).................(se
1c20 71 2d 6c 65 74 20 5b 6b 20 76 5d 20 6b 76 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 q-let.[k.v].kv..................
1c40 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 2d 31 20 63 6f 6e 74 65 78 .(treepy--context-assoc-1.contex
1c60 74 20 6b 20 76 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 2d 70 61 72 74 t.k.v)))...............(seq-part
1c80 69 74 69 6f 6e 20 6b 76 73 20 32 29 20 63 6f 6e 74 65 78 74 29 29 0a 0a 28 64 65 66 75 6e 20 74 ition.kvs.2).context))..(defun.t
1ca0 72 65 65 70 79 2d 2d 6d 65 74 61 20 28 6c 6f 63 20 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 79 29 0a reepy--meta.(loc.&optional.key).
1cc0 20 20 22 52 65 74 75 72 6e 20 6d 65 74 61 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 .."Return.meta.information.for.t
1ce0 68 69 73 20 4c 4f 43 2e 0a 49 66 20 4b 45 59 20 69 73 20 67 69 76 65 6e 2c 20 6f 6e 6c 79 20 72 his.LOC..If.KEY.is.given,.only.r
1d00 65 74 75 72 6e 20 74 68 69 73 20 6b 65 79 27 73 20 76 61 6c 75 65 20 69 6e 20 6d 65 74 61 0a 69 eturn.this.key's.value.in.meta.i
1d20 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 65 74 61 20 28 63 64 72 20 nformation."...(let.((meta.(cdr.
1d40 6c 6f 63 29 29 29 0a 20 20 20 20 28 69 66 20 6b 65 79 0a 20 20 20 20 20 20 20 20 28 6d 61 70 2d loc))).....(if.key.........(map-
1d60 65 6c 74 20 6d 65 74 61 20 6b 65 79 29 0a 20 20 20 20 20 20 6d 65 74 61 29 29 29 0a 0a 28 64 65 elt.meta.key).......meta)))..(de
1d80 66 75 6e 20 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 20 28 6f 62 6a 20 6d 65 74 61 29 fun.treepy--with-meta.(obj.meta)
1da0 0a 20 20 22 42 69 6e 64 20 4f 42 4a 20 77 69 74 68 20 73 6f 6d 65 20 4d 45 54 41 20 69 6e 66 6f ..."Bind.OBJ.with.some.META.info
1dc0 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 28 63 6f 6e 73 20 6f 62 6a 20 6d 65 74 61 29 29 0a 0a 28 64 rmation."...(cons.obj.meta))..(d
1de0 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 6a 6f 69 6e 2d 63 68 69 6c 64 72 65 6e 20 28 6c 65 66 74 efun.treepy--join-children.(left
1e00 2d 63 68 69 6c 64 72 65 6e 20 72 69 67 68 74 2d 63 68 69 6c 64 72 65 6e 29 0a 20 20 22 52 65 74 -children.right-children)..."Ret
1e20 75 72 6e 20 61 20 6a 6f 69 6e 69 6e 67 20 6f 66 20 4c 45 46 54 2d 43 48 49 4c 44 52 45 4e 20 61 urn.a.joining.of.LEFT-CHILDREN.a
1e40 6e 64 20 52 49 47 48 54 2d 43 48 49 4c 44 52 45 4e 2e 0a 52 65 76 65 72 73 65 73 20 4c 45 46 54 nd.RIGHT-CHILDREN..Reverses.LEFT
1e60 2d 43 48 49 4c 44 52 45 4e 20 73 6f 20 74 68 61 74 20 74 68 65 79 20 61 72 65 20 63 6f 72 72 65 -CHILDREN.so.that.they.are.corre
1e80 63 74 6c 79 20 6f 72 64 65 72 65 64 20 61 73 20 69 6e 0a 74 68 65 20 74 72 65 65 2e 22 0a 20 20 ctly.ordered.as.in.the.tree."...
1ea0 28 61 70 70 65 6e 64 20 28 72 65 76 65 72 73 65 20 6c 65 66 74 2d 63 68 69 6c 64 72 65 6e 29 20 (append.(reverse.left-children).
1ec0 72 69 67 68 74 2d 63 68 69 6c 64 72 65 6e 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 74 72 65 65 right-children))..(defmacro.tree
1ee0 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 28 6c 6f 63 20 76 61 72 73 20 26 72 65 73 74 20 62 6f 64 py--with-loc.(loc.vars.&rest.bod
1f00 79 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6c 65 78 69 63 61 6c 20 63 6f 6e 74 65 78 74 20 75 y)..."Create.a.lexical.context.u
1f20 73 69 6e 67 20 4c 4f 43 20 56 41 52 53 2e 0a 45 78 65 63 75 74 65 20 42 4f 44 59 20 69 6e 20 74 sing.LOC.VARS..Execute.BODY.in.t
1f40 68 69 73 20 63 6f 6e 74 65 78 74 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 his.context."...(declare.(indent
1f60 20 64 65 66 75 6e 29 29 0a 20 20 28 6c 65 74 20 28 28 6c 65 78 2d 63 74 78 0a 20 20 20 20 20 20 .defun))...(let.((lex-ctx.......
1f80 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 76 29 0a 20 20 20 20 20 20 20 20 20 ...(mapcar.(lambda.(v)..........
1fa0 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 63 61 73 65 20 76 0a 20 20 20 20 20 20 20 20 20 20 20 ..........(cl-case.v............
1fc0 20 20 20 20 20 20 20 20 20 20 28 6e 6f 64 65 20 20 60 28 6e 6f 64 65 20 28 74 72 65 65 70 79 2d ..........(node..`(node.(treepy-
1fe0 6e 6f 64 65 20 2c 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 node.,loc)))....................
2000 20 20 28 63 6f 6e 74 65 78 74 20 60 28 63 6f 6e 74 65 78 74 20 28 74 72 65 65 70 79 2d 2d 63 6f ..(context.`(context.(treepy--co
2020 6e 74 65 78 74 20 2c 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ntext.,loc)))...................
2040 20 20 20 28 74 20 60 28 2c 76 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 0a 20 20 20 20 ...(t.`(,v.(treepy--context.....
2060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 6c 6f 63 0a 20 ..........................,loc..
2080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 2c 28 .............................',(
20a0 69 6e 74 65 72 6e 20 28 63 6f 6e 63 61 74 20 22 3a 22 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 intern.(concat.":".(symbol-name.
20c0 76 29 29 29 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 72 73 29 v))))))))..................vars)
20e0 29 29 0a 20 20 20 20 60 28 6c 65 74 2a 20 28 2c 40 6c 65 78 2d 63 74 78 29 20 2c 40 62 6f 64 79 )).....`(let*.(,@lex-ctx).,@body
2100 29 29 29 0a 0a 3b 3b 3b 3b 20 43 6f 6e 73 74 72 75 63 74 69 6f 6e 0a 0a 28 64 65 66 75 6e 20 74 )))..;;;;.Construction..(defun.t
2120 72 65 65 70 79 2d 7a 69 70 70 65 72 20 28 62 72 61 6e 63 68 70 20 63 68 69 6c 64 72 65 6e 20 6d reepy-zipper.(branchp.children.m
2140 61 6b 65 2d 6e 6f 64 65 20 72 6f 6f 74 29 0a 20 20 22 43 72 65 61 74 65 20 61 20 6e 65 77 20 7a ake-node.root)..."Create.a.new.z
2160 69 70 70 65 72 20 73 74 72 75 63 74 75 72 65 2e 0a 0a 42 52 41 4e 43 48 50 20 69 73 20 61 20 66 ipper.structure...BRANCHP.is.a.f
2180 75 6e 63 74 69 6f 6e 20 74 68 61 74 2c 20 67 69 76 65 6e 20 61 20 6e 6f 64 65 2c 20 72 65 74 75 unction.that,.given.a.node,.retu
21a0 72 6e 73 20 74 20 69 66 20 69 74 20 63 61 6e 0a 68 61 76 65 20 63 68 69 6c 64 72 65 6e 2c 20 65 rns.t.if.it.can.have.children,.e
21c0 76 65 6e 20 69 66 20 69 74 20 63 75 72 72 65 6e 74 6c 79 20 64 6f 65 73 6e 27 74 2e 0a 0a 43 48 ven.if.it.currently.doesn't...CH
21e0 49 4c 44 52 45 4e 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 2c 20 67 69 76 65 6e ILDREN.is.a.function.that,.given
2200 20 61 20 62 72 61 6e 63 68 20 6e 6f 64 65 2c 20 72 65 74 75 72 6e 73 20 61 20 73 65 71 0a 6f 66 .a.branch.node,.returns.a.seq.of
2220 20 69 74 73 20 63 68 69 6c 64 72 65 6e 2e 0a 0a 4d 41 4b 45 2d 4e 4f 44 45 20 69 73 20 61 20 66 .its.children...MAKE-NODE.is.a.f
2240 75 6e 63 74 69 6f 6e 20 74 68 61 74 2c 20 67 69 76 65 6e 20 61 6e 20 65 78 69 73 74 69 6e 67 20 unction.that,.given.an.existing.
2260 6e 6f 64 65 20 61 6e 64 20 61 20 73 65 71 20 6f 66 0a 63 68 69 6c 64 72 65 6e 2c 20 72 65 74 75 node.and.a.seq.of.children,.retu
2280 72 6e 73 20 61 20 6e 65 77 20 62 72 61 6e 63 68 20 6e 6f 64 65 20 77 69 74 68 20 74 68 65 20 73 rns.a.new.branch.node.with.the.s
22a0 75 70 70 6c 69 65 64 20 63 68 69 6c 64 72 65 6e 2e 0a 0a 52 4f 4f 54 20 69 73 20 74 68 65 20 72 upplied.children...ROOT.is.the.r
22c0 6f 6f 74 20 6e 6f 64 65 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a oot.node."...(treepy--with-meta.
22e0 20 20 20 28 63 6f 6e 73 20 72 6f 6f 74 20 6e 69 6c 29 0a 20 20 20 60 28 28 3a 62 72 61 6e 63 68 ...(cons.root.nil)....`((:branch
2300 70 20 2e 20 2c 62 72 61 6e 63 68 70 29 20 28 3a 63 68 69 6c 64 72 65 6e 20 2e 20 2c 63 68 69 6c p...,branchp).(:children...,chil
2320 64 72 65 6e 29 20 28 3a 6d 61 6b 65 2d 6e 6f 64 65 20 2e 20 2c 6d 61 6b 65 2d 6e 6f 64 65 29 29 dren).(:make-node...,make-node))
2340 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6c 69 73 74 2d 7a 69 70 20 28 72 6f 6f 74 ))..(defun.treepy-list-zip.(root
2360 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 7a 69 70 70 65 72 20 66 6f 72 20 6e 65 73 74 65 64 20 )..."Return.a.zipper.for.nested.
2380 6c 69 73 74 73 2c 20 67 69 76 65 6e 20 61 20 52 4f 4f 54 20 6c 69 73 74 2e 22 0a 20 20 28 6c 65 lists,.given.a.ROOT.list."...(le
23a0 74 20 28 28 6d 61 6b 65 2d 6e 6f 64 65 20 28 6c 61 6d 62 64 61 20 28 5f 20 63 68 69 6c 64 72 65 t.((make-node.(lambda.(_.childre
23c0 6e 29 20 63 68 69 6c 64 72 65 6e 29 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d 7a 69 70 70 65 n).children))).....(treepy-zippe
23e0 72 20 23 27 6c 69 73 74 70 20 23 27 69 64 65 6e 74 69 74 79 20 6d 61 6b 65 2d 6e 6f 64 65 20 72 r.#'listp.#'identity.make-node.r
2400 6f 6f 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 76 65 63 74 6f 72 2d 7a 69 70 oot)))..(defun.treepy-vector-zip
2420 20 28 72 6f 6f 74 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 7a 69 70 70 65 72 20 66 6f 72 20 6e .(root)..."Return.a.zipper.for.n
2440 65 73 74 65 64 20 76 65 63 74 6f 72 73 2c 20 67 69 76 65 6e 20 61 20 52 4f 4f 54 20 76 65 63 74 ested.vectors,.given.a.ROOT.vect
2460 6f 72 2e 22 0a 20 20 28 6c 65 74 20 28 28 6d 61 6b 65 2d 6e 6f 64 65 20 28 6c 61 6d 62 64 61 20 or."...(let.((make-node.(lambda.
2480 28 5f 20 63 68 69 6c 64 72 65 6e 29 20 28 61 70 70 6c 79 20 23 27 76 65 63 74 6f 72 20 63 68 69 (_.children).(apply.#'vector.chi
24a0 6c 64 72 65 6e 29 29 29 0a 20 20 20 20 20 20 20 20 28 63 68 69 6c 64 72 65 6e 20 28 6c 61 6d 62 ldren))).........(children.(lamb
24c0 64 61 20 28 63 73 29 20 28 73 65 71 2d 69 6e 74 6f 20 63 73 20 27 6c 69 73 74 29 29 29 29 0a 20 da.(cs).(seq-into.cs.'list))))..
24e0 20 20 20 28 74 72 65 65 70 79 2d 7a 69 70 70 65 72 20 23 27 76 65 63 74 6f 72 70 20 63 68 69 6c ...(treepy-zipper.#'vectorp.chil
2500 64 72 65 6e 20 6d 61 6b 65 2d 6e 6f 64 65 20 72 6f 6f 74 29 29 29 0a 0a 3b 3b 3b 3b 20 43 6f 6e dren.make-node.root)))..;;;;.Con
2520 74 65 78 74 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6e 6f 64 65 20 28 6c 6f 63 29 0a 20 text..(defun.treepy-node.(loc)..
2540 20 22 52 65 74 75 72 6e 20 74 68 65 20 6e 6f 64 65 20 61 74 20 4c 4f 43 2e 22 0a 20 20 28 63 61 ."Return.the.node.at.LOC."...(ca
2560 61 72 20 6c 6f 63 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 ar.loc))..(defun.treepy-branch-p
2580 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 20 69 66 20 74 68 65 20 6e 6f 64 65 20 61 .(loc)..."Return.t.if.the.node.a
25a0 74 20 4c 4f 43 20 69 73 20 61 20 62 72 61 6e 63 68 2e 22 0a 20 20 28 66 75 6e 63 61 6c 6c 20 28 t.LOC.is.a.branch."...(funcall.(
25c0 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 20 3a 62 72 61 6e 63 68 70 29 20 28 74 72 65 65 treepy--meta.loc.:branchp).(tree
25e0 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 63 68 py-node.loc)))..(defun.treepy-ch
2600 69 6c 64 72 65 6e 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 63 68 69 6c 64 72 65 ildren.(loc)..."Return.a.childre
2620 6e 20 6c 69 73 74 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 4c 4f 43 2c 20 77 68 69 63 68 n.list.of.the.node.at.LOC,.which
2640 20 6d 75 73 74 20 62 65 20 61 20 62 72 61 6e 63 68 2e 22 0a 20 20 28 69 66 20 28 74 72 65 65 70 .must.be.a.branch."...(if.(treep
2660 79 2d 62 72 61 6e 63 68 2d 70 20 6c 6f 63 29 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 28 y-branch-p.loc).......(funcall.(
2680 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 20 3a 63 68 69 6c 64 72 65 6e 29 20 28 74 72 65 treepy--meta.loc.:children).(tre
26a0 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6c 6c 65 epy-node.loc)).....(error."Calle
26c0 64 20 63 68 69 6c 64 72 65 6e 20 6f 6e 20 61 20 6c 65 61 66 20 6e 6f 64 65 22 29 29 29 0a 0a 28 d.children.on.a.leaf.node")))..(
26e0 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 65 20 28 6c 6f 63 20 6e 6f 64 65 defun.treepy-make-node.(loc.node
2700 20 63 68 69 6c 64 72 65 6e 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6e 65 77 20 62 72 61 6e 63 .children)..."Return.a.new.branc
2720 68 20 6e 6f 64 65 2e 0a 47 69 76 65 6e 20 61 6e 20 65 78 69 73 74 69 6e 67 20 4c 4f 43 2c 20 4e h.node..Given.an.existing.LOC,.N
2740 4f 44 45 20 61 6e 64 20 6e 65 77 20 43 48 49 4c 44 52 45 4e 2c 20 63 72 65 61 74 65 73 20 61 20 ODE.and.new.CHILDREN,.creates.a.
2760 6e 65 77 20 4c 4f 43 0a 77 69 74 68 20 74 68 65 6d 2e 20 20 54 68 65 20 4c 4f 43 20 69 73 20 6f new.LOC.with.them...The.LOC.is.o
2780 6e 6c 79 20 75 73 65 64 20 74 6f 20 73 75 70 70 6c 79 20 74 68 65 20 63 6f 6e 73 74 72 75 63 74 nly.used.to.supply.the.construct
27a0 6f 72 2e 22 0a 20 20 28 66 75 6e 63 61 6c 6c 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f or."...(funcall.(treepy--meta.lo
27c0 63 20 3a 6d 61 6b 65 2d 6e 6f 64 65 29 20 6e 6f 64 65 20 63 68 69 6c 64 72 65 6e 29 29 0a 0a 28 c.:make-node).node.children))..(
27e0 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 61 74 68 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 defun.treepy-path.(loc)..."Retur
2800 6e 20 61 20 6c 69 73 74 20 6f 66 20 6e 6f 64 65 73 20 6c 65 61 64 69 6e 67 20 74 6f 20 74 68 65 n.a.list.of.nodes.leading.to.the
2820 20 67 69 76 65 6e 20 4c 4f 43 2e 22 0a 20 20 28 72 65 76 65 72 73 65 20 28 74 72 65 65 70 79 2d .given.LOC."...(reverse.(treepy-
2840 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 20 3a 70 6e 6f 64 65 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 -context.loc.:pnodes)))..(defun.
2860 74 72 65 65 70 79 2d 6c 65 66 74 73 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c treepy-lefts.(loc)..."Return.a.l
2880 69 73 74 20 6f 66 20 74 68 65 20 6c 65 66 74 20 73 69 62 6c 69 6e 67 73 20 6f 66 20 74 68 69 73 ist.of.the.left.siblings.of.this
28a0 20 4c 4f 43 2e 22 0a 20 20 28 72 65 76 65 72 73 65 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 .LOC."...(reverse.(treepy--conte
28c0 78 74 20 6c 6f 63 20 3a 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 69 67 68 xt.loc.:l)))..(defun.treepy-righ
28e0 74 73 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 74 68 65 ts.(loc)..."Return.a.list.of.the
2900 20 72 69 67 68 74 20 73 69 62 6c 69 6e 67 73 20 6f 66 20 74 68 69 73 20 4c 4f 43 2e 22 0a 20 20 .right.siblings.of.this.LOC."...
2920 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 20 3a 72 29 29 0a 0a 3b 3b 3b 3b 20 (treepy--context.loc.:r))..;;;;.
2940 4e 61 76 69 67 61 74 69 6f 6e 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 64 6f 77 6e 20 28 Navigation..(defun.treepy-down.(
2960 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 6f 66 20 74 68 65 20 6c 65 loc)..."Return.the.loc.of.the.le
2980 66 74 6d 6f 73 74 20 63 68 69 6c 64 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 74 68 69 73 ftmost.child.of.the.node.at.this
29a0 20 4c 4f 43 2e 0a 6e 69 6c 20 69 66 20 6e 6f 20 63 68 69 6c 64 72 65 6e 2e 22 0a 20 20 28 77 68 .LOC..nil.if.no.children."...(wh
29c0 65 6e 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 6c 6f 63 29 0a 20 20 20 20 28 6c 65 en.(treepy-branch-p.loc).....(le
29e0 74 20 28 28 63 68 69 6c 64 72 65 6e 20 28 74 72 65 65 70 79 2d 63 68 69 6c 64 72 65 6e 20 6c 6f t.((children.(treepy-children.lo
2a00 63 29 29 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 c))).......(treepy--with-loc.loc
2a20 20 28 6e 6f 64 65 20 63 6f 6e 74 65 78 74 20 70 6e 6f 64 65 73 29 0a 20 20 20 20 20 20 20 20 28 .(node.context.pnodes).........(
2a40 73 65 71 2d 6c 65 74 20 5b 63 20 26 72 65 73 74 20 63 73 5d 20 63 68 69 6c 64 72 65 6e 0a 20 20 seq-let.[c.&rest.cs].children...
2a60 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 68 69 6c 64 72 65 6e 0a 20 20 20 20 20 20 20 20 20 ........(when.children..........
2a80 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 20 20 20 20 20 ...(treepy--with-meta...........
2aa0 20 20 20 60 28 2c 63 20 2e 20 28 28 3a 6c 20 2e 20 2c 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 ...`(,c...((:l...,nil)..........
2ac0 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 70 6e 6f 64 65 73 20 2e 20 2c 28 69 66 20 63 6f 6e 74 ............(:pnodes...,(if.cont
2ae0 65 78 74 20 28 63 6f 6e 73 20 6e 6f 64 65 20 70 6e 6f 64 65 73 29 20 28 6c 69 73 74 20 6e 6f 64 ext.(cons.node.pnodes).(list.nod
2b00 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 70 70 61 74 e)))......................(:ppat
2b20 68 20 2e 20 2c 63 6f 6e 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 h...,context)...................
2b40 20 20 20 28 3a 72 20 2e 20 2c 63 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 ...(:r...,cs)))..............(tr
2b60 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 eepy--meta.loc))))))))..(defun.t
2b80 72 65 65 70 79 2d 75 70 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 reepy-up.(loc)..."Return.the.loc
2ba0 20 6f 66 20 74 68 65 20 70 61 72 65 6e 74 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 74 68 .of.the.parent.of.the.node.at.th
2bc0 69 73 20 4c 4f 43 2e 0a 6e 69 6c 20 69 66 20 61 74 20 74 68 65 20 74 6f 70 2e 22 0a 20 20 28 74 is.LOC..nil.if.at.the.top."...(t
2be0 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e 6f 64 65 20 70 6e 6f 64 65 73 reepy--with-loc.loc.(node.pnodes
2c00 20 70 70 61 74 68 20 63 68 61 6e 67 65 64 3f 20 6c 20 72 29 0a 20 20 20 20 28 77 68 65 6e 20 70 .ppath.changed?.l.r).....(when.p
2c20 6e 6f 64 65 73 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 6e 6f 64 65 20 28 63 61 72 20 70 6e nodes.......(let.((pnode.(car.pn
2c40 6f 64 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 odes))).........(treepy--with-me
2c60 74 61 0a 20 20 20 20 20 20 20 20 20 28 69 66 20 63 68 61 6e 67 65 64 3f 0a 20 20 20 20 20 20 20 ta..........(if.changed?........
2c80 20 20 20 20 20 20 28 63 6f 6e 73 20 28 74 72 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 65 20 6c 6f ......(cons.(treepy-make-node.lo
2ca0 63 20 70 6e 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c.pnode.........................
2cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6a 6f 69 6e 2d 63 68 69 6c 64 .............(treepy--join-child
2ce0 72 65 6e 20 6c 20 28 63 6f 6e 73 20 6e 6f 64 65 20 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 ren.l.(cons.node.r)))...........
2d00 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 70 70 61 74 68 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e .........(and.ppath.(treepy--con
2d20 74 65 78 74 2d 61 73 73 6f 63 20 70 70 61 74 68 20 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 29 0a text-assoc.ppath.:changed?.t))).
2d40 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 70 6e 6f 64 65 20 70 70 61 74 68 29 29 0a 20 ...........(cons.pnode.ppath))..
2d60 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 29 0a ........(treepy--meta.loc)))))).
2d80 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 6f 6f 74 20 28 6c 6f 63 29 0a 20 20 22 5a 69 70 .(defun.treepy-root.(loc)..."Zip
2da0 20 66 72 6f 6d 20 4c 4f 43 20 61 6c 6c 20 74 68 65 20 77 61 79 20 75 70 20 61 6e 64 20 72 65 74 .from.LOC.all.the.way.up.and.ret
2dc0 75 72 6e 20 74 68 65 20 72 6f 6f 74 20 6e 6f 64 65 2e 0a 52 65 66 6c 65 63 74 20 61 6e 79 20 61 urn.the.root.node..Reflect.any.a
2de0 6c 74 65 72 61 74 69 6f 6e 73 20 74 6f 20 74 68 65 20 74 72 65 65 2e 22 0a 20 20 28 69 66 20 28 lterations.to.the.tree."...(if.(
2e00 65 71 75 61 6c 20 3a 65 6e 64 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 29 equal.:end.(treepy--context.loc)
2e20 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 0a 20 20 20 20 28 6c ).......(treepy-node.loc).....(l
2e40 65 74 20 28 28 70 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 et.((p.loc)).......(while.(setq.
2e60 70 20 28 74 72 65 65 70 79 2d 75 70 20 70 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c p.(treepy-up.p)).........(setq.l
2e80 6f 63 20 70 29 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 29 29 oc.p)).......(treepy-node.loc)))
2ea0 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 69 67 68 74 20 28 6c 6f 63 29 0a 20 20 22 )..(defun.treepy-right.(loc)..."
2ec0 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 6f 66 20 74 68 65 20 72 69 67 68 74 20 73 69 62 6c Return.the.loc.of.the.right.sibl
2ee0 69 6e 67 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 2e 0a 6e 69 6c ing.of.the.node.at.this.LOC..nil
2f00 20 69 66 20 74 68 65 72 65 27 73 20 6e 6f 20 6d 6f 72 65 20 72 69 67 68 74 20 73 69 62 6c 69 6e .if.there's.no.more.right.siblin
2f20 67 73 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e 6f gs."...(treepy--with-loc.loc.(no
2f40 64 65 20 63 6f 6e 74 65 78 74 20 6c 20 72 29 0a 20 20 20 20 28 6c 65 74 20 28 28 72 20 28 69 66 de.context.l.r).....(let.((r.(if
2f60 20 28 6c 69 73 74 70 20 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 0a 20 20 .(listp.r)..................r...
2f80 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 60 72 27 20 69 73 20 6e 6f 74 20 61 20 .............;;.If.`r'.is.not.a.
2fa0 6c 69 73 74 20 28 6f 72 20 6e 69 6c 29 2c 20 74 68 65 6e 20 77 65 27 72 65 20 64 65 61 6c 69 6e list.(or.nil),.then.we're.dealin
2fc0 67 20 77 69 74 68 20 61 20 6e 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6e g.with.a.non................;;.n
2fe0 69 6c 20 63 64 72 20 65 6e 64 69 6e 67 20 6c 69 73 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 il.cdr.ending.list..............
3000 20 20 20 28 63 6f 6e 73 20 72 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 20 28 73 65 71 2d 6c 65 ...(cons.r.nil)))).......(seq-le
3020 74 20 5b 63 72 20 26 72 65 73 74 20 72 6e 65 78 74 5d 20 72 0a 20 20 20 20 20 20 20 20 28 77 68 t.[cr.&rest.rnext].r.........(wh
3040 65 6e 20 28 61 6e 64 20 63 6f 6e 74 65 78 74 20 72 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 72 en.(and.context.r)...........(tr
3060 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 eepy--with-meta............(cons
3080 20 63 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 63 6f .cr..................(treepy--co
30a0 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 ntext-assoc.context.............
30c0 20 20 20 20 20 20 20 3a 6c 20 28 63 6f 6e 73 20 6e 6f 64 65 20 6c 29 0a 20 20 20 20 20 20 20 20 .......:l.(cons.node.l).........
30e0 20 20 20 20 20 20 20 20 20 20 20 3a 72 20 72 6e 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 ...........:r.rnext))...........
3100 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 29 29 0a 0a 0a 28 64 65 66 .(treepy--meta.loc)))))))...(def
3120 75 6e 20 74 72 65 65 70 79 2d 72 69 67 68 74 6d 6f 73 74 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 un.treepy-rightmost.(loc)..."Ret
3140 75 72 6e 20 74 68 65 20 6c 6f 63 20 6f 66 20 74 68 65 20 72 69 67 68 74 6d 6f 73 74 20 73 69 62 urn.the.loc.of.the.rightmost.sib
3160 6c 69 6e 67 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 2e 0a 49 66 ling.of.the.node.at.this.LOC..If
3180 20 4c 4f 43 20 69 73 20 61 6c 72 65 61 64 79 20 74 68 65 20 72 69 67 68 74 6d 6f 73 74 20 73 69 .LOC.is.already.the.rightmost.si
31a0 62 6c 69 6e 67 2c 20 72 65 74 75 72 6e 20 73 65 6c 66 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d bling,.return.self."...(treepy--
31c0 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e 6f 64 65 20 63 6f 6e 74 65 78 74 20 6c 20 72 29 0a with-loc.loc.(node.context.l.r).
31e0 20 20 20 20 28 69 66 20 28 61 6e 64 20 63 6f 6e 74 65 78 74 20 72 29 0a 20 20 20 20 20 20 20 20 ....(if.(and.context.r).........
3200 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e (treepy--with-meta..........(con
3220 73 20 28 63 61 72 20 28 6c 61 73 74 20 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.(car.(last.r))................
3240 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 0a 20 (treepy--context-assoc.context..
3260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 20 28 74 72 65 65 70 79 2d 2d 6a 6f 69 6e ................:l.(treepy--join
3280 2d 63 68 69 6c 64 72 65 6e 20 6c 20 28 63 6f 6e 73 20 6e 6f 64 65 20 28 62 75 74 6c 61 73 74 20 -children.l.(cons.node.(butlast.
32a0 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 20 6e 69 6c 29 29 0a 20 r)))..................:r.nil))..
32c0 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 0a 20 20 20 20 ........(treepy--meta.loc)).....
32e0 20 20 6c 6f 63 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6c 65 66 74 20 28 6c 6f ..loc)))..(defun.treepy-left.(lo
3300 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 6f 66 20 74 68 65 20 6c 65 66 74 c)..."Return.the.loc.of.the.left
3320 20 73 69 62 6c 69 6e 67 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 .sibling.of.the.node.at.this.LOC
3340 2e 0a 6e 69 6c 20 69 66 20 6e 6f 20 6d 6f 72 65 20 6c 65 66 74 20 73 69 62 6c 69 6e 67 73 2e 22 ..nil.if.no.more.left.siblings."
3360 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e 6f 64 65 20 63 ...(treepy--with-loc.loc.(node.c
3380 6f 6e 74 65 78 74 20 6c 20 72 29 0a 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 63 6f 6e 74 65 ontext.l.r).....(when.(and.conte
33a0 78 74 20 6c 29 0a 20 20 20 20 20 20 28 73 65 71 2d 6c 65 74 20 5b 63 6c 20 26 72 65 73 74 20 6c xt.l).......(seq-let.[cl.&rest.l
33c0 6e 65 78 74 5d 20 6c 0a 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 next].l.........(treepy--with-me
33e0 74 61 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 63 6c 0a 20 20 20 20 20 20 20 20 20 20 20 ta..........(cons.cl............
3400 20 20 20 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 ....(treepy--context-assoc.conte
3420 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 20 6c 6e 65 78 74 0a 20 20 20 xt..................:l.lnext....
3440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 72 20 28 63 6f 6e 73 20 6e 6f 64 65 20 72 29 29 29 ..............:r.(cons.node.r)))
3460 0a 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 ..........(treepy--meta.loc)))))
3480 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6c 65 66 74 6d 6f 73 74 20 28 6c 6f 63 29 0a )..(defun.treepy-leftmost.(loc).
34a0 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 6f 66 20 74 68 65 20 6c 65 66 74 6d 6f 73 .."Return.the.loc.of.the.leftmos
34c0 74 20 73 69 62 6c 69 6e 67 20 6f 66 20 74 68 65 20 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f t.sibling.of.the.node.at.this.LO
34e0 43 2e 0a 49 66 20 4c 4f 43 20 69 73 20 61 6c 72 65 61 64 79 20 74 68 65 20 6c 65 66 74 6d 6f 73 C..If.LOC.is.already.the.leftmos
3500 74 20 73 69 62 6c 69 6e 67 2c 20 72 65 74 75 72 6e 20 73 65 6c 66 2e 22 0a 20 20 28 74 72 65 65 t.sibling,.return.self."...(tree
3520 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e 6f 64 65 20 63 6f 6e 74 65 78 74 20 6c py--with-loc.loc.(node.context.l
3540 20 72 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 63 6f 6e 74 65 78 74 20 6c 29 0a 20 20 20 20 .r).....(if.(and.context.l).....
3560 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 20 20 20 20 ....(treepy--with-meta..........
3580 28 63 6f 6e 73 20 28 63 61 72 20 28 6c 61 73 74 20 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 (cons.(car.(last.l))............
35a0 20 20 20 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 ....(treepy--context-assoc.conte
35c0 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 6c 20 5b 5d 0a 20 20 20 20 20 20 xt..................:l.[].......
35e0 20 20 20 20 20 20 20 20 20 20 20 3a 72 20 28 74 72 65 65 70 79 2d 2d 6a 6f 69 6e 2d 63 68 69 6c ...........:r.(treepy--join-chil
3600 64 72 65 6e 20 28 62 75 74 6c 61 73 74 20 6c 29 20 28 63 6f 6e 73 20 6e 6f 64 65 20 72 29 29 29 dren.(butlast.l).(cons.node.r)))
3620 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 0a 20 )..........(treepy--meta.loc))..
3640 20 20 20 20 20 6c 6f 63 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6c 65 66 74 6d .....loc)))..(defun.treepy-leftm
3660 6f 73 74 2d 64 65 73 63 65 6e 64 61 6e 74 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 ost-descendant.(loc)..."Return.t
3680 68 65 20 6c 65 66 74 6d 6f 73 74 20 64 65 73 63 65 6e 64 61 6e 74 20 6f 66 20 74 68 65 20 67 69 he.leftmost.descendant.of.the.gi
36a0 76 65 6e 20 4c 4f 43 2e 0a 5c 28 69 65 2c 20 64 6f 77 6e 20 72 65 70 65 61 74 65 64 6c 79 29 2e ven.LOC..\(ie,.down.repeatedly).
36c0 22 0a 20 20 28 77 68 69 6c 65 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 6c 6f 63 29 "...(while.(treepy-branch-p.loc)
36e0 0a 20 20 20 20 28 73 65 74 71 20 6c 6f 63 20 28 74 72 65 65 70 79 2d 64 6f 77 6e 20 6c 6f 63 29 .....(setq.loc.(treepy-down.loc)
3700 29 29 0a 20 20 6c 6f 63 29 0a 0a 3b 3b 3b 3b 20 4d 6f 64 69 66 69 63 61 74 69 6f 6e 0a 0a 28 64 ))...loc)..;;;;.Modification..(d
3720 65 66 75 6e 20 74 72 65 65 70 79 2d 69 6e 73 65 72 74 2d 6c 65 66 74 20 28 6c 6f 63 20 69 74 65 efun.treepy-insert-left.(loc.ite
3740 6d 29 0a 20 20 22 49 6e 73 65 72 74 20 61 73 20 74 68 65 20 6c 65 66 74 20 73 69 62 6c 69 6e 67 m)..."Insert.as.the.left.sibling
3760 20 6f 66 20 74 68 69 73 20 4c 4f 43 27 53 20 6e 6f 64 65 20 74 68 65 20 49 54 45 4d 2e 0a 52 65 .of.this.LOC'S.node.the.ITEM..Re
3780 74 75 72 6e 20 73 61 6d 65 20 6c 6f 63 20 77 69 74 68 20 73 69 62 6c 69 6e 67 73 20 75 70 64 61 turn.same.loc.with.siblings.upda
37a0 74 65 64 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e ted."...(treepy--with-loc.loc.(n
37c0 6f 64 65 20 63 6f 6e 74 65 78 74 20 6c 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 63 6f 6e 74 ode.context.l).....(if.(not.cont
37e0 65 78 74 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 49 6e 73 65 72 74 20 61 74 20 74 ext).........(error."Insert.at.t
3800 6f 70 22 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 op").......(treepy--with-meta...
3820 20 20 20 20 20 28 63 6f 6e 73 20 6e 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 .....(cons.node..............(tr
3840 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 0a 20 20 20 20 eepy--context-assoc.context.....
3860 20 20 20 20 20 20 20 20 20 20 20 3a 6c 20 28 63 6f 6e 73 20 69 74 65 6d 20 6c 29 0a 20 20 20 20 ...........:l.(cons.item.l).....
3880 20 20 20 20 20 20 20 20 20 20 20 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 20 20 20 20 20 ...........:changed?.t))........
38a0 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 (treepy--meta.loc)))))..(defun.t
38c0 72 65 65 70 79 2d 69 6e 73 65 72 74 2d 72 69 67 68 74 20 28 6c 6f 63 20 69 74 65 6d 29 0a 20 20 reepy-insert-right.(loc.item)...
38e0 22 49 6e 73 65 72 74 20 61 73 20 74 68 65 20 72 69 67 68 74 20 73 69 62 6c 69 6e 67 20 6f 66 20 "Insert.as.the.right.sibling.of.
3900 74 68 69 73 20 4c 4f 43 27 73 20 6e 6f 64 65 20 74 68 65 20 49 54 45 4d 2e 0a 52 65 74 75 72 6e this.LOC's.node.the.ITEM..Return
3920 20 73 61 6d 65 20 6c 6f 63 20 77 69 74 68 20 73 69 62 6c 69 6e 67 73 20 75 70 64 61 74 65 64 2e .same.loc.with.siblings.updated.
3940 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 20 28 6e 6f 64 65 20 "...(treepy--with-loc.loc.(node.
3960 63 6f 6e 74 65 78 74 20 72 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 63 6f 6e 74 65 78 74 29 context.r).....(if.(not.context)
3980 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 49 6e 73 65 72 74 20 61 74 20 74 6f 70 22 29 .........(error."Insert.at.top")
39a0 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 20 .......(treepy--with-meta.......
39c0 20 28 63 6f 6e 73 20 6e 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 .(cons.node..............(treepy
39e0 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 0a 20 20 20 20 20 20 20 20 --context-assoc.context.........
3a00 20 20 20 20 20 20 20 3a 72 20 28 63 6f 6e 73 20 69 74 65 6d 20 72 29 0a 20 20 20 20 20 20 20 20 .......:r.(cons.item.r).........
3a20 20 20 20 20 20 20 20 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 20 20 20 20 20 28 74 72 65 .......:changed?.t))........(tre
3a40 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 epy--meta.loc)))))..(defun.treep
3a60 79 2d 72 65 70 6c 61 63 65 20 28 6c 6f 63 20 6e 6f 64 65 29 0a 20 20 22 52 65 70 6c 61 63 65 20 y-replace.(loc.node)..."Replace.
3a80 74 68 65 20 6e 6f 64 65 20 69 6e 20 74 68 69 73 20 4c 4f 43 20 77 69 74 68 20 74 68 65 20 67 69 the.node.in.this.LOC.with.the.gi
3aa0 76 65 6e 20 4e 4f 44 45 2c 20 77 69 74 68 6f 75 74 20 6d 6f 76 69 6e 67 2e 22 0a 20 20 28 6c 65 ven.NODE,.without.moving."...(le
3ac0 74 20 28 28 63 6f 6e 74 65 78 74 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 t.((context.(treepy--context.loc
3ae0 29 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 ))).....(treepy--with-meta......
3b00 28 63 6f 6e 73 20 6e 6f 64 65 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 63 (cons.node............(treepy--c
3b20 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 ontext-assoc.context............
3b40 20 20 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 ..:changed?.t))......(treepy--me
3b60 74 61 20 6c 6f 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 65 64 69 74 20 28 ta.loc))))..(defun.treepy-edit.(
3b80 6c 6f 63 20 66 20 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 52 65 70 6c 61 63 65 20 74 68 65 loc.f.&rest.args)..."Replace.the
3ba0 20 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 20 77 69 74 68 20 74 68 65 20 76 61 6c 75 65 .node.at.this.LOC.with.the.value
3bc0 20 6f 66 20 28 46 20 6e 6f 64 65 20 41 52 47 53 29 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 72 65 .of.(F.node.ARGS)."...(treepy-re
3be0 70 6c 61 63 65 20 6c 6f 63 20 28 61 70 70 6c 79 20 66 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 place.loc.(apply.f.(treepy-node.
3c00 6c 6f 63 29 20 61 72 67 73 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 69 6e 73 65 loc).args)))..(defun.treepy-inse
3c20 72 74 2d 63 68 69 6c 64 20 28 6c 6f 63 20 69 74 65 6d 29 0a 20 20 22 49 6e 73 65 72 74 20 61 73 rt-child.(loc.item)..."Insert.as
3c40 20 74 68 65 20 6c 65 66 74 6d 6f 73 74 20 63 68 69 6c 64 20 6f 66 20 74 68 69 73 20 4c 4f 43 27 .the.leftmost.child.of.this.LOC'
3c60 73 20 6e 6f 64 65 20 74 68 65 20 49 54 45 4d 2e 0a 52 65 74 75 72 6e 20 73 61 6d 65 20 6c 6f 63 s.node.the.ITEM..Return.same.loc
3c80 20 77 69 74 68 20 63 68 69 6c 64 72 65 6e 20 75 70 64 61 74 65 64 2e 22 0a 20 20 28 74 72 65 65 .with.children.updated."...(tree
3ca0 70 79 2d 72 65 70 6c 61 63 65 20 6c 6f 63 20 28 74 72 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 65 py-replace.loc.(treepy-make-node
3cc0 20 6c 6f 63 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 0a 20 20 20 20 20 20 20 20 20 .loc.(treepy-node.loc)..........
3ce0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ...............................(
3d00 63 6f 6e 73 20 69 74 65 6d 20 28 74 72 65 65 70 79 2d 63 68 69 6c 64 72 65 6e 20 6c 6f 63 29 29 cons.item.(treepy-children.loc))
3d20 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 61 70 70 65 6e 64 2d 63 68 69 6c 64 20 )))..(defun.treepy-append-child.
3d40 28 6c 6f 63 20 69 74 65 6d 29 0a 20 20 22 49 6e 73 65 72 74 20 61 73 20 74 68 65 20 72 69 67 68 (loc.item)..."Insert.as.the.righ
3d60 74 6d 6f 73 74 20 63 68 69 6c 64 20 6f 66 20 74 68 69 73 20 4c 4f 43 27 53 20 6e 6f 64 65 20 74 tmost.child.of.this.LOC'S.node.t
3d80 68 65 20 49 54 45 4d 2e 0a 52 65 74 75 72 6e 20 73 61 6d 65 20 6c 6f 63 20 77 69 74 68 20 63 68 he.ITEM..Return.same.loc.with.ch
3da0 69 6c 64 72 65 6e 20 75 70 64 61 74 65 64 2e 22 0a 20 20 3b 3b 20 54 4f 44 4f 3a 20 63 68 65 63 ildren.updated."...;;.TODO:.chec
3dc0 6b 20 70 65 72 66 6f 72 6d 61 6e 63 65 0a 20 20 28 74 72 65 65 70 79 2d 72 65 70 6c 61 63 65 20 k.performance...(treepy-replace.
3de0 6c 6f 63 20 28 74 72 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 65 20 6c 6f 63 20 28 74 72 65 65 70 loc.(treepy-make-node.loc.(treep
3e00 79 2d 6e 6f 64 65 20 6c 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 y-node.loc).....................
3e20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 70 70 65 6e 64 20 28 74 72 65 ....................(append.(tre
3e40 65 70 79 2d 63 68 69 6c 64 72 65 6e 20 6c 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 epy-children.loc)...............
3e60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
3e80 20 20 60 28 2c 69 74 65 6d 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 65 ..`(,item)))))..(defun.treepy-re
3ea0 6d 6f 76 65 20 28 6c 6f 63 29 0a 20 20 22 52 65 6d 6f 76 65 20 74 68 65 20 6e 6f 64 65 20 61 74 move.(loc)..."Remove.the.node.at
3ec0 20 4c 4f 43 2e 0a 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 74 68 61 74 20 77 6f 75 6c 64 20 .LOC..Return.the.loc.that.would.
3ee0 68 61 76 65 20 70 72 65 63 65 64 65 64 20 69 74 20 69 6e 20 61 20 64 65 70 74 68 2d 66 69 72 73 have.preceded.it.in.a.depth-firs
3f00 74 0a 77 61 6c 6b 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 20 6c 6f 63 t.walk."...(treepy--with-loc.loc
3f20 20 28 63 6f 6e 74 65 78 74 20 70 6e 6f 64 65 73 20 70 70 61 74 68 20 6c 20 72 29 0a 20 20 20 20 .(context.pnodes.ppath.l.r).....
3f40 28 69 66 20 28 6e 6f 74 20 63 6f 6e 74 65 78 74 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 (if.(not.context).........(error
3f60 20 22 52 65 6d 6f 76 65 20 61 74 20 74 6f 70 22 29 0a 20 20 20 20 20 20 28 69 66 20 28 3e 20 28 ."Remove.at.top").......(if.(>.(
3f80 6c 65 6e 67 74 68 20 6c 29 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6e 6c length.l).0)...........(let.((nl
3fa0 6f 63 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 20 28 63 6f 6e 73 20 28 63 61 72 oc.(treepy--with-meta.(cons.(car
3fc0 20 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .l).............................
3fe0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 ...................(treepy--cont
4000 65 78 74 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ext-assoc.context...............
4020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4040 20 20 20 3a 6c 20 28 63 64 72 20 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...:l.(cdr.l)...................
4060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a ...............................:
4080 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 changed?.t))....................
40a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d ......................(treepy--m
40c0 65 74 61 20 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 68 69 6c eta.loc))).................(chil
40e0 64 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 d.nil)).............(while.(setq
4100 20 63 68 69 6c 64 20 28 61 6e 64 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 6e 6c 6f .child.(and.(treepy-branch-p.nlo
4120 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c)..............................
4140 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 63 68 69 6c 64 72 65 6e 20 6e 6c 6f 63 29 29 29 0a .......(treepy-children.nloc))).
4160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6e 6c 6f 63 20 28 74 72 65 65 70 79 ..............(setq.nloc.(treepy
4180 2d 72 69 67 68 74 6d 6f 73 74 20 63 68 69 6c 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 -rightmost.child))).............
41a0 6e 6c 6f 63 29 0a 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6d 65 74 61 nloc).........(treepy--with-meta
41c0 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 74 72 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 ..........(cons.(treepy-make-nod
41e0 65 20 6c 6f 63 20 28 63 61 72 20 70 6e 6f 64 65 73 29 20 72 29 0a 20 20 20 20 20 20 20 20 20 20 e.loc.(car.pnodes).r)...........
4200 20 20 20 20 20 28 61 6e 64 20 70 70 61 74 68 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 .....(and.ppath.(treepy--context
4220 2d 61 73 73 6f 63 20 63 6f 6e 74 65 78 74 20 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 29 0a 20 20 -assoc.context.:changed?.t)))...
4240 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 29 29 29 29 29 29 0a 0a .......(treepy--meta.loc))))))..
4260 3b 3b 3b 3b 20 45 6e 75 6d 65 72 61 74 69 6f 6e 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d ;;;;.Enumeration..(defun.treepy-
4280 2d 70 72 65 6f 72 64 65 72 2d 6e 65 78 74 20 28 6c 6f 63 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 -preorder-next.(loc)..."Move.to.
42a0 74 68 65 20 6e 65 78 74 20 4c 4f 43 20 69 6e 20 74 68 65 20 68 69 65 72 61 72 63 68 79 2c 20 64 the.next.LOC.in.the.hierarchy,.d
42c0 65 70 74 68 2d 66 69 72 73 74 20 69 6e 20 70 72 65 6f 72 64 65 72 2e 0a 57 68 65 6e 20 72 65 61 epth-first.in.preorder..When.rea
42e0 63 68 69 6e 67 20 74 68 65 20 65 6e 64 2c 20 72 65 74 75 72 6e 73 20 61 20 64 69 73 74 69 6e 67 ching.the.end,.returns.a.disting
4300 75 69 73 68 65 64 20 6c 6f 63 20 64 65 74 65 63 74 61 62 6c 65 20 76 69 61 0a 60 74 72 65 65 70 uished.loc.detectable.via.`treep
4320 79 2d 65 6e 64 2d 70 27 2e 20 20 49 66 20 61 6c 72 65 61 64 79 20 61 74 20 74 68 65 20 65 6e 64 y-end-p'...If.already.at.the.end
4340 2c 20 73 74 61 79 73 20 74 68 65 72 65 2e 22 0a 20 20 28 69 66 20 28 65 71 75 61 6c 20 3a 65 6e ,.stays.there."...(if.(equal.:en
4360 64 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 6c d.(treepy--context.loc)).......l
4380 6f 63 0a 20 20 20 20 28 6c 65 74 20 28 28 63 6c 6f 63 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 28 oc.....(let.((cloc.loc)).......(
43a0 6f 72 0a 20 20 20 20 20 20 20 28 61 6e 64 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 or........(and.(treepy-branch-p.
43c0 63 6c 6f 63 29 20 28 74 72 65 65 70 79 2d 64 6f 77 6e 20 63 6c 6f 63 29 29 0a 20 20 20 20 20 20 cloc).(treepy-down.cloc)).......
43e0 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 20 63 6c 6f 63 29 0a 20 20 20 20 20 20 20 28 6c 65 74 .(treepy-right.cloc)........(let
4400 20 28 28 70 20 63 6c 6f 63 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 20 6e 69 6c 29 .((p.cloc)..............(pr.nil)
4420 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 61 6e 64 20 28 74 72 65 65 70 79 2d 75 )..........(while.(and.(treepy-u
4440 70 20 70 29 20 28 6e 6f 74 20 28 73 65 74 71 20 70 72 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 p.p).(not.(setq.pr.(treepy-right
4460 20 28 74 72 65 65 70 79 2d 75 70 20 70 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 .(treepy-up.p)))))............(s
4480 65 74 71 20 70 20 28 74 72 65 65 70 79 2d 75 70 20 70 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 etq.p.(treepy-up.p)))..........(
44a0 6f 72 20 70 72 20 28 63 6f 6e 73 20 28 63 6f 6e 73 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 70 or.pr.(cons.(cons.(treepy-node.p
44c0 29 20 3a 65 6e 64 29 20 6e 69 6c 29 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 ).:end).nil)))))))..(defun.treep
44e0 79 2d 2d 70 6f 73 74 6f 72 64 65 72 2d 6e 65 78 74 20 28 6c 6f 63 29 0a 20 20 22 4d 6f 76 65 20 y--postorder-next.(loc)..."Move.
4500 74 6f 20 74 68 65 20 6e 65 78 74 20 4c 4f 43 20 69 6e 20 74 68 65 20 68 69 65 72 61 72 63 68 79 to.the.next.LOC.in.the.hierarchy
4520 2c 20 64 65 70 74 68 2d 66 69 72 73 74 20 69 6e 20 70 6f 73 74 6f 72 64 65 72 2e 0a 57 68 65 6e ,.depth-first.in.postorder..When
4540 20 72 65 61 63 68 69 6e 67 20 74 68 65 20 65 6e 64 2c 20 72 65 74 75 72 6e 73 20 61 20 64 69 73 .reaching.the.end,.returns.a.dis
4560 74 69 6e 67 75 69 73 68 65 64 20 6c 6f 63 20 64 65 74 65 63 74 61 62 6c 65 20 76 69 61 0a 60 74 tinguished.loc.detectable.via.`t
4580 72 65 65 70 79 2d 65 6e 64 2d 70 27 2e 20 20 49 66 20 61 6c 72 65 61 64 79 20 61 74 20 74 68 65 reepy-end-p'...If.already.at.the
45a0 20 65 6e 64 2c 20 73 74 61 79 73 20 74 68 65 72 65 2e 22 0a 20 20 28 69 66 20 28 65 71 75 61 6c .end,.stays.there."...(if.(equal
45c0 20 3a 65 6e 64 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 29 29 0a 20 20 20 .:end.(treepy--context.loc))....
45e0 20 20 20 6c 6f 63 0a 20 20 20 20 28 69 66 20 28 6e 75 6c 6c 20 28 74 72 65 65 70 79 2d 75 70 20 ...loc.....(if.(null.(treepy-up.
4600 6c 6f 63 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 63 6f 6e 73 20 28 74 72 65 65 70 loc)).........(cons.(cons.(treep
4620 79 2d 6e 6f 64 65 20 6c 6f 63 29 20 3a 65 6e 64 29 20 6e 69 6c 29 0a 20 20 20 20 20 20 28 6f 72 y-node.loc).:end).nil).......(or
4640 20 28 6c 65 74 20 28 28 72 6c 6f 63 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 20 6c 6f 63 29 29 .(let.((rloc.(treepy-right.loc))
4660 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 72 6c 6f 63 20 28 74 72 65 65 70 79 2d ).............(and.rloc.(treepy-
4680 6c 65 66 74 6d 6f 73 74 2d 64 65 73 63 65 6e 64 61 6e 74 20 72 6c 6f 63 29 29 29 0a 20 20 20 20 leftmost-descendant.rloc))).....
46a0 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 75 70 20 6c 6f 63 29 29 29 29 29 0a 0a 28 64 65 66 75 ......(treepy-up.loc)))))..(defu
46c0 6e 20 74 72 65 65 70 79 2d 6e 65 78 74 20 28 6c 6f 63 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 72 64 n.treepy-next.(loc.&optional.ord
46e0 65 72 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 74 68 65 20 6e 65 78 74 20 4c 4f 43 20 69 6e 20 74 er)..."Move.to.the.next.LOC.in.t
4700 68 65 20 68 69 65 72 61 72 63 68 79 2c 20 64 65 70 74 68 2d 66 69 72 73 74 2e 0a 55 73 65 20 4f he.hierarchy,.depth-first..Use.O
4720 52 44 45 52 20 69 66 20 67 69 76 65 6e 2e 20 20 50 6f 73 73 69 62 6c 65 20 76 61 6c 75 65 73 20 RDER.if.given...Possible.values.
4740 66 6f 72 20 4f 52 44 45 52 20 61 72 65 20 60 3a 70 72 65 6f 72 64 65 72 27 20 61 6e 64 0a 60 3a for.ORDER.are.`:preorder'.and.`:
4760 70 6f 73 74 6f 72 64 65 72 27 2c 20 64 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 66 6f 72 6d postorder',.defaults.to.the.form
4780 65 72 2e 22 0a 20 20 28 63 6c 2d 63 61 73 65 20 28 6f 72 20 6f 72 64 65 72 20 3a 70 72 65 6f 72 er."...(cl-case.(or.order.:preor
47a0 64 65 72 29 0a 20 20 20 20 28 3a 70 72 65 6f 72 64 65 72 20 28 74 72 65 65 70 79 2d 2d 70 72 65 der).....(:preorder.(treepy--pre
47c0 6f 72 64 65 72 2d 6e 65 78 74 20 6c 6f 63 29 29 0a 20 20 20 20 28 3a 70 6f 73 74 6f 72 64 65 72 order-next.loc)).....(:postorder
47e0 20 28 74 72 65 65 70 79 2d 2d 70 6f 73 74 6f 72 64 65 72 2d 6e 65 78 74 20 6c 6f 63 29 29 0a 20 .(treepy--postorder-next.loc))..
4800 20 20 20 28 74 20 28 65 72 72 6f 72 20 22 55 6e 72 65 63 6f 67 6e 69 7a 65 64 20 6f 72 64 65 72 ...(t.(error."Unrecognized.order
4820 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 70 72 65 6f 72 64 65 72 2d 70 "))))..(defun.treepy--preorder-p
4840 72 65 76 20 28 6c 6f 63 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 rev.(loc)..."Move.to.the.previou
4860 73 20 4c 4f 43 20 69 6e 20 74 68 65 20 68 69 65 72 61 72 63 68 79 2c 20 64 65 70 74 68 2d 66 69 s.LOC.in.the.hierarchy,.depth-fi
4880 72 73 74 20 70 72 65 6f 72 64 65 72 2e 0a 49 66 20 61 6c 72 65 61 64 79 20 61 74 20 74 68 65 20 rst.preorder..If.already.at.the.
48a0 72 6f 6f 74 2c 20 72 65 74 75 72 6e 73 20 6e 69 6c 2e 22 0a 20 20 28 6c 65 74 20 28 28 6c 6c 6f root,.returns.nil."...(let.((llo
48c0 63 20 28 74 72 65 65 70 79 2d 6c 65 66 74 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 20 20 28 63 68 c.(treepy-left.loc)).........(ch
48e0 69 6c 64 20 6e 69 6c 29 29 0a 20 20 20 20 28 69 66 20 6c 6c 6f 63 0a 20 20 20 20 20 20 20 20 28 ild.nil)).....(if.lloc.........(
4900 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 63 68 69 progn...........(while.(setq.chi
4920 6c 64 20 28 61 6e 64 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 6c 6c 6f 63 29 0a 20 ld.(and.(treepy-branch-p.lloc)..
4940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
4960 20 28 74 72 65 65 70 79 2d 63 68 69 6c 64 72 65 6e 20 6c 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 .(treepy-children.lloc))).......
4980 20 20 20 20 20 20 28 73 65 74 71 20 6c 6c 6f 63 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 6d 6f ......(setq.lloc.(treepy-rightmo
49a0 73 74 20 63 68 69 6c 64 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 6c 6c 6f 63 29 0a 20 20 20 20 st.child)))...........lloc).....
49c0 20 20 28 74 72 65 65 70 79 2d 75 70 20 6c 6f 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 ..(treepy-up.loc))))..(defun.tre
49e0 65 70 79 2d 2d 70 6f 73 74 6f 72 64 65 72 2d 70 72 65 76 20 28 6c 6f 63 29 0a 20 20 22 4d 6f 76 epy--postorder-prev.(loc)..."Mov
4a00 65 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 4c 4f 43 20 69 6e 20 74 68 65 20 68 69 65 e.to.the.previous.LOC.in.the.hie
4a20 72 61 72 63 68 79 2c 20 64 65 70 74 68 2d 66 69 72 73 74 20 70 6f 73 74 6f 72 64 65 72 2e 0a 49 rarchy,.depth-first.postorder..I
4a40 66 20 61 6c 72 65 61 64 79 20 61 74 20 74 68 65 20 72 6f 6f 74 2c 20 72 65 74 75 72 6e 73 20 6e f.already.at.the.root,.returns.n
4a60 69 6c 2e 22 0a 20 20 28 69 66 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 6c 6f 63 29 il."...(if.(treepy-branch-p.loc)
4a80 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 6d 6f 73 74 20 28 74 72 65 65 70 79 .......(treepy-rightmost.(treepy
4aa0 2d 64 6f 77 6e 20 6c 6f 63 29 29 0a 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 28 77 68 -down.loc)).....(progn.......(wh
4ac0 69 6c 65 20 28 6e 6f 74 20 28 74 72 65 65 70 79 2d 6c 65 66 74 20 6c 6f 63 29 29 0a 20 20 20 20 ile.(not.(treepy-left.loc)).....
4ae0 20 20 20 20 28 73 65 74 71 20 6c 6f 63 20 28 74 72 65 65 70 79 2d 75 70 20 6c 6f 63 29 29 29 0a ....(setq.loc.(treepy-up.loc))).
4b00 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 6c 65 66 74 20 6c 6f 63 29 29 29 29 0a 0a 28 64 65 66 ......(treepy-left.loc))))..(def
4b20 75 6e 20 74 72 65 65 70 79 2d 70 72 65 76 20 28 6c 6f 63 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 72 un.treepy-prev.(loc.&optional.or
4b40 64 65 72 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 4c 4f 43 der)..."Move.to.the.previous.LOC
4b60 20 69 6e 20 74 68 65 20 68 69 65 72 61 72 63 68 79 2c 20 64 65 70 74 68 2d 66 69 72 73 74 2e 0a .in.the.hierarchy,.depth-first..
4b80 55 73 65 20 4f 52 44 45 52 20 69 66 20 67 69 76 65 6e 2e 20 20 50 6f 73 73 69 62 6c 65 20 76 61 Use.ORDER.if.given...Possible.va
4ba0 6c 75 65 73 20 66 6f 72 20 4f 52 44 45 52 20 61 72 65 20 60 3a 70 72 65 6f 72 64 65 72 27 20 61 lues.for.ORDER.are.`:preorder'.a
4bc0 6e 64 20 60 3a 70 6f 73 74 6f 72 64 65 72 27 2c 0a 64 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 nd.`:postorder',.defaults.to.the
4be0 20 66 6f 72 6d 65 72 2e 22 0a 20 20 28 63 6c 2d 63 61 73 65 20 28 6f 72 20 6f 72 64 65 72 20 3a .former."...(cl-case.(or.order.:
4c00 70 72 65 6f 72 64 65 72 29 0a 20 20 20 20 28 3a 70 72 65 6f 72 64 65 72 20 28 74 72 65 65 70 79 preorder).....(:preorder.(treepy
4c20 2d 2d 70 72 65 6f 72 64 65 72 2d 70 72 65 76 20 6c 6f 63 29 29 0a 20 20 20 20 28 3a 70 6f 73 74 --preorder-prev.loc)).....(:post
4c40 6f 72 64 65 72 20 28 74 72 65 65 70 79 2d 2d 70 6f 73 74 6f 72 64 65 72 2d 70 72 65 76 20 6c 6f order.(treepy--postorder-prev.lo
4c60 63 29 29 0a 20 20 20 20 28 74 20 28 65 72 72 6f 72 20 22 55 6e 72 65 63 6f 67 6e 69 7a 65 64 20 c)).....(t.(error."Unrecognized.
4c80 6f 72 64 65 72 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 65 6e 64 2d 70 20 order"))))..(defun.treepy-end-p.
4ca0 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 20 69 66 20 4c 4f 43 20 72 65 70 72 65 73 65 (loc)..."Return.t.if.LOC.represe
4cc0 6e 74 73 20 74 68 65 20 65 6e 64 20 6f 66 20 61 20 64 65 70 74 68 2d 66 69 72 73 74 20 77 61 6c nts.the.end.of.a.depth-first.wal
4ce0 6b 2e 22 0a 20 20 28 65 71 75 61 6c 20 3a 65 6e 64 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 k."...(equal.:end.(treepy--conte
4d00 78 74 20 6c 6f 63 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 74 72 65 65 70 79 29 0a 0a 3b 3b xt.loc)))..(provide.'treepy)..;;
4d20 3b 20 74 72 65 65 70 79 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 ;.treepy.el.ends.here...........
4d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
4fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
50a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
50c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
50e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
51a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
51c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
51e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
52a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
52c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
52e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
53a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
53c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
53e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
54a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
54c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
54e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
55e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
56a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
56c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
56e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
57a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
57c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
57e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
58a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
58c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
58e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
59a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
59c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
59e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
5fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
60a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
60c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
60e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
61a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
61c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
61e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
62e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
63e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
64e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
65e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
66e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
67e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6800 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6840 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6860 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6880 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
68e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6900 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6920 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6940 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6960 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6980 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
69e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6a80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6aa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ac0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ae0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6b80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6bc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6be0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6c80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ca0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6cc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ce0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6d80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6da0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6dc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6de0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6e80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ea0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ec0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6ee0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f60 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6f80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6fa0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6fc0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
6fe0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
70a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
70c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
70e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7120 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7160 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
71a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
71c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
71e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7260 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
72e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7320 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7340 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
73a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
73c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
73e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
74a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
74c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
74e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7500 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7520 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7540 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7560 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7580 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
75a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
75c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
75e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7600 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7620 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7640 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7660 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7680 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
76a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
76c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
76e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7700 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7720 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7740 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7760 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
7780 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
77a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
77c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................
77e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................................