$ od -c -N 50000 [qv]<notecards>1.3K>LIBRARY>ncpath>NCPATHUSE.DCOM!1
0000000 ( F I L E C R E A T E D " 1 8
0000020 - M a r - 8 6 1 0 : 1 1 : 2 8
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 > N E W > N C P A T H U S E .
0000120 ; 7 ) \r " 1 2 - N o v - 8 5
0000140 1 4 : 5 9 : 2 3 " r e c o m p
0000160 i l e d c h a n g e s : N C
0000200 P a t h . G e t C a r d P a t h
0000220 L i s t s F r o m P a t h C o l
0000240 l e c t i o n \r N C P a t h .
0000260 G e t T e r m i n a l s F r o m
0000300 P a t h C o l l e c t i o n N
0000320 C P a t h . G e t U n i q u e T
0000340 e r m i n a l s F r o m P a t h
0000360 C o l l e c t i o n \r N C P a
0000400 t h . R e v e r s e A n d S e p
0000420 a r a t e P a t h s P a t h S
0000440 t e p P r i n t P r i n t F S
0000460 M P r i n t F S M N o d e i
0000500 n " I N T E R L I S P - D
0000520 7 - F e b - 8 6 . . . " \r d
0000540 a t e d " 7 - F e b - 8 6
0000560 1 1 : 4 3 : 0 5 " ) \r ( F I L E
0000600 C R E A T E D " 1 8 - M a r -
0000620 8 6 1 0 : 1 1 : 1 5 " { D S
0000640 K } < L I S P F I L E S > N E W
0000660 > N C P A T H U S E . ; 7 5 1
0000700 7 1 c h a n g e s t o : (
0000720 V A R S \r N C P A T H U S E C
0000740 O M S ) ( F I L E V A R S N
0000760 C P A T H U S E C O M S ) ( F
0001000 N S N C P a t h . G e t T e r
0001020 m i n a l s F r o m P a t h C o
0001040 l l e c t i o n \r N C P a t h
0001060 . G e t U n i q u e T e r m i n
0001100 a l s F r o m P a t h C o l l e
0001120 c t i o n N C P a t h . G e t
0001140 C a r d P a t h L i s t s F r o
0001160 m P a t h C o l l e c t i o n
0001200 \r N C P a t h . R e v e r s e A
0001220 n d S e p a r a t e P a t h s
0001240 P a t h S t e p P r i n t P r
0001260 i n t F S M P r i n t F S M N
0001300 o d e ) p r e v i o u s d a
0001320 t e : \r " 1 4 - M a r - 8 6
0001340 1 1 : 1 3 : 2 8 " { D S K } <
0001360 L I S P F I L E S > N E W > N C
0001400 P A T H U S E . ; 1 ) \r N C P a
0001420 t h . G e t C a r d P a t h L i
0001440 s t s F r o m P a t h C o l l e
0001460 c t i o n D 1 \r ( P 3 P a
0001500 t h I 0 P a t h C o l l e
0001520 c t i o n ) \0 A \a \0 \0 001 021 @ 003
0001540 @ 260 7 d 001 [ \t \0 \0 001 021 0 006 K \t \0
0001560 \0 260 023 d 001 \t \0 \0 274 M 265 \a L h 032 ^
0001600 201 L & 275 002 003 265 355 N 022 032 270 I 265 \a H
0001620 h 032 Z 201 H & 271 002 003 265 312 J 020 \0 ( 3
0001640 2 Q N C P a t h . P a t h S t
0001660 e p . E n d 2 3 Q R E V E R
0001700 S E 1 3 Q L A S T ) \r N I L
0001720 \r ( ) \r N C P a t h . G e t T e
0001740 r m i n a l s F r o m P a t h C
0001760 o l l e c t i o n D 1 \r ( I
0002000 0 P a t h C o l l e c t i o n
0002020 ) \0 036 003 \0 \0 001 021 0 002 @ 260 024 d 001
0002040 \t \0 \0 270 I 265 \a H h 032 Z 201 H & 271 002
0002060 003 265 355 J 020 \0 ( 1 2 Q N C P a t
0002100 h . P a t h . E n d ) \r N I L \r
0002120 ( ) \r N C P a t h . G e t U n i
0002140 q u e T e r m i n a l s F r o m
0002160 P a t h C o l l e c t i o n D
0002200 1 \r ( P 2 T e m p C o l l e
0002220 c t i o n P 1 P a t h I
0002240 0 P a t h C o l l e c t i o
0002260 n ) \0 ! 003 \0 \0 001 @ 021 ! 002 H 003 265
0002300 004 J 020 001 Y \t \0 \0 J \n \0 \0 246 I \t \0
0002320 \0 J 032 272 H 002 X 260 347 \0 ( 2 7 Q N
0002340 C P a t h . P a t h . E n d 2
0002360 2 Q M E M B E R 1 6 Q N C
0002400 P a t h . P a t h . E n d ) \r N
0002420 I L \r ( ) \r N C P a t h . R e v
0002440 e r s e A n d S e p a r a t e P
0002460 a t h s D 1 \r ( P 3 P a t
0002500 h I 0 P a t h C o l l e c
0002520 t i o n ) \0 " 004 \0 \0 001 021 @ 003 @
0002540 260 030 d 001 [ \t \0 \0 \t \0 \0 270 I 265 \a H
0002560 h 032 Z 201 H & 271 002 003 265 351 J 020 \0 ( 1
0002600 6 Q R E V E R S E 1 3 Q C
0002620 O P Y ) \r N I L \r ( ) \r P a t h
0002640 S t e p P r i n t D 1 \r ( I
0002660 1 S t r e a m I 0 I n s
0002700 t a n c e ) \0 " \0 \0 \0 002 @ 006 \0
0002720 \0 312 \0 \0 j 360 246 @ 006 \0 \0 311 \0 214 o \0
0002740 \0 \0 @ 006 \0 \0 311 \0 \n \0 \0 h 032 020 \0 (
0002760 3 5 Q C O N C A T ) \r ( 3 0 Q
0003000 N C P a t h P a t h S t e p
0003020 1 5 Q N C P a t h P a t h S t
0003040 e p 3 N C P a t h P a t h S
0003060 t e p ) \r ( 2 4 Q " _ " ) \r
0003100 P r i n t F S M D 1 \r ( I 1
0003120 S t r e a m I 0 I n s t
0003140 a n c e ) \0 \0 \0 \0 002 o \0 \0 \0
0003160 @ 006 \0 \0 311 002 o \0 \0 \0 @ 006 \0 \0 311 \0
0003200 o \0 \0 \0 \r 005 \0 \0 h 032 020 \0 ( 3 3 Q
0003220 C O N C A T ) \r ( 2 1 Q N C
0003240 P a t h F S M 7 N C P a t h
0003260 F S M ) \r ( 2 7 Q " ] " 1
0003300 5 Q " I n i t i a l S t a t
0003320 e = " 3 " [ F S M ; C u r
0003340 r e n t S t a t e = " ) \r P r i
0003360 n t F S M N o d e D 1 \r ( I
0003400 1 S t r e a m I 0 I n s
0003420 t a n c e ) \0 J \0 \0 \0 002 o \0 \0
0003440 \0 @ 006 \0 \0 311 \0 o \0 \0 \0 @ 006 \0 \0 312
0003460 \0 \0 j 360 243 g \0 \0 202 g \0 \0 o \0 \0 \0
0003500 @ 006 \0 \0 312 \0 020 j 360 243 g \0 \0 202 g \0
0003520 \0 o \0 \0 \0 @ 006 \0 \0 311 002 o \0 \0 \0 \r
0003540 \t \0 \0 h 032 020 \0 ( 1 0 5 Q C O N
0003560 C A T ) \r ( 7 3 Q N C P a t h
0003600 F S M N o d e 6 3 Q B A C K
0003620 5 7 Q F O R W A R D 4 6 Q
0003640 N C P a t h F S M N o d e 3
0003660 6 Q C A R D 3 2 Q L I N K
0003700 2 1 Q N C P a t h F S M N o
0003720 d e 7 N C P a t h F S M N o
0003740 d e ) \r ( 1 0 1 Q " ] " 6
0003760 7 Q " N e x t N o d e s = "
0004000 4 2 Q " D i r e c t i o n
0004020 = " 1 5 Q " C a r d / L i
0004040 n k = " 3 " [ F S M N o d e
0004060 ; P r e d i c a t e = " ) \r (
0004100 P R E T T Y C O M P R I N T N
0004120 C P A T H U S E C O M S ) \r ( R
0004140 P A Q Q N C P A T H U S E C O
0004160 M S ( ( F I L E S N C P A T
0004200 H N C P A T H P A R S E ) (
0004220 F N S N C P a t h . G e t C a
0004240 r d P a t h L i s t s F r o m P
0004260 a t h C o l l e c t i o n \r N
0004300 C P a t h . G e t T e r m i n a
0004320 l s F r o m P a t h C o l l e c
0004340 t i o n N C P a t h . G e t U
0004360 n i q u e T e r m i n a l s F r
0004400 o m P a t h C o l l e c t i o n
0004420 \r N C P a t h . R e v e r s e
0004440 A n d S e p a r a t e P a t h s
0004460 P a t h S t e p P r i n t P
0004500 r i n t F S M P r i n t F S M
0004520 N o d e ) ( * ( P ( D E F
0004540 P R I N T ( Q U O T E N C P
0004560 a t h F S M ) \r ( Q U O T E
0004600 P r i n t F S M ) ) ( D E F P
0004620 R I N T ( Q U O T E N C P a
0004640 t h F S M N o d e ) ( Q U O T
0004660 E P r i n t F S M N o d e ) )
0004700 ( D E F P R I N T ( Q U O T
0004720 E \r N C P a t h P a t h S t e
0004740 p ) ( Q U O T E P a t h S t
0004760 e p P r i n t ) ) ) ) ) ) \r ( F
0005000 I L E S L O A D N C P A T H
0005020 N C P A T H P A R S E ) \r ( P U
0005040 T P R O P S N C P A T H U S E
0005060 C O P Y R I G H T ( " X e r
0005100 o x C o r p o r a t i o n "
0005120 1 9 8 6 ) ) \r N I L \r
0005133