$ od -c -N 50000 [eris]<LispCore>PROLOG>SNAP6>TOPLEVEL.DCOM!2
0000000 ( F I L E C R E A T E D " 1 3
0000020 - N o v - 8 5 1 6 : 0 2 : 5 0
0000040 " ( " c o m p i l e d o n
0000060 " { D S K } < L I S P F I L E
0000100 S 2 > T O P L E V E L . ; 2 )
0000120 " 1 7 - O c t - 8 5 1 8 : 5 8
0000140 : 4 4 " \r t c o m p l ' d i
0000160 n " I N T E R L I S P - D 1
0000200 7 - O c t - 8 5 . . . " d a
0000220 t e d " 1 7 - O c t - 8 5 1
0000240 9 : 0 4 : 0 7 " ) \r ( F I L E C
0000260 R E A T E D " 1 3 - N o v - 8
0000300 5 1 6 : 0 2 : 4 3 " { D S K
0000320 } < L I S P F I L E S 2 > T O P
0000340 L E V E L . ; 2 2 3 8 5 p r
0000360 e v i o u s d a t e : \r " 1
0000400 2 - N o v - 8 5 1 3 : 3 0 : 5
0000420 6 " { G O E D E L } / u s r 2
0000440 / x e r o x / q / T O P L E V E
0000460 L ) \r Q P . F O R E V E R . D O
0000500 . P R O L O G D 1 \r ( I 0
0000520 M O D E ) \0 a \0 \0 \0 001 @ d g \0
0000540 \0 360 233 277 g \0 \0 j g \0 \0 \v \0 \0 020 g
0000560 \0 \0 360 232 g \0 \0 j g \0 \0 \v \0 \0 020 @
0000600 d g \0 \0 360 233 277 g \0 \0 j g \0 \0 \v \0
0000620 \0 020 g \0 \0 360 232 g \0 \0 j g \0 \0 \v \0
0000640 \0 020 @ g \0 \0 360 232 g \0 \0 j g \0 \0 \v
0000660 \0 \0 020 o \0 \0 \0 @ \n \0 \0 020 \0 ( 1 3
0000700 6 Q E R R O R 1 2 5 Q P R
0000720 O L O G 1 0 4 Q P R O L O G
0000740 6 4 Q P R O L O G 4 1 Q
0000760 P R O L O G 2 1 Q P R O L O
0001000 G ) \r ( 1 2 2 Q s i 1 1 6 Q
0001020 f i r s t _ t o p _ l e v e l
0001040 1 1 1 Q S T A R T 1 0 1 Q
0001060 s i 7 5 Q r e s t o r e _
0001100 t o p _ l e v e l 7 0 Q R E
0001120 S T O R E 6 1 Q s i 5 5 Q
0001140 r e i n i t _ t o p _ l e v e
0001160 l 4 7 Q R E I N I T 3 6 Q
0001200 s i 3 2 Q e r r o r _ t o
0001220 p _ l e v e l 2 5 Q E R R O
0001240 R 1 6 Q s i 1 2 Q a b o
0001260 r t _ t o p _ l e v e l 4 A
0001300 B O R T ) \r ( 1 3 2 Q " D o
0001320 n ' t k n o w h o w t o
0001340 h a n d l e t h i s e v e n
0001360 t " ) \r Q P . R U N . Q U I N T
0001400 U S . P R O L O G D 1 \r ( P
0001420 0 E X I T M O D E ) \0 026 001 \0
0001440 \0 \0 g \0 \0 021 001 \0 H d g \0 \0 360 221 h
0001460 020 \t \0 \0 X 260 364 \0 ( 2 1 Q Q P .
0001500 F O R E V E R . D O . P R O L O
0001520 G ) \r ( 1 2 Q E X I T 2 S
0001540 T A R T ) \r ( ) \r ( P R E T T Y
0001560 C O M P R I N T T O P L E V E
0001600 L C O M S ) \r ( R P A Q Q T O
0001620 P L E V E L C O M S ( ( S C C
0001640 S ) ( * O u t e r w r a p
0001660 p e r c o d e f o r P r o
0001700 l o g . Q P . R U N . Q U I N
0001720 T U S . P R O L O G s t a r t
0001740 s u p t h e \r p r o l o g
0001760 i n t e r p r e t e r . ) (
0002000 F N S Q P . F O R E V E R . D
0002020 O . P R O L O G Q P . P R O L
0002040 O G . E V E N T Q P . R U N .
0002060 Q U I N T U S . P R O L O G )
0002100 ( I N I T V A R S ( \r Q P . T
0002120 O P . T R A C E . S T A T E 1
0002140 ) ( Q P . T R A C E . S T A T
0002160 E 1 ) ) ) ) \r ( R P A Q ? Q
0002200 P . T O P . T R A C E . S T A T
0002220 E 1 ) \r ( R P A Q ? Q P . T
0002240 R A C E . S T A T E 1 ) \r ( P
0002260 U T P R O P S T O P L E V E L
0002300 C O P Y R I G H T ( " Q u i
0002320 n t u s C o m p u t e r S y
0002340 s t e m s " 1 9 8 5 ) ) \r N I
0002360 L \r
0002362