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