$ od -c -N 50000 [eris]<Lisp>JCAI>library>SIMPLIFY.DCOM!1
0000000 ( F I L E C R E A T E D " 6
0000020 - J A N - 8 2 1 8 : 2 3 : 1 8
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < L I S P U
0000100 S E R S > S I M P L I F Y . ; 1
0000120 ) N O B I N D b c o m p l '
0000140 d i n \r " N T E R L I S P -
0000160 D " d a t e d " 6 - J A
0000200 N - 8 2 1 3 : 3 3 : 3 4 " ) \r
0000220 ( F I L E C R E A T E D " 6
0000240 - N O V - 7 9 1 7 : 2 5 : 5 0
0000260 " < L I S P U S E R S > S I M
0000300 P L I F Y . ; 3 4 1 8 3 c h
0000320 a n g e s t o : A P P L Y F
0000340 O R M p r e v i o u s d a t
0000360 e : \r " 6 - N O V - 7 9 1
0000400 6 : 5 3 : 2 0 " < L I S P U S
0000420 E R S > S I M P L I F Y . ; 2 )
0000440 \r A P P L Y F O R M D 1 \r ( L
0000460 ( 1 A R G 1 0 F N ) )
0000500 \0 X 002 \0 \0 002 021 001 @ d 003 001 g \0 \0
0000520 360 262 H d 002 003 001 003 262 A d 002 001 002 263 ;
0000540 002 001 001 X 004 l 004 360 262 0 H 262 - @ d 002
0000560 002 002 230 277 g \0 \0 @ 002 002 032 202 002 002 001 271
0000600 A \t \0 \0 245 H I \n \0 \0 234 H A 360 221 I
0000620 020 A H I \v \0 \0 020 @ A # 032 020 \0 ( 1
0000640 2 0 Q \ A P P L Y F O R M / S
0000660 U B S T V A L 1 0 3 Q \ A P
0000700 P L Y F O R M / O N C E 7 5 Q
0000720 \ A P P L Y F O R M / S I M P
0000740 L E P ) \r ( 6 0 Q P R O G N
0000760 1 1 Q L A M B D A ) \r N I L \r
0001000 \ A P P L Y F O R M / O N C E
0001020 D 1 \r ( L ( 1 F O R M 0
0001040 A T O M ) I 2 F L G ) \0
0001060 016 \0 \0 \0 003 @ A \n \0 \0 B g \0 \0 360 h
0001100 360 020 \0 ( 4 \ A P P L Y F O R M
0001120 / O N C E 1 ) \r ( 1 0 Q F A I
0001140 L E D ) \r N I L \r \ A P P L Y F
0001160 O R M / O N C E 1 D 1 \r ( L
0001200 ( 1 L 0 A ) F 2 F L
0001220 G ) \0 9 002 001 \0 002 A 021 021 001 H 003 265
0001240 004 h 020 001 271 R g \0 \0 360 263 367 I 003 265 \r
0001260 @ I 360 262 031 R 236 g \0 \0 215 @ \n \0 \0 253
0001300 @ I \n \0 \0 204 g \0 \0 c 004 277 H 002 X 260
0001320 317 \0 ( 5 3 Q \ A P P L Y F O R
0001340 M / O N C E 1 4 5 Q \ A P P
0001360 L Y F O R M / O P A Q U E ) \r (
0001400 5 7 Q O N C E 4 0 Q F A I
0001420 L E D 1 7 Q F A I L E D ) \r
0001440 N I L \r \ A P P L Y F O R M / O
0001460 P A Q U E D 1 \r ( L ( 1 V
0001500 A R 0 F O R M ) ) \0 C 002 \0
0001520 \0 002 @ 001 d g \0 \0 360 263 4 d g \0 \0 360
0001540 245 d g \0 \0 360 226 277 A @ 002 001 034 020 g \0
0001560 \0 360 264 \r @ 002 001 021 021 001 H 003 265 004 h 020
0001600 001 271 A I d 003 220 001 360 224 I 265 364 i 020 H
0001620 002 X 260 351 \0 N I L \r ( 3 6 Q P R
0001640 O G 2 2 Q N L A M B D A 1
0001660 4 Q L A M B D A 5 Q U O T
0001700 E ) \r N I L \r \ A P P L Y F O R
0001720 M / S I M P L E P D 1 \r ( L
0001740 ( 0 F O R M ) ) \0 Q \0 \0 \0 001
0001760 @ 004 d k 360 256 d l 002 360 251 d l 003 360 244
0002000 d l 004 360 222 277 i 201 277 h 265 5 @ 003 001 d
0002020 g \0 \0 360 263 033 d g \0 \0 360 263 024 d g \0
0002040 \0 360 253 d g \0 \0 360 245 d g \0 \0 360 230 277
0002060 @ 002 001 004 l 004 360 201 277 h 265 005 @ 005 \a 020
0002100 \0 N I L \r ( 7 4 Q C D D R 6
0002120 6 Q C A D R 6 0 Q C D R
0002140 5 1 Q C A R 4 2 Q Q U O T
0002160 E ) \r N I L \r \ A P P L Y F O R
0002200 M / S U B S T V A L D 1 \r ( L
0002220 ( 2 F O R M 1 O L D 0
0002240 N E W ) ) \0 [ 006 \0 \0 003 B d 003
0002260 262 Q A \n \0 \0 221 B 020 021 ` 005 B Z 003 265
0002300 \v h Y 262 < h 274 B 260 0 001 [ @ A K \v
0002320 \0 \0 X 360 245 K 265 354 i 260 351 J 002 260 340 d
0002340 001 275 I 265 \t @ A M \v \0 \0 207 M 360 223 h
0002360 271 H 200 M L $ 274 002 003 265 346 L h % 020 B
0002400 020 A 360 262 264 @ 020 \0 ( 7 5 Q \ A P
0002420 P L Y F O R M / S U B S T V A L
0002440 4 4 Q \ A P P L Y F O R M /
0002460 S U B S T V A L 1 0 Q \ A P
0002500 P L Y F O R M / O P A Q U E ) \r
0002520 N I L \r N I L \r S I M P L I F Y
0002540 D 1 \r ( L ( 0 F O R M ) )
0002560 \0 003 \0 \0 \0 001 @ 020 \0 N I L \r N I
0002600 L \r N I L \r ( P R E T T Y C O M
0002620 P R I N T S I M P L I F Y C O
0002640 M S ) \r ( R P A Q Q S I M P L
0002660 I F Y C O M S ( ( * T o o l
0002700 s f o r s y m b o l i c s
0002720 i m p l i f i c a t i o n o f
0002740 L I S P f o r m s ) ( F N
0002760 S S I M P L I F Y ) ( F N S
0003000 A P P L Y F O R M \r O N C E
0003020 O N C E 1 O P A Q U E S I
0003040 M P L E P S U B S T V A L )
0003060 ( B L O C K S ( A P P L Y F O
0003100 R M A P P L Y F O R M O N C
0003120 E O N C E 1 O P A Q U E S
0003140 I M P L E P S U B S T V A L )
0003160 ) \r ) ) \r N I L \r
0003171