============================================================================================================================================== OFFSET 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F 10 11 12 13 14 15 16 17 18 19 1A 1B 1C 1D 1E 1F ---------------------------------------------------------------------------------------------------------------------------------------------- 00000000 01 00 81 76 49 68 C2 25 3C 3D 01 00 78 05 00 60 62 60 6B 00 08 00 01 00 01 00 01 00 01 00 08 78 ☺.üvIh┬%<=☺.x♣.`b`k.◘.☺.☺.☺.☺.◘x 00000020 05 00 60 69 60 64 00 08 00 01 00 01 00 01 00 01 00 00 78 05 00 60 63 60 72 00 08 00 01 00 01 00 ♣.`i`d.◘.☺.☺.☺.☺..x♣.`c`r.◘.☺.☺. 00000040 01 00 01 00 0D 78 05 00 60 74 60 62 00 08 00 01 00 01 00 01 00 01 00 09 78 02 00 61 00 08 00 2C ☺.☺.♪x♣.`t`b.◘.☺.☺.☺.☺.○x☻.a.◘., 00000060 01 02 00 01 00 05 00 3C 00 20 72 23 75 73 63 6F 72 65 20 6B 76 20 20 20 20 20 20 20 20 20 20 20 ☺☻.☺.♣.<. r#uscore kv 00000080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000000A0 20 20 20 20 20 20 72 23 6B 76 2C 5B 4C 69 6F 5F 30 2E 35 5D 28 6B 76 5E 3D 27 20 27 29 5C 27 2D r#kv,[Lio_0.5](kv^=' ')\'- 000000C0 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ' 000000E0 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00000100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 75 73 "us 00000120 63 6F 72 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 core 00000140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 "from ' 00000160 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 the apl handbook of techniques' 00000180 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 78 05 00 60 6C 60 6E 00 08 00 01 copyright 1978, ibm. x♣.`l`n.◘.☺ 000001A0 00 01 00 01 00 01 00 0A 78 05 00 63 72 74 6E 00 00 01 00 09 1D 00 07 00 03 00 09 00 08 00 03 00 .☺.☺.☺.◙x♣.crtn..☺.○↔.•.♥.○.◘.♥. 000001C0 02 00 01 00 01 00 08 00 AB 01 02 00 01 00 07 00 3D 00 20 7A 23 63 72 74 6E 20 20 20 20 20 20 20 ☻.☺.☺.◘.½☺☻.☺.•.=. z#crtn 000001E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 28 30 5E 3D 4C 6E 63 27 60 63 60 72 27 29 2F $(0^=Lnc'`c`r')/ 00000220 61 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a1 00000240 20 20 20 20 20 20 20 20 20 20 20 20 20 60 63 60 72 23 4C 61 76 5B 4C 69 6F 2B 31 33 5D 20 20 20 `c`r#Lav[Lio+13] 00000260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000280 20 20 20 20 20 20 20 20 20 61 31 3A 7A 23 60 63 60 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a1:z#`c`r 000002A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000002C0 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 000002E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000300 20 20 20 22 63 72 74 6E 20 2D 20 73 65 74 20 60 63 60 72 20 74 6F 20 63 61 72 72 69 61 67 65 20 "crtn - set `c`r to carriage 00000320 72 65 74 75 72 6E 20 63 68 61 72 61 63 74 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 return character 00000340 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E "from 'the apl handbook of techn 00000360 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 20 00 00 12 iques' copyright 1978, ibm. ..↕ 00000380 00 42 56 FC FF 03 00 0E 00 2D 52 01 00 6C 79 2C 20 24 00 42 56 03 00 02 00 00 00 00 00 01 00 66 .BVⁿ ♥.♫.-R☺.ly, $.BV♥.☻.....☺.f 000003A0 69 65 64 FF FF 00 00 FC FF 01 00 04 00 EA 51 01 00 63 74 65 72 FF FF 00 00 FC FF 11 00 0A 00 EA ied ..ⁿ ☺.♦.ΩQ☺.cter ..ⁿ ◄.◙.Ω 000003C0 51 01 00 00 00 00 00 FF FF 00 00 0F 00 10 00 00 00 00 00 01 00 00 00 00 00 6C 00 42 56 09 00 0F Q☺..... ..☼.►.....☺.....l.BV○.☼ 000003E0 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 07 00 09 00 02 00 64 52 01 00 00 00 00 00 FF FF 00 .....☺..... ..•.○.☻.dR☺..... . 00000400 00 EA FF 06 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 3E 00 04 00 00 00 00 00 01 00 00 00 00 .Ω ♠.....☺..... ..>.♦.....☺.... 00000420 00 B4 00 42 56 FD FF 03 00 0C 00 62 52 01 00 00 00 00 00 FF FF 00 00 08 00 02 00 00 00 00 00 01 .┤.BV² ♥.♀.bR☺..... ..◘.☻.....☺ 00000440 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 68 61 72 61 EA 00 42 56 3D 00 10 00 00 ..... ..♦.☺.....☺.haraΩ.BV=.►.. 00000460 00 00 00 01 00 2E 65 2E 2C FF FF 00 00 FD FF 0E 00 02 00 7F 52 01 00 00 00 00 00 FF FF 00 00 0B ...☺..e., ..² ♫.☻.⌂R☺..... ..♂ 00000480 00 0D 00 00 00 00 00 01 00 00 00 00 00 20 01 42 56 ED FF 0A 00 00 00 00 00 01 00 00 00 00 00 32 .♪.....☺..... ☺BVφ ◙.....☺.....2 000004A0 01 42 56 3B 00 09 00 00 00 00 00 01 00 63 68 61 72 44 01 42 56 F4 FF 06 00 00 00 00 00 01 00 00 ☺BV;.○.....☺.charD☺BV⌠ ♠.....☺.. 000004C0 00 00 00 FF FF 00 00 03 00 05 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 01 00 0A 00 37 ... ..♥.♣.....☺..... ..ⁿ ☺.◙.7 000004E0 52 01 00 00 00 00 00 FF FF 00 00 FC FF 05 00 02 00 44 52 01 00 00 00 00 00 FF FF 00 00 03 00 04 R☺..... ..ⁿ ♣.☻.DR☺..... ..♥.♦ 00000500 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 03 00 02 00 38 52 01 00 00 00 00 00 B0 01 42 .....☺..... ..ⁿ ♥.☻.8R☺.....░☺B 00000520 56 1A 00 02 00 00 00 00 00 01 00 65 72 69 63 FF FF 00 00 FC FF 03 00 02 00 1D 52 01 00 20 20 20 V→.☻.....☺.eric ..ⁿ ♥.☻.↔R☺. 00000540 20 FF FF 00 00 FD FF 02 00 06 00 90 52 01 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 ..² ☻.♠.ÉR☺..... ..♦.☺.....☺ 00000560 00 6A 65 63 74 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 6E 3D 52 FF FF 00 00 02 00 00 00 00 .ject ..☻.......☺. n=R ..☻.... 00000580 00 00 00 01 00 20 20 20 20 00 00 36 00 D8 00 68 01 C2 01 E6 01 F8 01 24 00 B0 01 05 00 63 72 74 ...☺. ..6.╪.h☺┬☺µ☺°☺$.░☺♣.crt 000005A0 6E 00 02 00 7A 00 03 00 61 31 00 08 00 04 00 01 00 01 00 04 00 60 63 60 72 04 00 01 00 00 00 02 n.☻.z.♥.a1.◘.♦.☺.☺.♦.`c`r♦.☺...☻ 000005C0 00 00 00 04 00 01 00 00 00 02 00 0D 00 05 00 60 63 60 72 00 05 00 60 63 60 72 00 02 00 7A 00 03 ...♦.☺...☻.♪.♣.`c`r.♣.`c`r.☻.z.♥ 000005E0 00 61 31 00 04 00 01 00 00 00 02 00 00 00 78 05 00 6C 6E 66 64 00 00 01 00 09 1D 00 07 00 03 00 .a1.♦.☺...☻...x♣.lnfd..☺.○↔.•.♥. 00000600 09 00 08 00 03 00 02 00 01 00 01 00 08 00 AB 01 02 00 01 00 07 00 3D 00 20 7A 23 6C 6E 66 64 20 ○.◘.♥.☻.☺.☺.◘.½☺☻.☺.•.=. z#lnfd 00000620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 28 30 5E 3D 4C 6E 63 27 60 $(0^=Lnc'` 00000660 6C 60 6E 27 29 2F 61 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 l`n')/a1 00000680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 6C 60 6E 23 4C 61 76 5B 4C 69 6F 2B `l`n#Lav[Lio+ 000006A0 31 30 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10] 000006C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 31 3A 7A 23 60 6C 60 6E 20 20 20 20 20 20 20 20 a1:z#`l`n 000006E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000700 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00000720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000740 20 20 20 20 20 20 20 20 20 22 6C 6E 66 64 20 2D 20 73 65 74 20 60 6C 60 6E 20 74 6F 20 6C 69 6E "lnfd - set `l`n to lin 00000760 65 66 65 65 64 20 63 68 61 72 61 63 74 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 efeed character 00000780 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 "from 'the apl handbook of 000007A0 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D techniques' copyright 1978, ibm 000007C0 2E 20 20 00 00 12 00 6D 57 FC FF 03 00 0A 00 77 52 01 00 00 00 00 00 24 00 6D 57 03 00 02 00 00 . ..↕.mWⁿ ♥.◙.wR☺.....$.mW♥.☻.. 000007E0 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 01 00 02 00 4C 52 01 00 00 00 00 00 FF FF 00 00 FC ...☺..... ..ⁿ ☺.☻.LR☺..... ..ⁿ 00000800 FF 11 00 0A 00 6D 52 01 00 00 00 00 00 FF FF 00 00 0F 00 10 00 00 00 00 00 01 00 00 00 00 00 6C ◄.◙.mR☺..... ..☼.►.....☺.....l 00000820 00 6D 57 09 00 0F 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 07 00 09 00 04 00 A2 52 01 00 00 .mW○.☼.....☺..... ..•.○.♦.óR☺.. 00000840 00 00 00 FF FF 00 00 EA FF 06 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 3E 00 04 00 00 00 00 ... ..Ω ♠.....☺..... ..>.♦.... 00000860 00 01 00 00 00 00 00 B4 00 6D 57 FD FF 03 00 0E 00 89 52 01 00 00 00 00 00 FF FF 00 00 08 00 02 .☺.....┤.mW² ♥.♫.ëR☺..... ..◘.☻ 00000880 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 22 66 72 6F EA 00 6D .....☺..... ..♦.☺.....☺."froΩ.m 000008A0 57 3D 00 10 00 00 00 00 00 01 00 64 62 6F 6F FF FF 00 00 FD FF 0E 00 04 00 DF 52 01 00 00 00 00 W=.►.....☺.dboo ..² ♫.♦.▀R☺.... 000008C0 00 FF FF 00 00 0B 00 0D 00 00 00 00 00 01 00 00 00 00 00 20 01 6D 57 ED FF 0A 00 00 00 00 00 01 . ..♂.♪.....☺..... ☺mWφ ◙.....☺ 000008E0 00 00 00 00 00 32 01 6D 57 3B 00 09 00 00 00 00 00 01 00 67 69 76 65 44 01 6D 57 F4 FF 06 00 00 .....2☺mW;.○.....☺.giveD☺mW⌠ ♠.. 00000900 00 00 00 01 00 00 00 00 00 FF FF 00 00 03 00 05 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC ...☺..... ..♥.♣.....☺..... ..ⁿ 00000920 FF 01 00 08 00 80 52 01 00 00 00 00 00 FF FF 00 00 FC FF 05 00 0C 00 91 52 01 00 00 00 00 00 FF ☺.◘.ÇR☺..... ..ⁿ ♣.♀.æR☺..... 00000940 FF 00 00 03 00 04 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 03 00 0A 00 8B 52 01 00 00 ..♥.♦.....☺..... ..ⁿ ♥.◙.ïR☺.. 00000960 00 00 00 B0 01 6D 57 1A 00 02 00 00 00 00 00 01 00 69 70 6C 65 FF FF 00 00 FC FF 03 00 04 00 8B ...░☺mW→.☻.....☺.iple ..ⁿ ♥.♦.ï 00000980 52 01 00 70 6F 6E 64 FF FF 00 00 FD FF 02 00 0E 00 ED 52 01 00 00 00 00 00 FF FF 00 00 04 00 01 R☺.pond ..² ☻.♫.φR☺..... ..♦.☺ 000009A0 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 .....☺. ..☻.......☺. . 000009C0 00 02 00 00 00 00 00 00 00 01 00 75 20 69 73 00 00 36 00 D8 00 68 01 C2 01 E6 01 F8 01 24 00 B0 .☻.......☺.u is..6.╪.h☺┬☺µ☺°☺$.░ 000009E0 01 05 00 6C 6E 66 64 00 02 00 7A 00 03 00 61 31 00 08 00 04 00 01 00 01 00 04 00 60 6C 60 6E 04 ☺♣.lnfd.☻.z.♥.a1.◘.♦.☺.☺.♦.`l`n♦ 00000A00 00 01 00 00 00 02 00 00 00 04 00 01 00 00 00 02 00 0A 00 05 00 60 6C 60 6E 00 05 00 60 6C 60 6E .☺...☻...♦.☺...☻.◙.♣.`l`n.♣.`l`n 00000A20 00 02 00 7A 00 03 00 61 31 00 04 00 01 00 00 00 02 00 00 00 78 05 00 69 64 6C 63 00 00 01 00 09 .☻.z.♥.a1.♦.☺...☻...x♣.idlc..☺.○ 00000A40 1D 00 07 00 03 00 09 00 08 00 03 00 02 00 01 00 01 00 08 00 AB 01 02 00 01 00 07 00 3D 00 20 7A ↔.•.♥.○.◘.♥.☻.☺.☺.◘.½☺☻.☺.•.=. z 00000A60 23 69 64 6C 63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #idlc 00000A80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 28 30 5E $(0^ 00000AA0 3D 4C 6E 63 27 60 69 60 64 27 29 2F 61 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 =Lnc'`i`d')/a1 00000AC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 69 60 64 23 4C 61 `i`d#La 00000AE0 76 5B 4C 69 6F 2B 30 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 v[Lio+0] 00000B00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 31 3A 7A 23 60 69 60 64 20 20 a1:z#`i`d 00000B20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000B40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 $0 00000B60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000B80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 69 64 6C 63 20 2D 20 73 65 74 20 60 69 60 64 20 "idlc - set `i`d 00000BA0 74 6F 20 69 64 6C 65 20 63 68 61 72 61 63 74 65 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 to idle character 00000BC0 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 "from 'the apl handb 00000BE0 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 ook of techniques' copyright 197 00000C00 38 2C 20 69 62 6D 2E 20 20 00 00 12 00 30 57 FC FF 03 00 02 00 EF 51 01 00 20 57 0A 06 24 00 30 8, ibm. ..↕.0Wⁿ ♥.☻.∩Q☺. W◙♠$.0 00000C20 57 03 00 02 00 00 00 00 00 01 00 20 57 1C 06 FF FF 00 00 FC FF 01 00 0C 00 EE 51 01 00 20 57 2E W♥.☻.....☺. W∟♠ ..ⁿ ☺.♀.εQ☺. W. 00000C40 06 FF FF 00 00 FC FF 11 00 08 00 3A 52 01 00 00 00 00 00 FF FF 00 00 0F 00 10 00 00 00 00 00 01 ♠ ..ⁿ ◄.◘.:R☺..... ..☼.►.....☺ 00000C60 00 00 00 00 00 6C 00 30 57 09 00 0F 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 07 00 09 00 10 .....l.0W○.☼.....☺..... ..•.○.► 00000C80 00 7B 52 01 00 00 00 00 00 FF FF 00 00 EA FF 06 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 3E .{R☺..... ..Ω ♠.....☺..... ..> 00000CA0 00 04 00 00 00 00 00 01 00 00 00 00 00 B4 00 30 57 FD FF 03 00 06 00 74 52 01 00 00 00 00 00 FF .♦.....☺.....┤.0W² ♥.♠.tR☺..... 00000CC0 FF 00 00 08 00 02 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 00 ..◘.☻.....☺..... ..♦.☺.....☺.. 00000CE0 00 D0 06 EA 00 30 57 3D 00 0F 00 00 00 00 00 01 00 20 57 E2 06 FF FF 00 00 FD FF 0E 00 06 00 9B .╨♠Ω.0W=.☼.....☺. WΓ♠ ..² ♫.♠.¢ 00000D00 52 01 00 00 00 00 00 FF FF 00 00 0B 00 0D 00 00 00 00 00 01 00 00 00 00 00 20 01 30 57 ED FF 0A R☺..... ..♂.♪.....☺..... ☺0Wφ ◙ 00000D20 00 00 00 00 00 01 00 00 00 00 00 32 01 30 57 3B 00 09 00 00 00 00 00 01 00 20 57 2A 07 44 01 30 .....☺.....2☺0W;.○.....☺. W*•D☺0 00000D40 57 F4 FF 06 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 03 00 05 00 00 00 00 00 01 00 00 00 00 W⌠ ♠.....☺..... ..♥.♣.....☺.... 00000D60 00 FF FF 00 00 FC FF 01 00 02 00 54 52 01 00 00 00 00 00 FF FF 00 00 FC FF 05 00 08 00 58 52 01 . ..ⁿ ☺.☻.TR☺..... ..ⁿ ♣.◘.XR☺ 00000D80 00 00 00 00 00 FF FF 00 00 03 00 04 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 03 00 02 ..... ..♥.♦.....☺..... ..ⁿ ♥.☻ 00000DA0 00 58 52 01 00 00 00 00 00 B0 01 30 57 1A 00 02 00 00 00 00 00 01 00 20 57 A8 07 FF FF 00 00 FC .XR☺.....░☺0W→.☻.....☺. W¿• ..ⁿ 00000DC0 FF 03 00 0E 00 3A 52 01 00 20 57 BA 07 FF FF 00 00 FD FF 02 00 0E 00 C7 52 01 00 00 00 00 00 FF ♥.♫.:R☺. W║• ..² ☻.♫.╟R☺..... 00000DE0 FF 00 00 04 00 01 00 00 00 00 00 01 00 20 57 DE 07 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 ..♦.☺.....☺. W▐• ..☻.......☺. 00000E00 57 F0 07 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 57 02 08 00 00 36 00 D8 00 68 01 C2 01 E6 W≡• ..☻.......☺. W☻◘..6.╪.h☺┬☺µ 00000E20 01 F8 01 24 00 B0 01 05 00 69 64 6C 63 00 02 00 7A 00 03 00 61 31 00 08 00 04 00 01 00 01 00 04 ☺°☺$.░☺♣.idlc.☻.z.♥.a1.◘.♦.☺.☺.♦ 00000E40 00 60 69 60 64 04 00 01 00 00 00 02 00 00 00 04 00 01 00 00 00 02 00 00 00 05 00 60 69 60 64 00 .`i`d♦.☺...☻...♦.☺...☻...♣.`i`d. 00000E60 05 00 60 69 60 64 00 02 00 7A 00 03 00 61 31 00 04 00 01 00 00 00 02 00 00 00 78 06 00 73 65 64 ♣.`i`d.☻.z.♥.a1.♦.☺...☻...x♠.sed 00000E80 69 74 00 00 01 00 0A 2A 00 05 00 06 00 20 00 02 00 01 00 01 00 08 00 3B 01 02 00 01 00 05 00 3F it..☺.◙*.♣.♠. .☻.☺.☺.◘.;☺☻.☺.♣.? 00000EA0 00 20 65 64 69 74 65 64 23 73 65 64 69 74 20 75 6E 65 64 69 74 65 64 3B 73 6C 61 73 68 20 20 20 . edited#sedit unedited;slash 00000EC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00000EE0 20 4C 23 65 64 69 74 65 64 23 28 28 2B 2F 27 20 27 3D 73 6C 61 73 68 29 59 75 6E 65 64 69 74 65 L#edited#((+/' '=slash)Yunedite 00000F00 64 29 2C 28 43 51 29 2C 28 52 2C 73 6C 61 73 68 23 51 29 55 4C 23 75 6E 65 64 69 74 65 64 20 20 d),(CQ),(R,slash#Q)UL#unedited 00000F20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00000F40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 "s 00000F60 65 64 69 74 20 2D 20 73 61 6D 65 20 61 73 20 65 64 69 74 20 62 75 74 20 69 6E 73 65 72 74 20 69 edit - same as edit but insert i 00000F80 73 20 61 6E 20 65 78 65 63 75 74 61 62 6C 65 20 65 78 70 72 65 73 73 69 6F 6E 20 20 20 22 66 72 s an executable expression "fr 00000FA0 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 om 'the apl handbook of techniqu 00000FC0 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 20 20 20 36 00 FF FF es' copyright 1978, ibm. 6. 00000FE0 00 00 FC FF 17 00 04 00 B3 50 01 00 01 00 0B 00 24 00 54 53 1B 00 16 00 00 00 00 00 01 00 20 20 ..ⁿ ↨.♦.│P☺.☺.♂.$.TS←.▬.....☺. 00001000 20 20 00 00 54 53 FC FF 0E 00 08 00 AE 50 01 00 20 20 20 20 48 00 54 53 FC FF 08 00 08 00 A7 50 ..TSⁿ ♫.◘.«P☺. H.TSⁿ ◘.◘.ºP 00001020 01 00 20 20 20 20 5A 00 54 53 03 00 07 00 00 00 00 00 01 00 66 20 7E 63 24 00 54 53 FC FF 01 00 ☺. Z.TS♥.•.....☺.f ~c$.TSⁿ ☺. 00001040 04 00 8C 50 01 00 20 20 20 20 7E 00 54 53 FC FF 36 00 06 00 0B 51 01 00 20 20 20 20 90 00 54 53 ♦.îP☺. ~.TSⁿ 6.♠.♂Q☺. É.TS 00001060 03 00 35 00 00 00 00 00 01 00 20 24 30 20 A2 00 54 53 2C 00 34 00 00 00 00 00 01 00 20 7A 23 6D ♥.5.....☺. $0 ó.TS,.4.....☺. z#m 00001080 B4 00 54 53 35 00 33 00 00 00 00 00 01 00 20 20 20 20 C6 00 54 53 09 00 32 00 00 00 00 00 01 00 ┤.TS5.3.....☺. ╞.TS○.2.....☺. 000010A0 20 20 20 20 D8 00 54 53 31 00 31 00 00 00 00 00 01 00 31 20 2D 31 EA 00 54 53 03 00 30 00 00 00 ╪.TS1.1.....☺.1 -1Ω.TS♥.0... 000010C0 00 00 01 00 20 20 20 20 FC 00 54 53 FC FF 2B 00 0C 00 B6 50 01 00 20 20 20 20 0E 01 54 53 0C 00 ..☺. ⁿ.TSⁿ +.♀.╢P☺. ♫☺TS♀. 000010E0 2A 00 00 00 00 00 01 00 61 62 75 6C 20 01 54 53 32 00 29 00 00 00 00 00 01 00 20 20 20 20 32 01 *.....☺.abul ☺TS2.).....☺. 2☺ 00001100 54 53 08 00 28 00 00 00 00 00 01 00 20 20 20 20 44 01 54 53 0C 00 27 00 00 00 00 00 01 00 20 24 TS◘.(.....☺. D☺TS♀.'.....☺. $ 00001120 30 20 56 01 54 53 09 00 26 00 00 00 00 00 01 00 20 20 20 20 68 01 54 53 31 00 25 00 00 00 00 00 0 V☺TS○.&.....☺. h☺TS1.%..... 00001140 01 00 20 20 20 20 7A 01 54 53 23 00 24 00 00 00 00 00 01 00 20 20 20 20 8C 01 54 53 08 00 23 00 ☺. z☺TS#.$.....☺. î☺TS◘.#. 00001160 00 00 00 00 01 00 74 61 6E 64 9E 01 54 53 0C 00 22 00 00 00 00 00 01 00 72 65 20 66 B0 01 54 53 ....☺.tand₧☺TS♀.".....☺.re f░☺TS 00001180 09 00 21 00 00 00 00 00 01 00 61 74 74 69 C2 01 54 53 FC FF 19 00 08 00 BC 50 01 00 27 74 68 65 ○.!.....☺.atti┬☺TSⁿ ↓.◘.╝P☺.'the 000011A0 D4 01 54 53 39 00 18 00 00 00 00 00 01 00 6F 66 20 74 E6 01 54 53 09 00 17 00 00 00 00 00 01 00 ╘☺TS9.↑.....☺.of tµ☺TS○.↨.....☺. 000011C0 79 72 69 67 F8 01 54 53 FC FF 12 00 04 00 B6 50 01 00 22 2D 61 20 0A 02 54 53 1D 00 11 00 00 00 yrig°☺TSⁿ ↕.♦.╢P☺."-a ◙☻TS↔.◄... 000011E0 00 00 01 00 74 20 6E 6F 1C 02 54 53 07 00 0E 00 0A 00 20 51 01 00 66 6F 72 20 2E 02 54 53 0F 00 ..☺.t no∟☻TS•.♫.◙. Q☺.for .☻TS☼. 00001200 0D 00 00 00 00 00 01 00 20 20 20 20 40 02 54 53 0B 00 0C 00 00 00 00 00 01 00 20 67 62 65 52 02 ♪.....☺. @☻TS♂.♀.....☺. gbeR☻ 00001220 54 53 08 00 0B 00 00 00 00 00 01 00 20 67 68 65 64 02 54 53 08 00 0A 00 00 00 00 00 01 00 20 20 TS◘.♂.....☺. ghed☻TS◘.◙.....☺. 00001240 20 20 76 02 54 53 03 00 09 00 00 00 00 00 01 00 3A 20 47 63 88 02 54 53 FC FF 03 00 0C 00 B3 50 v☻TS♥.○.....☺.: Gcê☻TSⁿ ♥.♀.│P 00001260 01 00 65 74 65 73 9A 02 54 53 03 00 02 00 00 00 00 00 01 00 75 6C 61 74 FF FF 00 00 2C 00 01 00 ☺.etesÜ☻TS♥.☻.....☺.ulat ..,.☺. 00001280 00 00 00 00 01 00 00 2D 0C 00 BE 02 54 53 FD FF 02 00 02 00 52 51 01 00 02 00 01 00 FF FF 00 00 ....☺..-♀.╛☻TS² ☻.☻.RQ☺.☻.☺. .. 000012A0 04 00 01 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 00 00 ♦.☺.....☺..... ..☻.......☺..... 000012C0 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 14 00 00 00 00 00 6C 00 AC 02 D0 02 E2 02 5A 00 FF FF ..☻.......☺.¶.....l.¼☻╨☻Γ☻Z. 000012E0 06 00 73 6C 61 73 68 00 09 00 75 6E 65 64 69 74 65 64 00 06 00 73 65 64 69 74 00 07 00 65 64 69 ♠.slash.○.unedited.♠.sedit.•.edi 00001300 74 65 64 00 09 00 75 6E 65 64 69 74 65 64 00 06 00 73 6C 61 73 68 00 09 00 75 6E 65 64 69 74 65 ted.○.unedited.♠.slash.○.unedite 00001320 64 00 06 00 73 6C 61 73 68 00 08 00 01 00 00 00 01 00 20 07 00 65 64 69 74 65 64 00 04 00 01 00 d.♠.slash.◘.☺...☺. •.edited.♦.☺. 00001340 00 00 02 00 00 00 78 06 00 73 63 61 6C 65 00 00 01 00 0A 15 00 04 00 04 00 01 00 01 00 0F 00 08 ..☻...x♠.scale..☺.◙§.♦.♦.☺.☺.☼.◘ 00001360 00 F4 00 02 00 01 00 04 00 3D 00 20 72 20 23 20 73 63 61 6C 65 20 6D 70 20 20 20 20 20 20 20 20 .⌠.☻.☺.♦.=. r # scale mp 00001380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000013A0 20 20 20 20 20 20 20 20 22 73 63 61 6C 65 20 2D 20 73 63 61 6C 61 72 20 61 70 70 72 6F 78 69 6D "scale - scalar approxim 000013C0 61 74 69 6F 6E 20 6F 66 20 6D 70 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ation of mp. 000013E0 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 "from 'the apl handbook of 00001400 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E techniques' copyright 1978, ibm. 00001420 20 20 20 72 23 28 31 30 30 30 30 30 30 30 2A 31 59 6D 70 29 58 31 30 30 30 30 30 30 30 42 31 55 r#(10000000*1Ymp)X10000000B1U 00001440 6D 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 mp ↕ 00001460 00 FF FF 00 00 FC FF 0B 00 0A 00 9A 50 01 00 01 00 08 00 24 00 AE 52 FC FF 05 00 0E 00 98 50 01 . ..ⁿ ♂.◙.ÜP☺.☺.◘.$.«Rⁿ ♣.♫.ÿP☺ 00001480 00 74 6E 61 6D 36 00 AE 52 03 00 03 00 00 00 00 00 01 00 20 20 20 20 00 00 AE 52 FC FF 01 00 0E .tnam6.«R♥.♥.....☺. ..«Rⁿ ☺.♫ 000014A0 00 90 50 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 61 20 6E 61 FF FF 00 00 02 .ÉP☺. ..☻.......☺.a na ..☻ 000014C0 00 00 00 00 00 00 00 01 00 61 63 74 65 7E 00 AE 52 FC FF 1E 00 02 00 A7 50 01 00 20 20 20 20 90 .......☺.acte~.«Rⁿ ▲.☻.ºP☺. É 000014E0 00 AE 52 35 00 1D 00 00 00 00 00 01 00 20 28 74 6E A2 00 AE 52 FD FF 1C 00 0C 00 18 51 01 00 6E .«R5.↔.....☺. (tnó.«R² ∟.♀.↑Q☺.n 00001500 63 74 69 B4 00 AE 52 22 00 1B 00 00 00 00 00 01 00 4C 6E 63 20 C6 00 AE 52 FD FF 13 00 0A 00 09 cti┤.«R".←.....☺.Lnc ╞.«R² ‼.◙.○ 00001520 51 01 00 20 20 20 20 D8 00 AE 52 38 00 12 00 00 00 00 00 01 00 6E 61 6D 65 EA 00 AE 52 09 00 11 Q☺. ╪.«R8.↕.....☺.nameΩ.«R○.◄ 00001540 00 00 00 00 00 01 00 20 20 20 20 FC 00 AE 52 FC FF 0F 00 06 00 9B 50 01 00 20 20 20 20 0E 01 AE .....☺. ⁿ.«Rⁿ ☼.♠.¢P☺. ♫☺« 00001560 52 39 00 0E 00 00 00 00 00 01 00 20 74 6E 61 20 01 AE 52 FD FF 0D 00 02 00 BB 50 01 00 20 20 20 R9.♫.....☺. tna ☺«R² ♪.☻.╗P☺. 00001580 20 32 01 AE 52 0A 00 0C 00 00 00 00 00 01 00 20 20 20 20 44 01 AE 52 FD FF 04 00 08 00 B4 50 01 2☺«R◙.♀.....☺. D☺«R² ♦.◘.┤P☺ 000015A0 00 20 24 30 20 56 01 AE 52 08 00 03 00 00 00 00 00 01 00 20 20 20 20 68 01 AE 52 03 00 02 00 00 . $0 V☺«R◘.♥.....☺. h☺«R♥.☻.. 000015C0 00 00 00 01 00 20 20 20 20 FF FF 00 00 FC FF 01 00 10 00 9A 50 01 00 20 20 20 20 00 00 48 00 5A ...☺. ..ⁿ ☺.►.ÜP☺. ..H.Z 000015E0 00 6C 00 36 00 FF FF 03 00 6D 70 00 06 00 73 63 61 6C 65 00 02 00 72 00 03 00 6D 70 00 04 00 01 .l.6. ♥.mp.♠.scale.☻.r.♥.mp.♦.☺ 00001600 00 00 00 02 00 01 00 02 00 01 00 00 00 08 00 00 00 00 00 D0 12 63 41 03 00 6D 70 00 04 00 01 00 ...☻.☺.☻.☺...◘.....╨↕cA♥.mp.♦.☺. 00001620 00 00 02 00 01 00 02 00 01 00 00 00 08 00 00 00 00 00 D0 12 63 41 02 00 72 00 78 05 00 62 6B 73 ..☻.☺.☻.☺...◘.....╨↕cA☻.r.x♣.bks 00001640 70 00 00 01 00 09 1D 00 07 00 03 00 09 00 08 00 03 00 02 00 01 00 01 00 08 00 AB 01 02 00 01 00 p..☺.○↔.•.♥.○.◘.♥.☻.☺.☺.◘.½☺☻.☺. 00001660 07 00 3D 00 20 7A 23 62 6B 73 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 •.=. z#bksp 00001680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000016A0 20 20 24 28 30 5E 3D 4C 6E 63 27 60 62 60 6B 27 29 2F 61 31 20 20 20 20 20 20 20 20 20 20 20 20 $(0^=Lnc'`b`k')/a1 000016C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60 ` 000016E0 62 60 6B 23 4C 61 76 5B 4C 69 6F 2B 38 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 b`k#Lav[Lio+8] 00001700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 31 3A 7A 23 a1:z# 00001720 60 62 60 6B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 `b`k 00001740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 $0 00001760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00001780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 62 6B 73 70 20 2D 20 73 65 74 "bksp - set 000017A0 20 60 62 60 6B 20 74 6F 20 62 61 63 6B 73 70 61 63 65 20 63 68 61 72 61 63 74 65 72 20 20 20 20 `b`k to backspace character 000017C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C "from 'the apl 000017E0 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 handbook of techniques' copyrig 00001800 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 20 00 00 12 00 A4 55 FC FF 03 00 0E 00 A8 51 01 00 20 ht 1978, ibm. ..↕.ñUⁿ ♥.♫.¿Q☺. 00001820 63 6F 70 24 00 A4 55 03 00 02 00 00 00 00 00 01 00 62 6D 2E 20 FF FF 00 00 FC FF 01 00 08 00 A8 cop$.ñU♥.☻.....☺.bm. ..ⁿ ☺.◘.¿ 00001840 51 01 00 6E 75 6D 65 FF FF 00 00 FC FF 11 00 04 00 AD 51 01 00 00 00 00 00 FF FF 00 00 0F 00 10 Q☺.nume ..ⁿ ◄.♦.¡Q☺..... ..☼.► 00001860 00 00 00 00 00 01 00 00 00 00 00 6C 00 A4 55 09 00 0F 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 .....☺.....l.ñU○.☼.....☺..... . 00001880 00 07 00 09 00 10 00 48 52 01 00 00 00 00 00 FF FF 00 00 EA FF 06 00 00 00 00 00 01 00 00 00 00 .•.○.►.HR☺..... ..Ω ♠.....☺.... 000018A0 00 FF FF 00 00 3E 00 04 00 00 00 00 00 01 00 00 00 00 00 B4 00 A4 55 FD FF 03 00 0C 00 42 52 01 . ..>.♦.....☺.....┤.ñU² ♥.♀.BR☺ 000018C0 00 00 00 00 00 FF FF 00 00 08 00 02 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 ..... ..◘.☻.....☺..... ..♦.☺.. 000018E0 00 00 00 01 00 20 20 20 20 EA 00 A4 55 3D 00 0F 00 00 00 00 00 01 00 73 20 70 72 FF FF 00 00 FD ...☺. Ω.ñU=.☼.....☺.s pr ..² 00001900 FF 0E 00 0E 00 65 52 01 00 00 00 00 00 FF FF 00 00 0B 00 0D 00 00 00 00 00 01 00 00 00 00 00 20 ♫.♫.eR☺..... ..♂.♪.....☺..... 00001920 01 A4 55 ED FF 0A 00 00 00 00 00 01 00 00 00 00 00 32 01 A4 55 3B 00 09 00 00 00 00 00 01 00 63 ☺ñUφ ◙.....☺.....2☺ñU;.○.....☺.c 00001940 6F 6C 75 44 01 A4 55 F4 FF 06 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 03 00 05 00 00 00 00 oluD☺ñU⌠ ♠.....☺..... ..♥.♣.... 00001960 00 01 00 00 00 00 00 FF FF 00 00 FC FF 01 00 0C 00 1B 52 01 00 00 00 00 00 FF FF 00 00 FC FF 05 .☺..... ..ⁿ ☺.♀.←R☺..... ..ⁿ ♣ 00001980 00 08 00 23 52 01 00 00 00 00 00 FF FF 00 00 03 00 04 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 .◘.#R☺..... ..♥.♦.....☺..... . 000019A0 00 FC FF 03 00 0C 00 1C 52 01 00 00 00 00 00 B0 01 A4 55 1A 00 02 00 00 00 00 00 01 00 20 62 65 .ⁿ ♥.♀.∟R☺.....░☺ñU→.☻.....☺. be 000019C0 20 FF FF 00 00 FC FF 03 00 0A 00 EF 51 01 00 63 74 75 72 FF FF 00 00 FD FF 02 00 02 00 78 52 01 ..ⁿ ♥.◙.∩Q☺.ctur ..² ☻.☻.xR☺ 000019E0 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 74 68 65 20 FF FF 00 00 02 00 00 00 00 ..... ..♦.☺.....☺.the ..☻.... 00001A00 00 00 00 01 00 66 20 69 74 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 00 00 36 00 D8 ...☺.f it ..☻.......☺. ..6.╪ 00001A20 00 68 01 C2 01 E6 01 F8 01 24 00 B0 01 05 00 62 6B 73 70 00 02 00 7A 00 03 00 61 31 00 08 00 04 .h☺┬☺µ☺°☺$.░☺♣.bksp.☻.z.♥.a1.◘.♦ 00001A40 00 01 00 01 00 04 00 60 62 60 6B 04 00 01 00 00 00 02 00 00 00 04 00 01 00 00 00 02 00 08 00 05 .☺.☺.♦.`b`k♦.☺...☻...♦.☺...☻.◘.♣ 00001A60 00 60 62 60 6B 00 05 00 60 62 60 6B 00 02 00 7A 00 03 00 61 31 00 04 00 01 00 00 00 02 00 00 00 .`b`k.♣.`b`k.☻.z.♥.a1.♦.☺...☻... 00001A80 78 07 00 73 6F 72 74 64 61 00 00 01 00 0C 2E 00 09 00 07 00 1F 00 02 00 01 00 01 00 01 00 01 00 x•.sortda..☺.♀..○.•.▼.☻.☺.☺.☺.☺. 00001AA0 01 00 01 00 08 00 1C 02 02 00 01 00 09 00 3C 00 20 72 23 64 61 20 73 6F 72 74 64 61 20 6D 3B 6E ☺.☺.◘.∟☻☻.☺.○.<. r#da sortda m;n 00001AC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00001AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 72 23 6E 5B 57 2C 28 6E 23 6D 5B 41 2C 6D 5B 3B 2D 31 59 r#n[W,(n#m[A,m[;-1Y 00001B00 64 61 5D 3B 5D 29 5B 3B 31 59 64 61 5D 3B 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 da];])[;1Yda];] 00001B20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00001B40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00001B60 20 20 20 20 22 73 6F 72 74 64 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "sortda 00001B80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00001BA0 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E "from 'the apl handbook of techn 00001BC0 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 22 20 64 61 iques' copyright 1978, ibm. " da 00001BE0 20 69 73 20 61 20 70 61 69 72 20 6F 66 20 63 6F 6C 75 6D 6E 20 6E 75 6D 62 65 72 73 20 69 6E 20 is a pair of column numbers in 00001C00 75 73 65 72 27 73 20 6F 72 69 67 69 6E 2E 20 20 20 20 20 20 20 20 20 20 22 20 61 20 63 6F 6E 74 user's origin. " a cont 00001C20 72 6F 6C 73 20 74 68 65 20 69 6E 69 74 69 61 6C 20 61 73 63 65 6E 64 69 6E 67 20 73 6F 72 74 2E rols the initial ascending sort. 00001C40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 64 20 63 6F 6E 74 72 6F 6C 73 " d controls 00001C60 20 74 68 65 20 66 69 6E 61 6C 20 64 65 73 63 65 6E 64 69 6E 67 20 73 6F 72 74 2E 20 20 20 20 20 the final descending sort. 00001C80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 6D 20 69 73 20 61 20 6E 75 6D 65 72 69 63 " m is a numeric 00001CA0 20 6D 61 74 72 69 78 20 77 68 69 63 68 20 6D 61 79 20 72 65 73 75 6C 74 20 66 72 6F 6D 20 6E 66 matrix which may result from nf 00001CC0 6F 72 6D 2E 20 20 20 20 20 20 20 20 36 00 FF FF 00 00 FC FF 0F 00 04 00 2C 51 01 00 C5 54 FC FF orm. 6. ..ⁿ ☼.♦.,Q☺.┼Tⁿ 00001CE0 24 00 E8 54 1B 00 0E 00 00 00 00 00 01 00 C5 54 FC FF 00 00 E8 54 FC FF 0D 00 0E 00 26 51 01 00 $.ΦT←.♫.....☺.┼Tⁿ ..ΦTⁿ ♪.♫.&Q☺. 00001D00 C5 54 FC FF 48 00 E8 54 FC FF 06 00 04 00 26 51 01 00 C5 54 08 00 24 00 E8 54 FC FF 03 00 0C 00 ┼Tⁿ H.ΦTⁿ ♠.♦.&Q☺.┼T◘.$.ΦTⁿ ♥.♀. 00001D20 A6 50 01 00 C5 54 03 00 6C 00 E8 54 03 00 02 00 00 00 00 00 01 00 C5 54 FC FF 48 00 E8 54 FC FF ªP☺.┼T♥.l.ΦT♥.☻.....☺.┼Tⁿ H.ΦTⁿ 00001D40 01 00 06 00 A6 50 01 00 C5 54 1A 00 90 00 E8 54 3D 00 22 00 00 00 00 00 01 00 00 00 FC FF A2 00 ☺.♠.ªP☺.┼T→.É.ΦT=.".....☺...ⁿ ó. 00001D60 E8 54 1B 00 21 00 00 00 00 00 01 00 C5 54 FD FF B4 00 E8 54 3D 00 20 00 00 00 00 00 01 00 C5 54 ΦT←.!.....☺.┼T² ┤.ΦT=. .....☺.┼T 00001D80 0B 00 C6 00 E8 54 FC FF 1E 00 10 00 AE 51 01 00 C5 54 FC FF D8 00 E8 54 39 00 1D 00 00 00 00 00 ♂.╞.ΦTⁿ ▲.►.«Q☺.┼Tⁿ ╪.ΦT9.↔..... 00001DA0 01 00 C5 54 03 00 EA 00 E8 54 FD FF 1C 00 0C 00 DA 51 01 00 C5 54 FC FF FC 00 E8 54 1B 00 1B 00 ☺.┼T♥.Ω.ΦT² ∟.♀.┌Q☺.┼Tⁿ ⁿ.ΦT←.←. 00001DC0 00 00 00 00 01 00 C5 54 FC FF 0E 01 E8 54 3B 00 1A 00 00 00 00 00 01 00 C5 54 FC FF 20 01 E8 54 ....☺.┼Tⁿ ♫☺ΦT;.→.....☺.┼Tⁿ ☺ΦT 00001DE0 09 00 19 00 00 00 00 00 01 00 C5 54 FC FF 32 01 E8 54 3D 00 18 00 00 00 00 00 01 00 C5 54 FC FF ○.↓.....☺.┼Tⁿ 2☺ΦT=.↑.....☺.┼Tⁿ 00001E00 44 01 E8 54 1B 00 17 00 00 00 00 00 01 00 C5 54 03 00 56 01 E8 54 3D 00 16 00 00 00 00 00 01 00 D☺ΦT←.↨.....☺.┼T♥.V☺ΦT=.▬.....☺. 00001E20 00 00 FC FF 68 01 E8 54 FC FF 14 00 06 00 4B 51 01 00 C5 54 FC FF 7A 01 E8 54 39 00 13 00 00 00 ..ⁿ h☺ΦTⁿ ¶.♠.KQ☺.┼Tⁿ z☺ΦT9.‼... 00001E40 00 00 01 00 C5 54 0F 00 8C 01 E8 54 FD FF 11 00 06 00 AF 51 01 00 C5 54 09 00 9E 01 E8 54 1B 00 ..☺.┼T☼.î☺ΦT² ◄.♠.»Q☺.┼T○.₧☺ΦT←. 00001E60 10 00 00 00 00 00 01 00 C5 54 FD FF B0 01 E8 54 3B 00 0F 00 00 00 00 00 01 00 C5 54 3E 00 C2 01 ►.....☺.┼T² ░☺ΦT;.☼.....☺.┼T>.┬☺ 00001E80 E8 54 FC FF 0E 00 10 00 4A 51 01 00 C5 54 FC FF D4 01 E8 54 0C 00 0D 00 00 00 00 00 01 00 C5 54 ΦTⁿ ♫.►.JQ☺.┼Tⁿ ╘☺ΦT♀.♪.....☺.┼T 00001EA0 0F 00 E6 01 E8 54 21 00 0C 00 00 00 00 00 01 00 C5 54 36 00 F8 01 E8 54 3B 00 0B 00 00 00 00 00 ☼.µ☺ΦT!.♀.....☺.┼T6.°☺ΦT;.♂..... 00001EC0 01 00 C5 54 08 00 0A 02 E8 54 FC FF 0A 00 0A 00 4A 51 01 00 00 00 04 00 1C 02 E8 54 03 00 09 00 ☺.┼T◘.◙☻ΦTⁿ ◙.◙.JQ☺...♦.∟☻ΦT♥.○. 00001EE0 00 00 00 00 01 00 C5 54 FC FF 2E 02 E8 54 FC FF 08 00 0C 00 47 51 01 00 C5 54 35 00 40 02 E8 54 ....☺.┼Tⁿ .☻ΦTⁿ ◘.♀.GQ☺.┼T5.@☻ΦT 00001F00 08 00 07 00 00 00 00 00 01 00 C5 54 FD FF 52 02 E8 54 0C 00 06 00 00 00 00 00 01 00 C5 54 0C 00 ◘.•.....☺.┼T² R☻ΦT♀.♠.....☺.┼T♀. 00001F20 64 02 E8 54 37 00 05 00 00 00 00 00 01 00 C5 54 09 00 76 02 E8 54 3B 00 04 00 00 00 00 00 01 00 d☻ΦT7.♣.....☺.┼T○.v☻ΦT;.♦.....☺. 00001F40 C5 54 FC FF 88 02 E8 54 FC FF 03 00 10 00 2C 51 01 00 C5 54 3F 00 9A 02 E8 54 03 00 02 00 00 00 ┼Tⁿ ê☻ΦTⁿ ♥.►.,Q☺.┼T?.Ü☻ΦT♥.☻... 00001F60 00 00 01 00 C5 54 08 00 FF FF 00 00 FC FF 01 00 0A 00 2C 51 01 00 C5 54 03 00 BE 02 E8 54 FD FF ..☺.┼T◘. ..ⁿ ☺.◙.,Q☺.┼T♥.╛☻ΦT² 00001F80 02 00 0C 00 E4 51 01 00 00 00 FC FF FF FF 00 00 04 00 01 00 00 00 00 00 01 00 C5 54 FD FF FF FF ☻.♀.ΣQ☺...ⁿ ..♦.☺.....☺.┼T² 00001FA0 00 00 02 00 00 00 00 00 00 00 01 00 00 00 04 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 ..☻.......☺...♦. ..☻.......☺... 00001FC0 02 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 02 00 FF FF 00 00 02 00 00 00 00 00 00 00 ☻. ..☻.......☺...☻. ..☻....... 00001FE0 01 00 00 00 02 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 02 00 FF FF 00 00 02 00 00 00 ☺...☻. ..☻.......☺...☻. ..☻... 00002000 00 00 00 00 01 00 00 00 02 00 00 00 7E 00 AC 02 D0 02 E2 02 F4 02 06 03 18 03 2A 03 6C 00 FF FF ....☺...☻...~.¼☻╨☻Γ☻⌠☻♠♥↑♥*♥l. 00002020 02 00 6E 00 02 00 6D 00 07 00 73 6F 72 74 64 61 00 03 00 64 61 00 02 00 72 00 03 00 64 61 00 04 ☻.n.☻.m.•.sortda.♥.da.☻.r.♥.da.♦ 00002040 00 01 00 00 00 02 00 01 00 03 00 64 61 00 04 00 01 00 00 00 02 00 FF FF 02 00 6D 00 02 00 6D 00 .☺...☻.☺.♥.da.♦.☺...☻. ☻.m.☻.m. 00002060 02 00 6E 00 02 00 6E 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 78 07 00 73 74 72 75 63 74 00 ☻.n.☻.n.☻.r.♦.☺...☻...x•.struct. 00002080 00 01 00 0C 1D 00 06 00 05 00 01 00 13 00 02 00 01 00 01 00 08 00 68 01 02 00 01 00 06 00 3C 00 .☺.♀↔.♠.♣.☺.‼.☻.☺.☺.◘.h☺☻.☺.♠.<. 000020A0 20 78 23 64 20 73 74 72 75 63 74 20 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 x#d struct a 000020C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 64 20 69 "d i 000020E0 73 20 64 65 73 69 72 65 64 20 72 61 6E 6B 20 28 64 69 6D 65 6E 73 69 6F 6E 73 29 20 20 20 20 20 s desired rank (dimensions) 00002100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 78 23 28 28 5F 64 29 x#((_d) 00002120 59 28 64 52 31 29 2C 52 61 29 52 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Y(dR1),Ra)Ra 00002140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 $0 00002160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00002180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 74 72 75 63 74 20 2D 20 75 73 65 64 20 69 "struct - used i 000021A0 6E 20 65 2E 67 2E 20 63 6F 6E 66 6F 72 6D 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n e.g. conform. 000021C0 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 "from 'the apl handb 000021E0 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 ook of techniques' copyright 197 00002200 38 2C 20 69 62 6D 2E 20 12 00 FF FF 00 00 FC FF 0C 00 0A 00 35 51 01 00 01 00 11 00 24 00 1C 55 8, ibm. ↕. ..ⁿ ♀.◙.5Q☺.☺.◄.$.∟U 00002220 FC FF 05 00 0E 00 A7 51 01 00 6E 3B 72 65 00 00 1C 55 FC FF 03 00 04 00 20 51 01 00 20 20 20 20 ⁿ ♣.♫.ºQ☺.n;re..∟Uⁿ ♥.♦. Q☺. 00002240 48 00 1C 55 03 00 02 00 00 00 00 00 01 00 20 20 20 20 24 00 1C 55 FC FF 01 00 0E 00 1F 51 01 00 H.∟U♥.☻.....☺. $.∟Uⁿ ☺.♫.▼Q☺. 00002260 70 72 65 63 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 73 71 75 61 7E 00 1C 55 FC FF 13 00 0C 00 prec ..☻.......☺.squa~.∟Uⁿ ‼.♀. 00002280 F6 51 01 00 6D 65 6E 74 90 00 1C 55 32 00 12 00 00 00 00 00 01 00 22 67 65 74 A2 00 1C 55 09 00 ÷Q☺.mentÉ.∟U2.↕.....☺."getó.∟U○. 000022A0 11 00 00 00 00 00 01 00 74 61 72 74 B4 00 1C 55 FC FF 10 00 06 00 F6 51 01 00 20 20 20 20 C6 00 ◄.....☺.tart┤.∟Uⁿ ►.♠.÷Q☺. ╞. 000022C0 1C 55 32 00 0F 00 00 00 00 00 01 00 20 20 20 20 D8 00 1C 55 0C 00 0E 00 00 00 00 00 01 00 58 52 ∟U2.☼.....☺. ╪.∟U♀.♫.....☺.XR 000022E0 61 29 EA 00 1C 55 09 00 0D 00 00 00 00 00 01 00 28 36 2B 32 FC 00 1C 55 FD FF 0C 00 10 00 F4 51 a)Ω.∟U○.♪.....☺.(6+2ⁿ.∟U² ♀.►.⌠Q 00002300 01 00 30 2E 35 20 0E 01 1C 55 32 00 0B 00 00 00 00 00 01 00 74 72 61 69 20 01 1C 55 FC FF 0A 00 ☺.0.5 ♫☺∟U2.♂.....☺.trai ☺∟Uⁿ ◙. 00002320 08 00 AE 51 01 00 6D 20 61 20 32 01 1C 55 08 00 09 00 00 00 00 00 01 00 20 20 20 20 44 01 1C 55 ◘.«Q☺.m a 2☺∟U◘.○.....☺. D☺∟U 00002340 39 00 08 00 00 00 00 00 01 00 20 24 30 58 56 01 1C 55 09 00 07 00 00 00 00 00 01 00 58 28 28 52 9.◘.....☺. $0XV☺∟U○.•.....☺.X((R 00002360 68 01 1C 55 FC FF 06 00 02 00 AE 51 01 00 29 49 31 29 7A 01 1C 55 3F 00 05 00 00 00 00 00 01 00 h☺∟Uⁿ ♠.☻.«Q☺.)I1)z☺∟U?.♣.....☺. 00002380 20 20 20 20 8C 01 1C 55 08 00 04 00 00 00 00 00 01 00 61 29 59 7A 9E 01 1C 55 08 00 03 00 00 00 î☺∟U◘.♦.....☺.a)Yz₧☺∟U◘.♥... 000023A0 00 00 01 00 20 20 20 20 B0 01 1C 55 03 00 02 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 FC FF ..☺. ░☺∟U♥.☻.....☺. ..ⁿ 000023C0 01 00 0C 00 AD 51 01 00 20 6D 75 6C D4 01 1C 55 FD FF 02 00 04 00 17 52 01 00 31 20 35 30 FF FF ☺.♀.¡Q☺. mul╘☺∟U² ☻.♦.↨R☺.1 50 000023E0 00 00 04 00 01 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 24 ..♦.☺.....☺. ..☻.......☺. $ 00002400 28 31 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 00 00 5A 00 6C 00 C2 01 E6 01 F8 01 (1 ..☻.......☺. ..Z.l.┬☺µ☺°☺ 00002420 48 00 FF FF 02 00 61 00 07 00 73 74 72 75 63 74 00 02 00 64 00 02 00 78 00 02 00 61 00 02 00 61 H. ☻.a.•.struct.☻.d.☻.x.☻.a.☻.a 00002440 00 04 00 01 00 00 00 02 00 01 00 02 00 64 00 02 00 64 00 02 00 78 00 04 00 01 00 00 00 02 00 00 .♦.☺...☻.☺.☻.d.☻.d.☻.x.♦.☺...☻.. 00002460 00 78 05 00 73 71 72 74 00 00 01 00 0A 8C 00 11 00 0A 00 01 00 01 00 22 00 01 00 22 00 10 00 14 .x♣.sqrt..☺.◙î.◄.◙.☺.☺.".☺.".►.¶ 00002480 00 0C 00 02 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 08 00 FC 03 02 00 01 00 11 00 3C 00 20 .♀.☻.☺.☺.☺.☺.☺.☺.☺.◘.ⁿ♥☻.☺.◄.<. 000024A0 7A 23 73 71 72 74 20 61 3B 66 3B 6E 3B 72 65 6D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 z#sqrt a;f;n;rem 000024C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6D 75 6C 74 "mult 000024E0 69 70 72 65 63 69 73 69 6F 6E 20 69 6E 74 65 67 65 72 20 73 71 75 61 72 65 20 72 6F 6F 74 20 62 iprecision integer square root b 00002500 79 20 65 6C 65 6D 65 6E 74 61 72 79 20 72 65 63 75 72 73 69 6F 6E 20 22 67 65 74 20 61 6E 20 61 y elementary recursion "get an a 00002520 63 63 75 72 61 74 65 20 73 74 61 72 74 69 6E 67 20 76 61 6C 75 65 20 20 20 20 20 20 20 20 20 20 ccurate starting value 00002540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7A 23 28 6E 23 31 2B 44 30 2E 35 58 z#(n#1+D0.5X 00002560 52 61 29 59 63 61 6E 28 31 30 30 30 30 30 30 30 42 28 36 2B 32 7C 52 61 29 59 61 23 66 69 78 20 Ra)Ycan(10000000B(6+2|Ra)Ya#fix 00002580 61 29 2A 30 2E 35 20 20 20 20 20 20 20 20 20 22 64 72 6F 70 20 74 72 61 69 6C 69 6E 67 20 7A 65 a)*0.5 "drop trailing ze 000025A0 72 6F 73 20 66 72 6F 6D 20 61 20 61 6E 64 20 64 6F 75 62 6C 65 20 69 74 20 20 20 20 20 20 20 20 ros from a and double it 000025C0 20 20 20 20 20 20 20 20 20 20 20 20 24 30 58 49 30 3D 31 59 31 55 61 23 63 61 6E 20 32 58 28 28 $0XI0=1Y1Ua#can 2X(( 000025E0 52 61 29 2B 4C 69 6F 5F 28 60 4F 30 5E 3D 61 29 49 31 29 59 61 20 20 20 20 20 20 20 20 20 20 20 Ra)+Lio_(`O0^=a)I1)Ya 00002600 20 20 20 20 20 20 20 6C 6F 6F 70 3A 66 23 28 28 6E 2B 52 61 29 59 7A 20 6D 75 6C 20 7A 29 64 69 loop:f#((n+Ra)Yz mul z)di 00002620 76 20 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 v a 00002640 20 20 20 20 7A 23 6E 59 7A 20 6D 75 6C 20 66 23 28 28 31 2B 52 66 29 59 20 30 20 31 20 35 30 30 z#nYz mul f#((1+Rf)Y 0 1 500 00002660 30 30 30 30 29 73 75 62 20 66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0000)sub f 00002680 24 28 31 3C 2B 2F 6E 59 66 29 2F 6C 6F 6F 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $(1<+/nYf)/loop 000026A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 $0 000026C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000026E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 71 72 74 20 2D 20 6D "sqrt - m 00002700 75 6C 74 69 70 72 65 63 69 73 69 6F 6E 20 69 6E 74 65 67 65 72 20 73 71 75 61 72 65 20 72 6F 6F ultiprecision integer square roo 00002720 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 t "from 'the ap 00002740 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 l handbook of techniques' copyri 00002760 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 22 2D 61 20 6D 61 79 20 62 65 20 73 63 61 6C 61 72 ght 1978, ibm. "-a may be scalar 00002780 20 6F 72 20 6D 75 6C 74 69 70 72 65 63 69 73 69 6F 6E 20 62 75 74 20 77 69 6C 6C 20 62 65 20 74 or multiprecision but will be t 000027A0 72 75 6E 63 61 74 65 64 20 74 6F 22 20 61 6E 20 69 6E 74 65 67 65 72 2E 20 20 20 20 20 20 20 20 runcated to" an integer. 000027C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000027E0 20 20 20 20 20 20 20 22 2D 72 75 6E 6E 69 6E 67 20 74 69 6D 65 20 69 73 20 70 72 6F 70 6F 72 74 "-running time is proport 00002800 69 6F 6E 61 6C 20 74 6F 20 28 52 61 29 58 40 52 61 2C 20 61 6E 64 20 69 73 20 6D 75 63 68 20 20 ional to (Ra)X@Ra, and is much 00002820 20 20 20 22 20 66 61 73 74 65 72 20 66 6F 72 20 6E 75 6D 62 65 72 73 20 77 69 74 68 20 6D 61 6E " faster for numbers with man 00002840 79 20 74 72 61 69 6C 69 6E 67 20 7A 65 72 6F 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 y trailing zeros. " 00002860 2D 75 73 65 73 3A 20 47 66 69 78 20 47 73 75 62 20 47 6D 75 6C 20 47 64 69 76 20 47 63 61 6E 20 -uses: Gfix Gsub Gmul Gdiv Gcan 00002880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7E 00 FF FF 00 ~. . 000028A0 00 FC FF 0E 00 0C 00 56 51 01 00 01 00 0A 00 24 00 76 56 1B 00 0D 00 00 00 00 00 01 00 20 20 20 .ⁿ ♫.♀.VQ☺.☺.◙.$.vV←.♪.....☺. 000028C0 20 00 00 76 56 FC FF 0C 00 06 00 56 51 01 00 20 20 20 20 48 00 76 56 1B 00 0B 00 00 00 00 00 01 ..vVⁿ ♀.♠.VQ☺. H.vV←.♂.....☺ 000028E0 00 20 20 20 20 24 00 76 56 FC FF 0A 00 08 00 3F 51 01 00 20 6C 6A 75 6C 00 76 56 1B 00 09 00 00 . $.vVⁿ ◙.◘.?Q☺. ljul.vV←.○.. 00002900 00 00 00 01 00 20 20 20 20 48 00 76 56 FC FF 08 00 04 00 0F 51 01 00 20 20 20 20 90 00 76 56 FC ...☺. H.vVⁿ ◘.♦.☼Q☺. É.vVⁿ 00002920 FF 03 00 02 00 B1 50 01 00 20 24 30 20 A2 00 76 56 03 00 02 00 00 00 00 00 01 00 20 20 20 20 6C ♥.☻.▒P☺. $0 ó.vV♥.☻.....☺. l 00002940 00 76 56 FC FF 01 00 0C 00 B0 50 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 .vVⁿ ☺.♀.░P☺. ..☻.......☺. 00002960 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 68 74 20 6A EA 00 76 56 FD FF 30 00 0C 00 1E ..☻.......☺.ht jΩ.vV² 0.♀.▲ 00002980 52 01 00 61 79 20 20 FC 00 76 56 0A 00 2F 00 00 00 00 00 01 00 20 20 20 20 0E 01 76 56 09 00 2E R☺.ay ⁿ.vV◙./.....☺. ♫☺vV○.. 000029A0 00 00 00 00 00 01 00 27 74 68 65 20 01 76 56 FC FF 2D 00 0E 00 E7 51 01 00 6F 66 20 74 32 01 76 .....☺.'the ☺vVⁿ -.♫.τQ☺.of t2☺v 000029C0 56 FC FF 29 00 10 00 E2 51 01 00 79 72 69 67 44 01 76 56 03 00 28 00 00 00 00 00 01 00 22 2D 74 Vⁿ ).►.ΓQ☺.yrigD☺vV♥.(.....☺."-t 000029E0 6F 56 01 76 56 FC FF 27 00 0A 00 E0 51 01 00 63 61 6E 74 68 01 76 56 39 00 26 00 00 00 00 00 01 oV☺vVⁿ '.◙.αQ☺.canth☺vV9.&.....☺ 00002A00 00 20 6E 75 6D 7A 01 76 56 09 00 25 00 00 00 00 00 01 00 20 20 20 20 8C 01 76 56 FC FF 24 00 04 . numz☺vV○.%.....☺. î☺vVⁿ $.♦ 00002A20 00 E0 51 01 00 70 6F 73 69 9E 01 76 56 32 00 23 00 00 00 00 00 01 00 20 20 20 20 B0 01 76 56 83 .αQ☺.posi₧☺vV2.#.....☺. ░☺vVâ 00002A40 00 22 00 00 00 00 00 01 00 20 20 20 20 C2 01 76 56 FD FF 21 00 06 00 05 52 01 00 67 6E 69 66 D4 .".....☺. ┬☺vV² !.♠.♣R☺.gnif╘ 00002A60 01 76 56 0B 00 20 00 00 00 00 00 01 00 72 20 63 68 E6 01 76 56 FD FF 1F 00 0E 00 02 52 01 00 65 ☺vV♂. .....☺.r chµ☺vV² ▼.♫.☻R☺.e 00002A80 66 69 6E F8 01 76 56 08 00 1E 00 00 00 00 00 01 00 22 20 74 68 0A 02 76 56 22 00 1D 00 00 00 00 fin°☺vV◘.▲.....☺." th◙☻vV".↔.... 00002AA0 00 01 00 63 61 74 65 1C 02 76 56 FD FF 15 00 06 00 FB 51 01 00 20 20 20 20 2E 02 76 56 08 00 14 .☺.cate∟☻vV² §.♠.√Q☺. .☻vV◘.¶ 00002AC0 00 00 00 00 00 01 00 20 20 20 20 40 02 76 56 FC FF 11 00 0E 00 DF 51 01 00 69 66 69 63 52 02 76 .....☺. @☻vVⁿ ◄.♫.▀Q☺.ificR☻v 00002AE0 56 39 00 10 00 00 00 00 00 01 00 65 76 65 72 64 02 76 56 09 00 0F 00 00 00 00 00 01 00 73 74 69 V9.►.....☺.everd☻vV○.☼.....☺.sti 00002B00 66 76 02 76 56 FC FF 0E 00 02 00 B6 51 01 00 1A 03 FC FF 88 02 76 56 32 00 0D 00 00 00 00 00 01 fv☻vVⁿ ♫.☻.╢Q☺.→♥ⁿ ê☻vV2.♪.....☺ 00002B20 00 9D 56 FC FF 9A 02 76 56 38 00 0C 00 00 00 00 00 01 00 9D 56 FC FF AC 02 76 56 FD FF 09 00 02 .¥Vⁿ Ü☻vV8.♀.....☺.¥Vⁿ ¼☻vV² ○.☻ 00002B40 00 E6 51 01 00 9D 56 03 00 BE 02 76 56 24 00 08 00 00 00 00 00 01 00 9D 56 FC FF D0 02 76 56 0B .µQ☺.¥V♥.╛☻vV$.◘.....☺.¥Vⁿ ╨☻vV♂ 00002B60 00 07 00 00 00 00 00 01 00 9D 56 FD FF E2 02 76 56 FD FF 06 00 0A 00 C8 51 01 00 9D 56 05 00 F4 .•.....☺.¥V² Γ☻vV² ♠.◙.╚Q☺.¥V♣.⌠ 00002B80 02 76 56 03 00 05 00 00 00 00 00 01 00 9D 56 FC FF 06 03 76 56 FC FF 04 00 10 00 B1 51 01 00 9D ☻vV♥.♣.....☺.¥Vⁿ ♠♥vVⁿ ♦.►.▒Q☺.¥ 00002BA0 56 24 00 18 03 76 56 08 00 03 00 00 00 00 00 01 00 9D 56 29 00 2A 03 76 56 03 00 02 00 00 00 00 V$.↑♥vV◘.♥.....☺.¥V).*♥vV♥.☻.... 00002BC0 00 01 00 9D 56 3F 00 FF FF 00 00 FC FF 01 00 02 00 57 51 01 00 9D 56 ED FF FF FF 00 00 02 00 00 .☺.¥V?. ..ⁿ ☺.☻.WQ☺.¥Vφ ..☻.. 00002BE0 00 00 00 00 00 01 00 9D 56 3F 00 60 03 76 56 FC FF 29 00 0A 00 04 52 01 00 9D 56 33 00 72 03 76 .....☺.¥V?.`♥vVⁿ ).◙.♦R☺.¥V3.r♥v 00002C00 56 39 00 28 00 00 00 00 00 01 00 9D 56 FD FF 84 03 76 56 09 00 27 00 00 00 00 00 01 00 9D 56 3C V9.(.....☺.¥V² ä♥vV○.'.....☺.¥V< 00002C20 00 96 03 76 56 FD FF 26 00 02 00 6A 52 01 00 9D 56 38 00 A8 03 76 56 29 00 25 00 00 00 00 00 01 .û♥vV² &.☻.jR☺.¥V8.¿♥vV).%.....☺ 00002C40 00 9D 56 05 00 BA 03 76 56 09 00 24 00 00 00 00 00 01 00 9D 56 46 00 CC 03 76 56 FC FF 23 00 04 .¥V♣.║♥vV○.$.....☺.¥VF.╠♥vVⁿ #.♦ 00002C60 00 04 52 01 00 9D 56 22 00 DE 03 76 56 3E 00 21 00 00 00 00 00 01 00 9D 56 09 00 F0 03 76 56 FD .♦R☺.¥V".▐♥vV>.!.....☺.¥V○.≡♥vV² 00002C80 FF 20 00 02 00 60 52 01 00 9D 56 FD FF 02 04 76 56 46 00 1E 00 00 00 00 00 01 00 9D 56 05 00 14 .☻.`R☺.¥V² ☻♦vVF.▲.....☺.¥V♣.¶ 00002CA0 04 76 56 08 00 1D 00 00 00 00 00 01 00 9D 56 FC FF 26 04 76 56 3F 00 1C 00 00 00 00 00 01 00 9D ♦vV◘.↔.....☺.¥Vⁿ &♦vV?.∟.....☺.¥ 00002CC0 56 08 00 38 04 76 56 ED FF 19 00 00 00 00 00 01 00 9D 56 38 00 4A 04 76 56 0B 00 18 00 00 00 00 V◘.8♦vVφ ↓.....☺.¥V8.J♦vV♂.↑.... 00002CE0 00 01 00 9D 56 09 00 5C 04 76 56 09 00 17 00 00 00 00 00 01 00 9D 56 FD FF 6E 04 76 56 FC FF 16 .☺.¥V○.\♦vV○.↨.....☺.¥V² n♦vVⁿ ▬ 00002D00 00 0A 00 FF 51 01 00 9D 56 05 00 80 04 76 56 32 00 15 00 00 00 00 00 01 00 9D 56 FC FF 92 04 76 .◙. Q☺.¥V♣.Ç♦vV2.§.....☺.¥Vⁿ Æ♦v 00002D20 56 08 00 14 00 00 00 00 00 01 00 9D 56 3F 00 A4 04 76 56 08 00 13 00 00 00 00 00 01 00 9D 56 0A V◘.¶.....☺.¥V?.ñ♦vV◘.‼.....☺.¥V◙ 00002D40 00 B6 04 76 56 38 00 12 00 00 00 00 00 01 00 9D 56 08 00 C8 04 76 56 FD FF 11 00 02 00 45 52 01 .╢♦vV8.↕.....☺.¥V◘.╚♦vV² ◄.☻.ER☺ 00002D60 00 9D 56 03 00 DA 04 76 56 FC FF 0D 00 02 00 F3 51 01 00 00 00 FC FF EC 04 76 56 03 00 0C 00 00 .¥V♥.┌♦vVⁿ ♪.☻.≤Q☺...ⁿ ∞♦vV♥.♀.. 00002D80 00 00 00 01 00 9D 56 FD FF FE 04 76 56 FC FF 0B 00 0C 00 F2 51 01 00 00 00 04 00 10 05 76 56 35 ...☺.¥V² ■♦vVⁿ ♂.♀.≥Q☺...♦.►♣vV5 00002DA0 00 0A 00 00 00 00 00 01 00 00 00 02 00 22 05 76 56 FD FF 09 00 04 00 3B 52 01 00 00 00 02 00 34 .◙.....☺...☻."♣vV² ○.♦.;R☺...☻.4 00002DC0 05 76 56 39 00 08 00 00 00 00 00 01 00 00 00 02 00 46 05 76 56 FD FF 07 00 08 00 3D 52 01 00 00 ♣vV9.◘.....☺...☻.F♣vV² •.◘.=R☺.. 00002DE0 00 02 00 58 05 76 56 1D 00 06 00 00 00 00 00 01 00 00 00 02 00 6A 05 76 56 FD FF 05 00 08 00 2E .☻.X♣vV↔.♠.....☺...☻.j♣vV² ♣.◘.. 00002E00 52 01 00 00 00 02 00 7C 05 76 56 29 00 04 00 00 00 00 00 01 00 00 00 02 00 8E 05 76 56 38 00 03 R☺...☻.|♣vV).♦.....☺...☻.Ä♣vV8.♥ 00002E20 00 00 00 00 00 01 00 99 57 68 0C A0 05 76 56 FD FF 02 00 0E 00 2F 52 01 00 47 48 20 20 FF FF 00 .....☺.ÖWh♀á♣vV² ☻.♫./R☺.GH . 00002E40 00 04 00 01 00 00 00 00 00 01 00 20 20 20 20 C4 05 76 56 FC FF 1B 00 0A 00 54 52 01 00 00 20 06 .♦.☺.....☺. ─♣vVⁿ ←.◙.TR☺.. ♠ 00002E60 00 D6 05 76 56 FC FF 17 00 10 00 3C 52 01 00 61 72 61 63 E8 05 76 56 09 00 16 00 00 00 00 00 01 .╓♣vVⁿ ↨.►.<R☺.aracΦ♣vV○.▬.....☺ 00002E80 00 69 6C 6C 20 FA 05 76 56 FC FF 15 00 0A 00 3C 52 01 00 20 62 6C 61 0C 06 76 56 FC FF 11 00 0E .ill ·♣vVⁿ §.◙.<R☺. bla♀♠vVⁿ ◄.♫ 00002EA0 00 32 52 01 00 20 20 22 2D 1E 06 76 56 FC FF 0F 00 08 00 32 52 01 00 79 20 68 61 30 06 76 56 39 .2R☺. "-▲♠vVⁿ ☼.◘.2R☺.y ha0♠vV9 00002EC0 00 0E 00 00 00 00 00 01 00 72 65 2E 20 42 06 76 56 09 00 0D 00 00 00 00 00 01 00 20 20 20 20 54 .♫.....☺.re. B♠vV○.♪.....☺. T 00002EE0 06 76 56 FC FF 0C 00 02 00 25 52 01 00 74 65 72 6F 66 06 76 56 32 00 0B 00 00 00 00 00 01 00 69 ♠vVⁿ ♀.☻.%R☺.terof♠vV2.♂.....☺.i 00002F00 66 69 63 78 06 76 56 0B 00 0A 00 00 00 00 00 01 00 65 73 69 72 8A 06 76 56 FC FF 09 00 08 00 20 ficx♠vV♂.◙.....☺.esirè♠vVⁿ ○.◘. 00002F20 52 01 00 65 73 3A 20 9C 06 76 56 08 00 08 00 00 00 00 00 01 00 69 78 20 20 AE 06 76 56 08 00 07 R☺.es: £♠vV◘.◘.....☺.ix «♠vV◘.• 00002F40 00 00 00 00 00 01 00 20 20 20 20 C0 06 76 56 03 00 06 00 00 00 00 00 01 00 20 20 00 20 D2 06 76 .....☺. └♠vV♥.♠.....☺. . ╥♠v 00002F60 56 FC FF 05 00 10 00 04 52 01 00 E2 56 01 00 E4 06 76 56 1A 00 04 00 00 00 00 00 01 00 4C 69 6F Vⁿ ♣.►.♦R☺.ΓV☺.Σ♠vV→.♦.....☺.Lio 00002F80 20 FF FF 00 00 FC FF 06 00 0A 00 24 52 01 00 20 20 20 20 08 07 76 56 FC FF 26 00 08 00 85 52 01 ..ⁿ ♠.◙.$R☺. ◘•vVⁿ &.◘.àR☺ 00002FA0 00 20 20 20 20 1A 07 76 56 FC FF 22 00 02 00 85 52 01 00 72 6D 61 74 2C 07 76 56 09 00 21 00 00 . →•vVⁿ ".☻.àR☺.rmat,•vV○.!.. 00002FC0 00 00 00 01 00 20 20 20 20 3E 07 76 56 FD FF 16 00 08 00 CB 52 01 00 20 20 20 20 50 07 76 56 39 ...☺. >•vV² ▬.◘.╦R☺. P•vV9 00002FE0 00 14 00 00 00 00 00 01 00 20 20 20 7A 62 07 76 56 09 00 13 00 00 00 00 00 01 00 20 61 29 53 74 .¶.....☺. zb•vV○.‼.....☺. a)St 00003000 07 76 56 FC FF 12 00 0C 00 84 52 01 00 20 20 20 20 86 07 76 56 32 00 11 00 00 00 00 00 01 00 20 •vVⁿ ↕.♀.äR☺. å•vV2.◄.....☺. 00003020 20 20 20 98 07 76 56 0B 00 10 00 00 00 00 00 01 00 29 2C 7A 29 AA 07 76 56 FD FF 0F 00 0A 00 9F ÿ•vV♂.►.....☺.),z)¬•vV² ☼.◙.ƒ 00003040 52 01 00 59 52 62 29 BC 07 76 56 08 00 0E 00 00 00 00 00 01 00 20 20 20 20 CE 07 76 56 08 00 0D R☺.YRb)╝•vV◘.♫.....☺. ╬•vV◘.♪ 00003060 00 00 00 00 00 01 00 63 61 73 65 E0 07 76 56 03 00 0C 00 00 00 00 00 01 00 6D 70 74 79 F2 07 76 .....☺.caseα•vV♥.♀.....☺.mpty≥•v 00003080 56 FC FF 0B 00 08 00 68 52 01 00 20 20 20 20 04 08 76 56 FC FF 07 00 02 00 68 52 01 00 20 20 20 Vⁿ ♂.◘.hR☺. ♦◘vVⁿ •.☻.hR☺. 000030A0 24 16 08 76 56 FC FF 05 00 0C 00 67 52 01 00 20 20 20 20 28 08 76 56 39 00 04 00 00 00 00 00 01 $▬◘vVⁿ ♣.♀.gR☺. (◘vV9.♦.....☺ 000030C0 00 20 20 20 20 3A 08 76 56 FC FF 03 00 04 00 59 52 01 00 20 20 20 20 4C 08 76 56 03 00 02 00 00 . :◘vVⁿ ♥.♦.YR☺. L◘vV♥.☻.. 000030E0 00 00 00 01 00 6F 72 6D 20 FF FF 00 00 FC FF 01 00 10 00 54 52 01 00 6E 79 20 73 70 08 76 56 FC ...☺.orm ..ⁿ ☺.►.TR☺.ny sp◘vVⁿ 00003100 FF 0C 00 0E 00 9D 52 01 00 20 20 20 20 82 08 76 56 0F 00 0B 00 00 00 00 00 01 00 6D 20 27 74 94 ♀.♫.¥R☺. é◘vV☼.♂.....☺.m 'tö 00003120 08 76 56 09 00 0A 00 00 00 00 00 01 00 6B 20 6F 66 A6 08 76 56 FC FF 09 00 08 00 99 52 01 00 6F ◘vV○.◙.....☺.k ofª◘vVⁿ ○.◘.ÖR☺.o 00003140 70 79 72 B8 08 76 56 39 00 08 00 00 00 00 00 01 00 2E 20 22 2D CA 08 76 56 FC FF 07 00 02 00 99 pyr╕◘vV9.◘.....☺.. "-╩◘vVⁿ •.☻.Ö 00003160 52 01 00 72 73 20 6D DC 08 76 56 0F 00 06 00 00 00 00 00 01 00 20 6C 69 73 EE 08 76 56 0B 00 05 R☺.rs m▄◘vV☼.♠.....☺. lisε◘vV♂.♣ 00003180 00 00 00 00 00 01 00 65 20 6F 72 00 09 76 56 1C 00 04 00 00 00 00 00 01 00 72 2C 20 61 12 09 76 .....☺.e or.○vV∟.♦.....☺.r, a↕○v 000031A0 56 FD FF 03 00 04 00 D3 52 01 00 20 74 68 65 24 09 76 56 08 00 02 00 00 00 00 00 01 00 61 74 72 V² ♥.♦.╙R☺. the$○vV◘.☻.....☺.atr 000031C0 69 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 6D 65 72 69 48 09 76 56 FD FF 02 00 0A 00 E9 52 01 i ..♦.☺.....☺.meriH○vV² ☻.◙.ΘR☺ 000031E0 00 6C 20 62 65 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 65 72 6F 73 FF FF 00 00 02 00 00 00 00 .l be ..♦.☺.....☺.eros ..☻.... 00003200 00 00 00 01 00 20 20 22 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 2E 20 20 20 FF FF 00 00 02 ...☺. " ..☻.......☺.. ..☻ 00003220 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF .......☺. ..☻.......☺. 00003240 FF 00 00 02 00 00 00 00 00 00 00 01 00 72 20 6D 61 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 ..☻.......☺.r ma ..☻.......☺. 00003260 70 61 64 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 73 2E 20 20 00 00 B4 00 C6 00 D8 00 3C 03 4E pad ..☻.......☺.s. ..┤.╞.╪.<♥N 00003280 03 B2 05 F6 06 5E 08 36 09 5A 09 6C 09 7E 09 90 09 A2 09 B4 09 C6 09 A2 00 E4 06 04 00 72 65 6D ♥▓♣÷♠^◘6○Z○l○~○É○ó○┤○╞○ó.Σ♠♦.rem 000032A0 00 02 00 6E 00 02 00 66 00 02 00 61 00 05 00 73 71 72 74 00 02 00 7A 00 02 00 01 00 00 00 08 00 .☻.n.☻.f.☻.a.♣.sqrt.☻.z.☻.☺...◘. 000032C0 00 00 00 00 00 00 E0 3F 02 00 61 00 04 00 66 69 78 00 02 00 61 00 02 00 61 00 04 00 01 00 00 00 ......α?☻.a.♦.fix.☻.a.☻.a.♦.☺... 000032E0 02 00 02 00 04 00 01 00 00 00 02 00 06 00 02 00 01 00 00 00 08 00 00 00 00 00 D0 12 63 41 04 00 ☻.☻.♦.☺...☻.♠.☻.☺...◘.....╨↕cA♦. 00003300 63 61 6E 00 02 00 61 00 02 00 01 00 00 00 08 00 00 00 00 00 00 00 E0 3F 04 00 01 00 00 00 02 00 can.☻.a.☻.☺...◘.......α?♦.☺...☻. 00003320 01 00 02 00 6E 00 02 00 7A 00 02 00 61 00 04 00 01 00 00 00 02 00 01 00 02 00 61 00 04 00 01 00 ☺.☻.n.☻.z.☻.a.♦.☺...☻.☺.☻.a.♦.☺. 00003340 00 00 02 00 00 00 02 00 61 00 04 00 01 00 00 00 02 00 02 00 04 00 63 61 6E 00 02 00 61 00 04 00 ..☻...☻.a.♦.☺...☻.☻.♦.can.☻.a.♦. 00003360 01 00 00 00 02 00 01 00 04 00 01 00 00 00 02 00 01 00 04 00 01 00 00 00 02 00 00 00 04 00 01 00 ☺...☻.☺.♦.☺...☻.☺.♦.☺...☻...♦.☺. 00003380 00 00 02 00 00 00 02 00 61 00 04 00 64 69 76 00 02 00 7A 00 04 00 6D 75 6C 00 02 00 7A 00 02 00 ..☻...☻.a.♦.div.☻.z.♦.mul.☻.z.☻. 000033A0 61 00 02 00 6E 00 02 00 66 00 05 00 6C 6F 6F 70 00 02 00 66 00 04 00 73 75 62 00 02 00 03 00 01 a.☻.n.☻.f.♣.loop.☻.f.♦.sub.☻.♥.☺ 000033C0 00 08 00 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 F0 3F 00 00 00 00 D0 12 53 41 02 00 66 .◘.♥...............≡?....╨↕SA☻.f 000033E0 00 04 00 01 00 00 00 02 00 01 00 02 00 66 00 04 00 6D 75 6C 00 02 00 7A 00 02 00 6E 00 02 00 7A .♦.☺...☻.☺.☻.f.♦.mul.☻.z.☻.n.☻.z 00003400 00 05 00 6C 6F 6F 70 00 02 00 66 00 02 00 6E 00 04 00 01 00 00 00 02 00 01 00 04 00 01 00 00 00 .♣.loop.☻.f.☻.n.♦.☺...☻.☺.♦.☺... 00003420 02 00 00 00 78 05 00 74 61 62 63 00 00 01 00 09 1D 00 07 00 03 00 09 00 08 00 03 00 02 00 01 00 ☻...x♣.tabc..☺.○↔.•.♥.○.◘.♥.☻.☺. 00003440 01 00 08 00 AB 01 02 00 01 00 07 00 3D 00 20 7A 23 74 61 62 63 20 20 20 20 20 20 20 20 20 20 20 ☺.◘.½☺☻.☺.•.=. z#tabc 00003460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00003480 20 20 20 20 20 20 20 20 20 20 20 20 24 28 30 5E 3D 4C 6E 63 27 60 74 60 62 27 29 2F 61 31 20 20 $(0^=Lnc'`t`b')/a1 000034A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000034C0 20 20 20 20 20 20 20 20 20 60 74 60 62 23 4C 61 76 5B 4C 69 6F 2B 39 5D 20 20 20 20 20 20 20 20 `t`b#Lav[Lio+9] 000034E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00003500 20 20 20 20 20 61 31 3A 7A 23 60 74 60 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 a1:z#`t`b 00003520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00003540 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00003560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 " 00003580 74 61 62 63 20 2D 20 73 65 74 20 60 74 60 62 20 74 6F 20 74 61 62 20 63 68 61 72 61 63 74 65 72 tabc - set `t`b to tab character 000035A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F "fro 000035C0 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 m 'the apl handbook of technique 000035E0 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 20 00 00 12 00 D0 57 FC s' copyright 1978, ibm. ..↕.╨Wⁿ 00003600 FF 03 00 06 00 5E 52 01 00 2E 20 20 20 24 00 D0 57 03 00 02 00 00 00 00 00 01 00 20 20 20 20 FF ♥.♠.^R☺.. $.╨W♥.☻.....☺. 00003620 FF 00 00 FC FF 01 00 10 00 5D 52 01 00 22 66 72 6F FF FF 00 00 FC FF 11 00 10 00 8B 52 01 00 00 ..ⁿ ☺.►.]R☺."fro ..ⁿ ◄.►.ïR☺.. 00003640 00 00 00 FF FF 00 00 0F 00 10 00 00 00 00 00 01 00 00 00 00 00 6C 00 D0 57 09 00 0F 00 00 00 00 ... ..☼.►.....☺.....l.╨W○.☼.... 00003660 00 01 00 00 00 00 00 FF FF 00 00 07 00 09 00 0A 00 E0 52 01 00 00 00 00 00 FF FF 00 00 EA FF 06 .☺..... ..•.○.◙.αR☺..... ..Ω ♠ 00003680 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 3E 00 04 00 00 00 00 00 01 00 00 00 00 00 B4 00 D0 .....☺..... ..>.♦.....☺.....┤.╨ 000036A0 57 FD FF 03 00 0A 00 D4 52 01 00 00 00 00 00 FF FF 00 00 08 00 02 00 00 00 00 00 01 00 00 00 00 W² ♥.◙.╘R☺..... ..◘.☻.....☺.... 000036C0 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 20 20 20 20 EA 00 D0 57 3D 00 0F 00 00 00 00 00 01 . ..♦.☺.....☺. Ω.╨W=.☼.....☺ 000036E0 00 22 2D 70 61 FF FF 00 00 FD FF 0E 00 08 00 FB 52 01 00 00 00 00 00 FF FF 00 00 0B 00 0D 00 00 ."-pa ..² ♫.◘.√R☺..... ..♂.♪.. 00003700 00 00 00 01 00 00 00 00 00 20 01 D0 57 ED FF 0A 00 00 00 00 00 01 00 00 00 00 00 32 01 D0 57 3B ...☺..... ☺╨Wφ ◙.....☺.....2☺╨W; 00003720 00 09 00 00 00 00 00 01 00 70 65 73 20 44 01 D0 57 F4 FF 06 00 00 00 00 00 01 00 00 00 00 00 FF .○.....☺.pes D☺╨W⌠ ♠.....☺..... 00003740 FF 00 00 03 00 05 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 01 00 04 00 92 52 01 00 00 ..♥.♣.....☺..... ..ⁿ ☺.♦.ÆR☺.. 00003760 00 00 00 FF FF 00 00 FC FF 05 00 0C 00 9C 52 01 00 00 00 00 00 FF FF 00 00 03 00 04 00 00 00 00 ... ..ⁿ ♣.♀.£R☺..... ..♥.♦.... 00003780 00 01 00 00 00 00 00 FF FF 00 00 FC FF 03 00 06 00 98 52 01 00 00 00 00 00 B0 01 D0 57 1A 00 02 .☺..... ..ⁿ ♥.♠.ÿR☺.....░☺╨W→.☻ 000037A0 00 00 00 00 00 01 00 72 6E 65 64 FF FF 00 00 FC FF 03 00 10 00 97 52 01 00 20 20 20 20 FF FF 00 .....☺.rned ..ⁿ ♥.►.ùR☺. . 000037C0 00 FD FF 02 00 0A 00 0A 53 01 00 00 00 00 00 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 6D 61 74 .² ☻.◙.◙S☺..... ..♦.☺.....☺.mat 000037E0 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 72 6D 20 47 FF FF 00 00 02 00 00 00 00 00 00 00 01 ..☻.......☺.rm G ..☻.......☺ 00003800 00 20 20 20 20 00 00 36 00 D8 00 68 01 C2 01 E6 01 F8 01 24 00 B0 01 05 00 74 61 62 63 00 02 00 . ..6.╪.h☺┬☺µ☺°☺$.░☺♣.tabc.☻. 00003820 7A 00 03 00 61 31 00 08 00 04 00 01 00 01 00 04 00 60 74 60 62 04 00 01 00 00 00 02 00 00 00 04 z.♥.a1.◘.♦.☺.☺.♦.`t`b♦.☺...☻...♦ 00003840 00 01 00 00 00 02 00 09 00 05 00 60 74 60 62 00 05 00 60 74 60 62 00 02 00 7A 00 03 00 61 31 00 .☺...☻.○.♣.`t`b.♣.`t`b.☻.z.♥.a1. 00003860 04 00 01 00 00 00 02 00 00 00 78 05 00 74 68 72 75 00 00 01 00 0C 38 00 0A 00 09 00 26 00 02 00 ♦.☺...☻...x♣.thru..☺.♀8.◙.○.&.☻. 00003880 01 00 01 00 01 00 01 00 01 00 01 00 01 00 08 00 58 02 02 00 01 00 0A 00 3C 00 20 72 23 66 20 74 ☺.☺.☺.☺.☺.☺.☺.◘.X☻☻.☺.◙.<. r#f t 000038A0 68 72 75 20 74 62 3B 4C 69 6F 3B 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 hru tb;Lio;b 000038C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 23 66 2B 28 58 72 29 58 r#f+(Xr)X 000038E0 62 58 49 31 2B 44 7C 72 23 28 74 62 5B 30 5D 5F 66 29 25 62 23 7C 74 62 5B 31 5D 2B 4C 69 6F 23 bXI1+D|r#(tb[0]_f)%b#|tb[1]+Lio# 00003900 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 0 $0 00003920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00003940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 67 65 6E 65 72 61 74 65 73 20 65 71 75 61 6C 20 69 "generates equal i 00003960 6E 74 65 72 76 61 6C 73 20 62 65 74 77 65 65 6E 20 6C 69 6D 69 74 73 20 66 28 73 63 61 6C 61 72 ntervals between limits f(scalar 00003980 29 20 61 6E 64 20 31 59 74 62 22 31 55 74 62 23 24 74 68 65 20 64 65 73 69 72 65 64 20 69 6E 74 ) and 1Ytb"1Utb#$the desired int 000039A0 65 72 76 61 6C 2C 65 2E 67 2E 2C 31 2C 4F 31 2C 30 2E 31 32 35 2C 33 36 30 2C 65 74 63 2E 20 20 erval,e.g.,1,O1,0.125,360,etc. 000039C0 20 20 20 20 20 20 22 74 68 72 75 20 2D 20 67 65 6E 65 72 61 74 65 20 69 6E 64 69 63 65 73 20 6F "thru - generate indices o 000039E0 72 20 6F 74 68 65 72 20 65 71 75 61 6C 20 69 6E 63 72 65 6D 65 6E 74 73 20 62 65 74 77 65 65 6E r other equal increments between 00003A00 20 20 22 6C 69 6D 69 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 "limits 00003A20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 "f 00003A40 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 rom 'the apl handbook of techniq 00003A60 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 22 2D 74 6F 20 70 ues' copyright 1978, ibm. "-to p 00003A80 72 6F 64 75 63 65 20 6E 75 6D 65 72 69 63 20 76 65 63 74 6F 72 73 20 77 69 74 68 20 69 6E 74 65 roduce numeric vectors with inte 00003AA0 67 72 61 6C 20 6F 72 20 66 72 61 63 74 69 6F 6E 61 6C 20 20 20 20 22 20 69 6E 63 72 65 6D 65 6E gral or fractional " incremen 00003AC0 74 73 20 6F 72 20 64 65 63 72 65 6D 65 6E 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ts or decrements 00003AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5A 00 FF FF 00 00 FC FF 11 00 04 00 9D 52 Z. ..ⁿ ◄.♦.¥R 00003B00 01 00 01 00 0F 00 24 00 B2 58 1B 00 10 00 00 00 00 00 01 00 20 20 20 20 00 00 B2 58 ED FF 0D 00 ☺.☺.☼.$.▓X←.►.....☺. ..▓Xφ ♪. 00003B20 00 00 00 00 01 00 20 20 20 20 48 00 B2 58 1B 00 0C 00 00 00 00 00 01 00 20 20 20 20 24 00 B2 58 ....☺. H.▓X←.♀.....☺. $.▓X 00003B40 FC FF 0A 00 0C 00 98 52 01 00 61 74 65 6E 6C 00 B2 58 FC FF 05 00 02 00 7E 52 01 00 65 70 6C 69 ⁿ ◙.♀.ÿR☺.atenl.▓Xⁿ ♣.☻.~R☺.epli 00003B60 48 00 B2 58 FC FF 03 00 02 00 6D 52 01 00 20 20 20 20 90 00 B2 58 03 00 02 00 00 00 00 00 01 00 H.▓Xⁿ ♥.☻.mR☺. É.▓X♥.☻.....☺. 00003B80 20 63 66 6F 6C 00 B2 58 FC FF 01 00 0C 00 6C 52 01 00 20 20 20 20 B4 00 B2 58 FD FF 2A 00 04 00 cfol.▓Xⁿ ☺.♀.lR☺. ┤.▓X² *.♦. 00003BA0 C9 55 01 00 20 20 20 20 C6 00 B2 58 03 00 29 00 00 00 00 00 01 00 20 20 20 20 D8 00 B2 58 ED FF ╔U☺. ╞.▓X♥.).....☺. ╪.▓Xφ 00003BC0 26 00 00 00 00 00 01 00 20 20 20 20 EA 00 B2 58 0B 00 25 00 00 00 00 00 01 00 20 20 20 20 FC 00 &.....☺. Ω.▓X♂.%.....☺. ⁿ. 00003BE0 B2 58 3D 00 24 00 00 00 00 00 01 00 20 20 20 20 0E 01 B2 58 FD FF 23 00 02 00 52 53 01 00 72 6D ▓X=.$.....☺. ♫☺▓X² #.☻.RS☺.rm 00003C00 20 20 20 01 B2 58 3B 00 22 00 00 00 00 00 01 00 20 20 20 20 32 01 B2 58 FC FF 20 00 08 00 E3 52 ☺▓X;.".....☺. 2☺▓Xⁿ .◘.πR 00003C20 01 00 20 20 20 20 44 01 B2 58 83 00 1F 00 00 00 00 00 01 00 20 43 27 72 56 01 B2 58 03 00 1E 00 ☺. D☺▓Xâ.▼.....☺. C'rV☺▓X♥.▲. 00003C40 00 00 00 00 01 00 3D 28 52 52 68 01 B2 58 FC FF 1D 00 10 00 D5 52 01 00 27 29 2C 27 7A 01 B2 58 ....☺.=(RRh☺▓Xⁿ ↔.►.╒R☺.'),'z☺▓X 00003C60 05 00 1C 00 00 00 00 00 01 00 20 20 20 20 8C 01 B2 58 09 00 1B 00 00 00 00 00 01 00 20 20 20 20 ♣.∟.....☺. î☺▓X○.←.....☺. 00003C80 9E 01 B2 58 FC FF 1A 00 0E 00 D2 52 01 00 20 20 20 20 B0 01 B2 58 3F 00 19 00 00 00 00 00 01 00 ₧☺▓Xⁿ →.♫.╥R☺. ░☺▓X?.↓.....☺. 00003CA0 20 20 20 20 C2 01 B2 58 3D 00 18 00 00 00 00 00 01 00 2D 20 63 61 D4 01 B2 58 FD FF 17 00 08 00 ┬☺▓X=.↑.....☺.- ca╘☺▓X² ↨.◘. 00003CC0 42 53 01 00 2E 20 20 20 E6 01 B2 58 3B 00 16 00 00 00 00 00 01 00 20 20 20 20 F8 01 B2 58 FC FF BS☺.. µ☺▓X;.▬.....☺. °☺▓Xⁿ 00003CE0 14 00 08 00 D2 52 01 00 22 66 72 6F 0A 02 B2 58 08 00 13 00 00 00 00 00 01 00 64 62 6F 6F 1C 02 ¶.◘.╥R☺."fro◙☻▓X◘.‼.....☺.dboo∟☻ 00003D00 B2 58 03 00 12 00 00 00 00 00 01 00 73 27 20 63 2E 02 B2 58 FC FF 11 00 02 00 D2 52 01 00 20 69 ▓X♥.↕.....☺.s' c.☻▓Xⁿ ◄.☻.╥R☺. i 00003D20 62 6D 40 02 B2 58 83 00 10 00 00 00 00 00 01 00 20 63 61 74 52 02 B2 58 24 00 0F 00 00 00 00 00 bm@☻▓Xâ.►.....☺. catR☻▓X$.☼..... 00003D40 01 00 65 72 61 6C 64 02 B2 58 0B 00 0E 00 00 00 00 00 01 00 64 20 74 79 76 02 B2 58 FD FF 0D 00 ☺.erald☻▓X♂.♫.....☺.d tyv☻▓X² ♪. 00003D60 02 00 18 53 01 00 61 72 73 20 88 02 B2 58 29 00 0C 00 00 00 00 00 01 00 61 74 65 64 9A 02 B2 58 ☻.↑S☺.ars ê☻▓X).♀.....☺.atedÜ☻▓X 00003D80 38 00 0B 00 00 00 00 00 01 00 20 20 20 20 AC 02 B2 58 FC FF 0A 00 0E 00 CA 52 01 00 22 2D 70 61 8.♂.....☺. ¼☻▓Xⁿ ◙.♫.╩R☺."-pa 00003DA0 BE 02 B2 58 38 00 09 00 00 00 00 00 01 00 62 6C 61 6E D0 02 B2 58 09 00 08 00 00 00 00 00 01 00 ╛☻▓X8.○.....☺.blan╨☻▓X○.◘.....☺. 00003DC0 72 73 2C 20 E2 02 B2 58 FC FF 07 00 08 00 CA 52 01 00 72 73 2E 20 F4 02 B2 58 38 00 06 00 00 00 rs, Γ☻▓Xⁿ •.◘.╩R☺.rs. ⌠☻▓X8.♠... 00003DE0 00 00 01 00 70 65 73 20 06 03 B2 58 08 00 05 00 00 00 00 00 01 00 01 00 01 00 18 03 B2 58 0B 00 ..☺.pes ♠♥▓X◘.♣.....☺.☺.☺.↑♥▓X♂. 00003E00 04 00 00 00 00 00 01 00 01 00 3B 4C 2A 03 B2 58 FC FF 03 00 04 00 A4 52 01 00 01 00 20 20 3C 03 ♦.....☺.☺.;L*♥▓Xⁿ ♥.♦.ñR☺.☺. <♥ 00003E20 B2 58 03 00 02 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 FC FF 01 00 0E 00 A3 52 01 00 01 00 ▓X♥.☻.....☺.☺. ..ⁿ ☺.♫.úR☺.☺. 00003E40 20 20 60 03 B2 58 FD FF 02 00 0C 00 CF 55 01 00 01 00 20 20 FF FF 00 00 04 00 01 00 00 00 00 00 `♥▓X² ☻.♀.╧U☺.☺. ..♦.☺..... 00003E60 01 00 01 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 69 FF FF 00 00 02 00 00 00 ☺.☺. ..☻.......☺.☺. i ..☻... 00003E80 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 ....☺.☺. ..☻.......☺.☺. .. 00003EA0 02 00 00 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 31 ☻.......☺.☺. ..☻.......☺.☺. 1 00003EC0 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 ..☻.......☺.☺. ..☻.......☺. 00003EE0 01 00 20 20 00 00 A2 00 4E 03 72 03 84 03 96 03 A8 03 BA 03 CC 03 DE 03 90 00 FF FF 02 00 62 00 ☺. ..ó.N♥r♥ä♥û♥¿♥║♥╠♥▐♥É. ☻.b. 00003F00 03 00 74 62 00 05 00 74 68 72 75 00 02 00 66 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 04 00 ♥.tb.♣.thru.☻.f.☻.r.♦.☺...☻...♦. 00003F20 01 00 00 00 02 00 01 00 03 00 74 62 00 02 00 62 00 02 00 66 00 04 00 01 00 00 00 02 00 00 00 03 ☺...☻.☺.♥.tb.☻.b.☻.f.♦.☺...☻...♥ 00003F40 00 74 62 00 02 00 72 00 04 00 01 00 00 00 02 00 01 00 02 00 62 00 02 00 72 00 02 00 66 00 02 00 .tb.☻.r.♦.☺...☻.☺.☻.b.☻.r.☻.f.☻. 00003F60 72 00 04 00 01 00 00 00 02 00 00 00 78 09 00 74 61 62 75 6C 61 74 65 00 00 01 00 0A 20 00 0C 00 r.♦.☺...☻...x○.tabulate..☺.◙ .♀. 00003F80 04 00 04 00 0E 00 02 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 08 00 D0 02 02 00 01 00 ♦.♦.♫.☻.☺.☺.☺.☺.☺.☺.☺.☺.◘.╨☻☻.☺. 00003FA0 0C 00 3C 00 20 7A 23 74 61 62 75 6C 61 74 65 20 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ♀.<. z#tabulate a 00003FC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00003FE0 20 27 61 20 69 73 20 6E 6F 74 20 6E 75 6D 65 72 69 63 27 68 61 6E 67 20 63 68 61 72 61 63 74 65 'a is not numeric'hang characte 00004000 72 20 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7A 23 28 r a z#( 00004020 32 58 7E 69 6E 74 65 67 65 72 20 61 29 46 54 6D 61 74 72 69 78 54 61 20 20 20 20 20 20 20 20 20 2X~integer a)FTmatrixTa 00004040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 $0 00004060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 61 62 75 6C 61 74 65 20 2D 20 "tabulate - 000040A0 6E 75 6D 65 72 69 63 20 73 74 72 75 63 74 75 72 65 73 20 69 6E 20 63 6F 6E 74 72 6F 6C 6C 65 64 numeric structures in controlled 000040C0 20 66 6F 72 6D 61 74 2E 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 format. "from 'the apl h 000040E0 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 andbook of techniques' copyright 00004100 20 31 39 37 38 2C 20 69 62 6D 2E 20 22 2D 61 20 6D 75 73 74 20 62 65 20 61 20 6E 75 6D 65 72 69 1978, ibm. "-a must be a numeri 00004120 63 20 73 74 72 75 63 74 75 72 65 2E 20 74 61 62 75 6C 61 74 65 20 77 69 6C 6C 20 64 69 61 67 6E c structure. tabulate will diagn 00004140 6F 73 65 20 20 20 20 20 22 20 74 68 65 20 64 6F 6D 61 69 6E 20 65 72 72 6F 72 20 69 66 20 69 74 ose " the domain error if it 00004160 20 69 73 20 6E 6F 74 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 is not. 00004180 20 20 20 20 22 2D 72 65 74 75 72 6E 73 20 66 6F 72 6D 61 74 74 65 64 20 6E 75 6D 65 72 69 63 20 "-returns formatted numeric 000041A0 6D 61 74 72 69 63 65 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 matrices. 000041C0 22 2D 61 6E 79 20 66 72 61 63 74 69 6F 6E 73 20 70 72 65 73 65 6E 74 20 77 69 6C 6C 20 66 6F 72 "-any fractions present will for 000041E0 63 65 20 74 77 6F 20 64 65 63 69 6D 61 6C 20 70 6C 61 63 65 73 2E 20 20 20 20 20 20 22 2D 76 65 ce two decimal places. "-ve 00004200 63 74 6F 72 73 20 77 69 6C 6C 20 62 65 63 6F 6D 65 20 6F 6E 65 2D 63 6F 6C 75 6D 6E 20 6D 61 74 ctors will become one-column mat 00004220 72 69 63 65 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2D 75 73 65 73 3A 20 rices. "-uses: 00004240 47 69 6E 74 65 67 65 72 20 47 6D 61 74 72 69 78 20 47 63 68 61 72 61 63 74 65 72 20 47 68 61 6E Ginteger Gmatrix Gcharacter Ghan 00004260 67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 00 FF FF 00 00 FC FF 0C 00 04 00 g ↕. ..ⁿ ♀.♦. 00004280 47 51 01 00 01 00 0B 00 24 00 64 55 FC FF 03 00 02 00 D7 51 01 00 61 20 20 20 36 00 64 55 03 00 GQ☺.☺.♂.$.dUⁿ ♥.☻.╫Q☺.a 6.dU♥. 000042A0 02 00 00 00 00 00 01 00 20 20 20 20 00 00 64 55 FC FF 01 00 0E 00 46 51 01 00 20 20 20 20 5A 00 ☻.....☺. ..dUⁿ ☺.♫.FQ☺. Z. 000042C0 64 55 FC FF 22 00 08 00 DF 51 01 00 20 6E 6F 74 6C 00 64 55 FC FF 18 00 0C 00 DE 51 01 00 63 68 dUⁿ ".◘.▀Q☺. notl.dUⁿ ↑.♀.▐Q☺.ch 000042E0 61 72 7E 00 64 55 FC FF 13 00 0E 00 D7 51 01 00 20 20 20 20 FF FF 00 00 07 00 01 00 02 00 FD 51 ar~.dUⁿ ‼.♫.╫Q☺. ..•.☺.☻.²Q 00004300 01 00 20 7A 23 28 A2 00 64 55 FC FF 1A 00 06 00 1C 52 01 00 54 6D 61 74 B4 00 64 55 34 00 19 00 ☺. z#(ó.dUⁿ →.♠.∟R☺.Tmat┤.dU4.↓. 00004320 00 00 00 00 01 00 20 20 20 20 C6 00 64 55 FC FF 13 00 06 00 11 52 01 00 20 20 20 20 D8 00 64 55 ....☺. ╞.dUⁿ ‼.♠.◄R☺. ╪.dU 00004340 34 00 12 00 00 00 00 00 01 00 20 20 20 20 EA 00 64 55 26 00 11 00 00 00 00 00 01 00 20 20 20 20 4.↕.....☺. Ω.dU&.◄.....☺. 00004360 FC 00 64 55 09 00 10 00 00 00 00 00 01 00 20 20 20 20 0E 01 64 55 FC FF 0F 00 0E 00 09 52 01 00 ⁿ.dU○.►.....☺. ♫☺dUⁿ ☼.♫.○R☺. 00004380 61 74 65 20 20 01 64 55 FC FF 07 00 0C 00 FA 51 01 00 63 74 75 72 32 01 64 55 84 00 06 00 00 00 ate ☺dUⁿ •.♀.·Q☺.ctur2☺dUä.♠... 000043A0 00 00 01 00 65 64 20 66 44 01 64 55 38 00 05 00 00 00 00 00 01 00 22 66 72 6F 56 01 64 55 FD FF ..☺.ed fD☺dU8.♣.....☺."froV☺dU² 000043C0 04 00 04 00 36 52 01 00 64 62 6F 6F 68 01 64 55 08 00 03 00 00 00 00 00 01 00 73 27 20 63 7A 01 ♦.♦.6R☺.dbooh☺dU◘.♥.....☺.s' cz☺ 000043E0 64 55 03 00 02 00 00 00 00 00 01 00 20 69 62 6D FF FF 00 00 FC FF 01 00 06 00 FA 51 01 00 61 20 dU♥.☻.....☺. ibm ..ⁿ ☺.♠.·Q☺.a 00004400 6E 75 9E 01 64 55 FD FF 02 00 0C 00 56 52 01 00 65 2E 20 74 FF FF 00 00 04 00 01 00 00 00 00 00 nu₧☺dU² ☻.♀.VR☺.e. t ..♦.☺..... 00004420 01 00 69 61 67 6E FF FF 00 00 02 00 00 00 00 00 00 00 01 00 64 6F 6D 61 FF FF 00 00 02 00 00 00 ☺.iagn ..☻.......☺.doma ..☻... 00004440 00 00 00 00 01 00 20 69 73 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 ....☺. is ..☻.......☺. .. 00004460 02 00 00 00 00 00 00 00 01 00 22 2D 72 65 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 64 20 6E 75 ☻.......☺."-re ..☻.......☺.d nu 00004480 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 2E 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 ..☻.......☺.. ..☻.......☺. 000044A0 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 6F 6E 73 20 00 00 48 00 90 00 8C 01 B0 01 ..☻.......☺.ons ..H.É.î☺░☺ 000044C0 C2 01 D4 01 E6 01 F8 01 0A 02 1C 02 2E 02 36 00 FF FF 02 00 61 00 09 00 74 61 62 75 6C 61 74 65 ┬☺╘☺µ☺°☺◙☻∟☻.☻6. ☻.a.○.tabulate 000044E0 00 02 00 7A 00 02 00 61 00 0A 00 63 68 61 72 61 63 74 65 72 00 05 00 68 61 6E 67 00 08 00 10 00 .☻.z.☻.a.◙.character.♣.hang.◘.►. 00004500 01 00 01 00 10 00 61 20 69 73 20 6E 6F 74 20 6E 75 6D 65 72 69 63 02 00 61 00 07 00 6D 61 74 72 ☺.☺.►.a is not numeric☻.a.•.matr 00004520 69 78 00 02 00 61 00 08 00 69 6E 74 65 67 65 72 00 04 00 01 00 00 00 02 00 02 00 02 00 7A 00 04 ix.☻.a.◘.integer.♦.☺...☻.☻.☻.z.♦ 00004540 00 01 00 00 00 02 00 00 00 78 04 00 73 75 62 00 00 01 00 0C 1C 00 0A 00 05 00 01 00 0E 00 02 00 .☺...☻...x♦.sub..☺.♀∟.◙.♣.☺.♫.☻. 00004560 01 00 01 00 01 00 01 00 01 00 01 00 08 00 58 02 02 00 01 00 0A 00 3C 00 20 63 23 61 20 73 75 62 ☺.☺.☺.☺.☺.☺.◘.X☻☻.☺.◙.<. c#a sub 00004580 20 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 b 000045A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6D 75 6C 74 69 70 72 65 63 69 73 "multiprecis 000045C0 69 6F 6E 20 69 6E 74 65 67 65 72 20 73 75 62 74 72 61 63 74 69 6F 6E 20 20 20 20 20 20 20 20 20 ion integer subtraction 000045E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 23 28 61 23 66 69 78 20 61 29 61 64 64 5F c#(a#fix a)add_ 00004600 62 23 66 69 78 20 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 b#fix b 00004620 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00004640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004660 20 20 20 20 20 20 20 20 22 73 75 62 20 2D 20 6D 75 6C 74 69 70 72 65 63 69 73 69 6F 6E 20 69 6E "sub - multiprecision in 00004680 74 65 67 65 72 20 73 75 62 74 72 61 63 74 69 6F 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 teger subtraction 000046A0 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 "from 'the apl handbook of t 000046C0 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 echniques' copyright 1978, ibm. 000046E0 22 2D 73 75 62 74 72 61 63 74 20 62 20 66 72 6F 6D 20 61 2C 20 67 69 76 69 6E 67 20 63 2C 20 75 "-subtract b from a, giving c, u 00004700 73 69 6E 67 20 6D 75 6C 74 69 70 72 65 63 69 73 69 6F 6E 20 69 6E 74 65 67 65 72 20 22 20 61 72 sing multiprecision integer " ar 00004720 69 74 68 6D 65 74 69 63 3B 20 61 20 61 6E 64 20 62 20 6D 61 79 20 62 65 20 69 6E 20 61 6E 79 20 ithmetic; a and b may be in any 00004740 6E 75 6D 65 72 69 63 20 66 6F 72 6D 61 74 2C 20 63 20 77 69 6C 6C 20 20 22 20 62 65 20 6D 70 20 numeric format, c will " be mp 00004760 69 6E 74 65 67 65 72 2E 20 20 73 65 65 20 47 61 64 64 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 integer. see Gadd. 00004780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2D 75 73 65 73 3A 20 47 61 64 64 "-uses: Gadd 000047A0 20 47 66 69 78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 Gfix 000047C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 00 FF FF 00 00 FC FF 09 00 0C 00 AA 51 01 00 ↕. ..ⁿ ○.♀.¬Q☺. 000047E0 01 00 07 00 24 00 7F 54 FC FF 05 00 04 00 39 51 01 00 20 20 20 20 00 00 7F 54 FC FF 03 00 02 00 ☺.•.$.⌂Tⁿ ♣.♦.9Q☺. ..⌂Tⁿ ♥.☻. 00004800 30 51 01 00 20 20 20 20 48 00 7F 54 03 00 02 00 00 00 00 00 01 00 20 20 20 20 24 00 7F 54 FC FF 0Q☺. H.⌂T♥.☻.....☺. $.⌂Tⁿ 00004820 01 00 0C 00 2F 51 01 00 70 72 65 63 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 73 75 62 74 7E 00 ☺.♀./Q☺.prec ..☻.......☺.subt~. 00004840 7F 54 FC FF 16 00 10 00 10 52 01 00 20 20 20 20 90 00 7F 54 FC FF 12 00 02 00 F7 51 01 00 20 63 ⌂Tⁿ ▬.►.►R☺. É.⌂Tⁿ ↕.☻.≈Q☺. c 00004860 23 28 A2 00 7F 54 03 00 11 00 00 00 00 00 01 00 66 69 78 20 B4 00 7F 54 FC FF 10 00 0E 00 D4 51 #(ó.⌂T♥.◄.....☺.fix ┤.⌂Tⁿ ►.♫.╘Q 00004880 01 00 20 20 20 20 C6 00 7F 54 3F 00 0F 00 00 00 00 00 01 00 20 20 20 20 D8 00 7F 54 FC FF 0C 00 ☺. ╞.⌂T?.☼.....☺. ╪.⌂Tⁿ ♀. 000048A0 08 00 D4 51 01 00 20 20 20 20 EA 00 7F 54 09 00 0B 00 00 00 00 00 01 00 20 20 20 20 FC 00 7F 54 ◘.╘Q☺. Ω.⌂T○.♂.....☺. ⁿ.⌂T 000048C0 FC FF 0A 00 02 00 D4 51 01 00 20 20 20 20 0E 01 7F 54 FC FF 06 00 0C 00 B5 51 01 00 20 6D 75 6C ⁿ ◙.☻.╘Q☺. ♫☺⌂Tⁿ ♠.♀.╡Q☺. mul 000048E0 20 01 7F 54 03 00 05 00 00 00 00 00 01 00 74 65 67 65 32 01 7F 54 FC FF 04 00 06 00 B5 51 01 00 ☺⌂T♥.♣.....☺.tege2☺⌂Tⁿ ♦.♠.╡Q☺. 00004900 20 20 20 20 44 01 7F 54 08 00 03 00 00 00 00 00 01 00 22 66 72 6F 56 01 7F 54 03 00 02 00 00 00 D☺⌂T◘.♥.....☺."froV☺⌂T♥.☻... 00004920 00 00 01 00 64 62 6F 6F FF FF 00 00 FC FF 01 00 10 00 B4 51 01 00 73 27 20 63 7A 01 7F 54 FD FF ..☺.dboo ..ⁿ ☺.►.┤Q☺.s' cz☺⌂T² 00004940 02 00 02 00 22 52 01 00 20 69 62 6D FF FF 00 00 04 00 01 00 00 00 00 00 01 00 20 66 72 6F FF FF ☻.☻."R☺. ibm ..♦.☺.....☺. fro 00004960 00 00 02 00 00 00 00 00 00 00 01 00 20 75 73 69 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 69 6F ..☻.......☺. usi ..☻.......☺.io 00004980 6E 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 48 00 22 74 FF FF 00 00 02 00 00 00 00 00 00 00 n ..☻.......☺.H."t ..☻....... 000049A0 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 ☺. ..☻.......☺. ..☻... 000049C0 00 00 00 00 01 00 20 20 20 20 00 00 5A 00 6C 00 68 01 8C 01 9E 01 B0 01 C2 01 D4 01 E6 01 48 00 ....☺. ..Z.l.h☺î☺₧☺░☺┬☺╘☺µ☺H. 000049E0 FF FF 02 00 62 00 04 00 73 75 62 00 02 00 61 00 02 00 63 00 02 00 62 00 04 00 66 69 78 00 02 00 ☻.b.♦.sub.☻.a.☻.c.☻.b.♦.fix.☻. 00004A00 62 00 04 00 61 64 64 00 02 00 61 00 04 00 66 69 78 00 02 00 61 00 02 00 63 00 04 00 01 00 00 00 b.♦.add.☻.a.♦.fix.☻.a.☻.c.♦.☺... 00004A20 02 00 00 00 78 03 00 74 6F 00 00 01 00 0C 7D 00 1B 00 0D 00 03 00 09 00 04 00 0B 00 08 00 08 00 ☻...x♥.to..☺.♀}.←.♪.♥.○.♦.♂.◘.◘. 00004A40 0E 00 02 00 13 00 0D 00 02 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 ♫.☻.‼.♪.☻.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺. 00004A60 01 00 01 00 01 00 01 00 08 00 54 06 02 00 01 00 1B 00 3C 00 20 7A 23 61 20 74 6F 20 62 3B 64 3B ☺.☺.☺.☺.◘.T♠☻.☺.←.<. z#a to b;d; 00004A80 72 3B 78 3B 4C 69 6F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r;x;Lio 00004AA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4C 69 6F 23 30 20 20 20 20 20 20 20 20 20 20 Lio#0 00004AC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 72 23 52 52 7A 23 31 2C 62 20 20 20 20 20 20 20 20 20 20 r#RRz#1,b 00004B00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004B20 20 20 20 20 20 20 20 20 20 7A 23 2C 7A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 z#,z 00004B40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004B60 20 20 20 20 20 78 23 7C 7A 5B 32 58 72 3E 31 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 x#|z[2Xr>1] 00004B80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004BA0 20 64 23 7A 5B 31 5D 5F 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d#z[1]_a 00004BC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 28 33 $(3 00004BE0 3E 72 29 59 6C 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 >r)Yl1 00004C00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 23 61 2B 28 64 25 b#a+(d% 00004C20 78 29 58 49 31 2B 78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 x)XI1+x 00004C40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 6C 32 20 20 20 20 20 20 20 20 $l2 00004C60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004C80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6C 31 3A 62 23 61 2B 28 78 58 58 64 29 58 49 31 l1:b#a+(xXXd)XI1 00004CA0 2B 44 7C 64 25 78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 +D|d%x 00004CC0 20 20 20 20 20 20 20 20 20 20 20 20 6C 32 3A 7A 23 62 2C 28 32 2B 72 3E 31 29 55 7A 20 20 20 20 l2:z#b,(2+r>1)Uz 00004CE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004D00 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 00004D20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00004D40 20 20 20 20 22 74 6F 20 2D 20 6E 75 6D 65 72 69 63 20 76 65 63 74 6F 72 73 20 69 6E 20 65 71 75 "to - numeric vectors in equ 00004D60 61 6C 20 69 6E 63 72 65 6D 65 6E 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 al increments 00004D80 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E "from 'the apl handbook of techn 00004DA0 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 22 73 79 6E iques' copyright 1978, ibm. "syn 00004DC0 74 61 78 3A 20 72 23 61 20 74 6F 20 62 20 20 20 20 20 20 20 72 23 6E 20 66 72 6F 6D 20 61 20 20 tax: r#a to b r#n from a 00004DE0 20 20 20 20 20 72 23 61 20 74 6F 20 62 20 69 6E 20 6D 20 20 20 20 20 20 22 20 20 20 20 20 20 20 r#a to b in m " 00004E00 20 72 23 61 20 74 6F 20 62 20 62 79 20 63 20 20 72 23 6E 20 66 72 6F 6D 20 61 20 62 79 20 63 20 r#a to b by c r#n from a by c 00004E20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 61 3A 20 73 74 61 72 74 69 " a: starti 00004E40 6E 67 20 76 61 6C 75 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ng value 00004E60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 62 3A 20 6C 61 73 74 20 76 61 6C 75 65 " b: last value 00004E80 20 28 6F 72 20 62 6F 75 6E 64 61 72 79 20 76 61 6C 75 65 29 20 20 20 20 20 20 20 20 20 20 20 20 (or boundary value) 00004EA0 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 63 3A 20 69 6E 63 72 65 6D 65 6E 74 20 28 70 6F 73 " c: increment (pos 00004EC0 69 74 69 76 65 20 6F 72 20 6E 65 67 61 74 69 76 65 20 62 75 74 20 6E 6F 74 20 7A 65 72 6F 29 20 itive or negative but not zero) 00004EE0 20 20 20 20 20 20 20 20 22 20 20 6D 3A 20 6E 75 6D 62 65 72 20 6F 66 20 69 6E 74 65 72 76 61 6C " m: number of interval 00004F00 73 20 64 65 73 69 72 65 64 20 28 6D 20 5E 3D 20 30 29 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 s desired (m ^= 0). 00004F20 20 20 20 20 22 20 20 20 20 20 6E 75 6D 62 65 72 20 6F 66 20 76 61 6C 75 65 73 20 6F 62 74 61 69 " number of values obtai 00004F40 6E 65 64 20 3D 20 6D 2B 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ned = m+1 00004F60 22 20 20 6E 3A 20 6E 75 6D 62 65 72 20 6F 66 20 76 61 6C 75 65 73 20 64 65 73 69 72 65 64 20 20 " n: number of values desired 00004F80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 72 " r 00004FA0 3A 20 72 65 73 75 6C 74 69 6E 67 20 6E 75 6D 65 72 69 63 20 76 65 63 74 6F 72 20 77 69 74 68 20 : resulting numeric vector with 00004FC0 65 71 75 61 6C 20 69 6E 63 72 65 6D 65 6E 74 73 20 20 20 20 20 20 20 20 22 2D 77 68 65 6E 20 74 equal increments "-when t 00004FE0 68 65 20 66 75 6E 63 74 69 6F 6E 73 20 27 74 6F 27 20 61 6E 64 20 27 66 72 6F 6D 27 20 61 72 65 he functions 'to' and 'from' are 00005000 20 75 73 65 64 20 61 6C 6F 6E 65 2C 20 74 68 65 20 20 20 20 22 20 69 6E 63 72 65 6D 65 6E 74 20 used alone, the " increment 00005020 69 73 20 75 6E 64 65 72 73 74 6F 6F 64 20 74 6F 20 62 65 20 6F 6E 65 2E 20 20 73 65 71 75 65 6E is understood to be one. sequen 00005040 63 65 73 20 6F 66 20 61 6E 79 20 6F 66 20 20 20 22 20 74 68 65 20 61 62 6F 76 65 20 66 6F 72 6D ces of any of " the above form 00005060 73 20 61 72 65 20 61 6C 73 6F 20 70 6F 73 73 69 62 6C 65 2C 20 70 72 6F 76 69 64 65 64 20 74 68 s are also possible, provided th 00005080 61 74 20 74 68 65 79 20 61 72 65 20 22 20 73 65 70 61 72 61 74 65 64 20 62 79 20 63 6F 6D 6D 61 at they are " separated by comma 000050A0 73 20 61 73 20 73 68 6F 77 6E 20 69 6E 20 74 68 65 20 65 78 61 6D 70 6C 65 73 2E 20 20 20 20 20 s as shown in the examples. 000050C0 20 20 20 20 20 20 20 20 A2 00 FF FF 00 00 ED FF 10 00 00 00 00 00 01 00 20 20 E4 08 24 00 2D 5C ó. ..φ ►.....☺. Σ◘$.-\ 000050E0 1B 00 0F 00 00 00 00 00 01 00 20 70 F6 08 00 00 2D 5C FC FF 0E 00 06 00 11 53 01 00 77 69 08 09 ←.☼.....☺. p÷◘..-\ⁿ ♫.♠.◄S☺.wi◘○ 00005100 48 00 2D 5C 1B 00 0D 00 00 00 00 00 01 00 20 73 1A 09 24 00 2D 5C FC FF 0C 00 04 00 0A 53 01 00 H.-\←.♪.....☺. s→○$.-\ⁿ ♀.♦.◙S☺. 00005120 74 72 2C 09 6C 00 2D 5C 1B 00 0B 00 00 00 00 00 01 00 20 20 3E 09 48 00 2D 5C FC FF 0A 00 0E 00 tr,○l.-\←.♂.....☺. >○H.-\ⁿ ◙.♫. 00005140 09 53 01 00 20 20 50 09 90 00 2D 5C 1B 00 09 00 00 00 00 00 01 00 22 2D 62 09 6C 00 2D 5C FC FF ○S☺. P○É.-\←.○.....☺."-b○l.-\ⁿ 00005160 08 00 08 00 09 53 01 00 61 64 74 09 B4 00 2D 5C FC FF 05 00 0A 00 AA 52 01 00 76 61 86 09 90 00 ◘.◘.○S☺.adt○┤.-\ⁿ ♣.◙.¬R☺.vaå○É. 00005180 2D 5C FC FF 03 00 04 00 AA 52 01 00 20 20 00 00 D8 00 2D 5C 03 00 02 00 00 00 00 00 01 00 0E 00 -\ⁿ ♥.♦.¬R☺. ..╪.-\♥.☻.....☺.♫. 000051A0 AA 09 B4 00 2D 5C FC FF 01 00 0E 00 A9 52 01 00 02 00 BC 09 FC 00 2D 5C FD FF 05 00 08 00 50 53 ¬○┤.-\ⁿ ☺.♫.⌐R☺.☻.╝○ⁿ.-\² ♣.◘.PS 000051C0 01 00 08 00 CE 09 0E 01 2D 5C 03 00 04 00 00 00 00 00 01 00 00 00 E0 09 FF FF 00 00 ED FF 01 00 ☺.◘.╬○♫☺-\♥.♦.....☺...α○ ..φ ☺. 000051E0 00 00 00 00 01 00 02 00 F2 09 32 01 2D 5C FC FF 09 00 02 00 50 53 01 00 0E 00 04 0A 44 01 2D 5C ....☺.☻.≥○2☺-\ⁿ ○.☻.PS☺.♫.♦◙D☺-\ 00005200 0C 00 08 00 00 00 00 00 01 00 00 00 16 0A 56 01 2D 5C FD FF 07 00 0E 00 E2 55 01 00 00 00 28 0A ♀.◘.....☺...▬◙V☺-\² •.♫.ΓU☺...(◙ 00005220 68 01 2D 5C 03 00 06 00 00 00 00 00 01 00 04 00 3A 0A 7A 01 2D 5C FC FF 05 00 0C 00 4F 53 01 00 h☺-\♥.♠.....☺.♦.:◙z☺-\ⁿ ♣.♀.OS☺. 00005240 00 00 4C 0A 8C 01 2D 5C 32 00 04 00 00 00 00 00 01 00 00 00 5E 0A 9E 01 2D 5C 32 00 03 00 00 00 ..L◙î☺-\2.♦.....☺...^◙₧☺-\2.♥... 00005260 00 00 01 00 0E 00 70 0A B0 01 2D 5C 03 00 02 00 00 00 00 00 01 00 00 00 82 0A FF FF 00 00 FC FF ..☺.♫.p◙░☺-\♥.☻.....☺...é◙ ..ⁿ 00005280 01 00 06 00 4F 53 01 00 08 00 94 0A D4 01 2D 5C FC FF 04 00 02 00 E2 55 01 00 00 00 A6 0A E6 01 ☺.♠.OS☺.◘.ö◙╘☺-\ⁿ ♦.☻.ΓU☺...ª◙µ☺ 000052A0 2D 5C 0C 00 03 00 00 00 00 00 01 00 00 00 B8 0A F8 01 2D 5C 03 00 02 00 00 00 00 00 01 00 00 00 -\♀.♥.....☺...╕◙°☺-\♥.☻.....☺... 000052C0 00 00 FF FF 00 00 FC FF 01 00 0C 00 E1 55 01 00 00 00 0A 00 1C 02 2D 5C 3D 00 0B 00 00 00 00 00 .. ..ⁿ ☺.♀.ßU☺...◙.∟☻-\=.♂..... 000052E0 01 00 02 00 EE 0A 2E 02 2D 5C FD FF 0A 00 10 00 01 56 01 00 00 00 00 0B 40 02 2D 5C 1E 00 09 00 ☺.☻.ε◙.☻-\² ◙.►.☺V☺....♂@☻-\▲.○. 00005300 00 00 00 00 01 00 00 00 12 0B 52 02 2D 5C FC FF 08 00 08 00 F4 55 01 00 08 00 24 0B 64 02 2D 5C ....☺...↕♂R☻-\ⁿ ◘.◘.⌠U☺.◘.$♂d☻-\ 00005320 38 00 07 00 00 00 00 00 01 00 00 00 36 0B 76 02 2D 5C FD FF 06 00 04 00 F9 55 01 00 0A 00 48 0B 8.•.....☺...6♂v☻-\² ♠.♦.∙U☺.◙.H♂ 00005340 88 02 2D 5C 3B 00 05 00 00 00 00 00 01 00 00 00 5A 0B 9A 02 2D 5C FC FF 04 00 10 00 EC 55 01 00 ê☻-\;.♣.....☺...Z♂Ü☻-\ⁿ ♦.►.∞U☺. 00005360 00 00 6C 0B AC 02 2D 5C 83 00 03 00 00 00 00 00 01 00 0A 00 7E 0B BE 02 2D 5C 03 00 02 00 00 00 ..l♂¼☻-\â.♥.....☺.◙.~♂╛☻-\♥.☻... 00005380 00 00 01 00 08 00 90 0B FF FF 00 00 FC FF 01 00 08 00 E2 55 01 00 00 00 A2 0B E2 02 2D 5C FC FF ..☺.◘.É♂ ..ⁿ ☺.◘.ΓU☺...ó♂Γ☻-\ⁿ 000053A0 08 00 02 00 F8 55 01 00 04 00 B4 0B F4 02 2D 5C 3F 00 07 00 00 00 00 00 01 00 00 00 C6 0B 06 03 ◘.☻.°U☺.♦.┤♂⌠☻-\?.•.....☺...╞♂♠♥ 000053C0 2D 5C 3D 00 06 00 00 00 00 00 01 00 00 00 D8 0B 18 03 2D 5C FD FF 05 00 08 00 0E 56 01 00 06 00 -\=.♠.....☺...╪♂↑♥-\² ♣.◘.♫V☺.♠. 000053E0 EA 0B 2A 03 2D 5C 3B 00 04 00 00 00 00 00 01 00 08 00 FC 0B 3C 03 2D 5C FC FF 03 00 04 00 F5 55 Ω♂*♥-\;.♦.....☺.◘.ⁿ♂<♥-\ⁿ ♥.♦.⌡U 00005400 01 00 10 00 00 00 4E 03 2D 5C 03 00 02 00 00 00 00 00 01 00 00 00 20 0C FF FF 00 00 FC FF 01 00 ☺.►...N♥-\♥.☻.....☺... ♀ ..ⁿ ☺. 00005420 0E 00 F4 55 01 00 10 00 32 0C 72 03 2D 5C FC FF 08 00 0E 00 F8 55 01 00 00 00 44 0C 84 03 2D 5C ♫.⌠U☺.►.2♀r♥-\ⁿ ◘.♫.°U☺...D♀ä♥-\ 00005440 39 00 07 00 00 00 00 00 01 00 04 00 56 0C 96 03 2D 5C 09 00 06 00 00 00 00 00 01 00 0C 00 68 0C 9.•.....☺.♦.V♀û♥-\○.♠.....☺.♀.h♀ 00005460 A8 03 2D 5C FC FF 05 00 08 00 F8 55 01 00 00 00 7A 0C BA 03 2D 5C 1E 00 04 00 00 00 00 00 01 00 ¿♥-\ⁿ ♣.◘.°U☺...z♀║♥-\▲.♦.....☺. 00005480 00 00 00 00 CC 03 2D 5C FD FF 03 00 0C 00 69 56 01 00 00 00 9E 0C DE 03 2D 5C 08 00 02 00 00 00 ....╠♥-\² ♥.♀.iV☺...₧♀▐♥-\◘.☻... 000054A0 00 00 01 00 00 00 B0 0C FF FF 00 00 04 00 01 00 00 00 00 00 01 00 00 00 C2 0C 02 04 2D 5C FC FF ..☺...░♀ ..♦.☺.....☺...┬♀☻♦-\ⁿ 000054C0 0E 00 02 00 0E 56 01 00 00 00 D4 0C 14 04 2D 5C 0B 00 0D 00 00 00 00 00 01 00 00 00 E6 0C 26 04 ♫.☻.♫V☺...╘♀¶♦-\♂.♪.....☺...µ♀&♦ 000054E0 2D 5C FD FF 0C 00 10 00 A1 57 01 00 01 00 F8 0C 38 04 2D 5C 29 00 0B 00 00 00 00 00 01 00 16 00 -\² ♀.►.íW☺.☺.°♀8♦-\).♂.....☺.▬. 00005500 0A 0D 4A 04 2D 5C 38 00 0A 00 00 00 00 00 01 00 15 00 1C 0D 5C 04 2D 5C 09 00 09 00 00 00 00 00 ◙♪J♦-\8.◙.....☺.§.∟♪\♦-\○.○..... 00005520 01 00 14 00 2E 0D 6E 04 2D 5C FC FF 08 00 0C 00 0D 56 01 00 12 00 40 0D 80 04 2D 5C 05 00 07 00 ☺.¶..♪n♦-\ⁿ ◘.♀.♪V☺.↕.@♪Ç♦-\♣.•. 00005540 00 00 00 00 01 00 11 00 52 0D 92 04 2D 5C FC FF 06 00 06 00 0D 56 01 00 0E 00 64 0D A4 04 2D 5C ....☺.◄.R♪Æ♦-\ⁿ ♠.♠.♪V☺.♫.d♪ñ♦-\ 00005560 08 00 05 00 00 00 00 00 01 00 02 00 76 0D B6 04 2D 5C 0B 00 04 00 00 00 00 00 01 00 01 00 88 0D ◘.♣.....☺.☻.v♪╢♦-\♂.♦.....☺.☺.ê♪ 00005580 C8 04 2D 5C FC FF 03 00 08 00 01 56 01 00 16 00 9A 0D DA 04 2D 5C 03 00 02 00 00 00 00 00 01 00 ╚♦-\ⁿ ♥.◘.☺V☺.▬.Ü♪┌♦-\♥.☻.....☺. 000055A0 15 00 AC 0D FF FF 00 00 FC FF 01 00 02 00 01 56 01 00 14 00 00 00 FE 04 2D 5C FC FF 02 00 02 00 §.¼♪ ..ⁿ ☺.☻.☺V☺.¶...■♦-\ⁿ ☻.☻. 000055C0 70 56 01 00 12 00 D0 0D FF FF 00 00 04 00 01 00 00 00 00 00 01 00 11 00 E2 0D 22 05 2D 5C FC FF pV☺.↕.╨♪ ..♦.☺.....☺.◄.Γ♪"♣-\ⁿ 000055E0 15 00 02 00 09 58 01 00 0E 00 F4 0D 34 05 2D 5C 05 00 14 00 00 00 00 00 01 00 02 00 06 0E 46 05 §.☻.○X☺.♫.⌠♪4♣-\♣.¶.....☺.☻.♠♫F♣ 00005600 2D 5C FC FF 13 00 0A 00 F9 57 01 00 01 00 18 0E 58 05 2D 5C 83 00 12 00 00 00 00 00 01 00 02 00 -\ⁿ ‼.◙.∙W☺.☺.↑♫X♣-\â.↕.....☺.☻. 00005620 2A 0E 6A 05 2D 5C 24 00 11 00 00 00 00 00 01 00 01 00 3C 0E 7C 05 2D 5C 0B 00 10 00 00 00 00 00 *♫j♣-\$.◄.....☺.☺.<♫|♣-\♂.►..... 00005640 01 00 00 00 4E 0E 8E 05 2D 5C FD FF 0F 00 08 00 09 58 01 00 00 00 60 0E A0 05 2D 5C 29 00 0E 00 ☺...N♫Ä♣-\² ☼.◘.○X☺...`♫á♣-\).♫. 00005660 00 00 00 00 01 00 00 00 72 0E B2 05 2D 5C 38 00 0D 00 00 00 00 00 01 00 FC FF 84 0E C4 05 2D 5C ....☺...r♫▓♣-\8.♪.....☺.ⁿ ä♫─♣-\ 00005680 09 00 0C 00 00 00 00 00 01 00 FC FF 96 0E D6 05 2D 5C FC FF 0B 00 04 00 F9 57 01 00 FC FF A8 0E ○.♀.....☺.ⁿ û♫╓♣-\ⁿ ♂.♦.∙W☺.ⁿ ¿♫ 000056A0 E8 05 2D 5C 38 00 0A 00 00 00 00 00 01 00 03 00 BA 0E FA 05 2D 5C 38 00 09 00 00 00 00 00 01 00 Φ♣-\8.◙.....☺.♥.║♫·♣-\8.○.....☺. 000056C0 FC FF CC 0E 0C 06 2D 5C FC FF 08 00 0A 00 F7 57 01 00 02 00 DE 0E 1E 06 2D 5C 08 00 07 00 00 00 ⁿ ╠♫♀♠-\ⁿ ◘.◙.≈W☺.☻.▐♫▲♠-\◘.•... 000056E0 00 00 01 00 02 00 F0 0E 30 06 2D 5C 0B 00 06 00 00 00 00 00 01 00 FC FF 00 00 42 06 2D 5C FC FF ..☺.☻.≡♫0♠-\♂.♠.....☺.ⁿ ..B♠-\ⁿ 00005700 05 00 06 00 A3 57 01 00 39 00 14 0F 54 06 2D 5C 03 00 04 00 00 00 00 00 01 00 FC FF 00 00 66 06 ♣.♠.úW☺.9.¶☼T♠-\♥.♦.....☺.ⁿ ..f♠ 00005720 2D 5C FC FF 03 00 0E 00 70 56 01 00 46 00 00 00 78 06 2D 5C 1A 00 02 00 00 00 00 00 01 00 09 00 -\ⁿ ♥.♫.pV☺.F...x♠-\→.☻.....☺.○. 00005740 00 00 86 07 2D 5C FC FF 09 00 08 00 70 56 01 00 FC FF 00 00 9C 06 2D 5C FC FF 0F 00 0A 00 17 58 ..å•-\ⁿ ○.◘.pV☺.ⁿ ..£♠-\ⁿ ☼.◙.↨X 00005760 01 00 0C 00 00 00 AE 06 2D 5C 35 00 0E 00 00 00 00 00 01 00 32 00 00 00 C0 06 2D 5C 09 00 0D 00 ☺.♀...«♠-\5.♫.....☺.2...└♠-\○.♪. 00005780 00 00 00 00 01 00 3F 00 00 00 D2 06 2D 5C FD FF 0C 00 04 00 4D 58 01 00 FC FF 04 00 E4 06 2D 5C ....☺.?...╥♠-\² ♀.♦.MX☺.ⁿ ♦.Σ♠-\ 000057A0 1E 00 0B 00 00 00 00 00 01 00 01 00 01 00 F6 06 2D 5C FC FF 0A 00 04 00 17 58 01 00 02 00 A4 5C ▲.♂.....☺.☺.☺.÷♠-\ⁿ ◙.♦.↨X☺.☻.ñ\ 000057C0 08 07 2D 5C 0B 00 09 00 00 00 00 00 01 00 20 20 04 00 1A 07 2D 5C FD FF 08 00 04 00 46 58 01 00 ◘•-\♂.○.....☺. ♦.→•-\² ◘.♦.FX☺. 000057E0 02 00 01 00 2C 07 2D 5C 08 00 07 00 00 00 00 00 01 00 00 00 00 00 3E 07 2D 5C 0C 00 06 00 00 00 ☻.☺.,•-\◘.•.....☺.....>•-\♀.♠... 00005800 00 00 01 00 01 00 00 00 50 07 2D 5C FC FF 05 00 0A 00 15 58 01 00 16 00 05 00 62 07 2D 5C 03 00 ..☺.☺...P•-\ⁿ ♣.◙.§X☺.▬.♣.b•-\♥. 00005820 04 00 00 00 00 00 01 00 02 00 A4 5C 74 07 2D 5C FC FF 03 00 0C 00 12 58 01 00 02 00 B6 5C 86 07 ♦.....☺.☻.ñ\t•-\ⁿ ♥.♀.↕X☺.☻.╢\å• 00005840 2D 5C 1A 00 02 00 00 00 00 00 01 00 01 00 00 00 FF FF 00 00 FC FF 0A 00 0E 00 0F 58 01 00 B1 5C -\→.☻.....☺.☺... ..ⁿ ◙.♫.☼X☺.▒\ 00005860 7A 00 AA 07 2D 5C FD FF 02 00 0A 00 59 58 01 00 07 00 02 00 FF FF 00 00 04 00 01 00 00 00 00 00 z.¬•-\² ☻.◙.YX☺.•.☻. ..♦.☺..... 00005880 01 00 02 00 01 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 02 00 00 00 ☺.☻.☺. ..☻.......☺..... ..☻... 000058A0 00 00 00 00 01 00 B1 5C 32 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 02 00 FF FF 00 00 ....☺.▒\2. ..☻.......☺...☻. .. 000058C0 02 00 00 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 01 00 0C ☻.......☺..... ..☻.......☺.☺☺.♀ 000058E0 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 DB 61 02 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 ..☻.......☺.█a☻. ..☻.......☺. 00005900 02 00 B6 5C FF FF 00 00 02 00 00 00 00 00 00 00 01 00 02 00 B6 5C FF FF 00 00 02 00 00 00 00 00 ☻.╢\ ..☻.......☺.☻.╢\ ..☻..... 00005920 00 00 01 00 01 00 00 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 16 00 05 00 FF FF 00 00 02 00 ..☺.☺... ..☻.......☺.▬.♣. ..☻. 00005940 00 00 00 00 00 00 01 00 02 00 B6 5C FF FF 00 00 02 00 00 00 00 00 00 00 01 00 0A 00 CB 5C FF FF ......☺.☻.╢\ ..☻.......☺.◙.╦\ 00005960 00 00 02 00 00 00 00 00 00 00 01 00 01 00 FF FF FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 ..☻.......☺.☺. ..☻.......☺... 00005980 00 00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 C2 5C 2C 00 00 00 EA 00 20 01 C2 01 0A 02 D0 02 .. ..☻.......☺.┬\,...Ω. ☺┬☺◙☻╨☻ 000059A0 60 03 F0 03 EC 04 10 05 8A 06 98 07 BC 07 CE 07 E0 07 F2 07 04 08 16 08 28 08 3A 08 4C 08 5E 08 `♥≡♥∞♦►♣è♠ÿ•╝•╬•α•≥•♦◘▬◘(◘:◘L◘^◘ 000059C0 70 08 82 08 94 08 A6 08 B8 08 D8 00 78 06 02 00 78 00 02 00 72 00 02 00 64 00 02 00 62 00 03 00 p◘é◘ö◘ª◘╕◘╪.x♠☻.x.☻.r.☻.d.☻.b.♥. 000059E0 74 6F 00 02 00 61 00 02 00 7A 00 04 00 01 00 00 00 02 00 00 00 02 00 62 00 04 00 01 00 00 00 02 to.☻.a.☻.z.♦.☺...☻...☻.b.♦.☺...☻ 00005A00 00 01 00 02 00 7A 00 02 00 72 00 02 00 7A 00 02 00 7A 00 04 00 01 00 00 00 02 00 01 00 02 00 72 .☺.☻.z.☻.r.☻.z.☻.z.♦.☺...☻.☺.☻.r 00005A20 00 04 00 01 00 00 00 02 00 02 00 02 00 7A 00 02 00 78 00 02 00 61 00 04 00 01 00 00 00 02 00 01 .♦.☺...☻.☻.☻.z.☻.x.☻.a.♦.☺...☻.☺ 00005A40 00 02 00 7A 00 02 00 64 00 03 00 6C 31 00 02 00 72 00 04 00 01 00 00 00 02 00 03 00 02 00 78 00 .☻.z.☻.d.♥.l1.☻.r.♦.☺...☻.♥.☻.x. 00005A60 04 00 01 00 00 00 02 00 01 00 02 00 78 00 02 00 64 00 02 00 61 00 02 00 62 00 03 00 6C 32 00 02 ♦.☺...☻.☺.☻.x.☻.d.☻.a.☻.b.♥.l2.☻ 00005A80 00 78 00 02 00 64 00 04 00 01 00 00 00 02 00 01 00 02 00 64 00 02 00 78 00 02 00 61 00 02 00 62 .x.☻.d.♦.☺...☻.☺.☻.d.☻.x.☻.a.☻.b 00005AA0 00 03 00 6C 31 00 02 00 7A 00 04 00 01 00 00 00 02 00 01 00 02 00 72 00 04 00 01 00 00 00 02 00 .♥.l1.☻.z.♦.☺...☻.☺.☻.r.♦.☺...☻. 00005AC0 02 00 02 00 62 00 02 00 7A 00 03 00 6C 32 00 04 00 01 00 00 00 02 00 00 00 78 06 00 75 6C 69 6E ☻.☻.b.☻.z.♥.l2.♦.☺...☻...x♠.ulin 00005AE0 65 00 00 01 00 0C 74 00 0F 00 0D 00 05 00 14 00 13 00 30 00 02 00 01 00 01 00 01 00 01 00 01 00 e..☺.♀t.☼.♪.♣.¶.‼.0.☻.☺.☺.☺.☺.☺. 00005B00 01 00 01 00 01 00 01 00 08 00 B1 03 02 00 01 00 0F 00 3F 00 20 72 23 6E 20 75 6C 69 6E 65 20 6B ☺.☺.☺.☺.◘.▒♥☻.☺.☼.?. r#n uline k 00005B20 3B 6C 3B 4C 69 6F 3B 6A 3B 69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;l;Lio;j;i 00005B40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6B 23 6D 61 74 72 69 78 20 46 6B 20 k#matrix Fk 00005B60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00005B80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 27 27 6D 61 74 72 69 78 20 68 61 73 '''matrix has 00005BA0 20 72 6F 77 73 20 6E 75 6D 62 65 72 65 64 3A 20 27 27 2C 46 6A 27 65 73 63 61 70 65 78 7E 26 2F rows numbered: '',Fj'escapex~&/ 00005BC0 6E 45 6A 23 49 69 23 28 4C 69 6F 23 31 29 59 52 6B 20 72 23 28 6C 23 28 31 20 78 76 65 63 20 69 nEj#Ii#(Lio#1)YRk r#(l#(1 xvec i 00005BE0 20 63 76 65 63 20 31 2B 6E 29 2C 30 29 60 5C 6B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 cvec 1+n),0)`\k 00005C00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 23 28 5F 6A 2C 30 29 55 72 20 66 69 6C 6C r#(_j,0)Ur fill 00005C20 73 28 7E 6C 29 60 5C 28 28 28 6A 23 69 3E 53 2F 6E 29 2B 52 2C 6E 29 2C 31 55 52 6B 29 52 28 56 s(~l)`\(((j#i>S/n)+R,n),1URk)R(V 00005C40 60 2F 6B 5E 3D 27 20 27 29 5C 27 2D 27 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 `/k^=' ')\'-' $0 00005C60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00005C80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 75 6C 69 6E 65 20 2D 20 75 6E 64 65 72 6C 69 6E 65 "uline - underline 00005CA0 20 73 70 65 63 69 66 69 65 64 20 72 6F 77 73 20 6F 66 20 63 68 61 72 61 63 74 65 72 20 6D 61 74 specified rows of character mat 00005CC0 72 69 78 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 rix "from 'the apl hand 00005CE0 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 book of techniques' copyright 19 00005D00 37 38 2C 20 69 62 6D 2E 20 20 20 20 22 2D 72 65 74 75 72 6E 73 20 61 6E 20 65 78 70 61 6E 64 65 78, ibm. "-returns an expande 00005D20 64 20 6D 61 74 72 69 78 20 77 69 74 68 20 75 6E 64 65 72 73 63 6F 72 65 73 20 69 6E 73 65 72 74 d matrix with underscores insert 00005D40 65 64 2C 20 20 20 20 20 20 20 20 22 20 61 73 20 69 6E 64 69 63 61 74 65 64 20 62 79 20 6E 2C 20 ed, " as indicated by n, 00005D60 61 20 76 65 63 74 6F 72 20 6F 72 20 72 6F 77 20 6E 75 6D 62 65 72 73 20 4C 69 6F 23 31 2E 20 20 a vector or row numbers Lio#1. 00005D80 20 20 20 20 20 20 20 20 20 20 22 2D 75 6E 64 65 72 6C 69 6E 65 73 20 77 69 6C 6C 20 6E 6F 74 20 "-underlines will not 00005DA0 61 70 70 65 61 72 20 69 6E 20 63 6F 6C 75 6D 6E 73 20 74 68 61 74 20 61 72 65 20 61 6C 77 61 79 appear in columns that are alway 00005DC0 73 20 20 20 20 20 20 20 20 22 20 62 6C 61 6E 6B 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s " blank. 00005DE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00005E00 20 20 20 20 20 20 20 20 22 2D 67 69 76 65 6E 20 61 20 63 68 61 72 61 63 74 65 72 20 76 65 63 74 "-given a character vect 00005E20 6F 72 2C 20 47 75 73 63 6F 72 65 20 69 73 20 6D 75 63 68 20 66 61 73 74 65 72 20 74 68 61 6E 20 or, Guscore is much faster than 00005E40 20 20 20 20 20 20 20 22 20 47 75 6C 69 6E 65 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 " Guline. 00005E60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00005E80 20 20 20 20 20 20 22 2D 75 73 65 73 3A 20 47 6D 61 74 72 69 78 20 47 65 78 70 61 63 65 78 20 47 "-uses: Gmatrix Gexpacex G 00005EA0 78 76 65 78 20 47 63 76 65 63 20 47 66 69 6C 6C 73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 xvex Gcvec Gfills 00005EC0 20 20 20 20 20 A2 00 FF FF 00 00 FC FF 15 00 0C 00 C8 55 01 00 08 00 F2 5C 24 00 F6 5C 1B 00 14 ó. ..ⁿ §.♀.╚U☺.◘.≥\$.÷\←.¶ 00005EE0 00 00 00 00 00 01 00 0E 00 FE 5C 00 00 F6 5C FC FF 13 00 08 00 BF 54 01 00 63 74 00 00 48 00 F6 .....☺.♫.■\..÷\ⁿ ‼.◘.┐T☺.ct..H.÷ 00005F00 5C 1B 00 12 00 00 00 00 00 01 00 00 00 00 00 24 00 F6 5C ED FF 0F 00 00 00 00 00 01 00 01 00 00 \←.↕.....☺.....$.÷\φ ☼.....☺.☺.. 00005F20 00 6C 00 F6 5C 1B 00 0E 00 00 00 00 00 01 00 50 0D 04 00 48 00 F6 5C FC FF 0D 00 02 00 BF 54 01 .l.÷\←.♫.....☺.P♪♦.H.÷\ⁿ ♪.☻.┐T☺ 00005F40 00 FE 5C 06 00 90 00 F6 5C 1B 00 0C 00 00 00 00 00 01 00 BC 5D D2 0B 6C 00 F6 5C FC FF 0B 00 0C .■\♠.É.÷\←.♀.....☺.╝]╥♂l.÷\ⁿ ♂.♀ 00005F60 00 BE 54 01 00 00 00 04 00 B4 00 F6 5C FC FF 05 00 0E 00 E8 52 01 00 00 00 00 00 90 00 F6 5C FC .╛T☺...♦.┤.÷\ⁿ ♣.♫.ΦR☺.....É.÷\ⁿ 00005F80 FF 03 00 10 00 E2 52 01 00 00 00 00 00 D8 00 F6 5C 03 00 02 00 00 00 00 00 01 00 00 00 00 00 B4 ♥.►.ΓR☺.....╪.÷\♥.☻.....☺.....┤ 00005FA0 00 F6 5C FC FF 01 00 0A 00 E2 52 01 00 00 00 00 00 FC 00 F6 5C FC FF 0B 00 0E 00 E8 55 01 00 00 .÷\ⁿ ☺.◙.ΓR☺.....ⁿ.÷\ⁿ ♂.♫.ΦU☺.. 00005FC0 00 00 00 0E 01 F6 5C 26 00 0A 00 00 00 00 00 01 00 00 00 00 00 20 01 F6 5C FC FF 03 00 0A 00 D7 ...♫☺÷\&.◙.....☺..... ☺÷\ⁿ ♥.◙.╫ 00005FE0 55 01 00 00 00 00 00 32 01 F6 5C 03 00 02 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 01 U☺.....2☺÷\♥.☻.....☺..... ..ⁿ ☺ 00006000 00 04 00 D7 55 01 00 00 00 00 00 56 01 F6 5C FC FF 3E 00 0C 00 00 56 01 00 00 00 00 00 68 01 F6 .♦.╫U☺.....V☺÷\ⁿ >.♀..V☺.....h☺÷ 00006020 5C 32 00 3D 00 00 00 00 00 01 00 00 00 00 00 7A 01 F6 5C 39 00 3C 00 00 00 00 00 01 00 00 00 00 \2.=.....☺.....z☺÷\9.<.....☺.... 00006040 00 8C 01 F6 5C 09 00 3B 00 00 00 00 00 01 00 00 00 00 00 9E 01 F6 5C FD FF 3A 00 0A 00 9E 57 01 .î☺÷\○.;.....☺.....₧☺÷\² :.◙.₧W☺ 00006060 00 00 00 00 00 B0 01 F6 5C 03 00 39 00 00 00 00 00 01 00 00 00 00 00 C2 01 F6 5C ED FF 36 00 00 .....░☺÷\♥.9.....☺.....┬☺÷\φ 6.. 00006080 00 00 00 01 00 00 00 00 00 D4 01 F6 5C 08 00 35 00 00 00 00 00 01 00 00 00 00 00 E6 01 F6 5C 03 ...☺.....╘☺÷\◘.5.....☺.....µ☺÷\♥ 000060A0 00 34 00 00 00 00 00 01 00 00 00 00 00 F8 01 F6 5C FC FF 33 00 06 00 00 56 01 00 00 00 00 00 0A .4.....☺.....°☺÷\ⁿ 3.♠..V☺.....◙ 000060C0 02 F6 5C 29 00 32 00 00 00 00 00 01 00 00 00 00 00 1C 02 F6 5C 03 00 31 00 00 00 00 00 01 00 00 ☻÷\).2.....☺.....∟☻÷\♥.1.....☺.. 000060E0 00 00 00 2E 02 F6 5C FC FF 30 00 10 00 FF 55 01 00 00 00 00 00 40 02 F6 5C 25 00 2F 00 00 00 00 ....☻÷\ⁿ 0.►. U☺.....@☻÷\%./.... 00006100 00 01 00 00 00 00 00 52 02 F6 5C FC FF 2E 00 0A 00 EC 55 01 00 00 00 00 00 64 02 F6 5C 0F 00 2D .☺.....R☻÷\ⁿ ..◙.∞U☺.....d☻÷\☼.- 00006120 00 00 00 00 00 01 00 00 00 00 00 76 02 F6 5C 06 00 2C 00 00 00 00 00 01 00 00 00 00 00 88 02 F6 .....☺.....v☻÷\♠.,.....☺.....ê☻÷ 00006140 5C 84 00 2B 00 00 00 00 00 01 00 00 00 00 00 9A 02 F6 5C FC FF 24 00 10 00 EB 55 01 00 00 00 00 \ä.+.....☺.....Ü☻÷\ⁿ $.►.δU☺.... 00006160 00 FF FF 00 00 07 00 01 00 08 00 63 56 01 00 00 00 00 00 BE 02 F6 5C FC FF 1E 00 0C 00 05 58 01 . ..•.☺.◘.cV☺.....╛☻÷\ⁿ ▲.♀.♣X☺ 00006180 00 00 00 00 00 D0 02 F6 5C 4D 00 1C 00 00 00 00 00 01 00 00 00 00 00 E2 02 F6 5C 09 00 1B 00 00 .....╨☻÷\M.∟.....☺.....Γ☻÷\○.←.. 000061A0 00 00 00 01 00 00 00 00 00 F4 02 F6 5C FD FF 1A 00 02 00 13 58 01 00 00 00 00 00 06 03 F6 5C 0C ...☺.....⌠☻÷\² →.☻.‼X☺.....♠♥÷\♀ 000061C0 00 19 00 00 00 00 00 01 00 00 00 00 00 18 03 F6 5C 09 00 18 00 00 00 00 00 01 00 00 00 00 00 2A .↓.....☺.....↑♥÷\○.↑.....☺.....* 000061E0 03 F6 5C FC FF 17 00 06 00 05 58 01 00 00 00 00 00 3C 03 F6 5C 0B 00 16 00 00 00 00 00 01 00 00 ♥÷\ⁿ ↨.♠.♣X☺.....<♥÷\♂.▬.....☺.. 00006200 00 00 00 4E 03 F6 5C FD FF 15 00 0E 00 06 58 01 00 00 00 00 00 60 03 F6 5C FC FF 10 00 02 00 FD ...N♥÷\² §.♫.♠X☺.....`♥÷\ⁿ ►.☻.² 00006220 57 01 00 00 00 00 00 72 03 F6 5C FC FF 0E 00 0C 00 FC 57 01 00 00 00 00 00 84 03 F6 5C FC FF 09 W☺.....r♥÷\ⁿ ♫.♀.ⁿW☺.....ä♥÷\ⁿ ○ 00006240 00 0E 00 9D 57 01 00 00 00 00 00 96 03 F6 5C FD FF 07 00 06 00 FB 57 01 00 00 00 00 00 A8 03 F6 .♫.¥W☺.....û♥÷\² •.♠.√W☺.....¿♥÷ 00006260 5C 08 00 06 00 00 00 00 00 01 00 00 00 00 00 BA 03 F6 5C 03 00 05 00 00 00 00 00 01 00 00 00 00 \◘.♠.....☺.....║♥÷\♥.♣.....☺.... 00006280 00 CC 03 F6 5C FC FF 04 00 08 00 9D 57 01 00 00 00 00 00 DE 03 F6 5C 08 00 03 00 00 00 00 00 01 .╠♥÷\ⁿ ♦.◘.¥W☺.....▐♥÷\◘.♥.....☺ 000062A0 00 00 00 00 00 F0 03 F6 5C 03 00 02 00 00 00 00 00 01 00 00 00 00 00 FF FF 00 00 FC FF 01 00 04 .....≡♥÷\♥.☻.....☺..... ..ⁿ ☺.♦ 000062C0 00 69 56 01 00 00 00 00 00 14 04 F6 5C 07 00 3A 00 08 00 AC 58 01 00 00 00 00 00 26 04 F6 5C 3C .iV☺.....¶♦÷\•.:.◘.¼X☺.....&♦÷\< 000062E0 00 39 00 00 00 00 00 01 00 00 00 00 00 38 04 F6 5C 09 00 38 00 00 00 00 00 01 00 00 00 00 00 4A .9.....☺.....8♦÷\○.8.....☺.....J 00006300 04 F6 5C 07 00 35 00 08 00 A7 58 01 00 00 00 00 00 5C 04 F6 5C 3E 00 33 00 00 00 00 00 01 00 00 ♦÷\•.5.◘.ºX☺.....\♦÷\>.3.....☺.. 00006320 00 00 00 6E 04 F6 5C FC FF 32 00 04 00 51 58 01 00 00 00 00 00 80 04 F6 5C 40 00 30 00 00 00 00 ...n♦÷\ⁿ 2.♦.QX☺.....Ç♦÷\@.0.... 00006340 00 01 00 00 00 00 00 92 04 F6 5C 36 00 2F 00 00 00 00 00 01 00 00 00 00 00 A4 04 F6 5C 08 00 2E .☺.....Æ♦÷\6./.....☺.....ñ♦÷\◘.. 00006360 00 00 00 00 00 01 00 00 00 00 00 B6 04 F6 5C 32 00 2D 00 00 00 00 00 01 00 00 00 00 00 C8 04 F6 .....☺.....╢♦÷\2.-.....☺.....╚♦÷ 00006380 5C 09 00 2C 00 00 00 00 00 01 00 00 00 00 00 DA 04 F6 5C FC FF 2B 00 0A 00 4C 58 01 00 00 00 00 \○.,.....☺.....┌♦÷\ⁿ +.◙.LX☺.... 000063A0 00 EC 04 F6 5C 32 00 2A 00 00 00 00 00 01 00 43 5D 01 00 FE 04 F6 5C 35 00 29 00 00 00 00 00 01 .∞♦÷\2.*.....☺.C]☺.■♦÷\5.).....☺ 000063C0 00 69 74 20 75 10 05 F6 5C FD FF 28 00 0E 00 9A 58 01 00 20 20 20 20 22 05 F6 5C 0C 00 27 00 00 .it u►♣÷\² (.♫.ÜX☺. "♣÷\♀.'.. 000063E0 00 00 00 01 00 20 20 20 20 34 05 F6 5C 09 00 26 00 00 00 00 00 01 00 64 69 74 65 46 05 F6 5C FC ...☺. 4♣÷\○.&.....☺.diteF♣÷\ⁿ 00006400 FF 25 00 0C 00 45 58 01 00 68 29 59 75 58 05 F6 5C 0C 00 24 00 00 00 00 00 01 00 73 6C 61 73 6A %.♀.EX☺.h)YuX♣÷\♀.$.....☺.slasj 00006420 05 F6 5C 32 00 23 00 00 00 00 00 01 00 64 20 20 24 7C 05 F6 5C 0B 00 22 00 00 00 00 00 01 00 20 ♣÷\2.#.....☺.d $|♣÷\♂.".....☺. 00006440 20 20 20 8E 05 F6 5C 09 00 21 00 00 00 00 00 01 00 20 20 20 20 A0 05 F6 5C FC FF 20 00 06 00 45 Ä♣÷\○.!.....☺. á♣÷\ⁿ .♠.E 00006460 58 01 00 20 20 20 20 B2 05 F6 5C 0F 00 1F 00 00 00 00 00 01 00 69 74 20 6C C4 05 F6 5C 33 00 1E X☺. ▓♣÷\☼.▼.....☺.it l─♣÷\3.▲ 00006480 00 00 00 00 00 01 00 6F 6E 20 6F D6 05 F6 5C 1E 00 1D 00 00 00 00 00 01 00 72 75 63 74 E8 05 F6 .....☺.on o╓♣÷\▲.↔.....☺.ructΦ♣÷ 000064A0 5C FC FF 1C 00 04 00 15 58 01 00 6D 20 27 74 FA 05 F6 5C 03 00 1B 00 00 00 00 00 01 00 6B 20 6F \ⁿ ∟.♦.§X☺.m 't·♣÷\♥.←.....☺.k o 000064C0 66 0C 06 F6 5C FC FF 1A 00 0E 00 14 58 01 00 6F 70 79 72 1E 06 F6 5C 08 00 19 00 00 00 00 00 01 f♀♠÷\ⁿ →.♫.¶X☺.opyr▲♠÷\◘.↓.....☺ 000064E0 00 2E 20 22 2D 30 06 F6 5C 08 00 18 00 00 00 00 00 01 00 69 6F 6E 73 42 06 F6 5C 08 00 17 00 00 .. "-0♠÷\◘.↑.....☺.ionsB♠÷\◘.↨.. 00006500 00 00 00 01 00 72 61 63 74 54 06 F6 5C 4D 00 15 00 00 00 00 00 01 00 20 6F 66 74 66 06 F6 5C 09 ...☺.ractT♠÷\M.§.....☺. oftf♠÷\○ 00006520 00 14 00 00 00 00 00 01 00 74 20 74 6F 78 06 F6 5C FC FF 13 00 08 00 14 58 01 00 67 65 2C 20 8A .¶.....☺.t tox♠÷\ⁿ ‼.◘.¶X☺.ge, è 00006540 06 F6 5C 84 00 12 00 00 00 00 00 01 00 65 73 70 65 9C 06 F6 5C 08 00 11 00 00 00 00 00 01 00 65 ♠÷\ä.↕.....☺.espe£♠÷\◘.◄.....☺.e 00006560 6E 20 71 AE 06 F6 5C FC FF 0C 00 0A 00 08 58 01 00 20 61 72 65 C0 06 F6 5C FC FF 0A 00 04 00 08 n q«♠÷\ⁿ ♀.◙.◘X☺. are└♠÷\ⁿ ◙.♦.◘ 00006580 58 01 00 69 74 20 70 D2 06 F6 5C 35 00 09 00 00 00 00 00 01 00 20 20 22 20 E4 06 F6 5C 09 00 08 X☺.it p╥♠÷\5.○.....☺. " Σ♠÷\○.◘ 000065A0 00 00 00 00 00 01 00 66 69 6E 61 F6 06 F6 5C FD FF 07 00 0A 00 4E 58 01 00 66 20 74 68 08 07 F6 .....☺.fina÷♠÷\² •.◙.NX☺.f th◘•÷ 000065C0 5C 0C 00 06 00 00 00 00 00 01 00 20 20 20 20 1A 07 F6 5C FC FF 05 00 08 00 06 58 01 00 6D 61 79 \♀.♠.....☺. →•÷\ⁿ ♣.◘.♠X☺.may 000065E0 20 2C 07 F6 5C 3F 00 04 00 00 00 00 00 01 00 72 61 63 74 3E 07 F6 5C 08 00 03 00 00 00 00 00 01 ,•÷\?.♦.....☺.ract>•÷\◘.♥.....☺ 00006600 00 20 20 20 20 50 07 F6 5C 03 00 02 00 00 00 00 00 01 00 65 20 47 6D FF FF 00 00 FC FF 01 00 02 . P•÷\♥.☻.....☺.e Gm ..ⁿ ☺.☻ 00006620 00 06 58 01 00 20 6D 61 74 74 07 F6 5C FD FF 02 00 06 00 5D 59 01 00 20 20 20 20 FF FF 00 00 04 .♠X☺. matt•÷\² ☻.♠.]Y☺. ..♦ 00006640 00 01 00 00 00 00 00 01 00 20 20 00 28 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 64 69 FF .☺.....☺. .( ..☻.......☺.☺.di 00006660 FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 ..☻.......☺.☺. ..☻.......☺.☺ 00006680 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 . ..☻.......☺.☺. ..☻...... 000066A0 00 01 00 01 00 2D 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 65 73 FF FF 00 00 02 00 00 .☺.☺.- ..☻.......☺.☺.es ..☻.. 000066C0 00 00 00 00 00 01 00 01 00 72 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 22 66 FF FF 00 .....☺.☺.r ..☻.......☺.☺."f . 000066E0 00 02 00 00 00 00 00 00 00 01 00 01 00 64 62 00 00 EA 00 44 01 AC 02 02 04 62 07 86 07 98 07 AA .☻.......☺.☺.db..Ω.D☺¼☻☻♦b•å•ÿ•¬ 00006700 07 BC 07 CE 07 E0 07 F2 07 04 08 16 08 D8 00 FF FF 02 00 69 00 02 00 6A 00 02 00 6C 00 02 00 6B •╝•╬•α•≥•♦◘▬◘╪. ☻.i.☻.j.☻.l.☻.k 00006720 00 06 00 75 6C 69 6E 65 00 02 00 6E 00 02 00 72 00 02 00 6B 00 07 00 6D 61 74 72 69 78 00 02 00 .♠.uline.☻.n.☻.r.☻.k.•.matrix.☻. 00006740 6B 00 02 00 6B 00 04 00 01 00 00 00 02 00 01 00 02 00 69 00 02 00 6A 00 02 00 6E 00 08 00 65 73 k.☻.k.♦.☺...☻.☺.☻.i.☻.j.☻.n.◘.es 00006760 63 61 70 65 78 00 08 00 1F 00 01 00 01 00 1F 00 27 6D 61 74 72 69 78 20 68 61 73 20 72 6F 77 73 capex.◘.▼.☺.☺.▼.'matrix has rows 00006780 20 6E 75 6D 62 65 72 65 64 3A 20 27 2C 46 6A 02 00 6B 00 04 00 01 00 00 00 02 00 00 00 02 00 6E numbered: ',Fj☻.k.♦.☺...☻...☻.n 000067A0 00 04 00 01 00 00 00 02 00 01 00 05 00 63 76 65 63 00 02 00 69 00 05 00 78 76 65 63 00 04 00 01 .♦.☺...☻.☺.♣.cvec.☻.i.♣.xvec.♦.☺ 000067C0 00 00 00 02 00 01 00 02 00 6C 00 02 00 72 00 08 00 01 00 00 00 01 00 2D 08 00 01 00 00 00 01 00 ...☻.☺.☻.l.☻.r.◘.☺...☺.-◘.☺...☺. 000067E0 20 02 00 6B 00 02 00 6B 00 04 00 01 00 00 00 02 00 01 00 02 00 6E 00 02 00 6E 00 02 00 69 00 02 ☻.k.☻.k.♦.☺...☻.☺.☻.n.☻.n.☻.i.☻ 00006800 00 6A 00 02 00 6C 00 06 00 66 69 6C 6C 73 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 02 00 6A .j.☻.l.♠.fills.☻.r.♦.☺...☻...☻.j 00006820 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 78 06 00 74 72 75 6E 63 00 00 01 00 0C 1A 00 0D 00 .☻.r.♦.☺...☻...x♠.trunc..☺.♀→.♪. 00006840 05 00 09 00 02 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 08 00 0C 03 02 00 ♣.○.☻.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.◘.♀♥☻. 00006860 01 00 0D 00 3C 00 20 72 23 75 20 74 72 75 6E 63 20 61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ☺.♪.<. r#u trunc a 00006880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000068A0 20 20 20 72 23 31 30 7C 44 7C 61 25 75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r#10|D|a%u 000068C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 $ 000068E0 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0 00006900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 72 75 6E 63 "trunc 00006920 20 2D 20 74 72 75 6E 63 61 74 65 20 67 69 67 68 65 72 20 61 6E 64 20 6C 6F 77 65 72 20 6F 72 64 - truncate gigher and lower ord 00006940 65 72 20 64 69 67 69 74 73 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 er digits "from 'the 00006960 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 apl handbook of techniques' cop 00006980 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 22 2D 73 65 6C 65 63 74 20 70 61 72 74 69 yright 1978, ibm. "-select parti 000069A0 63 75 6C 61 72 20 64 65 63 69 6D 61 6C 20 64 69 67 69 74 20 70 6F 73 69 74 69 6F 6E 73 20 20 20 cular decimal digit positions 000069C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2D 65 78 70 6C 69 63 69 74 20 28 69 6E 70 75 74 29 "-explicit (input) 000069E0 20 64 65 63 69 6D 61 6C 20 66 72 61 63 74 69 6F 6E 73 20 77 69 6C 6C 20 62 65 20 72 65 74 75 72 decimal fractions will be retur 00006A00 6E 65 64 20 20 20 20 20 20 20 22 20 63 6F 72 72 65 63 74 6C 79 2E 20 6C 6F 77 2D 6F 72 64 65 72 ned " correctly. low-order 00006A20 20 64 69 67 69 74 73 20 6F 66 20 63 6F 6D 70 75 74 65 64 20 66 72 61 63 74 69 6F 6E 73 20 6D 61 digits of computed fractions ma 00006A40 79 20 20 20 20 20 22 20 6E 6F 74 20 62 65 20 65 78 61 63 74 20 69 6E 20 64 65 63 69 6D 61 6C 20 y " not be exact in decimal 00006A60 72 65 70 72 65 73 65 6E 74 61 74 69 6F 6E 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 representation. 00006A80 20 20 22 20 69 66 20 75 20 69 73 20 61 6E 79 20 70 6F 77 65 72 20 6F 66 20 74 65 6E 2C 20 74 68 " if u is any power of ten, th 00006AA0 65 6E 20 74 68 65 20 63 6F 72 72 65 73 70 6F 6E 64 69 6E 67 20 64 65 63 69 6D 61 6C 20 20 22 20 en the corresponding decimal " 00006AC0 70 6F 73 69 74 69 6F 6E 20 6F 66 20 61 20 69 73 20 72 65 74 75 72 6E 65 64 2E 20 20 20 20 20 20 position of a is returned. 00006AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 69 66 20 75 " if u 00006B00 20 69 73 20 61 20 75 6E 69 74 20 64 69 76 69 73 6F 72 2C 20 61 20 69 73 20 66 69 72 73 74 20 63 is a unit divisor, a is first c 00006B20 6F 6E 76 65 72 74 65 64 20 74 6F 20 74 68 65 20 6E 65 77 20 20 20 22 20 75 6E 69 74 2C 20 74 68 onverted to the new " unit, th 00006B40 65 6E 20 74 68 65 20 6E 65 77 20 75 6E 69 74 73 20 70 6C 61 63 65 20 69 73 20 72 65 74 75 72 6E en the new units place is return 00006B60 65 64 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 00 FF FF 00 00 FC FF 0B 00 0A 00 21 53 ed. ↕. ..ⁿ ♂.◙.!S 00006B80 01 00 01 00 07 00 24 00 5A 58 FC FF 05 00 02 00 21 53 01 00 20 20 20 20 00 00 5A 58 FC FF 03 00 ☺.☺.•.$.ZXⁿ ♣.☻.!S☺. ..ZXⁿ ♥. 00006BA0 0A 00 D1 52 01 00 20 20 20 20 48 00 5A 58 03 00 02 00 00 00 00 00 01 00 20 20 20 20 24 00 5A 58 ◙.╤R☺. H.ZX♥.☻.....☺. $.ZX 00006BC0 FC FF 01 00 04 00 D1 52 01 00 44 7C 61 25 6C 00 5A 58 FC FF 0A 00 0C 00 26 53 01 00 20 20 20 20 ⁿ ☺.♦.╤R☺.D|a%l.ZXⁿ ◙.♀.&S☺. 00006BE0 7E 00 5A 58 05 00 09 00 00 00 00 00 01 00 20 20 20 20 90 00 5A 58 FC FF 08 00 06 00 26 53 01 00 ~.ZX♣.○.....☺. É.ZXⁿ ◘.♠.&S☺. 00006C00 20 24 30 20 A2 00 5A 58 83 00 07 00 00 00 00 00 01 00 20 20 20 20 B4 00 5A 58 24 00 06 00 00 00 $0 ó.ZXâ.•.....☺. ┤.ZX$.♠... 00006C20 00 00 01 00 20 20 20 20 C6 00 5A 58 83 00 05 00 00 00 00 00 01 00 20 20 20 20 D8 00 5A 58 FD FF ..☺. ╞.ZXâ.♣.....☺. ╪.ZX² 00006C40 03 00 04 00 E4 55 01 00 6E 63 61 74 EA 00 5A 58 03 00 02 00 00 00 00 00 01 00 6F 77 65 72 FF FF ♥.♦.ΣU☺.ncatΩ.ZX♥.☻.....☺.ower 00006C60 00 00 FC FF 01 00 10 00 21 53 01 00 20 20 20 20 0E 01 5A 58 FD FF 02 00 06 00 E9 55 01 00 27 74 ..ⁿ ☺.►.!S☺. ♫☺ZX² ☻.♠.ΘU☺.'t 00006C80 68 65 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 6F 66 20 74 FF FF 00 00 02 00 00 00 00 00 00 00 he ..♦.☺.....☺.of t ..☻....... 00006CA0 01 00 79 72 69 67 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 22 2D 73 65 FF FF 00 00 02 00 00 00 ☺.yrig ..☻.......☺."-se ..☻... 00006CC0 00 00 00 00 01 00 72 20 64 65 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 73 69 74 69 FF FF 00 00 ....☺.r de ..☻.......☺.siti .. 00006CE0 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 69 6E 70 75 ☻.......☺. ..☻.......☺.inpu 00006D00 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 63 74 69 6F FF FF 00 00 02 00 00 00 00 00 00 00 01 00 ..☻.......☺.ctio ..☻.......☺. 00006D20 75 72 6E 65 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 60 00 20 20 FF FF 00 00 02 00 00 00 00 00 urne ..☻.......☺.`. ..☻..... 00006D40 00 00 01 00 20 20 20 20 00 00 5A 00 FC 00 20 01 32 01 44 01 56 01 68 01 7A 01 8C 01 9E 01 B0 01 ..☺. ..Z.ⁿ. ☺2☺D☺V☺h☺z☺î☺₧☺░☺ 00006D60 C2 01 48 00 FF FF 02 00 61 00 06 00 74 72 75 6E 63 00 02 00 75 00 02 00 72 00 02 00 75 00 02 00 ┬☺H. ☻.a.♠.trunc.☻.u.☻.r.☻.u.☻. 00006D80 61 00 04 00 01 00 00 00 02 00 0A 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 78 07 00 75 73 63 a.♦.☺...☻.◙.☻.r.♦.☺...☻...x•.usc 00006DA0 6F 72 65 00 00 01 00 0A 18 00 05 00 04 00 10 00 02 00 01 00 01 00 08 00 2C 01 02 00 01 00 05 00 ore..☺.◙↑.♣.♦.►.☻.☺.☺.◘.,☺☻.☺.♣. 00006DC0 3C 00 20 72 23 75 73 63 6F 72 65 20 6B 76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 <. r#uscore kv 00006DE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 r 00006E00 23 6B 76 2C 5B 4C 69 6F 5F 30 2E 35 5D 28 6B 76 5E 3D 27 20 27 29 5C 27 2D 27 20 20 20 20 20 20 #kv,[Lio_0.5](kv^=' ')\'-' 00006E20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 $0 00006E40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00006E60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 75 73 63 6F 72 65 20 20 20 "uscore 00006E80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00006EA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C "from 'the apl 00006EC0 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 handbook of techniques' copyrig 00006EE0 68 74 20 31 39 37 38 2C 20 69 62 6D 2E 20 12 00 FF FF 00 00 FC FF 0A 00 10 00 06 56 01 00 20 20 ht 1978, ibm. ↕. ..ⁿ ◙.►.♠V☺. 00006F00 20 20 24 00 F0 5A FC FF 03 00 02 00 6F 56 01 00 61 73 20 72 36 00 F0 5A 03 00 02 00 00 00 00 00 $.≡Zⁿ ♥.☻.oV☺.as r6.≡Z♥.☻..... 00006F20 01 00 27 27 2C 46 00 00 F0 5A FC FF 01 00 0A 00 06 56 01 00 6A 23 49 69 5A 00 F0 5A 07 00 19 00 ☺.'',F..≡Zⁿ ☺.◙.♠V☺.j#IiZ.≡Z•.↓. 00006F40 02 00 04 58 01 00 28 6C 23 28 6C 00 F0 5A 3C 00 18 00 00 00 00 00 01 00 31 2B 6E 29 7E 00 F0 5A ☻.♦X☺.(l#(l.≡Z<.↑.....☺.1+n)~.≡Z 00006F60 09 00 17 00 00 00 00 00 01 00 20 20 20 20 90 00 F0 5A 07 00 14 00 10 00 F7 57 01 00 20 20 20 20 ○.↨.....☺. É.≡Z•.¶.►.≈W☺. 00006F80 A2 00 F0 5A 3E 00 12 00 00 00 00 00 01 00 66 69 6C 6C B4 00 F0 5A FC FF 10 00 04 00 92 57 01 00 ó.≡Z>.↕.....☺.fill┤.≡Zⁿ ►.♦.ÆW☺. 00006FA0 53 2F 6E 29 C6 00 F0 5A 08 00 0F 00 00 00 00 00 01 00 60 2F 6B 5E D8 00 F0 5A 3D 00 0E 00 00 00 S/n)╞.≡Z◘.☼.....☺.`/k^╪.≡Z=.♫... 00006FC0 00 00 01 00 20 20 20 20 EA 00 F0 5A FD FF 0B 00 06 00 F2 57 01 00 20 20 20 20 FC 00 F0 5A 3F 00 ..☺. Ω.≡Z² ♂.♠.≥W☺. ⁿ.≡Z?. 00006FE0 0A 00 00 00 00 00 01 00 20 20 20 20 0E 01 F0 5A ED FF 07 00 00 00 00 00 01 00 20 20 20 20 20 01 ◙.....☺. ♫☺≡Zφ •.....☺. ☺ 00007000 F0 5A 3B 00 06 00 00 00 00 00 01 00 65 72 6C 69 32 01 F0 5A 0C 00 05 00 00 00 00 00 01 00 6F 77 ≡Z;.♠.....☺.erli2☺≡Z♀.♣.....☺.ow 00007020 73 20 44 01 F0 5A FC FF 03 00 0C 00 6F 56 01 00 61 74 72 69 56 01 F0 5A 03 00 02 00 00 00 00 00 s D☺≡Zⁿ ♥.♀.oV☺.atriV☺≡Z♥.☻..... 00007040 01 00 6F 6D 20 27 FF FF 00 00 FC FF 01 00 10 00 11 56 01 00 6F 6B 20 6F 7A 01 F0 5A FD FF 02 00 ☺.om ' ..ⁿ ☺.►.◄V☺.ok oz☺≡Z² ☻. 00007060 06 00 0D 58 01 00 63 6F 70 79 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 6D 2E 20 20 FF FF 00 00 ♠.♪X☺.copy ..♦.☺.....☺.m. .. 00007080 02 00 00 00 00 00 00 00 01 00 20 65 78 70 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 69 74 68 20 ☻.......☺. exp ..☻.......☺.ith 000070A0 00 00 48 00 68 01 8C 01 9E 01 36 00 FF FF 03 00 6B 76 00 07 00 75 73 63 6F 72 65 00 02 00 72 00 ..H.h☺î☺₧☺6. ♥.kv.•.uscore.☻.r. 000070C0 08 00 01 00 00 00 01 00 2D 08 00 01 00 00 00 01 00 20 03 00 6B 76 00 02 00 01 00 00 00 08 00 00 ◘.☺...☺.-◘.☺...☺. ♥.kv.☻.☺...◘.. 000070E0 00 00 00 00 00 E0 3F 03 00 6B 76 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 78 07 00 75 6E 73 .....α?♥.kv.☻.r.♦.☺...☻...x•.uns 00007100 63 61 6E 00 00 01 00 0A 12 00 06 00 04 00 09 00 01 00 02 00 01 00 01 00 08 00 68 01 02 00 01 00 can..☺.◙↕.♠.♦.○.☺.☻.☺.☺.◘.h☺☻.☺. 00007120 06 00 3C 00 20 72 23 75 6E 73 63 61 6E 20 76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ♠.<. r#unscan v 00007140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00007160 20 72 23 76 5B 4C 69 6F 5D 2C 64 69 66 66 20 76 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 r#v[Lio],diff v 00007180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 76 23 " v# 000071A0 24 2B 5C 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $+\r 000071C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 $0 000071E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00007200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 75 6E 73 63 61 6E 20 20 20 20 20 "unscan 00007220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00007240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 "from 'the apl h 00007260 61 6E 64 62 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 andbook of techniques' copyright 00007280 20 31 39 37 38 2C 20 69 62 6D 2E 20 12 00 FF FF 00 00 FC FF 0A 00 08 00 CB 55 01 00 01 00 05 00 1978, ibm. ↕. ..ⁿ ◙.◘.╦U☺.☺.♣. 000072A0 24 00 8B 59 FC FF 03 00 02 00 0C 56 01 00 20 20 20 20 36 00 8B 59 03 00 02 00 00 00 00 00 01 00 $.ïYⁿ ♥.☻.♀V☺. 6.ïY♥.☻.....☺. 000072C0 20 20 20 20 00 00 8B 59 FC FF 01 00 04 00 C3 54 01 00 20 20 20 20 5A 00 8B 59 FC FF 0F 00 0E 00 ..ïYⁿ ☺.♦.├T☺. Z.ïYⁿ ☼.♫. 000072E0 91 57 01 00 69 6F 5D 2C 6C 00 8B 59 FC FF 0A 00 02 00 67 56 01 00 20 20 20 20 7E 00 8B 59 0C 00 æW☺.io],l.ïYⁿ ◙.☻.gV☺. ~.ïY♀. 00007300 09 00 00 00 00 00 01 00 20 20 20 20 90 00 8B 59 3D 00 08 00 00 00 00 00 01 00 22 20 76 23 A2 00 ○.....☺. É.ïY=.◘.....☺." v#ó. 00007320 8B 59 ED FF 05 00 00 00 00 00 01 00 20 20 20 20 B4 00 8B 59 3B 00 04 00 00 00 00 00 01 00 20 20 ïYφ ♣.....☺. ┤.ïY;.♦.....☺. 00007340 20 20 C6 00 8B 59 FC FF 03 00 0C 00 66 56 01 00 20 20 20 20 D8 00 8B 59 03 00 02 00 00 00 00 00 ╞.ïYⁿ ♥.♀.fV☺. ╪.ïY♥.☻..... 00007360 01 00 20 20 20 20 FF FF 00 00 FC FF 01 00 0C 00 0C 56 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 ☺. ..ⁿ ☺.♀.♀V☺. ..☻... 00007380 00 00 00 00 01 00 20 20 20 20 0E 01 8B 59 FD FF 02 00 02 00 A6 57 01 00 6E 20 20 20 FF FF 00 00 ....☺. ♫☺ïY² ☻.☻.ªW☺.n .. 000073A0 04 00 01 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 ♦.☺.....☺. ..☻.......☺. 000073C0 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 00 00 02 00 00 00 48 00 EA 00 FC 00 20 01 32 01 36 00 ..☻.......☺...☻...H.Ω.ⁿ. ☺2☺6. 000073E0 FF FF 02 00 76 00 07 00 75 6E 73 63 61 6E 00 02 00 72 00 02 00 76 00 05 00 64 69 66 66 00 02 00 ☻.v.•.unscan.☻.r.☻.v.♣.diff.☻. 00007400 76 00 02 00 72 00 04 00 01 00 00 00 02 00 00 00 78 05 00 75 6E 69 71 00 00 01 00 01 0E 00 05 00 v.☻.r.♦.☺...☻...x♣.uniq..☺.☺♫.♣. 00007420 01 00 09 00 02 00 01 00 01 00 08 00 2C 01 02 00 01 00 05 00 3C 00 20 75 6E 69 71 20 20 20 20 20 ☺.○.☻.☺.☺.◘.,☺☻.☺.♣.<. uniq 00007440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00007460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 23 64 72 65 70 20 61 20 48 20 62 23 a#drep a H b# 00007480 64 72 65 70 20 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 drep b 000074A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 000074C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000074E0 20 20 20 20 20 20 20 20 20 20 22 75 6E 69 71 20 75 73 65 64 20 69 6E 20 65 2E 67 2E 20 63 6F 6D "uniq used in e.g. com 00007500 62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 b 00007520 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 "from 'the apl handbook of 00007540 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D techniques' copyright 1978, ibm 00007560 2E 20 00 00 FF FF 00 00 FC FF 01 00 0E 00 43 53 01 00 20 20 20 20 24 00 79 59 FC FF 13 00 0E 00 . .. ..ⁿ ☺.♫.CS☺. $.yYⁿ ‼.♫. 00007580 F3 55 01 00 20 20 20 20 36 00 79 59 FC FF 0E 00 06 00 F3 55 01 00 20 20 20 20 48 00 79 59 03 00 ≤U☺. 6.yYⁿ ♫.♠.≤U☺. H.yY♥. 000075A0 0D 00 00 00 00 00 01 00 20 20 20 20 5A 00 79 59 FC FF 0C 00 06 00 CF 55 01 00 75 73 65 64 6C 00 ♪.....☺. Z.yYⁿ ♀.♠.╧U☺.usedl. 000075C0 79 59 FC FF 0A 00 10 00 CE 55 01 00 20 20 20 20 7E 00 79 59 FC FF 08 00 0C 00 44 53 01 00 20 20 yYⁿ ◙.►.╬U☺. ~.yYⁿ ◘.♀.DS☺. 000075E0 20 20 90 00 79 59 FC FF 03 00 08 00 CE 55 01 00 00 20 04 00 A2 00 79 59 03 00 02 00 00 00 00 00 É.yYⁿ ♥.◘.╬U☺.. ♦.ó.yY♥.☻..... 00007600 01 00 73 20 74 68 FF FF 00 00 FC FF 01 00 06 00 44 53 01 00 20 20 20 20 C6 00 79 59 FD FF 02 00 ☺.s th ..ⁿ ☺.♠.DS☺. ╞.yY² ☻. 00007620 0E 00 67 56 01 00 65 64 20 74 FF FF 00 00 04 00 01 00 00 00 00 00 01 00 00 00 8B 59 FF FF 00 00 ♫.gV☺.ed t ..♦.☺.....☺...ïY .. 00007640 02 00 00 00 00 00 00 00 01 00 06 00 89 59 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 0E 00 9B 59 ☻.......☺.♠.ëY ..☻.......☺.♫.¢Y 00007660 00 00 12 00 B4 00 D8 00 EA 00 FF FF FF FF 05 00 75 6E 69 71 00 02 00 62 00 05 00 64 72 65 70 00 ..↕.┤.╪.Ω. ♣.uniq.☻.b.♣.drep. 00007680 02 00 62 00 02 00 48 00 02 00 61 00 05 00 64 72 65 70 00 02 00 61 00 04 00 01 00 00 00 02 00 00 ☻.b.☻.H.☻.a.♣.drep.☻.a.♦.☺...☻.. 000076A0 00 78 04 00 74 6C 75 00 00 01 00 0C 7C 00 1C 00 0B 00 09 00 10 00 16 00 1E 00 06 00 08 00 01 00 .x♦.tlu..☺.♀|.∟.♂.○.►.▬.▲.♠.◘.☺. 000076C0 02 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 ☻.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺.☺. 000076E0 01 00 01 00 01 00 01 00 08 00 90 06 02 00 01 00 1C 00 3C 00 20 7A 23 74 61 62 6C 65 20 74 6C 75 ☺.☺.☺.☺.◘.É♠☻.☺.∟.<. z#table tlu 00007700 20 61 72 67 73 3B 77 3B 72 3B 6C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 args;w;r;l 00007720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 61 72 67 73 20 61 6E 64 20 74 61 62 6C 65 'args and table 00007740 20 64 69 73 61 67 72 65 65 27 68 61 6E 67 7E 74 61 62 6C 65 20 69 73 20 61 72 67 73 23 6D 61 74 disagree'hang~table is args#mat 00007760 72 69 78 20 61 72 67 73 20 20 20 20 20 74 61 62 6C 65 23 28 66 69 72 73 74 6D 20 74 61 62 6C 65 rix args table#(firstm table 00007780 5B 3B 49 2D 31 59 52 61 72 67 73 5D 29 60 2F 74 61 62 6C 65 20 20 20 20 20 20 20 20 20 20 20 20 [;I-1YRargs])`/table 000077A0 20 20 20 20 20 20 20 20 20 6C 23 56 2F 72 23 61 72 67 73 26 2E 3D 54 74 61 62 6C 65 5B 3B 49 77 l#V/r#args&.=Ttable[;Iw 000077C0 23 2D 31 59 52 61 72 67 73 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 #-1YRargs] 000077E0 20 20 20 20 20 7A 23 6C 60 5C 28 30 2C 77 29 55 74 61 62 6C 65 5B 28 2C 72 29 2F 2C 28 52 72 29 z#l`\(0,w)Utable[(,r)/,(Rr) 00007800 52 49 2D 31 59 52 72 3B 5D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 RI-1YRr;] 00007820 20 24 30 20 69 66 26 2F 6C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 $0 if&/l 00007840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 6E 6F 'no 00007860 74 20 66 6F 75 6E 64 3A 27 6F 6E 28 7E 6C 29 60 2F 61 72 67 73 20 20 20 20 20 20 20 20 20 20 20 t found:'on(~l)`/args 00007880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 27 20 20 20 20 20 '' 000078A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 000078C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 $0 000078E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00007900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 74 6C 75 20 2D 20 74 61 62 6C 65 20 6C 6F 6F "tlu - table loo 00007920 6B 2D 75 70 20 6F 66 20 73 74 72 75 63 74 75 72 65 64 20 61 72 67 75 6D 65 6E 74 73 20 20 20 20 k-up of structured arguments 00007940 20 20 20 20 20 20 20 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 "from 'the apl handb 00007960 6F 6F 6B 20 6F 66 20 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 ook of techniques' copyright 197 00007980 38 2C 20 69 62 6D 2E 20 22 2D 72 65 74 75 72 6E 73 20 61 20 6D 61 74 72 69 78 20 6F 66 20 73 75 8, ibm. "-returns a matrix of su 000079A0 62 73 74 69 74 75 74 69 6F 6E 73 20 63 6F 72 72 65 73 70 6F 6E 64 69 6E 67 20 74 6F 20 61 20 20 bstitutions corresponding to a 000079C0 20 20 20 20 22 20 6D 61 74 72 69 78 20 6F 66 20 61 72 67 75 6D 65 6E 74 73 2E 20 74 68 65 20 73 " matrix of arguments. the s 000079E0 75 62 73 74 69 74 75 74 69 6F 6E 73 20 61 72 65 20 66 6F 75 6E 64 20 69 6E 20 61 20 20 20 20 20 ubstitutions are found in a 00007A00 22 20 74 61 62 6C 65 20 77 68 6F 73 65 20 69 6E 69 74 69 61 6C 20 63 6F 6C 75 6D 6E 73 20 77 69 " table whose initial columns wi 00007A20 6C 6C 20 62 65 20 6D 61 74 63 68 65 64 20 61 67 61 69 6E 73 74 20 61 6E 79 20 20 20 22 20 6E 75 ll be matched against any " nu 00007A40 6D 62 65 72 20 6F 66 20 61 72 67 75 6D 65 6E 74 73 2C 20 69 6E 20 61 6E 79 20 6F 72 64 65 72 2E mber of arguments, in any order. 00007A60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2D 74 68 65 20 61 72 "-the ar 00007A80 67 75 6D 65 6E 74 73 20 61 72 65 20 75 73 75 61 6C 6C 79 20 70 72 65 73 65 6E 74 65 64 20 61 73 guments are usually presented as 00007AA0 20 61 20 6D 61 74 72 69 78 2C 20 62 75 74 20 61 20 20 20 20 22 20 73 69 6E 67 6C 65 20 61 72 67 a matrix, but a " single arg 00007AC0 75 6D 65 6E 74 20 6D 61 79 20 62 65 20 76 65 63 74 6F 72 20 6F 72 20 73 63 61 6C 61 72 2E 20 20 ument may be vector or scalar. 00007AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2D 75 6E 64 69 73 63 6F 76 65 72 65 64 20 66 "-undiscovered f 00007B00 75 6E 63 74 69 6F 6E 73 20 77 69 6C 6C 20 62 65 20 72 65 74 75 72 6E 65 64 20 61 73 20 62 6C 61 unctions will be returned as bla 00007B20 6E 6B 73 20 28 6F 72 20 20 20 20 20 22 20 7A 65 72 6F 73 29 2E 20 20 20 20 20 20 20 20 20 20 20 nks (or " zeros). 00007B40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00007B60 20 20 20 20 20 20 20 20 22 2D 74 68 65 20 75 6E 6D 61 74 63 68 65 64 20 61 72 67 75 6D 65 6E 74 "-the unmatched argument 00007B80 73 20 77 69 6C 6C 20 62 65 20 72 65 70 6F 72 74 65 64 20 61 74 20 74 68 65 20 74 65 72 6D 69 6E s will be reported at the termin 00007BA0 61 6C 2E 20 22 2D 69 66 20 74 68 65 20 61 72 67 75 6D 65 6E 74 20 70 6F 72 74 69 6F 6E 20 6F 66 al. "-if the argument portion of 00007BC0 20 74 68 65 20 74 61 62 6C 65 20 69 73 20 6E 6F 74 20 75 6E 69 71 75 65 2C 20 74 68 65 20 20 20 the table is not unique, the 00007BE0 22 20 66 75 6E 63 74 69 6F 6E 20 6F 66 20 74 68 65 20 66 69 72 73 74 20 6F 63 63 75 72 72 65 6E " function of the first occurren 00007C00 63 65 20 6F 66 20 74 68 65 20 61 72 67 75 6D 65 6E 74 20 69 6E 20 74 68 65 20 20 20 22 20 74 61 ce of the argument in the " ta 00007C20 62 6C 65 20 77 69 6C 6C 20 62 65 20 72 65 74 75 72 6E 65 64 2E 20 20 20 20 20 20 20 20 20 20 20 ble will be returned. 00007C40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2D 75 73 65 73 3A 20 "-uses: 00007C60 47 68 61 6E 67 2C 20 77 68 69 63 68 20 70 72 65 73 65 72 76 65 64 20 74 68 65 20 73 74 61 63 6B Ghang, which preserved the stack 00007C80 20 66 6F 72 20 61 6E 61 6C 79 73 69 73 2E 20 20 20 20 20 20 22 20 20 20 20 20 20 20 47 66 69 72 for analysis. " Gfir 00007CA0 73 74 6D 20 74 6F 20 72 65 6D 6F 76 65 20 64 75 70 6C 69 63 61 74 65 73 20 66 72 6F 6D 20 74 61 stm to remove duplicates from ta 00007CC0 62 6C 65 2E 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 20 20 20 20 20 47 69 73 20 74 6F 20 63 ble. " Gis to c 00007CE0 68 65 63 6B 20 77 68 65 74 68 65 72 20 74 61 62 6C 65 20 61 6E 64 20 61 72 67 75 6D 65 6E 74 20 heck whether table and argument 00007D00 61 72 65 20 65 69 74 68 65 72 20 20 22 20 20 20 20 20 20 20 20 20 20 20 62 6F 74 68 20 6E 75 6D are either " both num 00007D20 65 72 69 63 2C 20 6F 72 20 62 6F 74 68 20 63 68 61 72 61 63 74 65 72 2E 20 20 20 20 20 20 20 20 eric, or both character. 00007D40 20 20 20 20 20 20 20 20 22 20 20 20 20 20 20 20 47 6D 61 74 72 69 78 20 20 47 69 66 20 20 47 6F " Gmatrix Gif Go 00007D60 6E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 n 00007D80 20 20 20 20 7E 00 FF FF 00 00 FC FF 16 00 08 00 ED 52 01 00 9C 01 C3 5E 24 00 A1 5B 1B 00 15 00 ~. ..ⁿ ▬.◘.φR☺.£☺├^$.í[←.§. 00007DA0 00 00 00 00 01 00 C3 5E A2 04 00 00 A1 5B FC FF 14 00 02 00 ED 52 01 00 A5 5B 14 00 48 00 A1 5B ....☺.├^ó♦..í[ⁿ ¶.☻.φR☺.Ñ[¶.H.í[ 00007DC0 1B 00 13 00 00 00 00 00 01 00 0A 00 87 5C 24 00 A1 5B FC FF 12 00 10 00 EA 52 01 00 01 00 01 00 ←.‼.....☺.◙.ç\$.í[ⁿ ↕.►.ΩR☺.☺.☺. 00007DE0 6C 00 A1 5B 1B 00 11 00 00 00 00 00 01 00 0A 00 87 5C 48 00 A1 5B FC FF 0D 00 0A 00 EC 52 01 00 l.í[←.◄.....☺.◙.ç\H.í[ⁿ ♪.◙.∞R☺. 00007E00 72 61 63 00 90 00 A1 5B FC FF 09 00 0A 00 97 52 01 00 06 00 0E 00 6C 00 A1 5B FC FF 03 00 0E 00 rac.É.í[ⁿ ○.◙.ùR☺.♠.♫.l.í[ⁿ ♥.♫. 00007E20 E3 52 01 00 00 20 0A 00 B4 00 A1 5B 03 00 02 00 00 00 00 00 01 00 01 00 0D 00 90 00 A1 5B FC FF πR☺.. ◙.┤.í[♥.☻.....☺.☺.♪.É.í[ⁿ 00007E40 01 00 04 00 97 52 01 00 4C 69 6F 20 D8 00 A1 5B FC FF 34 00 02 00 1A 53 01 00 20 20 20 20 EA 00 ☺.♦.ùR☺.Lio ╪.í[ⁿ 4.☻.→S☺. Ω. 00007E60 A1 5B FC FF 2D 00 08 00 19 53 01 00 20 20 20 20 FC 00 A1 5B 03 00 2C 00 00 00 00 00 01 00 20 73 í[ⁿ -.◘.↓S☺. ⁿ.í[♥.,.....☺. s 00007E80 69 6E 0E 01 A1 5B FC FF 28 00 10 00 0B 53 01 00 74 6F 20 62 20 01 A1 5B FC FF 25 00 08 00 F9 52 in♫☺í[ⁿ (.►.♂S☺.to b ☺í[ⁿ %.◘.∙R 00007EA0 01 00 64 69 6E 67 32 01 A1 5B FC FF 1F 00 0C 00 EF 52 01 00 22 20 6F 66 44 01 A1 5B 84 00 1E 00 ☺.ding2☺í[ⁿ ▼.♀.∩R☺." ofD☺í[ä.▲. 00007EC0 00 00 00 00 01 00 20 20 20 20 56 01 A1 5B FC FF 1A 00 04 00 EF 52 01 00 20 20 20 20 FF FF 00 00 ....☺. V☺í[ⁿ →.♦.∩R☺. .. 00007EE0 07 00 01 00 06 00 1E 53 01 00 20 20 20 20 7A 01 A1 5B FC FF 23 00 06 00 0C 54 01 00 27 48 20 4C •.☺.♠.▲S☺. z☺í[ⁿ #.♠.♀T☺.'H L 00007F00 8C 01 A1 5B 40 00 21 00 00 00 00 00 01 00 20 20 20 20 9E 01 A1 5B 09 00 20 00 00 00 00 00 01 00 î☺í[@.!.....☺. ₧☺í[○. .....☺. 00007F20 20 20 20 20 B0 01 A1 5B 3D 00 1F 00 00 00 00 00 01 00 73 69 6E 2C C2 01 A1 5B FC FF 1B 00 0E 00 ░☺í[=.▼.....☺.sin,┬☺í[ⁿ ←.♫. 00007F40 0B 54 01 00 20 20 20 20 D4 01 A1 5B 32 00 1A 00 00 00 00 00 01 00 20 20 20 20 E6 01 A1 5B 39 00 ♂T☺. ╘☺í[2.→.....☺. µ☺í[9. 00007F60 19 00 00 00 00 00 01 00 20 72 23 28 F8 01 A1 5B FD FF 17 00 02 00 CD 55 01 00 20 20 20 20 0A 02 ↓.....☺. r#(°☺í[² ↨.☻.═U☺. ◙☻ 00007F80 A1 5B 29 00 16 00 00 00 00 00 01 00 20 20 20 20 1C 02 A1 5B 1B 00 15 00 00 00 00 00 01 00 20 20 í[).▬.....☺. ∟☻í[←.§.....☺. 00007FA0 20 20 2E 02 A1 5B 3B 00 14 00 00 00 00 00 01 00 20 20 20 20 40 02 A1 5B FC FF 0F 00 0E 00 22 53 .☻í[;.¶.....☺. @☻í[ⁿ ☼.♫."S 00007FC0 01 00 20 20 20 20 52 02 A1 5B FC FF 08 00 0C 00 4E 53 01 00 20 20 20 20 64 02 A1 5B 08 00 07 00 ☺. R☻í[ⁿ ◘.♀.NS☺. d☻í[◘.•. 00007FE0 00 00 00 00 01 00 2D 20 62 75 76 02 A1 5B 03 00 06 00 00 00 00 00 01 00 61 72 72 61 FF FF 00 00 ....☺.- buv☻í[♥.♠.....☺.arra .. 00008000 FC FF 01 00 06 00 22 53 01 00 61 74 74 65 9A 02 A1 5B 3D 00 21 00 00 00 00 00 01 00 22 66 72 6F ⁿ ☺.♠."S☺.atteÜ☻í[=.!.....☺."fro 00008020 AC 02 A1 5B FC FF 1D 00 08 00 D1 55 01 00 64 62 6F 6F BE 02 A1 5B 32 00 1C 00 00 00 00 00 01 00 ¼☻í[ⁿ ↔.◘.╤U☺.dboo╛☻í[2.∟.....☺. 00008040 73 27 20 63 D0 02 A1 5B 39 00 1B 00 00 00 00 00 01 00 20 69 62 6D E2 02 A1 5B FD FF 19 00 0C 00 s' c╨☻í[9.←.....☺. ibmΓ☻í[² ↓.♀. 00008060 F6 55 01 00 72 20 6F 74 F4 02 A1 5B 03 00 18 00 00 00 00 00 01 00 20 63 61 6E 06 03 A1 5B FC FF ÷U☺.r ot⌠☻í[♥.↑.....☺. can♠♥í[ⁿ 00008080 17 00 02 00 D1 55 01 00 66 72 6F 6D 18 03 A1 5B 29 00 16 00 00 00 00 00 01 00 63 61 6C 20 2A 03 ↨.☻.╤U☺.from↑♥í[).▬.....☺.cal *♥ 000080A0 A1 5B 1B 00 15 00 00 00 00 00 01 00 75 63 74 75 3C 03 A1 5B 3B 00 14 00 00 00 00 00 01 00 62 65 í[←.§.....☺.uctu<♥í[;.¶.....☺.be 000080C0 20 6F 4E 03 A1 5B FC FF 0F 00 0A 00 C3 54 01 00 22 20 47 66 60 03 A1 5B 34 00 0E 00 00 00 00 00 oN♥í[ⁿ ☼.◙.├T☺." Gf`♥í[4.♫..... 000080E0 01 00 20 20 20 20 72 03 A1 5B 1D 00 0D 00 00 00 00 00 01 00 20 20 20 20 84 03 A1 5B 0E 00 0C 00 ☺. r♥í[↔.♪.....☺. ä♥í[♫.♀. 00008100 00 00 00 00 01 00 20 20 20 20 96 03 A1 5B 06 00 0B 00 00 00 00 00 01 00 73 69 6E 20 A8 03 A1 5B ....☺. û♥í[♠.♂.....☺.sin ¿♥í[ 00008120 FC FF 07 00 06 00 C0 54 01 00 20 20 20 20 BA 03 A1 5B 03 00 06 00 00 00 00 00 01 00 20 20 20 20 ⁿ •.♠.└T☺. ║♥í[♥.♠.....☺. 00008140 CC 03 A1 5B FC FF 05 00 10 00 BF 54 01 00 50 03 ED FF DE 03 A1 5B 0F 00 04 00 00 00 00 00 01 00 ╠♥í[ⁿ ♣.►.┐T☺.P♥φ ▐♥í[☼.♦.....☺. 00008160 DD 5B 1B 00 F0 03 A1 5B 36 00 03 00 00 00 00 00 01 00 DD 5B FC FF 02 04 A1 5B 03 00 02 00 00 00 ▌[←.≡♥í[6.♥.....☺.▌[ⁿ ☻♦í[♥.☻... 00008180 00 00 01 00 DD 5B FC FF FF FF 00 00 FC FF 01 00 08 00 9F 54 01 00 DD 5B FC FF 26 04 A1 5B 3D 00 ..☺.▌[ⁿ ..ⁿ ☺.◘.ƒT☺.▌[ⁿ &♦í[=. 000081A0 24 00 00 00 00 00 01 00 DD 5B 03 00 38 04 A1 5B 1B 00 23 00 00 00 00 00 01 00 DD 5B FC FF 4A 04 $.....☺.▌[♥.8♦í[←.#.....☺.▌[ⁿ J♦ 000081C0 A1 5B FC FF 22 00 04 00 71 56 01 00 00 00 02 00 5C 04 A1 5B 32 00 21 00 00 00 00 00 01 00 00 00 í[ⁿ ".♦.qV☺...☻.\♦í[2.!.....☺... 000081E0 02 00 6E 04 A1 5B 39 00 20 00 00 00 00 00 01 00 DD 5B FD FF 80 04 A1 5B FD FF 1E 00 10 00 71 56 ☻.n♦í[9. .....☺.▌[² Ç♦í[² ▲.►.qV 00008200 01 00 DD 5B 03 00 92 04 A1 5B 29 00 1D 00 00 00 00 00 01 00 DD 5B ED FF A4 04 A1 5B 32 00 1C 00 ☺.▌[♥.Æ♦í[).↔.....☺.▌[φ ñ♦í[2.∟. 00008220 00 00 00 00 01 00 DD 5B FC FF B6 04 A1 5B 09 00 1B 00 00 00 00 00 01 00 DD 5B 07 00 C8 04 A1 5B ....☺.▌[ⁿ ╢♦í[○.←.....☺.▌[•.╚♦í[ 00008240 FC FF 1A 00 06 00 12 56 01 00 DD 5B 32 00 DA 04 A1 5B 32 00 19 00 00 00 00 00 01 00 DD 5B 09 00 ⁿ →.♠.↕V☺.▌[2.┌♦í[2.↓.....☺.▌[○. 00008260 EC 04 A1 5B 08 00 18 00 00 00 00 00 01 00 DD 5B FC FF FE 04 A1 5B 0C 00 17 00 00 00 00 00 01 00 ∞♦í[◘.↑.....☺.▌[ⁿ ■♦í[♀.↨.....☺. 00008280 DD 5B 32 00 10 05 A1 5B 0F 00 16 00 00 00 00 00 01 00 DD 5B 0F 00 22 05 A1 5B 09 00 15 00 00 00 ▌[2.►♣í[☼.▬.....☺.▌[☼."♣í[○.§... 000082A0 00 00 01 00 DD 5B 38 00 34 05 A1 5B FC FF 14 00 0E 00 07 56 01 00 DD 5B 08 00 46 05 A1 5B 0C 00 ..☺.▌[8.4♣í[ⁿ ¶.♫.•V☺.▌[◘.F♣í[♀. 000082C0 13 00 00 00 00 00 01 00 DD 5B 03 00 58 05 A1 5B 08 00 12 00 00 00 00 00 01 00 00 00 FC FF 6A 05 ‼.....☺.▌[♥.X♣í[◘.↕.....☺...ⁿ j♣ 000082E0 A1 5B 3B 00 11 00 00 00 00 00 01 00 DD 5B FC FF 7C 05 A1 5B FC FF 0C 00 06 00 07 56 01 00 DD 5B í[;.◄.....☺.▌[ⁿ |♣í[ⁿ ♀.♠.•V☺.▌[ 00008300 03 00 8E 05 A1 5B 35 00 0B 00 00 00 00 00 01 00 DD 5B 3D 00 A0 05 A1 5B 09 00 0A 00 00 00 00 00 ♥.Ä♣í[5.♂.....☺.▌[=.á♣í[○.◙..... 00008320 01 00 DD 5B FC FF B2 05 A1 5B FC FF 09 00 02 00 F6 55 01 00 DD 5B 0C 00 C4 05 A1 5B 0C 00 08 00 ☺.▌[ⁿ ▓♣í[ⁿ ○.☻.÷U☺.▌[♀.─♣í[♀.◘. 00008340 00 00 00 00 01 00 DD 5B FC FF D6 05 A1 5B FD FF 07 00 04 00 08 56 01 00 DD 5B 3B 00 E8 05 A1 5B ....☺.▌[ⁿ ╓♣í[² •.♦.◘V☺.▌[;.Φ♣í[ 00008360 08 00 06 00 00 00 00 00 01 00 00 00 FC FF FA 05 A1 5B 4D 00 04 00 00 00 00 00 01 00 DD 5B FC FF ◘.♠.....☺...ⁿ ·♣í[M.♦.....☺.▌[ⁿ 00008380 0C 06 A1 5B FC FF 03 00 0C 00 F5 55 01 00 DD 5B 32 00 1E 06 A1 5B 03 00 02 00 00 00 00 00 01 00 ♀♠í[ⁿ ♥.♀.⌡U☺.▌[2.▲♠í[♥.☻.....☺. 000083A0 DD 5B 09 00 FF FF 00 00 FC FF 01 00 0E 00 EE 55 01 00 DD 5B FC FF 42 06 A1 5B FC FF 08 00 0A 00 ▌[○. ..ⁿ ☺.♫.εU☺.▌[ⁿ B♠í[ⁿ ◘.◙. 000083C0 74 56 01 00 DD 5B 32 00 54 06 A1 5B 0F 00 07 00 00 00 00 00 01 00 DD 5B 08 00 66 06 A1 5B 06 00 tV☺.▌[2.T♠í[☼.•.....☺.▌[◘.f♠í[♠. 000083E0 06 00 00 00 00 00 01 00 DD 5B 03 00 78 06 A1 5B FC FF 04 00 0A 00 71 56 01 00 00 00 FC FF 8A 06 ♠.....☺.▌[♥.x♠í[ⁿ ♦.◙.qV☺...ⁿ è♠ 00008400 A1 5B FD FF 02 00 04 00 94 57 01 00 DD 5B FD FF FF FF 00 00 04 00 01 00 00 00 00 00 01 00 00 00 í[² ☻.♦.öW☺.▌[² ..♦.☺.....☺... 00008420 04 00 AE 06 A1 5B FC FF 15 00 08 00 93 57 01 00 00 00 02 00 C0 06 A1 5B 40 00 13 00 00 00 00 00 ♦.«♠í[ⁿ §.◘.ôW☺...☻.└♠í[@.‼..... 00008440 01 00 00 00 02 00 D2 06 A1 5B 09 00 12 00 00 00 00 00 01 00 00 00 02 00 E4 06 A1 5B FC FF 11 00 ☺...☻.╥♠í[○.↕.....☺...☻.Σ♠í[ⁿ ◄. 00008460 02 00 93 57 01 00 00 00 02 00 F6 06 A1 5B 84 00 10 00 00 00 00 00 01 00 00 00 02 00 08 07 A1 5B ☻.ôW☺...☻.÷♠í[ä.►.....☺...☻.◘•í[ 00008480 08 00 0F 00 00 00 00 00 01 00 00 00 02 00 1A 07 A1 5B FC FF 0D 00 10 00 74 56 01 00 F2 5C 70 02 ◘.☼.....☺...☻.→•í[ⁿ ♪.►.tV☺.≥\p☻ 000084A0 FF FF 00 00 07 00 01 00 10 00 9F 57 01 00 3C 00 20 72 FF FF 00 00 07 00 01 00 0C 00 AD 57 01 00 ..•.☺.►.ƒW☺.<. r ..•.☺.♀.¡W☺. 000084C0 20 20 20 20 50 07 A1 5B FD FF 02 00 10 00 F4 57 01 00 20 20 20 20 FF FF 00 00 04 00 01 00 00 00 P•í[² ☻.►.⌠W☺. ..♦.☺... 000084E0 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 65 28 7E 72 FF FF 00 00 02 00 ..☺. ..☻.......☺.e(~r ..☻. 00008500 00 00 00 00 00 00 01 00 76 29 2F 72 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF ......☺.v)/r ..☻.......☺. 00008520 00 00 02 00 00 00 00 00 00 00 01 00 5B 61 76 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 ..☻.......☺.[av ..☻.......☺. 00008540 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 ..☻.......☺. ..☻....... 00008560 01 00 20 20 20 24 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 ☺. $ ..☻.......☺. ..☻... 00008580 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 ....☺. ..☻.......☺. .. 000085A0 02 00 00 00 00 00 00 00 01 00 78 74 72 61 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 67 73 20 66 ☻.......☺.xtra ..☻.......☺.gs f 000085C0 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 61 72 72 61 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 ..☻.......☺.arra ..☻.......☺. 000085E0 6D 20 27 74 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 6B 20 6F 66 FF FF 00 00 02 00 00 00 00 00 m 't ..☻.......☺.k of ..☻..... 00008600 00 00 01 00 6F 70 79 72 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 2E 20 22 2D FF FF 00 00 02 00 ..☺.opyr ..☻.......☺.. "- ..☻. 00008620 00 00 00 00 00 00 01 00 2D 62 6C 61 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 2C 20 64 65 00 00 ......☺.-bla ..☻.......☺., de.. 00008640 C6 00 68 01 88 02 14 04 30 06 9C 06 2C 07 3E 07 62 07 74 07 86 07 98 07 AA 07 BC 07 CE 07 E0 07 ╞.h☺ê☻¶♦0♠£♠,•>•b•t•å•ÿ•¬•╝•╬•α• 00008660 F2 07 04 08 16 08 28 08 3A 08 4C 08 5E 08 70 08 82 08 94 08 A6 08 B4 00 FF FF 02 00 6C 00 02 00 ≥•♦◘▬◘(◘:◘L◘^◘p◘é◘ö◘ª◘┤. ☻.l.☻. 00008680 72 00 02 00 77 00 05 00 61 72 67 73 00 04 00 74 6C 75 00 06 00 74 61 62 6C 65 00 02 00 7A 00 05 r.☻.w.♣.args.♦.tlu.♠.table.☻.z.♣ 000086A0 00 61 72 67 73 00 07 00 6D 61 74 72 69 78 00 05 00 61 72 67 73 00 03 00 69 73 00 06 00 74 61 62 .args.•.matrix.♣.args.♥.is.♠.tab 000086C0 6C 65 00 05 00 68 61 6E 67 00 08 00 17 00 01 00 01 00 17 00 61 72 67 73 20 61 6E 64 20 74 61 62 le.♣.hang.◘.↨.☺.☺.↨.args and tab 000086E0 6C 65 20 64 69 73 61 67 72 65 65 06 00 74 61 62 6C 65 00 05 00 61 72 67 73 00 04 00 01 00 00 00 le disagree♠.table.♣.args.♦.☺... 00008700 02 00 FF FF 06 00 74 61 62 6C 65 00 07 00 66 69 72 73 74 6D 00 06 00 74 61 62 6C 65 00 05 00 61 ☻. ♠.table.•.firstm.♠.table.♣.a 00008720 72 67 73 00 04 00 01 00 00 00 02 00 FF FF 02 00 77 00 06 00 74 61 62 6C 65 00 05 00 61 72 67 73 rgs.♦.☺...☻. ☻.w.♠.table.♣.args 00008740 00 02 00 72 00 02 00 6C 00 02 00 72 00 04 00 01 00 00 00 02 00 FF FF 02 00 72 00 02 00 72 00 06 .☻.r.☻.l.☻.r.♦.☺...☻. ☻.r.☻.r.♠ 00008760 00 74 61 62 6C 65 00 02 00 77 00 04 00 01 00 00 00 02 00 00 00 02 00 6C 00 02 00 7A 00 02 00 6C .table.☻.w.♦.☺...☻...☻.l.☻.z.☻.l 00008780 00 03 00 69 66 00 04 00 01 00 00 00 02 00 00 00 05 00 61 72 67 73 00 02 00 6C 00 03 00 6F 6E 00 .♥.if.♦.☺...☻...♣.args.☻.l.♥.on. 000087A0 08 00 0A 00 01 00 01 00 0A 00 6E 6F 74 20 66 6F 75 6E 64 3A 08 00 00 00 01 00 01 00 00 00 04 00 ◘.◙.☺.☺.◙.not found:◘...☺.☺...♦. 000087C0 01 00 00 00 02 00 00 00 78 06 00 73 68 61 70 65 00 00 01 00 0C 65 00 0C 00 07 00 19 00 0F 00 29 ☺...☻...x♠.shape..☺.♀e.♀.•.↓.☼.) 000087E0 00 02 00 01 00 01 00 01 00 01 00 01 00 01 00 05 00 08 00 D0 02 02 00 01 00 0C 00 3C 00 72 20 23 .☻.☺.☺.☺.☺.☺.☺.♣.◘.╨☻☻.☺.♀.<.r # 00008800 20 63 20 73 68 61 70 65 20 78 3B 6C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 c shape x;l 00008820 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 23 28 28 3D 5C 78 r#((=\x 00008840 5E 3D 27 27 27 27 29 26 78 45 63 29 2F 49 52 78 23 78 2C 31 59 63 20 20 20 20 20 20 20 20 20 20 ^='''')&xEc)/IRx#x,1Yc 00008860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6C 23 53 2F 72 23 72 5F 4C 69 6F l#S/r#r_Lio 00008880 2C 31 2B 2D 31 55 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,1+-1Ur 000088A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 23 28 30 5E 3D 72 29 60 2F 30 20 2D 31 55 r#(0^=r)`/0 -1U 000088C0 28 28 52 72 29 2C 31 2B 6C 29 52 28 2C 28 72 4A 2E 5A 28 7E 4C 69 6F 29 2B 49 6C 29 2C 31 29 5C ((Rr),1+l)R(,(rJ.Z(~Lio)+Il),1)\ 000088E0 78 20 20 20 20 20 20 20 20 20 20 20 20 24 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 x $0 00008900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00008920 20 20 20 20 20 20 20 20 20 22 73 68 61 70 65 20 2D 20 73 68 61 70 65 20 6D 61 74 72 69 78 20 66 "shape - shape matrix f 00008940 72 6F 6D 20 63 68 61 72 61 63 74 65 72 20 73 74 72 69 6E 67 20 20 20 20 20 20 20 20 20 20 20 20 rom character string 00008960 20 20 20 20 20 22 66 72 6F 6D 20 27 74 68 65 20 61 70 6C 20 68 61 6E 64 62 6F 6F 6B 20 6F 66 20 "from 'the apl handbook of 00008980 74 65 63 68 6E 69 71 75 65 73 27 20 63 6F 70 79 72 69 67 68 74 20 31 39 37 38 2C 20 69 62 6D 2E techniques' copyright 1978, ibm. 000089A0 20 22 2D 78 20 69 73 20 61 20 63 68 61 72 61 63 74 65 72 20 76 65 63 74 6F 72 20 63 6F 6D 70 6F "-x is a character vector compo 000089C0 73 65 64 20 6F 66 20 70 68 72 61 73 65 73 20 6F 66 20 76 61 72 69 61 62 6C 65 20 20 20 22 20 6C sed of phrases of variable " l 000089E0 65 6E 67 74 68 2C 20 73 65 70 61 72 61 74 65 64 20 62 79 20 61 6E 79 20 6F 66 20 74 68 65 20 63 ength, separated by any of the c 00008A00 68 61 72 61 63 74 65 72 73 20 69 6E 20 76 65 63 74 6F 72 20 63 2E 20 20 20 22 2D 61 20 6D 65 6D haracters in vector c. "-a mem 00008A20 62 65 72 20 6F 66 20 63 20 6D 61 79 20 65 76 65 6E 20 62 65 20 70 61 72 74 20 6F 66 20 61 20 70 ber of c may even be part of a p 00008A40 68 72 61 73 65 2C 20 69 66 20 69 74 20 69 73 20 20 20 20 20 20 22 20 73 75 72 72 6F 75 6E 64 65 hrase, if it is " surrounde 00008A60 64 20 62 79 20 71 75 6F 74 65 73 20 69 6E 20 78 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 d by quotes in x. 00008A80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2B 2D 73 65 65 20 48 65 72 65 63 74 2E 20 20 +-see Herect. 00008AA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00008AC0 20 20 20 20 20 20 20 20 20 20 20 20 20 36 00 FF FF 00 00 FC FF 0E 00 0E 00 0F 51 01 00 60 61 3B 6. ..ⁿ ♫.♫.☼Q☺.`a; 00008AE0 76 24 00 0E 54 1B 00 0D 00 00 00 00 00 01 00 00 00 20 20 00 00 0E 54 FC FF 0C 00 08 00 98 50 01 v$.♫T←.♪.....☺... ..♫Tⁿ ♀.◘.ÿP☺ 00008B00 00 00 00 00 00 48 00 0E 54 FC FF 06 00 0E 00 99 50 01 00 01 00 1E 00 24 00 0E 54 FC FF 04 00 0E .....H.♫Tⁿ ♠.♫.ÖP☺.☺.▲.$.♫Tⁿ ♦.♫ 00008B20 00 92 50 01 00 48 08 FC FF 6C 00 0E 54 03 00 02 00 00 00 00 00 01 00 84 56 14 00 48 00 0E 54 FC .ÆP☺.H◘ⁿ l.♫T♥.☻.....☺.äV¶.H.♫Tⁿ 00008B40 FF 00 00 08 00 92 50 01 00 00 00 17 54 90 00 0E 54 FC FF 1C 00 0E 00 27 51 01 00 75 65 0C 00 A2 ..◘.ÆP☺...↨TÉ.♫Tⁿ ∟.♫.'Q☺.ue♀.ó 00008B60 00 0E 54 39 00 1B 00 00 00 00 00 01 00 38 2C 20 69 B4 00 0E 54 FD FF 1A 00 10 00 A2 51 01 00 00 .♫T9.←.....☺.8, i┤.♫T² →.►.óQ☺.. 00008B80 00 5B 4C C6 00 0E 54 0C 00 19 00 00 00 00 00 01 00 00 00 00 00 D8 00 0E 54 FC FF 18 00 08 00 27 .[L╞.♫T♀.↓.....☺.....╪.♫Tⁿ ↑.◘.' 00008BA0 51 01 00 00 00 00 00 EA 00 0E 54 03 00 17 00 00 00 00 00 01 00 09 00 38 04 FC 00 0E 54 FC FF 16 Q☺.....Ω.♫T♥.↨.....☺.○.8♦ⁿ.♫Tⁿ ▬ 00008BC0 00 0A 00 15 51 01 00 23 6B 64 20 0E 01 0E 54 32 00 15 00 00 00 00 00 01 00 20 20 20 20 20 01 0E .◙.§Q☺.#kd ♫☺♫T2.§.....☺. ☺♫ 00008BE0 54 29 00 14 00 00 00 00 00 01 00 20 20 20 20 32 01 0E 54 0F 00 13 00 00 00 00 00 01 00 20 20 20 T).¶.....☺. 2☺♫T☼.‼.....☺. 00008C00 20 44 01 0E 54 09 00 12 00 00 00 00 00 01 00 52 6D 29 59 56 01 0E 54 FC FF 11 00 0A 00 12 51 01 D☺♫T○.↕.....☺.Rm)YV☺♫Tⁿ ◄.◙.↕Q☺ 00008C20 00 6B 64 29 2C 68 01 0E 54 25 00 10 00 00 00 00 00 01 00 48 20 4C 69 7A 01 0E 54 FC FF 0F 00 04 .kd),h☺♫T%.►.....☺.H Liz☺♫Tⁿ ☼.♦ 00008C40 00 12 51 01 00 20 20 20 20 8C 01 0E 54 06 00 0E 00 00 00 00 00 01 00 20 20 20 20 9E 01 0E 54 09 .↕Q☺. î☺♫T♠.♫.....☺. ₧☺♫T○ 00008C60 00 0D 00 00 00 00 00 01 00 20 20 20 20 B0 01 0E 54 07 00 09 00 08 00 33 51 01 00 65 64 69 74 C2 .♪.....☺. ░☺♫T•.○.◘.3Q☺.edit┬ 00008C80 01 0E 54 3E 00 07 00 00 00 00 00 01 00 20 20 20 20 D4 01 0E 54 FC FF 06 00 0A 00 10 51 01 00 20 ☺♫T>.•.....☺. ╘☺♫Tⁿ ♠.◙.►Q☺. 00008CA0 20 20 20 E6 01 0E 54 3C 00 05 00 00 00 00 00 01 00 20 20 20 20 F8 01 0E 54 1D 00 04 00 00 00 00 µ☺♫T<.♣.....☺. °☺♫T↔.♦.... 00008CC0 00 01 00 20 68 61 6E 0A 02 0E 54 08 00 03 00 00 00 00 00 01 00 69 71 75 65 1C 02 0E 54 08 00 02 .☺. han◙☻♫T◘.♥.....☺.ique∟☻♫T◘.☻ 00008CE0 00 00 00 00 00 01 00 39 37 38 2C 2E 02 0E 54 03 00 01 00 00 00 00 00 01 00 73 20 61 20 FF FF 00 .....☺.978,.☻♫T♥.☺.....☺.s a . 00008D00 00 FC FF 00 00 04 00 10 51 01 00 6F 66 20 73 52 02 0E 54 FC FF 11 00 0C 00 54 51 01 00 61 20 6D .ⁿ ..♦.►Q☺.of sR☻♫Tⁿ ◄.♀.TQ☺.a m 00008D20 61 64 02 0E 54 35 00 10 00 00 00 00 00 01 00 6B 64 20 69 76 02 0E 54 FD FF 0E 00 0C 00 D5 51 01 ad☻♫T5.►.....☺.kd iv☻♫T² ♫.♀.╒Q☺ 00008D40 00 74 65 67 65 88 02 0E 54 0B 00 0D 00 00 00 00 00 01 00 20 6B 2C 20 9A 02 0E 54 FD FF 0C 00 06 .tegeê☻♫T♂.♪.....☺. k, Ü☻♫T² ♀.♠ 00008D60 00 CB 51 01 00 20 20 20 20 AC 02 0E 54 0C 00 0B 00 00 00 00 00 01 00 77 73 20 6F BE 02 0E 54 ED .╦Q☺. ¼☻♫T♀.♂.....☺.ws o╛☻♫Tφ 00008D80 FF 08 00 00 00 00 00 01 00 74 68 65 20 D0 02 0E 54 3F 00 07 00 00 00 00 00 01 00 67 65 64 2C E2 ◘.....☺.the ╨☻♫T?.•.....☺.ged,Γ 00008DA0 02 0E 54 FC FF 06 00 02 00 2E 51 01 00 65 64 2C 20 F4 02 0E 54 03 00 05 00 00 00 00 00 01 00 65 ☻♫Tⁿ ♠.☻..Q☺.ed, ⌠☻♫T♥.♣.....☺.e 00008DC0 20 73 65 06 03 0E 54 FC FF 04 00 0C 00 2D 51 01 00 65 20 6C 69 18 03 0E 54 0F 00 03 00 00 00 00 se♠♥♫Tⁿ ♦.♀.-Q☺.e li↑♥♫T☼.♥.... 00008DE0 00 01 00 74 6F 20 62 2A 03 0E 54 33 00 02 00 00 00 00 00 01 00 20 20 20 20 3C 03 0E 54 03 00 01 .☺.to b*♥♫T3.☻.....☺. <♥♫T♥.☺ 00008E00 00 00 00 00 00 01 00 20 20 20 20 FF FF 00 00 FC FF 00 00 06 00 2D 51 01 00 20 20 20 20 60 03 0E .....☺. ..ⁿ ..♠.-Q☺. `♥♫ 00008E20 54 FC FF 2F 00 0C 00 D8 51 01 00 20 77 69 6C 72 03 0E 54 3C 00 2E 00 00 00 00 00 01 00 68 65 20 Tⁿ /.♀.╪Q☺. wilr♥♫T<.......☺.he 00008E40 65 84 03 0E 54 09 00 2D 00 00 00 00 00 01 00 20 77 69 6C 96 03 0E 54 FD FF 2C 00 0A 00 2A 52 01 eä♥♫T○.-.....☺. wilû♥♫T² ,.◙.*R☺ 00008E60 00 74 65 20 74 A8 03 0E 54 0C 00 2B 00 00 00 00 00 01 00 62 65 20 69 BA 03 0E 54 09 00 2A 00 00 .te t¿♥♫T♀.+.....☺.be i║♥♫T○.*.. 00008E80 00 00 00 01 00 20 20 20 20 CC 03 0E 54 FC FF 29 00 06 00 D8 51 01 00 74 68 65 20 DE 03 0E 54 29 ...☺. ╠♥♫Tⁿ ).♠.╪Q☺.the ▐♥♫T) 00008EA0 00 28 00 00 00 00 00 01 00 61 6E 20 61 F0 03 0E 54 0B 00 27 00 00 00 00 00 01 00 20 74 68 65 02 .(.....☺.an a≡♥♫T♂.'.....☺. the☻ 00008EC0 04 0E 54 09 00 26 00 00 00 00 00 01 00 65 64 2E 20 14 04 0E 54 ED FF 23 00 00 00 00 00 01 00 65 ♦♫T○.&.....☺.ed. ¶♦♫Tφ #.....☺.e 00008EE0 20 69 6E 26 04 0E 54 84 00 22 00 00 00 00 00 01 00 61 72 20 61 38 04 0E 54 08 00 21 00 00 00 00 in&♦♫Tä.".....☺.ar a8♦♫T◘.!.... 00008F00 00 01 00 20 20 20 20 4A 04 0E 54 3A 00 20 00 00 00 00 00 01 00 3E 64 2C 20 5C 04 0E 54 0E 00 1F .☺. J♦♫T:. .....☺.>d, \♦♫T♫.▼ 00008F20 00 00 00 00 00 01 00 20 62 65 20 6E 04 0E 54 2A 00 1E 00 00 00 00 00 01 00 20 61 63 63 80 04 0E .....☺. be n♦♫T*.▲.....☺. accÇ♦♫ 00008F40 54 FC FF 1D 00 04 00 D5 51 01 00 01 00 01 00 92 04 0E 54 08 00 1C 00 00 00 00 00 01 00 01 00 74 Tⁿ ↔.♦.╒Q☺.☺.☺.Æ♦♫T◘.∟.....☺.☺.t 00008F60 65 A4 04 0E 54 0C 00 1B 00 00 00 00 00 01 00 01 00 20 20 B6 04 0E 54 08 00 1A 00 00 00 00 00 01 eñ♦♫T♀.←.....☺.☺. ╢♦♫T◘.→.....☺ 00008F80 00 01 00 20 20 C8 04 0E 54 32 00 19 00 00 00 00 00 01 00 01 00 65 72 DA 04 0E 54 09 00 18 00 00 .☺. ╚♦♫T2.↓.....☺.☺.er┌♦♫T○.↑.. 00008FA0 00 00 00 01 00 01 00 20 20 EC 04 0E 54 FC FF 17 00 02 00 CD 51 01 00 01 00 20 20 FE 04 0E 54 0B ...☺.☺. ∞♦♫Tⁿ ↨.☻.═Q☺.☺. ■♦♫T♂ 00008FC0 00 16 00 00 00 00 00 01 00 01 00 6C 6F 10 05 0E 54 FD FF 15 00 08 00 01 52 01 00 01 00 6C 20 22 .▬.....☺.☺.lo►♣♫T² §.◘.☺R☺.☺.l " 00008FE0 05 0E 54 0C 00 14 00 00 00 00 00 01 00 01 00 20 20 34 05 0E 54 09 00 13 00 00 00 00 00 01 00 01 ♣♫T♀.¶.....☺.☺. 4♣♫T○.‼.....☺.☺ 00009000 00 20 20 46 05 0E 54 FC FF 12 00 0C 00 CC 51 01 00 01 00 20 74 58 05 0E 54 32 00 11 00 00 00 00 . F♣♫Tⁿ ↕.♀.╠Q☺.☺. tX♣♫T2.◄.... 00009020 00 01 00 01 00 20 20 6A 05 0E 54 08 00 10 00 00 00 00 00 01 00 01 00 20 20 7C 05 0E 54 08 00 0F .☺.☺. j♣♫T◘.►.....☺.☺. |♣♫T◘.☼ 00009040 00 00 00 00 00 01 00 01 00 65 72 8E 05 0E 54 35 00 0E 00 00 00 00 00 01 00 01 00 20 20 A0 05 0E .....☺.☺.erÄ♣♫T5.♫.....☺.☺. á♣♫ 00009060 54 FD FF 0A 00 04 00 F1 51 01 00 01 00 20 20 B2 05 0E 54 40 00 08 00 00 00 00 00 01 00 01 00 20 T² ◙.♦.±Q☺.☺. ▓♣♫T@.◘.....☺.☺. 00009080 73 C4 05 0E 54 09 00 07 00 00 00 00 00 01 00 01 00 20 20 D6 05 0E 54 FC FF 06 00 06 00 A4 51 01 s─♣♫T○.•.....☺.☺. ╓♣♫Tⁿ ♠.♠.ñQ☺ 000090A0 00 01 00 20 20 E8 05 0E 54 3E 00 04 00 00 00 00 00 01 00 01 00 20 20 FA 05 0E 54 FD FF 03 00 10 .☺. Φ♣♫T>.♦.....☺.☺. ·♣♫T² ♥.► 000090C0 00 E0 51 01 00 01 00 20 20 0C 06 0E 54 08 00 02 00 00 00 00 00 01 00 01 00 20 20 1E 06 0E 54 03 .αQ☺.☺. ♀♠♫T◘.☻.....☺.☺. ▲♠♫T♥ 000090E0 00 01 00 00 00 00 00 01 00 01 00 20 20 FF FF 00 00 FC FF 00 00 0A 00 57 51 01 00 01 00 63 6F 42 .☺.....☺.☺. ..ⁿ ..◙.WQ☺.☺.coB 00009100 06 0E 54 FD FF 01 00 0E 00 34 52 01 00 01 00 74 72 FF FF 00 00 04 00 00 00 00 00 00 00 01 00 01 ♠♫T² ☺.♫.4R☺.☺.tr ..♦.......☺.☺ 00009120 00 20 20 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 22 66 FF FF 00 00 02 00 00 00 00 00 00 . ..☻.......☺.☺."f ..☻...... 00009140 00 01 00 01 00 64 62 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 73 27 FF FF 00 00 02 00 00 .☺.☺.db ..☻.......☺.☺.s' ..☻.. 00009160 00 00 00 00 00 01 00 01 00 20 69 FF FF 00 00 02 00 00 00 00 00 00 00 01 00 01 00 20 28 FF FF 00 .....☺.☺. i ..☻.......☺.☺. ( . 00009180 00 02 00 00 00 00 00 00 00 01 00 01 00 20 64 D2 06 0E 54 0E 00 0C 00 00 00 00 00 01 00 01 00 20 .☻.......☺.☺. d╥♠♫T♫.♀.....☺.☺. 000091A0 70 E4 06 0E 54 FC FF 06 00 06 00 E2 51 01 00 01 00 61 72 F6 06 0E 54 FC FF 02 00 02 00 D9 51 01 pΣ♠♫Tⁿ ♠.♠.ΓQ☺.☺.ar÷♠♫Tⁿ ☻.☻.┘Q☺ 000091C0 00 1A 00 7C 54 08 07 0E 54 0D 00 01 00 00 00 00 00 01 00 70 6C 20 61 FF FF 00 00 0B 00 00 00 00 .→.|T◘•♫T♪.☺.....☺.pl a ..♂.... 000091E0 00 00 00 01 00 20 20 20 20 00 00 7E 00 40 02 4E 03 30 06 54 06 66 06 78 06 8A 06 9C 06 AE 06 C0 ...☺. ..~.@☻N♥0♠T♠f♠x♠è♠£♠«♠└ 00009200 06 6C 00 FF FF 02 00 6C 00 02 00 78 00 06 00 73 68 61 70 65 00 02 00 63 00 02 00 72 00 02 00 63 ♠l. ☻.l.☻.x.♠.shape.☻.c.☻.r.☻.c 00009220 00 04 00 01 00 00 00 02 00 01 00 02 00 78 00 02 00 78 00 02 00 63 00 02 00 78 00 08 00 01 00 00 .♦.☺...☻.☺.☻.x.☻.x.☻.c.☻.x.◘.☺.. 00009240 00 01 00 27 02 00 78 00 02 00 72 00 02 00 72 00 04 00 01 00 00 00 02 00 FF FF 04 00 01 00 00 00 .☺.'☻.x.☻.r.☻.r.♦.☺...☻. ♦.☺... 00009260 02 00 01 00 02 00 72 00 02 00 72 00 02 00 6C 00 02 00 78 00 04 00 01 00 00 00 02 00 01 00 02 00 ☻.☺.☻.r.☻.r.☻.l.☻.x.♦.☺...☻.☺.☻. 00009280 6C 00 02 00 72 00 02 00 6C 00 04 00 01 00 00 00 02 00 01 00 02 00 72 00 04 00 02 00 01 00 02 00 l.☻.r.☻.l.♦.☺...☻.☺.☻.r.♦.☻.☺.☻. 000092A0 02 00 00 00 FF FF 02 00 72 00 04 00 01 00 00 00 02 00 00 00 02 00 72 00 04 00 01 00 00 00 02 00 ☻... ☻.r.♦.☺...☻...☻.r.♦.☺...☻. 000092C0 00 00 07 00 48 65 72 65 63 74 00 04 00 73 65 65 00 00 ..•.Herect.♦.see..