$ od -c -N 50000 [eris]<Lisp>Harmony>SOURCES>NEWPRINTDEF.DCOM!2
0000000 ( F I L E C R E A T E D " 1 4
0000020 - S e p - 8 4 1 1 : 5 3 : 2 3
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < L I S P C O R
0000100 E > D I G > N E W P R I N T D E
0000120 F . ; 1 ) \r " 1 3 - S e p - 8
0000140 4 1 7 : 5 7 : 1 5 " b r e c
0000160 o m p i l e d c h a n g e s :
0000200 S U P E R P R I N T / C O M M
0000220 E N T 1 i n " I N T E R L I
0000240 S P - D 1 3 - S e p - 8 4 .
0000260 . . " d a t e d \r " 1 3 - S
0000300 e p - 8 4 1 8 : 1 3 : 3 5 " )
0000320 \r ( F I L E C R E A T E D " 1
0000340 4 - S e p - 8 4 1 1 : 4 9 : 4
0000360 2 " { E R I S } < L I S P C O
0000400 R E > D I G > N E W P R I N T D
0000420 E F . ; 1 3 2 5 9 4 c h a n
0000440 g e s t o : ( F N S \r S U
0000460 P E R P R I N T / C O M M E N T
0000500 1 ) p r e v i o u s d a t e
0000520 : " 2 0 - A p r - 8 4 1 8 :
0000540 1 2 : 5 9 " { E R I S } < L I
0000560 S P C O R E > S O U R C E S > N
0000600 E W P R I N T D E F . ; 2 ) \r N
0000620 E W P R I N T D E F A 0 0 0 1
0000640 D 1 \r ( N A M E E R R O R S E
0000660 T F 0 R E S E T V A R S L
0000700 S T F 1 L E F T F 2
0000720 E X P R F 3 T A I L F L G
0000740 F 4 T A I L F 5 F I
0000760 L E F 6 R E S E T Y ) 001
0001000 006 \0 \a 002 \0 g \0 \0 d \t \0 \0 032 g \0 \0
0001020 U \t \0 \0 \n \0 \0 277 P 032 c \0 277 Q 265 005
0001040 j 260 036 d 005 001 245 d 005 002 241 005 003 223 Q j
0001060 330 214 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 c
0001100 002 277 g \0 \0 ` \0 \0 \t \0 \0 h 032 032 h 032
0001120 P 032 c \0 277 g \0 \0 g \0 \0 g \0 \0 \n \0
0001140 \0 h 032 032 h 032 P 032 c \0 277 g \0 \0 g \0
0001160 \0 g \0 \0 \n \0 \0 h 032 032 h 032 P 032 c \0
0001200 277 g \0 \0 g \0 \0 g \0 \0 \n \0 \0 h 032 032
0001220 h 032 P 032 c \0 277 g \0 \0 g \0 \0 g \0 \0
0001240 \n \0 \0 h 032 032 h 032 P 032 c \0 277 g \0 \0
0001260 g \0 \0 g \0 \0 \n \0 \0 h 032 032 h 032 P 032
0001300 c \0 277 ` \0 \0 262 , ` \0 \0 006 \0 \0 311 (
0001320 006 \0 \0 277 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 Q
0001340 024 \0 277 S 225 R \t \0 \0 260 035 R T \n \0 \0
0001360 260 026 S 234 R h d d d g \0 \0 \r 006 \0 \0
0001400 204 R T \n \0 \0 c \f i 020 \0 ( 4 0 0 Q
0001420 P R I N 2 S 3 7 2 Q M A P
0001440 R I N T 3 5 2 Q S U P E R P
0001460 R I N T 3 4 3 Q \ D S P R E
0001500 T T Y / S U B P R I N T 2 6 3
0001520 Q R E S E T D E F 2 3 5 Q
0001540 R E S E T D E F 2 0 7 Q R E
0001560 S E T D E F 1 6 1 Q R E S E
0001600 T D E F 1 3 3 Q R E S E T D
0001620 E F 1 0 5 Q S E T F O N T
0001640 2 1 Q S E T T O P V A L 1 6
0001660 Q I M A G E S T R E A M P 6
0001700 G E T T O P V A L ) \r ( 3 6 6
0001720 Q P R I N 2 S 3 3 1 Q \ D
0001740 I S P L A Y D A T A 3 2 4 Q
0001760 S T R E A M 3 2 1 Q P P D S
0002000 P 3 1 5 Q \ D I S P L A Y D
0002020 A T A 3 1 0 Q S T R E A M
0002040 3 0 5 Q P P D S P 3 0 0 Q
0002060 P R E T T Y F L G 2 6 0 Q T
0002100 T Y P R I N 2 S 2 5 5 Q P R
0002120 I N 2 S 2 5 2 Q R E S E T D
0002140 E F 2 3 2 Q T T Y P R I N 1
0002160 S 2 2 7 Q P R I N 1 S 2 2
0002200 4 Q R E S E T D E F 2 0 4 Q
0002220 T T Y P R I N S H U T 2 0 1
0002240 Q P R I N S H U T 1 7 6 Q
0002260 R E S E T D E F 1 5 6 Q T T
0002300 Y P R I N O P E N 1 5 3 Q P
0002320 R I N O P E N 1 5 0 Q R E S
0002340 E T D E F 1 3 0 Q T T Y E N
0002360 D L I N E 1 2 5 Q P R I N E
0002400 N D L I N E 1 2 2 Q R E S E
0002420 T D E F 1 0 2 Q D E F A U L
0002440 T F O N T 7 7 Q S E T F O N
0002460 T 6 7 Q \ D I S P L A Y D A
0002500 T A 6 2 Q S T R E A M 5 7
0002520 Q P P D S P 1 2 Q P P D S
0002540 P 2 P P D S P ) \r ( ) \r N E
0002560 W P R I N T D E F D 1 \r ( P
0002600 7 R E S E T Y P 6 L I S
0002620 P X H I S T P 5 F I L E F
0002640 L G P 4 C H A N G E F L G
0002660 P 3 C O M M E N T C O L
0002700 P 2 T A I L P 1 L A S
0002720 T P O S P 0 F I R S T P O
0002740 S I 5 F I L E I 4 F
0002760 N S L S T I 3 T A I L F L
0003000 G I 2 F O R M F L G I
0003020 1 L E F T I 0 E X P R
0003040 F 1 1 Q L I S P X H I S T
0003060 F 1 2 Q R E S E T V A R S L
0003100 S T ) \0 Q \t 002 \0 006 E g \0 \0 \n \0
0003120 \0 b \n d \t \0 \0 262 8 h E \n \0 \0 h E
0003140 \n \0 \0 @ h 032 021 3 005 W 022 021 ! \b W 024
0003160 o \0 \0 \0 g \0 \0 \n \0 \0 221 h 202 g \0 \0
0003200 _ 020 \n \0 \0 277 O 020 264 006 \b \0 \0 h 020 @
0003220 A B C D E \r 006 \0 \0 020 \0 ( 1 1 6 Q
0003240 O L D P R I N T D E F 1 0 2
0003260 Q E R R O R ! 7 2 Q R E S
0003300 E T R E S T O R E 5 7 Q N E
0003320 W P R I N T D E F A 0 0 0 1 3
0003340 0 Q D S P R I G H T M A R G I
0003360 N 2 3 Q D S P L E F T M A R
0003400 G I N 1 4 Q I M A G E S T R
0003420 E A M P 6 \ G E T S T R E A
0003440 M ) \r ( 6 5 Q E R R O R 5 4
0003460 Q I N T E R N A L 3 O U T
0003500 P U T ) \r ( 5 1 Q ( N E W P
0003520 R I N T D E F A 0 0 0 1 ) ) \r S
0003540 U P E R P R I N T D 1 \r ( L
0003560 ( 2 B R F L G 0 E ) I
0003600 1 T A I L F 1 L A S T P
0003620 O S F 2 F I R S T P O S
0003640 F 3 L E F T F 4 F O R
0003660 M F L G ) \0 q 001 004 \0 003 @ 003 263 6
0003700 Q @ ` \0 \0 i \v \0 \0 331 021 001 \0 H ` \0
0003720 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 375 361 236 H R
0003740 361 232 S d H 361 221 277 H \t \0 \0 277 023 @ A
0003760 \n \0 \0 020 ` \0 \0 234 @ ` \0 \0 035 226 @ A
0004000 B \v \0 \0 020 T 235 @ 001 ` \0 \0 \n \0 \0 224
0004020 @ \t \0 \0 020 ` \0 \0 246 ` \0 \0 @ 001 360 224
0004040 @ \t \0 \0 200 @ A B \v \0 \0 020 \0 ( 1 5
0004060 6 Q \ D S P R E T T Y / S U P
0004100 E R P R I N T 0 1 4 7 Q \ D
0004120 S P R E T T Y / S U P E R P R I
0004140 N T / T R A N 1 2 7 Q \ D S
0004160 P R E T T Y / S U P E R P R I N
0004200 T / C O M M E N T 1 2 2 Q S
0004220 U P E R P R I N T E Q 1 0 7 Q
0004240 \ D S P R E T T Y / S U P E R
0004260 P R I N T / C H A N G E S 6 6
0004300 Q P R I N 2 S 5 7 Q \ D S
0004320 P R E T T Y / E N D L I N E 1
0004340 4 Q S T R I N G W I D T H ) \r
0004360 ( 1 3 7 Q C L I S P T R A N F
0004400 L G 1 3 3 Q P R E T T Y T R
0004420 A N F L G 1 1 7 Q C O M M E
0004440 N T F L G 7 7 Q C H A N G E
0004460 S A R R A Y 7 2 Q C H A N G
0004500 E S A R R A Y 3 4 Q \ D I S
0004520 P L A Y D A T A 2 7 Q S T R
0004540 E A M 2 4 Q P P D S P 1 0
0004560 Q P P D S P ) \r ( ) \r \ D S P
0004600 R E T T Y / S U P E R P R I N T
0004620 0 D 1 \r ( L ( 2 B R F L G
0004640 0 E ) P 2 T A I L P
0004660 1 L E F T I 1 T A I L
0004700 F 3 L A S T P O S ) \0 i
0004720 003 001 \0 003 B h 360 264 024 ` \0 \0 d 005 001 241
0004740 005 002 264 \t @ ` \0 \0 \n \0 \0 021 021 001 A H
0004760 223 g \0 \0 202 g \0 \0 \n \0 \0 277 @ B 265 003
0005000 H \n \0 \0 277 S ` \0 \0 006 \0 \0 311 ( 006 \0
0005020 \0 311 \0 o \0 \0 \0 ` \0 \0 \n \0 \0 330 375 361
0005040 227 021 020 002 I \t \0 \0 023 A H 223 g \0 \0 206
0005060 B 221 h 202 g \0 \0 \n \0 \0 @ 020 \0 ( 1 4
0005100 5 Q P R I N S H U T 1 2 3 Q
0005120 \ D S P R E T T Y / E N D L I
0005140 N E 1 1 0 Q S T R I N G W I
0005160 D T H 5 7 Q \ D S P R E T T
0005200 Y / S U B P R I N T 4 6 Q P
0005220 R I N O P E N 2 6 Q \ D S P
0005240 R E T T Y / R P A R S ) \r ( 1 4
0005260 2 Q % ) 1 3 2 Q % ] 1 0
0005300 5 Q P P D S P 7 4 Q \ D I
0005320 S P L A Y D A T A 6 7 Q S T
0005340 R E A M 6 4 Q P P D S P 4
0005360 3 Q % ( 3 7 Q % [ 2 3 Q
0005400 # R P A R S 7 # R P A R S
0005420 ) \r ( 1 0 2 Q " ) " ) \r \ D
0005440 S P R E T T Y / S U B P R I N T
0005460 D 1 \r ( L ( 2 E N D 1
0005500 B R F L G ) P 1 4 Q L E F
0005520 T P 0 F O R M F L G I
0005540 0 T A I L F 1 7 Q L E F
0005560 T F 2 0 Q F O R M F L G
0005600 F 2 1 Q F N S L S T ) 005 327
0005620 017 003 \0 003 W d @ ` \0 \0 006 \0 \0 311 (
0005640 006 \0 \0 311 \0 @ 001 g \0 \0 \n \0 \0 001 021 u
0005660 \v K c 036 277 @ d B 360 221 @ 020 241 h 020 @
0005700 003 244 @ \t \0 \0 020 ` \0 \0 006 \0 \0 311 ( 006
0005720 \0 \0 311 002 _ 022 277 @ 001 275 ` \0 \0 262 031 I
0005740 264 # M g \0 \0 \n \0 \0 _ 024 231 L O 024 001
0005760 360 243 h _ 024 277 I 264 \f J 001 g \0 \0 \n \0
0006000 \0 h 360 270 I 264 Y M 004 l 004 360 264 R O 024
0006020 003 224 ` \0 \0 260 F M ` \0 \0 034 224 ` \0 \0
0006040 260 ; J @ 360 262 " B 263 037 M W " 034 250 M
0006060 d ` \0 \0 003 034 225 277 ` \0 \0 260 \t \0 \0
0006100 264 033 ` \0 \0 260 026 M g \0 \0 \n \0 \0 264 \r
0006120 M ` \0 \0 034 243 ` \0 \0 200 h \t \0 \0 M @
0006140 d 002 h 360 264 003 A \v \0 \0 275 \t \0 \0 277 @
0006160 002 b \0 277 @ d B 360 222 261 377 = d 003 242 261
0006200 377 7 277 ` \0 \0 242 261 001 303 H 242 261 001 276 I
0006220 242 261 001 271 @ 001 _ 016 004 l 004 360 242 261 \0 370
0006240 O 016 g \0 \0 \n \0 \0 _ 020 237 O 020 003 242 261
0006260 003 { L O 020 001 360 222 261 003 r O 016 k ) l
0006300 < 360 242 261 \0 260 @ B \n \0 \0 _ 020 @ 002 360
0006320 262 026 M 004 l 004 360 242 261 001 r M \t \0 \0 242
0006340 261 001 j 261 001 232 M 003 254 M \t \0 \0 247 @ h
0006360 O 020 \v \0 \0 244 \b \0 \0 260 A ` \0 \0 006 \0
0006400 \0 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311 ( 006
0006420 \0 \0 ` \0 \0 ` \0 \0 006 \0 \0 311 ( 006 \0 \0
0006440 311 \0 330 024 \0 277 @ J 002 360 237 ` \0 \0 006 \0
0006460 \0 311 ( 006 \0 \0 311 \0 c 036 277 ` \0 \0 006 \0
0006500 \0 311 ( 006 \0 \0 311 002 _ 022 277 ` \0 \0 006 \0
0006520 \0 311 ( 006 \0 \0 311 \0 ` \0 \0 l 002 332 330 021
0006540 001 \f @ A O 020 \v \0 \0 b \0 023 g \0 \0 275
0006560 261 377 004 @ 003 002 001 g \0 \0 360 262 032 J 001 g
0006600 \0 \0 \n \0 \0 222 261 \0 367 J 001 g \0 \0 \n \0
0006620 \0 222 261 \0 353 M d 003 262 E 277 O 016 004 l 004
0006640 360 242 261 \0 250 O 016 \t \0 \0 222 261 \0 237 O 016
0006660 ` \0 \0 034 222 261 \0 225 O 016 k \n \0 \0 _ 020
0006700 ` \0 \0 034 242 261 \0 205 O 020 g \0 \0 360 263 |
0006720 O 020 g \0 \0 \n \0 \0 263 r 261 375 333 004 l 004
0006740 360 262 i O 024 001 d g \0 \0 360 245 d g \0 \0
0006760 360 222 277 i 201 277 h 232 h 276 B 263 O i b 004
0007000 277 260 I O 016 004 l 004 361 262 ; @ J 002 360 237
0007020 M d \t \0 \0 263 0 277 M g \0 \0 \n \0 \0 203
0007040 M \t \0 \0 263 M d ` \0 \0 034 263 031 m 377
0007060 \n \0 \0 _ 020 ` \0 \0 034 231 O 020 g \0 \0 360
0007100 242 261 375 t M \t \0 \0 263 5 @ J 002 360 242 261
0007120 001 / M 003 263 ) I 242 261 \0 263 M ` \0 \0 \n
0007140 \0 \0 002 265 003 M d g \0 \0 360 262 032 277 K o
0007160 \0 \0 \0 ` \0 \0 \n \0 \0 330 c 036 277 i 276 \b
0007200 \0 \0 261 375 2 d g \0 \0 360 245 d g \0 \0 360
0007220 226 277 @ A \n \0 \0 020 d g \0 \0 360 226 277 @
0007240 A \n \0 \0 020 d g \0 \0 360 245 d g \0 \0 360
0007260 223 277 261 001 I d g \0 \0 360 231 277 @ 002 222 261
0007300 \0 277 261 001 9 d g \0 \0 360 246 d g \0 \0 360
0007320 262 : 277 i 276 K ` \0 \0 330 c 036 277 ` \0 \0
0007340 006 \0 \0 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311
0007360 ( 006 \0 \0 ` \0 \0 ` \0 \0 006 \0 \0 311 ( 006
0007400 \0 \0 311 \0 330 024 \0 261 374 255 277 @ i B 003 265
0007420 \r O 024 264 \t @ O 024 001 \n \0 \0 \v \0 \0 242
0007440 261 377 ] M k ) l < 360 222 261 \0 321 ` \0 \0
0007460 006 \0 \0 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311
0007500 ( 006 \0 \0 ` \0 \0 ` \0 \0 006 \0 \0 311 ( 006
0007520 \0 \0 311 \0 330 024 \0 277 ` \0 \0 006 \0 \0 311 (
0007540 006 \0 \0 311 \0 K ` \0 \0 l 006 332 330 _ 026 277
0007560 d O 026 361 242 261 374 = 277 O 026 261 374 7 O 022
0007600 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311 002 360 263 024
0007620 M 004 l 004 361 222 261 376 347 M g \0 \0 360 222 261
0007640 376 336 @ 001 _ 016 277 M 003 262 ? B 242 261 376 320
0007660 M 001 ` \0 \0 \n \0 \0 222 261 376 304 O 016 d 003
0007700 233 d 001 ` \0 \0 \n \0 \0 222 277 260 0 004 l 004
0007720 360 242 261 376 253 O 016 g \0 \0 \n \0 \0 263 036 O
0007740 016 g \0 \0 \n \0 \0 216 O 016 003 264 021 N 222 261
0007760 376 216 O 016 \t \0 \0 242 261 376 205 h 276 ` \0 \0
0010000 006 \0 \0 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311
0010020 ( 006 \0 \0 ` \0 \0 ` \0 \0 006 \0 \0 311 ( 006
0010040 \0 \0 311 \0 330 024 \0 261 373 215 W 036 K 021 022 016
0010060 O 016 ` \0 \0 \n \0 \0 002 265 004 O 016 d g \0
0010100 \0 360 263 # d g \0 \0 360 263 034 d g \0 \0 360
0010120 263 025 d g \0 \0 360 254 d g \0 \0 360 246 d g
0010140 \0 \0 360 262 4 277 O 032 O 016 g \0 \0 360 246 O
0010160 016 g \0 \0 360 222 l 003 200 k ` \0 \0 332 330 \t
0010200 \0 \0 ` \0 \0 330 _ 030 277 @ A @ 002 g \0 \0
0010220 B \v \0 \0 261 \0 315 d g \0 \0 360 263 024 d g
0010240 \0 \0 360 253 d g \0 \0 360 245 d g \0 \0 360 232
0010260 277 O 030 _ 032 277 @ 002 h 260 035 d g \0 \0 360
0010300 245 d g \0 \0 360 224 277 @ 002 002 215 277 @ 002 J
0010320 001 g \0 \0 033 001 B \v \0 \0 _ 034 277 O 022 `
0010340 \0 \0 006 \0 \0 311 ( 006 \0 \0 311 002 360 262 D @
0010360 h O 034 \v \0 \0 262 ; ` \0 \0 006 \0 \0 311 (
0010400 006 \0 \0 277 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 `
0010420 \0 \0 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 330
0010440 024 \0 277 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0
0010460 213 O 032 ` \0 \0 l 002 332 330 \t \0 \0 ` \0 \0
0010500 330 _ 030 277 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311
0010520 002 _ 022 277 @ k O 034 \v \0 \0 001 275 @ A O
0010540 034 \v \0 \0 b \0 023 261 373 \r \0 ( 2 7 1 7
0010560 Q \ D S P R E T T Y / S U B P
0010600 R I N T 2 7 0 6 Q N L E F T
0010620 2 6 5 0 Q \ D S P R E T T Y
0010640 / E N D L I N E 2 5 4 1 Q \
0010660 D S P R E T T Y / D S F I T P
0010700 2 5 0 5 Q \ D S P R E T T Y /
0010720 S U B P R I N T 1 2 3 7 7 Q
0010740 \ D S P R E T T Y / S U B P R I
0010760 N T 1 2 3 5 5 Q \ D S P R E
0011000 T T Y / E N D L I N E 2 2 4 3
0011020 Q F A S S O C 2 1 4 2 Q \
0011040 D S P R E T T Y / D S F I T P
0011060 2 1 2 2 Q S U P E R P R I N T
0011100 G E T P R O P 2 1 1 0 Q S U
0011120 P E R P R I N T G E T P R O P
0011140 2 0 6 4 Q S U P E R P R I N T
0011160 E Q 2 0 4 3 Q S U P E R P R
0011200 I N T E Q 1 6 1 2 Q \ D S P
0011220 R E T T Y / D S F I T P 1 6 0
0011240 7 Q \ D S P R E T T Y / S U B
0011260 P R I N T 1 1 4 1 7 Q \ D S
0011300 P R E T T Y / P R I N T S Q 1
0011320 4 0 2 Q \ D S P R E T T Y / P
0011340 R I N T P R O G 1 3 5 5 Q \
0011360 D S P R E T T Y / E N D L I N E
0011400 1 3 4 4 Q S T R I N G W I D
0011420 T H 1 3 1 5 Q F A S S O C
0011440 1 2 6 3 Q \ D S P R E T T Y /
0011460 B A C K A R R O W P 1 2 3 6 Q
0011500 N T H C H A R 1 2 1 7 Q B
0011520 O U N D P 1 2 1 2 Q S U P E
0011540 R P R I N T G E T P R O P 1 2
0011560 0 0 Q F G E T D 1 1 0 3 Q
0011600 S U P E R P R I N T G E T P R O
0011620 P 1 0 5 1 Q N T H C H A R
0011640 1 0 2 5 Q B O U N D P 7 7 4
0011660 Q S U P E R P R I N T E Q 7
0011700 6 0 Q S U P E R P R I N T E Q
0011720 7 2 4 Q \ D S P R E T T Y /
0011740 S U B P R I N T 5 4 4 Q \ D
0011760 S P R E T T Y / E N D L I N E
0012000 5 4 0 Q \ D S P R E T T Y / D
0012020 S F I T P 5 3 0 Q \ D S P R
0012040 E T T Y / B A C K A R R O W P
0012060 5 1 2 Q \ D S P R E T T Y / B
0012100 A C K A R R O W P 4 6 6 Q \
0012120 D S P R E T T Y / S U B P R I N
0012140 T 2 4 2 3 Q S U P E R P R I
0012160 N T G E T P R O P 3 3 1 Q S
0012200 E T F O N T 3 2 5 Q S U P E
0012220 R P R I N T 3 1 1 Q S E T F
0012240 O N T 2 7 1 Q S U P E R P R
0012260 I N T G E T P R O P 2 5 3 Q
0012300 \ D E F I N E D P 1 5 4 Q S
0012320 U P E R P R I N T E Q 1 2 4 Q
0012340 S U P E R P R I N T G E T P R
0012360 O P 6 1 Q P R I N D O T P
0012400 3 0 Q S U P E R P R I N T G E
0012420 T P R O P ) \r ( 2 6 7 2 Q \ D
0012440 I S P L A Y D A T A 2 6 6 5 Q
0012460 S T R E A M 2 6 6 2 Q P P
0012500 D S P 2 6 5 3 Q S P A C E S
0012520 I Z E 2 6 4 1 Q S P A C E S
0012540 I Z E 2 6 3 1 Q \ D I S P L
0012560 A Y D A T A 2 6 2 4 Q S T R
0012600 E A M 2 6 2 1 Q P P D S P
0012620 2 6 1 0 Q \ D I S P L A Y D A
0012640 T A 2 6 0 3 Q S T R E A M
0012660 2 6 0 0 Q P P D S P 2 5 7 5
0012700 Q S P A C E S I Z E 2 5 7 2
0012720 Q \ D I S P L A Y D A T A 2
0012740 5 6 5 Q S T R E A M 2 5 6 2
0012760 Q P P D S P 2 5 5 6 Q \ D
0013000 I S P L A Y D A T A 2 5 5 1 Q
0013020 S T R E A M 2 5 4 6 Q P P
0013040 D S P 2 5 2 5 Q \ D I S P L
0013060 A Y D A T A 2 5 2 0 Q S T R
0013100 E A M 2 5 1 5 Q P P D S P
0013120 2 4 7 7 Q C L I S P W O R D
0013140 2 4 6 0 Q ! ! 2 4 5 2 Q !
0013160 2 4 3 1 Q o r 2 4 2 3 Q
0013200 a n d 2 4 1 5 Q O R 2 4 0
0013220 6 Q A N D 2 3 7 3 Q I F W
0013240 O R D 2 3 6 0 Q S P A C E S
0013260 I Z E 2 3 5 0 Q S P A C E S
0013300 I Z E 2 3 3 7 Q t h e n 2
0013320 3 3 0 Q T H E N 2 3 1 5 Q
0013340 e l s e i f 2 3 0 7 Q e l s
0013360 e 2 3 0 1 Q t h e n 2 2 7
0013400 2 Q E L S E I F 2 2 6 3 Q
0013420 E L S E 2 2 5 4 Q T H E N
0013440 2 2 4 0 Q P R E T T Y E Q U I
0013460 V L S T 2 2 1 5 Q \ D I S P
0013500 L A Y D A T A 2 2 1 0 Q S T
0013520 R E A M 2 2 0 5 Q P P D S P
0013540 2 2 0 2 Q S P A C E S I Z E
0013560 2 1 7 7 Q \ D I S P L A Y D
0013600 A T A 2 1 7 2 Q S T R E A M
0013620 2 1 6 7 Q P P D S P 2 1 6
0013640 3 Q \ D I S P L A Y D A T A
0013660 2 1 5 6 Q S T R E A M 2 1 5
0013700 3 Q P P D S P 2 1 1 7 Q C
0013720 L I S P T Y P E 2 1 0 5 Q C
0013740 L I S P W O R D 2 0 6 1 Q C
0013760 O M M E N T F L G 2 0 4 0 Q
0014000 C O M M E N T F L G 2 0 1 0 Q
0014020 > 1 7 6 6 Q \ D I S P L A
0014040 Y D A T A 1 7 6 1 Q S T R E
0014060 A M 1 7 5 6 Q P P D S P 1
0014100 7 2 4 Q S P A C E S I Z E 1
0014120 7 1 6 Q \ D I S P L A Y D A T
0014140 A 1 7 1 1 Q S T R E A M 1
0014160 7 0 6 Q P P D S P 1 6 7 5 Q
0014200 \ D I S P L A Y D A T A 1 6
0014220 7 0 Q S T R E A M 1 6 6 5 Q
0014240 P P D S P 1 6 6 2 Q S P A
0014260 C E S I Z E 1 6 5 7 Q \ D I
0014300 S P L A Y D A T A 1 6 5 2 Q
0014320 S T R E A M 1 6 4 7 Q P P D
0014340 S P 1 6 4 3 Q \ D I S P L A
0014360 Y D A T A 1 6 3 6 Q S T R E
0014400 A M 1 6 3 3 Q P P D S P 1
0014420 5 5 5 Q \ D I S P L A Y D A T
0014440 A 1 5 5 0 Q S T R E A M 1
0014460 5 4 5 Q P P D S P 1 5 4 2 Q
0014500 S P A C E S I Z E 1 5 3 7 Q
0014520 \ D I S P L A Y D A T A 1 5
0014540 3 2 Q S T R E A M 1 5 2 7 Q
0014560 P P D S P 1 5 2 3 Q \ D I
0014600 S P L A Y D A T A 1 5 1 6 Q
0014620 S T R E A M 1 5 1 3 Q P P D
0014640 S P 1 5 0 4 Q S P A C E S I
0014660 Z E 1 4 7 2 Q N L A M B D A
0014700 1 4 6 4 Q L A M B D A 1 4
0014720 4 4 Q F U N C T I O N 1 4 3
0014740 2 Q R E S E T V A R 1 4 2 4
0014760 Q S E T Q 1 4 0 7 Q S E L
0015000 E C T Q 1 3 7 2 Q R E S E T
0015020 V A R S 1 3 6 4 Q P R O G
0015040 1 3 4 1 Q P P D S P 1 3 2 5
0015060 Q C O N D 1 3 1 2 Q P R E
0015100 T T Y E Q U I V L S T 1 2 5 2
0015120 Q > 1 2 4 3 Q C L I S P C
0015140 H A R S 1 2 2 6 Q F U N N Y
0015160 A T O M L S T 1 2 0 7 Q E X
0015200 P R 1 1 3 3 Q F O R W O R D
0015220 1 1 2 5 Q I F W O R D 1 1
0015240 0 0 Q U N A R Y O P 1 0 7 0
0015260 Q < 1 0 5 6 Q C L I S P C
0015300 H A R S 1 0 3 6 Q F U N N Y
0015320 A T O M L S T 7 7 1 Q c r e
0015340 a t e 7 5 5 Q C R E A T E
0015360 7 4 5 Q _ 7 3 2 Q > 7 0
0015400 6 Q S P A C E S I Z E 7 0 1
0015420 Q \ D I S P L A Y D A T A 6
0015440 7 4 Q S T R E A M 6 7 1 Q
0015460 P P D S P 6 6 1 Q \ D I S P
0015500 L A Y D A T A 6 5 4 Q S T R
0015520 E A M 6 5 1 Q P P D S P 6
0015540 4 1 Q \ D I S P L A Y D A T A
0015560 6 3 4 Q S T R E A M 6 3 1
0015600 Q P P D S P 6 1 3 Q \ D I
0015620 S P L A Y D A T A 6 0 6 Q S
0015640 T R E A M 6 0 3 Q P P D S P
0015660 6 0 0 Q S P A C E S I Z E
0015700 5 7 5 Q \ D I S P L A Y D A T
0015720 A 5 7 0 Q S T R E A M 5 6
0015740 5 Q P P D S P 5 6 1 Q \ D
0015760 I S P L A Y D A T A 5 5 4 Q
0016000 S T R E A M 5 5 1 Q P P D S
0016020 P 4 2 0 Q C L I S P W O R D
0016040 3 6 1 Q C L I S P F L G 3
0016060 0 4 Q C L I S P F O N T 2 7
0016100 7 Q C L I S P C H A R S 2 6
0016120 6 Q C L I S P T Y P E 2 6 0
0016140 Q S Y S T E M F O N T 2 4 6
0016160 Q U S E R F O N T 2 3 7 Q
0016200 F O N T F N S 2 1 3 Q U S E
0016220 R F O N T 2 0 6 Q F O N T W
0016240 O R D S 2 0 0 Q C L I S P F
0016260 O N T 1 5 1 Q Q U O T E 1
0016300 2 1 Q C L I S P W O R D 1 1
0016320 0 Q C L I S P F L G 7 5 Q
0016340 \ D I S P L A Y D A T A 7 0 Q
0016360 S T R E A M 6 5 Q P P D S
0016400 P 2 5 Q C L I S P W O R D
0016420 1 6 Q \ D I S P L A Y D A T A
0016440 1 1 Q S T R E A M 6 P P
0016460 D S P ) \r ( 1 3 3 6 Q " C O
0016500 " ) \r \ D S P R E T T Y / S U B
0016520 P R I N T 1 D 1 \r ( L ( 2
0016540 E N D 1 X 0 L S T ) )
0016560 \0 = 003 \0 \0 003 @ 021 ! 002 H Y d 003 262 032
0016600 d B 360 263 025 001 004 l 004 360 262 024 I 001 g \0
0016620 \0 033 Z 231 A 265 004 I 020 J 001 360 263 373 A g
0016640 \0 \0 360 231 I d 002 001 g \0 \0 360 221 020 I 002
0016660 260 313 \0 N I L \r ( 6 4 Q _ 5 3
0016700 Q R E C O R D W O R D 3 2 Q
0016720 C L I S P W O R D ) \r ( ) \r \
0016740 D S P R E T T Y / S U B P R I N
0016760 T 2 D 1 \r ( L ( 1 E N D
0017000 0 L S T ) ) \0 Q 003 \0 \0 002 @ d
0017020 A 360 263 E d 003 262 A d 001 004 l 004 360 262 ;
0017040 001 \t \0 \0 j 021 022 002 k Z H 361 263 " I @
0017060 001 J \n \0 \0 d g \0 \0 360 222 277 k 210 g \0
0017100 \0 360 222 m 377 200 j 324 271 J k 330 260 335 I 022
0017120 j 360 224 @ 002 d 221 020 @ 002 b \0 260 263 \0 (
0017140 4 6 Q N T H C H A R 2 5 Q
0017160 N C H A R S ) \r ( 6 2 Q > 5
0017200 2 Q < ) \r ( ) \r \ D S P R E T
0017220 T Y / P R I N T P R O G D 1 \r
0017240 ( L ( 1 B R F L G ) P 1
0017260 L E F T I 0 T A I L )
0017300 \0 347 003 \0 \0 002 ` \0 \0 006 \0 \0 311 ( 006 \0
0017320 \0 311 \0 o \0 \0 \0 ` \0 \0 \n \0 \0 331 ` \0
0017340 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 ` \0 \0 330 021
0017360 022 002 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 277 ` \0
0017400 \0 006 \0 \0 311 ( 006 \0 \0 I 024 \0 277 @ 001 @
0017420 d 002 b \0 h 360 264 003 A \v \0 \0 277 @ d 003
0017440 226 277 H \t \0 \0 277 @ 003 247 @ d 223 \t \0 \0
0017460 h 020 @ 001 003 262 037 J 223 h Z 260 321 I ` \0
0017500 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 361 263 246 I \t
0017520 \0 \0 260 272 H ` \0 \0 006 \0 \0 311 ( 006 \0 \0
0017540 311 \0 375 361 224 H \t \0 \0 277 ` \0 \0 264 \v o
0017560 \0 \0 \0 @ 001 \n \0 \0 Z 262 % ` \0 \0 006 \0
0017600 \0 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311 ( 006
0017620 \0 \0 I 024 \0 277 J @ 001 \t \0 \0 360 272 @ 001
0017640 @ \n \0 \0 277 @ 002 b \0 261 377 177 \0 ( 3 3
0017660 5 Q S U P E R P R I N T 3 2
0017700 5 Q N C H A R S 2 6 1 Q S
0017720 T R P O S 2 4 2 Q P R I N E
0017740 N D L I N E 2 1 3 Q P R I N
0017760 E N D L I N E 1 5 1 Q P R I
0020000 N D O T P 1 3 7 Q \ D S P R
0020020 E T T Y / E N D L I N E 1 2 5
0020040 Q S U P E R P R I N T 2 6 Q
0020060 S T R I N G W I D T H ) \r ( 3
0020100 1 3 Q \ D I S P L A Y D A T A
0020120 3 0 6 Q S T R E A M 3 0 3
0020140 Q P P D S P 2 7 7 Q \ D I
0020160 S P L A Y D A T A 2 7 2 Q S
0020200 T R E A M 2 6 7 Q P P D S P
0020220 2 4 6 Q C L I S P F L G 2
0020240 3 1 Q \ D I S P L A Y D A T A
0020260 2 2 4 Q S T R E A M 2 2 1
0020300 Q P P D S P 2 0 2 Q \ D I
0020320 S P L A Y D A T A 1 7 5 Q S
0020340 T R E A M 1 7 2 Q P P D S P
0020360 1 0 2 Q \ D I S P L A Y D A
0020400 T A 7 5 Q S T R E A M 7 2
0020420 Q P P D S P 6 6 Q \ D I S
0020440 P L A Y D A T A 6 1 Q S T R
0020460 E A M 5 6 Q P P D S P 4 7
0020500 Q S P A C E S I Z E 4 2 Q
0020520 \ D I S P L A Y D A T A 3 5 Q
0020540 S T R E A M 3 2 Q P P D S
0020560 P 2 3 Q P P D S P 1 2 Q
0020600 \ D I S P L A Y D A T A 5 S
0020620 T R E A M 2 P P D S P ) \r (
0020640 2 5 4 Q " _ " 2 0 Q " R
0020660 O G " ) \r \ D S P R E T T Y / P
0020700 R I N T S Q D 1 \r ( L ( 1
0020720 B R F L G ) P 4 L E F T
0020740 P 3 F O R M F L G P 1
0020760 L E F T I 0 T A I L F
0021000 5 L E F T ) 001 024 005 001 \0 002 U `
0021020 \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 330 l 002 333
0021040 021 ! 002 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 277 `
0021060 \0 \0 006 \0 \0 311 ( 006 \0 \0 ` \0 \0 ` \0 \0
0021100 006 \0 \0 311 ( 006 \0 \0 311 \0 330 024 \0 277 ` \0
0021120 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 Y d H 331 l
0021140 002 332 330 272 @ 001 @ \n \0 \0 277 @ 002 b \0 241
0021160 h 020 H \t \0 \0 277 @ d 003 243 \t \0 \0 020 002
0021200 242 261 \0 226 @ d 001 003 242 261 \0 206 g \0 \0 \n
0021220 \0 \0 277 021 020 003 @ 001 001 @ 001 \n \0 \0 023 @
0021240 d 001 002 262 c 277 I 021 001 004 ` \0 \0 006 \0 \0
0021260 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311 ( 006 \0
0021300 \0 ` \0 \0 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311
0021320 \0 330 024 \0 277 @ 001 001 003 257 J ` \0 \0 006 \0
0021340 \0 311 ( 006 \0 \0 311 \0 361 244 L \t \0 \0 215 `
0021360 \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 \ 277 @ 001
0021400 002 \t \0 \0 023 @ g \0 \0 \n \0 \0 261 377 ^ 001
0021420 @ \n \0 \0 261 377 V @ 001 @ A \v \0 \0 261 377
0021440 L \0 ( 4 1 7 Q S U P E R P R I
0021460 N T 4 0 5 Q P R I N 2 S 3
0021500 7 5 Q P R I N S H U T 3 6 5
0021520 Q \ D S P R E T T Y / S U B P
0021540 R I N T 3 3 7 Q P R I N E N
0021560 D L I N E 2 1 7 Q S U P E R
0021600 P R I N T 2 0 3 Q P R I N O
0021620 P E N 1 5 7 Q P R I N D O T
0021640 P 1 4 7 Q P R I N E N D L I
0021660 N E 1 3 3 Q S U P E R P R I
0021700 N T ) \r ( 3 7 2 Q % ) 3 5 3
0021720 Q \ D I S P L A Y D A T A 3
0021740 4 6 Q S T R E A M 3 4 3 Q
0021760 P P D S P 3 2 7 Q \ D I S P
0022000 L A Y D A T A 3 2 2 Q S T R
0022020 E A M 3 1 7 Q P P D S P 3
0022040 0 0 Q \ D I S P L A Y D A T A
0022060 2 7 3 Q S T R E A M 2 7 0
0022100 Q P P D S P 2 6 5 Q S P A
0022120 C E S I Z E 2 6 2 Q \ D I S
0022140 P L A Y D A T A 2 5 5 Q S T
0022160 R E A M 2 5 2 Q P P D S P
0022200 2 4 6 Q \ D I S P L A Y D A T
0022220 A 2 4 1 Q S T R E A M 2 3
0022240 6 Q P P D S P 2 0 0 Q % (
0022260 1 1 2 Q \ D I S P L A Y D A
0022300 T A 1 0 5 Q S T R E A M 1
0022320 0 2 Q P P D S P 7 1 Q \ D
0022340 I S P L A Y D A T A 6 4 Q S
0022360 T R E A M 6 1 Q P P D S P
0022400 5 6 Q S P A C E S I Z E 5 3
0022420 Q \ D I S P L A Y D A T A 4
0022440 6 Q S T R E A M 4 3 Q P P
0022460 D S P 3 7 Q \ D I S P L A Y
0022500 D A T A 3 2 Q S T R E A M
0022520 2 7 Q P P D S P 1 3 Q \ D
0022540 I S P L A Y D A T A 6 S T R
0022560 E A M 3 P P D S P ) \r ( ) \r
0022600 \ D S P R E T T Y / B A C K A R
0022620 R O W P D 1 \r ( L ( 0 X )
0022640 ) \0 024 \0 \0 \0 001 g \0 \0 @ \n \0 \0 264
0022660 \v @ m 377 ) l _ 360 h 360 020 \0 ( 6 S
0022700 T R P O S ) \r ( 2 _ ) \r ( ) \r
0022720 \ D S P R E T T Y / E N D L I N
0022740 E D 1 \r ( L ( 0 N ) F
0022760 0 T A I L F 1 F O R M F
0023000 L G F 2 L E F T ) \0 & \0
0023020 003 \0 001 Q 262 033 P 003 001 003 001 ` \0 \0 \n \0
0023040 \0 234 P 001 P \n \0 \0 277 P 002 c \0 260 352 @
0023060 265 003 R \t \0 \0 @ 020 \0 ( 4 2 Q P R
0023100 I N E N D L I N E 2 4 Q S U
0023120 P E R P R I N T 1 5 Q S U P
0023140 E R P R I N T E Q ) \r ( 1 2 Q
0023160 C O M M E N T F L G ) \r ( ) \r \
0023200 D S P R E T T Y / R P A R S D
0023220 1 \r ( L ( 1 N P 0 E ) )
0023240 \0 3 \0 \0 \0 002 A j 361 h 360 265 \a @ 003
0023260 265 004 h 020 001 d g \0 \0 360 245 d g \0 \0 360
0023300 221 i 020 g \0 \0 360 263 353 @ \t \0 \0 001 A k
0023320 331 b 002 277 b \0 277 260 320 \0 ( 4 5 Q L
0023340 A S T ) \r ( 3 6 Q D E F I N E
0023360 Q 2 7 Q N L A M B D A 2 1
0023400 Q L A M B D A ) \r ( ) \r \ D S
0023420 P R E T T Y / D S F I T P D 1
0023440 \r ( L ( 3 L S T C O L 0
0023460 X ) P 1 C A R E F U L I
0023500 2 E N D T A I L I 1 T
0023520 A I L F L G F 2 L A S T P
0023540 O S ) \0 > 002 001 \0 004 C 265 003 R ` \0
0023560 \0 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 330 331
0023600 ` \0 \0 ` \0 \0 332 021 002 001 A 262 026 H ` \0
0023620 \0 l 002 330 ` \0 \0 332 361 264 \a @ H \n \0 \0
0023640 020 @ H \n \0 \0 020 \0 ( 7 3 Q \ D S
0023660 P R E T T Y / D S F I T 2 6 5
0023700 Q \ D S P R E T T Y / D S F I
0023720 T 1 ) \r ( 5 4 Q S P A C E S I
0023740 Z E 4 6 Q A V E R A G E V A
0023760 R L E N G T H 3 3 Q S P A C
0024000 E S I Z E 3 0 Q # C A R E F
0024020 U L C O L U M N S 2 1 Q \ D
0024040 I S P L A Y D A T A 1 4 Q S
0024060 T R E A M 1 1 Q P P D S P
0024100 6 S P A C E S I Z E ) \r ( ) \r
0024120 \ D S P R E T T Y / D S F I T 1
0024140 D 1 \r ( L ( 2 N 1 1 N
0024160 0 L S T ) F 3 T A I L
0024200 F L G F 4 E N D T A I L
0024220 F 5 C A R E F U L ) \0 R 003
0024240 003 \0 003 @ S 221 h 200 A 021 022 002 H Z 003 224
0024260 J d T 360 221 i 020 001 003 263 ( I 262 4 I U
0024300 I 361 231 J 001 ` \0 \0 i \v \0 \0 206 ` \0 \0
0024320 ` \0 \0 332 ` \0 \0 330 331 271 j I 361 262 023 h
0024340 020 J 001 B 265 003 A \n \0 \0 264 366 I 221 A 271
0024360 J 002 260 273 \0 ( 1 0 6 Q \ D S P R
0024400 E T T Y / D S F I T 2 5 0 Q
0024420 S T R I N G W I D T H ) \r ( 6 3
0024440 Q S P A C E S I Z E 5 7 Q
0024460 S P A C E S I Z E 5 4 Q A V
0024500 E R A G E V A R L E N G T H 4
0024520 4 Q P P D S P ) \r ( ) \r \ D S
0024540 P R E T T Y / D S F I T 2 D 1
0024560 \r ( L ( 2 N C 1 N 0
0024600 X ) F 0 C A R E F U L )
0024620 \0 370 \0 001 \0 003 @ d 001 ` \0 \0 \n \0 \0 221
0024640 i 020 001 003 262 ) A o \0 \0 \0 ` \0 \0 \n \0
0024660 \0 331 b 002 j 361 264 026 @ 001 A \n \0 \0 264 016
0024700 @ 002 h 360 265 \b @ 002 A \n \0 \0 020 A o \0
0024720 \0 \0 ` \0 \0 \n \0 \0 P A 361 231 @ 001 ` \0
0024740 \0 i \v \0 \0 206 ` \0 \0 ` \0 \0 332 b 004 330
0024760 375 361 221 h 020 @ d 002 262 250 001 d g \0 \0 360
0025000 223 277 j 260 V d g \0 \0 360 234 277 o \0 \0 \0
0025020 ` \0 \0 \n \0 \0 260 C d g \0 \0 360 245 d g
0025040 \0 \0 360 234 277 o \0 \0 \0 ` \0 \0 \n \0 \0 260
0025060 * g \0 \0 360 262 025 o \0 \0 \0 ` \0 \0 \n \0
0025100 \0 ` \0 \0 ` \0 \0 332 330 216 A B 331 b 002 277
0025120 ` \0 \0 k 330 ` \0 \0 332 A ` \0 \0 l 002 332
0025140 331 b 002 361 263 217 @ 002 A @ 001 g \0 \0 \n \0
0025160 \0 001 d g \0 \0 360 245 d g \0 \0 360 230 277 A
0025200 B ` \0 \0 330 331 201 277 h \v \0 \0 020 \0 ( 3
0025220 6 5 Q \ D S P R E T T Y / D S
0025240 F I T 1 3 3 2 Q S U P E R P
0025260 R I N T G E T P R O P 2 5 2 Q
0025300 S T R I N G W I D T H 2 3 0
0025320 Q S T R I N G W I D T H 1 7
0025340 7 Q S T R I N G W I D T H 1
0025360 1 6 Q S T R I N G W I D T H
0025400 1 0 1 Q S T R I N G W I D T H
0025420 6 5 Q \ D S P R E T T Y / D
0025440 S F I T 1 4 7 Q \ D S P R E
0025460 T T Y / D S F I T 2 3 2 Q S
0025500 T R I N G W I D T H 1 0 Q S
0025520 U P E R P R I N T E Q ) \r ( 3 5
0025540 5 Q S P A C E S I Z E 3 4 5
0025560 Q F O R W O R D 3 3 7 Q I
0025600 F W O R D 3 2 7 Q C L I S P
0025620 W O R D 3 0 6 Q S P A C E S
0025640 I Z E 3 0 1 Q S P A C E S I
0025660 Z E 2 7 4 Q A V E R A G E F
0025700 N L E N G T H 2 6 0 Q S P A
0025720 C E S I Z E 2 5 5 Q A V E R
0025740 A G E V A R L E N G T H 2 4 7
0025760 Q P P D S P 2 3 5 Q S E T
0026000 Q 2 2 5 Q P P D S P 2 1 3
0026020 Q N L A M B D A 2 0 5 Q L
0026040 A M B D A 1 7 4 Q P P D S P
0026060 1 6 2 Q F U N C T I O N 1
0026100 5 0 Q C O N D 1 2 5 Q S P
0026120 A C E S I Z E 1 2 2 Q A V E
0026140 R A G E F N L E N G T H 1 1 2
0026160 Q P P D S P 7 6 Q P P D S
0026200 P 2 7 Q P P D S P 5 C O
0026220 M M E N T F L G ) \r ( 2 4 4 Q
0026240 " ( S E T Q " 2 2 2 Q "
0026260 ( L A M B D A A B C " 1 7 1
0026300 Q " ( F U N C T I O N L A M
0026320 B D A A B C ) " 7 3 Q " (
0026340 ) " 2 4 Q " ( ) " ) \r \ D S
0026360 P R E T T Y / S U P E R P R I N
0026400 T / C H A N G E S A 0 0 0 4 D
0026420 1 \r ( N A M E E R R O R S E T
0026440 F 0 E F 1 T A I L
0026460 F 2 B R F L G ) \0 035 \0 003 002
0026500 \0 h 027 \0 \0 277 ` \0 \0 \t \0 \0 P Q R \v
0026520 \0 \0 c \0 277 \t \0 \0 277 h h 032 020 \0 ( 2
0026540 6 Q S E T F O N T 2 0 Q S
0026560 U P E R P R I N T 1 2 Q S E
0026600 T F O N T ) \r ( 7 C H A N G E
0026620 F O N T 3 C H A N G E S A R
0026640 R A Y ) \r ( ) \r \ D S P R E T T
0026660 Y / S U P E R P R I N T / C H A
0026700 N G E S D 1 \r ( P 1 C H A
0026720 N G E F L G 0 P 0 C H A N
0026740 G E F L G I 2 B R F L G
0026760 I 1 T A I L I 0 E F
0027000 4 R E S E T V A R S L S T
0027020 F 5 C H A N G E F L G F
0027040 6 F I L E F L G ) \0 R 004 003 \0
0027060 003 U 021 1 003 ` \0 \0 232 H 250 V 243 ` \0 \0
0027100 222 i Y 270 g \0 \0 ` \0 \0 032 T 032 c \b Z
0027120 273 o \0 \0 \0 g \0 \0 \n \0 \0 J 001 002 027 \0
0027140 \0 277 K d T 360 225 277 J 002 c \b 215 T \n \0
0027160 \0 231 T k K \v \0 \0 J 002 031 277 242 \b \0 \0
0027200 @ 020 \0 ( 1 1 6 Q E R R O R !
0027220 1 0 6 Q N L E F T 7 7 Q T
0027240 A I L P 5 1 Q \ D S P R E T
0027260 T Y / S U P E R P R I N T / C H
0027300 A N G E S A 0 0 0 4 ) \r ( 5 7 Q
0027320 C H A N G E S A R R A Y 4 6
0027340 Q I N T E R N A L 3 0 Q C
0027360 H A N G E S A R R A Y 2 5 Q
0027400 C H A N G E S A R R A Y 1 6 Q
0027420 D I S P L A Y T E R M F L G
0027440 6 C H A N G E C H A R ) \r (
0027460 4 3 Q ( \ D S P R E T T Y / S
0027500 U P E R P R I N T / C H A N G E
0027520 S A 0 0 0 4 ) ) \r \ D S P R E T
0027540 T Y / S U P E R P R I N T / T R
0027560 A N D 1 \r ( L ( 0 E ) )
0027600 \0 t \0 \0 \0 001 ` \0 \0 265 " ` \0 \0 262 2
0027620 ` \0 \0 262 - @ d ` \0 \0 035 262 & d 001 004
0027640 l 004 360 262 037 001 \t \0 \0 260 3 @ 001 360 262 335
0027660 ` \0 \0 265 006 @ 002 002 020 i 360 223 @ 002 001 020
0027700 @ 020 001 003 262 032 @ d 001 001 g \0 \0 \n \0 \0
0027720 263 361 277 @ 001 001 g \0 \0 \n \0 \0 263 344 ` \0
0027740 \0 i 360 225 @ ` \0 \0 035 020 ` \0 \0 @ ` \0
0027760 \0 035 @ \t \0 \0 032 032 020 \0 ( 1 5 7 Q
0030000 C O P Y C O N S 1 2 5 Q S U
0030020 P E R P R I N T E Q 1 1 1 Q
0030040 S U P E R P R I N T E Q 4 2 Q
0030060 F G E T D ) \r ( 1 5 2 Q C L
0030100 I S P A R R A Y 1 4 6 Q C L
0030120 I S P T R A N F L G 1 4 1 Q
0030140 C L I S P A R R A Y 1 3 2 Q
0030160 P R E T T Y T R A N F L G 1 2
0030200 2 Q N L A M B D A 1 0 6 Q
0030220 L A M B D A 5 4 Q P R E T T
0030240 Y T R A N F L G 2 3 Q C L I
0030260 S P A R R A Y 1 4 Q P R E T
0030300 T Y T R A N F L G 7 C L I S
0030320 P A R R A Y 2 C L I S P T R
0030340 A N F L G ) \r ( ) \r \ D S P R E
0030360 T T Y / S U P E R P R I N T / C
0030400 O M M E N T D 1 \r ( L ( 0
0030420 L ) F 5 L A S T P O S F
0030440 6 C O M M E N T C O L F
0030460 7 T A I L ) \0 366 005 003 \0 001 ` \0
0030500 \0 265 f 021 P 004 @ 002 001 ` \0 \0 \n \0 \0 265
0030520 \v ` \0 \0 @ \t \0 \0 375 361 h 360 Z 262 P V
0030540 265 B U l 002 333 @ U \n \0 \0 ` \0 \0 003 001
0030560 d 005 001 245 d 005 002 241 005 003 265 023 ` \0 \0 d
0030600 005 001 245 d 005 002 241 005 003 265 004 l < U 332 l
0030620 P 333 273 d K 361 221 277 K 274 d L 361 241 277 L
0030640 c \f 270 U 271 260 7 W 016 \n \0 \0 020 ` \0 \0
0030660 003 002 d 005 001 245 d 005 002 241 005 003 265 004 l \n
0030700 U 332 l P 333 270 U H 331 271 H ` \0 \0 006 \0
0030720 \0 311 ( 006 \0 \0 311 \0 360 221 i 272 H ` \0 \0
0030740 006 \0 \0 311 ( 006 \0 \0 311 \0 375 361 225 H \t \0
0030760 \0 260 034 ` \0 \0 006 \0 \0 311 ( 006 \0 \0 277 `
0031000 \0 \0 006 \0 \0 311 ( 006 \0 \0 H 024 \0 277 J 244
0031020 H \t \0 \0 277 ` \0 \0 \t \0 \0 @ H d I 330
0031040 l 002 333 I \f \0 \0 277 \t \0 \0 J 243 j \t \0
0031060 \0 @ 020 \0 ( 3 6 2 Q P R I N E N
0031100 D L I N E 3 5 4 Q S E T F O
0031120 N T 3 5 0 Q \ D S P R E T T
0031140 Y / S U P E R P R I N T / C O M
0031160 M E N T 2 3 3 4 Q S E T F O
0031200 N T 3 2 5 Q P R I N E N D L
0031220 I N E 2 6 2 Q P R I N E N D
0031240 L I N E 1 5 5 Q P R I N 1 S
0031260 5 4 Q \ D S P R E T T Y / S
0031300 U P E R P R I N T / C O M M E N
0031320 T 1 3 1 Q C O U N T 2 0 Q
0031340 S U P E R P R I N T E Q ) \r (
0031360 3 3 1 Q C O M M E N T F O N T
0031400 3 1 3 Q \ D I S P L A Y D A
0031420 T A 3 0 6 Q S T R E A M 3
0031440 0 3 Q P P D S P 2 7 7 Q \
0031460 D I S P L A Y D A T A 2 7 2 Q
0031500 S T R E A M 2 6 7 Q P P D
0031520 S P 2 5 1 Q \ D I S P L A Y
0031540 D A T A 2 4 4 Q S T R E A M
0031560 2 4 1 Q P P D S P 2 2 7 Q
0031600 \ D I S P L A Y D A T A 2 2
0031620 2 Q S T R E A M 2 1 7 Q P
0031640 P D S P 1 6 1 Q F I R S T C
0031660 O L 1 0 0 Q F I R S T C O L
0031700 5 7 Q F I R S T C O L 2 5
0031720 Q P R E T T Y L C O M 1 5 Q
0031740 C O M M E N T F L G 2 * *
0031760 C O M M E N T * * F L G ) \r ( )
0032000 \r \ D S P R E T T Y / S U P E R
0032020 P R I N T / C O M M E N T 1 D
0032040 1 \r ( L ( 1 L P 0 C F )
0032060 ) \0 ? 003 \0 \0 002 ` \0 \0 006 \0 \0 311 (
0032100 006 \0 \0 311 \0 021 ! 002 A @ \t \0 \0 235 @ `
0032120 \0 \0 265 005 ` \0 \0 i \v \0 \0 205 ` \0 \0 l
0032140 017 332 331 Y d ` \0 \0 331 Z I H 361 245 H J
0032160 361 241 H 020 J 020 \0 ( 4 2 Q S T R I
0032200 N G W I D T H 2 4 Q E D I T
0032220 D A T E ? ) \r ( 5 7 Q S P A C
0032240 E S I Z E 4 6 Q S P A C E S
0032260 I Z E 3 6 Q P P D S P 3 1
0032300 Q C O M M E N T F O N T 1 2
0032320 Q \ D I S P L A Y D A T A 5
0032340 S T R E A M 2 P P D S P )
0032360 \r ( ) \r \ D S P R E T T Y / S U
0032400 P E R P R I N T / C O M M E N T
0032420 2 D 1 \r ( L ( 3 L C 2
0032440 M C 1 F C 0 C M T ) P
0032460 1 T A I L F 3 T A I L
0032500 ) 001 \f 003 001 \0 004 S g \0 \0 \n \0 \0 @
0032520 021 ! 002 H Y 003 257 I 224 I \t \0 \0 277 023 S
0032540 g \0 \0 \n \0 \0 020 J g \0 \0 360 222 261 \0 312
0032560 B ` \0 \0 006 \0 \0 311 ( 006 \0 \0 311 \0 375 361
0032600 262 / I 001 003 222 261 \0 261 J 004 l 004 360 262 !
0032620 J m 377 \n \0 \0 d g \0 \0 360 222 277 i 213 g
0032640 \0 \0 360 232 J ` \0 \0 034 h 360 222 261 \0 213 I
0032660 d @ 360 263 U 277 J 003 262 $ I 001 d g \0 \0
0032700 360 263 024 d g \0 \0 360 253 d g \0 \0 360 245 d
0032720 g \0 \0 360 222 277 h 201 277 i 262 - ` \0 \0 006
0032740 \0 \0 311 ( 006 \0 \0 277 ` \0 \0 006 \0 \0 311 (
0032760 006 \0 \0 ` \0 \0 ` \0 \0 006 \0 \0 311 ( 006 \0
0033000 \0 311 \0 330 024 \0 277 I 001 003 263 2 C ` \0 \0
0033020 006 \0 \0 311 ( 006 \0 \0 311 \0 I 001 ` \0 \0 i
0033040 \v \0 \0 I 002 221 j 211 o \0 \0 \0 ` \0 \0 \n
0033060 \0 \0 330 330 375 361 224 A \t \0 \0 277 I 001 Z d
0033100 003 226 A B C \f \0 \0 203 I \n \0 \0 277 I 002
0033120 261 377 004 \0 ( 4 0 4 Q P R I N 2 S
0033140 3 7 7 Q \ D S P R E T T Y /
0033160 S U P E R P R I N T / C O M M E
0033200 N T 2 3 6 2 Q P R I N E N D
0033220 L I N E 3 5 1 Q S T R I N G
0033240 W I D T H 3 3 2 Q S T R I N
0033260 G W I D T H 1 1 5 Q N T H C
0033300 H A R 3 5 Q P R I N S H U T
0033320 2 4 Q P R I N D O T P 6
0033340 P R I N O P E N ) \r ( 3 4 6 Q
0033360 P P D S P 3 2 6 Q P P D S P
0033400 3 1 7 Q \ D I S P L A Y D A
0033420 T A 3 1 2 Q S T R E A M 3
0033440 0 7 Q P P D S P 2 7 0 Q \
0033460 D I S P L A Y D A T A 2 6 3 Q
0033500 S T R E A M 2 6 0 Q P P D
0033520 S P 2 5 5 Q S P A C E S I Z
0033540 E 2 5 2 Q \ D I S P L A Y D
0033560 A T A 2 4 5 Q S T R E A M
0033600 2 4 2 Q P P D S P 2 3 6 Q
0033620 \ D I S P L A Y D A T A 2 3 1
0033640 Q S T R E A M 2 2 6 Q P P
0033660 D S P 2 1 2 Q : 2 0 4 Q
0033700 ; 1 7 6 Q , 1 6 7 Q % .
0033720 1 3 7 Q A B B R E V L S T
0033740 1 3 1 Q % . 1 2 1 Q ; 6
0033760 3 Q \ D I S P L A Y D A T A
0034000 5 6 Q S T R E A M 5 3 Q P
0034020 P D S P 4 2 Q - 3 2 Q %
0034040 ) 3 % ( ) \r ( 3 4 3 Q "
0034060 ) " ) \r ( P R E T T Y C O M P R
0034100 I N T N E W P R I N T D E F C
0034120 O M S ) \r ( R P A Q Q N E W P
0034140 R I N T D E F C O M S ( ( *
0034160 A v e r s i o n o f P R I
0034200 N T D E F a b s t r a c t e d
0034220 s o t h a t i t c a n
0034240 b e p a r a m e t r i z e d
0034260 f o r \r n o n - t e l e t y p
0034300 e d e v i c e s . O n e e
0034320 x a m p l e i s < L I S P >
0034340 S O U R C E S > D S P R I N T D
0034360 E F w h i c h p r o v i d e
0034400 s o n e d e f i n i t i o n
0034420 f o r t h e \r a b s t r a
0034440 c t f n s s u c h a s W
0034460 I D T H , X P O S I T I O N
0034500 e t c u s e d h e r e . )
0034520 ( F N S N E W P R I N T D E F
0034540 S U P E R P R I N T S U P E
0034560 R P R I N T 0 S U B P R I N T
0034600 \r S U B P R I N T 1 S U B P
0034620 R I N T 2 P R I N T P R O G
0034640 P R I N T S Q B A C K A R R O
0034660 W P E N D L I N E R P A R S
0034700 D S F I T P D S F I T 1 D
0034720 S F I T 2 ) ( F N S \r S U P
0034740 E R P R I N T / C H A N G E S
0034760 S U P E R P R I N T / T R A N
0035000 S U P E R P R I N T / C O M M E
0035020 N T S U P E R P R I N T / C O
0035040 M M E N T 1 S U P E R P R I N
0035060 T / C O M M E N T 2 ) ( P (
0035100 \r M O V D ? ( Q U O T E P R
0035120 I N T D E F ) ( Q U O T E O
0035140 L D P R I N T D E F ) ) ) ( D
0035160 E C L A R E : E V A L @ C O M
0035200 P I L E D O N T C O P Y ( G
0035220 L O B A L V A R S \r * * C O M
0035240 M E N T * * F L G C L I S P A
0035260 R R A Y C H A N G E S A R R A
0035300 Y D I S P L A Y T E R M F L G
0035320 C H A N G E C H A R A V E R
0035340 A G E F N L E N G T H # C A R
0035360 E F U L C O L U M N S \r A V E
0035400 R A G E V A R L E N G T H # R
0035420 P A R S F O N T W O R D S F
0035440 O N T F N S D E F A U L T F O
0035460 N T B O L D F O N T U S E R
0035500 F O N T S Y S T E M F O N T
0035520 C L I S P F O N T \r C H A N G
0035540 E F O N T B I G F O N T C L
0035560 I S P C H A R S F U N N Y A T
0035600 O M L S T P R E T T Y P R I N
0035620 T M A C R O S P R E T T Y E Q
0035640 U I V L S T S P A C E S I Z E
0035660 C O M M E N T F L G ) ( \r B
0035700 L O C K S ( D S P R E T T Y
0035720 N E W P R I N T D E F S U P E
0035740 R P R I N T S U P E R P R I N
0035760 T 0 S U B P R I N T S U B P
0036000 R I N T 1 S U B P R I N T 2
0036020 P R I N T P R O G P R I N T S
0036040 Q \r B A C K A R R O W P E N
0036060 D L I N E R P A R S D S F I
0036100 T P D S F I T 1 D S F I T 2
0036120 S U P E R P R I N T / C H A N
0036140 G E S S U P E R P R I N T / T
0036160 R A N S U P E R P R I N T / C
0036200 O M M E N T \r S U P E R P R I
0036220 N T / C O M M E N T 1 S U P E
0036240 R P R I N T / C O M M E N T 2
0036260 ( E N T R I E S N E W P R I N
0036300 T D E F S U P E R P R I N T )
0036320 ( S P E C V A R S T A I L
0036340 L E F T ) ( \r L O C A L F R E
0036360 E V A R S T A I L F L G F N
0036400 S L S T F I R S T P O S L A
0036420 S T P O S C O M M E N T C O L
0036440 F O R M F L G F I L E F L G
0036460 C H A N G E F L G C H A N G
0036500 E F L G 0 ) ) ) ( \r D E C L A
0036520 R E : D O N T E V A L @ L O A
0036540 D E V A L @ C O M P I L E W H
0036560 E N ( N O T ( H A S D E F
0036600 ( Q U O T E A D J X P O S )
0036620 ( Q U O T E M A C R O ) ) )
0036640 ( F I L E S ( L O A D C O M P
0036660 ) \r D S P R I N T D E F ) ) )
0036700 ) ) \r ( M O V D ? ( Q U O T E
0036720 P R I N T D E F ) ( Q U O T
0036740 E O L D P R I N T D E F ) ) \r
0036760 ( P U T P R O P S N E W P R I
0037000 N T D E F C O P Y R I G H T
0037020 ( " X e r o x C o r p o r a t
0037040 i o n " 1 9 8 2 1 9 8 3 1
0037060 9 8 4 ) ) \r N I L \r
0037072