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