| ofs | hex dump | ascii |
|---|
| 0000 | 74 72 65 65 70 79 2d 32 30 32 33 30 37 31 35 2e 32 31 35 34 2f 00 00 00 00 00 00 00 00 00 00 00 | treepy-20230715.2154/........... |
| 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 33 32 30 00 20 35 00 00 00 | 0000000.00000000000.012320..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 33 30 37 31 35 2e 32 31 35 34 2f 74 72 65 65 70 79 2d 70 6b 67 2e | treepy-20230715.2154/treepy-pkg. |
| 0220 | 65 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 | el.............................. |
| 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 37 34 33 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 37 33 35 00 20 30 00 00 00 | 0000743.00000000000.014735..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 | 28 64 65 66 69 6e 65 2d 70 61 63 6b 61 67 65 20 22 74 72 65 65 70 79 22 20 22 32 30 32 33 30 37 | (define-package."treepy"."202307 |
| 0420 | 31 35 2e 32 31 35 34 22 20 22 47 65 6e 65 72 69 63 20 74 72 65 65 20 74 72 61 76 65 72 73 61 6c | 15.2154"."Generic.tree.traversal |
| 0440 | 20 74 6f 6f 6c 73 22 0a 20 20 27 28 28 65 6d 61 63 73 20 22 32 35 2e 31 22 29 29 0a 20 20 3a 63 | .tools"...'((emacs."25.1"))...:c |
| 0460 | 6f 6d 6d 69 74 20 22 37 35 66 65 33 65 63 33 37 65 36 66 39 62 32 62 64 66 64 36 64 30 35 38 34 | ommit."75fe3ec37e6f9b2bdfd6d0584 |
| 0480 | 65 66 64 39 38 34 64 30 63 30 30 61 34 33 65 22 20 3a 61 75 74 68 6f 72 73 0a 20 20 27 28 28 22 | efd984d0c00a43e".:authors...'((" |
| 04a0 | 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 72 72 65 74 | Daniel.Barreto"..."daniel.barret |
| 04c0 | 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 65 72 73 0a | o.n@gmail.com"))...:maintainers. |
| 04e0 | 20 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 6c 2e | ..'(("Daniel.Barreto"..."daniel. |
| 0500 | 62 61 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 | barreto.n@gmail.com"))...:mainta |
| 0520 | 69 6e 65 72 0a 20 20 27 28 22 44 61 6e 69 65 6c 20 42 61 72 72 65 74 6f 22 20 2e 20 22 64 61 6e | iner...'("Daniel.Barreto"..."dan |
| 0540 | 69 65 6c 2e 62 61 72 72 65 74 6f 2e 6e 40 67 6d 61 69 6c 2e 63 6f 6d 22 29 0a 20 20 3a 6b 65 79 | iel.barreto.n@gmail.com")...:key |
| 0560 | 77 6f 72 64 73 0a 20 20 27 28 22 6c 69 73 70 22 20 22 6d 61 69 6e 74 22 20 22 74 6f 6f 6c 73 22 | words...'("lisp"."maint"."tools" |
| 0580 | 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 76 6f 6c | )...:url."https://github.com/vol |
| 05a0 | 72 61 74 68 2f 74 72 65 65 70 79 2e 65 6c 22 29 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 | rath/treepy.el").;;.Local.Variab |
| 05c0 | 6c 65 73 3a 0a 3b 3b 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 0a 3b 3b 20 45 6e | les:.;;.no-byte-compile:.t.;;.En |
| 05e0 | 64 3a 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | d:.............................. |
| 0600 | 74 72 65 65 70 79 2d 32 30 32 33 30 37 31 35 2e 32 31 35 34 2f 74 72 65 65 70 79 2e 65 6c 00 00 | treepy-20230715.2154/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 36 34 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 34 31 36 34 00 20 30 00 00 00 | 0042644.00000000000.014164..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 56 65 72 73 69 6f 6e | 15:17:36.2017.(+0200).;;.Version |
| 0900 | 3a 20 30 2e 31 2e 32 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 65 73 3a 20 28 28 65 | :.0.1.2.;;.Package-Requires:.((e |
| 0920 | 6d 61 63 73 20 22 32 35 2e 31 22 29 29 0a 3b 3b 20 55 52 4c 3a 20 68 74 74 70 73 3a 2f 2f 67 69 | macs."25.1")).;;.URL:.https://gi |
| 0940 | 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 0a 0a 3b 3b 20 54 | thub.com/volrath/treepy.el..;;.T |
| 0960 | 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3a 20 79 6f | his.program.is.free.software:.yo |
| 0980 | 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 | u.can.redistribute.it.and/or.mod |
| 09a0 | 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 | ify.;;.it.under.the.terms.of.the |
| 09c0 | 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 73 20 70 | .GNU.General.Public.License.as.p |
| 09e0 | 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 | ublished.by.;;.the.Free.Software |
| 0a00 | 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 | .Foundation,.either.version.3.of |
| 0a20 | 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 20 28 61 74 0a 3b 3b 20 79 6f 75 72 20 6f 70 74 | .the.License,.or.(at.;;.your.opt |
| 0a40 | 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 3b 3b 0a 3b 3b 20 54 68 | ion).any.later.version..;;.;;.Th |
| 0a60 | 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 | is.program.is.distributed.in.the |
| 0a80 | 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 20 62 75 | .hope.that.it.will.be.useful,.bu |
| 0aa0 | 74 0a 3b 3b 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f | t.;;.WITHOUT.ANY.WARRANTY;.witho |
| 0ac0 | 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a | ut.even.the.implied.warranty.of. |
| 0ae0 | 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f | ;;.MERCHANTABILITY.or.FITNESS.FO |
| 0b00 | 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 | R.A.PARTICULAR.PURPOSE...See.the |
| 0b20 | 20 47 4e 55 0a 3b 3b 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 | .GNU.;;.General.Public.License.f |
| 0b40 | 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 3b 3b 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c | or.more.details..;;.;;.You.shoul |
| 0b60 | 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e | d.have.received.a.copy.of.the.GN |
| 0b80 | 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e | U.General.Public.License.;;.alon |
| 0ba0 | 67 20 77 69 74 68 20 47 4e 55 20 45 6d 61 63 73 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c | g.with.GNU.Emacs...If.not,.see.< |
| 0bc0 | 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a | http://www.gnu.org/licenses/>... |
| 0be0 | 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 47 65 6e 65 72 69 63 20 74 6f 6f 6c | ;;;.Commentary:..;;.Generic.tool |
| 0c00 | 73 20 66 6f 72 20 72 65 63 75 72 73 69 76 65 20 61 6e 64 20 69 74 65 72 61 74 69 76 65 20 74 72 | s.for.recursive.and.iterative.tr |
| 0c20 | 65 65 20 74 72 61 76 65 72 73 61 6c 20 62 61 73 65 64 20 6f 6e 0a 3b 3b 20 63 6c 6f 6a 75 72 65 | ee.traversal.based.on.;;.clojure |
| 0c40 | 2e 77 61 6c 6b 20 61 6e 64 20 63 6c 6f 6a 75 72 65 2e 7a 69 70 20 72 65 73 70 65 63 74 69 76 65 | .walk.and.clojure.zip.respective |
| 0c60 | 6c 79 2e 20 20 44 65 70 65 6e 64 73 20 6f 6e 20 60 6d 61 70 27 2c 20 61 20 6d 61 70 0a 3b 3b 20 | ly...Depends.on.`map',.a.map.;;. |
| 0c80 | 6d 61 6e 69 70 75 6c 61 74 69 6f 6e 20 6c 69 62 72 61 72 79 20 62 75 69 6c 74 20 69 6e 20 45 6d | manipulation.library.built.in.Em |
| 0ca0 | 61 63 73 20 32 35 2e 31 2e 20 20 41 6c 6c 20 66 75 6e 63 74 69 6f 6e 73 20 61 72 65 20 70 72 65 | acs.25.1...All.functions.are.pre |
| 0cc0 | 66 69 78 65 64 0a 3b 3b 20 77 69 74 68 20 22 74 72 65 65 70 79 2d 22 2e 0a 0a 3b 3b 3b 20 43 6f | fixed.;;.with."treepy-"...;;;.Co |
| 0ce0 | 64 65 3a 0a 0a 28 72 65 71 75 69 72 65 20 27 6d 61 70 29 0a 28 72 65 71 75 69 72 65 20 27 63 6c | de:..(require.'map).(require.'cl |
| 0d00 | 2d 6c 69 62 29 0a 0a 3b 3b 3b 20 57 61 6c 6b 20 28 72 65 63 75 72 73 69 76 65 20 74 72 65 65 20 | -lib)..;;;.Walk.(recursive.tree. |
| 0d20 | 74 72 61 76 65 72 73 61 6c 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 77 61 6c 6b 20 28 | traversal)..(defun.treepy-walk.( |
| 0d40 | 69 6e 6e 65 72 20 6f 75 74 65 72 20 66 6f 72 6d 29 0a 20 20 22 55 73 69 6e 67 20 49 4e 4e 45 52 | inner.outer.form)..."Using.INNER |
| 0d60 | 20 61 6e 64 20 4f 55 54 45 52 2c 20 74 72 61 76 65 72 73 65 20 46 4f 52 4d 2c 20 61 6e 20 61 72 | .and.OUTER,.traverse.FORM,.an.ar |
| 0d80 | 62 69 74 72 61 72 79 20 64 61 74 61 20 73 74 72 75 63 74 75 72 65 2e 0a 49 4e 4e 45 52 20 61 6e | bitrary.data.structure..INNER.an |
| 0da0 | 64 20 4f 55 54 45 52 20 61 72 65 20 66 75 6e 63 74 69 6f 6e 73 2e 20 20 41 70 70 6c 79 20 49 4e | d.OUTER.are.functions...Apply.IN |
| 0dc0 | 4e 45 52 20 74 6f 20 65 61 63 68 20 65 6c 65 6d 65 6e 74 20 6f 66 0a 46 4f 52 4d 2c 20 62 75 69 | NER.to.each.element.of.FORM,.bui |
| 0de0 | 6c 64 69 6e 67 20 75 70 20 61 20 64 61 74 61 20 73 74 72 75 63 74 75 72 65 20 6f 66 20 74 68 65 | lding.up.a.data.structure.of.the |
| 0e00 | 20 73 61 6d 65 20 74 79 70 65 2c 20 74 68 65 6e 20 61 70 70 6c 79 0a 4f 55 54 45 52 20 74 6f 20 | .same.type,.then.apply.OUTER.to. |
| 0e20 | 74 68 65 20 72 65 73 75 6c 74 2e 20 20 52 65 63 6f 67 6e 69 7a 65 20 63 6f 6e 73 2c 20 6c 69 73 | the.result...Recognize.cons,.lis |
| 0e40 | 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 68 20 74 61 62 | ts,.alists,.vectors.and.hash.tab |
| 0e60 | 6c 65 73 2e 22 0a 20 20 28 63 6f 6e 64 0a 20 20 20 28 28 61 6e 64 20 28 6c 69 73 74 70 20 66 6f | les."...(cond....((and.(listp.fo |
| 0e80 | 72 6d 29 20 28 63 64 72 20 66 6f 72 6d 29 20 28 61 74 6f 6d 20 28 63 64 72 20 66 6f 72 6d 29 29 | rm).(cdr.form).(atom.(cdr.form)) |
| 0ea0 | 29 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 65 72 20 28 63 6f 6e 73 20 28 66 75 6e 63 61 6c 6c 20 | ).(funcall.outer.(cons.(funcall. |
| 0ec0 | 69 6e 6e 65 72 20 28 63 61 72 20 66 6f 72 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | inner.(car.form))............... |
| 0ee0 | 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 | ................................ |
| 0f00 | 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 66 75 6e 63 | ...........................(func |
| 0f20 | 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 20 28 28 6c 69 | all.inner.(cdr.form)))))....((li |
| 0f40 | 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 61 70 63 61 72 | stp.form).(funcall.outer.(mapcar |
| 0f60 | 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 20 66 6f 72 6d | .inner.form)))....((vectorp.form |
| 0f80 | 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 65 63 74 6f 72 | ).(funcall.outer.(apply.#'vector |
| 0fa0 | 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 28 28 68 61 73 | .(mapcar.inner.form))))....((has |
| 0fc0 | 68 2d 74 61 62 6c 65 2d 70 20 66 6f 72 6d 29 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 65 72 20 28 | h-table-p.form).(funcall.outer.( |
| 0fe0 | 6d 61 70 2d 61 70 70 6c 79 20 28 6c 61 6d 62 64 61 20 28 6b 20 76 29 20 28 66 75 6e 63 61 6c 6c | map-apply.(lambda.(k.v).(funcall |
| 1000 | 20 69 6e 6e 65 72 20 28 63 6f 6e 73 20 6b 20 76 29 29 29 20 66 6f 72 6d 29 29 29 0a 20 20 20 28 | .inner.(cons.k.v))).form)))....( |
| 1020 | 74 20 28 66 75 6e 63 61 6c 6c 20 6f 75 74 65 72 20 66 6f 72 6d 29 29 29 29 0a 0a 28 64 65 66 75 | t.(funcall.outer.form))))..(defu |
| 1040 | 6e 20 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 20 28 66 20 66 6f 72 6d 29 0a 20 20 22 50 65 | n.treepy-postwalk.(f.form)..."Pe |
| 1060 | 72 66 6f 72 6d 20 61 20 64 65 70 74 68 2d 66 69 72 73 74 2c 20 70 6f 73 74 2d 6f 72 64 65 72 20 | rform.a.depth-first,.post-order. |
| 1080 | 74 72 61 76 65 72 73 61 6c 20 6f 66 20 46 20 61 70 70 6c 69 65 64 20 74 6f 20 46 4f 52 4d 2e 0a | traversal.of.F.applied.to.FORM.. |
| 10a0 | 43 61 6c 6c 20 46 20 6f 6e 20 65 61 63 68 20 73 75 62 2d 66 6f 72 6d 2c 20 75 73 65 20 46 27 73 | Call.F.on.each.sub-form,.use.F's |
| 10c0 | 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 69 6e 20 70 6c 61 63 65 20 6f 66 20 74 68 65 0a 6f 72 | .return.value.in.place.of.the.or |
| 10e0 | 69 67 69 6e 61 6c 2e 20 20 52 65 63 6f 67 6e 69 7a 65 20 63 6f 6e 73 2c 20 6c 69 73 74 73 2c 20 | iginal...Recognize.cons,.lists,. |
| 1100 | 61 6c 69 73 74 73 2c 20 76 65 63 74 6f 72 73 20 61 6e 64 0a 68 61 73 68 20 74 61 62 6c 65 73 2e | alists,.vectors.and.hash.tables. |
| 1120 | 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 69 61 6c 6c | "...(treepy-walk.(apply-partiall |
| 1140 | 79 20 23 27 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 20 66 29 20 66 20 66 6f 72 6d 29 29 0a | y.#'treepy-postwalk.f).f.form)). |
| 1160 | 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 20 28 66 20 66 6f 72 6d 29 0a | .(defun.treepy-prewalk.(f.form). |
| 1180 | 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 72 65 2d 6f 72 | .."Perform.a.depth-first,.pre-or |
| 11a0 | 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 74 6f 20 46 4f | der.traversal.of.F.applied.to.FO |
| 11c0 | 52 4d 2e 0a 4c 69 6b 65 20 60 74 72 65 65 70 79 2d 70 6f 73 74 77 61 6c 6b 27 2e 22 0a 20 20 28 | RM..Like.`treepy-postwalk'."...( |
| 11e0 | 74 72 65 65 70 79 2d 77 61 6c 6b 20 28 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 23 27 74 | treepy-walk.(apply-partially.#'t |
| 1200 | 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 20 66 29 20 23 27 69 64 65 6e 74 69 74 79 20 28 66 75 6e | reepy-prewalk.f).#'identity.(fun |
| 1220 | 63 61 6c 6c 20 66 20 66 6f 72 6d 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 6f | call.f.form)))..(defun.treepy-po |
| 1240 | 73 74 77 61 6c 6b 2d 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 | stwalk-demo.(form)..."Demonstrat |
| 1260 | 65 20 74 68 65 20 62 65 68 61 76 69 6f 72 20 6f 66 20 60 74 72 65 65 70 79 2d 70 6f 73 74 77 61 | e.the.behavior.of.`treepy-postwa |
| 1280 | 6c 6b 27 20 66 6f 72 20 46 4f 52 4d 2e 0a 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 65 | lk'.for.FORM..Return.a.list.of.e |
| 12a0 | 61 63 68 20 66 6f 72 6d 20 61 73 20 69 74 20 69 73 20 77 61 6c 6b 65 64 2e 22 0a 20 20 28 6c 65 | ach.form.as.it.is.walked."...(le |
| 12c0 | 74 20 28 28 77 61 6c 6b 20 6e 69 6c 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d 70 6f 73 74 77 | t.((walk.nil)).....(treepy-postw |
| 12e0 | 61 6c 6b 20 28 6c 61 6d 62 64 61 20 28 78 29 20 28 70 75 73 68 20 78 20 77 61 6c 6b 29 20 78 29 | alk.(lambda.(x).(push.x.walk).x) |
| 1300 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 29 0a 20 20 20 20 | ......................form)..... |
| 1320 | 28 72 65 76 65 72 73 65 20 77 61 6c 6b 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d | (reverse.walk)))..(defun.treepy- |
| 1340 | 70 72 65 77 61 6c 6b 2d 64 65 6d 6f 20 28 66 6f 72 6d 29 0a 20 20 22 44 65 6d 6f 6e 73 74 72 61 | prewalk-demo.(form)..."Demonstra |
| 1360 | 74 65 20 74 68 65 20 62 65 68 61 76 69 6f 72 20 6f 66 20 60 74 72 65 65 70 79 2d 70 72 65 77 61 | te.the.behavior.of.`treepy-prewa |
| 1380 | 6c 6b 27 20 66 6f 72 20 46 4f 52 4d 2e 0a 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 65 | lk'.for.FORM..Return.a.list.of.e |
| 13a0 | 61 63 68 20 66 6f 72 6d 20 61 73 20 69 74 20 69 73 20 77 61 6c 6b 65 64 2e 22 0a 20 20 28 6c 65 | ach.form.as.it.is.walked."...(le |
| 13c0 | 74 20 28 28 77 61 6c 6b 20 6e 69 6c 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d 70 72 65 77 61 | t.((walk.nil)).....(treepy-prewa |
| 13e0 | 6c 6b 20 28 6c 61 6d 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 | lk.(lambda.(x).(push.x.walk).x). |
| 1400 | 20 20 20 20 20 20 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 | ....................form).....(r |
| 1420 | 65 76 65 72 73 65 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 6f | everse.walk)))..(defun.treepy-po |
| 1440 | 73 74 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 70 74 69 6f | stwalk-replace.(smap.form.&optio |
| 1460 | 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 72 61 6e 73 | nal.testfn)..."Use.SMAP.to.trans |
| 1480 | 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 20 6f 70 65 | form.FORM.by.doing.replacing.ope |
| 14a0 | 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 20 69 6e 20 | rations..Recursively.replace.in. |
| 14c0 | 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 20 76 61 6c | FORM.keys.in.SMAP.with.their.val |
| 14e0 | 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 20 6c 65 61 | ues..Does.replacement.at.the.lea |
| 1500 | 76 65 73 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 6c 73 | ves.of.the.tree.first."...;;.Als |
| 1520 | 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 2d 6b | o.see.comment.in.`map-contains-k |
| 1540 | 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 64 76 | ey's.definition....(declare.(adv |
| 1560 | 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 61 70 | ertised-calling-convention.(smap |
| 1580 | 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 6f 73 74 77 61 | .key)."0.1.3"))...(treepy-postwa |
| 15a0 | 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 20 | lk.(lambda.(x).................. |
| 15c0 | 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 |
| 15e0 | 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)). |
| 1600 | 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 6d 61 70 2d | ...........................(map- |
| 1620 | 63 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 | contains-key.smap.x.testfn)).... |
| 1640 | 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 65 6c 74 20 73 | ......................(map-elt.s |
| 1660 | 6d 61 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 20 78 29 | map.x)........................x) |
| 1680 | 29 0a 20 20 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 28 64 65 | )....................form))..(de |
| 16a0 | 66 75 6e 20 74 72 65 65 70 79 2d 70 72 65 77 61 6c 6b 2d 72 65 70 6c 61 63 65 20 28 73 6d 61 70 | fun.treepy-prewalk-replace.(smap |
| 16c0 | 20 66 6f 72 6d 20 26 6f 70 74 69 6f 6e 61 6c 20 74 65 73 74 66 6e 29 0a 20 20 22 55 73 65 20 53 | .form.&optional.testfn)..."Use.S |
| 16e0 | 4d 41 50 20 74 6f 20 74 72 61 6e 73 66 6f 72 6d 20 46 4f 52 4d 20 62 79 20 64 6f 69 6e 67 20 72 | MAP.to.transform.FORM.by.doing.r |
| 1700 | 65 70 6c 61 63 69 6e 67 20 6f 70 65 72 61 74 69 6f 6e 73 2e 0a 52 65 63 75 72 73 69 76 65 6c 79 | eplacing.operations..Recursively |
| 1720 | 20 72 65 70 6c 61 63 65 20 69 6e 20 46 4f 52 4d 20 6b 65 79 73 20 69 6e 20 53 4d 41 50 20 77 69 | .replace.in.FORM.keys.in.SMAP.wi |
| 1740 | 74 68 20 74 68 65 69 72 20 76 61 6c 75 65 73 2e 0a 44 6f 65 73 20 72 65 70 6c 61 63 65 6d 65 6e | th.their.values..Does.replacemen |
| 1760 | 74 20 61 74 20 74 68 65 20 72 6f 6f 74 20 6f 66 20 74 68 65 20 74 72 65 65 20 66 69 72 73 74 2e | t.at.the.root.of.the.tree.first. |
| 1780 | 22 0a 20 20 3b 3b 20 41 6c 73 6f 20 73 65 65 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 60 6d 61 70 2d | "...;;.Also.see.comment.in.`map- |
| 17a0 | 63 6f 6e 74 61 69 6e 73 2d 6b 65 79 27 73 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 20 20 28 64 65 | contains-key's.definition....(de |
| 17c0 | 63 6c 61 72 65 20 28 61 64 76 65 72 74 69 73 65 64 2d 63 61 6c 6c 69 6e 67 2d 63 6f 6e 76 65 6e | clare.(advertised-calling-conven |
| 17e0 | 74 69 6f 6e 20 28 73 6d 61 70 20 6b 65 79 29 20 22 30 2e 31 2e 33 22 29 29 0a 20 20 28 74 72 65 | tion.(smap.key)."0.1.3"))...(tre |
| 1800 | 65 70 79 2d 70 72 65 77 61 6c 6b 20 28 6c 61 6d 62 64 61 20 28 78 29 0a 20 20 20 20 20 20 20 20 | epy-prewalk.(lambda.(x)......... |
| 1820 | 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 77 69 74 68 2d 73 75 70 70 72 65 73 73 65 64 | ............(if.(with-suppressed |
| 1840 | 2d 77 61 72 6e 69 6e 67 73 20 28 28 63 61 6c 6c 61 72 67 73 20 6d 61 70 2d 63 6f 6e 74 61 69 6e | -warnings.((callargs.map-contain |
| 1860 | 73 2d 6b 65 79 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 | s-key))......................... |
| 1880 | 20 20 28 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 2d 6b 65 79 20 73 6d 61 70 20 78 20 74 65 73 74 66 | ..(map-contains-key.smap.x.testf |
| 18a0 | 6e 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 28 6d 61 70 | n)).........................(map |
| 18c0 | 2d 65 6c 74 20 73 6d 61 70 20 78 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -elt.smap.x).................... |
| 18e0 | 20 20 20 78 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 6d 29 29 0a | ...x))...................form)). |
| 1900 | 0a 0a 3b 3b 3b 20 5a 69 70 70 65 72 20 28 69 74 65 72 61 74 69 76 65 20 74 72 65 65 20 74 72 61 | ..;;;.Zipper.(iterative.tree.tra |
| 1920 | 76 65 72 73 61 6c 29 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | versal).;;;;;;;;;;;;;;;;;;;;;;;; |
| 1940 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 1960 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 63 | ;;;;;;;;;;;;;;..(defun.treepy--c |
| 1980 | 6f 6e 74 65 78 74 20 28 6c 6f 63 20 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 79 29 0a 20 20 22 52 65 | ontext.(loc.&optional.key)..."Re |
| 19a0 | 74 75 72 6e 20 63 6f 6e 74 65 78 74 20 66 6f 72 20 74 68 69 73 20 4c 4f 43 2e 0a 49 66 20 4b 45 | turn.context.for.this.LOC..If.KE |
| 19c0 | 59 20 69 73 20 67 69 76 65 6e 2c 20 6f 6e 6c 79 20 72 65 74 75 72 6e 20 74 68 69 73 20 6b 65 79 | Y.is.given,.only.return.this.key |
| 19e0 | 27 73 20 76 61 6c 75 65 20 69 6e 20 63 6f 6e 74 65 78 74 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 | 's.value.in.context."...(let.((c |
| 1a00 | 6f 6e 74 65 78 74 20 28 63 64 72 20 28 63 61 72 20 6c 6f 63 29 29 29 29 0a 20 20 20 20 28 69 66 | ontext.(cdr.(car.loc)))).....(if |
| 1a20 | 20 28 61 6e 64 20 63 6f 6e 74 65 78 74 20 6b 65 79 29 0a 20 20 20 20 20 20 20 20 28 6d 61 70 2d | .(and.context.key).........(map- |
| 1a40 | 65 6c 74 20 63 6f 6e 74 65 78 74 20 6b 65 79 29 0a 20 20 20 20 20 20 63 6f 6e 74 65 78 74 29 29 | elt.context.key).......context)) |
| 1a60 | 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 2d 61 73 73 6f 63 2d | )..(defun.treepy--context-assoc- |
| 1a80 | 31 20 28 63 6f 6e 74 65 78 74 20 6b 20 76 29 0a 20 20 22 41 73 73 6f 63 20 69 6e 20 43 4f 4e 54 | 1.(context.k.v)..."Assoc.in.CONT |
| 1aa0 | 45 58 54 20 61 20 6b 65 79 20 4b 20 77 69 74 68 20 61 20 76 61 6c 75 65 20 56 2e 22 0a 20 20 28 | EXT.a.key.K.with.a.value.V."...( |
| 1ac0 | 69 66 20 28 6d 61 70 2d 63 6f 6e 74 61 69 6e 73 2d 6b 65 79 20 63 6f 6e 74 65 78 74 20 6b 29 0a | if.(map-contains-key.context.k). |
| 1ae0 | 20 20 20 20 20 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 65 6e 74 72 79 29 0a 20 20 | ......(mapcar.(lambda.(entry)... |
| 1b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 65 71 75 61 6c 20 28 63 61 72 20 65 6e | ..............(if.(equal.(car.en |
| 1b20 | 74 72 79 29 20 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e | try).k).....................(con |
| 1b40 | 73 20 6b 20 76 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 74 72 79 29 29 | s.k.v)...................entry)) |
| 1b60 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6e 74 65 78 74 29 0a 20 20 20 20 28 63 6f 6e | ...............context).....(con |
| 1b80 | 73 20 28 63 6f 6e 73 20 6b 20 76 29 20 63 6f 6e 74 65 78 74 29 29 29 0a 0a 28 64 65 66 75 6e 20 | s.(cons.k.v).context)))..(defun. |
| 1ba0 | 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 28 63 6f 6e 74 65 78 74 20 26 | treepy--context-assoc.(context.& |
| 1bc0 | 72 65 73 74 20 6b 76 73 29 0a 20 20 22 49 6d 6d 75 74 61 62 6c 65 20 6d 61 70 20 61 73 73 6f 63 | rest.kvs)..."Immutable.map.assoc |
| 1be0 | 69 61 74 69 6f 6e 20 69 6e 20 43 4f 4e 54 45 58 54 20 75 73 69 6e 67 20 4b 56 53 2e 22 0a 20 20 | iation.in.CONTEXT.using.KVS."... |
| 1c00 | 28 73 65 71 2d 72 65 64 75 63 65 20 28 6c 61 6d 62 64 61 20 28 63 6f 6e 74 65 78 74 20 6b 76 29 | (seq-reduce.(lambda.(context.kv) |
| 1c20 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 2d 6c 65 74 20 5b 6b 20 76 5d 20 | .................(seq-let.[k.v]. |
| 1c40 | 6b 76 0a 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 | kv...................(treepy--co |
| 1c60 | 6e 74 65 78 74 2d 61 73 73 6f 63 2d 31 20 63 6f 6e 74 65 78 74 20 6b 20 76 29 29 29 0a 20 20 20 | ntext-assoc-1.context.k.v))).... |
| 1c80 | 20 20 20 20 20 20 20 20 20 20 20 28 73 65 71 2d 70 61 72 74 69 74 69 6f 6e 20 6b 76 73 20 32 29 | ...........(seq-partition.kvs.2) |
| 1ca0 | 20 63 6f 6e 74 65 78 74 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 | .context))..(defun.treepy--meta. |
| 1cc0 | 28 6c 6f 63 20 26 6f 70 74 69 6f 6e 61 6c 20 6b 65 79 29 0a 20 20 22 52 65 74 75 72 6e 20 6d 65 | (loc.&optional.key)..."Return.me |
| 1ce0 | 74 61 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68 69 73 20 4c 4f 43 2e 0a 49 66 20 | ta.information.for.this.LOC..If. |
| 1d00 | 4b 45 59 20 69 73 20 67 69 76 65 6e 2c 20 6f 6e 6c 79 20 72 65 74 75 72 6e 20 74 68 69 73 20 6b | KEY.is.given,.only.return.this.k |
| 1d20 | 65 79 27 73 20 76 61 6c 75 65 20 69 6e 20 6d 65 74 61 0a 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 | ey's.value.in.meta.information." |
| 1d40 | 0a 20 20 28 6c 65 74 20 28 28 6d 65 74 61 20 28 63 64 72 20 6c 6f 63 29 29 29 0a 20 20 20 20 28 | ...(let.((meta.(cdr.loc))).....( |
| 1d60 | 69 66 20 6b 65 79 0a 20 20 20 20 20 20 20 20 28 6d 61 70 2d 65 6c 74 20 6d 65 74 61 20 6b 65 79 | if.key.........(map-elt.meta.key |
| 1d80 | 29 0a 20 20 20 20 20 20 6d 65 74 61 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d | ).......meta)))..(defun.treepy-- |
| 1da0 | 77 69 74 68 2d 6d 65 74 61 20 28 6f 62 6a 20 6d 65 74 61 29 0a 20 20 22 42 69 6e 64 20 4f 42 4a | with-meta.(obj.meta)..."Bind.OBJ |
| 1dc0 | 20 77 69 74 68 20 73 6f 6d 65 20 4d 45 54 41 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 22 0a 20 20 | .with.some.META.information."... |
| 1de0 | 28 63 6f 6e 73 20 6f 62 6a 20 6d 65 74 61 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d | (cons.obj.meta))..(defun.treepy- |
| 1e00 | 2d 6a 6f 69 6e 2d 63 68 69 6c 64 72 65 6e 20 28 6c 65 66 74 2d 63 68 69 6c 64 72 65 6e 20 72 69 | -join-children.(left-children.ri |
| 1e20 | 67 68 74 2d 63 68 69 6c 64 72 65 6e 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6a 6f 69 6e 69 6e | ght-children)..."Return.a.joinin |
| 1e40 | 67 20 6f 66 20 4c 45 46 54 2d 43 48 49 4c 44 52 45 4e 20 61 6e 64 20 52 49 47 48 54 2d 43 48 49 | g.of.LEFT-CHILDREN.and.RIGHT-CHI |
| 1e60 | 4c 44 52 45 4e 2e 0a 52 65 76 65 72 73 65 73 20 4c 45 46 54 2d 43 48 49 4c 44 52 45 4e 20 73 6f | LDREN..Reverses.LEFT-CHILDREN.so |
| 1e80 | 20 74 68 61 74 20 74 68 65 79 20 61 72 65 20 63 6f 72 72 65 63 74 6c 79 20 6f 72 64 65 72 65 64 | .that.they.are.correctly.ordered |
| 1ea0 | 20 61 73 20 69 6e 0a 74 68 65 20 74 72 65 65 2e 22 0a 20 20 28 61 70 70 65 6e 64 20 28 72 65 76 | .as.in.the.tree."...(append.(rev |
| 1ec0 | 65 72 73 65 20 6c 65 66 74 2d 63 68 69 6c 64 72 65 6e 29 20 72 69 67 68 74 2d 63 68 69 6c 64 72 | erse.left-children).right-childr |
| 1ee0 | 65 6e 29 29 0a 0a 28 64 65 66 6d 61 63 72 6f 20 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 | en))..(defmacro.treepy--with-loc |
| 1f00 | 20 28 6c 6f 63 20 76 61 72 73 20 26 72 65 73 74 20 62 6f 64 79 29 0a 20 20 22 43 72 65 61 74 65 | .(loc.vars.&rest.body)..."Create |
| 1f20 | 20 61 20 6c 65 78 69 63 61 6c 20 63 6f 6e 74 65 78 74 20 75 73 69 6e 67 20 4c 4f 43 20 56 41 52 | .a.lexical.context.using.LOC.VAR |
| 1f40 | 53 2e 0a 45 78 65 63 75 74 65 20 42 4f 44 59 20 69 6e 20 74 68 69 73 20 63 6f 6e 74 65 78 74 2e | S..Execute.BODY.in.this.context. |
| 1f60 | 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 28 | "...(declare.(indent.defun))...( |
| 1f80 | 6c 65 74 20 28 28 6c 65 78 2d 63 74 78 20 28 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 76 | let.((lex-ctx.(mapcar.(lambda.(v |
| 1fa0 | 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 28 63 6c | )............................(cl |
| 1fc0 | 2d 63 61 73 65 20 76 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 | -case.v......................... |
| 1fe0 | 20 20 20 20 20 28 6e 6f 64 65 20 20 20 20 60 28 6e 6f 64 65 20 28 74 72 65 65 70 79 2d 6e 6f 64 | .....(node....`(node.(treepy-nod |
| 2000 | 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 20 20 20 | e.,loc)))....................... |
| 2020 | 20 20 20 20 20 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 | .......(context.`(context.(treep |
| 2040 | 79 2d 2d 63 6f 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 | y--context.,loc))).............. |
| 2060 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 20 20 20 20 20 20 20 60 28 2c 76 20 28 74 | ................(t.......`(,v.(t |
| 2080 | 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 2c 6c 6f 63 20 28 71 75 6f 74 65 20 2c 28 69 6e 74 | reepy--context.,loc.(quote.,(int |
| 20a0 | 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 76 29 29 | ern.(concat.":".(symbol-name.v)) |
| 20c0 | 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 20 20 20 20 20 20 20 | )))))))......................... |
| 20e0 | 20 76 61 72 73 29 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 | .vars))).....`(let*.(,@lex-ctx). |
| 2100 | 2c 40 62 6f 64 79 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 | ,@body)))..;;;;.Construction..(d |
| 2120 | 65 66 75 6e 20 74 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 | efun.treepy-zipper.(branchp.chil |
| 2140 | 64 72 65 6e 20 6d 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 | dren.make-node.root)..."Create.a |
| 2160 | 20 6e 65 77 20 7a 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 | .new.zipper.structure...BRANCHP. |
| 2180 | 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 20 61 20 6e 6f 64 65 | is.a.function.that,.given.a.node |
| 21a0 | 2c 20 72 65 74 75 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 | ,.returns.t.if.it.can.have.child |
| 21c0 | 72 65 6e 2c 20 65 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 | ren,.even.if.it.currently.doesn' |
| 21e0 | 74 2e 0a 0a 43 48 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 | t...CHILDREN.is.a.function.that, |
| 2200 | 20 67 69 76 65 6e 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 | .given.a.branch.node,.returns.a. |
| 2220 | 73 65 71 0a 6f 66 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 | seq.of.its.children...MAKE-NODE. |
| 2240 | 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 20 61 6e 20 65 78 69 | is.a.function.that,.given.an.exi |
| 2260 | 73 74 69 6e 67 20 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 | sting.node.and.a.seq.of.children |
| 2280 | 2c 20 72 65 74 75 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 | ,.returns.a.new.branch.node.with |
| 22a0 | 20 74 68 65 20 73 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 | .the.supplied.children...ROOT.is |
| 22c0 | 20 74 68 65 20 72 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 | .the.root.node."...(treepy--with |
| 22e0 | 2d 6d 65 74 61 0a 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 | -meta....(cons.root.nil)....`((: |
| 2300 | 62 72 61 6e 63 68 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 | branchp...,branchp).(:children.. |
| 2320 | 20 2c 63 68 69 6c 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 | .,children).(:make-node...,make- |
| 2340 | 6e 6f 64 65 29 29 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 | node))))..(defun.treepy-list-zip |
| 2360 | 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 |
| 2380 | 65 73 74 65 64 20 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 | ested.lists,.given.a.ROOT.list." |
| 23a0 | 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 28 5f 20 63 | ...(let.((make-node.(lambda.(_.c |
| 23c0 | 68 69 6c 64 72 65 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 | hildren).children))).....(treepy |
| 23e0 | 2d 7a 69 70 70 65 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 | -zipper.#'listp.#'identity.make- |
| 2400 | 6e 6f 64 65 20 72 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 | node.root)))..(defun.treepy-vect |
| 2420 | 6f 72 2d 7a 69 70 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 | or-zip.(root)..."Return.a.zipper |
| 2440 | 20 66 6f 72 20 6e 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 | .for.nested.vectors,.given.a.ROO |
| 2460 | 54 20 76 65 63 74 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 | T.vector."...(let.((make-node.(l |
| 2480 | 61 6d 62 64 61 20 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 | ambda.(_.children).(apply.#'vect |
| 24a0 | 6f 72 20 63 68 69 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 | or.children))).........(children |
| 24c0 | 20 28 6c 61 6d 62 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 | .(lambda.(cs).(seq-into.cs.'list |
| 24e0 | 29 29 29 29 0a 20 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 | )))).....(treepy-zipper.#'vector |
| 2500 | 70 20 63 68 69 6c 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 | p.children.make-node.root)))..;; |
| 2520 | 3b 3b 20 43 6f 6e 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 | ;;.Context..(defun.treepy-node.( |
| 2540 | 6c 6f 63 29 0a 20 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 | loc)..."Return.the.node.at.LOC." |
| 2560 | 0a 20 20 28 63 61 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 | ...(caar.loc))..(defun.treepy-br |
| 2580 | 61 6e 63 68 2d 70 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 | anch-p.(loc)..."Return.t.if.the. |
| 25a0 | 6e 6f 64 65 20 61 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 | node.at.LOC.is.a.branch."...(fun |
| 25c0 | 63 61 6c 6c 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 20 27 3a 62 72 61 6e 63 68 70 | call.(treepy--meta.loc.':branchp |
| 25e0 | 29 20 28 74 72 65 65 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 | ).(treepy-node.loc)))..(defun.tr |
| 2600 | 65 65 70 79 2d 63 68 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 | eepy-children.(loc)..."Return.a. |
| 2620 | 63 68 69 6c 64 72 65 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 | children.list.of.the.node.at.LOC |
| 2640 | 2c 20 77 68 69 63 68 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 | ,.which.must.be.a.branch."...(if |
| 2660 | 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 20 20 28 66 75 | .(treepy-branch-p.loc).......(fu |
| 2680 | 6e 63 61 6c 6c 20 28 74 72 65 65 70 79 2d 2d 6d 65 74 61 20 6c 6f 63 20 27 3a 63 68 69 6c 64 72 | ncall.(treepy--meta.loc.':childr |
| 26a0 | 65 6e 29 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 29 0a 20 20 20 20 28 65 72 72 6f | en).(treepy-node.loc)).....(erro |
| 26c0 | 72 20 22 43 61 6c 6c 65 64 20 63 68 69 6c 64 72 65 6e 20 6f 6e 20 61 20 6c 65 61 66 20 6e 6f 64 | r."Called.children.on.a.leaf.nod |
| 26e0 | 65 22 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 65 20 28 | e")))..(defun.treepy-make-node.( |
| 2700 | 6c 6f 63 20 6e 6f 64 65 20 63 68 69 6c 64 72 65 6e 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6e | loc.node.children)..."Return.a.n |
| 2720 | 65 77 20 62 72 61 6e 63 68 20 6e 6f 64 65 2e 0a 47 69 76 65 6e 20 61 6e 20 65 78 69 73 74 69 6e | ew.branch.node..Given.an.existin |
| 2740 | 67 20 4c 4f 43 2c 20 4e 4f 44 45 20 61 6e 64 20 6e 65 77 20 43 48 49 4c 44 52 45 4e 2c 20 63 72 | g.LOC,.NODE.and.new.CHILDREN,.cr |
| 2760 | 65 61 74 65 73 20 61 20 6e 65 77 20 4c 4f 43 0a 77 69 74 68 20 74 68 65 6d 2e 20 20 54 68 65 20 | eates.a.new.LOC.with.them...The. |
| 2780 | 4c 4f 43 20 69 73 20 6f 6e 6c 79 20 75 73 65 64 20 74 6f 20 73 75 70 70 6c 79 20 74 68 65 20 63 | LOC.is.only.used.to.supply.the.c |
| 27a0 | 6f 6e 73 74 72 75 63 74 6f 72 2e 22 0a 20 20 28 66 75 6e 63 61 6c 6c 20 28 74 72 65 65 70 79 2d | onstructor."...(funcall.(treepy- |
| 27c0 | 2d 6d 65 74 61 20 6c 6f 63 20 27 3a 6d 61 6b 65 2d 6e 6f 64 65 29 20 6e 6f 64 65 20 63 68 69 6c | -meta.loc.':make-node).node.chil |
| 27e0 | 64 72 65 6e 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 61 74 68 20 28 6c 6f 63 29 | dren))..(defun.treepy-path.(loc) |
| 2800 | 0a 20 20 22 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 6e 6f 64 65 73 20 6c 65 61 64 69 | ..."Return.a.list.of.nodes.leadi |
| 2820 | 6e 67 20 74 6f 20 74 68 65 20 67 69 76 65 6e 20 4c 4f 43 2e 22 0a 20 20 28 72 65 76 65 72 73 65 | ng.to.the.given.LOC."...(reverse |
| 2840 | 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 20 27 3a 70 6e 6f 64 65 73 29 29 | .(treepy--context.loc.':pnodes)) |
| 2860 | 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6c 65 66 74 73 20 28 6c 6f 63 29 0a 20 20 22 | )..(defun.treepy-lefts.(loc)..." |
| 2880 | 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 74 68 65 20 6c 65 66 74 20 73 69 62 6c 69 6e | Return.a.list.of.the.left.siblin |
| 28a0 | 67 73 20 6f 66 20 74 68 69 73 20 4c 4f 43 2e 22 0a 20 20 28 72 65 76 65 72 73 65 20 28 74 72 65 | gs.of.this.LOC."...(reverse.(tre |
| 28c0 | 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 20 27 3a 6c 29 29 29 0a 0a 28 64 65 66 75 6e 20 | epy--context.loc.':l)))..(defun. |
| 28e0 | 74 72 65 65 70 79 2d 72 69 67 68 74 73 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 61 20 | treepy-rights.(loc)..."Return.a. |
| 2900 | 6c 69 73 74 20 6f 66 20 74 68 65 20 72 69 67 68 74 20 73 69 62 6c 69 6e 67 73 20 6f 66 20 74 68 | list.of.the.right.siblings.of.th |
| 2920 | 69 73 20 4c 4f 43 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 20 | is.LOC."...(treepy--context.loc. |
| 2940 | 27 3a 72 29 29 0a 0a 3b 3b 3b 3b 20 4e 61 76 69 67 61 74 69 6f 6e 0a 0a 28 64 65 66 75 6e 20 74 | ':r))..;;;;.Navigation..(defun.t |
| 2960 | 72 65 65 70 79 2d 64 6f 77 6e 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c | reepy-down.(loc)..."Return.the.l |
| 2980 | 6f 63 20 6f 66 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 65 20 | oc.of.the.leftmost.child.of.the. |
| 29a0 | 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 2e 0a 6e 69 6c 20 69 66 20 6e 6f 20 63 68 69 6c | node.at.this.LOC..nil.if.no.chil |
| 29c0 | 64 72 65 6e 2e 22 0a 20 20 28 77 68 65 6e 20 28 74 72 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 | dren."...(when.(treepy-branch-p. |
| 29e0 | 6c 6f 63 29 0a 20 20 20 20 28 6c 65 74 20 28 28 63 68 69 6c 64 72 65 6e 20 28 74 72 65 65 70 79 | loc).....(let.((children.(treepy |
| 2a00 | 2d 63 68 69 6c 64 72 65 6e 20 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d | -children.loc))).......(treepy-- |
| 2a20 | 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 70 6e 6f 64 65 | with-loc.loc.(node.context.pnode |
| 2a40 | 73 29 0a 20 20 20 20 20 20 20 20 28 73 65 71 2d 6c 65 74 20 5b 63 20 26 72 65 73 74 20 63 73 5d | s).........(seq-let.[c.&rest.cs] |
| 2a60 | 20 63 68 69 6c 64 72 65 6e 0a 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 63 68 69 6c 64 72 | .children...........(when.childr |
| 2a80 | 65 6e 0a 20 20 20 20 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 | en.............(treepy--with-met |
| 2aa0 | 61 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 60 28 2c 63 20 2e 20 28 28 3a 6c 20 2e 20 2c 6e 69 | a..............`(,c...((:l...,ni |
| 2ac0 | 6c 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 6e 6f 64 65 73 | l)......................(:pnodes |
| 2ae0 | 20 2e 20 2c 28 69 66 20 63 6f 6e 74 65 78 74 20 28 63 6f 6e 73 20 6e 6f 64 65 20 70 6e 6f 64 65 | ...,(if.context.(cons.node.pnode |
| 2b00 | 73 29 20 28 6c 69 73 74 20 6e 6f 64 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | s).(list.node)))................ |
| 2b20 | 20 20 20 20 20 20 28 3a 70 70 61 74 68 20 2e 20 2c 63 6f 6e 74 65 78 74 29 0a 20 20 20 20 20 20 | ......(:ppath...,context)....... |
| 2b40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3a 72 20 2e 20 2c 63 73 29 29 29 0a 20 20 20 20 | ...............(:r...,cs)))..... |
| 2b60 | 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 29 | .........(treepy--meta.loc)))))) |
| 2b80 | 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 75 70 20 28 6c 6f 63 29 0a 20 20 22 52 65 | ))..(defun.treepy-up.(loc)..."Re |
| 2ba0 | 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 6f 66 20 74 68 65 20 70 61 72 65 6e 74 20 6f 66 20 74 68 | turn.the.loc.of.the.parent.of.th |
| 2bc0 | 65 20 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 2e 0a 6e 69 6c 20 69 66 20 61 74 20 74 68 | e.node.at.this.LOC..nil.if.at.th |
| 2be0 | 65 20 74 6f 70 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 | e.top."...(treepy--with-loc.loc. |
| 2c00 | 28 6e 6f 64 65 20 70 6e 6f 64 65 73 20 70 70 61 74 68 20 63 68 61 6e 67 65 64 3f 20 6c 20 72 29 | (node.pnodes.ppath.changed?.l.r) |
| 2c20 | 0a 20 20 20 20 28 77 68 65 6e 20 70 6e 6f 64 65 73 0a 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 | .....(when.pnodes.......(let.((p |
| 2c40 | 6e 6f 64 65 20 28 63 61 72 20 70 6e 6f 64 65 73 29 29 29 0a 20 20 20 20 20 20 20 20 28 74 72 65 | node.(car.pnodes))).........(tre |
| 2c60 | 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 69 66 20 63 68 61 6e | epy--with-meta..........(if.chan |
| 2c80 | 67 65 64 3f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 74 72 65 65 70 79 2d | ged?..............(cons.(treepy- |
| 2ca0 | 6d 61 6b 65 2d 6e 6f 64 65 20 6c 6f 63 20 70 6e 6f 64 65 20 28 74 72 65 65 70 79 2d 2d 6a 6f 69 | make-node.loc.pnode.(treepy--joi |
| 2cc0 | 6e 2d 63 68 69 6c 64 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 | n-children.l.(cons.node.r))).... |
| 2ce0 | 20 20 20 20 20 20 20 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 | ................(and.ppath.(tree |
| 2d00 | 70 79 2d 2d 63 6f 6e 74 65 78 74 2d 61 73 73 6f 63 20 70 70 61 74 68 20 27 3a 63 68 61 6e 67 65 | py--context-assoc.ppath.':change |
| 2d20 | 64 3f 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 70 6e 6f 64 65 20 70 | d?.t)))............(cons.pnode.p |
| 2d40 | 70 61 74 68 29 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 | path))..........(treepy--meta.lo |
| 2d60 | 63 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 6f 6f 74 20 28 6c 6f 63 | c))))))..(defun.treepy-root.(loc |
| 2d80 | 29 0a 20 20 22 5a 69 70 20 66 72 6f 6d 20 4c 4f 43 20 61 6c 6c 20 74 68 65 20 77 61 79 20 75 70 | )..."Zip.from.LOC.all.the.way.up |
| 2da0 | 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65 20 72 6f 6f 74 20 6e 6f 64 65 2e 0a 52 65 66 6c 65 | .and.return.the.root.node..Refle |
| 2dc0 | 63 74 20 61 6e 79 20 61 6c 74 65 72 61 74 69 6f 6e 73 20 74 6f 20 74 68 65 20 74 72 65 65 2e 22 | ct.any.alterations.to.the.tree." |
| 2de0 | 0a 20 20 28 69 66 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 | ...(if.(equal.:end.(treepy--cont |
| 2e00 | 65 78 74 20 6c 6f 63 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 | ext.loc)).......(treepy-node.loc |
| 2e20 | 29 0a 20 20 20 20 28 6c 65 74 20 28 28 70 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c | ).....(let.((p.loc)).......(whil |
| 2e40 | 65 20 28 73 65 74 71 20 70 20 28 74 72 65 65 70 79 2d 75 70 20 70 29 29 0a 20 20 20 20 20 20 20 | e.(setq.p.(treepy-up.p))........ |
| 2e60 | 20 28 73 65 74 71 20 6c 6f 63 20 70 29 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 6e 6f 64 | .(setq.loc.p)).......(treepy-nod |
| 2e80 | 65 20 6c 6f 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 69 67 68 74 20 28 | e.loc))))..(defun.treepy-right.( |
| 2ea0 | 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 72 69 | loc)..."Return.the.loc.of.the.ri |
| 2ec0 | 67 68 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 | ght.sibling.of.the.node.at.this. |
| 2ee0 | 4c 4f 43 2e 0a 6e 69 6c 20 69 66 20 74 68 65 72 65 27 73 20 6e 6f 20 6d 6f 72 65 20 72 69 67 68 | LOC..nil.if.there's.no.more.righ |
| 2f00 | 74 20 73 69 62 6c 69 6e 67 73 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 68 2d 6c 6f 63 | t.siblings."...(treepy--with-loc |
| 2f20 | 20 6c 6f 63 20 28 6e 6f 64 65 20 63 6f 6e 74 65 78 74 20 6c 20 72 29 0a 20 20 20 20 28 6c 65 74 | .loc.(node.context.l.r).....(let |
| 2f40 | 20 28 28 72 20 28 69 66 20 28 6c 69 73 74 70 20 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .((r.(if.(listp.r).............. |
| 2f60 | 20 20 20 20 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 49 66 20 60 72 27 20 69 | ....r................;;.If.`r'.i |
| 2f80 | 73 20 6e 6f 74 20 61 20 6c 69 73 74 20 28 6f 72 20 6e 69 6c 29 2c 20 74 68 65 6e 20 77 65 27 72 | s.not.a.list.(or.nil),.then.we'r |
| 2fa0 | 65 20 64 65 61 6c 69 6e 67 20 77 69 74 68 20 61 20 6e 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 | e.dealing.with.a.non............ |
| 2fc0 | 20 20 20 20 3b 3b 20 6e 69 6c 20 63 64 72 20 65 6e 64 69 6e 67 20 6c 69 73 74 2e 0a 20 20 20 20 | ....;;.nil.cdr.ending.list...... |
| 2fe0 | 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 72 20 6e 69 6c 29 29 29 29 0a 20 20 20 20 20 | ...........(cons.r.nil))))...... |
| 3000 | 20 28 73 65 71 2d 6c 65 74 20 5b 63 72 20 26 72 65 73 74 20 72 6e 65 78 74 5d 20 72 0a 20 20 20 | .(seq-let.[cr.&rest.rnext].r.... |
| 3020 | 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 63 6f 6e 74 65 78 74 20 72 29 0a 20 20 20 20 20 | .....(when.(and.context.r)...... |
| 3040 | 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 20 20 | .....(treepy--with-meta......... |
| 3060 | 20 20 20 28 63 6f 6e 73 20 63 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 72 | ...(cons.cr..................(tr |
| 3080 | 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..... |
| 30a0 | 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 | ................................ |
| 30c0 | 20 20 20 20 27 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 20 20 | ....':l.(cons.node.l)........... |
| 30e0 | 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 27 3a | ..............................': |
| 3100 | 72 20 72 6e 65 78 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 | r.rnext))............(treepy--me |
| 3120 | 74 61 20 6c 6f 63 29 29 29 29 29 29 29 0a 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 69 | ta.loc)))))))...(defun.treepy-ri |
| 3140 | 67 68 74 6d 6f 73 74 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 20 | ghtmost.(loc)..."Return.the.loc. |
| 3160 | 6f 66 20 74 68 65 20 72 69 67 68 74 6d 6f 73 74 20 73 69 62 6c 69 6e 67 20 6f 66 20 74 68 65 20 | of.the.rightmost.sibling.of.the. |
| 3180 | 6e 6f 64 65 20 61 74 20 74 68 69 73 20 4c 4f 43 2e 0a 49 66 20 4c 4f 43 20 69 73 20 61 6c 72 65 | node.at.this.LOC..If.LOC.is.alre |
| 31a0 | 61 64 79 20 74 68 65 20 72 69 67 68 74 6d 6f 73 74 20 73 69 62 6c 69 6e 67 2c 20 72 65 74 75 72 | ady.the.rightmost.sibling,.retur |
| 31c0 | 6e 20 73 65 6c 66 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 | n.self."...(treepy--with-loc.loc |
| 31e0 | 20 28 6e 6f 64 65 20 63 6f 6e 74 65 78 74 20 6c 20 72 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 | .(node.context.l.r).....(if.(and |
| 3200 | 20 63 6f 6e 74 65 78 74 20 72 29 0a 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 77 69 74 | .context.r).........(treepy--wit |
| 3220 | 68 2d 6d 65 74 61 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 63 61 72 20 28 6c 61 73 74 | h-meta..........(cons.(car.(last |
| 3240 | 20 72 29 29 0a 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 | .r))................(treepy--con |
| 3260 | 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 20 | text-assoc.context.............. |
| 3280 | 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 3a 6c 20 28 74 72 | .........................':l.(tr |
| 32a0 | 65 65 70 79 2d 2d 6a 6f 69 6e 2d 63 68 69 6c 64 72 65 6e 20 6c 20 28 63 6f 6e 73 20 6e 6f 64 65 | eepy--join-children.l.(cons.node |
| 32c0 | 20 28 62 75 74 6c 61 73 74 20 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(butlast.r))).................. |
| 32e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3a 72 20 6e 69 6c 29 29 0a 20 | .....................':r.nil)).. |
| 3300 | 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))..... |
| 3320 | 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 |
| 3340 | 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 |
| 3360 | 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 |
| 3380 | 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." |
| 33a0 | 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 |
| 33c0 | 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 |
| 33e0 | 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 |
| 3400 | 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 |
| 3420 | 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............ |
| 3440 | 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 |
| 3460 | 78 74 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 | xt.............................. |
| 3480 | 20 20 20 20 20 20 20 20 20 27 3a 6c 20 6c 6e 65 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | .........':l.lnext.............. |
| 34a0 | 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 3a 72 20 28 63 6f | .........................':r.(co |
| 34c0 | 6e 73 20 6e 6f 64 65 20 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d | ns.node.r)))..........(treepy--m |
| 34e0 | 65 74 61 20 6c 6f 63 29 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6c 65 66 | eta.loc))))))..(defun.treepy-lef |
| 3500 | 74 6d 6f 73 74 20 28 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 | tmost.(loc)..."Return.the.loc.of |
| 3520 | 20 74 68 65 20 6c 65 66 74 6d 6f 73 74 20 73 69 62 6c 69 6e 67 20 6f 66 20 74 68 65 20 6e 6f 64 | .the.leftmost.sibling.of.the.nod |
| 3540 | 65 20 61 74 20 74 68 69 73 20 4c 4f 43 2e 0a 49 66 20 4c 4f 43 20 69 73 20 61 6c 72 65 61 64 79 | e.at.this.LOC..If.LOC.is.already |
| 3560 | 20 74 68 65 20 6c 65 66 74 6d 6f 73 74 20 73 69 62 6c 69 6e 67 2c 20 72 65 74 75 72 6e 20 73 65 | .the.leftmost.sibling,.return.se |
| 3580 | 6c 66 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 | lf."...(treepy--with-loc.loc.(no |
| 35a0 | 64 65 20 63 6f 6e 74 65 78 74 20 6c 20 72 29 0a 20 20 20 20 28 69 66 20 28 61 6e 64 20 63 6f 6e | de.context.l.r).....(if.(and.con |
| 35c0 | 74 65 78 74 20 6c 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 | text.l).........(treepy--with-me |
| 35e0 | 74 61 0a 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 28 63 61 72 20 28 6c 61 73 74 20 6c 29 29 | ta..........(cons.(car.(last.l)) |
| 3600 | 0a 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 65 78 74 | ................(treepy--context |
| 3620 | 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 20 20 20 | -assoc.context.................. |
| 3640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3a 6c 20 5b 5d 0a 20 20 20 20 | .....................':l.[]..... |
| 3660 | 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 | ................................ |
| 3680 | 20 20 27 3a 72 20 28 74 72 65 65 70 79 2d 2d 6a 6f 69 6e 2d 63 68 69 6c 64 72 65 6e 20 28 62 75 | ..':r.(treepy--join-children.(bu |
| 36a0 | 74 6c 61 73 74 20 6c 29 20 28 63 6f 6e 73 20 6e 6f 64 65 20 72 29 29 29 29 0a 20 20 20 20 20 20 | tlast.l).(cons.node.r))))....... |
| 36c0 | 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 20 20 6c 6f 63 | ...(treepy--meta.loc)).......loc |
| 36e0 | 29 29 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 2d 64 65 73 63 | )))..(defun.treepy-leftmost-desc |
| 3700 | 65 6e 64 61 6e 74 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 68 65 20 6c 65 66 74 6d | endant.(loc)..."Return.the.leftm |
| 3720 | 6f 73 74 20 64 65 73 63 65 6e 64 61 6e 74 20 6f 66 20 74 68 65 20 67 69 76 65 6e 20 4c 4f 43 2e | ost.descendant.of.the.given.LOC. |
| 3740 | 0a 5c 28 69 65 2c 20 64 6f 77 6e 20 72 65 70 65 61 74 65 64 6c 79 29 2e 22 0a 20 20 28 77 68 69 | .\(ie,.down.repeatedly)."...(whi |
| 3760 | 6c 65 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 73 65 | le.(treepy-branch-p.loc).....(se |
| 3780 | 74 71 20 6c 6f 63 20 28 74 72 65 65 70 79 2d 64 6f 77 6e 20 6c 6f 63 29 29 29 0a 20 20 6c 6f 63 | tq.loc.(treepy-down.loc)))...loc |
| 37a0 | 29 0a 0a 3b 3b 3b 3b 20 4d 6f 64 69 66 69 63 61 74 69 6f 6e 0a 0a 28 64 65 66 75 6e 20 74 72 65 | )..;;;;.Modification..(defun.tre |
| 37c0 | 65 70 79 2d 69 6e 73 65 72 74 2d 6c 65 66 74 20 28 6c 6f 63 20 69 74 65 6d 29 0a 20 20 22 49 6e | epy-insert-left.(loc.item)..."In |
| 37e0 | 73 65 72 74 20 61 73 20 74 68 65 20 6c 65 66 74 20 73 69 62 6c 69 6e 67 20 6f 66 20 74 68 69 73 | sert.as.the.left.sibling.of.this |
| 3800 | 20 4c 4f 43 27 53 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 | .LOC'S.node.the.ITEM..Return.sam |
| 3820 | 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 22 0a 20 20 | e.loc.with.siblings.updated."... |
| 3840 | 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 6f 6e 74 | (treepy--with-loc.loc.(node.cont |
| 3860 | 65 78 74 20 6c 29 0a 20 20 20 20 28 69 66 20 28 6e 6f 74 20 63 6f 6e 74 65 78 74 29 0a 20 20 20 | ext.l).....(if.(not.context).... |
| 3880 | 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 0a 20 20 20 | .....(error."Insert.at.top").... |
| 38a0 | 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 28 63 6f | ...(treepy--with-meta........(co |
| 38c0 | 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 2d 2d 63 6f | ns.node..............(treepy--co |
| 38e0 | 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............. |
| 3900 | 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 3a 6c 20 28 63 6f 6e | ........................':l.(con |
| 3920 | 73 20 69 74 65 6d 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 | s.item.l)....................... |
| 3940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 20 | ..............':changed?.t)).... |
| 3960 | 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 0a 0a 28 64 65 66 | ....(treepy--meta.loc)))))..(def |
| 3980 | 75 6e 20 74 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 | un.treepy-insert-right.(loc.item |
| 39a0 | 29 0a 20 20 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 | )..."Insert.as.the.right.sibling |
| 39c0 | 20 6f 66 20 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 | .of.this.LOC's.node.the.ITEM..Re |
| 39e0 | 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 |
| 3a00 | 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 |
| 3a20 | 6f 64 65 20 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 | ode.context.r).....(if.(not.cont |
| 3a40 | 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 |
| 3a60 | 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... |
| 3a80 | 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 |
| 3aa0 | 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..... |
| 3ac0 | 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 | ................................ |
| 3ae0 | 27 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 20 20 20 20 20 20 | ':r.(cons.item.r)............... |
| 3b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3a 63 68 61 6e 67 65 64 3f | ......................':changed? |
| 3b20 | 20 74 29 29 0a 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 | .t))........(treepy--meta.loc))) |
| 3b40 | 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 72 65 70 6c 61 63 65 20 28 6c 6f 63 20 6e | ))..(defun.treepy-replace.(loc.n |
| 3b60 | 6f 64 65 29 0a 20 20 22 52 65 70 6c 61 63 65 20 74 68 65 20 6e 6f 64 65 20 69 6e 20 74 68 69 73 | ode)..."Replace.the.node.in.this |
| 3b80 | 20 4c 4f 43 20 77 69 74 68 20 74 68 65 20 67 69 76 65 6e 20 4e 4f 44 45 2c 20 77 69 74 68 6f 75 | .LOC.with.the.given.NODE,.withou |
| 3ba0 | 74 20 6d 6f 76 69 6e 67 2e 22 0a 20 20 28 6c 65 74 20 28 28 63 6f 6e 74 65 78 74 20 28 74 72 65 | t.moving."...(let.((context.(tre |
| 3bc0 | 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 29 29 29 0a 20 20 20 20 28 74 72 65 65 70 79 2d | epy--context.loc))).....(treepy- |
| 3be0 | 2d 77 69 74 68 2d 6d 65 74 61 0a 20 20 20 20 20 28 63 6f 6e 73 20 6e 6f 64 65 0a 20 20 20 20 20 | -with-meta......(cons.node...... |
| 3c00 | 20 20 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 | ......(treepy--context-assoc.con |
| 3c20 | 74 65 78 74 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 | text............................ |
| 3c40 | 20 20 20 20 20 20 20 27 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 20 20 20 28 74 72 65 65 | .......':changed?.t))......(tree |
| 3c60 | 70 79 2d 2d 6d 65 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 | py--meta.loc))))..(defun.treepy- |
| 3c80 | 65 64 69 74 20 28 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 | edit.(loc.f.&rest.args)..."Repla |
| 3ca0 | 63 65 20 74 68 65 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 | ce.the.node.at.this.LOC.with.the |
| 3cc0 | 20 76 61 6c 75 65 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 | .value.of.(F.node.ARGS)."...(tre |
| 3ce0 | 65 70 79 2d 72 65 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 | epy-replace.loc.(apply.f.(treepy |
| 3d00 | 2d 6e 6f 64 65 20 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 | -node.loc).args)))..(defun.treep |
| 3d20 | 79 2d 69 6e 73 65 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 | y-insert-child.(loc.item)..."Ins |
| 3d40 | 65 72 74 20 61 73 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 | ert.as.the.leftmost.child.of.thi |
| 3d60 | 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 20 73 61 | s.LOC's.node.the.ITEM..Return.sa |
| 3d80 | 6d 65 20 6c 6f 63 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 | me.loc.with.children.updated.".. |
| 3da0 | 20 28 74 72 65 65 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 | .(treepy-replace.loc.(treepy-mak |
| 3dc0 | 65 2d 6e 6f 64 65 20 6c 6f 63 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 20 28 63 6f | e-node.loc.(treepy-node.loc).(co |
| 3de0 | 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 29 29 | ns.item.(treepy-children.loc)))) |
| 3e00 | 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 28 6c | )..(defun.treepy-append-child.(l |
| 3e20 | 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 74 6d | oc.item)..."Insert.as.the.rightm |
| 3e40 | 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 68 65 | ost.child.of.this.LOC'S.node.the |
| 3e60 | 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 69 6c | .ITEM..Return.same.loc.with.chil |
| 3e80 | 64 72 65 6e 20 75 70 64 61 74 65 64 2e 22 0a 20 20 28 74 72 65 65 70 79 2d 72 65 70 6c 61 63 65 | dren.updated."...(treepy-replace |
| 3ea0 | 20 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 | .loc.(treepy-make-node.loc.(tree |
| 3ec0 | 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 20 28 61 70 70 65 6e 64 20 28 74 72 65 65 70 79 2d 63 68 69 | py-node.loc).(append.(treepy-chi |
| 3ee0 | 6c 64 72 65 6e 20 6c 6f 63 29 20 60 28 2c 69 74 65 6d 29 29 29 29 29 20 20 3b 3b 20 54 4f 44 4f | ldren.loc).`(,item)))))..;;.TODO |
| 3f00 | 3a 20 63 68 65 63 6b 20 70 65 72 66 6f 72 6d 61 6e 63 65 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 | :.check.performance..(defun.tree |
| 3f20 | 70 79 2d 72 65 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 | py-remove.(loc)..."Remove.the.no |
| 3f40 | 64 65 20 61 74 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 | de.at.LOC..Return.the.loc.that.w |
| 3f60 | 6f 75 6c 64 20 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 | ould.have.preceded.it.in.a.depth |
| 3f80 | 2d 66 69 72 73 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 | -first.walk."...(treepy--with-lo |
| 3fa0 | 63 20 6c 6f 63 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 | c.loc.(context.pnodes.ppath.l.r) |
| 3fc0 | 0a 20 20 20 20 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 | .....(if.(not.context).........( |
| 3fe0 | 65 72 72 6f 72 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 | error."Remove.at.top").......(if |
| 4000 | 20 28 3e 20 28 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 | .(>.(length.l).0)...........(let |
| 4020 | 20 28 28 6e 6c 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 | .((nloc.(treepy--with-meta.(cons |
| 4040 | 20 28 63 61 72 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 | .(car.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 28 74 72 65 65 70 79 2d | ........................(treepy- |
| 4080 | 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 20 | -context-assoc.context.......... |
| 40a0 | 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 | ................................ |
| 40c0 | 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 3a 6c | .............................':l |
| 40e0 | 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 20 20 20 20 20 | .(cdr.l)........................ |
| 4100 | 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 | ................................ |
| 4120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3a 63 68 61 6e 67 65 64 3f 20 74 29 29 0a 20 20 | ...............':changed?.t))... |
| 4140 | 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 | ................................ |
| 4160 | 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 0a 20 20 20 20 | .......(treepy--meta.loc)))..... |
| 4180 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 68 69 6c 64 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 | ............(child.nil))........ |
| 41a0 | 20 20 20 20 20 28 77 68 69 6c 65 20 28 73 65 74 71 20 63 68 69 6c 64 20 28 61 6e 64 20 28 74 72 | .....(while.(setq.child.(and.(tr |
| 41c0 | 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 6e 6c 6f 63 29 20 28 74 72 65 65 70 79 2d 63 68 69 6c | eepy-branch-p.nloc).(treepy-chil |
| 41e0 | 64 72 65 6e 20 6e 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 | dren.nloc)))...............(setq |
| 4200 | 20 6e 6c 6f 63 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 6d 6f 73 74 20 63 68 69 6c 64 29 29 29 | .nloc.(treepy-rightmost.child))) |
| 4220 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 6e 6c 6f 63 29 0a 20 20 20 20 20 20 20 20 28 74 72 65 65 | .............nloc).........(tree |
| 4240 | 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 73 20 28 74 72 | py--with-meta..........(cons.(tr |
| 4260 | 65 65 70 79 2d 6d 61 6b 65 2d 6e 6f 64 65 20 6c 6f 63 20 28 63 61 72 20 70 6e 6f 64 65 73 29 20 | eepy-make-node.loc.(car.pnodes). |
| 4280 | 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 20 70 70 61 74 68 20 28 74 72 | r)................(and.ppath.(tr |
| 42a0 | 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 20 27 3a 63 68 | eepy--context-assoc.context.':ch |
| 42c0 | 61 6e 67 65 64 3f 20 74 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 2d 6d 65 | anged?.t)))..........(treepy--me |
| 42e0 | 74 61 20 6c 6f 63 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 45 6e 75 6d 65 72 61 74 69 6f 6e 0a 0a | ta.loc))))))..;;;;.Enumeration.. |
| 4300 | 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 70 72 65 6f 72 64 65 72 2d 6e 65 78 74 20 28 6c 6f | (defun.treepy--preorder-next.(lo |
| 4320 | 63 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 68 | c)..."Move.to.the.next.LOC.in.th |
| 4340 | 65 20 68 69 65 72 61 72 63 68 79 2c 20 64 65 70 74 68 2d 66 69 72 73 74 20 69 6e 20 70 72 65 6f | e.hierarchy,.depth-first.in.preo |
| 4360 | 72 64 65 72 2e 0a 57 68 65 6e 20 72 65 61 63 68 69 6e 67 20 74 68 65 20 65 6e 64 2c 20 72 65 74 | rder..When.reaching.the.end,.ret |
| 4380 | 75 72 6e 73 20 61 20 64 69 73 74 69 6e 67 75 69 73 68 65 64 20 6c 6f 63 20 64 65 74 65 63 74 61 | urns.a.distinguished.loc.detecta |
| 43a0 | 62 6c 65 20 76 69 61 0a 60 74 72 65 65 70 79 2d 65 6e 64 2d 70 27 2e 20 20 49 66 20 61 6c 72 65 | ble.via.`treepy-end-p'...If.alre |
| 43c0 | 61 64 79 20 61 74 20 74 68 65 20 65 6e 64 2c 20 73 74 61 79 73 20 74 68 65 72 65 2e 22 0a 20 20 | ady.at.the.end,.stays.there."... |
| 43e0 | 28 69 66 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 78 74 | (if.(equal.:end.(treepy--context |
| 4400 | 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 6c 6f 63 0a 20 20 20 20 28 6c 65 74 20 28 28 63 6c 6f 63 | .loc)).......loc.....(let.((cloc |
| 4420 | 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 28 6f 72 0a 20 20 20 20 20 20 20 28 61 6e 64 20 28 74 72 | .loc)).......(or........(and.(tr |
| 4440 | 65 65 70 79 2d 62 72 61 6e 63 68 2d 70 20 63 6c 6f 63 29 20 28 74 72 65 65 70 79 2d 64 6f 77 6e | eepy-branch-p.cloc).(treepy-down |
| 4460 | 20 63 6c 6f 63 29 29 0a 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 20 63 6c 6f | .cloc))........(treepy-right.clo |
| 4480 | 63 29 0a 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 70 20 63 6c 6f 63 29 0a 20 20 20 20 20 20 20 | c)........(let.((p.cloc)........ |
| 44a0 | 20 20 20 20 20 20 28 70 72 20 6e 69 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 77 68 69 6c 65 20 | ......(pr.nil))..........(while. |
| 44c0 | 28 61 6e 64 20 28 74 72 65 65 70 79 2d 75 70 20 70 29 20 28 6e 6f 74 20 28 73 65 74 71 20 70 72 | (and.(treepy-up.p).(not.(setq.pr |
| 44e0 | 20 28 74 72 65 65 70 79 2d 72 69 67 68 74 20 28 74 72 65 65 70 79 2d 75 70 20 70 29 29 29 29 29 | .(treepy-right.(treepy-up.p))))) |
| 4500 | 0a 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 70 20 28 74 72 65 65 70 79 2d 75 70 20 70 | ............(setq.p.(treepy-up.p |
| 4520 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 28 6f 72 20 70 72 20 28 63 6f 6e 73 20 28 63 6f 6e 73 20 | )))..........(or.pr.(cons.(cons. |
| 4540 | 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 70 29 20 3a 65 6e 64 29 20 6e 69 6c 29 29 29 29 29 29 29 | (treepy-node.p).:end).nil))))))) |
| 4560 | 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 70 6f 73 74 6f 72 64 65 72 2d 6e 65 78 74 20 | ..(defun.treepy--postorder-next. |
| 4580 | 28 6c 6f 63 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 | (loc)..."Move.to.the.next.LOC.in |
| 45a0 | 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 20 69 6e 20 70 | .the.hierarchy,.depth-first.in.p |
| 45c0 | 6f 73 74 6f 72 64 65 72 2e 0a 57 68 65 6e 20 72 65 61 63 68 69 6e 67 20 74 68 65 20 65 6e 64 2c | ostorder..When.reaching.the.end, |
| 45e0 | 20 72 65 74 75 72 6e 73 20 61 20 64 69 73 74 69 6e 67 75 69 73 68 65 64 20 6c 6f 63 20 64 65 74 | .returns.a.distinguished.loc.det |
| 4600 | 65 63 74 61 62 6c 65 20 76 69 61 0a 60 74 72 65 65 70 79 2d 65 6e 64 2d 70 27 2e 20 20 49 66 20 | ectable.via.`treepy-end-p'...If. |
| 4620 | 61 6c 72 65 61 64 79 20 61 74 20 74 68 65 20 65 6e 64 2c 20 73 74 61 79 73 20 74 68 65 72 65 2e | already.at.the.end,.stays.there. |
| 4640 | 22 0a 20 20 28 69 66 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 | "...(if.(equal.:end.(treepy--con |
| 4660 | 74 65 78 74 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 6c 6f 63 0a 20 20 20 20 28 69 66 20 28 6e 75 | text.loc)).......loc.....(if.(nu |
| 4680 | 6c 6c 20 28 74 72 65 65 70 79 2d 75 70 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 20 20 28 63 6f 6e | ll.(treepy-up.loc)).........(con |
| 46a0 | 73 20 28 63 6f 6e 73 20 28 74 72 65 65 70 79 2d 6e 6f 64 65 20 6c 6f 63 29 20 3a 65 6e 64 29 20 | s.(cons.(treepy-node.loc).:end). |
| 46c0 | 6e 69 6c 29 0a 20 20 20 20 20 20 28 6f 72 20 28 6c 65 74 20 28 28 72 6c 6f 63 20 28 74 72 65 65 | nil).......(or.(let.((rloc.(tree |
| 46e0 | 70 79 2d 72 69 67 68 74 20 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6e 64 | py-right.loc))).............(and |
| 4700 | 20 72 6c 6f 63 20 28 74 72 65 65 70 79 2d 6c 65 66 74 6d 6f 73 74 2d 64 65 73 63 65 6e 64 61 6e | .rloc.(treepy-leftmost-descendan |
| 4720 | 74 20 72 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 75 70 20 6c | t.rloc)))...........(treepy-up.l |
| 4740 | 6f 63 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 6e 65 78 74 20 28 6c 6f 63 | oc)))))..(defun.treepy-next.(loc |
| 4760 | 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 72 64 65 72 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 74 68 65 | .&optional.order)..."Move.to.the |
| 4780 | 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 65 70 74 | .next.LOC.in.the.hierarchy,.dept |
| 47a0 | 68 2d 66 69 72 73 74 2e 0a 55 73 65 20 4f 52 44 45 52 20 69 66 20 67 69 76 65 6e 2e 20 20 50 6f | h-first..Use.ORDER.if.given...Po |
| 47c0 | 73 73 69 62 6c 65 20 76 61 6c 75 65 73 20 66 6f 72 20 4f 52 44 45 52 20 61 72 65 20 60 3a 70 72 | ssible.values.for.ORDER.are.`:pr |
| 47e0 | 65 6f 72 64 65 72 27 20 61 6e 64 0a 60 3a 70 6f 73 74 6f 72 64 65 72 27 2c 20 64 65 66 61 75 6c | eorder'.and.`:postorder',.defaul |
| 4800 | 74 73 20 74 6f 20 74 68 65 20 66 6f 72 6d 65 72 2e 22 0a 20 20 28 63 6c 2d 63 61 73 65 20 28 6f | ts.to.the.former."...(cl-case.(o |
| 4820 | 72 20 6f 72 64 65 72 20 27 3a 70 72 65 6f 72 64 65 72 29 0a 20 20 20 20 28 3a 70 72 65 6f 72 64 | r.order.':preorder).....(:preord |
| 4840 | 65 72 20 28 74 72 65 65 70 79 2d 2d 70 72 65 6f 72 64 65 72 2d 6e 65 78 74 20 6c 6f 63 29 29 0a | er.(treepy--preorder-next.loc)). |
| 4860 | 20 20 20 20 28 3a 70 6f 73 74 6f 72 64 65 72 20 28 74 72 65 65 70 79 2d 2d 70 6f 73 74 6f 72 64 | ....(:postorder.(treepy--postord |
| 4880 | 65 72 2d 6e 65 78 74 20 6c 6f 63 29 29 0a 20 20 20 20 28 74 20 28 65 72 72 6f 72 20 22 55 6e 72 | er-next.loc)).....(t.(error."Unr |
| 48a0 | 65 63 6f 67 6e 69 7a 65 64 20 6f 72 64 65 72 22 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 | ecognized.order"))))..(defun.tre |
| 48c0 | 65 70 79 2d 2d 70 72 65 6f 72 64 65 72 2d 70 72 65 76 20 28 6c 6f 63 29 0a 20 20 22 4d 6f 76 65 | epy--preorder-prev.(loc)..."Move |
| 48e0 | 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 72 | .to.the.previous.LOC.in.the.hier |
| 4900 | 61 72 63 68 79 2c 20 64 65 70 74 68 2d 66 69 72 73 74 20 70 72 65 6f 72 64 65 72 2e 0a 49 66 20 | archy,.depth-first.preorder..If. |
| 4920 | 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 69 6c | already.at.the.root,.returns.nil |
| 4940 | 2e 22 0a 20 20 28 6c 65 74 20 28 28 6c 6c 6f 63 20 28 74 72 65 65 70 79 2d 6c 65 66 74 20 6c 6f | ."...(let.((lloc.(treepy-left.lo |
| 4960 | 63 29 29 0a 20 20 20 20 20 20 20 20 28 63 68 69 6c 64 20 6e 69 6c 29 29 0a 20 20 20 20 28 69 66 | c)).........(child.nil)).....(if |
| 4980 | 20 6c 6c 6f 63 0a 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 28 | .lloc.........(progn...........( |
| 49a0 | 77 68 69 6c 65 20 28 73 65 74 71 20 63 68 69 6c 64 20 28 61 6e 64 20 28 74 72 65 65 70 79 2d 62 | while.(setq.child.(and.(treepy-b |
| 49c0 | 72 61 6e 63 68 2d 70 20 6c 6c 6f 63 29 20 28 74 72 65 65 70 79 2d 63 68 69 6c 64 72 65 6e 20 6c | ranch-p.lloc).(treepy-children.l |
| 49e0 | 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 6c 6f 63 20 28 74 | loc))).............(setq.lloc.(t |
| 4a00 | 72 65 65 70 79 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 | reepy-rightmost.child)))........ |
| 4a20 | 20 20 20 6c 6c 6f 63 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 75 70 20 6c 6f 63 29 29 29 | ...lloc).......(treepy-up.loc))) |
| 4a40 | 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 2d 70 6f 73 74 6f 72 64 65 72 2d 70 72 65 76 | )..(defun.treepy--postorder-prev |
| 4a60 | 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 73 20 4c | .(loc)..."Move.to.the.previous.L |
| 4a80 | 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 72 73 74 | OC.in.the.hierarchy,.depth-first |
| 4aa0 | 20 70 6f 73 74 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 72 6f | .postorder..If.already.at.the.ro |
| 4ac0 | 6f 74 2c 20 72 65 74 75 72 6e 73 20 6e 69 6c 2e 22 0a 20 20 28 69 66 20 28 74 72 65 65 70 79 2d | ot,.returns.nil."...(if.(treepy- |
| 4ae0 | 62 72 61 6e 63 68 2d 70 20 6c 6f 63 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 72 69 67 68 | branch-p.loc).......(treepy-righ |
| 4b00 | 74 6d 6f 73 74 20 28 74 72 65 65 70 79 2d 64 6f 77 6e 20 6c 6f 63 29 29 0a 20 20 20 20 28 70 72 | tmost.(treepy-down.loc)).....(pr |
| 4b20 | 6f 67 6e 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 6e 6f 74 20 28 74 72 65 65 70 79 2d 6c 65 | ogn.......(while.(not.(treepy-le |
| 4b40 | 66 74 20 6c 6f 63 29 29 0a 20 20 20 20 20 20 20 20 28 73 65 74 71 20 6c 6f 63 20 28 74 72 65 65 | ft.loc)).........(setq.loc.(tree |
| 4b60 | 70 79 2d 75 70 20 6c 6f 63 29 29 29 0a 20 20 20 20 20 20 28 74 72 65 65 70 79 2d 6c 65 66 74 20 | py-up.loc))).......(treepy-left. |
| 4b80 | 6c 6f 63 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 74 72 65 65 70 79 2d 70 72 65 76 20 28 6c 6f 63 | loc))))..(defun.treepy-prev.(loc |
| 4ba0 | 20 26 6f 70 74 69 6f 6e 61 6c 20 6f 72 64 65 72 29 0a 20 20 22 4d 6f 76 65 20 74 6f 20 74 68 65 | .&optional.order)..."Move.to.the |
| 4bc0 | 20 70 72 65 76 69 6f 75 73 20 4c 4f 43 20 69 6e 20 74 68 65 20 68 69 65 72 61 72 63 68 79 2c 20 | .previous.LOC.in.the.hierarchy,. |
| 4be0 | 64 65 70 74 68 2d 66 69 72 73 74 2e 0a 55 73 65 20 4f 52 44 45 52 20 69 66 20 67 69 76 65 6e 2e | depth-first..Use.ORDER.if.given. |
| 4c00 | 20 20 50 6f 73 73 69 62 6c 65 20 76 61 6c 75 65 73 20 66 6f 72 20 4f 52 44 45 52 20 61 72 65 20 | ..Possible.values.for.ORDER.are. |
| 4c20 | 60 3a 70 72 65 6f 72 64 65 72 27 20 61 6e 64 20 60 3a 70 6f 73 74 6f 72 64 65 72 27 2c 0a 64 65 | `:preorder'.and.`:postorder',.de |
| 4c40 | 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 66 6f 72 6d 65 72 2e 22 0a 20 20 28 63 6c 2d 63 61 73 | faults.to.the.former."...(cl-cas |
| 4c60 | 65 20 28 6f 72 20 6f 72 64 65 72 20 27 3a 70 72 65 6f 72 64 65 72 29 0a 20 20 20 20 28 3a 70 72 | e.(or.order.':preorder).....(:pr |
| 4c80 | 65 6f 72 64 65 72 20 28 74 72 65 65 70 79 2d 2d 70 72 65 6f 72 64 65 72 2d 70 72 65 76 20 6c 6f | eorder.(treepy--preorder-prev.lo |
| 4ca0 | 63 29 29 0a 20 20 20 20 28 3a 70 6f 73 74 6f 72 64 65 72 20 28 74 72 65 65 70 79 2d 2d 70 6f 73 | c)).....(:postorder.(treepy--pos |
| 4cc0 | 74 6f 72 64 65 72 2d 70 72 65 76 20 6c 6f 63 29 29 0a 20 20 20 20 28 74 20 28 65 72 72 6f 72 20 | torder-prev.loc)).....(t.(error. |
| 4ce0 | 22 55 6e 72 65 63 6f 67 6e 69 7a 65 64 20 6f 72 64 65 72 22 29 29 29 29 0a 0a 28 64 65 66 75 6e | "Unrecognized.order"))))..(defun |
| 4d00 | 20 74 72 65 65 70 79 2d 65 6e 64 2d 70 20 28 6c 6f 63 29 0a 20 20 22 52 65 74 75 72 6e 20 74 20 | .treepy-end-p.(loc)..."Return.t. |
| 4d20 | 69 66 20 4c 4f 43 20 72 65 70 72 65 73 65 6e 74 73 20 74 68 65 20 65 6e 64 20 6f 66 20 61 20 64 | if.LOC.represents.the.end.of.a.d |
| 4d40 | 65 70 74 68 2d 66 69 72 73 74 20 77 61 6c 6b 2e 22 0a 20 20 28 65 71 75 61 6c 20 3a 65 6e 64 20 | epth-first.walk."...(equal.:end. |
| 4d60 | 28 74 72 65 65 70 79 2d 2d 63 6f 6e 74 65 78 74 20 6c 6f 63 29 29 29 0a 0a 28 70 72 6f 76 69 64 | (treepy--context.loc)))..(provid |
| 4d80 | 65 20 27 74 72 65 65 70 79 29 0a 0a 3b 3b 3b 20 74 72 65 65 70 79 2e 65 6c 20 65 6e 64 73 20 68 | e.'treepy)..;;;.treepy.el.ends.h |
| 4da0 | 65 72 65 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ere............................. |
| 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 | ................................ |