$ od -c -N 50000 [eris]<Lisp>Harmony>BCPL>BCPLENV.DM!1>GP.BR 0000000 002 002 005 023 \0 \0 \0 017 \0 \0 \0 330 \0 \0 \0 371 0000020 \0 \0 004 362 \0 \0 005 022 \0 \0 \0 \0 \0 \0 \0 037 0000040 \0 \0 \0 017 R e a d P a r a m S t 0000060 r e a m \0 ! \0 \0 \t s t r i n g V 0000100 e c \0 ! \0 \0 005 s w V e c \0 @ \0 001 0000120 016 S e t u p R e a d P a r a m \0 0000140 \0 @ \0 002 \t R e a d P a r a m \0 @ 0000160 \0 003 \t E v a l P a r a m \0 @ \0 004 0000200 \n R e a d S t r i n g \0 \0 A \0 005 0000220 \n G e t C o m C h a r \0 \0 @ \0 006 0000240 \a A d d I t e m \0 A \0 \a \n P a c 0000260 k S t r i n g \0 \0 \0 \0 \0 \v D e f 0000300 a u l t A r g s \0 \0 \0 \0 \b O p e 0000320 n F i l e \0 \0 \0 \0 \0 \a f p C o m 0000340 C m \0 \0 \0 \0 \b C a l l S w a t \0 0000360 \0 \0 \0 \0 \t M o v e B l o c k \0 a 0000400 \0 \b 005 R e t r y \0 a \0 \t \t L O p 0000420 e n F i l e \0 a \0 \n \t G e t N u 0000440 m b e r \0 a \0 \v \r R e t P a c k 0000460 e d N a m e \0 a \0 \f \v N o R e s 0000500 u l t V e c \0 a \0 \r \n G e t N e 0000520 w N a m e \0 \0 \0 \0 \0 002 W s \0 \0 \0 0000540 \0 \0 004 k e y s \0 \0 \0 \0 \0 004 P u t 0000560 s \0 \0 \0 \0 \0 003 d s p \0 a \0 016 003 D 0000600 e l \0 \0 \0 \0 004 G e t s \0 \0 \0 \0 \0 0000620 003 W s s \0 \0 \0 \0 006 E n d o f s \0 0000640 \0 a \0 017 002 l 6 \0 \0 a \0 020 002 l 7 \0 0000660 \0 020 \0 004 \0 001 \0 005 \0 > \0 006 \0 361 \0 \a 0000700 002 274 \0 \b 003 214 \0 \t 003 251 \0 \n 003 271 \0 020 0000720 001 6 \0 021 001 > \0 022 001 230 \0 023 002 4 \0 024 0000740 002 A \0 025 002 236 \0 032 003 ; \0 036 003 303 \0 037 0000760 003 315 003 370 003 370 Z 001 \f 370 001 022 \f 367 B \b 0001000 ! P 306 \0 B \t ! N 306 \0 i M \0 001 " 006 0001020 202 \r 001 003 " 006 001 023 \t 005 006 C o m . C 0001040 m \0 342 \0 375 P Z \r 375 \0 Z 016 = P Z 017 0001060 9 O Z 003 255 P i M \0 005 001 001 E K : 004 0001100 ] J : 005 ] I 375 \0 Z \v 375 \0 Z \f % C 0001120 202 \r 001 003 % @ 001 003 " \t 001 001 B \r : \a 0001140 Z 016 9 6 Z 003 " \v * \f i J \0 004 \f 366 0001160 Z 001 \f 370 001 226 \f 367 B \t ! C 306 \0 i 023 0001200 \0 001 ! I 306 \0 B \n ! G 306 \0 B \v 205 \0 0001220 : \n C \0 205 \0 : \v C \0 374 \0 Z \r 001 ! 0001240 \0 021 \0 \b \0 \0 " \r i H \0 001 B \f 375 \0 0001260 Z \r " \f 9 C 345 \r 001 \t " \f 9 l 345 \r 0001300 001 005 " \f 9 i 345 \f 001 \b 001 \f \0 \0 \0 \n 0001320 \0 \0 \0 \0 \0 \0 \0 \0 " \n * \f i ^ \0 002 0001340 001 343 " \f 9 + 345 \f 001 / 001 - 205 \0 i % 0001360 \0 001 B \f " \f 9 " 345 \f 001 004 001 $ \0 \0 0001400 \0 \t " \f 9 H 345 \r 001 005 " \f 9 E 345 \f 0001420 001 004 001 032 \0 024 001 025 " \f 9 P 345 \f 001 017 0001440 \t \b \r D e b u g b r e a k . 0001460 342 \0 i P \0 001 001 \a \0 \0 \0 / " \v * \f 0001500 i , \0 002 001 324 " 006 202 \f 001 006 % 304 202 \r 0001520 001 003 = 301 Z 006 " 006 202 \r 001 \t : \n # \0 0001540 203 \0 B 003 " 006 * \n i ] \0 003 " \a 202 \f 0001560 001 006 % 262 202 \r 001 003 = 257 Z \a " \a 202 \r 0001600 001 \r : \v # \0 203 \0 B 003 " \a * \v i J 0001620 \0 003 001 004 \0 \0 \r \0 \0 " 005 200 \f 001 005 0001640 374 \0 Z \b 375 \0 Z 005 : \b 372 \r 001 \b : \n 0001660 # \0 202 \f 001 004 204 \0 001 016 \0 ! : 005 Z 021 0001700 : 006 Z 022 9 L Z 003 " \n * 004 i I \0 004 0001720 001 002 \0 \0 \f 366 Z 001 \f 370 \0 226 \f 367 B \b 0001740 ! E 306 \0 B \t 9 a Z \f ! _ 306 \0 ) ^ 0001760 i ^ \0 002 " \b 9 \ 345 K 001 003 : 004 Z \a 0002000 " 005 9 W 344 J 001 033 : 005 # \0 9 S 347 300 0002020 375 P 345 \f 001 \b : 005 # \0 9 M 347 \0 B 005 0002040 001 016 \0 \0 : 005 # \0 9 F 347 \0 9 D 347 300 0002060 : 005 + 001 9 ? 357 300 246 \0 B 005 " 006 202 \f 0002100 001 \t \t \a \v T r y a g a i n : 0002120 Z 006 : 004 # \0 202 \f 001 004 i P \0 016 \0 \0 0002140 " \t * 004 i L \0 002 001 K \0 025 375 \0 Z \v 0002160 375 \0 Z \n : 004 ; \0 372 \r 001 ( \t \a \0 001 0002200 \0 001 \0 002 \0 002 \0 003 \0 003 342 \0 : \v 236 \0 0002220 # \0 : \t Z 016 B 017 " \v 202 \r 001 \r " \v 0002240 9 005 345 \f 001 \v 001 \b \0 \b \0 002 \0 X \0 004 0002260 001 \0 377 \0 \0 377 205 P 001 003 ! 370 001 001 B 003 0002300 " 016 * 017 i D \0 003 B \n " \n 202 \r 001 006 0002320 " \a 202 \r 001 002 i C 001 C \t \t 017 \r C o 0002340 u l d n ' t o p e n 342 \0 i : 0002360 \0 001 " \t i 7 \0 001 i 001 \0 \0 \0 \0 \f 355 0002400 \0 360 375 P Z \v i / 9 321 Z \v i , 9 , 0002420 Z \v i ) 9 315 Z \v i & 9 ' Z \v i # 0002440 9 304 Z \f : 004 ; \0 Z \r 375 P Z 016 001 022 0002460 9 035 Z \f " \r 375 P 345 \0 B \r 001 ) 9 265 0002500 Z \f " \r 375 P 345 \0 B \r 001 " \0 n 001 0002520 001 037 " \r : 004 236 \0 # \0 001 \v \0 \0 \f 355 0002540 \0 346 \0 \0 \0 \0 \0 003 \0 005 \0 \n \f 355 \0 020 0002560 \f 351 \0 006 \0 o 377 344 \0 d 377 333 \0 b 377 340 0002600 \0 O 377 336 \0 D 377 325 \0 B 377 332 001 341 " 016 0002620 : 004 236 \0 # \0 9 N 345 \f 001 006 9 206 Z \f 0002640 " 016 203 \0 B 016 375 \0 Z \n : 016 Z 017 : \r 0002660 Z 020 001 J " 017 : 004 236 \0 # \0 9 M 345 \0 0002700 B 021 " 021 202 J 001 005 " 021 : \f 345 J 001 3 0002720 \t 002 001 \r 342 \0 i 306 \0 001 " \t i 303 \0 001 0002740 \t \n 020 i s n ' t a p r o p 0002760 e r \0 342 \0 i 266 \0 001 " \f 9 S 345 \f 0003000 001 \a \t 004 005 o c t a l 342 \0 001 \b \t 005 0003020 \a d e c i m a l 342 \0 001 001 i 243 \0 001 0003040 \t 005 \a n u m b e r 342 \0 i 233 \0 001 0003060 i H \0 # " \n * \f \f 343 : 021 356 \0 J \n 0003100 " 017 203 \0 B 017 " 017 : 020 344 J 001 264 001 o 0003120 9 215 Z \f i H \0 0 : \a Z \n " \a 202 \r 0003140 001 \v : 004 # \0 202 220 203 \0 B 003 " \a * \t 0003160 i ; \0 003 001 026 \t 022 ! N o p l a c 0003200 e t o p u t t h e p a c 0003220 k e d s t r i n g 342 \0 i & \0 001 0003240 001 F \0 \b : \a Z \n " \a 202 \r 001 \v : 004 0003260 # \0 203 \0 B 003 " \a * 004 i 026 \0 003 001 003 0003300 001 203 i 026 001 4 \t \t 016 U n d e f i n 0003320 e d t y p e \0 342 \0 i \a \0 001 001 ' 0003340 " 005 001 \a \0 \0 001 027 \0 357 \f 355 \0 \0 \0 0003360 \f 350 \0 I \0 \b 376 273 377 347 377 346 377 \f 377 344 0003400 377 250 377 342 377 016 \f 351 \0 \b O W 377 001 O C 0003420 376 374 I W 376 367 I C 376 252 E F 376 377 \0 P 0003440 377 234 \0 O 376 362 \0 \0 377 276 001 316 " \n 001 036 0003460 \t 002 001 \r 342 \0 i L \0 001 " 006 i I \0 001 0003500 \t 003 003 / \r 342 \0 = D Z 020 374 \0 Z 021 0003520 : 006 Z 022 9 N Z 003 212 \0 " 004 i K \0 005 0003540 % J ) G i I \0 002 i H \f 366 Z 001 \f 370 0003560 001 023 \f 367 B \t ! I 306 \0 \t 002 001 \r 352 \0 0003600 J \r = ' Z 016 375 \0 Z 017 \t 002 \0 \0 352 \0 0003620 J 020 9 K Z 003 255 P i I \0 006 " 006 = 031 0003640 345 \f 001 \t " \a 202 \r 001 004 " \a 200 \f 001 003 0003660 = " Z \a : 005 # \0 9 L 347 300 B \n ! J 0003700 306 \0 B \v 375 P Z \f : \n Z \r 001 & 001 267 0003720 \0 \0 " \f 202 220 B 016 " \f 202 200 205 p 202 \r 0003740 001 \r " 016 : 005 236 \0 # \0 9 N 347 \0 001 016 0003760 \0 \r \0 \0 \0 \0 \0 \0 \0 \0 " 016 : 005 236 \0 0004000 # \0 9 ' 347 300 001 002 \0 \t * \f : \v 276 \0 0004020 C \0 " \f 203 \0 B \f " \f : \r 344 J 001 332 0004040 205 \0 : 004 C \0 001 o \0 \n 001 \ " 006 i H 0004060 \0 001 B \f 375 P Z \r : \n Z 016 001 017 " \r 0004100 : \v 236 \0 # \0 : \f 345 \f 001 005 " \f 001 ^ 0004120 377 \0 \0 022 " \r 203 \0 B \r " \r : 016 344 J 0004140 001 357 : \a 372 \r 001 D 001 - \t 004 004 X X X 0004160 \r \0 342 \0 212 \0 " \a i + \0 002 " \a * \b 0004200 i ' \0 002 001 A \0 377 : 004 # \0 202 \f 001 002 0004220 i " " \a ) ! i 260 \0 002 : 004 # \0 : 004 0004240 236 \0 # \0 212 \0 " \a i 247 \0 002 : 004 # \0 0004260 375 P 345 \0 : 004 C \0 001 & \f 355 \0 $ \0 \0 0004300 001 027 " \f 001 \f \f 355 \0 ! \f 355 \0 021 \0 \0 0004320 \f 355 \0 032 \0 \0 \0 \ \f 355 \0 \n \f 351 \0 003 0004340 \0 177 377 304 \0 \b 377 321 \0 001 377 317 001 001 " 004 0004360 * \f i J \0 002 : \a 372 \r 001 005 " \a * \f 0004400 i V \0 002 001 224 001 215 001 214 \f 366 Z 001 \f 370 0004420 \0 \b \f 367 001 027 % L i L \0 001 202 \r 001 003 0004440 ! I 001 005 % E i 314 \0 001 001 001 B 005 " 005 0004460 9 Y 345 \f 001 005 : 004 372 \r 001 002 001 003 " 005 0004500 001 002 001 352 \f 366 Z 001 \f 370 \0 \n \f 367 : 004 0004520 # \0 203 \0 : 004 C \0 " 005 : 004 + \0 : 004 0004540 276 \0 C \0 \f 366 Z 001 \f 370 \0 \f \f 367 : 005 0004560 # \0 * 004 202 300 \f 360 377 \0 375 P Z 006 : 005 0004600 ; \0 Z \a 001 * \0 322 " 006 202 220 B \b " 006 0004620 202 200 205 p 202 \r 001 017 " 006 : 005 236 \0 # \0 0004640 * \b : 004 356 \0 \f 360 \0 377 001 024 003 001 \0 o 0004660 \0 \0 \0 \r 205 \0 * \b : 004 276 \0 C \0 " 006 0004700 : 005 236 \0 # \0 * \b : 004 356 \0 202 300 \f 360 0004720 377 \0 " 006 203 \0 B 006 " 006 : \a 344 J 001 325 0004740 \f 366 \0 \0 037 003 335 \0 p \0 q \0 \0 \0 205 0004760 001 5 002 377 \0 242 003 311 001 204 003 033 001 254 \0 l 0005000 002 z 002 y 003 002 001 270 002 x 001 264 002 } 002 f 0005020 002 355 002 356 003 334 003 \0 003 p 003 e 003 m 003 336 0005040 \0 \0 \0 \0 \0 \0 0005046