$ od -c -N 50000 [Indigo]<Dicentra>Boggs>SCI-Program.BFS!1>bravo.scratchbravo 0000000 005 1 2 0 9 8 b c p l r s i o n 0000020 7 . 6 S e p t e m b e r 2 0000040 5 , 1 9 8 2 \0 \0 371 \n s c i 1 . 0000060 b c p l . \0 . c m . \0 \0 005 \0 001 207 0000100 204 322 021 202 020 \0 \0 \0 ( 217 001 371 N v Q 247 0000120 301 \0 \0 371 363 \0 \0 \0 \0 \0 S v A \0 002 371 0000140 2 z 261 \0 \0 \0 005 \0 002 207 204 322 021 202 020 \0 0000160 \0 \0 ( 217 001 371 N v Q 247 301 \0 \0 371 363 \0 0000200 \0 \0 \0 \0 S v A \0 002 371 2 z 261 \0 \0 \0 0000220 005 \0 003 207 204 322 021 202 020 \0 \0 \0 ( 217 001 371 0000240 N v Q 247 301 \0 \0 371 363 \0 \0 \0 \0 \0 S v 0000260 A \0 002 371 2 z 261 \0 \0 \0 005 \0 004 207 204 322 0000300 021 202 020 \0 \0 \0 ( 217 001 371 N v Q 247 301 \0 0000320 \0 371 363 \0 \0 \0 \0 \0 S v A \0 002 371 2 z 0000340 261 \0 \0 \0 005 \0 005 207 204 322 021 202 020 \0 \0 \0 0000360 ( 217 001 371 N v Q 247 301 \0 \0 371 363 \0 \0 \0 0000400 \0 \0 S v A \0 002 371 2 z 261 \0 \0 \0 005 \0 0000420 006 207 204 322 021 202 020 \0 \0 \0 ( 217 001 371 N v 0000440 Q 247 301 \0 \0 371 363 \0 \0 \0 \0 \0 S v A \0 0000460 002 371 2 z 261 \0 \0 \0 005 \0 \a 207 204 322 021 202 0000500 020 \0 \0 \0 ( 217 001 371 N v Q 247 301 \0 \0 371 0000520 s c i 1 . b c p l M a y 3 0 , 0000540 1 9 8 3 1 : 5 0 P M \r \r 0000560 \r c o n n = n u m b e r l 0000600 s 1 0 0 ? $ 1 , $ 2 l e t 0000620 l e t p i n = n u m b e 0000640 r l s 1 0 0 ? n u m b e r 0000660 , n u m b e r - 1 0 0 a r = 0000700 G e t s ( k e y s ) \r b o a r 0000720 d T y p e o r o r & 1 0000740 3 7 b c p u T y p e v a x F l a 0000760 g ; P u t s ( d s p , c p u 0001000 T y p e ) ; P u t s ( d s p , 0001020 b o a r d T y p e ) c p u T y 0001040 p e e q $ V c p u T y p e 0001060 e q $ V c p u T y p e c p u T 0001100 y p e e q $ V c p u T y p e 0001120 e q $ V l e t [ 0001140 \r 0001160 ] \r 0001200 c a s e d a n d e l i o n : \r 0001220 [ 0001240 \r 0001260 ] \r 0001300 e n d c a s e \r 0001320 e n d c a s e \r 0001340 \r \r a n d M 0001360 u l t i b u s ( ) b e \r [ \r ] 0001400 M u l t i b u s ( ) ; 0001420 e n d c a s e ] \r 0001440 : s w i t c h o n b o a r d 0001460 T y p e i n t o \r 0001500 c a s e m u l t i b u s 0001520 : [ M u l t i b u s ( ) ; 0001540 e n d c a s e ] \r 0001560 c a s e \r 0001600 [ \r \r 0001620 [ d a 0001640 n d e l i o n : \r 0001660 c a s e u n i v e r 0001700 s a l : \r 0001720 ] \r e n d c 0001740 a s e \r ] E a 0001760 n d C \r \r a n d D a n d e l i 0002000 o n E ( ) b e \r [ \r ] \r \r a n 0002020 d D a n d e l i o n C ( ) b 0002040 e \r [ \r ] \f \r a n d U n i v e 0002060 r s a l ( ) b e \r [ \r ] \r [ 0002100 U n i v e r s a l ( ) ; e n 0002120 d c a s e ] [ D a n d e l 0002140 i o n E ( ) ; e n d c a s e 0002160 ] D a n d e l i o n C ( ) ; t 0002200 o k e n T y p e e q e d g e 0002220 P i n ? t e s t t o k e n T 0002240 y p e e q e d g e P i n i 0002260 f s o i f n o t D a n d e 0002300 l i o n C ( ) \r [ \r \r u n i v e 0002320 r s a l = 1 \r m u l t i b u 0002340 s = 2 \r d a n d e l i o n 0002360 = 3 \r ] ; b o a r d T y p e 0002400 \r \r g e t " S C I . d e c l " 0002420 S C I . d e c l \r / / L a s t 0002440 m o d i f i e d b y B o 0002460 g g s \r \r A p r i l 2 8 , 1 0002500 9 8 3 1 1 : 4 3 P M / / 0002520 \r m a n i f e s t \r [ \r / / b 0002540 o a r d t y p e s \r u n \r \r s 0002560 c i . b c p l \r / / T S P c 0002600 o m m a n d s \r c m S C I . d e 0002620 c l S C I . b c p l S C I 1 0002640 . b c p l L o a d S C I . c m 0002660 S C I . c m \r g e t " S C I 0002700 . d e c l " \r t e s t t o k e 0002720 n > > S t r i n g . c h a r ^ 1 0002740 e q $ E \r i f s o W 0002760 s ( o u t , " \r P u t T e m p 0003000 l a t e ( o u t , " $ C $ \r 0003020 P u t s ( o u t , t o k e n > 0003040 > S t r i n g . c h a r ^ 1 ) \r 0003060 P u t s ( o u t , $ * S ) \r f 0003100 o r i = 2 t o t o k e 0003120 n > > S t r i n g . l e n g t h 0003140 d o \r P u t s ( o u t , 0003160 t o k e n > > S t r i n g . c 0003200 h a r ^ i ) \r \r i f t o k e n 0003220 > > S t r i n g . c h a r ^ 2 0003240 e q 0 & \r l e t c 2 = 0003260 \r l e t c 3 = t o k e n 0003300 > > S t r i n g . c h a r ^ 3 t 0003320 c $ * c 3 g e $ \r l e t n 0003340 u m b e r = 0 \r f o r i 0003360 = 2 t o t o k e n > > S t 0003400 r i n g . l e n g t h d o \r n 0003420 u m b e r = n u m b e r * 1 0003440 0 + t o k e n > > S t r i n g 0003460 . c h a r ^ i \r i f n u 0003500 m b e r p i n g e 1 & p 0003520 i n l e 5 0 t h e n \r n u 0003540 m b e r \r \r l e t c o n n , 0003560 s i d e , p i n = n i l , 0003600 n i l , n i l \r [ c 0003620 o n n = $ 1 ; s i d e = 0003640 $ T ; p i n = n u m b e 0003660 r ] \r i f n u m b e r g e 0003700 5 1 & n u m b e r l e 0003720 1 0 0 t h e n \r [ c o 0003740 n n = 2 ; s i d e = $ 0003760 T ; $ p i n = n u m b e r 0004000 - 5 0 ] \r i f n u m b e 0004020 r g e 1 0 1 & n u m b e 0004040 r l e 1 5 0 t h e n \r 0004060 [ c o n n = $ 1 ; s i 0004100 d e = $ B ; p i n = n 0004120 u m b e r - 1 0 0 ] \r i f n 0004140 u m b e r g e 1 5 1 & n 0004160 u m b e r l e 2 0 0 t h e 0004200 n \r [ c o n n = $ 2 0004220 ; s i d e = $ B ; p i n 0004240 = n u m b e r - 1 5 0 ] \r 0004260 P u t T e m p l a t e ( o u t , 0004300 " P $ C - $ C $ D " , c o 0004320 n n , s i d e , p i n ) \r 0004340 \r / / t h i s a s s u m e s 0004360 t w o D B 3 7 c o n n e c 0004400 t o r s a r e p l u g g e d 0004420 i n . . . \r \r i f n u m b e 0004440 r g e 5 1 & n u m b e r 0004460 l e 8 7 t h e n \r [ 0004500 \r l e t c o n n , p i n 0004520 = n i l , n i l c o n n = 0004540 $ 2 ; n u m b e r = n u 0004560 m b e r - 5 0 p i n \r i f n u 0004600 m b e r g e 1 & n u m b 0004620 e r l e 5 0 t h e n \r 0004640 [ c o n n = $ 1 ; p i 0004660 n = n u m b e r ] ] \r \r 0004700 p i n = s e l e c t o n p 0004720 i n i n t o \r [ \r 0004740 c a s e 1 : 1 9 \r i f p i 0004760 n g e 1 & p i n l e 0005000 1 9 t h e n p i n = 1 9 0005020 - p i n \r i f p i n g e 2 0005040 0 & p i n l e 3 7 t h 0005060 e n p i n = \r \r \r \r P u t 0005100 T e m p l a t e ( o u t , " J 0005120 $ C $ D " , c o n n , p 0005140 i n ) 5 7 - p i n 1 5 1 & n 0005160 u m b e r l e 2 0 0 t h e 0005200 n \r [ c o n n = $ 2 0005220 ; s i d e = $ B B r e n T 0005240 y p e e q e d g e P i n i 0005260 A \0 002 371 2 z 261 \0 \0 \0 005 \0 004 207 204 322 0005300 021 202 020 \0 \0 \0 ( 217 001 371 N v Q 247 301 \0 0005320 \0 371 363 \0 \0 \0 \0 \0 S v A \0 002 371 2 z 0005340 261 \0 \0 \0 005 \0 005 207 204 322 021 202 020 \0 \0 \0 0005360 ( 217 001 371 N v Q 247 301 \0 \0 371 363 \0 \0 \0 0005400 \0 \0 S v A \0 002 371 2 z 261 \0 \0 \0 005 \0 0005420 006 207 204 322 021 202 020 \0 \0 \0 ( 217 001 371 N v 0005440 Q 247 301 \0 \0 371 363 \0 \0 \0 \0 \0 S v A \0 0005460 002 371 2 z 261 \0 \0 \0 005 \0 \a 207 204 322 021 202 0005500 020 \0 \0 \0 ( 217 001 371 N v Q 247 301 \0 \0 371 0005520 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 * 0006000