$ od -c -N 50000 [eris]<Lisp>Harmony>BCPL>BCPLENV.DM!1>RaidPrint.br
0000000  002 002 005 206  \0  \0  \0 017  \0  \0 001  \v  \0  \0 001   *
0000020   \0  \0 005   L  \0  \0 005   w  \0  \0  \0  \0  \0  \0  \0   *
0000040   \0      \0  \b 006   u   r   a   d   i   x  \0  \0      \0 005
0000060   \v   u   p   r   i   n   t   l   e   v   e   l  \0      \0  \b
0000100   \v   u   l   i   s   t   l   e   n   g   t   h  \0   @  \0 001
0000120  006   L   p   r   i   n   t  \0  \0   A  \0 002  \n   P   r   i
0000140    n   t   A   r   r   a   y  \0  \0   A  \0 003  \n   P   r   i
0000160    n   t   C   h   a   r   s  \0  \0   A  \0 004  \t   P   r   i
0000200    n   t   L   i   s   t  \0   A  \0 005 003   C   A   R  \0   A
0000220   \0 006 003   C   D   R  \0   @  \0  \a  \t   P   r   i   n   t
0000240    N   a   m   e  \0   A  \0  \b  \b   P   r   i   n   t   N   u
0000260    m  \0  \0   @  \0  \t  \b   P   r   i   n   t   P   t   r  \0
0000300   \0   A  \0  \n  \b   P   r   i   n   t   S   t   r  \0  \0   @
0000320   \0  \v 002   W   o  \0  \0   @  \0  \f 002   W   n  \0  \0   @
0000340   \0  \r 002   W   b  \0  \0   A  \0 016  \b   M   o   v   e   A
0000360    d   d   r  \0  \0   A  \0 017 004   T   y   p   e  \0  \0  \0
0000400   \0  \0  \b   G   e   t   L   m   a   r   g  \0  \0  \0  \0  \0
0000420  003   d   s   p  \0  \0  \0  \0  \b   S   e   t   L   m   a   r
0000440    g  \0  \0  \0  \0  \0  \t   G   e   t   B   i   t   P   o   s
0000460   \0  \0  \0  \0 002   W   c  \0  \0 020  \0  \0  \n   X   G   e
0000500    t   B   a   s   e   3   2  \0  \0 020  \0  \0 005   V   P   t
0000520    r   0  \0 020  \0  \0 005   V   P   t   r   1  \0  \0  \0  \0
0000540  002   W   s  \0  \0  \0  \0  \0 002   V   P  \0  \0 020  \0  \0
0000560   \b   X   G   e   t   B   a   s   e  \0  \0 020  \0  \0  \t   X
0000600    G   e   t   B   a   s   e   1  \0  \0  \0  \0 004   C   R   L
0000620    F  \0  \0 020  \0  \0 006   X   S   e   t   B   R  \0  \0 020
0000640   \0  \0 005   R   R   e   a   d  \0 020  \0  \0  \v   X   G   e
0000660    t   B   a   s   e   P   t   r  \0  \0  \0  \0 003   M   i   n
0000700   \0  \0  \0  \0 005   E   q   N   I   L  \0 020  \0  \0 006   l
0000720    v   V   P   t   r  \0  \0 020  \0  \0 005   l   v   N   I   L
0000740   \0 020  \0  \0  \v   B   G   e   t   B   a   s   e   P   t   r
0000760   \0  \0  \0  \0 006   N   e   g   a   t   e  \0  \0  \0  \0  \0
0001000  006   D   i   v   i   d   e  \0  \0 020  \0  \0  \b   B   G   e
0001020    t   B   a   s   e  \0  \0 017  \0 004  \0 001  \0 005  \0 357
0001040   \0 006 001 337  \0  \a 002   %  \0  \b 002 226  \0  \t 002 260
0001060   \0  \n 002 351  \0  \v 003 002  \0  \f 003   ;  \0  \r 003   T
0001100   \0 016 003   q  \0 017 003 261  \0 020 003 274  \0 021 003 337
0001120   \0 022 003 360 004   ! 004   !   Z 001  \f 370  \0  \f  \f 367
0001140    B 005   % 035   i 035  \0 001   B 006   " 005 375   P 345  \f
0001160  001  \n   = 025   Z  \b   % 023   i 024  \0 001 212  \0   "  \b
0001200    i 021  \0 002 001 020 001 006 204  \0 001   # 205  \0 001   !
0001220  001       : 004   # 001   9  \r 345  \0 001  \f  \0  \0  \0  \0
0001240   \0  \0  \0  \0  \f 355  \0 246  \f 355  \0 023  \f 355  \0 021
0001260   \0 002  \f 350  \0   .  \0  \a 377 350 377 351 377 350 377 347
0001300  377 346 377 343 377 342  \f 351  \0 001  \0     377 336 001 337
0001320  202  \r 001 004   !   P   i   P  \0 001   : 004   # 001   i   M
0001340   \0 001 001   L   " 004   -   L   i   L  \0 002 001   G   : 004
0001360    #  \0   9   R 345  \f 001 003 205  \0 001 003 204  \0 001 001
0001400    =   L   Z 003   : 004   + 001   i   I  \0 003   %   F   9   K
0001420  345  \f 001 004   !   e   i   0  \0 001 001   0   " 004  \f  \0
0001440   \0 001   =   ;   Z 003      \0   (  \0   i   8  \0 003   %   5
0001460    9   : 345  \f 001 004   !   T   i 037  \0 001 001   q  \t  \v
0001500  022   F   L   O   A   T   P       w   i   t   h       b   i   t
0001520    s   :      \0 342  \0   i   E  \0 001   " 004  \f 037  \0 001
0001540    9   "   Z 003     037   ( 037   i 031  \0 003   !   9   i 004
0001560   \0 001 001   V  \0   %  \0  \0  \0  \0  \f 355  \0   Q  \0  \0
0001600   \0  \0   !   <   i 371  \0 001   " 004   i   9  \0 001   !   6
0001620    i 363  \0 001 001   E  \0 016  \0  \0  \0  \0   " 004   i   0
0001640   \0 001 001   >  \0  \b   : 004   #  \0   : 004   + 001   i   )
0001660   \0 002   " 004   i   '  \0 001 202  \r 001 033   " 004   i   #
0001700   \0 001   9   " 345   J 001 025  \t 003 003       -   > 342  \0
0001720    i  \b  \0 001   " 004  \f  \0  \0 001   B  \b 001 003  \0   Q
0001740   \0  \0   " 004  \f  \0  \0 001 212  \0   "  \b   i  \n  \0 002
0001760  001 027   " 004   i  \a  \0 001 001  \b  \0   "  \0  \0  \0  \0
0002000   \0  \0  \0  \0  \0  \0 001  \0  \f 350  \0  \a  \0  \a 377 272
0002020  377 306 377   i 377   9 377 224 377 202 377   j 001 305   " 005
0002040  375   P 345  \f 001  \a   i   \  \0  \0   %   [   * 006   i   Z
0002060   \0 002  \f 366   Z 001  \f 370  \0  \v  \f 367   " 004  \f  \0
0002100   \0 001 205  \0  \f  \0  \0 001   B 005   !   M   i 225  \0 001
0002120    " 005 202   @ 205   p 202  \r 001 003   !   F 001 003   !   K
0002140  001 001   i 212  \0 001   !   H   i 207  \0 001   !   L  \f 025
0002160   \0 001   * 005 252   @ 255   p   B  \a 252  \r 001 003 205  \0
0002200  001 003 205   P 001 001   *  \a 215  \0 242  \0   - 206   i   H
0002220   \0 002  \t 003 002   ]      \0 342  \0   i 243  \0 001   " 005
0002240    9   M 347 004 205   P 202  \r 001  \v  \t  \a  \v   r   e   a
0002260    d       o   n   l   y   ,     342  \0   i 223  \0 001   " 005
0002300    9   P 347 004 205   P 202  \r 001  \n  \t 006  \t   a   l   i
0002320    g   n   e   d   ,     342  \0   i 204  \0 001 001   _  \0  \0
0002340   \0   #  \0   &  \0   [  \0   1  \t 004 004   B   Y   T   E  \0
0002360  342  \0 001   m  \0   0  \0   -  \t 004 005   P   O   S   1   6
0002400  342  \0 001   e  \0 002  \t 004 004   F   I   X   P  \0 342  \0
0002420  001   ^  \t 004 004   H   A   S   H  \0 342  \0 001   X  \0  \0
0002440   \t 004 005   C   C   O   D   E 342  \0 001   Q  \t 005 006   B
0002460    I   T   M   A   P  \0 342  \0 001   J      \0  \t 005  \a   P
0002500    O   I   N   T   E   R 342  \0 001   B  \t  \t 016   D   O   U
0002520    B   L   E       P   O   I   N   T   E   R  \0 342  \0 001   7
0002540    @  \0  \t 005  \a   (   t   y   p   e       = 342  \0   i 032
0002560   \0 001   " 005   9 030 347 300   - 027   i 322  \0 002  \t 006
0002600   \t   )       I   N   V   A   L   I   D 342  \0 001 005  \f 355
0002620   \0 005  \f 355  \0 034 001 033 001 032   " 005   9 004 347 300
0002640  001 006  \0 305 017  \0  \0 241  \f 355  \0 021  \f 350  \0  \v
0002660   \0  \f 377 314 377 327 377 326 377 325 377 324 377 300 377 267
0002700  377 260 377 250 377 241 377 231 377 220 001 314   i 353  \0 001
0002720   \t 006  \t       a   r   r   a   y       @     342  \0   i 342
0002740   \0 001   !   E  \f 273  \0 001   B 005   " 004  \f  \0  \0 001
0002760       \0   (  \0   i   T  \0 002  \t 006  \b       o   f   f   s
0003000    e   t      \0 342  \0   i 316  \0 001   " 005   )   I   i 210
0003020   \0 002  \f 366   Z 001  \f 370  \0 017  \f 367   " 005 375   P
0003040  347  \0 202  \r 204 001 205  \0   B  \b   " 004  \f 367  \0 001
0003060    : 005   Z  \t   : 005   Z  \n   " 006   )   M   i   M  \0 002
0003100    *  \n 216  \0 375   P 355  \0   J  \n 001 032   "  \t 202 220
0003120   \f   6  \0 001   B  \a   :  \b 372  \r 001 005   "  \a   9   \
0003140  347 300 001 006   "  \a   9   Y 347  \0 001 002  \0 003   i   V
0003160   \0 001   "  \b 200  \0   B  \b   "  \t 203  \0   B  \t   "  \t
0003200    :  \n 344   J 001 344   " 006   9   & 344   J 001  \a  \t 003
0003220  002       &  \0 342  \0   i 206  \0 001  \f 366  \0 325  \0  \b
0003240    Z 001  \f 370  \0 017  \f 367   " 005 201   J 001 005   !   I
0003260    i   5  \0 001  \f 366   !   F   i   1  \0 001   =   D   Z 006
0003300    " 006 201   J 001  \n  \t 003 003       -   - 342  \0   i   =
0003320   \0 001 001   Q  \0   d  \0  \0   " 004   i   I  \0 001   9   H
0003340  345  \f 001   :   !   F 306  \0   B  \a   "  \a   * 004   i   I
0003360   \0 002   " 004   i   ]  \0 001   B  \b   "  \b   i   8  \0 001
0003400    9   7 345  \f 001  \f   " 005 375   P 345  \0 212  \0   "  \b
0003420    i   P  \0 002 001  \b 377  \0  \0 377  \0 220   "  \b 254  \0
0003440    i   I  \0 002   "  \a   i   f  \0 001   B 004   " 006 375   P
0003460  345  \0   B 006   " 004   i   _  \0 001 202  \r 001  \a 001 033
0003500   \0   &  \0   (  \0  \0 001 005 001 246   !   V   i 347  \0 001
0003520  001 021  \f 355  \0 020  \t 003 003       .     342  \0   i 365
0003540   \0 001   " 004 254  \0   i   &  \0 002 001 005  \0 326  \0 005
0003560   \0  \r 001 247  \t 002 001   ) 342  \0   i 347  \0 001  \f 366
0003600   \0  \0   Z 001  \f 370  \0  \b  \f 367   " 004  \f  \0  \0 001
0003620    8  \0   #  \0   9 301 347 300 202  \f 001 004     006  \f  \t
0003640   \0 001 205  \0   ( 004  \f 360 377  \0     003 001 004  \0  \0
0003660   \0 225  \0  \0  \f 366   Z 001  \f 370  \0  \v  \f 367   " 004
0003700   \f 021  \0 001   8  \r   #  \0   9 247 347 300 202  \f 001  \b
0003720    " 004   (  \a   i 326  \0 002     003  \f  \r  \0 001   8 003
0003740    #  \0   9   e 347 300   B 005   : 005 372  \f 001 006      \0
0003760  001 033  \0  \0  \0  \0  \0       8  \r   #  \0 202   @ 205   p
0004000    B 006     005   * 004   i 275  \0 002   " 005 202   P   ( 006
0004020  253  \0  \f 360  \0 377   : 006 372  \f 001 004      \a  \f  \0
0004040   \0 001     003 001 001  \f 366   Z 001  \f 370  \0  \v  \f 367
0004060    " 004 202   P 212  \0   !   J  \f  \0  \0 002   8  \r   Z 006
0004100  375   P   Z  \a     004  \f  \0  \0 001   9   W 347 300   B 003
0004120    " 006   *  \a   i   S  \0 003  \f 366   Z 001  \f 370  \0   .
0004140   \f 367   ! 207 306  \0   B  \a   9 307   Z  \b   " 004 202   K
0004160  001  \b   !   E   i   ]  \0 001   !   \ 306  \0   i   [  \0 001
0004200    !   X 306  \0   * 006   i   W  \0 002   9   V 346  \0   *  \b
0004220    :  \a 276  \0   C  \0   "  \b 375   P 345  \0   B  \b   " 004
0004240  202  \f 001 357   " 005 202  \f 001 354 001  \v 177  \0   "  \b
0004260  203  \0   B  \b   "  \b   :  \a 236  \0   #  \0   i   9  \0 001
0004300    "  \b   9 232 345   J 001 364  \f 366  \0 020   Z 001  \f 370
0004320   \0  \n  \f 367   !   G   i   ,  \0 001   " 004 254  \0   i   R
0004340   \0 002   !   Q   i   %  \0 001   " 005 254  \0   i   K  \0 002
0004360    !   K   i 036  \0 001  \f 366 377  \0  \0  \0  \0   -   Z 001
0004400   \f 370  \0  \v  \f 367   " 004  \f  \0  \0 001   " 004  \f   x
0004420   \0 001   B 006   !   P  \f  \0  \0 001   B  \a   !   M  \f 004
0004440   \0 001   B 003   " 006   *  \a   i 351  \0 003  \f 366 002   b
0004460   \0 004  \0  \0  \0  \0  \0   0   Z 001  \f 370  \0  \r  \f 367
0004500    B 006   " 006   9   9 345   J 204 001 205  \0   B  \a   " 005
0004520  202  \r 204 001 205  \0   *  \a  \f 340   B  \a   9   Z   Z  \b
0004540  001 036  \0   {   " 004   *  \b  \f 347   B  \t   "  \t 202  \r
0004560  001  \f   "  \t   9   O 347  \0   9 337 346  \0   i 331  \0 001
0004600  001  \n  \0  \0  \0   ,  \0   }   :  \a 372  \r 001 004   !   Q
0004620    i 317  \0 001   "  \b   9   N 346  \0   B  \b   "  \b   9  \v
0004640  345   K 001 341   " 004   9   6 347  \0   9 306 346  \0   i 300
0004660   \0 001  \f 366  \0 003  \0 002   Z 001  \f 370  \0  \v  \f 367
0004700    : 005   Z 003 205  \0   * 004   i   [  \0 003  \f 366   Z 001
0004720   \f 370  \0  \t  \f 367   " 004   )   T  \f 347   9 354 347  \0
0004740    ) 253 216  \0 242  \0   i 244  \0 001   " 004   ) 344  \f 347
0004760    9 021 347  \0   ) 241 216  \0 242  \0   i 232  \0 001   " 004
0005000    9  \t 347  \0   ) 231 216  \0 242  \0   i 222  \0 001  \f 366
0005020   \0 017  \0  \a   Z 001  \f 370  \0  \t  \f 367   : 005   #  \0
0005040    : 004   C  \0   : 005   # 001   : 004   C 001   " 004 001 003
0005060   \0     377 375  \f 366   Z 001  \f 370  \0  \n  \f 367   : 004
0005100    #  \0   9   & 347  \0   9   % 345   J 001 003 205  \0 001 037
0005120    " 004   i      \0 001 202 220   B 005   " 005 202 220 375 220
0005140  346  \0 212  \0   ! 030  \f  \0  \0 002   B 006   " 005 375   P
0005160  347  \0 202  \f 001  \a   " 006   9 017 347 300 001  \a  \0 242
0005200   \0 006   " 006   9 005 347  \0 001 001 001 001  \f 366  \0 377
0005220   \0 020  \0 327  \0 026 377  \0  \0   * 001 250  \0 224 002   w
0005240  002 256  \0 324 003   R 002 255 002 254 002 316  \0 221 004 024
0005260  002   #  \0 323 003 226 001   d  \0  \0 002 225 002 213  \0   $
0005300  001   E 001   F  \0   % 003   l 202 302 201 315 201 316 002   y
0005320  004 036 202 370 200 307 001   D 203   Y 203   d 203   \ 002   @
0005340  002 317 202 367 202 314 202 361 003   n 003   o 204  \b  \0  \a
0005360   \0   ! 201 375  \0     201 353  \0 035 200 300  \0   " 201 313
0005400   \0 030 200 203  \0 032 200 210  \0 031 200 207                
0005414