$ od -c -N 50000 [qv]<IDL>SOURCES>ELAMTRAN.DCOM!2
0000000 ( F I L E C R E A T E D " 1 1
0000020 - F e b - 8 6 2 3 : 0 7 : 5 1
0000040 " ( " c o m p i l e d o n
0000060 " { Q V } < I D L > S O U R C
0000100 E S > E L A M T R A N . ; 3 )
0000120 " 1 2 - N o v - 8 5 1 4 : 5 9
0000140 : 2 3 " \r r e c o m p i l e d
0000160 c h a n g e s : E L A M T R
0000200 A N i n " I N T E R L I S P
0000220 - D 7 - F e b - 8 6 . . .
0000240 " d a t e d " 7 - F e b -
0000260 8 6 1 1 : 4 3 : 0 5 " ) \r ( F
0000300 I L E C R E A T E D " 1 1 - F
0000320 e b - 8 6 2 3 : 0 7 : 1 9 "
0000340 { Q V } < I D L > S O U R C E S
0000360 > E L A M T R A N . ; 3 5 7 0
0000400 5 c h a n g e s t o : ( V
0000420 A R S E L A M T R A N C O M S
0000440 ) ( \r F N S E L A M T R A N
0000460 ) p r e v i o u s d a t e :
0000500 " 2 5 - J A N - 8 3 1 6 : 0
0000520 1 : 5 0 " { Q V } < I D L > S
0000540 O U R C E S > E L A M T R A N .
0000560 ; 2 ) \r ( F I L E S L O A D (
0000600 S Y S L O A D F R O M V A L
0000620 U E O F L I S P U S E R S D I
0000640 R E C T O R I E S ) L A M B D
0000660 A T R A N ) \r E L A M A R G L I
0000700 S T D 1 \r ( I 0 D E F )
0000720 \0 @ 004 \0 \0 001 @ d 002 001 003 262 7 277 021 @
0000740 003 @ 002 001 260 ! d 001 [ 003 001 g \0 \0 360 h
0000760 360 264 \t K d 003 220 001 h 032 X 003 226 I 265 \f
0001000 H Z Y 277 002 003 265 340 J 020 \t \0 \0 Y H 031
0001020 260 363 002 001 020 \0 ( 6 6 Q L A S T )
0001040 \r ( 2 7 Q T I T L E ) \r N I L
0001060 \r E L A M T R A N D 1 \r ( P
0001100 6 G L I T C H P 4 E F O
0001120 R M P 3 T I T L E F O R M
0001140 P 2 T O P P 1 V N A
0001160 M E S P 0 E X P E C T S
0001200 I 0 F O R M F 1 5 Q F
0001220 A U L T F N F 1 6 Q C O M
0001240 M E N T F L G ) 001 x \r 002 \0 001 @
0001260 002 001 003 263 ' o \0 \0 \0 i \n \0 \0 277 W 032
0001300 i \n \0 \0 277 o \0 \0 \0 i \n \0 \0 277 @ 002
0001320 001 i \n \0 \0 277 \b \0 \0 277 021 ` 005 @ 002 001
0001340 260 $ d 001 ] 003 265 \t h H 032 270 M 260 023 001
0001360 g \0 \0 360 222 M 273 212 M 002 001 H 032 270 M 001
0001400 I 032 271 002 003 265 335 H \t \0 \0 X d \t \0 \0
0001420 021 001 006 N 262 & o \0 \0 \0 i \n \0 \0 277 W
0001440 032 i \n \0 \0 277 o \0 \0 \0 i \n \0 \0 277 N
0001460 001 i \n \0 \0 277 \b \0 \0 277 023 I \t \0 \0 Y
0001500 g \0 \0 g \0 \0 g \0 \0 I @ 002 002 032 032 h
0001520 032 032 H d 236 d i 360 252 3 020 265 \t g \0 \0
0001540 H h 032 032 I 032 032 032 \ K 265 2 @ W 032 \t
0001560 \0 \0 360 251 @ W 032 g \0 \0 033 360 262 037 g \0
0001600 \0 W 032 d 237 d i 360 253 3 020 265 \n g \0 \0
0001620 W 032 h 032 032 I 032 032 h 032 201 K 002 [ g \0
0001640 \0 I W 034 o \0 \0 \0 032 K 262 h H I 021 B
0001660 \f O 020 003 265 003 210 001 _ 030 277 O 016 003 265 032
0001700 O 022 022 o \0 \0 \0 L K 032 o \0 \0 \0 \v \0
0001720 \0 h 032 \n \0 \0 260 ? 001 262 # g \0 \0 O 030
0001740 g \0 \0 O 030 h 032 032 h 032 032 032 _ 026 277 O
0001760 024 265 031 O 026 h 032 _ 024 _ 022 277 O 020 002 _
0002000 020 277 O 016 002 _ 016 277 260 251 O 026 & _ 024 277
0002020 260 354 L h 032 032 032 032 Z d d h d d W 032
0002040 \r 006 \0 \0 J 020 \0 ( 5 6 4 Q D W I
0002060 M I F Y 0 ? 4 4 6 Q \ N C O
0002100 N C 2 4 4 1 Q S U B P A I R
0002120 3 0 2 Q G E T D 2 1 7 Q
0002140 D R E V E R S E 2 1 1 Q E R
0002160 R O R ! 2 0 5 Q L I S P X P
0002200 R I N T 1 7 6 Q L I S P X P
0002220 R I N 1 1 6 5 Q L I S P X P
0002240 R I N 2 1 5 6 Q L I S P X P
0002260 R I N 1 1 4 0 Q E X P C H K
0002300 1 3 3 Q D R E V E R S E 5
0002320 1 Q E R R O R ! 4 5 Q L I
0002340 S P X P R I N T 3 5 Q L I S
0002360 P X P R I N 1 2 4 Q L I S P
0002400 X P R I N 2 1 5 Q L I S P X
0002420 P R I N 1 ) \r ( 4 6 3 Q C O N
0002440 V E R T 4 5 6 Q S E T Q 3
0002460 6 1 Q L A M B D A 3 4 0 Q
0002500 Q U O T E 3 2 1 Q L I S T
0002520 3 1 2 Q E X P R 2 6 0 Q Q
0002540 U O T E 2 3 1 Q L A M B D A
0002560 2 2 6 Q F U N C T I O N 2
0002600 2 3 Q E A P P L Y * 1 0 3 Q
0002620 T I T L E ) \r ( 4 3 6 Q (
0002640 P R O G ( ( E L A M V A L E
0002660 F ) ) ( D E C L A R E ( L O
0002700 C A L V A R S E L A M V A L )
0002720 ) ( A N D ( I D L A R R A Y
0002740 P E L A M V A L ) ( A S S I
0002760 G N ( A T E L A M V A L (
0003000 C O N S T A N T ( T I T L E )
0003020 ) ) . T F O R M ) ) ( R E
0003040 T U R N E L A M V A L ) ) 4
0003060 2 7 Q ( E F . T F O R M )
0003100 3 7 0 Q ( A S S E R T : (
0003120 C L I S P E L A M B D A ) )
0003140 1 7 2 Q " } i l l e g a l
0003160 E X P E C T S d e c l a r a t
0003200 i o n " 1 5 2 Q " { i n "
0003220 3 1 Q " } n o n - l i s t
0003240 a r g u m e n t s p e c i f
0003260 i c a t i o n " 1 1 Q " {
0003300 i n " ) \r P P E L A M D 1 \r
0003320 ( P 5 V P 4 L A S T L
0003340 I S T P 3 V A R P O S P
0003360 1 F O R M P O S P 0 V
0003400 L I S T I 0 F O R M F
0003420 6 P R E T T Y T R A N F L G
0003440 F 7 C L I S P A R R A Y F
0003460 1 0 Q C O M M E N T F L G
0003500 F 1 1 Q F N S L S T ) \0 226
0003520 006 004 \0 001 @ d 002 003 230 277 V 226 @ d W 016
0003540 035 221 020 @ 002 001 \b \0 \0 l 002 330 021 002 001 o
0003560 \0 \0 \0 \t \0 \0 277 H d 003 262 B 277 o \0 \0
0003600 \0 \t \0 \0 277 H \b \0 \0 i 021 023 005 J 003 265
0003620 \f 023 o \0 \0 \0 \t \0 \0 260 & 001 275 L 225 K
0003640 j \n \0 \0 203 k \t \0 \0 277 M 003 274 M h \t
0003660 \0 \0 i \v \0 \0 277 J 002 Z 260 324 \t \0 \0 277
0003700 @ 002 002 b \0 d 003 235 d 001 W 020 360 247 277 I
0003720 j \n \0 \0 277 @ I i d W 022 \r 005 \0 \0 277
0003740 o \0 \0 \0 \t \0 \0 h 020 \0 ( 2 2 2 Q
0003760 P R I N 1 2 1 2 Q P R I N T
0004000 D E F 1 7 7 Q T A B 1 5 2
0004020 Q P R I N 2 1 4 1 Q P R I
0004040 N T D E F 1 3 5 Q P O S I T
0004060 I O N 1 2 4 Q S P A C E S
0004100 1 1 7 Q T A B 1 0 4 Q P R
0004120 I N 3 6 4 Q P O S I T I O N
0004140 5 7 Q P R I N 1 4 1 Q P
0004160 R I N 1 2 4 Q P O S I T I O
0004200 N ) \r N I L \r ( 2 1 7 Q " ] "
0004220 1 0 1 Q " ) " 5 4 Q " (
0004240 " 3 6 Q " [ E L A M B D A
0004260 " ) \r ( P R E T T Y C O M P R I
0004300 N T E L A M T R A N C O M S )
0004320 \r ( R P A Q Q E L A M T R A N
0004340 C O M S ( ( * C o n t a i n
0004360 s t r a n s l a t o r f o r
0004400 u s e r ' s E L A M B D A
0004420 f u n c t i o n s . ) ( D E C
0004440 L A R E : F I R S T ( F I L
0004460 E S ( \r S Y S L O A D F R O
0004500 M V A L U E O F L I S P U S
0004520 E R S D I R E C T O R I E S )
0004540 L A M B D A T R A N ) ) ( F N
0004560 S E L A M A R G L I S T E L
0004600 A M T R A N P P E L A M ) (
0004620 A D D V A R S ( \r L A M B D A
0004640 S P L S T E L A M B D A ) )
0004660 ( A L I S T S ( L A M B D A T
0004700 R A N F N S E L A M B D A )
0004720 ( P R E T T Y P R I N T M A C R
0004740 O S E L A M B D A ) ) ( P R
0004760 O P I N F O E L A M B D A )
0005000 \r ) ) \r ( A D D T O V A R L A
0005020 M B D A S P L S T E L A M B D
0005040 A ) \r ( A D D T O V A R L A M
0005060 B D A T R A N F N S ( E L A M
0005100 B D A E L A M T R A N E X P
0005120 R E L A M A R G L I S T ) ) \r
0005140 ( A D D T O V A R P R E T T Y
0005160 P R I N T M A C R O S ( E L A
0005200 M B D A . P P E L A M ) ) \r
0005220 ( P U T P R O P S E L A M B D
0005240 A I N F O B I N D S ) \r ( P
0005260 U T P R O P S E L A M T R A N
0005300 C O P Y R I G H T ( " X e r
0005320 o x C o r p o r a t i o n "
0005340 1 9 8 3 1 9 8 6 ) ) \r N I L \r
0005360