Metropoli BBS
VIEWER: gi.apl MODE: BINARY (HEX) 
==============================================================================================================================================
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 00 00 82 76 49 68  C2 25 3C 3D 01 00 00 00  78 02 00 00 00 03 00 08  00 00 00 05 00 00 00 01  ☺...évIh┬%<=☺...x☻...♥.◘...♣...☺
00000020  00 00 00 01 00 00 00 05  00 00 00 2E 2C 2A 30 5F  78 08 00 00 00 67 72 61  64 65 75 70 00 00 01 00  ...☺...♣....,*0_x◘...gradeup..☺.
00000040  00 00 0C 00 00 16 00 00  00 0C 00 00 00 05 00 00  00 06 00 00 00 02 00 00  00 01 00 00 00 01 00 00  ..♀..▬...♀...♣...♠...☻...☺...☺..
00000060  00 01 00 00 00 01 00 00  00 01 00 00 00 01 00 00  00 01 00 00 00 01 00 00  00 01 00 00 00 08 00 00  .☺...☺...☺...☺...☺...☺...☺...◘..
00000080  00 D0 02 00 00 02 00 00  00 01 00 00 00 0C 00 00  00 3C 00 00 00 69 20 23  20 63 20 67 72 61 64 65  .╨☻..☻...☺...♀...<...i # c grade
000000A0  75 70 20 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  up k                            
000000C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 69 20 23 20 41 20 63  20 6E 66 6F 72 6D 20 6B                   i # A c nform k
000000E0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00000100  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                 
00000120  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00000140  20 20 20 20 20 20 20 20  20 22 67 72 61 64 65 75  70 20 2D 20 67 65 6E 65  72 61 74 65 20 61 73 63           "gradeup - generate asc
00000160  65 6E 64 69 6E 67 20 72  6F 77 20 69 6E 64 69 63  65 73 2E 20 20 20 20 20  20 20 20 20 20 20 20 20  ending row indices.             
00000180  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 
000001A0  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.
000001C0  20 22 2D 74 6F 20 73 6F  72 74 20 61 20 6C 65 66  74 2D 6A 75 73 74 69 66  69 65 64 20 6D 61 74 72   "-to sort a left-justified matr
000001E0  69 78 20 61 6C 70 68 61  62 65 74 69 63 61 6C 6C  79 2E 20 20 20 20 20 20  20 20 20 20 20 22 2D 63  ix alphabetically.           "-c
00000200  20 69 73 20 61 20 63 6F  6C 6C 61 74 69 6E 67 20  73 65 71 75 65 6E 63 65  3B 20 6B 20 69 73 20 61   is a collating sequence; k is a
00000220  20 63 68 61 72 61 63 74  65 72 20 6D 61 74 72 69  78 2E 20 20 20 20 20 20  20 22 2D 69 66 20 75 6E   character matrix.       "-if un
00000240  69 71 75 65 20 64 69 73  74 69 6E 63 74 69 6F 6E  73 20 6F 63 63 75 72 20  6F 6E 6C 79 20 61 74 20  ique distinctions occur only at 
00000260  72 69 67 68 74 20 73 69  64 65 2C 20 61 6E 64 20  69 66 20 20 20 22 20 74  68 65 20 63 6F 6C 6C 61  right side, and if   " the colla
00000280  74 69 6E 67 20 73 65 71  75 65 6E 63 65 20 69 73  20 6C 6F 6E 67 2C 20 69  74 20 6D 61 79 20 62 65  ting sequence is long, it may be
000002A0  20 6E 65 63 65 73 73 61  72 79 20 74 6F 20 20 20  20 22 20 73 6F 72 74 20  69 6E 20 6D 6F 72 65 20   necessary to    " sort in more 
000002C0  74 68 61 6E 20 6F 6E 65  20 70 61 73 73 2C 20 66  69 72 73 74 20 61 63 63  6F 72 64 69 6E 67 20 74  than one pass, first according t
000002E0  6F 20 74 68 65 20 20 20  20 20 20 20 20 22 20 72  69 67 68 74 6D 6F 73 74  20 63 6F 6C 75 6D 6E 73  o the        " rightmost columns
00000300  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 20 20 20 20 20 20 20  .                               
00000320  20 20 20 20 20 20 20 20  20 22 2D 75 73 65 73 3A  20 48 6E 66 6F 72 6D 2E  20 20 20 20 20 20 20 20           "-uses: Hnform.        
00000340  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00000360  20 20 20 20 20 18 00 00  00 FF FF FF FF FC FF FF  FF 0E 00 00 00 B8 26 04  00 01 00 00 00 01 00 00       ↑...    ⁿ   ♫...╕&♦.☺...☺..
00000380  00 30 00 00 00 FC FF FF  FF 06 00 00 00 F0 28 04  00 01 00 00 00 70 20 6B  20 00 00 00 00 FC FF FF  .0...ⁿ   ♠...≡(♦.☺...p k ....ⁿ  
000003A0  FF 04 00 00 00 B0 27 04  00 01 00 00 00 20 20 20  20 60 00 00 00 03 00 00  00 02 00 00 00 00 00 00   ♦...░'♦.☺...    `...♥...☻......
000003C0  00 01 00 00 00 69 20 23  20 30 00 00 00 FC FF FF  FF 00 00 00 00 30 29 04  00 01 00 00 00 20 20 20  .☺...i # 0...ⁿ   ....0)♦.☺...   
000003E0  20 90 00 00 00 FC FF FF  FF 0E 00 00 00 00 2C 04  00 01 00 00 00 20 20 20  20 A8 00 00 00 FC FF FF   É...ⁿ   ♫....,♦.☺...    ¿...ⁿ  
00000400  FF 08 00 00 00 40 2C 04  00 01 00 00 00 20 20 20  20 C0 00 00 00 FC FF FF  FF 06 00 00 00 20 27 04   ◘...@,♦.☺...    └...ⁿ   ♠... '♦
00000420  00 01 00 00 00 20 20 20  20 D8 00 00 00 21 00 00  00 04 00 00 00 00 00 00  00 01 00 00 00 22 67 72  .☺...    ╪...!...♦.......☺..."gr
00000440  61 F0 00 00 00 03 00 00  00 02 00 00 00 00 00 00  00 01 00 00 00 6E 64 69  6E FF FF FF FF FC FF FF  a≡...♥...☻.......☺...ndin    ⁿ  
00000460  FF 00 00 00 00 70 27 04  00 01 00 00 00 20 20 20  20 20 01 00 00 FD FF FF  FF 01 00 00 00 A0 8E 04   ....p'♦.☺...     ☺..²   ☺...áÄ♦
00000480  00 01 00 00 00 70 6C 20  68 FF FF FF FF 04 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 73 27 20  .☺...pl h    ♦...........☺...s' 
000004A0  63 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 22 2D 74  6F FF FF FF FF 02 00 00  c    ☻...........☺..."-to    ☻..
000004C0  00 00 00 00 00 00 00 00  00 01 00 00 00 65 64 20  6D FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  .........☺...ed m    ☻..........
000004E0  00 01 00 00 00 2E 20 20  20 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 6C 61 74  .☺....       ☻...........☺...lat
00000500  69 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 63 68 61  72 FF FF FF FF 02 00 00  i    ☻...........☺...char    ☻..
00000520  00 00 00 00 00 00 00 00  00 01 00 00 00 22 2D 69  66 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  .........☺..."-if    ☻..........
00000540  00 01 00 00 00 20 6F 63  63 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 65 2C 20  .☺... occ    ☻...........☺...e, 
00000560  61 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 69 6E 67  20 00 00 00 00 78 00 00  a    ☻...........☺...ing ....x..
00000580  00 08 01 00 00 38 01 00  00 50 01 00 00 68 01 00  00 80 01 00 00 98 01 00  00 B0 01 00 00 C8 01 00  .◘☺..8☺..P☺..h☺..Ç☺..ÿ☺..░☺..╚☺.
000005A0  00 E0 01 00 00 F8 01 00  00 60 00 00 00 FF FF FF  FF 02 00 00 00 6B 00 08  00 00 00 67 72 61 64 65  .α☺..°☺..`...    ☻...k.◘...grade
000005C0  75 70 00 02 00 00 00 63  00 02 00 00 00 69 00 02  00 00 00 6B 00 06 00 00  00 6E 66 6F 72 6D 00 02  up.☻...c.☻...i.☻...k.♠...nform.☻
000005E0  00 00 00 63 00 02 00 00  00 69 00 04 00 00 00 01  00 00 00 00 00 00 00 04  00 00 00 00 00 00 00 78  ...c.☻...i.♦...☺.......♦.......x
00000600  02 00 00 00 61 00 08 00  00 00 2C 01 00 00 02 00  00 00 01 00 00 00 05 00  00 00 3C 00 00 00 20 72  ☻...a.◘...,☺..☻...☺...♣...<... r
00000620  23 61 20 69 73 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  #a is b                         
00000640  20 20 20 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 30 5E                             r#(0^
00000660  3D 30 5C 30 52 61 29 3D  30 5E 3D 30 5C 30 52 62  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  =0\0Ra)=0^=0\0Rb                
00000680  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 20 20                         $0       
000006A0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
000006C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 22 69 73 20 2D 20  74 72 75 65 2C 20 69 66                    "is - true, if
000006E0  20 62 6F 74 68 20 6E 75  6D 65 72 69 63 2C 20 6F  72 20 69 66 20 62 6F 74  68 20 63 68 61 72 61 63   both numeric, or if both charac
00000700  74 65 72 2E 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  ter.          "from 'the apl han
00000720  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 20 31  dbook of techniques' copyright 1
00000740  39 37 38 2C 20 69 62 6D  2E 20 78 09 00 00 00 68  65 61 64 65 72 6F 6E 00  00 01 00 00 00 0C 00 00  978, ibm. x○...headeron..☺...♀..
00000760  62 00 00 00 0A 00 00 00  0B 00 00 00 0D 00 00 00  09 00 00 00 0C 00 00 00  0E 00 00 00 0A 00 00 00  b...◙...♂...♪...○...♀...♫...◙...
00000780  15 00 00 00 02 00 00 00  01 00 00 00 01 00 00 00  08 00 00 00 58 02 00 00  02 00 00 00 01 00 00 00  §...☻...☺...☺...◘...X☻..☻...☺...
000007A0  0A 00 00 00 3C 00 00 00  20 7A 23 61 20 68 65 61  64 65 72 6F 6E 20 62 3B  69 3B 6A 3B 4C 69 6F 20  ◙...<... z#a headeron b;i;j;Lio 
000007C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
000007E0  20 20 20 20 20 69 23 2D  31 59 52 61 23 70 72 65  70 61 72 65 20 61 20 48  20 4C 69 6F 23 31 20 20       i#-1YRa#prepare a H Lio#1  
00000800  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00000820  20 6A 23 2D 31 59 52 62  23 70 72 65 70 61 72 65  20 62 20 20 20 20 20 20  20 20 20 20 20 20 20 20   j#-1YRb#prepare b              
00000840  20 20 20 20 20 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 6C                               $(l
00000860  31 2C 6C 32 2C 6C 30 29  69 66 20 69 20 63 6F 6D  70 61 72 65 20 6A 20 20  20 20 20 20 20 20 20 20  1,l2,l0)if i compare j          
00000880  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  6C 30 3A 24 6C 32 2C 52                          l0:$l2,R
000008A0  62 23 63 65 6E 74 65 72  28 6A 2D 69 29 61 64 64  63 6F 6C 73 20 62 20 20  20 20 20 20 20 20 20 20  b#center(j-i)addcols b          
000008C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 6C 31 3A 61  23 63 65 6E 74 65 72 28                      l1:a#center(
000008E0  69 2D 6A 29 61 64 64 63  6F 6C 73 20 61 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  i-j)addcols a                   
00000900  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 7A 23 28 31 2B 31 59  52 61 29 61 64 6A 75 73                   z#(1+1YRa)adjus
00000920  74 75 70 28 31 2B 31 59  52 61 29 61 64 6A 75 73  74 64 6F 77 6E 20 7A 20  20 20 20 20 20 20 20 20  tup(1+1YRa)adjustdown z         
00000940  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                 
00000960  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00000980  20 20 20 20 20 20 20 20  22 68 65 61 64 65 72 6F  6E 20 2D 20 70 75 74 73  20 61 20 68 65 61 64 69          "headeron - puts a headi
000009A0  6E 67 20 6F 6E 20 61 20  72 65 70 6F 72 74 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  ng on a report                  
000009C0  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
000009E0  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. 
00000A00  A8 00 00 00 FF FF FF FF  ED FF FF FF 14 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 30 00 00 00  ¿...    φ   .......☺.......0...
00000A20  1B 00 00 00 13 00 00 00  00 00 00 00 01 00 00 00  68 25 04 00 00 00 00 00  FC FF FF FF 12 00 00 00  ←...‼.......☺...h%♦.....ⁿ   ↕...
00000A40  98 2F 04 00 01 00 00 00  A0 87 04 00 60 00 00 00  1B 00 00 00 11 00 00 00  00 00 00 00 01 00 00 00  ÿ/♦.☺...áç♦.`...←...◄.......☺...
00000A60  00 00 00 00 30 00 00 00  FC FF FF FF 10 00 00 00  D0 2E 04 00 01 00 00 00  00 00 00 00 90 00 00 00  ....0...ⁿ   ►...╨.♦.☺.......É...
00000A80  1B 00 00 00 0F 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 60 00 00 00  FC FF FF FF 0E 00 00 00  ←...☼.......☺.......`...ⁿ   ♫...
00000AA0  F8 2B 04 00 01 00 00 00  00 00 00 00 C0 00 00 00  FC FF FF FF 05 00 00 00  20 5F 04 00 01 00 00 00  °+♦.☺.......└...ⁿ   ♣... _♦.☺...
00000AC0  00 00 00 00 90 00 00 00  FC FF FF FF 03 00 00 00  B8 2E 04 00 01 00 00 00  00 00 00 00 F0 00 00 00  ....É...ⁿ   ♥...╕.♦.☺.......≡...
00000AE0  03 00 00 00 02 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 C0 00 00 00  FC FF FF FF 01 00 00 00  ♥...☻.......☺.......└...ⁿ   ☺...
00000B00  E0 2C 04 00 01 00 00 00  00 00 00 00 20 01 00 00  FD FF FF FF 19 00 00 00  E0 84 04 00 01 00 00 00  α,♦.☺....... ☺..²   ↓...αä♦.☺...
00000B20  00 00 00 00 38 01 00 00  03 00 00 00 18 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 50 01 00 00  ....8☺..♥...↑.......☺.......P☺..
00000B40  ED FF FF FF 15 00 00 00  00 00 00 00 01 00 00 00  22 20 61 72 68 01 00 00  FC FF FF FF 13 00 00 00  φ   §.......☺..." arh☺..ⁿ   ‼...
00000B60  B8 2F 04 00 01 00 00 00  67 68 74 20 80 01 00 00  FC FF FF FF 11 00 00 00  C0 2F 04 00 01 00 00 00  ╕/♦.☺...ght Ç☺..ⁿ   ◄...└/♦.☺...
00000B80  65 6E 74 29 98 01 00 00  FC FF FF FF 09 00 00 00  48 2F 04 00 01 00 00 00  61 79 20 62 B0 01 00 00  ent)ÿ☺..ⁿ   ○...H/♦.☺...ay b░☺..
00000BA0  03 00 00 00 08 00 00 00  00 00 00 00 01 00 00 00  63 68 61 72 C8 01 00 00  FC FF FF FF 07 00 00 00  ♥...◘.......☺...char╚☺..ⁿ   •...
00000BC0  E0 2F 04 00 01 00 00 00  22 3E 75 73 E0 01 00 00  32 00 00 00 06 00 00 00  00 00 00 00 01 00 00 00  α/♦.☺...">usα☺..2...♠.......☺...
00000BE0  20 20 20 20 F8 01 00 00  39 00 00 00 05 00 00 00  00 00 00 00 01 00 00 00  20 20 20 20 10 02 00 00      °☺..9...♣.......☺...    ►☻..
00000C00  FD FF FF FF 03 00 00 00  00 B1 05 00 01 00 00 00  00 00 00 00 28 02 00 00  03 00 00 00 02 00 00 00  ²   ♥....▒♣.☺.......(☻..♥...☻...
00000C20  00 00 00 00 01 00 00 00  00 00 00 00 FF FF FF FF  FC FF FF FF 01 00 00 00  D8 2E 04 00 01 00 00 00  ....☺.......    ⁿ   ☺...╪.♦.☺...
00000C40  00 00 00 00 58 02 00 00  FC FF FF FF 11 00 00 00  F8 2E 04 00 01 00 00 00  00 00 00 00 70 02 00 00  ....X☻..ⁿ   ◄...°.♦.☺.......p☻..
00000C60  FC FF FF FF 09 00 00 00  F0 2E 04 00 01 00 00 00  00 00 00 00 88 02 00 00  03 00 00 00 08 00 00 00  ⁿ   ○...≡.♦.☺.......ê☻..♥...◘...
00000C80  00 00 00 00 01 00 00 00  00 00 00 00 A0 02 00 00  FC FF FF FF 07 00 00 00  00 20 04 00 01 00 00 00  ....☺.......á☻..ⁿ   •.... ♦.☺...
00000CA0  00 00 00 00 B8 02 00 00  32 00 00 00 06 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 D0 02 00 00  ....╕☻..2...♠.......☺.......╨☻..
00000CC0  39 00 00 00 05 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 E8 02 00 00  FD FF FF FF 03 00 00 00  9...♣.......☺.......Φ☻..²   ♥...
00000CE0  40 B0 05 00 01 00 00 00  00 00 00 00 00 03 00 00  03 00 00 00 02 00 00 00  00 00 00 00 01 00 00 00  @░♣.☺........♥..♥...☻.......☺...
00000D00  00 00 00 00 FF FF FF FF  FC FF FF FF 01 00 00 00  50 2F 04 00 01 00 00 00  00 00 00 00 30 03 00 00  ....    ⁿ   ☺...P/♦.☺.......0♥..
00000D20  FC FF FF FF 19 00 00 00  D0 2F 04 00 01 00 00 00  00 00 00 00 48 03 00 00  FC FF FF FF 11 00 00 00  ⁿ   ↓...╨/♦.☺.......H♥..ⁿ   ◄...
00000D40  D8 2F 04 00 01 00 00 00  00 00 00 00 60 03 00 00  FC FF FF FF 0F 00 00 00  68 2F 04 00 01 00 00 00  ╪/♦.☺.......`♥..ⁿ   ☼...h/♦.☺...
00000D60  00 00 00 00 78 03 00 00  FC FF FF FF 0C 00 00 00  70 2F 04 00 01 00 00 00  00 00 00 00 90 03 00 00  ....x♥..ⁿ   ♀...p/♦.☺.......É♥..
00000D80  09 00 00 00 0B 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 A8 03 00 00  FC FF FF FF 09 00 00 00  ○...♂.......☺.......¿♥..ⁿ   ○...
00000DA0  78 2F 04 00 01 00 00 00  00 00 00 00 C0 03 00 00  0C 00 00 00 08 00 00 00  00 00 00 00 01 00 00 00  x/♦.☺.......└♥..♀...◘.......☺...
00000DC0  00 00 00 00 D8 03 00 00  FC FF FF FF 06 00 00 00  80 2F 04 00 01 00 00 00  00 00 00 00 F0 03 00 00  ....╪♥..ⁿ   ♠...Ç/♦.☺.......≡♥..
00000DE0  0C 00 00 00 05 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 08 04 00 00  FC FF FF FF 03 00 00 00  ♀...♣.......☺.......◘♦..ⁿ   ♥...
00000E00  F0 2F 04 00 01 00 00 00  00 BC 04 00 20 04 00 00  08 00 00 00 02 00 00 00  00 00 00 00 01 00 00 00  ≡/♦.☺....╝♦. ♦..◘...☻.......☺...
00000E20  3C 00 00 00 FF FF FF FF  04 00 00 00 01 00 00 00  00 00 00 00 01 00 00 00  20 20 20 20 50 04 00 00  <...    ♦...☺.......☺...    P♦..
00000E40  FC FF FF FF 1D 00 00 00  98 2E 04 00 01 00 00 00  20 20 20 20 68 04 00 00  FC FF FF FF 15 00 00 00  ⁿ   ↔...ÿ.♦.☺...    h♦..ⁿ   §...
00000E60  88 2F 04 00 01 00 00 00  20 2D 20 61 80 04 00 00  09 00 00 00 14 00 00 00  00 00 00 00 01 00 00 00  ê/♦.☺... - aÇ♦..○..........☺...
00000E80  76 65 63 74 98 04 00 00  FC FF FF FF 13 00 00 00  90 2F 04 00 01 00 00 00  20 20 20 20 B0 04 00 00  vectÿ♦..ⁿ   ‼...É/♦.☺...    ░♦..
00000EA0  FD FF FF FF 12 00 00 00  C0 B8 05 00 01 00 00 00  6F 6F 6B 20 C8 04 00 00  FC FF FF FF 11 00 00 00  ²   ↕...└╕♣.☺...ook ╚♦..ⁿ   ◄...
00000EC0  A0 2F 04 00 01 00 00 00  69 67 68 74 E0 04 00 00  08 00 00 00 10 00 00 00  00 00 00 00 01 00 00 00  á/♦.☺...ightα♦..◘...►.......☺...
00000EE0  74 73 20 73 F8 04 00 00  FC FF FF FF 0A 00 00 00  A0 2E 04 00 01 00 00 00  68 74 20 61 10 05 00 00  ts s°♦..ⁿ   ◙...á.♦.☺...ht a►♣..
00000F00  03 00 00 00 09 00 00 00  00 00 00 00 01 00 00 00  77 20 20 20 28 05 00 00  FC FF FF FF 08 00 00 00  ♥...○.......☺...w   (♣..ⁿ   ◘...
00000F20  A8 2F 04 00 01 00 00 00  74 68 65 6D 40 05 00 00  32 00 00 00 07 00 00 00  00 00 00 00 01 00 00 00  ¿/♦.☺...them@♣..2...•.......☺...
00000F40  65 20 6C 65 58 05 00 00  0C 00 00 00 06 00 00 00  00 00 00 00 01 00 00 00  74 68 65 20 70 05 00 00  e leX♣..♀...♠.......☺...the p♣..
00000F60  FC FF FF FF 04 00 00 00  C8 2F 04 00 01 00 00 00  74 20 61 72 88 05 00 00  04 00 00 00 03 00 00 00  ⁿ   ♦...╚/♦.☺...t arê♣..♦...♥...
00000F80  00 00 00 00 01 00 00 00  6D 65 6E 74 A0 05 00 00  1A 00 00 00 02 00 00 00  00 00 00 00 01 00 00 00  ....☺...mentá♣..→...☻.......☺...
00000FA0  72 69 63 20 C0 06 00 00  FC FF FF FF 04 00 00 00  E8 2F 04 00 01 00 00 00  20 20 20 20 D0 05 00 00  ric └♠..ⁿ   ♦...Φ/♦.☺...    ╨♣..
00000FC0  FC FF FF FF 18 00 00 00  78 2C 04 00 01 00 00 00  6D 61 74 72 E8 05 00 00  FC FF FF FF 10 00 00 00  ⁿ   ↑...x,♦.☺...matrΦ♣..ⁿ   ►...
00000FE0  80 2C 04 00 01 00 00 00  20 20 20 20 00 06 00 00  09 00 00 00 0F 00 00 00  00 00 00 00 01 00 00 00  Ç,♦.☺...    .♠..○...☼.......☺...
00001000  20 20 20 20 18 06 00 00  FC FF FF FF 0E 00 00 00  30 2D 04 00 01 00 00 00  52 62 29 59 30 06 00 00      ↑♠..ⁿ   ♫...0-♦.☺...Rb)Y0♠..
00001020  FD FF FF FF 0D 00 00 00  00 B7 05 00 01 00 00 00  20 20 20 20 48 06 00 00  FC FF FF FF 0C 00 00 00  ²   ♪....╖♣.☺...    H♠..ⁿ   ♀...
00001040  C8 2E 04 00 01 00 00 00  00 00 00 00 60 06 00 00  08 00 00 00 0B 00 00 00  00 00 00 00 01 00 00 00  ╚.♦.☺.......`♠..◘...♂.......☺...
00001060  00 00 00 00 78 06 00 00  FC FF FF FF 05 00 00 00  78 2E 04 00 01 00 00 00  00 00 00 00 90 06 00 00  ....x♠..ⁿ   ♣...x.♦.☺.......É♠..
00001080  03 00 00 00 04 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 A8 06 00 00  FC FF FF FF 03 00 00 00  ♥...♦.......☺.......¿♠..ⁿ   ♥...
000010A0  C0 2E 04 00 01 00 00 00  00 00 00 00 C0 06 00 00  1A 00 00 00 02 00 00 00  00 00 00 00 01 00 00 00  └.♦.☺.......└♠..→...☻.......☺...
000010C0  00 00 00 00 FF FF FF FF  FC FF FF FF 05 00 00 00  40 2F 04 00 01 00 00 00  00 00 00 00 F0 06 00 00  ....    ⁿ   ♣...@/♦.☺.......≡♠..
000010E0  FC FF FF FF 26 00 00 00  58 2C 04 00 01 00 00 00  00 00 00 00 08 07 00 00  FC FF FF FF 1B 00 00 00  ⁿ   &...X,♦.☺.......◘•..ⁿ   ←...
00001100  50 5F 04 00 01 00 00 00  00 00 00 00 20 07 00 00  09 00 00 00 1A 00 00 00  00 00 00 00 01 00 00 00  P_♦.☺....... •..○...→.......☺...
00001120  00 00 00 00 38 07 00 00  FC FF FF FF 19 00 00 00  A0 2C 04 00 01 00 00 00  00 00 00 00 50 07 00 00  ....8•..ⁿ   ↓...á,♦.☺.......P•..
00001140  32 00 00 00 18 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 68 07 00 00  39 00 00 00 17 00 00 00  2...↑.......☺.......h•..9...↨...
00001160  00 00 00 00 01 00 00 00  00 00 00 00 80 07 00 00  FD FF FF FF 16 00 00 00  20 89 04 00 01 00 00 00  ....☺.......Ç•..²   ▬... ë♦.☺...
00001180  00 00 00 00 98 07 00 00  0B 00 00 00 15 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 B0 07 00 00  ....ÿ•..♂...§.......☺.......░•..
000011A0  FD FF FF FF 14 00 00 00  E0 86 04 00 01 00 00 00  00 00 00 00 C8 07 00 00  08 00 00 00 13 00 00 00  ²   ...αå♦.☺.......╚•..◘...‼...
000011C0  00 00 00 00 01 00 00 00  00 00 00 00 E0 07 00 00  FC FF FF FF 0B 00 00 00  B0 5F 04 00 01 00 00 00  ....☺.......α•..ⁿ   ♂...░_♦.☺...
000011E0  00 00 00 00 F8 07 00 00  09 00 00 00 0A 00 00 00  00 00 00 00 01 00 00 00  00 00 00 00 10 08 00 00  ....°•..○...◙.......☺.......►◘..
00001200  FC FF FF FF 09 00 00 00  88 2C 04 00 01 00 00 00  02 00 00 00 28 08 00 00  32 00 00 00 08 00 00 00  ⁿ   ○...ê,♦.☺...☻...(◘..2...◘...
00001220  00 00 00 00 01 00 00 00  61 20 61 64 40 08 00 00  39 00 00 00 07 00 00 00  00 00 00 00 01 00 00 00  ....☺...a ad@◘..9...•.......☺...
00001240  20 20 20 20 58 08 00 00  FD FF FF FF 06 00 00 00  40 89 04 00 01 00 00 00  20 20 20 20 70 08 00 00      X◘..²   ♠...@ë♦.☺...    p◘..
00001260  0B 00 00 00 05 00 00 00  00 00 00 00 01 00 00 00  6F 6C 75 6D 88 08 00 00  FD FF FF FF 04 00 00 00  ♂...♣.......☺...olumê◘..²   ♦...
00001280  C0 82 04 00 01 00 00 00  72 20 6F 72 A0 08 00 00  08 00 00 00 03 00 00 00  00 00 00 00 01 00 00 00  └é♦.☺...r orá◘..◘...♥.......☺...
000012A0  6D 20 27 74 B8 08 00 00  03 00 00 00 02 00 00 00  00 00 00 00 01 00 00 00  65 63 68 6E FF FF FF FF  m 't╕◘..♥...☻.......☺...echn    
000012C0  FC FF FF FF 01 00 00 00  A8 2C 04 00 01 00 00 00  38 2C 20 69 E8 08 00 00  FD FF FF FF 02 00 00 00  ⁿ   ☺...¿,♦.☺...8, iΦ◘..²   ☻...
000012E0  A0 8C 04 00 01 00 00 00  72 20 61 6E FF FF FF FF  04 00 00 00 01 00 00 00  00 00 00 00 01 00 00 00  áî♦.☺...r an    ♦...☺.......☺...
00001300  65 6E 74 73 FF FF FF FF  02 00 00 00 00 00 00 00  00 00 00 00 01 00 00 00  74 72 69 63 FF FF FF FF  ents    ☻...........☺...tric    
00001320  02 00 00 00 00 00 00 00  00 00 00 00 01 00 00 00  20 6F 6E 20 00 00 00 00  08 01 00 00 40 02 00 00  ☻...........☺... on ....◘☺..@☻..
00001340  18 03 00 00 38 04 00 00  B8 05 00 00 D8 06 00 00  D0 08 00 00 00 09 00 00  18 09 00 00 F0 00 00 00  ↑♥..8♦..╕♣..╪♠..╨◘...○..↑○..≡...
00001360  A0 05 00 00 02 00 00 00  6A 00 02 00 00 00 69 00  02 00 00 00 62 00 09 00  00 00 68 65 61 64 65 72  á♣..☻...j.☻...i.☻...b.○...header
00001380  6F 6E 00 02 00 00 00 61  00 02 00 00 00 7A 00 04  00 00 00 01 00 00 00 00  00 00 00 04 00 00 00 01  on.☻...a.☻...z.♦...☺.......♦...☺
000013A0  00 00 00 02 00 00 00 48  00 02 00 00 00 61 00 08  00 00 00 70 72 65 70 61  72 65 00 02 00 00 00 61  ...☻...H.☻...a.◘...prepare.☻...a
000013C0  00 02 00 00 00 01 00 00  00 00 00 00 00 08 00 00  00 00 00 00 00 00 00 F0  BF 02 00 00 00 69 00 02  .☻...☺.......◘.........≡┐☻...i.☻
000013E0  00 00 00 62 00 08 00 00  00 70 72 65 70 61 72 65  00 02 00 00 00 62 00 02  00 00 00 01 00 00 00 00  ...b.◘...prepare.☻...b.☻...☺....
00001400  00 00 00 08 00 00 00 00  00 00 00 00 00 F0 BF 02  00 00 00 6A 00 02 00 00  00 6A 00 08 00 00 00 63  ...◘.........≡┐☻...j.☻...j.◘...c
00001420  6F 6D 70 61 72 65 00 02  00 00 00 69 00 03 00 00  00 69 66 00 03 00 00 00  6C 30 00 03 00 00 00 6C  ompare.☻...i.♥...if.♥...l0.♥...l
00001440  32 00 03 00 00 00 6C 31  00 02 00 00 00 62 00 08  00 00 00 61 64 64 63 6F  6C 73 00 02 00 00 00 69  2.♥...l1.☻...b.◘...addcols.☻...i
00001460  00 02 00 00 00 01 00 00  00 00 00 00 00 08 00 00  00 00 00 00 00 00 00 00  80 02 00 00 00 6A 00 07  .☻...☺.......◘..........Ç☻...j.•
00001480  00 00 00 63 65 6E 74 65  72 00 02 00 00 00 62 00  03 00 00 00 6C 32 00 03  00 00 00 6C 30 00 02 00  ...center.☻...b.♥...l2.♥...l0.☻.
000014A0  00 00 61 00 08 00 00 00  61 64 64 63 6F 6C 73 00  02 00 00 00 6A 00 02 00  00 00 01 00 00 00 00 00  ..a.◘...addcols.☻...j.☻...☺.....
000014C0  00 00 08 00 00 00 00 00  00 00 00 00 00 80 02 00  00 00 69 00 07 00 00 00  63 65 6E 74 65 72 00 02  ..◘..........Ç☻...i.•...center.☻
000014E0  00 00 00 61 00 03 00 00  00 6C 31 00 02 00 00 00  7A 00 0B 00 00 00 61 64  6A 75 73 74 64 6F 77 6E  ...a.♥...l1.☻...z.♂...adjustdown
00001500  00 02 00 00 00 61 00 04  00 00 00 01 00 00 00 00  00 00 00 04 00 00 00 01  00 00 00 04 00 00 00 01  .☻...a.♦...☺.......♦...☺...♦...☺
00001520  00 00 00 00 00 00 00 04  00 00 00 01 00 00 00 09  00 00 00 61 64 6A 75 73  74 75 70 00 02 00 00 00  .......♦...☺...○...adjustup.☻...
00001540  61 00 04 00 00 00 01 00  00 00 00 00 00 00 04 00  00 00 01 00 00 00 04 00  00 00 01 00 00 00 00 00  a.♦...☺.......♦...☺...♦...☺.....
00001560  00 00 04 00 00 00 01 00  00 00 02 00 00 00 7A 00  04 00 00 00 01 00 00 00  00 00 00 00 04 00 00 00  ..♦...☺...☻...z.♦...☺.......♦...
00001580  00 00 00 00 78 03 00 00  00 69 6E 00 00 01 00 00  00 0C 00 00 1F 00 00 00  06 00 00 00 05 00 00 00  ....x♥...in..☺...♀..▼...♠...♣...
000015A0  07 00 00 00 0F 00 00 00  02 00 00 00 01 00 00 00  01 00 00 00 08 00 00 00  68 01 00 00 02 00 00 00  •...☼...☻...☺...☺...◘...h☺..☻...
000015C0  01 00 00 00 06 00 00 00  3C 00 00 00 20 7A 23 62  20 69 6E 20 6D 20 20 20  20 20 20 20 20 20 20 20  ☺...♠...<... z#b in m           
000015E0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00001600  20 20 20 20 20 20 20 20  20 27 7A 65 72 6F 20 69  73 20 69 6E 76 61 6C 69  64 20 61 72 67 75 6D 65           'zero is invalid argume
00001620  6E 74 27 68 61 6E 67 20  30 3D 31 59 6D 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  nt'hang 0=1Ym                   
00001640  20 20 20 20 20 7A 23 28  31 20 31 2C 52 7A 29 52  7A 23 62 2C 6D 20 20 20  20 20 20 20 20 20 20 20       z#(1 1,Rz)Rz#b,m           
00001660  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00001680  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 20   $0                             
000016A0  20 20 20 20 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 69 6E 20                              "in 
000016C0  2D 20 73 65 65 20 47 74  6F 2E 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  - see Gto.                      
000016E0  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 74                          "from 't
00001700  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 63  he apl handbook of techniques' c
00001720  6F 70 79 72 69 67 68 74  20 31 39 37 38 2C 20 69  62 6D 2E 20 18 00 00 00  FF FF FF FF FC FF FF FF  opyright 1978, ibm. ↑...    ⁿ   
00001740  08 00 00 00 38 2F 04 00  01 00 00 00 01 00 00 00  30 00 00 00 FC FF FF FF  05 00 00 00 20 2C 04 00  ◘...8/♦.☺...☺...0...ⁿ   ♣... ,♦.
00001760  01 00 00 00 6E 20 62 3B  00 00 00 00 FC FF FF FF  03 00 00 00 A8 2D 04 00  01 00 00 00 20 20 20 20  ☺...n b;....ⁿ   ♥...¿-♦.☺...    
00001780  60 00 00 00 03 00 00 00  02 00 00 00 00 00 00 00  01 00 00 00 20 69 23 2D  30 00 00 00 FC FF FF FF  `...♥...☻.......☺... i#-0...ⁿ   
000017A0  01 00 00 00 08 2F 04 00  01 00 00 00 23 31 20 20  90 00 00 00 FC FF FF FF  24 00 00 00 28 2F 04 00  ☺...◘/♦.☺...#1  É...ⁿ   $...(/♦.
000017C0  01 00 00 00 20 20 20 20  A8 00 00 00 39 00 00 00  23 00 00 00 00 00 00 00  01 00 00 00 70 61 72 65  ☺...    ¿...9...#.......☺...pare
000017E0  C0 00 00 00 FD FF FF FF  22 00 00 00 C0 8F 04 00  01 00 00 00 20 20 20 20  D8 00 00 00 1D 00 00 00  └...²   "...└Å♦.☺...    ╪...↔...
00001800  21 00 00 00 00 00 00 00  01 00 00 00 20 24 28 6C  F0 00 00 00 FD FF FF FF  20 00 00 00 40 8B 04 00  !.......☺... $(l≡...²    ...@ï♦.
00001820  01 00 00 00 20 6A 20 20  08 01 00 00 FC FF FF FF  1B 00 00 00 30 2F 04 00  01 00 00 00 20 20 20 20  ☺... j  ◘☺..ⁿ   ←...0/♦.☺...    
00001840  FF FF FF FF 07 00 00 00  01 00 00 00 C0 B3 05 00  01 00 00 00 6E 74 65 72  38 01 00 00 FC FF FF FF      •...☺...└│♣.☺...nter8☺..ⁿ   
00001860  10 00 00 00 D8 2D 04 00  01 00 00 00 20 20 20 20  50 01 00 00 0C 00 00 00  0F 00 00 00 00 00 00 00  ►...╪-♦.☺...    P☺..♀...☼.......
00001880  01 00 00 00 6C 31 3A 61  68 01 00 00 FC FF FF FF  0E 00 00 00 80 2E 04 00  01 00 00 00 61 20 20 20  ☺...l1:ah☺..ⁿ   ♫...Ç.♦.☺...a   
000018A0  80 01 00 00 03 00 00 00  0D 00 00 00 00 00 00 00  01 00 00 00 20 20 20 20  98 01 00 00 FC FF FF FF  Ç☺..♥...♪.......☺...    ÿ☺..ⁿ   
000018C0  0C 00 00 00 B8 2D 04 00  01 00 00 00 64 6A 75 73  B0 01 00 00 32 00 00 00  0B 00 00 00 00 00 00 00  ♀...╕-♦.☺...djus░☺..2...♂.......
000018E0  01 00 00 00 6E 20 7A 20  C8 01 00 00 09 00 00 00  0A 00 00 00 00 00 00 00  01 00 00 00 20 24 30 20  ☺...n z ╚☺..○...◙.......☺... $0 
00001900  E0 01 00 00 FC FF FF FF  09 00 00 00 18 2F 04 00  01 00 00 00 20 20 20 20  F8 01 00 00 32 00 00 00  α☺..ⁿ   ○...↑/♦.☺...    °☺..2...
00001920  08 00 00 00 00 00 00 00  01 00 00 00 20 20 20 20  10 02 00 00 0C 00 00 00  07 00 00 00 00 00 00 00  ◘.......☺...    ►☻..♀...•.......
00001940  01 00 00 00 70 75 74 73  28 02 00 00 FD FF FF FF  06 00 00 00 20 85 04 00  01 00 00 00 72 74 20 20  ☺...puts(☻..²   ♠... à♦.☺...rt  
00001960  40 02 00 00 FD FF FF FF  04 00 00 00 20 8E 04 00  01 00 00 00 22 66 72 6F  58 02 00 00 08 00 00 00  @☻..²   ♦... Ä♦.☺..."froX☻..◘...
00001980  03 00 00 00 00 00 00 00  01 00 00 00 6F 66 20 74  70 02 00 00 03 00 00 00  02 00 00 00 00 00 00 00  ♥.......☺...of tp☻..♥...☻.......
000019A0  01 00 00 00 20 31 39 37  FF FF FF FF FC FF FF FF  01 00 00 00 20 2F 04 00  01 00 00 00 B8 2A 04 00  ☺... 197    ⁿ   ☺... /♦.☺...╕*♦.
000019C0  A0 02 00 00 FD FF FF FF  02 00 00 00 E0 8D 04 00  01 00 00 00 00 00 00 00  FF FF FF FF 04 00 00 00  á☻..²   ☻...αì♦.☺.......    ♦...
000019E0  01 00 00 00 00 00 00 00  01 00 00 00 C0 2A 04 00  FF FF FF FF 02 00 00 00  00 00 00 00 00 00 00 00  ☺.......☺...└*♦.    ☻...........
00001A00  01 00 00 00 00 00 00 00  FF FF FF FF 02 00 00 00  00 00 00 00 00 00 00 00  01 00 00 00 00 00 00 00  ☺.......    ☻...........☺.......
00001A20  00 00 00 00 78 00 00 00  20 01 00 00 88 02 00 00  B8 02 00 00 D0 02 00 00  60 00 00 00 FF FF FF FF  ....x... ☺..ê☻..╕☻..╨☻..`...    
00001A40  02 00 00 00 6D 00 03 00  00 00 69 6E 00 02 00 00  00 62 00 02 00 00 00 7A  00 02 00 00 00 6D 00 04  ☻...m.♥...in.☻...b.☻...z.☻...m.♦
00001A60  00 00 00 01 00 00 00 00  00 00 00 04 00 00 00 01  00 00 00 04 00 00 00 01  00 00 00 00 00 00 00 04  ...☺.......♦...☺...♦...☺.......♦
00001A80  00 00 00 00 00 00 00 05  00 00 00 68 61 6E 67 00  08 00 00 00 18 00 00 00  01 00 00 00 01 00 00 00  .......♣...hang.◘...↑...☺...☺...
00001AA0  18 00 00 00 7A 65 72 6F  20 69 73 20 69 6E 76 61  6C 69 64 20 61 72 67 75  6D 65 6E 74 02 00 00 00  ↑...zero is invalid argument☻...
00001AC0  6D 00 02 00 00 00 62 00  02 00 00 00 7A 00 02 00  00 00 7A 00 04 00 00 00  01 00 00 00 00 00 00 00  m.☻...b.☻...z.☻...z.♦...☺.......
00001AE0  04 00 00 00 01 00 00 00  04 00 00 00 01 00 00 00  00 00 00 00 04 00 00 00  01 00 00 00 02 00 00 00  ♦...☺...♦...☺.......♦...☺...☻...
00001B00  7A 00 04 00 00 00 01 00  00 00 00 00 00 00 04 00  00 00 00 00 00 00 78 03  00 00 00 69 66 00 00 01  z.♦...☺.......♦.......x♥...if..☺
00001B20  00 00 00 0C 00 00 0C 00  00 00 04 00 00 00 05 00  00 00 01 00 00 00 01 00  00 00 05 00 00 00 08 00  ...♀..♀...♦...♣...☺...☺...♣...◘.
00001B40  00 00 F0 00 00 00 02 00  00 00 01 00 00 00 04 00  00 00 3C 00 00 00 72 20  23 20 61 20 69 66 20 62  ..≡...☻...☺...♦...<...r # a if b
00001B60  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00001B80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 22 69 66 20 2D 20  63 6F 6E 64 69 74 69 6F                    "if - conditio
00001BA0  6E 20 61 73 73 69 67 6E  6D 65 6E 74 2E 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  n assignment.                   
00001BC0  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 61 6E                "from 'the apl han
00001BE0  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 20 31  dbook of techniques' copyright 1
00001C00  39 37 38 2C 20 69 62 6D  2E 20 20 72 20 23 20 62  20 60 2F 20 61 20 20 20  20 20 20 20 20 20 20 20  978, ibm.  r # b `/ a           
00001C20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00001C40  20 20 20 20 20 20 18 00  00 00 FF FF FF FF FC FF  FF FF 09 00 00 00 58 2F  04 00 01 00 00 00 01 00        ↑...    ⁿ   ○...X/♦.☺...☺.
00001C60  00 00 30 00 00 00 FC FF  FF FF 06 00 00 00 10 2F  04 00 01 00 00 00 6E 20  62 3B 00 00 00 00 FC FF  ..0...ⁿ   ♠...►/♦.☺...n b;....ⁿ 
00001C80  FF FF 04 00 00 00 68 2C  04 00 01 00 00 00 20 20  20 20 60 00 00 00 03 00  00 00 02 00 00 00 00 00    ♦...h,♦.☺...    `...♥...☻.....
00001CA0  00 00 01 00 00 00 20 69  23 2D 30 00 00 00 FC FF  FF FF 00 00 00 00 60 2F  04 00 01 00 00 00 23 31  ..☺... i#-0...ⁿ   ....`/♦.☺...#1
00001CC0  20 20 FF FF FF FF 02 00  00 00 00 00 00 00 00 00  00 00 01 00 00 00 20 20  20 20 FF FF FF FF 02 00        ☻...........☺...        ☻.
00001CE0  00 00 00 00 00 00 00 00  00 00 01 00 00 00 70 61  72 65 C0 00 00 00 FC FF  FF FF 0A 00 00 00 A8 2E  ..........☺...pare└...ⁿ   ◙...¿.
00001D00  04 00 01 00 00 00 20 20  20 20 D8 00 00 00 40 00  00 00 07 00 00 00 00 00  00 00 01 00 00 00 20 24  ♦.☺...    ╪...@...•.......☺... $
00001D20  28 6C F0 00 00 00 FC FF  FF FF 05 00 00 00 00 2F  04 00 01 00 00 00 20 6A  20 20 08 01 00 00 03 00  (l≡...ⁿ   ♣..../♦.☺... j  ◘☺..♥.
00001D40  00 00 03 00 00 00 00 00  00 00 01 00 00 00 20 20  20 20 FF FF FF FF FC FF  FF FF 01 00 00 00 70 2C  ..♥.......☺...        ⁿ   ☺...p,
00001D60  04 00 01 00 00 00 6E 74  65 72 00 00 00 00 78 00  00 00 90 00 00 00 A8 00  00 00 60 00 00 00 FF FF  ♦.☺...nter....x...É...¿...`...  
00001D80  FF FF 02 00 00 00 62 00  03 00 00 00 69 66 00 02  00 00 00 61 00 02 00 00  00 72 00 02 00 00 00 61    ☻...b.♥...if.☻...a.☻...r.☻...a
00001DA0  00 02 00 00 00 62 00 02  00 00 00 72 00 78 03 00  00 00 69 73 00 00 01 00  00 00 0C 00 00 1C 00 00  .☻...b.☻...r.x♥...is..☺...♀..∟..
00001DC0  00 05 00 00 00 05 00 00  00 13 00 00 00 02 00 00  00 01 00 00 00 01 00 00  00 08 00 00 00 2C 01 00  .♣...♣...‼...☻...☺...☺...◘...,☺.
00001DE0  00 02 00 00 00 01 00 00  00 05 00 00 00 3C 00 00  00 20 72 23 61 20 69 73  20 62 20 20 20 20 20 20  .☻...☺...♣...<... r#a is b      
00001E00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00001E20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 72 23  28 30 5E 3D 30 5C 30 52  61 29 3D 30 5E 3D 30 5C                r#(0^=0\0Ra)=0^=0\
00001E40  30 52 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  0Rb                             
00001E60  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 20 20 20            $0                    
00001E80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00001EA0  20 20 20 20 20 22 69 73  20 2D 20 74 72 75 65 2C  20 69 66 20 62 6F 74 68  20 6E 75 6D 65 72 69 63       "is - true, if both numeric
00001EC0  2C 20 6F 72 20 69 66 20  62 6F 74 68 20 63 68 61  72 61 63 74 65 72 2E 20  20 20 20 20 20 20 20 20  , or if both character.         
00001EE0  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 65 63 68   "from 'the apl handbook of tech
00001F00  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 18 00 00  niques' copyright 1978, ibm. ↑..
00001F20  00 FF FF FF FF FC FF FF  FF 08 00 00 00 30 2C 04  00 01 00 00 00 01 00 00  00 30 00 00 00 FC FF FF  .    ⁿ   ◘...0,♦.☺...☺...0...ⁿ  
00001F40  FF 05 00 00 00 40 2D 04  00 01 00 00 00 62 20 20  20 00 00 00 00 FC FF FF  FF 03 00 00 00 50 2C 04   ♣...@-♦.☺...b   ....ⁿ   ♥...P,♦
00001F60  00 01 00 00 00 20 20 20  20 60 00 00 00 03 00 00  00 02 00 00 00 00 00 00  00 01 00 00 00 20 20 20  .☺...    `...♥...☻.......☺...   
00001F80  20 30 00 00 00 FC FF FF  FF 01 00 00 00 68 2D 04  00 01 00 00 00 65 78 20  69 90 00 00 00 FC FF FF   0...ⁿ   ☺...h-♦.☺...ex iÉ...ⁿ  
00001FA0  FF 15 00 00 00 38 2C 04  00 01 00 00 00 62 65 72  73 A8 00 00 00 32 00 00  00 14 00 00 00 00 00 00   §...8,♦.☺...bers¿...2.........
00001FC0  00 01 00 00 00 72 6F 6D  20 C0 00 00 00 FD FF FF  FF 13 00 00 00 80 87 04  00 01 00 00 00 20 74 65  .☺...rom └...²   ‼...Çç♦.☺... te
00001FE0  63 D8 00 00 00 3C 00 00  00 12 00 00 00 00 00 00  00 01 00 00 00 39 37 38  2C F0 00 00 00 FD FF FF  c╪...<...↕.......☺...978,≡...²  
00002000  FF 11 00 00 00 60 8B 04  00 01 00 00 00 20 74 68  65 08 01 00 00 3E 00 00  00 0F 00 00 00 00 00 00   ◄...`ï♦.☺... the◘☺..>...☼......
00002020  00 01 00 00 00 61 63 68  20 20 01 00 00 FD FF FF  FF 0E 00 00 00 60 84 04  00 01 00 00 00 68 6F 73  .☺...ach  ☺..²   ♫...`ä♦.☺...hos
00002040  65 38 01 00 00 1D 00 00  00 0D 00 00 00 00 00 00  00 01 00 00 00 6E 20 61  2E 50 01 00 00 09 00 00  e8☺..↔...♪.......☺...n a.P☺..○..
00002060  00 0C 00 00 00 00 00 00  00 01 00 00 00 2E 20 20  74 68 01 00 00 FC FF FF  FF 0B 00 00 00 18 2C 04  .♀.......☺....  th☺..ⁿ   ♂...↑,♦
00002080  00 01 00 00 00 20 22 20  6E 80 01 00 00 32 00 00  00 0A 00 00 00 00 00 00  00 01 00 00 00 61 72 67  .☺... " nÇ☺..2...◙.......☺...arg
000020A0  75 98 01 00 00 FD FF FF  FF 09 00 00 00 A0 87 04  00 01 00 00 00 63 68 61  72 B0 01 00 00 3C 00 00  uÿ☺..²   ○...áç♦.☺...char░☺..<..
000020C0  00 08 00 00 00 00 00 00  00 01 00 00 00 72 69 63  2E C8 01 00 00 FD FF FF  FF 07 00 00 00 60 81 04  .◘.......☺...ric.╚☺..²   •...`ü♦
000020E0  00 01 00 00 00 20 20 20  20 E0 01 00 00 3E 00 00  00 05 00 00 00 00 00 00  00 01 00 00 00 20 20 20  .☺...    α☺..>...♣.......☺...   
00002100  20 F8 01 00 00 FD FF FF  FF 04 00 00 00 E0 89 04  00 01 00 00 00 31 55 52  62 10 02 00 00 08 00 00   °☺..²   ♦...αë♦.☺...1URb►☻..◘..
00002120  00 03 00 00 00 00 00 00  00 01 00 00 00 20 20 20  20 28 02 00 00 03 00 00  00 02 00 00 00 00 00 00  .♥.......☺...    (☻..♥...☻......
00002140  00 01 00 00 00 20 20 20  20 FF FF FF FF FC FF FF  FF 01 00 00 00 28 2C 04  00 01 00 00 00 20 75 73  .☺...        ⁿ   ☺...(,♦.☺... us
00002160  65 58 02 00 00 FD FF FF  FF 02 00 00 00 C0 85 04  00 01 00 00 00 20 20 20  20 FF FF FF FF 04 00 00  eX☻..²   ☻...└à♦.☺...        ♦..
00002180  00 01 00 00 00 00 00 00  00 01 00 00 00 6F 6E 20  64 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  .☺.......☺...on d    ☻..........
000021A0  00 01 00 00 00 65 63 74  20 FF FF FF FF 02 00 00  00 00 00 00 00 00 00 00  00 01 00 00 00 20 20 20  .☺...ect     ☻...........☺...   
000021C0  20 00 00 00 00 78 00 00  00 40 02 00 00 70 02 00  00 88 02 00 00 60 00 00  00 FF FF FF FF 02 00 00   ....x...@☻..p☻..ê☻..`...    ☻..
000021E0  00 62 00 03 00 00 00 69  73 00 02 00 00 00 61 00  02 00 00 00 72 00 02 00  00 00 62 00 04 00 00 00  .b.♥...is.☻...a.☻...r.☻...b.♦...
00002200  01 00 00 00 00 00 00 00  04 00 00 00 00 00 00 00  04 00 00 00 01 00 00 00  00 00 00 00 04 00 00 00  ☺.......♦.......♦...☺.......♦...
00002220  00 00 00 00 04 00 00 00  01 00 00 00 00 00 00 00  04 00 00 00 00 00 00 00  02 00 00 00 61 00 04 00  ....♦...☺.......♦.......☻...a.♦.
00002240  00 00 01 00 00 00 00 00  00 00 04 00 00 00 00 00  00 00 04 00 00 00 01 00  00 00 00 00 00 00 04 00  ..☺.......♦.......♦...☺.......♦.
00002260  00 00 00 00 00 00 04 00  00 00 01 00 00 00 00 00  00 00 04 00 00 00 00 00  00 00 02 00 00 00 72 00  ......♦...☺.......♦.......☻...r.
00002280  04 00 00 00 01 00 00 00  00 00 00 00 04 00 00 00  00 00 00 00 78 08 00 00  00 69 6E 74 65 67 65 72  ♦...☺.......♦.......x◘...integer
000022A0  00 00 01 00 00 00 0A 00  00 1B 00 00 00 06 00 00  00 04 00 00 00 09 00 00  00 0A 00 00 00 02 00 00  ..☺...◙..←...♠...♦...○...◙...☻..
000022C0  00 01 00 00 00 01 00 00  00 08 00 00 00 68 01 00  00 02 00 00 00 01 00 00  00 06 00 00 00 3C 00 00  .☺...☺...◘...h☺..☻...☺...♠...<..
000022E0  00 20 74 23 69 6E 74 65  67 65 72 20 61 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  . t#integer a                   
00002300  20 20 20 20 20 20 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                                $(
00002320  63 68 61 72 61 63 74 65  72 20 61 29 2F 74 23 30  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  character a)/t#0                
00002340  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 74 23 30 26 2E 3D                            t#0&.=
00002360  31 7C 2C 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  1|,a                            
00002380  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 20 20 20                        $0        
000023A0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
000023C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 22 69 6E 74 65 67 65  72 20 2D 20 72 65 74 75                   "integer - retu
000023E0  72 6E 73 20 31 20 69 66  20 73 74 72 75 63 74 75  72 65 20 63 6F 6E 74 61  69 6E 73 20 6F 6E 6C 79  rns 1 if structure contains only
00002400  20 69 6E 74 65 67 65 72  73 2E 20 20 20 22 66 72  6F 6D 20 27 74 68 65 20  61 70 6C 20 68 61 6E 64   integers.   "from 'the apl hand
00002420  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
00002440  37 38 2C 20 69 62 6D 2E  20 18 00 00 00 FF FF FF  FF FC FF FF FF 0B 00 00  00 70 2D 04 00 01 00 00  78, ibm. ↑...    ⁿ   ♂...p-♦.☺..
00002460  00 01 00 00 00 30 00 00  00 FC FF FF FF 03 00 00  00 D0 2D 04 00 01 00 00  00 3B 74 20 20 48 00 00  .☺...0...ⁿ   ♥...╨-♦.☺...;t  H..
00002480  00 03 00 00 00 02 00 00  00 00 00 00 00 01 00 00  00 20 20 20 20 00 00 00  00 FC FF FF FF 01 00 00  .♥...☻.......☺...    ....ⁿ   ☺..
000024A0  00 C8 2D 04 00 01 00 00  00 22 6D 75 6C 78 00 00  00 FD FF FF FF 12 00 00  00 80 8A 04 00 01 00 00  .╚-♦.☺..."mulx...²   ↕...Çè♦.☺..
000024C0  00 64 69 76 69 90 00 00  00 03 00 00 00 11 00 00  00 00 00 00 00 01 00 00  00 20 20 20 20 A8 00 00  .diviÉ...♥...◄.......☺...    ¿..
000024E0  00 FC FF FF FF 10 00 00  00 28 2D 04 00 01 00 00  00 20 62 29 2F C0 00 00  00 0F 00 00 00 0F 00 00  .ⁿ   ►...(-♦.☺... b)/└...☼...☼..
00002500  00 00 00 00 00 01 00 00  00 20 20 20 20 D8 00 00  00 09 00 00 00 0E 00 00  00 00 00 00 00 01 00 00  .....☺...    ╪...○...♫.......☺..
00002520  00 22 73 70 65 F0 00 00  00 FC FF FF FF 0D 00 00  00 60 2C 04 00 01 00 00  00 69 66 20 62 08 01 00  ."spe≡...ⁿ   ♪...`,♦.☺...if b◘☺.
00002540  00 FC FF FF FF 03 00 00  00 80 5F 04 00 01 00 00  00 20 20 20 20 20 01 00  00 08 00 00 00 02 00 00  .ⁿ   ♥...Ç_♦.☺...     ☺..◘...☻..
00002560  00 00 00 00 00 01 00 00  00 62 29 3D 31 FF FF FF  FF 04 00 00 00 01 00 00  00 00 00 00 00 01 00 00  .....☺...b)=1    ♦...☺.......☺..
00002580  00 20 20 20 20 50 01 00  00 FC FF FF FF 0A 00 00  00 50 2D 04 00 01 00 00  00 6C 31 3A 63 68 01 00  .    P☺..ⁿ   ◙...P-♦.☺...l1:ch☺.
000025A0  00 0C 00 00 00 09 00 00  00 00 00 00 00 01 00 00  00 6D 2C 31 59 80 01 00  00 83 00 00 00 08 00 00  .♀...○.......☺...m,1YÇ☺..â...◘..
000025C0  00 00 00 00 00 01 00 00  00 20 20 20 20 98 01 00  00 FD FF FF FF 07 00 00  00 40 8D 04 00 01 00 00  .....☺...    ÿ☺..²   •...@ì♦.☺..
000025E0  00 20 20 20 20 B0 01 00  00 1D 00 00 00 06 00 00  00 00 00 00 00 01 00 00  00 20 20 20 20 C8 01 00  .    ░☺..↔...♠.......☺...    ╚☺.
00002600  00 0E 00 00 00 05 00 00  00 00 00 00 00 01 00 00  00 20 24 28 30 E0 01 00  00 06 00 00 00 04 00 00  .♫...♣.......☺... $(0α☺..♠...♦..
00002620  00 00 00 00 00 01 00 00  00 20 20 20 20 F8 01 00  00 FD FF FF FF 03 00 00  00 40 8E 04 00 01 00 00  .....☺...    °☺..²   ♥...@Ä♦.☺..
00002640  00 20 20 20 20 10 02 00  00 03 00 00 00 02 00 00  00 00 00 00 00 01 00 00  00 20 20 20 20 FF FF FF  .    ►☻..♥...☻.......☺...       
00002660  FF FC FF FF FF 01 00 00  00 20 2D 04 00 01 00 00  00 20 20 20 20 40 02 00  00 FD FF FF FF 02 00 00   ⁿ   ☺... -♦.☺...    @☻..²   ☻..
00002680  00 00 87 04 00 01 00 00  00 6C 32 3A 72 FF FF FF  FF 04 00 00 00 01 00 00  00 00 00 00 00 01 00 00  ..ç♦.☺...l2:r    ♦...☺.......☺..
000026A0  00 20 20 20 20 FF FF FF  FF 02 00 00 00 00 00 00  00 00 00 00 00 01 00 00  00 20 20 20 20 FF FF FF  .        ☻...........☺...       
000026C0  FF 02 00 00 00 00 00 00  00 00 00 00 00 01 00 00  00 30 20 30 29 00 00 00  00 60 00 00 00 38 01 00   ☻...........☺...0 0)....`...8☺.
000026E0  00 28 02 00 00 58 02 00  00 70 02 00 00 48 00 00  00 FF FF FF FF 02 00 00  00 61 00 08 00 00 00 69  .(☻..X☻..p☻..H...    ☻...a.◘...i
00002700  6E 74 65 67 65 72 00 02  00 00 00 74 00 04 00 00  00 01 00 00 00 00 00 00  00 04 00 00 00 00 00 00  nteger.☻...t.♦...☺.......♦......
00002720  00 02 00 00 00 74 00 02  00 00 00 61 00 0A 00 00  00 63 68 61 72 61 63 74  65 72 00 02 00 00 00 61  .☻...t.☻...a.◙...character.☻...a
00002740  00 04 00 00 00 01 00 00  00 00 00 00 00 04 00 00  00 01 00 00 00 04 00 00  00 01 00 00 00 00 00 00  .♦...☺.......♦...☺...♦...☺......
00002760  00 04 00 00 00 00 00 00  00 02 00 00 00 74 00 04  00 00 00 01 00 00 00 00  00 00 00 04 00 00 00 00  .♦.......☻...t.♦...☺.......♦....
00002780  00 00 00 78 06 00 00 00  69 6E 64 65 78 00 00 01  00 00 00 0C 00 00 1A 00  00 00 08 00 00 00 05 00  ...x♠...index..☺...♀..→...◘...♣.
000027A0  00 00 01 00 00 00 01 00  00 00 01 00 00 00 01 00  00 00 01 00 00 00 01 00  00 00 0F 00 00 00 08 00  ..☺...☺...☺...☺...☺...☺...☼...◘.
000027C0  00 00 08 02 00 00 02 00  00 00 01 00 00 00 08 00  00 00 41 00 00 00 7A 20  23 20 61 20 69 6E 64 65  ..◘☻..☻...☺...◘...A...z # a inde
000027E0  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 20 20 20 20  x b                             
00002800  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  69 6E 64 65 78 20 2D 20                         "index - 
00002820  63 6F 6C 75 6D 6E 20 69  6E 64 65 78 20 69 6E 20  6D 61 74 72 69 78 20 62  20 77 68 6F 73 65 20 6D  column index in matrix b whose m
00002840  65 6D 62 65 72 73 20 61  6C 6C 20 62 65 6C 6F 6E  67 20 74 6F 20 61 20 20  22 66 72 6F 6D 20 27 74  embers all belong to a  "from 't
00002860  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 63  he apl handbook of techniques' c
00002880  6F 70 79 72 69 67 68 74  20 31 39 37 38 2C 20 69  62 6D 2E 20 20 20 20 20  20 22 2D 72 65 74 75 72  opyright 1978, ibm.      "-retur
000028A0  6E 73 20 74 68 65 20 69  6E 64 65 78 20 70 6F 73  69 74 69 6F 6E 20 6F 66  20 65 61 63 68 20 63 6F  ns the index position of each co
000028C0  6C 75 6D 6E 20 6F 66 20  62 20 61 6C 6C 20 6F 66  20 77 68 6F 73 65 20 20  20 20 22 20 65 6C 65 6D  lumn of b all of whose    " elem
000028E0  65 6E 74 73 20 61 72 65  20 69 6E 20 61 2E 20 20  62 20 6D 75 73 74 20 62  65 20 61 20 6D 61 74 72  ents are in a.  b must be a matr
00002900  69 78 2E 20 20 74 68 65  20 73 68 61 70 73 20 6F  66 20 61 20 69 73 20 20  20 20 20 22 20 6E 6F 74  ix.  the shaps of a is     " not
00002920  20 72 65 73 74 72 69 63  74 65 64 2E 20 20 74 68  65 20 61 72 67 75 6D 65  6E 74 73 20 6D 61 79 20   restricted.  the arguments may 
00002940  62 65 20 65 69 74 68 65  72 20 63 68 61 72 61 63  74 65 72 20 6F 72 20 20  20 20 20 20 22 20 6E 75  be either character or      " nu
00002960  6D 65 72 69 63 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 20 20  meric.                          
00002980  20 20 20 20 20 20 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                                z#
000029A0  28 26 60 2F 62 45 61 29  2F 49 31 55 52 62 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  (&`/bEa)/I1URb                  
000029C0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 18 00                                ↑.
000029E0  00 00 FF FF FF FF FC FF  FF FF 0C 00 00 00 98 2D  04 00 01 00 00 00 01 00  00 00 30 00 00 00 FC FF  ..    ⁿ   ♀...ÿ-♦.☺...☺...0...ⁿ 
00002A00  FF FF 06 00 00 00 80 2B  04 00 01 00 00 00 20 20  20 20 00 00 00 00 FC FF  FF FF 04 00 00 00 C0 2D    ♠...Ç+♦.☺...    ....ⁿ   ♦...└-
00002A20  04 00 01 00 00 00 20 20  20 20 60 00 00 00 03 00  00 00 02 00 00 00 00 00  00 00 01 00 00 00 20 72  ♦.☺...    `...♥...☻.......☺... r
00002A40  23 28 30 00 00 00 FC FF  FF FF 00 00 00 00 58 2D  04 00 01 00 00 00 20 20  20 20 FF FF FF FF 02 00  #(0...ⁿ   ....X-♦.☺...        ☻.
00002A60  00 00 00 00 00 00 00 00  00 00 01 00 00 00 20 20  20 20 FF FF FF FF 02 00  00 00 00 00 00 00 00 00  ..........☺...        ☻.........
00002A80  00 00 01 00 00 00 20 20  20 20 FF FF FF FF 02 00  00 00 00 00 00 00 00 00  00 00 01 00 00 00 20 20  ..☺...        ☻...........☺...  
00002AA0  20 20 FF FF FF FF 02 00  00 00 00 00 00 00 00 00  00 00 01 00 00 00 22 64  69 66 FF FF FF FF 02 00        ☻...........☺..."dif    ☻.
00002AC0  00 00 00 00 00 00 00 00  00 00 01 00 00 00 65 65  6E 20 FF FF FF FF 02 00  00 00 00 00 00 00 00 00  ..........☺...een     ☻.........
00002AE0  00 00 01 00 00 00 20 20  20 20 20 01 00 00 FC FF  FF FF 10 00 00 00 78 2D  04 00 01 00 00 00 70 6C  ..☺...     ☺..ⁿ   ►...x-♦.☺...pl
00002B00  20 68 38 01 00 00 32 00  00 00 0F 00 00 00 00 00  00 00 01 00 00 00 73 27  20 63 50 01 00 00 35 00   h8☺..2...☼.......☺...s' cP☺..5.
00002B20  00 00 0E 00 00 00 00 00  00 00 01 00 00 00 22 2D  61 20 68 01 00 00 FD FF  FF FF 0D 00 00 00 60 8E  ..♫.......☺..."-a h☺..²   ♪...`Ä
00002B40  04 00 01 00 00 00 74 75  72 65 80 01 00 00 29 00  00 00 0C 00 00 00 00 00  00 00 01 00 00 00 20 20  ♦.☺...tureÇ☺..)...♀.......☺...  
00002B60  20 20 98 01 00 00 0F 00  00 00 0B 00 00 00 00 00  00 00 01 00 00 00 66 65  77 65 B0 01 00 00 09 00    ÿ☺..☼...♂.......☺...fewe░☺..○.
00002B80  00 00 0A 00 00 00 00 00  00 00 01 00 00 00 64 20  63 6F C8 01 00 00 FC FF  FF FF 09 00 00 00 80 2D  ..◙.......☺...d co╚☺..ⁿ   ○...Ç-
00002BA0  04 00 01 00 00 00 22 20  73 75 E0 01 00 00 25 00  00 00 08 00 00 00 00 00  00 00 01 00 00 00 2C 20  ♦.☺..." suα☺..%...◘.......☺..., 
00002BC0  61 5B F8 01 00 00 FC FF  FF FF 07 00 00 00 88 2D  04 00 01 00 00 00 5D 20  20 20 10 02 00 00 40 00  a[°☺..ⁿ   •...ê-♦.☺...]   ►☻..@.
00002BE0  00 00 05 00 00 00 00 00  00 00 01 00 00 00 2E 27  20 72 28 02 00 00 06 00  00 00 04 00 00 00 00 00  ..♣.......☺....' r(☻..♠...♦.....
00002C00  00 00 01 00 00 00 75 6D  62 65 40 02 00 00 08 00  00 00 03 00 00 00 00 00  00 00 01 00 00 00 20 73  ..☺...umbe@☻..◘...♥.......☺... s
00002C20  65 65 58 02 00 00 03 00  00 00 02 00 00 00 00 00  00 00 01 00 00 00 65 64  20 74 FF FF FF FF FC FF  eeX☻..♥...☻.......☺...ed t    ⁿ 
00002C40  FF FF 01 00 00 00 90 2D  04 00 01 00 00 00 65 73  2C 20 00 00 00 00 78 00  00 00 90 00 00 00 A8 00    ☺...É-♦.☺...es, ....x...É...¿.
00002C60  00 00 C0 00 00 00 D8 00  00 00 F0 00 00 00 08 01  00 00 60 00 00 00 FF FF  FF FF 02 00 00 00 62 00  ..└...╪...≡...◘☺..`...    ☻...b.
00002C80  06 00 00 00 69 6E 64 65  78 00 02 00 00 00 61 00  02 00 00 00 7A 00 02 00  00 00 62 00 04 00 00 00  ♠...index.☻...a.☻...z.☻...b.♦...
00002CA0  01 00 00 00 00 00 00 00  04 00 00 00 01 00 00 00  02 00 00 00 61 00 02 00  00 00 62 00 02 00 00 00  ☺.......♦...☺...☻...a.☻...b.☻...
00002CC0  7A 00 78 05 00 00 00 68  61 6E 67 00 00 01 00 00  00 04 00 00 10 00 00 00  07 00 00 00 03 00 00 00  z.x♣...hang..☺...♦..►...•...♥...
00002CE0  05 00 00 00 01 00 00 00  03 00 00 00 02 00 00 00  01 00 00 00 01 00 00 00  08 00 00 00 A4 01 00 00  ♣...☺...♥...☻...☺...☺...◘...ñ☺..
00002D00  02 00 00 00 01 00 00 00  07 00 00 00 3C 00 00 00  20 6D 73 67 20 68 61 6E  67 20 63 6F 6E 64 69 74  ☻...☺...•...<... msg hang condit
00002D20  69 6F 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  ion                             
00002D40  20 20 20 20 20 20 20 20  20 20 20 20 20 24 30 20  69 66 7E 63 6F 6E 64 69  74 69 6F 6E 20 20 20 20               $0 if~condition    
00002D60  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00002D80  20 20 20 20 20 20 20 20  20 6D 73 67 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20           msg                    
00002DA0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00002DC0  20 20 20 20 20 2D 31 2A  30 2E 35 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20       -1*0.5                     
00002DE0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20                                  
00002E00  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 20   $0                             
00002E20  20 20 20 20 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 68 61 6E                              "han
00002E40  67 20 72 61 69 73 65 73  20 64 6F 6D 61 69 6E 20  65 72 72 6F 72 20 69 66  20 63 6F 6E 64 69 74 69  g raises domain error if conditi
00002E60  6F 6E 20 69 73 20 74 72  75 65 2E 20 20 20 20 20  20 20 20 20 20 20 20 20  22 66 72 6F 6D 20 27 74  on is true.             "from 't
00002E80  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 63  he apl handbook of techniques' c
00002EA0  6F 70 79 72 69 67 68 74  20 31 39 37 38 2C 20 69  62 6D 2E 20 18 00 00 00  FF FF FF FF FC FF FF FF  opyright 1978, ibm. ↑...    ⁿ   
00002EC0  0A 00 00 00 60 5E 04 00  01 00 00 00 01 00 00 00  30 00 00 00 FC FF FF FF  05 00 00 00 C8 2B 04 00  ◙...`^♦.☺...☺...0...ⁿ   ♣...╚+♦.
00002EE0  01 00 00 00 6E 64 69 74  00 00 00 00 FC FF FF FF  01 00 00 00 18 29 04 00  01 00 00 00 20 20 20 20  ☺...ndit....ⁿ   ☺...↑)♦.☺...    
00002F00  60 00 00 00 FC FF FF FF  07 00 00 00 70 5E 04 00  01 00 00 00 20 24 30 20  78 00 00 00 84 00 00 00  `...ⁿ   •...p^♦.☺... $0 x...ä...
00002F20  06 00 00 00 00 00 00 00  01 00 00 00 20 20 20 20  90 00 00 00 FC FF FF FF  04 00 00 00 08 2C 04 00  ♠.......☺...    É...ⁿ   ♦...◘,♦.
00002F40  01 00 00 00 20 20 20 20  A8 00 00 00 FD FF FF FF  02 00 00 00 C0 80 04 00  01 00 00 00 20 20 20 20  ☺...    ¿...²   ☻...└Ç♦.☺...    
00002F60  FF FF FF FF 04 00 00 00  01 00 00 00 00 00 00 00  01 00 00 00 20 20 20 20  FF FF FF FF FC FF FF FF      ♦...☺.......☺...        ⁿ   
00002F80  01 00 00 00 E0 2D 04 00  01 00 00 00 20 2D 31 2A  F0 00 00 00 FD FF FF FF  04 00 00 00 40 BB 05 00  ☺...α-♦.☺... -1*≡...²   ♦...@╗♣.
00002FA0  01 00 00 00 20 20 20 20  08 01 00 00 0A 00 00 00  03 00 00 00 00 00 00 00  01 00 00 00 20 20 20 20  ☺...    ◘☺..◙...♥.......☺...    
00002FC0  FF FF FF FF FD FF FF FF  01 00 00 00 80 B1 05 00  01 00 00 00 20 20 20 20  38 01 00 00 FD FF FF FF      ²   ☺...Ç▒♣.☺...    8☺..²   
00002FE0  02 00 00 00 C0 87 04 00  01 00 00 00 20 20 20 20  FF FF FF FF 04 00 00 00  01 00 00 00 00 00 00 00  ☻...└ç♦.☺...        ♦...☺.......
00003000  01 00 00 00 22 68 61 6E  FF FF FF FF 02 00 00 00  00 00 00 00 00 00 00 00  01 00 00 00 72 20 69 66  ☺..."han    ☻...........☺...r if
00003020  FF FF FF FF 02 00 00 00  00 00 00 00 00 00 00 00  01 00 00 00 20 20 20 20  00 00 00 00 48 00 00 00      ☻...........☺...    ....H...
00003040  C0 00 00 00 D8 00 00 00  20 01 00 00 50 01 00 00  68 01 00 00 30 00 00 00  FF FF FF FF 0A 00 00 00  └...╪... ☺..P☺..h☺..0...    ◙...
00003060  63 6F 6E 64 69 74 69 6F  6E 00 05 00 00 00 68 61  6E 67 00 04 00 00 00 6D  73 67 00 0A 00 00 00 63  condition.♣...hang.♦...msg.◙...c
00003080  6F 6E 64 69 74 69 6F 6E  00 03 00 00 00 69 66 00  04 00 00 00 01 00 00 00  00 00 00 00 04 00 00 00  ondition.♥...if.♦...☺.......♦...
000030A0  00 00 00 00 04 00 00 00  6D 73 67 00 02 00 00 00  01 00 00 00 00 00 00 00  08 00 00 00 00 00 00 00  ....♦...msg.☻...☺.......◘.......
000030C0  00 00 E0 3F 02 00 00 00  01 00 00 00 00 00 00 00  08 00 00 00 00 00 00 00  00 00 F0 BF 04 00 00 00  ..α?☻...☺.......◘.........≡┐♦...
000030E0  01 00 00 00 00 00 00 00  04 00 00 00 00 00 00 00  00                                                ☺.......♦........
[ RETURN TO DIRECTORY ]