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