$ od -c -N 50000 [eris]<Lisp>KOTO>LISPUSERS>MATHFNS.DCOM!1 0000000 ( F I L E C R E A T E D " 2 6 0000020 - A U G - 8 3 0 0 : 3 9 : 5 0 0000040 " ( " c o m p i l e d o n 0000060 " { P H Y L U M } < L I S P U 0000100 S E R S > M A T H F N S . ; 3 ) 0000120 " 2 4 - A U G - 8 3 1 5 : 5 0000140 3 : 1 8 " \r t c o m p l % ' d 0000160 i n W O R K d a t e d " 0000200 2 4 - A U G - 8 3 1 6 : 2 7 : 0000220 3 6 " ) \r ( F I L E C R E A T E 0000240 D " 2 6 - A U G - 8 3 0 0 : 0000260 3 7 : 3 7 " { P H Y L U M } < 0000300 L I S P U S E R S > M A T H F N 0000320 S . ; 3 1 2 2 4 9 c h a n g 0000340 e s t o : ( V A R S M A T 0000360 H F N S C O M S ) ( \r F N S 0000400 L O G 1 0 A N T I L O G 1 0 0000420 S E C C S C C O T A R C S 0000440 E C A R C C S C A R C C O T 0000460 S I N H S E C H C O S H 0000500 C S C H T A N H C O T H A 0000520 R C S I N H A R C C O S H \r 0000540 A R C T A N H A R C C S C H 0000560 A R C S E C H A R C C O T H 0000600 C P L U S C T I M E S C Q U 0000620 O T I E N T C A B S C A R G 0000640 C L O G C A N T I L O G C 0000660 E X P T C S Q R T C S I N 0000700 C C O S \r C T A N C C O T 0000720 C S E C C C S C C A R C S I 0000740 N C A R C C O S C A R C T A 0000760 N C A R C C S C C A R C S E 0001000 C C A R C C O T C S I N H 0001020 C S E C H C C O S H C C S C 0001040 H C T A N H \r C C O T H C 0001060 A R C S I N H C A R C C O S H 0001100 C A R C T A N H C A R C C S 0001120 C H C A R C S E C H C A R C 0001140 C O T H ) ( M A C R O S C E 0001160 X P ) p r e v i o u s d a t 0001200 e : \r " 2 6 - A U G - 8 3 0 0001220 0 : 1 5 : 0 4 " { P H Y L U M 0001240 } < L I S P U S E R S > M A T H 0001260 F N S . ; 1 ) \r L O G 1 0 D 1 0001300 \r ( I 0 X ) \0 \v \0 \0 \0 001 @ 0001320 \t \0 \0 o \0 \0 \0 353 020 \0 ( 3 L O G 0001340 ) \r N I L \r ( 7 2 . 3 0 2 5 8 0001360 3 ) \r A N T I L O G 1 0 D 1 \r 0001400 ( I 0 X ) \0 \n \0 \0 \0 001 o \0 0001420 \0 \0 @ \n \0 \0 020 \0 ( 7 E X P T ) 0001440 \r N I L \r ( 3 1 0 . 0 ) \r S E 0001460 C D 1 \r ( I 1 R A D I A N 0001500 S F L G I 0 X ) \0 \f \0 \0 0001520 \0 002 o \0 \0 \0 @ A \n \0 \0 353 020 \0 ( 1 0001540 0 Q C O S ) \r N I L \r ( 3 1 0001560 . 0 ) \r C S C D 1 \r ( I 1 0001600 R A D I A N S F L G I 0 X 0001620 ) \0 \f \0 \0 \0 002 o \0 \0 \0 @ A \n \0 0001640 \0 353 020 \0 ( 1 0 Q S I N ) \r N I 0001660 L \r ( 3 1 . 0 ) \r C O T D 1 0001700 \r ( I 1 R A D I A N S F L G 0001720 I 0 X ) \0 \f \0 \0 \0 002 o \0 0001740 \0 \0 @ A \n \0 \0 353 020 \0 ( 1 0 Q T 0001760 A N ) \r N I L \r ( 3 1 . 0 ) \r 0002000 A R C S E C D 1 \r ( I 1 R 0002020 A D I A N S F L G I 0 X ) 0002040 \0 ! \0 \0 \0 002 o \0 \0 \0 @ 362 252 o \0 0002060 \0 \0 @ 353 A \n \0 \0 020 o \0 \0 \0 @ 353 A 0002100 \n \0 \0 \t \0 \0 020 \0 ( 3 6 Q F M I 0002120 N U S 3 3 Q A R C C O S 2 0002140 0 Q A R C C O S ) \r N I L \r ( 0002160 2 5 Q 1 . 0 1 2 Q 1 . 0 0002200 3 0 . 0 ) \r A R C C S C D 1 0002220 \r ( I 1 R A D I A N S F L G 0002240 I 0 X ) \0 > \0 \0 \0 002 o \0 0002260 \0 \0 @ 362 252 o \0 \0 \0 @ 353 A \n \0 \0 020 0002300 A 262 025 o \0 \0 \0 @ 353 A \n \0 \0 o \0 \0 0002320 \0 350 \t \0 \0 020 o \0 \0 \0 @ 353 A \n \0 \0 0002340 o \0 \0 \0 350 o \0 \0 \0 351 020 \0 ( 6 1 Q 0002360 A R C S I N 4 6 Q F M I N 0002400 U S 3 6 Q A R C S I N 2 0 0002420 Q A R C S I N ) \r N I L \r ( 7 0002440 2 Q 1 8 0 . 0 6 5 Q 3 . 1 0002460 4 1 5 9 3 5 3 Q 1 . 0 4 2 0002500 Q 3 . 1 4 1 5 9 3 3 0 Q 1 0002520 . 0 1 2 Q 1 . 0 3 0 . 0 0002540 ) \r A R C C O T D 1 \r ( I 1 0002560 R A D I A N S F L G I 0 0002600 X ) \0 \v \0 \0 \0 002 o \0 \0 \0 @ A \v 0002620 \0 \0 020 \0 ( 1 0 Q A R C T A N 2 0002640 ) \r N I L \r ( 3 1 . 0 ) \r S I 0002660 N H D 1 \r ( I 0 X ) \0 023 0002700 \0 \0 \0 001 @ \t \0 \0 @ \t \0 \0 \t \0 \0 351 0002720 o \0 \0 \0 353 020 \0 ( 1 2 Q A N T I 0002740 L O G 7 F M I N U S 3 A 0002760 N T I L O G ) \r N I L \r ( 1 7 Q 0003000 2 . 0 ) \r S E C H D 1 \r ( I 0003020 0 X ) \0 023 \0 \0 \0 001 o \0 \0 \0 0003040 @ \t \0 \0 @ \t \0 \0 \t \0 \0 350 353 020 \0 ( 0003060 1 6 Q A N T I L O G 1 3 Q 0003100 F M I N U S 7 A N T I L O G 0003120 ) \r N I L \r ( 3 2 . 0 ) \r C O 0003140 S H D 1 \r ( I 0 X ) \0 023 0003160 \0 \0 \0 001 @ \t \0 \0 @ \t \0 \0 \t \0 \0 350 0003200 o \0 \0 \0 353 020 \0 ( 1 2 Q A N T I 0003220 L O G 7 F M I N U S 3 A 0003240 N T I L O G ) \r N I L \r ( 1 7 Q 0003260 2 . 0 ) \r C S C H D 1 \r ( I 0003300 0 X ) \0 023 \0 \0 \0 001 o \0 \0 \0 0003320 @ \t \0 \0 @ \t \0 \0 \t \0 \0 351 353 020 \0 ( 0003340 1 6 Q A N T I L O G 1 3 Q 0003360 F M I N U S 7 A N T I L O G 0003400 ) \r N I L \r ( 3 2 . 0 ) \r T A 0003420 N H D 1 \r ( I 0 X ) \0 037 0003440 \0 \0 \0 001 o \0 \0 \0 @ o \0 \0 \0 352 \t \0 0003460 \0 351 @ o \0 \0 \0 352 \t \0 \0 o \0 \0 \0 350 0003500 353 020 \0 ( 2 6 Q A N T I L O G 0003520 1 4 Q A N T I L O G ) \r N I L 0003540 \r ( 3 2 Q 1 . 0 2 2 Q - 2 0003560 . 0 1 0 Q - 2 . 0 3 1 . 0003600 0 ) \r C O T H D 1 \r ( I 0 0003620 X ) \0 037 \0 \0 \0 001 @ o \0 \0 \0 352 \t 0003640 \0 \0 o \0 \0 \0 350 o \0 \0 \0 @ o \0 \0 \0 0003660 352 \t \0 \0 351 353 020 \0 ( 3 2 Q A N T 0003700 I L O G 1 0 Q A N T I L O G 0003720 ) \r N I L \r ( 2 6 Q - 2 . 0 0003740 2 1 Q 1 . 0 1 4 Q 1 . 0 0003760 4 - 2 . 0 ) \r A R C S I N H 0004000 D 1 \r ( I 0 X ) \0 022 \0 \0 \0 0004020 001 @ d d 352 o \0 \0 \0 350 \t \0 \0 350 \t \0 0004040 \0 020 \0 ( 1 7 Q L O G 1 3 Q 0004060 S Q R T ) \r N I L \r ( 7 1 . 0 0004100 ) \r A R C C O S H D 1 \r ( I 0004120 0 X ) \0 022 \0 \0 \0 001 @ d d 352 o 0004140 \0 \0 \0 350 \t \0 \0 350 \t \0 \0 020 \0 ( 1 7 0004160 Q L O G 1 3 Q S Q R T ) \r 0004200 N I L \r ( 7 - 1 . 0 ) \r A R C 0004220 T A N H D 1 \r ( I 0 X ) 0004240 \0 027 \0 \0 \0 001 @ o \0 \0 \0 350 o \0 \0 \0 0004260 @ 351 353 \t \0 \0 o \0 \0 \0 352 020 \0 ( 1 7 0004300 Q L O G ) \r N I L \r ( 2 3 Q 0004320 . 5 1 1 Q 1 . 0 4 1 . 0 0004340 ) \r A R C C S C H D 1 \r ( I 0004360 0 X ) \0 027 \0 \0 \0 001 @ d 352 o \0 0004400 \0 \0 350 \t \0 \0 o \0 \0 \0 350 @ 353 \t \0 \0 0004420 020 \0 ( 2 4 Q L O G 1 2 Q S 0004440 Q R T ) \r N I L \r ( 1 6 Q 1 . 0004460 0 6 1 . 0 ) \r A R C S E C H 0004500 D 1 \r ( I 0 X ) \0 027 \0 \0 0004520 \0 001 o \0 \0 \0 @ d 352 351 \t \0 \0 o \0 \0 0004540 \0 350 @ 353 \t \0 \0 020 \0 ( 2 4 Q L O 0004560 G 1 2 Q S Q R T ) \r N I L \r 0004600 ( 1 6 Q 1 . 0 3 1 . 0 ) \r 0004620 A R C C O T H D 1 \r ( I 0 0004640 X ) \0 027 \0 \0 \0 001 @ o \0 \0 \0 351 @ 0004660 o \0 \0 \0 350 353 \t \0 \0 o \0 \0 \0 352 020 \0 0004700 ( 1 7 Q L O G ) \r N I L \r ( 2 0004720 3 Q . 5 1 2 Q 1 . 0 4 0004740 1 . 0 ) \r C P L U S D 1 \r N I 0004760 L \0 M 006 \0 002 \0 e 021 001 \0 H k 021 2 0005000 005 J d I 361 262 025 277 K 022 021 1 004 o \0 \0 0005020 \0 Z o \0 \0 \0 [ I 260 % a 275 L 265 \r M 0005040 h 032 \ 273 J k 330 Z 260 332 M & 274 260 367 d 0005060 001 274 J L 001 350 272 K L 002 350 273 002 003 265 361 0005100 J K 032 020 \0 N I L \r N I L \r ( 3 5 0005120 Q 0 . 0 3 0 Q 0 . 0 ) \r C 0005140 T I M E S D 1 \r N I L \0 \ 006 0005160 \0 002 \0 e 021 001 \0 H k 021 2 005 J d I 361 0005200 262 030 277 K 022 021 021 002 021 0 005 o \0 \0 \0 [ 0005220 o \0 \0 \0 \ I 260 1 a 275 L 265 \r M h 032 0005240 \ 273 J k 330 Z 260 327 M & 274 260 367 d 001 272 0005260 K J 001 352 L J 002 352 351 275 K J 002 352 L J 0005300 001 352 350 274 M 273 002 003 265 345 K L 032 020 \0 N 0005320 I L \r N I L \r ( 4 0 Q 0 . 0 0005340 3 3 Q 1 . 0 ) \r C Q U O T I E 0005360 N T D 1 \r ( P 1 A N S W E 0005400 R P 0 R I 1 Z 2 I 0005420 0 Z 1 ) \0 $ 002 \0 \0 002 021 001 0005440 A \t \0 \0 X @ A 001 A 002 \t \0 \0 032 \n \0 0005460 \0 Y d d 001 H 353 030 I d 002 H 353 031 I 020 0005500 \0 ( 2 3 Q C T I M E S 1 7 Q 0005520 F M I N U S 6 C A B S ) \r 0005540 N I L \r N I L \r C A B S D 1 \r 0005560 ( I 0 Z ) \0 020 \0 \0 \0 001 @ 001 0005600 @ 001 352 @ 002 @ 002 352 350 \t \0 \0 020 \0 ( 1 0005620 5 Q S Q R T ) \r N I L \r N I L 0005640 \r C A R G D 1 \r ( P 0 A N 0005660 S W E R I 0 Z ) \0 035 001 \0 0005700 \0 001 021 020 \0 @ 002 @ 001 i \v \0 \0 X o \0 0005720 \0 \0 H 362 226 H o \0 \0 \0 350 020 H 020 \0 ( 0005740 1 2 Q A R C T A N 2 ) \r N I L 0005760 \r ( 2 7 Q 6 . 2 8 3 1 8 6 1 0006000 7 Q 0 . 0 ) \r C L O G D 1 \r 0006020 ( I 0 Z ) \0 016 \0 \0 \0 001 @ \t 0006040 \0 \0 \t \0 \0 @ \t \0 \0 032 020 \0 ( 1 2 Q 0006060 C A R G 6 L O G 3 C A 0006100 B S ) \r N I L \r N I L \r C A N T 0006120 I L O G D 1 \r ( P 1 A N S 0006140 W E R P 0 E X I 0 Z 0006160 ) \0 034 002 \0 \0 001 021 001 @ 001 \t \0 \0 0006200 X d @ 002 i \n \0 \0 352 H @ 002 i \n \0 \0 0006220 352 032 020 \0 ( 2 7 Q S I N 1 7 Q 0006240 C O S 7 A N T I L O G ) \r 0006260 N I L \r N I L \r C E X P T D 1 0006300 \r ( I 1 Z 2 I 0 Z 1 ) 0006320 \0 \r \0 \0 \0 002 A @ \t \0 \0 \n \0 \0 \t 0006340 \0 \0 020 \0 ( 1 2 Q C A N T I L O 0006360 G 7 C T I M E S 4 C L O 0006400 G ) \r N I L \r N I L \r C S Q R T 0006420 D 1 \r ( I 0 Z ) \0 020 \0 \0 0006440 \0 001 o \0 \0 \0 @ \t \0 \0 \n \0 \0 \t \0 \0 0006460 020 \0 ( 1 5 Q C A N T I L O G 0006500 1 2 Q C T I M E S 7 C L O 0006520 G ) \r N I L \r ( 3 ( . 5 . 0006540 0 . 0 ) ) \r C S I N D 1 \r ( P 0006560 2 A N S W E R P 1 M I 0006600 Z P 0 I Z I 0 Z ) 0006620 \0 5 003 \0 \0 001 021 0 002 @ 002 \t \0 \0 @ 001 0006640 032 X @ 002 @ 001 \t \0 \0 032 Y H \t \0 \0 001 0006660 I \t \0 \0 001 351 H \t \0 \0 002 I \t \0 \0 002 0006700 351 032 o \0 \0 \0 \n \0 \0 020 \0 ( 6 2 Q 0006720 C Q U O T I E N T 5 0 Q C A 0006740 N T I L O G 4 3 Q C A N T I 0006760 L O G 3 5 Q C A N T I L O G 0007000 3 0 Q C A N T I L O G 2 2 0007020 Q F M I N U S 7 F M I N U 0007040 S ) \r N I L \r ( 5 7 Q ( 0 . 0 0007060 . 2 . 0 ) ) \r C C O S D 1 0007100 \r ( P 2 A N S W E R P 1 0007120 M I Z P 0 I Z I 0 0007140 Z ) \0 5 003 \0 \0 001 021 0 002 @ 002 \t \0 0007160 \0 @ 001 032 X @ 002 @ 001 \t \0 \0 032 Y H \t 0007200 \0 \0 001 I \t \0 \0 001 351 H \t \0 \0 002 I \t 0007220 \0 \0 002 351 032 o \0 \0 \0 \n \0 \0 020 \0 ( 6 0007240 2 Q C Q U O T I E N T 5 0 Q 0007260 C A N T I L O G 4 3 Q C A 0007300 N T I L O G 3 5 Q C A N T I 0007320 L O G 3 0 Q C A N T I L O G 0007340 2 2 Q F M I N U S 7 F M 0007360 I N U S ) \r N I L \r ( 5 7 Q ( 0007400 0 . 0 . 2 . 0 ) ) \r C T A N 0007420 D 1 \r ( I 0 Z ) \0 \r \0 \0 0007440 \0 001 @ \t \0 \0 @ \t \0 \0 \n \0 \0 020 \0 ( 0007460 1 2 Q C Q U O T I E N T 7 0007500 C S I N 3 C C O S ) \r N I L 0007520 \r N I L \r C C O T D 1 \r ( I 0007540 0 Z ) \0 \r \0 \0 \0 001 @ \t \0 \0 @ 0007560 \t \0 \0 \n \0 \0 020 \0 ( 1 2 Q C Q U 0007600 O T I E N T 7 C C O S 3 0007620 C S I N ) \r N I L \r N I L \r C S 0007640 E C D 1 \r ( I 0 Z ) \0 \r 0007660 \0 \0 \0 001 o \0 \0 \0 @ \t \0 \0 \n \0 \0 020 0007700 \0 ( 1 2 Q C Q U O T I E N T 0007720 7 C C O S ) \r N I L \r ( 3 ( 0007740 1 . 0 . 0 . 0 ) ) \r C C S C 0007760 D 1 \r ( I 0 Z ) \0 \r \0 \0 0010000 \0 001 o \0 \0 \0 @ \t \0 \0 \n \0 \0 020 \0 ( 0010020 1 2 Q C Q U O T I E N T 7 0010040 C S I N ) \r N I L \r ( 3 ( 1 . 0010060 0 . 0 . 0 ) ) \r C A R C S I 0010100 N D 1 \r ( I 0 Z ) \0 3 \0 0010120 \0 \0 001 o \0 \0 \0 o \0 \0 \0 @ \n \0 \0 o 0010140 \0 \0 \0 001 @ d \n \0 \0 001 351 o \0 \0 \0 002 0010160 @ d \n \0 \0 002 351 032 \t \0 \0 \n \0 \0 \t \0 0010200 \0 \n \0 \0 020 \0 ( 6 0 Q C T I M E 0010220 S 5 5 Q C L O G 5 2 Q C 0010240 P L U S 4 7 Q C S Q R T 4 0010260 1 Q C T I M E S 2 5 Q C T 0010300 I M E S 1 3 Q C T I M E S ) 0010320 \r N I L \r ( 3 3 Q ( 1 . 0 . 0010340 0 . 0 ) 1 7 Q ( 1 . 0 . 0010360 0 . 0 ) 7 ( 0 . 0 . 1 0010400 . 0 ) 3 ( 0 . 0 . - 1 . 0010420 0 ) ) \r C A R C C O S D 1 \r ( 0010440 I 0 Z ) \0 , \0 \0 \0 001 o \0 \0 0010460 \0 @ d d \n \0 \0 001 o \0 \0 \0 001 351 @ d 0010500 \n \0 \0 002 o \0 \0 \0 002 351 032 \t \0 \0 \n \0 0010520 \0 \t \0 \0 \n \0 \0 020 \0 ( 5 1 Q C T 0010540 I M E S 4 6 Q C L O G 4 3 0010560 Q C P L U S 4 0 Q C S Q R 0010600 T 2 5 Q C T I M E S 1 1 Q 0010620 C T I M E S ) \r N I L \r ( 3 2 0010640 Q ( 1 . 0 . 0 . 0 ) 1 6 0010660 Q ( 1 . 0 . 0 . 0 ) 3 0010700 ( 0 . 0 . - 1 . 0 ) ) \r C A 0010720 R C T A N D 1 \r ( I 0 Z ) 0010740 \0 = \0 \0 \0 001 o \0 \0 \0 o \0 \0 \0 o 0010760 \0 \0 \0 @ \n \0 \0 \n \0 \0 o \0 \0 \0 001 o 0011000 \0 \0 \0 @ \n \0 \0 001 351 o \0 \0 \0 002 o \0 0011020 \0 \0 @ \n \0 \0 002 351 032 \n \0 \0 \t \0 \0 \n 0011040 \0 \0 020 \0 ( 7 2 Q C T I M E S 0011060 6 7 Q C L O G 6 4 Q C Q U 0011100 O T I E N T 5 6 Q C T I M E 0011120 S 3 7 Q C T I M E S 2 2 Q 0011140 C P L U S 1 7 Q C T I M E 0011160 S ) \r N I L \r ( 5 2 Q ( 0 . 0 0011200 . 1 . 0 ) 4 5 Q ( 1 . 0 0011220 . 0 . 0 ) 3 3 Q ( 0 . 0 0011240 . 1 . 0 ) 2 6 Q ( 1 . 0 0011260 . 0 . 0 ) 1 3 Q ( 0 . 0 0011300 . 1 . 0 ) 7 ( 1 . 0 . 0011320 0 . 0 ) 3 ( 0 . 0 . - 0011340 . 5 ) ) \r C A R C C S C D 1 \r 0011360 ( I 0 Z ) \0 3 \0 \0 \0 001 o \0 0011400 \0 \0 o \0 \0 \0 @ d \n \0 \0 001 o \0 \0 \0 0011420 001 351 @ d \n \0 \0 002 o \0 \0 \0 002 351 032 \t 0011440 \0 \0 \n \0 \0 @ \n \0 \0 \t \0 \0 \n \0 \0 020 0011460 \0 ( 6 0 Q C T I M E S 5 5 Q 0011500 C L O G 5 2 Q C Q U O T I 0011520 E N T 4 6 Q C P L U S 4 3 0011540 Q C S Q R T 3 0 Q C T I M 0011560 E S 1 4 Q C T I M E S ) \r N 0011600 I L \r ( 3 5 Q ( 1 . 0 . 0 0011620 . 0 ) 2 1 Q ( 1 . 0 . 0 0011640 . 0 ) 7 ( 0 . 0 . 1 . 0 0011660 ) 3 ( 0 . 0 . - 1 . 0 ) 0011700 ) \r C A R C S E C D 1 \r ( I 0011720 0 Z ) \0 0 \0 \0 \0 001 o \0 \0 \0 o 0011740 \0 \0 \0 d 001 @ d \n \0 \0 001 351 o \0 \0 \0 0011760 002 @ d \n \0 \0 002 351 032 \t \0 \0 \n \0 \0 @ 0012000 \n \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 5 5 Q 0012020 C T I M E S 5 2 Q C L O G 0012040 4 7 Q C Q U O T I E N T 4 3 0012060 Q C P L U S 4 0 Q C S Q R 0012100 T 3 2 Q C T I M E S 1 6 Q 0012120 C T I M E S ) \r N I L \r ( 2 4 0012140 Q ( 1 . 0 . 0 . 0 ) 7 0012160 ( 1 . 0 . 0 . 0 ) 3 ( 0 0012200 . 0 . - 1 . 0 ) ) \r C A R C 0012220 C O T D 1 \r ( I 0 Z ) \0 0012240 ( \0 \0 \0 001 o \0 \0 \0 @ o \0 \0 \0 \n \0 0012260 \0 @ 001 o \0 \0 \0 001 351 @ 002 o \0 \0 \0 002 0012300 351 032 \n \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 4 5 0012320 Q C T I M E S 4 2 Q C L O 0012340 G 3 7 Q C Q U O T I E N T 0012360 1 3 Q C P L U S ) \r N I L \r ( 0012400 3 1 Q ( 0 . 0 . 1 . 0 ) 0012420 2 1 Q ( 0 . 0 . 1 . 0 ) 0012440 1 0 Q ( 0 . 0 . 1 . 0 ) 0012460 3 ( 0 . 0 . - . 5 ) ) \r C 0012500 S I N H D 1 \r ( I 0 Z ) 0012520 \0 4 \0 \0 \0 001 @ \t \0 \0 001 @ 001 \t \0 \0 0012540 @ 002 \t \0 \0 032 \t \0 \0 001 351 @ \t \0 \0 002 0012560 @ 001 \t \0 \0 @ 002 \t \0 \0 032 \t \0 \0 002 351 0012600 032 o \0 \0 \0 \n \0 \0 020 \0 ( 6 1 Q C 0012620 Q U O T I E N T 4 7 Q C A N 0012640 T I L O G 4 3 Q F M I N U S 0012660 3 6 Q F M I N U S 3 0 Q 0012700 C A N T I L O G 2 2 Q C A N 0012720 T I L O G 1 6 Q F M I N U S 0012740 1 1 Q F M I N U S 3 C A 0012760 N T I L O G ) \r N I L \r ( 5 6 Q 0013000 ( 2 . 0 . 0 . 0 ) ) \r C S 0013020 E C H D 1 \r ( I 0 Z ) \0 0013040 036 \0 \0 \0 001 o \0 \0 \0 @ \t \0 \0 @ 001 \t 0013060 \0 \0 @ 002 \t \0 \0 032 \t \0 \0 \n \0 \0 \n \0 0013100 \0 020 \0 ( 3 3 Q C Q U O T I E N 0013120 T 3 0 Q C P L U S 2 5 Q 0013140 C A N T I L O G 2 1 Q F M I 0013160 N U S 1 4 Q F M I N U S 7 0013200 C A N T I L O G ) \r N I L \r ( 0013220 3 ( 2 . 0 . 0 . 0 ) ) \r C 0013240 C O S H D 1 \r ( I 0 Z ) 0013260 \0 036 \0 \0 \0 001 @ \t \0 \0 @ 001 \t \0 \0 @ 0013300 002 \t \0 \0 032 \t \0 \0 \n \0 \0 o \0 \0 \0 \n 0013320 \0 \0 020 \0 ( 3 3 Q C Q U O T I E 0013340 N T 2 4 Q C P L U S 2 1 Q 0013360 C A N T I L O G 1 5 Q F M 0013400 I N U S 1 0 Q F M I N U S 0013420 3 C A N T I L O G ) \r N I L \r 0013440 ( 3 0 Q ( 2 . 0 . 0 . 0 ) 0013460 ) \r C C S C H D 1 \r ( I 0 0013500 Z ) \0 4 \0 \0 \0 001 o \0 \0 \0 @ \t \0 0013520 \0 001 @ 001 \t \0 \0 @ 002 \t \0 \0 032 \t \0 \0 0013540 001 351 @ \t \0 \0 002 @ 001 \t \0 \0 @ 002 \t \0 0013560 \0 032 \t \0 \0 002 351 032 \n \0 \0 020 \0 ( 6 1 0013600 Q C Q U O T I E N T 5 3 Q 0013620 C A N T I L O G 4 7 Q F M I 0013640 N U S 4 2 Q F M I N U S 3 0013660 4 Q C A N T I L O G 2 6 Q 0013700 C A N T I L O G 2 2 Q F M I 0013720 N U S 1 5 Q F M I N U S 7 0013740 C A N T I L O G ) \r N I L \r ( 0013760 3 ( 2 . 0 . 0 . 0 ) ) \r C 0014000 T A N H D 1 \r ( I 0 Z ) 0014020 \0 < \0 \0 \0 001 o \0 \0 \0 001 o \0 \0 \0 @ 0014040 \n \0 \0 \t \0 \0 001 351 o \0 \0 \0 002 o \0 \0 0014060 \0 @ \n \0 \0 \t \0 \0 002 351 032 o \0 \0 \0 o 0014100 \0 \0 \0 @ \n \0 \0 \t \0 \0 \n \0 \0 \n \0 \0 0014120 020 \0 ( 7 1 Q C Q U O T I E N T 0014140 6 6 Q C P L U S 6 3 Q C 0014160 A N T I L O G 6 0 Q C T I M 0014200 E S 4 1 Q C A N T I L O G 0014220 3 6 Q C T I M E S 1 7 Q C 0014240 A N T I L O G 1 4 Q C T I M 0014260 E S ) \r N I L \r ( 5 4 Q ( - 2 0014300 . 0 . 0 . 0 ) 5 0 Q ( 1 0014320 . 0 . 0 . 0 ) 3 2 Q ( - 0014340 2 . 0 . 0 . 0 ) 2 5 Q ( 0014360 1 . 0 . 0 . 0 ) 1 0 Q ( 0014400 - 2 . 0 . 0 . 0 ) 3 ( 1 0014420 . 0 . 0 . 0 ) ) \r C C O T H 0014440 D 1 \r ( I 0 Z ) \0 < \0 \0 0014460 \0 001 o \0 \0 \0 o \0 \0 \0 @ \n \0 \0 \t \0 0014500 \0 \n \0 \0 o \0 \0 \0 001 o \0 \0 \0 @ \n \0 0014520 \0 \t \0 \0 001 351 o \0 \0 \0 002 o \0 \0 \0 @ 0014540 \n \0 \0 \t \0 \0 002 351 032 \n \0 \0 020 \0 ( 7 0014560 1 Q C Q U O T I E N T 6 3 Q 0014600 C A N T I L O G 6 0 Q C T 0014620 I M E S 4 1 Q C A N T I L O 0014640 G 3 6 Q C T I M E S 2 1 Q 0014660 C P L U S 1 6 Q C A N T I 0014700 L O G 1 3 Q C T I M E S ) \r 0014720 N I L \r ( 5 4 Q ( - 2 . 0 . 0014740 0 . 0 ) 4 7 Q ( 1 . 0 . 0014760 0 . 0 ) 3 2 Q ( - 2 . 0 0015000 . 0 . 0 ) 2 5 Q ( 1 . 0 0015020 . 0 . 0 ) 7 ( - 2 . 0 . 0015040 0 . 0 ) 3 ( 1 . 0 . 0 0015060 . 0 ) ) \r C A R C S I N H D 1 0015100 \r ( I 0 Z ) \0 030 \0 \0 \0 001 @ 0015120 o \0 \0 \0 @ d \n \0 \0 \n \0 \0 \t \0 \0 \n 0015140 \0 \0 \t \0 \0 020 \0 ( 2 5 Q C L O G 0015160 2 2 Q C P L U S 1 7 Q S 0015200 Q R T 1 4 Q C P L U S 1 1 0015220 Q C T I M E S ) \r N I L \r ( 4 0015240 ( 1 . 0 . 0 . 0 ) ) \r C A 0015260 R C C O S H D 1 \r ( I 0 Z 0015300 ) \0 % \0 \0 \0 001 @ d d \n \0 \0 001 o 0015320 \0 \0 \0 001 351 @ d \n \0 \0 002 o \0 \0 \0 002 0015340 351 032 \t \0 \0 \n \0 \0 \t \0 \0 020 \0 ( 4 2 0015360 Q C L O G 3 7 Q C P L U S 0015400 3 4 Q S Q R T 2 1 Q C T 0015420 I M E S 5 C T I M E S ) \r N 0015440 I L \r ( 2 6 Q ( 1 . 0 . 0 0015460 . 0 ) 1 2 Q ( 1 . 0 . 0 0015500 . 0 ) ) \r C A R C T A N H D 1 0015520 \r ( I 0 Z ) \0 ( \0 \0 \0 001 o 0015540 \0 \0 \0 o \0 \0 \0 @ \n \0 \0 o \0 \0 \0 001 0015560 @ 001 351 o \0 \0 \0 002 @ 002 351 032 \n \0 \0 \t 0015600 \0 \0 \n \0 \0 020 \0 ( 4 5 Q C T I M 0015620 E S 4 2 Q C L O G 3 7 Q 0015640 C Q U O T I E N T 1 3 Q C P 0015660 L U S ) \r N I L \r ( 2 7 Q ( 1 0015700 . 0 . 0 . 0 ) 1 7 Q ( 1 0015720 . 0 . 0 . 0 ) 7 ( 1 . 0 0015740 . 0 . 0 ) 3 ( . 5 . 0015760 0 . 0 ) ) \r C A R C C S C H D 0016000 1 \r ( I 0 Z ) \0 037 \0 \0 \0 001 0016020 o \0 \0 \0 @ d \n \0 \0 o \0 \0 \0 \n \0 \0 0016040 \t \0 \0 \n \0 \0 @ \n \0 \0 \t \0 \0 020 \0 ( 0016060 3 4 Q C L O G 3 1 Q C Q U 0016100 O T I E N T 2 5 Q C P L U S 0016120 2 2 Q S Q R T 1 7 Q C P 0016140 L U S 1 0 Q C T I M E S ) \r 0016160 N I L \r ( 1 4 Q ( 1 . 0 . 0016200 0 . 0 ) 3 ( 1 . 0 . 0 . 0016220 0 ) ) \r C A R C S E C H D 1 \r 0016240 ( I 0 Z ) \0 ) \0 \0 \0 001 o \0 0016260 \0 \0 d 001 @ d \n \0 \0 001 351 o \0 \0 \0 002 0016300 @ d \n \0 \0 002 351 032 \t \0 \0 \n \0 \0 @ \n 0016320 \0 \0 \t \0 \0 020 \0 ( 4 6 Q C L O G 0016340 4 3 Q C Q U O T I E N T 3 0016360 7 Q C P L U S 3 4 Q S Q R 0016400 T 2 6 Q C T I M E S 1 2 Q 0016420 C T I M E S ) \r N I L \r ( 2 0 0016440 Q ( 1 . 0 . 0 . 0 ) 3 0016460 ( 1 . 0 . 0 . 0 ) ) \r C A R 0016500 C C O T H D 1 \r ( I 0 Z ) 0016520 \0 ( \0 \0 \0 001 o \0 \0 \0 @ 001 o \0 \0 0016540 \0 001 351 @ 002 o \0 \0 \0 002 351 032 o \0 \0 \0 0016560 @ \n \0 \0 \n \0 \0 \t \0 \0 \n \0 \0 020 \0 ( 0016600 4 5 Q C T I M E S 4 2 Q C 0016620 L O G 3 7 Q C Q U O T I E N 0016640 T 3 4 Q C P L U S ) \r N I L 0016660 \r ( 3 0 Q ( 1 . 0 . 0 . 0 0016700 ) 2 1 Q ( 1 . 0 . 0 . 0 0016720 ) 1 1 Q ( 1 . 0 . 0 . 0 0016740 ) 3 ( . 5 . 0 . 0 ) ) \r 0016760 ( P R E T T Y C O M P R I N T 0017000 M A T H F N S C O M S ) \r ( R P 0017020 A Q Q M A T H F N S C O M S 0017040 ( ( * M A T H F N S - - B 0017060 y K e l l y R o a c h * ) 0017100 ( F N S L O G 1 0 A N T I 0017120 L O G 1 0 ) ( F N S S E C 0017140 C S C C O T A R C S E C \r 0017160 A R C C S C A R C C O T ) ( 0017200 F N S S I N H S E C H C O 0017220 S H C S C H T A N H C O T 0017240 H A R C S I N H A R C C O S 0017260 H A R C T A N H A R C C S C 0017300 H A R C S E C H A R C C O T 0017320 H ) ( \r F N S C P L U S C 0017340 T I M E S C Q U O T I E N T 0017360 C A B S C A R G C L O G C 0017400 A N T I L O G C E X P T C S 0017420 Q R T ) ( F N S C S I N C 0017440 C O S C T A N C C O T C S 0017460 E C C C S C \r C A R C S I N 0017500 C A R C C O S C A R C T A N 0017520 C A R C C S C C A R C S E C 0017540 C A R C C O T ) ( F N S C 0017560 S I N H C S E C H C C O S H 0017600 C C S C H C T A N H C C O 0017620 T H C A R C S I N H \r C A R 0017640 C C O S H C A R C T A N H C 0017660 A R C C S C H C A R C S E C H 0017700 C A R C C O T H ) ( P R O P 0017720 S ( C O M P L E X I F Y M A 0017740 C R O ) ( C O M P L E X M A 0017760 C R O ) ( R E A L M A C R O 0020000 ) ( \r I M A G I N A R Y M A 0020020 C R O ) ( C O N J U G A T E 0020040 M A C R O ) ( C Z E R O P M 0020060 A C R O ) ( C M I N U S M A 0020100 C R O ) ( C D I F F E R E N C 0020120 E M A C R O ) ( C E X P M 0020140 A C R O ) ( E X P \r M A C R 0020160 O ) ) ( C O N S T A N T S ( 0020200 E 2 . 7 1 8 2 8 2 ) ( P I 0020220 3 . 1 4 1 5 9 3 ) ( E U L E R 0020240 . 5 7 7 2 1 5 7 ) ( C O M P 0020260 L E X 0 ( Q U O T E ( 0 . 0 0020300 . 0 . 0 ) ) ) ( \r C O M P 0020320 L E X 1 ( Q U O T E ( 1 . 0 0020340 . 0 . 0 ) ) ) ( C O M P L 0020360 E X 2 ( Q U O T E ( 2 . 0 0020400 . 0 . 0 ) ) ) ( C O M P L E 0020420 X I ( Q U O T E ( 0 . 0 . 0020440 1 . 0 ) ) ) ( C O M P L E X 0020460 M 1 \r ( Q U O T E ( - 1 . 0 0020500 . 0 . 0 ) ) ) ( C O M P L 0020520 E X M I ( Q U O T E ( 0 . 0 0020540 . - 1 . 0 ) ) ) ( C O M P 0020560 L E X E ( Q U O T E ( 2 . 7 0020600 1 8 2 8 2 . 0 . 0 ) ) ) ( 0020620 C O M P L E X P I \r ( Q U O T 0020640 E ( 3 . 1 4 1 5 9 3 . 0 . 0020660 0 ) ) ) ) ( P ( M O V D ( 0020700 Q U O T E A N T I L O G ) ( 0020720 Q U O T E E X P ) ) ( M O V 0020740 D ( Q U O T E C A N T I L O 0020760 G ) ( Q U O T E C E X P ) ) 0021000 \r ) ( D E C L A R E : D O N 0021020 T E V A L @ L O A D D O E V A 0021040 L @ C O M P I L E D O N T C O 0021060 P Y C O M P I L E R V A R S 0021100 ( A D D V A R S ( N L A M A ) 0021120 ( N L A M L ) ( L A M A C 0021140 T I M E S \r C P L U S ) ) ) ) 0021160 ) \r ( P U T P R O P S C O M P 0021200 L E X I F Y M A C R O ( ( R 0021220 ) ( C O N S R 0 . 0 ) ) ) 0021240 \r ( P U T P R O P S C O M P L 0021260 E X M A C R O ( ( R I ) 0021300 ( C O N S R I ) ) ) \r ( P U 0021320 T P R O P S R E A L M A C R 0021340 O ( ( Z ) ( C A R Z ) ) ) 0021360 \r ( P U T P R O P S I M A G I 0021400 N A R Y M A C R O ( ( Z ) 0021420 ( C D R Z ) ) ) \r ( P U T P R 0021440 O P S C O N J U G A T E M A 0021460 C R O ( ( Z ) ( C O N S ( 0021500 C A R Z ) ( F M I N U S ( 0021520 C D R Z ) ) ) ) ) \r ( P U T P 0021540 R O P S C Z E R O P M A C R 0021560 O ( ( Z ) ( E Q U A L Z 0021600 C O M P L E X 0 ) ) ) \r ( P U T 0021620 P R O P S C M I N U S M A C 0021640 R O ( ( Z ) ( C O M P L E X 0021660 ( F M I N U S ( R E A L Z 0021700 ) ) ( F M I N U S ( I M A G 0021720 I N A R Y Z ) ) ) ) ) \r ( P U 0021740 T P R O P S C D I F F E R E N 0021760 C E M A C R O ( ( Z 1 Z 2 0022000 ) ( C O M P L E X ( F D I F 0022020 F E R E N C E ( R E A L Z 1 0022040 ) ( R E A L Z 2 ) ) ( F D 0022060 I F F E R E N C E ( \r I M A G 0022100 I N A R Y Z 1 ) ( I M A G I 0022120 N A R Y Z 2 ) ) ) ) ) \r ( P U 0022140 T P R O P S C E X P M A C R 0022160 O ( ( X ) ( C A N T I L O G 0022200 X ) ) ) \r ( P U T P R O P S 0022220 E X P M A C R O ( ( X ) ( 0022240 A N T I L O G X ) ) ) \r ( R P 0022260 A Q Q E 2 . 7 1 8 2 8 2 ) \r 0022300 ( R P A Q Q P I 3 . 1 4 1 5 0022320 9 3 ) \r ( R P A Q Q E U L E R 0022340 . 5 7 7 2 1 5 7 ) \r ( R P A Q 0022360 Q C O M P L E X 0 ( 0 . 0 0022400 . 0 . 0 ) ) \r ( R P A Q Q C 0022420 O M P L E X 1 ( 1 . 0 . 0 0022440 . 0 ) ) \r ( R P A Q Q C O M P 0022460 L E X 2 ( 2 . 0 . 0 . 0 ) 0022500 ) \r ( R P A Q Q C O M P L E X 0022520 I ( 0 . 0 . 1 . 0 ) ) \r ( 0022540 R P A Q Q C O M P L E X M 1 0022560 ( - 1 . 0 . 0 . 0 ) ) \r ( R 0022600 P A Q Q C O M P L E X M I ( 0022620 0 . 0 . - 1 . 0 ) ) \r ( R P 0022640 A Q Q C O M P L E X E ( 2 . 0022660 7 1 8 2 8 2 . 0 . 0 ) ) \r ( 0022700 R P A Q Q C O M P L E X P I 0022720 ( 3 . 1 4 1 5 9 3 . 0 . 0 ) 0022740 ) \r ( C O N S T A N T S ( E 0022760 2 . 7 1 8 2 8 2 ) ( P I 3 . 0023000 1 4 1 5 9 3 ) ( E U L E R . 0023020 5 7 7 2 1 5 7 ) ( C O M P L E 0023040 X 0 ( Q U O T E ( 0 . 0 . 0023060 0 . 0 ) ) ) ( C O M P L E X 0023100 1 ( Q U O T E \r ( 1 . 0 . 0023120 0 . 0 ) ) ) ( C O M P L E X 0023140 2 ( Q U O T E ( 2 . 0 . 0023160 0 . 0 ) ) ) ( C O M P L E X I 0023200 ( Q U O T E ( 0 . 0 . 1 0023220 . 0 ) ) ) ( C O M P L E X M 1 0023240 ( Q U O T E ( - 1 . 0 \r . 0023260 0 . 0 ) ) ) ( C O M P L E X 0023300 M I ( Q U O T E ( 0 . 0 . 0023320 - 1 . 0 ) ) ) ( C O M P L E 0023340 X E ( Q U O T E ( 2 . 7 1 8 0023360 2 8 2 . 0 . 0 ) ) ) ( C O 0023400 M P L E X P I ( Q U O T E ( 0023420 \r 3 . 1 4 1 5 9 3 . 0 . 0 ) 0023440 ) ) ) \r ( M O V D ( Q U O T E 0023460 A N T I L O G ) ( Q U O T E 0023500 E X P ) ) \r ( M O V D ( Q U 0023520 O T E C A N T I L O G ) ( Q 0023540 U O T E C E X P ) ) \r N I L \r 0023560