$ od -c -N 50000 [phylum]<LISP>Lyric>Lispusers>PROFILER.dfasl!1
0000000 221 \0 005 X C L C o m p i l e r
0000020 o u t p u t f o r s o u r c
0000040 e f i l e { P H Y L U M } <
0000060 S H R A G E R > L I S P > P R O
0000100 F I L E R . L I S P ; 2 0 \r S o
0000120 u r c e f i l e c r e a t e
0000140 d M o n d a y , 3 A u g u
0000160 s t 1 9 8 7 , 2 2 : 5 1 : 2
0000200 7 . \r F A S L f i l e c r e
0000220 a t e d M o n d a y , 3 A
0000240 u g u s t 1 9 8 7 , 2 2 : 5
0000260 3 : 1 3 . \r 377 235 226 003 ( o \0 \0 \0 \t
0000300 \0 \0 277 h c \0 277 o \0 \0 \0 \t \0 \0 277 o
0000320 \0 \0 \0 c 002 277 o \0 \0 \0 \t \0 \0 277 h c
0000340 004 020 \0 003 \0 230 222 214 017 * P R O F I L
0000360 E - D A T U M * 230 221 230 214 004 U S E
0000400 R 003 001 230 222 214 022 * P R O F I L E -
0000420 L O C A T I O N * 231 001 003 002 230 222 214
0000440 017 * P R O F I L E - P O R T S *
0000460 231 001 230 214 021 6 t o p - l e v e l
0000500 f o r m s \0 003 \0 \0 230 220 214 \b F U
0000520 N C T I O N 230 223 001 200 003 230 217 214 \b
0000540 P R O C L A I M 021 231 \b 005 231 \b \0 004
0000560 034 230 223 002 230 217 214 \a S P E C I A L 231
0000600 004 025 230 214 \t P R O F I L E S > \r 230
0000620 223 002 231 \t 231 003 001 230 223 002 231 \t 231 002 \0 235
0000640 226 \0 032 g \0 \0 o \0 \0 \0 \n \0 \0 277 g \0
0000660 \0 g \0 \0 \n \0 \0 277 g \0 \0 020 \0 230 214 020
0000700 1 t o p - l e v e l f o r m
0000720 \0 \0 \0 \0 231 006 230 223 001 200 002 022 230 225 214 023
0000740 S E T F - M A C R O - F U N C T
0000760 I O N \b 230 225 214 024 S E T F - S Y M
0001000 B O L - F U N C T I O N 004 026 230 222
0001020 214 \b S T R A S S O C 231 001 017 230 222 214
0001040 017 e x p a n d - S T R A S S O C
0001060 231 001 \f 231 022 001 231 023 001 004 226 \0 032 @ 002 270
0001100 g \0 \0 g \0 \0 H 001 h 032 032 H 002 001 o \0
0001120 \0 \0 032 032 032 020 \0 230 214 032 l a m b d a
0001140 i n 1 t o p - l e v e l
0001160 f o r m 001 \0 \0 002 231 006 230 223 001 230 223 002
0001200 230 214 \f $ $ M A C R O - F O R M 230
0001220 214 023 $ $ M A C R O - E N V I R O
0001240 N M E N T \0 002 \a 230 217 214 \v S Y M B
0001260 O L - N A M E 004 230 217 214 005 A S S O
0001300 C 001 022 230 223 002 230 220 214 004 T E S T 230 223
0001320 002 230 217 214 \b F U N C T I O N 230 217 214
0001340 \f S T R I N G - E Q U A L \0 \0 234
0001360 230 222 214 \a P R O - G E T 231 001 226 \0 )
0001400 B \t \0 \0 A \t \0 \0 @ \t \0 \0 g \0 \0 g
0001420 \0 \0 \t \0 \0 \f \0 \0 002 001 g \0 \0 g \0 \0
0001440 \t \0 \0 \f \0 \0 002 020 \0 231 \0 \0 \0 003 231
0001460 006 230 223 001 230 223 003 230 214 006 S Y S T E M
0001500 230 214 002 I D 230 214 \b P R O P E R T Y
0001520 \a $ 231 032 ! 230 217 214 017 S Y M B O L -
0001540 F U N C T I O N 026 231 032 023 231 & \n 230
0001560 222 214 021 G E T - P R O F I L E - A
0001600 L I S T 231 001 006 231 031 002 231 031 004 036 231 035
0001620 033 231 033 020 231 035 \r 231 033 \0 \0 234 230 222 214 \a
0001640 P R O - S E T 231 001 226 \0 + h 270 @ \t
0001660 \0 \0 277 @ \t \0 \0 270 H g \0 \0 \n \0 \0 277
0001700 @ A \t \0 \0 B \t \0 \0 C h 032 032 032 H \n
0001720 \0 \0 \n \0 \0 020 \0 231 ( 001 \0 \0 004 231 006 230
0001740 223 001 230 223 004 230 214 006 S Y S T E M 230 214
0001760 002 I D 230 214 \b P R O P E R T Y 230 214
0002000 005 V A L U E \a ' 230 222 214 027 U P D A
0002020 T E - I N T E R N A L - P R O F
0002040 I L E 231 001 $ 230 217 214 005 P R I N T 033
0002060 231 031 027 231 031 021 230 217 214 \r F I L E - P
0002100 O S I T I O N \t 230 222 214 016 E N S U
0002120 R E - P R O F I L E 231 001 004 231 ' 001
0002140 016 230 220 214 003 E N D \0 \0 234 231 ' 226 001 036
0002160 @ \t \0 \0 Q g \0 \0 g \0 \0 \t \0 \0 \f \0
0002200 \0 002 001 270 H 221 H 020 @ \t \0 \0 020 \0 003 001
0002220 231 002 231 ' 001 001 \0 001 231 006 230 223 001 230 223 001
0002240 230 214 006 S Y S T E M 004 032 230 222 214 017 L
0002260 O A D - U P - P R O F I L E 231 001
0002300 017 231 032 \f 231 & 002 231 031 002 \t 231 035 006 231 033
0002320 \0 \0 234 230 222 214 021 M A K E - P R O F
0002340 I L E - N A M E 231 001 226 001 026 g \0 \0
0002360 h \t \0 \0 P @ \t \0 \0 o \0 \0 \0 \r 005 \0
0002400 \0 020 \0 003 \0 231 003 231 8 \0 001 \0 001 231 006 230
0002420 223 001 230 223 001 230 214 006 S Y S T E M 003 022
0002440 230 217 214 \v C O N C A T E N A T E \n
0002460 231 031 005 230 225 214 \r D I R E C T O R Y
0002500 N A M E 001 001 230 217 214 006 S T R I N G
0002520 001 \r 230 214 004 . P R O \0 234 231 7 226 001 ,
0002540 h 270 @ \t \0 \0 270 H g \0 \0 \n \0 \0 277 h
0002560 271 H h h \v \0 \0 Y 220 200 207 @ I \n \0 \0
0002600 277 260 360 @ R \n \0 \0 002 001 020 \0 003 002 231 002
0002620 231 7 002 001 \0 001 231 006 230 223 001 230 223 001 230 214
0002640 006 S Y S T E M 005 & 231 032 036 231 / 025 230
0002660 217 214 004 R E A D \f 231 1 004 231 2 001 \t 230
0002700 220 214 005 S T A R T \0 \0 234 231 / 226 001 {
0002720 h 270 h 271 h 272 @ \t \0 \0 S g \0 \0 g \0
0002740 \0 \t \0 \0 \f \0 \0 X 262 H A 001 H 002 001 \n
0002760 \0 \0 Y 262 % A 002 001 I 002 001 \n \0 \0 Z 226
0003000 J A 002 002 001 031 020 I 002 A 002 001 A 002 002 001
0003020 032 I 002 001 032 030 001 020 H 002 A 001 A 002 001 A
0003040 002 002 001 032 h 032 h 032 032 H 002 001 032 030 001 020
0003060 @ A 001 A 002 001 A 002 002 001 032 h 032 h 032 032
0003100 h 032 h 032 032 S 032 c 006 020 \0 003 003 231 002 231
0003120 / 003 001 \0 002 231 006 230 223 001 230 223 002 230 214 006
0003140 S Y S T E M 230 214 005 D A T U M 005 ,
0003160 231 032 231 032 025 231 032 022 231 & \b 231 031 002 017
0003200 231 035 \f 231 033 \0 \0 234 231 2 226 001 202 \0 \0 \0
0003220 214 h 270 @ \t \0 \0 Q g \0 \0 g \0 \0 \t \0
0003240 \0 \f \0 \0 002 X 262 I H \t \0 \0 231 H g \0
0003260 \0 \n \0 \0 277 260 8 @ \t \0 \0 Q g \0 \0 g
0003300 \0 \0 \t \0 \0 \f \0 \0 @ \t \0 \0 g \0 \0 g
0003320 \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 \r \a
0003340 \0 \0 X 031 277 H g \0 \0 \n \0 \0 277 H 020 @
0003360 \t \0 \0 g \0 \0 g \0 \0 g \0 \0 g \0 \0 g
0003400 \0 \0 g \0 \0 \r \a \0 \0 270 H g \0 \0 \n \0
0003420 \0 277 @ H 032 Q 032 c 002 277 H 020 \0 003 001 231
0003440 004 231 2 001 001 \0 001 231 006 230 223 001 230 223 001 230
0003460 214 006 S Y S T E M 016 ~ 231 1 v 230 217 214
0003500 004 O P E N ` 231 8 Y 231 1 O 231 L 9 231
0003520 8 5 231 032 2 231 & ( 231 031 ! 231 1 031 230 225
0003540 214 005 O P E N P 021 231 032 016 231 & 004 231 031
0003560 023 { 231 3 r 230 220 214 006 C R E A T E o
0003600 230 220 214 021 I F - D O E S - N O T -
0003620 E X I S T l 230 220 214 \t O V E R W R
0003640 I T E i 230 220 214 \t I F - E X I S T
0003660 S f 230 220 214 002 I O c 230 220 214 \t D I R
0003700 E C T I O N V 231 3 K 231 N H 231 O E
0003720 231 P B 231 Q ? 231 R < 231 S / 231 035 , 231
0003740 033 036 231 3 \v 231 035 \b 231 033 \0 \0 234 230 222 214
0003760 016 R E S E T - P R O F I L E R 231
0004000 001 226 002 / h c \b 277 h c \n 277 \b \0 \0 270
0004020 h 271 h 272 h 273 H 220 201 I 020 H 001 \t \0 \0
0004040 273 I 224 J K & 272 204 K h 032 Z 271 H 002 270
0004060 260 346 \0 003 004 231 002 003 005 231 004 231 T 004 002 \0
0004100 \0 231 006 230 223 001 200 002 032 230 217 214 005 C L O
0004120 S E \t 231 M \0 \0 \0 232 W 377 377
0004134