home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / e / e037 / 1.img next >
The Duplicator Toolkit disk image  |  1993-08-10  |  307.5 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: The Duplicator Toolkit disk image (archive/duplicatorToolkitDiskImage).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert Alias PIX Image (image/aliasPIX) ext Supported
66% dexvert GEM Raster Bitmap (image/gem) ext Supported
66% dexvert DaVinci (image/daVinci) ext Supported
46% dexvert Disk Image (archive/diskImage) ext Supported
1% dexvert The Duplicator Toolkit disk image (archive/duplicatorToolkitDiskImage) magic Unsupported
1% dexvert AIX/BFF backup/restore (archive/aixBackupRestore) ext Unsupported
1% dexvert PTS-DOS disk image (archive/ptsDOSDiskImage) ext Unsupported
1% dexvert QNX volume disk image (archive/qnxVolumeDiskImage) ext Unsupported
1% dexvert SNATCH-IT Disk Image (archive/snatchItDiskImage) ext Unsupported
1% dexvert Android boot image (archive/androidBootImage) ext Unsupported
1% dexvert Paragon DOS disk image (archive/paragonDOSDiskImage) ext Unsupported
1% dexvert QEMU QCOW Image (archive/qemuQCOWImage) ext Unsupported
1% dexvert Davilex Games game data format (other/davilexGamesGameDataFormat) ext Unsupported
1% dexvert Eclipse Image (other/eclipseImage) ext Unsupported
1% dexvert InfoComics game data (other/infoComicsGameData) ext Unsupported
1% dexvert Garmin map (other/garminMap) ext Unsupported
1% dexvert Piklib/BlooMoo graphic data (other/piklibGraphicData) ext Unsupported
100% file data default
100% TrID The Duplicator Toolkit disk image default
100% gt2 Kopftext: 'Image file of a diskette by THE DUPLICATOR' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 49 6d 61 67 65 20 66 69 | 6c 65 20 6f 66 20 61 20 |Image fi|le of a |
|00000010| 64 69 73 6b 65 74 74 65 | 20 62 79 20 54 48 45 20 |diskette| by THE |
|00000020| 44 55 50 4c 49 43 41 54 | 4f 52 00 00 00 00 00 00 |DUPLICAT|OR......|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 01 00 02 00 09 00 28 00 | 03 00 01 00 5d 2c 00 00 |......(.|....],..|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 e8 1d |........|........|
|00000060| 6a 18 00 00 03 00 2e 80 | 22 3b 00 00 15 00 2e c9 |j.......|";......|
|00000070| 0d 3b 00 00 27 00 b9 36 | 24 3d 00 00 39 00 2e 8a |.;..'..6|$=..9...|
|00000080| 1c 31 00 00 4b 00 e0 b1 | 1d 4e 00 00 5d 00 3b 06 |.1..K...|.N..].;.|
|00000090| 9a d8 00 00 6f 00 e9 5c | 0b 3a 00 00 81 00 06 02 |....o..\|.:......|
|000000a0| ce 69 00 00 93 00 e9 fc | f1 8f 00 00 a5 00 b9 07 |.i......|........|
|000000b0| 36 16 00 00 b7 00 06 2c | 13 fe 00 00 c9 00 02 00 |6......,|........|
|000000c0| 13 76 00 00 db 00 5c 59 | 5c 84 00 00 ed 00 56 59 |.v....\Y|\.....VY|
|000000d0| 1f 3d 00 00 ff 00 08 00 | 4e 17 00 00 11 01 45 11 |.=......|N.....E.|
|000000e0| 71 c2 00 00 23 01 29 68 | 53 ce 00 00 35 01 24 68 |q...#.)h|S...5.$h|
|000000f0| 8b ca 00 00 47 01 47 3f | 6f 35 00 00 59 01 00 00 |....G.G?|o5..Y...|
|00000100| ae 12 00 00 6b 01 e7 02 | 7b 86 00 00 7d 01 47 3f |....k...|{...}.G?|
|00000110| 6b 37 00 00 8f 01 2d 45 | 00 43 00 00 a1 01 f6 68 |k7....-E|.C.....h|
|00000120| 2a ce 00 00 b3 01 f6 7f | ac 29 00 00 c5 01 f6 67 |*.......|.).....g|
|00000130| 30 2a 00 00 d7 01 f6 68 | 77 97 00 00 e9 01 f6 45 |0*.....h|w......E|
|00000140| 60 67 00 00 fb 01 f6 08 | 86 1d 00 00 0d 02 f6 45 |`g......|.......E|
|00000150| 18 76 00 00 1f 02 f6 45 | 1c 6b 00 00 31 02 f6 68 |.v.....E|.k..1..h|
|00000160| 08 70 00 00 43 02 f6 00 | 67 16 00 00 55 02 f6 00 |.p..C...|g...U...|
|00000170| 00 00 02 00 67 02 f6 68 | 00 00 02 00 79 02 f6 11 |....g..h|....y...|
|00000180| 00 00 02 00 80 02 f6 68 | 00 00 02 00 58 68 f6 45 |.......h|....Xh.E|
|00000190| 00 00 02 00 47 3f f6 72 | 00 00 02 00 ff ff f6 15 |....G?.r|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 20 |........|....... |
|00000400| 20 20 20 20 20 20 20 20 | 20 00 00 08 00 00 00 20 | | ...... |
|00000410| 20 20 20 20 20 20 20 20 | 20 00 20 20 20 20 20 20 | | . |
|00000420| 20 20 20 20 00 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00000430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000440| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 00 20 20 | | . |
|00000450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000460| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000470| 20 20 20 20 20 20 00 20 | 20 20 20 20 20 20 20 20 | . | |
|00000480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 00 | | .|
|000004a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000004b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000004c0| 20 20 20 20 20 20 20 20 | 00 20 20 20 20 20 20 20 | |. |
|000004d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000004e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000004f0| 20 00 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00000500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000510| 20 20 20 20 20 20 20 20 | 20 20 00 20 20 20 20 20 | | . |
|00000520| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000530| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000540| 20 20 20 00 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00000550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000560| 20 20 20 20 20 20 20 20 | 20 20 20 20 00 00 00 00 | | ....|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 28 20 bc |........|.....( .|
|00000580| 00 47 3f 23 06 70 00 12 | 25 96 42 f4 06 70 00 f4 |.G?#.p..|%.B..p..|
|00000590| 06 70 00 54 ff 00 f0 43 | eb 00 f0 eb ea 00 f0 3c |.p.T...C|.......<|
|000005a0| 00 2b 25 45 00 2b 25 57 | 00 2b 25 6f 00 2b 25 87 |.+%E.+%W|.+%o.+%.|
|000005b0| 00 2b 25 9f 00 2b 25 de | 01 ff 2c f4 06 70 00 44 |.+%..+%.|..,..p.D|
|000005c0| 15 00 c0 4d f8 00 f0 41 | f8 00 f0 4f 09 a7 0b 39 |...M...A|...O...9|
|000005d0| e7 00 f0 3d 02 6b 02 2e | e8 00 f0 d2 ef 00 f0 00 |...=.k..|........|
|000005e0| e0 00 f0 2f 00 a0 25 9d | 09 a7 0b 4a 00 03 2b 3a |.../..%.|...J..+:|
|000005f0| 00 db 2d a4 f0 00 f0 22 | 05 00 00 2e 54 00 c0 94 |..-...."|....T...|
|00000600| eb 34 90 49 42 4d 20 20 | 33 2e 33 00 02 02 01 00 |.4.IBM |3.3.....|
|00000610| 02 70 00 d0 02 fd 02 00 | 09 00 02 00 00 00 00 00 |.p......|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 12 |........|........|
|00000630| 00 00 00 00 01 00 fa 33 | c0 8e d0 bc 00 7c 16 07 |.......3|.....|..|
|00000640| bb 78 00 36 c5 37 1e 56 | 16 53 bf 2b 7c b9 0b 00 |.x.6.7.V|.S.+|...|
|00000650| fc ac 26 80 3d 00 74 03 | 26 8a 05 aa 8a c4 e2 f1 |..&.=.t.|&.......|
|00000660| 06 1f 89 47 02 c7 07 2b | 7c fb cd 13 72 67 a0 10 |...G...+||...rg..|
|00000670| 7c 98 f7 26 16 7c 03 06 | 1c 7c 03 06 0e 7c a3 3f ||..&.|..|.|...|.?|
|00000680| 7c a3 37 7c b8 20 00 f7 | 26 11 7c 8b 1e 0b 7c 03 ||.7|. ..|&.|...|.|
|00000690| c3 48 f7 f3 01 06 37 7c | bb 00 05 a1 3f 7c e8 9f |.H....7||....?|..|
|000006a0| 00 b8 01 02 e8 b3 00 72 | 19 8b fb b9 0b 00 be d6 |.......r|........|
|000006b0| 7d f3 a6 75 0d 8d 7f 20 | be e1 7d b9 0b 00 f3 a6 |}..u... |..}.....|
|000006c0| 74 18 be 77 7d e8 6a 00 | 32 e4 cd 16 5e 1f 8f 04 |t..w}.j.|2...^...|
|000006d0| 8f 44 02 cd 19 be c0 7d | eb eb a1 1c 05 33 d2 f7 |.D.....}|.....3..|
|000006e0| 36 0b 7c fe c0 a2 3c 7c | a1 37 7c a3 3d 7c bb 00 |6.|...<||.7|.=|..|
|000006f0| 07 a1 37 7c e8 49 00 a1 | 18 7c 2a 06 3b 7c 40 38 |..7|.I..|.|*.;|@8|
|00000700| 06 3c 7c 73 03 a0 3c 7c | 50 e8 4e 00 58 72 c6 28 |.<|s..<||P.N.Xr.(|
|00000710| 06 3c 7c 74 0c 01 06 37 | 7c f7 26 0b 7c 03 d8 eb |.<|t...7||.&.|...|
|00000720| d0 8a 2e 15 7c 8a 16 fd | 7d 8b 1e 3d 7c ea 00 00 |....|...|}..=|...|
|00000730| 70 00 ac 0a c0 74 22 b4 | 0e bb 07 00 cd 10 eb f2 |p....t".|........|
|00000740| 33 d2 f7 36 18 7c fe c2 | 88 16 3b 7c 33 d2 f7 36 |3..6.|..|..;|3..6|
|00000750| 1a 7c 88 16 2a 7c a3 39 | 7c c3 b4 02 8b 16 39 7c |.|..*|.9||.....9||
|00000760| b1 06 d2 e6 0a 36 3b 7c | 8b ca 86 e9 8a 16 fd 7d |.....6;||.......}|
|00000770| 8a 36 2a 7c cd 13 c3 0d | 0a 4e 6f 6e 2d 53 79 73 |.6*|....|.Non-Sys|
|00000780| 74 65 6d 20 64 69 73 6b | 20 6f 72 20 64 69 73 6b |tem disk| or disk|
|00000790| 20 65 72 72 6f 72 0d 0a | 52 65 70 6c 61 63 65 20 | error..|Replace |
|000007a0| 61 6e 64 20 73 74 72 69 | 6b 65 20 61 6e 79 20 6b |and stri|ke any k|
|000007b0| 65 79 20 77 68 65 6e 20 | 72 65 61 64 79 0d 0a 00 |ey when |ready...|
|000007c0| 0d 0a 44 69 73 6b 20 42 | 6f 6f 74 20 66 61 69 6c |..Disk B|oot fail|
|000007d0| 75 72 65 0d 0a 00 49 42 | 4d 42 49 4f 20 20 43 4f |ure...IB|MBIO CO|
|000007e0| 4d 49 42 4d 44 4f 53 20 | 20 43 4f 4d 00 00 00 00 |MIBMDOS | COM....|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 55 aa |........|......U.|
|00000800| fd ff ff 03 40 00 05 60 | 00 07 80 00 09 a0 00 0b |....@..`|........|
|00000810| c0 00 0d e0 00 0f f0 ff | 11 20 01 13 40 01 15 60 |........|. ..@..`|
|00000820| 01 17 80 01 19 a0 01 1b | c0 01 1d e0 01 ff 0f 02 |........|........|
|00000830| 21 20 02 23 40 02 25 60 | 02 27 80 02 29 a0 02 2b |! .#@.%`|.'..)..+|
|00000840| f0 ff 2d e0 02 2f 00 03 | 31 20 03 33 40 03 35 60 |..-../..|1 .3@.5`|
|00000850| 03 37 80 03 39 a0 03 ff | cf 03 3d e0 03 3f 00 04 |.7..9...|..=..?..|
|00000860| 41 20 04 43 40 04 45 60 | 04 47 80 04 ff af 04 4b |A .C@.E`|.G.....K|
|00000870| c0 04 4d e0 04 4f 00 05 | 51 20 05 53 f0 ff 55 60 |..M..O..|Q .S..U`|
|00000880| 05 57 80 05 59 a0 05 5b | c0 05 5d e0 05 5f 00 06 |.W..Y..[|..].._..|
|00000890| 61 20 06 63 40 06 ff 6f | 06 67 80 06 69 a0 06 6b |a .c@..o|.g..i..k|
|000008a0| c0 06 6d e0 06 6f 00 07 | 71 20 07 73 40 07 75 60 |..m..o..|q .s@.u`|
|000008b0| 07 77 80 07 79 a0 07 7b | c0 07 7d e0 07 ff 0f 08 |.w..y..{|..}.....|
|000008c0| 81 20 08 83 40 08 85 60 | 08 87 80 08 89 a0 08 8b |. ..@..`|........|
|000008d0| c0 08 8d e0 08 8f 00 09 | 91 20 09 93 f0 ff 95 60 |........|. .....`|
|000008e0| 09 97 80 09 99 a0 09 9b | c0 09 9d e0 09 9f 00 0a |........|........|
|000008f0| a1 20 0a a3 40 0a a5 60 | 0a a7 80 0a a9 a0 0a ab |. ..@..`|........|
|00000900| c0 0a ad e0 0a af 00 0b | b1 20 0b b3 40 0b b5 60 |........|. ..@..`|
|00000910| 0b b7 80 0b b9 f0 ff bb | c0 0b bd e0 0b bf 00 0c |........|........|
|00000920| c1 20 0c c3 40 0c c5 60 | 0c c7 80 0c c9 a0 0c cb |. ..@..`|........|
|00000930| c0 0c cd e0 0c cf 00 0d | d1 20 0d d3 40 0d d5 f0 |........|. ..@...|
|00000940| ff d7 80 0d d9 a0 0d db | c0 0d dd e0 0d df 00 0e |........|........|
|00000950| e1 20 0e e3 40 0e e5 60 | 0e e7 80 0e e9 a0 0e eb |. ..@..`|........|
|00000960| f0 ff ed e0 0e ef 00 0f | f1 20 0f f3 40 0f f5 60 |........|. ..@..`|
|00000970| 0f f7 80 0f f9 a0 0f fb | c0 0f fd e0 0f ff 00 10 |........|........|
|00000980| 01 21 10 03 41 10 05 61 | 10 07 81 10 09 a1 10 0b |.!..A..a|........|
|00000990| c1 10 0d e1 10 0f 01 11 | 11 21 11 13 41 11 15 61 |........|.!..A..a|
|000009a0| 11 17 81 11 19 a1 11 1b | c1 11 1d e1 11 1f 01 12 |........|........|
|000009b0| 21 21 12 23 41 12 25 61 | 12 27 f1 ff 00 00 00 00 |!!.#A.%a|.'......|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| fd ff ff 03 40 00 05 60 | 00 07 80 00 09 a0 00 0b |....@..`|........|
|00000c10| c0 00 0d e0 00 0f f0 ff | 11 20 01 13 40 01 15 60 |........|. ..@..`|
|00000c20| 01 17 80 01 19 a0 01 1b | c0 01 1d e0 01 ff 0f 02 |........|........|
|00000c30| 21 20 02 23 40 02 25 60 | 02 27 80 02 29 a0 02 2b |! .#@.%`|.'..)..+|
|00000c40| f0 ff 2d e0 02 2f 00 03 | 31 20 03 33 40 03 35 60 |..-../..|1 .3@.5`|
|00000c50| 03 37 80 03 39 a0 03 ff | cf 03 3d e0 03 3f 00 04 |.7..9...|..=..?..|
|00000c60| 41 20 04 43 40 04 45 60 | 04 47 80 04 ff af 04 4b |A .C@.E`|.G.....K|
|00000c70| c0 04 4d e0 04 4f 00 05 | 51 20 05 53 f0 ff 55 60 |..M..O..|Q .S..U`|
|00000c80| 05 57 80 05 59 a0 05 5b | c0 05 5d e0 05 5f 00 06 |.W..Y..[|..].._..|
|00000c90| 61 20 06 63 40 06 ff 6f | 06 67 80 06 69 a0 06 6b |a .c@..o|.g..i..k|
|00000ca0| c0 06 6d e0 06 6f 00 07 | 71 20 07 73 40 07 75 60 |..m..o..|q .s@.u`|
|00000cb0| 07 77 80 07 79 a0 07 7b | c0 07 7d e0 07 ff 0f 08 |.w..y..{|..}.....|
|00000cc0| 81 20 08 83 40 08 85 60 | 08 87 80 08 89 a0 08 8b |. ..@..`|........|
|00000cd0| c0 08 8d e0 08 8f 00 09 | 91 20 09 93 f0 ff 95 60 |........|. .....`|
|00000ce0| 09 97 80 09 99 a0 09 9b | c0 09 9d e0 09 9f 00 0a |........|........|
|00000cf0| a1 20 0a a3 40 0a a5 60 | 0a a7 80 0a a9 a0 0a ab |. ..@..`|........|
|00000d00| c0 0a ad e0 0a af 00 0b | b1 20 0b b3 40 0b b5 60 |........|. ..@..`|
|00000d10| 0b b7 80 0b b9 f0 ff bb | c0 0b bd e0 0b bf 00 0c |........|........|
|00000d20| c1 20 0c c3 40 0c c5 60 | 0c c7 80 0c c9 a0 0c cb |. ..@..`|........|
|00000d30| c0 0c cd e0 0c cf 00 0d | d1 20 0d d3 40 0d d5 f0 |........|. ..@...|
|00000d40| ff d7 80 0d d9 a0 0d db | c0 0d dd e0 0d df 00 0e |........|........|
|00000d50| e1 20 0e e3 40 0e e5 60 | 0e e7 80 0e e9 a0 0e eb |. ..@..`|........|
|00000d60| f0 ff ed e0 0e ef 00 0f | f1 20 0f f3 40 0f f5 60 |........|. ..@..`|
|00000d70| 0f f7 80 0f f9 a0 0f fb | c0 0f fd e0 0f ff 00 10 |........|........|
|00000d80| 01 21 10 03 41 10 05 61 | 10 07 81 10 09 a1 10 0b |.!..A..a|........|
|00000d90| c1 10 0d e1 10 0f 01 11 | 11 21 11 13 41 11 15 61 |........|.!..A..a|
|00000da0| 11 17 81 11 19 a1 11 1b | c1 11 1d e1 11 1f 01 12 |........|........|
|00000db0| 21 21 12 23 41 12 25 61 | 12 27 f1 ff 00 00 00 00 |!!.#A.%a|.'......|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001000| 50 4c 45 53 32 20 20 20 | 50 44 53 20 00 00 00 00 |PLES2 |PDS ....|
|00001010| 00 00 00 00 00 00 8c ae | 43 07 02 00 00 38 00 00 |........|C....8..|
|00001020| 50 4c 45 53 33 20 20 20 | 50 44 53 20 00 00 00 00 |PLES3 |PDS ....|
|00001030| 00 00 00 00 00 00 4c ba | 6d 08 10 00 00 39 00 00 |......L.|m....9..|
|00001040| 50 4c 45 53 34 20 20 20 | 50 44 53 20 00 00 00 00 |PLES4 |PDS ....|
|00001050| 00 00 00 00 00 00 54 ba | 6d 08 1f 00 80 31 00 00 |......T.|m....1..|
|00001060| 50 4c 45 53 35 20 20 20 | 50 44 53 20 00 00 00 00 |PLES5 |PDS ....|
|00001070| 00 00 00 00 00 00 01 af | 43 07 2c 00 00 39 00 00 |........|C.,..9..|
|00001080| 50 4c 45 53 36 20 20 20 | 41 4c 47 20 00 00 00 00 |PLES6 |ALG ....|
|00001090| 00 00 00 00 00 00 08 b6 | 93 07 3b 00 00 35 00 00 |........|..;..5..|
|000010a0| 50 4c 45 53 37 20 20 20 | 50 44 53 20 00 00 00 00 |PLES7 |PDS ....|
|000010b0| 00 00 00 00 00 00 5b ba | 6d 08 49 00 80 2b 00 00 |......[.|m.I..+..|
|000010c0| 50 4c 45 53 38 20 20 20 | 50 44 53 20 00 00 00 00 |PLES8 |PDS ....|
|000010d0| 00 00 00 00 00 00 67 ba | 6d 08 54 00 80 41 00 00 |......g.|m.T..A..|
|000010e0| 4d 55 53 49 4d 50 20 20 | 43 4f 4d 20 00 00 00 00 |MUSIMP |COM ....|
|000010f0| 00 00 00 00 00 00 9f 53 | 7e 0a 65 00 c0 66 00 00 |.......S|~.e..f..|
|00001100| 41 4c 47 45 42 52 41 20 | 53 59 53 20 00 00 00 00 |ALGEBRA |SYS ....|
|00001110| 00 00 00 00 00 00 06 62 | 29 0b 7f 00 0a 50 00 00 |.......b|)....P..|
|00001120| 43 41 4c 43 55 4c 55 53 | 53 59 53 20 00 00 00 00 |CALCULUS|SYS ....|
|00001130| 00 00 00 00 00 00 57 63 | 29 0b 94 00 ca 97 00 00 |......Wc|).......|
|00001140| 4d 41 54 53 4f 4c 20 20 | 53 59 53 20 00 00 00 00 |MATSOL |SYS ....|
|00001150| 00 00 00 00 00 00 fc 63 | 29 0b ba 00 4a 6e 00 00 |.......c|)...Jn..|
|00001160| 50 44 53 20 20 20 20 20 | 53 59 53 20 00 00 00 00 |PDS |SYS ....|
|00001170| 00 00 00 00 00 00 98 63 | b5 08 d6 00 7a 56 00 00 |.......c|....zV..|
|00001180| 4d 41 54 48 20 20 20 20 | 53 59 53 20 00 00 00 00 |MATH |SYS ....|
|00001190| 00 00 00 00 00 00 24 0a | 21 00 ec 00 3a ef 00 00 |......$.|!...:...|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000015f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001680| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001720| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e00| 25 20 46 69 6c 65 3a 20 | 20 50 4c 45 53 32 2e 50 |% File: | PLES2.P|
|00001e10| 44 53 20 20 28 63 29 09 | 09 31 30 2f 30 33 2f 38 |DS (c).|.10/03/8|
|00001e20| 33 09 54 68 65 20 53 6f | 66 74 20 57 61 72 65 68 |3.The So|ft Wareh|
|00001e30| 6f 75 73 65 20 25 0d 0a | 0d 0a 0d 0a 23 45 43 48 |ouse %..|....#ECH|
|00001e40| 4f 3a 20 45 43 48 4f 20 | 24 20 45 43 48 4f 3a 20 |O: ECHO |$ ECHO: |
|00001e50| 46 41 4c 53 45 20 24 0d | 0a 0d 0a 46 55 4e 43 54 |FALSE $.|...FUNCT|
|00001e60| 49 4f 4e 20 23 50 52 49 | 4e 54 23 20 28 45 58 31 |ION #PRI|NT# (EX1|
|00001e70| 29 2c 0d 0a 20 20 20 20 | 57 48 45 4e 20 41 54 4f |),.. |WHEN ATO|
|00001e80| 4d 20 28 45 58 31 29 2c | 20 23 50 52 49 4e 54 20 |M (EX1),| #PRINT |
|00001e90| 28 45 58 31 29 20 45 58 | 49 54 2c 0d 0a 20 20 20 |(EX1) EX|IT,.. |
|00001ea0| 20 23 50 52 49 4e 54 20 | 28 4c 50 41 52 29 2c 20 | #PRINT |(LPAR), |
|00001eb0| 20 23 50 52 49 4e 54 23 | 20 28 46 49 52 53 54 20 | #PRINT#| (FIRST |
|00001ec0| 28 45 58 31 29 29 2c 20 | 20 23 50 52 49 4e 54 20 |(EX1)), | #PRINT |
|00001ed0| 28 22 20 2e 20 22 29 2c | 0d 0a 20 20 20 20 23 50 |(" . "),|.. #P|
|00001ee0| 52 49 4e 54 23 20 28 52 | 45 53 54 20 28 45 58 31 |RINT# (R|EST (EX1|
|00001ef0| 29 29 2c 20 20 23 50 52 | 49 4e 54 20 28 52 50 41 |)), #PR|INT (RPA|
|00001f00| 52 29 2c 20 20 45 58 31 | 2c 0d 0a 45 4e 44 46 55 |R), EX1|,..ENDFU|
|00001f10| 4e 20 24 0d 0a 0d 0a 43 | 4f 4e 44 20 28 57 48 45 |N $....C|OND (WHE|
|00001f20| 4e 20 4e 4f 54 20 47 45 | 54 44 20 28 27 23 50 52 |N NOT GE|TD ('#PR|
|00001f30| 49 4e 54 29 2c 0d 0a 20 | 20 4d 4f 56 44 20 28 27 |INT),.. | MOVD ('|
|00001f40| 23 50 52 49 4e 54 23 2c | 20 27 50 52 49 4e 54 2c |#PRINT#,| 'PRINT,|
|00001f50| 20 4d 4f 56 44 20 28 27 | 50 52 49 4e 54 2c 20 27 | MOVD ('|PRINT, '|
|00001f60| 23 50 52 49 4e 54 29 29 | 20 20 45 58 49 54 29 20 |#PRINT))| EXIT) |
|00001f70| 24 0d 0a 0d 0a 46 55 4e | 43 54 49 4f 4e 20 23 50 |$....FUN|CTION #P|
|00001f80| 52 49 4e 54 4c 49 4e 45 | 23 20 28 45 58 31 29 2c |RINTLINE|# (EX1),|
|00001f90| 0d 0a 20 20 50 52 49 4e | 54 20 28 45 58 31 29 2c |.. PRIN|T (EX1),|
|00001fa0| 20 4e 45 57 4c 49 4e 45 | 20 28 29 2c 20 45 58 31 | NEWLINE| (), EX1|
|00001fb0| 2c 0d 0a 45 4e 44 46 55 | 4e 20 24 0d 0a 0d 0a 43 |,..ENDFU|N $....C|
|00001fc0| 4f 4e 44 20 28 57 48 45 | 4e 20 4e 4f 54 20 47 45 |OND (WHE|N NOT GE|
|00001fd0| 54 44 20 28 27 23 50 52 | 49 4e 54 4c 49 4e 45 29 |TD ('#PR|INTLINE)|
|00001fe0| 2c 0d 0a 20 20 4d 4f 56 | 44 20 28 27 23 50 52 49 |,.. MOV|D ('#PRI|
|00001ff0| 4e 54 4c 49 4e 45 23 2c | 20 27 50 52 49 4e 54 4c |NTLINE#,| 'PRINTL|
|00002000| 49 4e 45 2c 20 4d 4f 56 | 44 20 28 27 50 52 49 4e |INE, MOV|D ('PRIN|
|00002010| 54 4c 49 4e 45 2c 20 27 | 23 50 52 49 4e 54 4c 49 |TLINE, '|#PRINTLI|
|00002020| 4e 45 29 29 2c 20 20 45 | 58 49 54 29 20 24 0d 0a |NE)), E|XIT) $..|
|00002030| 0d 0a 23 45 43 48 4f 3a | 20 45 43 48 4f 20 24 45 |..#ECHO:| ECHO $E|
|00002040| 43 48 4f 3a 20 54 52 55 | 45 20 24 20 0d 0a 25 20 |CHO: TRU|E $ ..% |
|00002050| 54 68 69 73 20 69 73 20 | 74 68 65 20 73 65 63 6f |This is |the seco|
|00002060| 6e 64 20 6f 66 20 61 20 | 73 65 71 75 65 6e 63 65 |nd of a |sequence|
|00002070| 20 6f 66 20 6d 75 53 49 | 4d 50 20 70 72 6f 67 72 | of muSI|MP progr|
|00002080| 61 6d 6d 69 6e 67 20 6c | 65 73 73 6f 6e 73 2c 20 |amming l|essons, |
|00002090| 72 65 71 75 69 72 69 6e | 67 20 0d 0a 61 6e 20 61 |requirin|g ..an a|
|000020a0| 76 65 72 61 67 65 20 6f | 66 20 35 30 20 6d 69 6e |verage o|f 50 min|
|000020b0| 75 74 65 73 2e 20 20 54 | 68 65 20 50 44 53 20 44 |utes. T|he PDS D|
|000020c0| 45 42 55 47 2e 4d 55 53 | 20 61 6e 64 20 44 49 53 |EBUG.MUS| and DIS|
|000020d0| 50 4c 41 59 2e 4d 55 53 | 20 66 69 6c 65 73 20 73 |PLAY.MUS| files s|
|000020e0| 68 6f 75 6c 64 20 62 65 | 20 0d 0a 70 72 65 73 65 |hould be| ..prese|
|000020f0| 6e 74 2e 20 45 44 49 54 | 2e 4d 55 53 20 73 68 6f |nt. EDIT|.MUS sho|
|00002100| 75 6c 64 20 61 6c 73 6f | 20 62 65 20 70 72 65 73 |uld also| be pres|
|00002110| 65 6e 74 20 69 66 20 69 | 74 20 77 6f 72 6b 73 20 |ent if i|t works |
|00002120| 66 6f 72 20 79 6f 75 72 | 20 74 65 72 6d 69 6e 61 |for your| termina|
|00002130| 6c 2e 0d 0a 0d 0a 49 66 | 20 79 6f 75 20 68 61 76 |l.....If| you hav|
|00002140| 65 20 61 20 70 72 69 6e | 74 65 72 2c 20 79 6f 75 |e a prin|ter, you|
|00002150| 20 6d 61 79 20 77 69 73 | 68 20 74 6f 20 74 75 72 | may wis|h to tur|
|00002160| 6e 20 69 74 20 6f 6e 20 | 66 6f 72 20 61 20 72 65 |n it on |for a re|
|00002170| 63 6f 72 64 20 6f 66 20 | 74 68 69 73 20 0d 0a 64 |cord of |this ..d|
|00002180| 69 61 6c 6f 67 75 65 2e | 20 20 4d 6f 73 74 20 6f |ialogue.| Most o|
|00002190| 70 65 72 61 74 69 6e 67 | 20 73 79 73 74 65 6d 73 |perating| systems|
|000021a0| 2c 20 75 73 65 20 43 54 | 52 4c 2d 50 20 74 6f 20 |, use CT|RL-P to |
|000021b0| 74 6f 67 67 6c 65 20 74 | 68 65 20 70 72 69 6e 74 |toggle t|he print|
|000021c0| 65 72 20 73 74 61 74 75 | 73 2e 20 20 0d 0a 53 6f |er statu|s. ..So|
|000021d0| 6d 65 20 6f 70 65 72 61 | 74 69 6e 67 20 73 79 73 |me opera|ting sys|
|000021e0| 74 65 6d 73 20 68 61 76 | 65 20 61 20 50 52 69 6e |tems hav|e a PRin|
|000021f0| 54 53 43 72 65 65 6e 20 | 6b 65 79 20 74 68 61 74 |TSCreen |key that|
|00002200| 20 73 65 6e 64 73 20 74 | 68 65 20 63 75 72 72 65 | sends t|he curre|
|00002210| 6e 74 20 73 63 72 65 65 | 6e 20 0d 0a 63 6f 6e 74 |nt scree|n ..cont|
|00002220| 65 6e 74 73 20 74 6f 20 | 74 68 65 20 70 72 69 6e |ents to |the prin|
|00002230| 74 65 72 2e 20 25 3b 0d | 0a 25 20 46 69 72 73 74 |ter. %;.|.% First|
|00002240| 20 6c 65 74 27 73 20 77 | 72 69 74 65 20 61 20 66 | let's w|rite a f|
|00002250| 75 6e 63 74 69 6f 6e 20 | 74 68 61 74 20 63 6f 75 |unction |that cou|
|00002260| 6e 74 73 20 74 68 65 20 | 61 74 6f 6d 73 20 69 6e |nts the |atoms in|
|00002270| 20 69 74 73 20 61 72 67 | 75 6d 65 6e 74 2c 20 63 | its arg|ument, c|
|00002280| 6f 75 6e 74 69 6e 67 20 | 0d 0a 65 61 63 68 20 69 |ounting |..each i|
|00002290| 6e 73 74 61 6e 63 65 20 | 6f 66 20 61 6e 20 61 74 |nstance |of an at|
|000022a0| 6f 6d 20 65 76 65 6e 20 | 69 66 20 69 74 20 6f 63 |om even |if it oc|
|000022b0| 63 75 72 73 20 6d 6f 72 | 65 20 74 68 61 6e 20 6f |curs mor|e than o|
|000022c0| 6e 63 65 2e 0d 0a 0d 0a | 54 72 65 65 73 20 63 61 |nce.....|Trees ca|
|000022d0| 6e 20 62 65 20 61 72 62 | 69 74 72 61 72 69 6c 79 |n be arb|itrarily|
|000022e0| 20 62 72 61 6e 63 68 65 | 64 2c 20 73 6f 20 68 6f | branche|d, so ho|
|000022f0| 77 20 63 61 6e 20 77 65 | 20 61 6e 74 69 63 69 70 |w can we| anticip|
|00002300| 61 74 65 20 61 6c 6c 20 | 70 6f 73 73 69 62 69 6c |ate all |possibil|
|00002310| 69 74 69 65 73 3f 0d 0a | 54 6f 20 70 72 6f 63 72 |ities?..|To procr|
|00002320| 61 73 74 69 6e 61 74 65 | 2c 20 6c 65 74 27 73 20 |astinate|, let's |
|00002330| 64 69 73 70 6f 73 65 20 | 6f 66 20 61 20 74 72 69 |dispose |of a tri|
|00002340| 76 69 61 6c 20 63 61 73 | 65 20 62 65 66 6f 72 65 |vial cas|e before|
|00002350| 20 77 6f 72 72 79 69 6e | 67 20 61 62 6f 75 74 20 | worryin|g about |
|00002360| 0d 0a 68 61 72 64 65 72 | 20 6f 6e 65 73 3a 20 20 |..harder| ones: |
|00002370| 54 68 65 72 65 20 69 73 | 20 65 78 61 63 74 6c 79 |There is| exactly|
|00002380| 20 31 20 61 74 6f 6d 20 | 69 66 20 74 68 65 20 61 | 1 atom |if the a|
|00002390| 72 67 75 6d 65 6e 74 20 | 69 73 20 61 6e 20 61 74 |rgument |is an at|
|000023a0| 6f 6d 2e 20 25 3b 0d 0a | 25 20 46 6f 72 20 61 20 |om. %;..|% For a |
|000023b0| 6e 6f 64 65 2c 20 69 66 | 20 77 65 20 6b 6e 6f 77 |node, if| we know|
|000023c0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 61 | the num|ber of a|
|000023d0| 74 6f 6d 73 20 66 6f 72 | 20 74 68 65 20 46 49 52 |toms for| the FIR|
|000023e0| 53 54 20 70 61 72 74 20 | 61 6e 64 20 66 6f 72 20 |ST part |and for |
|000023f0| 74 68 65 20 0d 0a 52 45 | 53 54 20 70 61 72 74 2c |the ..RE|ST part,|
|00002400| 20 74 68 65 6e 20 74 68 | 65 20 6e 75 6d 62 65 72 | then th|e number|
|00002410| 20 66 6f 72 20 74 68 65 | 20 77 68 6f 6c 65 20 61 | for the| whole a|
|00002420| 67 67 72 65 67 61 74 65 | 20 69 73 20 6d 65 72 65 |ggregate| is mere|
|00002430| 6c 79 20 74 68 65 69 72 | 20 73 75 6d 2e 0d 0a 0d |ly their| sum....|
|00002440| 0a 54 6f 20 64 65 74 65 | 72 6d 69 6e 65 20 74 68 |.To dete|rmine th|
|00002450| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 61 74 6f 6d |e number| of atom|
|00002460| 73 20 69 6e 20 74 68 65 | 73 65 20 70 61 72 74 73 |s in the|se parts|
|00002470| 2c 20 77 65 20 63 61 6e | 20 52 45 43 55 52 53 49 |, we can| RECURSI|
|00002480| 56 45 4c 59 20 75 73 65 | 20 74 68 65 20 0d 0a 76 |VELY use| the ..v|
|00002490| 65 72 79 20 66 75 6e 63 | 74 69 6f 6e 20 77 65 20 |ery func|tion we |
|000024a0| 61 72 65 20 64 65 66 69 | 6e 69 6e 67 21 0d 0a 0d |are defi|ning!...|
|000024b0| 0a 53 69 6e 63 65 20 65 | 61 63 68 20 70 61 72 74 |.Since e|ach part|
|000024c0| 20 69 73 20 63 6f 75 6e | 74 61 62 6c 79 20 73 6d | is coun|tably sm|
|000024d0| 61 6c 6c 65 72 20 74 68 | 61 6e 20 74 68 65 20 77 |aller th|an the w|
|000024e0| 68 6f 6c 65 2c 20 74 68 | 65 20 72 65 63 75 72 73 |hole, th|e recurs|
|000024f0| 69 6f 6e 20 6d 61 6b 65 | 73 20 0d 0a 66 69 6e 69 |ion make|s ..fini|
|00002500| 74 65 20 70 72 6f 67 72 | 65 73 73 20 74 6f 77 61 |te progr|ess towa|
|00002510| 72 64 20 74 68 65 20 74 | 65 72 6d 69 6e 61 6c 20 |rd the t|erminal |
|00002520| 61 74 6f 6d 69 63 20 63 | 61 73 65 2e 20 20 43 6f |atomic c|ase. Co|
|00002530| 6e 73 65 71 75 65 6e 74 | 6c 79 20 74 68 65 20 72 |nsequent|ly the r|
|00002540| 65 63 75 72 73 69 6f 6e | 73 20 0d 0a 6d 75 73 74 |ecursion|s ..must|
|00002550| 20 65 76 65 6e 74 75 61 | 6c 6c 79 20 74 65 72 6d | eventua|lly term|
|00002560| 69 6e 61 74 65 3a 20 25 | 0d 0a 0d 0a 46 55 4e 43 |inate: %|....FUNC|
|00002570| 54 49 4f 4e 20 23 41 54 | 4f 4d 53 20 28 55 29 2c |TION #AT|OMS (U),|
|00002580| 0d 0a 20 20 57 48 45 4e | 20 41 54 4f 4d 20 28 55 |.. WHEN| ATOM (U|
|00002590| 29 2c 20 20 31 20 20 45 | 58 49 54 2c 0d 0a 20 20 |), 1 E|XIT,.. |
|000025a0| 23 41 54 4f 4d 53 20 28 | 46 49 52 53 54 20 28 55 |#ATOMS (|FIRST (U|
|000025b0| 29 29 20 20 2b 20 20 23 | 41 54 4f 4d 53 20 28 52 |)) + #|ATOMS (R|
|000025c0| 45 53 54 20 28 55 29 29 | 0d 0a 45 4e 44 46 55 4e |EST (U))|..ENDFUN|
|000025d0| 20 26 20 25 20 48 65 72 | 65 20 77 65 20 69 6e 74 | & % Her|e we int|
|000025e0| 72 6f 64 75 63 65 20 74 | 77 6f 20 6e 65 77 20 63 |roduce t|wo new c|
|000025f0| 6f 6e 63 65 70 74 73 3a | 0d 0a 0d 0a 54 68 65 20 |oncepts:|....The |
|00002600| 42 4f 44 59 20 6f 66 20 | 61 20 66 75 6e 63 74 69 |BODY of |a functi|
|00002610| 6f 6e 20 69 73 20 61 20 | 73 65 71 75 65 6e 63 65 |on is a |sequence|
|00002620| 20 6f 66 20 65 78 70 72 | 65 73 73 69 6f 6e 73 20 | of expr|essions |
|00002630| 73 65 70 61 72 61 74 65 | 64 20 62 79 20 63 6f 6d |separate|d by com|
|00002640| 6d 61 73 2e 0d 0a 0d 0a | 41 20 43 4f 4e 44 49 54 |mas.....|A CONDIT|
|00002650| 49 4f 4e 41 4c 2d 45 58 | 49 54 20 69 73 20 61 6e |IONAL-EX|IT is an|
|00002660| 20 65 78 70 72 65 73 73 | 69 6f 6e 20 63 6f 6e 73 | express|ion cons|
|00002670| 69 73 74 69 6e 67 20 6f | 66 20 61 20 73 65 71 75 |isting o|f a sequ|
|00002680| 65 6e 63 65 20 6f 66 20 | 6f 6e 65 20 6f 72 20 6d |ence of |one or m|
|00002690| 6f 72 65 20 0d 0a 65 78 | 70 72 65 73 73 69 6f 6e |ore ..ex|pression|
|000026a0| 73 20 6e 65 73 74 65 64 | 20 62 65 74 77 65 65 6e |s nested| between|
|000026b0| 20 74 68 65 20 6d 61 74 | 63 68 69 6e 67 20 70 61 | the mat|ching pa|
|000026c0| 69 72 20 6f 66 20 77 6f | 72 64 73 20 57 48 45 4e |ir of wo|rds WHEN|
|000026d0| 20 61 6e 64 20 45 58 49 | 54 2e 20 25 3b 44 49 53 | and EXI|T. %;DIS|
|000026e0| 50 4c 41 59 20 28 27 23 | 41 54 4f 4d 53 29 20 24 |PLAY ('#|ATOMS) $|
|000026f0| 0d 0a 25 20 57 68 65 6e | 20 61 20 66 75 6e 63 74 |..% When| a funct|
|00002700| 69 6f 6e 20 69 73 20 41 | 50 50 4c 49 45 44 2c 20 |ion is A|PPLIED, |
|00002710| 74 68 65 20 65 78 70 72 | 65 73 73 69 6f 6e 73 20 |the expr|essions |
|00002720| 69 6e 20 74 68 65 20 62 | 6f 64 79 20 61 72 65 20 |in the b|ody are |
|00002730| 65 76 61 6c 75 61 74 65 | 64 20 0d 0a 73 65 71 75 |evaluate|d ..sequ|
|00002740| 65 6e 74 69 61 6c 6c 79 | 20 75 6e 74 69 6c 20 45 |entially| until E|
|00002750| 4e 44 46 55 4e 20 69 73 | 20 72 65 61 63 68 65 64 |NDFUN is| reached|
|00002760| 2c 20 75 6e 6c 65 73 73 | 20 61 20 63 6f 6e 64 69 |, unless| a condi|
|00002770| 74 69 6f 6e 61 6c 20 65 | 78 69 74 20 63 61 75 73 |tional e|xit caus|
|00002780| 65 73 20 61 6e 20 0d 0a | 65 61 72 6c 69 65 72 20 |es an ..|earlier |
|00002790| 65 78 69 74 2e 0d 0a 0d | 0a 46 6f 72 20 61 20 63 |exit....|.For a c|
|000027a0| 6f 6e 64 69 74 69 6f 6e | 61 6c 20 65 78 69 74 2c |ondition|al exit,|
|000027b0| 20 74 68 65 20 66 69 72 | 73 74 20 65 78 70 72 65 | the fir|st expre|
|000027c0| 73 73 69 6f 6e 20 61 66 | 74 65 72 20 57 48 45 4e |ssion af|ter WHEN|
|000027d0| 20 69 73 20 65 76 61 6c | 75 61 74 65 64 2e 20 20 | is eval|uated. |
|000027e0| 49 66 20 74 68 65 20 0d | 0a 76 61 6c 75 65 20 69 |If the .|.value i|
|000027f0| 73 20 46 41 4c 53 45 2c | 20 74 68 65 6e 20 65 76 |s FALSE,| then ev|
|00002800| 61 6c 75 61 74 69 6f 6e | 20 70 72 6f 63 65 65 64 |aluation| proceed|
|00002810| 73 20 74 6f 20 74 68 65 | 20 70 6f 69 6e 74 20 69 |s to the| point i|
|00002820| 6d 6d 65 64 69 61 74 65 | 6c 79 20 66 6f 6c 6c 6f |mmediate|ly follo|
|00002830| 77 69 6e 67 20 0d 0a 74 | 68 65 20 6d 61 74 63 68 |wing ..t|he match|
|00002840| 69 6e 67 20 45 58 49 54 | 2e 20 20 4f 74 68 65 72 |ing EXIT|. Other|
|00002850| 77 69 73 65 2c 20 65 76 | 61 6c 75 61 74 69 6f 6e |wise, ev|aluation|
|00002860| 20 70 72 6f 63 65 65 64 | 73 20 73 65 71 75 65 6e | proceed|s sequen|
|00002870| 74 69 61 6c 6c 79 20 74 | 68 72 6f 75 67 68 20 61 |tially t|hrough a|
|00002880| 6e 79 20 0d 0a 72 65 6d | 61 69 6e 69 6e 67 20 65 |ny ..rem|aining e|
|00002890| 78 70 72 65 73 73 69 6f | 6e 73 20 69 6e 20 74 68 |xpressio|ns in th|
|000028a0| 65 20 63 6f 6e 64 69 74 | 69 6f 6e 61 6c 20 65 78 |e condit|ional ex|
|000028b0| 69 74 20 61 73 20 69 66 | 20 74 68 65 20 62 6f 64 |it as if| the bod|
|000028c0| 79 20 6f 66 20 74 68 65 | 20 0d 0a 63 6f 6e 64 69 |y of the| ..condi|
|000028d0| 74 69 6f 6e 61 6c 20 65 | 78 69 74 20 72 65 70 6c |tional e|xit repl|
|000028e0| 61 63 65 64 20 74 68 61 | 74 20 6f 66 20 74 68 65 |aced tha|t of the|
|000028f0| 20 66 75 6e 63 74 69 6f | 6e 2e 0d 0a 0d 0a 54 68 | functio|n.....Th|
|00002900| 65 20 76 61 6c 75 65 20 | 6f 66 20 61 20 63 6f 6e |e value |of a con|
|00002910| 64 69 74 69 6f 6e 61 6c | 20 65 78 69 74 20 69 73 |ditional| exit is|
|00002920| 20 74 68 61 74 20 6f 66 | 20 74 68 65 20 6c 61 73 | that of| the las|
|00002930| 74 20 65 78 70 72 65 73 | 73 69 6f 6e 20 65 76 61 |t expres|sion eva|
|00002940| 6c 75 61 74 65 64 20 0d | 0a 74 68 65 72 65 69 6e |luated .|.therein|
|00002950| 2c 20 61 6e 64 20 74 68 | 65 20 76 61 6c 75 65 20 |, and th|e value |
|00002960| 72 65 74 75 72 6e 65 64 | 20 62 79 20 61 20 66 75 |returned| by a fu|
|00002970| 6e 63 74 69 6f 6e 20 69 | 73 20 74 68 61 74 20 6f |nction i|s that o|
|00002980| 66 20 74 68 65 20 6c 61 | 73 74 20 65 78 70 72 65 |f the la|st expre|
|00002990| 73 73 69 6f 6e 20 0d 0a | 65 76 61 6c 75 61 74 65 |ssion ..|evaluate|
|000029a0| 64 20 74 68 65 72 65 69 | 6e 20 77 68 65 6e 20 74 |d therei|n when t|
|000029b0| 68 65 20 66 75 6e 63 74 | 69 6f 6e 20 69 73 20 61 |he funct|ion is a|
|000029c0| 70 70 6c 69 65 64 20 25 | 3b 20 44 49 53 50 4c 41 |pplied %|; DISPLA|
|000029d0| 59 20 28 27 23 41 54 4f | 4d 53 29 20 24 0d 0a 25 |Y ('#ATO|MS) $..%|
|000029e0| 20 49 74 20 6d 61 79 20 | 73 65 65 6d 20 6c 69 6b | It may |seem lik|
|000029f0| 65 20 63 68 65 61 74 69 | 6e 67 20 74 6f 20 72 65 |e cheati|ng to re|
|00002a00| 66 65 72 20 74 6f 20 74 | 68 65 20 66 75 6e 63 74 |fer to t|he funct|
|00002a10| 69 6f 6e 20 77 65 20 61 | 72 65 20 64 65 66 69 6e |ion we a|re defin|
|00002a20| 69 6e 67 20 66 72 6f 6d | 20 0d 0a 77 69 74 68 69 |ing from| ..withi|
|00002a30| 6e 20 74 68 65 20 64 65 | 66 69 6e 69 74 69 6f 6e |n the de|finition|
|00002a40| 20 69 74 73 65 6c 66 2e | 20 20 48 6f 77 65 76 65 | itself.| Howeve|
|00002a50| 72 2c 20 74 68 65 20 64 | 65 66 69 6e 69 74 69 6f |r, the d|efinitio|
|00002a60| 6e 20 69 73 20 6e 6f 74 | 20 61 63 74 75 61 6c 6c |n is not| actuall|
|00002a70| 79 20 0d 0a 41 50 50 4c | 49 45 44 20 75 6e 74 69 |y ..APPL|IED unti|
|00002a80| 6c 20 61 66 74 65 72 20 | 69 74 73 20 64 65 66 69 |l after |its defi|
|00002a90| 6e 69 74 69 6f 6e 20 69 | 73 20 63 6f 6d 70 6c 65 |nition i|s comple|
|00002aa0| 74 65 2c 20 73 6f 20 70 | 65 72 68 61 70 73 20 69 |te, so p|erhaps i|
|00002ab0| 74 20 77 69 6c 6c 20 77 | 6f 72 6b 3a 20 25 0d 0a |t will w|ork: %..|
|00002ac0| 0d 0a 23 41 54 4f 4d 53 | 20 28 27 46 4f 4f 29 20 |..#ATOMS| ('FOO) |
|00002ad0| 26 20 23 41 54 4f 4d 53 | 20 28 27 28 28 39 20 2e |& #ATOMS| ('((9 .|
|00002ae0| 20 4c 69 76 65 73 29 20 | 2e 20 43 61 74 29 29 20 | Lives) |. Cat)) |
|00002af0| 26 0d 0a 25 20 49 74 20 | 6c 6f 6f 6b 73 20 70 72 |&..% It |looks pr|
|00002b00| 6f 6d 69 73 69 6e 67 2c | 20 62 75 74 20 69 74 20 |omising,| but it |
|00002b10| 69 73 20 73 74 69 6c 6c | 20 70 65 72 68 61 70 73 |is still| perhaps|
|00002b20| 20 6d 79 73 74 65 72 69 | 6f 75 73 20 68 6f 77 20 | mysteri|ous how |
|00002b30| 6d 75 53 49 4d 50 20 61 | 6e 64 20 0d 0a 23 41 54 |muSIMP a|nd ..#AT|
|00002b40| 4f 4d 53 20 6b 65 65 70 | 20 74 72 61 63 6b 20 6f |OMS keep| track o|
|00002b50| 66 20 61 6c 6c 20 6f 66 | 20 74 68 65 73 65 20 72 |f all of| these r|
|00002b60| 65 63 75 72 73 69 76 65 | 20 66 75 6e 63 74 69 6f |ecursive| functio|
|00002b70| 6e 20 69 6e 76 6f 63 61 | 74 69 6f 6e 73 2e 20 20 |n invoca|tions. |
|00002b80| 53 69 6e 63 65 20 74 68 | 65 20 0d 0a 64 65 62 75 |Since th|e ..debu|
|00002b90| 67 20 70 61 63 6b 61 67 | 65 20 69 73 20 73 75 70 |g packag|e is sup|
|00002ba0| 70 6f 73 65 64 6c 79 20 | 6c 6f 61 64 65 64 2c 20 |posedly |loaded, |
|00002bb0| 77 65 20 63 61 6e 20 74 | 72 61 63 65 20 74 68 65 |we can t|race the|
|00002bc0| 20 65 78 65 63 75 74 69 | 6f 6e 20 6f 66 20 23 41 | executi|on of #A|
|00002bd0| 54 4f 4d 53 2e 0d 0a 0d | 0a 54 6f 20 6d 61 6b 65 |TOMS....|.To make|
|00002be0| 20 74 68 65 20 61 72 67 | 75 6d 65 6e 74 73 20 6f | the arg|uments o|
|00002bf0| 66 20 74 72 61 63 65 64 | 20 66 75 6e 63 74 69 6f |f traced| functio|
|00002c00| 6e 73 20 62 65 20 64 69 | 73 70 6c 61 79 65 64 20 |ns be di|splayed |
|00002c10| 69 6e 20 64 6f 74 74 65 | 64 2d 70 61 69 72 20 72 |in dotte|d-pair r|
|00002c20| 61 74 68 65 72 20 0d 0a | 74 68 61 6e 20 6d 61 74 |ather ..|than mat|
|00002c30| 68 20 6e 6f 74 61 74 69 | 6f 6e 3a 20 25 0d 0a 0d |h notati|on: %...|
|00002c40| 0a 4d 41 54 48 54 52 41 | 43 45 3a 20 46 41 4c 53 |.MATHTRA|CE: FALS|
|00002c50| 45 20 26 0d 0a 25 20 57 | 68 65 6e 65 76 65 72 20 |E &..% W|henever |
|00002c60| 61 20 74 72 61 63 65 64 | 20 66 75 6e 63 74 69 6f |a traced| functio|
|00002c70| 6e 20 69 73 20 65 6e 74 | 65 72 65 64 2c 20 69 74 |n is ent|ered, it|
|00002c80| 20 64 69 73 70 6c 61 79 | 73 20 74 68 65 20 64 65 | display|s the de|
|00002c90| 70 74 68 20 6f 66 20 75 | 6e 74 65 72 6d 69 6e 61 |pth of u|ntermina|
|00002ca0| 74 65 64 20 0d 0a 74 72 | 61 63 65 64 20 66 75 6e |ted ..tr|aced fun|
|00002cb0| 63 74 69 6f 6e 20 63 61 | 6c 6c 73 20 66 6f 6c 6c |ction ca|lls foll|
|00002cc0| 6f 77 65 64 20 62 79 20 | 74 68 65 20 66 75 6e 63 |owed by |the func|
|00002cd0| 74 69 6f 6e 20 6e 61 6d | 65 20 77 69 74 68 20 69 |tion nam|e with i|
|00002ce0| 74 73 20 70 61 72 61 6d | 65 74 65 72 20 6e 61 6d |ts param|eter nam|
|00002cf0| 65 73 20 0d 0a 61 6e 64 | 20 61 72 67 75 6d 65 6e |es ..and| argumen|
|00002d00| 74 73 20 76 61 6c 75 65 | 73 2c 20 69 6e 64 65 6e |ts value|s, inden|
|00002d10| 74 65 64 20 61 63 63 6f | 72 64 69 6e 67 20 74 6f |ted acco|rding to|
|00002d20| 20 74 68 65 20 64 69 73 | 70 6c 61 79 65 64 20 64 | the dis|played d|
|00002d30| 65 70 74 68 2e 0d 0a 0d | 0a 4d 6f 72 65 6f 76 65 |epth....|.Moreove|
|00002d40| 72 2c 20 65 76 65 72 79 | 20 74 69 6d 65 20 61 20 |r, every| time a |
|00002d50| 74 72 61 63 65 64 20 66 | 75 6e 63 74 69 6f 6e 20 |traced f|unction |
|00002d60| 69 73 20 65 78 69 74 65 | 64 2c 20 69 74 20 64 69 |is exite|d, it di|
|00002d70| 73 70 6c 61 79 73 20 74 | 68 65 20 64 65 70 74 68 |splays t|he depth|
|00002d80| 20 61 6e 64 20 0d 0a 74 | 68 65 20 63 6f 72 72 65 | and ..t|he corre|
|00002d90| 73 70 6f 6e 64 69 6e 67 | 6c 79 20 69 6e 64 65 6e |sponding|ly inden|
|00002da0| 74 65 64 20 66 75 6e 63 | 74 69 6f 6e 20 6e 61 6d |ted func|tion nam|
|00002db0| 65 20 66 6f 6c 6c 6f 77 | 65 64 20 62 79 20 74 68 |e follow|ed by th|
|00002dc0| 65 20 72 65 74 75 72 6e | 65 64 20 76 61 6c 75 65 |e return|ed value|
|00002dd0| 2e 20 25 3b 0d 0a 25 20 | 54 6f 20 72 65 66 72 65 |. %;..% |To refre|
|00002de0| 73 68 20 6f 75 72 20 6d | 65 6d 6f 72 79 20 6f 66 |sh our m|emory of|
|00002df0| 20 74 68 65 20 64 65 66 | 69 6e 69 74 69 6f 6e 2c | the def|inition,|
|00002e00| 20 74 68 65 6e 20 74 72 | 61 63 65 20 61 6e 20 65 | then tr|ace an e|
|00002e10| 78 61 6d 70 6c 65 3a 20 | 25 0d 0a 0d 0a 44 49 53 |xample: |%....DIS|
|00002e20| 50 4c 41 59 20 28 27 23 | 41 54 4f 4d 53 29 20 24 |PLAY ('#|ATOMS) $|
|00002e30| 20 54 52 41 43 45 20 28 | 27 23 41 54 4f 4d 53 29 | TRACE (|'#ATOMS)|
|00002e40| 20 24 20 23 41 54 4f 4d | 53 20 28 27 28 28 39 20 | $ #ATOM|S ('((9 |
|00002e50| 2e 20 4c 69 76 65 73 29 | 20 2e 20 43 61 74 29 29 |. Lives)| . Cat))|
|00002e60| 20 26 0d 0a 25 20 54 72 | 61 63 65 20 61 6c 6c 20 | &..% Tr|ace all |
|00002e70| 72 65 63 75 72 73 69 76 | 65 20 65 78 61 6d 70 6c |recursiv|e exampl|
|00002e80| 65 73 20 69 6e 20 74 68 | 65 73 65 20 6c 65 73 73 |es in th|ese less|
|00002e90| 6f 6e 73 20 75 6e 74 69 | 6c 20 79 6f 75 20 62 65 |ons unti|l you be|
|00002ea0| 63 6f 6d 65 20 71 75 69 | 74 65 20 0d 0a 63 6f 6d |come qui|te ..com|
|00002eb0| 66 6f 72 74 61 62 6c 65 | 20 77 69 74 68 20 72 65 |fortable| with re|
|00002ec0| 63 75 72 73 69 6f 6e 2e | 20 20 59 6f 75 20 73 68 |cursion.| You sh|
|00002ed0| 6f 75 6c 64 20 61 6c 73 | 6f 20 66 69 6e 64 20 74 |ould als|o find t|
|00002ee0| 72 61 63 69 6e 67 20 74 | 6f 20 62 65 20 61 6e 20 |racing t|o be an |
|00002ef0| 0d 0a 65 78 74 72 61 6f | 72 64 69 6e 61 72 69 6c |..extrao|rdinaril|
|00002f00| 79 20 70 6f 77 65 72 66 | 75 6c 20 64 65 62 75 67 |y powerf|ul debug|
|00002f10| 67 69 6e 67 20 74 6f 6f | 6c 2e 0d 0a 0d 0a 54 6f |ging too|l.....To|
|00002f20| 20 43 4c 45 41 52 20 74 | 68 65 20 74 72 61 63 69 | CLEAR t|he traci|
|00002f30| 6e 67 20 66 72 6f 6d 20 | 23 41 54 4f 4d 53 3a 20 |ng from |#ATOMS: |
|00002f40| 25 0d 0a 0d 0a 43 4c 45 | 41 52 20 28 27 23 41 54 |%....CLE|AR ('#AT|
|00002f50| 4f 4d 53 29 20 26 20 23 | 41 54 4f 4d 53 20 28 27 |OMS) & #|ATOMS ('|
|00002f60| 28 28 39 20 2e 20 4c 69 | 76 65 73 29 20 2e 20 43 |((9 . Li|ves) . C|
|00002f70| 61 74 29 29 20 26 0d 0a | 25 20 54 68 65 20 66 6f |at)) &..|% The fo|
|00002f80| 6c 6c 6f 77 69 6e 67 20 | 63 6f 75 6e 74 73 20 6f |llowing |counts o|
|00002f90| 6e 6c 79 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |nly the |number o|
|00002fa0| 66 20 69 6e 74 65 67 65 | 72 73 20 69 6e 20 69 74 |f intege|rs in it|
|00002fb0| 73 20 61 72 67 75 6d 65 | 6e 74 3a 20 25 0d 0a 0d |s argume|nt: %...|
|00002fc0| 0a 46 55 4e 43 54 49 4f | 4e 20 23 49 4e 54 45 47 |.FUNCTIO|N #INTEG|
|00002fd0| 45 52 53 20 28 55 29 2c | 0d 0a 20 20 57 48 45 4e |ERS (U),|.. WHEN|
|00002fe0| 20 49 4e 54 45 47 45 52 | 20 28 55 29 2c 20 20 31 | INTEGER| (U), 1|
|00002ff0| 20 20 45 58 49 54 2c 0d | 0a 20 20 57 48 45 4e 20 | EXIT,.|. WHEN |
|00003000| 41 54 4f 4d 20 28 55 29 | 2c 20 20 30 20 20 45 58 |ATOM (U)|, 0 EX|
|00003010| 49 54 2c 0d 0a 20 20 23 | 49 4e 54 45 47 45 52 53 |IT,.. #|INTEGERS|
|00003020| 20 28 46 49 52 53 54 20 | 28 55 29 29 20 20 2b 20 | (FIRST |(U)) + |
|00003030| 20 23 49 4e 54 45 47 45 | 52 53 20 28 52 45 53 54 | #INTEGE|RS (REST|
|00003040| 20 28 55 29 29 0d 0a 45 | 4e 44 46 55 4e 20 24 20 | (U))..E|NDFUN $ |
|00003050| 54 52 41 43 45 20 28 27 | 23 49 4e 54 45 47 45 52 |TRACE ('|#INTEGER|
|00003060| 53 29 20 24 20 23 49 4e | 54 45 47 45 52 53 20 28 |S) $ #IN|TEGERS (|
|00003070| 27 28 28 39 20 2e 20 4c | 69 76 65 73 29 20 2e 20 |'((9 . L|ives) . |
|00003080| 31 33 29 29 20 26 0d 0a | 25 20 4e 6f 77 2c 20 75 |13)) &..|% Now, u|
|00003090| 73 69 6e 67 20 23 49 4e | 54 45 47 45 52 53 20 61 |sing #IN|TEGERS a|
|000030a0| 73 20 61 20 6d 6f 64 65 | 6c 2c 20 74 72 79 20 77 |s a mode|l, try w|
|000030b0| 72 69 74 69 6e 67 20 61 | 20 66 75 6e 63 74 69 6f |riting a| functio|
|000030c0| 6e 20 6e 61 6d 65 64 20 | 23 4e 41 4d 45 53 20 74 |n named |#NAMES t|
|000030d0| 68 61 74 20 0d 0a 72 65 | 74 75 72 6e 73 20 74 68 |hat ..re|turns th|
|000030e0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6e 61 6d 65 |e number| of name|
|000030f0| 73 20 69 6e 20 69 74 73 | 20 61 72 67 75 6d 65 6e |s in its| argumen|
|00003100| 74 2e 0d 0a 0d 0a 57 69 | 74 68 20 50 44 53 2c 20 |t.....Wi|th PDS, |
|00003110| 74 68 65 20 65 61 73 69 | 65 73 74 20 77 61 79 20 |the easi|est way |
|00003120| 74 6f 20 64 6f 20 74 68 | 69 73 20 69 73 20 74 6f |to do th|is is to|
|00003130| 20 43 4c 45 41 52 20 74 | 72 61 63 69 6e 67 20 66 | CLEAR t|racing f|
|00003140| 72 6f 6d 20 23 49 4e 54 | 45 47 45 52 53 2c 20 74 |rom #INT|EGERS, t|
|00003150| 68 65 6e 20 0d 0a 65 6e | 74 65 72 20 74 68 65 20 |hen ..en|ter the |
|00003160| 63 6f 6d 6d 61 6e 64 0d | 0a 0d 0a 45 44 49 54 20 |command.|...EDIT |
|00003170| 28 27 23 49 4e 54 45 47 | 45 52 53 29 20 26 0d 0a |('#INTEG|ERS) &..|
|00003180| 0d 0a 74 68 65 6e 20 63 | 68 61 6e 67 65 20 23 49 |..then c|hange #I|
|00003190| 4e 54 45 47 45 52 53 20 | 74 6f 20 23 4e 41 4d 45 |NTEGERS |to #NAME|
|000031a0| 53 20 74 68 72 6f 75 67 | 68 6f 75 74 20 61 6e 64 |S throug|hout and|
|000031b0| 20 6d 61 6b 65 20 61 6e | 79 20 6f 74 68 65 72 20 | make an|y other |
|000031c0| 61 70 70 72 6f 70 72 69 | 61 74 65 20 0d 0a 63 68 |appropri|ate ..ch|
|000031d0| 61 6e 67 65 73 2e 20 20 | 53 69 6e 63 65 20 74 68 |anges. |Since th|
|000031e0| 65 20 72 65 73 75 6c 74 | 69 6e 67 20 66 75 6e 63 |e result|ing func|
|000031f0| 74 69 6f 6e 20 69 73 20 | 23 4e 41 4d 45 53 2c 20 |tion is |#NAMES, |
|00003200| 74 68 69 73 20 77 6f 6e | 27 74 20 61 6c 74 65 72 |this won|'t alter|
|00003210| 20 74 68 65 20 0d 0a 64 | 65 66 69 6e 69 74 69 6f | the ..d|efinitio|
|00003220| 6e 20 6f 66 20 23 49 4e | 54 45 47 45 52 53 3a 20 |n of #IN|TEGERS: |
|00003230| 25 0d 0a 0d 0a 43 4c 45 | 41 52 20 28 27 23 49 4e |%....CLE|AR ('#IN|
|00003240| 54 45 47 45 52 53 29 20 | 26 20 23 49 4e 54 45 47 |TEGERS) |& #INTEG|
|00003250| 45 52 53 20 28 37 29 20 | 26 20 54 52 41 43 45 20 |ERS (7) |& TRACE |
|00003260| 28 27 23 4e 41 4d 45 53 | 29 20 24 0d 0a 25 20 46 |('#NAMES|) $..% F|
|00003270| 69 78 20 79 6f 75 72 20 | 64 65 66 69 6e 69 74 69 |ix your |definiti|
|00003280| 6f 6e 20 69 66 20 69 74 | 20 64 6f 65 73 6e 27 74 |on if it| doesn't|
|00003290| 20 77 6f 72 6b 20 6f 6e | 20 61 6c 6c 20 74 68 72 | work on| all thr|
|000032a0| 65 65 20 6f 66 20 74 68 | 65 20 66 6f 6c 6c 6f 77 |ee of th|e follow|
|000032b0| 69 6e 67 20 0d 0a 65 78 | 61 6d 70 6c 65 73 3a 20 |ing ..ex|amples: |
|000032c0| 25 0d 0a 0d 0a 23 4e 41 | 4d 45 53 20 28 35 29 20 |%....#NA|MES (5) |
|000032d0| 26 20 23 4e 41 4d 45 53 | 20 28 27 52 6f 6e 6e 79 |& #NAMES| ('Ronny|
|000032e0| 29 20 26 20 23 4e 41 4d | 45 53 20 28 27 28 28 39 |) & #NAM|ES ('((9|
|000032f0| 20 2e 20 4c 69 76 65 73 | 29 20 2e 20 54 68 69 72 | . Lives|) . Thir|
|00003300| 74 65 65 6e 29 29 20 26 | 20 0d 0a 25 20 22 3e 22 |teen)) &| ..% ">"|
|00003310| 20 61 6e 64 20 22 3c 22 | 20 61 72 65 20 6d 75 53 | and "<"| are muS|
|00003320| 49 4d 50 20 69 6e 74 65 | 67 65 72 20 63 6f 6d 70 |IMP inte|ger comp|
|00003330| 61 72 69 73 6f 6e 20 6f | 70 65 72 61 74 6f 72 73 |arison o|perators|
|00003340| 20 68 61 76 69 6e 67 20 | 70 72 65 63 65 64 65 6e | having |preceden|
|00003350| 63 65 20 0d 0a 62 65 74 | 77 65 65 6e 20 74 68 65 |ce ..bet|ween the|
|00003360| 20 61 72 69 74 68 6d 65 | 74 69 63 20 61 6e 64 20 | arithme|tic and |
|00003370| 72 65 6c 61 74 69 6f 6e | 61 6c 20 6f 70 65 72 61 |relation|al opera|
|00003380| 74 6f 72 73 2e 20 20 54 | 68 75 73 2c 20 74 68 65 |tors. T|hus, the|
|00003390| 20 67 72 6f 75 70 69 6e | 67 20 0d 0a 70 61 72 65 | groupin|g ..pare|
|000033a0| 6e 74 68 65 73 65 73 20 | 61 72 65 20 75 6e 6e 65 |ntheses |are unne|
|000033b0| 63 65 73 73 61 72 79 20 | 69 6e 20 74 68 65 20 65 |cessary |in the e|
|000033c0| 78 61 6d 70 6c 65 3a 20 | 25 0d 0a 0d 0a 28 28 35 |xample: |%....((5|
|000033d0| 20 2b 20 33 29 20 3e 20 | 32 29 20 41 4e 44 20 28 | + 3) > |2) AND (|
|000033e0| 36 20 3c 20 37 29 20 26 | 0d 0a 25 20 55 73 69 6e |6 < 7) &|..% Usin|
|000033f0| 67 20 65 69 74 68 65 72 | 20 6f 66 20 74 68 65 73 |g either| of thes|
|00003400| 65 20 6f 70 65 72 61 74 | 6f 72 73 2c 20 77 72 69 |e operat|ors, wri|
|00003410| 74 65 20 61 20 4d 41 58 | 49 4d 55 4d 20 66 75 6e |te a MAX|IMUM fun|
|00003420| 63 74 69 6f 6e 20 74 68 | 61 74 20 72 65 74 75 72 |ction th|at retur|
|00003430| 6e 73 20 74 68 65 20 0d | 0a 6c 61 72 67 65 72 20 |ns the .|.larger |
|00003440| 6f 66 20 69 74 73 20 74 | 77 6f 20 69 6e 74 65 67 |of its t|wo integ|
|00003450| 65 72 20 61 72 67 75 6d | 65 6e 74 73 3a 20 25 3b |er argum|ents: %;|
|00003460| 20 4d 41 58 49 4d 55 4d | 20 28 32 2c 20 2d 33 29 | MAXIMUM| (2, -3)|
|00003470| 20 26 20 4d 41 58 49 4d | 55 4d 20 28 30 2c 20 37 | & MAXIM|UM (0, 7|
|00003480| 29 20 26 0d 0a 25 20 59 | 6f 75 72 20 73 6f 6c 75 |) &..% Y|our solu|
|00003490| 74 69 6f 6e 20 70 65 72 | 68 61 70 73 20 6c 6f 6f |tion per|haps loo|
|000034a0| 6b 73 20 73 6f 6d 65 74 | 68 69 6e 67 20 6c 69 6b |ks somet|hing lik|
|000034b0| 65 3a 20 25 0d 0a 0d 0a | 46 55 4e 43 54 49 4f 4e |e: %....|FUNCTION|
|000034c0| 20 4d 41 58 49 4d 55 4d | 20 28 49 4e 54 31 2c 20 | MAXIMUM| (INT1, |
|000034d0| 49 4e 54 32 29 2c 0d 0a | 20 20 57 48 45 4e 20 49 |INT2),..| WHEN I|
|000034e0| 4e 54 31 20 3e 20 49 4e | 54 32 2c 20 20 49 4e 54 |NT1 > IN|T2, INT|
|000034f0| 31 20 20 45 58 49 54 2c | 0d 0a 20 20 49 4e 54 32 |1 EXIT,|.. INT2|
|00003500| 0d 0a 45 4e 44 46 55 4e | 20 26 25 20 4e 6f 77 2c |..ENDFUN| &% Now,|
|00003510| 20 6c 65 74 27 73 20 64 | 65 66 69 6e 65 20 74 68 | let's d|efine th|
|00003520| 65 20 48 45 49 47 48 54 | 20 6f 66 20 61 6e 20 61 |e HEIGHT| of an a|
|00003530| 74 6f 6d 20 61 73 20 30 | 20 61 6e 64 20 74 68 65 |tom as 0| and the|
|00003540| 20 48 45 49 47 48 54 20 | 6f 66 20 61 20 6e 6f 64 | HEIGHT |of a nod|
|00003550| 65 20 61 73 20 31 20 0d | 0a 6d 6f 72 65 20 74 68 |e as 1 .|.more th|
|00003560| 61 6e 20 74 68 65 20 6d | 61 78 69 6d 75 6d 20 6f |an the m|aximum o|
|00003570| 66 20 74 68 65 20 68 65 | 69 67 68 74 73 20 6f 66 |f the he|ights of|
|00003580| 20 69 74 73 20 46 49 52 | 53 54 20 61 6e 64 20 52 | its FIR|ST and R|
|00003590| 45 53 54 20 70 61 72 74 | 73 2e 0d 0a 0d 0a 53 65 |EST part|s.....Se|
|000035a0| 65 20 69 66 20 79 6f 75 | 20 63 61 6e 20 77 72 69 |e if you| can wri|
|000035b0| 74 65 20 48 45 49 47 48 | 54 20 77 69 74 68 20 74 |te HEIGH|T with t|
|000035c0| 68 65 20 68 65 6c 70 20 | 6f 66 20 4d 41 58 49 4d |he help |of MAXIM|
|000035d0| 55 4d 3a 20 25 3b 0d 0a | 54 52 41 43 45 20 28 27 |UM: %;..|TRACE ('|
|000035e0| 48 45 49 47 48 54 29 20 | 24 20 48 45 49 47 48 54 |HEIGHT) |$ HEIGHT|
|000035f0| 20 28 27 28 28 42 61 6c | 6c 65 74 20 2e 20 44 61 | ('((Bal|let . Da|
|00003600| 6e 63 65 72 73 29 20 2e | 20 53 68 6f 65 73 29 29 |ncers) .| Shoes))|
|00003610| 20 26 0d 0a 0d 0a 25 20 | 48 65 72 65 20 69 73 20 | &....% |Here is |
|00003620| 61 20 68 69 6e 74 20 75 | 73 69 6e 67 20 61 20 64 |a hint u|sing a d|
|00003630| 69 66 66 65 72 65 6e 74 | 20 6e 61 6d 65 20 74 6f |ifferent| name to|
|00003640| 20 61 76 6f 69 64 20 64 | 65 73 74 72 6f 79 69 6e | avoid d|estroyin|
|00003650| 67 20 79 6f 75 72 20 64 | 65 66 69 6e 69 74 69 6f |g your d|efinitio|
|00003660| 6e 3a 25 0d 0a 0d 0a 46 | 55 4e 43 54 49 4f 4e 20 |n:%....F|UNCTION |
|00003670| 44 45 50 54 48 20 28 55 | 29 2c 0d 0a 20 20 57 48 |DEPTH (U|),.. WH|
|00003680| 45 4e 20 22 2e 2e 2e 22 | 2c 20 20 30 20 20 45 58 |EN "..."|, 0 EX|
|00003690| 49 54 2c 0d 0a 20 20 31 | 20 2b 20 4d 41 58 49 4d |IT,.. 1| + MAXIM|
|000036a0| 55 4d 20 28 22 2e 2e 2e | 22 2c 20 22 2e 2e 2e 22 |UM ("...|", "..."|
|000036b0| 29 0d 0a 45 4e 44 46 55 | 4e 20 26 25 20 41 6e 6f |)..ENDFU|N &% Ano|
|000036c0| 74 68 65 72 20 62 75 69 | 6c 74 2d 69 6e 20 43 6f |ther bui|lt-in Co|
|000036d0| 6d 70 61 72 69 73 6f 6e | 20 6f 70 65 72 61 74 6f |mparison| operato|
|000036e0| 72 20 69 73 20 45 51 2c | 20 77 68 69 63 68 20 72 |r is EQ,| which r|
|000036f0| 65 74 75 72 6e 73 20 54 | 52 55 45 20 69 66 20 69 |eturns T|RUE if i|
|00003700| 74 73 20 74 77 6f 20 0d | 0a 6f 70 65 72 61 6e 64 |ts two .|.operand|
|00003710| 73 20 61 72 65 20 74 68 | 65 20 73 61 6d 65 20 6f |s are th|e same o|
|00003720| 62 6a 65 63 74 20 6f 72 | 20 65 71 75 61 6c 20 69 |bject or| equal i|
|00003730| 6e 74 65 67 65 72 73 2c | 20 6f 74 68 65 72 77 69 |ntegers,| otherwi|
|00003740| 73 65 20 72 65 74 75 72 | 6e 69 6e 67 20 46 41 4c |se retur|ning FAL|
|00003750| 53 45 3a 20 25 20 0d 0a | 0d 0a 46 49 56 45 3a 20 |SE: % ..|..FIVE: |
|00003760| 35 20 24 20 20 35 20 45 | 51 20 46 49 56 45 20 26 |5 $ 5 E|Q FIVE &|
|00003770| 0d 0a 25 20 4e 61 6d 65 | 73 20 61 72 65 20 73 74 |..% Name|s are st|
|00003780| 6f 72 65 64 20 75 6e 69 | 71 75 65 6c 79 2c 20 73 |ored uni|quely, s|
|00003790| 6f 20 74 77 6f 20 6f 63 | 63 75 72 65 6e 63 65 73 |o two oc|curences|
|000037a0| 20 6f 66 20 61 20 6e 61 | 6d 65 20 6d 75 73 74 20 | of a na|me must |
|000037b0| 69 6e 76 6f 6c 76 65 20 | 74 68 65 20 0d 0a 73 61 |involve |the ..sa|
|000037c0| 6d 65 20 61 64 64 72 65 | 73 73 3a 20 20 25 0d 0a |me addre|ss: %..|
|000037d0| 0d 0a 27 43 52 41 4d 45 | 52 20 45 51 20 27 43 52 |..'CRAME|R EQ 'CR|
|000037e0| 41 4d 45 52 20 26 20 25 | 20 48 65 72 65 20 61 72 |AMER & %| Here ar|
|000037f0| 65 20 74 77 6f 20 64 69 | 66 66 65 72 65 6e 74 20 |e two di|fferent |
|00003800| 72 65 66 65 72 65 6e 63 | 65 73 20 74 6f 20 74 68 |referenc|es to th|
|00003810| 65 20 73 61 6d 65 20 70 | 68 79 73 69 63 61 6c 20 |e same p|hysical |
|00003820| 6e 6f 64 65 3a 20 25 0d | 0a 0d 0a 42 4f 4f 4b 3a |node: %.|...BOOK:|
|00003830| 20 27 28 57 55 54 48 45 | 52 49 4e 47 20 2e 20 48 | '(WUTHE|RING . H|
|00003840| 45 49 47 48 54 53 29 20 | 24 20 54 49 54 4c 45 3a |EIGHTS) |$ TITLE:|
|00003850| 20 20 42 4f 4f 4b 20 24 | 20 20 54 49 54 4c 45 20 | BOOK $| TITLE |
|00003860| 45 51 20 42 4f 4f 4b 20 | 26 25 20 4e 6f 77 20 66 |EQ BOOK |&% Now f|
|00003870| 6f 72 20 74 68 65 20 73 | 75 72 70 72 69 73 65 3a |or the s|urprise:|
|00003880| 20 25 0d 0a 0d 0a 42 4f | 4f 4b 20 45 51 20 27 28 | %....BO|OK EQ '(|
|00003890| 57 55 54 48 45 52 49 4e | 47 20 2e 20 48 45 49 47 |WUTHERIN|G . HEIG|
|000038a0| 48 54 53 29 20 26 0d 0a | 25 20 54 68 65 20 72 65 |HTS) &..|% The re|
|000038b0| 73 75 6c 74 20 69 73 20 | 46 41 4c 53 45 20 62 65 |sult is |FALSE be|
|000038c0| 63 61 75 73 65 20 74 68 | 65 20 74 77 6f 20 61 67 |cause th|e two ag|
|000038d0| 67 72 65 67 61 74 65 73 | 20 77 65 72 65 20 69 6e |gregates| were in|
|000038e0| 64 65 70 65 6e 64 65 6e | 74 6c 79 20 66 6f 72 6d |dependen|tly form|
|000038f0| 65 64 20 0d 0a 61 6e 64 | 20 74 68 65 72 65 66 6f |ed ..and| therefo|
|00003900| 72 65 20 64 6f 20 6e 6f | 74 20 73 74 61 72 74 20 |re do no|t start |
|00003910| 77 69 74 68 20 74 68 65 | 20 73 61 6d 65 20 6e 6f |with the| same no|
|00003920| 64 65 2e 0d 0a 0d 0a 20 | 20 20 20 20 20 20 20 20 |de..... | |
|00003930| 20 20 73 65 63 6f 6e 64 | 0d 0a 20 20 20 20 42 4f | second|.. BO|
|00003940| 4f 4b 20 20 61 72 67 75 | 6d 65 6e 74 0d 0a 20 20 |OK argu|ment.. |
|00003950| 20 20 20 20 2f 5c 20 20 | 20 2f 5c 0d 0a 20 20 20 | /\ | /\.. |
|00003960| 20 20 2f 20 20 5c 20 2f | 20 20 5c 0d 0a 20 20 20 | / \ /| \.. |
|00003970| 20 2f 20 20 20 20 5c 20 | 20 20 20 5c 20 0d 0a 20 | / \ | \ .. |
|00003980| 20 20 2f 20 20 20 20 2f | 20 5c 20 20 20 20 5c 0d | / /| \ \.|
|00003990| 0a 57 55 54 48 45 52 49 | 4e 47 20 20 48 45 49 47 |.WUTHERI|NG HEIG|
|000039a0| 48 54 53 0d 0a 0d 0a 25 | 3b 25 20 4c 65 74 27 73 |HTS....%|;% Let's|
|000039b0| 20 77 72 69 74 65 20 61 | 20 6d 6f 72 65 20 63 6f | write a| more co|
|000039c0| 6d 70 72 65 68 65 6e 73 | 69 76 65 20 65 71 75 61 |mprehens|ive equa|
|000039d0| 6c 69 74 79 20 63 6f 6d | 70 61 72 61 74 6f 72 20 |lity com|parator |
|000039e0| 6e 61 6d 65 64 20 44 55 | 50 2c 20 77 68 69 63 68 |named DU|P, which|
|000039f0| 20 61 6c 73 6f 20 0d 0a | 72 65 74 75 72 6e 73 20 | also ..|returns |
|00003a00| 54 52 55 45 20 66 6f 72 | 20 61 67 67 72 65 67 61 |TRUE for| aggrega|
|00003a10| 74 65 73 20 74 68 61 74 | 20 64 69 73 70 6c 61 79 |tes that| display|
|00003a20| 20 73 69 6d 69 6c 61 72 | 6c 79 2e 0d 0a 0d 0a 46 | similar|ly.....F|
|00003a30| 6f 6c 6c 6f 77 69 6e 67 | 20 6f 75 72 20 67 65 6e |ollowing| our gen|
|00003a40| 65 72 61 6c 20 73 74 72 | 61 74 65 67 79 2c 20 6c |eral str|ategy, l|
|00003a50| 65 74 27 73 20 66 69 72 | 73 74 20 64 69 73 70 6f |et's fir|st dispo|
|00003a60| 73 65 20 6f 66 20 74 68 | 65 20 74 72 69 76 69 61 |se of th|e trivia|
|00003a70| 6c 20 63 61 73 65 73 3a | 0d 0a 0d 0a 49 66 20 65 |l cases:|....If e|
|00003a80| 69 74 68 65 72 20 61 72 | 67 75 6d 65 6e 74 20 69 |ither ar|gument i|
|00003a90| 73 20 61 74 6f 6d 69 63 | 2c 20 74 68 65 79 20 61 |s atomic|, they a|
|00003aa0| 72 65 20 64 75 70 6c 69 | 63 61 74 65 73 20 69 66 |re dupli|cates if|
|00003ab0| 20 61 6e 64 20 6f 6e 6c | 79 20 69 66 20 74 68 65 | and onl|y if the|
|00003ac0| 79 20 61 72 65 20 45 51 | 2e 0d 0a 0d 0a 46 6f 72 |y are EQ|.....For|
|00003ad0| 20 6e 6f 64 65 73 20 77 | 65 20 63 61 6e 20 65 6d | nodes w|e can em|
|00003ae0| 70 6c 6f 79 20 6f 75 72 | 20 22 64 69 76 69 64 65 |ploy our| "divide|
|00003af0| 2d 61 6e 64 2d 63 6f 6e | 71 75 65 72 22 20 73 74 |-and-con|quer" st|
|00003b00| 72 61 74 65 67 79 2c 20 | 75 73 69 6e 67 20 46 49 |rategy, |using FI|
|00003b10| 52 53 54 20 61 6e 64 20 | 0d 0a 52 45 53 54 20 74 |RST and |..REST t|
|00003b20| 6f 20 64 69 76 69 64 65 | 3a 20 20 54 77 6f 20 6e |o divide|: Two n|
|00003b30| 6f 64 65 73 20 72 65 66 | 65 72 20 74 6f 20 64 75 |odes ref|er to du|
|00003b40| 70 6c 69 63 61 74 65 20 | 61 67 67 72 65 67 61 74 |plicate |aggregat|
|00003b50| 65 73 20 69 66 20 61 6e | 64 20 6f 6e 6c 79 20 69 |es if an|d only i|
|00003b60| 66 20 74 68 65 20 0d 0a | 46 49 52 53 54 20 70 61 |f the ..|FIRST pa|
|00003b70| 72 74 73 20 61 72 65 20 | 64 75 70 6c 69 63 61 74 |rts are |duplicat|
|00003b80| 65 73 20 61 6e 64 20 74 | 68 65 20 52 45 53 54 20 |es and t|he REST |
|00003b90| 70 61 72 74 73 20 61 72 | 65 20 64 75 70 6c 69 63 |parts ar|e duplic|
|00003ba0| 61 74 65 73 2e 20 20 4d | 6f 72 65 6f 76 65 72 2c |ates. M|oreover,|
|00003bb0| 20 74 68 61 74 20 0d 0a | 63 61 6e 20 62 65 20 74 | that ..|can be t|
|00003bc0| 65 73 74 65 64 20 77 69 | 74 68 20 6f 75 72 20 62 |ested wi|th our b|
|00003bd0| 65 6c 6f 76 65 64 20 72 | 65 63 75 72 73 69 6f 6e |eloved r|ecursion|
|00003be0| 2c 20 75 73 69 6e 67 20 | 44 55 50 20 69 74 73 65 |, using |DUP itse|
|00003bf0| 6c 66 21 0d 0a 0d 0a 55 | 73 69 6e 67 20 74 68 65 |lf!....U|sing the|
|00003c00| 73 65 20 69 64 65 61 73 | 2c 20 68 65 72 65 20 69 |se ideas|, here i|
|00003c10| 73 20 61 20 73 74 61 72 | 74 20 66 6f 72 20 79 6f |s a star|t for yo|
|00003c20| 75 20 74 6f 20 63 6f 6d | 70 6c 65 74 65 20 61 6e |u to com|plete an|
|00003c30| 64 20 74 65 73 74 3a 20 | 25 0d 0a 0d 0a 46 55 4e |d test: |%....FUN|
|00003c40| 43 54 49 4f 4e 20 44 55 | 50 20 28 55 2c 20 56 29 |CTION DU|P (U, V)|
|00003c50| 2c 0d 0a 20 20 57 48 45 | 4e 20 41 54 4f 4d 20 28 |,.. WHE|N ATOM (|
|00003c60| 55 29 2c 20 20 22 2e 2e | 2e 22 20 20 45 58 49 54 |U), "..|." EXIT|
|00003c70| 2c 0d 0a 20 20 57 48 45 | 4e 20 41 54 4f 4d 20 28 |,.. WHE|N ATOM (|
|00003c80| 56 29 2c 20 20 22 2e 2e | 2e 22 20 20 45 58 49 54 |V), "..|." EXIT|
|00003c90| 2c 0d 0a 20 20 57 48 45 | 4e 20 44 55 50 20 28 22 |,.. WHE|N DUP ("|
|00003ca0| 2e 2e 2e 22 2c 20 22 2e | 2e 2e 22 29 2c 20 22 2e |...", ".|.."), ".|
|00003cb0| 2e 2e 22 20 45 58 49 54 | 2c 0d 0a 45 4e 44 46 55 |.." EXIT|,..ENDFU|
|00003cc0| 4e 20 26 20 54 52 41 43 | 45 20 28 27 44 55 50 29 |N & TRAC|E ('DUP)|
|00003cd0| 20 24 20 44 55 50 20 28 | 35 2c 20 37 29 20 26 20 | $ DUP (|5, 7) & |
|00003ce0| 44 55 50 20 28 33 2c 20 | 33 29 20 26 20 44 55 50 |DUP (3, |3) & DUP|
|00003cf0| 20 28 42 4f 4f 4b 2c 20 | 54 49 54 4c 45 29 20 26 | (BOOK, |TITLE) &|
|00003d00| 20 0d 0a 25 20 41 6e 20 | 69 6e 74 65 72 65 73 74 | ..% An |interest|
|00003d10| 69 6e 67 20 63 68 61 6c | 6c 65 6e 67 65 20 66 6f |ing chal|lenge fo|
|00003d20| 72 20 79 6f 75 72 20 73 | 70 61 72 65 20 74 69 6d |r your s|pare tim|
|00003d30| 65 20 69 73 20 74 6f 20 | 73 65 65 20 68 6f 77 20 |e is to |see how |
|00003d40| 6d 61 6e 79 20 64 69 66 | 66 65 72 65 6e 74 20 0d |many dif|ferent .|
|00003d50| 0a 62 75 74 20 72 65 61 | 73 6f 6e 61 62 6c 65 20 |.but rea|sonable |
|00003d60| 77 61 79 73 20 74 68 69 | 73 20 66 75 6e 63 74 69 |ways thi|s functi|
|00003d70| 6f 6e 20 63 61 6e 20 62 | 65 20 77 72 69 74 74 65 |on can b|e writte|
|00003d80| 6e 2e 0d 0a 0d 0a 41 63 | 74 75 61 6c 6c 79 2c 20 |n.....Ac|tually, |
|00003d90| 74 68 65 72 65 20 61 6c | 72 65 61 64 79 20 69 73 |there al|ready is|
|00003da0| 20 61 20 62 75 69 6c 74 | 2d 69 6e 20 6f 70 65 72 | a built|-in oper|
|00003db0| 61 74 6f 72 20 6e 61 6d | 65 64 20 22 3d 22 2c 20 |ator nam|ed "=", |
|00003dc0| 77 68 69 63 68 20 69 73 | 20 65 71 75 69 76 61 6c |which is| equival|
|00003dd0| 65 6e 74 20 0d 0a 74 6f | 20 44 55 50 3a 20 20 25 |ent ..to| DUP: %|
|00003de0| 0d 0a 0d 0a 44 41 54 45 | 3a 20 27 28 4a 55 4c 59 |....DATE|: '(JULY|
|00003df0| 20 2e 20 34 29 20 24 20 | 27 28 4a 55 4c 59 20 2e | . 4) $ |'(JULY .|
|00003e00| 20 34 29 20 3d 20 44 41 | 54 45 20 26 0d 0a 25 20 | 4) = DA|TE &..% |
|00003e10| 44 6f 20 79 6f 75 20 66 | 65 65 6c 20 44 55 50 65 |Do you f|eel DUPe|
|00003e20| 64 20 74 6f 20 6c 65 61 | 72 6e 20 74 68 61 74 20 |d to lea|rn that |
|00003e30| 61 6e 20 65 78 65 72 63 | 69 73 65 20 64 75 70 6c |an exerc|ise dupl|
|00003e40| 69 63 61 74 65 64 20 61 | 6e 20 65 78 69 73 74 69 |icated a|n existi|
|00003e50| 6e 67 20 0d 0a 66 61 63 | 69 6c 69 74 79 3f 0d 0a |ng ..fac|ility?..|
|00003e60| 0d 0a 57 65 6c 6c 2c 20 | 69 74 20 69 73 20 63 72 |..Well, |it is cr|
|00003e70| 75 63 69 61 6c 20 74 6f | 20 74 68 6f 72 6f 75 67 |ucial to| thoroug|
|00003e80| 68 6c 79 20 75 6e 64 65 | 72 73 74 61 6e 64 20 74 |hly unde|rstand t|
|00003e90| 68 65 20 65 78 69 73 74 | 69 6e 67 20 66 61 63 69 |he exist|ing faci|
|00003ea0| 6c 69 74 69 65 73 2c 20 | 61 6e 64 20 74 68 65 20 |lities, |and the |
|00003eb0| 0d 0a 62 65 73 74 20 77 | 61 79 20 74 6f 20 61 63 |..best w|ay to ac|
|00003ec0| 63 6f 6d 70 6c 69 73 68 | 20 74 68 61 74 20 69 73 |complish| that is|
|00003ed0| 20 74 6f 20 63 72 65 61 | 74 65 20 74 68 65 6d 20 | to crea|te them |
|00003ee0| 69 6e 64 65 70 65 6e 64 | 65 6e 74 6c 79 2e 0d 0a |independ|ently...|
|00003ef0| 0d 0a 48 65 72 65 20 69 | 73 20 61 20 67 6f 6f 64 |..Here i|s a good|
|00003f00| 20 65 78 65 72 63 69 73 | 65 3a 20 20 53 65 65 20 | exercis|e: See |
|00003f10| 69 66 20 79 6f 75 20 63 | 61 6e 20 77 72 69 74 65 |if you c|an write|
|00003f20| 20 61 20 63 6f 6d 70 61 | 72 61 74 6f 72 20 66 75 | a compa|rator fu|
|00003f30| 6e 63 74 69 6f 6e 20 6e | 61 6d 65 64 20 0d 0a 53 |nction n|amed ..S|
|00003f40| 41 4d 45 53 48 41 50 45 | 20 74 68 61 74 20 72 65 |AMESHAPE| that re|
|00003f50| 74 75 72 6e 73 20 54 52 | 55 45 20 69 66 20 69 74 |turns TR|UE if it|
|00003f60| 73 20 74 77 6f 20 61 72 | 67 75 6d 65 6e 74 73 20 |s two ar|guments |
|00003f70| 68 61 76 65 20 6e 6f 64 | 65 73 20 61 6e 64 20 61 |have nod|es and a|
|00003f80| 74 6f 6d 73 20 61 74 20 | 0d 0a 73 69 6d 69 6c 61 |toms at |..simila|
|00003f90| 72 20 70 6c 61 63 65 73 | 2e 20 20 4f 74 68 65 72 |r places|. Other|
|00003fa0| 77 69 73 65 20 72 65 74 | 75 72 6e 20 46 41 4c 53 |wise ret|urn FALS|
|00003fb0| 45 2e 20 20 54 68 75 73 | 20 61 20 54 52 55 45 20 |E. Thus| a TRUE |
|00003fc0| 65 78 61 6d 70 6c 65 20 | 69 73 0d 0a 0d 0a 53 41 |example |is....SA|
|00003fd0| 4d 45 53 48 41 50 45 20 | 28 27 28 28 4b 49 4e 47 |MESHAPE |('((KING|
|00003fe0| 53 20 2e 20 52 4f 4f 4b | 29 20 2e 20 35 29 2c 20 |S . ROOK|) . 5), |
|00003ff0| 27 28 28 51 55 45 45 4e | 53 20 2e 20 33 29 20 2e |'((QUEEN|S . 3) .|
|00004000| 20 50 41 57 4e 29 29 20 | 20 20 20 20 20 20 25 3b | PAWN)) | %;|
|00004010| 0d 0a 54 52 41 43 45 20 | 28 27 53 41 4d 45 53 48 |..TRACE |('SAMESH|
|00004020| 41 50 45 29 20 24 20 53 | 41 4d 45 53 48 41 50 45 |APE) $ S|AMESHAPE|
|00004030| 20 28 35 2c 20 37 29 20 | 26 20 53 41 4d 45 53 48 | (5, 7) |& SAMESH|
|00004040| 41 50 45 20 28 33 2c 20 | 27 28 74 6f 61 64 20 2e |APE (3, |'(toad .|
|00004050| 20 73 74 6f 6f 6c 29 29 | 20 26 0d 0a 53 41 4d 45 | stool))| &..SAME|
|00004060| 53 48 41 50 45 20 28 27 | 28 28 33 20 2e 20 62 6c |SHAPE ('|((3 . bl|
|00004070| 69 6e 64 29 20 2e 20 6d | 69 63 65 29 2c 20 27 28 |ind) . m|ice), '(|
|00004080| 33 20 2e 20 28 62 6c 69 | 6e 64 20 2e 20 6d 69 63 |3 . (bli|nd . mic|
|00004090| 65 29 29 29 20 26 0d 0a | 25 20 48 65 72 65 20 69 |e))) &..|% Here i|
|000040a0| 73 20 61 20 68 69 6e 74 | 20 75 73 69 6e 67 20 61 |s a hint| using a|
|000040b0| 20 64 69 66 66 65 72 65 | 6e 74 20 6e 61 6d 65 20 | differe|nt name |
|000040c0| 74 6f 20 61 76 6f 69 64 | 20 64 65 73 74 72 6f 79 |to avoid| destroy|
|000040d0| 69 6e 67 20 79 6f 75 72 | 20 64 65 66 69 6e 69 74 |ing your| definit|
|000040e0| 69 6f 6e 3a 25 0d 0a 0d | 0a 46 55 4e 43 54 49 4f |ion:%...|.FUNCTIO|
|000040f0| 4e 20 53 49 4d 49 4c 41 | 52 20 28 55 2c 20 56 29 |N SIMILA|R (U, V)|
|00004100| 2c 0d 0a 20 20 57 48 45 | 4e 20 41 54 4f 4d 20 28 |,.. WHE|N ATOM (|
|00004110| 55 29 2c 20 22 2e 2e 2e | 22 20 20 45 58 49 54 2c |U), "...|" EXIT,|
|00004120| 0d 0a 20 20 57 48 45 4e | 20 41 54 4f 4d 20 28 56 |.. WHEN| ATOM (V|
|00004130| 29 2c 20 22 2e 2e 2e 22 | 20 20 45 58 49 54 2c 0d |), "..."| EXIT,.|
|00004140| 0a 20 20 53 49 4d 49 4c | 41 52 20 28 22 2e 2e 2e |. SIMIL|AR ("...|
|00004150| 22 29 20 41 4e 44 20 22 | 2e 2e 2e 22 0d 0a 45 4e |") AND "|..."..EN|
|00004160| 44 46 55 4e 20 26 25 20 | 4e 6f 77 2c 20 75 73 69 |DFUN &% |Now, usi|
|00004170| 6e 67 20 74 68 65 20 22 | 3d 22 20 6f 70 65 72 61 |ng the "|=" opera|
|00004180| 74 6f 72 2c 20 73 65 65 | 20 69 66 20 79 6f 75 20 |tor, see| if you |
|00004190| 63 61 6e 20 77 72 69 74 | 65 20 61 20 66 75 6e 63 |can writ|e a func|
|000041a0| 74 69 6f 6e 20 6e 61 6d | 65 64 20 43 4f 4e 54 41 |tion nam|ed CONTA|
|000041b0| 49 4e 53 20 0d 0a 74 68 | 61 74 20 72 65 74 75 72 |INS ..th|at retur|
|000041c0| 6e 73 20 54 52 55 45 20 | 69 66 20 69 74 73 20 66 |ns TRUE |if its f|
|000041d0| 69 72 73 74 20 61 72 67 | 75 6d 65 6e 74 20 69 73 |irst arg|ument is|
|000041e0| 20 61 20 64 75 70 6c 69 | 63 61 74 65 20 6f 66 20 | a dupli|cate of |
|000041f0| 69 74 73 20 73 65 63 6f | 6e 64 20 0d 0a 61 72 67 |its seco|nd ..arg|
|00004200| 75 6d 65 6e 74 20 6f 72 | 20 63 6f 6e 74 61 69 6e |ument or| contain|
|00004210| 73 20 61 20 64 75 70 6c | 69 63 61 74 65 20 6f 66 |s a dupl|icate of|
|00004220| 20 69 74 73 20 73 65 63 | 6f 6e 64 20 61 72 67 75 | its sec|ond argu|
|00004230| 6d 65 6e 74 2e 20 20 46 | 6f 72 20 65 78 61 6d 70 |ment. F|or examp|
|00004240| 6c 65 2c 20 20 0d 0a 0d | 0a 20 20 20 20 20 20 20 |le, ...|. |
|00004250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 28 | | ((|
|00004260| 4a 55 4c 59 20 2e 20 34 | 29 20 2e 20 28 31 39 33 |JULY . 4|) . (193|
|00004270| 31 20 2e 20 46 52 49 44 | 41 59 29 29 0d 0a 0d 0a |1 . FRID|AY))....|
|00004280| 63 6f 6e 74 61 69 6e 73 | 20 20 28 31 39 33 31 20 |contains| (1931 |
|00004290| 2e 20 20 46 52 49 44 41 | 59 29 2e 20 20 49 74 20 |. FRIDA|Y). It |
|000042a0| 69 73 20 61 74 20 6c 65 | 61 73 74 20 61 73 20 68 |is at le|ast as h|
|000042b0| 61 72 64 20 61 73 20 44 | 55 50 2c 20 73 6f 20 74 |ard as D|UP, so t|
|000042c0| 61 6b 65 20 79 6f 75 72 | 20 0d 0a 74 69 6d 65 20 |ake your| ..time |
|000042d0| 61 6e 64 20 64 6f 6e 27 | 74 20 67 69 76 65 20 75 |and don'|t give u|
|000042e0| 70 20 65 61 73 69 6c 79 | 2e 20 20 25 3b 20 54 52 |p easily|. %; TR|
|000042f0| 41 43 45 20 28 27 43 4f | 4e 54 41 49 4e 53 29 20 |ACE ('CO|NTAINS) |
|00004300| 24 20 43 4f 4e 54 41 49 | 4e 53 20 28 35 2c 20 35 |$ CONTAI|NS (5, 5|
|00004310| 29 20 26 0d 0a 43 4f 4e | 54 41 49 4e 53 20 28 27 |) &..CON|TAINS ('|
|00004320| 28 35 20 2e 20 37 29 2c | 20 35 29 20 26 20 43 4f |(5 . 7),| 5) & CO|
|00004330| 4e 54 41 49 4e 53 20 28 | 27 28 35 20 2e 20 37 29 |NTAINS (|'(5 . 7)|
|00004340| 2c 20 27 28 33 20 2e 20 | 32 29 29 20 26 0d 0a 25 |, '(3 . |2)) &..%|
|00004350| 20 55 73 69 6e 67 20 61 | 20 64 69 66 66 65 72 65 | Using a| differe|
|00004360| 6e 74 20 6e 61 6d 65 2c | 20 68 65 72 65 20 69 73 |nt name,| here is|
|00004370| 20 61 20 68 69 6e 74 20 | 61 62 6f 75 74 20 6f 6e | a hint |about on|
|00004380| 65 20 77 61 79 20 74 6f | 20 77 72 69 74 65 20 43 |e way to| write C|
|00004390| 4f 4e 54 41 49 4e 53 3a | 20 25 0d 0a 0d 0a 46 55 |ONTAINS:| %....FU|
|000043a0| 4e 43 54 49 4f 4e 20 49 | 4e 43 4c 55 44 45 53 20 |NCTION I|NCLUDES |
|000043b0| 28 43 4f 4e 54 41 49 4e | 45 52 2c 20 43 4f 4e 54 |(CONTAIN|ER, CONT|
|000043c0| 41 49 4e 45 45 29 2c 0d | 0a 20 20 57 48 45 4e 20 |AINEE),.|. WHEN |
|000043d0| 43 4f 4e 54 41 49 4e 45 | 52 20 3d 20 43 4f 4e 54 |CONTAINE|R = CONT|
|000043e0| 41 49 4e 45 45 2c 20 45 | 58 49 54 2c 0d 0a 20 20 |AINEE, E|XIT,.. |
|000043f0| 57 48 45 4e 20 41 54 4f | 4d 20 28 43 4f 4e 54 41 |WHEN ATO|M (CONTA|
|00004400| 49 4e 45 52 29 2c 20 22 | 2e 2e 2e 22 20 20 45 58 |INER), "|..." EX|
|00004410| 49 54 2c 0d 0a 20 20 49 | 4e 43 4c 55 44 45 53 20 |IT,.. I|NCLUDES |
|00004420| 28 22 2e 2e 2e 22 29 20 | 4f 52 20 22 2e 2e 2e 22 |("...") |OR "..."|
|00004430| 0d 0a 45 4e 44 46 55 4e | 20 26 25 20 48 65 72 65 |..ENDFUN| &% Here|
|00004440| 20 69 73 20 61 20 68 61 | 72 64 65 72 20 65 78 65 | is a ha|rder exe|
|00004450| 72 63 69 73 65 3a 20 20 | 54 68 65 20 74 77 6f 20 |rcise: |The two |
|00004460| 61 67 67 72 65 67 61 74 | 65 73 0d 0a 0d 0a 20 20 |aggregat|es.... |
|00004470| 20 20 20 2f 5c 20 20 20 | 20 20 20 20 20 20 20 2f | /\ | /|
|00004480| 5c 0d 0a 20 20 20 20 2f | 20 20 5c 20 20 20 20 20 |\.. /| \ |
|00004490| 20 20 20 2f 20 20 5c 0d | 0a 43 41 52 42 4f 4e 20 | / \.|.CARBON |
|000044a0| 2f 5c 20 20 20 43 41 52 | 42 4f 4e 20 2f 5c 0d 0a |/\ CAR|BON /\..|
|000044b0| 20 20 20 20 20 20 2f 20 | 20 5c 20 20 20 20 20 20 | / | \ |
|000044c0| 20 20 2f 20 20 5c 20 20 | 20 20 0d 0a 53 55 4c 46 | / \ | ..SULF|
|000044d0| 55 52 20 20 49 52 4f 4e | 20 20 20 49 52 4f 4e 20 |UR IRON| IRON |
|000044e0| 20 53 55 4c 46 55 52 0d | 0a 0d 0a 61 72 65 20 49 | SULFUR.|...are I|
|000044f0| 53 4f 4d 45 52 53 20 62 | 65 63 61 75 73 65 20 74 |SOMERS b|ecause t|
|00004500| 68 65 79 20 61 72 65 20 | 74 68 65 20 73 61 6d 65 |hey are |the same|
|00004510| 20 61 74 6f 6d 2c 20 6f | 72 20 61 74 20 65 76 65 | atom, o|r at eve|
|00004520| 72 79 20 6c 65 76 65 6c | 20 65 69 74 68 65 72 20 |ry level| either |
|00004530| 74 68 65 20 6c 65 66 74 | 20 0d 0a 62 72 61 6e 63 |the left| ..branc|
|00004540| 68 65 73 20 61 72 65 20 | 69 73 6f 6d 65 72 73 20 |hes are |isomers |
|00004550| 61 6e 64 20 74 68 65 20 | 72 69 67 68 74 20 62 72 |and the |right br|
|00004560| 61 6e 63 68 65 73 20 61 | 72 65 20 69 73 6f 6d 65 |anches a|re isome|
|00004570| 72 73 2c 20 6f 72 20 74 | 68 65 20 6c 65 66 74 20 |rs, or t|he left |
|00004580| 62 72 61 6e 63 68 20 0d | 0a 6f 66 20 6f 6e 65 20 |branch .|.of one |
|00004590| 69 73 20 61 6e 20 69 73 | 6f 6d 65 72 20 6f 66 20 |is an is|omer of |
|000045a0| 74 68 65 20 72 69 67 68 | 74 20 62 72 61 6e 63 68 |the righ|t branch|
|000045b0| 20 6f 66 20 74 68 65 20 | 6f 74 68 65 72 20 61 6e | of the |other an|
|000045c0| 64 20 76 69 63 65 2d 76 | 65 72 73 61 2e 20 20 0d |d vice-v|ersa. .|
|000045d0| 0a 0d 0a 57 72 69 74 65 | 20 61 20 63 6f 72 72 65 |...Write| a corre|
|000045e0| 73 70 6f 6e 64 69 6e 67 | 20 63 6f 6d 70 61 72 61 |sponding| compara|
|000045f0| 74 6f 72 20 66 75 6e 63 | 74 69 6f 6e 20 6e 61 6d |tor func|tion nam|
|00004600| 65 64 20 49 53 4f 4d 45 | 52 53 2e 0d 0a 28 49 74 |ed ISOME|RS...(It|
|00004610| 27 73 20 73 69 6d 69 6c | 61 72 20 74 6f 20 44 55 |'s simil|ar to DU|
|00004620| 50 2c 20 77 69 74 68 20 | 61 20 74 77 69 73 74 2e |P, with |a twist.|
|00004630| 29 20 25 3b 0d 0a 54 52 | 41 43 45 20 28 27 49 53 |) %;..TR|ACE ('IS|
|00004640| 4f 4d 45 52 53 29 20 24 | 20 49 53 4f 4d 45 52 53 |OMERS) $| ISOMERS|
|00004650| 20 28 33 2c 20 33 29 20 | 26 20 49 53 4f 4d 45 52 | (3, 3) |& ISOMER|
|00004660| 53 20 28 33 2c 20 35 29 | 20 26 0d 0a 49 53 4f 4d |S (3, 5)| &..ISOM|
|00004670| 45 52 53 20 28 27 28 43 | 41 52 42 4f 4e 20 2e 20 |ERS ('(C|ARBON . |
|00004680| 28 53 55 4c 46 45 52 20 | 2e 20 49 52 4f 4e 29 29 |(SULFER |. IRON))|
|00004690| 2c 20 27 28 43 41 52 42 | 4f 4e 20 2e 20 28 49 52 |, '(CARB|ON . (IR|
|000046a0| 4f 4e 20 2e 20 53 55 4c | 46 45 52 29 29 29 20 26 |ON . SUL|FER))) &|
|000046b0| 20 0d 0a 25 20 55 73 69 | 6e 67 20 61 20 64 69 66 | ..% Usi|ng a dif|
|000046c0| 66 65 72 65 6e 74 20 6e | 61 6d 65 2c 20 68 65 72 |ferent n|ame, her|
|000046d0| 65 20 69 73 20 61 20 68 | 69 6e 74 20 61 62 6f 75 |e is a h|int abou|
|000046e0| 74 20 6f 6e 65 20 77 61 | 79 20 74 6f 20 77 72 69 |t one wa|y to wri|
|000046f0| 74 65 20 49 53 4f 4d 45 | 52 53 3a 20 25 0d 0a 0d |te ISOME|RS: %...|
|00004700| 0a 46 55 4e 43 54 49 4f | 4e 20 49 43 45 4f 4d 45 |.FUNCTIO|N ICEOME|
|00004710| 52 53 20 28 55 2c 20 56 | 29 2c 0d 0a 20 20 57 48 |RS (U, V|),.. WH|
|00004720| 45 4e 20 41 54 4f 4d 20 | 28 55 29 2c 20 22 2e 2e |EN ATOM |(U), "..|
|00004730| 2e 22 20 20 45 58 49 54 | 2c 0d 0a 20 20 57 48 45 |." EXIT|,.. WHE|
|00004740| 4e 20 41 54 4f 4d 20 28 | 56 29 2c 20 22 2e 2e 2e |N ATOM (|V), "...|
|00004750| 22 20 20 45 58 49 54 2c | 0d 0a 20 20 49 43 45 4f |" EXIT,|.. ICEO|
|00004760| 4d 45 52 53 20 28 46 49 | 52 53 54 28 55 29 2c 20 |MERS (FI|RST(U), |
|00004770| 46 49 52 53 54 28 56 29 | 29 20 20 41 4e 44 20 20 |FIRST(V)|) AND |
|00004780| 22 2e 2e 2e 22 0d 0a 20 | 20 20 20 4f 52 20 20 49 |"...".. | OR I|
|00004790| 43 45 4f 4d 45 52 53 20 | 28 46 49 52 53 54 28 55 |CEOMERS |(FIRST(U|
|000047a0| 29 2c 20 52 45 53 54 28 | 56 29 29 20 20 41 4e 44 |), REST(|V)) AND|
|000047b0| 20 20 22 2e 2e 2e 22 0d | 0a 45 4e 44 46 55 4e 20 | "...".|.ENDFUN |
|000047c0| 26 25 20 53 6f 20 66 61 | 72 20 6f 75 72 20 66 75 |&% So fa|r our fu|
|000047d0| 6e 63 74 69 6f 6e 73 20 | 68 61 76 65 20 6d 65 72 |nctions |have mer|
|000047e0| 65 6c 79 20 64 69 73 6d | 61 6e 74 6c 65 64 20 6f |ely dism|antled o|
|000047f0| 72 20 61 6e 61 6c 79 7a | 65 64 20 61 67 67 72 65 |r analyz|ed aggre|
|00004800| 67 61 74 65 73 20 67 69 | 76 65 6e 20 74 6f 20 0d |gates gi|ven to .|
|00004810| 0a 74 68 65 6d 20 61 73 | 20 61 72 67 75 6d 65 6e |.them as| argumen|
|00004820| 74 73 2e 20 20 4e 6f 6e | 65 20 6f 66 20 6f 75 72 |ts. Non|e of our|
|00004830| 20 65 78 61 6d 70 6c 65 | 73 20 68 61 76 65 20 63 | example|s have c|
|00004840| 6f 6e 73 74 72 75 63 74 | 65 64 20 6e 65 77 20 61 |onstruct|ed new a|
|00004850| 67 67 72 65 67 61 74 65 | 73 2e 20 20 0d 0a 0d 0a |ggregate|s. ....|
|00004860| 41 6c 74 68 6f 75 67 68 | 20 74 68 65 20 64 6f 74 |Although| the dot|
|00004870| 20 72 65 73 75 6c 74 73 | 20 69 6e 20 61 67 67 72 | results| in aggr|
|00004880| 65 67 61 74 65 73 2c 20 | 74 68 69 73 20 6f 63 63 |egates, |this occ|
|00004890| 75 72 73 20 61 73 20 74 | 68 65 20 64 6f 74 20 69 |urs as t|he dot i|
|000048a0| 73 20 72 65 61 64 2e 20 | 20 0d 0a 4d 6f 72 65 6f |s read. | ..Moreo|
|000048b0| 76 65 72 2c 20 73 69 6e | 63 65 20 74 68 65 20 73 |ver, sin|ce the s|
|000048c0| 69 6e 67 6c 65 20 71 75 | 6f 74 65 20 6e 65 63 65 |ingle qu|ote nece|
|000048d0| 73 73 61 72 69 6c 79 20 | 70 72 65 63 65 65 64 69 |ssarily |preceedi|
|000048e0| 6e 67 20 61 6e 20 6f 75 | 74 65 72 6d 6f 73 74 20 |ng an ou|termost |
|000048f0| 64 6f 74 74 65 64 20 0d | 0a 70 61 69 72 20 70 72 |dotted .|.pair pr|
|00004900| 65 76 65 6e 74 73 20 65 | 76 61 6c 75 61 74 69 6f |events e|valuatio|
|00004910| 6e 2c 20 62 6f 75 6e 64 | 20 76 61 72 69 61 62 6c |n, bound| variabl|
|00004920| 65 73 20 69 6e 20 61 20 | 64 6f 74 74 65 64 20 70 |es in a |dotted p|
|00004930| 61 69 72 20 63 6f 6e 74 | 72 69 62 75 74 65 20 6d |air cont|ribute m|
|00004940| 65 72 65 6c 79 20 0d 0a | 74 68 65 69 72 20 6e 61 |erely ..|their na|
|00004950| 6d 65 73 20 72 61 74 68 | 65 72 20 74 68 61 6e 20 |mes rath|er than |
|00004960| 74 68 65 69 72 20 76 61 | 6c 75 65 73 2e 20 20 46 |their va|lues. F|
|00004970| 6f 72 20 65 78 61 6d 70 | 6c 65 3a 20 20 25 0d 0a |or examp|le: %..|
|00004980| 0d 0a 45 47 3a 20 37 20 | 24 20 27 28 45 47 20 2e |..EG: 7 |$ '(EG .|
|00004990| 20 33 29 20 26 25 20 41 | 6e 6f 74 68 65 72 20 6c | 3) &% A|nother l|
|000049a0| 69 6d 69 74 61 74 69 6f | 6e 20 6f 66 20 74 68 65 |imitatio|n of the|
|000049b0| 20 64 6f 74 20 6e 6f 74 | 61 74 69 6f 6e 20 69 73 | dot not|ation is|
|000049c0| 20 74 68 61 74 20 69 74 | 20 43 41 4e 4e 4f 54 20 | that it| CANNOT |
|000049d0| 62 65 20 75 73 65 64 20 | 77 69 74 68 69 6e 20 61 |be used |within a|
|000049e0| 20 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 64 65 66 69 | ..funct|ion defi|
|000049f0| 6e 69 74 69 6f 6e 2e 0d | 0a 0d 0a 57 68 61 74 20 |nition..|...What |
|00004a00| 77 65 20 77 61 6e 74 20 | 69 73 20 61 20 66 75 6e |we want |is a fun|
|00004a10| 63 74 69 6f 6e 20 74 68 | 61 74 20 65 76 61 6c 75 |ction th|at evalu|
|00004a20| 61 74 65 73 20 69 74 73 | 20 74 77 6f 20 61 72 67 |ates its| two arg|
|00004a30| 75 6d 65 6e 74 73 20 69 | 6e 20 74 68 65 20 75 73 |uments i|n the us|
|00004a40| 75 61 6c 20 0d 0a 77 61 | 79 2c 20 74 68 65 6e 20 |ual ..wa|y, then |
|00004a50| 72 65 74 75 72 6e 73 20 | 61 20 6e 6f 64 65 20 77 |returns |a node w|
|00004a60| 68 6f 73 65 20 74 77 6f | 20 70 6f 69 6e 74 65 72 |hose two| pointer|
|00004a70| 73 20 70 6f 69 6e 74 20 | 74 6f 20 74 68 6f 73 65 |s point |to those|
|00004a80| 20 76 61 6c 75 65 73 2e | 20 20 54 68 65 72 65 20 | values.| There |
|00004a90| 69 73 20 0d 0a 73 75 63 | 68 20 61 20 66 75 6e 63 |is ..suc|h a func|
|00004aa0| 74 69 6f 6e 2c 20 6e 61 | 6d 65 64 20 41 44 4a 4f |tion, na|med ADJO|
|00004ab0| 49 4e 3a 20 20 25 0d 0a | 0d 0a 41 44 4a 4f 49 4e |IN: %..|..ADJOIN|
|00004ac0| 20 28 45 47 2c 20 33 29 | 20 26 25 20 41 20 64 6f | (EG, 3)| &% A do|
|00004ad0| 74 74 65 64 20 70 61 69 | 72 20 69 73 20 61 20 73 |tted pai|r is a s|
|00004ae0| 74 61 74 69 63 20 65 6e | 74 69 74 79 2c 20 66 72 |tatic en|tity, fr|
|00004af0| 6f 7a 65 6e 20 61 74 20 | 74 68 65 20 74 69 6d 65 |ozen at |the time|
|00004b00| 20 69 74 20 69 73 20 72 | 65 61 64 2e 0d 0a 0d 0a | it is r|ead.....|
|00004b10| 49 6e 20 63 6f 6e 74 72 | 61 73 74 2c 20 61 20 72 |In contr|ast, a r|
|00004b20| 65 66 65 72 65 6e 63 65 | 20 74 6f 20 41 44 4a 4f |eference| to ADJO|
|00004b30| 49 4e 20 77 69 74 68 69 | 6e 20 61 20 66 75 6e 63 |IN withi|n a func|
|00004b40| 74 69 6f 6e 20 64 65 66 | 69 6e 69 74 69 6f 6e 20 |tion def|inition |
|00004b50| 69 73 20 64 79 6e 61 6d | 69 63 3a 20 0d 0a 6e 6f |is dynam|ic: ..no|
|00004b60| 64 65 20 63 72 65 61 74 | 69 6f 6e 20 69 73 20 64 |de creat|ion is d|
|00004b70| 6f 6e 65 20 77 69 74 68 | 20 74 68 65 20 63 75 72 |one with| the cur|
|00004b80| 72 65 6e 74 20 76 61 6c | 75 65 73 20 6f 66 20 69 |rent val|ues of i|
|00004b90| 74 73 20 61 72 67 75 6d | 65 6e 74 73 20 65 76 65 |ts argum|ents eve|
|00004ba0| 72 79 20 74 69 6d 65 20 | 0d 0a 74 68 61 74 20 70 |ry time |..that p|
|00004bb0| 61 72 74 20 6f 66 20 74 | 68 65 20 66 75 6e 63 74 |art of t|he funct|
|00004bc0| 69 6f 6e 20 69 73 20 61 | 70 70 6c 69 65 64 2e 20 |ion is a|pplied. |
|00004bd0| 25 3b 20 0d 0a 25 20 41 | 73 20 61 6e 20 65 78 61 |%; ..% A|s an exa|
|00004be0| 6d 70 6c 65 20 6f 66 20 | 74 68 65 20 75 73 65 20 |mple of |the use |
|00004bf0| 6f 66 20 41 44 4a 4f 49 | 4e 2c 20 49 27 6c 6c 20 |of ADJOI|N, I'll |
|00004c00| 77 72 69 74 65 20 61 20 | 66 75 6e 63 74 69 6f 6e |write a |function|
|00004c10| 20 6e 61 6d 65 64 20 53 | 4b 45 4c 45 54 4f 4e 2c | named S|KELETON,|
|00004c20| 20 0d 0a 77 68 69 63 68 | 20 63 6f 6e 73 74 72 75 | ..which| constru|
|00004c30| 63 74 73 20 61 20 6e 65 | 77 20 74 72 65 65 20 74 |cts a ne|w tree t|
|00004c40| 68 61 74 20 69 73 20 73 | 74 72 75 63 74 75 72 61 |hat is s|tructura|
|00004c50| 6c 6c 79 20 73 69 6d 69 | 6c 61 72 20 74 6f 20 69 |lly simi|lar to i|
|00004c60| 74 73 20 61 72 67 75 6d | 65 6e 74 20 62 75 74 20 |ts argum|ent but |
|00004c70| 0d 0a 68 61 73 20 74 68 | 65 20 6e 61 6d 65 20 6f |..has th|e name o|
|00004c80| 66 20 6c 65 6e 67 74 68 | 20 7a 65 72 6f 2c 20 22 |f length| zero, "|
|00004c90| 22 2c 20 77 68 65 72 65 | 76 65 72 20 69 74 73 20 |", where|ver its |
|00004ca0| 61 72 67 75 6d 65 6e 74 | 20 68 61 73 20 61 6e 20 |argument| has an |
|00004cb0| 61 74 6f 6d 2e 20 20 54 | 68 75 73 2c 20 0d 0a 77 |atom. T|hus, ..w|
|00004cc0| 68 65 6e 20 64 69 73 70 | 6c 61 79 65 64 2c 20 74 |hen disp|layed, t|
|00004cd0| 68 65 20 6e 65 77 20 61 | 67 67 72 65 67 61 74 65 |he new a|ggregate|
|00004ce0| 20 73 68 6f 77 73 20 74 | 68 65 20 73 6b 65 6c 65 | shows t|he skele|
|00004cf0| 74 61 6c 20 73 74 72 75 | 63 74 75 72 65 20 6f 66 |tal stru|cture of|
|00004d00| 20 74 68 65 20 0d 0a 61 | 72 67 75 6d 65 6e 74 2c | the ..a|rgument,|
|00004d10| 20 62 75 74 20 77 69 74 | 68 6f 75 74 20 76 69 73 | but wit|hout vis|
|00004d20| 75 61 6c 6c 79 2d 64 69 | 73 63 65 72 6e 61 62 6c |ually-di|scernabl|
|00004d30| 65 20 61 74 6f 6d 73 2e | 20 20 46 6f 72 20 65 78 |e atoms.| For ex|
|00004d40| 61 6d 70 6c 65 2c 20 28 | 28 20 2e 20 29 20 2e 20 |ample, (|( . ) . |
|00004d50| 29 20 69 73 20 0d 0a 74 | 68 65 20 73 6b 65 6c 65 |) is ..t|he skele|
|00004d60| 74 6f 6e 20 6f 66 20 20 | 27 28 28 48 41 4c 4c 4f |ton of |'((HALLO|
|00004d70| 57 45 45 4e 20 2e 20 47 | 48 4f 53 54 53 29 20 2e |WEEN . G|HOSTS) .|
|00004d80| 20 57 49 54 43 48 45 53 | 29 29 20 0d 0a 0d 0a 49 | WITCHES|)) ....I|
|00004d90| 66 20 74 68 65 20 74 68 | 65 20 61 72 67 75 6d 65 |f the th|e argume|
|00004da0| 6e 74 20 69 73 20 61 6e | 20 61 74 6f 6d 2c 20 77 |nt is an| atom, w|
|00004db0| 65 20 72 65 74 75 72 6e | 20 22 22 2e 20 20 4f 74 |e return| "". Ot|
|00004dc0| 68 65 72 77 69 73 65 20 | 77 65 20 68 61 76 65 20 |herwise |we have |
|00004dd0| 61 20 6e 6f 64 65 2c 20 | 73 6f 20 0d 0a 63 61 6e |a node, |so ..can|
|00004de0| 20 75 73 65 20 41 44 4a | 4f 49 4e 20 74 6f 20 64 | use ADJ|OIN to d|
|00004df0| 79 6e 61 6d 69 63 61 6c | 6c 79 20 63 6f 6d 62 69 |ynamical|ly combi|
|00004e00| 6e 65 20 74 68 65 20 72 | 65 63 75 72 73 69 76 65 |ne the r|ecursive|
|00004e10| 6c 79 20 64 65 74 65 72 | 6d 69 6e 65 64 20 53 4b |ly deter|mined SK|
|00004e20| 45 4c 45 54 4f 4e 73 20 | 6f 66 20 0d 0a 74 68 65 |ELETONs |of ..the|
|00004e30| 20 46 49 52 53 54 20 61 | 6e 64 20 52 45 53 54 20 | FIRST a|nd REST |
|00004e40| 70 61 72 74 73 3a 20 25 | 3b 0d 0a 46 55 4e 43 54 |parts: %|;..FUNCT|
|00004e50| 49 4f 4e 20 53 4b 45 4c | 45 54 4f 4e 20 28 55 29 |ION SKEL|ETON (U)|
|00004e60| 2c 0d 0a 20 20 57 48 45 | 4e 20 41 54 4f 4d 20 28 |,.. WHE|N ATOM (|
|00004e70| 55 29 2c 20 20 22 22 20 | 20 45 58 49 54 2c 0d 0a |U), "" | EXIT,..|
|00004e80| 20 20 41 44 4a 4f 49 4e | 20 28 53 4b 45 4c 45 54 | ADJOIN| (SKELET|
|00004e90| 4f 4e 20 28 46 49 52 53 | 54 28 55 29 29 2c 20 53 |ON (FIRS|T(U)), S|
|00004ea0| 4b 45 4c 45 54 4f 4e 20 | 28 52 45 53 54 28 55 29 |KELETON |(REST(U)|
|00004eb0| 29 29 0d 0a 45 4e 44 46 | 55 4e 20 24 20 54 52 41 |))..ENDF|UN $ TRA|
|00004ec0| 43 45 20 28 27 53 4b 45 | 4c 45 54 4f 4e 29 20 24 |CE ('SKE|LETON) $|
|00004ed0| 20 53 4b 45 4c 45 54 4f | 4e 20 28 27 28 28 4d 4f | SKELETO|N ('((MO|
|00004ee0| 4f 20 2e 20 47 4f 4f 29 | 20 2e 20 28 47 55 59 20 |O . GOO)| . (GUY |
|00004ef0| 2e 20 50 41 4e 29 29 29 | 20 26 0d 0a 25 20 45 61 |. PAN)))| &..% Ea|
|00004f00| 73 79 2e 20 20 59 65 73 | 3f 0d 0a 0d 0a 4e 6f 77 |sy. Yes|?....Now|
|00004f10| 20 69 74 20 69 73 20 79 | 6f 75 72 20 74 75 72 6e | it is y|our turn|
|00004f20| 2e 20 20 57 72 69 74 65 | 20 61 20 66 75 6e 63 74 |. Write| a funct|
|00004f30| 69 6f 6e 20 6e 61 6d 65 | 64 20 54 52 45 45 52 45 |ion name|d TREERE|
|00004f40| 56 2c 20 77 68 69 63 68 | 20 70 72 6f 64 75 63 65 |V, which| produce|
|00004f50| 73 20 61 20 63 6f 70 79 | 20 0d 0a 6f 66 20 69 74 |s a copy| ..of it|
|00004f60| 73 20 61 72 67 75 6d 65 | 6e 74 20 69 6e 20 77 68 |s argume|nt in wh|
|00004f70| 69 63 68 20 65 76 65 72 | 79 20 6c 65 66 74 20 61 |ich ever|y left a|
|00004f80| 6e 64 20 72 69 67 68 74 | 20 62 72 61 6e 63 68 20 |nd right| branch |
|00004f90| 61 72 65 20 69 6e 74 65 | 72 63 68 61 6e 67 65 64 |are inte|rchanged|
|00004fa0| 20 61 74 20 0d 0a 65 76 | 65 72 79 20 6c 65 76 65 | at ..ev|ery leve|
|00004fb0| 6c 2e 20 20 46 6f 72 20 | 65 78 61 6d 70 6c 65 2c |l. For |example,|
|00004fc0| 20 0d 0a 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 | .... | |
|00004fd0| 20 20 20 20 54 52 45 45 | 52 45 56 20 28 27 28 28 | TREE|REV ('((|
|00004fe0| 4d 4f 4f 20 2e 20 47 4f | 4f 29 20 2e 20 28 47 55 |MOO . GO|O) . (GU|
|00004ff0| 59 20 2e 20 28 50 41 4e | 20 2e 20 43 41 4b 45 29 |Y . (PAN| . CAKE)|
|00005000| 29 29 29 20 26 0d 0a 73 | 68 6f 75 6c 64 20 79 69 |))) &..s|hould yi|
|00005010| 65 6c 64 20 0d 0a 20 20 | 20 20 20 20 20 20 20 20 |eld .. | |
|00005020| 20 20 20 20 20 20 20 20 | 28 28 28 43 41 4b 45 20 | |(((CAKE |
|00005030| 2e 20 50 41 4e 29 20 2e | 20 47 55 59 29 20 2e 20 |. PAN) .| GUY) . |
|00005040| 28 47 4f 4f 20 2e 20 4d | 4f 4f 29 29 20 20 20 20 |(GOO . M|OO)) |
|00005050| 25 3b 0d 0a 54 52 41 43 | 45 20 28 27 54 52 45 45 |%;..TRAC|E ('TREE|
|00005060| 52 45 56 29 20 24 20 54 | 52 45 45 52 45 56 20 28 |REV) $ T|REEREV (|
|00005070| 27 28 28 22 49 73 6e 27 | 74 22 20 2e 20 74 68 61 |'(("Isn'|t" . tha|
|00005080| 74 29 20 2e 20 65 61 73 | 79 29 29 20 26 0d 0a 25 |t) . eas|y)) &..%|
|00005090| 20 55 73 69 6e 67 20 61 | 20 64 69 66 66 65 72 65 | Using a| differe|
|000050a0| 6e 74 20 6e 61 6d 65 2c | 20 68 65 72 65 20 69 73 |nt name,| here is|
|000050b0| 20 61 20 68 69 6e 74 20 | 61 62 6f 75 74 20 6f 6e | a hint |about on|
|000050c0| 65 20 77 61 79 20 74 6f | 20 77 72 69 74 65 20 54 |e way to| write T|
|000050d0| 52 45 45 52 45 56 3a 20 | 25 0d 0a 0d 0a 46 55 4e |REEREV: |%....FUN|
|000050e0| 43 54 49 4f 4e 20 54 52 | 45 45 52 45 56 45 52 53 |CTION TR|EEREVERS|
|000050f0| 45 20 28 55 29 2c 0d 0a | 20 20 57 48 45 4e 20 41 |E (U),..| WHEN A|
|00005100| 54 4f 4d 20 28 55 29 2c | 20 20 22 2e 2e 2e 22 20 |TOM (U),| "..." |
|00005110| 20 45 58 49 54 2c 0d 0a | 20 20 41 44 4a 4f 49 4e | EXIT,..| ADJOIN|
|00005120| 20 28 54 52 45 45 52 45 | 56 45 52 53 45 20 28 22 | (TREERE|VERSE ("|
|00005130| 2e 2e 2e 22 29 2c 20 54 | 52 45 45 52 45 56 45 52 |..."), T|REEREVER|
|00005140| 53 45 20 28 22 2e 2e 2e | 22 29 29 0d 0a 45 4e 44 |SE ("...|"))..END|
|00005150| 46 55 4e 20 26 25 20 48 | 65 72 65 20 69 73 20 61 |FUN &% H|ere is a|
|00005160| 20 73 6f 6d 65 77 68 61 | 74 20 68 61 72 64 65 72 | somewha|t harder|
|00005170| 20 65 78 65 72 63 69 73 | 65 3a 20 20 57 72 69 74 | exercis|e: Writ|
|00005180| 65 20 61 20 66 75 6e 63 | 74 69 6f 6e 20 6e 61 6d |e a func|tion nam|
|00005190| 65 64 20 53 55 42 53 54 | 2c 20 77 68 69 63 68 20 |ed SUBST|, which |
|000051a0| 0d 0a 72 65 74 75 72 6e | 73 20 61 20 63 6f 70 79 |..return|s a copy|
|000051b0| 20 6f 66 20 69 74 73 20 | 66 69 72 73 74 20 61 72 | of its |first ar|
|000051c0| 67 75 6d 65 6e 74 20 77 | 68 65 72 65 69 6e 20 65 |gument w|herein e|
|000051d0| 76 65 72 79 20 69 6e 73 | 74 61 6e 63 65 20 6f 66 |very ins|tance of|
|000051e0| 20 69 74 73 20 73 65 63 | 6f 6e 64 20 0d 0a 61 72 | its sec|ond ..ar|
|000051f0| 67 75 6d 65 6e 74 20 69 | 73 20 72 65 70 6c 61 63 |gument i|s replac|
|00005200| 65 64 20 62 79 20 69 74 | 73 20 74 68 69 72 64 20 |ed by it|s third |
|00005210| 61 72 67 75 6d 65 6e 74 | 2e 20 20 46 6f 72 20 65 |argument|. For e|
|00005220| 78 61 6d 70 6c 65 2c 20 | 69 66 0d 0a 0d 0a 50 48 |xample, |if....PH|
|00005230| 52 41 53 45 3a 0d 0a 20 | 20 27 28 28 28 54 48 49 |RASE:.. | '(((THI|
|00005240| 53 20 2e 20 28 47 4f 53 | 48 20 2e 20 44 41 52 4e |S . (GOS|H . DARN|
|00005250| 29 29 20 2e 20 43 41 52 | 29 20 2e 20 28 49 53 20 |)) . CAR|) . (IS |
|00005260| 2e 20 28 28 47 4f 53 48 | 20 2e 20 44 41 52 4e 29 |. ((GOSH| . DARN)|
|00005270| 20 2e 20 42 41 44 29 29 | 29 20 24 0d 0a 0d 0a 74 | . BAD))|) $....t|
|00005280| 68 65 6e 20 20 53 55 42 | 53 54 20 28 50 48 52 41 |hen SUB|ST (PHRA|
|00005290| 53 45 2c 20 27 28 47 4f | 53 48 20 2e 20 44 41 52 |SE, '(GO|SH . DAR|
|000052a0| 4e 29 2c 20 27 28 65 78 | 70 6c 65 74 69 76 65 20 |N), '(ex|pletive |
|000052b0| 2e 20 64 65 6c 65 74 65 | 64 29 29 20 20 79 69 65 |. delete|d)) yie|
|000052c0| 6c 64 73 0d 0a 0d 0a 28 | 28 28 54 48 49 53 20 2e |lds....(|((THIS .|
|000052d0| 20 28 65 78 70 6c 65 74 | 69 76 65 20 2e 20 64 65 | (explet|ive . de|
|000052e0| 6c 65 74 65 64 29 29 20 | 2e 20 43 41 52 29 0d 0a |leted)) |. CAR)..|
|000052f0| 20 20 20 20 2e 20 28 49 | 53 20 2e 20 28 28 65 78 | . (I|S . ((ex|
|00005300| 70 6c 65 74 69 76 65 20 | 2e 20 64 65 6c 65 74 65 |pletive |. delete|
|00005310| 64 29 20 2e 20 42 41 44 | 29 29 29 20 20 20 25 3b |d) . BAD|))) %;|
|00005320| 0d 0a 54 52 41 43 45 20 | 28 27 53 55 42 53 54 29 |..TRACE |('SUBST)|
|00005330| 20 24 20 53 55 42 53 54 | 20 28 27 28 46 52 4f 47 | $ SUBST| ('(FROG|
|00005340| 20 2e 20 4d 41 4e 29 2c | 20 27 42 41 54 2c 20 27 | . MAN),| 'BAT, '|
|00005350| 50 41 43 29 20 26 0d 0a | 53 55 42 53 54 20 28 27 |PAC) &..|SUBST ('|
|00005360| 28 28 46 52 4f 47 20 2e | 20 4d 41 4e 29 20 2e 20 |((FROG .| MAN) . |
|00005370| 46 45 45 54 29 2c 20 27 | 28 46 52 4f 47 20 2e 20 |FEET), '|(FROG . |
|00005380| 4d 41 47 29 2c 20 27 28 | 57 4f 4e 44 45 52 20 2e |MAG), '(|WONDER .|
|00005390| 20 57 4f 4d 41 4e 29 29 | 20 26 0d 0a 25 20 55 73 | WOMAN))| &..% Us|
|000053a0| 69 6e 67 20 61 20 64 69 | 66 66 65 72 65 6e 74 20 |ing a di|fferent |
|000053b0| 6e 61 6d 65 2c 20 68 65 | 72 65 20 69 73 20 61 20 |name, he|re is a |
|000053c0| 68 69 6e 74 20 61 62 6f | 75 74 20 6f 6e 65 20 77 |hint abo|ut one w|
|000053d0| 61 79 20 74 6f 20 77 72 | 69 74 65 20 53 55 42 53 |ay to wr|ite SUBS|
|000053e0| 54 3a 20 25 0d 0a 0d 0a | 46 55 4e 43 54 49 4f 4e |T: %....|FUNCTION|
|000053f0| 20 53 55 42 53 54 49 54 | 55 54 45 20 28 41 47 47 | SUBSTIT|UTE (AGG|
|00005400| 52 45 47 41 54 45 2c 20 | 50 41 52 54 2c 20 52 45 |REGATE, |PART, RE|
|00005410| 50 4c 41 43 45 4d 45 4e | 54 29 2c 0d 0a 20 20 57 |PLACEMEN|T),.. W|
|00005420| 48 45 4e 20 41 47 47 52 | 45 47 41 54 45 20 3d 20 |HEN AGGR|EGATE = |
|00005430| 50 41 52 54 2c 20 22 2e | 2e 2e 22 20 20 45 58 49 |PART, ".|.." EXI|
|00005440| 54 2c 0d 0a 20 20 57 48 | 45 4e 20 41 54 4f 4d 20 |T,.. WH|EN ATOM |
|00005450| 28 22 2e 2e 2e 22 29 2c | 20 22 2e 2e 2e 22 20 20 |("..."),| "..." |
|00005460| 45 58 49 54 2c 0d 0a 20 | 20 41 44 4a 4f 49 4e 20 |EXIT,.. | ADJOIN |
|00005470| 28 22 2e 2e 2e 22 2c 20 | 22 2e 2e 2e 22 29 0d 0a |("...", |"...")..|
|00005480| 45 4e 44 46 55 4e 20 26 | 25 20 46 69 6c 65 20 41 |ENDFUN &|% File A|
|00005490| 52 49 54 48 2e 4d 55 53 | 20 68 61 73 20 74 68 69 |RITH.MUS| has thi|
|000054a0| 73 20 66 75 6e 63 74 69 | 6f 6e 2c 20 6e 61 6d 65 |s functi|on, name|
|000054b0| 64 20 53 55 42 2e 0d 0a | 20 0d 0a 54 68 69 73 20 |d SUB...| ..This |
|000054c0| 69 73 20 74 68 65 20 65 | 6e 64 20 6f 66 20 50 4c |is the e|nd of PL|
|000054d0| 45 53 32 2e 50 44 53 2e | 0d 0a 0d 0a 54 68 65 20 |ES2.PDS.|....The |
|000054e0| 6e 65 78 74 20 6c 65 73 | 73 6f 6e 20 64 65 61 6c |next les|son deal|
|000054f0| 73 20 77 69 74 68 20 61 | 20 73 70 65 63 69 61 6c |s with a| special|
|00005500| 20 66 6f 72 6d 20 6f 66 | 20 74 72 65 65 20 63 61 | form of| tree ca|
|00005510| 6c 6c 65 64 20 61 20 6c | 69 73 74 2e 0d 0a 4d 61 |lled a l|ist...Ma|
|00005520| 6e 79 20 70 65 6f 70 6c | 65 20 66 69 6e 64 20 6c |ny peopl|e find l|
|00005530| 69 73 74 73 20 6d 6f 72 | 65 20 74 6f 20 74 68 65 |ists mor|e to the|
|00005540| 69 72 20 6c 69 6b 69 6e | 67 2c 20 61 6e 64 20 70 |ir likin|g, and p|
|00005550| 65 72 68 61 70 73 20 79 | 6f 75 20 77 69 6c 6c 20 |erhaps y|ou will |
|00005560| 74 6f 6f 2e 25 0d 0a 0d | 0a 45 43 48 4f 3a 20 46 |too.%...|.ECHO: F|
|00005570| 41 4c 53 45 20 24 0d 0a | 4d 4f 56 44 20 28 23 50 |ALSE $..|MOVD (#P|
|00005580| 52 49 4e 54 2c 20 50 52 | 49 4e 54 29 20 24 20 20 |RINT, PR|INT) $ |
|00005590| 4d 4f 56 44 20 28 23 50 | 52 49 4e 54 4c 49 4e 45 |MOVD (#P|RINTLINE|
|000055a0| 2c 20 50 52 49 4e 54 4c | 49 4e 45 29 20 24 0d 0a |, PRINTL|INE) $..|
|000055b0| 45 43 48 4f 3a 20 23 45 | 43 48 4f 20 24 0d 0a 52 |ECHO: #E|CHO $..R|
|000055c0| 44 53 20 28 29 20 24 0d | 0a 1a 1a 1a 1a 1a 1a 1a |DS () $.|........|
|000055d0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000055e0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|000055f0| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00005600| 25 20 46 69 6c 65 3a 20 | 50 4c 45 53 33 2e 50 44 |% File: |PLES3.PD|
|00005610| 53 20 20 28 63 29 09 09 | 30 33 2f 31 34 2f 38 34 |S (c)..|03/14/84|
|00005620| 09 54 68 65 20 53 6f 66 | 74 20 57 61 72 65 68 6f |.The Sof|t Wareho|
|00005630| 75 73 65 20 25 0d 0a 0d | 0a 0d 0a 23 45 43 48 4f |use %...|...#ECHO|
|00005640| 3a 20 45 43 48 4f 20 24 | 45 43 48 4f 3a 20 54 52 |: ECHO $|ECHO: TR|
|00005650| 55 45 20 24 20 0d 0a 0d | 0a 25 20 54 68 69 73 20 |UE $ ...|.% This |
|00005660| 69 73 20 74 68 65 20 74 | 68 69 72 64 20 69 6e 20 |is the t|hird in |
|00005670| 61 20 73 65 72 69 65 73 | 20 6f 66 20 6d 75 53 49 |a series| of muSI|
|00005680| 4d 50 20 70 72 6f 67 72 | 61 6d 6d 69 6e 67 20 6c |MP progr|amming l|
|00005690| 65 73 73 6f 6e 73 2c 20 | 72 65 71 75 69 72 69 6e |essons, |requirin|
|000056a0| 67 20 0d 0a 61 62 6f 75 | 74 20 35 30 20 6d 69 6e |g ..abou|t 50 min|
|000056b0| 75 74 65 73 2e 0d 0a 0d | 0a 49 74 20 69 73 20 6f |utes....|.It is o|
|000056c0| 66 74 65 6e 20 6d 6f 73 | 74 20 6e 61 74 75 72 61 |ften mos|t natura|
|000056d0| 6c 20 74 6f 20 72 65 70 | 72 65 73 65 6e 74 20 61 |l to rep|resent a|
|000056e0| 20 64 61 74 61 20 61 67 | 67 72 65 67 61 74 65 20 | data ag|gregate |
|000056f0| 61 73 20 61 20 73 65 71 | 75 65 6e 63 65 20 6f 72 |as a seq|uence or|
|00005700| 20 4c 49 53 54 20 0d 0a | 6f 66 20 69 74 65 6d 73 | LIST ..|of items|
|00005710| 20 72 61 74 68 65 72 20 | 74 68 61 6e 20 61 73 20 | rather |than as |
|00005720| 61 20 67 65 6e 65 72 61 | 6c 20 62 69 6e 61 72 79 |a genera|l binary|
|00005730| 20 74 72 65 65 2e 20 20 | 46 6f 72 20 65 78 61 6d | tree. |For exam|
|00005740| 70 6c 65 2c 20 73 75 63 | 68 20 61 20 73 65 71 75 |ple, suc|h a sequ|
|00005750| 65 6e 63 65 20 0d 0a 69 | 73 20 71 75 69 74 65 20 |ence ..i|s quite |
|00005760| 6e 61 74 75 72 61 6c 20 | 66 6f 72 20 74 68 65 20 |natural |for the |
|00005770| 65 6c 65 6d 65 6e 74 73 | 20 6f 66 20 61 20 73 65 |elements| of a se|
|00005780| 74 20 6f 72 20 76 65 63 | 74 6f 72 2e 20 20 20 57 |t or vec|tor. W|
|00005790| 65 20 63 61 6e 20 72 65 | 70 72 65 73 65 6e 74 20 |e can re|present |
|000057a0| 73 75 63 68 20 0d 0a 61 | 20 20 73 65 71 75 65 6e |such ..a| sequen|
|000057b0| 63 65 20 20 69 6e 20 74 | 65 72 6d 73 20 6f 66 20 |ce in t|erms of |
|000057c0| 6e 6f 64 65 73 20 62 79 | 20 68 61 76 69 6e 67 20 |nodes by| having |
|000057d0| 61 6c 6c 20 6f 66 20 74 | 68 65 20 46 49 52 53 54 |all of t|he FIRST|
|000057e0| 20 63 65 6c 6c 73 20 70 | 6f 69 6e 74 20 74 6f 20 | cells p|oint to |
|000057f0| 20 74 68 65 20 0d 0a 64 | 61 74 61 20 65 6c 65 6d | the ..d|ata elem|
|00005800| 65 6e 74 73 2c 20 20 75 | 73 69 6e 67 20 74 68 65 |ents, u|sing the|
|00005810| 20 52 45 53 54 20 63 65 | 6c 6c 73 20 74 6f 20 6c | REST ce|lls to l|
|00005820| 69 6e 6b 20 74 68 65 20 | 73 65 71 75 65 6e 63 65 |ink the |sequence|
|00005830| 20 74 6f 67 65 74 68 65 | 72 2e 20 20 54 68 65 20 | togethe|r. The |
|00005840| 6c 61 73 74 20 0d 0a 6c | 69 6e 6b 61 67 65 20 20 |last ..l|inkage |
|00005850| 6e 6f 64 65 20 63 61 6e | 20 68 61 76 65 20 61 20 |node can| have a |
|00005860| 52 45 53 54 20 63 65 6c | 6c 20 77 68 69 63 68 20 |REST cel|l which |
|00005870| 69 73 20 46 41 4c 53 45 | 20 74 6f 20 69 6e 64 69 |is FALSE| to indi|
|00005880| 63 61 74 65 20 74 68 61 | 74 20 74 68 65 72 65 20 |cate tha|t there |
|00005890| 20 61 72 65 20 0d 0a 6e | 6f 20 66 75 72 74 68 65 | are ..n|o furthe|
|000058a0| 72 20 6c 69 6e 6b 61 67 | 65 20 6e 6f 64 65 73 3a |r linkag|e nodes:|
|000058b0| 0d 0a 0d 0a 09 20 20 20 | 20 20 20 20 2f 5c 0d 0a |..... | /\..|
|000058c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2f 20 | | / |
|000058d0| 20 5c 0d 0a 20 20 20 20 | 20 20 20 20 20 20 20 69 | \.. | i|
|000058e0| 74 65 6d 31 20 2f 5c 0d | 0a 09 20 20 20 20 20 20 |tem1 /\.|.. |
|000058f0| 20 20 2f 20 20 5c 0d 0a | 20 20 20 20 20 20 20 20 | / \..| |
|00005900| 20 20 20 20 20 69 74 65 | 6d 32 20 20 2e 0d 0a 09 | ite|m2 ....|
|00005910| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2e 0d 0a | | ...|
|00005920| 20 20 20 20 20 09 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00005930| 20 20 20 2f 5c 0d 0a 09 | 20 20 20 20 20 20 20 20 | /\...| |
|00005940| 20 20 20 20 2f 20 20 5c | 0d 0a 09 20 20 20 20 20 | / \|... |
|00005950| 20 20 20 20 69 74 65 6d | 4e 20 20 46 41 4c 53 45 | item|N FALSE|
|00005960| 0d 0a 25 3b 25 20 57 68 | 65 6e 20 74 68 69 73 20 |..%;% Wh|en this |
|00005970| 64 69 61 67 72 61 6d 20 | 69 73 20 72 6f 74 61 74 |diagram |is rotat|
|00005980| 65 64 20 34 35 20 64 65 | 67 72 65 65 73 20 63 6f |ed 45 de|grees co|
|00005990| 75 6e 74 65 72 2d 63 6c | 6f 63 6b 77 69 73 65 2c |unter-cl|ockwise,|
|000059a0| 20 69 74 20 6c 6f 6f 6b | 73 20 73 69 6d 69 6c 61 | it look|s simila|
|000059b0| 72 20 0d 0a 74 6f 20 61 | 20 63 6c 6f 74 68 65 73 |r ..to a| clothes|
|000059c0| 20 6c 69 6e 65 20 77 69 | 74 68 20 74 68 65 20 73 | line wi|th the s|
|000059d0| 75 63 63 65 73 73 69 76 | 65 20 64 61 74 61 20 65 |uccessiv|e data e|
|000059e0| 6c 65 6d 65 6e 74 73 20 | 73 75 73 70 65 6e 64 65 |lements |suspende|
|000059f0| 64 20 66 72 6f 6d 20 69 | 74 2c 20 77 68 69 63 68 |d from i|t, which|
|00005a00| 20 0d 0a 6d 6f 72 65 20 | 63 6c 65 61 72 6c 79 20 | ..more |clearly |
|00005a10| 73 75 67 67 65 73 74 73 | 20 61 20 73 65 71 75 65 |suggests| a seque|
|00005a20| 6e 63 65 2e 20 0d 0a 0d | 0a 20 20 20 20 20 20 20 |nce. ...|. |
|00005a30| 20 20 20 20 20 20 20 20 | 2b 2d 2d 2d 2d 2d 2d 2d | |+-------|
|00005a40| 2b 2d 2d 20 20 2d 20 20 | 2d 20 20 2d 20 20 2d 2d |+-- - |- - --|
|00005a50| 2d 2b 2d 2d 2d 2d 2d 20 | 46 41 4c 53 45 0d 0a 20 |-+----- |FALSE.. |
|00005a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 7c 20 | | | |
|00005a70| 20 20 20 20 20 20 7c 20 | 20 20 20 20 20 20 20 20 | | | |
|00005a80| 20 20 20 20 20 20 20 7c | 0d 0a 20 20 20 20 20 20 | ||.. |
|00005a90| 20 20 20 20 20 20 20 69 | 74 65 6d 31 20 20 20 69 | i|tem1 i|
|00005aa0| 74 65 6d 32 20 20 20 20 | 20 20 20 20 20 20 20 20 |tem2 | |
|00005ab0| 69 74 65 6d 4e 0d 0a 0d | 0a 54 68 65 20 73 69 6d |itemN...|.The sim|
|00005ac0| 70 6c 65 20 72 65 67 75 | 6c 61 72 69 74 79 20 6f |ple regu|larity o|
|00005ad0| 66 20 74 68 69 73 20 73 | 74 72 75 63 74 75 72 65 |f this s|tructure|
|00005ae0| 20 70 65 72 6d 69 74 73 | 20 63 6f 72 72 65 73 70 | permits| corresp|
|00005af0| 6f 6e 64 69 6e 67 6c 79 | 20 73 69 6d 70 6c 65 20 |ondingly| simple |
|00005b00| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 64 65 66 69 6e |..functi|on defin|
|00005b10| 69 74 69 6f 6e 73 20 66 | 6f 72 20 70 72 6f 63 65 |itions f|or proce|
|00005b20| 73 73 69 6e 67 20 73 75 | 63 68 20 73 74 72 75 63 |ssing su|ch struc|
|00005b30| 74 75 72 65 73 2e 20 20 | 4d 6f 72 65 6f 76 65 72 |tures. |Moreover|
|00005b40| 2c 20 74 68 65 20 6c 69 | 6e 65 61 72 20 0d 0a 73 |, the li|near ..s|
|00005b50| 74 72 75 63 74 75 72 65 | 20 73 75 67 67 65 73 74 |tructure| suggest|
|00005b60| 73 20 61 6e 20 65 78 74 | 65 72 6e 61 6c 20 70 72 |s an ext|ernal pr|
|00005b70| 69 6e 74 65 64 20 72 65 | 70 72 65 73 65 6e 74 61 |inted re|presenta|
|00005b80| 74 69 6f 6e 20 74 68 61 | 74 20 69 73 20 6d 6f 72 |tion tha|t is mor|
|00005b90| 65 20 72 65 61 64 61 62 | 6c 65 20 0d 0a 74 68 61 |e readab|le ..tha|
|00005ba0| 6e 20 64 6f 74 74 65 64 | 20 70 61 69 72 73 2e 20 |n dotted| pairs. |
|00005bb0| 20 49 6e 20 72 65 73 70 | 6f 6e 73 65 20 74 6f 20 | In resp|onse to |
|00005bc0| 61 6e 20 61 6d 70 65 72 | 73 61 6e 64 20 74 65 72 |an amper|sand ter|
|00005bd0| 6d 69 6e 61 74 6f 72 2c | 20 6d 75 53 49 4d 50 20 |minator,| muSIMP |
|00005be0| 70 72 69 6e 74 73 20 74 | 68 65 20 0d 0a 61 62 6f |prints t|he ..abo|
|00005bf0| 76 65 20 61 67 67 72 65 | 67 61 74 65 20 69 6e 20 |ve aggre|gate in |
|00005c00| 74 68 65 20 6d 6f 72 65 | 20 6e 61 74 75 72 61 6c |the more| natural|
|00005c10| 20 4c 49 53 54 20 6e 6f | 74 61 74 69 6f 6e 3a 0d | LIST no|tation:.|
|00005c20| 0a 0d 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00005c30| 20 20 20 20 20 20 20 20 | 20 20 20 28 69 74 65 6d | | (item|
|00005c40| 31 20 69 74 65 6d 32 20 | 2e 2e 2e 20 69 74 65 6d |1 item2 |... item|
|00005c50| 4e 29 0d 0a 0d 0a 72 61 | 74 68 65 72 20 74 68 61 |N)....ra|ther tha|
|00005c60| 6e 20 74 68 65 20 65 71 | 75 69 76 61 6c 65 6e 74 |n the eq|uivalent|
|00005c70| 20 64 6f 74 20 6e 6f 74 | 61 74 69 6f 6e 0d 0a 0d | dot not|ation...|
|00005c80| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 69 |. | (i|
|00005c90| 74 65 6d 31 20 2e 20 28 | 69 74 65 6d 32 20 2e 20 |tem1 . (|item2 . |
|00005ca0| 20 2e 2e 2e 20 28 69 74 | 65 6d 4e 20 2e 20 46 41 | ... (it|emN . FA|
|00005cb0| 4c 53 45 29 20 2e 2e 2e | 20 29 29 0d 0a 25 3b 25 |LSE) ...| ))..%;%|
|00005cc0| 20 43 6f 6e 76 65 72 73 | 65 6c 79 2c 20 74 68 65 | Convers|ely, the|
|00005cd0| 20 72 65 61 64 65 72 20 | 61 63 63 65 70 74 73 20 | reader |accepts |
|00005ce0| 6c 69 73 74 20 6e 6f 74 | 61 74 69 6f 6e 20 61 73 |list not|ation as|
|00005cf0| 20 61 6e 20 61 6c 74 65 | 72 6e 61 74 69 76 65 20 | an alte|rnative |
|00005d00| 74 6f 20 64 6f 74 20 0d | 0a 6e 6f 74 61 74 69 6f |to dot .|.notatio|
|00005d10| 6e 2e 20 20 4d 6f 72 65 | 6f 76 65 72 2c 20 61 6e |n. More|over, an|
|00005d20| 79 20 6f 66 20 74 68 65 | 20 69 74 65 6d 73 20 69 |y of the| items i|
|00005d30| 6e 20 61 20 6c 69 73 74 | 20 63 61 6e 20 74 68 65 |n a list| can the|
|00005d40| 6d 73 65 6c 76 65 73 20 | 62 65 20 65 69 74 68 65 |mselves |be eithe|
|00005d50| 72 20 0d 0a 6c 69 73 74 | 73 20 6f 72 20 6d 6f 72 |r ..list|s or mor|
|00005d60| 65 20 67 65 6e 65 72 61 | 6c 20 64 6f 74 74 65 64 |e genera|l dotted|
|00005d70| 20 70 61 69 72 73 2e 0d | 0a 0d 0a 54 68 65 20 6d | pairs..|...The m|
|00005d80| 75 53 49 4d 50 20 50 52 | 49 4e 54 20 66 75 6e 63 |uSIMP PR|INT func|
|00005d90| 74 69 6f 6e 20 75 73 65 | 73 20 6c 69 73 74 20 6e |tion use|s list n|
|00005da0| 6f 74 61 74 69 6f 6e 20 | 61 73 20 6d 75 63 68 20 |otation |as much |
|00005db0| 61 73 20 70 6f 73 73 69 | 62 6c 65 2e 20 20 54 68 |as possi|ble. Th|
|00005dc0| 75 73 2c 20 61 20 0d 0a | 73 74 72 75 63 74 75 72 |us, a ..|structur|
|00005dd0| 65 20 6f 66 20 74 68 65 | 20 66 6f 72 6d 0d 0a 0d |e of the| form...|
|00005de0| 0a 09 20 20 20 20 20 20 | 20 2f 5c 0d 0a 20 20 20 |.. | /\.. |
|00005df0| 20 20 20 20 20 20 20 20 | 20 20 20 2f 20 20 5c 0d | | / \.|
|00005e00| 0a 20 20 20 20 20 20 20 | 20 20 20 20 69 74 65 6d |. | item|
|00005e10| 31 20 2f 5c 0d 0a 09 20 | 20 20 20 20 20 20 20 2f |1 /\... | /|
|00005e20| 20 20 5c 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 | \.. | |
|00005e30| 20 20 69 74 65 6d 32 20 | 20 2e 0d 0a 09 20 20 20 | item2 | .... |
|00005e40| 20 20 20 20 20 20 20 20 | 20 20 2e 0d 0a 20 20 20 | | ... |
|00005e50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005e60| 20 20 2f 5c 0d 0a 09 20 | 20 20 20 20 20 20 20 20 | /\... | |
|00005e70| 20 20 20 2f 20 20 5c 0d | 0a 09 20 20 20 20 20 20 | / \.|.. |
|00005e80| 20 20 20 69 74 65 6d 4e | 20 20 61 74 6f 6d 0d 0a | itemN| atom..|
|00005e90| 0d 0a 77 68 65 72 65 20 | 22 61 74 6f 6d 22 20 69 |..where |"atom" i|
|00005ea0| 73 20 6e 6f 74 20 74 68 | 65 20 61 74 6f 6d 20 46 |s not th|e atom F|
|00005eb0| 41 4c 53 45 2c 20 69 73 | 20 64 69 73 70 6c 61 79 |ALSE, is| display|
|00005ec0| 65 64 20 69 6e 20 61 20 | 6d 69 78 65 64 20 6e 6f |ed in a |mixed no|
|00005ed0| 74 61 74 69 6f 6e 20 61 | 73 0d 0a 0d 0a 20 20 20 |tation a|s.... |
|00005ee0| 20 20 28 69 74 65 6d 31 | 20 69 74 65 6d 32 20 2e | (item1| item2 .|
|00005ef0| 2e 2e 20 28 69 74 65 6d | 4e 20 2e 20 61 74 6f 6d |.. (item|N . atom|
|00005f00| 29 29 0d 0a 25 3b 25 54 | 68 65 20 6d 75 53 49 4d |))..%;%T|he muSIM|
|00005f10| 50 20 52 45 41 44 20 66 | 75 6e 63 74 69 6f 6e 20 |P READ f|unction |
|00005f20| 63 6f 72 72 65 63 74 6c | 79 20 72 65 61 64 73 20 |correctl|y reads |
|00005f30| 73 75 63 68 20 6d 69 78 | 65 64 20 6e 6f 74 61 74 |such mix|ed notat|
|00005f40| 69 6f 6e 2e 20 20 54 68 | 65 20 72 65 61 73 6f 6e |ion. Th|e reason|
|00005f50| 20 79 6f 75 20 0d 0a 6e | 65 76 65 72 20 6e 6f 74 | you ..n|ever not|
|00005f60| 69 63 65 64 20 6c 69 73 | 74 20 6e 6f 74 61 74 69 |iced lis|t notati|
|00005f70| 6f 6e 20 62 65 69 6e 67 | 20 6f 75 74 70 75 74 20 |on being| output |
|00005f80| 69 6e 20 50 4c 45 53 31 | 20 61 6e 64 20 50 4c 45 |in PLES1| and PLE|
|00005f90| 53 32 20 69 73 20 74 68 | 61 74 20 50 52 49 4e 54 |S2 is th|at PRINT|
|00005fa0| 20 77 61 73 20 0d 0a 72 | 65 64 65 66 69 6e 65 64 | was ..r|edefined|
|00005fb0| 20 61 74 20 74 68 65 20 | 62 65 67 69 6e 6e 69 6e | at the |beginnin|
|00005fc0| 67 20 6f 66 20 74 68 6f | 73 65 20 6c 65 73 73 6f |g of tho|se lesso|
|00005fd0| 6e 73 20 74 6f 20 73 75 | 70 70 72 65 73 73 20 6c |ns to su|ppress l|
|00005fe0| 69 73 74 20 6e 6f 74 61 | 74 69 6f 6e 2e 20 20 28 |ist nota|tion. (|
|00005ff0| 54 68 65 20 0d 0a 66 75 | 6c 6c 20 64 65 66 69 6e |The ..fu|ll defin|
|00006000| 69 74 69 6f 6e 20 77 61 | 73 20 72 65 73 74 6f 72 |ition wa|s restor|
|00006010| 65 64 20 61 74 20 74 68 | 65 20 65 6e 64 20 6f 66 |ed at th|e end of|
|00006020| 20 74 68 6f 73 65 20 6c | 65 73 73 6f 6e 73 2e 29 | those l|essons.)|
|00006030| 0d 0a 0d 0a 52 45 41 44 | 20 70 65 72 6d 69 74 73 |....READ| permits|
|00006040| 20 62 75 74 20 64 6f 65 | 73 20 6e 6f 74 20 72 65 | but doe|s not re|
|00006050| 71 75 69 72 65 20 63 6f | 6d 6d 61 73 20 62 65 74 |quire co|mmas bet|
|00006060| 77 65 65 6e 20 74 68 65 | 20 69 74 65 6d 73 20 6f |ween the| items o|
|00006070| 66 20 61 20 6c 69 73 74 | 3a 20 25 0d 0a 0d 0a 27 |f a list|: %....'|
|00006080| 28 48 6f 74 2c 20 73 74 | 72 6f 6e 67 20 61 6e 64 |(Hot, st|rong and|
|00006090| 20 73 61 74 69 73 66 79 | 69 6e 67 29 20 26 25 20 | satisfy|ing) &% |
|000060a0| 54 6f 20 73 65 65 20 61 | 20 72 65 61 6c 6c 79 20 |To see a| really |
|000060b0| 6c 6f 6e 67 20 6c 69 73 | 74 2c 20 65 6e 74 65 72 |long lis|t, enter|
|000060c0| 20 74 68 65 20 65 78 70 | 72 65 73 73 69 6f 6e 0d | the exp|ression.|
|000060d0| 0a 0d 0a 4f 42 4c 49 53 | 54 20 28 29 20 26 0d 0a |...OBLIS|T () &..|
|000060e0| 0d 0a 77 68 69 63 68 20 | 72 65 74 75 72 6e 73 20 |..which |returns |
|000060f0| 61 20 6c 69 73 74 20 6f | 66 20 61 6c 6c 20 63 75 |a list o|f all cu|
|00006100| 72 72 65 6e 74 6c 79 20 | 61 63 74 69 76 65 20 6e |rrently |active n|
|00006110| 61 6d 65 73 20 69 6e 20 | 72 65 76 65 72 73 65 20 |ames in |reverse |
|00006120| 63 68 72 6f 6e 6f 6c 6f | 67 69 63 61 6c 20 0d 0a |chronolo|gical ..|
|00006130| 6f 72 64 65 72 20 6f 66 | 20 74 68 65 69 72 20 69 |order of| their i|
|00006140| 6e 74 72 6f 64 75 63 74 | 69 6f 6e 2e 0d 0a 0d 0a |ntroduct|ion.....|
|00006150| 42 65 20 70 72 65 70 61 | 72 65 64 20 74 6f 20 66 |Be prepa|red to f|
|00006160| 72 65 65 7a 65 20 74 68 | 65 20 73 63 72 65 65 6e |reeze th|e screen|
|00006170| 20 77 69 74 68 20 43 54 | 52 4c 2d 53 2c 20 61 6e | with CT|RL-S, an|
|00006180| 64 20 62 65 20 70 72 65 | 70 61 72 65 64 20 74 68 |d be pre|pared th|
|00006190| 61 74 20 73 6f 6d 65 20 | 0d 0a 63 6f 6e 74 72 6f |at some |..contro|
|000061a0| 6c 2d 63 68 61 72 61 63 | 74 65 72 20 6e 61 6d 65 |l-charac|ter name|
|000061b0| 73 20 69 6e 20 74 68 65 | 20 6c 69 73 74 20 6d 61 |s in the| list ma|
|000061c0| 79 20 63 6c 65 61 72 20 | 79 6f 75 72 20 73 63 72 |y clear |your scr|
|000061d0| 65 65 6e 20 6f 72 20 6f | 74 68 65 72 77 69 73 65 |een or o|therwise|
|000061e0| 20 6d 61 6b 65 20 0d 0a | 73 6f 6d 65 20 74 65 72 | make ..|some ter|
|000061f0| 6d 69 6e 61 6c 73 20 62 | 65 68 61 76 65 20 75 6e |minals b|ehave un|
|00006200| 75 73 75 61 6c 6c 79 3a | 20 25 3b 0d 0a 25 20 4f |usually:| %;..% O|
|00006210| 42 4c 49 53 54 28 29 20 | 70 72 6f 76 69 64 65 73 |BLIST() |provides|
|00006220| 20 61 20 72 65 6d 69 6e | 64 65 72 20 77 68 65 6e | a remin|der when|
|00006230| 20 79 6f 75 20 63 61 6e | 27 74 20 72 65 6d 65 6d | you can|'t remem|
|00006240| 62 65 72 20 61 20 6e 61 | 6d 65 20 65 78 61 63 74 |ber a na|me exact|
|00006250| 6c 79 20 6f 72 20 77 68 | 65 6e 20 0d 0a 79 6f 75 |ly or wh|en ..you|
|00006260| 20 77 61 6e 74 20 74 6f | 20 64 65 74 65 72 6d 69 | want to| determi|
|00006270| 6e 65 20 69 66 20 74 68 | 65 20 66 75 6e 63 74 69 |ne if th|e functi|
|00006280| 6f 6e 73 20 69 6e 20 61 | 20 70 61 72 74 69 63 75 |ons in a| particu|
|00006290| 6c 61 72 20 66 69 6c 65 | 20 68 61 76 65 20 62 65 |lar file| have be|
|000062a0| 65 6e 20 6c 6f 61 64 65 | 64 2e 0d 0a 0d 0a 49 74 |en loade|d.....It|
|000062b0| 20 69 73 20 43 52 55 43 | 49 41 4c 20 74 6f 20 66 | is CRUC|IAL to f|
|000062c0| 75 6c 6c 79 20 75 6e 64 | 65 72 73 74 61 6e 64 20 |ully und|erstand |
|000062d0| 74 68 65 20 63 6f 6e 6e | 65 63 74 69 6f 6e 20 62 |the conn|ection b|
|000062e0| 65 74 77 65 65 6e 20 64 | 6f 74 74 65 64 20 70 61 |etween d|otted pa|
|000062f0| 69 72 73 20 61 6e 64 20 | 0d 0a 6c 69 73 74 73 2c |irs and |..lists,|
|00006300| 20 73 6f 20 74 61 6b 65 | 20 61 20 66 65 77 20 6d | so take| a few m|
|00006310| 69 6e 75 74 65 73 20 74 | 6f 20 74 79 70 65 20 69 |inutes t|o type i|
|00006320| 6e 20 73 6f 6d 65 20 6c | 69 73 74 73 2c 20 6e 65 |n some l|ists, ne|
|00006330| 73 74 65 64 20 6c 69 73 | 74 73 2c 20 6e 65 73 74 |sted lis|ts, nest|
|00006340| 65 64 20 0d 0a 64 6f 74 | 74 65 64 20 70 61 69 72 |ed ..dot|ted pair|
|00006350| 73 2c 20 61 6e 64 20 6d | 69 78 74 75 72 65 73 2c |s, and m|ixtures,|
|00006360| 20 6e 6f 74 69 6e 67 20 | 63 61 72 65 66 75 6c 6c | noting |carefull|
|00006370| 79 20 68 6f 77 20 74 68 | 65 79 20 64 69 73 70 6c |y how th|ey displ|
|00006380| 61 79 2e 20 25 3b 0d 0a | 25 20 20 44 69 64 20 79 |ay. %;..|% Did y|
|00006390| 6f 75 72 20 65 78 61 6d | 70 6c 65 73 20 69 6e 63 |our exam|ples inc|
|000063a0| 6c 75 64 65 3a 20 25 0d | 0a 0d 0a 27 28 29 20 26 |lude: %.|...'() &|
|000063b0| 25 20 49 73 20 74 68 61 | 74 20 73 75 72 70 72 69 |% Is tha|t surpri|
|000063c0| 73 69 6e 67 3f 20 20 53 | 69 6e 63 65 20 46 41 4c |sing? S|ince FAL|
|000063d0| 53 45 20 69 73 20 75 73 | 65 64 20 74 6f 20 73 69 |SE is us|ed to si|
|000063e0| 67 6e 61 6c 20 74 68 65 | 20 65 6e 64 20 6f 66 20 |gnal the| end of |
|000063f0| 6c 69 73 74 73 2c 20 46 | 41 4c 53 45 20 0d 0a 61 |lists, F|ALSE ..a|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.