$ od -c -N 50000 [eris]<LispCore>SOURCES>CMLFORMAT.DCOM!3
0000000 ( F I L E C R E A T E D " 2
0000020 - O c t - 8 6 1 5 : 3 6 : 5 5
0000040 " ( " c o m p i l e d o n
0000060 " { E R I S } < B A N E > C M
0000100 L F O R M A T . ; 1 ) " 1 -
0000120 O c t - 8 6 2 0 : 2 3 : 1 5 "
0000140 \r " C O M P I L E - F I L E d
0000160 " i n " X e r o x L i s p
0000200 1 - O c t - 8 6 . . . "
0000220 d a t e d " 1 - O c t - 8 6
0000240 2 1 : 2 4 : 4 4 " ) \r ( F I L
0000260 E C R E A T E D " 3 0 - S e p
0000300 - 8 6 1 6 : 0 9 : 5 0 " { E
0000320 R I S } < L I S P C O R E > S O
0000340 U R C E S > C M L F O R M A T .
0000360 ; 3 9 7 0 8 5 c h a n g e s
0000400 t o : ( F U N C T I O N S
0000420 \r F O R M A T - D O - I T E R A
0000440 T I O N F O R M A T - F R E S
0000460 H L I N E F O R M A T - S T R
0000500 I N G I F Y - O U T P U T ) p
0000520 r e v i o u s d a t e : "
0000540 9 - S e p - 8 6 2 3 : 4 5 : 4
0000560 8 " \r { E R I S } < L I S P C
0000600 O R E > S O U R C E S > C M L F
0000620 O R M A T . ; 2 ) \r ( R P A Q Q
0000640 C M L F O R M A T C O M S (
0000660 ( * ; ; " T h e F O R M A
0000700 T f a c i l i t y " ) ( S T
0000720 R U C T U R E S F O R M A T -
0000740 E R R O R ) ( F U N C T I O N
0000760 S \r M A K E - D I S P A T C H
0001000 - V E C T O R S C A L E - E X
0001020 P O N E N T S C A L E - E X P
0001040 T - A U X ) ( F U N C T I O N
0001060 S F O R M A T - E R R O R )
0001100 ( V A R I A B L E S * D I G I
0001120 T - S T R I N G * \r * D I G I
0001140 T S * ) ( F U N C T I O N S
0001160 F L O N U M - T O - S T R I N G
0001200 F L O A T - S T R I N G F O
0001220 R M A T - W I T H - C O N T R O
0001240 L - S T R I N G F O R M A T -
0001260 S T R I N G I F Y - O U T P U T
0001300 \r P O P - F O R M A T - A R G
0001320 W I T H - F O R M A T - P A R
0001340 A M E T E R S N E X T C H A R
0001360 F O R M A T - P E E K F O R
0001400 M A T - F I N D - C H A R ) (
0001420 F U N C T I O N S \r F O R M A
0001440 T - G E T - P A R A M E T E R
0001460 P A R S E - F O R M A T - O P E
0001500 R A T I O N F O R M A T - F I
0001520 N D - C O M M A N D F O R M A
0001540 T S U B - F O R M A T \r F O
0001560 R M A T - C A P I T A L I Z A T
0001600 I O N F O R M A T - E S C A P
0001620 E F O R M A T - S E M I C O L
0001640 O N - E R R O R F O R M A T -
0001660 U N T A G G E D - C O N D I T I
0001700 O N \r F O R M A T - F U N N Y
0001720 - C O N D I T I O N F O R M A
0001740 T - B O O L E A N - C O N D I T
0001760 I O N F O R M A T - C O N D I
0002000 T I O N F O R M A T - I T E R
0002020 A T I O N F O R M A T - D O -
0002040 I T E R A T I O N \r F O R M A
0002060 T - G E T - T R A I L I N G - S
0002100 E G M E N T S F O R M A T - G
0002120 E T - S E G M E N T S M A K E
0002140 - P A D - S E G S F O R M A T
0002160 - R O U N D - C O L U M N S \r
0002200 F O R M A T - J U S T I F I C A
0002220 T I O N F O R M A T - T E R P
0002240 R I F O R M A T - F R E S H L
0002260 I N E F O R M A T - P A G E
0002300 F O R M A T - T I L D E F O R
0002320 M A T - E A T - W H I T E S P A
0002340 C E \r F O R M A T - N E W L I
0002360 N E F O R M A T - P L U R A L
0002400 F O R M A T - S K I P - A R G
0002420 U M E N T S F O R M A T - I N
0002440 D I R E C T I O N F O R M A T
0002460 - T A B F O R M A T - P R I N
0002500 C \r F O R M A T - P R I N 1
0002520 F O R M A T - P R I N T - C H A
0002540 R A C T E R F O R M A T - P R
0002560 I N T - N A M E D - C H A R A C
0002600 T E R F O R M A T - A D D - C
0002620 O M M A S F O R M A T - W R I
0002640 T E - F I E L D \r F O R M A T
0002660 - P R I N T - N U M B E R F O
0002700 R M A T - P R I N T - S M A L L
0002720 - C A R D I N A L F O R M A T
0002740 - P R I N T - C A R D I N A L
0002760 F O R M A T - P R I N T - C A R
0003000 D I N A L - A U X \r F O R M A
0003020 T - P R I N T - O R D I N A L
0003040 F O R M A T - P R I N T - O L D
0003060 - R O M A N F O R M A T - P R
0003100 I N T - R O M A N F O R M A T
0003120 - P R I N T - D E C I M A L \r
0003140 F O R M A T - P R I N T - B I N
0003160 A R Y F O R M A T - P R I N T
0003200 - O C T A L F O R M A T - P R
0003220 I N T - H E X A D E C I M A L
0003240 F O R M A T - P R I N T - R A D
0003260 I X F O R M A T - F I X E D
0003300 \r F O R M A T - F I X E D - A U
0003320 X F O R M A T - E X P O N E N
0003340 T I A L F O R M A T - E X P O
0003360 N E N T - M A R K E R F O R M
0003400 A T - E X P - A U X F O R M A
0003420 T - G E N E R A L - F L O A T
0003440 \r F O R M A T - G E N E R A L -
0003460 A U X F O R M A T - D O L L A
0003500 R S ) ( F U N C T I O N S C
0003520 H A R P O S F L O N U M - T O
0003540 - S T R I N G W H I T E S P A
0003560 C E - C H A R - P ) ( F U N C
0003600 T I O N S \r N A M E - A R R A
0003620 Y ) ( V A R I A B L E S * F
0003640 O R M A T - A R G U M E N T S *
0003660 * F O R M A T - C O N T R O L
0003700 - S T R I N G * * F O R M A T
0003720 - D I S P A T C H - T A B L E *
0003740 \r * F O R M A T - I N D E X *
0003760 * F O R M A T - L E N G T H *
0004000 * F O R M A T - O R I G I N A
0004020 L - A R G U M E N T S * C A R
0004040 D I N A L - O N E S C A R D I
0004060 N A L - T E N S C A R D I N A
0004100 L - T E E N S \r C A R D I N A
0004120 L - P E R I O D S O R D I N A
0004140 L - O N E S O R D I N A L - T
0004160 E N S ) ( D E C L A R E : D
0004200 O N T E V A L @ L O A D D O E
0004220 V A L @ C O M P I L E D O N T
0004240 C O P Y \r C O M P I L E R V A
0004260 R S ( A D D V A R S ( N L A
0004300 M A ) ( N L A M L ) ( L A M
0004320 A ) ) ) ( * ; ; " A r r a
0004340 n g e t o u s e t h e c
0004360 o r r e c t c o m p i l e r .
0004400 " ) ( P R O P \r F I L E T Y
0004420 P E C M L F O R M A T ) ) ) \r
0004440 F O R M A T - E R R O R - A R G
0004460 S D 1 \r ( L ( 0 O B J E C
0004500 T ) ) \0 005 \0 \0 \0 001 @ 002 001 020 \0 N
0004520 I L \r N I L \r ( ) \r ( D E F P R
0004540 I N T ( Q U O T E F O R M A
0004560 T - E R R O R ) ( F U N C T I
0004600 O N \ D E F P R I N T . D E F
0004620 S T R U C T . D E F A U L T ) )
0004640 \r % % M A K E - F O R M A T - E
0004660 R R O R D 1 \r ( L ( 0 - a
0004700 r g s - ) ) \0 0 003 \0 002 \0 e 021 001
0004720 \0 H k 021 002 002 J d I 363 235 277 h 022 021 001
0004740 001 g \0 \0 I h 032 032 020 a g \0 \0 360 225 J
0004760 k 330 a 260 352 J l 002 324 Z 260 335 \0 N I L
0005000 \r ( 3 7 Q : A R G S 2 6 Q
0005020 F O R M A T - E R R O R ) \r ( )
0005040 \r ( L E T * ( ( A 0 2 4 1 (
0005060 Q U O T E F O R M A T - E R R
0005100 O R ) ) ( A 0 2 4 2 ( Q U O
0005120 T E ( C L : E R R O R ) ) ) )
0005140 ( P U T A 0 2 4 1 ( Q U O
0005160 T E \r % % % % I N C L U D E D
0005200 - S T R U C T U R E ) A 0 2 4
0005220 2 ) ) \r ( P U T P R O P ( Q U
0005240 O T E F O R M A T - E R R O R
0005260 ) ( Q U O T E S T R U C T U
0005300 R E - C O N S T R U C T O R )
0005320 ( Q U O T E % % M A K E - F O
0005340 R M A T - E R R O R ) ) \r ( P U
0005360 T P R O P ( Q U O T E F O R
0005400 M A T - E R R O R ) ( Q U O T
0005420 E % % S T R U C T U R E - C L
0005440 A S S ) ( Q U O T E L I S T
0005460 - C L A S S ) ) \r ( P U T P R O
0005500 P ( Q U O T E F O R M A T -
0005520 E R R O R ) ( Q U O T E % %
0005540 S L O T - D E S C R I P T I O N
0005560 S ) ( Q U O T E ( ( A R G S
0005600 N I L : R E A D - O N L Y
0005620 T ) ) ) ) \r ( P U T P R O P (
0005640 Q U O T E F O R M A T - E R R
0005660 O R ) ( Q U O T E % % L O C
0005700 A L - S L O T - N A M E S ) (
0005720 Q U O T E ( A R G S ) ) ) \r (
0005740 F I X - I N H E R I T A N C E -
0005760 L I N K S ( Q U O T E F O R
0006000 M A T - E R R O R ) ( Q U O T
0006020 E C L : E R R O R ) ) \r ( L E
0006040 T * ( ( A 0 2 4 5 ( Q U O T
0006060 E F O R M A T - E R R O R ) )
0006100 ( A 0 2 4 4 ( Q U O T E %
0006120 % C O N D I T I O N - H A N D L
0006140 E R ) ) ( A 0 2 4 3 ( Q U O
0006160 T E N I L ) ) ) ( P U T P R
0006200 O P \r A 0 2 4 5 A 0 2 4 4
0006220 A 0 2 4 3 ) ) \r F O R M A T - E
0006240 R R O R - c o n d i t i o n - r
0006260 e p o r t e r D 1 \r ( L ( 0
0006300 C O N D I T I O N ) I 1
0006320 * S T A N D A R D - O U T P U T
0006340 * ) \0 016 \0 \0 \0 002 i o \0 \0 \0 @ \t
0006360 \0 \0 \v \0 \0 020 \0 ( 1 3 Q F O R M
0006400 A T 1 0 Q F O R M A T - E R
0006420 R O R - A R G S ) \r N I L \r (
0006440 4 " ~ % % ~ : { ~ @ ? ~ % % ~
0006460 } " ) \r ( L E T * ( ( A 0 2 4
0006500 8 ( Q U O T E F O R M A T -
0006520 E R R O R ) ) ( A 0 2 4 7 (
0006540 Q U O T E % % C O N D I T I O
0006560 N - R E P O R T E R ) ) ( A 0
0006600 2 4 6 ( Q U O T E \r F O R M
0006620 A T - E R R O R - c o n d i t i
0006640 o n - r e p o r t e r ) ) ) (
0006660 P U T P R O P A 0 2 4 8 A 0
0006700 2 4 7 A 0 2 4 6 ) ) \r e x p a
0006720 n d - M A K E - D I S P A T C H
0006740 - V E C T O R A 0 0 0 1 D 1 \r
0006760 ( L ( 0 X ) ) \0 d 002 \0 \0 001
0007000 ` \0 \0 @ 001 006 \0 \0 323 021 001 \0 l A H 363
0007020 221 h 200 i 235 H l Z 363 221 h 200 i 224 H l
0007040 324 200 H 022 321 ` \0 \0 @ 001 006 \0 \0 323 021
0007060 001 \0 l a H 363 221 h 200 i 235 H l z 363 221
0007100 h 200 i 224 H l 325 200 H 022 321 021 002 001 H
0007120 I 360 223 @ h 032 020 I @ 002 032 H @ 002 032 h
0007140 032 032 020 \0 N I L \r ( 5 5 Q C H A
0007160 R A C T E R 5 0 Q \ C H A R
0007200 H I 7 C H A R A C T E R 2
0007220 \ C H A R H I ) \r ( ) \r e x p
0007240 a n d - M A K E - D I S P A T C
0007260 H - V E C T O R A 0 0 0 2 D 1
0007300 \r ( L ( 1 Y 0 X ) ) \0
0007320 020 \0 \0 \0 002 @ 001 006 \0 \0 323 A 001 006 \0 \0
0007340 323 375 363 020 \0 N I L \r ( 1 2 Q C H
0007360 A R A C T E R 4 C H A R A C
0007400 T E R ) \r ( ) \r e x p a n d - M
0007420 A K E - D I S P A T C H - V E C
0007440 T O R D 1 \r ( L ( 1 $ $ M
0007460 A C R O - E N V I R O N M E N T
0007500 0 $ $ M A C R O - F O R M )
0007520 ) \0 l 004 \0 \0 002 @ 002 021 001 \0 g \0 \0
0007540 H \n \0 \0 g \0 \0 \n \0 \0 j 021 022 003 J d
0007560 n 001 \0 \n \0 \0 262 . 277 I 230 o \0 \0 \0 I
0007600 \n \0 \0 277 g \0 \0 o \0 \0 \0 g \0 \0 i g
0007620 \0 \0 g \0 \0 K \t \0 \0 h 032 032 h 032 032 032
0007640 032 032 032 020 k 324 I d 262 025 001 001 006 \0 \0 323
0007660 J \n \0 \0 264 \t I 001 I 002 271 002 001 K 032 273
0007700 Z 260 256 \0 ( 1 3 3 Q % % = 1 0
0007720 0 Q N R E V E R S E 5 2 Q
0007740 C L : E R R O R 3 5 Q % % =
0007760 2 1 Q S O R T 1 3 Q M A
0010000 P C A N ) \r ( 1 2 6 Q C H A R
0010020 A C T E R 7 4 Q Q U O T E
0010040 7 1 Q : I N I T I A L - C O N
0010060 T E N T S 6 5 Q : E L E M E
0010100 N T - T Y P E 5 6 Q M A K E
0010120 - A R R A Y 1 6 Q e x p a n
0010140 d - M A K E - D I S P A T C H -
0010160 V E C T O R A 0 0 0 2 7 e x
0010200 p a n d - M A K E - D I S P A T
0010220 C H - V E C T O R A 0 0 0 1 ) \r
0010240 ( 6 2 Q ( Q U O T E ( 4 0
0010260 0 Q ) ) 4 6 Q " G a r b a g
0010300 e i n d i s p a t c h v e
0010320 c t o r - ~ S " ) \r ( S E T
0010340 F - M A C R O - F U N C T I O N
0010360 ( Q U O T E M A K E - D I S
0010400 P A T C H - V E C T O R ) ( Q
0010420 U O T E e x p a n d - M A K E
0010440 - D I S P A T C H - V E C T O R
0010460 ) ) \r S C A L E - E X P O N E N
0010500 T D 1 \r ( L ( 0 X ) ) \0
0010520 033 \0 \0 \0 001 @ o \0 \0 \0 o \0 \0 \0 o \0
0010540 \0 \0 o \0 \0 \0 o \0 \0 \0 \r 006 \0 \0 020 \0
0010560 ( 3 0 Q S C A L E - E X P T -
0010600 A U X ) \r N I L \r ( 2 4 Q .
0010620 3 0 1 0 3 2 0 Q . 1 1 4 Q
0010640 1 0 . 0 1 0 Q 1 . 0 4
0010660 0 . 0 ) \r S C A L E - E X P T -
0010700 A U X D 1 \r ( L ( 5 L O G
0010720 1 0 - O F - 2 4 O N E - T E
0010740 N T H 3 T E N 2 O N E
0010760 1 Z E R O 0 X ) ) \0 207 \t
0011000 \0 \0 006 @ \t \0 \0 \t \0 \0 002 001 021 ! 002 @
0011020 A \n \0 \0 225 A k \n \0 \0 020 H E 326 \t \0
0011040 \0 271 j I 363 234 @ C d m 377 I 325 \n \0 \0
0011060 326 326 216 @ C \n \0 \0 C I k 325 \n \0 \0 \n
0011100 \0 \0 272 C J I 021 003 005 B L 363 262 - C L
0011120 M 021 003 \b D O 016 363 221 h 200 i 227 O 016 O
0011140 020 \n \0 \0 020 N C 326 O 016 N 326 O 020 k 325
0011160 _ 020 277 _ 016 277 276 260 335 K C 326 J K \n \0
0011200 \0 M k 324 275 274 273 260 302 \0 ( 1 7 5 Q
0011220 % % / 1 4 0 Q V A L U E S
0011240 7 6 Q % % / 7 3 Q C L : E
0011260 X P T 6 4 Q % % / 5 4 Q
0011300 C L : E X P T 3 5 Q R O U N
0011320 D 2 6 Q V A L U E S 2 0 Q
0011340 % % = 6 \ M V L I S T 3
0011360 D E C O D E - F L O A T ) \r N
0011400 I L \r ( ) \r F O R M A T - E R R
0011420 O R D 1 \r ( L ( 0 - a r g
0011440 s - ) F 1 0 Q * F O R M A
0011460 T - C O N T R O L - S T R I N G
0011500 * F 1 1 Q * F O R M A T -
0011520 I N D E X * ) \0 Q \b 002 002 \0 e 021
0011540 001 \0 k a 021 021 002 H l 002 021 2 \a L d K
0011560 363 262 $ 277 M 022 272 g \0 \0 g \0 \0 o \0 \0
0011600 \0 I J W 020 W 022 k 324 h 032 032 032 032 032 h
0011620 032 \v \0 \0 020 a _ 016 277 N 265 016 O 016 h 032
0011640 ^ 275 L k 324 \ 260 310 O 016 & 276 260 366 \0 (
0011660 6 5 Q C L : E R R O R ) \r ( 3
0011700 6 Q : A R G S 3 3 Q F O R
0011720 M A T - E R R O R ) \r ( 4 2 Q
0011740 " ~ ? ~ % % ~ S ~ % % ~ V @ T
0011760 ^ " ) \r ( P R O C L A I M ( Q
0012000 U O T E ( S P E C I A L * D
0012020 I G I T - S T R I N G * ) ) ) \r
0012040 ( O R ( B O U N D P ( Q U O
0012060 T E * D I G I T - S T R I N G
0012100 * ) ) ( S E T Q * D I G I T
0012120 - S T R I N G * ( M A K E - A
0012140 R R A Y 5 0 : E L E M E N T
0012160 - T Y P E ( Q U O T E \r S T
0012200 R I N G - C H A R ) : F I L L
0012220 - P O I N T E R 0 : A D J U
0012240 S T A B L E T ) ) ) \r ( P R O
0012260 C L A I M ( Q U O T E ( S P
0012300 E C I A L * D I G I T S * ) )
0012320 ) \r ( O R ( B O U N D P ( Q
0012340 U O T E * D I G I T S * ) )
0012360 ( S E T Q * D I G I T S * "
0012400 0 1 2 3 4 5 6 7 8 9 " ) ) \r F L
0012420 O N U M - T O - S T R I N G D
0012440 1 \r ( L ( 4 F M I N 3 S
0012460 C A L E 2 F D I G I T S 1
0012500 W I D T H 0 X ) F 3
0012520 * D I G I T - S T R I N G * )
0012540 \0 F 003 001 \0 005 @ \t \0 \0 232 o \0 \0 \0 k
0012560 i d \f \0 \0 020 S j \n \0 \0 @ \t \0 \0 \t
0012600 \0 \0 021 ! 002 H 001 271 H 002 001 272 @ 303 \0 \0
0012620 234 I J l 024 A B C D \r \a \0 \0 020 I J
0012640 l 5 A B C D \r \a \0 \0 020 \0 ( 1 0 3
0012660 Q F L O A T - S T R I N G 6
0012700 6 Q F L O A T - S T R I N G
0012720 3 3 Q \ M V L I S T 3 0 Q
0012740 I N T E G E R - D E C O D E - F
0012760 L O A T 2 4 Q S E T - F I L
0013000 L - P O I N T E R 1 6 Q V A
0013020 L U E S 3 C L : Z E R O P )
0013040 \r ( 5 1 Q F L O A T P ) \r (
0013060 1 0 Q " . " ) \r F L O A T - S
0013100 T R I N G D 1 \r ( L ( 6 F
0013120 M I N 5 S C A L E 4 F D
0013140 I G I T S 3 W I D T H 2
0013160 P R E C I S I O N 1 E X P O
0013200 N E N T 0 F R A C T I O N )
0013220 F 3 3 Q * D I G I T - S T
0013240 R I N G * F 3 4 Q * D I G
0013260 I T S * ) 003 026 033 002 \0 \a @ k d d
0013300 j d d 021 367 025 021 P 032 A j 363 235 @ A \n
0013320 \0 \0 270 k A \n \0 \0 Z 273 213 j A 363 227 k
0013340 j A 325 \n \0 \0 271 @ k B \n \0 \0 \n \0 \0
0013360 262 024 K k \n \0 \0 273 H k \n \0 \0 270 I k
0013400 \n \0 \0 271 E 262 1 j E 363 262 024 l \n j E
0013420 325 \n \0 \0 _ 030 277 I O 030 326 271 260 032 l \n
0013440 E \n \0 \0 _ 032 277 H O 032 326 270 K O 032 326
0013460 273 J O 032 326 272 H I l \n \n \0 \0 375 363 221
0013500 h 200 i 222 261 \0 326 L k 325 274 H l \n 326 270
0013520 J l \n 326 272 K l \n 326 273 260 334 I l \n 326
0013540 271 L k 324 274 261 \0 265 C 262 ! j L 363 223 k
0013560 C 325 204 L C 325 k 324 _ 016 277 F 234 O 016 j
0013600 F 325 363 225 j F 325 _ 016 277 D 242 C 262 } O
0013620 016 L 325 I _ & 277 _ $ 277 j O $ 363 221 h
0013640 200 i 262 ' O $ j _ 036 277 _ 034 277 O 034 O
0013660 036 363 221 h 200 i 263 < O & l \n 326 _ & 277
0013700 O 036 k 324 _ 036 277 260 346 j O $ 325 j _ "
0013720 277 _ 277 O O " 363 221 h 200 i 263 025 O
0013740 & l \n \n \0 \0 _ & 277 O " k 324 _ " 277
0013760 260 344 O & J \n \0 \0 272 O & K \n \0 \0 [
0014000 O & \n \0 \0 223 i _ 020 277 H k \n \0 \0 K
0014020 324 I k \n \0 \0 375 363 263 037 H k \n \0 \0 K
0014040 324 I k \n \0 \0 375 363 242 261 377 3 D 242 261 377
0014060 : j D 325 261 377 D j L 363 262 p M 276 o \0
0014100 \0 \0 W 6 \n \0 \0 277 j L 325 j _ * 277 _
0014120 ( 277 O ( O * 363 221 h 200 i 263 O M k 324
0014140 275 o \0 \0 \0 W 6 \n \0 \0 277 O * k 324 _
0014160 * 277 260 340 i 214 H k \n \0 \0 I k \n \0 \0
0014200 K 325 363 _ 026 277 O 024 263 | O 026 263 x O 016
0014220 231 L O 016 363 221 h 200 i 263 k W 8 O 022 266
0014240 W 6 \n \0 \0 277 M k 324 275 L k 325 \ m 377
0014260 \n \0 \0 233 o \0 \0 \0 W 6 \n \0 \0 277 M 276
0014300 H l \n 326 I \n \0 \0 \t \0 \0 _ , 001 _ 022
0014320 277 O , 002 001 270 J l \n 326 272 K l \n 326 273
0014340 H k \n \0 \0 J 375 363 _ 024 277 O 020 262 211 H
0014360 k \n \0 \0 I k \n \0 \0 K 325 375 363 242 261 377
0014400 v h 260 201 O 016 221 h 200 i 251 O 016 L 363 221
0014420 h 200 i 262 : W 8 O 024 232 O 026 221 h 200 i
0014440 223 O 022 260 037 O 026 226 O 024 221 h 200 i 256 H
0014460 k \n \0 \0 I 363 221 h 200 i 222 O 022 203 O 022
0014500 k 324 266 W 6 \n \0 \0 277 M k 324 275 j L 363
0014520 221 h 200 i 262 8 L j _ 0 277 _ . 277 O .
0014540 O 0 363 221 h 200 i 263 031 M k 324 275 o \0 \0
0014560 \0 W 6 \n \0 \0 277 O 0 k 324 _ 0 277 260 340
0014600 o \0 \0 \0 W 6 \n \0 \0 277 M 276 D 265 027 W
0014620 6 M k 324 N j \n \0 \0 N M \n \0 \0 N \r
0014640 005 \0 \0 020 M N 325 325 j _ 4 277 _ 2 277 O
0014660 2 O 4 363 221 h 200 i 263 327 M k 324 275 o \0
0014700 \0 \0 W 6 \n \0 \0 277 O 4 k 324 _ 4 277 260
0014720 340 \0 ( 1 4 1 2 Q V E C T O R -
0014740 P U S H - E X T E N D 1 3 4 6
0014760 Q V A L U E S 1 3 4 1 Q %
0015000 % = 1 3 3 4 Q % % = 1 3 1
0015020 4 Q V E C T O R - P U S H - E
0015040 X T E N D 1 2 7 1 Q V E C T
0015060 O R - P U S H - E X T E N D 1
0015100 2 1 3 Q V E C T O R - P U S H
0015120 - E X T E N D 1 1 6 7 Q A S
0015140 H 1 0 7 4 Q A S H 1 0 6 7
0015160 Q A S H 1 0 5 0 Q A S H
0015200 1 0 1 6 Q \ M V L I S T 1 0
0015220 1 3 Q T R U N C A T E 1 0 0
0015240 0 Q V E C T O R - P U S H - E
0015260 X T E N D 7 6 6 Q % % = 7
0015300 5 0 Q V E C T O R - P U S H -
0015320 E X T E N D 7 0 3 Q A S H
0015340 6 7 6 Q A S H 6 5 5 Q V E
0015360 C T O R - P U S H - E X T E N D
0015400 6 1 2 Q V E C T O R - P U S
0015420 H - E X T E N D 5 5 1 Q A S
0015440 H 5 4 2 Q A S H 5 3 1 Q
0015460 A S H 5 2 2 Q A S H 5 1 0
0015500 Q % % = 5 0 2 Q M A X 4
0015520 7 3 Q M A X 4 5 1 Q C E I
0015540 L I N G 2 0 0 Q C E I L I N
0015560 G 1 4 7 Q E X P T 1 2 7 Q
0015600 E X P T 1 0 6 Q A S H 1
0015620 0 0 Q A S H 7 2 Q A S H
0015640 6 3 Q % % = 6 0 Q A S H
0015660 5 1 Q A S H 3 3 Q A S H
0015700 2 5 Q A S H ) \r N I L \r ( 1
0015720 4 0 5 Q | \ 0 1 3 0 7 Q |
0015740 \ . 1 2 6 4 Q | \ 0 7 7 3
0015760 Q | \ . 6 5 0 Q | \ 0 6
0016000 0 5 Q | \ . ) \r e x p a n d -
0016020 F O R M A T - W I T H - C O N T
0016040 R O L - S T R I N G D 1 \r ( L
0016060 ( 1 $ $ M A C R O - E N V I
0016100 R O N M E N T 0 $ $ M A C R
0016120 O - F O R M ) ) \0 @ 003 \0 \0 002 @
0016140 002 021 ! 002 H 001 271 H 002 272 g \0 \0 g \0 \0
0016160 I h 032 032 h 032 g \0 \0 o \0 \0 \0 o \0 \0
0016200 \0 g \0 \0 g \0 \0 o \0 \0 \0 J 032 032 o \0
0016220 \0 \0 032 032 h 032 032 032 032 h 032 032 032 020 \0 N
0016240 I L \r ( 4 7 Q L E T 4 4 Q
0016260 C O N D I T I O N - C A S E 3
0016300 1 Q L E T 2 0 Q S T R I N
0016320 G 1 5 Q L E T ) \r ( 6 2 Q
0016340 ( ( F O R M A T - E R R O R
0016360 ( C ) ( C L : E R R O R ( Q
0016400 U O T E F O R M A T - E R R O
0016420 R ) : A R G S ( C O N S (
0016440 L I S T " W h i l e p r o c
0016460 e s s i n g i n d i r e c t
0016500 c o n t r o l s t r i n g ~ %
0016520 % ~ S ~ % % ~ V @ T ^ " * F O
0016540 R M A T - C O N T R O L - S T R
0016560 I N G * ( 1 + * F O R M A T
0016600 - I N D E X * ) ) ( F O R M A
0016620 T - E R R O R - A R G S C ) )
0016640 ) ) ) \r 5 3 Q ( ( * F O R M
0016660 A T - C O N T R O L - S T R I N
0016700 G * S T R I N G ) ( * F O R
0016720 M A T - L E N G T H * ( C L :
0016740 L E N G T H S T R I N G ) )
0016760 ( * F O R M A T - I N D E X *
0017000 0 ) ) 4 1 Q ( D E C L A R E
0017020 ( T Y P E S I M P L E - S T
0017040 R I N G S T R I N G ) ) \r 3
0017060 5 Q ( ( S T R I N G ( C L :
0017100 I F ( S I M P L E - S T R I N
0017120 G - P S T R I N G ) S T R I
0017140 N G ( C O E R C E S T R I N
0017160 G ( Q U O T E S I M P L E -
0017200 S T R I N G ) ) ) ) ) ) \r ( S E
0017220 T F - M A C R O - F U N C T I O
0017240 N ( Q U O T E F O R M A T -
0017260 W I T H - C O N T R O L - S T R
0017300 I N G ) ( Q U O T E e x p a
0017320 n d - F O R M A T - W I T H - C
0017340 O N T R O L - S T R I N G ) ) \r
0017360 e x p a n d - F O R M A T - S T
0017400 R I N G I F Y - O U T P U T D
0017420 1 \r ( L ( 1 $ $ M A C R O -
0017440 E N V I R O N M E N T 0 $ $
0017460 M A C R O - F O R M ) ) \0 030 001
0017500 \0 \0 002 @ 002 021 001 \0 g \0 \0 o \0 \0 \0 H
0017520 o \0 \0 \0 \n \0 \0 032 032 020 \0 ( 2 3 Q
0017540 \ A P P E N D 2 ) \r ( 7 L E T
0017560 ) \r ( 2 0 Q ( ( C O E R C E
0017600 ( G E T - O U T P U T - S T R
0017620 E A M - S T R I N G * S T A N
0017640 D A R D - O U T P U T * ) ( Q
0017660 U O T E S I M P L E - S T R I
0017700 N G ) ) ) 1 3 Q ( ( * S T A
0017720 N D A R D - O U T P U T * ( M
0017740 A K E - S T R I N G - O U T P U
0017760 T - S T R E A M ) ) ) ) \r ( S E
0020000 T F - M A C R O - F U N C T I O
0020020 N ( Q U O T E F O R M A T -
0020040 S T R I N G I F Y - O U T P U T
0020060 ) ( Q U O T E e x p a n d -
0020100 F O R M A T - S T R I N G I F Y
0020120 - O U T P U T ) ) \r e x p a n d
0020140 - P O P - F O R M A T - A R G
0020160 D 1 \r ( L ( 1 $ $ M A C R O
0020200 - E N V I R O N M E N T 0 $
0020220 $ M A C R O - F O R M ) ) \0 006
0020240 \0 \0 \0 002 o \0 \0 \0 020 \0 N I L \r N I
0020260 L \r ( 3 ( C L : I F * F O
0020300 R M A T - A R G U M E N T S *
0020320 ( C L : P O P * F O R M A T -
0020340 A R G U M E N T S * ) ( F O R
0020360 M A T - E R R O R " M i s s i
0020400 n g a r g u m e n t " ) ) ) \r
0020420 ( S E T F - M A C R O - F U N C
0020440 T I O N ( Q U O T E P O P -
0020460 F O R M A T - A R G ) ( Q U O
0020500 T E e x p a n d - P O P - F O
0020520 R M A T - A R G ) ) \r e x p a n
0020540 d - W I T H - F O R M A T - P A
0020560 R A M E T E R S D 1 \r ( L (
0020600 1 $ $ M A C R O - E N V I R O
0020620 N M E N T 0 $ $ M A C R O -
0020640 F O R M ) ) \0 Q \a \0 \0 002 @ 002 021
0020660 a 006 H 001 271 H 002 Z 001 273 J 002 274 K ] 265
0020700 030 g \0 \0 N \t \0 \0 g \0 \0 I o \0 \0 \0
0020720 032 032 L 032 032 032 020 002 M 001 001 g \0 \0 g \0
0020740 \0 I g \0 \0 I h 032 032 h 032 032 032 M 001 002
0020760 001 h 032 032 032 h 032 032 N 032 276 260 303 \0 ( 3
0021000 2 Q N R E V E R S E ) \r ( 6 7
0021020 Q P O P 6 3 Q C L : I F
0021040 6 0 Q O R 3 5 Q C L : W H
0021060 E N 2 6 Q L E T ) \r ( 4 2
0021100 Q ( ( F O R M A T - E R R O R
0021120 " T o o m a n y p a r a m
0021140 e t e r s " ) ) ) \r ( S E T F -
0021160 M A C R O - F U N C T I O N (
0021200 Q U O T E W I T H - F O R M A
0021220 T - P A R A M E T E R S ) ( Q
0021240 U O T E e x p a n d - W I T H
0021260 - F O R M A T - P A R A M E T E
0021300 R S ) ) \r e x p a n d - N E X T
0021320 C H A R D 1 \r ( L ( 1 $ $
0021340 M A C R O - E N V I R O N M E N
0021360 T 0 $ $ M A C R O - F O R M
0021400 ) ) \0 006 \0 \0 \0 002 o \0 \0 \0 020 \0 N
0021420 I L \r N I L \r ( 3 ( C L : I
0021440 F ( < ( I N C F * F O R M
0021460 A T - I N D E X * ) * F O R M
0021500 A T - L E N G T H * ) ( S C H
0021520 A R * F O R M A T - C O N T R
0021540 O L - S T R I N G * * F O R M
0021560 A T - I N D E X * ) ( F O R M
0021600 A T - E R R O R " S y n t a x
0021620 e r r o r " ) ) ) \r ( S E T F
0021640 - M A C R O - F U N C T I O N
0021660 ( Q U O T E N E X T C H A R )
0021700 ( Q U O T E e x p a n d - N
0021720 E X T C H A R ) ) \r e x p a n d
0021740 - F O R M A T - P E E K D 1 \r
0021760 ( L ( 1 $ $ M A C R O - E N
0022000 V I R O N M E N T 0 $ $ M A
0022020 C R O - F O R M ) ) \0 006 \0 \0 \0
0022040 002 o \0 \0 \0 020 \0 N I L \r N I L \r (
0022060 3 ( S C H A R * F O R M A
0022100 T - C O N T R O L - S T R I N G
0022120 * * F O R M A T - I N D E X *
0022140 ) ) \r ( S E T F - M A C R O - F
0022160 U N C T I O N ( Q U O T E F
0022200 O R M A T - P E E K ) ( Q U O
0022220 T E e x p a n d - F O R M A T
0022240 - P E E K ) ) \r e x p a n d - F
0022260 O R M A T - F I N D - C H A R
0022300 D 1 \r ( L ( 1 $ $ M A C R O
0022320 - E N V I R O N M E N T 0 $
0022340 $ M A C R O - F O R M ) ) \0 .
0022360 005 \0 \0 002 @ 002 021 A 004 H 001 271 H 002 Z 001
0022400 273 J 002 001 274 g \0 \0 I o \0 \0 \0 g \0 \0
0022420 K g \0 \0 L o \0 \0 \0 032 032 032 032 032 032 032
0022440 020 \0 N I L \r ( 3 7 Q : E N D
0022460 3 3 Q : S T A R T 2 3 Q C
0022500 L : P O S I T I O N ) \r ( 4 4
0022520 Q ( : T E S T ( F U N C T I
0022540 O N C H A R = ) ) 3 0 Q (
0022560 T H E S I M P L E - S T R I N
0022600 G * F O R M A T - C O N T R O
0022620 L - S T R I N G * ) ) \r ( S E T
0022640 F - M A C R O - F U N C T I O N
0022660 ( Q U O T E F O R M A T - F
0022700 I N D - C H A R ) ( Q U O T E
0022720 e x p a n d - F O R M A T - F
0022740 I N D - C H A R ) ) \r F O R M A
0022760 T - G E T - P A R A M E T E R
0023000 D 1 \r ( F 3 * F O R M A T -
0023020 I N D E X * F 4 * F O R M
0023040 A T - C O N T R O L - S T R I N
0023060 G * F 5 * F O R M A T - L
0023100 E N G T H * F 6 * F O R M
0023120 A T - A R G U M E N T S * ) 001
0023140 V 003 004 \0 \0 T S 266 d o \0 \0 \0 : 262 033
0023160 277 S k 324 c 006 U 375 363 223 T S 266 206 o \0
0023200 \0 \0 \t \0 \0 277 h 260 037 o \0 \0 \0 : 264 030
0023220 S k 324 c 006 U 375 363 223 T S 266 206 o \0 \0
0023240 \0 \t \0 \0 277 i 021 ! 002 T S 266 Y d o \0
0023260 \0 \0 : 262 035 277 S k 324 c 006 U 375 363 223 T
0023300 S 266 206 o \0 \0 \0 \t \0 \0 277 V \t \0 \0 020
0023320 o \0 \0 \0 : 251 I d o \0 \0 \0 : 262 $ 277
0023340 V 265 030 o \0 \0 \0 \t \0 \0 S k 324 c 006 U
0023360 375 363 262 4 T S 266 277 020 001 V 002 c \f 277 260
0023400 353 o \0 \0 \0 : 262 ) S k 324 c 006 U 375 363
0023420 223 T S 266 206 o \0 \0 \0 \t \0 \0 S k 324 c
0023440 006 U 375 363 263 320 o \0 \0 \0 \t \0 \0 277 020 I
0023460 o \0 \0 \0 : 263 M I o \0 \0 \0 : 263 E I
0023500 o \0 \0 \0 : 263 = I o \0 \0 \0 : 263 5 I
0023520 o \0 \0 \0 : 263 - I o \0 \0 \0 : 263 % I
0023540 o \0 \0 \0 : 263 035 I o \0 \0 \0 : 263 025 I
0023560 o \0 \0 \0 : 253 I o \0 \0 \0 : 264 003 202 261
0023600 377 y T S 266 \t \0 \0 272 S k 324 c 006 U 375
0023620 363 223 T S 266 206 o \0 \0 \0 \t \0 \0 \t \0 \0
0023640 221 h 200 i 227 H 223 j J 325 020 J 020 J l \n
0023660 326 T S 266 \t \0 \0 324 260 320 \0 ( 5 2 1 Q
0023700 D I G I T - C H A R - P 4 7
0023720 2 Q D I G I T - C H A R - P
0023740 4 6 7 Q F O R M A T - E R R O
0023760 R 4 4 2 Q D I G I T - C H A
0024000 R - P 3 0 7 Q F O R M A T -
0024020 E R R O R 2 6 6 Q F O R M A
0024040 T - E R R O R 2 0 4 Q F O R
0024060 M A T - E R R O R 1 5 1 Q C
0024100 L : L E N G T H 1 4 4 Q F O
0024120 R M A T - E R R O R 7 6 Q F
0024140 O R M A T - E R R O R 3 7 Q
0024160 F O R M A T - E R R O R ) \r N I
0024200 L \r ( 4 6 4 Q " S y n t a x
0024220 e r r o r " 4 2 5 Q | \ 9
0024240 4 1 6 Q | \ 8 4 0 6 Q |
0024260 \ 7 3 7 6 Q | \ 6 3 6 6 Q
0024300 | \ 5 3 5 6 Q | \ 4 3 4
0024320 6 Q | \ 3 3 3 6 Q | \ 2
0024340 3 2 6 Q | \ 1 \r 3 1 6 Q |
0024360 \ 0 3 0 4 Q " S y n t a x
0024400 e r r o r " 2 6 3 Q " S y n
0024420 t a x e r r o r " 2 3 7 Q
0024440 | \ ' 2 0 1 Q " M i s s i n
0024460 g a r g u m e n t " 1 6 6 Q
0024500 | \ v 1 5 6 Q | \ V 1 4
0024520 1 Q \r " S y n t a x e r r o
0024540 r " 1 1 4 Q | \ # 7 3 Q
0024560 " S y n t a x e r r o r " 4
0024600 7 Q | \ - 3 4 Q " S y n t
0024620 a x e r r o r " 7 | \ + )
0024640 \r P A R S E - F O R M A T - O P
0024660 E R A T I O N D 1 \r ( F 4
0024700 * F O R M A T - I N D E X * F
0024720 5 * F O R M A T - C O N T R
0024740 O L - S T R I N G * F 6 *
0024760 F O R M A T - L E N G T H * )
0025000 \0 256 004 003 \0 \0 T k 324 c \b V 375 363 223 U
0025020 T 266 206 o \0 \0 \0 \t \0 \0 021 1 003 H \t \0
0025040 \0 254 H 272 o \0 \0 \0 Y 003 265 2 h 264 026 \b
0025060 \0 \0 h 032 273 U T 266 o \0 \0 \0 360 263 . K
0025100 \t \0 \0 U T 266 o \0 \0 \0 360 264 C T k 324
0025120 c \b V 375 363 262 2 U T 266 260 4 001 J 360 221
0025140 h 200 i 242 I 260 310 I 002 260 277 T k 324 c \b
0025160 V 375 363 223 U T 266 206 o \0 \0 \0 \t \0 \0 277
0025200 \b \0 \0 K 032 260 257 o \0 \0 \0 \t \0 \0 U T
0025220 266 o \0 \0 \0 360 264 026 T k 324 c \b V 375 363
0025240 223 U T 266 206 o \0 \0 \0 \t \0 \0 U T 266 \f
0025260 \0 \0 020 \0 ( 2 5 3 Q V A L U E S
0025300 2 4 5 Q F O R M A T - E R R
0025320 O R 2 0 7 Q F O R M A T - E
0025340 R R O R 1 7 4 Q F O R M A T
0025360 - G E T - P A R A M E T E R 1
0025400 7 0 Q F O R M A T - E R R O R
0025420 7 4 Q N R E V E R S E 5 3
0025440 Q F O R M A T - G E T - P A R
0025460 A M E T E R 3 2 Q D I G I T
0025500 - C H A R - P 2 3 Q F O R M
0025520 A T - E R R O R ) \r N I L \r (
0025540 2 4 2 Q " S y n t a x e r r
0025560 o r " 2 1 6 Q | \ @ 2 0 4
0025600 Q " S y n t a x e r r o r "
0025620 1 6 5 Q " S y n t a x e r
0025640 r o r " 1 0 3 Q | \ : 6 5
0025660 Q | \ , 4 1 Q ( | \ , |
0025700 \ # | \ V | \ v | \ ' ) \r
0025720 2 0 Q " S y n t a x e r r
0025740 o r " ) \r F O R M A T - F I N D
0025760 - C O M M A N D D 1 \r ( L (
0026000 0 C O M M A N D - L I S T )
0026020 F 1 2 Q * F O R M A T - I N
0026040 D E X * F 1 3 Q * F O R M
0026060 A T - C O N T R O L - S T R I N
0026100 G * F 1 4 Q * F O R M A T
0026120 - L E N G T H * ) 001 I \n 003 \0 001
0026140 W 024 021 221 \t H o \0 \0 \0 W 026 g \0 \0 H
0026160 g \0 \0 W 030 g \0 \0 g \0 \0 \r \b \0 \0 272
0026200 271 J 221 h 200 i 230 o \0 \0 \0 @ \n \0 \0 020
0026220 J c 024 277 \b \0 \0 \t \0 \0 _ 022 001 _ 020 277
0026240 O 022 002 _ 016 001 276 O 016 002 ] 001 274 M 002 001
0026260 [ d @ g \0 \0 g \0 \0 \f \0 \0 234 277 H J
0026300 O 020 N L K \r 006 \0 \0 020 o \0 \0 \0 : 262
0026320 % W 024 k 324 c 024 W 030 375 363 225 W 026 W 024
0026340 266 206 o \0 \0 \0 \t \0 \0 277 o \0 \0 \0 \t \0
0026360 \0 261 \0 247 K d o \0 \0 \0 : 262 % 277 W 024
0026400 k 324 c 024 W 030 375 363 225 W 026 W 024 266 206 o
0026420 \0 \0 \0 \t \0 \0 277 o \0 \0 \0 \t \0 \0 260 z
0026440 o \0 \0 \0 : 262 $ W 024 k 324 c 024 W 030 375
0026460 363 225 W 026 W 024 266 206 o \0 \0 \0 \t \0 \0 277
0026500 o \0 \0 \0 \t \0 \0 260 Q K d o \0 \0 \0 :
0026520 262 % 277 W 024 k 324 c 024 W 030 375 363 225 W 026
0026540 W 024 266 206 o \0 \0 \0 \t \0 \0 277 o \0 \0 \0
0026560 \t \0 \0 260 % o \0 \0 \0 : 263 027 K o \0 \0
0026600 \0 : 255 K o \0 \0 \0 : 246 K o \0 \0 \0 :
0026620 227 o \0 \0 \0 \t \0 \0 277 W 024 o \0 \0 \0 W
0026640 026 g \0 \0 I 261 376 313 \0 ( 4 6 7 Q F
0026660 O R M A T - E R R O R 4 2 2 Q
0026700 F O R M A T - F I N D - C O M
0026720 M A N D 4 1 2 Q F O R M A T
0026740 - E R R O R 3 4 6 Q F O R M
0026760 A T - F I N D - C O M M A N D
0027000 3 3 6 Q F O R M A T - E R R O
0027020 R 2 7 5 Q F O R M A T - F I
0027040 N D - C O M M A N D 2 6 5 Q
0027060 F O R M A T - E R R O R 2 2 0
0027100 Q F O R M A T - F I N D - C O
0027120 M M A N D 2 1 0 Q F O R M A
0027140 T - E R R O R 1 5 0 Q V A L
0027160 U E S 1 3 3 Q M E M B E R
0027200 7 1 Q \ M V L I S T 6 6 Q
0027220 P A R S E - F O R M A T - O P E
0027240 R A T I O N 5 6 Q F O R M A
0027260 T - E R R O R 3 6 Q C L : P
0027300 O S I T I O N ) \r ( 5 0 3 Q :
0027320 S T A R T 1 3 0 Q C H A R =
0027340 1 2 5 Q : T E S T 3 2 Q
0027360 C H A R = 2 7 Q : T E S T
0027400 2 2 Q : E N D 1 6 Q : S T
0027420 A R T ) \r ( 4 7 6 Q | \ ~
0027440 4 6 4 Q " N o m a t c h i n
0027460 g b r a c k e t " 4 5 6 Q
0027500 | \ ] 4 4 7 Q | \ ) 4 4 0
0027520 Q | \ > 4 3 0 Q | \ } 4
0027540 1 7 Q ( | \ ] ) 4 0 7 Q "
0027560 S y n t a x e r r o r " \r 3
0027600 5 6 Q | \ [ 3 4 3 Q ( | \
0027620 ) ) 3 3 3 Q " S y n t a x
0027640 e r r o r " 3 0 3 Q | \ (
0027660 2 7 2 Q ( | \ > ) 2 6 2 Q
0027700 " S y n t a x e r r o r " 2
0027720 3 1 Q | \ < 2 1 5 Q ( | \
0027740 } ) 2 0 5 Q \r " S y n t a x
0027760 e r r o r " 1 5 5 Q | \ {
0030000 5 2 Q " E x p e c t i n g
0030020 o n e o f ~ S " 1 1 Q |
0030040 \ ~ ) \r F O R M A T A 0 0 0 1 A
0030060 0 0 0 2 D 1 \r ( F 0 C O N
0030100 T R O L - S T R I N G ) \0 \n \0
0030120 001 \0 \0 j P \t \0 \0 \n \0 \0 020 \0 ( 7
0030140 S U B - F O R M A T 4 C L :
0030160 L E N G T H ) \r N I L \r ( ) \r F
0030200 O R M A T A 0 0 0 1 D 1 \r N I
0030220 L \0 \v \0 \0 \0 \0 g \0 \0 g \0 \0 \n \0
0030240 \0 020 \0 ( 1 0 Q \ C A T C H - F
0030260 U N C A L L ) \r ( 5 F O R M A
0030300 T A 0 0 0 1 A 0 0 0 2 2 F O
0030320 R M A T - C O L O N - E S C A P
0030340 E ) \r ( ) \r F O R M A T A 0 0 0
0030360 3 A 0 0 0 4 D 1 \r ( F 0 *
0030400 S T A N D A R D - O U T P U T *
0030420 ) \0 006 \0 001 \0 \0 P \t \0 \0 020 \0 ( 3
0030440 C L O S E ) \r N I L \r ( ) \r F
0030460 O R M A T A 0 0 0 3 A 0 0 0 5 A
0030500 0 0 0 6 D 1 \r ( F 0 C O N
0030520 T R O L - S T R I N G ) \0 \n \0
0030540 001 \0 \0 j P \t \0 \0 \n \0 \0 020 \0 ( 7
0030560 S U B - F O R M A T 4 C L :
0030600 L E N G T H ) \r N I L \r ( ) \r F
0030620 O R M A T A 0 0 0 3 A 0 0 0 5
0030640 D 1 \r N I L \0 \v \0 \0 \0 \0 g \0 \0
0030660 g \0 \0 \n \0 \0 020 \0 ( 1 0 Q \ C A
0030700 T C H - F U N C A L L ) \r ( 5
0030720 F O R M A T A 0 0 0 3 A 0 0 0 5
0030740 A 0 0 0 6 2 F O R M A T - C
0030760 O L O N - E S C A P E ) \r ( ) \r
0031000 F O R M A T A 0 0 0 3 D 1 \r (
0031020 N A M E E R R O R S E T F
0031040 0 R E S E T V A R S L S T F
0031060 1 R E S E T Y ) \0 034 \0 002 002
0031100 \0 g \0 \0 h 032 h h 032 032 P 032 c \0 277 g
0031120 \0 \0 g \0 \0 \n \0 \0 c 002 i 020 \0 ( 2 6
0031140 Q \ C A T C H - F U N C A L L
0031160 ) \r ( 2 3 Q F O R M A T A 0 0
0031200 0 3 A 0 0 0 5 2 0 Q F O R M
0031220 A T - E S C A P E 2 F O R M
0031240 A T A 0 0 0 3 A 0 0 0 4 ) \r ( )
0031260 \r F O R M A T A 0 0 0 7 A 0 0 0
0031300 8 D 1 \r ( F 0 C O N T R O
0031320 L - S T R I N G ) \0 \n \0 001 \0 \0
0031340 j P \t \0 \0 \n \0 \0 020 \0 ( 7 S U B
0031360 - F O R M A T 4 C L : L E N
0031400 G T H ) \r N I L \r ( ) \r F O R M
0031420 A T A 0 0 0 7 D 1 \r N I L \0
0031440 \v \0 \0 \0 \0 g \0 \0 g \0 \0 \n \0 \0 020 \0
0031460 ( 1 0 Q \ C A T C H - F U N C
0031500 A L L ) \r ( 5 F O R M A T A 0
0031520 0 0 7 A 0 0 0 8 2 F O R M A
0031540 T - C O L O N - E S C A P E ) \r
0031560 ( ) \r F O R M A T D 1 \r ( L
0031600 ( 0 - a r g s - ) P 2 0 Q
0031620 * S T A N D A R D - O U T P U
0031640 T * P 1 6 Q R E S E T Y
0031660 P 1 5 Q L I S P X H I S T
0031700 P 1 4 Q * S T A N D A R D -
0031720 O U T P U T * P 1 3 Q * S
0031740 T A N D A R D - O U T P U T *
0031760 P 1 2 Q * F O R M A T - C O
0032000 N T R O L - S T R I N G * P
0032020 1 1 Q * F O R M A T - A R G U
0032040 M E N T S * P 1 0 Q * F O
0032060 R M A T - O R I G I N A L - A R
0032100 G U M E N T S * P 2 C O N
0032120 T R O L - S T R I N G F 2 1
0032140 Q L I S P X H I S T F 2 2
0032160 Q R E S E T V A R S L S T F
0032200 2 3 Q * S T A N D A R D - O
0032220 U T P U T * ) \0 275 021 003 002 \0 e 021
0032240 001 \0 k a 021 021 002 l 002 a 272 H l 003 021 2
0032260 \a L d K 363 234 277 M 022 d J \t \0 \0 262 036
0032300 J 260 " a _ 016 277 N 265 016 O 016 h 032 ^ 275
0032320 L k 324 \ 260 336 O 016 & 276 260 366 J g \0 \0
0032340 \n \0 \0 021 003 \n I 221 h 200 i 262 035 \b \0 \0
0032360 021 001 \v g \0 \0 g \0 \0 \n \0 \0 O 026 \t \0
0032400 \0 g \0 \0 \n \0 \0 020 I d \t \0 \0 262 8 277
0032420 I d \t \0 \0 262 0 277 I \t \0 \0 021 001 \f W
0032440 " 021 ! 017 W $ o \0 \0 \0 g \0 \0 \n \0 \0
0032460 221 h 202 g \0 \0 _ 036 \n \0 \0 277 O 036 264 006
0032500 \b \0 \0 h 020 i 360 222 W & 200 I 021 001 020 g
0032520 \0 \0 g \0 \0 \n \0 \0 h 020 \0 ( 2 7 1 Q
0032540 \ C A T C H - F U N C A L L
0032560 2 4 4 Q E R R O R ! 2 3 4 Q
0032600 R E S E T R E S T O R E 2 2
0032620 1 Q F O R M A T A 0 0 0 3 1
0032640 7 5 Q M A K E - F I L L - P O
0032660 I N T E R - O U T P U T - S T R
0032700 E A M 1 6 6 Q A R R A Y - H
0032720 A S - F I L L - P O I N T E R -
0032740 P 1 5 6 Q C L : S T R I N G
0032760 P 1 5 0 Q C O E R C E 1 4
0033000 2 Q G E T - O U T P U T - S T
0033020 R E A M - S T R I N G 1 3 5 Q
0033040 \ C A T C H - F U N C A L L
0033060 1 2 1 Q M A K E - S T R I N G
0033100 - O U T P U T - S T R E A M 1
0033120 0 4 Q C L : C O E R C E 3 7
0033140 Q S I M P L E - S T R I N G -
0033160 P ) \r ( 2 6 6 Q F O R M A T A
0033200 0 0 0 7 2 6 3 Q F O R M A T
0033220 - E S C A P E 2 2 7 Q E R R
0033240 O R 2 1 6 Q I N T E R N A L
0033260 1 4 5 Q S I M P L E - S T R
0033300 I N G 1 3 2 Q F O R M A T A
0033320 0 0 0 1 1 2 7 Q F O R M A T
0033340 - E S C A P E 1 0 1 Q S I M
0033360 P L E - S T R I N G ) \r ( 2 1
0033400 3 Q ( F O R M A T A 0 0 0 3 )
0033420 ) \r S U B - F O R M A T D 1 \r
0033440 ( L ( 1 E N D 0 S T A R
0033460 T ) P 1 * F O R M A T - L
0033500 E N G T H * P 0 * F O R M
0033520 A T - I N D E X * F 1 4 Q
0033540 * F O R M A T - C O N T R O L -
0033560 S T R I N G * F 1 5 Q * S
0033600 T A N D A R D - O U T P U T *
0033620 F 1 6 Q * F O R M A T - D I
0033640 S P A T C H - T A B L E * ) \0
0033660 255 \f 003 \0 002 @ A 021 242 \v @ 272 o \0 \0 \0
0033700 W 030 g \0 \0 @ g \0 \0 A g \0 \0 g \0 \0
0033720 \r \b \0 \0 [ 221 h 200 i 262 023 W 030 W 032 g
0033740 \0 \0 J g \0 \0 A \r 006 \0 \0 020 K d J 363
0033760 262 025 277 W 030 W 032 g \0 \0 J g \0 \0 K \r
0034000 006 \0 \0 277 K 270 \b \0 \0 \t \0 \0 _ 026 001 _
0034020 024 277 O 026 002 _ 022 001 _ 020 277 O 022 002 _ 016
0034040 001 276 O 016 002 001 275 W 034 M 006 \0 \0 323 266 \
0034060 231 O 020 N O 024 l 003 L 016 207 o \0 \0 \0 M
0034100 \n \0 \0 277 H k 324 X A 375 363 221 h 200 i 221
0034120 h 020 H 272 o \0 \0 \0 W 030 g \0 \0 J 261 377
0034140 h \0 ( 2 1 5 Q F O R M A T - E
0034160 R R O R 1 2 6 Q \ M V L I S
0034200 T 1 2 3 Q P A R S E - F O R
0034220 M A T - O P E R A T I O N 1 1
0034240 5 Q W R I T E - S T R I N G
0034260 6 5 Q W R I T E - S T R I N G
0034300 3 6 Q C L : P O S I T I O N
0034320 ) \r ( 2 4 7 Q : S T A R T 1
0034340 6 7 Q C H A R A C T E R 1 1
0034360 0 Q : E N D 1 0 4 Q : S T
0034400 A R T 6 0 Q : E N D 5 4 Q
0034420 : S T A R T 3 2 Q C H A R
0034440 = 2 7 Q : T E S T 2 3 Q
0034460 : E N D 1 7 Q : S T A R T )
0034500 \r ( 2 4 2 Q | \ ~ 2 1 1 Q
0034520 " I l l e g a l F O R M A T
0034540 c o m m a n d ~ ~ ~ C " 1
0034560 2 Q | \ ~ ) \r F O R M A T - C
0034600 A P I T A L I Z A T I O N A 0 0
0034620 0 1 A 0 0 0 2 D 1 \r ( F 0
0034640 P R E V F 1 T I L D E F
0034660 2 S U B - E S C A P E ) \0
0034700 \n \0 003 \0 \0 P Q \n \0 \0 h c 004 020 \0 (
0034720 4 S U B - F O R M A T ) \r N I
0034740 L \r ( ) \r F O R M A T - C A P I
0034760 T A L I Z A T I O N A 0 0 0 1
0035000 D 1 \r ( P 0 S U B - E S C A
0035020 P E F 1 E S C A P E ) \0
0035040 024 001 001 \0 \0 g \0 \0 021 001 \0 g \0 \0 g \0
0035060 \0 \n \0 \0 H c 002 020 \0 ( 1 6 Q \ C
0035100 A T C H - F U N C A L L ) \r ( 1
0035120 3 Q F O R M A T - C A P I T A
0035140 L I Z A T I O N A 0 0 0 1 A 0 0
0035160 0 2 1 0 Q F O R M A T - E S
0035200 C A P E 2 F O R M A T - E S
0035220 C A P E ) \r ( ) \r F O R M A T -
0035240 C A P I T A L I Z A T I O N D
0035260 1 \r ( L ( 2 P A R M S 1
0035300 A T S I G N 0 C O L O N )
0035320 P 2 0 Q * S T A N D A R D -
0035340 O U T P U T * P 1 7 Q E S
0035360 C A P E P 3 T I L D E P
0035400 1 P R E V F 2 1 Q * F
0035420 O R M A T - I N D E X * F 2
0035440 2 Q * F O R M A T - L E N G T
0035460 H * F 2 3 Q * F O R M A T
0035500 - C O N T R O L - S T R I N G *
0035520 ) 001 025 021 003 \0 003 B 227 o \0 \0 \0 \t \0
0035540 \0 277 W " k 324 c " W $ 375 363 225 W & W
0035560 " 266 206 o \0 \0 \0 \t \0 \0 277 o \0 \0 \0 \t
0035600 \0 \0 \t \0 \0 021 341 016 H 001 271 H 002 Z 001 273
0035620 J 002 \ 001 275 L 002 ^ 001 _ 016 277 N 002 001 _
0035640 020 277 M 245 O 016 242 O 020 227 o \0 \0 \0 \t \0
0035660 \0 277 021 020 017 \b \0 \0 021 001 020 g \0 \0 _ 036
0035700 g \0 \0 \n \0 \0 277 O \t \0 \0 g \0 \0 \n
0035720 \0 \0 022 _ 022 277 A 230 @ 237 O 022 \t \0 \0 260
0035740 ~ @ 226 O 022 \t \0 \0 260 u A 262 m O 022 \t
0035760 \0 \0 _ 034 277 O 022 \t \0 \0 277 j _ 032 277 O
0036000 034 O 032 363 221 h 200 i 251 O 022 O 032 266 \t \0
0036020 \0 262 A O 022 _ 030 277 O 032 _ 026 277 ` \0 \0
0036040 O 022 O 032 266 006 \0 \0 323 _ 024 277 l a O 024
0036060 363 221 h 200 i 237 O 024 l z 363 221 h 200 i 225
0036100 O 024 l 325 201 O 024 321 O 030 O 026 267 277 O
0036120 022 212 O 032 k 324 260 246 O 022 \t \0 \0 \t \0 \0
0036140 O 036 d 226 h \t \0 \0 \n \0 \0 020 \0 ( 4 2
0036160 2 Q \ D O - T H R O W 4 1 7
0036200 Q \ M V L I S T 4 0 7 Q W
0036220 R I T E - S T R I N G 4 0 4 Q
0036240 N S T R I N G - D O W N C A S
0036260 E 2 7 0 Q A L P H A - C H A
0036300 R - P 2 4 1 Q N S T R I N G
0036320 - D O W N C A S E 2 3 1 Q C
0036340 L : L E N G T H 2 1 7 Q N S
0036360 T R I N G - C A P I T A L I Z E
0036400 2 0 6 Q N S T R I N G - U P
0036420 C A S E 1 7 1 Q C O E R C E
0036440 1 6 3 Q G E T - O U T P U T
0036460 - S T R E A M - S T R I N G 1
0036500 5 5 Q \ C A T C H - F U N C A
0036520 L L 1 3 7 Q M A K E - S T R
0036540 I N G - O U T P U T - S T R E A
0036560 M 1 3 0 Q F O R M A T - E R
0036600 R O R 5 4 Q \ M V L I S T
0036620 5 1 Q F O R M A T - F I N D -
0036640 C O M M A N D 4 1 Q F O R M
0036660 A T - E R R O R 1 0 Q F O R
0036700 M A T - E R R O R ) \r ( 3 1 7 Q
0036720 C H A R A C T E R 3 0 7 Q
0036740 \ C H A R H I 1 6 6 Q S I M
0036760 P L E - S T R I N G 1 5 2 Q
0037000 F O R M A T - C A P I T A L I Z
0037020 A T I O N A 0 0 0 1 1 4 5 Q
0037040 F O R M A T - C O L O N - E S C
0037060 A P E ) \r ( 1 2 5 Q " F l a
0037100 g s o r p a r a m e t e r s
0037120 n o t a l l o w e d " 4 6
0037140 Q ( | \ ) ) 3 6 Q " S y n
0037160 t a x e r r o r " 5 " N o
0037200 p a r a m e t e r s a l l o
0037220 w e d t o ~ ~ ( " ) \r F O R
0037240 M A T - E S C A P E D 1 \r ( L
0037260 ( 2 P A R M S 1 A T S I
0037300 G N 0 C O L O N ) F 3
0037320 * F O R M A T - A R G U M E N T
0037340 S * ) \0 236 003 001 \0 003 A 230 o \0 \0 \0
0037360 @ \n \0 \0 277 B 001 262 x B d 002 001 262 ^ d
0037400 002 002 001 262 Q 002 001 d 3 262 " 277 B 001 B
0037420 002 001 B 002 002 001 021 003 002 H I 363 221 h 200 i
0037440 264 \t I J 363 221 h 200 i 022 260 J 303 \0 \0 264
0037460 W B 001 006 \0 \0 323 B 002 001 006 \0 \0 323 B 002
0037500 002 001 006 \0 \0 323 021 003 002 I H 363 264 005 J I
0037520 363 022 260 " 001 B 002 001 364 260 033 001 021 001 \0 H
0037540 j 360 265 \v H 005 003 264 006 H \t \0 \0 022 204 S
0037560 221 h 200 i 264 022 @ 223 g \0 \0 202 g \0 \0 h
0037600 \t \0 \0 \n \0 \0 020 \0 ( 2 3 3 Q \ D
0037620 O - T H R O W 2 3 0 Q \ M V
0037640 L I S T 2 0 2 Q \ F Z E R O
0037660 P 1 1 Q F O R M A T - E R R
0037700 O R ) \r ( 2 2 4 Q F O R M A T
0037720 - E S C A P E 2 2 0 Q F O R
0037740 M A T - C O L O N - E S C A P E
0037760 1 3 2 Q C H A R A C T E R
0040000 1 2 2 Q C H A R A C T E R 1
0040020 1 3 Q C H A R A C T E R 1 0
0040040 4 Q C H A R A C T E R ) \r (
0040060 5 " F O R M A T c o m m a n
0040100 d ~ ~ ~ : [ ~ ; : ~ ] @ ^ i
0040120 s u n d e f i n e d " ) \r F O
0040140 R M A T - S E M I C O L O N - E
0040160 R R O R D 1 \r ( L ( 2 P A
0040200 R A M S 1 A T S I G N 0
0040220 C O L O N ) ) \0 \t \0 \0 \0 003 o \0
0040240 \0 \0 \t \0 \0 020 \0 ( 6 F O R M A T
0040260 - E R R O R ) \r N I L \r ( 3
0040300 " U n e x p e c t e d s e m i
0040320 c o l o n ( p r o b a b l y
0040340 a m i s s i n g ~ ~ s o m
0040360 e w h e r e ) . " ) \r F O R M A
0040400 T - U N T A G G E D - C O N D I
0040420 T I O N D 1 \r ( F 2 7 Q *
0040440 F O R M A T - I N D E X * F
0040460 3 0 Q * F O R M A T - A R G U
0040500 M E N T S * F 3 1 Q * F O
0040520 R M A T - L E N G T H * F 3
0040540 2 Q * F O R M A T - C O N T R
0040560 O L - S T R I N G * ) 001 X 027 004
0040600 \0 \0 W 0 265 025 o \0 \0 \0 \t \0 \0 021 361 017
0040620 021 p 026 H 3 232 h 211 001 W 0 002 c 0 277
0040640 260 355 i 230 o \0 \0 \0 H \n \0 \0 277 j Y H
0040660 \n \0 \0 262 _ o \0 \0 \0 \t \0 \0 \t \0 \0 Z
0040700 001 273 J 002 \ 001 275 L 002 ^ 001 _ 016 277 N 002
0040720 002 _ 020 001 _ 022 277 O 020 002 001 _ 024 277 O 022
0040740 227 o \0 \0 \0 \t \0 \0 277 O 016 227 o \0 \0 \0
0040760 \t \0 \0 277 K M \n \0 \0 O 024 o \0 \0 \0 360
0041000 221 h 200 i 264 003 202 261 \0 262 o \0 \0 \0 \t \0
0041020 \0 020 o \0 \0 \0 \t \0 \0 \t \0 \0 002 002 _ ,
0041040 001 _ * 277 O , 002 _ ( 001 _ & 277 O ( 002
0041060 _ $ 001 _ " 277 O $ 002 001 _ 277 O " 227
0041100 o \0 \0 \0 \t \0 \0 277 O * 227 o \0 \0 \0 \t
0041120 \0 \0 277 O o \0 \0 \0 360 263 ^ O & 262 \
0041140 W . k 324 c . W 2 375 363 225 W 4 W . 266
0041160 206 o \0 \0 \0 \t \0 \0 277 o \0 \0 \0 \t \0 \0
0041200 \t \0 \0 _ 036 001 _ 034 277 O 036 002 _ 032 001 _
0041220 030 277 O 032 002 002 002 002 001 _ 026 277 O 034 O 030
0041240 \n \0 \0 277 O 026 o \0 \0 \0 360 221 h 200 i 264
0041260 \n o \0 \0 \0 \t \0 \0 h 020 W . k 324 c .
0041300 W 2 375 363 225 W 4 W . 266 206 o \0 \0 \0 \t
0041320 \0 \0 277 I k 324 261 376 330 \0 ( 5 1 7 Q
0041340 F O R M A T - E R R O R 4 6 5
0041360 Q F O R M A T - F I N D - C O
0041400 M M A N D 4 4 0 Q S U B - F
0041420 O R M A T 4 0 0 Q \ M V L I
0041440 S T 3 7 5 Q F O R M A T - F
0041460 I N D - C O M M A N D 3 6 5 Q
0041500 F O R M A T - E R R O R 3 1
0041520 7 Q F O R M A T - E R R O R
0041540 3 0 4 Q F O R M A T - E R R O
0041560 R 2 3 1 Q \ M V L I S T 2
0041600 2 6 Q F O R M A T - F I N D -
0041620 C O M M A N D 2 1 6 Q F O R
0041640 M A T - F I N D - C O M M A N D
0041660 1 6 6 Q S U B - F O R M A T
0041700 1 6 0 Q F O R M A T - E R R
0041720 O R 1 4 5 Q F O R M A T - E
0041740 R R O R 7 4 Q \ M V L I S T
0041760 7 1 Q F O R M A T - F I N D
0042000 - C O M M A N D 6 0 Q % % =
0042020 5 1 Q F O R M A T - E R R O
0042040 R 1 2 Q F O R M A T - E R R
0042060 O R ) \r N I L \r ( 5 1 4 Q "
0042100 S y n t a x e r r o r " 4 6
0042120 2 Q ( | \ ] ) 4 4 7 Q | \
0042140 ] 3 7 2 Q ( | \ ; | \ ] )
0042160 3 6 2 Q " S y n t a x e r
0042200 r o r " 3 2 6 Q | \ ] 3 1
0042220 4 Q " P a r a m e t e r s n
0042240 o t a l l o w e d " \r 3 0 1
0042260 Q " A t s i g n f l a g n
0042300 o t a l l o w e d " 2 2 3 Q
0042320 ( | \ ; | \ ] ) 2 1 3 Q
0042340 ( | \ ] ) 1 7 4 Q | \ ] 1
0042360 5 5 Q " N o p a r a m e t e
0042400 r s a l l o w e d " 1 4 2 Q
0042420 " A t s i g n f l a g n o
0042440 t a l l o w e d " \r 6 6 Q
0042460 ( | \ ; | \ ] ) 4 5 Q " A
0042500 r g u m e n t t o ~ ~ [ m
0042520 u s t b e i n t e g e r -
0042540 ~ S " 7 " M i s s i n g
0042560 a r g u m e n t " ) \r F O R M A
0042600 T - F U N N Y - C O N D I T I O
0042620 N D 1 \r ( F 1 1 Q * F O R
0042640 M A T - A R G U M E N T S * )
0042660 \0 V \t 001 \0 \0 o \0 \0 \0 \t \0 \0 \t \0 \0
0042700 021 201 \b H 001 271 H 002 Z 001 273 J 002 \ 001 275
0042720 L 002 ^ 001 _ 016 277 N 002 001 _ 020 277 O 016 244
0042740 O 020 241 M 227 o \0 \0 \0 \t \0 \0 277 W 022 265
0042760 \n o \0 \0 \0 \t \0 \0 020 d 001 226 277 I K \n
0043000 \0 \0 020 001 W 022 002 c 022 277 020 \0 ( 1 1 3
0043020 Q S U B - F O R M A T 1 0 1
0043040 Q F O R M A T - E R R O R 6
0043060 5 Q F O R M A T - E R R O R
0043100 1 1 Q \ M V L I S T 6 F O
0043120 R M A T - F I N D - C O M M A N
0043140 D ) \r N I L \r ( 7 6 Q " M i
0043160 s s i n g a r g u m e n t "
0043200 6 2 Q " F l a g s o r a r
0043220 g u m e n t s n o t a l l o
0043240 w e d " 3 ( | \ ] ) ) \r F O
0043260 R M A T - B O O L E A N - C O N
0043300 D I T I O N D 1 \r ( F 2 2 Q
0043320 * F O R M A T - I N D E X *
0043340 F 2 3 Q * F O R M A T - A R
0043360 G U M E N T S * F 2 4 Q *
0043400 F O R M A T - L E N G T H * F
0043420 2 5 Q * F O R M A T - C O N
0043440 T R O L - S T R I N G * ) \0 302
0043460 022 004 \0 \0 o \0 \0 \0 \t \0 \0 \t \0 \0 021 361
0043500 017 021 021 H 001 271 H 002 Z 001 273 J 002 \ 001
0043520 275 L 002 ^ 001 _ 016 277 N 002 001 _ 020 277 M 245
0043540 O 016 242 O 020 227 o \0 \0 \0 \t \0 \0 277 W $
0043560 k 324 c $ W ( 375 363 225 W * W $ 266 206 o
0043600 \0 \0 \0 \t \0 \0 277 W & 265 V o \0 \0 \0 \t
0043620 \0 \0 262 V o \0 \0 \0 \t \0 \0 \t \0 \0 _ 022
0043640 001 _ 024 277 O 022 002 _ 026 001 _ 030 277 O 026 002
0043660 _ 032 001 _ 034 277 O 032 002 _ 036 001 _ 277 O
0043700 036 002 001 _ " 277 O 245 O " 242 O 034 227 o
0043720 \0 \0 \0 \t \0 \0 277 O 024 O 030 \n \0 \0 020 001
0043740 W & 002 c & 277 260 254 I K \n \0 \0 o \0 \0
0043760 \0 \t \0 \0 020 \0 ( 2 7 7 Q F O R M
0044000 A T - F I N D - C O M M A N D
0044020 2 7 0 Q S U B - F O R M A T
0044040 2 5 1 Q S U B - F O R M A T
0044060 2 4 1 Q F O R M A T - E R R O
0044100 R 1 5 1 Q \ M V L I S T 1
0044120 4 6 Q F O R M A T - F I N D -
0044140 C O M M A N D 1 3 5 Q F O R
0044160 M A T - E R R O R 1 2 1 Q F
0044200 O R M A T - E R R O R 7 0 Q
0044220 F O R M A T - E R R O R 1 1 Q
0044240 \ M V L I S T 6 F O R M A
0044260 T - F I N D - C O M M A N D ) \r
0044300 N I L \r ( 2 7 4 Q ( | \ ] )
0044320 2 3 6 Q " F l a g s o r
0044340 p a r a m e t e r s n o t a
0044360 l l o w e d " 1 4 3 Q ( | \
0044400 ] ) 1 3 2 Q " M i s s i n g
0044420 a r g u m e n t " 1 1 6 Q
0044440 " S y n t a x e r r o r " \r
0044460 6 5 Q " F l a g s o r p a
0044500 r a m e t e r s n o t a l l
0044520 o w e d " 3 ( | \ ; ) ) \r F
0044540 O R M A T - C O N D I T I O N
0044560 D 1 \r ( L ( 2 P A R M S 1
0044600 A T S I G N 0 C O L O N )
0044620 F 0 * F O R M A T - I N D
0044640 E X * F 1 * F O R M A T -
0044660 A R G U M E N T S * F 2 *
0044700 F O R M A T - L E N G T H * F
0044720 3 * F O R M A T - C O N T R
0044740 O L - S T R I N G * ) \0 M \0 004
0044760 \0 003 B 265 021 P k 324 c \0 R 375 363 262 037 S
0045000 P 266 260 ! 001 B 002 b 004 277 Q 032 c 002 277 B
0045020 262 345 o \0 \0 \0 \t \0 \0 277 260 333 o \0 \0 \0
0045040 \t \0 \0 277 @ 235 A 227 o \0 \0 \0 \t \0 \0 277
0045060 \b \0 \0 020 A 223 \b \0 \0 020 \b \0 \0 020 \0 (
0045100 1 1 2 Q F O R M A T - U N T A
0045120 G G E D - C O N D I T I O N 1
0045140 0 6 Q F O R M A T - F U N N Y
0045160 - C O N D I T I O N 1 0 0 Q
0045200 F O R M A T - B O O L E A N - C
0045220 O N D I T I O N 7 4 Q F O R
0045240 M A T - E R R O R 6 0 Q F O
0045260 R M A T - E R R O R 4 6 Q F
0045300 O R M A T - E R R O R ) \r N I L
0045320 \r ( 7 1 Q " ~ ~ : @ [ u n
0045340 d e f i n e d " 5 5 Q " S y
0045360 n t a x e r r o r " 4 3 Q
0045400 " T o o m a n y p a r a m e
0045420 t e r s t o ~ [ " ) \r F O R
0045440 M A T - I T E R A T I O N A 0 0
0045460 0 1 A 0 0 0 2 D 1 \r ( L ( 0
0045500 C ) F 0 C O N D I T I O
0045520 N - C A S E 0 4 5 6 ) \0 017 \0 001
0045540 \0 001 @ c \0 g \0 \0 h \t \0 \0 \n \0 \0 020
0045560 \0 ( 1 4 Q \ D O - T H R O W
0045600 1 1 Q \ M V L I S T ) \r ( 5
0045620 C O N D I T I O N - C A S E 0 4
0045640 5 8 ) \r ( ) \r F O R M A T - I T
0045660 E R A T I O N A 0 0 0 1 D 1 \r
0045700 ( P 3 * F O R M A T - I N D
0045720 E X * P 2 * F O R M A T -
0045740 L E N G T H * P 1 * F O R
0045760 M A T - C O N T R O L - S T R I
0046000 N G * P 0 * C O N D I T I
0046020 O N - H A N D L E R - B I N D I
0046040 N G S * F 4 * C O N D I T
0046060 I O N - H A N D L E R - B I N D
0046100 I N G S * F 5 S T R I N G
0046120 F 6 M A X - I T E R F
0046140 7 E N D - C O L O N F 1 0
0046160 Q C O L O N F 1 1 Q A T
0046200 S I G N ) \0 ( 004 006 \0 \0 g \0 \0 g
0046220 \0 \0 032 T 032 021 001 \0 U d \t \0 \0 j 021 003
0046240 003 j J V W 020 W 022 W 016 \r 006 \0 \0 022 \t
0046260 \0 \0 020 \0 ( 4 5 Q \ M V L I S T
0046300 4 1 Q F O R M A T - D O - I
0046320 T E R A T I O N 2 0 Q C L :
0046340 L E N G T H ) \r ( 5 F O R M A
0046360 T - I T E R A T I O N A 0 0 0 1
0046400 A 0 0 0 2 2 F O R M A T - E
0046420 R R O R ) \r ( ) \r F O R M A T -
0046440 I T E R A T I O N D 1 \r ( L
0046460 ( 2 P A R M S ) P 1 6 Q
0046500 C O N D I T I O N - C A S E 0 4
0046520 5 6 P 1 5 Q S T R I N G
0046540 P 1 4 Q S T R I N G P 1
0046560 3 Q S T R I N G P 1 2 Q
0046600 E N D - C O L O N P 0 M A
0046620 X - I T E R I 1 A T S I G
0046640 N I 0 C O L O N F 1 7
0046660 Q * F O R M A T - I N D E X *
0046700 F 2 0 Q * F O R M A T - A
0046720 R G U M E N T S * F 2 1 Q
0046740 * F O R M A T - C O N T R O L -
0046760 S T R I N G * F 2 2 Q * F
0047000 O R M A T - L E N G T H * ) \0
0047020 363 017 004 \0 003 B 230 B 001 B 002 b 004 277 265 004
0047040 m 377 021 221 \t B 227 o \0 \0 \0 \t \0 \0 277 W
0047060 036 k 324 c 036 W $ 375 363 225 W " W 036 266 206
0047100 o \0 \0 \0 \t \0 \0 277 o \0 \0 \0 \t \0 \0 \t
0047120 \0 \0 271 021 020 \n I 001 272 I 002 [ 001 274 K 002
0047140 ] 001 276 M 002 _ 016 001 _ 024 277 O 016 002 001 241
0047160 N 227 o \0 \0 \0 \t \0 \0 277 J d L \n \0 \0
0047200 262 | 277 W 265 024 o \0 \0 \0 \t \0 \0 021 001
0047220 \v O 026 \t \0 \0 232 h 211 001 W 002 c 277
0047240 260 356 i 227 o \0 \0 \0 \t \0 \0 277 O 026 021 001
0047260 \f O 030 \t \0 \0 222 O 030 207 O 030 g \0 \0 \n
0047300 \0 \0 021 021 016 g \0 \0 g \0 \0 \n \0 \0 _ 020
0047320 277 O 034 265 \b O 020 \t \0 \0 020 _ 022 277 g \0
0047340 \0 g \0 \0 o \0 \0 \0 W " W 036 k 324 h 032
0047360 032 032 O 022 \t \0 \0 032 \v \0 \0 020 L H @ A
0047400 O 024 \r 006 \0 \0 020 \0 ( 3 6 0 Q F O
0047420 R M A T - D O - I T E R A T I O
0047440 N 3 4 5 Q C L : E R R O R
0047460 3 4 1 Q F O R M A T - E R R O
0047500 R - A R G S 3 0 4 Q V A L U
0047520 E S - L I S T 2 7 0 Q \ C A
0047540 T C H - F U N C A L L 2 5 4 Q
0047560 C O E R C E 2 4 0 Q S I M
0047600 P L E - S T R I N G - P 2 2 5
0047620 Q F O R M A T - E R R O R 2
0047640 0 0 Q C L : S T R I N G P 1
0047660 7 0 Q F O R M A T - E R R O R
0047700 1 5 2 Q % % = 1 4 3 Q F
0047720 O R M A T - E R R O R 7 4 Q
0047740 \ M V L I S T 7 1 Q F O R M
0047760 A T - F I N D - C O M M A N D
0050000 6 1 Q F O R M A T - E R R O R
0050020 3 0 Q F O R M A T - E R R O
0050040 R ) \r ( 3 1 6 Q : A R G S 3
0050060 1 3 Q F O R M A T - E R R O R
0050100 2 6 5 Q F O R M A T - I T E
0050120 R A T I O N A 0 0 0 1 2 6 2 Q
0050140 C O N D I T I O N - C A S E 0
0050160 4 5 8 2 5 1 Q S I M P L E -
0050200 S T R I N G ) \r ( 3 2 2 Q "
0050220 W h i l e p r o c e s s i n g
0050240 i n d i r e c t c o n t r o
0050260 l s t r i n g ~ % % ~ S ~ % %
0050300 ~ V @ T ^ " 2 2 2 Q " C o n
0050320 t r o l s t r i n g i s n
0050340 o t a s t r i n g " 1 6 5
0050360 Q \r " M i s s i n g a r g u
0050400 m e n t " 1 4 0 Q " I l l e
0050420 g a l t e r m i n a t o r f
0050440 o r ~ ~ { " 6 6 Q ( | \ }
0050460 ) 5 6 Q " S y n t a x e r
0050500 r o r " 2 5 Q " T o o m a
0050520 n y p a r a m e t e r s " ) \r
0050540 F O R M A T - D O - I T E R A T
0050560 I O N A 0 0 0 1 A 0 0 0 2 A 0 0
0050600 0 3 D 1 \r ( P 0 * F O R M
0050620 A T - A R G U M E N T S * F
0050640 1 * F O R M A T - A R G U M E
0050660 N T S * F 2 C O L O N F
0050700 3 S T A R T F 4 E N D
0050720 ) \0 1 001 004 \0 \0 R 262 ) Q 265 024 o \0
0050740 \0 \0 \t \0 \0 021 001 \0 H 262 031 H 003 231 h 210
0050760 001 Q 002 c 002 277 260 357 i 227 o \0 \0 \0 \t \0
0051000 \0 277 S T \n \0 \0 020 \0 ( 5 6 Q S U
0051020 B - F O R M A T 5 0 Q F O R
0051040 M A T - E R R O R 1 4 Q F O
0051060 R M A T - E R R O R ) \r N I L \r
0051100 ( 4 5 Q " A r g u m e n t
0051120 m u s t b e a l i s t "
0051140 1 1 Q " M i s s i n g a r g
0051160 u m e n t " ) \r F O R M A T - D
0051200 O - I T E R A T I O N A 0 0 0 1
0051220 A 0 0 0 2 A 0 0 0 4 D 1 \r ( P
0051240 0 * F O R M A T - A R G U M
0051260 E N T S * F 1 * F O R M A
0051300 T - A R G U M E N T S * F 2
0051320 C O L O N F 3 S T A R T
0051340 F 4 E N D ) \0 1 001 004 \0 \0
0051360 R 262 ) Q 265 024 o \0 \0 \0 \t \0 \0 021 001 \0
0051400 H 262 031 H 003 231 h 210 001 Q 002 c 002 277 260 357
0051420 i 227 o \0 \0 \0 \t \0 \0 277 S T \n \0 \0 020
0051440 \0 ( 5 6 Q S U B - F O R M A T
0051460 5 0 Q F O R M A T - E R R O
0051500 R 1 4 Q F O R M A T - E R R
0051520 O R ) \r N I L \r ( 4 5 Q " A
0051540 r g u m e n t m u s t b e
0051560 a l i s t o f l i s t s "
0051600 1 1 Q " M i s s i n g a r
0051620 g u m e n t " ) \r F O R M A T -
0051640 D O - I T E R A T I O N A 0 0 0
0051660 1 A 0 0 0 2 D 1 \r ( P 1 *
0051700 F O R M A T - A R G U M E N T S
0051720 * F 3 * F O R M A T - A R
0051740 G U M E N T S * F 4 M A X
0051760 - I T E R F 5 A T - L E A
0052000 S T - O N C E - P F 6 A T
0052020 S I G N ) \0 { 003 004 \0 \0 V 262 , j
0052040 021 001 \0 H T \n \0 \0 255 S 255 H j \n \0 \0
0052060 223 U 221 h 200 i 221 h 020 g \0 \0 g \0 \0 \n
0052100 \0 \0 277 H k 324 X 260 335 S 265 024 o \0 \0 \0
0052120 \t \0 \0 021 021 002 I 262 031 I 003 231 h 210 001 S
0052140 002 c 006 277 260 357 i 227 o \0 \0 \0 \t \0 \0 277
0052160 j Z T \n \0 \0 263 301 I 254 J j \n \0 \0 223
0052200 U 221 h 200 i 263 262 g \0 \0 g \0 \0 \n \0 \0
0052220 277 J k 324 260 335 \0 ( 1 6 3 Q \ C A
0052240 T C H - F U N C A L L 1 4 2 Q
0052260 % % = 1 3 1 Q % % = 1 2
0052300 2 Q F O R M A T - E R R O R
0052320 6 6 Q F O R M A T - E R R O R
0052340 4 5 Q \ C A T C H - F U N C
0052360 A L L 2 3 Q % % = 1 3 Q
0052400 % % = ) \r ( 1 6 0 Q F O R M A
0052420 T - D O - I T E R A T I O N A 0
0052440 0 0 1 A 0 0 0 2 A 0 0 0 4 1 5
0052460 5 Q F O R M A T - E S C A P E
0052500 4 2 Q F O R M A T - D O - I
0052520 T E R A T I O N A 0 0 0 1 A 0 0
0052540 0 2 A 0 0 0 3 3 7 Q F O R M
0052560 A T - E S C A P E ) \r ( 1 1 7
0052600 Q " A r g u m e n t m u s t
0052620 b e a l i s t " 6 3 Q
0052640 " M i s s i n g a r g u m e n
0052660 t " ) \r F O R M A T - D O - I T
0052700 E R A T I O N A 0 0 0 1 D 1 \r
0052720 N I L \0 \v \0 \0 \0 \0 g \0 \0 g \0 \0
0052740 \n \0 \0 020 \0 ( 1 0 Q \ C A T C H
0052760 - F U N C A L L ) \r ( 5 F O R
0053000 M A T - D O - I T E R A T I O N
0053020 A 0 0 0 1 A 0 0 0 2 2 F O R
0053040 M A T - E S C A P E ) \r ( ) \r F
0053060 O R M A T - D O - I T E R A T I
0053100 O N D 1 \r ( I 5 A T - L E
0053120 A S T - O N C E - P I 4 A
0053140 T S I G N I 3 C O L O N
0053160 I 2 M A X - I T E R I 1
0053200 E N D I 0 S T A R T )
0053220 \0 \v \0 \0 \0 006 g \0 \0 g \0 \0 \n \0 \0 020
0053240 \0 ( 1 0 Q \ C A T C H - F U N
0053260 C A L L ) \r ( 5 F O R M A T -
0053300 D O - I T E R A T I O N A 0 0 0
0053320 1 2 F O R M A T - C O L O N
0053340 - E S C A P E ) \r ( ) \r F O R M
0053360 A T - G E T - T R A I L I N G -
0053400 S E G M E N T S A 0 0 0 1 D 1
0053420 \r ( P 0 * S T A N D A R D -
0053440 O U T P U T * F 1 P R E V
0053460 F 2 T I L D E ) \0 027 001 002
0053500 \0 \0 \b \0 \0 021 001 \0 Q R \n \0 \0 H \t \0
0053520 \0 g \0 \0 \n \0 \0 020 \0 ( 2 4 Q C O
0053540 E R C E 1 6 Q G E T - O U T
0053560 P U T - S T R E A M - S T R I N
0053600 G 1 2 Q S U B - F O R M A T
0053620 2 M A K E - S T R I N G - O
0053640 U T P U T - S T R E A M ) \r ( 2
0053660 1 Q S I M P L E - S T R I N G
0053700 ) \r ( ) \r F O R M A T - G E T -
0053720 T R A I L I N G - S E G M E N T
0053740 S D 1 \r ( P 3 T I L D E
0053760 P 1 P R E V F 2 1 Q *
0054000 F O R M A T - I N D E X * F
0054020 2 2 Q * F O R M A T - L E N G
0054040 T H * F 2 3 Q * F O R M A
0054060 T - C O N T R O L - S T R I N G
0054100 * ) \0 300 021 003 \0 \0 W " k 324 c " W
0054120 $ 375 363 225 W & W " 266 206 o \0 \0 \0 \t \0
0054140 \0 277 o \0 \0 \0 \t \0 \0 \t \0 \0 021 361 017 021
0054160 020 020 H 001 271 H 002 Z 001 273 J 002 \ 001 275 L
0054200 002 ^ 001 _ 016 277 N 002 _ 020 001 _ 022 277 O 020
0054220 002 001 _ 024 277 M 227 o \0 \0 \0 \t \0 \0 277 O
0054240 016 242 O 022 227 o \0 \0 \0 \t \0 \0 277 g \0 \0
0054260 g \0 \0 \n \0 \0 _ 026 264 J O 024 o \0 \0 \0
0054300 360 262 3 \b \0 \0 \t \0 \0 _ 030 001 _ 032 277 O
0054320 030 002 _ 034 001 _ 036 277 O 034 002 001 _ 277 O
0054340 026 O 032 032 O 036 k 324 O O 026 \t \0 \0 324
0054360 \v \0 \0 020 O 026 h 032 k O 026 \t \0 \0 \v \0
0054400 \0 020 j d \v \0 \0 020 \0 ( 2 7 5 Q V
0054420 A L U E S 2 6 7 Q V A L U E
0054440 S 2 6 4 Q C L : L E N G T H
0054460 2 5 1 Q V A L U E S 2 4 5
0054500 Q C L : L E N G T H 1 7 7 Q
0054520 \ M V L I S T 1 7 4 Q F O
0054540 R M A T - G E T - T R A I L I N
0054560 G - S E G M E N T S 1 5 4 Q
0054600 \ C A T C H - F U N C A L L 1
0054620 4 2 Q F O R M A T - E R R O R
0054640 1 2 4 Q F O R M A T - E R R
0054660 O R 4 2 Q \ M V L I S T 3
0054700 7 Q F O R M A T - F I N D - C
0054720 O M M A N D 2 7 Q F O R M A
0054740 T - E R R O R ) \r ( 1 5 1 Q F
0054760 O R M A T - G E T - T R A I L I
0055000 N G - S E G M E N T S A 0 0 0 1
0055020 1 4 6 Q F O R M A T - E S C
0055040 A P E ) \r ( 1 6 6 Q | \ ;
0055060 1 3 7 Q " F l a g s a n d
0055100 p a r a m e t e r s n o t a
0055120 l l o w e d " 1 2 1 Q " ~ ~
0055140 : ; a l l o w e d o n l y
0055160 a f t e r f i r s t s e g m
0055200 e n t i n ~ ~ < " \r 3 4 Q
0055220 ( | \ ; | \ > ) 2 4 Q "
0055240 S y n t a x e r r o r " ) \r F
0055260 O R M A T - G E T - S E G M E N
0055300 T S D 1 \r ( P 2 1 Q * S T
0055320 A N D A R D - O U T P U T * )
0055340 \0 270 022 \0 \0 \0 o \0 \0 \0 \t \0 \0 \t \0 \0
0055360 021 361 017 021 020 020 H 001 271 H 002 Z 001 273 J 002
0055400 \ 001 275 L 002 ^ 001 _ 016 277 N 002 _ 020 001 _
0055420 022 277 O 020 002 001 _ 024 277 O 022 227 o \0 \0 \0
0055440 \t \0 \0 277 \b \0 \0 021 001 021 I K \n \0 \0 277
0055460 O " \t \0 \0 g \0 \0 \n \0 \0 022 _ 026 277 O
0055500 024 o \0 \0 \0 360 264 G \b \0 \0 \t \0 \0 _ 030
0055520 001 _ 032 277 O 030 002 _ 034 001 _ 036 277 O 034 002
0055540 001 _ 277 O 016 264 020 O 026 M O 032 O 036 O
0055560 \r 005 \0 \0 020 d O 026 O 032 032 O 036 k 324
0055600 O 026 \t \0 \0 O 324 \r 005 \0 \0 020 d O 026
0055620 h 032 k O 026 \t \0 \0 \r 005 \0 \0 020 \0 ( 2
0055640 6 5 Q V A L U E S 2 6 1 Q
0055660 C L : L E N G T H 2 4 5 Q V
0055700 A L U E S 2 3 6 Q C L : L E
0055720 N G T H 2 1 6 Q V A L U E S
0055740 1 4 7 Q \ M V L I S T 1 4
0055760 4 Q F O R M A T - G E T - T R
0056000 A I L I N G - S E G M E N T S
0056020 1 2 4 Q C O E R C E 1 1 6 Q
0056040 G E T - O U T P U T - S T R E
0056060 A M - S T R I N G 1 1 0 Q S
0056100 U B - F O R M A T 1 0 0 Q M
0056120 A K E - S T R I N G - O U T P U
0056140 T - S T R E A M 7 4 Q F O R
0056160 M A T - E R R O R 1 1 Q \ M
0056200 V L I S T 6 F O R M A T - F
0056220 I N D - C O M M A N D ) \r ( 1 2
0056240 1 Q S I M P L E - S T R I N G
0056260 ) \r ( 1 3 6 Q | \ ; 7 1 Q
0056300 " A t s i g n f l a g n o
0056320 t a l l o w e d " 3 ( | \
0056340 ; | \ > ) ) \r M A K E - P A D
0056360 - S E G S D 1 \r ( L ( 1 P
0056400 A D D I N G S 0 S P A C E S
0056420 ) ) \0 N 005 \0 \0 002 021 P 004 @ A \n \0
0056440 \0 272 @ A J 326 325 273 A \ j 360 263 ' L 005
0056460 003 265 035 K \t \0 \0 264 021 j k 006 \0 \0 \n \0
0056500 \0 L K \n \0 \0 375 363 X 232 J k 324 207 \t \0
0056520 \0 262 342 I 020 J I 032 271 H 223 K k 325 200 K
0056540 273 L k 325 260 305 \0 ( 6 7 Q \ F Z E
0056560 R O P 5 4 Q % % / 4 7 Q
0056600 R A N D 3 5 Q P L U S P 7
0056620 T R U N C A T E ) \r ( 4 4 Q
0056640 F L O A T P ) \r ( ) \r F O R M A
0056660 T - R O U N D - C O L U M N S
0056700 D 1 \r ( L ( 2 C O L I N C
0056720 1 M I N C O L 0 W I D T H
0056740 ) ) \0 022 \0 \0 \0 003 @ d A 363 220 020 B
0056760 A @ 325 B \n \0 \0 326 324 020 \0 ( 1 5 Q
0057000 C E I L I N G ) \r N I L \r ( ) \r
0057020 F O R M A T - J U S T I F I C A
0057040 T I O N D 1 \r ( L ( 2 P A
0057060 R M S 1 A T S I G N 0 C
0057100 O L O N ) F 3 0 Q * F O R
0057120 M A T - I N D E X * F 3 1 Q
0057140 * F O R M A T - L E N G T H *
0057160 F 3 2 Q * F O R M A T - C
0057200 O N T R O L - S T R I N G * F
0057220 3 3 Q * S T A N D A R D - O
0057240 U T P U T * ) 001 335 030 004 \0 003 B 230
0057260 B 001 B 002 b 004 277 265 003 j B 230 B 001 B 002
0057300 b 004 277 265 003 k B 230 B 001 B 002 b 004 277 265
0057320 003 j B 230 B 001 B 002 b 004 277 265 006 o \0 \0
0057340 \0 021 364 022 021 P 027 B 227 o \0 \0 \0 \t \0 \0
0057360 277 H 3 221 h 200 i 243 j H 363 230 o \0 \0
0057400 \0 H \n \0 \0 277 I 3 221 h 200 i 250 I \t
0057420 \0 \0 221 h 200 i 230 o \0 \0 \0 I \n \0 \0 277
0057440 J 3 221 h 200 i 243 j J 363 230 o \0 \0 \0
0057460 J \n \0 \0 277 K 303 \0 \0 221 h 200 i 230 o \0
0057500 \0 \0 K \n \0 \0 277 W 0 k 324 c 0 W 2 375
0057520 363 225 W 4 W 0 266 206 o \0 \0 \0 \t \0 \0 277
0057540 \b \0 \0 \t \0 \0 \ 001 275 L 002 ^ 001 _ 016 277
0057560 N 002 _ 020 001 _ 022 277 O 020 002 _ 024 001 _ 026
0057600 277 O 024 002 001 _ 030 277 @ 246 O 026 k \n \0 \0
0057620 221 k 200 j O 026 k 325 A 221 k 200 j 324 324 _
0057640 032 277 O 030 J O 032 326 324 H I \v \0 \0 _ 034
0057660 277 @ 246 O 026 k \n \0 \0 221 h 203 o \0 \0 \0
0057700 O 034 O 030 325 O 032 \n \0 \0 A 221 h 203 o \0
0057720 \0 \0 \n \0 \0 \n \0 \0 _ 036 277 M 262 N O 016
0057740 232 O 016 001 O 016 002 _ 016 277 265 003 j O 016 232
0057760 O 016 001 O 016 002 _ 016 277 265 \t \b \0 \0 265 004
0060000 l H _ " 277 _ 277 O 016 227 o \0 \0 \0 \t
0060020 \0 \0 277 W 6 \t \0 \0 265 003 j O 034 O 324
0060040 324 O " 363 224 M \t \0 \0 277 O 022 O 036 _ &
0060060 277 _ $ 263 & O & 001 j _ * 277 _ ( 277 O
0060100 ( O * 363 221 h 200 i 221 h 020 K \t \0 \0 277
0060120 O * k 324 _ * 277 260 350 O & 001 j _ . 277
0060140 _ , 277 O , O . 363 221 h 200 i 255 K \t \0
0060160 \0 277 O . k 324 _ . 277 260 352 O $ 001 \t \0
0060200 \0 277 O $ 002 O & 002 260 246 \0 ( 7 2 2 Q
0060220 W R I T E - S T R I N G 7 0
0060240 2 Q W R I T E - C H A R 6 4
0060260 0 Q W R I T E - C H A R 5 7
0060300 2 Q W R I T E - S T R I N G
0060320 5 5 1 Q C H A R P O S 5 4 3
0060340 Q F O R M A T - E R R O R 5
0060360 1 7 Q L I N E - L E N G T H
0060400 4 5 1 Q \ A P P E N D 2 4 4
0060420 6 Q \ A P P E N D 2 4 3 3 Q
0060440 M A K E - P A D - S E G S 4
0060460 1 2 Q % % = 3 7 7 Q F O R
0060500 M A T - R O U N D - C O L U M N
0060520 S 3 4 1 Q % % = 2 6 7 Q
0060540 \ M V L I S T 2 6 4 Q F O R
0060560 M A T - G E T - S E G M E N T S
0060600 2 6 0 Q F O R M A T - E R R
0060620 O R 2 2 7 Q F O R M A T - E
0060640 R R O R 2 0 5 Q F O R M A T
0060660 - E R R O R 1 6 0 Q F O R M
0060700 A T - E R R O R 1 4 3 Q P L
0060720 U S P 1 2 6 Q F O R M A T -
0060740 E R R O R 1 0 1 Q F O R M A
0060760 T - E R R O R ) \r ( 2 1 2 Q C
0061000 H A R A C T E R ) \r ( 5 4 0 Q
0061020 " T o o m a n y p a r a m
0061040 e t e r s " 4 4 3 Q ( 0 )
0061060 4 2 1 Q ( 0 ) 2 5 5 Q " S
0061100 y n t a x e r r o r " 2 2 3
0061120 Q " P a d c h a r m u s t
0061140 b e a c h a r a c t e r -
0061160 ~ S " \r 2 0 1 Q " M i n p
0061200 a d m u s t b e a n o n
0061220 - n e g a t i v e i n t e g e
0061240 r - ~ S " 1 5 4 Q " C o
0061260 l i n c m u s t b e a p
0061300 o s i t i v e i n t e g e r
0061320 - ~ S " 1 2 2 Q " M i n c
0061340 o l m u s t b e a n o n
0061360 - n e g a t i v e i n t e g e
0061400 r - ~ S " \r 7 6 Q " T o
0061420 o m a n y p a r a m e t e r
0061440 s " 6 2 Q | \ S p a c e ) \r
0061460 F O R M A T - T E R P R I D 1
0061500 \r ( L ( 2 P A R M S 1 A
0061520 T S I G N 0 C O L O N ) F
0061540 3 * S T A N D A R D - O U T
0061560 P U T * ) \0 ? 003 001 \0 003 @ 241 A 227
0061600 o \0 \0 \0 \t \0 \0 277 B 230 B 001 B 002 b 004
0061620 277 265 003 k 021 ! 002 B 227 o \0 \0 \0 \t \0 \0
0061640 277 H j 272 271 I J 363 221 h 200 i 221 h 020 S
0061660 \t \0 \0 277 J k 324 272 260 355 \0 ( 6 6 Q
0061700 T E R P R I 4 3 Q F O R M A
0061720 T - E R R O R 1 2 Q F O R M
0061740 A T - E R R O R ) \r N I L \r (
0061760 4 0 Q " T o o m a n y p a
0062000 r a m e t e r s " 7 " F l a
0062020 g s n o t a l l o w e d " )
0062040 \r F O R M A T - F R E S H L I N
0062060 E D 1 \r ( L ( 2 P A R M S
0062100 1 A T S I G N 0 C O L O
0062120 N ) F 3 * S T A N D A R D
0062140 - O U T P U T * ) \0 E 003 001 \0 003
0062160 @ 241 A 227 o \0 \0 \0 \t \0 \0 277 B 230 B 001
0062200 B 002 b 004 277 265 003 k 021 ! 002 B 227 o \0 \0
0062220 \0 \t \0 \0 277 S \t \0 \0 H k 325 j 272 271 I
0062240 J 363 221 h 200 i 221 h 020 S \t \0 \0 277 J k
0062260 324 272 260 355 \0 ( 7 4 Q T E R P R I
0062300 5 0 Q F R E S H - L I N E
0062320 4 3 Q F O R M A T - E R R O R
0062340 1 2 Q F O R M A T - E R R O
0062360 R ) \r N I L \r ( 4 0 Q " T o
0062400 o m a n y p a r a m e t e r
0062420 s " 7 " F l a g s n o t
0062440 a l l o w e d " ) \r F O R M A T
0062460 - P A G E D 1 \r ( L ( 2 P
0062500 A R M S 1 A T S I G N 0
0062520 C O L O N ) ) \0 B 003 \0 \0 003 @ 241
0062540 A 227 o \0 \0 \0 \t \0 \0 277 B 230 B 001 B 002
0062560 b 004 277 265 003 k 021 ! 002 B 227 o \0 \0 \0 \t
0062600 \0 \0 277 H j 272 271 I J 363 221 h 200 i 221 h
0062620 020 o \0 \0 \0 \t \0 \0 277 J k 324 272 260 352 \0
0062640 ( 7 1 Q W R I T E - C H A R
0062660 4 3 Q F O R M A T - E R R O R
0062700 1 2 Q F O R M A T - E R R O
0062720 R ) \r N I L \r ( 6 6 Q | \ P
0062740 a g e 4 0 Q " T o o m a n
0062760 y p a r a m e t e r s " 7
0063000 " F l a g s n o t a l l o w
0063020 e d " ) \r F O R M A T - T I L D
0063040 E D 1 \r ( L ( 2 P A R M S
0063060 1 A T S I G N 0 C O L O
0063100 N ) ) \0 B 003 \0 \0 003 @ 241 A 227 o \0
0063120 \0 \0 \t \0 \0 277 B 230 B 001 B 002 b 004 277 265
0063140 003 k 021 ! 002 B 227 o \0 \0 \0 \t \0 \0 277 H
0063160 j 272 271 I J 363 221 h 200 i 221 h 020 o \0 \0
0063200 \0 \t \0 \0 277 J k 324 272 260 352 \0 ( 7 1 Q
0063220 W R I T E - C H A R 4 3 Q
0063240 F O R M A T - E R R O R 1 2 Q
0063260 F O R M A T - E R R O R ) \r N
0063300 I L \r ( 6 6 Q | \ ~ 4 0 Q
0063320 " T o o m a n y p a r a m
0063340 e t e r s " 7 " F l a g s
0063360 n o t a l l o w e d " ) \r F O
0063400 R M A T - E A T - W H I T E S P
0063420 A C E D 1 \r ( F 0 * F O R
0063440 M A T - I N D E X * F 1 *
0063460 F O R M A T - C O N T R O L - S
0063500 T R I N G * F 2 * F O R M
0063520 A T - L E N G T H * ) \0 1 \0 003
0063540 \0 \0 P k 324 c \0 R 375 363 223 Q P 266 206 o
0063560 \0 \0 \0 \t \0 \0 277 g \0 \0 \t \0 \0 Q g \0
0063600 \0 P \f \0 \0 265 \t Q \t \0 \0 c \0 020 k 325
0063620 260 373 \0 ( 5 0 Q C L : L E N G T
0063640 H 4 2 Q P O S I T I O N - I
0063660 F - N O T 3 2 Q S Y M B O L
0063700 - F U N C T I O N 2 3 Q F O
0063720 R M A T - E R R O R ) \r ( 3 6 Q
0063740 : S T A R T 2 7 Q W H I T
0063760 E S P A C E - C H A R - P ) \r (
0064000 2 0 Q " S y n t a x e r r
0064020 o r " ) \r F O R M A T - N E W L
0064040 I N E D 1 \r ( L ( 2 P A R
0064060 M S 1 A T S I G N 0 C O
0064100 L O N ) F 0 * S T A N D A
0064120 R D - O U T P U T * ) \0 " \0 001
0064140 \0 003 B 227 o \0 \0 \0 \t \0 \0 277 @ 232 A 264
0064160 \t o \0 \0 \0 \t \0 \0 020 A 223 P \t \0 \0 \b
0064200 \0 \0 020 \0 ( 3 7 Q F O R M A T -
0064220 E A T - W H I T E S P A C E 3
0064240 4 Q T E R P R I 2 5 Q F O
0064260 R M A T - E R R O R 1 0 Q F
0064300 O R M A T - E R R O R ) \r N I L
0064320 \r ( 2 2 Q " ~ : @ < n e w l
0064340 i n e > i s u n d e f i n e
0064360 d " 5 " P a r a m e t e r s
0064400 n o t a l l o w e d " ) \r F
0064420 O R M A T - P L U R A L D 1 \r
0064440 ( L ( 2 P A R M S 1 A T
0064460 S I G N 0 C O L O N ) F
0064500 1 * F O R M A T - A R G U M E
0064520 N T S * F 2 * F O R M A T
0064540 - O R I G I N A L - A R G U M E
0064560 N T S * ) \0 d 001 002 \0 003 B 227 o \0
0064600 \0 \0 \t \0 \0 277 @ 262 $ R \t \0 \0 Q \t \0
0064620 \0 325 k 325 021 001 \0 j H 363 227 o \0 \0 \0 \t
0064640 \0 \0 206 H R \n \0 \0 c 002 023 Q 265 024 o \0
0064660 \0 \0 \t \0 \0 k : 262 031 A 234 o \0 \0 \0 213
0064700 001 Q 002 c 002 277 260 357 o \0 \0 \0 \t \0 \0 020
0064720 A 224 o \0 \0 \0 203 o \0 \0 \0 \t \0 \0 020 \0
0064740 ( 1 4 1 Q W R I T E - S T R I
0064760 N G 1 2 2 Q W R I T E - S T
0065000 R I N G 7 0 Q F O R M A T -
0065020 E R R O R 5 3 Q N T H C D R
0065040 4 5 Q F O R M A T - E R R O
0065060 R 2 4 Q C L : L E N G T H
0065100 2 0 Q C L : L E N G T H 1 0
0065120 Q F O R M A T - E R R O R ) \r
0065140 N I L \r ( 1 3 6 Q " s " 1
0065160 3 1 Q " i e s " 1 1 7 Q "
0065200 " 1 0 2 Q " y " 6 5 Q "
0065220 M i s s i n g a r g u m e n t
0065240 " 4 2 Q " N o p r e v i o
0065260 u s a r g u m e n t " 5 "
0065300 P a r a m e t e r s n o t a
0065320 l l o w e d " ) \r F O R M A T -
0065340 S K I P - A R G U M E N T S D
0065360 1 \r ( L ( 2 P A R M S 1
0065400 A T S I G N 0 C O L O N )
0065420 F 2 * F O R M A T - A R G U
0065440 M E N T S * F 3 * F O R M
0065460 A T - O R I G I N A L - A R G U
0065500 M E N T S * ) \0 r 002 002 \0 003 B 230
0065520 B 001 B 002 b 004 277 265 003 k 021 021 001 B 227 o
0065540 \0 \0 \0 \t \0 \0 277 A 262 035 j H 363 246 H S
0065560 \t \0 \0 363 227 o \0 \0 \0 \t \0 \0 277 H S \n
0065600 \0 \0 c 004 020 @ 262 " S \t \0 \0 R \t \0 \0
0065620 325 H 325 271 j I 363 227 o \0 \0 \0 \t \0 \0 020
0065640 I S \n \0 \0 c 004 020 H R \t \0 \0 363 227 o
0065660 \0 \0 \0 \t \0 \0 020 H R \n \0 \0 c 004 020 \0
0065700 ( 1 5 5 Q N T H C D R 1 4 7
0065720 Q F O R M A T - E R R O R 1
0065740 3 6 Q C L : L E N G T H 1 2
0065760 6 Q N T H C D R 1 2 0 Q F
0066000 O R M A T - E R R O R 1 0 1 Q
0066020 C L : L E N G T H 7 5 Q C
0066040 L : L E N G T H 6 3 Q N T H
0066060 C D R 5 5 Q F O R M A T - E
0066100 R R O R 4 4 Q C L : L E N G
0066120 T H 2 7 Q F O R M A T - E R
0066140 R O R ) \r N I L \r ( 1 4 4 Q
0066160 " S k i p t o n o n e x i s
0066200 t a n t a r g u m e n t " 1
0066220 1 5 Q " S k i p t o n o n
0066240 e x i s t a n t a r g u m e n
0066260 t " 5 2 Q " I l l e g a l
0066300 t o g o t o n o n - e x i
0066320 s t a n t a r g u m e n t " \r
0066340 2 4 Q " T o o m a n y p
0066360 a r a m e t e r s " ) \r F O R M
0066400 A T - I N D I R E C T I O N A 0
0066420 0 0 1 A 0 0 0 2 D 1 \r ( L (
0066440 0 C ) F 0 C O N D I T I
0066460 O N - C A S E 0 5 0 4 ) \0 017 \0
0066500 001 \0 001 @ c \0 g \0 \0 h \t \0 \0 \n \0 \0
0066520 020 \0 ( 1 4 Q \ D O - T H R O W
0066540 1 1 Q \ M V L I S T ) \r ( 5
0066560 C O N D I T I O N - C A S E 0
0066600 5 0 6 ) \r ( ) \r F O R M A T - I
0066620 N D I R E C T I O N A 0 0 0 1
0066640 D 1 \r ( P 4 * F O R M A T -
0066660 A R G U M E N T S * P 3 *
0066700 F O R M A T - I N D E X * P
0066720 2 * F O R M A T - L E N G T H
0066740 * P 1 * F O R M A T - C O
0066760 N T R O L - S T R I N G * P
0067000 0 * C O N D I T I O N - H A N
0067020 D L E R - B I N D I N G S * F
0067040 5 * F O R M A T - A R G U M
0067060 E N T S * F 6 * C O N D I
0067100 T I O N - H A N D L E R - B I N
0067120 D I N G S * F 7 S T R I N
0067140 G F 1 0 Q A T S I G N )
0067160 \0 A 005 004 \0 \0 g \0 \0 g \0 \0 032 V 032 021
0067200 001 \0 W 016 d \t \0 \0 j 021 003 003 W 020 226 j
0067220 J \n \0 \0 260 025 U 265 027 o \0 \0 \0 \t \0 \0
0067240 021 001 004 j J \n \0 \0 022 022 \t \0 \0 020 001 U
0067260 002 c \n 277 260 354 \0 ( 6 6 Q \ M V L
0067300 I S T 6 1 Q S U B - F O R M
0067320 A T 5 1 Q F O R M A T - E R
0067340 R O R 3 5 Q S U B - F O R M
0067360 A T 2 1 Q C L : L E N G T H
0067400 ) \r ( 5 F O R M A T - I N D I
0067420 R E C T I O N A 0 0 0 1 A 0 0 0
0067440 2 2 F O R M A T - E R R O R
0067460 ) \r ( 4 6 Q " M i s s i n g
0067500 a r g u m e n t " ) \r F O R M
0067520 A T - I N D I R E C T I O N D
0067540 1 \r ( L ( 2 P A R M S 0
0067560 C O L O N ) P 5 C O N D I
0067600 T I O N - C A S E 0 5 0 4 P
0067620 4 S T R I N G P 3 S T R
0067640 I N G P 0 S T R I N G I
0067660 1 A T S I G N F 6 * F
0067700 O R M A T - A R G U M E N T S *
0067720 F 7 * F O R M A T - C O N
0067740 T R O L - S T R I N G * F 1
0067760 0 Q * F O R M A T - I N D E X
0070000 * ) \0 200 006 003 \0 003 @ 227 o \0 \0 \0 \t
0070020 \0 \0 277 B 227 o \0 \0 \0 \t \0 \0 277 V 265 023
0070040 o \0 \0 \0 \t \0 \0 021 ! 002 H \t \0 \0 231 h
0070060 210 001 V 002 c \f 277 260 360 i 227 o \0 \0 \0 \t
0070100 \0 \0 277 H 021 001 003 K \t \0 \0 221 K 206 K g
0070120 \0 \0 \n \0 \0 021 021 005 g \0 \0 g \0 \0 \n \0
0070140 \0 271 M 265 \a I \t \0 \0 020 272 g \0 \0 g \0
0070160 \0 o \0 \0 \0 W 016 W 020 k 324 h 032 032 032 J
0070200 \t \0 \0 032 \v \0 \0 020 \0 ( 1 7 5 Q C
0070220 L : E R R O R 1 7 1 Q F O R
0070240 M A T - E R R O R - A R G S 1
0070260 3 7 Q V A L U E S - L I S T
0070300 1 2 7 Q \ C A T C H - F U N C
0070320 A L L 1 1 3 Q C O E R C E
0070340 1 0 1 Q S I M P L E - S T R I
0070360 N G - P 7 0 Q F O R M A T -
0070400 E R R O R 4 4 Q C L : S T R
0070420 I N G P 3 5 Q F O R M A T -
0070440 E R R O R 2 2 Q F O R M A T
0070460 - E R R O R 1 0 Q F O R M A
0070500 T - E R R O R ) \r ( 1 4 7 Q :
0070520 A R G S 1 4 4 Q F O R M A T
0070540 - E R R O R 1 2 4 Q F O R M
0070560 A T - I N D I R E C T I O N A 0
0070600 0 0 1 1 2 1 Q C O N D I T I
0070620 O N - C A S E 0 5 0 6 1 1 0 Q
0070640 S I M P L E - S T R I N G ) \r
0070660 ( 1 5 3 Q " W h i l e p r
0070700 o c e s s i n g i n d i r e c
0070720 t c o n t r o l s t r i n g
0070740 ~ % % ~ S ~ % % ~ V @ T ^ " 6
0070760 5 Q " I n d i r e c t e d c
0071000 o n t r o l s t r i n g i s
0071020 n o t a s t r i n g " \r
0071040 3 2 Q " M i s s i n g a r g
0071060 u m e n t " 1 7 Q " P a r a
0071100 m e t e r s n o t a l l o w
0071120 e d " 5 " C o l o n m o d
0071140 i f i e r n o t a l l o w e
0071160 d " ) \r F O R M A T - T A B D
0071200 1 \r ( L ( 2 P A R M S 1
0071220 A T S I G N 0 C O L O N )
0071240 F 6 * S T A N D A R D - O U
0071260 T P U T * ) \0 z 006 001 \0 003 B 230 B
0071300 001 B 002 b 004 277 265 003 k B 230 B 001 B 002 b
0071320 004 277 265 003 k 021 B 005 B 227 o \0 \0 \0 \t \0
0071340 \0 277 @ 227 o \0 \0 \0 \t \0 \0 277 V \t \0 \0
0071360 [ 262 ! I A 223 K H 324 200 H I \n \0 \0 326
0071400 272 K J 363 230 I K J 325 I \n \0 \0 201 J K
0071420 325 205 A 221 H 201 l 002 k 325 j 275 274 L M 363
0071440 221 h 200 i 221 h 020 o \0 \0 \0 V \n \0 \0 277
0071460 M k 324 275 260 351 \0 ( 1 6 1 Q W R I
0071500 T E - C H A R 1 1 7 Q R E M
0071520 1 0 1 Q C E I L I N G 6 2
0071540 Q P O S I T I O N 5 5 Q F
0071560 O R M A T - E R R O R 4 3 Q
0071600 F O R M A T - E R R O R ) \r N I
0071620 L \r ( 1 5 5 Q | \ S p a c e
0071640 5 2 Q " T a b - t o i n
0071660 p i x e l u n i t s n o t
0071700 s u p p o r t e d " 4 0 Q "
0071720 T o o m a n y p a r a m e t
0071740 e r s " ) \r F O R M A T - P R I
0071760 N C D 1 \r ( L ( 2 P A R M
0072000 S 1 A T S I G N 0 C O L
0072020 O N ) F 5 * F O R M A T -
0072040 A R G U M E N T S * ) \0 200 005 001
0072060 \0 003 U 265 ! o \0 \0 \0 \t \0 \0 021 001 \0 B
0072100 265 034 H 265 \r @ 264 \n o \0 \0 \0 \t \0 \0 020
0072120 \t \0 \0 020 001 U 002 c \n 277 260 342 001 B 002 b
0072140 004 277 265 003 j B 230 B 001 B 002 b 004 277 265 003
0072160 k B 230 B 001 B 002 b 004 277 265 003 j B 230 B
0072200 001 B 002 b 004 277 265 006 o \0 \0 \0 021 004 004 B
0072220 227 o \0 \0 \0 \t \0 \0 277 H 265 \n @ 264 \a o
0072240 \0 \0 \0 202 \t \0 \0 I J K L A \r 006 \0 \0
0072260 020 \0 ( 1 7 5 Q F O R M A T - W
0072300 R I T E - F I E L D 1 6 4 Q
0072320 P R I N C - T O - S T R I N G
0072340 1 4 5 Q F O R M A T - E R R O
0072360 R 4 0 Q P R I N C 3 4 Q
0072400 W R I T E - S T R I N G 1 1 Q
0072420 F O R M A T - E R R O R ) \r N
0072440 I L \r ( 1 6 0 Q " ( ) " 1
0072460 4 2 Q " T o o m a n y p a
0072500 r a m e t e r s " 1 3 1 Q |
0072520 \ S p a c e 3 1 Q " ( ) "
0072540 6 " M i s s i n g a r g u m
0072560 e n t " ) \r F O R M A T - P R I
0072600 N 1 D 1 \r ( L ( 2 P A R M
0072620 S 1 A T S I G N 0 C O L
0072640 O N ) F 5 * F O R M A T -
0072660 A R G U M E N T S * ) \0 200 005 001
0072700 \0 003 U 265 ! o \0 \0 \0 \t \0 \0 021 001 \0 B
0072720 265 034 H 265 \r @ 264 \n o \0 \0 \0 \t \0 \0 020
0072740 \t \0 \0 020 001 U 002 c \n 277 260 342 001 B 002 b
0072760 004 277 265 003 j B 230 B 001 B 002 b 004 277 265 003
0073000 k B 230 B 001 B 002 b 004 277 265 003 j B 230 B
0073020 001 B 002 b 004 277 265 006 o \0 \0 \0 021 004 004 B
0073040 227 o \0 \0 \0 \t \0 \0 277 H 265 \n @ 264 \a o
0073060 \0 \0 \0 202 \t \0 \0 I J K L A \r 006 \0 \0
0073100 020 \0 ( 1 7 5 Q F O R M A T - W
0073120 R I T E - F I E L D 1 6 4 Q
0073140 P R I N 1 - T O - S T R I N G
0073160 1 4 5 Q F O R M A T - E R R O
0073200 R 4 0 Q C L : P R I N 1 3
0073220 4 Q W R I T E - S T R I N G
0073240 1 1 Q F O R M A T - E R R O R
0073260 ) \r N I L \r ( 1 6 0 Q " ( )
0073300 " 1 4 2 Q " T o o m a n y
0073320 p a r a m e t e r s " 1 3 1
0073340 Q | \ S p a c e 3 1 Q " (
0073360 ) " 6 " M i s s i n g a r
0073400 g u m e n t " ) \r F O R M A T -
0073420 P R I N T - C H A R A C T E R
0073440 D 1 \r ( L ( 2 P A R M S 1
0073460 A T S I G N 0 C O L O N )
0073500 F 1 * F O R M A T - A R G
0073520 U M E N T S * ) \0 D 001 001 \0 003 B
0073540 227 o \0 \0 \0 \t \0 \0 277 Q 265 023 o \0 \0 \0
0073560 \t \0 \0 021 001 \0 H 303 \0 \0 231 h 210 001 Q 002
0073600 c 002 277 260 360 i 227 o \0 \0 \0 \t \0 \0 277 A
0073620 232 @ 221 h 200 i 224 H \t \0 \0 020 H @ \n \0
0073640 \0 020 \0 ( 1 0 1 Q F O R M A T -
0073660 P R I N T - N A M E D - C H A R
0073700 A C T E R 7 3 Q C L : P R I
0073720 N 1 5 6 Q F O R M A T - E R
0073740 R O R 2 3 Q F O R M A T - E
0073760 R R O R 1 0 Q F O R M A T -
0074000 E R R O R ) \r ( 3 2 Q C H A R
0074020 A C T E R ) \r ( 5 3 Q " A r
0074040 g u m e n t m u s t b e a
0074060 c h a r a c t e r " 2 0 Q
0074100 " M i s s i n g a r g u m e n
0074120 t " 5 " T o o m a n y p
0074140 a r a m e t e r s " ) \r F O R M
0074160 A T - P R I N T - N A M E D - C
0074200 H A R A C T E R D 1 \r ( L (
0074220 1 L O N G P 0 C H A R ) )
0074240 \0 t 003 \0 \0 002 @ 006 \0 \0 323 021 001 \0 H
0074260 005 001 264 020 j H 363 221 h 200 i 264 \a ` \0 \0
0074300 H 321 022 021 ! 002 H \t \0 \0 265 016 @ 006 \0 \0
0074320 323 271 j I 363 233 h 212 \t \0 \0 \t \0 \0 \t \0
0074340 \0 020 i 262 2 I l 037 363 221 h 200 i 262 ( o
0074360 \0 \0 \0 \t \0 \0 @ 006 \0 \0 323 l @ 324 Z 005
0074400 001 264 020 j J 363 221 h 200 i 264 \a ` \0 \0 J
0074420 321 \t \0 \0 020 H \t \0 \0 020 \0 ( 1 6 1 Q
0074440 W R I T E - C H A R 1 5 4 Q
0074460 W R I T E - C H A R 1 1 6 Q
0074500 W R I T E - C H A R 7 1 Q
0074520 W R I T E - S T R I N G 6 6 Q
0074540 S T R I N G - C A P I T A L I
0074560 Z E 6 3 Q P R I N C - T O -
0074600 S T R I N G 4 2 Q C H A R -
0074620 N A M E ) \r ( 1 4 7 Q \ C H A
0074640 R H I 1 2 2 Q C H A R A C T
0074660 E R 5 0 Q C H A R A C T E R
0074700 3 0 Q \ C H A R H I 3 C
0074720 H A R A C T E R ) \r ( 1 1 3 Q
0074740 | \ ^ ) \r F O R M A T - A D D
0074760 - C O M M A S D 1 \r ( L ( 1
0075000 C O M M A C H A R 0 S T R
0075020 I N G ) ) \0 212 006 \0 \0 002 @ \t \0 \0
0075040 021 Q 005 H d @ j 266 o \0 \0 \0 : 250 @ j
0075060 266 o \0 \0 \0 : 222 l 002 200 k 325 l 003 \n \0
0075100 \0 324 Y g \0 \0 A \v \0 \0 272 H 273 I 274 K
0075120 \t \0 \0 221 h 200 i 262 036 @ j 266 o \0 \0 \0
0075140 : 250 @ j 266 o \0 \0 \0 : 227 J 275 @ j 266
0075160 M j 267 J 020 J @ g \0 \0 j L l 003 325 \n
0075200 \0 \0 g \0 \0 L g \0 \0 j K l 003 325 \n \0
0075220 \0 g \0 \0 K \r \n \0 \0 272 K l 003 325 273 L
0075240 l 004 325 260 253 \0 ( 1 7 4 Q C L : R
0075260 E P L A C E 1 6 4 Q M A X
0075300 1 4 5 Q M A X 6 6 Q P L U
0075320 S P 5 5 Q M A K E - S T R I
0075340 N G 4 4 Q C L : F L O O R
0075360 3 C L : L E N G T H ) \r ( 1 6
0075400 7 Q : E N D 2 1 5 4 Q : S
0075420 T A R T 2 1 5 0 Q : E N D 1
0075440 1 3 5 Q : S T A R T 1 5 1
0075460 Q : I N I T I A L - E L E M E
0075500 N T ) \r ( 1 1 4 Q | \ - 1
0075520 0 3 Q | \ + 3 0 Q | \ -
0075540 1 7 Q | \ + ) \r F O R M A T -
0075560 W R I T E - F I E L D D 1 \r (
0075600 L ( 5 P A D L E F T 4 P
0075620 A D C H A R 3 M I N P A D
0075640 2 C O L I N C 1 M I N C O
0075660 L 0 S T R I N G ) ) \0 247 006
0075700 \0 \0 006 A 3 221 h 200 i 243 j A 363 230 o
0075720 \0 \0 \0 A \n \0 \0 277 B 3 221 h 200 i 250
0075740 B \t \0 \0 221 h 200 i 230 o \0 \0 \0 B \n \0
0075760 \0 277 C 3 221 h 200 i 243 j C 363 230 o \0
0076000 \0 \0 C \n \0 \0 277 D 303 \0 \0 221 h 200 i 230
0076020 o \0 \0 \0 D \n \0 \0 277 @ \t \0 \0 021 Q 005
0076040 H C 324 A B \v \0 \0 271 E 262 I H 325 j
0076060 273 272 J K 363 221 h 200 i 252 D \t \0 \0 277 K
0076100 k 324 273 260 357 @ \t \0 \0 020 @ \t \0 \0 I H
0076120 325 j 275 274 L M 363 221 h 200 i 221 h 020 D \t
0076140 \0 \0 277 M k 324 275 260 355 \0 ( 2 3 6 Q
0076160 W R I T E - C H A R 2 1 2 Q
0076200 W R I T E - S T R I N G 2 0 5
0076220 Q W R I T E - S T R I N G 1
0076240 7 2 Q W R I T E - C H A R 1
0076260 4 4 Q F O R M A T - R O U N D
0076300 - C O L U M N S 1 3 1 Q C L
0076320 : L E N G T H 1 2 4 Q F O R
0076340 M A T - E R R O R 1 0 2 Q F
0076360 O R M A T - E R R O R 5 5 Q
0076400 F O R M A T - E R R O R 4 0 Q
0076420 P L U S P 2 3 Q F O R M A
0076440 T - E R R O R ) \r ( 1 0 7 Q C
0076460 H A R A C T E R ) \r ( 1 2 0 Q
0076500 " P a d c h a r m u s t b
0076520 e a c h a r a c t e r -
0076540 ~ S " 7 6 Q " M i n p a d
0076560 m u s t b e a n o n - n e
0076600 g a t i v e i n t e g e r -
0076620 ~ S " 5 1 Q " C o l i n c
0076640 m u s t b e a p o s i t
0076660 i v e i n t e g e r - ~ S
0076700 " \r 1 7 Q " M i n c o l m
0076720 u s t b e a n o n - n e g
0076740 a t i v e i n t e g e r -
0076760 ~ S " ) \r F O R M A T - P R I N
0077000 T - N U M B E R D 1 \r ( L (
0077020 4 P A R M S 3 P R I N T -
0077040 S I G N - P 2 P R I N T - C
0077060 O M M A S - P 1 R A D I X
0077100 0 N U M B E R ) P 4 * P
0077120 R I N T - B A S E * ) \0 206 005 \0
0077140 \0 005 D 230 D 001 D 002 b \b 277 265 003 j D 230
0077160 D 001 D 002 b \b 277 265 006 o \0 \0 \0 D 230 D
0077200 001 D 002 b \b 277 265 006 o \0 \0 \0 021 023 003 D
0077220 227 o \0 \0 \0 \t \0 \0 277 A 021 001 004 @ \t \0
0077240 \0 273 @ 3 265 \a K \t \0 \0 020 \t \0 \0 262
0077260 % C 262 " B 262 023 g \0 \0 o \0 \0 \0 K J
0077300 \n \0 \0 \v \0 \0 260 027 g \0 \0 o \0 \0 \0 K
0077320 \v \0 \0 210 B 225 K J \n \0 \0 200 K H k j
0077340 I i \r 006 \0 \0 020 \0 ( 2 0 3 Q F O
0077360 R M A T - W R I T E - F I E L D
0077400 1 7 0 Q F O R M A T - A D D
0077420 - C O M M A S 1 6 0 Q C O N
0077440 C A T E N A T E 1 4 3 Q C O
0077460 N C A T E N A T E 1 4 0 Q F
0077500 O R M A T - A D D - C O M M A S
0077520 1 1 4 Q P L U S P 1 1 0 Q
0077540 W R I T E - S T R I N G 7 6
0077560 Q P R I N C - T O - S T R I N
0077600 G 6 5 Q F O R M A T - E R R
0077620 O R ) \r ( 1 5 0 Q S T R I N G
0077640 1 2 7 Q S T R I N G ) \r (
0077660 1 5 4 Q " + " 1 3 3 Q " +
0077700 " 6 2 Q " T o o m a n y
0077720 p a r a m e t e r s " 5 1 Q
0077740 | \ , 3 2 Q | \ S p a c e )
0077760 \r F O R M A T - P R I N T - S M
0100000 A L L - C A R D I N A L D 1 \r
0100020 ( L ( 0 N ) F 6 C A R
0100040 D I N A L - O N E S F 7 C
0100060 A R D I N A L - T E N S F 1
0100100 0 Q C A R D I N A L - T E E N
0100120 S ) \0 212 006 003 \0 001 @ l d \n \0 \0 \t
0100140 \0 \0 021 Q 005 H 001 271 H 002 001 272 I \t \0 \0
0100160 262 V I 266 \t \0 \0 277 o \0 \0 \0 \t \0 \0
0100200 277 J d \t \0 \0 231 277 o \0 \0 \0 \t \0 \0 277
0100220 J \t \0 \0 264 M J l \n \n \0 \0 \t \0 \0 [
0100240 001 274 K 002 001 275 L d k 363 262 036 277 W 016 L
0100260 266 \t \0 \0 M \t \0 \0 264 ) o \0 \0 \0 \t \0
0100300 \0 V M 266 \t \0 \0 020 k \n \0 \0 227 W 020 M
0100320 266 \t \0 \0 020 M \t \0 \0 264 \b V M 266 \t \0
0100340 \0 020 \0 ( 2 0 7 Q W R I T E - S
0100360 T R I N G 1 7 7 Q P L U S P
0100400 1 7 2 Q W R I T E - S T R I
0100420 N G 1 6 2 Q % % = 1 5 5 Q
0100440 W R I T E - S T R I N G 1 4
0100460 7 Q W R I T E - C H A R 1 3
0100500 6 Q P L U S P 1 3 2 Q W R
0100520 I T E - S T R I N G 1 0 5 Q
0100540 \ M V L I S T 1 0 2 Q T R U
0100560 N C A T E 7 2 Q P L U S P
0100600 6 5 Q W R I T E - C H A R 5
0100620 4 Q P L U S P 4 6 Q W R I
0100640 T E - S T R I N G 3 6 Q W R
0100660 I T E - S T R I N G 2 6 Q P
0100700 L U S P 1 0 Q \ M V L I S T
0100720 5 T R U N C A T E ) \r N I L
0100740 \r ( 1 4 4 Q | \ - 6 2 Q
0100760 | \ S p a c e 4 3 Q " h u
0101000 n d r e d " ) \r F O R M A T - P
0101020 R I N T - C A R D I N A L D 1
0101040 \r ( L ( 0 N ) ) \0 2 \0 \0 \0
0101060 001 j @ 363 237 o \0 \0 \0 \t \0 \0 j @ 325 j
0101100 @ \v \0 \0 020 @ j 360 252 @ d 005 003 235 d \t
0101120 \0 \0 230 277 o \0 \0 \0 \t \0 \0 020 j @ \v \0
0101140 \0 020 \0 ( 5 7 Q F O R M A T - P
0101160 R I N T - C A R D I N A L - A U
0101200 X 5 1 Q W R I T E - S T R I
0101220 N G 4 0 Q \ F Z E R O P 2
0101240 2 Q F O R M A T - P R I N T -
0101260 C A R D I N A L - A U X 1 2 Q
0101300 W R I T E - S T R I N G ) \r N
0101320 I L \r ( 4 6 Q " z e r o "
0101340 7 " n e g a t i v e " ) \r F
0101360 O R M A T - P R I N T - C A R D
0101400 I N A L - A U X D 1 \r ( L (
0101420 2 E R R 1 P E R I O D 0
0101440 N ) F 3 C A R D I N A L
0101460 - P E R I O D S ) \0 204 003 001 \0 003
0101500 @ n 003 350 \n \0 \0 \t \0 \0 021 ! 002 H 001 271
0101520 H 002 001 272 A l \n 363 221 h 200 i 221 h 200 i
0101540 230 o \0 \0 \0 B \n \0 \0 277 I j 360 263 S I
0101560 005 003 265 I i 230 I A k 324 B \v \0 \0 277 J
0101600 j 360 263 6 J 005 003 265 , i 264 I j 360 263
0101620 ! I 005 003 265 027 i 227 o \0 \0 \0 \t \0 \0 277
0101640 J \t \0 \0 S A 266 \t \0 \0 020 \t \0 \0 262 350
0101660 h 260 346 \t \0 \0 262 323 h 260 321 \t \0 \0 262 266
0101700 h 260 264 \0 ( 1 7 5 Q \ F Z E R O
0101720 P 1 6 5 Q \ F Z E R O P 1
0101740 5 5 Q \ F Z E R O P 1 5 1 Q
0101760 W R I T E - S T R I N G 1 4
0102000 3 Q F O R M A T - P R I N T -
0102020 S M A L L - C A R D I N A L 1
0102040 3 6 Q W R I T E - C H A R 7
0102060 5 Q F O R M A T - P R I N T -
0102100 C A R D I N A L - A U X 5 0 Q
0102120 F O R M A T - E R R O R 1 1
0102140 Q \ M V L I S T 6 T R U N
0102160 C A T E ) \r N I L \r ( 1 3 3 Q
0102200 | \ S p a c e 4 4 Q " N u
0102220 m b e r t o o l a r g e t
0102240 o p r i n t i n E n g l i
0102260 s h : ~ : D " ) \r F O R M A T
0102300 - P R I N T - O R D I N A L D
0102320 1 \r ( L ( 0 N ) F 7 O
0102340 R D I N A L - O N E S F 1 0
0102360 Q C A R D I N A L - T E E N S
0102400 F 1 1 Q C A R D I N A L -
0102420 T E N S F 1 2 Q O R D I N
0102440 A L - T E N S ) \0 365 \a 004 \0 001 j
0102460 @ 363 227 o \0 \0 \0 \t \0 \0 277 @ \t \0 \0 021
0102500 a 006 H l d \n \0 \0 \t \0 \0 Y 001 272 I 002
0102520 001 273 J j 360 263 H J 005 003 265 > i 226 H K
0102540 325 \t \0 \0 277 J \t \0 \0 236 K d \t \0 \0 231
0102560 277 o \0 \0 \0 \t \0 \0 277 K l \n \n \0 \0 \t
0102600 \0 \0 \ 001 275 L 002 001 276 K l \f \n \0 \0 237
0102620 o \0 \0 \0 \t \0 \0 020 \t \0 \0 262 301 h 260 277
0102640 M d k \n \0 \0 237 277 W 020 N 266 \t \0 \0 o
0102660 \0 \0 \0 \t \0 \0 020 j 360 263 2 M 005 003 265 (
0102700 N j 360 263 = N 005 003 265 3 K \t \0 \0 262 @
0102720 W 022 M 266 \t \0 \0 o \0 \0 \0 \t \0 \0 W 016
0102740 N 266 \t \0 \0 020 \t \0 \0 262 327 N d \t \0 \0
0102760 262 321 277 W 016 N 266 \t \0 \0 020 \t \0 \0 262 314
0103000 M \t \0 \0 262 306 W 024 M 266 \t \0 \0 020 H \t
0103020 \0 \0 227 o \0 \0 \0 \t \0 \0 020 o \0 \0 \0 \t
0103040 \0 \0 020 \0 ( 3 6 2 Q W R I T E -
0103060 S T R I N G 3 5 2 Q W R I T
0103100 E - S T R I N G 3 4 2 Q P L
0103120 U S P 3 3 5 Q W R I T E - S
0103140 T R I N G 3 2 4 Q P L U S P
0103160 3 1 6 Q \ F Z E R O P 3 1
0103200 2 Q W R I T E - S T R I N G
0103220 3 0 0 Q P L U S P 2 7 1 Q
0103240 \ F Z E R O P 2 6 5 Q W R I
0103260 T E - S T R I N G 2 5 6 Q W
0103300 R I T E - C H A R 2 4 7 Q W
0103320 R I T E - S T R I N G 2 3 6 Q
0103340 P L U S P 2 0 6 Q W R I T
0103360 E - S T R I N G 1 7 7 Q W R
0103400 I T E - S T R I N G 1 6 6 Q
0103420 % % = 1 5 3 Q \ F Z E R O P
0103440 1 4 7 Q W R I T E - S T R I
0103460 N G 1 3 7 Q % % = 1 2 2 Q
0103500 \ M V L I S T 1 1 7 Q T R
0103520 U N C A T E 1 1 0 Q W R I T
0103540 E - C H A R 7 7 Q P L U S P
0103560 7 1 Q P L U S P 6 4 Q F
0103600 O R M A T - P R I N T - C A R D
0103620 I N A L 3 3 Q \ M V L I S T
0103640 3 0 Q T R U N C A T E 1 7
0103660 Q A B S 1 2 Q W R I T E -
0103700 S T R I N G ) \r N I L \r ( 3 5
0103720 7 Q " z e r o e t h " 3 4 7
0103740 Q " t h " 2 5 3 Q | \ -
0103760 2 0 3 Q " t h " 1 4 4 Q "
0104000 t w e l f t h " 1 0 5 Q | \
0104020 S p a c e 7 " n e g a t i v
0104040 e " ) \r F O R M A T - P R I N
0104060 T - O L D - R O M A N D 1 \r (
0104100 L ( 0 N ) ) \0 \ 006 \0 \0 001 @
0104120 j 363 227 n 023 210 @ 363 221 h 200 i 230 o \0 \0
0104140 \0 @ \n \0 \0 277 o \0 \0 \0 o \0 \0 \0 o \0
0104160 \0 \0 n 003 350 @ 021 025 005 L j 360 263 " L 005
0104200 003 265 030 H 002 I 002 H 001 I 001 L 275 K M 363
0104220 236 M 274 273 272 271 270 260 342 \t \0 \0 262 347 h 020
0104240 J \t \0 \0 277 M K 325 260 344 \0 ( 1 2 4 Q
0104260 W R I T E - C H A R 1 1 4 Q
0104300 \ F Z E R O P 2 5 Q F O R
0104320 M A T - E R R O R ) \r N I L \r (
0104340 4 2 Q | \ M 3 6 Q ( 7 6
0104360 4 Q 1 4 4 Q 6 2 Q 1 2 Q
0104400 5 1 ) 3 2 Q ( | \ D | \
0104420 C | \ L | \ X | \ V | \
0104440 I ) 2 1 Q " N u m b e r t
0104460 o o l a r g e t o p r i n
0104500 t i n o l d R o m a n n
0104520 u m e r a l s : ~ : D " ) \r F
0104540 O R M A T - P R I N T - R O M A
0104560 N D 1 \r ( L ( 0 N ) ) \0
0104600 242 \n \0 \0 001 @ j 363 227 n 017 240 @ 363 221 h
0104620 200 i 230 o \0 \0 \0 @ \n \0 \0 277 o \0 \0 \0
0104640 o \0 \0 \0 o \0 \0 \0 o \0 \0 \0 o \0 \0 \0
0104660 n 003 350 o \0 \0 \0 l d @ 021 031 \t O 020 j
0104700 360 263 2 O 020 005 003 265 ' H 002 I 002 J 002 K
0104720 002 H 001 I 001 J 001 K 001 O 020 _ 022 277 M O
0104740 022 363 262 9 M O 016 325 O 022 363 230 h 207 \t \0
0104760 \0 262 330 h 020 i 262 024 N \t \0 \0 277 L \t \0
0105000 \0 277 O 022 M O 016 325 325 201 O 022 _ 020 277 _
0105020 016 277 276 275 274 273 272 271 270 260 244 L \t \0 \0 277
0105040 O 022 M 325 260 267 \0 ( 2 3 1 Q W R I
0105060 T E - C H A R 1 7 3 Q W R I
0105100 T E - C H A R 1 6 6 Q W R I
0105120 T E - C H A R 1 5 3 Q \ F Z
0105140 E R O P 2 5 Q F O R M A T -
0105160 E R R O R ) \r N I L \r ( 6 1 Q
0105200 | \ C 5 2 Q | \ M 4 6 Q
0105220 ( 1 4 4 Q 1 2 Q 1 2 Q 1
0105240 1 0 ) 4 2 Q ( | \ C |
0105260 \ X | \ X | \ I | \ I )
0105300 3 6 Q ( 7 6 4 Q 1 4 4 Q 6
0105320 2 Q 1 2 Q 5 1 ) 3 2 Q
0105340 ( | \ D | \ C | \ L | \ X
0105360 | \ V | \ I ) \r 2 1 Q "
0105400 N u m b e r t o o l a r g e
0105420 t o p r i n t i n R o m
0105440 a n n u m e r a l s : ~ : D
0105460 " ) \r F O R M A T - P R I N T -
0105500 D E C I M A L D 1 \r ( L ( 2
0105520 P A R M S 1 A T S I G N
0105540 0 C O L O N ) F 0 * F O
0105560 R M A T - A R G U M E N T S * )
0105600 \0 035 \0 001 \0 003 P 265 023 o \0 \0 \0 \t \0
0105620 \0 l \n @ A B \r 005 \0 \0 020 001 P 002 c \0
0105640 277 260 360 \0 ( 2 2 Q F O R M A T -
0105660 P R I N T - N U M B E R 1 1 Q
0105700 F O R M A T - E R R O R ) \r N
0105720 I L \r ( 6 " M i s s i n g
0105740 a r g u m e n t " ) \r F O R M A
0105760 T - P R I N T - B I N A R Y D
0106000 1 \r ( L ( 2 P A R M S 1
0106020 A T S I G N 0 C O L O N )
0106040 F 0 * F O R M A T - A R G U
0106060 M E N T S * ) \0 035 \0 001 \0 003 P 265
0106100 023 o \0 \0 \0 \t \0 \0 l 002 @ A B \r 005 \0
0106120 \0 020 001 P 002 c \0 277 260 360 \0 ( 2 2 Q
0106140 F O R M A T - P R I N T - N U M
0106160 B E R 1 1 Q F O R M A T - E
0106200 R R O R ) \r N I L \r ( 6 " M
0106220 i s s i n g a r g u m e n t "
0106240 ) \r F O R M A T - P R I N T - O
0106260 C T A L D 1 \r ( L ( 2 P A
0106300 R M S 1 A T S I G N 0 C
0106320 O L O N ) F 0 * F O R M A
0106340 T - A R G U M E N T S * ) \0 035
0106360 \0 001 \0 003 P 265 023 o \0 \0 \0 \t \0 \0 l \b
0106400 @ A B \r 005 \0 \0 020 001 P 002 c \0 277 260 360
0106420 \0 ( 2 2 Q F O R M A T - P R I
0106440 N T - N U M B E R 1 1 Q F O
0106460 R M A T - E R R O R ) \r N I L \r
0106500 ( 6 " M i s s i n g a r g
0106520 u m e n t " ) \r F O R M A T - P
0106540 R I N T - H E X A D E C I M A L
0106560 D 1 \r ( L ( 2 P A R M S
0106600 1 A T S I G N 0 C O L O N
0106620 ) F 0 * F O R M A T - A R
0106640 G U M E N T S * ) \0 035 \0 001 \0 003
0106660 P 265 023 o \0 \0 \0 \t \0 \0 l 020 @ A B \r
0106700 005 \0 \0 020 001 P 002 c \0 277 260 360 \0 ( 2 2
0106720 Q F O R M A T - P R I N T - N
0106740 U M B E R 1 1 Q F O R M A T
0106760 - E R R O R ) \r N I L \r ( 6
0107000 " M i s s i n g a r g u m e n
0107020 t " ) \r F O R M A T - P R I N T
0107040 - R A D I X D 1 \r ( L ( 2
0107060 P A R M S 1 A T S I G N 0
0107100 C O L O N ) F 1 * F O R
0107120 M A T - A R G U M E N T S * )
0107140 \0 C 001 001 \0 003 Q 265 037 o \0 \0 \0 \t \0 \0
0107160 021 001 \0 B 262 032 H B 001 B 002 b 004 277 @ A
0107200 B \r 005 \0 \0 020 001 Q 002 c 002 277 260 344 A 233
0107220 @ 224 H \t \0 \0 020 H \t \0 \0 020 @ 224 H \t
0107240 \0 \0 020 H \t \0 \0 020 \0 ( 1 0 0 Q F
0107260 O R M A T - P R I N T - C A R D
0107300 I N A L 7 3 Q F O R M A T -
0107320 P R I N T - O R D I N A L 6 4
0107340 Q F O R M A T - P R I N T - R
0107360 O M A N 5 7 Q F O R M A T -
0107400 P R I N T - O L D - R O M A N
0107420 3 6 Q F O R M A T - P R I N T
0107440 - N U M B E R 1 1 Q F O R M
0107460 A T - E R R O R ) \r N I L \r (
0107500 6 " M i s s i n g a r g u m
0107520 e n t " ) \r F O R M A T - F I X
0107540 E D D 1 \r ( L ( 2 P A R M
0107560 S 1 A T S I G N 0 C O L
0107600 O N ) P 6 * P R I N T - B
0107620 A S E * F 7 * F O R M A T
0107640 - A R G U M E N T S * ) \0 227 \a
0107660 001 \0 003 @ 227 o \0 \0 \0 \t \0 \0 277 B d 264
0107700 \a 001 B 002 b 004 d 225 001 B 002 b 004 277 B d
0107720 264 \a 001 B 002 b 004 d 225 001 B 002 b 004 277 B
0107740 230 B 001 B 002 b 004 277 265 006 o \0 \0 \0 021 025
0107760 005 B 227 o \0 \0 \0 \t \0 \0 277 W 016 265 032 o
0110000 \0 \0 \0 \t \0 \0 ] d 005 003 262 026 H I J K
0110020 L A \r \a \0 \0 020 001 W 016 002 c 016 277 260 350
0110040 \t \0 \0 236 M 006 \0 \0 H I J K L A \r \a
0110060 \0 \0 020 l \n 021 001 006 M \t \0 \0 H k j o
0110100 \0 \0 \0 i \r 006 \0 \0 020 \0 ( 2 2 4 Q
0110120 F O R M A T - W R I T E - F I E
0110140 L D 2 1 0 Q P R I N C - T O
0110160 - S T R I N G 1 7 6 Q F O R
0110200 M A T - F I X E D - A U X 1 5
0110220 7 Q R A T I O N A L P 1 4 2
0110240 Q F O R M A T - F I X E D - A
0110260 U X 1 2 2 Q F O R M A T - E
0110300 R R O R 1 0 6 Q F O R M A T
0110320 - E R R O R 1 0 Q F O R M A
0110340 T - E R R O R ) \r ( 1 6 4 Q F
0110360 L O A T P ) \r ( 2 1 7 Q | \
0110400 S p a c e 1 1 7 Q " M i s s
0110420 i n g a r g u m e n t " 1 0
0110440 3 Q " T o o m a n y p a r
0110460 a m e t e r s " 7 2 Q | \ S
0110500 p a c e 5 " C o l o n f l
0110520 a g n o t a l l o w e d " )
0110540 \r F O R M A T - F I X E D - A U
0110560 X D 1 \r ( L ( 6 A T S I G
0110600 N 5 P A D 4 O V F 3
0110620 K 2 D 1 W 0 N U M B
0110640 E R ) ) 001 ^ \f \0 \0 \a A 241 B 221 h
0110660 200 i 262 e j @ 363 235 o \0 \0 \0 \t \0 \0 277
0110700 j @ 325 b \0 277 o \0 \0 \0 @ 363 221 h 200 i
0110720 262 B @ o \0 \0 \0 363 221 h 200 i 262 6 @ \t
0110740 \0 \0 \t \0 \0 021 A 004 H 001 271 H 002 002 Z 001
0110760 273 J 002 001 274 K 227 o \0 \0 \0 \t \0 \0 277 I
0111000 \t \0 \0 L 264 003 202 261 001 \0 o \0 \0 \0 \t \0
0111020 \0 020 @ \t \0 \0 020 A 021 261 \v A 231 F 243 j
0111040 @ 363 223 H k 325 270 @ \t \0 \0 H B C \f \0
0111060 \0 \t \0 \0 Y 001 272 I 002 [ 001 274 K 002 ] 001
0111100 276 M 002 001 _ 016 277 B 265 036 A 242 261 \0 217 H
0111120 L 325 270 N 262 ' H d j 363 245 277 O 016 264 034
0111140 H k 325 270 260 027 j 360 252 B 005 003 262 336 B \t
0111160 \0 \0 262 330 h _ 016 277 260 322 276 O 016 234 H j
0111200 363 264 \a H k 325 270 202 _ 016 277 A 262 O j H
0111220 363 262 ' D 262 $ A j _ 022 277 _ 020 277 O 020
0111240 O 022 363 221 h 200 i 221 h 020 D \t \0 \0 277 O
0111260 022 k 324 _ 022 277 260 350 A 262 " H j _ 026 277
0111300 _ 024 277 O 024 O 026 363 221 h 200 i 255 E \t \0
0111320 \0 277 O 026 k 324 _ 026 277 260 352 j @ 363 224 o
0111340 \0 \0 \0 205 F 227 o \0 \0 \0 \t \0 \0 277 N 227
0111360 o \0 \0 \0 \t \0 \0 277 J \t \0 \0 O 016 264 \t
0111400 o \0 \0 \0 \t \0 \0 020 \0 ( 5 3 3 Q W
0111420 R I T E - C H A R 5 2 0 Q W
0111440 R I T E - S T R I N G 5 1 3 Q
0111460 W R I T E - C H A R 5 0 1 Q
0111500 W R I T E - C H A R 4 4 5 Q
0111520 W R I T E - C H A R 4 0 2 Q
0111540 W R I T E - C H A R 3 0 6 Q
0111560 \ F Z E R O P 2 1 0 Q \ M
0111600 V L I S T 2 0 5 Q F L O N U
0111620 M - T O - S T R I N G 1 7 7 Q
0111640 A B S 1 5 2 Q P R I N C
0111660 1 4 5 Q W R I T E - C H A R
0111700 1 2 7 Q W R I T E - S T R I N
0111720 G 1 2 2 Q W R I T E - C H A
0111740 R 7 1 Q \ M V L I S T 6 6
0111760 Q F L O N U M - T O - S T R I
0112000 N G 2 3 Q W R I T E - C H A
0112020 R ) \r N I L \r ( 5 3 0 Q | \
0112040 0 5 1 0 Q | \ 0 4 7 6 Q
0112060 | \ + 4 6 7 Q | \ - 1 4 2
0112100 Q | \ 0 1 1 7 Q | \ 0 5
0112120 3 Q 1 0 0 0 0 0 0 0 . 0 3 6
0112140 Q . 0 0 1 2 0 Q | \ - ) \r
0112160 F O R M A T - E X P O N E N T I
0112200 A L D 1 \r ( L ( 2 P A R M
0112220 S 1 A T S I G N 0 C O L
0112240 O N ) P 1 0 Q * P R I N T
0112260 - B A S E * F 1 1 Q * F O
0112300 R M A T - A R G U M E N T S * )
0112320 \0 261 \t 001 \0 003 @ 227 o \0 \0 \0 \t \0 \0
0112340 277 B d 264 \a 001 B 002 b 004 d 225 001 B 002 b
0112360 004 277 B d 236 001 B 002 b 004 230 B 001 B 002 b
0112400 004 277 265 003 k B d 236 001 B 002 b 004 230 B 001
0112420 B 002 b 004 277 265 006 o \0 \0 \0 B d 225 001 B
0112440 002 b 004 277 021 027 \a B 227 o \0 \0 \0 \t \0 \0
0112460 277 W 022 265 035 o \0 \0 \0 \t \0 \0 _ 016 d 005
0112500 003 262 030 H I J K L M N A \r \t \0 \0 020
0112520 001 W 022 002 c 022 277 260 345 \t \0 \0 262 024 O 016
0112540 006 \0 \0 H I J K L M N A \r \t \0 \0 020
0112560 l \n 021 001 \b O 016 \t \0 \0 H k j o \0 \0
0112600 \0 i \r 006 \0 \0 020 \0 ( 2 5 6 Q F O
0112620 R M A T - W R I T E - F I E L D
0112640 2 4 2 Q P R I N C - T O - S
0112660 T R I N G 2 2 7 Q F O R M A
0112700 T - E X P - A U X 2 0 4 Q R
0112720 A T I O N A L P 1 6 7 Q F O
0112740 R M A T - E X P - A U X 1 4 4
0112760 Q F O R M A T - E R R O R 1
0113000 3 0 Q F O R M A T - E R R O R
0113020 1 0 Q F O R M A T - E R R O
0113040 R ) \r ( 2 1 3 Q F L O A T P )
0113060 \r ( 2 5 1 Q | \ S p a c e
0113100 1 4 1 Q " M i s s i n g a r
0113120 g u m e n t " 1 2 5 Q " T o
0113140 o m a n y p a r a m e t e r
0113160 s " 1 0 3 Q | \ S p a c e
0113200 5 " C o l o n f l a g n o
0113220 t a l l o w e d " ) \r F O R M
0113240 A T - E X P O N E N T - M A R K
0113260 E R D 1 \r ( L ( 0 N U M B
0113300 E R ) F 1 * R E A D - D E
0113320 F A U L T - F L O A T - F O R M
0113340 A T * ) \0 9 001 001 \0 001 @ d Q \n \0
0113360 \0 224 o \0 \0 \0 020 021 001 \0 H d 303 \0 \0 224
0113400 o \0 \0 \0 020 303 \0 \0 224 o \0 \0 \0 020 H d
0113420 303 \0 \0 224 o \0 \0 \0 020 303 \0 \0 264 006 o \0
0113440 \0 \0 020 \0 ( 5 T Y P E P ) \r ( 6
0113460 0 Q F L O A T P 4 7 Q F L
0113500 O A T P 3 4 Q F L O A T P
0113520 2 3 Q F L O A T P ) \r ( 6 6
0113540 Q | \ L 5 4 Q | \ D 4 1
0113560 Q | \ F 3 0 Q | \ S 1 2
0113600 Q | \ E ) \r F O R M A T - E X
0113620 P - A U X D 1 \r ( L ( 1 0 Q
0113640 A T S I G N 7 M A R K E R
0113660 6 P A D 5 O V F 4 K
0113700 3 E 2 D 1 W 0 N
0113720 U M B E R ) ) 001 303 027 \0 \0 \t A 241
0113740 B 221 h 200 i 224 @ \t \0 \0 020 @ \t \0 \0 \t
0113760 \0 \0 \t \0 \0 021 361 017 021 p 026 H 001 271 H 002
0114000 001 D 325 Z \t \0 \0 \t \0 \0 273 C 230 K \t \0
0114020 \0 C \n \0 \0 203 K \t \0 \0 274 B 264 016 D \t
0114040 \0 \0 225 B D 325 k 324 200 B 275 j D 363 264 005
0114060 k D 325 276 A d 224 l 002 325 L 325 _ 016 277 G
0114100 020 243 j @ 363 226 O 016 k 325 _ 016 277 A 262 /
0114120 C 262 , E 262 ) L C 363 262 $ A j _ 022 277
0114140 _ 020 277 O 020 O 022 363 221 h 200 i 221 h 020 E
0114160 \t \0 \0 277 O 022 k 324 _ 022 277 260 350 I O 016
0114200 M D N \r 005 \0 \0 \t \0 \0 _ 024 001 _ 026 277
0114220 O 024 002 _ 030 001 _ 032 277 O 030 002 _ 034 001 _
0114240 036 277 O 034 002 001 _ 277 A 262 | O 016 O 032
0114260 325 _ 016 277 O 226 O 016 k 325 _ 016 277 O 036
0114300 262 023 O 016 j 363 264 \n O 016 k 325 _ 016 277 202
0114320 _ 036 277 A 262 R j O 016 363 262 ( E 262 % A
0114340 j _ $ 277 _ " 277 O " O $ 363 221 h 200 i
0114360 222 261 377 | E \t \0 \0 277 O $ k 324 _ $ 277
0114400 260 347 A 262 # O 016 j _ ( 277 _ & 277 O &
0114420 O ( 363 221 h 200 i 255 F \t \0 \0 277 O ( k
0114440 324 _ ( 277 260 352 j @ 363 224 o \0 \0 \0 206 G
0114460 020 227 o \0 \0 \0 \t \0 \0 277 O 036 227 o \0 \0
0114500 \0 \t \0 \0 277 O 026 \t \0 \0 O 227 o \0 \0
0114520 \0 \t \0 \0 277 G 016 265 006 @ \t \0 \0 \t \0 \0
0114540 j J 363 224 o \0 \0 \0 203 o \0 \0 \0 \t \0 \0
0114560 C 265 \a K \t \0 \0 020 K \t \0 \0 325 j _ ,
0114600 277 _ * 277 O * O , 363 221 h 200 i 263 346 o
0114620 \0 \0 \0 \t \0 \0 277 O , k 324 _ , 277 260 346
0114640 \0 ( 6 6 7 Q W R I T E - C H A
0114660 R 6 3 5 Q C L : L E N G T H
0114700 6 3 0 Q W R I T E - S T R I
0114720 N G 6 2 1 Q W R I T E - C H
0114740 A R 6 0 1 Q W R I T E - C H
0114760 A R 5 7 6 Q F O R M A T - E
0115000 X P O N E N T - M A R K E R 5
0115020 6 5 Q W R I T E - C H A R 5
0115040 5 3 Q W R I T E - S T R I N G
0115060 5 4 5 Q W R I T E - C H A R
0115100 5 3 2 Q W R I T E - C H A R
0115120 4 7 5 Q W R I T E - C H A R
0115140 4 3 1 Q W R I T E - C H A R
0115160 2 5 3 Q \ M V L I S T 2 5
0115200 0 Q F L O N U M - T O - S T R
0115220 I N G 2 2 4 Q W R I T E - C
0115240 H A R 1 0 3 Q P L U S P 7
0115260 3 Q C L : L E N G T H 6 6 Q
0115300 M A X 6 2 Q C L : L E N G
0115320 T H 5 3 Q P R I N C - T O -
0115340 S T R I N G 5 0 Q A B S 2
0115360 6 Q \ M V L I S T 2 3 Q S
0115400 C A L E - E X P O N E N T 2 0
0115420 Q A B S 1 3 Q C L : P R I
0115440 N 1 ) \r N I L \r ( 6 6 4 Q |
0115460 \ 0 6 1 6 Q | \ + 6 1 1 Q
0115500 | \ - 5 6 2 Q | \ 0 5 4
0115520 2 Q | \ 0 5 2 7 Q | \ +
0115540 5 1 7 Q | \ - ) \r F O R M A T
0115560 - G E N E R A L - F L O A T D
0115600 1 \r ( L ( 2 P A R M S 1
0115620 A T S I G N 0 C O L O N )
0115640 P 1 0 Q * P R I N T - B A S
0115660 E * F 1 1 Q * F O R M A T
0115700 - A R G U M E N T S * ) \0 267 \t
0115720 001 \0 003 @ 227 o \0 \0 \0 \t \0 \0 277 B d 264
0115740 \a 001 B 002 b 004 d 225 001 B 002 b 004 277 B d
0115760 264 \a 001 B 002 b 004 d 225 001 B 002 b 004 277 B
0116000 230 B 001 B 002 b 004 277 265 006 o \0 \0 \0 B 230
0116020 B 001 B 002 b 004 277 265 006 o \0 \0 \0 B d 225
0116040 001 B 002 b 004 277 021 027 \a B 227 o \0 \0 \0 \t
0116060 \0 \0 277 W 022 265 035 o \0 \0 \0 \t \0 \0 _ 016
0116100 d 005 003 262 030 H I J K L M N A \r \t \0
0116120 \0 020 001 W 022 002 c 022 277 260 345 \t \0 \0 262 024
0116140 O 016 006 \0 \0 H I J K L M N A \r \t \0
0116160 \0 020 l \n 021 001 \b O 016 \t \0 \0 H k j o
0116200 \0 \0 \0 i \r 006 \0 \0 020 \0 ( 2 6 4 Q
0116220 F O R M A T - W R I T E - F I E
0116240 L D 2 5 0 Q P R I N C - T O
0116260 - S T R I N G 2 3 5 Q F O R
0116300 M A T - G E N E R A L - A U X
0116320 2 1 2 Q R A T I O N A L P 1
0116340 7 5 Q F O R M A T - G E N E R
0116360 A L - A U X 1 5 2 Q F O R M
0116400 A T - E R R O R 1 3 6 Q F O
0116420 R M A T - E R R O R 1 0 Q F
0116440 O R M A T - E R R O R ) \r ( 2 2
0116460 1 Q F L O A T P ) \r ( 2 5 7
0116500 Q | \ S p a c e 1 4 7 Q "
0116520 M i s s i n g a r g u m e n t
0116540 " 1 3 3 Q " T o o m a n y
0116560 p a r a m e t e r s " 1 1 1
0116600 Q | \ S p a c e 7 2 Q | \
0116620 * 5 " C o l o n f l a g
0116640 n o t a l l o w e d " ) \r F O
0116660 R M A T - G E N E R A L - A U X
0116700 D 1 \r ( L ( 1 0 Q A T S I
0116720 G N 7 M A R K E R 6 P A
0116740 D 5 O V F 4 K 3 E
0116760 2 D 1 W 0 N U M B E R
0117000 ) ) \0 234 006 \0 \0 \t @ \t \0 \0 \t \0 \0
0117020 \t \0 \0 002 001 021 Q 005 B 221 h 200 i 262 % @
0117040 \t \0 \0 \t \0 \0 \t \0 \0 002 001 d k \n \0 \0
0117060 222 277 k 201 k 325 H l \a \n \0 \0 \n \0 \0 b
0117100 004 277 C 265 025 l 004 271 A d 221 I 325 272 B H
0117120 325 273 j K 363 226 h 205 l 002 324 260 354 i 262 3
0117140 K B 363 221 h 200 i 262 * @ J K h E F G
0117160 020 \r \a \0 \0 I j 275 274 L M 363 221 h 200 i
0117200 221 h 020 o \0 \0 \0 \t \0 \0 277 M k 324 275 260
0117220 352 @ A B C D 265 003 k E F G 016 G 020 \r
0117240 \t \0 \0 020 \0 ( 2 3 1 Q F O R M A
0117260 T - E X P - A U X 2 0 0 Q W
0117300 R I T E - C H A R 1 5 3 Q F
0117320 O R M A T - F I X E D - A U X
0117340 6 5 Q M A X 6 2 Q M I N
0117360 4 6 Q % % = 3 7 Q \ M V L
0117400 I S T 3 4 Q F L O N U M - T
0117420 O - S T R I N G 3 1 Q A B S
0117440 1 1 Q \ M V L I S T 6 S
0117460 C A L E - E X P O N E N T 3
0117500 A B S ) \r N I L \r ( 1 7 5 Q
0117520 | \ S p a c e ) \r F O R M A T -
0117540 D O L L A R S D 1 \r ( L ( 2
0117560 P A R M S 1 A T S I G N
0117600 0 C O L O N ) F 1 7 Q *
0117620 F O R M A T - A R G U M E N T S
0117640 * ) \0 373 017 001 \0 003 B 230 B 001 B 002 b
0117660 004 277 265 004 l 002 B 230 B 001 B 002 b 004 277 265
0117700 003 k B 230 B 001 B 002 b 004 277 265 003 j B 230
0117720 B 001 B 002 b 004 277 265 006 o \0 \0 \0 021 264 016
0117740 B 227 o \0 \0 \0 \t \0 \0 277 W 036 265 024 o \0
0117760 \0 \0 \t \0 \0 274 j L 363 236 o \0 \0 \0 260 026
0120000 001 W 036 002 c 036 277 260 356 A 224 o \0 \0 \0 203
0120020 o \0 \0 \0 275 L \t \0 \0 h H \v \0 \0 \t \0
0120040 \0 ^ 001 _ 016 277 N 002 _ 020 001 _ 022 277 O 020
0120060 002 002 002 001 _ 024 277 @ 224 M \t \0 \0 277 J O
0120100 022 325 M \t \0 \0 325 I O 024 325 325 j _ 030 277
0120120 _ 026 277 O 026 O 030 363 221 h 200 i 255 K \t \0
0120140 \0 277 O 030 k 324 _ 030 277 260 352 @ 221 h 200 i
0120160 224 M \t \0 \0 277 I O 024 325 j _ 034 277 _ 032
0120200 277 O 032 O 034 363 221 h 200 i 263 023 o \0 \0 \0
0120220 \t \0 \0 277 O 034 k 324 _ 034 277 260 346 O 016 \t
0120240 \0 \0 020 \0 ( 3 7 0 Q W R I T E -
0120260 S T R I N G 3 5 1 Q W R I T
0120300 E - C H A R 3 1 3 Q W R I T
0120320 E - S T R I N G 2 6 7 Q W R
0120340 I T E - C H A R 2 3 4 Q C L
0120360 : L E N G T H 2 2 3 Q W R I
0120400 T E - S T R I N G 1 6 7 Q \
0120420 M V L I S T 1 6 4 Q F L O N
0120440 U M - T O - S T R I N G 1 5 7
0120460 Q A B S 1 1 3 Q F O R M A
0120500 T - E R R O R 7 7 Q F O R M
0120520 A T - E R R O R ) \r N I L \r (
0120540 3 4 6 Q | \ 0 1 5 2 Q " "
0120560 1 4 5 Q " + " 1 2 4 Q "
0120600 - " 1 1 0 Q " M i s s i n g
0120620 a r g u m e n t " 7 4 Q "
0120640 T o o m a n y p a r a m e t
0120660 e r s " 6 3 Q | \ S p a c e
0120700 ) \r C H A R P O S D 1 \r ( L
0120720 ( 0 S T R E A M ) ) \0 032 \0 \0
0120740 \0 001 @ \t \0 \0 221 h 200 i 230 o \0 \0 \0 @
0120760 \n \0 \0 277 @ 006 \0 \0 310 035 020 \0 ( 2 0 Q
0121000 C L : E R R O R 3 S T R E
0121020 A M P ) \r ( 2 5 Q S T R E A M
0121040 ) \r ( 1 4 Q " C H A R P O S
0121060 : ~ A i s n ' t a s t r
0121100 e a m " ) \r F L O N U M - T O -
0121120 S T R I N G D 1 \r ( L ( 4
0121140 F M I N 3 S C A L E 2 F
0121160 D I G I T S 1 W I D T H 0
0121200 X ) F 3 * D I G I T - S
0121220 T R I N G * ) \0 F 003 001 \0 005 @ \t
0121240 \0 \0 232 o \0 \0 \0 k i d \f \0 \0 020 S j
0121260 \n \0 \0 @ \t \0 \0 \t \0 \0 021 ! 002 H 001 271
0121300 H 002 001 272 @ 303 \0 \0 234 I J l 024 A B C
0121320 D \r \a \0 \0 020 I J l 5 A B C D \r \a
0121340 \0 \0 020 \0 ( 1 0 3 Q F L O A T -
0121360 S T R I N G 6 6 Q F L O A T
0121400 - S T R I N G 3 3 Q \ M V L
0121420 I S T 3 0 Q I N T E G E R -
0121440 D E C O D E - F L O A T 2 4 Q
0121460 S E T - F I L L - P O I N T E
0121500 R 1 6 Q V A L U E S 3 C
0121520 L : Z E R O P ) \r ( 5 1 Q F L
0121540 O A T P ) \r ( 1 0 Q " . " )
0121560 \r W H I T E S P A C E - C H A R
0121600 - P D 1 \r ( L ( 0 C H ) )
0121620 \0 023 \0 \0 \0 001 @ o \0 \0 \0 g \0 \0 g
0121640 \0 \0 \t \0 \0 \f \0 \0 020 \0 ( 2 0 Q C
0121660 L : M E M B E R 1 5 Q S Y M
0121700 B O L - F U N C T I O N ) \r ( 1
0121720 2 Q E Q L 7 : T E S T ) \r
0121740 ( 4 ( | \ T a b | \ P a g
0121760 e | \ S p a c e | \ B a c k
0122000 s p a c e | \ N e w l i n e
0122020 | \ L i n e f e e d ) ) \r e x p
0122040 a n d - N A M E - A R R A Y D
0122060 1 \r ( L ( 1 $ $ M A C R O -
0122100 E N V I R O N M E N T 0 $ $
0122120 M A C R O - F O R M ) ) \0 $ 001
0122140 \0 \0 002 @ 002 001 021 001 \0 g \0 \0 H \t \0 \0
0122160 g \0 \0 i g \0 \0 g \0 \0 H h 032 032 h 032
0122200 032 032 032 032 032 020 \0 ( 1 4 Q L E N G
0122220 T H ) \r ( 2 6 Q Q U O T E 2
0122240 3 Q : I N I T I A L - C O N T
0122260 E N T S 1 7 Q : E L E M E N
0122300 T - T Y P E 1 0 Q M A K E -
0122320 A R R A Y ) \r ( ) \r ( S E T F -
0122340 M A C R O - F U N C T I O N (
0122360 Q U O T E N A M E - A R R A Y
0122400 ) ( Q U O T E e x p a n d -
0122420 N A M E - A R R A Y ) ) \r ( P R
0122440 O C L A I M ( Q U O T E ( S
0122460 P E C I A L * F O R M A T - A
0122500 R G U M E N T S * ) ) ) \r ( O R
0122520 ( B O U N D P ( Q U O T E
0122540 * F O R M A T - A R G U M E N T
0122560 S * ) ) ( S E T Q * F O R M
0122600 A T - A R G U M E N T S * N I
0122620 L ) ) \r ( L E T * ( ( A 0 2 8
0122640 3 ( Q U O T E * F O R M A T
0122660 - A R G U M E N T S * ) ) ( A
0122700 0 2 8 4 ( Q U O T E V A R I
0122720 A B L E ) ) ( A 0 2 8 5 \r "
0122740 L i s t o f F O R M A T a
0122760 r g s y e t u n p r o c e s
0123000 s e d " ) ) ( P R O G N ( C
0123020 O N D ( ( F B O U N D P ( Q
0123040 U O T E S E T - D O C U M E N
0123060 T A T I O N ) ) ( \r S E T - D
0123100 O C U M E N T A T I O N A 0 2
0123120 8 3 A 0 2 8 4 A 0 2 8 5 ) )
0123140 ) A 0 2 8 5 ) ) \r ( P R O C L
0123160 A I M ( Q U O T E ( S P E C
0123200 I A L * F O R M A T - C O N T
0123220 R O L - S T R I N G * ) ) ) \r (
0123240 O R ( B O U N D P ( Q U O T
0123260 E * F O R M A T - C O N T R O
0123300 L - S T R I N G * ) ) ( S E T
0123320 Q * F O R M A T - C O N T R O
0123340 L - S T R I N G * N I L ) ) \r
0123360 ( L E T * ( ( A 0 2 8 6 ( Q
0123400 U O T E * F O R M A T - C O N
0123420 T R O L - S T R I N G * ) ) (
0123440 A 0 2 8 7 ( Q U O T E V A R
0123460 I A B L E ) ) ( A 0 2 8 8 \r
0123500 " B o u n d t o F O R M A T
0123520 c o n t r o l s t r i n g "
0123540 ) ) ( P R O G N ( C O N D
0123560 ( ( F B O U N D P ( Q U O T E
0123600 S E T - D O C U M E N T A T I
0123620 O N ) ) ( \r S E T - D O C U M
0123640 E N T A T I O N A 0 2 8 6 A
0123660 0 2 8 7 A 0 2 8 8 ) ) ) A 0
0123700 2 8 8 ) ) \r ( P R O C L A I M
0123720 ( Q U O T E ( S P E C I A L
0123740 * F O R M A T - D I S P A T C H
0123760 - T A B L E * ) ) ) \r ( O R (
0124000 B O U N D P ( Q U O T E * F
0124020 O R M A T - D I S P A T C H - T
0124040 A B L E * ) ) ( S E T Q * F
0124060 O R M A T - D I S P A T C H - T
0124100 A B L E * ( M A K E - A R R A
0124120 Y ( Q U O T E ( 2 5 6 ) )
0124140 \r : E L E M E N T - T Y P E T
0124160 : I N I T I A L - C O N T E N
0124200 T S ( Q U O T E ( N I L N
0124220 I L N I L N I L N I L N
*
0124260 I L N I L N I L N I L \r
0124300 F O R M A T - N E W L I N E N
0124320 I L N I L N I L N I L N
*
0124440 I L N I L \r F O R M A T - D
0124460 O L L A R S F O R M A T - T E
0124500 R P R I F O R M A T - F R E S
0124520 H L I N E N I L F O R M A T
0124540 - C A P I T A L I Z A T I O N
0124560 N I L F O R M A T - S K I P -
0124600 A R G U M E N T S N I L \r N
0124620 I L N I L N I L N I L N
*
0124700 I L N I L N I L F O R M A
0124720 T - S E M I C O L O N - E R R O
0124740 R \r F O R M A T - J U S T I F
0124760 I C A T I O N N I L N I L
0125000 F O R M A T - I N D I R E C T I
0125020 O N N I L F O R M A T - P R
0125040 I N C F O R M A T - P R I N T
0125060 - B I N A R Y \r F O R M A T -
0125100 P R I N T - C H A R A C T E R
0125120 F O R M A T - P R I N T - D E C
0125140 I M A L F O R M A T - E X P O
0125160 N E N T I A L F O R M A T - F
0125200 I X E D F O R M A T - G E N E
0125220 R A L - F L O A T N I L \r N
0125240 I L N I L N I L N I L N
0125260 I L N I L F O R M A T - P R
0125300 I N T - O C T A L F O R M A T
0125320 - P L U R A L N I L F O R M
0125340 A T - P R I N T - R A D I X F
0125360 O R M A T - P R I N 1 \r F O R
0125400 M A T - T A B N I L N I L
0125420 N I L F O R M A T - P R I N T
0125440 - H E X A D E C I M A L N I L
0125460 N I L F O R M A T - C O N D
0125500 I T I O N N I L N I L F O
0125520 R M A T - E S C A P E N I L
0125540 N I L \r F O R M A T - P R I N
0125560 C F O R M A T - P R I N T - B
0125600 I N A R Y F O R M A T - P R I
0125620 N T - C H A R A C T E R F O R
0125640 M A T - P R I N T - D E C I M A
0125660 L F O R M A T - E X P O N E N
0125700 T I A L \r F O R M A T - F I X
0125720 E D F O R M A T - G E N E R A
0125740 L - F L O A T N I L N I L
0125760 N I L N I L N I L N I L
0126000 N I L F O R M A T - P R I N T
0126020 - O C T A L F O R M A T - P L
0126040 U R A L N I L \r F O R M A T
0126060 - P R I N T - R A D I X F O R
0126100 M A T - P R I N 1 F O R M A T
0126120 - T A B N I L N I L N I L
0126140 F O R M A T - P R I N T - H E
0126160 X A D E C I M A L N I L N I
0126200 L \r F O R M A T - I T E R A T
0126220 I O N F O R M A T - P A G E
0126240 N I L F O R M A T - T I L D E
0126260 N I L N I L N I L N I L
*
0126340 N I L N I L \r N I L N I
0126360 L N I L N I L N I L N I
*
0126500 L N I L N I L N I L \r N
0126520 I L N I L N I L N I L N
*
0126660 I L \r N I L N I L N I L
0126700 N I L N I L N I L N I L
*
0127020 N I L N I L \r N I L N I L
0127040 N I L N I L N I L N I L
*
0127160 N I L N I L N I L \r N I
0127200 L N I L N I L N I L N I
*
0127260 L N I L N I L ) ) ) ) ) \r (
0127300 L E T * ( ( A 0 2 9 0 ( Q U
0127320 O T E * F O R M A T - D I S P
0127340 A T C H - T A B L E * ) ) ( A
0127360 0 2 9 1 ( Q U O T E V A R I
0127400 A B L E ) ) ( A 0 2 9 2 \r "
0127420 T a b l e o f f u n c t i o
0127440 n s c a l l e d b y S U B
0127460 - F O R M A T t o p r o c e
0127500 s s ~ f o o s t u f f " ) )
0127520 ( P R O G N ( C O N D ( (
0127540 F B O U N D P ( Q U O T E \r
0127560 S E T - D O C U M E N T A T I O
0127600 N ) ) ( S E T - D O C U M E N
0127620 T A T I O N A 0 2 9 0 A 0 2
0127640 9 1 A 0 2 9 2 ) ) ) A 0 2 9
0127660 2 ) ) \r ( P R O C L A I M ( Q
0127700 U O T E ( S P E C I A L * F
0127720 O R M A T - I N D E X * ) ) ) \r
0127740 ( O R ( B O U N D P ( Q U O
0127760 T E * F O R M A T - I N D E X
0130000 * ) ) ( S E T Q * F O R M A
0130020 T - I N D E X * N I L ) ) \r (
0130040 L E T * ( ( A 0 2 9 3 ( Q U
0130060 O T E * F O R M A T - I N D E
0130100 X * ) ) ( A 0 2 9 4 ( Q U O
0130120 T E V A R I A B L E ) ) ( A
0130140 0 2 9 5 \r " I n d e x i n t
0130160 o c u r r e n t c o n t r o
0130200 l s t r i n g " ) ) ( P R O
0130220 G N ( C O N D ( ( F B O U N
0130240 D P ( Q U O T E S E T - D O
0130260 C U M E N T A T I O N ) ) ( \r
0130300 S E T - D O C U M E N T A T I O
0130320 N A 0 2 9 3 A 0 2 9 4 A 0
0130340 2 9 5 ) ) ) A 0 2 9 5 ) ) \r (
0130360 P R O C L A I M ( Q U O T E
0130400 ( S P E C I A L * F O R M A T
0130420 - L E N G T H * ) ) ) \r ( O R
0130440 ( B O U N D P ( Q U O T E *
0130460 F O R M A T - L E N G T H * ) )
0130500 ( S E T Q * F O R M A T - L
0130520 E N G T H * N I L ) ) \r ( L E
0130540 T * ( ( A 0 2 9 6 ( Q U O T
0130560 E * F O R M A T - L E N G T H
0130600 * ) ) ( A 0 2 9 7 ( Q U O T
0130620 E V A R I A B L E ) ) ( A 0
0130640 2 9 8 \r " L e n g t h o f
0130660 c u r r e n t c o n t r o l
0130700 s t r i n g " ) ) ( P R O G N
0130720 ( C O N D ( ( F B O U N D P
0130740 ( Q U O T E S E T - D O C U
0130760 M E N T A T I O N ) ) ( \r S E
0131000 T - D O C U M E N T A T I O N
0131020 A 0 2 9 6 A 0 2 9 7 A 0 2 9
0131040 8 ) ) ) A 0 2 9 8 ) ) \r ( P R
0131060 O C L A I M ( Q U O T E ( S
0131100 P E C I A L * F O R M A T - O
0131120 R I G I N A L - A R G U M E N T
0131140 S * ) ) ) \r ( O R ( B O U N D
0131160 P ( Q U O T E * F O R M A T
0131200 - O R I G I N A L - A R G U M E
0131220 N T S * ) ) ( S E T Q * F O
0131240 R M A T - O R I G I N A L - A R
0131260 G U M E N T S * N I L ) ) \r (
0131300 L E T * ( ( A 0 2 9 9 ( Q U
0131320 O T E * F O R M A T - O R I G
0131340 I N A L - A R G U M E N T S * )
0131360 ) ( A 0 3 0 0 ( Q U O T E
0131400 V A R I A B L E ) ) ( A 0 3 0
0131420 1 \r " L i s t o f o r i g
0131440 i n a l F O R M A T a r g u
0131460 m e n t s " ) ) ( P R O G N
0131500 ( C O N D ( ( F B O U N D P
0131520 ( Q U O T E S E T - D O C U M
0131540 E N T A T I O N ) ) ( \r S E T
0131560 - D O C U M E N T A T I O N A
0131600 0 2 9 9 A 0 3 0 0 A 0 3 0 1
0131620 ) ) ) A 0 3 0 1 ) ) \r ( P R O
0131640 C L A I M ( Q U O T E ( S P
0131660 E C I A L C A R D I N A L - O
0131700 N E S ) ) ) \r ( O R ( B O U N
0131720 D P ( Q U O T E C A R D I N
0131740 A L - O N E S ) ) ( S E T Q
0131760 C A R D I N A L - O N E S ( M
0132000 A K E - A R R A Y 1 0 : E L
0132020 E M E N T - T Y P E T \r : I
0132040 N I T I A L - C O N T E N T S
0132060 ( Q U O T E ( N I L " o n e
0132100 " " t w o " " t h r e e "
0132120 " f o u r " " f i v e " " s
0132140 i x " " s e v e n " " e i g
0132160 h t " " n i n e " ) ) ) ) ) \r
0132200 ( L E T * ( ( A 0 3 0 2 ( Q
0132220 U O T E C A R D I N A L - O N
0132240 E S ) ) ( A 0 3 0 3 ( Q U O
0132260 T E V A R I A B L E ) ) ( A
0132300 0 3 0 4 " T a b l e o f s
0132320 t r i n g s u s e d b y ~
0132340 R " ) ) ( \r P R O G N ( C O
0132360 N D ( ( F B O U N D P ( Q U
0132400 O T E S E T - D O C U M E N T
0132420 A T I O N ) ) ( S E T - D O C
0132440 U M E N T A T I O N A 0 3 0 2
0132460 A 0 3 0 3 A 0 3 0 4 ) ) )
0132500 A 0 3 0 4 ) ) \r ( P R O C L A I
0132520 M ( Q U O T E ( S P E C I A
0132540 L C A R D I N A L - T E N S )
0132560 ) ) \r ( O R ( B O U N D P (
0132600 Q U O T E C A R D I N A L - T
0132620 E N S ) ) ( S E T Q C A R D
0132640 I N A L - T E N S ( M A K E -
0132660 A R R A Y 1 0 : E L E M E N
0132700 T - T Y P E T \r : I N I T I
0132720 A L - C O N T E N T S ( Q U O
0132740 T E ( N I L N I L " t w e
0132760 n t y " " t h i r t y " " f
0133000 o r t y " " f i f t y " " s
0133020 i x t y " " s e v e n t y "
0133040 " e i g h t y " \r " n i n e t
0133060 y " ) ) ) ) ) \r ( L E T * ( (
0133100 A 0 3 0 5 ( Q U O T E C A R
0133120 D I N A L - T E N S ) ) ( A 0
0133140 3 0 6 ( Q U O T E V A R I A
0133160 B L E ) ) ( A 0 3 0 7 " T a
0133200 b l e o f s t r i n g s u
0133220 s e d b y ~ R " ) ) ( \r P
0133240 R O G N ( C O N D ( ( F B O
0133260 U N D P ( Q U O T E S E T -
0133300 D O C U M E N T A T I O N ) )
0133320 ( S E T - D O C U M E N T A T I
0133340 O N A 0 3 0 5 A 0 3 0 6 A
0133360 0 3 0 7 ) ) ) A 0 3 0 7 ) ) \r
0133400 ( P R O C L A I M ( Q U O T E
0133420 ( S P E C I A L C A R D I N
0133440 A L - T E E N S ) ) ) \r ( O R
0133460 ( B O U N D P ( Q U O T E C
0133500 A R D I N A L - T E E N S ) )
0133520 ( S E T Q C A R D I N A L - T
0133540 E E N S ( M A K E - A R R A Y
0133560 1 0 : E L E M E N T - T Y P
0133600 E T \r : I N I T I A L - C O
0133620 N T E N T S ( Q U O T E ( "
0133640 t e n " " e l e v e n " " t
0133660 w e l v e " " t h i r t e e n
0133700 " " f o u r t e e n " " f i
0133720 f t e e n " " s i x t e e n "
0133740 \r " s e v e n t e e n " " e
0133760 i g h t e e n " " n i n e t e
0134000 e n " ) ) ) ) ) \r ( L E T * (
0134020 ( A 0 3 0 8 ( Q U O T E C A
0134040 R D I N A L - T E E N S ) ) (
0134060 A 0 3 0 9 ( Q U O T E V A R
0134100 I A B L E ) ) ( A 0 3 1 0 "
0134120 T a b l e o f s t r i n g s
0134140 u s e d b y ~ R " ) ) \r
0134160 ( P R O G N ( C O N D ( ( F
0134200 B O U N D P ( Q U O T E S E
0134220 T - D O C U M E N T A T I O N )
0134240 ) ( S E T - D O C U M E N T A
0134260 T I O N A 0 3 0 8 A 0 3 0 9
0134300 A 0 3 1 0 ) ) ) A 0 3 1 0 )
0134320 ) \r ( P R O C L A I M ( Q U O
0134340 T E ( S P E C I A L C A R D
0134360 I N A L - P E R I O D S ) ) ) \r
0134400 ( O R ( B O U N D P ( Q U O
0134420 T E C A R D I N A L - P E R I
0134440 O D S ) ) ( S E T Q C A R D
0134460 I N A L - P E R I O D S ( M A
0134500 K E - A R R A Y 1 2 : E L E
0134520 M E N T - T Y P E T \r : I N
0134540 I T I A L - C O N T E N T S (
0134560 Q U O T E ( " " " t h o u
0134600 s a n d " " m i l l i o n "
0134620 " b i l l i o n " " t r
0134640 i l l i o n " " q u a d r i
0134660 l l i o n " \r " q u i n t i
0134700 l l i o n " " s e x t i l l
0134720 i o n " " s e p t i l l i o
0134740 n " " o c t i l l i o n "
0134760 " n o n i l l i o n " " d
0135000 e c i l l i o n " ) ) ) ) ) \r (
0135020 L E T * ( ( A 0 3 1 1 ( Q U
0135040 O T E C A R D I N A L - P E R
0135060 I O D S ) ) ( A 0 3 1 2 ( Q
0135100 U O T E V A R I A B L E ) )
0135120 ( A 0 3 1 3 " T a b l e o f
0135140 s t r i n g s u s e d b y
0135160 ~ R " ) \r ) ( P R O G N (
0135200 C O N D ( ( F B O U N D P (
0135220 Q U O T E S E T - D O C U M E
0135240 N T A T I O N ) ) ( S E T - D
0135260 O C U M E N T A T I O N A 0 3
0135300 1 1 A 0 3 1 2 A 0 3 1 3 ) )
0135320 ) A 0 3 1 3 ) ) \r ( P R O C L
0135340 A I M ( Q U O T E ( S P E C
0135360 I A L O R D I N A L - O N E S
0135400 ) ) ) \r ( O R ( B O U N D P
0135420 ( Q U O T E O R D I N A L - O
0135440 N E S ) ) ( S E T Q O R D I
0135460 N A L - O N E S ( M A K E - A
0135500 R R A Y 1 0 : E L E M E N T
0135520 - T Y P E T : I N I T I A L
0135540 - C O N T E N T S \r ( Q U O T
0135560 E ( N I L " f i r s t " "
0135600 s e c o n d " " t h i r d "
0135620 " f o u r t h " " f i f t h "
0135640 " s i x t h " " s e v e n t
0135660 h " " e i g h t h " " n i n
0135700 t h " ) ) ) ) ) \r ( L E T * (
0135720 ( A 0 3 1 4 ( Q U O T E O R
0135740 D I N A L - O N E S ) ) ( A 0
0135760 3 1 5 ( Q U O T E V A R I A
0136000 B L E ) ) ( A 0 3 1 6 " T a
0136020 b l e o f s t r i n g s u
0136040 s e d b y ~ R " ) ) ( \r P
0136060 R O G N ( C O N D ( ( F B O
0136100 U N D P ( Q U O T E S E T -
0136120 D O C U M E N T A T I O N ) )
0136140 ( S E T - D O C U M E N T A T I
0136160 O N A 0 3 1 4 A 0 3 1 5 A
0136200 0 3 1 6 ) ) ) A 0 3 1 6 ) ) \r
0136220 ( P R O C L A I M ( Q U O T E
0136240 ( S P E C I A L O R D I N A
0136260 L - T E N S ) ) ) \r ( O R ( B
0136300 O U N D P ( Q U O T E O R D
0136320 I N A L - T E N S ) ) ( S E T
0136340 Q O R D I N A L - T E N S (
0136360 M A K E - A R R A Y 1 0 : E
0136400 L E M E N T - T Y P E T : I
0136420 N I T I A L - C O N T E N T S
0136440 \r ( Q U O T E ( N I L " t e
0136460 n t h " " t w e n t i e t h "
0136500 " t h i r t i e t h " " f o
0136520 u r t i e t h " " f i f t i e
0136540 t h " " s i x t i e t h " "
0136560 s e v e n t i e t h " " e i g
0136600 h t i e t h " \r " n i n e t i
0136620 e t h " ) ) ) ) ) \r ( L E T *
0136640 ( ( A 0 3 1 7 ( Q U O T E O
0136660 R D I N A L - T E N S ) ) ( A
0136700 0 3 1 8 ( Q U O T E V A R I
0136720 A B L E ) ) ( A 0 3 1 9 " T
0136740 a b l e o f s t r i n g s
0136760 u s e d b y ~ R " ) ) ( \r
0137000 P R O G N ( C O N D ( ( F B
0137020 O U N D P ( Q U O T E S E T
0137040 - D O C U M E N T A T I O N ) )
0137060 ( S E T - D O C U M E N T A T
0137100 I O N A 0 3 1 7 A 0 3 1 8
0137120 A 0 3 1 9 ) ) ) A 0 3 1 9 ) )
0137140 \r ( P U T P R O P S C M L F O
0137160 R M A T F I L E T Y P E C O
0137200 M P I L E - F I L E ) \r ( P U T
0137220 P R O P S C M L F O R M A T
0137240 C O P Y R I G H T ( " X e r o
0137260 x C o r p o r a t i o n " 1
0137300 9 8 6 ) ) \r N I L \r
0137312