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