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