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