$ od -c -N 50000 [phylum]<LISPUSERS>Lyric>ARMODES.LCOM!1
0000000 ( D E F I N E - F I L E - I N F
0000020 O 036 R E A D T A B L E " X C
0000040 L " 036 P A C K A G E " I N T
0000060 E R L I S P " ) \r ( F I L E C R
0000100 E A T E D " 5 - A u g - 8 8
0000120 1 8 : 3 0 : 2 4 " ( " c o m
0000140 p i l e d o n " { P H Y L
0000160 U M } < B U R W E L L > L I S P
0000200 > A R M O D E S . \ ; 7 ) \r "
0000220 2 7 - A p r - 8 7 1 6 : 4 8 :
0000240 4 9 " | b r e c o m p i l e d
0000260 | | c h a n g e s : | A R .
0000300 M O D E A R . M O D E . S U B
0000320 I T E M S | i n | " X e r o
0000340 x L i s p 2 8 - J u l - 8 8
0000360 . . . " \r | d a t e d | "
0000400 2 8 - J u l - 8 8 1 7 : 5 5 :
0000420 5 7 " ) \r ( F I L E C R E A T E
0000440 D " 5 - A u g - 8 8 1 8 :
0000460 3 0 : 0 7 " { P H Y L U M } <
0000500 B U R W E L L > L I S P > A R M
0000520 O D E S . \ ; 7 6 6 9 9 | c
0000540 h a n g e s | | t o : | ( R
0000560 E C O R D S \r A R . E N V I R
0000600 O N M E N T ) ( F N S A R .
0000620 M O D E A R . F O R M . F I L
0000640 L . I N S . D E F A U L T A R
0000660 . S E N D . M E S S A G E A R
0000700 . M O D E . S U B I T E M S )
0000720 ( V A R S \r A R M O D E S C O
0000740 M S ) | p r e v i o u s | |
0000760 d a t e : | " 2 - A u g - 8
0001000 8 2 1 : 4 7 : 1 3 " { P H Y
0001020 L U M } < B U R W E L L > L I S
0001040 P > A R M O D E S . \ ; 1 ) \r A
0001060 R . M O D E : D 4 \r ( P 1
0001100 V A R P 0 E N V I R O N M
0001120 E N T . F O R . M O D E I 0
0001140 M O D E ) \0 204 002 \0 \0 001 @ 255 o
0001160 \0 \0 \0 ` \0 \0 \n \0 \0 ` \0 \0 020 ` \0 \0
0001200 @ ' 021 001 \0 H 262 ] g \0 \0 \t \0 \0 263 037
0001220 g \0 \0 \t \0 \0 263 027 g \0 \0 \t \0 \0 255 g
0001240 \0 \0 \t \0 \0 246 g \0 \0 \t \0 \0 227 o \0 \0
0001260 \0 \t \0 \0 020 @ 027 \0 \0 g \0 \0 \t \0 \0 260
0001300 030 d 001 021 001 001 I d H g \0 \0 \t \0 \0 \v
0001320 \0 \0 \n \0 \0 023 002 003 265 351 o \0 \0 \0 @ \n
0001340 \0 \0 020 o \0 \0 \0 @ o \0 \0 \0 \v \0 \0 020
0001360 \0 ( 1 2 9 P R O M P T P R I N
0001400 T 1 1 6 P R O M P T P R I N
0001420 T 1 0 3 S E T 1 0 0 R E
0001440 C O R D A C C E S S 9 7 R E
0001460 C L O O K 8 1 R E C O R D F
0001500 I E L D N A M E S 7 0 P R O
0001520 M P T P R I N T 6 2 F I N D
0001540 . P R O C E S S 5 5 F I N D
0001560 . P R O C E S S 4 8 F I N D
0001600 . P R O C E S S 4 0 F I N D
0001620 . P R O C E S S 3 2 F I N D
0001640 . P R O C E S S 1 1 P R O M
0001660 P T P R I N T ) \r ( 9 4 A R .
0001700 E N V I R O N M E N T 7 8 A
0001720 R . E N V I R O N M E N T 7 5
0001740 A R . M O D E 5 9 A R . Q
0001760 U E R Y . F O R M 5 2 A R .
0002000 F O R M 4 5 A R . F O R M .
0002020 M E N U 3 7 A R . F O R M .
0002040 T E M P 2 9 A R . Q U E R Y
0002060 . F O R M . T E M P 1 8 A R
0002100 . E N V I R O N M E N T S 1 4
0002120 A R . M O D E 8 A R . M O
0002140 D E ) \r ( 1 2 6 " n o t
0002160 r e c o g n i z e d . " 1 2 1
0002200 " A R m o d e " 1 1 2
0002220 " A R m o d e s e t t o
0002240 " 6 7 " P l e a s e c l o
0002260 s e o p e n A R w i n d o
0002300 w s b e f o r e c h a n g i
0002320 n g m o d e s . " \r 5 " A
0002340 R m o d e i s " ) \r A R .
0002360 A D D . T O . B A C K G R O U N
0002400 D . M E N U : D 4 \r ( F 2
0002420 | B a c k g r o u n d M e n u C
0002440 o m m a n d s | F 3 | B a
0002460 c k g r o u n d M e n u | ) \0
0002500 3 002 002 \0 \0 R 021 021 001 H 003 265 022 h 022 263
0002520 & o \0 \0 \0 R 032 c 004 h c 006 020 001 Y 003
0002540 264 004 I 001 o \0 \0 \0 364 225 I 265 343 i 260 340
0002560 H 002 X 260 327 h 020 \0 N I L \r N I L \r
0002600 ( 3 4 " A R M o d e " 1
0002620 5 ( " A R M o d e " ( Q U
0002640 O T E ( A R . M O D E ) ) "
0002660 D i s p l a y s c u r r e n t
0002700 A R m o d e . " ( E V A L
0002720 ( A R . M O D E . S U B I T E
0002740 M S ) ) ) ) \r A R . M O D E . S
0002760 U B I T E M S : D 4 \r ( P 7
0003000 M O D E P 3 M O D E S )
0003020 \0 177 \b \0 \0 \0 ` \0 \0 ` \0 \0 364 263 s
0003040 021 0 002 ` \0 \0 260 026 d 001 270 I 265 \b H h
0003060 032 Z Y 204 H h 032 Y 031 277 002 002 003 265 353 J
0003100 022 021 001 003 021 @ \a K 260 8 d 001 _ 016 g \0
0003120 \0 g \0 \0 g \0 \0 O 016 h 032 032 h 032 032 h
0003140 032 032 o \0 \0 \0 O 016 \n \0 \0 h 032 032 032 274
0003160 M 265 \b L h 032 ^ ] 204 L h 032 ] 031 277 002
0003200 003 265 311 N 022 027 \0 \0 ` \0 \0 \t \0 \0 027 \0
0003220 \0 ` \0 \0 020 \0 ( 1 1 8 C O P Y
0003240 8 3 C O N C A T ) \r ( 1 2 4
0003260 A R . M O D E . S U B I T E M S
0003300 1 2 1 \ \ A R . E N V I R O
0003320 N M E N T S 1 1 5 A R . E N
0003340 V I R O N M E N T S 1 1 2 A
0003360 R . M O D E . S U B I T E M S
0003400 6 3 Q U O T E 6 0 A R . M
0003420 O D E 5 7 Q U O T E 1 4
0003440 A R . E N V I R O N M E N T S
0003460 5 \ \ A R . E N V I R O N M E
0003500 N T S 2 A R . E N V I R O N
0003520 M E N T S ) \r ( 7 8 " S e t
0003540 A R m o d e t o " ) \r (
0003560 R P A Q Q A R M O D E S C O M
0003600 S ( ( * | ; ; | " p r o v
0003620 i d e a m e c h a n i s m
0003640 f o r c h a n g e t h e d
0003660 a t a b a s e w h i c h t h
0003700 e A R s y s t e m u s e s
0003720 " ) ( * \r | ; ; | " t h e
0003740 i n t e r f a c e t o s w
0003760 i t c h m o d e s " ) ( F N
0004000 S A R . M O D E ) ( G L O B
0004020 A L V A R S A R . M O D E )
0004040 ( * | ; ; | \r " t h i n g s
0004060 f o r t h e b a c k g r o
0004100 u n d m e n u i n t e r f a
0004120 c e t o m o d e c h a n g
0004140 e s " ) ( F N S A R . A D D
0004160 . T O . B A C K G R O U N D . M
0004200 E N U \r A R . M O D E . S U B
0004220 I T E M S ) ( F I L E S D E
0004240 F A U L T S U B I T E M F N )
0004260 ( V A R S ( A R . M O D E . S
0004300 U B I T E M S ) ( \ \ A R . E
0004320 N V I R O N M E N T S ) ) ( G
0004340 L O B A L V A R S \r A R . M O
0004360 D E . S U B I T E M S \ \ A R
0004400 . E N V I R O N M E N T S ) (
0004420 * | ; ; | \r " t h e a r
0004440 e n v i r o n m e n t - - e
0004460 v e r y t h i n g y o u n e
0004500 e d t o s w i t c h m o d
0004520 e s " ) ( R E C O R D S A R
0004540 . E N V I R O N M E N T ) ( G
0004560 L O B A L V A R S \r A R . E N
0004600 V I R O N M E N T S ) ( * |
0004620 ; ; | " i n s t a l l a t i o
0004640 n " ) ( P ( A R . A D D . T
0004660 O . B A C K G R O U N D . M E N
0004700 U ) ( * | ; ; | \r " i f
0004720 t h e r e ' s n o t h i n g
0004740 s e t u p a l r e a d y a
0004760 s s u m e i t ' s t h e L
0005000 i s p m o d e a n d c o n
0005020 s t r u c t t h e e n v i r
0005040 o n m e n t " ) ( | i f | (
0005060 \r N O T ( B O U N D P ( Q U
0005100 O T E A R . E N V I R O N M E
0005120 N T S ) ) ) | t h e n | ( L
0005140 E T ( ( O R I G I N A L E N V
0005160 I R O N M E N T ( | c r e a t
0005200 e | A R . E N V I R O N M E N
0005220 T ) ) ) ( \r | f o r | F I E
0005240 L D | i n | ( R E C O R D F
0005260 I E L D N A M E S ( Q U O T E
0005300 A R . E N V I R O N M E N T )
0005320 ) | d o | ( R E C O R D A C
0005340 C E S S F I E L D \r O R I G
0005360 I N A L E N V I R O N M E N T
0005400 ( R E C L O O K ( Q U O T E
0005420 A R . E N V I R O N M E N T ) )
0005440 ( Q U O T E R E P L A C E )
0005460 ( E V A L F I E L D ) ) )
0005500 ( S E T Q \r A R . E N V I R O
0005520 N M E N T S ( L I S T ( Q U
0005540 O T E L I S P ) O R I G I N
0005560 A L E N V I R O N M E N T ) ) )
0005600 ( A R . M O D E ( Q U O T E
0005620 L I S P ) ) ) ) ) ) \r ( F I L
0005640 E S L O A D D E F A U L T S U
0005660 B I T E M F N ) \r ( R P A Q Q
0005700 A R . M O D E . S U B I T E M S
0005720 N I L ) \r ( R P A Q Q \ \ A
0005740 R . E N V I R O N M E N T S N
0005760 I L ) \r ( R E C O R D A R . E
0006000 N V I R O N M E N T ( A R . E
0006020 N T R Y . L I S T . P R I N T .
0006040 F I E L D S A R . E N T R Y .
0006060 L I S T . P R I N T . M U L T I
0006100 L I N E . F L A G \r A R . E N
0006120 T R Y . L I S T . W I N D O W .
0006140 F I E L D S A R . I N D E X .
0006160 D E F A U L T . F I E L D S A
0006200 R . N O . M E S S A G E . F L G
0006220 A R . I N D E X . D E F A U L
0006240 T . F I L E . N A M E \r A R .
0006260 I N F O . F I L E . N A M E A
0006300 R . S U B M I T . F I L E . N A
0006320 M E A R . D I R E C T O R Y
0006340 A R . F O R M . F O R M A T A
0006360 R . F O R M . S P E C S \r A R
0006400 . S U B M I T . N U M . F I L E
0006420 . N A M E A R . M A P A R .
0006440 S U M M A R Y . M A P A R . T
0006460 H I N . S U M M A R Y . M A P
0006500 A R . D I S P L A Y . F I E L D
0006520 S A R . S U M M A R Y . F I E
0006540 L D S \r A R . C L E A N U P .
0006560 S O R T . O R D E R A R . S O
0006600 R T . S P E C . I T E M S A R
0006620 . Q U E R Y . S P E C . I T E M
0006640 S A R . I N D E X . C A C H E
0006660 . F I L E . N A M E \r A R . I
0006700 D E N T I F I C A T I O N . S T
0006720 R I N G A R . I N T E R E S T
0006740 I N G . S U B M I T . F I E L D
0006760 S ) ) \r ( A R . A D D . T O . B
0007000 A C K G R O U N D . M E N U ) \r
0007020 ( | i f | ( N O T ( B O U N
0007040 D P ( Q U O T E A R . E N V
0007060 I R O N M E N T S ) ) ) | t h
0007100 e n | ( L E T ( ( O R I G I
0007120 N A L E N V I R O N M E N T (
0007140 | c r e a t e | \r A R . E N V
0007160 I R O N M E N T ) ) ) ( | f o
0007200 r | F I E L D | i n | ( R
0007220 E C O R D F I E L D N A M E S
0007240 ( Q U O T E A R . E N V I R O
0007260 N M E N T ) ) | d o | ( R E
0007300 C O R D A C C E S S F I E L D
0007320 \r O R I G I N A L E N V I R O
0007340 N M E N T ( R E C L O O K (
0007360 Q U O T E A R . E N V I R O N
0007400 M E N T ) ) ( Q U O T E R E
0007420 P L A C E ) ( E V A L F I E
0007440 L D ) ) ) ( S E T Q \r A R .
0007460 E N V I R O N M E N T S ( L I
0007500 S T ( Q U O T E L I S P )
0007520 O R I G I N A L E N V I R O N M
0007540 E N T ) ) ) ( A R . M O D E
0007560 ( Q U O T E L I S P ) ) ) \r (
0007600 P U T P R O P S A R M O D E S
0007620 C O P Y R I G H T ( " X e r
0007640 o x C o r p o r a t i o n "
0007660 1 9 8 8 ) ) \r N I L \r
0007673