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